mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-14 13:30:48 +03:00
Integration of OCCT 6.5.0 from SVN
This commit is contained in:
bugmaster
bugmaster
823
src/BRepFill/BRepFill_NSections.cxx
Executable file
823
src/BRepFill/BRepFill_NSections.cxx
Executable file
@@ -0,0 +1,823 @@
|
||||
// File: BRepFill_NSections.cxx
|
||||
// Created: Tue Dec 29 17:01:25 1998
|
||||
// Author: Joelle CHAUVET
|
||||
// <jct@sgi64>
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#include <BRepFill_NSections.ixx>
|
||||
|
||||
#include <BRepFill.hxx>
|
||||
#include <BRepTools_WireExplorer.hxx>
|
||||
#include <BRep_Builder.hxx>
|
||||
#include <BRep_Tool.hxx>
|
||||
#include <BRepAdaptor_Curve.hxx>
|
||||
#include <BRepLProp.hxx>
|
||||
|
||||
#include <BRepLib_MakeWire.hxx>
|
||||
#include <BRepLib_MakeEdge.hxx>
|
||||
#include <TopExp.hxx>
|
||||
#include <TopoDS.hxx>
|
||||
#include <TopoDS_Vertex.hxx>
|
||||
#include <TopoDS_Wire.hxx>
|
||||
|
||||
#include <Geom_Curve.hxx>
|
||||
#include <Geom_Line.hxx>
|
||||
#include <Geom_TrimmedCurve.hxx>
|
||||
#include <Geom_BSplineCurve.hxx>
|
||||
#include <Geom_Conic.hxx>
|
||||
#include <GeomFill_UniformSection.hxx>
|
||||
#include <GeomFill_EvolvedSection.hxx>
|
||||
#include <GeomFill_HArray1OfSectionLaw.hxx>
|
||||
#include <GeomFill_NSections.hxx>
|
||||
#include <TColGeom_SequenceOfCurve.hxx>
|
||||
#include <GeomFill_SectionGenerator.hxx>
|
||||
#include <GeomFill_Line.hxx>
|
||||
#include <GeomFill_AppSurf.hxx>
|
||||
#include <GeomConvert.hxx>
|
||||
#include <GeomConvert_ApproxCurve.hxx>
|
||||
#include <GeomConvert_CompCurveToBSplineCurve.hxx>
|
||||
#include <Geom_BSplineSurface.hxx>
|
||||
#include <BSplCLib.hxx>
|
||||
|
||||
#include <TColgp_HArray1OfPnt.hxx>
|
||||
#include <TColStd_HArray1OfReal.hxx>
|
||||
#include <TColStd_HArray1OfInteger.hxx>
|
||||
#include <Geom_BezierCurve.hxx>
|
||||
#include <TopTools_Array1OfShape.hxx>
|
||||
|
||||
#include <Precision.hxx>
|
||||
|
||||
#ifdef DEB
|
||||
static Standard_Boolean Affich = 0;
|
||||
#endif
|
||||
|
||||
#ifdef DRAW
|
||||
#include <DrawTrSurf.hxx>
|
||||
#include <DBRep.hxx>
|
||||
#endif
|
||||
|
||||
//=======================================================================
|
||||
//function : totalsurf
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
|
||||
static Handle(Geom_BSplineSurface) totalsurf(const TopTools_Array2OfShape& shapes,
|
||||
const Standard_Integer NbSects,
|
||||
const Standard_Integer NbEdges,
|
||||
const TColStd_SequenceOfReal& params,
|
||||
const Standard_Boolean w1Point,
|
||||
const Standard_Boolean w2Point,
|
||||
const Standard_Boolean uClosed,
|
||||
const Standard_Boolean vClosed,
|
||||
const Standard_Real myPres3d)
|
||||
{
|
||||
Standard_Integer i,j,jdeb=1,jfin=NbSects;
|
||||
TopoDS_Edge edge;
|
||||
TopLoc_Location loc;
|
||||
Standard_Real first, last;
|
||||
TopoDS_Vertex vf,vl;
|
||||
|
||||
GeomFill_SectionGenerator section;
|
||||
Handle(Geom_BSplineSurface) surface;
|
||||
Handle(Geom_BSplineCurve) BS, BS1;
|
||||
Handle(Geom_TrimmedCurve) curvTrim;
|
||||
Handle(Geom_BSplineCurve) curvBS;
|
||||
|
||||
if (w1Point) {
|
||||
jdeb++;
|
||||
edge = TopoDS::Edge(shapes.Value(1,1));
|
||||
TopExp::Vertices(edge,vl,vf);
|
||||
TColgp_Array1OfPnt Extremities(1,2);
|
||||
Extremities(1) = BRep_Tool::Pnt(vf);
|
||||
Extremities(2) = BRep_Tool::Pnt(vl);
|
||||
TColStd_Array1OfReal Bounds(1,2);
|
||||
Bounds(1) = 0.;
|
||||
Bounds(2) = 1.;
|
||||
Standard_Real Deg = 1;
|
||||
TColStd_Array1OfInteger Mult(1,2);
|
||||
Mult(1) = (Standard_Integer) Deg+1;
|
||||
Mult(2) = (Standard_Integer) Deg+1;
|
||||
Handle(Geom_BSplineCurve) BSPoint
|
||||
= new Geom_BSplineCurve(Extremities,Bounds,Mult,(Standard_Integer ) Deg);
|
||||
section.AddCurve(BSPoint);
|
||||
}
|
||||
|
||||
if (w2Point) {
|
||||
jfin--;
|
||||
}
|
||||
|
||||
for (j=jdeb; j<=jfin; j++) {
|
||||
|
||||
// cas des sections bouclantes
|
||||
if (j==jfin && vClosed) {
|
||||
section.AddCurve(BS1);
|
||||
}
|
||||
|
||||
else {
|
||||
// read the first edge to initialise CompBS;
|
||||
edge = TopoDS::Edge(shapes.Value(1,j));
|
||||
if (BRep_Tool::Degenerated(edge)) {
|
||||
// edge degeneree : construction d'une courbe ponctuelle
|
||||
TopExp::Vertices(edge,vl,vf);
|
||||
TColgp_Array1OfPnt Extremities(1,2);
|
||||
Extremities(1) = BRep_Tool::Pnt(vf);
|
||||
Extremities(2) = BRep_Tool::Pnt(vl);
|
||||
Handle(Geom_Curve) curv = new Geom_BezierCurve(Extremities);
|
||||
curvTrim = new Geom_TrimmedCurve(curv,
|
||||
curv->FirstParameter(),
|
||||
curv->LastParameter());
|
||||
}
|
||||
else {
|
||||
// recuperation de la courbe sur l'edge
|
||||
Handle(Geom_Curve) curv = BRep_Tool::Curve(edge, loc, first, last);
|
||||
curvTrim = new Geom_TrimmedCurve(curv, first, last);
|
||||
curvTrim->Transform(loc.Transformation());
|
||||
}
|
||||
if (edge.Orientation() == TopAbs_REVERSED) {
|
||||
curvTrim->Reverse();
|
||||
}
|
||||
|
||||
// transformation en BSpline reparametree sur [i-1,i]
|
||||
curvBS = Handle(Geom_BSplineCurve)::DownCast(curvTrim);
|
||||
if (curvBS.IsNull()) {
|
||||
Handle(Geom_Curve) theCurve = curvTrim->BasisCurve();
|
||||
if (theCurve->IsKind(STANDARD_TYPE(Geom_Conic)))
|
||||
{
|
||||
GeomConvert_ApproxCurve appr(curvTrim, Precision::Confusion(), GeomAbs_C1, 16, 14);
|
||||
if (appr.HasResult())
|
||||
curvBS = appr.Curve();
|
||||
}
|
||||
if (curvBS.IsNull())
|
||||
curvBS = GeomConvert::CurveToBSplineCurve(curvTrim);
|
||||
}
|
||||
TColStd_Array1OfReal BSK(1,curvBS->NbKnots());
|
||||
curvBS->Knots(BSK);
|
||||
BSplCLib::Reparametrize(0.,1.,BSK);
|
||||
curvBS->SetKnots(BSK);
|
||||
|
||||
// initialisation
|
||||
GeomConvert_CompCurveToBSplineCurve CompBS(curvBS);
|
||||
|
||||
for (i=2; i<=NbEdges; i++) {
|
||||
// read the edge
|
||||
edge = TopoDS::Edge(shapes.Value(i,j));
|
||||
if (BRep_Tool::Degenerated(edge)) {
|
||||
// edge degeneree : construction d'une courbe ponctuelle
|
||||
TopExp::Vertices(edge,vl,vf);
|
||||
TColgp_Array1OfPnt Extremities(1,2);
|
||||
Extremities(1) = BRep_Tool::Pnt(vf);
|
||||
Extremities(2) = BRep_Tool::Pnt(vl);
|
||||
Handle(Geom_Curve) curv = new Geom_BezierCurve(Extremities);
|
||||
curvTrim = new Geom_TrimmedCurve(curv,
|
||||
curv->FirstParameter(),
|
||||
curv->LastParameter());
|
||||
}
|
||||
else {
|
||||
// recuperation de la courbe sur l'edge
|
||||
Handle(Geom_Curve) curv = BRep_Tool::Curve(edge, loc, first, last);
|
||||
curvTrim = new Geom_TrimmedCurve(curv, first, last);
|
||||
curvTrim->Transform(loc.Transformation());
|
||||
}
|
||||
if (edge.Orientation() == TopAbs_REVERSED) {
|
||||
curvTrim->Reverse();
|
||||
}
|
||||
|
||||
// transformation en BSpline reparametree sur [i-1,i]
|
||||
curvBS = Handle(Geom_BSplineCurve)::DownCast(curvTrim);
|
||||
if (curvBS.IsNull()) {
|
||||
Handle(Geom_Curve) theCurve = curvTrim->BasisCurve();
|
||||
if (theCurve->IsKind(STANDARD_TYPE(Geom_Conic)))
|
||||
{
|
||||
GeomConvert_ApproxCurve appr(curvTrim, Precision::Confusion(), GeomAbs_C1, 16, 14);
|
||||
if (appr.HasResult())
|
||||
curvBS = appr.Curve();
|
||||
}
|
||||
if (curvBS.IsNull())
|
||||
curvBS = GeomConvert::CurveToBSplineCurve(curvTrim);
|
||||
}
|
||||
TColStd_Array1OfReal BSK(1,curvBS->NbKnots());
|
||||
curvBS->Knots(BSK);
|
||||
BSplCLib::Reparametrize(i-1,i,BSK);
|
||||
curvBS->SetKnots(BSK);
|
||||
|
||||
// concatenation
|
||||
TopoDS_Vertex ComV;
|
||||
Standard_Real epsV;
|
||||
Standard_Boolean Bof =
|
||||
TopExp::CommonVertex(TopoDS::Edge(shapes.Value(i-1,j)), edge, ComV);
|
||||
if (Bof) epsV = BRep_Tool::Tolerance(ComV);
|
||||
else epsV = Precision::Confusion();
|
||||
Bof = CompBS.Add(curvBS, epsV, Standard_True, Standard_False, 1);
|
||||
if (!Bof) Bof = CompBS.Add(curvBS, 200*epsV,
|
||||
Standard_True, Standard_False, 1);
|
||||
}
|
||||
|
||||
// recuperation de la section finale
|
||||
BS = CompBS.BSplineCurve();
|
||||
section.AddCurve(BS);
|
||||
|
||||
// cas des sections bouclantes
|
||||
if (j==jdeb && vClosed) {
|
||||
BS1 = BS;
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
if (w2Point) {
|
||||
edge = TopoDS::Edge(shapes.Value(NbEdges,NbSects));
|
||||
TopExp::Vertices(edge,vl,vf);
|
||||
TColgp_Array1OfPnt Extremities(1,2);
|
||||
Extremities(1) = BRep_Tool::Pnt(vf);
|
||||
Extremities(2) = BRep_Tool::Pnt(vl);
|
||||
TColStd_Array1OfReal Bounds(1,2);
|
||||
Bounds(1) = 0.;
|
||||
Bounds(2) = 1.;
|
||||
Standard_Real Deg = 1;
|
||||
TColStd_Array1OfInteger Mult(1,2);
|
||||
Mult(1) = (Standard_Integer) Deg+1;
|
||||
Mult(2) = (Standard_Integer) Deg+1;
|
||||
Handle(Geom_BSplineCurve) BSPoint
|
||||
= new Geom_BSplineCurve(Extremities,Bounds,Mult,(Standard_Integer ) Deg);
|
||||
section.AddCurve(BSPoint);
|
||||
}
|
||||
|
||||
Handle(TColStd_HArray1OfReal) HPar
|
||||
= new TColStd_HArray1OfReal(1,params.Length());
|
||||
for (i=1; i<=params.Length(); i++) {
|
||||
HPar->SetValue(i,params(i));
|
||||
}
|
||||
section.SetParam(HPar);
|
||||
section.Perform(Precision::PConfusion());
|
||||
Handle(GeomFill_Line) line = new GeomFill_Line(NbSects);
|
||||
Standard_Integer nbIt = 0, degmin = 2, degmax = 6;
|
||||
Standard_Boolean knownP = Standard_True;
|
||||
GeomFill_AppSurf anApprox(degmin, degmax, myPres3d, myPres3d, nbIt, knownP);
|
||||
Standard_Boolean SpApprox = Standard_True;
|
||||
anApprox.Perform(line, section, SpApprox);
|
||||
Standard_Boolean uperiodic = uClosed;
|
||||
Standard_Boolean vperiodic = vClosed;
|
||||
Standard_Integer nup = anApprox.SurfPoles().ColLength(),
|
||||
nvp = anApprox.SurfPoles().RowLength();
|
||||
TColStd_Array1OfInteger Umults(1,anApprox.SurfUKnots().Length());
|
||||
Umults = anApprox.SurfUMults();
|
||||
TColStd_Array1OfInteger Vmults(1,anApprox.SurfVKnots().Length());
|
||||
Vmults = anApprox.SurfVMults();
|
||||
|
||||
if (uperiodic) {
|
||||
Standard_Integer nbuk = anApprox.SurfUKnots().Length();
|
||||
Umults(1) --;
|
||||
Umults(nbuk) --;
|
||||
nup --;
|
||||
}
|
||||
|
||||
if (vperiodic) {
|
||||
Standard_Integer nbvk = anApprox.SurfVKnots().Length();
|
||||
Vmults(1) --;
|
||||
Vmults(nbvk) --;
|
||||
nvp --;
|
||||
}
|
||||
|
||||
TColgp_Array2OfPnt poles (1, nup, 1, nvp);
|
||||
TColStd_Array2OfReal weights(1, nup, 1, nvp);
|
||||
for (j = 1; j <= nvp; j++) {
|
||||
for (i = 1; i <= nup; i++) {
|
||||
poles(i, j) = anApprox.SurfPoles()(i,j);
|
||||
weights(i, j) = anApprox.SurfWeights()(i,j);
|
||||
}
|
||||
}
|
||||
|
||||
// To create non-rational surface if possible
|
||||
Standard_Real TolEps = 1.e-13;
|
||||
Standard_Boolean Vrational = Standard_False, Urational = Standard_False;
|
||||
for (j = 1; j <= weights.UpperCol(); j++)
|
||||
if (!Vrational)
|
||||
for (i = 1; i <= weights.UpperRow()-1; i++)
|
||||
{
|
||||
//Standard_Real signeddelta = weights(i,j) - weights(i+1,j);
|
||||
Standard_Real delta = Abs( weights(i,j) - weights(i+1,j) );
|
||||
// Standard_Real eps = Epsilon( Abs(weights(i,j)) );
|
||||
if (delta > TolEps/* || delta > 3.*eps*/)
|
||||
{
|
||||
Vrational = Standard_True;
|
||||
break;
|
||||
}
|
||||
}
|
||||
for (i = 1; i <= weights.UpperRow(); i++)
|
||||
if (!Urational)
|
||||
for (j = 1; j <= weights.UpperCol()-1; j++)
|
||||
{
|
||||
//Standard_Real signeddelta = weights(i,j) - weights(i,j+1);
|
||||
Standard_Real delta = Abs( weights(i,j) - weights(i,j+1) );
|
||||
// Standard_Real eps = Epsilon( Abs(weights(i,j)) );
|
||||
if (delta > TolEps/* || delta > 3.*eps*/)
|
||||
{
|
||||
Urational = Standard_True;
|
||||
break;
|
||||
}
|
||||
}
|
||||
if (!Vrational && !Urational)
|
||||
{
|
||||
Standard_Real theWeight = weights(1,1);
|
||||
for (i = 1; i <= weights.UpperRow(); i++)
|
||||
for (j = 1; j <= weights.UpperCol(); j++)
|
||||
weights(i,j) = theWeight;
|
||||
}
|
||||
|
||||
surface =
|
||||
new Geom_BSplineSurface(poles, weights,
|
||||
anApprox.SurfUKnots(), anApprox.SurfVKnots(),
|
||||
Umults, Vmults,
|
||||
anApprox.UDegree(), anApprox.VDegree(),
|
||||
uperiodic, vperiodic);
|
||||
return surface;
|
||||
|
||||
}
|
||||
|
||||
|
||||
//=======================================================================
|
||||
//function : Create
|
||||
//purpose : WSeq
|
||||
//=======================================================================
|
||||
|
||||
BRepFill_NSections::BRepFill_NSections(const TopTools_SequenceOfShape& S,
|
||||
const Standard_Boolean Build)
|
||||
|
||||
{
|
||||
myShapes = S;
|
||||
VFirst = 0.;
|
||||
VLast = 1.;
|
||||
TColStd_SequenceOfReal par;
|
||||
par.Clear();
|
||||
for (Standard_Integer i=1;i<=S.Length();i++) {
|
||||
par.Append(i-1);
|
||||
}
|
||||
myParams = par;
|
||||
Init(par,Build);
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : Create
|
||||
//purpose : WSeq + Param
|
||||
//=======================================================================
|
||||
|
||||
BRepFill_NSections::BRepFill_NSections(const TopTools_SequenceOfShape& S,
|
||||
const TColStd_SequenceOfReal & P,
|
||||
const Standard_Real VF,
|
||||
const Standard_Real VL,
|
||||
const Standard_Boolean Build)
|
||||
|
||||
{
|
||||
#ifdef DEB
|
||||
if ( Affich) {
|
||||
#ifdef DRAW
|
||||
Standard_Integer NBSECT = 0;
|
||||
for (Standard_Integer i=1;i<=S.Length();i++) {
|
||||
NBSECT++;
|
||||
char name[256];
|
||||
sprintf(name,"WIRE_%d",NBSECT);
|
||||
DBRep::Set(name,TopoDS::Wire(S.Value(i)));
|
||||
}
|
||||
#endif
|
||||
}
|
||||
#endif
|
||||
Standard_Boolean ok = Standard_True;
|
||||
for (Standard_Integer iseq=1;iseq<P.Length();iseq++) {
|
||||
ok = ok && (P.Value(iseq)<P.Value(iseq+1));
|
||||
}
|
||||
if (ok) {
|
||||
myParams = P;
|
||||
myShapes = S;
|
||||
VFirst = VF;
|
||||
VLast = VL;
|
||||
Init(P,Build);
|
||||
}
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : Init
|
||||
//purpose : On cree une table de GeomFill_SectionLaw
|
||||
//=======================================================================
|
||||
void BRepFill_NSections::Init(const TColStd_SequenceOfReal & P,
|
||||
const Standard_Boolean Build)
|
||||
{
|
||||
BRepTools_WireExplorer wexp;
|
||||
// Class BRep_Tool without fields and without Constructor :
|
||||
// BRep_Tool B;
|
||||
TopoDS_Edge E;
|
||||
Standard_Integer ii, NbEdge, jj, NbSects = P.Length();
|
||||
Standard_Integer ideb = 1, ifin = NbSects;
|
||||
Standard_Boolean wClosed, w1Point = Standard_True,
|
||||
w2Point = Standard_True;
|
||||
Standard_Real First, Last;
|
||||
TopoDS_Wire W;
|
||||
|
||||
// On regarde si les wires debut et fin sont ponctuels
|
||||
W = TopoDS::Wire(myShapes(1));
|
||||
for (wexp.Init(W); wexp.More(); wexp.Next())
|
||||
// w1Point = w1Point && B.Degenerated(wexp.Current());
|
||||
w1Point = w1Point && BRep_Tool::Degenerated(wexp.Current());
|
||||
if (w1Point) ideb++;
|
||||
W = TopoDS::Wire(myShapes(NbSects));
|
||||
for (wexp.Init(W); wexp.More(); wexp.Next())
|
||||
// w2Point = w2Point && B.Degenerated(wexp.Current());
|
||||
w2Point = w2Point && BRep_Tool::Degenerated(wexp.Current());
|
||||
if (w2Point) ifin--;
|
||||
|
||||
// On regarde si les wires debut et fin sont identiques
|
||||
vclosed = myShapes(1).IsSame(myShapes(NbSects));
|
||||
|
||||
// On compte le nombre d'aretes non degenerees
|
||||
W = TopoDS::Wire(myShapes(ideb));
|
||||
for (NbEdge=0, wexp.Init(W); wexp.More(); wexp.Next())
|
||||
// if (! B.Degenerated(wexp.Current())) NbEdge++;
|
||||
if (! BRep_Tool::Degenerated(wexp.Current())) NbEdge++;
|
||||
|
||||
|
||||
myEdges = new (TopTools_HArray2OfShape) (1, NbEdge, 1, NbSects);
|
||||
|
||||
// On Remplit les tables
|
||||
uclosed = Standard_True;
|
||||
for (jj=ideb;jj<=ifin;jj++){
|
||||
|
||||
W = TopoDS::Wire(myShapes(jj));
|
||||
|
||||
for (ii=1, wexp.Init(W); ii<=NbEdge ; wexp.Next(), ii++) {
|
||||
E = wexp.Current();
|
||||
|
||||
// if ( ! B.Degenerated(E)) {
|
||||
if ( ! BRep_Tool::Degenerated(E)) {
|
||||
myEdges->SetValue(ii,jj, E);
|
||||
}
|
||||
}
|
||||
|
||||
// La loi est elle fermee en U ?
|
||||
|
||||
wClosed = W.Closed();
|
||||
if (!wClosed) {
|
||||
// le flag n'etant pas tres sur, on fait une verif
|
||||
TopoDS_Edge Edge1, Edge2;
|
||||
TopoDS_Vertex V1,V2;
|
||||
Edge1 = TopoDS::Edge (myEdges->Value(NbEdge,jj));
|
||||
Edge2 = TopoDS::Edge (myEdges->Value(1,jj));
|
||||
|
||||
if ( Edge1.Orientation() == TopAbs_REVERSED) {
|
||||
V1 = TopExp::FirstVertex(Edge1);
|
||||
}
|
||||
else {
|
||||
V1 = TopExp::LastVertex(Edge1);
|
||||
}
|
||||
if ( Edge2.Orientation() == TopAbs_REVERSED) {
|
||||
V2 = TopExp::LastVertex(Edge2);
|
||||
}
|
||||
else {
|
||||
V2 = TopExp::FirstVertex(Edge2);
|
||||
}
|
||||
if (V1.IsSame(V2)) {
|
||||
wClosed = Standard_True;
|
||||
}
|
||||
else {
|
||||
BRepAdaptor_Curve Curve1(Edge1);
|
||||
BRepAdaptor_Curve Curve2(Edge2);
|
||||
Standard_Real U1 = BRep_Tool::Parameter(V1,Edge1);
|
||||
Standard_Real U2 = BRep_Tool::Parameter(V2,Edge2);
|
||||
Standard_Real Eps = BRep_Tool::Tolerance(V2) +
|
||||
BRep_Tool::Tolerance(V1);
|
||||
|
||||
wClosed = Curve1.Value(U1).IsEqual(Curve2.Value(U2), Eps);
|
||||
}
|
||||
}
|
||||
if (!wClosed) uclosed = Standard_False;
|
||||
}
|
||||
|
||||
// sections en bout ponctuelles
|
||||
if (w1Point) {
|
||||
W = TopoDS::Wire(myShapes(1));
|
||||
wexp.Init(W);
|
||||
E = wexp.Current();
|
||||
for (ii=1; ii<=NbEdge ; ii++) {
|
||||
myEdges->SetValue(ii, 1, E);
|
||||
}
|
||||
}
|
||||
|
||||
if (w2Point) {
|
||||
W = TopoDS::Wire(myShapes(NbSects));
|
||||
wexp.Init(W);
|
||||
E = wexp.Current();
|
||||
for (ii=1; ii<=NbEdge ; ii++) {
|
||||
myEdges->SetValue(ii, NbSects, E);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
myLaws = new (GeomFill_HArray1OfSectionLaw) (1, NbEdge);
|
||||
|
||||
Standard_Real tol = Precision::Confusion();
|
||||
mySurface = totalsurf(myEdges->Array2(),myShapes.Length(),NbEdge,
|
||||
myParams,w1Point,w2Point,uclosed,vclosed,tol);
|
||||
|
||||
// On augmente le degre pour que le positionnement D2
|
||||
// sur les GeomFill_NSections soit correct
|
||||
// cf commentaires dans GeomFill_NSections
|
||||
if (mySurface->VDegree()<2) {
|
||||
mySurface->IncreaseDegree(mySurface->UDegree(),2);
|
||||
}
|
||||
#ifdef DRAW
|
||||
if ( Affich) {
|
||||
char* name = new char[100];
|
||||
sprintf(name,"Ref_Surf");
|
||||
DrawTrSurf::Set(name,mySurface);
|
||||
}
|
||||
#endif
|
||||
|
||||
// On Remplit les tables
|
||||
if (Build) {
|
||||
for (ii=1; ii<=NbEdge ; ii++) {
|
||||
TColGeom_SequenceOfCurve NC;
|
||||
NC.Clear();
|
||||
for (jj=1;jj<=NbSects;jj++) {
|
||||
E = TopoDS::Edge (myEdges->Value(ii,jj));
|
||||
Handle(Geom_Curve) C;
|
||||
// if (B.Degenerated(E)) {
|
||||
if (BRep_Tool::Degenerated(E)) {
|
||||
TopoDS_Vertex vf,vl;
|
||||
TopExp::Vertices(E,vl,vf);
|
||||
TColgp_Array1OfPnt Extremities(1,2);
|
||||
Extremities(1) = BRep_Tool::Pnt(vf);
|
||||
Extremities(2) = BRep_Tool::Pnt(vl);
|
||||
TColStd_Array1OfReal Bounds(1,2);
|
||||
Bounds(1) = 0.;
|
||||
Bounds(2) = 1.;
|
||||
TColStd_Array1OfInteger Mult(1,2);
|
||||
Mult(1) = 2;
|
||||
Mult(2) = 2;
|
||||
Handle(Geom_BSplineCurve) BSPoint
|
||||
= new Geom_BSplineCurve(Extremities,Bounds,Mult,1);
|
||||
C = BSPoint;
|
||||
}
|
||||
else {
|
||||
C = BRep_Tool::Curve(E,First,Last);
|
||||
|
||||
if (E.Orientation() == TopAbs_REVERSED) {
|
||||
Standard_Real aux;
|
||||
Handle(Geom_Curve) CBis;
|
||||
CBis = C->Reversed(); // Pour eviter de deteriorer la topologie
|
||||
aux = C->ReversedParameter(First);
|
||||
First = C->ReversedParameter(Last);
|
||||
Last = aux;
|
||||
C = CBis;
|
||||
}
|
||||
if ((ii>1) || (!E.Closed()) ) { // On trimme C
|
||||
Handle(Geom_TrimmedCurve) TC =
|
||||
new (Geom_TrimmedCurve) (C,First, Last);
|
||||
C = TC;
|
||||
}
|
||||
// sinon On garde l'integrite de la courbe
|
||||
}
|
||||
NC.Append(C);
|
||||
}
|
||||
|
||||
Standard_Real Ufirst = ii-1;
|
||||
Standard_Real Ulast = ii;
|
||||
myLaws->ChangeValue(ii) = new (GeomFill_NSections)(NC,myParams,
|
||||
Ufirst,Ulast,
|
||||
VFirst,VLast,
|
||||
mySurface);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
//=======================================================================
|
||||
//function : IsVertex
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
Standard_Boolean BRepFill_NSections::IsVertex() const
|
||||
{
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : IsConstant
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
Standard_Boolean BRepFill_NSections::IsConstant() const
|
||||
{
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : Vertex
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
TopoDS_Vertex
|
||||
BRepFill_NSections::Vertex(const Standard_Integer Index,
|
||||
const Standard_Real Param) const
|
||||
{
|
||||
BRep_Builder B;
|
||||
TopoDS_Vertex V;
|
||||
B.MakeVertex(V);
|
||||
gp_Pnt P;
|
||||
|
||||
if (Index <= myEdges->ColLength()) {
|
||||
Handle(Geom_BSplineCurve) Curve
|
||||
= Handle(Geom_BSplineCurve)::DownCast(myLaws->Value(Index)->
|
||||
BSplineSurface()->VIso(Param));
|
||||
Standard_Real first = Curve ->FirstParameter();
|
||||
Curve->D0(first, P);
|
||||
B.UpdateVertex(V, P, Precision::Confusion());
|
||||
}
|
||||
else if (Index == myEdges->ColLength()+1) {
|
||||
Handle(Geom_BSplineCurve) Curve
|
||||
= Handle(Geom_BSplineCurve)::DownCast(myLaws->Value(Index-1)->
|
||||
BSplineSurface()->VIso(Param));
|
||||
Standard_Real last = Curve ->LastParameter();
|
||||
Curve->D0(last, P);
|
||||
B.UpdateVertex(V, P, Precision::Confusion());
|
||||
}
|
||||
|
||||
return V;
|
||||
}
|
||||
|
||||
|
||||
///=======================================================================
|
||||
//function : VertexTol
|
||||
//purpose : Evalue le trou entre 2 edges de la section
|
||||
//=======================================================================
|
||||
Standard_Real BRepFill_NSections::VertexTol(const Standard_Integer Index,
|
||||
const Standard_Real Param) const
|
||||
{
|
||||
Standard_Real Tol = Precision::Confusion();
|
||||
Standard_Integer I1, I2;
|
||||
if ( (Index==0) || (Index==myEdges->ColLength()) ) {
|
||||
if (!uclosed) return Tol; //Le moins faux possible
|
||||
I1 = myEdges->ColLength();
|
||||
I2 = 1;
|
||||
}
|
||||
else {
|
||||
I1 = Index;
|
||||
I2 = I1 +1;
|
||||
}
|
||||
|
||||
Handle(GeomFill_SectionLaw) Loi;
|
||||
Standard_Integer NbPoles, NbKnots, Degree;
|
||||
Handle(TColgp_HArray1OfPnt) Poles;
|
||||
Handle(TColStd_HArray1OfReal) Knots, Weigth;
|
||||
Handle(TColStd_HArray1OfInteger) Mults;
|
||||
Handle(Geom_BSplineCurve) BS;
|
||||
gp_Pnt PFirst;
|
||||
|
||||
Loi = myLaws->Value(I1);
|
||||
Loi->SectionShape( NbPoles, NbKnots, Degree);
|
||||
Poles = new (TColgp_HArray1OfPnt) (1, NbPoles);
|
||||
Weigth = new (TColStd_HArray1OfReal) (1, NbPoles);
|
||||
Loi->D0(Param, Poles->ChangeArray1(), Weigth->ChangeArray1());
|
||||
Knots = new (TColStd_HArray1OfReal) (1, NbKnots);
|
||||
Loi->Knots(Knots->ChangeArray1());
|
||||
Mults = new (TColStd_HArray1OfInteger) (1, NbKnots);
|
||||
Loi->Mults(Mults->ChangeArray1());
|
||||
BS = new (Geom_BSplineCurve) (Poles->Array1(),
|
||||
Weigth->Array1(),
|
||||
Knots->Array1(),
|
||||
Mults->Array1(),
|
||||
Degree,
|
||||
Loi->IsUPeriodic());
|
||||
PFirst = BS->Value( Knots->Value(Knots->Length()) );
|
||||
|
||||
Loi = myLaws->Value(I2);
|
||||
Loi->SectionShape( NbPoles, NbKnots, Degree);
|
||||
Poles = new (TColgp_HArray1OfPnt) (1, NbPoles);
|
||||
Weigth = new (TColStd_HArray1OfReal) (1, NbPoles);
|
||||
Loi->D0(Param, Poles->ChangeArray1(), Weigth->ChangeArray1());
|
||||
Knots = new (TColStd_HArray1OfReal) (1, NbKnots);
|
||||
Loi->Knots(Knots->ChangeArray1());
|
||||
Mults = new (TColStd_HArray1OfInteger) (1, NbKnots);
|
||||
Loi->Mults(Mults->ChangeArray1());
|
||||
BS = new (Geom_BSplineCurve) (Poles->Array1(),
|
||||
Weigth->Array1(),
|
||||
Knots->Array1(),
|
||||
Mults->Array1(),
|
||||
Degree,
|
||||
Loi->IsUPeriodic());
|
||||
Tol += PFirst.Distance(BS->Value( Knots->Value(1)));
|
||||
return Tol;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : ConcatenedLaw
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
|
||||
Handle(GeomFill_SectionLaw) BRepFill_NSections::ConcatenedLaw() const
|
||||
{
|
||||
Handle(GeomFill_SectionLaw) Law;
|
||||
if (myLaws->Length() == 1)
|
||||
return myLaws->Value(1);
|
||||
else {
|
||||
Standard_Real Ufirst, Ulast, Vfirst, Vlast;
|
||||
mySurface->Bounds(Ufirst, Ulast, Vfirst, Vlast);
|
||||
TColGeom_SequenceOfCurve NCompo;
|
||||
NCompo.Clear();
|
||||
for (Standard_Integer jj=1; jj<=myShapes.Length(); jj++) {
|
||||
NCompo.Append(mySurface->VIso(myParams(jj)));
|
||||
}
|
||||
Law = new (GeomFill_NSections)(NCompo, myParams,
|
||||
Ufirst, Ulast,
|
||||
Vfirst, Vlast,
|
||||
mySurface);
|
||||
}
|
||||
return Law;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : Continuity
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
GeomAbs_Shape BRepFill_NSections::Continuity(const Standard_Integer Index,
|
||||
const Standard_Real TolAngular) const
|
||||
{
|
||||
|
||||
Standard_Integer jj;
|
||||
GeomAbs_Shape cont_jj;
|
||||
#ifndef DEB
|
||||
GeomAbs_Shape cont = GeomAbs_C0;
|
||||
#else
|
||||
GeomAbs_Shape cont;
|
||||
#endif
|
||||
|
||||
for (jj=1; jj<=myShapes.Length(); jj++) {
|
||||
|
||||
TopoDS_Edge Edge1, Edge2;
|
||||
if ( (Index==0) || (Index==myEdges->ColLength()) ) {
|
||||
if (!uclosed) return GeomAbs_C0; //Le moins faux possible
|
||||
|
||||
Edge1 = TopoDS::Edge (myEdges->Value(myEdges->ColLength(),jj));
|
||||
Edge2 = TopoDS::Edge (myEdges->Value(1,jj));
|
||||
}
|
||||
else {
|
||||
Edge1 = TopoDS::Edge (myEdges->Value(Index,jj));
|
||||
Edge2 = TopoDS::Edge (myEdges->Value(Index+1,jj));
|
||||
}
|
||||
|
||||
TopoDS_Vertex V1,V2;
|
||||
if ( Edge1.Orientation() == TopAbs_REVERSED) {
|
||||
V1 = TopExp::FirstVertex(Edge1);
|
||||
}
|
||||
else {
|
||||
V1 = TopExp::LastVertex(Edge1);
|
||||
}
|
||||
if ( Edge2.Orientation() == TopAbs_REVERSED) {
|
||||
V2 = TopExp::LastVertex(Edge2);
|
||||
}
|
||||
else {
|
||||
V2 = TopExp::FirstVertex(Edge2);
|
||||
}
|
||||
|
||||
if (BRep_Tool::Degenerated(Edge1) || BRep_Tool::Degenerated(Edge2))
|
||||
cont_jj = GeomAbs_CN;
|
||||
else
|
||||
{
|
||||
Standard_Real U1 = BRep_Tool::Parameter(V1,Edge1);
|
||||
Standard_Real U2 = BRep_Tool::Parameter(V2,Edge2);
|
||||
BRepAdaptor_Curve Curve1(Edge1);
|
||||
BRepAdaptor_Curve Curve2(Edge2);
|
||||
Standard_Real Eps = BRep_Tool::Tolerance(V2) +
|
||||
BRep_Tool::Tolerance(V1);
|
||||
cont_jj = BRepLProp::Continuity(Curve1,Curve2,U1,U2, Eps, TolAngular);
|
||||
}
|
||||
|
||||
if (jj==1) cont = cont_jj;
|
||||
if (cont>cont_jj) cont = cont_jj;
|
||||
|
||||
}
|
||||
|
||||
return cont;
|
||||
}
|
||||
|
||||
//=======================================================================
|
||||
//function : D0
|
||||
//purpose :
|
||||
//=======================================================================
|
||||
void BRepFill_NSections::D0(const Standard_Real V, TopoDS_Shape& S)
|
||||
{
|
||||
TopoDS_Wire W;
|
||||
BRepLib_MakeWire MW;
|
||||
Standard_Integer ii, NbEdge = myLaws->Length();
|
||||
for (ii=1; ii<=NbEdge ; ii++) {
|
||||
Handle(Geom_BSplineCurve) Curve
|
||||
= Handle(Geom_BSplineCurve)::DownCast(myLaws->Value(ii)->BSplineSurface()->VIso(V));
|
||||
Standard_Real first = Curve ->FirstParameter(),
|
||||
last = Curve ->LastParameter();
|
||||
TopoDS_Edge E = BRepLib_MakeEdge(Curve,first,last);
|
||||
MW.Add(E);
|
||||
}
|
||||
TopAbs_Orientation Orien = TopAbs_FORWARD;
|
||||
TopoDS_Shape aLocalShape = MW.Wire().Oriented(Orien);
|
||||
S = TopoDS::Wire(aLocalShape);
|
||||
// S = TopoDS::Wire(MW.Wire().Oriented(Orien));
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user