blob: f4b55f58a169c31a5a3767ab8d2efb94dc49e3dc (
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
|
-- File: TNaming_Identifier.cdl
-- Created: Mon Mar 3 17:03:45 1997
-- Author: Yves FRICAUD
-- <yfr@claquox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1997
private class Identifier from TNaming
---Purpose:
uses
Label from TDF,
Shape from TopoDS,
NamedShape from TNaming,
ListOfNamedShape from TNaming,
ListOfShape from TopTools,
NameType from TNaming,
Localizer from TNaming
is
Create (Lab : Label from TDF;
S : Shape from TopoDS;
Context : Shape from TopoDS;
Geom : Boolean from Standard)
returns Identifier from TNaming;
Create (Lab : Label from TDF;
S : Shape from TopoDS;
Context : NamedShape from TNaming;
Geom : Boolean from Standard)
returns Identifier from TNaming;
---Category: Querying
IsDone (me) returns Boolean from Standard;
Type (me) returns NameType from TNaming;
IsFeature (me : in out) returns Boolean from Standard;
Feature (me) returns NamedShape from TNaming;
InitArgs (me : in out);
MoreArgs (me) returns Boolean from Standard;
NextArg (me : in out);
ArgIsFeature(me) returns Boolean from Standard;
FeatureArg (me : in out) returns NamedShape from TNaming;
ShapeArg (me : in out) returns Shape from TopoDS;
ShapeContext (me) returns Shape from TopoDS;
NamedShapeOfGeneration (me) returns NamedShape from TNaming;
---Category: Private methods.
AncestorIdentification(me : in out;
Localizer : in out Localizer from TNaming;
Context : Shape from TopoDS);
PrimitiveIdentification(me : in out;
Localizer : in out Localizer from TNaming;
NS : NamedShape from TNaming);
GeneratedIdentification(me : in out;
Localizer : in out Localizer from TNaming;
NS : NamedShape from TNaming);
Identification(me : in out;
Localizer : in out Localizer from TNaming;
NS : NamedShape from TNaming);
fields
myTDFAcces : Label from TDF;
myShape : Shape from TopoDS;
myOneOnly : Boolean from Standard;
myDone : Boolean from Standard;
myIsFeature : Boolean from Standard;
myType : NameType from TNaming;
myFeature : NamedShape from TNaming;
myPrimitiveArgs : ListOfNamedShape from TNaming;
myShapeArgs : ListOfShape from TopTools;
myNSContext : NamedShape from TNaming;
end Identifier;
|