blob: 67fa18280e86347fe4fdc0d374e8b0dddd7d2311 (
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
|
-- File: PTopoDS_Shape1.cdl
-- ------------------
-- Author: DAUTRY Philippe
-- <fid@fox.paris1.matra-dtv.fr>
---Copyright: MATRA DATAVISION 1998
---Version: 0.0
---History: Version Date Purpose
-- 0.0 Feb 4 1998 Creation
class Shape1 from PTopoDS inherits Storable from Standard
---Purpose: The PTopoDS_Shape1 is the Persistent view of a TopoDS_Shape.
--
-- a Shape1 contains :
--
-- - a reference to a TShape1.
--
-- - a Location to put the TShape1 in a local coordinate
-- system.
--
-- - an Orientation.
--
-- It inherits from ExternShareable, so that it can be shared
-- by other objects located outside the container.
uses
Orientation from TopAbs,
TShape1 from PTopoDS,
Location from PTopLoc
is
Create returns Shape1 from PTopoDS;
---Level: Internal
Nullify(me : in out)
is static;
TShape(me) returns any TShape1 from PTopoDS
---Level: Internal
---C++: return const &
is static;
TShape(me : in out; T : TShape1 from PTopoDS)
---Level: Internal
is static;
Location(me) returns Location from PTopLoc
---Level: Internal
is static;
Location(me : in out; L : Location from PTopLoc)
---Level: Internal
is static;
Orientation(me) returns Orientation from TopAbs
---Level: Internal
is static;
Orientation(me: in out; O : Orientation from TopAbs)
---Level: Internal
is static;
fields
myTShape : TShape1 from PTopoDS;
myLocation : Location from PTopLoc;
myOrient : Orientation from TopAbs;
end Shape1;
|
