blob: 2583573527b42218f73ecf55b651805ed9d043fb (
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
|
-- File: TopolTool.cdl
-- Created: Tue Nov 3 10:59:04 1992
-- Author: Jacques GOUSSARD
-- <jag@sdsun2>
---Copyright: Matra Datavision 1992
deferred generic class TopolTool from IntStart
( TheVertex as any;
TheArc as any
)
---Purpose: Template class for an iterator the restriction of
-- a surface.
inherits TShared from MMgt
raises DomainError from Standard
is
-- Arc iterator
Init(me: mutable)
;
More(me: mutable)
returns Boolean from Standard
;
Value(me: mutable)
returns any TheArc
;
Next(me: mutable)
;
-- Iterator on the vertex of an arc of restriction
Initialize(me: mutable; A:TheArc)
;
InitVertexIterator(me: mutable)
;
MoreVertex(me: mutable)
returns Boolean from Standard
;
Vertex(me: mutable)
returns any TheVertex
;
NextVertex(me: mutable)
;
Identical(me: mutable; V1,V2: TheVertex)
---Purpose: Returns True if the vertices V1 and V2 are identical.
-- This method does not take the orientation of the
-- vertices in account.
returns Boolean;
end TopolTool;
|
