0029942: Porting to Debian80-64 : Regressions in Modeling Algorithms after integratio...
[occt.git] / src / QABugs / QABugs_20.cxx
1 // Created on: 2015-10-26
2 // Created by: Nikolai BUKHALOV
3 // Copyright (c) 2002-2014 OPEN CASCADE SAS
4 //
5 // This file is part of Open CASCADE Technology software library.
6 //
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
12 //
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
15
16 #include <QABugs.hxx>
17
18 #include <gp_Ax2.hxx>
19 #include <Extrema_GenLocateExtPS.hxx>
20 #include <Geom_Circle.hxx>
21 #include <Geom_SurfaceOfLinearExtrusion.hxx>
22 #include <NCollection_List.hxx>
23 #include <TColgp_Array2OfPnt.hxx>
24 #include <TColStd_Array2OfReal.hxx>
25 #include <TColStd_Array1OfReal.hxx>
26 #include <TColStd_Array1OfInteger.hxx>
27 #include <Geom_BezierCurve.hxx>
28 #include <Geom_BSplineSurface.hxx>
29 #include <GeomConvert.hxx>
30 #include <Geom2d_Curve.hxx>
31 #include <Geom2d_Line.hxx>
32 #include <GeomFill_BSplineCurves.hxx>
33 #include <Draw.hxx>
34 #include <DrawTrSurf.hxx>
35 #include <ShapeConstruct_ProjectCurveOnSurface.hxx>
36
37 #include <TopExp.hxx>
38 #include <TopoDS_Vertex.hxx>
39 #include <BRep_Tool.hxx>
40 #include <TopoDS_Edge.hxx>
41 #include <BRep_Builder.hxx>
42 #include <BRepTools.hxx>
43 #include <BRepAdaptor_Surface.hxx>
44 #include <TopoDS.hxx>
45 #include <DBRep.hxx>
46
47 #include <BRepGProp.hxx>
48 #include <DDocStd.hxx>
49 #include <GProp_GProps.hxx>
50 #include <TDocStd_Document.hxx>
51 #include <XCAFDimTolObjects_DatumObject.hxx>
52 #include <XCAFDimTolObjects_DimensionObject.hxx>
53 #include <XCAFDimTolObjects_GeomToleranceObject.hxx>
54 #include <XCAFDoc_Datum.hxx>
55 #include <XCAFDoc_Dimension.hxx>
56 #include <XCAFDoc_DimTolTool.hxx>
57 #include <XCAFDoc_DocumentTool.hxx>
58 #include <XCAFDoc_GeomTolerance.hxx>
59 #include <XCAFDoc_ShapeTool.hxx>
60
61 #include <HLRAppli_ReflectLines.hxx>
62 #include <HLRBRep_PolyHLRToShape.hxx>
63 #include <HLRBRep_PolyAlgo.hxx>
64
65 #include <Standard_Failure.hxx>
66
67 #include <limits>
68
69 //=======================================================================
70 //function : SurfaceGenOCC26675_1 
71 //purpose  : Generates a surface for intersect (in corresponding
72 //            test case). If we save these surfaces to the disk
73 //            then bug will not be reproduced. Therefore, this generator
74 //            is very important (despite its taking many lines of the code).
75 //=======================================================================
76 static Standard_Integer SurfaceGenOCC26675_1( Draw_Interpretor& theDI,
77                                               Standard_Integer  theNArg,
78                                               const char ** theArgVal)
79 {
80
81   if(theNArg < 2)
82   {
83     theDI << "Use OCC26675_1 result\n";
84     return 1;
85   }
86
87   const gp_Pnt aCircCenter(-112.93397037070100000000, +177.52792379072199000000, +10.63374076104853900000);
88   const gp_Dir aCircN(+0.00000000000000000000, +1.00000000000000000000, +0.00000000000000000000);
89   const gp_Dir aCircX(+0.00000000000000000000, -0.00000000000000000000, +1.00000000000000000000);
90   const gp_Dir anExtrDir(-500.00000000000000000000, -866.02540378443609000000, +0.00000000000000000000);
91   const gp_Ax2 aCircAxes(aCircCenter, aCircN, aCircX);
92   const Handle(Geom_Curve) aCurv = new Geom_Circle(aCircAxes, +50.00000000000000000000);
93
94   const Handle(Geom_Surface) aS2 = new Geom_SurfaceOfLinearExtrusion(aCurv, anExtrDir);
95
96   TColgp_Array2OfPnt aPoles(1, 7, 1, 81);
97   TColStd_Array2OfReal aWeights(1, 7, 1, 81);
98   TColStd_Array1OfReal aUKnots(1, 2), aVKnots(1, 12);
99   TColStd_Array1OfInteger aUMult(1, 2), aVMult(1, 12);
100   const Standard_Integer aUDegree = 6, aVDegree = 8;
101
102   aUKnots(1) = +0.00000000000000000000;
103   aUKnots(2) = +1.00000000000000000000;
104   aVKnots(1) = +0.08911853946147080300;
105   aVKnots(2) = +0.11779167587451674000;
106   aVKnots(3) = +0.14583467562325506000;
107   aVKnots(4) = +0.20255081178503931000;
108   aVKnots(5) = +0.25926694794682359000;
109   aVKnots(6) = +0.31598308410860781000;
110   aVKnots(7) = +0.34262437462234741000;
111   aVKnots(8) = +0.37067364397889985000;
112   aVKnots(9) = +0.39731552779654306000;
113   aVKnots(10) = +0.42536420384919182000;
114   aVKnots(11) = +0.45200329235672548000;
115   aVKnots(12) = +0.47802918742799144000;
116
117   aUMult(1) = 7;
118   aUMult(2) = 7;
119   aVMult(1) = 9;
120   aVMult(2) = 7;
121   aVMult(3) = 7;
122   aVMult(4) = 7;
123   aVMult(5) = 7;
124   aVMult(6) = 7;
125   aVMult(7) = 7;
126   aVMult(8) = 7;
127   aVMult(9) = 7;
128   aVMult(10) = 8;
129   aVMult(11) = 8;
130   aVMult(12) = 9;
131
132   ////
133   {
134     aWeights.ChangeValue(1, 1) = +1.02986327036737910000;
135     aPoles.ChangeValue(1, 1) = gp_Pnt(+131.75315905495660000000, +2.88570510351864900000, -66.24709307590461500000);
136     aWeights.ChangeValue(1, 2) = +1.02989244478761060000;
137     aPoles.ChangeValue(1, 2) = gp_Pnt(+128.70876344053133000000, +2.88791208181246970000, -67.92914281439198000000);
138     aWeights.ChangeValue(1, 3) = +1.02991676091113950000;
139     aPoles.ChangeValue(1, 3) = gp_Pnt(+125.64133203841195000000, +2.88975018186799830000, -69.56968825975690200000);
140     aWeights.ChangeValue(1, 4) = +1.02993613450133650000;
141     aPoles.ChangeValue(1, 4) = gp_Pnt(+122.55164101294532000000, +2.89121448973680460000, -71.16831921321855200000);
142     aWeights.ChangeValue(1, 5) = +1.02995970896170810000;
143     aPoles.ChangeValue(1, 5) = gp_Pnt(+119.44028474076808000000, +2.89299532863950050000, -72.72471137484106400000);
144     aWeights.ChangeValue(1, 6) = +1.02998196300928410000;
145     aPoles.ChangeValue(1, 6) = gp_Pnt(+116.30796917345266000000, +2.89467567823625730000, -74.23853925439507900000);
146     aWeights.ChangeValue(1, 7) = +1.02999781361772440000;
147     aPoles.ChangeValue(1, 7) = gp_Pnt(+113.15537818476763000000, +2.89587201010380560000, -75.70949847615843000000);
148     aWeights.ChangeValue(1, 8) = +1.03001626830283270000;
149     aPoles.ChangeValue(1, 8) = gp_Pnt(+109.98323502828077000000, +2.89726468512897210000, -77.13723994508107800000);
150     aWeights.ChangeValue(1, 9) = +1.03004822145815230000;
151     aPoles.ChangeValue(1, 9) = gp_Pnt(+103.60126699909762000000, +2.89967510685080440000, -79.90571269046952800000);
152     aWeights.ChangeValue(1, 10) = +1.03006364818936770000;
153     aPoles.ChangeValue(1, 10) = gp_Pnt(+100.39144092265354000000, +2.90083845616186050000, -81.24644132200651800000);
154     aWeights.ChangeValue(1, 11) = +1.03007725635592000000;
155     aPoles.ChangeValue(1, 11) = gp_Pnt(+97.16342330855667300000, +2.90186436688425700000, -82.54338871675531700000);
156     aWeights.ChangeValue(1, 12) = +1.03009045031501500000;
157     aPoles.ChangeValue(1, 12) = gp_Pnt(+93.91790293022438600000, +2.90285879918974650000, -83.79626764915399000000);
158     aWeights.ChangeValue(1, 13) = +1.03010285398183930000;
159     aPoles.ChangeValue(1, 13) = gp_Pnt(+90.65560197798836800000, +2.90379346029782100000, -85.00479786905465600000);
160     aWeights.ChangeValue(1, 14) = +1.03011393120350900000;
161     aPoles.ChangeValue(1, 14) = gp_Pnt(+87.37722618415423900000, +2.90462796925060120000, -86.16871841453435400000);
162     aWeights.ChangeValue(1, 15) = +1.03012484065787050000;
163     aPoles.ChangeValue(1, 15) = gp_Pnt(+84.08346762829417300000, +2.90544970249433290000, -87.28777941880029800000);
164     aWeights.ChangeValue(1, 16) = +1.03015471267321200000;
165     aPoles.ChangeValue(1, 16) = gp_Pnt(+74.15848807058078800000, +2.90769927244280210000, -90.50962423575197100000);
166     aWeights.ChangeValue(1, 17) = +1.03017194800922400000;
167     aPoles.ChangeValue(1, 17) = gp_Pnt(+67.48342008926763900000, +2.90899668032978950000, -92.47701903504494700000);
168     aWeights.ChangeValue(1, 18) = +1.03018680682765670000;
169     aPoles.ChangeValue(1, 18) = gp_Pnt(+60.75515833606132100000, +2.91011480947056490000, -94.26204121664201800000);
170     aWeights.ChangeValue(1, 19) = +1.03019958109549670000;
171     aPoles.ChangeValue(1, 19) = gp_Pnt(+53.97928154760177200000, +2.91107580930771360000, -95.86305268935117900000);
172     aWeights.ChangeValue(1, 20) = +1.03021050389503350000;
173     aPoles.ChangeValue(1, 20) = gp_Pnt(+47.16164692132413400000, +2.91189735380426780000, -97.27865560180262600000);
174     aWeights.ChangeValue(1, 21) = +1.03021974942385830000;
175     aPoles.ChangeValue(1, 21) = gp_Pnt(+40.30838837608569500000, +2.91259264267907050000, -98.50769317562559000000);
176     aWeights.ChangeValue(1, 22) = +1.03022743299486370000;
177     aPoles.ChangeValue(1, 22) = gp_Pnt(+33.42591476110869300000, +2.91317040233699530000, -99.54925039136011800000);
178     aWeights.ChangeValue(1, 23) = +1.03023979631718900000;
179     aPoles.ChangeValue(1, 23) = gp_Pnt(+19.61576136171939000000, +2.91409991934468550000, -101.25602945077115000000);
180     aWeights.ChangeValue(1, 24) = +1.03024450452679140000;
181     aPoles.ChangeValue(1, 24) = gp_Pnt(+12.68754355991407800000, +2.91445385083459700000, -101.92122234436175000000);
182     aWeights.ChangeValue(1, 25) = +1.03024781840890120000;
183     aPoles.ChangeValue(1, 25) = gp_Pnt(+5.74236948737514120000, +2.91470294045230770000, -102.39751844510502000000);
184     aWeights.ChangeValue(1, 26) = +1.03024979501192000000;
185     aPoles.ChangeValue(1, 26) = gp_Pnt(-1.21367831605073050000, +2.91485150371151920000, -102.68442590550356000000);
186     aWeights.ChangeValue(1, 27) = +1.03025046568879790000;
187     aPoles.ChangeValue(1, 27) = gp_Pnt(-8.17455041611474620000, +2.91490191238154670000, -102.78167594353056000000);
188     aWeights.ChangeValue(1, 28) = +1.03024983609703540000;
189     aPoles.ChangeValue(1, 28) = gp_Pnt(-15.13423127055194300000, +2.91485459458572780000, -102.68922293042964000000);
190     aWeights.ChangeValue(1, 29) = +1.03024788619868260000;
191     aPoles.ChangeValue(1, 29) = gp_Pnt(-22.08674002008992700000, +2.91470803482494080000, -102.40724441194320000000);
192     aWeights.ChangeValue(1, 30) = +1.03024126030624540000;
193     aPoles.ChangeValue(1, 30) = gp_Pnt(-35.96556766132121700000, +2.91420996731856930000, -101.46503408514069000000);
194     aWeights.ChangeValue(1, 31) = +1.03023657011944230000;
195     aPoles.ChangeValue(1, 31) = gp_Pnt(-42.89191729472150200000, +2.91385737699769360000, -100.80479886745856000000);
196     aWeights.ChangeValue(1, 32) = +1.03023047292900880000;
197     aPoles.ChangeValue(1, 32) = gp_Pnt(-49.79923779841396900000, +2.91339898565004060000, -99.95583114848535900000);
198     aWeights.ChangeValue(1, 33) = +1.03022290017099550000;
199     aPoles.ChangeValue(1, 33) = gp_Pnt(-56.68161614207340900000, +2.91282960709223810000, -98.91875138839027700000);
200     aWeights.ChangeValue(1, 34) = +1.03021374148842180000;
201     aPoles.ChangeValue(1, 34) = gp_Pnt(-63.53316994906088400000, +2.91214088593828220000, -97.69440448679608800000);
202     aWeights.ChangeValue(1, 35) = +1.03020284473128080000;
203     aPoles.ChangeValue(1, 35) = gp_Pnt(-70.34804877511381000000, +2.91132129711663760000, -96.28385939245710300000);
204     aWeights.ChangeValue(1, 36) = +1.03019001595653580000;
205     aPoles.ChangeValue(1, 36) = gp_Pnt(-77.12043535415037400000, +2.91035614521427500000, -94.68840860671046800000);
206     aWeights.ChangeValue(1, 37) = +1.03016805964614980000;
207     aPoles.ChangeValue(1, 37) = gp_Pnt(-86.96652166958519100000, +2.90870378328618400000, -92.08365976972685000000);
208     aWeights.ChangeValue(1, 38) = +1.03016062145972500000;
209     aPoles.ChangeValue(1, 38) = gp_Pnt(-90.07809790629383400000, +2.90814392820824040000, -91.21821667329717800000);
210     aWeights.ChangeValue(1, 39) = +1.03015268516758060000;
211     aPoles.ChangeValue(1, 39) = gp_Pnt(-93.17869710255469300000, +2.90754650188789080000, -90.31338955501080100000);
212     aWeights.ChangeValue(1, 40) = +1.03014422393874510000;
213     aPoles.ChangeValue(1, 40) = gp_Pnt(-96.26774201507643600000, +2.90690946644790090000, -89.36934028436292000000);
214     aWeights.ChangeValue(1, 41) = +1.03013520381253840000;
215     aPoles.ChangeValue(1, 41) = gp_Pnt(-99.34465666946248100000, +2.90623024256504880000, -88.38624129906430900000);
216     aWeights.ChangeValue(1, 42) = +1.03012558369857450000;
217     aPoles.ChangeValue(1, 42) = gp_Pnt(-102.40886646020824000000, +2.90550570939860810000, -87.36427556081821400000);
218     aWeights.ChangeValue(1, 43) = +1.03011531537676040000;
219     aPoles.ChangeValue(1, 43) = gp_Pnt(-105.45979824903711000000, +2.90473220450791560000, -86.30363650725728100000);
220     aWeights.ChangeValue(1, 44) = +1.03009266486593140000;
221     aPoles.ChangeValue(1, 44) = gp_Pnt(-111.76765655411073000000, +2.90302557752729130000, -84.02084620865503000000);
222     aWeights.ChangeValue(1, 45) = +1.03007954250893910000;
223     aPoles.ChangeValue(1, 45) = gp_Pnt(-115.02237879255169000000, +2.90203661863772000000, -82.79254553120374300000);
224     aWeights.ChangeValue(1, 46) = +1.03006700046846360000;
225     aPoles.ChangeValue(1, 46) = gp_Pnt(-118.26033551796380000000, +2.90109123094133370000, -81.51987347500843800000);
226     aWeights.ChangeValue(1, 47) = +1.03005153385518430000;
227     aPoles.ChangeValue(1, 47) = gp_Pnt(-121.48081153033489000000, +2.89992503429592440000, -80.20310945547186100000);
228     aWeights.ChangeValue(1, 48) = +1.03003663316288070000;
229     aPoles.ChangeValue(1, 48) = gp_Pnt(-124.68310204708784000000, +2.89880123910694910000, -78.84252385592422700000);
230     aWeights.ChangeValue(1, 49) = +1.03002002524051230000;
231     aPoles.ChangeValue(1, 49) = gp_Pnt(-127.86649232671233000000, +2.89754829341323060000, -77.43842231968982000000);
232     aWeights.ChangeValue(1, 50) = +1.03000192732161230000;
233     aPoles.ChangeValue(1, 50) = gp_Pnt(-131.03028254956638000000, +2.89618247462029290000, -75.99111259804850200000);
234     aWeights.ChangeValue(1, 51) = +1.02996526567113600000;
235     aPoles.ChangeValue(1, 51) = gp_Pnt(-137.09281139094972000000, +2.89341459629042360000, -73.11712223836046600000);
236     aWeights.ChangeValue(1, 52) = +1.02994403451589630000;
237     aPoles.ChangeValue(1, 52) = gp_Pnt(-139.99435839258939000000, +2.89181101472158900000, -71.69634981883045600000);
238     aWeights.ChangeValue(1, 53) = +1.02992866105538440000;
239     aPoles.ChangeValue(1, 53) = gp_Pnt(-142.87784656482347000000, +2.89064973421052680000, -70.23882874204873900000);
240     aWeights.ChangeValue(1, 54) = +1.02989968743283590000;
241     aPoles.ChangeValue(1, 54) = gp_Pnt(-145.74271824362268000000, +2.88845983550875030000, -68.74489127449217600000);
242     aWeights.ChangeValue(1, 55) = +1.02988222474524970000;
243     aPoles.ChangeValue(1, 55) = gp_Pnt(-148.58838121276386000000, +2.88713941077432070000, -67.21475112846350400000);
244     aWeights.ChangeValue(1, 56) = +1.02985386954408620000;
245     aPoles.ChangeValue(1, 56) = gp_Pnt(-151.41432118416620000000, +2.88499463682574180000, -65.64875099202183200000);
246     aWeights.ChangeValue(1, 57) = +1.02982704006090460000;
247     aPoles.ChangeValue(1, 57) = gp_Pnt(-154.21993049579214000000, +2.88296397171855910000, -64.04717955157212800000);
248     aWeights.ChangeValue(1, 58) = +1.02976639514278400000;
249     aPoles.ChangeValue(1, 58) = gp_Pnt(-160.00375832753414000000, +2.87837140815595260000, -60.64735416015690100000);
250     aWeights.ChangeValue(1, 59) = +1.02972545417711370000;
251     aPoles.ChangeValue(1, 59) = gp_Pnt(-162.97914403387477000000, +2.87526824819569480000, -58.84445149944087200000);
252     aWeights.ChangeValue(1, 60) = +1.02970377642253300000;
253     aPoles.ChangeValue(1, 60) = gp_Pnt(-165.92810584856278000000, +2.87362619373759860000, -56.99783055334398100000);
254     aWeights.ChangeValue(1, 61) = +1.02963665582001740000;
255     aPoles.ChangeValue(1, 61) = gp_Pnt(-168.85438185317770000000, +2.86853152516479340000, -55.11698298198095400000);
256     aWeights.ChangeValue(1, 62) = +1.02961756328192160000;
257     aPoles.ChangeValue(1, 62) = gp_Pnt(-171.75125340157436000000, +2.86708271055963240000, -53.19057330425229700000);
258     aWeights.ChangeValue(1, 63) = +1.02954937293527580000;
259     aPoles.ChangeValue(1, 63) = gp_Pnt(-174.62251681022158000000, +2.86190007017706360000, -51.22700225930964300000);
260     aWeights.ChangeValue(1, 64) = +1.02950097342691520000;
261     aPoles.ChangeValue(1, 64) = gp_Pnt(-177.46620192435449000000, +2.85821732043423180000, -49.22415777229338100000);
262     aWeights.ChangeValue(1, 65) = +1.02943612532291810000;
263     aPoles.ChangeValue(1, 65) = gp_Pnt(-180.28206426096281000000, +2.85327724467687100000, -47.18300981722491400000);
264     aWeights.ChangeValue(1, 66) = +1.02937840445786000000;
265     aPoles.ChangeValue(1, 66) = gp_Pnt(-182.89713737694305000000, +2.84888100315162470000, -45.28741010449485300000);
266     aWeights.ChangeValue(1, 67) = +1.02929786839840220000;
267     aPoles.ChangeValue(1, 67) = gp_Pnt(-185.48808576506855000000, +2.84272935508061810000, -43.35897595091199000000);
268     aWeights.ChangeValue(1, 68) = +1.02927785532845030000;
269     aPoles.ChangeValue(1, 68) = gp_Pnt(-188.05509745668041000000, +2.84122612975151250000, -41.39706700987362400000);
270     aWeights.ChangeValue(1, 69) = +1.02909457173363930000;
271     aPoles.ChangeValue(1, 69) = gp_Pnt(-190.59634219852757000000, +2.82717082550985440000, -39.40453806610211300000);
272     aWeights.ChangeValue(1, 70) = +1.02915656102508410000;
273     aPoles.ChangeValue(1, 70) = gp_Pnt(-193.11296933822229000000, +2.83195841118334000000, -37.37763511391345600000);
274     aWeights.ChangeValue(1, 71) = +1.02891246603941110000;
275     aPoles.ChangeValue(1, 71) = gp_Pnt(-195.60305999702362000000, +2.81322479805689340000, -35.32107774203857500000);
276     aWeights.ChangeValue(1, 72) = +1.02884001996307940000;
277     aPoles.ChangeValue(1, 72) = gp_Pnt(-198.06589030811097000000, +2.80764438138268390000, -33.23208121127716900000);
278     aWeights.ChangeValue(1, 73) = +1.02870418206103250000;
279     aPoles.ChangeValue(1, 73) = gp_Pnt(-200.50111697620073000000, +2.79717360924099090000, -31.11182660391394400000);
280     aWeights.ChangeValue(1, 74) = +1.02860417892814660000;
281     aPoles.ChangeValue(1, 74) = gp_Pnt(-202.93720652839650000000, +2.78949733525485710000, -28.99085629216911300000);
282     aWeights.ChangeValue(1, 75) = +1.02826579045547110000;
283     aPoles.ChangeValue(1, 75) = gp_Pnt(-205.34394850673777000000, +2.76315604312090550000, -26.83940109433629200000);
284     aWeights.ChangeValue(1, 76) = +1.02871793966742330000;
285     aPoles.ChangeValue(1, 76) = gp_Pnt(-207.72575255584553000000, +2.79855565223875710000, -24.65500081264426800000);
286     aWeights.ChangeValue(1, 77) = +1.02728787827176630000;
287     aPoles.ChangeValue(1, 77) = gp_Pnt(-210.07706367406874000000, +2.68725363743552850000, -22.43634910730148800000);
288     aWeights.ChangeValue(1, 78) = +1.02767535385809120000;
289     aPoles.ChangeValue(1, 78) = gp_Pnt(-212.39605978578481000000, +2.71705476277515070000, -20.20562112100595800000);
290     aWeights.ChangeValue(1, 79) = +1.02745809923169020000;
291     aPoles.ChangeValue(1, 79) = gp_Pnt(-214.68098626410506000000, +2.69985190382785320000, -17.91605900374278100000);
292     aWeights.ChangeValue(1, 80) = +1.02725110106359850000;
293     aPoles.ChangeValue(1, 80) = gp_Pnt(-216.94385389331507000000, +2.68435107488514250000, -15.61289037092123000000);
294     aWeights.ChangeValue(1, 81) = +1.02619749797986360000;
295     aPoles.ChangeValue(1, 81) = gp_Pnt(-219.16685583874414000000, +2.59983520096898510000, -13.28583956380401400000);
296     aWeights.ChangeValue(2, 1) = +1.00955713824395700000;
297     aPoles.ChangeValue(2, 1) = gp_Pnt(+131.76756408216349000000, +2.10451717388867540000, -66.27316135719137000000);
298     aWeights.ChangeValue(2, 2) = +1.00956608612165600000;
299     aPoles.ChangeValue(2, 2) = gp_Pnt(+128.72252404033563000000, +2.10631182699007670000, -67.95492700832653600000);
300     aWeights.ChangeValue(2, 3) = +1.00957354292813030000;
301     aPoles.ChangeValue(2, 3) = gp_Pnt(+125.65455798821807000000, +2.10780700070896730000, -69.59522708152212500000);
302     aWeights.ChangeValue(2, 4) = +1.00957948395970430000;
303     aPoles.ChangeValue(2, 4) = gp_Pnt(+122.56436007131990000000, +2.10899819276768510000, -71.19369911011085600000);
304     aWeights.ChangeValue(2, 5) = +1.00958671248272140000;
305     aPoles.ChangeValue(2, 5) = gp_Pnt(+119.45249930698063000000, +2.11044722765431250000, -72.74983445837314400000);
306     aWeights.ChangeValue(2, 6) = +1.00959353559448470000;
307     aPoles.ChangeValue(2, 6) = gp_Pnt(+116.31971419268339000000, +2.11181476538007030000, -74.26341133748536500000);
308     aWeights.ChangeValue(2, 7) = +1.00959839503054960000;
309     aPoles.ChangeValue(2, 7) = gp_Pnt(+113.16673272248508000000, +2.11278857229853930000, -75.73421464457315700000);
310     aWeights.ChangeValue(2, 8) = +1.00960405269294800000;
311     aPoles.ChangeValue(2, 8) = gp_Pnt(+109.99417142410560000000, +2.11392227976110990000, -77.16175403351917300000);
312     aWeights.ChangeValue(2, 9) = +1.00961384794963970000;
313     aPoles.ChangeValue(2, 9) = gp_Pnt(+103.61137952541701000000, +2.11588481923337430000, -79.92991318438167500000);
314     aWeights.ChangeValue(2, 10) = +1.00961857675621050000;
315     aPoles.ChangeValue(2, 10) = gp_Pnt(+100.40113044627800000000, +2.11683214779396200000, -81.27049552555527600000);
316     aWeights.ChangeValue(2, 11) = +1.00962274789480260000;
317     aPoles.ChangeValue(2, 11) = gp_Pnt(+97.17272090352022900000, +2.11766766635255620000, -82.56731642507010300000);
318     aWeights.ChangeValue(2, 12) = +1.00962679188946770000;
319     aPoles.ChangeValue(2, 12) = gp_Pnt(+93.92682593436140300000, +2.11847763961438810000, -83.82006598438695700000);
320     aWeights.ChangeValue(2, 13) = +1.00963059350869510000;
321     aPoles.ChangeValue(2, 13) = gp_Pnt(+90.66416580726762200000, +2.11923900414192050000, -85.02847304317147300000);
322     aWeights.ChangeValue(2, 14) = +1.00963398843777610000;
323     aPoles.ChangeValue(2, 14) = gp_Pnt(+87.38545325411524800000, +2.11991885797243330000, -86.19228543784532800000);
324     aWeights.ChangeValue(2, 15) = +1.00963733185346640000;
325     aPoles.ChangeValue(2, 15) = gp_Pnt(+84.09136475788710600000, +2.12058835416503610000, -87.31123582184922300000);
326     aWeights.ChangeValue(2, 16) = +1.00964648640037450000;
327     aPoles.ChangeValue(2, 16) = gp_Pnt(+74.16530685267888100000, +2.12242134451684360000, -90.53282418399284400000);
328     aWeights.ChangeValue(2, 17) = +1.00965176794147850000;
329     aPoles.ChangeValue(2, 17) = gp_Pnt(+67.48955141808187400000, +2.12347869023601370000, -92.50007118315201600000);
330     aWeights.ChangeValue(2, 18) = +1.00965632094816660000;
331     aPoles.ChangeValue(2, 18) = gp_Pnt(+60.76066172731987800000, +2.12439006790716880000, -94.28495774595940300000);
332     aWeights.ChangeValue(2, 19) = +1.00966023501695720000;
333     aPoles.ChangeValue(2, 19) = gp_Pnt(+53.98420072674593900000, +2.12517346720689600000, -95.88584819516199800000);
334     aWeights.ChangeValue(2, 20) = +1.00966358166845400000;
335     aPoles.ChangeValue(2, 20) = gp_Pnt(+47.16601123883578600000, +2.12584324589548320000, -97.30134659055448800000);
336     aWeights.ChangeValue(2, 21) = +1.00966641434734730000;
337     aPoles.ChangeValue(2, 21) = gp_Pnt(+40.31221541713015500000, +2.12641013013135180000, -98.53029698991525700000);
338     aWeights.ChangeValue(2, 22) = +1.00966876842241260000;
339     aPoles.ChangeValue(2, 22) = gp_Pnt(+33.42921418500849000000, +2.12688121470786750000, -99.57178366381829400000);
340     aWeights.ChangeValue(2, 23) = +1.00967255617655650000;
341     aPoles.ChangeValue(2, 23) = gp_Pnt(+19.61796125907087400000, +2.12763915883061920000, -101.27845724558523000000);
342     aWeights.ChangeValue(2, 24) = +1.00967399859793750000;
343     aPoles.ChangeValue(2, 24) = gp_Pnt(+12.68919279606528900000, +2.12792777824197280000, -101.94361028295506000000);
344     aWeights.ChangeValue(2, 25) = +1.00967501382968900000;
345     aPoles.ChangeValue(2, 25) = gp_Pnt(+5.74348853231593990000, +2.12813091177048630000, -102.41987704106546000000);
346     aWeights.ChangeValue(2, 26) = +1.00967561936957820000;
347     aPoles.ChangeValue(2, 26) = gp_Pnt(-1.21307744928976070000, +2.12825206894226590000, -102.70676666240287000000);
348     aWeights.ChangeValue(2, 27) = +1.00967582483410380000;
349     aPoles.ChangeValue(2, 27) = gp_Pnt(-8.17446448579617170000, +2.12829317854427910000, -102.80401081431219000000);
350     aWeights.ChangeValue(2, 28) = +1.00967563195849760000;
351     aPoles.ChangeValue(2, 28) = gp_Pnt(-15.13466558037753100000, +2.12825458864942170000, -102.71156371647888000000);
352     aWeights.ChangeValue(2, 29) = +1.00967503459672270000;
353     aPoles.ChangeValue(2, 29) = gp_Pnt(-22.08770764998126900000, +2.12813506662251010000, -102.42960214757312000000);
354     aWeights.ChangeValue(2, 30) = +1.00967300468446490000;
355     aPoles.ChangeValue(2, 30) = gp_Pnt(-35.96760988752987500000, +2.12772890088942160000, -101.48744752427969000000);
356     aWeights.ChangeValue(2, 31) = +1.00967156777535580000;
357     aPoles.ChangeValue(2, 31) = gp_Pnt(-42.89448004815705000000, +2.12744138030294440000, -100.82725372327035000000);
358     aWeights.ChangeValue(2, 32) = +1.00966969979090780000;
359     aPoles.ChangeValue(2, 32) = gp_Pnt(-49.80232400744441900000, +2.12706759457740000000, -99.97834162579670200000);
360     aWeights.ChangeValue(2, 33) = +1.00966737970297200000;
361     aPoles.ChangeValue(2, 33) = gp_Pnt(-56.68523628384353000000, +2.12660332632729520000, -98.94133225857957800000);
362     aWeights.ChangeValue(2, 34) = +1.00966457365849260000;
363     aPoles.ChangeValue(2, 34) = gp_Pnt(-63.53734456971785200000, +2.12604178346724470000, -97.71706998895581400000);
364     aWeights.ChangeValue(2, 35) = +1.00966123497950600000;
365     aPoles.ChangeValue(2, 35) = gp_Pnt(-70.35281013187348300000, +2.12537359908900880000, -96.30662240267085400000);
366     aWeights.ChangeValue(2, 36) = +1.00965730416314050000;
367     aPoles.ChangeValue(2, 36) = gp_Pnt(-77.12582820180557500000, +2.12458683129447450000, -94.71128014840769500000);
368     aWeights.ChangeValue(2, 37) = +1.00965057624220010000;
369     aPoles.ChangeValue(2, 37) = gp_Pnt(-86.97287762202962800000, +2.12324005462031540000, -92.10671540000876700000);
370     aWeights.ChangeValue(2, 38) = +1.00964829695753690000;
371     aPoles.ChangeValue(2, 38) = gp_Pnt(-90.08473551349412400000, +2.12278376932639290000, -91.24134329153459100000);
372     aWeights.ChangeValue(2, 39) = +1.00964586498084840000;
373     aPoles.ChangeValue(2, 39) = gp_Pnt(-93.18562459494498300000, +2.12229689243319890000, -90.33659169532975900000);
374     aWeights.ChangeValue(2, 40) = +1.00964327207694590000;
375     aPoles.ChangeValue(2, 40) = gp_Pnt(-96.27496896689456200000, +2.12177776971417840000, -89.39262240039663300000);
376     aWeights.ChangeValue(2, 41) = +1.00964050782222770000;
377     aPoles.ChangeValue(2, 41) = gp_Pnt(-99.35219429474524600000, +2.12122430736176200000, -88.40960770124299000000);
378     aWeights.ChangeValue(2, 42) = +1.00963755960468140000;
379     aPoles.ChangeValue(2, 42) = gp_Pnt(-102.41672784011750000000, +2.12063397196916760000, -87.38773038403248000000);
380     aWeights.ChangeValue(2, 43) = +1.00963441262388320000;
381     aPoles.ChangeValue(2, 43) = gp_Pnt(-105.46799849165807000000, +2.12000379050942020000, -86.32718371153289600000);
382     aWeights.ChangeValue(2, 44) = +1.00962747055142050000;
383     aPoles.ChangeValue(2, 44) = gp_Pnt(-111.77654530973133000000, +2.11861352771318150000, -84.04460889409097000000);
384     aWeights.ChangeValue(2, 45) = +1.00962344856326270000;
385     aPoles.ChangeValue(2, 45) = gp_Pnt(-115.03162075269803000000, +2.11780798556167320000, -82.81644583890866300000);
386     aWeights.ChangeValue(2, 46) = +1.00961960432211730000;
387     aPoles.ChangeValue(2, 46) = gp_Pnt(-118.26993104545312000000, +2.11703799459344700000, -81.54389579486141300000);
388     aWeights.ChangeValue(2, 47) = +1.00961486342011010000;
389     aPoles.ChangeValue(2, 47) = gp_Pnt(-121.49080060905077000000, +2.11608829135299810000, -80.22729418526657200000);
390     aWeights.ChangeValue(2, 48) = +1.00961029578343630000;
391     aPoles.ChangeValue(2, 48) = gp_Pnt(-124.69348951442340000000, +2.11517321690879800000, -78.86685283462101400000);
392     aWeights.ChangeValue(2, 49) = +1.00960520454014850000;
393     aPoles.ChangeValue(2, 49) = gp_Pnt(-127.87731027004676000000, +2.11415312105035590000, -77.46291256687052900000);
394     aWeights.ChangeValue(2, 50) = +1.00959965618773250000;
395     aPoles.ChangeValue(2, 50) = gp_Pnt(-131.04156234039974000000, +2.11304129636208420000, -76.01577573259778800000);
396     aWeights.ChangeValue(2, 51) = +1.00958841592243690000;
397     aPoles.ChangeValue(2, 51) = gp_Pnt(-137.10496896782513000000, +2.11078854745601690000, -73.14215015354327000000);
398     aWeights.ChangeValue(2, 52) = +1.00958190609540830000;
399     aPoles.ChangeValue(2, 52) = gp_Pnt(-140.00695092509352000000, +2.10948365684345340000, -71.72161996530125800000);
400     aWeights.ChangeValue(2, 53) = +1.00957719225994170000;
401     aPoles.ChangeValue(2, 53) = gp_Pnt(-142.89082065884315000000, +2.10853873486620720000, -70.26423921243410600000);
402     aWeights.ChangeValue(2, 54) = +1.00956830737110970000;
403     aPoles.ChangeValue(2, 54) = gp_Pnt(-145.75622246387837000000, +2.10675729535240960000, -68.77065477701791000000);
404     aWeights.ChangeValue(2, 55) = +1.00956295195561060000;
405     aPoles.ChangeValue(2, 55) = gp_Pnt(-148.60233584192389000000, +2.10568335609513650000, -67.24065593702246700000);
406     aWeights.ChangeValue(2, 56) = +1.00955425555818930000;
407     aPoles.ChangeValue(2, 56) = gp_Pnt(-151.42883073983140000000, +2.10393921590561070000, -65.67497260857376800000);
408     aWeights.ChangeValue(2, 57) = +1.00954602613011150000;
409     aPoles.ChangeValue(2, 57) = gp_Pnt(-154.23502547473331000000, +2.10228833319884910000, -64.07366145615235100000);
410     aWeights.ChangeValue(2, 58) = +1.00952742278729300000;
411     aPoles.ChangeValue(2, 58) = gp_Pnt(-160.02004322449872000000, +2.09855561509982950000, -60.67448614970191300000);
412     aWeights.ChangeValue(2, 59) = +1.00951486183164940000;
413     aPoles.ChangeValue(2, 59) = gp_Pnt(-162.99613088380306000000, +2.09603444654779600000, -58.87207545484513800000);
414     aWeights.ChangeValue(2, 60) = +1.00950821186194630000;
415     aPoles.ChangeValue(2, 60) = gp_Pnt(-165.94554723216726000000, +2.09470002788322150000, -57.02566663092176900000);
416     aWeights.ChangeValue(2, 61) = +1.00948761363819010000;
417     aPoles.ChangeValue(2, 61) = gp_Pnt(-168.87287521283019000000, +2.09056345777511910000, -55.14566924440539700000);
418     aWeights.ChangeValue(2, 62) = +1.00948175483840210000;
419     aPoles.ChangeValue(2, 62) = gp_Pnt(-171.77025983587509000000, +2.08938700649796160000, -53.21936605947655600000);
420     aWeights.ChangeValue(2, 63) = +1.00946082358399410000;
421     aPoles.ChangeValue(2, 63) = gp_Pnt(-174.64262250370552000000, +2.08518149324171190000, -51.25662423685646700000);
422     aWeights.ChangeValue(2, 64) = +1.00944596410269540000;
423     aPoles.ChangeValue(2, 64) = gp_Pnt(-177.48726621628353000000, +2.08219461660139650000, -49.25423871740036900000);
424     aWeights.ChangeValue(2, 65) = +1.00942605045267530000;
425     aPoles.ChangeValue(2, 65) = gp_Pnt(-180.30433731845508000000, +2.07819005191471670000, -47.21374002625280800000);
426     aWeights.ChangeValue(2, 66) = +1.00940832657289500000;
427     aPoles.ChangeValue(2, 66) = gp_Pnt(-182.92026834009920000000, +2.07462614892136180000, -45.31887901738367200000);
428     aWeights.ChangeValue(2, 67) = +1.00938358350026620000;
429     aPoles.ChangeValue(2, 67) = gp_Pnt(-185.51252638985017000000, +2.06964535925843180000, -43.39137009339865600000);
430     aWeights.ChangeValue(2, 68) = +1.00937745534293180000;
431     aPoles.ChangeValue(2, 68) = gp_Pnt(-188.07970214515959000000, +2.06841969296490240000, -41.42984981640538000000);
432     aWeights.ChangeValue(2, 69) = +1.00932110415642830000;
433     aPoles.ChangeValue(2, 69) = gp_Pnt(-190.62397551723822000000, +2.05705915800362950000, -39.43932945784815300000);
434     aWeights.ChangeValue(2, 70) = +1.00934018958961060000;
435     aPoles.ChangeValue(2, 70) = gp_Pnt(-193.13969442040633000000, +2.06091733419064350000, -37.41169132931209200000);
436     aWeights.ChangeValue(2, 71) = +1.00926513417552190000;
437     aPoles.ChangeValue(2, 71) = gp_Pnt(-195.63329272671066000000, +2.04578165519120160000, -35.35822241980492500000);
438     aWeights.ChangeValue(2, 72) = +1.00924284324010150000;
439     aPoles.ChangeValue(2, 72) = gp_Pnt(-198.09761820165846000000, +2.04128022217386820000, -33.26975126412686700000);
440     aWeights.ChangeValue(2, 73) = +1.00920104311988150000;
441     aPoles.ChangeValue(2, 73) = gp_Pnt(-200.53514329838038000000, +2.03283693524956680000, -31.15087616958502200000);
442     aWeights.ChangeValue(2, 74) = +1.00917029694372660000;
443     aPoles.ChangeValue(2, 74) = gp_Pnt(-202.97255799662608000000, +2.02663657044316060000, -29.03126127135719200000);
444     aWeights.ChangeValue(2, 75) = +1.00906597799637380000;
445     aPoles.ChangeValue(2, 75) = gp_Pnt(-205.38430250588374000000, +2.00548607046822540000, -26.88375382824776200000);
446     aWeights.ChangeValue(2, 76) = +1.00920552993214340000;
447     aPoles.ChangeValue(2, 76) = gp_Pnt(-207.76049754988114000000, +2.03384304897263670000, -24.69318019977189100000);
448     aWeights.ChangeValue(2, 77) = +1.00876475817298510000;
449     aPoles.ChangeValue(2, 77) = gp_Pnt(-210.12674832523484000000, +1.94448851661030540000, -22.49703905023471500000);
450     aWeights.ChangeValue(2, 78) = +1.00888387250469380000;
451     aPoles.ChangeValue(2, 78) = gp_Pnt(-212.44800842772909000000, +1.96852329008748410000, -20.25405344977475500000);
452     aWeights.ChangeValue(2, 79) = +1.00881670070680670000;
453     aPoles.ChangeValue(2, 79) = gp_Pnt(-214.73260668420895000000, +1.95481624964232450000, -17.97008076073228700000);
454     aWeights.ChangeValue(2, 80) = +1.00875338528797620000;
455     aPoles.ChangeValue(2, 80) = gp_Pnt(-216.99878954601004000000, +1.94217039944868790000, -15.66960286452947800000);
456     aWeights.ChangeValue(2, 81) = +1.00842683370719490000;
457     aPoles.ChangeValue(2, 81) = gp_Pnt(-219.23765241170187000000, +1.87520469423183880000, -13.35291936652889800000);
458     aWeights.ChangeValue(3, 1) = +0.99802424639217791000;
459     aPoles.ChangeValue(3, 1) = gp_Pnt(+131.89876890515018000000, +1.35189067474276530000, -66.51059820355672500000);
460     aWeights.ChangeValue(3, 2) = +0.99802234515929278000;
461     aPoles.ChangeValue(3, 2) = gp_Pnt(+128.85071311608803000000, +1.35313353595059940000, -68.19368716153405800000);
462     aWeights.ChangeValue(3, 3) = +0.99802076064203826000;
463     aPoles.ChangeValue(3, 3) = gp_Pnt(+125.77977143028471000000, +1.35416922698475650000, -69.83529373030198400000);
464     aWeights.ChangeValue(3, 4) = +0.99801949820651126000;
465     aPoles.ChangeValue(3, 4) = gp_Pnt(+122.68659332837821000000, +1.35499438550965670000, -71.43508181423516100000);
466     aWeights.ChangeValue(3, 5) = +0.99801796211084914000;
467     aPoles.ChangeValue(3, 5) = gp_Pnt(+119.57173533591266000000, +1.35599832254451200000, -72.99244308799212900000);
468     aWeights.ChangeValue(3, 6) = +0.99801651211145281000;
469     aPoles.ChangeValue(3, 6) = gp_Pnt(+116.43595392098000000000, +1.35694592285710100000, -74.50721127326711700000);
470     aWeights.ChangeValue(3, 7) = +0.99801547938002733000;
471     aPoles.ChangeValue(3, 7) = gp_Pnt(+113.28000153804584000000, +1.35762078417993900000, -75.97921900496575600000);
472     aWeights.ChangeValue(3, 8) = +0.99801427699595313000;
473     aPoles.ChangeValue(3, 8) = gp_Pnt(+110.10443724854701000000, +1.35840649430771500000, -77.40790012997213400000);
474     aWeights.ChangeValue(3, 9) = +0.99801219521191387000;
475     aPoles.ChangeValue(3, 9) = gp_Pnt(+103.71561277285424000000, +1.35976677896647580000, -80.17831514578958300000);
476     aWeights.ChangeValue(3, 10) = +0.99801119017200446000;
477     aPoles.ChangeValue(3, 10) = gp_Pnt(+100.50232486897988000000, +1.36042346207845170000, -81.51999289835789900000);
478     aWeights.ChangeValue(3, 11) = +0.99801030363459775000;
479     aPoles.ChangeValue(3, 11) = gp_Pnt(+97.27087733082035500000, +1.36100269005924380000, -82.81788136334564900000);
480     aWeights.ChangeValue(3, 12) = +0.99800944410125381000;
481     aPoles.ChangeValue(3, 12) = gp_Pnt(+94.02193936655145000000, +1.36156425167614130000, -84.07165794609035500000);
482     aWeights.ChangeValue(3, 13) = +0.99800863606857426000;
483     aPoles.ChangeValue(3, 13) = gp_Pnt(+90.75622955795523700000, +1.36209214789795310000, -85.28105659074749700000);
484     aWeights.ChangeValue(3, 14) = +0.99800791446328430000;
485     aPoles.ChangeValue(3, 14) = gp_Pnt(+87.47446474935537700000, +1.36256356235759690000, -86.44582972368263500000);
486     aWeights.ChangeValue(3, 15) = +0.99800720379689600000;
487     aPoles.ChangeValue(3, 15) = gp_Pnt(+84.17731596959211500000, +1.36302781837419680000, -87.56569962027794000000);
488     aWeights.ChangeValue(3, 16) = +0.99800525790220496000;
489     aPoles.ChangeValue(3, 16) = gp_Pnt(+74.24198734063921300000, +1.36429897306986340000, -90.78996991844945800000);
490     aWeights.ChangeValue(3, 17) = +0.99800413521623321000;
491     aPoles.ChangeValue(3, 17) = gp_Pnt(+67.56001809965197000000, +1.36503231983535440000, -92.75885901427626800000);
492     aWeights.ChangeValue(3, 18) = +0.99800316736440942000;
493     aPoles.ChangeValue(3, 18) = gp_Pnt(+60.82490109578901600000, +1.36566449260567850000, -94.54523441794054900000);
494     aWeights.ChangeValue(3, 19) = +0.99800233531441818000;
495     aPoles.ChangeValue(3, 19) = gp_Pnt(+54.04219505707111900000, +1.36620793936844790000, -96.14746061467829500000);
496     aWeights.ChangeValue(3, 20) = +0.99800162387306934000;
497     aPoles.ChangeValue(3, 20) = gp_Pnt(+47.21773986109732800000, +1.36667259642912180000, -97.56414160157402200000);
498     aWeights.ChangeValue(3, 21) = +0.99800102168630012000;
499     aPoles.ChangeValue(3, 21) = gp_Pnt(+40.35765665228271400000, +1.36706588836418840000, -98.79412083143951400000);
500     aWeights.ChangeValue(3, 22) = +0.99800052123917371000;
501     aPoles.ChangeValue(3, 22) = gp_Pnt(+33.46834796257081700000, +1.36739272798589770000, -99.83648116661171900000);
502     aWeights.ChangeValue(3, 23) = +0.99799971600020576000;
503     aPoles.ChangeValue(3, 23) = gp_Pnt(+19.64441706716387900000, +1.36791861440644060000, -101.54459131896159000000);
504     aWeights.ChangeValue(3, 24) = +0.99799940935225717000;
505     aPoles.ChangeValue(3, 24) = gp_Pnt(+12.70928858254282900000, +1.36811887624638580000, -102.21030492597274000000);
506     aWeights.ChangeValue(3, 25) = +0.99799919351964705000;
507     aPoles.ChangeValue(3, 25) = gp_Pnt(+5.75722078489831280000, +1.36825982711689180000, -102.68697252648171000000);
508     aWeights.ChangeValue(3, 26) = +0.99799906478455291000;
509     aPoles.ChangeValue(3, 26) = gp_Pnt(-1.20571159764999210000, +1.36834389755229970000, -102.97410341218257000000);
510     aWeights.ChangeValue(3, 27) = +0.99799902110371730000;
511     aPoles.ChangeValue(3, 27) = gp_Pnt(-8.17346746041202720000, +1.36837242333404090000, -103.07142929357101000000);
512     aWeights.ChangeValue(3, 28) = +0.99799906210844536000;
513     aPoles.ChangeValue(3, 28) = gp_Pnt(-15.14003926915473600000, +1.36834564548690430000, -102.97890429403182000000);
514     aWeights.ChangeValue(3, 29) = +0.99799918910460783000;
515     aPoles.ChangeValue(3, 29) = gp_Pnt(-22.09945300681867100000, +1.36826271027814080000, -102.69670494840925000000);
516     aWeights.ChangeValue(3, 30) = +0.99799962065035785000;
517     aPoles.ChangeValue(3, 30) = gp_Pnt(-35.99208002634647800000, +1.36798088374117890000, -101.75375562004130000000);
518     aWeights.ChangeValue(3, 31) = +0.99799992612548816000;
519     aPoles.ChangeValue(3, 31) = gp_Pnt(-42.92529183965938000000, +1.36778138671521220000, -101.09300634269859000000);
520     aWeights.ChangeValue(3, 32) = +0.99800032324181509000;
521     aPoles.ChangeValue(3, 32) = gp_Pnt(-49.83946240643516700000, +1.36752203923507090000, -100.24338136864999000000);
522     aWeights.ChangeValue(3, 33) = +0.99800081646744487000;
523     aPoles.ChangeValue(3, 33) = gp_Pnt(-56.72868525600537000000, +1.36719992054037180000, -99.20550257416397200000);
524     aWeights.ChangeValue(3, 34) = +0.99800141299480705000;
525     aPoles.ChangeValue(3, 34) = gp_Pnt(-63.58708851299418500000, +1.36681032802942060000, -97.98021473616272200000);
526     aWeights.ChangeValue(3, 35) = +0.99800212274065336000;
527     aPoles.ChangeValue(3, 35) = gp_Pnt(-70.40883481115771800000, +1.36634677727753220000, -96.56858555851044900000);
528     aWeights.ChangeValue(3, 36) = +0.99800295834605834000;
529     aPoles.ChangeValue(3, 36) = gp_Pnt(-77.18812120943384500000, +1.36580100206191160000, -94.97190570545618000000);
530     aWeights.ChangeValue(3, 37) = +0.99800438851666018000;
531     aPoles.ChangeValue(3, 37) = gp_Pnt(-87.04430869357409500000, +1.36486684103840930000, -92.36516064771883800000);
532     aWeights.ChangeValue(3, 38) = +0.99800487302440710000;
533     aPoles.ChangeValue(3, 38) = gp_Pnt(-90.15904180478642600000, +1.36455036334574700000, -91.49906951050012100000);
534     aWeights.ChangeValue(3, 39) = +0.99800538998403165000;
535     aPoles.ChangeValue(3, 39) = gp_Pnt(-93.26280104894121300000, +1.36421268117563340000, -90.59356682763008500000);
536     aWeights.ChangeValue(3, 40) = +0.99800594114472085000;
537     aPoles.ChangeValue(3, 40) = gp_Pnt(-96.35501076566437500000, +1.36385265030680070000, -89.64881447076304300000);
538     aWeights.ChangeValue(3, 41) = +0.99800652872047668000;
539     aPoles.ChangeValue(3, 41) = gp_Pnt(-99.43509702281136200000, +1.36346882243976730000, -88.66498478868943800000);
540     aWeights.ChangeValue(3, 42) = +0.99800715539011531000;
541     aPoles.ChangeValue(3, 42) = gp_Pnt(-102.50248760972849000000, +1.36305944519955100000, -87.64226061031386900000);
542     aWeights.ChangeValue(3, 43) = +0.99800782429726853000;
543     aPoles.ChangeValue(3, 43) = gp_Pnt(-105.55661203062589000000, +1.36262246213878830000, -86.58083524789229600000);
544     aWeights.ChangeValue(3, 44) = +0.99800929984388531000;
545     aPoles.ChangeValue(3, 44) = gp_Pnt(-111.87105232543304000000, +1.36165848631400000000, -84.29637819122412200000);
546     aWeights.ChangeValue(3, 45) = +0.99801015470554688000;
547     aPoles.ChangeValue(3, 45) = gp_Pnt(-115.12916723990907000000, +1.36109998387148300000, -83.06721412498791300000);
548     aWeights.ChangeValue(3, 46) = +0.99801097177629106000;
549     aPoles.ChangeValue(3, 46) = gp_Pnt(-118.37050305702043000000, +1.36056615831231790000, -81.79361556056927900000);
550     aWeights.ChangeValue(3, 47) = +0.99801197939908182000;
551     aPoles.ChangeValue(3, 47) = gp_Pnt(-121.59440429164877000000, +1.35990780214188640000, -80.47594855348815200000);
552     aWeights.ChangeValue(3, 48) = +0.99801295017732938000;
553     aPoles.ChangeValue(3, 48) = gp_Pnt(-124.80011198391350000000, +1.35927349774917520000, -79.11439339164216700000);
554     aWeights.ChangeValue(3, 49) = +0.99801403220993246000;
555     aPoles.ChangeValue(3, 49) = gp_Pnt(-127.98695272451793000000, +1.35856646260703170000, -77.70931006235629500000);
556     aWeights.ChangeValue(3, 50) = +0.99801521135673477000;
557     aPoles.ChangeValue(3, 50) = gp_Pnt(-131.15422466608416000000, +1.35779592883408770000, -76.26099835790641600000);
558     aWeights.ChangeValue(3, 51) = +0.99801760008173268000;
559     aPoles.ChangeValue(3, 51) = gp_Pnt(-137.22341426940562000000, +1.35623488186342090000, -73.38505097675174200000);
560     aWeights.ChangeValue(3, 52) = +0.99801898347031770000;
561     aPoles.ChangeValue(3, 52) = gp_Pnt(-140.12817143218851000000, +1.35533077140178190000, -71.96340636458091900000);
562     aWeights.ChangeValue(3, 53) = +0.99801998518653323000;
563     aPoles.ChangeValue(3, 53) = gp_Pnt(-143.01477271081365000000, +1.35467609324036100000, -70.50482384325539400000);
564     aWeights.ChangeValue(3, 54) = +0.99802187318341851000;
565     aPoles.ChangeValue(3, 54) = gp_Pnt(-145.88296929650440000000, +1.35344206211285110000, -69.01011970904052400000);
566     aWeights.ChangeValue(3, 55) = +0.99802301113749214000;
567     aPoles.ChangeValue(3, 55) = gp_Pnt(-148.73181832948791000000, +1.35269822187277230000, -67.47885556090747600000);
568     aWeights.ChangeValue(3, 56) = +0.99802485896116799000;
569     aPoles.ChangeValue(3, 56) = gp_Pnt(-151.56108889838526000000, +1.35149030610332030000, -65.91196867904423600000);
570     aWeights.ChangeValue(3, 57) = +0.99802660746081140000;
571     aPoles.ChangeValue(3, 57) = gp_Pnt(-154.37005843077941000000, +1.35034719652907540000, -64.30939181125272300000);
572     aWeights.ChangeValue(3, 58) = +0.99803055992501810000;
573     aPoles.ChangeValue(3, 58) = gp_Pnt(-160.16078498432634000000, +1.34776300585323040000, -60.90758294114521500000);
574     aWeights.ChangeValue(3, 59) = +0.99803322842151521000;
575     aPoles.ChangeValue(3, 59) = gp_Pnt(-163.13986451909619000000, +1.34601805132734250000, -59.10384793755353900000);
576     aWeights.ChangeValue(3, 60) = +0.99803464125751229000;
577     aPoles.ChangeValue(3, 60) = gp_Pnt(-166.09208359425281000000, +1.34509430571165490000, -57.25595351707911400000);
578     aWeights.ChangeValue(3, 61) = +0.99803901668572381000;
579     aPoles.ChangeValue(3, 61) = gp_Pnt(-169.02259847263389000000, +1.34223252516315280000, -55.37471701865561600000);
580     aWeights.ChangeValue(3, 62) = +0.99804026123487555000;
581     aPoles.ChangeValue(3, 62) = gp_Pnt(-171.92274649713781000000, +1.34141857200850120000, -53.44681670722970100000);
582     aWeights.ChangeValue(3, 63) = +0.99804470691034153000;
583     aPoles.ChangeValue(3, 63) = gp_Pnt(-174.79824691248783000000, +1.33851025764084610000, -51.48277226031661500000);
584     aWeights.ChangeValue(3, 64) = +0.99804786265209489000;
585     aPoles.ChangeValue(3, 64) = gp_Pnt(-177.64589658566118000000, +1.33644541377468110000, -49.47887210970986900000);
586     aWeights.ChangeValue(3, 65) = +0.99805209132461004000;
587     aPoles.ChangeValue(3, 65) = gp_Pnt(-180.46609411219177000000, +1.33367801102763010000, -47.43691639460438100000);
588     aWeights.ChangeValue(3, 66) = +0.99805585511720041000;
589     aPoles.ChangeValue(3, 66) = gp_Pnt(-183.08478109176986000000, +1.33121501172845690000, -45.54077967192022000000);
590     aWeights.ChangeValue(3, 67) = +0.99806110806405779000;
591     aPoles.ChangeValue(3, 67) = gp_Pnt(-185.68001727848417000000, +1.32777577033982250000, -43.61205685047624300000);
592     aWeights.ChangeValue(3, 68) = +0.99806241123000117000;
593     aPoles.ChangeValue(3, 68) = gp_Pnt(-188.24953622256075000000, +1.32692526187276720000, -41.64902509374122300000);
594     aWeights.ChangeValue(3, 69) = +0.99807437025077705000;
595     aPoles.ChangeValue(3, 69) = gp_Pnt(-190.79766796840426000000, +1.31909012471800140000, -39.65777616520052400000);
596     aWeights.ChangeValue(3, 70) = +0.99807032269259688000;
597     aPoles.ChangeValue(3, 70) = gp_Pnt(-193.31511620328166000000, +1.32174544077043810000, -37.62798636408343400000);
598     aWeights.ChangeValue(3, 71) = +0.99808625039380772000;
599     aPoles.ChangeValue(3, 71) = gp_Pnt(-195.81278252670535000000, +1.31130937814640340000, -35.57429171163009600000);
600     aWeights.ChangeValue(3, 72) = +0.99809097922828749000;
601     aPoles.ChangeValue(3, 72) = gp_Pnt(-198.28008499427182000000, +1.30820906528388470000, -33.48422839734306700000);
602     aWeights.ChangeValue(3, 73) = +0.99809984631895698000;
603     aPoles.ChangeValue(3, 73) = gp_Pnt(-200.72099421295775000000, +1.30239515227575060000, -31.36416391357070300000);
604     aWeights.ChangeValue(3, 74) = +0.99810637147759285000;
605     aPoles.ChangeValue(3, 74) = gp_Pnt(-203.16127009409345000000, +1.29812048781277520000, -29.24337154392900800000);
606     aWeights.ChangeValue(3, 75) = +0.99812847998895315000;
607     aPoles.ChangeValue(3, 75) = gp_Pnt(-205.57777363915829000000, +1.28359951668439790000, -27.09591401257074100000);
608     aWeights.ChangeValue(3, 76) = +0.99809892249848597000;
609     aPoles.ChangeValue(3, 76) = gp_Pnt(-207.95321979211485000000, +1.30303533816127510000, -24.90029856221717000000);
610     aWeights.ChangeValue(3, 77) = +0.99819234539248169000;
611     aPoles.ChangeValue(3, 77) = gp_Pnt(-210.32920376311637000000, +1.24168994973372330000, -22.71372419603407900000);
612     aWeights.ChangeValue(3, 78) = +0.99816706733577565000;
613     aPoles.ChangeValue(3, 78) = gp_Pnt(-212.65404345030839000000, +1.25824740351837460000, -20.46200135460381000000);
614     aWeights.ChangeValue(3, 79) = +0.99818127776964660000;
615     aPoles.ChangeValue(3, 79) = gp_Pnt(-214.94032188963598000000, +1.24888524402456480000, -18.17894168737611000000);
616     aWeights.ChangeValue(3, 80) = +0.99819475509197664000;
617     aPoles.ChangeValue(3, 80) = gp_Pnt(-217.21049138159862000000, +1.24010538580557930000, -15.87773552075580100000);
618     aWeights.ChangeValue(3, 81) = +0.99826376750414003000;
619     aPoles.ChangeValue(3, 81) = gp_Pnt(-219.45963474898130000000, +1.19454909379966280000, -13.56324778739743800000);
620     aWeights.ChangeValue(4, 1) = +0.99424302042862245000;
621     aPoles.ChangeValue(4, 1) = gp_Pnt(+132.13618409480023000000, +0.70840889522526063000, -66.94024029007874800000);
622     aWeights.ChangeValue(4, 2) = +0.99423758610938695000;
623     aPoles.ChangeValue(4, 2) = gp_Pnt(+129.08297406972278000000, +0.70909252303575865000, -68.62615176496952100000);
624     aWeights.ChangeValue(4, 3) = +0.99423305718875432000;
625     aPoles.ChangeValue(4, 3) = gp_Pnt(+126.00685240811242000000, +0.70966228194967051000, -70.27050713058781600000);
626     aWeights.ChangeValue(4, 4) = +0.99422944886444642000;
627     aPoles.ChangeValue(4, 4) = gp_Pnt(+122.90845587213282000000, +0.71011623149435366000, -71.87297804945868100000);
628     aWeights.ChangeValue(4, 5) = +0.99422505844796127000;
629     aPoles.ChangeValue(4, 5) = gp_Pnt(+119.78834767262531000000, +0.71066859395963999000, -73.43294438704307900000);
630     aWeights.ChangeValue(4, 6) = +0.99422091417503022000;
631     aPoles.ChangeValue(4, 6) = gp_Pnt(+116.64728496160824000000, +0.71119000548737488000, -74.95024473036627900000);
632     aWeights.ChangeValue(4, 7) = +0.99421796254996875000;
633     aPoles.ChangeValue(4, 7) = gp_Pnt(+113.48602386120655000000, +0.71156137519735096000, -76.42471498016054500000);
634     aWeights.ChangeValue(4, 8) = +0.99421452605999638000;
635     aPoles.ChangeValue(4, 8) = gp_Pnt(+110.30511547520040000000, +0.71199375553590705000, -77.85578472764748900000);
636     aWeights.ChangeValue(4, 9) = +0.99420857626658776000;
637     aPoles.ChangeValue(4, 9) = gp_Pnt(+103.90553506044348000000, +0.71274238201017392000, -80.63083668700706100000);
638     aWeights.ChangeValue(4, 10) = +0.99420570386914531000;
639     aPoles.ChangeValue(4, 10) = gp_Pnt(+100.68683453164211000000, +0.71310380757531833000, -81.97476109354066400000);
640     aWeights.ChangeValue(4, 11) = +0.99420317017586146000;
641     aPoles.ChangeValue(4, 11) = gp_Pnt(+97.44994659335081600000, +0.71342262156961334000, -83.27482261755635300000);
642     aWeights.ChangeValue(4, 12) = +0.99420071368291341000;
643     aPoles.ChangeValue(4, 12) = gp_Pnt(+94.19554253170841200000, +0.71373172711717636000, -84.53069694549194000000);
644     aWeights.ChangeValue(4, 13) = +0.99419840439350793000;
645     aPoles.ChangeValue(4, 13) = gp_Pnt(+90.92433917217061900000, +0.71402231445757036000, -85.74211902365664200000);
646     aWeights.ChangeValue(4, 14) = +0.99419634212229768000;
647     aPoles.ChangeValue(4, 14) = gp_Pnt(+87.63705473050230000000, +0.71428182289044062000, -86.90884124933938900000);
648     aWeights.ChangeValue(4, 15) = +0.99419431112670464000;
649     aPoles.ChangeValue(4, 15) = gp_Pnt(+84.33436439436984200000, +0.71453739893908408000, -88.03058362353205300000);
650     aWeights.ChangeValue(4, 16) = +0.99418875003915341000;
651     aPoles.ChangeValue(4, 16) = gp_Pnt(+74.38231313217285400000, +0.71523720648163680000, -91.26025430410756200000);
652     aWeights.ChangeValue(4, 17) = +0.99418554160984429000;
653     aPoles.ChangeValue(4, 17) = gp_Pnt(+67.68910051798944500000, +0.71564096751482986000, -93.23244050128337800000);
654     aWeights.ChangeValue(4, 18) = +0.99418277570171931000;
655     aPoles.ChangeValue(4, 18) = gp_Pnt(+60.94265918181897500000, +0.71598904839509359000, -95.02180567308657500000);
656     aWeights.ChangeValue(4, 19) = +0.99418039790864621000;
657     aPoles.ChangeValue(4, 19) = gp_Pnt(+54.14855416044807900000, +0.71628829211206946000, -96.62671289123449000000);
658     aWeights.ChangeValue(4, 20) = +0.99417836479981814000;
659     aPoles.ChangeValue(4, 20) = gp_Pnt(+47.31263275511362600000, +0.71654416141740851000, -98.04576467050098600000);
660     aWeights.ChangeValue(4, 21) = +0.99417664391975691000;
661     aPoles.ChangeValue(4, 21) = gp_Pnt(+40.44102486854357200000, +0.71676073875086976000, -99.27780280738555500000);
662     aWeights.ChangeValue(4, 22) = +0.99417521378830997000;
663     aPoles.ChangeValue(4, 22) = gp_Pnt(+33.54014335198198900000, +0.71694072618465221000, -100.32190824729783000000);
664     aWeights.ChangeValue(4, 23) = +0.99417291266204433000;
665     aPoles.ChangeValue(4, 23) = gp_Pnt(+19.69298272358705000000, +0.71723033475882103000, -102.03287833894613000000);
666     aWeights.ChangeValue(4, 24) = +0.99417203636017570000;
667     aPoles.ChangeValue(4, 24) = gp_Pnt(+12.74619890889187300000, +0.71734062296661449000, -102.69970663658552000000);
668     aWeights.ChangeValue(4, 25) = +0.99417141958182476000;
669     aPoles.ChangeValue(4, 25) = gp_Pnt(+5.78245043030823250000, +0.71741824902277995000, -103.17717197796689000000);
670     aWeights.ChangeValue(4, 26) = +0.99417105170022846000;
671     aPoles.ChangeValue(4, 26) = gp_Pnt(-1.19217909208406270000, +0.71746454980293017000, -103.46478315098152000000);
672     aWeights.ChangeValue(4, 27) = +0.99417092687508068000;
673     aPoles.ChangeValue(4, 27) = gp_Pnt(-8.17163978203099180000, +0.71748026003105458000, -103.56227159755184000000);
674     aWeights.ChangeValue(4, 28) = +0.99417104405253187000;
675     aPoles.ChangeValue(4, 28) = gp_Pnt(-15.14991535484593800000, +0.71746551227361877000, -103.46959139663633000000);
676     aWeights.ChangeValue(4, 29) = +0.99417140696519068000;
677     aPoles.ChangeValue(4, 29) = gp_Pnt(-22.12102296425817400000, +0.71741983693815459000, -103.18691926012113000000);
678     aWeights.ChangeValue(4, 30) = +0.99417264018315676000;
679     aPoles.ChangeValue(4, 30) = gp_Pnt(-36.03699423807252300000, +0.71726462804712465000, -102.24239043165372000000);
680     aWeights.ChangeValue(4, 31) = +0.99417351313460955000;
681     aPoles.ChangeValue(4, 31) = gp_Pnt(-42.98185258768797500000, +0.71715476185170723000, -101.58053487832193000000);
682     aWeights.ChangeValue(4, 32) = +0.99417464796983568000;
683     aPoles.ChangeValue(4, 32) = gp_Pnt(-49.90763755490115700000, +0.71701193671091712000, -100.72948788576410000000);
684     aWeights.ChangeValue(4, 33) = +0.99417605745995530000;
685     aPoles.ChangeValue(4, 33) = gp_Pnt(-56.80843390632649900000, +0.71683454604177377000, -99.68987236817491700000);
686     aWeights.ChangeValue(4, 34) = +0.99417776216385467000;
687     aPoles.ChangeValue(4, 34) = gp_Pnt(-63.67836146608049600000, +0.71662000367742562000, -98.46253420440308400000);
688     aWeights.ChangeValue(4, 35) = +0.99417979042818705000;
689     aPoles.ChangeValue(4, 35) = gp_Pnt(-70.51157486810592400000, +0.71636474389607163000, -97.04854231351581000000);
690     aWeights.ChangeValue(4, 36) = +0.99418217838737100000;
691     aPoles.ChangeValue(4, 36) = gp_Pnt(-77.30226331485057800000, +0.71606422146024096000, -95.44918875092946600000);
692     aWeights.ChangeValue(4, 37) = +0.99418626551507883000;
693     aPoles.ChangeValue(4, 37) = gp_Pnt(-87.17503156127875700000, +0.71554987190288122000, -92.83807781738744300000);
694     aWeights.ChangeValue(4, 38) = +0.99418765014289556000;
695     aPoles.ChangeValue(4, 38) = gp_Pnt(-90.29499963358738100000, +0.71537562386381059000, -91.97053762881716900000);
696     aWeights.ChangeValue(4, 39) = +0.99418912751868260000;
697     aPoles.ChangeValue(4, 39) = gp_Pnt(-93.40397633478176000000, +0.71518970580821706000, -91.06351986664817800000);
698     aWeights.ChangeValue(4, 40) = +0.99419070264287346000;
699     aPoles.ChangeValue(4, 40) = gp_Pnt(-96.50138523104767800000, +0.71499148886670094000, -90.11718659777564300000);
700     aWeights.ChangeValue(4, 41) = +0.99419238184469383000;
701     aPoles.ChangeValue(4, 41) = gp_Pnt(-99.58665166110419900000, +0.71478017704711161000, -89.13171035602891800000);
702     aWeights.ChangeValue(4, 42) = +0.99419417278216393000;
703     aPoles.ChangeValue(4, 42) = gp_Pnt(-102.65920271683186000000, +0.71455480723882170000, -88.10727415073346000000);
704     aWeights.ChangeValue(4, 43) = +0.99419608444209617000;
705     aPoles.ChangeValue(4, 43) = gp_Pnt(-105.71846722422283000000, +0.71431424921765596000, -87.04407147601585800000);
706     aWeights.ChangeValue(4, 44) = +0.99420030141669824000;
707     aPoles.ChangeValue(4, 44) = gp_Pnt(-112.04353021881408000000, +0.71378360593609291000, -84.75579106017932000000);
708     aWeights.ChangeValue(4, 45) = +0.99420274455295243000;
709     aPoles.ChangeValue(4, 45) = gp_Pnt(-115.30712351688430000000, +0.71347617951477893000, -83.52457168950516600000);
710     aWeights.ChangeValue(4, 46) = +0.99420507969516914000;
711     aPoles.ChangeValue(4, 46) = gp_Pnt(-118.55391065270935000000, +0.71318234625457844000, -82.24884224143599500000);
712     aWeights.ChangeValue(4, 47) = +0.99420795946419460000;
713     aPoles.ChangeValue(4, 47) = gp_Pnt(-121.78323693095153000000, +0.71281998990170370000, -80.92897147787398600000);
714     aWeights.ChangeValue(4, 48) = +0.99421073394729520000;
715     aPoles.ChangeValue(4, 48) = gp_Pnt(-124.99434061394447000000, +0.71247088780699119000, -79.56513754354314500000);
716     aWeights.ChangeValue(4, 49) = +0.99421382643715051000;
717     aPoles.ChangeValue(4, 49) = gp_Pnt(-128.18654935306802000000, +0.71208178090166396000, -78.15770189412481300000);
718     aWeights.ChangeValue(4, 50) = +0.99421719652005114000;
719     aPoles.ChangeValue(4, 50) = gp_Pnt(-131.35915951555538000000, +0.71165775668839981000, -76.70696466864815500000);
720     aWeights.ChangeValue(4, 51) = +0.99422402375653052000;
721     aPoles.ChangeValue(4, 51) = gp_Pnt(-137.43857370930490000000, +0.71079877890710363000, -73.82620311743470200000);
722     aWeights.ChangeValue(4, 52) = +0.99422797768691740000;
723     aPoles.ChangeValue(4, 52) = gp_Pnt(-140.34822128390073000000, +0.71030132584778982000, -72.40218284379008700000);
724     aWeights.ChangeValue(4, 53) = +0.99423084075610579000;
725     aPoles.ChangeValue(4, 53) = gp_Pnt(-143.23968120103163000000, +0.70994112075449667000, -70.94115847846593700000);
726     aWeights.ChangeValue(4, 54) = +0.99423623706224973000;
727     aPoles.ChangeValue(4, 54) = gp_Pnt(-146.11271315064005000000, +0.70926223398833632000, -69.44395856663618400000);
728     aWeights.ChangeValue(4, 55) = +0.99423948964319253000;
729     aPoles.ChangeValue(4, 55) = gp_Pnt(-148.96636467875118000000, +0.70885305306993507000, -67.91012785943519200000);
730     aWeights.ChangeValue(4, 56) = +0.99424477127021760000;
731     aPoles.ChangeValue(4, 56) = gp_Pnt(-151.80041102174371000000, +0.70818863107582075000, -66.34061951491401000000);
732     aWeights.ChangeValue(4, 57) = +0.99424976912431906000;
733     aPoles.ChangeValue(4, 57) = gp_Pnt(-154.61412826195317000000, +0.70755993553172780000, -64.73535576374381200000);
734     aWeights.ChangeValue(4, 58) = +0.99426106692542415000;
735     aPoles.ChangeValue(4, 58) = gp_Pnt(-160.41462700323274000000, +0.70613881146866808000, -61.32785485541679500000);
736     aWeights.ChangeValue(4, 59) = +0.99426869485276259000;
737     aPoles.ChangeValue(4, 59) = gp_Pnt(-163.39874797129167000000, +0.70517937516238605000, -59.52109641918814000000);
738     aWeights.ChangeValue(4, 60) = +0.99427273335051769000;
739     aPoles.ChangeValue(4, 60) = gp_Pnt(-166.35588428707737000000, +0.70467140031138198000, -57.67014968010805400000);
740     aWeights.ChangeValue(4, 61) = +0.99428524121150996000;
741     aPoles.ChangeValue(4, 61) = gp_Pnt(-169.29147402675417000000, +0.70309833118760823000, -55.78569706052214600000);
742     aWeights.ChangeValue(4, 62) = +0.99428879891231192000;
743     aPoles.ChangeValue(4, 62) = gp_Pnt(-172.19641321622018000000, +0.70265088960130029000, -53.85463096447261900000);
744     aWeights.ChangeValue(4, 63) = +0.99430150819260854000;
745     aPoles.ChangeValue(4, 63) = gp_Pnt(-175.07684836851479000000, +0.70105264832187786000, -51.88726956537038900000);
746     aWeights.ChangeValue(4, 64) = +0.99431053021705873000;
747     aPoles.ChangeValue(4, 64) = gp_Pnt(-177.92932492963632000000, +0.69991818857623234000, -49.88000737868681300000);
748     aWeights.ChangeValue(4, 65) = +0.99432262020918794000;
749     aPoles.ChangeValue(4, 65) = gp_Pnt(-180.75433885652521000000, +0.69839807993520564000, -47.83460859504128800000);
750     aWeights.ChangeValue(4, 66) = +0.99433338093448842000;
751     aPoles.ChangeValue(4, 66) = gp_Pnt(-183.37745173242254000000, +0.69704510882650861000, -45.93530736698277700000);
752     aWeights.ChangeValue(4, 67) = +0.99434840096468768000;
753     aPoles.ChangeValue(4, 67) = gp_Pnt(-185.97711214268182000000, +0.69515696483250133000, -44.00334265992864100000);
754     aWeights.ChangeValue(4, 68) = +0.99435212441487342000;
755     aPoles.ChangeValue(4, 68) = gp_Pnt(-188.55092060214918000000, +0.69468843290184534000, -42.03706245316480100000);
756     aWeights.ChangeValue(4, 69) = +0.99438632495837886000;
757     aPoles.ChangeValue(4, 69) = gp_Pnt(-191.10351948864678000000, +0.69039032514405918000, -40.04240176159244400000);
758     aWeights.ChangeValue(4, 70) = +0.99437474610357146000;
759     aPoles.ChangeValue(4, 70) = gp_Pnt(-193.62512272227769000000, +0.69184483548244469000, -38.00925246210125900000);
760     aWeights.ChangeValue(4, 71) = +0.99442029730057158000;
761     aPoles.ChangeValue(4, 71) = gp_Pnt(-196.12715745709386000000, +0.68612074693666814000, -35.95207510226987300000);
762     aWeights.ChangeValue(4, 72) = +0.99443382321708784000;
763     aPoles.ChangeValue(4, 72) = gp_Pnt(-198.59871781224271000000, +0.68442148883790921000, -33.85842837168388500000);
764     aWeights.ChangeValue(4, 73) = +0.99445918644353237000;
765     aPoles.ChangeValue(4, 73) = gp_Pnt(-201.04387700918369000000, +0.68123533540985159000, -31.73471330438436400000);
766     aWeights.ChangeValue(4, 74) = +0.99447784672499884000;
767     aPoles.ChangeValue(4, 74) = gp_Pnt(-203.48830197003542000000, +0.67889067518118906000, -29.61036197082074800000);
768     aWeights.ChangeValue(4, 75) = +0.99454111417144087000;
769     aPoles.ChangeValue(4, 75) = gp_Pnt(-205.90905874701556000000, +0.67094847421818948000, -27.45911353863423800000);
770     aWeights.ChangeValue(4, 76) = +0.99445650432969468000;
771     aPoles.ChangeValue(4, 76) = gp_Pnt(-208.28851122415659000000, +0.68156618053615436000, -25.25989914496455000000);
772     aWeights.ChangeValue(4, 77) = +0.99472383917628937000;
773     aPoles.ChangeValue(4, 77) = gp_Pnt(-210.66819860636727000000, +0.64801004101885640000, -23.06997485052475800000);
774     aWeights.ChangeValue(4, 78) = +0.99465154011060308000;
775     aPoles.ChangeValue(4, 78) = gp_Pnt(-212.99829629837927000000, +0.65709020698928045000, -20.81293704958459000000);
776     aWeights.ChangeValue(4, 79) = +0.99469225299704522000;
777     aPoles.ChangeValue(4, 79) = gp_Pnt(-215.28778722004142000000, +0.65198647566642243000, -18.52648999480212300000);
778     aWeights.ChangeValue(4, 80) = +0.99473072608314816000;
779     aPoles.ChangeValue(4, 80) = gp_Pnt(-217.56233176434088000000, +0.64714607636795729000, -16.22125679272672700000);
780     aWeights.ChangeValue(4, 81) = +0.99492849872148770000;
781     aPoles.ChangeValue(4, 81) = gp_Pnt(-219.81591407133737000000, +0.62237708094437050000, -13.90082269618381800000);
782     aWeights.ChangeValue(5, 1) = +0.99802424639217535000;
783     aPoles.ChangeValue(5, 1) = gp_Pnt(+132.45622778603641000000, +0.24240580374773624000, -67.51941232824347600000);
784     aWeights.ChangeValue(5, 2) = +0.99802234515930366000;
785     aPoles.ChangeValue(5, 2) = gp_Pnt(+129.39621499227619000000, +0.24264599956164210000, -69.20932849809996400000);
786     aWeights.ChangeValue(5, 3) = +0.99802076064199163000;
787     aPoles.ChangeValue(5, 3) = gp_Pnt(+126.31320722587012000000, +0.24284620475411531000, -70.85757023346207000000);
788     aWeights.ChangeValue(5, 4) = +0.99801949820656444000;
789     aPoles.ChangeValue(5, 4) = gp_Pnt(+123.20785947444472000000, +0.24300571706284735000, -72.46379895615213200000);
790     aWeights.ChangeValue(5, 5) = +0.99801796211084626000;
791     aPoles.ChangeValue(5, 5) = gp_Pnt(+120.08075545981777000000, +0.24319982314295371000, -74.02745916652884300000);
792     aWeights.ChangeValue(5, 6) = +0.99801651211139986000;
793     aPoles.ChangeValue(5, 6) = gp_Pnt(+116.93263892914923000000, +0.24338306180645181000, -75.54835063375608700000);
794     aWeights.ChangeValue(5, 7) = +0.99801547938007906000;
795     aPoles.ChangeValue(5, 7) = gp_Pnt(+113.76425167349765000000, +0.24351357797625062000, -77.02627451676777100000);
796     aWeights.ChangeValue(5, 8) = +0.99801427699593348000;
797     aPoles.ChangeValue(5, 8) = gp_Pnt(+110.57618061475338000000, +0.24366553774363486000, -78.46071663606139200000);
798     aWeights.ChangeValue(5, 9) = +0.99801219521177365000;
799     aPoles.ChangeValue(5, 9) = gp_Pnt(+104.16217613984874000000, +0.24392865233284403000, -81.24228081548614000000);
800     aWeights.ChangeValue(5, 10) = +0.99801119017243534000;
801     aPoles.ChangeValue(5, 10) = gp_Pnt(+100.93622072836907000000, +0.24405568433254640000, -82.58935804874866400000);
802     aWeights.ChangeValue(5, 11) = +0.99801030363411136000;
803     aPoles.ChangeValue(5, 11) = gp_Pnt(+97.69202612265307600000, +0.24416774311013159000, -83.89246252379766100000);
804     aWeights.ChangeValue(5, 12) = +0.99800944410126124000;
805     aPoles.ChangeValue(5, 12) = gp_Pnt(+94.43027249107268500000, +0.24427639255629080000, -85.15127753548810600000);
806     aWeights.ChangeValue(5, 13) = +0.99800863606905588000;
807     aPoles.ChangeValue(5, 13) = gp_Pnt(+91.15167507122404800000, +0.24437853537532742000, -86.36553541507953500000);
808     aWeights.ChangeValue(5, 14) = +0.99800791446282866000;
809     aPoles.ChangeValue(5, 14) = gp_Pnt(+87.85695090009397700000, +0.24446975628264125000, -87.53498464352057300000);
810     aWeights.ChangeValue(5, 15) = +0.99800720379704511000;
811     aPoles.ChangeValue(5, 15) = gp_Pnt(+84.54678770958248900000, +0.24455959646371978000, -88.65934979276558200000);
812     aWeights.ChangeValue(5, 16) = +0.99800525790220262000;
813     aPoles.ChangeValue(5, 16) = gp_Pnt(+74.57222162875666500000, +0.24480559775636487000, -91.89655746079053200000);
814     aWeights.ChangeValue(5, 17) = +0.99800413521623044000;
815     aPoles.ChangeValue(5, 17) = gp_Pnt(+67.86385477996348900000, +0.24494753702776123000, -93.87334138726605200000);
816     aWeights.ChangeValue(5, 18) = +0.99800316736440708000;
817     aPoles.ChangeValue(5, 18) = gp_Pnt(+61.10212188651380700000, +0.24506990714535715000, -95.66687639706128700000);
818     aWeights.ChangeValue(5, 19) = +0.99800233531441618000;
819     aPoles.ChangeValue(5, 19) = gp_Pnt(+54.29260355218377000000, +0.24517511152453569000, -97.27552257290322800000);
820     aWeights.ChangeValue(5, 20) = +0.99800162387306812000;
821     aPoles.ChangeValue(5, 20) = gp_Pnt(+47.44116356008504500000, +0.24526506890417449000, -98.69787956398771200000);
822     aWeights.ChangeValue(5, 21) = +0.99800102168629923000;
823     aPoles.ChangeValue(5, 21) = gp_Pnt(+40.55394899036769400000, +0.24534121333759545000, -99.93278652962781900000);
824     aWeights.ChangeValue(5, 22) = +0.99800052123917249000;
825     aPoles.ChangeValue(5, 22) = gp_Pnt(+33.63739034141031700000, +0.24540449418574758000, -100.97932209286283000000);
826     aWeights.ChangeValue(5, 23) = +0.99799971600020576000;
827     aPoles.ChangeValue(5, 23) = gp_Pnt(+19.75877904385457000000, +0.24550631764576064000, -102.69427034587730000000);
828     aWeights.ChangeValue(5, 24) = +0.99799940935225595000;
829     aPoles.ChangeValue(5, 24) = gp_Pnt(+12.79621461719473900000, +0.24554509442498113000, -103.36264862290150000000);
830     aWeights.ChangeValue(5, 25) = +0.99799919351964361000;
831     aPoles.ChangeValue(5, 25) = gp_Pnt(+5.81664173483571470000, +0.24557238768930081000, -103.84122357926364000000);
832     aWeights.ChangeValue(5, 26) = +0.99799906478454914000;
833     aPoles.ChangeValue(5, 26) = gp_Pnt(-1.17384006705611750000, +0.24558866712534574000, -104.12950288114470000000);
834     aWeights.ChangeValue(5, 27) = +0.99799902110371452000;
835     aPoles.ChangeValue(5, 27) = gp_Pnt(-8.16916502467035950000, +0.24559419086566145000, -104.22721740658889000000);
836     aWeights.ChangeValue(5, 28) = +0.99799906210844525000;
837     aPoles.ChangeValue(5, 28) = gp_Pnt(-15.16330109337111900000, +0.24558900548798951000, -104.13432123956672000000);
838     aWeights.ChangeValue(5, 29) = +0.99799918910460916000;
839     aPoles.ChangeValue(5, 29) = gp_Pnt(-22.15024989420349800000, +0.24557294601509544000, -103.85099166853988000000);
840     aWeights.ChangeValue(5, 30) = +0.99799962065035952000;
841     aPoles.ChangeValue(5, 30) = gp_Pnt(-36.09784025928350100000, +0.24551837507724711000, -102.90426687944763000000);
842     aWeights.ChangeValue(5, 31) = +0.99799992612548860000;
843     aPoles.ChangeValue(5, 31) = gp_Pnt(-43.05848024708384300000, +0.24547974681812620000, -102.24087223758063000000);
844     aWeights.ChangeValue(5, 32) = +0.99800032324181287000;
845     aPoles.ChangeValue(5, 32) = gp_Pnt(-50.00000136683811300000, +0.24542953068576923000, -101.38784584473753000000);
846     aWeights.ChangeValue(5, 33) = +0.99800081646744143000;
847     aPoles.ChangeValue(5, 33) = gp_Pnt(-56.91647304260395400000, +0.24536716218422927000, -100.34581179308852000000);
848     aWeights.ChangeValue(5, 34) = +0.99800141299480460000;
849     aPoles.ChangeValue(5, 34) = gp_Pnt(-63.80199929133657100000, +0.24529173277606747000, -99.11561770524215800000);
850     aWeights.ChangeValue(5, 35) = +0.99800212274065292000;
851     aPoles.ChangeValue(5, 35) = gp_Pnt(-70.65071863638867500000, +0.24520198988589620000, -97.69833476064030700000);
852     aWeights.ChangeValue(5, 36) = +0.99800295834605834000;
853     aPoles.ChangeValue(5, 36) = gp_Pnt(-77.45680402323041800000, +0.24509633690518939000, -96.09525772913629300000);
854     aWeights.ChangeValue(5, 37) = +0.99800438851665707000;
855     aPoles.ChangeValue(5, 37) = gp_Pnt(-87.35194268844766400000, +0.24491551610541196000, -93.47806376363495000000);
856     aWeights.ChangeValue(5, 38) = +0.99800487302440644000;
857     aPoles.ChangeValue(5, 38) = gp_Pnt(-90.47898339307414500000, +0.24485425955861742000, -92.60850028621504700000);
858     aWeights.ChangeValue(5, 39) = +0.99800538998403221000;
859     aPoles.ChangeValue(5, 39) = gp_Pnt(-93.59500505694055100000, +0.24478890139349116000, -91.69936647202810300000);
860     aWeights.ChangeValue(5, 40) = +0.99800594114472096000;
861     aPoles.ChangeValue(5, 40) = gp_Pnt(-96.69942959625443300000, +0.24471922075774133000, -90.75082469114758500000);
862     aWeights.ChangeValue(5, 41) = +0.99800652872047502000;
863     aPoles.ChangeValue(5, 41) = gp_Pnt(-99.79168063143930600000, +0.24464493811196314000, -89.76304779373697300000);
864     aWeights.ChangeValue(5, 42) = +0.99800715539011187000;
865     aPoles.ChangeValue(5, 42) = gp_Pnt(-102.87118348036965000000, +0.24456571523016235000, -88.73621911304020700000);
866     aWeights.ChangeValue(5, 43) = +0.99800782429726465000;
867     aPoles.ChangeValue(5, 43) = gp_Pnt(-105.93736515171811000000, +0.24448115520035879000, -87.67053246863201800000);
868     aWeights.ChangeValue(5, 44) = +0.99800929984371112000;
869     aPoles.ChangeValue(5, 44) = gp_Pnt(-112.27672847568951000000, +0.24429462970498794000, -85.37690123862388700000);
870     aWeights.ChangeValue(5, 45) = +0.99801015470633669000;
871     aPoles.ChangeValue(5, 45) = gp_Pnt(-115.54769755356581000000, +0.24418656943131900000, -84.14279592325505100000);
872     aWeights.ChangeValue(5, 46) = +0.99801097177455889000;
873     aPoles.ChangeValue(5, 46) = gp_Pnt(-118.80182311076892000000, +0.24408328894344730000, -82.86408351153079400000);
874     aWeights.ChangeValue(5, 47) = +0.99801197940129383000;
875     aPoles.ChangeValue(5, 47) = gp_Pnt(-122.03843417449148000000, +0.24395592759703674000, -81.54111184389478200000);
876     aWeights.ChangeValue(5, 48) = +0.99801295017559344000;
877     aPoles.ChangeValue(5, 48) = gp_Pnt(-125.25678060282321000000, +0.24383322797751039000, -80.17408187890907800000);
878     aWeights.ChangeValue(5, 49) = +0.99801403221073270000;
879     aPoles.ChangeValue(5, 49) = gp_Pnt(-128.45617956663568000000, +0.24369647262362162000, -78.76334161483092100000);
880     aWeights.ChangeValue(5, 50) = +0.99801521135655380000;
881     aPoles.ChangeValue(5, 50) = gp_Pnt(-131.63592529803751000000, +0.24354745092247693000, -77.30919404502431300000);
882     aWeights.ChangeValue(5, 51) = +0.99801760008187401000;
883     aPoles.ChangeValue(5, 51) = gp_Pnt(-137.72900951211963000000, +0.24324557860805471000, -74.42165429070698200000);
884     aWeights.ChangeValue(5, 52) = +0.99801898346970708000;
885     aPoles.ChangeValue(5, 52) = gp_Pnt(-140.64518873661288000000, +0.24307076523393223000, -72.99426192178911800000);
886     aWeights.ChangeValue(5, 53) = +0.99801998518786039000;
887     aPoles.ChangeValue(5, 53) = gp_Pnt(-143.54316005505726000000, +0.24294418386170585000, -71.52981926220020600000);
888     aWeights.ChangeValue(5, 54) = +0.99802187318168345000;
889     aPoles.ChangeValue(5, 54) = gp_Pnt(-146.42260629144496000000, +0.24270562978064991000, -70.02903356238938700000);
890     aWeights.ChangeValue(5, 55) = +0.99802301113888081000;
891     aPoles.ChangeValue(5, 55) = gp_Pnt(-149.28266198929455000000, +0.24256185427332766000, -68.49161271016626500000);
892     aWeights.ChangeValue(5, 56) = +0.99802485896051119000;
893     aPoles.ChangeValue(5, 56) = gp_Pnt(-152.12302992679020000000, +0.24232840183433180000, -66.91836178765569800000);
894     aWeights.ChangeValue(5, 57) = +0.99802660746095961000;
895     aPoles.ChangeValue(5, 57) = gp_Pnt(-154.94301695331424000000, +0.24210751871096883000, -65.30929034698890200000);
896     aWeights.ChangeValue(5, 58) = +0.99803055992501044000;
897     aPoles.ChangeValue(5, 58) = gp_Pnt(-160.75642720778953000000, +0.24160825342055195000, -61.89368007550259400000);
898     aWeights.ChangeValue(5, 59) = +0.99803322842160846000;
899     aPoles.ChangeValue(5, 59) = gp_Pnt(-163.74717060555361000000, +0.24127121961594802000, -60.08255013672670200000);
900     aWeights.ChangeValue(5, 60) = +0.99803464125717123000;
901     aPoles.ChangeValue(5, 60) = gp_Pnt(-166.71086689375946000000, +0.24109275824918924000, -58.22731479955884700000);
902     aWeights.ChangeValue(5, 61) = +0.99803901668628470000;
903     aPoles.ChangeValue(5, 61) = gp_Pnt(-169.65297207222594000000, +0.24054025241076704000, -56.33806928337021700000);
904     aWeights.ChangeValue(5, 62) = +0.99804026123435818000;
905     aPoles.ChangeValue(5, 62) = gp_Pnt(-172.56427255537395000000, +0.24038308942389072000, -54.40260496408483000000);
906     aWeights.ChangeValue(5, 63) = +0.99804470691060532000;
907     aPoles.ChangeValue(5, 63) = gp_Pnt(-175.45101016300779000000, +0.23982181928534163000, -52.43032166263763100000);
908     aWeights.ChangeValue(5, 64) = +0.99804786265202527000;
909     aPoles.ChangeValue(5, 64) = gp_Pnt(-178.30970270493245000000, +0.23942347201733374000, -50.41823769283568900000);
910     aWeights.ChangeValue(5, 65) = +0.99805209132460959000;
911     aPoles.ChangeValue(5, 65) = gp_Pnt(-181.14080917168710000000, +0.23888978094458979000, -48.36782293133622100000);
912     aWeights.ChangeValue(5, 66) = +0.99805585511722006000;
913     aPoles.ChangeValue(5, 66) = gp_Pnt(-183.76963089028271000000, +0.23841474156011525000, -46.46384963887197700000);
914     aWeights.ChangeValue(5, 67) = +0.99806110806389992000;
915     aPoles.ChangeValue(5, 67) = gp_Pnt(-186.37480135254410000000, +0.23775204017864099000, -44.52702607060874100000);
916     aWeights.ChangeValue(5, 68) = +0.99806241123039841000;
917     aPoles.ChangeValue(5, 68) = gp_Pnt(-188.95443339023049000000, +0.23758721013871806000, -42.55611011320790700000);
918     aWeights.ChangeValue(5, 69) = +0.99807437025022461000;
919     aPoles.ChangeValue(5, 69) = gp_Pnt(-191.51185439080101000000, +0.23607937004601673000, -40.55588840407725800000);
920     aWeights.ChangeValue(5, 70) = +0.99807032269304363000;
921     aPoles.ChangeValue(5, 70) = gp_Pnt(-194.03956238778505000000, +0.23658914396266717000, -38.51843887702921200000);
922     aWeights.ChangeValue(5, 71) = +0.99808625039358922000;
923     aPoles.ChangeValue(5, 71) = gp_Pnt(-196.54607703546344000000, +0.23458111537982981000, -36.45513422497234800000);
924     aWeights.ChangeValue(5, 72) = +0.99809097922833689000;
925     aPoles.ChangeValue(5, 72) = gp_Pnt(-199.02284030117690000000, +0.23398526561785285000, -34.35633603568415100000);
926     aWeights.ChangeValue(5, 73) = +0.99809984631895676000;
927     aPoles.ChangeValue(5, 73) = gp_Pnt(-201.47284391020807000000, +0.23286808083306546000, -32.22700780168109700000);
928     aWeights.ChangeValue(5, 74) = +0.99810637147739267000;
929     aPoles.ChangeValue(5, 74) = gp_Pnt(-203.92239692899503000000, +0.23204542949601353000, -30.09717639714928000000);
930     aWeights.ChangeValue(5, 75) = +0.99812847998973830000;
931     aPoles.ChangeValue(5, 75) = gp_Pnt(-206.34684289021220000000, +0.22926391512904498000, -27.93902362306789300000);
932     aWeights.ChangeValue(5, 76) = +0.99809892249694432000;
933     aPoles.ChangeValue(5, 76) = gp_Pnt(-208.73420674519565000000, +0.23297935369059405000, -25.73750919512989600000);
934     aWeights.ChangeValue(5, 77) = +0.99819234539430379000;
935     aPoles.ChangeValue(5, 77) = gp_Pnt(-211.11258262007470000000, +0.22122441504945897000, -23.53328220960779800000);
936     aWeights.ChangeValue(5, 78) = +0.99816706733442118000;
937     aPoles.ChangeValue(5, 78) = gp_Pnt(-213.44890831521380000000, +0.22441150695403267000, -21.27426418813643800000);
938     aWeights.ChangeValue(5, 79) = +0.99818127777024523000;
939     aPoles.ChangeValue(5, 79) = gp_Pnt(-215.74298068197336000000, +0.22262736656649654000, -18.98075706196405200000);
940     aWeights.ChangeValue(5, 80) = +0.99819475509184485000;
941     aPoles.ChangeValue(5, 80) = gp_Pnt(-218.02209738817496000000, +0.22092240555297402000, -16.66880151580776100000);
942     aWeights.ChangeValue(5, 81) = +0.99826376750413803000;
943     aPoles.ChangeValue(5, 81) = gp_Pnt(-220.27506837008727000000, +0.21227676902692139000, -14.33587171753685400000);
944     aWeights.ChangeValue(6, 1) = +1.00955713824395920000;
945     aPoles.ChangeValue(6, 1) = gp_Pnt(+132.82497533600920000000, -0.00000000000000355271, -68.18672206105269100000);
946     aWeights.ChangeValue(6, 2) = +1.00956608612165510000;
947     aPoles.ChangeValue(6, 2) = gp_Pnt(+129.75720107675980000000, -0.00000000000001501048, -69.88134023490506800000);
948     aWeights.ChangeValue(6, 3) = +1.00957354292813720000;
949     aPoles.ChangeValue(6, 3) = gp_Pnt(+126.66630562875893000000, +0.00000000000001468880, -71.53414324810810900000);
950     aWeights.ChangeValue(6, 4) = +1.00957948395969920000;
951     aPoles.ChangeValue(6, 4) = gp_Pnt(+123.55299204973852000000, -0.00000000000002420214, -73.14476521965842400000);
952     aWeights.ChangeValue(6, 5) = +1.00958671248272540000;
953     aPoles.ChangeValue(6, 5) = gp_Pnt(+120.41786571412476000000, +0.00000000000000774289, -74.71276629883676900000);
954     aWeights.ChangeValue(6, 6) = +1.00959353559449030000;
955     aPoles.ChangeValue(6, 6) = gp_Pnt(+117.26165038381876000000, +0.00000000000002827238, -76.23787924846354300000);
956     aWeights.ChangeValue(6, 7) = +1.00959839503053540000;
957     aPoles.ChangeValue(6, 7) = gp_Pnt(+114.08506189168672000000, -0.00000000000002567399, -77.71984701658058700000);
958     aWeights.ChangeValue(6, 8) = +1.00960405269295440000;
959     aPoles.ChangeValue(6, 8) = gp_Pnt(+110.88875430250306000000, +0.00000000000001531652, -79.15824703626482500000);
960     aWeights.ChangeValue(6, 9) = +1.00961384794965610000;
961     aPoles.ChangeValue(6, 9) = gp_Pnt(+104.45816547225203000000, +0.00000000000002372811, -81.94743615023858800000);
962     aWeights.ChangeValue(6, 10) = +1.00961857675613920000;
963     aPoles.ChangeValue(6, 10) = gp_Pnt(+101.22387341781818000000, -0.00000000000003253030, -83.29820264563102200000);
964     aWeights.ChangeValue(6, 11) = +1.00962274789490230000;
965     aPoles.ChangeValue(6, 11) = gp_Pnt(+97.97127406275538400000, +0.00000000000002165813, -84.60486564781918200000);
966     aWeights.ChangeValue(6, 12) = +1.00962679188945900000;
967     aPoles.ChangeValue(6, 12) = gp_Pnt(+94.70106106239124700000, +0.00000000000003307844, -85.86712155505158300000);
968     aWeights.ChangeValue(6, 13) = +1.00963059350859920000;
969     aPoles.ChangeValue(6, 13) = gp_Pnt(+91.41394873512904000000, -0.00000000000001002370, -87.08469757155246800000);
970     aWeights.ChangeValue(6, 14) = +1.00963398843787310000;
971     aPoles.ChangeValue(6, 14) = gp_Pnt(+88.11065082060795800000, -0.00000000000001620026, -88.25733602781997400000);
972     aWeights.ChangeValue(6, 15) = +1.00963733185343440000;
973     aPoles.ChangeValue(6, 15) = gp_Pnt(+84.79187377942922400000, +0.00000000000001387836, -89.38476986722990600000);
974     aWeights.ChangeValue(6, 16) = +1.00964648640037490000;
975     aPoles.ChangeValue(6, 16) = gp_Pnt(+74.79138897281484300000, +0.00000000000001147648, -92.63077806554609600000);
976     aWeights.ChangeValue(6, 17) = +1.00965176794147980000;
977     aPoles.ChangeValue(6, 17) = gp_Pnt(+68.06556894151637500000, +0.00000000000001348105, -94.61292925638954900000);
978     aWeights.ChangeValue(6, 18) = +1.00965632094816880000;
979     aPoles.ChangeValue(6, 18) = gp_Pnt(+61.28620656548358900000, +0.00000000000001132208, -96.41133393799678700000);
980     aWeights.ChangeValue(6, 19) = +1.00966023501695920000;
981     aPoles.ChangeValue(6, 19) = gp_Pnt(+54.45890525472331200000, +0.00000000000000779610, -98.02434736777235000000);
982     aWeights.ChangeValue(6, 20) = +1.00966358166845540000;
983     aPoles.ChangeValue(6, 20) = gp_Pnt(+47.58955228763309700000, +0.00000000000000496426, -99.45056478986435900000);
984     aWeights.ChangeValue(6, 21) = +1.00966641434734750000;
985     aPoles.ChangeValue(6, 21) = gp_Pnt(+40.68431826182812500000, +0.00000000000000415229, -100.68882169811890000000);
986     aWeights.ChangeValue(6, 22) = +1.00966876842241240000;
987     aPoles.ChangeValue(6, 22) = gp_Pnt(+33.74965652868991100000, +0.00000000000000595055, -101.73819405254569000000);
988     aWeights.ChangeValue(6, 23) = +1.00967255617655690000;
989     aPoles.ChangeValue(6, 23) = gp_Pnt(+19.83474481990451800000, +0.00000000000000626687, -103.45778313292877000000);
990     aWeights.ChangeValue(6, 24) = +1.00967399859793900000;
991     aPoles.ChangeValue(6, 24) = gp_Pnt(+12.85396744583563800000, +0.00000000000000961706, -104.12796934503771000000);
992     aWeights.ChangeValue(6, 25) = +1.00967501382969150000;
993     aPoles.ChangeValue(6, 25) = gp_Pnt(+5.85612456199985140000, +0.00000000000001451316, -104.60783896197547000000);
994     aWeights.ChangeValue(6, 26) = +1.00967561936958040000;
995     aPoles.ChangeValue(6, 26) = gp_Pnt(-1.15266320632332260000, +0.00000000000001739414, -104.89689790453474000000);
996     aWeights.ChangeValue(6, 27) = +1.00967582483410530000;
997     aPoles.ChangeValue(6, 27) = gp_Pnt(-8.16630892272242730000, +0.00000000000001688939, -104.99487618531697000000);
998     aWeights.ChangeValue(6, 28) = +1.00967563195849790000;
999     aPoles.ChangeValue(6, 28) = gp_Pnt(-15.17875958769639600000, +0.00000000000001381871, -104.90172793642448000000);
1000     aWeights.ChangeValue(6, 29) = +1.00967503459672230000;
1001     aPoles.ChangeValue(6, 29) = gp_Pnt(-22.18399638815323600000, +0.00000000000001119232, -104.61763141615558000000);
1002     aWeights.ChangeValue(6, 30) = +1.00967300468446440000;
1003     aPoles.ChangeValue(6, 30) = gp_Pnt(-36.16808769247344200000, +0.00000000000001926896, -103.66834538209933000000);
1004     aWeights.ChangeValue(6, 31) = +1.00967156777535520000;
1005     aPoles.ChangeValue(6, 31) = gp_Pnt(-43.14695215605046700000, +0.00000000000002086710, -103.00315490229345000000);
1006     aWeights.ChangeValue(6, 32) = +1.00966969979090850000;
1007     aPoles.ChangeValue(6, 32) = gp_Pnt(-50.10664482445217500000, +0.00000000000002115378, -102.14781821392242000000);
1008     aWeights.ChangeValue(6, 33) = +1.00966737970297340000;
1009     aPoles.ChangeValue(6, 33) = gp_Pnt(-57.04121502398449900000, +0.00000000000002158031, -101.10296070558179000000);
1010     aWeights.ChangeValue(6, 34) = +1.00966457365849420000;
1011     aPoles.ChangeValue(6, 34) = gp_Pnt(-63.94474533155499800000, +0.00000000000002290082, -99.86943240681669900000);
1012     aWeights.ChangeValue(6, 35) = +1.00966123497950670000;
1013     aPoles.ChangeValue(6, 35) = gp_Pnt(-70.81135197820185600000, +0.00000000000002517228, -98.44830786498150100000);
1014     aWeights.ChangeValue(6, 36) = +1.00965730416314160000;
1015     aPoles.ChangeValue(6, 36) = gp_Pnt(-77.63518524225725100000, +0.00000000000002775445, -96.84088598857995600000);
1016     aWeights.ChangeValue(6, 37) = +1.00965057624219750000;
1017     aPoles.ChangeValue(6, 37) = gp_Pnt(-87.55609990295042200000, +0.00000000000002423047, -94.21659328767886200000);
1018     aWeights.ChangeValue(6, 38) = +1.00964829695753600000;
1019     aPoles.ChangeValue(6, 38) = gp_Pnt(-90.69129861847109500000, +0.00000000000002587407, -93.34466557470412300000);
1020     aWeights.ChangeValue(6, 39) = +1.00964586498085130000;
1021     aPoles.ChangeValue(6, 39) = gp_Pnt(-93.81544408055053500000, +0.00000000000003006614, -92.43305897005754400000);
1022     aWeights.ChangeValue(6, 40) = +1.00964327207695040000;
1023     aPoles.ChangeValue(6, 40) = gp_Pnt(-96.92795589621758300000, +0.00000000000003388207, -91.48193626907418300000);
1024     aWeights.ChangeValue(6, 41) = +1.00964050782223150000;
1025     aPoles.ChangeValue(6, 41) = gp_Pnt(-100.02825520717420000000, +0.00000000000003564727, -90.49147079864104600000);
1026     aWeights.ChangeValue(6, 42) = +1.00963755960468200000;
1027     aPoles.ChangeValue(6, 42) = gp_Pnt(-103.11576472135789000000, +0.00000000000003493709, -89.46184640324143800000);
1028     aWeights.ChangeValue(6, 43) = +1.00963441262388120000;
1029     aPoles.ChangeValue(6, 43) = gp_Pnt(-106.18990874397944000000, +0.00000000000003257692, -88.39325742978746800000);
1030     aWeights.ChangeValue(6, 44) = +1.00962747055172470000;
1031     aPoles.ChangeValue(6, 44) = gp_Pnt(-112.54574015681582000000, +0.00000000000006160655, -86.09336936272072200000);
1032     aWeights.ChangeValue(6, 45) = +1.00962344856191890000;
1033     aPoles.ChangeValue(6, 45) = gp_Pnt(-115.82520602454126000000, -0.00000000000003931317, -84.85588414554271700000);
1034     aWeights.ChangeValue(6, 46) = +1.00961960432502520000;
1035     aPoles.ChangeValue(6, 46) = gp_Pnt(-119.08778487668772000000, +0.00000000000016494845, -83.57368219250022900000);
1036     aWeights.ChangeValue(6, 47) = +1.00961486341637220000;
1037     aPoles.ChangeValue(6, 47) = gp_Pnt(-122.33277704237545000000, -0.00000000000006102663, -82.24707666574315100000);
1038     aWeights.ChangeValue(6, 48) = +1.00961029578642010000;
1039     aPoles.ChangeValue(6, 48) = gp_Pnt(-125.55945424028559000000, +0.00000000000005443726, -80.87630621413205700000);
1040     aWeights.ChangeValue(6, 49) = +1.00960520453872830000;
1041     aPoles.ChangeValue(6, 49) = gp_Pnt(-128.76711471386264000000, +0.00000000000006731284, -79.46169679871513800000);
1042     aWeights.ChangeValue(6, 50) = +1.00959965618806670000;
1043     aPoles.ChangeValue(6, 50) = gp_Pnt(-131.95505034236234000000, +0.00000000000001744703, -78.00355594499717400000);
1044     aWeights.ChangeValue(6, 51) = +1.00958841592259230000;
1045     aPoles.ChangeValue(6, 51) = gp_Pnt(-138.06383173526737000000, +0.00000000000005091738, -75.10807262033468100000);
1046     aWeights.ChangeValue(6, 52) = +1.00958190609477040000;
1047     aPoles.ChangeValue(6, 52) = gp_Pnt(-140.98751167669514000000, +0.00000000000001249767, -73.67671445695528100000);
1048     aWeights.ChangeValue(6, 53) = +1.00957719226123470000;
1049     aPoles.ChangeValue(6, 53) = gp_Pnt(-143.89297197091258000000, +0.00000000000004304958, -72.20827197874005800000);
1050     aWeights.ChangeValue(6, 54) = +1.00956830736954160000;
1051     aPoles.ChangeValue(6, 54) = gp_Pnt(-146.77976177895343000000, +0.00000000000014315600, -70.70325097869228200000);
1052     aWeights.ChangeValue(6, 55) = +1.00956295195680430000;
1053     aPoles.ChangeValue(6, 55) = gp_Pnt(-149.64716302220674000000, -0.00000000000013374459, -69.16163316263994400000);
1054     aWeights.ChangeValue(6, 56) = +1.00955425555763600000;
1055     aPoles.ChangeValue(6, 56) = gp_Pnt(-152.49476001470052000000, +0.00000000000014982315, -67.58397318476696100000);
1056     aWeights.ChangeValue(6, 57) = +1.00954602613024340000;
1057     aPoles.ChangeValue(6, 57) = gp_Pnt(-155.32190503332637000000, -0.00000000000000021066, -65.97043121899140800000);
1058     aWeights.ChangeValue(6, 58) = +1.00952742278739690000;
1059     aPoles.ChangeValue(6, 58) = gp_Pnt(-161.15007234465017000000, -0.00000000000001992904, -62.54527347940126700000);
1060     aWeights.ChangeValue(6, 59) = +1.00951486183122910000;
1061     aPoles.ChangeValue(6, 59) = gp_Pnt(-164.14837014605524000000, +0.00000000000023572067, -60.72896647597298900000);
1062     aWeights.ChangeValue(6, 60) = +1.00950821186278380000;
1063     aPoles.ChangeValue(6, 60) = gp_Pnt(-167.11960531963629000000, -0.00000000000028988207, -58.86870049528032900000);
1064     aWeights.ChangeValue(6, 61) = +1.00948761363721440000;
1065     aPoles.ChangeValue(6, 61) = gp_Pnt(-170.06906478280905000000, +0.00000000000040689923, -56.97372124744497800000);
1066     aWeights.ChangeValue(6, 62) = +1.00948175483910860000;
1067     aPoles.ChangeValue(6, 62) = gp_Pnt(-172.98765254825670000000, -0.00000000000024250881, -55.03312548926784600000);
1068     aWeights.ChangeValue(6, 63) = +1.00946082358368820000;
1069     aPoles.ChangeValue(6, 63) = gp_Pnt(-175.88148729884773000000, +0.00000000000015443744, -53.05496328096450000000);
1070     aWeights.ChangeValue(6, 64) = +1.00944596410276510000;
1071     aPoles.ChangeValue(6, 64) = gp_Pnt(-178.74719668858941000000, +0.00000000000002184305, -51.03719587787818300000);
1072     aWeights.ChangeValue(6, 65) = +1.00942605045267690000;
1073     aPoles.ChangeValue(6, 65) = gp_Pnt(-181.58512029181043000000, +0.00000000000003863576, -48.98084041218928800000);
1074     aWeights.ChangeValue(6, 66) = +1.00940832657292460000;
1075     aPoles.ChangeValue(6, 66) = gp_Pnt(-184.22041885135505000000, +0.00000000000012642202, -47.07128183802177500000);
1076     aWeights.ChangeValue(6, 67) = +1.00938358350016230000;
1077     aPoles.ChangeValue(6, 67) = gp_Pnt(-186.83172267077580000000, -0.00000000000026075896, -45.12863792869809700000);
1078     aWeights.ChangeValue(6, 68) = +1.00937745534316470000;
1079     aPoles.ChangeValue(6, 68) = gp_Pnt(-189.41814135962036000000, +0.00000000000050815389, -43.15221363464823400000);
1080     aWeights.ChangeValue(6, 69) = +1.00932110415609880000;
1081     aPoles.ChangeValue(6, 69) = gp_Pnt(-191.98049421722968000000, -0.00000000000036869153, -41.14519558079494000000);
1082     aWeights.ChangeValue(6, 70) = +1.00934018958992230000;
1083     aPoles.ChangeValue(6, 70) = gp_Pnt(-194.51554398045388000000, +0.00000000000024701945, -39.10283303403318900000);
1084     aWeights.ChangeValue(6, 71) = +1.00926513417534820000;
1085     aPoles.ChangeValue(6, 71) = gp_Pnt(-197.02654362639632000000, +0.00000000000002378284, -37.03182458375535900000);
1086     aWeights.ChangeValue(6, 72) = +1.00924284324015100000;
1087     aPoles.ChangeValue(6, 72) = gp_Pnt(-199.50902604112426000000, +0.00000000000001468063, -34.92696457232537500000);
1088     aWeights.ChangeValue(6, 73) = +1.00920104311988210000;
1089     aPoles.ChangeValue(6, 73) = gp_Pnt(-201.96417476016930000000, +0.00000000000004485301, -32.79087292323346500000);
1090     aWeights.ChangeValue(6, 74) = +1.00917029694376930000;
1091     aPoles.ChangeValue(6, 74) = gp_Pnt(-204.41947086956830000000, +0.00000000000007013856, -30.65436716589900700000);
1092     aWeights.ChangeValue(6, 75) = +1.00906597799622610000;
1093     aPoles.ChangeValue(6, 75) = gp_Pnt(-206.84718146821811000000, -0.00000000000006381675, -28.48746943619916600000);
1094     aWeights.ChangeValue(6, 76) = +1.00920552993238920000;
1095     aPoles.ChangeValue(6, 76) = gp_Pnt(-209.24487385523256000000, +0.00000000000020688933, -26.28443183778934900000);
1096     aWeights.ChangeValue(6, 77) = +1.00876475817276390000;
1097     aPoles.ChangeValue(6, 77) = gp_Pnt(-211.61934752962611000000, -0.00000000000012087895, -24.05869960942788700000);
1098     aWeights.ChangeValue(6, 78) = +1.00888387250480620000;
1099     aPoles.ChangeValue(6, 78) = gp_Pnt(-213.96155431166437000000, +0.00000000000019025578, -21.80066237623914200000);
1100     aWeights.ChangeValue(6, 79) = +1.00881670070678450000;
1101     aPoles.ChangeValue(6, 79) = gp_Pnt(-216.26151615033589000000, -0.00000000000009572292, -19.49741392382435400000);
1102     aWeights.ChangeValue(6, 80) = +1.00875338528797620000;
1103     aPoles.ChangeValue(6, 80) = gp_Pnt(-218.54531424806936000000, +0.00000000000008182630, -17.17704407009146500000);
1104     aWeights.ChangeValue(6, 81) = +1.00842683370719580000;
1105     aPoles.ChangeValue(6, 81) = gp_Pnt(-220.79435406720884000000, +0.00000000000004973799, -14.82789528118522200000);
1106     aWeights.ChangeValue(7, 1) = +1.02986327036737910000;
1107     aPoles.ChangeValue(7, 1) = gp_Pnt(+133.20307692191452000000, -0.00000000000000177636, -68.87095947031473000000);
1108     aWeights.ChangeValue(7, 2) = +1.02989244478762340000;
1109     aPoles.ChangeValue(7, 2) = gp_Pnt(+130.12738123407763000000, -0.00000000000000516390, -70.57040146390383500000);
1110     aWeights.ChangeValue(7, 3) = +1.02991676091110000000;
1111     aPoles.ChangeValue(7, 3) = gp_Pnt(+127.02840986317391000000, +0.00000000000000554535, -72.22789464235242500000);
1112     aWeights.ChangeValue(7, 4) = +1.02993613450137910000;
1113     aPoles.ChangeValue(7, 4) = gp_Pnt(+123.90694758506712000000, -0.00000000000000702621, -73.84302715009133100000);
1114     aWeights.ChangeValue(7, 5) = +1.02995970896171030000;
1115     aPoles.ChangeValue(7, 5) = gp_Pnt(+120.76360256847768000000, -0.00000000000000047370, -75.41549467632542300000);
1116     aWeights.ChangeValue(7, 6) = +1.02998196300924330000;
1117     aPoles.ChangeValue(7, 6) = gp_Pnt(+117.59908279457284000000, +0.00000000000000772901, -76.94495426059752700000);
1118     aWeights.ChangeValue(7, 7) = +1.02999781361776170000;
1119     aPoles.ChangeValue(7, 7) = gp_Pnt(+114.41407453952652000000, -0.00000000000000327310, -78.43108601253017300000);
1120     aWeights.ChangeValue(7, 8) = +1.03001626830282000000;
1121     aPoles.ChangeValue(7, 8) = gp_Pnt(+111.20931631680004000000, +0.00000000000000421483, -79.87356087705671800000);
1122     aWeights.ChangeValue(7, 9) = +1.03004822145821140000;
1123     aPoles.ChangeValue(7, 9) = gp_Pnt(+104.76172782897289000000, +0.00000000000000259283, -82.67059011797552200000);
1124     aWeights.ChangeValue(7, 10) = +1.03006364818919470000;
1125     aPoles.ChangeValue(7, 10) = gp_Pnt(+101.51889932580750000000, +0.00000000000000793496, -84.02514647707548100000);
1126     aWeights.ChangeValue(7, 11) = +1.03007725635610380000;
1127     aPoles.ChangeValue(7, 11) = gp_Pnt(+98.25768758130365700000, +0.00000000000000127608, -85.33546669488836800000);
1128     aWeights.ChangeValue(7, 12) = +1.03009045031501540000;
1129     aPoles.ChangeValue(7, 12) = gp_Pnt(+94.97880175952953200000, +0.00000000000000289709, -86.60126064632369500000);
1130     aWeights.ChangeValue(7, 13) = +1.03010285398165520000;
1131     aPoles.ChangeValue(7, 13) = gp_Pnt(+91.68295682468645700000, +0.00000000000000548904, -87.82224920548925700000);
1132     aWeights.ChangeValue(7, 14) = +1.03011393120368040000;
1133     aPoles.ChangeValue(7, 14) = gp_Pnt(+88.37086140882031800000, -0.00000000000000004450, -88.99816853898946100000);
1134     aWeights.ChangeValue(7, 15) = +1.03012484065781210000;
1135     aPoles.ChangeValue(7, 15) = gp_Pnt(+85.04324466385365600000, +0.00000000000000407116, -90.12875955698966400000);
1136     aWeights.ChangeValue(7, 16) = +1.03015471267321310000;
1137     aPoles.ChangeValue(7, 16) = gp_Pnt(+75.01621211174902700000, +0.00000000000001208092, -93.38380423550353300000);
1138     aWeights.ChangeValue(7, 17) = +1.03017194800922480000;
1139     aPoles.ChangeValue(7, 17) = gp_Pnt(+68.27251352067813200000, +0.00000000000001147779, -95.37146758037383200000);
1140     aWeights.ChangeValue(7, 18) = +1.03018680682765580000;
1141     aPoles.ChangeValue(7, 18) = gp_Pnt(+61.47507566136914600000, +0.00000000000000851456, -97.17487791831784700000);
1142     aWeights.ChangeValue(7, 19) = +1.03019958109549560000;
1143     aPoles.ChangeValue(7, 19) = gp_Pnt(+54.62953031922813800000, +0.00000000000000645560, -98.79238303220959900000);
1144     aWeights.ChangeValue(7, 20) = +1.03021050389503310000;
1145     aPoles.ChangeValue(7, 20) = gp_Pnt(+47.74179355100338300000, +0.00000000000000683493, -100.22257163394704000000);
1146     aWeights.ChangeValue(7, 21) = +1.03021974942385920000;
1147     aPoles.ChangeValue(7, 21) = gp_Pnt(+40.81806392732334400000, +0.00000000000000945638, -101.46427420633951000000);
1148     aWeights.ChangeValue(7, 22) = +1.03022743299486530000;
1149     aPoles.ChangeValue(7, 22) = gp_Pnt(+33.86482072309787100000, +0.00000000000001239365, -102.51656369616552000000);
1150     aWeights.ChangeValue(7, 23) = +1.03023979631718960000;
1151     aPoles.ChangeValue(7, 23) = gp_Pnt(+19.91267581058432200000, +0.00000000000001269021, -104.24092170462040000000);
1152     aWeights.ChangeValue(7, 24) = +1.03024450452679180000;
1153     aPoles.ChangeValue(7, 24) = gp_Pnt(+12.91322103073442500000, +0.00000000000001310657, -104.91296575233191000000);
1154     aWeights.ChangeValue(7, 25) = +1.03024781840890150000;
1155     aPoles.ChangeValue(7, 25) = gp_Pnt(+5.89663552968925500000, +0.00000000000001362222, -105.39416639705574000000);
1156     aWeights.ChangeValue(7, 26) = +1.03024979501191980000;
1157     aPoles.ChangeValue(7, 26) = gp_Pnt(-1.13093554742009240000, +0.00000000000001442955, -105.68402704533355000000);
1158     aWeights.ChangeValue(7, 27) = +1.03025046568879810000;
1159     aPoles.ChangeValue(7, 27) = gp_Pnt(-8.16338049757019310000, +0.00000000000001553070, -105.78227646648484000000);
1160     aWeights.ChangeValue(7, 28) = +1.03024983609703620000;
1161     aPoles.ChangeValue(7, 28) = gp_Pnt(-15.19462185431612500000, +0.00000000000001673746, -105.68886888131540000000);
1162     aWeights.ChangeValue(7, 29) = +1.03024788619868390000;
1163     aPoles.ChangeValue(7, 29) = gp_Pnt(-22.21861718693262200000, +0.00000000000001767135, -105.40398398356824000000);
1164     aWeights.ChangeValue(7, 30) = +1.03024126030624560000;
1165     aPoles.ChangeValue(7, 30) = gp_Pnt(-36.24014829916134100000, +0.00000000000002019891, -104.45206611492652000000);
1166     aWeights.ChangeValue(7, 31) = +1.03023657011944200000;
1167     aPoles.ChangeValue(7, 31) = gp_Pnt(-43.23771519136024500000, +0.00000000000002161068, -103.78502949380328000000);
1168     aWeights.ChangeValue(7, 32) = +1.03023047292900840000;
1169     aPoles.ChangeValue(7, 32) = gp_Pnt(-50.21605719916001900000, +0.00000000000002249329, -102.92731708926736000000);
1170     aWeights.ChangeValue(7, 33) = +1.03022290017099440000;
1171     aPoles.ChangeValue(7, 33) = gp_Pnt(-57.16920057960702200000, +0.00000000000002320995, -101.87955571848956000000);
1172     aWeights.ChangeValue(7, 34) = +1.03021374148842140000;
1173     aPoles.ChangeValue(7, 34) = gp_Pnt(-64.09120253994868200000, +0.00000000000002399266, -100.64259867222304000000);
1174     aWeights.ChangeValue(7, 35) = +1.03020284473128120000;
1175     aPoles.ChangeValue(7, 35) = gp_Pnt(-70.97615252947152000000, +0.00000000000002494226, -99.21752532044712300000);
1176     aWeights.ChangeValue(7, 36) = +1.03019001595653670000;
1177     aPoles.ChangeValue(7, 36) = gp_Pnt(-77.81817349811507300000, +0.00000000000002602838, -97.60564061068184600000);
1178     aWeights.ChangeValue(7, 37) = +1.03016805964614980000;
1179     aPoles.ChangeValue(7, 37) = gp_Pnt(-87.76549855749630100000, +0.00000000000002703745, -94.97405836608523100000);
1180     aWeights.ChangeValue(7, 38) = +1.03016062145972500000;
1181     aPoles.ChangeValue(7, 38) = gp_Pnt(-90.90906843451735100000, +0.00000000000002735353, -94.09969925934423400000);
1182     aWeights.ChangeValue(7, 39) = +1.03015268516758060000;
1183     aPoles.ChangeValue(7, 39) = gp_Pnt(-94.04154842308000200000, +0.00000000000002795160, -93.18554984223239000000);
1184     aWeights.ChangeValue(7, 40) = +1.03014422393874510000;
1185     aPoles.ChangeValue(7, 40) = gp_Pnt(-97.16235536263198500000, +0.00000000000002873660, -92.23177350871787900000);
1186     aWeights.ChangeValue(7, 41) = +1.03013520381253840000;
1187     aPoles.ChangeValue(7, 41) = gp_Pnt(-100.27090735629974000000, +0.00000000000002960449, -91.23854430518403500000);
1188     aWeights.ChangeValue(7, 42) = +1.03012558369857450000;
1189     aPoles.ChangeValue(7, 42) = gp_Pnt(-103.36662387191370000000, +0.00000000000003044224, -90.20604688574815100000);
1190     aWeights.ChangeValue(7, 43) = +1.03011531537676040000;
1191     aPoles.ChangeValue(7, 43) = gp_Pnt(-106.44892584135401000000, +0.00000000000003112785, -89.13447646370049400000);
1192     aWeights.ChangeValue(7, 44) = +1.03009266486582220000;
1193     aPoles.ChangeValue(7, 44) = gp_Pnt(-112.82164316087234000000, +0.00000000000002877514, -86.82815610446842000000);
1194     aWeights.ChangeValue(7, 45) = +1.03007954250937140000;
1195     aPoles.ChangeValue(7, 45) = gp_Pnt(-116.10982863064515000000, +0.00000000000005217709, -85.58719260568324200000);
1196     aWeights.ChangeValue(7, 46) = +1.03006700046765860000;
1197     aPoles.ChangeValue(7, 46) = gp_Pnt(-119.38108228759732000000, -0.00000000000000364635, -84.30140001571530200000);
1198     aWeights.ChangeValue(7, 47) = +1.03005153385603830000;
1199     aPoles.ChangeValue(7, 47) = gp_Pnt(-122.63466837574235000000, +0.00000000000007773224, -82.97105629274108200000);
1200     aWeights.ChangeValue(7, 48) = +1.03003663316235050000;
1201     aPoles.ChangeValue(7, 48) = gp_Pnt(-125.86988610286646000000, +0.00000000000000501775, -81.59643931580511400000);
1202     aWeights.ChangeValue(7, 49) = +1.03002002524069390000;
1203     aPoles.ChangeValue(7, 49) = gp_Pnt(-129.08600965998806000000, +0.00000000000004872530, -80.17785297868806500000);
1204     aWeights.ChangeValue(7, 50) = +1.03000192732158440000;
1205     aPoles.ChangeValue(7, 50) = gp_Pnt(-132.28232849510800000000, +0.00000000000003627431, -78.71561001568775900000);
1206     aWeights.ChangeValue(7, 51) = +1.02996526567106140000;
1207     aPoles.ChangeValue(7, 51) = gp_Pnt(-138.40719443250111000000, +0.00000000000004030865, -75.81195871455292900000);
1208     aWeights.ChangeValue(7, 52) = +1.02994403451619650000;
1209     aPoles.ChangeValue(7, 52) = gp_Pnt(-141.33856968181306000000, +0.00000000000003444592, -74.37651555974527200000);
1210     aWeights.ChangeValue(7, 53) = +1.02992866105480000000;
1211     aPoles.ChangeValue(7, 53) = gp_Pnt(-144.25171811139330000000, +0.00000000000003429445, -72.90395453557894700000);
1212     aWeights.ChangeValue(7, 54) = +1.02989968743351530000;
1213     aPoles.ChangeValue(7, 54) = gp_Pnt(-147.14603336223070000000, +0.00000000000004355038, -71.39457006641885100000);
1214     aWeights.ChangeValue(7, 55) = +1.02988222474475720000;
1215     aPoles.ChangeValue(7, 55) = gp_Pnt(-150.02095857157173000000, +0.00000000000003217269, -69.84863841933133700000);
1216     aWeights.ChangeValue(7, 56) = +1.02985386954430420000;
1217     aPoles.ChangeValue(7, 56) = gp_Pnt(-152.87595706513403000000, +0.00000000000003648661, -68.26644064265008200000);
1218     aWeights.ChangeValue(7, 57) = +1.02982704006085530000;
1219     aPoles.ChangeValue(7, 57) = gp_Pnt(-155.71041601974636000000, +0.00000000000003591181, -66.64830754728993200000);
1220     aWeights.ChangeValue(7, 58) = +1.02976639514271140000;
1221     aPoles.ChangeValue(7, 58) = gp_Pnt(-161.55369960091491000000, +0.00000000000003646415, -63.21332070345936700000);
1222     aWeights.ChangeValue(7, 59) = +1.02972545417744080000;
1223     aPoles.ChangeValue(7, 59) = gp_Pnt(-164.55974256681068000000, +0.00000000000003294676, -61.39167299907511900000);
1224     aWeights.ChangeValue(7, 60) = +1.02970377642180270000;
1225     aPoles.ChangeValue(7, 60) = gp_Pnt(-167.53873683551103000000, +0.00000000000002190344, -59.52621075357659900000);
1226     aWeights.ChangeValue(7, 61) = +1.02963665582099750000;
1227     aPoles.ChangeValue(7, 61) = gp_Pnt(-170.49570646978711000000, +0.00000000000009010479, -57.62531748377598000000);
1228     aWeights.ChangeValue(7, 62) = +1.02961756328110620000;
1229     aPoles.ChangeValue(7, 62) = gp_Pnt(-173.42176702363508000000, -0.00000000000003499440, -55.67944052993496500000);
1230     aWeights.ChangeValue(7, 63) = +1.02954937293567860000;
1231     aPoles.ChangeValue(7, 63) = gp_Pnt(-176.32284460610933000000, +0.00000000000007636921, -53.69521656711459900000);
1232     aWeights.ChangeValue(7, 64) = +1.02950097342681770000;
1233     aPoles.ChangeValue(7, 64) = gp_Pnt(-179.19569709355173000000, +0.00000000000003273955, -51.67161593723249500000);
1234     aWeights.ChangeValue(7, 65) = +1.02943612532291810000;
1235     aPoles.ChangeValue(7, 65) = gp_Pnt(-182.04053139917158000000, +0.00000000000003996803, -49.60917258111981500000);
1236     aWeights.ChangeValue(7, 66) = +1.02937840445762090000;
1237     aPoles.ChangeValue(7, 66) = gp_Pnt(-184.68250151172640000000, +0.00000000000004112926, -47.69381589112448700000);
1238     aWeights.ChangeValue(7, 67) = +1.02929786839945800000;
1239     aPoles.ChangeValue(7, 67) = gp_Pnt(-187.30004443981446000000, +0.00000000000003629801, -45.74517623046489900000);
1240     aWeights.ChangeValue(7, 68) = +1.02927785532615720000;
1241     aPoles.ChangeValue(7, 68) = gp_Pnt(-189.89358418563035000000, +0.00000000000003708012, -43.76295173174737800000);
1242     aWeights.ChangeValue(7, 69) = +1.02909457173661250000;
1243     aPoles.ChangeValue(7, 69) = gp_Pnt(-192.46070903458983000000, +0.00000000000005500515, -41.74904085552218200000);
1244     aWeights.ChangeValue(7, 70) = +1.02915656102268340000;
1245     aPoles.ChangeValue(7, 70) = gp_Pnt(-195.00353322314638000000, +0.00000000000002645256, -39.70148425813464900000);
1246     aWeights.ChangeValue(7, 71) = +1.02891246604057510000;
1247     aPoles.ChangeValue(7, 71) = gp_Pnt(-197.51895024482548000000, +0.00000000000005006422, -37.62251287581096900000);
1248     aWeights.ChangeValue(7, 72) = +1.02884001996279940000;
1249     aPoles.ChangeValue(7, 72) = gp_Pnt(-200.00717902020989000000, +0.00000000000003866246, -35.51147139839754600000);
1250     aWeights.ChangeValue(7, 73) = +1.02870418206103280000;
1251     aPoles.ChangeValue(7, 73) = gp_Pnt(-202.46745722827831000000, +0.00000000000003996803, -33.36845405838467800000);
1252     aWeights.ChangeValue(7, 74) = +1.02860417892808040000;
1253     aPoles.ChangeValue(7, 74) = gp_Pnt(-204.92874075079348000000, +0.00000000000003952569, -31.22492832365916000000);
1254     aWeights.ChangeValue(7, 75) = +1.02826579045574770000;
1255     aPoles.ChangeValue(7, 75) = gp_Pnt(-207.35951843182116000000, +0.00000000000002864861, -29.04902036970887700000);
1256     aWeights.ChangeValue(7, 76) = +1.02871793966685040000;
1257     aPoles.ChangeValue(7, 76) = gp_Pnt(-209.76815931164757000000, +0.00000000000007786791, -26.84449461829588300000);
1258     aWeights.ChangeValue(7, 77) = +1.02728787827248790000;
1259     aPoles.ChangeValue(7, 77) = gp_Pnt(-212.13952611955784000000, -0.00000000000002645359, -24.59453985262025100000);
1260     aWeights.ChangeValue(7, 78) = +1.02767535385751650000;
1261     aPoles.ChangeValue(7, 78) = gp_Pnt(-214.48523983715771000000, +0.00000000000011316462, -22.34028621398329100000);
1262     aWeights.ChangeValue(7, 79) = +1.02745809923196680000;
1263     aPoles.ChangeValue(7, 79) = gp_Pnt(-216.79261871005519000000, -0.00000000000002978790, -20.02558452892611700000);
1264     aWeights.ChangeValue(7, 80) = +1.02725110106353260000;
1265     aPoles.ChangeValue(7, 80) = gp_Pnt(-219.08116944862113000000, +0.00000000000005732296, -17.69632354506026700000);
1266     aWeights.ChangeValue(7, 81) = +1.02619749797986360000;
1267     aPoles.ChangeValue(7, 81) = gp_Pnt(-221.32510969435936000000, +0.00000000000004618528, -15.33078661161192400000);
1268   }
1269   ////
1270
1271   const Handle(Geom_Surface) aS1 = new Geom_BSplineSurface(aPoles, aWeights, aUKnots, aVKnots, aUMult, aVMult, aUDegree, aVDegree);
1272
1273   char buff[1024];
1274
1275   Sprintf(buff, "%s_1", theArgVal[1]);
1276   DrawTrSurf::Set(buff, aS1);
1277   theDI << buff << " ";
1278
1279   Sprintf(buff, "%s_2", theArgVal[1]);
1280   DrawTrSurf::Set(buff, aS2);
1281   theDI << buff << "\n";
1282
1283   return 0;
1284 }
1285
1286 namespace AllocTest
1287 {
1288   // The test is based of occupying of all available virtual memory.
1289   // Obviously it has no sense on 64-bit platforms.
1290
1291   enum AllocTestStatus
1292   {
1293     NotApplicable = 0x1,
1294     OUMCatchOK    = 0x2,
1295     OUMCatchFail  = 0x4
1296   };
1297
1298   template<int> int test()
1299   {
1300     // non-32-bit implementation
1301     return NotApplicable;
1302   }
1303   
1304   template<> int test<4>()
1305   {
1306     // 32-bit implementation
1307     NCollection_List<Standard_Address> aList;
1308     const Standard_Integer aBlockSizes[] = {100000, 10000, 10};
1309     int aStatus = 0;
1310
1311     // start populate memory with blocks of large size, then
1312     // smaller ones and so on according to content of the array aBlockSizes
1313     for (size_t i=0; i < sizeof(aBlockSizes)/sizeof(int); i++)
1314     {
1315       try
1316       {
1317         for (;;)
1318           aList.Append(Standard::Allocate(aBlockSizes[i]));
1319       }
1320       catch (Standard_Failure)
1321       {
1322         aStatus |= OUMCatchOK;
1323       }
1324       catch (...)
1325       {
1326         aStatus |= OUMCatchFail;
1327         break;
1328       }
1329     }
1330     // release all allocated blocks
1331     for (NCollection_List<Standard_Address>::Iterator it(aList); it.More(); it.Next())
1332     {
1333       Standard::Free(it.Value());
1334     }
1335     return aStatus;
1336   }
1337 }
1338
1339 //=======================================================================
1340 //function : OCC24836
1341 //purpose :
1342 //=======================================================================
1343 static Standard_Integer OCC24836 (Draw_Interpretor& theDI, Standard_Integer n, const char** a)
1344 {
1345   if (n != 1)
1346   {
1347     theDI << "Usage : " << a[0] << "\n";
1348     return 1;
1349   }
1350
1351   int aStatus = AllocTest::test<sizeof(size_t)>();
1352
1353   if (aStatus & AllocTest::NotApplicable)
1354     theDI << "This test case is not applicable for 64-bit and higher platforms\n";
1355   if (aStatus & AllocTest::OUMCatchOK)
1356     theDI << "out-of-memory has been caught: OK\n";
1357   if (aStatus & AllocTest::OUMCatchFail)
1358     theDI << "Error: out-of-memory is not always caught\n";
1359   return 0;
1360 }
1361
1362
1363 //=======================================================================
1364 //function : OCC27021 
1365 //purpose  : Tests performance of obtaining geometry (points) via topological
1366 //           exploring or fetching the geometry.
1367 //=======================================================================
1368
1369 // Fetch via topology
1370 static std::pair<gp_Pnt, gp_Pnt> getVerticesA(const TopoDS_Edge& theEdge)
1371 {
1372   std::pair<gp_Pnt, gp_Pnt> result;
1373
1374   static TopoDS_Vertex aFirst, aLast;
1375   TopExp::Vertices(theEdge, aFirst, aLast, Standard_True);
1376
1377   result.first = BRep_Tool::Pnt(aFirst);
1378   result.second = BRep_Tool::Pnt(aLast);
1379
1380   return result;
1381 }
1382
1383 //Geometrical way
1384 static std::pair<gp_Pnt, gp_Pnt> getVerticesB(const TopoDS_Edge& theEdge)
1385 {
1386   Standard_Real first;
1387   Standard_Real last;
1388
1389   Handle(Geom_Curve) curve = BRep_Tool::Curve(theEdge, first, last);
1390
1391   std::pair<gp_Pnt, gp_Pnt> result;
1392
1393   if (theEdge.Orientation() == TopAbs_REVERSED)
1394   {
1395     curve->D0(first, result.second);
1396     curve->D0(last, result.first);
1397   }
1398   else
1399   {
1400     curve->D0(first, result.first);
1401     curve->D0(last, result.second);
1402   }
1403   return result;
1404 }
1405
1406
1407
1408 static Standard_Integer OCC27021(Draw_Interpretor& theDI,
1409                                  Standard_Integer  theNArg,
1410                                  const char ** theArgVal)
1411 {
1412   if (theNArg != 2)
1413   {
1414     cout << "Use: " << theArgVal[0] << " shape" << endl;
1415     return 1;
1416   }
1417
1418   TopoDS_Shape shape (DBRep::Get(theArgVal[1]));
1419
1420   TopTools_IndexedMapOfShape shape_faces;
1421   TopExp::MapShapes(shape, TopAbs_FACE, shape_faces);
1422
1423   // Pick a single face which shows the problem.
1424   TopoDS_Face face = TopoDS::Face(shape_faces(10));
1425   TopTools_IndexedMapOfShape face_edges;
1426   TopExp::MapShapes(face, TopAbs_EDGE, face_edges);
1427   TopoDS_Edge edge = TopoDS::Edge(face_edges(2));
1428
1429   Standard_Integer iterations = 100000000;
1430
1431   std::pair<gp_Pnt, gp_Pnt> vertices;
1432   clock_t t = clock();
1433
1434   theDI << "\nRetrieving " << iterations << " vertices using approach A)...\n";
1435   for (int i = 0; i < iterations; ++i)
1436   {
1437     vertices = getVerticesA(edge);
1438   }
1439   theDI << "COUNTER RetrievingVertA" << ": " << (clock() - t) / (double)CLOCKS_PER_SEC << "\n";
1440   t = clock();
1441
1442   theDI << "\nRetrieving " << iterations << " vertices using approach B)...\n";
1443   for (int i = 0; i < iterations; ++i)
1444   {
1445     vertices = getVerticesB(edge);
1446   }
1447   theDI << "COUNTER RetrievingVertB" << ": " << (clock() - t) / (double)CLOCKS_PER_SEC << "\n";
1448
1449   return 0;
1450 }
1451
1452 //=======================================================================
1453 //function : OCC27235
1454 //purpose : check presentation in GDT document
1455 //=======================================================================
1456 static Standard_Integer OCC27235 (Draw_Interpretor& theDI, Standard_Integer n, const char** a)
1457 {
1458   if (n < 2) {
1459     theDI<<"Use: OCC27235 Doc";
1460     return 1;
1461   }
1462
1463   Handle(TDocStd_Document) Doc;
1464   DDocStd::GetDocument(a[1], Doc);
1465   if ( Doc.IsNull() ) { theDI << a[1] << " is not a document\n"; return 1; }
1466   Handle(XCAFDoc_DimTolTool) aDimTolTool= XCAFDoc_DocumentTool::DimTolTool(Doc->Main());
1467   Handle(XCAFDoc_ShapeTool) aShapeTool= XCAFDoc_DocumentTool::ShapeTool(Doc->Main());
1468   TopoDS_Compound aPresentations;
1469   BRep_Builder B;
1470   B.MakeCompound(aPresentations);
1471
1472   TDF_LabelSequence aLabels;
1473   aShapeTool->GetShapes(aLabels);
1474   for ( Standard_Integer i=1; i <= aLabels.Length(); i++ )
1475   {
1476     aShapeTool->GetSubShapes(aLabels.Value(i), aLabels);
1477   }
1478
1479   TDF_LabelSequence aGDTs;
1480   aDimTolTool->GetDimensionLabels(aGDTs);
1481   for (Standard_Integer i = 1; i <= aGDTs.Length(); i++) {
1482     Handle(XCAFDoc_Dimension) aDimAttr;
1483     if (!aGDTs.Value(i).FindAttribute(XCAFDoc_Dimension::GetID(),aDimAttr)) 
1484       continue;
1485     Handle(XCAFDimTolObjects_DimensionObject) anObject = aDimAttr->GetObject();
1486     if (anObject.IsNull())
1487       continue;
1488     TopoDS_Shape aShape = anObject->GetPresentation();
1489     if (!aShape.IsNull())
1490       B.Add(aPresentations, aShape);
1491   }
1492
1493   aGDTs.Clear();
1494   aDimTolTool->GetGeomToleranceLabels(aGDTs);
1495   for (Standard_Integer i = 1; i <= aGDTs.Length(); i++) {
1496     Handle(XCAFDoc_GeomTolerance) aGTAttr;
1497     if (!aGDTs.Value(i).FindAttribute(XCAFDoc_GeomTolerance::GetID(),aGTAttr)) 
1498       continue;
1499     Handle(XCAFDimTolObjects_GeomToleranceObject) anObject = aGTAttr->GetObject();
1500     if (anObject.IsNull())
1501       continue;
1502     TopoDS_Shape aShape = anObject->GetPresentation();
1503     if (!aShape.IsNull())
1504       B.Add(aPresentations, aShape);
1505   }
1506
1507   for ( Standard_Integer i=1; i <= aLabels.Length(); i++ )
1508   {
1509     TDF_LabelSequence aDatL;
1510     if(aDimTolTool->GetRefDatumLabel(aLabels.Value(i), aDatL))
1511     {
1512       for(Standard_Integer j = aDatL.Lower(); j <= aDatL.Upper(); j++)
1513       {
1514         Handle(XCAFDoc_Datum) aDat;
1515         if(!aDatL.Value(j).FindAttribute(XCAFDoc_Datum::GetID(), aDat))
1516           continue;
1517         Handle(XCAFDimTolObjects_DatumObject) anObject = aDat->GetObject();
1518         if (anObject.IsNull())
1519           continue;
1520         TopoDS_Shape aShape = anObject->GetPresentation();
1521         if (!aShape.IsNull())
1522           B.Add(aPresentations, aShape);
1523       }
1524     }
1525   }
1526
1527   GProp_GProps aG;
1528   BRepGProp::LinearProperties(aPresentations, aG);
1529   gp_Pnt aPnt = aG.CentreOfMass();
1530   theDI << "Centre of mass: " << aPnt.X() << " " << aPnt.Y() << " " << aPnt.Z() << "\n";
1531   theDI << "Mass: " << aG.Mass() << "\n";
1532
1533   return 0;
1534 }
1535
1536 //=======================================================================
1537 //function : OCC24836
1538 //purpose :
1539 //=======================================================================
1540 static Standard_Integer OCC26930(Draw_Interpretor& theDI,
1541                                  Standard_Integer  theNArg,
1542                                  const char ** theArgVal)
1543 {
1544   if (theNArg != 5)
1545   {
1546     cout << "Use: " << theArgVal[0] <<" surface curve start end" << endl;
1547     return 1;
1548   }
1549
1550
1551
1552
1553
1554   Handle(Geom_Surface) aSurface = DrawTrSurf::GetSurface(theArgVal[1]);
1555   Handle(Geom_Curve) aCurve = DrawTrSurf::GetCurve(theArgVal[2]);
1556   Standard_Real aStart = Draw::Atof(theArgVal[3]);
1557   Standard_Real anEnd = Draw::Atof(theArgVal[4]);
1558
1559   //project
1560   Handle (Geom2d_Curve) aPCurve;
1561
1562   ShapeConstruct_ProjectCurveOnSurface aProj;
1563   aProj.Init(aSurface, Precision::Confusion());
1564   {
1565     try {
1566         Handle (Geom_Curve) aTmpCurve = aCurve; //to use reference in Perform()
1567         aProj.Perform (aTmpCurve, aStart, anEnd, aPCurve);
1568     } catch (const Standard_Failure&) {
1569     }
1570   }
1571
1572   //check results
1573   if (aPCurve.IsNull()) {
1574     theDI << "Error: pcurve is null\n";
1575   }
1576   else {
1577     if (aPCurve->IsKind(STANDARD_TYPE(Geom2d_Line))) {
1578       theDI << "Pcurve is line: OK\n";
1579     }
1580     else {
1581       theDI << "Error: PCurve is not line\n";
1582     }
1583   }
1584
1585   return 0;
1586 }
1587
1588 //=======================================================================
1589 //function : OCC27341
1590 //purpose : check exact HLR algorighm's work
1591 //=======================================================================
1592 static Standard_Integer OCC27341 (Draw_Interpretor& , Standard_Integer n, const char** a)
1593 {
1594   if (n != 4)
1595   {
1596     cout << "Use: OCC27341 res shape axo/top/bottom/front/back/left/right" << endl;
1597     return 1;
1598   }
1599
1600   TopoDS_Shape aShape =  DBRep::Get(a[2]);
1601   if (aShape.IsNull())
1602     return 1;
1603
1604   gp_Pnt anOrigin(0.,0.,0.);
1605   gp_Dir aNormal(0.57735026918962573, -0.57735026918962573, 0.57735026918962573);
1606   gp_Ax2 anAxes(anOrigin, aNormal);
1607   gp_Dir aDX = anAxes.XDirection();
1608   
1609   HLRAppli_ReflectLines Reflector(aShape);
1610
1611   if (strcmp(a[3],"axo") == 0)
1612   {
1613     aNormal.SetCoord(0.57735026918962573, -0.57735026918962573, 0.57735026918962573);
1614     aDX.SetCoord(-0.40824829046386307, 0.40824829046386307, 0.81649658092772615);
1615   }
1616   else if (strcmp(a[3],"top") == 0)
1617   {
1618     aNormal.SetCoord(0,0,1);
1619     aDX.SetCoord(0,1,0);
1620   }
1621   else if (strcmp(a[3],"bottom") == 0)
1622   {
1623     aNormal.SetCoord(0,0,-1);
1624     aDX.SetCoord(0,-1,0);
1625   }
1626   else if (strcmp(a[3],"front") == 0)
1627   {
1628     aNormal.SetCoord(0,-1,0);
1629     aDX.SetCoord(0,0,1);
1630   }
1631   else if (strcmp(a[3],"back") == 0)
1632   {
1633     aNormal.SetCoord(0,1,0);
1634     aDX.SetCoord(0,0,1);
1635   }
1636   else if (strcmp(a[3],"left") == 0)
1637   {
1638     aNormal.SetCoord(-1,0,0);
1639     aDX.SetCoord(0,0,1);
1640   }
1641   else if (strcmp(a[3],"right") == 0)
1642   {
1643     aNormal.SetCoord(1,0,0);
1644     aDX.SetCoord(0,0,1);
1645   }
1646     
1647   Reflector.SetAxes(aNormal.X(), aNormal.Y(), aNormal.Z(),
1648                     anOrigin.X(), anOrigin.Y(), anOrigin.Z(),
1649                     aDX.X(), aDX.Y(), aDX.Z());
1650
1651   Reflector.Perform();
1652
1653   TopoDS_Compound Result;
1654   BRep_Builder BB;
1655   BB.MakeCompound(Result);
1656   
1657   TopoDS_Shape SharpEdges = Reflector.GetCompoundOf3dEdges(HLRBRep_Sharp, Standard_True, Standard_False);
1658   if (!SharpEdges.IsNull())
1659     BB.Add(Result, SharpEdges);
1660   TopoDS_Shape OutLines = Reflector.GetCompoundOf3dEdges(HLRBRep_OutLine, Standard_True, Standard_False);
1661   if (!OutLines.IsNull())
1662     BB.Add(Result, OutLines);
1663   TopoDS_Shape SmoothEdges = Reflector.GetCompoundOf3dEdges(HLRBRep_Rg1Line, Standard_True, Standard_False);
1664   if (!SmoothEdges.IsNull())
1665     BB.Add(Result, SmoothEdges);
1666   
1667   DBRep::Set(a[1], Result);
1668
1669   return 0;
1670 }
1671
1672 //=======================================================================
1673 //function : OCC27466
1674 //purpose :
1675 //=======================================================================
1676 static Standard_Integer OCC27466(Draw_Interpretor& theDI,
1677   Standard_Integer  theNArg,
1678   const char ** theArgVal)
1679 {
1680   if (theNArg != 4)
1681   {
1682     cout << "Use: " << theArgVal[0] << " face point start_pnt2d" << endl;
1683     return 1;
1684   }
1685
1686   TopoDS_Face aFace = TopoDS::Face(DBRep::Get(theArgVal[1], TopAbs_FACE, Standard_True));
1687   if (aFace.IsNull())
1688     return 1;
1689   gp_Pnt aPnt;
1690   if (!DrawTrSurf::GetPoint(theArgVal[2], aPnt))
1691     return 1;
1692   gp_Pnt2d aUV;
1693   if (!DrawTrSurf::GetPoint2d(theArgVal[3], aUV))
1694     return 1;
1695   BRepAdaptor_Surface aSurf(aFace);
1696
1697   Standard_Real aTolU = Precision::PConfusion();
1698   Standard_Real aTolV = Precision::PConfusion();
1699
1700   Extrema_GenLocateExtPS anExtrema(aSurf, aTolU, aTolV);
1701   anExtrema.Perform(aPnt, aUV.X(), aUV.Y(), Standard_True);
1702
1703   if (!anExtrema.IsDone())
1704   {
1705     theDI << "Error: Extrema is not done";
1706   }
1707   else
1708   {
1709     Standard_Real aSqDist = anExtrema.SquareDistance();
1710     gp_Pnt aResPnt = anExtrema.Point().Value();
1711     Standard_Real u, v;
1712     anExtrema.Point().Parameter(u, v);
1713     gp_Pnt2d aResUV(u, v);
1714     DrawTrSurf::Set((TCollection_AsciiString(theArgVal[2]) + "_res").ToCString(), aResPnt);
1715     DrawTrSurf::Set((TCollection_AsciiString(theArgVal[3]) + "_res").ToCString(), aResUV);
1716     theDI << theArgVal[2] << "_res and " << theArgVal[3] << "_res are created, dist=" << sqrt(aSqDist);
1717   }
1718   return 0;
1719 }
1720
1721 #include <GCE2d_MakeParabola.hxx>
1722 #include <gp_Ax22d.hxx>
1723 #include <Geom2d_Parabola.hxx>
1724 #include <gp_Parab2d.hxx>
1725
1726 namespace Parab2d_Bug26747
1727 {
1728   //Directrix and X-axe direction
1729   gp_Ax2d Axes;
1730
1731   //Focus
1732   gp_Pnt2d FocusPoint;
1733
1734   //Focal length
1735   Standard_Real FocalLength;
1736
1737   //Coordiantes of the vertex
1738   Standard_Real VertX, VertY;
1739
1740   //Parameter
1741   Standard_Real Parameter;
1742
1743   //Coefficients
1744   Standard_Real Coeffs[6];
1745 }
1746
1747 //========================================================================
1748 //function : OCC26747_CheckParabola
1749 //purpose  : Checks if created parabola is correct
1750 //========================================================================
1751 static void OCC26747_CheckParabola(Draw_Interpretor& theDI,
1752                                    const char *theName,
1753                                    const Standard_Boolean theSense = Standard_True)
1754 {
1755   const Standard_Real aCompareTol = 1.0e-12;
1756
1757   //                      Directrix,                    Focus
1758   GCE2d_MakeParabola aPrb(Parab2d_Bug26747::Axes, Parab2d_Bug26747::FocusPoint, theSense);
1759
1760   DrawTrSurf::Set(theName, aPrb.Value());
1761
1762   gp_Pnt2d aVert(aPrb.Value()->Parab2d().Location());
1763
1764   theDI << "Focal Length: " << aPrb.Value()->Parab2d().Focal() << "\n";
1765   theDI << "Vertex (" << aVert.X() << ", " << aVert.Y() << ")\n";
1766   theDI << "Parameter = " << aPrb.Value()->Parab2d().Parameter() << "\n";
1767
1768   Standard_Real aF[6] = {RealLast(), RealLast(), RealLast(),
1769                          RealLast(), RealLast(), RealLast()};  
1770   aPrb.Value()->Parab2d().Coefficients(aF[0], aF[1], aF[2], aF[3], aF[4], aF[5]);
1771   theDI << "A = " << aF[0] << ", B = " << aF[1] << ", C = " << aF[2] <<
1772            ", D = " << aF[3] << ", E = " << aF[4] << ", F = " << aF[5] << "\n";
1773
1774   if(Abs(aPrb.Value()->Parab2d().Focal() - 
1775                         Parab2d_Bug26747::FocalLength) > aCompareTol)
1776     theDI << "Error in focal length computation!\n";
1777
1778   if( (Abs(aVert.X() - Parab2d_Bug26747::VertX) > aCompareTol) ||
1779       (Abs(aVert.Y() - Parab2d_Bug26747::VertY) > aCompareTol))
1780     theDI << "Error in vertex computation!\n";
1781
1782   if(Abs(aPrb.Value()->Parab2d().Parameter() -
1783                         Parab2d_Bug26747::Parameter) > aCompareTol)
1784     theDI << "Error in parameter computation!\n";
1785
1786   for(int i = 0; i < 6; i++)
1787   {
1788     if(Abs(aF[i] - Parab2d_Bug26747::Coeffs[i]) > aCompareTol)
1789     {
1790       theDI << "Error in " << i << "-th coefficient computation!\n";
1791     }
1792   }
1793 }
1794
1795 //========================================================================
1796 //function : OCC26747_1
1797 //purpose  : Creates a 2D-parabola for testing
1798 //========================================================================
1799 static Standard_Integer OCC26747_1(Draw_Interpretor& theDI, 
1800                                    Standard_Integer  theNArg, 
1801                                    const char **     theArgVal)
1802 {
1803   if(theNArg < 2)
1804   {
1805     theDI << "Use: OCC26747_1 result\n";
1806     return 1;
1807   }
1808
1809   //Expected parabola:
1810
1811   //  ^ Y
1812   //  |
1813   //  |
1814   //  |
1815   //  |
1816   //  |                 o
1817   //  |    A   o   F
1818   //  |     o     x
1819   //  |        o
1820   //  |                 o
1821   //  |
1822   //  ---------------------------> X
1823
1824   //  where
1825   //  Y-axe is the directrix of the parabola,
1826   //  A(0.5, 3.0) is a Vertex of the parabola,
1827   //  F(1.0, 3.0) is the focus of the parabola,
1828   //  Focal length is 0.5,
1829   //  Parameter of the parabola is 1.
1830   //  Equation: (y-3)^2=2*p*(x-0.5), i.e. (y-3)^2=2*(x-0.5)
1831   //  A * X^2 + B * Y^2 + 2*C*X*Y + 2*D*X    + 2*E*Y    + F = 0.
1832   //                  OR
1833   //  0 * X^2 + 1 * Y^2 + 2*0*X*Y + 2*(-1)*X + 2*(-3)*Y + 10 = 0.
1834
1835   Parab2d_Bug26747::Axes = gp_Ax2d(gp_Pnt2d(0.0, 3.0), gp_Dir2d(0.0, 1.0));
1836   Parab2d_Bug26747::FocusPoint.SetCoord(1.0, 3.0);
1837
1838   Parab2d_Bug26747::FocalLength = 0.5;
1839
1840   Parab2d_Bug26747::VertX = 0.5;
1841   Parab2d_Bug26747::VertY = 3.0;
1842
1843   Parab2d_Bug26747::Parameter = 1.0;
1844
1845   Parab2d_Bug26747::Coeffs[0] = 0.0;
1846   Parab2d_Bug26747::Coeffs[1] = 1.0;
1847   Parab2d_Bug26747::Coeffs[2] = 0.0;
1848   Parab2d_Bug26747::Coeffs[3] = -1.0;
1849   Parab2d_Bug26747::Coeffs[4] = -3.0;
1850   Parab2d_Bug26747::Coeffs[5] = 10.0;
1851
1852   OCC26747_CheckParabola(theDI, theArgVal[1]);
1853
1854   return 0;
1855 }
1856
1857 //=======================================================================
1858 //function : OCC26747_2
1859 //purpose  : Creates a 2D-parabola for testing
1860 //=======================================================================
1861 static Standard_Integer OCC26747_2(Draw_Interpretor& theDI,
1862                                    Standard_Integer  theNArg,
1863                                    const char **     theArgVal)
1864 {
1865   if(theNArg < 2)
1866   {
1867     theDI << "Use: OCC26747_2 result\n";
1868     return 1;
1869   }
1870
1871   //Expected parabola:
1872
1873   //                          ^ Y
1874   //                          |
1875   //        o                 |
1876   //                 o        |
1877   //            F x     o A   |
1878   //                 o        |
1879   //        o                 |
1880   //                          |
1881   //  <------------------------
1882   //  X
1883
1884   //  where (in UCS - User Coordinate System, - which
1885   //  is shown in the picture):
1886   //    Y-axe is the directrix of the parabola,
1887   //    A(0.5, 3.0) is a Vertex of the parabola,
1888   //    F(1.0, 3.0) is the focus of the parabola.
1889   //
1890   //  In WCS (World Coordinate System) these points have coordinates:
1891   //    A(-0.5, 3.0), F(-1.0, 3.0).
1892   //
1893   //  Focal length is 0.5,
1894   //  Parameter of the parabola is 1.
1895   //  Equation (in WCS): (y-3)^2=2*p*(-x-0.5), i.e. (y-3)^2=2*(-x-0.5)
1896   //  A * X^2 + B * (Y^2) + 2*C*(X*Y) + 2*D*X + 2*E*Y    + F = 0.
1897   //  0 * X^2 + 1 * (Y^2) + 2*0*(X*Y) + 2*1*X + 2*(-3)*Y + 10 = 0.
1898
1899
1900   Parab2d_Bug26747::Axes = gp_Ax2d(gp_Pnt2d(0.0, 0.0), gp_Dir2d(0.0, 1.0));
1901   Parab2d_Bug26747::FocusPoint.SetCoord(-1.0, 3.0);
1902
1903   Parab2d_Bug26747::FocalLength = 0.5;
1904
1905   Parab2d_Bug26747::VertX = -0.5;
1906   Parab2d_Bug26747::VertY = 3.0;
1907
1908   Parab2d_Bug26747::Parameter = 1.0;
1909
1910   Parab2d_Bug26747::Coeffs[0] = 0.0;
1911   Parab2d_Bug26747::Coeffs[1] = 1.0;
1912   Parab2d_Bug26747::Coeffs[2] = 0.0;
1913   Parab2d_Bug26747::Coeffs[3] = 1.0;
1914   Parab2d_Bug26747::Coeffs[4] = -3.0;
1915   Parab2d_Bug26747::Coeffs[5] = 10.0;
1916
1917   OCC26747_CheckParabola(theDI, theArgVal[1], Standard_False);
1918
1919   return 0;
1920 }
1921
1922 //=======================================================================
1923 //function : OCC26747_3
1924 //purpose  : Creates a 2D-parabola for testing
1925 //=======================================================================
1926 static Standard_Integer OCC26747_3(Draw_Interpretor& theDI,
1927                                    Standard_Integer  theNArg,
1928                                    const char **     theArgVal)
1929 {
1930   if(theNArg < 2)
1931   {
1932     theDI << "Use: OCC26747_2 result\n";
1933     return 1;
1934   }
1935
1936   //Expected parabola:
1937
1938   //                    ^ Y
1939   //                    |
1940   //        o           |
1941   //                 o  |
1942   //            F x     o A
1943   //                 o  |
1944   //        o           |
1945   //                    |
1946   //  <------------------
1947   //  X
1948
1949   //  where (in UCS - User Coordinate System, - which
1950   //  is shown in the picture):
1951   //    Y-axe is the directrix of the parabola,
1952   //    A(0.0, 3.0) is a Vertex of the parabola,
1953   //    F(0.0, 3.0) is the focus of the parabola (the Focus
1954   //                matches with the Apex).
1955   //
1956   //  In WCS (World Coordinate System) these points have coordinates:
1957   //    A(0.0, 3.0), F(0.0, 3.0).
1958   //
1959   //  Focal length is 0.0,
1960   //  Parameter of the parabola is 0.0.
1961   //  Equation (in WCS): (y-3)^2=2*p*(-x-0.0), i.e. (y-3)^2=0 (looks like a line y=3)
1962   //  A * X^2 + B * (Y^2) + 2*C*(X*Y) + 2*D*X + 2*E*Y    + F = 0.
1963   //  0 * X^2 + 1 * (Y^2) + 2*0*(X*Y) + 2*0*X + 2*(-3)*Y + 9 = 0.
1964
1965   Parab2d_Bug26747::Axes = gp_Ax2d(gp_Pnt2d(0.0, 0.0), gp_Dir2d(0.0, 1.0));
1966   Parab2d_Bug26747::FocusPoint.SetCoord(0.0, 3.0);
1967
1968   Parab2d_Bug26747::FocalLength = 0.0;
1969
1970   Parab2d_Bug26747::VertX = 0.0;
1971   Parab2d_Bug26747::VertY = 3.0;
1972
1973   Parab2d_Bug26747::Parameter = 0.0;
1974
1975   Parab2d_Bug26747::Coeffs[0] = 0.0;
1976   Parab2d_Bug26747::Coeffs[1] = 1.0;
1977   Parab2d_Bug26747::Coeffs[2] = 0.0;
1978   Parab2d_Bug26747::Coeffs[3] = 0.0;
1979   Parab2d_Bug26747::Coeffs[4] = -3.0;
1980   Parab2d_Bug26747::Coeffs[5] = 9.0;
1981
1982   OCC26747_CheckParabola(theDI, theArgVal[1], Standard_False);
1983
1984   return 0;
1985 }
1986
1987 #include "Geom2d_BezierCurve.hxx"
1988 #include "Geom2dGcc_QualifiedCurve.hxx"
1989 #include "Geom2dAdaptor_Curve.hxx"
1990 #include "Geom2dAPI_ProjectPointOnCurve.hxx"
1991 #include "Geom2dGcc_Circ2d2TanOn.hxx"
1992 //=======================================================================
1993 //function : OCC27357
1994 //purpose :
1995 //=======================================================================
1996 static Standard_Integer OCC27357(Draw_Interpretor& theDI,
1997                                  Standard_Integer,
1998                                  const char **)
1999 {
2000   TColgp_Array1OfPnt2d aPoles(1,3);
2001   aPoles.SetValue(1, gp_Pnt2d(0.,0.));
2002   aPoles.SetValue(2, gp_Pnt2d(0.,1.));
2003   aPoles.SetValue(3, gp_Pnt2d(6.,0.));
2004
2005   Handle(Geom2d_BezierCurve) aCurve1 = new Geom2d_BezierCurve(aPoles);
2006   aPoles.SetValue(2, gp_Pnt2d(0.,1.5));
2007   Handle(Geom2d_BezierCurve) aCurve2 = new Geom2d_BezierCurve(aPoles);
2008   NCollection_List<Standard_Integer> aDuumyList;
2009   int nP = 100;
2010   for(int i = 0 ; i < nP ; i++){
2011     Standard_Real u = i / (nP-1.);
2012     gp_Pnt2d aP1;
2013     gp_Vec2d aTangent;
2014     aCurve1->D1(u,aP1,aTangent);
2015     gp_Vec2d aNormal(-aTangent.Y(),aTangent.X());
2016     Handle(Geom2d_Line) normalLine=new Geom2d_Line(aP1, gp_Dir2d(aNormal));
2017     Geom2dGcc_QualifiedCurve qualifiedC1(Geom2dAdaptor_Curve(aCurve1),GccEnt_unqualified);
2018     Geom2dGcc_QualifiedCurve qualifiedC2(Geom2dAdaptor_Curve(aCurve2),GccEnt_unqualified);
2019
2020     try
2021     {
2022       Geom2dAPI_ProjectPointOnCurve projPc1(aP1, aCurve1);
2023       double g1 = projPc1.LowerDistanceParameter();
2024       Geom2dAPI_ProjectPointOnCurve projPc3(aP1, normalLine);
2025       double g3 = projPc3.LowerDistanceParameter();
2026       Geom2dGcc_Circ2d2TanOn aCircleBuilder(qualifiedC1,qualifiedC2,
2027         Geom2dAdaptor_Curve(normalLine),1e-9,g1,g1,g3);
2028       aDuumyList.Append(aCircleBuilder.NbSolutions());
2029     }
2030     catch(Standard_Failure)
2031     {
2032       theDI << "Exception was caught\n";
2033     }
2034   }
2035   return 0;
2036 }
2037 #include <Standard_ErrorHandler.hxx>
2038 #include <TColGeom_SequenceOfCurve.hxx>
2039 #include <GeomFill_NSections.hxx>
2040 #include <Geom_TrimmedCurve.hxx>
2041 #include <TopExp_Explorer.hxx>
2042 #include <BRepBuilderAPI_MakeFace.hxx>
2043 //=======================================================================
2044 //function : OCC26270
2045 //purpose :
2046 //=======================================================================
2047 static Standard_Integer OCC26270(Draw_Interpretor& theDI,
2048                                  Standard_Integer theNArg,
2049                                  const char **theArgVal)
2050 {
2051   if (theNArg != 3)
2052   {
2053     theDI << "Usage :" << theArgVal[0] << " shape result\n";
2054     return 0;
2055   }
2056   TopoDS_Shape aShape = DBRep::Get(theArgVal[1]);
2057   TopExp_Explorer anExp(aShape, TopAbs_EDGE);
2058   TColGeom_SequenceOfCurve aCurveSeq;
2059   for (; anExp.More(); anExp.Next())
2060   {
2061     Standard_Real f, l;
2062     Handle(Geom_Curve) aCurve = BRep_Tool::Curve(TopoDS::Edge(anExp.Current()), f, l);
2063     if (!aCurve.IsNull())
2064     {
2065       aCurve = new Geom_TrimmedCurve(aCurve, f, l);
2066       aCurveSeq.Append(aCurve);
2067     }
2068   }
2069   if (aCurveSeq.Length() > 1)
2070   {
2071     try
2072     {
2073       OCC_CATCH_SIGNALS
2074         GeomFill_NSections aBSurface(aCurveSeq);
2075       Handle(Geom_BSplineSurface) aRes = aBSurface.BSplineSurface();
2076       if (!aRes.IsNull())
2077       {
2078         BRepBuilderAPI_MakeFace b_face1(aRes, Precision::Confusion());
2079         TopoDS_Face bsp_face1 = b_face1.Face();
2080         DBRep::Set(theArgVal[2], bsp_face1);
2081       }
2082     }
2083     catch (Standard_Failure)
2084     {
2085       theDI << "ERROR: Exception in GeomFill_NSections\n";
2086     }
2087   }
2088   return 0;
2089 }
2090
2091 #include "BRepBuilderAPI_MakeWire.hxx"
2092 #include "BRepBuilderAPI_MakeEdge.hxx"
2093 static Standard_Integer OCC27552(Draw_Interpretor&,
2094                                    Standard_Integer,
2095                                    const char **  )
2096 {
2097   BRep_Builder BB;
2098   TopoDS_Vertex V1, V2, V3;
2099   TopoDS_Edge E1, E2;
2100   BB.MakeVertex(V1, gp_Pnt(0,0,0), 0.1);
2101   BB.MakeVertex(V2, gp_Pnt(5,0,0), 0.1);
2102   BB.MakeVertex(V3, gp_Pnt(10,0,0), 0.1);
2103   E1 = BRepBuilderAPI_MakeEdge(V1, V2).Edge();
2104   E2 = BRepBuilderAPI_MakeEdge(V2, V3).Edge();
2105   BRepBuilderAPI_MakeWire MW;
2106   MW.Add(E1);
2107   MW.Add(E2);
2108   TopoDS_Vertex V4, V5, V6, V7;
2109   TopoDS_Edge E3, E4;
2110   BB.MakeVertex(V4, gp_Pnt(10,0+0.05,0), 0.07);
2111   BB.MakeVertex(V5, gp_Pnt(10,0-0.05,0), 0.07);
2112   BB.MakeVertex(V6, gp_Pnt(10,0+2,0), 0.07);
2113   BB.MakeVertex(V7, gp_Pnt(10,0-2,0), 0.07);
2114   E3 = BRepBuilderAPI_MakeEdge(V4, V6).Edge();
2115   E4 = BRepBuilderAPI_MakeEdge(V5, V7).Edge();
2116   TopTools_ListOfShape LLE;
2117   LLE.Append(E3);
2118   LLE.Append(E4);
2119   MW.Add(LLE);
2120   TopoDS_Shape W = MW.Wire();
2121   DBRep::Set("outw", W);
2122
2123   return 0;
2124 }
2125
2126 #include <NCollection_IncAllocator.hxx>
2127 static Standard_Integer OCC27875(Draw_Interpretor& theDI,
2128                                  Standard_Integer theNArg,
2129                                  const char ** theArgVal)
2130 {
2131   if (theNArg < 2)
2132   {
2133     theDI << "Use: OCC27875 curve\n";
2134   }
2135
2136   TColGeom_SequenceOfCurve aNC(new NCollection_IncAllocator());
2137
2138   const Handle(Geom_Curve) aC = Handle(Geom_Curve)::DownCast(DrawTrSurf::Get(theArgVal[1]));
2139
2140   aNC.Append(aC);
2141
2142   GeomFill_NSections aNS(aNC);
2143
2144   if (aNS.BSplineSurface().IsNull())
2145   {
2146     theDI << "GeomFill_NSections is not done.\n";
2147   }
2148
2149   return 0;
2150 }
2151
2152
2153 #include <TDF_Tool.hxx>
2154 #include <XCAFDoc_View.hxx>
2155 #include <XCAFDoc_ViewTool.hxx>
2156 #include <XCAFView_Object.hxx>
2157 #include <XCAFView_ProjectionType.hxx>
2158 static Standard_Integer OCC28389(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2159 {
2160   if (argc < 20) {
2161     di << "Use: OCC28389 Doc label nb_shapes nb_GDT nb_planes name type pp_x pp_y pp_z vd_x vd_y vd_z ud_x ud_y ud_z zoom width height";
2162     return 1;
2163   }
2164   Handle(TDocStd_Document) aDoc;
2165   DDocStd::GetDocument(argv[1], aDoc);
2166   if (aDoc.IsNull()) {
2167     di << "Error: Wrong document";
2168     return 1;
2169   }
2170   Handle(XCAFDoc_ViewTool) aViewTool = XCAFDoc_DocumentTool::ViewTool(aDoc->Main());
2171
2172   TDF_Label aLabel;
2173   TDF_Tool::Label(aDoc->GetData(), argv[2], aLabel);
2174   if (aLabel.IsNull()) {
2175     di << "Error: Wrong label";
2176     return 1;
2177   }
2178   Handle(XCAFDoc_View) aView;
2179   if (!aLabel.FindAttribute(XCAFDoc_View::GetID(), aView)) {
2180     di << "Error: Wrong label";
2181     return 1;
2182   }
2183   Handle(XCAFView_Object) anObj = aView->GetObject();
2184   if (anObj.IsNull()) {
2185     di << "Error: Wrong label";
2186     return 1;
2187   }
2188
2189   Standard_Boolean isOK = Standard_True;
2190   // check links
2191   Standard_Integer nbShapes = Draw::Atoi(argv[3]);
2192   Standard_Integer nbGDTs = Draw::Atoi(argv[4]);
2193   Standard_Integer nbPlanes = Draw::Atoi(argv[5]);
2194   TDF_LabelSequence aSequence;
2195   aViewTool->GetRefShapeLabel(aLabel, aSequence);
2196   if (aSequence.Length() != nbShapes)
2197     isOK = Standard_False;
2198   aSequence.Clear();
2199   aViewTool->GetRefGDTLabel(aLabel, aSequence);
2200   if (aSequence.Length() != nbGDTs)
2201     isOK = Standard_False;
2202   aSequence.Clear();
2203   aViewTool->GetRefClippingPlaneLabel(aLabel, aSequence);
2204   if (aSequence.Length() != nbPlanes)
2205     isOK = Standard_False;
2206   if (!isOK) {
2207     di << "Error: Wrong references";
2208     return 1;
2209   }
2210
2211   if (anObj->Name()->IsDifferent(new TCollection_HAsciiString(argv[6]))) {
2212     di << "Error: Wrong name";
2213     return 1;
2214   }
2215
2216   XCAFView_ProjectionType aType = XCAFView_ProjectionType_NoCamera;
2217   if (argv[7][0] == 'p')
2218     aType = XCAFView_ProjectionType_Parallel;
2219   else if (argv[7][0] == 'c')
2220     aType = XCAFView_ProjectionType_Central;
2221
2222   if (anObj->Type()!= aType) {
2223     di << "Error: Wrong type";
2224     return 1;
2225   }
2226
2227   gp_Pnt aPP(Draw::Atof(argv[8]), Draw::Atof(argv[9]), Draw::Atof(argv[10]));
2228   if (aPP.Distance(anObj->ProjectionPoint()) > Precision::Confusion()) {
2229     di << "Error: Wrong projection point";
2230     return 1;
2231   }
2232
2233   gp_Dir aVD(Draw::Atof(argv[11]), Draw::Atof(argv[12]), Draw::Atof(argv[13]));
2234   if (!aVD.IsEqual(anObj->ViewDirection(), Precision::Angular())) {
2235     di << "Error: Wrong view direction";
2236     return 1;
2237   }
2238
2239   gp_Dir aUD(Draw::Atof(argv[14]), Draw::Atof(argv[15]), Draw::Atof(argv[16]));
2240   if (!aUD.IsEqual(anObj->UpDirection(), Precision::Angular())) {
2241     di << "Error: Wrong up direction";
2242     return 1;
2243   }
2244
2245   if (fabs(anObj->ZoomFactor() - Draw::Atof(argv[17])) > Precision::Confusion()) {
2246     di << "Error: Wrong zoom factor";
2247     return 1;
2248   }
2249
2250   if (fabs(anObj->WindowHorizontalSize() - Draw::Atof(argv[18])) > Precision::Confusion())
2251     isOK = Standard_False;
2252   if (fabs(anObj->WindowVerticalSize() - Draw::Atof(argv[19])) > Precision::Confusion())
2253     isOK = Standard_False;
2254   if (!isOK) {
2255     di << "Error: Wrong Window size";
2256     return 1;
2257   }
2258
2259   di << argv[2] << " OK";
2260   return 0;
2261 }
2262
2263 #include <TColgp_HArray1OfPnt2d.hxx>
2264 #include <TColgp_Array1OfVec2d.hxx>
2265 #include <TColStd_HArray1OfBoolean.hxx>
2266 #include <Geom2d_BSplineCurve.hxx>
2267 #include <Geom2dAPI_Interpolate.hxx>
2268 #include <GeomAPI.hxx>
2269 #include <BRepBuilderAPI_MakeEdge2d.hxx>
2270
2271 static Standard_Integer OCC28594(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
2272 {
2273   if (argc != 3)
2274   {
2275     di << "Usage :" << argv[0] << " curve_with_scale curve_without_scale\n";
2276     return 0;
2277   }
2278   Handle(TColgp_HArray1OfPnt2d) points_2d = new TColgp_HArray1OfPnt2d(1, 6);
2279   (*points_2d)(1) = gp_Pnt2d(-30.4, 8);
2280   (*points_2d)(2) = gp_Pnt2d(-16.689912, 17.498217);
2281   (*points_2d)(3) = gp_Pnt2d(-23.803064, 24.748543);
2282   (*points_2d)(4) = gp_Pnt2d(-16.907466, 32.919615);
2283   (*points_2d)(5) = gp_Pnt2d(-8.543829, 26.549421);
2284   (*points_2d)(6) = gp_Pnt2d(0, 39.200000);
2285
2286   TColgp_Array1OfVec2d tangent_2d(1, 6);
2287   (tangent_2d)(1) = gp_Vec2d(0.3, 0.4);
2288   (tangent_2d)(2) = gp_Vec2d(0, 0);
2289   (tangent_2d)(3) = gp_Vec2d(0, 0);
2290   (tangent_2d)(4) = gp_Vec2d(0, 0);
2291   (tangent_2d)(5) = gp_Vec2d(0, 0);
2292   (tangent_2d)(6) = gp_Vec2d(1, 0);
2293
2294   Handle(TColStd_HArray1OfBoolean) tangent_flags = new TColStd_HArray1OfBoolean(1, 6);
2295   (*tangent_flags)(1) = true;
2296   (*tangent_flags)(2) = false;
2297   (*tangent_flags)(3) = false;
2298   (*tangent_flags)(4) = false;
2299   (*tangent_flags)(5) = false;
2300   (*tangent_flags)(6) = true;
2301
2302   Geom2dAPI_Interpolate interp_2d_with_scale(points_2d, Standard_False, Precision::Confusion());
2303   interp_2d_with_scale.Load(tangent_2d, tangent_flags);
2304   interp_2d_with_scale.Perform();
2305   Handle(Geom2d_BSplineCurve) curve_2d_with_scale = interp_2d_with_scale.Curve();
2306
2307   Geom2dAPI_Interpolate interp_2d_without_scale(points_2d, Standard_False, Precision::Confusion());
2308   interp_2d_without_scale.Load(tangent_2d, tangent_flags, Standard_False);
2309   interp_2d_without_scale.Perform();
2310   Handle(Geom2d_BSplineCurve) curve_2d_without_scale = interp_2d_without_scale.Curve();
2311
2312   DrawTrSurf::Set(argv[1], curve_2d_with_scale);
2313   DrawTrSurf::Set(argv[2], curve_2d_without_scale);
2314   return 0;
2315 }
2316
2317 static Standard_Integer OCC28784(Draw_Interpretor&, Standard_Integer argc, const char** argv)
2318 {
2319   if (argc < 3)
2320     return 1;
2321
2322   TopoDS_Shape aShape =  DBRep::Get(argv[2]);
2323   if (aShape.IsNull())
2324     return 1;
2325
2326   gp_Ax2 aPlane (gp::Origin(), gp::DX(), -gp::DZ());
2327   HLRAlgo_Projector aProjector(aPlane);
2328
2329   Handle(HLRBRep_PolyAlgo) aHLR = new HLRBRep_PolyAlgo(aShape);
2330   aHLR->Projector(aProjector);
2331   aHLR->Update();
2332
2333   HLRBRep_PolyHLRToShape aHLRtoShape;
2334   aHLRtoShape.Update(aHLR);
2335
2336   TopoDS_Shape aHidden = aHLRtoShape.HCompound();
2337   
2338   DBRep::Set(argv[1], aHidden);
2339
2340   return 0;
2341 }
2342
2343 static Standard_Integer OCC28829 (Draw_Interpretor&, Standard_Integer, const char**)
2344 {
2345   // do something that causes FPE exception
2346   std::cout << "sqrt(-1) = " << sqrt (-1.) << std::endl;
2347   return 0;
2348 }
2349
2350 #include <NCollection_Buffer.hxx>
2351 #include <DDocStd_DrawDocument.hxx>
2352 #include <OSD_OpenFile.hxx>
2353 #include <Standard_ArrayStreamBuffer.hxx>
2354 #include <TDataStd_Name.hxx>
2355 #include <TDocStd_Application.hxx>
2356
2357 #ifdef max
2358   #undef max
2359 #endif
2360
2361 static Standard_Integer OCC28887 (Draw_Interpretor&, Standard_Integer theNbArgs, const char** theArgVec)
2362 {
2363   if (theNbArgs < 3)
2364   {
2365     std::cout << "Syntax error: wrong number of arguments!\n";
2366     return 1;
2367   }
2368
2369   const TCollection_AsciiString aFilePath (theArgVec[1]);
2370   const TCollection_AsciiString aName     (theArgVec[2]);
2371   Handle(NCollection_Buffer) aBuffer;
2372   {
2373     std::ifstream aFile;
2374     OSD_OpenStream (aFile, aFilePath.ToCString(), std::ios::binary | std::ios::in);
2375     if (!aFile.is_open())
2376     {
2377       std::cout << "Error: input file '" << aFilePath << "' cannot be read\n";
2378       return 1;
2379     }
2380     aFile.seekg (0, std::ios_base::end);
2381     const int64_t aFileLength = int64_t (aFile.tellg());
2382     if (aFileLength > int64_t (std::numeric_limits<ptrdiff_t>::max())
2383      || aFileLength < 1)
2384     {
2385       std::cout << "Error: input file '" << aFilePath << "' is too large\n";
2386       return 1;
2387     }
2388     aFile.seekg (0, std::ios_base::beg);
2389
2390     aBuffer = new NCollection_Buffer (NCollection_BaseAllocator::CommonBaseAllocator());
2391     if (!aBuffer->Allocate (size_t(aFileLength)))
2392     {
2393       std::cout << "Error: memory allocation (" << aFileLength << ") has failed\n";
2394       return 1;
2395     }
2396
2397     aFile.read ((char* )aBuffer->ChangeData(), aBuffer->Size());
2398     if (!aFile.good())
2399     {
2400       std::cout << "Error: input file '" << aFilePath << "' reading failure\n";
2401       return 1;
2402     }
2403   }
2404
2405   Standard_ArrayStreamBuffer aStreamBuffer ((const char* )aBuffer->ChangeData(), aBuffer->Size());
2406   std::istream aStream (&aStreamBuffer);
2407   // just play with seeking
2408   aStream.seekg (0, std::ios_base::end);
2409   aStream.seekg (0, std::ios_base::beg);
2410   if (aFilePath.EndsWith (".brep")
2411    || aFilePath.EndsWith (".rle"))
2412   {
2413     TopoDS_Shape aShape;
2414     BRep_Builder aBuilder;
2415     BRepTools::Read (aShape, aStream, aBuilder);
2416     DBRep::Set (aName.ToCString(), aShape);
2417   }
2418   else
2419   {
2420     Handle(TDocStd_Document) aDoc;
2421     Handle(TDocStd_Application) anApp = DDocStd::GetApplication();
2422     Standard_CString aNameVar = aName.ToCString();
2423     if (DDocStd::GetDocument (aNameVar, aDoc, Standard_False))
2424     {
2425       std::cout << "Error: document with name " << aName << " already exists\n";
2426       return 1;
2427     }
2428
2429     if (anApp->Open (aStream, aDoc) != PCDM_RS_OK)
2430     {
2431       std::cout << "Error: cannot open XDE document\n";
2432       return 1;
2433     }
2434
2435     Handle(DDocStd_DrawDocument) aDrawDoc = new DDocStd_DrawDocument (aDoc);
2436     TDataStd_Name::Set (aDoc->GetData()->Root(), aName.ToCString());
2437     Draw::Set (aName.ToCString(), aDrawDoc);
2438   }
2439
2440   return 0;
2441 }
2442
2443 static Standard_Integer OCC28131 (Draw_Interpretor&, Standard_Integer theNbArgs, const char** theArgVec)
2444 {
2445   if (theNbArgs != 2)
2446   {
2447     std::cerr << "Error: wrong number of arguments" << std::endl;
2448     return 1;
2449   }
2450
2451   double height = 8.5;
2452   gp_Pnt JiZhunXian2_v0 = gp_Pnt(-17.6, 0.0, 0.0);
2453   gp_Pnt JiZhunXian2_v1 = gp_Pnt(0, 32.8, 0.0);
2454
2455   // Outline
2456   TColgp_Array1OfPnt outer_e_bzr_geom_v(1, 4);
2457   {
2458     outer_e_bzr_geom_v(1) = JiZhunXian2_v0;
2459     outer_e_bzr_geom_v(4) = JiZhunXian2_v1;
2460
2461     Standard_Real ratio1 = 5.4 / 13.2;
2462     outer_e_bzr_geom_v(2) = gp_Pnt(outer_e_bzr_geom_v(1).X(), ratio1*outer_e_bzr_geom_v(4).Y(), 0);
2463     Standard_Real ratio2 = 6.0 / 6.8;
2464     outer_e_bzr_geom_v(3) = gp_Pnt(ratio2*outer_e_bzr_geom_v(1).X(), outer_e_bzr_geom_v(4).Y(), 0);
2465   }
2466
2467   Handle(Geom_BezierCurve) outer_e_bzr_geom = new Geom_BezierCurve(outer_e_bzr_geom_v);
2468   Handle(Geom_BSplineCurve) outer_e_bsp_geom = GeomConvert::CurveToBSplineCurve(outer_e_bzr_geom);
2469   TopoDS_Edge outer_e = BRepBuilderAPI_MakeEdge(outer_e_bsp_geom);
2470
2471   Handle(Geom_BSplineCurve) curve1;
2472   {
2473     Handle(TColgp_HArray1OfPnt2d) harray = new TColgp_HArray1OfPnt2d(1, 2); // sizing harray
2474     harray->SetValue(1, gp_Pnt2d(-JiZhunXian2_v1.Y(), 0));
2475     harray->SetValue(2, gp_Pnt2d(0, height + height / 2));
2476
2477     Geom2dAPI_Interpolate anInterpolation(harray, Standard_False, 1e-6);
2478
2479     gp_Vec2d vtangent1(0, 1);
2480     gp_Vec2d vtangent2(1, 0);
2481     anInterpolation.Load(vtangent1, vtangent2);
2482     anInterpolation.Perform();
2483
2484     Handle(Geom2d_BSplineCurve) c = anInterpolation.Curve();
2485
2486     gp_Pln pln(gp_Ax3(gp_Pnt(), gp_Dir(1, 0, 0), gp_Dir(0, -1, 0)));
2487
2488     Handle(Geom_BSplineCurve) c3d = Handle(Geom_BSplineCurve)::DownCast(GeomAPI::To3d(c, pln));
2489     curve1 = c3d;
2490   }
2491
2492   Handle(Geom_BSplineCurve) curve2;
2493   {
2494     Handle(TColgp_HArray1OfPnt2d) harray = new TColgp_HArray1OfPnt2d(1, 3); // sizing harray
2495     harray->SetValue(1, gp_Pnt2d(-JiZhunXian2_v0.X(), 0));
2496     harray->SetValue(2, gp_Pnt2d(-JiZhunXian2_v0.X() - 2.6, height));
2497     harray->SetValue(3, gp_Pnt2d(0, height + height / 2));
2498
2499     Geom2dAPI_Interpolate anInterpolation(harray, Standard_False, 1e-6);
2500     anInterpolation.Perform();
2501
2502     Handle(Geom2d_BSplineCurve) c = anInterpolation.Curve();
2503     gp_Pln pln(gp_Ax3(gp_Pnt(), gp_Dir(0, -1, 0), gp_Dir(-1, 0, 0)));
2504     Handle(Geom_BSplineCurve) c3d = Handle(Geom_BSplineCurve)::DownCast(GeomAPI::To3d(c, pln));
2505     curve2 = c3d;
2506   }
2507
2508   //////////////////////////////////////
2509   GeomFill_BSplineCurves fill2;
2510   fill2.Init(outer_e_bsp_geom, curve1, curve2, GeomFill_CoonsStyle);
2511
2512   const Handle(Geom_BSplineSurface)& surf_geom = fill2.Surface();
2513
2514   TopoDS_Shape filled_face = BRepBuilderAPI_MakeFace(surf_geom, 0);
2515
2516   DBRep::Set (theArgVec[1], filled_face);
2517
2518 /*
2519   ///////////////////////////////////////////////////////////////////////
2520   TopoDS_Solid first_solid;
2521   {
2522     BRepOffset_MakeOffset myOffsetShape(filled_face, -offset_thick, 1e-4,
2523       BRepOffset_Skin, //Mode
2524       Standard_False, //Intersection
2525       Standard_False, //SelfInter
2526       GeomAbs_Intersection, //Join
2527       Standard_True, //Thickening
2528       Standard_False //RemoveIntEdges
2529       ); //RemoveInvalidFaces
2530     first_solid = TopoDS::Solid(myOffsetShape.Shape());
2531   }
2532 */
2533   return 0;
2534 }
2535 #include <math_NewtonFunctionRoot.hxx>
2536 #include <math_TrigonometricFunctionRoots.hxx>
2537 #include <math_TrigonometricEquationFunction.hxx>
2538 #include <gp_Elips2d.hxx>
2539 #include <Geom2d_Ellipse.hxx>
2540 #include <Geom2dAPI_InterCurveCurve.hxx>
2541 static Standard_Integer OCC29289(Draw_Interpretor&, Standard_Integer , const char** )
2542 {
2543   gp_Elips2d e1(gp_Ax2d(gp_Pnt2d(0., 0.), gp_Dir2d(1., 0)), 2., 1.);
2544   Handle(Geom2d_Ellipse) Ge1 = new Geom2d_Ellipse(e1);
2545   gp_Elips2d e2(gp_Ax2d(gp_Pnt2d(0.5, 0.5), gp_Dir2d(1., 1.)), 2., 1.);
2546   Handle(Geom2d_Ellipse) Ge2 = new Geom2d_Ellipse(e2);
2547
2548   Standard_Integer err = 0;
2549   Geom2dAPI_InterCurveCurve Intersector;
2550   Intersector.Init(Ge1, Ge2, 1.e-7);
2551   if (Intersector.NbPoints() == 0)
2552   {
2553     std::cout << "Error: intersector is not done  \n";
2554     err = 1;
2555   }
2556
2557
2558   Standard_Real A, B, C, D, E;
2559   A = 1.875;
2560   B = -.75;
2561   C = -.5;
2562   D = -.25;
2563   E = -.25;
2564   math_TrigonometricEquationFunction MyF(A, B, C, D, E);
2565   Standard_Real X, Tol1, Eps, Teta, TetaNewton;
2566   Tol1 = 1.e-15;
2567   Eps = 1.5e-12;
2568   Standard_Integer Nit[] = { 5, 6, 7, 6 };
2569
2570   Standard_Real TetaPrev = 0.;
2571   Standard_Integer i;
2572   for (i = 1; i <= Intersector.NbPoints(); i++) {
2573     Teta = Intersector.Intersector().Point(i).ParamOnFirst();
2574     X = Teta - 0.1 * (Teta - TetaPrev);
2575     TetaPrev = Teta;
2576     math_NewtonFunctionRoot Resol(MyF, X, Tol1, Eps, Nit[i-1]);
2577     if (Resol.IsDone()) {
2578       TetaNewton = Resol.Root();
2579       if (Abs(Teta - TetaNewton) > 1.e-7)
2580       {
2581         std::cout << "Error: Newton root is wrong for " << Teta << " \n";
2582         err = 1;
2583       }
2584     }
2585     else
2586     {
2587       std::cout << "Error: Newton is not done for " << Teta << " \n";
2588       err = 1;
2589     }
2590   }
2591
2592   return err;
2593 }
2594
2595 //===============================================================================================
2596 Standard_Boolean IsSameGuid (const Standard_GUID& aGuidNull, const Standard_GUID& aGuid2)
2597 {
2598   Standard_Boolean isSame (Standard_False);
2599   if(Standard_GUID::IsEqual(aGuidNull, aGuid2)) {
2600     aGuid2.ShallowDump(cout);
2601     isSame = Standard_True;
2602   } else {
2603     aGuid2.ShallowDump(cout);
2604     cout <<endl;
2605   }
2606   return isSame;
2607 }
2608
2609 #include <TDataStd_AsciiString.hxx>
2610 #include <TDataStd_BooleanArray.hxx>
2611 #include <TDataStd_BooleanList.hxx>
2612 #include <TDataStd_ByteArray.hxx>
2613 #include <TDataStd_ExtStringArray.hxx>
2614 #include <TDataStd_ExtStringList.hxx>
2615 #include <TDataStd_Integer.hxx>
2616 #include <TDataStd_IntegerArray.hxx>
2617 #include <TDataStd_IntegerList.hxx>
2618 #include <TDataStd_Name.hxx>
2619 #include <TDataStd_Real.hxx>
2620 #include <TDataStd_RealArray.hxx>
2621 #include <TDataStd_RealList.hxx>
2622 #include <TDataStd_ReferenceArray.hxx>
2623 #include <TDataStd_ReferenceList.hxx>
2624
2625 #define QCOMPARE(val1, val2) \
2626   di << "Checking " #val1 " == " #val2 << \
2627         ((val1) == (val2) ? ": OK\n" : ": Error\n")
2628
2629 static Standard_Integer OCC29371 (Draw_Interpretor& di, Standard_Integer n, const char** a)
2630 {
2631   if (n != 1)
2632   {
2633     std::cout << "Usage : " << a[0] << "\n";
2634     return 1;
2635   }
2636
2637   Handle(TDocStd_Application) anApp = DDocStd::GetApplication();
2638   Handle(TDocStd_Document) aDoc;
2639   anApp->NewDocument ("BinOcaf", aDoc);
2640   TDF_Label aLab = aDoc->Main();
2641   Standard_GUID aNullGuid("00000000-0000-0000-0000-000000000000");
2642   Standard_Boolean IsNullGuid(Standard_False);
2643
2644   try {
2645     //1. Set TDataStd_AsciiString
2646     Handle(TDataStd_AsciiString) aStrAtt = new TDataStd_AsciiString();
2647     aLab.AddAttribute(aStrAtt);
2648     if(!aStrAtt.IsNull()) {
2649       Standard_GUID aGuid = aStrAtt->ID();
2650       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2651     }
2652
2653     //2. Set TDataStd_BooleanArray
2654     Handle(TDataStd_BooleanArray) aBArAtt = new TDataStd_BooleanArray();
2655     aLab.AddAttribute(aBArAtt);
2656     if(!aBArAtt.IsNull()) {
2657       Standard_GUID aGuid = aBArAtt->ID();
2658       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2659     }
2660
2661     //3. Set TDataStd_BooleanList
2662     Handle(TDataStd_BooleanList) aBListAtt = new TDataStd_BooleanList();
2663     aLab.AddAttribute(aBListAtt);
2664     if(!aBListAtt.IsNull()) {
2665       Standard_GUID aGuid = aBListAtt->ID();
2666       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2667     }
2668
2669     //4. Set TDataStd_ByteArray
2670     Handle(TDataStd_ByteArray) aByteArAtt = new TDataStd_ByteArray();
2671     aLab.AddAttribute(aByteArAtt);
2672     if(!aByteArAtt.IsNull()) {
2673       Standard_GUID aGuid = aByteArAtt->ID();
2674       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2675     }
2676
2677     //5. Set TDataStd_ExtStringArray
2678     Handle(TDataStd_ExtStringArray) anExtStrArAtt = new TDataStd_ExtStringArray();
2679     aLab.AddAttribute(anExtStrArAtt);
2680     if(!anExtStrArAtt.IsNull()) {
2681       Standard_GUID aGuid = anExtStrArAtt->ID();
2682       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2683     }
2684
2685     //6. Set TDataStd_ExtStringList
2686     Handle(TDataStd_ExtStringList) anExtStrListAtt = new TDataStd_ExtStringList();
2687     aLab.AddAttribute(anExtStrListAtt);
2688     if(!anExtStrListAtt.IsNull()) {
2689       Standard_GUID aGuid = anExtStrListAtt->ID();
2690       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2691     }
2692
2693     //7. Set TDataStd_Integer
2694     Handle(TDataStd_Integer) anIntAtt = new TDataStd_Integer();
2695     aLab.AddAttribute(anIntAtt);
2696     if(!anIntAtt.IsNull()) {
2697       Standard_GUID aGuid = anIntAtt->ID();
2698       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2699     }
2700
2701     //8. Set TDataStd_IntegerArray
2702     Handle(TDataStd_IntegerArray) anIntArrAtt = new TDataStd_IntegerArray();
2703     aLab.AddAttribute(anIntArrAtt);
2704     if(!anIntArrAtt.IsNull()) {
2705       Standard_GUID aGuid = anIntArrAtt->ID();
2706       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2707     }
2708
2709     //9. Set TDataStd_IntegerList
2710     Handle(TDataStd_IntegerList) anIntListAtt = new TDataStd_IntegerList();
2711     aLab.AddAttribute(anIntListAtt);
2712     if(!anIntListAtt.IsNull()) {
2713       Standard_GUID aGuid = anIntListAtt->ID();
2714       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2715     }
2716
2717     //10. Set TDataStd_Name
2718     Handle(TDataStd_Name) aNameAtt = new TDataStd_Name();
2719     aLab.AddAttribute(aNameAtt);
2720     if(!aNameAtt.IsNull()) {
2721       Standard_GUID aGuid = aNameAtt->ID();
2722       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2723     }
2724
2725     //11. Set TDataStd_Real
2726     Handle(TDataStd_Real) aRealAtt = new TDataStd_Real();
2727     aLab.AddAttribute(aRealAtt);
2728     if(!aRealAtt.IsNull()) {
2729       Standard_GUID aGuid = aRealAtt->ID();
2730       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2731     }
2732
2733     //12. Set TDataStd_RealArray
2734     Handle(TDataStd_RealArray) aRealArrAtt = new TDataStd_RealArray();
2735     aLab.AddAttribute(aRealArrAtt);
2736     if(!aRealArrAtt.IsNull()) {
2737       Standard_GUID aGuid = aRealArrAtt->ID();
2738       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2739     }
2740
2741     //13. Set TDataStd_RealList
2742     Handle(TDataStd_RealList) aRealListAtt = new TDataStd_RealList();
2743     aLab.AddAttribute(aRealListAtt);
2744     if(!aRealListAtt.IsNull()) {
2745       Standard_GUID aGuid = aRealListAtt->ID();
2746       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2747     }
2748
2749     //14. Set TDataStd_ReferenceArray
2750     Handle(TDataStd_ReferenceArray) aRefArrAtt = new TDataStd_ReferenceArray();
2751     aLab.AddAttribute(aRefArrAtt);
2752     if(!aRefArrAtt.IsNull()) {
2753       Standard_GUID aGuid = aRefArrAtt->ID();
2754       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2755     }
2756
2757     //15. Set TDataStd_ReferenceList
2758     Handle(TDataStd_ReferenceList) aRefListAtt = new TDataStd_ReferenceList();
2759     aLab.AddAttribute(aRefListAtt);
2760     if(!aRefListAtt.IsNull()) {
2761       Standard_GUID aGuid = aRefListAtt->ID();
2762       IsNullGuid = IsSameGuid(aNullGuid, aGuid);
2763     }
2764   } catch (...)
2765   {
2766     IsNullGuid = Standard_True;
2767   }
2768   QCOMPARE (IsNullGuid, Standard_False);
2769   anApp->Close(aDoc);
2770   return 0;
2771 }
2772
2773 #include <NCollection_DoubleMap.hxx>
2774 #include <NCollection_IndexedMap.hxx>
2775 #include <NCollection_DataMap.hxx>
2776 #include <NCollection_IndexedDataMap.hxx>
2777 #include <OSD_MemInfo.hxx>
2778
2779 // check that copying of empty maps does not allocate extra memory
2780 template<typename T> void AllocDummyArr (Draw_Interpretor& theDI, int theN1, int theN2)
2781 {
2782   NCollection_Array1<T> aMapArr1(0, theN1), aMapArr2(0, theN2);
2783
2784   OSD_MemInfo aMemTool;
2785   Standard_Size aMem0 = aMemTool.Value (OSD_MemInfo::MemHeapUsage);
2786
2787   for (int i = 1; i < theN1; i++)
2788     aMapArr1(i) = aMapArr1(i-1);
2789   for (int i = 1; i < theN2; i++)
2790     aMapArr2(i) = aMapArr2(0);
2791
2792   aMemTool.Update();
2793   Standard_Size aMem1 = aMemTool.Value (OSD_MemInfo::MemHeapUsage);
2794
2795   theDI << "Heap usage before copy = " << (int)aMem0 << ", after = " << (int)aMem1 << "\n";
2796   
2797   if (aMem1 > aMem0)
2798     theDI << "Error: memory increased by " << (int)(aMem1 - aMem0) << " bytes\n";
2799 };
2800
2801 static Standard_Integer OCC29064 (Draw_Interpretor& theDI, Standard_Integer theArgc, const char** theArgv)
2802 {
2803   if (theArgc < 2)
2804   {
2805     cout << "Error: give argument indicating type of map (map, doublemap, datamap, indexedmap, indexeddatamap)" << endl;
2806     return 1;
2807   }
2808
2809   const int nbm1 = 10000, nbm2 = 10000;
2810   if (strcasecmp (theArgv[1], "map") == 0)
2811     AllocDummyArr<NCollection_Map<int> > (theDI, nbm1, nbm2);
2812   else if (strcasecmp (theArgv[1], "doublemap") == 0)
2813     AllocDummyArr<NCollection_DoubleMap<int, int> > (theDI, nbm1, nbm2);
2814   else if (strcasecmp (theArgv[1], "datamap") == 0)
2815     AllocDummyArr<NCollection_DataMap<int, int> > (theDI, nbm1, nbm2);
2816   else if (strcasecmp (theArgv[1], "indexedmap") == 0)
2817     AllocDummyArr<NCollection_IndexedMap<int> > (theDI, nbm1, nbm2);
2818   else if (strcasecmp (theArgv[1], "indexeddatamap") == 0)
2819     AllocDummyArr<NCollection_IndexedDataMap<int, int> > (theDI, nbm1, nbm2);
2820   else
2821   {
2822     cout << "Error: unrecognized argument " << theArgv[1] << endl;
2823     return 1;
2824   }
2825   return 0;
2826 }
2827
2828 #include <BRepOffsetAPI_MakePipeShell.hxx>
2829 #include <GC_MakeArcOfCircle.hxx>
2830 #include <BRepAdaptor_CompCurve.hxx>
2831 #include <gp_Circ.hxx>
2832 //=======================================================================
2833 //function : OCC29430
2834 //purpose  : 
2835 //=======================================================================
2836 static Standard_Integer OCC29430(Draw_Interpretor& theDI,
2837                                  Standard_Integer /*theNArg*/,
2838                                  const char** theArgVal)
2839 {
2840   const Standard_Real r45 = M_PI / 4.0, r225 = 3.0*M_PI / 4.0;
2841
2842   GC_MakeArcOfCircle arcMaker(gp_Circ(gp_Ax2(gp_Pnt(0.0, 0.0, 0.0), gp_Dir(0.0, 0.0, 1.0), gp_Dir(1.0, 0.0, 0.0)), 1.0), r45, r225, Standard_True);
2843   BRepBuilderAPI_MakeEdge edgeMaker(arcMaker.Value());
2844   BRepBuilderAPI_MakeWire wireMaker(edgeMaker.Edge());
2845   const TopoDS_Wire circle = wireMaker.Wire();
2846
2847   DBRep::Set(theArgVal[1], circle);
2848
2849   BRepAdaptor_CompCurve curve(circle);
2850   theDI << "Curve.FirstParameter() = " << curve.FirstParameter() << "\n";
2851   theDI << "Curve.LastParameter() = " << curve.LastParameter() << "\n";
2852   theDI << "Curve.Period() = " << (curve.IsPeriodic()? curve.Period() : 0.0) << "\n";
2853   const gp_Pnt aStartPt = curve.Value(curve.FirstParameter());
2854   const gp_Pnt anEndPt = curve.Value(curve.LastParameter());
2855
2856   DrawTrSurf::Set(theArgVal[2], aStartPt);
2857   DrawTrSurf::Set(theArgVal[3], anEndPt);
2858
2859   return 0;
2860 }
2861
2862 #include <STEPCAFControl_Reader.hxx>
2863
2864 //=======================================================================
2865 //function : OCC29531
2866 //purpose  : 
2867 //=======================================================================
2868 static Standard_Integer OCC29531(Draw_Interpretor&, Standard_Integer, const char** theArgV)
2869 {
2870   Handle(TDocStd_Application) anApp = DDocStd::GetApplication();
2871   Handle(TDocStd_Document) aDoc;
2872   anApp->NewDocument("BinOcaf", aDoc);
2873   aDoc->SetUndoLimit(1);
2874
2875   STEPCAFControl_Reader Reader;
2876   Reader.ReadFile(theArgV[1]);
2877   Reader.Transfer(aDoc);
2878   TDF_Label aShL, aDL;
2879   TDF_Tool::Label(aDoc->GetData(), "0:1:1:2:672", aShL);
2880   TDF_Tool::Label(aDoc->GetData(), "0:1:4:10", aDL);
2881
2882   aDoc->OpenCommand();
2883
2884   Handle(XCAFDoc_DimTolTool) aDimTolTool = XCAFDoc_DocumentTool::DimTolTool(aDoc->Main());
2885   aDimTolTool->SetDimension(aShL, aDL);
2886
2887   aDoc->CommitCommand();
2888
2889   aDoc->Undo();
2890   aDoc->Redo();
2891   return 0;
2892 }
2893
2894 //=======================================================================
2895 //function : OCC29807
2896 //purpose  : 
2897 //=======================================================================
2898 #include <GeomAdaptor_HSurface.hxx>
2899 #include <IntPatch_PointLine.hxx>
2900 #include <IntSurf_PntOn2S.hxx>
2901 static Standard_Integer OCC29807(Draw_Interpretor& theDI, Standard_Integer theNArg, const char** theArgV)
2902 {
2903   if (theNArg != 7)
2904   {
2905     theDI << "Use: " << theArgV[0] << "surface1 surface2 u1 v1 u2 v2\n";
2906     return 1;
2907   }
2908
2909   const Handle(Geom_Surface) aS1 = DrawTrSurf::GetSurface(theArgV[1]);
2910   const Handle(Geom_Surface) aS2 = DrawTrSurf::GetSurface(theArgV[2]);
2911
2912   if (aS1.IsNull() || aS2.IsNull())
2913   {
2914     theDI << "Error. Null surface is not supported.\n";
2915     return 1;
2916   }
2917
2918   const Standard_Real aU1 = Draw::Atof(theArgV[3]);
2919   const Standard_Real aV1 = Draw::Atof(theArgV[4]);
2920   const Standard_Real aU2 = Draw::Atof(theArgV[5]);
2921   const Standard_Real aV2 = Draw::Atof(theArgV[6]);
2922
2923   const Handle(GeomAdaptor_HSurface) anAS1 = new GeomAdaptor_HSurface(aS1);
2924   const Handle(GeomAdaptor_HSurface) anAS2 = new GeomAdaptor_HSurface(aS2);
2925
2926   const gp_Pnt aP1 = anAS1->Value(aU1, aV1);
2927   const gp_Pnt aP2 = anAS2->Value(aU2, aV2);
2928
2929   if (aP1.SquareDistance(aP2) > Precision::SquareConfusion())
2930   {
2931     theDI << "Error. True intersection point must be specified. "
2932              "Please check parameters: u1 v1 u2 v2.\n";
2933     return 1;
2934   }
2935
2936   IntSurf_PntOn2S aPOn2S;
2937   aPOn2S.SetValue(0.5*(aP1.XYZ() + aP2.XYZ()), aU1, aV1, aU2, aV2);
2938
2939   const Standard_Real aCurvatureRadius = IntPatch_PointLine::CurvatureRadiusOfIntersLine(anAS1, anAS2, aPOn2S);
2940   theDI << "Radius of curvature is " << aCurvatureRadius << "\n";
2941   return 0;
2942 }
2943
2944 //=======================================================================
2945 //function : OCC29925
2946 //purpose  : check safety of functions like IsSpace(), LowerCase(), etc. for all chars
2947 //=======================================================================
2948 static Standard_Integer OCC29925 (Draw_Interpretor& theDI, Standard_Integer, const char**)
2949 {
2950   // iterate by all valid ASCII chars (including extended)
2951   for (int i = 0; i < 256; i++)
2952   {
2953     Standard_Character c = (char)(unsigned char)i;
2954 //    if (c != i) theDI << c << " != " << i << "\n";
2955     const char* anOp = "";
2956     try {
2957       anOp = "IsAlphabetic";
2958       IsAlphabetic (c);
2959       anOp = "IsDigit";
2960       IsDigit (c);
2961       anOp = "IsXDigit";
2962       IsXDigit (c);
2963       anOp = "IsAlphanumeric";
2964       IsAlphanumeric (c);
2965       anOp = "IsControl";
2966       IsControl (c);
2967       anOp = "IsGraphic";
2968       IsGraphic (c);
2969       anOp = "IsLowerCase";
2970       IsLowerCase (c);
2971       anOp = "IsPrintable";
2972       IsPrintable (c);
2973       anOp = "IsPunctuation";
2974       IsPunctuation (c);
2975       anOp = "IsSpace";
2976       IsSpace (c);
2977       anOp = "IsUpperCase";
2978       IsUpperCase (c);
2979       anOp = "LowerCase";
2980       LowerCase (c);
2981       anOp = "UpperCase";
2982       UpperCase (c);
2983     }
2984     catch (const Handle(Standard_Failure)& e)
2985     {
2986       theDI << anOp << "() fails for " << c << " (" << e->DynamicType()->Name() << ")\n";
2987     }
2988   }
2989
2990   return 0;
2991 }
2992
2993 void QABugs::Commands_20(Draw_Interpretor& theCommands) {
2994   const char *group = "QABugs";
2995
2996   theCommands.Add ("OCC26675_1", "OCC26675_1 result", __FILE__, SurfaceGenOCC26675_1, group);
2997   theCommands.Add ("OCC24836", "OCC24836", __FILE__, OCC24836, group);
2998   theCommands.Add("OCC27021", "OCC27021", __FILE__, OCC27021, group);
2999   theCommands.Add("OCC27235", "OCC27235", __FILE__, OCC27235, group);
3000   theCommands.Add("OCC26930", "OCC26930", __FILE__, OCC26930, group);
3001   theCommands.Add("OCC27466", "OCC27466", __FILE__, OCC27466, group);
3002   theCommands.Add("OCC27341",
3003                   "OCC27341 res shape axo/top/bottom/front/back/left/right",
3004                   __FILE__, OCC27341, group);
3005   theCommands.Add ("OCC26747_1", "OCC26747_1 result", __FILE__, OCC26747_1, group);
3006   theCommands.Add ("OCC26747_2", "OCC26747_2 result", __FILE__, OCC26747_2, group);
3007   theCommands.Add ("OCC26747_3", "OCC26747_3 result", __FILE__, OCC26747_3, group);
3008   theCommands.Add ("OCC27357", "OCC27357", __FILE__, OCC27357, group);
3009   theCommands.Add("OCC26270", "OCC26270 shape result", __FILE__, OCC26270, group);
3010   theCommands.Add ("OCC27552", "OCC27552", __FILE__, OCC27552, group); 
3011   theCommands.Add("OCC27875", "OCC27875 curve", __FILE__, OCC27875, group);
3012   theCommands.Add("OCC28389", "OCC28389", __FILE__, OCC28389, group);
3013   theCommands.Add("OCC28594", "OCC28594", __FILE__, OCC28594, group);
3014   theCommands.Add("OCC28784", "OCC28784 result shape", __FILE__, OCC28784, group);
3015   theCommands.Add("OCC28829", "OCC28829: perform invalid FPE operation", __FILE__, OCC28829, group);
3016   theCommands.Add("OCC28887",
3017                   "OCC28887 filePath result"
3018                   "\n\t\t: Check interface for reading BRep from memory.",
3019                   __FILE__, OCC28887, group);
3020   theCommands.Add("OCC28131", "OCC28131 name: creates face problematic for offset", __FILE__, OCC28131, group);
3021   theCommands.Add("OCC29289", "OCC29289 : searching trigonometric root by Newton iterations", __FILE__, OCC29289, group);
3022   theCommands.Add ("OCC29371", "OCC29371", __FILE__, OCC29371, group);
3023   theCommands.Add("OCC29430", "OCC29430 <result wire> "
3024                               "<result first point> <result last point>",
3025                               __FILE__, OCC29430, group);
3026   theCommands.Add("OCC29531", "OCC29531 <step file name>", __FILE__, OCC29531, group);
3027
3028   theCommands.Add ("OCC29064", "OCC29064: test memory usage by copying empty maps", __FILE__, OCC29064, group);
3029   theCommands.Add ("OCC29925", "OCC29925: check safety of character classification functions", __FILE__, OCC29925, group);
3030   theCommands.Add("OCC29807", "OCC29807 surface1 surface2 u1 v1 u2 v2", __FILE__, OCC29807, group);
3031
3032   return;
3033 }