1 // File: ShapeUpgrade_SplitCurve.cxx
2 // Created: Thu Mar 12 12:26:05 1998
3 // Author: Pierre BARRAS
5 // gka 30.04.99 S4137: re-worked
7 #include <ShapeUpgrade_SplitCurve.ixx>
8 #include <Geom_BSplineCurve.hxx>
9 #include <Precision.hxx>
10 #include <ShapeUpgrade.hxx>
11 #include <TColStd_ListIteratorOfListOfReal.hxx>
12 #include <TColGeom_HArray1OfCurve.hxx>
13 #include <TColStd_HSequenceOfReal.hxx>
14 #include <ShapeExtend.hxx>
16 //=======================================================================
17 //function : ShapeUpgrade_SplitCurve
19 //=======================================================================
21 ShapeUpgrade_SplitCurve::ShapeUpgrade_SplitCurve() : myStatus(0)
25 //=======================================================================
28 //=======================================================================
30 void ShapeUpgrade_SplitCurve::Init(const Standard_Real First,
31 const Standard_Real Last)
33 myStatus = ShapeExtend::EncodeStatus (ShapeExtend_OK);
34 // if (ShapeUpgrade::Debug()) cout << "SplitCurve::Init"<<endl;
37 // mySplitValues.Clear();
38 mySplitValues = new TColStd_HSequenceOfReal;
39 mySplitValues->Append(First);
40 mySplitValues->Append(Last);
43 //=======================================================================
44 //function : SetSplitValues
46 //=======================================================================
48 void ShapeUpgrade_SplitCurve::SetSplitValues (const Handle(TColStd_HSequenceOfReal& SplitValues))
50 Standard_Real precision = Precision::PConfusion();
51 if(SplitValues.IsNull()) return;
52 if(SplitValues->Length()==0) return;
54 Standard_Real First = mySplitValues->Value(1),
55 Last = mySplitValues->Value(mySplitValues->Length());
56 Standard_Integer i =1;
57 Standard_Integer len = SplitValues->Length();
58 for( Standard_Integer k = 2;k <= mySplitValues->Length();k++) {
59 Last = mySplitValues->Value(k);
60 for(; i <= len; i++) {
61 if( (First + precision) >= SplitValues->Value(i)) continue;
62 if((Last - precision) <= SplitValues->Value(i)) break;
63 mySplitValues->InsertBefore(k++,SplitValues->Value(i));
70 //=======================================================================
73 //=======================================================================
75 void ShapeUpgrade_SplitCurve::Build(const Standard_Boolean /*Segment*/)
77 myStatus = ShapeExtend::EncodeStatus (ShapeExtend_OK);
81 //=======================================================================
82 //function : GlobalKnots
84 //=======================================================================
86 const Handle(TColStd_HSequenceOfReal)& ShapeUpgrade_SplitCurve::SplitValues() const
91 //=======================================================================
94 //=======================================================================
96 void ShapeUpgrade_SplitCurve::Perform(const Standard_Boolean Segment)
99 //if ( ! mySplitValues.IsNull() )
100 // SetSplitValues(mySplitValues);
104 //=======================================================================
107 //===================================================================
108 void ShapeUpgrade_SplitCurve::Compute()
110 myStatus = ShapeExtend::EncodeStatus (ShapeExtend_OK);
112 //=======================================================================
115 //=======================================================================
117 Standard_Boolean ShapeUpgrade_SplitCurve::Status(const ShapeExtend_Status status) const
119 return ShapeExtend::DecodeStatus (myStatus, status);