1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
|
-- File: AnaIntersection.cdl
-- Created: Wed Feb 20 17:20:26 1991
-- Author: Jacques GOUSSARD
-- <jag@topsn3>
---Copyright: Matra Datavision 1991
class AnaIntersection from IntAna2d
---Purpose: Implementation of the analytical intersection between:
-- - two Lin2d,
-- - two Circ2d,
-- - a Lin2d and a Circ2d,
-- - an element of gp (Lin2d, Circ2d, Elips2d, Parab2d, Hypr2d)
-- and another conic.
-- No tolerance is given for all the intersections: the tolerance
-- will be the "precision machine".
uses Vec2d from gp,
Lin2d from gp,
Circ2d from gp,
Elips2d from gp,
Parab2d from gp,
Hypr2d from gp,
Conic from IntAna2d,
IntPoint from IntAna2d
raises NotDone from StdFail,
OutOfRange from Standard
is
Create
---Purpose: Empty constructor. IsDone returns False.
returns AnaIntersection;
Create( L1,L2: Lin2d from gp)
---Purpose: Intersection between two lines.
returns AnaIntersection
raises NotDone from StdFail;
Create( C1,C2: Circ2d from gp)
---Purpose: Intersection between two circles.
returns AnaIntersection
raises NotDone from StdFail;
Create( L: Lin2d from gp; C: Circ2d from gp)
---Purpose: Intersection between a line and a circle.
returns AnaIntersection
raises NotDone from StdFail;
Create(L: Lin2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between a line and a conic.
returns AnaIntersection
raises NotDone from StdFail;
Create(C: Circ2d from gp; Co: Conic from IntAna2d)
---Purpose: Intersection between a circle and another conic.
returns AnaIntersection
raises NotDone from StdFail;
Create(E: Elips2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between an ellipse and another conic.
returns AnaIntersection
raises NotDone from StdFail;
Create(P: Parab2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between a parabola and another conic.
returns AnaIntersection
raises NotDone from StdFail;
Create(H: Hypr2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between an hyperbola and another conic.
returns AnaIntersection
raises NotDone from StdFail;
Perform(me: in out; L1,L2: Lin2d from gp)
---Purpose: Intersection between two lines.
raises NotDone from StdFail
is static;
Perform(me: in out; C1,C2: Circ2d from gp)
---Purpose: Intersection between two circles.
raises NotDone from StdFail
is static;
Perform(me: in out; L: Lin2d from gp; C: Circ2d from gp)
---Purpose: Intersection between a line and a circle.
raises NotDone from StdFail
is static;
Perform(me: in out; L: Lin2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between a line and a conic.
raises NotDone from StdFail
is static;
Perform(me: in out; C: Circ2d from gp; Co: Conic from IntAna2d)
---Purpose: Intersection between a circle and another conic.
raises NotDone from StdFail
is static;
Perform(me: in out; E: Elips2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between an ellipse and another conic.
raises NotDone from StdFail
is static;
Perform(me: in out; P: Parab2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between a parabola and another conic.
raises NotDone from StdFail
is static;
Perform(me: in out; H: Hypr2d from gp; C: Conic from IntAna2d)
---Purpose: Intersection between an hyperbola and another conic.
raises NotDone from StdFail
is static;
IsDone(me)
---Purpose: Returns TRUE if the computation was succesfull.
returns Boolean
---C++: inline
is static;
IsEmpty(me)
---Purpose: Returns TRUE when there is no intersection, i-e
-- - no intersection point
-- - the elements are not identical.
-- The element may be parallel in this case.
returns Boolean
raises NotDone from StdFail
---C++:inline
is static;
IdenticalElements(me)
---Purpose: For the intersection between an element of gp and a conic
-- known by an implicit equation, the result will be TRUE
-- if the element of gp verifies the implicit equation.
-- For the intersection between two Lin2d or two Circ2d, the
-- result will be TRUE if the elements are identical.
-- The function returns FALSE in all the other cases.
returns Boolean
raises NotDone from StdFail
---C++:inline
is static;
ParallelElements(me)
---Purpose: For the intersection between two Lin2d or two Circ2d,
-- the function returns TRUE if the elements are parallel.
-- The function returns FALSE in all the other cases.
returns Boolean
raises NotDone from StdFail
---C++:inline
is static;
NbPoints(me)
---Purpose: returns the number of IntPoint between the 2 curves.
returns Integer
raises NotDone from StdFail
---C++:inline
is static;
Point(me; N: Integer)
---Purpose: returns the intersection point of range N;
-- If (N<=0) or (N>NbPoints), an exception is raised.
returns IntPoint from IntAna2d
raises NotDone from StdFail,
OutOfRange from Standard
---C++:return const &
---C++:inline
is static;
fields
done : Boolean from Standard;
para : Boolean from Standard;
iden : Boolean from Standard;
empt : Boolean from Standard;
nbp : Integer from Standard;
lpnt : IntPoint from IntAna2d [4];
end AnaIntersection;
|
