1 |
// Fichier MAGIC - UQTR; |
2 |
//*i:452; |
3 |
%1=GEOMETRIE(1.000000000000000,STEP,bielle.step,/home/gilles/dev/magic/app/VMM/VMM/win32/mat.dat); |
4 |
%1=GEOMETRIE_EPS(1.000000000000000e-06); |
5 |
%2=VOLUME(115,($3),0,0); |
6 |
%3=COQUILLE($2,($6,$38,$70,$102,$134,$166,$198,$230,$254,$278,$294,$316,$338,$355,$363,$375,$388,$405,$413,$425,$438,$446)); |
7 |
%4=SURFACE_STEP(468); |
8 |
%5=FACE(172,$4,($7),-1,1,((Da,0.000000000000000))); |
9 |
%6=COFACE($5,$3,1); |
10 |
%7=BOUCLE($5,($16,$23,$30,$35)); |
11 |
%8=COURBE_STEP(631); |
12 |
%9=POINT_STEP(455); |
13 |
%10=SOMMET(186,$9,1,((Da,0.000000000000000))); |
14 |
%11=POINT_STEP(426); |
15 |
%12=SOMMET(135,$11,1,((Da,0.000000000000000))); |
16 |
%13=ARETE(245,$8,$14,$15,1,1,((Da,0.000000000000000))); |
17 |
%14=COSOMMET($10,$13,1); |
18 |
%15=COSOMMET($12,$13,2); |
19 |
%16=COARETE($13,$7,-1); |
20 |
%17=COURBE_STEP(383); |
21 |
%18=POINT_STEP(209); |
22 |
%19=SOMMET(98,$18,1,((Da,0.000000000000000))); |
23 |
%20=ARETE(97,$17,$21,$22,1,1,((Da,0.000000000000000))); |
24 |
%21=COSOMMET($10,$20,1); |
25 |
%22=COSOMMET($19,$20,2); |
26 |
%23=COARETE($20,$7,1); |
27 |
%24=COURBE_STEP(388); |
28 |
%25=POINT_STEP(618); |
29 |
%26=SOMMET(193,$25,1,((Da,0.000000000000000))); |
30 |
%27=ARETE(95,$24,$28,$29,1,1,((Da,0.000000000000000))); |
31 |
%28=COSOMMET($19,$27,1); |
32 |
%29=COSOMMET($26,$27,2); |
33 |
%30=COARETE($27,$7,1); |
34 |
%31=COURBE_STEP(417); |
35 |
%32=ARETE(124,$31,$33,$34,1,1,((Da,0.000000000000000))); |
36 |
%33=COSOMMET($12,$32,1); |
37 |
%34=COSOMMET($26,$32,2); |
38 |
%35=COARETE($32,$7,-1); |
39 |
%36=SURFACE_STEP(409); |
40 |
%37=FACE(125,$36,($39),-1,0); |
41 |
%38=COFACE($37,$3,1); |
42 |
%39=BOUCLE($37,($48,$55,$62,$67)); |
43 |
%40=COURBE_STEP(608); |
44 |
%41=POINT_STEP(389); |
45 |
%42=SOMMET(93,$41,1,((Pn,-1000.000000000000))); |
46 |
%43=POINT_STEP(638); |
47 |
%44=SOMMET(247,$43,1,((Pn,-1000.000000000000))); |
48 |
%45=ARETE(246,$40,$46,$47,1,0); |
49 |
%46=COSOMMET($42,$45,1); |
50 |
%47=COSOMMET($44,$45,2); |
51 |
%48=COARETE($45,$39,-1); |
52 |
%49=COURBE_STEP(431); |
53 |
%50=POINT_STEP(427); |
54 |
%51=SOMMET(134,$50,1,((Pn,-1000.000000000000))); |
55 |
%52=ARETE(133,$49,$53,$54,1,1,((Pn,-1000.000000000000))); |
56 |
%53=COSOMMET($42,$52,1); |
57 |
%54=COSOMMET($51,$52,2); |
58 |
%55=COARETE($52,$39,1); |
59 |
%56=COURBE_STEP(462); |
60 |
%57=POINT_STEP(521); |
61 |
%58=SOMMET(160,$57,1,((Pn,-1000.000000000000))); |
62 |
%59=ARETE(174,$56,$60,$61,1,0); |
63 |
%60=COSOMMET($51,$59,1); |
64 |
%61=COSOMMET($58,$59,2); |
65 |
%62=COARETE($59,$39,1); |
66 |
%63=COURBE_STEP(535); |
67 |
%64=ARETE(189,$63,$65,$66,1,1,((Pn,-1000.000000000000))); |
68 |
%65=COSOMMET($44,$64,1); |
69 |
%66=COSOMMET($58,$64,2); |
70 |
%67=COARETE($64,$39,-1); |
71 |
%68=SURFACE_STEP(540); |
72 |
%69=FACE(188,$68,($71),1,0); |
73 |
%70=COFACE($69,$3,1); |
74 |
%71=BOUCLE($69,($80,$87,$94,$99)); |
75 |
%72=COURBE_STEP(473); |
76 |
%73=POINT_STEP(515); |
77 |
%74=SOMMET(166,$73,0); |
78 |
%75=POINT_STEP(439); |
79 |
%76=SOMMET(120,$75,0); |
80 |
%77=ARETE(119,$72,$78,$79,1,0); |
81 |
%78=COSOMMET($74,$77,1); |
82 |
%79=COSOMMET($76,$77,2); |
83 |
%80=COARETE($77,$71,-1); |
84 |
%81=COURBE_STEP(586); |
85 |
%82=POINT_STEP(513); |
86 |
%83=SOMMET(169,$82,0); |
87 |
%84=ARETE(197,$81,$85,$86,1,0); |
88 |
%85=COSOMMET($74,$84,1); |
89 |
%86=COSOMMET($83,$84,2); |
90 |
%87=COARETE($84,$71,1); |
91 |
%88=COURBE_STEP(512); |
92 |
%89=POINT_STEP(514); |
93 |
%90=SOMMET(168,$89,0); |
94 |
%91=ARETE(170,$88,$92,$93,1,0); |
95 |
%92=COSOMMET($90,$91,1); |
96 |
%93=COSOMMET($83,$91,2); |
97 |
%94=COARETE($91,$71,-1); |
98 |
%95=COURBE_STEP(639); |
99 |
%96=ARETE(191,$95,$97,$98,1,0); |
100 |
%97=COSOMMET($76,$96,1); |
101 |
%98=COSOMMET($90,$96,2); |
102 |
%99=COARETE($96,$71,-1); |
103 |
%100=SURFACE_STEP(548); |
104 |
%101=FACE(198,$100,($103),1,0); |
105 |
%102=COFACE($101,$3,1); |
106 |
%103=BOUCLE($101,($112,$119,$126,$131)); |
107 |
%104=COURBE_STEP(425); |
108 |
%105=POINT_STEP(542); |
109 |
%106=SOMMET(190,$105,0); |
110 |
%107=POINT_STEP(420); |
111 |
%108=SOMMET(138,$107,0); |
112 |
%109=ARETE(137,$104,$110,$111,1,0); |
113 |
%110=COSOMMET($106,$109,1); |
114 |
%111=COSOMMET($108,$109,2); |
115 |
%112=COARETE($109,$103,1); |
116 |
%113=COURBE_STEP(407); |
117 |
%114=POINT_STEP(403); |
118 |
%115=SOMMET(90,$114,0); |
119 |
%116=ARETE(89,$113,$117,$118,1,0); |
120 |
%117=COSOMMET($108,$116,1); |
121 |
%118=COSOMMET($115,$116,2); |
122 |
%119=COARETE($116,$103,1); |
123 |
%120=COURBE_STEP(485); |
124 |
%121=POINT_STEP(402); |
125 |
%122=SOMMET(91,$121,0); |
126 |
%123=ARETE(151,$120,$124,$125,1,0); |
127 |
%124=COSOMMET($115,$123,1); |
128 |
%125=COSOMMET($122,$123,2); |
129 |
%126=COARETE($123,$103,1); |
130 |
%127=COURBE_STEP(327); |
131 |
%128=ARETE(84,$127,$129,$130,1,0); |
132 |
%129=COSOMMET($106,$128,1); |
133 |
%130=COSOMMET($122,$128,2); |
134 |
%131=COARETE($128,$103,-1); |
135 |
%132=SURFACE_STEP(321); |
136 |
%133=FACE(85,$132,($135),1,0); |
137 |
%134=COFACE($133,$3,1); |
138 |
%135=BOUCLE($133,($144,$151,$158,$163)); |
139 |
%136=COURBE_STEP(316); |
140 |
%137=POINT_STEP(438); |
141 |
%138=SOMMET(121,$137,0); |
142 |
%139=POINT_STEP(437); |
143 |
%140=SOMMET(122,$139,0); |
144 |
%141=ARETE(87,$136,$142,$143,1,0); |
145 |
%142=COSOMMET($138,$141,1); |
146 |
%143=COSOMMET($140,$141,2); |
147 |
%144=COARETE($141,$135,-1); |
148 |
%145=COURBE_STEP(520); |
149 |
%146=POINT_STEP(516); |
150 |
%147=SOMMET(163,$146,0); |
151 |
%148=ARETE(162,$145,$149,$150,1,0); |
152 |
%149=COSOMMET($138,$148,1); |
153 |
%150=COSOMMET($147,$148,2); |
154 |
%151=COARETE($148,$135,1); |
155 |
%152=COURBE_STEP(590); |
156 |
%153=POINT_STEP(614); |
157 |
%154=SOMMET(270,$153,0); |
158 |
%155=ARETE(269,$152,$156,$157,1,0); |
159 |
%156=COSOMMET($154,$155,1); |
160 |
%157=COSOMMET($147,$155,2); |
161 |
%158=COARETE($155,$135,-1); |
162 |
%159=COURBE_STEP(634); |
163 |
%160=ARETE(192,$159,$161,$162,1,0); |
164 |
%161=COSOMMET($140,$160,1); |
165 |
%162=COSOMMET($154,$160,2); |
166 |
%163=COARETE($160,$135,-1); |
167 |
%164=SURFACE_STEP(554); |
168 |
%165=FACE(266,$164,($167),1,0); |
169 |
%166=COFACE($165,$3,1); |
170 |
%167=BOUCLE($165,($176,$183,$190,$195)); |
171 |
%168=COURBE_STEP(603); |
172 |
%169=POINT_STEP(602); |
173 |
%170=SOMMET(254,$169,0); |
174 |
%171=POINT_STEP(601); |
175 |
%172=SOMMET(255,$171,0); |
176 |
%173=ARETE(253,$168,$174,$175,1,0); |
177 |
%174=COSOMMET($170,$173,1); |
178 |
%175=COSOMMET($172,$173,2); |
179 |
%176=COARETE($173,$167,1); |
180 |
%177=COURBE_STEP(525); |
181 |
%178=POINT_STEP(441); |
182 |
%179=SOMMET(128,$178,0); |
183 |
%180=ARETE(127,$177,$181,$182,1,0); |
184 |
%181=COSOMMET($172,$180,1); |
185 |
%182=COSOMMET($179,$180,2); |
186 |
%183=COARETE($180,$167,1); |
187 |
%184=COURBE_STEP(436); |
188 |
%185=POINT_STEP(432); |
189 |
%186=SOMMET(131,$185,0); |
190 |
%187=ARETE(130,$184,$188,$189,1,0); |
191 |
%188=COSOMMET($179,$187,1); |
192 |
%189=COSOMMET($186,$187,2); |
193 |
%190=COARETE($187,$167,1); |
194 |
%191=COURBE_STEP(342); |
195 |
%192=ARETE(53,$191,$193,$194,1,0); |
196 |
%193=COSOMMET($170,$192,1); |
197 |
%194=COSOMMET($186,$192,2); |
198 |
%195=COARETE($192,$167,-1); |
199 |
%196=SURFACE_STEP(370); |
200 |
%197=FACE(75,$196,($199),-1,0); |
201 |
%198=COFACE($197,$3,1); |
202 |
%199=BOUCLE($197,($208,$215,$222,$227)); |
203 |
%200=COURBE_STEP(325); |
204 |
%201=POINT_STEP(296); |
205 |
%202=SOMMET(71,$201,0); |
206 |
%203=POINT_STEP(398); |
207 |
%204=SOMMET(66,$203,0); |
208 |
%205=ARETE(64,$200,$206,$207,1,0); |
209 |
%206=COSOMMET($202,$205,1); |
210 |
%207=COSOMMET($204,$205,2); |
211 |
%208=COARETE($205,$199,1); |
212 |
%209=COURBE_STEP(326); |
213 |
%210=POINT_STEP(290); |
214 |
%211=SOMMET(52,$210,0); |
215 |
%212=ARETE(65,$209,$213,$214,1,0); |
216 |
%213=COSOMMET($211,$212,1); |
217 |
%214=COSOMMET($204,$212,2); |
218 |
%215=COARETE($212,$199,-1); |
219 |
%216=COURBE_STEP(300); |
220 |
%217=POINT_STEP(397); |
221 |
%218=SOMMET(68,$217,0); |
222 |
%219=ARETE(70,$216,$220,$221,1,0); |
223 |
%220=COSOMMET($218,$219,1); |
224 |
%221=COSOMMET($211,$219,2); |
225 |
%222=COARETE($219,$199,-1); |
226 |
%223=COURBE_STEP(305); |
227 |
%224=ARETE(74,$223,$225,$226,1,0); |
228 |
%225=COSOMMET($218,$224,1); |
229 |
%226=COSOMMET($202,$224,2); |
230 |
%227=COARETE($224,$199,1); |
231 |
%228=SURFACE_STEP(394); |
232 |
%229=FACE(51,$228,($231),-1,0); |
233 |
%230=COFACE($229,$3,1); |
234 |
%231=BOUCLE($229,($238,$245,$250,$251)); |
235 |
%232=COURBE_STEP(280); |
236 |
%233=POINT_STEP(275); |
237 |
%234=SOMMET(55,$233,0); |
238 |
%235=ARETE(49,$232,$236,$237,1,0); |
239 |
%236=COSOMMET($204,$235,1); |
240 |
%237=COSOMMET($234,$235,2); |
241 |
%238=COARETE($235,$231,1); |
242 |
%239=COURBE_STEP(310); |
243 |
%240=POINT_STEP(273); |
244 |
%241=SOMMET(47,$240,0); |
245 |
%242=ARETE(46,$239,$243,$244,1,0); |
246 |
%243=COSOMMET($241,$242,1); |
247 |
%244=COSOMMET($234,$242,2); |
248 |
%245=COARETE($242,$231,-1); |
249 |
%246=COURBE_STEP(392); |
250 |
%247=ARETE(40,$246,$248,$249,1,0); |
251 |
%248=COSOMMET($211,$247,1); |
252 |
%249=COSOMMET($241,$247,2); |
253 |
%250=COARETE($247,$231,-1); |
254 |
%251=COARETE($212,$231,1); |
255 |
%252=SURFACE_STEP(340); |
256 |
%253=FACE(63,$252,($255),-1,0); |
257 |
%254=COFACE($253,$3,1); |
258 |
%255=BOUCLE($253,($262,$269,$274,$275)); |
259 |
%256=COURBE_STEP(295); |
260 |
%257=POINT_STEP(331); |
261 |
%258=SOMMET(48,$257,0); |
262 |
%259=ARETE(41,$256,$260,$261,1,0); |
263 |
%260=COSOMMET($234,$259,1); |
264 |
%261=COSOMMET($258,$259,2); |
265 |
%262=COARETE($259,$255,1); |
266 |
%263=COURBE_STEP(282); |
267 |
%264=POINT_STEP(236); |
268 |
%265=SOMMET(1,$264,0); |
269 |
%266=ARETE(61,$263,$267,$268,1,0); |
270 |
%267=COSOMMET($265,$266,1); |
271 |
%268=COSOMMET($258,$266,2); |
272 |
%269=COARETE($266,$255,-1); |
273 |
%270=COURBE_STEP(349); |
274 |
%271=ARETE(60,$270,$272,$273,1,0); |
275 |
%272=COSOMMET($241,$271,1); |
276 |
%273=COSOMMET($265,$271,2); |
277 |
%274=COARETE($271,$255,-1); |
278 |
%275=COARETE($242,$255,1); |
279 |
%276=SURFACE_STEP(276); |
280 |
%277=FACE(59,$276,($279),-1,0); |
281 |
%278=COFACE($277,$3,1); |
282 |
%279=BOUCLE($277,($284,$285,$290,$291)); |
283 |
%280=COURBE_STEP(235); |
284 |
%281=ARETE(7,$280,$282,$283,1,0); |
285 |
%282=COSOMMET($258,$281,1); |
286 |
%283=COSOMMET($202,$281,2); |
287 |
%284=COARETE($281,$279,1); |
288 |
%285=COARETE($224,$279,-1); |
289 |
%286=COURBE_STEP(234); |
290 |
%287=ARETE(8,$286,$288,$289,1,0); |
291 |
%288=COSOMMET($265,$287,1); |
292 |
%289=COSOMMET($218,$287,2); |
293 |
%290=COARETE($287,$279,-1); |
294 |
%291=COARETE($266,$279,1); |
295 |
%292=SURFACE_STEP(227); |
296 |
%293=FACE(9,$292,($295,$302,$309),-1,0); |
297 |
%294=COFACE($293,$3,1); |
298 |
%295=BOUCLE($293,($300,$301)); |
299 |
%296=COURBE_STEP(182); |
300 |
%297=ARETE(4,$296,$298,$299,1,0); |
301 |
%298=COSOMMET($76,$297,1); |
302 |
%299=COSOMMET($74,$297,2); |
303 |
%300=COARETE($297,$295,1); |
304 |
%301=COARETE($77,$295,1); |
305 |
%302=BOUCLE($293,($307,$308)); |
306 |
%303=COURBE_STEP(221); |
307 |
%304=ARETE(17,$303,$305,$306,1,0); |
308 |
%305=COSOMMET($140,$304,1); |
309 |
%306=COSOMMET($138,$304,2); |
310 |
%307=COARETE($304,$302,1); |
311 |
%308=COARETE($141,$302,1); |
312 |
%309=BOUCLE($293,($310,$311,$312,$313)); |
313 |
%310=COARETE($219,$309,1); |
314 |
%311=COARETE($247,$309,1); |
315 |
%312=COARETE($271,$309,1); |
316 |
%313=COARETE($287,$309,1); |
317 |
%314=SURFACE_STEP(214); |
318 |
%315=FACE(18,$314,($317,$324,$331),1,0); |
319 |
%316=COFACE($315,$3,1); |
320 |
%317=BOUCLE($315,($322,$323)); |
321 |
%318=COURBE_STEP(208); |
322 |
%319=ARETE(19,$318,$320,$321,1,0); |
323 |
%320=COSOMMET($122,$319,1); |
324 |
%321=COSOMMET($115,$319,2); |
325 |
%322=COARETE($319,$317,-1); |
326 |
%323=COARETE($123,$317,-1); |
327 |
%324=BOUCLE($315,($329,$330)); |
328 |
%325=COURBE_STEP(345); |
329 |
%326=ARETE(37,$325,$327,$328,1,0); |
330 |
%327=COSOMMET($186,$326,1); |
331 |
%328=COSOMMET($179,$326,2); |
332 |
%329=COARETE($326,$324,-1); |
333 |
%330=COARETE($187,$324,-1); |
334 |
%331=BOUCLE($315,($332,$333,$334,$335)); |
335 |
%332=COARETE($205,$331,-1); |
336 |
%333=COARETE($281,$331,-1); |
337 |
%334=COARETE($259,$331,-1); |
338 |
%335=COARETE($235,$331,-1); |
339 |
%336=SURFACE_STEP(311); |
340 |
%337=FACE(35,$336,($339,$346),-1,0); |
341 |
%338=COFACE($337,$3,1); |
342 |
%339=BOUCLE($337,($344,$345)); |
343 |
%340=COURBE_STEP(286); |
344 |
%341=ARETE(32,$340,$342,$343,1,1,((Pn,-1000.000000000000))); |
345 |
%342=COSOMMET($44,$341,1); |
346 |
%343=COSOMMET($42,$341,2); |
347 |
%344=COARETE($341,$339,1); |
348 |
%345=COARETE($45,$339,1); |
349 |
%346=BOUCLE($337,($347,$352)); |
350 |
%347=COARETE($173,$346,-1); |
351 |
%348=COURBE_STEP(530); |
352 |
%349=ARETE(114,$348,$350,$351,1,0); |
353 |
%350=COSOMMET($172,$349,1); |
354 |
%351=COSOMMET($170,$349,2); |
355 |
%352=COARETE($349,$346,-1); |
356 |
%353=SURFACE_STEP(496); |
357 |
%354=FACE(142,$353,($356),1,0); |
358 |
%355=COFACE($354,$3,1); |
359 |
%356=BOUCLE($354,($357,$358,$359,$360)); |
360 |
%357=COARETE($180,$356,-1); |
361 |
%358=COARETE($349,$356,1); |
362 |
%359=COARETE($192,$356,1); |
363 |
%360=COARETE($326,$356,1); |
364 |
%361=SURFACE_STEP(365); |
365 |
%362=FACE(82,$361,($364),1,0); |
366 |
%363=COFACE($362,$3,1); |
367 |
%364=BOUCLE($362,($365,$366,$367,$372)); |
368 |
%365=COARETE($148,$364,-1); |
369 |
%366=COARETE($304,$364,-1); |
370 |
%367=COARETE($160,$364,1); |
371 |
%368=COURBE_STEP(529); |
372 |
%369=ARETE(113,$368,$370,$371,1,0); |
373 |
%370=COSOMMET($147,$369,1); |
374 |
%371=COSOMMET($154,$369,2); |
375 |
%372=COARETE($369,$364,-1); |
376 |
%373=SURFACE_STEP(502); |
377 |
%374=FACE(140,$373,($376,$383),1,0); |
378 |
%375=COFACE($374,$3,1); |
379 |
%376=BOUCLE($374,($381,$382)); |
380 |
%377=COURBE_STEP(494); |
381 |
%378=ARETE(149,$377,$379,$380,1,1,((Pn,-1000.000000000000))); |
382 |
%379=COSOMMET($58,$378,1); |
383 |
%380=COSOMMET($51,$378,2); |
384 |
%381=COARETE($378,$376,-1); |
385 |
%382=COARETE($59,$376,-1); |
386 |
%383=BOUCLE($374,($384,$385)); |
387 |
%384=COARETE($155,$383,1); |
388 |
%385=COARETE($369,$383,1); |
389 |
%386=SURFACE_STEP(360); |
390 |
%387=FACE(88,$386,($389,$396),-1,0); |
391 |
%388=COFACE($387,$3,1); |
392 |
%389=BOUCLE($387,($394,$395)); |
393 |
%390=COURBE_STEP(445); |
394 |
%391=ARETE(112,$390,$392,$393,1,0); |
395 |
%392=COSOMMET($12,$391,1); |
396 |
%393=COSOMMET($10,$391,2); |
397 |
%394=COARETE($391,$389,1); |
398 |
%395=COARETE($13,$389,1); |
399 |
%396=BOUCLE($387,($397,$402)); |
400 |
%397=COARETE($109,$396,-1); |
401 |
%398=COURBE_STEP(481); |
402 |
%399=ARETE(154,$398,$400,$401,1,0); |
403 |
%400=COSOMMET($108,$399,1); |
404 |
%401=COSOMMET($106,$399,2); |
405 |
%402=COARETE($399,$396,-1); |
406 |
%403=SURFACE_STEP(446); |
407 |
%404=FACE(116,$403,($406),1,0); |
408 |
%405=COFACE($404,$3,1); |
409 |
%406=BOUCLE($404,($407,$408,$409,$410)); |
410 |
%407=COARETE($116,$406,-1); |
411 |
%408=COARETE($399,$406,1); |
412 |
%409=COARETE($128,$406,1); |
413 |
%410=COARETE($319,$406,1); |
414 |
%411=SURFACE_STEP(623); |
415 |
%412=FACE(258,$411,($414),1,0); |
416 |
%413=COFACE($412,$3,1); |
417 |
%414=BOUCLE($412,($415,$416,$417,$422)); |
418 |
%415=COARETE($84,$414,-1); |
419 |
%416=COARETE($297,$414,-1); |
420 |
%417=COARETE($96,$414,1); |
421 |
%418=COURBE_STEP(629); |
422 |
%419=ARETE(256,$418,$420,$421,1,0); |
423 |
%420=COSOMMET($83,$419,1); |
424 |
%421=COSOMMET($90,$419,2); |
425 |
%422=COARETE($419,$414,-1); |
426 |
%423=SURFACE_STEP(605); |
427 |
%424=FACE(244,$423,($426,$433),1,0); |
428 |
%425=COFACE($424,$3,1); |
429 |
%426=BOUCLE($424,($431,$432)); |
430 |
%427=COURBE_STEP(611); |
431 |
%428=ARETE(239,$427,$429,$430,1,0); |
432 |
%429=COSOMMET($26,$428,1); |
433 |
%430=COSOMMET($19,$428,2); |
434 |
%431=COARETE($428,$426,-1); |
435 |
%432=COARETE($27,$426,-1); |
436 |
%433=BOUCLE($424,($434,$435)); |
437 |
%434=COARETE($91,$433,1); |
438 |
%435=COARETE($419,$433,1); |
439 |
%436=SURFACE_STEP(457); |
440 |
%437=FACE(185,$436,($439),-1,1,((Pn,-1000.000000000000))); |
441 |
%438=COFACE($437,$3,1); |
442 |
%439=BOUCLE($437,($440,$441,$442,$443)); |
443 |
%440=COARETE($52,$439,-1); |
444 |
%441=COARETE($341,$439,-1); |
445 |
%442=COARETE($64,$439,1); |
446 |
%443=COARETE($378,$439,1); |
447 |
%444=SURFACE_STEP(609); |
448 |
%445=FACE(265,$444,($447),-1,0); |
449 |
%446=COFACE($445,$3,1); |
450 |
%447=BOUCLE($445,($448,$449,$450,$451)); |
451 |
%448=COARETE($20,$447,-1); |
452 |
%449=COARETE($391,$447,-1); |
453 |
%450=COARETE($32,$447,1); |
454 |
%451=COARETE($428,$447,1); |
455 |
FIN; |
456 |
|