1 -- File: HLRBRep_InternalAlgo.cdl
2 -- Created: Thu Apr 17 20:45:25 1997
3 -- Author: Christophe MARION
4 -- <cma@partox.paris1.matra-dtv.fr>
5 ---Copyright: Matra Datavision 1997
7 class InternalAlgo from HLRBRep inherits TShared from MMgt
10 Address from Standard,
11 Boolean from Standard,
12 Integer from Standard,
13 Projector from HLRAlgo,
15 ShapeBounds from HLRBRep,
16 SeqOfShapeBounds from HLRBRep,
17 OutLiner from HLRTopoBRep,
18 MapOfShapeTool from BRepTopAdaptor,
22 OutOfRange from Standard
25 Create returns mutable InternalAlgo from HLRBRep;
27 Create(A : InternalAlgo from HLRBRep)
28 returns mutable InternalAlgo from HLRBRep;
30 Projector(me: mutable; P : Projector from HLRAlgo)
31 ---Purpose: set the projector.
34 Projector(me: mutable)
35 returns Projector from HLRAlgo
36 ---Purpose: set the projector.
41 ---Purpose: update the DataStructure.
44 Load(me : mutable; S : OutLiner from HLRTopoBRep;
45 SData : TShared from MMgt;
46 nbIso : Integer from Standard = 0)
47 ---Purpose: add the shape <S>.
50 Load(me : mutable; S : OutLiner from HLRTopoBRep;
51 nbIso : Integer from Standard = 0)
52 ---Purpose: add the shape <S>.
55 Index(me; S : OutLiner from HLRTopoBRep) returns Integer from Standard
56 ---Purpose: return the index of the Shape <S> and return 0 if
57 -- the Shape <S> is not found.
60 Remove(me : mutable; I : Integer from Standard)
61 raises OutOfRange from Standard
62 ---Purpose: remove the Shape of Index <I>.
65 ShapeData(me : mutable; I : Integer from Standard;
66 SData : TShared from MMgt)
67 raises OutOfRange from Standard
68 ---Purpose: Change the Shape Data of the Shape of index <I>.
71 SeqOfShapeBounds(me : mutable) returns SeqOfShapeBounds from HLRBRep
75 NbShapes(me) returns Integer from Standard
78 ShapeBounds(me : mutable; I : Integer from Standard)
79 returns ShapeBounds from HLRBRep
80 raises OutOfRange from Standard
84 InitEdgeStatus(me : mutable)
85 ---Purpose: init the status of the selected edges depending of
86 -- the back faces of a closed shell.
90 ---Purpose: select all the DataStructure.
93 Select(me : mutable; I : Integer from Standard)
94 raises OutOfRange from Standard
95 ---Purpose: select only the Shape of index <I>.
98 SelectEdge(me : mutable; I : Integer from Standard)
99 raises OutOfRange from Standard
100 ---Purpose: select only the edges of the Shape <S>.
103 SelectFace(me : mutable; I : Integer from Standard)
104 raises OutOfRange from Standard
105 ---Purpose: select only the faces of the Shape <S>.
108 ShowAll(me : mutable)
109 ---Purpose: set to visible all the edges.
112 ShowAll(me : mutable; I : Integer from Standard)
113 raises OutOfRange from Standard
114 ---Purpose: set to visible all the edges of the Shape <S>.
117 HideAll(me : mutable)
118 ---Purpose: set to hide all the edges.
121 HideAll(me : mutable; I : Integer from Standard)
122 raises OutOfRange from Standard
123 ---Purpose: set to hide all the edges of the Shape <S>.
126 PartialHide(me : mutable)
127 ---Purpose: own hiding of all the shapes of the DataStructure
128 -- without hiding by each other.
132 ---Purpose: hide all the DataStructure.
135 Hide(me : mutable; I : Integer from Standard)
136 raises OutOfRange from Standard
137 ---Purpose: hide the Shape <S> by itself.
140 Hide(me : mutable; I,J : Integer from Standard)
141 raises OutOfRange from Standard
142 ---Purpose: hide the Shape <S1> by the shape <S2>.
145 HideSelected(me : mutable; I : Integer from Standard;
146 SideFace : Boolean from Standard)
147 ---Purpose: first if <SideFace> own hiding of the side faces.
148 -- After hiding of the selected parts of the
152 Debug(me : mutable; deb : Boolean from Standard)
155 Debug(me) returns Boolean from Standard
158 DataStructure(me) returns any Data from HLRBRep
162 myDS : Data from HLRBRep;
163 myProj : Projector from HLRAlgo;
164 myShapes : SeqOfShapeBounds from HLRBRep;
165 myMapOfShapeTool : MapOfShapeTool from BRepTopAdaptor;
167 myDebug : Boolean from Standard;