blob: a39f11bbb3282a93d1ba03cd4c8cad7ac5c1e504 (
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
|
-- File: GeomToStep_MakeSweptSurface.cdl
-- Created: Tue Jun 22 14:40:20 1993
-- Author: Martine LANGLOIS
-- <mla@mastox>
---Copyright: Matra Datavision 1993
class MakeSweptSurface from GeomToStep inherits Root from GeomToStep
---Purpose: This class implements the mapping between classes
-- SweptSurface from Geom and the class SweptSurface from
-- StepGeom which describes a SweptSurface from prostep.
-- As SweptSurface is an abstract SweptSurface this class
-- is an access to the sub-class required.
uses SweptSurface from Geom,
SweptSurface from StepGeom
raises NotDone from StdFail
is
Create ( S : SweptSurface from Geom ) returns MakeSweptSurface;
Value (me) returns SweptSurface from StepGeom
raises NotDone
is static;
---C++: return const&
fields
theSweptSurface : SweptSurface from StepGeom;
-- The solution from StepGeom
end MakeSweptSurface;
|