PAL8395: Improve CheckCompoundOfBlocks and RemoveExtraEdges. Improvement done by...

[modules/geom.git] / src / GEOMAlgo / GEOMAlgo_Tools.cdl

diff --git a/src/GEOMAlgo/GEOMAlgo_Tools.cdl b/src/GEOMAlgo/GEOMAlgo_Tools.cdl
index ac4ea7f7ff29575f6bc7723d4d69ca8b6c0bce13..7b50b0c3969cb8ba3505a7f27ec814670fee556a 100644 (file)
--- a/src/GEOMAlgo/GEOMAlgo_Tools.cdl
+++ b/src/GEOMAlgo/GEOMAlgo_Tools.cdl
@@ -10,9 +10,11 @@ class Tools from GEOMAlgo
        ---Purpose: 
 
 uses    
-    Pnt from gp,
-    Edge from TopoDS, 
-    Face from TopoDS, 
+    Pnt from gp, 
+    Surface from Geom, 
+    ShapeEnum from TopAbs,  
+    Edge  from TopoDS, 
+    Face  from TopoDS, 
     Shape from TopoDS,
     ListOfShape from TopTools,  
     IndexedDataMapOfShapeListOfShape from TopTools,
@@ -22,6 +24,10 @@ uses
 --raises
 
 is   
+    IsCompositeShape(myclass;  
+           aS  :Shape from TopoDS) 
+       returns Boolean from Standard;    
+
     RefineSDShapes(myclass; 
            aMSD:out IndexedDataMapOfPassKeyListOfShape from GEOMAlgo; 
            aTol:Real from Standard; 
@@ -72,6 +78,17 @@ is
            aU  :Real from Standard; 
            aV  :Real from Standard; 
            aP3D:out Pnt from gp);     
+
+    RefinePCurveForEdgeOnFace  (myclass; 
+           aE  :  Edge from TopoDS; 
+            aF  :  Face from TopoDS; 
+           aU1 : Real from Standard; 
+           aU2 : Real from Standard); 
+
+    IsUPeriodic(myclass;  
+           aS:Surface from Geom) 
+       returns Boolean from Standard;   
+
 --fields
 
 end Tools;