proc celldef() {
topol()
}
create soma[2], dend[687]
proc topol() { local i
connect soma[1](0), soma(0)
connect dend(0), soma(0)
for i = 1, 22 connect dend[i](0), dend[i-1](1)
connect dend[23](0), dend[21](1)
connect dend[24](0), dend[20](1)
for i = 25, 26 connect dend[i](0), dend[i-1](1)
connect dend[27](0), dend[25](1)
connect dend[28](0), dend[24](1)
connect dend[29](0), dend[19](1)
for i = 30, 32 connect dend[i](0), dend[i-1](1)
connect dend[33](0), dend[31](1)
connect dend[34](0), dend[30](1)
connect dend[35](0), dend[29](1)
connect dend[36](0), dend[18](1)
connect dend[37](0), dend[17](1)
for i = 38, 39 connect dend[i](0), dend[i-1](1)
connect dend[40](0), dend[38](1)
connect dend[41](0), dend[37](1)
connect dend[42](0), dend[16](1)
connect dend[43](0), dend[15](1)
for i = 44, 45 connect dend[i](0), dend[i-1](1)
connect dend[46](0), dend[44](1)
connect dend[47](0), dend[43](1)
connect dend[48](0), dend[14](1)
for i = 49, 50 connect dend[i](0), dend[48](1)
connect dend[51](0), dend[13](1)
for i = 52, 56 connect dend[i](0), dend[i-1](1)
connect dend[57](0), dend[55](1)
connect dend[58](0), dend[54](1)
for i = 59, 61 connect dend[i](0), dend[i-1](1)
connect dend[62](0), dend[60](1)
connect dend[63](0), dend[59](1)
connect dend[64](0), dend[58](1)
connect dend[65](0), dend[53](1)
connect dend[66](0), dend[52](1)
connect dend[67](0), dend[51](1)
for i = 68, 69 connect dend[i](0), dend[67](1)
connect dend[70](0), dend[12](1)
connect dend[71](0), dend[11](1)
connect dend[72](0), dend[10](1)
for i = 73, 78 connect dend[i](0), dend[i-1](1)
connect dend[79](0), dend[77](1)
connect dend[80](0), dend[76](1)
for i = 81, 83 connect dend[i](0), dend[i-1](1)
connect dend[84](0), dend[82](1)
connect dend[85](0), dend[81](1)
connect dend[86](0), dend[80](1)
connect dend[87](0), dend[75](1)
connect dend[88](0), dend[74](1)
for i = 89, 91 connect dend[i](0), dend[i-1](1)
connect dend[92](0), dend[90](1)
connect dend[93](0), dend[89](1)
for i = 94, 95 connect dend[i](0), dend[i-1](1)
connect dend[96](0), dend[94](1)
connect dend[97](0), dend[93](1)
for i = 98, 99 connect dend[i](0), dend[i-1](1)
connect dend[100](0), dend[98](1)
connect dend[101](0), dend[97](1)
connect dend[102](0), dend[88](1)
connect dend[103](0), dend[73](1)
for i = 104, 105 connect dend[i](0), dend[103](1)
for i = 106, 108 connect dend[i](0), dend[i-1](1)
connect dend[109](0), dend[107](1)
connect dend[110](0), dend[106](1)
connect dend[111](0), dend[105](1)
connect dend[112](0), dend[72](1)
for i = 113, 114 connect dend[i](0), dend[i-1](1)
connect dend[115](0), dend[113](1)
connect dend[116](0), dend[112](1)
connect dend[117](0), dend[9](1)
for i = 118, 120 connect dend[i](0), dend[i-1](1)
connect dend[121](0), dend[119](1)
connect dend[122](0), dend[118](1)
connect dend[123](0), dend[117](1)
connect dend[124](0), dend[8](1)
for i = 125, 126 connect dend[i](0), dend[124](1)
connect dend[127](0), dend[7](1)
for i = 128, 129 connect dend[i](0), dend[i-1](1)
connect dend[130](0), dend[128](1)
for i = 131, 132 connect dend[i](0), dend[i-1](1)
connect dend[133](0), dend[131](1)
connect dend[134](0), dend[130](1)
for i = 135, 136 connect dend[i](0), dend[134](1)
for i = 137, 138 connect dend[i](0), dend[136](1)
connect dend[139](0), dend[127](1)
connect dend[140](0), dend[6](1)
for i = 141, 142 connect dend[i](0), dend[140](1)
for i = 143, 145 connect dend[i](0), dend[i-1](1)
connect dend[146](0), dend[144](1)
connect dend[147](0), dend[143](1)
for i = 148, 149 connect dend[i](0), dend[i-1](1)
connect dend[150](0), dend[148](1)
for i = 151, 152 connect dend[i](0), dend[150](1)
for i = 153, 154 connect dend[i](0), dend[152](1)
for i = 155, 156 connect dend[i](0), dend[i-1](1)
connect dend[157](0), dend[155](1)
connect dend[158](0), dend[154](1)
connect dend[159](0), dend[147](1)
connect dend[160](0), dend[142](1)
for i = 161, 162 connect dend[i](0), dend[i-1](1)
connect dend[163](0), dend[161](1)
connect dend[164](0), dend[160](1)
for i = 165, 166 connect dend[i](0), dend[164](1)
connect dend[167](0), dend[5](1)
for i = 168, 169 connect dend[i](0), dend[i-1](1)
connect dend[170](0), dend[168](1)
for i = 171, 172 connect dend[i](0), dend[i-1](1)
connect dend[173](0), dend[171](1)
connect dend[174](0), dend[170](1)
connect dend[175](0), dend[167](1)
for i = 176, 177 connect dend[i](0), dend[i-1](1)
connect dend[178](0), dend[176](1)
connect dend[179](0), dend[175](1)
connect dend[180](0), dend[4](1)
for i = 181, 183 connect dend[i](0), dend[i-1](1)
connect dend[184](0), dend[182](1)
for i = 185, 186 connect dend[i](0), dend[i-1](1)
connect dend[187](0), dend[185](1)
for i = 188, 189 connect dend[i](0), dend[187](1)
connect dend[190](0), dend[184](1)
connect dend[191](0), dend[181](1)
for i = 192, 195 connect dend[i](0), dend[i-1](1)
connect dend[196](0), dend[194](1)
connect dend[197](0), dend[193](1)
for i = 198, 199 connect dend[i](0), dend[i-1](1)
connect dend[200](0), dend[198](1)
connect dend[201](0), dend[197](1)
for i = 202, 203 connect dend[i](0), dend[201](1)
for i = 204, 205 connect dend[i](0), dend[203](1)
for i = 206, 208 connect dend[i](0), dend[i-1](1)
connect dend[209](0), dend[207](1)
connect dend[210](0), dend[206](1)
for i = 211, 212 connect dend[i](0), dend[210](1)
connect dend[213](0), dend[205](1)
connect dend[214](0), dend[192](1)
connect dend[215](0), dend[191](1)
for i = 216, 217 connect dend[i](0), dend[215](1)
connect dend[218](0), dend[180](1)
for i = 219, 220 connect dend[i](0), dend[218](1)
connect dend[221](0), dend[3](1)
for i = 222, 224 connect dend[i](0), dend[i-1](1)
connect dend[225](0), dend[223](1)
for i = 226, 227 connect dend[i](0), dend[i-1](1)
connect dend[228](0), dend[226](1)
for i = 229, 230 connect dend[i](0), dend[228](1)
connect dend[231](0), dend[225](1)
connect dend[232](0), dend[222](1)
for i = 233, 234 connect dend[i](0), dend[232](1)
for i = 235, 236 connect dend[i](0), dend[234](1)
connect dend[237](0), dend[221](1)
for i = 238, 239 connect dend[i](0), dend[237](1)
connect dend[240](0), dend[2](1)
connect dend[241](0), dend[1](1)
for i = 242, 243 connect dend[i](0), dend[i-1](1)
connect dend[244](0), dend[242](1)
connect dend[245](0), dend[241](1)
for i = 246, 247 connect dend[i](0), dend[i-1](1)
connect dend[248](0), dend[246](1)
for i = 249, 252 connect dend[i](0), dend[i-1](1)
connect dend[253](0), dend[251](1)
connect dend[254](0), dend[250](1)
for i = 255, 256 connect dend[i](0), dend[254](1)
for i = 257, 258 connect dend[i](0), dend[256](1)
for i = 259, 260 connect dend[i](0), dend[258](1)
for i = 261, 262 connect dend[i](0), dend[260](1)
for i = 263, 264 connect dend[i](0), dend[262](1)
connect dend[265](0), dend[249](1)
for i = 266, 268 connect dend[i](0), dend[i-1](1)
connect dend[269](0), dend[267](1)
connect dend[270](0), dend[266](1)
connect dend[271](0), dend[265](1)
connect dend[272](0), dend[248](1)
connect dend[273](0), dend[245](1)
for i = 274, 275 connect dend[i](0), dend[273](1)
connect dend[276](0), dend(1)
for i = 277, 282 connect dend[i](0), dend[i-1](1)
connect dend[283](0), dend[281](1)
for i = 284, 285 connect dend[i](0), dend[283](1)
connect dend[286](0), dend[280](1)
for i = 287, 288 connect dend[i](0), dend[i-1](1)
connect dend[289](0), dend[287](1)
connect dend[290](0), dend[286](1)
for i = 291, 294 connect dend[i](0), dend[i-1](1)
connect dend[295](0), dend[293](1)
for i = 296, 297 connect dend[i](0), dend[295](1)
connect dend[298](0), dend[292](1)
connect dend[299](0), dend[291](1)
connect dend[300](0), dend[290](1)
connect dend[301](0), dend[279](1)
for i = 302, 303 connect dend[i](0), dend[301](1)
connect dend[304](0), dend[278](1)
connect dend[305](0), dend[277](1)
for i = 306, 307 connect dend[i](0), dend[i-1](1)
connect dend[308](0), dend[306](1)
for i = 309, 310 connect dend[i](0), dend[308](1)
for i = 311, 313 connect dend[i](0), dend[i-1](1)
connect dend[314](0), dend[312](1)
connect dend[315](0), dend[311](1)
for i = 316, 317 connect dend[i](0), dend[315](1)
connect dend[318](0), dend[310](1)
topol_1()
}
proc topol_1() {
for i = 319, 320 connect dend[i](0), dend[318](1)
connect dend[321](0), dend[305](1)
for i = 322, 323 connect dend[i](0), dend[321](1)
for i = 324, 325 connect dend[i](0), dend[323](1)
connect dend[326](0), dend[276](1)
for i = 327, 343 connect dend[i](0), dend[i-1](1)
connect dend[344](0), dend[342](1)
for i = 345, 346 connect dend[i](0), dend[i-1](1)
connect dend[347](0), dend[345](1)
connect dend[348](0), dend[344](1)
for i = 349, 350 connect dend[i](0), dend[348](1)
connect dend[351](0), dend[341](1)
connect dend[352](0), dend[340](1)
for i = 353, 354 connect dend[i](0), dend[i-1](1)
connect dend[355](0), dend[353](1)
connect dend[356](0), dend[352](1)
for i = 357, 358 connect dend[i](0), dend[356](1)
connect dend[359](0), dend[339](1)
connect dend[360](0), dend[338](1)
connect dend[361](0), dend[337](1)
for i = 362, 363 connect dend[i](0), dend[361](1)
for i = 364, 366 connect dend[i](0), dend[i-1](1)
connect dend[367](0), dend[365](1)
connect dend[368](0), dend[364](1)
for i = 369, 370 connect dend[i](0), dend[368](1)
connect dend[371](0), dend[363](1)
for i = 372, 374 connect dend[i](0), dend[i-1](1)
connect dend[375](0), dend[373](1)
for i = 376, 377 connect dend[i](0), dend[375](1)
connect dend[378](0), dend[372](1)
connect dend[379](0), dend[371](1)
for i = 380, 381 connect dend[i](0), dend[379](1)
connect dend[382](0), dend[336](1)
for i = 383, 384 connect dend[i](0), dend[382](1)
connect dend[385](0), dend[335](1)
for i = 386, 388 connect dend[i](0), dend[i-1](1)
connect dend[389](0), dend[387](1)
for i = 390, 391 connect dend[i](0), dend[389](1)
connect dend[392](0), dend[386](1)
connect dend[393](0), dend[385](1)
for i = 394, 395 connect dend[i](0), dend[393](1)
for i = 396, 397 connect dend[i](0), dend[i-1](1)
connect dend[398](0), dend[396](1)
connect dend[399](0), dend[395](1)
connect dend[400](0), dend[334](1)
connect dend[401](0), dend[333](1)
for i = 402, 403 connect dend[i](0), dend[i-1](1)
connect dend[404](0), dend[402](1)
connect dend[405](0), dend[401](1)
connect dend[406](0), dend[332](1)
for i = 407, 408 connect dend[i](0), dend[406](1)
for i = 409, 410 connect dend[i](0), dend[i-1](1)
connect dend[411](0), dend[409](1)
connect dend[412](0), dend[408](1)
connect dend[413](0), dend[331](1)
for i = 414, 415 connect dend[i](0), dend[413](1)
connect dend[416](0), dend[330](1)
for i = 417, 418 connect dend[i](0), dend[i-1](1)
connect dend[419](0), dend[417](1)
for i = 420, 421 connect dend[i](0), dend[419](1)
connect dend[422](0), dend[416](1)
connect dend[423](0), dend[329](1)
for i = 424, 425 connect dend[i](0), dend[423](1)
for i = 426, 428 connect dend[i](0), dend[i-1](1)
connect dend[429](0), dend[427](1)
connect dend[430](0), dend[426](1)
connect dend[431](0), dend[425](1)
connect dend[432](0), dend[328](1)
connect dend[433](0), dend[327](1)
for i = 434, 437 connect dend[i](0), dend[i-1](1)
connect dend[438](0), dend[436](1)
for i = 439, 440 connect dend[i](0), dend[438](1)
connect dend[441](0), dend[435](1)
for i = 442, 443 connect dend[i](0), dend[441](1)
for i = 444, 445 connect dend[i](0), dend[443](1)
connect dend[446](0), dend[434](1)
for i = 447, 448 connect dend[i](0), dend[i-1](1)
connect dend[449](0), dend[447](1)
connect dend[450](0), dend[446](1)
for i = 451, 452 connect dend[i](0), dend[450](1)
connect dend[453](0), dend[433](1)
for i = 454, 455 connect dend[i](0), dend[453](1)
connect dend[456](0), dend[326](1)
for i = 457, 463 connect dend[i](0), dend[i-1](1)
connect dend[464](0), dend[462](1)
for i = 465, 466 connect dend[i](0), dend[464](1)
connect dend[467](0), dend[461](1)
connect dend[468](0), dend[460](1)
connect dend[469](0), dend[459](1)
for i = 470, 472 connect dend[i](0), dend[i-1](1)
connect dend[473](0), dend[471](1)
connect dend[474](0), dend[470](1)
connect dend[475](0), dend[469](1)
for i = 476, 477 connect dend[i](0), dend[i-1](1)
connect dend[478](0), dend[476](1)
connect dend[479](0), dend[475](1)
for i = 480, 481 connect dend[i](0), dend[479](1)
connect dend[482](0), dend[458](1)
connect dend[483](0), dend[457](1)
for i = 484, 487 connect dend[i](0), dend[i-1](1)
connect dend[488](0), dend[486](1)
for i = 489, 490 connect dend[i](0), dend[488](1)
for i = 491, 492 connect dend[i](0), dend[490](1)
connect dend[493](0), dend[485](1)
for i = 494, 495 connect dend[i](0), dend[493](1)
connect dend[496](0), dend[484](1)
for i = 497, 498 connect dend[i](0), dend[496](1)
connect dend[499](0), dend[483](1)
for i = 500, 504 connect dend[i](0), dend[i-1](1)
connect dend[505](0), dend[503](1)
connect dend[506](0), dend[502](1)
for i = 507, 510 connect dend[i](0), dend[i-1](1)
connect dend[511](0), dend[509](1)
connect dend[512](0), dend[508](1)
connect dend[513](0), dend[507](1)
for i = 514, 515 connect dend[i](0), dend[513](1)
connect dend[516](0), dend[506](1)
for i = 517, 518 connect dend[i](0), dend[516](1)
connect dend[519](0), dend[501](1)
for i = 520, 522 connect dend[i](0), dend[i-1](1)
connect dend[523](0), dend[521](1)
connect dend[524](0), dend[520](1)
connect dend[525](0), dend[519](1)
for i = 526, 528 connect dend[i](0), dend[i-1](1)
connect dend[529](0), dend[527](1)
for i = 530, 531 connect dend[i](0), dend[529](1)
for i = 532, 533 connect dend[i](0), dend[531](1)
connect dend[534](0), dend[526](1)
connect dend[535](0), dend[525](1)
for i = 536, 537 connect dend[i](0), dend[535](1)
for i = 538, 539 connect dend[i](0), dend[537](1)
connect dend[540](0), dend[500](1)
for i = 541, 542 connect dend[i](0), dend[540](1)
connect dend[543](0), dend[499](1)
connect dend[544](0), dend[456](1)
for i = 545, 549 connect dend[i](0), dend[i-1](1)
connect dend[550](0), dend[548](1)
for i = 551, 552 connect dend[i](0), dend[550](1)
connect dend[553](0), dend[547](1)
connect dend[554](0), dend[546](1)
connect dend[555](0), dend[545](1)
connect dend[556](0), dend[544](1)
for i = 557, 558 connect dend[i](0), dend[i-1](1)
connect dend[559](0), dend[557](1)
connect dend[560](0), dend[556](1)
for i = 561, 562 connect dend[i](0), dend[i-1](1)
connect dend[563](0), dend[561](1)
for i = 564, 565 connect dend[i](0), dend[563](1)
for i = 566, 567 connect dend[i](0), dend[i-1](1)
connect dend[568](0), dend[566](1)
connect dend[569](0), dend[565](1)
for i = 570, 571 connect dend[i](0), dend[569](1)
for i = 572, 573 connect dend[i](0), dend[571](1)
connect dend[574](0), dend[560](1)
for i = 575, 576 connect dend[i](0), dend[i-1](1)
connect dend[577](0), dend[575](1)
for i = 578, 580 connect dend[i](0), dend[i-1](1)
connect dend[581](0), dend[579](1)
for i = 582, 585 connect dend[i](0), dend[i-1](1)
connect dend[586](0), dend[584](1)
connect dend[587](0), dend[583](1)
for i = 588, 590 connect dend[i](0), dend[i-1](1)
connect dend[591](0), dend[589](1)
connect dend[592](0), dend[588](1)
connect dend[593](0), dend[587](1)
for i = 594, 595 connect dend[i](0), dend[i-1](1)
connect dend[596](0), dend[594](1)
connect dend[597](0), dend[593](1)
for i = 598, 599 connect dend[i](0), dend[597](1)
connect dend[600](0), dend[582](1)
for i = 601, 602 connect dend[i](0), dend[600](1)
connect dend[603](0), dend[581](1)
for i = 604, 605 connect dend[i](0), dend[603](1)
for i = 606, 607 connect dend[i](0), dend[i-1](1)
connect dend[608](0), dend[606](1)
connect dend[609](0), dend[605](1)
connect dend[610](0), dend[578](1)
connect dend[611](0), dend[577](1)
for i = 612, 614 connect dend[i](0), dend[i-1](1)
connect dend[615](0), dend[613](1)
for i = 616, 617 connect dend[i](0), dend[615](1)
connect dend[618](0), dend[612](1)
for i = 619, 620 connect dend[i](0), dend[618](1)
for i = 621, 622 connect dend[i](0), dend[620](1)
for i = 623, 624 connect dend[i](0), dend[i-1](1)
connect dend[625](0), dend[623](1)
connect dend[626](0), dend[622](1)
connect dend[627](0), dend[611](1)
for i = 628, 633 connect dend[i](0), dend[i-1](1)
connect dend[634](0), dend[632](1)
for i = 635, 636 connect dend[i](0), dend[634](1)
for i = 637, 638 connect dend[i](0), dend[i-1](1)
connect dend[639](0), dend[637](1)
connect dend[640](0), dend[636](1)
connect dend[641](0), dend[631](1)
for i = 642, 643 connect dend[i](0), dend[641](1)
for i = 644, 645 connect dend[i](0), dend[i-1](1)
connect dend[646](0), dend[644](1)
connect dend[647](0), dend[643](1)
connect dend[648](0), dend[630](1)
topol_2()
}
proc topol_2() {
for i = 649, 650 connect dend[i](0), dend[i-1](1)
connect dend[651](0), dend[649](1)
for i = 652, 653 connect dend[i](0), dend[651](1)
connect dend[654](0), dend[648](1)
connect dend[655](0), dend[629](1)
for i = 656, 657 connect dend[i](0), dend[655](1)
for i = 658, 659 connect dend[i](0), dend[657](1)
for i = 660, 661 connect dend[i](0), dend[659](1)
for i = 662, 663 connect dend[i](0), dend[661](1)
connect dend[664](0), dend[628](1)
for i = 665, 666 connect dend[i](0), dend[i-1](1)
connect dend[667](0), dend[665](1)
connect dend[668](0), dend[664](1)
for i = 669, 670 connect dend[i](0), dend[668](1)
connect dend[671](0), dend[627](1)
connect dend[672](0), dend[574](1)
for i = 673, 674 connect dend[i](0), dend[672](1)
for i = 675, 677 connect dend[i](0), dend[i-1](1)
connect dend[678](0), dend[676](1)
connect dend[679](0), dend[675](1)
connect dend[680](0), dend[674](1)
for i = 681, 682 connect dend[i](0), dend[i-1](1)
connect dend[683](0), dend[681](1)
for i = 684, 685 connect dend[i](0), dend[683](1)
connect dend[686](0), dend[680](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(8.98, 0.79, -5, 12.758)
pt3dadd(8.98, 7.17, -5, 12.758)
}
soma[1] {pt3dclear()
pt3dadd(8.98, 0.79, -5, 12.758)
pt3dadd(8.98, -5.58, -5, 12.758)
}
dend {pt3dclear()
pt3dadd(8.98, 0.79, -5, 1.41)
pt3dadd(15.63, 8.59, -6.25, 1.41)
pt3dadd(15.63, 8.75, -6.25, 1.41)
pt3dadd(15.78, 10, -6.25, 1.41)
pt3dadd(15.63, 12.19, -6.25, 1.41)
pt3dadd(15.47, 12.5, -6.25, 1.41)
pt3dadd(15.47, 13.28, -6.25, 1.41)
pt3dadd(15.47, 13.59, -6.25, 1.41)
pt3dadd(15.31, 14.84, -6.25, 1.41)
pt3dadd(15.78, 17.03, -6.25, 1.41)
pt3dadd(15.78, 18.28, -6.25, 1.41)
pt3dadd(16.25, 19.05, -7, 1.56)
pt3dadd(19.38, 22.81, -7, 2.66)
}
dend[1] {pt3dclear()
pt3dadd(19.38, 22.81, -7, 2.66)
pt3dadd(19.05, 24.53, -7, 1.72)
pt3dadd(18.44, 26.41, -7, 1.72)
pt3dadd(18.36, 26.64, -7, 1.72)
pt3dadd(18.28, 27.5, -6.25, 1.72)
}
dend[2] {pt3dclear()
pt3dadd(18.28, 27.5, -6.25, 1.72)
pt3dadd(18.13, 28.28, -7, 1.72)
pt3dadd(18.59, 31.41, -7, 1.72)
pt3dadd(18.79, 34.29, -6, 1.72)
}
dend[3] {pt3dclear()
pt3dadd(18.79, 34.29, -6, 1.72)
pt3dadd(19.09, 36.63, -8.5, 1.72)
}
dend[4] {pt3dclear()
pt3dadd(19.09, 36.63, -8.5, 1.72)
pt3dadd(18.91, 35.22, -7, 1.72)
pt3dadd(19.22, 36.88, -7, 1.72)
pt3dadd(19.22, 39.38, -7, 1.72)
pt3dadd(19.05, 41.88, -7, 1.72)
pt3dadd(18.59, 44.69, -7, 1.72)
pt3dadd(18.75, 47.5, -7, 1.72)
pt3dadd(18.93, 48.65, -7.75, 1.72)
}
dend[5] {pt3dclear()
pt3dadd(18.93, 48.65, -7.75, 1.72)
pt3dadd(19.05, 49.38, -7, 1.72)
pt3dadd(20, 51.41, -7, 1.72)
pt3dadd(21.13, 52.68, -7.75, 1.72)
}
dend[6] {pt3dclear()
pt3dadd(21.13, 52.68, -7.75, 1.72)
pt3dadd(22.03, 53.28, -7, 1.72)
pt3dadd(22.97, 53.91, -6.25, 1.72)
}
dend[7] {pt3dclear()
pt3dadd(22.97, 53.91, -6.25, 1.72)
pt3dadd(23.59, 54.06, -7, 1.72)
pt3dadd(25.63, 54.53, -7, 1.72)
pt3dadd(27.5, 55.31, -7, 1.25)
pt3dadd(30, 56.09, -7, 1.25)
pt3dadd(31.25, 56.41, -7.5, 1.56)
}
dend[8] {pt3dclear()
pt3dadd(31.25, 56.41, -7.5, 1.56)
pt3dadd(32.03, 58.91, -7.5, 1.41)
pt3dadd(33.9, 61.56, -7.5, 1.41)
pt3dadd(35.51, 62.73, -7.25, 1.41)
}
dend[9] {pt3dclear()
pt3dadd(35.51, 62.73, -7.25, 1.41)
pt3dadd(36.25, 63.28, -7.5, 1.41)
pt3dadd(36.09, 63.13, -7.5, 1.41)
pt3dadd(37.77, 64.06, -6.75, 1.41)
}
dend[10] {pt3dclear()
pt3dadd(37.77, 64.06, -6.75, 1.41)
pt3dadd(38.44, 64.53, -8, 1.41)
pt3dadd(39.65, 65, -7.5, 1.41)
}
dend[11] {pt3dclear()
pt3dadd(39.65, 65, -7.5, 1.41)
pt3dadd(40.47, 65.16, -8, 1.41)
pt3dadd(42.97, 64.84, -8, 1.41)
pt3dadd(45.63, 64.84, -8, 1.41)
pt3dadd(45.47, 64.84, -8, 1.41)
pt3dadd(46.91, 64.53, -7, 1.41)
}
dend[12] {pt3dclear()
pt3dadd(46.91, 64.53, -7, 1.41)
pt3dadd(47.97, 64.38, -8, 1.41)
pt3dadd(49.73, 64.45, -7.5, 1.41)
}
dend[13] {pt3dclear()
pt3dadd(49.73, 64.45, -7.5, 1.41)
pt3dadd(50.63, 64.53, -8, 1.41)
pt3dadd(51.13, 64.69, -6.5, 1.41)
}
dend[14] {pt3dclear()
pt3dadd(51.13, 64.69, -6.5, 1.41)
pt3dadd(51.56, 64.69, -8, 1.41)
pt3dadd(52.75, 65.27, -7, 0.78)
pt3dadd(53.77, 65.81, -7, 0.78)
pt3dadd(54.94, 66.13, -7, 0.78)
pt3dadd(56.27, 66.45, -7, 0.78)
pt3dadd(56.5, 66.45, -7, 0.78)
pt3dadd(57.83, 66.84, -7, 0.78)
pt3dadd(57.91, 66.91, -7, 0.78)
pt3dadd(59.08, 67.3, -7, 0.78)
pt3dadd(60.64, 67.84, -7, 0.78)
pt3dadd(60.88, 67.84, -7, 0.78)
}
dend[15] {pt3dclear()
pt3dadd(60.88, 67.84, -7, 0.78)
pt3dadd(62.29, 67.93, -7, 1.02)
pt3dadd(64.08, 68.23, -7, 1.02)
pt3dadd(65.72, 68.48, -7, 1.02)
pt3dadd(65.88, 68.48, -7, 1.02)
pt3dadd(67.44, 69.48, -7, 1.02)
pt3dadd(68.69, 70.27, -7, 1.02)
pt3dadd(68.84, 70.34, -7, 1.02)
pt3dadd(70.02, 71.29, -7, 1.02)
pt3dadd(71.11, 71.91, -7, 1.02)
pt3dadd(71.89, 72.23, -7, 1.02)
pt3dadd(72.29, 72.3, -7, 1.02)
}
dend[16] {pt3dclear()
pt3dadd(72.29, 72.3, -7, 1.02)
pt3dadd(72.91, 71.98, -7, 1.02)
pt3dadd(74.47, 71.98, -7, 1.02)
pt3dadd(74.63, 71.98, -7, 1.02)
pt3dadd(76.19, 71.98, -7, 1.02)
pt3dadd(76.34, 71.98, -7, 1.02)
pt3dadd(77.59, 71.98, -7, 1.02)
pt3dadd(78.61, 72.06, -7, 1.02)
pt3dadd(79, 72.06, -7, 1.02)
pt3dadd(80.72, 72.54, -7, 1.02)
pt3dadd(82.13, 72.77, -7, 1.02)
pt3dadd(82.44, 72.77, -7, 1.02)
}
dend[17] {pt3dclear()
pt3dadd(82.44, 72.77, -7, 1.02)
pt3dadd(84.11, 72.9, -6.59, 0.86)
}
dend[18] {pt3dclear()
pt3dadd(84.11, 72.9, -6.59, 0.86)
pt3dadd(84.47, 72.93, -6.5, 0.86)
pt3dadd(86.19, 72.77, -6.5, 0.86)
pt3dadd(88.22, 72.84, -6.5, 0.86)
pt3dadd(88.93, 72.84, -6.5, 0.86)
}
dend[19] {pt3dclear()
pt3dadd(88.93, 72.84, -6.5, 0.86)
pt3dadd(90.18, 73.7, -6.5, 0.86)
pt3dadd(91.43, 74.26, -6.5, 0.86)
pt3dadd(92.68, 75.12, -6.5, 0.86)
pt3dadd(93.07, 75.51, -6.5, 0.86)
}
dend[20] {pt3dclear()
pt3dadd(93.07, 75.51, -6.5, 0.86)
pt3dadd(92.99, 76.84, -6.5, 0.86)
pt3dadd(93.07, 77.77, -6.5, 0.86)
}
dend[21] {pt3dclear()
pt3dadd(93.07, 77.77, -6.5, 0.86)
pt3dadd(94.79, 78.48, -6.5, 0.78)
pt3dadd(96.11, 79.41, -6.5, 0.78)
pt3dadd(97.83, 79.95, -6.5, 0.78)
pt3dadd(97.99, 79.95, -6.5, 0.78)
pt3dadd(99.71, 80.2, -6.5, 0.78)
pt3dadd(101, 80.12, -6.5, 0.78)
}
dend[22] {pt3dclear()
pt3dadd(101, 80.12, -6.5, 0.78)
pt3dadd(102.1, 80.98, -6.5, 0.78)
pt3dadd(102.3, 81.2, -6.5, 0.78)
pt3dadd(103.1, 81.59, -6.5, 0.78)
pt3dadd(103.4, 81.59, -6.5, 0.78)
pt3dadd(104.9, 81.59, -6.5, 0.78)
pt3dadd(105.1, 81.52, -6.5, 0.78)
pt3dadd(105.3, 81.52, -6.5, 0.78)
pt3dadd(106.2, 81.13, -6.5, 0.78)
pt3dadd(106.9, 80.98, -6.5, 0.78)
pt3dadd(108.1, 81.52, -6.5, 0.78)
pt3dadd(108.2, 81.59, -6.5, 0.78)
pt3dadd(109, 81.99, -6.5, 0.78)
}
dend[23] {pt3dclear()
pt3dadd(101, 80.12, -6.5, 0.78)
pt3dadd(103.5, 78.7, -6.75, 0.78)
pt3dadd(105.1, 78.7, -6.75, 0.78)
pt3dadd(105.2, 78.79, -6.75, 0.78)
pt3dadd(105.4, 78.79, -6.75, 0.78)
pt3dadd(106.8, 78.87, -6.75, 0.78)
pt3dadd(107.2, 78.87, -6.75, 0.78)
pt3dadd(108.1, 78.95, -6.75, 0.78)
pt3dadd(108.5, 79.09, -6.75, 0.78)
pt3dadd(109.5, 79.92, -7.25, 0.78)
pt3dadd(110.6, 80.7, -7.25, 0.78)
pt3dadd(111.7, 81.48, -7.25, 0.78)
pt3dadd(112.5, 82.23, -7.25, 0.78)
pt3dadd(113.4, 83.16, -7.25, 0.78)
pt3dadd(113.4, 83.28, -7.25, 0.78)
pt3dadd(114, 84.49, -7.25, 0.78)
pt3dadd(114.1, 84.77, -7.25, 0.78)
}
dend[24] {pt3dclear()
pt3dadd(93.07, 77.77, -6.5, 0.86)
pt3dadd(92.2, 78.44, -6.5, 0.63)
pt3dadd(91.61, 79.02, -6.5, 0.63)
pt3dadd(91.34, 79.73, -6.5, 0.63)
pt3dadd(91.14, 80.81, -6.5, 0.63)
pt3dadd(90.95, 81.68, -6.5, 0.63)
pt3dadd(90.95, 81.88, -6.5, 0.63)
}
dend[25] {pt3dclear()
pt3dadd(90.95, 81.88, -6.5, 0.63)
pt3dadd(90.64, 82.83, -6.31, 0.51)
}
dend[26] {pt3dclear()
pt3dadd(90.64, 82.83, -6.31, 0.51)
pt3dadd(90.52, 83.2, -6.25, 0.51)
pt3dadd(89.27, 84.88, -6.25, 0.51)
pt3dadd(89.19, 84.96, -6.25, 0.51)
pt3dadd(88.06, 86.02, -6.25, 0.51)
pt3dadd(87.94, 86.09, -6.25, 0.51)
pt3dadd(87.04, 87.23, -6.25, 0.51)
pt3dadd(86.92, 87.38, -6.25, 0.51)
}
dend[27] {pt3dclear()
pt3dadd(90.64, 82.83, -6.31, 0.51)
pt3dadd(92.35, 82.03, -6.25, 0.51)
pt3dadd(93.6, 82.54, -6.25, 0.51)
pt3dadd(93.76, 82.62, -6.25, 0.51)
pt3dadd(93.88, 82.66, -6.25, 0.51)
pt3dadd(94.97, 83.05, -6.25, 0.51)
pt3dadd(95.13, 83.09, -6.25, 0.51)
pt3dadd(96.61, 83.75, -6.25, 0.51)
pt3dadd(96.77, 83.75, -6.25, 0.51)
pt3dadd(97.78, 83.98, -6.25, 0.51)
pt3dadd(98.06, 84.1, -6.25, 0.51)
pt3dadd(98.76, 84.49, -6.25, 0.51)
pt3dadd(98.84, 84.57, -6.25, 0.51)
pt3dadd(99.42, 85.23, -6.25, 0.51)
pt3dadd(99.85, 86.33, -6.25, 0.51)
}
dend[28] {pt3dclear()
pt3dadd(90.95, 81.88, -6.5, 0.63)
pt3dadd(89.03, 82.11, -6.25, 0.51)
pt3dadd(87.28, 82.58, -6.25, 0.51)
pt3dadd(87.16, 82.58, -6.25, 0.51)
pt3dadd(85.99, 82.85, -6.25, 0.51)
pt3dadd(85.71, 82.85, -6.25, 0.51)
pt3dadd(84.5, 83.4, -6.25, 0.51)
pt3dadd(84.31, 83.44, -6.25, 0.51)
}
}
proc shape3d_2() {
dend[28] { pt3dadd(83.6, 84.02, -6.25, 0.51)
pt3dadd(83.45, 84.1, -6.25, 0.51)
pt3dadd(83.29, 84.26, -6.25, 0.51)
pt3dadd(82.82, 84.92, -6.25, 0.51)
pt3dadd(82.71, 85.04, -6.25, 0.51)
pt3dadd(82.31, 85.78, -6.25, 0.51)
pt3dadd(82.16, 85.98, -6.25, 0.51)
pt3dadd(81.96, 86.64, -6.25, 0.51)
}
dend[29] {pt3dclear()
pt3dadd(93.07, 75.51, -6.5, 0.86)
pt3dadd(94.85, 75.39, -6.5, 0.51)
pt3dadd(96.14, 75.7, -6.5, 0.51)
pt3dadd(96.92, 75.94, -6.5, 0.51)
pt3dadd(98.8, 75.98, -6.5, 0.51)
}
dend[30] {pt3dclear()
pt3dadd(98.8, 75.98, -6.5, 0.51)
pt3dadd(100.1, 76.25, -6.5, 0.51)
pt3dadd(101, 76.48, -6.5, 0.51)
pt3dadd(101.7, 76.56, -6.5, 0.51)
}
dend[31] {pt3dclear()
pt3dadd(101.7, 76.56, -6.5, 0.51)
pt3dadd(103.5, 76.95, -6.5, 0.51)
pt3dadd(104.5, 77.23, -6.5, 0.51)
pt3dadd(106.1, 77.19, -6.5, 0.51)
pt3dadd(106.3, 77.19, -6.5, 0.51)
pt3dadd(107.3, 77.15, -6.5, 0.51)
pt3dadd(108.3, 77.27, -6.5, 0.51)
pt3dadd(108.8, 77.34, -6.5, 0.51)
}
dend[32] {pt3dclear()
pt3dadd(108.8, 77.34, -6.5, 0.51)
pt3dadd(110.6, 77.7, -6.5, 0.51)
pt3dadd(111.5, 78.16, -6.5, 0.51)
pt3dadd(111.7, 78.31, -6.5, 0.51)
}
dend[33] {pt3dclear()
pt3dadd(108.8, 77.34, -6.5, 0.51)
pt3dadd(109.7, 76.76, -6.5, 0.51)
pt3dadd(110.6, 76.64, -6.5, 0.51)
pt3dadd(111.1, 76.72, -6.5, 0.51)
}
dend[34] {pt3dclear()
pt3dadd(101.7, 76.56, -6.5, 0.51)
pt3dadd(101.3, 77.3, -6.75, 0.39)
pt3dadd(100.7, 77.84, -6.75, 0.39)
pt3dadd(100.4, 78.28, -6.75, 0.39)
pt3dadd(100, 78.63, -6.75, 0.39)
}
dend[35] {pt3dclear()
pt3dadd(98.8, 75.98, -6.5, 0.51)
pt3dadd(98.56, 76.76, -6.75, 0.39)
pt3dadd(98.33, 77.27, -6.75, 0.39)
pt3dadd(98.1, 77.93, -6.75, 0.39)
}
dend[36] {pt3dclear()
pt3dadd(88.93, 72.84, -6.5, 0.86)
pt3dadd(89.5, 71.91, -6.5, 0.39)
pt3dadd(89.62, 71.76, -6.5, 0.39)
pt3dadd(90.24, 71.37, -6.5, 0.39)
pt3dadd(90.44, 71.25, -6.5, 0.39)
pt3dadd(90.91, 71.09, -6.5, 0.39)
pt3dadd(91.14, 71.05, -6.5, 0.39)
pt3dadd(91.88, 70.86, -6.5, 0.39)
pt3dadd(92, 70.86, -6.5, 0.39)
pt3dadd(92.2, 70.9, -6.5, 0.39)
pt3dadd(92.71, 71.2, -6.5, 0.51)
pt3dadd(93.29, 71.64, -6.5, 0.51)
pt3dadd(93.76, 72.34, -6.5, 0.51)
pt3dadd(94.03, 73.16, -6.5, 0.51)
}
dend[37] {pt3dclear()
pt3dadd(84.11, 72.9, -6.59, 0.86)
pt3dadd(82.28, 74.26, -6.75, 0.51)
pt3dadd(82.28, 75.23, -6.75, 0.51)
pt3dadd(82.94, 75.7, -6.5, 0.51)
}
dend[38] {pt3dclear()
pt3dadd(82.94, 75.7, -6.5, 0.51)
pt3dadd(83.88, 76.13, -6.5, 0.51)
pt3dadd(84.58, 76.91, -6.5, 0.51)
pt3dadd(85.21, 77.7, -6.5, 0.51)
pt3dadd(85.56, 78.13, -6.5, 0.51)
}
dend[39] {pt3dclear()
pt3dadd(85.56, 78.13, -6.5, 0.51)
pt3dadd(86.42, 77.89, -6.5, 0.51)
pt3dadd(87.08, 77.45, -6.5, 0.51)
pt3dadd(87.2, 77.42, -6.5, 0.51)
pt3dadd(87.67, 77.15, -6.5, 0.51)
pt3dadd(87.78, 77.11, -6.5, 0.51)
pt3dadd(88.41, 76.8, -6.5, 0.51)
pt3dadd(88.56, 76.8, -6.5, 0.51)
}
dend[40] {pt3dclear()
pt3dadd(85.56, 78.13, -6.5, 0.51)
pt3dadd(85.36, 78.95, -6.25, 0.51)
pt3dadd(85.32, 79.22, -6.25, 0.51)
pt3dadd(85.28, 79.8, -6.25, 0.51)
pt3dadd(85.24, 79.95, -6.25, 0.51)
pt3dadd(85.13, 80.9, -6.25, 0.51)
pt3dadd(85.13, 81.05, -6.25, 0.51)
pt3dadd(85.21, 81.64, -6.25, 0.51)
pt3dadd(85.4, 82.34, -6.25, 0.51)
}
dend[41] {pt3dclear()
pt3dadd(82.94, 75.7, -6.5, 0.51)
pt3dadd(83.99, 74.65, -6.25, 0.43)
pt3dadd(84.5, 74.45, -6.25, 0.43)
}
dend[42] {pt3dclear()
pt3dadd(82.44, 72.77, -7, 1.02)
pt3dadd(82.63, 71.84, -6.5, 0.43)
pt3dadd(83.33, 71.25, -6.5, 0.43)
pt3dadd(84.07, 70.98, -6.5, 0.43)
pt3dadd(85.17, 70.55, -6.5, 0.43)
pt3dadd(85.24, 70.47, -6.5, 0.43)
pt3dadd(86.46, 70.12, -6.5, 0.43)
pt3dadd(87.2, 69.69, -6.5, 0.43)
pt3dadd(87.78, 69.3, -6.5, 0.35)
pt3dadd(88.88, 68.98, -6.5, 0.35)
pt3dadd(89.46, 68.91, -6.5, 0.35)
pt3dadd(89.85, 68.79, -6.5, 0.35)
pt3dadd(90.01, 68.79, -6.5, 0.35)
pt3dadd(90.32, 68.83, -6, 0.35)
}
dend[43] {pt3dclear()
pt3dadd(72.29, 72.3, -7, 1.02)
pt3dadd(72.2, 72.93, -7.25, 0.35)
}
dend[44] {pt3dclear()
pt3dadd(72.2, 72.93, -7.25, 0.35)
pt3dadd(73.14, 73.83, -7.25, 0.43)
pt3dadd(73.89, 74.45, -7.25, 0.43)
pt3dadd(74, 74.53, -7.25, 0.43)
pt3dadd(74.7, 74.84, -7.25, 0.43)
}
dend[45] {pt3dclear()
pt3dadd(74.7, 74.84, -7.25, 0.43)
pt3dadd(75.64, 74.41, -7.25, 0.66)
pt3dadd(76.66, 74.41, -7.25, 0.51)
pt3dadd(77.56, 74.69, -7.25, 0.51)
pt3dadd(78.42, 75.08, -7.25, 0.55)
pt3dadd(79.2, 75.39, -7.25, 0.55)
pt3dadd(79.81, 75.63, -7.25, 0.55)
pt3dadd(80.45, 75.98, -7.25, 0.55)
pt3dadd(80.61, 76.02, -7.25, 0.55)
pt3dadd(81.15, 76.29, -7.25, 0.55)
pt3dadd(81.34, 76.37, -7.25, 0.55)
pt3dadd(81.93, 76.64, -7.25, 0.55)
pt3dadd(82.79, 77.06, -7.25, 0.55)
pt3dadd(83.14, 77.3, -7.25, 0.55)
}
dend[46] {pt3dclear()
pt3dadd(74.7, 74.84, -7.25, 0.43)
pt3dadd(75.37, 75.7, -7.25, 0.55)
pt3dadd(76.31, 76.45, -7.25, 0.55)
pt3dadd(76.54, 76.64, -7.25, 0.55)
pt3dadd(77.09, 77.27, -7.25, 0.55)
pt3dadd(77.13, 77.38, -7.25, 0.55)
pt3dadd(77.59, 78.01, -7.25, 0.55)
pt3dadd(78.22, 78.7, -7.25, 0.55)
pt3dadd(78.38, 78.79, -7.25, 0.55)
pt3dadd(78.54, 78.83, -7.25, 0.55)
pt3dadd(79, 78.95, -7.25, 0.55)
pt3dadd(79.28, 78.95, -7.25, 0.55)
pt3dadd(79.81, 78.83, -7.25, 0.55)
pt3dadd(79.94, 78.79, -7.25, 0.55)
pt3dadd(80.48, 78.67, -7.25, 0.55)
pt3dadd(81.54, 78.63, -7.25, 0.55)
pt3dadd(81.66, 78.59, -7.25, 0.55)
pt3dadd(82.13, 78.59, -7.25, 0.55)
pt3dadd(82.4, 78.63, -7.25, 0.55)
}
dend[47] {pt3dclear()
pt3dadd(72.2, 72.93, -7.25, 0.35)
pt3dadd(71.66, 74.06, -7.5, 0.39)
}
dend[48] {pt3dclear()
pt3dadd(60.88, 67.84, -7, 0.78)
pt3dadd(61.33, 69.41, -7, 0.39)
pt3dadd(61.95, 70.04, -7, 0.39)
pt3dadd(62.97, 70.73, -7, 0.39)
pt3dadd(63.67, 71.52, -7, 0.39)
pt3dadd(63.75, 71.59, -7, 0.39)
pt3dadd(64.45, 72.38, -7, 0.39)
pt3dadd(65.08, 73.09, -7, 0.39)
pt3dadd(65, 73.23, -7, 0.39)
pt3dadd(65.08, 73.79, -7, 0.39)
}
dend[49] {pt3dclear()
pt3dadd(65.08, 73.79, -7, 0.39)
pt3dadd(64.06, 74.65, -7, 0.39)
pt3dadd(63.91, 74.65, -7, 0.39)
pt3dadd(62.89, 75.73, -7, 0.39)
pt3dadd(62.73, 75.81, -7, 0.39)
pt3dadd(62.03, 76.84, -7, 0.39)
pt3dadd(61.95, 76.91, -7, 0.39)
pt3dadd(61.56, 77.93, -7, 0.39)
pt3dadd(61.48, 78.01, -7, 0.39)
pt3dadd(61.41, 78.87, -7, 0.39)
pt3dadd(61.41, 79.65, -7, 0.39)
pt3dadd(61.41, 79.8, -7, 0.39)
pt3dadd(61.56, 80.34, -7, 0.39)
}
dend[50] {pt3dclear()
pt3dadd(65.08, 73.79, -7, 0.39)
pt3dadd(66.48, 74.41, -7.25, 0.39)
pt3dadd(68.13, 75.34, -7.25, 0.39)
pt3dadd(69.38, 75.51, -7.25, 0.39)
pt3dadd(69.69, 75.51, -7.25, 0.39)
pt3dadd(70.94, 75.51, -7.25, 0.39)
pt3dadd(71.88, 75.98, -7.25, 0.39)
pt3dadd(72.03, 76.45, -7.25, 0.39)
pt3dadd(72.73, 77.23, -7.25, 0.39)
pt3dadd(72.89, 77.3, -7.25, 0.39)
pt3dadd(73.36, 77.54, -7.25, 0.39)
pt3dadd(73.91, 77.54, -7.25, 0.39)
pt3dadd(74.14, 77.54, -7.25, 0.39)
pt3dadd(74.53, 77.54, -7.25, 0.39)
pt3dadd(75.08, 77.62, -7.25, 0.39)
pt3dadd(75.55, 77.62, -7.25, 0.39)
}
dend[51] {pt3dclear()
pt3dadd(51.13, 64.69, -6.5, 1.41)
pt3dadd(52.19, 63.44, -8.25, 0.94)
pt3dadd(53.9, 62.81, -8.25, 0.94)
pt3dadd(55.79, 62.42, -8.25, 0.94)
pt3dadd(57.81, 61.8, -8.25, 0.94)
pt3dadd(59.06, 61.09, -8.25, 0.94)
}
dend[52] {pt3dclear()
pt3dadd(59.06, 61.09, -8.25, 0.94)
pt3dadd(61.25, 61.88, -8.25, 0.94)
pt3dadd(62.81, 62.81, -8.25, 0.94)
pt3dadd(63.75, 63.28, -6.5, 0.94)
}
dend[53] {pt3dclear()
pt3dadd(63.75, 63.28, -6.5, 0.94)
pt3dadd(64.53, 63.59, -8.25, 0.94)
pt3dadd(66.88, 63.91, -8.25, 0.94)
pt3dadd(68.28, 63.75, -8.25, 0.94)
pt3dadd(68.13, 63.75, -8.25, 0.94)
}
dend[54] {pt3dclear()
pt3dadd(68.13, 63.75, -8.25, 0.94)
pt3dadd(70, 65, -8.25, 0.94)
pt3dadd(72.19, 66.25, -8.25, 0.94)
pt3dadd(72.34, 66.25, -8.25, 0.94)
pt3dadd(73.13, 66.56, -8.25, 0.94)
}
}
proc shape3d_3() {
dend[54] { }
dend[55] {pt3dclear()
pt3dadd(73.13, 66.56, -8.25, 0.94)
pt3dadd(75.94, 68.28, -8.25, 0.78)
pt3dadd(75.94, 68.13, -8.25, 0.78)
pt3dadd(77.81, 68.91, -8.25, 0.78)
pt3dadd(80.16, 68.91, -8.25, 0.78)
pt3dadd(82.03, 68.13, -8.25, 0.78)
pt3dadd(82.03, 67.97, -8.25, 0.78)
pt3dadd(82.81, 67.19, -8.25, 0.78)
}
dend[56] {pt3dclear()
pt3dadd(82.81, 67.19, -8.25, 0.78)
pt3dadd(82.5, 66.56, -8.25, 0.78)
pt3dadd(82.03, 66.25, -8.25, 0.78)
pt3dadd(81.88, 66.25, -8.25, 0.78)
pt3dadd(80.78, 66.09, -8.25, 0.78)
pt3dadd(80.63, 65.94, -8.25, 0.78)
}
dend[57] {pt3dclear()
pt3dadd(82.81, 67.19, -8.25, 0.78)
pt3dadd(84.06, 66.72, -8.25, 0.78)
pt3dadd(83.91, 66.56, -8.25, 0.78)
pt3dadd(84.53, 65.63, -8.25, 0.78)
pt3dadd(84.38, 65.63, -8.25, 0.78)
pt3dadd(85, 64.53, -8.25, 0.78)
pt3dadd(84.84, 63.44, -8.25, 0.78)
}
dend[58] {pt3dclear()
pt3dadd(73.13, 66.56, -8.25, 0.94)
pt3dadd(74.84, 66.41, -8.25, 0.78)
pt3dadd(76.72, 65.63, -8.25, 0.78)
pt3dadd(76.56, 65.63, -8.25, 0.78)
pt3dadd(78.44, 64.53, -8.25, 0.78)
pt3dadd(78.44, 64.38, -8.25, 0.78)
pt3dadd(79.53, 63.28, -8.25, 0.78)
pt3dadd(79.53, 63.13, -8.25, 0.78)
pt3dadd(80.31, 61.09, -8.25, 0.78)
}
dend[59] {pt3dclear()
pt3dadd(80.31, 61.09, -8.25, 0.78)
pt3dadd(82.19, 60.63, -8.25, 0.78)
pt3dadd(83.44, 60, -8.25, 0.78)
}
dend[60] {pt3dclear()
pt3dadd(83.44, 60, -8.25, 0.78)
pt3dadd(81.96, 59.51, -8.25, 0.78)
}
dend[61] {pt3dclear()
pt3dadd(81.96, 59.51, -8.25, 0.78)
pt3dadd(82.5, 59.69, -8.25, 0.78)
pt3dadd(81.56, 58.75, -8.25, 0.78)
pt3dadd(80.94, 58.44, -8.25, 0.78)
}
dend[62] {pt3dclear()
pt3dadd(81.96, 59.51, -8.25, 0.78)
pt3dadd(84.84, 59.06, -8.25, 0.78)
pt3dadd(85, 58.91, -8.25, 0.78)
}
dend[63] {pt3dclear()
pt3dadd(83.44, 60, -8.25, 0.78)
pt3dadd(84.69, 60.94, -8.25, 0.78)
pt3dadd(85.78, 61.25, -8.25, 0.78)
pt3dadd(86.56, 61.25, -8.25, 0.78)
}
dend[64] {pt3dclear()
pt3dadd(80.31, 61.09, -8.25, 0.78)
pt3dadd(77.34, 58.59, -8.25, 0.78)
}
dend[65] {pt3dclear()
pt3dadd(68.13, 63.75, -8.25, 0.94)
pt3dadd(70, 62.5, -8.25, 0.78)
pt3dadd(69.84, 62.34, -8.25, 0.78)
pt3dadd(71.41, 61.72, -8.25, 0.78)
}
dend[66] {pt3dclear()
pt3dadd(63.75, 63.28, -6.5, 0.94)
pt3dadd(64.22, 64.38, -6.5, 0.158)
pt3dadd(64.61, 65.16, -6.5, 0.158)
pt3dadd(64.69, 65.39, -6.5, 0.158)
pt3dadd(65.08, 65.94, -6.5, 0.158)
pt3dadd(65.08, 66.17, -6.5, 0.158)
pt3dadd(65.16, 66.25, -6.5, 0.158)
pt3dadd(65.31, 66.8, -6.5, 0.158)
pt3dadd(65.31, 67.19, -6.5, 0.158)
pt3dadd(65.23, 67.81, -6.5, 0.158)
pt3dadd(65.23, 68.2, -6.5, 0.158)
pt3dadd(65.08, 69.22, -6.5, 0.158)
}
dend[67] {pt3dclear()
pt3dadd(59.06, 61.09, -8.25, 0.94)
pt3dadd(61.88, 58.91, -8.25, 0.78)
pt3dadd(64.22, 57.97, -8.25, 0.78)
pt3dadd(64.22, 57.81, -8.25, 0.78)
pt3dadd(66.72, 57.81, -8.25, 0.78)
pt3dadd(69.22, 58.28, -8.25, 0.78)
pt3dadd(70.78, 58.75, -8.25, 0.78)
pt3dadd(71.56, 59.53, -8.25, 0.78)
pt3dadd(71.72, 59.53, -8.25, 0.78)
pt3dadd(72.66, 60.47, -8.25, 0.78)
pt3dadd(72.66, 60.63, -8.25, 0.78)
pt3dadd(73.75, 61.56, -8.25, 0.78)
pt3dadd(75.16, 61.88, -8.25, 0.78)
}
dend[68] {pt3dclear()
pt3dadd(75.16, 61.88, -8.25, 0.78)
pt3dadd(76.56, 63.75, -8.25, 0.78)
}
dend[69] {pt3dclear()
pt3dadd(75.16, 61.88, -8.25, 0.78)
pt3dadd(78.28, 61.56, -8.25, 0.78)
pt3dadd(78.13, 61.41, -8.25, 0.78)
}
dend[70] {pt3dclear()
pt3dadd(49.73, 64.45, -7.5, 1.41)
pt3dadd(50.27, 63.2, -7.75, 0.39)
pt3dadd(50.9, 62.42, -7.75, 0.39)
pt3dadd(51.45, 61.56, -7.75, 0.39)
pt3dadd(52.38, 60.63, -7.75, 0.55)
pt3dadd(53.24, 59.77, -7.75, 0.55)
pt3dadd(53.24, 59.61, -7.75, 0.55)
pt3dadd(54.49, 58.98, -7.75, 0.55)
pt3dadd(54.57, 58.91, -7.75, 0.55)
pt3dadd(55.9, 58.44, -7.75, 0.55)
pt3dadd(56.05, 58.36, -7.75, 0.55)
pt3dadd(57.07, 58.28, -7.75, 0.55)
pt3dadd(57.23, 58.28, -7.75, 0.55)
pt3dadd(58.4, 57.89, -7.75, 0.55)
pt3dadd(59.49, 57.42, -7.75, 0.55)
pt3dadd(59.65, 57.34, -7.75, 0.55)
pt3dadd(61.21, 56.88, -7.75, 0.55)
pt3dadd(61.91, 56.8, -7.75, 0.55)
pt3dadd(62.23, 56.8, -7.75, 0.55)
pt3dadd(62.54, 56.95, -7.75, 0.55)
pt3dadd(63.32, 57.11, -7.75, 0.55)
}
dend[71] {pt3dclear()
pt3dadd(46.91, 64.53, -7, 1.41)
pt3dadd(47.15, 65.08, -7, 0.078)
pt3dadd(47.62, 65.94, -7, 0.078)
pt3dadd(48.01, 66.09, -7, 0.078)
pt3dadd(48.87, 66.48, -7, 0.078)
pt3dadd(49.02, 66.48, -7, 0.078)
pt3dadd(50.12, 66.95, -7, 0.31)
pt3dadd(51.6, 67.58, -7, 0.31)
pt3dadd(52.93, 67.58, -7, 0.31)
pt3dadd(54.8, 67.97, -7, 0.31)
pt3dadd(55.04, 67.97, -7, 0.31)
pt3dadd(55.82, 68.2, -7, 0.31)
pt3dadd(55.98, 68.28, -7, 0.31)
pt3dadd(56.52, 68.67, -7, 0.31)
pt3dadd(57.23, 69.3, -7, 0.31)
pt3dadd(57.23, 69.45, -7, 0.31)
pt3dadd(57.77, 70.16, -7, 0.31)
pt3dadd(57.93, 70.31, -7, 0.31)
pt3dadd(58.71, 71.02, -7, 0.31)
pt3dadd(58.87, 71.09, -7, 0.31)
pt3dadd(59.73, 71.8, -7, 0.31)
pt3dadd(59.88, 71.88, -7, 0.31)
pt3dadd(59.96, 71.95, -7, 0.31)
pt3dadd(60.74, 72.66, -7, 0.31)
pt3dadd(61.05, 72.66, -7, 0.31)
}
dend[72] {pt3dclear()
pt3dadd(39.65, 65, -7.5, 1.41)
pt3dadd(40, 67.34, -7.5, 0.78)
pt3dadd(40.31, 68.75, -6.75, 0.78)
}
dend[73] {pt3dclear()
pt3dadd(40.31, 68.75, -6.75, 0.78)
pt3dadd(41.88, 69.84, -7.5, 0.78)
}
dend[74] {pt3dclear()
pt3dadd(41.88, 69.84, -7.5, 0.78)
pt3dadd(42.34, 72.19, -7.5, 0.78)
pt3dadd(43.28, 73.59, -7.5, 0.78)
pt3dadd(44.69, 74.69, -7.5, 0.78)
pt3dadd(45.78, 76.09, -7.5, 0.78)
pt3dadd(46.41, 76.72, -7.75, 0.78)
}
dend[75] {pt3dclear()
pt3dadd(46.41, 76.72, -7.75, 0.78)
pt3dadd(45.78, 78.59, -7.75, 0.78)
pt3dadd(45.47, 79.53, -7.75, 0.78)
}
dend[76] {pt3dclear()
pt3dadd(45.47, 79.53, -7.75, 0.78)
pt3dadd(44.53, 81.72, -7.75, 0.78)
}
dend[77] {pt3dclear()
pt3dadd(44.53, 81.72, -7.75, 0.78)
pt3dadd(47.19, 86.56, -7.5, 0.78)
pt3dadd(47.03, 86.56, -7.5, 0.78)
}
dend[78] {pt3dclear()
pt3dadd(47.03, 86.56, -7.5, 0.78)
pt3dadd(50, 87.03, -7.5, 0.78)
pt3dadd(52.03, 88.44, -7.5, 0.78)
pt3dadd(51.88, 89.69, -7.5, 0.78)
pt3dadd(51.88, 90.16, -7.5, 0.78)
pt3dadd(52.03, 91.41, -7.5, 0.78)
pt3dadd(52.03, 91.56, -7.5, 0.78)
pt3dadd(52.19, 92.81, -7.5, 0.78)
}
dend[79] {pt3dclear()
pt3dadd(47.03, 86.56, -7.5, 0.78)
pt3dadd(46.72, 88.59, -7, 0.78)
pt3dadd(46.25, 90, -7, 0.78)
pt3dadd(45.94, 90.16, -7, 0.78)
pt3dadd(45.78, 90.31, -7, 0.78)
pt3dadd(45, 92.19, -7, 0.78)
pt3dadd(45.16, 93.91, -7, 0.78)
pt3dadd(45.23, 94.14, -7, 0.78)
pt3dadd(45.78, 95.16, -7, 0.78)
}
dend[80] {pt3dclear()
pt3dadd(44.53, 81.72, -7.75, 0.78)
pt3dadd(42.03, 83.75, -7.5, 0.78)
pt3dadd(40.78, 84.53, -7.5, 0.78)
}
dend[81] {pt3dclear()
pt3dadd(40.78, 84.53, -7.5, 0.78)
pt3dadd(41.94, 85.97, -6.34, 1.09)
}
dend[82] {pt3dclear()
pt3dadd(41.94, 85.97, -6.34, 1.09)
pt3dadd(43.09, 87.41, -5.18, 1.09)
}
dend[83] {pt3dclear()
pt3dadd(43.09, 87.41, -5.18, 1.09)
pt3dadd(42.03, 86.09, -6.25, 1.09)
}
dend[84] {pt3dclear()
pt3dadd(43.09, 87.41, -5.18, 1.09)
pt3dadd(39.53, 86.25, -7.5, 0.78)
pt3dadd(38.9, 87.81, -7.5, 0.78)
pt3dadd(38.75, 87.97, -7.5, 0.78)
pt3dadd(38.44, 89.06, -7.5, 0.78)
}
dend[85] {pt3dclear()
pt3dadd(41.94, 85.97, -6.34, 1.09)
pt3dadd(42.81, 87.66, -6.25, 1.09)
pt3dadd(43.13, 88.91, -6.25, 1.09)
pt3dadd(43.13, 89.06, -6.25, 1.09)
pt3dadd(43.13, 90.47, -6.25, 1.09)
pt3dadd(42.97, 91.09, -6.25, 1.09)
pt3dadd(42.5, 92.03, -6.25, 1.09)
}
dend[86] {pt3dclear()
pt3dadd(40.78, 84.53, -7.5, 0.78)
pt3dadd(37.97, 83.28, -7.5, 0.78)
pt3dadd(35.94, 82.81, -7.5, 0.78)
pt3dadd(35.78, 82.81, -7.5, 0.78)
pt3dadd(35.04, 82.73, -7.5, 0.31)
pt3dadd(34.4, 83.2, -7.5, 0.31)
pt3dadd(34.1, 83.44, -7.5, 0.31)
}
dend[87] {pt3dclear()
pt3dadd(45.47, 79.53, -7.75, 0.78)
pt3dadd(47.5, 81.25, -7.75, 0.78)
pt3dadd(49.22, 83.28, -7.75, 0.78)
pt3dadd(49.06, 83.28, -7.75, 0.78)
pt3dadd(49.69, 84.53, -7.75, 0.78)
}
dend[88] {pt3dclear()
pt3dadd(46.41, 76.72, -7.75, 0.78)
pt3dadd(48.75, 77.19, -7.75, 0.78)
}
dend[89] {pt3dclear()
pt3dadd(48.75, 77.19, -7.75, 0.78)
}
}
proc shape3d_4() {
dend[89] { pt3dadd(50.05, 78.54, -7.83, 0.94)
}
dend[90] {pt3dclear()
pt3dadd(50.05, 78.54, -7.83, 0.94)
pt3dadd(52.66, 81.25, -8, 0.94)
}
dend[91] {pt3dclear()
pt3dadd(52.66, 81.25, -8, 0.94)
pt3dadd(53.44, 82.97, -8, 0.94)
pt3dadd(54.06, 84.22, -8, 0.94)
pt3dadd(55, 85.63, -8, 0.94)
pt3dadd(55.31, 86.09, -8, 0.94)
}
dend[92] {pt3dclear()
pt3dadd(52.66, 81.25, -8, 0.94)
pt3dadd(54.69, 81.88, -8, 0.94)
pt3dadd(56.56, 82.5, -8, 0.94)
pt3dadd(57.97, 83.91, -8, 0.94)
pt3dadd(58.44, 85.78, -8, 0.94)
}
dend[93] {pt3dclear()
pt3dadd(50.05, 78.54, -7.83, 0.94)
pt3dadd(51.72, 77.03, -7.75, 0.78)
pt3dadd(54.22, 77.5, -7.75, 0.78)
pt3dadd(55.47, 77.97, -7.75, 0.78)
pt3dadd(55.94, 78.91, -7.5, 0.78)
}
dend[94] {pt3dclear()
pt3dadd(55.94, 78.91, -7.5, 0.78)
pt3dadd(57.03, 79.84, -7.75, 0.78)
pt3dadd(58.13, 81.72, -7.75, 0.78)
pt3dadd(59.06, 82.81, -7.75, 0.78)
pt3dadd(59.69, 83.59, -8, 0.78)
}
dend[95] {pt3dclear()
pt3dadd(59.69, 83.59, -8, 0.78)
pt3dadd(62.03, 84.06, -8, 0.78)
pt3dadd(62.97, 85.31, -8, 0.78)
pt3dadd(62.97, 85.63, -8, 0.78)
pt3dadd(63.13, 86.72, -8, 0.78)
pt3dadd(63.13, 86.88, -8, 0.78)
pt3dadd(62.81, 88.28, -8, 0.78)
pt3dadd(62.81, 88.91, -8, 0.78)
}
dend[96] {pt3dclear()
pt3dadd(59.69, 83.59, -8, 0.78)
pt3dadd(59.84, 85.78, -7.75, 0.94)
pt3dadd(60, 87.5, -7.75, 0.94)
}
dend[97] {pt3dclear()
pt3dadd(55.94, 78.91, -7.5, 0.78)
pt3dadd(58.13, 78.44, -7.5, 0.78)
}
dend[98] {pt3dclear()
pt3dadd(58.13, 78.44, -7.5, 0.78)
pt3dadd(59.22, 78.13, -7.5, 0.78)
pt3dadd(61.25, 78.75, -7.5, 0.78)
pt3dadd(62.19, 78.75, -7.5, 0.78)
}
dend[99] {pt3dclear()
pt3dadd(62.19, 78.75, -7.5, 0.78)
pt3dadd(64.38, 78.91, -7.5, 0.78)
pt3dadd(66.72, 79.22, -7.5, 0.78)
pt3dadd(67.97, 79.53, -7.5, 0.78)
pt3dadd(68.28, 79.53, -7.5, 0.78)
pt3dadd(70, 79.53, -7.5, 0.78)
pt3dadd(71.72, 79.22, -7.5, 0.78)
pt3dadd(72.81, 79.22, -7.5, 0.78)
pt3dadd(74.84, 79.38, -7.5, 0.78)
pt3dadd(74.84, 79.53, -7.5, 0.78)
pt3dadd(75.47, 80.16, -7.5, 0.78)
pt3dadd(76.25, 80.94, -7.5, 0.78)
}
dend[100] {pt3dclear()
pt3dadd(62.19, 78.75, -7.5, 0.78)
pt3dadd(62.19, 81.25, -7.75, 0.78)
pt3dadd(62.19, 81.09, -7.75, 0.78)
pt3dadd(62.81, 82.03, -7.75, 0.78)
pt3dadd(63.91, 82.5, -7.75, 0.78)
pt3dadd(63.91, 82.34, -7.75, 0.78)
pt3dadd(65.16, 82.19, -7.75, 0.78)
pt3dadd(65.16, 82.03, -7.75, 0.78)
pt3dadd(65.78, 81.56, -7.75, 0.78)
pt3dadd(66.56, 80.78, -7.75, 0.78)
pt3dadd(66.41, 80.63, -7.75, 0.78)
pt3dadd(67.03, 80.31, -7.75, 0.78)
}
dend[101] {pt3dclear()
pt3dadd(58.13, 78.44, -7.5, 0.78)
pt3dadd(59.53, 76.72, -7.5, 0.78)
pt3dadd(60.63, 75.94, -7.5, 0.78)
pt3dadd(61.25, 75.47, -7.5, 0.78)
}
dend[102] {pt3dclear()
pt3dadd(48.75, 77.19, -7.75, 0.78)
pt3dadd(50.16, 75.94, -7.5, 0.78)
pt3dadd(51.72, 75.16, -7.5, 0.78)
pt3dadd(52.97, 75, -7.5, 0.78)
pt3dadd(54.38, 75, -7.5, 0.78)
pt3dadd(55.78, 75.16, -7.5, 0.78)
pt3dadd(56.56, 75.31, -7.5, 0.78)
pt3dadd(56.72, 75.31, -7.5, 0.78)
pt3dadd(58.28, 75.31, -7.5, 0.78)
pt3dadd(58.44, 75, -7.5, 0.78)
}
dend[103] {pt3dclear()
pt3dadd(41.88, 69.84, -7.5, 0.78)
pt3dadd(45.78, 70.78, -7.75, 0.94)
pt3dadd(45.63, 70.78, -7.75, 0.94)
}
dend[104] {pt3dclear()
pt3dadd(45.63, 70.78, -7.75, 0.94)
pt3dadd(46.56, 72.66, -7.75, 0.94)
pt3dadd(47.97, 74.38, -7.75, 0.94)
}
dend[105] {pt3dclear()
pt3dadd(45.63, 70.78, -7.75, 0.94)
pt3dadd(48.44, 71.25, -7.75, 0.94)
pt3dadd(49.26, 71.41, -7.75, 0.94)
}
dend[106] {pt3dclear()
pt3dadd(49.26, 71.41, -7.75, 0.94)
pt3dadd(50.94, 71.72, -7.75, 0.94)
pt3dadd(52.03, 71.88, -8, 0.94)
}
dend[107] {pt3dclear()
pt3dadd(52.03, 71.88, -8, 0.94)
pt3dadd(54.84, 70.47, -8, 0.94)
pt3dadd(54.69, 70.31, -8, 0.94)
pt3dadd(56.25, 69.84, -8, 0.94)
pt3dadd(57.81, 69.84, -8, 0.94)
pt3dadd(60.16, 70.31, -8, 0.94)
pt3dadd(60, 70.31, -8, 0.94)
pt3dadd(60.31, 70.31, -8.25, 0.94)
}
dend[108] {pt3dclear()
pt3dadd(60.31, 70.31, -8.25, 0.94)
pt3dadd(61.25, 69.06, -8.25, 1.25)
pt3dadd(62.5, 67.81, -8.25, 1.25)
pt3dadd(63.59, 66.56, -8.25, 1.25)
pt3dadd(64.69, 66.41, -8.25, 1.25)
}
dend[109] {pt3dclear()
pt3dadd(60.31, 70.31, -8.25, 0.94)
pt3dadd(61.56, 72.81, -8.25, 1.25)
pt3dadd(62.66, 74.69, -8.25, 1.25)
pt3dadd(63.91, 76.41, -8.25, 1.25)
}
dend[110] {pt3dclear()
pt3dadd(52.03, 71.88, -8, 0.94)
pt3dadd(53.91, 72.66, -8, 0.94)
pt3dadd(56.41, 73.28, -8, 0.94)
pt3dadd(58.44, 73.28, -8, 0.94)
pt3dadd(60, 73.59, -8, 0.94)
pt3dadd(60.94, 74.06, -8, 0.94)
}
dend[111] {pt3dclear()
pt3dadd(49.26, 71.41, -7.75, 0.94)
pt3dadd(49.96, 73.44, -7.75, 0.078)
}
dend[112] {pt3dclear()
pt3dadd(40.31, 68.75, -6.75, 0.78)
pt3dadd(39.69, 69.69, -6.75, 0.47)
pt3dadd(39.22, 70, -6.75, 0.47)
pt3dadd(39.22, 70.94, -6.25, 0.47)
}
dend[113] {pt3dclear()
pt3dadd(39.22, 70.94, -6.25, 0.47)
pt3dadd(39.53, 71.72, -6.75, 0.47)
pt3dadd(40.15, 73.59, -6.75, 0.47)
pt3dadd(40.47, 74.53, -6.75, 0.47)
}
dend[114] {pt3dclear()
pt3dadd(40.47, 74.53, -6.75, 0.47)
pt3dadd(41.88, 76.09, -6.75, 0.78)
pt3dadd(42.19, 77.5, -6.75, 0.78)
pt3dadd(42.66, 79.22, -6.75, 0.78)
pt3dadd(42.66, 79.84, -6.75, 0.78)
pt3dadd(42.07, 80.86, -6.75, 0.78)
pt3dadd(41.76, 81.48, -6.75, 0.78)
pt3dadd(41.68, 81.56, -6.75, 0.078)
pt3dadd(41.6, 81.64, -6.75, 0.078)
pt3dadd(41.29, 82.03, -6.75, 0.78)
pt3dadd(40.59, 82.5, -6.75, 0.78)
pt3dadd(40.2, 82.58, -6.75, 0.78)
}
dend[115] {pt3dclear()
pt3dadd(40.47, 74.53, -6.75, 0.47)
pt3dadd(39.69, 75.63, -6.25, 0.78)
pt3dadd(39.38, 76.72, -6.25, 0.78)
pt3dadd(39.38, 77.66, -6.25, 1.09)
pt3dadd(39.22, 77.66, -6.25, 1.09)
pt3dadd(39.38, 79.06, -6.25, 1.09)
pt3dadd(39.53, 80.31, -6.25, 1.09)
pt3dadd(39.69, 80.78, -6.25, 1.09)
}
dend[116] {pt3dclear()
pt3dadd(39.22, 70.94, -6.25, 0.47)
pt3dadd(38.13, 72.34, -6.5, 0.78)
pt3dadd(37.97, 72.34, -6.5, 0.78)
pt3dadd(37.65, 73.75, -6.5, 0.78)
pt3dadd(37.5, 73.75, -6.5, 0.78)
pt3dadd(37.5, 75.47, -6.5, 0.78)
pt3dadd(37.81, 77.19, -6.25, 0.47)
pt3dadd(37.65, 77.34, -6.25, 0.47)
pt3dadd(37.81, 78.44, -6.25, 0.47)
pt3dadd(37.65, 78.44, -6.25, 0.47)
pt3dadd(37.34, 79.53, -6.25, 0.47)
}
dend[117] {pt3dclear()
pt3dadd(37.77, 64.06, -6.75, 1.41)
pt3dadd(38.71, 62.81, -6.75, 0.23)
pt3dadd(39.57, 62.03, -6.75, 0.23)
pt3dadd(40.82, 61.64, -6.75, 0.23)
pt3dadd(42.46, 61.48, -7, 0.63)
pt3dadd(43.79, 61.64, -7, 0.63)
pt3dadd(44.34, 61.64, -7, 0.63)
}
dend[118] {pt3dclear()
pt3dadd(44.34, 61.64, -7, 0.63)
pt3dadd(46.05, 61.48, -7, 0.63)
pt3dadd(47.3, 60.94, -7, 0.63)
pt3dadd(48.16, 60.39, -7, 0.63)
pt3dadd(48.4, 59.69, -7, 0.63)
}
dend[119] {pt3dclear()
pt3dadd(48.4, 59.69, -7, 0.63)
pt3dadd(49.93, 59.37, -7, 0.78)
}
dend[120] {pt3dclear()
pt3dadd(49.93, 59.37, -7, 0.78)
pt3dadd(50.74, 58.59, -7, 0.78)
pt3dadd(51.29, 57.66, -7, 0.78)
pt3dadd(51.37, 57.42, -7, 0.78)
}
dend[121] {pt3dclear()
pt3dadd(49.93, 59.37, -7, 0.78)
pt3dadd(47.3, 57.34, -7, 0.78)
pt3dadd(46.45, 56.88, -7, 0.78)
pt3dadd(45.59, 56.56, -7, 0.78)
pt3dadd(44.73, 56.64, -7, 0.78)
pt3dadd(43.95, 56.56, -7, 0.78)
}
dend[122] {pt3dclear()
pt3dadd(48.4, 59.69, -7, 0.63)
pt3dadd(46.99, 59.3, -7, 0.63)
pt3dadd(45.74, 59.14, -7, 0.63)
pt3dadd(44.8, 58.91, -7, 0.63)
pt3dadd(43.95, 58.83, -7, 0.63)
}
dend[123] {pt3dclear()
pt3dadd(44.34, 61.64, -7, 0.63)
pt3dadd(44.41, 60.63, -7.25, 0.47)
pt3dadd(45.27, 59.84, -7.25, 0.47)
pt3dadd(45.98, 59.45, -7.25, 0.47)
pt3dadd(46.6, 58.75, -7.25, 0.47)
pt3dadd(46.91, 58.2, -7.25, 0.47)
}
dend[124] {pt3dclear()
pt3dadd(35.51, 62.73, -7.25, 1.41)
pt3dadd(35.94, 64.69, -7.25, 0.63)
pt3dadd(36.4, 67.5, -7.25, 0.63)
pt3dadd(36.25, 67.5, -7.25, 0.63)
pt3dadd(36.72, 69.38, -7.25, 0.63)
}
dend[125] {pt3dclear()
pt3dadd(36.72, 69.38, -7.25, 0.63)
pt3dadd(37.81, 71.25, -7.25, 0.63)
pt3dadd(37.65, 71.09, -7.25, 0.63)
}
dend[126] {pt3dclear()
pt3dadd(36.72, 69.38, -7.25, 0.63)
pt3dadd(36.09, 70.63, -7.25, 0.94)
pt3dadd(35.78, 71.88, -7.25, 0.94)
}
}
proc shape3d_5() {
dend[126] { pt3dadd(35.78, 72.03, -7.25, 0.94)
pt3dadd(35.78, 74.06, -7.25, 0.94)
pt3dadd(36.09, 75.78, -7.25, 0.94)
pt3dadd(36.25, 77.81, -7.25, 0.94)
pt3dadd(36.4, 78.59, -7.25, 0.94)
}
dend[127] {pt3dclear()
pt3dadd(31.25, 56.41, -7.5, 1.56)
pt3dadd(33.9, 55.63, -7.75, 1.41)
pt3dadd(36.88, 55, -7.75, 1.25)
pt3dadd(40.63, 55, -7.75, 1.25)
pt3dadd(45.47, 55.31, -8, 1.09)
pt3dadd(46.84, 55.63, -8.5, 1.09)
}
dend[128] {pt3dclear()
pt3dadd(46.84, 55.63, -8.5, 1.09)
pt3dadd(48.91, 56.09, -8, 1.09)
pt3dadd(49.06, 56.09, -8, 1.09)
pt3dadd(52.03, 56.56, -8, 1.09)
pt3dadd(54.22, 56.25, -8, 1.09)
pt3dadd(56.88, 56.09, -8, 1.09)
pt3dadd(56.88, 55.94, -8, 1.09)
pt3dadd(58.36, 55.63, -10.5, 1.09)
}
dend[129] {pt3dclear()
pt3dadd(58.36, 55.63, -10.5, 1.09)
pt3dadd(59.06, 55.47, -8, 1.09)
pt3dadd(60.16, 55.47, -8, 1.09)
}
dend[130] {pt3dclear()
pt3dadd(58.36, 55.63, -10.5, 1.09)
pt3dadd(58.48, 54.22, -6.5, 0.63)
pt3dadd(58.95, 51.95, -6.5, 0.63)
}
dend[131] {pt3dclear()
pt3dadd(58.95, 51.95, -6.5, 0.63)
pt3dadd(60.59, 52.27, -6.5, 0.63)
pt3dadd(61.99, 52.11, -6.5, 0.63)
pt3dadd(63.55, 51.88, -6.5, 0.63)
pt3dadd(64.8, 52.03, -6.5, 0.63)
pt3dadd(65.47, 52.42, -6.75, 0.63)
}
dend[132] {pt3dclear()
pt3dadd(65.47, 52.42, -6.75, 0.63)
pt3dadd(65.98, 52.58, -6.5, 0.63)
pt3dadd(66.59, 53.13, -6.5, 0.63)
pt3dadd(67.45, 54.38, -6, 0.63)
pt3dadd(68.55, 55.63, -6, 0.63)
pt3dadd(68.79, 55.7, -6, 0.63)
pt3dadd(69.26, 56.09, -6, 0.63)
}
dend[133] {pt3dclear()
pt3dadd(65.47, 52.42, -6.75, 0.63)
pt3dadd(66.41, 51.48, -6.75, 0.158)
pt3dadd(67.11, 50.47, -6.75, 0.158)
pt3dadd(68.52, 49.45, -6.75, 0.158)
pt3dadd(69.45, 48.67, -6.75, 0.158)
pt3dadd(69.53, 48.59, -6.75, 0.158)
pt3dadd(70.63, 47.89, -6.75, 0.158)
pt3dadd(70.7, 47.81, -6.75, 0.158)
pt3dadd(72.5, 47.58, -6.75, 0.158)
pt3dadd(72.66, 47.58, -6.75, 0.158)
}
dend[134] {pt3dclear()
pt3dadd(58.95, 51.95, -6.5, 0.63)
pt3dadd(59.1, 50.47, -6.75, 0.63)
pt3dadd(59.34, 50, -6.75, 0.63)
}
dend[135] {pt3dclear()
pt3dadd(59.34, 50, -6.75, 0.63)
pt3dadd(57.85, 49.3, -6.75, 0.63)
pt3dadd(57.23, 47.97, -6.75, 0.63)
pt3dadd(57.15, 46.64, -6.75, 0.63)
pt3dadd(57.15, 46.48, -6.75, 0.63)
pt3dadd(57.07, 45, -6.75, 0.63)
pt3dadd(56.99, 43.75, -6.75, 0.63)
pt3dadd(56.99, 42.58, -6.75, 0.63)
pt3dadd(56.37, 41.8, -6.75, 0.63)
}
dend[136] {pt3dclear()
pt3dadd(59.34, 50, -6.75, 0.63)
pt3dadd(60.23, 49.3, -7.75, 0.158)
pt3dadd(61.17, 48.67, -7.75, 0.158)
pt3dadd(61.95, 48.13, -7.75, 0.158)
pt3dadd(62.27, 47.97, -7.75, 0.158)
}
dend[137] {pt3dclear()
pt3dadd(62.27, 47.97, -7.75, 0.158)
pt3dadd(63.28, 48.52, -7.75, 0.158)
pt3dadd(63.91, 48.83, -7.75, 0.158)
pt3dadd(64.14, 48.83, -7.75, 0.158)
pt3dadd(64.3, 48.91, -7.75, 0.158)
pt3dadd(64.77, 49.06, -7.75, 0.158)
pt3dadd(65.08, 49.14, -7.75, 0.158)
pt3dadd(65.31, 49.14, -7.75, 0.158)
pt3dadd(65.94, 49.3, -7.75, 0.158)
pt3dadd(66.56, 49.45, -7.75, 0.158)
pt3dadd(66.88, 49.53, -7.75, 0.158)
pt3dadd(67.58, 49.77, -7.75, 0.158)
pt3dadd(67.73, 49.77, -7.75, 0.158)
pt3dadd(67.97, 50, -7.75, 0.158)
pt3dadd(68.05, 50.08, -7.75, 0.158)
pt3dadd(68.52, 50.39, -7.75, 0.158)
pt3dadd(68.75, 50.47, -7.75, 0.158)
pt3dadd(69.06, 50.86, -7.75, 0.158)
}
dend[138] {pt3dclear()
pt3dadd(62.27, 47.97, -7.75, 0.158)
pt3dadd(62.5, 46.64, -7.25, 0.158)
pt3dadd(62.5, 46.48, -7.25, 0.158)
pt3dadd(62.81, 45.86, -7.25, 0.158)
pt3dadd(63.28, 45.39, -7.25, 0.158)
pt3dadd(63.52, 44.69, -7.25, 0.158)
pt3dadd(63.52, 44.53, -7.25, 0.158)
pt3dadd(63.59, 43.44, -7.25, 0.158)
pt3dadd(63.59, 43.2, -7.25, 0.158)
pt3dadd(63.91, 42.34, -7.25, 0.158)
pt3dadd(63.91, 42.11, -7.25, 0.158)
pt3dadd(64.69, 41.64, -7.25, 0.158)
pt3dadd(64.92, 41.64, -7.25, 0.158)
pt3dadd(65.39, 41.56, -7.25, 0.158)
pt3dadd(65.63, 41.64, -7.25, 0.158)
pt3dadd(65.86, 41.64, -7.25, 0.158)
pt3dadd(66.25, 41.8, -7.25, 0.158)
pt3dadd(66.48, 41.88, -7.25, 0.158)
pt3dadd(66.72, 41.95, -7.25, 0.158)
pt3dadd(67.27, 42.03, -7.25, 0.158)
pt3dadd(67.42, 42.19, -7.25, 0.158)
pt3dadd(67.81, 42.58, -7.25, 0.158)
pt3dadd(68.36, 42.66, -7.25, 0.158)
}
dend[139] {pt3dclear()
pt3dadd(46.84, 55.63, -8.5, 1.09)
pt3dadd(48.01, 54.38, -8.5, 0.47)
pt3dadd(49.34, 53.52, -8.5, 0.47)
pt3dadd(51.21, 52.34, -8.5, 0.47)
pt3dadd(53.24, 52.42, -8.5, 0.47)
pt3dadd(53.32, 52.5, -8.5, 0.47)
pt3dadd(54.41, 53.05, -8.5, 0.47)
pt3dadd(54.57, 53.13, -8.5, 0.47)
pt3dadd(54.88, 53.28, -8.5, 0.47)
pt3dadd(55.35, 53.52, -8.5, 0.47)
pt3dadd(55.82, 53.59, -8.25, 0.47)
}
dend[140] {pt3dclear()
pt3dadd(22.97, 53.91, -6.25, 1.72)
pt3dadd(22.03, 55.78, -6.25, 0.78)
pt3dadd(23.13, 57.97, -6.25, 0.78)
}
dend[141] {pt3dclear()
pt3dadd(23.13, 57.97, -6.25, 0.78)
pt3dadd(24.69, 58.44, -6.25, 0.63)
pt3dadd(25.47, 58.91, -6.25, 0.63)
pt3dadd(26.41, 59.69, -6.25, 0.63)
pt3dadd(26.88, 60.16, -6.25, 0.63)
pt3dadd(27.03, 60.47, -6.25, 0.63)
pt3dadd(27.81, 61.25, -6.25, 0.63)
pt3dadd(28.28, 61.25, -6.25, 0.63)
pt3dadd(29.22, 61.09, -6.25, 0.63)
pt3dadd(30.16, 60.78, -6.25, 0.63)
}
dend[142] {pt3dclear()
pt3dadd(23.13, 57.97, -6.25, 0.78)
pt3dadd(23.28, 60.47, -6, 0.78)
pt3dadd(23.13, 60.47, -6, 0.78)
pt3dadd(23.91, 62.19, -6, 0.78)
pt3dadd(25.16, 63.44, -6, 0.78)
pt3dadd(25.16, 63.59, -6, 0.78)
pt3dadd(25.47, 64.53, -6, 0.78)
}
dend[143] {pt3dclear()
pt3dadd(25.47, 64.53, -6, 0.78)
pt3dadd(25.16, 66.41, -6, 0.78)
pt3dadd(25.16, 68.75, -6, 0.78)
pt3dadd(25.35, 69.53, -7.25, 0.78)
}
dend[144] {pt3dclear()
pt3dadd(25.35, 69.53, -7.25, 0.78)
pt3dadd(25.63, 70, -5.75, 0.78)
}
dend[145] {pt3dclear()
pt3dadd(25.63, 70, -5.75, 0.78)
pt3dadd(26.56, 71.41, -5.75, 0.78)
pt3dadd(26.88, 73.28, -5.75, 0.78)
pt3dadd(26.41, 74.22, -5.75, 0.78)
}
dend[146] {pt3dclear()
pt3dadd(25.63, 70, -5.75, 0.78)
pt3dadd(25.16, 72.5, -6, 0.78)
pt3dadd(25, 72.5, -6, 0.78)
pt3dadd(24.84, 74.22, -6, 0.78)
}
dend[147] {pt3dclear()
pt3dadd(25.35, 69.53, -7.25, 0.78)
pt3dadd(24.69, 69.84, -7.25, 0.47)
pt3dadd(23.4, 71.56, -8.25, 0.47)
}
dend[148] {pt3dclear()
pt3dadd(23.4, 71.56, -8.25, 0.47)
pt3dadd(22.03, 73.44, -7.25, 0.47)
}
dend[149] {pt3dclear()
pt3dadd(22.03, 73.44, -7.25, 0.47)
pt3dadd(20, 74.53, -7.25, 0.47)
pt3dadd(19.22, 75.47, -7.25, 0.47)
pt3dadd(18.75, 76.25, -7.25, 0.47)
pt3dadd(18.28, 76.88, -7.25, 0.47)
pt3dadd(17.66, 79.06, -7, 0.47)
pt3dadd(17.5, 80.63, -7, 0.47)
pt3dadd(17.34, 80.78, -7, 0.47)
pt3dadd(16.88, 81.72, -7, 0.47)
pt3dadd(16.72, 81.88, -7, 0.47)
pt3dadd(16.55, 82.66, -7, 0.63)
pt3dadd(16.25, 83.91, -7, 0.63)
pt3dadd(16.09, 83.91, -7, 0.63)
pt3dadd(15.94, 84.69, -7, 0.63)
pt3dadd(15.78, 84.84, -7, 0.63)
pt3dadd(15.47, 85.94, -7, 0.63)
pt3dadd(15.47, 87.03, -7, 0.63)
}
dend[150] {pt3dclear()
pt3dadd(22.03, 73.44, -7.25, 0.47)
pt3dadd(22.34, 78.75, -7.25, 1.09)
}
dend[151] {pt3dclear()
pt3dadd(22.34, 78.75, -7.25, 1.09)
pt3dadd(24.53, 79.53, -7.25, 1.09)
pt3dadd(25.63, 81.09, -7.25, 1.09)
pt3dadd(25.63, 81.25, -7.25, 1.09)
pt3dadd(25.94, 83.28, -7.5, 1.09)
pt3dadd(26.25, 84.84, -7.5, 1.09)
}
dend[152] {pt3dclear()
pt3dadd(22.34, 78.75, -7.25, 1.09)
pt3dadd(22.19, 80.94, -7.25, 0.63)
}
dend[153] {pt3dclear()
pt3dadd(22.19, 80.94, -7.25, 0.63)
pt3dadd(20.47, 82.34, -7.25, 0.63)
pt3dadd(19.53, 83.44, -7.25, 0.63)
pt3dadd(19.38, 83.59, -7.25, 0.63)
pt3dadd(18.75, 84.53, -7.25, 0.63)
pt3dadd(18.59, 84.84, -7.25, 0.63)
pt3dadd(18.44, 85, -7.25, 0.63)
pt3dadd(17.97, 86.41, -7.25, 0.63)
}
dend[154] {pt3dclear()
pt3dadd(22.19, 80.94, -7.25, 0.63)
pt3dadd(22.03, 84.38, -7.25, 0.78)
pt3dadd(21.72, 86.09, -7.25, 0.78)
pt3dadd(21.09, 86.72, -7.25, 0.78)
pt3dadd(20.3, 87.5, -7, 0.78)
}
dend[155] {pt3dclear()
pt3dadd(20.3, 87.5, -7, 0.78)
pt3dadd(19.69, 88.59, -7.25, 0.78)
pt3dadd(19.53, 88.59, -7.25, 0.78)
pt3dadd(18.59, 89.38, -7.25, 0.78)
}
}
proc shape3d_6() {
dend[155] { }
dend[156] {pt3dclear()
pt3dadd(18.59, 89.38, -7.25, 0.78)
pt3dadd(15.47, 89.84, -7, 0.78)
pt3dadd(15.47, 90, -7, 0.78)
}
dend[157] {pt3dclear()
pt3dadd(18.59, 89.38, -7.25, 0.78)
pt3dadd(16.55, 94.84, -7.25, 0.78)
}
dend[158] {pt3dclear()
pt3dadd(20.3, 87.5, -7, 0.78)
pt3dadd(21.41, 89.06, -7, 0.94)
pt3dadd(22.34, 91.56, -7, 0.94)
pt3dadd(22.19, 91.56, -7, 0.94)
pt3dadd(22.66, 94.22, -7, 0.94)
pt3dadd(22.5, 94.22, -7, 0.94)
pt3dadd(22.66, 97.03, -7, 0.94)
pt3dadd(22.34, 99.69, -7, 0.94)
pt3dadd(22.34, 100.9, -7, 0.94)
pt3dadd(22.34, 100.8, -7, 0.94)
}
dend[159] {pt3dclear()
pt3dadd(23.4, 71.56, -8.25, 0.47)
pt3dadd(23.55, 72.5, -8.25, 0.39)
pt3dadd(23.55, 73.05, -8.25, 0.39)
pt3dadd(23.55, 73.2, -8.25, 0.39)
pt3dadd(23.55, 73.83, -8.25, 0.39)
pt3dadd(23.71, 74.53, -8.25, 0.39)
pt3dadd(23.71, 74.77, -8.25, 0.39)
pt3dadd(23.87, 75.08, -8.25, 0.39)
pt3dadd(23.87, 75.23, -8.25, 0.39)
pt3dadd(23.95, 75.31, -8.25, 0.39)
pt3dadd(24.26, 75.94, -8.25, 0.39)
pt3dadd(24.34, 76.09, -8.25, 0.39)
pt3dadd(24.41, 76.17, -8.25, 0.39)
pt3dadd(24.65, 76.72, -8.25, 0.39)
pt3dadd(25.66, 77.58, -8.25, 0.39)
pt3dadd(26.45, 78.67, -8.25, 0.39)
pt3dadd(26.52, 79.3, -8.25, 0.39)
}
dend[160] {pt3dclear()
pt3dadd(25.47, 64.53, -6, 0.78)
pt3dadd(27.5, 65, -6, 0.78)
}
dend[161] {pt3dclear()
pt3dadd(27.5, 65, -6, 0.78)
pt3dadd(28.13, 66.88, -6, 0.94)
pt3dadd(28.59, 68.59, -6, 0.94)
}
dend[162] {pt3dclear()
pt3dadd(28.59, 68.59, -6, 0.94)
pt3dadd(28.75, 70.16, -6, 0.94)
pt3dadd(28.59, 70.16, -6, 0.94)
pt3dadd(28.75, 71.41, -6, 0.94)
pt3dadd(28.75, 71.56, -6, 0.94)
pt3dadd(29.69, 73.13, -6, 0.94)
pt3dadd(30.63, 73.75, -6, 0.94)
pt3dadd(30.78, 73.91, -6, 0.94)
pt3dadd(30.94, 73.91, -6, 0.94)
pt3dadd(32.03, 75.31, -6.25, 0.94)
pt3dadd(32.81, 76.56, -6.25, 0.94)
pt3dadd(33.13, 78.13, -6.25, 0.94)
pt3dadd(33.13, 78.28, -6.25, 0.94)
pt3dadd(32.97, 79.38, -6.25, 0.94)
pt3dadd(32.97, 80.78, -6.25, 0.94)
pt3dadd(32.65, 82.5, -6.25, 0.94)
}
dend[163] {pt3dclear()
pt3dadd(28.59, 68.59, -6, 0.94)
pt3dadd(30.47, 69.69, -6.25, 0.78)
pt3dadd(31.56, 71.41, -6.25, 0.78)
pt3dadd(31.72, 72.66, -6.25, 0.78)
}
dend[164] {pt3dclear()
pt3dadd(27.5, 65, -6, 0.78)
pt3dadd(30.78, 65.16, -6.25, 0.94)
}
dend[165] {pt3dclear()
pt3dadd(30.78, 65.16, -6.25, 0.94)
pt3dadd(31.25, 66.88, -6.25, 0.78)
pt3dadd(31.25, 67.03, -6.25, 0.78)
pt3dadd(31.88, 67.81, -6.25, 0.78)
pt3dadd(32.81, 68.91, -6.25, 0.78)
pt3dadd(32.65, 68.91, -6.25, 0.78)
pt3dadd(32.65, 69.53, -6.25, 0.78)
}
dend[166] {pt3dclear()
pt3dadd(30.78, 65.16, -6.25, 0.94)
pt3dadd(33.44, 65.31, -6.25, 0.78)
pt3dadd(35, 65.47, -6.25, 0.78)
pt3dadd(36.72, 64.53, -6, 0.78)
pt3dadd(37.19, 63.44, -6, 0.78)
pt3dadd(37.34, 62.19, -6, 0.78)
pt3dadd(37.34, 62.34, -6, 0.78)
pt3dadd(36.88, 61.41, -6, 0.78)
}
dend[167] {pt3dclear()
pt3dadd(21.13, 52.68, -7.75, 1.72)
pt3dadd(20.16, 53.44, -7.75, 0.78)
pt3dadd(20, 53.44, -7.75, 0.78)
pt3dadd(18.28, 55.31, -7.75, 0.78)
}
dend[168] {pt3dclear()
pt3dadd(18.28, 55.31, -7.75, 0.78)
pt3dadd(18.59, 57.19, -7.75, 0.78)
pt3dadd(18.91, 58.13, -7.75, 0.78)
pt3dadd(19.53, 59.69, -7.75, 0.78)
pt3dadd(19.53, 60.63, -7.5, 0.78)
}
dend[169] {pt3dclear()
pt3dadd(19.53, 60.63, -7.5, 0.78)
pt3dadd(22.03, 60.78, -7.5, 0.94)
}
dend[170] {pt3dclear()
pt3dadd(19.53, 60.63, -7.5, 0.78)
pt3dadd(19.53, 62.03, -7.5, 0.94)
}
dend[171] {pt3dclear()
pt3dadd(19.53, 62.03, -7.5, 0.94)
pt3dadd(18.75, 65.63, -7.5, 0.94)
}
dend[172] {pt3dclear()
pt3dadd(18.75, 65.63, -7.5, 0.94)
pt3dadd(17.34, 67.5, -7.5, 0.94)
pt3dadd(17.19, 69.84, -7.5, 0.94)
pt3dadd(17.19, 70, -7.5, 0.94)
pt3dadd(17.5, 71.25, -7.5, 0.94)
pt3dadd(17.8, 75.63, -7.25, 0.94)
}
dend[173] {pt3dclear()
pt3dadd(18.75, 65.63, -7.5, 0.94)
pt3dadd(20.47, 68.13, -7.5, 0.94)
}
dend[174] {pt3dclear()
pt3dadd(19.53, 62.03, -7.5, 0.94)
pt3dadd(21.25, 65, -7.25, 0.94)
pt3dadd(21.41, 66.56, -7.25, 0.94)
pt3dadd(21.41, 67.97, -7.25, 0.94)
pt3dadd(21.25, 67.97, -7.25, 0.94)
}
dend[175] {pt3dclear()
pt3dadd(18.28, 55.31, -7.75, 0.78)
pt3dadd(16.55, 56.25, -7.5, 0.94)
pt3dadd(16.25, 57.03, -7.5, 0.94)
pt3dadd(16.09, 57.19, -7.5, 0.94)
pt3dadd(16.01, 57.26, -7.5, 0.94)
pt3dadd(15.82, 57.73, -9, 0.94)
}
dend[176] {pt3dclear()
pt3dadd(15.82, 57.73, -9, 0.94)
pt3dadd(15.63, 58.44, -7.5, 0.94)
pt3dadd(15.16, 59.69, -7.5, 0.94)
pt3dadd(14.53, 60.94, -7.5, 0.94)
pt3dadd(14.38, 60.94, -7.5, 0.94)
pt3dadd(13.91, 61.41, -7.5, 0.94)
}
dend[177] {pt3dclear()
pt3dadd(13.91, 61.41, -7.5, 0.94)
pt3dadd(14.06, 62.66, -7.5, 0.94)
pt3dadd(14.06, 63.91, -7.5, 0.94)
pt3dadd(14.22, 64.06, -7.5, 0.94)
pt3dadd(14.69, 65, -7.5, 0.94)
pt3dadd(15.31, 66.09, -7.5, 0.94)
pt3dadd(15.31, 66.41, -7.5, 0.94)
pt3dadd(15.16, 67.97, -7.5, 0.94)
}
dend[178] {pt3dclear()
pt3dadd(13.91, 61.41, -7.5, 0.94)
pt3dadd(13.09, 60.47, -7, 0.56)
pt3dadd(11.76, 60, -7, 0.54)
pt3dadd(10.9, 59.61, -7, 0.54)
pt3dadd(10.27, 59.06, -7, 0.54)
pt3dadd(9.41, 58.83, -7, 0.54)
pt3dadd(9.34, 58.75, -7, 0.078)
pt3dadd(9.02, 58.59, -7, 0.54)
}
dend[179] {pt3dclear()
pt3dadd(15.82, 57.73, -9, 0.94)
pt3dadd(16.68, 58.67, -9, 0.55)
pt3dadd(17.23, 59.38, -9, 0.55)
pt3dadd(17.3, 59.53, -9, 0.55)
pt3dadd(17.54, 60, -9, 0.55)
pt3dadd(17.54, 60.23, -9, 0.55)
pt3dadd(17.46, 61.02, -9, 0.55)
pt3dadd(17.38, 61.09, -9, 0.55)
pt3dadd(17.23, 62.03, -9, 0.55)
pt3dadd(17.23, 62.27, -9, 0.55)
pt3dadd(17.07, 63.13, -9, 0.55)
pt3dadd(16.98, 63.44, -9, 0.55)
}
dend[180] {pt3dclear()
pt3dadd(18.93, 48.65, -7.75, 1.72)
pt3dadd(17.66, 49.22, -7.75, 0.94)
pt3dadd(14.69, 51.72, -7.75, 0.94)
pt3dadd(14.53, 51.72, -7.75, 0.78)
pt3dadd(12.97, 52.97, -7.75, 0.94)
}
dend[181] {pt3dclear()
pt3dadd(12.97, 52.97, -7.75, 0.94)
pt3dadd(11.91, 54.32, -7.75, 0.86)
}
dend[182] {pt3dclear()
pt3dadd(11.91, 54.32, -7.75, 0.86)
pt3dadd(11.25, 55.16, -7.75, 0.86)
pt3dadd(9.38, 56.41, -7.75, 0.86)
pt3dadd(8.36, 57.5, -7.75, 0.86)
pt3dadd(8.24, 57.81, -8, 0.54)
}
dend[183] {pt3dclear()
pt3dadd(8.24, 57.81, -8, 0.54)
pt3dadd(7.5, 60.31, -7.75, 0.158)
pt3dadd(7.03, 62.81, -7.75, 0.158)
pt3dadd(7.03, 62.97, -7.75, 0.158)
pt3dadd(6.88, 64.84, -7.75, 0.158)
pt3dadd(6.88, 65.31, -7.75, 0.158)
pt3dadd(7.03, 66.09, -7.75, 0.158)
}
dend[184] {pt3dclear()
pt3dadd(8.24, 57.81, -8, 0.54)
pt3dadd(7.66, 58.13, -8, 0.86)
pt3dadd(5.78, 60.31, -8, 0.86)
pt3dadd(4.53, 62.19, -8, 0.86)
pt3dadd(3.55, 63.44, -7.75, 0.86)
pt3dadd(3.4, 63.52, -7.75, 0.86)
pt3dadd(2.77, 64.14, -7.75, 0.86)
pt3dadd(2.46, 64.69, -7.75, 0.86)
}
dend[185] {pt3dclear()
pt3dadd(2.46, 64.69, -7.75, 0.86)
pt3dadd(2.76, 66.38, -7.75, 0.86)
}
dend[186] {pt3dclear()
pt3dadd(2.76, 66.38, -7.75, 0.86)
pt3dadd(2.93, 68.13, -7.75, 0.86)
pt3dadd(2.93, 68.36, -7.75, 0.86)
pt3dadd(2.85, 68.52, -7.75, 0.86)
pt3dadd(2.7, 69.77, -7.75, 0.86)
pt3dadd(2.7, 70.08, -7.75, 0.86)
pt3dadd(2.62, 70.16, -7.75, 0.86)
pt3dadd(2.54, 71.25, -7.75, 0.86)
pt3dadd(2.54, 71.41, -7.75, 0.86)
pt3dadd(2.38, 71.56, -7.75, 0.86)
pt3dadd(1.68, 73.13, -7.75, 0.86)
pt3dadd(1.52, 73.28, -7.75, 0.86)
pt3dadd(0.74, 74.53, -7.75, 0.86)
pt3dadd(0.66, 74.69, -7.75, 0.86)
pt3dadd(0.27, 75.78, -7.75, 0.86)
pt3dadd(0.2, 75.86, -7.75, 0.86)
pt3dadd(-0.12, 76.48, -7.75, 0.86)
}
dend[187] {pt3dclear()
pt3dadd(2.76, 66.38, -7.75, 0.86)
pt3dadd(1.52, 63.75, -7.25, 0.63)
pt3dadd(0.12, 63.13, -7.25, 0.63)
pt3dadd(0.03, 63.05, -7.25, 0.86)
pt3dadd(-1.76, 62.73, -7.25, 0.63)
pt3dadd(-2.93, 63.36, -7.25, 0.63)
pt3dadd(-2.62, 63.13, -7.25, 0.86)
pt3dadd(-3.87, 63.83, -7.25, 0.63)
pt3dadd(-4.57, 64.22, -7.25, 0.63)
pt3dadd(-4.73, 64.22, -7.25, 0.63)
pt3dadd(-5.59, 65.54, -7.25, 0.63)
}
dend[188] {pt3dclear()
pt3dadd(-5.59, 65.54, -7.25, 0.63)
}
}
proc shape3d_7() {
dend[188] { pt3dadd(-6.37, 64.92, -7.25, 0.63)
pt3dadd(-7.23, 64.92, -7.25, 0.63)
pt3dadd(-8.48, 64.69, -7.25, 0.63)
pt3dadd(-9.26, 64.92, -7.25, 0.63)
pt3dadd(-10.03, 64.61, -7.25, 0.63)
pt3dadd(-10.35, 64.61, -7.25, 0.63)
pt3dadd(-10.43, 64.69, -7.25, 0.86)
pt3dadd(-12.15, 65.08, -7.25, 0.86)
pt3dadd(-12.38, 65.08, -7.25, 0.63)
pt3dadd(-13.32, 65.47, -7.25, 0.63)
}
dend[189] {pt3dclear()
pt3dadd(-5.59, 65.54, -7.25, 0.63)
pt3dadd(-4.96, 67.27, -7, 0.63)
pt3dadd(-5.04, 67.5, -7, 0.63)
pt3dadd(-5.12, 67.58, -7, 0.63)
pt3dadd(-5.2, 68.13, -7, 0.63)
pt3dadd(-5.35, 68.2, -7, 0.86)
pt3dadd(-5.82, 69.14, -7, 0.63)
pt3dadd(-6.13, 69.38, -7, 0.63)
pt3dadd(-6.45, 69.84, -7, 0.63)
pt3dadd(-6.52, 69.92, -7, 0.63)
pt3dadd(-6.99, 70.94, -7, 0.63)
}
dend[190] {pt3dclear()
pt3dadd(2.46, 64.69, -7.75, 0.86)
pt3dadd(1.29, 65.23, -6, 0.86)
pt3dadd(0.27, 66.09, -6, 0.86)
pt3dadd(0.12, 66.17, -6, 0.86)
pt3dadd(-0.59, 66.95, -6, 0.86)
}
dend[191] {pt3dclear()
pt3dadd(11.91, 54.32, -7.75, 0.86)
pt3dadd(14.22, 54.38, -7.75, 0.56)
pt3dadd(13.59, 57.03, -7.75, 0.56)
pt3dadd(13.44, 59.38, -7.75, 0.56)
pt3dadd(12.66, 61.41, -7.25, 0.56)
pt3dadd(12.3, 61.95, -7.25, 0.56)
}
dend[192] {pt3dclear()
pt3dadd(12.3, 61.95, -7.25, 0.56)
pt3dadd(11.95, 62.58, -7.25, 1.25)
pt3dadd(11.25, 63.91, -7.25, 1.25)
}
dend[193] {pt3dclear()
pt3dadd(11.25, 63.91, -7.25, 1.25)
pt3dadd(9.84, 65.78, -7.25, 1.09)
pt3dadd(9.69, 65.78, -7.25, 1.09)
pt3dadd(8.91, 67.81, -7.25, 1.09)
pt3dadd(8.75, 67.97, -7.25, 1.09)
}
dend[194] {pt3dclear()
pt3dadd(8.75, 67.97, -7.25, 1.09)
pt3dadd(7.34, 68.44, -7.25, 1.09)
}
dend[195] {pt3dclear()
pt3dadd(7.34, 68.44, -7.25, 1.09)
pt3dadd(6.56, 70.16, -7.25, 1.09)
pt3dadd(5.47, 71.25, -7.25, 1.09)
pt3dadd(5.31, 71.25, -7.25, 1.09)
pt3dadd(4.84, 71.41, -7.25, 1.09)
pt3dadd(4.69, 71.41, -7.25, 1.09)
}
dend[196] {pt3dclear()
pt3dadd(7.34, 68.44, -7.25, 1.09)
pt3dadd(5.94, 66.88, -7.25, 1.09)
pt3dadd(5.94, 66.72, -7.25, 1.09)
pt3dadd(5.31, 66.25, -7.25, 1.09)
}
dend[197] {pt3dclear()
pt3dadd(8.75, 67.97, -7.25, 1.09)
pt3dadd(8.75, 70.63, -7.25, 0.94)
}
dend[198] {pt3dclear()
pt3dadd(8.75, 70.63, -7.25, 0.94)
pt3dadd(11.09, 72.66, -7.25, 0.94)
pt3dadd(12.5, 74.69, -7.25, 0.94)
pt3dadd(12.34, 74.84, -7.25, 0.94)
pt3dadd(12.66, 76.41, -7.25, 0.94)
pt3dadd(12.66, 76.56, -7.25, 0.94)
pt3dadd(13.13, 77.97, -7.25, 0.94)
pt3dadd(13.13, 78.13, -7.25, 0.94)
pt3dadd(13.28, 80.47, -7.25, 0.94)
}
dend[199] {pt3dclear()
pt3dadd(13.28, 80.47, -7.25, 0.94)
pt3dadd(13.13, 82.81, -7.25, 0.94)
pt3dadd(12.97, 82.81, -7.25, 0.94)
}
dend[200] {pt3dclear()
pt3dadd(13.28, 80.47, -7.25, 0.94)
pt3dadd(15, 81.72, -7.25, 0.94)
}
dend[201] {pt3dclear()
pt3dadd(8.75, 70.63, -7.25, 0.94)
pt3dadd(7.66, 72.97, -7.25, 0.94)
}
dend[202] {pt3dclear()
pt3dadd(7.66, 72.97, -7.25, 0.94)
pt3dadd(10, 75.94, -7.25, 0.94)
pt3dadd(10, 78.75, -7.25, 0.94)
pt3dadd(10.31, 81.09, -7.25, 0.94)
pt3dadd(10.94, 82.97, -7.25, 0.94)
pt3dadd(10.94, 83.28, -7.25, 0.94)
pt3dadd(11.41, 84.38, -7.25, 0.94)
pt3dadd(11.41, 84.53, -7.25, 0.94)
pt3dadd(12.03, 86.25, -7.25, 0.94)
pt3dadd(12.34, 86.88, -7.25, 0.94)
}
dend[203] {pt3dclear()
pt3dadd(7.66, 72.97, -7.25, 0.94)
pt3dadd(7.03, 74.53, -7.25, 0.94)
}
dend[204] {pt3dclear()
pt3dadd(7.03, 74.53, -7.25, 0.94)
pt3dadd(5.47, 73.91, -7.25, 0.94)
pt3dadd(5.31, 73.91, -7.25, 0.94)
pt3dadd(4.22, 73.91, -7.25, 0.94)
pt3dadd(2.19, 74.22, -7.25, 0.94)
pt3dadd(1.56, 75, -7.25, 0.94)
pt3dadd(1.41, 75.16, -7.25, 0.94)
pt3dadd(0.94, 76.09, -7.25, 0.94)
}
dend[205] {pt3dclear()
pt3dadd(7.03, 74.53, -7.25, 0.94)
pt3dadd(6.09, 76.25, -7.25, 0.94)
}
dend[206] {pt3dclear()
pt3dadd(6.09, 76.25, -7.25, 0.94)
pt3dadd(4.69, 77.19, -7.25, 1.09)
pt3dadd(4.53, 77.19, -7.25, 1.09)
pt3dadd(3.59, 78.13, -7.25, 1.09)
pt3dadd(3.44, 78.28, -7.25, 1.09)
pt3dadd(3.13, 78.91, -7.25, 1.09)
pt3dadd(3.13, 79.22, -7.25, 1.09)
pt3dadd(3.13, 80.78, -7.25, 1.09)
pt3dadd(3.13, 81.25, -7.25, 1.09)
pt3dadd(3.75, 83.28, -7.25, 1.09)
pt3dadd(4.05, 84.06, -7.25, 1.09)
pt3dadd(4.53, 84.53, -7.25, 1.09)
}
dend[207] {pt3dclear()
pt3dadd(4.53, 84.53, -7.25, 1.09)
pt3dadd(6.47, 85.51, -7.25, 1.09)
}
dend[208] {pt3dclear()
pt3dadd(6.47, 85.51, -7.25, 1.09)
pt3dadd(6.72, 85.63, -7.25, 1.09)
pt3dadd(7.81, 86.88, -7.25, 1.09)
pt3dadd(7.97, 87.03, -7.25, 1.09)
pt3dadd(8.44, 87.97, -7.25, 1.09)
pt3dadd(8.44, 88.28, -7.25, 1.09)
pt3dadd(8.59, 88.28, -7.25, 1.09)
pt3dadd(9.06, 89.69, -7.25, 1.09)
pt3dadd(9.06, 89.84, -7.25, 1.09)
pt3dadd(9.06, 90.16, -7.25, 1.09)
}
dend[209] {pt3dclear()
pt3dadd(6.47, 85.51, -7.25, 1.09)
pt3dadd(5.31, 87.5, -7.25, 1.09)
pt3dadd(5.94, 88.91, -7.25, 1.09)
pt3dadd(6.56, 90, -7.25, 1.09)
}
dend[210] {pt3dclear()
pt3dadd(4.53, 84.53, -7.25, 1.09)
pt3dadd(2.81, 87.03, -7.25, 1.09)
pt3dadd(2.02, 88.28, -7.25, 1.09)
}
dend[211] {pt3dclear()
pt3dadd(2.02, 88.28, -7.25, 1.09)
pt3dadd(-1.41, 89.38, -7.25, 1.09)
}
dend[212] {pt3dclear()
pt3dadd(2.02, 88.28, -7.25, 1.09)
pt3dadd(1.72, 90.31, -7.25, 1.09)
pt3dadd(1.56, 91.56, -7.25, 1.09)
pt3dadd(1.41, 91.56, -7.25, 1.09)
pt3dadd(0.78, 92.5, -7.25, 1.09)
pt3dadd(0.63, 92.66, -7.25, 1.09)
pt3dadd(-0.31, 93.13, -7.25, 1.09)
pt3dadd(-0.94, 93.59, -7.25, 1.09)
}
dend[213] {pt3dclear()
pt3dadd(6.09, 76.25, -7.25, 0.94)
pt3dadd(7.03, 79.22, -7, 1.09)
pt3dadd(7.5, 82.03, -7, 1.09)
pt3dadd(8.75, 83.91, -7, 1.09)
pt3dadd(8.59, 83.91, -7, 1.09)
pt3dadd(9.84, 85.63, -7, 1.09)
pt3dadd(10.16, 86.09, -7, 1.09)
}
dend[214] {pt3dclear()
pt3dadd(11.25, 63.91, -7.25, 1.25)
pt3dadd(11.72, 65.78, -7.25, 1.09)
pt3dadd(11.72, 67.66, -7.25, 1.09)
pt3dadd(11.72, 67.81, -7.25, 1.09)
pt3dadd(11.72, 68.44, -7.25, 1.09)
}
dend[215] {pt3dclear()
pt3dadd(12.3, 61.95, -7.25, 0.56)
pt3dadd(13.01, 63.44, -7.25, 0.078)
pt3dadd(13.4, 64.61, -7.25, 0.078)
pt3dadd(13.63, 65.7, -7.25, 0.078)
pt3dadd(13.71, 66.41, -7.25, 0.078)
}
dend[216] {pt3dclear()
pt3dadd(13.71, 66.41, -7.25, 0.078)
pt3dadd(13.32, 67.19, -7.25, 0.078)
pt3dadd(13.01, 68.13, -7.25, 0.078)
pt3dadd(13.01, 68.36, -7.25, 0.078)
pt3dadd(13.01, 69.14, -7.25, 0.078)
pt3dadd(13.01, 69.45, -7.25, 0.078)
pt3dadd(13.09, 70.08, -7.25, 0.078)
pt3dadd(13.16, 70.23, -7.25, 0.078)
pt3dadd(13.16, 70.39, -7.25, 0.078)
pt3dadd(13.48, 70.86, -7.25, 0.078)
pt3dadd(13.55, 70.94, -7.25, 0.078)
pt3dadd(13.63, 71.02, -7.25, 0.078)
pt3dadd(14.18, 71.48, -7.25, 0.078)
pt3dadd(14.26, 71.56, -7.25, 0.078)
pt3dadd(14.41, 71.64, -7.25, 0.078)
pt3dadd(15.04, 72.19, -7.25, 0.078)
pt3dadd(15.12, 72.34, -7.25, 0.078)
pt3dadd(15.82, 73.13, -7.25, 0.078)
pt3dadd(15.9, 73.2, -7.25, 0.078)
pt3dadd(15.98, 73.36, -7.25, 0.078)
pt3dadd(16.13, 73.83, -7.25, 0.078)
pt3dadd(16.21, 73.98, -7.25, 0.078)
pt3dadd(16.29, 74.77, -7.25, 0.078)
pt3dadd(16.29, 75, -7.25, 0.078)
pt3dadd(16.21, 76.02, -7.25, 0.078)
pt3dadd(16.13, 76.17, -7.25, 0.078)
pt3dadd(16.13, 76.64, -7.25, 0.078)
}
dend[217] {pt3dclear()
pt3dadd(13.71, 66.41, -7.25, 0.078)
pt3dadd(14.49, 68.13, -7.5, 0.078)
pt3dadd(15.2, 69.14, -7.5, 0.078)
pt3dadd(15.82, 70.08, -7.5, 0.078)
pt3dadd(16.21, 70.86, -7.5, 0.078)
}
dend[218] {pt3dclear()
pt3dadd(12.97, 52.97, -7.75, 0.94)
pt3dadd(10.78, 52.97, -7.75, 0.63)
pt3dadd(6.56, 54.69, -7.75, 0.63)
}
dend[219] {pt3dclear()
pt3dadd(6.56, 54.69, -7.75, 0.63)
pt3dadd(2.97, 54.38, -7.5, 0.63)
pt3dadd(1.09, 55, -7.5, 0.63)
pt3dadd(-1.1, 55.62, -7.5, 0.54)
pt3dadd(-2.35, 56.56, -7.5, 0.54)
}
dend[220] {pt3dclear()
pt3dadd(6.56, 54.69, -7.75, 0.63)
pt3dadd(6.76, 56.09, -9.75, 0.54)
pt3dadd(6.84, 56.88, -9.75, 0.39)
pt3dadd(7.38, 57.97, -9.75, 0.39)
}
dend[221] {pt3dclear()
pt3dadd(19.09, 36.63, -8.5, 1.72)
pt3dadd(17.71, 34.79, -6, 0.55)
pt3dadd(16.62, 37.7, -6, 0.55)
pt3dadd(15.76, 39.4, -6, 0.55)
pt3dadd(14.82, 41.45, -5.75, 0.55)
pt3dadd(14.28, 42.46, -5.75, 0.55)
}
}
proc shape3d_8() {
dend[221] { pt3dadd(14.2, 42.38, -5.75, 0.55)
pt3dadd(12.56, 42.93, -5.75, 0.55)
pt3dadd(11.07, 43.09, -5.75, 0.55)
pt3dadd(10.92, 43.09, -5.75, 0.55)
}
dend[222] {pt3dclear()
pt3dadd(10.92, 43.09, -5.75, 0.55)
pt3dadd(10.11, 44.22, -5.53, 0.7)
}
dend[223] {pt3dclear()
pt3dadd(10.11, 44.22, -5.53, 0.7)
pt3dadd(9.31, 45.34, -5.32, 0.7)
}
dend[224] {pt3dclear()
pt3dadd(9.31, 45.34, -5.32, 0.7)
pt3dadd(9.98, 44.41, -5.5, 0.7)
}
dend[225] {pt3dclear()
pt3dadd(9.31, 45.34, -5.32, 0.7)
pt3dadd(11.07, 41.99, -5.75, 0.55)
pt3dadd(11, 41.13, -5.75, 0.55)
pt3dadd(10.84, 39.57, -5.75, 0.55)
pt3dadd(10.92, 39.49, -5.75, 0.55)
pt3dadd(10.92, 38.01, -5.75, 0.55)
pt3dadd(10.76, 37.15, -5.75, 0.55)
pt3dadd(10.53, 36.04, -5.75, 0.55)
}
dend[226] {pt3dclear()
pt3dadd(10.53, 36.04, -5.75, 0.55)
pt3dadd(11.31, 35.35, -6, 0.55)
pt3dadd(12.01, 33.86, -6, 0.86)
}
dend[227] {pt3dclear()
pt3dadd(12.01, 33.86, -6, 0.86)
pt3dadd(11.78, 32.61, -6, 0.86)
pt3dadd(11.86, 31.05, -6, 0.86)
pt3dadd(11.86, 30.9, -6, 0.86)
pt3dadd(12.01, 29.8, -6, 0.86)
pt3dadd(12.4, 28.71, -6, 0.86)
pt3dadd(12.48, 27.62, -6, 0.86)
pt3dadd(12.95, 26.22, -6, 0.86)
pt3dadd(12.95, 25.27, -6, 0.86)
pt3dadd(13.44, 23.91, -6, 0.158)
pt3dadd(12.81, 22.81, -6, 0.158)
pt3dadd(12.66, 22.81, -6, 0.158)
pt3dadd(11.72, 21.88, -6, 0.158)
pt3dadd(11.56, 21.88, -6, 0.158)
}
dend[228] {pt3dclear()
pt3dadd(12.01, 33.86, -6, 0.86)
pt3dadd(13.5, 33.54, -6, 0.86)
pt3dadd(13.42, 33.47, -6, 0.86)
pt3dadd(15.37, 32.93, -6, 0.86)
}
dend[229] {pt3dclear()
pt3dadd(15.37, 32.93, -6, 0.86)
pt3dadd(16.07, 32.07, -6, 0.86)
pt3dadd(16.54, 30.98, -6, 0.86)
pt3dadd(16.62, 30.12, -6, 0.86)
pt3dadd(16.78, 29.65, -6, 0.86)
pt3dadd(16.78, 29.34, -6, 0.86)
}
dend[230] {pt3dclear()
pt3dadd(15.37, 32.93, -6, 0.86)
pt3dadd(16.46, 33.86, -6, 0.86)
}
dend[231] {pt3dclear()
pt3dadd(10.53, 36.04, -5.75, 0.55)
pt3dadd(9.98, 35.11, -6, 0.63)
pt3dadd(9.67, 33.79, -6, 0.63)
pt3dadd(9.59, 32.54, -6, 0.63)
pt3dadd(9.59, 31.52, -6, 0.63)
pt3dadd(9.51, 31.05, -6, 0.63)
}
dend[232] {pt3dclear()
pt3dadd(10.11, 44.22, -5.53, 0.7)
pt3dadd(8.73, 45.27, -5.5, 0.7)
pt3dadd(8.65, 45.35, -5.5, 0.7)
pt3dadd(7.56, 45.9, -5.5, 0.7)
pt3dadd(7.09, 46.05, -5.5, 0.7)
}
dend[233] {pt3dclear()
pt3dadd(7.09, 46.05, -5.5, 0.7)
pt3dadd(7.4, 47.7, -5.5, 0.55)
pt3dadd(7.64, 48.79, -5.5, 0.55)
pt3dadd(7.79, 49.41, -5.5, 0.55)
pt3dadd(7.95, 49.65, -5.5, 0.55)
pt3dadd(7.79, 51.05, -5.5, 0.55)
pt3dadd(7.56, 52.3, -5.5, 0.55)
}
dend[234] {pt3dclear()
pt3dadd(7.09, 46.05, -5.5, 0.7)
pt3dadd(5.68, 47.23, -5.75, 0.55)
pt3dadd(4.51, 49.02, -5.75, 0.55)
}
dend[235] {pt3dclear()
pt3dadd(4.51, 49.02, -5.75, 0.55)
pt3dadd(3.11, 49.1, -5.75, 0.55)
pt3dadd(1.7, 49.18, -5.75, 0.55)
pt3dadd(1.54, 49.18, -5.75, 0.55)
pt3dadd(-0.41, 49.57, -5.75, 0.55)
pt3dadd(-0.49, 49.65, -5.75, 0.55)
pt3dadd(-1.66, 50.43, -5.75, 0.55)
}
dend[236] {pt3dclear()
pt3dadd(4.51, 49.02, -5.75, 0.55)
pt3dadd(3.5, 52.15, -5.75, 0.55)
}
dend[237] {pt3dclear()
pt3dadd(10.92, 43.09, -5.75, 0.55)
pt3dadd(8.89, 43.09, -5.75, 0.63)
pt3dadd(8.42, 43.01, -5.75, 0.63)
}
dend[238] {pt3dclear()
pt3dadd(8.42, 43.01, -5.75, 0.63)
pt3dadd(7.25, 44.1, -5.75, 0.63)
pt3dadd(6.39, 45.2, -5.75, 0.63)
pt3dadd(6.23, 45.2, -5.75, 0.63)
pt3dadd(4.82, 45.82, -5.75, 0.63)
pt3dadd(3.81, 45.98, -5.75, 0.63)
pt3dadd(3.65, 46.05, -5.75, 0.63)
pt3dadd(3.5, 46.05, -5.75, 0.63)
pt3dadd(2.71, 46.29, -5.75, 0.63)
pt3dadd(1.31, 46.29, -5.75, 0.63)
pt3dadd(1.07, 46.13, -5.75, 0.63)
pt3dadd(1, 46.29, -5.75, 0.63)
}
dend[239] {pt3dclear()
pt3dadd(8.42, 43.01, -5.75, 0.63)
pt3dadd(7.79, 42.15, -5.75, 0.7)
pt3dadd(7.09, 41.37, -5.75, 0.7)
pt3dadd(6.39, 40.65, -5.75, 0.7)
pt3dadd(5.37, 39.72, -5.75, 0.7)
pt3dadd(4.9, 39.02, -5.75, 0.7)
pt3dadd(4.51, 38.86, -5.75, 0.7)
pt3dadd(4.2, 38.63, -5.75, 0.7)
pt3dadd(3.34, 37.93, -5.5, 0.7)
pt3dadd(3.03, 37.38, -5.5, 0.7)
pt3dadd(2.95, 37.29, -5.5, 0.7)
pt3dadd(2.95, 36.45, -5.5, 0.7)
pt3dadd(2.95, 35.9, -5.5, 0.7)
}
dend[240] {pt3dclear()
pt3dadd(18.79, 34.29, -6, 1.72)
pt3dadd(20.1, 34.02, -6.5, 0.078)
pt3dadd(20.64, 33.75, -6.5, 0.078)
pt3dadd(21.35, 33.36, -6.5, 0.078)
pt3dadd(21.82, 32.93, -6.5, 0.078)
pt3dadd(22.48, 32.42, -6.5, 0.078)
pt3dadd(22.95, 32.15, -6.5, 0.078)
pt3dadd(23.07, 31.99, -6.5, 0.078)
}
dend[241] {pt3dclear()
pt3dadd(18.28, 27.5, -6.25, 1.72)
pt3dadd(17.39, 26.76, -5.25, 0.55)
pt3dadd(14.28, 26.37, -5.25, 0.55)
pt3dadd(12.4, 26.29, -5.25, 0.7)
pt3dadd(11.62, 26.29, -5.25, 0.7)
}
dend[242] {pt3dclear()
pt3dadd(11.62, 26.29, -5.25, 0.7)
pt3dadd(10.47, 23.91, -5, 0.47)
pt3dadd(9.69, 22.03, -5, 0.47)
pt3dadd(9.69, 21.88, -5, 0.47)
pt3dadd(9.06, 20.63, -5, 0.47)
pt3dadd(8.91, 20.47, -5, 0.158)
pt3dadd(8.59, 19.38, -5, 0.158)
pt3dadd(8.59, 19.22, -5, 0.158)
pt3dadd(8.05, 18.05, -5, 0.158)
pt3dadd(7.77, 17.66, -4.75, 0.158)
}
dend[243] {pt3dclear()
pt3dadd(7.77, 17.66, -4.75, 0.158)
pt3dadd(7.5, 16.95, -5, 0.47)
pt3dadd(7.03, 15.78, -5, 0.47)
pt3dadd(7.03, 15.63, -5, 0.47)
pt3dadd(7.03, 14.22, -5, 0.47)
pt3dadd(7.81, 13.75, -5, 0.158)
pt3dadd(8.44, 13.13, -5, 0.158)
pt3dadd(9.38, 12.5, -5, 0.158)
}
dend[244] {pt3dclear()
pt3dadd(7.77, 17.66, -4.75, 0.158)
pt3dadd(6.21, 17.42, -5, 0.39)
pt3dadd(5.04, 17.03, -5, 0.39)
pt3dadd(4.57, 16.55, -5, 0.39)
pt3dadd(4.49, 16.48, -5, 0.39)
pt3dadd(3.55, 15.86, -5, 0.39)
pt3dadd(3.32, 15.55, -5, 0.39)
}
dend[245] {pt3dclear()
pt3dadd(11.62, 26.29, -5.25, 0.7)
pt3dadd(11.15, 26.37, -5.25, 0.7)
}
dend[246] {pt3dclear()
pt3dadd(11.15, 26.37, -5.25, 0.7)
pt3dadd(10.24, 26.52, -5.25, 0.7)
}
dend[247] {pt3dclear()
pt3dadd(10.24, 26.52, -5.25, 0.7)
pt3dadd(14.59, 25.04, -5.25, 0.55)
pt3dadd(15.06, 23.79, -5.25, 0.55)
pt3dadd(15.37, 22.7, -5.25, 0.55)
pt3dadd(15.37, 22.54, -5.25, 0.55)
pt3dadd(16.07, 21.84, -5.25, 0.55)
pt3dadd(16.46, 21.52, -5.25, 0.55)
}
dend[248] {pt3dclear()
pt3dadd(10.24, 26.52, -5.25, 0.7)
pt3dadd(10.76, 28.01, -4.5, 0.55)
pt3dadd(8.34, 30.98, -4.5, 0.55)
pt3dadd(6.7, 31.84, -4.5, 0.55)
pt3dadd(5.6, 32.29, -4.5, 0.86)
pt3dadd(5.27, 32.89, -6.25, 0.86)
}
dend[249] {pt3dclear()
pt3dadd(5.27, 32.89, -6.25, 0.86)
pt3dadd(5.05, 33.54, -4.5, 0.86)
pt3dadd(3.96, 34.88, -4.5, 0.86)
pt3dadd(2.4, 36.13, -4.5, 0.7)
pt3dadd(1.31, 36.68, -4.5, 0.7)
pt3dadd(0.92, 37.07, -4.5, 0.7)
}
dend[250] {pt3dclear()
pt3dadd(0.92, 37.07, -4.5, 0.7)
pt3dadd(-0.15, 36.31, -4.98, 0.7)
}
dend[251] {pt3dclear()
pt3dadd(-0.15, 36.31, -4.98, 0.7)
pt3dadd(0.37, 36.68, -4.75, 0.7)
pt3dadd(-0.96, 36.13, -4.75, 0.7)
pt3dadd(-1.04, 36.04, -4.75, 0.7)
pt3dadd(-2.04, 35.51, -4.75, 0.7)
pt3dadd(-2.21, 35.43, -4.75, 0.7)
pt3dadd(-2.75, 35.35, -4.75, 0.7)
}
dend[252] {pt3dclear()
pt3dadd(-2.75, 35.35, -4.75, 0.7)
pt3dadd(-3.85, 35.9, -4.75, 0.86)
pt3dadd(-5.09, 36.45, -4.75, 0.86)
pt3dadd(-6.5, 36.84, -4.25, 0.86)
pt3dadd(-7.52, 38.09, -4.25, 0.86)
pt3dadd(-7.91, 39.18, -4.25, 0.7)
pt3dadd(-8.46, 40.59, -4.25, 0.7)
pt3dadd(-8.53, 40.65, -4.25, 0.7)
pt3dadd(-8.61, 40.74, -4.25, 0.7)
pt3dadd(-8.46, 42.38, -4.25, 0.7)
pt3dadd(-8.07, 43.01, -4.25, 0.7)
pt3dadd(-8.14, 42.93, -4.25, 0.7)
}
dend[253] {pt3dclear()
pt3dadd(-2.75, 35.35, -4.75, 0.7)
pt3dadd(-3.07, 34.65, -4.75, 0.86)
pt3dadd(-3.22, 33.86, -4.75, 0.86)
pt3dadd(-3.3, 33.79, -4.75, 0.86)
pt3dadd(-3.69, 33.54, -4.75, 0.86)
pt3dadd(-4.63, 33.01, -4.75, 0.86)
pt3dadd(-5.25, 32.85, -4.75, 0.86)
}
dend[254] {pt3dclear()
pt3dadd(-0.15, 36.31, -4.98, 0.7)
pt3dadd(0.14, 38.95, -4.5, 0.63)
pt3dadd(-0.09, 40.04, -4.5, 0.63)
pt3dadd(-0.18, 40.2, -4.5, 0.63)
pt3dadd(-0.56, 41.68, -4.5, 0.63)
pt3dadd(-0.72, 41.84, -4.5, 0.94)
}
}
proc shape3d_9() {
dend[254] { }
dend[255] {pt3dclear()
pt3dadd(-0.72, 41.84, -4.5, 0.94)
pt3dadd(-0.01, 43.16, -4.5, 0.55)
pt3dadd(0.28, 44.02, -4.5, 0.55)
pt3dadd(0.61, 45.04, -4.5, 0.55)
pt3dadd(0.84, 45.82, -4.5, 0.55)
pt3dadd(1.14, 46.84, -4.5, 0.55)
pt3dadd(1.23, 47.93, -4.5, 0.55)
pt3dadd(1.31, 49.02, -4.5, 0.55)
pt3dadd(1.31, 49.8, -4.5, 0.55)
pt3dadd(1, 50.66, -4.5, 0.55)
}
dend[256] {pt3dclear()
pt3dadd(-0.72, 41.84, -4.5, 0.94)
pt3dadd(-2.6, 42.15, -4.5, 0.55)
pt3dadd(-3.22, 42.38, -4.5, 0.55)
}
dend[257] {pt3dclear()
pt3dadd(-3.22, 42.38, -4.5, 0.55)
pt3dadd(-4.47, 41.91, -4.25, 0.55)
pt3dadd(-5.41, 41.76, -4.25, 0.78)
pt3dadd(-6.43, 41.37, -3.75, 0.78)
}
dend[258] {pt3dclear()
pt3dadd(-3.22, 42.38, -4.5, 0.55)
pt3dadd(-3.85, 44.34, -4.25, 0.78)
}
dend[259] {pt3dclear()
pt3dadd(-3.85, 44.34, -4.25, 0.78)
pt3dadd(-5.49, 44.18, -4.25, 0.78)
pt3dadd(-6.43, 44.65, -4.25, 0.78)
pt3dadd(-7.36, 45.27, -4.25, 0.78)
pt3dadd(-8.3, 45.59, -4.25, 0.78)
pt3dadd(-8.63, 45.7, -4.25, 0.86)
pt3dadd(-9.1, 45.63, -4.25, 0.86)
pt3dadd(-9.57, 45.39, -4.25, 0.86)
pt3dadd(-9.65, 45.31, -4.25, 0.86)
}
dend[260] {pt3dclear()
pt3dadd(-3.85, 44.34, -4.25, 0.78)
pt3dadd(-3.77, 46.05, -4, 0.78)
}
dend[261] {pt3dclear()
pt3dadd(-3.77, 46.05, -4, 0.78)
pt3dadd(-4.94, 46.76, -4, 0.78)
pt3dadd(-5.09, 46.84, -4, 0.78)
pt3dadd(-6.35, 47.93, -4, 0.78)
pt3dadd(-7.29, 48.71, -4, 0.78)
pt3dadd(-7.6, 49.49, -4, 0.78)
pt3dadd(-7.75, 50.2, -4, 0.78)
pt3dadd(-7.91, 50.27, -4, 0.78)
pt3dadd(-7.99, 50.35, -4, 0.78)
pt3dadd(-8.3, 51.29, -4, 0.78)
pt3dadd(-8.38, 51.37, -4, 0.78)
pt3dadd(-8.46, 51.52, -4, 0.78)
pt3dadd(-8.85, 52.15, -4, 0.78)
pt3dadd(-8.93, 52.46, -4, 0.78)
pt3dadd(-8.85, 53.48, -3.75, 0.39)
}
dend[262] {pt3dclear()
pt3dadd(-3.77, 46.05, -4, 0.78)
pt3dadd(-3.3, 47.3, -4.25, 0.78)
pt3dadd(-2.91, 48.48, -4.25, 0.78)
}
dend[263] {pt3dclear()
pt3dadd(-2.91, 48.48, -4.25, 0.78)
pt3dadd(-3.54, 49.1, -4.25, 0.78)
pt3dadd(-4.55, 50.27, -4.25, 0.78)
pt3dadd(-4.71, 50.27, -4.25, 0.78)
pt3dadd(-5.18, 51.05, -4.25, 0.78)
pt3dadd(-5.25, 51.13, -4.25, 0.78)
pt3dadd(-5.33, 51.29, -4.25, 0.78)
pt3dadd(-5.57, 51.76, -4.25, 0.78)
pt3dadd(-5.64, 51.84, -4.25, 0.78)
pt3dadd(-5.96, 52.54, -4.25, 0.78)
pt3dadd(-6.19, 53.16, -4.25, 0.78)
pt3dadd(-6.27, 53.09, -4.25, 0.78)
}
dend[264] {pt3dclear()
pt3dadd(-2.91, 48.48, -4.25, 0.78)
pt3dadd(-0.01, 48.32, -4.5, 0.7)
}
dend[265] {pt3dclear()
pt3dadd(0.92, 37.07, -4.5, 0.7)
pt3dadd(1.54, 38.32, -4.75, 0.7)
pt3dadd(2.17, 39.49, -4.75, 0.7)
pt3dadd(3.03, 40.11, -4.75, 0.7)
pt3dadd(3.5, 40.65, -4.75, 0.7)
pt3dadd(3.96, 41.84, -4.75, 0.7)
pt3dadd(4.36, 42.46, -4.75, 0.7)
pt3dadd(4.67, 43.16, -4.75, 0.7)
}
dend[266] {pt3dclear()
pt3dadd(4.67, 43.16, -4.75, 0.7)
pt3dadd(3.28, 42.97, -4.75, 0.7)
}
dend[267] {pt3dclear()
pt3dadd(3.28, 42.97, -4.75, 0.7)
pt3dadd(3.57, 43.01, -4.75, 0.7)
pt3dadd(2.87, 43.16, -4.75, 0.7)
pt3dadd(2.56, 43.32, -4.75, 0.7)
}
dend[268] {pt3dclear()
pt3dadd(2.56, 43.32, -4.75, 0.7)
pt3dadd(1.78, 44.26, -4.75, 0.55)
}
dend[269] {pt3dclear()
pt3dadd(2.56, 43.32, -4.75, 0.7)
pt3dadd(0.76, 42.85, -4.75, 0.55)
}
dend[270] {pt3dclear()
pt3dadd(3.28, 42.97, -4.75, 0.7)
pt3dadd(4.28, 44.26, -4.75, 0.55)
pt3dadd(3.73, 44.73, -4.75, 0.55)
pt3dadd(2.87, 45.2, -4.75, 0.55)
pt3dadd(2.48, 45.51, -4.75, 0.55)
pt3dadd(2.25, 45.82, -4.75, 0.55)
}
dend[271] {pt3dclear()
pt3dadd(4.67, 43.16, -4.75, 0.7)
pt3dadd(5.76, 42.85, -4.75, 0.55)
pt3dadd(6.07, 42.15, -4.75, 0.55)
pt3dadd(6.23, 41.6, -4.75, 0.55)
pt3dadd(6.62, 40.9, -4.75, 0.55)
pt3dadd(7.01, 40.2, -4.75, 0.55)
pt3dadd(7.09, 39.57, -4.75, 0.55)
}
dend[272] {pt3dclear()
pt3dadd(5.27, 32.89, -6.25, 0.86)
pt3dadd(4.73, 32.19, -6.25, 0.39)
pt3dadd(4.34, 32.11, -6.25, 0.39)
pt3dadd(4.18, 32.11, -6.25, 0.39)
pt3dadd(3.4, 32.03, -6.25, 0.39)
pt3dadd(2.77, 32.19, -6.25, 0.39)
pt3dadd(2.62, 32.19, -6.25, 0.39)
pt3dadd(1.91, 32.42, -6.25, 0.39)
pt3dadd(1.76, 32.81, -6.25, 0.39)
}
dend[273] {pt3dclear()
pt3dadd(11.15, 26.37, -5.25, 0.7)
pt3dadd(10.53, 26.37, -5.25, 0.7)
pt3dadd(9.43, 26.29, -5.25, 0.7)
pt3dadd(8.73, 26.29, -5.25, 0.7)
}
dend[274] {pt3dclear()
pt3dadd(8.73, 26.29, -5.25, 0.7)
pt3dadd(8.02, 26.13, -5.25, 0.7)
pt3dadd(7.95, 26.05, -5.25, 0.7)
pt3dadd(7.17, 25.66, -5.25, 0.94)
pt3dadd(6.31, 24.96, -5.25, 0.94)
pt3dadd(6.07, 24.1, -5.25, 0.94)
pt3dadd(6, 23.4, -5.25, 0.94)
pt3dadd(6.07, 22.38, -5.25, 0.94)
pt3dadd(6.23, 21.84, -5.25, 0.94)
pt3dadd(7.32, 19.96, -5.75, 0.78)
pt3dadd(8.42, 18.95, -5.75, 0.78)
pt3dadd(9.51, 18.01, -5.75, 0.78)
pt3dadd(9.9, 17.62, -5.75, 0.55)
pt3dadd(10.76, 17.14, -5.75, 0.55)
}
dend[275] {pt3dclear()
pt3dadd(8.73, 26.29, -5.25, 0.7)
pt3dadd(8.02, 27.7, -5.25, 0.55)
pt3dadd(7.01, 28.55, -5.25, 0.55)
pt3dadd(5.53, 29.65, -5.25, 0.55)
pt3dadd(5.45, 29.57, -5.25, 0.55)
pt3dadd(4.82, 30.27, -5.25, 0.55)
pt3dadd(3.42, 30.98, -5.25, 0.55)
pt3dadd(2.87, 31.6, -5.25, 0.55)
}
dend[276] {pt3dclear()
pt3dadd(19.38, 22.81, -7, 2.66)
pt3dadd(21.25, 22.03, -7, 1.41)
pt3dadd(22.66, 21.56, -7, 1.41)
pt3dadd(23.59, 21.25, -7, 1.41)
pt3dadd(24.1, 21.17, -6, 1.41)
}
dend[277] {pt3dclear()
pt3dadd(24.1, 21.17, -6, 1.41)
pt3dadd(23.75, 18.75, -6, 1.09)
pt3dadd(23.75, 17.03, -6, 0.94)
}
dend[278] {pt3dclear()
pt3dadd(23.75, 17.03, -6, 0.94)
pt3dadd(25.16, 15.78, -6, 0.78)
pt3dadd(25.16, 15.63, -6, 0.78)
}
dend[279] {pt3dclear()
pt3dadd(25.16, 15.63, -6, 0.78)
pt3dadd(25.78, 13.75, -6, 0.78)
pt3dadd(26.25, 12.81, -6, 0.78)
}
dend[280] {pt3dclear()
pt3dadd(26.25, 12.81, -6, 0.78)
pt3dadd(28.13, 11.41, -6, 0.78)
pt3dadd(29.38, 10.47, -6, 0.78)
pt3dadd(29.38, 10.31, -6, 0.78)
pt3dadd(29.84, 9.69, -6, 0.78)
pt3dadd(31.56, 9.69, -6, 0.63)
pt3dadd(32.5, 8.91, -6, 0.63)
pt3dadd(32.97, 7.81, -6, 0.63)
pt3dadd(32.97, 7.5, -6, 0.63)
pt3dadd(33.13, 6.88, -6, 0.63)
pt3dadd(33.13, 6.56, -6, 0.63)
pt3dadd(32.97, 5.78, -6, 0.63)
pt3dadd(32.97, 5.63, -6, 0.63)
pt3dadd(32.81, 4.38, -6, 0.78)
}
dend[281] {pt3dclear()
pt3dadd(32.81, 4.38, -6, 0.78)
pt3dadd(34.22, 2.66, -6, 0.63)
pt3dadd(35.63, 1.09, -6, 0.63)
pt3dadd(36.72, 0, -6, 0.63)
pt3dadd(38.75, -1.56, -6.5, 0.63)
pt3dadd(40.94, -2.19, -6.5, 0.63)
pt3dadd(42.66, -3.75, -6.5, 0.63)
pt3dadd(42.5, -3.75, -6.5, 0.63)
pt3dadd(42.66, -4.84, -6.5, 0.63)
pt3dadd(42.5, -5.16, -6.5, 0.63)
pt3dadd(41.88, -6.09, -6.5, 0.63)
pt3dadd(41.88, -6.25, -6.5, 0.63)
pt3dadd(41.72, -7.19, -6.5, 0.63)
}
dend[282] {pt3dclear()
pt3dadd(41.72, -7.19, -6.5, 0.63)
pt3dadd(42.97, -8.13, -6.5, 0.63)
pt3dadd(43.59, -9.06, -6.5, 0.63)
pt3dadd(43.75, -9.52, -6.5, 0.63)
pt3dadd(44.22, -10, -6.5, 0.63)
pt3dadd(45, -10.94, -6.5, 0.63)
pt3dadd(45, -11.25, -6.5, 0.63)
pt3dadd(45.31, -11.88, -6.5, 0.63)
pt3dadd(46.09, -12.81, -7, 0.63)
pt3dadd(46.09, -14.06, -7, 0.63)
pt3dadd(46.09, -15.16, -7, 0.63)
}
dend[283] {pt3dclear()
pt3dadd(41.72, -7.19, -6.5, 0.63)
pt3dadd(41.25, -9.69, -6.5, 0.63)
pt3dadd(41.72, -11.25, -6.5, 0.63)
pt3dadd(41.88, -11.88, -6.5, 0.63)
}
dend[284] {pt3dclear()
pt3dadd(41.88, -11.88, -6.5, 0.63)
pt3dadd(40, -12.81, -6.5, 0.63)
}
dend[285] {pt3dclear()
pt3dadd(41.88, -11.88, -6.5, 0.63)
pt3dadd(42.19, -13.28, -6.75, 0.63)
pt3dadd(42.81, -14.69, -6.75, 0.63)
pt3dadd(43.44, -16.41, -6.75, 0.63)
pt3dadd(44.22, -17.03, -6.75, 0.63)
pt3dadd(44.53, -17.34, -6.75, 0.63)
}
dend[286] {pt3dclear()
pt3dadd(32.81, 4.38, -6, 0.78)
pt3dadd(31.84, 3.83, -4.5, 0.31)
pt3dadd(31.45, 3.13, -4.5, 0.31)
pt3dadd(31.37, 3.05, -4.5, 0.31)
pt3dadd(31.21, 2.02, -4.5, 0.31)
pt3dadd(31.52, 0.63, -4.5, 0.31)
pt3dadd(31.52, 0.31, -4.5, 0.31)
pt3dadd(31.99, -0.31, -4.5, 0.31)
}
}
proc shape3d_10() {
dend[286] { }
dend[287] {pt3dclear()
pt3dadd(31.99, -0.31, -4.5, 0.31)
pt3dadd(31.84, -0.78, -4.5, 0.31)
pt3dadd(31.76, -0.86, -4.5, 0.31)
pt3dadd(31.45, -1.48, -4.5, 0.31)
pt3dadd(31.37, -1.56, -4.5, 0.31)
pt3dadd(31.37, -2.02, -4.5, 0.31)
pt3dadd(31.45, -1.88, -4.5, 0.31)
pt3dadd(31.13, -2.27, -4.25, 0.31)
}
dend[288] {pt3dclear()
pt3dadd(31.13, -2.27, -4.25, 0.31)
pt3dadd(30.51, -3.05, -4.25, 0.31)
pt3dadd(30.82, -2.81, -4.25, 0.31)
pt3dadd(30.04, -3.44, -4.25, 0.31)
pt3dadd(29.88, -3.59, -4.25, 0.31)
pt3dadd(29.1, -3.91, -4.25, 0.31)
pt3dadd(28.95, -3.91, -4.25, 0.31)
pt3dadd(28.4, -3.98, -4.25, 0.31)
pt3dadd(27.07, -4.05, -4.25, 0.31)
pt3dadd(26.91, -3.98, -4.25, 0.31)
}
dend[289] {pt3dclear()
pt3dadd(31.13, -2.27, -4.25, 0.31)
pt3dadd(32.07, -3.52, -4, 0.39)
pt3dadd(32.54, -4.69, -4, 0.39)
pt3dadd(32.54, -5.63, -4, 0.39)
pt3dadd(32.77, -7.11, -3.75, 0.55)
pt3dadd(32.7, -9.77, -3.25, 0.55)
pt3dadd(33.4, -10.78, -3.25, 0.55)
pt3dadd(33.4, -10.94, -3.25, 0.55)
pt3dadd(33.71, -11.56, -3.25, 0.55)
}
dend[290] {pt3dclear()
pt3dadd(31.99, -0.31, -4.5, 0.31)
pt3dadd(33.63, -1.02, -4.25, 0.31)
pt3dadd(35.11, -2.02, -4.25, 0.31)
}
dend[291] {pt3dclear()
pt3dadd(35.11, -2.02, -4.25, 0.31)
pt3dadd(35.74, -3.13, -4.25, 0.31)
pt3dadd(36.36, -4.3, -4.25, 0.31)
pt3dadd(36.36, -4.45, -4.25, 0.31)
pt3dadd(36.6, -5, -4.25, 0.31)
}
dend[292] {pt3dclear()
pt3dadd(36.6, -5, -4.25, 0.31)
pt3dadd(36.52, -6.41, -4.25, 0.31)
pt3dadd(36.84, -8.13, -4.25, 0.31)
pt3dadd(37.07, -9.06, -4.25, 0.31)
pt3dadd(37.29, -9.77, -3.75, 0.31)
}
dend[293] {pt3dclear()
pt3dadd(37.29, -9.77, -3.75, 0.31)
pt3dadd(37.61, -10.47, -4.25, 0.31)
pt3dadd(38.09, -10.78, -4.25, 0.31)
pt3dadd(38.09, -11.02, -4.25, 0.31)
pt3dadd(38.95, -11.95, -4.25, 0.31)
pt3dadd(39.4, -12.66, -4.25, 0.31)
pt3dadd(40.51, -13.91, -4.25, 0.31)
pt3dadd(41.52, -14.69, -4.25, 0.31)
pt3dadd(42.62, -15.39, -4.25, 0.31)
}
dend[294] {pt3dclear()
pt3dadd(42.62, -15.39, -4.25, 0.31)
pt3dadd(42.15, -16.48, -4.25, 0.31)
pt3dadd(41.84, -17.57, -4.25, 0.31)
pt3dadd(41.68, -18.44, -4.25, 0.31)
}
dend[295] {pt3dclear()
pt3dadd(42.62, -15.39, -4.25, 0.31)
pt3dadd(45.9, -18.67, -4, 0.47)
pt3dadd(46.45, -20.23, -4, 0.47)
pt3dadd(46.52, -20.94, -4, 0.47)
}
dend[296] {pt3dclear()
pt3dadd(46.52, -20.94, -4, 0.47)
pt3dadd(48.95, -23.75, -4, 0.47)
}
dend[297] {pt3dclear()
pt3dadd(46.52, -20.94, -4, 0.47)
pt3dadd(45.35, -23.05, -4, 0.47)
}
dend[298] {pt3dclear()
pt3dadd(37.29, -9.77, -3.75, 0.31)
pt3dadd(36.21, -10.94, -3.5, 0.55)
pt3dadd(35.51, -12.03, -3.5, 0.55)
pt3dadd(35.43, -13.28, -3.5, 0.55)
pt3dadd(35.43, -13.44, -3.5, 0.55)
pt3dadd(35.35, -13.91, -3.5, 0.55)
pt3dadd(34.02, -14.69, -3.5, 0.55)
pt3dadd(33.79, -14.69, -3.5, 0.55)
pt3dadd(32.61, -14.84, -3.5, 0.55)
pt3dadd(31.45, -14.84, -3.25, 0.55)
pt3dadd(30.35, -15, -3.25, 0.55)
pt3dadd(29.02, -15.08, -3.25, 0.55)
pt3dadd(28.79, -15.23, -3.25, 0.55)
pt3dadd(28.71, -15.31, -3.25, 0.55)
pt3dadd(28.79, -16.41, -3.25, 0.55)
pt3dadd(29.18, -17.11, -3.25, 0.55)
pt3dadd(29.65, -17.34, -3.25, 0.55)
}
dend[299] {pt3dclear()
pt3dadd(36.6, -5, -4.25, 0.31)
pt3dadd(39.34, -6.8, -4.25, 0.47)
pt3dadd(40.98, -8.13, -4.25, 0.47)
pt3dadd(42.77, -10, -4.25, 0.47)
pt3dadd(44.02, -12.34, -4.25, 0.47)
pt3dadd(44.49, -13.36, -4.25, 0.47)
}
dend[300] {pt3dclear()
pt3dadd(35.11, -2.02, -4.25, 0.31)
pt3dadd(37.38, -1.95, -4.25, 0.47)
pt3dadd(38.86, -2.66, -4.25, 0.47)
pt3dadd(39.79, -3.52, -4.25, 0.47)
pt3dadd(40.9, -4.84, -4.25, 0.55)
pt3dadd(41.52, -5.55, -4.25, 0.55)
pt3dadd(43.48, -6.56, -4.25, 0.63)
pt3dadd(44.8, -6.95, -4.25, 0.63)
pt3dadd(45.9, -7.42, -4.25, 0.63)
}
dend[301] {pt3dclear()
pt3dadd(26.25, 12.81, -6, 0.78)
pt3dadd(25.74, 12.27, -4.5, 0.31)
pt3dadd(25.66, 11.02, -4.5, 0.31)
pt3dadd(25.66, 9.77, -4.5, 0.31)
pt3dadd(25.66, 9.61, -4.5, 0.31)
pt3dadd(25.59, 9.44, -4.5, 0.31)
pt3dadd(25.74, 8.19, -4.5, 0.31)
pt3dadd(25.74, 7.66, -4.5, 0.31)
pt3dadd(25.82, 7.34, -4.5, 0.31)
pt3dadd(25.9, 6.95, -4.5, 0.31)
pt3dadd(26.13, 5.78, -4.5, 0.31)
pt3dadd(26.13, 5.63, -4.5, 0.31)
pt3dadd(26.68, 4.53, -4.5, 0.31)
pt3dadd(26.99, 3.36, -4.5, 0.31)
pt3dadd(26.99, 3.2, -4.5, 0.31)
pt3dadd(26.99, 1.88, -4.5, 0.31)
pt3dadd(27.15, 0.23, -4.5, 0.31)
pt3dadd(26.91, -1.25, -4.5, 0.31)
pt3dadd(26.84, -1.33, -4.5, 0.31)
pt3dadd(25.98, -2.5, -4.5, 0.31)
pt3dadd(25.2, -3.13, -4.5, 0.31)
}
dend[302] {pt3dclear()
pt3dadd(25.2, -3.13, -4.5, 0.31)
pt3dadd(25.2, -4.45, -4.5, 0.31)
pt3dadd(25.2, -4.61, -4.5, 0.31)
pt3dadd(25.2, -5.31, -4.5, 0.31)
pt3dadd(25.12, -5.39, -4.5, 0.31)
pt3dadd(25.12, -5.86, -4.5, 0.31)
}
dend[303] {pt3dclear()
pt3dadd(25.2, -3.13, -4.5, 0.31)
pt3dadd(22.93, -3.67, -4.25, 0.31)
pt3dadd(21.91, -4.61, -4.25, 0.31)
pt3dadd(21.37, -5.55, -4.25, 0.31)
pt3dadd(21.29, -5.63, -4.25, 0.31)
pt3dadd(21.21, -5.7, -4.25, 0.31)
}
dend[304] {pt3dclear()
pt3dadd(25.16, 15.63, -6, 0.78)
pt3dadd(27.07, 16.02, -5.25, 0.158)
pt3dadd(28.55, 15.86, -5.25, 0.158)
pt3dadd(29.73, 15.7, -5.25, 0.158)
pt3dadd(31.45, 15.39, -5.5, 0.158)
pt3dadd(31.52, 15.31, -5.5, 0.158)
pt3dadd(32.85, 14.77, -5.5, 0.158)
pt3dadd(33.79, 14.3, -5.5, 0.158)
pt3dadd(34.72, 13.44, -5.5, 0.158)
pt3dadd(34.96, 13.05, -5.5, 0.158)
}
dend[305] {pt3dclear()
pt3dadd(23.75, 17.03, -6, 0.94)
pt3dadd(22.93, 16.55, -7, 0.86)
pt3dadd(22.46, 16.09, -7, 0.86)
pt3dadd(22.15, 15.08, -7, 0.86)
pt3dadd(21.91, 14.38, -7, 0.86)
}
dend[306] {pt3dclear()
pt3dadd(21.91, 14.38, -7, 0.86)
pt3dadd(22.62, 13.52, -7, 0.55)
pt3dadd(22.85, 12.27, -7, 0.55)
pt3dadd(23.16, 11.09, -6.75, 0.55)
}
dend[307] {pt3dclear()
pt3dadd(23.16, 11.09, -6.75, 0.55)
pt3dadd(21.91, 10.47, -6.5, 0.55)
pt3dadd(21.29, 9.92, -6.5, 0.55)
pt3dadd(21.05, 9.52, -6.5, 0.55)
pt3dadd(20.66, 7.73, -6.25, 0.55)
pt3dadd(20.51, 6.88, -6.25, 0.55)
pt3dadd(20.51, 6.72, -6.25, 0.55)
pt3dadd(20.59, 6.64, -6.25, 0.55)
}
dend[308] {pt3dclear()
pt3dadd(23.16, 11.09, -6.75, 0.55)
pt3dadd(23.79, 9.77, -6.5, 0.55)
}
dend[309] {pt3dclear()
pt3dadd(23.79, 9.77, -6.5, 0.55)
pt3dadd(23.16, 8.67, -6.5, 0.55)
pt3dadd(22.62, 7.97, -6.5, 0.55)
pt3dadd(22.46, 7.89, -6.5, 0.55)
pt3dadd(22.38, 7.73, -6.5, 0.55)
pt3dadd(21.6, 7.34, -6.5, 0.55)
pt3dadd(21.45, 7.34, -6.5, 0.55)
pt3dadd(20.43, 7.11, -6.5, 0.55)
pt3dadd(19.57, 7.11, -6.5, 0.55)
pt3dadd(19.34, 7.11, -6.5, 0.55)
pt3dadd(17.93, 7.19, -6.5, 0.55)
pt3dadd(17.85, 7.27, -6.5, 0.55)
pt3dadd(16.84, 7.73, -6.5, 0.55)
}
dend[310] {pt3dclear()
pt3dadd(23.79, 9.77, -6.5, 0.55)
pt3dadd(24.41, 8.75, -6.5, 0.55)
}
dend[311] {pt3dclear()
pt3dadd(24.41, 8.75, -6.5, 0.55)
pt3dadd(23.67, 7.93, -6.5, 0.55)
}
dend[312] {pt3dclear()
pt3dadd(23.67, 7.93, -6.5, 0.55)
pt3dadd(23.24, 6.88, -6.5, 0.55)
pt3dadd(23.24, 6.72, -6.5, 0.55)
pt3dadd(22.77, 5.7, -6.5, 0.55)
pt3dadd(22.07, 4.05, -6.5, 0.55)
pt3dadd(21.99, 3.98, -6.5, 0.55)
pt3dadd(21.05, 2.27, -6.5, 0.55)
pt3dadd(20.43, 0.7, -6.5, 0.55)
pt3dadd(19.96, 0.07, -6.5, 0.55)
}
dend[313] {pt3dclear()
pt3dadd(19.96, 0.07, -6.5, 0.55)
pt3dadd(18.87, -0.07, -6.75, 0.55)
pt3dadd(16.98, -0.86, -6.75, 0.55)
pt3dadd(15.74, -0.7, -6.75, 0.55)
pt3dadd(15.04, -0.47, -6.75, 0.55)
pt3dadd(13.95, 0.23, -6.75, 0.55)
}
dend[314] {pt3dclear()
pt3dadd(19.96, 0.07, -6.5, 0.55)
pt3dadd(20.12, -0.86, -6.5, 0.55)
pt3dadd(19.88, -2.34, -6.5, 0.55)
pt3dadd(19.57, -4.22, -6.5, 0.55)
pt3dadd(19.48, -4.3, -6.5, 0.55)
pt3dadd(19.73, -5.7, -6.5, 0.55)
pt3dadd(20.2, -6.8, -6.5, 0.55)
pt3dadd(20.51, -7.89, -6.5, 0.55)
pt3dadd(20.51, -8.13, -6.5, 0.55)
pt3dadd(20.9, -8.67, -6.5, 0.55)
}
dend[315] {pt3dclear()
pt3dadd(23.67, 7.93, -6.5, 0.55)
pt3dadd(24.96, 7.03, -6.5, 0.55)
pt3dadd(24.73, 5.94, -6.5, 0.55)
}
}
proc shape3d_11() {
dend[315] { pt3dadd(24.73, 5.31, -6.5, 0.55)
pt3dadd(24.49, 4.13, -6.5, 0.55)
pt3dadd(24.49, 3.91, -6.5, 0.55)
pt3dadd(24.41, 2.66, -6.5, 0.55)
pt3dadd(24.49, 1.48, -6.5, 0.55)
}
dend[316] {pt3dclear()
pt3dadd(24.49, 1.48, -6.5, 0.55)
pt3dadd(23.87, 0.63, -6.5, 0.55)
pt3dadd(23.48, -0.23, -6.5, 0.55)
pt3dadd(23.4, -0.31, -6.5, 0.55)
pt3dadd(23.4, -0.55, -6.5, 0.55)
pt3dadd(23.32, -0.7, -6.5, 0.55)
pt3dadd(23.09, -1.41, -6.5, 0.55)
pt3dadd(22.54, -2.11, -6.5, 0.55)
pt3dadd(21.84, -2.34, -6.5, 0.55)
pt3dadd(21.68, -2.34, -6.5, 0.55)
}
dend[317] {pt3dclear()
pt3dadd(24.49, 1.48, -6.5, 0.55)
pt3dadd(25.27, 0.55, -6.5, 0.55)
pt3dadd(25.74, -0.31, -6.5, 0.55)
}
dend[318] {pt3dclear()
pt3dadd(24.41, 8.75, -6.5, 0.55)
pt3dadd(25.43, 8.44, -5, 0.55)
pt3dadd(26.52, 8.13, -5, 0.55)
pt3dadd(26.91, 8.05, -5, 0.55)
}
dend[319] {pt3dclear()
pt3dadd(26.91, 8.05, -5, 0.55)
pt3dadd(27.62, 6.41, -5, 0.7)
pt3dadd(27.54, 6.33, -5, 0.7)
pt3dadd(28.09, 5.31, -5, 0.7)
pt3dadd(28.24, 4.53, -5, 0.7)
pt3dadd(28.55, 3.67, -5, 0.7)
pt3dadd(28.24, 2.66, -5, 0.7)
pt3dadd(27.93, 1.95, -5, 0.7)
}
dend[320] {pt3dclear()
pt3dadd(26.91, 8.05, -5, 0.55)
pt3dadd(28.24, 9.06, -4.75, 0.23)
pt3dadd(28.87, 9.38, -4.75, 0.23)
pt3dadd(30.2, 10.7, -4.5, 0.158)
}
dend[321] {pt3dclear()
pt3dadd(21.91, 14.38, -7, 0.86)
pt3dadd(20.59, 14.3, -5.75, 0.47)
pt3dadd(19.34, 13.75, -5.75, 0.47)
pt3dadd(18.39, 13.13, -5.75, 0.47)
pt3dadd(17.77, 12.11, -5.75, 0.47)
pt3dadd(16.6, 10.55, -5.75, 0.47)
pt3dadd(15.04, 10.31, -5.75, 0.47)
pt3dadd(13.55, 10.47, -5.75, 0.7)
}
dend[322] {pt3dclear()
pt3dadd(13.55, 10.47, -5.75, 0.7)
pt3dadd(13.09, 10.08, -5.75, 0.7)
pt3dadd(11.99, 9.92, -5.75, 0.7)
pt3dadd(11.84, 9.92, -5.75, 0.7)
pt3dadd(11.29, 9.77, -5.75, 0.7)
pt3dadd(10.9, 9.77, -5.75, 0.7)
pt3dadd(10.82, 9.69, -5.75, 0.7)
pt3dadd(10.66, 9.69, -5.75, 0.7)
pt3dadd(10.19, 9.61, -5.75, 0.7)
pt3dadd(10.03, 9.52, -5.75, 0.7)
pt3dadd(9.88, 9.44, -5.75, 0.7)
pt3dadd(9.26, 9.3, -5.75, 0.7)
pt3dadd(9.1, 9.3, -5.75, 0.7)
pt3dadd(8.55, 9.14, -5.75, 0.7)
pt3dadd(8.4, 9.14, -5.75, 0.7)
pt3dadd(7.46, 9.14, -5.75, 0.7)
pt3dadd(7.07, 9.14, -5.75, 0.7)
pt3dadd(6.13, 9.22, -5.75, 0.7)
}
dend[323] {pt3dclear()
pt3dadd(13.55, 10.47, -5.75, 0.7)
pt3dadd(12.7, 12.34, -5.75, 0.7)
pt3dadd(11.52, 13.75, -5.75, 0.7)
pt3dadd(10.35, 14.45, -5.75, 0.7)
pt3dadd(9.49, 14.61, -5.75, 0.7)
pt3dadd(9.41, 14.53, -5.75, 0.7)
}
dend[324] {pt3dclear()
pt3dadd(9.41, 14.53, -5.75, 0.7)
pt3dadd(9.1, 13.98, -5.75, 0.7)
pt3dadd(8.16, 13.59, -5.75, 0.7)
pt3dadd(7.7, 13.28, -5.75, 0.7)
pt3dadd(6.91, 12.81, -5.75, 0.7)
pt3dadd(6.68, 12.34, -5.75, 0.7)
}
dend[325] {pt3dclear()
pt3dadd(9.41, 14.53, -5.75, 0.7)
pt3dadd(9.1, 15.39, -5, 0.7)
pt3dadd(8.78, 16.8, -5, 0.7)
}
dend[326] {pt3dclear()
pt3dadd(24.1, 21.17, -6, 1.41)
pt3dadd(25.47, 21.25, -7.75, 1.41)
pt3dadd(27.19, 21.56, -7.75, 1.41)
pt3dadd(27.34, 21.56, -7.75, 1.41)
pt3dadd(28.91, 22.19, -7.75, 1.41)
pt3dadd(29.06, 22.19, -7.75, 1.41)
pt3dadd(30.94, 22.66, -7.75, 1.41)
pt3dadd(31.58, 22.89, -7.75, 0.66)
pt3dadd(32.44, 23.28, -7.75, 0.66)
pt3dadd(33.18, 23.59, -7.75, 0.66)
pt3dadd(34.08, 23.91, -7.75, 1.33)
pt3dadd(34.67, 24.1, -7.75, 1.33)
pt3dadd(34.94, 24.02, -7.75, 1.33)
}
dend[327] {pt3dclear()
pt3dadd(34.94, 24.02, -7.75, 1.33)
pt3dadd(35.79, 23.79, -7.75, 1.33)
pt3dadd(36.15, 23.59, -7.75, 1.33)
pt3dadd(37.97, 22.93, -7.5, 1.41)
pt3dadd(38.2, 22.85, -7.5, 1.25)
pt3dadd(40.08, 22.38, -7.5, 1.33)
pt3dadd(41.25, 21.99, -7.5, 1.33)
}
dend[328] {pt3dclear()
pt3dadd(41.25, 21.99, -7.5, 1.33)
pt3dadd(43.2, 21.91, -7.5, 1.56)
pt3dadd(45.39, 22.15, -7.5, 1.56)
}
dend[329] {pt3dclear()
pt3dadd(45.39, 22.15, -7.5, 1.56)
pt3dadd(46.87, 20.97, -7.5, 1.56)
pt3dadd(47.5, 20.27, -7.5, 1.56)
pt3dadd(48.71, 19.84, -8, 1.56)
}
dend[330] {pt3dclear()
pt3dadd(48.71, 19.84, -8, 1.56)
pt3dadd(49.29, 19.41, -7.5, 1.56)
pt3dadd(50.08, 19.02, -7.5, 1.56)
pt3dadd(52.42, 17.77, -7.5, 1.56)
pt3dadd(52.58, 17.7, -7.5, 1.56)
}
dend[331] {pt3dclear()
pt3dadd(52.58, 17.7, -7.5, 1.56)
pt3dadd(56.29, 18.84, -7.75, 1.72)
}
dend[332] {pt3dclear()
pt3dadd(56.29, 18.84, -7.75, 1.72)
pt3dadd(58.13, 19.53, -7.75, 1.72)
pt3dadd(59.57, 20.39, -5.5, 1.72)
}
dend[333] {pt3dclear()
pt3dadd(59.57, 20.39, -5.5, 1.72)
pt3dadd(60.63, 20.94, -7.75, 1.72)
pt3dadd(62.19, 21.72, -7.75, 1.72)
pt3dadd(64.38, 22.03, -7.75, 1.72)
pt3dadd(65.7, 22.18, -7.75, 1.72)
pt3dadd(66.59, 22.5, -8.25, 1.72)
}
dend[334] {pt3dclear()
pt3dadd(66.59, 22.5, -8.25, 1.72)
pt3dadd(67.42, 22.66, -7.75, 1.72)
pt3dadd(69.22, 22.66, -7.75, 1.72)
pt3dadd(70.16, 22.73, -11.75, 1.72)
}
dend[335] {pt3dclear()
pt3dadd(70.16, 22.73, -11.75, 1.72)
pt3dadd(72.5, 22.66, -7.75, 1.72)
pt3dadd(74.53, 22.97, -7.75, 1.72)
pt3dadd(75.39, 23.21, -7.75, 1.72)
pt3dadd(76.33, 23.52, -11.75, 1.72)
}
dend[336] {pt3dclear()
pt3dadd(76.33, 23.52, -11.75, 1.72)
pt3dadd(77.3, 23.45, -8.44, 1.72)
}
dend[337] {pt3dclear()
pt3dadd(77.3, 23.45, -8.44, 1.72)
pt3dadd(77.5, 23.44, -7.75, 1.72)
pt3dadd(79.38, 24.38, -11.75, 1.72)
}
dend[338] {pt3dclear()
pt3dadd(79.38, 24.38, -11.75, 1.72)
pt3dadd(80.31, 24.84, -7.75, 1.72)
pt3dadd(80.94, 25.16, -7.75, 1.72)
}
dend[339] {pt3dclear()
pt3dadd(80.94, 25.16, -7.75, 1.72)
pt3dadd(82.81, 26.72, -7.75, 1.72)
pt3dadd(84.06, 27.66, -7.75, 1.25)
pt3dadd(85.94, 28.44, -7.75, 1.25)
pt3dadd(85.94, 28.28, -7.75, 1.25)
pt3dadd(87.03, 28.91, -7.75, 1.25)
}
dend[340] {pt3dclear()
pt3dadd(87.03, 28.91, -7.75, 1.25)
pt3dadd(87.41, 30.42, -7.75, 0.78)
}
dend[341] {pt3dclear()
pt3dadd(87.41, 30.42, -7.75, 0.78)
pt3dadd(87.34, 30.16, -7.75, 0.78)
pt3dadd(88.44, 31.56, -7.75, 0.78)
pt3dadd(89.69, 32.97, -7.75, 0.78)
pt3dadd(91.09, 34.06, -7.75, 0.78)
pt3dadd(92.66, 35.15, -7.75, 0.78)
pt3dadd(94.06, 36.4, -7.75, 0.78)
pt3dadd(94.84, 37.65, -7.75, 0.78)
pt3dadd(95.63, 38.75, -7.75, 0.78)
pt3dadd(96.56, 39.38, -7.75, 0.78)
}
dend[342] {pt3dclear()
pt3dadd(96.56, 39.38, -7.75, 0.78)
pt3dadd(98.1, 39.65, -7.75, 0.78)
}
dend[343] {pt3dclear()
pt3dadd(98.1, 39.65, -7.75, 0.78)
pt3dadd(99.22, 39.84, -7.75, 0.78)
pt3dadd(99.22, 39.69, -7.75, 0.78)
pt3dadd(100.9, 40.31, -7.75, 0.78)
pt3dadd(101.1, 40.31, -7.75, 0.78)
pt3dadd(102.8, 41.41, -7.75, 0.78)
pt3dadd(104.1, 42.34, -7.75, 0.78)
pt3dadd(104.7, 42.97, -7.75, 0.78)
}
dend[344] {pt3dclear()
pt3dadd(98.1, 39.65, -7.75, 0.78)
pt3dadd(98.44, 41.25, -7.75, 0.78)
pt3dadd(99.69, 42.81, -7.75, 0.78)
pt3dadd(100.6, 43.75, -7.75, 0.78)
pt3dadd(100.8, 43.75, -7.75, 0.78)
pt3dadd(101.7, 44.69, -7.75, 0.78)
pt3dadd(101.9, 44.84, -7.75, 0.78)
pt3dadd(102.8, 45.94, -7.75, 0.78)
pt3dadd(103, 46.09, -7.75, 0.78)
pt3dadd(104.1, 47.19, -7.75, 0.78)
pt3dadd(104.4, 47.5, -7.75, 0.78)
}
dend[345] {pt3dclear()
pt3dadd(104.4, 47.5, -7.75, 0.78)
pt3dadd(106.9, 47.81, -7.75, 0.78)
pt3dadd(108.1, 48.44, -7.75, 0.78)
pt3dadd(108.6, 48.59, -7.75, 0.78)
pt3dadd(108.9, 49.06, -7.75, 0.78)
pt3dadd(109.1, 49.22, -7.75, 0.78)
pt3dadd(109.2, 49.38, -7.75, 0.78)
pt3dadd(110, 49.84, -7.75, 0.78)
pt3dadd(110.3, 50, -7.75, 0.78)
pt3dadd(111.1, 50.47, -7.75, 0.78)
pt3dadd(111.4, 50.63, -7.75, 0.78)
pt3dadd(112.8, 51.41, -7.75, 0.78)
}
dend[346] {pt3dclear()
pt3dadd(112.8, 51.41, -7.75, 0.78)
pt3dadd(113.6, 52.81, -7.5, 0.78)
pt3dadd(115.5, 54.22, -7.5, 0.78)
pt3dadd(116.4, 55, -7.5, 0.78)
pt3dadd(116.4, 55.16, -7.5, 0.78)
pt3dadd(116.7, 55.63, -7.5, 0.78)
}
dend[347] {pt3dclear()
pt3dadd(112.8, 51.41, -7.75, 0.78)
pt3dadd(114.7, 51.41, -7.75, 0.78)
pt3dadd(115.9, 51.88, -7.75, 0.78)
pt3dadd(116.3, 51.88, -7.75, 0.78)
pt3dadd(116.9, 52.19, -7.75, 0.78)
pt3dadd(117, 52.34, -7.75, 0.78)
pt3dadd(117.7, 53.13, -7.75, 0.78)
}
dend[348] {pt3dclear()
pt3dadd(104.4, 47.5, -7.75, 0.78)
}
}
proc shape3d_12() {
dend[348] { pt3dadd(104.8, 49.06, -7.5, 0.78)
}
dend[349] {pt3dclear()
pt3dadd(104.8, 49.06, -7.5, 0.78)
pt3dadd(107.2, 50.63, -7.5, 0.78)
pt3dadd(109.1, 51.72, -7.5, 0.78)
pt3dadd(109.4, 51.88, -7.5, 0.78)
pt3dadd(110.6, 53.13, -7.5, 0.78)
pt3dadd(110.8, 53.13, -7.5, 0.78)
pt3dadd(112.2, 54.22, -7.5, 0.78)
pt3dadd(112.8, 55.16, -7.5, 0.78)
pt3dadd(113, 55.16, -7.5, 0.78)
pt3dadd(114.1, 56.25, -7.5, 0.78)
pt3dadd(114.2, 56.41, -7.5, 0.78)
pt3dadd(114.4, 56.56, -7.5, 0.78)
pt3dadd(114.7, 57.03, -7.5, 0.78)
pt3dadd(115, 57.5, -7.5, 0.78)
pt3dadd(116.1, 58.44, -7.5, 0.78)
pt3dadd(116.3, 58.44, -7.5, 0.78)
pt3dadd(116.6, 58.75, -7.5, 0.78)
}
dend[350] {pt3dclear()
pt3dadd(104.8, 49.06, -7.5, 0.78)
pt3dadd(104.8, 51.41, -7.5, 0.78)
pt3dadd(105, 52.66, -7.5, 0.78)
pt3dadd(105, 52.97, -7.5, 0.78)
pt3dadd(105.5, 53.75, -7.5, 0.78)
pt3dadd(105.6, 54.06, -7.5, 0.78)
pt3dadd(106.4, 54.69, -7.5, 0.78)
pt3dadd(107.5, 55.78, -7.5, 0.78)
pt3dadd(107.8, 55.94, -7.5, 0.78)
pt3dadd(108.4, 56.56, -7.5, 0.78)
pt3dadd(108.4, 56.72, -7.5, 0.78)
pt3dadd(109.2, 57.34, -7.5, 0.78)
pt3dadd(110.6, 57.66, -7.5, 0.158)
pt3dadd(111.5, 58.52, -7.5, 0.158)
pt3dadd(111.7, 58.67, -7.5, 0.158)
pt3dadd(112.3, 59.38, -7.5, 0.158)
pt3dadd(112.3, 59.53, -7.5, 0.158)
pt3dadd(113, 60.16, -7.5, 0.158)
pt3dadd(113.1, 60.31, -7.5, 0.158)
pt3dadd(114, 60.78, -7.5, 0.158)
pt3dadd(114.5, 61.41, -7.5, 0.158)
pt3dadd(114.5, 61.64, -7.5, 0.158)
pt3dadd(115.4, 62.42, -7.5, 0.158)
pt3dadd(115.6, 62.73, -7.5, 0.158)
}
dend[351] {pt3dclear()
pt3dadd(96.56, 39.38, -7.75, 0.78)
pt3dadd(96.56, 41.56, -7.75, 0.78)
pt3dadd(97.5, 43.28, -7.75, 0.78)
pt3dadd(98.91, 44.22, -7.75, 0.78)
pt3dadd(98.91, 44.38, -7.75, 0.78)
pt3dadd(99.53, 45.16, -7.75, 0.78)
}
dend[352] {pt3dclear()
pt3dadd(87.41, 30.42, -7.75, 0.78)
pt3dadd(89.84, 30.16, -8.25, 0.78)
pt3dadd(92.19, 31.56, -8.25, 0.78)
pt3dadd(93.13, 32.19, -8.25, 1.09)
pt3dadd(93.13, 32.34, -8.25, 1.09)
}
dend[353] {pt3dclear()
pt3dadd(93.13, 32.34, -8.25, 1.09)
pt3dadd(95.94, 32.19, -8.25, 0.94)
pt3dadd(97.19, 32.65, -8.25, 0.94)
pt3dadd(97.81, 32.65, -8.25, 0.94)
pt3dadd(99.22, 33.28, -8.25, 0.94)
pt3dadd(99.38, 33.28, -8.25, 0.94)
pt3dadd(101.6, 33.44, -8.25, 0.94)
pt3dadd(101.7, 33.44, -8.25, 0.94)
pt3dadd(102.5, 33.44, -8.25, 0.94)
pt3dadd(102.7, 33.28, -8.25, 0.94)
pt3dadd(104.1, 33.28, -8.25, 0.94)
pt3dadd(105.9, 33.28, -8.25, 0.94)
pt3dadd(107.2, 34.92, -8.25, 0.94)
pt3dadd(108.8, 36.01, -8.25, 0.84)
pt3dadd(110.2, 36.95, -8.25, 0.84)
pt3dadd(111.3, 37.72, -8.25, 0.84)
pt3dadd(112.7, 38.67, -8.25, 0.84)
}
dend[354] {pt3dclear()
pt3dadd(112.7, 38.67, -8.25, 0.84)
pt3dadd(114.4, 38.67, -8.25, 0.74)
pt3dadd(115.7, 39.14, -8.25, 0.74)
pt3dadd(117.1, 39.61, -8.25, 0.74)
pt3dadd(117.8, 40.24, -8.25, 0.74)
pt3dadd(119, 40.86, -8.25, 0.74)
}
dend[355] {pt3dclear()
pt3dadd(112.7, 38.67, -8.25, 0.84)
pt3dadd(113, 40.7, -8.25, 0.78)
pt3dadd(113, 40.86, -8.25, 0.158)
pt3dadd(114.1, 42.58, -8.25, 0.158)
pt3dadd(114.3, 42.89, -8.25, 0.158)
pt3dadd(115, 44.3, -8.25, 0.74)
pt3dadd(115, 44.61, -8.25, 0.74)
pt3dadd(116, 45.55, -8.25, 0.74)
pt3dadd(117.4, 46.64, -8.25, 0.74)
pt3dadd(119.4, 47.58, -8.25, 0.74)
}
dend[356] {pt3dclear()
pt3dadd(93.13, 32.34, -8.25, 1.09)
pt3dadd(94.06, 33.9, -8.25, 0.94)
pt3dadd(95.31, 35.94, -8.25, 0.94)
pt3dadd(97.97, 36.25, -8.25, 0.94)
pt3dadd(100, 37.19, -8.25, 0.94)
pt3dadd(100.3, 37.5, -8.25, 0.94)
pt3dadd(101.9, 38.9, -8.25, 0.94)
pt3dadd(102.2, 39.06, -8.25, 0.94)
pt3dadd(103.9, 40.15, -8.25, 0.94)
pt3dadd(104.1, 40.31, -8.25, 0.94)
pt3dadd(105.3, 40.94, -8.25, 0.94)
pt3dadd(105.6, 40.94, -8.25, 0.94)
pt3dadd(106.7, 41.56, -8.25, 0.94)
pt3dadd(107, 41.72, -8.25, 0.94)
pt3dadd(107.7, 42.5, -8.25, 0.94)
pt3dadd(107.8, 42.66, -8.25, 0.94)
pt3dadd(109.2, 43.44, -8.25, 0.94)
pt3dadd(109.4, 43.59, -8.25, 0.94)
pt3dadd(110.5, 44.53, -8.25, 0.94)
}
dend[357] {pt3dclear()
pt3dadd(110.5, 44.53, -8.25, 0.94)
pt3dadd(110.8, 46.25, -8.25, 0.94)
pt3dadd(110.6, 46.41, -8.25, 0.94)
pt3dadd(111.7, 47.66, -8.25, 0.94)
pt3dadd(112, 47.97, -8.25, 0.94)
pt3dadd(112.2, 48.13, -8.25, 0.94)
pt3dadd(113.6, 49.22, -8.25, 0.94)
pt3dadd(113.9, 49.38, -8.25, 0.94)
pt3dadd(114.5, 50.16, -8.25, 0.94)
}
dend[358] {pt3dclear()
pt3dadd(110.5, 44.53, -8.25, 0.94)
pt3dadd(113.3, 44.38, -8.25, 0.94)
pt3dadd(114.8, 43.91, -8.25, 0.94)
pt3dadd(115.3, 43.91, -8.25, 0.94)
pt3dadd(118.6, 44.22, -8.25, 0.94)
pt3dadd(118.8, 44.22, -8.25, 0.94)
pt3dadd(119.8, 44.84, -8.25, 0.94)
pt3dadd(120.5, 45, -8.25, 0.94)
}
dend[359] {pt3dclear()
pt3dadd(87.03, 28.91, -7.75, 1.25)
pt3dadd(87.97, 27.34, -8.25, 0.78)
pt3dadd(88.13, 27.34, -8.25, 0.78)
pt3dadd(89.38, 26.56, -8.25, 0.78)
pt3dadd(90.63, 26.56, -8.25, 0.78)
pt3dadd(90.94, 26.56, -8.25, 0.78)
pt3dadd(91.72, 27.03, -8.25, 0.78)
pt3dadd(91.88, 27.19, -8.25, 0.78)
pt3dadd(93.91, 27.81, -8.25, 0.78)
pt3dadd(94.06, 27.81, -8.25, 0.78)
pt3dadd(95.31, 28.44, -8.25, 0.78)
pt3dadd(95.63, 28.44, -8.25, 0.78)
pt3dadd(96.41, 29.22, -8.25, 0.78)
pt3dadd(97.03, 29.38, -8.25, 0.78)
pt3dadd(98.91, 29.69, -8.25, 0.78)
pt3dadd(103.6, 30.31, -8.25, 0.78)
pt3dadd(105.6, 31.25, -8.25, 0.78)
pt3dadd(107, 32.03, -8.25, 0.78)
pt3dadd(107.2, 32.03, -8.25, 0.78)
pt3dadd(108, 33.28, -8.25, 0.78)
pt3dadd(108.1, 33.28, -8.25, 0.78)
pt3dadd(110.6, 32.5, -8.25, 0.78)
pt3dadd(112.8, 32.65, -8.25, 0.78)
pt3dadd(113, 32.65, -8.25, 0.78)
pt3dadd(114.2, 33.28, -8.25, 0.78)
pt3dadd(114.5, 33.28, -8.25, 0.78)
pt3dadd(115.5, 33.9, -8.25, 0.78)
pt3dadd(115.6, 33.9, -8.25, 0.78)
}
dend[360] {pt3dclear()
pt3dadd(80.94, 25.16, -7.75, 1.72)
pt3dadd(81.29, 26.72, -7, 0.39)
pt3dadd(81.68, 27.66, -7, 0.39)
pt3dadd(82.23, 28.36, -7, 0.39)
pt3dadd(82.54, 28.83, -7, 0.63)
pt3dadd(84.02, 30, -7, 0.63)
pt3dadd(85.04, 31.02, -7, 0.63)
pt3dadd(85.74, 31.64, -7, 0.63)
pt3dadd(86.29, 32.42, -7, 0.63)
pt3dadd(86.76, 34.06, -7, 0.63)
pt3dadd(86.68, 34.14, -7, 0.63)
pt3dadd(87.07, 35.7, -7, 0.63)
pt3dadd(87.15, 35.78, -7, 0.63)
pt3dadd(87.85, 37.58, -7, 0.63)
pt3dadd(88.63, 38.9, -7, 0.63)
pt3dadd(89.41, 39.61, -7, 0.63)
pt3dadd(90.43, 39.77, -7, 0.63)
pt3dadd(90.82, 39.77, -7, 0.63)
}
dend[361] {pt3dclear()
pt3dadd(79.38, 24.38, -11.75, 1.72)
pt3dadd(82.66, 23.59, -10.25, 0.78)
pt3dadd(86.09, 22.97, -10.25, 0.78)
pt3dadd(89.06, 22.66, -10.25, 0.78)
pt3dadd(89.06, 22.5, -10.25, 0.78)
}
dend[362] {pt3dclear()
pt3dadd(89.06, 22.5, -10.25, 0.78)
pt3dadd(91.25, 23.59, -10.25, 0.78)
pt3dadd(92.19, 24.38, -10.25, 0.78)
pt3dadd(93.13, 25.16, -10.25, 0.78)
pt3dadd(93.44, 25.31, -10.25, 0.78)
pt3dadd(93.75, 25.78, -10.25, 0.78)
}
dend[363] {pt3dclear()
pt3dadd(89.06, 22.5, -10.25, 0.78)
pt3dadd(92.03, 20.3, -10.5, 0.78)
}
dend[364] {pt3dclear()
pt3dadd(92.03, 20.3, -10.5, 0.78)
pt3dadd(95, 21.41, -10.5, 0.78)
pt3dadd(95.74, 22.27, -10.25, 0.78)
}
dend[365] {pt3dclear()
pt3dadd(95.74, 22.27, -10.25, 0.78)
pt3dadd(96.41, 22.5, -10.5, 0.78)
pt3dadd(98.28, 24.22, -10.25, 0.78)
pt3dadd(98.28, 24.06, -10.25, 0.78)
pt3dadd(99.53, 24.84, -10.25, 0.78)
pt3dadd(99.69, 24.84, -10.25, 0.78)
pt3dadd(101.3, 25.31, -10.25, 0.78)
pt3dadd(102.6, 24.92, -10.25, 0.74)
pt3dadd(105, 24.45, -10.25, 0.74)
}
dend[366] {pt3dclear()
pt3dadd(105, 24.45, -10.25, 0.74)
pt3dadd(106.8, 26.02, -10.25, 0.74)
pt3dadd(107, 26.17, -10.25, 0.74)
pt3dadd(107.6, 27.42, -10.25, 0.158)
pt3dadd(107.6, 27.73, -10.25, 0.74)
pt3dadd(107.5, 29.14, -10.25, 0.158)
}
dend[367] {pt3dclear()
pt3dadd(105, 24.45, -10.25, 0.74)
}
}
proc shape3d_13() {
dend[367] { pt3dadd(106.7, 22.73, -10.25, 0.74)
pt3dadd(106.7, 22.58, -10.25, 0.158)
pt3dadd(108.6, 21.02, -10.25, 0.74)
pt3dadd(109.2, 21.17, -10.25, 0.74)
}
dend[368] {pt3dclear()
pt3dadd(95.74, 22.27, -10.25, 0.78)
pt3dadd(98.4, 21.48, -10, 0.158)
}
dend[369] {pt3dclear()
pt3dadd(98.4, 21.48, -10, 0.158)
pt3dadd(100.6, 22.11, -10, 0.158)
pt3dadd(101.7, 22.89, -10, 0.158)
pt3dadd(101.8, 23.2, -10, 0.158)
}
dend[370] {pt3dclear()
pt3dadd(98.4, 21.48, -10, 0.158)
pt3dadd(99.18, 20.39, -9.75, 0.158)
pt3dadd(99.18, 20.07, -9.75, 0.158)
pt3dadd(100.7, 20.07, -9.75, 0.158)
}
dend[371] {pt3dclear()
pt3dadd(92.03, 20.3, -10.5, 0.78)
pt3dadd(92.97, 18.28, -10.25, 0.78)
pt3dadd(93.95, 17.27, -9.25, 0.78)
}
dend[372] {pt3dclear()
pt3dadd(93.95, 17.27, -9.25, 0.78)
pt3dadd(94.45, 16.25, -10.25, 0.78)
pt3dadd(95.31, 14.69, -9.25, 0.78)
pt3dadd(95.63, 14.22, -9.5, 0.78)
pt3dadd(95.47, 14.22, -9.5, 0.78)
}
dend[373] {pt3dclear()
pt3dadd(95.47, 14.22, -9.5, 0.78)
pt3dadd(97.03, 14.14, -9.5, 0.78)
}
dend[374] {pt3dclear()
pt3dadd(97.03, 14.14, -9.5, 0.78)
pt3dadd(98.59, 14.06, -9.5, 0.78)
pt3dadd(100.9, 13.75, -9.5, 0.78)
pt3dadd(102.7, 13.91, -9.5, 0.78)
pt3dadd(104.1, 14.06, -9.5, 0.78)
}
dend[375] {pt3dclear()
pt3dadd(97.03, 14.14, -9.5, 0.78)
pt3dadd(95.47, 12.34, -9.5, 0.78)
pt3dadd(95.47, 12.19, -9.5, 0.78)
pt3dadd(95.63, 10.78, -9.5, 0.78)
pt3dadd(95.63, 10.63, -9.5, 0.78)
pt3dadd(95.78, 9.52, -9.5, 0.78)
pt3dadd(95.78, 9.38, -9.5, 0.78)
}
dend[376] {pt3dclear()
pt3dadd(95.78, 9.38, -9.5, 0.78)
pt3dadd(93.44, 7.5, -9.5, 1.09)
pt3dadd(93.44, 7.34, -9.5, 1.09)
pt3dadd(90.94, 6.09, -9.5, 1.09)
pt3dadd(90.94, 5.94, -9.5, 1.09)
pt3dadd(89.22, 4.38, -9.5, 1.09)
pt3dadd(89.22, 4.22, -9.5, 1.09)
pt3dadd(88.75, 3.59, -9.5, 1.09)
pt3dadd(86.56, 2.19, -9.5, 1.09)
pt3dadd(86.56, 2.02, -9.5, 1.09)
pt3dadd(86.72, 0.94, -9.5, 1.09)
pt3dadd(86.72, 0.63, -9.5, 1.09)
pt3dadd(87.03, -0.31, -9.5, 1.09)
}
dend[377] {pt3dclear()
pt3dadd(95.78, 9.38, -9.5, 0.78)
pt3dadd(97.03, 7.5, -9.5, 1.09)
pt3dadd(96.88, 7.5, -9.5, 1.09)
}
dend[378] {pt3dclear()
pt3dadd(95.47, 14.22, -9.5, 0.78)
pt3dadd(97.15, 12.89, -10.75, 0.158)
pt3dadd(98.4, 11.33, -10.75, 0.158)
pt3dadd(98.55, 11.17, -10.75, 0.158)
pt3dadd(99.18, 10.7, -10.75, 0.158)
pt3dadd(99.49, 10.7, -10.75, 0.158)
pt3dadd(100.6, 10.55, -10.75, 0.158)
pt3dadd(101.5, 10.7, -10.75, 0.158)
pt3dadd(102.2, 10.86, -10.75, 0.158)
}
dend[379] {pt3dclear()
pt3dadd(93.95, 17.27, -9.25, 0.78)
pt3dadd(95.98, 17.03, -9, 0.63)
pt3dadd(97.38, 16.95, -9, 0.63)
pt3dadd(98.32, 16.95, -9, 0.63)
pt3dadd(100.3, 17.34, -9.5, 0.63)
}
dend[380] {pt3dclear()
pt3dadd(100.3, 17.34, -9.5, 0.63)
pt3dadd(101.6, 17.11, -9.5, 0.47)
pt3dadd(102.5, 17.19, -9.5, 0.47)
pt3dadd(102.8, 17.57, -9.5, 0.47)
pt3dadd(102.8, 17.73, -9.5, 0.47)
pt3dadd(102.8, 18.13, -9.5, 0.47)
}
dend[381] {pt3dclear()
pt3dadd(100.3, 17.34, -9.5, 0.63)
pt3dadd(101.3, 18.67, -9.5, 0.47)
pt3dadd(102, 19.69, -9.5, 0.47)
}
dend[382] {pt3dclear()
pt3dadd(77.3, 23.45, -8.44, 1.72)
pt3dadd(76.45, 24.45, -8.75, 0.47)
pt3dadd(77.54, 26.72, -8.75, 0.47)
pt3dadd(77.45, 26.64, -8.75, 0.47)
}
dend[383] {pt3dclear()
pt3dadd(77.45, 26.64, -8.75, 0.47)
pt3dadd(78.87, 26.64, -8.75, 0.47)
pt3dadd(79.8, 26.88, -8.75, 0.55)
pt3dadd(80.9, 27.19, -8.75, 0.55)
pt3dadd(80.98, 27.27, -8.75, 0.55)
pt3dadd(81.52, 27.73, -8.75, 0.55)
}
dend[384] {pt3dclear()
pt3dadd(77.45, 26.64, -8.75, 0.47)
pt3dadd(77.7, 27.81, -8.75, 0.55)
pt3dadd(78.55, 28.83, -8.75, 0.55)
pt3dadd(78.63, 28.91, -8.75, 0.55)
pt3dadd(79.65, 30, -8.75, 0.55)
pt3dadd(80.9, 30.55, -8.75, 0.55)
pt3dadd(82.38, 31.64, -8.75, 0.55)
pt3dadd(83.71, 32.72, -8.75, 0.55)
pt3dadd(84.88, 33.44, -8.75, 0.55)
pt3dadd(86.37, 34.29, -8.75, 0.55)
pt3dadd(87.7, 35, -8.75, 0.55)
pt3dadd(89.26, 36.17, -8.75, 0.55)
pt3dadd(90.27, 36.64, -8.75, 0.55)
pt3dadd(91.21, 37.42, -8.75, 0.55)
}
dend[385] {pt3dclear()
pt3dadd(76.33, 23.52, -11.75, 1.72)
pt3dadd(77.5, 22.66, -8.75, 0.78)
pt3dadd(77.34, 22.66, -8.75, 0.78)
pt3dadd(78.13, 21.72, -8.75, 0.78)
}
dend[386] {pt3dclear()
pt3dadd(78.13, 21.72, -8.75, 0.78)
pt3dadd(80.47, 21.09, -8.75, 0.78)
pt3dadd(82.03, 20.63, -8.75, 0.78)
pt3dadd(82.97, 19.53, -8.75, 0.78)
pt3dadd(83.75, 19.05, -8.75, 0.78)
}
dend[387] {pt3dclear()
pt3dadd(83.75, 19.05, -8.75, 0.78)
pt3dadd(83.32, 17.55, -8.75, 0.78)
}
dend[388] {pt3dclear()
pt3dadd(83.32, 17.55, -8.75, 0.78)
pt3dadd(83.44, 17.97, -8.75, 0.78)
pt3dadd(84.06, 17.03, -8.75, 0.78)
pt3dadd(84.06, 16.88, -8.75, 0.78)
pt3dadd(84.53, 16.25, -8.75, 0.78)
pt3dadd(84.53, 16.09, -8.75, 0.78)
pt3dadd(85.16, 15.63, -8.75, 0.78)
pt3dadd(85.31, 15.63, -8.75, 0.78)
pt3dadd(86.09, 15, -8.75, 0.78)
pt3dadd(86.25, 14.84, -8.75, 0.78)
pt3dadd(86.88, 14.06, -8.75, 0.78)
pt3dadd(87.19, 12.66, -8.5, 0.78)
pt3dadd(87.81, 11.41, -8.5, 0.78)
pt3dadd(88.91, 10.47, -8.5, 0.78)
pt3dadd(89.06, 10.16, -8.5, 0.78)
pt3dadd(89.84, 9.38, -8.5, 0.78)
pt3dadd(90, 9.22, -8.5, 0.78)
pt3dadd(90.78, 8.27, -8.5, 0.78)
pt3dadd(90.78, 8.13, -8.5, 0.78)
pt3dadd(91.72, 7.81, -8.5, 0.78)
pt3dadd(92.66, 7.81, -8.5, 0.78)
}
dend[389] {pt3dclear()
pt3dadd(83.32, 17.55, -8.75, 0.78)
pt3dadd(86.09, 19.05, -8.5, 0.78)
pt3dadd(88.75, 16.72, -8.5, 0.78)
}
dend[390] {pt3dclear()
pt3dadd(88.75, 16.72, -8.5, 0.78)
pt3dadd(88.91, 16.09, -8.5, 0.78)
pt3dadd(88.91, 15.78, -8.5, 0.78)
pt3dadd(89.53, 14.53, -8.5, 0.78)
pt3dadd(90.63, 13.59, -8.5, 0.78)
pt3dadd(90.78, 13.44, -8.5, 0.78)
pt3dadd(91.88, 12.66, -8.5, 0.78)
pt3dadd(92.03, 12.5, -8.5, 0.78)
pt3dadd(92.97, 11.72, -8.5, 0.78)
pt3dadd(93.28, 11.72, -8.5, 0.78)
pt3dadd(93.44, 11.56, -8.5, 0.78)
pt3dadd(95.31, 11.25, -8.5, 0.78)
}
dend[391] {pt3dclear()
pt3dadd(88.75, 16.72, -8.5, 0.78)
pt3dadd(90.94, 16.41, -8.75, 0.78)
pt3dadd(92.5, 15.47, -8.75, 0.78)
pt3dadd(93.28, 14.22, -8.75, 0.78)
pt3dadd(93.44, 14.06, -8.75, 0.78)
pt3dadd(93.44, 13.75, -8.75, 0.78)
pt3dadd(93.59, 13.59, -8.75, 0.78)
pt3dadd(94.53, 13.13, -8.75, 0.78)
pt3dadd(94.53, 12.97, -8.75, 0.78)
}
dend[392] {pt3dclear()
pt3dadd(83.75, 19.05, -8.75, 0.78)
pt3dadd(83.95, 17.73, -9, 0.158)
pt3dadd(83.79, 17.57, -9, 0.158)
pt3dadd(84.1, 16.32, -9, 0.158)
pt3dadd(84.1, 16.17, -9, 0.158)
pt3dadd(85.2, 15.23, -9, 0.158)
pt3dadd(85.2, 15.08, -9, 0.158)
pt3dadd(85.98, 13.36, -9, 0.158)
pt3dadd(85.98, 13.2, -9, 0.158)
pt3dadd(86.13, 11.95, -9, 0.158)
pt3dadd(86.13, 11.64, -9, 0.158)
pt3dadd(86.13, 10.39, -9, 0.158)
pt3dadd(86.13, 10.08, -9, 0.158)
pt3dadd(86.13, 9.3, -9, 0.158)
pt3dadd(85.98, 9.14, -9, 0.158)
pt3dadd(85.98, 7.58, -9, 0.158)
pt3dadd(85.82, 7.42, -9, 0.158)
pt3dadd(85.82, 7.27, -9, 0.158)
pt3dadd(85.66, 6.17, -9, 0.158)
pt3dadd(85.51, 6.02, -9, 0.158)
pt3dadd(85.04, 5.7, -9, 0.158)
pt3dadd(84.88, 5.55, -9, 0.158)
pt3dadd(84.26, 5.55, -9, 0.158)
pt3dadd(83.32, 5.39, -9, 0.158)
pt3dadd(82.7, 5.39, -9, 0.158)
pt3dadd(82.38, 5.39, -9, 0.158)
pt3dadd(81.59, 5.39, -9, 0.158)
pt3dadd(81.29, 5.7, -9, 0.158)
pt3dadd(81.13, 5.7, -9, 0.158)
pt3dadd(80.81, 5.86, -9, 0.158)
}
dend[393] {pt3dclear()
pt3dadd(78.13, 21.72, -8.75, 0.78)
pt3dadd(78.28, 19.05, -8.5, 0.78)
pt3dadd(78.28, 18.91, -8.5, 0.78)
pt3dadd(79.53, 17.34, -8.5, 0.78)
pt3dadd(79.53, 17.19, -8.5, 0.78)
pt3dadd(80.47, 16.25, -8.5, 0.78)
pt3dadd(80.47, 15.94, -8.5, 0.78)
pt3dadd(80.63, 15.78, -8.5, 0.78)
pt3dadd(81.56, 15, -8.5, 0.78)
pt3dadd(81.72, 14.84, -8.5, 0.78)
pt3dadd(81.88, 14.69, -8.5, 0.78)
pt3dadd(82.5, 14.22, -8.5, 0.78)
pt3dadd(82.77, 13.83, -8.5, 0.31)
}
dend[394] {pt3dclear()
pt3dadd(82.77, 13.83, -8.5, 0.31)
pt3dadd(84.34, 13.28, -8.5, 0.31)
}
}
proc shape3d_14() {
dend[394] { pt3dadd(85.27, 12.73, -8.5, 0.31)
pt3dadd(86.05, 12.19, -8.5, 0.31)
pt3dadd(86.13, 12.11, -8.5, 0.31)
pt3dadd(86.84, 11.48, -8.5, 0.31)
pt3dadd(86.99, 10.94, -8.5, 0.31)
pt3dadd(87.07, 10.86, -8.5, 0.31)
}
dend[395] {pt3dclear()
pt3dadd(82.77, 13.83, -8.5, 0.31)
pt3dadd(82.7, 12.42, -8.5, 0.31)
pt3dadd(83.09, 11.56, -8, 0.31)
}
dend[396] {pt3dclear()
pt3dadd(83.09, 11.56, -8, 0.31)
pt3dadd(83.4, 11.09, -8.5, 0.31)
pt3dadd(83.4, 10.86, -8.5, 0.31)
pt3dadd(84.1, 9.69, -8.5, 0.31)
pt3dadd(84.18, 9.61, -8.5, 0.31)
pt3dadd(84.96, 8.75, -8.5, 0.31)
pt3dadd(85.04, 8.59, -8.5, 0.31)
pt3dadd(86.21, 7.66, -8.5, 0.31)
pt3dadd(86.29, 7.5, -8.5, 0.31)
pt3dadd(86.99, 6.64, -8.5, 0.31)
pt3dadd(86.99, 6.41, -8.5, 0.31)
pt3dadd(87.3, 5.78, -8.5, 0.31)
}
dend[397] {pt3dclear()
pt3dadd(87.3, 5.78, -8.5, 0.31)
pt3dadd(88.87, 6.02, -8.5, 0.31)
pt3dadd(89.73, 6.33, -8.5, 0.31)
pt3dadd(89.8, 6.41, -8.5, 0.31)
pt3dadd(90.27, 6.88, -8.5, 0.31)
}
dend[398] {pt3dclear()
pt3dadd(87.3, 5.78, -8.5, 0.31)
pt3dadd(86.68, 4.84, -8.5, 0.31)
pt3dadd(85.66, 3.67, -8.5, 0.31)
pt3dadd(85.27, 2.5, -8.5, 0.31)
pt3dadd(85.04, 1.72, -8.5, 0.31)
pt3dadd(84.96, 1.64, -8.5, 0.31)
pt3dadd(84.8, 1.48, -8.5, 0.31)
pt3dadd(84.41, 0.63, -8.5, 0.31)
pt3dadd(84.41, 0.47, -8.5, 0.31)
pt3dadd(84.49, -0.63, -8.5, 0.31)
pt3dadd(84.41, -1.02, -8.5, 0.31)
pt3dadd(84.1, -1.41, -8.5, 0.31)
pt3dadd(84.02, -1.48, -8.5, 0.31)
pt3dadd(83.55, -1.8, -8.5, 0.31)
pt3dadd(83.48, -1.88, -8.5, 0.31)
pt3dadd(83.16, -2.27, -8.5, 0.31)
}
dend[399] {pt3dclear()
pt3dadd(83.09, 11.56, -8, 0.31)
pt3dadd(81.59, 10.39, -8, 0.31)
pt3dadd(79.88, 9.52, -8, 0.31)
pt3dadd(78.16, 8.52, -8, 0.31)
pt3dadd(78.01, 8.52, -8, 0.31)
pt3dadd(76.52, 8.27, -8, 0.31)
pt3dadd(74.88, 8.44, -8, 0.31)
pt3dadd(74.56, 8.52, -8, 0.31)
pt3dadd(75.59, 8.27, -8, 0.31)
}
dend[400] {pt3dclear()
pt3dadd(70.16, 22.73, -11.75, 1.72)
pt3dadd(70.43, 23.36, -9, 0.39)
pt3dadd(72.77, 25.78, -9, 0.39)
pt3dadd(74.56, 26.64, -9.25, 0.39)
pt3dadd(76.37, 27.58, -9.25, 0.39)
pt3dadd(77.7, 28.52, -9.25, 0.39)
pt3dadd(78.09, 28.83, -9.25, 0.39)
pt3dadd(80.51, 28.67, -9.25, 0.55)
}
dend[401] {pt3dclear()
pt3dadd(66.59, 22.5, -8.25, 1.72)
pt3dadd(67.03, 24.22, -9.75, 0.78)
pt3dadd(71.56, 27.97, -9.75, 0.78)
}
dend[402] {pt3dclear()
pt3dadd(71.56, 27.97, -9.75, 0.78)
pt3dadd(75, 30, -9.75, 0.78)
pt3dadd(77.19, 31.56, -9.75, 0.78)
pt3dadd(78.44, 32.81, -9.75, 0.78)
pt3dadd(80.31, 34.53, -9.75, 0.78)
pt3dadd(80.16, 34.53, -9.75, 0.78)
}
dend[403] {pt3dclear()
pt3dadd(80.16, 34.53, -9.75, 0.78)
pt3dadd(81.88, 35.31, -9.75, 0.78)
pt3dadd(83.75, 36.4, -9.75, 0.78)
pt3dadd(85.47, 37.34, -9.75, 0.78)
pt3dadd(86.88, 37.81, -9.75, 0.78)
pt3dadd(88.91, 38.59, -9.75, 0.78)
pt3dadd(91.25, 38.9, -9.75, 0.78)
pt3dadd(92.97, 40, -9.75, 0.78)
pt3dadd(94.22, 40.63, -9.75, 0.78)
pt3dadd(94.38, 40.94, -9.75, 0.78)
pt3dadd(94.38, 41.09, -9.75, 0.78)
pt3dadd(95.31, 41.88, -9.75, 0.78)
pt3dadd(96.56, 43.59, -9.75, 0.78)
pt3dadd(96.88, 44.53, -9.75, 0.78)
}
dend[404] {pt3dclear()
pt3dadd(80.16, 34.53, -9.75, 0.78)
pt3dadd(80, 35.78, -10.25, 0.78)
pt3dadd(80.78, 36.88, -10.25, 0.78)
pt3dadd(81.72, 37.97, -10.25, 0.78)
pt3dadd(82.19, 38.28, -10.25, 0.78)
pt3dadd(83.91, 39.22, -10.25, 0.78)
pt3dadd(86.09, 40.31, -10.25, 0.78)
pt3dadd(88.28, 41.09, -10.25, 0.78)
pt3dadd(89.38, 41.72, -10.25, 0.78)
pt3dadd(89.69, 41.72, -10.25, 0.78)
pt3dadd(90.94, 42.5, -10.25, 0.78)
pt3dadd(91.09, 42.5, -10.25, 0.78)
pt3dadd(92.34, 42.97, -10.25, 0.78)
}
dend[405] {pt3dclear()
pt3dadd(71.56, 27.97, -9.75, 0.78)
pt3dadd(71.56, 30, -9.75, 0.78)
pt3dadd(72.03, 31.41, -9.75, 0.78)
pt3dadd(72.19, 31.72, -9.75, 0.78)
pt3dadd(72.19, 31.88, -9.75, 0.78)
pt3dadd(72.97, 32.81, -9.75, 0.78)
pt3dadd(72.97, 32.97, -9.75, 0.78)
pt3dadd(73.91, 34.06, -9.75, 0.78)
pt3dadd(75.16, 35, -9.75, 0.78)
pt3dadd(75.31, 35.15, -9.75, 0.78)
pt3dadd(77.34, 36.09, -9.75, 0.78)
pt3dadd(77.5, 36.09, -9.75, 0.78)
pt3dadd(78.91, 37.03, -9.75, 0.78)
pt3dadd(79.06, 37.03, -9.75, 0.78)
pt3dadd(79.38, 37.65, -9.75, 0.78)
}
dend[406] {pt3dclear()
pt3dadd(59.57, 20.39, -5.5, 1.72)
pt3dadd(61.25, 19.22, -5.5, 0.78)
pt3dadd(63.75, 18.75, -5.5, 0.78)
pt3dadd(65.63, 18.28, -5.5, 0.78)
pt3dadd(67.5, 18.13, -5.5, 0.78)
pt3dadd(67.66, 17.97, -5.5, 0.78)
pt3dadd(70.16, 17.8, -5.5, 0.78)
}
dend[407] {pt3dclear()
pt3dadd(70.16, 17.8, -5.5, 0.78)
pt3dadd(71.72, 15.47, -5.5, 0.78)
pt3dadd(73.75, 15.31, -5.5, 0.78)
pt3dadd(74.69, 14.69, -5.5, 0.78)
pt3dadd(75.78, 13.75, -5.5, 0.78)
pt3dadd(76.25, 13.13, -5.5, 0.78)
}
dend[408] {pt3dclear()
pt3dadd(70.16, 17.8, -5.5, 0.78)
pt3dadd(73.59, 17.5, -5.5, 0.94)
pt3dadd(74.84, 17.5, -5.25, 0.94)
}
dend[409] {pt3dclear()
pt3dadd(74.84, 17.5, -5.25, 0.94)
pt3dadd(76.72, 17.03, -5.5, 0.94)
pt3dadd(78.28, 17.34, -5.5, 0.94)
}
dend[410] {pt3dclear()
pt3dadd(78.28, 17.34, -5.5, 0.94)
pt3dadd(79.09, 16.72, -5.5, 0.31)
pt3dadd(79.65, 16.09, -5.5, 0.31)
pt3dadd(79.73, 16.02, -5.5, 0.31)
pt3dadd(79.95, 15.55, -5.5, 0.31)
pt3dadd(80.12, 14.84, -5.5, 0.31)
pt3dadd(80.12, 14.69, -5.5, 0.31)
pt3dadd(80.2, 14.3, -5.5, 0.31)
pt3dadd(80.2, 13.91, -5.5, 0.31)
pt3dadd(80.27, 12.81, -5.25, 0.31)
pt3dadd(80.34, 12.66, -5.25, 0.31)
pt3dadd(80.43, 12.58, -5.25, 0.31)
pt3dadd(80.98, 12.5, -5.25, 0.31)
pt3dadd(81.52, 12.11, -5.25, 0.31)
pt3dadd(81.68, 11.88, -5.25, 0.31)
}
dend[411] {pt3dclear()
pt3dadd(78.28, 17.34, -5.5, 0.94)
pt3dadd(79.34, 17.97, -5.5, 0.31)
pt3dadd(79.48, 17.97, -5.5, 0.31)
pt3dadd(80.66, 18.91, -5.5, 0.31)
pt3dadd(80.73, 18.98, -5.5, 0.31)
pt3dadd(81.52, 19.84, -5.5, 0.31)
pt3dadd(81.59, 19.92, -5.5, 0.31)
pt3dadd(82.77, 20.94, -5.5, 0.31)
pt3dadd(83.48, 21.48, -5.5, 0.31)
pt3dadd(84.88, 22.66, -5.5, 0.31)
pt3dadd(86.05, 22.97, -5.5, 0.31)
pt3dadd(86.6, 23.59, -5.5, 0.31)
pt3dadd(86.6, 23.75, -5.5, 0.31)
pt3dadd(87.15, 24.3, -5.5, 0.31)
pt3dadd(87.23, 24.38, -5.5, 0.31)
pt3dadd(87.93, 25, -5.5, 0.31)
}
dend[412] {pt3dclear()
pt3dadd(74.84, 17.5, -5.25, 0.94)
pt3dadd(76.72, 21.41, -5.25, 0.94)
pt3dadd(77.62, 22.11, -5.25, 0.158)
pt3dadd(78.31, 22.66, -5.25, 0.158)
pt3dadd(78.48, 22.66, -5.25, 0.158)
pt3dadd(79.8, 23.36, -5.25, 0.158)
pt3dadd(79.88, 23.44, -5.25, 0.158)
pt3dadd(81.2, 24.22, -5.25, 0.158)
pt3dadd(82.3, 24.77, -5.25, 0.158)
pt3dadd(82.46, 24.92, -5.25, 0.158)
pt3dadd(82.7, 25, -5.25, 0.158)
pt3dadd(83.71, 25.39, -5.25, 0.158)
pt3dadd(83.79, 25.47, -5.25, 0.158)
pt3dadd(85.04, 26.09, -5.25, 0.158)
pt3dadd(86.05, 26.88, -5.25, 0.158)
pt3dadd(86.21, 26.95, -5.25, 0.158)
pt3dadd(86.45, 27.03, -5.25, 0.158)
pt3dadd(87.07, 27.19, -5.25, 0.158)
pt3dadd(88.32, 27.97, -5.25, 0.158)
pt3dadd(89.34, 28.59, -5.25, 0.158)
pt3dadd(89.8, 29.53, -5.25, 0.158)
pt3dadd(89.88, 29.61, -5.25, 0.158)
pt3dadd(90.2, 30.39, -5.25, 0.158)
pt3dadd(90.74, 31.8, -5.25, 0.158)
pt3dadd(91.21, 32.65, -5.25, 0.158)
pt3dadd(91.76, 33.13, -5.25, 0.158)
pt3dadd(92.62, 33.59, -5.25, 0.158)
}
dend[413] {pt3dclear()
pt3dadd(56.29, 18.84, -7.75, 1.72)
pt3dadd(57.34, 16.88, -7.75, 0.47)
pt3dadd(58.75, 16.25, -7.75, 0.47)
pt3dadd(59.84, 16.09, -7.75, 0.94)
}
dend[414] {pt3dclear()
pt3dadd(59.84, 16.09, -7.75, 0.94)
pt3dadd(61.09, 14.84, -7.75, 0.94)
pt3dadd(62.5, 14.38, -7.75, 0.94)
pt3dadd(64.06, 13.75, -7.75, 0.94)
pt3dadd(64.06, 13.59, -7.75, 0.94)
pt3dadd(65.47, 12.5, -7.75, 0.94)
pt3dadd(65.47, 12.03, -7.75, 0.94)
pt3dadd(65.63, 11.72, -7.75, 0.94)
pt3dadd(65.63, 11.56, -7.75, 0.94)
}
}
proc shape3d_15() {
dend[414] { pt3dadd(65.63, 11.41, -7.75, 0.94)
pt3dadd(65.7, 11.17, -7.75, 0.94)
pt3dadd(65.7, 10.31, -7.75, 0.94)
pt3dadd(65.47, 9.84, -7.75, 0.94)
pt3dadd(65.39, 8.98, -7.75, 0.94)
pt3dadd(65.31, 8.59, -7.75, 0.94)
pt3dadd(64.84, 7.73, -7.75, 0.94)
pt3dadd(65.16, 7.19, -7.75, 0.94)
pt3dadd(65.47, 6.72, -7.75, 0.94)
pt3dadd(64.53, 6.17, -8, 0.94)
}
dend[415] {pt3dclear()
pt3dadd(59.84, 16.09, -7.75, 0.94)
pt3dadd(61.41, 17.66, -7.75, 0.47)
pt3dadd(64.38, 16.88, -7.75, 0.94)
pt3dadd(66.56, 16.55, -7.75, 0.94)
pt3dadd(68.59, 16.41, -7.75, 0.94)
pt3dadd(69.38, 15.63, -7.75, 0.94)
}
dend[416] {pt3dclear()
pt3dadd(52.58, 17.7, -7.5, 1.56)
pt3dadd(53.16, 17.42, -7.75, 1.56)
}
dend[417] {pt3dclear()
pt3dadd(53.16, 17.42, -7.75, 1.56)
pt3dadd(55.31, 15.63, -7.75, 0.94)
pt3dadd(57.03, 13.13, -7.75, 0.94)
}
dend[418] {pt3dclear()
pt3dadd(57.03, 13.13, -7.75, 0.94)
pt3dadd(57.19, 11.41, -7.75, 0.94)
pt3dadd(57.19, 10.78, -7.75, 0.94)
}
dend[419] {pt3dclear()
pt3dadd(57.03, 13.13, -7.75, 0.94)
pt3dadd(58.91, 12.97, -7.25, 0.94)
pt3dadd(60.47, 12.97, -7.25, 0.94)
pt3dadd(60.47, 12.81, -7.25, 0.94)
pt3dadd(64.06, 12.81, -7.75, 1.25)
pt3dadd(68.75, 12.97, -7.75, 1.25)
}
dend[420] {pt3dclear()
pt3dadd(68.75, 12.97, -7.75, 1.25)
pt3dadd(71.25, 11.56, -7.75, 0.94)
pt3dadd(71.09, 11.56, -7.75, 0.94)
pt3dadd(72.81, 10.63, -7.75, 0.94)
pt3dadd(73.75, 10.31, -7.75, 0.94)
pt3dadd(73.91, 10.31, -7.75, 0.94)
}
dend[421] {pt3dclear()
pt3dadd(68.75, 12.97, -7.75, 1.25)
pt3dadd(71.88, 15.16, -7, 0.94)
}
dend[422] {pt3dclear()
pt3dadd(53.16, 17.42, -7.75, 1.56)
pt3dadd(54.06, 17.38, -7.5, 1.56)
pt3dadd(54.77, 17.46, -7.5, 1.56)
pt3dadd(54.92, 17.54, -7.5, 1.56)
}
dend[423] {pt3dclear()
pt3dadd(48.71, 19.84, -8, 1.56)
pt3dadd(50.31, 20.94, -8.75, 0.94)
pt3dadd(52.5, 22.66, -8.75, 0.78)
pt3dadd(53.91, 23.75, -8.75, 0.78)
pt3dadd(55, 24.06, -8.75, 0.78)
}
dend[424] {pt3dclear()
pt3dadd(55, 24.06, -8.75, 0.78)
pt3dadd(56.09, 25.63, -8.75, 0.94)
pt3dadd(56.72, 27.03, -8.75, 0.94)
pt3dadd(57.81, 27.97, -8.75, 0.94)
pt3dadd(59.06, 29.06, -8.75, 0.94)
pt3dadd(59.22, 29.38, -8.75, 0.94)
}
dend[425] {pt3dclear()
pt3dadd(55, 24.06, -8.75, 0.78)
pt3dadd(58.28, 24.84, -8.75, 0.94)
}
dend[426] {pt3dclear()
pt3dadd(58.28, 24.84, -8.75, 0.94)
pt3dadd(60.78, 25.16, -8.75, 0.63)
pt3dadd(60.78, 25.31, -8.75, 0.63)
pt3dadd(62.19, 25.63, -8.75, 0.63)
pt3dadd(62.97, 25.94, -9, 0.63)
}
dend[427] {pt3dclear()
pt3dadd(62.97, 25.94, -9, 0.63)
pt3dadd(63.93, 26.66, -8.61, 0.63)
}
dend[428] {pt3dclear()
pt3dadd(63.93, 26.66, -8.61, 0.63)
pt3dadd(63.59, 26.41, -8.75, 0.63)
pt3dadd(65, 26.56, -8.75, 0.63)
pt3dadd(65.78, 26.72, -8.75, 0.63)
}
dend[429] {pt3dclear()
pt3dadd(63.93, 26.66, -8.61, 0.63)
pt3dadd(63.13, 27.34, -8.5, 0.47)
pt3dadd(64.38, 28.44, -8.5, 0.47)
pt3dadd(65.16, 29.38, -8.5, 0.47)
}
dend[430] {pt3dclear()
pt3dadd(62.97, 25.94, -9, 0.63)
pt3dadd(63.91, 24.84, -8.5, 0.47)
pt3dadd(65, 24.53, -8.5, 0.47)
pt3dadd(65.63, 24.53, -8.5, 0.47)
}
dend[431] {pt3dclear()
pt3dadd(58.28, 24.84, -8.75, 0.94)
pt3dadd(59.38, 26.56, -8.75, 0.63)
pt3dadd(60.78, 27.81, -8.75, 0.63)
pt3dadd(61.72, 28.75, -8.75, 0.63)
pt3dadd(62.5, 29.69, -8.75, 0.63)
pt3dadd(63.67, 30.08, -8.75, 0.158)
pt3dadd(65.08, 30.55, -8.75, 0.158)
pt3dadd(65.39, 30.63, -8.75, 0.158)
pt3dadd(66.41, 31.02, -8.75, 0.158)
pt3dadd(66.64, 31.09, -8.75, 0.158)
pt3dadd(67.34, 31.41, -8.75, 0.158)
pt3dadd(68.59, 31.25, -8.75, 0.158)
pt3dadd(68.83, 31.09, -8.75, 0.158)
pt3dadd(69.53, 30.78, -8.75, 0.158)
pt3dadd(69.61, 30.7, -8.75, 0.158)
pt3dadd(69.92, 30.55, -8.75, 0.158)
pt3dadd(70.55, 30.47, -8.75, 0.158)
pt3dadd(70.63, 30.39, -8.75, 0.158)
pt3dadd(72.34, 30.16, -8.75, 0.158)
pt3dadd(72.58, 30.16, -8.75, 0.158)
pt3dadd(73.28, 30.47, -8.75, 0.158)
pt3dadd(73.44, 30.47, -8.75, 0.158)
pt3dadd(73.52, 30.55, -8.75, 0.158)
pt3dadd(74.22, 31.09, -8.75, 0.158)
pt3dadd(74.38, 31.25, -8.75, 0.158)
pt3dadd(75.7, 32.34, -8.75, 0.158)
pt3dadd(75.78, 32.42, -8.75, 0.158)
pt3dadd(76.02, 32.58, -8.75, 0.158)
pt3dadd(77.11, 33.36, -8.75, 0.158)
pt3dadd(77.19, 33.44, -8.75, 0.158)
pt3dadd(77.5, 33.59, -8.75, 0.158)
pt3dadd(78.52, 34.29, -8.75, 0.158)
pt3dadd(78.75, 34.38, -8.75, 0.158)
pt3dadd(79.14, 34.61, -8.75, 0.158)
}
dend[432] {pt3dclear()
pt3dadd(45.39, 22.15, -7.5, 1.56)
pt3dadd(45.39, 22.77, -7.5, 0.55)
pt3dadd(45.78, 23.71, -7.5, 0.55)
pt3dadd(46.8, 24.02, -7.5, 0.55)
pt3dadd(47.03, 24.02, -7.5, 0.55)
pt3dadd(47.73, 24.26, -7.5, 0.55)
pt3dadd(48.13, 24.57, -7.5, 0.55)
pt3dadd(48.28, 24.65, -7.5, 0.55)
pt3dadd(49.06, 25.12, -7.5, 0.55)
pt3dadd(49.22, 25.2, -7.5, 0.55)
pt3dadd(49.84, 25.98, -7.5, 0.55)
pt3dadd(50.78, 27.54, -8, 0.55)
pt3dadd(51.64, 28.71, -8, 0.55)
pt3dadd(51.95, 29.88, -8, 0.55)
}
dend[433] {pt3dclear()
pt3dadd(41.25, 21.99, -7.5, 1.33)
pt3dadd(42.03, 20.3, -8.25, 0.63)
pt3dadd(43.59, 18.44, -8.25, 0.63)
pt3dadd(45, 16.72, -8.25, 0.63)
}
dend[434] {pt3dclear()
pt3dadd(45, 16.72, -8.25, 0.63)
pt3dadd(45.16, 14.84, -8.25, 0.63)
}
dend[435] {pt3dclear()
pt3dadd(45.16, 14.84, -8.25, 0.63)
pt3dadd(46.25, 13.59, -8.25, 0.63)
pt3dadd(47.03, 12.03, -8.25, 0.63)
pt3dadd(47.5, 11.25, -8.25, 0.63)
}
dend[436] {pt3dclear()
pt3dadd(47.5, 11.25, -8.25, 0.63)
pt3dadd(49.38, 10.63, -8.25, 0.63)
}
dend[437] {pt3dclear()
pt3dadd(49.38, 10.63, -8.25, 0.63)
pt3dadd(51.25, 9.84, -8.25, 0.63)
pt3dadd(52.5, 9.06, -8.25, 0.63)
pt3dadd(52.34, 9.06, -8.25, 0.63)
}
dend[438] {pt3dclear()
pt3dadd(49.38, 10.63, -8.25, 0.63)
pt3dadd(50.63, 8.13, -8.25, 0.63)
pt3dadd(50.47, 7.97, -8.25, 0.63)
pt3dadd(51.56, 6.41, -8.25, 0.63)
pt3dadd(52.03, 5.16, -8.25, 0.63)
pt3dadd(52.03, 5, -8.25, 0.63)
}
dend[439] {pt3dclear()
pt3dadd(52.03, 5, -8.25, 0.63)
pt3dadd(51.41, 4.38, -8.25, 0.78)
pt3dadd(51.41, 3.13, -8.25, 0.78)
pt3dadd(51.41, 2.97, -8.25, 0.78)
pt3dadd(51.72, 2.34, -8.25, 0.78)
}
dend[440] {pt3dclear()
pt3dadd(52.03, 5, -8.25, 0.63)
pt3dadd(53.59, 3.59, -8.5, 0.78)
pt3dadd(53.91, 2.81, -8.5, 0.78)
}
dend[441] {pt3dclear()
pt3dadd(47.5, 11.25, -8.25, 0.63)
pt3dadd(47.5, 7.66, -8.5, 0.78)
}
dend[442] {pt3dclear()
pt3dadd(47.5, 7.66, -8.5, 0.78)
pt3dadd(48.75, 6.25, -8.5, 0.78)
pt3dadd(49.38, 5, -8.5, 0.78)
pt3dadd(49.38, 4.69, -8.5, 0.78)
}
dend[443] {pt3dclear()
pt3dadd(47.5, 7.66, -8.5, 0.78)
pt3dadd(46.41, 5, -8.5, 0.78)
}
dend[444] {pt3dclear()
pt3dadd(46.41, 5, -8.5, 0.78)
pt3dadd(46.88, 3.28, -8.5, 0.78)
pt3dadd(47.03, 2.02, -8.5, 0.78)
pt3dadd(47.03, 1.09, -8.5, 0.78)
}
dend[445] {pt3dclear()
pt3dadd(46.41, 5, -8.5, 0.78)
pt3dadd(44.84, 2.97, -8.5, 0.94)
pt3dadd(43.59, 0.47, -8.5, 0.94)
pt3dadd(43.75, -0.78, -8.5, 0.94)
pt3dadd(44.38, -2.02, -8.5, 0.94)
pt3dadd(44.38, -2.34, -8.5, 0.94)
pt3dadd(45.31, -3.75, -8.5, 0.94)
pt3dadd(45.63, -4.05, -8.5, 0.94)
}
dend[446] {pt3dclear()
pt3dadd(45.16, 14.84, -8.25, 0.63)
pt3dadd(43.44, 13.59, -8, 0.94)
}
dend[447] {pt3dclear()
pt3dadd(43.44, 13.59, -8, 0.94)
pt3dadd(41.88, 14.06, -8, 0.94)
}
dend[448] {pt3dclear()
pt3dadd(41.88, 14.06, -8, 0.94)
pt3dadd(41.56, 15.15, -8, 0.94)
pt3dadd(41.56, 15.31, -8, 0.94)
pt3dadd(40.78, 17.34, -8, 0.94)
}
dend[449] {pt3dclear()
pt3dadd(41.88, 14.06, -8, 0.94)
pt3dadd(40.31, 12.97, -7.5, 0.94)
pt3dadd(39.84, 11.72, -7.5, 0.94)
pt3dadd(39.69, 11.56, -7.5, 0.94)
pt3dadd(40, 10.78, -7.5, 0.94)
pt3dadd(40.15, 10.63, -7.5, 0.94)
}
dend[450] {pt3dclear()
pt3dadd(43.44, 13.59, -8, 0.94)
pt3dadd(43.44, 10.78, -8.25, 0.94)
pt3dadd(43.28, 10.78, -8.25, 0.94)
}
dend[451] {pt3dclear()
pt3dadd(43.28, 10.78, -8.25, 0.94)
pt3dadd(44.22, 8.59, -8.25, 0.94)
pt3dadd(44.22, 8.44, -8.25, 0.94)
pt3dadd(44.22, 7.5, -8.25, 0.94)
pt3dadd(44.38, 5.94, -8.25, 0.94)
pt3dadd(44.22, 5, -8.25, 0.94)
}
dend[452] {pt3dclear()
pt3dadd(43.28, 10.78, -8.25, 0.94)
pt3dadd(41.88, 10, -8.5, 0.94)
pt3dadd(40.94, 8.75, -8.5, 0.94)
pt3dadd(40.78, 8.44, -8.5, 0.94)
pt3dadd(40.63, 7.5, -8.5, 0.94)
}
}
proc shape3d_16() {
dend[452] { pt3dadd(40.47, 7.34, -8.5, 0.94)
pt3dadd(40.63, 5.78, -8.5, 0.94)
pt3dadd(40.63, 5.63, -8.5, 0.94)
pt3dadd(40.31, 4.05, -8.5, 0.94)
pt3dadd(40.15, 4.05, -8.5, 0.94)
pt3dadd(40, 2.97, -8.5, 0.94)
}
dend[453] {pt3dclear()
pt3dadd(45, 16.72, -8.25, 0.63)
pt3dadd(46.25, 17.03, -8.25, 0.78)
}
dend[454] {pt3dclear()
pt3dadd(46.25, 17.03, -8.25, 0.78)
pt3dadd(47.97, 17.66, -8.25, 0.78)
pt3dadd(48.91, 17.19, -8.25, 0.78)
pt3dadd(48.91, 17.03, -8.25, 0.78)
pt3dadd(49.69, 16.41, -8.25, 0.78)
pt3dadd(49.69, 16.09, -8.25, 0.78)
pt3dadd(49.84, 15.78, -8.25, 0.78)
pt3dadd(50, 15.63, -8.25, 0.78)
pt3dadd(50.16, 15.16, -8.25, 0.78)
}
dend[455] {pt3dclear()
pt3dadd(46.25, 17.03, -8.25, 0.78)
pt3dadd(47.34, 15.16, -8.25, 0.78)
pt3dadd(48.59, 14.06, -8.25, 0.78)
pt3dadd(48.75, 13.91, -8.25, 0.78)
pt3dadd(49.84, 13.59, -8.25, 0.78)
pt3dadd(49.84, 13.44, -8.25, 0.78)
pt3dadd(51.25, 12.66, -8.25, 0.78)
pt3dadd(52.19, 12.34, -8.25, 0.78)
}
dend[456] {pt3dclear()
pt3dadd(34.94, 24.02, -7.75, 1.33)
pt3dadd(34.97, 26.52, -7.75, 1.56)
pt3dadd(35.19, 29.1, -7.75, 1.56)
pt3dadd(35.15, 29.42, -7.75, 1.56)
pt3dadd(35.59, 30.93, -7.75, 1.56)
}
dend[457] {pt3dclear()
pt3dadd(35.59, 30.93, -7.75, 1.56)
pt3dadd(33.9, 34.06, -7.75, 1.09)
}
dend[458] {pt3dclear()
pt3dadd(33.9, 34.06, -7.75, 1.09)
pt3dadd(35, 35.47, -7.75, 1.09)
pt3dadd(35.92, 35.97, -7.25, 1.09)
}
dend[459] {pt3dclear()
pt3dadd(35.92, 35.97, -7.25, 1.09)
pt3dadd(36.88, 36.4, -7.75, 1.09)
}
dend[460] {pt3dclear()
pt3dadd(36.88, 36.4, -7.75, 1.09)
pt3dadd(38.28, 40.15, -7.75, 0.94)
}
dend[461] {pt3dclear()
pt3dadd(38.28, 40.15, -7.75, 0.94)
pt3dadd(39.21, 41.01, -7.75, 0.63)
}
dend[462] {pt3dclear()
pt3dadd(39.21, 41.01, -7.75, 0.63)
pt3dadd(40.31, 42.03, -7.75, 0.63)
pt3dadd(41.29, 43.4, -7.75, 0.63)
pt3dadd(41.99, 44.34, -7.75, 0.63)
pt3dadd(42.34, 45.31, -7.75, 0.63)
pt3dadd(42.62, 45.27, -7.75, 0.63)
pt3dadd(42.5, 45.27, -7.75, 0.63)
}
dend[463] {pt3dclear()
pt3dadd(42.5, 45.27, -7.75, 0.63)
pt3dadd(43.75, 45.78, -7.75, 0.63)
pt3dadd(44.65, 45.94, -7.75, 0.63)
pt3dadd(45.32, 46.1, -7.75, 0.63)
pt3dadd(46.56, 47.03, -7.75, 0.63)
}
dend[464] {pt3dclear()
pt3dadd(42.5, 45.27, -7.75, 0.63)
pt3dadd(42.19, 47.03, -7.75, 0.63)
pt3dadd(42.62, 47.97, -8.25, 0.63)
}
dend[465] {pt3dclear()
pt3dadd(42.62, 47.97, -8.25, 0.63)
pt3dadd(43.28, 48.91, -7.75, 0.63)
pt3dadd(43.91, 49.53, -7.75, 0.63)
pt3dadd(43.91, 49.38, -7.75, 0.63)
pt3dadd(45.82, 50.16, -7.75, 0.47)
pt3dadd(47.54, 51.41, -7.75, 0.47)
pt3dadd(47.7, 51.56, -7.75, 0.47)
pt3dadd(49.34, 52.19, -7.75, 0.47)
}
dend[466] {pt3dclear()
pt3dadd(42.62, 47.97, -8.25, 0.63)
pt3dadd(41.84, 48.52, -8.25, 0.47)
pt3dadd(41.76, 48.59, -8.25, 0.47)
pt3dadd(41.37, 49.77, -8.25, 0.47)
pt3dadd(41.29, 49.84, -8.25, 0.47)
pt3dadd(40.82, 50.63, -8.25, 0.47)
pt3dadd(40.74, 50.7, -8.25, 0.47)
pt3dadd(40.51, 50.86, -8.25, 0.47)
pt3dadd(40.43, 50.94, -8.25, 0.47)
pt3dadd(40.04, 51.64, -8.25, 0.47)
pt3dadd(39.79, 51.88, -8.25, 0.47)
pt3dadd(39.57, 52.27, -8.25, 0.47)
pt3dadd(39.49, 52.42, -8.25, 0.47)
pt3dadd(39.34, 52.73, -8.25, 0.47)
pt3dadd(39.26, 52.81, -8.25, 0.47)
pt3dadd(38.79, 53.13, -8.25, 0.47)
pt3dadd(38.63, 53.13, -8.25, 0.47)
pt3dadd(38.01, 53.28, -8.25, 0.47)
pt3dadd(37.93, 53.36, -8.25, 0.47)
pt3dadd(37.61, 53.36, -8.25, 0.47)
}
dend[467] {pt3dclear()
pt3dadd(39.21, 41.01, -7.75, 0.63)
pt3dadd(38.44, 41.88, -7.75, 0.63)
pt3dadd(39.45, 43.2, -7.75, 0.63)
pt3dadd(40.22, 44.45, -8.5, 0.63)
pt3dadd(40.54, 45.7, -8.5, 0.63)
pt3dadd(40.31, 46.8, -8.5, 0.63)
pt3dadd(39.85, 47.81, -7.75, 0.63)
}
dend[468] {pt3dclear()
pt3dadd(38.28, 40.15, -7.75, 0.94)
pt3dadd(37.42, 42.42, -7.75, 0.63)
pt3dadd(37.27, 43.6, -7.75, 0.63)
pt3dadd(37.42, 44.61, -7.75, 0.63)
pt3dadd(37.42, 45.08, -7.75, 0.63)
pt3dadd(37.65, 46.41, -7.75, 0.63)
pt3dadd(38.09, 47.58, -7.75, 0.31)
pt3dadd(37.93, 48.44, -7.75, 0.31)
pt3dadd(37.61, 49.3, -7.75, 0.31)
pt3dadd(37.15, 50.16, -7.75, 0.31)
pt3dadd(37.07, 50.23, -7.75, 0.31)
pt3dadd(36.29, 51.41, -7.75, 0.31)
pt3dadd(36.21, 51.48, -7.75, 0.31)
pt3dadd(36.13, 51.64, -7.75, 0.31)
pt3dadd(35.43, 52.42, -7.75, 0.31)
pt3dadd(35.35, 52.5, -7.75, 0.31)
pt3dadd(35.27, 52.58, -7.75, 0.31)
pt3dadd(34.72, 53.13, -7.75, 0.31)
}
dend[469] {pt3dclear()
pt3dadd(36.88, 36.4, -7.75, 1.09)
pt3dadd(39.06, 36.25, -7.75, 0.94)
pt3dadd(39.22, 36.4, -7.75, 0.94)
}
dend[470] {pt3dclear()
pt3dadd(39.22, 36.4, -7.75, 0.94)
pt3dadd(40.63, 34.38, -7.75, 0.94)
pt3dadd(40.63, 34.22, -7.75, 0.94)
pt3dadd(42.5, 31.56, -8, 0.94)
}
dend[471] {pt3dclear()
pt3dadd(42.5, 31.56, -8, 0.94)
pt3dadd(44.36, 31.8, -8, 0.94)
}
dend[472] {pt3dclear()
pt3dadd(44.36, 31.8, -8, 0.94)
pt3dadd(45, 31.88, -8, 0.94)
pt3dadd(46.41, 32.5, -8, 0.94)
pt3dadd(46.41, 32.65, -8, 0.94)
pt3dadd(46.72, 32.97, -8, 0.94)
}
dend[473] {pt3dclear()
pt3dadd(44.36, 31.8, -8, 0.94)
pt3dadd(42.66, 29.84, -8, 0.94)
pt3dadd(42.81, 28.44, -8, 0.94)
pt3dadd(42.81, 28.28, -8, 0.94)
pt3dadd(43.13, 27.19, -8, 0.94)
pt3dadd(43.44, 25.94, -8, 0.94)
pt3dadd(43.28, 25.78, -8, 0.94)
pt3dadd(42.81, 25.16, -8, 0.94)
pt3dadd(42.34, 24.38, -8, 0.94)
}
dend[474] {pt3dclear()
pt3dadd(42.5, 31.56, -8, 0.94)
pt3dadd(43.36, 33.04, -8, 0.158)
pt3dadd(44.06, 34.14, -8, 0.158)
pt3dadd(44.06, 34.38, -8, 0.158)
pt3dadd(44.22, 34.61, -8, 0.158)
pt3dadd(44.84, 35.63, -8, 0.158)
pt3dadd(44.92, 35.78, -8, 0.158)
pt3dadd(45, 35.86, -8, 0.158)
pt3dadd(45.86, 36.56, -8, 0.158)
pt3dadd(46.56, 37.27, -8, 0.158)
pt3dadd(47.97, 38.28, -8, 0.158)
pt3dadd(48.98, 38.83, -8, 0.158)
pt3dadd(49.69, 38.83, -8, 0.158)
}
dend[475] {pt3dclear()
pt3dadd(39.22, 36.4, -7.75, 0.94)
pt3dadd(41.56, 38.28, -7.75, 0.63)
}
dend[476] {pt3dclear()
pt3dadd(41.56, 38.28, -7.75, 0.63)
pt3dadd(42.5, 40.63, -7.75, 0.47)
pt3dadd(43.79, 42.03, -7.75, 0.63)
pt3dadd(44.49, 43.13, -7.75, 0.63)
pt3dadd(45.43, 43.83, -7.75, 0.63)
pt3dadd(46.68, 44.61, -7.75, 0.63)
pt3dadd(47.07, 45.39, -8.25, 0.78)
}
dend[477] {pt3dclear()
pt3dadd(47.07, 45.39, -8.25, 0.78)
pt3dadd(48.63, 45.94, -8.25, 0.78)
pt3dadd(49.41, 46.64, -8.25, 0.78)
pt3dadd(50.51, 47.34, -8.25, 0.78)
pt3dadd(51.52, 47.42, -8.25, 0.78)
pt3dadd(51.84, 47.42, -8.25, 0.78)
}
dend[478] {pt3dclear()
pt3dadd(47.07, 45.39, -8.25, 0.78)
pt3dadd(47.3, 46.88, -8.25, 0.55)
pt3dadd(47.23, 46.8, -8.25, 0.55)
pt3dadd(48.32, 48.44, -8.25, 0.55)
pt3dadd(49.18, 49.38, -8.25, 0.55)
pt3dadd(49.26, 49.45, -8.25, 0.55)
}
dend[479] {pt3dclear()
pt3dadd(41.56, 38.28, -7.75, 0.63)
pt3dadd(44.84, 39.38, -7.75, 0.94)
}
dend[480] {pt3dclear()
pt3dadd(44.84, 39.38, -7.75, 0.94)
pt3dadd(45.78, 41.09, -7.75, 0.94)
pt3dadd(46.41, 42.03, -7.75, 0.94)
pt3dadd(46.56, 42.5, -7.75, 0.94)
pt3dadd(47.19, 43.44, -7.75, 0.94)
pt3dadd(47.34, 43.75, -7.75, 0.94)
pt3dadd(48.59, 44.22, -7.75, 0.94)
pt3dadd(49.22, 44.38, -7.75, 0.94)
}
dend[481] {pt3dclear()
pt3dadd(44.84, 39.38, -7.75, 0.94)
pt3dadd(47.34, 38.28, -7.75, 0.94)
pt3dadd(47.34, 38.13, -7.75, 0.94)
pt3dadd(49.69, 36.72, -7.75, 0.94)
pt3dadd(50.98, 35.22, -8.5, 0.94)
pt3dadd(51.25, 33.44, -7.75, 0.94)
}
dend[482] {pt3dclear()
pt3dadd(35.92, 35.97, -7.25, 1.09)
pt3dadd(35.47, 36.72, -8, 0.63)
pt3dadd(35, 37.97, -8, 0.63)
pt3dadd(34.84, 37.97, -8, 0.63)
pt3dadd(35, 39.06, -8, 0.63)
pt3dadd(35.15, 40.31, -8, 0.63)
pt3dadd(35.63, 41.56, -7.75, 0.63)
pt3dadd(35.94, 42.81, -7.75, 0.63)
pt3dadd(35.63, 43.59, -7.75, 0.63)
pt3dadd(35.47, 43.59, -7.75, 0.63)
pt3dadd(35.31, 45.31, -7, 0.63)
pt3dadd(34.26, 46.25, -7, 0.31)
}
dend[483] {pt3dclear()
pt3dadd(33.9, 34.06, -7.75, 1.09)
pt3dadd(30.63, 35.63, -7.75, 0.94)
pt3dadd(30.78, 35.63, -7.75, 0.94)
}
dend[484] {pt3dclear()
pt3dadd(30.78, 35.63, -7.75, 0.94)
pt3dadd(30.78, 37.5, -7.75, 0.94)
pt3dadd(30.78, 37.65, -7.75, 0.94)
}
}
proc shape3d_17() {
dend[484] { pt3dadd(30.63, 38.9, -7.75, 0.94)
pt3dadd(30.63, 39.06, -7.75, 0.94)
pt3dadd(30.47, 40.15, -7.75, 0.94)
pt3dadd(30.31, 40.31, -7.75, 0.94)
pt3dadd(30.16, 41.09, -7.75, 0.94)
pt3dadd(30.16, 41.25, -7.75, 0.94)
pt3dadd(30, 42.03, -7.75, 0.78)
}
dend[485] {pt3dclear()
pt3dadd(30, 42.03, -7.75, 0.78)
pt3dadd(30.47, 42.66, -7.75, 0.78)
pt3dadd(30.78, 43.59, -7.75, 0.78)
pt3dadd(30.92, 44, -8.5, 0.78)
}
dend[486] {pt3dclear()
pt3dadd(30.92, 44, -8.5, 0.78)
pt3dadd(31.2, 44.89, -7.24, 0.78)
}
dend[487] {pt3dclear()
pt3dadd(31.2, 44.89, -7.24, 0.78)
pt3dadd(31.09, 44.53, -7.75, 0.78)
pt3dadd(32.5, 45.94, -7.25, 0.78)
pt3dadd(33.28, 47.03, -7.25, 0.78)
pt3dadd(33.44, 48.44, -7.25, 0.78)
pt3dadd(33.59, 50.94, -6.75, 0.78)
}
dend[488] {pt3dclear()
pt3dadd(31.2, 44.89, -7.24, 0.78)
pt3dadd(30.33, 45.64, -8.25, 0.23)
}
dend[489] {pt3dclear()
pt3dadd(30.33, 45.64, -8.25, 0.23)
pt3dadd(29.36, 46.07, -8.25, 0.23)
pt3dadd(28.54, 46.58, -8.25, 0.23)
pt3dadd(27.95, 47.4, -8.25, 0.23)
pt3dadd(27.87, 47.48, -8.25, 0.23)
pt3dadd(27.48, 48.3, -8.25, 0.23)
pt3dadd(27.17, 49.39, -8.25, 0.23)
pt3dadd(27.17, 49.51, -8.25, 0.23)
pt3dadd(27.01, 50.68, -8.25, 0.23)
pt3dadd(26.97, 50.84, -8.25, 0.23)
pt3dadd(26.89, 51.43, -8.25, 0.23)
pt3dadd(26.86, 51.54, -8.25, 0.23)
pt3dadd(26.74, 51.78, -8.25, 0.23)
pt3dadd(26.74, 51.89, -8.25, 0.23)
pt3dadd(26.66, 52.29, -8.25, 0.23)
}
dend[490] {pt3dclear()
pt3dadd(30.33, 45.64, -8.25, 0.23)
pt3dadd(30.76, 46.58, -8.25, 0.23)
pt3dadd(31.11, 47.71, -8.25, 0.23)
pt3dadd(30.76, 48.81, -8.25, 0.23)
pt3dadd(30.72, 48.93, -8.25, 0.23)
pt3dadd(30.18, 50.02, -8.25, 0.23)
pt3dadd(30.1, 50.14, -8.25, 0.23)
pt3dadd(30.02, 50.25, -8.25, 0.23)
pt3dadd(29.86, 50.33, -8.25, 0.23)
pt3dadd(29.75, 50.53, -8.25, 0.23)
pt3dadd(29.65, 51.09, -7.5, 0.23)
}
dend[491] {pt3dclear()
pt3dadd(29.65, 51.09, -7.5, 0.23)
pt3dadd(29.24, 51.78, -8.25, 0.23)
pt3dadd(29.16, 51.89, -8.25, 0.23)
pt3dadd(28.85, 52.68, -8.25, 0.23)
pt3dadd(28.81, 52.83, -8.25, 0.23)
pt3dadd(28.73, 52.91, -8.25, 0.23)
pt3dadd(28.34, 53.26, -8.25, 0.23)
}
dend[492] {pt3dclear()
pt3dadd(29.65, 51.09, -7.5, 0.23)
pt3dadd(31.37, 51.88, -7.25, 0.31)
pt3dadd(31.45, 51.95, -7.25, 0.31)
pt3dadd(32.07, 52.34, -7.25, 0.31)
pt3dadd(32.15, 52.5, -7.25, 0.31)
pt3dadd(32.46, 53.05, -7.25, 0.31)
pt3dadd(32.46, 53.2, -7.25, 0.31)
}
dend[493] {pt3dclear()
pt3dadd(30.92, 44, -8.5, 0.78)
pt3dadd(32.07, 43.2, -8.5, 0.47)
pt3dadd(32.15, 43.05, -8.5, 0.47)
pt3dadd(32.61, 42.66, -8.5, 0.47)
}
dend[494] {pt3dclear()
pt3dadd(32.61, 42.66, -8.5, 0.47)
pt3dadd(33.01, 42.34, -8.5, 0.47)
pt3dadd(33.01, 41.8, -8.5, 0.47)
pt3dadd(32.85, 40.7, -8.5, 0.47)
pt3dadd(33.09, 40.08, -8.5, 0.47)
pt3dadd(33.01, 40, -8.5, 0.47)
}
dend[495] {pt3dclear()
pt3dadd(32.61, 42.66, -8.5, 0.47)
pt3dadd(33.63, 43.52, -8.5, 0.47)
pt3dadd(34.4, 44.53, -8.5, 0.47)
pt3dadd(35.35, 45.08, -8.5, 0.47)
pt3dadd(35.74, 45.31, -8.5, 0.47)
pt3dadd(35.97, 46.33, -8.5, 0.47)
}
dend[496] {pt3dclear()
pt3dadd(30, 42.03, -7.75, 0.78)
pt3dadd(28.59, 42.34, -7.5, 0.94)
pt3dadd(27.81, 43.13, -7.5, 0.94)
pt3dadd(27.03, 44.22, -7.5, 0.94)
pt3dadd(26.25, 45.31, -7.5, 0.94)
pt3dadd(25.94, 46.25, -7.5, 0.94)
pt3dadd(25.49, 46.5, -8, 0.94)
}
dend[497] {pt3dclear()
pt3dadd(25.49, 46.5, -8, 0.94)
pt3dadd(24.69, 47.03, -7.25, 0.63)
pt3dadd(23.59, 48.91, -7.25, 0.63)
pt3dadd(23.44, 48.91, -7.25, 0.63)
pt3dadd(23.13, 49.53, -7.25, 0.63)
pt3dadd(22.77, 50.08, -7.25, 0.31)
pt3dadd(23.01, 50.78, -7.25, 0.31)
pt3dadd(22.93, 50.86, -7.25, 0.31)
pt3dadd(22.93, 51.02, -7.25, 0.31)
}
dend[498] {pt3dclear()
pt3dadd(25.49, 46.5, -8, 0.94)
pt3dadd(25.02, 46.23, -8, 0.23)
pt3dadd(24.2, 46.15, -8, 0.23)
pt3dadd(23.57, 46.15, -8, 0.23)
pt3dadd(23.46, 46.15, -8, 0.23)
pt3dadd(22.83, 46.27, -8, 0.23)
pt3dadd(22.48, 46.31, -8, 0.23)
}
dend[499] {pt3dclear()
pt3dadd(30.78, 35.63, -7.75, 0.94)
pt3dadd(29.38, 36.09, -8.25, 0.94)
}
dend[500] {pt3dclear()
pt3dadd(29.38, 36.09, -8.25, 0.94)
pt3dadd(28.36, 36.56, -8.25, 0.94)
}
dend[501] {pt3dclear()
pt3dadd(28.36, 36.56, -8.25, 0.94)
pt3dadd(27.19, 36.88, -7.75, 0.94)
}
dend[502] {pt3dclear()
pt3dadd(27.19, 36.88, -7.75, 0.94)
pt3dadd(25.94, 38.13, -7.75, 0.94)
pt3dadd(24.69, 39.38, -7.75, 0.94)
}
dend[503] {pt3dclear()
pt3dadd(24.69, 39.38, -7.75, 0.94)
pt3dadd(24.69, 40.31, -7.5, 0.94)
}
dend[504] {pt3dclear()
pt3dadd(24.69, 40.31, -7.5, 0.94)
pt3dadd(24.38, 42.5, -7.5, 0.63)
pt3dadd(24.38, 42.66, -7.5, 0.63)
pt3dadd(24.06, 43.59, -7.5, 0.63)
pt3dadd(23.44, 44.53, -7.5, 0.63)
pt3dadd(23.28, 44.53, -7.5, 0.63)
pt3dadd(22.97, 44.84, -7.5, 0.63)
pt3dadd(22.81, 45, -7.5, 0.63)
pt3dadd(21.88, 46.09, -7.5, 0.63)
pt3dadd(22.03, 46.72, -7.5, 0.63)
pt3dadd(22.03, 47.19, -7.5, 0.63)
pt3dadd(21.72, 48.75, -7.5, 0.63)
pt3dadd(21.88, 49.38, -7.5, 0.63)
}
dend[505] {pt3dclear()
pt3dadd(24.69, 40.31, -7.5, 0.94)
pt3dadd(23.71, 40.79, -8.5, 0.47)
pt3dadd(22.85, 41.5, -8.5, 0.47)
pt3dadd(22.23, 42.21, -8.5, 0.47)
pt3dadd(21.76, 42.75, -8.5, 0.47)
pt3dadd(21.6, 42.83, -8.5, 0.47)
pt3dadd(21.29, 43.61, -8.5, 0.47)
pt3dadd(21.21, 43.69, -8.5, 0.47)
pt3dadd(21.13, 43.77, -8.5, 0.47)
pt3dadd(21.05, 44.24, -8.5, 0.47)
pt3dadd(20.98, 44.63, -8.5, 0.47)
pt3dadd(20.78, 44.74, -8.5, 0.47)
pt3dadd(20.74, 44.94, -8.5, 0.47)
pt3dadd(20.62, 45.1, -8.5, 0.47)
pt3dadd(20.43, 45.33, -8.5, 0.47)
pt3dadd(20.19, 45.64, -8.5, 0.47)
pt3dadd(19.77, 46.03, -8.5, 0.47)
pt3dadd(19.45, 46.46, -8.5, 0.47)
pt3dadd(19.32, 46.86, -8.5, 0.47)
pt3dadd(19.37, 47.4, -8.5, 0.47)
pt3dadd(19.45, 48.22, -8.5, 0.47)
pt3dadd(19.48, 48.42, -8.5, 0.47)
pt3dadd(19.73, 48.69, -8.5, 0.47)
}
dend[506] {pt3dclear()
pt3dadd(24.69, 39.38, -7.75, 0.94)
pt3dadd(21.56, 38.75, -7.5, 0.63)
pt3dadd(20.63, 38.75, -7.5, 0.63)
pt3dadd(20.47, 38.59, -7.5, 0.63)
pt3dadd(18.75, 38.13, -7.25, 0.94)
}
dend[507] {pt3dclear()
pt3dadd(18.75, 38.13, -7.25, 0.94)
pt3dadd(18.07, 39.88, -7.25, 0.94)
}
dend[508] {pt3dclear()
pt3dadd(18.07, 39.88, -7.25, 0.94)
pt3dadd(17.97, 40.15, -7.25, 0.94)
pt3dadd(17.03, 42.34, -7.25, 0.94)
}
dend[509] {pt3dclear()
pt3dadd(17.03, 42.34, -7.25, 0.94)
pt3dadd(15.78, 42.66, -7.25, 0.94)
pt3dadd(15.16, 43.75, -7.25, 0.94)
pt3dadd(15, 43.75, -7.25, 0.94)
pt3dadd(14.84, 44.84, -7.25, 0.94)
pt3dadd(14.57, 45.1, -7.75, 0.94)
}
dend[510] {pt3dclear()
pt3dadd(14.57, 45.1, -7.75, 0.94)
pt3dadd(14.1, 45.31, -7.25, 0.55)
pt3dadd(13.16, 46.02, -7.25, 0.55)
pt3dadd(12.7, 46.8, -7.25, 0.55)
pt3dadd(12.23, 47.34, -7.25, 0.55)
pt3dadd(11.68, 48.05, -7.25, 0.55)
pt3dadd(11.6, 48.13, -7.25, 0.55)
pt3dadd(10.98, 48.91, -7.25, 0.55)
pt3dadd(10.74, 48.98, -7.25, 0.55)
pt3dadd(10.66, 49.14, -7.25, 0.55)
pt3dadd(10.03, 50.16, -7.25, 0.55)
pt3dadd(9.41, 50.7, -7.25, 0.55)
pt3dadd(9.34, 50.78, -7.25, 0.55)
pt3dadd(8.48, 51.09, -7.25, 0.55)
pt3dadd(7.85, 51.25, -7.25, 0.55)
pt3dadd(6.37, 51.48, -7.25, 0.55)
}
dend[511] {pt3dclear()
pt3dadd(14.57, 45.1, -7.75, 0.94)
pt3dadd(14.65, 46.04, -7.5, 0.31)
pt3dadd(14.49, 46.19, -7.5, 0.31)
pt3dadd(14.26, 46.97, -7.5, 0.31)
pt3dadd(14.18, 47.13, -7.5, 0.31)
pt3dadd(13.87, 47.91, -7.5, 0.31)
pt3dadd(13.79, 48.07, -7.5, 0.31)
pt3dadd(13.71, 48.69, -7.5, 0.31)
pt3dadd(13.63, 48.77, -7.5, 0.31)
pt3dadd(13.55, 49.47, -7.5, 0.31)
pt3dadd(13.48, 49.55, -7.5, 0.31)
pt3dadd(13.32, 50.18, -7.5, 0.31)
}
dend[512] {pt3dclear()
pt3dadd(17.03, 42.34, -7.25, 0.94)
pt3dadd(17.66, 43.75, -7.25, 0.94)
pt3dadd(17.66, 43.91, -7.25, 0.94)
pt3dadd(17.03, 45.63, -7.25, 0.94)
pt3dadd(16.25, 47.03, -7.25, 0.94)
pt3dadd(15.47, 47.19, -7.25, 0.94)
}
dend[513] {pt3dclear()
pt3dadd(18.07, 39.88, -7.25, 0.94)
pt3dadd(15.63, 38.75, -7.25, 0.94)
pt3dadd(14.22, 38.9, -7.25, 0.94)
}
}
proc shape3d_18() {
dend[513] { pt3dadd(14.06, 39.06, -7.25, 0.94)
}
dend[514] {pt3dclear()
pt3dadd(14.06, 39.06, -7.25, 0.94)
pt3dadd(13.28, 40.31, -7.25, 0.94)
pt3dadd(13.13, 40.31, -7.25, 0.94)
pt3dadd(12.5, 41.56, -7.25, 0.94)
pt3dadd(12.34, 41.72, -7.25, 0.94)
pt3dadd(11.56, 42.66, -7.25, 0.94)
pt3dadd(11.41, 42.66, -7.25, 0.94)
pt3dadd(10.63, 43.44, -7.25, 0.94)
}
dend[515] {pt3dclear()
pt3dadd(14.06, 39.06, -7.25, 0.94)
pt3dadd(13.44, 38.28, -6.75, 1.09)
pt3dadd(13.44, 38.13, -6.75, 1.09)
pt3dadd(12.81, 37.5, -6.75, 1.09)
pt3dadd(12.19, 36.72, -6.75, 1.09)
pt3dadd(12.03, 36.72, -6.75, 1.09)
}
dend[516] {pt3dclear()
pt3dadd(18.75, 38.13, -7.25, 0.94)
pt3dadd(17.7, 36.97, -8, 0.94)
}
dend[517] {pt3dclear()
pt3dadd(17.7, 36.97, -8, 0.94)
pt3dadd(17.34, 36.4, -7.25, 0.78)
pt3dadd(16.88, 34.84, -7.25, 0.78)
pt3dadd(16.41, 33.44, -7.25, 0.78)
pt3dadd(16.25, 33.44, -7.25, 0.78)
pt3dadd(15.16, 32.19, -7.25, 0.78)
pt3dadd(14.53, 31.25, -7.25, 0.78)
pt3dadd(14.38, 31.25, -7.25, 0.78)
}
dend[518] {pt3dclear()
pt3dadd(17.7, 36.97, -8, 0.94)
pt3dadd(16.13, 36.58, -8, 0.47)
pt3dadd(15.35, 36.43, -8, 0.47)
pt3dadd(15.27, 36.35, -8, 0.47)
pt3dadd(13.79, 35.96, -8, 0.47)
pt3dadd(13.63, 35.57, -8, 0.47)
pt3dadd(13.32, 34.94, -8, 0.47)
pt3dadd(13.24, 34.86, -8, 0.47)
pt3dadd(13.32, 34.39, -8, 0.47)
}
dend[519] {pt3dclear()
pt3dadd(27.19, 36.88, -7.75, 0.94)
pt3dadd(26.31, 35.82, -7.25, 0.55)
pt3dadd(25.61, 35.2, -7.25, 0.55)
pt3dadd(24.75, 34.79, -7.25, 0.55)
pt3dadd(23.89, 34.57, -7.25, 0.55)
pt3dadd(23.81, 34.49, -7.25, 0.55)
pt3dadd(22.95, 34.34, -6.75, 0.55)
}
dend[520] {pt3dclear()
pt3dadd(22.95, 34.34, -6.75, 0.55)
pt3dadd(22.1, 33.64, -6.75, 0.55)
}
dend[521] {pt3dclear()
pt3dadd(22.1, 33.64, -6.75, 0.55)
pt3dadd(21.23, 32.54, -6.75, 0.55)
pt3dadd(20.72, 32.07, -6.75, 0.55)
pt3dadd(20.37, 31.95, -6.75, 0.55)
}
dend[522] {pt3dclear()
pt3dadd(20.37, 31.95, -6.75, 0.55)
pt3dadd(19.89, 31.6, -6.75, 0.55)
pt3dadd(19.32, 31.33, -6.75, 0.55)
pt3dadd(18.5, 30.9, -6.75, 0.55)
pt3dadd(17.79, 30.35, -6.75, 0.55)
pt3dadd(17.71, 30.27, -6.75, 0.55)
pt3dadd(16.93, 29.73, -6.75, 0.55)
}
dend[523] {pt3dclear()
pt3dadd(20.37, 31.95, -6.75, 0.55)
pt3dadd(20.45, 31.09, -6.75, 0.23)
pt3dadd(20.49, 30.51, -6.75, 0.23)
pt3dadd(20.45, 29.96, -6.75, 0.23)
pt3dadd(20.49, 29.1, -6.75, 0.31)
pt3dadd(20.57, 28.52, -6.75, 0.31)
pt3dadd(20.64, 28.01, -6.75, 0.31)
pt3dadd(20.68, 27.34, -6.75, 0.31)
pt3dadd(20.92, 26.91, -6.75, 0.31)
pt3dadd(21.11, 26.72, -6.75, 0.31)
pt3dadd(21.11, 26.56, -6.75, 0.31)
pt3dadd(21.23, 26.09, -6.75, 0.31)
pt3dadd(21.19, 25.35, -6.75, 0.31)
pt3dadd(21.23, 24.88, -6.75, 0.31)
pt3dadd(21.31, 24.41, -6.75, 0.31)
pt3dadd(21.7, 24.06, -6.5, 0.31)
pt3dadd(22.05, 23.91, -6.5, 0.31)
pt3dadd(22.64, 23.79, -6.5, 0.31)
pt3dadd(23.11, 23.55, -6.5, 0.31)
pt3dadd(23.73, 23.4, -6.5, 0.31)
pt3dadd(24.24, 23.32, -6.5, 0.31)
}
dend[524] {pt3dclear()
pt3dadd(22.1, 33.64, -6.75, 0.55)
pt3dadd(22.09, 35.2, -7, 0.55)
pt3dadd(21.93, 35.11, -7, 0.55)
pt3dadd(21.86, 35.04, -7, 0.55)
pt3dadd(19.89, 35.43, -7, 0.55)
pt3dadd(18.8, 35.43, -7, 0.55)
}
dend[525] {pt3dclear()
pt3dadd(22.95, 34.34, -6.75, 0.55)
pt3dadd(23.42, 32.85, -6.75, 0.55)
pt3dadd(23.34, 32.38, -6.75, 0.55)
pt3dadd(23.55, 31.56, -6.75, 0.158)
pt3dadd(23.79, 30.94, -6.75, 0.158)
pt3dadd(24.26, 29.92, -6.75, 0.158)
pt3dadd(24.73, 29.45, -6.75, 0.158)
pt3dadd(25.27, 29.06, -7.5, 0.47)
pt3dadd(26.29, 28.2, -7.5, 0.47)
}
dend[526] {pt3dclear()
pt3dadd(26.29, 28.2, -7.5, 0.47)
pt3dadd(26.6, 26.8, -7.5, 0.47)
pt3dadd(26.76, 25.78, -7.5, 0.47)
pt3dadd(27.3, 25.16, -7.5, 0.47)
}
dend[527] {pt3dclear()
pt3dadd(27.3, 25.16, -7.5, 0.47)
pt3dadd(26.84, 23.91, -7.5, 0.47)
pt3dadd(26.76, 23.83, -7.5, 0.47)
pt3dadd(26.37, 22.81, -7.5, 0.47)
pt3dadd(26.29, 22.66, -7.5, 0.47)
pt3dadd(26.29, 22.19, -7.5, 0.47)
}
dend[528] {pt3dclear()
pt3dadd(26.29, 22.19, -7.5, 0.47)
pt3dadd(25.35, 22.03, -7.5, 0.47)
pt3dadd(25.27, 21.95, -7.5, 0.47)
pt3dadd(23.95, 21.25, -7.5, 0.47)
pt3dadd(23.32, 20.7, -7.5, 0.47)
pt3dadd(22.7, 20, -7.5, 0.47)
pt3dadd(21.84, 19.53, -7.5, 0.47)
pt3dadd(20.35, 17.8, -7.25, 0.47)
}
dend[529] {pt3dclear()
pt3dadd(26.29, 22.19, -7.5, 0.47)
pt3dadd(27.85, 21.17, -7.75, 0.47)
pt3dadd(27.77, 21.09, -7.75, 0.47)
pt3dadd(28.71, 20.07, -7.75, 0.47)
pt3dadd(28.79, 19.77, -7.75, 0.47)
}
dend[530] {pt3dclear()
pt3dadd(28.79, 19.77, -7.75, 0.47)
pt3dadd(29.88, 19.84, -7.75, 0.47)
pt3dadd(29.96, 19.77, -7.75, 0.47)
pt3dadd(31.21, 19.69, -7.75, 0.47)
pt3dadd(31.45, 19.38, -7.75, 0.47)
pt3dadd(32.54, 18.28, -7.75, 0.47)
pt3dadd(33.01, 17.57, -7.75, 0.47)
pt3dadd(33.86, 17.42, -7.75, 0.47)
}
dend[531] {pt3dclear()
pt3dadd(28.79, 19.77, -7.75, 0.47)
pt3dadd(28.32, 17.89, -7.5, 0.47)
}
dend[532] {pt3dclear()
pt3dadd(28.32, 17.89, -7.5, 0.47)
pt3dadd(29.26, 16.8, -7.5, 0.47)
pt3dadd(29.34, 16.64, -7.5, 0.47)
pt3dadd(29.8, 15.78, -7.5, 0.47)
pt3dadd(29.88, 15, -7.5, 0.47)
pt3dadd(29.88, 14.84, -7.5, 0.47)
pt3dadd(30.27, 13.91, -7.5, 0.47)
pt3dadd(30.35, 13.75, -7.5, 0.47)
pt3dadd(30.82, 13.36, -7.5, 0.47)
pt3dadd(31.52, 12.73, -7.5, 0.47)
pt3dadd(31.68, 12.58, -7.5, 0.47)
pt3dadd(31.99, 12.19, -7.5, 0.47)
pt3dadd(32.38, 11.8, -7.5, 0.47)
pt3dadd(32.54, 10.94, -7.5, 0.47)
}
dend[533] {pt3dclear()
pt3dadd(28.32, 17.89, -7.5, 0.47)
pt3dadd(26.84, 17.03, -7.5, 0.47)
pt3dadd(26.52, 16.48, -7.5, 0.47)
pt3dadd(26.6, 15.47, -7.5, 0.47)
pt3dadd(26.52, 14.69, -7.5, 0.47)
pt3dadd(26.52, 14.38, -7.5, 0.47)
}
dend[534] {pt3dclear()
pt3dadd(27.3, 25.16, -7.5, 0.47)
pt3dadd(25.59, 26.09, -7.25, 0.47)
pt3dadd(24.57, 26.72, -7.25, 0.47)
pt3dadd(24.41, 26.72, -7.25, 0.47)
pt3dadd(23.48, 27.58, -7.25, 0.47)
pt3dadd(22.85, 27.89, -7.25, 0.47)
}
dend[535] {pt3dclear()
pt3dadd(26.29, 28.2, -7.5, 0.47)
pt3dadd(27.62, 28.59, -7.75, 0.47)
}
dend[536] {pt3dclear()
pt3dadd(27.62, 28.59, -7.75, 0.47)
pt3dadd(29.02, 27.73, -7.75, 0.47)
pt3dadd(29.73, 27.03, -7.75, 0.47)
pt3dadd(30.2, 26.48, -7.75, 0.47)
pt3dadd(30.66, 25.78, -7.75, 0.47)
pt3dadd(30.9, 25.47, -7.75, 0.47)
}
dend[537] {pt3dclear()
pt3dadd(27.62, 28.59, -7.75, 0.47)
pt3dadd(29.73, 29.69, -7.75, 0.31)
pt3dadd(30.27, 29.84, -7.75, 0.31)
}
dend[538] {pt3dclear()
pt3dadd(30.27, 29.84, -7.75, 0.31)
pt3dadd(31.29, 31.02, -7.75, 0.31)
pt3dadd(32.38, 31.64, -7.75, 0.31)
pt3dadd(32.46, 31.95, -7.75, 0.31)
pt3dadd(33.15, 32.97, -7.75, 0.158)
pt3dadd(33.47, 34.38, -7.75, 0.158)
pt3dadd(33.47, 35.31, -7.75, 0.158)
pt3dadd(33.4, 35.39, -7.75, 0.158)
pt3dadd(33.54, 36.09, -7.75, 0.158)
}
dend[539] {pt3dclear()
pt3dadd(30.27, 29.84, -7.75, 0.31)
pt3dadd(31.68, 28.75, -7.75, 0.31)
pt3dadd(32.46, 27.73, -7.75, 0.31)
pt3dadd(32.46, 27.58, -7.75, 0.31)
pt3dadd(32.7, 26.8, -7.75, 0.31)
}
dend[540] {pt3dclear()
pt3dadd(28.36, 36.56, -8.25, 0.94)
pt3dadd(28.52, 37.19, -8.5, 0.078)
pt3dadd(28.52, 37.11, -8.25, 0.078)
pt3dadd(28.59, 37.97, -8.5, 0.078)
pt3dadd(28.59, 38.52, -8.5, 0.078)
pt3dadd(28.59, 39.14, -8.5, 0.078)
pt3dadd(28.28, 39.29, -8.5, 0.078)
pt3dadd(28.36, 39.69, -8.5, 0.078)
pt3dadd(28.2, 39.77, -8.5, 0.078)
pt3dadd(27.89, 39.84, -8.5, 0.078)
pt3dadd(27.19, 40.63, -8.5, 0.078)
pt3dadd(26.95, 40.7, -8.5, 0.078)
pt3dadd(26.09, 41.25, -8.5, 0.078)
pt3dadd(26.02, 41.41, -8.5, 0.078)
pt3dadd(25.94, 41.48, -8.5, 0.078)
pt3dadd(25.78, 42.27, -8.5, 0.078)
pt3dadd(25.78, 42.42, -8.5, 0.078)
pt3dadd(25.86, 42.5, -8.5, 0.078)
pt3dadd(26.02, 43.36, -8.5, 0.078)
pt3dadd(26.02, 43.59, -8.5, 0.078)
pt3dadd(25.94, 44.45, -8.5, 0.078)
pt3dadd(26.09, 44.61, -8.5, 0.078)
}
dend[541] {pt3dclear()
pt3dadd(26.09, 44.61, -8.5, 0.078)
pt3dadd(25.86, 44.14, -8.5, 0.078)
}
dend[542] {pt3dclear()
pt3dadd(26.09, 44.61, -8.5, 0.078)
pt3dadd(26.17, 44.84, -8.5, 0.078)
}
}
proc shape3d_19() {
dend[542] { pt3dadd(26.17, 45, -8.5, 0.078)
pt3dadd(26.25, 45.63, -8.5, 0.078)
pt3dadd(26.56, 46.09, -8.5, 0.078)
pt3dadd(26.8, 46.8, -8.5, 0.078)
}
dend[543] {pt3dclear()
pt3dadd(29.38, 36.09, -8.25, 0.94)
pt3dadd(27.66, 34.38, -8.25, 0.63)
pt3dadd(27.03, 33.28, -8.25, 0.63)
pt3dadd(26.09, 32.34, -8.25, 0.63)
pt3dadd(25.94, 32.19, -8.25, 0.63)
pt3dadd(25.63, 32.03, -8.25, 0.63)
pt3dadd(25.47, 31.88, -8.25, 0.63)
pt3dadd(24.53, 31.56, -8.25, 0.63)
pt3dadd(24.38, 31.56, -8.25, 0.63)
pt3dadd(23.44, 31.56, -8.25, 0.63)
pt3dadd(23.28, 31.56, -8.25, 0.63)
pt3dadd(22.66, 31.56, -8.25, 0.63)
pt3dadd(22.03, 31.25, -8.25, 0.63)
pt3dadd(21.88, 31.25, -8.25, 0.63)
}
dend[544] {pt3dclear()
pt3dadd(35.59, 30.93, -7.75, 1.56)
pt3dadd(36.72, 31.18, -7.75, 1.09)
pt3dadd(38.11, 31.64, -7.75, 1.09)
pt3dadd(38.75, 31.95, -11.75, 1.09)
}
dend[545] {pt3dclear()
pt3dadd(38.75, 31.95, -11.75, 1.09)
pt3dadd(39.06, 30.86, -11.75, 0.158)
pt3dadd(41.25, 28.05, -11.75, 0.158)
}
dend[546] {pt3dclear()
pt3dadd(41.25, 28.05, -11.75, 0.158)
pt3dadd(40.7, 26.64, -11.75, 0.31)
pt3dadd(40.08, 25.55, -11.75, 0.31)
pt3dadd(39.29, 24.92, -11.75, 0.31)
pt3dadd(39.14, 24.92, -11.75, 0.31)
pt3dadd(38.4, 24.92, -9, 0.31)
}
dend[547] {pt3dclear()
pt3dadd(38.4, 24.92, -9, 0.31)
pt3dadd(37.58, 24.92, -11.75, 0.31)
pt3dadd(37.42, 24.92, -11.75, 0.31)
pt3dadd(36.36, 25.16, -9, 0.31)
}
dend[548] {pt3dclear()
pt3dadd(36.36, 25.16, -9, 0.31)
pt3dadd(35.7, 25.23, -11.75, 0.31)
pt3dadd(35.47, 25.31, -11.75, 0.31)
pt3dadd(34.84, 25.7, -11.75, 0.31)
pt3dadd(34.61, 25.7, -11.75, 0.31)
pt3dadd(34.45, 25.78, -11.75, 0.31)
pt3dadd(33.67, 26.09, -11.75, 0.31)
}
dend[549] {pt3dclear()
pt3dadd(33.67, 26.09, -11.75, 0.31)
pt3dadd(33.97, 27.66, -11.75, 0.31)
pt3dadd(33.97, 28.05, -11.75, 0.31)
pt3dadd(34.06, 29.14, -11.75, 0.31)
pt3dadd(34.06, 29.61, -11.75, 0.31)
pt3dadd(34.14, 30.55, -11.75, 0.31)
pt3dadd(34.14, 30.78, -11.75, 0.31)
pt3dadd(34.38, 31.72, -11.75, 0.31)
pt3dadd(34.45, 31.88, -11.75, 0.31)
pt3dadd(34.53, 32.03, -11.75, 0.31)
pt3dadd(34.61, 32.19, -11.75, 0.31)
pt3dadd(35, 32.72, -11.75, 0.31)
pt3dadd(35.08, 32.81, -11.75, 0.31)
pt3dadd(35.15, 32.97, -11.75, 0.31)
pt3dadd(35.22, 33.04, -11.75, 0.31)
pt3dadd(35.47, 33.59, -11.75, 0.31)
pt3dadd(35.54, 33.67, -11.75, 0.31)
pt3dadd(35.54, 33.83, -11.75, 0.31)
pt3dadd(35.86, 34.69, -11.75, 0.31)
}
dend[550] {pt3dclear()
pt3dadd(33.67, 26.09, -11.75, 0.31)
pt3dadd(32.89, 25.55, -11.5, 0.31)
pt3dadd(32.03, 24.77, -11.5, 0.31)
pt3dadd(31.17, 24.53, -11.5, 0.31)
pt3dadd(30.63, 24.06, -11.5, 0.31)
pt3dadd(30.47, 23.91, -11.5, 0.31)
pt3dadd(30.51, 23.28, -11.5, 0.078)
pt3dadd(30.74, 22.58, -11.5, 0.078)
pt3dadd(30.82, 22.42, -11.5, 0.078)
pt3dadd(31.68, 21.95, -11.5, 0.078)
pt3dadd(32.61, 21.48, -11.5, 0.078)
pt3dadd(33.09, 21.17, -11.5, 0.078)
}
dend[551] {pt3dclear()
pt3dadd(33.09, 21.17, -11.5, 0.078)
pt3dadd(32.93, 20.16, -11.5, 0.078)
}
dend[552] {pt3dclear()
pt3dadd(33.09, 21.17, -11.5, 0.078)
pt3dadd(34.1, 20.63, -11.25, 0.078)
pt3dadd(35.27, 20.07, -11.25, 0.078)
pt3dadd(36.13, 19.61, -11.25, 0.078)
}
dend[553] {pt3dclear()
pt3dadd(36.36, 25.16, -9, 0.31)
pt3dadd(35.9, 24.3, -8.75, 0.078)
pt3dadd(35.51, 23.52, -8.75, 0.078)
pt3dadd(35.43, 23.44, -8.75, 0.078)
pt3dadd(34.96, 22.66, -8.75, 0.078)
pt3dadd(34.88, 22.5, -8.75, 0.078)
pt3dadd(34.57, 21.48, -8.75, 0.078)
pt3dadd(34.57, 21.33, -8.75, 0.078)
pt3dadd(34.49, 20.16, -8.75, 0.078)
pt3dadd(34.4, 20.07, -8.75, 0.078)
pt3dadd(34.49, 19.22, -8.75, 0.078)
pt3dadd(34.49, 18.98, -8.75, 0.078)
pt3dadd(34.65, 18.28, -8.75, 0.078)
pt3dadd(34.65, 17.42, -8.75, 0.078)
}
dend[554] {pt3dclear()
pt3dadd(38.4, 24.92, -9, 0.31)
pt3dadd(38.24, 23.91, -8.75, 0.078)
pt3dadd(38.15, 23.83, -8.75, 0.078)
pt3dadd(38.01, 23.05, -8.75, 0.078)
pt3dadd(37.93, 22.97, -8.75, 0.078)
pt3dadd(37.93, 22.19, -8.75, 0.078)
pt3dadd(37.85, 22.11, -8.75, 0.078)
pt3dadd(37.85, 21.33, -8.75, 0.078)
pt3dadd(37.85, 21.02, -8.75, 0.078)
pt3dadd(37.93, 20.55, -8.75, 0.078)
pt3dadd(38.01, 20.39, -8.75, 0.078)
pt3dadd(38.15, 19.77, -8.75, 0.078)
pt3dadd(38.32, 19.05, -8.75, 0.078)
pt3dadd(38.63, 18.75, -8.75, 0.078)
pt3dadd(38.71, 18.67, -8.75, 0.078)
pt3dadd(39.34, 18.44, -8.75, 0.078)
pt3dadd(39.4, 18.36, -8.75, 0.078)
pt3dadd(39.88, 18.05, -8.75, 0.078)
}
dend[555] {pt3dclear()
pt3dadd(41.25, 28.05, -11.75, 0.158)
pt3dadd(42.03, 26.17, -11.75, 0.31)
pt3dadd(42.89, 25.31, -11.75, 0.158)
pt3dadd(43.28, 24.69, -11.75, 0.158)
pt3dadd(43.91, 24.69, -11.75, 0.158)
pt3dadd(44.22, 25, -11.75, 0.158)
}
dend[556] {pt3dclear()
pt3dadd(38.75, 31.95, -11.75, 1.09)
pt3dadd(39.38, 32.11, -7.75, 1.09)
pt3dadd(41.25, 34.22, -8.25, 1.09)
pt3dadd(44.53, 35.47, -8.25, 1.09)
pt3dadd(44.38, 35.47, -8.25, 1.09)
pt3dadd(46.25, 35.31, -8.25, 1.09)
pt3dadd(47.54, 35.22, -8.5, 1.41)
}
dend[557] {pt3dclear()
pt3dadd(47.54, 35.22, -8.5, 1.41)
pt3dadd(49.06, 36.25, -9, 0.78)
pt3dadd(50.94, 37.03, -9, 0.78)
pt3dadd(52.66, 37.5, -9, 0.78)
pt3dadd(54.84, 38.9, -9, 0.78)
pt3dadd(54.84, 38.75, -9, 0.78)
pt3dadd(57.03, 40.31, -9.25, 0.78)
pt3dadd(56.88, 40.31, -9.25, 0.78)
pt3dadd(59.22, 41.88, -9.25, 0.78)
pt3dadd(59.06, 41.88, -9.25, 0.78)
pt3dadd(60.47, 43.13, -9.25, 0.78)
}
dend[558] {pt3dclear()
pt3dadd(60.47, 43.13, -9.25, 0.78)
pt3dadd(62.81, 43.75, -9.25, 0.78)
}
dend[559] {pt3dclear()
pt3dadd(60.47, 43.13, -9.25, 0.78)
pt3dadd(60.94, 46.09, -9.5, 1.09)
}
dend[560] {pt3dclear()
pt3dadd(47.54, 35.22, -8.5, 1.41)
pt3dadd(50.04, 35, -8.5, 1.41)
pt3dadd(51.99, 35.15, -8.5, 1.41)
}
dend[561] {pt3dclear()
pt3dadd(51.99, 35.15, -8.5, 1.41)
pt3dadd(52.5, 34.06, -8.75, 0.78)
pt3dadd(54.22, 31.88, -8.75, 0.78)
}
dend[562] {pt3dclear()
pt3dadd(54.22, 31.88, -8.75, 0.78)
pt3dadd(54.22, 30.78, -8.75, 0.78)
pt3dadd(54.38, 29.84, -8.75, 0.78)
pt3dadd(54.38, 29.69, -8.75, 0.78)
pt3dadd(54.69, 28.91, -8.75, 0.78)
pt3dadd(54.69, 28.75, -8.75, 0.78)
pt3dadd(54.69, 28.13, -8.75, 0.78)
pt3dadd(53.75, 27.5, -8.75, 0.78)
pt3dadd(53.13, 26.33, -8.75, 0.158)
pt3dadd(52.27, 25.63, -8.75, 0.158)
pt3dadd(52.11, 25.63, -8.75, 0.158)
pt3dadd(52.03, 25.55, -8.75, 0.158)
pt3dadd(51.33, 25.16, -8.75, 0.158)
pt3dadd(51.25, 25.08, -8.75, 0.158)
pt3dadd(50.7, 24.84, -8.75, 0.158)
pt3dadd(49.45, 24.22, -8.75, 0.158)
pt3dadd(48.75, 23.83, -8.75, 0.158)
pt3dadd(48.67, 22.81, -8.75, 0.158)
pt3dadd(48.67, 22.66, -8.75, 0.158)
pt3dadd(49.14, 22.34, -8.75, 0.158)
pt3dadd(49.84, 22.19, -8.75, 0.158)
pt3dadd(50.47, 22.34, -8.75, 0.158)
}
dend[563] {pt3dclear()
pt3dadd(54.22, 31.88, -8.75, 0.78)
pt3dadd(57.5, 31.72, -8.5, 0.78)
pt3dadd(59.22, 32.19, -8.5, 0.78)
}
dend[564] {pt3dclear()
pt3dadd(59.22, 32.19, -8.5, 0.78)
pt3dadd(60.31, 34.06, -8.5, 0.78)
pt3dadd(61.09, 35.31, -8.5, 0.78)
}
dend[565] {pt3dclear()
pt3dadd(59.22, 32.19, -8.5, 0.78)
pt3dadd(61.84, 32.11, -9, 0.78)
}
dend[566] {pt3dclear()
pt3dadd(61.84, 32.11, -9, 0.78)
pt3dadd(63.59, 32.03, -8.5, 0.78)
pt3dadd(63.75, 32.03, -8.5, 0.78)
pt3dadd(65.16, 32.34, -8.5, 0.78)
pt3dadd(65.31, 32.34, -8.5, 0.78)
pt3dadd(65.94, 32.5, -8.5, 0.78)
pt3dadd(68.28, 33.59, -8.5, 0.78)
}
dend[567] {pt3dclear()
pt3dadd(68.28, 33.59, -8.5, 0.78)
pt3dadd(69.84, 35.31, -8.5, 0.78)
pt3dadd(70.78, 36.4, -8.5, 0.78)
pt3dadd(70.94, 36.56, -8.5, 0.78)
pt3dadd(72.66, 37.65, -8.5, 0.78)
pt3dadd(73.91, 38.44, -8.5, 0.78)
}
dend[568] {pt3dclear()
pt3dadd(68.28, 33.59, -8.5, 0.78)
pt3dadd(71.72, 33.75, -8.5, 0.78)
pt3dadd(72.66, 34.22, -8.5, 0.78)
pt3dadd(72.97, 34.38, -8.5, 0.78)
pt3dadd(73.91, 35, -8.5, 0.78)
pt3dadd(74.22, 35.31, -8.5, 0.78)
pt3dadd(74.53, 35.63, -8.5, 0.78)
pt3dadd(74.69, 35.78, -8.5, 0.78)
pt3dadd(75, 35.94, -8.5, 0.78)
pt3dadd(75.47, 36.72, -8.5, 0.78)
pt3dadd(75.63, 37.03, -8.5, 0.78)
pt3dadd(76.09, 37.97, -8.5, 0.78)
}
}
proc shape3d_20() {
dend[568] { pt3dadd(76.25, 38.28, -8.5, 0.78)
pt3dadd(77.11, 38.75, -8.5, 0.158)
pt3dadd(78.2, 39.61, -8.5, 0.158)
pt3dadd(78.44, 39.84, -8.5, 0.158)
pt3dadd(78.98, 40.54, -8.5, 0.158)
pt3dadd(79.14, 40.78, -8.5, 0.158)
pt3dadd(79.3, 40.86, -8.5, 0.158)
pt3dadd(79.92, 41.41, -8.5, 0.158)
pt3dadd(80, 41.56, -8.5, 0.158)
pt3dadd(80.23, 41.95, -8.5, 0.158)
pt3dadd(80.55, 43.28, -8.5, 0.158)
pt3dadd(80.47, 43.36, -8.5, 0.158)
pt3dadd(80.16, 44.38, -8.5, 0.158)
pt3dadd(80.08, 44.53, -8.5, 0.158)
pt3dadd(80, 44.77, -8.5, 0.158)
pt3dadd(79.92, 44.84, -8.5, 0.158)
pt3dadd(79.77, 45.55, -8.5, 0.158)
pt3dadd(79.69, 45.7, -8.5, 0.158)
pt3dadd(79.61, 45.78, -8.5, 0.158)
pt3dadd(79.3, 46.48, -8.5, 0.158)
pt3dadd(79.14, 46.56, -8.5, 0.158)
pt3dadd(78.98, 46.64, -8.5, 0.158)
pt3dadd(78.83, 46.72, -8.5, 0.158)
pt3dadd(78.59, 47.27, -8.5, 0.158)
pt3dadd(78.44, 47.34, -8.5, 0.158)
pt3dadd(78.36, 47.42, -8.5, 0.158)
}
dend[569] {pt3dclear()
pt3dadd(61.84, 32.11, -9, 0.78)
pt3dadd(62.85, 33.2, -9, 0.7)
pt3dadd(64.02, 34.29, -9, 0.7)
pt3dadd(65.34, 35, -9, 0.7)
pt3dadd(66.2, 36.17, -9, 0.7)
pt3dadd(66.59, 37.19, -9, 0.7)
pt3dadd(66.91, 39.29, -9, 0.7)
}
dend[570] {pt3dclear()
pt3dadd(66.91, 39.29, -9, 0.7)
pt3dadd(66.13, 39.84, -9, 0.63)
pt3dadd(65.51, 40.7, -9, 0.63)
pt3dadd(65.51, 40.94, -9, 0.63)
}
dend[571] {pt3dclear()
pt3dadd(66.91, 39.29, -9, 0.7)
pt3dadd(68.01, 40.47, -9.25, 0.63)
}
dend[572] {pt3dclear()
pt3dadd(68.01, 40.47, -9.25, 0.63)
pt3dadd(69.88, 41.09, -9.25, 0.63)
}
dend[573] {pt3dclear()
pt3dadd(68.01, 40.47, -9.25, 0.63)
pt3dadd(68.55, 41.88, -9.25, 0.63)
}
dend[574] {pt3dclear()
pt3dadd(51.99, 35.15, -8.5, 1.41)
pt3dadd(52.7, 35.22, -8.5, 1.41)
pt3dadd(56.72, 36.88, -10.5, 1.41)
}
dend[575] {pt3dclear()
pt3dadd(56.72, 36.88, -10.5, 1.41)
pt3dadd(55.79, 34.22, -10.5, 1.41)
}
dend[576] {pt3dclear()
pt3dadd(55.79, 34.22, -10.5, 1.41)
pt3dadd(56.64, 36.65, -10.5, 1.41)
}
dend[577] {pt3dclear()
pt3dadd(55.79, 34.22, -10.5, 1.41)
pt3dadd(58.59, 38.9, -10.5, 1.09)
pt3dadd(60.47, 40, -10.5, 1.09)
pt3dadd(62.19, 41.09, -10.5, 1.09)
pt3dadd(63.59, 42.19, -10.5, 1.09)
pt3dadd(64.38, 43.59, -10.5, 1.09)
pt3dadd(64.53, 43.75, -10.5, 1.09)
}
dend[578] {pt3dclear()
pt3dadd(64.53, 43.75, -10.5, 1.09)
pt3dadd(67.66, 44.06, -10.5, 1.09)
pt3dadd(67.81, 44.06, -10.5, 1.09)
pt3dadd(69.53, 44.84, -10.5, 1.09)
pt3dadd(69.84, 44.84, -10.5, 1.09)
pt3dadd(71.09, 45.47, -10.5, 1.09)
pt3dadd(71.25, 45.47, -10.5, 1.09)
pt3dadd(72.19, 45.94, -10.5, 1.09)
}
dend[579] {pt3dclear()
pt3dadd(72.19, 45.94, -10.5, 1.09)
pt3dadd(74.22, 48.13, -10.5, 1.09)
}
dend[580] {pt3dclear()
pt3dadd(74.22, 48.13, -10.5, 1.09)
pt3dadd(76.88, 48.28, -10.5, 0.78)
pt3dadd(76.72, 48.28, -10.5, 0.78)
pt3dadd(79.69, 48.91, -10.5, 0.78)
pt3dadd(79.84, 48.91, -10.5, 0.78)
pt3dadd(82.19, 49.69, -10.5, 0.78)
pt3dadd(82.5, 49.69, -10.5, 0.78)
pt3dadd(85.16, 50.94, -10.5, 0.78)
pt3dadd(86.88, 52.03, -10.5, 0.78)
pt3dadd(87.19, 52.03, -10.5, 0.78)
pt3dadd(88.28, 52.81, -10.5, 0.78)
pt3dadd(88.91, 52.97, -10.5, 0.78)
pt3dadd(89.53, 53.59, -10.5, 0.78)
}
dend[581] {pt3dclear()
pt3dadd(74.22, 48.13, -10.5, 1.09)
pt3dadd(75.16, 50.47, -10.25, 0.78)
pt3dadd(75, 50.31, -10.25, 0.78)
}
dend[582] {pt3dclear()
pt3dadd(75, 50.31, -10.25, 0.78)
pt3dadd(77.03, 51.72, -10.25, 0.78)
pt3dadd(78.44, 52.66, -10.25, 0.78)
pt3dadd(79.06, 53.13, -10.25, 0.78)
}
dend[583] {pt3dclear()
pt3dadd(79.06, 53.13, -10.25, 0.78)
pt3dadd(79.2, 52.7, -8.42, 0.94)
}
dend[584] {pt3dclear()
pt3dadd(79.2, 52.7, -8.42, 0.94)
pt3dadd(79.34, 52.27, -6.6, 0.94)
}
dend[585] {pt3dclear()
pt3dadd(79.34, 52.27, -6.6, 0.94)
pt3dadd(79.22, 52.66, -8.25, 0.94)
}
dend[586] {pt3dclear()
pt3dadd(79.34, 52.27, -6.6, 0.94)
pt3dadd(81.88, 53.91, -10.25, 0.78)
pt3dadd(83.13, 54.53, -10.25, 0.78)
pt3dadd(83.13, 54.69, -10.25, 0.78)
pt3dadd(83.75, 55.47, -10.25, 0.78)
pt3dadd(83.91, 55.78, -10.25, 0.78)
pt3dadd(84.53, 56.72, -10.25, 0.78)
pt3dadd(84.69, 57.19, -10.25, 0.78)
pt3dadd(85.31, 60.94, -9.75, 0.78)
pt3dadd(85.31, 60.78, -9.75, 0.78)
pt3dadd(85.31, 62.5, -9.75, 0.78)
pt3dadd(84.38, 64.84, -9.25, 0.78)
}
dend[587] {pt3dclear()
pt3dadd(79.2, 52.7, -8.42, 0.94)
pt3dadd(82.66, 50.94, -8.25, 0.94)
}
dend[588] {pt3dclear()
pt3dadd(82.66, 50.94, -8.25, 0.94)
pt3dadd(84.84, 52.34, -8.25, 0.94)
pt3dadd(87.03, 53.13, -8.25, 0.94)
pt3dadd(88.44, 53.44, -8.25, 0.94)
pt3dadd(89.53, 53.59, -8.25, 0.94)
pt3dadd(91.25, 53.91, -8.25, 0.94)
pt3dadd(91.41, 53.91, -8.25, 0.94)
pt3dadd(93.44, 54.84, -8.25, 0.94)
pt3dadd(93.59, 54.84, -8.25, 0.94)
pt3dadd(95.31, 55.47, -8.25, 0.94)
pt3dadd(96.72, 56.41, -8.25, 0.94)
pt3dadd(97.97, 57.19, -8.25, 0.94)
pt3dadd(100.5, 57.97, -8.25, 0.94)
pt3dadd(100.5, 57.81, -8.25, 0.94)
pt3dadd(102.2, 58.75, -8.25, 0.94)
}
dend[589] {pt3dclear()
pt3dadd(102.2, 58.75, -8.25, 0.94)
pt3dadd(103.6, 59.99, -8.25, 0.94)
}
dend[590] {pt3dclear()
pt3dadd(103.6, 59.99, -8.25, 0.94)
pt3dadd(103.4, 59.84, -8.25, 0.94)
pt3dadd(104.4, 61.72, -8.25, 0.94)
pt3dadd(105.8, 63.44, -8.25, 0.94)
pt3dadd(106.3, 64.22, -8.25, 0.94)
pt3dadd(106.3, 64.38, -8.25, 0.94)
pt3dadd(106.4, 65.63, -8.25, 0.94)
pt3dadd(106.4, 65.78, -8.25, 0.94)
pt3dadd(107, 66.56, -8.25, 0.94)
pt3dadd(108, 67.34, -8.25, 0.94)
pt3dadd(109.2, 68.59, -8.25, 0.94)
pt3dadd(109.5, 68.59, -8.25, 0.94)
pt3dadd(110, 69.06, -8.25, 0.94)
}
dend[591] {pt3dclear()
pt3dadd(103.6, 59.99, -8.25, 0.94)
pt3dadd(105.2, 59.22, -8, 0.63)
pt3dadd(105.5, 59.22, -8, 0.63)
pt3dadd(105.8, 59.38, -8, 0.63)
pt3dadd(106.9, 60, -8, 0.63)
pt3dadd(107, 60, -8, 0.63)
pt3dadd(109.1, 60.63, -8, 0.63)
pt3dadd(109.7, 60.63, -8, 0.63)
pt3dadd(111.6, 61.72, -8, 0.63)
pt3dadd(111.4, 61.72, -8, 0.63)
}
dend[592] {pt3dclear()
pt3dadd(102.2, 58.75, -8.25, 0.94)
pt3dadd(103.6, 59.41, -6.25, 0.31)
pt3dadd(105, 60.08, -6.25, 0.31)
pt3dadd(105.2, 60.16, -6.25, 0.31)
pt3dadd(106.1, 60.63, -6.25, 0.31)
pt3dadd(106.2, 60.74, -6.25, 0.31)
pt3dadd(106.8, 61.25, -6.25, 0.43)
pt3dadd(107.3, 61.76, -6.25, 0.43)
pt3dadd(107.4, 61.84, -6.25, 0.43)
pt3dadd(108.1, 62.11, -6.25, 0.43)
pt3dadd(108.8, 62.38, -6.25, 0.43)
pt3dadd(109.6, 62.97, -6.25, 0.43)
}
dend[593] {pt3dclear()
pt3dadd(82.66, 50.94, -8.25, 0.94)
pt3dadd(84.69, 48.91, -8.5, 0.63)
pt3dadd(85.63, 48.44, -7.25, 0.63)
}
dend[594] {pt3dclear()
pt3dadd(85.63, 48.44, -7.25, 0.63)
pt3dadd(86.56, 47.66, -8.5, 0.63)
pt3dadd(88.59, 46.88, -8.5, 0.63)
pt3dadd(90.31, 45.16, -8.5, 0.63)
}
dend[595] {pt3dclear()
pt3dadd(90.31, 45.16, -8.5, 0.63)
pt3dadd(91.56, 43.13, -8.5, 0.94)
pt3dadd(92.66, 41.09, -8.5, 0.94)
pt3dadd(93.91, 40.15, -8.5, 0.94)
pt3dadd(94.84, 39.38, -8.5, 0.94)
pt3dadd(95.47, 38.44, -8.5, 0.94)
pt3dadd(96.25, 37.5, -8.5, 0.94)
pt3dadd(96.25, 37.34, -8.5, 0.94)
pt3dadd(97.34, 36.88, -8.5, 0.94)
pt3dadd(97.5, 36.88, -8.5, 0.94)
pt3dadd(98.28, 36.56, -8.5, 0.94)
pt3dadd(98.44, 36.56, -8.5, 0.94)
}
dend[596] {pt3dclear()
pt3dadd(90.31, 45.16, -8.5, 0.63)
pt3dadd(92.97, 45.16, -8.25, 0.94)
pt3dadd(94.53, 44.22, -8.25, 0.94)
pt3dadd(94.53, 44.06, -8.25, 0.94)
pt3dadd(95.94, 42.81, -8.25, 0.94)
pt3dadd(95.94, 42.66, -8.25, 0.94)
pt3dadd(97.03, 42.66, -8.25, 0.94)
}
dend[597] {pt3dclear()
pt3dadd(85.63, 48.44, -7.25, 0.63)
pt3dadd(88.13, 48.75, -7, 0.78)
pt3dadd(90.47, 49.38, -7, 0.78)
pt3dadd(92.97, 50.31, -7, 0.78)
pt3dadd(95.16, 51.72, -7, 0.78)
pt3dadd(97.19, 53.44, -7, 0.78)
pt3dadd(98.44, 54.22, -7, 0.78)
pt3dadd(99.06, 54.69, -7, 0.78)
}
dend[598] {pt3dclear()
pt3dadd(99.06, 54.69, -7, 0.78)
pt3dadd(100.6, 52.81, -7, 1.09)
pt3dadd(100.5, 52.81, -7, 1.09)
}
dend[599] {pt3dclear()
pt3dadd(99.06, 54.69, -7, 0.78)
pt3dadd(101.1, 56.09, -7, 0.78)
pt3dadd(101.1, 55.94, -7, 0.78)
pt3dadd(103.4, 56.72, -7, 0.78)
}
}
proc shape3d_21() {
dend[599] { pt3dadd(104.1, 56.88, -7, 0.78)
pt3dadd(105.6, 56.88, -7.25, 0.78)
pt3dadd(105.5, 56.72, -7.25, 0.78)
pt3dadd(107.7, 57.7, -7.25, 0.63)
pt3dadd(109.1, 59.1, -7.25, 0.63)
pt3dadd(109.3, 58.95, -7.25, 0.63)
pt3dadd(111, 59.88, -7.25, 0.63)
pt3dadd(111.9, 60.35, -7.25, 0.63)
pt3dadd(113, 61.6, -7.25, 0.63)
pt3dadd(114.1, 63.01, -7.25, 0.63)
}
dend[600] {pt3dclear()
pt3dadd(79.06, 53.13, -10.25, 0.78)
pt3dadd(79.22, 55.78, -10, 0.78)
pt3dadd(79.06, 55.78, -10, 0.78)
}
dend[601] {pt3dclear()
pt3dadd(79.06, 55.78, -10, 0.78)
pt3dadd(81.25, 56.56, -10, 0.78)
pt3dadd(82.19, 57.19, -10, 0.78)
pt3dadd(82.34, 57.34, -10, 0.78)
pt3dadd(82.81, 57.81, -10, 0.78)
}
dend[602] {pt3dclear()
pt3dadd(79.06, 55.78, -10, 0.78)
pt3dadd(79.69, 59.22, -9.75, 0.78)
pt3dadd(79.84, 61.09, -9.75, 0.78)
pt3dadd(79.84, 61.72, -9.75, 0.78)
pt3dadd(80.16, 62.66, -9.75, 0.78)
pt3dadd(80, 62.97, -9.75, 0.78)
pt3dadd(79.84, 64.38, -9.75, 0.78)
pt3dadd(79.84, 64.53, -9.75, 0.78)
pt3dadd(79.84, 65.31, -9.75, 0.78)
}
dend[603] {pt3dclear()
pt3dadd(75, 50.31, -10.25, 0.78)
pt3dadd(74.22, 51.09, -10.5, 0.78)
pt3dadd(74.38, 51.25, -10.5, 0.78)
pt3dadd(74.22, 51.41, -10.5, 0.78)
}
dend[604] {pt3dclear()
pt3dadd(74.22, 51.41, -10.5, 0.78)
pt3dadd(72.66, 51.09, -10.5, 0.78)
pt3dadd(72.5, 51.09, -10.5, 0.78)
pt3dadd(71.41, 51.09, -10.5, 0.78)
pt3dadd(71.25, 51.09, -10.5, 0.78)
pt3dadd(70.16, 51.09, -10.5, 0.78)
}
dend[605] {pt3dclear()
pt3dadd(74.22, 51.41, -10.5, 0.78)
pt3dadd(73.91, 53.75, -10.25, 0.78)
pt3dadd(73.75, 53.59, -10.25, 0.78)
pt3dadd(73.59, 54.38, -10.25, 0.78)
}
dend[606] {pt3dclear()
pt3dadd(73.59, 54.38, -10.25, 0.78)
pt3dadd(75.04, 54.95, -10.25, 0.78)
}
dend[607] {pt3dclear()
pt3dadd(75.04, 54.95, -10.25, 0.78)
pt3dadd(75.94, 55.31, -10.25, 0.78)
pt3dadd(77.81, 56.56, -10.25, 0.78)
pt3dadd(78.13, 56.72, -10.25, 0.78)
pt3dadd(78.59, 57.34, -10.25, 0.78)
}
dend[608] {pt3dclear()
pt3dadd(75.04, 54.95, -10.25, 0.78)
pt3dadd(73.28, 56.09, -10.25, 0.94)
pt3dadd(73.28, 57.34, -10.25, 0.94)
pt3dadd(73.28, 58.13, -10.25, 0.94)
pt3dadd(73.28, 58.91, -10.25, 0.94)
pt3dadd(73.28, 59.22, -10.25, 0.94)
pt3dadd(73.44, 59.84, -10.25, 0.94)
pt3dadd(73.59, 60.16, -10.25, 0.94)
pt3dadd(73.75, 60.16, -10.25, 0.94)
pt3dadd(74.22, 60.47, -10.25, 0.94)
pt3dadd(74.53, 60.63, -10.25, 0.94)
pt3dadd(74.84, 60.78, -10.25, 0.94)
pt3dadd(75.47, 61.09, -10.25, 0.94)
pt3dadd(75.78, 61.41, -10.25, 0.94)
pt3dadd(76.25, 61.72, -10.25, 0.94)
pt3dadd(76.41, 61.88, -10.25, 0.94)
pt3dadd(76.88, 62.34, -10.25, 0.94)
}
dend[609] {pt3dclear()
pt3dadd(73.59, 54.38, -10.25, 0.78)
pt3dadd(70.63, 55.78, -10.25, 0.94)
pt3dadd(69.45, 55.93, -10.25, 0.94)
}
dend[610] {pt3dclear()
pt3dadd(72.19, 45.94, -10.5, 1.09)
pt3dadd(74.06, 45, -10.5, 0.78)
pt3dadd(76.25, 44.69, -10.5, 0.78)
pt3dadd(76.56, 44.69, -10.5, 0.78)
pt3dadd(78.13, 45.47, -10.5, 0.78)
pt3dadd(78.28, 45.47, -10.5, 0.78)
pt3dadd(79.69, 45.94, -10.5, 0.78)
pt3dadd(80.16, 45.94, -10.5, 0.78)
pt3dadd(81.09, 46.09, -10.5, 0.78)
pt3dadd(81.09, 45.94, -10.5, 0.78)
}
dend[611] {pt3dclear()
pt3dadd(64.53, 43.75, -10.5, 1.09)
pt3dadd(64.06, 46.25, -10.75, 0.78)
pt3dadd(64.06, 46.88, -10.75, 0.78)
}
dend[612] {pt3dclear()
pt3dadd(64.06, 46.88, -10.75, 0.78)
pt3dadd(65.59, 47.2, -10.75, 0.78)
}
dend[613] {pt3dclear()
pt3dadd(65.59, 47.2, -10.75, 0.78)
pt3dadd(66.25, 47.34, -10.75, 0.78)
}
dend[614] {pt3dclear()
pt3dadd(66.25, 47.34, -10.75, 0.78)
pt3dadd(67.34, 47.81, -10.75, 0.78)
pt3dadd(67.66, 47.81, -10.75, 0.78)
pt3dadd(69.22, 48.75, -10.5, 0.78)
pt3dadd(69.06, 48.75, -10.5, 0.78)
pt3dadd(70.47, 49.22, -10.5, 0.78)
pt3dadd(70.94, 49.06, -10.5, 0.78)
pt3dadd(71.41, 48.91, -10.5, 0.78)
pt3dadd(72.19, 48.44, -10.5, 0.78)
}
dend[615] {pt3dclear()
pt3dadd(66.25, 47.34, -10.75, 0.78)
pt3dadd(64.84, 48.44, -10.25, 0.78)
pt3dadd(65.94, 49.69, -10.25, 0.78)
pt3dadd(66.25, 50, -10.25, 0.78)
pt3dadd(67.34, 50.78, -10.25, 0.78)
pt3dadd(67.5, 50.78, -10.25, 0.78)
pt3dadd(68.13, 51.25, -10.25, 0.78)
}
dend[616] {pt3dclear()
pt3dadd(68.13, 51.25, -10.25, 0.78)
pt3dadd(68.75, 52.34, -10.25, 0.78)
pt3dadd(68.75, 52.5, -10.25, 0.78)
pt3dadd(68.75, 53.59, -10.25, 0.78)
pt3dadd(68.91, 53.75, -10.25, 0.78)
pt3dadd(68.75, 54.06, -10.25, 0.78)
pt3dadd(68.75, 54.69, -10.25, 0.78)
pt3dadd(68.59, 54.84, -10.25, 0.78)
pt3dadd(68.44, 55.47, -10.25, 0.78)
}
dend[617] {pt3dclear()
pt3dadd(68.13, 51.25, -10.25, 0.78)
pt3dadd(69.69, 52.66, -10.25, 0.78)
pt3dadd(69.53, 52.66, -10.25, 0.78)
pt3dadd(70.47, 53.59, -10.25, 0.78)
pt3dadd(70.63, 53.59, -10.25, 0.78)
pt3dadd(71.56, 53.91, -10.25, 0.78)
}
dend[618] {pt3dclear()
pt3dadd(65.59, 47.2, -10.75, 0.78)
pt3dadd(59.84, 48.13, -10.25, 0.78)
}
dend[619] {pt3dclear()
pt3dadd(59.84, 48.13, -10.25, 0.78)
pt3dadd(58.13, 46.88, -10.25, 0.78)
pt3dadd(58.13, 46.72, -10.25, 0.78)
pt3dadd(57.03, 45.31, -10.25, 0.78)
pt3dadd(55.94, 44.22, -10.25, 0.78)
pt3dadd(55.78, 44.06, -10.25, 0.78)
pt3dadd(55, 43.44, -10.25, 0.78)
pt3dadd(54.38, 42.5, -10.25, 0.78)
pt3dadd(54.38, 42.34, -10.25, 0.78)
pt3dadd(53.44, 41.25, -10.25, 0.78)
pt3dadd(53.28, 41.09, -10.25, 0.78)
pt3dadd(52.81, 40.47, -10.25, 0.78)
pt3dadd(52.66, 40.31, -10.25, 0.78)
pt3dadd(51.88, 39.69, -10.25, 0.78)
pt3dadd(51.72, 39.69, -10.25, 0.78)
pt3dadd(51.41, 39.69, -10.25, 0.78)
pt3dadd(50.78, 39.69, -10.25, 0.78)
pt3dadd(50.47, 39.69, -10.25, 0.78)
pt3dadd(50, 39.69, -10.25, 0.78)
pt3dadd(48.75, 39.69, -10.25, 0.78)
pt3dadd(48.28, 40, -10.25, 0.78)
}
dend[620] {pt3dclear()
pt3dadd(59.84, 48.13, -10.25, 0.78)
pt3dadd(57.19, 49.84, -10.75, 0.78)
}
dend[621] {pt3dclear()
pt3dadd(57.19, 49.84, -10.75, 0.78)
pt3dadd(56.56, 51.09, -10.75, 0.78)
pt3dadd(56.25, 52.5, -10.75, 0.78)
pt3dadd(56.25, 52.66, -10.75, 0.78)
pt3dadd(56.41, 53.59, -10.75, 0.78)
pt3dadd(56.41, 54.06, -10.75, 0.78)
pt3dadd(56.72, 55.16, -10.75, 0.78)
pt3dadd(57.03, 57.34, -10.25, 0.78)
pt3dadd(56.88, 57.34, -10.25, 0.78)
pt3dadd(56.25, 59.38, -10.25, 0.78)
pt3dadd(56.09, 59.38, -10.25, 0.78)
pt3dadd(55.47, 60.47, -10.25, 0.78)
pt3dadd(55.31, 60.47, -10.25, 0.78)
pt3dadd(53.75, 60.63, -10.25, 0.78)
}
dend[622] {pt3dclear()
pt3dadd(57.19, 49.84, -10.75, 0.78)
pt3dadd(55.47, 49.53, -10.5, 0.78)
}
dend[623] {pt3dclear()
pt3dadd(55.47, 49.53, -10.5, 0.78)
pt3dadd(55, 47.81, -10.5, 0.78)
pt3dadd(54.53, 47.66, -10.5, 0.78)
pt3dadd(54.22, 46.72, -10.5, 0.78)
pt3dadd(54.06, 46.56, -10.5, 0.78)
pt3dadd(53.44, 45.78, -10.5, 0.78)
pt3dadd(53.13, 45.63, -10.5, 0.78)
pt3dadd(52.19, 45.31, -10.5, 0.78)
pt3dadd(52.03, 45.16, -10.5, 0.78)
pt3dadd(51.56, 44.69, -10.5, 0.78)
pt3dadd(51.09, 44.38, -10.25, 0.94)
}
dend[624] {pt3dclear()
pt3dadd(51.09, 44.38, -10.25, 0.94)
pt3dadd(51.25, 43.44, -10.25, 0.94)
pt3dadd(51.09, 42.81, -10.25, 0.94)
pt3dadd(51.09, 42.5, -10.25, 0.94)
pt3dadd(50.94, 41.88, -10.25, 0.94)
pt3dadd(50.78, 41.88, -10.25, 0.94)
pt3dadd(50.47, 41.56, -10.25, 0.94)
pt3dadd(50.31, 41.56, -10.25, 0.94)
pt3dadd(49.53, 41.09, -10.25, 0.94)
pt3dadd(49.38, 40.94, -10.25, 0.94)
}
dend[625] {pt3dclear()
pt3dadd(51.09, 44.38, -10.25, 0.94)
pt3dadd(49.22, 43.44, -10, 0.94)
pt3dadd(47.5, 43.28, -10, 0.94)
pt3dadd(46.09, 42.97, -10, 0.94)
pt3dadd(45.94, 42.97, -10, 0.94)
pt3dadd(44.84, 43.13, -10, 0.94)
}
dend[626] {pt3dclear()
pt3dadd(55.47, 49.53, -10.5, 0.78)
pt3dadd(52.5, 49.53, -10.5, 0.94)
pt3dadd(51.25, 49.84, -10.25, 0.94)
pt3dadd(51.09, 49.84, -10.25, 0.94)
pt3dadd(49.84, 50.63, -10.25, 0.94)
pt3dadd(49.69, 50.47, -10.25, 0.94)
pt3dadd(48.44, 49.53, -10.25, 0.94)
pt3dadd(48.28, 49.53, -10.25, 0.94)
pt3dadd(47.34, 48.75, -10.25, 0.94)
pt3dadd(47.34, 48.59, -10.25, 0.94)
pt3dadd(46.88, 47.66, -10.25, 0.94)
pt3dadd(46.72, 47.66, -10.25, 0.94)
}
dend[627] {pt3dclear()
pt3dadd(64.06, 46.88, -10.75, 0.78)
pt3dadd(62.5, 50.47, -10.5, 0.78)
pt3dadd(62.34, 50.31, -10.5, 0.78)
}
dend[628] {pt3dclear()
pt3dadd(62.34, 50.31, -10.5, 0.78)
}
}
proc shape3d_22() {
dend[628] { pt3dadd(60.78, 51.72, -10.5, 0.78)
pt3dadd(60.63, 51.72, -10.5, 0.78)
pt3dadd(60.16, 52.81, -10.5, 0.78)
pt3dadd(59.69, 53.59, -10.5, 0.78)
pt3dadd(59.69, 53.91, -10.5, 0.78)
pt3dadd(59.84, 54.69, -10.5, 0.78)
pt3dadd(59.84, 55, -10.5, 0.78)
pt3dadd(60, 55.63, -10.5, 0.78)
pt3dadd(60.08, 55.78, -10.5, 0.31)
pt3dadd(61.56, 55.47, -7, 0.31)
}
dend[629] {pt3dclear()
pt3dadd(61.56, 55.47, -7, 0.31)
pt3dadd(63.51, 55.7, -10.5, 0.31)
pt3dadd(64.22, 55.86, -10.5, 0.31)
pt3dadd(65.47, 56.09, -10.5, 0.31)
pt3dadd(66.41, 56.33, -10.5, 0.31)
pt3dadd(67.73, 56.72, -10.5, 0.31)
pt3dadd(68.59, 56.88, -10.5, 0.31)
pt3dadd(68.75, 56.88, -10.5, 0.31)
pt3dadd(70.04, 57.11, -7, 1.02)
pt3dadd(72.23, 57.5, -7, 1.02)
pt3dadd(73.87, 58.67, -7, 1.02)
pt3dadd(74.69, 59.22, -9.25, 1.02)
}
dend[630] {pt3dclear()
pt3dadd(74.69, 59.22, -9.25, 1.02)
pt3dadd(75.34, 59.45, -7, 1.02)
pt3dadd(76.91, 60.23, -7, 1.02)
pt3dadd(78.23, 60.94, -7, 1.02)
pt3dadd(79.88, 61.48, -7, 1.02)
pt3dadd(80.43, 61.72, -7, 1.02)
}
dend[631] {pt3dclear()
pt3dadd(80.43, 61.72, -7, 1.02)
pt3dadd(81.91, 61.56, -7, 0.86)
pt3dadd(82.93, 61.64, -7, 0.86)
pt3dadd(84.41, 61.95, -7, 0.86)
pt3dadd(85.74, 62.42, -7, 0.86)
pt3dadd(86.91, 62.97, -7, 0.86)
pt3dadd(88.32, 63.67, -7, 0.86)
pt3dadd(89.1, 63.98, -7, 0.86)
}
dend[632] {pt3dclear()
pt3dadd(89.1, 63.98, -7, 0.86)
pt3dadd(90.2, 65, -7, 0.78)
pt3dadd(91.45, 65.78, -7, 0.78)
pt3dadd(91.6, 65.78, -7, 0.78)
pt3dadd(93.16, 66.56, -7, 0.78)
pt3dadd(94.57, 66.8, -7.25, 0.78)
}
dend[633] {pt3dclear()
pt3dadd(94.57, 66.8, -7.25, 0.78)
pt3dadd(95.9, 67.73, -7.25, 0.63)
pt3dadd(97.3, 68.44, -7.25, 0.63)
pt3dadd(99.34, 68.67, -7.25, 0.63)
pt3dadd(101, 68.75, -7.25, 0.63)
pt3dadd(101.2, 68.75, -7.25, 0.63)
pt3dadd(101.5, 68.83, -7.25, 0.63)
pt3dadd(103, 68.67, -7.25, 0.63)
pt3dadd(104.7, 68.44, -7.25, 0.63)
pt3dadd(106.1, 68.44, -7.25, 0.63)
}
dend[634] {pt3dclear()
pt3dadd(94.57, 66.8, -7.25, 0.78)
pt3dadd(96.45, 66.25, -6.75, 0.63)
}
dend[635] {pt3dclear()
pt3dadd(96.45, 66.25, -6.75, 0.63)
pt3dadd(97.85, 65.7, -6.75, 0.63)
pt3dadd(99.8, 65.63, -6.75, 0.63)
pt3dadd(100.4, 65.7, -6.75, 0.63)
pt3dadd(102.2, 65.94, -6.5, 0.63)
pt3dadd(103.7, 66.02, -6.5, 0.63)
pt3dadd(103.9, 66.02, -6.5, 0.63)
pt3dadd(105.6, 66.02, -6.5, 0.63)
pt3dadd(107, 65.55, -6.5, 0.63)
pt3dadd(108.2, 64.77, -6.5, 0.63)
pt3dadd(108.2, 64.69, -6.5, 0.63)
pt3dadd(109.3, 63.98, -6.5, 0.63)
pt3dadd(109.8, 63.59, -6.5, 0.63)
}
dend[636] {pt3dclear()
pt3dadd(96.45, 66.25, -6.75, 0.63)
pt3dadd(96.99, 66.68, -5.75, 0.39)
pt3dadd(97.97, 67.23, -5.75, 0.39)
pt3dadd(98.59, 67.42, -5.75, 0.39)
pt3dadd(99.34, 67.45, -5.75, 0.39)
pt3dadd(100.5, 67.66, -5.75, 0.39)
pt3dadd(102.2, 67.89, -5.75, 0.39)
pt3dadd(103.5, 67.93, -5.75, 0.39)
pt3dadd(103.6, 67.93, -5.75, 0.39)
pt3dadd(104.8, 68.05, -5.75, 0.39)
pt3dadd(105, 68.05, -5.75, 0.39)
pt3dadd(106.1, 68.16, -5.75, 0.39)
pt3dadd(107.4, 68.55, -5.75, 0.39)
pt3dadd(108.5, 68.4, -5.75, 0.39)
pt3dadd(109.4, 68.31, -5.75, 0.39)
pt3dadd(110.6, 68.36, -5.75, 0.39)
pt3dadd(110.7, 68.36, -5.75, 0.39)
pt3dadd(111.2, 68.44, -5.75, 0.39)
pt3dadd(111.3, 68.44, -5.75, 0.39)
pt3dadd(111.8, 68.48, -5.75, 0.39)
pt3dadd(112.5, 68.48, -5.75, 0.39)
pt3dadd(113.1, 68.44, -5.75, 0.39)
}
dend[637] {pt3dclear()
pt3dadd(113.1, 68.44, -5.75, 0.39)
pt3dadd(113.5, 68.83, -5.75, 0.27)
}
dend[638] {pt3dclear()
pt3dadd(113.5, 68.83, -5.75, 0.27)
pt3dadd(113.8, 69.26, -5.75, 0.27)
pt3dadd(114.2, 69.61, -5.75, 0.27)
}
dend[639] {pt3dclear()
pt3dadd(113.5, 68.83, -5.75, 0.27)
pt3dadd(115.2, 68.59, -6, 0.27)
pt3dadd(115.8, 68.83, -6, 0.27)
pt3dadd(115.9, 68.83, -6, 0.27)
pt3dadd(116.9, 69.3, -6, 0.27)
pt3dadd(118, 70.23, -6, 0.27)
}
dend[640] {pt3dclear()
pt3dadd(113.1, 68.44, -5.75, 0.39)
pt3dadd(114, 67.38, -6, 0.27)
}
dend[641] {pt3dclear()
pt3dadd(89.1, 63.98, -7, 0.86)
pt3dadd(90.39, 63.83, -6.5, 0.39)
pt3dadd(91.45, 63.71, -6.5, 0.39)
pt3dadd(92.46, 63.67, -6.5, 0.39)
}
dend[642] {pt3dclear()
pt3dadd(92.46, 63.67, -6.5, 0.39)
pt3dadd(93.28, 64.14, -6.5, 0.39)
pt3dadd(94.18, 64.48, -6.5, 0.39)
pt3dadd(94.34, 64.48, -6.5, 0.39)
pt3dadd(95.16, 64.61, -6.5, 0.39)
pt3dadd(95.86, 64.45, -6.5, 0.39)
pt3dadd(95.98, 64.45, -6.5, 0.39)
pt3dadd(96.68, 64.09, -6.5, 0.39)
pt3dadd(97.54, 63.63, -6.5, 0.39)
pt3dadd(97.77, 63.52, -6.5, 0.39)
pt3dadd(98.4, 63.16, -6.5, 0.39)
pt3dadd(99.84, 63.24, -6.5, 0.39)
pt3dadd(100, 63.24, -6.5, 0.39)
pt3dadd(100.9, 63.44, -6.5, 0.39)
pt3dadd(101, 63.44, -6.5, 0.39)
pt3dadd(101.1, 63.48, -6.5, 0.39)
pt3dadd(101.6, 63.59, -6.5, 0.39)
pt3dadd(101.8, 63.67, -6.5, 0.39)
pt3dadd(101.9, 63.67, -6.5, 0.39)
pt3dadd(103.4, 64.45, -7, 0.39)
pt3dadd(104.8, 65.08, -7, 0.39)
pt3dadd(105.1, 65.16, -7, 0.39)
pt3dadd(106, 65.55, -7, 0.39)
pt3dadd(107.2, 66.17, -7, 0.39)
pt3dadd(108, 66.37, -7, 0.39)
pt3dadd(109.1, 66.37, -7, 0.39)
}
dend[643] {pt3dclear()
pt3dadd(92.46, 63.67, -6.5, 0.39)
pt3dadd(93.55, 63.01, -6.25, 0.39)
pt3dadd(94.38, 62.46, -6.25, 0.39)
pt3dadd(94.49, 62.42, -6.25, 0.39)
pt3dadd(95.31, 62.23, -6.25, 0.39)
pt3dadd(95.55, 62.23, -6.25, 0.39)
pt3dadd(96.29, 62.23, -6.25, 0.39)
pt3dadd(96.41, 62.23, -6.25, 0.39)
pt3dadd(96.8, 62.42, -6.25, 0.39)
pt3dadd(97.54, 63.01, -6, 0.39)
pt3dadd(98.63, 63.63, -6, 0.39)
pt3dadd(99.77, 63.83, -6, 0.39)
pt3dadd(99.96, 63.83, -6, 0.39)
pt3dadd(101, 63.75, -6, 0.39)
pt3dadd(101.7, 63.4, -6, 0.39)
pt3dadd(102.5, 63.36, -6, 0.39)
pt3dadd(103.2, 63.75, -6, 0.39)
pt3dadd(104, 64.26, -6, 0.39)
pt3dadd(104.2, 64.3, -6, 0.39)
pt3dadd(104.3, 64.34, -6, 0.39)
pt3dadd(105.2, 64.45, -6, 0.39)
pt3dadd(106.1, 64.65, -6, 0.39)
pt3dadd(106.2, 64.65, -6, 0.39)
pt3dadd(107.2, 64.56, -6, 0.39)
pt3dadd(108.2, 64.3, -6, 0.39)
pt3dadd(108.4, 64.26, -6, 0.39)
pt3dadd(109.2, 64.26, -6, 0.39)
pt3dadd(109.5, 64.26, -6, 0.39)
pt3dadd(109.8, 64.3, -6, 0.39)
pt3dadd(110.6, 64.65, -6, 0.39)
pt3dadd(110.7, 64.69, -6, 0.39)
pt3dadd(111.1, 64.88, -6, 0.39)
pt3dadd(111.3, 64.88, -6, 0.39)
pt3dadd(111.4, 64.92, -6, 0.39)
}
dend[644] {pt3dclear()
pt3dadd(111.4, 64.92, -6, 0.39)
pt3dadd(111.4, 65.59, -6, 0.39)
pt3dadd(110.8, 66.41, -6, 0.39)
}
dend[645] {pt3dclear()
pt3dadd(110.8, 66.41, -6, 0.39)
pt3dadd(111.6, 67.15, -6, 0.39)
pt3dadd(112, 67.73, -6, 0.39)
}
dend[646] {pt3dclear()
pt3dadd(110.8, 66.41, -6, 0.39)
pt3dadd(110, 66.84, -6, 0.39)
}
dend[647] {pt3dclear()
pt3dadd(111.4, 64.92, -6, 0.39)
pt3dadd(112.6, 64.65, -6, 0.39)
pt3dadd(112.7, 64.65, -6, 0.39)
pt3dadd(114, 64.8, -6, 0.39)
pt3dadd(114.6, 65.55, -6, 0.39)
pt3dadd(114.8, 66.33, -6, 0.39)
pt3dadd(115.2, 67.34, -6, 0.39)
pt3dadd(115.1, 67.97, -6, 0.39)
}
dend[648] {pt3dclear()
pt3dadd(80.43, 61.72, -7, 1.02)
pt3dadd(81.45, 63.05, -7.25, 0.7)
pt3dadd(82.85, 64.38, -7.25, 0.7)
pt3dadd(84.41, 65.16, -7.25, 0.7)
pt3dadd(84.57, 65.16, -7.25, 0.7)
pt3dadd(86.05, 65.7, -7.25, 0.7)
pt3dadd(86.29, 65.7, -7.25, 0.7)
pt3dadd(87.85, 66.48, -7.25, 0.7)
pt3dadd(87.93, 66.56, -7.25, 0.7)
pt3dadd(88.09, 66.64, -7.25, 0.7)
pt3dadd(89.18, 67.27, -7.25, 0.7)
pt3dadd(90.66, 67.97, -7.25, 0.7)
pt3dadd(92.07, 68.83, -7.25, 0.7)
pt3dadd(94.18, 70.08, -7.25, 0.7)
pt3dadd(96.45, 71.17, -7.25, 0.7)
}
dend[649] {pt3dclear()
pt3dadd(96.45, 71.17, -7.25, 0.7)
pt3dadd(97.3, 71.8, -7, 0.63)
pt3dadd(98.63, 72.66, -7, 0.63)
}
}
proc shape3d_23() {
dend[649] { }
dend[650] {pt3dclear()
pt3dadd(98.63, 72.66, -7, 0.63)
pt3dadd(99.73, 73.75, -7, 0.55)
pt3dadd(101, 74.38, -7, 0.55)
pt3dadd(102, 74.69, -7, 0.55)
pt3dadd(103.2, 74.92, -7, 0.55)
pt3dadd(104.7, 75, -7.25, 0.55)
pt3dadd(106.3, 75.16, -7.25, 0.55)
pt3dadd(106.7, 74.92, -7.25, 0.55)
}
dend[651] {pt3dclear()
pt3dadd(98.63, 72.66, -7, 0.63)
pt3dadd(99.69, 72.5, -6.5, 0.55)
pt3dadd(100.5, 72.34, -6.5, 0.55)
pt3dadd(100.6, 72.34, -6.5, 0.55)
pt3dadd(101.6, 72.06, -6.5, 0.55)
pt3dadd(102.5, 71.98, -6.5, 0.55)
pt3dadd(104.1, 72.19, -6.5, 0.55)
pt3dadd(106.2, 72.54, -6.5, 0.55)
pt3dadd(107.5, 72.84, -6.5, 0.55)
pt3dadd(108.4, 73.13, -6.5, 0.55)
}
dend[652] {pt3dclear()
pt3dadd(108.4, 73.13, -6.5, 0.55)
pt3dadd(109.3, 74.02, -6.5, 0.55)
pt3dadd(110.4, 74.56, -6.5, 0.55)
pt3dadd(111.4, 75.2, -6.5, 0.55)
pt3dadd(112.3, 75.78, -6.5, 0.55)
pt3dadd(112.8, 76.2, -6.5, 0.55)
pt3dadd(114, 77.06, -6.25, 0.55)
pt3dadd(115.6, 77.45, -6.25, 0.55)
pt3dadd(116.4, 77.03, -6.25, 0.55)
pt3dadd(116.6, 76.84, -6.25, 0.55)
}
dend[653] {pt3dclear()
pt3dadd(108.4, 73.13, -6.5, 0.55)
pt3dadd(109.6, 72.81, -6.25, 0.55)
pt3dadd(110.9, 73.16, -6.25, 0.55)
pt3dadd(111, 73.16, -6.25, 0.55)
pt3dadd(112.3, 73.55, -6.25, 0.55)
pt3dadd(113.9, 73.87, -6.25, 0.55)
pt3dadd(114, 73.91, -6.25, 0.55)
pt3dadd(115.1, 74.53, -6.25, 0.55)
pt3dadd(115.2, 74.61, -6.25, 0.55)
pt3dadd(115.7, 74.92, -6.25, 0.55)
pt3dadd(116.6, 75.51, -6.25, 0.55)
pt3dadd(117.2, 75.94, -6.25, 0.55)
pt3dadd(117.2, 76.05, -6.25, 0.55)
pt3dadd(117.7, 76.72, -6.25, 0.55)
pt3dadd(118.4, 77.66, -6.25, 0.55)
pt3dadd(118.8, 78.36, -6.25, 0.55)
pt3dadd(119, 78.98, -6.25, 0.55)
pt3dadd(119.1, 79.06, -6.25, 0.55)
pt3dadd(119.1, 79.56, -6.25, 0.55)
}
dend[654] {pt3dclear()
pt3dadd(96.45, 71.17, -7.25, 0.7)
pt3dadd(97.66, 70.55, -6.25, 0.47)
pt3dadd(99.14, 70.31, -6.25, 0.47)
pt3dadd(100.9, 70.08, -6.25, 0.47)
pt3dadd(101, 70.08, -6.25, 0.47)
pt3dadd(103.5, 70, -6.25, 0.47)
pt3dadd(105.7, 70.04, -6.25, 0.47)
pt3dadd(107.6, 69.84, -6.25, 0.47)
pt3dadd(107.9, 69.84, -6.25, 0.47)
pt3dadd(108.8, 69.88, -6.25, 0.47)
pt3dadd(109, 69.88, -6.25, 0.47)
pt3dadd(110.7, 70.39, -6.5, 0.47)
pt3dadd(111.6, 70.63, -6.5, 0.47)
pt3dadd(113, 70.94, -6.5, 0.47)
pt3dadd(113.3, 70.98, -6.5, 0.47)
pt3dadd(114.2, 71.17, -6.5, 0.47)
pt3dadd(114.4, 71.17, -6.5, 0.47)
pt3dadd(114.7, 71.2, -6.5, 0.47)
pt3dadd(115.5, 71.09, -6.5, 0.47)
pt3dadd(115.7, 71.02, -6.5, 0.47)
pt3dadd(116.8, 70.59, -6.5, 0.47)
pt3dadd(116.9, 70.47, -6.5, 0.47)
pt3dadd(117.5, 69.92, -6.5, 0.47)
pt3dadd(117.7, 69.73, -6.5, 0.47)
pt3dadd(118.1, 68.83, -6.5, 0.47)
pt3dadd(118.1, 68.67, -6.5, 0.47)
pt3dadd(117.7, 67.97, -6.5, 0.47)
}
dend[655] {pt3dclear()
pt3dadd(74.69, 59.22, -9.25, 1.02)
pt3dadd(74.38, 60.16, -8.5, 0.158)
pt3dadd(73.98, 61.17, -8.5, 0.158)
}
dend[656] {pt3dclear()
pt3dadd(73.98, 61.17, -8.5, 0.158)
pt3dadd(72.81, 61.17, -8.5, 0.158)
pt3dadd(72.73, 61.25, -8.5, 0.158)
pt3dadd(71.56, 61.56, -8.5, 0.158)
pt3dadd(70.31, 61.95, -8.5, 0.158)
}
dend[657] {pt3dclear()
pt3dadd(73.98, 61.17, -8.5, 0.158)
pt3dadd(73.98, 62.58, -8.5, 0.158)
}
dend[658] {pt3dclear()
pt3dadd(73.98, 62.58, -8.5, 0.158)
pt3dadd(72.89, 63.05, -8.5, 0.158)
pt3dadd(72.73, 63.05, -8.5, 0.158)
pt3dadd(72.66, 63.13, -8.5, 0.158)
pt3dadd(72.27, 63.67, -8.5, 0.158)
pt3dadd(72.11, 63.83, -8.5, 0.158)
pt3dadd(71.88, 64.3, -8.5, 0.158)
pt3dadd(71.8, 64.38, -8.5, 0.158)
pt3dadd(71.72, 64.45, -8.5, 0.158)
pt3dadd(71.56, 64.61, -8.5, 0.158)
pt3dadd(71.48, 64.92, -8.5, 0.158)
pt3dadd(71.33, 64.92, -8.5, 0.158)
pt3dadd(70.78, 65.47, -8.5, 0.158)
pt3dadd(70.7, 65.55, -8.5, 0.158)
pt3dadd(69.3, 65.86, -8.5, 0.158)
pt3dadd(68.75, 66.17, -8.5, 0.158)
}
dend[659] {pt3dclear()
pt3dadd(73.98, 62.58, -8.5, 0.158)
pt3dadd(74.69, 64.06, -8.5, 0.158)
}
dend[660] {pt3dclear()
pt3dadd(74.69, 64.06, -8.5, 0.158)
pt3dadd(76.09, 64.45, -8.5, 0.158)
pt3dadd(77.81, 64.84, -8.5, 0.158)
}
dend[661] {pt3dclear()
pt3dadd(74.69, 64.06, -8.5, 0.158)
pt3dadd(74.22, 65.39, -8.5, 0.158)
pt3dadd(74.14, 65.94, -8.5, 0.158)
}
dend[662] {pt3dclear()
pt3dadd(74.14, 65.94, -8.5, 0.158)
pt3dadd(73.91, 66.33, -8.5, 0.158)
pt3dadd(73.36, 67.73, -8.5, 0.158)
pt3dadd(72.5, 68.44, -8.5, 0.158)
pt3dadd(71.64, 69.45, -8.5, 0.158)
pt3dadd(71.09, 70.23, -8.5, 0.158)
pt3dadd(71.02, 70.39, -8.5, 0.158)
pt3dadd(70.78, 71.17, -8.5, 0.158)
pt3dadd(70.7, 71.25, -8.5, 0.158)
pt3dadd(70.55, 71.72, -8.5, 0.158)
pt3dadd(70.16, 73.05, -8.5, 0.158)
}
dend[663] {pt3dclear()
pt3dadd(74.14, 65.94, -8.5, 0.158)
pt3dadd(75.16, 66.72, -8.5, 0.158)
pt3dadd(75.94, 67.58, -8.5, 0.158)
pt3dadd(76.02, 67.66, -8.5, 0.158)
pt3dadd(76.17, 67.81, -8.5, 0.158)
pt3dadd(76.48, 68.52, -8.5, 0.158)
pt3dadd(76.56, 68.67, -8.5, 0.158)
pt3dadd(77.03, 69.61, -8.5, 0.158)
pt3dadd(77.03, 69.77, -8.5, 0.158)
pt3dadd(77.34, 70.31, -8.5, 0.158)
}
dend[664] {pt3dclear()
pt3dadd(61.56, 55.47, -7, 0.31)
pt3dadd(60.47, 55.63, -7, 0.31)
pt3dadd(63.12, 55.78, -7.5, 0.158)
pt3dadd(63.28, 54.38, -7.5, 0.158)
pt3dadd(63.28, 54.22, -7.5, 0.158)
pt3dadd(64.38, 53.91, -7.5, 0.158)
pt3dadd(66.25, 53.67, -7.5, 0.158)
pt3dadd(67.58, 53.28, -7.5, 0.158)
pt3dadd(69.22, 52.97, -7.5, 0.158)
pt3dadd(69.38, 52.97, -7.5, 0.158)
pt3dadd(69.61, 52.89, -7.5, 0.158)
pt3dadd(69.77, 52.81, -7.5, 0.158)
pt3dadd(70.94, 52.81, -7.5, 0.158)
pt3dadd(71.17, 52.66, -7.5, 0.158)
pt3dadd(71.56, 52.66, -7.5, 0.158)
pt3dadd(72.27, 52.58, -7.5, 0.158)
pt3dadd(72.66, 52.58, -7.5, 0.158)
pt3dadd(74.53, 52.5, -7.5, 0.158)
pt3dadd(74.77, 52.5, -7.5, 0.158)
pt3dadd(76.02, 52.58, -7.5, 0.158)
pt3dadd(77.42, 52.42, -7, 0.158)
pt3dadd(78.67, 52.58, -7, 0.158)
pt3dadd(78.83, 52.58, -7, 0.158)
pt3dadd(80.78, 52.81, -7, 0.158)
pt3dadd(80.86, 52.89, -7, 0.158)
pt3dadd(82.11, 53.36, -7, 0.158)
pt3dadd(82.27, 53.44, -7, 0.158)
pt3dadd(83.2, 53.98, -7, 0.158)
pt3dadd(83.44, 54.14, -7, 0.158)
pt3dadd(84.61, 54.92, -7, 0.158)
pt3dadd(85.08, 55.23, -7, 0.158)
}
dend[665] {pt3dclear()
pt3dadd(85.08, 55.23, -7, 0.158)
pt3dadd(85.47, 56.25, -7, 0.158)
pt3dadd(85.47, 56.41, -7, 0.158)
pt3dadd(85.7, 57.03, -7, 0.158)
pt3dadd(85.78, 57.19, -7, 0.158)
pt3dadd(86.09, 57.66, -6.25, 0.158)
}
dend[666] {pt3dclear()
pt3dadd(86.09, 57.66, -6.25, 0.158)
pt3dadd(86.48, 58.05, -7, 0.158)
pt3dadd(86.56, 58.28, -7, 0.158)
pt3dadd(87.11, 58.91, -7, 0.158)
pt3dadd(87.19, 58.98, -7, 0.158)
pt3dadd(87.42, 59.22, -7, 0.158)
pt3dadd(87.73, 59.53, -7, 0.158)
pt3dadd(88.05, 59.69, -7, 0.158)
pt3dadd(88.67, 60.08, -7, 0.158)
pt3dadd(88.75, 60.16, -7, 0.158)
pt3dadd(88.75, 60.31, -7, 0.158)
pt3dadd(88.91, 60.86, -7, 0.158)
pt3dadd(90.08, 61.25, -7, 0.078)
pt3dadd(91.41, 61.25, -7, 0.078)
pt3dadd(93.2, 61.02, -7, 0.078)
pt3dadd(94.06, 60.47, -6.5, 0.078)
pt3dadd(95.31, 60.39, -7, 0.078)
pt3dadd(95.7, 61.02, -7, 0.078)
pt3dadd(97.03, 61.25, -7, 0.078)
pt3dadd(97.34, 61.25, -7, 0.078)
pt3dadd(98.91, 61.72, -7, 0.078)
pt3dadd(100.1, 62.03, -7, 0.078)
}
dend[667] {pt3dclear()
pt3dadd(86.09, 57.66, -6.25, 0.158)
pt3dadd(87.66, 57.81, -6.25, 0.158)
pt3dadd(89.53, 58.13, -6.25, 0.158)
pt3dadd(89.61, 58.05, -6.25, 0.158)
pt3dadd(90.63, 58.83, -6.25, 0.158)
pt3dadd(90.7, 58.91, -6.25, 0.158)
pt3dadd(91.41, 59.69, -6.25, 0.158)
pt3dadd(92.03, 60.55, -6.25, 0.158)
}
dend[668] {pt3dclear()
pt3dadd(85.08, 55.23, -7, 0.158)
pt3dadd(87.11, 55.63, -6.75, 0.158)
pt3dadd(88.98, 56.25, -6.75, 0.158)
pt3dadd(89.22, 56.33, -6.75, 0.158)
}
}
proc shape3d_24() {
dend[668] { pt3dadd(89.45, 56.33, -6.75, 0.158)
pt3dadd(90.39, 56.72, -6.75, 0.158)
pt3dadd(90.55, 56.8, -6.75, 0.158)
pt3dadd(91.64, 57.27, -6.75, 0.158)
pt3dadd(91.8, 57.42, -6.75, 0.158)
pt3dadd(92.27, 57.73, -7, 0.158)
}
dend[669] {pt3dclear()
pt3dadd(92.27, 57.73, -7, 0.158)
pt3dadd(92.73, 58.13, -6.75, 0.158)
pt3dadd(93.05, 58.36, -6.75, 0.158)
pt3dadd(93.75, 58.83, -6.75, 0.158)
pt3dadd(94.77, 59.53, -6.75, 0.158)
pt3dadd(95.39, 59.53, -6.75, 0.158)
pt3dadd(96.64, 59.61, -6.75, 0.158)
pt3dadd(96.88, 59.61, -6.75, 0.158)
pt3dadd(98.2, 59.84, -6.75, 0.158)
pt3dadd(98.44, 59.92, -6.75, 0.158)
pt3dadd(99.38, 60.55, -6.75, 0.158)
pt3dadd(99.53, 60.63, -6.75, 0.158)
pt3dadd(100.1, 60.94, -6.75, 0.158)
pt3dadd(101.3, 61.48, -6.75, 0.078)
pt3dadd(102.4, 62.11, -6.75, 0.078)
pt3dadd(103.1, 62.27, -6.75, 0.078)
pt3dadd(103.5, 62.5, -6.75, 0.078)
pt3dadd(104.1, 62.97, -6.75, 0.078)
}
dend[670] {pt3dclear()
pt3dadd(92.27, 57.73, -7, 0.158)
pt3dadd(94.45, 57.58, -7.25, 0.158)
pt3dadd(96.48, 57.97, -7.25, 0.158)
pt3dadd(98.98, 58.59, -7.25, 0.158)
pt3dadd(99.22, 58.59, -7.25, 0.158)
pt3dadd(100.5, 59.3, -7.25, 0.158)
pt3dadd(100.6, 59.53, -7.25, 0.158)
pt3dadd(101.3, 60.31, -7.25, 0.158)
pt3dadd(101.5, 60.47, -7.25, 0.158)
pt3dadd(102, 61.25, -7.25, 0.158)
pt3dadd(102.8, 61.48, -7.25, 0.158)
pt3dadd(103.8, 61.88, -7.25, 0.158)
pt3dadd(104.8, 62.19, -7.25, 0.158)
pt3dadd(105, 62.19, -7.25, 0.158)
pt3dadd(106, 62.58, -7.25, 0.158)
pt3dadd(107.1, 62.89, -7.25, 0.158)
pt3dadd(107.6, 63.05, -7.25, 0.158)
}
dend[671] {pt3dclear()
pt3dadd(62.34, 50.31, -10.5, 0.78)
pt3dadd(62.81, 52.97, -10.5, 0.78)
pt3dadd(62.81, 54.06, -10.5, 0.78)
pt3dadd(62.81, 54.22, -10.5, 0.78)
pt3dadd(63.75, 55.47, -10.5, 0.78)
pt3dadd(63.44, 55.78, -10.5, 0.78)
pt3dadd(61.88, 56.72, -10.5, 0.78)
pt3dadd(62.19, 56.41, -10.5, 0.78)
pt3dadd(61.72, 57.34, -10.5, 0.78)
pt3dadd(61.72, 57.5, -10.5, 0.78)
pt3dadd(61.25, 59.38, -10.5, 0.78)
pt3dadd(62.19, 60.31, -10.5, 0.78)
pt3dadd(62.34, 60.31, -10.5, 0.78)
pt3dadd(63.28, 60.63, -10.5, 0.78)
pt3dadd(64.84, 60.16, -10.5, 0.78)
pt3dadd(65, 60, -10.5, 0.78)
}
dend[672] {pt3dclear()
pt3dadd(56.72, 36.88, -10.5, 1.41)
pt3dadd(58.75, 36.25, -10.5, 0.94)
pt3dadd(60.78, 36.09, -10.5, 0.94)
pt3dadd(60.94, 35.94, -10.5, 0.94)
pt3dadd(63.13, 36.56, -10.5, 0.94)
pt3dadd(63.28, 36.56, -10.5, 0.94)
pt3dadd(65.94, 37.97, -10.5, 0.94)
pt3dadd(67.34, 38.44, -10.5, 0.94)
}
dend[673] {pt3dclear()
pt3dadd(67.34, 38.44, -10.5, 0.94)
pt3dadd(67.19, 39.69, -10.5, 0.94)
pt3dadd(66.88, 40.47, -10.5, 0.94)
pt3dadd(67.66, 41.09, -10.5, 0.94)
}
dend[674] {pt3dclear()
pt3dadd(67.34, 38.44, -10.5, 0.94)
pt3dadd(69.38, 39.22, -11, 0.94)
pt3dadd(71.41, 39.22, -11, 0.94)
pt3dadd(71.72, 39.22, -11, 0.94)
pt3dadd(73.28, 39.69, -11, 0.94)
pt3dadd(73.44, 39.69, -11, 0.94)
pt3dadd(75.16, 39.84, -11, 0.94)
pt3dadd(75.78, 39.84, -11, 0.94)
}
dend[675] {pt3dclear()
pt3dadd(75.78, 39.84, -11, 0.94)
pt3dadd(75.63, 41.09, -11, 0.94)
}
dend[676] {pt3dclear()
pt3dadd(75.63, 41.09, -11, 0.94)
pt3dadd(74.04, 42.09, -11, 0.94)
}
dend[677] {pt3dclear()
pt3dadd(74.04, 42.09, -11, 0.94)
pt3dadd(74.38, 41.88, -11, 0.94)
pt3dadd(73.59, 42.34, -11, 0.94)
}
dend[678] {pt3dclear()
pt3dadd(74.04, 42.09, -11, 0.94)
pt3dadd(76.41, 42.66, -10.75, 0.94)
pt3dadd(77.5, 43.75, -10.75, 0.94)
pt3dadd(78.13, 44.38, -10.75, 0.94)
pt3dadd(78.59, 44.53, -10.75, 0.94)
}
dend[679] {pt3dclear()
pt3dadd(75.63, 41.09, -11, 0.94)
pt3dadd(77.66, 41.72, -10.75, 0.94)
pt3dadd(77.81, 41.88, -10.75, 0.94)
pt3dadd(79.53, 42.81, -10.75, 0.94)
pt3dadd(80.78, 43.59, -10.75, 0.94)
pt3dadd(81.09, 43.59, -10.75, 0.94)
pt3dadd(82.81, 44.69, -10.75, 0.94)
pt3dadd(83.13, 45.16, -10.75, 0.94)
pt3dadd(83.13, 45, -10.75, 0.94)
pt3dadd(84.69, 45.47, -10.75, 0.94)
}
dend[680] {pt3dclear()
pt3dadd(75.78, 39.84, -11, 0.94)
pt3dadd(78.44, 39.69, -10.5, 0.94)
pt3dadd(78.28, 39.69, -10.5, 0.94)
pt3dadd(80.47, 40.15, -10.5, 0.94)
pt3dadd(81.72, 41.09, -10.5, 0.94)
pt3dadd(82.66, 41.25, -10.5, 0.94)
}
dend[681] {pt3dclear()
pt3dadd(82.66, 41.25, -10.5, 0.94)
pt3dadd(83.13, 42.81, -10.5, 0.94)
pt3dadd(82.97, 42.81, -10.5, 0.94)
pt3dadd(86.41, 44.06, -10.5, 0.94)
pt3dadd(87.97, 44.84, -10.5, 0.94)
pt3dadd(88.75, 45.63, -10.5, 0.94)
}
dend[682] {pt3dclear()
pt3dadd(88.75, 45.63, -10.5, 0.94)
pt3dadd(89.69, 47.19, -10.5, 0.94)
pt3dadd(89.84, 47.34, -10.5, 0.94)
pt3dadd(89.84, 47.5, -10.5, 0.94)
pt3dadd(91.25, 48.75, -10.5, 0.94)
pt3dadd(91.41, 48.91, -10.5, 0.94)
pt3dadd(92.97, 50, -10.5, 0.94)
pt3dadd(95.47, 51.56, -10.5, 0.94)
pt3dadd(97.19, 52.5, -10.5, 0.94)
pt3dadd(97.66, 52.66, -10.5, 0.94)
pt3dadd(98.59, 53.13, -10.5, 0.94)
pt3dadd(99.53, 53.44, -10.5, 0.94)
pt3dadd(100.8, 53.75, -10.75, 0.94)
pt3dadd(102, 54.53, -10.75, 0.94)
pt3dadd(102.8, 55.47, -10.75, 0.94)
pt3dadd(102.7, 55.47, -10.75, 0.94)
}
dend[683] {pt3dclear()
pt3dadd(88.75, 45.63, -10.5, 0.94)
pt3dadd(90.78, 45.94, -10.75, 0.94)
pt3dadd(90.63, 45.94, -10.75, 0.94)
pt3dadd(93.59, 47.03, -10.75, 0.94)
pt3dadd(95.16, 47.5, -10.75, 0.94)
}
dend[684] {pt3dclear()
pt3dadd(95.16, 47.5, -10.75, 0.94)
pt3dadd(96.25, 48.91, -10.75, 0.94)
pt3dadd(97.03, 49.84, -10.75, 0.94)
pt3dadd(97.34, 50.16, -10.75, 0.94)
pt3dadd(97.5, 50.16, -10.75, 0.94)
pt3dadd(98.28, 50.78, -10.75, 0.94)
pt3dadd(98.91, 51.09, -10.75, 0.94)
}
dend[685] {pt3dclear()
pt3dadd(95.16, 47.5, -10.75, 0.94)
pt3dadd(97.66, 47.66, -10.5, 0.94)
pt3dadd(99.69, 48.44, -10.5, 0.94)
pt3dadd(101.4, 50, -10.5, 0.94)
pt3dadd(102.7, 51.09, -10.5, 0.94)
pt3dadd(102.8, 51.25, -10.5, 0.94)
pt3dadd(103.4, 51.88, -10.5, 0.94)
}
dend[686] {pt3dclear()
pt3dadd(82.66, 41.25, -10.5, 0.94)
pt3dadd(85.78, 42.03, -10.75, 0.78)
pt3dadd(88.13, 43.13, -10.75, 0.78)
pt3dadd(90.16, 43.59, -10.75, 0.78)
pt3dadd(90.31, 43.59, -10.75, 0.78)
pt3dadd(92.66, 44.06, -10.75, 0.78)
pt3dadd(93.91, 44.53, -10.75, 0.78)
pt3dadd(94.06, 44.53, -10.75, 0.78)
pt3dadd(96.72, 45.31, -10.75, 0.78)
pt3dadd(98.91, 46.25, -10.75, 0.78)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
}
access soma
celldef()