1 -- File: ShapeUpgrade_FixSmallCurves.cdl
2 -- Created: Wed Jun 7 15:36:50 2000
3 -- Author: Galina KULIKOVA
4 -- <gka@zamox.nnov.matra-dtv.fr>
5 ---Copyright: Matra Datavision 2000
8 class FixSmallCurves from ShapeUpgrade inherits Tool from ShapeUpgrade
13 SplitCurve3d from ShapeUpgrade,
14 SplitCurve2d from ShapeUpgrade,
15 --HArray1OfCurve from TColGeom,
16 --HArray1OfCurve from TColGeom2d,
17 --HSequenceOfReal from TColStd,
22 Status from ShapeExtend
25 Create returns FixSmallCurves from ShapeUpgrade;
27 --Init(me : mutable; theCurve3d : Curve from Geom; theCurve2d : Curve from Geom2d);
28 Init(me : mutable; theEdge : Edge from TopoDS; theFace : Face from TopoDS);
30 Approx(me : mutable; Curve3d : out Curve from Geom;
31 Curve2d : out Curve from Geom2d;
32 Curve2dR : out Curve from Geom2d;
33 First, Last : in out Real) returns Boolean is virtual;
34 -- theKnots3d : in out HSequenceOfReal from TColStd;
35 -- theSegments2d :in out HArray1OfCurve from TColGeom2d;
36 -- theKnots2d : in out HSequenceOfReal from TColStd) returns Boolean is virtual;
38 SetSplitCurve3dTool(me: mutable; splitCurve3dTool: SplitCurve3d from ShapeUpgrade);
39 ---Purpose: Sets the tool for splitting 3D curves.
41 SetSplitCurve2dTool(me: mutable; splitCurve2dTool: SplitCurve2d from ShapeUpgrade);
42 ---Purpose: Sets the tool for splitting pcurves.
45 GetSplitCurve3dTool(me) returns SplitCurve3d from ShapeUpgrade
48 GetSplitCurve2dTool(me) returns SplitCurve2d from ShapeUpgrade
51 ---Purpose: Returns the tool for splitting pcurves.
52 Status (me; status: Status from ShapeExtend) returns Boolean;
53 ---Purpose: Queries the status of last call to Perform
61 myStatus : Integer is protected;
62 mySplitCurve3dTool: SplitCurve3d from ShapeUpgrade is protected;
63 mySplitCurve2dTool: SplitCurve2d from ShapeUpgrade is protected;
64 myEdge : Edge from TopoDS is protected;
65 myFace : Face from TopoDS is protected;
66 --myCurve3d : Curve from Geom;
67 --myCurve2d : Curve from Geom;