+++ /dev/null
-// File: BRepTools_NurbsConvertModification_21423.cxx
-// Created: Fri Jul 12 10:16:32 1996
-// Author: Stagiaire Mary FABIEN
-// <fbi@animax.paris1.matra-dtv.fr>
-
-#include <BRepTools_NurbsConvertModification_21423.hxx>
-
-#include <TopoDS_Edge.hxx>
-#include <TopoDS_Face.hxx>
-#include <TopoDS_Vertex.hxx>
-
-#include <TopLoc_Location.hxx>
-
-#include <Geom_Curve.hxx>
-#include <Geom_Surface.hxx>
-
-#include <Geom2d_Curve.hxx>
-
-#include <gp_Pnt.hxx>
-
-#ifndef _Standard_Type_HeaderFile
-#include <Standard_Type.hxx>
-#endif
-
-IMPLEMENT_STANDARD_TYPE(BRepTools_NurbsConvertModification_21423)
-IMPLEMENT_STANDARD_SUPERTYPE_ARRAY()
- STANDARD_TYPE(BRepTools_Modification),
- STANDARD_TYPE(MMgt_TShared),
- STANDARD_TYPE(Standard_Transient),
-
-IMPLEMENT_STANDARD_SUPERTYPE_ARRAY_END()
-IMPLEMENT_STANDARD_TYPE_END(BRepTools_NurbsConvertModification_21423)
-
-IMPLEMENT_DOWNCAST(BRepTools_NurbsConvertModification_21423,Standard_Transient)
-IMPLEMENT_STANDARD_RTTI(BRepTools_NurbsConvertModification_21423)
-
-#include <BRepTools.hxx>
-
-#include <Standard_NoSuchObject.hxx>
-
-#include <Geom_TrimmedCurve.hxx>
-#include <Geom2d_TrimmedCurve.hxx>
-#include <Geom_RectangularTrimmedSurface.hxx>
-#include <Geom_BSplineSurface.hxx>
-#include <Geom_BSplineCurve.hxx>
-#include <Geom_BezierSurface.hxx>
-#include <Geom_BezierCurve.hxx>
-#include <Geom2d_BSplineCurve.hxx>
-#include <GeomConvert.hxx>
-#include <Geom2dConvert.hxx>
-#include <Geom_Plane.hxx>
-#include <Geom_Line.hxx>
-
-#include <Geom2dAdaptor_Curve.hxx>
-#include <GeomAdaptor_Curve.hxx>
-#include <GeomAdaptor_Surface.hxx>
-#include <Geom2dAdaptor_HCurve.hxx>
-#include <Geom2dAdaptor_HCurve.hxx>
-#include <GeomAdaptor_HCurve.hxx>
-#include <GeomAdaptor_HSurface.hxx>
-
-#include <BSplCLib.hxx>
-#include <Approx_SameParameter.hxx>
-#include <BRep_Tool.hxx>
-#include <Extrema_LocateExtPC.hxx>
-#include <OSD_Chronometer.hxx>
-#include <gp_GTrsf2d.hxx>
-#include <gp_TrsfForm.hxx>
-#include <TopAbs.hxx>
-#include <TopoDS.hxx>
-#include <TopTools_ListIteratorOfListOfShape.hxx>
-#include <TColStd_ListIteratorOfListOfTransient.hxx>
-#include <ProjLib_ComputeApprox.hxx>
-#include <ProjLib_ComputeApproxOnPolarSurface.hxx>
-#include <ElSLib.hxx>
-#include <BSplCLib.hxx>
-#include <Geom_Circle.hxx>
-#include <Geom_Ellipse.hxx>
-#include <Geom_CylindricalSurface.hxx>
-
-#include <TColStd_Array1OfReal.hxx>
-#include <BRep_TEdge.hxx>
-#include <BRep_GCurve.hxx>
-#include <BRep_ListIteratorOfListOfCurveRepresentation.hxx>
-#include <BRepAdaptor_Surface.hxx>
-
-static void GeomLib_ChangeUBounds(Handle(Geom_BSplineSurface)& aSurface,
- const Standard_Real newU1,
- const Standard_Real newU2)
-{
- TColStd_Array1OfReal knots(1,aSurface->NbUKnots()) ;
- aSurface->UKnots(knots) ;
- BSplCLib::Reparametrize(newU1,
- newU2,
- knots) ;
- aSurface->SetUKnots(knots) ;
-}
-static void GeomLib_ChangeVBounds(Handle(Geom_BSplineSurface)& aSurface,
- const Standard_Real newV1,
- const Standard_Real newV2)
-{
- TColStd_Array1OfReal knots(1,aSurface->NbVKnots()) ;
- aSurface->VKnots(knots) ;
- BSplCLib::Reparametrize(newV1,
- newV2,
- knots) ;
- aSurface->SetVKnots(knots) ;
-}
-
-//=======================================================================
-//function : BRepTools_NurbsConvertModification_21423
-//purpose :
-//=======================================================================
-
-BRepTools_NurbsConvertModification_21423::BRepTools_NurbsConvertModification_21423()
-{
-}
-
-
-
-//=======================================================================
-//function : NewSurface
-//purpose :
-//=======================================================================
-
-Standard_Boolean BRepTools_NurbsConvertModification_21423::NewSurface
- (const TopoDS_Face& F,
- Handle(Geom_Surface)& S,
- TopLoc_Location& L,
- Standard_Real& Tol,
- Standard_Boolean& RevWires,
- Standard_Boolean& RevFace)
-{
- Standard_Real U1, U2, curvU1, curvU2, surfU1, surfU2, UTol;
- Standard_Real V1, V2, curvV1, curvV2, surfV1, surfV2, VTol;
- RevWires = Standard_False;
- RevFace = Standard_False;
- Handle(Geom_Surface) SS = BRep_Tool::Surface(F,L);
- Handle(Standard_Type) TheTypeSS = SS->DynamicType();
- if ((TheTypeSS == STANDARD_TYPE(Geom_BSplineSurface)) ||
- (TheTypeSS == STANDARD_TYPE(Geom_BezierSurface))) {
- return Standard_False;
- }
- S = SS;
- BRepTools::UVBounds(F,curvU1,curvU2,curvV1,curvV2);
- Tol = BRep_Tool::Tolerance(F);
- Standard_Real TolPar = 0.1*Tol;
- Standard_Boolean IsUp = S->IsUPeriodic(), IsVp = S->IsVPeriodic();
- //OCC466(apo)->
- U1 = curvU1; U2 = curvU2;
- V1 = curvV1; V2 = curvV2;
- SS->Bounds(surfU1,surfU2,surfV1,surfV2);
- if(!IsUp){
- U1 = Max(surfU1,curvU1);
- U2 = Min(surfU2,curvU2);
- }
- if(!IsVp){
- V1 = Max(surfV1,curvV1);
- V2 = Min(surfV2,curvV2);
- }
- //<-OCC466(apo)
- if(IsUp && IsVp) {
- Standard_Real dU = Abs(U2 - U1), dV = Abs(V2 - V1);
- Standard_Real Up = S->UPeriod(), Vp = S->VPeriod();
- if(Abs(dU - Up) <= TolPar && U2 <= Up) {
- if(Abs(dV - Vp) <= TolPar && V2 <= Vp) { }
- else {
- SS = new Geom_RectangularTrimmedSurface(S, V1+1e-9, V2-1e-9, Standard_False);
- }
- }
- else {
- if(Abs(dV - Vp) <= TolPar && V2 <= Vp)
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, Standard_True);
- else
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, V1+1e-9, V2-1e-9);
- }
- }
-
- if(IsUp && !IsVp) {
- Standard_Real dU = Abs(U2 - U1);
- Standard_Real Up = S->UPeriod();
- if(Abs(dU - Up) <= TolPar && U2 <= Up)
- SS = new Geom_RectangularTrimmedSurface(S, V1+1e-9, V2-1e-9, Standard_False);
- else
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, V1+1e-9, V2-1e-9);
- }
-
- if(!IsUp && IsVp) {
- Standard_Real dV = Abs(V2 - V1);
- Standard_Real Vp = S->VPeriod();
- if(Abs(dV - Vp) <= TolPar && V2 <= Vp)
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, Standard_True);
- else
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, V1+1e-9, V2-1e-9);
- }
-
- if(!IsUp && !IsVp) {
- SS = new Geom_RectangularTrimmedSurface(S, U1+1e-9, U2-1e-9, V1+1e-9, V2-1e-9);
- }
-
- SS->Bounds(surfU1,surfU2,surfV1,surfV2) ;
-
- S = GeomConvert::SurfaceToBSplineSurface(SS);
- Handle(Geom_BSplineSurface) BS = Handle(Geom_BSplineSurface)::DownCast(S) ;
- BS->Resolution(Tol, UTol, VTol) ;
-
- //
- // on recadre les bornes de S sinon les anciennes PCurves sont aux fraises
- //
-
- if (Abs(curvU1-surfU1) > UTol && !BS->IsUPeriodic()) {
- GeomLib_ChangeUBounds(BS, U1,U2) ;
- }
- if (Abs(curvV1-surfV1) > VTol && !BS->IsVPeriodic()) {
- GeomLib_ChangeVBounds(BS, V1, V2) ;
- }
-
- ////modified by jgv, 17.11.11 for SALOME only, bug 21423////
- BRepAdaptor_Surface BAsurf(F);
- if (BAsurf.GetType() == GeomAbs_Sphere)
- { //from OCC217
- Standard_Real dTol = 1e-9/Sqrt(UTol*UTol+VTol*VTol)*2.0;
- Tol *= Max(dTol,1.0);
- }
- ////////////////////////////////////////////////////////////
-
- return Standard_True;
-}
-
-static Standard_Boolean IsConvert(const TopoDS_Edge& E)
-{
- Standard_Boolean isConvert = Standard_False;
- Handle(BRep_TEdge)& TE = *((Handle(BRep_TEdge)*)&E.TShape());
- // iterate on pcurves
- BRep_ListIteratorOfListOfCurveRepresentation itcr(TE->Curves());
- for ( ; itcr.More() && !isConvert; itcr.Next() ) {
- Handle(BRep_GCurve) GC = Handle(BRep_GCurve)::DownCast(itcr.Value());
- if ( GC.IsNull() || ! GC->IsCurveOnSurface() ) continue;
- Handle(Geom_Surface) aSurface = GC->Surface();
- Handle(Geom2d_Curve) aCurve2d = GC->PCurve();
- isConvert =((!aSurface->IsKind(STANDARD_TYPE(Geom_BSplineSurface)) &&
- !aSurface->IsKind(STANDARD_TYPE(Geom_BezierSurface))) ||
- (!aCurve2d->IsKind(STANDARD_TYPE(Geom2d_BSplineCurve)) &&
- !aCurve2d->IsKind(STANDARD_TYPE(Geom2d_BezierCurve))));
-
- }
- return isConvert;
-
-}
-
-//=======================================================================
-//function : NewCurve
-//purpose :
-//=======================================================================
-
-Standard_Boolean BRepTools_NurbsConvertModification_21423::NewCurve
-(const TopoDS_Edge& E,
- Handle(Geom_Curve)& C,
- TopLoc_Location& L,
- Standard_Real& Tol)
-{
-
- Tol = BRep_Tool::Tolerance(E);
- if(BRep_Tool::Degenerated(E)) {
- C.Nullify();
- L.Identity();
- return Standard_True;
- }
- Standard_Real f, l;
-
- Handle(Geom_Curve) Caux = BRep_Tool::Curve(E, L, f, l);
-
- if ( Caux.IsNull()) {
- L.Identity();
- return Standard_False;
- }
- Handle(Standard_Type) TheType = Caux->DynamicType();
- if ((TheType == STANDARD_TYPE(Geom_BSplineCurve)) ||
- (TheType == STANDARD_TYPE(Geom_BezierCurve))) {
- if(IsConvert(E)) {
- C = Handle(Geom_Curve)::DownCast(Caux->Copy());
- return Standard_True;
- }
- return Standard_False;
- }
-
- C = Caux;
-
- Standard_Real TolPar = Tol *.1;
-
- if(C->IsPeriodic()) {
- Standard_Real p = C->Period();
- Standard_Real d = Abs(l - f);
- if(Abs(d - p) <= TolPar && l <= p) {}
- else
- C = new Geom_TrimmedCurve(C, f, l);
- }
- else
- C = new Geom_TrimmedCurve(C, f, l);
-
-//modif WOK++ portage hp (fbi du 14/03/97)
-// gp_Trsf trsf(L);
-// gp_Trsf trsf = L.Transformation();
-
-// C = GeomConvert::CurveToBSplineCurve(C,Convert_QuasiAngular);
-
- C = GeomConvert::CurveToBSplineCurve(C);
-
- Standard_Real fnew = C->FirstParameter(), lnew = C->LastParameter(), UTol;
-
- Handle(Geom_BSplineCurve) BC = Handle(Geom_BSplineCurve)::DownCast(C) ;
-
- if(!BC->IsPeriodic()) {
- BC->Resolution(Tol, UTol) ;
- if(Abs(f - fnew) > UTol || Abs(l - lnew) > UTol) {
- TColStd_Array1OfReal knots(1,BC->NbKnots()) ;
- BC->Knots(knots) ;
- BSplCLib::Reparametrize(f, l, knots) ;
- BC->SetKnots(knots) ;
- }
- }
-
- if(!myMap.Contains(Caux)) {
- myMap.Add(Caux,C);
- }
- return Standard_True ;
-}
-
-//=======================================================================
-//function : NewPoint
-//purpose :
-//=======================================================================
-
-Standard_Boolean BRepTools_NurbsConvertModification_21423::NewPoint
-//(const TopoDS_Vertex& V,
-(const TopoDS_Vertex& ,
-// gp_Pnt& P,
- gp_Pnt& ,
-// Standard_Real& Tol)
- Standard_Real& )
-{
- return Standard_False;
-}
-
-
-//=======================================================================
-//function : NewCurve2d
-//purpose :
-//=======================================================================
-
-Standard_Boolean BRepTools_NurbsConvertModification_21423::NewCurve2d
-(const TopoDS_Edge& E,
- const TopoDS_Face& F,
- const TopoDS_Edge& newE,
- const TopoDS_Face& newF,
- Handle(Geom2d_Curve)& Curve2d,
- Standard_Real& Tol)
-{
- ////modified by jgv, 17.11.11 for SALOME only, bug 21423////
- Tol = BRep_Tool::Tolerance(E);
- BRepAdaptor_Surface BAsurf(F);
- if (BAsurf.GetType() == GeomAbs_Sphere)
- Tol = Max(Max(BRep_Tool::Tolerance(E),BRep_Tool::Tolerance(F)),
- Max(BRep_Tool::Tolerance(newE),BRep_Tool::Tolerance(newF))
- ); //from OCC217
- ////////////////////////////////////////////////////////////
-
- Standard_Real f2d,l2d;
- Handle(Geom2d_Curve) C2d = BRep_Tool::CurveOnSurface(E,F,f2d,l2d);
- Standard_Real f3d,l3d;
- TopLoc_Location Loc;
- Handle(Geom_Curve) C3d = BRep_Tool::Curve(E, Loc, f3d,l3d);
- Standard_Boolean isConvert2d = ((!C3d.IsNull() && !C3d->IsKind(STANDARD_TYPE(Geom_BSplineCurve)) &&
- !C3d->IsKind(STANDARD_TYPE(Geom_BezierCurve))) ||
- IsConvert(E));
-
- if(BRep_Tool::Degenerated(E)) {
- //Curve2d = C2d;
- if(!C2d->IsKind(STANDARD_TYPE(Geom2d_TrimmedCurve)))
- {
- Handle(Geom2d_TrimmedCurve) aTrimC = new Geom2d_TrimmedCurve(C2d,f2d,l2d);
- C2d = aTrimC;
- }
- Curve2d = Geom2dConvert::CurveToBSplineCurve(C2d);
- return Standard_True;
- }
- if(!BRepTools::IsReallyClosed(E,F)) {
- Handle(Standard_Type) TheTypeC2d = C2d->DynamicType();
-
- if(TheTypeC2d == STANDARD_TYPE(Geom2d_TrimmedCurve)) {
- Handle(Geom2d_TrimmedCurve) TC = Handle(Geom2d_TrimmedCurve)::DownCast(C2d);
- C2d = TC->BasisCurve();
- }
-
- Standard_Real fc = C2d->FirstParameter(), lc = C2d->LastParameter();
-
- if(!C2d->IsPeriodic()) {
- if(fc - f2d > Precision::PConfusion()) f2d = fc;
- if(l2d - lc > Precision::PConfusion()) l2d = lc;
- }
-
- C2d = new Geom2d_TrimmedCurve(C2d, f2d, l2d);
-
- Geom2dAdaptor_Curve G2dAC(C2d, f2d, l2d);
- Handle(Geom2dAdaptor_HCurve) G2dAHC = new Geom2dAdaptor_HCurve(G2dAC);
-
- TopLoc_Location Loc;
- Handle(Geom_Curve) C3d = BRep_Tool::Curve(E, Loc, f3d,l3d);
- if(!newE.IsNull()) {
- C3d = BRep_Tool::Curve(newE, f3d, l3d);
- }
- else {
- C3d = BRep_Tool::Curve(E,f3d,l3d);
- }
- GeomAdaptor_Curve G3dAC(C3d, f3d, l3d);
- Handle(GeomAdaptor_HCurve) G3dAHC = new GeomAdaptor_HCurve(G3dAC);
-
- Standard_Real Uinf, Usup, Vinf, Vsup, u = 0, v = 0;
- Handle(Geom_Surface) S = BRep_Tool::Surface(F);
- Handle(Standard_Type) myT = S->DynamicType();
- if(myT != STANDARD_TYPE(Geom_Plane)) {
- if(newF.IsNull()) {
- Handle(Standard_Type) st = C2d->DynamicType();
- if ((st == STANDARD_TYPE(Geom2d_BSplineCurve)) ||
- (st == STANDARD_TYPE(Geom2d_BezierCurve))) {
- if(isConvert2d) {
- Curve2d = Handle(Geom2d_Curve)::DownCast(C2d->Copy());
- return Standard_True;
- }
- return Standard_False;
- }
- }
- else {
- S = BRep_Tool::Surface(newF);
-
- }
- S->Bounds(Uinf, Usup, Vinf, Vsup);
- Uinf -= 1e-9; Usup += 1e-9; Vinf -= 1e-9; Vsup += 1e-9;
- u = (Usup - Uinf)*0.1;
- v = (Vsup - Vinf)*0.1;
- if(S->IsUPeriodic()) {
- Standard_Real uperiod = S->UPeriod();
- if(uperiod < (Usup+2*u-Uinf)) {
- if(uperiod <= (Usup-Uinf)) {
- u = 0;
- }
- else {
- u = (uperiod-(Usup-Uinf))*0.5;
- }
- }
- }
- if(S->IsVPeriodic()) {
- Standard_Real vperiod = S->VPeriod();
- if(vperiod < (Vsup+2*v-Vinf)) {
- if(vperiod <= (Vsup-Vinf)) {
- v = 0;
- }
- else {
- v = (vperiod-(Vsup-Vinf))*0.5;
- }
- }
- }
- }
- else {
- S = BRep_Tool::Surface(F);// Si S est un plan, pas de changement de parametrisation
- GeomAdaptor_Surface GAS(S);
- Handle(GeomAdaptor_HSurface) GAHS = new GeomAdaptor_HSurface(GAS);
- ProjLib_ComputeApprox ProjOnCurve(G3dAHC,GAHS,Tol);
- if(ProjOnCurve.BSpline().IsNull()) {
- Curve2d = Geom2dConvert::CurveToBSplineCurve(ProjOnCurve.Bezier());
- return Standard_True;
- }
- Curve2d = ProjOnCurve.BSpline();
- return Standard_True;
- }
- GeomAdaptor_Surface GAS(S,Uinf-u,Usup+u,Vinf-v,Vsup+v);
-
- Handle(GeomAdaptor_HSurface) GAHS = new GeomAdaptor_HSurface(GAS);
-
- ProjLib_ComputeApproxOnPolarSurface ProjOnCurve(G2dAHC,G3dAHC,GAHS,Tol);
-
- if(ProjOnCurve.IsDone()) {
- Curve2d = ProjOnCurve.BSpline();
-
- return Standard_True;
- }
- else {
- Curve2d = Geom2dConvert::CurveToBSplineCurve(C2d);
- return Standard_True;
- }
- }
- else {
- TopTools_ListIteratorOfListOfShape itled;
- TColStd_ListIteratorOfListOfTransient itlcu;
-
- for (itled.Initialize(myled), itlcu.Initialize(mylcu);
- itled.More(); // itlcu.More()
- itled.Next(),itlcu.Next()) {
- if (itled.Value().IsSame(E)) {
- // deja traitee
- break;
- }
- }
- if (!itled.More()) { // on stocke l`edge et la curve2d
- Handle(Geom2d_Curve) C2dBis;
- Standard_Real f3d,l3d,f2dBis,l2dBis;
- C2d = new Geom2d_TrimmedCurve(C2d, f2d, l2d);
- Geom2dAdaptor_Curve G2dAC(C2d, f2d, l2d);
- Handle(Geom2dAdaptor_HCurve) G2dAHC = new Geom2dAdaptor_HCurve(G2dAC);
- TopoDS_Edge ERevers = E;
- ERevers.Reverse();
-// TopoDS_Edge ERevers = TopoDS::Edge(E.Reversed());
- C2dBis = BRep_Tool::CurveOnSurface(ERevers,F,f2dBis,l2dBis);
- Handle(Standard_Type) TheTypeC2dBis = C2dBis->DynamicType();
- C2dBis = new Geom2d_TrimmedCurve(C2dBis,f2dBis, l2dBis);
- Geom2dAdaptor_Curve G2dACBis(C2dBis, f2dBis, l2dBis);
- Handle(Geom2dAdaptor_HCurve) G2dAHCBis = new Geom2dAdaptor_HCurve(G2dACBis);
-
- TopLoc_Location Loc;
- Handle(Geom_Curve) C3d = BRep_Tool::Curve(E, f3d,l3d);
- if(C3d.IsNull()) {
- if(isConvert2d) {
- Curve2d = Handle(Geom2d_Curve)::DownCast(C2d->Copy());
- return Standard_True;
- }
-
- return Standard_False;
- }
- if(!newE.IsNull()) {
- C3d = BRep_Tool::Curve(newE, f3d,l3d);
- }
- GeomAdaptor_Curve G3dAC(C3d, f3d, l3d);
- Handle(GeomAdaptor_HCurve) G3dAHC = new GeomAdaptor_HCurve(G3dAC);
-
- Handle(Geom_Surface) S = BRep_Tool::Surface(F);
- Handle(Standard_Type) myT = S->DynamicType();
- if(newF.IsNull()) {
- mylcu.Append(C2dBis);
- Handle(Standard_Type) st = C2d->DynamicType();
- if ((st == STANDARD_TYPE(Geom2d_BSplineCurve)) ||
- (st == STANDARD_TYPE(Geom2d_BezierCurve))) {
- if(isConvert2d) {
- Curve2d = Handle(Geom2d_Curve)::DownCast(C2d->Copy());
- return Standard_True;
- }
- return Standard_False;
- }
- }
- else {
- S = BRep_Tool::Surface(newF);// S est une BSplineSurface : pas besoin de la trimmed
- }
- Standard_Real Uinf, Usup, Vinf, Vsup, u = 0, v = 0;
- S->Bounds(Uinf, Usup, Vinf, Vsup);
- Uinf -= 1e-9; Usup += 1e-9; Vinf -= 1e-9; Vsup += 1e-9;
- u = (Usup - Uinf)*0.1;
- v = (Vsup - Vinf)*0.1;
- if(S->IsUPeriodic()) {
- Standard_Real uperiod = S->UPeriod();
- if(uperiod < (Usup+2*u-Uinf))
- if(uperiod <= (Usup-Uinf))
- u = 0;
- else
- u = (uperiod-(Usup-Uinf))*0.5;
- }
- if(S->IsVPeriodic()) {
- Standard_Real vperiod = S->VPeriod();
- if(vperiod < (Vsup+2*v-Vinf))
- if(vperiod <= (Vsup-Vinf))
- v = 0;
- else
- v = (vperiod-(Vsup-Vinf))*0.5;
- }
- GeomAdaptor_Surface GAS(S, Uinf-u,Usup+u,Vinf-v,Vsup+v);
- Handle(GeomAdaptor_HSurface) GAHS = new GeomAdaptor_HSurface(GAS);
- myled.Append(E);
-
- ProjLib_ComputeApproxOnPolarSurface
- ProjOnCurve(G2dAHC,G2dAHCBis,G3dAHC,GAHS,Tol);
-
- if(ProjOnCurve.IsDone()) {
- Curve2d = ProjOnCurve.BSpline();
- mylcu.Append(ProjOnCurve.Curve2d());
- return Standard_True;
- }
- else {
- Curve2d = Geom2dConvert::CurveToBSplineCurve(C2d);
- mylcu.Append(C2dBis);
- return Standard_True;
- }
- }
- else { // on est au 2ieme tour
- C2d = Handle(Geom2d_Curve)::DownCast(itlcu.Value());
- Handle(Standard_Type) st = C2d->DynamicType();
- if (!(st == STANDARD_TYPE(Geom2d_BSplineCurve)) &&
- !(st == STANDARD_TYPE(Geom2d_BezierCurve))) {
- return Standard_False;
- }
- Curve2d = Geom2dConvert::CurveToBSplineCurve(C2d);
- return Standard_True;
- }
- }
- Curve2d = C2d;
- return Standard_True;
-}
-
-//=======================================================================
-//function : NewParameter
-//purpose :
-//=======================================================================
-
-Standard_Boolean BRepTools_NurbsConvertModification_21423::NewParameter
- (const TopoDS_Vertex& V,
- const TopoDS_Edge& E,
- Standard_Real& P,
- Standard_Real& Tol)
-{
- if(BRep_Tool::Degenerated(E))
- return Standard_False;
- Standard_Real f, l, param = BRep_Tool::Parameter(V,E);
- TopLoc_Location L;
-
- Handle(Geom_Curve) gc = BRep_Tool::Curve(E, L, f, l);
- if(!myMap.Contains(gc))
- return Standard_False;
-
- Handle(Geom_BSplineCurve) gcc =
- Handle(Geom_BSplineCurve)::DownCast(myMap.FindFromKey(gc));
-
- gcc = Handle(Geom_BSplineCurve)::DownCast(gcc->Transformed(L.Transformation()));
-
- GeomAdaptor_Curve ac(gcc);
- gp_Pnt pnt = BRep_Tool::Pnt(V);
-
- Extrema_LocateExtPC proj(pnt, ac, param, f, l, Tol);
- if(proj.IsDone()) {
- Standard_Real Dist2Min = proj.SquareDistance();
- if (Dist2Min < Tol*Tol) {
-// Standard_Real U_final_point,V_final_point;
- P = proj.Point().Parameter();
- return Standard_True;
- }
- }
- return Standard_False;
-}
-
-//=======================================================================
-//function : Continuity
-//purpose :
-//=======================================================================
-
-GeomAbs_Shape BRepTools_NurbsConvertModification_21423::Continuity
- (const TopoDS_Edge& E,
- const TopoDS_Face& F1,
- const TopoDS_Face& F2,
- const TopoDS_Edge&,
- const TopoDS_Face&,
- const TopoDS_Face&)
-{
- return BRep_Tool::Continuity(E,F1,F2);
-}
-
-