src/QANewModTopOpe/QANewModTopOpe_ReShaper.cdl

   1 -- File:        QANewModTopOpe_ReShaper.cdl
   2 -- Created:     Thu Feb  7 12:05:56 2002
   3 -- Author:      Igor FEOKTISTOV <ifv@nnov.matra-dtv.fr>
   4 -- Copyright:   SAMTECH S.A. 2002
   5
   6
   7 -- sccsid[] = "@(#) QANewModTopOpe_ReShaper.cdl 4.0-1, 04/28/03@(#)";
   8
   9 -- Lastly modified by :
  10 -- +---------------------------------------------------------------------------+
  11 -- !       ifv ! Creation                                ! 7-02-2002! 3.0-00-1!
  12 -- +---------------------------------------------------------------------------+
  13
  14 class ReShaper from QANewModTopOpe inherits TShared from  MMgt
  15         ---Purpose: to remove  "floating" objects from compound.
  16         -- "floating" objects are wires, edges, vertices that do not belong
  17         -- solids, shells or faces.
  18
  19 uses
  20     Shape from TopoDS,
  21     HSequenceOfShape  from  TopTools,
  22     MapOfShape  from  TopTools
  23 is
  24
  25     Create(TheInitialShape  :  Shape from TopoDS)
  26
  27     returns  mutable  ReShaper;
  28
  29     Create(TheInitialShape  :  Shape from TopoDS;
  30            TheMap  :  MapOfShape  from  TopTools)
  31
  32     returns  mutable  ReShaper;
  33
  34     Create(TheInitialShape  :  Shape from TopoDS;
  35            TheShapeToBeRemoved  : HSequenceOfShape  from  TopTools)
  36
  37     returns  mutable  ReShaper;
  38
  39     Remove(me  :  mutable;  TheS  :  Shape from TopoDS);
  40
  41     Perform(me  :  mutable);
  42
  43     Clear(me  :  mutable);
  44     ---Purpose:  to  clear  all  added  for  removing  shapes  from  inner  map.
  45
  46     GetResult(me)  returns  Shape  from  TopoDS;
  47         ---C++: return const &
  48         ---C++: alias "Standard_EXPORT operator TopoDS_Shape() const;"
  49
  50 fields
  51
  52     myInitShape  :  Shape  from  TopoDS;
  53     myResult     :  Shape  from  TopoDS;
  54     myMap        :  MapOfShape  from  TopTools;
  55
  56 end;
  57
  58 -- @@SDM: begin
  59
  60 -- Copyright SAMTECH ..........................................Version    3.0-00
  61 -- Lastly modified by : ifv                                    Date :  7-02-2002
  62
  63 -- File history synopsis (creation,modification,correction)
  64 -- +---------------------------------------------------------------------------+
  65 -- ! Developer !              Comments                   !   Date   ! Version  !
  66 -- +-----------!-----------------------------------------!----------!----------+
  67 -- !       ifv ! Creation                                ! 7-02-2002! 3.0-00-1!
  68 -- +---------------------------------------------------------------------------+
  69
  70 -- @@SDM: end