src/ShapeUpgrade/ShapeUpgrade_FixSmallCurves.cdl

   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
   6
   7
   8 class FixSmallCurves from ShapeUpgrade inherits Tool from ShapeUpgrade
   9
  10         ---Purpose:
  11
  12 uses
  13     SplitCurve3d from ShapeUpgrade,
  14     SplitCurve2d from ShapeUpgrade,
  15     --HArray1OfCurve from TColGeom,
  16     --HArray1OfCurve from TColGeom2d,
  17     --HSequenceOfReal from TColStd,
  18     Edge from TopoDS,
  19     Face from TopoDS,
  20     Curve from Geom,
  21     Curve from Geom2d,
  22     Status from ShapeExtend
  23 is
  24
  25     Create returns FixSmallCurves from ShapeUpgrade;
  26     ---Purpose :
  27     --Init(me : mutable; theCurve3d : Curve from Geom; theCurve2d : Curve from Geom2d);
  28     Init(me : mutable; theEdge : Edge from TopoDS; theFace : Face from TopoDS);
  29     ---Purpose :
  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;
  37     ---Purpose :
  38      SetSplitCurve3dTool(me: mutable; splitCurve3dTool: SplitCurve3d from ShapeUpgrade);
  39         ---Purpose: Sets the tool for splitting 3D curves.
  40
  41     SetSplitCurve2dTool(me: mutable; splitCurve2dTool: SplitCurve2d from ShapeUpgrade);
  42         ---Purpose: Sets the tool for splitting pcurves.
  43
  44
  45     GetSplitCurve3dTool(me) returns SplitCurve3d from ShapeUpgrade
  46     is virtual protected;
  47
  48     GetSplitCurve2dTool(me) returns SplitCurve2d from ShapeUpgrade
  49     is virtual protected;
  50
  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
  54         -- OK   :
  55         -- DONE1:
  56         -- DONE2:
  57         -- FAIL1:
  58
  59 fields
  60
  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;
  68
  69 end FixSmallCurves;