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
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
-- File: BRepCheck_Wire.cdl
-- Created: Tue Dec 12 17:47:00 1995
-- Author: Jacques GOUSSARD
-- <jag@bravox>
---Copyright: Matra Datavision 1995
--
-- modified by eap Fri Dec 21 12:17:40 2001 (bug OCC35)
-- Closed2d() added
class Wire from BRepCheck inherits Result from BRepCheck
---Purpose:
uses Shape from TopoDS,
Face from TopoDS,
Wire from TopoDS,
Edge from TopoDS,
IndexedDataMapOfShapeListOfShape from TopTools,
Status from BRepCheck
is
Create(W: Wire from TopoDS)
returns mutable Wire from BRepCheck;
InContext(me: mutable; ContextShape: Shape from TopoDS);
---Purpose: if <ContextShape> is a face, consequently checks
-- SelfIntersect(), Closed(), Orientation() and
-- Closed2d until faulty is found
Minimum(me: mutable);
---Purpose: checks that the wire is not empty and "connex".
-- Called by constructor
Blind(me: mutable);
---Purpose: Does nothing
Closed(me: mutable; Update: Boolean from Standard = Standard_False)
---Purpose: Checks if the oriented edges of the wire give a
-- closed wire. If the wire is closed, returns
-- BRepCheck_NoError. Warning : if the first and
-- last edge are infinite, the wire will be
-- considered as a closed one. If <Update> is set to
-- Standard_True, registers the status in the list.
-- May return (and registers):
-- **BRepCheck_NotConnected, if wire is not
-- topologically closed
-- **BRepCheck_RedundantEdge, if an edge is in wire
-- more than 3 times or in case of 2 occurences if
-- not with FORWARD and REVERSED orientation.
-- **BRepCheck_NoError
returns Status from BRepCheck
is static;
Closed2d(me: mutable; F : Face from TopoDS;
Update: Boolean from Standard = Standard_False)
---Purpose: Checks if edges of the wire give a wire closed in
-- 2d space.
-- Returns BRepCheck_NoError, or BRepCheck_NotClosed
-- If <Update> is set to Standard_True, registers the
-- status in the list.
returns Status from BRepCheck
is static;
Orientation(me: mutable; F : Face from TopoDS;
Update: Boolean from Standard = Standard_False)
---Purpose: Checks if the oriented edges of the wire are
-- correctly oriented. An internal call is made to
-- the method Closed. If no face exists, call the
-- method with a null face (TopoDS_face()). If
-- <Update> is set to Standard_True, registers the
-- status in the list.
-- May return (and registers):
-- BRepCheck_InvalidDegeneratedFlag,
-- BRepCheck_BadOrientationOfSubshape,
-- BRepCheck_NotClosed,
-- BRepCheck_NoError
returns Status from BRepCheck
is static;
SelfIntersect(me: mutable; F : Face from TopoDS;
E1,E2 : out Edge from TopoDS;
Update: Boolean from Standard = Standard_False)
---Purpose: Checks if the wire intersect itself on the face
-- <F>. <E1> and <E2> are the first intersecting
-- edges found. <E2> may be a null edge when a
-- self-intersecting edge is found.If <Update> is set
-- to Standard_True, registers the status in the
-- list.
-- May return (and register):
-- BRepCheck_EmptyWire,
-- BRepCheck_SelfIntersectingWire,
-- BRepCheck_NoCurveOnSurface,
-- BRepCheck_NoError
returns Status from BRepCheck
is static;
GeometricControls(me)
---Purpose: report SelfIntersect() check would be (is) done
returns Boolean from Standard
is static;
GeometricControls(me: mutable; B: Boolean from Standard)
---Purpose: set SelfIntersect() to be checked
is static;
fields
-- myNbori : Integer from Standard; -- not used (eap)
myCdone : Boolean from Standard; -- Closed() or Oriented() is done
myCstat : Status from BRepCheck; -- result of Closed() or Oriented()
myMapVE : IndexedDataMapOfShapeListOfShape from TopTools;
myGctrl : Boolean from Standard; -- do check SelfIntersect() or not
end Wire;
|
