0024624: Lost word in license statement in source files
[occt.git] / src / BRepLib / BRepLib.cxx
CommitLineData
b311480e 1// Created on: 1993-12-15
2// Created by: Remi LEQUETTE
3// Copyright (c) 1993-1999 Matra Datavision
973c2be1 4// Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5//
973c2be1 6// This file is part of Open CASCADE Technology software library.
b311480e 7//
d5f74e42 8// This library is free software; you can redistribute it and/or modify it under
9// the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 10// by the Free Software Foundation, with special exception defined in the file
11// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12// distribution for complete text of the license and disclaimer of any warranty.
b311480e 13//
973c2be1 14// Alternatively, this file may be used under the terms of Open CASCADE
15// commercial license or contractual agreement.
b311480e 16
17//pmn 26/09/97 Add parameters of approximation in BuildCurve3d
7fd59977 18// Modified by skv - Thu Jun 3 12:39:19 2004 OCC5898
19
20#include <BRepLib.ixx>
21#include <BRepAdaptor_Surface.hxx>
22#include <BRepAdaptor_HSurface.hxx>
23#include <BRepAdaptor_HCurve2d.hxx>
24#include <BRep_Tool.hxx>
25#include <BRep_Builder.hxx>
26#include <Geom_Surface.hxx>
27#include <Geom_RectangularTrimmedSurface.hxx>
28#include <Geom_Plane.hxx>
29#include <Geom_Curve.hxx>
30#include <Geom_BSplineCurve.hxx>
31#include <Geom_TrimmedCurve.hxx>
32#include <Geom2d_Curve.hxx>
33#include <Geom2d_TrimmedCurve.hxx>
34#include <Geom2d_BSplineCurve.hxx>
35#include <GeomLib.hxx>
36#include <TopExp_Explorer.hxx>
37#include <TopoDS.hxx>
38#include <TopoDS_Edge.hxx>
39#include <TopoDS_Face.hxx>
40#include <TopoDS_Vertex.hxx>
41#include <TopTools_MapOfShape.hxx>
42#include <TopTools_IndexedDataMapOfShapeListOfShape.hxx>
43#include <TopTools_ListIteratorOfListOfShape.hxx>
44#include <TopExp.hxx>
45#include <gp.hxx>
46#include <gp_Ax2.hxx>
47#include <gp_Pln.hxx>
48#include <Standard_Real.hxx>
49#include <Precision.hxx>
50#include <BRep_GCurve.hxx>
51#include <BRep_TEdge.hxx>
52#include <BRep_TFace.hxx>
53#include <AppParCurves_MultiCurve.hxx>
54#include <AppParCurves_MultiBSpCurve.hxx>
55#include <BRep_ListOfCurveRepresentation.hxx>
56#include <BRep_CurveRepresentation.hxx>
57#include <BRep_ListIteratorOfListOfCurveRepresentation.hxx>
58#include <BRep_TVertex.hxx>
41194117 59#include <AdvApprox_ApproxAFunction.hxx>
7fd59977 60#include <Approx_SameParameter.hxx>
61#include <TColgp_Array1OfPnt.hxx>
62#include <TColgp_Array1OfPnt2d.hxx>
63#include <TColStd_Array1OfReal.hxx>
7fd59977 64#include <TColStd_MapOfTransient.hxx>
65#include <GeomAdaptor_Curve.hxx>
66#include <GeomAdaptor_HCurve.hxx>
67#include <GeomAdaptor_Surface.hxx>
68#include <GeomAdaptor_HSurface.hxx>
69#include <Geom2dAdaptor_Curve.hxx>
70#include <Geom2dAdaptor_HCurve.hxx>
71#include <Geom2dAdaptor.hxx>
72#include <Geom2dConvert.hxx>
73#include <GCPnts_QuasiUniformDeflection.hxx>
74#include <BSplCLib.hxx>
75#include <ElSLib.hxx>
76#include <Adaptor3d_CurveOnSurface.hxx>
77#include <Extrema_LocateExtPC.hxx>
78#include <ProjLib_ProjectedCurve.hxx>
79#include <BRepClass3d_SolidClassifier.hxx>
80#include <Bnd_Box.hxx>
81#include <BRepBndLib.hxx>
82#include <Approx_CurvilinearParameter.hxx>
83#include <Geom_BSplineSurface.hxx>
84
7fd59977 85
41194117 86// TODO - not thread-safe static variables
7fd59977 87static Standard_Real thePrecision = Precision::Confusion();
88static Handle(Geom_Plane) thePlane;
89
90//=======================================================================
91//function : Precision
92//purpose :
93//=======================================================================
94
95void BRepLib::Precision(const Standard_Real P)
96{
97 thePrecision = P;
98}
99
100//=======================================================================
101//function : Precision
102//purpose :
103//=======================================================================
104
105Standard_Real BRepLib::Precision()
106{
107 return thePrecision;
108}
109
110//=======================================================================
111//function : Plane
112//purpose :
113//=======================================================================
114
115void BRepLib::Plane(const Handle(Geom_Plane)& P)
116{
117 thePlane = P;
118}
119
120
121//=======================================================================
122//function : Plane
123//purpose :
124//=======================================================================
125
126const Handle(Geom_Plane)& BRepLib::Plane()
127{
128 if (thePlane.IsNull()) thePlane = new Geom_Plane(gp::XOY());
129 return thePlane;
130}
131//=======================================================================
132//function : CheckSameRange
133//purpose :
134//=======================================================================
135
136Standard_Boolean BRepLib::CheckSameRange(const TopoDS_Edge& AnEdge,
a86d3ec0 137 const Standard_Real Tolerance)
7fd59977 138{
139 Standard_Boolean IsSameRange = Standard_True,
a86d3ec0 140 first_time_in = Standard_True ;
7fd59977 141
142 BRep_ListIteratorOfListOfCurveRepresentation an_Iterator
143 ((*((Handle(BRep_TEdge)*)&AnEdge.TShape()))->ChangeCurves());
a86d3ec0 144
7fd59977 145 Standard_Real first, last;
7fd59977 146 Standard_Real current_first =0., current_last =0. ;
7fd59977 147 Handle(BRep_GCurve) geometric_representation_ptr ;
148
149 while (IsSameRange && an_Iterator.More()) {
150 geometric_representation_ptr =
151 Handle(BRep_GCurve)::DownCast(an_Iterator.Value());
152 if (!geometric_representation_ptr.IsNull()) {
a86d3ec0 153
154 first = geometric_representation_ptr->First();
155 last = geometric_representation_ptr->Last();
156 if (first_time_in ) {
157 current_first = first ;
158 current_last = last ;
159 first_time_in = Standard_False ;
7fd59977 160 }
a86d3ec0 161 else {
162 IsSameRange = (Abs(current_first - first) <= Tolerance)
163 && (Abs(current_last -last) <= Tolerance ) ;
164 }
165 }
7fd59977 166 an_Iterator.Next() ;
167 }
168 return IsSameRange ;
169}
a86d3ec0 170
7fd59977 171//=======================================================================
172//function : SameRange
173//purpose :
174//=======================================================================
175
176void BRepLib::SameRange(const TopoDS_Edge& AnEdge,
a86d3ec0 177 const Standard_Real Tolerance)
7fd59977 178{
179 BRep_ListIteratorOfListOfCurveRepresentation an_Iterator
180 ((*((Handle(BRep_TEdge)*)&AnEdge.TShape()))->ChangeCurves());
a86d3ec0 181
7fd59977 182 Handle(Geom2d_Curve) Curve2dPtr, Curve2dPtr2, NewCurve2dPtr, NewCurve2dPtr2;
183 TopLoc_Location LocalLoc ;
184
185 Standard_Boolean first_time_in = Standard_True,
a86d3ec0 186 has_curve,
187 has_closed_curve ;
7fd59977 188 Handle(BRep_GCurve) geometric_representation_ptr ;
189 Standard_Real first,
a86d3ec0 190 current_first,
191 last,
192 current_last ;
7fd59977 193
194 const Handle(Geom_Curve) C = BRep_Tool::Curve(AnEdge,
a86d3ec0 195 LocalLoc,
196 current_first,
197 current_last);
7fd59977 198 if (!C.IsNull()) {
199 first_time_in = Standard_False ;
200 }
a86d3ec0 201
7fd59977 202 while (an_Iterator.More()) {
203 geometric_representation_ptr =
204 Handle(BRep_GCurve)::DownCast(an_Iterator.Value());
205 if (! geometric_representation_ptr.IsNull()) {
206 has_closed_curve =
a86d3ec0 207 has_curve = Standard_False ;
7fd59977 208 first = geometric_representation_ptr->First();
209 last = geometric_representation_ptr->Last();
210 if (geometric_representation_ptr->IsCurveOnSurface()) {
a86d3ec0 211 Curve2dPtr = geometric_representation_ptr->PCurve() ;
212 has_curve = Standard_True ;
7fd59977 213 }
214 if (geometric_representation_ptr->IsCurveOnClosedSurface()) {
a86d3ec0 215 Curve2dPtr2 = geometric_representation_ptr->PCurve2() ;
216 has_closed_curve = Standard_True ;
7fd59977 217 }
218 if (has_curve || has_closed_curve) {
a86d3ec0 219 if (first_time_in) {
220 current_first = first ;
221 current_last = last ;
222 first_time_in = Standard_False ;
7fd59977 223 }
a86d3ec0 224
7fd59977 225 if (Abs(first - current_first) > Precision::Confusion() ||
a86d3ec0 226 Abs(last - current_last) > Precision::Confusion() )
227 {
228 if (has_curve)
229 {
230 GeomLib::SameRange(Tolerance,
231 Curve2dPtr,
232 geometric_representation_ptr->First(),
233 geometric_representation_ptr->Last(),
234 current_first,
235 current_last,
236 NewCurve2dPtr);
237 geometric_representation_ptr->PCurve(NewCurve2dPtr) ;
238 }
239 if (has_closed_curve)
240 {
241 GeomLib::SameRange(Tolerance,
242 Curve2dPtr2,
243 geometric_representation_ptr->First(),
244 geometric_representation_ptr->Last(),
245 current_first,
246 current_last,
247 NewCurve2dPtr2);
248 geometric_representation_ptr->PCurve2(NewCurve2dPtr2) ;
249 }
250 }
7fd59977 251 }
252 }
253 an_Iterator.Next() ;
254 }
255 BRep_Builder B;
256 B.Range(TopoDS::Edge(AnEdge),
a86d3ec0 257 current_first,
258 current_last) ;
7fd59977 259
260 B.SameRange(AnEdge,
a86d3ec0 261 Standard_True) ;
7fd59977 262}
263
264//=======================================================================
265//function : EvaluateMaxSegment
266//purpose : return MaxSegment to pass in approximation, if MaxSegment==0 provided
267//=======================================================================
268
269static Standard_Integer evaluateMaxSegment(const Standard_Integer aMaxSegment,
a86d3ec0 270 const Adaptor3d_CurveOnSurface& aCurveOnSurface)
7fd59977 271{
272 if (aMaxSegment != 0) return aMaxSegment;
273
274 Handle(Adaptor3d_HSurface) aSurf = aCurveOnSurface.GetSurface();
275 Handle(Adaptor2d_HCurve2d) aCurv2d = aCurveOnSurface.GetCurve();
276
277 Standard_Real aNbSKnots = 0, aNbC2dKnots = 0;
a86d3ec0 278
7fd59977 279 if (aSurf->GetType() == GeomAbs_BSplineSurface) {
280 Handle(Geom_BSplineSurface) aBSpline = aSurf->BSpline();
281 aNbSKnots = Max(aBSpline->NbUKnots(), aBSpline->NbVKnots());
282 }
283 if (aCurv2d->GetType() == GeomAbs_BSplineCurve) {
284 aNbC2dKnots = aCurv2d->NbKnots();
285 }
286 Standard_Integer aReturn = (Standard_Integer) ( 30 + Max(aNbSKnots, aNbC2dKnots) ) ;
287 return aReturn;
288}
289
290//=======================================================================
291//function : BuildCurve3d
292//purpose :
293//=======================================================================
294
295Standard_Boolean BRepLib::BuildCurve3d(const TopoDS_Edge& AnEdge,
a86d3ec0 296 const Standard_Real Tolerance,
297 const GeomAbs_Shape Continuity,
298 const Standard_Integer MaxDegree,
299 const Standard_Integer MaxSegment)
7fd59977 300{
301 Standard_Integer //ErrorCode,
a86d3ec0 302 // ReturnCode = 0,
303 ii,
304 // num_knots,
305 jj;
7fd59977 306
307 TopLoc_Location LocalLoc,L[2],LC;
308 Standard_Real f,l,fc,lc, first[2], last[2],
a86d3ec0 309 tolerance,
310 max_deviation,
311 average_deviation ;
7fd59977 312 Handle(Geom2d_Curve) Curve2dPtr, Curve2dArray[2] ;
313 Handle(Geom_Surface) SurfacePtr, SurfaceArray[2] ;
314
315 Standard_Integer not_done ;
316 // if the edge has a 3d curve returns true
317
318
319 const Handle(Geom_Curve) C = BRep_Tool::Curve(AnEdge,LocalLoc,f,l);
320 if (!C.IsNull())
321 return Standard_True;
a86d3ec0 322 //
323 // this should not exists but UpdateEdge makes funny things
324 // if the edge is not same range
325 //
7fd59977 326 if (! CheckSameRange(AnEdge,
a86d3ec0 327 Precision::Confusion())) {
328 SameRange(AnEdge,
329 Tolerance) ;
7fd59977 330 }
331
a86d3ec0 332
7fd59977 333
334 // search a curve on a plane
335 Handle(Geom_Surface) S;
336 Handle(Geom2d_Curve) PC;
337 Standard_Integer i = 0;
338 Handle(Geom_Plane) P;
339 not_done = 1 ;
340
341 while (not_done) {
342 i++;
343 BRep_Tool::CurveOnSurface(AnEdge,PC,S,LocalLoc,f,l,i);
344 Handle(Geom_RectangularTrimmedSurface) RT =
345 Handle(Geom_RectangularTrimmedSurface)::DownCast(S);
346 if ( RT.IsNull()) {
347 P = Handle(Geom_Plane)::DownCast(S);
348 }
349 else {
350 P = Handle(Geom_Plane)::DownCast(RT->BasisSurface());
351 }
352 not_done = ! (S.IsNull() || !P.IsNull()) ;
353 }
354 if (! P.IsNull()) {
355 // compute the 3d curve
356 gp_Ax2 axes = P->Position().Ax2();
357 Handle(Geom_Curve) C3d = GeomLib::To3d(axes,PC);
dfc06d1f
A
358 if (C3d.IsNull())
359 return Standard_False;
7fd59977 360 // update the edge
361 Standard_Real First, Last;
362
363 BRep_Builder B;
364 Standard_Boolean is_closed ;
a86d3ec0 365 is_closed = AnEdge.Closed() ;
366
7fd59977 367 B.UpdateEdge(AnEdge,C3d,LocalLoc,0.0e0);
368 BRep_Tool::Range(AnEdge, S, LC, First, Last);
0d969553 369 B.Range(AnEdge, First, Last); //Do not forget 3D range.(PRO6412)
7fd59977 370 TopoDS_Edge E = AnEdge ;
371 E.Closed(is_closed) ;
372
373 }
374 else {
375 //
376 // compute the 3d curve using existing surface
377 //
378 fc = f ;
379 lc = l ;
380 if (!BRep_Tool::Degenerated(AnEdge)) {
381 jj = 0 ;
382 for (ii = 0 ; ii < 3 ; ii++ ) {
a86d3ec0 383 BRep_Tool::CurveOnSurface(TopoDS::Edge(AnEdge),
384 Curve2dPtr,
385 SurfacePtr,
386 LocalLoc,
387 fc,
388 lc,
389 ii) ;
390
391 if (!Curve2dPtr.IsNull() && jj < 2){
392 Curve2dArray[jj] = Curve2dPtr ;
393 SurfaceArray[jj] = SurfacePtr ;
394 L[jj] = LocalLoc ;
395 first[jj] = fc ;
396 last[jj] = lc ;
397 jj += 1 ;
398 }
7fd59977 399 }
400 f = first[0] ;
401 l = last[0] ;
402 Curve2dPtr = Curve2dArray[0] ;
403 SurfacePtr = SurfaceArray[0] ;
a86d3ec0 404
7fd59977 405 Geom2dAdaptor_Curve AnAdaptor3dCurve2d (Curve2dPtr, f, l) ;
406 GeomAdaptor_Surface AnAdaptor3dSurface (SurfacePtr) ;
407 Handle(Geom2dAdaptor_HCurve) AnAdaptor3dCurve2dPtr =
a86d3ec0 408 new Geom2dAdaptor_HCurve(AnAdaptor3dCurve2d) ;
7fd59977 409 Handle(GeomAdaptor_HSurface) AnAdaptor3dSurfacePtr =
a86d3ec0 410 new GeomAdaptor_HSurface (AnAdaptor3dSurface) ;
7fd59977 411 Adaptor3d_CurveOnSurface CurveOnSurface( AnAdaptor3dCurve2dPtr,
a86d3ec0 412 AnAdaptor3dSurfacePtr) ;
413
7fd59977 414 Handle(Geom_Curve) NewCurvePtr ;
415
416 GeomLib::BuildCurve3d(Tolerance,
a86d3ec0 417 CurveOnSurface,
418 f,
419 l,
420 NewCurvePtr,
421 max_deviation,
422 average_deviation,
423 Continuity,
424 MaxDegree,
425 evaluateMaxSegment(MaxSegment,CurveOnSurface)) ;
7fd59977 426 BRep_Builder B;
427 tolerance = BRep_Tool::Tolerance(AnEdge) ;
428 //Patch
429 //max_deviation = Max(tolerance, max_deviation) ;
430 max_deviation = Max( tolerance, Tolerance );
dfc06d1f
A
431 if (NewCurvePtr.IsNull())
432 return Standard_False;
7fd59977 433 Standard_Boolean is_closed ;
434 is_closed = AnEdge.Closed() ;
435 B.UpdateEdge(TopoDS::Edge(AnEdge),
a86d3ec0 436 NewCurvePtr,
437 L[0],
438 max_deviation) ;
7fd59977 439 TopoDS_Edge E = AnEdge ;
440 E.Closed(is_closed) ;
441 if (jj == 1 ) {
a86d3ec0 442 //
443 // if there is only one curve on surface attached to the edge
444 // than it can be qualified sameparameter
445 //
446 B.SameParameter(TopoDS::Edge(AnEdge),
447 Standard_True) ;
7fd59977 448 }
449 }
450 else {
451 return Standard_False ;
452 }
a86d3ec0 453
7fd59977 454 }
455 return Standard_True;
456}
457//=======================================================================
458//function : BuildCurves3d
459//purpose :
460//=======================================================================
461
462Standard_Boolean BRepLib::BuildCurves3d(const TopoDS_Shape& S)
463
464{
465 return BRepLib::BuildCurves3d(S,
a86d3ec0 466 1.0e-5) ;
7fd59977 467}
468
469//=======================================================================
470//function : BuildCurves3d
471//purpose :
472//=======================================================================
473
474Standard_Boolean BRepLib::BuildCurves3d(const TopoDS_Shape& S,
a86d3ec0 475 const Standard_Real Tolerance,
476 const GeomAbs_Shape Continuity,
477 const Standard_Integer MaxDegree,
478 const Standard_Integer MaxSegment)
7fd59977 479{
480 Standard_Boolean boolean_value,
a86d3ec0 481 ok = Standard_True;
7fd59977 482 TopTools_MapOfShape a_counter ;
483 TopExp_Explorer ex(S,TopAbs_EDGE);
484
485 while (ex.More()) {
486 if (a_counter.Add(ex.Current())) {
487 boolean_value =
a86d3ec0 488 BuildCurve3d(TopoDS::Edge(ex.Current()),
489 Tolerance, Continuity,
490 MaxDegree, MaxSegment);
7fd59977 491 ok = ok && boolean_value ;
492 }
493 ex.Next();
494 }
495 return ok;
496}
497//=======================================================================
498//function : UpdateEdgeTolerance
499//purpose :
500//=======================================================================
501
502Standard_Boolean BRepLib::UpdateEdgeTol(const TopoDS_Edge& AnEdge,
a86d3ec0 503 const Standard_Real MinToleranceRequested,
504 const Standard_Real MaxToleranceToCheck)
505{
506
507 Standard_Integer curve_on_surface_index,
508 curve_index,
509 not_done,
510 has_closed_curve,
511 has_curve,
512 jj,
513 ii,
514 geom_reference_curve_flag = 0,
515 max_sampling_points = 90,
516 min_sampling_points = 30 ;
517
518 Standard_Real factor = 100.0e0,
519 // sampling_array[2],
520 safe_factor = 1.4e0,
521 current_last,
522 current_first,
523 max_distance,
524 coded_edge_tolerance,
525 edge_tolerance = 0.0e0 ;
526 Handle(TColStd_HArray1OfReal) parameters_ptr ;
527 Handle(BRep_GCurve) geometric_representation_ptr ;
528
529 if (BRep_Tool::Degenerated(AnEdge)) return Standard_False ;
530 coded_edge_tolerance = BRep_Tool::Tolerance(AnEdge) ;
531 if (coded_edge_tolerance > MaxToleranceToCheck) return Standard_False ;
532
533 const Handle(BRep_TEdge)& TE = *((Handle(BRep_TEdge)*)&AnEdge.TShape());
534 BRep_ListOfCurveRepresentation& list_curve_rep = TE->ChangeCurves() ;
535 BRep_ListIteratorOfListOfCurveRepresentation an_iterator(list_curve_rep),
536 second_iterator(list_curve_rep) ;
537 Handle(Geom2d_Curve) curve2d_ptr, new_curve2d_ptr;
538 Handle(Geom_Surface) surface_ptr ;
539 TopLoc_Location local_location ;
540 GCPnts_QuasiUniformDeflection a_sampler ;
541 GeomAdaptor_Curve geom_reference_curve ;
542 Adaptor3d_CurveOnSurface curve_on_surface_reference ;
543 Handle(Geom_Curve) C = BRep_Tool::Curve(AnEdge,
544 local_location,
545 current_first,
546 current_last);
547 curve_on_surface_index = -1 ;
548 if (!C.IsNull()) {
549 if (! local_location.IsIdentity()) {
550 C = Handle(Geom_Curve)::
551 DownCast(C-> Transformed(local_location.Transformation()) ) ;
7fd59977 552 }
a86d3ec0 553 geom_reference_curve.Load(C) ;
554 geom_reference_curve_flag = 1 ;
555 a_sampler.Initialize(geom_reference_curve,
556 MinToleranceRequested * factor,
557 current_first,
558 current_last) ;
559 }
560 else {
561 not_done = 1 ;
562 curve_on_surface_index = 0 ;
563
564 while (not_done && an_iterator.More()) {
565 geometric_representation_ptr =
566 Handle(BRep_GCurve)::DownCast(second_iterator.Value());
567 if (!geometric_representation_ptr.IsNull()
568 && geometric_representation_ptr->IsCurveOnSurface()) {
569 curve2d_ptr = geometric_representation_ptr->PCurve() ;
570 local_location = geometric_representation_ptr->Location() ;
571 current_first = geometric_representation_ptr->First();
572 //first = geometric_representation_ptr->First();
573 current_last = geometric_representation_ptr->Last();
574 // must be inverted
575 //
576 if (! local_location.IsIdentity() ) {
577 surface_ptr = Handle(Geom_Surface)::
578 DownCast( geometric_representation_ptr->Surface()->
579 Transformed(local_location.Transformation()) ) ;
580 }
581 else {
582 surface_ptr =
583 geometric_representation_ptr->Surface() ;
584 }
585 not_done = 0 ;
7fd59977 586 }
a86d3ec0 587 curve_on_surface_index += 1 ;
7fd59977 588 }
a86d3ec0 589 Geom2dAdaptor_Curve AnAdaptor3dCurve2d (curve2d_ptr) ;
590 GeomAdaptor_Surface AnAdaptor3dSurface (surface_ptr) ;
591 Handle(Geom2dAdaptor_HCurve) AnAdaptor3dCurve2dPtr =
592 new Geom2dAdaptor_HCurve(AnAdaptor3dCurve2d) ;
593 Handle(GeomAdaptor_HSurface) AnAdaptor3dSurfacePtr =
594 new GeomAdaptor_HSurface (AnAdaptor3dSurface) ;
595 curve_on_surface_reference.Load( AnAdaptor3dCurve2dPtr) ;
596 curve_on_surface_reference.Load( AnAdaptor3dSurfacePtr) ;
597 a_sampler.Initialize(curve_on_surface_reference,
598 MinToleranceRequested * factor,
599 current_first,
600 current_last) ;
601 }
602 TColStd_Array1OfReal sampling_parameters(1,a_sampler.NbPoints()) ;
603 for (ii = 1 ; ii <= a_sampler.NbPoints() ; ii++) {
604 sampling_parameters(ii) = a_sampler.Parameter(ii) ;
605 }
606 if (a_sampler.NbPoints() < min_sampling_points) {
607 GeomLib::DensifyArray1OfReal(min_sampling_points,
608 sampling_parameters,
609 parameters_ptr) ;
610 }
611 else if (a_sampler.NbPoints() > max_sampling_points) {
612 GeomLib::RemovePointsFromArray(max_sampling_points,
613 sampling_parameters,
614 parameters_ptr) ;
615 }
616 else {
617 jj = 1 ;
618 parameters_ptr =
619 new TColStd_HArray1OfReal(1,sampling_parameters.Length()) ;
620 for (ii = sampling_parameters.Lower() ; ii <= sampling_parameters.Upper() ; ii++) {
621 parameters_ptr->ChangeArray1()(jj) =
622 sampling_parameters(ii) ;
623 jj +=1 ;
7fd59977 624 }
a86d3ec0 625 }
626
627 curve_index = 0 ;
628
629 while (second_iterator.More()) {
630 geometric_representation_ptr =
631 Handle(BRep_GCurve)::DownCast(second_iterator.Value());
632 if (! geometric_representation_ptr.IsNull() &&
633 curve_index != curve_on_surface_index) {
634 has_closed_curve =
635 has_curve = Standard_False ;
636 // first = geometric_representation_ptr->First();
637 // last = geometric_representation_ptr->Last();
638 local_location = geometric_representation_ptr->Location() ;
639 if (geometric_representation_ptr->IsCurveOnSurface()) {
640 curve2d_ptr = geometric_representation_ptr->PCurve() ;
641 has_curve = Standard_True ;
642 }
643 if (geometric_representation_ptr->IsCurveOnClosedSurface()) {
644 curve2d_ptr = geometric_representation_ptr->PCurve2() ;
645 has_closed_curve = Standard_True ;
646 }
647
648 if (has_curve ||
649 has_closed_curve) {
650 if (! local_location.IsIdentity() ) {
651 surface_ptr = Handle(Geom_Surface)::
652 DownCast( geometric_representation_ptr->Surface()->
653 Transformed(local_location.Transformation()) ) ;
654 }
655 else {
656 surface_ptr =
657 geometric_representation_ptr->Surface() ;
658 }
659 Geom2dAdaptor_Curve an_adaptor_curve2d (curve2d_ptr) ;
660 GeomAdaptor_Surface an_adaptor_surface(surface_ptr) ;
661 Handle(Geom2dAdaptor_HCurve) an_adaptor_curve2d_ptr =
662 new Geom2dAdaptor_HCurve(an_adaptor_curve2d) ;
663 Handle(GeomAdaptor_HSurface) an_adaptor_surface_ptr =
664 new GeomAdaptor_HSurface (an_adaptor_surface) ;
665 Adaptor3d_CurveOnSurface a_curve_on_surface(an_adaptor_curve2d_ptr,
666 an_adaptor_surface_ptr) ;
667
668 if (BRep_Tool::SameParameter(AnEdge)) {
669
670 GeomLib::EvalMaxParametricDistance(a_curve_on_surface,
671 geom_reference_curve,
672 MinToleranceRequested,
673 parameters_ptr->Array1(),
674 max_distance) ;
675 }
676 else if (geom_reference_curve_flag) {
677 GeomLib::EvalMaxDistanceAlongParameter(a_curve_on_surface,
678 geom_reference_curve,
679 MinToleranceRequested,
680 parameters_ptr->Array1(),
681 max_distance) ;
682 }
683 else {
684
685 GeomLib::EvalMaxDistanceAlongParameter(a_curve_on_surface,
686 curve_on_surface_reference,
687 MinToleranceRequested,
688 parameters_ptr->Array1(),
689 max_distance) ;
690 }
691 max_distance *= safe_factor ;
692 edge_tolerance = Max(max_distance, edge_tolerance) ;
693 }
7fd59977 694
7fd59977 695
7fd59977 696 }
a86d3ec0 697 curve_index += 1 ;
698 second_iterator.Next() ;
7fd59977 699 }
a86d3ec0 700
701 TE->Tolerance(edge_tolerance);
702 return Standard_True ;
703
704}
7fd59977 705//=======================================================================
706//function : UpdateEdgeTolerance
707//purpose :
708//=======================================================================
709
710Standard_Boolean BRepLib::UpdateEdgeTolerance(const TopoDS_Shape& S,
a86d3ec0 711 const Standard_Real MinToleranceRequested,
712 const Standard_Real MaxToleranceToCheck)
7fd59977 713{
714 TopExp_Explorer ex(S,TopAbs_EDGE);
715 TopTools_MapOfShape a_counter ;
716
717 Standard_Boolean return_status = Standard_False,
718 local_flag ;
719
720 while (ex.More()) {
721 if (a_counter.Add(ex.Current())) {
722 local_flag =
a86d3ec0 723 BRepLib::UpdateEdgeTol(TopoDS::Edge(ex.Current()),
724 MinToleranceRequested,
725 MaxToleranceToCheck) ;
7fd59977 726 if (local_flag && ! return_status) {
a86d3ec0 727 return_status = Standard_True ;
7fd59977 728 }
729 }
730 ex.Next();
731 }
732 return return_status ;
733}
734
735//=======================================================================
736//function : SetEdgeTol
737//purpose :
738//=======================================================================
739
740static void SetEdgeTol(const TopoDS_Edge& E,
a86d3ec0 741 const TopoDS_Face& F)
7fd59977 742{
743 TopLoc_Location L;
744 const Handle(Geom_Surface)& S = BRep_Tool::Surface(F,L);
745 TopLoc_Location l = L.Predivided(E.Location());
746
747 const Handle(BRep_TEdge)& TE = *((Handle(BRep_TEdge)*)&E.TShape());
748 BRep_ListIteratorOfListOfCurveRepresentation itcr(TE->ChangeCurves());
749
750 while (itcr.More()) {
751 const Handle(BRep_CurveRepresentation)& cr = itcr.Value();
752 if(cr->IsCurveOnSurface(S,l)) return;
753 itcr.Next();
754 }
755
756 Handle(Geom_Plane) GP;
757 Handle(Geom_RectangularTrimmedSurface) GRTS;
758 GRTS = Handle(Geom_RectangularTrimmedSurface)::DownCast(S);
759 if(!GRTS.IsNull())
760 GP = Handle(Geom_Plane)::DownCast(GRTS->BasisSurface());
761 else
762 GP = Handle(Geom_Plane)::DownCast(S);
763
41194117
K
764 Handle(GeomAdaptor_HCurve) HC = new GeomAdaptor_HCurve();
765 Handle(GeomAdaptor_HSurface) HS = new GeomAdaptor_HSurface();
a86d3ec0 766
7fd59977 767 TopLoc_Location LC;
768 Standard_Real First, Last;
769 GeomAdaptor_Curve& GAC = HC->ChangeCurve();
770 GAC.Load(BRep_Tool::Curve(E,LC,First,Last));
771 LC = L.Predivided(LC);
772
773 if (!LC.IsIdentity()) {
774 GP = Handle(Geom_Plane)::DownCast(
a86d3ec0 775 GP->Transformed(LC.Transformation()));
7fd59977 776 }
777 GeomAdaptor_Surface& GAS = HS->ChangeSurface();
778 GAS.Load(GP);
a86d3ec0 779
7fd59977 780 ProjLib_ProjectedCurve Proj(HS,HC);
781 Handle(Geom2d_Curve) pc = Geom2dAdaptor::MakeCurve(Proj);
782
783 gp_Pln pln = GAS.Plane();
784 Standard_Real d2 = 0.;
785 Standard_Integer nn = 23;
786 Standard_Real unsurnn = 1./nn;
787 for(Standard_Integer i = 0; i <= nn; i++){
788 Standard_Real t = unsurnn*i;
789 Standard_Real u = First*(1.-t) + Last*t;
790 gp_Pnt Pc3d = HC->Value(u);
791 gp_Pnt2d p2d = pc->Value(u);
792 gp_Pnt Pcons = ElSLib::Value(p2d.X(),p2d.Y(),pln);
793 Standard_Real temp = Pc3d.SquareDistance(Pcons);
794 if(temp > d2) d2 = temp;
795 }
796 d2 = 1.5*sqrt(d2);
797 TE->UpdateTolerance(d2);
798}
799
800//=======================================================================
801//function : SameParameter
802//purpose :
803//=======================================================================
804void BRepLib::SameParameter(const TopoDS_Shape& S,
a86d3ec0 805 const Standard_Real Tolerance,
806 const Standard_Boolean forced)
7fd59977 807{
808 TopExp_Explorer ex(S,TopAbs_EDGE);
809 TopTools_MapOfShape Done;
810 BRep_Builder brB;
811
812 while (ex.More()) {
813 if (Done.Add(ex.Current())) {
814 if (forced) {
a86d3ec0 815 brB.SameRange(TopoDS::Edge(ex.Current()), Standard_False);
816 brB.SameParameter(TopoDS::Edge(ex.Current()), Standard_False);
7fd59977 817 }
818 BRepLib::SameParameter(TopoDS::Edge(ex.Current()),Tolerance);
819 }
820 ex.Next();
821 }
822
823 Done.Clear();
824 BRepAdaptor_Surface BS;
825 for(ex.Init(S,TopAbs_FACE); ex.More(); ex.Next()){
826 const TopoDS_Face& curface = TopoDS::Face(ex.Current());
827 if(!Done.Add(curface)) continue;
828 BS.Initialize(curface);
829 if(BS.GetType() != GeomAbs_Plane) continue;
830 TopExp_Explorer ex2;
831 for(ex2.Init(curface,TopAbs_EDGE); ex2.More(); ex2.Next()){
832 const TopoDS_Edge& E = TopoDS::Edge(ex2.Current());
833 SetEdgeTol(E,curface);
834 }
835 }
836 BRepLib::UpdateTolerances(S);
837}
838
0d969553 839//================================================================
7fd59977 840//function : SameParameter
0d969553
Y
841//WARNING : New spec DUB LBO 9/9/97.
842// Recode in the edge the best tolerance found,
843// for vertex extremities it is required to find something else
844//================================================================
7fd59977 845static Standard_Boolean EvalTol(const Handle(Geom2d_Curve)& pc,
a86d3ec0 846 const Handle(Geom_Surface)& s,
847 const GeomAdaptor_Curve& gac,
848 const Standard_Real tol,
849 Standard_Real& tolbail)
7fd59977 850{
851 Standard_Integer ok = 0;
852 Standard_Real f = gac.FirstParameter();
853 Standard_Real l = gac.LastParameter();
854 Extrema_LocateExtPC Projector;
855 Projector.Initialize(gac,f,l,tol);
856 Standard_Real u,v;
857 gp_Pnt p;
858 tolbail = tol;
859 for(Standard_Integer i = 1; i <= 5; i++){
860 Standard_Real t = i/6.;
861 t = (1.-t) * f + t * l;
862 pc->Value(t).Coord(u,v);
863 p = s->Value(u,v);
864 Projector.Perform(p,t);
865 if (Projector.IsDone()) {
866 Standard_Real dist2 = Projector.SquareDistance();
867 if(dist2 > tolbail * tolbail) tolbail = sqrt (dist2);
868 ok++;
869 }
870 }
871 return (ok > 2);
872}
873
874static Standard_Real ComputeTol(const Handle(Adaptor3d_HCurve)& c3d,
a86d3ec0 875 const Handle(Adaptor2d_HCurve2d)& c2d,
876 const Handle(Adaptor3d_HSurface)& surf,
877 const Standard_Integer nbp)
7fd59977 878
879{
880
881 TColStd_Array1OfReal dist(1,nbp+10);
882 dist.Init(-1.);
883
7fd59977 884 Adaptor3d_CurveOnSurface cons(c2d,surf);
885 Standard_Real d2 = 0.;
7fd59977 886 Standard_Real first = c3d->FirstParameter();
887 Standard_Real last = c3d->LastParameter();
888 Standard_Integer i = 0;
a86d3ec0 889 for(i = 0; i <= nbp; i++){
890 const Standard_Real t = IntToReal(i)/IntToReal(nbp);
891 const Standard_Real u = first*(1.-t) + last*t;
7fd59977 892 gp_Pnt Pc3d = c3d->Value(u);
893 gp_Pnt Pcons = cons.Value(u);
894 if (Precision::IsInfinite(Pcons.X()) ||
a86d3ec0 895 Precision::IsInfinite(Pcons.Y()) ||
896 Precision::IsInfinite(Pcons.Z())) {
897 d2=Precision::Infinite();
898 break;
7fd59977 899 }
900 Standard_Real temp = Pc3d.SquareDistance(Pcons);
901
902
903 dist(i+1) = temp;
904
905
906 if(temp > d2) d2 = temp;
907 }
908
909
910 Standard_Boolean ana = Standard_False;
911 Standard_Real D2 = 0;
912 Standard_Integer N1 = 0;
913 Standard_Integer N2 = 0;
914 Standard_Integer N3 = 0;
915
916 for( i = 1; i<= nbp+10; i++)
917 if( dist(i) > 0 ) {
918 if( dist(i) < 1.0 ) N1++;
919 else N2++;
920 }
921
a86d3ec0 922 if( N1 > N2 && N2 != 0 ) N3 = 100*N2/(N1+N2);
923 if( N3 < 10 && N3 != 0 ) {
924 ana = Standard_True;
925 for( i = 1; i<= nbp+10; i++)
926 if( dist(i) > 0 && dist(i) < 1.0 )
927 if( dist(i) > D2 ) D2 = dist(i);
928 }
7fd59977 929
a86d3ec0 930 //d2 = 1.5*sqrt(d2);
931 d2 = (!ana) ? 1.5*sqrt(d2) : 1.5*sqrt(D2);
932 if(d2<1.e-7) d2 = 1.e-7;
7fd59977 933
a86d3ec0 934 return d2;
7fd59977 935}
936
7fd59977 937void BRepLib::SameParameter(const TopoDS_Edge& AnEdge,
a86d3ec0 938 const Standard_Real Tolerance)
7fd59977 939{
940 if (BRep_Tool::SameParameter(AnEdge)) return;
941
942 const Standard_Integer NCONTROL = 22;
943
41194117
K
944 Handle(GeomAdaptor_HCurve) HC = new GeomAdaptor_HCurve();
945 Handle(Geom2dAdaptor_HCurve) HC2d = new Geom2dAdaptor_HCurve();
946 Handle(GeomAdaptor_HSurface) HS = new GeomAdaptor_HSurface();
7fd59977 947 GeomAdaptor_Curve& GAC = HC->ChangeCurve();
948 Geom2dAdaptor_Curve& GAC2d = HC2d->ChangeCurve2d();
949 GeomAdaptor_Surface& GAS = HS->ChangeSurface();
7fd59977 950 Standard_Real f3d =0.,l3d =0.;
7fd59977 951 TopLoc_Location L3d;
952 Handle(Geom_Curve) C3d;
953
954 const Handle(BRep_TEdge)& TE = *((Handle(BRep_TEdge)*) &AnEdge.TShape());
955 BRep_ListOfCurveRepresentation& CList = TE->ChangeCurves();
956 BRep_ListIteratorOfListOfCurveRepresentation It(CList);
a86d3ec0 957
7fd59977 958 Standard_Boolean NotDone = Standard_True;
959
960 while (NotDone && It.More()) {
961 Handle(BRep_GCurve) GCurve = Handle(BRep_GCurve)::DownCast(It.Value());
962 if (!GCurve.IsNull() && GCurve->IsCurve3D()) {
963 C3d = GCurve->Curve3D() ;
964 f3d = GCurve->First();
965 l3d = GCurve->Last();
966 L3d = GCurve->Location() ;
967 NotDone = Standard_False;
968 }
969 It.Next() ;
970 }
971
972 if(C3d.IsNull()) return;
973
974 // modified by NIZHNY-OCC486 Tue Aug 27 17:15:13 2002 :
975 Standard_Boolean m_TrimmedPeriodical = Standard_False;
976 Handle(Standard_Type) TheType = C3d->DynamicType();
977 if( TheType == STANDARD_TYPE(Geom_TrimmedCurve))
a86d3ec0 978 {
979 const Handle(Geom_Curve)& gtC = (*((Handle(Geom_TrimmedCurve)*)&C3d))->BasisCurve();
980 m_TrimmedPeriodical = gtC->IsPeriodic();
981 }
7fd59977 982 // modified by NIZHNY-OCC486 Tue Aug 27 17:15:17 2002 .
983
984 BRep_Builder B;
985 if(!C3d->IsPeriodic()) {
986 Standard_Real Udeb = C3d->FirstParameter();
987 Standard_Real Ufin = C3d->LastParameter();
988 // modified by NIZHNY-OCC486 Tue Aug 27 17:17:14 2002 :
989 //if (Udeb > f3d) f3d = Udeb;
990 //if (l3d > Ufin) l3d = Ufin;
991 if(!m_TrimmedPeriodical)
a86d3ec0 992 {
993 if (Udeb > f3d) f3d = Udeb;
994 if (l3d > Ufin) l3d = Ufin;
995 }
7fd59977 996 // modified by NIZHNY-OCC486 Tue Aug 27 17:17:55 2002 .
997 }
998 if(!L3d.IsIdentity()){
999 C3d = Handle(Geom_Curve)::DownCast(C3d->Transformed(L3d.Transformation()));
1000 }
1001 GAC.Load(C3d,f3d,l3d);
1002
1003 Standard_Boolean IsSameP = 1;
1004 Standard_Real maxdist = 0.;
1005
a86d3ec0 1006 // Modified by skv - Thu Jun 3 12:39:19 2004 OCC5898 Begin
7fd59977 1007 Standard_Real anEdgeTol = BRep_Tool::Tolerance(AnEdge);
a86d3ec0 1008 // Modified by skv - Thu Jun 3 12:39:20 2004 OCC5898 End
7fd59977 1009 Standard_Boolean SameRange = BRep_Tool::SameRange(AnEdge);
1010 Standard_Boolean YaPCu = Standard_False;
1011 It.Initialize(CList);
1012
1013 while (It.More()) {
1014 Standard_Boolean isANA = Standard_False;
1015 Standard_Boolean isBSP = Standard_False;
1016 Handle(BRep_GCurve) GCurve = Handle(BRep_GCurve)::DownCast(It.Value());
1017 Handle(Geom2d_Curve) PC[2];
1018 Handle(Geom_Surface) S;
1019 if (!GCurve.IsNull() && GCurve->IsCurveOnSurface()) {
1020 YaPCu = Standard_True;
1021 PC[0] = GCurve->PCurve();
1022 TopLoc_Location PCLoc = GCurve->Location();
1023 S = GCurve->Surface();
1024 if (!PCLoc.IsIdentity() ) {
a86d3ec0 1025 S = Handle(Geom_Surface)::DownCast(S->Transformed(PCLoc.Transformation()));
7fd59977 1026 }
a86d3ec0 1027
7fd59977 1028 GAS.Load(S);
1029 if (GCurve->IsCurveOnClosedSurface()) {
a86d3ec0 1030 PC[1] = GCurve->PCurve2();
7fd59977 1031 }
a86d3ec0 1032
7fd59977 1033 // Eval tol2d to compute SameRange
973f1c39 1034 Standard_Real UResol = Max(GAS.UResolution(Tolerance), Precision::PConfusion());
1035 Standard_Real VResol = Max(GAS.VResolution(Tolerance), Precision::PConfusion());
7fd59977 1036 Standard_Real Tol2d = Min(UResol, VResol);
1037 for(Standard_Integer i = 0; i < 2; i++){
a86d3ec0 1038 Handle(Geom2d_Curve) curPC = PC[i];
1039 Standard_Boolean updatepc = 0;
1040 if(curPC.IsNull()) break;
1041 if(!SameRange){
1042 GeomLib::SameRange(Tol2d,
1043 PC[i],GCurve->First(),GCurve->Last(),
1044 f3d,l3d,curPC);
1045
1046 updatepc = (curPC != PC[i]);
1047
1048 }
1049 Standard_Boolean goodpc = 1;
1050 GAC2d.Load(curPC,f3d,l3d);
1051
1052 Standard_Real error = ComputeTol(HC, HC2d, HS, NCONTROL);
1053
1054 if(GAC2d.GetType() == GeomAbs_BSplineCurve &&
1055 GAC2d.Continuity() == GeomAbs_C0) {
1056 Handle(Geom2d_BSplineCurve) bs2d = GAC2d.BSpline();
1057 Handle(Geom2d_BSplineCurve) bs2dsov = bs2d;
1058 Standard_Real fC0 = bs2d->FirstParameter(), lC0 = bs2d->LastParameter();
1059 Standard_Boolean repar = Standard_True;
1060 gp_Pnt2d OriginPoint;
1061 bs2d->D0(fC0, OriginPoint);
1062 Geom2dConvert::C0BSplineToC1BSplineCurve(bs2d, Tol2d);
1063 isBSP = Standard_True;
1064
1065 if(bs2d->IsPeriodic()) { // -------- IFV, Jan 2000
1066 gp_Pnt2d NewOriginPoint;
1067 bs2d->D0(bs2d->FirstParameter(), NewOriginPoint);
1068 if(Abs(OriginPoint.X() - NewOriginPoint.X()) > Precision::PConfusion() ||
1069 Abs(OriginPoint.Y() - NewOriginPoint.Y()) > Precision::PConfusion() ) {
1070
1071 TColStd_Array1OfReal Knotbs2d (1, bs2d->NbKnots());
1072 bs2d->Knots(Knotbs2d);
1073
1074 for(Standard_Integer Index = 1; Index <= bs2d->NbKnots(); Index++) {
1075 bs2d->D0(Knotbs2d(Index), NewOriginPoint);
1076 if(Abs(OriginPoint.X() - NewOriginPoint.X()) > Precision::PConfusion() ||
1077 Abs(OriginPoint.Y() - NewOriginPoint.Y()) > Precision::PConfusion() ) continue;
1078
1079 bs2d->SetOrigin(Index);
1080 break;
1081 }
1082 }
1083 }
1084
1085 if(bs2d->Continuity() == GeomAbs_C0) {
1086 Standard_Real tolbail;
1087 if(EvalTol(curPC,S,GAC,Tolerance,tolbail)){
1088 bs2d = bs2dsov;
1089 Standard_Real UResbail = GAS.UResolution(tolbail);
1090 Standard_Real VResbail = GAS.VResolution(tolbail);
1091 Standard_Real Tol2dbail = Min(UResbail,VResbail);
1092 bs2d->D0(bs2d->FirstParameter(), OriginPoint);
1093
1094 Standard_Integer nbp = bs2d->NbPoles();
1095 TColgp_Array1OfPnt2d poles(1,nbp);
1096 bs2d->Poles(poles);
1097 gp_Pnt2d p = poles(1), p1;
1098 Standard_Real d = Precision::Infinite();
1099 for(Standard_Integer ip = 2; ip <= nbp; ip++) {
1100 p1 = poles(ip);
1101 d = Min(d,p.SquareDistance(p1));
1102 p = p1;
1103 }
1104 d = sqrt(d)*.1;
1105
1106 Tol2dbail = Max(Min(Tol2dbail,d),Tol2d);
1107
1108 Geom2dConvert::C0BSplineToC1BSplineCurve(bs2d,Tol2dbail);
1109
1110 if(bs2d->IsPeriodic()) { // -------- IFV, Jan 2000
1111 gp_Pnt2d NewOriginPoint;
1112 bs2d->D0(bs2d->FirstParameter(), NewOriginPoint);
1113 if(Abs(OriginPoint.X() - NewOriginPoint.X()) > Precision::PConfusion() ||
1114 Abs(OriginPoint.Y() - NewOriginPoint.Y()) > Precision::PConfusion() ) {
1115
1116 TColStd_Array1OfReal Knotbs2d (1, bs2d->NbKnots());
1117 bs2d->Knots(Knotbs2d);
1118
1119 for(Standard_Integer Index = 1; Index <= bs2d->NbKnots(); Index++) {
1120 bs2d->D0(Knotbs2d(Index), NewOriginPoint);
1121 if(Abs(OriginPoint.X() - NewOriginPoint.X()) > Precision::PConfusion() ||
1122 Abs(OriginPoint.Y() - NewOriginPoint.Y()) > Precision::PConfusion() ) continue;
1123
1124 bs2d->SetOrigin(Index);
1125 break;
1126 }
1127 }
1128 }
1129
1130
1131 if(bs2d->Continuity() == GeomAbs_C0) {
1132 goodpc = 1;
1133 bs2d = bs2dsov;
1134 repar = Standard_False;
1135 }
1136 }
1137 else goodpc = 0;
1138 }
1139
1140 if(goodpc){
1141 if(repar) {
1142 Standard_Integer NbKnots = bs2d->NbKnots();
1143 TColStd_Array1OfReal Knots(1,NbKnots);
1144 bs2d->Knots(Knots);
1145 // BSplCLib::Reparametrize(f3d,l3d,Knots);
1146 BSplCLib::Reparametrize(fC0,lC0,Knots);
1147 bs2d->SetKnots(Knots);
1148 GAC2d.Load(bs2d,f3d,l3d);
1149 curPC = bs2d;
1150 Standard_Boolean updatepcsov = updatepc;
1151 updatepc = Standard_True;
1152
1153 Standard_Real error1 = ComputeTol(HC, HC2d, HS, NCONTROL);
1154 if(error1 > error) {
1155 bs2d = bs2dsov;
1156 GAC2d.Load(bs2d,f3d,l3d);
1157 curPC = bs2d;
1158 updatepc = updatepcsov;
1159 isANA = Standard_True;
1160 }
1161 else {
1162 error = error1;
1163 }
1164 }
1165
1166 //check, if new BSpline "good" or not --------- IFV, Jan of 2000
1167 GeomAbs_Shape cont = bs2d->Continuity();
1168 Standard_Boolean IsBad = Standard_False;
1169
1170 if(cont > GeomAbs_C0 && error > Max(1.e-3,Tolerance)) {
1171 Standard_Integer NbKnots = bs2d->NbKnots();
1172 TColStd_Array1OfReal Knots(1,NbKnots);
1173 bs2d->Knots(Knots);
1174 Standard_Real critratio = 10.;
1175 Standard_Real dtprev = Knots(2) - Knots(1), dtratio = 1.;
1176 Standard_Real dtmin = dtprev;
1177 Standard_Real dtcur;
1178 for(Standard_Integer j = 2; j < NbKnots; j++) {
1179 dtcur = Knots(j+1) - Knots(j);
1180 dtmin = Min(dtmin, dtcur);
1181
1182 if(IsBad) continue;
1183
1184 if(dtcur > dtprev) dtratio = dtcur/dtprev;
1185 else dtratio = dtprev/dtcur;
1186 if(dtratio > critratio) {IsBad = Standard_True;}
1187 dtprev = dtcur;
1188
1189 }
1190 if(IsBad) {
1191 // To avoid failures in Approx_CurvilinearParameter
1192 bs2d->Resolution(Max(1.e-3,Tolerance), dtcur);
1193 if(dtmin < dtcur) IsBad = Standard_False;
1194 }
1195 }
1196
1197
1198 if(IsBad ) { //if BSpline "bad", try to reparametrize it
1199 // by its curve length
1200
1201 // GeomAbs_Shape cont = bs2d->Continuity();
1202 if(cont > GeomAbs_C2) cont = GeomAbs_C2;
1203 Standard_Integer maxdeg = bs2d->Degree();
1204 if(maxdeg == 1) maxdeg = 14;
1205 Approx_CurvilinearParameter AppCurPar(HC2d, HS, Max(1.e-3,Tolerance),
1206 cont, maxdeg, 10);
1207 if(AppCurPar.IsDone() || AppCurPar.HasResult()) {
1208 bs2d = AppCurPar.Curve2d1();
1209 GAC2d.Load(bs2d,f3d,l3d);
1210 curPC = bs2d;
1211
1212 if(Abs(bs2d->FirstParameter() - fC0) > Tol2d ||
1213 Abs(bs2d->LastParameter() - lC0) > Tol2d ) {
1214 Standard_Integer NbKnots = bs2d->NbKnots();
1215 TColStd_Array1OfReal Knots(1,NbKnots);
1216 bs2d->Knots(Knots);
1217 // BSplCLib::Reparametrize(f3d,l3d,Knots);
1218 BSplCLib::Reparametrize(fC0,lC0,Knots);
1219 bs2d->SetKnots(Knots);
1220 GAC2d.Load(bs2d,f3d,l3d);
1221 curPC = bs2d;
1222
1223 }
1224 }
1225 }
1226
1227
1228 }
1229 }
1230
1231
1232 if(goodpc){
1233 // Approx_SameParameter SameP(HC,HC2d,HS,Tolerance);
1234 Standard_Real aTol = (isANA && isBSP) ? 1.e-7 : Tolerance;
1235 Approx_SameParameter SameP(HC,HC2d,HS,aTol);
1236
1237 if (SameP.IsSameParameter()) {
1238 maxdist = Max(maxdist,SameP.TolReached());
1239 if(updatepc){
1240 if (i == 0) GCurve->PCurve(curPC);
1241 else GCurve->PCurve2(curPC);
1242 }
1243 }
1244 else if (SameP.IsDone()) {
1245 Standard_Real tolreached = SameP.TolReached();
1246 if(tolreached < error) {
1247 curPC = SameP.Curve2d();
1248 updatepc = Standard_True;
1249 maxdist = Max(maxdist,tolreached);
1250 }
1251 else {
1252 maxdist = Max(maxdist, error);
1253 }
1254 if(updatepc){
1255 if (i == 0) GCurve->PCurve(curPC);
1256 else GCurve->PCurve2(curPC);
1257 }
1258 }
1259 else IsSameP = 0;
1260
1261 }
1262 else IsSameP = 0;
1263
1264 // Modified by skv - Thu Jun 3 12:39:19 2004 OCC5898 Begin
1265 if (!IsSameP) {
1266 if (anEdgeTol > error) {
1267 maxdist = Max(maxdist, anEdgeTol);
1268 IsSameP = Standard_True;
1269 }
1270 }
1271 // Modified by skv - Thu Jun 3 12:39:20 2004 OCC5898 End
7fd59977 1272 }
1273 }
1274 It.Next() ;
1275 }
1276 B.Range(AnEdge,f3d,l3d);
1277 B.SameRange(AnEdge,Standard_True);
1278 if ( IsSameP) {
0d969553
Y
1279 // Reduce eventually the tolerance of the edge, as
1280 // all its representations are processed (except for some associated
1281 // to planes and not stored in the edge !)
1282 // The same cannot be done with vertices that cannot be enlarged
1283 // or left as is.
7fd59977 1284 if (YaPCu) {
0d969553 1285 // Avoid setting too small tolerances.
7fd59977 1286 maxdist = Max(maxdist,Precision::Confusion());
1287 TopoDS_Vertex V1,V2;
1288 TopExp::Vertices(AnEdge,V1,V2);
1289 if (!V1.IsNull())
a86d3ec0 1290 B.UpdateVertex(V1,maxdist);
7fd59977 1291 if (!V2.IsNull())
a86d3ec0 1292 B.UpdateVertex(V2,maxdist);
7fd59977 1293 TE->Modified(Standard_True);
1294 TE->Tolerance(maxdist);
1295 }
1296 B.SameParameter(AnEdge,Standard_True);
1297 }
1298}
1299
1300//=======================================================================
1301//function : UpdateTolerances
1302//purpose :
1303//=======================================================================
1304void BRepLib::UpdateTolerances(const TopoDS_Shape& aShape,
a86d3ec0 1305 const Standard_Boolean verifyTolerance)
7fd59977 1306{
1307
a86d3ec0 1308 // Harmonize tolerances
1309 // with rule Tolerance(VERTEX)>=Tolerance(EDGE)>=Tolerance(FACE)
7fd59977 1310 BRep_Builder B;
1311 Standard_Real tol=0;
1312 if (verifyTolerance) {
0d969553 1313 // Set tolerance to its minimum value
7fd59977 1314 Handle(Geom_Surface) S;
1315 TopLoc_Location l;
1316 TopExp_Explorer ex;
1317 Bnd_Box aB;
1318 Standard_Real aXmin, aYmin, aZmin, aXmax, aYmax, aZmax, dMax;
1319 for (ex.Init(aShape, TopAbs_FACE); ex.More(); ex.Next()) {
1320 const TopoDS_Face& curf=TopoDS::Face(ex.Current());
1321 S = BRep_Tool::Surface(curf, l);
1322 if (!S.IsNull()) {
a86d3ec0 1323 aB.SetVoid();
1324 BRepBndLib::Add(curf,aB);
1325 if (S->DynamicType() == STANDARD_TYPE(Geom_RectangularTrimmedSurface)) {
1326 S = (*((Handle(Geom_RectangularTrimmedSurface)*)&S))->BasisSurface();
1327 }
1328 GeomAdaptor_Surface AS(S);
1329 switch (AS.GetType()) {
1330 case GeomAbs_Plane:
1331 case GeomAbs_Cylinder:
1332 case GeomAbs_Cone:
1333 {
1334 tol=Precision::Confusion();
1335 break;
1336 }
1337 case GeomAbs_Sphere:
1338 case GeomAbs_Torus:
1339 {
1340 tol=Precision::Confusion()*2;
1341 break;
1342 }
1343 default:
1344 tol=Precision::Confusion()*4;
1345 }
1346 if (!aB.IsWhole()) {
1347 aB.Get(aXmin, aYmin, aZmin, aXmax, aYmax, aZmax);
1348 dMax=1.;
1349 if (!aB.IsOpenXmin() && !aB.IsOpenXmax()) dMax=aXmax-aXmin;
1350 if (!aB.IsOpenYmin() && !aB.IsOpenYmax()) aYmin=aYmax-aYmin;
1351 if (!aB.IsOpenZmin() && !aB.IsOpenZmax()) aZmin=aZmax-aZmin;
1352 if (aYmin>dMax) dMax=aYmin;
1353 if (aZmin>dMax) dMax=aZmin;
1354 tol=tol*dMax;
1355 // Do not process tolerances > 1.
1356 if (tol>1.) tol=0.99;
1357 }
1358 const Handle(BRep_TFace)& Tf = *((Handle(BRep_TFace)*)&curf.TShape());
1359 Tf->Tolerance(tol);
7fd59977 1360 }
1361 }
1362 }
a86d3ec0 1363
0d969553 1364 //Process edges
7fd59977 1365 TopTools_IndexedDataMapOfShapeListOfShape parents;
1366 TopExp::MapShapesAndAncestors(aShape, TopAbs_EDGE, TopAbs_FACE, parents);
1367 TopTools_ListIteratorOfListOfShape lConx;
1368 Standard_Integer iCur;
1369 for (iCur=1; iCur<=parents.Extent(); iCur++) {
1370 tol=0;
1371 for (lConx.Initialize(parents(iCur)); lConx.More(); lConx.Next()) {
1372 tol=Max(tol, BRep_Tool::Tolerance(TopoDS::Face(lConx.Value())));
1373 }
0d969553
Y
1374 // Update can only increase tolerance, so if the edge has a greater
1375 // tolerance than its faces it is not concerned
7fd59977 1376 B.UpdateEdge(TopoDS::Edge(parents.FindKey(iCur)), tol);
1377 }
1378
0d969553 1379 //Vertices are processed
7fd59977 1380 parents.Clear();
1381 TopExp::MapShapesAndAncestors(aShape, TopAbs_VERTEX, TopAbs_EDGE, parents);
1382 TColStd_MapOfTransient Initialized;
1383 TopTools_MapOfShape Done;
1384 Standard_Integer nbV = parents.Extent();
1385 for (iCur=1; iCur<=nbV; iCur++) {
1386 tol=0;
1387 Done.Clear();
1388 const TopoDS_Vertex& V = TopoDS::Vertex(parents.FindKey(iCur));
1389 Bnd_Box box;
1390 box.Add(BRep_Tool::Pnt(V));
1391 gp_Pnt p3d;
1392 for (lConx.Initialize(parents(iCur)); lConx.More(); lConx.Next()) {
1393 const TopoDS_Edge& E = TopoDS::Edge(lConx.Value());
1394 if(!Done.Add(E)) continue;
1395 tol=Max(tol, BRep_Tool::Tolerance(E));
1396 if(!BRep_Tool::SameRange(E)) continue;
1397 Standard_Real par = BRep_Tool::Parameter(V,E);
1398 Handle(BRep_TEdge)& TE = *((Handle(BRep_TEdge)*)&E.TShape());
1399 BRep_ListIteratorOfListOfCurveRepresentation itcr(TE->Curves());
1400 const TopLoc_Location& Eloc = E.Location();
1401 while (itcr.More()) {
a86d3ec0 1402 // For each CurveRepresentation, check the provided parameter
1403 const Handle(BRep_CurveRepresentation)& cr = itcr.Value();
1404 const TopLoc_Location& loc = cr->Location();
1405 TopLoc_Location L = (Eloc * loc);
1406 if (cr->IsCurve3D()) {
1407 const Handle(Geom_Curve)& C = cr->Curve3D();
1408 if (!C.IsNull()) { // edge non degenerated
1409 p3d = C->Value(par);
1410 p3d.Transform(L.Transformation());
1411 box.Add(p3d);
1412 }
1413 }
1414 else if (cr->IsCurveOnSurface()) {
1415 const Handle(Geom_Surface)& Su = cr->Surface();
1416 const Handle(Geom2d_Curve)& PC = cr->PCurve();
1417 Handle(Geom2d_Curve) PC2;
1418 if (cr->IsCurveOnClosedSurface()) {
1419 PC2 = cr->PCurve2();
1420 }
1421 gp_Pnt2d p2d = PC->Value(par);
1422 p3d = Su->Value(p2d.X(),p2d.Y());
1423 p3d.Transform(L.Transformation());
1424 box.Add(p3d);
1425 if (!PC2.IsNull()) {
1426 p2d = PC2->Value(par);
1427 p3d = Su->Value(p2d.X(),p2d.Y());
1428 p3d.Transform(L.Transformation());
1429 box.Add(p3d);
1430 }
1431 }
1432 itcr.Next();
7fd59977 1433 }
1434 }
1435 Standard_Real aXmin, aYmin, aZmin, aXmax, aYmax, aZmax;
1436 box.Get(aXmin, aYmin, aZmin, aXmax, aYmax, aZmax);
1437 aXmax -= aXmin; aYmax -= aYmin; aZmax -= aZmin;
1438 tol = Max(tol,sqrt(aXmax*aXmax+aYmax*aYmax+aZmax*aZmax));
1439 tol += 2.*Epsilon(tol);
1440 if (verifyTolerance) {
0d969553
Y
1441 // ASet minimum value of the tolerance
1442 // Attention to sharing of the vertex by other shapes
7fd59977 1443 const Handle(BRep_TVertex)& TV = *((Handle(BRep_TVertex)*)&V.TShape());
1444 if (Initialized.Add(TV))
a86d3ec0 1445 TV->Tolerance(tol);
7fd59977 1446 else
a86d3ec0 1447 B.UpdateVertex(V, tol);
7fd59977 1448 }
1449 else {
a86d3ec0 1450 // Update can only increase tolerance, so if the edge has a greater
1451 // tolerance than its faces it is not concerned
7fd59977 1452 B.UpdateVertex(V, tol);
1453 }
1454 }
1455}
1456
1457//=======================================================================
1458//function : OrientClosedSolid
1459//purpose :
1460//=======================================================================
1461Standard_Boolean BRepLib::OrientClosedSolid(TopoDS_Solid& solid)
1462{
a86d3ec0 1463 // Set material inside the solid
7fd59977 1464 BRepClass3d_SolidClassifier where(solid);
1465 where.PerformInfinitePoint(Precision::Confusion());
1466 if (where.State()==TopAbs_IN) {
1467 solid.Reverse();
1468 }
1469 else if (where.State()==TopAbs_ON || where.State()==TopAbs_UNKNOWN)
1470 return Standard_False;
1471
1472 return Standard_True;
1473}
1474
1475//=======================================================================
1476//function : tgtfaces
0d969553
Y
1477//purpose : check the angle at the border between two squares.
1478// Two shares should have a shared front edge.
7fd59977 1479//=======================================================================
1480
1481static Standard_Boolean tgtfaces(const TopoDS_Edge& Ed,
a86d3ec0 1482 const TopoDS_Face& F1,
1483 const TopoDS_Face& F2,
1484 const Standard_Real ta,
1485 const Standard_Boolean couture)
7fd59977 1486{
1487 Standard_Real u;
1488 TopoDS_Edge E = Ed;
1489 BRepAdaptor_Surface aBAS1(F1,Standard_False);
1490 BRepAdaptor_Surface aBAS2(F2,Standard_False);
1491 Handle(BRepAdaptor_HSurface) HS1 = new BRepAdaptor_HSurface(aBAS1);
1492 Handle(BRepAdaptor_HSurface) HS2;
1493 if(couture) HS2 = HS1;
1494 else HS2 = new BRepAdaptor_HSurface(aBAS2);
1495
1496 E.Orientation(TopAbs_FORWARD);
1497 Handle(BRepAdaptor_HCurve2d) HC2d1 = new BRepAdaptor_HCurve2d();
1498 HC2d1->ChangeCurve2d().Initialize(E,F1);
1499 if(couture) E.Orientation(TopAbs_REVERSED);
1500 Handle(BRepAdaptor_HCurve2d) HC2d2 = new BRepAdaptor_HCurve2d();
1501 HC2d2->ChangeCurve2d().Initialize(E,F2);
1502 Adaptor3d_CurveOnSurface C1(HC2d1,HS1);
1503 Adaptor3d_CurveOnSurface C2(HC2d2,HS2);
1504
1505 Standard_Boolean rev1 = (F1.Orientation() == TopAbs_REVERSED);
1506 Standard_Boolean rev2 = (F2.Orientation() == TopAbs_REVERSED);
c6541a0c 1507 Standard_Real f,l,eps, angmax = -M_PI;
7fd59977 1508 Standard_Real ang =0.;
7fd59977 1509 BRep_Tool::Range(E,f,l);
1510 Extrema_LocateExtPC ext;
1511 Standard_Boolean IsInitialized = Standard_False;
a86d3ec0 1512
7fd59977 1513 eps = (l - f)/100.;
0d969553
Y
1514 f += eps; // to avoid calculations on
1515 l -= eps; // points of pointed squares.
7fd59977 1516 gp_Pnt2d p;
1517 gp_Pnt pp1,pp2;//,PP;
1518 gp_Vec du,dv;
1519 gp_Vec d1,d2;
1520 Standard_Real uu, vv, norm;
1521
1522 Standard_Integer i;
1523 Standard_Boolean Nok;
1524 for(i = 0; (i<= 20) && (angmax<=ta) ; i++){
0d969553 1525 // First suppose that this is sameParameter
7fd59977 1526 Nok = Standard_True;
1527 u = f + (l-f)*i/20;
1528 HC2d1->D0(u,p);
1529 HS1->D1(p.X(),p.Y(),pp1,du,dv);
1530 d1 = (du.Crossed(dv));
1531 norm = d1.Magnitude();
1532 if (norm > 1.e-12) d1 /= norm;
1533 else Nok=Standard_False;
1534 if(rev1) d1.Reverse();
1535
1536 HC2d2->D0(u,p);
1537 HS2->D1(p.X(), p.Y(), pp2, du, dv);
1538 d2 = (du.Crossed(dv));
1539 norm = d2.Magnitude();
1540 if (norm> 1.e-12) d2 /= norm;
1541 else Nok=Standard_False;
1542 if(rev2) d2.Reverse();
1543 if (Nok) ang = d1.Angle(d2);
1544
0d969553 1545 if (Nok &&(ang > ta)) { // Refine by projection
7fd59977 1546 if (! IsInitialized ) {
a86d3ec0 1547 ext.Initialize(C2,f,l,Precision::PConfusion());
1548 IsInitialized = Standard_True;
7fd59977 1549 }
1550 ext.Perform(pp1,u);
1551 if(ext.IsDone() && ext.IsMin()){
a86d3ec0 1552 Extrema_POnCurv poc = ext.Point();
1553 Standard_Real v = poc.Parameter();
1554
1555 HC2d2->D0(v,p);
1556 p.Coord(uu,vv);
1557 HS2->D1(p.X(), p.Y(), pp2, du, dv);
1558 d2 = (du.Crossed(dv));
1559 norm = d2.Magnitude();
1560 if (norm> 1.e-12) d2 /= norm;
1561 else Nok = Standard_False;
1562 if(rev2) d2.Reverse();
1563 if (Nok) ang = d1.Angle(d2);
7fd59977 1564 }
1565 }
1566 if(ang >= angmax) angmax = ang;
1567 }
a86d3ec0 1568
7fd59977 1569 return (angmax<=ta);
1570
1571}
1572
1573
1574//=======================================================================
1575// function : EncodeRegularity
0d969553
Y
1576// purpose : code the regularities on all edges of the shape, boundary of
1577// two faces that do not have it.
7fd59977 1578//=======================================================================
1579
1580void BRepLib::EncodeRegularity(const TopoDS_Shape& S,
a86d3ec0 1581 const Standard_Real TolAng)
7fd59977 1582{
1583 BRep_Builder B;
1584 TopTools_IndexedDataMapOfShapeListOfShape M;
1585 TopExp::MapShapesAndAncestors(S,TopAbs_EDGE,TopAbs_FACE,M);
1586 TopTools_ListIteratorOfListOfShape It;
1587 TopExp_Explorer Ex;
1588 TopoDS_Face F1,F2;
1589 Standard_Boolean found, couture;
1590 for(Standard_Integer i = 1; i <= M.Extent(); i++){
1591 TopoDS_Edge E = TopoDS::Edge(M.FindKey(i));
1592 found = Standard_False; couture = Standard_False;
1593 F1.Nullify();
1594 for(It.Initialize(M.FindFromIndex(i));It.More() && !found;It.Next()){
1595 if(F1.IsNull()) { F1 = TopoDS::Face(It.Value()); }
1596 else {
a86d3ec0 1597 if(!F1.IsSame(TopoDS::Face(It.Value()))){
1598 found = Standard_True;
1599 F2 = TopoDS::Face(It.Value());
1600 }
7fd59977 1601 }
1602 }
0d969553 1603 if (!found && !F1.IsNull()){//is it a sewing edge?
7fd59977 1604 TopAbs_Orientation orE = E.Orientation();
1605 TopoDS_Edge curE;
1606 for(Ex.Init(F1,TopAbs_EDGE);Ex.More() && !found;Ex.Next()){
a86d3ec0 1607 curE= TopoDS::Edge(Ex.Current());
1608 if(E.IsSame(curE) && orE != curE.Orientation()) {
1609 found = Standard_True;
1610 couture = Standard_True;
1611 F2 = F1;
1612 }
7fd59977 1613 }
1614 }
1615 if(found){
1616 if(BRep_Tool::Continuity(E,F1,F2)<=GeomAbs_C0){
041bfce9 1617
1618 try {
a86d3ec0 1619 if(tgtfaces(E, F1, F2, TolAng, couture)){
1620 B.Continuity(E,F1,F2,GeomAbs_G1);
041bfce9 1621 }
1622 }
1623 catch(Standard_Failure)
1624 {
1625 }
7fd59977 1626 }
1627 }
1628 }
1629}
1630
1631//=======================================================================
1632// function : EncodeRegularity
0d969553 1633// purpose : code the regularity between 2 faces on an edge
7fd59977 1634//=======================================================================
1635
1636void BRepLib::EncodeRegularity(TopoDS_Edge& E,
a86d3ec0 1637 const TopoDS_Face& F1,
1638 const TopoDS_Face& F2,
1639 const Standard_Real TolAng)
7fd59977 1640{
1641 BRep_Builder B;
1642 if(BRep_Tool::Continuity(E,F1,F2)<=GeomAbs_C0){
041bfce9 1643 try {
1644 if( tgtfaces(E, F1, F2, TolAng, F1.IsEqual(F2))) {
1645 B.Continuity(E,F1,F2,GeomAbs_G1);
1646 }
1647 }
1648 catch(Standard_Failure)
1649 {
1650 }
a86d3ec0 1651 }
7fd59977 1652}
1653
1654//=======================================================================
1655//function : SortFaces
1656//purpose :
1657//=======================================================================
1658
1659void BRepLib::SortFaces (const TopoDS_Shape& Sh,
a86d3ec0 1660 TopTools_ListOfShape& LF)
7fd59977 1661{
1662 LF.Clear();
1663 TopTools_ListOfShape LTri,LPlan,LCyl,LCon,LSphere,LTor,LOther;
1664 TopExp_Explorer exp(Sh,TopAbs_FACE);
1665 TopLoc_Location l;
1666 Handle(Geom_Surface) S;
1667
1668 for (; exp.More(); exp.Next()) {
1669 const TopoDS_Face& F = TopoDS::Face(exp.Current());
1670 S = BRep_Tool::Surface(F, l);
1671 if (!S.IsNull()) {
1672 if (S->DynamicType() == STANDARD_TYPE(Geom_RectangularTrimmedSurface)) {
a86d3ec0 1673 S = (*((Handle(Geom_RectangularTrimmedSurface)*)&S))->BasisSurface();
7fd59977 1674 }
1675 GeomAdaptor_Surface AS(S);
1676 switch (AS.GetType()) {
1677 case GeomAbs_Plane:
a86d3ec0 1678 {
1679 LPlan.Append(F);
1680 break;
1681 }
7fd59977 1682 case GeomAbs_Cylinder:
a86d3ec0 1683 {
1684 LCyl.Append(F);
1685 break;
1686 }
7fd59977 1687 case GeomAbs_Cone:
a86d3ec0 1688 {
1689 LCon.Append(F);
1690 break;
1691 }
7fd59977 1692 case GeomAbs_Sphere:
a86d3ec0 1693 {
1694 LSphere.Append(F);
1695 break;
1696 }
7fd59977 1697 case GeomAbs_Torus:
a86d3ec0 1698 {
1699 LTor.Append(F);
1700 break;
1701 }
7fd59977 1702 default:
a86d3ec0 1703 LOther.Append(F);
7fd59977 1704 }
1705 }
1706 else LTri.Append(F);
1707 }
1708 LF.Append(LPlan); LF.Append(LCyl ); LF.Append(LCon); LF.Append(LSphere);
1709 LF.Append(LTor ); LF.Append(LOther); LF.Append(LTri);
1710}
1711
1712//=======================================================================
1713//function : ReverseSortFaces
1714//purpose :
1715//=======================================================================
1716
1717void BRepLib::ReverseSortFaces (const TopoDS_Shape& Sh,
a86d3ec0 1718 TopTools_ListOfShape& LF)
7fd59977 1719{
1720 LF.Clear();
1721 TopTools_ListOfShape LTri,LPlan,LCyl,LCon,LSphere,LTor,LOther;
1722 TopExp_Explorer exp(Sh,TopAbs_FACE);
1723 TopLoc_Location l;
1724 Handle(Geom_Surface) S;
a86d3ec0 1725
7fd59977 1726 for (; exp.More(); exp.Next()) {
1727 const TopoDS_Face& F = TopoDS::Face(exp.Current());
1728 S = BRep_Tool::Surface(F, l);
1729 if (!S.IsNull()) {
1730 if (S->DynamicType() == STANDARD_TYPE(Geom_RectangularTrimmedSurface)) {
a86d3ec0 1731 S = (*((Handle(Geom_RectangularTrimmedSurface)*)&S))->BasisSurface();
7fd59977 1732 }
1733 GeomAdaptor_Surface AS(S);
1734 switch (AS.GetType()) {
1735 case GeomAbs_Plane:
a86d3ec0 1736 {
1737 LPlan.Append(F);
1738 break;
1739 }
7fd59977 1740 case GeomAbs_Cylinder:
a86d3ec0 1741 {
1742 LCyl.Append(F);
1743 break;
1744 }
7fd59977 1745 case GeomAbs_Cone:
a86d3ec0 1746 {
1747 LCon.Append(F);
1748 break;
1749 }
7fd59977 1750 case GeomAbs_Sphere:
a86d3ec0 1751 {
1752 LSphere.Append(F);
1753 break;
1754 }
7fd59977 1755 case GeomAbs_Torus:
a86d3ec0 1756 {
1757 LTor.Append(F);
1758 break;
1759 }
7fd59977 1760 default:
a86d3ec0 1761 LOther.Append(F);
7fd59977 1762 }
1763 }
1764 else LTri.Append(F);
1765 }
1766 LF.Append(LTri); LF.Append(LOther); LF.Append(LTor ); LF.Append(LSphere);
1767 LF.Append(LCon); LF.Append(LCyl ); LF.Append(LPlan);
7fd59977 1768
a86d3ec0 1769}
7fd59977 1770