Salome HOME
*** empty log message ***
[modules/geom.git] / src / NMTDS / NMTDS_ShapesDataStructure.cdl
index 23391971cf6af2d3f445b60bc79ecb16d2d4ae68..1922b4861f8e3a0d21c7e6ee7d2cfadc99911b7f 100644 (file)
@@ -1,9 +1,26 @@
+-- Copyright (C) 2005  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
+-- CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
+-- 
+-- This library is free software; you can redistribute it and/or
+-- modify it under the terms of the GNU Lesser General Public
+-- License as published by the Free Software Foundation; either 
+-- version 2.1 of the License.
+-- 
+-- This library is distributed in the hope that it will be useful 
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of 
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
+-- Lesser General Public License for more details.
+--
+-- You should have received a copy of the GNU Lesser General Public  
+-- License along with this library; if not, write to the Free Software 
+-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+--
+-- See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
+--  
 -- File:       NMTDS_ShapesDataStructure.cdl
 -- Created:    Mon Dec  1 10:17:05 2003
 -- Author:     Peter KURNEV
 --             <pkv@irinox>
----Copyright:   Matra Datavision 2003
-
 
 class ShapesDataStructure from NMTDS  
     inherits ShapesDataStructure from BooleanOperations  
@@ -11,7 +28,8 @@ class ShapesDataStructure from NMTDS
        ---Purpose: 
 
 uses
-    Shape from TopoDS, 
+    Shape from TopoDS,  
+    IndexedDataMapOfShapeAncestorsSuccessors from BooleanOperations,
     CArray1OfIndexRange from NMTDS, 
     IndexedDataMapOfIntegerIndexedDataMapOfShapeInteger from NMTDS
 --raises
@@ -46,7 +64,21 @@ is
            aS:Shape from TopoDS; 
            iRank:Integer from Standard) 
        returns Integer from Standard  
-       is redefined;                    
+       is redefined;   
+
+-- Modified to Add new methods Thu Sep 14 14:35:18 2006 
+-- Contribution of Samtech www.samcef.com BEGIN 
+    FillMap (me;  
+           aS  :Shape from TopoDS; 
+           aMSA: out IndexedDataMapOfShapeAncestorsSuccessors from BooleanOperations;  
+           aMS : out IndexedDataMapOfShapeAncestorsSuccessors from BooleanOperations);  
+     
+    FillSubshapes (me;  
+           aS  :Shape from TopoDS; 
+           aMSA:out IndexedDataMapOfShapeAncestorsSuccessors from BooleanOperations;  
+           aMS :out IndexedDataMapOfShapeAncestorsSuccessors from BooleanOperations); 
+-- Contribution of Samtech www.samcef.com END 
+
 fields
     myCompositeShape:  Shape from TopoDS is protected; 
     myRanges        :  CArray1OfIndexRange from NMTDS is protected;