1 |
picher |
236 |
// Fichier MAGIC - UQTR; |
2 |
|
|
//*i:380; |
3 |
|
|
%1=GEOMETRIE(1.000000000000000,STEP,support.step,/home/gilles/dev/magic/app/VMM/VMM/win32/mat.dat); |
4 |
|
|
%1=GEOMETRIE_EPS(1.000000000000000e-06); |
5 |
|
|
%2=VOLUME(44,($3),0,0); |
6 |
|
|
%3=COQUILLE($2,($6,$38,$70,$102,$126,$164,$194,$249,$271,$289,$307,$325,$343,$355,$366,$374)); |
7 |
|
|
%4=SURFACE_STEP(310); |
8 |
|
|
%5=FACE(50,$4,($7),-1,0); |
9 |
|
|
%6=COFACE($5,$3,1); |
10 |
|
|
%7=BOUCLE($5,($16,$23,$30,$35)); |
11 |
|
|
%8=COURBE_STEP(317); |
12 |
|
|
%9=POINT_STEP(312); |
13 |
|
|
%10=SOMMET(47,$9,1,((Py,-1000.000000000000))); |
14 |
|
|
%11=POINT_STEP(318); |
15 |
|
|
%12=SOMMET(45,$11,1,((Py,-1000.000000000000))); |
16 |
|
|
%13=ARETE(46,$8,$14,$15,1,0); |
17 |
|
|
%14=COSOMMET($10,$13,1); |
18 |
|
|
%15=COSOMMET($12,$13,2); |
19 |
|
|
%16=COARETE($13,$7,-1); |
20 |
|
|
%17=COURBE_STEP(322); |
21 |
|
|
%18=POINT_STEP(324); |
22 |
|
|
%19=SOMMET(40,$18,1,((Py,-1000.000000000000))); |
23 |
|
|
%20=ARETE(42,$17,$21,$22,1,1,((Py,-1000.000000000000))); |
24 |
|
|
%21=COSOMMET($10,$20,1); |
25 |
|
|
%22=COSOMMET($19,$20,2); |
26 |
|
|
%23=COARETE($20,$7,1); |
27 |
|
|
%24=COURBE_STEP(289); |
28 |
|
|
%25=POINT_STEP(323); |
29 |
|
|
%26=SOMMET(41,$25,1,((Py,-1000.000000000000))); |
30 |
|
|
%27=ARETE(36,$24,$28,$29,1,0); |
31 |
|
|
%28=COSOMMET($19,$27,1); |
32 |
|
|
%29=COSOMMET($26,$27,2); |
33 |
|
|
%30=COARETE($27,$7,1); |
34 |
|
|
%31=COURBE_STEP(290); |
35 |
|
|
%32=ARETE(38,$31,$33,$34,1,1,((Py,-1000.000000000000))); |
36 |
|
|
%33=COSOMMET($12,$32,1); |
37 |
|
|
%34=COSOMMET($26,$32,2); |
38 |
|
|
%35=COARETE($32,$7,-1); |
39 |
|
|
%36=SURFACE_STEP(301); |
40 |
|
|
%37=FACE(31,$36,($39),-1,1,((Da,0.000000000000000))); |
41 |
|
|
%38=COFACE($37,$3,1); |
42 |
|
|
%39=BOUCLE($37,($48,$55,$62,$67)); |
43 |
|
|
%40=COURBE_STEP(296); |
44 |
|
|
%41=POINT_STEP(291); |
45 |
|
|
%42=SOMMET(34,$41,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
46 |
|
|
%43=POINT_STEP(309); |
47 |
|
|
%44=SOMMET(51,$43,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
48 |
|
|
%45=ARETE(33,$40,$46,$47,1,1,((Da,0.000000000000000))); |
49 |
|
|
%46=COSOMMET($42,$45,1); |
50 |
|
|
%47=COSOMMET($44,$45,2); |
51 |
|
|
%48=COARETE($45,$39,-1); |
52 |
|
|
%49=COURBE_STEP(144); |
53 |
|
|
%50=POINT_STEP(303); |
54 |
|
|
%51=SOMMET(30,$50,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
55 |
|
|
%52=ARETE(75,$49,$53,$54,1,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
56 |
|
|
%53=COSOMMET($42,$52,1); |
57 |
|
|
%54=COSOMMET($51,$52,2); |
58 |
|
|
%55=COARETE($52,$39,1); |
59 |
|
|
%56=COURBE_STEP(200); |
60 |
|
|
%57=POINT_STEP(304); |
61 |
|
|
%58=SOMMET(29,$57,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
62 |
|
|
%59=ARETE(76,$56,$60,$61,1,1,((Da,0.000000000000000))); |
63 |
|
|
%60=COSOMMET($51,$59,1); |
64 |
|
|
%61=COSOMMET($58,$59,2); |
65 |
|
|
%62=COARETE($59,$39,1); |
66 |
|
|
%63=COURBE_STEP(186); |
67 |
|
|
%64=ARETE(64,$63,$65,$66,1,2,((Da,0.000000000000000),(Da,0.000000000000000))); |
68 |
|
|
%65=COSOMMET($44,$64,1); |
69 |
|
|
%66=COSOMMET($58,$64,2); |
70 |
|
|
%67=COARETE($64,$39,-1); |
71 |
|
|
%68=SURFACE_STEP(181); |
72 |
|
|
%69=FACE(65,$68,($71),-1,0); |
73 |
|
|
%70=COFACE($69,$3,1); |
74 |
|
|
%71=BOUCLE($69,($80,$87,$94,$99)); |
75 |
|
|
%72=COURBE_STEP(179); |
76 |
|
|
%73=POINT_STEP(150); |
77 |
|
|
%74=SOMMET(69,$73,0); |
78 |
|
|
%75=POINT_STEP(149); |
79 |
|
|
%76=SOMMET(70,$75,0); |
80 |
|
|
%77=ARETE(68,$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(148); |
85 |
|
|
%82=POINT_STEP(195); |
86 |
|
|
%83=SOMMET(78,$82,0); |
87 |
|
|
%84=ARETE(72,$81,$85,$86,1,0); |
88 |
|
|
%85=COSOMMET($83,$84,1); |
89 |
|
|
%86=COSOMMET($76,$84,2); |
90 |
|
|
%87=COARETE($84,$71,-1); |
91 |
|
|
%88=COURBE_STEP(248); |
92 |
|
|
%89=POINT_STEP(244); |
93 |
|
|
%90=SOMMET(26,$89,0); |
94 |
|
|
%91=ARETE(25,$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(243); |
99 |
|
|
%96=ARETE(28,$95,$97,$98,1,0); |
100 |
|
|
%97=COSOMMET($90,$96,1); |
101 |
|
|
%98=COSOMMET($74,$96,2); |
102 |
|
|
%99=COARETE($96,$71,1); |
103 |
|
|
%100=SURFACE_STEP(140); |
104 |
|
|
%101=FACE(8,$100,($103),-1,0); |
105 |
|
|
%102=COFACE($101,$3,1); |
106 |
|
|
%103=BOUCLE($101,($110,$117,$122,$123)); |
107 |
|
|
%104=COURBE_STEP(100); |
108 |
|
|
%105=POINT_STEP(187); |
109 |
|
|
%106=SOMMET(62,$105,0); |
110 |
|
|
%107=ARETE(3,$104,$108,$109,1,0); |
111 |
|
|
%108=COSOMMET($76,$107,1); |
112 |
|
|
%109=COSOMMET($106,$107,2); |
113 |
|
|
%110=COARETE($107,$103,1); |
114 |
|
|
%111=COURBE_STEP(418); |
115 |
|
|
%112=POINT_STEP(520); |
116 |
|
|
%113=SOMMET(206,$112,0); |
117 |
|
|
%114=ARETE(277,$111,$115,$116,1,0); |
118 |
|
|
%115=COSOMMET($113,$114,1); |
119 |
|
|
%116=COSOMMET($106,$114,2); |
120 |
|
|
%117=COARETE($114,$103,-1); |
121 |
|
|
%118=COURBE_STEP(443); |
122 |
|
|
%119=ARETE(133,$118,$120,$121,1,0); |
123 |
|
|
%120=COSOMMET($83,$119,1); |
124 |
|
|
%121=COSOMMET($113,$119,2); |
125 |
|
|
%122=COARETE($119,$103,-1); |
126 |
|
|
%123=COARETE($84,$103,1); |
127 |
|
|
%124=SURFACE_STEP(352); |
128 |
|
|
%125=FACE(163,$124,($127),-1,0); |
129 |
|
|
%126=COFACE($125,$3,1); |
130 |
|
|
%127=BOUCLE($125,($136,$143,$148,$149,$156,$161)); |
131 |
|
|
%128=COURBE_STEP(426); |
132 |
|
|
%129=POINT_STEP(513); |
133 |
|
|
%130=SOMMET(214,$129,0); |
134 |
|
|
%131=POINT_STEP(448); |
135 |
|
|
%132=SOMMET(129,$131,0); |
136 |
|
|
%133=ARETE(274,$128,$134,$135,1,0); |
137 |
|
|
%134=COSOMMET($130,$133,1); |
138 |
|
|
%135=COSOMMET($132,$133,2); |
139 |
|
|
%136=COARETE($133,$127,1); |
140 |
|
|
%137=COURBE_STEP(432); |
141 |
|
|
%138=POINT_STEP(519); |
142 |
|
|
%139=SOMMET(208,$138,0); |
143 |
|
|
%140=ARETE(273,$137,$141,$142,1,0); |
144 |
|
|
%141=COSOMMET($132,$140,1); |
145 |
|
|
%142=COSOMMET($139,$140,2); |
146 |
|
|
%143=COARETE($140,$127,1); |
147 |
|
|
%144=COURBE_STEP(532); |
148 |
|
|
%145=ARETE(169,$144,$146,$147,1,0); |
149 |
|
|
%146=COSOMMET($113,$145,1); |
150 |
|
|
%147=COSOMMET($139,$145,2); |
151 |
|
|
%148=COARETE($145,$127,-1); |
152 |
|
|
%149=COARETE($114,$127,1); |
153 |
|
|
%150=COURBE_STEP(391); |
154 |
|
|
%151=POINT_STEP(368); |
155 |
|
|
%152=SOMMET(142,$151,0); |
156 |
|
|
%153=ARETE(239,$150,$154,$155,1,0); |
157 |
|
|
%154=COSOMMET($106,$153,1); |
158 |
|
|
%155=COSOMMET($152,$153,2); |
159 |
|
|
%156=COARETE($153,$127,1); |
160 |
|
|
%157=COURBE_STEP(447); |
161 |
|
|
%158=ARETE(131,$157,$159,$160,1,0); |
162 |
|
|
%159=COSOMMET($130,$158,1); |
163 |
|
|
%160=COSOMMET($152,$158,2); |
164 |
|
|
%161=COARETE($158,$127,-1); |
165 |
|
|
%162=SURFACE_STEP(439); |
166 |
|
|
%163=FACE(272,$162,($165),-1,0); |
167 |
|
|
%164=COFACE($163,$3,1); |
168 |
|
|
%165=BOUCLE($163,($172,$179,$184,$185,$190,$191)); |
169 |
|
|
%166=COURBE_STEP(95); |
170 |
|
|
%167=POINT_STEP(96); |
171 |
|
|
%168=SOMMET(4,$167,0); |
172 |
|
|
%169=ARETE(5,$166,$170,$171,1,0); |
173 |
|
|
%170=COSOMMET($168,$169,1); |
174 |
|
|
%171=COSOMMET($90,$169,2); |
175 |
|
|
%172=COARETE($169,$165,-1); |
176 |
|
|
%173=COURBE_STEP(422); |
177 |
|
|
%174=POINT_STEP(138); |
178 |
|
|
%175=SOMMET(11,$174,0); |
179 |
|
|
%176=ARETE(276,$173,$177,$178,1,0); |
180 |
|
|
%177=COSOMMET($175,$176,1); |
181 |
|
|
%178=COSOMMET($168,$176,2); |
182 |
|
|
%179=COARETE($176,$165,-1); |
183 |
|
|
%180=COURBE_STEP(90); |
184 |
|
|
%181=ARETE(6,$180,$182,$183,1,0); |
185 |
|
|
%182=COSOMMET($175,$181,1); |
186 |
|
|
%183=COSOMMET($130,$181,2); |
187 |
|
|
%184=COARETE($181,$165,1); |
188 |
|
|
%185=COARETE($158,$165,1); |
189 |
|
|
%186=COURBE_STEP(261); |
190 |
|
|
%187=ARETE(17,$186,$188,$189,1,0); |
191 |
|
|
%188=COSOMMET($152,$187,1); |
192 |
|
|
%189=COSOMMET($74,$187,2); |
193 |
|
|
%190=COARETE($187,$165,1); |
194 |
|
|
%191=COARETE($96,$165,-1); |
195 |
|
|
%192=SURFACE_STEP(350); |
196 |
|
|
%193=FACE(164,$192,($195,$202,$209),1,0); |
197 |
|
|
%194=COFACE($193,$3,1); |
198 |
|
|
%195=BOUCLE($193,($200,$201)); |
199 |
|
|
%196=COURBE_STEP(338); |
200 |
|
|
%197=ARETE(165,$196,$198,$199,1,1,((Py,-1000.000000000000))); |
201 |
|
|
%198=COSOMMET($26,$197,1); |
202 |
|
|
%199=COSOMMET($19,$197,2); |
203 |
|
|
%200=COARETE($197,$195,-1); |
204 |
|
|
%201=COARETE($27,$195,-1); |
205 |
|
|
%202=BOUCLE($193,($207,$208)); |
206 |
|
|
%203=COURBE_STEP(134); |
207 |
|
|
%204=ARETE(15,$203,$205,$206,1,1,((Da,0.000000000000000))); |
208 |
|
|
%205=COSOMMET($58,$204,1); |
209 |
|
|
%206=COSOMMET($51,$204,2); |
210 |
|
|
%207=COARETE($204,$202,-1); |
211 |
|
|
%208=COARETE($59,$202,-1); |
212 |
|
|
%209=BOUCLE($193,($210,$217,$224,$231,$238,$243,$244,$245,$246)); |
213 |
|
|
%210=COARETE($145,$209,1); |
214 |
|
|
%211=COURBE_STEP(497); |
215 |
|
|
%212=POINT_STEP(493); |
216 |
|
|
%213=SOMMET(284,$212,0); |
217 |
|
|
%214=ARETE(283,$211,$215,$216,1,0); |
218 |
|
|
%215=COSOMMET($139,$214,1); |
219 |
|
|
%216=COSOMMET($213,$214,2); |
220 |
|
|
%217=COARETE($214,$209,1); |
221 |
|
|
%218=COURBE_STEP(252); |
222 |
|
|
%219=POINT_STEP(253); |
223 |
|
|
%220=SOMMET(21,$219,0); |
224 |
|
|
%221=ARETE(23,$218,$222,$223,1,0); |
225 |
|
|
%222=COSOMMET($213,$221,1); |
226 |
|
|
%223=COSOMMET($220,$221,2); |
227 |
|
|
%224=COARETE($221,$209,1); |
228 |
|
|
%225=COURBE_STEP(367); |
229 |
|
|
%226=POINT_STEP(363); |
230 |
|
|
%227=SOMMET(155,$226,1,((Dy,0.000000000000000))); |
231 |
|
|
%228=ARETE(154,$225,$229,$230,1,0); |
232 |
|
|
%229=COSOMMET($220,$228,1); |
233 |
|
|
%230=COSOMMET($227,$228,2); |
234 |
|
|
%231=COARETE($228,$209,1); |
235 |
|
|
%232=COURBE_STEP(362); |
236 |
|
|
%233=POINT_STEP(358); |
237 |
|
|
%234=SOMMET(158,$233,1,((Dy,0.000000000000000))); |
238 |
|
|
%235=ARETE(157,$232,$236,$237,1,1,((Dy,0.000000000000000))); |
239 |
|
|
%236=COSOMMET($227,$235,1); |
240 |
|
|
%237=COSOMMET($234,$235,2); |
241 |
|
|
%238=COARETE($235,$209,1); |
242 |
|
|
%239=COURBE_STEP(357); |
243 |
|
|
%240=ARETE(160,$239,$241,$242,1,0); |
244 |
|
|
%241=COSOMMET($234,$240,1); |
245 |
|
|
%242=COSOMMET($168,$240,2); |
246 |
|
|
%243=COARETE($240,$209,1); |
247 |
|
|
%244=COARETE($169,$209,1); |
248 |
|
|
%245=COARETE($91,$209,1); |
249 |
|
|
%246=COARETE($119,$209,1); |
250 |
|
|
%247=SURFACE_STEP(408); |
251 |
|
|
%248=FACE(280,$247,($250,$257,$264),-1,0); |
252 |
|
|
%249=COFACE($248,$3,1); |
253 |
|
|
%250=BOUCLE($248,($255,$256)); |
254 |
|
|
%251=COURBE_STEP(518); |
255 |
|
|
%252=ARETE(212,$251,$253,$254,1,1,((Py,-1000.000000000000))); |
256 |
|
|
%253=COSOMMET($12,$252,1); |
257 |
|
|
%254=COSOMMET($10,$252,2); |
258 |
|
|
%255=COARETE($252,$250,1); |
259 |
|
|
%256=COARETE($13,$250,1); |
260 |
|
|
%257=BOUCLE($248,($262,$263)); |
261 |
|
|
%258=COURBE_STEP(409); |
262 |
|
|
%259=ARETE(281,$258,$260,$261,1,1,((Da,0.000000000000000))); |
263 |
|
|
%260=COSOMMET($44,$259,1); |
264 |
|
|
%261=COSOMMET($42,$259,2); |
265 |
|
|
%262=COARETE($259,$257,1); |
266 |
|
|
%263=COARETE($45,$257,1); |
267 |
|
|
%264=BOUCLE($248,($265,$266,$267,$268)); |
268 |
|
|
%265=COARETE($77,$264,-1); |
269 |
|
|
%266=COARETE($187,$264,-1); |
270 |
|
|
%267=COARETE($153,$264,-1); |
271 |
|
|
%268=COARETE($107,$264,-1); |
272 |
|
|
%269=SURFACE_STEP(454); |
273 |
|
|
%270=FACE(119,$269,($272),1,0); |
274 |
|
|
%271=COFACE($270,$3,1); |
275 |
|
|
%272=BOUCLE($270,($273,$280,$285,$286)); |
276 |
|
|
%273=COARETE($240,$272,-1); |
277 |
|
|
%274=COURBE_STEP(524); |
278 |
|
|
%275=POINT_STEP(449); |
279 |
|
|
%276=SOMMET(128,$275,1,((Dy,0.000000000000000))); |
280 |
|
|
%277=ARETE(174,$274,$278,$279,1,1,((Dy,0.000000000000000))); |
281 |
|
|
%278=COSOMMET($276,$277,1); |
282 |
|
|
%279=COSOMMET($234,$277,2); |
283 |
|
|
%280=COARETE($277,$272,-1); |
284 |
|
|
%281=COURBE_STEP(384); |
285 |
|
|
%282=ARETE(266,$281,$283,$284,1,0); |
286 |
|
|
%283=COSOMMET($276,$282,1); |
287 |
|
|
%284=COSOMMET($175,$282,2); |
288 |
|
|
%285=COARETE($282,$272,1); |
289 |
|
|
%286=COARETE($176,$272,1); |
290 |
|
|
%287=SURFACE_STEP(405); |
291 |
|
|
%288=FACE(227,$287,($290),1,1,((Dy,0.000000000000000))); |
292 |
|
|
%289=COFACE($288,$3,1); |
293 |
|
|
%290=BOUCLE($288,($291,$298,$303,$304)); |
294 |
|
|
%291=COARETE($235,$290,-1); |
295 |
|
|
%292=COURBE_STEP(512); |
296 |
|
|
%293=POINT_STEP(508); |
297 |
|
|
%294=SOMMET(219,$293,1,((Dy,0.000000000000000))); |
298 |
|
|
%295=ARETE(218,$292,$296,$297,1,1,((Dy,0.000000000000000))); |
299 |
|
|
%296=COSOMMET($294,$295,1); |
300 |
|
|
%297=COSOMMET($227,$295,2); |
301 |
|
|
%298=COARETE($295,$290,-1); |
302 |
|
|
%299=COURBE_STEP(194); |
303 |
|
|
%300=ARETE(79,$299,$301,$302,1,1,((Dy,0.000000000000000))); |
304 |
|
|
%301=COSOMMET($294,$300,1); |
305 |
|
|
%302=COSOMMET($276,$300,2); |
306 |
|
|
%303=COARETE($300,$290,1); |
307 |
|
|
%304=COARETE($277,$290,1); |
308 |
|
|
%305=SURFACE_STEP(376); |
309 |
|
|
%306=FACE(271,$305,($308),1,0); |
310 |
|
|
%307=COFACE($306,$3,1); |
311 |
|
|
%308=BOUCLE($306,($309,$316,$321,$322)); |
312 |
|
|
%309=COARETE($228,$308,-1); |
313 |
|
|
%310=COURBE_STEP(460); |
314 |
|
|
%311=POINT_STEP(456); |
315 |
|
|
%312=SOMMET(117,$311,0); |
316 |
|
|
%313=ARETE(116,$310,$314,$315,1,0); |
317 |
|
|
%314=COSOMMET($312,$313,1); |
318 |
|
|
%315=COSOMMET($220,$313,2); |
319 |
|
|
%316=COARETE($313,$308,-1); |
320 |
|
|
%317=COURBE_STEP(528); |
321 |
|
|
%318=ARETE(172,$317,$319,$320,1,0); |
322 |
|
|
%319=COSOMMET($312,$318,1); |
323 |
|
|
%320=COSOMMET($294,$318,2); |
324 |
|
|
%321=COARETE($318,$308,1); |
325 |
|
|
%322=COARETE($295,$308,1); |
326 |
|
|
%323=SURFACE_STEP(393); |
327 |
|
|
%324=FACE(232,$323,($326),1,0); |
328 |
|
|
%325=COFACE($324,$3,1); |
329 |
|
|
%326=BOUCLE($324,($327,$334,$339,$340)); |
330 |
|
|
%327=COARETE($221,$326,-1); |
331 |
|
|
%328=COURBE_STEP(507); |
332 |
|
|
%329=POINT_STEP(503); |
333 |
|
|
%330=SOMMET(222,$329,0); |
334 |
|
|
%331=ARETE(221,$328,$332,$333,1,0); |
335 |
|
|
%332=COSOMMET($330,$331,1); |
336 |
|
|
%333=COSOMMET($213,$331,2); |
337 |
|
|
%334=COARETE($331,$326,-1); |
338 |
|
|
%335=COURBE_STEP(380); |
339 |
|
|
%336=ARETE(268,$335,$337,$338,1,0); |
340 |
|
|
%337=COSOMMET($330,$336,1); |
341 |
|
|
%338=COSOMMET($312,$336,2); |
342 |
|
|
%339=COARETE($336,$326,1); |
343 |
|
|
%340=COARETE($313,$326,1); |
344 |
|
|
%341=SURFACE_STEP(399); |
345 |
|
|
%342=FACE(229,$341,($344),1,0); |
346 |
|
|
%343=COFACE($342,$3,1); |
347 |
|
|
%344=BOUCLE($342,($345,$346,$351,$352)); |
348 |
|
|
%345=COARETE($214,$344,-1); |
349 |
|
|
%346=COARETE($140,$344,-1); |
350 |
|
|
%347=COURBE_STEP(492); |
351 |
|
|
%348=ARETE(331,$347,$349,$350,1,0); |
352 |
|
|
%349=COSOMMET($132,$348,1); |
353 |
|
|
%350=COSOMMET($330,$348,2); |
354 |
|
|
%351=COARETE($348,$344,1); |
355 |
|
|
%352=COARETE($331,$344,1); |
356 |
|
|
%353=SURFACE_STEP(487); |
357 |
|
|
%354=FACE(334,$353,($356),-1,0); |
358 |
|
|
%355=COFACE($354,$3,1); |
359 |
|
|
%356=BOUCLE($354,($357,$358,$359,$360,$361,$362,$363)); |
360 |
|
|
%357=COARETE($133,$356,-1); |
361 |
|
|
%358=COARETE($181,$356,-1); |
362 |
|
|
%359=COARETE($282,$356,-1); |
363 |
|
|
%360=COARETE($300,$356,-1); |
364 |
|
|
%361=COARETE($318,$356,-1); |
365 |
|
|
%362=COARETE($336,$356,-1); |
366 |
|
|
%363=COARETE($348,$356,-1); |
367 |
|
|
%364=SURFACE_STEP(470); |
368 |
|
|
%365=FACE(81,$364,($367),-1,1,((Da,0.000000000000000))); |
369 |
|
|
%366=COFACE($365,$3,1); |
370 |
|
|
%367=BOUCLE($365,($368,$369,$370,$371)); |
371 |
|
|
%368=COARETE($52,$367,-1); |
372 |
|
|
%369=COARETE($259,$367,-1); |
373 |
|
|
%370=COARETE($64,$367,1); |
374 |
|
|
%371=COARETE($204,$367,1); |
375 |
|
|
%372=SURFACE_STEP(465); |
376 |
|
|
%373=FACE(86,$372,($375),-1,1,((Py,-1000.000000000000))); |
377 |
|
|
%374=COFACE($373,$3,1); |
378 |
|
|
%375=BOUCLE($373,($376,$377,$378,$379)); |
379 |
|
|
%376=COARETE($20,$375,-1); |
380 |
|
|
%377=COARETE($252,$375,-1); |
381 |
|
|
%378=COARETE($32,$375,1); |
382 |
|
|
%379=COARETE($197,$375,1); |
383 |
|
|
FIN; |
384 |
|
|
|