src/ShapeUpgrade/ShapeUpgrade_UnifySameDomain.cdl

   1 -- File:      ShapeUpgrade_UnifySameDomain.cdl
   2 -- Created:   09.06.12 13:48:36
   3 -- Author:    jgv@ROLEX
   4 ---Copyright: Open CASCADE 2012
   5
   6 class UnifySameDomain from ShapeUpgrade inherits TShared from MMgt
   7
   8         ---Purpose: Unifies same domain faces and edges of specified shape
   9
  10 uses
  11     Shape from TopoDS,
  12     ListOfShape from TopTools,
  13     ReShape from ShapeBuild
  14
  15 is
  16     Create returns UnifySameDomain from ShapeUpgrade;
  17     ---Purpose: empty constructor
  18
  19     Create(aShape: Shape from TopoDS;
  20            UnifyEdges: Boolean from Standard = Standard_True;
  21            UnifyFaces: Boolean from Standard = Standard_True;
  22            ConcatBSplines: Boolean from Standard = Standard_False)
  23     returns UnifySameDomain from ShapeUpgrade;
  24
  25     Initialize(me: mutable; aShape: Shape from TopoDS;
  26                UnifyEdges: Boolean from Standard = Standard_True;
  27                UnifyFaces: Boolean from Standard = Standard_True;
  28                ConcatBSplines: Boolean from Standard = Standard_False);
  29
  30     Build( me : mutable );
  31         ---Purpose: Builds the resulting shape
  32
  33     Shape(me) returns Shape from TopoDS;
  34         ---C++: return const &
  35         ---Purpose: Gives the resulting shape
  36
  37     Generated (me; aShape : Shape from TopoDS)
  38     returns Shape from TopoDS;
  39
  40     UnifyFaces(me: mutable);
  41     ---Purpose: this method makes if possible a common face from each
  42     --          group of faces lying on coincident surfaces
  43
  44     UnifyEdges(me: mutable);
  45     ---Purpose: this method makes if possible a common edge from each
  46     --          group of edges connecting common couple of faces
  47
  48     UnifyFacesAndEdges(me: mutable);
  49     ---Purpose: this method unifies same domain faces and edges
  50
  51 fields
  52
  53     myInitShape : Shape from TopoDS;
  54     myUnifyFaces : Boolean from Standard;
  55     myUnifyEdges : Boolean from Standard;
  56     myConcatBSplines : Boolean from Standard;
  57
  58     myShape : Shape from TopoDS;
  59
  60     myContext   : ReShape from ShapeBuild;
  61     --myOldNewMap : DataMapOfShapeShape  from TopTools;
  62
  63 end UnifySameDomain;