blob: dd78d8eb1e1c2f79447b0f527c9c4d536688cd4f (
plain)
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
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
|
-- File: MgtGeom2d.cdl
-- Created: Wed Apr 7 10:49:28 1993
-- Author: Philippe DAUTRY
-- <fid@mastox>
-- Update: Frederic MAUPAS
-- <fma@pronox>
-- Copyright: Matra Datavision 1993
package MgtGeom2d
---Purpose: This package provides methods to translate
-- transient objects from Geom2d to persistent
-- objects from PGeom2d and vice-versa. No track from
-- previous translation is kept.
--
-- Data is not shared:
-- - between transient and persistent objects,
-- or
-- - between two successive translations of the same object.
uses
Geom2d, PGeom2d
is
-- AxisPlacement
Translate(PObj: AxisPlacement from PGeom2d)
returns AxisPlacement from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: AxisPlacement from Geom2d)
returns AxisPlacement from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- BSplineCurve
Translate(PObj: BSplineCurve from PGeom2d)
returns BSplineCurve from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: BSplineCurve from Geom2d)
returns BSplineCurve from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- BezierCurve
Translate(PObj: BezierCurve from PGeom2d)
returns BezierCurve from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: BezierCurve from Geom2d)
returns BezierCurve from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- CartesianPoint
Translate(PObj: CartesianPoint from PGeom2d)
returns CartesianPoint from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: CartesianPoint from Geom2d)
returns CartesianPoint from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Circle
Translate(PObj: Circle from PGeom2d)
returns Circle from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Circle from Geom2d)
returns Circle from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Curve
Translate(PObj: Curve from PGeom2d)
returns Curve from Geom2d
raises NullObject from Standard;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
-- Raises Null Object if PObj has no mapping
---Level: Advanced
Translate(TObj: Curve from Geom2d)
returns Curve from PGeom2d
raises NullObject from Standard;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
-- Raises NullObject if TObj has no mapping
---Level: Advanced
-- Direction
Translate(PObj: Direction from PGeom2d)
returns Direction from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Direction from Geom2d)
returns Direction from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Ellipse
Translate(PObj: Ellipse from PGeom2d)
returns Ellipse from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Ellipse from Geom2d)
returns Ellipse from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Hyperbola
Translate(PObj: Hyperbola from PGeom2d)
returns Hyperbola from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Hyperbola from Geom2d)
returns Hyperbola from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Line
Translate(PObj: Line from PGeom2d)
returns Line from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Line from Geom2d)
returns Line from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- OffsetCurve
Translate(PObj: OffsetCurve from PGeom2d)
returns OffsetCurve from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: OffsetCurve from Geom2d)
returns OffsetCurve from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Parabola
Translate(PObj: Parabola from PGeom2d)
returns Parabola from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Parabola from Geom2d)
returns Parabola from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Point
Translate(PObj: Point from PGeom2d)
returns Point from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Point from Geom2d)
returns Point from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- Transformation
Translate(PObj: Transformation from PGeom2d)
returns Transformation from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: Transformation from Geom2d)
returns Transformation from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- TrimmedCurve
Translate(PObj: TrimmedCurve from PGeom2d)
returns TrimmedCurve from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: TrimmedCurve from Geom2d)
returns TrimmedCurve from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
-- VectorWithMagnitude
Translate(PObj: VectorWithMagnitude from PGeom2d)
returns VectorWithMagnitude from Geom2d;
---Purpose: Translate <PObj> to its Transient equivalent from Geom2d.
---Level: Advanced
Translate(TObj: VectorWithMagnitude from Geom2d)
returns VectorWithMagnitude from PGeom2d;
---Purpose: Translate <TObj> to its Persistent equivalent from PGeom2d.
---Level: Advanced
end MgtGeom2d;
|
