blob: d382bffe26fc07fa9bde0f0841582954deba41bc (
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
104
105
106
107
108
|
-- File: FaceExplorer.cdl
-- Created: Thu Nov 19 14:30:44 1992
-- Author: Remi LEQUETTE
-- <rle@phylox>
---Copyright: Matra Datavision 1992
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627
class FaceExplorer from BRepClass
---Purpose: Provide an exploration of a BRep Face for the
-- classification.
uses
Orientation from TopAbs,
Pnt2d from gp,
Lin2d from gp,
Face from TopoDS,
Explorer from TopExp,
Edge from BRepClass
is
Create (F : Face from TopoDS) returns FaceExplorer from BRepClass;
Reject(me; P : Pnt2d from gp) returns Boolean
---Purpose: Should return True if the point is outside a
-- bounding volume of the face.
is static;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 Begin
-- Segment(me; P : Pnt2d from gp;
Segment(me: in out; P : Pnt2d from gp;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 End
L : out Lin2d from gp; Par : out Real)
---Purpose: Returns in <L>, <Par> a segment having at least
-- one intersection with the face boundary to
-- compute intersections.
returns Boolean from Standard -- skv OCC12627
is static;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 Begin
OtherSegment(me: in out; P : Pnt2d from gp;
L : out Lin2d from gp; Par : out Real)
---Purpose: Returns in <L>, <Par> a segment having at least
-- one intersection with the face boundary to
-- compute intersections. Each call gives another segment.
returns Boolean from Standard
is static;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 End
InitWires(me : in out)
---Purpose: Starts an exploration of the wires.
is static;
MoreWires(me) returns Boolean
---Purpose: Returns True if there is a current wire.
--
---C++: inline
is static;
NextWire(me : in out)
---Purpose: Sets the explorer to the next wire.
--
---C++: inline
is static;
RejectWire(me; L : Lin2d from gp; Par : Real) returns Boolean
---Purpose: Returns True if the wire bounding volume does not
-- intersect the segment.
is static;
InitEdges(me : in out)
---Purpose: Starts an exploration of the edges of the current
-- wire.
is static;
MoreEdges(me) returns Boolean
---Purpose: Returns True if there is a current edge.
--
---C++: inline
is static;
NextEdge(me : in out)
---Purpose: Sets the explorer to the next edge.
--
---C++: inline
is static;
RejectEdge(me; L : Lin2d from gp; Par : Real) returns Boolean
---Purpose: Returns True if the edge bounding volume does not
-- intersect the segment.
is static;
CurrentEdge(me; E : out Edge from BRepClass;
Or : out Orientation from TopAbs)
---Purpose: Current edge in current wire and its orientation.
is static;
fields
myFace : Face from TopoDS;
myWExplorer : Explorer from TopExp;
myEExplorer : Explorer from TopExp;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 Begin
myCurEdgeInd: Integer from Standard;
myCurEdgePar: Real from Standard;
-- Modified by skv - Wed Jul 12 10:05:54 2006 OCC12627 End
end FaceExplorer;
|