1 // Copyright (c) 1995-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
4 // This file is part of Open CASCADE Technology software library.
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
16 #include <AppParCurves_MultiPoint.hxx>
18 #include <gp_Pnt2d.hxx>
19 #include <Standard_Transient.hxx>
20 #include <Standard_DimensionError.hxx>
21 #include <Standard_OutOfRange.hxx>
22 #include <TColgp_HArray1OfPnt.hxx>
23 #include <TColgp_HArray1OfPnt2d.hxx>
25 #define tabPoint Handle(TColgp_HArray1OfPnt)::DownCast (ttabPoint)
26 #define tabPoint2d Handle(TColgp_HArray1OfPnt2d)::DownCast (ttabPoint2d)
28 AppParCurves_MultiPoint::AppParCurves_MultiPoint() {}
31 AppParCurves_MultiPoint::AppParCurves_MultiPoint (const Standard_Integer NbPoles,
32 const Standard_Integer NbPoles2d)
37 Handle(TColgp_HArray1OfPnt) tab3d =
38 new TColgp_HArray1OfPnt(1, NbPoles);
42 Handle(TColgp_HArray1OfPnt2d) tab2d =
43 new TColgp_HArray1OfPnt2d(1, NbPoles2d);
50 AppParCurves_MultiPoint::AppParCurves_MultiPoint(const TColgp_Array1OfPnt& tabP)
54 Handle(TColgp_HArray1OfPnt) tab3d =
55 new TColgp_HArray1OfPnt(1, nbP);
57 Standard_Integer Lower = tabP.Lower();
58 TColgp_Array1OfPnt& P3d = tabPoint->ChangeArray1();
59 for (Standard_Integer i = 1; i <= tabP.Length(); i++) {
60 P3d.SetValue(i, tabP.Value(Lower+i-1));
66 AppParCurves_MultiPoint::AppParCurves_MultiPoint(const TColgp_Array1OfPnt2d& tabP2d)
69 nbP2d = tabP2d.Length();
70 Handle(TColgp_HArray1OfPnt2d) tab2d =
71 new TColgp_HArray1OfPnt2d(1, nbP2d);
73 Standard_Integer Lower = tabP2d.Lower();
74 TColgp_Array1OfPnt2d& P2d = tabPoint2d->ChangeArray1();
75 for (Standard_Integer i = 1; i <= nbP2d; i++) {
76 P2d.SetValue(i, tabP2d.Value(Lower+i-1));
81 AppParCurves_MultiPoint::AppParCurves_MultiPoint(const TColgp_Array1OfPnt& tabP,
82 const TColgp_Array1OfPnt2d& tabP2d)
85 nbP2d = tabP2d.Length();
86 Handle(TColgp_HArray1OfPnt) t3d =
87 new TColgp_HArray1OfPnt(1, nbP);
90 Handle(TColgp_HArray1OfPnt2d) t2d =
91 new TColgp_HArray1OfPnt2d(1, nbP2d);
94 TColgp_Array1OfPnt& P3d = tabPoint->ChangeArray1();
95 Standard_Integer i, Lower = tabP.Lower();
96 for (i = 1; i <= nbP; i++) {
97 P3d.SetValue(i, tabP.Value(Lower+i-1));
99 Lower = tabP2d.Lower();
100 TColgp_Array1OfPnt2d& P2d = tabPoint2d->ChangeArray1();
101 for (i = 1; i <= nbP2d; i++) {
102 P2d.SetValue(i, tabP2d.Value(Lower+i-1));
106 AppParCurves_MultiPoint::~AppParCurves_MultiPoint()
110 void AppParCurves_MultiPoint::Transform(const Standard_Integer CuIndex,
111 const Standard_Real x,
112 const Standard_Real dx,
113 const Standard_Real y,
114 const Standard_Real dy,
115 const Standard_Real z,
116 const Standard_Real dz)
118 if (Dimension(CuIndex) != 3) throw Standard_OutOfRange();
122 newP.SetCoord(x + P.X()*dx, y + P.Y()*dy, z + P.Z()*dz);
123 tabPoint->SetValue(CuIndex, newP);
127 void AppParCurves_MultiPoint::Transform2d(const Standard_Integer CuIndex,
128 const Standard_Real x,
129 const Standard_Real dx,
130 const Standard_Real y,
131 const Standard_Real dy)
133 if (Dimension(CuIndex) != 2) throw Standard_OutOfRange();
136 P = Point2d(CuIndex);
137 newP.SetCoord(x + P.X()*dx, y + P.Y()*dy);
138 SetPoint2d(CuIndex, newP);
141 void AppParCurves_MultiPoint::SetPoint (const Standard_Integer Index,
142 const gp_Pnt& Point) {
143 Standard_OutOfRange_Raise_if ((Index <= 0) || (Index > nbP),
144 "AppParCurves_MultiPoint::SetPoint() - wrong index");
145 tabPoint->SetValue(Index, Point);
148 const gp_Pnt& AppParCurves_MultiPoint::Point (const Standard_Integer Index) const
150 Standard_OutOfRange_Raise_if ((Index <= 0) || (Index > nbP),
151 "AppParCurves_MultiPoint::Point() - wrong index");
152 return tabPoint->Value(Index);
155 void AppParCurves_MultiPoint::SetPoint2d (const Standard_Integer Index,
156 const gp_Pnt2d& Point)
158 Standard_OutOfRange_Raise_if ((Index <= nbP) || (Index > nbP+nbP2d),
159 "AppParCurves_MultiPoint::SetPoint2d() - wrong index");
160 tabPoint2d->SetValue(Index-nbP, Point);
163 const gp_Pnt2d& AppParCurves_MultiPoint::Point2d (const Standard_Integer Index) const
165 Standard_OutOfRange_Raise_if ((Index <= nbP) || (Index > nbP+nbP2d),
166 "AppParCurves_MultiPoint::Point2d() - wrong index");
167 return tabPoint2d->Value(Index-nbP);
170 void AppParCurves_MultiPoint::Dump(Standard_OStream& o) const
172 o << "AppParCurves_MultiPoint dump:" << std::endl;
173 const Standard_Integer aNbPnts3D = NbPoints(),
174 aNbPnts2D = NbPoints2d();
175 o << "It contains " << aNbPnts3D << " 3d points and " << aNbPnts2D <<" 2d points." << std::endl;
179 for(Standard_Integer i = tabPoint->Lower(); i <= tabPoint->Upper(); i++)
181 o << "3D-Point #" << i << std::endl;
183 o << " Pole x = " << (tabPoint->Value(i)/*->Point(j)*/).X() << std::endl;
184 o << " Pole y = " << (tabPoint->Value(i)/*->Point(j)*/).Y() << std::endl;
185 o << " Pole z = " << (tabPoint->Value(i)/*->Point(j)*/).Z() << std::endl;
191 for(Standard_Integer i = tabPoint2d->Lower(); i <= tabPoint2d->Upper(); i++)
193 o << "2D-Point #" << i << std::endl;
195 o << " Pole x = " << (tabPoint2d->Value(i)/*->Point2d(j)*/).X() << std::endl;
196 o << " Pole y = " << (tabPoint2d->Value(i)/*->Point2d(j)*/).Y() << std::endl;