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
|
-- File: gce.cdl
-- Created: Thu Apr 30 11:36:51 1992
-- Author: Remi GILET
-- <reg@topsn3>
---Copyright: Matra Datavision 1992
package gce
uses gp,
StdFail
--- Level : Public
-- All methods of all classes will be public.
is
enumeration ErrorType is Done, ConfusedPoints, NegativeRadius, ColinearPoints,
IntersectionError, NullAxis, NullAngle, NullRadius,
InvertAxis,BadAngle,InvertRadius,NullFocusLength,
NullVector,BadEquation;
--- Purpose: Indicates the outcome of a construction, i.e.
-- whether it is successful or not, as explained below.
-- gce_Done: Construction was successful.
-- gce_ConfusedPoints: Two points are coincident.
-- gce_NegativeRadius: Radius value is negative.
-- gce_ColinearPoints: Three points are collinear.
-- gce_IntersectionError: Intersection cannot be computed.
-- gce_NullAxis: Axis is undefined.
-- gce_NullAngle: Angle value is invalid (usually null).
-- gce_NullRadius: Radius is null.
-- gce_InvertAxis: Axis value is invalid.
-- gce_BadAngle: Angle value is invalid.
-- gce_InvertRadius: Radius value is incorrect
-- (usually with respect to another radius).
-- gce_NullFocusLength: Focal distance is null.
-- gce_NullVector: Vector is null.
-- gce_BadEquation: Coefficients are
-- incorrect (applies to the equation of a geometric object).
private deferred class Root;
---Purpose: Root of classes with error report.
class MakeDir2d;
---Purpose: Makes a dir2d from gp.
class MakeLin2d;
---Purpose: Makes a Lin2d from gp.
class MakeCirc2d;
---Purpose: Makes a Circ2d from gp.
class MakeHypr2d;
---Purpose: Makes an hypr2d from gp.
class MakeElips2d;
---Purpose: Makes an Elips2d from gp.
class MakeParab2d;
---Purpose: Makes a parab2d from gp.
---------------------------------------------------------------------------
---Purpose : Constructions of Trsf2d from gp.
---------------------------------------------------------------------------
class MakeTranslation2d;
---Purpose: Returns a translation transformation.
class MakeMirror2d;
---Purpose: Returns a symmetry transformation.
class MakeRotation2d;
---Purpose: Returns a rotation transformation.
class MakeScale2d;
---Purpose: Returns a scaling transformation.
---------------------------------------------------------------------------
---Purpose: scalar product.
---------------------------------------------------------------------------
--class MakeDot;
---Purpose: Makes a scalar product between the two vectors P1P2 and P3P4.
---------------------------------------------------------------------------
---Purpose: vector product.
---------------------------------------------------------------------------
--class MakeCross2d;
---Purpose: Makes a Cross between the two vectors P1P2 and P1P3.
--class MakeDotCross;
---Purpose: Makes the triple scalar product P1P2 * (P3P4 ^ P5P6).
---------------------------------------------------------------------------
---Purpose : Constructions of 3d geometrical elements from gp.
---------------------------------------------------------------------------
class MakeDir;
---Purpose: Makes a dir from gp.
class MakeLin;
---Purpose: Makes a Line <L> from gp.
class MakeCirc;
---Purpose: Makes a Circle <C> from gp.
class MakeHypr;
---Purpose: Makes an hyperbola <H> from gp.
class MakeElips;
---Purpose: Makes an ellipse <E> from gp.
class MakeParab;
---Purpose: Makes a parabola <P> from gp.
---------------------------------------------------------------------------
---Purpose : Constructions of planes from gp.
---------------------------------------------------------------------------
class MakePln;
---Purpose: Makes a plane <Pl> from gp.
---------------------------------------------------------------------------
---Purpose: Construction of surfaces from gp.
---------------------------------------------------------------------------
class MakeCylinder;
---Purpose: Makes a cylinder <Cyl> from gp.
class MakeCone;
---Purpose: Makes a cone <Cone> from gp.
---------------------------------------------------------------------------
---Purpose : Constructions of Trsf from gp.
---------------------------------------------------------------------------
class MakeTranslation;
---Purpose: returns a translation transformation.
class MakeMirror;
---Purpose: returns a symmetry transformation.
class MakeRotation;
---Purpose: returns a rotation transformation.
class MakeScale;
---Purpose: returns a scaling transformation.
---------------------------------------------------------------------------
---Purpose: vector product.
---------------------------------------------------------------------------
--class MakeCross;
---Purpose: Makes a Cross product between the two vectors P1P2 and P1P3.
--class MakeDotCross;
---Purpose: Makes the triple scalar product P1P2 * (P3P4 ^ P5P6).
end gce;
|
