blob: 9deae796dc32a6139080f03226ce8c34003f76c2 (
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
|
-- File: GeomToStep_MakeBoundedCurve.cdl
-- Created: Mon Jun 21 11:31:39 1993
-- Author: Martine LANGLOIS
-- <mla@mastox>
---Copyright: Matra Datavision 1993
class MakeBoundedCurve from GeomToStep inherits Root from GeomToStep
---Purpose: This class implements the mapping between classes
-- BoundedCurve from Geom, Geom2d and the class BoundedCurve from
-- StepGeom which describes a BoundedCurve from prostep.
-- As BoundedCurve is an abstract BoundedCurve this class
-- is an access to the sub-class required.
uses BoundedCurve from Geom,
BoundedCurve from Geom2d,
BoundedCurve from StepGeom
raises NotDone from StdFail
is
Create ( C : BoundedCurve from Geom ) returns MakeBoundedCurve;
Create ( C : BoundedCurve from Geom2d ) returns MakeBoundedCurve;
Value (me) returns BoundedCurve from StepGeom
raises NotDone
is static;
---C++: return const&
fields
theBoundedCurve : BoundedCurve from StepGeom;
-- The solution from StepGeom
end MakeBoundedCurve;
|