7fd59977 |
1 | -- File: BOPTools_PaveBlock.cdl |
2 | -- Created: Thu Feb 15 11:21:52 2001 |
3 | -- Author: Peter KURNEV |
4 | -- <pkv@irinox> |
5 | ---Copyright: Matra Datavision 2001 |
6 | |
7 | |
8 | class PaveBlock from BOPTools |
9 | |
10 | ---Purpose: |
11 | -- Class for storing info about a couple |
12 | --- of neighbouring paves on an edge |
13 | |
14 | uses |
15 | Pave from BOPTools, |
16 | PointBetween from BOPTools, |
17 | Range from IntTools, |
18 | ShrunkRange from IntTools, |
19 | Curve from IntTools |
20 | |
21 | |
22 | |
23 | is |
24 | Create |
25 | returns PaveBlock from BOPTools; |
26 | ---Purpose: |
27 | --- Empty constructor |
28 | --- |
29 | Create (anEdge: Integer from Standard; |
30 | aPave1: Pave from BOPTools; |
31 | aPave2: Pave from BOPTools); |
32 | ---Purpose: |
33 | --- Constructor |
34 | --- Index - DS-index of the edge |
35 | --- aPave1 - one pave |
36 | --- aPave2 - other pave |
37 | --- |
38 | SetEdge (me:out; |
39 | anEdge:Integer from Standard); |
40 | ---Purpose: |
41 | --- Modifier |
42 | --- Sets DS-index for the edge that is between aPave1 and aPave2 |
43 | --- |
44 | SetOriginalEdge (me:out; |
45 | anEdge:Integer from Standard); |
46 | ---Purpose: |
47 | --- Modifier |
48 | --- Sets DS-index for the edge from which this pave block comes from |
49 | --- |
50 | SetPave1(me:out; |
51 | aPave: Pave from BOPTools); |
52 | ---Purpose: |
53 | --- Modifier |
54 | --- |
55 | SetPave2(me:out; |
56 | aPave: Pave from BOPTools); |
57 | ---Purpose: |
58 | --- Modifier |
59 | --- |
60 | SetShrunkRange (me:out; |
61 | aSR:ShrunkRange from IntTools); |
62 | ---Purpose: |
63 | --- Modifier |
64 | --- Sets the Shrunk Range for the pave block |
65 | --- |
66 | SetPointBetween (me:out; |
67 | aP: PointBetween from BOPTools); |
68 | ---Purpose: |
69 | --- Modifier |
70 | --- Sets the point between the paves for the pave block |
71 | --- |
72 | |
73 | --- Case of Face/Face Pave Block |
74 | --- |
75 | SetCurve (me:out; |
76 | aC:Curve from IntTools); |
77 | ---Purpose: |
78 | --- Modifier |
79 | --- Sets the intersection curve to which the pave block belongs to |
80 | --- |
81 | SetFace1 (me:out; |
82 | nF1:Integer from Standard); |
83 | ---Purpose: |
84 | --- Modifier |
85 | --- Sets the DS-index of the first face |
86 | --- |
87 | SetFace2 (me:out; |
88 | nF2:Integer from Standard); |
89 | ---Purpose: |
90 | --- Modifier |
91 | --- Sets the DS-index of the second face |
92 | --- |
93 | Edge (me) |
94 | returns Integer from Standard; |
95 | ---Purpose: |
96 | --- Selector |
97 | --- |
98 | OriginalEdge(me) |
99 | returns Integer from Standard; |
100 | ---Purpose: |
101 | --- Selector |
102 | --- |
103 | Pave1(me) |
104 | returns Pave from BOPTools; |
105 | ---C++: return const & |
106 | ---Purpose: |
107 | --- Selector |
108 | --- |
109 | Pave2(me) |
110 | returns Pave from BOPTools; |
111 | ---C++: return const & |
112 | ---Purpose: |
113 | --- Selector |
114 | --- |
115 | IsValid(me) |
116 | returns Boolean from Standard; |
117 | ---Purpose: |
118 | --- Returns TRUE if both paves have vertex index !=0 |
119 | --- |
120 | IsEqual(me; |
121 | Other:PaveBlock from BOPTools) |
122 | returns Boolean from Standard; |
123 | ---Purpose: |
124 | --- Returns TRUE if <Other> is equal to me |
125 | --- |
126 | Parameters (me; |
127 | aT1:out Real from Standard; |
128 | aT2:out Real from Standard); |
129 | ---Purpose: |
130 | --- Returns values for paves' parameters |
131 | --- |
132 | Range (me) |
133 | returns Range from IntTools; |
134 | ---C++: return const & |
135 | ---Purpose: |
136 | --- Returns parmetric range for paves' parameters |
137 | --- |
138 | ShrunkRange(me) |
139 | returns ShrunkRange from IntTools; |
140 | ---C++: return const & |
141 | ---Purpose: |
142 | --- Selector |
143 | --- |
144 | PointBetween (me) |
145 | returns PointBetween from BOPTools; |
146 | ---C++: return const & |
147 | ---Purpose: |
148 | --- Selector |
149 | --- |
150 | Curve(me) |
151 | returns Curve from IntTools; |
152 | ---C++: return const & |
153 | ---Purpose: |
154 | --- Selector |
155 | --- |
156 | Face1(me) |
157 | returns Integer from Standard; |
158 | ---Purpose: |
159 | --- Selector |
160 | --- |
161 | Face2(me) |
162 | returns Integer from Standard; |
163 | ---Purpose: |
164 | --- Selector |
165 | --- |
166 | IsInBlock(me; |
167 | aPaveX: Pave from BOPTools) |
168 | returns Boolean from Standard; |
169 | |
170 | fields |
171 | |
172 | myEdge : Integer from Standard; |
173 | myOriginalEdge : Integer from Standard; |
174 | myPave1 : Pave from BOPTools; |
175 | myPave2 : Pave from BOPTools; |
176 | myRange : Range from IntTools; |
177 | myShrunkRange : ShrunkRange from IntTools; |
178 | myCurve : Curve from IntTools; |
179 | myFace1 : Integer from Standard; |
180 | myFace2 : Integer from Standard; |
181 | myPointBetween : PointBetween from BOPTools; |
182 | |
183 | end PaveBlock; |