blob: 7d507e342f5fea15a7379744446d7f0b76887795 (
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
|
-- File: StepElement_ElementAspect.cdl
-- Created: Tue Dec 10 18:12:58 2002
-- Author: data exchange team
-- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V2.0
-- Copyright: Open CASCADE 2002
class ElementAspect from StepElement
inherits SelectType from StepData
---Purpose: Representation of STEP SELECT type ElementAspect
uses
SelectMember from StepData,
ElementVolume from StepElement,
CurveEdge from StepElement
is
Create returns ElementAspect from StepElement;
---Purpose: Empty constructor
CaseNum (me; ent: Transient) returns Integer;
---Purpose: Recognizes a kind of ElementAspect select type
-- return 0
CaseMem (me; ent: SelectMember from StepData) returns Integer is redefined;
---Purpose: Recognizes a items of select member ElementAspectMember
-- 1 -> ElementVolume
-- 2 -> Volume3dFace
-- 3 -> Volume2dFace
-- 4 -> Volume3dEdge
-- 5 -> Volume2dEdge
-- 6 -> Surface3dFace
-- 7 -> Surface2dFace
-- 8 -> Surface3dEdge
-- 9 -> Surface2dEdge
-- 10 -> CurveEdge
-- 0 else
NewMember(me) returns SelectMember from StepData is redefined;
---Purpose: Returns a new select member the type ElementAspectMember
SetElementVolume(me: in out; aVal :ElementVolume from StepElement);
---Purpose: Set Value for ElementVolume
ElementVolume (me) returns ElementVolume from StepElement;
---Purpose: Returns Value as ElementVolume (or Null if another type)
SetVolume3dFace(me: in out; aVal :Integer);
---Purpose: Set Value for Volume3dFace
Volume3dFace (me) returns Integer;
---Purpose: Returns Value as Volume3dFace (or Null if another type)
SetVolume2dFace(me: in out; aVal :Integer);
---Purpose: Set Value for Volume2dFace
Volume2dFace (me) returns Integer;
---Purpose: Returns Value as Volume2dFace (or Null if another type)
SetVolume3dEdge(me: in out; aVal :Integer);
---Purpose: Set Value for Volume3dEdge
Volume3dEdge (me) returns Integer;
---Purpose: Returns Value as Volume3dEdge (or Null if another type)
SetVolume2dEdge(me: in out; aVal :Integer);
---Purpose: Set Value for Volume2dEdge
Volume2dEdge (me) returns Integer;
---Purpose: Returns Value as Volume2dEdge (or Null if another type)
SetSurface3dFace(me: in out; aVal :Integer);
---Purpose: Set Value for Surface3dFace
Surface3dFace (me) returns Integer;
---Purpose: Returns Value as Surface3dFace (or Null if another type)
SetSurface2dFace(me: in out; aVal :Integer);
---Purpose: Set Value for Surface2dFace
Surface2dFace (me) returns Integer;
---Purpose: Returns Value as Surface2dFace (or Null if another type)
SetSurface3dEdge(me: in out; aVal :Integer);
---Purpose: Set Value for Surface3dEdge
Surface3dEdge (me) returns Integer;
---Purpose: Returns Value as Surface3dEdge (or Null if another type)
SetSurface2dEdge(me: in out; aVal :Integer);
---Purpose: Set Value for Surface2dEdge
Surface2dEdge (me) returns Integer;
---Purpose: Returns Value as Surface2dEdge (or Null if another type)
SetCurveEdge(me: in out; aVal :CurveEdge from StepElement);
---Purpose: Set Value for CurveEdge
CurveEdge (me) returns CurveEdge from StepElement;
---Purpose: Returns Value as CurveEdge (or Null if another type)
end ElementAspect;
|
