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
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
|
-- File: ShapeAnalysis_Edge.cdl
-- Created: Mon Jun 8 10:40:58 1998
-- Author: data exchange team
-- <det@nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class Edge from ShapeAnalysis
---Purpose: Tool for analyzing the edge.
-- Queries geometrical representations of the edge (3d curve, pcurve
-- on the given face or surface) and topological sub-shapes (bounding
-- vertices).
-- Provides methods for analyzing geometry and topology consistency
-- (3d and pcurve(s) consistency, their adjacency to the vertices).
uses
Pnt from gp,
Pnt2d from gp,
Vec2d from gp,
Curve from Geom2d,
Curve from Geom,
Surface from Geom,
Vertex from TopoDS,
Edge from TopoDS,
Face from TopoDS,
Location from TopLoc,
Status from ShapeExtend
is
Create returns Edge from ShapeAnalysis;
---Purpose: Empty constructor; initialises Status to OK
HasCurve3d (me; edge: Edge from TopoDS) returns Boolean;
---Purpose: Tells if the edge has a 3d curve
Curve3d (me; edge : Edge from TopoDS;
C3d : out Curve from Geom;
cf, cl: out Real;
orient: Boolean = Standard_True)
returns Boolean;
---Purpose: Returns the 3d curve and bounding parameteres for the edge
-- Returns False if no 3d curve.
-- If <orient> is True (default), takes orientation into account:
-- if the edge is reversed, cf and cl are toggled
IsClosed3d (me; edge: Edge from TopoDS) returns Boolean;
---Purpose: Gives True if the edge has a 3d curve, this curve is closed,
-- and the edge has the same vertex at start and end
HasPCurve (me; edge: Edge from TopoDS;
face: Face from TopoDS)
returns Boolean;
---Purpose: Tells if the Edge has a pcurve on the face.
HasPCurve (me; edge : Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc)
returns Boolean;
---Purpose: Tells if the edge has a pcurve on the surface (with location).
PCurve (me; edge : Edge from TopoDS;
face : Face from TopoDS;
C2d : out Curve from Geom2d;
cf, cl: out Real;
orient: Boolean = Standard_True)
returns Boolean;
PCurve (me; edge : Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc;
C2d : out Curve from Geom2d;
cf, cl : out Real;
orient : Boolean = Standard_True)
returns Boolean;
---Purpose: Returns the pcurve and bounding parameteres for the edge
-- lying on the surface.
-- Returns False if the edge has no pcurve on this surface.
-- If <orient> is True (default), takes orientation into account:
-- if the edge is reversed, cf and cl are toggled
BoundUV (me; edge : Edge from TopoDS;
face : Face from TopoDS;
first, last: out Pnt2d from gp)
returns Boolean;
BoundUV (me; edge : Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc;
first, last: out Pnt2d from gp)
returns Boolean;
---Purpose: Returns the ends of pcurve
-- Calls method PCurve with <orient> equal to True
IsSeam (me; edge: Edge from TopoDS;
face: Face from TopoDS)
returns Boolean;
IsSeam (me; edge : Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc)
returns Boolean;
---Purpose: Returns True if the edge has two pcurves on one surface
---Remark : Calls BRep_Tool::IsClosed()
FirstVertex (me; edge: Edge from TopoDS) returns Vertex from TopoDS;
---Purpose: Returns start vertex of the edge (taking edge orientation
-- into account).
---Remark: Vertex orientation is always FORWARD
LastVertex (me; edge: Edge from TopoDS) returns Vertex from TopoDS;
---Purpose: Returns end vertex of the edge (taking edge orientation
-- into account).
---Remark: Vertex orientation is always REVERSED
GetEndTangent2d (me; edge: Edge from TopoDS;
face: Face from TopoDS;
atEnd: Boolean;
pos : out Pnt2d from gp;
tang: out Vec2d from gp;
dparam: Real from Standard =0.0)
returns Boolean;
GetEndTangent2d (me; edge: Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc;
atEnd: Boolean;
pos : out Pnt2d from gp;
tang: out Vec2d from gp;
dparam: Real from Standard =0.0)
returns Boolean;
---Purpose: Returns tangent of the edge pcurve at its start (if atEnd is
-- False) or end (if True), regarding the orientation of edge.
-- If edge is REVERSED, tangent is reversed before return.
-- Returns True if pcurve is available and tangent is computed
-- and is not null, else False.
CheckVerticesWithCurve3d (me: in out; edge : Edge from TopoDS;
preci: Real = -1;
vtx : Integer = 0)
returns Boolean;
---Purpose: Checks the start and/or end vertex of the edge for matching
-- with 3d curve with the given precision.
-- <vtx> = 1 : start vertex only
-- <vtx> = 2 : end vertex only
-- <vtx> = 0 : both (default)
-- If preci < 0 the vertices are considered with their own
-- tolerances, else with the given <preci>.
---Returns: True if mismatching of the vertex to the curve was detected
-- else returns False (OK)
---Status : OK - ends of the 3d curve are comprised by checked vertices
-- FAIL1 - edge has no 3d curve
-- DONE1 - if first vertex of the edge does not comprise start of 3d curve
-- DONE2 - if last vertex of the edge does not comprise end of 3d curve
CheckVerticesWithPCurve (me: in out; edge : Edge from TopoDS;
face : Face from TopoDS;
preci: Real = -1;
vtx : Integer = 0)
returns Boolean;
CheckVerticesWithPCurve (me: in out; edge : Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc;
preci : Real = -1;
vtx : Integer = 0)
returns Boolean;
---Purpose: Checks the start and/or end vertex of the edge for matching
-- with pcurve with the given precision.
-- <vtx> = 1 : start vertex
-- <vtx> = 2 : end vertex
-- <vtx> = 0 : both
-- If preci < 0 the vertices are considered with their own
-- tolerances, else with the given <preci>.
---Returns: True if mismatching of the curves to the vertex was detected
-- else returns False (OK)
---Status : OK - ends of the 3d curve are comprised by checked vertices
-- FAIL1 - edge has no pcurve on a given (sur)face
-- DONE1 - if first vertex of the edge does not comprise start of pcurve
-- DONE2 - if last vertex of the edge does not comprise end of pcurve
CheckVertexTolerance(me: in out; edge : Edge from TopoDS;
face : Face from TopoDS;
toler1: out Real;
toler2: out Real)
returns Boolean;
CheckVertexTolerance(me: in out; edge : Edge from TopoDS;
toler1: out Real;
toler2: out Real)
returns Boolean;
---Purpose: Checks if it is necessary to increase tolerances of the edge
-- vertices to comprise the ends of 3d curve and pcurve on
-- the given face (first method) or all pcurves stored in an edge
-- (second one)
-- toler1 returns necessary tolerance for first vertex,
-- toler2 returns necessary tolerance for last vertex.
---Returns: True, if tolerances should be increased, otherwise False
---Status:
-- OK : the original tolerances are sufficient
-- DONE1: the tolerance of first vertex should be increased
-- DONE2: the tolerance of last vertex should be increased
-- FAIL1: edge has no vertice(s), no check is done
-- FAIL2: edge has no 3d curve, only pcurves are checked
-- FAIL3: edge has no pcurve on a given face, only 3d curve is checked
CheckCurve3dWithPCurve (me: in out; edge: Edge from TopoDS;
face: Face from TopoDS)
returns Boolean;
CheckCurve3dWithPCurve (me: in out; edge :Edge from TopoDS;
surface : Surface from Geom;
location: Location from TopLoc)
returns Boolean;
---Purpose: Checks mutual orientation of 3d curve and pcurve on the
-- analysis of curves bounding points
---Returns: Returns True if mismatching of orientation was detected,
-- else returns False (if OK or no curve)
---Status:
-- OK : orientations match each other (both go in the same
-- directions), or edge is closed
-- DONE1: orientations mismatch each other (curves go in
-- opposite directions)
-- FAIL1: no pcurve
-- FAIL2: no 3d curve
CheckPoints (me: in out; P1A, P1B: Pnt from gp;
P2A, P2B: Pnt from gp;
preci1, preci2: Real)
returns Boolean is private;
---Purpose: Check points by pairs (A and A, B and B) with precisions
-- (preci1 and preci2).
-- P1 are the points either from 3d curve or from vertices,
-- P2 are the points from pcurve
---Returns: False if status is OK, else True
--- Status:
-- OK : distances (P1A, P2A) and (P1B, P2B) are within
-- precisions
-- DONE1: distance (P1A, P2B) + (P1B, P2A) is less than
-- distance (P1A, P2A) + (P1B, P2B),
-- the precisions are not taken into account in this case
Status (me; status: Status from ShapeExtend) returns Boolean;
---Purpose: Returns the status (in the form of True/False) of last Check
---Returns: True if status contains bit corresponding to enumerated argument
CheckSameParameter (me: in out; edge : Edge from TopoDS;
maxdev: out Real;
NbControl: Integer = 23)
returns Boolean;
---Purpose: Checks the edge to be SameParameter.
-- Calculates the maximal deviation between 3d curve and each
-- pcurve of the edge on <NbControl> equidistant points (the same
-- algorithm as in BRepCheck; default value is 23 as in BRepCheck).
-- This deviation is returned in <maxdev> parameter.
-- If deviation is greater than tolerance of the edge (i.e.
-- incorrect flag) returns False, else returns True.
---Returns: True if edge has either SameParameter False and/or its real
-- deviation of curves is more than tolerance
---Status : OK - Edge is SameParameter with the associated tolerance
-- DONE1 - if deviation of the pcurves from 3d curve is greater
-- than tolerance of edge
-- DONE2 - if SameParameter flag in edge is False
-- FAIL1 - edge does not have 3d curve
-- FAIL2 - if some computational problems were encountered (when
-- projecting points on curves)
CheckOverlapping(me :in out; theEdge1, theEdge2 : Edge from TopoDS;
theTolOverlap:in out Real; theDomainDist : Real =0.0) returns Boolean;
---Purpose: Checks the first edge is overlapped with second edge.
-- If distance between two edges is less then theTolOverlap
-- edges is overlapped.
-- theDomainDis - length of part of edges on wich edges is overlapped.
---Status : DONE3 - edges is overlapped on whole length
-- : DONE4 - edges is overlapped on the length equal to theDomainDist
fields
myStatus: Integer is protected;
end Edge;
|
