proc celldef() {
  topol()
}

create soma[2], dend[921]

proc topol() { local i
  connect soma[1](0), soma(0)
  connect dend(0), soma(0)
  for i = 1, 7 connect dend[i](0), dend[i-1](1)
  connect dend[8](0), dend[6](1)
  for i = 9, 16 connect dend[i](0), dend[i-1](1)
  connect dend[17](0), dend[15](1)
  connect dend[18](0), dend[14](1)
  for i = 19, 20 connect dend[i](0), dend[18](1)
  connect dend[21](0), dend[13](1)
  for i = 22, 23 connect dend[i](0), dend[21](1)
  connect dend[24](0), dend[12](1)
  for i = 25, 27 connect dend[i](0), dend[i-1](1)
  connect dend[28](0), dend[26](1)
  connect dend[29](0), dend[25](1)
  for i = 30, 31 connect dend[i](0), dend[29](1)
  connect dend[32](0), dend[24](1)
  for i = 33, 34 connect dend[i](0), dend[32](1)
  connect dend[35](0), dend[11](1)
  for i = 36, 39 connect dend[i](0), dend[i-1](1)
  connect dend[40](0), dend[38](1)
  connect dend[41](0), dend[37](1)
  for i = 42, 43 connect dend[i](0), dend[41](1)
  connect dend[44](0), dend[36](1)
  connect dend[45](0), dend[35](1)
  connect dend[46](0), dend[10](1)
  for i = 47, 48 connect dend[i](0), dend[46](1)
  connect dend[49](0), dend[9](1)
  for i = 50, 52 connect dend[i](0), dend[i-1](1)
  connect dend[53](0), dend[51](1)
  for i = 54, 56 connect dend[i](0), dend[i-1](1)
  connect dend[57](0), dend[55](1)
  connect dend[58](0), dend[54](1)
  connect dend[59](0), dend[53](1)
  for i = 60, 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[50](1)
  for i = 65, 67 connect dend[i](0), dend[i-1](1)
  connect dend[68](0), dend[66](1)
  for i = 69, 70 connect dend[i](0), dend[68](1)
  connect dend[71](0), dend[65](1)
  connect dend[72](0), dend[64](1)
  for i = 73, 75 connect dend[i](0), dend[i-1](1)
  connect dend[76](0), dend[74](1)
  connect dend[77](0), dend[73](1)
  for i = 78, 79 connect dend[i](0), dend[77](1)
  connect dend[80](0), dend[72](1)
  connect dend[81](0), dend[49](1)
  for i = 82, 88 connect dend[i](0), dend[i-1](1)
  connect dend[89](0), dend[87](1)
  connect dend[90](0), dend[86](1)
  for i = 91, 92 connect dend[i](0), dend[90](1)
  connect dend[93](0), dend[85](1)
  connect dend[94](0), dend[84](1)
  connect dend[95](0), dend[83](1)
  connect dend[96](0), dend[82](1)
  connect dend[97](0), dend[81](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)
  for i = 102, 103 connect dend[i](0), dend[101](1)
  connect dend[104](0), dend[8](1)
  for i = 105, 107 connect dend[i](0), dend[i-1](1)
  connect dend[108](0), dend[106](1)
  connect dend[109](0), dend[105](1)
  for i = 110, 112 connect dend[i](0), dend[i-1](1)
  connect dend[113](0), dend[111](1)
  for i = 114, 116 connect dend[i](0), dend[i-1](1)
  connect dend[117](0), dend[115](1)
  connect dend[118](0), dend[114](1)
  for i = 119, 120 connect dend[i](0), dend[118](1)
  connect dend[121](0), dend[113](1)
  for i = 122, 123 connect dend[i](0), dend[121](1)
  connect dend[124](0), dend[110](1)
  connect dend[125](0), dend[109](1)
  connect dend[126](0), dend[104](1)
  for i = 127, 131 connect dend[i](0), dend[i-1](1)
  connect dend[132](0), dend[130](1)
  connect dend[133](0), dend[129](1)
  connect dend[134](0), dend[128](1)
  connect dend[135](0), dend[127](1)
  for i = 136, 137 connect dend[i](0), dend[135](1)
  connect dend[138](0), dend[126](1)
  connect dend[139](0), dend[5](1)
  for i = 140, 142 connect dend[i](0), dend[i-1](1)
  connect dend[143](0), dend[141](1)
  connect dend[144](0), dend[140](1)
  for i = 145, 146 connect dend[i](0), dend[i-1](1)
  connect dend[147](0), dend[145](1)
  connect dend[148](0), dend[144](1)
  for i = 149, 150 connect dend[i](0), dend[i-1](1)
  connect dend[151](0), dend[149](1)
  connect dend[152](0), dend[148](1)
  for i = 153, 157 connect dend[i](0), dend[i-1](1)
  connect dend[158](0), dend[156](1)
  connect dend[159](0), dend[155](1)
  for i = 160, 165 connect dend[i](0), dend[i-1](1)
  connect dend[166](0), dend[164](1)
  connect dend[167](0), dend[163](1)
  connect dend[168](0), dend[162](1)
  connect dend[169](0), dend[161](1)
  connect dend[170](0), dend[160](1)
  connect dend[171](0), dend[159](1)
  for i = 172, 173 connect dend[i](0), dend[171](1)
  connect dend[174](0), dend[154](1)
  for i = 175, 176 connect dend[i](0), dend[174](1)
  for i = 177, 178 connect dend[i](0), dend[176](1)
  connect dend[179](0), dend[153](1)
  for i = 180, 181 connect dend[i](0), dend[i-1](1)
  connect dend[182](0), dend[180](1)
  connect dend[183](0), dend[179](1)
  for i = 184, 185 connect dend[i](0), dend[183](1)
  connect dend[186](0), dend[152](1)
  for i = 187, 189 connect dend[i](0), dend[i-1](1)
  connect dend[190](0), dend[188](1)
  connect dend[191](0), dend[187](1)
  for i = 192, 193 connect dend[i](0), dend[191](1)
  connect dend[194](0), dend[186](1)
  for i = 195, 197 connect dend[i](0), dend[i-1](1)
  connect dend[198](0), dend[196](1)
  connect dend[199](0), dend[195](1)
  connect dend[200](0), dend[194](1)
  for i = 201, 202 connect dend[i](0), dend[i-1](1)
  connect dend[203](0), dend[201](1)
  connect dend[204](0), dend[200](1)
  for i = 205, 206 connect dend[i](0), dend[204](1)
  for i = 207, 208 connect dend[i](0), dend[206](1)
  connect dend[209](0), dend[139](1)
  for i = 210, 218 connect dend[i](0), dend[i-1](1)
  connect dend[219](0), dend[217](1)
  connect dend[220](0), dend[216](1)
  for i = 221, 222 connect dend[i](0), dend[220](1)
  for i = 223, 226 connect dend[i](0), dend[i-1](1)
  connect dend[227](0), dend[225](1)
  connect dend[228](0), dend[224](1)
  for i = 229, 230 connect dend[i](0), dend[228](1)
  connect dend[231](0), dend[223](1)
  for i = 232, 233 connect dend[i](0), dend[231](1)
  for i = 234, 235 connect dend[i](0), dend[233](1)
  connect dend[236](0), dend[222](1)
  for i = 237, 238 connect dend[i](0), dend[236](1)
  for i = 239, 240 connect dend[i](0), dend[i-1](1)
  connect dend[241](0), dend[239](1)
  connect dend[242](0), dend[238](1)
  connect dend[243](0), dend[215](1)
  for i = 244, 245 connect dend[i](0), dend[243](1)
  for i = 246, 247 connect dend[i](0), dend[245](1)
  for i = 248, 249 connect dend[i](0), dend[i-1](1)
  connect dend[250](0), dend[248](1)
  connect dend[251](0), dend[247](1)
  for i = 252, 253 connect dend[i](0), dend[i-1](1)
  connect dend[254](0), dend[252](1)
  connect dend[255](0), dend[251](1)
  connect dend[256](0), dend[214](1)
  for i = 257, 259 connect dend[i](0), dend[i-1](1)
  connect dend[260](0), dend[258](1)
  connect dend[261](0), dend[257](1)
  for i = 262, 263 connect dend[i](0), dend[i-1](1)
  connect dend[264](0), dend[262](1)
  connect dend[265](0), dend[261](1)
  for i = 266, 268 connect dend[i](0), dend[i-1](1)
  connect dend[269](0), dend[267](1)
  for i = 270, 271 connect dend[i](0), dend[269](1)
  connect dend[272](0), dend[266](1)
  for i = 273, 274 connect dend[i](0), dend[272](1)
  connect dend[275](0), dend[265](1)
  for i = 276, 278 connect dend[i](0), dend[i-1](1)
  connect dend[279](0), dend[277](1)
  connect dend[280](0), dend[276](1)
  connect dend[281](0), dend[275](1)
  for i = 282, 283 connect dend[i](0), dend[281](1)
  connect dend[284](0), dend[256](1)
  connect dend[285](0), dend[213](1)
  for i = 286, 287 connect dend[i](0), dend[i-1](1)
  connect dend[288](0), dend[286](1)
  for i = 289, 290 connect dend[i](0), dend[288](1)
  connect dend[291](0), dend[285](1)
  for i = 292, 293 connect dend[i](0), dend[291](1)
  for i = 294, 295 connect dend[i](0), dend[i-1](1)
  connect dend[296](0), dend[294](1)
  connect dend[297](0), dend[293](1)
  connect dend[298](0), dend[212](1)
  for i = 299, 302 connect dend[i](0), dend[i-1](1)
  connect dend[303](0), dend[301](1)
  connect dend[304](0), dend[300](1)
  connect dend[305](0), dend[299](1)
  for i = 306, 307 connect dend[i](0), dend[305](1)
  connect dend[308](0), dend[298](1)
  for i = 309, 311 connect dend[i](0), dend[i-1](1)
  connect dend[312](0), dend[310](1)
  connect dend[313](0), dend[309](1)
  connect dend[314](0), dend[308](1)
  connect dend[315](0), dend[211](1)
  for i = 316, 317 connect dend[i](0), dend[i-1](1)
  connect dend[318](0), dend[316](1)
  connect dend[319](0), dend[315](1)
  for i = 320, 321 connect dend[i](0), dend[319](1)
  for i = 322, 323 connect dend[i](0), dend[i-1](1)
  connect dend[324](0), dend[322](1)
  connect dend[325](0), dend[321](1)
  topol_1()
}
proc topol_1() {
  for i = 326, 327 connect dend[i](0), dend[325](1)
  for i = 328, 329 connect dend[i](0), dend[i-1](1)
  connect dend[330](0), dend[328](1)
  for i = 331, 332 connect dend[i](0), dend[330](1)
  connect dend[333](0), dend[327](1)
  for i = 334, 335 connect dend[i](0), dend[333](1)
  for i = 336, 337 connect dend[i](0), dend[335](1)
  connect dend[338](0), dend[210](1)
  for i = 339, 341 connect dend[i](0), dend[i-1](1)
  connect dend[342](0), dend[340](1)
  for i = 343, 345 connect dend[i](0), dend[i-1](1)
  connect dend[346](0), dend[344](1)
  connect dend[347](0), dend[343](1)
  for i = 348, 349 connect dend[i](0), dend[347](1)
  connect dend[350](0), dend[342](1)
  for i = 351, 352 connect dend[i](0), dend[350](1)
  for i = 353, 354 connect dend[i](0), dend[352](1)
  connect dend[355](0), dend[339](1)
  for i = 356, 357 connect dend[i](0), dend[355](1)
  connect dend[358](0), dend[338](1)
  for i = 359, 360 connect dend[i](0), dend[i-1](1)
  connect dend[361](0), dend[359](1)
  connect dend[362](0), dend[358](1)
  for i = 363, 365 connect dend[i](0), dend[i-1](1)
  connect dend[366](0), dend[364](1)
  for i = 367, 368 connect dend[i](0), dend[366](1)
  connect dend[369](0), dend[363](1)
  connect dend[370](0), dend[362](1)
  connect dend[371](0), dend[209](1)
  for i = 372, 375 connect dend[i](0), dend[i-1](1)
  connect dend[376](0), dend[374](1)
  connect dend[377](0), dend[373](1)
  for i = 378, 380 connect dend[i](0), dend[i-1](1)
  connect dend[381](0), dend[379](1)
  connect dend[382](0), dend[378](1)
  for i = 383, 384 connect dend[i](0), dend[382](1)
  for i = 385, 386 connect dend[i](0), dend[384](1)
  connect dend[387](0), dend[377](1)
  for i = 388, 389 connect dend[i](0), dend[387](1)
  connect dend[390](0), dend[372](1)
  for i = 391, 393 connect dend[i](0), dend[i-1](1)
  connect dend[394](0), dend[392](1)
  connect dend[395](0), dend[391](1)
  connect dend[396](0), dend[390](1)
  for i = 397, 399 connect dend[i](0), dend[i-1](1)
  connect dend[400](0), dend[398](1)
  for i = 401, 402 connect dend[i](0), dend[400](1)
  for i = 403, 404 connect dend[i](0), dend[402](1)
  for i = 405, 406 connect dend[i](0), dend[404](1)
  for i = 407, 408 connect dend[i](0), dend[406](1)
  connect dend[409](0), dend[397](1)
  for i = 410, 414 connect dend[i](0), dend[i-1](1)
  connect dend[415](0), dend[413](1)
  connect dend[416](0), dend[412](1)
  for i = 417, 418 connect dend[i](0), dend[i-1](1)
  connect dend[419](0), dend[417](1)
  connect dend[420](0), dend[416](1)
  for i = 421, 422 connect dend[i](0), dend[i-1](1)
  connect dend[423](0), dend[421](1)
  connect dend[424](0), dend[420](1)
  for i = 425, 426 connect dend[i](0), dend[i-1](1)
  connect dend[427](0), dend[425](1)
  connect dend[428](0), dend[424](1)
  for i = 429, 430 connect dend[i](0), dend[428](1)
  connect dend[431](0), dend[411](1)
  for i = 432, 433 connect dend[i](0), dend[431](1)
  for i = 434, 435 connect dend[i](0), dend[433](1)
  connect dend[436](0), dend[410](1)
  for i = 437, 441 connect dend[i](0), dend[i-1](1)
  connect dend[442](0), dend[440](1)
  for i = 443, 444 connect dend[i](0), dend[442](1)
  connect dend[445](0), dend[439](1)
  for i = 446, 447 connect dend[i](0), dend[445](1)
  for i = 448, 449 connect dend[i](0), dend[447](1)
  connect dend[450](0), dend[438](1)
  for i = 451, 452 connect dend[i](0), dend[i-1](1)
  connect dend[453](0), dend[451](1)
  connect dend[454](0), dend[450](1)
  for i = 455, 456 connect dend[i](0), dend[i-1](1)
  connect dend[457](0), dend[455](1)
  connect dend[458](0), dend[454](1)
  for i = 459, 460 connect dend[i](0), dend[458](1)
  connect dend[461](0), dend[437](1)
  for i = 462, 464 connect dend[i](0), dend[i-1](1)
  connect dend[465](0), dend[463](1)
  connect dend[466](0), dend[462](1)
  for i = 467, 468 connect dend[i](0), dend[466](1)
  for i = 469, 470 connect dend[i](0), dend[468](1)
  for i = 471, 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[461](1)
  for i = 476, 477 connect dend[i](0), dend[475](1)
  connect dend[478](0), dend[436](1)
  for i = 479, 480 connect dend[i](0), dend[478](1)
  connect dend[481](0), dend[409](1)
  for i = 482, 483 connect dend[i](0), dend[i-1](1)
  connect dend[484](0), dend[482](1)
  connect dend[485](0), dend[481](1)
  for i = 486, 487 connect dend[i](0), dend[i-1](1)
  connect dend[488](0), dend[486](1)
  connect dend[489](0), dend[485](1)
  connect dend[490](0), dend[396](1)
  for i = 491, 494 connect dend[i](0), dend[i-1](1)
  connect dend[495](0), dend[493](1)
  connect dend[496](0), dend[492](1)
  for i = 497, 498 connect dend[i](0), dend[496](1)
  connect dend[499](0), dend[491](1)
  for i = 500, 501 connect dend[i](0), dend[499](1)
  connect dend[502](0), dend[490](1)
  for i = 503, 504 connect dend[i](0), dend[502](1)
  connect dend[505](0), dend[371](1)
  for i = 506, 509 connect dend[i](0), dend[i-1](1)
  connect dend[510](0), dend[508](1)
  for i = 511, 512 connect dend[i](0), dend[510](1)
  for i = 513, 514 connect dend[i](0), dend[i-1](1)
  connect dend[515](0), dend[513](1)
  for i = 516, 517 connect dend[i](0), dend[515](1)
  for i = 518, 519 connect dend[i](0), dend[517](1)
  for i = 520, 521 connect dend[i](0), dend[519](1)
  for i = 522, 523 connect dend[i](0), dend[i-1](1)
  connect dend[524](0), dend[522](1)
  connect dend[525](0), dend[521](1)
  connect dend[526](0), dend[512](1)
  connect dend[527](0), dend[507](1)
  for i = 528, 529 connect dend[i](0), dend[i-1](1)
  connect dend[530](0), dend[528](1)
  connect dend[531](0), dend[527](1)
  for i = 532, 533 connect dend[i](0), dend[531](1)
  for i = 534, 535 connect dend[i](0), dend[i-1](1)
  connect dend[536](0), dend[534](1)
  connect dend[537](0), dend[533](1)
  for i = 538, 539 connect dend[i](0), dend[537](1)
  for i = 540, 541 connect dend[i](0), dend[i-1](1)
  connect dend[542](0), dend[540](1)
  connect dend[543](0), dend[539](1)
  connect dend[544](0), dend[506](1)
  for i = 545, 546 connect dend[i](0), dend[544](1)
  for i = 547, 548 connect dend[i](0), dend[546](1)
  connect dend[549](0), dend[505](1)
  for i = 550, 551 connect dend[i](0), dend[i-1](1)
  connect dend[552](0), dend[550](1)
  connect dend[553](0), dend[549](1)
  for i = 554, 555 connect dend[i](0), dend[553](1)
  for i = 556, 557 connect dend[i](0), dend[555](1)
  connect dend[558](0), dend[4](1)
  for i = 559, 561 connect dend[i](0), dend[i-1](1)
  connect dend[562](0), dend[560](1)
  connect dend[563](0), dend[559](1)
  for i = 564, 566 connect dend[i](0), dend[i-1](1)
  connect dend[567](0), dend[565](1)
  connect dend[568](0), dend[564](1)
  connect dend[569](0), dend[563](1)
  for i = 570, 571 connect dend[i](0), dend[569](1)
  for i = 572, 573 connect dend[i](0), dend[i-1](1)
  connect dend[574](0), dend[572](1)
  connect dend[575](0), dend[571](1)
  connect dend[576](0), dend[558](1)
  for i = 577, 578 connect dend[i](0), dend[i-1](1)
  connect dend[579](0), dend[577](1)
  connect dend[580](0), dend[576](1)
  connect dend[581](0), dend[3](1)
  for i = 582, 594 connect dend[i](0), dend[i-1](1)
  connect dend[595](0), dend[593](1)
  connect dend[596](0), dend[592](1)
  for i = 597, 598 connect dend[i](0), dend[596](1)
  connect dend[599](0), dend[591](1)
  for i = 600, 601 connect dend[i](0), dend[i-1](1)
  connect dend[602](0), dend[600](1)
  connect dend[603](0), dend[599](1)
  connect dend[604](0), dend[590](1)
  for i = 605, 606 connect dend[i](0), dend[604](1)
  connect dend[607](0), dend[589](1)
  for i = 608, 609 connect dend[i](0), dend[607](1)
  connect dend[610](0), dend[588](1)
  connect dend[611](0), dend[587](1)
  for i = 612, 613 connect dend[i](0), dend[611](1)
  connect dend[614](0), dend[586](1)
  for i = 615, 616 connect dend[i](0), dend[614](1)
  connect dend[617](0), dend[585](1)
  for i = 618, 619 connect dend[i](0), dend[617](1)
  connect dend[620](0), dend[584](1)
  for i = 621, 622 connect dend[i](0), dend[620](1)
  connect dend[623](0), dend[583](1)
  for i = 624, 625 connect dend[i](0), dend[623](1)
  connect dend[626](0), dend[582](1)
  connect dend[627](0), dend[581](1)
  connect dend[628](0), dend[2](1)
  for i = 629, 630 connect dend[i](0), dend[i-1](1)
  connect dend[631](0), dend[629](1)
  connect dend[632](0), dend[628](1)
  connect dend[633](0), dend[1](1)
  for i = 634, 645 connect dend[i](0), dend[i-1](1)
  connect dend[646](0), dend[644](1)
  connect dend[647](0), dend[643](1)
  for i = 648, 649 connect dend[i](0), dend[647](1)
  connect dend[650](0), dend[642](1)
  for i = 651, 652 connect dend[i](0), dend[650](1)
  connect dend[653](0), dend[641](1)
  connect dend[654](0), dend[640](1)
  topol_2()
}
proc topol_2() {
  for i = 655, 657 connect dend[i](0), dend[i-1](1)
  connect dend[658](0), dend[656](1)
  connect dend[659](0), dend[655](1)
  connect dend[660](0), dend[654](1)
  connect dend[661](0), dend[639](1)
  for i = 662, 664 connect dend[i](0), dend[i-1](1)
  connect dend[665](0), dend[663](1)
  for i = 666, 667 connect dend[i](0), dend[665](1)
  connect dend[668](0), dend[662](1)
  for i = 669, 670 connect dend[i](0), dend[i-1](1)
  connect dend[671](0), dend[669](1)
  connect dend[672](0), dend[668](1)
  connect dend[673](0), dend[661](1)
  for i = 674, 675 connect dend[i](0), dend[673](1)
  connect dend[676](0), dend[638](1)
  for i = 677, 678 connect dend[i](0), dend[i-1](1)
  connect dend[679](0), dend[677](1)
  connect dend[680](0), dend[676](1)
  connect dend[681](0), dend[637](1)
  for i = 682, 683 connect dend[i](0), dend[681](1)
  connect dend[684](0), dend[636](1)
  for i = 685, 688 connect dend[i](0), dend[i-1](1)
  connect dend[689](0), dend[687](1)
  connect dend[690](0), dend[686](1)
  connect dend[691](0), dend[685](1)
  for i = 692, 693 connect dend[i](0), dend[691](1)
  connect dend[694](0), dend[684](1)
  for i = 695, 696 connect dend[i](0), dend[694](1)
  connect dend[697](0), dend[635](1)
  for i = 698, 702 connect dend[i](0), dend[i-1](1)
  connect dend[703](0), dend[701](1)
  for i = 704, 705 connect dend[i](0), dend[703](1)
  for i = 706, 707 connect dend[i](0), dend[705](1)
  connect dend[708](0), dend[700](1)
  for i = 709, 710 connect dend[i](0), dend[708](1)
  connect dend[711](0), dend[699](1)
  for i = 712, 713 connect dend[i](0), dend[711](1)
  connect dend[714](0), dend[698](1)
  connect dend[715](0), dend[697](1)
  for i = 716, 719 connect dend[i](0), dend[i-1](1)
  connect dend[720](0), dend[718](1)
  connect dend[721](0), dend[717](1)
  connect dend[722](0), dend[716](1)
  connect dend[723](0), dend[715](1)
  for i = 724, 725 connect dend[i](0), dend[i-1](1)
  connect dend[726](0), dend[724](1)
  connect dend[727](0), dend[723](1)
  connect dend[728](0), dend[634](1)
  for i = 729, 733 connect dend[i](0), dend[i-1](1)
  connect dend[734](0), dend[732](1)
  connect dend[735](0), dend[731](1)
  connect dend[736](0), dend[730](1)
  for i = 737, 743 connect dend[i](0), dend[i-1](1)
  connect dend[744](0), dend[742](1)
  connect dend[745](0), dend[741](1)
  for i = 746, 747 connect dend[i](0), dend[745](1)
  connect dend[748](0), dend[740](1)
  connect dend[749](0), dend[739](1)
  connect dend[750](0), dend[738](1)
  connect dend[751](0), dend[737](1)
  for i = 752, 753 connect dend[i](0), dend[i-1](1)
  connect dend[754](0), dend[752](1)
  connect dend[755](0), dend[751](1)
  connect dend[756](0), dend[736](1)
  for i = 757, 758 connect dend[i](0), dend[756](1)
  connect dend[759](0), dend[729](1)
  connect dend[760](0), dend[728](1)
  connect dend[761](0), dend[633](1)
  for i = 762, 764 connect dend[i](0), dend[i-1](1)
  connect dend[765](0), dend[763](1)
  for i = 766, 768 connect dend[i](0), dend[i-1](1)
  connect dend[769](0), dend[767](1)
  for i = 770, 771 connect dend[i](0), dend[769](1)
  connect dend[772](0), dend[766](1)
  connect dend[773](0), dend[765](1)
  for i = 774, 776 connect dend[i](0), dend[i-1](1)
  connect dend[777](0), dend[775](1)
  connect dend[778](0), dend[774](1)
  connect dend[779](0), dend[773](1)
  for i = 780, 781 connect dend[i](0), dend[779](1)
  connect dend[782](0), dend[762](1)
  for i = 783, 784 connect dend[i](0), dend[782](1)
  connect dend[785](0), dend[761](1)
  for i = 786, 791 connect dend[i](0), dend[i-1](1)
  connect dend[792](0), dend[790](1)
  for i = 793, 795 connect dend[i](0), dend[i-1](1)
  connect dend[796](0), dend[794](1)
  connect dend[797](0), dend[793](1)
  for i = 798, 804 connect dend[i](0), dend[i-1](1)
  connect dend[805](0), dend[803](1)
  connect dend[806](0), dend[802](1)
  connect dend[807](0), dend[801](1)
  for i = 808, 809 connect dend[i](0), dend[807](1)
  connect dend[810](0), dend[800](1)
  for i = 811, 812 connect dend[i](0), dend[810](1)
  connect dend[813](0), dend[799](1)
  for i = 814, 815 connect dend[i](0), dend[i-1](1)
  connect dend[816](0), dend[814](1)
  connect dend[817](0), dend[813](1)
  for i = 818, 819 connect dend[i](0), dend[817](1)
  connect dend[820](0), dend[798](1)
  for i = 821, 826 connect dend[i](0), dend[i-1](1)
  connect dend[827](0), dend[825](1)
  connect dend[828](0), dend[824](1)
  connect dend[829](0), dend[823](1)
  for i = 830, 831 connect dend[i](0), dend[829](1)
  connect dend[832](0), dend[822](1)
  connect dend[833](0), dend[821](1)
  connect dend[834](0), dend[820](1)
  connect dend[835](0), dend[797](1)
  for i = 836, 837 connect dend[i](0), dend[835](1)
  for i = 838, 839 connect dend[i](0), dend[837](1)
  connect dend[840](0), dend[792](1)
  for i = 841, 842 connect dend[i](0), dend[840](1)
  connect dend[843](0), dend[789](1)
  for i = 844, 845 connect dend[i](0), dend[i-1](1)
  connect dend[846](0), dend[844](1)
  connect dend[847](0), dend[843](1)
  connect dend[848](0), dend[788](1)
  connect dend[849](0), dend[787](1)
  for i = 850, 851 connect dend[i](0), dend[849](1)
  connect dend[852](0), dend[786](1)
  for i = 853, 855 connect dend[i](0), dend[i-1](1)
  connect dend[856](0), dend[854](1)
  for i = 857, 858 connect dend[i](0), dend[856](1)
  connect dend[859](0), dend[853](1)
  for i = 860, 861 connect dend[i](0), dend[859](1)
  connect dend[862](0), dend[852](1)
  connect dend[863](0), dend[785](1)
  for i = 864, 867 connect dend[i](0), dend[i-1](1)
  connect dend[868](0), dend[866](1)
  connect dend[869](0), dend[865](1)
  connect dend[870](0), dend[864](1)
  connect dend[871](0), dend[863](1)
  connect dend[872](0), dend(1)
  for i = 873, 877 connect dend[i](0), dend[i-1](1)
  connect dend[878](0), dend[876](1)
  for i = 879, 882 connect dend[i](0), dend[i-1](1)
  connect dend[883](0), dend[881](1)
  connect dend[884](0), dend[880](1)
  for i = 885, 887 connect dend[i](0), dend[i-1](1)
  connect dend[888](0), dend[886](1)
  connect dend[889](0), dend[885](1)
  connect dend[890](0), dend[884](1)
  connect dend[891](0), dend[879](1)
  connect dend[892](0), dend[878](1)
  connect dend[893](0), dend[875](1)
  for i = 894, 896 connect dend[i](0), dend[i-1](1)
  connect dend[897](0), dend[895](1)
  connect dend[898](0), dend[894](1)
  for i = 899, 900 connect dend[i](0), dend[898](1)
  connect dend[901](0), dend[893](1)
  for i = 902, 904 connect dend[i](0), dend[i-1](1)
  connect dend[905](0), dend[903](1)
  connect dend[906](0), dend[902](1)
  for i = 907, 908 connect dend[i](0), dend[906](1)
  connect dend[909](0), dend[901](1)
  connect dend[910](0), dend[874](1)
  for i = 911, 912 connect dend[i](0), dend[i-1](1)
  connect dend[913](0), dend[911](1)
  connect dend[914](0), dend[910](1)
  for i = 915, 916 connect dend[i](0), dend[914](1)
  connect dend[917](0), dend[873](1)
  for i = 918, 919 connect dend[i](0), dend[917](1)
  connect dend[920](0), dend[872](1)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(4.01, 6.44, -40.32, 13.2739)
	pt3dadd(4.01, 13.08, -40.32, 13.2739)
  }
  soma[1] {pt3dclear()
	pt3dadd(4.01, 6.44, -40.32, 13.2739)
	pt3dadd(4.01, -0.18, -40.32, 13.2739)
  }
  dend {pt3dclear()
	pt3dadd(4.01, 6.44, -40.32, 2.33)
	pt3dadd(4.17, 14, -40.32, 2.33)
	pt3dadd(4.33, 14.17, -40.32, 2.33)
	pt3dadd(4.33, 14.67, -40.32, 2.33)
	pt3dadd(4.17, 14.83, -40.32, 2.33)
	pt3dadd(4.17, 15.17, -40.32, 2.33)
	pt3dadd(4, 15.33, -40.32, 2.33)
	pt3dadd(4, 17, -40.32, 2.33)
	pt3dadd(3.83, 17.17, -40.32, 2.33)
	pt3dadd(3.83, 20.17, -40.32, 2.33)
	pt3dadd(3.67, 20.32, -40.32, 2.33)
	pt3dadd(3.67, 23.17, -40.32, 2.33)
	pt3dadd(3.5, 23.33, -40.32, 2.33)
	pt3dadd(3.5, 24.67, -40.32, 2.33)
	pt3dadd(3.33, 24.67, -40.32, 2.33)
  }
  dend[1] {pt3dclear()
	pt3dadd(3.33, 24.67, -40.32, 2.33)
	pt3dadd(7.54, 26.65, -40.32, 2.33)
  }
  dend[2] {pt3dclear()
	pt3dadd(7.54, 26.65, -40.32, 2.33)
	pt3dadd(3.33, 24.67, -40.32, 2.33)
	pt3dadd(3.33, 24.92, -45, 1.83)
	pt3dadd(3.5, 25.08, -45, 1.83)
	pt3dadd(3.67, 25.25, -45, 1.83)
	pt3dadd(3.83, 25.42, -45, 1.83)
	pt3dadd(4, 25.58, -45, 1.83)
	pt3dadd(4.17, 25.75, -45, 1.83)
	pt3dadd(4.33, 25.92, -45, 1.83)
	pt3dadd(4.33, 26.58, -45, 1.83)
	pt3dadd(4.5, 26.75, -45, 1.83)
	pt3dadd(4.5, 27.58, -45, 1.83)
	pt3dadd(4.67, 27.92, -45, 1.83)
	pt3dadd(4.83, 28.08, -45, 1.83)
	pt3dadd(4.83, 28.42, -45, 1.83)
	pt3dadd(5, 28.58, -45, 1.83)
	pt3dadd(5, 29.42, -45, 1.83)
	pt3dadd(5.17, 29.58, -45, 1.83)
	pt3dadd(5.33, 29.92, -45, 1.83)
	pt3dadd(5.5, 30.08, -45, 1.83)
	pt3dadd(5.5, 30.42, -45, 1.83)
	pt3dadd(5.67, 30.58, -45, 1.83)
	pt3dadd(5.83, 30.75, -45, 1.83)
	pt3dadd(5.83, 31.08, -45, 1.83)
	pt3dadd(6, 31.25, -45, 1.83)
	pt3dadd(6.17, 31.42, -45, 1.83)
	pt3dadd(6.33, 31.58, -45, 1.83)
	pt3dadd(6.33, 31.92, -45, 1.83)
	pt3dadd(6.5, 32.08, -45, 1.83)
	pt3dadd(6.67, 32.42, -45, 1.83)
	pt3dadd(6.83, 32.58, -45, 1.83)
	pt3dadd(7, 32.75, -45, 1.83)
	pt3dadd(7.17, 33.08, -45, 1.83)
	pt3dadd(7.33, 33.25, -45, 1.83)
	pt3dadd(7.67, 33.42, -45, 1.83)
	pt3dadd(8, 33.58, -45, 1.83)
	pt3dadd(7.83, 33.58, -45, 1.83)
  }
  dend[3] {pt3dclear()
	pt3dadd(7.83, 33.58, -45, 1.83)
	pt3dadd(7.83, 33.58, -46.8, 2)
	pt3dadd(8, 33.75, -46.8, 2)
	pt3dadd(8.17, 33.92, -46.8, 2)
	pt3dadd(8.33, 34.08, -46.8, 2)
	pt3dadd(8.67, 34.25, -46.8, 2)
	pt3dadd(8.83, 34.58, -46.8, 2)
	pt3dadd(9, 34.75, -46.8, 2)
	pt3dadd(9.17, 34.92, -46.8, 2)
	pt3dadd(9.33, 35.25, -46.8, 2)
	pt3dadd(9.5, 35.42, -46.8, 2)
	pt3dadd(9.5, 35.92, -46.8, 2)
	pt3dadd(9.67, 36.08, -46.8, 2)
	pt3dadd(9.67, 36.58, -46.8, 2)
	pt3dadd(9.83, 36.92, -46.8, 2)
	pt3dadd(10, 37.25, -46.8, 2)
  }
  dend[4] {pt3dclear()
	pt3dadd(10, 37.25, -46.8, 2)
	pt3dadd(9.83, 37.75, -46.8, 2)
	pt3dadd(10, 37.92, -46.8, 2)
	pt3dadd(10, 39.08, -46.8, 2)
	pt3dadd(10.17, 39.25, -46.8, 2)
	pt3dadd(10.17, 39.75, -46.8, 2)
	pt3dadd(10.33, 39.92, -46.8, 2)
	pt3dadd(10.33, 40.92, -46.8, 2)
	pt3dadd(10.5, 41.08, -46.8, 2)
	pt3dadd(10.5, 41.92, -46.8, 2)
  }
  dend[5] {pt3dclear()
	pt3dadd(10.5, 41.92, -46.8, 2)
	pt3dadd(10.5, 42.28, -50.44, 1.83)
  }
  dend[6] {pt3dclear()
	pt3dadd(10.5, 42.28, -50.44, 1.83)
	pt3dadd(10.5, 41.92, -46.8, 1.83)
  }
  dend[7] {pt3dclear()
	pt3dadd(10.5, 41.92, -46.8, 1.83)
	pt3dadd(10.5, 42.17, -49.32, 1.83)
  }
  dend[8] {pt3dclear()
	pt3dadd(10.5, 41.92, -46.8, 1.83)
	pt3dadd(10.67, 42.08, -50.04, 1)
	pt3dadd(11.83, 42.08, -50.04, 1)
	pt3dadd(12, 41.92, -50.04, 1)
	pt3dadd(12.17, 41.75, -50.04, 1)
	pt3dadd(12.5, 41.75, -50.04, 1)
	pt3dadd(12.67, 41.58, -50.04, 1)
	pt3dadd(13.5, 41.58, -50.04, 1)
	pt3dadd(13.83, 41.75, -50.04, 1)
	pt3dadd(14, 41.92, -50.04, 1)
	pt3dadd(14.17, 42.08, -50.04, 1)
	pt3dadd(14.5, 42.08, -50.04, 1)
	pt3dadd(14.67, 42.25, -50.04, 1)
	pt3dadd(14.83, 42.42, -50.04, 1)
	pt3dadd(15.17, 42.58, -50.04, 1)
	pt3dadd(15.33, 42.75, -50.04, 1)
	pt3dadd(15.67, 42.92, -50.04, 1)
	pt3dadd(15.83, 43.08, -50.04, 1)
	pt3dadd(16, 43.25, -50.04, 1)
	pt3dadd(16.17, 43.42, -50.04, 1)
	pt3dadd(18.67, 43.42, -50.04, 1)
	pt3dadd(18.5, 43.25, -50.04, 1)
  }
  dend[9] {pt3dclear()
	pt3dadd(18.5, 43.25, -50.04, 1)
	pt3dadd(18.32, 43.42, -52.56, 0.67)
	pt3dadd(18.67, 43.42, -51.84, 0.67)
	pt3dadd(18.82, 43.58, -51.84, 0.67)
	pt3dadd(19, 43.75, -51.84, 0.67)
	pt3dadd(19.32, 43.92, -51.84, 0.67)
	pt3dadd(19.5, 44.08, -51.84, 0.67)
	pt3dadd(19.67, 44.25, -51.84, 0.67)
	pt3dadd(19.82, 44.58, -51.84, 0.67)
	pt3dadd(20, 44.75, -51.84, 0.67)
	pt3dadd(20.17, 44.92, -51.84, 0.67)
	pt3dadd(20.17, 45.25, -51.84, 0.67)
	pt3dadd(20.32, 45.42, -51.84, 0.67)
	pt3dadd(20.67, 45.75, -51.84, 0.67)
	pt3dadd(20.83, 45.92, -51.84, 0.67)
	pt3dadd(21.17, 46.08, -51.84, 0.67)
	pt3dadd(21.83, 46.08, -51.84, 0.67)
	pt3dadd(22.17, 46.25, -51.84, 0.67)
	pt3dadd(22.67, 46.25, -51.84, 0.67)
	pt3dadd(22.83, 46.42, -52.92, 0.67)
	pt3dadd(23.17, 46.58, -52.92, 0.67)
	pt3dadd(23.33, 46.75, -52.92, 0.67)
	pt3dadd(23.83, 46.92, -52.92, 0.67)
	pt3dadd(24, 47.08, -52.92, 0.67)
	pt3dadd(24.17, 47.25, -52.92, 0.67)
	pt3dadd(24.33, 47.42, -52.92, 0.67)
	pt3dadd(24.67, 47.42, -52.92, 0.67)
	pt3dadd(24.83, 47.58, -52.92, 0.67)
	pt3dadd(25, 47.75, -52.92, 0.67)
	pt3dadd(25.17, 47.92, -52.92, 0.67)
	pt3dadd(25.33, 48.08, -52.92, 0.67)
	pt3dadd(25.33, 48.42, -52.92, 0.67)
	pt3dadd(25.5, 48.58, -52.92, 0.67)
	pt3dadd(25.67, 48.75, -52.92, 0.67)
	pt3dadd(25.67, 49.08, -52.92, 0.67)
	pt3dadd(25.83, 49.25, -52.92, 0.67)
	pt3dadd(26, 49.42, -52.92, 0.67)
	pt3dadd(26, 49.75, -52.92, 0.67)
	pt3dadd(26.17, 49.92, -52.92, 0.67)
	pt3dadd(26.33, 50.08, -52.92, 0.67)
	pt3dadd(26.5, 50.25, -52.92, 0.67)
	pt3dadd(26.5, 50.58, -52.92, 0.67)
	pt3dadd(26.67, 50.75, -52.92, 0.67)
	pt3dadd(26.83, 50.92, -52.92, 0.67)
	pt3dadd(27, 51.08, -52.92, 0.67)
	pt3dadd(27, 51.25, -52.92, 0.67)
  }
  dend[10] {pt3dclear()
	pt3dadd(27, 51.25, -52.92, 0.67)
	pt3dadd(27, 51.25, -53.64, 0.33)
	pt3dadd(27, 54.92, -53.64, 0.33)
  }
  dend[11] {pt3dclear()
	pt3dadd(27, 54.92, -53.64, 0.33)
	pt3dadd(27.17, 55.08, -56.88, 0.33)
	pt3dadd(27.33, 55.25, -56.88, 0.33)
	pt3dadd(27.5, 55.58, -56.88, 0.33)
	pt3dadd(27.83, 55.75, -56.88, 0.33)
	pt3dadd(28, 55.92, -56.88, 0.33)
	pt3dadd(28.17, 56.08, -56.88, 0.33)
	pt3dadd(28.33, 56.42, -56.88, 0.33)
	pt3dadd(28.5, 56.58, -56.88, 0.33)
	pt3dadd(28.67, 56.92, -56.88, 0.33)
	pt3dadd(28.83, 57.08, -56.88, 0.33)
	pt3dadd(28.83, 57.42, -56.88, 0.33)
	pt3dadd(29, 57.58, -56.88, 0.33)
	pt3dadd(29.17, 57.92, -56.88, 0.33)
	pt3dadd(29.33, 58.08, -56.88, 0.33)
	pt3dadd(29.5, 58.25, -56.88, 0.33)
	pt3dadd(29.83, 58.25, -56.88, 0.33)
	pt3dadd(30, 58.42, -56.88, 0.33)
	pt3dadd(30.5, 58.75, -57.24, 0.33)
	pt3dadd(31.17, 58.75, -57.6, 0.33)
	pt3dadd(31.67, 58.92, -58.32, 0.33)
	pt3dadd(32.17, 59.25, -58.68, 0.33)
	pt3dadd(32.33, 59.42, -58.68, 0.33)
	pt3dadd(32.83, 59.42, -58.68, 0.33)
	pt3dadd(33, 59.58, -58.68, 0.33)
	pt3dadd(33.33, 59.58, -58.68, 0.33)
	pt3dadd(33.5, 59.75, -58.68, 0.33)
	pt3dadd(33.83, 59.75, -58.68, 0.33)
	pt3dadd(33.83, 59.92, -58.68, 0.33)
  }
  dend[12] {pt3dclear()
	pt3dadd(33.83, 59.92, -58.68, 0.33)
	pt3dadd(33.83, 60.08, -58.68, 0.33)
	pt3dadd(34, 60.25, -58.68, 0.33)
	pt3dadd(34, 61.92, -58.68, 0.33)
	pt3dadd(34.17, 62.08, -58.68, 0.33)
	pt3dadd(34.17, 62.42, -58.68, 0.33)
  }
  dend[13] {pt3dclear()
	pt3dadd(34.17, 62.42, -58.68, 0.33)
	pt3dadd(34.17, 62.42, -59.4, 0.5)
	pt3dadd(34.17, 65.42, -59.4, 0.5)
	pt3dadd(34, 65.58, -59.4, 0.5)
  }
}
proc shape3d_2() {
  dend[13] {  }
  dend[14] {pt3dclear()
	pt3dadd(34, 65.58, -59.4, 0.5)
	pt3dadd(34.5, 65.75, -59.04, 0.5)
	pt3dadd(34.67, 65.92, -59.04, 0.5)
	pt3dadd(34.67, 66.42, -59.04, 0.5)
	pt3dadd(34.83, 66.75, -59.04, 0.5)
	pt3dadd(35, 67.08, -59.04, 0.5)
	pt3dadd(35.17, 67.42, -59.04, 0.5)
	pt3dadd(35.33, 67.92, -59.04, 0.5)
	pt3dadd(35.33, 68.42, -59.04, 0.5)
	pt3dadd(35.5, 68.75, -59.04, 0.5)
	pt3dadd(35.67, 69.08, -59.04, 0.5)
	pt3dadd(35.67, 69.42, -59.04, 0.5)
	pt3dadd(35.83, 69.58, -59.04, 0.5)
	pt3dadd(35.83, 70.08, -59.04, 0.5)
	pt3dadd(36, 70.25, -59.04, 0.5)
	pt3dadd(36.17, 70.42, -59.04, 0.5)
	pt3dadd(36.33, 70.58, -59.04, 0.5)
	pt3dadd(36.5, 70.75, -59.04, 0.5)
	pt3dadd(36.67, 70.92, -59.04, 0.5)
	pt3dadd(36.83, 71.08, -59.04, 0.5)
	pt3dadd(37.17, 71.25, -59.76, 0.5)
	pt3dadd(37.5, 71.42, -59.76, 0.5)
	pt3dadd(37.67, 71.58, -59.76, 0.5)
	pt3dadd(37.83, 71.75, -59.76, 0.5)
	pt3dadd(38.83, 71.75, -59.76, 0.5)
  }
  dend[15] {pt3dclear()
	pt3dadd(38.83, 71.75, -59.76, 0.5)
	pt3dadd(38.17, 71.75, -59.4, 0.5)
	pt3dadd(38.5, 71.92, -59.4, 0.5)
	pt3dadd(40, 71.92, -59.4, 0.5)
	pt3dadd(40.17, 71.75, -59.4, 0.5)
	pt3dadd(41.5, 71.75, -59.4, 0.5)
	pt3dadd(42.17, 71.58, -59.4, 0.5)
	pt3dadd(42.67, 71.42, -59.4, 0.5)
	pt3dadd(43.33, 71.42, -59.4, 0.5)
	pt3dadd(43.67, 71.25, -59.4, 0.5)
	pt3dadd(43.83, 71.42, -59.4, 0.5)
	pt3dadd(43.83, 72.08, -59.4, 0.5)
	pt3dadd(44, 72.42, -59.4, 0.5)
	pt3dadd(44, 73.08, -59.4, 0.5)
	pt3dadd(43.83, 73.42, -59.4, 0.5)
	pt3dadd(43.67, 73.58, -59.4, 0.5)
	pt3dadd(43.5, 73.75, -59.4, 0.5)
	pt3dadd(43.33, 74.08, -59.4, 0.5)
	pt3dadd(43.17, 74.25, -59.4, 0.5)
	pt3dadd(43, 74.42, -59.4, 0.5)
	pt3dadd(42.83, 74.75, -59.4, 0.5)
	pt3dadd(42.67, 74.92, -59.4, 0.5)
	pt3dadd(42.67, 75.25, -59.4, 0.5)
  }
  dend[16] {pt3dclear()
	pt3dadd(42.67, 75.25, -59.4, 0.5)
	pt3dadd(42.67, 75.08, -59.76, 0.5)
	pt3dadd(42.83, 75.25, -59.76, 0.5)
	pt3dadd(42.83, 75.75, -59.76, 0.5)
	pt3dadd(42.67, 75.92, -59.76, 0.5)
	pt3dadd(42.67, 76.58, -59.76, 0.5)
	pt3dadd(42.5, 76.75, -59.76, 0.5)
	pt3dadd(42.5, 77.75, -59.76, 0.5)
	pt3dadd(42.33, 77.75, -59.76, 0.5)
  }
  dend[17] {pt3dclear()
	pt3dadd(42.67, 75.25, -59.4, 0.5)
	pt3dadd(42.67, 75.42, -59.4, 0.5)
	pt3dadd(41.83, 75.42, -59.4, 0.5)
	pt3dadd(41.5, 75.58, -59.4, 0.5)
	pt3dadd(41, 75.58, -59.4, 0.5)
	pt3dadd(40.5, 75.75, -59.4, 0.5)
	pt3dadd(40, 75.75, -59.4, 0.5)
	pt3dadd(39.83, 75.92, -59.4, 0.5)
	pt3dadd(39.67, 76.08, -59.4, 0.5)
	pt3dadd(39.5, 76.42, -59.4, 0.5)
	pt3dadd(39.33, 76.58, -59.4, 0.5)
	pt3dadd(39.17, 76.75, -59.4, 0.5)
  }
  dend[18] {pt3dclear()
	pt3dadd(38.83, 71.75, -59.76, 0.5)
	pt3dadd(38, 71.75, -59.76, 0.5)
	pt3dadd(38.17, 71.92, -59.76, 0.5)
	pt3dadd(38.17, 73.42, -59.76, 0.5)
	pt3dadd(38.33, 73.75, -59.76, 0.5)
	pt3dadd(38.33, 74.08, -59.76, 0.5)
	pt3dadd(38.5, 74.25, -59.76, 0.5)
	pt3dadd(38.5, 74.58, -59.76, 0.5)
	pt3dadd(38.67, 74.75, -59.76, 0.5)
	pt3dadd(38.83, 74.92, -59.76, 0.5)
	pt3dadd(39, 75.08, -59.76, 0.5)
	pt3dadd(39.17, 75.25, -59.76, 0.5)
	pt3dadd(39.33, 75.42, -59.76, 0.5)
	pt3dadd(39.5, 75.58, -59.76, 0.5)
	pt3dadd(39.67, 75.75, -59.76, 0.5)
	pt3dadd(39.67, 76.08, -59.76, 0.5)
	pt3dadd(39.83, 76.42, -59.76, 0.5)
	pt3dadd(40, 76.58, -59.76, 0.5)
	pt3dadd(40.17, 76.75, -59.76, 0.5)
	pt3dadd(40.33, 76.92, -59.76, 0.5)
	pt3dadd(40.5, 77.08, -59.76, 0.5)
	pt3dadd(40.67, 77.25, -59.76, 0.5)
	pt3dadd(40.67, 77.42, -59.76, 0.5)
  }
  dend[19] {pt3dclear()
	pt3dadd(40.67, 77.42, -59.76, 0.5)
	pt3dadd(40.5, 77.42, -59.4, 0.5)
	pt3dadd(40.83, 77.42, -59.4, 0.5)
	pt3dadd(41.17, 77.25, -59.4, 0.5)
	pt3dadd(41.83, 76.92, -59.4, 0.5)
	pt3dadd(42.67, 76.92, -59.4, 0.5)
  }
  dend[20] {pt3dclear()
	pt3dadd(40.67, 77.42, -59.76, 0.5)
	pt3dadd(41, 77.58, -59.76, 0.5)
	pt3dadd(41.17, 77.75, -59.76, 0.5)
	pt3dadd(41.17, 78.58, -59.76, 0.5)
	pt3dadd(41, 78.75, -59.76, 0.5)
	pt3dadd(41, 79.08, -59.76, 0.5)
	pt3dadd(40.83, 79.25, -59.76, 0.5)
	pt3dadd(40.67, 79.42, -59.76, 0.5)
	pt3dadd(40.5, 79.58, -59.76, 0.5)
	pt3dadd(40.33, 79.75, -59.76, 0.5)
	pt3dadd(40.17, 79.92, -59.76, 0.5)
	pt3dadd(40, 80.25, -59.76, 0.5)
	pt3dadd(40, 80.58, -59.76, 0.5)
	pt3dadd(39.83, 80.75, -59.76, 0.5)
	pt3dadd(39.83, 81.08, -59.76, 0.5)
	pt3dadd(39.67, 81.25, -59.76, 0.5)
	pt3dadd(39.67, 81.75, -59.76, 0.5)
	pt3dadd(39.5, 81.75, -59.76, 0.5)
  }
  dend[21] {pt3dclear()
	pt3dadd(34, 65.58, -59.4, 0.5)
	pt3dadd(34.17, 65.75, -58.68, 0.5)
	pt3dadd(34, 66.08, -58.68, 0.5)
	pt3dadd(33.83, 66.25, -58.68, 0.5)
	pt3dadd(33.83, 66.58, -58.68, 0.5)
	pt3dadd(33.67, 66.75, -58.68, 0.5)
	pt3dadd(33.5, 67.08, -58.68, 0.5)
	pt3dadd(33.5, 68.58, -58.68, 0.5)
	pt3dadd(33.67, 68.92, -58.68, 0.5)
	pt3dadd(33.83, 69.08, -58.68, 0.5)
	pt3dadd(33.83, 69.75, -59.76, 0.5)
	pt3dadd(34, 69.92, -58.32, 0.5)
	pt3dadd(34.17, 70.25, -58.32, 0.5)
	pt3dadd(34.33, 70.42, -59.04, 0.5)
	pt3dadd(34.5, 71.25, -59.76, 0.5)
	pt3dadd(34.5, 72.75, -59.76, 0.5)
	pt3dadd(34.67, 73.08, -59.76, 0.5)
	pt3dadd(34.67, 73.75, -59.76, 0.5)
	pt3dadd(34.83, 73.92, -59.76, 0.5)
	pt3dadd(34.83, 74.42, -59.76, 0.5)
	pt3dadd(34.67, 74.58, -59.76, 0.5)
	pt3dadd(34.67, 75.92, -59.76, 0.5)
	pt3dadd(34.5, 76.08, -59.76, 0.5)
	pt3dadd(34.5, 76.58, -59.76, 0.5)
	pt3dadd(34.33, 76.75, -59.76, 0.5)
	pt3dadd(34.33, 77.08, -59.76, 0.5)
	pt3dadd(34.17, 76.92, -59.76, 0.5)
  }
  dend[22] {pt3dclear()
	pt3dadd(34.17, 76.92, -59.76, 0.5)
	pt3dadd(34.67, 77.08, -59.4, 0.5)
	pt3dadd(34.83, 77.25, -59.4, 0.5)
	pt3dadd(34.83, 77.58, -59.4, 0.5)
	pt3dadd(35, 77.75, -59.4, 0.5)
	pt3dadd(35.17, 77.92, -59.4, 0.5)
	pt3dadd(35.17, 78.25, -59.4, 0.5)
	pt3dadd(35.33, 78.42, -59.4, 0.5)
	pt3dadd(35.33, 78.75, -59.4, 0.5)
	pt3dadd(35.5, 78.92, -59.4, 0.5)
  }
  dend[23] {pt3dclear()
	pt3dadd(34.17, 76.92, -59.76, 0.5)
	pt3dadd(34.83, 76.92, -59.76, 0.5)
	pt3dadd(34.67, 77.08, -59.76, 0.5)
	pt3dadd(34.5, 77.25, -59.76, 0.5)
	pt3dadd(34.33, 77.42, -59.76, 0.5)
	pt3dadd(34.17, 77.58, -59.76, 0.5)
	pt3dadd(34, 77.75, -59.76, 0.5)
	pt3dadd(33.67, 77.92, -59.76, 0.5)
	pt3dadd(33.5, 78.25, -59.76, 0.5)
	pt3dadd(33.33, 78.42, -59.76, 0.5)
	pt3dadd(33.33, 78.75, -59.76, 0.5)
	pt3dadd(33.17, 78.75, -59.76, 0.5)
  }
  dend[24] {pt3dclear()
	pt3dadd(34.17, 62.42, -58.68, 0.33)
	pt3dadd(34.17, 62.42, -59.4, 0.33)
	pt3dadd(34.33, 62.58, -59.4, 0.33)
	pt3dadd(34.5, 62.75, -59.4, 0.33)
	pt3dadd(34.67, 62.92, -59.4, 0.33)
	pt3dadd(35, 62.92, -59.4, 0.33)
	pt3dadd(35.17, 63.08, -59.4, 0.33)
	pt3dadd(35.5, 63.25, -59.4, 0.33)
	pt3dadd(35.67, 63.42, -59.4, 0.33)
	pt3dadd(35.67, 63.58, -59.4, 0.33)
  }
  dend[25] {pt3dclear()
	pt3dadd(35.67, 63.58, -59.4, 0.33)
	pt3dadd(36.17, 63.75, -60.48, 0.33)
	pt3dadd(36.5, 63.75, -60.48, 0.33)
	pt3dadd(36.67, 63.92, -60.48, 0.33)
	pt3dadd(37, 63.92, -60.48, 0.33)
	pt3dadd(37.33, 64.08, -60.48, 0.33)
	pt3dadd(37.83, 64.42, -60.48, 0.33)
	pt3dadd(37.83, 64.75, -60.48, 0.33)
	pt3dadd(38, 64.92, -60.48, 0.33)
	pt3dadd(38.17, 65.08, -60.48, 0.33)
	pt3dadd(38.33, 65.42, -60.48, 0.33)
	pt3dadd(38.5, 65.75, -60.48, 0.33)
	pt3dadd(38.67, 66.08, -60.48, 0.33)
	pt3dadd(38.67, 66.25, -60.48, 0.33)
  }
  dend[26] {pt3dclear()
	pt3dadd(38.67, 66.25, -60.48, 0.33)
	pt3dadd(38.83, 66.58, -60.48, 0.33)
	pt3dadd(38.83, 66.92, -60.48, 0.33)
	pt3dadd(39, 67.08, -60.48, 0.33)
	pt3dadd(39, 67.42, -60.48, 0.33)
	pt3dadd(39.17, 67.58, -60.48, 0.33)
	pt3dadd(39.17, 68.08, -60.48, 0.33)
	pt3dadd(39.33, 68.42, -60.48, 0.33)
	pt3dadd(39.5, 68.58, -60.48, 0.33)
	pt3dadd(39.5, 68.92, -60.48, 0.33)
	pt3dadd(39.67, 69.25, -60.48, 0.33)
  }
}
proc shape3d_3() {
  dend[26] {	pt3dadd(39.83, 69.42, -60.48, 0.33)
	pt3dadd(40, 69.58, -60.48, 0.33)
	pt3dadd(40.33, 69.58, -60.48, 0.33)
	pt3dadd(40.67, 69.75, -60.48, 0.33)
	pt3dadd(41.17, 69.75, -60.48, 0.33)
	pt3dadd(41.33, 69.58, -60.48, 0.33)
	pt3dadd(41.5, 69.42, -60.48, 0.33)
	pt3dadd(41.83, 69.25, -60.48, 0.33)
	pt3dadd(42.17, 69.08, -60.48, 0.33)
	pt3dadd(42.33, 68.92, -60.48, 0.33)
	pt3dadd(42.67, 68.75, -60.48, 0.33)
	pt3dadd(43, 68.58, -60.48, 0.33)
	pt3dadd(43.33, 68.42, -60.48, 0.33)
	pt3dadd(44.67, 68.42, -60.48, 0.33)
	pt3dadd(44.83, 68.58, -60.48, 0.33)
	pt3dadd(45.17, 68.58, -60.48, 0.33)
	pt3dadd(45.33, 68.75, -60.48, 0.33)
  }
  dend[27] {pt3dclear()
	pt3dadd(45.33, 68.75, -60.48, 0.33)
	pt3dadd(45.33, 68.75, -60.84, 0.33)
	pt3dadd(45.67, 68.75, -60.84, 0.33)
	pt3dadd(46, 68.58, -60.84, 0.33)
	pt3dadd(46.33, 68.42, -60.84, 0.33)
	pt3dadd(46.5, 68.25, -60.84, 0.33)
	pt3dadd(47, 68.25, -60.84, 0.33)
	pt3dadd(47.17, 68.08, -60.84, 0.33)
  }
  dend[28] {pt3dclear()
	pt3dadd(45.33, 68.75, -60.48, 0.33)
	pt3dadd(45.67, 68.75, -60.48, 0.33)
	pt3dadd(45.83, 69.08, -60.48, 0.33)
	pt3dadd(46, 69.58, -60.48, 0.33)
	pt3dadd(46.17, 69.92, -60.48, 0.33)
	pt3dadd(46.33, 70.25, -60.48, 0.33)
	pt3dadd(46.5, 70.42, -60.48, 0.33)
  }
  dend[29] {pt3dclear()
	pt3dadd(38.67, 66.25, -60.48, 0.33)
	pt3dadd(38.83, 66.58, -61.92, 0.33)
	pt3dadd(39, 66.42, -61.92, 0.33)
	pt3dadd(39.17, 66.25, -61.92, 0.33)
	pt3dadd(39.33, 66.08, -61.92, 0.33)
	pt3dadd(39.5, 65.92, -61.92, 0.33)
	pt3dadd(39.67, 65.75, -61.92, 0.33)
	pt3dadd(39.83, 65.58, -61.92, 0.33)
	pt3dadd(40.17, 65.42, -61.92, 0.33)
	pt3dadd(40.67, 65.42, -61.92, 0.33)
	pt3dadd(41, 65.58, -61.92, 0.33)
	pt3dadd(41.17, 65.75, -61.92, 0.33)
	pt3dadd(41.5, 65.75, -61.92, 0.33)
	pt3dadd(41.83, 65.92, -61.92, 0.33)
	pt3dadd(41.83, 66.25, -61.92, 0.33)
	pt3dadd(42, 66.42, -61.92, 0.33)
  }
  dend[30] {pt3dclear()
	pt3dadd(42, 66.42, -61.92, 0.33)
	pt3dadd(42, 66.25, -58.68, 0.33)
	pt3dadd(42.33, 66.42, -58.68, 0.33)
	pt3dadd(43.33, 66.42, -58.68, 0.33)
	pt3dadd(43.83, 66.58, -58.68, 0.33)
	pt3dadd(45.83, 66.58, -58.68, 0.33)
	pt3dadd(45.83, 66.75, -58.68, 0.33)
  }
  dend[31] {pt3dclear()
	pt3dadd(42, 66.42, -61.92, 0.33)
	pt3dadd(42.83, 66.58, -61.92, 0.33)
	pt3dadd(42.83, 66.92, -61.92, 0.33)
	pt3dadd(42.67, 67.08, -61.92, 0.33)
	pt3dadd(42.67, 68.58, -61.92, 0.33)
	pt3dadd(42.83, 68.75, -61.92, 0.33)
	pt3dadd(43.17, 69.08, -61.92, 0.33)
	pt3dadd(43.33, 69.25, -61.92, 0.33)
	pt3dadd(43.5, 69.42, -61.92, 0.33)
	pt3dadd(43.67, 69.58, -61.92, 0.33)
	pt3dadd(43.83, 69.75, -61.92, 0.33)
	pt3dadd(44, 69.75, -61.92, 0.33)
  }
  dend[32] {pt3dclear()
	pt3dadd(35.67, 63.58, -59.4, 0.33)
	pt3dadd(36.17, 63.58, -59.4, 0.33)
	pt3dadd(36, 63.92, -59.4, 0.33)
	pt3dadd(35.83, 64.08, -59.4, 0.33)
	pt3dadd(35.83, 65.75, -59.4, 0.33)
	pt3dadd(36, 66.08, -59.4, 0.33)
	pt3dadd(36, 66.42, -59.4, 0.33)
	pt3dadd(36.17, 66.58, -59.4, 0.33)
	pt3dadd(36.33, 66.92, -59.4, 0.33)
	pt3dadd(36.33, 67.25, -59.4, 0.33)
	pt3dadd(36.5, 67.42, -59.4, 0.33)
	pt3dadd(36.67, 67.58, -59.4, 0.33)
	pt3dadd(36.83, 67.75, -59.4, 0.33)
	pt3dadd(37, 68.08, -59.4, 0.33)
	pt3dadd(37.17, 68.25, -59.4, 0.33)
	pt3dadd(37.17, 68.58, -59.4, 0.33)
	pt3dadd(37.33, 68.75, -59.4, 0.33)
	pt3dadd(37.5, 68.92, -60.84, 0.33)
	pt3dadd(37.67, 69.08, -60.84, 0.33)
	pt3dadd(37.83, 69.25, -60.84, 0.33)
	pt3dadd(38, 69.42, -60.84, 0.33)
  }
  dend[33] {pt3dclear()
	pt3dadd(38, 69.42, -60.84, 0.33)
	pt3dadd(38.17, 69.25, -61.92, 0.33)
	pt3dadd(38.17, 70.08, -61.92, 0.33)
	pt3dadd(38.33, 70.42, -61.92, 0.33)
	pt3dadd(38.5, 70.58, -61.92, 0.33)
	pt3dadd(38.5, 71.42, -61.92, 0.33)
	pt3dadd(38.67, 71.58, -61.92, 0.33)
	pt3dadd(38.67, 74.58, -59.4, 0.33)
	pt3dadd(38.83, 74.75, -59.4, 0.33)
	pt3dadd(39, 74.92, -59.4, 0.33)
	pt3dadd(39.17, 75.08, -59.4, 0.33)
	pt3dadd(39.33, 75.25, -59.4, 0.33)
	pt3dadd(39.5, 75.42, -59.4, 0.33)
	pt3dadd(39.67, 75.58, -59.4, 0.33)
	pt3dadd(39.83, 75.92, -59.4, 0.33)
	pt3dadd(40, 76.08, -59.4, 0.33)
	pt3dadd(40.17, 76.25, -59.4, 0.33)
	pt3dadd(40.33, 76.42, -59.4, 0.33)
	pt3dadd(40.5, 76.58, -59.4, 0.33)
	pt3dadd(40.67, 76.75, -59.4, 0.33)
	pt3dadd(40.83, 77.08, -59.4, 0.33)
	pt3dadd(41, 77.25, -59.4, 0.33)
	pt3dadd(41.17, 77.42, -59.4, 0.33)
  }
  dend[34] {pt3dclear()
	pt3dadd(38, 69.42, -60.84, 0.33)
	pt3dadd(38.33, 69.58, -60.84, 0.33)
	pt3dadd(38.67, 69.58, -60.84, 0.33)
	pt3dadd(39.17, 69.42, -60.84, 0.33)
	pt3dadd(39.5, 69.25, -60.84, 0.33)
	pt3dadd(39.67, 69.08, -60.84, 0.33)
	pt3dadd(39.83, 68.75, -60.84, 0.33)
	pt3dadd(40, 68.42, -60.84, 0.33)
	pt3dadd(40.5, 67.92, -60.84, 0.33)
	pt3dadd(40.67, 67.75, -60.84, 0.33)
	pt3dadd(40.83, 67.75, -60.84, 0.33)
  }
  dend[35] {pt3dclear()
	pt3dadd(33.83, 59.92, -58.68, 0.33)
	pt3dadd(33.67, 59.92, -58.68, 0.33)
	pt3dadd(34.33, 59.92, -58.68, 0.33)
	pt3dadd(34.67, 60.08, -58.68, 0.33)
	pt3dadd(35.67, 60.08, -58.68, 0.33)
	pt3dadd(35.83, 60.25, -58.68, 0.33)
	pt3dadd(36.49, 60.25, -58.68, 0.33)
  }
  dend[36] {pt3dclear()
	pt3dadd(36.49, 60.25, -58.68, 0.33)
	pt3dadd(36.33, 60.25, -58.32, 0.33)
	pt3dadd(37.17, 60.25, -58.32, 0.33)
	pt3dadd(37.33, 60.42, -58.32, 0.33)
	pt3dadd(37.67, 60.42, -58.32, 0.33)
	pt3dadd(37.83, 60.58, -58.32, 0.33)
	pt3dadd(38, 60.75, -58.32, 0.33)
	pt3dadd(38.17, 60.92, -58.32, 0.33)
	pt3dadd(38.33, 61.08, -58.32, 0.33)
	pt3dadd(38.67, 61.08, -58.32, 0.33)
  }
  dend[37] {pt3dclear()
	pt3dadd(38.67, 61.08, -58.32, 0.33)
	pt3dadd(38.67, 61.25, -59.76, 0.33)
	pt3dadd(39.17, 61.25, -59.76, 0.33)
	pt3dadd(39.5, 61.08, -59.76, 0.33)
	pt3dadd(39.67, 60.92, -59.76, 0.33)
	pt3dadd(40, 60.75, -59.76, 0.33)
	pt3dadd(40.17, 60.58, -59.76, 0.33)
	pt3dadd(40.83, 60.58, -59.76, 0.33)
	pt3dadd(41, 60.42, -59.76, 0.33)
	pt3dadd(41.67, 60.42, -59.76, 0.33)
	pt3dadd(41.83, 60.25, -59.76, 0.33)
  }
  dend[38] {pt3dclear()
	pt3dadd(41.83, 60.25, -59.76, 0.33)
	pt3dadd(41.83, 60.42, -62.64, 0.33)
	pt3dadd(42, 60.25, -62.64, 0.33)
	pt3dadd(42.17, 60.08, -62.64, 0.33)
	pt3dadd(42.67, 59.58, -62.64, 0.33)
	pt3dadd(42.83, 59.42, -62.64, 0.33)
	pt3dadd(43, 59.25, -62.64, 0.33)
	pt3dadd(43.17, 59.08, -62.64, 0.33)
	pt3dadd(43.33, 58.92, -62.64, 0.33)
	pt3dadd(43.67, 58.75, -62.64, 0.33)
	pt3dadd(44, 58.58, -62.64, 0.33)
	pt3dadd(44.33, 58.42, -62.64, 0.33)
	pt3dadd(44.67, 58.42, -62.64, 0.33)
	pt3dadd(44.83, 58.58, -62.64, 0.33)
	pt3dadd(45.17, 58.58, -62.64, 0.33)
	pt3dadd(45.5, 58.75, -62.64, 0.33)
	pt3dadd(45.83, 58.92, -62.64, 0.33)
	pt3dadd(46, 59.08, -62.64, 0.33)
	pt3dadd(46.17, 59.42, -62.64, 0.33)
	pt3dadd(46.5, 59.58, -62.64, 0.33)
	pt3dadd(46.67, 59.75, -62.64, 0.33)
	pt3dadd(46.67, 59.92, -62.64, 0.33)
  }
  dend[39] {pt3dclear()
	pt3dadd(46.67, 59.92, -62.64, 0.33)
	pt3dadd(46.5, 60.08, -61.2, 0.33)
	pt3dadd(46.67, 60.42, -61.2, 0.33)
	pt3dadd(47, 60.58, -61.2, 0.33)
	pt3dadd(47.17, 60.92, -61.2, 0.33)
	pt3dadd(47.33, 61.08, -61.2, 0.33)
	pt3dadd(47.67, 61.08, -61.2, 0.33)
	pt3dadd(48, 61.25, -61.2, 0.33)
	pt3dadd(48.17, 61.42, -61.2, 0.33)
	pt3dadd(48.33, 61.42, -61.2, 0.33)
  }
  dend[40] {pt3dclear()
	pt3dadd(46.67, 59.92, -62.64, 0.33)
	pt3dadd(46.83, 59.92, -63.72, 0.33)
	pt3dadd(48.17, 59.92, -63.72, 0.33)
	pt3dadd(48.5, 60.08, -63.72, 0.33)
	pt3dadd(48.67, 60.25, -63.72, 0.33)
	pt3dadd(49, 60.25, -63.72, 0.33)
	pt3dadd(49.17, 60.42, -63.72, 0.33)
	pt3dadd(49.5, 60.42, -63.72, 0.33)
  }
  dend[41] {pt3dclear()
	pt3dadd(41.83, 60.25, -59.76, 0.33)
	pt3dadd(42.17, 60.25, -63.36, 0.33)
	pt3dadd(42.17, 62.58, -63.36, 0.33)
	pt3dadd(42.33, 62.92, -63.36, 0.33)
	pt3dadd(42.5, 63.08, -63.36, 0.33)
	pt3dadd(42.67, 63.42, -63.36, 0.33)
	pt3dadd(42.83, 63.58, -63.36, 0.33)
	pt3dadd(43, 63.75, -63.36, 0.33)
	pt3dadd(43.17, 63.92, -63.36, 0.33)
	pt3dadd(43.33, 64.08, -63.36, 0.33)
  }
}
proc shape3d_4() {
  dend[41] {	pt3dadd(43.33, 64.58, -63.36, 0.33)
	pt3dadd(43.5, 64.75, -63.36, 0.33)
	pt3dadd(43.67, 64.92, -63.36, 0.33)
	pt3dadd(44, 65.08, -63.36, 0.33)
  }
  dend[42] {pt3dclear()
	pt3dadd(44, 65.08, -63.36, 0.33)
	pt3dadd(44, 65.25, -63.72, 0.33)
	pt3dadd(45.83, 65.25, -63.72, 0.33)
	pt3dadd(46, 65.42, -63.72, 0.33)
	pt3dadd(46.33, 65.42, -63.72, 0.33)
	pt3dadd(46.5, 65.58, -63.72, 0.33)
	pt3dadd(46.67, 65.75, -63.72, 0.33)
  }
  dend[43] {pt3dclear()
	pt3dadd(44, 65.08, -63.36, 0.33)
	pt3dadd(44.33, 64.92, -63.36, 0.33)
	pt3dadd(44.33, 66.42, -63.36, 0.33)
	pt3dadd(44.5, 66.58, -63.36, 0.33)
	pt3dadd(44.67, 66.75, -63.36, 0.33)
	pt3dadd(45, 66.75, -63.36, 0.33)
	pt3dadd(45.17, 66.92, -63.36, 0.33)
	pt3dadd(45.5, 67.08, -63.36, 0.33)
  }
  dend[44] {pt3dclear()
	pt3dadd(38.67, 61.08, -58.32, 0.33)
	pt3dadd(39, 61.08, -60.84, 0.33)
	pt3dadd(39, 61.58, -60.84, 0.33)
	pt3dadd(38.83, 61.92, -60.84, 0.33)
	pt3dadd(38.67, 62.25, -60.84, 0.33)
	pt3dadd(38.5, 62.42, -60.84, 0.33)
	pt3dadd(38.5, 63.08, -60.84, 0.33)
	pt3dadd(38.33, 63.08, -60.84, 0.33)
  }
  dend[45] {pt3dclear()
	pt3dadd(36.49, 60.25, -58.68, 0.33)
	pt3dadd(36.83, 60.25, -58.68, 0.33)
	pt3dadd(37.17, 60.08, -58.68, 0.33)
	pt3dadd(37.5, 59.92, -58.68, 0.33)
	pt3dadd(37.83, 59.75, -58.68, 0.33)
	pt3dadd(38.17, 59.58, -58.68, 0.33)
	pt3dadd(38.5, 59.42, -58.68, 0.33)
	pt3dadd(38.83, 59.42, -58.68, 0.33)
	pt3dadd(39, 59.25, -58.68, 0.33)
	pt3dadd(39.17, 59.08, -58.68, 0.33)
	pt3dadd(39.17, 58.75, -58.68, 0.33)
	pt3dadd(39.33, 58.58, -58.68, 0.33)
	pt3dadd(39.5, 58.42, -58.68, 0.33)
	pt3dadd(39.5, 58.08, -58.68, 0.33)
	pt3dadd(39.67, 57.92, -58.68, 0.33)
	pt3dadd(39.83, 57.58, -58.68, 0.33)
	pt3dadd(40, 57.25, -58.68, 0.33)
	pt3dadd(40, 56.92, -58.68, 0.33)
	pt3dadd(40.17, 56.58, -58.68, 0.33)
	pt3dadd(40.33, 56.25, -58.68, 0.33)
	pt3dadd(40.5, 55.92, -58.68, 0.33)
	pt3dadd(40.5, 55.58, -58.68, 0.33)
	pt3dadd(40.67, 55.25, -58.68, 0.33)
  }
  dend[46] {pt3dclear()
	pt3dadd(27, 54.92, -53.64, 0.33)
	pt3dadd(27.17, 54.75, -51.84, 0.33)
	pt3dadd(27, 54.92, -51.84, 0.33)
	pt3dadd(26.83, 55.25, -51.84, 0.33)
	pt3dadd(26.33, 55.75, -51.84, 0.33)
	pt3dadd(26.17, 55.92, -51.84, 0.33)
	pt3dadd(26, 56.25, -51.84, 0.33)
	pt3dadd(25.83, 56.42, -51.84, 0.33)
	pt3dadd(25.67, 56.75, -51.84, 0.33)
	pt3dadd(25.5, 56.92, -51.84, 0.33)
	pt3dadd(25.33, 57.08, -51.84, 0.33)
	pt3dadd(25.17, 57.42, -51.84, 0.33)
	pt3dadd(25, 57.58, -51.84, 0.33)
	pt3dadd(24.83, 57.75, -51.84, 0.33)
	pt3dadd(24.83, 58.08, -51.84, 0.33)
	pt3dadd(24.67, 58.42, -51.84, 0.33)
	pt3dadd(24.5, 58.58, -51.84, 0.33)
	pt3dadd(24.33, 58.92, -51.84, 0.33)
	pt3dadd(24.33, 59.25, -51.84, 0.33)
	pt3dadd(24.17, 59.58, -51.84, 0.33)
	pt3dadd(24, 59.75, -51.84, 0.33)
	pt3dadd(23.83, 59.92, -51.84, 0.33)
	pt3dadd(23.83, 60.25, -51.84, 0.33)
	pt3dadd(23.5, 60.25, -51.84, 0.33)
	pt3dadd(23.33, 60.42, -51.84, 0.33)
	pt3dadd(23.17, 60.58, -51.84, 0.33)
	pt3dadd(23, 60.92, -51.84, 0.33)
	pt3dadd(22.83, 61.08, -51.84, 0.33)
  }
  dend[47] {pt3dclear()
	pt3dadd(22.83, 61.08, -51.84, 0.33)
	pt3dadd(23.17, 61.25, -51.84, 0.33)
	pt3dadd(23, 61.42, -51.84, 0.33)
	pt3dadd(22.83, 61.58, -51.84, 0.33)
	pt3dadd(22.33, 62.08, -51.84, 0.33)
	pt3dadd(22.17, 62.25, -51.84, 0.33)
	pt3dadd(22, 62.42, -51.84, 0.33)
	pt3dadd(21.83, 62.75, -51.84, 0.33)
	pt3dadd(21.83, 63.25, -51.84, 0.33)
	pt3dadd(21.67, 63.58, -51.84, 0.33)
	pt3dadd(21.67, 67.08, -51.84, 0.33)
	pt3dadd(21.83, 67.25, -51.84, 0.33)
	pt3dadd(21.83, 69.25, -51.84, 0.33)
  }
  dend[48] {pt3dclear()
	pt3dadd(22.83, 61.08, -51.84, 0.33)
	pt3dadd(23.33, 60.92, -51.84, 0.33)
	pt3dadd(23, 61.08, -51.84, 0.33)
	pt3dadd(22.67, 61.08, -51.84, 0.33)
	pt3dadd(22.5, 61.25, -51.84, 0.33)
	pt3dadd(22.33, 61.42, -51.84, 0.33)
	pt3dadd(22.17, 61.75, -51.84, 0.33)
	pt3dadd(21.83, 61.75, -51.84, 0.33)
	pt3dadd(21.67, 61.92, -51.84, 0.33)
	pt3dadd(21.33, 61.92, -51.84, 0.33)
	pt3dadd(21.17, 61.75, -51.84, 0.33)
	pt3dadd(21, 61.58, -51.84, 0.33)
	pt3dadd(20.67, 61.42, -51.84, 0.33)
	pt3dadd(20.32, 61.25, -51.84, 0.33)
	pt3dadd(20, 61.25, -51.84, 0.33)
	pt3dadd(19.67, 61.08, -51.84, 0.33)
	pt3dadd(19.17, 61.08, -51.84, 0.33)
  }
  dend[49] {pt3dclear()
	pt3dadd(27, 51.25, -52.92, 0.67)
	pt3dadd(27, 51.42, -55.44, 0.67)
	pt3dadd(27.17, 51.58, -55.44, 0.67)
	pt3dadd(27.5, 51.58, -55.44, 0.67)
	pt3dadd(27.83, 51.42, -55.44, 0.67)
	pt3dadd(29.33, 51.42, -55.44, 0.67)
	pt3dadd(29.67, 51.75, -55.44, 0.67)
	pt3dadd(29.67, 52.08, -55.44, 0.67)
  }
  dend[50] {pt3dclear()
	pt3dadd(29.67, 52.08, -55.44, 0.67)
	pt3dadd(29.67, 52.08, -54.1, 0.67)
  }
  dend[51] {pt3dclear()
	pt3dadd(29.67, 52.08, -54.1, 0.67)
	pt3dadd(29.67, 52.08, -55.44, 0.67)
  }
  dend[52] {pt3dclear()
	pt3dadd(29.67, 52.08, -55.44, 0.67)
	pt3dadd(29.67, 52.08, -54.36, 0.67)
  }
  dend[53] {pt3dclear()
	pt3dadd(29.67, 52.08, -55.44, 0.67)
	pt3dadd(29.83, 52.08, -57.24, 0.33)
	pt3dadd(29.83, 53.25, -57.24, 0.33)
	pt3dadd(29.67, 53.58, -57.24, 0.33)
	pt3dadd(29.67, 54.42, -57.24, 0.33)
	pt3dadd(29.83, 54.58, -57.24, 0.33)
	pt3dadd(30, 54.75, -57.24, 0.33)
	pt3dadd(30.17, 55.08, -57.24, 0.33)
	pt3dadd(30.5, 55.08, -57.24, 0.33)
	pt3dadd(30.67, 55.25, -57.24, 0.33)
	pt3dadd(30.67, 55.42, -57.24, 0.33)
  }
  dend[54] {pt3dclear()
	pt3dadd(30.67, 55.42, -57.24, 0.33)
	pt3dadd(30.83, 55.42, -56.88, 0.33)
	pt3dadd(31.17, 55.42, -56.88, 0.33)
	pt3dadd(31.33, 55.58, -56.88, 0.33)
	pt3dadd(31.67, 55.75, -56.88, 0.33)
	pt3dadd(32.33, 55.75, -56.88, 0.33)
	pt3dadd(32.5, 55.92, -56.88, 0.33)
	pt3dadd(32.83, 55.92, -56.88, 0.33)
  }
  dend[55] {pt3dclear()
	pt3dadd(32.83, 55.92, -56.88, 0.33)
	pt3dadd(33.17, 55.92, -58.32, 0.33)
	pt3dadd(33.17, 56.92, -58.32, 0.33)
	pt3dadd(33.5, 57.08, -58.32, 0.33)
	pt3dadd(33.83, 57.25, -58.32, 0.33)
	pt3dadd(34.17, 57.42, -58.32, 0.33)
	pt3dadd(34.67, 57.42, -58.32, 0.33)
	pt3dadd(34.83, 57.58, -58.32, 0.33)
	pt3dadd(35.17, 57.75, -58.32, 0.33)
	pt3dadd(35.5, 57.75, -58.32, 0.33)
	pt3dadd(35.67, 57.92, -57.6, 0.33)
  }
  dend[56] {pt3dclear()
	pt3dadd(35.67, 57.92, -57.6, 0.33)
	pt3dadd(35.67, 58.25, -58.68, 0.33)
	pt3dadd(36, 58.42, -58.68, 0.33)
	pt3dadd(36.33, 58.42, -58.68, 0.33)
	pt3dadd(36.5, 58.58, -58.68, 0.33)
	pt3dadd(37, 58.58, -58.68, 0.33)
  }
  dend[57] {pt3dclear()
	pt3dadd(35.67, 57.92, -57.6, 0.33)
	pt3dadd(36, 57.75, -57.6, 0.33)
	pt3dadd(36.33, 57.75, -57.6, 0.33)
	pt3dadd(36.67, 57.42, -57.6, 0.33)
	pt3dadd(36.83, 57.08, -57.6, 0.33)
	pt3dadd(37, 56.92, -57.6, 0.33)
	pt3dadd(37.17, 56.75, -57.6, 0.33)
	pt3dadd(37.33, 56.58, -57.6, 0.33)
	pt3dadd(38, 56.58, -57.6, 0.33)
	pt3dadd(38.33, 56.42, -57.6, 0.33)
	pt3dadd(38.83, 56.42, -57.6, 0.33)
  }
  dend[58] {pt3dclear()
	pt3dadd(32.83, 55.92, -56.88, 0.33)
	pt3dadd(33.33, 55.92, -56.88, 0.33)
	pt3dadd(33.67, 55.75, -56.88, 0.33)
	pt3dadd(34, 55.58, -56.88, 0.33)
	pt3dadd(34.33, 55.42, -56.88, 0.33)
	pt3dadd(34.67, 55.25, -56.88, 0.33)
	pt3dadd(35, 54.92, -56.88, 0.33)
	pt3dadd(35.17, 54.75, -56.88, 0.33)
	pt3dadd(35.33, 54.58, -56.88, 0.33)
	pt3dadd(35.5, 54.42, -56.88, 0.33)
	pt3dadd(35.5, 54.08, -56.88, 0.33)
	pt3dadd(35.67, 53.92, -56.88, 0.33)
	pt3dadd(35.83, 53.75, -56.88, 0.33)
	pt3dadd(35.83, 53.42, -56.88, 0.33)
	pt3dadd(36, 53.25, -56.88, 0.33)
	pt3dadd(36, 53.08, -56.88, 0.33)
  }
  dend[59] {pt3dclear()
	pt3dadd(30.67, 55.42, -57.24, 0.33)
	pt3dadd(31, 55.58, -57.24, 0.33)
	pt3dadd(30.83, 55.92, -57.24, 0.33)
	pt3dadd(30.67, 56.25, -57.24, 0.33)
	pt3dadd(30.5, 56.42, -57.24, 0.33)
	pt3dadd(30.5, 56.75, -57.24, 0.33)
	pt3dadd(30.33, 56.92, -57.24, 0.33)
	pt3dadd(30.17, 57.08, -57.24, 0.33)
	pt3dadd(30.17, 57.42, -57.24, 0.33)
	pt3dadd(30, 57.58, -57.24, 0.33)
	pt3dadd(30, 58.42, -57.24, 0.33)
	pt3dadd(29.83, 58.75, -57.24, 0.33)
	pt3dadd(29.67, 59.08, -57.24, 0.33)
	pt3dadd(29.5, 59.25, -57.24, 0.33)
	pt3dadd(29.5, 59.42, -57.24, 0.33)
  }
}
proc shape3d_5() {
  dend[59] {  }
  dend[60] {pt3dclear()
	pt3dadd(29.5, 59.42, -57.24, 0.33)
	pt3dadd(29.67, 59.42, -59.4, 0.33)
	pt3dadd(29.83, 59.58, -59.4, 0.33)
	pt3dadd(30, 59.92, -59.4, 0.33)
	pt3dadd(30.17, 60.25, -59.4, 0.33)
	pt3dadd(30.33, 60.42, -59.4, 0.33)
	pt3dadd(30.33, 61.25, -59.4, 0.33)
	pt3dadd(30.5, 61.42, -59.4, 0.33)
	pt3dadd(30.67, 61.75, -59.4, 0.33)
	pt3dadd(30.67, 62.58, -59.4, 0.33)
	pt3dadd(30.83, 62.92, -59.4, 0.33)
	pt3dadd(30.83, 64.25, -59.4, 0.33)
	pt3dadd(31, 64.42, -59.4, 0.33)
	pt3dadd(31, 65.75, -59.4, 0.33)
	pt3dadd(30.83, 66.08, -59.4, 0.33)
	pt3dadd(30.83, 67.92, -59.04, 0.33)
	pt3dadd(31, 68.25, -59.04, 0.33)
	pt3dadd(31.33, 68.58, -59.04, 0.33)
	pt3dadd(31.5, 68.75, -59.04, 0.33)
	pt3dadd(31.67, 68.92, -59.04, 0.33)
	pt3dadd(32, 68.92, -59.04, 0.33)
	pt3dadd(32.17, 69.08, -59.04, 0.33)
	pt3dadd(32.33, 69.25, -59.04, 0.33)
	pt3dadd(32.5, 69.42, -59.04, 0.33)
	pt3dadd(32.5, 69.75, -59.04, 0.33)
	pt3dadd(32.67, 69.92, -59.04, 0.33)
	pt3dadd(32.67, 70.42, -59.04, 0.33)
	pt3dadd(32.83, 70.58, -59.04, 0.33)
	pt3dadd(32.83, 70.92, -59.04, 0.33)
	pt3dadd(33, 71.25, -59.04, 0.33)
	pt3dadd(33, 71.75, -59.04, 0.33)
	pt3dadd(33.17, 72.08, -59.04, 0.33)
	pt3dadd(33.33, 72.42, -59.04, 0.33)
	pt3dadd(33.5, 72.58, -59.04, 0.33)
	pt3dadd(33.5, 72.92, -59.04, 0.33)
	pt3dadd(33.67, 73.08, -59.04, 0.33)
	pt3dadd(34, 73.25, -59.04, 0.33)
	pt3dadd(34.33, 73.42, -59.04, 0.33)
	pt3dadd(34.67, 73.58, -59.04, 0.33)
	pt3dadd(34.83, 73.75, -59.04, 0.33)
	pt3dadd(35, 73.92, -59.04, 0.33)
	pt3dadd(35.33, 73.92, -59.04, 0.33)
	pt3dadd(35.5, 74.08, -59.04, 0.33)
	pt3dadd(35.67, 74.25, -59.04, 0.33)
	pt3dadd(35.83, 74.42, -59.04, 0.33)
  }
  dend[61] {pt3dclear()
	pt3dadd(35.83, 74.42, -59.04, 0.33)
	pt3dadd(36, 74.25, -58.68, 0.33)
	pt3dadd(36.17, 74.42, -58.68, 0.33)
	pt3dadd(37.33, 74.42, -58.68, 0.33)
	pt3dadd(37.5, 74.25, -58.68, 0.33)
	pt3dadd(37.67, 74.08, -58.68, 0.33)
	pt3dadd(37.83, 73.92, -58.68, 0.33)
	pt3dadd(38, 73.75, -58.68, 0.33)
	pt3dadd(38.33, 73.58, -58.68, 0.33)
	pt3dadd(38.67, 73.42, -58.68, 0.33)
	pt3dadd(39, 73.25, -58.68, 0.33)
	pt3dadd(39.33, 73.25, -58.68, 0.33)
	pt3dadd(39.5, 73.08, -58.68, 0.33)
	pt3dadd(39.67, 73.08, -58.68, 0.33)
  }
  dend[62] {pt3dclear()
	pt3dadd(35.83, 74.42, -59.04, 0.33)
	pt3dadd(36.5, 74.58, -59.04, 0.33)
	pt3dadd(36.5, 75.75, -59.04, 0.33)
	pt3dadd(36.67, 75.92, -59.04, 0.33)
	pt3dadd(36.83, 76.08, -59.04, 0.33)
	pt3dadd(37.17, 76.42, -59.04, 0.33)
	pt3dadd(37.33, 76.58, -59.04, 0.33)
	pt3dadd(37.5, 76.75, -59.04, 0.33)
	pt3dadd(37.67, 77.08, -59.04, 0.33)
	pt3dadd(37.83, 77.25, -59.04, 0.33)
	pt3dadd(38, 77.42, -59.04, 0.33)
  }
  dend[63] {pt3dclear()
	pt3dadd(29.5, 59.42, -57.24, 0.33)
	pt3dadd(30, 59.58, -57.24, 0.33)
	pt3dadd(29.67, 59.58, -57.24, 0.33)
	pt3dadd(29.33, 59.75, -57.24, 0.33)
	pt3dadd(29, 59.92, -57.24, 0.33)
	pt3dadd(28.67, 60.08, -57.24, 0.33)
	pt3dadd(28.67, 62.58, -59.04, 0.33)
	pt3dadd(28.83, 62.75, -59.04, 0.33)
	pt3dadd(28.83, 63.08, -59.04, 0.33)
	pt3dadd(29, 63.25, -59.04, 0.33)
	pt3dadd(29.17, 63.58, -59.04, 0.33)
	pt3dadd(29.33, 63.92, -59.04, 0.33)
	pt3dadd(29.33, 67.08, -59.04, 0.33)
	pt3dadd(29.17, 67.25, -59.04, 0.33)
	pt3dadd(29.17, 67.58, -59.04, 0.33)
	pt3dadd(29, 67.92, -59.04, 0.33)
	pt3dadd(29, 68.25, -59.04, 0.33)
	pt3dadd(28.83, 68.42, -59.04, 0.33)
	pt3dadd(28.67, 68.42, -59.04, 0.33)
  }
  dend[64] {pt3dclear()
	pt3dadd(29.67, 52.08, -54.1, 0.67)
	pt3dadd(29.67, 51.42, -54.36, 0.67)
	pt3dadd(29.83, 51.25, -54.36, 0.67)
	pt3dadd(30, 51.08, -54.36, 0.67)
	pt3dadd(30.17, 50.75, -54.36, 0.67)
	pt3dadd(30.33, 50.58, -54.36, 0.67)
	pt3dadd(30.33, 50.25, -54.36, 0.67)
	pt3dadd(30.5, 50.08, -54.36, 0.67)
	pt3dadd(30.83, 49.92, -54.36, 0.67)
	pt3dadd(31, 49.75, -54.36, 0.67)
	pt3dadd(31, 49.58, -54.36, 0.67)
  }
  dend[65] {pt3dclear()
	pt3dadd(31, 49.58, -54.36, 0.67)
	pt3dadd(30.83, 49.75, -54, 0.33)
	pt3dadd(31, 49.58, -54, 0.33)
	pt3dadd(31.17, 49.42, -54, 0.33)
	pt3dadd(31.33, 49.08, -54, 0.33)
	pt3dadd(31.5, 48.75, -54, 0.33)
	pt3dadd(31.67, 48.58, -54, 0.33)
	pt3dadd(31.83, 48.42, -54, 0.33)
	pt3dadd(32, 48.25, -54, 0.33)
	pt3dadd(32.17, 48.08, -54, 0.33)
	pt3dadd(32.33, 47.92, -54, 0.33)
	pt3dadd(32.5, 47.58, -54, 0.33)
	pt3dadd(32.67, 47.25, -54, 0.33)
	pt3dadd(33, 47.08, -54, 0.33)
	pt3dadd(33.17, 46.75, -54, 0.33)
	pt3dadd(33.33, 46.42, -54, 0.33)
	pt3dadd(33.5, 46.25, -54, 0.33)
	pt3dadd(33.67, 46.08, -54, 0.33)
	pt3dadd(33.83, 45.75, -54, 0.33)
	pt3dadd(34, 45.58, -54, 0.33)
	pt3dadd(34.17, 45.42, -54, 0.33)
	pt3dadd(34.33, 45.25, -54, 0.33)
	pt3dadd(34.5, 44.92, -54, 0.33)
	pt3dadd(34.67, 44.92, -55.08, 0.33)
	pt3dadd(34.83, 44.75, -55.08, 0.33)
	pt3dadd(35, 44.42, -55.08, 0.33)
	pt3dadd(35, 44.25, -55.08, 0.33)
  }
  dend[66] {pt3dclear()
	pt3dadd(35, 44.25, -55.08, 0.33)
	pt3dadd(35.17, 44.58, -55.44, 0.33)
	pt3dadd(35.33, 44.75, -55.44, 0.33)
	pt3dadd(35.67, 44.58, -55.44, 0.33)
	pt3dadd(35.67, 44.25, -55.44, 0.33)
	pt3dadd(35.83, 44.08, -55.44, 0.33)
	pt3dadd(36, 43.92, -55.44, 0.33)
	pt3dadd(36.17, 43.75, -55.44, 0.33)
	pt3dadd(36.33, 43.42, -55.44, 0.33)
	pt3dadd(36.67, 43.42, -55.44, 0.33)
	pt3dadd(36.83, 43.25, -55.44, 0.33)
	pt3dadd(37.17, 43.25, -55.44, 0.33)
	pt3dadd(37.5, 43.08, -55.44, 0.33)
	pt3dadd(37.67, 42.92, -55.44, 0.33)
	pt3dadd(38, 42.92, -55.44, 0.33)
	pt3dadd(38.17, 42.75, -55.44, 0.33)
	pt3dadd(38.17, 42.58, -55.44, 0.33)
  }
  dend[67] {pt3dclear()
	pt3dadd(38.17, 42.58, -55.44, 0.33)
	pt3dadd(38.67, 42.58, -55.08, 0.33)
	pt3dadd(39, 42.58, -55.08, 0.33)
	pt3dadd(39.17, 42.92, -55.08, 0.33)
	pt3dadd(39.17, 43.25, -55.08, 0.33)
	pt3dadd(39.33, 43.42, -55.08, 0.33)
	pt3dadd(39.5, 43.58, -55.08, 0.33)
	pt3dadd(39.67, 43.75, -55.08, 0.33)
	pt3dadd(39.67, 44.08, -55.08, 0.33)
	pt3dadd(39.83, 44.42, -55.08, 0.33)
	pt3dadd(39.83, 44.75, -55.08, 0.33)
	pt3dadd(40, 44.92, -55.08, 0.33)
	pt3dadd(40.17, 45.08, -55.08, 0.33)
	pt3dadd(40.33, 45.25, -55.08, 0.33)
	pt3dadd(40.5, 45.25, -55.08, 0.33)
  }
  dend[68] {pt3dclear()
	pt3dadd(38.17, 42.58, -55.44, 0.33)
	pt3dadd(38.83, 42.25, -55.44, 0.33)
	pt3dadd(38.67, 42.08, -55.44, 0.33)
	pt3dadd(38.33, 42.08, -55.44, 0.33)
	pt3dadd(38.33, 41.42, -55.44, 0.33)
	pt3dadd(38.17, 41.25, -55.44, 0.33)
	pt3dadd(37.83, 41.25, -55.44, 0.33)
	pt3dadd(37.67, 41.08, -55.44, 0.33)
  }
  dend[69] {pt3dclear()
	pt3dadd(37.67, 41.08, -55.44, 0.33)
	pt3dadd(37.67, 40.92, -55.44, 0.33)
	pt3dadd(37.83, 40.75, -55.44, 0.33)
	pt3dadd(38.17, 40.42, -55.44, 0.33)
	pt3dadd(38.33, 40.25, -55.44, 0.33)
	pt3dadd(38.33, 39.92, -55.44, 0.33)
	pt3dadd(38.5, 39.75, -55.44, 0.33)
	pt3dadd(38.67, 39.58, -55.44, 0.33)
	pt3dadd(38.83, 39.25, -55.44, 0.33)
	pt3dadd(38.83, 38.58, -55.44, 0.33)
  }
  dend[70] {pt3dclear()
	pt3dadd(37.67, 41.08, -55.44, 0.33)
	pt3dadd(37.67, 40.92, -55.44, 0.33)
	pt3dadd(37, 40.92, -55.44, 0.33)
	pt3dadd(36.67, 40.75, -55.44, 0.33)
	pt3dadd(36.17, 40.75, -55.44, 0.33)
	pt3dadd(36, 40.92, -55.44, 0.33)
  }
  dend[71] {pt3dclear()
	pt3dadd(35, 44.25, -55.08, 0.33)
	pt3dadd(35, 44.08, -55.08, 0.33)
	pt3dadd(35, 43.58, -55.08, 0.33)
	pt3dadd(34.83, 43.42, -55.08, 0.33)
	pt3dadd(34.67, 43.08, -55.08, 0.33)
	pt3dadd(34.33, 42.92, -55.08, 0.33)
	pt3dadd(34.17, 42.75, -55.08, 0.33)
	pt3dadd(34, 42.75, -55.08, 0.33)
  }
  dend[72] {pt3dclear()
	pt3dadd(31, 49.58, -54.36, 0.67)
	pt3dadd(30.83, 49.92, -54, 0.67)
	pt3dadd(31, 49.75, -54, 0.67)
	pt3dadd(31.17, 49.58, -54, 0.67)
	pt3dadd(31.17, 48.58, -54, 0.67)
	pt3dadd(31, 48.42, -54, 0.67)
	pt3dadd(30.83, 48.25, -54, 0.67)
	pt3dadd(30.67, 48.08, -54, 0.67)
	pt3dadd(30.5, 47.92, -54, 0.67)
  }
}
proc shape3d_6() {
  dend[72] {	pt3dadd(30, 47.92, -54, 0.67)
	pt3dadd(29.83, 47.75, -54, 0.67)
	pt3dadd(29.67, 47.58, -54, 0.67)
	pt3dadd(29.83, 47.75, -54, 0.33)
	pt3dadd(29.67, 47.75, -54, 0.33)
  }
  dend[73] {pt3dclear()
	pt3dadd(29.67, 47.75, -54, 0.33)
	pt3dadd(29.83, 47.75, -54, 0.33)
	pt3dadd(28.83, 47.75, -54, 0.33)
	pt3dadd(28.67, 47.58, -54, 0.33)
	pt3dadd(28.5, 47.42, -54, 0.33)
	pt3dadd(28.33, 47.25, -54, 0.33)
	pt3dadd(28.33, 46.42, -54, 0.33)
	pt3dadd(28.17, 46.25, -54, 0.33)
	pt3dadd(28.17, 45.92, -54, 0.33)
	pt3dadd(28, 45.75, -54, 0.33)
	pt3dadd(27.83, 45.58, -54, 0.33)
	pt3dadd(27.5, 45.42, -54, 0.33)
	pt3dadd(27.33, 45.25, -54, 0.33)
	pt3dadd(27.17, 45.25, -54, 0.33)
  }
  dend[74] {pt3dclear()
	pt3dadd(27.17, 45.25, -54, 0.33)
	pt3dadd(27.33, 45.42, -53.28, 0.33)
	pt3dadd(27.17, 45.58, -53.28, 0.33)
	pt3dadd(27, 45.75, -53.28, 0.33)
	pt3dadd(26.67, 45.75, -53.28, 0.33)
	pt3dadd(26.5, 45.92, -53.28, 0.33)
	pt3dadd(25.83, 45.92, -53.28, 0.33)
	pt3dadd(25.67, 45.75, -53.28, 0.33)
	pt3dadd(25.5, 45.58, -53.28, 0.33)
	pt3dadd(25.17, 45.58, -53.28, 0.33)
	pt3dadd(25, 45.42, -53.28, 0.33)
	pt3dadd(24.83, 45.25, -53.28, 0.33)
	pt3dadd(24.67, 45.08, -53.28, 0.33)
	pt3dadd(24.33, 44.92, -53.28, 0.33)
	pt3dadd(22.83, 44.92, -53.28, 0.33)
	pt3dadd(22.67, 44.75, -53.28, 0.33)
	pt3dadd(22, 44.75, -53.28, 0.33)
  }
  dend[75] {pt3dclear()
	pt3dadd(22, 44.75, -53.28, 0.33)
	pt3dadd(22, 44.75, -51.84, 0.33)
	pt3dadd(21.83, 44.92, -51.84, 0.33)
	pt3dadd(21.67, 45.25, -51.84, 0.33)
	pt3dadd(21.33, 45.25, -51.84, 0.33)
	pt3dadd(21, 45.42, -51.84, 0.33)
	pt3dadd(20.83, 45.58, -51.84, 0.33)
	pt3dadd(20.67, 45.75, -51.84, 0.33)
	pt3dadd(20.32, 45.75, -51.84, 0.33)
	pt3dadd(20.17, 45.92, -51.84, 0.33)
	pt3dadd(19, 45.92, -51.84, 0.33)
	pt3dadd(18.82, 45.75, -51.84, 0.33)
  }
  dend[76] {pt3dclear()
	pt3dadd(22, 44.75, -53.28, 0.33)
	pt3dadd(22.33, 44.75, -53.28, 0.33)
	pt3dadd(21.83, 44.75, -53.28, 0.33)
	pt3dadd(21.67, 44.58, -53.28, 0.33)
	pt3dadd(21.5, 44.42, -53.28, 0.33)
	pt3dadd(21.5, 43.75, -53.28, 0.33)
	pt3dadd(21.33, 43.42, -53.28, 0.33)
	pt3dadd(21.5, 43.08, -53.28, 0.33)
	pt3dadd(21.67, 42.92, -53.28, 0.33)
	pt3dadd(21.83, 42.58, -53.28, 0.33)
	pt3dadd(22.17, 42.42, -53.28, 0.33)
	pt3dadd(22.33, 42.25, -53.28, 0.33)
	pt3dadd(22.5, 42.08, -53.28, 0.33)
	pt3dadd(22.67, 41.92, -53.28, 0.33)
	pt3dadd(23, 41.58, -53.28, 0.33)
	pt3dadd(23.17, 41.42, -53.28, 0.33)
	pt3dadd(23.17, 41.25, -53.28, 0.33)
  }
  dend[77] {pt3dclear()
	pt3dadd(27.17, 45.25, -54, 0.33)
	pt3dadd(27.5, 45.25, -53.64, 0.33)
	pt3dadd(27.67, 45.08, -53.64, 0.33)
	pt3dadd(27.83, 44.75, -53.64, 0.33)
	pt3dadd(28, 44.58, -53.64, 0.33)
	pt3dadd(28.33, 44.58, -53.64, 0.33)
	pt3dadd(28.5, 44.42, -53.64, 0.33)
	pt3dadd(29.67, 44.42, -53.64, 0.33)
	pt3dadd(29.83, 44.58, -53.64, 0.33)
	pt3dadd(30, 44.75, -53.64, 0.33)
	pt3dadd(30.17, 44.92, -53.64, 0.33)
	pt3dadd(30.33, 45.08, -53.64, 0.33)
  }
  dend[78] {pt3dclear()
	pt3dadd(30.33, 45.08, -53.64, 0.33)
	pt3dadd(30.33, 45.25, -53.64, 0.33)
	pt3dadd(30.5, 45.08, -53.64, 0.33)
	pt3dadd(30.5, 43.58, -53.64, 0.33)
	pt3dadd(30.67, 43.42, -53.64, 0.33)
	pt3dadd(30.83, 43.25, -53.64, 0.33)
	pt3dadd(30.83, 42.92, -53.64, 0.33)
	pt3dadd(31, 42.75, -53.64, 0.33)
	pt3dadd(31.17, 42.58, -53.64, 0.33)
	pt3dadd(31.33, 42.42, -53.64, 0.33)
	pt3dadd(31.33, 40.58, -53.64, 0.33)
	pt3dadd(31.17, 40.42, -53.64, 0.33)
	pt3dadd(31, 40.25, -53.64, 0.33)
	pt3dadd(31, 39.92, -53.64, 0.33)
	pt3dadd(30.83, 39.75, -53.64, 0.33)
	pt3dadd(30.67, 39.75, -53.64, 0.33)
  }
  dend[79] {pt3dclear()
	pt3dadd(30.33, 45.08, -53.64, 0.33)
	pt3dadd(30.33, 45.25, -53.64, 0.33)
	pt3dadd(30.5, 45.42, -53.64, 0.33)
	pt3dadd(30.67, 45.75, -53.64, 0.33)
	pt3dadd(30.83, 46.08, -53.64, 0.33)
	pt3dadd(31, 46.42, -53.64, 0.33)
	pt3dadd(31.17, 46.58, -53.64, 0.33)
	pt3dadd(31.33, 46.75, -53.64, 0.33)
	pt3dadd(31.5, 46.92, -53.64, 0.33)
	pt3dadd(31.67, 47.08, -53.64, 0.33)
	pt3dadd(31.83, 47.25, -53.64, 0.33)
	pt3dadd(32.17, 47.42, -53.64, 0.33)
	pt3dadd(32.33, 47.58, -53.64, 0.33)
	pt3dadd(32.33, 47.92, -53.64, 0.33)
	pt3dadd(32.5, 48.08, -53.64, 0.33)
	pt3dadd(32.67, 48.42, -53.64, 0.33)
	pt3dadd(32.83, 48.58, -53.64, 0.33)
	pt3dadd(32.83, 49.25, -53.64, 0.33)
	pt3dadd(33, 49.42, -53.64, 0.33)
	pt3dadd(33, 49.58, -53.64, 0.33)
  }
  dend[80] {pt3dclear()
	pt3dadd(29.67, 47.75, -54, 0.33)
	pt3dadd(29.67, 47.75, -55.08, 0.33)
	pt3dadd(29.5, 47.92, -55.08, 0.33)
	pt3dadd(29.33, 48.08, -55.08, 0.33)
	pt3dadd(29.17, 48.25, -55.08, 0.33)
	pt3dadd(29, 48.42, -55.08, 0.33)
	pt3dadd(28.83, 48.58, -55.08, 0.33)
	pt3dadd(28.67, 48.75, -55.08, 0.33)
	pt3dadd(28.33, 49.08, -55.08, 0.33)
	pt3dadd(28.17, 49.25, -55.08, 0.33)
	pt3dadd(28, 49.58, -55.08, 0.33)
	pt3dadd(27.83, 49.75, -55.08, 0.33)
  }
  dend[81] {pt3dclear()
	pt3dadd(29.67, 52.08, -55.44, 0.67)
	pt3dadd(29.83, 52.25, -55.8, 0.33)
	pt3dadd(31.83, 52.25, -55.8, 0.33)
	pt3dadd(32, 52.42, -57.96, 0.33)
	pt3dadd(33, 52.42, -57.96, 0.33)
	pt3dadd(33.33, 52.58, -57.96, 0.33)
	pt3dadd(33.67, 52.75, -57.96, 0.33)
	pt3dadd(33.83, 52.92, -57.96, 0.33)
	pt3dadd(34, 53.08, -57.96, 0.33)
	pt3dadd(34.33, 53.08, -57.96, 0.33)
	pt3dadd(34.67, 53.25, -57.96, 0.33)
	pt3dadd(35, 53.42, -57.96, 0.33)
	pt3dadd(35.33, 53.58, -57.96, 0.33)
	pt3dadd(35.5, 53.75, -57.96, 0.33)
	pt3dadd(35.83, 53.75, -57.96, 0.33)
	pt3dadd(36, 53.92, -57.96, 0.33)
	pt3dadd(36.5, 53.92, -57.96, 0.33)
	pt3dadd(36.67, 54.08, -57.96, 0.33)
  }
  dend[82] {pt3dclear()
	pt3dadd(36.67, 54.08, -57.96, 0.33)
	pt3dadd(36.67, 53.92, -58.68, 0.33)
	pt3dadd(36.67, 54.25, -58.68, 0.33)
	pt3dadd(36.83, 54.58, -58.68, 0.33)
	pt3dadd(37, 54.75, -58.68, 0.33)
	pt3dadd(37.33, 54.92, -58.68, 0.33)
	pt3dadd(37.5, 55.08, -58.68, 0.33)
	pt3dadd(37.67, 55.25, -58.68, 0.33)
	pt3dadd(38, 55.25, -58.68, 0.33)
	pt3dadd(38.17, 55.42, -58.68, 0.33)
	pt3dadd(38.33, 55.58, -58.68, 0.33)
  }
  dend[83] {pt3dclear()
	pt3dadd(38.33, 55.58, -58.68, 0.33)
	pt3dadd(38.67, 55.58, -59.4, 0.33)
	pt3dadd(38.83, 55.75, -59.4, 0.33)
	pt3dadd(39.83, 55.75, -59.4, 0.33)
	pt3dadd(40, 55.92, -59.4, 0.33)
	pt3dadd(40.17, 56.08, -59.4, 0.33)
	pt3dadd(40.33, 56.25, -59.4, 0.33)
	pt3dadd(40.67, 56.25, -59.4, 0.33)
	pt3dadd(40.83, 56.42, -59.4, 0.33)
	pt3dadd(41, 56.58, -59.4, 0.33)
	pt3dadd(41.33, 56.75, -59.4, 0.33)
  }
  dend[84] {pt3dclear()
	pt3dadd(41.33, 56.75, -59.4, 0.33)
	pt3dadd(41.5, 56.75, -59.4, 0.33)
	pt3dadd(43, 56.75, -59.4, 0.33)
	pt3dadd(43, 56.92, -59.4, 0.33)
  }
  dend[85] {pt3dclear()
	pt3dadd(43, 56.92, -59.4, 0.33)
	pt3dadd(43.05, 56.92, -60.05, 0.33)
  }
  dend[86] {pt3dclear()
	pt3dadd(43.05, 56.92, -60.05, 0.33)
	pt3dadd(43.17, 56.92, -61.56, 0.33)
	pt3dadd(44.17, 56.92, -61.56, 0.33)
	pt3dadd(44.5, 56.75, -61.56, 0.33)
	pt3dadd(44.83, 56.75, -61.56, 0.33)
	pt3dadd(45.17, 56.58, -61.56, 0.33)
	pt3dadd(45.33, 56.42, -61.56, 0.33)
  }
  dend[87] {pt3dclear()
	pt3dadd(45.33, 56.42, -61.56, 0.33)
	pt3dadd(45.5, 56.25, -60.12, 0.33)
	pt3dadd(45.83, 56.25, -60.12, 0.33)
	pt3dadd(46, 55.92, -60.12, 0.33)
	pt3dadd(46.33, 55.75, -60.12, 0.33)
	pt3dadd(46.5, 55.58, -60.12, 0.33)
	pt3dadd(46.83, 55.25, -60.12, 0.33)
	pt3dadd(47, 55.08, -60.12, 0.33)
	pt3dadd(47.33, 55.08, -60.12, 0.33)
  }
  dend[88] {pt3dclear()
	pt3dadd(47.33, 55.08, -60.12, 0.33)
	pt3dadd(47.33, 55.25, -62.64, 0.33)
	pt3dadd(48.33, 55.25, -62.64, 0.33)
	pt3dadd(48.5, 55.08, -62.64, 0.33)
	pt3dadd(49.17, 55.08, -62.64, 0.33)
	pt3dadd(49.33, 54.92, -62.64, 0.33)
  }
  dend[89] {pt3dclear()
	pt3dadd(47.33, 55.08, -60.12, 0.33)
	pt3dadd(47.33, 54.92, -60.12, 0.33)
	pt3dadd(47.5, 54.58, -60.12, 0.33)
	pt3dadd(47.67, 54.25, -60.12, 0.33)
	pt3dadd(47.67, 53.92, -60.12, 0.33)
	pt3dadd(47.83, 53.58, -60.12, 0.33)
	pt3dadd(47.83, 52.92, -60.12, 0.33)
  }
}
proc shape3d_7() {
  dend[89] {	pt3dadd(48, 52.75, -60.12, 0.33)
	pt3dadd(48, 52.42, -60.12, 0.33)
	pt3dadd(48.17, 52.08, -60.12, 0.33)
	pt3dadd(48.17, 51.75, -60.12, 0.33)
	pt3dadd(48.33, 51.58, -60.12, 0.33)
	pt3dadd(48.5, 51.42, -60.12, 0.33)
	pt3dadd(48.5, 51.08, -60.12, 0.33)
	pt3dadd(48.67, 50.92, -60.12, 0.33)
	pt3dadd(48.67, 50.75, -60.12, 0.33)
  }
  dend[90] {pt3dclear()
	pt3dadd(45.33, 56.42, -61.56, 0.33)
	pt3dadd(45.67, 56.58, -61.56, 0.33)
	pt3dadd(45.67, 57.08, -61.56, 0.33)
	pt3dadd(45.83, 57.25, -61.56, 0.33)
	pt3dadd(45.83, 57.75, -61.56, 0.33)
	pt3dadd(46, 57.92, -61.56, 0.33)
  }
  dend[91] {pt3dclear()
	pt3dadd(46, 57.92, -61.56, 0.33)
	pt3dadd(46, 57.92, -61.2, 0.33)
	pt3dadd(46.17, 58.08, -61.2, 0.33)
	pt3dadd(46.5, 58.25, -61.2, 0.33)
	pt3dadd(46.67, 58.42, -61.2, 0.33)
	pt3dadd(46.83, 58.58, -61.2, 0.33)
	pt3dadd(47.17, 58.75, -61.2, 0.33)
	pt3dadd(47.67, 58.75, -61.2, 0.33)
	pt3dadd(47.83, 58.92, -61.2, 0.33)
	pt3dadd(48, 58.92, -61.2, 0.33)
  }
  dend[92] {pt3dclear()
	pt3dadd(46, 57.92, -61.56, 0.33)
	pt3dadd(46.17, 57.75, -61.56, 0.33)
	pt3dadd(46, 57.92, -61.56, 0.33)
	pt3dadd(45.83, 58.08, -61.56, 0.33)
	pt3dadd(45.67, 58.25, -61.56, 0.33)
	pt3dadd(45.5, 58.42, -61.56, 0.33)
	pt3dadd(45.33, 58.58, -61.56, 0.33)
	pt3dadd(45.17, 58.75, -61.56, 0.33)
	pt3dadd(45, 58.92, -61.56, 0.33)
	pt3dadd(45, 59.25, -61.56, 0.33)
	pt3dadd(44.83, 59.42, -61.56, 0.33)
  }
  dend[93] {pt3dclear()
	pt3dadd(43.05, 56.92, -60.05, 0.33)
	pt3dadd(43, 57.25, -60.12, 0.33)
	pt3dadd(43.17, 57.08, -60.12, 0.33)
	pt3dadd(43.33, 56.92, -60.12, 0.33)
	pt3dadd(43.5, 56.75, -60.12, 0.33)
	pt3dadd(43.5, 56.42, -60.12, 0.33)
	pt3dadd(43.67, 56.25, -60.12, 0.33)
	pt3dadd(43.67, 55.75, -60.12, 0.33)
	pt3dadd(43.83, 55.42, -60.12, 0.33)
	pt3dadd(44, 55.08, -60.12, 0.33)
	pt3dadd(44, 54.58, -60.12, 0.33)
	pt3dadd(44.17, 54.25, -60.12, 0.33)
	pt3dadd(44.33, 54.08, -60.12, 0.33)
	pt3dadd(44.5, 53.92, -60.12, 0.33)
	pt3dadd(44.67, 53.75, -60.12, 0.33)
	pt3dadd(44.83, 53.58, -60.12, 0.33)
	pt3dadd(45, 53.25, -60.12, 0.33)
	pt3dadd(45, 53.08, -60.12, 0.33)
  }
  dend[94] {pt3dclear()
	pt3dadd(43, 56.92, -59.4, 0.33)
	pt3dadd(43, 57.08, -61.56, 0.33)
	pt3dadd(43, 58.42, -61.56, 0.33)
	pt3dadd(43.17, 58.58, -61.56, 0.33)
	pt3dadd(43.33, 58.75, -61.56, 0.33)
	pt3dadd(43.5, 58.92, -61.56, 0.33)
	pt3dadd(43.67, 59.25, -61.56, 0.33)
	pt3dadd(43.83, 59.42, -61.56, 0.33)
	pt3dadd(44, 59.58, -61.56, 0.33)
	pt3dadd(44, 59.92, -61.56, 0.33)
	pt3dadd(44.17, 60.08, -61.56, 0.33)
	pt3dadd(44.33, 60.42, -61.56, 0.33)
	pt3dadd(44.5, 60.58, -61.56, 0.33)
	pt3dadd(44.67, 60.92, -64.44, 0.33)
	pt3dadd(44.67, 61.25, -64.44, 0.33)
	pt3dadd(44.83, 61.58, -64.44, 0.33)
	pt3dadd(45, 61.75, -64.44, 0.33)
	pt3dadd(45, 62.25, -64.44, 0.33)
	pt3dadd(45.17, 62.42, -64.44, 0.33)
	pt3dadd(45.17, 62.75, -64.44, 0.33)
	pt3dadd(45.33, 62.92, -64.44, 0.33)
	pt3dadd(45.33, 63.25, -64.44, 0.33)
	pt3dadd(45.5, 63.58, -64.44, 0.33)
	pt3dadd(45.67, 63.75, -64.44, 0.33)
	pt3dadd(45.5, 63.75, -64.44, 0.33)
  }
  dend[95] {pt3dclear()
	pt3dadd(41.33, 56.75, -59.4, 0.33)
	pt3dadd(41.67, 56.58, -59.4, 0.33)
	pt3dadd(41.67, 57.75, -59.4, 0.33)
	pt3dadd(41.5, 58.08, -59.4, 0.33)
	pt3dadd(41.5, 58.42, -59.4, 0.33)
	pt3dadd(41.67, 58.58, -59.4, 0.33)
	pt3dadd(41.67, 58.75, -59.4, 0.33)
  }
  dend[96] {pt3dclear()
	pt3dadd(38.33, 55.58, -58.68, 0.33)
	pt3dadd(38.67, 55.58, -58.68, 0.33)
	pt3dadd(38.67, 55.92, -58.68, 0.33)
	pt3dadd(38.17, 56.42, -58.68, 0.33)
	pt3dadd(38, 56.58, -58.68, 0.33)
	pt3dadd(37.67, 56.75, -58.68, 0.33)
	pt3dadd(37.33, 56.92, -58.68, 0.33)
  }
  dend[97] {pt3dclear()
	pt3dadd(36.67, 54.08, -57.96, 0.33)
	pt3dadd(36.83, 54.25, -57.6, 0.33)
	pt3dadd(37.17, 53.92, -57.6, 0.33)
	pt3dadd(37.33, 53.75, -57.6, 0.33)
	pt3dadd(37.5, 53.42, -57.6, 0.33)
	pt3dadd(37.67, 53.25, -57.6, 0.33)
	pt3dadd(37.83, 52.92, -57.6, 0.33)
	pt3dadd(38, 52.75, -57.6, 0.33)
	pt3dadd(38.17, 52.58, -57.6, 0.33)
	pt3dadd(38.5, 52.42, -57.6, 0.33)
	pt3dadd(38.67, 52.25, -57.6, 0.33)
	pt3dadd(39, 52.25, -57.6, 0.33)
	pt3dadd(39.17, 52.08, -57.6, 0.33)
	pt3dadd(39.5, 52.08, -57.6, 0.33)
	pt3dadd(39.5, 51.92, -57.6, 0.33)
  }
  dend[98] {pt3dclear()
	pt3dadd(39.5, 51.92, -57.6, 0.33)
	pt3dadd(39.67, 51.92, -57.6, 0.33)
	pt3dadd(40, 52.08, -57.6, 0.33)
	pt3dadd(40.65, 52.08, -57.6, 0.33)
  }
  dend[99] {pt3dclear()
	pt3dadd(40.65, 52.08, -57.6, 0.33)
	pt3dadd(44.17, 52.08, -57.6, 0.33)
	pt3dadd(44.83, 52.08, -57.6, 0.33)
	pt3dadd(45, 51.92, -57.6, 0.33)
	pt3dadd(45.33, 51.75, -57.6, 0.33)
	pt3dadd(45.67, 51.75, -57.6, 0.33)
	pt3dadd(46, 51.58, -57.6, 0.33)
	pt3dadd(46.17, 51.42, -57.6, 0.33)
	pt3dadd(46.33, 51.25, -57.6, 0.33)
  }
  dend[100] {pt3dclear()
	pt3dadd(40.65, 52.08, -57.6, 0.33)
	pt3dadd(44.17, 51.92, -60.84, 0.33)
	pt3dadd(44.5, 51.75, -60.84, 0.33)
	pt3dadd(44.5, 51.25, -60.84, 0.33)
	pt3dadd(44.67, 51.08, -60.84, 0.33)
	pt3dadd(44.83, 50.75, -60.84, 0.33)
	pt3dadd(45, 50.42, -60.84, 0.33)
	pt3dadd(45.17, 50.08, -60.84, 0.33)
	pt3dadd(45.33, 49.92, -60.84, 0.33)
	pt3dadd(45.5, 49.75, -60.84, 0.33)
	pt3dadd(45.5, 49.42, -60.84, 0.33)
	pt3dadd(45.67, 49.25, -60.84, 0.33)
	pt3dadd(45.83, 48.92, -60.84, 0.33)
	pt3dadd(46, 48.75, -60.84, 0.33)
	pt3dadd(46, 48.25, -60.84, 0.33)
  }
  dend[101] {pt3dclear()
	pt3dadd(39.5, 51.92, -57.6, 0.33)
	pt3dadd(39.83, 51.75, -57.6, 0.33)
	pt3dadd(39.83, 51.25, -57.6, 0.33)
	pt3dadd(39.67, 50.92, -57.6, 0.33)
	pt3dadd(39.5, 50.75, -57.6, 0.33)
	pt3dadd(39.5, 49.58, -56.52, 0.33)
	pt3dadd(39.67, 49.42, -56.52, 0.33)
	pt3dadd(39.83, 49.25, -56.52, 0.33)
	pt3dadd(40, 49.08, -56.52, 0.33)
	pt3dadd(40.17, 48.92, -56.52, 0.33)
	pt3dadd(40.5, 48.92, -56.52, 0.33)
	pt3dadd(40.67, 48.75, -56.52, 0.33)
	pt3dadd(40.83, 48.58, -56.52, 0.33)
	pt3dadd(41, 48.42, -56.52, 0.33)
	pt3dadd(41.17, 48.25, -56.52, 0.33)
	pt3dadd(41.67, 48.25, -56.52, 0.33)
	pt3dadd(41.83, 48.08, -56.52, 0.33)
	pt3dadd(42, 47.92, -56.52, 0.33)
	pt3dadd(42.17, 47.75, -56.52, 0.33)
	pt3dadd(42, 47.75, -56.52, 0.33)
  }
  dend[102] {pt3dclear()
	pt3dadd(42, 47.75, -56.52, 0.33)
	pt3dadd(41.83, 48.08, -56.16, 0.33)
	pt3dadd(42, 48.25, -56.16, 0.33)
	pt3dadd(42.67, 48.25, -56.16, 0.33)
	pt3dadd(43, 48.42, -56.16, 0.33)
	pt3dadd(43.83, 48.42, -56.16, 0.33)
	pt3dadd(44, 48.58, -56.16, 0.33)
	pt3dadd(44.33, 48.58, -56.16, 0.33)
	pt3dadd(44.67, 48.42, -56.16, 0.33)
	pt3dadd(44.83, 48.25, -56.16, 0.33)
	pt3dadd(45.17, 48.25, -56.16, 0.33)
	pt3dadd(45.33, 48.08, -56.16, 0.33)
	pt3dadd(45.67, 47.92, -56.16, 0.33)
	pt3dadd(45.83, 47.75, -56.16, 0.33)
	pt3dadd(46, 47.75, -56.16, 0.33)
  }
  dend[103] {pt3dclear()
	pt3dadd(42, 47.75, -56.52, 0.33)
	pt3dadd(42.33, 47.75, -56.52, 0.33)
	pt3dadd(42.5, 47.42, -56.52, 0.33)
	pt3dadd(42.5, 46.42, -56.52, 0.33)
	pt3dadd(42.67, 46.08, -56.52, 0.33)
	pt3dadd(42.83, 45.92, -56.52, 0.33)
	pt3dadd(42.83, 45.58, -56.52, 0.33)
  }
  dend[104] {pt3dclear()
	pt3dadd(18.5, 43.25, -50.04, 1)
	pt3dadd(19, 43.42, -50.04, 1)
	pt3dadd(19.17, 43.25, -50.04, 1)
	pt3dadd(19.17, 42.25, -50.04, 1)
	pt3dadd(19.32, 41.92, -50.04, 1)
	pt3dadd(19.5, 41.58, -50.04, 1)
	pt3dadd(19.5, 41.25, -50.04, 1)
  }
  dend[105] {pt3dclear()
	pt3dadd(19.5, 41.25, -50.04, 1)
	pt3dadd(19.32, 41.42, -50.4, 0.5)
	pt3dadd(19.67, 41.42, -50.4, 0.5)
	pt3dadd(20.17, 41.25, -50.4, 0.5)
	pt3dadd(20.83, 41.08, -50.4, 0.5)
	pt3dadd(21.33, 40.92, -50.4, 0.5)
	pt3dadd(21.67, 40.75, -50.4, 0.5)
	pt3dadd(21.83, 40.92, -50.4, 0.5)
  }
  dend[106] {pt3dclear()
	pt3dadd(21.83, 40.92, -50.4, 0.5)
	pt3dadd(21.83, 40.92, -50.04, 0.67)
	pt3dadd(22.17, 41.08, -50.04, 0.67)
	pt3dadd(22.33, 41.25, -50.04, 0.67)
	pt3dadd(22.5, 41.42, -50.04, 0.67)
	pt3dadd(22.67, 41.58, -50.04, 0.67)
	pt3dadd(22.83, 41.75, -50.04, 0.67)
  }
}
proc shape3d_8() {
  dend[106] {	pt3dadd(23, 41.92, -50.04, 0.67)
	pt3dadd(23.17, 42.08, -50.04, 0.67)
	pt3dadd(23.33, 42.25, -50.04, 0.67)
	pt3dadd(23.5, 42.42, -50.04, 0.67)
	pt3dadd(23.67, 42.58, -49.68, 0.67)
	pt3dadd(24.17, 42.92, -49.68, 0.67)
	pt3dadd(24.33, 43.08, -49.68, 0.67)
	pt3dadd(24.67, 43.08, -49.68, 0.67)
	pt3dadd(25, 43.25, -49.68, 0.67)
	pt3dadd(26.67, 43.25, -49.68, 0.67)
	pt3dadd(26.83, 43.08, -49.68, 0.67)
	pt3dadd(27.17, 43.08, -49.68, 0.67)
	pt3dadd(27.33, 42.92, -49.68, 0.67)
	pt3dadd(27.67, 42.75, -49.68, 0.67)
	pt3dadd(27.83, 42.58, -49.68, 0.67)
	pt3dadd(28, 42.42, -49.68, 0.67)
	pt3dadd(28.5, 42.42, -49.68, 0.67)
	pt3dadd(28.67, 42.25, -49.68, 0.67)
	pt3dadd(28.83, 42.08, -49.68, 0.67)
	pt3dadd(29, 42.08, -49.68, 0.67)
	pt3dadd(28.67, 42.08, -49.68, 0.67)
  }
  dend[107] {pt3dclear()
	pt3dadd(28.67, 42.08, -49.68, 0.67)
	pt3dadd(28.83, 42.25, -49.32, 0.67)
	pt3dadd(29.17, 42.08, -49.32, 0.67)
	pt3dadd(29.33, 41.75, -49.32, 0.67)
	pt3dadd(29.5, 41.58, -49.32, 0.67)
	pt3dadd(29.83, 41.42, -49.32, 0.67)
	pt3dadd(29.83, 41.08, -49.32, 0.67)
	pt3dadd(30, 40.92, -49.32, 0.67)
	pt3dadd(30.17, 40.75, -49.32, 0.67)
	pt3dadd(30.33, 40.58, -49.32, 0.67)
	pt3dadd(30.33, 40.42, -49.32, 0.67)
  }
  dend[108] {pt3dclear()
	pt3dadd(28.67, 42.08, -49.68, 0.67)
	pt3dadd(29.5, 42.25, -49.68, 0.67)
	pt3dadd(29.83, 42.25, -49.68, 0.67)
	pt3dadd(30, 42.42, -49.68, 0.67)
	pt3dadd(30.33, 42.58, -49.68, 0.67)
	pt3dadd(30.5, 42.75, -49.68, 0.67)
	pt3dadd(30.67, 42.92, -49.68, 0.67)
	pt3dadd(30.83, 42.92, -49.68, 0.67)
  }
  dend[109] {pt3dclear()
	pt3dadd(21.83, 40.92, -50.4, 0.5)
	pt3dadd(22.17, 40.75, -50.4, 0.5)
	pt3dadd(22.17, 39.75, -50.4, 0.5)
	pt3dadd(22.33, 39.58, -50.4, 0.5)
	pt3dadd(22.33, 39.25, -50.4, 0.5)
	pt3dadd(22.5, 39.08, -50.4, 0.5)
	pt3dadd(22.67, 38.75, -50.4, 0.5)
	pt3dadd(22.67, 38.42, -50.4, 0.5)
	pt3dadd(22.83, 38.08, -50.4, 0.5)
	pt3dadd(23, 37.92, -50.4, 0.5)
	pt3dadd(23, 37.58, -50.4, 0.5)
	pt3dadd(23.17, 37.42, -50.4, 0.5)
	pt3dadd(23.5, 37.25, -50.4, 0.5)
	pt3dadd(23.83, 37.08, -50.4, 0.5)
	pt3dadd(24.17, 36.92, -50.4, 0.5)
	pt3dadd(24.33, 36.75, -50.4, 0.5)
	pt3dadd(24.67, 36.58, -50.4, 0.5)
	pt3dadd(25, 36.25, -50.4, 0.5)
	pt3dadd(25.17, 36.08, -50.4, 0.5)
	pt3dadd(25.5, 36.08, -50.4, 0.5)
	pt3dadd(25.67, 35.92, -50.4, 0.5)
	pt3dadd(25.83, 35.75, -50.4, 0.5)
	pt3dadd(25.67, 35.75, -50.4, 0.5)
  }
  dend[110] {pt3dclear()
	pt3dadd(25.67, 35.75, -50.4, 0.5)
	pt3dadd(26.17, 36.08, -50.4, 0.5)
	pt3dadd(26.33, 36.25, -50.4, 0.5)
	pt3dadd(26.5, 36.42, -50.4, 0.5)
	pt3dadd(26.67, 36.58, -50.4, 0.5)
	pt3dadd(27, 36.92, -50.4, 0.5)
	pt3dadd(27.17, 37.08, -50.4, 0.5)
	pt3dadd(27.33, 37.42, -50.4, 0.5)
	pt3dadd(27.5, 37.58, -50.4, 0.5)
	pt3dadd(27.5, 37.92, -50.4, 0.5)
	pt3dadd(27.67, 38.08, -50.4, 0.5)
	pt3dadd(27.83, 38.25, -50.4, 0.5)
	pt3dadd(27.83, 38.58, -50.4, 0.5)
	pt3dadd(28, 38.75, -50.4, 0.5)
	pt3dadd(28, 39.08, -50.4, 0.5)
	pt3dadd(28.17, 39.25, -50.4, 0.5)
  }
  dend[111] {pt3dclear()
	pt3dadd(28.17, 39.25, -50.4, 0.5)
	pt3dadd(28.33, 39.25, -51.84, 0.5)
	pt3dadd(28.33, 39.58, -51.84, 0.5)
	pt3dadd(28.5, 39.75, -51.84, 0.5)
	pt3dadd(28.5, 40.08, -51.84, 0.5)
	pt3dadd(28.67, 40.25, -51.84, 0.5)
	pt3dadd(28.83, 40.42, -51.84, 0.5)
	pt3dadd(28.83, 40.75, -51.84, 0.5)
	pt3dadd(29.17, 40.92, -51.84, 0.5)
	pt3dadd(29.5, 41.25, -51.84, 0.5)
	pt3dadd(29.83, 41.42, -51.84, 0.5)
	pt3dadd(30.17, 41.58, -51.84, 0.5)
	pt3dadd(30.5, 41.75, -51.84, 0.5)
	pt3dadd(30.83, 41.75, -51.84, 0.5)
	pt3dadd(31.17, 41.92, -51.84, 0.5)
	pt3dadd(31.5, 41.92, -51.84, 0.5)
	pt3dadd(31.83, 42.08, -51.84, 0.5)
	pt3dadd(32, 42.25, -51.84, 0.5)
	pt3dadd(32.17, 42.25, -51.84, 0.5)
  }
  dend[112] {pt3dclear()
	pt3dadd(32.17, 42.25, -51.84, 0.5)
	pt3dadd(32.67, 42.25, -54, 0.5)
	pt3dadd(32.83, 42.08, -54, 0.5)
	pt3dadd(33.17, 42.08, -54, 0.5)
	pt3dadd(33.33, 41.92, -54, 0.5)
	pt3dadd(33.5, 41.75, -54, 0.5)
	pt3dadd(33.67, 41.58, -54, 0.5)
	pt3dadd(33.83, 41.25, -54, 0.5)
	pt3dadd(34, 41.08, -54, 0.5)
	pt3dadd(34.17, 40.92, -54, 0.5)
	pt3dadd(34.33, 40.75, -54, 0.5)
	pt3dadd(34.67, 40.75, -54, 0.5)
	pt3dadd(34.83, 40.58, -54, 0.5)
	pt3dadd(35, 40.42, -54, 0.5)
	pt3dadd(35.17, 40.25, -54, 0.5)
	pt3dadd(35.33, 40.08, -54, 0.5)
	pt3dadd(35.67, 40.08, -54, 0.5)
	pt3dadd(35.83, 39.92, -54, 0.5)
	pt3dadd(36, 39.58, -54, 0.5)
	pt3dadd(36.17, 39.42, -54, 0.5)
	pt3dadd(36.67, 38.92, -54, 0.5)
	pt3dadd(36.83, 38.92, -54, 0.5)
  }
  dend[113] {pt3dclear()
	pt3dadd(32.17, 42.25, -51.84, 0.5)
	pt3dadd(32, 42.08, -56.16, 0.5)
	pt3dadd(32, 43.25, -56.16, 0.5)
	pt3dadd(32.17, 43.42, -56.16, 0.5)
	pt3dadd(32.33, 43.58, -56.16, 0.5)
	pt3dadd(32.33, 43.92, -56.16, 0.5)
	pt3dadd(32.5, 44.08, -56.16, 0.5)
	pt3dadd(32.5, 44.42, -56.16, 0.5)
  }
  dend[114] {pt3dclear()
	pt3dadd(32.5, 44.42, -56.16, 0.5)
	pt3dadd(32.67, 44.25, -55.08, 0.5)
	pt3dadd(32.83, 44.58, -55.08, 0.5)
	pt3dadd(33.17, 44.75, -55.08, 0.5)
	pt3dadd(33.67, 45.08, -55.08, 0.5)
	pt3dadd(34, 45.25, -55.08, 0.5)
	pt3dadd(34.83, 45.25, -55.08, 0.5)
	pt3dadd(35.33, 45.42, -55.08, 0.5)
	pt3dadd(35.67, 45.58, -55.08, 0.5)
	pt3dadd(35.83, 45.75, -55.08, 0.5)
	pt3dadd(36.17, 45.75, -55.08, 0.5)
	pt3dadd(36.5, 45.92, -56.16, 0.5)
	pt3dadd(37, 46.08, -56.16, 0.5)
	pt3dadd(37.17, 46.25, -56.16, 0.5)
  }
  dend[115] {pt3dclear()
	pt3dadd(37.17, 46.25, -56.16, 0.5)
	pt3dadd(36.83, 46.42, -56.88, 0.5)
	pt3dadd(37.17, 46.58, -56.88, 0.5)
	pt3dadd(37.5, 46.75, -56.88, 0.5)
	pt3dadd(38, 46.92, -56.88, 0.5)
	pt3dadd(38.5, 47.08, -56.88, 0.5)
	pt3dadd(38.67, 47.42, -56.88, 0.5)
	pt3dadd(38.83, 47.58, -56.88, 0.5)
	pt3dadd(39, 47.75, -57.24, 0.5)
	pt3dadd(39.17, 48.08, -58.32, 0.5)
	pt3dadd(39.5, 48.08, -58.32, 0.5)
	pt3dadd(39.5, 48.42, -58.32, 0.5)
	pt3dadd(39.67, 48.58, -58.32, 0.5)
	pt3dadd(39.83, 48.75, -58.32, 0.5)
	pt3dadd(40, 48.92, -58.32, 0.5)
	pt3dadd(40.67, 49.25, -57.96, 0.5)
	pt3dadd(41, 49.42, -57.96, 0.5)
	pt3dadd(41.17, 49.58, -57.96, 0.5)
	pt3dadd(41.5, 49.58, -57.6, 0.5)
	pt3dadd(41.67, 49.75, -57.24, 0.5)
	pt3dadd(43, 49.92, -57.24, 0.5)
	pt3dadd(43.67, 49.92, -57.6, 0.5)
	pt3dadd(43.83, 49.75, -57.6, 0.5)
	pt3dadd(44, 49.58, -57.6, 0.5)
	pt3dadd(44.17, 49.42, -57.6, 0.5)
	pt3dadd(44.5, 49.25, -57.6, 0.5)
	pt3dadd(44.67, 49.08, -57.6, 0.5)
	pt3dadd(44.83, 48.92, -57.6, 0.5)
	pt3dadd(45.17, 48.75, -57.6, 0.5)
	pt3dadd(46.17, 48.75, -57.6, 0.5)
	pt3dadd(46.33, 48.92, -57.6, 0.5)
	pt3dadd(46.67, 49.08, -57.6, 0.5)
	pt3dadd(47, 49.25, -57.96, 0.5)
	pt3dadd(47.83, 49.25, -59.04, 0.5)
	pt3dadd(47.67, 49.25, -59.04, 0.5)
  }
  dend[116] {pt3dclear()
	pt3dadd(47.67, 49.25, -59.04, 0.5)
	pt3dadd(47.83, 49.25, -61.2, 0.5)
	pt3dadd(48, 49.42, -61.2, 0.5)
	pt3dadd(48.33, 49.75, -61.2, 0.5)
	pt3dadd(48.5, 49.92, -61.2, 0.5)
	pt3dadd(48.67, 50.08, -61.2, 0.5)
	pt3dadd(48.83, 50.42, -61.2, 0.5)
	pt3dadd(49, 50.58, -61.2, 0.5)
	pt3dadd(49.33, 50.92, -61.2, 0.5)
	pt3dadd(49.67, 50.92, -61.2, 0.5)
	pt3dadd(49.83, 51.08, -61.2, 0.5)
	pt3dadd(50.17, 51.08, -61.2, 0.5)
	pt3dadd(50.5, 51.25, -61.2, 0.5)
	pt3dadd(51, 51.25, -61.2, 0.5)
	pt3dadd(51.17, 51.42, -61.2, 0.5)
	pt3dadd(51, 51.42, -61.2, 0.5)
  }
  dend[117] {pt3dclear()
	pt3dadd(47.67, 49.25, -59.04, 0.5)
	pt3dadd(47.67, 49.42, -59.4, 0.5)
	pt3dadd(47.83, 49.25, -59.4, 0.5)
	pt3dadd(48, 49.08, -59.4, 0.5)
	pt3dadd(48.17, 48.75, -59.4, 0.5)
	pt3dadd(48.5, 48.42, -59.4, 0.5)
	pt3dadd(48.5, 48.08, -59.4, 0.5)
  }
}
proc shape3d_9() {
  dend[117] {	pt3dadd(48.67, 47.92, -59.4, 0.5)
	pt3dadd(48.83, 47.58, -59.4, 0.5)
	pt3dadd(48.83, 47.25, -59.4, 0.5)
	pt3dadd(49, 47.08, -59.4, 0.5)
	pt3dadd(49, 46.58, -59.4, 0.5)
	pt3dadd(49.17, 46.25, -59.4, 0.5)
	pt3dadd(49.17, 45.75, -59.4, 0.5)
	pt3dadd(49.33, 45.58, -59.4, 0.5)
	pt3dadd(49.5, 45.42, -59.4, 0.5)
	pt3dadd(49.67, 45.08, -59.4, 0.5)
	pt3dadd(49.83, 44.92, -59.4, 0.5)
	pt3dadd(50, 44.75, -59.4, 0.5)
	pt3dadd(50.17, 44.58, -59.4, 0.5)
	pt3dadd(50.33, 44.42, -59.4, 0.5)
	pt3dadd(50.5, 44.25, -59.4, 0.5)
	pt3dadd(50.83, 44.08, -59.4, 0.5)
	pt3dadd(51, 43.92, -59.4, 0.5)
	pt3dadd(51.17, 43.75, -59.4, 0.5)
	pt3dadd(51.5, 43.75, -59.4, 0.5)
	pt3dadd(51.67, 43.58, -59.4, 0.5)
	pt3dadd(52, 43.42, -59.4, 0.5)
	pt3dadd(52.17, 43.25, -59.4, 0.5)
	pt3dadd(52.33, 43.08, -59.4, 0.5)
	pt3dadd(52.5, 42.92, -59.4, 0.5)
  }
  dend[118] {pt3dclear()
	pt3dadd(37.17, 46.25, -56.16, 0.5)
	pt3dadd(37.5, 46.08, -56.16, 0.5)
	pt3dadd(37.83, 46.08, -56.16, 0.5)
	pt3dadd(38, 45.92, -56.16, 0.5)
	pt3dadd(38.17, 45.75, -56.16, 0.5)
	pt3dadd(38.33, 45.58, -56.16, 0.5)
	pt3dadd(38.5, 45.42, -56.16, 0.5)
	pt3dadd(38.83, 45.42, -56.16, 0.5)
	pt3dadd(39, 45.08, -56.16, 0.5)
	pt3dadd(39.17, 44.75, -56.16, 0.5)
	pt3dadd(39.33, 44.42, -56.16, 0.5)
	pt3dadd(39.5, 44.25, -56.16, 0.5)
	pt3dadd(39.67, 44.08, -56.16, 0.5)
	pt3dadd(39.83, 43.92, -56.16, 0.5)
	pt3dadd(40, 43.75, -54.36, 0.5)
	pt3dadd(40.17, 43.58, -54.36, 0.5)
	pt3dadd(40.33, 43.42, -54.36, 0.5)
	pt3dadd(40.5, 43.25, -54.36, 0.5)
	pt3dadd(40.67, 43.08, -54.36, 0.5)
	pt3dadd(41, 42.92, -54.36, 0.5)
	pt3dadd(41.33, 42.75, -54.36, 0.5)
	pt3dadd(41.83, 42.25, -54.36, 0.5)
	pt3dadd(42, 42.08, -54.36, 0.5)
	pt3dadd(42.17, 41.92, -54.36, 0.5)
	pt3dadd(42.5, 41.75, -54.36, 0.5)
	pt3dadd(42.83, 41.58, -54.72, 0.5)
	pt3dadd(43.83, 41.25, -54.72, 0.5)
	pt3dadd(44, 41.08, -54.72, 0.5)
	pt3dadd(44.5, 41.08, -54.72, 0.5)
	pt3dadd(44.67, 40.92, -55.8, 0.5)
	pt3dadd(45.17, 41.42, -55.8, 0.5)
	pt3dadd(45.33, 41.58, -55.8, 0.5)
	pt3dadd(45.67, 41.58, -55.8, 0.5)
	pt3dadd(45.83, 41.75, -55.8, 0.5)
	pt3dadd(46, 41.92, -55.8, 0.5)
	pt3dadd(46.17, 42.08, -55.8, 0.5)
	pt3dadd(46.85, 42.8, -55.8, 0.5)
  }
  dend[119] {pt3dclear()
	pt3dadd(46.85, 42.8, -55.8, 0.5)
	pt3dadd(46.33, 42.25, -55.8, 0.5)
	pt3dadd(46.5, 42.42, -55.8, 0.5)
	pt3dadd(46.83, 42.42, -55.8, 0.5)
	pt3dadd(47.17, 42.58, -55.8, 0.5)
	pt3dadd(47.5, 42.58, -55.8, 0.5)
	pt3dadd(47.83, 42.75, -55.8, 0.5)
	pt3dadd(48.33, 42.75, -55.8, 0.5)
	pt3dadd(48.67, 42.92, -55.8, 0.5)
	pt3dadd(48.83, 43.08, -55.8, 0.5)
	pt3dadd(49, 43.42, -55.8, 0.5)
	pt3dadd(49.17, 43.75, -55.8, 0.5)
	pt3dadd(49.33, 43.92, -55.8, 0.5)
	pt3dadd(49.5, 44.08, -55.8, 0.5)
	pt3dadd(49.5, 44.42, -55.8, 0.5)
	pt3dadd(49.83, 44.58, -55.8, 0.5)
	pt3dadd(50, 44.75, -55.8, 0.5)
	pt3dadd(50.17, 44.92, -55.8, 0.5)
	pt3dadd(50.33, 44.92, -55.8, 0.5)
  }
  dend[120] {pt3dclear()
	pt3dadd(46.85, 42.8, -55.8, 0.5)
	pt3dadd(46.83, 42.08, -55.8, 0.5)
	pt3dadd(46.83, 42.58, -55.8, 0.5)
	pt3dadd(46.67, 42.75, -55.8, 0.5)
	pt3dadd(46.5, 42.92, -55.8, 0.5)
	pt3dadd(46.33, 43.25, -55.8, 0.5)
	pt3dadd(46.33, 43.92, -55.8, 0.5)
	pt3dadd(46.5, 44.08, -55.8, 0.5)
	pt3dadd(46.67, 44.25, -55.8, 0.5)
	pt3dadd(46.83, 44.58, -55.8, 0.5)
	pt3dadd(47, 44.75, -55.8, 0.5)
	pt3dadd(47.17, 44.92, -55.8, 0.5)
	pt3dadd(47.67, 44.92, -55.8, 0.5)
	pt3dadd(48, 45.08, -55.8, 0.5)
	pt3dadd(48.17, 45.25, -55.8, 0.5)
	pt3dadd(48.5, 45.25, -55.8, 0.5)
  }
  dend[121] {pt3dclear()
	pt3dadd(32.5, 44.42, -56.16, 0.5)
	pt3dadd(32.83, 44.25, -56.16, 0.5)
	pt3dadd(32.83, 44.75, -56.16, 0.5)
	pt3dadd(32.67, 44.92, -56.16, 0.5)
	pt3dadd(32.5, 45.25, -56.16, 0.5)
	pt3dadd(32.17, 45.42, -56.16, 0.5)
	pt3dadd(32.17, 46.08, -56.16, 0.5)
	pt3dadd(32, 46.25, -56.16, 0.5)
	pt3dadd(32.17, 46.42, -56.16, 0.5)
	pt3dadd(32.17, 46.75, -56.16, 0.5)
	pt3dadd(32.5, 46.92, -56.16, 0.5)
	pt3dadd(32.83, 47.08, -56.16, 0.5)
	pt3dadd(33.17, 47.25, -56.16, 0.5)
	pt3dadd(33.5, 47.25, -56.16, 0.5)
	pt3dadd(33.67, 47.42, -56.16, 0.5)
	pt3dadd(34, 47.58, -56.16, 0.5)
	pt3dadd(34.5, 47.58, -56.16, 0.5)
	pt3dadd(34.67, 47.75, -56.16, 0.5)
	pt3dadd(35, 47.92, -56.16, 0.5)
	pt3dadd(35.5, 47.92, -56.16, 0.5)
	pt3dadd(35.67, 48.08, -56.16, 0.5)
	pt3dadd(35.83, 48.25, -56.16, 0.5)
	pt3dadd(36, 48.25, -56.16, 0.5)
  }
  dend[122] {pt3dclear()
	pt3dadd(36, 48.25, -56.16, 0.5)
	pt3dadd(36.33, 47.92, -56.16, 0.5)
	pt3dadd(36.5, 48.08, -56.16, 0.5)
	pt3dadd(36.67, 48.25, -56.16, 0.5)
	pt3dadd(36.83, 48.58, -56.16, 0.5)
	pt3dadd(37.17, 48.75, -56.16, 0.5)
	pt3dadd(37.33, 48.92, -56.16, 0.5)
	pt3dadd(37.67, 49.25, -56.16, 0.5)
	pt3dadd(37.83, 49.42, -56.16, 0.5)
	pt3dadd(38.17, 49.58, -56.16, 0.5)
	pt3dadd(38.33, 49.75, -56.16, 0.5)
	pt3dadd(38.83, 49.75, -56.16, 0.5)
	pt3dadd(39, 49.92, -56.16, 0.5)
  }
  dend[123] {pt3dclear()
	pt3dadd(36, 48.25, -56.16, 0.5)
	pt3dadd(36.67, 48.08, -56.16, 0.5)
	pt3dadd(36.67, 51.08, -56.16, 0.5)
	pt3dadd(36.83, 51.25, -56.16, 0.5)
	pt3dadd(36.83, 51.92, -56.16, 0.5)
  }
  dend[124] {pt3dclear()
	pt3dadd(28.17, 39.25, -50.4, 0.5)
	pt3dadd(28.67, 39.25, -50.4, 0.5)
	pt3dadd(28.5, 39.42, -50.4, 0.5)
	pt3dadd(28.33, 39.58, -50.4, 0.5)
	pt3dadd(28.17, 39.75, -50.4, 0.5)
	pt3dadd(28, 39.92, -50.4, 0.5)
	pt3dadd(27.83, 40.08, -50.4, 0.5)
	pt3dadd(27.67, 40.25, -50.4, 0.5)
	pt3dadd(27.67, 40.58, -50.4, 0.5)
	pt3dadd(27.5, 40.92, -50.4, 0.5)
	pt3dadd(27.5, 41.42, -50.4, 0.5)
	pt3dadd(27.33, 41.58, -50.4, 0.5)
	pt3dadd(27.33, 42.08, -50.4, 0.5)
	pt3dadd(27.17, 42.08, -50.4, 0.5)
  }
  dend[125] {pt3dclear()
	pt3dadd(25.67, 35.75, -50.4, 0.5)
	pt3dadd(26.17, 35.58, -50.04, 0.5)
	pt3dadd(26.33, 35.42, -50.04, 0.5)
	pt3dadd(26.5, 35.08, -50.04, 0.5)
	pt3dadd(26.5, 34.75, -50.04, 0.5)
	pt3dadd(26.67, 34.42, -50.04, 0.5)
	pt3dadd(26.83, 34.25, -50.04, 0.5)
	pt3dadd(26.83, 33.75, -50.04, 0.5)
	pt3dadd(27, 33.58, -50.04, 0.5)
	pt3dadd(27, 32.42, -50.04, 0.5)
	pt3dadd(27.17, 32.08, -50.04, 0.5)
	pt3dadd(27.17, 31.58, -50.04, 0.5)
  }
  dend[126] {pt3dclear()
	pt3dadd(19.5, 41.25, -50.04, 1)
	pt3dadd(19.5, 41.58, -50.04, 0.5)
	pt3dadd(19.5, 41.25, -50.04, 0.5)
	pt3dadd(19.67, 41.08, -50.04, 0.5)
	pt3dadd(19.67, 40.58, -50.04, 0.5)
	pt3dadd(19.5, 40.42, -50.04, 0.5)
	pt3dadd(19.5, 40.08, -50.04, 0.5)
	pt3dadd(19.32, 40.08, -50.04, 0.5)
  }
  dend[127] {pt3dclear()
	pt3dadd(19.32, 40.08, -50.04, 0.5)
	pt3dadd(19.32, 40.25, -49.68, 0.5)
	pt3dadd(19.5, 40.08, -49.68, 0.5)
	pt3dadd(19.5, 39.58, -49.68, 0.5)
	pt3dadd(19.67, 39.25, -49.68, 0.5)
	pt3dadd(19.67, 38.58, -49.68, 0.5)
	pt3dadd(19.82, 38.42, -49.68, 0.5)
  }
  dend[128] {pt3dclear()
	pt3dadd(19.82, 38.42, -49.68, 0.5)
	pt3dadd(20.17, 38.25, -49.32, 0.5)
	pt3dadd(20.17, 37.92, -49.32, 0.5)
	pt3dadd(20.32, 37.58, -49.32, 0.5)
	pt3dadd(20.5, 37.25, -49.32, 0.5)
	pt3dadd(20.67, 36.92, -49.32, 0.5)
	pt3dadd(20.83, 36.75, -49.32, 0.5)
	pt3dadd(20.83, 35.92, -49.32, 0.5)
  }
  dend[129] {pt3dclear()
	pt3dadd(20.83, 35.92, -49.32, 0.5)
	pt3dadd(21, 35.92, -49.68, 0.5)
	pt3dadd(21.33, 35.92, -49.68, 0.5)
	pt3dadd(21.67, 35.58, -49.68, 0.5)
	pt3dadd(21.83, 35.42, -49.68, 0.5)
	pt3dadd(22, 35.25, -49.68, 0.5)
	pt3dadd(22.17, 35.08, -49.68, 0.5)
	pt3dadd(22.33, 34.92, -49.68, 0.5)
	pt3dadd(22.5, 34.75, -49.68, 0.5)
	pt3dadd(22.67, 34.58, -49.68, 0.5)
	pt3dadd(22.83, 34.42, -49.68, 0.5)
	pt3dadd(23, 34.25, -49.68, 0.5)
	pt3dadd(23.17, 34.25, -49.68, 0.5)
  }
  dend[130] {pt3dclear()
	pt3dadd(23.17, 34.25, -49.68, 0.5)
  }
}
proc shape3d_10() {
  dend[130] {	pt3dadd(23, 34.25, -48.6, 0.5)
	pt3dadd(23.33, 34.25, -48.6, 0.5)
	pt3dadd(23.67, 33.92, -48.6, 0.5)
	pt3dadd(24.17, 33.92, -48.6, 0.5)
	pt3dadd(24.33, 33.75, -48.6, 0.5)
	pt3dadd(24.5, 33.58, -48.6, 0.5)
	pt3dadd(24.83, 33.58, -48.6, 0.5)
	pt3dadd(25.17, 33.42, -48.6, 0.5)
	pt3dadd(25.5, 33.42, -48.6, 0.5)
	pt3dadd(25.5, 33.25, -48.6, 0.5)
  }
  dend[131] {pt3dclear()
	pt3dadd(25.5, 33.25, -48.6, 0.5)
	pt3dadd(25.67, 33.08, -48.6, 0.5)
	pt3dadd(26, 33.08, -48.6, 0.5)
	pt3dadd(26.33, 32.75, -48.6, 0.5)
	pt3dadd(26.67, 32.58, -48.6, 0.5)
	pt3dadd(26.83, 32.42, -48.6, 0.5)
	pt3dadd(27.17, 32.25, -48.6, 0.5)
	pt3dadd(27.5, 32.08, -48.6, 0.5)
	pt3dadd(27.83, 32.08, -48.6, 0.5)
	pt3dadd(28, 31.92, -48.6, 0.5)
	pt3dadd(28.5, 31.92, -48.6, 0.5)
	pt3dadd(28.67, 31.75, -48.6, 0.5)
	pt3dadd(29, 31.58, -48.6, 0.5)
	pt3dadd(29.33, 31.42, -48.6, 0.5)
  }
  dend[132] {pt3dclear()
	pt3dadd(25.5, 33.25, -48.6, 0.5)
	pt3dadd(26.17, 33.25, -48.6, 0.5)
	pt3dadd(26.33, 33.42, -48.6, 0.5)
	pt3dadd(26.5, 33.58, -48.6, 0.5)
	pt3dadd(26.83, 33.58, -48.6, 0.5)
	pt3dadd(27, 33.75, -48.6, 0.5)
	pt3dadd(27.17, 33.92, -48.6, 0.5)
	pt3dadd(27.33, 34.08, -48.6, 0.5)
	pt3dadd(27.67, 34.08, -48.6, 0.5)
	pt3dadd(27.83, 34.25, -48.6, 0.5)
	pt3dadd(28.17, 34.42, -48.6, 0.5)
	pt3dadd(28.33, 34.58, -48.6, 0.5)
	pt3dadd(28.5, 34.75, -48.6, 0.5)
	pt3dadd(28.67, 34.92, -48.6, 0.5)
	pt3dadd(28.83, 35.08, -48.6, 0.5)
	pt3dadd(29, 35.25, -48.6, 0.5)
	pt3dadd(29.17, 35.42, -48.6, 0.5)
	pt3dadd(29.5, 35.42, -48.6, 0.5)
	pt3dadd(29.67, 35.58, -48.6, 0.5)
	pt3dadd(29.83, 35.75, -48.6, 0.5)
	pt3dadd(30, 35.92, -48.6, 0.5)
  }
  dend[133] {pt3dclear()
	pt3dadd(23.17, 34.25, -49.68, 0.5)
	pt3dadd(23.5, 34.25, -49.68, 0.5)
	pt3dadd(23.5, 33.92, -49.68, 0.5)
	pt3dadd(23.17, 33.75, -49.68, 0.5)
	pt3dadd(22.83, 33.58, -49.68, 0.5)
	pt3dadd(22.67, 33.42, -49.68, 0.5)
	pt3dadd(22.5, 33.08, -49.68, 0.5)
	pt3dadd(22.5, 32.25, -49.68, 0.5)
	pt3dadd(22.67, 32.08, -49.68, 0.5)
	pt3dadd(22.67, 31.92, -49.68, 0.5)
  }
  dend[134] {pt3dclear()
	pt3dadd(20.83, 35.92, -49.32, 0.5)
	pt3dadd(21, 35.92, -49.32, 0.5)
	pt3dadd(20.83, 35.75, -49.32, 0.5)
	pt3dadd(20.5, 35.42, -49.32, 0.5)
	pt3dadd(20.32, 35.25, -49.32, 0.5)
	pt3dadd(20, 35.25, -49.32, 0.5)
	pt3dadd(19.67, 34.92, -49.32, 0.5)
	pt3dadd(19.67, 34.42, -49.32, 0.5)
	pt3dadd(19.5, 34.25, -49.32, 0.5)
	pt3dadd(19.5, 33.42, -49.32, 0.5)
	pt3dadd(19.67, 33.25, -49.32, 0.5)
	pt3dadd(19.82, 32.92, -49.32, 0.5)
	pt3dadd(20, 32.75, -49.32, 0.5)
	pt3dadd(20, 32.58, -49.32, 0.5)
  }
  dend[135] {pt3dclear()
	pt3dadd(19.82, 38.42, -49.68, 0.5)
	pt3dadd(20, 38.58, -49.68, 0.5)
	pt3dadd(19.5, 38.58, -49.68, 0.5)
	pt3dadd(19.32, 38.42, -49.68, 0.5)
	pt3dadd(19.17, 38.08, -49.68, 0.5)
	pt3dadd(19, 37.92, -49.68, 0.5)
	pt3dadd(18.82, 37.75, -49.68, 0.5)
	pt3dadd(18.82, 37.25, -48.24, 0.5)
	pt3dadd(18.67, 37.08, -48.24, 0.5)
	pt3dadd(18.32, 37.08, -49.68, 0.5)
	pt3dadd(18.17, 36.92, -49.68, 0.5)
	pt3dadd(18, 36.75, -49.68, 0.5)
	pt3dadd(17.82, 36.58, -49.68, 0.5)
	pt3dadd(17.5, 36.42, -49.68, 0.5)
	pt3dadd(17.32, 36.25, -49.68, 0.5)
	pt3dadd(17.32, 35.92, -49.68, 0.5)
	pt3dadd(17.17, 35.75, -49.68, 0.5)
	pt3dadd(17.17, 35.42, -49.68, 0.5)
	pt3dadd(17, 35.25, -49.68, 0.5)
	pt3dadd(16.82, 35.08, -49.68, 0.5)
	pt3dadd(16.67, 34.92, -49.68, 0.5)
	pt3dadd(16.5, 34.75, -49.68, 0.5)
  }
  dend[136] {pt3dclear()
	pt3dadd(16.5, 34.75, -49.68, 0.5)
	pt3dadd(16.67, 34.75, -50.04, 0.5)
	pt3dadd(16.82, 34.58, -50.04, 0.5)
	pt3dadd(17, 34.25, -50.04, 0.5)
	pt3dadd(17, 33.92, -50.04, 0.5)
	pt3dadd(17.17, 33.75, -50.04, 0.5)
	pt3dadd(17.32, 33.58, -50.04, 0.5)
	pt3dadd(18.5, 33.58, -50.04, 0.5)
	pt3dadd(18.67, 33.75, -49.68, 0.5)
	pt3dadd(18.82, 33.92, -49.68, 0.5)
	pt3dadd(19, 34.08, -49.68, 0.5)
	pt3dadd(19.17, 34.25, -49.68, 0.5)
	pt3dadd(19.67, 34.25, -49.68, 0.5)
	pt3dadd(19.82, 34.42, -49.68, 0.5)
	pt3dadd(20.32, 34.42, -49.68, 0.5)
	pt3dadd(20.5, 34.58, -49.68, 0.5)
	pt3dadd(20.32, 34.42, -49.68, 0.5)
	pt3dadd(20.5, 34.25, -49.68, 0.5)
	pt3dadd(20.67, 34.08, -49.68, 0.5)
	pt3dadd(20.83, 33.92, -49.68, 0.5)
	pt3dadd(20.83, 32.92, -49.68, 0.5)
  }
  dend[137] {pt3dclear()
	pt3dadd(16.5, 34.75, -49.68, 0.5)
	pt3dadd(16.5, 34.75, -48.96, 0.5)
	pt3dadd(16.5, 35.08, -48.96, 0.5)
	pt3dadd(16.32, 35.25, -48.96, 0.5)
	pt3dadd(16.17, 35.58, -48.96, 0.5)
	pt3dadd(15.83, 35.75, -48.96, 0.5)
	pt3dadd(15.67, 35.92, -48.96, 0.5)
	pt3dadd(15.5, 36.08, -48.96, 0.5)
	pt3dadd(15.33, 36.25, -48.96, 0.5)
	pt3dadd(15.17, 36.42, -48.96, 0.5)
	pt3dadd(15, 36.58, -48.96, 0.5)
	pt3dadd(14.83, 36.75, -48.96, 0.5)
	pt3dadd(14.67, 36.92, -48.96, 0.5)
	pt3dadd(14.67, 37.75, -48.96, 0.5)
	pt3dadd(14.5, 37.92, -48.96, 0.5)
	pt3dadd(14.5, 38.25, -48.96, 0.5)
	pt3dadd(14.33, 38.42, -48.96, 0.5)
  }
  dend[138] {pt3dclear()
	pt3dadd(19.32, 40.08, -50.04, 0.5)
	pt3dadd(19.17, 40.25, -49.32, 0.5)
	pt3dadd(19, 40.08, -49.32, 0.5)
	pt3dadd(18.82, 39.92, -49.32, 0.5)
	pt3dadd(18.67, 39.75, -49.32, 0.5)
	pt3dadd(18.5, 39.58, -49.32, 0.5)
	pt3dadd(18.17, 39.58, -49.32, 0.5)
	pt3dadd(18, 39.42, -49.32, 0.5)
	pt3dadd(17.67, 39.42, -49.32, 0.5)
	pt3dadd(17.5, 39.58, -49.32, 0.5)
	pt3dadd(17.17, 39.75, -49.32, 0.5)
	pt3dadd(17, 39.92, -49.32, 0.5)
	pt3dadd(16.67, 40.08, -49.32, 0.5)
  }
  dend[139] {pt3dclear()
	pt3dadd(10.5, 42.28, -50.44, 1.83)
	pt3dadd(10.5, 42.67, -49.32, 1.83)
	pt3dadd(10.67, 42.83, -49.32, 1.83)
	pt3dadd(10.67, 43.17, -49.32, 1.83)
	pt3dadd(10.83, 43.5, -49.32, 1.83)
	pt3dadd(11, 43.67, -49.32, 1.83)
	pt3dadd(11, 44, -49.32, 1.83)
	pt3dadd(11.17, 44.17, -49.32, 1.83)
	pt3dadd(11.17, 44.67, -49.32, 1.83)
	pt3dadd(11.33, 45, -49.32, 1.83)
	pt3dadd(11.33, 45.33, -49.32, 1.83)
	pt3dadd(11.5, 45.5, -49.32, 1.83)
	pt3dadd(11.5, 45.83, -49.32, 1.83)
	pt3dadd(11.67, 46.17, -49.32, 1.83)
	pt3dadd(11.83, 46.33, -49.32, 1.83)
	pt3dadd(11.83, 46.67, -49.32, 1.83)
	pt3dadd(12, 46.83, -49.32, 1.83)
	pt3dadd(12, 47.17, -49.32, 1.83)
	pt3dadd(12.17, 47.33, -49.32, 1.83)
	pt3dadd(12, 47.33, -49.32, 1.83)
  }
  dend[140] {pt3dclear()
	pt3dadd(12, 47.33, -49.32, 1.83)
	pt3dadd(11.83, 47.58, -50.04, 0.83)
	pt3dadd(11.67, 47.75, -50.04, 0.83)
	pt3dadd(11.5, 47.92, -50.04, 0.83)
	pt3dadd(11.33, 48.08, -50.04, 0.83)
	pt3dadd(11.17, 48.25, -50.04, 0.83)
	pt3dadd(11, 48.42, -50.04, 0.83)
	pt3dadd(10.83, 48.58, -50.04, 0.83)
	pt3dadd(10.67, 48.75, -50.04, 0.83)
	pt3dadd(10.33, 48.92, -50.04, 0.83)
	pt3dadd(10.33, 49.25, -50.04, 0.83)
	pt3dadd(10.17, 49.42, -50.04, 0.83)
	pt3dadd(10, 49.75, -50.04, 0.83)
	pt3dadd(9.83, 49.92, -50.04, 0.83)
	pt3dadd(9.5, 50.25, -50.04, 0.83)
	pt3dadd(9.33, 50.58, -50.04, 0.83)
	pt3dadd(9.17, 50.92, -50.04, 0.83)
	pt3dadd(9, 51.25, -50.04, 0.83)
	pt3dadd(8.83, 51.42, -50.04, 0.83)
	pt3dadd(8.67, 51.75, -50.04, 0.83)
	pt3dadd(8.5, 51.92, -50.04, 0.83)
	pt3dadd(8.33, 52.08, -50.04, 0.83)
	pt3dadd(8.17, 52.42, -50.04, 0.83)
	pt3dadd(7.83, 52.75, -50.04, 0.83)
	pt3dadd(7.67, 52.92, -50.04, 0.83)
	pt3dadd(7.5, 53.08, -50.04, 0.83)
	pt3dadd(6.67, 53.08, -50.04, 0.83)
	pt3dadd(6.5, 53.25, -50.04, 0.83)
	pt3dadd(6.33, 53.42, -50.04, 0.83)
	pt3dadd(6.17, 53.58, -50.04, 0.83)
	pt3dadd(6, 53.58, -50.04, 0.83)
	pt3dadd(6.5, 53.75, -50.04, 0.83)
	pt3dadd(6.17, 53.92, -50.04, 0.83)
	pt3dadd(6, 54.08, -50.04, 0.83)
	pt3dadd(5.83, 54.25, -50.04, 0.83)
	pt3dadd(5.67, 54.42, -50.04, 0.83)
	pt3dadd(5.67, 54.75, -50.04, 0.83)
	pt3dadd(5.5, 54.92, -50.04, 0.83)
  }
}
proc shape3d_11() {
  dend[140] {	pt3dadd(5.33, 55.08, -50.04, 0.83)
	pt3dadd(5.17, 55.42, -50.04, 0.83)
	pt3dadd(4.83, 55.42, -50.04, 0.83)
	pt3dadd(4.67, 55.58, -50.04, 0.83)
	pt3dadd(4.5, 55.75, -50.04, 0.83)
	pt3dadd(4.33, 55.92, -50.04, 0.83)
	pt3dadd(4.17, 56.08, -50.04, 0.83)
	pt3dadd(4, 56.25, -50.04, 0.83)
	pt3dadd(3.83, 56.42, -50.04, 0.83)
  }
  dend[141] {pt3dclear()
	pt3dadd(3.83, 56.42, -50.04, 0.83)
	pt3dadd(3.83, 56.42, -47.16, 0.5)
	pt3dadd(3.83, 56.08, -47.16, 0.5)
	pt3dadd(3.67, 55.75, -47.16, 0.5)
	pt3dadd(3.5, 55.58, -47.16, 0.5)
	pt3dadd(0.83, 55.58, -47.16, 0.5)
	pt3dadd(0.5, 55.75, -47.16, 0.5)
	pt3dadd(-0.17, 55.75, -47.16, 0.5)
	pt3dadd(-0.33, 55.58, -47.16, 0.5)
	pt3dadd(-0.5, 55.42, -47.16, 0.5)
	pt3dadd(-0.5, 54.75, -47.16, 0.5)
	pt3dadd(-0.67, 54.58, -47.16, 0.5)
	pt3dadd(-0.83, 54.58, -47.16, 0.5)
  }
  dend[142] {pt3dclear()
	pt3dadd(-0.83, 54.58, -47.16, 0.5)
	pt3dadd(-0.5, 55.08, -47.16, 0.5)
	pt3dadd(-0.5, 54.08, -47.16, 0.5)
	pt3dadd(-0.67, 53.92, -47.16, 0.5)
	pt3dadd(-1.17, 53.42, -47.16, 0.5)
	pt3dadd(-1.33, 53.25, -47.16, 0.5)
	pt3dadd(-1.5, 52.92, -47.16, 0.5)
	pt3dadd(-1.67, 52.58, -47.16, 0.5)
	pt3dadd(-1.67, 51.42, -47.16, 0.5)
	pt3dadd(-1.5, 51.08, -47.16, 0.5)
	pt3dadd(-1.5, 50.58, -47.16, 0.5)
	pt3dadd(-1.33, 50.25, -47.16, 0.5)
	pt3dadd(-1.33, 49.75, -47.16, 0.5)
	pt3dadd(-1.17, 49.58, -47.16, 0.5)
	pt3dadd(-1.17, 49.25, -47.16, 0.5)
	pt3dadd(-1, 49.08, -47.16, 0.5)
	pt3dadd(-1, 48.08, -47.16, 0.5)
	pt3dadd(-0.83, 47.92, -47.16, 0.5)
	pt3dadd(-0.83, 47.25, -47.16, 0.5)
	pt3dadd(-0.67, 47.08, -47.16, 0.5)
	pt3dadd(-0.67, 46.25, -47.16, 0.5)
	pt3dadd(-0.5, 46.08, -47.16, 0.5)
	pt3dadd(-0.5, 44.92, -47.16, 0.5)
  }
  dend[143] {pt3dclear()
	pt3dadd(-0.83, 54.58, -47.16, 0.5)
	pt3dadd(-0.5, 54.75, -47.16, 0.5)
	pt3dadd(-0.83, 54.58, -47.16, 0.5)
	pt3dadd(-2, 54.58, -47.16, 0.5)
	pt3dadd(-2.17, 54.25, -47.16, 0.5)
	pt3dadd(-2.5, 54.08, -47.16, 0.5)
	pt3dadd(-2.67, 53.75, -47.16, 0.5)
	pt3dadd(-2.67, 52.75, -47.16, 0.5)
	pt3dadd(-2.83, 52.42, -47.16, 0.5)
	pt3dadd(-3, 52.25, -47.16, 0.5)
	pt3dadd(-3.17, 51.92, -47.16, 0.5)
	pt3dadd(-3.17, 51.58, -47.16, 0.5)
	pt3dadd(-3.33, 51.42, -47.16, 0.5)
	pt3dadd(-3.33, 51.08, -47.16, 0.5)
	pt3dadd(-3.5, 50.92, -47.16, 0.5)
	pt3dadd(-3.5, 50.42, -47.16, 0.5)
	pt3dadd(-3.67, 50.08, -47.16, 0.5)
	pt3dadd(-3.83, 49.75, -47.16, 0.5)
	pt3dadd(-3.83, 48.58, -47.16, 0.5)
	pt3dadd(-4, 48.25, -47.16, 0.5)
	pt3dadd(-4, 47.42, -47.16, 0.5)
	pt3dadd(-4.17, 47.25, -47.16, 0.5)
  }
  dend[144] {pt3dclear()
	pt3dadd(3.83, 56.42, -50.04, 0.83)
	pt3dadd(3.83, 56.75, -48.24, 0.83)
	pt3dadd(3.5, 56.92, -48.24, 0.83)
	pt3dadd(3.17, 57.08, -48.24, 0.83)
	pt3dadd(2.67, 57.42, -48.24, 0.83)
	pt3dadd(2.33, 57.58, -48.24, 0.83)
	pt3dadd(2.17, 57.75, -48.24, 0.83)
	pt3dadd(2, 57.92, -48.24, 0.83)
	pt3dadd(1.67, 58.08, -48.24, 0.83)
	pt3dadd(1.5, 58.25, -48.24, 0.83)
	pt3dadd(1.5, 58.58, -48.24, 0.83)
	pt3dadd(1.33, 58.75, -48.24, 0.83)
	pt3dadd(1.17, 58.92, -48.24, 0.83)
	pt3dadd(1, 59.08, -48.24, 0.83)
	pt3dadd(0.83, 59.25, -48.24, 0.83)
	pt3dadd(0.67, 59.42, -48.24, 0.83)
  }
  dend[145] {pt3dclear()
	pt3dadd(0.67, 59.42, -48.24, 0.83)
	pt3dadd(0.67, 59.25, -50.76, 0.5)
	pt3dadd(0.83, 59.42, -50.76, 0.5)
	pt3dadd(1, 59.58, -50.76, 0.5)
	pt3dadd(1.17, 59.75, -50.76, 0.5)
	pt3dadd(1.33, 60.08, -50.76, 0.5)
	pt3dadd(1.5, 60.42, -50.76, 0.5)
	pt3dadd(1.67, 60.58, -50.76, 0.5)
	pt3dadd(1.67, 60.92, -50.76, 0.5)
	pt3dadd(1.83, 61.08, -50.76, 0.5)
	pt3dadd(2, 61.42, -50.76, 0.5)
	pt3dadd(2.17, 61.75, -50.76, 0.5)
	pt3dadd(2.33, 61.92, -50.76, 0.5)
	pt3dadd(2.67, 62.08, -50.76, 0.5)
	pt3dadd(2.83, 62.25, -50.76, 0.5)
	pt3dadd(3.17, 62.25, -50.76, 0.5)
	pt3dadd(3.33, 62.42, -50.76, 0.5)
	pt3dadd(3.67, 62.42, -50.76, 0.5)
	pt3dadd(4, 62.25, -50.76, 0.5)
	pt3dadd(4.17, 62.08, -50.76, 0.5)
	pt3dadd(4.33, 61.92, -50.76, 0.5)
	pt3dadd(4.5, 61.58, -50.76, 0.5)
	pt3dadd(4.67, 61.42, -50.76, 0.5)
	pt3dadd(4.83, 61.08, -50.76, 0.5)
	pt3dadd(5, 60.92, -50.76, 0.5)
	pt3dadd(5.17, 60.75, -50.76, 0.5)
	pt3dadd(5.33, 60.58, -50.76, 0.5)
	pt3dadd(5.33, 60.25, -50.76, 0.5)
	pt3dadd(5.5, 60.08, -50.76, 0.5)
	pt3dadd(5.67, 59.92, -50.76, 0.5)
	pt3dadd(5.83, 59.75, -50.76, 0.5)
	pt3dadd(6, 59.58, -50.76, 0.5)
	pt3dadd(6.17, 59.42, -50.76, 0.5)
	pt3dadd(6.33, 59.08, -50.76, 0.5)
	pt3dadd(6.5, 58.92, -50.76, 0.5)
	pt3dadd(6.67, 58.75, -50.76, 0.5)
	pt3dadd(6.83, 58.58, -49.68, 0.5)
	pt3dadd(7, 58.25, -49.68, 0.5)
	pt3dadd(7.17, 58.08, -49.68, 0.5)
	pt3dadd(7.33, 57.92, -49.32, 0.5)
	pt3dadd(7.33, 57.42, -48.6, 0.5)
	pt3dadd(7.5, 57.08, -48.6, 0.5)
	pt3dadd(7.67, 56.92, -48.6, 0.5)
	pt3dadd(7.83, 56.75, -48.6, 0.5)
	pt3dadd(8, 56.58, -48.6, 0.5)
	pt3dadd(8.17, 56.42, -48.6, 0.5)
	pt3dadd(8.5, 56.25, -48.6, 0.5)
	pt3dadd(8.67, 56.08, -48.6, 0.5)
	pt3dadd(9, 55.92, -48.6, 0.5)
	pt3dadd(9.17, 55.75, -48.6, 0.5)
  }
  dend[146] {pt3dclear()
	pt3dadd(9.17, 55.75, -48.6, 0.5)
	pt3dadd(9.5, 55.75, -48.6, 0.5)
	pt3dadd(9.83, 55.58, -48.6, 0.5)
	pt3dadd(10.33, 55.08, -48.6, 0.5)
	pt3dadd(10.33, 54.25, -48.6, 0.5)
	pt3dadd(10.5, 53.92, -48.6, 0.5)
	pt3dadd(10.67, 53.58, -48.6, 0.5)
	pt3dadd(10.67, 53.25, -48.6, 0.5)
	pt3dadd(10.83, 53.08, -48.6, 0.5)
	pt3dadd(11, 52.92, -48.6, 0.5)
	pt3dadd(11.17, 52.75, -48.6, 0.5)
	pt3dadd(11.33, 52.58, -48.6, 0.5)
	pt3dadd(11.33, 52.25, -48.6, 0.5)
	pt3dadd(11.5, 51.92, -48.6, 0.5)
	pt3dadd(11.5, 51.42, -48.6, 0.5)
	pt3dadd(11.67, 51.25, -48.6, 0.5)
	pt3dadd(11.67, 50.92, -48.6, 0.5)
	pt3dadd(11.83, 50.75, -48.6, 0.5)
  }
  dend[147] {pt3dclear()
	pt3dadd(9.17, 55.75, -48.6, 0.5)
	pt3dadd(9.33, 55.75, -48.6, 0.5)
	pt3dadd(9.5, 55.58, -48.6, 0.5)
	pt3dadd(9.33, 55.42, -48.6, 0.5)
	pt3dadd(9.17, 55.25, -48.6, 0.5)
	pt3dadd(9.17, 54.58, -48.6, 0.5)
	pt3dadd(9, 54.25, -48.6, 0.5)
	pt3dadd(9, 53.58, -48.6, 0.5)
	pt3dadd(9.17, 53.42, -48.6, 0.5)
	pt3dadd(9.33, 53.25, -48.6, 0.5)
	pt3dadd(9.33, 52.92, -48.6, 0.5)
	pt3dadd(9.5, 52.75, -48.6, 0.5)
	pt3dadd(9.5, 52.25, -48.6, 0.5)
	pt3dadd(9.67, 52.08, -48.6, 0.5)
	pt3dadd(9.67, 51.92, -48.6, 0.5)
  }
  dend[148] {pt3dclear()
	pt3dadd(0.67, 59.42, -48.24, 0.83)
	pt3dadd(1, 59.25, -47.88, 0.83)
	pt3dadd(0.83, 59.42, -47.88, 0.83)
	pt3dadd(0, 59.42, -47.88, 0.83)
	pt3dadd(-0.33, 59.58, -47.88, 0.83)
	pt3dadd(-1, 59.58, -47.88, 0.83)
	pt3dadd(-1.33, 59.75, -47.88, 0.83)
	pt3dadd(-1.67, 59.75, -47.88, 0.83)
	pt3dadd(-2, 59.92, -47.88, 0.83)
	pt3dadd(-2.33, 60.08, -47.88, 0.83)
	pt3dadd(-2.5, 60.25, -47.88, 0.83)
	pt3dadd(-2.83, 60.25, -47.88, 0.83)
  }
  dend[149] {pt3dclear()
	pt3dadd(-2.83, 60.25, -47.88, 0.83)
	pt3dadd(-3, 60.25, -46.08, 0.67)
	pt3dadd(-3, 59.92, -46.08, 0.67)
	pt3dadd(-3.17, 59.58, -46.08, 0.67)
	pt3dadd(-3.33, 59.42, -46.08, 0.67)
	pt3dadd(-3.5, 59.25, -46.08, 0.67)
	pt3dadd(-3.67, 59.08, -46.08, 0.67)
	pt3dadd(-3.83, 58.92, -46.08, 0.67)
	pt3dadd(-4.17, 58.75, -46.08, 0.67)
	pt3dadd(-4.5, 58.58, -46.08, 0.67)
	pt3dadd(-5, 58.08, -46.08, 0.67)
	pt3dadd(-5.17, 57.92, -46.08, 0.67)
	pt3dadd(-5.33, 57.75, -46.08, 0.67)
	pt3dadd(-5.83, 57.25, -46.08, 0.67)
	pt3dadd(-6, 57.08, -46.08, 0.67)
	pt3dadd(-6.17, 56.92, -46.08, 0.67)
	pt3dadd(-6.33, 56.58, -46.08, 0.67)
	pt3dadd(-6.33, 56.08, -46.08, 0.67)
	pt3dadd(-6.5, 55.75, -46.08, 0.67)
	pt3dadd(-6.5, 55.42, -46.08, 0.67)
	pt3dadd(-6.67, 55.25, -46.08, 0.67)
	pt3dadd(-6.83, 54.92, -46.08, 0.67)
  }
}
proc shape3d_12() {
  dend[149] {	pt3dadd(-6.83, 54.42, -46.08, 0.67)
	pt3dadd(-7, 54.25, -46.08, 0.67)
	pt3dadd(-7, 52.92, -46.08, 0.67)
	pt3dadd(-7.17, 52.92, -46.08, 0.83)
  }
  dend[150] {pt3dclear()
	pt3dadd(-7.17, 52.92, -46.08, 0.83)
	pt3dadd(-7, 52.75, -46.08, 0.5)
	pt3dadd(-6.83, 52.58, -46.08, 0.5)
	pt3dadd(-6.67, 52.42, -46.08, 0.5)
	pt3dadd(-6.33, 52.42, -46.08, 0.5)
	pt3dadd(-6.17, 52.25, -46.08, 0.5)
	pt3dadd(-6, 51.92, -46.08, 0.5)
	pt3dadd(-5.83, 51.75, -46.08, 0.5)
	pt3dadd(-5.67, 51.42, -46.08, 0.5)
	pt3dadd(-5.5, 51.25, -46.08, 0.5)
	pt3dadd(-5.5, 50.25, -46.08, 0.5)
	pt3dadd(-5.67, 49.92, -46.08, 0.5)
	pt3dadd(-5.83, 49.58, -46.08, 0.5)
	pt3dadd(-6, 49.42, -46.08, 0.5)
	pt3dadd(-6.33, 49.08, -46.08, 0.5)
	pt3dadd(-6.5, 48.92, -46.08, 0.5)
	pt3dadd(-6.5, 48.58, -46.08, 0.5)
	pt3dadd(-6.67, 48.42, -46.08, 0.5)
	pt3dadd(-6.67, 48.25, -46.08, 0.5)
  }
  dend[151] {pt3dclear()
	pt3dadd(-7.17, 52.92, -46.08, 0.83)
	pt3dadd(-7, 53.25, -43.56, 0.5)
	pt3dadd(-6.83, 53.08, -43.56, 0.5)
	pt3dadd(-6.83, 52.42, -43.56, 0.5)
	pt3dadd(-7, 52.08, -43.56, 0.5)
	pt3dadd(-7.17, 51.75, -43.56, 0.5)
	pt3dadd(-7.33, 51.58, -43.56, 0.5)
	pt3dadd(-7.5, 51.42, -43.56, 0.5)
	pt3dadd(-7.83, 51.25, -43.56, 0.5)
	pt3dadd(-8, 51.08, -43.56, 0.5)
	pt3dadd(-8.17, 50.92, -43.56, 0.5)
	pt3dadd(-8.33, 50.75, -43.56, 0.5)
	pt3dadd(-8.67, 50.58, -43.56, 0.5)
	pt3dadd(-8.83, 50.42, -43.56, 0.5)
	pt3dadd(-8.83, 50.08, -43.56, 0.5)
	pt3dadd(-9.17, 49.92, -43.56, 0.5)
  }
  dend[152] {pt3dclear()
	pt3dadd(-2.83, 60.25, -47.88, 0.83)
	pt3dadd(-2.67, 60.25, -47.88, 0.83)
	pt3dadd(-3, 60.25, -47.88, 0.83)
	pt3dadd(-3.17, 60.42, -47.88, 0.83)
	pt3dadd(-3.5, 60.42, -47.88, 0.83)
	pt3dadd(-4, 60.58, -47.88, 0.83)
	pt3dadd(-4.5, 60.75, -47.88, 0.83)
	pt3dadd(-5, 60.75, -47.88, 0.83)
	pt3dadd(-5.33, 60.92, -47.88, 0.83)
	pt3dadd(-5.5, 61.08, -47.88, 0.83)
	pt3dadd(-6.17, 61.08, -47.88, 0.83)
  }
  dend[153] {pt3dclear()
	pt3dadd(-6.17, 61.08, -47.88, 0.83)
	pt3dadd(-6.17, 61.25, -45.36, 0.5)
	pt3dadd(-6.33, 61.08, -45.36, 0.5)
	pt3dadd(-6.5, 60.92, -45.36, 0.5)
	pt3dadd(-6.67, 60.75, -45.36, 0.5)
	pt3dadd(-6.83, 60.58, -45.36, 0.5)
	pt3dadd(-7, 60.42, -45.36, 0.5)
	pt3dadd(-7.17, 60.25, -45.36, 0.5)
	pt3dadd(-7.33, 60.08, -45.36, 0.5)
	pt3dadd(-7.33, 59.75, -45.36, 0.5)
	pt3dadd(-7.5, 59.58, -45.36, 0.5)
	pt3dadd(-7.67, 59.42, -45.36, 0.5)
	pt3dadd(-8, 59.08, -45.36, 0.5)
	pt3dadd(-8.17, 58.92, -45.36, 0.5)
	pt3dadd(-8.33, 58.75, -45.36, 0.5)
	pt3dadd(-8.5, 58.58, -45.36, 0.5)
  }
  dend[154] {pt3dclear()
	pt3dadd(-8.5, 58.58, -45.36, 0.5)
	pt3dadd(-8.5, 58.58, -45, 0.5)
	pt3dadd(-8.33, 58.42, -45, 0.5)
	pt3dadd(-8.5, 58.25, -45, 0.5)
	pt3dadd(-8.67, 57.92, -45, 0.5)
	pt3dadd(-8.83, 57.75, -45, 0.5)
	pt3dadd(-9, 57.58, -45, 0.5)
	pt3dadd(-9.33, 57.42, -45, 0.5)
	pt3dadd(-9.5, 57.25, -45, 0.5)
	pt3dadd(-9.67, 57.08, -45, 0.5)
	pt3dadd(-9.83, 56.92, -45, 0.5)
  }
  dend[155] {pt3dclear()
	pt3dadd(-9.83, 56.92, -45, 0.5)
	pt3dadd(-10, 56.75, -42.48, 0.5)
	pt3dadd(-10.33, 56.92, -42.48, 0.5)
	pt3dadd(-11.5, 56.92, -42.48, 0.5)
  }
  dend[156] {pt3dclear()
	pt3dadd(-11.5, 56.92, -42.48, 0.5)
	pt3dadd(-11.17, 56.92, -43.2, 0.5)
	pt3dadd(-11.33, 57.08, -43.2, 0.5)
	pt3dadd(-11.67, 57.25, -43.2, 0.5)
	pt3dadd(-11.83, 57.42, -43.2, 0.5)
	pt3dadd(-12.17, 57.42, -43.2, 0.5)
	pt3dadd(-12.33, 57.58, -43.2, 0.5)
	pt3dadd(-12.5, 57.75, -43.2, 0.5)
	pt3dadd(-12.67, 57.92, -43.2, 0.5)
	pt3dadd(-12.67, 58.25, -43.2, 0.5)
	pt3dadd(-12.83, 58.25, -43.2, 0.5)
  }
  dend[157] {pt3dclear()
	pt3dadd(-12.83, 58.25, -43.2, 0.5)
	pt3dadd(-12.67, 58.25, -42.84, 0.5)
	pt3dadd(-12.67, 59.25, -42.84, 0.5)
	pt3dadd(-12.5, 59.42, -42.84, 0.5)
	pt3dadd(-12.33, 59.58, -42.84, 0.5)
	pt3dadd(-12.17, 59.92, -42.84, 0.5)
	pt3dadd(-12.17, 61.42, -42.84, 0.5)
  }
  dend[158] {pt3dclear()
	pt3dadd(-12.83, 58.25, -43.2, 0.5)
	pt3dadd(-12.33, 58.08, -43.2, 0.5)
	pt3dadd(-12.67, 58.42, -43.2, 0.5)
	pt3dadd(-13, 58.42, -43.2, 0.5)
	pt3dadd(-13.17, 58.58, -43.2, 0.5)
	pt3dadd(-13.33, 58.75, -43.2, 0.5)
	pt3dadd(-13.5, 58.92, -43.2, 0.5)
	pt3dadd(-13.67, 59.08, -43.2, 0.5)
	pt3dadd(-14, 59.25, -43.2, 0.5)
	pt3dadd(-14.17, 59.42, -43.2, 0.5)
	pt3dadd(-14.5, 59.58, -43.2, 0.5)
	pt3dadd(-14.67, 59.75, -43.2, 0.5)
	pt3dadd(-14.83, 59.92, -43.2, 0.5)
	pt3dadd(-15, 60.08, -43.2, 0.5)
	pt3dadd(-15, 60.42, -43.2, 0.5)
	pt3dadd(-15.17, 60.58, -43.2, 0.5)
	pt3dadd(-15.5, 60.58, -43.2, 0.5)
	pt3dadd(-15.67, 60.75, -43.2, 0.5)
	pt3dadd(-15.83, 60.92, -43.2, 0.5)
	pt3dadd(-16, 61.08, -43.2, 0.5)
	pt3dadd(-16.17, 61.25, -43.2, 0.5)
	pt3dadd(-16.32, 61.42, -43.2, 0.5)
	pt3dadd(-16.67, 61.42, -43.2, 0.5)
	pt3dadd(-16.82, 61.58, -43.2, 0.5)
	pt3dadd(-17, 61.58, -43.2, 0.5)
  }
  dend[159] {pt3dclear()
	pt3dadd(-11.5, 56.92, -42.48, 0.5)
	pt3dadd(-11.67, 56.92, -42.48, 0.5)
	pt3dadd(-12, 56.92, -42.48, 0.5)
	pt3dadd(-12.33, 56.75, -42.48, 0.5)
	pt3dadd(-13.5, 56.75, -42.48, 0.5)
	pt3dadd(-13.67, 56.58, -42.48, 0.5)
	pt3dadd(-13.83, 56.58, -42.48, 0.5)
  }
  dend[160] {pt3dclear()
	pt3dadd(-13.83, 56.58, -42.48, 0.5)
	pt3dadd(-13.83, 56.75, -39.24, 0.5)
	pt3dadd(-14, 56.92, -39.24, 0.5)
	pt3dadd(-14.5, 56.92, -39.24, 0.5)
	pt3dadd(-14.67, 57.08, -39.24, 0.5)
	pt3dadd(-14.83, 57.25, -39.24, 0.5)
	pt3dadd(-15.17, 57.25, -39.24, 0.5)
	pt3dadd(-15.33, 57.42, -39.24, 0.5)
	pt3dadd(-15.5, 57.58, -39.24, 0.5)
	pt3dadd(-15.83, 57.58, -39.24, 0.5)
	pt3dadd(-16, 57.75, -39.24, 0.5)
	pt3dadd(-16.17, 57.75, -39.24, 0.5)
  }
  dend[161] {pt3dclear()
	pt3dadd(-16.17, 57.75, -39.24, 0.5)
	pt3dadd(-15.83, 57.58, -39.24, 0.5)
	pt3dadd(-15.83, 58.25, -39.24, 0.5)
	pt3dadd(-16, 58.42, -39.24, 0.5)
	pt3dadd(-16.17, 58.58, -39.24, 0.5)
	pt3dadd(-16.32, 58.92, -39.24, 0.5)
	pt3dadd(-16.5, 59.08, -39.24, 0.5)
	pt3dadd(-16.67, 59.25, -39.24, 0.5)
	pt3dadd(-17, 59.58, -39.24, 0.5)
	pt3dadd(-17.17, 59.75, -39.24, 0.5)
	pt3dadd(-17.5, 59.92, -39.24, 0.5)
	pt3dadd(-17.67, 60.08, -39.24, 0.5)
	pt3dadd(-17.82, 60.25, -39.24, 0.5)
	pt3dadd(-18.32, 60.25, -39.24, 0.5)
  }
  dend[162] {pt3dclear()
	pt3dadd(-18.32, 60.25, -39.24, 0.5)
	pt3dadd(-18, 60.42, -40.68, 0.5)
	pt3dadd(-18, 60.92, -40.68, 0.5)
	pt3dadd(-18.17, 61.08, -40.68, 0.5)
	pt3dadd(-18.17, 61.92, -40.68, 0.5)
	pt3dadd(-18.5, 61.92, -40.68, 0.5)
	pt3dadd(-18.67, 62.08, -40.68, 0.5)
	pt3dadd(-19, 62.25, -40.68, 0.5)
	pt3dadd(-20.67, 62.25, -40.68, 0.5)
	pt3dadd(-21, 62.42, -40.68, 0.5)
	pt3dadd(-21.17, 62.25, -40.68, 0.5)
	pt3dadd(-21.5, 62.25, -40.68, 0.5)
	pt3dadd(-21.5, 62.08, -40.68, 0.5)
  }
  dend[163] {pt3dclear()
	pt3dadd(-21.5, 62.08, -40.68, 0.5)
	pt3dadd(-21.5, 62.25, -40.32, 0.5)
	pt3dadd(-21.67, 62.42, -40.32, 0.5)
	pt3dadd(-22, 62.42, -40.32, 0.5)
	pt3dadd(-22.33, 62.58, -40.32, 0.5)
	pt3dadd(-22.5, 62.75, -40.32, 0.5)
	pt3dadd(-22.67, 62.92, -40.32, 0.5)
	pt3dadd(-22.83, 63.08, -40.32, 0.5)
	pt3dadd(-23, 63.42, -40.32, 0.5)
	pt3dadd(-23.17, 63.58, -40.32, 0.5)
	pt3dadd(-23.33, 63.75, -40.32, 0.5)
	pt3dadd(-23.33, 64.08, -40.32, 0.5)
	pt3dadd(-23.5, 64.25, -40.32, 0.5)
	pt3dadd(-23.67, 64.42, -40.32, 0.5)
	pt3dadd(-23.67, 64.75, -40.32, 0.5)
	pt3dadd(-23.83, 64.92, -40.32, 0.5)
	pt3dadd(-24, 65.08, -40.32, 0.5)
	pt3dadd(-24, 65.58, -40.32, 0.5)
	pt3dadd(-24.17, 65.75, -40.32, 0.5)
	pt3dadd(-24.33, 65.92, -40.32, 0.5)
	pt3dadd(-24.33, 66.25, -40.32, 0.5)
	pt3dadd(-24.5, 66.58, -40.32, 0.5)
	pt3dadd(-24.67, 66.92, -40.32, 0.5)
	pt3dadd(-24.83, 67.08, -40.32, 0.5)
	pt3dadd(-25, 67.42, -40.32, 0.5)
	pt3dadd(-25.17, 67.58, -40.32, 0.5)
	pt3dadd(-25.33, 67.75, -40.32, 0.5)
	pt3dadd(-25.5, 68.08, -40.32, 0.5)
	pt3dadd(-25.67, 68.25, -40.32, 0.5)
	pt3dadd(-26, 68.42, -40.32, 0.5)
  }
}
proc shape3d_13() {
  dend[163] {	pt3dadd(-26.17, 68.58, -40.32, 0.5)
  }
  dend[164] {pt3dclear()
	pt3dadd(-26.17, 68.58, -40.32, 0.5)
	pt3dadd(-25.74, 68.58, -39.41, 0.5)
  }
  dend[165] {pt3dclear()
	pt3dadd(-25.74, 68.58, -39.41, 0.5)
	pt3dadd(-26, 68.58, -39.96, 0.5)
	pt3dadd(-25.83, 68.75, -39.96, 0.5)
	pt3dadd(-25.67, 68.92, -39.96, 0.5)
	pt3dadd(-25.5, 69.08, -39.96, 0.5)
	pt3dadd(-25.33, 69.25, -39.96, 0.5)
	pt3dadd(-24.67, 69.92, -39.96, 0.5)
	pt3dadd(-24.5, 70.08, -39.96, 0.5)
	pt3dadd(-24.33, 70.42, -39.96, 0.5)
	pt3dadd(-24.33, 71.25, -39.96, 0.5)
	pt3dadd(-24.17, 71.42, -39.96, 0.5)
	pt3dadd(-24.17, 72.42, -39.96, 0.5)
	pt3dadd(-24.33, 72.42, -39.96, 0.5)
  }
  dend[166] {pt3dclear()
	pt3dadd(-25.74, 68.58, -39.41, 0.5)
	pt3dadd(-26.17, 68.42, -42.12, 0.5)
	pt3dadd(-26.17, 68.75, -42.12, 0.5)
	pt3dadd(-26.33, 68.92, -42.12, 0.5)
	pt3dadd(-26.5, 69.08, -42.12, 0.5)
	pt3dadd(-26.67, 69.25, -42.12, 0.5)
	pt3dadd(-26.67, 69.58, -42.12, 0.5)
	pt3dadd(-26.83, 69.92, -42.12, 0.5)
	pt3dadd(-27, 70.08, -42.12, 0.5)
	pt3dadd(-27, 70.42, -42.12, 0.5)
	pt3dadd(-27.17, 70.75, -42.12, 0.5)
	pt3dadd(-27.17, 72.08, -42.12, 0.5)
	pt3dadd(-27.33, 72.25, -42.12, 0.5)
	pt3dadd(-27.5, 72.42, -42.12, 0.5)
	pt3dadd(-27.5, 72.75, -42.12, 0.5)
	pt3dadd(-27.67, 72.75, -42.12, 0.5)
  }
  dend[167] {pt3dclear()
	pt3dadd(-26.17, 68.58, -40.32, 0.5)
	pt3dadd(-25.67, 68.58, -40.32, 0.5)
	pt3dadd(-27.67, 68.58, -40.32, 0.5)
	pt3dadd(-28, 68.42, -40.32, 0.5)
	pt3dadd(-28.83, 68.42, -40.32, 0.5)
	pt3dadd(-29.17, 68.25, -40.32, 0.5)
	pt3dadd(-30.67, 68.25, -40.32, 0.5)
	pt3dadd(-30.83, 68.42, -40.68, 0.5)
	pt3dadd(-31.17, 68.42, -40.68, 0.5)
	pt3dadd(-31.5, 68.25, -40.68, 0.5)
	pt3dadd(-32.17, 68.25, -40.68, 0.5)
  }
  dend[168] {pt3dclear()
	pt3dadd(-21.5, 62.08, -40.68, 0.5)
	pt3dadd(-21.5, 62.25, -40.68, 0.5)
	pt3dadd(-21.67, 62.08, -40.68, 0.5)
	pt3dadd(-22, 62.08, -40.68, 0.5)
	pt3dadd(-22.17, 61.92, -40.68, 0.5)
	pt3dadd(-22.33, 61.75, -40.68, 0.5)
	pt3dadd(-22.5, 61.58, -40.68, 0.5)
	pt3dadd(-22.83, 61.25, -40.68, 0.5)
	pt3dadd(-23.17, 61.08, -40.68, 0.5)
	pt3dadd(-23.33, 60.92, -40.68, 0.5)
	pt3dadd(-23.67, 60.92, -40.68, 0.5)
	pt3dadd(-24, 60.75, -40.68, 0.5)
	pt3dadd(-24.5, 60.75, -40.68, 0.5)
	pt3dadd(-24.67, 60.58, -40.68, 0.5)
	pt3dadd(-25.83, 60.58, -40.68, 0.5)
	pt3dadd(-25.83, 60.42, -40.68, 0.5)
  }
  dend[169] {pt3dclear()
	pt3dadd(-18.32, 60.25, -39.24, 0.5)
	pt3dadd(-18, 60.42, -39.24, 0.5)
	pt3dadd(-18.67, 60.42, -39.24, 0.5)
	pt3dadd(-18.82, 60.25, -39.24, 0.5)
	pt3dadd(-19, 60.08, -39.24, 0.5)
	pt3dadd(-19.67, 60.08, -39.24, 0.5)
	pt3dadd(-20, 59.92, -39.24, 0.5)
	pt3dadd(-22.83, 59.92, -39.24, 0.5)
	pt3dadd(-23, 59.75, -39.24, 0.5)
	pt3dadd(-23.33, 59.75, -39.24, 0.5)
	pt3dadd(-23.5, 59.58, -39.24, 0.5)
	pt3dadd(-23.83, 59.58, -39.24, 0.5)
	pt3dadd(-24, 59.42, -39.24, 0.5)
	pt3dadd(-24.17, 59.25, -39.24, 0.5)
	pt3dadd(-24.5, 59.25, -39.24, 0.5)
	pt3dadd(-24.5, 58.92, -39.24, 0.5)
	pt3dadd(-24.67, 58.75, -39.24, 0.5)
	pt3dadd(-25, 58.75, -39.24, 0.5)
	pt3dadd(-25.17, 58.58, -39.24, 0.5)
	pt3dadd(-25.33, 58.25, -39.24, 0.5)
	pt3dadd(-25.5, 58.08, -39.24, 0.5)
	pt3dadd(-25.83, 57.92, -39.24, 0.5)
	pt3dadd(-26, 57.75, -39.24, 0.5)
	pt3dadd(-26.33, 57.58, -39.24, 0.5)
	pt3dadd(-26.83, 57.58, -39.24, 0.5)
	pt3dadd(-27, 57.42, -39.24, 0.5)
  }
  dend[170] {pt3dclear()
	pt3dadd(-16.17, 57.75, -39.24, 0.5)
	pt3dadd(-16.32, 57.92, -38.88, 0.5)
	pt3dadd(-18.17, 57.92, -38.88, 0.5)
	pt3dadd(-18.5, 57.75, -38.88, 0.5)
	pt3dadd(-18.67, 57.58, -38.88, 0.5)
	pt3dadd(-19, 57.58, -38.88, 0.5)
	pt3dadd(-19.32, 57.42, -38.88, 0.5)
	pt3dadd(-19.5, 57.25, -38.88, 0.5)
	pt3dadd(-19.67, 57.08, -38.88, 0.5)
	pt3dadd(-19.82, 56.92, -38.88, 0.5)
	pt3dadd(-20, 56.75, -38.88, 0.5)
	pt3dadd(-21, 56.75, -38.88, 0.5)
	pt3dadd(-21.33, 56.92, -38.88, 0.5)
	pt3dadd(-21.5, 57.08, -38.88, 0.5)
	pt3dadd(-21.83, 57.25, -38.88, 0.5)
	pt3dadd(-22.17, 57.42, -38.88, 0.5)
	pt3dadd(-22.5, 57.58, -38.88, 0.5)
	pt3dadd(-23, 57.58, -38.88, 0.5)
  }
  dend[171] {pt3dclear()
	pt3dadd(-13.83, 56.58, -42.48, 0.5)
	pt3dadd(-13.83, 56.58, -38.52, 0.5)
	pt3dadd(-14, 56.25, -38.52, 0.5)
	pt3dadd(-14, 55.92, -38.52, 0.5)
	pt3dadd(-14.17, 55.58, -38.52, 0.5)
	pt3dadd(-14.33, 55.42, -38.52, 0.5)
	pt3dadd(-14.33, 54.92, -38.52, 0.5)
	pt3dadd(-14.5, 54.75, -38.52, 0.5)
	pt3dadd(-14.5, 54.42, -38.52, 0.5)
	pt3dadd(-14.83, 54.08, -38.52, 0.5)
	pt3dadd(-15.67, 54.08, -38.52, 0.5)
  }
  dend[172] {pt3dclear()
	pt3dadd(-15.67, 54.08, -38.52, 0.5)
	pt3dadd(-15.5, 54.25, -38.15, 0.5)
	pt3dadd(-15.83, 54.08, -38.15, 0.5)
	pt3dadd(-16.17, 54.08, -38.15, 0.5)
	pt3dadd(-16.5, 53.92, -38.15, 0.5)
	pt3dadd(-17.17, 53.92, -38.15, 0.5)
	pt3dadd(-17.32, 54.08, -38.15, 0.5)
	pt3dadd(-17.5, 54.25, -38.15, 0.5)
	pt3dadd(-17.67, 54.42, -38.15, 0.5)
	pt3dadd(-18, 54.58, -38.15, 0.5)
	pt3dadd(-18.32, 54.58, -38.15, 0.5)
	pt3dadd(-18.5, 54.75, -38.15, 0.5)
	pt3dadd(-19.5, 54.75, -38.15, 0.5)
	pt3dadd(-19.67, 54.92, -38.15, 0.5)
	pt3dadd(-21, 54.92, -38.15, 0.5)
	pt3dadd(-21.33, 55.08, -38.15, 0.5)
	pt3dadd(-21.67, 55.25, -38.15, 0.5)
	pt3dadd(-22, 55.25, -38.15, 0.5)
	pt3dadd(-22.17, 55.42, -38.15, 0.5)
	pt3dadd(-22.5, 55.58, -38.15, 0.5)
	pt3dadd(-22.83, 55.75, -38.15, 0.5)
	pt3dadd(-23, 55.92, -38.15, 0.5)
	pt3dadd(-23.5, 55.92, -38.15, 0.5)
  }
  dend[173] {pt3dclear()
	pt3dadd(-15.67, 54.08, -38.52, 0.5)
	pt3dadd(-15.67, 54.25, -38.15, 0.5)
	pt3dadd(-15.83, 54.08, -38.15, 0.5)
	pt3dadd(-16, 53.92, -38.15, 0.5)
	pt3dadd(-16.17, 53.75, -38.15, 0.5)
	pt3dadd(-16.5, 53.58, -38.15, 0.5)
	pt3dadd(-16.82, 53.42, -38.15, 0.5)
	pt3dadd(-17.17, 53.25, -38.15, 0.5)
	pt3dadd(-17.32, 53.08, -38.15, 0.5)
	pt3dadd(-17.67, 53.08, -38.15, 0.5)
	pt3dadd(-18, 52.92, -38.15, 0.5)
	pt3dadd(-19.17, 52.92, -38.15, 0.5)
	pt3dadd(-19.32, 53.08, -38.15, 0.5)
	pt3dadd(-22.67, 53.08, -38.15, 0.5)
	pt3dadd(-22.83, 52.75, -38.15, 0.5)
	pt3dadd(-23, 52.58, -38.15, 0.5)
	pt3dadd(-23.17, 52.42, -38.15, 0.5)
	pt3dadd(-23.33, 52.25, -38.15, 0.5)
	pt3dadd(-23.5, 52.08, -38.15, 0.5)
  }
  dend[174] {pt3dclear()
	pt3dadd(-9.83, 56.92, -45, 0.5)
	pt3dadd(-9.83, 57.08, -41.4, 0.5)
	pt3dadd(-9.83, 56.58, -41.4, 0.5)
	pt3dadd(-10, 56.42, -41.4, 0.5)
	pt3dadd(-10.17, 56.08, -41.4, 0.5)
	pt3dadd(-10.33, 55.92, -41.4, 0.5)
	pt3dadd(-10.5, 55.75, -41.4, 0.5)
	pt3dadd(-10.67, 55.42, -41.4, 0.5)
	pt3dadd(-10.83, 55.08, -41.4, 0.5)
	pt3dadd(-11, 54.75, -41.4, 0.5)
	pt3dadd(-11.17, 54.58, -41.4, 0.5)
	pt3dadd(-11.17, 54.08, -41.4, 0.5)
	pt3dadd(-11.33, 53.92, -41.4, 0.5)
	pt3dadd(-11.33, 53.42, -41.4, 0.5)
	pt3dadd(-11.5, 52.92, -41.4, 0.5)
	pt3dadd(-11.5, 52.25, -41.4, 0.5)
  }
  dend[175] {pt3dclear()
	pt3dadd(-11.5, 52.25, -41.4, 0.5)
	pt3dadd(-11.5, 52.58, -42.48, 0.5)
	pt3dadd(-11.5, 51.92, -42.48, 0.5)
	pt3dadd(-11.33, 51.75, -42.48, 0.5)
	pt3dadd(-11.33, 50.42, -42.48, 0.5)
	pt3dadd(-11.17, 50.25, -42.48, 0.5)
	pt3dadd(-11.17, 49.58, -42.48, 0.5)
	pt3dadd(-11.33, 49.25, -42.48, 0.5)
	pt3dadd(-11.5, 49.08, -42.48, 0.5)
	pt3dadd(-12, 48.58, -42.48, 0.5)
	pt3dadd(-12.17, 48.42, -42.48, 0.5)
	pt3dadd(-12.33, 48.25, -42.48, 0.5)
	pt3dadd(-12.67, 48.08, -42.48, 0.5)
	pt3dadd(-12.83, 47.75, -42.48, 0.5)
	pt3dadd(-13, 47.58, -42.48, 0.5)
	pt3dadd(-13.17, 47.25, -42.48, 0.5)
	pt3dadd(-13.17, 46.92, -42.48, 0.5)
	pt3dadd(-13.33, 46.75, -42.48, 0.5)
  }
  dend[176] {pt3dclear()
	pt3dadd(-11.5, 52.25, -41.4, 0.5)
	pt3dadd(-11.5, 52.25, -38.88, 0.5)
	pt3dadd(-11.67, 52.08, -38.88, 0.5)
	pt3dadd(-12, 51.92, -38.88, 0.5)
	pt3dadd(-12.33, 51.92, -38.88, 0.5)
	pt3dadd(-12.5, 51.75, -38.88, 0.5)
	pt3dadd(-12.67, 51.42, -38.88, 0.5)
	pt3dadd(-12.83, 51.25, -38.88, 0.5)
	pt3dadd(-13, 51.08, -38.88, 0.5)
	pt3dadd(-13.33, 50.92, -38.88, 0.5)
  }
}
proc shape3d_14() {
  dend[176] {	pt3dadd(-13.5, 50.75, -38.88, 0.5)
	pt3dadd(-13.67, 50.58, -38.88, 0.5)
	pt3dadd(-14, 50.58, -38.88, 0.5)
	pt3dadd(-14.17, 50.42, -38.88, 0.5)
	pt3dadd(-14.33, 50.25, -38.88, 0.5)
	pt3dadd(-14.5, 50.25, -38.88, 0.5)
  }
  dend[177] {pt3dclear()
	pt3dadd(-14.5, 50.25, -38.88, 0.5)
	pt3dadd(-14.5, 50.25, -37.08, 0.5)
	pt3dadd(-14.67, 50.08, -37.08, 0.5)
	pt3dadd(-14.83, 49.75, -37.08, 0.5)
	pt3dadd(-15, 49.25, -37.08, 0.5)
	pt3dadd(-15.17, 48.92, -37.08, 0.5)
	pt3dadd(-15.33, 48.75, -37.08, 0.5)
	pt3dadd(-15.67, 48.42, -37.08, 0.5)
	pt3dadd(-17.67, 48.42, -37.08, 0.5)
	pt3dadd(-17.82, 48.25, -37.08, 0.5)
	pt3dadd(-18.17, 48.08, -37.08, 0.5)
	pt3dadd(-18.5, 47.92, -37.08, 0.5)
	pt3dadd(-18.82, 47.92, -37.08, 0.5)
	pt3dadd(-19, 47.75, -37.08, 0.5)
	pt3dadd(-19.32, 47.58, -37.08, 0.5)
	pt3dadd(-19.67, 47.42, -37.08, 0.5)
	pt3dadd(-19.82, 47.25, -37.08, 0.5)
	pt3dadd(-20.17, 47.25, -37.08, 0.5)
	pt3dadd(-20.5, 47.08, -37.08, 0.5)
	pt3dadd(-20.67, 46.92, -37.08, 0.5)
	pt3dadd(-20.83, 46.75, -37.08, 0.5)
	pt3dadd(-21, 46.75, -37.08, 0.5)
  }
  dend[178] {pt3dclear()
	pt3dadd(-14.5, 50.25, -38.88, 0.5)
	pt3dadd(-14.33, 50.42, -37.44, 0.5)
	pt3dadd(-14.67, 50.25, -37.44, 0.5)
	pt3dadd(-14.83, 50.08, -37.44, 0.5)
	pt3dadd(-15.67, 50.08, -37.44, 0.5)
	pt3dadd(-15.83, 50.25, -37.44, 0.5)
	pt3dadd(-16, 50.42, -37.44, 0.5)
	pt3dadd(-16.32, 50.75, -37.44, 0.5)
	pt3dadd(-16.67, 50.92, -37.44, 0.5)
	pt3dadd(-16.82, 51.08, -37.44, 0.5)
	pt3dadd(-17.17, 51.25, -37.44, 0.5)
	pt3dadd(-17.5, 51.42, -37.44, 0.5)
	pt3dadd(-18.82, 51.42, -37.44, 0.5)
	pt3dadd(-19.17, 51.25, -37.44, 0.5)
	pt3dadd(-19.5, 51.25, -37.08, 0.5)
	pt3dadd(-20, 51.08, -37.08, 0.5)
	pt3dadd(-20.67, 51.08, -37.08, 0.5)
	pt3dadd(-20.83, 50.92, -37.08, 0.5)
	pt3dadd(-21.5, 50.92, -37.08, 0.5)
	pt3dadd(-21.67, 50.75, -37.08, 0.5)
	pt3dadd(-21.83, 50.75, -37.08, 0.5)
  }
  dend[179] {pt3dclear()
	pt3dadd(-8.5, 58.58, -45.36, 0.5)
	pt3dadd(-8, 58.42, -45.36, 0.5)
	pt3dadd(-8.17, 58.58, -45.36, 0.5)
	pt3dadd(-8.5, 58.75, -45.36, 0.5)
	pt3dadd(-8.67, 58.92, -45.36, 0.5)
	pt3dadd(-8.83, 59.08, -45.36, 0.5)
	pt3dadd(-9.17, 59.08, -45.36, 0.5)
	pt3dadd(-9.33, 59.25, -45.36, 0.5)
	pt3dadd(-9.5, 59.42, -45.36, 0.5)
	pt3dadd(-9.67, 59.58, -45.36, 0.5)
	pt3dadd(-9.83, 59.58, -45.36, 0.5)
  }
  dend[180] {pt3dclear()
	pt3dadd(-9.83, 59.58, -45.36, 0.5)
	pt3dadd(-9.67, 59.42, -44.64, 0.5)
	pt3dadd(-10, 59.42, -44.64, 0.5)
	pt3dadd(-10.17, 59.58, -44.64, 0.5)
	pt3dadd(-10.5, 59.75, -44.64, 0.5)
	pt3dadd(-10.67, 59.92, -44.64, 0.5)
	pt3dadd(-11, 60.08, -44.64, 0.5)
	pt3dadd(-11.17, 60.25, -44.64, 0.5)
	pt3dadd(-11.5, 60.42, -44.64, 0.5)
	pt3dadd(-11.67, 60.58, -44.64, 0.5)
	pt3dadd(-12, 60.58, -44.64, 0.5)
	pt3dadd(-12.17, 60.75, -44.64, 0.5)
	pt3dadd(-12.5, 60.92, -44.64, 0.5)
	pt3dadd(-12.67, 61.08, -44.64, 0.5)
	pt3dadd(-13.17, 61.08, -44.64, 0.5)
	pt3dadd(-13.33, 61.25, -44.64, 0.5)
	pt3dadd(-14.17, 61.25, -44.64, 0.5)
	pt3dadd(-14.17, 62.25, -44.64, 0.5)
  }
  dend[181] {pt3dclear()
	pt3dadd(-14.17, 62.25, -44.64, 0.5)
	pt3dadd(-14.17, 61.42, -44.64, 0.5)
	pt3dadd(-14.17, 60.92, -44.64, 0.5)
	pt3dadd(-14.67, 60.92, -44.64, 0.5)
	pt3dadd(-14.83, 60.75, -44.64, 0.5)
	pt3dadd(-15.33, 60.75, -44.64, 0.5)
	pt3dadd(-15.67, 60.58, -44.64, 0.5)
	pt3dadd(-16.32, 60.58, -44.64, 0.5)
	pt3dadd(-16.5, 60.42, -44.64, 0.5)
	pt3dadd(-16.82, 60.25, -44.64, 0.5)
	pt3dadd(-17, 60.08, -44.64, 0.5)
	pt3dadd(-17.17, 59.92, -44.64, 0.5)
	pt3dadd(-17.32, 59.58, -44.64, 0.5)
	pt3dadd(-17.5, 59.42, -44.64, 0.5)
	pt3dadd(-17.67, 59.25, -44.64, 0.5)
	pt3dadd(-17.67, 58.92, -44.64, 0.5)
	pt3dadd(-17.82, 58.92, -44.64, 0.5)
  }
  dend[182] {pt3dclear()
	pt3dadd(-14.17, 62.25, -44.64, 0.5)
	pt3dadd(-14, 61.58, -44.64, 0.5)
	pt3dadd(-14.17, 61.75, -44.64, 0.5)
	pt3dadd(-15.5, 63.08, -44.64, 0.5)
	pt3dadd(-15.83, 63.25, -44.64, 0.5)
	pt3dadd(-17.32, 63.25, -44.64, 0.5)
	pt3dadd(-17.5, 63.42, -44.64, 0.5)
	pt3dadd(-17.82, 63.42, -44.64, 0.5)
	pt3dadd(-18, 63.58, -44.64, 0.5)
	pt3dadd(-18.17, 63.75, -44.64, 0.5)
  }
  dend[183] {pt3dclear()
	pt3dadd(-9.83, 59.58, -45.36, 0.5)
	pt3dadd(-9.17, 59.58, -45.36, 0.5)
	pt3dadd(-9.33, 59.75, -45.36, 0.5)
	pt3dadd(-9.5, 60.08, -45.36, 0.5)
	pt3dadd(-9.83, 60.42, -45.36, 0.5)
	pt3dadd(-10, 60.75, -45.36, 0.5)
	pt3dadd(-10, 61.08, -45, 0.5)
	pt3dadd(-10.17, 61.42, -45, 0.5)
	pt3dadd(-10.33, 61.58, -45, 0.5)
	pt3dadd(-10.5, 61.75, -45, 0.5)
	pt3dadd(-10.67, 61.92, -45, 0.5)
	pt3dadd(-11, 62.08, -45, 0.5)
	pt3dadd(-11.5, 62.08, -45, 0.5)
	pt3dadd(-11.67, 62.25, -45, 0.5)
	pt3dadd(-12, 62.42, -45, 0.5)
	pt3dadd(-12.17, 62.58, -45, 0.5)
	pt3dadd(-12.33, 62.75, -45, 0.5)
	pt3dadd(-12.67, 62.75, -45, 0.5)
	pt3dadd(-12.83, 62.92, -45, 0.5)
	pt3dadd(-13.67, 62.92, -45, 0.5)
	pt3dadd(-13.67, 63.92, -45, 0.5)
  }
  dend[184] {pt3dclear()
	pt3dadd(-13.67, 63.92, -45, 0.5)
	pt3dadd(-13.67, 63.25, -44.64, 0.5)
	pt3dadd(-13.83, 63.08, -44.64, 0.5)
	pt3dadd(-13.83, 62.75, -44.64, 0.5)
	pt3dadd(-14.17, 62.75, -44.64, 0.5)
	pt3dadd(-14.33, 62.58, -44.64, 0.5)
	pt3dadd(-15, 62.58, -44.64, 0.5)
	pt3dadd(-15.17, 62.42, -44.64, 0.5)
	pt3dadd(-15.5, 62.42, -44.64, 0.5)
	pt3dadd(-15.67, 62.08, -44.64, 0.5)
	pt3dadd(-16, 61.92, -44.64, 0.5)
	pt3dadd(-16.17, 61.75, -44.64, 0.5)
	pt3dadd(-16.32, 61.58, -44.64, 0.5)
	pt3dadd(-16.5, 61.42, -44.64, 0.5)
	pt3dadd(-16.67, 61.25, -44.64, 0.5)
	pt3dadd(-16.82, 61.08, -44.64, 0.5)
	pt3dadd(-17.17, 60.92, -44.64, 0.5)
	pt3dadd(-17.5, 60.92, -44.64, 0.5)
	pt3dadd(-17.67, 60.75, -44.64, 0.5)
	pt3dadd(-18.17, 60.75, -44.64, 0.5)
	pt3dadd(-18.32, 60.58, -44.64, 0.5)
  }
  dend[185] {pt3dclear()
	pt3dadd(-13.67, 63.92, -45, 0.5)
	pt3dadd(-13.67, 63.08, -45, 0.5)
	pt3dadd(-13.83, 63.25, -45, 0.5)
	pt3dadd(-14.17, 63.25, -45, 0.5)
	pt3dadd(-14.33, 63.42, -45, 0.5)
	pt3dadd(-14.5, 63.58, -45, 0.5)
	pt3dadd(-14.67, 63.75, -45, 0.5)
	pt3dadd(-14.83, 63.92, -45, 0.5)
	pt3dadd(-15.17, 63.92, -45, 0.5)
	pt3dadd(-15.33, 64.08, -45, 0.5)
	pt3dadd(-15.5, 64.25, -45, 0.5)
	pt3dadd(-15.83, 64.42, -45, 0.5)
	pt3dadd(-16.32, 64.42, -45, 0.5)
	pt3dadd(-16.67, 64.58, -45, 0.5)
	pt3dadd(-16.82, 64.75, -45, 0.5)
	pt3dadd(-17.32, 64.75, -45, 0.5)
	pt3dadd(-17.5, 64.92, -45, 0.5)
	pt3dadd(-17.67, 64.92, -45, 0.5)
  }
  dend[186] {pt3dclear()
	pt3dadd(-6.17, 61.08, -47.88, 0.83)
	pt3dadd(-6.17, 61.08, -45.72, 0.83)
	pt3dadd(-6.33, 61.42, -45.72, 0.83)
	pt3dadd(-6.5, 61.58, -45.72, 0.83)
	pt3dadd(-6.67, 61.75, -45.72, 0.83)
	pt3dadd(-6.83, 61.92, -45.72, 0.83)
	pt3dadd(-6.83, 62.42, -45.72, 0.83)
	pt3dadd(-7, 62.58, -45.72, 0.83)
	pt3dadd(-7.17, 62.75, -45.72, 0.83)
	pt3dadd(-7.33, 63.08, -45.72, 0.83)
	pt3dadd(-7.33, 63.42, -45.72, 0.83)
	pt3dadd(-7.5, 63.58, -45.72, 0.83)
	pt3dadd(-7.67, 63.92, -45.72, 0.83)
	pt3dadd(-7.83, 64.08, -45.72, 0.83)
  }
  dend[187] {pt3dclear()
	pt3dadd(-7.83, 64.08, -45.72, 0.83)
	pt3dadd(-7.67, 63.92, -43.56, 0.5)
	pt3dadd(-7.83, 64.08, -43.56, 0.5)
	pt3dadd(-8.33, 64.08, -43.56, 0.5)
	pt3dadd(-8.5, 64.25, -43.56, 0.5)
	pt3dadd(-9, 64.25, -43.56, 0.5)
	pt3dadd(-9.33, 64.42, -43.56, 0.5)
	pt3dadd(-9.83, 64.42, -43.56, 0.5)
	pt3dadd(-10, 64.58, -43.56, 0.5)
	pt3dadd(-10.33, 64.58, -43.56, 0.5)
	pt3dadd(-10.5, 64.75, -43.56, 0.5)
	pt3dadd(-10.83, 64.92, -43.56, 0.5)
	pt3dadd(-11.5, 64.92, -43.56, 0.5)
	pt3dadd(-11.67, 65.08, -43.56, 0.5)
	pt3dadd(-12.17, 65.08, -43.56, 0.5)
	pt3dadd(-12.33, 65.25, -43.56, 0.5)
	pt3dadd(-12.67, 65.42, -43.56, 0.5)
	pt3dadd(-13, 65.42, -43.56, 0.5)
	pt3dadd(-13.17, 65.58, -43.56, 0.5)
	pt3dadd(-13.5, 65.75, -43.56, 0.5)
	pt3dadd(-13.83, 65.75, -43.56, 0.5)
  }
}
proc shape3d_15() {
  dend[187] {	pt3dadd(-14, 65.92, -43.56, 0.5)
	pt3dadd(-14.17, 65.92, -43.56, 0.5)
  }
  dend[188] {pt3dclear()
	pt3dadd(-14.17, 65.92, -43.56, 0.5)
	pt3dadd(-14, 65.75, -42.12, 0.5)
	pt3dadd(-14.67, 65.75, -42.12, 0.5)
	pt3dadd(-15, 65.92, -42.12, 0.5)
	pt3dadd(-15.5, 65.92, -42.12, 0.5)
	pt3dadd(-15.67, 66.08, -42.12, 0.5)
	pt3dadd(-17.5, 66.08, -42.12, 0.5)
	pt3dadd(-17.67, 66.25, -42.12, 0.5)
	pt3dadd(-19.17, 66.25, -42.12, 0.5)
	pt3dadd(-19.32, 66.42, -42.12, 0.5)
	pt3dadd(-19.82, 66.42, -42.12, 0.5)
	pt3dadd(-20, 66.58, -42.12, 0.5)
	pt3dadd(-20.67, 66.58, -42.12, 0.5)
  }
  dend[189] {pt3dclear()
	pt3dadd(-20.67, 66.58, -42.12, 0.5)
	pt3dadd(-20.5, 66.58, -40.68, 0.5)
	pt3dadd(-20.67, 66.42, -40.68, 0.5)
	pt3dadd(-20.67, 66.08, -40.68, 0.5)
	pt3dadd(-22.33, 66.08, -40.68, 0.5)
	pt3dadd(-22.5, 66.25, -40.68, 0.5)
	pt3dadd(-22.67, 66.58, -40.68, 0.5)
	pt3dadd(-22.83, 66.75, -40.68, 0.5)
	pt3dadd(-23, 66.92, -40.68, 0.5)
	pt3dadd(-23.17, 67.08, -40.68, 0.5)
	pt3dadd(-23.33, 67.25, -40.68, 0.5)
	pt3dadd(-23.67, 67.25, -40.68, 0.5)
	pt3dadd(-23.83, 67.42, -40.68, 0.5)
	pt3dadd(-24, 67.58, -40.68, 0.5)
	pt3dadd(-24.17, 67.75, -40.68, 0.5)
	pt3dadd(-24.5, 67.75, -40.68, 0.5)
	pt3dadd(-24.5, 67.92, -40.68, 0.5)
  }
  dend[190] {pt3dclear()
	pt3dadd(-20.67, 66.58, -42.12, 0.5)
	pt3dadd(-20.17, 66.42, -41.04, 0.5)
	pt3dadd(-20.5, 66.42, -41.04, 0.5)
	pt3dadd(-20.83, 66.58, -41.04, 0.5)
	pt3dadd(-21.17, 66.58, -41.04, 0.5)
	pt3dadd(-21.33, 66.75, -41.04, 0.5)
	pt3dadd(-21.67, 66.75, -41.04, 0.5)
	pt3dadd(-21.83, 66.92, -41.04, 0.5)
	pt3dadd(-22, 67.25, -41.04, 0.5)
	pt3dadd(-22.17, 67.58, -41.04, 0.5)
	pt3dadd(-22.17, 68.08, -41.04, 0.5)
	pt3dadd(-22.33, 68.25, -41.04, 0.5)
	pt3dadd(-22.33, 68.92, -41.04, 0.5)
	pt3dadd(-22.5, 69.08, -41.04, 0.5)
	pt3dadd(-22.5, 69.42, -41.04, 0.5)
	pt3dadd(-22.67, 69.58, -41.04, 0.5)
	pt3dadd(-22.83, 69.92, -41.04, 0.5)
	pt3dadd(-22.83, 70.25, -41.04, 0.5)
	pt3dadd(-23, 70.42, -41.04, 0.5)
	pt3dadd(-23.17, 70.58, -41.04, 0.5)
	pt3dadd(-23.17, 71.25, -41.04, 0.5)
	pt3dadd(-23.33, 71.42, -41.04, 0.5)
	pt3dadd(-23.33, 71.75, -41.04, 0.5)
	pt3dadd(-23.5, 71.92, -41.04, 0.5)
	pt3dadd(-23.67, 72.08, -41.04, 0.5)
	pt3dadd(-23.67, 72.42, -41.04, 0.5)
	pt3dadd(-23.83, 72.42, -41.04, 0.5)
  }
  dend[191] {pt3dclear()
	pt3dadd(-14.17, 65.92, -43.56, 0.5)
	pt3dadd(-14, 65.75, -43.56, 0.5)
	pt3dadd(-14.17, 65.92, -43.56, 0.5)
	pt3dadd(-14.17, 66.25, -43.56, 0.5)
	pt3dadd(-14.33, 66.42, -43.56, 0.5)
	pt3dadd(-14.5, 66.58, -43.56, 0.5)
	pt3dadd(-14.67, 66.75, -43.56, 0.5)
	pt3dadd(-14.67, 67.08, -43.56, 0.5)
	pt3dadd(-14.83, 67.42, -43.56, 0.5)
	pt3dadd(-15, 67.58, -43.56, 0.5)
	pt3dadd(-15, 68.25, -43.56, 0.5)
	pt3dadd(-15.17, 68.42, -43.56, 0.5)
	pt3dadd(-15.17, 69.58, -43.56, 0.5)
	pt3dadd(-15.33, 69.75, -43.56, 0.5)
	pt3dadd(-15.5, 69.92, -43.56, 0.5)
  }
  dend[192] {pt3dclear()
	pt3dadd(-15.5, 69.92, -43.56, 0.5)
	pt3dadd(-14.67, 69.75, -43.2, 0.5)
	pt3dadd(-14.67, 70.08, -43.2, 0.5)
	pt3dadd(-14.5, 70.25, -43.2, 0.5)
	pt3dadd(-14.33, 70.58, -43.2, 0.5)
	pt3dadd(-14.17, 70.92, -43.2, 0.5)
	pt3dadd(-14, 71.08, -43.2, 0.5)
	pt3dadd(-13.83, 71.25, -43.2, 0.5)
	pt3dadd(-13.67, 71.42, -43.2, 0.5)
	pt3dadd(-13.5, 71.58, -43.2, 0.5)
	pt3dadd(-13.33, 71.75, -43.2, 0.5)
	pt3dadd(-13.17, 71.92, -43.2, 0.5)
	pt3dadd(-13.17, 72.25, -43.2, 0.5)
	pt3dadd(-13, 72.42, -43.2, 0.5)
	pt3dadd(-13, 72.75, -43.2, 0.5)
	pt3dadd(-12.83, 72.92, -43.2, 0.5)
	pt3dadd(-12.83, 73.25, -43.2, 0.5)
	pt3dadd(-12.67, 73.42, -43.2, 0.5)
	pt3dadd(-12.67, 73.92, -43.2, 0.5)
  }
  dend[193] {pt3dclear()
	pt3dadd(-15.5, 69.92, -43.56, 0.5)
	pt3dadd(-15, 69.75, -43.56, 0.5)
	pt3dadd(-15.17, 69.92, -43.56, 0.5)
	pt3dadd(-15.33, 70.08, -43.56, 0.5)
	pt3dadd(-15.83, 70.58, -43.56, 0.5)
	pt3dadd(-16, 70.92, -43.56, 0.5)
	pt3dadd(-16.17, 71.08, -43.56, 0.5)
	pt3dadd(-16.17, 71.58, -43.56, 0.5)
	pt3dadd(-16.32, 71.75, -43.56, 0.5)
	pt3dadd(-16.32, 72.08, -43.56, 0.5)
	pt3dadd(-16.5, 72.42, -43.56, 0.5)
	pt3dadd(-16.67, 72.58, -43.56, 0.5)
	pt3dadd(-16.82, 72.75, -43.56, 0.5)
	pt3dadd(-17, 72.92, -43.56, 0.5)
	pt3dadd(-17.17, 73.08, -43.56, 0.5)
	pt3dadd(-17.17, 73.42, -43.56, 0.5)
	pt3dadd(-17.32, 73.58, -43.56, 0.5)
	pt3dadd(-17.5, 73.92, -43.56, 0.5)
	pt3dadd(-17.67, 74.08, -43.56, 0.5)
	pt3dadd(-17.82, 74.42, -43.56, 0.5)
	pt3dadd(-17.82, 74.75, -43.56, 0.5)
	pt3dadd(-18, 74.92, -43.56, 0.5)
	pt3dadd(-18.17, 75.08, -43.56, 0.5)
	pt3dadd(-18.17, 74.92, -43.56, 0.5)
  }
  dend[194] {pt3dclear()
	pt3dadd(-7.83, 64.08, -45.72, 0.83)
	pt3dadd(-7.17, 63.58, -45.72, 0.83)
	pt3dadd(-7.17, 63.92, -45.72, 0.83)
	pt3dadd(-7.5, 64.25, -45.72, 0.83)
	pt3dadd(-7.67, 64.42, -45.72, 0.83)
	pt3dadd(-7.83, 64.58, -45.72, 0.83)
	pt3dadd(-7.83, 64.92, -45.72, 0.83)
	pt3dadd(-8, 65.08, -45.72, 0.83)
	pt3dadd(-8.17, 65.25, -45.72, 0.83)
	pt3dadd(-8.33, 65.58, -45.72, 0.83)
	pt3dadd(-8.33, 65.92, -45.72, 0.83)
	pt3dadd(-8.5, 65.92, -45.72, 0.83)
  }
  dend[195] {pt3dclear()
	pt3dadd(-8.5, 65.92, -45.72, 0.83)
	pt3dadd(-8, 66.08, -48.6, 0.67)
	pt3dadd(-7.67, 65.92, -48.6, 0.67)
	pt3dadd(-7.33, 65.92, -48.6, 0.67)
	pt3dadd(-7, 65.75, -48.6, 0.67)
	pt3dadd(-5, 65.75, -48.6, 0.67)
	pt3dadd(-5, 65.92, -48.6, 0.67)
  }
  dend[196] {pt3dclear()
	pt3dadd(-5, 65.92, -48.6, 0.67)
	pt3dadd(-4.67, 66.25, -49.32, 0.67)
	pt3dadd(-4.17, 66.25, -49.32, 0.67)
	pt3dadd(-4, 66.08, -49.32, 0.67)
	pt3dadd(-2, 66.08, -49.32, 0.67)
	pt3dadd(-1.83, 66.25, -49.32, 0.67)
	pt3dadd(-1.67, 66.42, -49.32, 0.67)
	pt3dadd(-1.5, 66.58, -49.32, 0.67)
	pt3dadd(-1.33, 66.75, -49.32, 0.67)
	pt3dadd(-1.17, 66.92, -49.32, 0.67)
	pt3dadd(-0.5, 66.92, -49.32, 0.67)
	pt3dadd(-0.33, 66.75, -49.32, 0.67)
	pt3dadd(-0.17, 66.58, -49.32, 0.67)
	pt3dadd(0, 66.42, -49.32, 0.67)
	pt3dadd(0.17, 66.08, -49.32, 0.67)
	pt3dadd(0.33, 65.92, -49.32, 0.67)
	pt3dadd(0.67, 65.75, -49.32, 0.67)
	pt3dadd(0.83, 65.58, -49.32, 0.67)
	pt3dadd(1.17, 65.58, -49.32, 0.67)
	pt3dadd(1.33, 65.42, -49.32, 0.67)
	pt3dadd(1.5, 65.25, -49.32, 0.67)
	pt3dadd(1.67, 65.08, -49.32, 0.67)
	pt3dadd(1.83, 64.75, -49.32, 0.67)
	pt3dadd(1.83, 63.42, -49.32, 0.67)
  }
  dend[197] {pt3dclear()
	pt3dadd(1.83, 63.42, -49.32, 0.67)
	pt3dadd(2, 62.92, -49.32, 0.67)
	pt3dadd(1.83, 62.75, -49.32, 0.67)
	pt3dadd(1.67, 62.58, -49.32, 0.67)
	pt3dadd(1.5, 62.42, -49.32, 0.67)
	pt3dadd(1.17, 62.25, -49.32, 0.67)
	pt3dadd(1, 61.92, -49.32, 0.67)
	pt3dadd(1, 61.25, -49.32, 0.67)
	pt3dadd(1.17, 60.92, -49.32, 0.67)
	pt3dadd(1.17, 60.58, -49.32, 0.67)
	pt3dadd(1.5, 60.42, -49.32, 0.67)
	pt3dadd(1.5, 60.08, -49.32, 0.67)
	pt3dadd(1.67, 59.92, -49.32, 0.67)
	pt3dadd(1.83, 59.75, -49.32, 0.67)
	pt3dadd(2, 59.58, -49.32, 0.67)
	pt3dadd(2.17, 59.42, -49.32, 0.67)
	pt3dadd(2.5, 59.42, -49.32, 0.67)
	pt3dadd(2.67, 59.25, -49.32, 0.67)
	pt3dadd(2.83, 59.08, -49.32, 0.67)
	pt3dadd(3, 58.92, -49.32, 0.67)
	pt3dadd(3.17, 58.75, -49.32, 0.67)
  }
  dend[198] {pt3dclear()
	pt3dadd(1.83, 63.42, -49.32, 0.67)
	pt3dadd(2.33, 62.92, -49.32, 0.67)
	pt3dadd(2.67, 62.75, -49.32, 0.67)
	pt3dadd(3, 62.58, -49.32, 0.67)
	pt3dadd(3.5, 62.42, -49.32, 0.67)
	pt3dadd(3.67, 62.25, -49.32, 0.67)
	pt3dadd(3.83, 62.08, -49.32, 0.67)
	pt3dadd(4, 61.92, -49.32, 0.67)
	pt3dadd(4.33, 61.75, -49.32, 0.67)
	pt3dadd(4.67, 61.58, -49.32, 0.67)
	pt3dadd(4.83, 61.42, -49.32, 0.67)
	pt3dadd(5.17, 61.25, -49.32, 0.67)
	pt3dadd(5.33, 61.08, -49.32, 0.67)
	pt3dadd(5.5, 60.92, -49.32, 0.67)
	pt3dadd(5.67, 60.75, -49.32, 0.67)
  }
  dend[199] {pt3dclear()
	pt3dadd(-5, 65.92, -48.6, 0.67)
	pt3dadd(-4.67, 65.92, -48.6, 0.67)
	pt3dadd(-4.5, 66.08, -48.6, 0.67)
	pt3dadd(-4.5, 66.42, -48.6, 0.67)
  }
}
proc shape3d_16() {
  dend[199] {	pt3dadd(-4.67, 66.75, -48.6, 0.67)
	pt3dadd(-4.83, 67.08, -48.6, 0.67)
	pt3dadd(-4.83, 67.75, -48.6, 0.67)
	pt3dadd(-5, 67.92, -48.6, 0.67)
	pt3dadd(-5, 70.42, -48.6, 0.67)
	pt3dadd(-5.17, 70.42, -48.6, 0.67)
  }
  dend[200] {pt3dclear()
	pt3dadd(-8.5, 65.92, -45.72, 0.83)
	pt3dadd(-8, 65.92, -45.72, 0.83)
	pt3dadd(-8.17, 66.08, -45.72, 0.83)
	pt3dadd(-8.5, 66.25, -45.72, 0.83)
	pt3dadd(-8.5, 66.58, -45.72, 0.83)
	pt3dadd(-8.67, 66.75, -45.72, 0.83)
	pt3dadd(-8.83, 66.92, -45.72, 0.83)
	pt3dadd(-9, 67.08, -45.72, 0.83)
	pt3dadd(-9, 67.25, -45.72, 0.83)
  }
  dend[201] {pt3dclear()
	pt3dadd(-9, 67.25, -45.72, 0.83)
	pt3dadd(-9, 66.92, -45.36, 0.67)
	pt3dadd(-9.17, 67.08, -45.36, 0.67)
	pt3dadd(-9.33, 67.25, -45.36, 0.67)
	pt3dadd(-9.67, 67.42, -45.36, 0.67)
	pt3dadd(-10, 67.75, -45.36, 0.67)
	pt3dadd(-10.17, 67.92, -45.36, 0.67)
	pt3dadd(-10.33, 68.08, -45.36, 0.67)
	pt3dadd(-10.5, 68.25, -45.36, 0.67)
	pt3dadd(-10.67, 68.42, -45.36, 0.67)
	pt3dadd(-11, 68.58, -45.36, 0.67)
	pt3dadd(-11.17, 68.75, -45.36, 0.67)
	pt3dadd(-11.17, 69.08, -45.36, 0.67)
	pt3dadd(-11.33, 69.25, -45.36, 0.67)
	pt3dadd(-11.5, 69.42, -45.36, 0.67)
	pt3dadd(-11.5, 69.58, -45.36, 0.67)
  }
  dend[202] {pt3dclear()
	pt3dadd(-11.5, 69.58, -45.36, 0.67)
	pt3dadd(-11.33, 69.42, -43.92, 0.67)
	pt3dadd(-12, 69.42, -43.92, 0.67)
	pt3dadd(-12.17, 69.58, -43.92, 0.67)
	pt3dadd(-12.67, 69.58, -43.92, 0.67)
	pt3dadd(-12.83, 69.75, -43.92, 0.67)
	pt3dadd(-13.17, 69.75, -43.92, 0.67)
	pt3dadd(-13.33, 69.92, -43.92, 0.67)
	pt3dadd(-13.67, 69.92, -43.92, 0.67)
	pt3dadd(-13.83, 70.08, -43.92, 0.67)
	pt3dadd(-14, 70.08, -43.92, 0.67)
  }
  dend[203] {pt3dclear()
	pt3dadd(-11.5, 69.58, -45.36, 0.67)
	pt3dadd(-11.5, 69.75, -45.36, 0.67)
	pt3dadd(-11.5, 70.58, -45.36, 0.67)
	pt3dadd(-11.67, 70.92, -45.36, 0.67)
	pt3dadd(-11.67, 74.08, -45.36, 0.67)
	pt3dadd(-11.5, 74.25, -45.36, 0.67)
	pt3dadd(-11.33, 74.42, -45.36, 0.67)
	pt3dadd(-11.17, 74.58, -45.36, 0.67)
	pt3dadd(-11.17, 74.75, -45.36, 0.67)
  }
  dend[204] {pt3dclear()
	pt3dadd(-9, 67.25, -45.72, 0.83)
	pt3dadd(-9, 67.42, -44.64, 0.83)
	pt3dadd(-9.17, 67.58, -44.64, 0.83)
	pt3dadd(-9.17, 67.92, -44.64, 0.83)
	pt3dadd(-9.33, 68.08, -44.64, 0.83)
	pt3dadd(-9.5, 68.25, -44.64, 0.83)
	pt3dadd(-9.5, 68.75, -44.64, 0.83)
	pt3dadd(-9.67, 68.92, -44.64, 0.83)
	pt3dadd(-9.67, 69.58, -44.64, 0.83)
	pt3dadd(-9.83, 69.75, -44.64, 0.83)
	pt3dadd(-9.83, 70.08, -44.64, 0.83)
	pt3dadd(-10, 70.25, -44.64, 0.83)
	pt3dadd(-10, 71.08, -44.64, 0.83)
	pt3dadd(-10.17, 71.25, -44.64, 0.83)
	pt3dadd(-10.17, 74.08, -44.64, 0.83)
  }
  dend[205] {pt3dclear()
	pt3dadd(-10.17, 74.08, -44.64, 0.83)
	pt3dadd(-10.5, 74.42, -44.64, 0.33)
	pt3dadd(-10.33, 74.25, -44.64, 0.33)
	pt3dadd(-10.17, 73.92, -44.64, 0.33)
	pt3dadd(-10, 73.75, -44.64, 0.33)
	pt3dadd(-9.83, 73.42, -44.64, 0.33)
	pt3dadd(-9.67, 73.25, -44.64, 0.33)
	pt3dadd(-9.5, 73.08, -44.64, 0.33)
	pt3dadd(-9.33, 72.92, -44.64, 0.33)
	pt3dadd(-9.17, 72.75, -44.64, 0.33)
	pt3dadd(-8, 72.75, -44.64, 0.33)
	pt3dadd(-7.83, 72.92, -44.64, 0.33)
	pt3dadd(-7.67, 73.08, -44.64, 0.33)
	pt3dadd(-7.33, 73.08, -46.08, 0.33)
	pt3dadd(-7.17, 73.25, -46.08, 0.33)
	pt3dadd(-7, 73.42, -46.08, 0.33)
	pt3dadd(-6.67, 73.58, -46.08, 0.33)
	pt3dadd(-6.5, 73.75, -46.08, 0.33)
	pt3dadd(-6.17, 73.75, -46.08, 0.33)
	pt3dadd(-6, 73.92, -46.08, 0.33)
	pt3dadd(-5.83, 74.08, -46.08, 0.33)
	pt3dadd(-5.5, 74.08, -46.08, 0.33)
	pt3dadd(-5.33, 74.25, -46.08, 0.33)
	pt3dadd(-5.17, 74.42, -46.08, 0.33)
	pt3dadd(-4.83, 74.58, -46.08, 0.33)
  }
  dend[206] {pt3dclear()
	pt3dadd(-10.17, 74.08, -44.64, 0.83)
	pt3dadd(-9.83, 74.08, -45.72, 0.83)
	pt3dadd(-9.83, 75.42, -45.72, 0.83)
	pt3dadd(-10, 75.75, -45.72, 0.83)
	pt3dadd(-10.17, 75.92, -45.72, 0.83)
	pt3dadd(-10.33, 76.08, -45.72, 0.83)
	pt3dadd(-10.67, 76.25, -45.72, 0.83)
	pt3dadd(-11, 76.42, -45.72, 0.83)
	pt3dadd(-11.33, 76.42, -45.72, 0.83)
	pt3dadd(-11.5, 76.58, -45.72, 0.83)
	pt3dadd(-12, 76.58, -45.72, 0.83)
  }
  dend[207] {pt3dclear()
	pt3dadd(-12, 76.58, -45.72, 0.83)
	pt3dadd(-12.17, 76.58, -46.08, 0.33)
	pt3dadd(-12.33, 76.42, -46.08, 0.33)
	pt3dadd(-12.5, 76.25, -46.08, 0.33)
	pt3dadd(-12.83, 76.08, -46.08, 0.33)
	pt3dadd(-13.33, 75.58, -46.08, 0.33)
	pt3dadd(-13.67, 75.42, -46.08, 0.33)
	pt3dadd(-13.83, 75.25, -46.08, 0.33)
	pt3dadd(-14, 75.08, -46.08, 0.33)
	pt3dadd(-14.33, 75.08, -46.08, 0.33)
	pt3dadd(-14.5, 74.92, -46.08, 0.33)
	pt3dadd(-14.67, 74.75, -46.08, 0.33)
	pt3dadd(-15, 74.75, -46.08, 0.33)
	pt3dadd(-15.17, 74.58, -46.08, 0.33)
	pt3dadd(-15.5, 74.42, -46.08, 0.33)
	pt3dadd(-15.67, 74.25, -46.08, 0.33)
	pt3dadd(-15.83, 73.92, -46.08, 0.33)
	pt3dadd(-15.83, 73.58, -46.08, 0.33)
	pt3dadd(-16, 73.25, -46.08, 0.33)
	pt3dadd(-16.17, 73.08, -46.08, 0.33)
  }
  dend[208] {pt3dclear()
	pt3dadd(-12, 76.58, -45.72, 0.83)
	pt3dadd(-11.83, 76.42, -45.72, 0.83)
	pt3dadd(-12, 76.75, -45.72, 0.83)
	pt3dadd(-12.33, 76.92, -45.72, 0.83)
	pt3dadd(-13, 77.42, -45.72, 0.83)
	pt3dadd(-13.33, 77.58, -45.72, 0.83)
	pt3dadd(-13.5, 77.92, -45.72, 0.83)
	pt3dadd(-13.67, 78.08, -45.72, 0.83)
	pt3dadd(-14, 78.25, -45.72, 0.83)
	pt3dadd(-14.33, 78.58, -45.72, 0.83)
	pt3dadd(-14.67, 78.75, -45.72, 0.83)
	pt3dadd(-14.83, 78.92, -45.72, 0.83)
	pt3dadd(-16.5, 78.92, -45.72, 0.83)
  }
  dend[209] {pt3dclear()
	pt3dadd(12, 47.33, -49.32, 1.83)
	pt3dadd(12.17, 47.5, -49.32, 1.83)
	pt3dadd(12.33, 47.83, -49.32, 1.83)
	pt3dadd(12.5, 48, -49.32, 1.83)
	pt3dadd(12.67, 48.17, -49.32, 1.83)
	pt3dadd(12.83, 48.33, -49.32, 1.83)
	pt3dadd(13, 48.5, -49.32, 1.83)
	pt3dadd(13.17, 48.83, -49.32, 1.83)
	pt3dadd(13.33, 49.17, -49.32, 1.83)
	pt3dadd(13.17, 49, -50.76, 1.83)
	pt3dadd(13.33, 49.17, -50.76, 1.83)
	pt3dadd(13.33, 49.83, -50.76, 1.83)
	pt3dadd(13.5, 50, -50.76, 1.83)
	pt3dadd(13.5, 50.5, -50.76, 1.83)
	pt3dadd(13.83, 50.67, -50.76, 1.83)
	pt3dadd(13.83, 51, -50.76, 1.83)
	pt3dadd(13.67, 51.33, -50.76, 1.83)
	pt3dadd(13.5, 51.67, -50.76, 1.83)
	pt3dadd(13.5, 53.33, -50.76, 1.83)
	pt3dadd(13.33, 53.5, -50.76, 1.83)
	pt3dadd(13.33, 54, -50.76, 1.83)
	pt3dadd(13.17, 54.17, -50.76, 1.83)
	pt3dadd(13.17, 54.67, -50.76, 1.83)
	pt3dadd(13, 54.83, -50.76, 1.83)
	pt3dadd(13, 55.33, -50.76, 1.83)
	pt3dadd(12.83, 55.67, -50.76, 1.83)
	pt3dadd(12.83, 56, -50.76, 1.83)
	pt3dadd(12.67, 56.17, -50.76, 1.83)
	pt3dadd(12.5, 56.33, -50.76, 1.83)
	pt3dadd(12.33, 56.5, -50.76, 1.83)
  }
  dend[210] {pt3dclear()
	pt3dadd(12.33, 56.5, -50.76, 1.83)
	pt3dadd(12.5, 56.67, -50.76, 1.83)
	pt3dadd(12.17, 56.67, -50.76, 1.83)
	pt3dadd(12, 56.83, -50.76, 1.83)
	pt3dadd(11.67, 56.83, -50.76, 1.83)
	pt3dadd(11.5, 57, -50.76, 1.83)
	pt3dadd(11.33, 57.17, -50.76, 1.83)
	pt3dadd(11.17, 57.33, -50.76, 1.83)
	pt3dadd(11, 57.5, -50.76, 1.83)
	pt3dadd(10.83, 57.67, -50.76, 1.83)
	pt3dadd(10.5, 57.67, -50.76, 1.83)
	pt3dadd(10.33, 57.83, -50.76, 1.83)
	pt3dadd(10, 58, -50.76, 1.83)
	pt3dadd(9.83, 58.17, -50.76, 1.83)
	pt3dadd(9.67, 58.33, -50.76, 1.83)
	pt3dadd(9.5, 58.5, -50.76, 1.83)
	pt3dadd(9.17, 58.5, -50.76, 1.83)
	pt3dadd(9, 58.67, -50.76, 1.83)
	pt3dadd(8.83, 58.83, -50.76, 1.83)
	pt3dadd(8.67, 59, -50.76, 1.83)
	pt3dadd(8.5, 59.17, -50.76, 1)
	pt3dadd(8.33, 59.33, -50.76, 1)
	pt3dadd(8.17, 59.5, -50.76, 1)
	pt3dadd(8.17, 59.83, -50.76, 1)
	pt3dadd(8, 60, -50.76, 1)
	pt3dadd(7.83, 60.17, -50.76, 1)
	pt3dadd(7.83, 60.5, -50.76, 1)
	pt3dadd(7.67, 60.67, -50.76, 1)
	pt3dadd(7.5, 60.83, -50.76, 1)
	pt3dadd(7.33, 61.17, -50.76, 1)
	pt3dadd(7.17, 61.33, -50.76, 1)
	pt3dadd(7.17, 61.67, -50.76, 1)
	pt3dadd(7, 61.83, -50.76, 1)
	pt3dadd(6.83, 62.17, -50.76, 1)
	pt3dadd(6.67, 62.33, -50.76, 1)
  }
}
proc shape3d_17() {
  dend[210] {	pt3dadd(6.5, 62.5, -50.76, 1)
	pt3dadd(6.33, 62.67, -50.76, 1)
	pt3dadd(6.33, 63, -50.76, 1)
	pt3dadd(6.17, 63.33, -50.76, 1)
	pt3dadd(6, 63.5, -50.76, 1)
	pt3dadd(6, 63.83, -50.76, 1)
	pt3dadd(5.83, 64, -50.76, 1)
	pt3dadd(5.67, 64.17, -50.76, 1)
  }
  dend[211] {pt3dclear()
	pt3dadd(5.67, 64.17, -50.76, 1)
	pt3dadd(5.67, 64.08, -47.52, 1)
	pt3dadd(5.33, 64.25, -48.6, 1)
	pt3dadd(4.67, 64.25, -48.6, 1)
	pt3dadd(4.5, 64.42, -48.6, 1)
	pt3dadd(4.33, 64.58, -48.6, 1)
	pt3dadd(4.17, 64.75, -48.6, 1)
	pt3dadd(4, 64.92, -48.6, 1)
	pt3dadd(3.83, 65.08, -48.6, 1)
	pt3dadd(3.5, 65.25, -48.6, 1)
	pt3dadd(3.17, 65.42, -48.6, 1)
	pt3dadd(3, 65.58, -48.6, 1)
	pt3dadd(2.83, 65.75, -48.6, 1)
	pt3dadd(2.67, 65.92, -48.6, 1)
	pt3dadd(2.5, 66.08, -48.6, 1)
	pt3dadd(2.33, 66.25, -48.6, 1)
	pt3dadd(2.17, 66.42, -48.6, 1)
	pt3dadd(1.83, 66.58, -48.6, 1)
	pt3dadd(1.5, 66.92, -48.6, 1)
	pt3dadd(1.33, 67.08, -48.6, 1)
	pt3dadd(1.33, 67.42, -48.6, 1)
	pt3dadd(1, 67.58, -48.6, 1)
	pt3dadd(0.83, 67.75, -48.6, 1)
	pt3dadd(0.67, 67.92, -48.6, 1)
	pt3dadd(0.5, 68.08, -48.6, 1)
	pt3dadd(0.33, 68.25, -48.6, 1)
	pt3dadd(0, 68.58, -48.6, 1)
	pt3dadd(-0.17, 68.75, -48.24, 1)
	pt3dadd(-0.67, 68.92, -48.24, 1)
	pt3dadd(-1.17, 69.08, -48.24, 1)
	pt3dadd(-1.5, 69.42, -48.24, 1)
	pt3dadd(-1.67, 69.58, -48.24, 1)
	pt3dadd(-2, 69.75, -48.24, 1)
	pt3dadd(-2.33, 69.92, -48.24, 1)
	pt3dadd(-2.67, 70.08, -48.24, 1)
	pt3dadd(-2.83, 70.42, -48.24, 1)
	pt3dadd(-3.17, 70.58, -48.24, 1)
	pt3dadd(-3.33, 70.75, -48.24, 1)
	pt3dadd(-3.5, 70.92, -48.24, 1)
	pt3dadd(-3.67, 71.25, -48.24, 1)
	pt3dadd(-3.83, 71.42, -48.24, 1)
	pt3dadd(-4, 71.58, -48.24, 1)
	pt3dadd(-4.33, 71.75, -48.24, 1)
	pt3dadd(-4.67, 72.08, -48.24, 1)
	pt3dadd(-5, 72.25, -48.24, 1)
	pt3dadd(-5.5, 72.58, -48.24, 1)
	pt3dadd(-6, 72.92, -48.24, 1)
	pt3dadd(-6.33, 73.08, -48.24, 1)
	pt3dadd(-6.5, 73.25, -48.24, 1)
	pt3dadd(-6.67, 73.42, -48.24, 1)
	pt3dadd(-6.67, 73.75, -48.24, 1)
	pt3dadd(-6.83, 73.92, -48.24, 1)
	pt3dadd(-7, 74.08, -48.24, 1)
	pt3dadd(-7.17, 74.25, -48.24, 1)
	pt3dadd(-7.33, 74.42, -48.24, 1)
	pt3dadd(-7.83, 74.92, -48.24, 1)
	pt3dadd(-8, 75.08, -48.24, 1)
	pt3dadd(-8.17, 75.25, -48.24, 1)
	pt3dadd(-8.33, 75.42, -48.24, 1)
	pt3dadd(-8.5, 75.58, -48.24, 1)
	pt3dadd(-8.5, 75.92, -48.24, 1)
	pt3dadd(-8.67, 76.08, -48.24, 1)
	pt3dadd(-8.83, 76.25, -48.24, 1)
	pt3dadd(-9, 76.42, -48.24, 1)
	pt3dadd(-9.17, 76.75, -48.24, 1)
	pt3dadd(-9.33, 76.92, -48.24, 1)
	pt3dadd(-9.33, 77.25, -48.24, 1)
	pt3dadd(-9.5, 77.58, -48.24, 1)
	pt3dadd(-9.67, 77.75, -47.88, 1)
	pt3dadd(-9.83, 78.08, -47.88, 1)
	pt3dadd(-10, 78.25, -47.88, 1)
	pt3dadd(-10.17, 78.42, -47.88, 1)
	pt3dadd(-10.33, 78.58, -47.88, 1)
	pt3dadd(-10.5, 78.75, -47.88, 1)
	pt3dadd(-10.83, 78.92, -47.88, 1)
	pt3dadd(-11, 79.08, -47.88, 1)
	pt3dadd(-11.17, 79.25, -47.88, 1)
	pt3dadd(-11.33, 79.42, -47.88, 1)
	pt3dadd(-11.67, 79.58, -47.88, 1)
	pt3dadd(-11.83, 79.75, -47.88, 1)
	pt3dadd(-12, 79.92, -47.88, 1)
	pt3dadd(-12.33, 80.08, -47.88, 1)
	pt3dadd(-12.5, 80.25, -47.88, 1)
	pt3dadd(-12.67, 80.42, -47.88, 1)
	pt3dadd(-12.83, 80.58, -47.88, 1)
	pt3dadd(-13, 80.75, -47.88, 1)
	pt3dadd(-13.33, 80.92, -47.88, 1)
	pt3dadd(-13.5, 81.08, -47.88, 1)
	pt3dadd(-13.67, 81.25, -47.88, 1)
	pt3dadd(-13.83, 81.42, -47.88, 1)
	pt3dadd(-14, 81.58, -47.88, 1)
	pt3dadd(-14.17, 81.75, -47.88, 1)
	pt3dadd(-14.33, 82.08, -47.88, 1)
	pt3dadd(-14.5, 82.25, -47.88, 1)
	pt3dadd(-14.67, 82.42, -47.88, 1)
	pt3dadd(-14.83, 82.75, -47.88, 1)
	pt3dadd(-15.17, 82.75, -47.88, 1)
	pt3dadd(-15.33, 82.92, -47.88, 1)
	pt3dadd(-15.5, 83.08, -47.88, 1)
	pt3dadd(-15.83, 83.42, -47.88, 1)
	pt3dadd(-16, 83.58, -47.88, 1)
	pt3dadd(-16.17, 83.92, -47.88, 1)
	pt3dadd(-16.32, 84.08, -47.88, 1)
	pt3dadd(-16.5, 84.25, -47.88, 1)
	pt3dadd(-16.67, 84.42, -47.88, 1)
  }
  dend[212] {pt3dclear()
	pt3dadd(-16.67, 84.42, -47.88, 1)
	pt3dadd(-16.17, 84.58, -47.88, 1)
	pt3dadd(-18, 84.58, -47.88, 1)
	pt3dadd(-18.17, 84.75, -47.88, 1)
  }
  dend[213] {pt3dclear()
	pt3dadd(-18.17, 84.75, -47.88, 1)
	pt3dadd(-18.32, 84.75, -47.16, 0.67)
	pt3dadd(-18.5, 84.92, -47.16, 0.67)
	pt3dadd(-18.67, 85.08, -47.16, 0.67)
	pt3dadd(-19, 85.08, -47.16, 0.67)
	pt3dadd(-19.32, 85.25, -47.16, 0.67)
	pt3dadd(-19.5, 85.42, -47.16, 0.67)
	pt3dadd(-19.67, 85.58, -47.16, 0.67)
	pt3dadd(-19.82, 85.75, -47.16, 0.67)
	pt3dadd(-19.82, 86.25, -47.16, 0.67)
	pt3dadd(-20, 86.42, -47.16, 0.67)
	pt3dadd(-20, 87.58, -47.16, 0.67)
	pt3dadd(-20.17, 87.58, -47.16, 0.67)
  }
  dend[214] {pt3dclear()
	pt3dadd(-20.17, 87.58, -47.16, 0.67)
	pt3dadd(-20, 87.58, -45.36, 0.67)
	pt3dadd(-20, 88.08, -45.36, 0.67)
	pt3dadd(-20.17, 88.25, -45.36, 0.67)
	pt3dadd(-20.32, 88.58, -45.36, 0.67)
	pt3dadd(-20.32, 88.92, -45.36, 0.67)
	pt3dadd(-20.5, 89.08, -45.36, 0.67)
	pt3dadd(-20.5, 89.42, -45.36, 0.67)
	pt3dadd(-20.67, 89.58, -45.36, 0.67)
	pt3dadd(-20.67, 90.08, -45.36, 0.67)
	pt3dadd(-20.83, 90.25, -45.36, 0.67)
	pt3dadd(-20.83, 90.42, -45.36, 0.67)
  }
  dend[215] {pt3dclear()
	pt3dadd(-20.83, 90.42, -45.36, 0.67)
	pt3dadd(-20.83, 90.42, -46.44, 0.67)
	pt3dadd(-21, 90.75, -46.44, 0.67)
	pt3dadd(-21.17, 90.92, -46.44, 0.67)
	pt3dadd(-21.33, 91.25, -46.44, 0.67)
	pt3dadd(-21.5, 91.58, -46.44, 0.67)
	pt3dadd(-21.5, 92.08, -46.44, 0.67)
	pt3dadd(-21.67, 92.25, -46.44, 0.67)
	pt3dadd(-21.67, 92.58, -46.44, 0.67)
	pt3dadd(-21.83, 92.75, -46.44, 0.67)
	pt3dadd(-22, 93.08, -46.44, 0.67)
	pt3dadd(-22.17, 93.42, -46.44, 0.67)
	pt3dadd(-22.17, 93.75, -46.44, 0.67)
	pt3dadd(-22.33, 93.92, -46.44, 0.67)
	pt3dadd(-22.5, 94.08, -46.44, 0.67)
	pt3dadd(-22.67, 94.25, -46.44, 0.67)
	pt3dadd(-22.67, 94.58, -46.44, 0.67)
	pt3dadd(-22.83, 94.75, -46.44, 0.67)
	pt3dadd(-22.83, 95.08, -46.44, 0.67)
	pt3dadd(-23, 95.25, -46.44, 0.67)
	pt3dadd(-23, 95.58, -46.44, 0.67)
	pt3dadd(-23.17, 95.75, -46.44, 0.67)
	pt3dadd(-23.17, 96.08, -46.44, 0.67)
	pt3dadd(-23.33, 96.25, -46.44, 0.67)
	pt3dadd(-23.5, 96.42, -46.44, 0.67)
	pt3dadd(-23.67, 96.75, -46.44, 0.67)
	pt3dadd(-23.67, 96.92, -46.44, 0.67)
  }
  dend[216] {pt3dclear()
	pt3dadd(-23.67, 96.92, -46.44, 0.67)
	pt3dadd(-23.67, 96.92, -46.8, 0.67)
	pt3dadd(-23.83, 97.08, -46.8, 0.67)
	pt3dadd(-24.33, 97.08, -46.08, 0.67)
	pt3dadd(-24.5, 97.25, -46.08, 0.67)
	pt3dadd(-24.83, 97.42, -46.08, 0.67)
	pt3dadd(-25, 97.58, -46.08, 0.67)
	pt3dadd(-25.17, 97.75, -46.08, 0.67)
	pt3dadd(-25.33, 97.92, -46.08, 0.67)
	pt3dadd(-26, 98.58, -46.08, 0.67)
	pt3dadd(-26.17, 98.75, -46.08, 0.67)
	pt3dadd(-26.33, 98.92, -47.88, 0.67)
	pt3dadd(-26.33, 99.25, -47.88, 0.67)
	pt3dadd(-26.5, 99.58, -47.88, 0.67)
	pt3dadd(-26.67, 99.75, -47.88, 0.67)
	pt3dadd(-26.83, 99.92, -47.88, 0.67)
	pt3dadd(-27, 100.08, -47.88, 0.67)
	pt3dadd(-27, 100.42, -47.88, 0.67)
	pt3dadd(-27.17, 100.58, -47.88, 0.67)
	pt3dadd(-27.17, 100.92, -47.88, 0.67)
	pt3dadd(-27.33, 101.08, -47.88, 0.67)
	pt3dadd(-27.5, 101.42, -47.88, 0.67)
	pt3dadd(-27.67, 101.58, -47.88, 0.67)
	pt3dadd(-27.67, 101.92, -47.88, 0.67)
	pt3dadd(-27.83, 102.08, -47.88, 0.67)
	pt3dadd(-28, 102.25, -47.88, 0.67)
	pt3dadd(-28.17, 102.58, -47.88, 0.67)
	pt3dadd(-28.33, 102.92, -47.88, 0.67)
	pt3dadd(-28.33, 103.42, -47.88, 0.67)
	pt3dadd(-28.5, 103.75, -47.88, 0.67)
	pt3dadd(-28.5, 104.92, -47.88, 0.67)
  }
}
proc shape3d_18() {
  dend[216] {	pt3dadd(-28.67, 105.25, -47.88, 0.67)
	pt3dadd(-28.67, 105.92, -47.88, 0.67)
	pt3dadd(-28.83, 106.08, -47.88, 0.67)
	pt3dadd(-28.83, 109.58, -47.88, 0.67)
	pt3dadd(-28.67, 110.08, -47.88, 0.67)
	pt3dadd(-28.67, 110.25, -47.88, 0.67)
  }
  dend[217] {pt3dclear()
	pt3dadd(-28.67, 110.25, -47.88, 0.67)
	pt3dadd(-28.33, 110.42, -49.32, 0.67)
	pt3dadd(-28.33, 110.75, -49.32, 0.67)
	pt3dadd(-28.5, 111.08, -49.32, 0.67)
	pt3dadd(-28.5, 111.42, -49.32, 0.67)
	pt3dadd(-28.33, 111.75, -49.32, 0.67)
	pt3dadd(-28.17, 111.92, -49.32, 0.67)
	pt3dadd(-28, 112.08, -49.32, 0.67)
	pt3dadd(-28, 113.08, -49.32, 0.67)
	pt3dadd(-28.17, 113.25, -49.32, 0.67)
	pt3dadd(-28, 113.42, -49.32, 0.67)
	pt3dadd(-28, 114.58, -49.32, 0.67)
	pt3dadd(-28.17, 114.92, -49.32, 0.67)
	pt3dadd(-28.33, 115.08, -49.32, 0.67)
	pt3dadd(-28.33, 115.42, -49.32, 0.67)
	pt3dadd(-28.5, 115.75, -49.32, 0.67)
	pt3dadd(-28.67, 115.92, -49.32, 0.67)
	pt3dadd(-28.83, 116.08, -49.32, 0.67)
	pt3dadd(-28.83, 116.42, -49.32, 0.67)
	pt3dadd(-29, 116.75, -49.32, 0.67)
	pt3dadd(-29, 117.25, -49.32, 0.67)
	pt3dadd(-29.17, 117.58, -49.32, 0.67)
	pt3dadd(-29.17, 117.92, -49.32, 0.67)
	pt3dadd(-29.33, 118.08, -49.32, 0.67)
	pt3dadd(-29.33, 119.42, -49.32, 0.67)
	pt3dadd(-29.5, 119.75, -49.32, 0.67)
	pt3dadd(-29.5, 121.08, -49.32, 0.67)
	pt3dadd(-29.67, 121.25, -49.32, 0.67)
	pt3dadd(-29.67, 121.75, -49.32, 0.67)
	pt3dadd(-29.83, 121.92, -49.32, 0.67)
	pt3dadd(-29.83, 123.25, -49.32, 0.67)
	pt3dadd(-30, 123.25, -49.32, 0.67)
  }
  dend[218] {pt3dclear()
	pt3dadd(-30, 123.25, -49.32, 0.67)
	pt3dadd(-30.17, 123.08, -48.6, 0.33)
	pt3dadd(-30.33, 123.25, -48.6, 0.33)
	pt3dadd(-30.67, 123.25, -48.6, 0.33)
	pt3dadd(-31, 123.42, -48.6, 0.33)
	pt3dadd(-31.33, 123.42, -48.6, 0.33)
	pt3dadd(-31.5, 123.58, -48.6, 0.33)
	pt3dadd(-31.83, 123.58, -48.6, 0.33)
	pt3dadd(-32.17, 123.75, -48.6, 0.33)
	pt3dadd(-33, 123.75, -48.6, 0.33)
	pt3dadd(-33.17, 123.92, -48.6, 0.33)
	pt3dadd(-33.67, 123.92, -48.6, 0.33)
	pt3dadd(-33.83, 123.75, -48.6, 0.33)
	pt3dadd(-35.5, 123.75, -48.6, 0.33)
  }
  dend[219] {pt3dclear()
	pt3dadd(-30, 123.25, -49.32, 0.67)
	pt3dadd(-29.67, 123.42, -49.32, 0.33)
	pt3dadd(-29.67, 123.75, -49.32, 0.33)
	pt3dadd(-29.83, 123.92, -49.32, 0.33)
	pt3dadd(-29.83, 124.58, -49.32, 0.33)
	pt3dadd(-30, 124.75, -49.32, 0.33)
	pt3dadd(-30.17, 125.08, -49.32, 0.33)
	pt3dadd(-30.17, 127.58, -49.32, 0.33)
	pt3dadd(-30.33, 127.75, -49.32, 0.33)
	pt3dadd(-30.33, 129.08, -49.32, 0.33)
	pt3dadd(-30.17, 129.25, -49.32, 0.33)
	pt3dadd(-30.17, 129.58, -49.32, 0.33)
	pt3dadd(-30, 129.75, -49.32, 0.33)
	pt3dadd(-29.83, 129.91, -49.32, 0.33)
	pt3dadd(-30, 129.91, -49.32, 0.33)
  }
  dend[220] {pt3dclear()
	pt3dadd(-28.67, 110.25, -47.88, 0.67)
	pt3dadd(-28.5, 110.42, -47.52, 0.33)
	pt3dadd(-28.67, 110.58, -47.52, 0.33)
	pt3dadd(-28.83, 111.08, -47.52, 0.33)
	pt3dadd(-29, 111.58, -47.52, 0.33)
	pt3dadd(-29.17, 112.08, -47.52, 0.33)
	pt3dadd(-29.33, 112.58, -47.52, 0.33)
	pt3dadd(-29.5, 112.75, -47.52, 0.33)
	pt3dadd(-29.5, 113.08, -47.52, 0.33)
	pt3dadd(-29.67, 113.25, -47.52, 0.33)
	pt3dadd(-29.83, 113.42, -47.52, 0.33)
	pt3dadd(-29.83, 113.75, -47.52, 0.33)
	pt3dadd(-30, 114.08, -47.52, 0.33)
	pt3dadd(-30.17, 114.42, -47.52, 0.33)
	pt3dadd(-30.33, 114.58, -47.52, 0.33)
	pt3dadd(-30.33, 114.92, -47.52, 0.33)
	pt3dadd(-30.67, 115.25, -47.52, 0.33)
	pt3dadd(-30.83, 115.42, -47.52, 0.33)
	pt3dadd(-31, 115.58, -47.52, 0.33)
	pt3dadd(-31.17, 115.75, -47.52, 0.33)
	pt3dadd(-31.33, 115.92, -47.52, 0.33)
  }
  dend[221] {pt3dclear()
	pt3dadd(-31.33, 115.92, -47.52, 0.33)
	pt3dadd(-31, 115.92, -48.24, 0.33)
	pt3dadd(-31, 119.08, -48.24, 0.33)
	pt3dadd(-31.17, 119.25, -48.24, 0.33)
	pt3dadd(-31.17, 119.75, -48.24, 0.33)
	pt3dadd(-31.33, 120.08, -48.24, 0.33)
	pt3dadd(-31.33, 120.42, -48.24, 0.33)
	pt3dadd(-31.5, 120.58, -48.24, 0.33)
	pt3dadd(-31.5, 120.92, -48.24, 0.33)
	pt3dadd(-31.67, 121.08, -48.24, 0.33)
	pt3dadd(-31.67, 121.42, -48.24, 0.33)
	pt3dadd(-31.83, 121.58, -48.24, 0.33)
	pt3dadd(-31.83, 125.08, -48.24, 0.33)
	pt3dadd(-31.67, 125.25, -48.24, 0.33)
	pt3dadd(-31.67, 125.92, -48.24, 0.33)
	pt3dadd(-31.5, 126.08, -49.32, 0.33)
	pt3dadd(-31.5, 126.92, -49.32, 0.33)
	pt3dadd(-31.33, 127.08, -49.32, 0.33)
	pt3dadd(-31.33, 128.25, -49.32, 0.33)
	pt3dadd(-31.33, 128.08, -49.32, 0.33)
  }
  dend[222] {pt3dclear()
	pt3dadd(-31.33, 115.92, -47.52, 0.33)
	pt3dadd(-31.33, 116.08, -46.8, 0.33)
	pt3dadd(-31.67, 116.25, -46.8, 0.33)
	pt3dadd(-31.83, 116.42, -46.8, 0.33)
	pt3dadd(-32.33, 116.92, -46.8, 0.33)
	pt3dadd(-32.5, 117.08, -46.8, 0.33)
	pt3dadd(-32.67, 117.25, -46.8, 0.33)
	pt3dadd(-32.83, 117.42, -46.8, 0.33)
  }
  dend[223] {pt3dclear()
	pt3dadd(-32.83, 117.42, -46.8, 0.33)
	pt3dadd(-32.67, 117.75, -48.24, 0.33)
	pt3dadd(-32.5, 117.92, -48.24, 0.33)
	pt3dadd(-32.67, 118.25, -48.24, 0.33)
	pt3dadd(-32.67, 118.58, -48.24, 0.33)
	pt3dadd(-32.83, 118.92, -48.24, 0.33)
	pt3dadd(-33, 119.25, -48.24, 0.33)
	pt3dadd(-33, 119.92, -48.24, 0.33)
	pt3dadd(-33.17, 120.08, -48.24, 0.33)
	pt3dadd(-33.17, 120.58, -48.24, 0.33)
	pt3dadd(-33.33, 120.75, -48.24, 0.33)
	pt3dadd(-33.33, 121.25, -48.24, 0.33)
	pt3dadd(-33.5, 121.42, -48.24, 0.33)
	pt3dadd(-33.67, 121.75, -48.24, 0.33)
	pt3dadd(-33.67, 123.75, -48.24, 0.33)
	pt3dadd(-33.83, 123.75, -48.24, 0.33)
  }
  dend[224] {pt3dclear()
	pt3dadd(-33.83, 123.75, -48.24, 0.33)
	pt3dadd(-33.33, 123.92, -48.24, 0.33)
	pt3dadd(-33.33, 124.75, -48.24, 0.33)
	pt3dadd(-33.17, 125.08, -48.24, 0.33)
	pt3dadd(-33.17, 127.42, -49.68, 0.33)
	pt3dadd(-33, 127.75, -49.68, 0.33)
	pt3dadd(-33, 129.91, -49.68, 0.33)
	pt3dadd(-32.83, 130.08, -49.68, 0.33)
	pt3dadd(-32.83, 130.41, -49.68, 0.33)
  }
  dend[225] {pt3dclear()
	pt3dadd(-32.83, 130.41, -49.68, 0.33)
	pt3dadd(-32.33, 130.58, -50.4, 0.33)
	pt3dadd(-32.17, 130.75, -50.4, 0.33)
	pt3dadd(-32, 130.91, -50.4, 0.33)
	pt3dadd(-31.67, 130.91, -50.4, 0.33)
	pt3dadd(-31.33, 131.08, -50.4, 0.33)
	pt3dadd(-31, 131.25, -50.4, 0.33)
	pt3dadd(-30.83, 131.41, -50.4, 0.33)
	pt3dadd(-30.67, 131.58, -50.4, 0.33)
	pt3dadd(-30.5, 131.75, -50.4, 0.33)
	pt3dadd(-30.33, 131.91, -50.4, 0.33)
	pt3dadd(-30.17, 132.08, -50.4, 0.33)
	pt3dadd(-30, 132.25, -50.4, 0.33)
	pt3dadd(-29.83, 132.41, -50.4, 0.33)
	pt3dadd(-29.83, 132.75, -50.4, 0.33)
	pt3dadd(-29.67, 132.91, -50.4, 0.33)
	pt3dadd(-29.67, 133.58, -50.4, 0.33)
	pt3dadd(-29.83, 133.75, -50.4, 0.33)
	pt3dadd(-30, 134.08, -50.4, 0.33)
	pt3dadd(-30.17, 134.41, -50.4, 0.33)
	pt3dadd(-30.17, 135.08, -50.4, 0.33)
	pt3dadd(-30.33, 135.08, -50.4, 0.33)
  }
  dend[226] {pt3dclear()
	pt3dadd(-30.33, 135.08, -50.4, 0.33)
	pt3dadd(-29.83, 135.08, -50.4, 0.33)
	pt3dadd(-29.83, 135.41, -50.4, 0.33)
	pt3dadd(-30, 135.58, -50.4, 0.33)
	pt3dadd(-30.17, 135.75, -50.4, 0.33)
	pt3dadd(-30.33, 136.08, -50.4, 0.33)
	pt3dadd(-30.5, 136.25, -50.4, 0.33)
	pt3dadd(-30.83, 136.41, -50.4, 0.33)
	pt3dadd(-31, 136.58, -50.4, 0.33)
	pt3dadd(-31.17, 136.75, -50.4, 0.33)
	pt3dadd(-31.17, 139.91, -50.4, 0.33)
	pt3dadd(-31, 140.08, -50.4, 0.33)
	pt3dadd(-31, 140.41, -50.4, 0.33)
	pt3dadd(-30.83, 140.75, -50.4, 0.33)
	pt3dadd(-30.67, 140.91, -50.4, 0.33)
	pt3dadd(-30.67, 141.08, -50.4, 0.33)
  }
  dend[227] {pt3dclear()
	pt3dadd(-30.33, 135.08, -50.4, 0.33)
	pt3dadd(-29.83, 134.91, -51.12, 0.33)
	pt3dadd(-29.83, 136.25, -51.12, 0.33)
	pt3dadd(-29.67, 136.41, -51.12, 0.33)
	pt3dadd(-29.67, 137.08, -51.12, 0.33)
	pt3dadd(-29.5, 137.25, -51.12, 0.33)
	pt3dadd(-29.33, 137.58, -51.12, 0.33)
	pt3dadd(-29.33, 138.08, -51.12, 0.33)
	pt3dadd(-29.17, 138.25, -51.12, 0.33)
	pt3dadd(-29, 138.41, -51.12, 0.33)
	pt3dadd(-29, 138.91, -51.12, 0.33)
	pt3dadd(-28.83, 139.08, -51.12, 0.33)
	pt3dadd(-28.67, 139.25, -51.12, 0.33)
	pt3dadd(-28.67, 139.58, -51.12, 0.33)
	pt3dadd(-28.5, 139.75, -51.12, 0.33)
	pt3dadd(-28.33, 139.91, -51.12, 0.33)
	pt3dadd(-28.17, 140.08, -51.12, 0.33)
	pt3dadd(-27.67, 140.58, -51.12, 0.33)
	pt3dadd(-27.5, 140.75, -51.12, 0.33)
	pt3dadd(-27.33, 140.91, -51.12, 0.33)
	pt3dadd(-27.17, 141.08, -51.12, 0.33)
  }
}
proc shape3d_19() {
  dend[227] {	pt3dadd(-27, 141.25, -51.12, 0.33)
	pt3dadd(-26.83, 141.41, -51.12, 0.33)
	pt3dadd(-26.67, 141.58, -51.12, 0.33)
	pt3dadd(-26.5, 141.75, -51.12, 0.33)
  }
  dend[228] {pt3dclear()
	pt3dadd(-32.83, 130.41, -49.68, 0.33)
	pt3dadd(-32.67, 130.58, -50.76, 0.33)
	pt3dadd(-32.67, 131.58, -50.76, 0.33)
	pt3dadd(-32.5, 131.91, -50.76, 0.33)
	pt3dadd(-32.5, 133.75, -50.76, 0.33)
	pt3dadd(-32.67, 134.08, -50.76, 0.33)
	pt3dadd(-32.67, 134.58, -50.76, 0.33)
	pt3dadd(-32.83, 134.75, -50.76, 0.33)
	pt3dadd(-32.83, 135.25, -50.76, 0.33)
	pt3dadd(-33, 135.58, -50.76, 0.33)
	pt3dadd(-33, 136.25, -50.76, 0.33)
	pt3dadd(-33.17, 136.25, -50.76, 0.33)
  }
  dend[229] {pt3dclear()
	pt3dadd(-33.17, 136.25, -50.76, 0.33)
	pt3dadd(-32.83, 135.75, -50.76, 0.33)
	pt3dadd(-33, 136.08, -50.76, 0.33)
	pt3dadd(-33.5, 136.25, -50.76, 0.33)
	pt3dadd(-33.83, 136.41, -50.76, 0.33)
	pt3dadd(-34.17, 136.58, -50.76, 0.33)
	pt3dadd(-34.33, 136.91, -50.76, 0.33)
	pt3dadd(-34.67, 137.08, -50.76, 0.33)
	pt3dadd(-34.83, 137.41, -50.76, 0.33)
	pt3dadd(-35, 137.58, -50.76, 0.33)
	pt3dadd(-35.17, 137.91, -50.76, 0.33)
	pt3dadd(-35.33, 138.08, -50.76, 0.33)
	pt3dadd(-35.5, 138.41, -50.76, 0.33)
	pt3dadd(-36, 138.91, -50.76, 0.33)
	pt3dadd(-36.17, 139.08, -50.76, 0.33)
	pt3dadd(-36.33, 139.25, -50.76, 0.33)
	pt3dadd(-36.5, 139.41, -50.76, 0.33)
	pt3dadd(-36.67, 139.58, -50.76, 0.33)
	pt3dadd(-36.83, 139.75, -50.76, 0.33)
	pt3dadd(-36.83, 139.91, -50.76, 0.33)
  }
  dend[230] {pt3dclear()
	pt3dadd(-33.17, 136.25, -50.76, 0.33)
	pt3dadd(-33, 135.75, -50.76, 0.33)
	pt3dadd(-33, 136.91, -50.76, 0.33)
	pt3dadd(-33.17, 137.25, -50.76, 0.33)
	pt3dadd(-33.17, 137.75, -50.76, 0.33)
	pt3dadd(-33.33, 137.91, -50.76, 0.33)
	pt3dadd(-33.33, 138.41, -50.76, 0.33)
	pt3dadd(-33.5, 138.58, -50.04, 0.33)
	pt3dadd(-33.5, 139.25, -50.04, 0.33)
	pt3dadd(-33.67, 139.58, -50.04, 0.33)
	pt3dadd(-33.83, 139.75, -50.04, 0.33)
	pt3dadd(-34, 139.91, -50.04, 0.33)
	pt3dadd(-34.17, 140.08, -50.04, 0.33)
	pt3dadd(-34.33, 140.25, -50.04, 0.33)
	pt3dadd(-34.5, 140.41, -50.04, 0.33)
	pt3dadd(-34.5, 141.25, -50.04, 0.33)
	pt3dadd(-34.67, 141.41, -50.04, 0.33)
	pt3dadd(-34.67, 142.58, -50.04, 0.33)
	pt3dadd(-34.83, 142.58, -50.04, 0.33)
  }
  dend[231] {pt3dclear()
	pt3dadd(-33.83, 123.75, -48.24, 0.33)
	pt3dadd(-34.17, 123.75, -47.88, 0.33)
	pt3dadd(-34.17, 124.42, -47.88, 0.33)
	pt3dadd(-34.33, 124.75, -47.88, 0.33)
	pt3dadd(-34.5, 125.08, -47.88, 0.33)
	pt3dadd(-34.5, 125.42, -47.88, 0.33)
	pt3dadd(-34.67, 125.75, -47.88, 0.33)
	pt3dadd(-34.67, 126.08, -47.88, 0.33)
	pt3dadd(-34.83, 126.42, -47.88, 0.33)
	pt3dadd(-34.83, 126.75, -47.88, 0.33)
	pt3dadd(-35, 127.25, -47.88, 0.33)
	pt3dadd(-35.17, 127.58, -47.88, 0.33)
	pt3dadd(-35.33, 127.92, -47.88, 0.33)
	pt3dadd(-35.5, 128.08, -47.88, 0.33)
	pt3dadd(-35.5, 128.75, -47.88, 0.33)
	pt3dadd(-35.67, 128.91, -47.88, 0.33)
	pt3dadd(-35.83, 129.25, -47.88, 0.33)
	pt3dadd(-36, 129.41, -47.88, 0.33)
	pt3dadd(-36, 129.75, -47.88, 0.33)
	pt3dadd(-36.17, 129.91, -47.88, 0.33)
	pt3dadd(-36.33, 130.08, -47.88, 0.33)
	pt3dadd(-36.5, 130.41, -47.88, 0.33)
	pt3dadd(-36.67, 130.58, -47.88, 0.33)
	pt3dadd(-36.67, 130.91, -47.88, 0.33)
	pt3dadd(-36.83, 131.08, -47.88, 0.33)
	pt3dadd(-37, 131.25, -47.88, 0.33)
  }
  dend[232] {pt3dclear()
	pt3dadd(-37, 131.25, -47.88, 0.33)
	pt3dadd(-36.83, 131.25, -47.88, 0.33)
	pt3dadd(-37.17, 131.41, -47.88, 0.33)
	pt3dadd(-40.33, 131.41, -47.88, 0.33)
	pt3dadd(-40.5, 131.58, -47.88, 0.33)
	pt3dadd(-40.83, 131.58, -47.88, 0.33)
	pt3dadd(-41, 131.75, -47.88, 0.33)
	pt3dadd(-41.33, 131.91, -47.88, 0.33)
	pt3dadd(-41.83, 132.08, -47.88, 0.33)
	pt3dadd(-42, 132.25, -47.88, 0.33)
	pt3dadd(-42.17, 132.41, -47.88, 0.33)
	pt3dadd(-42.33, 132.58, -48.24, 0.33)
	pt3dadd(-42.33, 133.75, -48.24, 0.33)
	pt3dadd(-42.5, 134.08, -48.24, 0.33)
	pt3dadd(-42.5, 134.58, -48.24, 0.33)
	pt3dadd(-42.67, 134.75, -48.24, 0.33)
	pt3dadd(-42.67, 135.08, -48.24, 0.33)
	pt3dadd(-42.83, 135.41, -48.24, 0.33)
	pt3dadd(-42.83, 135.91, -48.24, 0.33)
	pt3dadd(-43, 136.25, -48.24, 0.33)
	pt3dadd(-43, 136.58, -48.24, 0.33)
	pt3dadd(-43.17, 136.75, -48.24, 0.33)
	pt3dadd(-43.33, 137.08, -48.24, 0.33)
	pt3dadd(-43.5, 137.41, -48.24, 0.33)
	pt3dadd(-43.67, 137.58, -48.24, 0.33)
	pt3dadd(-43.83, 137.75, -48.24, 0.33)
	pt3dadd(-43.83, 138.08, -48.24, 0.33)
	pt3dadd(-44.17, 138.25, -48.24, 0.33)
	pt3dadd(-44.33, 138.58, -48.24, 0.33)
	pt3dadd(-44.5, 138.91, -48.24, 0.33)
	pt3dadd(-45, 139.41, -48.24, 0.33)
	pt3dadd(-45.17, 139.58, -48.24, 0.33)
  }
  dend[233] {pt3dclear()
	pt3dadd(-37, 131.25, -47.88, 0.33)
	pt3dadd(-36.83, 131.58, -48.24, 0.33)
	pt3dadd(-36.67, 131.75, -48.24, 0.33)
	pt3dadd(-36.67, 132.41, -48.24, 0.33)
	pt3dadd(-36.5, 132.75, -48.24, 0.33)
	pt3dadd(-36.33, 133.08, -48.24, 0.33)
	pt3dadd(-36.17, 133.25, -48.24, 0.33)
	pt3dadd(-35.83, 133.41, -48.24, 0.33)
	pt3dadd(-35.5, 133.58, -48.24, 0.33)
	pt3dadd(-35.5, 133.75, -48.24, 0.33)
  }
  dend[234] {pt3dclear()
	pt3dadd(-35.5, 133.75, -48.24, 0.33)
	pt3dadd(-35.17, 134.08, -48.24, 0.33)
	pt3dadd(-35, 134.25, -48.24, 0.33)
	pt3dadd(-35, 136.75, -48.24, 0.33)
	pt3dadd(-34.83, 137.08, -48.24, 0.33)
	pt3dadd(-34.67, 137.41, -48.24, 0.33)
	pt3dadd(-34.5, 137.58, -48.24, 0.33)
	pt3dadd(-34.33, 137.75, -48.24, 0.33)
	pt3dadd(-34, 138.08, -48.24, 0.33)
	pt3dadd(-33.83, 138.25, -48.24, 0.33)
	pt3dadd(-33.5, 138.58, -48.24, 0.33)
	pt3dadd(-33.33, 138.75, -48.24, 0.33)
  }
  dend[235] {pt3dclear()
	pt3dadd(-35.5, 133.75, -48.24, 0.33)
	pt3dadd(-35.33, 133.75, -47.88, 0.33)
	pt3dadd(-35.17, 133.58, -47.88, 0.33)
	pt3dadd(-33.33, 133.58, -47.88, 0.33)
	pt3dadd(-33, 133.75, -47.88, 0.33)
	pt3dadd(-32.67, 133.75, -47.88, 0.33)
	pt3dadd(-32.33, 133.91, -47.88, 0.33)
	pt3dadd(-31.5, 133.91, -47.88, 0.33)
  }
  dend[236] {pt3dclear()
	pt3dadd(-32.83, 117.42, -46.8, 0.33)
	pt3dadd(-32.83, 117.25, -46.8, 0.33)
	pt3dadd(-33, 117.42, -46.8, 0.33)
	pt3dadd(-33.5, 117.42, -46.8, 0.33)
	pt3dadd(-34, 117.58, -46.8, 0.33)
	pt3dadd(-34.33, 117.75, -46.8, 0.33)
	pt3dadd(-34.5, 118.08, -46.8, 0.33)
	pt3dadd(-34.67, 118.42, -46.8, 0.33)
	pt3dadd(-34.83, 118.58, -46.8, 0.33)
	pt3dadd(-35, 118.92, -46.8, 0.33)
	pt3dadd(-35.5, 119.42, -46.8, 0.33)
	pt3dadd(-35.67, 119.75, -46.8, 0.33)
	pt3dadd(-35.83, 119.92, -46.8, 0.33)
	pt3dadd(-36, 120.08, -46.8, 0.33)
	pt3dadd(-36, 120.42, -46.8, 0.33)
	pt3dadd(-36.17, 120.58, -46.8, 0.33)
	pt3dadd(-36.33, 120.92, -46.8, 0.33)
	pt3dadd(-36.5, 121.08, -46.8, 0.33)
	pt3dadd(-36.5, 121.75, -46.8, 0.33)
	pt3dadd(-36.67, 121.92, -46.8, 0.33)
	pt3dadd(-36.83, 122.08, -46.8, 0.33)
	pt3dadd(-36.83, 122.42, -46.8, 0.33)
	pt3dadd(-37, 122.75, -46.8, 0.33)
	pt3dadd(-37.33, 123.08, -46.8, 0.33)
	pt3dadd(-37.5, 123.25, -46.8, 0.33)
	pt3dadd(-37.67, 123.42, -46.8, 0.33)
	pt3dadd(-37.83, 123.58, -46.8, 0.33)
	pt3dadd(-38, 123.75, -46.8, 0.33)
  }
  dend[237] {pt3dclear()
	pt3dadd(-38, 123.75, -46.8, 0.33)
	pt3dadd(-37.83, 123.92, -46.8, 0.33)
	pt3dadd(-38, 124.08, -46.8, 0.33)
	pt3dadd(-38.33, 124.08, -46.8, 0.33)
	pt3dadd(-38.5, 124.25, -46.8, 0.33)
	pt3dadd(-39, 124.42, -46.8, 0.33)
	pt3dadd(-39.67, 124.58, -46.8, 0.33)
	pt3dadd(-40.17, 124.75, -46.8, 0.33)
	pt3dadd(-40.5, 124.92, -46.8, 0.33)
	pt3dadd(-40.83, 125.08, -46.8, 0.33)
	pt3dadd(-41.17, 125.25, -46.8, 0.33)
	pt3dadd(-41.33, 125.42, -46.8, 0.33)
	pt3dadd(-41.5, 125.58, -46.8, 0.33)
	pt3dadd(-41.67, 125.75, -46.8, 0.33)
	pt3dadd(-41.83, 126.08, -46.8, 0.33)
	pt3dadd(-42.17, 126.42, -46.8, 0.33)
	pt3dadd(-42.33, 126.75, -46.8, 0.33)
	pt3dadd(-42.5, 127.08, -46.8, 0.33)
	pt3dadd(-42.83, 127.08, -46.8, 0.33)
	pt3dadd(-43, 127.25, -46.44, 0.33)
	pt3dadd(-43.17, 127.42, -46.44, 0.33)
	pt3dadd(-43.67, 127.75, -46.44, 0.33)
	pt3dadd(-44, 127.92, -46.44, 0.33)
	pt3dadd(-44.17, 128.25, -46.44, 0.33)
	pt3dadd(-44.33, 128.58, -46.44, 0.33)
	pt3dadd(-44.5, 128.75, -46.44, 0.33)
	pt3dadd(-44.67, 129.08, -46.44, 0.33)
	pt3dadd(-44.83, 129.25, -46.44, 0.33)
	pt3dadd(-45, 129.58, -46.44, 0.33)
  }
}
proc shape3d_20() {
  dend[237] {	pt3dadd(-45.33, 129.75, -46.44, 0.33)
	pt3dadd(-46, 130.41, -46.44, 0.33)
	pt3dadd(-46.17, 130.58, -46.44, 0.33)
	pt3dadd(-46.33, 130.75, -46.44, 0.33)
	pt3dadd(-46.5, 130.91, -46.44, 0.33)
	pt3dadd(-46.67, 131.08, -46.44, 0.33)
	pt3dadd(-46.83, 131.25, -46.44, 0.33)
	pt3dadd(-47.17, 131.25, -46.44, 0.33)
  }
  dend[238] {pt3dclear()
	pt3dadd(-38, 123.75, -46.8, 0.33)
	pt3dadd(-37.83, 123.75, -47.88, 0.33)
	pt3dadd(-37.83, 125.25, -47.88, 0.33)
	pt3dadd(-37.67, 125.42, -47.88, 0.33)
	pt3dadd(-37.67, 126.42, -47.88, 0.33)
	pt3dadd(-37.83, 126.75, -47.88, 0.33)
	pt3dadd(-38, 126.92, -47.88, 0.33)
	pt3dadd(-38, 127.25, -47.88, 0.33)
	pt3dadd(-38.17, 127.42, -47.88, 0.33)
	pt3dadd(-38.33, 127.58, -48.24, 0.33)
	pt3dadd(-38.33, 127.92, -48.24, 0.33)
	pt3dadd(-38.5, 128.08, -48.24, 0.33)
	pt3dadd(-38.67, 128.41, -48.24, 0.33)
	pt3dadd(-38.83, 128.75, -48.24, 0.33)
	pt3dadd(-39, 129.08, -48.24, 0.33)
	pt3dadd(-39.17, 129.25, -48.24, 0.33)
	pt3dadd(-39.17, 129.91, -48.24, 0.33)
	pt3dadd(-39.33, 130.08, -48.24, 0.33)
	pt3dadd(-39.33, 130.58, -48.24, 0.33)
	pt3dadd(-39.5, 130.75, -48.24, 0.33)
	pt3dadd(-39.67, 130.91, -48.24, 0.33)
  }
  dend[239] {pt3dclear()
	pt3dadd(-39.67, 130.91, -48.24, 0.33)
	pt3dadd(-39.33, 130.75, -48.6, 0.33)
	pt3dadd(-39.33, 131.08, -48.6, 0.33)
	pt3dadd(-39.67, 131.41, -48.6, 0.33)
	pt3dadd(-39.67, 131.91, -48.6, 0.33)
	pt3dadd(-39.83, 132.08, -48.6, 0.33)
	pt3dadd(-40, 132.41, -48.6, 0.33)
	pt3dadd(-40.17, 132.58, -48.6, 0.33)
	pt3dadd(-40.33, 132.75, -48.6, 0.33)
	pt3dadd(-40.33, 134.58, -48.6, 0.33)
	pt3dadd(-40.17, 134.75, -48.6, 0.33)
	pt3dadd(-40, 135.08, -48.6, 0.33)
	pt3dadd(-40, 135.25, -48.6, 0.33)
  }
  dend[240] {pt3dclear()
	pt3dadd(-40, 135.25, -48.6, 0.33)
	pt3dadd(-39.5, 135.41, -48.6, 0.33)
	pt3dadd(-39.5, 135.75, -48.6, 0.33)
	pt3dadd(-39.33, 135.91, -48.6, 0.33)
	pt3dadd(-39.5, 136.08, -48.6, 0.33)
	pt3dadd(-39.67, 136.58, -48.6, 0.33)
	pt3dadd(-39.83, 136.91, -48.6, 0.33)
	pt3dadd(-40, 137.25, -48.6, 0.33)
	pt3dadd(-40, 139.25, -48.6, 0.33)
	pt3dadd(-40.17, 139.25, -48.6, 0.33)
  }
  dend[241] {pt3dclear()
	pt3dadd(-40, 135.25, -48.6, 0.33)
	pt3dadd(-40, 135.41, -48.6, 0.33)
	pt3dadd(-39.67, 135.41, -48.6, 0.33)
	pt3dadd(-39.5, 135.58, -48.6, 0.33)
	pt3dadd(-38.67, 136.41, -48.6, 0.33)
	pt3dadd(-38.5, 136.58, -48.6, 0.33)
	pt3dadd(-38.33, 136.75, -48.6, 0.33)
	pt3dadd(-38.17, 137.08, -48.6, 0.33)
	pt3dadd(-38, 137.25, -48.6, 0.33)
	pt3dadd(-37.83, 137.41, -48.6, 0.33)
	pt3dadd(-37.33, 137.41, -48.6, 0.33)
	pt3dadd(-37.17, 137.58, -48.6, 0.33)
	pt3dadd(-37, 137.75, -48.6, 0.33)
	pt3dadd(-37, 137.58, -48.6, 0.33)
  }
  dend[242] {pt3dclear()
	pt3dadd(-39.67, 130.91, -48.24, 0.33)
	pt3dadd(-39.67, 130.91, -47.52, 0.33)
	pt3dadd(-40, 130.91, -47.52, 0.33)
	pt3dadd(-40.33, 131.08, -47.52, 0.33)
	pt3dadd(-40.83, 131.41, -47.52, 0.33)
	pt3dadd(-41.17, 131.58, -47.52, 0.33)
	pt3dadd(-41.5, 131.75, -47.52, 0.33)
	pt3dadd(-43.83, 131.75, -47.52, 0.33)
	pt3dadd(-44.33, 131.91, -47.52, 0.33)
	pt3dadd(-44.67, 131.91, -47.52, 0.33)
	pt3dadd(-44.83, 132.08, -47.52, 0.33)
	pt3dadd(-45.17, 132.08, -47.52, 0.33)
	pt3dadd(-45.5, 132.25, -47.52, 0.33)
	pt3dadd(-45.83, 132.41, -47.52, 0.33)
	pt3dadd(-46.33, 132.41, -47.52, 0.33)
	pt3dadd(-46.67, 132.58, -47.52, 0.33)
	pt3dadd(-46.83, 132.75, -47.52, 0.33)
	pt3dadd(-47.33, 132.75, -47.52, 0.33)
	pt3dadd(-47.67, 132.91, -47.52, 0.33)
	pt3dadd(-48, 132.91, -47.52, 0.33)
	pt3dadd(-48.17, 133.08, -47.52, 0.33)
	pt3dadd(-48.5, 133.08, -47.52, 0.33)
  }
  dend[243] {pt3dclear()
	pt3dadd(-23.67, 96.92, -46.44, 0.67)
	pt3dadd(-23.17, 97.08, -48.24, 0.33)
	pt3dadd(-23.17, 98.75, -48.24, 0.33)
	pt3dadd(-23, 98.92, -48.24, 0.33)
	pt3dadd(-23, 99.42, -48.24, 0.33)
	pt3dadd(-22.83, 99.58, -48.24, 0.33)
	pt3dadd(-22.83, 99.92, -48.24, 0.33)
	pt3dadd(-22.67, 100.25, -48.24, 0.33)
	pt3dadd(-22.67, 101.25, -48.24, 0.33)
	pt3dadd(-22.5, 101.58, -48.24, 0.33)
	pt3dadd(-22.5, 102.75, -48.24, 0.33)
	pt3dadd(-22.33, 102.92, -48.24, 0.33)
	pt3dadd(-22.33, 104.58, -48.24, 0.33)
	pt3dadd(-22.5, 104.75, -48.24, 0.33)
	pt3dadd(-22.5, 105.08, -48.24, 0.33)
	pt3dadd(-22.67, 105.08, -48.24, 0.33)
  }
  dend[244] {pt3dclear()
	pt3dadd(-22.67, 105.08, -48.24, 0.33)
	pt3dadd(-22.67, 105.25, -47.52, 0.33)
	pt3dadd(-23, 105.42, -47.52, 0.33)
	pt3dadd(-23.33, 105.42, -47.52, 0.33)
	pt3dadd(-23.67, 105.58, -47.52, 0.33)
	pt3dadd(-24, 105.75, -47.52, 0.33)
	pt3dadd(-24.17, 105.92, -47.52, 0.33)
	pt3dadd(-24.5, 106.25, -47.52, 0.33)
	pt3dadd(-24.83, 106.42, -47.52, 0.33)
	pt3dadd(-25.17, 106.58, -47.52, 0.33)
	pt3dadd(-25.5, 106.92, -47.52, 0.33)
	pt3dadd(-25.67, 107.08, -47.52, 0.33)
	pt3dadd(-25.83, 107.25, -47.52, 0.33)
	pt3dadd(-26, 107.42, -47.52, 0.33)
	pt3dadd(-26.17, 107.58, -47.52, 0.33)
	pt3dadd(-26.33, 107.75, -47.52, 0.33)
	pt3dadd(-26.5, 107.92, -47.52, 0.33)
	pt3dadd(-26.67, 108.08, -47.52, 0.33)
	pt3dadd(-26.83, 108.25, -47.52, 0.33)
	pt3dadd(-27, 108.42, -47.52, 0.33)
	pt3dadd(-27.17, 108.58, -47.52, 0.33)
	pt3dadd(-27.33, 108.75, -47.52, 0.33)
	pt3dadd(-27.67, 108.75, -47.52, 0.33)
	pt3dadd(-27.83, 108.92, -47.52, 0.33)
	pt3dadd(-28, 109.08, -47.52, 0.33)
  }
  dend[245] {pt3dclear()
	pt3dadd(-22.67, 105.08, -48.24, 0.33)
	pt3dadd(-22.83, 104.75, -48.24, 0.33)
	pt3dadd(-22.67, 104.92, -48.24, 0.33)
	pt3dadd(-22.67, 107.42, -48.24, 0.33)
	pt3dadd(-22.83, 107.58, -48.24, 0.33)
	pt3dadd(-23, 107.92, -48.24, 0.33)
	pt3dadd(-23, 108.58, -48.24, 0.33)
	pt3dadd(-23.17, 108.92, -48.24, 0.33)
	pt3dadd(-23.17, 109.58, -48.24, 0.33)
	pt3dadd(-23.33, 109.75, -48.24, 0.33)
	pt3dadd(-23.33, 110.08, -48.24, 0.33)
	pt3dadd(-23.5, 110.25, -48.24, 0.33)
	pt3dadd(-23.67, 110.58, -48.24, 0.33)
	pt3dadd(-23.67, 111.75, -48.24, 0.33)
	pt3dadd(-23.83, 111.92, -48.24, 0.33)
	pt3dadd(-23.83, 111.75, -48.24, 0.33)
  }
  dend[246] {pt3dclear()
	pt3dadd(-23.83, 111.75, -48.24, 0.33)
	pt3dadd(-23.67, 111.92, -48.24, 0.33)
	pt3dadd(-24, 112.08, -48.24, 0.33)
	pt3dadd(-24.33, 112.25, -48.24, 0.33)
	pt3dadd(-24.67, 112.42, -48.24, 0.33)
	pt3dadd(-25, 112.58, -48.24, 0.33)
	pt3dadd(-25.33, 112.75, -48.24, 0.33)
	pt3dadd(-25.5, 112.92, -48.24, 0.33)
	pt3dadd(-25.67, 113.25, -48.24, 0.33)
	pt3dadd(-25.83, 113.42, -48.24, 0.33)
	pt3dadd(-25.83, 113.92, -48.24, 0.33)
	pt3dadd(-26, 114.08, -48.24, 0.33)
	pt3dadd(-26, 114.42, -48.24, 0.33)
	pt3dadd(-26.17, 114.75, -48.24, 0.33)
	pt3dadd(-26.33, 115.25, -48.24, 0.33)
	pt3dadd(-26.33, 115.75, -48.24, 0.33)
	pt3dadd(-26.5, 116.25, -48.24, 0.33)
	pt3dadd(-26.67, 116.42, -48.24, 0.33)
	pt3dadd(-26.67, 116.92, -48.24, 0.33)
	pt3dadd(-26.83, 117.25, -48.24, 0.33)
	pt3dadd(-27, 117.42, -48.24, 0.33)
	pt3dadd(-27.17, 117.58, -48.24, 0.33)
	pt3dadd(-27.17, 117.92, -48.24, 0.33)
	pt3dadd(-27.33, 118.08, -48.24, 0.33)
	pt3dadd(-27.5, 118.25, -48.24, 0.33)
	pt3dadd(-27.5, 118.75, -48.24, 0.33)
	pt3dadd(-27.67, 119.08, -48.24, 0.33)
	pt3dadd(-27.67, 119.42, -48.24, 0.33)
	pt3dadd(-27.83, 119.75, -48.24, 0.33)
	pt3dadd(-27.83, 120.25, -48.24, 0.33)
	pt3dadd(-28, 120.42, -48.24, 0.33)
	pt3dadd(-28, 121.08, -48.24, 0.33)
	pt3dadd(-28.17, 121.25, -48.24, 0.33)
	pt3dadd(-28.17, 121.58, -48.24, 0.33)
	pt3dadd(-28.33, 121.92, -48.24, 0.33)
	pt3dadd(-28.5, 122.08, -48.24, 0.33)
	pt3dadd(-28.5, 122.58, -48.24, 0.33)
	pt3dadd(-28.67, 122.92, -48.24, 0.33)
	pt3dadd(-28.67, 123.25, -48.24, 0.33)
	pt3dadd(-28.83, 123.42, -48.24, 0.33)
  }
  dend[247] {pt3dclear()
	pt3dadd(-23.83, 111.75, -48.24, 0.33)
	pt3dadd(-24, 111.92, -47.88, 0.33)
	pt3dadd(-24, 114.75, -47.88, 0.33)
  }
  dend[248] {pt3dclear()
	pt3dadd(-24, 114.75, -47.88, 0.33)
	pt3dadd(-23.83, 114.75, -47.88, 0.33)
	pt3dadd(-23.83, 115.08, -47.88, 0.33)
	pt3dadd(-24.17, 115.25, -47.88, 0.33)
	pt3dadd(-25, 116.08, -47.88, 0.33)
	pt3dadd(-25.17, 116.25, -47.88, 0.33)
	pt3dadd(-25.33, 116.42, -47.88, 0.33)
	pt3dadd(-25.33, 116.75, -47.88, 0.33)
	pt3dadd(-25.5, 116.92, -47.88, 0.33)
	pt3dadd(-25.5, 117.42, -47.88, 0.33)
	pt3dadd(-25.67, 117.58, -47.88, 0.33)
	pt3dadd(-25.67, 118.08, -47.88, 0.33)
  }
}
proc shape3d_21() {
  dend[248] {	pt3dadd(-25.83, 118.25, -47.88, 0.33)
	pt3dadd(-25.83, 119.92, -47.88, 0.33)
	pt3dadd(-26, 120.25, -47.88, 0.33)
	pt3dadd(-26, 121.08, -47.88, 0.33)
	pt3dadd(-26.17, 121.25, -47.88, 0.33)
	pt3dadd(-26.17, 121.58, -47.88, 0.33)
	pt3dadd(-26.33, 121.75, -47.88, 0.33)
	pt3dadd(-26.33, 122.08, -47.88, 0.33)
	pt3dadd(-26.5, 122.42, -47.88, 0.33)
	pt3dadd(-26.67, 122.58, -47.88, 0.33)
	pt3dadd(-26.67, 123.08, -47.88, 0.33)
	pt3dadd(-26.83, 123.25, -47.88, 0.33)
	pt3dadd(-26.83, 123.58, -47.88, 0.33)
	pt3dadd(-27, 123.92, -47.88, 0.33)
	pt3dadd(-27, 124.42, -47.88, 0.33)
	pt3dadd(-27.17, 124.58, -47.88, 0.33)
	pt3dadd(-27.17, 125.92, -47.88, 0.33)
	pt3dadd(-27.33, 126.08, -47.88, 0.33)
  }
  dend[249] {pt3dclear()
	pt3dadd(-27.33, 126.08, -47.88, 0.33)
	pt3dadd(-27.17, 125.92, -47.88, 0.33)
	pt3dadd(-27, 126.08, -47.88, 0.33)
	pt3dadd(-26.83, 126.25, -47.88, 0.33)
	pt3dadd(-26.67, 126.42, -47.88, 0.33)
	pt3dadd(-26.5, 126.58, -47.88, 0.33)
	pt3dadd(-26.33, 126.75, -47.88, 0.33)
	pt3dadd(-26.17, 127.08, -47.88, 0.33)
	pt3dadd(-26, 127.25, -47.88, 0.33)
	pt3dadd(-25.83, 127.58, -47.88, 0.33)
	pt3dadd(-25.67, 127.92, -47.88, 0.33)
	pt3dadd(-25.5, 128.25, -47.88, 0.33)
	pt3dadd(-25.33, 128.41, -47.88, 0.33)
	pt3dadd(-25.33, 128.75, -47.88, 0.33)
	pt3dadd(-25.17, 128.91, -47.88, 0.33)
	pt3dadd(-25, 129.25, -47.88, 0.33)
	pt3dadd(-24.83, 129.41, -47.88, 0.33)
	pt3dadd(-24.83, 129.58, -47.88, 0.33)
  }
  dend[250] {pt3dclear()
	pt3dadd(-27.33, 126.08, -47.88, 0.33)
	pt3dadd(-27.17, 125.92, -47.52, 0.33)
	pt3dadd(-27.17, 126.92, -47.52, 0.33)
	pt3dadd(-27.33, 127.08, -47.52, 0.33)
	pt3dadd(-27.33, 127.42, -47.52, 0.33)
	pt3dadd(-27.5, 127.58, -47.52, 0.33)
	pt3dadd(-27.5, 127.92, -47.52, 0.33)
	pt3dadd(-27.67, 128.08, -47.52, 0.33)
	pt3dadd(-27.67, 128.91, -47.52, 0.33)
	pt3dadd(-27.83, 129.08, -47.52, 0.33)
	pt3dadd(-27.83, 129.58, -47.52, 0.33)
	pt3dadd(-28, 129.91, -47.52, 0.33)
	pt3dadd(-28, 130.58, -47.52, 0.33)
	pt3dadd(-28.17, 130.91, -47.52, 0.33)
	pt3dadd(-28.17, 131.75, -47.52, 0.33)
  }
  dend[251] {pt3dclear()
	pt3dadd(-24, 114.75, -47.88, 0.33)
	pt3dadd(-24, 114.75, -50.04, 0.33)
	pt3dadd(-23.83, 114.92, -50.04, 0.33)
	pt3dadd(-23.67, 115.08, -50.04, 0.33)
	pt3dadd(-23.33, 115.25, -50.04, 0.33)
	pt3dadd(-23.17, 115.58, -50.04, 0.33)
	pt3dadd(-23, 115.75, -50.04, 0.33)
	pt3dadd(-22.83, 115.92, -50.04, 0.33)
	pt3dadd(-22.67, 116.25, -50.04, 0.33)
	pt3dadd(-22.33, 116.42, -50.04, 0.33)
	pt3dadd(-22.33, 116.75, -50.04, 0.33)
	pt3dadd(-22.17, 117.08, -50.04, 0.33)
	pt3dadd(-22, 117.25, -50.04, 0.33)
	pt3dadd(-22, 117.58, -50.04, 0.33)
	pt3dadd(-21.83, 117.75, -50.04, 0.33)
	pt3dadd(-21.67, 117.92, -50.04, 0.33)
	pt3dadd(-21.67, 118.25, -50.04, 0.33)
	pt3dadd(-21.5, 118.58, -50.04, 0.33)
	pt3dadd(-21.5, 119.08, -50.04, 0.33)
	pt3dadd(-21.33, 119.42, -50.04, 0.33)
	pt3dadd(-21.33, 120.75, -50.04, 0.33)
  }
  dend[252] {pt3dclear()
	pt3dadd(-21.33, 120.75, -50.04, 0.33)
	pt3dadd(-21.17, 120.75, -50.04, 0.33)
	pt3dadd(-21.33, 120.92, -50.04, 0.33)
	pt3dadd(-22, 121.58, -50.04, 0.33)
	pt3dadd(-22, 121.92, -50.04, 0.33)
	pt3dadd(-22.17, 122.25, -50.04, 0.33)
	pt3dadd(-22.33, 122.58, -50.04, 0.33)
	pt3dadd(-22.5, 122.75, -50.04, 0.33)
	pt3dadd(-22.67, 122.92, -50.04, 0.33)
	pt3dadd(-22.67, 123.42, -50.04, 0.33)
	pt3dadd(-22.83, 123.58, -50.04, 0.33)
	pt3dadd(-22.83, 123.92, -50.04, 0.33)
	pt3dadd(-23, 124.25, -50.04, 0.33)
	pt3dadd(-23, 124.58, -50.04, 0.33)
	pt3dadd(-23.17, 124.75, -50.04, 0.33)
	pt3dadd(-23.33, 125.08, -50.04, 0.33)
	pt3dadd(-23.5, 125.42, -50.04, 0.33)
	pt3dadd(-23.83, 125.75, -50.04, 0.33)
	pt3dadd(-24, 125.92, -50.04, 0.33)
	pt3dadd(-24.17, 126.25, -50.04, 0.33)
	pt3dadd(-25.17, 127.25, -50.04, 0.33)
	pt3dadd(-25.33, 127.42, -50.04, 0.33)
	pt3dadd(-25.5, 127.58, -50.04, 0.33)
	pt3dadd(-25.5, 127.92, -50.04, 0.33)
	pt3dadd(-25.67, 128.08, -50.04, 0.33)
	pt3dadd(-25.83, 128.41, -50.04, 0.33)
	pt3dadd(-25.83, 128.91, -50.04, 0.33)
	pt3dadd(-26, 129.08, -50.04, 0.33)
	pt3dadd(-26, 129.91, -50.04, 0.33)
	pt3dadd(-26.17, 130.08, -50.4, 0.33)
	pt3dadd(-26.17, 130.75, -49.32, 0.33)
	pt3dadd(-26, 130.91, -49.32, 0.33)
	pt3dadd(-26, 131.25, -49.32, 0.33)
	pt3dadd(-25.83, 131.41, -49.32, 0.33)
	pt3dadd(-25.67, 131.75, -49.32, 0.33)
	pt3dadd(-25.5, 131.91, -49.32, 0.33)
	pt3dadd(-25.33, 132.25, -49.32, 0.33)
	pt3dadd(-25.33, 132.58, -49.32, 0.33)
	pt3dadd(-25.17, 132.75, -49.32, 0.33)
	pt3dadd(-24.83, 132.91, -49.32, 0.33)
	pt3dadd(-24.67, 133.08, -49.32, 0.33)
	pt3dadd(-24.5, 133.41, -49.32, 0.33)
	pt3dadd(-24.33, 133.58, -49.32, 0.33)
	pt3dadd(-24.17, 133.75, -49.32, 0.33)
	pt3dadd(-24.17, 134.91, -49.32, 0.33)
	pt3dadd(-24.5, 135.08, -49.32, 0.33)
	pt3dadd(-24.67, 135.25, -49.32, 0.33)
	pt3dadd(-24.83, 135.41, -49.32, 0.33)
	pt3dadd(-25, 135.58, -49.32, 0.33)
	pt3dadd(-25.17, 135.75, -49.32, 0.33)
	pt3dadd(-25.17, 135.58, -49.32, 0.33)
  }
  dend[253] {pt3dclear()
	pt3dadd(-25.17, 135.58, -49.32, 0.33)
	pt3dadd(-25.17, 135.41, -49.32, 0.33)
	pt3dadd(-25.5, 135.41, -49.32, 0.33)
	pt3dadd(-25.83, 135.58, -49.32, 0.33)
	pt3dadd(-26, 135.75, -49.32, 0.33)
	pt3dadd(-26.67, 135.75, -49.32, 0.33)
	pt3dadd(-26.83, 135.91, -49.32, 0.33)
	pt3dadd(-27.17, 136.08, -49.32, 0.33)
	pt3dadd(-27.67, 136.08, -49.32, 0.33)
	pt3dadd(-27.83, 136.25, -49.32, 0.33)
	pt3dadd(-28, 136.41, -49.32, 0.33)
	pt3dadd(-28.17, 136.58, -49.32, 0.33)
  }
  dend[254] {pt3dclear()
	pt3dadd(-25.17, 135.58, -49.32, 0.33)
	pt3dadd(-25, 135.58, -50.76, 0.33)
	pt3dadd(-25.17, 135.91, -50.76, 0.33)
	pt3dadd(-25.33, 136.25, -50.76, 0.33)
	pt3dadd(-25.5, 136.41, -50.76, 0.33)
	pt3dadd(-25.67, 136.58, -50.76, 0.33)
	pt3dadd(-25.67, 136.91, -50.76, 0.33)
	pt3dadd(-25.83, 137.08, -50.76, 0.33)
	pt3dadd(-26, 137.25, -50.76, 0.33)
	pt3dadd(-26, 137.75, -50.76, 0.33)
	pt3dadd(-26.17, 138.08, -50.76, 0.33)
	pt3dadd(-26.33, 138.41, -50.76, 0.33)
	pt3dadd(-26.5, 138.58, -50.76, 0.33)
  }
  dend[255] {pt3dclear()
	pt3dadd(-21.33, 120.75, -50.04, 0.33)
	pt3dadd(-21.17, 120.75, -55.8, 0.33)
	pt3dadd(-21, 120.92, -55.8, 0.33)
	pt3dadd(-20.83, 121.08, -55.8, 0.33)
	pt3dadd(-20.83, 121.42, -55.8, 0.33)
	pt3dadd(-20.5, 121.58, -55.8, 0.33)
	pt3dadd(-20.17, 121.92, -55.8, 0.33)
	pt3dadd(-19.82, 122.08, -55.8, 0.33)
	pt3dadd(-19.5, 122.58, -55.8, 0.33)
	pt3dadd(-19.17, 122.92, -55.8, 0.33)
	pt3dadd(-18.82, 123.08, -55.8, 0.33)
	pt3dadd(-18.5, 123.42, -55.8, 0.33)
	pt3dadd(-18.17, 123.58, -55.8, 0.33)
	pt3dadd(-17.82, 123.75, -55.8, 0.33)
	pt3dadd(-17.5, 124.08, -55.8, 0.33)
	pt3dadd(-17.32, 124.25, -55.8, 0.33)
	pt3dadd(-17, 124.25, -55.8, 0.33)
	pt3dadd(-16.82, 124.42, -55.8, 0.33)
	pt3dadd(-16.67, 124.58, -55.8, 0.33)
	pt3dadd(-16.32, 124.75, -55.8, 0.33)
	pt3dadd(-16.17, 125.08, -55.8, 0.33)
	pt3dadd(-16, 125.25, -55.8, 0.33)
	pt3dadd(-15.67, 125.42, -55.8, 0.33)
	pt3dadd(-15.5, 125.58, -55.8, 0.33)
	pt3dadd(-15.33, 125.75, -55.8, 0.33)
	pt3dadd(-15.33, 126.08, -55.8, 0.33)
	pt3dadd(-15.17, 126.42, -55.8, 0.33)
	pt3dadd(-15.17, 127.25, -55.8, 0.33)
	pt3dadd(-15, 127.58, -55.8, 0.33)
	pt3dadd(-15, 129.08, -55.8, 0.33)
	pt3dadd(-15.17, 129.41, -55.8, 0.33)
	pt3dadd(-15.17, 130.91, -55.8, 0.33)
	pt3dadd(-15.33, 131.25, -55.8, 0.33)
	pt3dadd(-15.33, 132.58, -55.8, 0.33)
	pt3dadd(-15.17, 132.75, -55.8, 0.33)
	pt3dadd(-15, 133.08, -55.8, 0.33)
	pt3dadd(-14.83, 133.41, -55.8, 0.33)
	pt3dadd(-14.83, 133.75, -55.8, 0.33)
	pt3dadd(-14.67, 133.91, -55.8, 0.33)
	pt3dadd(-14.5, 134.08, -55.8, 0.33)
	pt3dadd(-14.5, 134.25, -55.8, 0.33)
  }
  dend[256] {pt3dclear()
	pt3dadd(-20.83, 90.42, -45.36, 0.67)
	pt3dadd(-20.83, 90.58, -45, 0.33)
	pt3dadd(-21, 90.75, -45, 0.33)
	pt3dadd(-21.33, 90.92, -45, 0.33)
	pt3dadd(-21.67, 90.92, -45, 0.33)
	pt3dadd(-22, 91.08, -45, 0.33)
	pt3dadd(-22.33, 91.25, -45, 0.33)
	pt3dadd(-22.83, 91.25, -45, 0.33)
	pt3dadd(-23.33, 91.42, -45, 0.33)
	pt3dadd(-24, 91.58, -45, 0.33)
	pt3dadd(-24.5, 91.58, -45, 0.33)
  }
}
proc shape3d_22() {
  dend[256] {	pt3dadd(-24.83, 91.75, -45, 0.33)
	pt3dadd(-25, 91.92, -45, 0.33)
	pt3dadd(-25.5, 91.92, -45, 0.33)
	pt3dadd(-25.67, 92.08, -45, 0.33)
	pt3dadd(-26.17, 92.08, -45, 0.33)
	pt3dadd(-26.5, 92.25, -45, 0.33)
	pt3dadd(-26.83, 92.25, -45, 0.33)
	pt3dadd(-27, 92.42, -45, 0.33)
	pt3dadd(-27.17, 92.58, -45, 0.33)
	pt3dadd(-27.5, 92.75, -45, 0.33)
	pt3dadd(-27.67, 92.92, -45, 0.33)
	pt3dadd(-28, 93.08, -45, 0.33)
	pt3dadd(-28.33, 93.42, -45, 0.33)
	pt3dadd(-28.67, 93.58, -45, 0.33)
	pt3dadd(-28.83, 93.75, -45, 0.33)
	pt3dadd(-29, 93.92, -45, 0.33)
	pt3dadd(-29.17, 94.08, -45, 0.33)
	pt3dadd(-29.33, 94.25, -45, 0.33)
	pt3dadd(-29.33, 95.42, -45, 0.33)
	pt3dadd(-29.5, 95.58, -45, 0.33)
	pt3dadd(-29.67, 95.75, -45, 0.33)
  }
  dend[257] {pt3dclear()
	pt3dadd(-29.67, 95.75, -45, 0.33)
	pt3dadd(-29.24, 95.96, -44.54, 0.33)
  }
  dend[258] {pt3dclear()
	pt3dadd(-29.24, 95.96, -44.54, 0.33)
	pt3dadd(-29.33, 95.92, -44.64, 0.33)
	pt3dadd(-29, 95.92, -44.64, 0.33)
	pt3dadd(-28.67, 96.08, -44.64, 0.33)
	pt3dadd(-27.17, 96.08, -44.64, 0.33)
	pt3dadd(-27, 95.92, -44.64, 0.33)
	pt3dadd(-26.83, 95.75, -44.64, 0.33)
	pt3dadd(-26.5, 95.58, -44.64, 0.33)
	pt3dadd(-26.17, 95.42, -44.64, 0.33)
	pt3dadd(-26, 95.42, -44.64, 0.33)
  }
  dend[259] {pt3dclear()
	pt3dadd(-26, 95.42, -44.64, 0.33)
	pt3dadd(-25.5, 95.25, -44.64, 0.33)
	pt3dadd(-25.33, 94.92, -44.64, 0.33)
	pt3dadd(-25, 94.42, -44.64, 0.33)
	pt3dadd(-24.83, 94.08, -44.64, 0.33)
	pt3dadd(-24.83, 93.75, -44.64, 0.33)
	pt3dadd(-24.67, 93.58, -44.64, 0.33)
	pt3dadd(-24, 92.92, -44.64, 0.33)
	pt3dadd(-23.67, 92.75, -44.64, 0.33)
	pt3dadd(-23.5, 92.58, -44.64, 0.33)
	pt3dadd(-23, 92.42, -44.64, 0.33)
	pt3dadd(-21.83, 91.92, -44.64, 0.33)
	pt3dadd(-21.33, 91.75, -44.64, 0.33)
	pt3dadd(-21.17, 91.58, -44.64, 0.33)
	pt3dadd(-20.5, 91.58, -44.64, 0.33)
	pt3dadd(-20.32, 91.42, -44.64, 0.33)
	pt3dadd(-19.82, 91.42, -44.64, 0.33)
	pt3dadd(-19.82, 91.25, -44.64, 0.33)
  }
  dend[260] {pt3dclear()
	pt3dadd(-26, 95.42, -44.64, 0.33)
	pt3dadd(-25.5, 95.42, -44.64, 0.33)
	pt3dadd(-21.67, 95.42, -44.64, 0.33)
	pt3dadd(-21.33, 95.25, -44.64, 0.33)
	pt3dadd(-21.33, 95.08, -44.64, 0.33)
  }
  dend[261] {pt3dclear()
	pt3dadd(-29.24, 95.96, -44.54, 0.33)
	pt3dadd(-29.5, 95.42, -43.56, 0.33)
	pt3dadd(-29.67, 95.58, -43.56, 0.33)
	pt3dadd(-30, 95.75, -43.56, 0.33)
	pt3dadd(-30.17, 95.92, -43.56, 0.33)
	pt3dadd(-30.5, 96.08, -43.56, 0.33)
	pt3dadd(-30.67, 96.25, -43.56, 0.33)
	pt3dadd(-31, 96.42, -43.56, 0.33)
	pt3dadd(-31.33, 96.58, -43.56, 0.33)
	pt3dadd(-31.5, 96.75, -43.56, 0.33)
	pt3dadd(-31.67, 96.92, -43.56, 0.33)
	pt3dadd(-31.83, 97.08, -43.56, 0.33)
	pt3dadd(-32, 97.25, -43.56, 0.33)
	pt3dadd(-32.17, 97.58, -43.56, 0.33)
	pt3dadd(-32.5, 97.75, -43.56, 0.33)
	pt3dadd(-32.67, 97.92, -43.56, 0.33)
	pt3dadd(-32.83, 98.08, -43.56, 0.33)
	pt3dadd(-32.83, 98.25, -43.56, 0.33)
  }
  dend[262] {pt3dclear()
	pt3dadd(-32.83, 98.25, -43.56, 0.33)
	pt3dadd(-32.33, 98.08, -43.56, 0.33)
	pt3dadd(-32.5, 97.92, -43.56, 0.33)
	pt3dadd(-33, 97.92, -43.56, 0.33)
	pt3dadd(-33.17, 97.75, -43.56, 0.33)
	pt3dadd(-33.5, 97.75, -43.56, 0.33)
	pt3dadd(-33.83, 97.58, -43.56, 0.33)
	pt3dadd(-34.17, 97.58, -43.56, 0.33)
	pt3dadd(-34.5, 97.42, -43.56, 0.33)
	pt3dadd(-34.83, 97.42, -43.56, 0.33)
	pt3dadd(-35, 97.25, -43.56, 0.33)
	pt3dadd(-35.17, 97.08, -43.56, 0.33)
	pt3dadd(-35.67, 97.08, -43.56, 0.33)
	pt3dadd(-35.83, 96.92, -43.56, 0.33)
	pt3dadd(-36.17, 96.75, -43.56, 0.33)
	pt3dadd(-36.33, 96.58, -43.56, 0.33)
	pt3dadd(-36.5, 96.42, -43.56, 0.33)
	pt3dadd(-36.67, 96.25, -43.56, 0.33)
  }
  dend[263] {pt3dclear()
	pt3dadd(-36.67, 96.25, -43.56, 0.33)
	pt3dadd(-36.83, 96.58, -43.56, 0.33)
	pt3dadd(-36.83, 96.25, -43.56, 0.33)
	pt3dadd(-37, 95.92, -43.56, 0.33)
	pt3dadd(-37.17, 95.58, -43.56, 0.33)
	pt3dadd(-37.17, 91.92, -43.56, 0.33)
	pt3dadd(-37.33, 91.58, -43.56, 0.33)
	pt3dadd(-37.33, 91.25, -43.56, 0.33)
	pt3dadd(-37.5, 91.25, -43.56, 0.33)
  }
  dend[264] {pt3dclear()
	pt3dadd(-36.67, 96.25, -43.56, 0.33)
	pt3dadd(-37, 96.42, -43.2, 0.33)
	pt3dadd(-37.83, 96.42, -43.2, 0.33)
	pt3dadd(-38.33, 96.58, -43.2, 0.33)
	pt3dadd(-39.33, 96.58, -43.2, 0.33)
	pt3dadd(-39.5, 96.75, -43.2, 0.33)
	pt3dadd(-39.67, 96.92, -43.2, 0.33)
	pt3dadd(-41.17, 96.92, -43.2, 0.33)
	pt3dadd(-41.33, 96.75, -43.2, 0.33)
	pt3dadd(-41.5, 96.58, -43.2, 0.33)
	pt3dadd(-41.67, 96.42, -43.2, 0.33)
	pt3dadd(-42, 96.08, -43.2, 0.33)
	pt3dadd(-42.17, 95.92, -43.2, 0.33)
	pt3dadd(-42.33, 95.75, -43.2, 0.33)
	pt3dadd(-42.67, 95.75, -43.2, 0.33)
	pt3dadd(-42.83, 95.58, -43.2, 0.33)
	pt3dadd(-43.17, 95.25, -43.2, 0.33)
	pt3dadd(-43.33, 95.08, -43.2, 0.33)
  }
  dend[265] {pt3dclear()
	pt3dadd(-32.83, 98.25, -43.56, 0.33)
	pt3dadd(-32.67, 98.08, -44.64, 0.33)
	pt3dadd(-32.67, 99.75, -44.64, 0.33)
	pt3dadd(-32.83, 100.08, -44.64, 0.33)
	pt3dadd(-32.83, 100.92, -44.64, 0.33)
	pt3dadd(-33, 101.08, -44.64, 0.33)
	pt3dadd(-33.17, 101.42, -44.64, 0.33)
	pt3dadd(-33.33, 101.58, -44.64, 0.33)
	pt3dadd(-33.33, 102.08, -44.64, 0.33)
	pt3dadd(-33.5, 102.25, -44.64, 0.33)
	pt3dadd(-33.5, 102.58, -44.64, 0.33)
  }
  dend[266] {pt3dclear()
	pt3dadd(-33.5, 102.58, -44.64, 0.33)
	pt3dadd(-33.17, 102.75, -44.64, 0.33)
	pt3dadd(-33.33, 103.08, -44.64, 0.33)
	pt3dadd(-33.5, 103.25, -44.64, 0.33)
	pt3dadd(-33.83, 103.58, -44.64, 0.33)
	pt3dadd(-34.17, 103.75, -44.64, 0.33)
	pt3dadd(-34.67, 104.25, -44.64, 0.33)
	pt3dadd(-34.83, 104.42, -44.64, 0.33)
	pt3dadd(-34.83, 104.75, -44.64, 0.33)
	pt3dadd(-35, 104.92, -44.64, 0.33)
	pt3dadd(-35.17, 105.25, -44.64, 0.33)
	pt3dadd(-35.33, 105.42, -44.64, 0.33)
	pt3dadd(-35.5, 105.58, -44.64, 0.33)
	pt3dadd(-35.67, 105.92, -44.64, 0.33)
	pt3dadd(-36, 106.08, -44.64, 0.33)
	pt3dadd(-36.17, 106.25, -44.64, 0.33)
	pt3dadd(-36.33, 106.42, -44.64, 0.33)
	pt3dadd(-36.5, 106.75, -44.64, 0.33)
	pt3dadd(-36.67, 107.08, -44.64, 0.33)
	pt3dadd(-36.83, 107.42, -44.64, 0.33)
	pt3dadd(-37, 107.75, -44.64, 0.33)
	pt3dadd(-37.17, 107.92, -44.64, 0.33)
	pt3dadd(-37.33, 108.08, -44.64, 0.33)
	pt3dadd(-37.5, 108.42, -44.64, 0.33)
	pt3dadd(-37.67, 108.58, -44.64, 0.33)
	pt3dadd(-37.67, 108.92, -44.64, 0.33)
	pt3dadd(-37.83, 109.08, -44.64, 0.33)
	pt3dadd(-38, 109.25, -44.64, 0.33)
	pt3dadd(-38.17, 109.42, -44.64, 0.33)
	pt3dadd(-38.17, 109.75, -44.64, 0.33)
	pt3dadd(-38.33, 109.92, -44.64, 0.33)
	pt3dadd(-38.5, 110.08, -44.64, 0.33)
	pt3dadd(-38.67, 110.25, -44.64, 0.33)
  }
  dend[267] {pt3dclear()
	pt3dadd(-38.67, 110.25, -44.64, 0.33)
	pt3dadd(-38.5, 110.42, -44.64, 0.33)
	pt3dadd(-38.83, 110.42, -44.64, 0.33)
	pt3dadd(-39, 110.58, -44.64, 0.33)
	pt3dadd(-39.33, 110.75, -44.64, 0.33)
	pt3dadd(-39.5, 111.08, -44.64, 0.33)
	pt3dadd(-39.67, 111.25, -44.64, 0.33)
	pt3dadd(-39.83, 111.42, -44.64, 0.33)
	pt3dadd(-40, 111.58, -44.64, 0.33)
	pt3dadd(-40.17, 111.75, -44.64, 0.33)
	pt3dadd(-40.33, 112.08, -44.64, 0.33)
	pt3dadd(-40.5, 112.42, -44.64, 0.33)
	pt3dadd(-40.67, 112.58, -44.64, 0.33)
	pt3dadd(-40.83, 112.75, -44.64, 0.33)
	pt3dadd(-41, 113.08, -44.64, 0.33)
	pt3dadd(-41.17, 113.25, -44.64, 0.33)
	pt3dadd(-41.33, 113.42, -44.64, 0.33)
	pt3dadd(-41.67, 113.75, -44.64, 0.33)
	pt3dadd(-41.83, 113.92, -44.64, 0.33)
	pt3dadd(-42, 114.08, -44.64, 0.33)
	pt3dadd(-42.33, 114.25, -44.64, 0.33)
	pt3dadd(-42.5, 114.42, -44.64, 0.33)
	pt3dadd(-42.83, 114.42, -44.64, 0.33)
	pt3dadd(-43, 114.58, -44.64, 0.33)
	pt3dadd(-43.17, 114.75, -44.64, 0.33)
	pt3dadd(-43.33, 114.92, -44.64, 0.33)
	pt3dadd(-43.67, 115.08, -44.64, 0.33)
	pt3dadd(-44, 115.08, -44.64, 0.33)
	pt3dadd(-44.17, 115.25, -44.64, 0.33)
	pt3dadd(-44.33, 115.42, -44.64, 0.33)
	pt3dadd(-44.67, 115.42, -44.64, 0.33)
	pt3dadd(-45, 115.75, -44.64, 0.33)
	pt3dadd(-45.33, 115.75, -44.64, 0.33)
	pt3dadd(-45.83, 116.25, -44.64, 0.33)
	pt3dadd(-46, 116.42, -44.64, 0.33)
	pt3dadd(-46.17, 116.58, -44.64, 0.33)
	pt3dadd(-46.33, 116.75, -44.64, 0.33)
  }
}
proc shape3d_23() {
  dend[267] {	pt3dadd(-46.5, 116.92, -44.64, 0.33)
	pt3dadd(-46.67, 117.08, -44.64, 0.33)
	pt3dadd(-46.83, 117.25, -44.64, 0.33)
	pt3dadd(-47, 117.42, -44.64, 0.33)
	pt3dadd(-47.17, 117.75, -44.64, 0.33)
	pt3dadd(-47.33, 117.92, -44.64, 0.33)
	pt3dadd(-47.5, 118.08, -44.64, 0.33)
  }
  dend[268] {pt3dclear()
	pt3dadd(-47.5, 118.08, -44.64, 0.33)
	pt3dadd(-47.33, 118.08, -44.64, 0.33)
	pt3dadd(-47.5, 118.25, -44.64, 0.33)
	pt3dadd(-47.83, 118.42, -44.64, 0.33)
	pt3dadd(-48.33, 118.42, -44.64, 0.33)
	pt3dadd(-48.5, 118.58, -44.64, 0.33)
	pt3dadd(-49, 118.58, -44.64, 0.33)
	pt3dadd(-49.33, 118.42, -44.64, 0.33)
	pt3dadd(-49.5, 118.25, -44.64, 0.33)
	pt3dadd(-49.83, 118.08, -44.64, 0.33)
	pt3dadd(-50.17, 117.92, -44.64, 0.33)
	pt3dadd(-50.5, 117.75, -44.64, 0.33)
	pt3dadd(-51.33, 117.75, -44.64, 0.33)
	pt3dadd(-51.83, 117.58, -44.64, 0.33)
	pt3dadd(-53, 117.58, -44.64, 0.33)
	pt3dadd(-53.17, 117.75, -44.64, 0.33)
	pt3dadd(-53.17, 118.08, -44.64, 0.33)
	pt3dadd(-53.33, 118.25, -44.64, 0.33)
	pt3dadd(-53.5, 118.42, -44.64, 0.33)
	pt3dadd(-53.67, 118.58, -44.64, 0.33)
	pt3dadd(-53.67, 118.92, -44.64, 0.33)
	pt3dadd(-53.83, 119.08, -44.64, 0.33)
	pt3dadd(-54, 119.25, -44.64, 0.33)
	pt3dadd(-54.17, 119.42, -44.64, 0.33)
	pt3dadd(-54.33, 119.58, -44.64, 0.33)
	pt3dadd(-54.5, 119.75, -44.64, 0.33)
	pt3dadd(-54.83, 119.75, -44.64, 0.33)
	pt3dadd(-55, 119.92, -44.64, 0.33)
	pt3dadd(-55.17, 120.08, -44.64, 0.33)
	pt3dadd(-55.33, 120.25, -44.64, 0.33)
	pt3dadd(-55.5, 120.42, -44.64, 0.33)
	pt3dadd(-55.83, 120.42, -44.64, 0.33)
	pt3dadd(-56, 120.58, -44.64, 0.33)
  }
  dend[269] {pt3dclear()
	pt3dadd(-47.5, 118.08, -44.64, 0.33)
	pt3dadd(-47.5, 117.92, -45.36, 0.33)
	pt3dadd(-47.5, 118.25, -45.36, 0.33)
	pt3dadd(-47.83, 118.42, -45.36, 0.33)
	pt3dadd(-48.17, 118.58, -45.36, 0.33)
	pt3dadd(-48.33, 118.75, -45.36, 0.33)
	pt3dadd(-48.5, 119.08, -45.36, 0.33)
	pt3dadd(-48.67, 119.42, -45.36, 0.33)
	pt3dadd(-48.83, 119.58, -45.36, 0.33)
	pt3dadd(-49, 119.75, -45.36, 0.33)
  }
  dend[270] {pt3dclear()
	pt3dadd(-49, 119.75, -45.36, 0.33)
	pt3dadd(-48.83, 119.75, -44.64, 0.33)
	pt3dadd(-49, 120.08, -44.64, 0.33)
	pt3dadd(-49.17, 120.42, -44.64, 0.33)
	pt3dadd(-49.33, 120.75, -44.64, 0.33)
	pt3dadd(-49.5, 121.08, -44.64, 0.33)
	pt3dadd(-49.83, 121.25, -44.64, 0.33)
	pt3dadd(-50.17, 121.42, -44.64, 0.33)
	pt3dadd(-50.33, 121.75, -44.64, 0.33)
	pt3dadd(-50.5, 121.92, -44.64, 0.33)
	pt3dadd(-50.67, 122.25, -44.64, 0.33)
	pt3dadd(-50.83, 122.58, -44.64, 0.33)
	pt3dadd(-51, 122.92, -44.64, 0.33)
	pt3dadd(-51, 123.92, -44.64, 0.33)
	pt3dadd(-51.17, 124.58, -44.64, 0.33)
	pt3dadd(-51.17, 125.08, -44.64, 0.33)
	pt3dadd(-51.33, 125.58, -44.64, 0.33)
	pt3dadd(-51.33, 126.58, -44.64, 0.33)
	pt3dadd(-51.5, 126.75, -44.64, 0.33)
	pt3dadd(-51.67, 127.08, -44.64, 0.33)
	pt3dadd(-51.67, 127.42, -44.64, 0.33)
	pt3dadd(-51.83, 127.58, -44.64, 0.33)
	pt3dadd(-51.83, 128.91, -44.64, 0.33)
	pt3dadd(-51.67, 129.08, -44.64, 0.33)
	pt3dadd(-51, 129.08, -44.64, 0.33)
	pt3dadd(-50.83, 129.25, -44.64, 0.33)
	pt3dadd(-50.67, 129.41, -44.64, 0.33)
	pt3dadd(-50.5, 129.58, -44.64, 0.33)
	pt3dadd(-50.33, 129.91, -44.64, 0.33)
	pt3dadd(-50.17, 130.08, -44.64, 0.33)
	pt3dadd(-50, 130.25, -44.64, 0.33)
	pt3dadd(-50, 131.58, -44.64, 0.33)
  }
  dend[271] {pt3dclear()
	pt3dadd(-49, 119.75, -45.36, 0.33)
	pt3dadd(-48.67, 119.42, -45, 0.33)
	pt3dadd(-48.5, 119.58, -45, 0.33)
	pt3dadd(-48.5, 119.92, -45, 0.33)
	pt3dadd(-48.33, 120.25, -45, 0.33)
	pt3dadd(-48.33, 120.58, -45, 0.33)
	pt3dadd(-48.17, 120.92, -45, 0.33)
	pt3dadd(-48.17, 121.92, -45, 0.33)
	pt3dadd(-48.33, 122.08, -45, 0.33)
	pt3dadd(-48.33, 122.58, -45, 0.33)
	pt3dadd(-48.5, 122.75, -45, 0.33)
	pt3dadd(-48.5, 124.75, -45, 0.33)
	pt3dadd(-48.33, 124.92, -45, 0.33)
	pt3dadd(-48.17, 125.08, -45, 0.33)
	pt3dadd(-47.83, 125.25, -45, 0.33)
	pt3dadd(-47.33, 125.25, -45, 0.33)
	pt3dadd(-47, 125.42, -45, 0.33)
	pt3dadd(-46.83, 125.75, -45, 0.33)
	pt3dadd(-46.67, 126.08, -45, 0.33)
	pt3dadd(-46.5, 126.25, -45, 0.33)
	pt3dadd(-46.5, 126.58, -45, 0.33)
	pt3dadd(-46.33, 126.75, -45, 0.33)
	pt3dadd(-46.33, 127.42, -45, 0.33)
  }
  dend[272] {pt3dclear()
	pt3dadd(-38.67, 110.25, -44.64, 0.33)
	pt3dadd(-38.67, 110.08, -44.28, 0.33)
	pt3dadd(-41.33, 110.08, -44.28, 0.33)
	pt3dadd(-42, 110.25, -44.28, 0.33)
	pt3dadd(-42.83, 110.42, -44.28, 0.33)
	pt3dadd(-47.17, 110.42, -44.28, 0.33)
	pt3dadd(-47.17, 109.76, -44.28, 0.33)
  }
  dend[273] {pt3dclear()
	pt3dadd(-47.17, 109.76, -44.28, 0.33)
	pt3dadd(-46.5, 110.08, -44.28, 0.33)
	pt3dadd(-46.67, 110.25, -44.28, 0.33)
	pt3dadd(-46.83, 110.42, -44.28, 0.33)
	pt3dadd(-47.17, 110.58, -44.28, 0.33)
	pt3dadd(-47.33, 110.75, -44.28, 0.33)
	pt3dadd(-47.5, 111.08, -44.28, 0.33)
	pt3dadd(-47.67, 111.25, -44.28, 0.33)
	pt3dadd(-47.67, 111.92, -44.28, 0.33)
	pt3dadd(-47.83, 112.25, -44.28, 0.33)
	pt3dadd(-47.83, 114.25, -44.28, 0.33)
	pt3dadd(-48, 114.42, -44.28, 0.33)
	pt3dadd(-48.17, 114.58, -44.28, 0.33)
	pt3dadd(-48.17, 114.92, -44.28, 0.33)
	pt3dadd(-48.33, 115.08, -44.28, 0.33)
	pt3dadd(-48.5, 115.25, -44.28, 0.33)
  }
  dend[274] {pt3dclear()
	pt3dadd(-47.17, 109.76, -44.28, 0.33)
	pt3dadd(-47.17, 110.25, -44.28, 0.33)
	pt3dadd(-47.17, 108.75, -44.28, 0.33)
	pt3dadd(-47.33, 108.58, -44.28, 0.33)
	pt3dadd(-47.67, 108.42, -44.28, 0.33)
	pt3dadd(-48, 108.25, -44.28, 0.33)
	pt3dadd(-48.17, 108.08, -44.28, 0.33)
	pt3dadd(-48.33, 107.92, -44.28, 0.33)
	pt3dadd(-48.5, 107.75, -44.28, 0.33)
	pt3dadd(-48.67, 107.58, -44.28, 0.33)
	pt3dadd(-48.83, 107.42, -44.28, 0.33)
	pt3dadd(-48.83, 107.08, -44.28, 0.33)
	pt3dadd(-49, 106.92, -44.28, 0.33)
	pt3dadd(-49.33, 106.92, -44.28, 0.33)
	pt3dadd(-49.33, 106.75, -44.28, 0.33)
  }
  dend[275] {pt3dclear()
	pt3dadd(-33.5, 102.58, -44.64, 0.33)
	pt3dadd(-33.5, 102.58, -46.44, 0.33)
	pt3dadd(-33.33, 102.75, -46.44, 0.33)
	pt3dadd(-33.33, 104.75, -46.44, 0.33)
	pt3dadd(-33.5, 105.08, -46.44, 0.33)
	pt3dadd(-33.5, 106.25, -46.44, 0.33)
	pt3dadd(-33.67, 106.75, -46.44, 0.33)
	pt3dadd(-33.67, 107.25, -46.44, 0.33)
	pt3dadd(-33.83, 107.58, -46.44, 0.33)
	pt3dadd(-34, 107.75, -46.44, 0.33)
	pt3dadd(-34, 108.08, -46.44, 0.33)
	pt3dadd(-34.17, 108.25, -46.44, 0.33)
	pt3dadd(-34.33, 108.42, -46.44, 0.33)
	pt3dadd(-34.33, 108.75, -46.44, 0.33)
	pt3dadd(-34.5, 109.08, -46.44, 0.33)
	pt3dadd(-34.67, 109.42, -46.44, 0.33)
	pt3dadd(-34.67, 109.92, -46.44, 0.33)
	pt3dadd(-34.83, 110.08, -46.44, 0.33)
	pt3dadd(-34.83, 110.42, -46.44, 0.33)
  }
  dend[276] {pt3dclear()
	pt3dadd(-34.83, 110.42, -46.44, 0.33)
	pt3dadd(-34.46, 109.86, -46.44, 0.33)
  }
  dend[277] {pt3dclear()
	pt3dadd(-34.46, 109.86, -46.44, 0.33)
	pt3dadd(-35, 109.92, -46.44, 0.33)
	pt3dadd(-35.33, 109.75, -46.44, 0.33)
	pt3dadd(-36.17, 109.75, -46.44, 0.33)
	pt3dadd(-36.5, 109.92, -46.44, 0.33)
	pt3dadd(-36.67, 110.08, -46.44, 0.33)
	pt3dadd(-37, 110.08, -46.44, 0.33)
	pt3dadd(-37.17, 110.42, -46.44, 0.33)
	pt3dadd(-37.33, 110.58, -46.44, 0.33)
	pt3dadd(-37.5, 110.75, -46.44, 0.33)
	pt3dadd(-37.5, 111.08, -46.44, 0.33)
	pt3dadd(-37.67, 111.25, -46.44, 0.33)
	pt3dadd(-37.83, 111.42, -46.44, 0.33)
	pt3dadd(-38, 111.58, -46.44, 0.33)
	pt3dadd(-38, 111.92, -46.44, 0.33)
	pt3dadd(-38.17, 112.08, -46.44, 0.33)
	pt3dadd(-38.33, 112.25, -46.44, 0.33)
	pt3dadd(-38.33, 113.08, -46.44, 0.33)
	pt3dadd(-38.5, 113.25, -46.44, 0.33)
	pt3dadd(-38.5, 113.75, -46.44, 0.33)
	pt3dadd(-38.67, 113.92, -46.44, 0.33)
	pt3dadd(-38.67, 114.25, -46.44, 0.33)
	pt3dadd(-38.83, 114.42, -46.44, 0.33)
	pt3dadd(-38.83, 114.92, -46.44, 0.33)
	pt3dadd(-39, 115.25, -46.44, 0.33)
	pt3dadd(-39, 116.75, -46.44, 0.33)
	pt3dadd(-39.17, 116.92, -46.44, 0.33)
	pt3dadd(-39.17, 119.08, -46.44, 0.33)
	pt3dadd(-39.33, 119.25, -46.44, 0.33)
	pt3dadd(-39.33, 120.08, -46.44, 0.33)
	pt3dadd(-39.5, 120.25, -46.44, 0.33)
	pt3dadd(-39.5, 120.75, -46.44, 0.33)
	pt3dadd(-39.67, 120.92, -46.44, 0.33)
	pt3dadd(-39.83, 121.08, -46.44, 0.33)
	pt3dadd(-39.83, 121.42, -46.44, 0.33)
	pt3dadd(-40.17, 121.58, -46.44, 0.33)
  }
}
proc shape3d_24() {
  dend[277] {	pt3dadd(-40.33, 121.75, -46.44, 0.33)
	pt3dadd(-40.5, 121.92, -46.44, 0.33)
	pt3dadd(-40.5, 122.25, -46.44, 0.33)
	pt3dadd(-40.67, 122.42, -46.44, 0.33)
	pt3dadd(-40.83, 122.58, -46.44, 0.33)
	pt3dadd(-41, 122.75, -46.44, 0.33)
	pt3dadd(-41, 123.08, -46.44, 0.33)
	pt3dadd(-41.17, 123.25, -46.44, 0.33)
	pt3dadd(-41.33, 123.42, -46.44, 0.33)
	pt3dadd(-41.33, 123.75, -46.44, 0.33)
	pt3dadd(-41.5, 123.92, -46.44, 0.33)
	pt3dadd(-41.67, 124.08, -46.44, 0.33)
	pt3dadd(-41.67, 124.42, -46.44, 0.33)
	pt3dadd(-41.83, 124.42, -46.44, 0.33)
  }
  dend[278] {pt3dclear()
	pt3dadd(-41.83, 124.42, -46.44, 0.33)
	pt3dadd(-41.67, 124.08, -46.44, 0.33)
	pt3dadd(-41.67, 124.75, -46.44, 0.33)
	pt3dadd(-41.83, 124.92, -46.44, 0.33)
	pt3dadd(-42, 125.25, -46.44, 0.33)
	pt3dadd(-42.17, 125.58, -46.44, 0.33)
	pt3dadd(-42.33, 125.75, -46.44, 0.33)
	pt3dadd(-42.5, 125.92, -46.44, 0.33)
	pt3dadd(-42.83, 126.08, -46.44, 0.33)
	pt3dadd(-43, 126.25, -46.44, 0.33)
	pt3dadd(-43.17, 126.42, -46.44, 0.33)
	pt3dadd(-43.33, 126.58, -46.44, 0.33)
	pt3dadd(-43.5, 126.75, -46.44, 0.33)
	pt3dadd(-43.67, 126.92, -46.44, 0.33)
	pt3dadd(-43.83, 127.25, -46.44, 0.33)
	pt3dadd(-44.17, 127.42, -46.44, 0.33)
	pt3dadd(-44.67, 127.92, -46.44, 0.33)
	pt3dadd(-44.83, 128.08, -46.44, 0.33)
	pt3dadd(-45, 128.08, -46.44, 0.33)
  }
  dend[279] {pt3dclear()
	pt3dadd(-41.83, 124.42, -46.44, 0.33)
	pt3dadd(-41.83, 124.25, -46.44, 0.33)
	pt3dadd(-41.67, 124.42, -46.44, 0.33)
	pt3dadd(-41.67, 125.08, -46.44, 0.33)
	pt3dadd(-41.5, 125.42, -46.44, 0.33)
	pt3dadd(-41.5, 125.92, -46.44, 0.33)
	pt3dadd(-41.33, 126.25, -46.44, 0.33)
	pt3dadd(-41.17, 126.42, -46.44, 0.33)
	pt3dadd(-41.17, 127.42, -46.44, 0.33)
	pt3dadd(-41.33, 127.75, -46.44, 0.33)
	pt3dadd(-41.5, 128.08, -46.44, 0.33)
	pt3dadd(-41.67, 128.25, -46.44, 0.33)
	pt3dadd(-41.83, 128.58, -46.44, 0.33)
	pt3dadd(-42, 128.75, -46.44, 0.33)
	pt3dadd(-42.33, 128.91, -46.44, 0.33)
	pt3dadd(-42.5, 129.08, -46.44, 0.33)
	pt3dadd(-42.67, 129.25, -46.44, 0.33)
	pt3dadd(-43, 129.41, -46.44, 0.33)
	pt3dadd(-43.17, 129.58, -46.44, 0.33)
	pt3dadd(-43.33, 129.91, -46.44, 0.33)
	pt3dadd(-43.5, 130.08, -46.44, 0.33)
	pt3dadd(-43.67, 130.25, -46.44, 0.33)
	pt3dadd(-43.67, 130.41, -46.44, 0.33)
  }
  dend[280] {pt3dclear()
	pt3dadd(-34.46, 109.86, -46.44, 0.33)
	pt3dadd(-35, 110.25, -46.08, 0.33)
	pt3dadd(-35, 110.75, -46.08, 0.33)
	pt3dadd(-35.33, 111.25, -46.08, 0.33)
	pt3dadd(-35.5, 111.75, -46.08, 0.33)
	pt3dadd(-35.67, 111.92, -46.08, 0.33)
	pt3dadd(-35.83, 112.08, -46.08, 0.33)
	pt3dadd(-35.83, 112.42, -46.08, 0.33)
	pt3dadd(-36.33, 112.92, -46.08, 0.33)
	pt3dadd(-36.5, 113.25, -46.08, 0.33)
	pt3dadd(-36.67, 113.42, -46.08, 0.33)
	pt3dadd(-37.17, 113.92, -46.08, 0.33)
	pt3dadd(-37.33, 114.08, -46.08, 0.33)
	pt3dadd(-37.5, 114.25, -46.08, 0.33)
	pt3dadd(-37.67, 114.42, -46.08, 0.33)
	pt3dadd(-37.83, 114.75, -46.08, 0.33)
	pt3dadd(-38, 115.08, -46.08, 0.33)
	pt3dadd(-38.17, 115.25, -46.08, 0.33)
	pt3dadd(-38.33, 115.58, -46.08, 0.33)
	pt3dadd(-38.5, 115.92, -46.08, 0.33)
	pt3dadd(-38.67, 116.08, -46.08, 0.33)
	pt3dadd(-38.67, 116.42, -46.08, 0.33)
	pt3dadd(-38.83, 116.58, -46.08, 0.33)
	pt3dadd(-39, 116.75, -46.08, 0.33)
	pt3dadd(-39, 117.08, -46.08, 0.33)
	pt3dadd(-39.17, 117.25, -46.08, 0.33)
	pt3dadd(-39.33, 117.42, -46.08, 0.33)
	pt3dadd(-39.5, 117.75, -46.08, 0.33)
	pt3dadd(-39.67, 117.92, -46.08, 0.33)
	pt3dadd(-39.83, 118.08, -46.08, 0.33)
	pt3dadd(-40, 118.25, -46.08, 0.33)
	pt3dadd(-40.33, 118.42, -46.08, 0.33)
	pt3dadd(-40.67, 118.75, -46.08, 0.33)
	pt3dadd(-41.17, 118.92, -46.08, 0.33)
	pt3dadd(-41.5, 119.08, -46.08, 0.33)
	pt3dadd(-41.67, 119.25, -46.08, 0.33)
	pt3dadd(-42, 119.58, -46.08, 0.33)
	pt3dadd(-42.17, 119.75, -46.08, 0.33)
	pt3dadd(-42.33, 120.08, -46.08, 0.33)
	pt3dadd(-42.67, 120.25, -46.08, 0.33)
	pt3dadd(-43.5, 121.08, -46.08, 0.33)
	pt3dadd(-43.67, 121.25, -46.08, 0.33)
	pt3dadd(-43.83, 121.42, -46.08, 0.33)
	pt3dadd(-44.17, 121.58, -46.08, 0.33)
	pt3dadd(-44.5, 121.92, -46.08, 0.33)
	pt3dadd(-44.67, 122.25, -46.08, 0.33)
	pt3dadd(-44.83, 122.75, -46.08, 0.33)
	pt3dadd(-45, 123.08, -46.08, 0.33)
	pt3dadd(-45.17, 123.42, -46.08, 0.33)
	pt3dadd(-45.17, 123.75, -46.08, 0.33)
	pt3dadd(-45.33, 124.08, -46.08, 0.33)
	pt3dadd(-45.33, 124.42, -46.08, 0.33)
	pt3dadd(-45.5, 124.58, -46.08, 0.33)
	pt3dadd(-45.5, 124.92, -46.08, 0.33)
	pt3dadd(-45.67, 125.08, -46.08, 0.33)
	pt3dadd(-45.67, 125.42, -46.08, 0.33)
	pt3dadd(-45.83, 125.42, -46.08, 0.33)
  }
  dend[281] {pt3dclear()
	pt3dadd(-34.83, 110.42, -46.44, 0.33)
	pt3dadd(-34.67, 110.58, -46.8, 0.33)
	pt3dadd(-34.67, 111.08, -46.8, 0.33)
	pt3dadd(-34.5, 111.42, -46.8, 0.33)
	pt3dadd(-34.5, 112.58, -46.8, 0.33)
	pt3dadd(-34.33, 112.75, -46.8, 0.33)
	pt3dadd(-34.17, 112.92, -46.8, 0.33)
	pt3dadd(-34.17, 113.25, -46.8, 0.33)
  }
  dend[282] {pt3dclear()
	pt3dadd(-34.17, 113.25, -46.8, 0.33)
	pt3dadd(-33.67, 113.42, -46.8, 0.33)
	pt3dadd(-33.17, 113.42, -46.8, 0.33)
	pt3dadd(-32.67, 112.92, -46.8, 0.33)
	pt3dadd(-32.5, 112.75, -46.8, 0.33)
	pt3dadd(-32.17, 112.42, -46.8, 0.33)
	pt3dadd(-32, 112.25, -46.8, 0.33)
	pt3dadd(-31.83, 112.08, -46.8, 0.33)
	pt3dadd(-31.67, 111.92, -46.8, 0.33)
	pt3dadd(-31.5, 111.75, -46.8, 0.33)
	pt3dadd(-31.33, 111.42, -46.8, 0.33)
	pt3dadd(-31.17, 111.25, -46.8, 0.33)
	pt3dadd(-31.17, 110.92, -46.8, 0.33)
	pt3dadd(-31, 110.75, -46.8, 0.33)
	pt3dadd(-30.83, 110.58, -46.8, 0.33)
	pt3dadd(-30.83, 109.92, -46.8, 0.33)
	pt3dadd(-30.67, 109.75, -46.8, 0.33)
	pt3dadd(-30.5, 109.58, -46.8, 0.33)
	pt3dadd(-30.5, 109.25, -46.8, 0.33)
	pt3dadd(-30.33, 109.08, -46.8, 0.33)
	pt3dadd(-30.33, 108.75, -46.8, 0.33)
	pt3dadd(-30.17, 108.58, -46.8, 0.33)
	pt3dadd(-30.17, 107.75, -46.8, 0.33)
	pt3dadd(-30.33, 107.75, -46.8, 0.33)
  }
  dend[283] {pt3dclear()
	pt3dadd(-34.17, 113.25, -46.8, 0.33)
	pt3dadd(-33.83, 113.08, -46.8, 0.33)
	pt3dadd(-33.83, 113.42, -46.8, 0.33)
	pt3dadd(-34, 113.58, -46.8, 0.33)
	pt3dadd(-34.17, 113.92, -46.8, 0.33)
	pt3dadd(-34.5, 114.08, -46.8, 0.33)
	pt3dadd(-34.67, 114.25, -46.8, 0.33)
	pt3dadd(-34.83, 114.42, -46.8, 0.33)
	pt3dadd(-35, 114.75, -46.8, 0.33)
	pt3dadd(-35.17, 114.92, -46.8, 0.33)
	pt3dadd(-35.17, 115.42, -46.8, 0.33)
	pt3dadd(-35.33, 115.75, -46.8, 0.33)
	pt3dadd(-35.5, 115.92, -46.8, 0.33)
	pt3dadd(-35.5, 116.25, -46.8, 0.33)
	pt3dadd(-35.67, 116.42, -46.8, 0.33)
	pt3dadd(-35.83, 116.58, -46.8, 0.33)
	pt3dadd(-35.83, 116.92, -46.8, 0.33)
	pt3dadd(-36, 117.08, -46.8, 0.33)
	pt3dadd(-36.17, 117.42, -46.8, 0.33)
	pt3dadd(-36.33, 117.58, -46.8, 0.33)
	pt3dadd(-36.5, 117.75, -46.8, 0.33)
	pt3dadd(-36.5, 118.08, -46.8, 0.33)
	pt3dadd(-36.67, 118.25, -46.8, 0.33)
	pt3dadd(-37, 118.58, -46.8, 0.33)
	pt3dadd(-37.17, 118.75, -46.8, 0.33)
	pt3dadd(-37.17, 119.58, -46.8, 0.33)
	pt3dadd(-37.33, 119.75, -46.8, 0.33)
	pt3dadd(-37.33, 120.08, -46.8, 0.33)
	pt3dadd(-37.5, 120.25, -46.8, 0.33)
	pt3dadd(-37.67, 120.42, -46.8, 0.33)
	pt3dadd(-37.83, 120.58, -46.8, 0.33)
	pt3dadd(-37.83, 120.92, -46.8, 0.33)
	pt3dadd(-38, 121.08, -46.8, 0.33)
	pt3dadd(-38.17, 121.25, -46.8, 0.33)
  }
  dend[284] {pt3dclear()
	pt3dadd(-29.67, 95.75, -45, 0.33)
	pt3dadd(-29.5, 95.92, -45, 0.33)
	pt3dadd(-29.33, 96.08, -45, 0.33)
	pt3dadd(-29.33, 96.58, -45, 0.33)
	pt3dadd(-29.5, 97.08, -45, 0.33)
	pt3dadd(-29.5, 98.75, -45, 0.33)
	pt3dadd(-29.33, 98.92, -45, 0.33)
	pt3dadd(-29.17, 99.25, -45, 0.33)
	pt3dadd(-29, 99.42, -45, 0.33)
	pt3dadd(-28.83, 99.58, -45, 0.33)
	pt3dadd(-28.67, 99.75, -45, 0.33)
	pt3dadd(-28.5, 99.92, -45, 0.33)
	pt3dadd(-28.33, 100.08, -45, 0.33)
	pt3dadd(-28.17, 100.25, -45, 0.33)
	pt3dadd(-28, 100.42, -45, 0.33)
	pt3dadd(-27.83, 100.58, -45, 0.33)
	pt3dadd(-27.5, 100.58, -45, 0.33)
	pt3dadd(-27.33, 100.75, -45, 0.33)
	pt3dadd(-26.33, 101.75, -45, 0.33)
	pt3dadd(-26.17, 101.92, -45, 0.33)
	pt3dadd(-26.17, 102.25, -45, 0.33)
  }
}
proc shape3d_25() {
  dend[284] {	pt3dadd(-26, 102.42, -45, 0.33)
	pt3dadd(-25.83, 102.58, -45, 0.33)
  }
  dend[285] {pt3dclear()
	pt3dadd(-20.17, 87.58, -47.16, 0.67)
	pt3dadd(-19.82, 87.42, -44.28, 0.33)
	pt3dadd(-20.17, 87.75, -44.28, 0.33)
	pt3dadd(-20.32, 87.92, -44.28, 0.33)
	pt3dadd(-20.67, 87.92, -44.28, 0.33)
	pt3dadd(-20.83, 88.08, -44.28, 0.33)
	pt3dadd(-21.17, 88.25, -44.28, 0.33)
	pt3dadd(-21.5, 88.42, -44.28, 0.33)
	pt3dadd(-21.83, 88.42, -44.28, 0.33)
	pt3dadd(-22.17, 88.58, -44.28, 0.33)
	pt3dadd(-22.5, 88.75, -44.28, 0.33)
	pt3dadd(-23.17, 88.75, -44.28, 0.33)
	pt3dadd(-23.33, 88.92, -44.28, 0.33)
	pt3dadd(-24.17, 88.92, -44.28, 0.33)
	pt3dadd(-24.33, 89.08, -44.28, 0.33)
	pt3dadd(-25.67, 89.08, -44.28, 0.33)
	pt3dadd(-25.83, 89.25, -44.28, 0.33)
	pt3dadd(-28.17, 89.25, -44.28, 0.33)
  }
  dend[286] {pt3dclear()
	pt3dadd(-28.17, 89.25, -44.28, 0.33)
	pt3dadd(-28, 89.08, -44.28, 0.33)
	pt3dadd(-28.17, 89.25, -44.28, 0.33)
	pt3dadd(-28.33, 89.58, -44.28, 0.33)
	pt3dadd(-28.5, 89.75, -44.28, 0.33)
	pt3dadd(-28.83, 89.92, -44.28, 0.33)
	pt3dadd(-29, 90.08, -44.28, 0.33)
	pt3dadd(-29.33, 90.25, -44.28, 0.33)
	pt3dadd(-29.67, 90.58, -44.28, 0.33)
	pt3dadd(-30, 90.75, -44.28, 0.33)
	pt3dadd(-30.33, 90.92, -44.28, 0.33)
	pt3dadd(-30.5, 91.25, -44.28, 0.33)
	pt3dadd(-30.67, 91.42, -44.28, 0.33)
	pt3dadd(-30.83, 91.58, -44.28, 0.33)
	pt3dadd(-31.17, 91.58, -44.28, 0.33)
	pt3dadd(-31.33, 91.75, -44.28, 0.33)
	pt3dadd(-31.5, 91.92, -44.28, 0.33)
	pt3dadd(-31.83, 91.92, -44.28, 0.33)
	pt3dadd(-32, 92.08, -44.28, 0.33)
	pt3dadd(-32.17, 92.25, -44.28, 0.33)
	pt3dadd(-32.5, 92.58, -44.28, 0.33)
	pt3dadd(-32.67, 92.75, -44.28, 0.33)
	pt3dadd(-32.83, 92.92, -44.28, 0.33)
	pt3dadd(-32.83, 93.25, -44.28, 0.33)
	pt3dadd(-33.17, 93.25, -44.28, 0.33)
	pt3dadd(-33.33, 93.42, -44.28, 0.33)
	pt3dadd(-33.5, 93.75, -44.28, 0.33)
	pt3dadd(-33.67, 93.92, -44.28, 0.33)
	pt3dadd(-34.33, 93.92, -44.28, 0.33)
  }
  dend[287] {pt3dclear()
	pt3dadd(-34.33, 93.92, -44.28, 0.33)
	pt3dadd(-34, 94.08, -44.28, 0.33)
	pt3dadd(-34.83, 94.08, -44.28, 0.33)
	pt3dadd(-35.17, 93.92, -44.28, 0.33)
	pt3dadd(-35.33, 93.75, -44.28, 0.33)
	pt3dadd(-35.5, 93.42, -44.28, 0.33)
	pt3dadd(-35.67, 93.25, -44.28, 0.33)
	pt3dadd(-36, 93.08, -44.28, 0.33)
	pt3dadd(-36.33, 92.92, -44.28, 0.33)
	pt3dadd(-36.67, 92.75, -44.28, 0.33)
	pt3dadd(-37, 92.58, -44.28, 0.33)
	pt3dadd(-37.33, 92.42, -44.28, 0.33)
	pt3dadd(-37.83, 92.25, -44.28, 0.33)
	pt3dadd(-38.17, 92.25, -44.28, 0.33)
	pt3dadd(-38.33, 92.08, -44.28, 0.33)
	pt3dadd(-39.17, 92.08, -44.28, 0.33)
	pt3dadd(-39.33, 91.92, -44.28, 0.33)
	pt3dadd(-39.5, 91.92, -44.28, 0.33)
  }
  dend[288] {pt3dclear()
	pt3dadd(-34.33, 93.92, -44.28, 0.33)
	pt3dadd(-33.83, 93.92, -44.28, 0.33)
	pt3dadd(-34, 94.08, -44.28, 0.33)
	pt3dadd(-34.33, 94.25, -44.28, 0.33)
	pt3dadd(-34.5, 94.42, -44.28, 0.33)
	pt3dadd(-34.83, 94.58, -44.28, 0.33)
	pt3dadd(-35, 94.75, -44.28, 0.33)
	pt3dadd(-35.17, 95.08, -44.28, 0.33)
	pt3dadd(-35.17, 95.42, -44.28, 0.33)
	pt3dadd(-35.33, 95.58, -44.28, 0.33)
	pt3dadd(-35.33, 95.92, -44.28, 0.33)
	pt3dadd(-35.5, 96.25, -44.28, 0.33)
	pt3dadd(-35.5, 96.92, -44.28, 0.33)
	pt3dadd(-35.67, 97.25, -44.28, 0.33)
	pt3dadd(-35.67, 97.75, -44.28, 0.33)
	pt3dadd(-35.83, 97.92, -44.28, 0.33)
	pt3dadd(-35.83, 98.42, -44.28, 0.33)
	pt3dadd(-36, 98.58, -44.28, 0.33)
	pt3dadd(-36, 98.92, -44.28, 0.33)
	pt3dadd(-36.17, 99.08, -44.28, 0.33)
	pt3dadd(-36.17, 99.42, -44.28, 0.33)
	pt3dadd(-36.33, 99.58, -44.28, 0.33)
	pt3dadd(-36.5, 99.92, -44.28, 0.33)
	pt3dadd(-36.67, 100.08, -44.28, 0.33)
	pt3dadd(-36.83, 100.25, -44.28, 0.33)
	pt3dadd(-37, 100.58, -44.28, 0.33)
	pt3dadd(-37.17, 100.75, -44.28, 0.33)
	pt3dadd(-37.33, 100.92, -44.28, 0.33)
	pt3dadd(-37.5, 101.08, -44.28, 0.33)
  }
  dend[289] {pt3dclear()
	pt3dadd(-37.5, 101.08, -44.28, 0.33)
	pt3dadd(-37.17, 101.08, -44.28, 0.33)
	pt3dadd(-37.5, 101.08, -44.28, 0.33)
	pt3dadd(-37.83, 101.25, -44.28, 0.33)
	pt3dadd(-38.5, 101.92, -44.28, 0.33)
	pt3dadd(-38.83, 101.92, -44.28, 0.33)
	pt3dadd(-39, 102.25, -44.28, 0.33)
	pt3dadd(-39.33, 102.42, -44.28, 0.33)
	pt3dadd(-39.5, 102.58, -44.28, 0.33)
	pt3dadd(-39.67, 102.92, -44.28, 0.33)
	pt3dadd(-39.83, 103.08, -44.28, 0.33)
	pt3dadd(-40, 103.25, -44.28, 0.33)
	pt3dadd(-40.17, 103.58, -44.28, 0.33)
	pt3dadd(-40.33, 103.92, -44.28, 0.33)
	pt3dadd(-40.5, 104.25, -44.28, 0.33)
	pt3dadd(-40.67, 104.42, -44.28, 0.33)
	pt3dadd(-40.83, 104.58, -44.28, 0.33)
	pt3dadd(-41, 104.92, -44.28, 0.33)
	pt3dadd(-41.17, 105.08, -44.28, 0.33)
	pt3dadd(-41.33, 105.25, -44.28, 0.33)
	pt3dadd(-41.67, 105.58, -44.28, 0.33)
	pt3dadd(-41.83, 105.75, -44.28, 0.33)
	pt3dadd(-42, 106.08, -44.28, 0.33)
	pt3dadd(-42.17, 106.25, -44.28, 0.33)
	pt3dadd(-42.33, 106.58, -44.28, 0.33)
	pt3dadd(-42.5, 106.75, -44.28, 0.33)
	pt3dadd(-42.67, 106.92, -44.28, 0.33)
	pt3dadd(-42.83, 107.08, -44.28, 0.33)
	pt3dadd(-43.17, 107.25, -44.28, 0.33)
	pt3dadd(-43.5, 107.42, -44.28, 0.33)
	pt3dadd(-43.67, 107.58, -44.28, 0.33)
	pt3dadd(-43.83, 107.75, -44.28, 0.33)
	pt3dadd(-44.17, 108.08, -44.28, 0.33)
	pt3dadd(-44.33, 108.25, -44.28, 0.33)
	pt3dadd(-44.5, 108.58, -44.28, 0.33)
	pt3dadd(-44.67, 108.75, -44.28, 0.33)
	pt3dadd(-44.83, 108.92, -44.28, 0.33)
  }
  dend[290] {pt3dclear()
	pt3dadd(-37.5, 101.08, -44.28, 0.33)
	pt3dadd(-37.17, 100.92, -44.28, 0.33)
	pt3dadd(-37.17, 101.75, -44.28, 0.33)
	pt3dadd(-37.33, 102.08, -44.28, 0.33)
	pt3dadd(-37.33, 102.42, -44.28, 0.33)
	pt3dadd(-37.5, 102.75, -44.28, 0.33)
	pt3dadd(-37.67, 102.92, -44.28, 0.33)
	pt3dadd(-37.67, 103.25, -44.28, 0.33)
	pt3dadd(-37.83, 103.58, -44.28, 0.33)
	pt3dadd(-38, 103.92, -44.28, 0.33)
	pt3dadd(-38.17, 104.25, -44.28, 0.33)
	pt3dadd(-38.17, 104.58, -44.28, 0.33)
	pt3dadd(-38.33, 104.75, -44.28, 0.33)
	pt3dadd(-38.5, 104.92, -44.28, 0.33)
	pt3dadd(-38.67, 105.25, -44.28, 0.33)
	pt3dadd(-38.83, 105.58, -44.28, 0.33)
	pt3dadd(-39, 105.75, -44.28, 0.33)
	pt3dadd(-39.33, 105.92, -44.28, 0.33)
	pt3dadd(-39.5, 106.25, -44.28, 0.33)
	pt3dadd(-39.67, 106.42, -44.28, 0.33)
	pt3dadd(-39.67, 106.75, -44.28, 0.33)
	pt3dadd(-39.83, 106.92, -44.28, 0.33)
	pt3dadd(-40, 107.08, -44.28, 0.33)
	pt3dadd(-40.17, 107.25, -44.28, 0.33)
	pt3dadd(-40.33, 107.42, -44.28, 0.33)
	pt3dadd(-40.33, 107.75, -44.28, 0.33)
	pt3dadd(-40.5, 107.92, -44.28, 0.33)
	pt3dadd(-40.67, 108.25, -44.28, 0.33)
	pt3dadd(-40.83, 108.42, -44.28, 0.33)
	pt3dadd(-41, 108.58, -44.28, 0.33)
	pt3dadd(-41.17, 108.75, -44.28, 0.33)
	pt3dadd(-41.33, 108.92, -44.28, 0.33)
  }
  dend[291] {pt3dclear()
	pt3dadd(-28.17, 89.25, -44.28, 0.33)
	pt3dadd(-28.17, 89.42, -42.48, 0.33)
	pt3dadd(-28.5, 89.25, -42.48, 0.33)
	pt3dadd(-28.83, 89.08, -42.48, 0.33)
	pt3dadd(-29.17, 89.08, -42.48, 0.33)
	pt3dadd(-29.5, 88.92, -42.48, 0.33)
	pt3dadd(-29.83, 88.75, -42.48, 0.33)
	pt3dadd(-30, 88.58, -42.48, 0.33)
	pt3dadd(-30.33, 88.42, -42.48, 0.33)
	pt3dadd(-30.33, 88.08, -42.48, 0.33)
	pt3dadd(-30.5, 87.92, -42.48, 0.33)
	pt3dadd(-30.67, 87.58, -42.48, 0.33)
	pt3dadd(-30.67, 87.25, -42.48, 0.33)
	pt3dadd(-30.83, 86.92, -42.48, 0.33)
	pt3dadd(-31, 86.58, -42.48, 0.33)
	pt3dadd(-31.17, 86.42, -42.48, 0.33)
	pt3dadd(-31.5, 86.25, -42.48, 0.33)
	pt3dadd(-33.83, 86.25, -42.48, 0.33)
	pt3dadd(-34, 86.42, -42.48, 0.33)
	pt3dadd(-34.17, 86.58, -42.48, 0.33)
	pt3dadd(-34.17, 86.75, -42.48, 0.33)
  }
  dend[292] {pt3dclear()
	pt3dadd(-34.17, 86.75, -42.48, 0.33)
	pt3dadd(-33.5, 86.58, -42.48, 0.33)
	pt3dadd(-34, 86.58, -42.48, 0.33)
	pt3dadd(-34.33, 86.75, -42.48, 0.33)
	pt3dadd(-34.67, 86.92, -42.48, 0.33)
	pt3dadd(-35, 87.08, -42.48, 0.33)
	pt3dadd(-35.33, 87.25, -42.48, 0.33)
	pt3dadd(-35.67, 87.25, -42.48, 0.33)
	pt3dadd(-35.83, 87.42, -42.48, 0.33)
	pt3dadd(-37.83, 87.42, -42.48, 0.33)
	pt3dadd(-38.17, 87.25, -42.48, 0.33)
	pt3dadd(-38.33, 87.08, -42.48, 0.33)
	pt3dadd(-38.67, 86.92, -42.48, 0.33)
	pt3dadd(-39, 86.75, -42.48, 0.33)
  }
}
proc shape3d_26() {
  dend[292] {	pt3dadd(-39.33, 86.75, -42.48, 0.33)
	pt3dadd(-39.67, 86.58, -42.48, 0.33)
	pt3dadd(-39.83, 86.42, -42.48, 0.33)
  }
  dend[293] {pt3dclear()
	pt3dadd(-34.17, 86.75, -42.48, 0.33)
	pt3dadd(-33.83, 86.58, -42.48, 0.33)
	pt3dadd(-33.83, 86.92, -42.48, 0.33)
	pt3dadd(-34, 87.25, -42.48, 0.33)
	pt3dadd(-34.17, 87.58, -42.48, 0.33)
	pt3dadd(-34.33, 87.92, -42.48, 0.33)
	pt3dadd(-34.5, 88.25, -42.48, 0.33)
	pt3dadd(-34.5, 88.75, -42.48, 0.33)
	pt3dadd(-34.67, 88.92, -42.48, 0.33)
	pt3dadd(-34.83, 89.08, -42.48, 0.33)
	pt3dadd(-35, 89.25, -42.48, 0.33)
	pt3dadd(-35, 89.58, -42.48, 0.33)
	pt3dadd(-35.17, 89.92, -42.48, 0.33)
	pt3dadd(-35.33, 90.08, -42.48, 0.33)
	pt3dadd(-35.33, 90.58, -41.4, 0.33)
	pt3dadd(-35.33, 90.42, -41.4, 0.33)
  }
  dend[294] {pt3dclear()
	pt3dadd(-35.33, 90.42, -41.4, 0.33)
	pt3dadd(-35.33, 90.75, -40.32, 0.33)
	pt3dadd(-35.83, 90.92, -40.32, 0.33)
	pt3dadd(-36.83, 91.42, -40.32, 0.33)
	pt3dadd(-37, 91.58, -40.32, 0.33)
	pt3dadd(-37.17, 91.75, -40.32, 0.33)
	pt3dadd(-37.17, 92.08, -40.32, 0.33)
	pt3dadd(-37.33, 92.25, -40.32, 0.33)
	pt3dadd(-37.5, 92.58, -40.32, 0.33)
	pt3dadd(-37.67, 92.75, -40.32, 0.33)
	pt3dadd(-37.83, 92.92, -40.32, 0.33)
	pt3dadd(-38, 93.25, -40.32, 0.33)
	pt3dadd(-38.17, 93.42, -40.32, 0.33)
	pt3dadd(-38.33, 93.58, -40.32, 0.33)
	pt3dadd(-38.5, 93.92, -40.32, 0.33)
	pt3dadd(-38.5, 94.25, -40.32, 0.33)
	pt3dadd(-38.67, 94.42, -40.32, 0.33)
	pt3dadd(-38.83, 94.58, -40.32, 0.33)
	pt3dadd(-38.83, 94.92, -40.32, 0.33)
	pt3dadd(-39, 95.25, -40.32, 0.33)
	pt3dadd(-39.17, 95.42, -40.32, 0.33)
	pt3dadd(-39.17, 95.92, -40.32, 0.33)
	pt3dadd(-39.33, 96.08, -40.32, 0.33)
	pt3dadd(-39.5, 96.25, -40.32, 0.33)
	pt3dadd(-39.5, 96.58, -40.32, 0.33)
	pt3dadd(-39.67, 96.92, -40.32, 0.33)
	pt3dadd(-39.83, 97.08, -40.32, 0.33)
	pt3dadd(-40, 97.25, -40.32, 0.33)
	pt3dadd(-40.17, 97.42, -40.32, 0.33)
	pt3dadd(-40.17, 97.75, -40.32, 0.33)
	pt3dadd(-40.33, 97.92, -40.32, 0.33)
	pt3dadd(-40.5, 98.08, -40.32, 0.33)
	pt3dadd(-40.67, 98.42, -40.32, 0.33)
	pt3dadd(-40.83, 98.58, -40.32, 0.33)
	pt3dadd(-41, 98.92, -40.32, 0.33)
	pt3dadd(-41.33, 99.25, -40.32, 0.33)
	pt3dadd(-41.67, 99.42, -40.32, 0.33)
	pt3dadd(-42.17, 99.58, -40.32, 0.33)
	pt3dadd(-42.33, 99.75, -40.32, 0.33)
	pt3dadd(-42.67, 99.75, -40.32, 0.33)
	pt3dadd(-42.83, 99.92, -40.32, 0.33)
	pt3dadd(-43, 99.92, -40.32, 0.33)
  }
  dend[295] {pt3dclear()
	pt3dadd(-43, 99.92, -40.32, 0.33)
	pt3dadd(-41.83, 99.92, -40.32, 0.33)
	pt3dadd(-41.67, 100.08, -40.32, 0.33)
	pt3dadd(-41.33, 100.25, -40.32, 0.33)
	pt3dadd(-41.17, 100.42, -40.32, 0.33)
	pt3dadd(-41, 100.58, -40.32, 0.33)
	pt3dadd(-40.67, 100.92, -40.32, 0.33)
	pt3dadd(-40.5, 101.25, -40.32, 0.33)
	pt3dadd(-40.5, 101.75, -40.32, 0.33)
  }
  dend[296] {pt3dclear()
	pt3dadd(-43, 99.92, -40.32, 0.33)
	pt3dadd(-42.83, 100.08, -39.96, 0.33)
	pt3dadd(-43.17, 100.25, -39.96, 0.33)
	pt3dadd(-43.5, 100.42, -39.96, 0.33)
	pt3dadd(-43.67, 100.58, -39.96, 0.33)
	pt3dadd(-43.83, 100.75, -39.96, 0.33)
	pt3dadd(-43.83, 101.08, -39.96, 0.33)
	pt3dadd(-44, 101.42, -39.96, 0.33)
	pt3dadd(-44, 105.92, -39.96, 0.33)
	pt3dadd(-44.17, 105.92, -39.96, 0.33)
  }
  dend[297] {pt3dclear()
	pt3dadd(-35.33, 90.42, -41.4, 0.33)
	pt3dadd(-34.83, 90.58, -41.04, 0.33)
	pt3dadd(-34.67, 90.75, -41.04, 0.33)
	pt3dadd(-34.67, 91.25, -41.04, 0.33)
	pt3dadd(-34.5, 91.42, -40.68, 0.33)
	pt3dadd(-34.33, 91.75, -40.68, 0.33)
	pt3dadd(-34, 92.25, -40.68, 0.33)
	pt3dadd(-34, 92.58, -40.68, 0.33)
	pt3dadd(-33.83, 92.75, -40.68, 0.33)
	pt3dadd(-33.67, 93.08, -40.68, 0.33)
	pt3dadd(-33.5, 93.42, -40.68, 0.33)
	pt3dadd(-33.33, 93.75, -40.68, 0.33)
	pt3dadd(-33.17, 94.08, -40.68, 0.33)
	pt3dadd(-33, 94.25, -40.68, 0.33)
	pt3dadd(-32.83, 94.42, -40.68, 0.33)
	pt3dadd(-32.67, 94.58, -40.68, 0.33)
	pt3dadd(-32.5, 94.75, -40.68, 0.33)
	pt3dadd(-32.5, 95.08, -40.68, 0.33)
	pt3dadd(-32.33, 95.25, -40.68, 0.33)
	pt3dadd(-32.17, 95.42, -40.68, 0.33)
	pt3dadd(-32.17, 95.92, -40.68, 0.33)
	pt3dadd(-32, 96.08, -40.68, 0.33)
  }
  dend[298] {pt3dclear()
	pt3dadd(-18.17, 84.75, -47.88, 1)
	pt3dadd(-17.82, 84.75, -43.2, 0.33)
	pt3dadd(-17.82, 84.25, -43.2, 0.33)
	pt3dadd(-18, 84.08, -43.2, 0.33)
	pt3dadd(-18.17, 83.75, -43.2, 0.33)
	pt3dadd(-18.32, 83.42, -43.2, 0.33)
	pt3dadd(-18.67, 83.25, -43.2, 0.33)
	pt3dadd(-19, 82.92, -43.2, 0.33)
	pt3dadd(-19.32, 82.92, -43.2, 0.33)
	pt3dadd(-19.82, 82.75, -43.2, 0.33)
	pt3dadd(-21, 82.75, -43.2, 0.33)
  }
  dend[299] {pt3dclear()
	pt3dadd(-21, 82.75, -43.2, 0.33)
	pt3dadd(-21, 83.08, -43.2, 0.33)
	pt3dadd(-21.33, 83.25, -43.2, 0.33)
	pt3dadd(-22, 83.58, -43.2, 0.33)
	pt3dadd(-22.83, 83.92, -43.2, 0.33)
	pt3dadd(-23.33, 83.92, -43.2, 0.33)
	pt3dadd(-23.67, 84.08, -43.2, 0.33)
	pt3dadd(-23.83, 84.08, -43.2, 0.33)
  }
  dend[300] {pt3dclear()
	pt3dadd(-23.83, 84.08, -43.2, 0.33)
	pt3dadd(-23.5, 84.08, -43.2, 0.33)
	pt3dadd(-23.67, 83.92, -43.2, 0.33)
	pt3dadd(-23.83, 83.58, -43.2, 0.33)
	pt3dadd(-24.17, 83.25, -43.2, 0.33)
	pt3dadd(-24.33, 83.08, -43.2, 0.33)
	pt3dadd(-24.67, 82.75, -43.2, 0.33)
	pt3dadd(-24.83, 82.58, -43.2, 0.33)
	pt3dadd(-25, 82.25, -43.2, 0.33)
	pt3dadd(-25.17, 82.08, -43.2, 0.33)
	pt3dadd(-25.33, 81.92, -43.2, 0.33)
	pt3dadd(-25.5, 81.92, -43.2, 0.33)
	pt3dadd(-25.5, 81.92, -44.28, 0.33)
	pt3dadd(-25.67, 81.75, -44.28, 0.33)
	pt3dadd(-25.83, 81.42, -44.28, 0.33)
	pt3dadd(-26, 81.25, -44.28, 0.33)
	pt3dadd(-26.17, 81.08, -44.28, 0.33)
	pt3dadd(-26.33, 80.92, -44.28, 0.33)
	pt3dadd(-26.5, 80.75, -44.28, 0.33)
	pt3dadd(-26.67, 80.58, -44.28, 0.33)
	pt3dadd(-26.83, 80.42, -44.28, 0.33)
	pt3dadd(-27, 80.25, -44.28, 0.33)
	pt3dadd(-27.17, 80.08, -44.28, 0.33)
	pt3dadd(-27.5, 79.92, -44.28, 0.33)
	pt3dadd(-27.67, 79.75, -44.28, 0.33)
	pt3dadd(-27.83, 79.58, -44.28, 0.33)
	pt3dadd(-28.17, 79.42, -44.28, 0.33)
	pt3dadd(-28.33, 79.25, -44.28, 0.33)
	pt3dadd(-28.67, 79.25, -44.28, 0.33)
	pt3dadd(-28.83, 79.08, -44.28, 0.33)
	pt3dadd(-29, 78.92, -44.28, 0.33)
	pt3dadd(-29.33, 78.75, -44.28, 0.33)
	pt3dadd(-29.5, 78.58, -44.28, 0.33)
	pt3dadd(-29.67, 78.25, -44.28, 0.33)
	pt3dadd(-29.83, 78.08, -44.28, 0.33)
	pt3dadd(-30, 77.92, -44.28, 0.33)
	pt3dadd(-30.17, 77.75, -44.28, 0.33)
	pt3dadd(-30.5, 77.75, -44.28, 0.33)
	pt3dadd(-30.67, 77.58, -44.28, 0.33)
	pt3dadd(-30.83, 77.42, -44.28, 0.33)
  }
  dend[301] {pt3dclear()
	pt3dadd(-30.83, 77.42, -44.28, 0.33)
	pt3dadd(-30.67, 77.42, -46.44, 0.33)
	pt3dadd(-30.83, 77.58, -46.44, 0.33)
	pt3dadd(-31, 77.92, -46.44, 0.33)
	pt3dadd(-31.17, 78.08, -46.44, 0.33)
	pt3dadd(-31.33, 78.42, -46.44, 0.33)
	pt3dadd(-31.5, 78.75, -46.44, 0.33)
	pt3dadd(-31.67, 78.92, -46.44, 0.33)
	pt3dadd(-32, 79.08, -46.44, 0.33)
	pt3dadd(-32.17, 79.25, -46.44, 0.33)
	pt3dadd(-33.33, 79.25, -46.44, 0.33)
	pt3dadd(-33.67, 79.42, -46.44, 0.33)
	pt3dadd(-34.5, 79.42, -46.44, 0.33)
	pt3dadd(-34.83, 79.25, -46.44, 0.33)
	pt3dadd(-35, 79.08, -46.44, 0.33)
  }
  dend[302] {pt3dclear()
	pt3dadd(-35, 79.08, -46.44, 0.33)
	pt3dadd(-35.17, 78.75, -46.44, 0.33)
	pt3dadd(-35.5, 78.92, -46.44, 0.33)
	pt3dadd(-35.67, 79.08, -46.44, 0.33)
	pt3dadd(-36.17, 79.08, -46.44, 0.33)
	pt3dadd(-36.5, 79.25, -46.44, 0.33)
	pt3dadd(-37, 79.25, -46.44, 0.33)
	pt3dadd(-37.33, 79.42, -46.44, 0.33)
	pt3dadd(-38.83, 79.42, -46.44, 0.33)
  }
  dend[303] {pt3dclear()
	pt3dadd(-35, 79.08, -46.44, 0.33)
	pt3dadd(-34.83, 79.25, -48.96, 0.33)
	pt3dadd(-35, 79.25, -44.64, 0.33)
	pt3dadd(-35.17, 79.08, -44.64, 0.33)
	pt3dadd(-35.33, 78.92, -44.64, 0.33)
	pt3dadd(-35.5, 78.75, -44.64, 0.33)
	pt3dadd(-35.67, 78.58, -44.64, 0.33)
	pt3dadd(-35.83, 78.42, -44.64, 0.33)
	pt3dadd(-36, 78.08, -44.64, 0.33)
	pt3dadd(-36.17, 77.92, -44.64, 0.33)
	pt3dadd(-36.33, 77.75, -44.64, 0.33)
	pt3dadd(-36.5, 77.58, -44.64, 0.33)
	pt3dadd(-36.67, 77.42, -44.64, 0.33)
	pt3dadd(-36.83, 77.25, -44.64, 0.33)
	pt3dadd(-37, 77.08, -44.64, 0.33)
  }
}
proc shape3d_27() {
  dend[303] {	pt3dadd(-37.33, 77.08, -44.64, 0.33)
	pt3dadd(-37.67, 76.92, -44.64, 0.33)
	pt3dadd(-37.83, 76.75, -44.64, 0.33)
  }
  dend[304] {pt3dclear()
	pt3dadd(-30.83, 77.42, -44.28, 0.33)
	pt3dadd(-30.5, 77.58, -42.84, 0.33)
	pt3dadd(-30.5, 76.92, -42.84, 0.33)
	pt3dadd(-30.67, 76.58, -42.84, 0.33)
	pt3dadd(-30.83, 76.25, -42.84, 0.33)
	pt3dadd(-31, 75.92, -42.84, 0.33)
	pt3dadd(-31, 75.42, -42.84, 0.33)
	pt3dadd(-31.17, 75.25, -42.84, 0.33)
	pt3dadd(-31.33, 75.08, -42.84, 0.33)
	pt3dadd(-31.33, 74.75, -42.84, 0.33)
	pt3dadd(-31.5, 74.42, -42.84, 0.33)
	pt3dadd(-31.67, 74.25, -42.84, 0.33)
	pt3dadd(-31.83, 73.92, -42.84, 0.33)
	pt3dadd(-32, 73.58, -42.84, 0.33)
	pt3dadd(-32.17, 73.25, -42.84, 0.33)
	pt3dadd(-32.33, 72.92, -42.84, 0.33)
	pt3dadd(-32.33, 72.58, -42.84, 0.33)
	pt3dadd(-32.5, 72.25, -42.84, 0.33)
	pt3dadd(-32.67, 71.92, -42.84, 0.33)
	pt3dadd(-33, 71.58, -42.84, 0.33)
	pt3dadd(-33.17, 71.25, -42.84, 0.33)
	pt3dadd(-33.33, 70.92, -42.84, 0.33)
	pt3dadd(-33.67, 70.58, -42.84, 0.33)
	pt3dadd(-33.83, 70.25, -42.84, 0.33)
	pt3dadd(-34.33, 69.75, -42.84, 0.33)
	pt3dadd(-34.5, 69.75, -42.84, 0.33)
  }
  dend[305] {pt3dclear()
	pt3dadd(-23.83, 84.08, -43.2, 0.33)
	pt3dadd(-23.5, 84.08, -42.84, 0.33)
	pt3dadd(-23.5, 84.42, -42.84, 0.33)
	pt3dadd(-23.67, 84.58, -42.84, 0.33)
	pt3dadd(-23.83, 84.75, -42.84, 0.33)
	pt3dadd(-24.17, 84.92, -42.84, 0.33)
	pt3dadd(-24.5, 85.08, -42.84, 0.33)
	pt3dadd(-24.67, 85.25, -42.84, 0.33)
	pt3dadd(-25.17, 85.25, -42.84, 0.33)
	pt3dadd(-25.5, 85.42, -42.84, 0.33)
	pt3dadd(-25.83, 85.42, -42.84, 0.33)
	pt3dadd(-26, 85.58, -42.84, 0.33)
	pt3dadd(-26.17, 85.75, -42.84, 0.33)
	pt3dadd(-26.33, 85.92, -42.84, 0.33)
  }
  dend[306] {pt3dclear()
	pt3dadd(-26.33, 85.92, -42.84, 0.33)
	pt3dadd(-25.83, 85.92, -42.84, 0.33)
	pt3dadd(-26, 86.25, -42.84, 0.33)
	pt3dadd(-26.17, 86.42, -42.84, 0.33)
	pt3dadd(-26.17, 86.75, -42.84, 0.33)
	pt3dadd(-26.33, 86.92, -42.84, 0.33)
	pt3dadd(-26.5, 87.25, -42.84, 0.33)
	pt3dadd(-26.67, 87.58, -42.84, 0.33)
	pt3dadd(-26.83, 87.92, -42.84, 0.33)
	pt3dadd(-27, 88.25, -42.84, 0.33)
	pt3dadd(-27.17, 88.58, -42.84, 0.33)
	pt3dadd(-27.33, 88.92, -42.84, 0.33)
	pt3dadd(-27.5, 89.08, -42.84, 0.33)
	pt3dadd(-27.67, 89.42, -42.84, 0.33)
	pt3dadd(-27.67, 89.75, -42.84, 0.33)
	pt3dadd(-27.83, 89.92, -42.84, 0.33)
	pt3dadd(-27.83, 90.08, -42.84, 0.33)
  }
  dend[307] {pt3dclear()
	pt3dadd(-26.33, 85.92, -42.84, 0.33)
	pt3dadd(-26.17, 85.92, -44.28, 0.33)
	pt3dadd(-26.67, 85.92, -44.28, 0.33)
	pt3dadd(-26.83, 85.75, -44.28, 0.33)
	pt3dadd(-27.83, 85.75, -44.28, 0.33)
	pt3dadd(-28.17, 85.92, -44.28, 0.33)
	pt3dadd(-28.33, 86.08, -44.28, 0.33)
	pt3dadd(-28.33, 86.42, -44.28, 0.33)
	pt3dadd(-28.5, 86.58, -44.28, 0.33)
	pt3dadd(-29, 86.58, -44.28, 0.33)
	pt3dadd(-29.17, 86.42, -44.28, 0.33)
	pt3dadd(-29.33, 86.25, -44.28, 0.33)
	pt3dadd(-30, 86.25, -44.28, 0.33)
	pt3dadd(-30.17, 86.08, -44.28, 0.33)
	pt3dadd(-30.33, 86.08, -44.28, 0.33)
  }
  dend[308] {pt3dclear()
	pt3dadd(-21, 82.75, -43.2, 0.33)
	pt3dadd(-21.33, 82.75, -45.72, 0.33)
	pt3dadd(-21.17, 82.58, -45.72, 0.33)
	pt3dadd(-21.17, 81.58, -45.72, 0.33)
	pt3dadd(-21.33, 81.25, -45.72, 0.33)
	pt3dadd(-21.33, 80.08, -45.72, 0.33)
  }
  dend[309] {pt3dclear()
	pt3dadd(-21.33, 80.08, -45.72, 0.33)
	pt3dadd(-20.67, 80.08, -45.72, 0.33)
	pt3dadd(-20.67, 78.42, -45.72, 0.33)
	pt3dadd(-20.83, 78.08, -45.72, 0.33)
	pt3dadd(-21, 77.75, -45.72, 0.33)
	pt3dadd(-21.17, 77.58, -45.72, 0.33)
	pt3dadd(-21.5, 77.42, -45.72, 0.33)
	pt3dadd(-21.67, 77.08, -45.72, 0.33)
	pt3dadd(-21.83, 76.92, -45.72, 0.33)
	pt3dadd(-22, 76.75, -45.72, 0.33)
	pt3dadd(-22.17, 76.42, -45.72, 0.33)
	pt3dadd(-22.33, 76.08, -45.72, 0.33)
	pt3dadd(-22.5, 75.92, -45.72, 0.33)
	pt3dadd(-22.67, 75.75, -45.72, 0.33)
	pt3dadd(-23, 75.58, -45.72, 0.33)
	pt3dadd(-23.17, 75.42, -45.72, 0.33)
	pt3dadd(-23.5, 75.42, -45.72, 0.33)
	pt3dadd(-23.67, 75.25, -45.72, 0.33)
	pt3dadd(-23.83, 75.08, -45.72, 0.33)
	pt3dadd(-24, 74.92, -45.72, 0.33)
	pt3dadd(-24.66, 74.92, -45.72, 0.33)
  }
  dend[310] {pt3dclear()
	pt3dadd(-24.66, 74.92, -45.72, 0.33)
	pt3dadd(-24.17, 74.92, -45.72, 0.33)
	pt3dadd(-24.33, 74.75, -45.72, 0.33)
	pt3dadd(-24.5, 74.58, -45.72, 0.33)
	pt3dadd(-24.83, 74.42, -45.72, 0.33)
	pt3dadd(-25, 74.25, -45.72, 0.33)
	pt3dadd(-25.33, 74.25, -45.72, 0.33)
	pt3dadd(-25.5, 74.08, -45.72, 0.33)
	pt3dadd(-27, 74.08, -45.72, 0.33)
	pt3dadd(-27.17, 74.25, -45.72, 0.33)
	pt3dadd(-27.67, 74.25, -45.72, 0.33)
	pt3dadd(-27.83, 74.42, -45.72, 0.33)
	pt3dadd(-28.5, 74.42, -45.72, 0.33)
	pt3dadd(-28.83, 74.58, -45.72, 0.33)
	pt3dadd(-29.67, 74.58, -45.72, 0.33)
	pt3dadd(-29.83, 74.75, -45.72, 0.33)
	pt3dadd(-30, 74.92, -45.72, 0.33)
	pt3dadd(-30.33, 74.92, -45.72, 0.33)
	pt3dadd(-30.5, 75.08, -45.72, 0.33)
	pt3dadd(-30.67, 75.25, -45.72, 0.33)
	pt3dadd(-31, 75.25, -45.72, 0.33)
	pt3dadd(-31.33, 75.42, -45.72, 0.33)
	pt3dadd(-31.5, 75.58, -45.72, 0.33)
	pt3dadd(-31.83, 75.58, -45.72, 0.33)
	pt3dadd(-32, 75.75, -45.72, 0.33)
	pt3dadd(-32.17, 76.08, -45.72, 0.33)
	pt3dadd(-32.33, 76.25, -45.72, 0.33)
	pt3dadd(-32.5, 76.58, -45.72, 0.33)
	pt3dadd(-32.5, 76.92, -45.72, 0.33)
	pt3dadd(-32.67, 77.08, -45.72, 0.33)
	pt3dadd(-32.67, 77.42, -45.72, 0.33)
	pt3dadd(-32.83, 77.58, -45.72, 0.33)
	pt3dadd(-33, 77.75, -45.72, 0.33)
	pt3dadd(-33, 79.92, -45.72, 0.33)
  }
  dend[311] {pt3dclear()
	pt3dadd(-33, 79.92, -45.72, 0.33)
	pt3dadd(-32.67, 79.75, -45.72, 0.33)
	pt3dadd(-32.67, 80.08, -45.72, 0.33)
	pt3dadd(-32.83, 80.25, -45.72, 0.33)
	pt3dadd(-33, 80.42, -45.72, 0.33)
	pt3dadd(-33.17, 80.58, -45.72, 0.33)
	pt3dadd(-33.33, 80.92, -45.72, 0.33)
	pt3dadd(-33.67, 81.25, -45.72, 0.33)
	pt3dadd(-33.83, 81.42, -45.72, 0.33)
	pt3dadd(-34, 81.75, -45.72, 0.33)
	pt3dadd(-34, 83.08, -45.72, 0.33)
	pt3dadd(-34.17, 83.25, -45.72, 0.33)
	pt3dadd(-34.17, 84.42, -45.72, 0.33)
  }
  dend[312] {pt3dclear()
	pt3dadd(-33, 79.92, -45.72, 0.33)
	pt3dadd(-32.67, 80.08, -47.88, 0.33)
	pt3dadd(-31.5, 80.08, -47.88, 0.33)
	pt3dadd(-31.17, 80.25, -47.88, 0.33)
	pt3dadd(-30.83, 80.42, -47.88, 0.33)
	pt3dadd(-30.5, 80.42, -47.88, 0.33)
	pt3dadd(-30.33, 80.58, -47.88, 0.33)
	pt3dadd(-30, 80.75, -47.88, 0.33)
	pt3dadd(-29.83, 81.08, -47.88, 0.33)
	pt3dadd(-29.67, 81.25, -47.88, 0.33)
	pt3dadd(-29.67, 81.75, -47.88, 0.33)
	pt3dadd(-29.5, 82.08, -47.88, 0.33)
	pt3dadd(-29.5, 83.42, -47.88, 0.33)
	pt3dadd(-29.67, 83.75, -47.88, 0.33)
	pt3dadd(-29.67, 84.08, -47.88, 0.33)
	pt3dadd(-29.83, 84.25, -47.88, 0.33)
	pt3dadd(-29.83, 84.58, -47.88, 0.33)
	pt3dadd(-30, 84.75, -47.88, 0.33)
  }
  dend[313] {pt3dclear()
	pt3dadd(-24.66, 74.92, -45.72, 0.33)
	pt3dadd(-24.17, 74.75, -46.08, 0.33)
	pt3dadd(-24, 74.58, -46.08, 0.33)
	pt3dadd(-23.83, 74.42, -46.08, 0.33)
	pt3dadd(-23.5, 74.25, -46.08, 0.33)
	pt3dadd(-23.33, 74.08, -46.08, 0.33)
	pt3dadd(-23.17, 73.75, -46.08, 0.33)
	pt3dadd(-23, 73.58, -46.08, 0.33)
	pt3dadd(-22.83, 73.42, -46.08, 0.33)
	pt3dadd(-22.67, 73.25, -46.08, 0.33)
	pt3dadd(-22.5, 72.92, -46.08, 0.33)
	pt3dadd(-22.33, 72.75, -46.08, 0.33)
	pt3dadd(-22.33, 72.08, -46.08, 0.33)
	pt3dadd(-22.17, 71.92, -46.08, 0.33)
	pt3dadd(-22.17, 70.92, -46.08, 0.33)
	pt3dadd(-22, 70.75, -46.08, 0.33)
	pt3dadd(-21.83, 70.42, -46.08, 0.33)
	pt3dadd(-21.83, 70.08, -46.08, 0.33)
	pt3dadd(-21.67, 69.92, -46.08, 0.33)
	pt3dadd(-21.67, 69.42, -46.08, 0.33)
	pt3dadd(-21.5, 69.25, -46.08, 0.33)
	pt3dadd(-21.5, 68.92, -46.08, 0.33)
	pt3dadd(-21.33, 68.75, -46.08, 0.33)
	pt3dadd(-21.17, 68.42, -46.08, 0.33)
	pt3dadd(-21, 68.08, -46.08, 0.33)
	pt3dadd(-21, 67.75, -46.08, 0.33)
  }
  dend[314] {pt3dclear()
	pt3dadd(-21.33, 80.08, -45.72, 0.33)
	pt3dadd(-21.17, 80.08, -43.56, 0.33)
	pt3dadd(-23.5, 80.08, -43.56, 0.33)
	pt3dadd(-23.83, 79.92, -43.56, 0.33)
	pt3dadd(-24.17, 79.75, -43.56, 0.33)
	pt3dadd(-24.5, 79.58, -43.56, 0.33)
	pt3dadd(-24.83, 79.58, -43.56, 0.33)
  }
}
proc shape3d_28() {
  dend[314] {	pt3dadd(-25, 79.42, -43.56, 0.33)
	pt3dadd(-25.33, 79.08, -43.56, 0.33)
	pt3dadd(-25.5, 78.92, -43.56, 0.33)
	pt3dadd(-25.67, 78.75, -43.56, 0.33)
	pt3dadd(-25.83, 78.58, -43.56, 0.33)
	pt3dadd(-26.17, 78.42, -43.56, 0.33)
	pt3dadd(-26.67, 77.92, -43.56, 0.33)
	pt3dadd(-26.83, 77.75, -43.56, 0.33)
	pt3dadd(-27, 77.58, -43.56, 0.33)
	pt3dadd(-27.17, 77.42, -43.56, 0.33)
	pt3dadd(-27.33, 77.25, -43.56, 0.33)
	pt3dadd(-27.67, 77.08, -43.56, 0.33)
	pt3dadd(-28, 76.92, -43.56, 0.33)
	pt3dadd(-28.17, 76.75, -43.56, 0.33)
	pt3dadd(-28.5, 76.75, -43.56, 0.33)
	pt3dadd(-28.67, 76.58, -43.56, 0.33)
  }
  dend[315] {pt3dclear()
	pt3dadd(-16.67, 84.42, -47.88, 1)
	pt3dadd(-16.17, 84.42, -50.4, 0.33)
	pt3dadd(-16.17, 84.92, -50.4, 0.33)
	pt3dadd(-16.32, 85.08, -50.4, 0.33)
	pt3dadd(-16.5, 85.25, -50.4, 0.33)
	pt3dadd(-16.67, 85.58, -50.4, 0.33)
	pt3dadd(-16.82, 85.92, -50.4, 0.33)
	pt3dadd(-17, 86.25, -50.4, 0.33)
	pt3dadd(-17, 87.25, -50.4, 0.33)
	pt3dadd(-17.17, 87.42, -50.4, 0.33)
	pt3dadd(-17.32, 87.75, -50.4, 0.33)
  }
  dend[316] {pt3dclear()
	pt3dadd(-17.32, 87.75, -50.4, 0.33)
	pt3dadd(-16.5, 88.08, -50.4, 0.33)
	pt3dadd(-16.32, 88.25, -50.4, 0.33)
	pt3dadd(-16.17, 88.58, -50.4, 0.33)
	pt3dadd(-16, 88.75, -50.4, 0.33)
	pt3dadd(-15.83, 89.08, -50.4, 0.33)
	pt3dadd(-15.67, 89.25, -50.4, 0.33)
	pt3dadd(-15.67, 89.58, -50.4, 0.33)
  }
  dend[317] {pt3dclear()
	pt3dadd(-15.67, 89.58, -50.4, 0.33)
	pt3dadd(-15.17, 89.58, -50.4, 0.33)
	pt3dadd(-15, 89.42, -50.4, 0.33)
	pt3dadd(-15, 89.08, -50.4, 0.33)
	pt3dadd(-14.67, 88.92, -50.4, 0.33)
	pt3dadd(-14.5, 88.75, -50.4, 0.33)
	pt3dadd(-14.17, 88.42, -50.4, 0.33)
	pt3dadd(-14, 88.58, -50.4, 0.33)
	pt3dadd(-13.83, 88.75, -50.4, 0.33)
	pt3dadd(-13.5, 88.75, -50.4, 0.33)
	pt3dadd(-13.5, 89.75, -50.4, 0.33)
	pt3dadd(-13.33, 89.92, -50.4, 0.33)
	pt3dadd(-13.17, 90.08, -50.4, 0.33)
	pt3dadd(-13.17, 90.25, -50.4, 0.33)
  }
  dend[318] {pt3dclear()
	pt3dadd(-15.67, 89.58, -50.4, 0.33)
	pt3dadd(-15.67, 89.42, -50.04, 0.33)
	pt3dadd(-15.5, 89.58, -50.04, 0.33)
	pt3dadd(-15.5, 89.92, -50.04, 0.33)
	pt3dadd(-15.33, 90.08, -50.04, 0.33)
	pt3dadd(-15.33, 90.58, -50.04, 0.33)
	pt3dadd(-15.17, 90.92, -50.04, 0.33)
	pt3dadd(-15.17, 91.42, -50.04, 0.33)
	pt3dadd(-15, 91.58, -50.04, 0.33)
	pt3dadd(-15, 92.58, -50.04, 0.33)
	pt3dadd(-15.17, 92.75, -50.04, 0.33)
	pt3dadd(-15.17, 94.25, -50.04, 0.33)
	pt3dadd(-15.33, 94.58, -50.04, 0.33)
	pt3dadd(-15.5, 94.92, -50.04, 0.33)
	pt3dadd(-15.67, 95.08, -50.04, 0.33)
	pt3dadd(-15.83, 95.25, -50.04, 0.33)
	pt3dadd(-16, 95.42, -50.04, 0.33)
	pt3dadd(-16.17, 95.58, -50.04, 0.33)
	pt3dadd(-16.32, 95.75, -50.04, 0.33)
	pt3dadd(-16.5, 95.92, -50.04, 0.33)
	pt3dadd(-16.82, 96.08, -50.04, 0.33)
	pt3dadd(-17, 96.25, -50.04, 0.33)
	pt3dadd(-17.17, 96.42, -50.04, 0.33)
	pt3dadd(-17.32, 96.58, -50.04, 0.33)
	pt3dadd(-17.5, 96.75, -50.04, 0.33)
	pt3dadd(-17.67, 96.92, -50.04, 0.33)
	pt3dadd(-17.82, 97.08, -50.04, 0.33)
	pt3dadd(-18, 97.25, -50.04, 0.33)
	pt3dadd(-18, 97.42, -50.04, 0.33)
  }
  dend[319] {pt3dclear()
	pt3dadd(-17.32, 87.75, -50.4, 0.33)
	pt3dadd(-17.17, 87.58, -50.04, 0.33)
	pt3dadd(-17.17, 88.08, -50.04, 0.33)
	pt3dadd(-17.32, 88.25, -50.04, 0.33)
	pt3dadd(-17.5, 88.42, -50.04, 0.33)
	pt3dadd(-17.5, 88.75, -50.04, 0.33)
	pt3dadd(-17.67, 89.08, -50.04, 0.33)
	pt3dadd(-17.82, 89.42, -50.04, 0.33)
	pt3dadd(-18, 89.75, -50.04, 0.33)
	pt3dadd(-18, 90.08, -50.04, 0.33)
	pt3dadd(-18.17, 90.25, -50.04, 0.33)
	pt3dadd(-18.17, 90.92, -50.04, 0.33)
	pt3dadd(-18.32, 91.08, -50.04, 0.33)
	pt3dadd(-18.32, 92.25, -50.04, 0.33)
	pt3dadd(-18.5, 92.42, -50.04, 0.33)
	pt3dadd(-18.5, 92.92, -50.04, 0.33)
	pt3dadd(-18.67, 93.08, -50.04, 0.33)
	pt3dadd(-18.67, 94.08, -50.04, 0.33)
	pt3dadd(-18.82, 94.25, -50.04, 0.33)
  }
  dend[320] {pt3dclear()
	pt3dadd(-18.82, 94.25, -50.04, 0.33)
	pt3dadd(-18.5, 94.58, -50.04, 0.33)
	pt3dadd(-18.82, 94.75, -50.04, 0.33)
	pt3dadd(-19, 94.92, -50.04, 0.33)
	pt3dadd(-19.17, 95.08, -50.04, 0.33)
	pt3dadd(-19.32, 95.25, -50.04, 0.33)
	pt3dadd(-19.5, 95.42, -50.04, 0.33)
	pt3dadd(-19.67, 95.58, -50.04, 0.33)
	pt3dadd(-19.82, 95.75, -50.04, 0.33)
	pt3dadd(-20, 96.08, -50.04, 0.33)
	pt3dadd(-20.17, 96.25, -50.04, 0.33)
	pt3dadd(-20.17, 96.58, -50.04, 0.33)
	pt3dadd(-20.32, 96.75, -50.04, 0.33)
	pt3dadd(-20.5, 97.08, -50.04, 0.33)
	pt3dadd(-20.67, 97.25, -50.04, 0.33)
	pt3dadd(-20.83, 97.42, -50.04, 0.33)
	pt3dadd(-20.83, 97.75, -50.04, 0.33)
	pt3dadd(-21, 97.92, -50.04, 0.33)
	pt3dadd(-21, 98.25, -50.04, 0.33)
	pt3dadd(-21.17, 98.42, -50.04, 0.33)
	pt3dadd(-21.17, 98.75, -50.04, 0.33)
	pt3dadd(-21.33, 98.75, -50.04, 0.33)
  }
  dend[321] {pt3dclear()
	pt3dadd(-18.82, 94.25, -50.04, 0.33)
	pt3dadd(-18.5, 94.08, -52.2, 0.33)
	pt3dadd(-18.5, 96.42, -52.2, 0.33)
	pt3dadd(-18.67, 96.58, -52.2, 0.33)
  }
  dend[322] {pt3dclear()
	pt3dadd(-18.67, 96.58, -52.2, 0.33)
	pt3dadd(-18.17, 96.25, -52.2, 0.33)
	pt3dadd(-18.17, 96.92, -51.84, 0.33)
	pt3dadd(-18.32, 97.25, -51.84, 0.33)
	pt3dadd(-18.5, 97.42, -51.84, 0.33)
	pt3dadd(-18.5, 97.75, -51.84, 0.33)
	pt3dadd(-18.67, 97.92, -51.84, 0.33)
	pt3dadd(-18.67, 98.25, -51.84, 0.33)
	pt3dadd(-18.82, 98.42, -51.84, 0.33)
	pt3dadd(-18.82, 98.75, -51.84, 0.33)
	pt3dadd(-19, 99.08, -51.84, 0.33)
	pt3dadd(-19.17, 99.42, -51.84, 0.33)
	pt3dadd(-19.17, 99.75, -51.84, 0.33)
	pt3dadd(-19.32, 99.92, -51.84, 0.33)
	pt3dadd(-19.32, 100.25, -51.84, 0.33)
	pt3dadd(-19.5, 100.42, -51.84, 0.33)
	pt3dadd(-19.67, 100.75, -51.84, 0.33)
	pt3dadd(-19.82, 100.92, -51.84, 0.33)
	pt3dadd(-19.82, 101.25, -51.84, 0.33)
	pt3dadd(-20, 101.58, -51.84, 0.33)
	pt3dadd(-20.17, 101.75, -51.84, 0.33)
	pt3dadd(-20.17, 103.92, -51.84, 0.33)
	pt3dadd(-20.32, 103.92, -51.84, 0.33)
  }
  dend[323] {pt3dclear()
	pt3dadd(-20.32, 103.92, -51.84, 0.33)
	pt3dadd(-19.82, 104.08, -51.84, 0.33)
	pt3dadd(-19.82, 104.42, -51.84, 0.33)
	pt3dadd(-20, 104.58, -51.84, 0.33)
	pt3dadd(-20.17, 104.75, -51.84, 0.33)
	pt3dadd(-20.32, 105.08, -51.84, 0.33)
	pt3dadd(-20.5, 105.25, -51.84, 0.33)
	pt3dadd(-20.5, 105.58, -51.84, 0.33)
	pt3dadd(-20.67, 105.92, -51.84, 0.33)
	pt3dadd(-20.67, 106.42, -51.84, 0.33)
	pt3dadd(-20.83, 106.75, -51.84, 0.33)
	pt3dadd(-20.83, 107.08, -51.84, 0.33)
	pt3dadd(-21, 107.25, -51.84, 0.33)
	pt3dadd(-21, 107.58, -51.84, 0.33)
	pt3dadd(-21.17, 107.75, -51.84, 0.33)
	pt3dadd(-21.17, 108.25, -51.84, 0.33)
	pt3dadd(-21.33, 108.25, -51.84, 0.33)
  }
  dend[324] {pt3dclear()
	pt3dadd(-20.32, 103.92, -51.84, 0.33)
	pt3dadd(-20, 103.92, -53.28, 0.33)
	pt3dadd(-20, 106.25, -53.28, 0.33)
	pt3dadd(-19.82, 106.42, -53.28, 0.33)
	pt3dadd(-19.67, 106.58, -53.28, 0.33)
	pt3dadd(-19.5, 106.75, -53.28, 0.33)
	pt3dadd(-19.32, 106.92, -53.28, 0.33)
	pt3dadd(-19.17, 107.08, -53.28, 0.33)
	pt3dadd(-19, 107.25, -53.28, 0.33)
	pt3dadd(-18.82, 107.42, -53.28, 0.33)
	pt3dadd(-18.67, 107.58, -53.28, 0.33)
	pt3dadd(-18.5, 107.75, -53.28, 0.33)
	pt3dadd(-18.32, 107.92, -53.28, 0.33)
	pt3dadd(-18.17, 108.25, -53.28, 0.33)
	pt3dadd(-18, 108.25, -53.28, 0.33)
  }
  dend[325] {pt3dclear()
	pt3dadd(-18.67, 96.58, -52.2, 0.33)
	pt3dadd(-18.5, 96.75, -52.92, 0.33)
	pt3dadd(-18.17, 97.08, -52.92, 0.33)
	pt3dadd(-18, 97.42, -52.92, 0.33)
	pt3dadd(-17.82, 97.75, -52.92, 0.33)
	pt3dadd(-17.5, 97.92, -52.92, 0.33)
	pt3dadd(-17.5, 98.25, -52.92, 0.33)
	pt3dadd(-17.32, 98.42, -52.92, 0.33)
	pt3dadd(-17.17, 98.75, -52.92, 0.33)
	pt3dadd(-17, 98.92, -52.92, 0.33)
	pt3dadd(-17, 99.25, -52.92, 0.33)
	pt3dadd(-16.82, 99.58, -52.92, 0.33)
  }
  dend[326] {pt3dclear()
	pt3dadd(-16.82, 99.58, -52.92, 0.33)
	pt3dadd(-16.17, 99.42, -52.92, 0.33)
	pt3dadd(-16.17, 99.75, -52.92, 0.33)
	pt3dadd(-16.5, 100.08, -52.92, 0.33)
	pt3dadd(-16.82, 100.42, -52.92, 0.33)
	pt3dadd(-17.17, 100.58, -52.92, 0.33)
	pt3dadd(-17.32, 100.75, -52.92, 0.33)
	pt3dadd(-17.5, 100.92, -52.92, 0.33)
	pt3dadd(-17.5, 101.42, -52.92, 0.33)
	pt3dadd(-17.67, 101.58, -52.92, 0.33)
  }
}
proc shape3d_29() {
  dend[326] {	pt3dadd(-17.67, 102.25, -52.92, 0.33)
	pt3dadd(-17.82, 102.58, -52.92, 0.33)
	pt3dadd(-17.82, 103.25, -52.92, 0.33)
	pt3dadd(-18, 103.42, -52.92, 0.33)
	pt3dadd(-18, 103.75, -52.92, 0.33)
	pt3dadd(-18.17, 103.92, -52.92, 0.33)
	pt3dadd(-18.17, 105.92, -52.92, 0.33)
	pt3dadd(-18, 106.08, -52.92, 0.33)
	pt3dadd(-17.82, 106.25, -52.92, 0.33)
	pt3dadd(-17.67, 106.42, -52.92, 0.33)
	pt3dadd(-17.67, 106.75, -52.92, 0.33)
	pt3dadd(-17.5, 106.92, -52.92, 0.33)
	pt3dadd(-17.5, 107.08, -52.92, 0.33)
  }
  dend[327] {pt3dclear()
	pt3dadd(-16.82, 99.58, -52.92, 0.33)
	pt3dadd(-16.67, 99.92, -52.56, 0.33)
	pt3dadd(-16.5, 100.25, -52.56, 0.33)
	pt3dadd(-16.32, 100.58, -52.56, 0.33)
	pt3dadd(-16.17, 100.75, -52.56, 0.33)
	pt3dadd(-16.17, 101.08, -52.56, 0.33)
	pt3dadd(-16, 101.25, -52.56, 0.33)
	pt3dadd(-15.83, 101.58, -52.56, 0.33)
	pt3dadd(-15.67, 101.75, -52.56, 0.33)
	pt3dadd(-15.67, 102.08, -52.56, 0.33)
	pt3dadd(-15.5, 102.42, -52.56, 0.33)
	pt3dadd(-15.33, 102.58, -52.56, 0.33)
	pt3dadd(-15.17, 102.75, -52.92, 0.33)
	pt3dadd(-15, 102.92, -52.92, 0.33)
	pt3dadd(-14.83, 103.08, -52.92, 0.33)
	pt3dadd(-14.5, 103.25, -52.92, 0.33)
	pt3dadd(-14.33, 103.42, -52.92, 0.33)
	pt3dadd(-14.17, 103.58, -52.92, 0.33)
	pt3dadd(-14.17, 104.08, -52.92, 0.33)
	pt3dadd(-14, 104.25, -52.92, 0.33)
	pt3dadd(-13.83, 104.42, -52.92, 0.33)
	pt3dadd(-13.83, 104.75, -52.92, 0.33)
	pt3dadd(-13.67, 104.92, -52.92, 0.33)
	pt3dadd(-13.67, 105.25, -52.92, 0.33)
	pt3dadd(-13.5, 105.42, -52.92, 0.33)
	pt3dadd(-13.5, 106.58, -52.92, 0.33)
	pt3dadd(-13.33, 106.75, -52.92, 0.33)
	pt3dadd(-13.33, 109.25, -52.92, 0.33)
	pt3dadd(-13.5, 109.42, -52.92, 0.33)
	pt3dadd(-13.5, 109.75, -52.92, 0.33)
	pt3dadd(-13.67, 109.92, -52.92, 0.33)
	pt3dadd(-13.83, 110.08, -52.92, 0.33)
	pt3dadd(-14, 110.25, -52.92, 0.33)
	pt3dadd(-14, 110.58, -52.92, 0.33)
	pt3dadd(-14.17, 110.75, -52.92, 0.33)
	pt3dadd(-14.33, 110.92, -52.92, 0.33)
	pt3dadd(-14.33, 111.08, -52.92, 0.33)
  }
  dend[328] {pt3dclear()
	pt3dadd(-14.33, 111.08, -52.92, 0.33)
	pt3dadd(-14.5, 111.08, -52.92, 0.33)
	pt3dadd(-15, 111.08, -52.92, 0.33)
	pt3dadd(-15.5, 110.92, -52.92, 0.33)
	pt3dadd(-16.17, 110.92, -52.92, 0.33)
	pt3dadd(-16.32, 110.75, -52.92, 0.33)
	pt3dadd(-16.67, 110.58, -52.92, 0.33)
	pt3dadd(-17, 110.42, -52.92, 0.33)
	pt3dadd(-17.5, 110.42, -52.92, 0.33)
	pt3dadd(-17.67, 110.25, -52.92, 0.33)
	pt3dadd(-18.17, 110.25, -52.92, 0.33)
	pt3dadd(-18.67, 110.08, -52.92, 0.33)
	pt3dadd(-21, 110.08, -52.92, 0.33)
	pt3dadd(-21.17, 110.25, -52.92, 0.33)
	pt3dadd(-21.33, 110.42, -52.92, 0.33)
	pt3dadd(-21.5, 110.58, -52.92, 0.33)
	pt3dadd(-21.67, 110.75, -52.92, 0.33)
  }
  dend[329] {pt3dclear()
	pt3dadd(-21.67, 110.75, -52.92, 0.33)
	pt3dadd(-21.33, 110.58, -52.92, 0.33)
	pt3dadd(-21.5, 110.75, -52.92, 0.33)
	pt3dadd(-22.67, 110.75, -52.92, 0.33)
	pt3dadd(-22.83, 110.58, -52.92, 0.33)
	pt3dadd(-23, 110.42, -52.92, 0.33)
	pt3dadd(-23.17, 110.25, -52.92, 0.33)
	pt3dadd(-23.5, 110.25, -52.92, 0.33)
	pt3dadd(-23.83, 110.08, -52.92, 0.33)
	pt3dadd(-24.17, 110.08, -52.92, 0.33)
	pt3dadd(-24.33, 109.92, -52.92, 0.33)
	pt3dadd(-24.5, 109.92, -52.92, 0.33)
  }
  dend[330] {pt3dclear()
	pt3dadd(-21.67, 110.75, -52.92, 0.33)
	pt3dadd(-21.5, 110.75, -53.64, 0.33)
	pt3dadd(-21.5, 111.58, -53.64, 0.33)
	pt3dadd(-21.67, 111.75, -53.64, 0.33)
	pt3dadd(-21.67, 112.25, -53.64, 0.33)
	pt3dadd(-21.83, 112.42, -53.64, 0.33)
	pt3dadd(-21.83, 113.08, -53.64, 0.33)
	pt3dadd(-21.67, 113.25, -53.64, 0.33)
	pt3dadd(-21.5, 113.42, -53.64, 0.33)
	pt3dadd(-21.17, 113.58, -53.64, 0.33)
	pt3dadd(-21, 113.75, -53.64, 0.33)
	pt3dadd(-20.5, 113.75, -53.64, 0.33)
	pt3dadd(-20.17, 113.92, -53.64, 0.33)
	pt3dadd(-20, 114.08, -53.64, 0.33)
	pt3dadd(-19.82, 114.25, -53.64, 0.33)
  }
  dend[331] {pt3dclear()
	pt3dadd(-19.82, 114.25, -53.64, 0.33)
	pt3dadd(-19, 114.42, -53.64, 0.33)
	pt3dadd(-19, 114.75, -53.64, 0.33)
	pt3dadd(-19.17, 115.08, -53.64, 0.33)
	pt3dadd(-19.32, 115.42, -53.64, 0.33)
	pt3dadd(-19.32, 115.92, -53.64, 0.33)
	pt3dadd(-19.5, 116.08, -53.64, 0.33)
	pt3dadd(-19.5, 117.25, -53.64, 0.33)
	pt3dadd(-19.32, 117.42, -53.64, 0.33)
	pt3dadd(-19.17, 117.58, -53.64, 0.33)
	pt3dadd(-18.82, 117.75, -53.64, 0.33)
	pt3dadd(-18.67, 117.92, -53.64, 0.33)
	pt3dadd(-18.5, 118.08, -53.64, 0.33)
	pt3dadd(-18.32, 118.42, -53.64, 0.33)
	pt3dadd(-18.17, 118.58, -53.64, 0.33)
	pt3dadd(-17.5, 119.25, -53.64, 0.33)
	pt3dadd(-17.5, 119.58, -53.64, 0.33)
	pt3dadd(-17.32, 119.75, -53.64, 0.33)
	pt3dadd(-17.17, 119.92, -53.64, 0.33)
	pt3dadd(-17, 120.08, -53.64, 0.33)
	pt3dadd(-17, 120.42, -53.64, 0.33)
	pt3dadd(-16.82, 120.58, -53.64, 0.33)
	pt3dadd(-16.67, 120.75, -53.64, 0.33)
	pt3dadd(-16.5, 120.92, -53.64, 0.33)
	pt3dadd(-16.32, 121.08, -53.64, 0.33)
	pt3dadd(-16.17, 121.25, -53.64, 0.33)
	pt3dadd(-16.17, 121.58, -53.64, 0.33)
	pt3dadd(-16, 121.75, -53.64, 0.33)
	pt3dadd(-15.83, 121.92, -53.64, 0.33)
	pt3dadd(-15.67, 122.08, -53.64, 0.33)
  }
  dend[332] {pt3dclear()
	pt3dadd(-19.82, 114.25, -53.64, 0.33)
	pt3dadd(-19.67, 114.25, -55.08, 0.33)
	pt3dadd(-19.5, 114.42, -55.08, 0.33)
	pt3dadd(-19, 114.42, -55.08, 0.33)
	pt3dadd(-18.82, 114.58, -55.08, 0.33)
	pt3dadd(-18.67, 114.75, -55.08, 0.33)
	pt3dadd(-18.5, 114.92, -55.08, 0.33)
	pt3dadd(-18.17, 114.92, -55.08, 0.33)
	pt3dadd(-18, 115.08, -55.08, 0.33)
	pt3dadd(-17.67, 115.08, -55.08, 0.33)
	pt3dadd(-17.5, 115.25, -55.08, 0.33)
	pt3dadd(-17.32, 115.42, -55.08, 0.33)
	pt3dadd(-16.82, 115.42, -55.08, 0.33)
	pt3dadd(-16.67, 115.58, -55.08, 0.33)
	pt3dadd(-16.32, 115.75, -55.08, 0.33)
	pt3dadd(-15.67, 115.75, -55.08, 0.33)
  }
  dend[333] {pt3dclear()
	pt3dadd(-14.33, 111.08, -52.92, 0.33)
	pt3dadd(-14, 110.92, -54, 0.33)
	pt3dadd(-13.83, 111.08, -54, 0.33)
	pt3dadd(-13.83, 112.92, -54, 0.33)
	pt3dadd(-14, 112.92, -54, 0.33)
  }
  dend[334] {pt3dclear()
	pt3dadd(-14, 112.92, -54, 0.33)
	pt3dadd(-14, 113.75, -54, 0.33)
	pt3dadd(-13.83, 113.92, -54, 0.33)
	pt3dadd(-13.83, 114.25, -54, 0.33)
	pt3dadd(-14, 114.58, -54, 0.33)
	pt3dadd(-14, 114.92, -54, 0.33)
	pt3dadd(-14.17, 115.25, -54, 0.33)
	pt3dadd(-14.33, 115.58, -54, 0.33)
	pt3dadd(-14.5, 115.92, -54, 0.33)
	pt3dadd(-14.67, 116.25, -54, 0.33)
	pt3dadd(-14.83, 116.42, -54, 0.33)
	pt3dadd(-15, 116.75, -54, 0.33)
	pt3dadd(-15.17, 116.92, -54, 0.33)
	pt3dadd(-15.33, 117.08, -54, 0.33)
	pt3dadd(-15.5, 117.25, -54, 0.33)
	pt3dadd(-15.67, 117.58, -54, 0.33)
	pt3dadd(-15.83, 117.75, -54, 0.33)
	pt3dadd(-16, 117.92, -54, 0.33)
	pt3dadd(-16, 118.25, -54, 0.33)
	pt3dadd(-16.5, 118.75, -54, 0.33)
	pt3dadd(-16.67, 119.08, -54, 0.33)
	pt3dadd(-16.67, 119.42, -54, 0.33)
	pt3dadd(-16.82, 119.75, -54, 0.33)
	pt3dadd(-17, 119.92, -54, 0.33)
	pt3dadd(-17, 121.25, -54, 0.33)
	pt3dadd(-17.17, 121.42, -54, 0.33)
	pt3dadd(-17.17, 122.25, -54, 0.33)
	pt3dadd(-17.32, 122.25, -54, 0.33)
  }
  dend[335] {pt3dclear()
	pt3dadd(-14, 112.92, -54, 0.33)
	pt3dadd(-14, 113.58, -56.16, 0.33)
	pt3dadd(-13.83, 113.75, -56.16, 0.33)
	pt3dadd(-13.83, 114.08, -56.16, 0.33)
	pt3dadd(-13.67, 114.25, -56.16, 0.33)
	pt3dadd(-13.5, 114.42, -56.16, 0.33)
	pt3dadd(-13.5, 114.75, -56.16, 0.33)
	pt3dadd(-13.33, 115.08, -56.16, 0.33)
	pt3dadd(-13.17, 115.25, -56.16, 0.33)
	pt3dadd(-13.17, 115.58, -56.16, 0.33)
	pt3dadd(-13, 115.92, -56.16, 0.33)
	pt3dadd(-13, 118.42, -56.16, 0.33)
	pt3dadd(-13.17, 118.75, -56.16, 0.33)
	pt3dadd(-13.17, 121.25, -56.16, 0.33)
	pt3dadd(-13.33, 121.42, -56.16, 0.33)
	pt3dadd(-13.5, 121.58, -56.16, 0.33)
	pt3dadd(-13.67, 121.75, -56.16, 0.33)
	pt3dadd(-13.83, 121.92, -56.16, 0.33)
	pt3dadd(-14, 122.08, -56.16, 0.33)
	pt3dadd(-14.17, 122.25, -56.16, 0.33)
	pt3dadd(-14.33, 122.42, -56.16, 0.33)
	pt3dadd(-14.5, 122.58, -56.16, 0.33)
	pt3dadd(-14.67, 122.92, -56.16, 0.33)
	pt3dadd(-14.83, 123.08, -56.16, 0.33)
	pt3dadd(-15.17, 123.25, -56.16, 0.33)
	pt3dadd(-15.5, 123.42, -56.16, 0.33)
	pt3dadd(-15.67, 123.58, -56.16, 0.33)
  }
}
proc shape3d_30() {
  dend[335] {	pt3dadd(-15.83, 123.75, -56.16, 0.33)
	pt3dadd(-16, 124.08, -56.16, 0.33)
	pt3dadd(-16.17, 124.42, -56.16, 0.33)
	pt3dadd(-16.32, 124.58, -56.16, 0.33)
	pt3dadd(-16.32, 124.92, -56.16, 0.33)
	pt3dadd(-16.5, 125.08, -56.16, 0.33)
	pt3dadd(-16.67, 125.42, -56.16, 0.33)
	pt3dadd(-16.67, 125.75, -56.16, 0.33)
	pt3dadd(-16.82, 125.92, -56.16, 0.33)
	pt3dadd(-16.82, 126.75, -56.16, 0.33)
	pt3dadd(-17, 126.92, -56.16, 0.33)
  }
  dend[336] {pt3dclear()
	pt3dadd(-17, 126.92, -56.16, 0.33)
	pt3dadd(-17.17, 127.08, -56.16, 0.33)
	pt3dadd(-17.17, 127.42, -56.16, 0.33)
	pt3dadd(-17.32, 127.75, -56.16, 0.33)
	pt3dadd(-17.5, 128.08, -56.16, 0.33)
	pt3dadd(-17.67, 128.41, -56.16, 0.33)
	pt3dadd(-17.82, 128.75, -56.16, 0.33)
	pt3dadd(-18, 129.08, -56.16, 0.33)
	pt3dadd(-18.17, 129.25, -56.16, 0.33)
	pt3dadd(-18.17, 129.58, -56.16, 0.33)
	pt3dadd(-18.32, 129.75, -56.16, 0.33)
	pt3dadd(-18.5, 129.91, -56.16, 0.33)
	pt3dadd(-18.67, 130.25, -56.16, 0.33)
	pt3dadd(-18.82, 130.41, -56.16, 0.33)
	pt3dadd(-19, 130.75, -56.16, 0.33)
	pt3dadd(-19.17, 131.08, -56.16, 0.33)
	pt3dadd(-19.32, 131.25, -56.16, 0.33)
	pt3dadd(-19.5, 131.41, -56.16, 0.33)
	pt3dadd(-20.67, 132.58, -56.16, 0.33)
	pt3dadd(-20.83, 132.75, -56.16, 0.33)
	pt3dadd(-21, 133.08, -56.16, 0.33)
	pt3dadd(-21.17, 133.41, -56.16, 0.33)
	pt3dadd(-21.33, 133.58, -56.16, 0.33)
	pt3dadd(-21.33, 133.91, -56.16, 0.33)
	pt3dadd(-21.5, 134.08, -56.16, 0.33)
	pt3dadd(-21.5, 134.91, -56.16, 0.33)
	pt3dadd(-21.67, 135.25, -56.16, 0.33)
	pt3dadd(-21.67, 135.91, -56.16, 0.33)
	pt3dadd(-21.83, 136.08, -56.16, 0.33)
	pt3dadd(-21.83, 137.75, -56.16, 0.33)
	pt3dadd(-22, 137.91, -56.16, 0.33)
  }
  dend[337] {pt3dclear()
	pt3dadd(-17, 126.92, -56.16, 0.33)
	pt3dadd(-17, 127.08, -50.04, 0.33)
	pt3dadd(-16.82, 127.25, -50.04, 0.33)
	pt3dadd(-16.67, 127.58, -50.04, 0.33)
	pt3dadd(-16.5, 127.92, -50.04, 0.33)
	pt3dadd(-16.32, 128.08, -50.04, 0.33)
	pt3dadd(-16.17, 128.41, -50.04, 0.33)
	pt3dadd(-16.17, 128.91, -50.04, 0.33)
	pt3dadd(-16, 129.25, -50.04, 0.33)
	pt3dadd(-16, 132.75, -50.04, 0.33)
	pt3dadd(-15.83, 132.91, -50.04, 0.33)
	pt3dadd(-15.83, 133.91, -50.04, 0.33)
	pt3dadd(-15.67, 134.08, -50.04, 0.33)
	pt3dadd(-15.67, 134.75, -50.04, 0.33)
	pt3dadd(-15.5, 135.08, -50.04, 0.33)
	pt3dadd(-15.5, 135.75, -50.04, 0.33)
  }
  dend[338] {pt3dclear()
	pt3dadd(5.67, 64.17, -50.76, 1)
	pt3dadd(6, 63.75, -53.28, 0.33)
	pt3dadd(6, 66.25, -53.28, 0.33)
	pt3dadd(5.83, 66.42, -53.28, 0.33)
	pt3dadd(5.83, 66.92, -53.28, 0.33)
	pt3dadd(5.67, 67.25, -53.28, 0.33)
	pt3dadd(5.5, 67.42, -53.28, 0.33)
	pt3dadd(5.33, 67.58, -53.28, 0.33)
	pt3dadd(5.17, 67.75, -53.28, 0.33)
	pt3dadd(5, 68.08, -53.28, 0.33)
	pt3dadd(4.83, 68.25, -53.28, 0.33)
	pt3dadd(4.67, 68.58, -53.28, 0.33)
	pt3dadd(4.5, 68.75, -53.28, 0.33)
	pt3dadd(4.33, 69.08, -53.28, 0.33)
	pt3dadd(4.17, 69.42, -53.28, 0.33)
	pt3dadd(4, 69.75, -53.28, 0.33)
	pt3dadd(3.83, 69.92, -53.28, 0.33)
	pt3dadd(3.67, 70.08, -53.28, 0.33)
	pt3dadd(3.67, 70.42, -53.28, 0.33)
	pt3dadd(3.5, 70.58, -53.28, 0.33)
	pt3dadd(3.33, 70.92, -53.28, 0.33)
	pt3dadd(3.33, 71.25, -53.28, 0.33)
	pt3dadd(3.17, 71.58, -53.28, 0.33)
	pt3dadd(3, 71.75, -53.28, 0.33)
	pt3dadd(2.83, 72.08, -53.28, 0.33)
	pt3dadd(2.67, 72.42, -53.28, 0.33)
	pt3dadd(2.5, 72.58, -53.28, 0.33)
	pt3dadd(2.33, 72.75, -53.28, 0.33)
	pt3dadd(2.17, 73.08, -53.28, 0.33)
	pt3dadd(2, 73.25, -53.28, 0.33)
	pt3dadd(1.83, 73.42, -53.28, 0.33)
	pt3dadd(1.83, 73.75, -53.28, 0.33)
	pt3dadd(1.67, 73.92, -53.28, 0.33)
	pt3dadd(1.18, 74.37, -53.28, 0.33)
  }
  dend[339] {pt3dclear()
	pt3dadd(1.18, 74.37, -53.28, 0.33)
	pt3dadd(1.5, 74.08, -53.28, 0.33)
	pt3dadd(1.33, 74.25, -53.28, 0.33)
	pt3dadd(1, 74.42, -53.28, 0.33)
	pt3dadd(0.5, 74.42, -53.28, 0.33)
	pt3dadd(0, 74.58, -53.28, 0.33)
	pt3dadd(-0.17, 74.75, -53.28, 0.33)
	pt3dadd(-0.33, 74.92, -53.28, 0.33)
	pt3dadd(-0.83, 75.42, -53.28, 0.33)
	pt3dadd(-1, 75.58, -53.28, 0.33)
	pt3dadd(-1.17, 75.75, -53.28, 0.33)
	pt3dadd(-1.33, 75.92, -53.28, 0.33)
	pt3dadd(-1.5, 76.08, -53.28, 0.33)
	pt3dadd(-1.83, 76.08, -53.28, 0.33)
	pt3dadd(-2, 76.25, -53.28, 0.33)
	pt3dadd(-2.17, 76.42, -53.28, 0.33)
	pt3dadd(-2.33, 76.58, -53.28, 0.33)
	pt3dadd(-2.5, 76.75, -53.28, 0.33)
	pt3dadd(-2.67, 76.92, -53.28, 0.33)
	pt3dadd(-2.83, 77.08, -53.28, 0.33)
  }
  dend[340] {pt3dclear()
	pt3dadd(-2.83, 77.08, -53.28, 0.33)
	pt3dadd(-2.54, 76.48, -53.28, 0.33)
  }
  dend[341] {pt3dclear()
	pt3dadd(-2.54, 76.48, -53.28, 0.33)
	pt3dadd(-2.67, 76.75, -53.28, 0.33)
	pt3dadd(-3, 76.58, -53.28, 0.33)
	pt3dadd(-3.17, 76.42, -53.28, 0.33)
	pt3dadd(-3.33, 76.08, -53.28, 0.33)
	pt3dadd(-3.33, 74.92, -53.28, 0.33)
	pt3dadd(-3.17, 74.75, -53.28, 0.33)
	pt3dadd(-3, 74.42, -53.28, 0.33)
	pt3dadd(-2.83, 74.25, -53.28, 0.33)
	pt3dadd(-2.83, 73.75, -53.28, 0.33)
	pt3dadd(-2.67, 73.42, -53.28, 0.33)
	pt3dadd(-2.5, 73.25, -53.28, 0.33)
	pt3dadd(-2.5, 72.75, -53.28, 0.33)
	pt3dadd(-2.33, 72.58, -53.28, 0.33)
	pt3dadd(-2.33, 72.25, -53.28, 0.33)
	pt3dadd(-2.17, 71.92, -53.28, 0.33)
	pt3dadd(-2.17, 70.75, -53.28, 0.33)
	pt3dadd(-2.33, 70.58, -53.28, 0.33)
	pt3dadd(-2.5, 70.42, -53.28, 0.33)
	pt3dadd(-2.67, 70.25, -53.28, 0.33)
	pt3dadd(-2.83, 70.08, -53.28, 0.33)
	pt3dadd(-3, 69.92, -53.28, 0.33)
	pt3dadd(-3.17, 69.75, -53.28, 0.33)
	pt3dadd(-3.5, 69.58, -53.28, 0.33)
	pt3dadd(-3.67, 69.42, -53.28, 0.33)
	pt3dadd(-3.83, 69.25, -53.28, 0.33)
  }
  dend[342] {pt3dclear()
	pt3dadd(-2.54, 76.48, -53.28, 0.33)
	pt3dadd(-3, 76.92, -51.48, 0.33)
	pt3dadd(-3.17, 77.08, -51.48, 0.33)
	pt3dadd(-4.33, 77.58, -51.48, 0.33)
	pt3dadd(-4.83, 77.75, -51.48, 0.33)
	pt3dadd(-5.17, 78.08, -51.48, 0.33)
	pt3dadd(-5.5, 78.08, -51.48, 0.33)
	pt3dadd(-5.67, 78.42, -51.48, 0.33)
	pt3dadd(-5.83, 78.58, -51.48, 0.33)
	pt3dadd(-6, 78.75, -51.48, 0.33)
	pt3dadd(-6.17, 79.08, -51.48, 0.33)
	pt3dadd(-6.33, 79.25, -51.48, 0.33)
	pt3dadd(-6.5, 79.42, -51.48, 0.33)
	pt3dadd(-6.5, 79.75, -51.48, 0.33)
	pt3dadd(-6.67, 79.92, -51.48, 0.33)
	pt3dadd(-6.83, 80.25, -51.48, 0.33)
	pt3dadd(-7, 80.58, -51.48, 0.33)
	pt3dadd(-7.17, 80.75, -51.48, 0.33)
	pt3dadd(-7.33, 80.92, -51.48, 0.33)
	pt3dadd(-7.5, 81.08, -51.48, 0.33)
	pt3dadd(-7.67, 81.25, -51.48, 0.33)
	pt3dadd(-7.83, 81.58, -51.48, 0.33)
	pt3dadd(-8, 81.75, -51.48, 0.33)
	pt3dadd(-8.17, 81.92, -51.48, 0.33)
	pt3dadd(-8.17, 82.25, -51.48, 0.33)
	pt3dadd(-8.33, 82.58, -51.48, 0.33)
	pt3dadd(-8.5, 82.75, -51.48, 0.33)
	pt3dadd(-9, 82.75, -51.48, 0.33)
  }
  dend[343] {pt3dclear()
	pt3dadd(-9, 82.75, -51.48, 0.33)
	pt3dadd(-8.34, 82.75, -51.48, 0.33)
  }
  dend[344] {pt3dclear()
	pt3dadd(-8.34, 82.75, -51.48, 0.33)
	pt3dadd(-8.67, 82.75, -51.48, 0.33)
	pt3dadd(-9.5, 82.75, -51.48, 0.33)
	pt3dadd(-9.67, 82.58, -51.48, 0.33)
	pt3dadd(-9.83, 82.42, -51.48, 0.33)
	pt3dadd(-10.83, 82.42, -51.48, 0.33)
	pt3dadd(-11.17, 82.25, -51.48, 0.33)
	pt3dadd(-12, 82.25, -51.48, 0.33)
	pt3dadd(-12.17, 82.08, -51.48, 0.33)
	pt3dadd(-12.67, 82.08, -51.48, 0.33)
	pt3dadd(-12.83, 81.92, -51.48, 0.33)
	pt3dadd(-13, 81.75, -51.48, 0.33)
	pt3dadd(-13.5, 81.75, -51.48, 0.33)
	pt3dadd(-13.83, 81.58, -51.48, 0.33)
	pt3dadd(-14, 81.42, -51.48, 0.33)
	pt3dadd(-14.33, 81.42, -51.48, 0.33)
	pt3dadd(-14.5, 81.25, -51.48, 0.33)
	pt3dadd(-14.83, 81.08, -51.48, 0.33)
	pt3dadd(-15, 80.92, -51.48, 0.33)
	pt3dadd(-15.17, 80.75, -51.48, 0.33)
	pt3dadd(-15.33, 80.58, -51.48, 0.33)
	pt3dadd(-15.5, 80.42, -51.48, 0.33)
	pt3dadd(-15.67, 80.25, -51.48, 0.33)
	pt3dadd(-15.83, 80.08, -51.48, 0.33)
	pt3dadd(-16, 79.75, -51.48, 0.33)
	pt3dadd(-16.17, 79.58, -51.48, 0.33)
	pt3dadd(-16.17, 78.92, -51.48, 0.33)
	pt3dadd(-16.32, 78.75, -51.48, 0.33)
	pt3dadd(-16.32, 77.08, -51.48, 0.33)
	pt3dadd(-16.5, 76.92, -51.48, 0.33)
  }
}
proc shape3d_31() {
  dend[344] {	pt3dadd(-16.5, 76.08, -51.48, 0.33)
	pt3dadd(-16.67, 76.08, -51.48, 0.33)
  }
  dend[345] {pt3dclear()
	pt3dadd(-16.67, 76.08, -51.48, 0.33)
	pt3dadd(-16.82, 75.92, -49.32, 0.33)
	pt3dadd(-16.5, 75.92, -49.32, 0.33)
	pt3dadd(-16.17, 75.75, -49.32, 0.33)
	pt3dadd(-15.83, 75.42, -49.32, 0.33)
	pt3dadd(-15.67, 75.25, -49.32, 0.33)
	pt3dadd(-15.5, 74.92, -49.32, 0.33)
	pt3dadd(-15.17, 74.75, -49.32, 0.33)
	pt3dadd(-14.83, 74.25, -49.32, 0.33)
	pt3dadd(-14.33, 73.92, -49.32, 0.33)
	pt3dadd(-14, 73.75, -49.32, 0.33)
	pt3dadd(-13.83, 73.58, -49.32, 0.33)
	pt3dadd(-13.67, 73.42, -49.32, 0.33)
	pt3dadd(-13.33, 73.25, -49.32, 0.33)
	pt3dadd(-13.17, 73.08, -49.32, 0.33)
	pt3dadd(-13, 72.92, -49.32, 0.33)
	pt3dadd(-12.83, 72.75, -49.32, 0.33)
	pt3dadd(-12.67, 72.42, -49.32, 0.33)
	pt3dadd(-12.5, 72.25, -49.32, 0.33)
	pt3dadd(-12.17, 71.92, -49.32, 0.33)
  }
  dend[346] {pt3dclear()
	pt3dadd(-16.67, 76.08, -51.48, 0.33)
	pt3dadd(-16.82, 76.25, -48.24, 0.33)
	pt3dadd(-16.82, 75.92, -48.24, 0.33)
	pt3dadd(-17, 75.58, -48.24, 0.33)
	pt3dadd(-17.17, 75.25, -48.24, 0.33)
	pt3dadd(-17.32, 74.92, -48.24, 0.33)
	pt3dadd(-17.32, 74.58, -48.24, 0.33)
	pt3dadd(-17.5, 74.42, -48.24, 0.33)
	pt3dadd(-17.67, 74.08, -48.24, 0.33)
	pt3dadd(-17.67, 73.75, -48.24, 0.33)
	pt3dadd(-17.82, 73.42, -48.24, 0.33)
	pt3dadd(-18, 73.08, -48.24, 0.33)
	pt3dadd(-18.17, 72.75, -48.24, 0.33)
	pt3dadd(-18.17, 71.92, -48.24, 0.33)
	pt3dadd(-18.32, 71.75, -48.24, 0.33)
	pt3dadd(-18.32, 71.42, -48.24, 0.33)
	pt3dadd(-18.67, 70.58, -48.24, 0.33)
	pt3dadd(-18.67, 70.08, -48.24, 0.33)
	pt3dadd(-18.82, 69.75, -48.24, 0.33)
	pt3dadd(-18.82, 69.42, -48.24, 0.33)
	pt3dadd(-19, 69.08, -48.24, 0.33)
	pt3dadd(-19.17, 68.58, -48.24, 0.33)
	pt3dadd(-19.32, 68.08, -48.24, 0.33)
	pt3dadd(-19.32, 67.75, -48.24, 0.33)
	pt3dadd(-19.5, 67.42, -48.24, 0.33)
	pt3dadd(-19.5, 66.92, -48.24, 0.33)
	pt3dadd(-19.67, 66.58, -48.24, 0.33)
	pt3dadd(-19.67, 66.08, -48.24, 0.33)
	pt3dadd(-19.82, 65.75, -48.24, 0.33)
	pt3dadd(-19.82, 64.58, -48.24, 0.33)
	pt3dadd(-20, 64.25, -48.24, 0.33)
	pt3dadd(-20, 63.42, -48.24, 0.33)
	pt3dadd(-19.82, 63.25, -48.24, 0.33)
	pt3dadd(-19.82, 62.75, -48.24, 0.33)
	pt3dadd(-19.67, 62.58, -48.24, 0.33)
	pt3dadd(-19.67, 61.42, -48.24, 0.33)
	pt3dadd(-19.82, 61.08, -48.24, 0.33)
	pt3dadd(-19.82, 60.08, -48.24, 0.33)
	pt3dadd(-20, 59.92, -48.24, 0.33)
	pt3dadd(-20, 59.58, -48.24, 0.33)
	pt3dadd(-20.17, 59.42, -48.24, 0.33)
	pt3dadd(-20.32, 59.25, -48.24, 0.33)
  }
  dend[347] {pt3dclear()
	pt3dadd(-8.34, 82.75, -51.48, 0.33)
	pt3dadd(-9.5, 82.75, -50.76, 0.33)
	pt3dadd(-9.33, 82.92, -50.76, 0.33)
	pt3dadd(-9.5, 83.08, -50.76, 0.33)
	pt3dadd(-9.67, 83.25, -50.76, 0.33)
	pt3dadd(-9.83, 83.58, -50.76, 0.33)
	pt3dadd(-10, 83.92, -50.76, 0.33)
	pt3dadd(-10.17, 84.25, -50.76, 0.33)
	pt3dadd(-10.33, 84.42, -50.76, 0.33)
	pt3dadd(-10.33, 84.75, -50.76, 0.33)
	pt3dadd(-10.5, 84.92, -50.76, 0.33)
	pt3dadd(-10.67, 85.08, -50.76, 0.33)
	pt3dadd(-10.83, 85.25, -50.76, 0.33)
  }
  dend[348] {pt3dclear()
	pt3dadd(-10.83, 85.25, -50.76, 0.33)
	pt3dadd(-11, 85.42, -50.76, 0.33)
	pt3dadd(-11.33, 85.42, -50.76, 0.33)
	pt3dadd(-11.5, 85.58, -50.76, 0.33)
	pt3dadd(-11.67, 85.42, -50.76, 0.33)
	pt3dadd(-12, 85.25, -50.76, 0.33)
	pt3dadd(-12.17, 85.08, -50.76, 0.33)
	pt3dadd(-12.33, 84.92, -50.76, 0.33)
	pt3dadd(-12.67, 84.92, -50.76, 0.33)
	pt3dadd(-12.83, 84.75, -50.76, 0.33)
	pt3dadd(-13, 84.58, -50.76, 0.33)
	pt3dadd(-13.17, 84.75, -50.76, 0.33)
	pt3dadd(-13.33, 84.92, -50.76, 0.33)
	pt3dadd(-13.5, 85.25, -50.76, 0.33)
	pt3dadd(-13.5, 86.58, -50.76, 0.33)
	pt3dadd(-13.33, 86.75, -50.76, 0.33)
	pt3dadd(-13.33, 91.08, -50.76, 0.33)
	pt3dadd(-13.17, 91.25, -50.76, 0.33)
	pt3dadd(-13, 91.58, -50.76, 0.33)
	pt3dadd(-13, 91.92, -50.76, 0.33)
	pt3dadd(-12.83, 92.08, -50.76, 0.33)
	pt3dadd(-12.67, 92.25, -50.76, 0.33)
	pt3dadd(-12.5, 92.42, -50.76, 0.33)
	pt3dadd(-12.33, 92.58, -50.76, 0.33)
	pt3dadd(-12, 92.75, -50.76, 0.33)
	pt3dadd(-11.83, 92.92, -50.76, 0.33)
	pt3dadd(-11.67, 93.08, -50.76, 0.33)
	pt3dadd(-11.5, 93.42, -50.76, 0.33)
	pt3dadd(-11.33, 93.58, -50.76, 0.33)
	pt3dadd(-11.17, 93.75, -50.76, 0.33)
	pt3dadd(-11, 94.08, -50.76, 0.33)
  }
  dend[349] {pt3dclear()
	pt3dadd(-10.83, 85.25, -50.76, 0.33)
	pt3dadd(-10.67, 85.25, -50.4, 0.33)
	pt3dadd(-10.67, 85.92, -50.4, 0.33)
	pt3dadd(-10.83, 86.08, -50.4, 0.33)
	pt3dadd(-11, 86.42, -50.4, 0.33)
	pt3dadd(-11, 86.75, -50.4, 0.33)
	pt3dadd(-11.17, 87.08, -50.4, 0.33)
	pt3dadd(-11.17, 88.75, -51.48, 0.33)
	pt3dadd(-11.33, 88.92, -51.48, 0.33)
	pt3dadd(-11.33, 91.25, -50.4, 0.33)
	pt3dadd(-11.17, 91.42, -50.4, 0.33)
	pt3dadd(-11, 91.58, -50.4, 0.33)
	pt3dadd(-10.83, 91.92, -50.4, 0.33)
	pt3dadd(-10.67, 92.08, -50.4, 0.33)
	pt3dadd(-10.5, 92.25, -50.4, 0.33)
	pt3dadd(-10.33, 92.42, -50.4, 0.33)
	pt3dadd(-9.67, 93.08, -50.4, 0.33)
	pt3dadd(-9.5, 93.25, -50.4, 0.33)
	pt3dadd(-9.33, 93.58, -50.4, 0.33)
	pt3dadd(-9.17, 93.92, -50.4, 0.33)
	pt3dadd(-9, 94.25, -50.4, 0.33)
	pt3dadd(-9, 95.25, -50.4, 0.33)
  }
  dend[350] {pt3dclear()
	pt3dadd(-9, 82.75, -51.48, 0.33)
	pt3dadd(-9, 82.75, -52.92, 0.33)
	pt3dadd(-8.83, 82.92, -52.92, 0.33)
	pt3dadd(-8.83, 83.42, -52.92, 0.33)
	pt3dadd(-8.67, 83.58, -52.92, 0.33)
	pt3dadd(-8.67, 85.08, -52.92, 0.33)
	pt3dadd(-8.83, 85.42, -52.92, 0.33)
	pt3dadd(-8.83, 86.25, -52.92, 0.33)
	pt3dadd(-9, 86.42, -52.92, 0.33)
	pt3dadd(-9, 87.08, -52.92, 0.33)
	pt3dadd(-9.17, 87.42, -52.92, 0.33)
	pt3dadd(-9.17, 88.92, -52.92, 0.33)
	pt3dadd(-9.33, 89.08, -52.92, 0.33)
	pt3dadd(-9.33, 89.75, -52.92, 0.33)
	pt3dadd(-9.5, 89.92, -52.92, 0.33)
  }
  dend[351] {pt3dclear()
	pt3dadd(-9.5, 89.92, -52.92, 0.33)
	pt3dadd(-9.17, 89.75, -52.92, 0.33)
	pt3dadd(-9.17, 90.08, -52.92, 0.33)
	pt3dadd(-9.33, 90.25, -52.92, 0.33)
	pt3dadd(-9.67, 90.42, -52.92, 0.33)
	pt3dadd(-9.83, 90.58, -52.92, 0.33)
	pt3dadd(-10.17, 90.75, -52.92, 0.33)
	pt3dadd(-10.67, 91.08, -52.92, 0.33)
	pt3dadd(-10.83, 91.25, -52.92, 0.33)
	pt3dadd(-11.17, 91.42, -52.92, 0.33)
	pt3dadd(-11.33, 91.58, -52.92, 0.33)
	pt3dadd(-11.5, 91.92, -52.92, 0.33)
	pt3dadd(-11.67, 92.08, -52.92, 0.33)
	pt3dadd(-12, 92.25, -52.92, 0.33)
	pt3dadd(-12.33, 92.42, -52.92, 0.33)
	pt3dadd(-12.67, 92.75, -52.92, 0.33)
	pt3dadd(-12.83, 92.92, -52.92, 0.33)
	pt3dadd(-13, 93.08, -52.92, 0.33)
	pt3dadd(-13, 93.42, -52.92, 0.33)
	pt3dadd(-13.17, 93.58, -52.92, 0.33)
	pt3dadd(-13.17, 94.08, -52.92, 0.33)
	pt3dadd(-13.33, 94.42, -52.92, 0.33)
	pt3dadd(-13.33, 94.75, -52.92, 0.33)
	pt3dadd(-13.5, 94.92, -52.92, 0.33)
	pt3dadd(-13.5, 95.25, -52.92, 0.33)
	pt3dadd(-13.67, 95.58, -52.92, 0.33)
	pt3dadd(-13.67, 96.25, -52.92, 0.33)
	pt3dadd(-13.83, 96.58, -52.92, 0.33)
	pt3dadd(-13.83, 97.58, -52.92, 0.33)
	pt3dadd(-14, 97.75, -52.92, 0.33)
	pt3dadd(-14, 98.58, -52.92, 0.33)
	pt3dadd(-14.17, 98.75, -52.92, 0.33)
	pt3dadd(-14.17, 101.25, -52.92, 0.33)
	pt3dadd(-14, 101.58, -52.92, 0.33)
	pt3dadd(-14, 101.92, -52.92, 0.33)
  }
  dend[352] {pt3dclear()
	pt3dadd(-9.5, 89.92, -52.92, 0.33)
	pt3dadd(-9.33, 89.75, -51.48, 0.33)
	pt3dadd(-9.17, 89.92, -51.48, 0.33)
	pt3dadd(-9.17, 90.58, -51.48, 0.33)
	pt3dadd(-9.33, 90.92, -51.48, 0.33)
	pt3dadd(-9.33, 92.08, -51.48, 0.33)
	pt3dadd(-9.5, 92.25, -51.48, 0.33)
	pt3dadd(-9.5, 92.58, -51.48, 0.33)
	pt3dadd(-9.67, 92.92, -51.48, 0.33)
	pt3dadd(-9.83, 93.08, -51.48, 0.33)
	pt3dadd(-10, 93.25, -51.48, 0.33)
	pt3dadd(-10, 93.58, -51.48, 0.33)
	pt3dadd(-10.17, 93.75, -51.48, 0.33)
	pt3dadd(-10.33, 94.08, -51.48, 0.33)
	pt3dadd(-10.5, 94.42, -51.84, 0.33)
	pt3dadd(-10.83, 94.75, -51.84, 0.33)
	pt3dadd(-10.83, 95.08, -52.56, 0.33)
	pt3dadd(-11, 95.25, -52.92, 0.33)
	pt3dadd(-11.17, 95.42, -52.2, 0.33)
	pt3dadd(-11.17, 95.75, -52.2, 0.33)
  }
}
proc shape3d_32() {
  dend[352] {	pt3dadd(-11.33, 95.92, -52.2, 0.33)
	pt3dadd(-11.33, 96.25, -52.2, 0.33)
	pt3dadd(-11.5, 96.42, -52.2, 0.33)
	pt3dadd(-11.67, 96.58, -52.2, 0.33)
	pt3dadd(-11.67, 96.92, -52.2, 0.33)
	pt3dadd(-11.83, 97.08, -52.2, 0.33)
	pt3dadd(-12, 97.25, -52.2, 0.33)
	pt3dadd(-12.17, 97.58, -52.2, 0.33)
	pt3dadd(-12.17, 98.25, -52.2, 0.33)
	pt3dadd(-12.33, 98.58, -52.2, 0.33)
	pt3dadd(-12.5, 98.75, -52.2, 0.33)
  }
  dend[353] {pt3dclear()
	pt3dadd(-12.5, 98.75, -52.2, 0.33)
	pt3dadd(-12, 98.42, -52.2, 0.33)
	pt3dadd(-12, 98.75, -52.2, 0.33)
	pt3dadd(-12.17, 98.92, -52.2, 0.33)
	pt3dadd(-12.33, 99.08, -52.2, 0.33)
	pt3dadd(-12.67, 99.42, -52.2, 0.33)
	pt3dadd(-12.83, 99.75, -52.2, 0.33)
	pt3dadd(-13, 99.92, -52.2, 0.33)
	pt3dadd(-13.17, 100.25, -52.2, 0.33)
	pt3dadd(-13.17, 100.92, -52.2, 0.33)
	pt3dadd(-13.33, 101.08, -52.2, 0.33)
	pt3dadd(-13.33, 103.08, -52.2, 0.33)
	pt3dadd(-13.17, 103.42, -52.2, 0.33)
	pt3dadd(-13.17, 103.75, -52.2, 0.33)
	pt3dadd(-13, 103.92, -52.2, 0.33)
	pt3dadd(-13, 104.25, -52.2, 0.33)
	pt3dadd(-12.83, 104.58, -52.2, 0.33)
	pt3dadd(-12.67, 104.92, -52.2, 0.33)
	pt3dadd(-12.67, 106.25, -52.2, 0.33)
	pt3dadd(-12.5, 106.42, -52.2, 0.33)
	pt3dadd(-12.5, 108.08, -52.2, 0.33)
  }
  dend[354] {pt3dclear()
	pt3dadd(-12.5, 98.75, -52.2, 0.33)
	pt3dadd(-12.17, 98.75, -51.12, 0.33)
	pt3dadd(-12.33, 98.92, -51.12, 0.33)
	pt3dadd(-12.67, 98.92, -51.12, 0.33)
	pt3dadd(-12.83, 99.08, -51.12, 0.33)
	pt3dadd(-13, 99.25, -51.12, 0.33)
	pt3dadd(-13.17, 99.58, -51.12, 0.33)
	pt3dadd(-13.33, 99.75, -51.12, 0.33)
	pt3dadd(-13.5, 99.92, -51.12, 0.33)
	pt3dadd(-13.67, 100.08, -51.12, 0.33)
	pt3dadd(-13.83, 100.25, -51.12, 0.33)
	pt3dadd(-14, 100.42, -51.12, 0.33)
	pt3dadd(-14.17, 100.75, -51.12, 0.33)
	pt3dadd(-14.33, 100.92, -51.12, 0.33)
	pt3dadd(-14.5, 101.25, -51.12, 0.33)
	pt3dadd(-14.67, 101.42, -51.12, 0.33)
	pt3dadd(-14.67, 101.75, -51.12, 0.33)
	pt3dadd(-14.83, 101.92, -51.12, 0.33)
	pt3dadd(-14.83, 102.25, -51.12, 0.33)
	pt3dadd(-15, 102.42, -51.12, 0.33)
	pt3dadd(-15.17, 102.75, -51.12, 0.33)
	pt3dadd(-15.33, 103.08, -51.12, 0.33)
	pt3dadd(-15.33, 103.42, -51.12, 0.33)
	pt3dadd(-15.5, 103.75, -51.12, 0.33)
	pt3dadd(-15.5, 104.42, -51.12, 0.33)
	pt3dadd(-15.67, 104.75, -51.12, 0.33)
	pt3dadd(-15.67, 105.75, -51.12, 0.33)
	pt3dadd(-15.83, 105.92, -51.12, 0.33)
	pt3dadd(-15.83, 106.25, -51.12, 0.33)
	pt3dadd(-16, 106.25, -51.12, 0.33)
  }
  dend[355] {pt3dclear()
	pt3dadd(-2.83, 77.08, -53.28, 0.33)
	pt3dadd(-2.5, 76.92, -52.92, 0.33)
	pt3dadd(-2.5, 77.42, -52.92, 0.33)
	pt3dadd(-2.67, 77.75, -52.92, 0.33)
	pt3dadd(-2.67, 78.25, -52.92, 0.33)
	pt3dadd(-2.83, 78.58, -52.92, 0.33)
	pt3dadd(-3, 78.92, -52.92, 0.33)
	pt3dadd(-3.17, 79.08, -52.92, 0.33)
	pt3dadd(-3.33, 79.42, -52.92, 0.33)
	pt3dadd(-3.33, 79.75, -52.92, 0.33)
	pt3dadd(-3.5, 80.08, -52.92, 0.33)
	pt3dadd(-3.67, 80.42, -52.92, 0.33)
	pt3dadd(-3.67, 80.75, -52.92, 0.33)
	pt3dadd(-3.83, 81.08, -52.92, 0.33)
	pt3dadd(-4, 81.42, -52.92, 0.33)
	pt3dadd(-4.17, 81.75, -52.92, 0.33)
	pt3dadd(-4.33, 81.92, -52.92, 0.33)
	pt3dadd(-4.5, 82.25, -52.92, 0.33)
	pt3dadd(-4.67, 82.58, -52.92, 0.33)
	pt3dadd(-4.67, 83.25, -52.92, 0.33)
	pt3dadd(-4.83, 83.42, -52.92, 0.33)
	pt3dadd(-5, 83.75, -52.92, 0.33)
	pt3dadd(-5, 84.08, -52.92, 0.33)
	pt3dadd(-5.17, 84.42, -52.92, 0.33)
	pt3dadd(-5.33, 84.75, -52.92, 0.33)
	pt3dadd(-5.5, 84.92, -52.92, 0.33)
	pt3dadd(-5.5, 85.25, -52.92, 0.33)
	pt3dadd(-5.67, 85.58, -52.92, 0.33)
	pt3dadd(-5.67, 85.92, -52.92, 0.33)
	pt3dadd(-5.83, 86.08, -52.92, 0.33)
	pt3dadd(-6, 86.25, -52.92, 0.33)
	pt3dadd(-6, 86.58, -52.92, 0.33)
	pt3dadd(-6.17, 86.92, -52.92, 0.33)
	pt3dadd(-6.33, 87.08, -52.92, 0.33)
	pt3dadd(-6.5, 87.25, -52.92, 0.33)
	pt3dadd(-6.5, 87.58, -52.92, 0.33)
	pt3dadd(-6.67, 87.75, -52.92, 0.33)
	pt3dadd(-6.83, 88.08, -52.92, 0.33)
	pt3dadd(-6.83, 88.75, -52.92, 0.33)
	pt3dadd(-7, 88.92, -52.92, 0.33)
	pt3dadd(-7, 89.25, -52.92, 0.33)
	pt3dadd(-7.17, 89.58, -52.92, 0.33)
	pt3dadd(-7.33, 89.75, -52.92, 0.33)
  }
  dend[356] {pt3dclear()
	pt3dadd(-7.33, 89.75, -52.92, 0.33)
	pt3dadd(-6.67, 89.58, -52.92, 0.33)
	pt3dadd(-6.83, 89.75, -52.92, 0.33)
	pt3dadd(-7.17, 89.92, -52.92, 0.33)
	pt3dadd(-7.5, 90.08, -52.92, 0.33)
	pt3dadd(-7.67, 90.25, -52.92, 0.33)
	pt3dadd(-7.83, 90.42, -52.92, 0.33)
	pt3dadd(-8.17, 90.58, -52.92, 0.33)
	pt3dadd(-8.33, 90.75, -52.92, 0.33)
	pt3dadd(-8.5, 91.08, -52.92, 0.33)
	pt3dadd(-8.67, 91.42, -52.92, 0.33)
	pt3dadd(-8.83, 91.75, -52.92, 0.33)
	pt3dadd(-9.17, 91.92, -52.92, 0.33)
	pt3dadd(-9.33, 92.08, -52.92, 0.33)
	pt3dadd(-9.5, 92.42, -52.92, 0.33)
	pt3dadd(-9.83, 92.58, -52.92, 0.33)
	pt3dadd(-10.17, 92.92, -52.92, 0.33)
	pt3dadd(-10.33, 93.08, -52.92, 0.33)
	pt3dadd(-11, 93.75, -52.92, 0.33)
	pt3dadd(-11.17, 93.92, -52.92, 0.33)
	pt3dadd(-11.33, 94.08, -52.92, 0.33)
	pt3dadd(-11.5, 94.25, -52.92, 0.33)
	pt3dadd(-11.67, 94.58, -52.92, 0.33)
	pt3dadd(-11.83, 94.75, -52.92, 0.33)
	pt3dadd(-12.17, 95.08, -52.92, 0.33)
	pt3dadd(-12.33, 95.25, -52.92, 0.33)
	pt3dadd(-12.5, 95.42, -52.92, 0.33)
	pt3dadd(-12.5, 95.58, -52.92, 0.33)
  }
  dend[357] {pt3dclear()
	pt3dadd(-7.33, 89.75, -52.92, 0.33)
	pt3dadd(-7.33, 89.92, -55.08, 0.33)
	pt3dadd(-7.33, 90.58, -55.08, 0.33)
	pt3dadd(-7.17, 90.75, -55.08, 0.33)
	pt3dadd(-7.17, 92.75, -55.08, 0.33)
	pt3dadd(-7.33, 93.08, -55.08, 0.33)
	pt3dadd(-7.5, 93.42, -55.08, 0.33)
	pt3dadd(-7.67, 93.75, -55.08, 0.33)
	pt3dadd(-7.83, 94.08, -55.08, 0.33)
	pt3dadd(-7.83, 94.42, -55.08, 0.33)
	pt3dadd(-8, 94.58, -55.08, 0.33)
	pt3dadd(-8.17, 94.92, -55.08, 0.33)
	pt3dadd(-8.33, 95.08, -55.08, 0.33)
	pt3dadd(-8.5, 95.42, -55.08, 0.33)
	pt3dadd(-8.67, 95.58, -55.08, 0.33)
	pt3dadd(-8.67, 95.92, -55.08, 0.33)
	pt3dadd(-8.83, 96.08, -55.08, 0.33)
	pt3dadd(-9, 96.25, -55.08, 0.33)
	pt3dadd(-9, 96.58, -55.08, 0.33)
	pt3dadd(-9.17, 96.75, -55.08, 0.33)
	pt3dadd(-9.33, 96.92, -55.08, 0.33)
	pt3dadd(-9.5, 97.08, -55.08, 0.33)
	pt3dadd(-9.5, 97.42, -55.08, 0.33)
	pt3dadd(-9.67, 97.58, -55.08, 0.33)
  }
  dend[358] {pt3dclear()
	pt3dadd(1.18, 74.37, -53.28, 0.33)
	pt3dadd(1.67, 73.92, -55.8, 0.33)
	pt3dadd(1.83, 74.08, -55.8, 0.33)
	pt3dadd(1.83, 74.58, -55.8, 0.33)
	pt3dadd(2, 74.75, -55.8, 0.33)
	pt3dadd(2, 76.25, -55.8, 0.33)
	pt3dadd(1.83, 76.42, -55.8, 0.33)
	pt3dadd(1.67, 76.58, -55.8, 0.33)
	pt3dadd(1.5, 76.75, -55.8, 0.33)
	pt3dadd(1.5, 77.08, -55.8, 0.33)
	pt3dadd(1.17, 77.42, -55.8, 0.33)
	pt3dadd(1, 77.75, -55.8, 0.33)
	pt3dadd(0.83, 78.08, -55.8, 0.33)
	pt3dadd(0.67, 78.25, -55.8, 0.33)
	pt3dadd(0.5, 78.42, -55.8, 0.33)
	pt3dadd(0.33, 78.58, -55.8, 0.33)
	pt3dadd(0.33, 78.92, -55.8, 0.33)
	pt3dadd(0.17, 79.25, -55.8, 0.33)
	pt3dadd(0, 79.58, -55.8, 0.33)
	pt3dadd(0, 79.92, -55.8, 0.33)
	pt3dadd(-0.17, 80.25, -55.8, 0.33)
	pt3dadd(-0.17, 80.75, -55.8, 0.33)
	pt3dadd(-0.33, 80.92, -55.8, 0.33)
	pt3dadd(-0.33, 81.25, -55.8, 0.33)
	pt3dadd(-0.5, 81.58, -55.8, 0.33)
	pt3dadd(-0.67, 81.75, -55.8, 0.33)
	pt3dadd(-0.67, 82.08, -55.8, 0.33)
	pt3dadd(-0.83, 82.25, -55.8, 0.33)
	pt3dadd(-1, 82.58, -55.8, 0.33)
	pt3dadd(-1.17, 82.75, -55.8, 0.33)
	pt3dadd(-1.17, 83.08, -55.8, 0.33)
	pt3dadd(-1.33, 83.25, -55.8, 0.33)
	pt3dadd(-1.5, 83.58, -55.8, 0.33)
	pt3dadd(-1.5, 83.92, -55.8, 0.33)
	pt3dadd(-1.67, 84.08, -55.8, 0.33)
	pt3dadd(-1.83, 84.42, -55.8, 0.33)
	pt3dadd(-2, 84.58, -55.8, 0.33)
	pt3dadd(-2, 84.92, -55.8, 0.33)
	pt3dadd(-2.17, 85.08, -55.8, 0.33)
	pt3dadd(-2.33, 85.25, -55.8, 0.33)
	pt3dadd(-2.33, 85.58, -55.8, 0.33)
	pt3dadd(-2.5, 85.75, -55.8, 0.33)
	pt3dadd(-2.67, 86.25, -55.8, 0.33)
  }
}
proc shape3d_33() {
  dend[358] {	pt3dadd(-3.17, 87.08, -55.8, 0.33)
	pt3dadd(-3.33, 87.42, -55.8, 0.33)
	pt3dadd(-3.5, 87.58, -55.8, 0.33)
	pt3dadd(-3.5, 87.92, -55.8, 0.33)
	pt3dadd(-3.67, 88.25, -55.8, 0.33)
	pt3dadd(-3.83, 88.75, -55.8, 0.33)
	pt3dadd(-4, 89.08, -55.8, 0.33)
	pt3dadd(-4, 89.58, -55.8, 0.33)
	pt3dadd(-4.17, 89.92, -55.8, 0.33)
	pt3dadd(-4.33, 90.08, -55.8, 0.33)
	pt3dadd(-4.33, 91.08, -55.8, 0.33)
	pt3dadd(-4.5, 91.42, -55.8, 0.33)
	pt3dadd(-4.5, 92.75, -55.8, 0.33)
	pt3dadd(-4.67, 93.08, -55.8, 0.33)
	pt3dadd(-4.67, 94.75, -55.8, 0.33)
	pt3dadd(-4.83, 94.92, -55.8, 0.33)
	pt3dadd(-4.83, 95.25, -55.8, 0.33)
	pt3dadd(-4.83, 95.08, -55.8, 0.33)
  }
  dend[359] {pt3dclear()
	pt3dadd(-4.83, 95.08, -55.8, 0.33)
	pt3dadd(-4.17, 95.42, -55.8, 0.33)
	pt3dadd(-4.17, 95.92, -55.8, 0.33)
	pt3dadd(-4, 96.08, -55.8, 0.33)
	pt3dadd(-4, 97.25, -55.8, 0.33)
	pt3dadd(-3.83, 97.42, -55.8, 0.33)
	pt3dadd(-3.83, 97.92, -55.8, 0.33)
	pt3dadd(-3.67, 98.25, -55.8, 0.33)
	pt3dadd(-3.5, 98.42, -55.8, 0.33)
	pt3dadd(-3.5, 98.92, -55.8, 0.33)
	pt3dadd(-3.33, 99.25, -55.8, 0.33)
	pt3dadd(-3.33, 99.92, -55.8, 0.33)
	pt3dadd(-3.17, 100.08, -55.8, 0.33)
	pt3dadd(-3.17, 101.92, -55.8, 0.33)
	pt3dadd(-3.33, 102.08, -55.8, 0.33)
	pt3dadd(-3.5, 102.25, -55.8, 0.33)
	pt3dadd(-3.67, 102.42, -55.8, 0.33)
	pt3dadd(-3.83, 102.75, -55.8, 0.33)
	pt3dadd(-4.13, 103.33, -55.8, 0.33)
  }
  dend[360] {pt3dclear()
	pt3dadd(-4.13, 103.33, -55.8, 0.33)
	pt3dadd(-4, 103.08, -55.8, 0.33)
	pt3dadd(-4, 103.58, -55.8, 0.33)
	pt3dadd(-4.17, 103.75, -55.8, 0.33)
	pt3dadd(-4.33, 103.92, -55.8, 0.33)
	pt3dadd(-4.5, 104.08, -55.8, 0.33)
	pt3dadd(-4.67, 104.25, -55.8, 0.33)
	pt3dadd(-4.83, 104.42, -55.8, 0.33)
	pt3dadd(-5, 104.58, -55.8, 0.33)
	pt3dadd(-5, 104.92, -55.8, 0.33)
	pt3dadd(-5.33, 105.08, -55.8, 0.33)
	pt3dadd(-5.5, 105.25, -55.8, 0.33)
	pt3dadd(-5.5, 105.58, -58.32, 0.33)
	pt3dadd(-5.67, 105.75, -58.32, 0.33)
	pt3dadd(-5.67, 106.42, -57.96, 0.33)
	pt3dadd(-5.83, 106.58, -57.96, 0.33)
	pt3dadd(-5.83, 107.42, -57.96, 0.33)
	pt3dadd(-6, 107.75, -57.96, 0.33)
	pt3dadd(-6, 108.08, -57.96, 0.33)
	pt3dadd(-6.33, 108.25, -57.96, 0.33)
	pt3dadd(-6.5, 108.42, -57.96, 0.33)
	pt3dadd(-6.67, 108.58, -57.96, 0.33)
	pt3dadd(-6.83, 108.75, -57.96, 0.33)
	pt3dadd(-7, 108.92, -57.96, 0.33)
	pt3dadd(-7.17, 109.25, -57.96, 0.33)
	pt3dadd(-7.33, 109.42, -57.96, 0.33)
	pt3dadd(-7.5, 109.75, -57.96, 0.33)
	pt3dadd(-7.67, 109.92, -57.96, 0.33)
	pt3dadd(-8, 110.25, -57.96, 0.33)
	pt3dadd(-8, 110.75, -57.96, 0.33)
	pt3dadd(-8.17, 111.08, -57.96, 0.33)
	pt3dadd(-8.33, 111.42, -57.96, 0.33)
	pt3dadd(-8.33, 111.75, -57.96, 0.33)
	pt3dadd(-8.5, 112.08, -57.96, 0.33)
	pt3dadd(-8.67, 112.42, -57.96, 0.33)
	pt3dadd(-8.67, 112.92, -57.96, 0.33)
	pt3dadd(-8.83, 113.25, -57.96, 0.33)
	pt3dadd(-9, 113.42, -57.96, 0.33)
	pt3dadd(-9.17, 113.75, -57.96, 0.33)
	pt3dadd(-9.33, 113.92, -57.96, 0.33)
	pt3dadd(-9.33, 114.25, -57.96, 0.33)
	pt3dadd(-9.5, 114.42, -57.96, 0.33)
	pt3dadd(-9.67, 114.58, -57.96, 0.33)
	pt3dadd(-10, 114.58, -57.96, 0.33)
	pt3dadd(-10.17, 114.92, -57.96, 0.33)
	pt3dadd(-10.33, 115.08, -57.96, 0.33)
	pt3dadd(-10.67, 115.25, -57.96, 0.33)
	pt3dadd(-11.17, 115.75, -57.96, 0.33)
	pt3dadd(-11.5, 116.25, -57.96, 0.33)
	pt3dadd(-11.67, 116.58, -57.96, 0.33)
	pt3dadd(-11.83, 116.58, -57.96, 0.33)
  }
  dend[361] {pt3dclear()
	pt3dadd(-4.13, 103.33, -55.8, 0.33)
	pt3dadd(-4, 102.92, -58.32, 0.33)
	pt3dadd(-3.83, 103.08, -58.32, 0.33)
	pt3dadd(-3.83, 104.42, -58.32, 0.33)
	pt3dadd(-4, 104.58, -58.32, 0.33)
	pt3dadd(-4, 106.25, -58.32, 0.33)
	pt3dadd(-4.17, 106.58, -58.32, 0.33)
	pt3dadd(-4.17, 107.08, -58.32, 0.33)
	pt3dadd(-4.33, 107.42, -58.32, 0.33)
	pt3dadd(-4.5, 107.75, -58.32, 0.33)
	pt3dadd(-4.5, 108.25, -58.32, 0.33)
	pt3dadd(-4.67, 108.42, -58.32, 0.33)
	pt3dadd(-4.67, 108.75, -58.32, 0.33)
	pt3dadd(-4.83, 109.08, -58.32, 0.33)
	pt3dadd(-5, 109.42, -58.32, 0.33)
	pt3dadd(-5, 109.75, -58.32, 0.33)
	pt3dadd(-5.17, 109.92, -58.32, 0.33)
	pt3dadd(-5.5, 110.25, -58.32, 0.33)
	pt3dadd(-5.67, 110.58, -58.32, 0.33)
	pt3dadd(-5.83, 110.75, -58.32, 0.33)
	pt3dadd(-6, 111.08, -58.32, 0.33)
	pt3dadd(-6.33, 111.25, -58.32, 0.33)
	pt3dadd(-6.5, 111.58, -58.32, 0.33)
	pt3dadd(-6.67, 111.75, -58.32, 0.33)
	pt3dadd(-7, 111.92, -58.32, 0.33)
	pt3dadd(-7.17, 112.08, -58.32, 0.33)
	pt3dadd(-7.33, 112.42, -58.32, 0.33)
	pt3dadd(-7.67, 112.58, -58.32, 0.33)
	pt3dadd(-7.83, 112.75, -58.32, 0.33)
	pt3dadd(-8, 112.92, -58.32, 0.33)
	pt3dadd(-8, 113.25, -58.32, 0.33)
	pt3dadd(-8.17, 113.58, -58.32, 0.33)
	pt3dadd(-8.17, 114.08, -58.32, 0.33)
	pt3dadd(-8.33, 114.42, -58.32, 0.33)
	pt3dadd(-8.33, 115.08, -58.32, 0.33)
	pt3dadd(-8.5, 115.25, -58.32, 0.33)
	pt3dadd(-8.5, 116.08, -58.32, 0.33)
  }
  dend[362] {pt3dclear()
	pt3dadd(-4.83, 95.08, -55.8, 0.33)
	pt3dadd(-4.67, 95.25, -55.8, 0.33)
	pt3dadd(-4.83, 95.42, -55.8, 0.33)
	pt3dadd(-4.83, 95.75, -55.8, 0.33)
	pt3dadd(-5, 95.92, -55.8, 0.33)
	pt3dadd(-5.17, 96.08, -55.8, 0.33)
	pt3dadd(-5.33, 96.42, -55.8, 0.33)
	pt3dadd(-5.5, 96.58, -55.8, 0.33)
	pt3dadd(-5.67, 96.75, -55.8, 0.33)
	pt3dadd(-5.83, 96.92, -55.8, 0.33)
	pt3dadd(-6, 97.25, -55.8, 0.33)
  }
  dend[363] {pt3dclear()
	pt3dadd(-6, 97.25, -55.8, 0.33)
	pt3dadd(-5.36, 97.41, -55.8, 0.33)
  }
  dend[364] {pt3dclear()
	pt3dadd(-5.36, 97.41, -55.8, 0.33)
	pt3dadd(-5.67, 97.42, -55.8, 0.33)
	pt3dadd(-6, 97.58, -55.8, 0.33)
	pt3dadd(-6.17, 97.75, -55.8, 0.33)
	pt3dadd(-6.33, 97.92, -55.8, 0.33)
	pt3dadd(-6.67, 97.92, -55.8, 0.33)
	pt3dadd(-6.83, 98.08, -55.8, 0.33)
	pt3dadd(-7.17, 98.25, -55.8, 0.33)
	pt3dadd(-7.5, 98.42, -55.8, 0.33)
	pt3dadd(-7.67, 98.58, -55.8, 0.33)
	pt3dadd(-8, 98.75, -55.8, 0.33)
	pt3dadd(-8.17, 98.92, -55.8, 0.33)
	pt3dadd(-8.33, 99.08, -55.8, 0.33)
	pt3dadd(-8.5, 99.25, -55.8, 0.33)
	pt3dadd(-8.67, 99.42, -55.8, 0.33)
	pt3dadd(-8.67, 99.75, -55.8, 0.33)
	pt3dadd(-8.83, 100.08, -55.8, 0.33)
	pt3dadd(-9, 100.25, -55.8, 0.33)
	pt3dadd(-9.17, 100.58, -55.8, 0.33)
	pt3dadd(-9.33, 100.92, -55.8, 0.33)
	pt3dadd(-9.33, 102.42, -55.8, 0.33)
	pt3dadd(-9.5, 102.75, -55.8, 0.33)
	pt3dadd(-9.5, 105.25, -55.8, 0.33)
	pt3dadd(-9.67, 105.42, -55.8, 0.33)
	pt3dadd(-9.67, 107.25, -55.8, 0.33)
	pt3dadd(-9.83, 107.42, -55.8, 0.33)
	pt3dadd(-9.83, 108.42, -55.8, 0.33)
	pt3dadd(-10, 108.42, -55.8, 0.33)
  }
  dend[365] {pt3dclear()
	pt3dadd(-10, 108.42, -55.8, 0.33)
	pt3dadd(-10.17, 108.08, -55.8, 0.33)
	pt3dadd(-10.33, 108.42, -55.8, 0.33)
	pt3dadd(-10.67, 108.58, -55.8, 0.33)
	pt3dadd(-11, 109.08, -55.8, 0.33)
	pt3dadd(-11.83, 109.92, -55.8, 0.33)
	pt3dadd(-12, 110.08, -55.8, 0.33)
	pt3dadd(-12, 110.42, -55.8, 0.33)
	pt3dadd(-12.17, 110.58, -55.8, 0.33)
	pt3dadd(-12.33, 110.92, -55.8, 0.33)
	pt3dadd(-12.33, 112.25, -55.8, 0.33)
	pt3dadd(-12.5, 112.42, -55.8, 0.33)
	pt3dadd(-12.5, 117.75, -55.8, 0.33)
  }
  dend[366] {pt3dclear()
	pt3dadd(-10, 108.42, -55.8, 0.33)
	pt3dadd(-9.67, 108.42, -56.52, 0.33)
	pt3dadd(-9.67, 109.58, -56.52, 0.33)
	pt3dadd(-9.83, 109.75, -56.52, 0.33)
	pt3dadd(-9.83, 112.08, -57.6, 0.33)
	pt3dadd(-9.67, 112.25, -57.6, 0.33)
	pt3dadd(-9.67, 112.58, -57.6, 0.33)
	pt3dadd(-9.5, 112.92, -57.6, 0.33)
	pt3dadd(-9.5, 113.25, -57.6, 0.33)
	pt3dadd(-9.33, 113.42, -57.6, 0.33)
	pt3dadd(-9.33, 114.58, -57.6, 0.33)
	pt3dadd(-9.17, 114.75, -57.6, 0.33)
	pt3dadd(-9.17, 120.58, -57.6, 0.33)
  }
  dend[367] {pt3dclear()
	pt3dadd(-9.17, 120.58, -57.6, 0.33)
	pt3dadd(-8.5, 120.25, -57.6, 0.33)
	pt3dadd(-8.5, 121.08, -57.6, 0.33)
	pt3dadd(-8.67, 121.42, -57.6, 0.33)
	pt3dadd(-8.67, 122.92, -57.6, 0.33)
	pt3dadd(-8.83, 123.25, -57.6, 0.33)
	pt3dadd(-8.83, 124.42, -57.6, 0.33)
	pt3dadd(-9, 124.58, -57.6, 0.33)
  }
}
proc shape3d_34() {
  dend[367] {	pt3dadd(-9, 125.58, -57.6, 0.33)
	pt3dadd(-9.17, 125.92, -57.6, 0.33)
	pt3dadd(-9.17, 126.08, -57.6, 0.33)
  }
  dend[368] {pt3dclear()
	pt3dadd(-9.17, 120.58, -57.6, 0.33)
	pt3dadd(-8.67, 120.25, -60.12, 0.33)
	pt3dadd(-8.5, 120.42, -60.12, 0.33)
	pt3dadd(-8.33, 120.58, -60.12, 0.33)
	pt3dadd(-8.17, 120.75, -60.12, 0.33)
	pt3dadd(-7.5, 121.42, -60.12, 0.33)
	pt3dadd(-7.33, 121.58, -60.12, 0.33)
	pt3dadd(-7.17, 121.75, -60.12, 0.33)
	pt3dadd(-7.17, 123.42, -60.12, 0.33)
	pt3dadd(-7.33, 123.75, -60.12, 0.33)
	pt3dadd(-7.33, 124.08, -60.12, 0.33)
	pt3dadd(-7.5, 124.25, -60.12, 0.33)
	pt3dadd(-7.5, 124.92, -60.12, 0.33)
	pt3dadd(-7.67, 125.08, -60.12, 0.33)
	pt3dadd(-7.67, 125.75, -60.12, 0.33)
	pt3dadd(-7.83, 125.92, -60.12, 0.33)
	pt3dadd(-7.83, 128.75, -60.12, 0.33)
	pt3dadd(-7.5, 128.75, -60.12, 0.33)
	pt3dadd(-7.33, 129.08, -60.12, 0.33)
	pt3dadd(-7.17, 129.25, -60.12, 0.33)
	pt3dadd(-7, 129.25, -60.12, 0.33)
  }
  dend[369] {pt3dclear()
	pt3dadd(-5.36, 97.41, -55.8, 0.33)
	pt3dadd(-6, 97.08, -55.44, 0.33)
	pt3dadd(-6, 97.75, -55.44, 0.33)
	pt3dadd(-5.83, 97.92, -55.44, 0.33)
	pt3dadd(-5.83, 98.58, -55.44, 0.33)
	pt3dadd(-5.67, 98.92, -55.44, 0.33)
	pt3dadd(-5.83, 99.25, -55.44, 0.33)
	pt3dadd(-6, 99.42, -55.44, 0.33)
	pt3dadd(-6, 99.92, -55.44, 0.33)
	pt3dadd(-6.17, 100.25, -55.44, 0.33)
	pt3dadd(-6.33, 100.58, -55.44, 0.33)
	pt3dadd(-6.33, 104.42, -55.8, 0.33)
	pt3dadd(-6.5, 104.58, -55.8, 0.33)
	pt3dadd(-6.67, 104.75, -55.8, 0.33)
	pt3dadd(-6.67, 105.25, -55.8, 0.33)
	pt3dadd(-6.83, 105.58, -55.8, 0.33)
	pt3dadd(-7, 105.75, -55.8, 0.33)
	pt3dadd(-7, 106.08, -55.8, 0.33)
	pt3dadd(-7.17, 106.42, -55.8, 0.33)
	pt3dadd(-7.17, 106.75, -55.8, 0.33)
	pt3dadd(-7.33, 107.08, -55.8, 0.33)
	pt3dadd(-7.33, 107.58, -55.8, 0.33)
	pt3dadd(-7.5, 107.75, -55.8, 0.33)
	pt3dadd(-7.5, 109.58, -55.8, 0.33)
	pt3dadd(-7.33, 109.92, -55.8, 0.33)
	pt3dadd(-7.33, 110.42, -55.8, 0.33)
	pt3dadd(-7.17, 110.58, -55.8, 0.33)
	pt3dadd(-7, 110.92, -55.8, 0.33)
	pt3dadd(-7, 111.25, -55.8, 0.33)
	pt3dadd(-6.83, 111.42, -55.8, 0.33)
	pt3dadd(-6.83, 111.75, -55.8, 0.33)
	pt3dadd(-6.67, 112.08, -55.8, 0.33)
	pt3dadd(-6.67, 113.25, -55.8, 0.33)
	pt3dadd(-6.5, 113.58, -55.8, 0.33)
	pt3dadd(-6.5, 116.75, -55.8, 0.33)
	pt3dadd(-6.5, 116.58, -55.8, 0.33)
  }
  dend[370] {pt3dclear()
	pt3dadd(-6, 97.25, -55.8, 0.33)
	pt3dadd(-6, 97.42, -52.92, 0.33)
	pt3dadd(-6.33, 97.58, -52.92, 0.33)
	pt3dadd(-6.5, 97.75, -52.92, 0.33)
	pt3dadd(-6.83, 97.75, -52.92, 0.33)
	pt3dadd(-7.17, 98.08, -52.92, 0.33)
	pt3dadd(-7.5, 98.25, -52.92, 0.33)
	pt3dadd(-7.67, 98.42, -52.92, 0.33)
	pt3dadd(-7.83, 98.58, -52.92, 0.33)
	pt3dadd(-8, 98.75, -52.2, 0.33)
	pt3dadd(-8.17, 98.92, -51.84, 0.33)
	pt3dadd(-8.33, 99.08, -51.84, 0.33)
	pt3dadd(-8.67, 99.25, -51.84, 0.33)
	pt3dadd(-8.83, 99.42, -51.84, 0.33)
	pt3dadd(-9, 99.58, -51.84, 0.33)
	pt3dadd(-9.33, 99.58, -51.84, 0.33)
	pt3dadd(-9.5, 99.75, -51.84, 0.33)
	pt3dadd(-9.83, 99.92, -51.84, 0.33)
	pt3dadd(-10, 100.08, -51.84, 0.33)
	pt3dadd(-10.17, 100.25, -51.84, 0.33)
	pt3dadd(-10.33, 100.42, -51.84, 0.33)
	pt3dadd(-10.5, 100.75, -51.84, 0.33)
	pt3dadd(-10.67, 101.08, -51.84, 0.33)
	pt3dadd(-10.83, 101.25, -51.84, 0.33)
	pt3dadd(-11, 101.42, -51.84, 0.33)
	pt3dadd(-11.17, 101.75, -51.84, 0.33)
	pt3dadd(-11.33, 101.92, -51.84, 0.33)
	pt3dadd(-11.67, 102.25, -51.84, 0.33)
	pt3dadd(-11.83, 102.58, -51.84, 0.33)
	pt3dadd(-12, 102.75, -51.84, 0.33)
	pt3dadd(-12.17, 102.92, -51.84, 0.33)
	pt3dadd(-12.17, 103.25, -51.84, 0.33)
	pt3dadd(-12.33, 103.42, -51.84, 0.33)
	pt3dadd(-12.5, 103.58, -51.84, 0.33)
	pt3dadd(-12.83, 103.92, -51.84, 0.33)
	pt3dadd(-13, 104.08, -51.84, 0.33)
	pt3dadd(-13.5, 104.58, -51.84, 0.33)
	pt3dadd(-13.67, 104.75, -51.84, 0.33)
	pt3dadd(-13.67, 105.08, -51.84, 0.33)
	pt3dadd(-13.83, 105.25, -51.84, 0.33)
	pt3dadd(-14, 105.42, -51.84, 0.33)
	pt3dadd(-14.17, 105.58, -51.84, 0.33)
	pt3dadd(-14.17, 105.92, -51.84, 0.33)
	pt3dadd(-14.33, 106.08, -51.84, 0.33)
	pt3dadd(-14.5, 106.25, -51.84, 0.33)
	pt3dadd(-14.5, 106.92, -51.84, 0.33)
	pt3dadd(-14.67, 107.25, -51.84, 0.33)
	pt3dadd(-14.67, 107.75, -51.84, 0.33)
	pt3dadd(-14.83, 108.08, -51.84, 0.33)
	pt3dadd(-15, 108.42, -51.84, 0.33)
	pt3dadd(-15, 108.92, -51.84, 0.33)
	pt3dadd(-15.17, 109.25, -51.84, 0.33)
	pt3dadd(-15.33, 109.42, -51.84, 0.33)
	pt3dadd(-15.33, 109.75, -51.84, 0.33)
	pt3dadd(-15.5, 109.92, -51.84, 0.33)
	pt3dadd(-15.67, 110.08, -51.84, 0.33)
	pt3dadd(-15.67, 110.42, -51.84, 0.33)
	pt3dadd(-15.83, 110.75, -51.84, 0.33)
	pt3dadd(-16.17, 111.08, -51.84, 0.33)
	pt3dadd(-16.32, 111.25, -51.84, 0.33)
	pt3dadd(-16.32, 111.58, -51.84, 0.33)
	pt3dadd(-16.5, 111.92, -51.84, 0.33)
	pt3dadd(-16.67, 112.08, -51.84, 0.33)
	pt3dadd(-16.82, 112.08, -51.84, 0.33)
  }
  dend[371] {pt3dclear()
	pt3dadd(12.33, 56.5, -50.76, 1.83)
	pt3dadd(12.5, 56.42, -58.32, 1)
	pt3dadd(12.67, 56.58, -58.32, 1)
	pt3dadd(12.67, 56.92, -58.32, 1)
	pt3dadd(12.83, 57.08, -58.32, 1)
	pt3dadd(13, 57.25, -58.32, 1)
	pt3dadd(13, 57.58, -58.32, 1)
	pt3dadd(13.17, 57.92, -58.32, 1)
	pt3dadd(13.33, 58.25, -58.32, 1)
	pt3dadd(13.5, 58.42, -58.32, 1)
	pt3dadd(13.67, 58.58, -58.32, 1)
	pt3dadd(13.83, 58.92, -58.32, 1)
	pt3dadd(14, 59.25, -58.32, 1)
	pt3dadd(14.17, 59.58, -58.32, 1)
	pt3dadd(14.17, 60.58, -58.32, 1)
	pt3dadd(14, 60.42, -58.32, 1)
  }
  dend[372] {pt3dclear()
	pt3dadd(14, 60.42, -58.32, 1)
	pt3dadd(13.83, 60.58, -56.88, 1)
	pt3dadd(13.83, 61.42, -56.88, 1)
	pt3dadd(13.67, 61.58, -56.88, 1)
	pt3dadd(13.5, 61.92, -56.88, 1)
	pt3dadd(13.33, 62.08, -56.88, 1)
	pt3dadd(13.33, 62.42, -56.88, 1)
	pt3dadd(13.17, 62.58, -56.88, 1)
	pt3dadd(13, 62.92, -56.88, 1)
	pt3dadd(12.83, 63.25, -56.88, 1)
	pt3dadd(12.67, 63.42, -56.88, 1)
	pt3dadd(12.67, 63.92, -56.88, 1)
	pt3dadd(12.5, 64.08, -56.88, 1)
	pt3dadd(12.5, 64.75, -56.88, 1)
	pt3dadd(12.33, 65.08, -56.88, 1)
	pt3dadd(12.17, 65.25, -56.88, 1)
	pt3dadd(12.17, 65.92, -56.88, 1)
	pt3dadd(12, 66.08, -56.88, 1)
	pt3dadd(12, 66.42, -56.88, 1)
	pt3dadd(11.83, 66.75, -56.88, 1)
	pt3dadd(11.83, 67.25, -56.88, 1)
	pt3dadd(11.67, 67.58, -56.88, 1)
	pt3dadd(11.67, 67.92, -56.88, 1)
	pt3dadd(11.5, 68.25, -56.88, 1)
	pt3dadd(11.5, 68.58, -56.88, 1)
	pt3dadd(11.33, 68.75, -56.88, 1)
	pt3dadd(11.33, 69.08, -56.88, 1)
	pt3dadd(11.17, 69.25, -56.88, 1)
	pt3dadd(11.17, 69.58, -56.88, 1)
	pt3dadd(11, 69.92, -56.88, 1)
	pt3dadd(11, 71.25, -56.88, 1)
	pt3dadd(10.83, 71.58, -56.88, 1)
	pt3dadd(10.83, 72.75, -56.88, 1)
	pt3dadd(10.67, 72.58, -56.88, 1)
  }
  dend[373] {pt3dclear()
	pt3dadd(10.67, 72.58, -56.88, 1)
	pt3dadd(10.5, 72.58, -57.96, 1)
	pt3dadd(10.33, 72.92, -57.96, 1)
	pt3dadd(10, 73.25, -57.96, 1)
	pt3dadd(9.83, 73.42, -57.96, 1)
	pt3dadd(9.67, 73.58, -57.96, 1)
	pt3dadd(9.67, 74.08, -57.96, 1)
	pt3dadd(9.5, 74.42, -57.96, 1)
	pt3dadd(9.33, 74.58, -57.96, 1)
	pt3dadd(9.17, 74.75, -57.96, 1)
	pt3dadd(9, 74.92, -57.96, 1)
	pt3dadd(8.83, 75.25, -57.96, 1)
	pt3dadd(8.83, 75.58, -57.96, 1)
	pt3dadd(8.67, 75.75, -57.96, 1)
	pt3dadd(8.5, 75.92, -57.96, 1)
	pt3dadd(8.5, 76.42, -57.96, 1)
  }
  dend[374] {pt3dclear()
	pt3dadd(8.5, 76.42, -57.96, 1)
	pt3dadd(9, 76.58, -57.96, 1)
	pt3dadd(9, 76.92, -57.96, 1)
	pt3dadd(9.17, 77.25, -57.96, 1)
	pt3dadd(9.33, 77.58, -57.96, 1)
	pt3dadd(9.33, 77.92, -57.96, 1)
	pt3dadd(9.5, 78.08, -57.96, 1)
	pt3dadd(9.5, 78.58, -57.96, 1)
	pt3dadd(9.67, 78.75, -57.96, 1)
	pt3dadd(9.67, 79.08, -57.96, 1)
  }
}
proc shape3d_35() {
  dend[374] {	pt3dadd(9.83, 79.25, -57.96, 1)
	pt3dadd(10, 79.42, -57.96, 1)
	pt3dadd(10, 79.75, -57.96, 1)
  }
  dend[375] {pt3dclear()
	pt3dadd(10, 79.75, -57.96, 1)
	pt3dadd(10.5, 79.75, -57.96, 1)
	pt3dadd(10.33, 80.08, -57.96, 1)
	pt3dadd(10.17, 80.42, -57.96, 1)
	pt3dadd(9.83, 80.75, -57.96, 1)
	pt3dadd(9.67, 81.08, -57.96, 1)
	pt3dadd(9.67, 81.42, -57.96, 1)
	pt3dadd(9.5, 81.58, -57.96, 1)
	pt3dadd(9.33, 81.92, -57.96, 1)
	pt3dadd(9.33, 82.42, -57.96, 1)
	pt3dadd(9.17, 82.75, -57.96, 1)
	pt3dadd(9.17, 83.58, -57.96, 1)
	pt3dadd(9, 83.75, -57.96, 1)
  }
  dend[376] {pt3dclear()
	pt3dadd(10, 79.75, -57.96, 1)
	pt3dadd(10.17, 79.75, -60.48, 1)
	pt3dadd(10.33, 79.92, -60.48, 1)
	pt3dadd(10.67, 79.92, -60.48, 1)
	pt3dadd(11, 80.08, -60.48, 1)
	pt3dadd(11.17, 80.25, -60.48, 1)
	pt3dadd(11.5, 80.25, -60.48, 1)
	pt3dadd(11.67, 80.42, -60.48, 1)
	pt3dadd(11.67, 80.75, -60.48, 1)
	pt3dadd(11.83, 81.08, -60.48, 1)
	pt3dadd(12, 81.25, -60.48, 1)
	pt3dadd(12, 81.58, -60.48, 1)
	pt3dadd(12.17, 81.75, -60.48, 1)
	pt3dadd(12.33, 82.08, -60.48, 1)
	pt3dadd(12.33, 84.42, -60.48, 1)
	pt3dadd(12.17, 84.42, -60.48, 1)
  }
  dend[377] {pt3dclear()
	pt3dadd(8.5, 76.42, -57.96, 1)
	pt3dadd(8.67, 76.25, -57.24, 1)
	pt3dadd(8.5, 76.58, -57.24, 1)
	pt3dadd(8.17, 76.92, -57.24, 1)
	pt3dadd(8, 77.08, -57.24, 1)
	pt3dadd(7.83, 77.25, -57.24, 1)
	pt3dadd(7.67, 77.58, -57.24, 1)
	pt3dadd(7.67, 77.92, -57.24, 1)
	pt3dadd(7.5, 78.25, -57.24, 1)
	pt3dadd(7.33, 78.58, -57.24, 1)
	pt3dadd(7.17, 78.75, -57.24, 1)
	pt3dadd(7, 78.92, -57.24, 1)
	pt3dadd(6.83, 79.08, -57.24, 1)
  }
  dend[378] {pt3dclear()
	pt3dadd(6.83, 79.08, -57.24, 1)
	pt3dadd(7.5, 78.92, -57.24, 1)
	pt3dadd(5.17, 78.92, -57.24, 1)
	pt3dadd(4.83, 79.08, -57.24, 1)
	pt3dadd(4.67, 79.25, -57.24, 1)
	pt3dadd(4.5, 79.42, -57.24, 1)
	pt3dadd(4.33, 79.58, -57.24, 1)
	pt3dadd(4, 79.75, -57.24, 1)
	pt3dadd(3.67, 79.92, -57.24, 1)
	pt3dadd(3.5, 80.08, -57.24, 1)
	pt3dadd(3.33, 80.25, -57.24, 1)
	pt3dadd(3.17, 80.58, -57.24, 1)
	pt3dadd(3, 80.75, -57.24, 1)
	pt3dadd(2.83, 80.92, -57.24, 1)
	pt3dadd(2.67, 81.08, -57.24, 1)
	pt3dadd(2.5, 81.42, -57.24, 1)
	pt3dadd(2.33, 81.58, -57.24, 1)
	pt3dadd(2.33, 81.92, -57.24, 1)
	pt3dadd(2.17, 82.08, -57.24, 1)
	pt3dadd(2, 82.25, -57.24, 1)
	pt3dadd(1.83, 82.42, -57.24, 1)
	pt3dadd(1.67, 82.58, -57.24, 1)
	pt3dadd(1.67, 82.92, -57.24, 1)
	pt3dadd(1.5, 83.08, -57.24, 1)
	pt3dadd(1.33, 83.08, -57.24, 1)
  }
  dend[379] {pt3dclear()
	pt3dadd(1.33, 83.08, -57.24, 1)
	pt3dadd(1.67, 82.92, -57.24, 1)
	pt3dadd(1.5, 83.08, -57.24, 1)
	pt3dadd(1.17, 83.25, -57.24, 1)
	pt3dadd(0.83, 83.42, -57.24, 1)
	pt3dadd(0.5, 83.58, -57.24, 1)
	pt3dadd(0.33, 83.75, -57.24, 1)
	pt3dadd(0.17, 84.08, -57.24, 1)
	pt3dadd(0, 84.25, -57.24, 1)
	pt3dadd(-0.17, 84.58, -57.24, 1)
	pt3dadd(-0.33, 84.75, -57.24, 1)
	pt3dadd(-0.33, 85.08, -57.24, 1)
	pt3dadd(-0.5, 85.42, -57.24, 1)
	pt3dadd(-0.67, 85.58, -57.6, 1)
	pt3dadd(-0.83, 85.92, -57.6, 1)
	pt3dadd(-0.83, 86.25, -57.6, 1)
	pt3dadd(-1, 86.42, -57.6, 1)
	pt3dadd(-1, 86.75, -57.6, 1)
	pt3dadd(-1.17, 86.92, -57.6, 1)
	pt3dadd(-1.33, 87.08, -57.6, 1)
	pt3dadd(-1.33, 87.75, -57.6, 1)
	pt3dadd(-1.17, 88.08, -57.6, 1)
	pt3dadd(-1, 88.25, -57.6, 1)
	pt3dadd(-1, 89.42, -57.6, 1)
  }
  dend[380] {pt3dclear()
	pt3dadd(-1, 89.42, -57.6, 1)
	pt3dadd(-0.5, 89.42, -57.6, 1)
	pt3dadd(-1.17, 89.42, -57.6, 1)
	pt3dadd(-1.33, 89.58, -57.6, 1)
	pt3dadd(-1.67, 89.75, -57.6, 1)
	pt3dadd(-2, 89.92, -57.6, 1)
	pt3dadd(-2.17, 90.08, -57.6, 1)
	pt3dadd(-2.17, 90.42, -57.6, 1)
	pt3dadd(-2.33, 90.58, -57.6, 1)
	pt3dadd(-2.5, 90.75, -57.6, 1)
	pt3dadd(-2.67, 91.08, -57.6, 1)
	pt3dadd(-2.67, 91.75, -57.6, 1)
	pt3dadd(-2.83, 92.08, -57.6, 1)
	pt3dadd(-2.83, 92.75, -57.6, 1)
	pt3dadd(-3, 92.92, -57.6, 1)
	pt3dadd(-3, 94.75, -57.6, 1)
	pt3dadd(-2.83, 94.92, -57.6, 1)
	pt3dadd(-2.83, 95.25, -57.6, 1)
	pt3dadd(-2.67, 95.58, -57.6, 1)
	pt3dadd(-2.67, 96.08, -57.6, 1)
	pt3dadd(-2.5, 96.25, -57.6, 1)
	pt3dadd(-2.5, 96.92, -57.6, 1)
  }
  dend[381] {pt3dclear()
	pt3dadd(-1, 89.42, -57.6, 1)
	pt3dadd(-0.83, 89.42, -56.88, 1)
	pt3dadd(-0.83, 89.92, -56.88, 1)
	pt3dadd(-1, 90.25, -56.88, 1)
	pt3dadd(-1, 90.75, -56.88, 1)
	pt3dadd(-1.17, 90.92, -56.88, 1)
	pt3dadd(-1.17, 92.92, -56.88, 1)
	pt3dadd(-1, 93.25, -56.88, 1)
	pt3dadd(-1, 94.08, -56.88, 1)
	pt3dadd(-0.83, 94.25, -56.88, 1)
	pt3dadd(-0.83, 95.58, -56.88, 1)
	pt3dadd(-1, 95.75, -56.88, 1)
	pt3dadd(-1, 96.42, -56.88, 1)
	pt3dadd(-1.17, 96.58, -56.88, 1)
	pt3dadd(-1.33, 96.75, -56.88, 1)
  }
  dend[382] {pt3dclear()
	pt3dadd(1.33, 83.08, -57.24, 1)
	pt3dadd(1.67, 82.92, -57.6, 0.5)
	pt3dadd(1.67, 83.92, -57.6, 0.5)
	pt3dadd(1.5, 84.42, -57.6, 0.5)
	pt3dadd(1.33, 84.75, -57.6, 0.5)
	pt3dadd(1.17, 84.92, -57.6, 0.5)
	pt3dadd(1.17, 85.92, -57.6, 0.5)
	pt3dadd(1, 86.42, -57.6, 0.5)
	pt3dadd(1, 87.75, -57.6, 0.5)
	pt3dadd(1.17, 87.92, -57.6, 0.5)
	pt3dadd(1.17, 88.25, -57.6, 0.5)
	pt3dadd(1.33, 88.58, -57.6, 0.5)
	pt3dadd(1.33, 88.92, -57.6, 0.5)
	pt3dadd(1.17, 89.08, -57.6, 0.5)
	pt3dadd(1.17, 89.92, -57.6, 0.5)
	pt3dadd(1, 89.92, -57.6, 0.5)
  }
  dend[383] {pt3dclear()
	pt3dadd(1, 89.92, -57.6, 0.5)
	pt3dadd(1.33, 89.58, -57.6, 0.5)
	pt3dadd(1.17, 89.92, -57.6, 0.5)
	pt3dadd(1, 90.25, -57.6, 0.5)
	pt3dadd(0.83, 90.42, -57.6, 0.5)
	pt3dadd(0.67, 90.58, -57.6, 0.5)
	pt3dadd(0.5, 90.75, -57.6, 0.5)
	pt3dadd(0.33, 90.92, -57.6, 0.5)
	pt3dadd(0.33, 91.25, -57.6, 0.5)
	pt3dadd(0.17, 91.42, -57.6, 0.5)
	pt3dadd(0, 91.75, -57.6, 0.5)
	pt3dadd(0, 92.42, -57.6, 0.5)
	pt3dadd(-0.17, 92.75, -57.6, 0.5)
	pt3dadd(-0.33, 92.92, -57.6, 0.5)
	pt3dadd(-0.33, 93.25, -57.6, 0.5)
	pt3dadd(-0.5, 93.42, -57.6, 0.5)
	pt3dadd(-0.83, 93.58, -57.6, 0.5)
	pt3dadd(-1, 93.75, -57.6, 0.5)
	pt3dadd(-1.17, 93.92, -57.6, 0.5)
	pt3dadd(-1.33, 94.08, -57.6, 0.5)
	pt3dadd(-1.33, 94.25, -57.6, 0.5)
  }
  dend[384] {pt3dclear()
	pt3dadd(1, 89.92, -57.6, 0.5)
	pt3dadd(1, 89.92, -56.88, 0.5)
	pt3dadd(1.17, 90.08, -56.88, 0.5)
	pt3dadd(1.17, 90.75, -56.88, 0.5)
	pt3dadd(1.33, 91.08, -56.88, 0.5)
	pt3dadd(1.5, 91.25, -56.88, 0.5)
	pt3dadd(1.67, 91.58, -56.88, 0.5)
	pt3dadd(1.83, 91.75, -56.88, 0.5)
	pt3dadd(2, 92.08, -56.88, 0.5)
  }
  dend[385] {pt3dclear()
	pt3dadd(2, 92.08, -56.88, 0.5)
	pt3dadd(2.5, 92.25, -56.88, 0.5)
	pt3dadd(2.83, 92.25, -56.88, 0.5)
	pt3dadd(3, 92.08, -56.88, 0.5)
	pt3dadd(3.5, 92.08, -56.88, 0.5)
	pt3dadd(3.67, 91.92, -56.88, 0.5)
	pt3dadd(7, 91.92, -56.88, 0.5)
	pt3dadd(7.5, 91.75, -56.88, 0.5)
	pt3dadd(7.67, 91.58, -56.88, 0.5)
	pt3dadd(8.33, 91.58, -56.88, 0.5)
	pt3dadd(8.5, 91.42, -56.88, 0.5)
	pt3dadd(11.33, 91.42, -56.88, 0.5)
	pt3dadd(11.67, 91.58, -56.88, 0.5)
	pt3dadd(12, 91.58, -56.88, 0.5)
	pt3dadd(12.17, 91.75, -56.88, 0.5)
	pt3dadd(12.33, 91.92, -56.88, 0.5)
	pt3dadd(12.67, 92.08, -56.88, 0.5)
	pt3dadd(12.83, 92.25, -56.88, 0.5)
	pt3dadd(13, 92.42, -56.88, 0.5)
	pt3dadd(13.33, 92.42, -56.88, 0.5)
	pt3dadd(13.5, 92.58, -56.88, 0.5)
	pt3dadd(13.67, 92.75, -56.88, 0.5)
	pt3dadd(14, 92.92, -56.88, 0.5)
  }
}
proc shape3d_36() {
  dend[385] {	pt3dadd(14.33, 92.92, -56.88, 0.5)
	pt3dadd(14.5, 93.08, -56.88, 0.5)
  }
  dend[386] {pt3dclear()
	pt3dadd(2, 92.08, -56.88, 0.5)
	pt3dadd(2, 92.08, -56.16, 0.5)
	pt3dadd(2, 92.92, -56.16, 0.5)
	pt3dadd(1.83, 93.08, -56.16, 0.5)
	pt3dadd(1.67, 93.25, -56.16, 0.5)
	pt3dadd(1.67, 93.58, -56.16, 0.5)
	pt3dadd(1.5, 93.75, -56.16, 0.5)
	pt3dadd(1.33, 93.92, -56.16, 0.5)
	pt3dadd(1.33, 94.25, -56.16, 0.5)
	pt3dadd(1.17, 94.58, -56.52, 0.5)
	pt3dadd(1.17, 94.92, -56.52, 0.5)
	pt3dadd(1.33, 95.08, -56.52, 0.5)
	pt3dadd(1.33, 95.42, -56.52, 0.5)
	pt3dadd(1.5, 95.58, -56.52, 0.5)
	pt3dadd(1.5, 96.58, -56.52, 0.5)
	pt3dadd(1.33, 96.75, -56.52, 0.5)
	pt3dadd(1.17, 97.08, -56.52, 0.5)
	pt3dadd(1, 97.25, -56.52, 0.5)
	pt3dadd(0.83, 97.42, -56.52, 0.5)
	pt3dadd(0.67, 97.58, -56.52, 0.5)
	pt3dadd(0.5, 97.75, -56.52, 0.5)
	pt3dadd(0.33, 98.08, -56.52, 0.5)
	pt3dadd(0.33, 98.42, -56.52, 0.5)
	pt3dadd(0.17, 98.58, -56.52, 0.5)
	pt3dadd(0.17, 98.92, -56.52, 0.5)
	pt3dadd(0, 99.08, -56.88, 0.5)
	pt3dadd(0, 99.42, -56.88, 0.5)
	pt3dadd(-0.17, 99.58, -56.52, 0.5)
	pt3dadd(-0.33, 99.92, -56.52, 0.5)
	pt3dadd(-0.33, 100.25, -56.52, 0.5)
	pt3dadd(-0.5, 100.42, -58.32, 0.5)
	pt3dadd(-0.67, 100.58, -58.32, 0.5)
	pt3dadd(-0.67, 100.92, -58.32, 0.5)
	pt3dadd(-0.83, 101.08, -58.32, 0.5)
	pt3dadd(-1, 101.42, -58.32, 0.5)
	pt3dadd(-1, 101.92, -58.32, 0.5)
	pt3dadd(-1.17, 102.08, -58.32, 0.5)
	pt3dadd(-1.17, 102.75, -58.32, 0.5)
	pt3dadd(-1.33, 103.08, -58.32, 0.5)
	pt3dadd(-1.33, 103.75, -58.32, 0.5)
	pt3dadd(-1.5, 103.92, -58.32, 0.5)
	pt3dadd(-1.5, 104.42, -58.32, 0.5)
	pt3dadd(-1.67, 104.75, -58.32, 0.5)
	pt3dadd(-1.67, 105.08, -58.32, 0.5)
	pt3dadd(-1.83, 105.25, -58.32, 0.5)
	pt3dadd(-1.83, 105.58, -58.32, 0.5)
	pt3dadd(-2, 105.92, -58.32, 0.5)
	pt3dadd(-2, 106.75, -58.32, 0.5)
	pt3dadd(-2.17, 107.08, -58.32, 0.5)
	pt3dadd(-2.17, 108.25, -58.32, 0.5)
	pt3dadd(-2.33, 108.42, -58.32, 0.5)
	pt3dadd(-2.33, 109.08, -58.32, 0.5)
	pt3dadd(-2.5, 109.25, -58.32, 0.5)
	pt3dadd(-2.5, 109.58, -58.32, 0.5)
	pt3dadd(-2.67, 109.75, -58.32, 0.5)
	pt3dadd(-2.83, 109.92, -58.32, 0.5)
	pt3dadd(-2.83, 110.25, -58.32, 0.5)
	pt3dadd(-3, 110.58, -58.32, 0.5)
	pt3dadd(-3.17, 110.75, -58.32, 0.5)
	pt3dadd(-3.33, 111.08, -58.32, 0.5)
	pt3dadd(-3.5, 111.42, -58.32, 0.5)
	pt3dadd(-3.67, 111.58, -58.32, 0.5)
	pt3dadd(-3.67, 111.92, -58.32, 0.5)
	pt3dadd(-3.83, 112.25, -58.32, 0.5)
	pt3dadd(-4, 112.58, -58.32, 0.5)
	pt3dadd(-4.17, 112.92, -58.32, 0.5)
	pt3dadd(-4.33, 113.08, -58.32, 0.5)
	pt3dadd(-4.33, 113.42, -58.32, 0.5)
	pt3dadd(-4.5, 113.75, -58.32, 0.5)
	pt3dadd(-4.67, 113.92, -58.32, 0.5)
	pt3dadd(-4.67, 114.25, -58.32, 0.5)
	pt3dadd(-4.83, 114.42, -58.32, 0.5)
	pt3dadd(-4.83, 115.25, -58.32, 0.5)
	pt3dadd(-5, 115.58, -58.32, 0.5)
	pt3dadd(-5, 118.08, -58.32, 0.5)
	pt3dadd(-4.83, 118.25, -58.32, 0.5)
	pt3dadd(-4.83, 118.75, -58.32, 0.5)
	pt3dadd(-4.67, 118.92, -58.32, 0.5)
	pt3dadd(-4.67, 119.25, -58.32, 0.5)
	pt3dadd(-4.5, 119.42, -58.32, 0.5)
	pt3dadd(-4.5, 120.08, -58.32, 0.5)
	pt3dadd(-4.33, 120.42, -58.32, 0.5)
	pt3dadd(-4.33, 121.08, -58.32, 0.5)
	pt3dadd(-4.5, 121.42, -58.32, 0.5)
	pt3dadd(-4.5, 121.75, -58.32, 0.5)
	pt3dadd(-4.67, 122.08, -58.32, 0.5)
	pt3dadd(-4.67, 122.58, -58.32, 0.5)
	pt3dadd(-4.83, 122.75, -58.32, 0.5)
	pt3dadd(-4.83, 123.25, -58.32, 0.5)
	pt3dadd(-5, 123.42, -58.32, 0.5)
	pt3dadd(-5, 123.75, -58.32, 0.5)
	pt3dadd(-5.17, 124.08, -58.32, 0.5)
	pt3dadd(-5.33, 124.42, -58.32, 0.5)
	pt3dadd(-5.5, 124.58, -58.32, 0.5)
	pt3dadd(-5.5, 125.42, -58.32, 0.5)
	pt3dadd(-5.67, 125.75, -58.32, 0.5)
	pt3dadd(-5.67, 126.58, -58.32, 0.5)
	pt3dadd(-5.83, 126.92, -58.32, 0.5)
	pt3dadd(-5.83, 127.25, -58.32, 0.5)
	pt3dadd(-6, 127.42, -58.32, 0.5)
	pt3dadd(-6.17, 127.58, -58.32, 0.5)
	pt3dadd(-6.17, 128.41, -58.32, 0.5)
	pt3dadd(-6.33, 128.58, -58.32, 0.5)
	pt3dadd(-6.5, 128.58, -58.32, 0.5)
  }
  dend[387] {pt3dclear()
	pt3dadd(6.83, 79.08, -57.24, 1)
	pt3dadd(6.67, 79.25, -58.68, 0.5)
	pt3dadd(6.83, 79.42, -58.68, 0.5)
	pt3dadd(6.83, 80.42, -58.68, 0.5)
	pt3dadd(6.67, 80.58, -58.68, 0.5)
	pt3dadd(6.67, 81.08, -58.68, 0.5)
	pt3dadd(6.5, 81.42, -58.68, 0.5)
	pt3dadd(6.5, 81.75, -58.68, 0.5)
	pt3dadd(6.33, 81.92, -58.68, 0.5)
	pt3dadd(6.33, 82.25, -58.68, 0.5)
	pt3dadd(6.17, 82.42, -58.68, 0.5)
	pt3dadd(6.17, 83.75, -58.68, 0.5)
	pt3dadd(6, 84.08, -58.68, 0.5)
	pt3dadd(6, 86.25, -58.68, 0.5)
	pt3dadd(6.17, 86.58, -58.68, 0.5)
	pt3dadd(6.17, 87.08, -58.68, 0.5)
	pt3dadd(6.33, 87.42, -58.68, 0.5)
	pt3dadd(6.33, 87.75, -59.04, 0.5)
	pt3dadd(6.5, 87.92, -59.04, 0.5)
	pt3dadd(6.67, 88.42, -58.68, 0.5)
	pt3dadd(6.83, 88.75, -58.68, 0.5)
	pt3dadd(6.83, 89.25, -58.68, 0.5)
	pt3dadd(7, 89.42, -58.68, 0.5)
	pt3dadd(6.83, 89.58, -58.68, 0.5)
	pt3dadd(6.67, 89.92, -58.68, 0.5)
	pt3dadd(6.5, 90.25, -58.68, 0.5)
	pt3dadd(6.5, 90.75, -58.68, 0.5)
	pt3dadd(6.33, 90.92, -58.68, 0.5)
	pt3dadd(6.17, 91.08, -58.68, 0.5)
	pt3dadd(6, 91.42, -58.68, 0.5)
	pt3dadd(5.67, 91.75, -58.68, 0.5)
	pt3dadd(5.5, 92.08, -58.68, 0.5)
	pt3dadd(5.33, 92.42, -58.68, 0.5)
	pt3dadd(5, 92.58, -58.68, 0.5)
	pt3dadd(4.83, 92.75, -58.68, 0.5)
	pt3dadd(4.67, 93.08, -58.68, 0.5)
	pt3dadd(4.5, 93.25, -58.68, 0.5)
	pt3dadd(4.33, 93.58, -58.68, 0.5)
	pt3dadd(4.17, 93.75, -58.68, 0.5)
	pt3dadd(4.17, 94.25, -58.68, 0.5)
	pt3dadd(4, 94.42, -58.68, 0.5)
	pt3dadd(4, 94.75, -58.68, 0.5)
	pt3dadd(3.83, 94.92, -58.68, 0.5)
	pt3dadd(3.83, 95.42, -58.68, 0.5)
	pt3dadd(3.67, 95.75, -58.68, 0.5)
	pt3dadd(3.67, 96.08, -58.68, 0.5)
	pt3dadd(3.5, 96.25, -58.68, 0.5)
  }
  dend[388] {pt3dclear()
	pt3dadd(3.5, 96.25, -58.68, 0.5)
	pt3dadd(4.33, 96.08, -58.68, 0.5)
	pt3dadd(4.17, 96.25, -58.68, 0.5)
	pt3dadd(4, 96.42, -58.68, 0.5)
	pt3dadd(3.83, 96.75, -58.68, 0.5)
	pt3dadd(3.67, 97.08, -58.68, 0.5)
	pt3dadd(3.5, 97.25, -58.68, 0.5)
	pt3dadd(3.33, 97.42, -58.68, 0.5)
	pt3dadd(3.33, 97.92, -58.68, 0.5)
	pt3dadd(3.17, 98.25, -58.68, 0.5)
	pt3dadd(3, 98.58, -58.68, 0.5)
	pt3dadd(3, 99.92, -58.68, 0.5)
	pt3dadd(2.83, 100.08, -58.68, 0.5)
	pt3dadd(2.67, 100.25, -58.68, 0.5)
	pt3dadd(2.67, 100.58, -58.68, 0.5)
	pt3dadd(2.5, 100.75, -58.68, 0.5)
	pt3dadd(2.33, 101.08, -58.68, 0.5)
	pt3dadd(2.33, 101.42, -58.68, 0.5)
	pt3dadd(2.17, 101.75, -58.68, 0.5)
	pt3dadd(2.17, 102.08, -58.68, 0.5)
	pt3dadd(2, 102.25, -58.68, 0.5)
	pt3dadd(2, 102.75, -58.68, 0.5)
	pt3dadd(1.83, 103.25, -58.68, 0.5)
	pt3dadd(1.67, 103.42, -58.68, 0.5)
	pt3dadd(1.67, 103.75, -58.68, 0.5)
	pt3dadd(1.5, 104.08, -58.68, 0.5)
	pt3dadd(1.33, 104.25, -58.68, 0.5)
	pt3dadd(1.33, 104.58, -58.68, 0.5)
	pt3dadd(1.17, 104.92, -58.68, 0.5)
	pt3dadd(1, 105.08, -58.68, 0.5)
	pt3dadd(1, 105.42, -58.68, 0.5)
	pt3dadd(0.83, 105.75, -58.68, 0.5)
	pt3dadd(0.67, 105.92, -58.68, 0.5)
	pt3dadd(0.5, 106.08, -58.68, 0.5)
	pt3dadd(0.5, 106.42, -58.68, 0.5)
	pt3dadd(0.33, 106.58, -58.68, 0.5)
	pt3dadd(0.17, 106.75, -58.68, 0.5)
	pt3dadd(0.17, 107.08, -58.68, 0.5)
	pt3dadd(0, 107.25, -58.68, 0.5)
	pt3dadd(-0.17, 107.25, -58.68, 0.5)
  }
  dend[389] {pt3dclear()
	pt3dadd(3.5, 96.25, -58.68, 0.5)
	pt3dadd(3.67, 96.08, -57.96, 0.5)
	pt3dadd(3.83, 96.42, -57.96, 0.5)
	pt3dadd(4, 96.58, -57.96, 0.5)
	pt3dadd(4.17, 96.75, -57.96, 0.5)
	pt3dadd(4.33, 96.92, -57.96, 0.5)
	pt3dadd(4.5, 97.25, -57.96, 0.5)
  }
}
proc shape3d_37() {
  dend[389] {	pt3dadd(4.67, 97.58, -57.96, 0.5)
	pt3dadd(4.83, 97.75, -57.96, 0.5)
	pt3dadd(4.83, 98.08, -57.96, 0.5)
	pt3dadd(5, 98.25, -57.96, 0.5)
	pt3dadd(5, 99.92, -57.96, 0.5)
	pt3dadd(4.83, 100.08, -57.96, 0.5)
	pt3dadd(4.67, 100.42, -57.96, 0.5)
	pt3dadd(4.5, 100.58, -57.96, 0.5)
	pt3dadd(4.33, 100.75, -57.96, 0.5)
	pt3dadd(4.33, 102.08, -57.96, 0.5)
	pt3dadd(4.17, 102.42, -57.96, 0.5)
	pt3dadd(4.17, 102.92, -57.96, 0.5)
	pt3dadd(4, 103.08, -57.96, 0.5)
	pt3dadd(4, 103.42, -57.96, 0.5)
	pt3dadd(3.83, 103.58, -57.96, 0.5)
	pt3dadd(3.67, 103.75, -57.96, 0.5)
	pt3dadd(3.67, 104.42, -57.96, 0.5)
	pt3dadd(3.5, 104.58, -57.96, 0.5)
	pt3dadd(3.33, 104.75, -57.96, 0.5)
	pt3dadd(3.33, 105.08, -57.96, 0.5)
	pt3dadd(3.17, 105.25, -57.96, 0.5)
	pt3dadd(3.17, 105.58, -57.96, 0.5)
	pt3dadd(3, 105.75, -57.96, 0.5)
	pt3dadd(2.83, 105.92, -57.96, 0.5)
	pt3dadd(2.67, 106.08, -57.96, 0.5)
	pt3dadd(2.67, 106.42, -57.96, 0.5)
	pt3dadd(2.5, 106.58, -57.96, 0.5)
	pt3dadd(2.33, 106.75, -57.96, 0.5)
	pt3dadd(2.17, 106.92, -57.96, 0.5)
	pt3dadd(2, 107.08, -57.96, 0.5)
	pt3dadd(1.83, 107.42, -57.96, 0.5)
	pt3dadd(1.67, 107.58, -57.96, 0.5)
	pt3dadd(1.5, 107.75, -57.96, 0.5)
	pt3dadd(1.33, 107.92, -57.96, 0.5)
	pt3dadd(1.17, 108.08, -57.96, 0.5)
	pt3dadd(1, 108.25, -57.96, 0.5)
	pt3dadd(0.83, 108.42, -57.96, 0.5)
	pt3dadd(0.67, 108.58, -57.96, 0.5)
	pt3dadd(0.5, 108.75, -57.96, 0.5)
	pt3dadd(0.5, 109.08, -57.96, 0.5)
	pt3dadd(0.33, 109.25, -57.96, 0.5)
	pt3dadd(0.17, 109.42, -57.96, 0.5)
	pt3dadd(0, 109.58, -57.96, 0.5)
	pt3dadd(-0.17, 109.92, -57.96, 0.5)
	pt3dadd(-0.17, 110.25, -57.96, 0.5)
	pt3dadd(-0.33, 110.42, -57.96, 0.5)
	pt3dadd(-0.33, 110.92, -57.96, 0.5)
	pt3dadd(-0.5, 111.25, -57.96, 0.5)
	pt3dadd(-0.67, 111.58, -57.96, 0.5)
	pt3dadd(-0.67, 111.92, -57.96, 0.5)
	pt3dadd(-0.83, 112.08, -57.96, 0.5)
  }
  dend[390] {pt3dclear()
	pt3dadd(10.67, 72.58, -56.88, 1)
	pt3dadd(11, 72.58, -59.04, 0.5)
	pt3dadd(11, 72.92, -59.04, 0.5)
	pt3dadd(11.17, 73.08, -59.04, 0.5)
	pt3dadd(11.33, 73.42, -59.04, 0.5)
	pt3dadd(11.5, 73.75, -59.04, 0.5)
	pt3dadd(11.67, 73.92, -59.04, 0.5)
	pt3dadd(11.67, 74.25, -59.04, 0.5)
	pt3dadd(11.83, 74.42, -59.04, 0.5)
	pt3dadd(12, 74.58, -59.04, 0.5)
	pt3dadd(12.17, 74.75, -59.04, 0.5)
	pt3dadd(12.17, 75.08, -59.04, 0.5)
	pt3dadd(12.33, 75.42, -59.04, 0.5)
	pt3dadd(12.33, 75.75, -59.04, 0.5)
	pt3dadd(12.5, 75.92, -59.04, 0.5)
	pt3dadd(12.5, 76.25, -59.04, 0.5)
	pt3dadd(12.67, 76.58, -59.04, 0.5)
	pt3dadd(12.67, 76.92, -59.04, 0.5)
  }
  dend[391] {pt3dclear()
	pt3dadd(12.67, 76.92, -59.04, 0.5)
	pt3dadd(13, 76.75, -59.04, 0.5)
	pt3dadd(13, 77.08, -59.04, 0.5)
	pt3dadd(12.67, 77.25, -59.04, 0.5)
	pt3dadd(12.33, 77.58, -59.04, 0.5)
	pt3dadd(12, 77.75, -59.04, 0.5)
	pt3dadd(11.83, 77.92, -59.04, 0.5)
	pt3dadd(11.67, 78.25, -59.04, 0.5)
	pt3dadd(11.5, 78.42, -59.04, 0.5)
	pt3dadd(11.17, 78.58, -59.04, 0.5)
	pt3dadd(11, 78.92, -59.04, 0.5)
	pt3dadd(10.83, 79.25, -59.04, 0.5)
	pt3dadd(10.5, 79.58, -59.04, 0.5)
	pt3dadd(10.33, 79.75, -59.04, 0.5)
	pt3dadd(10.33, 80.08, -59.04, 0.5)
	pt3dadd(10.17, 80.25, -59.04, 0.5)
	pt3dadd(10, 80.58, -59.04, 0.5)
	pt3dadd(9.67, 80.92, -59.04, 0.5)
	pt3dadd(9.5, 81.25, -59.04, 0.5)
	pt3dadd(9.33, 81.58, -59.04, 0.5)
	pt3dadd(9.17, 81.92, -59.04, 0.5)
	pt3dadd(8.83, 82.25, -59.04, 0.5)
	pt3dadd(8.67, 82.58, -59.04, 0.5)
	pt3dadd(8.5, 82.92, -59.04, 0.5)
	pt3dadd(8.5, 83.42, -59.04, 0.5)
	pt3dadd(8.33, 83.58, -59.04, 0.5)
	pt3dadd(8.33, 84.08, -59.04, 0.5)
	pt3dadd(8.17, 84.25, -59.04, 0.5)
	pt3dadd(8.17, 85.25, -59.04, 0.5)
	pt3dadd(8, 85.58, -59.04, 0.5)
	pt3dadd(8, 87.58, -59.04, 0.5)
	pt3dadd(8.17, 87.75, -59.04, 0.5)
	pt3dadd(8.17, 88.08, -59.04, 0.5)
	pt3dadd(8.33, 88.25, -59.04, 0.5)
	pt3dadd(8.33, 88.75, -59.04, 0.5)
  }
  dend[392] {pt3dclear()
	pt3dadd(8.33, 88.75, -59.04, 0.5)
	pt3dadd(9.22, 88.3, -59.04, 0.5)
  }
  dend[393] {pt3dclear()
	pt3dadd(9.22, 88.3, -59.04, 0.5)
	pt3dadd(9, 88.42, -59.04, 0.5)
	pt3dadd(9, 88.75, -59.04, 0.5)
	pt3dadd(8.67, 88.92, -59.04, 0.5)
	pt3dadd(8.5, 89.25, -59.04, 0.5)
	pt3dadd(8, 89.75, -59.04, 0.5)
	pt3dadd(7.83, 89.92, -59.04, 0.5)
	pt3dadd(7.83, 90.25, -59.04, 0.5)
	pt3dadd(7.67, 90.42, -59.04, 0.5)
	pt3dadd(7.5, 90.92, -59.04, 0.5)
	pt3dadd(7.5, 91.42, -59.04, 0.5)
	pt3dadd(7.33, 91.75, -59.04, 0.5)
	pt3dadd(7.17, 91.92, -59.04, 0.5)
	pt3dadd(7.17, 92.42, -59.04, 0.5)
	pt3dadd(7, 92.75, -59.04, 0.5)
	pt3dadd(6.83, 92.92, -59.04, 0.5)
	pt3dadd(6.83, 93.58, -59.04, 0.5)
	pt3dadd(6.67, 93.75, -59.04, 0.5)
	pt3dadd(6.67, 94.25, -59.04, 0.5)
	pt3dadd(6.5, 94.58, -59.04, 0.5)
	pt3dadd(6.5, 95.58, -59.04, 0.5)
	pt3dadd(6.33, 95.75, -59.04, 0.5)
  }
  dend[394] {pt3dclear()
	pt3dadd(9.22, 88.3, -59.04, 0.5)
	pt3dadd(8, 88.92, -61.2, 0.5)
	pt3dadd(8.17, 89.08, -61.2, 0.5)
	pt3dadd(8.17, 89.92, -61.2, 0.5)
	pt3dadd(8, 90.25, -61.2, 0.5)
	pt3dadd(8, 90.58, -61.2, 0.5)
	pt3dadd(7.83, 90.92, -61.2, 0.5)
	pt3dadd(7.83, 92.08, -61.2, 0.5)
	pt3dadd(8, 92.25, -61.2, 0.5)
	pt3dadd(8, 92.75, -61.2, 0.5)
	pt3dadd(8.17, 92.92, -61.2, 0.5)
	pt3dadd(8.17, 94.25, -61.2, 0.5)
	pt3dadd(8, 94.42, -61.2, 0.5)
	pt3dadd(8, 95.92, -61.2, 0.5)
	pt3dadd(7.83, 96.25, -61.2, 0.5)
	pt3dadd(7.83, 98.08, -61.2, 0.5)
	pt3dadd(8, 98.25, -61.2, 0.5)
  }
  dend[395] {pt3dclear()
	pt3dadd(8.33, 88.75, -59.04, 0.5)
	pt3dadd(8.67, 88.58, -59.76, 0.5)
	pt3dadd(9, 88.58, -59.76, 0.5)
	pt3dadd(9.17, 88.75, -59.76, 0.5)
	pt3dadd(9.33, 88.92, -59.76, 0.5)
	pt3dadd(9.67, 89.08, -59.76, 0.5)
	pt3dadd(9.83, 89.25, -59.76, 0.5)
	pt3dadd(10, 89.58, -59.76, 0.5)
	pt3dadd(10.17, 89.75, -59.76, 0.5)
	pt3dadd(10.17, 90.08, -59.76, 0.5)
	pt3dadd(10.33, 90.25, -59.76, 0.5)
	pt3dadd(10.33, 90.75, -59.76, 0.5)
	pt3dadd(10.5, 90.92, -59.76, 0.5)
	pt3dadd(10.67, 91.25, -59.76, 0.5)
	pt3dadd(10.83, 91.42, -59.76, 0.5)
	pt3dadd(10.83, 91.75, -59.76, 0.5)
	pt3dadd(11, 91.92, -59.76, 0.5)
	pt3dadd(11.17, 92.08, -59.76, 0.5)
	pt3dadd(11.33, 92.25, -59.76, 0.5)
	pt3dadd(11.5, 92.42, -59.76, 0.5)
	pt3dadd(11.67, 92.75, -59.76, 0.5)
	pt3dadd(11.83, 92.92, -59.76, 0.5)
	pt3dadd(12, 93.08, -59.76, 0.5)
	pt3dadd(12.17, 93.42, -59.76, 0.5)
	pt3dadd(12.33, 93.58, -59.76, 0.5)
  }
  dend[396] {pt3dclear()
	pt3dadd(12.67, 76.92, -59.04, 0.5)
	pt3dadd(12.83, 76.75, -58.68, 0.5)
	pt3dadd(13, 76.92, -58.68, 0.5)
	pt3dadd(13, 77.25, -58.68, 0.5)
	pt3dadd(13.17, 77.42, -58.68, 0.5)
	pt3dadd(13.33, 77.75, -58.68, 0.5)
	pt3dadd(13.5, 77.92, -58.68, 0.5)
	pt3dadd(13.67, 78.25, -58.68, 0.5)
	pt3dadd(13.83, 78.42, -58.68, 0.5)
	pt3dadd(14, 78.58, -58.68, 0.5)
	pt3dadd(14, 79.08, -58.68, 0.5)
	pt3dadd(14.17, 79.42, -58.68, 0.5)
	pt3dadd(14.17, 80.08, -58.68, 0.5)
	pt3dadd(14.33, 80.42, -58.68, 0.5)
	pt3dadd(14.33, 81.42, -58.68, 0.5)
  }
  dend[397] {pt3dclear()
	pt3dadd(14.33, 81.42, -58.68, 0.5)
	pt3dadd(14.33, 81.58, -58.68, 0.5)
	pt3dadd(14.5, 81.75, -58.68, 0.5)
	pt3dadd(14.5, 82.42, -58.68, 0.5)
	pt3dadd(14.33, 82.75, -58.68, 0.5)
	pt3dadd(14.33, 83.42, -58.68, 0.5)
	pt3dadd(14.17, 83.58, -58.68, 0.5)
	pt3dadd(14.17, 84.42, -58.68, 0.5)
  }
  dend[398] {pt3dclear()
	pt3dadd(14.17, 84.42, -58.68, 0.5)
	pt3dadd(14.5, 84.25, -59.76, 0.5)
	pt3dadd(14.5, 84.58, -59.76, 0.5)
	pt3dadd(14.33, 84.75, -59.76, 0.5)
	pt3dadd(14.17, 84.92, -59.76, 0.5)
	pt3dadd(14, 85.08, -59.76, 0.5)
	pt3dadd(13.67, 85.25, -59.76, 0.5)
  }
}
proc shape3d_38() {
  dend[398] {	pt3dadd(13.5, 85.58, -59.76, 0.5)
	pt3dadd(13.33, 85.92, -59.76, 0.5)
	pt3dadd(13.33, 86.42, -59.76, 0.5)
	pt3dadd(13.17, 86.58, -59.76, 0.5)
	pt3dadd(13, 86.75, -59.76, 0.5)
	pt3dadd(12.83, 87.08, -59.76, 0.5)
	pt3dadd(12.67, 87.42, -59.76, 0.5)
	pt3dadd(12.67, 87.75, -59.76, 0.5)
	pt3dadd(12.5, 87.92, -59.76, 0.5)
	pt3dadd(12.5, 88.58, -59.76, 0.5)
	pt3dadd(12.33, 88.92, -59.76, 0.5)
	pt3dadd(12.33, 89.42, -59.76, 0.5)
	pt3dadd(12.17, 89.58, -59.76, 0.5)
	pt3dadd(12.17, 90.25, -59.76, 0.5)
	pt3dadd(12, 90.42, -59.76, 0.5)
	pt3dadd(12, 91.25, -59.76, 0.5)
	pt3dadd(11.83, 91.58, -59.76, 0.5)
	pt3dadd(11.67, 91.92, -59.76, 0.5)
	pt3dadd(11.5, 92.08, -59.76, 0.5)
	pt3dadd(11.5, 92.42, -59.76, 0.5)
	pt3dadd(11.33, 92.58, -59.76, 0.5)
	pt3dadd(11.17, 92.75, -59.76, 0.5)
	pt3dadd(11.17, 93.42, -59.76, 0.5)
	pt3dadd(11, 93.58, -59.76, 0.5)
	pt3dadd(10.83, 93.92, -59.76, 0.5)
	pt3dadd(10.83, 94.25, -59.76, 0.5)
	pt3dadd(10.67, 94.42, -59.76, 0.5)
	pt3dadd(10.5, 94.75, -59.76, 0.5)
	pt3dadd(10.33, 95.08, -59.76, 0.5)
	pt3dadd(10.17, 95.42, -59.76, 0.5)
	pt3dadd(10.17, 96.25, -59.76, 0.5)
	pt3dadd(10, 96.58, -59.76, 0.5)
	pt3dadd(10, 96.92, -59.76, 0.5)
	pt3dadd(9.83, 97.25, -59.76, 0.5)
	pt3dadd(9.83, 97.58, -59.76, 0.5)
	pt3dadd(9.67, 97.75, -59.76, 0.5)
	pt3dadd(9.5, 98.08, -59.76, 0.5)
	pt3dadd(9.5, 99.58, -59.76, 0.5)
	pt3dadd(8.5, 99.58, -59.76, 0.5)
  }
  dend[399] {pt3dclear()
	pt3dadd(8.5, 99.58, -59.76, 0.5)
	pt3dadd(9.33, 99.58, -59.76, 0.5)
	pt3dadd(9.33, 100.08, -59.76, 0.5)
	pt3dadd(9.17, 100.42, -59.76, 0.5)
	pt3dadd(8.83, 100.75, -59.76, 0.5)
	pt3dadd(8.67, 101.08, -59.76, 0.5)
	pt3dadd(8.67, 101.42, -59.76, 0.5)
	pt3dadd(8.5, 101.75, -59.76, 0.5)
	pt3dadd(8.33, 102.08, -59.76, 0.5)
	pt3dadd(8.17, 102.25, -59.76, 0.5)
	pt3dadd(8.17, 102.75, -59.76, 0.5)
	pt3dadd(8, 102.92, -59.76, 0.5)
	pt3dadd(8, 103.25, -59.76, 0.5)
	pt3dadd(7.83, 103.58, -59.76, 0.5)
	pt3dadd(7.67, 103.92, -59.76, 0.5)
	pt3dadd(7.67, 104.25, -59.76, 0.5)
	pt3dadd(7.5, 104.58, -59.76, 0.5)
	pt3dadd(7.5, 104.92, -59.76, 0.5)
	pt3dadd(7.33, 105.08, -59.76, 0.5)
	pt3dadd(7.17, 105.42, -59.76, 0.5)
	pt3dadd(7, 105.75, -59.76, 0.5)
	pt3dadd(6.83, 105.92, -59.76, 0.5)
	pt3dadd(6.83, 106.25, -59.76, 0.5)
	pt3dadd(6.67, 106.42, -59.76, 0.5)
	pt3dadd(6.5, 106.75, -59.76, 0.5)
	pt3dadd(6.33, 106.92, -59.76, 0.5)
	pt3dadd(6, 107.08, -59.76, 0.5)
	pt3dadd(5.83, 107.25, -59.76, 0.5)
	pt3dadd(5.67, 107.42, -59.76, 0.5)
	pt3dadd(4.67, 107.42, -59.76, 0.5)
	pt3dadd(4.5, 107.58, -59.76, 0.5)
	pt3dadd(3.33, 107.58, -59.76, 0.5)
	pt3dadd(3.17, 107.75, -59.76, 0.5)
	pt3dadd(3, 107.92, -59.76, 0.5)
	pt3dadd(2.83, 107.92, -59.76, 0.5)
  }
  dend[400] {pt3dclear()
	pt3dadd(8.5, 99.58, -59.76, 0.5)
	pt3dadd(9.33, 99.92, -61.92, 0.5)
	pt3dadd(9.33, 100.25, -61.92, 0.5)
	pt3dadd(9.5, 100.58, -61.92, 0.5)
	pt3dadd(9.67, 100.92, -61.92, 0.5)
	pt3dadd(9.67, 101.25, -61.92, 0.5)
	pt3dadd(9.83, 101.58, -61.92, 0.5)
	pt3dadd(9.83, 102.25, -61.92, 0.5)
	pt3dadd(10, 102.58, -61.92, 0.5)
	pt3dadd(10, 104.08, -61.92, 0.5)
	pt3dadd(9.83, 104.25, -61.92, 0.5)
	pt3dadd(9.83, 105.08, -61.92, 0.5)
	pt3dadd(9.67, 105.25, -61.92, 0.5)
	pt3dadd(9.67, 106.08, -61.92, 0.5)
	pt3dadd(9.5, 106.08, -61.92, 0.5)
  }
  dend[401] {pt3dclear()
	pt3dadd(9.5, 106.08, -61.92, 0.5)
	pt3dadd(10.33, 106.08, -61.92, 0.5)
	pt3dadd(10.5, 106.25, -61.92, 0.5)
	pt3dadd(10.5, 106.58, -61.92, 0.5)
	pt3dadd(10.67, 106.75, -61.92, 0.5)
	pt3dadd(10.83, 107.08, -61.92, 0.5)
	pt3dadd(11, 107.58, -61.92, 0.5)
	pt3dadd(11.33, 107.75, -61.92, 0.5)
	pt3dadd(11.33, 108.08, -61.92, 0.5)
	pt3dadd(11.5, 108.25, -61.92, 0.5)
	pt3dadd(11.67, 108.42, -61.92, 0.5)
	pt3dadd(11.67, 108.75, -61.92, 0.5)
	pt3dadd(11.83, 108.92, -61.92, 0.5)
	pt3dadd(12, 109.25, -61.92, 0.5)
	pt3dadd(12.17, 109.42, -61.92, 0.5)
	pt3dadd(12.17, 109.75, -61.92, 0.5)
  }
  dend[402] {pt3dclear()
	pt3dadd(9.5, 106.08, -61.92, 0.5)
	pt3dadd(9.5, 106.08, -60.84, 0.5)
	pt3dadd(9.33, 106.25, -60.84, 0.5)
	pt3dadd(9.17, 106.42, -60.84, 0.5)
	pt3dadd(9, 106.58, -60.84, 0.5)
	pt3dadd(8.83, 106.75, -60.84, 0.5)
	pt3dadd(8.67, 106.92, -60.84, 0.5)
	pt3dadd(8.5, 107.08, -60.84, 0.5)
	pt3dadd(8.33, 107.25, -60.84, 0.5)
	pt3dadd(8.17, 107.42, -60.84, 0.5)
	pt3dadd(8, 107.58, -60.84, 0.5)
	pt3dadd(8, 107.75, -60.84, 0.5)
  }
  dend[403] {pt3dclear()
	pt3dadd(8, 107.75, -60.84, 0.5)
	pt3dadd(8.5, 107.42, -60.84, 0.5)
	pt3dadd(8.5, 108.08, -60.84, 0.5)
	pt3dadd(8.33, 108.25, -60.84, 0.5)
	pt3dadd(8.33, 108.75, -60.84, 0.5)
	pt3dadd(8.17, 108.92, -60.84, 0.5)
	pt3dadd(8.17, 111.08, -60.84, 0.5)
	pt3dadd(8.33, 111.25, -60.84, 0.5)
	pt3dadd(8.33, 111.92, -60.84, 0.5)
	pt3dadd(8.17, 112.25, -60.84, 0.5)
	pt3dadd(8.17, 114.25, -60.84, 0.5)
	pt3dadd(8, 114.42, -60.84, 0.5)
	pt3dadd(8, 115.25, -60.84, 0.5)
	pt3dadd(8, 115.08, -60.84, 0.5)
  }
  dend[404] {pt3dclear()
	pt3dadd(8, 107.75, -60.84, 0.5)
	pt3dadd(8, 107.58, -60.48, 0.5)
	pt3dadd(7.83, 107.92, -60.48, 0.5)
	pt3dadd(7.33, 108.42, -60.48, 0.5)
	pt3dadd(7.17, 108.58, -60.48, 0.5)
	pt3dadd(7, 108.92, -60.48, 0.5)
	pt3dadd(6.67, 109.25, -60.48, 0.5)
	pt3dadd(6.5, 109.42, -60.48, 0.5)
	pt3dadd(6.33, 109.75, -60.48, 0.5)
	pt3dadd(6.17, 110.08, -60.48, 0.5)
	pt3dadd(6.17, 110.58, -60.48, 0.5)
	pt3dadd(6, 110.58, -60.48, 0.5)
  }
  dend[405] {pt3dclear()
	pt3dadd(6, 110.58, -60.48, 0.5)
	pt3dadd(6.5, 110.42, -60.48, 0.5)
	pt3dadd(6.67, 110.75, -60.48, 0.5)
	pt3dadd(6.67, 111.25, -60.48, 0.5)
	pt3dadd(6.5, 111.42, -60.48, 0.5)
	pt3dadd(6.5, 112.08, -60.48, 0.5)
	pt3dadd(6.33, 112.25, -60.48, 0.5)
	pt3dadd(6.33, 114.75, -60.48, 0.5)
	pt3dadd(6.17, 114.92, -60.48, 0.5)
	pt3dadd(6, 115.25, -60.48, 0.5)
	pt3dadd(6, 115.58, -60.48, 0.5)
	pt3dadd(5.83, 115.75, -60.48, 0.5)
	pt3dadd(5.67, 116.08, -60.48, 0.5)
  }
  dend[406] {pt3dclear()
	pt3dadd(6, 110.58, -60.48, 0.5)
	pt3dadd(5.83, 110.42, -59.4, 0.5)
	pt3dadd(5.83, 110.75, -59.4, 0.5)
	pt3dadd(5.67, 111.08, -59.4, 0.5)
	pt3dadd(5.5, 111.25, -59.4, 0.5)
	pt3dadd(5.33, 111.42, -59.4, 0.5)
	pt3dadd(5.17, 111.58, -59.4, 0.5)
	pt3dadd(5, 111.75, -59.4, 0.5)
	pt3dadd(4.67, 111.75, -59.4, 0.5)
	pt3dadd(4.5, 111.92, -59.4, 0.5)
	pt3dadd(3.5, 111.92, -59.4, 0.5)
	pt3dadd(3.33, 111.75, -59.4, 0.5)
	pt3dadd(3.17, 111.58, -59.4, 0.5)
	pt3dadd(3, 111.42, -59.4, 0.5)
	pt3dadd(2.67, 111.42, -59.4, 0.5)
	pt3dadd(2.5, 111.25, -59.4, 0.5)
	pt3dadd(1.83, 111.25, -59.4, 0.5)
	pt3dadd(1.67, 111.42, -59.4, 0.5)
	pt3dadd(1.5, 111.58, -59.4, 0.5)
	pt3dadd(1.33, 111.75, -59.4, 0.5)
  }
  dend[407] {pt3dclear()
	pt3dadd(1.33, 111.75, -59.4, 0.5)
	pt3dadd(1.67, 111.58, -59.4, 0.5)
	pt3dadd(1.83, 111.75, -59.4, 0.5)
	pt3dadd(1.67, 111.92, -59.4, 0.5)
	pt3dadd(1.5, 112.25, -59.4, 0.5)
	pt3dadd(1.33, 112.58, -59.4, 0.5)
	pt3dadd(1.17, 112.92, -59.4, 0.5)
	pt3dadd(1, 113.08, -59.4, 0.5)
	pt3dadd(0.83, 113.25, -59.4, 0.5)
	pt3dadd(0.83, 113.75, -59.4, 0.5)
	pt3dadd(0.67, 113.92, -59.4, 0.5)
	pt3dadd(0.67, 114.42, -59.4, 0.5)
	pt3dadd(0.5, 114.75, -59.4, 0.5)
	pt3dadd(0.5, 115.92, -59.4, 0.5)
	pt3dadd(0.33, 116.08, -59.4, 0.5)
	pt3dadd(0.33, 117.25, -59.4, 0.5)
	pt3dadd(0.17, 117.42, -59.4, 0.5)
	pt3dadd(0.17, 118.75, -59.4, 0.5)
	pt3dadd(0.33, 118.92, -59.4, 0.5)
	pt3dadd(0.33, 119.42, -59.4, 0.5)
	pt3dadd(0.5, 119.75, -59.4, 0.5)
	pt3dadd(0.5, 120.25, -59.4, 0.5)
	pt3dadd(0.67, 120.58, -59.4, 0.5)
	pt3dadd(0.67, 121.75, -59.4, 0.5)
  }
}
proc shape3d_39() {
  dend[407] {	pt3dadd(0.83, 122.08, -59.4, 0.5)
	pt3dadd(0.83, 122.58, -59.4, 0.5)
  }
  dend[408] {pt3dclear()
	pt3dadd(1.33, 111.75, -59.4, 0.5)
	pt3dadd(1.67, 111.75, -59.04, 0.5)
	pt3dadd(1.83, 111.92, -59.04, 0.5)
	pt3dadd(1.83, 112.25, -59.04, 0.5)
	pt3dadd(2, 112.75, -59.04, 0.5)
	pt3dadd(2.33, 113.25, -59.04, 0.5)
	pt3dadd(2.5, 113.58, -59.04, 0.5)
	pt3dadd(2.67, 113.75, -59.04, 0.5)
	pt3dadd(2.67, 116.08, -59.04, 0.5)
	pt3dadd(2.5, 116.25, -59.04, 0.5)
	pt3dadd(2.5, 118.42, -59.04, 0.5)
	pt3dadd(2.33, 118.42, -59.04, 0.5)
  }
  dend[409] {pt3dclear()
	pt3dadd(14.17, 84.42, -58.68, 0.5)
	pt3dadd(14.5, 84.58, -58.68, 0.5)
	pt3dadd(14.67, 84.75, -58.68, 0.5)
	pt3dadd(14.83, 84.92, -58.68, 0.5)
	pt3dadd(15, 85.25, -58.68, 0.5)
	pt3dadd(15.17, 85.42, -58.68, 0.5)
	pt3dadd(15.33, 85.58, -58.68, 0.5)
	pt3dadd(15.5, 85.92, -58.68, 0.5)
	pt3dadd(15.83, 86.08, -58.68, 0.5)
	pt3dadd(16.17, 86.25, -58.68, 0.5)
	pt3dadd(16.32, 86.58, -58.68, 0.5)
	pt3dadd(16.5, 86.75, -58.68, 0.5)
	pt3dadd(16.67, 87.08, -58.68, 0.5)
	pt3dadd(16.82, 87.25, -58.68, 0.5)
	pt3dadd(16.82, 87.75, -58.68, 0.5)
	pt3dadd(17, 87.92, -58.68, 0.5)
	pt3dadd(17, 89.92, -58.68, 0.5)
	pt3dadd(16.82, 90.25, -58.68, 0.5)
	pt3dadd(16.82, 92.25, -58.68, 0.5)
	pt3dadd(16.67, 92.42, -58.68, 0.5)
	pt3dadd(16.67, 93.58, -58.68, 0.5)
	pt3dadd(16.5, 93.92, -58.68, 0.5)
	pt3dadd(16.5, 94.08, -58.68, 0.5)
  }
  dend[410] {pt3dclear()
	pt3dadd(16.5, 94.08, -58.68, 0.5)
	pt3dadd(16.67, 94.25, -58.68, 0.5)
	pt3dadd(16.67, 94.75, -58.68, 0.5)
	pt3dadd(16.5, 95.25, -58.68, 0.5)
	pt3dadd(16.17, 95.75, -58.68, 0.5)
	pt3dadd(16, 96.08, -58.68, 0.5)
	pt3dadd(16, 96.42, -58.68, 0.5)
	pt3dadd(15.83, 96.75, -58.68, 0.5)
	pt3dadd(15.67, 97.08, -58.68, 0.5)
	pt3dadd(15.67, 97.75, -58.68, 0.5)
	pt3dadd(15.5, 98.08, -58.68, 0.5)
	pt3dadd(15.5, 102.08, -58.68, 0.5)
	pt3dadd(15.33, 102.42, -58.68, 0.5)
	pt3dadd(15.33, 103.08, -58.68, 0.5)
	pt3dadd(15.17, 103.25, -58.68, 0.5)
	pt3dadd(15.17, 104.42, -58.68, 0.5)
	pt3dadd(15, 104.75, -58.68, 0.5)
	pt3dadd(15, 105.58, -58.68, 0.5)
	pt3dadd(14.83, 105.58, -58.68, 0.5)
  }
  dend[411] {pt3dclear()
	pt3dadd(14.83, 105.58, -58.68, 0.5)
	pt3dadd(14.83, 105.25, -58.68, 0.5)
	pt3dadd(14.83, 105.58, -58.68, 0.5)
	pt3dadd(14.67, 105.92, -58.68, 0.5)
	pt3dadd(14.17, 106.42, -58.68, 0.5)
	pt3dadd(14, 106.75, -58.68, 0.5)
	pt3dadd(13.83, 106.92, -58.68, 0.5)
	pt3dadd(13.67, 107.25, -58.68, 0.5)
	pt3dadd(13.33, 107.58, -58.68, 0.5)
	pt3dadd(13.17, 107.75, -58.68, 0.5)
	pt3dadd(13, 107.92, -58.68, 0.5)
	pt3dadd(12.83, 108.08, -58.68, 0.5)
	pt3dadd(12.67, 108.42, -58.68, 0.5)
	pt3dadd(12.5, 108.58, -58.68, 0.5)
	pt3dadd(12.33, 108.92, -58.68, 0.5)
	pt3dadd(12.33, 109.25, -58.68, 0.5)
	pt3dadd(12.17, 109.58, -58.68, 0.5)
	pt3dadd(12, 109.75, -58.68, 0.5)
	pt3dadd(12, 110.08, -58.68, 0.5)
	pt3dadd(11.83, 110.42, -58.68, 0.5)
	pt3dadd(11.67, 110.58, -58.68, 0.5)
	pt3dadd(11.5, 110.75, -58.68, 0.5)
	pt3dadd(11.5, 110.92, -58.68, 0.5)
  }
  dend[412] {pt3dclear()
	pt3dadd(11.5, 110.92, -58.68, 0.5)
	pt3dadd(11.5, 110.92, -60.48, 0.5)
	pt3dadd(11.5, 111.25, -60.48, 0.5)
	pt3dadd(11.33, 111.42, -60.48, 0.5)
	pt3dadd(11.17, 111.58, -60.48, 0.5)
	pt3dadd(10.83, 111.75, -60.48, 0.5)
	pt3dadd(10.67, 112.08, -60.48, 0.5)
	pt3dadd(10.5, 112.25, -60.48, 0.5)
	pt3dadd(10.33, 112.42, -60.48, 0.5)
	pt3dadd(10.17, 112.75, -60.48, 0.5)
	pt3dadd(10.17, 113.25, -60.48, 0.5)
	pt3dadd(10, 113.42, -60.48, 0.5)
	pt3dadd(10, 115.75, -60.48, 0.5)
	pt3dadd(9.83, 116.08, -60.48, 0.5)
	pt3dadd(9.83, 116.42, -60.48, 0.5)
	pt3dadd(9.67, 116.58, -60.48, 0.5)
	pt3dadd(9.67, 116.92, -60.48, 0.5)
	pt3dadd(9.5, 117.25, -60.48, 0.5)
	pt3dadd(9.5, 118.08, -60.48, 0.5)
	pt3dadd(9.33, 118.25, -60.48, 0.5)
	pt3dadd(9.33, 118.75, -60.48, 0.5)
	pt3dadd(9.17, 118.92, -60.48, 0.5)
	pt3dadd(9.17, 119.25, -60.48, 0.5)
  }
  dend[413] {pt3dclear()
	pt3dadd(9.17, 119.25, -60.48, 0.5)
	pt3dadd(9.33, 119.08, -60.48, 0.5)
	pt3dadd(9.5, 119.25, -60.48, 0.5)
	pt3dadd(9.5, 123.92, -63.36, 0.5)
	pt3dadd(9.33, 124.25, -63.36, 0.5)
	pt3dadd(9.33, 125.08, -63.36, 0.5)
	pt3dadd(9.17, 125.42, -63.36, 0.5)
	pt3dadd(9.17, 125.75, -63.36, 0.5)
	pt3dadd(9, 125.92, -63.36, 0.5)
	pt3dadd(8.83, 126.25, -63.36, 0.5)
	pt3dadd(8.83, 126.58, -63.36, 0.5)
	pt3dadd(8.67, 126.92, -63.36, 0.5)
	pt3dadd(8.5, 127.25, -63.36, 0.5)
	pt3dadd(8.5, 127.58, -63.36, 0.5)
	pt3dadd(8.33, 127.92, -63.36, 0.5)
	pt3dadd(8.33, 128.58, -63.36, 0.5)
	pt3dadd(8.17, 128.91, -63.36, 0.5)
	pt3dadd(8, 129.25, -63.36, 0.5)
	pt3dadd(8, 130.08, -63.36, 0.5)
	pt3dadd(7.83, 130.41, -63.36, 0.5)
	pt3dadd(7.83, 131.91, -63.36, 0.5)
	pt3dadd(7.67, 132.25, -63.36, 0.5)
	pt3dadd(7.67, 132.75, -63.36, 0.5)
	pt3dadd(7.5, 132.91, -63.36, 0.5)
	pt3dadd(7.5, 133.75, -63.36, 0.5)
	pt3dadd(7.33, 134.08, -63.36, 0.5)
	pt3dadd(7.33, 135.58, -63.36, 0.5)
	pt3dadd(7.17, 135.58, -63.36, 0.5)
  }
  dend[414] {pt3dclear()
	pt3dadd(7.17, 135.58, -63.36, 0.5)
	pt3dadd(7.33, 135.25, -63.36, 0.5)
	pt3dadd(7.33, 135.58, -63.36, 0.5)
	pt3dadd(7.17, 135.91, -63.36, 0.5)
	pt3dadd(7, 136.08, -63.36, 0.5)
	pt3dadd(6.83, 136.25, -63.36, 0.5)
	pt3dadd(6.5, 136.58, -63.36, 0.5)
	pt3dadd(6.33, 136.75, -63.36, 0.5)
	pt3dadd(6.17, 136.91, -63.36, 0.5)
	pt3dadd(6.17, 137.41, -63.36, 0.5)
	pt3dadd(6, 137.58, -63.36, 0.5)
	pt3dadd(6, 138.08, -63.36, 0.5)
	pt3dadd(5.83, 138.25, -63.36, 0.5)
	pt3dadd(5.67, 138.58, -63.36, 0.5)
	pt3dadd(5.67, 138.91, -63.36, 0.5)
	pt3dadd(5.5, 139.25, -63.36, 0.5)
	pt3dadd(5.33, 139.41, -63.36, 0.5)
	pt3dadd(5.33, 140.25, -63.36, 0.5)
	pt3dadd(5.17, 140.58, -63.36, 0.5)
	pt3dadd(5.17, 140.91, -63.36, 0.5)
	pt3dadd(5, 141.08, -63.36, 0.5)
  }
  dend[415] {pt3dclear()
	pt3dadd(7.17, 135.58, -63.36, 0.5)
	pt3dadd(7, 135.75, -65.52, 0.5)
	pt3dadd(7.17, 135.91, -65.52, 0.5)
	pt3dadd(7.17, 137.41, -65.52, 0.5)
	pt3dadd(7.33, 137.75, -65.52, 0.5)
	pt3dadd(7.33, 140.75, -65.52, 0.5)
	pt3dadd(7.5, 140.91, -65.52, 0.5)
	pt3dadd(7.5, 142.58, -65.52, 0.5)
	pt3dadd(7.33, 142.58, -65.52, 0.5)
  }
  dend[416] {pt3dclear()
	pt3dadd(9.17, 119.25, -60.48, 0.5)
	pt3dadd(9.17, 119.08, -60.84, 0.5)
	pt3dadd(9.17, 119.92, -60.84, 0.5)
	pt3dadd(9, 120.08, -60.84, 0.5)
	pt3dadd(8.5, 120.58, -60.84, 0.5)
	pt3dadd(8.33, 120.75, -60.84, 0.5)
	pt3dadd(8, 120.75, -60.84, 0.5)
  }
  dend[417] {pt3dclear()
	pt3dadd(8, 120.75, -60.84, 0.5)
	pt3dadd(7.83, 121.08, -60.84, 0.5)
	pt3dadd(8, 120.92, -60.84, 0.5)
	pt3dadd(8.17, 121.08, -60.84, 0.5)
	pt3dadd(8.17, 125.42, -60.84, 0.5)
	pt3dadd(8, 125.58, -60.84, 0.5)
	pt3dadd(7.83, 125.75, -60.84, 0.5)
	pt3dadd(7.83, 126.08, -62.28, 0.5)
	pt3dadd(7.67, 126.25, -62.28, 0.5)
	pt3dadd(7.5, 126.58, -62.28, 0.5)
	pt3dadd(7.33, 126.75, -62.28, 0.5)
	pt3dadd(7.33, 127.25, -62.28, 0.5)
	pt3dadd(7.17, 127.42, -62.28, 0.5)
	pt3dadd(7, 127.75, -62.28, 0.5)
	pt3dadd(7, 128.08, -62.28, 0.5)
	pt3dadd(6.83, 128.25, -62.28, 0.5)
	pt3dadd(6.67, 128.41, -62.28, 0.5)
	pt3dadd(6.67, 128.75, -62.28, 0.5)
	pt3dadd(6.5, 128.91, -62.28, 0.5)
	pt3dadd(6.33, 129.25, -62.28, 0.5)
	pt3dadd(6.17, 129.58, -62.28, 0.5)
	pt3dadd(6.17, 129.91, -62.28, 0.5)
	pt3dadd(6, 130.25, -62.28, 0.5)
	pt3dadd(6, 130.75, -62.28, 0.5)
	pt3dadd(5.83, 131.08, -62.28, 0.5)
	pt3dadd(5.83, 132.75, -62.28, 0.5)
	pt3dadd(5.67, 133.08, -62.28, 0.5)
	pt3dadd(5.67, 133.91, -62.28, 0.5)
	pt3dadd(5.5, 134.08, -62.28, 0.5)
	pt3dadd(5.5, 134.58, -62.28, 0.5)
	pt3dadd(5.33, 134.75, -62.28, 0.5)
	pt3dadd(5.33, 135.58, -62.28, 0.5)
	pt3dadd(5.17, 135.75, -62.28, 0.5)
  }
}
proc shape3d_40() {
  dend[417] {	pt3dadd(5.17, 136.41, -62.28, 0.5)
	pt3dadd(5, 136.75, -62.28, 0.5)
	pt3dadd(5, 137.25, -62.28, 0.5)
	pt3dadd(4.83, 137.41, -62.28, 0.5)
	pt3dadd(4.83, 137.75, -62.28, 0.5)
	pt3dadd(4.67, 137.91, -62.28, 0.5)
	pt3dadd(4.5, 138.25, -62.28, 0.5)
	pt3dadd(4.5, 138.58, -62.28, 0.5)
	pt3dadd(4.33, 138.75, -62.28, 0.5)
	pt3dadd(4.33, 139.08, -62.28, 0.5)
	pt3dadd(4.17, 139.25, -62.28, 0.5)
	pt3dadd(4.17, 139.58, -62.28, 0.5)
	pt3dadd(4, 139.75, -62.28, 0.5)
  }
  dend[418] {pt3dclear()
	pt3dadd(4, 139.75, -62.28, 0.5)
	pt3dadd(4.5, 139.75, -62.28, 0.5)
	pt3dadd(4.5, 140.08, -62.28, 0.5)
	pt3dadd(4.33, 140.41, -62.28, 0.5)
	pt3dadd(4, 140.91, -62.28, 0.5)
	pt3dadd(3.83, 141.25, -62.28, 0.5)
	pt3dadd(3.83, 142.41, -62.28, 0.5)
	pt3dadd(4, 142.58, -62.28, 0.5)
	pt3dadd(4.17, 142.75, -62.28, 0.5)
	pt3dadd(4.33, 142.91, -62.28, 0.5)
	pt3dadd(4.5, 143.08, -62.28, 0.5)
	pt3dadd(4.67, 143.25, -62.28, 0.5)
	pt3dadd(5, 143.41, -62.28, 0.5)
	pt3dadd(5.17, 143.58, -62.28, 0.5)
	pt3dadd(5.5, 143.75, -62.28, 0.5)
	pt3dadd(5.67, 143.91, -62.28, 0.5)
	pt3dadd(5.83, 144.08, -62.28, 0.5)
	pt3dadd(6, 144.25, -62.28, 0.5)
	pt3dadd(6.33, 144.41, -62.28, 0.5)
	pt3dadd(6.5, 144.58, -62.28, 0.5)
	pt3dadd(6.67, 144.75, -62.28, 0.5)
  }
  dend[419] {pt3dclear()
	pt3dadd(4, 139.75, -62.28, 0.5)
	pt3dadd(4.17, 139.58, -64.8, 0.5)
	pt3dadd(4, 139.75, -64.8, 0.5)
	pt3dadd(3.83, 139.91, -64.8, 0.5)
	pt3dadd(3.5, 139.91, -64.8, 0.5)
	pt3dadd(3.33, 140.08, -64.8, 0.5)
	pt3dadd(3.17, 140.25, -64.8, 0.5)
	pt3dadd(3, 140.41, -64.8, 0.5)
	pt3dadd(3, 140.91, -64.8, 0.5)
	pt3dadd(2.83, 141.25, -64.8, 0.5)
	pt3dadd(2.83, 142.58, -64.8, 0.5)
	pt3dadd(2.67, 142.75, -64.8, 0.5)
	pt3dadd(2.67, 143.41, -64.8, 0.5)
	pt3dadd(2.83, 143.58, -64.8, 0.5)
	pt3dadd(2.83, 143.91, -64.8, 0.5)
	pt3dadd(3, 144.25, -64.8, 0.5)
	pt3dadd(3.17, 144.41, -64.8, 0.5)
	pt3dadd(3.33, 144.58, -64.8, 0.5)
	pt3dadd(3.5, 144.75, -64.8, 0.5)
	pt3dadd(3.67, 144.91, -64.8, 0.5)
	pt3dadd(3.83, 145.08, -64.8, 0.5)
	pt3dadd(4, 145.25, -64.8, 0.5)
	pt3dadd(4.33, 145.41, -64.8, 0.5)
	pt3dadd(4.5, 145.58, -64.8, 0.5)
	pt3dadd(4.83, 145.75, -64.8, 0.5)
	pt3dadd(5, 145.91, -64.8, 0.5)
	pt3dadd(5.17, 146.25, -64.8, 0.5)
	pt3dadd(5.33, 146.41, -64.8, 0.5)
	pt3dadd(5.5, 146.58, -64.8, 0.5)
	pt3dadd(5.5, 146.91, -64.8, 0.5)
	pt3dadd(5.67, 147.08, -64.8, 0.5)
	pt3dadd(5.83, 147.41, -64.8, 0.5)
	pt3dadd(6, 147.75, -64.8, 0.5)
	pt3dadd(6.17, 147.75, -64.8, 0.5)
  }
  dend[420] {pt3dclear()
	pt3dadd(8, 120.75, -60.84, 0.5)
	pt3dadd(8.33, 120.42, -60.84, 0.5)
	pt3dadd(7.67, 120.42, -60.84, 0.5)
	pt3dadd(7.33, 120.58, -60.84, 0.5)
	pt3dadd(7.17, 120.75, -60.84, 0.5)
	pt3dadd(6.83, 120.75, -60.84, 0.5)
	pt3dadd(6.67, 120.92, -60.84, 0.5)
	pt3dadd(6.5, 121.08, -60.84, 0.5)
	pt3dadd(6.17, 121.25, -60.84, 0.5)
  }
  dend[421] {pt3dclear()
	pt3dadd(6.17, 121.25, -60.84, 0.5)
	pt3dadd(6.85, 121.97, -60.84, 0.5)
  }
  dend[422] {pt3dclear()
	pt3dadd(6.85, 121.97, -60.84, 0.5)
	pt3dadd(6.33, 121.42, -60.84, 0.5)
	pt3dadd(4.83, 121.42, -61.2, 0.5)
	pt3dadd(4.67, 121.58, -61.2, 0.5)
	pt3dadd(2.33, 121.58, -61.2, 0.5)
	pt3dadd(2, 121.42, -61.2, 0.5)
	pt3dadd(1.67, 121.25, -61.2, 0.5)
	pt3dadd(1.17, 121.25, -61.2, 0.5)
	pt3dadd(1, 121.08, -61.2, 0.5)
	pt3dadd(0.17, 121.08, -61.2, 0.5)
	pt3dadd(0, 120.92, -61.2, 0.5)
	pt3dadd(-0.33, 120.92, -61.2, 0.5)
	pt3dadd(-0.5, 121.08, -61.2, 0.5)
	pt3dadd(-0.67, 121.25, -61.2, 0.5)
	pt3dadd(-0.67, 121.58, -61.2, 0.5)
	pt3dadd(-0.83, 121.75, -61.2, 0.5)
	pt3dadd(-1, 121.92, -61.2, 0.5)
	pt3dadd(-1, 122.42, -61.2, 0.5)
	pt3dadd(-1.17, 122.75, -61.2, 0.5)
	pt3dadd(-1.17, 123.25, -61.2, 0.5)
	pt3dadd(-1.33, 123.42, -61.2, 0.5)
	pt3dadd(-1.33, 125.92, -61.2, 0.5)
	pt3dadd(-1.5, 126.08, -61.2, 0.5)
	pt3dadd(-1.5, 126.42, -61.2, 0.5)
	pt3dadd(-1.67, 126.58, -61.2, 0.5)
	pt3dadd(-1.83, 126.75, -61.2, 0.5)
	pt3dadd(-2, 126.92, -61.2, 0.5)
	pt3dadd(-2.17, 127.08, -61.2, 0.5)
	pt3dadd(-2.33, 127.25, -61.2, 0.5)
	pt3dadd(-2.5, 127.42, -61.2, 0.5)
	pt3dadd(-2.67, 127.58, -61.2, 0.5)
	pt3dadd(-2.83, 127.75, -61.2, 0.5)
	pt3dadd(-3.17, 127.75, -61.2, 0.5)
	pt3dadd(-3.33, 128.08, -61.2, 0.5)
	pt3dadd(-3.67, 128.25, -61.2, 0.5)
	pt3dadd(-4.17, 128.75, -61.2, 0.5)
	pt3dadd(-4.5, 128.91, -61.2, 0.5)
	pt3dadd(-4.83, 129.08, -61.2, 0.5)
	pt3dadd(-5, 129.41, -61.2, 0.5)
	pt3dadd(-5.17, 129.58, -61.2, 0.5)
	pt3dadd(-5.33, 129.75, -61.2, 0.5)
	pt3dadd(-5.5, 129.91, -61.2, 0.5)
  }
  dend[423] {pt3dclear()
	pt3dadd(6.85, 121.97, -60.84, 0.5)
	pt3dadd(5.83, 121.25, -61.56, 0.5)
	pt3dadd(5.67, 121.42, -61.56, 0.5)
	pt3dadd(5.33, 121.58, -61.56, 0.5)
	pt3dadd(5, 121.75, -61.56, 0.5)
	pt3dadd(4.83, 121.92, -61.56, 0.5)
	pt3dadd(4.67, 122.08, -61.56, 0.5)
	pt3dadd(4.33, 122.42, -61.56, 0.5)
	pt3dadd(4.17, 122.58, -61.56, 0.5)
	pt3dadd(4, 122.75, -61.56, 0.5)
	pt3dadd(3.83, 122.92, -61.56, 0.5)
	pt3dadd(3.67, 123.25, -61.56, 0.5)
	pt3dadd(3.33, 123.42, -61.56, 0.5)
	pt3dadd(3.17, 123.58, -61.56, 0.5)
	pt3dadd(3.17, 123.92, -61.56, 0.5)
	pt3dadd(3, 124.08, -61.56, 0.5)
	pt3dadd(2.83, 124.25, -61.56, 0.5)
	pt3dadd(2.67, 124.58, -61.56, 0.5)
	pt3dadd(2.67, 124.92, -61.56, 0.5)
	pt3dadd(2.5, 125.08, -61.56, 0.5)
	pt3dadd(2.33, 125.25, -61.56, 0.5)
	pt3dadd(2.17, 125.42, -61.56, 0.5)
	pt3dadd(2, 125.58, -61.56, 0.5)
	pt3dadd(1.83, 125.75, -61.56, 0.5)
	pt3dadd(1.67, 125.92, -61.56, 0.5)
	pt3dadd(1.5, 126.08, -61.56, 0.5)
	pt3dadd(1.33, 126.25, -61.56, 0.5)
	pt3dadd(1.17, 126.42, -61.56, 0.5)
	pt3dadd(0.67, 126.42, -61.56, 0.5)
	pt3dadd(0.5, 126.58, -61.56, 0.5)
	pt3dadd(0.33, 126.75, -61.56, 0.5)
	pt3dadd(0, 126.75, -61.56, 0.5)
	pt3dadd(-0.17, 126.92, -61.56, 0.5)
	pt3dadd(-0.33, 127.08, -61.56, 0.5)
	pt3dadd(-0.67, 127.08, -61.56, 0.5)
	pt3dadd(-0.83, 127.25, -61.56, 0.5)
	pt3dadd(-1, 127.42, -61.56, 0.5)
	pt3dadd(-1.17, 127.58, -61.56, 0.5)
	pt3dadd(-1.33, 127.75, -61.56, 0.5)
	pt3dadd(-1.5, 128.08, -61.56, 0.5)
	pt3dadd(-1.5, 128.25, -61.56, 0.5)
  }
  dend[424] {pt3dclear()
	pt3dadd(6.17, 121.25, -60.84, 0.5)
	pt3dadd(6.17, 121.25, -63, 0.5)
	pt3dadd(6.17, 121.58, -63, 0.5)
	pt3dadd(6, 121.92, -63, 0.5)
	pt3dadd(5.67, 122.25, -63, 0.5)
	pt3dadd(5.5, 122.42, -63, 0.5)
	pt3dadd(5.33, 122.75, -63, 0.5)
	pt3dadd(5.17, 122.92, -63, 0.5)
	pt3dadd(5, 123.08, -63, 0.5)
	pt3dadd(4.83, 123.42, -63, 0.5)
	pt3dadd(4.83, 123.75, -63, 0.5)
	pt3dadd(4.67, 123.92, -63, 0.5)
	pt3dadd(4.5, 124.25, -63, 0.5)
	pt3dadd(4.33, 124.58, -63, 0.5)
	pt3dadd(4.17, 124.75, -63, 0.5)
	pt3dadd(4, 124.92, -63, 0.5)
	pt3dadd(3.83, 125.08, -63, 0.5)
	pt3dadd(3.83, 125.42, -63, 0.5)
	pt3dadd(3.67, 125.58, -63, 0.5)
	pt3dadd(3.5, 125.75, -63, 0.5)
	pt3dadd(3.33, 126.08, -63, 0.5)
	pt3dadd(3.17, 126.25, -63, 0.5)
	pt3dadd(3.17, 126.58, -63, 0.5)
	pt3dadd(3, 126.92, -63, 0.5)
	pt3dadd(2.83, 127.08, -63, 0.5)
	pt3dadd(2.83, 127.75, -63, 0.5)
  }
  dend[425] {pt3dclear()
	pt3dadd(2.83, 127.75, -63, 0.5)
	pt3dadd(3.17, 127.92, -60.84, 0.5)
	pt3dadd(3.17, 128.41, -60.84, 0.5)
	pt3dadd(3.33, 128.75, -60.84, 0.5)
	pt3dadd(3.33, 131.91, -62.64, 0.5)
	pt3dadd(3.5, 132.08, -62.64, 0.5)
	pt3dadd(3.5, 134.41, -62.64, 0.5)
	pt3dadd(3.33, 134.75, -62.64, 0.5)
	pt3dadd(3.33, 135.25, -62.64, 0.5)
	pt3dadd(3.17, 135.58, -62.64, 0.5)
	pt3dadd(3.17, 135.91, -62.64, 0.5)
	pt3dadd(3, 136.08, -62.64, 0.5)
  }
}
proc shape3d_41() {
  dend[425] {	pt3dadd(3, 136.41, -62.64, 0.5)
	pt3dadd(2.83, 136.58, -62.64, 0.5)
	pt3dadd(2.67, 136.91, -62.64, 0.5)
	pt3dadd(2.67, 137.25, -62.64, 0.5)
	pt3dadd(2.5, 137.58, -62.64, 0.5)
	pt3dadd(2.5, 137.91, -62.64, 0.5)
	pt3dadd(2.33, 138.08, -62.64, 0.5)
	pt3dadd(2.17, 138.41, -62.64, 0.5)
	pt3dadd(2, 138.58, -62.64, 0.5)
	pt3dadd(1.83, 138.91, -62.64, 0.5)
	pt3dadd(1.67, 139.08, -62.64, 0.5)
	pt3dadd(1.5, 139.25, -62.64, 0.5)
	pt3dadd(1.5, 139.58, -62.64, 0.5)
	pt3dadd(1.33, 139.75, -62.64, 0.5)
	pt3dadd(1.17, 140.08, -62.64, 0.5)
	pt3dadd(1, 140.08, -62.64, 0.5)
  }
  dend[426] {pt3dclear()
	pt3dadd(1, 140.08, -62.64, 0.5)
	pt3dadd(1.33, 139.75, -62.64, 0.5)
	pt3dadd(0.67, 139.75, -62.64, 0.5)
	pt3dadd(0.33, 140.08, -62.64, 0.5)
	pt3dadd(-0.17, 140.25, -62.64, 0.5)
	pt3dadd(-0.5, 140.58, -62.64, 0.5)
	pt3dadd(-0.67, 140.75, -62.64, 0.5)
	pt3dadd(-1, 141.08, -62.64, 0.5)
	pt3dadd(-1.17, 141.25, -62.64, 0.5)
	pt3dadd(-1.33, 141.41, -62.64, 0.5)
	pt3dadd(-1.5, 141.58, -62.64, 0.5)
	pt3dadd(-1.67, 141.75, -62.64, 0.5)
	pt3dadd(-2, 141.91, -62.64, 0.5)
	pt3dadd(-2.33, 142.25, -62.64, 0.5)
	pt3dadd(-2.5, 142.41, -62.64, 0.5)
	pt3dadd(-2.83, 142.58, -62.64, 0.5)
	pt3dadd(-2.83, 142.91, -62.64, 0.5)
	pt3dadd(-3, 143.08, -62.64, 0.5)
	pt3dadd(-3.33, 143.25, -62.64, 0.5)
	pt3dadd(-3.5, 143.41, -62.64, 0.5)
	pt3dadd(-3.67, 143.75, -62.64, 0.5)
	pt3dadd(-4.5, 144.58, -62.64, 0.5)
	pt3dadd(-4.67, 144.75, -62.64, 0.5)
	pt3dadd(-4.83, 144.91, -62.64, 0.5)
	pt3dadd(-5, 145.25, -62.64, 0.5)
	pt3dadd(-5.17, 145.58, -62.64, 0.5)
	pt3dadd(-5.33, 145.91, -62.64, 0.5)
	pt3dadd(-5.5, 146.41, -62.64, 0.5)
	pt3dadd(-5.67, 146.75, -62.64, 0.5)
	pt3dadd(-5.67, 147.08, -62.64, 0.5)
	pt3dadd(-5.83, 147.25, -62.64, 0.5)
	pt3dadd(-6, 147.58, -62.64, 0.5)
	pt3dadd(-6, 147.91, -62.64, 0.5)
	pt3dadd(-6.17, 147.91, -62.64, 0.5)
  }
  dend[427] {pt3dclear()
	pt3dadd(1, 140.08, -62.64, 0.5)
	pt3dadd(1.17, 140.25, -65.16, 0.5)
	pt3dadd(1.17, 141.41, -65.16, 0.5)
	pt3dadd(1, 141.75, -65.16, 0.5)
	pt3dadd(1, 143.91, -65.16, 0.5)
	pt3dadd(1.17, 144.25, -65.16, 0.5)
	pt3dadd(1.17, 144.58, -65.16, 0.5)
	pt3dadd(1.33, 144.75, -65.16, 0.5)
	pt3dadd(1.5, 145.08, -65.16, 0.5)
	pt3dadd(1.67, 145.41, -65.16, 0.5)
	pt3dadd(1.83, 145.75, -65.16, 0.5)
	pt3dadd(2, 146.08, -65.16, 0.5)
	pt3dadd(2.17, 146.25, -65.16, 0.5)
	pt3dadd(2.17, 146.58, -65.16, 0.5)
	pt3dadd(2.33, 146.75, -65.16, 0.5)
	pt3dadd(2.5, 147.08, -65.16, 0.5)
	pt3dadd(2.5, 147.75, -65.16, 0.5)
	pt3dadd(2.67, 148.08, -65.16, 0.5)
	pt3dadd(2.67, 148.41, -65.16, 0.5)
  }
  dend[428] {pt3dclear()
	pt3dadd(2.83, 127.75, -63, 0.5)
	pt3dadd(3, 127.92, -61.56, 0.5)
	pt3dadd(2.67, 128.25, -61.56, 0.5)
	pt3dadd(2.33, 128.75, -61.56, 0.5)
	pt3dadd(2.17, 129.08, -61.56, 0.5)
	pt3dadd(2.17, 129.41, -61.56, 0.5)
	pt3dadd(2, 129.75, -61.56, 0.5)
	pt3dadd(2, 130.58, -61.56, 0.5)
	pt3dadd(1.83, 130.91, -61.56, 0.5)
	pt3dadd(1.67, 131.08, -61.56, 0.5)
	pt3dadd(1.5, 131.41, -61.56, 0.5)
	pt3dadd(1.33, 131.75, -61.56, 0.5)
	pt3dadd(1.17, 131.91, -61.56, 0.5)
	pt3dadd(1, 132.25, -61.56, 0.5)
	pt3dadd(0.83, 132.58, -61.56, 0.5)
	pt3dadd(0.67, 132.75, -61.56, 0.5)
	pt3dadd(0.5, 132.91, -61.56, 0.5)
	pt3dadd(0.33, 133.25, -61.56, 0.5)
	pt3dadd(0.17, 133.41, -61.56, 0.5)
	pt3dadd(0, 133.58, -61.56, 0.5)
	pt3dadd(-0.17, 133.75, -61.56, 0.5)
	pt3dadd(-0.33, 133.91, -61.56, 0.5)
	pt3dadd(-0.67, 133.91, -61.56, 0.5)
	pt3dadd(-0.83, 134.08, -61.56, 0.5)
	pt3dadd(-1, 134.25, -61.56, 0.5)
	pt3dadd(-1.17, 134.41, -60.48, 0.5)
  }
  dend[429] {pt3dclear()
	pt3dadd(-1.17, 134.41, -60.48, 0.5)
	pt3dadd(-0.5, 134.91, -60.48, 0.5)
	pt3dadd(-1.33, 134.91, -60.48, 0.5)
	pt3dadd(-1.83, 134.75, -60.48, 0.5)
	pt3dadd(-4.33, 134.75, -60.48, 0.5)
	pt3dadd(-4.83, 134.91, -60.48, 0.5)
	pt3dadd(-5.17, 135.08, -60.48, 0.5)
	pt3dadd(-5.5, 135.25, -60.48, 0.5)
	pt3dadd(-5.67, 135.41, -60.48, 0.5)
	pt3dadd(-5.83, 135.58, -60.48, 0.5)
	pt3dadd(-5.83, 135.91, -60.48, 0.5)
	pt3dadd(-6, 136.08, -60.48, 0.5)
	pt3dadd(-6.17, 136.58, -60.48, 0.5)
	pt3dadd(-6.33, 136.91, -60.48, 0.5)
	pt3dadd(-6.5, 137.25, -60.48, 0.5)
	pt3dadd(-6.83, 137.41, -60.48, 0.5)
	pt3dadd(-7, 137.75, -60.48, 0.5)
	pt3dadd(-7.17, 137.91, -60.48, 0.5)
	pt3dadd(-7.33, 138.25, -60.48, 0.5)
	pt3dadd(-7.33, 138.58, -60.48, 0.5)
	pt3dadd(-7.5, 138.75, -60.48, 0.5)
	pt3dadd(-7.5, 139.91, -60.48, 0.5)
	pt3dadd(-7.67, 140.08, -60.48, 0.5)
	pt3dadd(-7.67, 142.41, -60.48, 0.5)
	pt3dadd(-7.83, 142.75, -60.48, 0.5)
	pt3dadd(-7.83, 143.41, -60.48, 0.5)
	pt3dadd(-8, 143.75, -60.48, 0.5)
	pt3dadd(-8, 144.41, -60.48, 0.5)
	pt3dadd(-8.17, 144.75, -60.48, 0.5)
	pt3dadd(-8.17, 145.08, -60.48, 0.5)
  }
  dend[430] {pt3dclear()
	pt3dadd(-1.17, 134.41, -60.48, 0.5)
	pt3dadd(-1, 134.41, -62.64, 0.5)
	pt3dadd(-1.17, 134.75, -62.64, 0.5)
	pt3dadd(-1.33, 135.25, -62.64, 0.5)
	pt3dadd(-1.5, 135.91, -62.64, 0.5)
	pt3dadd(-1.83, 136.41, -62.64, 0.5)
	pt3dadd(-2, 136.75, -62.64, 0.5)
	pt3dadd(-2.17, 137.08, -62.64, 0.5)
	pt3dadd(-2.17, 137.41, -62.64, 0.5)
	pt3dadd(-2.33, 137.75, -62.64, 0.5)
	pt3dadd(-2.5, 137.91, -62.64, 0.5)
	pt3dadd(-2.67, 138.41, -62.64, 0.5)
	pt3dadd(-2.83, 138.75, -62.64, 0.5)
	pt3dadd(-3, 139.25, -62.64, 0.5)
	pt3dadd(-3.17, 139.58, -62.64, 0.5)
	pt3dadd(-3.33, 139.91, -62.64, 0.5)
	pt3dadd(-3.5, 140.25, -62.64, 0.5)
	pt3dadd(-3.83, 140.58, -62.64, 0.5)
	pt3dadd(-4, 140.75, -62.64, 0.5)
	pt3dadd(-4.17, 140.91, -62.64, 0.5)
	pt3dadd(-4.33, 141.25, -62.64, 0.5)
	pt3dadd(-4.67, 141.58, -62.64, 0.5)
	pt3dadd(-4.83, 141.75, -62.64, 0.5)
	pt3dadd(-5.5, 142.41, -62.64, 0.5)
	pt3dadd(-5.67, 142.58, -62.64, 0.5)
	pt3dadd(-12, 142.58, -62.64, 0.5)
  }
  dend[431] {pt3dclear()
	pt3dadd(11.5, 110.92, -58.68, 0.5)
	pt3dadd(11.5, 110.58, -60.48, 0.5)
	pt3dadd(11.67, 110.75, -60.48, 0.5)
	pt3dadd(11.67, 111.42, -60.48, 0.5)
	pt3dadd(11.5, 111.75, -60.48, 0.5)
	pt3dadd(11.5, 112.42, -60.48, 0.5)
	pt3dadd(11.33, 112.92, -60.48, 0.5)
	pt3dadd(11.33, 114.25, -60.48, 0.5)
	pt3dadd(11.5, 114.92, -60.48, 0.5)
	pt3dadd(11.5, 115.58, -60.48, 0.5)
	pt3dadd(11.67, 116.08, -60.48, 0.5)
	pt3dadd(11.67, 116.58, -60.48, 0.5)
	pt3dadd(11.83, 116.75, -60.48, 0.5)
	pt3dadd(11.83, 117.58, -60.48, 0.5)
	pt3dadd(12, 117.92, -60.48, 0.5)
	pt3dadd(12, 119.58, -60.48, 0.5)
	pt3dadd(12.17, 119.75, -60.48, 0.5)
	pt3dadd(12.17, 120.08, -60.48, 0.5)
  }
  dend[432] {pt3dclear()
	pt3dadd(12.17, 120.08, -60.48, 0.5)
	pt3dadd(12.83, 119.92, -60.48, 0.5)
	pt3dadd(13.17, 120.08, -60.48, 0.5)
	pt3dadd(13.33, 120.25, -60.48, 0.5)
	pt3dadd(13.67, 120.42, -60.48, 0.5)
	pt3dadd(14.17, 120.92, -60.48, 0.5)
	pt3dadd(15, 121.42, -60.48, 0.5)
	pt3dadd(15.33, 121.58, -60.48, 0.5)
	pt3dadd(15.5, 121.75, -60.48, 0.5)
	pt3dadd(15.67, 121.92, -60.48, 0.5)
	pt3dadd(15.83, 122.08, -60.48, 0.5)
	pt3dadd(16, 122.25, -60.48, 0.5)
	pt3dadd(16, 122.75, -60.48, 0.5)
	pt3dadd(16.17, 122.92, -60.48, 0.5)
  }
  dend[433] {pt3dclear()
	pt3dadd(12.17, 120.08, -60.48, 0.5)
	pt3dadd(12.17, 120.08, -62.28, 0.5)
	pt3dadd(12.33, 120.42, -62.28, 0.5)
	pt3dadd(12.33, 121.25, -62.28, 0.5)
	pt3dadd(12.17, 121.58, -62.28, 0.5)
	pt3dadd(12, 121.92, -62.28, 0.5)
	pt3dadd(12, 123.92, -62.28, 0.5)
	pt3dadd(11.83, 124.08, -62.28, 0.5)
	pt3dadd(11.83, 124.58, -62.28, 0.5)
	pt3dadd(11.83, 124.42, -62.28, 0.5)
  }
  dend[434] {pt3dclear()
	pt3dadd(11.83, 124.42, -62.28, 0.5)
	pt3dadd(12.17, 124.42, -62.28, 0.5)
	pt3dadd(12.17, 124.75, -62.28, 0.5)
	pt3dadd(12, 125.08, -62.28, 0.5)
	pt3dadd(11.83, 125.42, -62.28, 0.5)
	pt3dadd(11.67, 125.75, -62.28, 0.5)
	pt3dadd(11.5, 126.08, -62.28, 0.5)
  }
}
proc shape3d_42() {
  dend[434] {	pt3dadd(11.33, 126.42, -62.28, 0.5)
	pt3dadd(11.33, 126.75, -62.28, 0.5)
	pt3dadd(11.17, 127.08, -62.28, 0.5)
	pt3dadd(11.17, 127.42, -62.28, 0.5)
	pt3dadd(11, 127.75, -62.28, 0.5)
	pt3dadd(11, 128.25, -62.28, 0.5)
	pt3dadd(10.83, 128.58, -62.28, 0.5)
	pt3dadd(10.83, 129.08, -62.28, 0.5)
	pt3dadd(10.67, 129.41, -62.28, 0.5)
	pt3dadd(10.67, 130.08, -62.28, 0.5)
	pt3dadd(10.5, 130.25, -62.28, 0.5)
	pt3dadd(10.5, 130.58, -62.28, 0.5)
	pt3dadd(10.33, 130.91, -62.28, 0.5)
	pt3dadd(10.17, 131.08, -62.28, 0.5)
	pt3dadd(10.17, 131.75, -62.28, 0.5)
	pt3dadd(10, 131.91, -62.28, 0.5)
	pt3dadd(10, 132.25, -62.28, 0.5)
	pt3dadd(9.83, 132.58, -62.28, 0.5)
	pt3dadd(9.67, 132.75, -62.28, 0.5)
	pt3dadd(9.67, 133.08, -62.28, 0.5)
	pt3dadd(9.5, 133.41, -62.28, 0.5)
	pt3dadd(9.33, 133.58, -62.28, 0.5)
	pt3dadd(9.17, 133.91, -62.28, 0.5)
	pt3dadd(9, 134.08, -62.28, 0.5)
  }
  dend[435] {pt3dclear()
	pt3dadd(11.83, 124.42, -62.28, 0.5)
	pt3dadd(11.67, 124.25, -61.92, 0.5)
	pt3dadd(11.83, 124.42, -61.92, 0.5)
	pt3dadd(11.83, 124.92, -61.92, 0.5)
	pt3dadd(12, 125.25, -61.92, 0.5)
	pt3dadd(12, 125.92, -61.92, 0.5)
	pt3dadd(12.17, 126.08, -61.92, 0.5)
	pt3dadd(12.17, 126.42, -61.92, 0.5)
	pt3dadd(12.33, 126.75, -61.92, 0.5)
	pt3dadd(12.33, 127.25, -61.92, 0.5)
	pt3dadd(12.5, 127.58, -61.92, 0.5)
	pt3dadd(12.5, 130.25, -61.92, 0.5)
	pt3dadd(12.33, 130.41, -61.92, 0.5)
	pt3dadd(12.33, 130.91, -61.92, 0.5)
	pt3dadd(12.17, 131.08, -61.92, 0.5)
	pt3dadd(12.17, 131.91, -61.92, 0.5)
	pt3dadd(12, 132.08, -61.92, 0.5)
	pt3dadd(12, 132.91, -61.92, 0.5)
	pt3dadd(11.83, 133.08, -61.92, 0.5)
	pt3dadd(11.83, 133.41, -61.92, 0.5)
	pt3dadd(11.67, 133.75, -61.92, 0.5)
	pt3dadd(11.5, 133.75, -61.92, 0.5)
  }
  dend[436] {pt3dclear()
	pt3dadd(14.83, 105.58, -58.68, 0.5)
	pt3dadd(15.33, 105.92, -60.48, 0.5)
	pt3dadd(15.5, 106.08, -60.48, 0.5)
	pt3dadd(15.67, 106.25, -60.48, 0.5)
	pt3dadd(15.83, 106.58, -60.48, 0.5)
	pt3dadd(16, 106.75, -60.48, 0.5)
	pt3dadd(16.5, 107.25, -60.48, 0.5)
	pt3dadd(16.67, 107.58, -60.48, 0.5)
	pt3dadd(16.82, 107.92, -60.48, 0.5)
	pt3dadd(17, 108.08, -60.48, 0.5)
	pt3dadd(17.17, 108.42, -60.48, 0.5)
	pt3dadd(17.17, 108.92, -60.48, 0.5)
	pt3dadd(17.32, 109.08, -60.48, 0.5)
	pt3dadd(17.5, 109.42, -60.48, 0.5)
	pt3dadd(17.5, 110.08, -60.48, 0.5)
	pt3dadd(17.67, 110.25, -60.48, 0.5)
	pt3dadd(17.82, 110.42, -60.48, 0.5)
	pt3dadd(17.82, 111.08, -60.48, 0.5)
	pt3dadd(18, 111.25, -60.48, 0.5)
  }
  dend[437] {pt3dclear()
	pt3dadd(18, 111.25, -60.48, 0.5)
	pt3dadd(18.67, 111.58, -60.48, 0.5)
	pt3dadd(18.82, 111.75, -60.48, 0.5)
	pt3dadd(19, 111.92, -60.48, 0.5)
	pt3dadd(19.17, 112.08, -60.48, 0.5)
	pt3dadd(19.67, 112.58, -60.48, 0.5)
	pt3dadd(20, 112.75, -60.48, 0.5)
	pt3dadd(20.17, 112.92, -60.48, 0.5)
	pt3dadd(20.17, 112.75, -60.48, 0.5)
  }
  dend[438] {pt3dclear()
	pt3dadd(20.17, 112.75, -60.48, 0.5)
	pt3dadd(20.32, 112.75, -63.72, 0.5)
	pt3dadd(20.32, 113.42, -63.72, 0.5)
	pt3dadd(20.17, 113.75, -63.72, 0.5)
	pt3dadd(20.17, 116.25, -63.72, 0.5)
	pt3dadd(20.32, 116.42, -63.72, 0.5)
	pt3dadd(20.32, 117.08, -63.72, 0.5)
	pt3dadd(20.5, 117.25, -63.72, 0.5)
	pt3dadd(20.5, 119.25, -63.72, 0.5)
	pt3dadd(20.67, 119.58, -63.72, 0.5)
	pt3dadd(20.67, 120.92, -63.72, 0.5)
  }
  dend[439] {pt3dclear()
	pt3dadd(20.67, 120.92, -63.72, 0.5)
	pt3dadd(21.17, 121.08, -63.72, 0.5)
	pt3dadd(21, 121.25, -63.72, 0.5)
	pt3dadd(20.5, 121.75, -63.72, 0.5)
	pt3dadd(20, 122.08, -63.72, 0.5)
	pt3dadd(19.67, 122.25, -63.72, 0.5)
	pt3dadd(19.67, 122.58, -63.72, 0.5)
	pt3dadd(19.5, 122.92, -63.72, 0.5)
	pt3dadd(19.32, 123.25, -63.72, 0.5)
	pt3dadd(19.17, 123.42, -63.72, 0.5)
	pt3dadd(19.17, 123.75, -63.72, 0.5)
	pt3dadd(19, 124.08, -63.72, 0.5)
	pt3dadd(18.82, 124.25, -63.72, 0.5)
  }
  dend[440] {pt3dclear()
	pt3dadd(18.82, 124.25, -63.72, 0.5)
	pt3dadd(19.17, 123.92, -63.72, 0.5)
	pt3dadd(19, 124.08, -63.72, 0.5)
	pt3dadd(18.67, 124.08, -63.72, 0.5)
	pt3dadd(18.32, 124.25, -63.72, 0.5)
	pt3dadd(17.82, 124.42, -63.72, 0.5)
	pt3dadd(17.5, 124.42, -63.72, 0.5)
	pt3dadd(17.17, 124.58, -63.72, 0.5)
	pt3dadd(17, 124.75, -63.72, 0.5)
	pt3dadd(16.82, 124.92, -62.28, 0.5)
	pt3dadd(16.82, 125.25, -62.28, 0.5)
	pt3dadd(16.67, 125.42, -62.28, 0.5)
	pt3dadd(16.32, 125.58, -62.28, 0.5)
	pt3dadd(16.17, 125.75, -62.28, 0.5)
	pt3dadd(16, 125.92, -62.28, 0.5)
	pt3dadd(15.67, 125.92, -62.28, 0.5)
	pt3dadd(15.5, 126.08, -62.28, 0.5)
	pt3dadd(15.33, 126.25, -62.28, 0.5)
	pt3dadd(15.33, 126.58, -62.28, 0.5)
	pt3dadd(15.17, 126.75, -64.08, 0.5)
	pt3dadd(15.17, 127.25, -64.08, 0.5)
	pt3dadd(15, 127.42, -64.08, 0.5)
	pt3dadd(14.83, 127.75, -64.08, 0.5)
	pt3dadd(14.83, 128.41, -64.08, 0.5)
	pt3dadd(14.67, 128.58, -64.08, 0.5)
	pt3dadd(14.67, 131.25, -64.08, 0.5)
	pt3dadd(14.5, 131.41, -64.08, 0.5)
	pt3dadd(14.5, 132.08, -64.08, 0.5)
  }
  dend[441] {pt3dclear()
	pt3dadd(14.5, 132.08, -64.08, 0.5)
	pt3dadd(15.33, 132.25, -64.08, 0.5)
	pt3dadd(15.33, 133.75, -64.08, 0.5)
	pt3dadd(15.5, 134.08, -64.08, 0.5)
	pt3dadd(15.67, 134.41, -64.08, 0.5)
	pt3dadd(15.83, 134.58, -64.08, 0.5)
	pt3dadd(15.83, 134.91, -64.08, 0.5)
	pt3dadd(16, 135.08, -64.08, 0.5)
	pt3dadd(16.17, 135.25, -64.08, 0.5)
	pt3dadd(16.17, 135.58, -64.08, 0.5)
	pt3dadd(16.32, 135.58, -64.08, 0.5)
  }
  dend[442] {pt3dclear()
	pt3dadd(14.5, 132.08, -64.08, 0.5)
	pt3dadd(14.5, 131.91, -65.16, 0.5)
	pt3dadd(14.5, 133.08, -65.16, 0.5)
	pt3dadd(14.33, 133.41, -65.16, 0.5)
	pt3dadd(14.33, 134.91, -65.16, 0.5)
  }
  dend[443] {pt3dclear()
	pt3dadd(14.33, 134.91, -65.16, 0.5)
	pt3dadd(14.5, 135.08, -63.72, 0.5)
	pt3dadd(14.33, 135.25, -63.72, 0.5)
	pt3dadd(13.83, 135.75, -63.72, 0.5)
	pt3dadd(13.67, 135.91, -63.72, 0.5)
	pt3dadd(13.5, 136.25, -63.72, 0.5)
	pt3dadd(13.33, 136.41, -63.72, 0.5)
	pt3dadd(13.33, 137.08, -63.72, 0.5)
	pt3dadd(13.17, 137.25, -63.72, 0.5)
	pt3dadd(13.17, 137.75, -63.72, 0.5)
	pt3dadd(13, 138.08, -63.72, 0.5)
	pt3dadd(13, 138.41, -63.72, 0.5)
	pt3dadd(12.83, 138.75, -63.72, 0.5)
	pt3dadd(12.83, 142.25, -63.72, 0.5)
	pt3dadd(12.67, 142.75, -63.72, 0.5)
	pt3dadd(12.67, 143.75, -63.72, 0.5)
	pt3dadd(12.5, 144.08, -63.72, 0.5)
	pt3dadd(12.33, 144.41, -63.72, 0.5)
	pt3dadd(12.33, 144.75, -63.72, 0.5)
	pt3dadd(12.17, 144.91, -63.72, 0.5)
	pt3dadd(12, 145.25, -63.72, 0.5)
	pt3dadd(12, 145.75, -63.72, 0.5)
	pt3dadd(11.83, 145.75, -63.72, 0.5)
  }
  dend[444] {pt3dclear()
	pt3dadd(14.33, 134.91, -65.16, 0.5)
	pt3dadd(14.33, 135.25, -67.68, 0.5)
	pt3dadd(14.5, 135.58, -67.68, 0.5)
	pt3dadd(14.5, 138.25, -67.68, 0.5)
	pt3dadd(14.33, 138.58, -67.68, 0.5)
	pt3dadd(14.33, 139.08, -67.68, 0.5)
	pt3dadd(14.5, 139.41, -67.68, 0.5)
	pt3dadd(14.5, 141.08, -67.68, 0.5)
	pt3dadd(14.67, 141.41, -67.68, 0.5)
	pt3dadd(14.67, 141.75, -67.68, 0.5)
	pt3dadd(14.83, 142.08, -67.68, 0.5)
	pt3dadd(14.83, 145.75, -67.68, 0.5)
	pt3dadd(14.67, 145.75, -67.68, 0.5)
  }
  dend[445] {pt3dclear()
	pt3dadd(18.82, 124.25, -63.72, 0.5)
	pt3dadd(19, 124.08, -63.36, 0.5)
	pt3dadd(19, 126.08, -63.36, 0.5)
	pt3dadd(18.82, 126.75, -63.36, 0.5)
	pt3dadd(18.82, 130.58, -63.36, 0.5)
	pt3dadd(18.67, 130.91, -63.36, 0.5)
	pt3dadd(18.67, 134.08, -63.36, 0.5)
  }
  dend[446] {pt3dclear()
	pt3dadd(18.67, 134.08, -63.36, 0.5)
	pt3dadd(18.82, 134.25, -65.16, 0.5)
	pt3dadd(18.82, 134.75, -65.16, 0.5)
	pt3dadd(18.67, 134.91, -65.16, 0.5)
	pt3dadd(18.5, 135.25, -65.16, 0.5)
	pt3dadd(18.32, 135.41, -65.16, 0.5)
	pt3dadd(18.17, 135.75, -65.16, 0.5)
	pt3dadd(18, 135.91, -65.16, 0.5)
	pt3dadd(18, 136.25, -65.16, 0.5)
	pt3dadd(17.82, 136.41, -65.16, 0.5)
	pt3dadd(17.67, 136.75, -65.16, 0.5)
	pt3dadd(17.32, 137.08, -65.16, 0.5)
	pt3dadd(17.17, 137.25, -65.16, 0.5)
	pt3dadd(17.17, 137.58, -65.16, 0.5)
	pt3dadd(17, 137.75, -65.16, 0.5)
  }
}
proc shape3d_43() {
  dend[446] {	pt3dadd(16.67, 138.08, -65.16, 0.5)
	pt3dadd(16.5, 138.25, -65.16, 0.5)
	pt3dadd(16.5, 138.58, -65.16, 0.5)
	pt3dadd(16.32, 138.75, -65.16, 0.5)
	pt3dadd(16, 139.08, -65.16, 0.5)
	pt3dadd(15.83, 139.41, -65.16, 0.5)
	pt3dadd(15.67, 139.75, -65.16, 0.5)
	pt3dadd(14.83, 140.58, -65.16, 0.5)
	pt3dadd(14.67, 140.75, -65.16, 0.5)
	pt3dadd(14.5, 140.91, -65.16, 0.5)
	pt3dadd(14.33, 141.25, -65.16, 0.5)
	pt3dadd(14, 141.41, -65.16, 0.5)
	pt3dadd(13.83, 141.58, -65.16, 0.5)
	pt3dadd(13.67, 141.75, -65.16, 0.5)
	pt3dadd(13.33, 141.91, -65.16, 0.5)
	pt3dadd(11.83, 141.91, -65.16, 0.5)
	pt3dadd(11.67, 142.08, -65.16, 0.5)
	pt3dadd(10, 142.08, -65.16, 0.5)
  }
  dend[447] {pt3dclear()
	pt3dadd(18.67, 134.08, -63.36, 0.5)
	pt3dadd(19, 134.25, -65.52, 0.5)
	pt3dadd(19.17, 134.41, -65.52, 0.5)
	pt3dadd(19.17, 134.75, -65.16, 0.5)
	pt3dadd(19.32, 134.91, -65.16, 0.5)
	pt3dadd(19.5, 135.08, -65.16, 0.5)
	pt3dadd(19.67, 135.25, -65.16, 0.5)
	pt3dadd(19.82, 135.41, -65.16, 0.5)
	pt3dadd(20.17, 135.75, -65.16, 0.5)
	pt3dadd(20.32, 135.91, -65.16, 0.5)
	pt3dadd(20.67, 136.08, -65.16, 0.5)
	pt3dadd(21, 136.25, -65.16, 0.5)
	pt3dadd(21.17, 136.58, -65.16, 0.5)
	pt3dadd(21.5, 136.75, -65.16, 0.5)
	pt3dadd(21.83, 137.08, -65.16, 0.5)
	pt3dadd(22, 137.25, -65.16, 0.5)
	pt3dadd(22.33, 137.58, -65.16, 0.5)
	pt3dadd(22.5, 137.75, -65.16, 0.5)
	pt3dadd(22.5, 138.25, -65.16, 0.5)
	pt3dadd(22.67, 138.41, -65.16, 0.5)
	pt3dadd(22.67, 140.08, -65.16, 0.5)
  }
  dend[448] {pt3dclear()
	pt3dadd(22.67, 140.08, -65.16, 0.5)
	pt3dadd(22.83, 139.91, -65.16, 0.5)
	pt3dadd(22.83, 140.58, -65.16, 0.5)
	pt3dadd(22.67, 140.91, -65.16, 0.5)
	pt3dadd(22.5, 141.41, -65.16, 0.5)
	pt3dadd(22.33, 141.75, -65.16, 0.5)
	pt3dadd(22.17, 142.08, -65.16, 0.5)
	pt3dadd(22.17, 142.41, -65.16, 0.5)
	pt3dadd(22, 142.58, -65.16, 0.5)
	pt3dadd(21.67, 142.91, -65.16, 0.5)
	pt3dadd(21.5, 143.08, -65.16, 0.5)
	pt3dadd(21.33, 143.41, -65.16, 0.5)
	pt3dadd(21.17, 143.58, -65.16, 0.5)
	pt3dadd(20.67, 144.08, -65.16, 0.5)
	pt3dadd(20.5, 144.25, -65.16, 0.5)
	pt3dadd(20.32, 144.41, -65.16, 0.5)
	pt3dadd(20.17, 144.58, -65.16, 0.5)
	pt3dadd(19.82, 144.91, -65.16, 0.5)
	pt3dadd(19.67, 145.08, -65.16, 0.5)
	pt3dadd(19.5, 145.41, -65.16, 0.5)
	pt3dadd(19.32, 145.58, -65.16, 0.5)
	pt3dadd(19.17, 145.91, -65.16, 0.5)
	pt3dadd(19, 146.25, -65.16, 0.5)
	pt3dadd(18.82, 146.58, -65.16, 0.5)
	pt3dadd(18.82, 146.91, -65.16, 0.5)
	pt3dadd(18.67, 147.08, -65.16, 0.5)
  }
  dend[449] {pt3dclear()
	pt3dadd(22.67, 140.08, -65.16, 0.5)
	pt3dadd(22.83, 140.41, -67.68, 0.5)
	pt3dadd(22.83, 140.75, -67.68, 0.5)
	pt3dadd(23, 140.91, -67.68, 0.5)
	pt3dadd(23.17, 141.08, -67.68, 0.5)
	pt3dadd(23.17, 141.41, -67.68, 0.5)
	pt3dadd(23.33, 141.58, -67.68, 0.5)
	pt3dadd(23.5, 141.75, -67.68, 0.5)
	pt3dadd(23.67, 141.91, -67.68, 0.5)
	pt3dadd(24, 142.08, -67.68, 0.5)
	pt3dadd(24.17, 142.25, -67.68, 0.5)
	pt3dadd(24.5, 142.25, -67.68, 0.5)
	pt3dadd(24.83, 142.41, -67.68, 0.5)
	pt3dadd(25.17, 142.41, -67.68, 0.5)
	pt3dadd(25.5, 142.58, -67.68, 0.5)
	pt3dadd(26.17, 142.58, -67.68, 0.5)
	pt3dadd(26.5, 142.75, -67.68, 0.5)
	pt3dadd(26.83, 142.75, -67.68, 0.5)
	pt3dadd(27, 142.91, -67.68, 0.5)
	pt3dadd(27.33, 142.91, -67.68, 0.5)
	pt3dadd(27.67, 143.08, -67.68, 0.5)
	pt3dadd(28, 143.08, -67.68, 0.5)
	pt3dadd(28.17, 143.25, -67.68, 0.5)
	pt3dadd(28.5, 143.25, -67.68, 0.5)
	pt3dadd(28.83, 143.41, -67.68, 0.5)
	pt3dadd(29.17, 143.58, -67.68, 0.5)
	pt3dadd(29.5, 143.75, -67.68, 0.5)
	pt3dadd(29.83, 143.75, -67.68, 0.5)
	pt3dadd(30, 143.91, -67.68, 0.5)
	pt3dadd(30.17, 144.08, -67.68, 0.5)
	pt3dadd(30.5, 144.08, -67.68, 0.5)
	pt3dadd(30.67, 144.25, -67.68, 0.5)
	pt3dadd(31, 144.41, -67.68, 0.5)
	pt3dadd(31.17, 144.58, -67.68, 0.5)
  }
  dend[450] {pt3dclear()
	pt3dadd(20.67, 120.92, -63.72, 0.5)
	pt3dadd(21, 121.08, -65.16, 0.5)
	pt3dadd(21.17, 121.25, -65.16, 0.5)
	pt3dadd(21.17, 121.92, -65.16, 0.5)
	pt3dadd(21.33, 122.08, -65.16, 0.5)
	pt3dadd(21.33, 122.42, -65.16, 0.5)
	pt3dadd(21.5, 122.58, -65.16, 0.5)
	pt3dadd(21.67, 122.75, -65.16, 0.5)
	pt3dadd(21.83, 123.08, -65.16, 0.5)
	pt3dadd(22, 123.25, -65.16, 0.5)
	pt3dadd(22.17, 123.42, -65.16, 0.5)
	pt3dadd(22.33, 123.75, -65.16, 0.5)
	pt3dadd(22.33, 123.58, -65.16, 0.5)
  }
  dend[451] {pt3dclear()
	pt3dadd(22.33, 123.58, -65.16, 0.5)
	pt3dadd(23, 123.58, -65.16, 0.5)
	pt3dadd(22.83, 123.75, -65.16, 0.5)
	pt3dadd(22.83, 124.08, -65.16, 0.5)
	pt3dadd(22.67, 124.42, -65.16, 0.5)
	pt3dadd(22.5, 124.75, -65.16, 0.5)
	pt3dadd(22.33, 125.08, -65.16, 0.5)
	pt3dadd(22.17, 125.42, -65.16, 0.5)
	pt3dadd(22.17, 125.75, -65.16, 0.5)
	pt3dadd(22, 126.08, -65.16, 0.5)
	pt3dadd(22, 126.75, -65.16, 0.5)
	pt3dadd(21.83, 127.08, -65.16, 0.5)
	pt3dadd(21.83, 129.91, -65.16, 0.5)
  }
  dend[452] {pt3dclear()
	pt3dadd(21.83, 129.91, -65.16, 0.5)
	pt3dadd(22.33, 129.58, -65.16, 0.5)
	pt3dadd(22.17, 129.91, -65.16, 0.5)
	pt3dadd(21, 131.08, -65.16, 0.5)
	pt3dadd(20.83, 131.25, -65.16, 0.5)
	pt3dadd(20.83, 132.08, -65.16, 0.5)
	pt3dadd(20.67, 132.41, -65.16, 0.5)
	pt3dadd(20.67, 133.41, -65.16, 0.5)
	pt3dadd(20.83, 133.58, -65.16, 0.5)
	pt3dadd(20.83, 134.08, -65.16, 0.5)
	pt3dadd(21, 134.25, -65.16, 0.5)
	pt3dadd(21, 134.58, -65.16, 0.5)
  }
  dend[453] {pt3dclear()
	pt3dadd(21.83, 129.91, -65.16, 0.5)
	pt3dadd(22, 129.58, -65.52, 0.5)
	pt3dadd(22.17, 129.75, -65.52, 0.5)
	pt3dadd(22.17, 133.41, -65.52, 0.5)
	pt3dadd(22.33, 133.58, -65.52, 0.5)
	pt3dadd(22.5, 133.91, -65.52, 0.5)
	pt3dadd(22.67, 134.08, -65.52, 0.5)
	pt3dadd(22.83, 134.25, -65.52, 0.5)
	pt3dadd(23, 134.41, -65.52, 0.5)
	pt3dadd(23.17, 134.58, -65.52, 0.5)
	pt3dadd(23.33, 134.91, -65.52, 0.5)
	pt3dadd(23.5, 135.08, -65.52, 0.5)
	pt3dadd(23.83, 135.25, -65.52, 0.5)
	pt3dadd(24.17, 135.41, -65.52, 0.5)
	pt3dadd(24.5, 135.58, -65.52, 0.5)
	pt3dadd(24.83, 135.75, -65.52, 0.5)
	pt3dadd(25.5, 136.41, -65.52, 0.5)
	pt3dadd(25.67, 136.58, -65.52, 0.5)
	pt3dadd(25.83, 136.75, -65.52, 0.5)
	pt3dadd(26, 137.08, -65.52, 0.5)
	pt3dadd(26.17, 137.25, -65.52, 0.5)
	pt3dadd(26.17, 137.58, -65.52, 0.5)
	pt3dadd(26.33, 137.75, -65.52, 0.5)
	pt3dadd(26.5, 137.91, -65.52, 0.5)
	pt3dadd(26.5, 138.25, -65.52, 0.5)
	pt3dadd(26.67, 138.58, -65.52, 0.5)
	pt3dadd(26.67, 138.91, -65.52, 0.5)
	pt3dadd(26.83, 139.25, -65.52, 0.5)
	pt3dadd(26.83, 139.91, -65.52, 0.5)
	pt3dadd(27, 140.25, -65.52, 0.5)
	pt3dadd(27, 141.91, -65.52, 0.5)
  }
  dend[454] {pt3dclear()
	pt3dadd(22.33, 123.58, -65.16, 0.5)
	pt3dadd(22.5, 123.92, -65.16, 0.5)
	pt3dadd(23.5, 123.92, -65.16, 0.5)
	pt3dadd(23.67, 123.75, -65.16, 0.5)
	pt3dadd(23.83, 123.92, -65.16, 0.5)
	pt3dadd(24.17, 123.92, -65.16, 0.5)
	pt3dadd(24.33, 124.25, -65.16, 0.5)
	pt3dadd(24.33, 125.58, -65.16, 0.5)
	pt3dadd(24.5, 125.92, -65.16, 0.5)
	pt3dadd(24.5, 126.42, -65.16, 0.5)
	pt3dadd(24.67, 126.75, -65.16, 0.5)
	pt3dadd(24.67, 127.25, -65.16, 0.5)
	pt3dadd(24.83, 127.42, -65.16, 0.5)
	pt3dadd(24.83, 127.92, -65.16, 0.5)
	pt3dadd(25, 128.08, -65.16, 0.5)
	pt3dadd(25, 128.58, -65.16, 0.5)
	pt3dadd(25.17, 128.58, -65.16, 0.5)
  }
  dend[455] {pt3dclear()
	pt3dadd(25.17, 128.58, -65.16, 0.5)
	pt3dadd(25.5, 129.08, -65.16, 0.5)
	pt3dadd(25.67, 129.25, -65.16, 0.5)
	pt3dadd(25.5, 129.58, -65.16, 0.5)
	pt3dadd(25.33, 129.91, -65.16, 0.5)
	pt3dadd(25.17, 130.08, -65.16, 0.5)
	pt3dadd(25.17, 131.58, -65.16, 0.5)
	pt3dadd(25.33, 131.91, -65.16, 0.5)
	pt3dadd(25.5, 132.08, -65.16, 0.5)
	pt3dadd(25.5, 132.41, -65.16, 0.5)
	pt3dadd(25.67, 132.75, -65.16, 0.5)
	pt3dadd(25.83, 132.91, -65.16, 0.5)
	pt3dadd(25.83, 133.41, -65.16, 0.5)
	pt3dadd(25.83, 133.25, -65.16, 0.5)
  }
  dend[456] {pt3dclear()
	pt3dadd(25.83, 133.25, -65.16, 0.5)
  }
}
proc shape3d_44() {
  dend[456] {	pt3dadd(26.33, 133.41, -65.16, 0.5)
	pt3dadd(26.33, 133.91, -65.16, 0.5)
	pt3dadd(26.5, 134.25, -65.16, 0.5)
	pt3dadd(26.5, 135.08, -65.16, 0.5)
	pt3dadd(26.67, 135.25, -65.16, 0.5)
	pt3dadd(26.83, 135.58, -65.16, 0.5)
	pt3dadd(27, 135.75, -65.16, 0.5)
	pt3dadd(27.17, 136.08, -65.16, 0.5)
	pt3dadd(27.17, 136.41, -65.16, 0.5)
	pt3dadd(27.33, 136.58, -65.16, 0.5)
	pt3dadd(27.5, 136.75, -65.16, 0.5)
	pt3dadd(27.67, 136.91, -65.16, 0.5)
	pt3dadd(27.83, 137.08, -65.16, 0.5)
	pt3dadd(28, 137.25, -65.16, 0.5)
	pt3dadd(28.17, 137.41, -65.16, 0.5)
	pt3dadd(28.33, 137.58, -65.16, 0.5)
	pt3dadd(28.5, 137.91, -65.16, 0.5)
	pt3dadd(28.67, 138.08, -65.16, 0.5)
	pt3dadd(28.83, 138.25, -65.16, 0.5)
	pt3dadd(29, 138.41, -65.16, 0.5)
	pt3dadd(29, 138.58, -65.16, 0.5)
  }
  dend[457] {pt3dclear()
	pt3dadd(25.83, 133.25, -65.16, 0.5)
	pt3dadd(25.83, 133.41, -67.68, 0.5)
	pt3dadd(26, 133.25, -67.68, 0.5)
	pt3dadd(26, 132.91, -67.68, 0.5)
	pt3dadd(26.5, 132.41, -67.68, 0.5)
	pt3dadd(26.67, 132.58, -67.68, 0.5)
	pt3dadd(27.33, 132.58, -67.68, 0.5)
	pt3dadd(27.83, 132.41, -67.68, 0.5)
	pt3dadd(30.5, 132.41, -67.68, 0.5)
	pt3dadd(30.67, 132.25, -67.68, 0.5)
	pt3dadd(31, 132.25, -67.68, 0.5)
	pt3dadd(31.83, 131.91, -67.68, 0.5)
	pt3dadd(32.33, 131.75, -67.68, 0.5)
	pt3dadd(32.67, 131.75, -67.68, 0.5)
	pt3dadd(33.17, 131.58, -67.68, 0.5)
	pt3dadd(33.83, 131.41, -67.68, 0.5)
	pt3dadd(34.17, 131.25, -67.68, 0.5)
	pt3dadd(34.33, 131.08, -67.68, 0.5)
	pt3dadd(34.67, 131.08, -67.68, 0.5)
	pt3dadd(34.83, 130.91, -67.68, 0.5)
	pt3dadd(35.17, 130.75, -67.68, 0.5)
	pt3dadd(35.83, 130.75, -67.68, 0.5)
	pt3dadd(36, 130.58, -67.68, 0.5)
	pt3dadd(36.5, 130.58, -67.68, 0.5)
  }
  dend[458] {pt3dclear()
	pt3dadd(25.17, 128.58, -65.16, 0.5)
	pt3dadd(25.17, 129.08, -64.44, 0.5)
	pt3dadd(25.5, 129.08, -64.44, 0.5)
	pt3dadd(25.67, 128.91, -64.44, 0.5)
	pt3dadd(25.83, 128.75, -64.44, 0.5)
	pt3dadd(26.33, 128.75, -64.44, 0.5)
	pt3dadd(26.5, 128.58, -64.44, 0.5)
	pt3dadd(26.83, 128.58, -64.44, 0.5)
	pt3dadd(27.17, 128.41, -64.44, 0.5)
	pt3dadd(27.5, 128.41, -64.44, 0.5)
	pt3dadd(27.83, 128.25, -64.44, 0.5)
	pt3dadd(28.67, 128.25, -64.44, 0.5)
	pt3dadd(28.83, 128.41, -64.44, 0.5)
	pt3dadd(29.17, 128.58, -64.44, 0.5)
	pt3dadd(29.5, 128.75, -64.44, 0.5)
	pt3dadd(29.83, 128.75, -64.44, 0.5)
	pt3dadd(29.83, 129.08, -64.44, 0.5)
	pt3dadd(30, 129.25, -64.44, 0.5)
	pt3dadd(30.17, 129.25, -64.44, 0.5)
  }
  dend[459] {pt3dclear()
	pt3dadd(30.17, 129.25, -64.44, 0.5)
	pt3dadd(30.67, 129.41, -64.44, 0.5)
	pt3dadd(30.83, 129.58, -64.44, 0.5)
	pt3dadd(30.83, 131.25, -64.44, 0.5)
	pt3dadd(31, 131.41, -64.44, 0.5)
	pt3dadd(31.17, 131.75, -64.44, 0.5)
	pt3dadd(31.67, 132.25, -64.44, 0.5)
	pt3dadd(32, 132.41, -64.44, 0.5)
	pt3dadd(32.33, 132.58, -64.44, 0.5)
	pt3dadd(32.5, 132.75, -64.44, 0.5)
	pt3dadd(32.83, 132.75, -64.44, 0.5)
	pt3dadd(33, 132.91, -64.44, 0.5)
	pt3dadd(33.17, 133.08, -64.44, 0.5)
	pt3dadd(33.5, 133.25, -64.44, 0.5)
	pt3dadd(33.83, 133.25, -64.44, 0.5)
	pt3dadd(34, 133.41, -64.44, 0.5)
	pt3dadd(34.17, 133.58, -64.44, 0.5)
  }
  dend[460] {pt3dclear()
	pt3dadd(30.17, 129.25, -64.44, 0.5)
	pt3dadd(30.17, 129.75, -64.44, 0.5)
	pt3dadd(30.33, 129.41, -64.44, 0.5)
	pt3dadd(30.67, 129.08, -64.44, 0.5)
	pt3dadd(30.83, 128.75, -64.44, 0.5)
	pt3dadd(31, 128.58, -64.44, 0.5)
	pt3dadd(31, 128.25, -64.44, 0.5)
	pt3dadd(31.17, 127.92, -64.44, 0.5)
	pt3dadd(31.33, 127.58, -64.44, 0.5)
	pt3dadd(31.5, 127.25, -64.44, 0.5)
	pt3dadd(31.5, 126.92, -64.44, 0.5)
	pt3dadd(31.67, 126.75, -64.44, 0.5)
	pt3dadd(31.67, 125.92, -64.44, 0.5)
	pt3dadd(31.83, 125.75, -64.44, 0.5)
	pt3dadd(31.83, 125.08, -64.44, 0.5)
	pt3dadd(32, 124.75, -64.44, 0.5)
	pt3dadd(32.17, 124.58, -64.44, 0.5)
	pt3dadd(32.17, 124.25, -64.44, 0.5)
	pt3dadd(32.33, 124.08, -64.44, 0.5)
	pt3dadd(32.5, 123.75, -64.44, 0.5)
	pt3dadd(32.67, 123.58, -64.44, 0.5)
	pt3dadd(32.83, 123.42, -64.44, 0.5)
	pt3dadd(32.83, 123.08, -64.44, 0.5)
	pt3dadd(33, 122.92, -64.44, 0.5)
	pt3dadd(33.17, 122.58, -64.44, 0.5)
	pt3dadd(33.33, 122.42, -64.44, 0.5)
	pt3dadd(33.67, 122.08, -64.44, 0.5)
	pt3dadd(33.83, 121.75, -64.44, 0.5)
	pt3dadd(34, 121.42, -64.44, 0.5)
	pt3dadd(34.33, 121.25, -64.44, 0.5)
	pt3dadd(34.67, 120.92, -64.44, 0.5)
	pt3dadd(34.83, 120.75, -64.44, 0.5)
	pt3dadd(35.17, 120.58, -64.44, 0.5)
	pt3dadd(35.33, 120.42, -64.44, 0.5)
	pt3dadd(35.67, 120.25, -64.44, 0.5)
	pt3dadd(35.83, 120.08, -64.44, 0.5)
  }
  dend[461] {pt3dclear()
	pt3dadd(20.17, 112.75, -60.48, 0.5)
	pt3dadd(20.17, 113.08, -62.64, 0.5)
	pt3dadd(20.32, 113.25, -62.64, 0.5)
	pt3dadd(21.5, 113.25, -62.64, 0.5)
	pt3dadd(21.83, 113.08, -62.64, 0.5)
	pt3dadd(23.17, 113.08, -62.64, 0.5)
  }
  dend[462] {pt3dclear()
	pt3dadd(23.17, 113.08, -62.64, 0.5)
	pt3dadd(23.83, 112.92, -62.64, 0.5)
	pt3dadd(24, 113.08, -62.64, 0.5)
	pt3dadd(24.17, 113.25, -62.64, 0.5)
	pt3dadd(24.33, 113.58, -62.64, 0.5)
	pt3dadd(24.5, 113.92, -62.64, 0.5)
	pt3dadd(24.67, 114.08, -62.64, 0.5)
	pt3dadd(24.83, 114.25, -62.64, 0.5)
	pt3dadd(25, 114.42, -62.64, 0.5)
	pt3dadd(25.17, 114.58, -62.64, 0.5)
	pt3dadd(25.33, 114.75, -62.64, 0.5)
	pt3dadd(25.5, 114.92, -62.64, 0.5)
	pt3dadd(25.67, 115.25, -62.64, 0.5)
	pt3dadd(26, 115.58, -62.64, 0.5)
	pt3dadd(26, 115.92, -62.64, 0.5)
	pt3dadd(26.17, 116.08, -62.64, 0.5)
	pt3dadd(26.17, 117.08, -62.64, 0.5)
  }
  dend[463] {pt3dclear()
	pt3dadd(26.17, 117.08, -62.64, 0.5)
	pt3dadd(26.17, 116.92, -62.64, 0.5)
	pt3dadd(26.17, 117.42, -62.64, 0.5)
	pt3dadd(26, 117.58, -62.64, 0.5)
	pt3dadd(25.83, 117.92, -62.64, 0.5)
	pt3dadd(25.67, 118.08, -62.64, 0.5)
	pt3dadd(25.33, 118.25, -62.64, 0.5)
	pt3dadd(25.17, 118.42, -62.64, 0.5)
	pt3dadd(24.17, 118.42, -62.64, 0.5)
  }
  dend[464] {pt3dclear()
	pt3dadd(24.17, 118.42, -62.64, 0.5)
	pt3dadd(25, 118.42, -62.64, 0.5)
	pt3dadd(25, 118.75, -62.64, 0.5)
	pt3dadd(24.83, 119.08, -62.64, 0.5)
	pt3dadd(24.5, 119.25, -62.64, 0.5)
	pt3dadd(24.33, 119.58, -62.64, 0.5)
	pt3dadd(24.33, 123.58, -62.64, 0.5)
	pt3dadd(24.5, 123.75, -62.64, 0.5)
	pt3dadd(24.5, 124.08, -62.64, 0.5)
	pt3dadd(24.67, 124.25, -62.64, 0.5)
	pt3dadd(24.83, 124.42, -62.64, 0.5)
	pt3dadd(24.83, 124.75, -62.64, 0.5)
	pt3dadd(25, 125.08, -62.64, 0.5)
	pt3dadd(25, 125.42, -62.64, 0.5)
	pt3dadd(25.17, 125.58, -62.64, 0.5)
	pt3dadd(25.33, 125.92, -62.64, 0.5)
	pt3dadd(25.5, 126.25, -62.64, 0.5)
	pt3dadd(25.67, 126.42, -62.64, 0.5)
	pt3dadd(25.67, 126.75, -62.64, 0.5)
  }
  dend[465] {pt3dclear()
	pt3dadd(24.17, 118.42, -62.64, 0.5)
	pt3dadd(25.17, 118.25, -59.76, 0.5)
	pt3dadd(25, 118.42, -59.76, 0.5)
	pt3dadd(24.83, 118.25, -59.76, 0.5)
	pt3dadd(24.67, 118.08, -59.76, 0.5)
	pt3dadd(24.33, 118.08, -59.76, 0.5)
	pt3dadd(24.17, 117.92, -59.76, 0.5)
	pt3dadd(24, 117.75, -59.76, 0.5)
	pt3dadd(23.67, 117.58, -59.76, 0.5)
	pt3dadd(23.33, 117.42, -59.76, 0.5)
	pt3dadd(23.17, 117.25, -59.76, 0.5)
	pt3dadd(23, 117.08, -59.76, 0.5)
	pt3dadd(22.83, 116.92, -59.76, 0.5)
	pt3dadd(22.33, 116.92, -59.76, 0.5)
	pt3dadd(22.17, 116.75, -59.76, 0.5)
	pt3dadd(21.83, 116.75, -59.76, 0.5)
	pt3dadd(21.5, 116.58, -59.76, 0.5)
	pt3dadd(20.83, 116.58, -59.76, 0.5)
  }
  dend[466] {pt3dclear()
	pt3dadd(26.17, 117.08, -62.64, 0.5)
	pt3dadd(25.83, 116.42, -63, 0.5)
	pt3dadd(26, 116.58, -63, 0.5)
	pt3dadd(26, 116.92, -63, 0.5)
	pt3dadd(26.17, 117.25, -63, 0.5)
	pt3dadd(26.33, 117.42, -63, 0.5)
	pt3dadd(26.5, 117.58, -63, 0.5)
	pt3dadd(26.67, 117.92, -63, 0.5)
	pt3dadd(27, 118.08, -63, 0.5)
	pt3dadd(27.33, 118.25, -63, 0.5)
	pt3dadd(27.67, 118.25, -63, 0.5)
  }
  dend[467] {pt3dclear()
	pt3dadd(27.67, 118.25, -63, 0.5)
	pt3dadd(28.17, 118.42, -63, 0.5)
	pt3dadd(28.17, 120.58, -63, 0.5)
  }
}
proc shape3d_45() {
  dend[467] {	pt3dadd(28.33, 120.92, -63, 0.5)
	pt3dadd(28.33, 127.25, -63, 0.5)
  }
  dend[468] {pt3dclear()
	pt3dadd(27.67, 118.25, -63, 0.5)
	pt3dadd(27.5, 118.42, -63, 0.5)
	pt3dadd(28.17, 118.42, -63, 0.5)
	pt3dadd(28.5, 118.25, -63, 0.5)
	pt3dadd(28.67, 118.08, -63, 0.5)
	pt3dadd(29, 118.08, -63, 0.5)
	pt3dadd(29.17, 117.92, -63, 0.5)
	pt3dadd(29.5, 117.92, -63, 0.5)
	pt3dadd(29.67, 117.75, -63, 0.5)
	pt3dadd(29.83, 117.75, -63, 0.5)
  }
  dend[469] {pt3dclear()
	pt3dadd(29.83, 117.75, -63, 0.5)
	pt3dadd(30.33, 117.58, -63, 0.5)
	pt3dadd(30.33, 117.92, -63, 0.5)
	pt3dadd(30.5, 118.25, -63, 0.5)
	pt3dadd(30.67, 118.42, -63, 0.5)
	pt3dadd(30.67, 118.75, -63, 0.5)
	pt3dadd(30.83, 119.08, -63, 0.5)
	pt3dadd(31, 119.42, -63, 0.5)
	pt3dadd(31.17, 119.58, -63, 0.5)
	pt3dadd(31.17, 119.92, -63, 0.5)
	pt3dadd(31.33, 120.25, -63, 0.5)
	pt3dadd(31.5, 120.58, -63, 0.5)
	pt3dadd(31.67, 120.75, -63, 0.5)
	pt3dadd(31.67, 121.08, -63, 0.5)
	pt3dadd(31.83, 121.42, -63, 0.5)
	pt3dadd(32, 121.58, -63, 0.5)
	pt3dadd(32.33, 121.92, -63, 0.5)
	pt3dadd(32.5, 122.08, -63, 0.5)
	pt3dadd(32.67, 122.25, -63, 0.5)
	pt3dadd(32.83, 122.58, -63, 0.5)
	pt3dadd(33.17, 122.92, -63, 0.5)
	pt3dadd(33.33, 123.08, -63, 0.5)
	pt3dadd(33.5, 123.25, -63, 0.5)
	pt3dadd(33.67, 123.42, -63, 0.5)
	pt3dadd(33.83, 123.58, -63, 0.5)
	pt3dadd(34, 123.75, -63, 0.5)
	pt3dadd(34.17, 123.92, -63, 0.5)
	pt3dadd(34.33, 124.08, -63, 0.5)
	pt3dadd(34.33, 124.25, -63, 0.5)
  }
  dend[470] {pt3dclear()
	pt3dadd(29.83, 117.75, -63, 0.5)
	pt3dadd(29.83, 118.08, -62.28, 0.5)
	pt3dadd(30, 117.92, -62.28, 0.5)
	pt3dadd(30.17, 117.75, -62.28, 0.5)
	pt3dadd(30.33, 117.58, -62.28, 0.5)
	pt3dadd(30.5, 117.42, -62.28, 0.5)
	pt3dadd(30.67, 117.25, -62.28, 0.5)
	pt3dadd(30.67, 117.08, -62.28, 0.5)
  }
  dend[471] {pt3dclear()
	pt3dadd(30.67, 117.08, -62.28, 0.5)
	pt3dadd(31.56, 116.63, -62.28, 0.5)
  }
  dend[472] {pt3dclear()
	pt3dadd(31.56, 116.63, -62.28, 0.5)
	pt3dadd(31.33, 116.75, -62.28, 0.5)
	pt3dadd(31.5, 116.58, -62.28, 0.5)
	pt3dadd(31.33, 116.42, -62.28, 0.5)
	pt3dadd(31, 116.25, -62.28, 0.5)
	pt3dadd(30.83, 116.08, -62.28, 0.5)
	pt3dadd(30.17, 115.42, -62.28, 0.5)
	pt3dadd(30, 115.25, -62.28, 0.5)
	pt3dadd(29.83, 114.92, -62.28, 0.5)
	pt3dadd(29.83, 114.58, -62.28, 0.5)
	pt3dadd(29.67, 114.42, -62.28, 0.5)
	pt3dadd(29.67, 113.58, -62.28, 0.5)
	pt3dadd(29.5, 113.42, -62.28, 0.5)
	pt3dadd(29.5, 113.08, -62.28, 0.5)
	pt3dadd(29.33, 112.92, -62.28, 0.5)
	pt3dadd(29.17, 112.75, -62.28, 0.5)
	pt3dadd(29.17, 112.42, -62.28, 0.5)
	pt3dadd(29, 112.25, -62.28, 0.5)
	pt3dadd(29, 111.75, -62.28, 0.5)
	pt3dadd(28.83, 111.58, -62.28, 0.5)
	pt3dadd(28.67, 111.42, -62.28, 0.5)
	pt3dadd(28.67, 111.25, -62.28, 0.5)
  }
  dend[473] {pt3dclear()
	pt3dadd(31.56, 116.63, -62.28, 0.5)
	pt3dadd(31, 116.75, -64.8, 0.5)
	pt3dadd(31.17, 116.42, -64.8, 0.5)
	pt3dadd(31.17, 116.08, -64.8, 0.5)
	pt3dadd(31.33, 115.75, -64.8, 0.5)
	pt3dadd(31.33, 113.92, -64.8, 0.5)
	pt3dadd(31.17, 113.75, -64.8, 0.5)
	pt3dadd(31.17, 113.25, -64.8, 0.5)
	pt3dadd(31, 112.92, -64.8, 0.5)
	pt3dadd(31, 111.75, -64.8, 0.5)
	pt3dadd(31.17, 111.58, -64.8, 0.5)
	pt3dadd(31.17, 111.25, -64.8, 0.5)
	pt3dadd(31.33, 110.92, -64.8, 0.5)
	pt3dadd(31.5, 110.58, -64.8, 0.5)
	pt3dadd(31.67, 110.42, -64.8, 0.5)
	pt3dadd(31.67, 110.08, -64.8, 0.5)
	pt3dadd(31.83, 109.92, -64.8, 0.5)
	pt3dadd(32, 109.58, -64.8, 0.5)
	pt3dadd(32.33, 109.25, -64.8, 0.5)
  }
  dend[474] {pt3dclear()
	pt3dadd(30.67, 117.08, -62.28, 0.5)
	pt3dadd(31.17, 116.75, -64.8, 0.5)
	pt3dadd(31.33, 116.58, -64.8, 0.5)
	pt3dadd(31.67, 116.25, -64.8, 0.5)
	pt3dadd(31.83, 115.92, -64.8, 0.5)
	pt3dadd(32.17, 115.42, -64.8, 0.5)
	pt3dadd(32.33, 115.08, -64.8, 0.5)
	pt3dadd(32.67, 114.75, -64.8, 0.5)
	pt3dadd(32.83, 114.42, -64.8, 0.5)
	pt3dadd(33, 114.08, -64.8, 0.5)
	pt3dadd(33.17, 113.75, -64.8, 0.5)
	pt3dadd(34.17, 112.75, -64.8, 0.5)
	pt3dadd(34.5, 112.58, -64.8, 0.5)
	pt3dadd(34.83, 112.42, -64.8, 0.5)
	pt3dadd(35.17, 112.25, -64.8, 0.5)
	pt3dadd(35.5, 112.08, -64.8, 0.5)
	pt3dadd(35.83, 111.92, -64.8, 0.5)
	pt3dadd(36.5, 111.92, -64.8, 0.5)
	pt3dadd(36.5, 111.75, -64.8, 0.5)
  }
  dend[475] {pt3dclear()
	pt3dadd(23.17, 113.08, -62.64, 0.5)
	pt3dadd(23.17, 112.92, -61.2, 0.5)
	pt3dadd(23.5, 112.92, -61.2, 0.5)
	pt3dadd(23.67, 112.75, -61.2, 0.5)
	pt3dadd(24.17, 112.25, -61.2, 0.5)
	pt3dadd(24.5, 112.08, -61.2, 0.5)
	pt3dadd(24.67, 111.92, -61.2, 0.5)
	pt3dadd(24.83, 111.75, -61.2, 0.5)
	pt3dadd(25.17, 111.75, -61.2, 0.5)
	pt3dadd(25.33, 111.58, -61.2, 0.5)
	pt3dadd(25.67, 111.42, -61.2, 0.5)
	pt3dadd(25.83, 111.25, -61.2, 0.5)
	pt3dadd(26, 111.08, -61.2, 0.5)
	pt3dadd(26.17, 110.92, -61.2, 0.5)
	pt3dadd(26.33, 110.75, -61.2, 0.5)
	pt3dadd(26.67, 110.42, -61.2, 0.5)
	pt3dadd(26.83, 110.25, -61.2, 0.5)
	pt3dadd(27.17, 110.08, -60.12, 0.5)
	pt3dadd(27.33, 110.25, -60.48, 0.5)
	pt3dadd(27.5, 110.42, -61.92, 0.5)
	pt3dadd(27.67, 110.25, -63, 0.5)
	pt3dadd(27.83, 110.08, -63, 0.5)
	pt3dadd(28, 109.75, -63, 0.5)
	pt3dadd(28.5, 109.25, -63, 0.5)
	pt3dadd(28.67, 108.92, -63, 0.5)
	pt3dadd(28.83, 108.75, -63, 0.5)
	pt3dadd(29, 108.42, -63, 0.5)
	pt3dadd(29.17, 108.08, -63, 0.5)
	pt3dadd(29.17, 107.58, -63, 0.5)
	pt3dadd(29.33, 107.25, -63, 0.5)
	pt3dadd(29.5, 106.92, -63, 0.5)
	pt3dadd(29.67, 106.75, -63, 0.5)
	pt3dadd(29.67, 106.42, -62.64, 0.5)
	pt3dadd(30.33, 105.08, -62.64, 0.5)
	pt3dadd(30.5, 104.75, -62.64, 0.5)
	pt3dadd(30.5, 104.42, -62.64, 0.5)
	pt3dadd(30.67, 104.25, -62.64, 0.5)
	pt3dadd(30.83, 103.92, -62.64, 0.5)
	pt3dadd(31, 103.75, -62.64, 0.5)
	pt3dadd(31.17, 103.42, -62.64, 0.5)
	pt3dadd(31.33, 103.08, -62.64, 0.5)
	pt3dadd(31.5, 102.75, -62.64, 0.5)
	pt3dadd(31.67, 102.42, -62.64, 0.5)
	pt3dadd(31.83, 102.08, -62.64, 0.5)
	pt3dadd(31.83, 101.75, -62.64, 0.5)
	pt3dadd(32, 101.42, -62.64, 0.5)
	pt3dadd(32.17, 101.08, -62.64, 0.5)
	pt3dadd(32.33, 100.92, -62.64, 0.5)
	pt3dadd(32.33, 100.58, -62.64, 0.5)
	pt3dadd(32.5, 100.42, -62.64, 0.5)
	pt3dadd(32.5, 100.08, -62.64, 0.5)
	pt3dadd(32.67, 99.92, -62.64, 0.5)
	pt3dadd(32.83, 99.58, -62.64, 0.5)
	pt3dadd(32.83, 99.42, -62.64, 0.5)
  }
  dend[476] {pt3dclear()
	pt3dadd(32.83, 99.42, -62.64, 0.5)
	pt3dadd(32.67, 99.42, -61.2, 0.5)
	pt3dadd(32.83, 99.25, -61.2, 0.5)
	pt3dadd(33, 99.08, -61.2, 0.5)
	pt3dadd(33.17, 98.92, -61.2, 0.5)
	pt3dadd(33.17, 98.58, -61.2, 0.5)
	pt3dadd(33.33, 98.42, -61.2, 0.5)
	pt3dadd(33.67, 98.25, -61.2, 0.5)
	pt3dadd(33.83, 98.08, -61.2, 0.5)
	pt3dadd(34.33, 97.92, -61.2, 0.5)
	pt3dadd(34.67, 97.75, -61.2, 0.5)
	pt3dadd(36.17, 96.25, -61.2, 0.5)
	pt3dadd(36.33, 95.92, -61.2, 0.5)
	pt3dadd(36.67, 95.42, -61.2, 0.5)
	pt3dadd(36.83, 95.08, -61.2, 0.5)
	pt3dadd(37.17, 94.58, -61.2, 0.5)
	pt3dadd(37.33, 94.25, -61.2, 0.5)
	pt3dadd(37.5, 94.08, -61.2, 0.5)
	pt3dadd(37.67, 93.75, -61.2, 0.5)
	pt3dadd(37.83, 93.58, -61.2, 0.5)
	pt3dadd(38, 93.25, -61.2, 0.5)
	pt3dadd(38.17, 92.92, -61.2, 0.5)
	pt3dadd(38.33, 92.58, -61.2, 0.5)
	pt3dadd(38.5, 92.25, -61.2, 0.5)
	pt3dadd(38.5, 91.92, -61.2, 0.5)
	pt3dadd(38.67, 91.75, -61.2, 0.5)
	pt3dadd(38.83, 91.58, -61.2, 0.5)
	pt3dadd(39.33, 91.08, -61.2, 0.5)
	pt3dadd(39.5, 90.75, -61.2, 0.5)
	pt3dadd(39.67, 90.42, -61.2, 0.5)
	pt3dadd(39.83, 90.08, -61.2, 0.5)
	pt3dadd(40, 89.92, -61.2, 0.5)
	pt3dadd(40, 89.75, -61.2, 0.5)
  }
  dend[477] {pt3dclear()
	pt3dadd(32.83, 99.42, -62.64, 0.5)
	pt3dadd(33.17, 99.25, -60.12, 0.5)
  }
}
proc shape3d_46() {
  dend[477] {	pt3dadd(33.17, 98.92, -60.12, 0.5)
	pt3dadd(33.33, 98.75, -60.12, 0.5)
	pt3dadd(33.33, 98.42, -60.12, 0.5)
	pt3dadd(33.5, 98.08, -60.12, 0.5)
	pt3dadd(33.5, 97.42, -60.12, 0.5)
	pt3dadd(33.67, 97.08, -60.12, 0.5)
	pt3dadd(33.67, 95.92, -60.12, 0.5)
	pt3dadd(33.83, 95.25, -60.12, 0.5)
	pt3dadd(34, 94.75, -60.12, 0.5)
	pt3dadd(34.17, 94.42, -60.12, 0.5)
	pt3dadd(34.33, 93.92, -60.12, 0.5)
	pt3dadd(34.33, 93.58, -60.12, 0.5)
	pt3dadd(34.5, 93.25, -60.12, 0.5)
	pt3dadd(34.67, 92.92, -60.12, 0.5)
	pt3dadd(34.83, 92.75, -60.12, 0.5)
	pt3dadd(34.83, 92.42, -60.12, 0.5)
	pt3dadd(35, 92.25, -60.12, 0.5)
	pt3dadd(35.17, 91.92, -60.12, 0.5)
	pt3dadd(35.33, 91.42, -60.12, 0.5)
	pt3dadd(35.5, 91.08, -60.12, 0.5)
	pt3dadd(35.67, 90.58, -60.12, 0.5)
	pt3dadd(35.83, 90.08, -60.12, 0.5)
	pt3dadd(36, 89.58, -60.12, 0.5)
	pt3dadd(36.17, 89.25, -60.12, 0.5)
	pt3dadd(36.33, 88.92, -60.12, 0.5)
	pt3dadd(36.5, 88.75, -60.12, 0.5)
	pt3dadd(36.67, 88.42, -60.12, 0.5)
	pt3dadd(37, 88.25, -60.12, 0.5)
	pt3dadd(37.17, 87.92, -60.12, 0.5)
	pt3dadd(37.33, 87.58, -60.12, 0.5)
	pt3dadd(37.67, 87.08, -60.12, 0.5)
	pt3dadd(37.83, 86.58, -60.12, 0.5)
	pt3dadd(38, 86.25, -60.12, 0.5)
	pt3dadd(38.33, 85.92, -60.12, 0.5)
	pt3dadd(38.5, 85.75, -60.12, 0.5)
	pt3dadd(38.67, 85.58, -60.12, 0.5)
	pt3dadd(39, 85.42, -60.12, 0.5)
	pt3dadd(39.33, 85.25, -60.12, 0.5)
	pt3dadd(39.83, 85.08, -60.12, 0.5)
	pt3dadd(40.17, 85.08, -60.12, 0.5)
	pt3dadd(40.5, 84.92, -60.12, 0.5)
	pt3dadd(40.83, 84.75, -60.12, 0.5)
	pt3dadd(41.17, 84.58, -60.12, 0.5)
	pt3dadd(42, 84.58, -60.12, 0.5)
	pt3dadd(42.5, 84.42, -60.12, 0.5)
	pt3dadd(42.67, 84.42, -60.12, 0.5)
  }
  dend[478] {pt3dclear()
	pt3dadd(18, 111.25, -60.48, 0.5)
	pt3dadd(17.82, 111.42, -60.12, 0.5)
	pt3dadd(17.82, 111.92, -60.12, 0.5)
	pt3dadd(17.67, 112.08, -60.12, 0.5)
	pt3dadd(17.5, 112.25, -60.12, 0.5)
	pt3dadd(17.32, 112.42, -60.12, 0.5)
	pt3dadd(17.32, 112.92, -60.12, 0.5)
	pt3dadd(17.17, 113.25, -60.12, 0.5)
	pt3dadd(17.17, 113.92, -60.12, 0.5)
  }
  dend[479] {pt3dclear()
	pt3dadd(17.17, 113.92, -60.12, 0.5)
	pt3dadd(17.17, 114.25, -60.12, 0.5)
	pt3dadd(17.17, 114.58, -60.12, 0.5)
	pt3dadd(16.82, 114.75, -60.12, 0.5)
	pt3dadd(16.67, 114.92, -60.12, 0.5)
	pt3dadd(16.5, 115.08, -60.12, 0.5)
	pt3dadd(16.17, 115.25, -60.12, 0.5)
	pt3dadd(16, 115.42, -60.12, 0.5)
	pt3dadd(15.83, 115.75, -60.12, 0.5)
	pt3dadd(15.67, 116.08, -60.12, 0.5)
	pt3dadd(15.67, 116.42, -60.12, 0.5)
	pt3dadd(15.5, 116.75, -60.12, 0.5)
	pt3dadd(15.5, 117.08, -60.12, 0.5)
	pt3dadd(15.33, 117.42, -60.12, 0.5)
	pt3dadd(15.33, 117.92, -60.12, 0.5)
	pt3dadd(15.17, 118.08, -60.12, 0.5)
	pt3dadd(15.17, 118.42, -60.12, 0.5)
	pt3dadd(15, 118.75, -60.12, 0.5)
	pt3dadd(14.83, 119.08, -60.12, 0.5)
	pt3dadd(14.83, 119.42, -60.12, 0.5)
	pt3dadd(14.67, 119.75, -60.12, 0.5)
	pt3dadd(14.5, 120.08, -60.12, 0.5)
	pt3dadd(14.5, 120.42, -60.12, 0.5)
	pt3dadd(14.33, 120.58, -60.12, 0.5)
	pt3dadd(14.33, 121.25, -60.12, 0.5)
	pt3dadd(14.17, 121.58, -60.12, 0.5)
	pt3dadd(14.17, 122.75, -60.12, 0.5)
  }
  dend[480] {pt3dclear()
	pt3dadd(17.17, 113.92, -60.12, 0.5)
	pt3dadd(17.17, 113.75, -60.84, 0.5)
	pt3dadd(17.32, 114.08, -60.84, 0.5)
	pt3dadd(17.5, 114.42, -60.84, 0.5)
	pt3dadd(17.82, 114.58, -60.84, 0.5)
	pt3dadd(18, 114.92, -60.84, 0.5)
	pt3dadd(18.32, 115.25, -60.84, 0.5)
	pt3dadd(18.5, 115.42, -60.84, 0.5)
	pt3dadd(18.82, 115.42, -60.84, 0.5)
	pt3dadd(19, 115.58, -60.84, 0.5)
	pt3dadd(19.17, 115.75, -60.84, 0.5)
	pt3dadd(19.5, 116.08, -60.84, 0.5)
	pt3dadd(19.67, 116.25, -60.84, 0.5)
	pt3dadd(19.82, 116.42, -60.84, 0.5)
	pt3dadd(20, 116.58, -60.84, 0.5)
	pt3dadd(20.17, 116.75, -60.84, 0.5)
	pt3dadd(20.32, 116.92, -60.84, 0.5)
	pt3dadd(20.67, 117.08, -60.84, 0.5)
	pt3dadd(21, 117.25, -60.84, 0.5)
	pt3dadd(21.17, 117.42, -60.84, 0.5)
	pt3dadd(21.33, 117.58, -60.84, 0.5)
	pt3dadd(21.5, 117.75, -60.84, 0.5)
	pt3dadd(21.67, 117.92, -60.84, 0.5)
	pt3dadd(21.83, 118.08, -60.84, 0.5)
	pt3dadd(21.83, 118.42, -60.84, 0.5)
  }
  dend[481] {pt3dclear()
	pt3dadd(16.5, 94.08, -58.68, 0.5)
	pt3dadd(16.5, 94.25, -60.48, 0.5)
	pt3dadd(16.67, 94.42, -60.48, 0.5)
	pt3dadd(17, 94.58, -60.48, 0.5)
	pt3dadd(17.17, 94.75, -60.48, 0.5)
	pt3dadd(17.32, 94.92, -60.48, 0.5)
	pt3dadd(17.67, 95.08, -60.48, 0.5)
	pt3dadd(17.82, 95.25, -60.48, 0.5)
	pt3dadd(18, 95.42, -60.48, 0.5)
	pt3dadd(18.32, 95.58, -60.48, 0.5)
	pt3dadd(18.5, 95.92, -60.48, 0.5)
  }
  dend[482] {pt3dclear()
	pt3dadd(18.5, 95.92, -60.48, 0.5)
	pt3dadd(19.17, 95.58, -60.48, 0.5)
	pt3dadd(19.17, 96.75, -60.48, 0.5)
	pt3dadd(19, 97.08, -60.48, 0.5)
	pt3dadd(19, 97.58, -60.48, 0.5)
	pt3dadd(18.82, 97.75, -60.48, 0.5)
	pt3dadd(18.82, 98.08, -60.48, 0.5)
	pt3dadd(18.67, 98.25, -60.48, 0.5)
	pt3dadd(18.67, 98.75, -60.48, 0.5)
	pt3dadd(18.5, 99.08, -60.48, 0.5)
	pt3dadd(18.5, 99.58, -60.48, 0.5)
	pt3dadd(18.32, 99.92, -60.48, 0.5)
	pt3dadd(18.32, 100.58, -60.48, 0.5)
	pt3dadd(18.17, 100.92, -60.48, 0.5)
	pt3dadd(18.17, 101.25, -60.48, 0.5)
	pt3dadd(18, 101.58, -60.48, 0.5)
	pt3dadd(17.82, 101.75, -60.48, 0.5)
	pt3dadd(17.82, 102.08, -60.48, 0.5)
	pt3dadd(17.67, 102.25, -60.48, 0.5)
	pt3dadd(17.67, 102.58, -60.48, 0.5)
	pt3dadd(17.5, 102.75, -60.48, 0.5)
	pt3dadd(17.32, 102.75, -60.48, 0.5)
  }
  dend[483] {pt3dclear()
	pt3dadd(17.32, 102.75, -60.48, 0.5)
	pt3dadd(17.5, 101.92, -60.48, 0.5)
	pt3dadd(17.32, 102.08, -60.48, 0.5)
	pt3dadd(16.5, 102.92, -60.48, 0.5)
	pt3dadd(16.17, 103.08, -60.48, 0.5)
	pt3dadd(15.67, 103.58, -60.48, 0.5)
	pt3dadd(15.5, 103.75, -60.48, 0.5)
	pt3dadd(15.33, 104.08, -60.48, 0.5)
	pt3dadd(15.33, 104.58, -60.48, 0.5)
	pt3dadd(15.17, 104.75, -60.48, 0.5)
	pt3dadd(15.17, 107.75, -60.48, 0.5)
	pt3dadd(15, 108.08, -60.48, 0.5)
	pt3dadd(15, 108.75, -60.48, 0.5)
	pt3dadd(14.83, 108.92, -60.48, 0.5)
  }
  dend[484] {pt3dclear()
	pt3dadd(17.32, 102.75, -60.48, 0.5)
	pt3dadd(17.82, 101.92, -62.64, 0.5)
	pt3dadd(18, 102.08, -62.64, 0.5)
	pt3dadd(18, 104.42, -62.64, 0.5)
	pt3dadd(18.17, 104.75, -62.64, 0.5)
	pt3dadd(18.17, 106.58, -62.64, 0.5)
	pt3dadd(18, 106.92, -62.64, 0.5)
	pt3dadd(18, 107.42, -62.64, 0.5)
	pt3dadd(17.82, 107.58, -62.64, 0.5)
	pt3dadd(17.82, 107.92, -62.64, 0.5)
	pt3dadd(17.67, 108.08, -62.64, 0.5)
	pt3dadd(17.5, 108.25, -62.64, 0.5)
	pt3dadd(17.32, 108.58, -62.64, 0.5)
	pt3dadd(17.17, 108.92, -62.64, 0.5)
	pt3dadd(17, 109.08, -62.64, 0.5)
	pt3dadd(16.82, 109.25, -62.64, 0.5)
	pt3dadd(16.82, 109.58, -62.64, 0.5)
	pt3dadd(16.67, 109.92, -62.64, 0.5)
	pt3dadd(16.5, 110.08, -62.64, 0.5)
	pt3dadd(16.5, 110.42, -62.64, 0.5)
	pt3dadd(16.32, 110.42, -62.64, 0.5)
  }
  dend[485] {pt3dclear()
	pt3dadd(18.5, 95.92, -60.48, 0.5)
	pt3dadd(18.82, 96.08, -60.12, 0.5)
	pt3dadd(19, 96.25, -60.12, 0.5)
	pt3dadd(19.17, 96.42, -60.12, 0.5)
	pt3dadd(19.32, 96.58, -60.12, 0.5)
	pt3dadd(19.5, 96.75, -60.12, 0.5)
	pt3dadd(19.67, 97.08, -60.12, 0.5)
	pt3dadd(19.82, 97.25, -60.12, 0.5)
	pt3dadd(20, 97.42, -60.12, 0.5)
	pt3dadd(20, 97.75, -60.12, 0.5)
	pt3dadd(20.17, 97.92, -60.12, 0.5)
	pt3dadd(20.32, 98.25, -60.12, 0.5)
	pt3dadd(20.5, 98.58, -60.12, 0.5)
	pt3dadd(20.67, 98.92, -60.12, 0.5)
	pt3dadd(20.83, 99.25, -60.12, 0.5)
	pt3dadd(20.83, 99.58, -60.12, 0.5)
	pt3dadd(21, 99.75, -60.12, 0.5)
	pt3dadd(21, 100.25, -60.12, 0.5)
	pt3dadd(21.17, 100.42, -60.12, 0.5)
	pt3dadd(21.17, 103.08, -60.12, 0.5)
	pt3dadd(21.33, 103.25, -60.12, 0.5)
	pt3dadd(21.33, 103.75, -60.12, 0.5)
	pt3dadd(21.5, 103.92, -60.12, 0.5)
	pt3dadd(21.5, 104.75, -60.12, 0.5)
  }
  dend[486] {pt3dclear()
	pt3dadd(21.5, 104.75, -60.12, 0.5)
  }
}
proc shape3d_47() {
  dend[486] {	pt3dadd(22.17, 104.75, -60.12, 0.5)
	pt3dadd(22.33, 104.92, -60.12, 0.5)
	pt3dadd(22.33, 105.92, -60.12, 0.5)
	pt3dadd(22.17, 106.25, -60.12, 0.5)
	pt3dadd(22.17, 108.42, -60.12, 0.5)
	pt3dadd(22, 108.75, -60.12, 0.5)
	pt3dadd(22, 108.92, -60.12, 0.5)
  }
  dend[487] {pt3dclear()
	pt3dadd(22, 108.92, -60.12, 0.5)
	pt3dadd(22.33, 108.92, -60.12, 0.5)
	pt3dadd(22.17, 109.08, -60.12, 0.5)
	pt3dadd(21.83, 109.25, -60.12, 0.5)
	pt3dadd(21.5, 109.42, -60.12, 0.5)
	pt3dadd(21.17, 109.58, -60.12, 0.5)
	pt3dadd(20.83, 109.75, -60.12, 0.5)
	pt3dadd(20.5, 109.92, -60.12, 0.5)
	pt3dadd(20.32, 110.08, -60.12, 0.5)
	pt3dadd(20, 110.25, -60.12, 0.5)
	pt3dadd(19.82, 110.42, -60.12, 0.5)
	pt3dadd(19.67, 110.58, -60.12, 0.5)
	pt3dadd(19.5, 110.75, -60.12, 0.5)
	pt3dadd(19.32, 110.92, -60.12, 0.5)
	pt3dadd(19.32, 111.25, -60.12, 0.5)
	pt3dadd(19.17, 111.58, -60.12, 0.5)
	pt3dadd(19, 111.75, -60.12, 0.5)
	pt3dadd(19, 112.58, -60.12, 0.5)
	pt3dadd(18.82, 112.75, -60.12, 0.5)
	pt3dadd(18.82, 113.08, -60.12, 0.5)
  }
  dend[488] {pt3dclear()
	pt3dadd(22, 108.92, -60.12, 0.5)
	pt3dadd(22.67, 109.25, -59.76, 0.5)
	pt3dadd(23, 109.42, -59.76, 0.5)
	pt3dadd(23.17, 109.58, -59.76, 0.5)
	pt3dadd(23.33, 109.75, -59.76, 0.5)
	pt3dadd(23.67, 109.75, -59.76, 0.5)
	pt3dadd(23.83, 109.92, -59.76, 0.5)
	pt3dadd(24.17, 110.08, -59.76, 0.5)
	pt3dadd(24.5, 110.25, -59.76, 0.5)
	pt3dadd(24.83, 110.42, -59.76, 0.5)
	pt3dadd(25, 110.58, -59.76, 0.5)
	pt3dadd(25.17, 110.75, -59.76, 0.5)
	pt3dadd(25.33, 111.08, -59.76, 0.5)
	pt3dadd(25.67, 111.42, -59.76, 0.5)
	pt3dadd(25.83, 111.58, -59.76, 0.5)
	pt3dadd(26, 111.75, -59.76, 0.5)
	pt3dadd(26.17, 111.92, -59.76, 0.5)
	pt3dadd(26.33, 112.08, -59.76, 0.5)
	pt3dadd(26.5, 112.25, -59.76, 0.5)
  }
  dend[489] {pt3dclear()
	pt3dadd(21.5, 104.75, -60.12, 0.5)
	pt3dadd(21.17, 104.58, -63.72, 0.5)
	pt3dadd(21.17, 105.25, -63.72, 0.5)
	pt3dadd(20.83, 105.58, -63.72, 0.5)
	pt3dadd(20.67, 105.92, -63.72, 0.5)
	pt3dadd(20.5, 106.08, -63.72, 0.5)
	pt3dadd(20.5, 107.25, -63.72, 0.5)
  }
  dend[490] {pt3dclear()
	pt3dadd(14.33, 81.42, -58.68, 0.5)
	pt3dadd(14.5, 81.42, -57.6, 0.5)
	pt3dadd(14.5, 81.75, -57.6, 0.5)
	pt3dadd(14.67, 81.92, -57.6, 0.5)
	pt3dadd(15, 82.08, -57.6, 0.5)
	pt3dadd(16.82, 82.08, -57.6, 0.5)
	pt3dadd(17, 81.92, -57.6, 0.5)
	pt3dadd(17.17, 81.75, -57.6, 0.5)
  }
  dend[491] {pt3dclear()
	pt3dadd(17.17, 81.75, -57.6, 0.5)
	pt3dadd(17.3, 81.75, -58.59, 0.5)
  }
  dend[492] {pt3dclear()
	pt3dadd(17.3, 81.75, -58.59, 0.5)
	pt3dadd(17.67, 81.75, -61.2, 0.5)
	pt3dadd(17.82, 81.92, -61.2, 0.5)
	pt3dadd(18, 82.08, -61.2, 0.5)
	pt3dadd(18.17, 82.42, -61.2, 0.5)
	pt3dadd(18.32, 82.58, -61.2, 0.5)
	pt3dadd(18.5, 82.92, -61.2, 0.5)
	pt3dadd(18.5, 83.25, -61.2, 0.5)
	pt3dadd(18.67, 83.58, -61.2, 0.5)
	pt3dadd(18.67, 86.08, -61.2, 0.5)
	pt3dadd(18.5, 86.25, -61.2, 0.5)
  }
  dend[493] {pt3dclear()
	pt3dadd(18.5, 86.25, -61.2, 0.5)
	pt3dadd(19, 86.42, -61.2, 0.5)
	pt3dadd(18.67, 86.58, -61.2, 0.5)
	pt3dadd(18.32, 86.92, -61.2, 0.5)
	pt3dadd(17.82, 87.08, -61.2, 0.5)
	pt3dadd(17.17, 87.25, -61.2, 0.5)
	pt3dadd(16.5, 87.42, -61.2, 0.5)
	pt3dadd(16.17, 87.58, -61.2, 0.5)
	pt3dadd(15.5, 88.25, -61.2, 0.5)
	pt3dadd(15.33, 88.58, -61.2, 0.5)
	pt3dadd(15.17, 88.92, -61.2, 0.5)
	pt3dadd(15, 89.25, -61.2, 0.5)
	pt3dadd(14.83, 89.58, -61.2, 0.5)
	pt3dadd(14.67, 89.92, -61.2, 0.5)
	pt3dadd(14.67, 90.42, -61.2, 0.5)
	pt3dadd(14.5, 90.58, -61.2, 0.5)
	pt3dadd(14.5, 90.92, -61.2, 0.5)
	pt3dadd(14.33, 91.25, -61.2, 0.5)
	pt3dadd(14.17, 91.58, -61.2, 0.5)
	pt3dadd(14, 91.92, -61.2, 0.5)
	pt3dadd(14, 92.58, -61.2, 0.5)
	pt3dadd(13.83, 92.75, -61.2, 0.5)
	pt3dadd(13.83, 92.92, -61.2, 0.5)
  }
  dend[494] {pt3dclear()
	pt3dadd(13.83, 92.92, -61.2, 0.5)
	pt3dadd(14, 92.58, -61.2, 0.5)
	pt3dadd(13.83, 92.75, -61.2, 0.5)
	pt3dadd(13.5, 92.92, -61.2, 0.5)
	pt3dadd(13, 93.42, -61.2, 0.5)
	pt3dadd(12.83, 93.58, -61.2, 0.5)
	pt3dadd(12.67, 93.75, -61.2, 0.5)
	pt3dadd(12.67, 94.25, -61.2, 0.5)
	pt3dadd(12.5, 94.58, -61.2, 0.5)
	pt3dadd(12.33, 94.92, -61.2, 0.5)
	pt3dadd(12.17, 95.25, -61.2, 0.5)
	pt3dadd(11.83, 95.75, -61.2, 0.5)
	pt3dadd(11.83, 96.08, -61.2, 0.5)
	pt3dadd(11.17, 96.75, -61.2, 0.5)
	pt3dadd(11, 96.92, -61.2, 0.5)
	pt3dadd(11, 97.42, -61.2, 0.5)
	pt3dadd(10.67, 97.42, -61.2, 0.5)
  }
  dend[495] {pt3dclear()
	pt3dadd(13.83, 92.92, -61.2, 0.5)
	pt3dadd(14.17, 92.25, -63.36, 0.5)
	pt3dadd(14.17, 95.25, -63.36, 0.5)
	pt3dadd(14, 95.42, -63.36, 0.5)
	pt3dadd(14, 96.75, -63.36, 0.5)
	pt3dadd(13.83, 97.08, -63.36, 0.5)
	pt3dadd(13.83, 99.25, -63.36, 0.5)
  }
  dend[496] {pt3dclear()
	pt3dadd(18.5, 86.25, -61.2, 0.5)
	pt3dadd(18.32, 86.42, -63.36, 0.5)
	pt3dadd(18.5, 86.58, -63.36, 0.5)
	pt3dadd(18.5, 86.92, -63.36, 0.5)
	pt3dadd(18.67, 87.25, -63.36, 0.5)
	pt3dadd(18.82, 87.42, -63.36, 0.5)
	pt3dadd(18.82, 87.92, -63.36, 0.5)
	pt3dadd(19, 88.25, -63.36, 0.5)
	pt3dadd(19, 88.92, -63.36, 0.5)
	pt3dadd(19.17, 89.25, -63.36, 0.5)
	pt3dadd(19.17, 89.58, -63.36, 0.5)
	pt3dadd(19.32, 89.92, -63.36, 0.5)
	pt3dadd(19.5, 90.25, -63.36, 0.5)
	pt3dadd(19.67, 90.58, -63.36, 0.5)
	pt3dadd(19.67, 91.08, -63.36, 0.5)
	pt3dadd(19.82, 91.25, -63.36, 0.5)
	pt3dadd(19.82, 91.58, -63.36, 0.5)
	pt3dadd(20, 91.75, -63.36, 0.5)
	pt3dadd(20, 92.08, -63.36, 0.5)
  }
  dend[497] {pt3dclear()
	pt3dadd(20, 92.08, -63.36, 0.5)
	pt3dadd(20.5, 91.42, -63.36, 0.5)
	pt3dadd(20.5, 91.92, -63.36, 0.5)
	pt3dadd(20.32, 92.25, -63.36, 0.5)
	pt3dadd(20.32, 92.58, -63.36, 0.5)
	pt3dadd(20.17, 93.08, -63.36, 0.5)
	pt3dadd(20.17, 93.42, -63.36, 0.5)
	pt3dadd(20, 93.58, -63.36, 0.5)
	pt3dadd(20, 94.25, -63.36, 0.5)
	pt3dadd(19.82, 94.58, -63.36, 0.5)
	pt3dadd(19.82, 95.25, -63.36, 0.5)
	pt3dadd(19.67, 95.58, -63.36, 0.5)
	pt3dadd(19.67, 96.58, -63.36, 0.5)
	pt3dadd(19.5, 97.25, -63.36, 0.5)
	pt3dadd(19.5, 98.58, -63.36, 0.5)
	pt3dadd(19.17, 98.75, -63.36, 0.5)
  }
  dend[498] {pt3dclear()
	pt3dadd(20, 92.08, -63.36, 0.5)
	pt3dadd(20.17, 92.08, -62.28, 0.5)
	pt3dadd(20.32, 92.42, -62.28, 0.5)
	pt3dadd(20.5, 92.58, -62.28, 0.5)
	pt3dadd(20.67, 92.92, -62.28, 0.5)
	pt3dadd(21, 93.25, -62.28, 0.5)
	pt3dadd(21.17, 93.42, -62.28, 0.5)
	pt3dadd(21.17, 93.75, -62.28, 0.5)
	pt3dadd(21.33, 93.92, -62.28, 0.5)
	pt3dadd(21.5, 94.08, -62.28, 0.5)
	pt3dadd(21.5, 94.42, -62.28, 0.5)
	pt3dadd(21.67, 94.58, -62.28, 0.5)
	pt3dadd(21.67, 95.42, -62.28, 0.5)
	pt3dadd(21.83, 95.58, -62.28, 0.5)
	pt3dadd(21.83, 97.58, -62.28, 0.5)
	pt3dadd(22, 97.75, -62.28, 0.5)
	pt3dadd(22, 99.42, -62.28, 0.5)
	pt3dadd(21.83, 99.58, -62.28, 0.5)
	pt3dadd(21.83, 100.08, -62.28, 0.5)
	pt3dadd(21.67, 100.25, -62.28, 0.5)
	pt3dadd(21.67, 100.58, -62.28, 0.5)
	pt3dadd(21.5, 101.42, -62.28, 0.5)
	pt3dadd(21.33, 101.92, -62.28, 0.5)
	pt3dadd(21.17, 101.75, -62.28, 0.5)
  }
  dend[499] {pt3dclear()
	pt3dadd(17.3, 81.75, -58.59, 0.5)
	pt3dadd(17.32, 81.58, -60.84, 0.5)
	pt3dadd(17.67, 81.42, -60.84, 0.5)
	pt3dadd(17.82, 81.25, -60.84, 0.5)
	pt3dadd(18.17, 81.08, -60.84, 0.5)
	pt3dadd(18.32, 80.92, -60.84, 0.5)
	pt3dadd(18.5, 80.58, -60.84, 0.5)
	pt3dadd(18.5, 80.25, -60.84, 0.5)
	pt3dadd(18.67, 80.08, -60.84, 0.5)
	pt3dadd(18.67, 77.92, -60.84, 0.5)
	pt3dadd(18.82, 77.75, -60.84, 0.5)
	pt3dadd(18.82, 77.42, -61.56, 0.5)
  }
  dend[500] {pt3dclear()
	pt3dadd(18.82, 77.42, -61.56, 0.5)
	pt3dadd(19.17, 77.08, -61.56, 0.5)
	pt3dadd(19, 76.92, -61.56, 0.5)
	pt3dadd(19, 76.58, -61.56, 0.5)
	pt3dadd(18.82, 76.42, -61.56, 0.5)
	pt3dadd(18.82, 76.08, -61.56, 0.5)
	pt3dadd(18.67, 75.92, -61.56, 0.5)
	pt3dadd(18.67, 72.58, -61.56, 0.5)
  }
}
proc shape3d_48() {
  dend[500] {	pt3dadd(18.5, 72.25, -61.56, 0.5)
	pt3dadd(18.5, 72.08, -61.56, 0.5)
  }
  dend[501] {pt3dclear()
	pt3dadd(18.82, 77.42, -61.56, 0.5)
	pt3dadd(19, 77.25, -63.72, 0.5)
	pt3dadd(19.17, 76.92, -63.72, 0.5)
	pt3dadd(19.32, 76.42, -63.72, 0.5)
	pt3dadd(19.5, 76.08, -63.72, 0.5)
	pt3dadd(19.67, 75.75, -63.72, 0.5)
	pt3dadd(19.82, 75.42, -63.72, 0.5)
	pt3dadd(20, 75.08, -63.72, 0.5)
	pt3dadd(20.17, 74.92, -63.72, 0.5)
	pt3dadd(20.32, 74.75, -63.72, 0.5)
	pt3dadd(20.5, 74.42, -63.72, 0.5)
	pt3dadd(20.67, 74.08, -63.72, 0.5)
	pt3dadd(20.83, 73.75, -63.72, 0.5)
	pt3dadd(20.83, 72.25, -63.72, 0.5)
  }
  dend[502] {pt3dclear()
	pt3dadd(17.17, 81.75, -57.6, 0.5)
	pt3dadd(17.67, 81.75, -60.12, 0.5)
	pt3dadd(18, 81.58, -60.12, 0.5)
	pt3dadd(18.32, 81.42, -60.12, 0.5)
	pt3dadd(18.67, 81.08, -60.12, 0.5)
	pt3dadd(18.82, 80.75, -60.12, 0.5)
	pt3dadd(19, 80.58, -60.12, 0.5)
	pt3dadd(19.17, 80.25, -60.12, 0.5)
	pt3dadd(19.32, 80.08, -60.12, 0.5)
	pt3dadd(19.5, 79.75, -60.12, 0.5)
	pt3dadd(19.67, 79.58, -60.12, 0.5)
	pt3dadd(19.82, 79.75, -60.12, 0.5)
	pt3dadd(19.82, 80.08, -60.12, 0.5)
	pt3dadd(20, 80.08, -60.12, 0.5)
  }
  dend[503] {pt3dclear()
	pt3dadd(20, 80.08, -60.12, 0.5)
	pt3dadd(20.32, 80.08, -60.12, 0.5)
	pt3dadd(20.5, 80.25, -60.12, 0.5)
	pt3dadd(20.5, 81.58, -60.12, 0.5)
	pt3dadd(20.67, 81.75, -60.12, 0.5)
	pt3dadd(20.83, 81.92, -60.12, 0.5)
	pt3dadd(21, 82.25, -60.12, 0.5)
	pt3dadd(21.17, 82.42, -60.12, 0.5)
	pt3dadd(21.17, 82.92, -60.12, 0.5)
	pt3dadd(21.33, 83.08, -60.12, 0.5)
	pt3dadd(21.33, 83.42, -60.12, 0.5)
	pt3dadd(21.5, 83.58, -60.12, 0.5)
	pt3dadd(21.5, 83.92, -60.12, 0.5)
	pt3dadd(21.67, 84.08, -60.12, 0.5)
	pt3dadd(21.67, 85.25, -60.12, 0.5)
	pt3dadd(21.83, 85.25, -60.12, 0.5)
  }
  dend[504] {pt3dclear()
	pt3dadd(20, 80.08, -60.12, 0.5)
	pt3dadd(19.67, 79.92, -62.64, 0.5)
	pt3dadd(19.82, 79.75, -62.64, 0.5)
	pt3dadd(20, 79.25, -62.64, 0.5)
	pt3dadd(20.17, 78.92, -62.64, 0.5)
	pt3dadd(20.32, 78.58, -62.64, 0.5)
	pt3dadd(20.32, 78.25, -62.64, 0.5)
	pt3dadd(20.5, 77.92, -62.64, 0.5)
	pt3dadd(20.67, 77.58, -62.64, 0.5)
	pt3dadd(20.83, 77.42, -62.64, 0.5)
	pt3dadd(20.83, 77.08, -62.64, 0.5)
	pt3dadd(21, 76.92, -62.64, 0.5)
	pt3dadd(21, 76.58, -62.64, 0.5)
	pt3dadd(21.17, 76.25, -62.64, 0.5)
	pt3dadd(21.17, 76.08, -62.64, 0.5)
  }
  dend[505] {pt3dclear()
	pt3dadd(14, 60.42, -58.32, 1)
	pt3dadd(14.17, 60.25, -60.48, 0.5)
	pt3dadd(14.33, 60.42, -60.48, 0.5)
	pt3dadd(14.5, 60.58, -60.48, 0.5)
	pt3dadd(14.83, 60.75, -60.48, 0.5)
	pt3dadd(15, 60.92, -60.48, 0.5)
	pt3dadd(15.33, 60.92, -60.48, 0.5)
	pt3dadd(15.5, 61.08, -60.48, 0.5)
	pt3dadd(15.67, 61.42, -60.48, 0.5)
	pt3dadd(15.83, 61.58, -60.48, 0.5)
	pt3dadd(16.17, 61.92, -60.48, 0.5)
	pt3dadd(16.32, 62.25, -60.48, 0.5)
	pt3dadd(16.67, 62.58, -60.48, 0.5)
	pt3dadd(16.82, 62.92, -60.48, 0.5)
	pt3dadd(16.82, 63.08, -60.48, 0.5)
  }
  dend[506] {pt3dclear()
	pt3dadd(16.82, 63.08, -60.48, 0.5)
	pt3dadd(17.32, 63.08, -60.48, 0.5)
	pt3dadd(18, 63.08, -60.48, 0.5)
	pt3dadd(18.32, 62.92, -60.48, 0.5)
	pt3dadd(18.5, 62.75, -60.48, 0.5)
	pt3dadd(19.32, 62.75, -60.48, 0.5)
  }
  dend[507] {pt3dclear()
	pt3dadd(19.32, 62.75, -60.48, 0.5)
	pt3dadd(20, 62.92, -61.92, 0.5)
	pt3dadd(20.17, 63.25, -61.92, 0.5)
	pt3dadd(20.32, 63.42, -61.92, 0.5)
	pt3dadd(20.83, 64.25, -61.92, 0.5)
	pt3dadd(21.67, 65.08, -61.92, 0.5)
	pt3dadd(21.83, 65.42, -61.92, 0.5)
	pt3dadd(22.17, 65.75, -61.92, 0.5)
	pt3dadd(22.5, 66.25, -61.92, 0.5)
	pt3dadd(23, 66.75, -61.92, 0.5)
	pt3dadd(23.17, 67.25, -61.92, 0.5)
	pt3dadd(23.33, 67.58, -61.92, 0.5)
	pt3dadd(23.5, 68.08, -61.92, 0.5)
	pt3dadd(23.5, 71.42, -61.92, 0.5)
	pt3dadd(23.33, 71.58, -61.92, 0.5)
	pt3dadd(23.33, 72.25, -61.92, 0.5)
	pt3dadd(23.17, 72.58, -61.92, 0.5)
	pt3dadd(23.17, 73.25, -61.92, 0.5)
  }
  dend[508] {pt3dclear()
	pt3dadd(23.17, 73.25, -61.92, 0.5)
	pt3dadd(23.67, 73.25, -61.92, 0.5)
	pt3dadd(23.67, 73.75, -61.92, 0.5)
	pt3dadd(23.5, 73.92, -61.92, 0.5)
	pt3dadd(23.5, 74.25, -61.92, 0.5)
	pt3dadd(23.33, 74.42, -61.92, 0.5)
	pt3dadd(23.17, 74.75, -61.92, 0.5)
	pt3dadd(23.17, 75.25, -61.92, 0.5)
	pt3dadd(23, 75.58, -61.92, 0.5)
	pt3dadd(22.83, 75.92, -61.92, 0.5)
	pt3dadd(22.83, 76.25, -61.92, 0.5)
	pt3dadd(22.67, 76.58, -61.92, 0.5)
	pt3dadd(22.67, 77.58, -61.92, 0.5)
	pt3dadd(22.5, 77.75, -61.92, 0.5)
	pt3dadd(22.5, 79.08, -61.92, 0.5)
	pt3dadd(22.33, 79.25, -61.92, 0.5)
	pt3dadd(22.33, 80.25, -61.92, 0.5)
  }
  dend[509] {pt3dclear()
	pt3dadd(22.33, 80.25, -61.92, 0.5)
	pt3dadd(22.83, 80.08, -61.92, 0.5)
	pt3dadd(22.5, 80.25, -61.92, 0.5)
	pt3dadd(22, 80.58, -61.92, 0.5)
	pt3dadd(21.5, 81.08, -61.92, 0.5)
	pt3dadd(21.33, 81.25, -61.92, 0.5)
	pt3dadd(21.17, 81.58, -61.92, 0.5)
	pt3dadd(21.17, 81.92, -61.92, 0.5)
	pt3dadd(21, 82.25, -61.92, 0.5)
	pt3dadd(20.83, 82.58, -61.92, 0.5)
	pt3dadd(20.83, 83.75, -61.92, 0.5)
	pt3dadd(20.67, 84.08, -61.92, 0.5)
	pt3dadd(20.67, 85.25, -61.92, 0.5)
	pt3dadd(20.5, 85.25, -61.92, 0.5)
  }
  dend[510] {pt3dclear()
	pt3dadd(22.33, 80.25, -61.92, 0.5)
	pt3dadd(22.83, 79.92, -64.08, 0.5)
	pt3dadd(22.83, 80.25, -64.08, 0.5)
	pt3dadd(23, 80.42, -64.08, 0.5)
	pt3dadd(23, 82.92, -64.08, 0.5)
	pt3dadd(23.17, 83.25, -64.08, 0.5)
	pt3dadd(23.33, 83.58, -64.08, 0.5)
	pt3dadd(23.33, 83.92, -64.08, 0.5)
	pt3dadd(23.5, 84.25, -64.08, 0.5)
	pt3dadd(23.67, 84.58, -64.08, 0.5)
	pt3dadd(23.67, 85.42, -64.08, 0.5)
  }
  dend[511] {pt3dclear()
	pt3dadd(23.67, 85.42, -64.08, 0.5)
	pt3dadd(24.33, 85.25, -64.08, 0.5)
	pt3dadd(24.33, 85.58, -64.08, 0.5)
	pt3dadd(24.17, 85.92, -64.08, 0.5)
	pt3dadd(24, 86.08, -64.08, 0.5)
	pt3dadd(23.67, 86.42, -64.08, 0.5)
	pt3dadd(23.5, 86.58, -64.08, 0.5)
	pt3dadd(23.17, 86.75, -64.08, 0.5)
	pt3dadd(22.83, 86.92, -64.08, 0.5)
	pt3dadd(22.67, 87.08, -64.08, 0.5)
	pt3dadd(22.5, 87.25, -64.08, 0.5)
	pt3dadd(22.17, 87.58, -64.08, 0.5)
	pt3dadd(21.83, 87.75, -64.08, 0.5)
	pt3dadd(21.67, 87.92, -64.08, 0.5)
	pt3dadd(21.33, 88.08, -64.08, 0.5)
	pt3dadd(21, 88.25, -64.08, 0.5)
	pt3dadd(20.67, 88.25, -64.08, 0.5)
	pt3dadd(20.5, 88.42, -64.08, 0.5)
  }
  dend[512] {pt3dclear()
	pt3dadd(23.67, 85.42, -64.08, 0.5)
	pt3dadd(23.83, 85.42, -62.28, 0.5)
	pt3dadd(23.83, 86.58, -62.28, 0.5)
	pt3dadd(24, 86.92, -62.28, 0.5)
	pt3dadd(24, 87.25, -62.28, 0.5)
	pt3dadd(24.17, 87.58, -62.28, 0.5)
	pt3dadd(24.33, 87.92, -62.28, 0.5)
	pt3dadd(24.33, 88.25, -62.28, 0.5)
	pt3dadd(24.5, 88.25, -62.28, 0.5)
  }
  dend[513] {pt3dclear()
	pt3dadd(24.5, 88.25, -62.28, 0.5)
	pt3dadd(24.67, 88.58, -62.28, 0.5)
	pt3dadd(24.83, 88.75, -62.28, 0.5)
	pt3dadd(24.67, 89.08, -62.28, 0.5)
	pt3dadd(24.5, 89.58, -62.28, 0.5)
	pt3dadd(24.5, 90.42, -62.28, 0.5)
	pt3dadd(24.33, 90.92, -62.28, 0.5)
	pt3dadd(24.33, 92.58, -62.28, 0.5)
	pt3dadd(24.5, 92.75, -62.28, 0.5)
	pt3dadd(24.5, 93.58, -62.28, 0.5)
	pt3dadd(24.67, 93.75, -62.28, 0.5)
	pt3dadd(24.67, 94.75, -62.28, 0.5)
	pt3dadd(24.83, 95.08, -62.28, 0.5)
	pt3dadd(24.83, 98.42, -62.28, 0.5)
	pt3dadd(24.67, 98.58, -62.28, 0.5)
	pt3dadd(24.67, 99.08, -62.28, 0.5)
	pt3dadd(24.5, 99.42, -62.28, 0.5)
	pt3dadd(24.5, 100.42, -62.28, 0.5)
	pt3dadd(24.33, 100.42, -62.28, 0.5)
  }
  dend[514] {pt3dclear()
	pt3dadd(24.33, 100.42, -62.28, 0.5)
	pt3dadd(24.67, 100.25, -62.28, 0.5)
	pt3dadd(24.5, 100.42, -62.28, 0.5)
	pt3dadd(24.33, 100.58, -62.28, 0.5)
	pt3dadd(24.17, 100.75, -62.28, 0.5)
	pt3dadd(24, 100.92, -62.28, 0.5)
	pt3dadd(23.83, 101.08, -62.28, 0.5)
	pt3dadd(23.67, 101.25, -62.28, 0.5)
	pt3dadd(23.5, 101.42, -62.28, 0.5)
	pt3dadd(23.17, 101.75, -62.28, 0.5)
	pt3dadd(22.83, 101.92, -62.28, 0.5)
	pt3dadd(22.67, 102.08, -62.28, 0.5)
  }
}
proc shape3d_49() {
  dend[514] {	pt3dadd(22.33, 102.25, -62.28, 0.5)
	pt3dadd(22.33, 102.58, -62.28, 0.5)
	pt3dadd(22.17, 102.75, -62.28, 0.5)
	pt3dadd(21.83, 102.92, -62.28, 0.5)
	pt3dadd(21.83, 103.25, -62.28, 0.5)
	pt3dadd(21.67, 103.42, -62.28, 0.5)
  }
  dend[515] {pt3dclear()
	pt3dadd(24.33, 100.42, -62.28, 0.5)
	pt3dadd(24.5, 100.25, -64.8, 0.5)
	pt3dadd(24.5, 100.58, -64.8, 0.5)
	pt3dadd(24.67, 100.75, -64.8, 0.5)
	pt3dadd(24.67, 101.08, -64.8, 0.5)
	pt3dadd(24.83, 101.25, -64.8, 0.5)
	pt3dadd(24.83, 103.58, -64.8, 0.5)
	pt3dadd(24.67, 103.75, -64.8, 0.5)
	pt3dadd(24.67, 104.25, -64.8, 0.5)
	pt3dadd(24.5, 104.42, -64.8, 0.5)
	pt3dadd(24.5, 104.75, -64.8, 0.5)
	pt3dadd(24.33, 105.08, -64.8, 0.5)
	pt3dadd(24.33, 106.75, -64.8, 0.5)
	pt3dadd(24.17, 106.75, -64.8, 0.5)
  }
  dend[516] {pt3dclear()
	pt3dadd(24.17, 106.75, -64.8, 0.5)
	pt3dadd(24.67, 106.75, -64.8, 0.5)
	pt3dadd(24.5, 106.92, -64.8, 0.5)
	pt3dadd(24.33, 107.25, -64.8, 0.5)
	pt3dadd(24.33, 109.25, -64.8, 0.5)
	pt3dadd(24.17, 109.42, -64.8, 0.5)
	pt3dadd(24.17, 109.75, -64.8, 0.5)
	pt3dadd(24, 109.92, -64.8, 0.5)
	pt3dadd(23.83, 110.08, -64.8, 0.5)
	pt3dadd(23.67, 110.25, -64.8, 0.5)
	pt3dadd(23.5, 110.42, -64.8, 0.5)
	pt3dadd(23.33, 110.75, -64.8, 0.5)
	pt3dadd(23.33, 110.92, -64.8, 0.5)
  }
  dend[517] {pt3dclear()
	pt3dadd(24.17, 106.75, -64.8, 0.5)
	pt3dadd(24.5, 106.75, -59.4, 0.5)
	pt3dadd(24.67, 106.58, -59.4, 0.5)
	pt3dadd(24.83, 106.42, -59.4, 0.5)
	pt3dadd(25, 106.25, -59.4, 0.5)
	pt3dadd(25, 105.92, -59.4, 0.5)
	pt3dadd(25.67, 105.25, -59.4, 0.5)
	pt3dadd(25.83, 104.92, -59.4, 0.5)
	pt3dadd(26, 104.75, -59.4, 0.5)
	pt3dadd(26, 104.42, -59.4, 0.5)
	pt3dadd(26.17, 104.25, -59.4, 0.5)
	pt3dadd(26.33, 104.08, -59.4, 0.5)
	pt3dadd(26.5, 103.75, -59.4, 0.5)
	pt3dadd(26.67, 103.58, -59.4, 0.5)
	pt3dadd(26.67, 103.42, -59.4, 0.5)
  }
  dend[518] {pt3dclear()
	pt3dadd(26.67, 103.42, -59.4, 0.5)
	pt3dadd(28, 103.58, -59.4, 0.5)
	pt3dadd(28.17, 103.75, -59.4, 0.5)
	pt3dadd(28.33, 104.08, -59.4, 0.5)
	pt3dadd(28.33, 104.58, -59.4, 0.5)
	pt3dadd(28.5, 104.92, -59.4, 0.5)
	pt3dadd(28.67, 105.25, -59.4, 0.5)
	pt3dadd(28.83, 105.42, -59.4, 0.5)
	pt3dadd(29, 105.58, -59.4, 0.5)
	pt3dadd(29.33, 105.75, -59.4, 0.5)
	pt3dadd(29.5, 105.92, -59.4, 0.5)
	pt3dadd(29.83, 106.08, -59.4, 0.5)
	pt3dadd(30.17, 106.25, -59.4, 0.5)
	pt3dadd(30.33, 106.42, -59.4, 0.5)
	pt3dadd(30.67, 106.42, -59.4, 0.5)
	pt3dadd(30.83, 106.58, -59.4, 0.5)
	pt3dadd(31.17, 106.75, -59.4, 0.5)
	pt3dadd(31.5, 106.75, -59.4, 0.5)
	pt3dadd(31.67, 106.92, -59.4, 0.5)
	pt3dadd(32, 106.92, -59.4, 0.5)
	pt3dadd(32.17, 107.08, -59.4, 0.5)
	pt3dadd(32.5, 107.25, -59.4, 0.5)
	pt3dadd(32.67, 107.42, -59.4, 0.5)
	pt3dadd(33, 107.58, -59.4, 0.5)
	pt3dadd(33.17, 107.75, -59.4, 0.5)
	pt3dadd(33.5, 107.92, -59.4, 0.5)
	pt3dadd(33.83, 108.25, -59.4, 0.5)
	pt3dadd(34, 108.42, -59.4, 0.5)
	pt3dadd(34.33, 108.42, -59.4, 0.5)
	pt3dadd(34.5, 108.75, -59.4, 0.5)
	pt3dadd(34.5, 108.92, -59.4, 0.5)
  }
  dend[519] {pt3dclear()
	pt3dadd(26.67, 103.42, -59.4, 0.5)
	pt3dadd(27, 103.25, -61.56, 0.5)
	pt3dadd(27.33, 103.25, -61.56, 0.5)
	pt3dadd(27.33, 102.92, -61.56, 0.5)
	pt3dadd(27.5, 102.75, -61.56, 0.5)
	pt3dadd(27.67, 102.42, -61.56, 0.5)
	pt3dadd(28, 102.08, -61.56, 0.5)
	pt3dadd(28.17, 101.92, -61.56, 0.5)
	pt3dadd(28.33, 101.75, -61.56, 0.5)
	pt3dadd(28.5, 101.42, -61.56, 0.5)
	pt3dadd(28.67, 101.08, -61.56, 0.5)
	pt3dadd(28.83, 100.92, -61.56, 0.5)
	pt3dadd(29, 100.75, -61.56, 0.5)
	pt3dadd(29, 100.58, -61.56, 0.5)
  }
  dend[520] {pt3dclear()
	pt3dadd(29, 100.58, -61.56, 0.5)
	pt3dadd(28.67, 100.58, -63, 0.5)
	pt3dadd(28.67, 99.25, -63, 0.5)
	pt3dadd(28.5, 98.92, -63, 0.5)
	pt3dadd(28.5, 97.08, -63, 0.5)
	pt3dadd(28.33, 96.75, -63, 0.5)
	pt3dadd(28.17, 96.42, -63, 0.5)
	pt3dadd(28, 96.08, -63, 0.5)
	pt3dadd(28, 95.75, -63, 0.5)
	pt3dadd(27.83, 95.42, -63, 0.5)
	pt3dadd(27.83, 94.92, -63, 0.5)
	pt3dadd(27.67, 94.75, -63, 0.5)
	pt3dadd(27.67, 93.58, -63, 0.5)
	pt3dadd(27.5, 93.25, -63, 0.5)
	pt3dadd(27.5, 92.75, -63, 0.5)
	pt3dadd(27.33, 92.42, -63, 0.5)
	pt3dadd(27.17, 92.08, -63, 0.5)
	pt3dadd(27, 91.75, -63, 0.5)
	pt3dadd(27, 91.42, -63, 0.5)
	pt3dadd(26.83, 91.42, -63, 0.5)
  }
  dend[521] {pt3dclear()
	pt3dadd(29, 100.58, -61.56, 0.5)
	pt3dadd(29.83, 100.92, -61.2, 0.5)
	pt3dadd(30, 101.08, -61.2, 0.5)
	pt3dadd(30, 102.08, -61.2, 0.5)
	pt3dadd(29.83, 102.25, -61.2, 0.5)
	pt3dadd(29.83, 103.58, -61.2, 0.5)
	pt3dadd(30, 103.75, -61.2, 0.5)
  }
  dend[522] {pt3dclear()
	pt3dadd(30, 103.75, -61.2, 0.5)
	pt3dadd(30.17, 103.25, -61.2, 0.5)
	pt3dadd(30.17, 104.08, -61.2, 0.5)
	pt3dadd(29.83, 104.58, -61.2, 0.5)
	pt3dadd(29.5, 104.92, -61.2, 0.5)
	pt3dadd(29.33, 105.25, -61.2, 0.5)
	pt3dadd(29.17, 105.42, -61.2, 0.5)
	pt3dadd(29.17, 105.75, -61.2, 0.5)
	pt3dadd(29, 106.08, -61.2, 0.5)
	pt3dadd(29, 107.08, -61.2, 0.5)
	pt3dadd(28.83, 107.25, -61.2, 0.5)
	pt3dadd(28.83, 107.58, -61.2, 0.5)
	pt3dadd(28.67, 107.58, -61.2, 0.5)
  }
  dend[523] {pt3dclear()
	pt3dadd(28.67, 107.58, -61.2, 0.5)
	pt3dadd(29, 107.25, -61.2, 0.5)
	pt3dadd(29, 107.75, -61.2, 0.5)
	pt3dadd(28.83, 107.92, -61.2, 0.5)
	pt3dadd(28.17, 108.58, -61.2, 0.5)
	pt3dadd(28, 108.75, -61.2, 0.5)
	pt3dadd(27.67, 108.75, -61.2, 0.5)
	pt3dadd(27.5, 109.08, -61.2, 0.5)
	pt3dadd(27.17, 109.42, -61.2, 0.5)
	pt3dadd(27, 109.58, -61.2, 0.5)
	pt3dadd(26.83, 109.75, -61.2, 0.5)
	pt3dadd(26.67, 109.92, -61.2, 0.5)
	pt3dadd(26.33, 109.92, -61.2, 0.5)
	pt3dadd(26.17, 110.08, -61.2, 0.5)
	pt3dadd(26, 110.25, -61.2, 0.5)
	pt3dadd(25.83, 110.25, -61.2, 0.5)
  }
  dend[524] {pt3dclear()
	pt3dadd(28.67, 107.58, -61.2, 0.5)
	pt3dadd(28.33, 107.75, -63.36, 0.5)
	pt3dadd(28.67, 108.08, -63.36, 0.5)
	pt3dadd(29, 108.25, -63.36, 0.5)
	pt3dadd(29.33, 108.42, -63.36, 0.5)
	pt3dadd(29.67, 108.58, -63.36, 0.5)
	pt3dadd(30, 108.58, -63.36, 0.5)
	pt3dadd(30.33, 108.75, -63.36, 0.5)
	pt3dadd(30.67, 108.75, -63.36, 0.5)
	pt3dadd(31, 108.92, -63.36, 0.5)
	pt3dadd(31.33, 109.08, -63.36, 0.5)
	pt3dadd(32.33, 109.08, -63.36, 0.5)
	pt3dadd(32.83, 109.25, -63.36, 0.5)
	pt3dadd(33.5, 109.25, -63.36, 0.5)
	pt3dadd(33.83, 109.08, -63.36, 0.5)
	pt3dadd(36.5, 109.08, -63.36, 0.5)
	pt3dadd(36.83, 109.25, -63.36, 0.5)
  }
  dend[525] {pt3dclear()
	pt3dadd(30, 103.75, -61.2, 0.5)
	pt3dadd(30.17, 104.08, -63.36, 0.5)
	pt3dadd(30.5, 104.25, -63.36, 0.5)
	pt3dadd(31, 104.25, -63.36, 0.5)
	pt3dadd(31.33, 104.08, -63.36, 0.5)
	pt3dadd(31.83, 103.58, -63.36, 0.5)
	pt3dadd(32.33, 103.42, -63.36, 0.5)
	pt3dadd(32.67, 103.08, -63.36, 0.5)
	pt3dadd(32.83, 102.92, -63.36, 0.5)
	pt3dadd(33, 102.58, -63.36, 0.5)
	pt3dadd(33, 102.25, -63.36, 0.5)
	pt3dadd(33.17, 101.92, -63.36, 0.5)
	pt3dadd(33.33, 101.75, -63.36, 0.5)
	pt3dadd(33.33, 101.42, -63.36, 0.5)
	pt3dadd(33.5, 101.25, -63.36, 0.5)
	pt3dadd(33.67, 101.08, -63.36, 0.5)
	pt3dadd(33.67, 100.75, -63.36, 0.5)
	pt3dadd(33.83, 100.58, -63.36, 0.5)
	pt3dadd(34, 100.42, -63.36, 0.5)
	pt3dadd(34.17, 100.25, -63.36, 0.5)
	pt3dadd(34.33, 100.08, -63.36, 0.5)
	pt3dadd(34.67, 99.92, -63.36, 0.5)
	pt3dadd(34.83, 99.75, -63.36, 0.5)
	pt3dadd(35, 99.58, -63.36, 0.5)
	pt3dadd(35.33, 99.42, -63.36, 0.5)
	pt3dadd(35.67, 99.25, -63.36, 0.5)
	pt3dadd(36, 99.08, -63.36, 0.5)
	pt3dadd(36.33, 98.92, -63.36, 0.5)
	pt3dadd(36.67, 98.75, -63.36, 0.5)
	pt3dadd(36.83, 98.42, -63.36, 0.5)
	pt3dadd(37.33, 97.92, -63.36, 0.5)
	pt3dadd(37.5, 97.75, -63.36, 0.5)
	pt3dadd(37.67, 97.58, -63.36, 0.5)
	pt3dadd(37.83, 97.42, -63.36, 0.5)
  }
}
proc shape3d_50() {
  dend[525] {	pt3dadd(38, 97.25, -63.36, 0.5)
	pt3dadd(38.17, 97.08, -63.36, 0.5)
	pt3dadd(38.5, 96.75, -63.36, 0.5)
	pt3dadd(38.67, 96.58, -63.36, 0.5)
	pt3dadd(39, 96.42, -63.36, 0.5)
	pt3dadd(39.17, 96.08, -63.36, 0.5)
	pt3dadd(39.33, 95.92, -63.36, 0.5)
	pt3dadd(39.5, 95.58, -63.36, 0.5)
	pt3dadd(39.67, 95.42, -63.36, 0.5)
	pt3dadd(39.83, 95.25, -63.36, 0.5)
	pt3dadd(40, 95.25, -63.36, 0.5)
  }
  dend[526] {pt3dclear()
	pt3dadd(24.5, 88.25, -62.28, 0.5)
	pt3dadd(24.5, 88.25, -59.4, 0.5)
	pt3dadd(24.5, 88.58, -59.4, 0.5)
	pt3dadd(24.33, 88.75, -59.4, 0.5)
	pt3dadd(24, 88.92, -59.4, 0.5)
	pt3dadd(23.83, 89.08, -59.4, 0.5)
	pt3dadd(23.83, 89.42, -59.4, 0.5)
	pt3dadd(23.67, 89.58, -59.4, 0.5)
	pt3dadd(23.5, 89.92, -59.4, 0.5)
	pt3dadd(23.33, 90.08, -59.4, 0.5)
	pt3dadd(23.17, 90.25, -59.4, 0.5)
	pt3dadd(23.17, 90.58, -59.4, 0.5)
	pt3dadd(23, 90.75, -59.4, 0.5)
	pt3dadd(22.83, 91.08, -59.4, 0.5)
	pt3dadd(22.67, 91.42, -59.4, 0.5)
	pt3dadd(22.67, 92.75, -59.4, 0.5)
	pt3dadd(22.83, 92.92, -59.4, 0.5)
	pt3dadd(23, 93.25, -59.4, 0.5)
	pt3dadd(23, 93.58, -59.4, 0.5)
	pt3dadd(23.17, 93.75, -59.4, 0.5)
	pt3dadd(23.17, 96.08, -59.4, 0.5)
	pt3dadd(23.33, 96.25, -59.4, 0.5)
	pt3dadd(23.33, 96.92, -59.4, 0.5)
  }
  dend[527] {pt3dclear()
	pt3dadd(23.17, 73.25, -61.92, 0.5)
	pt3dadd(23.17, 73.42, -61.92, 0.5)
	pt3dadd(23.33, 73.58, -61.92, 0.5)
	pt3dadd(23.5, 73.92, -61.92, 0.5)
	pt3dadd(24.33, 74.42, -61.92, 0.5)
	pt3dadd(25, 74.75, -61.92, 0.5)
	pt3dadd(25.33, 74.92, -61.92, 0.5)
	pt3dadd(26, 75.58, -61.92, 0.5)
	pt3dadd(26.33, 75.75, -61.92, 0.5)
	pt3dadd(26.5, 76.08, -61.92, 0.5)
	pt3dadd(26.83, 76.08, -61.92, 0.5)
	pt3dadd(26.83, 76.42, -61.92, 0.5)
	pt3dadd(27, 76.58, -61.92, 0.5)
	pt3dadd(27.17, 76.75, -61.92, 0.5)
	pt3dadd(27.17, 77.08, -61.92, 0.5)
	pt3dadd(27.17, 76.92, -61.92, 0.5)
  }
  dend[528] {pt3dclear()
	pt3dadd(27.17, 76.92, -61.92, 0.5)
	pt3dadd(27.83, 76.92, -61.92, 0.5)
	pt3dadd(27.83, 83.08, -61.92, 0.5)
  }
  dend[529] {pt3dclear()
	pt3dadd(27.83, 83.08, -61.92, 0.5)
	pt3dadd(28.5, 82.92, -61.92, 0.5)
	pt3dadd(28.17, 83.08, -61.92, 0.5)
	pt3dadd(28, 83.42, -61.92, 0.5)
	pt3dadd(27.5, 83.75, -61.92, 0.5)
	pt3dadd(27.17, 84.08, -61.92, 0.5)
	pt3dadd(27, 84.42, -61.92, 0.5)
	pt3dadd(27, 84.75, -61.92, 0.5)
	pt3dadd(26.83, 84.92, -61.92, 0.5)
	pt3dadd(26.67, 85.08, -61.92, 0.5)
	pt3dadd(26.67, 85.58, -61.92, 0.5)
	pt3dadd(26.5, 85.92, -61.92, 0.5)
	pt3dadd(26.5, 86.92, -61.92, 0.5)
	pt3dadd(26.33, 86.92, -61.92, 0.5)
  }
  dend[530] {pt3dclear()
	pt3dadd(27.83, 83.08, -61.92, 0.5)
	pt3dadd(28.5, 82.92, -64.08, 0.5)
	pt3dadd(28.5, 84.75, -64.08, 0.5)
	pt3dadd(28.67, 84.92, -64.08, 0.5)
	pt3dadd(28.67, 85.75, -64.08, 0.5)
	pt3dadd(28.83, 86.25, -64.08, 0.5)
	pt3dadd(28.83, 88.42, -64.08, 0.5)
	pt3dadd(29, 88.75, -64.08, 0.5)
	pt3dadd(29, 91.42, -64.08, 0.5)
	pt3dadd(29.17, 91.58, -64.08, 0.5)
	pt3dadd(29.17, 91.92, -64.08, 0.5)
	pt3dadd(29, 91.92, -64.08, 0.5)
  }
  dend[531] {pt3dclear()
	pt3dadd(27.17, 76.92, -61.92, 0.5)
	pt3dadd(27.83, 76.92, -64.08, 0.5)
	pt3dadd(27.83, 77.25, -64.08, 0.5)
	pt3dadd(28, 77.42, -64.08, 0.5)
	pt3dadd(28.17, 77.75, -64.08, 0.5)
	pt3dadd(28.33, 78.08, -64.08, 0.5)
	pt3dadd(28.5, 78.42, -64.08, 0.5)
	pt3dadd(28.83, 78.42, -64.08, 0.5)
	pt3dadd(29, 78.58, -64.08, 0.5)
	pt3dadd(29.33, 78.75, -64.08, 0.5)
	pt3dadd(29.67, 78.92, -64.08, 0.5)
	pt3dadd(29.83, 79.08, -64.08, 0.5)
	pt3dadd(30.17, 79.08, -64.08, 0.5)
	pt3dadd(30.17, 79.25, -64.08, 0.5)
  }
  dend[532] {pt3dclear()
	pt3dadd(30.17, 79.25, -64.08, 0.5)
	pt3dadd(30.5, 79.25, -64.08, 0.5)
	pt3dadd(30.5, 79.75, -64.08, 0.5)
	pt3dadd(30.33, 80.25, -64.08, 0.5)
	pt3dadd(30, 80.92, -64.08, 0.5)
	pt3dadd(29.83, 81.42, -64.08, 0.5)
	pt3dadd(29.83, 84.25, -64.08, 0.5)
	pt3dadd(30, 84.42, -64.08, 0.5)
	pt3dadd(30.17, 84.92, -64.08, 0.5)
	pt3dadd(30.33, 85.25, -64.08, 0.5)
	pt3dadd(30.5, 85.58, -64.08, 0.5)
	pt3dadd(30.67, 85.92, -64.08, 0.5)
	pt3dadd(30.83, 86.42, -64.08, 0.5)
	pt3dadd(30.83, 86.92, -64.08, 0.5)
	pt3dadd(31, 87.25, -64.08, 0.5)
	pt3dadd(31.17, 87.58, -64.08, 0.5)
	pt3dadd(31.17, 88.42, -64.08, 0.5)
	pt3dadd(31.33, 88.75, -64.08, 0.5)
	pt3dadd(31.33, 90.25, -64.08, 0.5)
	pt3dadd(31.5, 90.42, -64.08, 0.5)
	pt3dadd(31.5, 90.92, -64.08, 0.5)
  }
  dend[533] {pt3dclear()
	pt3dadd(30.17, 79.25, -64.08, 0.5)
	pt3dadd(30.5, 78.92, -66.59, 0.5)
	pt3dadd(30.5, 79.08, -67.31, 0.5)
	pt3dadd(30.33, 78.92, -63, 0.5)
	pt3dadd(30.5, 79.08, -63, 0.5)
	pt3dadd(30.67, 79.25, -63, 0.5)
	pt3dadd(30.83, 79.58, -63, 0.5)
	pt3dadd(31, 79.75, -63, 0.5)
	pt3dadd(31.17, 79.92, -63, 0.5)
	pt3dadd(31.33, 80.08, -63, 0.5)
	pt3dadd(31.67, 80.08, -63, 0.5)
	pt3dadd(31.83, 80.25, -63, 0.5)
	pt3dadd(32.17, 80.42, -63, 0.5)
	pt3dadd(32.5, 80.42, -63, 0.5)
	pt3dadd(32.67, 80.58, -63, 0.5)
	pt3dadd(32.83, 80.58, -63, 0.5)
  }
  dend[534] {pt3dclear()
	pt3dadd(32.83, 80.58, -63, 0.5)
	pt3dadd(33.17, 80.08, -63, 0.5)
	pt3dadd(33.17, 80.75, -63, 0.5)
	pt3dadd(33, 81.08, -63, 0.5)
	pt3dadd(32.83, 81.42, -63, 0.5)
	pt3dadd(32.83, 81.75, -63, 0.5)
	pt3dadd(32.67, 81.92, -63, 0.5)
	pt3dadd(32.5, 82.08, -63, 0.5)
	pt3dadd(32.5, 83.42, -63, 0.5)
	pt3dadd(32.67, 83.58, -63, 0.5)
	pt3dadd(32.67, 84.08, -63, 0.5)
	pt3dadd(32.83, 84.25, -63, 0.5)
  }
  dend[535] {pt3dclear()
	pt3dadd(32.83, 84.25, -63, 0.5)
	pt3dadd(33, 83.75, -63, 0.5)
	pt3dadd(33, 84.58, -63, 0.5)
	pt3dadd(32.83, 85.08, -63, 0.5)
	pt3dadd(32.67, 85.25, -63, 0.5)
	pt3dadd(32.67, 85.75, -63, 0.5)
	pt3dadd(32.5, 86.08, -63, 0.5)
	pt3dadd(32.5, 89.08, -63, 0.5)
	pt3dadd(32.67, 89.58, -63, 0.5)
	pt3dadd(32.67, 90.58, -63, 0.5)
	pt3dadd(32.83, 90.92, -63, 0.5)
	pt3dadd(32.83, 91.58, -63, 0.5)
  }
  dend[536] {pt3dclear()
	pt3dadd(32.83, 84.25, -63, 0.5)
	pt3dadd(32.5, 83.92, -65.16, 0.5)
	pt3dadd(32.67, 84.08, -65.16, 0.5)
	pt3dadd(32.67, 84.42, -65.16, 0.5)
	pt3dadd(32.83, 84.75, -65.16, 0.5)
	pt3dadd(33, 84.92, -65.16, 0.5)
	pt3dadd(33.17, 85.08, -65.16, 0.5)
	pt3dadd(33.33, 85.25, -65.16, 0.5)
	pt3dadd(33.33, 85.58, -65.16, 0.5)
	pt3dadd(33.5, 85.75, -65.16, 0.5)
	pt3dadd(33.67, 85.92, -65.16, 0.5)
	pt3dadd(33.83, 86.08, -65.16, 0.5)
	pt3dadd(34, 86.25, -65.16, 0.5)
	pt3dadd(34.17, 86.58, -65.16, 0.5)
	pt3dadd(34.33, 86.75, -65.16, 0.5)
	pt3dadd(34.5, 87.08, -65.16, 0.5)
	pt3dadd(34.67, 87.42, -65.16, 0.5)
	pt3dadd(34.83, 87.58, -65.16, 0.5)
	pt3dadd(34.83, 88.08, -65.16, 0.5)
	pt3dadd(35, 88.25, -65.16, 0.5)
	pt3dadd(35, 88.58, -65.16, 0.5)
	pt3dadd(35.17, 88.75, -65.16, 0.5)
	pt3dadd(35.17, 89.75, -65.16, 0.5)
  }
  dend[537] {pt3dclear()
	pt3dadd(32.83, 80.58, -63, 0.5)
	pt3dadd(33, 80.58, -65.16, 0.5)
	pt3dadd(33.17, 80.75, -65.16, 0.5)
	pt3dadd(33.17, 81.08, -65.16, 0.5)
	pt3dadd(33.33, 81.42, -65.16, 0.5)
	pt3dadd(33.5, 81.75, -65.16, 0.5)
	pt3dadd(33.67, 81.92, -65.16, 0.5)
	pt3dadd(33.83, 82.08, -65.16, 0.5)
	pt3dadd(34, 82.25, -65.16, 0.5)
	pt3dadd(34.5, 82.25, -65.16, 0.5)
	pt3dadd(34.83, 82.42, -65.16, 0.5)
	pt3dadd(35.5, 82.42, -65.16, 0.5)
  }
  dend[538] {pt3dclear()
	pt3dadd(35.5, 82.42, -65.16, 0.5)
	pt3dadd(35.33, 82.42, -64.08, 0.5)
	pt3dadd(35.33, 83.25, -64.08, 0.5)
	pt3dadd(35.5, 83.42, -64.08, 0.5)
	pt3dadd(35.5, 83.75, -64.08, 0.5)
	pt3dadd(35.67, 84.08, -64.08, 0.5)
	pt3dadd(35.67, 84.42, -64.08, 0.5)
	pt3dadd(35.83, 84.58, -64.08, 0.5)
	pt3dadd(35.83, 84.92, -64.08, 0.5)
	pt3dadd(36, 85.08, -64.08, 0.5)
	pt3dadd(36.17, 85.42, -64.08, 0.5)
  }
}
proc shape3d_51() {
  dend[538] {	pt3dadd(36.17, 86.75, -64.08, 0.5)
  }
  dend[539] {pt3dclear()
	pt3dadd(35.5, 82.42, -65.16, 0.5)
	pt3dadd(35.67, 82.08, -67.68, 0.5)
	pt3dadd(36.67, 82.08, -67.68, 0.5)
	pt3dadd(36.83, 82.25, -67.68, 0.5)
	pt3dadd(37.33, 82.25, -67.68, 0.5)
	pt3dadd(37.5, 82.42, -67.68, 0.5)
	pt3dadd(37.67, 82.58, -67.68, 0.5)
	pt3dadd(37.83, 82.75, -67.68, 0.5)
	pt3dadd(38, 82.92, -67.68, 0.5)
	pt3dadd(38.17, 83.08, -67.68, 0.5)
  }
  dend[540] {pt3dclear()
	pt3dadd(38.17, 83.08, -67.68, 0.5)
	pt3dadd(38.67, 83.08, -67.68, 0.5)
	pt3dadd(38.67, 81.92, -67.68, 0.5)
	pt3dadd(38.83, 81.75, -67.68, 0.5)
	pt3dadd(38.83, 81.42, -67.68, 0.5)
	pt3dadd(39, 81.42, -67.68, 0.5)
  }
  dend[541] {pt3dclear()
	pt3dadd(39, 81.42, -67.68, 0.5)
	pt3dadd(38.83, 81.42, -67.68, 0.5)
	pt3dadd(38.83, 79.25, -67.68, 0.5)
	pt3dadd(39, 78.92, -67.68, 0.5)
	pt3dadd(39.17, 78.42, -67.68, 0.5)
	pt3dadd(39.17, 78.08, -67.68, 0.5)
	pt3dadd(39.33, 77.75, -67.68, 0.5)
	pt3dadd(39.5, 77.75, -67.68, 0.5)
  }
  dend[542] {pt3dclear()
	pt3dadd(39, 81.42, -67.68, 0.5)
	pt3dadd(38.83, 81.08, -69.84, 0.5)
	pt3dadd(39.17, 81.08, -69.84, 0.5)
	pt3dadd(39.33, 80.75, -69.84, 0.5)
	pt3dadd(39.67, 80.58, -69.84, 0.5)
	pt3dadd(39.83, 80.42, -69.84, 0.5)
	pt3dadd(40, 80.25, -69.84, 0.5)
	pt3dadd(40.33, 80.08, -69.84, 0.5)
	pt3dadd(40.67, 79.92, -69.84, 0.5)
	pt3dadd(41, 79.75, -69.84, 0.5)
	pt3dadd(41.33, 79.58, -69.84, 0.5)
	pt3dadd(41.67, 79.42, -69.84, 0.5)
	pt3dadd(42, 79.25, -69.84, 0.5)
	pt3dadd(42.33, 79.08, -69.84, 0.5)
	pt3dadd(42.5, 79.08, -69.84, 0.5)
  }
  dend[543] {pt3dclear()
	pt3dadd(38.17, 83.08, -67.68, 0.5)
	pt3dadd(38.17, 83.08, -69.84, 0.5)
	pt3dadd(38.33, 83.25, -69.84, 0.5)
	pt3dadd(38.5, 83.42, -69.84, 0.5)
	pt3dadd(38.83, 83.42, -69.84, 0.5)
	pt3dadd(39.17, 83.58, -69.84, 0.5)
	pt3dadd(39.33, 83.75, -69.84, 0.5)
	pt3dadd(39.67, 83.75, -69.84, 0.5)
	pt3dadd(39.83, 83.92, -69.84, 0.5)
	pt3dadd(40, 84.08, -69.84, 0.5)
	pt3dadd(40.33, 84.42, -69.84, 0.5)
	pt3dadd(40.5, 84.58, -69.84, 0.5)
	pt3dadd(40.67, 84.75, -69.84, 0.5)
	pt3dadd(40.83, 84.92, -69.84, 0.5)
	pt3dadd(41.17, 85.25, -69.84, 0.5)
	pt3dadd(41.33, 85.42, -69.84, 0.5)
	pt3dadd(41.5, 85.58, -69.84, 0.5)
	pt3dadd(41.5, 85.92, -69.84, 0.5)
	pt3dadd(41.67, 86.08, -69.84, 0.5)
	pt3dadd(41.83, 86.25, -69.84, 0.5)
	pt3dadd(41.83, 86.58, -69.84, 0.5)
	pt3dadd(42, 86.75, -69.84, 0.5)
	pt3dadd(42.17, 86.92, -69.84, 0.5)
	pt3dadd(42.17, 87.08, -69.84, 0.5)
  }
  dend[544] {pt3dclear()
	pt3dadd(19.32, 62.75, -60.48, 0.5)
	pt3dadd(19.17, 62.75, -57.6, 0.5)
	pt3dadd(19.32, 62.42, -57.6, 0.5)
	pt3dadd(19.5, 62.25, -57.6, 0.5)
	pt3dadd(19.67, 62.08, -57.6, 0.5)
	pt3dadd(19.82, 61.92, -57.6, 0.5)
	pt3dadd(19.82, 61.58, -57.6, 0.5)
	pt3dadd(20, 61.42, -57.6, 0.5)
	pt3dadd(20.17, 61.25, -57.6, 0.5)
	pt3dadd(20.32, 61.08, -57.6, 0.5)
	pt3dadd(20.5, 60.75, -57.6, 0.5)
	pt3dadd(20.5, 60.42, -57.6, 0.5)
	pt3dadd(20.67, 60.42, -57.6, 0.5)
  }
  dend[545] {pt3dclear()
	pt3dadd(20.67, 60.42, -57.6, 0.5)
	pt3dadd(21.67, 60.42, -57.6, 0.5)
	pt3dadd(21.67, 58.75, -57.6, 0.5)
	pt3dadd(21.83, 58.42, -57.6, 0.5)
	pt3dadd(21.83, 56.58, -57.6, 0.5)
	pt3dadd(22, 56.25, -57.6, 0.5)
	pt3dadd(22.17, 55.92, -57.6, 0.5)
	pt3dadd(22.17, 55.58, -57.6, 0.5)
	pt3dadd(22.33, 55.25, -57.6, 0.5)
	pt3dadd(22.5, 54.92, -57.6, 0.5)
	pt3dadd(22.5, 54.42, -57.6, 0.5)
	pt3dadd(22.67, 54.08, -57.6, 0.5)
	pt3dadd(22.83, 53.92, -57.6, 0.5)
	pt3dadd(23.17, 53.58, -57.6, 0.5)
	pt3dadd(23.33, 53.42, -57.6, 0.5)
	pt3dadd(23.67, 53.08, -57.6, 0.5)
	pt3dadd(23.83, 52.92, -57.6, 0.5)
	pt3dadd(24, 52.75, -57.6, 0.5)
	pt3dadd(24.33, 52.58, -57.6, 0.5)
	pt3dadd(24.5, 52.42, -57.6, 0.5)
	pt3dadd(24.83, 52.42, -57.6, 0.5)
	pt3dadd(25, 52.25, -57.6, 0.5)
	pt3dadd(25.33, 52.08, -57.6, 0.5)
	pt3dadd(25.5, 51.92, -57.6, 0.5)
	pt3dadd(25.67, 51.75, -57.6, 0.5)
	pt3dadd(25.83, 51.58, -57.6, 0.5)
  }
  dend[546] {pt3dclear()
	pt3dadd(20.67, 60.42, -57.6, 0.5)
	pt3dadd(20.83, 60.58, -57.6, 0.5)
	pt3dadd(21.17, 60.58, -57.6, 0.5)
	pt3dadd(21.5, 60.42, -57.6, 0.5)
	pt3dadd(21.67, 60.25, -57.6, 0.5)
	pt3dadd(22.17, 59.75, -57.6, 0.5)
	pt3dadd(22.5, 59.58, -57.6, 0.5)
	pt3dadd(22.83, 59.25, -57.6, 0.5)
	pt3dadd(23.17, 59.08, -57.6, 0.5)
	pt3dadd(23.67, 59.08, -57.6, 0.5)
	pt3dadd(24, 58.92, -57.6, 0.5)
	pt3dadd(24.33, 58.92, -57.6, 0.5)
  }
  dend[547] {pt3dclear()
	pt3dadd(24.33, 58.92, -57.6, 0.5)
	pt3dadd(24.67, 58.92, -57.6, 0.5)
	pt3dadd(24.83, 59.08, -57.6, 0.5)
	pt3dadd(25.17, 59.25, -57.6, 0.5)
	pt3dadd(25.5, 59.42, -57.6, 0.5)
	pt3dadd(25.83, 59.75, -57.6, 0.5)
	pt3dadd(26.17, 59.92, -57.6, 0.5)
	pt3dadd(26.33, 60.08, -57.6, 0.5)
	pt3dadd(26.67, 60.25, -57.6, 0.5)
	pt3dadd(26.83, 60.42, -57.6, 0.5)
	pt3dadd(27, 60.58, -57.6, 0.5)
	pt3dadd(27.17, 60.75, -57.6, 0.5)
	pt3dadd(27.5, 60.92, -57.6, 0.5)
	pt3dadd(27.67, 61.08, -57.6, 0.5)
	pt3dadd(27.83, 61.25, -57.6, 0.5)
	pt3dadd(28.17, 61.42, -57.6, 0.5)
	pt3dadd(28.33, 61.42, -57.6, 0.5)
  }
  dend[548] {pt3dclear()
	pt3dadd(24.33, 58.92, -57.6, 0.5)
	pt3dadd(24.83, 58.75, -60.12, 0.5)
	pt3dadd(26, 58.75, -60.12, 0.5)
	pt3dadd(26.33, 58.58, -60.12, 0.5)
	pt3dadd(26.67, 58.58, -60.12, 0.5)
	pt3dadd(27, 58.42, -60.12, 0.5)
	pt3dadd(27.33, 58.25, -60.12, 0.5)
	pt3dadd(27.5, 58.08, -60.12, 0.5)
	pt3dadd(27.83, 58.08, -60.12, 0.5)
	pt3dadd(28.17, 57.92, -60.12, 0.5)
	pt3dadd(29.17, 57.92, -60.12, 0.5)
  }
  dend[549] {pt3dclear()
	pt3dadd(16.82, 63.08, -60.48, 0.5)
	pt3dadd(17, 63.42, -60.12, 0.5)
	pt3dadd(17, 63.75, -60.12, 0.5)
	pt3dadd(16.82, 63.92, -60.12, 0.5)
	pt3dadd(16.82, 64.08, -60.12, 0.5)
  }
  dend[550] {pt3dclear()
	pt3dadd(16.82, 64.08, -60.12, 0.5)
	pt3dadd(17.5, 64.08, -60.12, 0.5)
	pt3dadd(17.82, 64.25, -60.12, 0.5)
	pt3dadd(18, 64.42, -60.12, 0.5)
	pt3dadd(18.5, 64.42, -60.12, 0.5)
	pt3dadd(18.67, 64.58, -60.12, 0.5)
	pt3dadd(19, 64.75, -60.12, 0.5)
	pt3dadd(19.32, 64.75, -60.12, 0.5)
	pt3dadd(19.82, 64.92, -60.12, 0.5)
	pt3dadd(20.32, 65.25, -60.12, 0.5)
	pt3dadd(21, 65.58, -60.12, 0.5)
	pt3dadd(21.17, 65.75, -60.12, 0.5)
	pt3dadd(21.67, 66.25, -60.12, 0.5)
	pt3dadd(22, 66.42, -60.12, 0.5)
	pt3dadd(22.5, 66.92, -60.12, 0.5)
	pt3dadd(22.67, 67.08, -60.12, 0.5)
	pt3dadd(22.83, 67.42, -60.12, 0.5)
	pt3dadd(23, 67.75, -60.12, 0.5)
	pt3dadd(23.17, 68.08, -60.12, 0.5)
	pt3dadd(23.67, 68.58, -60.12, 0.5)
	pt3dadd(24, 68.58, -60.12, 0.5)
	pt3dadd(24.17, 68.75, -60.12, 0.5)
	pt3dadd(25.17, 68.75, -60.12, 0.5)
	pt3dadd(25.5, 68.92, -60.12, 0.5)
	pt3dadd(26, 68.92, -60.12, 0.5)
	pt3dadd(26.33, 69.08, -60.12, 0.5)
	pt3dadd(26.5, 69.25, -60.12, 0.5)
	pt3dadd(26.67, 69.42, -60.12, 0.5)
	pt3dadd(27, 69.58, -60.12, 0.5)
	pt3dadd(27.17, 69.92, -60.12, 0.5)
	pt3dadd(27.17, 70.25, -60.12, 0.5)
	pt3dadd(27.33, 70.42, -60.12, 0.5)
	pt3dadd(27.5, 70.75, -60.12, 0.5)
	pt3dadd(27.67, 70.92, -60.12, 0.5)
	pt3dadd(27.5, 70.92, -60.12, 0.5)
  }
  dend[551] {pt3dclear()
	pt3dadd(27.5, 70.92, -60.12, 0.5)
	pt3dadd(27.83, 70.75, -60.12, 0.5)
	pt3dadd(27.83, 73.25, -60.12, 0.5)
	pt3dadd(28, 73.42, -60.12, 0.5)
	pt3dadd(28.33, 73.42, -60.12, 0.5)
	pt3dadd(28.5, 73.58, -60.12, 0.5)
	pt3dadd(29, 73.75, -60.12, 0.5)
	pt3dadd(29.33, 73.92, -60.12, 0.5)
	pt3dadd(29.67, 74.08, -60.12, 0.5)
	pt3dadd(30.17, 74.08, -60.12, 0.5)
	pt3dadd(30.5, 74.42, -60.12, 0.5)
	pt3dadd(30.67, 74.58, -60.12, 0.5)
	pt3dadd(30.83, 74.75, -60.12, 0.5)
	pt3dadd(31.17, 74.92, -60.12, 0.5)
	pt3dadd(31.17, 75.25, -60.12, 0.5)
	pt3dadd(31.33, 75.42, -60.12, 0.5)
	pt3dadd(31.33, 76.75, -60.12, 0.5)
  }
}
proc shape3d_52() {
  dend[551] {  }
  dend[552] {pt3dclear()
	pt3dadd(27.5, 70.92, -60.12, 0.5)
	pt3dadd(27.83, 70.75, -62.64, 0.5)
	pt3dadd(28, 70.92, -62.64, 0.5)
	pt3dadd(28.17, 71.08, -62.64, 0.5)
	pt3dadd(28.33, 71.42, -62.64, 0.5)
	pt3dadd(28.67, 71.58, -62.64, 0.5)
	pt3dadd(29, 71.75, -62.64, 0.5)
	pt3dadd(29.5, 71.75, -62.64, 0.5)
	pt3dadd(29.83, 71.92, -62.64, 0.5)
	pt3dadd(30.83, 71.92, -62.64, 0.5)
	pt3dadd(31.17, 71.75, -62.64, 0.5)
	pt3dadd(31.67, 71.75, -62.64, 0.5)
	pt3dadd(31.83, 71.92, -62.64, 0.5)
	pt3dadd(32, 72.08, -62.64, 0.5)
	pt3dadd(32.5, 72.58, -62.64, 0.5)
	pt3dadd(32.5, 72.92, -62.64, 0.5)
	pt3dadd(32.67, 73.08, -62.64, 0.5)
	pt3dadd(32.83, 73.25, -62.64, 0.5)
	pt3dadd(32.83, 73.42, -62.64, 0.5)
  }
  dend[553] {pt3dclear()
	pt3dadd(16.82, 64.08, -60.12, 0.5)
	pt3dadd(17, 64.08, -57.24, 0.5)
	pt3dadd(16.67, 64.08, -57.24, 0.5)
	pt3dadd(16.5, 64.25, -57.24, 0.5)
	pt3dadd(16.32, 64.42, -57.24, 0.5)
	pt3dadd(15.83, 64.42, -57.24, 0.5)
	pt3dadd(15.83, 64.58, -57.24, 0.5)
	pt3dadd(15.83, 64.75, -57.24, 0.5)
	pt3dadd(15.83, 69.08, -57.24, 0.5)
	pt3dadd(15.67, 69.42, -57.24, 0.5)
	pt3dadd(15.67, 70.08, -57.24, 0.5)
	pt3dadd(15.67, 69.92, -57.24, 0.5)
  }
  dend[554] {pt3dclear()
	pt3dadd(15.67, 69.92, -57.24, 0.5)
	pt3dadd(16.17, 69.58, -57.24, 0.5)
	pt3dadd(15.83, 69.42, -57.24, 0.5)
	pt3dadd(15.5, 69.08, -57.24, 0.5)
	pt3dadd(15.17, 68.92, -57.24, 0.5)
	pt3dadd(14, 68.92, -57.24, 0.5)
	pt3dadd(13.83, 69.08, -57.24, 0.5)
	pt3dadd(13.67, 69.42, -57.24, 0.5)
	pt3dadd(13.5, 69.58, -57.24, 0.5)
	pt3dadd(13.33, 69.75, -57.24, 0.5)
	pt3dadd(13, 69.92, -57.24, 0.5)
	pt3dadd(12.83, 70.08, -57.24, 0.5)
	pt3dadd(12.67, 70.42, -57.24, 0.5)
	pt3dadd(12.67, 70.58, -57.24, 0.5)
  }
  dend[555] {pt3dclear()
	pt3dadd(15.67, 69.92, -57.24, 0.5)
	pt3dadd(15.83, 69.75, -59.4, 0.5)
	pt3dadd(15.83, 70.75, -59.4, 0.5)
	pt3dadd(15.67, 71.08, -59.4, 0.5)
	pt3dadd(15.67, 71.58, -59.4, 0.5)
	pt3dadd(15.5, 71.92, -59.4, 0.5)
	pt3dadd(15.5, 72.42, -59.4, 0.5)
	pt3dadd(15.33, 72.75, -59.4, 0.5)
	pt3dadd(15.33, 73.75, -59.4, 0.5)
  }
  dend[556] {pt3dclear()
	pt3dadd(15.33, 73.75, -59.4, 0.5)
	pt3dadd(15.5, 73.42, -59.4, 0.5)
	pt3dadd(15.33, 73.58, -59.4, 0.5)
	pt3dadd(15.17, 73.75, -59.4, 0.5)
	pt3dadd(14.83, 73.92, -59.4, 0.5)
	pt3dadd(14.5, 74.08, -59.4, 0.5)
	pt3dadd(14.17, 74.25, -59.4, 0.5)
	pt3dadd(14, 74.42, -59.4, 0.5)
	pt3dadd(13.83, 74.58, -59.4, 0.5)
	pt3dadd(13.67, 74.75, -59.4, 0.5)
	pt3dadd(13.5, 74.92, -59.4, 0.5)
	pt3dadd(13.33, 75.08, -59.4, 0.5)
	pt3dadd(13.17, 75.42, -59.4, 0.5)
	pt3dadd(13, 75.58, -59.4, 0.5)
	pt3dadd(13, 75.75, -59.4, 0.5)
  }
  dend[557] {pt3dclear()
	pt3dadd(15.33, 73.75, -59.4, 0.5)
	pt3dadd(15.17, 73.75, -61.56, 0.5)
	pt3dadd(15.33, 74.08, -61.56, 0.5)
	pt3dadd(15.5, 74.42, -61.56, 0.5)
	pt3dadd(15.5, 75.42, -61.56, 0.5)
	pt3dadd(15.67, 75.75, -61.56, 0.5)
	pt3dadd(15.67, 76.42, -61.56, 0.5)
	pt3dadd(15.83, 76.75, -61.56, 0.5)
	pt3dadd(15.83, 77.42, -61.56, 0.5)
	pt3dadd(16, 77.58, -61.56, 0.5)
	pt3dadd(16, 78.08, -61.56, 0.5)
	pt3dadd(16.17, 78.42, -61.56, 0.5)
	pt3dadd(16.32, 78.58, -61.56, 0.5)
	pt3dadd(16.5, 78.75, -61.56, 0.5)
	pt3dadd(16.67, 79.08, -61.56, 0.5)
	pt3dadd(16.82, 79.42, -61.56, 0.5)
	pt3dadd(17, 79.42, -61.56, 0.5)
  }
  dend[558] {pt3dclear()
	pt3dadd(10.5, 41.92, -46.8, 2)
	pt3dadd(10.83, 42.25, -46.8, 0.5)
	pt3dadd(8.5, 42.25, -46.8, 0.5)
	pt3dadd(8.17, 42.42, -46.8, 0.5)
	pt3dadd(7.83, 42.42, -46.8, 0.5)
	pt3dadd(7.5, 42.58, -46.8, 0.5)
	pt3dadd(7.33, 42.75, -46.8, 0.5)
	pt3dadd(7.17, 42.92, -47.88, 0.5)
	pt3dadd(6.83, 42.92, -47.88, 0.5)
	pt3dadd(6.5, 43.08, -47.88, 0.5)
	pt3dadd(6.17, 43.25, -47.88, 0.5)
	pt3dadd(6, 43.42, -47.88, 0.5)
	pt3dadd(5.67, 43.42, -47.88, 0.5)
	pt3dadd(5.5, 43.58, -47.88, 0.5)
	pt3dadd(5.33, 43.75, -47.88, 0.5)
	pt3dadd(4.83, 43.75, -47.88, 0.5)
	pt3dadd(4.67, 43.58, -47.88, 0.5)
	pt3dadd(4.5, 43.25, -47.88, 0.5)
	pt3dadd(4.33, 43.08, -47.88, 0.5)
	pt3dadd(4.17, 42.92, -47.88, 0.5)
	pt3dadd(4, 42.75, -47.88, 0.5)
	pt3dadd(3.5, 42.25, -47.88, 0.5)
	pt3dadd(3.33, 42.08, -47.88, 0.5)
	pt3dadd(3.33, 41.75, -47.88, 0.5)
	pt3dadd(3.17, 41.58, -47.88, 0.5)
	pt3dadd(3.17, 41.25, -47.88, 0.5)
	pt3dadd(3, 41.08, -47.88, 0.5)
	pt3dadd(2.83, 40.92, -47.88, 0.5)
  }
  dend[559] {pt3dclear()
	pt3dadd(2.83, 40.92, -47.88, 0.5)
	pt3dadd(2.87, 40.92, -47.22, 0.33)
  }
  dend[560] {pt3dclear()
	pt3dadd(2.87, 40.92, -47.22, 0.33)
	pt3dadd(3, 40.92, -45.36, 0.33)
	pt3dadd(2.67, 40.75, -45.36, 0.33)
	pt3dadd(2.33, 40.75, -45.36, 0.33)
	pt3dadd(2.17, 40.58, -45.36, 0.33)
	pt3dadd(1.33, 40.58, -45.36, 0.33)
	pt3dadd(1.33, 41.25, -45.36, 0.33)
	pt3dadd(1.17, 41.42, -45.36, 0.33)
	pt3dadd(1, 41.58, -45.36, 0.33)
	pt3dadd(0.83, 41.75, -45.36, 0.33)
	pt3dadd(0.83, 42.08, -45.36, 0.33)
	pt3dadd(0.67, 42.25, -45.36, 0.33)
	pt3dadd(0.67, 42.75, -45.36, 0.33)
	pt3dadd(0.5, 42.92, -45.36, 0.33)
	pt3dadd(0.33, 43.08, -45.36, 0.33)
	pt3dadd(0.17, 43.25, -45.36, 0.33)
  }
  dend[561] {pt3dclear()
	pt3dadd(0.17, 43.25, -45.36, 0.33)
	pt3dadd(0, 43.42, -45, 0.33)
	pt3dadd(0.17, 43.58, -45, 0.33)
	pt3dadd(0.33, 43.75, -45, 0.33)
	pt3dadd(0.67, 43.75, -45, 0.33)
	pt3dadd(0.83, 43.92, -45, 0.33)
	pt3dadd(1.17, 43.92, -45, 0.33)
	pt3dadd(1.5, 44.08, -45, 0.33)
	pt3dadd(1.67, 44.25, -45, 0.33)
	pt3dadd(1.83, 44.42, -45, 0.33)
	pt3dadd(1.83, 44.75, -45, 0.33)
	pt3dadd(2, 44.92, -45, 0.33)
	pt3dadd(2.17, 45.08, -45, 0.33)
	pt3dadd(2.17, 45.42, -45, 0.33)
  }
  dend[562] {pt3dclear()
	pt3dadd(0.17, 43.25, -45.36, 0.33)
	pt3dadd(0.17, 43.42, -45.36, 0.33)
	pt3dadd(0, 43.58, -45.36, 0.33)
	pt3dadd(-0.17, 43.75, -45.36, 0.33)
	pt3dadd(-0.33, 43.92, -45.36, 0.33)
	pt3dadd(-0.67, 44.08, -45.36, 0.33)
	pt3dadd(-0.83, 44.25, -45.36, 0.33)
	pt3dadd(-1, 44.58, -45.36, 0.33)
	pt3dadd(-1.17, 44.75, -45.36, 0.33)
	pt3dadd(-1.33, 44.92, -45.36, 0.33)
	pt3dadd(-1.5, 45.08, -45.36, 0.33)
  }
  dend[563] {pt3dclear()
	pt3dadd(2.87, 40.92, -47.22, 0.33)
	pt3dadd(2.67, 41.08, -46.08, 0.5)
	pt3dadd(2.67, 40.75, -46.08, 0.5)
	pt3dadd(2.5, 40.58, -46.08, 0.5)
	pt3dadd(2.33, 40.42, -46.08, 0.5)
	pt3dadd(2.33, 40.08, -46.08, 0.5)
	pt3dadd(2.17, 39.92, -46.08, 0.5)
	pt3dadd(2.17, 39.42, -46.08, 0.5)
	pt3dadd(2, 39.25, -46.08, 0.5)
	pt3dadd(2, 35.92, -42.84, 0.5)
	pt3dadd(1.83, 35.75, -42.84, 0.5)
	pt3dadd(1.83, 35.25, -42.84, 0.5)
	pt3dadd(1.67, 35.25, -42.84, 0.5)
  }
  dend[564] {pt3dclear()
	pt3dadd(1.67, 35.25, -42.84, 0.5)
	pt3dadd(1.83, 35.42, -42.48, 0.33)
	pt3dadd(1.83, 33.42, -42.48, 0.33)
	pt3dadd(1.67, 33.25, -42.48, 0.33)
	pt3dadd(1.5, 32.92, -42.48, 0.33)
	pt3dadd(1.5, 32.42, -42.48, 0.33)
	pt3dadd(1.33, 32.08, -42.48, 0.33)
  }
  dend[565] {pt3dclear()
	pt3dadd(1.33, 32.08, -42.48, 0.33)
	pt3dadd(1.33, 32.74, -42.48, 0.33)
  }
  dend[566] {pt3dclear()
	pt3dadd(1.33, 32.74, -42.48, 0.33)
	pt3dadd(1.33, 32.25, -42.48, 0.33)
	pt3dadd(1.5, 32.08, -42.48, 0.33)
	pt3dadd(1.5, 31.75, -42.48, 0.33)
	pt3dadd(1.67, 31.58, -42.48, 0.33)
	pt3dadd(1.67, 31.25, -42.48, 0.33)
	pt3dadd(1.83, 30.92, -42.48, 0.33)
	pt3dadd(2, 30.58, -42.48, 0.33)
	pt3dadd(2.17, 30.25, -42.48, 0.33)
	pt3dadd(2.17, 29.75, -42.48, 0.33)
	pt3dadd(2.33, 29.58, -42.48, 0.33)
	pt3dadd(2.33, 28.25, -42.48, 0.33)
  }
  dend[567] {pt3dclear()
	pt3dadd(1.33, 32.74, -42.48, 0.33)
	pt3dadd(1.17, 31.92, -42.48, 0.33)
	pt3dadd(1.33, 31.75, -42.48, 0.33)
	pt3dadd(1.17, 31.42, -42.48, 0.33)
	pt3dadd(1.17, 31.08, -42.48, 0.33)
	pt3dadd(1, 30.75, -42.48, 0.33)
	pt3dadd(0.83, 30.58, -42.48, 0.33)
	pt3dadd(0.83, 30.25, -42.48, 0.33)
	pt3dadd(0.67, 29.92, -42.48, 0.33)
  }
}
proc shape3d_53() {
  dend[567] {	pt3dadd(0.5, 29.58, -42.48, 0.33)
	pt3dadd(0.5, 28.58, -42.48, 0.33)
  }
  dend[568] {pt3dclear()
	pt3dadd(1.33, 32.08, -42.48, 0.33)
	pt3dadd(1.5, 32.08, -42.48, 0.33)
	pt3dadd(1.5, 32.42, -42.48, 0.33)
	pt3dadd(1.33, 32.58, -42.48, 0.33)
	pt3dadd(1, 32.75, -42.48, 0.33)
	pt3dadd(0.67, 32.92, -42.48, 0.33)
	pt3dadd(0.5, 33.08, -42.48, 0.33)
	pt3dadd(0, 33.08, -42.48, 0.33)
	pt3dadd(-0.33, 33.25, -42.48, 0.33)
	pt3dadd(-0.5, 33.08, -42.48, 0.33)
	pt3dadd(-0.67, 32.92, -41.4, 0.33)
	pt3dadd(-1.17, 32.75, -41.4, 0.33)
	pt3dadd(-1.5, 32.75, -41.4, 0.33)
	pt3dadd(-1.67, 32.58, -41.4, 0.33)
	pt3dadd(-2, 32.58, -41.4, 0.33)
	pt3dadd(-2.17, 32.42, -41.4, 0.33)
  }
  dend[569] {pt3dclear()
	pt3dadd(1.67, 35.25, -42.84, 0.5)
	pt3dadd(1.67, 35.42, -42.48, 0.33)
	pt3dadd(1.5, 35.25, -42.48, 0.33)
	pt3dadd(1.33, 35.08, -42.48, 0.33)
	pt3dadd(1, 34.92, -42.48, 0.33)
	pt3dadd(-0.33, 34.92, -42.48, 0.33)
	pt3dadd(-0.5, 35.08, -42.48, 0.33)
  }
  dend[570] {pt3dclear()
	pt3dadd(-0.5, 35.08, -42.48, 0.33)
	pt3dadd(-0.33, 35.08, -42.12, 0.33)
	pt3dadd(-1.33, 35.08, -42.12, 0.33)
	pt3dadd(-1.5, 34.92, -42.12, 0.33)
	pt3dadd(-1.67, 34.75, -42.12, 0.33)
	pt3dadd(-2.83, 34.75, -42.12, 0.33)
	pt3dadd(-3, 34.58, -42.12, 0.33)
  }
  dend[571] {pt3dclear()
	pt3dadd(-0.5, 35.08, -42.48, 0.33)
	pt3dadd(-0.67, 35.08, -45, 0.33)
	pt3dadd(-0.67, 36.08, -45, 0.33)
	pt3dadd(-0.5, 36.25, -45, 0.33)
	pt3dadd(-0.5, 36.75, -45, 0.33)
	pt3dadd(-0.67, 36.92, -45, 0.33)
	pt3dadd(-0.67, 37.58, -45, 0.33)
	pt3dadd(-0.83, 37.75, -45, 0.33)
	pt3dadd(-1, 38.08, -45, 0.33)
	pt3dadd(-1, 38.42, -45, 0.33)
	pt3dadd(-1.17, 38.42, -45, 0.33)
  }
  dend[572] {pt3dclear()
	pt3dadd(-1.17, 38.42, -45, 0.33)
	pt3dadd(-0.83, 38.42, -47.52, 0.33)
	pt3dadd(-0.83, 40.75, -47.52, 0.33)
	pt3dadd(-1, 40.75, -47.52, 0.33)
  }
  dend[573] {pt3dclear()
	pt3dadd(-1, 40.75, -47.52, 0.33)
	pt3dadd(-1.17, 40.25, -44.64, 0.33)
	pt3dadd(-1.17, 41.08, -44.64, 0.33)
	pt3dadd(-1.33, 41.25, -44.64, 0.33)
	pt3dadd(-1.33, 42.25, -44.64, 0.33)
	pt3dadd(-1.17, 42.58, -44.64, 0.33)
	pt3dadd(-1, 42.75, -44.64, 0.33)
  }
  dend[574] {pt3dclear()
	pt3dadd(-1, 40.75, -47.52, 0.33)
	pt3dadd(-0.67, 40.58, -47.52, 0.33)
	pt3dadd(-0.83, 40.75, -47.52, 0.33)
	pt3dadd(-1.17, 40.92, -47.52, 0.33)
	pt3dadd(-1.5, 40.92, -47.52, 0.33)
	pt3dadd(-1.67, 41.08, -47.52, 0.33)
	pt3dadd(-1.83, 41.25, -47.52, 0.33)
	pt3dadd(-2, 41.42, -47.52, 0.33)
	pt3dadd(-2.17, 41.75, -47.52, 0.33)
	pt3dadd(-2.33, 42.08, -47.52, 0.33)
	pt3dadd(-2.5, 42.42, -47.52, 0.33)
	pt3dadd(-2.67, 42.58, -47.52, 0.33)
	pt3dadd(-2.83, 42.75, -47.52, 0.33)
	pt3dadd(-3, 42.75, -47.52, 0.33)
  }
  dend[575] {pt3dclear()
	pt3dadd(-1.17, 38.42, -45, 0.33)
	pt3dadd(-0.83, 38.42, -45, 0.33)
	pt3dadd(-1.17, 38.58, -45, 0.33)
	pt3dadd(-1.5, 38.58, -45, 0.33)
	pt3dadd(-1.67, 38.75, -45, 0.33)
	pt3dadd(-2, 38.92, -45, 0.33)
	pt3dadd(-2.33, 38.92, -45, 0.33)
	pt3dadd(-2.5, 39.08, -45, 0.33)
	pt3dadd(-2.5, 39.75, -45, 0.33)
	pt3dadd(-2.67, 39.92, -45, 0.33)
	pt3dadd(-2.83, 40.25, -45, 0.33)
	pt3dadd(-3, 40.42, -45, 0.33)
	pt3dadd(-3.17, 40.58, -45, 0.33)
	pt3dadd(-3.33, 40.75, -45, 0.33)
	pt3dadd(-3.33, 40.92, -45, 0.33)
  }
  dend[576] {pt3dclear()
	pt3dadd(2.83, 40.92, -47.88, 0.5)
	pt3dadd(3, 41.08, -46.44, 0.5)
	pt3dadd(3, 40.75, -46.44, 0.5)
	pt3dadd(3.17, 40.42, -46.44, 0.5)
	pt3dadd(3.33, 40.25, -46.44, 0.5)
	pt3dadd(3.5, 40.08, -46.44, 0.5)
	pt3dadd(3.5, 39.75, -46.44, 0.5)
	pt3dadd(3.67, 39.42, -46.44, 0.5)
	pt3dadd(3.83, 39.25, -46.44, 0.5)
	pt3dadd(3.83, 38.92, -46.44, 0.5)
  }
  dend[577] {pt3dclear()
	pt3dadd(3.83, 38.92, -46.44, 0.5)
	pt3dadd(3.83, 39.25, -46.44, 0.5)
	pt3dadd(4, 39.08, -46.44, 0.5)
	pt3dadd(4.17, 38.75, -46.44, 0.5)
	pt3dadd(4.17, 38.08, -46.44, 0.5)
	pt3dadd(4.33, 37.92, -46.44, 0.5)
	pt3dadd(4.33, 37.08, -46.44, 0.5)
	pt3dadd(4.17, 36.75, -46.44, 0.5)
	pt3dadd(4.17, 34.42, -46.44, 0.5)
  }
  dend[578] {pt3dclear()
	pt3dadd(4.17, 34.42, -46.44, 0.5)
	pt3dadd(4, 34.58, -46.44, 0.5)
	pt3dadd(4.17, 34.42, -46.44, 0.5)
	pt3dadd(4.33, 34.08, -46.44, 0.5)
	pt3dadd(4.33, 33.58, -46.44, 0.5)
	pt3dadd(4.5, 33.42, -46.44, 0.5)
	pt3dadd(4.67, 33.25, -46.44, 0.5)
	pt3dadd(4.67, 31.75, -46.44, 0.5)
	pt3dadd(4.5, 31.58, -46.44, 0.5)
  }
  dend[579] {pt3dclear()
	pt3dadd(4.17, 34.42, -46.44, 0.5)
	pt3dadd(4.67, 34.42, -46.44, 0.5)
	pt3dadd(4.5, 34.42, -46.44, 0.5)
	pt3dadd(4.17, 34.25, -46.44, 0.5)
	pt3dadd(4, 33.92, -46.44, 0.5)
	pt3dadd(3.83, 33.75, -46.44, 0.5)
	pt3dadd(3.67, 33.58, -46.44, 0.5)
	pt3dadd(3.67, 33.08, -46.44, 0.5)
	pt3dadd(3.5, 32.92, -46.44, 0.5)
	pt3dadd(3.33, 32.58, -46.44, 0.5)
	pt3dadd(3.33, 31.58, -46.44, 0.5)
	pt3dadd(3.17, 31.25, -46.44, 0.5)
	pt3dadd(3.17, 29.75, -46.44, 0.5)
	pt3dadd(3, 29.58, -46.44, 0.5)
	pt3dadd(3, 29.25, -46.44, 0.5)
  }
  dend[580] {pt3dclear()
	pt3dadd(3.83, 38.92, -46.44, 0.5)
	pt3dadd(4.5, 39.25, -46.44, 0.5)
	pt3dadd(4.67, 39.42, -46.44, 0.5)
	pt3dadd(4.67, 39.75, -46.44, 0.5)
	pt3dadd(4.83, 39.92, -46.44, 0.5)
	pt3dadd(5.17, 40.08, -46.44, 0.5)
	pt3dadd(5.33, 40.42, -46.44, 0.5)
	pt3dadd(5.67, 40.42, -46.44, 0.5)
	pt3dadd(5.83, 40.58, -46.44, 0.5)
  }
  dend[581] {pt3dclear()
	pt3dadd(10, 37.25, -46.8, 2)
	pt3dadd(10.17, 37.42, -46.8, 0.5)
	pt3dadd(10.33, 37.08, -46.8, 0.5)
	pt3dadd(10.67, 36.75, -46.8, 0.5)
	pt3dadd(11, 36.58, -46.8, 0.5)
	pt3dadd(11.33, 36.42, -46.8, 0.5)
	pt3dadd(11.5, 36.25, -46.8, 0.5)
	pt3dadd(11.67, 36.08, -46.8, 0.5)
	pt3dadd(11.83, 35.92, -46.8, 0.5)
	pt3dadd(12, 35.58, -46.8, 0.5)
	pt3dadd(12.17, 35.42, -46.8, 0.5)
	pt3dadd(12.33, 35.25, -46.8, 0.5)
	pt3dadd(12.5, 35.08, -46.8, 0.5)
	pt3dadd(12.67, 34.92, -46.8, 0.5)
	pt3dadd(13, 34.75, -46.8, 0.5)
	pt3dadd(13.17, 34.58, -46.8, 0.5)
	pt3dadd(13.33, 34.42, -47.52, 0.5)
	pt3dadd(13.67, 34.42, -47.52, 0.5)
	pt3dadd(13.83, 34.25, -47.52, 0.5)
	pt3dadd(13.83, 34.08, -47.52, 0.5)
  }
  dend[582] {pt3dclear()
	pt3dadd(13.83, 34.08, -47.52, 0.5)
	pt3dadd(14, 34.08, -47.52, 0.17)
	pt3dadd(14.17, 33.75, -47.52, 0.17)
	pt3dadd(14.33, 33.58, -47.52, 0.17)
	pt3dadd(14.33, 33.25, -47.52, 0.17)
	pt3dadd(14.5, 33.08, -47.52, 0.17)
	pt3dadd(14.5, 32.42, -47.52, 0.17)
  }
  dend[583] {pt3dclear()
	pt3dadd(14.5, 32.42, -47.52, 0.17)
	pt3dadd(14.83, 32.42, -50.04, 0.5)
	pt3dadd(15.5, 32.42, -50.04, 0.5)
	pt3dadd(15.67, 32.25, -50.04, 0.5)
	pt3dadd(16, 32.25, -50.04, 0.5)
	pt3dadd(16.17, 32.08, -50.04, 0.5)
	pt3dadd(16.5, 32.08, -50.04, 0.5)
	pt3dadd(16.67, 31.92, -50.04, 0.5)
	pt3dadd(17, 31.75, -50.04, 0.5)
	pt3dadd(17.32, 31.75, -50.04, 0.5)
	pt3dadd(17.5, 31.58, -50.04, 0.5)
	pt3dadd(17.82, 31.42, -50.04, 0.5)
	pt3dadd(18.17, 31.25, -50.04, 0.5)
	pt3dadd(18.67, 31.25, -50.04, 0.5)
	pt3dadd(18.82, 31.08, -50.04, 0.5)
  }
  dend[584] {pt3dclear()
	pt3dadd(18.82, 31.08, -50.04, 0.5)
	pt3dadd(19.17, 31.42, -50.04, 0.5)
	pt3dadd(20.5, 31.42, -50.04, 0.5)
	pt3dadd(20.67, 31.25, -50.04, 0.5)
	pt3dadd(21.17, 31.25, -50.04, 0.5)
	pt3dadd(21.33, 31.08, -50.04, 0.5)
	pt3dadd(21.5, 30.92, -50.04, 0.5)
	pt3dadd(21.83, 30.92, -50.04, 0.5)
	pt3dadd(22, 30.75, -50.04, 0.5)
	pt3dadd(23, 30.75, -51.48, 0.5)
	pt3dadd(23.17, 30.58, -51.48, 0.5)
	pt3dadd(23.33, 30.42, -51.48, 0.5)
	pt3dadd(23.67, 30.42, -51.48, 0.5)
	pt3dadd(23.5, 30.42, -51.48, 0.5)
  }
  dend[585] {pt3dclear()
	pt3dadd(23.5, 30.42, -51.48, 0.5)
	pt3dadd(23.67, 30.42, -50.76, 0.5)
	pt3dadd(23.83, 30.25, -50.76, 0.5)
	pt3dadd(24.17, 30.08, -50.76, 0.5)
	pt3dadd(24.67, 30.08, -50.76, 0.5)
	pt3dadd(24.83, 29.92, -50.76, 0.5)
  }
  dend[586] {pt3dclear()
	pt3dadd(24.83, 29.92, -50.76, 0.5)
	pt3dadd(25, 29.92, -51.84, 0.5)
	pt3dadd(26.17, 29.92, -51.84, 0.5)
  }
}
proc shape3d_54() {
  dend[586] {	pt3dadd(26.33, 29.75, -51.84, 0.5)
	pt3dadd(26.5, 29.58, -51.84, 0.5)
	pt3dadd(26.83, 29.58, -51.84, 0.5)
	pt3dadd(27, 29.42, -51.84, 0.5)
	pt3dadd(27.33, 29.25, -51.84, 0.5)
	pt3dadd(27.83, 29.25, -51.84, 0.5)
	pt3dadd(28.33, 29.75, -51.84, 0.5)
	pt3dadd(28.5, 29.92, -51.84, 0.5)
	pt3dadd(28.67, 30.08, -51.84, 0.5)
	pt3dadd(28.83, 30.25, -51.84, 0.5)
	pt3dadd(29.17, 30.25, -51.84, 0.5)
	pt3dadd(29.33, 30.42, -51.84, 0.5)
	pt3dadd(29.67, 30.58, -51.84, 0.5)
	pt3dadd(30, 30.75, -51.84, 0.5)
	pt3dadd(30.33, 30.92, -51.84, 0.5)
	pt3dadd(30.33, 31.08, -51.84, 0.5)
  }
  dend[587] {pt3dclear()
	pt3dadd(30.33, 31.08, -51.84, 0.5)
	pt3dadd(30.75, 31.08, -52.74, 0.5)
  }
  dend[588] {pt3dclear()
	pt3dadd(30.75, 31.08, -52.74, 0.5)
	pt3dadd(30.83, 31.08, -52.92, 0.5)
	pt3dadd(31, 31.25, -52.92, 0.5)
	pt3dadd(31.17, 31.42, -52.92, 0.5)
	pt3dadd(31.33, 31.58, -52.92, 0.5)
	pt3dadd(31.83, 31.58, -52.92, 0.5)
	pt3dadd(32, 31.75, -52.92, 0.5)
	pt3dadd(32.33, 31.92, -52.92, 0.5)
	pt3dadd(32.67, 31.92, -52.92, 0.5)
	pt3dadd(33, 32.08, -52.92, 0.5)
	pt3dadd(33.17, 32.25, -52.92, 0.5)
	pt3dadd(33.83, 32.25, -52.92, 0.5)
	pt3dadd(34, 32.42, -52.92, 0.5)
	pt3dadd(34.17, 32.58, -52.92, 0.5)
  }
  dend[589] {pt3dclear()
	pt3dadd(34.17, 32.58, -52.92, 0.5)
	pt3dadd(34.33, 32.42, -52.56, 0.5)
	pt3dadd(34.5, 32.58, -52.56, 0.5)
	pt3dadd(35, 32.75, -52.56, 0.5)
	pt3dadd(35.33, 32.92, -52.56, 0.5)
	pt3dadd(35.67, 33.08, -52.56, 0.5)
	pt3dadd(36, 33.08, -52.56, 0.5)
	pt3dadd(36.17, 33.25, -52.56, 0.5)
	pt3dadd(36.5, 33.42, -52.56, 0.5)
	pt3dadd(36.67, 33.42, -52.56, 0.5)
  }
  dend[590] {pt3dclear()
	pt3dadd(36.67, 33.42, -52.56, 0.5)
	pt3dadd(36.83, 33.58, -55.08, 0.5)
	pt3dadd(37, 33.42, -55.08, 0.5)
	pt3dadd(37.17, 33.25, -55.08, 0.5)
	pt3dadd(37.33, 32.92, -55.08, 0.5)
	pt3dadd(37.67, 32.75, -55.08, 0.5)
	pt3dadd(37.83, 32.42, -55.08, 0.5)
	pt3dadd(38.33, 32.42, -55.08, 0.5)
	pt3dadd(38.5, 32.25, -55.08, 0.5)
	pt3dadd(39.17, 32.25, -55.08, 0.5)
	pt3dadd(39.5, 32.08, -55.08, 0.5)
	pt3dadd(40.17, 32.08, -55.08, 0.5)
  }
  dend[591] {pt3dclear()
	pt3dadd(40.17, 32.08, -55.08, 0.5)
	pt3dadd(40.33, 32.08, -54, 0.5)
	pt3dadd(40.67, 31.92, -54, 0.5)
	pt3dadd(41, 31.75, -54, 0.5)
	pt3dadd(41.17, 31.58, -54, 0.5)
	pt3dadd(41.5, 31.58, -54, 0.5)
	pt3dadd(41.67, 31.42, -54, 0.5)
	pt3dadd(41.67, 31.08, -54, 0.5)
  }
  dend[592] {pt3dclear()
	pt3dadd(41.67, 31.08, -54, 0.5)
	pt3dadd(41.5, 31.08, -54.72, 0.5)
	pt3dadd(41.83, 31.08, -54.72, 0.5)
	pt3dadd(42, 30.92, -54.72, 0.5)
	pt3dadd(42.17, 30.75, -54.72, 0.5)
	pt3dadd(42.5, 30.75, -54.72, 0.5)
	pt3dadd(42.67, 30.58, -54.72, 0.5)
	pt3dadd(43, 30.42, -54.72, 0.5)
	pt3dadd(43.17, 30.25, -54.72, 0.5)
	pt3dadd(43.5, 30.25, -54.72, 0.5)
	pt3dadd(43.83, 30.08, -54.72, 0.5)
	pt3dadd(44, 29.92, -54.72, 0.5)
  }
  dend[593] {pt3dclear()
	pt3dadd(44, 29.92, -54.72, 0.5)
	pt3dadd(44.17, 30.08, -54.36, 0.5)
	pt3dadd(44.33, 30.25, -54.36, 0.5)
	pt3dadd(44.67, 30.25, -54.36, 0.5)
	pt3dadd(44.83, 30.42, -54.36, 0.5)
	pt3dadd(45.17, 30.58, -54.36, 0.5)
	pt3dadd(46, 30.58, -54.36, 0.5)
	pt3dadd(46, 30.42, -54.36, 0.5)
  }
  dend[594] {pt3dclear()
	pt3dadd(46, 30.42, -54.36, 0.5)
	pt3dadd(45.67, 30.42, -53.64, 0.5)
	pt3dadd(45.83, 30.58, -53.64, 0.5)
	pt3dadd(46.33, 30.58, -53.64, 0.5)
	pt3dadd(46.5, 30.75, -53.64, 0.5)
	pt3dadd(46.67, 30.92, -53.64, 0.5)
	pt3dadd(47, 31.08, -53.64, 0.5)
	pt3dadd(47.33, 31.42, -53.64, 0.5)
	pt3dadd(47.5, 31.58, -53.64, 0.5)
	pt3dadd(47.67, 31.92, -53.64, 0.5)
	pt3dadd(47.83, 32.25, -53.64, 0.5)
	pt3dadd(48, 32.42, -53.64, 0.5)
	pt3dadd(48.17, 32.75, -56.52, 0.5)
	pt3dadd(48.5, 32.92, -56.52, 0.5)
	pt3dadd(48.67, 33.08, -56.52, 0.5)
	pt3dadd(48.83, 33.25, -56.52, 0.5)
	pt3dadd(48.83, 33.58, -56.52, 0.5)
	pt3dadd(49, 33.75, -56.52, 0.5)
	pt3dadd(49.17, 33.92, -56.52, 0.5)
	pt3dadd(49.17, 34.42, -56.52, 0.5)
	pt3dadd(49.33, 34.58, -56.52, 0.5)
	pt3dadd(49.5, 34.92, -56.52, 0.5)
	pt3dadd(49.5, 35.25, -56.52, 0.5)
	pt3dadd(49.67, 35.42, -56.52, 0.5)
	pt3dadd(49.67, 35.92, -56.52, 0.5)
	pt3dadd(49.83, 36.08, -56.52, 0.5)
	pt3dadd(50, 36.42, -56.52, 0.5)
	pt3dadd(50.17, 36.58, -56.52, 0.5)
	pt3dadd(50.17, 36.92, -56.52, 0.5)
	pt3dadd(50.33, 37.08, -56.52, 0.5)
	pt3dadd(50.5, 37.42, -56.52, 0.5)
	pt3dadd(50.67, 37.75, -56.52, 0.5)
	pt3dadd(50.67, 37.58, -56.52, 0.5)
  }
  dend[595] {pt3dclear()
	pt3dadd(46, 30.42, -54.36, 0.5)
	pt3dadd(46.33, 30.42, -54.36, 0.5)
	pt3dadd(46.33, 32.25, -54.36, 0.5)
	pt3dadd(46.5, 32.42, -54.36, 0.5)
	pt3dadd(46.5, 33.58, -56.88, 0.5)
	pt3dadd(46.67, 33.75, -57.6, 0.5)
	pt3dadd(46.83, 34.08, -57.6, 0.5)
	pt3dadd(46.83, 34.58, -57.6, 0.5)
	pt3dadd(47, 34.92, -57.6, 0.5)
	pt3dadd(47.17, 35.25, -57.6, 0.5)
	pt3dadd(47.33, 35.42, -57.6, 0.5)
	pt3dadd(47.5, 35.58, -57.6, 0.5)
	pt3dadd(47.67, 35.92, -57.6, 0.5)
	pt3dadd(47.83, 36.08, -57.6, 0.5)
	pt3dadd(48.17, 36.42, -57.6, 0.5)
	pt3dadd(48.33, 36.75, -57.6, 0.5)
	pt3dadd(48.5, 36.92, -57.6, 0.5)
	pt3dadd(48.67, 37.25, -57.6, 0.5)
	pt3dadd(48.83, 37.42, -57.6, 0.5)
	pt3dadd(49, 37.75, -57.6, 0.5)
	pt3dadd(49.17, 38.08, -57.6, 0.5)
	pt3dadd(49.5, 38.42, -57.6, 0.5)
	pt3dadd(49.67, 38.58, -57.6, 0.5)
	pt3dadd(49.83, 38.92, -57.6, 0.5)
	pt3dadd(50.17, 39.25, -57.6, 0.5)
	pt3dadd(50.33, 39.42, -57.6, 0.5)
	pt3dadd(50.5, 39.58, -57.6, 0.5)
	pt3dadd(50.83, 39.75, -57.6, 0.5)
	pt3dadd(51.17, 39.92, -57.6, 0.5)
	pt3dadd(51.33, 40.08, -57.6, 0.5)
	pt3dadd(51.5, 40.25, -57.6, 0.5)
	pt3dadd(51.67, 40.42, -57.6, 0.5)
	pt3dadd(51.83, 40.58, -57.6, 0.5)
	pt3dadd(51.83, 40.92, -57.6, 0.5)
	pt3dadd(52, 41.08, -57.6, 0.5)
	pt3dadd(52.17, 41.25, -57.6, 0.5)
	pt3dadd(52, 41.25, -57.6, 0.5)
  }
  dend[596] {pt3dclear()
	pt3dadd(44, 29.92, -54.72, 0.5)
	pt3dadd(44.5, 30.08, -54.72, 0.5)
	pt3dadd(44.67, 29.75, -54.72, 0.5)
	pt3dadd(45, 29.42, -54.72, 0.5)
	pt3dadd(45.17, 29.08, -54.72, 0.5)
	pt3dadd(45.33, 28.92, -54.72, 0.5)
	pt3dadd(45.5, 28.75, -54.72, 0.5)
	pt3dadd(45.67, 28.42, -54.72, 0.5)
	pt3dadd(45.83, 28.25, -54.72, 0.5)
	pt3dadd(46.17, 27.92, -54.72, 0.5)
	pt3dadd(46.33, 27.75, -54.72, 0.5)
	pt3dadd(46.5, 27.58, -54.72, 0.5)
	pt3dadd(46.67, 27.42, -54.72, 0.5)
	pt3dadd(46.83, 27.25, -54.72, 0.5)
	pt3dadd(47.17, 27.25, -54.72, 0.5)
	pt3dadd(47.5, 27.08, -54.72, 0.5)
	pt3dadd(50.5, 27.08, -54.72, 0.5)
	pt3dadd(50.67, 27.25, -54.72, 0.5)
	pt3dadd(51.5, 27.25, -54.72, 0.5)
	pt3dadd(51.67, 27.42, -54.72, 0.5)
	pt3dadd(51.83, 27.58, -54.72, 0.5)
	pt3dadd(51.67, 27.58, -54.72, 0.5)
  }
  dend[597] {pt3dclear()
	pt3dadd(51.67, 27.58, -54.72, 0.5)
	pt3dadd(52, 27.75, -54.36, 0.5)
	pt3dadd(52.17, 27.92, -54.36, 0.5)
	pt3dadd(52.33, 28.25, -54.36, 0.5)
	pt3dadd(52.5, 28.42, -54.36, 0.5)
	pt3dadd(52.67, 28.75, -54.36, 0.5)
	pt3dadd(53, 29.08, -54.36, 0.5)
	pt3dadd(53, 29.25, -54.36, 0.5)
  }
  dend[598] {pt3dclear()
	pt3dadd(51.67, 27.58, -54.72, 0.5)
	pt3dadd(51.83, 27.75, -55.08, 0.5)
	pt3dadd(52.17, 27.58, -55.08, 0.5)
	pt3dadd(52.33, 27.42, -55.08, 0.5)
	pt3dadd(52.67, 27.42, -55.08, 0.5)
	pt3dadd(52.83, 27.25, -55.08, 0.5)
	pt3dadd(53, 27.08, -55.08, 0.5)
	pt3dadd(53.17, 27.08, -55.08, 0.5)
  }
  dend[599] {pt3dclear()
	pt3dadd(41.67, 31.08, -54, 0.5)
	pt3dadd(41.5, 31.58, -53.28, 0.5)
	pt3dadd(41.5, 31.25, -53.28, 0.5)
	pt3dadd(41.67, 31.08, -53.28, 0.5)
	pt3dadd(41.67, 30.42, -53.28, 0.5)
	pt3dadd(41.83, 30.25, -53.28, 0.5)
	pt3dadd(42, 30.08, -53.28, 0.5)
	pt3dadd(42, 29.08, -53.28, 0.5)
	pt3dadd(41.67, 28.92, -53.28, 0.5)
	pt3dadd(41.17, 28.92, -53.28, 0.5)
  }
}
proc shape3d_55() {
  dend[599] {	pt3dadd(41, 29.08, -53.28, 0.5)
	pt3dadd(40.67, 29.25, -53.28, 0.5)
	pt3dadd(40.33, 29.25, -53.28, 0.5)
	pt3dadd(40.17, 29.42, -53.28, 0.5)
	pt3dadd(40, 29.58, -53.28, 0.5)
	pt3dadd(39.33, 29.58, -53.28, 0.5)
	pt3dadd(39.17, 29.75, -53.28, 0.5)
	pt3dadd(38.67, 29.75, -53.28, 0.5)
	pt3dadd(38.17, 29.92, -53.28, 0.5)
	pt3dadd(37.83, 29.92, -53.28, 0.5)
  }
  dend[600] {pt3dclear()
	pt3dadd(37.83, 29.92, -53.28, 0.5)
	pt3dadd(37.67, 30.08, -51.48, 0.5)
	pt3dadd(37.5, 30.25, -51.48, 0.5)
	pt3dadd(37.17, 30.58, -51.48, 0.5)
	pt3dadd(37, 30.75, -51.48, 0.5)
	pt3dadd(36.83, 30.92, -51.48, 0.5)
	pt3dadd(36.5, 31.08, -51.48, 0.5)
	pt3dadd(36.17, 31.08, -51.48, 0.5)
	pt3dadd(36, 31.25, -51.48, 0.5)
	pt3dadd(35, 31.25, -51.48, 0.5)
	pt3dadd(34.83, 31.08, -51.48, 0.5)
	pt3dadd(34.33, 31.08, -51.48, 0.5)
	pt3dadd(34.17, 30.92, -51.48, 0.5)
	pt3dadd(34, 30.75, -51.48, 0.5)
	pt3dadd(34, 30.08, -51.48, 0.5)
	pt3dadd(34.17, 30.08, -51.48, 0.5)
  }
  dend[601] {pt3dclear()
	pt3dadd(34.17, 30.08, -51.48, 0.5)
	pt3dadd(34.33, 29.92, -51.48, 0.5)
	pt3dadd(34.5, 29.75, -51.48, 0.5)
	pt3dadd(34.83, 29.58, -51.48, 0.5)
	pt3dadd(35, 29.25, -51.48, 0.5)
	pt3dadd(35.17, 29.08, -51.48, 0.5)
	pt3dadd(35.17, 28.75, -51.48, 0.5)
	pt3dadd(35.5, 28.42, -51.48, 0.5)
	pt3dadd(35.5, 27.42, -51.48, 0.5)
	pt3dadd(35.67, 27.25, -51.48, 0.5)
	pt3dadd(35.67, 26.92, -51.48, 0.5)
  }
  dend[602] {pt3dclear()
	pt3dadd(34.17, 30.08, -51.48, 0.5)
	pt3dadd(34.5, 30.08, -51.48, 0.5)
	pt3dadd(34.33, 29.75, -51.48, 0.5)
	pt3dadd(34.17, 29.42, -51.48, 0.5)
	pt3dadd(34.17, 27.58, -51.48, 0.5)
	pt3dadd(34.33, 27.42, -51.48, 0.5)
	pt3dadd(34.33, 27.08, -51.48, 0.5)
  }
  dend[603] {pt3dclear()
	pt3dadd(37.83, 29.92, -53.28, 0.5)
	pt3dadd(37.83, 30.25, -53.28, 0.5)
	pt3dadd(37.67, 30.08, -53.28, 0.5)
	pt3dadd(37.5, 29.92, -53.28, 0.5)
	pt3dadd(37.17, 29.92, -53.28, 0.5)
	pt3dadd(37, 29.75, -53.28, 0.5)
	pt3dadd(36.67, 29.58, -53.28, 0.5)
	pt3dadd(36.5, 29.25, -53.28, 0.5)
	pt3dadd(36.33, 29.08, -53.28, 0.5)
	pt3dadd(36.33, 26.75, -53.28, 0.5)
  }
  dend[604] {pt3dclear()
	pt3dadd(40.17, 32.08, -55.08, 0.5)
	pt3dadd(40.83, 31.92, -55.08, 0.5)
	pt3dadd(41, 32.08, -54.72, 0.5)
	pt3dadd(41.17, 32.25, -54.72, 0.5)
	pt3dadd(41.17, 32.58, -54.72, 0.5)
	pt3dadd(41.33, 32.75, -54.72, 0.5)
	pt3dadd(41.67, 32.92, -54.72, 0.5)
	pt3dadd(41.83, 33.25, -54.72, 0.5)
	pt3dadd(42, 33.58, -54.72, 0.5)
	pt3dadd(42.33, 33.58, -54.72, 0.5)
	pt3dadd(42.5, 33.75, -54.72, 0.5)
	pt3dadd(42.33, 33.58, -54.36, 0.5)
  }
  dend[605] {pt3dclear()
	pt3dadd(42.33, 33.58, -54.36, 0.5)
	pt3dadd(42.67, 33.75, -56.16, 0.5)
	pt3dadd(42.83, 33.92, -56.16, 0.5)
	pt3dadd(43, 34.08, -56.16, 0.5)
	pt3dadd(43.17, 34.42, -56.16, 0.5)
	pt3dadd(43.5, 34.75, -56.16, 0.5)
	pt3dadd(43.67, 34.92, -56.16, 0.5)
	pt3dadd(43.83, 35.25, -56.16, 0.5)
	pt3dadd(44, 35.42, -56.16, 0.5)
	pt3dadd(44.17, 35.58, -56.16, 0.5)
	pt3dadd(44.17, 35.75, -56.16, 0.5)
  }
  dend[606] {pt3dclear()
	pt3dadd(42.33, 33.58, -54.36, 0.5)
	pt3dadd(42.83, 34.08, -54.36, 0.5)
	pt3dadd(43, 34.25, -54.36, 0.5)
	pt3dadd(43, 34.58, -54.36, 0.5)
	pt3dadd(42.83, 34.75, -54.36, 0.5)
	pt3dadd(42.5, 34.92, -54.36, 0.5)
	pt3dadd(40.83, 34.92, -54.36, 0.5)
	pt3dadd(40.5, 34.75, -54.36, 0.5)
	pt3dadd(40.17, 34.75, -54.36, 0.5)
	pt3dadd(40, 34.58, -54.36, 0.5)
	pt3dadd(39.5, 34.58, -54.36, 0.5)
  }
  dend[607] {pt3dclear()
	pt3dadd(36.67, 33.42, -52.56, 0.5)
	pt3dadd(36.83, 33.42, -54.36, 0.5)
	pt3dadd(37, 33.58, -54.36, 0.5)
	pt3dadd(37.17, 33.75, -54.36, 0.5)
	pt3dadd(37.33, 34.08, -54.36, 0.5)
	pt3dadd(37.5, 34.42, -54.36, 0.5)
	pt3dadd(37.83, 34.75, -54.36, 0.5)
	pt3dadd(37.83, 35.08, -54.36, 0.5)
	pt3dadd(38, 35.25, -54.36, 0.5)
	pt3dadd(38.17, 35.42, -54.36, 0.5)
	pt3dadd(38.33, 35.58, -54.36, 0.5)
	pt3dadd(38.67, 35.92, -54.36, 0.5)
	pt3dadd(38.67, 36.25, -54.36, 0.5)
	pt3dadd(38.83, 36.42, -54.36, 0.5)
	pt3dadd(38.83, 37.08, -54.36, 0.5)
	pt3dadd(39, 37.42, -54.36, 0.5)
	pt3dadd(39.17, 37.58, -54.36, 0.5)
	pt3dadd(39.17, 38.08, -54.36, 0.5)
	pt3dadd(39.33, 38.25, -54.36, 0.5)
	pt3dadd(39.33, 38.58, -54.36, 0.5)
	pt3dadd(39.5, 38.75, -54.36, 0.5)
	pt3dadd(39.67, 38.92, -54.36, 0.5)
	pt3dadd(39.67, 39.25, -54.36, 0.5)
	pt3dadd(39.83, 39.42, -54.36, 0.5)
	pt3dadd(40, 39.58, -54.36, 0.5)
  }
  dend[608] {pt3dclear()
	pt3dadd(40, 39.58, -54.36, 0.5)
	pt3dadd(40.17, 39.58, -54, 0.5)
	pt3dadd(40.5, 39.58, -54, 0.5)
	pt3dadd(40.67, 39.75, -54, 0.5)
	pt3dadd(40.83, 40.08, -54, 0.5)
	pt3dadd(41, 40.42, -54, 0.5)
	pt3dadd(41.17, 40.75, -54, 0.5)
	pt3dadd(41.33, 41.08, -54, 0.5)
	pt3dadd(41.33, 41.58, -54, 0.5)
	pt3dadd(41.5, 41.75, -54, 0.5)
	pt3dadd(41.67, 42.08, -54, 0.5)
	pt3dadd(41.83, 42.42, -54, 0.5)
	pt3dadd(42, 42.58, -54, 0.5)
	pt3dadd(42, 42.92, -54, 0.5)
	pt3dadd(42.17, 43.08, -54, 0.5)
	pt3dadd(42.5, 43.25, -54, 0.5)
	pt3dadd(42.83, 43.58, -54, 0.5)
	pt3dadd(43.17, 43.75, -54, 0.5)
	pt3dadd(43.33, 43.92, -54, 0.5)
	pt3dadd(43.67, 44.08, -54, 0.5)
  }
  dend[609] {pt3dclear()
	pt3dadd(40, 39.58, -54.36, 0.5)
	pt3dadd(40.67, 39.58, -54.36, 0.5)
	pt3dadd(40.67, 41.25, -54.36, 0.5)
	pt3dadd(40.83, 41.42, -54.36, 0.5)
	pt3dadd(40.83, 42.25, -54.36, 0.5)
	pt3dadd(41, 42.42, -54.36, 0.5)
	pt3dadd(41.17, 42.58, -54.36, 0.5)
	pt3dadd(41.17, 43.08, -54.36, 0.5)
	pt3dadd(41.33, 43.42, -54.36, 0.5)
	pt3dadd(41.33, 43.75, -54.36, 0.5)
	pt3dadd(41.5, 44.08, -54.36, 0.5)
	pt3dadd(41.5, 44.92, -54.36, 0.5)
	pt3dadd(41.67, 45.08, -54.36, 0.5)
	pt3dadd(41.67, 45.42, -54.36, 0.5)
	pt3dadd(41.83, 45.58, -54.36, 0.5)
	pt3dadd(42, 45.75, -54.36, 0.5)
  }
  dend[610] {pt3dclear()
	pt3dadd(34.17, 32.58, -52.92, 0.5)
	pt3dadd(34.33, 32.58, -52.92, 0.5)
	pt3dadd(34.33, 33.08, -52.92, 0.5)
	pt3dadd(34.5, 33.42, -52.92, 0.5)
	pt3dadd(34.5, 34.08, -52.92, 0.5)
	pt3dadd(34.83, 34.42, -52.92, 0.5)
	pt3dadd(35, 34.75, -52.92, 0.5)
	pt3dadd(35.17, 34.92, -52.92, 0.5)
	pt3dadd(35.33, 35.08, -52.92, 0.5)
	pt3dadd(35.5, 35.25, -52.92, 0.5)
	pt3dadd(35.67, 35.42, -52.92, 0.5)
	pt3dadd(35.83, 35.58, -52.92, 0.5)
	pt3dadd(36, 35.75, -52.92, 0.5)
	pt3dadd(36.33, 35.92, -52.92, 0.5)
	pt3dadd(36.5, 36.25, -52.92, 0.5)
	pt3dadd(36.83, 36.42, -52.92, 0.5)
	pt3dadd(37, 36.75, -52.92, 0.5)
	pt3dadd(37.17, 36.92, -52.92, 0.5)
	pt3dadd(37.33, 37.08, -52.92, 0.5)
	pt3dadd(37.5, 37.42, -52.92, 0.5)
	pt3dadd(37.67, 37.75, -52.92, 0.5)
	pt3dadd(37.67, 38.08, -52.92, 0.5)
	pt3dadd(37.83, 38.42, -52.92, 0.5)
	pt3dadd(37.83, 38.75, -52.92, 0.5)
  }
  dend[611] {pt3dclear()
	pt3dadd(30.75, 31.08, -52.74, 0.5)
	pt3dadd(30.33, 31.25, -52.56, 0.5)
	pt3dadd(30.5, 31.08, -52.56, 0.5)
	pt3dadd(30.67, 30.92, -52.56, 0.5)
	pt3dadd(30.83, 30.75, -52.56, 0.5)
	pt3dadd(31, 30.58, -52.56, 0.5)
	pt3dadd(31.17, 30.25, -52.56, 0.5)
	pt3dadd(31.33, 29.92, -52.56, 0.5)
	pt3dadd(31.5, 29.75, -52.56, 0.5)
	pt3dadd(31.5, 29.25, -52.56, 0.5)
	pt3dadd(31.67, 29.08, -52.56, 0.5)
	pt3dadd(31.83, 28.92, -52.56, 0.5)
	pt3dadd(31.83, 28.58, -52.56, 0.5)
	pt3dadd(32, 28.58, -52.56, 0.5)
  }
  dend[612] {pt3dclear()
	pt3dadd(32, 28.58, -52.56, 0.5)
	pt3dadd(31.83, 28.92, -52.2, 0.5)
	pt3dadd(32, 28.75, -52.2, 0.5)
	pt3dadd(32.17, 28.58, -52.2, 0.5)
	pt3dadd(32.33, 28.42, -52.2, 0.5)
	pt3dadd(32.5, 28.25, -52.2, 0.5)
	pt3dadd(32.67, 28.08, -52.2, 0.5)
	pt3dadd(32.83, 27.92, -52.2, 0.5)
	pt3dadd(33, 27.75, -52.2, 0.5)
	pt3dadd(33.17, 27.42, -52.2, 0.5)
	pt3dadd(33.33, 27.25, -52.2, 0.5)
	pt3dadd(33.67, 27.08, -52.2, 0.5)
	pt3dadd(33.83, 26.92, -52.2, 0.5)
  }
}
proc shape3d_56() {
  dend[612] {	pt3dadd(33.83, 26.58, -52.2, 0.5)
	pt3dadd(34, 26.42, -52.2, 0.5)
	pt3dadd(34.33, 26.42, -52.2, 0.5)
	pt3dadd(34.5, 26.25, -52.2, 0.5)
	pt3dadd(34.67, 26.08, -52.2, 0.5)
	pt3dadd(34.83, 25.92, -52.2, 0.5)
	pt3dadd(35, 25.75, -52.2, 0.5)
	pt3dadd(35.17, 25.58, -52.2, 0.5)
  }
  dend[613] {pt3dclear()
	pt3dadd(32, 28.58, -52.56, 0.5)
	pt3dadd(32.5, 28.58, -52.56, 0.5)
	pt3dadd(32.5, 27.25, -52.56, 0.5)
	pt3dadd(32.33, 27.08, -52.56, 0.5)
	pt3dadd(32.17, 26.92, -52.56, 0.5)
	pt3dadd(32.17, 25.25, -52.56, 0.5)
	pt3dadd(32, 25.08, -52.56, 0.5)
	pt3dadd(32, 24.75, -52.56, 0.5)
	pt3dadd(31.83, 24.58, -52.56, 0.5)
	pt3dadd(31.67, 24.42, -52.56, 0.5)
	pt3dadd(31.67, 24.08, -52.56, 0.5)
	pt3dadd(31.5, 24.08, -52.56, 0.5)
  }
  dend[614] {pt3dclear()
	pt3dadd(30.33, 31.08, -51.84, 0.5)
	pt3dadd(30.33, 30.92, -51.84, 0.5)
	pt3dadd(30.33, 31.58, -51.84, 0.5)
	pt3dadd(30.5, 31.92, -51.84, 0.5)
	pt3dadd(30.67, 32.08, -51.84, 0.5)
	pt3dadd(30.83, 32.25, -51.84, 0.5)
	pt3dadd(30.83, 32.58, -51.84, 0.5)
	pt3dadd(31, 32.75, -51.84, 0.5)
	pt3dadd(31, 33.08, -51.84, 0.5)
	pt3dadd(31.17, 33.25, -51.84, 0.5)
	pt3dadd(31.17, 34.42, -51.84, 0.5)
	pt3dadd(31.33, 34.58, -51.84, 0.5)
	pt3dadd(31.5, 34.92, -51.84, 0.5)
	pt3dadd(31.67, 35.25, -51.84, 0.5)
	pt3dadd(31.67, 35.42, -51.84, 0.5)
  }
  dend[615] {pt3dclear()
	pt3dadd(31.67, 35.42, -51.84, 0.5)
	pt3dadd(31.83, 34.92, -51.84, 0.5)
	pt3dadd(32.17, 34.92, -51.84, 0.5)
	pt3dadd(32.33, 35.08, -51.84, 0.5)
	pt3dadd(32.83, 35.42, -51.84, 0.5)
	pt3dadd(33.17, 35.58, -51.84, 0.5)
	pt3dadd(33.5, 35.75, -51.84, 0.5)
	pt3dadd(33.67, 35.92, -51.84, 0.5)
	pt3dadd(33.83, 36.25, -51.84, 0.5)
	pt3dadd(34, 36.58, -51.84, 0.5)
	pt3dadd(34, 36.92, -51.84, 0.5)
	pt3dadd(34.17, 37.08, -51.84, 0.5)
	pt3dadd(34.33, 37.25, -51.84, 0.5)
	pt3dadd(34.5, 37.42, -51.84, 0.5)
	pt3dadd(34.67, 37.58, -51.84, 0.5)
	pt3dadd(35, 37.75, -51.84, 0.5)
	pt3dadd(35.17, 37.92, -51.84, 0.5)
	pt3dadd(35.5, 38.08, -51.84, 0.5)
	pt3dadd(35.83, 38.25, -51.84, 0.5)
  }
  dend[616] {pt3dclear()
	pt3dadd(31.67, 35.42, -51.84, 0.5)
	pt3dadd(31.67, 35.58, -53.64, 0.5)
	pt3dadd(31.67, 36.25, -53.64, 0.5)
	pt3dadd(31.83, 36.42, -53.64, 0.5)
	pt3dadd(31.83, 37.08, -53.64, 0.5)
	pt3dadd(32, 37.25, -53.64, 0.5)
	pt3dadd(32.17, 37.42, -53.64, 0.5)
	pt3dadd(32.17, 37.75, -53.64, 0.5)
	pt3dadd(32.33, 37.92, -53.64, 0.5)
	pt3dadd(32.5, 38.08, -53.64, 0.5)
	pt3dadd(32.5, 38.58, -53.64, 0.5)
	pt3dadd(32.67, 38.92, -53.64, 0.5)
	pt3dadd(32.83, 39.08, -53.64, 0.5)
	pt3dadd(32.83, 39.42, -53.64, 0.5)
	pt3dadd(33, 39.75, -53.64, 0.5)
	pt3dadd(33, 40.42, -53.64, 0.5)
	pt3dadd(33.17, 40.58, -53.64, 0.5)
	pt3dadd(33.17, 41.08, -53.64, 0.5)
  }
  dend[617] {pt3dclear()
	pt3dadd(24.83, 29.92, -50.76, 0.5)
	pt3dadd(25.17, 30.08, -50.76, 0.5)
	pt3dadd(25.17, 28.58, -50.76, 0.5)
	pt3dadd(25.5, 28.42, -50.76, 0.5)
	pt3dadd(25.67, 28.25, -50.76, 0.5)
	pt3dadd(25.83, 28.08, -50.76, 0.5)
	pt3dadd(25.83, 27.75, -50.76, 0.5)
	pt3dadd(26, 27.58, -50.76, 0.5)
	pt3dadd(26.17, 27.42, -50.76, 0.5)
	pt3dadd(26.33, 27.25, -50.76, 0.5)
	pt3dadd(26.33, 26.75, -50.76, 0.5)
	pt3dadd(26.5, 26.58, -50.76, 0.5)
	pt3dadd(26.33, 26.42, -50.76, 0.5)
	pt3dadd(26.33, 25.42, -50.76, 0.5)
  }
  dend[618] {pt3dclear()
	pt3dadd(26.33, 25.42, -50.76, 0.5)
	pt3dadd(26.33, 26.25, -50.76, 0.5)
	pt3dadd(27.17, 26.25, -50.76, 0.5)
	pt3dadd(27.33, 26.08, -50.76, 0.5)
	pt3dadd(27.5, 25.75, -50.76, 0.5)
	pt3dadd(27.67, 25.58, -50.76, 0.5)
	pt3dadd(27.83, 25.42, -50.76, 0.5)
	pt3dadd(28.17, 25.25, -50.76, 0.5)
	pt3dadd(28.5, 25.08, -50.76, 0.5)
	pt3dadd(29, 25.08, -50.76, 0.5)
	pt3dadd(29.33, 24.92, -50.76, 0.5)
	pt3dadd(29.83, 24.92, -50.76, 0.5)
  }
  dend[619] {pt3dclear()
	pt3dadd(26.33, 25.42, -50.76, 0.5)
	pt3dadd(26.67, 26.25, -50.76, 0.5)
	pt3dadd(26.33, 26.08, -50.76, 0.5)
	pt3dadd(26.17, 25.92, -50.76, 0.5)
	pt3dadd(26, 25.58, -50.76, 0.5)
	pt3dadd(25.83, 25.25, -50.76, 0.5)
	pt3dadd(25.83, 24.75, -50.76, 0.5)
	pt3dadd(25.67, 24.42, -50.76, 0.5)
  }
  dend[620] {pt3dclear()
	pt3dadd(23.5, 30.42, -51.48, 0.5)
	pt3dadd(23.67, 30.25, -51.48, 0.5)
	pt3dadd(23.67, 29.92, -51.48, 0.5)
	pt3dadd(23.5, 29.75, -51.48, 0.5)
	pt3dadd(23.33, 29.58, -51.48, 0.5)
	pt3dadd(23.17, 29.42, -51.48, 0.5)
	pt3dadd(22.83, 29.25, -51.48, 0.5)
	pt3dadd(22.67, 29.08, -51.48, 0.5)
	pt3dadd(22.5, 28.92, -51.48, 0.5)
	pt3dadd(22.33, 28.75, -51.48, 0.5)
	pt3dadd(22.33, 28.42, -51.48, 0.5)
	pt3dadd(22.17, 28.25, -51.48, 0.5)
	pt3dadd(22.17, 27.92, -51.48, 0.5)
	pt3dadd(22, 27.75, -51.48, 0.5)
  }
  dend[621] {pt3dclear()
	pt3dadd(22, 27.75, -51.48, 0.5)
	pt3dadd(22.17, 27.92, -51.48, 0.5)
	pt3dadd(22.17, 27.25, -51.48, 0.5)
	pt3dadd(22.33, 27.08, -51.48, 0.5)
	pt3dadd(22.17, 26.92, -51.48, 0.5)
	pt3dadd(22.17, 26.58, -51.48, 0.5)
	pt3dadd(22, 26.42, -51.48, 0.5)
	pt3dadd(22, 26.08, -51.48, 0.5)
	pt3dadd(21.83, 25.92, -51.48, 0.5)
	pt3dadd(21.83, 25.75, -51.48, 0.5)
  }
  dend[622] {pt3dclear()
	pt3dadd(22, 27.75, -51.48, 0.5)
	pt3dadd(22.33, 28.08, -51.48, 0.5)
	pt3dadd(22.67, 28.08, -51.48, 0.5)
	pt3dadd(22.83, 27.92, -51.48, 0.5)
	pt3dadd(23.17, 27.92, -51.48, 0.5)
	pt3dadd(23.33, 27.75, -51.48, 0.5)
	pt3dadd(24.33, 27.75, -51.48, 0.5)
  }
  dend[623] {pt3dclear()
	pt3dadd(18.82, 31.08, -50.04, 0.5)
	pt3dadd(19.5, 31.25, -50.04, 0.5)
	pt3dadd(19.67, 30.92, -50.04, 0.5)
	pt3dadd(19.67, 30.25, -50.04, 0.5)
	pt3dadd(19.5, 30.08, -50.04, 0.5)
	pt3dadd(19.5, 28.58, -50.04, 0.5)
	pt3dadd(19.67, 28.42, -50.04, 0.5)
	pt3dadd(19.67, 27.75, -50.04, 0.5)
  }
  dend[624] {pt3dclear()
	pt3dadd(19.67, 27.75, -50.04, 0.5)
	pt3dadd(19.67, 27.75, -49.68, 0.5)
	pt3dadd(19.67, 26.92, -49.68, 0.5)
	pt3dadd(19.5, 26.75, -49.68, 0.5)
	pt3dadd(19.5, 25.75, -49.68, 0.5)
	pt3dadd(19.32, 25.75, -49.68, 0.5)
  }
  dend[625] {pt3dclear()
	pt3dadd(19.67, 27.75, -50.04, 0.5)
	pt3dadd(19.82, 28.08, -50.04, 0.5)
	pt3dadd(19.82, 27.75, -50.04, 0.5)
	pt3dadd(20, 27.42, -50.04, 0.5)
	pt3dadd(20.17, 27.25, -50.04, 0.5)
	pt3dadd(20.32, 26.92, -50.04, 0.5)
	pt3dadd(20.32, 26.42, -50.04, 0.5)
	pt3dadd(20.5, 26.25, -50.04, 0.5)
	pt3dadd(20.67, 26.08, -50.04, 0.5)
	pt3dadd(20.67, 25.75, -50.04, 0.5)
  }
  dend[626] {pt3dclear()
	pt3dadd(14.5, 32.42, -47.52, 0.17)
	pt3dadd(14.5, 32.42, -46.44, 0.17)
	pt3dadd(14.5, 31.75, -46.44, 0.17)
	pt3dadd(14.67, 31.58, -46.44, 0.17)
	pt3dadd(14.67, 31.25, -46.44, 0.17)
	pt3dadd(14.83, 31.08, -46.44, 0.17)
	pt3dadd(15, 30.92, -46.44, 0.17)
	pt3dadd(15.17, 30.58, -46.44, 0.17)
	pt3dadd(15.17, 30.25, -46.44, 0.17)
	pt3dadd(15.33, 29.92, -46.44, 0.17)
	pt3dadd(15.5, 29.75, -46.44, 0.17)
	pt3dadd(15.67, 29.58, -46.44, 0.17)
	pt3dadd(15.83, 29.42, -46.44, 0.17)
	pt3dadd(15.83, 28.58, -46.44, 0.17)
	pt3dadd(16, 28.42, -46.44, 0.17)
	pt3dadd(16.17, 28.25, -46.44, 0.17)
	pt3dadd(16.32, 28.08, -46.44, 0.17)
	pt3dadd(16.5, 27.92, -46.44, 0.17)
	pt3dadd(16.67, 27.75, -46.44, 0.17)
	pt3dadd(16.82, 27.42, -46.44, 0.17)
	pt3dadd(17, 27.25, -46.44, 0.17)
	pt3dadd(17.17, 27.08, -46.44, 0.17)
	pt3dadd(17.17, 26.42, -46.44, 0.17)
	pt3dadd(17.32, 26.08, -46.44, 0.17)
	pt3dadd(17.5, 25.92, -46.44, 0.17)
  }
  dend[627] {pt3dclear()
	pt3dadd(13.83, 34.08, -47.52, 0.5)
	pt3dadd(14.33, 34.08, -47.52, 0.5)
	pt3dadd(14.33, 34.75, -47.52, 0.5)
	pt3dadd(14.5, 34.92, -47.52, 0.5)
	pt3dadd(14.67, 35.08, -47.52, 0.17)
	pt3dadd(14.83, 35.25, -47.52, 0.17)
	pt3dadd(15, 35.42, -47.52, 0.17)
	pt3dadd(15.17, 35.58, -47.52, 0.17)
	pt3dadd(15.17, 36.08, -47.52, 0.17)
  }
  dend[628] {pt3dclear()
	pt3dadd(7.83, 33.58, -45, 1.83)
	pt3dadd(8, 33.92, -46.44, 0.67)
	pt3dadd(8.17, 33.75, -46.44, 0.67)
	pt3dadd(8.33, 33.58, -46.44, 0.67)
	pt3dadd(8.5, 33.42, -46.44, 0.67)
  }
}
proc shape3d_57() {
  dend[628] {	pt3dadd(8.67, 33.25, -46.44, 0.67)
	pt3dadd(8.83, 33.08, -46.44, 0.67)
	pt3dadd(9, 32.92, -46.44, 0.67)
	pt3dadd(9.17, 32.75, -46.44, 0.67)
	pt3dadd(9.5, 32.58, -46.44, 0.67)
	pt3dadd(9.67, 32.42, -46.44, 0.67)
	pt3dadd(9.83, 32.25, -46.44, 0.67)
	pt3dadd(10, 32.08, -46.44, 0.67)
	pt3dadd(10.17, 31.92, -46.44, 0.67)
	pt3dadd(10.5, 31.75, -46.44, 0.67)
	pt3dadd(10.67, 31.58, -46.44, 0.67)
	pt3dadd(10.83, 31.42, -46.44, 0.67)
	pt3dadd(11, 31.25, -45.72, 0.67)
	pt3dadd(11.17, 31.08, -45.72, 0.67)
	pt3dadd(11.33, 30.92, -45.72, 0.67)
	pt3dadd(11.33, 30.08, -45.72, 0.67)
	pt3dadd(11.5, 29.92, -45.72, 0.67)
	pt3dadd(11.5, 29.58, -45.72, 0.67)
  }
  dend[629] {pt3dclear()
	pt3dadd(11.5, 29.58, -45.72, 0.67)
	pt3dadd(11.67, 29.92, -45.36, 0.33)
	pt3dadd(11.67, 29.42, -45.36, 0.33)
	pt3dadd(11.83, 29.25, -45.36, 0.33)
	pt3dadd(11.83, 28.75, -45.36, 0.33)
	pt3dadd(12, 28.58, -45.36, 0.33)
	pt3dadd(12, 27.58, -45.36, 0.33)
	pt3dadd(12.17, 27.42, -45.36, 0.33)
	pt3dadd(12.17, 27.08, -45.72, 0.33)
	pt3dadd(12.33, 26.92, -45.36, 0.33)
	pt3dadd(12.33, 26.58, -45.36, 0.33)
	pt3dadd(12.5, 26.42, -45.36, 0.33)
	pt3dadd(12.67, 26.08, -45.36, 0.33)
	pt3dadd(13.5, 26.08, -45.36, 0.33)
	pt3dadd(13.33, 26.08, -45.36, 0.33)
  }
  dend[630] {pt3dclear()
	pt3dadd(13.33, 26.08, -45.36, 0.33)
	pt3dadd(13.5, 25.92, -47.16, 0.33)
	pt3dadd(15, 25.92, -47.16, 0.33)
	pt3dadd(15.17, 25.92, -47.16, 0.33)
	pt3dadd(15.33, 25.75, -47.16, 0.33)
	pt3dadd(15.5, 25.58, -47.16, 0.33)
	pt3dadd(15.67, 25.42, -47.16, 0.33)
  }
  dend[631] {pt3dclear()
	pt3dadd(13.33, 26.08, -45.36, 0.33)
	pt3dadd(13.83, 25.92, -45.36, 0.33)
	pt3dadd(14, 26.25, -45.36, 0.33)
	pt3dadd(14, 27.25, -45.36, 0.33)
	pt3dadd(14.17, 27.42, -45.36, 0.33)
	pt3dadd(14.33, 27.58, -45.36, 0.33)
  }
  dend[632] {pt3dclear()
	pt3dadd(11.5, 29.58, -45.72, 0.67)
	pt3dadd(11.67, 29.92, -46.08, 0.33)
	pt3dadd(12.17, 29.92, -46.08, 0.33)
	pt3dadd(12.33, 29.75, -46.08, 0.33)
	pt3dadd(13.17, 29.75, -46.08, 0.33)
	pt3dadd(13.5, 29.92, -46.08, 0.33)
  }
  dend[633] {pt3dclear()
	pt3dadd(7.54, 26.65, -40.32, 2.33)
	pt3dadd(3.33, 24.83, -40.32, 2.33)
	pt3dadd(3, 25, -40.32, 2.33)
	pt3dadd(2.17, 25, -40.32, 2.33)
	pt3dadd(2.17, 25.17, -40.32, 1.67)
	pt3dadd(2.33, 25, -40.32, 1.33)
	pt3dadd(0, 25, -40.32, 1.33)
	pt3dadd(-0.17, 25.17, -40.32, 1.33)
	pt3dadd(-1.17, 25.17, -40.32, 1.33)
	pt3dadd(-1.33, 25.33, -40.32, 1.33)
	pt3dadd(-1.83, 25.33, -40.32, 1.33)
	pt3dadd(-2, 25.5, -40.32, 1.33)
	pt3dadd(-2.33, 25.5, -40.32, 1.33)
	pt3dadd(-2.5, 25.67, -40.32, 1.33)
	pt3dadd(-2.67, 25.83, -40.32, 1.33)
	pt3dadd(-3, 25.83, -40.32, 1.33)
	pt3dadd(-3.17, 26, -40.32, 1.33)
	pt3dadd(-3.5, 26, -40.32, 1.33)
	pt3dadd(-3.67, 25.83, -40.32, 1.33)
	pt3dadd(-3.83, 25.67, -40.32, 1.33)
  }
  dend[634] {pt3dclear()
	pt3dadd(-3.83, 25.67, -40.32, 1.33)
	pt3dadd(-3.83, 26.17, -39.96, 0.83)
	pt3dadd(-4, 26.33, -39.96, 0.83)
	pt3dadd(-4.17, 26.67, -39.96, 0.83)
	pt3dadd(-4.33, 26.83, -39.96, 0.83)
	pt3dadd(-4.5, 27, -39.96, 0.83)
	pt3dadd(-4.83, 27, -39.96, 0.83)
	pt3dadd(-5, 27.17, -39.96, 0.83)
	pt3dadd(-5.33, 27.33, -39.96, 0.83)
	pt3dadd(-6.67, 27.33, -39.96, 0.83)
	pt3dadd(-6.83, 27.5, -39.96, 0.83)
	pt3dadd(-7, 27.83, -39.96, 0.83)
	pt3dadd(-7.17, 28, -39.96, 0.83)
	pt3dadd(-7.17, 28.33, -39.96, 0.83)
	pt3dadd(-7.33, 28.5, -39.96, 0.83)
	pt3dadd(-7.33, 28.83, -39.96, 0.83)
	pt3dadd(-7.5, 29, -39.96, 0.83)
	pt3dadd(-7.67, 29.17, -39.96, 0.83)
	pt3dadd(-7.83, 29.5, -39.96, 0.83)
	pt3dadd(-8, 29.67, -39.96, 0.83)
	pt3dadd(-8.17, 29.67, -39.96, 0.83)
  }
  dend[635] {pt3dclear()
	pt3dadd(-8.17, 29.67, -39.96, 0.83)
	pt3dadd(-8.22, 29.63, -40.95, 0.5)
  }
  dend[636] {pt3dclear()
	pt3dadd(-8.22, 29.63, -40.95, 0.5)
	pt3dadd(-8.33, 29.58, -42.84, 0.5)
	pt3dadd(-8.17, 29.75, -42.84, 0.5)
	pt3dadd(-8.17, 30.42, -42.84, 0.5)
	pt3dadd(-8.33, 30.75, -42.84, 0.5)
	pt3dadd(-8.83, 30.75, -42.84, 0.5)
	pt3dadd(-9.17, 30.92, -42.84, 0.5)
	pt3dadd(-9.33, 31.08, -42.84, 0.5)
	pt3dadd(-9.67, 30.92, -42.84, 0.5)
	pt3dadd(-10.5, 30.92, -42.84, 0.5)
	pt3dadd(-10.83, 30.75, -42.84, 0.5)
	pt3dadd(-11.5, 30.75, -42.84, 0.5)
	pt3dadd(-11.67, 30.92, -42.84, 0.5)
	pt3dadd(-11.83, 31.08, -42.84, 0.5)
	pt3dadd(-12.33, 31.08, -42.84, 0.5)
	pt3dadd(-12.5, 31.25, -42.84, 0.5)
	pt3dadd(-12.67, 31.42, -42.84, 0.5)
	pt3dadd(-12.67, 31.75, -42.84, 0.5)
	pt3dadd(-12.83, 31.92, -45, 0.5)
	pt3dadd(-13, 32.25, -45, 0.5)
	pt3dadd(-13.17, 32.42, -45, 0.5)
	pt3dadd(-13.5, 32.42, -45, 0.5)
	pt3dadd(-13.67, 32.58, -45, 0.5)
	pt3dadd(-16.17, 32.58, -45, 0.5)
	pt3dadd(-16.32, 32.75, -45, 0.5)
	pt3dadd(-16.67, 32.75, -45, 0.5)
	pt3dadd(-16.82, 32.92, -45, 0.5)
	pt3dadd(-18.67, 32.92, -46.08, 0.5)
	pt3dadd(-19, 33.08, -45, 0.5)
	pt3dadd(-19.32, 33.25, -44.64, 0.5)
	pt3dadd(-19.5, 33.42, -44.64, 0.5)
	pt3dadd(-19.82, 33.42, -44.64, 0.5)
	pt3dadd(-20, 33.58, -44.64, 0.5)
	pt3dadd(-20.17, 33.75, -44.64, 0.5)
	pt3dadd(-22.17, 33.75, -44.64, 0.5)
  }
  dend[637] {pt3dclear()
	pt3dadd(-22.17, 33.75, -44.64, 0.5)
	pt3dadd(-22.33, 33.92, -42.48, 0.5)
	pt3dadd(-22.33, 33.25, -42.48, 0.5)
	pt3dadd(-22.5, 32.92, -42.48, 0.5)
	pt3dadd(-22.67, 32.75, -42.48, 0.5)
	pt3dadd(-22.83, 32.58, -42.48, 0.5)
	pt3dadd(-25, 32.58, -42.48, 0.5)
  }
  dend[638] {pt3dclear()
	pt3dadd(-25, 32.58, -42.48, 0.5)
	pt3dadd(-25.7, 33.28, -42.48, 0.5)
  }
  dend[639] {pt3dclear()
	pt3dadd(-25.7, 33.28, -42.48, 0.5)
	pt3dadd(-25.17, 32.75, -42.48, 0.5)
	pt3dadd(-26.17, 32.75, -42.48, 0.5)
	pt3dadd(-26.5, 32.92, -42.48, 0.5)
	pt3dadd(-26.83, 32.92, -42.48, 0.5)
	pt3dadd(-27.17, 32.75, -42.48, 0.5)
	pt3dadd(-27.33, 32.58, -42.48, 0.5)
	pt3dadd(-27.33, 32.08, -42.48, 0.5)
	pt3dadd(-27.5, 31.92, -42.48, 0.5)
	pt3dadd(-27.67, 31.75, -42.48, 0.5)
	pt3dadd(-27.83, 31.42, -42.48, 0.5)
	pt3dadd(-27.83, 31.08, -42.48, 0.5)
	pt3dadd(-28, 30.92, -42.48, 0.5)
	pt3dadd(-28.7, 30.21, -42.48, 0.5)
  }
  dend[640] {pt3dclear()
	pt3dadd(-28.7, 30.21, -42.48, 0.5)
	pt3dadd(-28.17, 30.92, -42.48, 0.5)
	pt3dadd(-28, 30.75, -42.48, 0.5)
	pt3dadd(-28.17, 30.42, -42.48, 0.5)
	pt3dadd(-28.33, 30.25, -42.48, 0.5)
	pt3dadd(-28.33, 29.92, -42.48, 0.5)
	pt3dadd(-28.5, 29.58, -42.48, 0.5)
	pt3dadd(-28.5, 28.75, -42.48, 0.5)
	pt3dadd(-28.67, 28.42, -42.48, 0.5)
	pt3dadd(-28.83, 28.25, -42.48, 0.5)
	pt3dadd(-29, 28.08, -42.48, 0.5)
	pt3dadd(-29.17, 27.92, -42.48, 0.5)
	pt3dadd(-29.33, 27.75, -42.48, 0.5)
	pt3dadd(-29.33, 27.58, -42.48, 0.5)
  }
  dend[641] {pt3dclear()
	pt3dadd(-29.33, 27.58, -42.48, 0.5)
	pt3dadd(-29.33, 27.42, -41.76, 0.5)
	pt3dadd(-29.33, 26.25, -41.76, 0.5)
	pt3dadd(-29.5, 25.92, -41.76, 0.5)
	pt3dadd(-29.5, 24.58, -41.76, 0.5)
	pt3dadd(-29.67, 24.42, -41.76, 0.5)
	pt3dadd(-29.67, 24.08, -41.76, 0.5)
	pt3dadd(-29.83, 23.92, -41.76, 0.5)
	pt3dadd(-30, 23.58, -41.76, 0.5)
	pt3dadd(-30, 23.08, -41.76, 0.5)
	pt3dadd(-30.17, 23.08, -41.76, 0.5)
  }
  dend[642] {pt3dclear()
	pt3dadd(-30.17, 23.08, -41.76, 0.5)
	pt3dadd(-30.17, 23.08, -41.04, 0.5)
	pt3dadd(-30.17, 22.75, -41.04, 0.5)
	pt3dadd(-30.33, 22.42, -41.04, 0.5)
	pt3dadd(-30.67, 22.25, -41.04, 0.5)
	pt3dadd(-30.83, 22.08, -41.04, 0.5)
	pt3dadd(-31, 21.92, -41.04, 0.5)
	pt3dadd(-31.17, 21.75, -41.04, 0.5)
	pt3dadd(-31.33, 21.58, -41.04, 0.5)
	pt3dadd(-31.5, 21.25, -41.04, 0.5)
	pt3dadd(-31.67, 21.08, -41.04, 0.5)
	pt3dadd(-31.83, 20.92, -41.04, 0.5)
	pt3dadd(-32, 20.75, -41.04, 0.5)
	pt3dadd(-32.5, 20.75, -41.04, 0.5)
	pt3dadd(-32.5, 20.58, -41.04, 0.5)
  }
  dend[643] {pt3dclear()
	pt3dadd(-32.5, 20.58, -41.04, 0.5)
	pt3dadd(-32.33, 20.58, -41.4, 0.5)
	pt3dadd(-32.67, 20.42, -41.4, 0.5)
	pt3dadd(-33, 20.25, -41.4, 0.5)
	pt3dadd(-33.33, 19.92, -41.4, 0.5)
	pt3dadd(-33.67, 19.75, -41.4, 0.5)
	pt3dadd(-33.83, 19.57, -41.4, 0.5)
  }
}
proc shape3d_58() {
  dend[643] {	pt3dadd(-34.17, 19.57, -41.4, 0.5)
	pt3dadd(-34.33, 19.42, -41.4, 0.5)
	pt3dadd(-34.5, 19.25, -41.4, 0.5)
	pt3dadd(-34.67, 19.07, -41.4, 0.5)
	pt3dadd(-35, 19.07, -41.4, 0.5)
	pt3dadd(-35, 18.92, -41.4, 0.5)
  }
  dend[644] {pt3dclear()
	pt3dadd(-35, 18.92, -41.4, 0.5)
	pt3dadd(-34.83, 18.75, -42.12, 0.5)
	pt3dadd(-35, 18.92, -42.12, 0.5)
	pt3dadd(-35.17, 18.75, -42.12, 0.5)
	pt3dadd(-35.5, 18.57, -42.12, 0.5)
	pt3dadd(-35.83, 18.42, -42.12, 0.5)
	pt3dadd(-36.17, 18.25, -42.12, 0.5)
	pt3dadd(-36.5, 18.25, -42.12, 0.5)
	pt3dadd(-36.67, 18.07, -42.12, 0.5)
	pt3dadd(-37.33, 18.07, -42.12, 0.5)
	pt3dadd(-37.5, 17.92, -42.12, 0.5)
	pt3dadd(-38, 17.92, -42.12, 0.5)
	pt3dadd(-38.17, 18.07, -42.12, 0.5)
	pt3dadd(-38.5, 18.07, -42.12, 0.5)
  }
  dend[645] {pt3dclear()
	pt3dadd(-38.5, 18.07, -42.12, 0.5)
	pt3dadd(-38.83, 18.25, -42.12, 0.5)
	pt3dadd(-39.67, 18.25, -42.12, 0.5)
	pt3dadd(-40, 18.07, -42.12, 0.5)
	pt3dadd(-41.17, 18.07, -42.12, 0.5)
	pt3dadd(-41.33, 17.92, -42.12, 0.5)
	pt3dadd(-41.67, 17.92, -42.12, 0.5)
	pt3dadd(-41.83, 17.75, -42.12, 0.5)
	pt3dadd(-42, 17.57, -42.12, 0.5)
	pt3dadd(-42.17, 17.42, -42.12, 0.5)
	pt3dadd(-42.5, 17.42, -42.12, 0.5)
	pt3dadd(-42.83, 17.25, -42.12, 0.5)
	pt3dadd(-42.83, 17.07, -42.12, 0.5)
  }
  dend[646] {pt3dclear()
	pt3dadd(-38.5, 18.07, -42.12, 0.5)
	pt3dadd(-38, 18.07, -42.12, 0.5)
	pt3dadd(-38.17, 18.25, -42.12, 0.5)
	pt3dadd(-38.33, 18.57, -42.12, 0.5)
	pt3dadd(-38.5, 18.75, -42.12, 0.5)
	pt3dadd(-39, 18.92, -42.12, 0.5)
	pt3dadd(-39.33, 19.07, -42.12, 0.5)
	pt3dadd(-39.5, 19.25, -42.12, 0.5)
	pt3dadd(-39.83, 19.42, -42.12, 0.5)
	pt3dadd(-40, 19.75, -42.12, 0.5)
	pt3dadd(-40.17, 19.92, -42.12, 0.5)
	pt3dadd(-40.33, 20.07, -42.12, 0.5)
	pt3dadd(-40.67, 20.07, -42.12, 0.5)
	pt3dadd(-40.83, 20.25, -42.12, 0.5)
  }
  dend[647] {pt3dclear()
	pt3dadd(-35, 18.92, -41.4, 0.5)
	pt3dadd(-34.83, 18.75, -41.4, 0.5)
	pt3dadd(-34.83, 17.57, -41.4, 0.5)
	pt3dadd(-35.17, 17.42, -41.4, 0.5)
  }
  dend[648] {pt3dclear()
	pt3dadd(-35.17, 17.42, -41.4, 0.5)
	pt3dadd(-35.17, 17.42, -41.04, 0.5)
	pt3dadd(-35.5, 17.25, -41.04, 0.5)
	pt3dadd(-35.67, 17.07, -41.04, 0.5)
	pt3dadd(-36.17, 16.57, -41.04, 0.5)
	pt3dadd(-36.17, 15.25, -41.04, 0.5)
	pt3dadd(-36.33, 15.08, -41.04, 0.5)
	pt3dadd(-36.5, 14.92, -41.04, 0.5)
  }
  dend[649] {pt3dclear()
	pt3dadd(-35.17, 17.42, -41.4, 0.5)
	pt3dadd(-35.17, 17.25, -41.4, 0.5)
	pt3dadd(-35, 16.92, -41.4, 0.5)
	pt3dadd(-34.83, 16.57, -41.4, 0.5)
	pt3dadd(-34.67, 16.25, -41.4, 0.5)
	pt3dadd(-34.5, 15.92, -41.4, 0.5)
	pt3dadd(-34.33, 15.75, -41.4, 0.5)
	pt3dadd(-34.33, 15.25, -41.4, 0.5)
	pt3dadd(-34.17, 15.25, -41.4, 0.5)
  }
  dend[650] {pt3dclear()
	pt3dadd(-32.5, 20.58, -41.04, 0.5)
	pt3dadd(-32.17, 20.92, -41.04, 0.5)
	pt3dadd(-32, 20.58, -41.04, 0.5)
	pt3dadd(-32, 18.75, -41.04, 0.5)
	pt3dadd(-32.17, 18.42, -41.04, 0.5)
	pt3dadd(-32.33, 18.25, -41.04, 0.5)
	pt3dadd(-32.33, 17.57, -41.04, 0.5)
	pt3dadd(-33.33, 17.57, -41.04, 0.5)
  }
  dend[651] {pt3dclear()
	pt3dadd(-33.33, 17.57, -41.04, 0.5)
	pt3dadd(-32.5, 17.42, -40.68, 0.5)
	pt3dadd(-32.67, 17.25, -40.68, 0.5)
	pt3dadd(-32.67, 16.25, -40.68, 0.5)
	pt3dadd(-32.83, 16.07, -40.68, 0.5)
	pt3dadd(-32.83, 14.25, -40.68, 0.5)
	pt3dadd(-32.67, 14.08, -40.68, 0.5)
	pt3dadd(-32.5, 13.75, -40.68, 0.5)
	pt3dadd(-32.33, 13.58, -40.68, 0.5)
	pt3dadd(-32.5, 13.42, -40.68, 0.5)
  }
  dend[652] {pt3dclear()
	pt3dadd(-33.33, 17.57, -41.04, 0.5)
	pt3dadd(-32.5, 17.57, -41.04, 0.5)
	pt3dadd(-32.33, 17.42, -41.04, 0.5)
	pt3dadd(-32.17, 17.25, -41.04, 0.5)
	pt3dadd(-32, 17.07, -41.04, 0.5)
	pt3dadd(-31.83, 16.92, -41.04, 0.5)
	pt3dadd(-31.5, 16.75, -41.04, 0.5)
	pt3dadd(-30.83, 16.75, -41.04, 0.5)
	pt3dadd(-30.67, 16.57, -41.04, 0.5)
	pt3dadd(-30.33, 16.42, -41.04, 0.5)
	pt3dadd(-30.33, 16.25, -41.04, 0.5)
  }
  dend[653] {pt3dclear()
	pt3dadd(-30.17, 23.08, -41.76, 0.5)
	pt3dadd(-29.83, 23.08, -41.76, 0.5)
	pt3dadd(-29.67, 22.92, -41.76, 0.5)
	pt3dadd(-29.67, 22.42, -41.76, 0.5)
	pt3dadd(-29.5, 22.25, -41.76, 0.5)
	pt3dadd(-29, 21.75, -41.76, 0.5)
	pt3dadd(-28.83, 21.58, -41.76, 0.5)
	pt3dadd(-28.5, 21.58, -41.76, 0.5)
	pt3dadd(-28.33, 21.42, -41.76, 0.5)
	pt3dadd(-28.17, 21.25, -41.76, 0.5)
	pt3dadd(-28.33, 21.25, -41.76, 0.5)
  }
  dend[654] {pt3dclear()
	pt3dadd(-29.33, 27.58, -42.48, 0.5)
	pt3dadd(-29, 27.58, -42.48, 0.5)
	pt3dadd(-29.83, 27.58, -42.48, 0.5)
	pt3dadd(-30, 27.42, -42.48, 0.5)
	pt3dadd(-30.17, 27.25, -42.12, 0.5)
	pt3dadd(-30.33, 27.25, -40.32, 0.5)
	pt3dadd(-30.67, 27.08, -40.32, 0.5)
	pt3dadd(-30.83, 26.92, -40.32, 0.5)
	pt3dadd(-31, 26.75, -40.32, 0.5)
	pt3dadd(-31.33, 26.58, -40.32, 0.5)
	pt3dadd(-31.5, 26.42, -40.32, 0.5)
	pt3dadd(-31.67, 26.25, -40.32, 0.5)
	pt3dadd(-32, 26.25, -40.32, 0.5)
	pt3dadd(-32.33, 26.08, -40.32, 0.5)
	pt3dadd(-32.83, 26.08, -40.32, 0.5)
	pt3dadd(-33, 25.92, -40.32, 0.5)
	pt3dadd(-33.5, 25.92, -40.32, 0.5)
	pt3dadd(-33.67, 26.08, -40.32, 0.5)
	pt3dadd(-33.83, 26.08, -40.32, 0.5)
  }
  dend[655] {pt3dclear()
	pt3dadd(-33.83, 26.08, -40.32, 0.5)
	pt3dadd(-33.83, 25.67, -39.4, 0.5)
  }
  dend[656] {pt3dclear()
	pt3dadd(-33.83, 25.67, -39.4, 0.5)
	pt3dadd(-33.83, 25.92, -39.96, 0.5)
	pt3dadd(-33.83, 26.08, -39.96, 0.5)
	pt3dadd(-34.17, 26.25, -39.96, 0.5)
	pt3dadd(-34.67, 26.42, -39.96, 0.5)
	pt3dadd(-34.83, 26.75, -39.96, 0.5)
	pt3dadd(-35.83, 26.75, -39.96, 0.5)
	pt3dadd(-36, 26.92, -39.96, 0.5)
	pt3dadd(-36.33, 27.08, -39.96, 0.5)
	pt3dadd(-36.83, 27.08, -39.96, 0.5)
	pt3dadd(-37.17, 27.25, -39.96, 0.5)
	pt3dadd(-38.33, 27.25, -39.96, 0.5)
	pt3dadd(-38.5, 27.42, -39.96, 0.5)
	pt3dadd(-39.5, 27.42, -39.96, 0.5)
	pt3dadd(-39.67, 27.58, -39.96, 0.5)
	pt3dadd(-40, 27.58, -41.76, 0.5)
	pt3dadd(-40.17, 27.75, -40.68, 0.5)
	pt3dadd(-41.17, 27.75, -40.68, 0.5)
	pt3dadd(-41.33, 27.92, -40.68, 0.5)
	pt3dadd(-41.83, 27.92, -40.68, 0.5)
	pt3dadd(-42, 28.08, -40.68, 0.5)
  }
  dend[657] {pt3dclear()
	pt3dadd(-42, 28.08, -40.68, 0.5)
	pt3dadd(-41.67, 28.08, -40.32, 0.5)
	pt3dadd(-41.83, 28.42, -40.32, 0.5)
	pt3dadd(-42, 28.58, -40.32, 0.5)
	pt3dadd(-42.17, 28.75, -40.32, 0.5)
	pt3dadd(-42.33, 29.08, -40.32, 0.5)
	pt3dadd(-42.5, 29.42, -40.32, 0.5)
	pt3dadd(-42.67, 29.58, -40.32, 0.5)
	pt3dadd(-42.83, 29.75, -40.32, 0.5)
	pt3dadd(-42.83, 30.08, -40.32, 0.5)
	pt3dadd(-43, 30.25, -40.32, 0.5)
	pt3dadd(-43.17, 30.58, -40.32, 0.5)
	pt3dadd(-43.17, 31.08, -40.32, 0.5)
	pt3dadd(-43.33, 31.42, -40.32, 0.5)
	pt3dadd(-43.33, 31.92, -40.32, 0.5)
	pt3dadd(-43.5, 32.25, -40.32, 0.5)
	pt3dadd(-43.67, 32.42, -40.32, 0.5)
	pt3dadd(-43.83, 32.58, -40.32, 0.5)
	pt3dadd(-44.17, 32.75, -40.32, 0.5)
	pt3dadd(-44.83, 32.75, -40.32, 0.5)
	pt3dadd(-45, 32.58, -40.32, 0.5)
	pt3dadd(-45.17, 32.25, -40.32, 0.5)
	pt3dadd(-45.33, 32.08, -40.32, 0.5)
	pt3dadd(-45.5, 31.92, -40.32, 0.5)
	pt3dadd(-45.5, 31.42, -40.32, 0.5)
	pt3dadd(-45.67, 31.25, -40.32, 0.5)
	pt3dadd(-45.83, 31.08, -40.32, 0.5)
	pt3dadd(-45.83, 30.92, -40.32, 0.5)
  }
  dend[658] {pt3dclear()
	pt3dadd(-42, 28.08, -40.68, 0.5)
	pt3dadd(-41.83, 28.25, -42.12, 0.5)
	pt3dadd(-42, 28.08, -42.12, 0.5)
	pt3dadd(-42.67, 28.08, -42.12, 0.5)
	pt3dadd(-42.83, 27.92, -42.12, 0.5)
	pt3dadd(-43.33, 27.92, -42.12, 0.5)
	pt3dadd(-43.67, 28.08, -42.12, 0.5)
	pt3dadd(-45.5, 28.08, -42.12, 0.5)
	pt3dadd(-45.5, 27.92, -42.12, 0.5)
  }
  dend[659] {pt3dclear()
	pt3dadd(-33.83, 25.67, -39.4, 0.5)
	pt3dadd(-33.83, 26.08, -39.96, 0.5)
	pt3dadd(-34, 25.75, -39.6, 0.5)
	pt3dadd(-34.17, 25.58, -39.6, 0.5)
	pt3dadd(-34.33, 25.42, -39.6, 0.5)
	pt3dadd(-34.67, 25.25, -39.6, 0.5)
	pt3dadd(-34.83, 25.08, -39.6, 0.5)
	pt3dadd(-35.67, 25.08, -39.6, 0.5)
	pt3dadd(-35.83, 24.92, -39.6, 0.5)
	pt3dadd(-37, 24.92, -40.68, 0.5)
	pt3dadd(-37.17, 25.08, -40.68, 0.5)
	pt3dadd(-38.5, 25.08, -39.6, 0.5)
	pt3dadd(-39.17, 24.92, -39.6, 0.5)
  }
}
proc shape3d_59() {
  dend[659] {	pt3dadd(-39.67, 24.92, -39.6, 0.5)
	pt3dadd(-40, 25.08, -39.6, 0.5)
	pt3dadd(-40.17, 25.25, -39.6, 0.5)
	pt3dadd(-40.17, 25.42, -39.6, 0.5)
  }
  dend[660] {pt3dclear()
	pt3dadd(-33.83, 26.08, -40.32, 0.5)
	pt3dadd(-33.5, 25.92, -40.32, 0.5)
	pt3dadd(-33.5, 25.58, -40.32, 0.5)
	pt3dadd(-33.33, 25.25, -40.32, 0.5)
	pt3dadd(-33.5, 25.08, -40.32, 0.5)
	pt3dadd(-33.5, 24.75, -40.32, 0.5)
	pt3dadd(-33.67, 24.58, -40.32, 0.5)
	pt3dadd(-33.83, 24.42, -40.32, 0.5)
	pt3dadd(-34.17, 24.08, -40.32, 0.5)
	pt3dadd(-34.17, 22.75, -40.32, 0.5)
	pt3dadd(-34, 22.75, -40.32, 0.5)
  }
  dend[661] {pt3dclear()
	pt3dadd(-28.7, 30.21, -42.48, 0.5)
	pt3dadd(-28.17, 30.75, -42.48, 0.5)
	pt3dadd(-28.5, 30.92, -42.48, 0.5)
	pt3dadd(-28.83, 30.92, -42.48, 0.5)
	pt3dadd(-29, 31.08, -42.48, 0.5)
	pt3dadd(-29.17, 31.25, -42.48, 0.5)
	pt3dadd(-29.67, 31.25, -42.48, 0.5)
	pt3dadd(-29.83, 31.42, -42.48, 0.5)
	pt3dadd(-30, 31.42, -42.48, 0.5)
  }
  dend[662] {pt3dclear()
	pt3dadd(-30, 31.42, -42.48, 0.5)
	pt3dadd(-29.83, 31.58, -42.48, 0.5)
	pt3dadd(-30.17, 31.75, -42.48, 0.5)
	pt3dadd(-30.5, 31.92, -42.48, 0.5)
	pt3dadd(-30.83, 31.92, -42.48, 0.5)
	pt3dadd(-31, 32.08, -42.48, 0.5)
	pt3dadd(-32.5, 32.08, -42.48, 0.5)
	pt3dadd(-32.67, 32.25, -42.48, 0.5)
	pt3dadd(-33, 32.25, -42.48, 0.5)
  }
  dend[663] {pt3dclear()
	pt3dadd(-33, 32.25, -42.48, 0.5)
	pt3dadd(-33, 32.42, -42.48, 0.5)
	pt3dadd(-33.17, 32.75, -42.48, 0.5)
	pt3dadd(-33.33, 32.92, -42.48, 0.5)
	pt3dadd(-33.33, 33.25, -42.48, 0.5)
	pt3dadd(-33.5, 33.42, -42.48, 0.5)
	pt3dadd(-33.5, 33.75, -42.48, 0.5)
	pt3dadd(-33.67, 33.92, -43.92, 0.5)
	pt3dadd(-33.83, 34.08, -43.92, 0.5)
	pt3dadd(-34, 34.25, -43.92, 0.5)
	pt3dadd(-34.17, 34.42, -43.92, 0.5)
	pt3dadd(-34.33, 34.58, -43.92, 0.5)
	pt3dadd(-34.5, 34.75, -43.92, 0.5)
	pt3dadd(-34.67, 34.92, -43.92, 0.5)
	pt3dadd(-34.83, 35.08, -43.92, 0.5)
	pt3dadd(-35, 35.42, -43.92, 0.5)
	pt3dadd(-35.17, 35.58, -43.92, 0.5)
	pt3dadd(-35.17, 35.92, -43.92, 0.5)
	pt3dadd(-35.5, 36.25, -43.92, 0.5)
	pt3dadd(-35.67, 36.58, -43.92, 0.5)
	pt3dadd(-35.83, 36.75, -43.92, 0.5)
	pt3dadd(-36, 37.08, -43.92, 0.5)
	pt3dadd(-36.17, 37.25, -43.92, 0.5)
	pt3dadd(-36.33, 37.58, -43.92, 0.5)
	pt3dadd(-36.5, 37.75, -43.92, 0.5)
	pt3dadd(-36.67, 37.92, -43.92, 0.5)
	pt3dadd(-36.67, 38.25, -43.92, 0.5)
	pt3dadd(-36.83, 38.42, -43.92, 0.5)
	pt3dadd(-37, 38.75, -43.92, 0.5)
	pt3dadd(-37, 39.25, -43.92, 0.5)
	pt3dadd(-37.17, 39.42, -43.92, 0.5)
	pt3dadd(-37.33, 39.58, -43.92, 0.5)
	pt3dadd(-37.5, 39.75, -43.92, 0.5)
	pt3dadd(-37.5, 39.92, -43.92, 0.5)
  }
  dend[664] {pt3dclear()
	pt3dadd(-37.5, 39.92, -43.92, 0.5)
	pt3dadd(-37.33, 40.25, -43.92, 0.5)
	pt3dadd(-37.33, 40.58, -43.92, 0.5)
	pt3dadd(-37.5, 40.75, -43.92, 0.5)
	pt3dadd(-37.67, 41.08, -43.92, 0.5)
	pt3dadd(-37.83, 41.25, -43.92, 0.5)
	pt3dadd(-38, 41.58, -43.92, 0.5)
	pt3dadd(-38.17, 41.75, -43.92, 0.5)
	pt3dadd(-38.17, 42.08, -43.92, 0.5)
	pt3dadd(-38.33, 42.25, -43.92, 0.5)
	pt3dadd(-38.5, 42.42, -43.92, 0.5)
	pt3dadd(-38.67, 42.58, -43.92, 0.5)
	pt3dadd(-39.33, 42.58, -43.92, 0.5)
	pt3dadd(-39.17, 42.75, -42.84, 0.5)
	pt3dadd(-39.33, 42.75, -42.84, 0.5)
  }
  dend[665] {pt3dclear()
	pt3dadd(-37.5, 39.92, -43.92, 0.5)
	pt3dadd(-37.33, 39.92, -43.92, 0.5)
	pt3dadd(-37.67, 40.08, -43.92, 0.5)
	pt3dadd(-38, 40.08, -43.92, 0.5)
	pt3dadd(-38.33, 40.25, -43.92, 0.5)
	pt3dadd(-39.17, 40.25, -43.92, 0.5)
	pt3dadd(-39.67, 40.42, -41.04, 0.5)
	pt3dadd(-40.83, 40.42, -41.04, 0.5)
	pt3dadd(-41, 40.75, -41.04, 0.5)
	pt3dadd(-41.17, 41.08, -41.04, 0.5)
	pt3dadd(-41.33, 41.25, -41.04, 0.5)
	pt3dadd(-41.5, 41.42, -41.04, 0.5)
	pt3dadd(-41.67, 41.58, -41.04, 0.5)
	pt3dadd(-41.83, 41.75, -41.04, 0.5)
	pt3dadd(-42.17, 42.08, -41.04, 0.5)
	pt3dadd(-42.5, 42.25, -41.04, 0.5)
	pt3dadd(-42.83, 42.25, -41.04, 0.5)
	pt3dadd(-43, 42.42, -41.04, 0.5)
	pt3dadd(-43.17, 42.58, -41.04, 0.5)
	pt3dadd(-43.5, 42.58, -41.04, 0.5)
	pt3dadd(-43.83, 42.75, -41.04, 0.5)
	pt3dadd(-44.17, 42.92, -41.04, 0.5)
	pt3dadd(-45.67, 42.92, -41.04, 0.5)
  }
  dend[666] {pt3dclear()
	pt3dadd(-45.67, 42.92, -41.04, 0.5)
	pt3dadd(-45.33, 42.92, -40.68, 0.5)
	pt3dadd(-46.17, 42.92, -40.68, 0.5)
	pt3dadd(-46.5, 42.75, -40.68, 0.5)
	pt3dadd(-47.17, 42.75, -40.68, 0.5)
	pt3dadd(-47.5, 42.92, -40.68, 0.5)
	pt3dadd(-47.83, 42.92, -40.68, 0.5)
	pt3dadd(-48, 43.25, -40.68, 0.5)
	pt3dadd(-48.17, 43.25, -40.68, 0.5)
  }
  dend[667] {pt3dclear()
	pt3dadd(-45.67, 42.92, -41.04, 0.5)
	pt3dadd(-45.17, 43.08, -41.04, 0.5)
	pt3dadd(-45.17, 43.42, -41.04, 0.5)
	pt3dadd(-45.33, 43.58, -41.04, 0.5)
	pt3dadd(-45.67, 43.58, -41.04, 0.5)
	pt3dadd(-45.83, 43.75, -41.04, 0.5)
	pt3dadd(-46, 44.08, -41.04, 0.5)
	pt3dadd(-46.17, 44.42, -41.04, 0.5)
	pt3dadd(-46.5, 44.42, -41.04, 0.5)
  }
  dend[668] {pt3dclear()
	pt3dadd(-33, 32.25, -42.48, 0.5)
	pt3dadd(-32.67, 32.25, -42.48, 0.5)
	pt3dadd(-33, 32.25, -42.48, 0.5)
	pt3dadd(-33.17, 32.08, -42.48, 0.5)
	pt3dadd(-33.5, 31.92, -42.48, 0.5)
	pt3dadd(-34.17, 31.92, -42.48, 0.5)
	pt3dadd(-34.5, 31.75, -42.48, 0.5)
	pt3dadd(-36, 31.75, -42.48, 0.5)
	pt3dadd(-36.33, 32.08, -42.48, 0.5)
	pt3dadd(-36.5, 32.25, -42.48, 0.5)
	pt3dadd(-36.67, 32.58, -42.48, 0.5)
	pt3dadd(-36.83, 32.75, -42.48, 0.5)
	pt3dadd(-36.83, 33.42, -42.48, 0.5)
	pt3dadd(-37, 33.75, -42.48, 0.5)
	pt3dadd(-37, 34.42, -42.48, 0.5)
	pt3dadd(-37.17, 34.58, -42.48, 0.5)
	pt3dadd(-37.33, 34.92, -42.48, 0.5)
	pt3dadd(-38.05, 35.6, -42.48, 0.5)
  }
  dend[669] {pt3dclear()
	pt3dadd(-38.05, 35.6, -42.48, 0.5)
	pt3dadd(-37.5, 35.08, -42.48, 0.5)
	pt3dadd(-37.5, 35.58, -42.48, 0.5)
	pt3dadd(-37.67, 35.75, -42.48, 0.5)
	pt3dadd(-38, 36.08, -42.48, 0.5)
	pt3dadd(-38.17, 36.25, -42.48, 0.5)
	pt3dadd(-38.33, 36.42, -42.48, 0.5)
	pt3dadd(-38.5, 36.58, -42.48, 0.5)
	pt3dadd(-38.83, 36.75, -42.48, 0.5)
	pt3dadd(-39, 36.92, -42.48, 0.5)
	pt3dadd(-39.83, 36.92, -42.48, 0.5)
	pt3dadd(-39.83, 37.08, -42.48, 0.5)
  }
  dend[670] {pt3dclear()
	pt3dadd(-39.83, 37.08, -42.48, 0.5)
	pt3dadd(-39.67, 37.08, -42.48, 0.5)
	pt3dadd(-42.17, 37.08, -42.48, 0.5)
	pt3dadd(-42.33, 37.25, -42.48, 0.5)
	pt3dadd(-42.5, 37.42, -42.48, 0.5)
	pt3dadd(-42.67, 37.58, -42.48, 0.5)
	pt3dadd(-42.83, 37.75, -42.48, 0.5)
	pt3dadd(-42.83, 38.08, -42.48, 0.5)
	pt3dadd(-43, 38.08, -42.48, 0.5)
  }
  dend[671] {pt3dclear()
	pt3dadd(-39.83, 37.08, -42.48, 0.5)
	pt3dadd(-39, 37.08, -42.48, 0.5)
	pt3dadd(-39.17, 37.25, -42.48, 0.5)
	pt3dadd(-39.5, 37.42, -42.48, 0.5)
	pt3dadd(-39.83, 37.58, -42.48, 0.5)
	pt3dadd(-40, 37.75, -42.48, 0.5)
	pt3dadd(-40.17, 37.92, -42.48, 0.5)
	pt3dadd(-40.17, 38.42, -42.48, 0.5)
	pt3dadd(-40.33, 38.58, -42.48, 0.5)
	pt3dadd(-40.33, 39.08, -42.48, 0.5)
  }
  dend[672] {pt3dclear()
	pt3dadd(-38.05, 35.6, -42.48, 0.5)
	pt3dadd(-36.5, 34.92, -42.48, 0.5)
	pt3dadd(-36.5, 36.25, -42.48, 0.5)
	pt3dadd(-36.33, 36.58, -42.48, 0.5)
	pt3dadd(-36, 36.92, -42.48, 0.5)
	pt3dadd(-35.83, 37.08, -42.48, 0.5)
	pt3dadd(-35.67, 37.25, -42.48, 0.5)
	pt3dadd(-35.5, 37.42, -42.48, 0.5)
	pt3dadd(-35.17, 37.58, -42.48, 0.5)
	pt3dadd(-35, 37.75, -42.48, 0.5)
	pt3dadd(-34.83, 37.92, -42.48, 0.5)
	pt3dadd(-34.67, 38.25, -42.48, 0.5)
	pt3dadd(-34.5, 38.42, -42.48, 0.5)
	pt3dadd(-34.5, 38.58, -42.48, 0.5)
  }
  dend[673] {pt3dclear()
	pt3dadd(-30, 31.42, -42.48, 0.5)
	pt3dadd(-29.33, 31.58, -42.48, 0.5)
	pt3dadd(-29.5, 31.42, -42.48, 0.5)
	pt3dadd(-29.83, 31.25, -42.48, 0.5)
	pt3dadd(-30.17, 31.08, -42.48, 0.5)
	pt3dadd(-30.33, 30.92, -42.48, 0.5)
	pt3dadd(-30.67, 30.75, -42.48, 0.5)
	pt3dadd(-30.83, 30.58, -42.48, 0.5)
	pt3dadd(-31, 30.42, -42.48, 0.5)
	pt3dadd(-31.17, 30.58, -42.12, 0.5)
	pt3dadd(-31.17, 30.42, -41.76, 0.5)
	pt3dadd(-31.5, 30.25, -41.76, 0.5)
	pt3dadd(-32, 30.25, -41.76, 0.5)
	pt3dadd(-32.33, 30.08, -41.76, 0.5)
  }
}
proc shape3d_60() {
  dend[673] {	pt3dadd(-33.33, 30.08, -41.76, 0.5)
	pt3dadd(-33.5, 29.92, -41.76, 0.5)
	pt3dadd(-33.83, 29.92, -41.76, 0.5)
	pt3dadd(-34.17, 29.75, -41.76, 0.5)
	pt3dadd(-36, 29.75, -41.76, 0.5)
	pt3dadd(-36.17, 29.92, -41.76, 0.5)
	pt3dadd(-36.33, 30.08, -41.76, 0.5)
	pt3dadd(-36.5, 30.25, -41.76, 0.5)
	pt3dadd(-37, 30.25, -41.76, 0.5)
	pt3dadd(-37.17, 30.42, -41.76, 0.5)
	pt3dadd(-37.5, 30.42, -41.76, 0.5)
	pt3dadd(-37.67, 30.58, -41.76, 0.5)
	pt3dadd(-38, 30.58, -41.76, 0.5)
  }
  dend[674] {pt3dclear()
	pt3dadd(-38, 30.58, -41.76, 0.5)
	pt3dadd(-38.17, 30.58, -41.04, 0.5)
	pt3dadd(-38.5, 30.58, -41.04, 0.5)
	pt3dadd(-38.83, 30.42, -41.04, 0.5)
	pt3dadd(-39.17, 30.42, -41.04, 0.5)
	pt3dadd(-39.33, 30.25, -41.04, 0.5)
	pt3dadd(-40.33, 30.25, -41.04, 0.5)
	pt3dadd(-40.67, 30.08, -41.04, 0.5)
	pt3dadd(-41, 30.08, -41.04, 0.5)
	pt3dadd(-41.17, 30.25, -41.04, 0.5)
	pt3dadd(-41.33, 30.42, -41.04, 0.5)
	pt3dadd(-41.67, 30.42, -41.04, 0.5)
	pt3dadd(-41.83, 30.58, -41.04, 0.5)
	pt3dadd(-42.17, 30.58, -41.04, 0.5)
	pt3dadd(-42.33, 30.75, -41.04, 0.5)
	pt3dadd(-42.5, 30.92, -41.04, 0.5)
  }
  dend[675] {pt3dclear()
	pt3dadd(-38, 30.58, -41.76, 0.5)
	pt3dadd(-38, 30.75, -43.2, 0.5)
	pt3dadd(-37.83, 30.92, -43.2, 0.5)
	pt3dadd(-37.83, 31.58, -43.2, 0.5)
	pt3dadd(-38, 31.75, -43.2, 0.5)
	pt3dadd(-37.33, 31.75, -43.2, 0.5)
	pt3dadd(-37.17, 31.92, -43.2, 0.5)
  }
  dend[676] {pt3dclear()
	pt3dadd(-25.7, 33.28, -42.48, 0.5)
	pt3dadd(-25.33, 32.58, -42.48, 0.5)
	pt3dadd(-25.5, 32.92, -42.48, 0.5)
	pt3dadd(-25.83, 33.08, -42.48, 0.5)
	pt3dadd(-26, 33.42, -42.48, 0.5)
	pt3dadd(-26.17, 33.58, -42.48, 0.5)
	pt3dadd(-26.33, 33.75, -42.48, 0.5)
	pt3dadd(-26.5, 33.92, -42.48, 0.5)
	pt3dadd(-26.67, 34.08, -42.48, 0.5)
	pt3dadd(-26.83, 34.25, -42.48, 0.5)
	pt3dadd(-27.33, 34.42, -42.48, 0.5)
	pt3dadd(-28, 34.58, -42.48, 0.5)
	pt3dadd(-28.17, 34.75, -42.48, 0.5)
	pt3dadd(-28.33, 34.92, -42.48, 0.5)
	pt3dadd(-28.5, 35.25, -42.48, 0.5)
	pt3dadd(-29.2, 34.54, -42.48, 0.5)
  }
  dend[677] {pt3dclear()
	pt3dadd(-29.2, 34.54, -42.48, 0.5)
	pt3dadd(-28.67, 35.08, -42.48, 0.5)
	pt3dadd(-28.83, 35.25, -42.48, 0.5)
	pt3dadd(-29.33, 35.25, -42.48, 0.5)
	pt3dadd(-29.67, 35.42, -42.48, 0.5)
	pt3dadd(-29.83, 35.58, -42.48, 0.5)
	pt3dadd(-30.33, 35.58, -42.48, 0.5)
	pt3dadd(-30.67, 35.75, -42.48, 0.5)
	pt3dadd(-31, 35.92, -42.48, 0.5)
	pt3dadd(-31.17, 36.08, -42.48, 0.5)
	pt3dadd(-31.33, 36.25, -42.48, 0.5)
	pt3dadd(-31.67, 36.25, -42.48, 0.5)
	pt3dadd(-31.83, 36.42, -42.48, 0.5)
	pt3dadd(-32, 36.58, -42.48, 0.5)
  }
  dend[678] {pt3dclear()
	pt3dadd(-32, 36.58, -42.48, 0.5)
	pt3dadd(-31.67, 36.42, -42.48, 0.5)
	pt3dadd(-32, 36.42, -42.48, 0.5)
	pt3dadd(-32.33, 36.58, -42.48, 0.5)
	pt3dadd(-33.67, 36.58, -42.48, 0.5)
	pt3dadd(-33.83, 36.75, -42.48, 0.5)
	pt3dadd(-34.67, 36.75, -42.48, 0.5)
  }
  dend[679] {pt3dclear()
	pt3dadd(-32, 36.58, -42.48, 0.5)
	pt3dadd(-31.83, 36.58, -42.48, 0.5)
	pt3dadd(-32, 36.92, -42.48, 0.5)
	pt3dadd(-32.17, 37.08, -42.48, 0.5)
	pt3dadd(-32.33, 37.25, -42.48, 0.5)
	pt3dadd(-32.33, 37.58, -42.48, 0.5)
	pt3dadd(-32.5, 37.92, -42.48, 0.5)
	pt3dadd(-32.33, 38.08, -42.48, 0.5)
	pt3dadd(-32.17, 38.42, -42.48, 0.5)
	pt3dadd(-31.83, 38.58, -42.48, 0.5)
	pt3dadd(-31.67, 38.75, -42.48, 0.5)
	pt3dadd(-31.5, 38.92, -42.48, 0.5)
  }
  dend[680] {pt3dclear()
	pt3dadd(-29.2, 34.54, -42.48, 0.5)
	pt3dadd(-28.5, 35.42, -42.48, 0.5)
	pt3dadd(-28.5, 35.75, -42.48, 0.5)
	pt3dadd(-28.67, 36.08, -42.48, 0.5)
	pt3dadd(-28.83, 36.25, -42.48, 0.5)
	pt3dadd(-29, 36.42, -42.48, 0.5)
	pt3dadd(-29.17, 36.58, -42.48, 0.5)
	pt3dadd(-29.33, 36.75, -42.48, 0.5)
	pt3dadd(-29.5, 36.92, -42.48, 0.5)
	pt3dadd(-29.5, 37.58, -42.48, 0.5)
	pt3dadd(-29.67, 37.75, -42.48, 0.5)
	pt3dadd(-29.67, 38.92, -42.48, 0.5)
	pt3dadd(-29.83, 39.08, -42.48, 0.5)
	pt3dadd(-29.83, 39.42, -42.48, 0.5)
	pt3dadd(-30, 39.75, -42.48, 0.5)
	pt3dadd(-30, 40.08, -42.48, 0.5)
	pt3dadd(-30.17, 40.25, -42.48, 0.5)
	pt3dadd(-30.33, 40.42, -42.48, 0.5)
  }
  dend[681] {pt3dclear()
	pt3dadd(-25, 32.58, -42.48, 0.5)
	pt3dadd(-24.67, 32.75, -42.48, 0.5)
	pt3dadd(-24.5, 32.58, -42.48, 0.5)
	pt3dadd(-24.33, 32.25, -42.48, 0.5)
	pt3dadd(-24.17, 32.08, -42.48, 0.5)
	pt3dadd(-24.17, 31.75, -42.48, 0.5)
	pt3dadd(-24, 31.58, -42.48, 0.5)
	pt3dadd(-24, 31.08, -42.48, 0.5)
	pt3dadd(-24.17, 30.75, -42.48, 0.5)
	pt3dadd(-24.33, 30.58, -42.48, 0.5)
	pt3dadd(-24.5, 30.42, -42.48, 0.5)
	pt3dadd(-24.67, 30.25, -42.48, 0.5)
	pt3dadd(-24.83, 30.08, -42.48, 0.5)
	pt3dadd(-24.83, 29.75, -42.48, 0.5)
	pt3dadd(-25, 29.58, -42.48, 0.5)
	pt3dadd(-25.17, 29.25, -42.48, 0.5)
	pt3dadd(-25.17, 28.92, -42.48, 0.5)
	pt3dadd(-25.33, 28.75, -42.48, 0.5)
	pt3dadd(-25.5, 28.58, -42.48, 0.5)
	pt3dadd(-25.67, 28.42, -42.48, 0.5)
	pt3dadd(-25.67, 28.08, -42.48, 0.5)
	pt3dadd(-25.83, 27.92, -42.48, 0.5)
	pt3dadd(-26, 27.75, -42.48, 0.5)
	pt3dadd(-26.17, 27.58, -42.48, 0.5)
	pt3dadd(-26.33, 27.42, -42.48, 0.5)
	pt3dadd(-26.5, 27.25, -42.48, 0.5)
	pt3dadd(-26.67, 27.08, -42.48, 0.5)
	pt3dadd(-26.83, 26.92, -42.48, 0.5)
	pt3dadd(-27, 26.58, -42.48, 0.5)
	pt3dadd(-27.33, 26.42, -42.48, 0.5)
	pt3dadd(-27.5, 26.25, -42.48, 0.5)
	pt3dadd(-27.67, 26.08, -42.48, 0.5)
	pt3dadd(-27.67, 25.92, -42.48, 0.5)
  }
  dend[682] {pt3dclear()
	pt3dadd(-27.67, 25.92, -42.48, 0.5)
	pt3dadd(-28, 26.08, -42.48, 0.5)
	pt3dadd(-28.17, 26.25, -42.48, 0.5)
	pt3dadd(-28.67, 26.25, -42.48, 0.5)
	pt3dadd(-28.83, 26.42, -42.48, 0.5)
	pt3dadd(-29.33, 26.42, -42.48, 0.5)
	pt3dadd(-29.5, 26.25, -42.48, 0.5)
	pt3dadd(-29.67, 26.08, -42.48, 0.5)
	pt3dadd(-30, 25.92, -42.48, 0.5)
	pt3dadd(-30.17, 25.58, -42.48, 0.5)
	pt3dadd(-30.33, 25.58, -42.48, 0.5)
  }
  dend[683] {pt3dclear()
	pt3dadd(-27.67, 25.92, -42.48, 0.5)
	pt3dadd(-27.5, 25.92, -42.48, 0.5)
	pt3dadd(-27.5, 25.58, -42.48, 0.5)
	pt3dadd(-27.67, 25.42, -42.48, 0.5)
	pt3dadd(-27.83, 25.25, -42.48, 0.5)
	pt3dadd(-28, 25.08, -42.48, 0.5)
	pt3dadd(-28.33, 24.92, -42.48, 0.5)
	pt3dadd(-28.5, 24.75, -42.48, 0.5)
	pt3dadd(-28.83, 24.75, -42.48, 0.5)
	pt3dadd(-29, 24.58, -42.48, 0.5)
	pt3dadd(-29.33, 24.58, -42.48, 0.5)
	pt3dadd(-29.5, 24.42, -42.48, 0.5)
	pt3dadd(-29.83, 24.25, -42.48, 0.5)
	pt3dadd(-30.33, 24.25, -42.48, 0.5)
	pt3dadd(-30.33, 24.08, -42.48, 0.5)
  }
  dend[684] {pt3dclear()
	pt3dadd(-22.17, 33.75, -44.64, 0.5)
	pt3dadd(-21.67, 33.75, -44.64, 0.5)
	pt3dadd(-21.67, 34.25, -44.64, 0.5)
	pt3dadd(-21.83, 34.42, -44.64, 0.5)
	pt3dadd(-22, 34.58, -44.64, 0.5)
	pt3dadd(-22.17, 34.75, -44.64, 0.5)
	pt3dadd(-22.33, 34.92, -44.64, 0.5)
	pt3dadd(-22.5, 35.08, -44.64, 0.5)
	pt3dadd(-22.67, 35.25, -44.64, 0.5)
	pt3dadd(-22.83, 35.42, -44.64, 0.5)
	pt3dadd(-23, 35.58, -44.64, 0.5)
	pt3dadd(-23.17, 35.75, -44.64, 0.5)
	pt3dadd(-23.17, 36.08, -44.64, 0.5)
	pt3dadd(-23.33, 36.08, -44.64, 0.5)
  }
  dend[685] {pt3dclear()
	pt3dadd(-23.33, 36.08, -44.64, 0.5)
	pt3dadd(-23.5, 36.25, -46.8, 0.5)
	pt3dadd(-23.67, 36.42, -46.8, 0.5)
	pt3dadd(-23.83, 36.58, -46.8, 0.5)
	pt3dadd(-24, 36.75, -46.8, 0.5)
	pt3dadd(-24.17, 36.92, -46.8, 0.5)
	pt3dadd(-24.33, 37.08, -46.8, 0.5)
	pt3dadd(-24.67, 37.25, -46.8, 0.5)
	pt3dadd(-25, 37.25, -46.8, 0.5)
	pt3dadd(-25.17, 37.42, -46.8, 0.5)
	pt3dadd(-25.5, 37.42, -46.8, 0.5)
	pt3dadd(-25.67, 37.58, -46.8, 0.5)
	pt3dadd(-26, 37.58, -46.8, 0.5)
	pt3dadd(-26.17, 37.75, -46.8, 0.5)
	pt3dadd(-26.33, 37.92, -46.8, 0.5)
	pt3dadd(-26.5, 38.08, -46.8, 0.5)
	pt3dadd(-26.67, 38.25, -46.8, 0.5)
	pt3dadd(-26.83, 38.42, -46.8, 0.5)
	pt3dadd(-27, 38.42, -46.8, 0.5)
  }
  dend[686] {pt3dclear()
	pt3dadd(-27, 38.42, -46.8, 0.5)
	pt3dadd(-27, 38.58, -46.44, 0.5)
	pt3dadd(-28, 38.58, -46.44, 0.5)
	pt3dadd(-28.33, 38.75, -46.44, 0.5)
	pt3dadd(-28.67, 38.75, -46.44, 0.5)
  }
}
proc shape3d_61() {
  dend[686] {  }
  dend[687] {pt3dclear()
	pt3dadd(-28.67, 38.75, -46.44, 0.5)
	pt3dadd(-28.67, 38.92, -43.2, 0.5)
	pt3dadd(-30.83, 38.92, -43.2, 0.5)
	pt3dadd(-31, 39.08, -42.84, 0.5)
	pt3dadd(-31.17, 39.25, -42.84, 0.5)
	pt3dadd(-31.5, 39.42, -44.28, 0.5)
	pt3dadd(-31.67, 39.58, -43.2, 0.5)
	pt3dadd(-31.83, 39.92, -43.2, 0.5)
	pt3dadd(-32, 40.08, -43.2, 0.5)
	pt3dadd(-32.5, 40.08, -43.2, 0.5)
	pt3dadd(-32.67, 40.25, -43.2, 0.5)
	pt3dadd(-33.17, 40.25, -43.2, 0.5)
	pt3dadd(-33.33, 40.58, -43.2, 0.5)
	pt3dadd(-33.5, 40.58, -43.2, 0.5)
  }
  dend[688] {pt3dclear()
	pt3dadd(-33.5, 40.58, -43.2, 0.5)
	pt3dadd(-33.33, 40.75, -44.64, 0.5)
	pt3dadd(-33.67, 40.75, -44.64, 0.5)
	pt3dadd(-34, 40.92, -44.64, 0.5)
	pt3dadd(-34.67, 40.92, -44.64, 0.5)
	pt3dadd(-34.83, 41.08, -44.64, 0.5)
	pt3dadd(-35.17, 41.08, -44.64, 0.5)
	pt3dadd(-35.33, 41.25, -44.64, 0.5)
	pt3dadd(-35.67, 41.25, -44.64, 0.5)
	pt3dadd(-35.33, 41.42, -43.56, 0.5)
	pt3dadd(-36.5, 41.42, -43.56, 0.5)
	pt3dadd(-36.67, 41.25, -43.56, 0.5)
	pt3dadd(-36.83, 41.08, -43.56, 0.5)
	pt3dadd(-37, 40.92, -43.56, 0.5)
  }
  dend[689] {pt3dclear()
	pt3dadd(-33.5, 40.58, -43.2, 0.5)
	pt3dadd(-33, 40.42, -43.2, 0.5)
	pt3dadd(-33.5, 40.42, -43.2, 0.5)
	pt3dadd(-33.67, 40.25, -43.2, 0.5)
	pt3dadd(-33.83, 40.08, -43.2, 0.5)
	pt3dadd(-34, 39.92, -43.2, 0.5)
	pt3dadd(-34.17, 39.58, -43.2, 0.5)
	pt3dadd(-34.17, 38.92, -43.2, 0.5)
	pt3dadd(-34.33, 38.75, -43.2, 0.5)
	pt3dadd(-34.33, 38.42, -43.2, 0.5)
  }
  dend[690] {pt3dclear()
	pt3dadd(-28.67, 38.75, -46.44, 0.5)
	pt3dadd(-28.33, 38.75, -46.44, 0.5)
	pt3dadd(-28.17, 38.92, -46.44, 0.5)
	pt3dadd(-28.17, 39.58, -46.44, 0.5)
	pt3dadd(-28.33, 39.75, -46.44, 0.5)
	pt3dadd(-28.5, 40.08, -46.44, 0.5)
	pt3dadd(-28.67, 40.42, -46.44, 0.5)
	pt3dadd(-28.83, 40.58, -46.44, 0.5)
	pt3dadd(-28.83, 41.08, -46.44, 0.5)
	pt3dadd(-29, 41.42, -46.44, 0.5)
	pt3dadd(-29.17, 41.58, -46.44, 0.5)
	pt3dadd(-29.33, 41.75, -46.44, 0.5)
	pt3dadd(-29.5, 41.92, -46.44, 0.5)
	pt3dadd(-29.67, 42.08, -46.44, 0.5)
	pt3dadd(-29.83, 42.25, -46.44, 0.5)
	pt3dadd(-30, 42.25, -46.44, 0.5)
  }
  dend[691] {pt3dclear()
	pt3dadd(-27, 38.42, -46.8, 0.5)
	pt3dadd(-27, 38.58, -47.52, 0.5)
	pt3dadd(-26.83, 38.75, -47.52, 0.5)
	pt3dadd(-26.67, 38.92, -47.52, 0.5)
	pt3dadd(-26.5, 39.08, -47.52, 0.5)
	pt3dadd(-26.33, 39.25, -47.52, 0.5)
	pt3dadd(-26, 39.42, -47.52, 0.5)
	pt3dadd(-25.67, 39.58, -47.52, 0.5)
	pt3dadd(-25.5, 39.75, -47.52, 0.5)
	pt3dadd(-25.17, 39.92, -47.52, 0.5)
	pt3dadd(-24.83, 40.08, -47.52, 0.5)
	pt3dadd(-24.67, 40.25, -47.52, 0.5)
	pt3dadd(-24.17, 40.25, -47.52, 0.5)
	pt3dadd(-24, 40.42, -47.52, 0.5)
  }
  dend[692] {pt3dclear()
	pt3dadd(-24, 40.42, -47.52, 0.5)
	pt3dadd(-23.67, 40.58, -47.16, 0.5)
	pt3dadd(-23.5, 40.75, -47.16, 0.5)
	pt3dadd(-23, 40.75, -47.16, 0.5)
	pt3dadd(-22.5, 40.92, -47.16, 0.5)
	pt3dadd(-22.17, 40.92, -47.16, 0.5)
	pt3dadd(-21.83, 41.08, -47.16, 0.5)
	pt3dadd(-21.5, 41.08, -47.16, 0.5)
	pt3dadd(-21.17, 41.25, -47.16, 0.5)
	pt3dadd(-21, 41.42, -47.16, 0.5)
	pt3dadd(-20.67, 41.58, -47.16, 0.5)
	pt3dadd(-20.32, 41.75, -47.16, 0.5)
	pt3dadd(-20, 41.92, -47.16, 0.5)
	pt3dadd(-19.82, 42.08, -47.16, 0.5)
	pt3dadd(-19.5, 42.08, -47.16, 0.5)
	pt3dadd(-19.32, 42.25, -47.16, 0.5)
	pt3dadd(-19.17, 42.42, -47.16, 0.5)
	pt3dadd(-19.17, 42.58, -47.16, 0.5)
  }
  dend[693] {pt3dclear()
	pt3dadd(-24, 40.42, -47.52, 0.5)
	pt3dadd(-23.67, 40.58, -47.52, 0.5)
	pt3dadd(-23.67, 41.58, -47.52, 0.5)
	pt3dadd(-23.83, 41.75, -47.52, 0.5)
	pt3dadd(-23.67, 42.08, -47.52, 0.5)
	pt3dadd(-23.5, 42.25, -47.52, 0.5)
	pt3dadd(-23.5, 42.58, -47.52, 0.5)
	pt3dadd(-23.17, 42.58, -47.52, 0.5)
	pt3dadd(-23, 42.75, -47.52, 0.5)
	pt3dadd(-22.83, 42.92, -47.52, 0.5)
	pt3dadd(-22.5, 42.92, -47.52, 0.5)
	pt3dadd(-22.33, 43.08, -47.52, 0.5)
	pt3dadd(-22.17, 43.25, -47.52, 0.5)
	pt3dadd(-21.83, 43.25, -47.52, 0.5)
	pt3dadd(-21.83, 43.42, -47.52, 0.5)
  }
  dend[694] {pt3dclear()
	pt3dadd(-23.33, 36.08, -44.64, 0.5)
	pt3dadd(-23, 36.42, -44.64, 0.5)
	pt3dadd(-23, 36.92, -44.64, 0.5)
	pt3dadd(-22.83, 37.25, -47.52, 0.5)
	pt3dadd(-22.67, 37.42, -45, 0.5)
	pt3dadd(-22.67, 37.75, -45, 0.5)
	pt3dadd(-21.17, 37.75, -45, 0.5)
	pt3dadd(-20.83, 37.92, -45, 0.5)
	pt3dadd(-19.32, 37.92, -45, 0.5)
	pt3dadd(-19.32, 38.08, -45, 0.5)
  }
  dend[695] {pt3dclear()
	pt3dadd(-19.32, 38.08, -45, 0.5)
	pt3dadd(-19.5, 38.08, -44.64, 0.5)
	pt3dadd(-19.32, 37.92, -44.64, 0.5)
	pt3dadd(-18.82, 37.92, -44.64, 0.5)
	pt3dadd(-18.5, 37.75, -44.64, 0.5)
	pt3dadd(-17.67, 37.75, -44.64, 0.5)
	pt3dadd(-17.67, 37.42, -44.64, 0.5)
	pt3dadd(-17.5, 37.25, -44.64, 0.5)
	pt3dadd(-17.17, 37.08, -44.64, 0.5)
	pt3dadd(-17, 36.75, -44.64, 0.5)
	pt3dadd(-17, 36.25, -44.64, 0.5)
  }
  dend[696] {pt3dclear()
	pt3dadd(-19.32, 38.08, -45, 0.5)
	pt3dadd(-19, 38.08, -45, 0.5)
	pt3dadd(-19, 38.58, -45, 0.5)
	pt3dadd(-18.82, 38.75, -45, 0.5)
	pt3dadd(-18.67, 39.08, -45, 0.5)
	pt3dadd(-18.5, 39.25, -45, 0.5)
	pt3dadd(-18.32, 39.42, -45, 0.5)
	pt3dadd(-18.17, 39.58, -45, 0.5)
	pt3dadd(-18, 39.75, -45, 0.5)
	pt3dadd(-17.82, 39.92, -45, 0.5)
	pt3dadd(-17.67, 40.08, -45, 0.5)
	pt3dadd(-17.67, 40.58, -45, 0.5)
	pt3dadd(-17.5, 40.75, -45, 0.5)
  }
  dend[697] {pt3dclear()
	pt3dadd(-8.22, 29.63, -40.95, 0.5)
	pt3dadd(-7.83, 29.67, -43.56, 0.83)
	pt3dadd(-7.83, 31, -43.56, 0.83)
	pt3dadd(-7.67, 31.33, -43.56, 0.83)
	pt3dadd(-7.67, 31.83, -43.56, 0.83)
	pt3dadd(-7.5, 32, -43.56, 0.83)
	pt3dadd(-7.33, 32.33, -43.56, 0.83)
	pt3dadd(-7.33, 32.67, -43.56, 0.83)
	pt3dadd(-7.17, 32.83, -43.56, 0.83)
	pt3dadd(-7.17, 33.17, -43.56, 0.83)
	pt3dadd(-7, 33.33, -43.56, 0.83)
	pt3dadd(-6.83, 33.5, -44.28, 0.83)
	pt3dadd(-6.83, 34, -43.92, 0.83)
	pt3dadd(-6.67, 34.17, -43.92, 0.83)
	pt3dadd(-6.67, 37, -43.92, 0.83)
	pt3dadd(-6.83, 37.33, -43.92, 0.83)
	pt3dadd(-7, 37.5, -43.92, 0.83)
	pt3dadd(-7, 37.83, -43.92, 0.83)
	pt3dadd(-7.17, 37.67, -43.92, 0.83)
  }
  dend[698] {pt3dclear()
	pt3dadd(-7.17, 37.67, -43.92, 0.83)
	pt3dadd(-6.83, 37.58, -45.72, 0.5)
	pt3dadd(-6.83, 38.08, -45.72, 0.5)
	pt3dadd(-6.67, 38.42, -45.72, 0.5)
	pt3dadd(-6.5, 38.75, -45.72, 0.5)
	pt3dadd(-6.33, 39.08, -45.72, 0.5)
	pt3dadd(-6.17, 39.25, -45.72, 0.5)
	pt3dadd(-6.17, 39.58, -45.72, 0.5)
	pt3dadd(-6, 39.75, -45.72, 0.5)
	pt3dadd(-5.83, 40.08, -45.72, 0.5)
	pt3dadd(-5.83, 40.58, -45.72, 0.5)
	pt3dadd(-5.67, 40.75, -45.72, 0.5)
	pt3dadd(-5.67, 41.42, -45.72, 0.5)
  }
  dend[699] {pt3dclear()
	pt3dadd(-5.67, 41.42, -45.72, 0.5)
	pt3dadd(-5.5, 41.75, -45.36, 0.5)
	pt3dadd(-5.33, 41.92, -45.36, 0.5)
	pt3dadd(-5.17, 42.08, -45.36, 0.5)
	pt3dadd(-5, 42.25, -45.36, 0.5)
	pt3dadd(-4.67, 42.25, -45.36, 0.5)
	pt3dadd(-4.5, 42.42, -45.36, 0.5)
  }
  dend[700] {pt3dclear()
	pt3dadd(-4.5, 42.42, -45.36, 0.5)
	pt3dadd(-4.72, 42.42, -46.33, 0.5)
  }
  dend[701] {pt3dclear()
	pt3dadd(-4.72, 42.42, -46.33, 0.5)
	pt3dadd(-4.67, 42.42, -46.08, 0.5)
	pt3dadd(-4.67, 42.08, -46.08, 0.5)
	pt3dadd(-4.5, 41.75, -46.08, 0.5)
	pt3dadd(-4.5, 41.25, -46.08, 0.5)
	pt3dadd(-4.33, 41.08, -46.08, 0.5)
	pt3dadd(-4.17, 40.92, -46.08, 0.5)
	pt3dadd(-4.17, 40.58, -46.08, 0.5)
	pt3dadd(-4, 40.42, -46.08, 0.5)
	pt3dadd(-4, 37.08, -42.12, 0.5)
	pt3dadd(-3.83, 36.92, -42.12, 0.5)
	pt3dadd(-3.83, 36.25, -42.12, 0.5)
	pt3dadd(-4, 36.25, -42.12, 0.5)
  }
  dend[702] {pt3dclear()
	pt3dadd(-4, 36.25, -42.12, 0.5)
	pt3dadd(-3.5, 36.25, -45.36, 0.5)
	pt3dadd(-3.33, 36.42, -45.36, 0.5)
	pt3dadd(-3.17, 36.75, -45.36, 0.5)
	pt3dadd(-3, 37.08, -45.36, 0.5)
	pt3dadd(-2.83, 37.25, -45.36, 0.5)
	pt3dadd(-2.5, 37.42, -45.36, 0.5)
	pt3dadd(-2.33, 37.58, -45.36, 0.5)
	pt3dadd(-1.83, 37.58, -45.36, 0.5)
  }
  dend[703] {pt3dclear()
	pt3dadd(-4, 36.25, -42.12, 0.5)
	pt3dadd(-3.33, 36.08, -42.12, 0.5)
  }
}
proc shape3d_62() {
  dend[703] {	pt3dadd(-3.67, 35.92, -42.12, 0.5)
	pt3dadd(-3.83, 35.75, -42.12, 0.5)
	pt3dadd(-4, 35.58, -42.12, 0.5)
	pt3dadd(-4.33, 35.58, -42.12, 0.5)
	pt3dadd(-4.5, 35.42, -42.12, 0.5)
	pt3dadd(-4.5, 35.08, -42.12, 0.5)
	pt3dadd(-4.67, 34.92, -42.12, 0.5)
	pt3dadd(-4.83, 34.75, -42.12, 0.5)
	pt3dadd(-5, 34.58, -42.12, 0.5)
	pt3dadd(-5, 34.25, -42.12, 0.5)
	pt3dadd(-5.17, 33.92, -42.12, 0.5)
	pt3dadd(-5.33, 33.75, -42.12, 0.5)
	pt3dadd(-5.33, 33.42, -42.12, 0.5)
	pt3dadd(-5.5, 33.08, -42.12, 0.5)
	pt3dadd(-5.33, 32.92, -42.12, 0.5)
	pt3dadd(-5.33, 32.58, -42.12, 0.5)
	pt3dadd(-5, 32.42, -42.12, 0.5)
	pt3dadd(-4.83, 32.25, -42.12, 0.5)
	pt3dadd(-5, 32.25, -42.12, 0.5)
  }
  dend[704] {pt3dclear()
	pt3dadd(-5, 32.25, -42.12, 0.5)
	pt3dadd(-4.83, 32.08, -43.2, 0.5)
	pt3dadd(-4.5, 31.92, -43.2, 0.5)
	pt3dadd(-4.33, 31.75, -43.2, 0.5)
	pt3dadd(-4, 31.75, -43.2, 0.5)
	pt3dadd(-3.67, 31.58, -43.2, 0.5)
	pt3dadd(-3.5, 31.42, -43.2, 0.5)
	pt3dadd(-3.17, 31.25, -43.2, 0.5)
	pt3dadd(-2.83, 31.25, -43.2, 0.5)
	pt3dadd(-2.67, 31.08, -43.2, 0.5)
	pt3dadd(-2.5, 30.92, -43.2, 0.5)
	pt3dadd(-2.33, 30.75, -43.2, 0.5)
	pt3dadd(-2.17, 30.58, -43.2, 0.5)
	pt3dadd(-2.17, 30.25, -43.2, 0.5)
	pt3dadd(-2, 30.08, -43.2, 0.5)
  }
  dend[705] {pt3dclear()
	pt3dadd(-5, 32.25, -42.12, 0.5)
	pt3dadd(-4.5, 32.08, -42.12, 0.5)
	pt3dadd(-4.5, 30.75, -42.12, 0.5)
	pt3dadd(-4.67, 30.58, -42.12, 0.5)
	pt3dadd(-4.67, 30.42, -42.12, 0.5)
  }
  dend[706] {pt3dclear()
	pt3dadd(-4.67, 30.42, -42.12, 0.5)
	pt3dadd(-4.67, 30.75, -42.12, 0.5)
	pt3dadd(-4.5, 30.58, -42.12, 0.5)
	pt3dadd(-4.33, 30.25, -42.12, 0.5)
	pt3dadd(-4.17, 30.08, -42.12, 0.5)
	pt3dadd(-4, 29.92, -42.12, 0.5)
	pt3dadd(-3.83, 29.75, -42.12, 0.5)
	pt3dadd(-2.33, 29.75, -42.12, 0.5)
	pt3dadd(-2.17, 29.58, -42.12, 0.5)
	pt3dadd(-2, 29.42, -42.12, 0.5)
	pt3dadd(-1.67, 29.42, -42.12, 0.5)
	pt3dadd(-1.5, 29.25, -42.12, 0.5)
	pt3dadd(-1.33, 29.08, -42.12, 0.5)
	pt3dadd(-1.33, 28.75, -42.12, 0.5)
	pt3dadd(-1.17, 28.42, -42.12, 0.5)
	pt3dadd(-1, 28.25, -42.12, 0.5)
	pt3dadd(-0.67, 28.25, -42.12, 0.5)
	pt3dadd(-0.5, 28.08, -42.12, 0.5)
	pt3dadd(-0.33, 27.92, -42.12, 0.5)
	pt3dadd(-0.33, 27.75, -42.12, 0.5)
  }
  dend[707] {pt3dclear()
	pt3dadd(-4.67, 30.42, -42.12, 0.5)
	pt3dadd(-4.5, 30.42, -42.12, 0.5)
	pt3dadd(-5.83, 30.42, -42.12, 0.5)
	pt3dadd(-6, 30.25, -42.12, 0.5)
	pt3dadd(-6.17, 30.08, -42.12, 0.5)
	pt3dadd(-6.33, 29.92, -42.12, 0.5)
	pt3dadd(-6.33, 29.58, -42.12, 0.5)
	pt3dadd(-6.5, 29.42, -42.12, 0.5)
	pt3dadd(-6.67, 29.25, -42.12, 0.5)
	pt3dadd(-6.83, 29.08, -42.12, 0.5)
	pt3dadd(-7, 28.75, -42.12, 0.5)
	pt3dadd(-7.17, 28.58, -42.12, 0.5)
	pt3dadd(-7.33, 28.42, -42.12, 0.5)
	pt3dadd(-7.5, 28.25, -42.12, 0.5)
	pt3dadd(-7.67, 28.08, -42.12, 0.5)
	pt3dadd(-7.83, 27.92, -42.12, 0.5)
	pt3dadd(-8, 27.75, -42.12, 0.5)
	pt3dadd(-8, 27.58, -42.12, 0.5)
  }
  dend[708] {pt3dclear()
	pt3dadd(-4.72, 42.42, -46.33, 0.5)
	pt3dadd(-4.5, 42.75, -45, 0.5)
	pt3dadd(-4.17, 42.75, -45, 0.5)
	pt3dadd(-4, 42.92, -45, 0.5)
	pt3dadd(-3.83, 43.08, -45, 0.5)
	pt3dadd(-3.67, 43.25, -45, 0.5)
	pt3dadd(-3.5, 43.58, -45, 0.5)
	pt3dadd(-3.5, 43.92, -45, 0.5)
	pt3dadd(-3.33, 44.08, -45, 0.5)
	pt3dadd(-3.17, 44.42, -45, 0.5)
	pt3dadd(-3.17, 45.08, -45, 0.5)
	pt3dadd(-3, 45.25, -45, 0.5)
  }
  dend[709] {pt3dclear()
	pt3dadd(-3, 45.25, -45, 0.5)
	pt3dadd(-3, 45.58, -44.64, 0.5)
	pt3dadd(-2.33, 45.58, -44.64, 0.5)
	pt3dadd(-2.17, 45.75, -44.64, 0.5)
	pt3dadd(-2, 46.08, -44.64, 0.5)
	pt3dadd(-1.67, 46.08, -44.64, 0.5)
	pt3dadd(-1.5, 46.25, -44.64, 0.5)
	pt3dadd(-1.33, 46.42, -44.64, 0.5)
	pt3dadd(-1.17, 46.58, -44.64, 0.5)
  }
  dend[710] {pt3dclear()
	pt3dadd(-3, 45.25, -45, 0.5)
	pt3dadd(-2.83, 45.25, -45, 0.5)
	pt3dadd(-3.17, 45.42, -45, 0.5)
	pt3dadd(-3.83, 46.08, -45, 0.5)
	pt3dadd(-4.17, 46.25, -45, 0.5)
	pt3dadd(-4.5, 46.42, -45, 0.5)
	pt3dadd(-4.67, 46.75, -45, 0.5)
	pt3dadd(-4.83, 46.92, -45, 0.5)
	pt3dadd(-5, 46.92, -45, 0.5)
  }
  dend[711] {pt3dclear()
	pt3dadd(-4.5, 42.42, -45.36, 0.5)
	pt3dadd(-4, 42.42, -45.36, 0.5)
	pt3dadd(-4.17, 42.58, -45.36, 0.5)
	pt3dadd(-4.33, 42.75, -45.36, 0.5)
	pt3dadd(-4.5, 42.92, -45.36, 0.5)
	pt3dadd(-4.5, 43.58, -45.36, 0.5)
	pt3dadd(-4.67, 43.92, -45.36, 0.5)
	pt3dadd(-4.67, 44.75, -45, 0.5)
	pt3dadd(-4.67, 45.42, -45, 0.5)
	pt3dadd(-4.83, 45.58, -45, 0.5)
  }
  dend[712] {pt3dclear()
	pt3dadd(-4.83, 45.58, -45, 0.5)
	pt3dadd(-4.83, 45.08, -44.64, 0.5)
	pt3dadd(-4.67, 45.25, -44.64, 0.5)
	pt3dadd(-4.67, 45.58, -44.64, 0.5)
	pt3dadd(-4.5, 45.92, -44.64, 0.5)
	pt3dadd(-4.17, 46.08, -44.64, 0.5)
	pt3dadd(-4, 46.42, -44.64, 0.5)
	pt3dadd(-3.67, 46.42, -44.64, 0.5)
	pt3dadd(-3.5, 46.58, -44.64, 0.5)
	pt3dadd(-3.33, 46.75, -44.64, 0.5)
	pt3dadd(-3, 46.75, -44.64, 0.5)
	pt3dadd(-2.83, 46.92, -44.64, 0.5)
	pt3dadd(-2.5, 47.08, -44.64, 0.5)
	pt3dadd(-2.33, 47.08, -44.64, 0.5)
  }
  dend[713] {pt3dclear()
	pt3dadd(-4.83, 45.58, -45, 0.5)
	pt3dadd(-4.67, 45.58, -45, 0.5)
	pt3dadd(-4.83, 45.75, -45, 0.5)
	pt3dadd(-5, 45.92, -45, 0.5)
	pt3dadd(-5.17, 46.25, -45, 0.5)
	pt3dadd(-5.33, 46.42, -45, 0.5)
	pt3dadd(-5.5, 46.58, -45, 0.5)
	pt3dadd(-5.83, 46.58, -45, 0.5)
	pt3dadd(-6, 46.75, -45, 0.5)
	pt3dadd(-6.33, 46.92, -45, 0.5)
  }
  dend[714] {pt3dclear()
	pt3dadd(-5.67, 41.42, -45.72, 0.5)
	pt3dadd(-5.67, 41.58, -45.72, 0.5)
	pt3dadd(-5.83, 41.75, -45.72, 0.5)
	pt3dadd(-5.83, 42.08, -45.72, 0.5)
	pt3dadd(-6, 42.25, -45.72, 0.5)
	pt3dadd(-6.17, 42.42, -45.72, 0.5)
	pt3dadd(-6.33, 42.75, -45.72, 0.5)
	pt3dadd(-6.33, 43.08, -45.72, 0.5)
	pt3dadd(-6.5, 43.42, -45.72, 0.5)
	pt3dadd(-6.5, 43.92, -45.72, 0.5)
	pt3dadd(-6.67, 44.08, -45.72, 0.5)
	pt3dadd(-6.67, 44.42, -45.72, 0.5)
	pt3dadd(-6.67, 44.08, -44.28, 0.5)
	pt3dadd(-6.67, 44.42, -44.28, 0.5)
	pt3dadd(-6.83, 44.58, -44.28, 0.5)
	pt3dadd(-7, 44.75, -44.28, 0.5)
	pt3dadd(-7.17, 44.92, -44.28, 0.5)
	pt3dadd(-7.17, 45.58, -44.28, 0.5)
	pt3dadd(-7, 45.75, -44.28, 0.5)
	pt3dadd(-6.83, 45.92, -44.28, 0.5)
	pt3dadd(-6.5, 46.08, -44.28, 0.5)
	pt3dadd(-6.33, 46.25, -44.28, 0.5)
  }
  dend[715] {pt3dclear()
	pt3dadd(-7.17, 37.67, -43.92, 0.83)
	pt3dadd(-7.17, 37.58, -45.72, 0.5)
	pt3dadd(-7.17, 38.25, -45.72, 0.5)
	pt3dadd(-7.33, 38.58, -45.72, 0.5)
	pt3dadd(-7.5, 38.75, -45.72, 0.5)
	pt3dadd(-7.67, 38.92, -45.72, 0.5)
	pt3dadd(-7.83, 39.08, -45.72, 0.5)
	pt3dadd(-8, 39.25, -45.72, 0.5)
	pt3dadd(-8.17, 39.42, -45.72, 0.5)
	pt3dadd(-8.33, 39.58, -45.72, 0.5)
	pt3dadd(-8.5, 39.58, -45.72, 0.5)
  }
  dend[716] {pt3dclear()
	pt3dadd(-8.5, 39.58, -45.72, 0.5)
	pt3dadd(-8.83, 39.75, -45.36, 0.5)
	pt3dadd(-8.83, 40.08, -45.36, 0.5)
	pt3dadd(-9, 40.25, -45.36, 0.5)
	pt3dadd(-9.17, 40.42, -45.36, 0.5)
	pt3dadd(-9.33, 40.58, -45.36, 0.5)
	pt3dadd(-9.67, 40.75, -45.36, 0.5)
	pt3dadd(-10.17, 40.75, -45.36, 0.5)
	pt3dadd(-10.33, 40.58, -45.36, 0.5)
	pt3dadd(-10.5, 40.42, -45.36, 0.5)
	pt3dadd(-11.5, 40.42, -45.36, 0.5)
  }
  dend[717] {pt3dclear()
	pt3dadd(-11.5, 40.42, -45.36, 0.5)
	pt3dadd(-11, 40.58, -45, 0.5)
	pt3dadd(-11, 40.25, -45, 0.5)
	pt3dadd(-11.17, 40.08, -45, 0.5)
	pt3dadd(-11.33, 39.92, -45, 0.5)
	pt3dadd(-11.33, 38.92, -45, 0.5)
	pt3dadd(-11.17, 38.75, -45, 0.5)
	pt3dadd(-11, 38.58, -45, 0.5)
	pt3dadd(-11, 38.42, -45, 0.5)
  }
  dend[718] {pt3dclear()
	pt3dadd(-11, 38.42, -45, 0.5)
	pt3dadd(-11, 38.75, -44.64, 0.5)
	pt3dadd(-10.83, 38.42, -44.64, 0.5)
	pt3dadd(-10.67, 38.25, -44.64, 0.5)
	pt3dadd(-10.67, 37.75, -44.64, 0.5)
	pt3dadd(-10.5, 37.42, -44.64, 0.5)
  }
}
proc shape3d_63() {
  dend[718] {	pt3dadd(-10.83, 37.42, -44.64, 0.5)
	pt3dadd(-11, 37.25, -44.64, 0.5)
	pt3dadd(-11.17, 37.08, -43.2, 0.5)
	pt3dadd(-11.33, 36.92, -43.2, 0.5)
	pt3dadd(-11.33, 36.42, -43.2, 0.5)
	pt3dadd(-11.5, 36.25, -43.2, 0.5)
	pt3dadd(-11.5, 35.75, -43.2, 0.5)
	pt3dadd(-11.67, 35.75, -43.2, 0.5)
  }
  dend[719] {pt3dclear()
	pt3dadd(-11.67, 35.75, -43.2, 0.5)
	pt3dadd(-11.67, 35.92, -42.84, 0.5)
	pt3dadd(-11.5, 35.75, -42.84, 0.5)
	pt3dadd(-11.33, 35.42, -42.84, 0.5)
	pt3dadd(-11.33, 34.58, -42.84, 0.5)
	pt3dadd(-11.17, 34.25, -42.84, 0.5)
	pt3dadd(-11.17, 33.58, -42.84, 0.5)
	pt3dadd(-11.33, 33.42, -42.84, 0.5)
	pt3dadd(-11.5, 33.08, -42.84, 0.5)
	pt3dadd(-11.5, 32.75, -42.84, 0.5)
	pt3dadd(-11.33, 32.58, -42.84, 0.5)
	pt3dadd(-11.33, 32.08, -42.84, 0.5)
	pt3dadd(-11, 32.08, -42.84, 0.5)
	pt3dadd(-10.83, 31.92, -42.84, 0.5)
	pt3dadd(-10.67, 31.75, -42.84, 0.5)
	pt3dadd(-10.67, 31.42, -42.84, 0.5)
	pt3dadd(-10.5, 31.25, -42.84, 0.5)
	pt3dadd(-10.33, 31.08, -42.84, 0.5)
	pt3dadd(-10.17, 30.92, -42.84, 0.5)
	pt3dadd(-10.17, 30.58, -42.84, 0.5)
	pt3dadd(-10, 30.25, -42.84, 0.5)
	pt3dadd(-10, 29.75, -42.84, 0.5)
	pt3dadd(-9.83, 29.42, -42.84, 0.5)
	pt3dadd(-9.67, 29.08, -42.84, 0.5)
	pt3dadd(-9.5, 28.92, -42.84, 0.5)
	pt3dadd(-9.5, 28.42, -42.84, 0.5)
  }
  dend[720] {pt3dclear()
	pt3dadd(-11.67, 35.75, -43.2, 0.5)
	pt3dadd(-11.5, 35.75, -43.2, 0.5)
	pt3dadd(-12.17, 35.75, -43.2, 0.5)
	pt3dadd(-12.33, 35.58, -43.2, 0.5)
	pt3dadd(-12.5, 35.25, -43.2, 0.5)
	pt3dadd(-12.67, 35.08, -43.2, 0.5)
	pt3dadd(-12.83, 34.92, -43.2, 0.5)
	pt3dadd(-13, 34.75, -43.2, 0.5)
	pt3dadd(-13.17, 34.58, -43.2, 0.5)
	pt3dadd(-13.5, 34.58, -43.2, 0.5)
	pt3dadd(-13.67, 34.42, -43.2, 0.5)
	pt3dadd(-13.83, 34.25, -43.2, 0.5)
	pt3dadd(-14, 34.08, -43.2, 0.5)
	pt3dadd(-14.17, 33.92, -43.2, 0.5)
  }
  dend[721] {pt3dclear()
	pt3dadd(-11, 38.42, -45, 0.5)
	pt3dadd(-11.17, 38.58, -45, 0.5)
	pt3dadd(-11.5, 38.75, -45, 0.5)
	pt3dadd(-11.83, 38.92, -45, 0.5)
	pt3dadd(-12.17, 38.92, -45, 0.5)
	pt3dadd(-12.5, 38.75, -45, 0.5)
	pt3dadd(-12.67, 38.58, -45, 0.5)
	pt3dadd(-12.83, 38.42, -45, 0.5)
	pt3dadd(-13, 38.25, -45, 0.5)
	pt3dadd(-13.17, 38.08, -45, 0.5)
	pt3dadd(-13.33, 37.92, -45, 0.5)
	pt3dadd(-13.5, 37.75, -45, 0.5)
	pt3dadd(-13.67, 37.58, -45, 0.5)
	pt3dadd(-13.83, 37.42, -45, 0.5)
	pt3dadd(-13.83, 36.75, -45, 0.5)
  }
  dend[722] {pt3dclear()
	pt3dadd(-11.5, 40.42, -45.36, 0.5)
	pt3dadd(-10.67, 40.42, -45.36, 0.5)
	pt3dadd(-10.83, 40.92, -45.36, 0.5)
	pt3dadd(-11, 41.08, -45.36, 0.5)
	pt3dadd(-11.17, 41.25, -45.36, 0.5)
	pt3dadd(-11.33, 41.42, -45.36, 0.5)
	pt3dadd(-11.5, 41.58, -45.36, 0.5)
	pt3dadd(-11.67, 41.75, -45.36, 0.5)
	pt3dadd(-12.33, 41.75, -45.36, 0.5)
	pt3dadd(-12.5, 41.92, -45.36, 0.5)
	pt3dadd(-13.67, 41.92, -45.36, 0.5)
	pt3dadd(-14, 41.58, -45.36, 0.5)
	pt3dadd(-14.33, 41.42, -45.36, 0.5)
	pt3dadd(-14.5, 41.25, -45.36, 0.5)
	pt3dadd(-14.67, 41.08, -46.44, 0.5)
	pt3dadd(-14.83, 40.92, -46.44, 0.5)
	pt3dadd(-15, 40.92, -46.44, 0.5)
  }
  dend[723] {pt3dclear()
	pt3dadd(-8.5, 39.58, -45.72, 0.5)
	pt3dadd(-8.17, 39.58, -45.72, 0.5)
	pt3dadd(-8, 39.92, -45.72, 0.5)
	pt3dadd(-7.67, 40.25, -45.72, 0.5)
	pt3dadd(-7.5, 40.58, -45.72, 0.5)
	pt3dadd(-7.5, 41.08, -45.72, 0.5)
	pt3dadd(-7.67, 41.42, -45.72, 0.5)
	pt3dadd(-7.83, 41.58, -45.72, 0.5)
	pt3dadd(-8, 41.75, -45.72, 0.5)
  }
  dend[724] {pt3dclear()
	pt3dadd(-8, 41.75, -45.72, 0.5)
	pt3dadd(-8, 41.58, -45.36, 0.5)
	pt3dadd(-8, 42.42, -45.36, 0.5)
	pt3dadd(-8.17, 42.75, -45.36, 0.5)
	pt3dadd(-8.33, 42.92, -45.36, 0.5)
	pt3dadd(-8.33, 43.25, -45.36, 0.5)
	pt3dadd(-8.5, 43.42, -45.36, 0.5)
	pt3dadd(-8.5, 43.75, -45.36, 0.5)
	pt3dadd(-8.67, 43.92, -45.36, 0.5)
	pt3dadd(-8.83, 44.08, -45.36, 0.5)
	pt3dadd(-8.83, 44.42, -45.36, 0.5)
	pt3dadd(-9, 44.58, -45.36, 0.5)
	pt3dadd(-9.17, 44.75, -45.36, 0.5)
	pt3dadd(-9.17, 45.08, -45.36, 0.5)
	pt3dadd(-9.33, 45.25, -45.36, 0.5)
  }
  dend[725] {pt3dclear()
	pt3dadd(-9.33, 45.25, -45.36, 0.5)
	pt3dadd(-9.33, 45.08, -45, 0.5)
	pt3dadd(-9.33, 45.42, -45, 0.5)
	pt3dadd(-9.5, 45.75, -45, 0.5)
	pt3dadd(-9.67, 45.92, -45, 0.5)
	pt3dadd(-9.83, 46.25, -45, 0.5)
	pt3dadd(-10, 46.42, -45, 0.5)
	pt3dadd(-10.17, 46.58, -45, 0.5)
	pt3dadd(-10.33, 46.75, -45, 0.5)
	pt3dadd(-10.5, 46.92, -45, 0.5)
	pt3dadd(-10.67, 47.08, -45, 0.5)
	pt3dadd(-10.83, 47.25, -45, 0.5)
	pt3dadd(-11, 47.42, -45, 0.5)
	pt3dadd(-11.17, 47.58, -45, 0.5)
	pt3dadd(-11.33, 47.75, -45, 0.5)
	pt3dadd(-11.5, 47.92, -45, 0.5)
	pt3dadd(-11.67, 47.92, -45, 0.5)
  }
  dend[726] {pt3dclear()
	pt3dadd(-9.33, 45.25, -45.36, 0.5)
	pt3dadd(-9, 45.08, -45.36, 0.5)
	pt3dadd(-8.83, 45.25, -45.36, 0.5)
	pt3dadd(-8.5, 45.25, -45.36, 0.5)
	pt3dadd(-8.17, 45.42, -45.36, 0.5)
	pt3dadd(-8, 45.58, -45.36, 0.5)
	pt3dadd(-7.83, 45.92, -45.36, 0.5)
	pt3dadd(-7.67, 46.08, -45.36, 0.5)
	pt3dadd(-7.67, 46.42, -45.36, 0.5)
  }
  dend[727] {pt3dclear()
	pt3dadd(-8, 41.75, -45.72, 0.5)
	pt3dadd(-7.5, 41.75, -45.72, 0.5)
	pt3dadd(-7.83, 41.75, -45.72, 0.5)
	pt3dadd(-8, 41.92, -45.72, 0.5)
	pt3dadd(-8.17, 42.08, -45.72, 0.5)
	pt3dadd(-8.67, 42.08, -45.72, 0.5)
	pt3dadd(-8.83, 42.25, -45.72, 0.5)
	pt3dadd(-9, 42.42, -45.72, 0.5)
	pt3dadd(-9.17, 42.58, -45.72, 0.5)
	pt3dadd(-9.33, 42.75, -45.72, 0.5)
	pt3dadd(-9.5, 42.92, -45.72, 0.5)
	pt3dadd(-9.67, 43.08, -45.72, 0.5)
	pt3dadd(-9.83, 43.25, -45.72, 0.5)
	pt3dadd(-10.17, 43.25, -45.72, 0.5)
	pt3dadd(-10.33, 43.42, -45.72, 0.5)
  }
  dend[728] {pt3dclear()
	pt3dadd(-8.17, 29.67, -39.96, 0.83)
	pt3dadd(-7.83, 29.67, -39.96, 0.83)
	pt3dadd(-8, 29.5, -39.96, 0.83)
	pt3dadd(-8.17, 29.33, -39.96, 0.83)
	pt3dadd(-8.33, 29.17, -39.96, 0.83)
	pt3dadd(-8.33, 28.83, -39.96, 0.83)
	pt3dadd(-8.5, 28.67, -39.96, 0.83)
	pt3dadd(-8.67, 28.33, -39.96, 0.83)
	pt3dadd(-8.83, 28.17, -39.96, 0.83)
	pt3dadd(-9, 28, -39.96, 0.83)
	pt3dadd(-9, 27.5, -39.96, 0.83)
	pt3dadd(-9.17, 27.33, -39.96, 0.83)
	pt3dadd(-9.17, 27, -39.96, 0.83)
	pt3dadd(-9.33, 26.83, -39.96, 0.83)
	pt3dadd(-9.5, 26.67, -39.96, 0.83)
	pt3dadd(-9.67, 26.33, -39.96, 0.83)
	pt3dadd(-9.83, 26.17, -39.96, 0.83)
  }
  dend[729] {pt3dclear()
	pt3dadd(-9.83, 26.17, -39.96, 0.83)
	pt3dadd(-9.83, 26.33, -39.96, 0.83)
	pt3dadd(-9.83, 25.83, -39.96, 0.83)
	pt3dadd(-10, 25.67, -39.96, 0.83)
	pt3dadd(-11.33, 25.67, -39.96, 0.83)
	pt3dadd(-11.67, 26, -39.96, 0.83)
	pt3dadd(-11.83, 26.17, -39.96, 0.83)
	pt3dadd(-12, 26.33, -39.96, 0.83)
	pt3dadd(-12.17, 26.67, -39.96, 0.83)
	pt3dadd(-12.33, 26.83, -39.96, 0.83)
	pt3dadd(-12.67, 27, -39.96, 0.83)
	pt3dadd(-12.83, 27.17, -39.96, 0.83)
	pt3dadd(-13, 27.33, -39.96, 0.83)
	pt3dadd(-13.17, 27.5, -39.96, 0.83)
  }
  dend[730] {pt3dclear()
	pt3dadd(-13.17, 27.5, -39.96, 0.83)
	pt3dadd(-13.28, 27.61, -40.94, 0.5)
  }
  dend[731] {pt3dclear()
	pt3dadd(-13.28, 27.61, -40.94, 0.5)
	pt3dadd(-13.5, 27.83, -42.84, 0.5)
	pt3dadd(-14, 28.17, -42.84, 0.5)
	pt3dadd(-14.33, 28.33, -42.84, 0.5)
	pt3dadd(-14.5, 28.5, -42.84, 0.5)
	pt3dadd(-14.67, 28.67, -42.84, 0.5)
	pt3dadd(-15, 28.83, -42.84, 0.5)
	pt3dadd(-15.33, 29, -42.84, 0.5)
	pt3dadd(-15.67, 29, -42.84, 0.5)
	pt3dadd(-16, 29.17, -42.84, 0.5)
	pt3dadd(-16.32, 29.33, -42.84, 0.5)
	pt3dadd(-17, 29.33, -42.84, 0.5)
	pt3dadd(-17.17, 29.5, -42.84, 0.5)
	pt3dadd(-18.17, 29.5, -42.84, 0.5)
  }
  dend[732] {pt3dclear()
	pt3dadd(-18.17, 29.5, -42.84, 0.5)
	pt3dadd(-17.17, 29.67, -42.48, 0.5)
	pt3dadd(-19, 29.67, -42.48, 0.5)
	pt3dadd(-19.17, 29.5, -42.48, 0.5)
	pt3dadd(-20.17, 29.5, -42.48, 0.5)
  }
  dend[733] {pt3dclear()
	pt3dadd(-20.17, 29.5, -42.48, 0.5)
	pt3dadd(-19.32, 29.5, -42.48, 0.5)
	pt3dadd(-20.67, 29.5, -42.48, 0.5)
  }
}
proc shape3d_64() {
  dend[733] {	pt3dadd(-20.83, 29.33, -42.48, 0.5)
	pt3dadd(-21.17, 29.17, -42.48, 0.5)
	pt3dadd(-21.33, 29, -42.48, 0.5)
	pt3dadd(-21.83, 29, -42.48, 0.5)
	pt3dadd(-22, 28.83, -42.48, 0.5)
	pt3dadd(-22.17, 28.67, -42.48, 0.5)
	pt3dadd(-22.33, 28.67, -42.48, 0.5)
  }
  dend[734] {pt3dclear()
	pt3dadd(-20.17, 29.5, -42.48, 0.5)
	pt3dadd(-19.17, 29.67, -42.48, 0.5)
	pt3dadd(-19.17, 29.17, -42.48, 0.5)
	pt3dadd(-19.32, 29, -42.48, 0.5)
	pt3dadd(-19.5, 28.83, -42.48, 0.5)
	pt3dadd(-19.67, 28.5, -42.48, 0.5)
	pt3dadd(-19.67, 27.5, -42.48, 0.5)
	pt3dadd(-19.82, 27.33, -42.48, 0.5)
	pt3dadd(-20, 27.17, -42.48, 0.5)
	pt3dadd(-20.32, 27.17, -42.48, 0.5)
	pt3dadd(-20.5, 27, -42.48, 0.5)
  }
  dend[735] {pt3dclear()
	pt3dadd(-18.17, 29.5, -42.84, 0.5)
	pt3dadd(-17.5, 29.5, -42.84, 0.5)
	pt3dadd(-17.5, 29, -42.84, 0.5)
	pt3dadd(-17.82, 28.83, -42.84, 0.5)
	pt3dadd(-18, 28.67, -42.84, 0.5)
	pt3dadd(-18, 27.5, -42.84, 0.5)
	pt3dadd(-17.82, 27.33, -42.84, 0.5)
	pt3dadd(-17.67, 27.17, -42.84, 0.5)
	pt3dadd(-17.67, 26.67, -42.84, 0.5)
  }
  dend[736] {pt3dclear()
	pt3dadd(-13.28, 27.61, -40.94, 0.5)
	pt3dadd(-13.17, 27.83, -39.96, 0.83)
	pt3dadd(-13.33, 27.67, -39.96, 0.83)
	pt3dadd(-13.67, 27.67, -39.96, 0.83)
	pt3dadd(-13.83, 27.5, -39.96, 0.83)
	pt3dadd(-14, 27.33, -39.96, 0.83)
	pt3dadd(-14.17, 27.17, -39.96, 0.83)
	pt3dadd(-14.33, 27, -39.96, 0.83)
	pt3dadd(-14.5, 26.83, -39.96, 0.83)
	pt3dadd(-14.5, 26.5, -39.96, 0.83)
	pt3dadd(-14.67, 26.33, -39.96, 0.83)
	pt3dadd(-14.83, 26, -39.96, 0.83)
	pt3dadd(-15, 25.67, -39.96, 0.83)
	pt3dadd(-15.17, 25.5, -39.96, 0.83)
	pt3dadd(-15.17, 25.17, -39.96, 0.83)
	pt3dadd(-15.33, 25, -39.96, 0.83)
	pt3dadd(-15.33, 24.67, -39.96, 0.83)
	pt3dadd(-15.5, 24.5, -39.96, 0.83)
  }
  dend[737] {pt3dclear()
	pt3dadd(-15.5, 24.5, -39.96, 0.83)
	pt3dadd(-15.33, 24.67, -39.96, 0.5)
	pt3dadd(-15.5, 24.5, -39.96, 0.5)
	pt3dadd(-15.83, 24.5, -39.96, 0.5)
	pt3dadd(-16, 24.33, -39.96, 0.5)
	pt3dadd(-16.17, 24.17, -39.96, 0.5)
	pt3dadd(-16.32, 24, -39.96, 0.5)
	pt3dadd(-16.67, 24, -39.96, 0.5)
	pt3dadd(-16.82, 23.83, -39.96, 0.5)
  }
  dend[738] {pt3dclear()
	pt3dadd(-16.82, 23.83, -39.96, 0.5)
	pt3dadd(-16.82, 24, -39.96, 0.5)
	pt3dadd(-17.17, 24, -39.96, 0.5)
	pt3dadd(-17.32, 24.17, -39.96, 0.5)
	pt3dadd(-17.5, 24.33, -39.96, 0.5)
	pt3dadd(-17.82, 24.33, -39.96, 0.5)
	pt3dadd(-18, 24.5, -39.96, 0.5)
	pt3dadd(-18.17, 24.67, -39.96, 0.5)
	pt3dadd(-18.5, 24.83, -39.96, 0.5)
	pt3dadd(-18.67, 25, -39.96, 0.5)
	pt3dadd(-18.82, 25, -39.96, 0.5)
  }
  dend[739] {pt3dclear()
	pt3dadd(-18.82, 25, -39.96, 0.5)
	pt3dadd(-18.82, 25.17, -39.96, 0.5)
	pt3dadd(-19.32, 25.17, -39.96, 0.5)
	pt3dadd(-19.67, 25.33, -39.96, 0.5)
	pt3dadd(-20.17, 25.33, -39.96, 0.5)
	pt3dadd(-20.5, 25.5, -39.96, 0.5)
	pt3dadd(-20.67, 25.67, -39.96, 0.5)
	pt3dadd(-20.83, 25.5, -39.96, 0.5)
  }
  dend[740] {pt3dclear()
	pt3dadd(-20.83, 25.5, -39.96, 0.5)
	pt3dadd(-21, 25.67, -39.96, 0.5)
	pt3dadd(-21, 26, -39.96, 0.5)
	pt3dadd(-21.17, 26.17, -39.96, 0.5)
	pt3dadd(-21.33, 26.5, -39.96, 0.5)
	pt3dadd(-21.5, 26.67, -39.96, 0.5)
	pt3dadd(-21.67, 27, -39.96, 0.5)
	pt3dadd(-21.83, 27.17, -39.96, 0.5)
	pt3dadd(-22.17, 27.33, -39.96, 0.5)
	pt3dadd(-22.33, 27.33, -39.96, 0.5)
  }
  dend[741] {pt3dclear()
	pt3dadd(-22.33, 27.33, -39.96, 0.5)
	pt3dadd(-22.4, 27.33, -38.96, 0.5)
  }
  dend[742] {pt3dclear()
	pt3dadd(-22.4, 27.33, -38.96, 0.5)
	pt3dadd(-22.5, 27.33, -37.79, 0.5)
	pt3dadd(-22.5, 27.67, -37.79, 0.5)
	pt3dadd(-22.67, 27.83, -37.79, 0.5)
	pt3dadd(-22.83, 28, -37.79, 0.5)
	pt3dadd(-23, 28.17, -37.79, 0.5)
	pt3dadd(-23, 28.67, -37.79, 0.5)
	pt3dadd(-23.17, 28.83, -37.79, 0.5)
	pt3dadd(-23.17, 29.67, -37.79, 0.5)
	pt3dadd(-23.33, 29.5, -37.79, 0.5)
  }
  dend[743] {pt3dclear()
	pt3dadd(-23.33, 29.5, -37.79, 0.5)
	pt3dadd(-23.33, 29.67, -37.79, 0.5)
	pt3dadd(-23.17, 30, -37.79, 0.5)
	pt3dadd(-23, 30.17, -37.79, 0.5)
	pt3dadd(-23, 30.5, -37.79, 0.5)
	pt3dadd(-22.83, 30.83, -37.79, 0.5)
	pt3dadd(-22.67, 31, -37.79, 0.5)
	pt3dadd(-22.5, 31.33, -37.79, 0.5)
	pt3dadd(-22.33, 31.67, -37.79, 0.5)
	pt3dadd(-22.17, 32, -37.79, 0.5)
	pt3dadd(-22, 32.17, -37.79, 0.5)
	pt3dadd(-22, 32.5, -37.79, 0.5)
	pt3dadd(-21.83, 32.67, -37.79, 0.5)
	pt3dadd(-21.67, 33, -37.79, 0.5)
	pt3dadd(-21.67, 33.67, -37.79, 0.5)
	pt3dadd(-21.5, 33.83, -37.79, 0.5)
	pt3dadd(-21.5, 34.17, -37.79, 0.5)
	pt3dadd(-21.67, 34.17, -37.79, 0.5)
  }
  dend[744] {pt3dclear()
	pt3dadd(-23.33, 29.5, -37.79, 0.5)
	pt3dadd(-23, 29.67, -37.79, 0.5)
	pt3dadd(-23.17, 29.83, -37.79, 0.5)
	pt3dadd(-23.33, 30.17, -37.79, 0.5)
	pt3dadd(-23.83, 30.67, -37.79, 0.5)
	pt3dadd(-24, 30.83, -37.79, 0.5)
	pt3dadd(-24.17, 31, -37.79, 0.5)
	pt3dadd(-24.33, 31.33, -37.79, 0.5)
	pt3dadd(-24.5, 31.5, -37.79, 0.5)
	pt3dadd(-24.67, 31.83, -37.79, 0.5)
	pt3dadd(-24.67, 32.83, -37.79, 0.5)
	pt3dadd(-24.5, 33, -37.79, 0.5)
	pt3dadd(-24.33, 33.17, -37.79, 0.5)
	pt3dadd(-24.17, 33.5, -37.79, 0.5)
	pt3dadd(-24, 33.83, -37.79, 0.5)
	pt3dadd(-23.83, 34, -37.79, 0.5)
  }
  dend[745] {pt3dclear()
	pt3dadd(-22.4, 27.33, -38.96, 0.5)
	pt3dadd(-22.17, 27.33, -39.96, 0.5)
	pt3dadd(-22.5, 27.33, -39.96, 0.5)
	pt3dadd(-22.83, 27.17, -39.96, 0.5)
	pt3dadd(-23.17, 27, -39.96, 0.5)
	pt3dadd(-23.33, 26.83, -39.96, 0.5)
	pt3dadd(-23.5, 26.67, -39.96, 0.5)
	pt3dadd(-23.67, 26.5, -39.96, 0.5)
	pt3dadd(-23.83, 26.33, -39.96, 0.5)
	pt3dadd(-23.83, 26, -39.96, 0.5)
	pt3dadd(-24, 25.83, -39.96, 0.5)
	pt3dadd(-24.17, 25.67, -39.96, 0.5)
	pt3dadd(-24.33, 25.5, -39.96, 0.5)
	pt3dadd(-24.33, 25.17, -39.96, 0.5)
	pt3dadd(-24.5, 24.83, -39.96, 0.5)
	pt3dadd(-24.67, 24.67, -39.96, 0.5)
	pt3dadd(-24.67, 24.33, -39.96, 0.5)
	pt3dadd(-24.83, 24.17, -39.96, 0.5)
	pt3dadd(-25, 23.83, -39.96, 0.5)
	pt3dadd(-25.17, 23.67, -39.96, 0.5)
	pt3dadd(-25.5, 23.67, -39.96, 0.5)
	pt3dadd(-25.5, 23.5, -39.96, 0.5)
  }
  dend[746] {pt3dclear()
	pt3dadd(-25.5, 23.5, -39.96, 0.5)
	pt3dadd(-25.5, 23.67, -39.96, 0.5)
	pt3dadd(-25.83, 23.67, -39.96, 0.5)
	pt3dadd(-26, 23.5, -39.96, 0.5)
	pt3dadd(-26.17, 23.33, -39.96, 0.5)
	pt3dadd(-26.33, 23.17, -39.96, 0.5)
	pt3dadd(-26.5, 23, -39.96, 0.5)
	pt3dadd(-26.67, 22.83, -39.96, 0.5)
	pt3dadd(-26.83, 22.67, -39.96, 0.5)
	pt3dadd(-27, 22.33, -39.96, 0.5)
	pt3dadd(-27, 22, -39.96, 0.5)
	pt3dadd(-27.17, 21.83, -39.96, 0.5)
	pt3dadd(-27.33, 21.67, -39.96, 0.5)
  }
  dend[747] {pt3dclear()
	pt3dadd(-25.5, 23.5, -39.96, 0.5)
	pt3dadd(-25.5, 23.67, -39.96, 0.5)
	pt3dadd(-25.33, 23.33, -39.96, 0.5)
	pt3dadd(-25.17, 23.17, -39.96, 0.5)
	pt3dadd(-25, 22.83, -39.96, 0.5)
	pt3dadd(-24.83, 22.67, -39.96, 0.5)
	pt3dadd(-24.67, 22.5, -39.96, 0.5)
	pt3dadd(-24.5, 22.33, -39.96, 0.5)
	pt3dadd(-24.33, 22, -39.96, 0.5)
	pt3dadd(-24.17, 21.83, -39.96, 0.5)
  }
  dend[748] {pt3dclear()
	pt3dadd(-22.33, 27.33, -39.96, 0.5)
	pt3dadd(-22, 27.67, -39.96, 0.5)
	pt3dadd(-21.83, 27.83, -39.96, 0.5)
	pt3dadd(-21.67, 28, -39.96, 0.5)
	pt3dadd(-21.67, 28.33, -39.96, 0.5)
	pt3dadd(-21, 28.33, -39.96, 0.5)
  }
  dend[749] {pt3dclear()
	pt3dadd(-20.83, 25.5, -39.96, 0.5)
	pt3dadd(-20.67, 25.67, -39.96, 0.5)
	pt3dadd(-20.67, 25.33, -39.96, 0.5)
	pt3dadd(-20.83, 25, -39.96, 0.5)
	pt3dadd(-21.17, 25, -39.96, 0.5)
	pt3dadd(-21.5, 24.83, -39.96, 0.5)
	pt3dadd(-21.67, 24.67, -39.96, 0.5)
	pt3dadd(-21.83, 24.5, -39.96, 0.5)
	pt3dadd(-22.17, 24.33, -39.96, 0.5)
	pt3dadd(-22.33, 24, -39.96, 0.5)
	pt3dadd(-22.5, 23.83, -39.96, 0.5)
	pt3dadd(-22.67, 23.67, -39.96, 0.5)
	pt3dadd(-22.83, 23.5, -39.96, 0.5)
	pt3dadd(-23, 23.33, -39.96, 0.5)
	pt3dadd(-23.17, 23.17, -39.96, 0.5)
	pt3dadd(-23.5, 23, -39.96, 0.5)
	pt3dadd(-23.67, 22.83, -39.96, 0.5)
	pt3dadd(-24.67, 22.83, -39.96, 0.5)
	pt3dadd(-24.83, 22.67, -39.96, 0.5)
  }
  dend[750] {pt3dclear()
	pt3dadd(-18.82, 25, -39.96, 0.5)
  }
}
proc shape3d_65() {
  dend[750] {	pt3dadd(-18.67, 25.5, -39.96, 0.5)
	pt3dadd(-18.67, 27.5, -39.96, 0.5)
	pt3dadd(-18.5, 27.67, -39.96, 0.5)
  }
  dend[751] {pt3dclear()
	pt3dadd(-16.82, 23.83, -39.96, 0.5)
	pt3dadd(-16.67, 24.17, -39.96, 0.5)
	pt3dadd(-16.5, 24, -39.96, 0.5)
	pt3dadd(-16.5, 23.67, -39.96, 0.5)
	pt3dadd(-16.67, 23.5, -39.96, 0.5)
	pt3dadd(-16.82, 23.33, -39.96, 0.5)
	pt3dadd(-16.82, 23, -39.96, 0.5)
	pt3dadd(-17, 22.83, -39.96, 0.5)
	pt3dadd(-17.17, 22.67, -39.96, 0.5)
	pt3dadd(-17.32, 22.5, -39.96, 0.5)
	pt3dadd(-17.5, 22.33, -39.96, 0.5)
  }
  dend[752] {pt3dclear()
	pt3dadd(-17.5, 22.33, -39.96, 0.5)
	pt3dadd(-16.5, 22.33, -39.96, 0.5)
  }
  dend[753] {pt3dclear()
	pt3dadd(-16.5, 22.33, -39.96, 0.5)
	pt3dadd(-17.17, 22.33, -39.96, 0.5)
	pt3dadd(-17, 22.17, -39.96, 0.5)
	pt3dadd(-17, 21.5, -39.96, 0.5)
	pt3dadd(-16.82, 21.33, -39.96, 0.5)
	pt3dadd(-16.82, 20.5, -39.96, 0.5)
	pt3dadd(-16.67, 20.32, -39.96, 0.5)
	pt3dadd(-16.5, 20.17, -39.96, 0.5)
	pt3dadd(-16.32, 20, -39.96, 0.5)
  }
  dend[754] {pt3dclear()
	pt3dadd(-16.5, 22.33, -39.96, 0.5)
	pt3dadd(-17.5, 22.33, -39.96, 0.5)
	pt3dadd(-17.5, 21.83, -39.96, 0.5)
	pt3dadd(-17.67, 21.5, -39.96, 0.5)
	pt3dadd(-17.82, 21.33, -39.96, 0.5)
	pt3dadd(-17.82, 21, -39.96, 0.5)
	pt3dadd(-18.17, 20.83, -39.96, 0.5)
	pt3dadd(-18.32, 20.5, -39.96, 0.5)
	pt3dadd(-18.5, 20.32, -39.96, 0.5)
	pt3dadd(-18.67, 20.32, -39.96, 0.5)
  }
  dend[755] {pt3dclear()
	pt3dadd(-17.5, 22.33, -39.96, 0.5)
	pt3dadd(-17, 22.5, -39.96, 0.5)
	pt3dadd(-18.67, 22.5, -39.96, 0.5)
	pt3dadd(-19, 22.33, -39.96, 0.5)
	pt3dadd(-20.32, 22.33, -39.96, 0.5)
	pt3dadd(-20.32, 22.17, -39.96, 0.5)
  }
  dend[756] {pt3dclear()
	pt3dadd(-15.5, 24.5, -39.96, 0.83)
	pt3dadd(-15.33, 24.5, -39.96, 0.5)
	pt3dadd(-15.33, 24.17, -39.96, 0.5)
	pt3dadd(-15.17, 24, -39.96, 0.5)
	pt3dadd(-15.17, 23.67, -39.96, 0.5)
	pt3dadd(-15, 23.5, -39.96, 0.5)
	pt3dadd(-14.83, 23.33, -39.96, 0.5)
	pt3dadd(-14.67, 23.17, -39.96, 0.5)
	pt3dadd(-14.5, 23, -39.96, 0.5)
	pt3dadd(-14.33, 22.83, -39.96, 0.5)
	pt3dadd(-14.17, 22.67, -39.96, 0.5)
	pt3dadd(-14.17, 22.5, -39.96, 0.5)
  }
  dend[757] {pt3dclear()
	pt3dadd(-14.17, 22.5, -39.96, 0.5)
	pt3dadd(-14, 22.67, -39.96, 0.5)
	pt3dadd(-13.67, 22.67, -39.96, 0.5)
	pt3dadd(-13.67, 22.33, -39.96, 0.5)
	pt3dadd(-13.5, 22.17, -39.96, 0.5)
	pt3dadd(-13.33, 22, -39.96, 0.5)
	pt3dadd(-13, 21.67, -39.96, 0.5)
	pt3dadd(-12.83, 21.5, -39.96, 0.5)
	pt3dadd(-12.5, 21.33, -39.96, 0.5)
	pt3dadd(-12.17, 21.33, -39.96, 0.5)
	pt3dadd(-12.17, 21.17, -39.96, 0.5)
  }
  dend[758] {pt3dclear()
	pt3dadd(-14.17, 22.5, -39.96, 0.5)
	pt3dadd(-13.67, 22.5, -39.96, 0.5)
	pt3dadd(-13.67, 21.5, -39.96, 0.5)
	pt3dadd(-13.83, 21.17, -39.96, 0.5)
	pt3dadd(-14.17, 20.83, -39.96, 0.5)
	pt3dadd(-14.33, 20.67, -39.96, 0.5)
	pt3dadd(-14.67, 20.67, -39.96, 0.5)
	pt3dadd(-14.83, 20.5, -39.96, 0.5)
	pt3dadd(-15.17, 20.32, -39.96, 0.5)
	pt3dadd(-15.33, 20.17, -39.96, 0.5)
	pt3dadd(-15.5, 20, -39.96, 0.5)
	pt3dadd(-15.67, 19.82, -39.96, 0.5)
	pt3dadd(-15.67, 18.32, -39.96, 0.5)
	pt3dadd(-15.83, 18.17, -39.96, 0.5)
	pt3dadd(-15.83, 16.67, -39.96, 0.5)
	pt3dadd(-16, 16.5, -39.96, 0.5)
	pt3dadd(-16.17, 16.32, -39.96, 0.5)
  }
  dend[759] {pt3dclear()
	pt3dadd(-13.17, 27.5, -39.96, 0.83)
	pt3dadd(-13.5, 27.83, -39.96, 0.83)
	pt3dadd(-13.5, 28.17, -39.96, 0.83)
	pt3dadd(-13.33, 28.5, -39.96, 0.83)
	pt3dadd(-13.17, 28.67, -39.96, 0.83)
	pt3dadd(-13.17, 29, -39.96, 0.83)
	pt3dadd(-13, 29.33, -39.96, 0.83)
	pt3dadd(-12.83, 29.5, -39.96, 0.83)
	pt3dadd(-12.67, 29.67, -39.96, 0.83)
	pt3dadd(-12.67, 29.83, -39.96, 0.83)
  }
  dend[760] {pt3dclear()
	pt3dadd(-9.83, 26.17, -39.96, 0.83)
	pt3dadd(-9.33, 26.17, -39.96, 0.83)
	pt3dadd(-9.17, 26, -39.96, 0.83)
	pt3dadd(-9, 25.83, -39.96, 0.83)
	pt3dadd(-8.83, 25.67, -39.96, 0.83)
	pt3dadd(-8.5, 25.67, -39.96, 0.83)
	pt3dadd(-8.33, 25.33, -39.96, 0.83)
	pt3dadd(-8.17, 25.17, -39.96, 0.83)
	pt3dadd(-8, 25, -39.96, 0.83)
	pt3dadd(-7.83, 24.83, -39.96, 0.83)
	pt3dadd(-7, 24.83, -39.96, 0.83)
	pt3dadd(-6.83, 25, -39.96, 0.83)
	pt3dadd(-6.5, 25, -39.96, 0.83)
	pt3dadd(-6.33, 25.17, -39.96, 0.83)
	pt3dadd(-6.17, 25.33, -39.96, 0.83)
	pt3dadd(-6, 25.5, -39.96, 0.83)
	pt3dadd(-5.83, 25.5, -39.96, 0.83)
  }
  dend[761] {pt3dclear()
	pt3dadd(-3.83, 25.67, -40.32, 1.33)
	pt3dadd(-3.67, 25.83, -40.32, 1.33)
	pt3dadd(-3.83, 25.5, -40.32, 1.33)
	pt3dadd(-4, 25.33, -40.32, 1.33)
	pt3dadd(-4.17, 25.17, -40.32, 1.33)
	pt3dadd(-4.33, 24.83, -40.32, 1.33)
	pt3dadd(-4.33, 24.33, -40.32, 1.33)
	pt3dadd(-4.5, 24, -40.32, 1.33)
	pt3dadd(-4.5, 23.67, -40.32, 1.33)
	pt3dadd(-4.67, 23.5, -40.32, 1.33)
  }
  dend[762] {pt3dclear()
	pt3dadd(-4.67, 23.5, -40.32, 1.33)
	pt3dadd(-5, 23.5, -41.76, 0.33)
	pt3dadd(-5.17, 23.33, -41.76, 0.33)
	pt3dadd(-5.67, 23.33, -41.76, 0.33)
	pt3dadd(-5.83, 23.17, -41.76, 0.33)
	pt3dadd(-5.83, 22.67, -41.76, 0.33)
	pt3dadd(-6, 22.5, -41.76, 0.33)
	pt3dadd(-6, 21.83, -41.76, 0.33)
	pt3dadd(-6.17, 21.67, -41.76, 0.33)
	pt3dadd(-6.17, 21.33, -41.76, 0.33)
	pt3dadd(-6.33, 21.17, -41.76, 0.33)
	pt3dadd(-6.5, 21, -41.76, 0.33)
	pt3dadd(-6.5, 20.67, -41.76, 0.33)
	pt3dadd(-6.67, 20.5, -41.76, 0.33)
	pt3dadd(-6.83, 20.32, -41.76, 0.33)
	pt3dadd(-7, 20.17, -41.76, 0.33)
	pt3dadd(-7.17, 20, -41.76, 0.33)
	pt3dadd(-7.33, 19.82, -41.76, 0.33)
	pt3dadd(-7.5, 19.67, -41.76, 0.33)
	pt3dadd(-7.83, 19.5, -41.76, 0.33)
	pt3dadd(-8, 19.32, -41.76, 0.33)
	pt3dadd(-8.33, 19.32, -41.76, 0.33)
	pt3dadd(-8.5, 19.17, -41.76, 0.33)
	pt3dadd(-8.67, 19, -41.76, 0.33)
	pt3dadd(-9, 19, -41.76, 0.33)
	pt3dadd(-9.17, 18.82, -41.76, 0.33)
	pt3dadd(-9.17, 18.67, -41.76, 0.33)
  }
  dend[763] {pt3dclear()
	pt3dadd(-9.17, 18.67, -41.76, 0.33)
	pt3dadd(-9.37, 19.09, -42.22, 0.33)
  }
  dend[764] {pt3dclear()
	pt3dadd(-9.37, 19.09, -42.22, 0.33)
	pt3dadd(-9.33, 19, -42.12, 0.33)
	pt3dadd(-9.33, 19.67, -42.12, 0.33)
	pt3dadd(-9.5, 19.82, -42.12, 0.33)
	pt3dadd(-9.67, 20, -42.12, 0.33)
	pt3dadd(-9.83, 20.17, -42.12, 0.33)
	pt3dadd(-10.17, 20.32, -42.12, 0.33)
	pt3dadd(-11.17, 20.32, -42.12, 0.33)
	pt3dadd(-11.33, 20.5, -42.12, 0.33)
	pt3dadd(-11.5, 20.32, -42.12, 0.33)
  }
  dend[765] {pt3dclear()
	pt3dadd(-9.37, 19.09, -42.22, 0.33)
	pt3dadd(-8.83, 18.82, -43.2, 0.33)
	pt3dadd(-9, 18.67, -43.2, 0.33)
	pt3dadd(-9.33, 18.67, -43.2, 0.33)
	pt3dadd(-9.5, 18.5, -43.2, 0.33)
	pt3dadd(-9.83, 18.5, -43.2, 0.33)
	pt3dadd(-10, 18.32, -43.2, 0.33)
	pt3dadd(-10.33, 18.17, -43.2, 0.33)
	pt3dadd(-10.5, 18, -43.2, 0.33)
	pt3dadd(-10.67, 17.82, -43.2, 0.33)
	pt3dadd(-11, 17.67, -43.2, 0.33)
	pt3dadd(-11.33, 17.67, -43.2, 0.33)
	pt3dadd(-11.5, 17.5, -43.2, 0.33)
	pt3dadd(-11.67, 17.32, -43.2, 0.33)
	pt3dadd(-11.83, 17.17, -43.2, 0.33)
	pt3dadd(-12.17, 17.17, -43.2, 0.33)
	pt3dadd(-12.5, 17.32, -43.2, 0.33)
	pt3dadd(-12.67, 17.5, -43.2, 0.33)
	pt3dadd(-13.5, 17.5, -43.2, 0.33)
	pt3dadd(-13.67, 17.67, -42.84, 0.33)
	pt3dadd(-15.67, 17.67, -42.84, 0.33)
	pt3dadd(-15.83, 17.82, -42.84, 0.33)
	pt3dadd(-16.67, 17.82, -42.84, 0.33)
	pt3dadd(-16.67, 17.67, -42.84, 0.33)
  }
  dend[766] {pt3dclear()
	pt3dadd(-16.67, 17.67, -42.84, 0.33)
	pt3dadd(-16.32, 17.5, -42.84, 0.33)
	pt3dadd(-16.67, 17.32, -42.84, 0.33)
	pt3dadd(-17.17, 17.32, -42.84, 0.33)
	pt3dadd(-17.5, 17.17, -42.84, 0.33)
	pt3dadd(-18, 17.17, -42.84, 0.33)
  }
  dend[767] {pt3dclear()
	pt3dadd(-18, 17.17, -42.84, 0.33)
	pt3dadd(-18.32, 17, -42.48, 0.33)
	pt3dadd(-18.5, 17.17, -42.48, 0.33)
	pt3dadd(-18.82, 17, -42.48, 0.33)
	pt3dadd(-19.82, 17, -42.48, 0.33)
	pt3dadd(-20, 16.82, -42.48, 0.33)
	pt3dadd(-20.67, 16.82, -42.48, 0.33)
	pt3dadd(-20.83, 16.67, -42.48, 0.33)
	pt3dadd(-20.83, 16.32, -42.48, 0.33)
	pt3dadd(-21, 16.17, -42.48, 0.33)
	pt3dadd(-21.17, 16, -42.48, 0.33)
	pt3dadd(-21.33, 15.83, -42.48, 0.33)
	pt3dadd(-21.5, 15.67, -42.48, 0.33)
  }
}
proc shape3d_66() {
  dend[767] {	pt3dadd(-21.67, 15.5, -42.48, 0.33)
	pt3dadd(-21.67, 15.17, -42.48, 0.33)
	pt3dadd(-22, 15.17, -42.48, 0.33)
	pt3dadd(-22, 15, -42.48, 0.33)
  }
  dend[768] {pt3dclear()
	pt3dadd(-22, 15, -42.48, 0.33)
	pt3dadd(-22.17, 15.17, -42.12, 0.33)
	pt3dadd(-22.33, 15, -42.12, 0.33)
	pt3dadd(-22.5, 14.83, -42.12, 0.33)
	pt3dadd(-22.67, 14.67, -42.12, 0.33)
	pt3dadd(-23, 14.67, -42.12, 0.33)
	pt3dadd(-23.17, 14.5, -42.12, 0.33)
	pt3dadd(-24.5, 14.5, -42.12, 0.33)
	pt3dadd(-24.67, 14.33, -42.12, 0.33)
  }
  dend[769] {pt3dclear()
	pt3dadd(-22, 15, -42.48, 0.33)
	pt3dadd(-22, 15.33, -42.48, 0.33)
	pt3dadd(-21.83, 15.17, -42.48, 0.33)
	pt3dadd(-21.83, 14.33, -42.48, 0.33)
	pt3dadd(-21.67, 14, -42.48, 0.33)
	pt3dadd(-21.5, 13.67, -42.48, 0.33)
	pt3dadd(-21.5, 11.5, -42.48, 0.33)
	pt3dadd(-21.67, 11.33, -42.48, 0.33)
	pt3dadd(-21.67, 8, -42.48, 0.33)
  }
  dend[770] {pt3dclear()
	pt3dadd(-21.67, 8, -42.48, 0.33)
	pt3dadd(-22, 8.33, -42.48, 0.33)
	pt3dadd(-21.83, 8.5, -42.48, 0.33)
	pt3dadd(-20.5, 8.5, -42.48, 0.33)
	pt3dadd(-20.17, 8.33, -42.48, 0.33)
	pt3dadd(-19.67, 8.17, -42.48, 0.33)
	pt3dadd(-19.32, 8, -42.48, 0.33)
	pt3dadd(-19.17, 7.83, -42.48, 0.33)
	pt3dadd(-19.17, 7.5, -42.48, 0.33)
  }
  dend[771] {pt3dclear()
	pt3dadd(-21.67, 8, -42.48, 0.33)
	pt3dadd(-21.17, 8, -42.48, 0.33)
	pt3dadd(-21.17, 5.83, -42.48, 0.33)
	pt3dadd(-21.33, 5.67, -42.48, 0.33)
	pt3dadd(-21.5, 5.5, -42.48, 0.33)
	pt3dadd(-21.67, 5.17, -42.48, 0.33)
	pt3dadd(-21.83, 5, -42.48, 0.33)
  }
  dend[772] {pt3dclear()
	pt3dadd(-18, 17.17, -42.84, 0.33)
	pt3dadd(-18.17, 17, -42.84, 0.33)
	pt3dadd(-18.17, 15.5, -42.84, 0.33)
	pt3dadd(-18, 15.33, -42.84, 0.33)
	pt3dadd(-17.82, 15, -42.84, 0.33)
	pt3dadd(-17.67, 14.83, -42.84, 0.33)
	pt3dadd(-17.5, 14.5, -42.84, 0.33)
	pt3dadd(-17.5, 14.17, -42.84, 0.33)
	pt3dadd(-17.32, 14, -42.84, 0.33)
	pt3dadd(-17.32, 12.5, -42.84, 0.33)
	pt3dadd(-17.17, 12.17, -42.84, 0.33)
	pt3dadd(-17.17, 11, -42.84, 0.33)
	pt3dadd(-17, 10.83, -42.84, 0.33)
	pt3dadd(-17, 10.33, -42.84, 0.33)
	pt3dadd(-17.17, 10.17, -42.84, 0.33)
	pt3dadd(-17.32, 9.83, -42.84, 0.33)
	pt3dadd(-17.5, 9.67, -42.84, 0.33)
	pt3dadd(-17.67, 9.5, -42.84, 0.33)
	pt3dadd(-17.82, 9.33, -42.84, 0.33)
	pt3dadd(-18.17, 9.33, -42.84, 0.33)
	pt3dadd(-18.17, 9.17, -42.84, 0.33)
  }
  dend[773] {pt3dclear()
	pt3dadd(-16.67, 17.67, -42.84, 0.33)
	pt3dadd(-16.5, 17.82, -43.2, 0.33)
	pt3dadd(-17.17, 17.82, -43.2, 0.33)
	pt3dadd(-17.32, 18, -43.2, 0.33)
	pt3dadd(-17.5, 18.17, -43.2, 0.33)
	pt3dadd(-17.67, 18.32, -43.2, 0.33)
	pt3dadd(-17.82, 18.5, -43.2, 0.33)
	pt3dadd(-18, 18.67, -43.2, 0.33)
	pt3dadd(-18.17, 18.82, -43.2, 0.33)
	pt3dadd(-18.32, 19.17, -43.2, 0.33)
	pt3dadd(-18.5, 19.17, -43.2, 0.33)
  }
  dend[774] {pt3dclear()
	pt3dadd(-18.5, 19.17, -43.2, 0.33)
	pt3dadd(-18.82, 19.32, -42.12, 0.33)
	pt3dadd(-20.83, 19.32, -42.12, 0.33)
	pt3dadd(-20.83, 19, -42.12, 0.33)
	pt3dadd(-21, 18.82, -42.12, 0.33)
	pt3dadd(-21, 18.5, -42.12, 0.33)
	pt3dadd(-21.17, 18.32, -42.12, 0.33)
	pt3dadd(-21.17, 18, -42.12, 0.33)
	pt3dadd(-21.33, 17.82, -42.12, 0.33)
  }
  dend[775] {pt3dclear()
	pt3dadd(-21.33, 17.82, -42.12, 0.33)
	pt3dadd(-21.5, 18, -42.48, 0.33)
	pt3dadd(-21.67, 18.17, -42.48, 0.33)
	pt3dadd(-22, 18.32, -42.48, 0.33)
	pt3dadd(-22.33, 18.32, -42.48, 0.33)
	pt3dadd(-22.5, 18.5, -42.48, 0.33)
	pt3dadd(-22.67, 18.67, -42.48, 0.33)
	pt3dadd(-23, 18.67, -42.48, 0.33)
	pt3dadd(-23.17, 18.82, -42.48, 0.33)
	pt3dadd(-23.5, 19, -42.48, 0.33)
	pt3dadd(-23.67, 19.17, -42.48, 0.33)
	pt3dadd(-24, 19.32, -42.48, 0.33)
	pt3dadd(-24.17, 19.5, -42.48, 0.33)
	pt3dadd(-24.33, 19.67, -42.48, 0.33)
	pt3dadd(-24.5, 19.82, -42.48, 0.33)
	pt3dadd(-25, 19.82, -42.48, 0.33)
	pt3dadd(-25.33, 19.67, -42.48, 0.33)
	pt3dadd(-25.5, 19.5, -42.48, 0.33)
	pt3dadd(-25.83, 19.5, -42.48, 0.33)
	pt3dadd(-26, 19.32, -43.2, 0.33)
	pt3dadd(-26.67, 19.32, -43.2, 0.33)
	pt3dadd(-26.83, 19.5, -43.2, 0.33)
	pt3dadd(-27.17, 19.67, -43.2, 0.33)
	pt3dadd(-27.33, 19.82, -43.2, 0.33)
	pt3dadd(-27.5, 20, -43.2, 0.33)
	pt3dadd(-28.33, 20, -43.2, 0.33)
	pt3dadd(-28.5, 19.82, -43.2, 0.33)
  }
  dend[776] {pt3dclear()
	pt3dadd(-28.5, 19.82, -43.2, 0.33)
	pt3dadd(-28.33, 19.82, -42.84, 0.33)
	pt3dadd(-28.5, 20, -42.84, 0.33)
	pt3dadd(-28.67, 20.32, -42.84, 0.33)
	pt3dadd(-28.83, 20.5, -42.84, 0.33)
	pt3dadd(-28.83, 20.83, -42.84, 0.33)
	pt3dadd(-29, 21, -42.84, 0.33)
	pt3dadd(-29.17, 21.17, -42.84, 0.33)
	pt3dadd(-29.17, 22, -42.84, 0.33)
  }
  dend[777] {pt3dclear()
	pt3dadd(-28.5, 19.82, -43.2, 0.33)
	pt3dadd(-28.67, 19.67, -43.2, 0.33)
	pt3dadd(-28.67, 19.32, -43.2, 0.33)
	pt3dadd(-28.83, 19.17, -43.2, 0.33)
	pt3dadd(-29, 19, -43.2, 0.33)
	pt3dadd(-29.17, 18.82, -43.2, 0.33)
	pt3dadd(-29.33, 18.67, -43.2, 0.33)
	pt3dadd(-29.67, 18.5, -43.2, 0.33)
	pt3dadd(-30, 18.17, -43.2, 0.33)
	pt3dadd(-30.17, 18, -43.2, 0.33)
	pt3dadd(-30.33, 17.82, -43.2, 0.33)
	pt3dadd(-30.5, 17.5, -43.2, 0.33)
	pt3dadd(-30.5, 17.17, -43.2, 0.33)
	pt3dadd(-30.67, 17, -43.2, 0.33)
	pt3dadd(-30.67, 16.82, -43.2, 0.33)
  }
  dend[778] {pt3dclear()
	pt3dadd(-21.33, 17.82, -42.12, 0.33)
	pt3dadd(-20.83, 17.82, -42.12, 0.33)
	pt3dadd(-21, 18, -42.12, 0.33)
	pt3dadd(-21.33, 18, -42.12, 0.33)
	pt3dadd(-21.67, 17.82, -42.12, 0.33)
	pt3dadd(-22, 17.82, -42.12, 0.33)
	pt3dadd(-22.17, 17.67, -42.12, 0.33)
	pt3dadd(-22.33, 17.5, -42.12, 0.33)
	pt3dadd(-22.5, 17.32, -42.12, 0.33)
	pt3dadd(-22.67, 17.17, -42.12, 0.33)
	pt3dadd(-23, 17.17, -42.12, 0.33)
	pt3dadd(-23.33, 17, -42.12, 0.33)
	pt3dadd(-23.5, 16.82, -42.12, 0.33)
	pt3dadd(-23.67, 16.67, -42.12, 0.33)
	pt3dadd(-23.83, 16.5, -42.12, 0.33)
	pt3dadd(-24.17, 16.32, -42.12, 0.33)
	pt3dadd(-24.33, 16.17, -42.12, 0.33)
	pt3dadd(-24.33, 15.67, -42.12, 0.33)
	pt3dadd(-24.5, 15.67, -42.12, 0.33)
  }
  dend[779] {pt3dclear()
	pt3dadd(-18.5, 19.17, -43.2, 0.33)
	pt3dadd(-18.17, 19, -43.2, 0.33)
	pt3dadd(-18.32, 19.17, -43.2, 0.33)
	pt3dadd(-19.17, 19.17, -43.2, 0.33)
	pt3dadd(-19.5, 19.32, -43.2, 0.33)
	pt3dadd(-19.67, 19.5, -43.2, 0.33)
	pt3dadd(-19.82, 19.67, -43.2, 0.33)
	pt3dadd(-20, 19.82, -43.2, 0.33)
	pt3dadd(-20.17, 20, -43.2, 0.33)
	pt3dadd(-20.32, 20.17, -43.2, 0.33)
	pt3dadd(-20.5, 20.32, -43.2, 0.33)
	pt3dadd(-20.67, 20.5, -43.2, 0.33)
	pt3dadd(-20.83, 20.67, -44.28, 0.33)
	pt3dadd(-21, 20.83, -44.28, 0.33)
	pt3dadd(-21.17, 21, -44.28, 0.33)
	pt3dadd(-21.33, 21.17, -44.28, 0.33)
	pt3dadd(-21.67, 21.33, -44.28, 0.33)
	pt3dadd(-21.83, 21.67, -44.28, 0.33)
	pt3dadd(-22, 21.83, -44.28, 0.33)
	pt3dadd(-22.17, 22, -44.28, 0.33)
	pt3dadd(-22.33, 22.33, -44.28, 0.33)
	pt3dadd(-22.5, 22.5, -44.28, 0.33)
	pt3dadd(-22.67, 22.67, -44.28, 0.33)
	pt3dadd(-22.83, 22.67, -44.28, 0.33)
	pt3dadd(-22.67, 22.67, -42.84, 0.33)
  }
  dend[780] {pt3dclear()
	pt3dadd(-22.67, 22.67, -42.84, 0.33)
	pt3dadd(-22.67, 22.83, -42.48, 0.33)
	pt3dadd(-23, 23, -42.48, 0.33)
	pt3dadd(-23.17, 23.17, -42.48, 0.33)
	pt3dadd(-23.5, 23.17, -42.48, 0.33)
	pt3dadd(-23.67, 23.33, -42.48, 0.33)
	pt3dadd(-24.17, 23.83, -42.48, 0.33)
	pt3dadd(-24.33, 24, -42.48, 0.33)
	pt3dadd(-24.5, 24.17, -42.48, 0.33)
	pt3dadd(-24.67, 24.33, -42.48, 0.33)
	pt3dadd(-24.83, 24.5, -42.48, 0.33)
	pt3dadd(-25.17, 24.67, -42.48, 0.33)
	pt3dadd(-25.33, 24.67, -42.48, 0.33)
  }
  dend[781] {pt3dclear()
	pt3dadd(-22.67, 22.67, -42.84, 0.33)
	pt3dadd(-22.5, 22.83, -42.84, 0.33)
	pt3dadd(-22.67, 22.67, -42.84, 0.33)
	pt3dadd(-22.67, 22.33, -42.84, 0.33)
	pt3dadd(-22.83, 22.17, -42.84, 0.33)
	pt3dadd(-22.83, 21.5, -42.84, 0.33)
	pt3dadd(-23, 21.33, -42.84, 0.33)
	pt3dadd(-23.33, 21.33, -42.84, 0.33)
	pt3dadd(-23.67, 21.17, -42.84, 0.33)
	pt3dadd(-24, 21.17, -42.84, 0.33)
	pt3dadd(-24.33, 21, -42.84, 0.33)
	pt3dadd(-25.67, 21, -42.84, 0.33)
  }
  dend[782] {pt3dclear()
	pt3dadd(-9.17, 18.67, -41.76, 0.33)
  }
}
proc shape3d_67() {
  dend[782] {	pt3dadd(-9.17, 18.67, -42.48, 0.33)
	pt3dadd(-9, 18.5, -42.48, 0.33)
	pt3dadd(-8.67, 18.17, -42.48, 0.33)
	pt3dadd(-8.5, 18, -42.48, 0.33)
	pt3dadd(-8.33, 17.82, -42.48, 0.33)
	pt3dadd(-8.17, 17.67, -42.48, 0.33)
	pt3dadd(-8.17, 17.32, -42.48, 0.33)
	pt3dadd(-8, 17, -42.48, 0.33)
	pt3dadd(-8, 16.5, -42.48, 0.33)
	pt3dadd(-7.83, 16.17, -42.48, 0.33)
  }
  dend[783] {pt3dclear()
	pt3dadd(-7.83, 16.17, -42.48, 0.33)
	pt3dadd(-7.67, 16.17, -42.48, 0.33)
	pt3dadd(-7.33, 16, -42.48, 0.33)
	pt3dadd(-7.17, 15.83, -42.48, 0.33)
	pt3dadd(-6.83, 15.67, -42.48, 0.33)
	pt3dadd(-6.5, 15.67, -42.48, 0.33)
	pt3dadd(-6.33, 15.5, -42.48, 0.33)
	pt3dadd(-6, 15.5, -42.48, 0.33)
	pt3dadd(-5.67, 15.67, -42.48, 0.33)
	pt3dadd(-5.33, 15.83, -42.48, 0.33)
	pt3dadd(-5, 16, -42.48, 0.33)
	pt3dadd(-4.83, 16.17, -42.48, 0.33)
	pt3dadd(-4.67, 16.32, -42.48, 0.33)
	pt3dadd(-4.5, 16.5, -42.48, 0.33)
	pt3dadd(-4.67, 16.5, -42.48, 0.33)
  }
  dend[784] {pt3dclear()
	pt3dadd(-7.83, 16.17, -42.48, 0.33)
	pt3dadd(-7.5, 16, -42.48, 0.33)
	pt3dadd(-7.67, 15.83, -42.48, 0.33)
	pt3dadd(-8, 15.83, -42.48, 0.33)
	pt3dadd(-8.17, 15.67, -42.48, 0.33)
	pt3dadd(-8.33, 15.5, -42.48, 0.33)
	pt3dadd(-8.67, 15.5, -42.48, 0.33)
	pt3dadd(-8.83, 15.33, -42.48, 0.33)
	pt3dadd(-9, 15.17, -42.48, 0.33)
	pt3dadd(-9.17, 15.17, -42.48, 0.33)
  }
  dend[785] {pt3dclear()
	pt3dadd(-4.67, 23.5, -40.32, 1.33)
	pt3dadd(-4.5, 23.5, -40.32, 0.67)
	pt3dadd(-4.33, 23.33, -40.32, 0.67)
	pt3dadd(-4.33, 23, -40.32, 0.67)
	pt3dadd(-4.17, 22.83, -40.32, 0.67)
	pt3dadd(-4, 22.5, -40.32, 0.67)
	pt3dadd(-3.83, 22.33, -40.32, 0.67)
	pt3dadd(-3.67, 22.17, -40.32, 0.67)
	pt3dadd(-3.5, 22, -40.32, 0.67)
	pt3dadd(-3.33, 21.83, -40.32, 0.67)
	pt3dadd(-3.33, 21.5, -40.32, 0.67)
	pt3dadd(-3.17, 21.17, -40.32, 0.67)
	pt3dadd(-3, 21, -40.32, 0.67)
	pt3dadd(-3, 20.67, -40.32, 0.67)
  }
  dend[786] {pt3dclear()
	pt3dadd(-3, 20.67, -40.32, 0.67)
	pt3dadd(-3.33, 20.67, -39.96, 0.33)
	pt3dadd(-3.33, 19.17, -39.96, 0.33)
	pt3dadd(-3.5, 19, -39.96, 0.33)
	pt3dadd(-3.5, 18.32, -39.96, 0.33)
	pt3dadd(-3.33, 18.17, -39.96, 0.33)
	pt3dadd(-3.33, 17.82, -39.96, 0.33)
  }
  dend[787] {pt3dclear()
	pt3dadd(-3.33, 17.82, -39.96, 0.33)
	pt3dadd(-3.33, 18, -40.68, 0.33)
	pt3dadd(-3.33, 17.17, -40.68, 0.33)
	pt3dadd(-3.5, 17, -40.68, 0.33)
	pt3dadd(-3.67, 16.82, -40.68, 0.33)
	pt3dadd(-3.67, 16.5, -40.68, 0.33)
	pt3dadd(-3.83, 16.17, -40.68, 0.33)
	pt3dadd(-4, 16, -40.68, 0.33)
	pt3dadd(-4, 15.67, -40.68, 0.33)
  }
  dend[788] {pt3dclear()
	pt3dadd(-4, 15.67, -40.68, 0.33)
	pt3dadd(-4, 15.67, -39.24, 0.33)
	pt3dadd(-4.17, 15.5, -39.24, 0.33)
	pt3dadd(-4.33, 15.17, -39.24, 0.33)
	pt3dadd(-4.5, 15, -39.24, 0.33)
	pt3dadd(-4.5, 14.17, -39.24, 0.33)
	pt3dadd(-4.67, 14, -39.24, 0.33)
	pt3dadd(-4.67, 13.67, -39.24, 0.33)
  }
  dend[789] {pt3dclear()
	pt3dadd(-4.67, 13.67, -39.24, 0.33)
	pt3dadd(-4.18, 14.12, -39.24, 0.33)
  }
  dend[790] {pt3dclear()
	pt3dadd(-4.18, 14.12, -39.24, 0.33)
	pt3dadd(-4.5, 13.83, -39.24, 0.33)
	pt3dadd(-4.83, 13.83, -39.24, 0.33)
	pt3dadd(-5.17, 14, -39.24, 0.33)
	pt3dadd(-6.83, 14, -39.24, 0.33)
	pt3dadd(-7, 14.17, -39.24, 0.33)
	pt3dadd(-7.5, 14.17, -39.24, 0.33)
  }
  dend[791] {pt3dclear()
	pt3dadd(-7.5, 14.17, -39.24, 0.33)
	pt3dadd(-7.5, 14, -42.84, 0.33)
	pt3dadd(-7.67, 14.33, -42.84, 0.33)
	pt3dadd(-8, 14.67, -42.84, 0.33)
	pt3dadd(-8.33, 14.83, -42.84, 0.33)
	pt3dadd(-8.33, 15.17, -42.84, 0.33)
	pt3dadd(-8.17, 15.33, -42.84, 0.33)
	pt3dadd(-7.83, 15.5, -42.84, 0.33)
	pt3dadd(-7.67, 15.67, -42.84, 0.33)
	pt3dadd(-7.33, 15.67, -42.84, 0.33)
	pt3dadd(-7, 15.5, -42.84, 0.33)
	pt3dadd(-6.67, 15.5, -42.84, 0.33)
	pt3dadd(-6.5, 15.33, -42.84, 0.33)
	pt3dadd(-6.33, 15.17, -42.84, 0.33)
	pt3dadd(-6.17, 15, -42.84, 0.33)
	pt3dadd(-6, 15, -42.84, 0.33)
  }
  dend[792] {pt3dclear()
	pt3dadd(-7.5, 14.17, -39.24, 0.33)
	pt3dadd(-7.33, 14.33, -39.96, 0.33)
	pt3dadd(-7.5, 14.17, -39.96, 0.33)
	pt3dadd(-7.67, 14, -39.96, 0.33)
	pt3dadd(-8, 13.83, -39.96, 0.33)
	pt3dadd(-8.33, 13.67, -39.96, 0.33)
	pt3dadd(-8.67, 13.5, -39.96, 0.33)
	pt3dadd(-9.67, 13.5, -39.96, 0.33)
	pt3dadd(-9.83, 13.33, -39.96, 0.33)
  }
  dend[793] {pt3dclear()
	pt3dadd(-9.83, 13.33, -39.96, 0.33)
	pt3dadd(-10, 13.5, -39.96, 0.33)
	pt3dadd(-10.17, 13.17, -39.96, 0.33)
	pt3dadd(-10.33, 12.83, -39.96, 0.33)
	pt3dadd(-10.5, 12.5, -39.96, 0.33)
	pt3dadd(-10.5, 12.17, -39.96, 0.33)
	pt3dadd(-10.67, 12, -39.96, 0.33)
	pt3dadd(-10.83, 11.83, -39.96, 0.33)
	pt3dadd(-11.17, 11.5, -39.96, 0.33)
	pt3dadd(-11.33, 11.33, -39.96, 0.33)
	pt3dadd(-11.5, 11.17, -39.96, 0.33)
	pt3dadd(-11.83, 11, -39.96, 0.33)
	pt3dadd(-12.17, 11, -39.96, 0.33)
	pt3dadd(-12.33, 10.83, -39.96, 0.33)
	pt3dadd(-13.67, 10.83, -39.96, 0.33)
	pt3dadd(-13.83, 11, -39.96, 0.33)
	pt3dadd(-14, 11, -39.96, 0.33)
  }
  dend[794] {pt3dclear()
	pt3dadd(-14, 11, -39.96, 0.33)
	pt3dadd(-14, 11.17, -42.48, 0.33)
	pt3dadd(-13.83, 11.5, -42.48, 0.33)
	pt3dadd(-13.5, 11.67, -42.48, 0.33)
	pt3dadd(-13.17, 12, -42.48, 0.33)
	pt3dadd(-12.83, 12.17, -42.48, 0.33)
	pt3dadd(-12.17, 12.17, -42.48, 0.33)
  }
  dend[795] {pt3dclear()
	pt3dadd(-12.17, 12.17, -42.48, 0.33)
	pt3dadd(-11.5, 12.17, -42.48, 0.33)
	pt3dadd(-11, 11.83, -42.48, 0.33)
	pt3dadd(-10.33, 11.67, -42.48, 0.33)
	pt3dadd(-10, 11.5, -42.48, 0.33)
	pt3dadd(-10.17, 11.33, -42.48, 0.33)
  }
  dend[796] {pt3dclear()
	pt3dadd(-12.17, 12.17, -42.48, 0.33)
	pt3dadd(-11.33, 12.33, -42.48, 0.33)
	pt3dadd(-11.17, 12.5, -42.48, 0.33)
	pt3dadd(-11.17, 13.33, -42.48, 0.33)
	pt3dadd(-11, 13.67, -42.48, 0.33)
	pt3dadd(-11, 14.67, -42.48, 0.33)
	pt3dadd(-11, 14.5, -42.48, 0.33)
  }
  dend[797] {pt3dclear()
	pt3dadd(-14, 11, -39.96, 0.33)
	pt3dadd(-13.83, 11, -39.96, 0.33)
	pt3dadd(-14, 11.17, -39.96, 0.33)
	pt3dadd(-14.17, 11.33, -39.96, 0.33)
	pt3dadd(-14.5, 11.33, -39.96, 0.33)
	pt3dadd(-14.67, 11.5, -39.96, 0.33)
	pt3dadd(-14.83, 11.67, -39.96, 0.33)
	pt3dadd(-14.83, 12, -39.96, 0.33)
	pt3dadd(-15.17, 12.17, -39.96, 0.33)
	pt3dadd(-15.33, 12.5, -39.96, 0.33)
	pt3dadd(-15.33, 12.67, -39.96, 0.33)
  }
  dend[798] {pt3dclear()
	pt3dadd(-15.33, 12.67, -39.96, 0.33)
	pt3dadd(-15.17, 12.67, -40.68, 0.33)
	pt3dadd(-15.33, 12.83, -40.68, 0.33)
	pt3dadd(-15.5, 13, -40.68, 0.33)
	pt3dadd(-16, 13, -40.68, 0.33)
	pt3dadd(-16.17, 13.17, -40.68, 0.33)
	pt3dadd(-16.5, 13.33, -40.68, 0.33)
	pt3dadd(-16.67, 13.5, -40.68, 0.33)
	pt3dadd(-17, 13.5, -40.68, 0.33)
	pt3dadd(-17.32, 13.67, -40.68, 0.33)
	pt3dadd(-17.5, 13.83, -40.68, 0.33)
	pt3dadd(-17.67, 14, -40.68, 0.33)
	pt3dadd(-17.82, 14.17, -40.68, 0.33)
	pt3dadd(-18.17, 14.33, -40.68, 0.33)
	pt3dadd(-18.32, 14.5, -40.68, 0.33)
	pt3dadd(-18.5, 14.67, -40.68, 0.33)
	pt3dadd(-18.98, 15.12, -40.68, 0.33)
  }
  dend[799] {pt3dclear()
	pt3dadd(-18.98, 15.12, -40.68, 0.33)
	pt3dadd(-19, 15.33, -41.04, 0.33)
	pt3dadd(-19.82, 15.33, -41.04, 0.33)
	pt3dadd(-20, 15.17, -41.04, 0.33)
	pt3dadd(-20.32, 15.17, -41.04, 0.33)
	pt3dadd(-20.67, 15, -41.04, 0.33)
	pt3dadd(-20.83, 14.83, -41.04, 0.33)
	pt3dadd(-21, 14.67, -41.04, 0.33)
	pt3dadd(-21.17, 14.5, -41.04, 0.33)
	pt3dadd(-21.33, 14.33, -41.04, 0.33)
	pt3dadd(-21.67, 14.17, -41.04, 0.33)
	pt3dadd(-21.83, 14, -41.04, 0.33)
	pt3dadd(-22.17, 14, -41.04, 0.33)
	pt3dadd(-22.33, 13.83, -41.04, 0.33)
	pt3dadd(-22.67, 13.67, -41.04, 0.33)
	pt3dadd(-23, 13.67, -41.04, 0.33)
	pt3dadd(-23.17, 13.5, -41.04, 0.33)
	pt3dadd(-23.67, 13.5, -41.04, 0.33)
	pt3dadd(-23.83, 13.33, -41.04, 0.33)
	pt3dadd(-24, 13.33, -41.04, 0.33)
  }
  dend[800] {pt3dclear()
	pt3dadd(-24, 13.33, -41.04, 0.33)
	pt3dadd(-24.17, 13.33, -41.76, 0.33)
	pt3dadd(-24.33, 13.17, -41.76, 0.33)
	pt3dadd(-24.5, 13, -41.76, 0.33)
	pt3dadd(-24.67, 12.83, -41.76, 0.33)
	pt3dadd(-25, 12.83, -41.76, 0.33)
	pt3dadd(-25.17, 12.67, -41.76, 0.33)
  }
  dend[801] {pt3dclear()
	pt3dadd(-25.17, 12.67, -41.76, 0.33)
  }
}
proc shape3d_68() {
  dend[801] {	pt3dadd(-25.33, 13, -39.24, 0.33)
	pt3dadd(-25.5, 12.83, -39.24, 0.33)
	pt3dadd(-25.67, 12.67, -39.24, 0.33)
	pt3dadd(-26, 12.67, -39.24, 0.33)
	pt3dadd(-26.33, 12.5, -39.24, 0.33)
	pt3dadd(-26.5, 12.33, -39.24, 0.33)
	pt3dadd(-26.67, 12.17, -39.24, 0.33)
	pt3dadd(-27.33, 12.17, -39.24, 0.33)
	pt3dadd(-27.5, 12, -39.24, 0.33)
	pt3dadd(-27.83, 12, -39.24, 0.33)
	pt3dadd(-28.17, 12.17, -39.24, 0.33)
	pt3dadd(-30.17, 12.17, -39.24, 0.33)
	pt3dadd(-30.33, 12, -39.24, 0.33)
	pt3dadd(-30.5, 11.83, -39.24, 0.33)
	pt3dadd(-30.67, 11.67, -39.24, 0.33)
	pt3dadd(-30.83, 11.67, -39.24, 0.33)
  }
  dend[802] {pt3dclear()
	pt3dadd(-30.83, 11.67, -39.24, 0.33)
	pt3dadd(-31, 11.83, -39.6, 0.33)
	pt3dadd(-31.17, 12, -39.6, 0.33)
	pt3dadd(-31.33, 12.17, -39.6, 0.33)
	pt3dadd(-31.67, 12.33, -39.6, 0.33)
	pt3dadd(-32, 12.33, -39.6, 0.33)
	pt3dadd(-32.17, 12.5, -39.6, 0.33)
	pt3dadd(-32.5, 12.67, -39.6, 0.33)
	pt3dadd(-32.83, 12.67, -39.6, 0.33)
	pt3dadd(-33, 12.83, -39.6, 0.33)
	pt3dadd(-33.33, 12.83, -39.6, 0.33)
	pt3dadd(-33.67, 13, -39.6, 0.33)
	pt3dadd(-33.83, 13.17, -39.6, 0.33)
	pt3dadd(-34.17, 13.17, -39.6, 0.33)
	pt3dadd(-34.5, 13.33, -39.6, 0.33)
	pt3dadd(-35.5, 13.33, -39.6, 0.33)
	pt3dadd(-35.83, 13.5, -39.6, 0.33)
	pt3dadd(-37.5, 13.5, -39.6, 0.33)
  }
  dend[803] {pt3dclear()
	pt3dadd(-37.5, 13.5, -39.6, 0.33)
	pt3dadd(-37.83, 14, -41.4, 0.33)
	pt3dadd(-38, 14.17, -41.4, 0.33)
	pt3dadd(-38.17, 14.33, -41.4, 0.33)
	pt3dadd(-38.33, 14.5, -41.4, 0.33)
	pt3dadd(-38.5, 14.67, -41.4, 0.33)
	pt3dadd(-38.67, 14.83, -41.4, 0.33)
	pt3dadd(-38.83, 15.17, -41.4, 0.33)
	pt3dadd(-39, 15.33, -41.4, 0.33)
	pt3dadd(-39.17, 15.5, -41.4, 0.33)
	pt3dadd(-39.17, 15.83, -41.4, 0.33)
	pt3dadd(-39.33, 16, -41.4, 0.33)
	pt3dadd(-39.5, 16.17, -41.4, 0.33)
	pt3dadd(-39.5, 16.5, -41.4, 0.33)
	pt3dadd(-39.67, 16.67, -41.4, 0.33)
	pt3dadd(-39.67, 17.82, -41.4, 0.33)
	pt3dadd(-39.83, 17.82, -41.4, 0.33)
  }
  dend[804] {pt3dclear()
	pt3dadd(-39.83, 17.82, -41.4, 0.33)
	pt3dadd(-39.33, 17.67, -41.04, 0.33)
	pt3dadd(-39.33, 19.82, -41.04, 0.33)
	pt3dadd(-39.17, 20, -41.04, 0.33)
	pt3dadd(-39, 20.32, -41.04, 0.33)
  }
  dend[805] {pt3dclear()
	pt3dadd(-39.83, 17.82, -41.4, 0.33)
	pt3dadd(-39.67, 18.17, -41.4, 0.33)
	pt3dadd(-39.83, 18.5, -41.4, 0.33)
	pt3dadd(-40, 18.67, -41.4, 0.33)
	pt3dadd(-40.17, 18.82, -41.4, 0.33)
	pt3dadd(-40.5, 19, -41.4, 0.33)
	pt3dadd(-40.83, 19, -41.4, 0.33)
	pt3dadd(-41, 19.17, -41.4, 0.33)
	pt3dadd(-41.33, 19.17, -41.4, 0.33)
	pt3dadd(-41.5, 19.32, -41.4, 0.33)
	pt3dadd(-41.67, 19.32, -41.4, 0.33)
  }
  dend[806] {pt3dclear()
	pt3dadd(-37.5, 13.5, -39.6, 0.33)
	pt3dadd(-37.67, 13.67, -40.68, 0.33)
	pt3dadd(-37.83, 13.67, -40.68, 0.33)
	pt3dadd(-38.33, 13.67, -40.68, 0.33)
	pt3dadd(-38.5, 13.5, -40.68, 0.33)
	pt3dadd(-38.83, 13.5, -40.68, 0.33)
	pt3dadd(-38.83, 13.17, -40.68, 0.33)
	pt3dadd(-39, 13, -40.68, 0.33)
	pt3dadd(-39.33, 12.67, -40.68, 0.33)
	pt3dadd(-39.5, 12.5, -40.68, 0.33)
	pt3dadd(-39.67, 12.33, -40.68, 0.33)
	pt3dadd(-39.83, 12.17, -40.68, 0.33)
	pt3dadd(-40, 12, -40.68, 0.33)
	pt3dadd(-40.33, 12, -40.68, 0.33)
  }
  dend[807] {pt3dclear()
	pt3dadd(-30.83, 11.67, -39.24, 0.33)
	pt3dadd(-30.67, 12, -39.6, 0.33)
	pt3dadd(-31, 11.83, -39.6, 0.33)
	pt3dadd(-31.17, 11.67, -39.6, 0.33)
	pt3dadd(-31.5, 11.5, -39.6, 0.33)
	pt3dadd(-31.83, 11.33, -39.6, 0.33)
	pt3dadd(-32.17, 11.17, -39.6, 0.33)
	pt3dadd(-32.5, 11.17, -39.6, 0.33)
	pt3dadd(-32.67, 11, -39.6, 0.33)
	pt3dadd(-32.83, 10.83, -39.6, 0.33)
	pt3dadd(-33, 10.67, -39.6, 0.33)
	pt3dadd(-33.17, 10.5, -39.6, 0.33)
	pt3dadd(-33.33, 10.33, -39.6, 0.33)
	pt3dadd(-33.67, 10, -39.6, 0.33)
	pt3dadd(-33.83, 9.83, -39.6, 0.33)
	pt3dadd(-34.17, 9.67, -39.6, 0.33)
	pt3dadd(-34.33, 9.5, -39.6, 0.33)
	pt3dadd(-34.67, 9.5, -39.6, 0.33)
	pt3dadd(-35, 9.33, -39.6, 0.33)
	pt3dadd(-35.33, 9.17, -39.6, 0.33)
	pt3dadd(-35.67, 9.17, -39.6, 0.33)
	pt3dadd(-36, 9, -39.6, 0.33)
	pt3dadd(-36.17, 8.83, -39.6, 0.33)
	pt3dadd(-36.5, 8.83, -39.6, 0.33)
	pt3dadd(-36.67, 8.67, -39.6, 0.33)
	pt3dadd(-37, 8.5, -39.6, 0.33)
	pt3dadd(-37.33, 8.33, -39.6, 0.33)
	pt3dadd(-37.67, 8.17, -39.6, 0.33)
	pt3dadd(-38.83, 8.17, -39.6, 0.33)
  }
  dend[808] {pt3dclear()
	pt3dadd(-38.83, 8.17, -39.6, 0.33)
	pt3dadd(-38.67, 8.17, -39.6, 0.33)
	pt3dadd(-37.67, 8.17, -39.6, 0.33)
	pt3dadd(-37.17, 8, -39.6, 0.33)
	pt3dadd(-36.83, 7.83, -39.6, 0.33)
	pt3dadd(-36.67, 7.67, -39.6, 0.33)
	pt3dadd(-36.5, 7.33, -39.6, 0.33)
	pt3dadd(-36.33, 7, -39.6, 0.33)
	pt3dadd(-36.17, 6.83, -39.6, 0.33)
	pt3dadd(-36, 6.67, -39.6, 0.33)
	pt3dadd(-36, 6.33, -39.6, 0.33)
	pt3dadd(-36.17, 6.33, -39.6, 0.33)
  }
  dend[809] {pt3dclear()
	pt3dadd(-38.83, 8.17, -39.6, 0.33)
	pt3dadd(-38.5, 8.17, -39.6, 0.33)
	pt3dadd(-40, 8.17, -39.6, 0.33)
  }
  dend[810] {pt3dclear()
	pt3dadd(-25.17, 12.67, -41.76, 0.33)
	pt3dadd(-25.17, 13, -43.92, 0.33)
	pt3dadd(-25, 12.83, -43.92, 0.33)
	pt3dadd(-24.83, 12.5, -43.92, 0.33)
	pt3dadd(-24.67, 12.17, -43.92, 0.33)
	pt3dadd(-24.5, 12, -43.92, 0.33)
	pt3dadd(-24.67, 11.67, -43.92, 0.33)
	pt3dadd(-24.83, 11.33, -43.92, 0.33)
	pt3dadd(-25, 11.17, -43.92, 0.33)
	pt3dadd(-25.17, 11, -44.64, 0.33)
	pt3dadd(-25.33, 10.67, -44.64, 0.33)
	pt3dadd(-25.67, 10.5, -44.64, 0.33)
	pt3dadd(-26, 10.33, -44.64, 0.33)
	pt3dadd(-26.17, 10, -44.64, 0.33)
	pt3dadd(-26.33, 9.83, -44.64, 0.33)
	pt3dadd(-26.5, 9.67, -44.64, 0.33)
	pt3dadd(-26.67, 9.5, -44.64, 0.33)
  }
  dend[811] {pt3dclear()
	pt3dadd(-26.67, 9.5, -44.64, 0.33)
	pt3dadd(-26.67, 9.67, -44.64, 0.33)
	pt3dadd(-27, 9.5, -44.64, 0.33)
	pt3dadd(-27.17, 9.33, -44.64, 0.33)
	pt3dadd(-27.5, 9.17, -44.64, 0.33)
	pt3dadd(-27.67, 9, -44.64, 0.33)
	pt3dadd(-28, 9, -44.64, 0.33)
	pt3dadd(-28.17, 8.83, -44.64, 0.33)
  }
  dend[812] {pt3dclear()
	pt3dadd(-26.67, 9.5, -44.64, 0.33)
	pt3dadd(-26.5, 9.83, -41.76, 0.33)
	pt3dadd(-26.5, 8.17, -41.76, 0.33)
	pt3dadd(-26.67, 8, -41.76, 0.33)
	pt3dadd(-26.67, 7.5, -41.76, 0.33)
	pt3dadd(-26.83, 7.33, -41.76, 0.33)
	pt3dadd(-27, 7.33, -41.76, 0.33)
  }
  dend[813] {pt3dclear()
	pt3dadd(-24, 13.33, -41.04, 0.33)
	pt3dadd(-24.17, 13.5, -44.64, 0.33)
	pt3dadd(-25.17, 13.5, -44.64, 0.33)
	pt3dadd(-25.17, 13.83, -44.64, 0.33)
	pt3dadd(-25.33, 14, -44.64, 0.33)
	pt3dadd(-25.5, 14.17, -44.64, 0.33)
	pt3dadd(-25.67, 14.17, -44.64, 0.33)
  }
  dend[814] {pt3dclear()
	pt3dadd(-25.67, 14.17, -44.64, 0.33)
	pt3dadd(-25.83, 14.67, -43.92, 0.33)
	pt3dadd(-25.67, 14.83, -43.92, 0.33)
	pt3dadd(-25.67, 15.17, -43.92, 0.33)
	pt3dadd(-25.83, 15.5, -43.92, 0.33)
	pt3dadd(-25.5, 15.5, -43.92, 0.33)
	pt3dadd(-25.33, 15.67, -43.92, 0.33)
	pt3dadd(-25, 15.67, -43.92, 0.33)
	pt3dadd(-24.83, 15.83, -43.92, 0.33)
	pt3dadd(-24.67, 16.17, -43.92, 0.33)
	pt3dadd(-25, 16.17, -43.92, 0.33)
	pt3dadd(-25.17, 16.32, -43.92, 0.33)
	pt3dadd(-25.5, 16.5, -43.92, 0.33)
	pt3dadd(-25.67, 16.67, -43.92, 0.33)
	pt3dadd(-25.83, 16.82, -43.92, 0.33)
  }
  dend[815] {pt3dclear()
	pt3dadd(-25.83, 16.82, -43.92, 0.33)
	pt3dadd(-25.67, 17.17, -43.92, 0.33)
	pt3dadd(-25.5, 17.32, -43.92, 0.33)
	pt3dadd(-25.33, 17.5, -43.92, 0.33)
	pt3dadd(-25, 17.5, -43.92, 0.33)
	pt3dadd(-24.83, 17.67, -43.92, 0.33)
	pt3dadd(-24.67, 17.82, -43.92, 0.33)
  }
  dend[816] {pt3dclear()
	pt3dadd(-25.83, 16.82, -43.92, 0.33)
	pt3dadd(-26, 17.32, -43.56, 0.33)
	pt3dadd(-27, 17.32, -43.56, 0.33)
  }
  dend[817] {pt3dclear()
	pt3dadd(-25.67, 14.17, -44.64, 0.33)
	pt3dadd(-25.83, 14.33, -45, 0.33)
	pt3dadd(-26, 14.5, -45, 0.33)
	pt3dadd(-26.5, 14.5, -45, 0.33)
	pt3dadd(-26.83, 14.67, -45, 0.33)
	pt3dadd(-27, 14.83, -45, 0.33)
	pt3dadd(-27.33, 14.83, -45, 0.33)
	pt3dadd(-27.5, 15, -45, 0.33)
	pt3dadd(-27.67, 15.33, -45, 0.33)
	pt3dadd(-27.83, 15.5, -45, 0.33)
	pt3dadd(-27.83, 15.83, -45, 0.33)
  }
}
proc shape3d_69() {
  dend[817] {	pt3dadd(-28, 16, -45, 0.33)
	pt3dadd(-28.17, 16.17, -45, 0.33)
	pt3dadd(-28.17, 16.5, -45, 0.33)
	pt3dadd(-28.33, 16.67, -45, 0.33)
	pt3dadd(-28.83, 16.67, -45, 0.33)
	pt3dadd(-28.83, 16.82, -45, 0.33)
  }
  dend[818] {pt3dclear()
	pt3dadd(-28.83, 16.82, -45, 0.33)
	pt3dadd(-28.67, 16.67, -42.84, 0.33)
	pt3dadd(-28.67, 17.17, -42.84, 0.33)
	pt3dadd(-28.83, 17.32, -42.84, 0.33)
	pt3dadd(-29, 17.5, -42.84, 0.33)
	pt3dadd(-29.17, 17.67, -42.84, 0.33)
	pt3dadd(-29, 17.82, -42.84, 0.33)
	pt3dadd(-29, 18.82, -42.84, 0.33)
  }
  dend[819] {pt3dclear()
	pt3dadd(-28.83, 16.82, -45, 0.33)
	pt3dadd(-28.33, 17, -45, 0.33)
	pt3dadd(-28.67, 17, -45, 0.33)
	pt3dadd(-29, 17.17, -45, 0.33)
	pt3dadd(-29.17, 17.32, -45, 0.33)
	pt3dadd(-29.67, 17.32, -45, 0.33)
	pt3dadd(-29.83, 17.5, -45, 0.33)
	pt3dadd(-30.17, 17.67, -45, 0.33)
	pt3dadd(-30.67, 17.67, -45.36, 0.33)
	pt3dadd(-30.83, 17.82, -42.12, 0.33)
	pt3dadd(-31, 18, -42.12, 0.33)
	pt3dadd(-31, 17.82, -42.12, 0.33)
  }
  dend[820] {pt3dclear()
	pt3dadd(-18.98, 15.12, -40.68, 0.33)
	pt3dadd(-18.67, 14.83, -40.68, 0.33)
	pt3dadd(-18.67, 13.5, -40.68, 0.33)
	pt3dadd(-19, 13.33, -40.68, 0.33)
	pt3dadd(-19.32, 13.17, -40.68, 0.33)
	pt3dadd(-19.67, 12.83, -40.68, 0.33)
	pt3dadd(-19.82, 12.67, -40.68, 0.33)
	pt3dadd(-20, 12.5, -40.68, 0.33)
	pt3dadd(-20.17, 12.33, -40.68, 0.33)
	pt3dadd(-20.32, 12.17, -40.68, 0.33)
	pt3dadd(-20.5, 12, -40.68, 0.33)
  }
  dend[821] {pt3dclear()
	pt3dadd(-20.5, 12, -40.68, 0.33)
	pt3dadd(-20.5, 12.17, -44.28, 0.33)
	pt3dadd(-20.17, 12.17, -44.28, 0.33)
	pt3dadd(-20, 12, -44.28, 0.33)
	pt3dadd(-19.67, 12, -44.28, 0.33)
	pt3dadd(-19.5, 11.83, -44.28, 0.33)
	pt3dadd(-19.17, 11.67, -44.28, 0.33)
	pt3dadd(-18.82, 11.5, -44.28, 0.33)
	pt3dadd(-18.37, 11.01, -44.28, 0.33)
  }
  dend[822] {pt3dclear()
	pt3dadd(-18.37, 11.01, -44.28, 0.33)
	pt3dadd(-18.67, 11.5, -44.28, 0.33)
	pt3dadd(-18.32, 11.5, -44.28, 0.33)
	pt3dadd(-18, 11.67, -44.28, 0.33)
	pt3dadd(-17.67, 11.67, -44.28, 0.33)
	pt3dadd(-17.5, 11.83, -44.28, 0.33)
	pt3dadd(-17, 11.83, -44.28, 0.33)
	pt3dadd(-16.67, 12, -44.28, 0.33)
	pt3dadd(-16.17, 12, -44.28, 0.33)
	pt3dadd(-15.83, 11.83, -44.28, 0.33)
	pt3dadd(-15.83, 11.33, -44.28, 0.33)
  }
  dend[823] {pt3dclear()
	pt3dadd(-15.83, 11.33, -44.28, 0.33)
	pt3dadd(-15.67, 11.17, -44.28, 0.33)
	pt3dadd(-15.5, 11, -44.28, 0.33)
	pt3dadd(-15.33, 10.83, -44.28, 0.33)
	pt3dadd(-15.83, 11.33, -44.28, 0.33)
	pt3dadd(-15.67, 11.17, -44.28, 0.33)
	pt3dadd(-15.5, 10.83, -44.28, 0.33)
	pt3dadd(-15.33, 10.5, -44.28, 0.33)
	pt3dadd(-15.17, 10.33, -44.28, 0.33)
	pt3dadd(-14.83, 10.17, -44.28, 0.33)
	pt3dadd(-14.83, 10, -44.28, 0.33)
  }
  dend[824] {pt3dclear()
	pt3dadd(-14.83, 10, -44.28, 0.33)
	pt3dadd(-14.5, 10, -44.28, 0.33)
	pt3dadd(-14.17, 9.83, -44.28, 0.33)
	pt3dadd(-13.83, 9.67, -44.28, 0.33)
	pt3dadd(-13.67, 9.5, -44.28, 0.33)
	pt3dadd(-13.5, 9.33, -44.28, 0.33)
	pt3dadd(-13.17, 9.33, -44.28, 0.33)
	pt3dadd(-13, 9, -44.28, 0.33)
	pt3dadd(-12.5, 9, -44.28, 0.33)
	pt3dadd(-12.33, 8.83, -44.28, 0.33)
	pt3dadd(-12, 8.83, -44.28, 0.33)
	pt3dadd(-12.17, 8.67, -44.28, 0.33)
  }
  dend[825] {pt3dclear()
	pt3dadd(-12.17, 8.67, -44.28, 0.33)
	pt3dadd(-12.17, 8.83, -44.28, 0.33)
	pt3dadd(-11.83, 9, -44.28, 0.33)
	pt3dadd(-11.17, 9, -44.28, 0.33)
	pt3dadd(-11, 8.83, -44.28, 0.33)
	pt3dadd(-10.83, 8.67, -44.28, 0.33)
	pt3dadd(-10.67, 8.5, -44.28, 0.33)
	pt3dadd(-10.5, 8.33, -44.28, 0.33)
	pt3dadd(-10.33, 8.17, -44.28, 0.33)
	pt3dadd(-10.17, 7.83, -44.28, 0.33)
  }
  dend[826] {pt3dclear()
	pt3dadd(-10.17, 7.83, -44.28, 0.33)
	pt3dadd(-10.33, 8, -44.28, 0.33)
	pt3dadd(-10.17, 8.17, -44.28, 0.33)
	pt3dadd(-10.17, 8.67, -44.28, 0.33)
	pt3dadd(-10, 9, -44.28, 0.33)
	pt3dadd(-9.83, 9.33, -44.28, 0.33)
	pt3dadd(-9.67, 9.5, -44.28, 0.33)
	pt3dadd(-9.33, 9.5, -44.28, 0.33)
	pt3dadd(-9, 9.33, -44.28, 0.33)
	pt3dadd(-8.67, 9, -44.28, 0.33)
	pt3dadd(-8.67, 8.67, -44.28, 0.33)
	pt3dadd(-8.5, 8.5, -44.28, 0.33)
	pt3dadd(-8.5, 8, -44.28, 0.33)
	pt3dadd(-8.33, 7.83, -44.28, 0.33)
	pt3dadd(-8.17, 7.67, -44.28, 0.33)
	pt3dadd(-8, 7.33, -44.28, 0.33)
	pt3dadd(-7.83, 7.17, -44.28, 0.33)
	pt3dadd(-7.67, 7, -44.28, 0.33)
	pt3dadd(-7.5, 6.83, -44.28, 0.33)
  }
  dend[827] {pt3dclear()
	pt3dadd(-10.17, 7.83, -44.28, 0.33)
	pt3dadd(-10.33, 8, -44.28, 0.33)
	pt3dadd(-10.33, 7.33, -44.28, 0.33)
	pt3dadd(-10.17, 7.17, -44.28, 0.33)
	pt3dadd(-10.17, 6.67, -44.28, 0.33)
	pt3dadd(-10, 6.33, -44.28, 0.33)
	pt3dadd(-9.83, 6, -44.28, 0.33)
	pt3dadd(-9.67, 5.67, -44.28, 0.33)
	pt3dadd(-9.5, 5.5, -44.28, 0.33)
	pt3dadd(-9.33, 5.17, -44.28, 0.33)
	pt3dadd(-9.17, 5, -44.28, 0.33)
	pt3dadd(-9.33, 4.83, -44.28, 0.33)
	pt3dadd(-9.33, 4.67, -44.28, 0.33)
  }
  dend[828] {pt3dclear()
	pt3dadd(-12.17, 8.67, -44.28, 0.33)
	pt3dadd(-12, 8.67, -44.28, 0.33)
	pt3dadd(-12.33, 8.33, -44.28, 0.33)
	pt3dadd(-12.83, 8.17, -44.28, 0.33)
	pt3dadd(-13.17, 8, -44.28, 0.33)
	pt3dadd(-13.17, 7.33, -44.28, 0.33)
	pt3dadd(-13, 7.17, -44.28, 0.33)
	pt3dadd(-12.5, 6.67, -44.28, 0.33)
	pt3dadd(-12.67, 6.5, -44.28, 0.33)
  }
  dend[829] {pt3dclear()
	pt3dadd(-14.83, 10, -44.28, 0.33)
	pt3dadd(-14.5, 10.17, -44.28, 0.33)
	pt3dadd(-14.5, 8.33, -44.28, 0.33)
	pt3dadd(-14.67, 8.17, -44.28, 0.33)
	pt3dadd(-14.67, 7.5, -44.28, 0.33)
	pt3dadd(-14.83, 7.33, -44.28, 0.33)
  }
  dend[830] {pt3dclear()
	pt3dadd(-14.83, 7.33, -44.28, 0.33)
	pt3dadd(-15.17, 7.67, -44.28, 0.33)
	pt3dadd(-14.83, 7.67, -44.28, 0.33)
	pt3dadd(-14.5, 7.5, -44.28, 0.33)
	pt3dadd(-13.83, 6.83, -44.28, 0.33)
	pt3dadd(-13.67, 6.5, -44.28, 0.33)
	pt3dadd(-13.33, 6.17, -44.28, 0.33)
	pt3dadd(-13.17, 6, -44.28, 0.33)
	pt3dadd(-13.17, 5.33, -44.28, 0.33)
  }
  dend[831] {pt3dclear()
	pt3dadd(-14.83, 7.33, -44.28, 0.33)
	pt3dadd(-14.33, 7.33, -44.28, 0.33)
	pt3dadd(-14.5, 7, -44.28, 0.33)
	pt3dadd(-14.5, 6.5, -44.28, 0.33)
	pt3dadd(-14.67, 6.33, -44.28, 0.33)
	pt3dadd(-15, 6.17, -44.28, 0.33)
	pt3dadd(-15.17, 6, -44.28, 0.33)
	pt3dadd(-15.33, 5.83, -44.28, 0.33)
	pt3dadd(-15.5, 5.67, -44.28, 0.33)
	pt3dadd(-15.67, 5.5, -44.28, 0.33)
	pt3dadd(-15.83, 5.33, -44.28, 0.33)
	pt3dadd(-15.83, 5, -44.28, 0.33)
	pt3dadd(-16, 5, -44.28, 0.33)
  }
  dend[832] {pt3dclear()
	pt3dadd(-15.83, 11.33, -44.28, 0.33)
	pt3dadd(-15.67, 11.33, -44.28, 0.33)
	pt3dadd(-15.67, 10.83, -44.28, 0.33)
	pt3dadd(-16, 10.67, -44.28, 0.33)
	pt3dadd(-16.17, 10.33, -44.28, 0.33)
	pt3dadd(-16.32, 10.17, -44.28, 0.33)
	pt3dadd(-16.32, 9.83, -44.28, 0.33)
	pt3dadd(-16.5, 9.67, -44.28, 0.33)
	pt3dadd(-16.67, 9.33, -44.28, 0.33)
	pt3dadd(-16.82, 9, -44.28, 0.33)
	pt3dadd(-17, 8.67, -44.28, 0.33)
	pt3dadd(-17.17, 8.33, -44.28, 0.33)
	pt3dadd(-17.17, 7.83, -44.28, 0.33)
	pt3dadd(-17.32, 7.67, -44.28, 0.33)
	pt3dadd(-17.5, 7.5, -44.28, 0.33)
	pt3dadd(-17.5, 7.17, -44.28, 0.33)
	pt3dadd(-17.67, 7, -44.28, 0.33)
	pt3dadd(-17.82, 6.83, -44.28, 0.33)
  }
  dend[833] {pt3dclear()
	pt3dadd(-18.37, 11.01, -44.28, 0.33)
	pt3dadd(-18.67, 11.33, -44.28, 0.33)
	pt3dadd(-18.5, 11, -44.28, 0.33)
	pt3dadd(-18.5, 9.67, -44.28, 0.33)
	pt3dadd(-18.67, 9.5, -44.28, 0.33)
	pt3dadd(-18.82, 9.33, -44.28, 0.33)
	pt3dadd(-18.82, 9, -44.28, 0.33)
	pt3dadd(-19, 9, -44.28, 0.33)
  }
  dend[834] {pt3dclear()
	pt3dadd(-20.5, 12, -40.68, 0.33)
	pt3dadd(-20, 11.67, -40.68, 0.33)
	pt3dadd(-20.32, 11.5, -40.68, 0.33)
	pt3dadd(-20.67, 11.33, -40.68, 0.33)
	pt3dadd(-20.83, 11.17, -40.68, 0.33)
	pt3dadd(-21.17, 11, -40.68, 0.33)
	pt3dadd(-21.5, 11, -40.68, 0.33)
	pt3dadd(-21.83, 10.83, -40.68, 0.33)
  }
  dend[835] {pt3dclear()
	pt3dadd(-15.33, 12.67, -39.96, 0.33)
	pt3dadd(-14.83, 12.83, -39.96, 0.33)
	pt3dadd(-14.67, 13, -39.96, 0.33)
	pt3dadd(-14.5, 13.33, -39.96, 0.33)
	pt3dadd(-14.17, 13.5, -39.96, 0.33)
	pt3dadd(-14, 13.83, -39.96, 0.33)
	pt3dadd(-13.83, 14, -39.96, 0.33)
  }
}
proc shape3d_70() {
  dend[835] {	pt3dadd(-13.5, 14, -39.96, 0.33)
	pt3dadd(-13.33, 14.17, -39.96, 0.33)
	pt3dadd(-13.17, 14.33, -39.96, 0.33)
	pt3dadd(-13, 14.5, -39.96, 0.33)
	pt3dadd(-12.83, 14.67, -39.96, 0.33)
	pt3dadd(-12.83, 14.5, -39.96, 0.33)
  }
  dend[836] {pt3dclear()
	pt3dadd(-12.83, 14.5, -39.96, 0.33)
	pt3dadd(-12.83, 14.33, -39.96, 0.33)
	pt3dadd(-12.67, 14.5, -39.96, 0.33)
	pt3dadd(-11.67, 14.5, -39.96, 0.33)
	pt3dadd(-11.5, 14.33, -39.96, 0.33)
	pt3dadd(-10.83, 14.33, -39.96, 0.33)
	pt3dadd(-10.67, 14.17, -39.96, 0.33)
	pt3dadd(-10.5, 14, -39.96, 0.33)
	pt3dadd(-8.83, 14, -39.96, 0.33)
	pt3dadd(-8.83, 14.67, -39.96, 0.33)
	pt3dadd(-8.67, 14.67, -39.96, 0.33)
  }
  dend[837] {pt3dclear()
	pt3dadd(-12.83, 14.5, -39.96, 0.33)
	pt3dadd(-12.33, 14.67, -39.96, 0.33)
	pt3dadd(-12.33, 17, -39.96, 0.33)
	pt3dadd(-12.17, 17, -39.96, 0.33)
  }
  dend[838] {pt3dclear()
	pt3dadd(-12.17, 17, -39.96, 0.33)
	pt3dadd(-11.83, 17.17, -39.96, 0.33)
	pt3dadd(-11.5, 17.32, -39.96, 0.33)
	pt3dadd(-11.17, 17.5, -39.96, 0.33)
	pt3dadd(-10.83, 17.5, -39.96, 0.33)
	pt3dadd(-10.67, 17.67, -39.96, 0.33)
	pt3dadd(-10.17, 17.67, -39.96, 0.33)
	pt3dadd(-10, 17.5, -39.96, 0.33)
	pt3dadd(-9.83, 17.32, -39.96, 0.33)
	pt3dadd(-9.33, 17.32, -39.96, 0.33)
	pt3dadd(-9, 17.17, -39.96, 0.33)
	pt3dadd(-8.67, 17, -39.96, 0.33)
  }
  dend[839] {pt3dclear()
	pt3dadd(-12.17, 17, -39.96, 0.33)
	pt3dadd(-12.33, 16.82, -39.96, 0.33)
	pt3dadd(-12.67, 17, -39.96, 0.33)
	pt3dadd(-12.83, 17.17, -39.96, 0.33)
	pt3dadd(-13.17, 17.17, -39.96, 0.33)
	pt3dadd(-13.33, 17.32, -39.96, 0.33)
	pt3dadd(-13.67, 17.32, -39.96, 0.33)
	pt3dadd(-14, 17.5, -39.96, 0.33)
	pt3dadd(-14.17, 17.32, -39.96, 0.33)
	pt3dadd(-14.67, 17.32, -39.96, 0.33)
	pt3dadd(-14.67, 17.17, -39.96, 0.33)
  }
  dend[840] {pt3dclear()
	pt3dadd(-9.83, 13.33, -39.96, 0.33)
	pt3dadd(-9.67, 13.17, -39.96, 0.33)
	pt3dadd(-9.5, 13, -39.96, 0.33)
	pt3dadd(-9.33, 12.83, -39.96, 0.33)
	pt3dadd(-9.33, 12.33, -39.96, 0.33)
	pt3dadd(-9.17, 12.17, -39.96, 0.33)
	pt3dadd(-9.17, 11.83, -39.96, 0.33)
	pt3dadd(-9, 11.5, -39.96, 0.33)
  }
  dend[841] {pt3dclear()
	pt3dadd(-9, 11.5, -39.96, 0.33)
	pt3dadd(-8.83, 11.67, -39.96, 0.33)
	pt3dadd(-8.5, 11.67, -39.96, 0.33)
	pt3dadd(-8.33, 11.5, -39.96, 0.33)
	pt3dadd(-8.17, 11.33, -39.96, 0.33)
	pt3dadd(-8.17, 11, -39.96, 0.33)
	pt3dadd(-8, 10.83, -39.96, 0.33)
	pt3dadd(-7.83, 10.5, -39.96, 0.33)
	pt3dadd(-7.67, 10.33, -39.96, 0.33)
	pt3dadd(-7.5, 10.17, -39.96, 0.33)
	pt3dadd(-7.5, 9.83, -39.96, 0.33)
	pt3dadd(-7.33, 9.5, -39.96, 0.33)
	pt3dadd(-7.17, 9.33, -39.96, 0.33)
	pt3dadd(-7.17, 8, -39.96, 0.33)
  }
  dend[842] {pt3dclear()
	pt3dadd(-9, 11.5, -39.96, 0.33)
	pt3dadd(-8.83, 11.5, -39.96, 0.33)
	pt3dadd(-9, 11.33, -39.96, 0.33)
	pt3dadd(-9.17, 11, -39.96, 0.33)
	pt3dadd(-9.33, 10.83, -39.96, 0.33)
	pt3dadd(-9.5, 10.67, -39.96, 0.33)
	pt3dadd(-9.83, 10.5, -39.96, 0.33)
	pt3dadd(-10, 10.33, -39.96, 0.33)
	pt3dadd(-10, 10, -39.96, 0.33)
	pt3dadd(-10.17, 9.83, -39.96, 0.33)
	pt3dadd(-10.33, 9.67, -39.96, 0.33)
	pt3dadd(-10.33, 9.5, -39.96, 0.33)
  }
  dend[843] {pt3dclear()
	pt3dadd(-4.18, 14.12, -39.24, 0.33)
	pt3dadd(-4.83, 13.83, -39.24, 0.33)
	pt3dadd(-4.67, 13.67, -39.24, 0.33)
	pt3dadd(-4.67, 12.83, -39.24, 0.33)
	pt3dadd(-4.83, 12.67, -39.24, 0.33)
	pt3dadd(-5, 12.5, -39.24, 0.33)
	pt3dadd(-5.17, 12.33, -39.24, 0.33)
	pt3dadd(-5.33, 12.17, -39.24, 0.33)
  }
  dend[844] {pt3dclear()
	pt3dadd(-5.33, 12.17, -39.24, 0.33)
	pt3dadd(-5.17, 12.33, -39.24, 0.33)
	pt3dadd(-5, 12.17, -39.24, 0.33)
	pt3dadd(-4.83, 11.83, -39.24, 0.33)
	pt3dadd(-4.83, 11.33, -39.24, 0.33)
	pt3dadd(-4.67, 11, -39.24, 0.33)
	pt3dadd(-4.5, 10.83, -39.24, 0.33)
	pt3dadd(-4.5, 10.17, -39.24, 0.33)
	pt3dadd(-4.83, 10.17, -39.24, 0.33)
	pt3dadd(-5, 10, -39.24, 0.33)
  }
  dend[845] {pt3dclear()
	pt3dadd(-5, 10, -39.24, 0.33)
	pt3dadd(-4.83, 10.17, -39.24, 0.33)
	pt3dadd(-4.67, 10, -39.24, 0.33)
	pt3dadd(-4.33, 9.83, -39.24, 0.33)
	pt3dadd(-4, 9.5, -39.24, 0.33)
	pt3dadd(-3.83, 9.33, -39.24, 0.33)
	pt3dadd(-3.83, 8.67, -39.24, 0.33)
	pt3dadd(-3.67, 8.33, -39.24, 0.33)
	pt3dadd(-3.67, 7.83, -39.24, 0.33)
	pt3dadd(-3.83, 7.83, -39.24, 0.33)
  }
  dend[846] {pt3dclear()
	pt3dadd(-5, 10, -39.24, 0.33)
	pt3dadd(-4.83, 9.67, -39.24, 0.33)
	pt3dadd(-5, 9.5, -39.24, 0.33)
	pt3dadd(-5.67, 8.83, -39.24, 0.33)
	pt3dadd(-5.83, 8.67, -39.24, 0.33)
	pt3dadd(-6, 8.5, -39.24, 0.33)
	pt3dadd(-6.17, 8.33, -39.24, 0.33)
	pt3dadd(-6.17, 8.17, -39.24, 0.33)
  }
  dend[847] {pt3dclear()
	pt3dadd(-5.33, 12.17, -39.24, 0.33)
	pt3dadd(-5, 12.33, -39.24, 0.33)
	pt3dadd(-5.33, 12.17, -39.24, 0.33)
	pt3dadd(-5.67, 12.17, -39.24, 0.33)
	pt3dadd(-5.83, 12, -39.24, 0.33)
	pt3dadd(-6.17, 11.83, -39.24, 0.33)
	pt3dadd(-6.5, 11.83, -39.24, 0.33)
	pt3dadd(-6.83, 11.67, -39.24, 0.33)
	pt3dadd(-7, 11.5, -39.24, 0.33)
	pt3dadd(-7.33, 11.33, -39.24, 0.33)
	pt3dadd(-7.5, 11.17, -39.24, 0.33)
	pt3dadd(-7.67, 11, -39.24, 0.33)
	pt3dadd(-7.67, 9.5, -39.24, 0.33)
	pt3dadd(-7.83, 9.17, -39.24, 0.33)
	pt3dadd(-8, 9, -39.24, 0.33)
	pt3dadd(-8.17, 8.83, -39.24, 0.33)
	pt3dadd(-8.17, 8.67, -39.24, 0.33)
  }
  dend[848] {pt3dclear()
	pt3dadd(-4.67, 13.67, -39.24, 0.33)
	pt3dadd(-4, 13.83, -39.24, 0.33)
	pt3dadd(-4, 13, -39.24, 0.33)
	pt3dadd(-3.83, 12.83, -39.24, 0.33)
	pt3dadd(-3.67, 12.67, -39.24, 0.33)
	pt3dadd(-3.5, 12.5, -39.24, 0.33)
	pt3dadd(-3.33, 12.33, -39.24, 0.33)
	pt3dadd(-3.17, 12.17, -39.24, 0.33)
	pt3dadd(-3.17, 11.5, -39.24, 0.33)
	pt3dadd(-3, 11.33, -39.24, 0.33)
	pt3dadd(-3, 10.83, -39.24, 0.33)
  }
  dend[849] {pt3dclear()
	pt3dadd(-4, 15.67, -40.68, 0.33)
	pt3dadd(-3.83, 15.67, -40.68, 0.33)
	pt3dadd(-3.5, 15.67, -40.68, 0.33)
	pt3dadd(-3.33, 15.5, -40.68, 0.33)
	pt3dadd(-3, 15.33, -40.68, 0.33)
	pt3dadd(-2.83, 15, -40.68, 0.33)
	pt3dadd(-2.5, 14.83, -40.68, 0.33)
	pt3dadd(-2.33, 14.67, -40.68, 0.33)
	pt3dadd(-2.17, 14.5, -40.68, 0.33)
	pt3dadd(-2, 14.33, -40.68, 0.33)
	pt3dadd(-1.83, 14.17, -40.68, 0.33)
	pt3dadd(-1.83, 14, -40.68, 0.33)
  }
  dend[850] {pt3dclear()
	pt3dadd(-1.83, 14, -40.68, 0.33)
	pt3dadd(-1.5, 14.33, -40.32, 0.33)
	pt3dadd(-1.17, 14.33, -40.32, 0.33)
	pt3dadd(-0.83, 14.17, -40.32, 0.33)
	pt3dadd(-0.67, 14, -40.32, 0.33)
	pt3dadd(-0.5, 13.83, -40.32, 0.33)
	pt3dadd(-0.33, 13.5, -40.32, 0.33)
	pt3dadd(0, 13.33, -40.32, 0.33)
	pt3dadd(0.33, 13.33, -40.32, 0.33)
	pt3dadd(0.33, 13.17, -40.32, 0.33)
  }
  dend[851] {pt3dclear()
	pt3dadd(-1.83, 14, -40.68, 0.33)
	pt3dadd(-1.33, 13.83, -40.68, 0.33)
	pt3dadd(-1.17, 13.67, -40.68, 0.33)
	pt3dadd(-1.17, 11.17, -40.68, 0.33)
	pt3dadd(-1.33, 11, -40.68, 0.33)
	pt3dadd(-1.33, 10.67, -40.68, 0.33)
	pt3dadd(-1.5, 10.5, -40.68, 0.33)
	pt3dadd(-1.67, 10.33, -40.68, 0.33)
	pt3dadd(-1.83, 10.17, -40.68, 0.33)
	pt3dadd(-2, 10.17, -40.68, 0.33)
  }
  dend[852] {pt3dclear()
	pt3dadd(-3.33, 17.82, -39.96, 0.33)
	pt3dadd(-3.17, 17.82, -39.96, 0.33)
	pt3dadd(-2.67, 17.82, -39.96, 0.33)
	pt3dadd(-2.5, 17.67, -39.96, 0.33)
	pt3dadd(-2.17, 17.32, -39.96, 0.33)
	pt3dadd(-2, 17.17, -39.96, 0.33)
	pt3dadd(-1.83, 16.82, -39.96, 0.33)
	pt3dadd(-1.67, 16.67, -39.96, 0.33)
	pt3dadd(-1.5, 16.5, -39.96, 0.33)
	pt3dadd(-1.67, 16.5, -39.96, 0.33)
  }
  dend[853] {pt3dclear()
	pt3dadd(-1.67, 16.5, -39.96, 0.33)
	pt3dadd(-1.83, 16.67, -39.96, 0.33)
	pt3dadd(-1.33, 16.67, -39.96, 0.33)
	pt3dadd(-1.17, 16.5, -39.96, 0.33)
	pt3dadd(-1, 16.32, -39.96, 0.33)
	pt3dadd(-0.83, 16.17, -39.96, 0.33)
	pt3dadd(-0.67, 16, -39.96, 0.33)
	pt3dadd(-0.5, 15.67, -39.96, 0.33)
	pt3dadd(-0.33, 15.5, -39.96, 0.33)
	pt3dadd(-0.17, 15.17, -39.96, 0.33)
	pt3dadd(-0.17, 15, -39.96, 0.33)
  }
  dend[854] {pt3dclear()
	pt3dadd(-0.17, 15, -39.96, 0.33)
	pt3dadd(0, 15, -39.96, 0.33)
	pt3dadd(0.33, 15.17, -39.96, 0.33)
	pt3dadd(0.5, 15.33, -39.96, 0.33)
	pt3dadd(0.67, 15.5, -39.96, 0.33)
  }
}
proc shape3d_71() {
  dend[854] {	pt3dadd(1, 15.83, -39.96, 0.33)
	pt3dadd(1.17, 16, -39.96, 0.33)
	pt3dadd(1.33, 16.17, -39.96, 0.33)
	pt3dadd(1.33, 17.32, -39.96, 0.33)
	pt3dadd(1.17, 17.5, -39.96, 0.33)
	pt3dadd(1, 17.67, -39.96, 0.33)
  }
  dend[855] {pt3dclear()
	pt3dadd(1, 17.67, -39.96, 0.33)
	pt3dadd(1, 17.82, -39.96, 0.33)
	pt3dadd(0.83, 18.17, -39.96, 0.33)
	pt3dadd(0.67, 18.32, -39.96, 0.33)
	pt3dadd(0.5, 18.5, -39.96, 0.33)
	pt3dadd(0.5, 18.82, -39.96, 0.33)
	pt3dadd(0.33, 19, -39.96, 0.33)
	pt3dadd(0.17, 19.17, -39.96, 0.33)
	pt3dadd(0, 19.32, -39.96, 0.33)
	pt3dadd(-0.33, 19.32, -39.96, 0.33)
  }
  dend[856] {pt3dclear()
	pt3dadd(1, 17.67, -39.96, 0.33)
	pt3dadd(1.5, 17.67, -39.96, 0.33)
	pt3dadd(1.67, 17.32, -39.96, 0.33)
	pt3dadd(1.67, 17, -39.96, 0.33)
	pt3dadd(1.83, 16.82, -39.96, 0.33)
	pt3dadd(1.83, 16.5, -39.96, 0.33)
	pt3dadd(2, 16.32, -39.96, 0.33)
	pt3dadd(2, 15.67, -39.96, 0.33)
	pt3dadd(1.34, 15.67, -39.96, 0.33)
  }
  dend[857] {pt3dclear()
	pt3dadd(1.34, 15.67, -39.96, 0.33)
	pt3dadd(1.67, 15.83, -39.96, 0.33)
	pt3dadd(1.83, 16, -39.96, 0.33)
	pt3dadd(2, 16.17, -39.96, 0.33)
	pt3dadd(2.17, 16.32, -39.96, 0.33)
	pt3dadd(2.5, 16.5, -39.96, 0.33)
	pt3dadd(2.67, 16.5, -39.96, 0.33)
  }
  dend[858] {pt3dclear()
	pt3dadd(1.34, 15.67, -39.96, 0.33)
	pt3dadd(1.83, 15.67, -39.96, 0.33)
	pt3dadd(2, 15.5, -39.96, 0.33)
	pt3dadd(1.83, 15.17, -39.96, 0.33)
	pt3dadd(1.67, 14.83, -39.96, 0.33)
	pt3dadd(1.33, 14.67, -39.96, 0.33)
	pt3dadd(1.17, 14.33, -39.96, 0.33)
	pt3dadd(1.17, 14, -39.96, 0.33)
	pt3dadd(1, 13.83, -39.96, 0.33)
  }
  dend[859] {pt3dclear()
	pt3dadd(-0.17, 15, -39.96, 0.33)
	pt3dadd(0, 14.83, -39.96, 0.33)
	pt3dadd(0, 13.67, -39.96, 0.33)
	pt3dadd(-0.17, 13.5, -39.96, 0.33)
	pt3dadd(-0.33, 13.33, -39.96, 0.33)
	pt3dadd(-0.5, 13.17, -39.96, 0.33)
	pt3dadd(-0.67, 13, -39.96, 0.33)
	pt3dadd(-0.83, 12.83, -39.96, 0.33)
	pt3dadd(-1, 12.67, -39.96, 0.33)
	pt3dadd(-1, 12.33, -39.96, 0.33)
	pt3dadd(-1.17, 12.17, -39.96, 0.33)
	pt3dadd(-1.33, 12, -39.96, 0.33)
	pt3dadd(-1.33, 11.67, -39.96, 0.33)
	pt3dadd(-1.5, 11.67, -39.96, 0.33)
  }
  dend[860] {pt3dclear()
	pt3dadd(-1.5, 11.67, -39.96, 0.33)
	pt3dadd(-1.17, 11.83, -39.96, 0.33)
	pt3dadd(-1, 12.17, -39.96, 0.33)
	pt3dadd(-0.67, 12.33, -39.96, 0.33)
	pt3dadd(-0.5, 12.5, -39.96, 0.33)
	pt3dadd(-0.33, 12.67, -39.96, 0.33)
	pt3dadd(-0.17, 12.83, -39.96, 0.33)
  }
  dend[861] {pt3dclear()
	pt3dadd(-1.5, 11.67, -39.96, 0.33)
	pt3dadd(-1.5, 11.5, -39.96, 0.33)
	pt3dadd(-1.67, 11.67, -39.96, 0.33)
	pt3dadd(-2.17, 11.67, -39.96, 0.33)
	pt3dadd(-2.5, 11.83, -39.96, 0.33)
	pt3dadd(-2.67, 11.67, -39.96, 0.33)
	pt3dadd(-2.83, 11.5, -39.96, 0.33)
	pt3dadd(-3, 11.5, -39.96, 0.33)
  }
  dend[862] {pt3dclear()
	pt3dadd(-1.67, 16.5, -39.96, 0.33)
	pt3dadd(-1.33, 16.67, -40.68, 0.33)
	pt3dadd(-1.17, 16.82, -40.68, 0.33)
	pt3dadd(-1, 17, -40.68, 0.33)
	pt3dadd(-0.67, 17.17, -40.68, 0.33)
	pt3dadd(-0.33, 17.32, -40.68, 0.33)
	pt3dadd(-0.17, 17.5, -40.68, 0.33)
  }
  dend[863] {pt3dclear()
	pt3dadd(-3, 20.67, -40.32, 0.67)
	pt3dadd(-2.83, 20.67, -41.04, 0.67)
	pt3dadd(-2.5, 20.67, -41.04, 0.67)
	pt3dadd(-2.33, 20.5, -41.04, 0.67)
	pt3dadd(-2, 20.5, -41.04, 0.67)
	pt3dadd(-1.67, 20.32, -41.04, 0.67)
	pt3dadd(-1.5, 20.17, -41.04, 0.67)
	pt3dadd(-1, 20.17, -41.04, 0.67)
	pt3dadd(-0.83, 20.32, -41.04, 0.67)
  }
  dend[864] {pt3dclear()
	pt3dadd(-0.83, 20.32, -41.04, 0.67)
	pt3dadd(-0.83, 20.5, -40.68, 0.33)
	pt3dadd(-0.5, 20.67, -40.68, 0.33)
	pt3dadd(1.33, 20.67, -40.68, 0.33)
	pt3dadd(1.17, 20.67, -40.68, 0.33)
  }
  dend[865] {pt3dclear()
	pt3dadd(1.17, 20.67, -40.68, 0.33)
	pt3dadd(1.17, 20.83, -40.32, 0.33)
	pt3dadd(1.33, 20.67, -40.32, 0.33)
	pt3dadd(1.5, 20.5, -40.32, 0.33)
	pt3dadd(1.5, 20.17, -40.32, 0.33)
	pt3dadd(1.67, 20, -40.32, 0.33)
	pt3dadd(1.67, 19.67, -40.32, 0.33)
	pt3dadd(1.83, 19.5, -40.32, 0.33)
	pt3dadd(2, 19.32, -40.32, 0.33)
  }
  dend[866] {pt3dclear()
	pt3dadd(2, 19.32, -40.32, 0.33)
	pt3dadd(2.17, 19.84, -39.94, 0.33)
  }
  dend[867] {pt3dclear()
	pt3dadd(2.17, 19.84, -39.94, 0.33)
	pt3dadd(2.33, 20, -39.96, 0.33)
	pt3dadd(2.5, 20.32, -39.96, 0.33)
  }
  dend[868] {pt3dclear()
	pt3dadd(2.17, 19.84, -39.94, 0.33)
	pt3dadd(2.33, 20, -39.96, 0.33)
  }
  dend[869] {pt3dclear()
	pt3dadd(2, 19.32, -40.32, 0.33)
	pt3dadd(2.17, 19.5, -40.32, 0.33)
	pt3dadd(2.33, 19.32, -40.32, 0.33)
	pt3dadd(2.33, 18.67, -40.32, 0.33)
	pt3dadd(2.5, 18.5, -40.32, 0.33)
	pt3dadd(2.5, 18.17, -40.32, 0.33)
  }
  dend[870] {pt3dclear()
	pt3dadd(1.17, 20.67, -40.68, 0.33)
	pt3dadd(1.67, 20.67, -40.68, 0.33)
	pt3dadd(1.67, 22, -40.68, 0.33)
  }
  dend[871] {pt3dclear()
	pt3dadd(-0.83, 20.32, -41.04, 0.67)
	pt3dadd(-0.33, 20.5, -41.04, 0.33)
	pt3dadd(-0.33, 20.83, -41.04, 0.33)
	pt3dadd(-0.5, 21.17, -41.04, 0.33)
	pt3dadd(-0.67, 21.33, -41.04, 0.33)
	pt3dadd(-0.5, 21.67, -41.04, 0.33)
	pt3dadd(-0.33, 22, -41.04, 0.33)
	pt3dadd(-0.33, 22.5, -41.04, 0.33)
	pt3dadd(-0.17, 22.83, -41.04, 0.33)
	pt3dadd(0, 23, -41.04, 0.33)
	pt3dadd(0.17, 23.17, -41.04, 0.33)
  }
  dend[872] {pt3dclear()
	pt3dadd(3.33, 24.67, -40.32, 2.33)
	pt3dadd(3.17, 24.75, -44.28, 0.5)
	pt3dadd(3.33, 24.92, -44.28, 0.5)
	pt3dadd(4.83, 24.92, -44.28, 0.5)
	pt3dadd(5.17, 25.08, -44.28, 0.5)
	pt3dadd(5.33, 25.25, -44.28, 0.5)
	pt3dadd(6, 25.25, -44.28, 0.5)
	pt3dadd(6.33, 25.42, -44.28, 0.5)
	pt3dadd(6.67, 25.42, -44.28, 0.5)
	pt3dadd(7, 25.58, -44.28, 0.5)
	pt3dadd(8.5, 25.58, -44.28, 0.5)
	pt3dadd(8.83, 25.42, -44.28, 0.5)
	pt3dadd(9, 25.25, -44.28, 0.5)
	pt3dadd(9.17, 25.08, -44.28, 0.5)
	pt3dadd(9.33, 24.92, -44.28, 0.5)
	pt3dadd(9.67, 24.92, -44.28, 0.5)
	pt3dadd(10, 24.75, -44.28, 0.5)
  }
  dend[873] {pt3dclear()
	pt3dadd(10, 24.75, -44.28, 0.5)
	pt3dadd(11, 24.75, -44.28, 0.5)
  }
  dend[874] {pt3dclear()
	pt3dadd(11, 24.75, -44.28, 0.5)
	pt3dadd(10.33, 24.75, -44.28, 0.5)
	pt3dadd(10.67, 24.58, -44.28, 0.5)
	pt3dadd(10.83, 24.42, -44.28, 0.5)
	pt3dadd(11.17, 24.25, -44.28, 0.5)
	pt3dadd(11.67, 24.25, -44.28, 0.5)
	pt3dadd(11.5, 24.25, -44.28, 0.5)
  }
  dend[875] {pt3dclear()
	pt3dadd(11.5, 24.25, -44.28, 0.5)
	pt3dadd(11.67, 24.25, -44.28, 0.5)
	pt3dadd(12, 24.08, -44.28, 0.5)
	pt3dadd(12.17, 23.92, -44.28, 0.5)
	pt3dadd(12.5, 23.92, -44.28, 0.5)
	pt3dadd(12.67, 23.75, -44.28, 0.5)
	pt3dadd(13.17, 23.58, -44.28, 0.5)
	pt3dadd(13.5, 23.42, -44.28, 0.5)
	pt3dadd(13.67, 23.25, -44.28, 0.5)
	pt3dadd(13.83, 23.08, -44.28, 0.5)
	pt3dadd(14.17, 23.08, -44.28, 0.5)
	pt3dadd(14.17, 22.75, -44.28, 0.5)
	pt3dadd(14.33, 22.58, -44.28, 0.5)
  }
  dend[876] {pt3dclear()
	pt3dadd(14.33, 22.58, -44.28, 0.5)
	pt3dadd(14.33, 22.58, -45.72, 0.5)
	pt3dadd(14.5, 22.75, -45.72, 0.5)
	pt3dadd(14.67, 22.92, -45.72, 0.5)
	pt3dadd(15, 23.08, -45.72, 0.5)
	pt3dadd(15.33, 23.25, -45.72, 0.5)
	pt3dadd(15.5, 23.42, -45.72, 0.5)
	pt3dadd(15.83, 23.42, -45.72, 0.5)
	pt3dadd(16.17, 23.58, -45.72, 0.5)
	pt3dadd(16.32, 23.75, -45.72, 0.5)
	pt3dadd(16.67, 23.75, -45.72, 0.5)
	pt3dadd(17, 23.92, -45.72, 0.5)
	pt3dadd(17.32, 23.92, -45.72, 0.5)
	pt3dadd(17.82, 24.08, -45.72, 0.5)
	pt3dadd(18.82, 24.08, -45.72, 0.5)
	pt3dadd(19.17, 23.75, -45.72, 0.5)
	pt3dadd(19.5, 23.75, -45.72, 0.5)
	pt3dadd(19.67, 23.58, -45.72, 0.5)
	pt3dadd(21.17, 23.58, -45.72, 0.5)
	pt3dadd(21.33, 23.75, -45.72, 0.5)
	pt3dadd(21.5, 23.92, -45.72, 0.5)
	pt3dadd(21.83, 23.92, -45.72, 0.5)
	pt3dadd(21.67, 23.92, -45.72, 0.5)
  }
  dend[877] {pt3dclear()
	pt3dadd(21.67, 23.92, -45.72, 0.5)
	pt3dadd(21.5, 24.08, -46.8, 0.5)
	pt3dadd(21.33, 24.25, -46.8, 0.5)
	pt3dadd(21, 24.25, -46.8, 0.5)
	pt3dadd(20.83, 24.42, -46.8, 0.5)
	pt3dadd(20.67, 24.58, -46.8, 0.5)
	pt3dadd(20.5, 24.75, -46.8, 0.5)
	pt3dadd(20.32, 24.92, -46.8, 0.5)
	pt3dadd(20, 24.92, -46.8, 0.5)
	pt3dadd(19.82, 25.08, -46.8, 0.5)
	pt3dadd(19.5, 25.25, -46.8, 0.5)
  }
}
proc shape3d_72() {
  dend[877] {	pt3dadd(19.17, 25.25, -46.8, 0.5)
	pt3dadd(18.5, 25.58, -46.8, 0.5)
	pt3dadd(17.82, 25.58, -46.8, 0.5)
  }
  dend[878] {pt3dclear()
	pt3dadd(21.67, 23.92, -45.72, 0.5)
	pt3dadd(21.83, 23.75, -48.24, 0.5)
	pt3dadd(22.17, 23.58, -48.24, 0.5)
	pt3dadd(22.5, 23.42, -48.24, 0.5)
	pt3dadd(22.83, 23.08, -48.24, 0.5)
	pt3dadd(23.33, 22.92, -48.24, 0.5)
	pt3dadd(23.67, 22.92, -48.24, 0.5)
	pt3dadd(23.83, 22.75, -48.24, 0.5)
	pt3dadd(24.17, 22.75, -48.24, 0.5)
	pt3dadd(24.5, 22.58, -48.24, 0.5)
	pt3dadd(26.67, 22.58, -48.24, 0.5)
	pt3dadd(26.83, 22.75, -48.24, 0.5)
	pt3dadd(27.17, 22.75, -48.24, 0.5)
	pt3dadd(27.33, 22.92, -48.24, 0.5)
	pt3dadd(28, 22.92, -47.52, 0.5)
	pt3dadd(28.33, 23.08, -47.52, 0.5)
	pt3dadd(28.67, 23.08, -47.52, 0.5)
	pt3dadd(29, 23.25, -48.6, 0.5)
	pt3dadd(29.33, 23.42, -48.6, 0.5)
	pt3dadd(29.5, 23.58, -48.6, 0.5)
	pt3dadd(30, 23.58, -48.6, 0.5)
	pt3dadd(30.17, 23.42, -48.6, 0.5)
	pt3dadd(30.33, 23.25, -48.6, 0.5)
	pt3dadd(30.67, 23.08, -48.6, 0.5)
  }
  dend[879] {pt3dclear()
	pt3dadd(30.67, 23.08, -48.6, 0.5)
	pt3dadd(30.83, 23.08, -50.4, 0.5)
	pt3dadd(32, 23.08, -50.4, 0.5)
	pt3dadd(32.33, 22.92, -50.4, 0.5)
	pt3dadd(33, 22.92, -50.4, 0.5)
	pt3dadd(33.33, 23.08, -50.4, 0.5)
	pt3dadd(33.67, 23.25, -50.4, 0.5)
	pt3dadd(34.67, 23.25, -50.4, 0.5)
	pt3dadd(34.83, 23.42, -50.4, 0.5)
	pt3dadd(35.17, 23.42, -50.4, 0.5)
	pt3dadd(35.33, 23.58, -50.4, 0.5)
	pt3dadd(35.67, 23.58, -50.4, 0.5)
	pt3dadd(35.83, 23.75, -50.4, 0.5)
	pt3dadd(36, 23.92, -50.4, 0.5)
	pt3dadd(36.17, 24.25, -50.4, 0.5)
	pt3dadd(36.33, 24.42, -50.4, 0.5)
	pt3dadd(36.5, 24.58, -50.4, 0.5)
	pt3dadd(36.67, 24.58, -50.4, 0.5)
  }
  dend[880] {pt3dclear()
	pt3dadd(36.67, 24.58, -50.4, 0.5)
	pt3dadd(36.83, 24.58, -51.48, 0.5)
	pt3dadd(37, 24.42, -51.48, 0.5)
	pt3dadd(37.33, 24.42, -51.48, 0.5)
	pt3dadd(37.67, 24.25, -51.48, 0.5)
	pt3dadd(38, 24.08, -51.48, 0.5)
	pt3dadd(39, 24.08, -51.48, 0.5)
	pt3dadd(39.67, 23.92, -51.48, 0.5)
	pt3dadd(40.33, 23.92, -51.48, 0.5)
	pt3dadd(40.5, 23.75, -52.56, 0.5)
	pt3dadd(40.83, 23.75, -52.2, 0.5)
  }
  dend[881] {pt3dclear()
	pt3dadd(40.83, 23.75, -52.2, 0.5)
	pt3dadd(41.17, 23.75, -53.28, 0.5)
	pt3dadd(41.33, 23.92, -53.28, 0.5)
	pt3dadd(41.5, 24.08, -53.28, 0.5)
	pt3dadd(41.67, 24.25, -53.28, 0.5)
	pt3dadd(42, 24.42, -53.28, 0.5)
	pt3dadd(42.33, 24.58, -53.28, 0.5)
	pt3dadd(42.5, 24.75, -53.28, 0.5)
	pt3dadd(42.83, 24.92, -53.28, 0.5)
	pt3dadd(43, 25.08, -53.28, 0.5)
	pt3dadd(43.33, 25.25, -53.28, 0.5)
	pt3dadd(43.83, 25.25, -53.64, 0.5)
	pt3dadd(44, 25.08, -53.64, 0.5)
	pt3dadd(44.17, 24.92, -53.64, 0.5)
	pt3dadd(44.33, 24.75, -53.64, 0.5)
	pt3dadd(44.5, 24.58, -53.64, 0.5)
	pt3dadd(44.67, 24.42, -53.64, 0.5)
	pt3dadd(44.83, 24.25, -53.64, 0.5)
	pt3dadd(45, 24.08, -53.64, 0.5)
	pt3dadd(45.17, 23.75, -53.64, 0.5)
	pt3dadd(45.33, 23.58, -53.64, 0.5)
	pt3dadd(45.5, 23.42, -55.44, 0.5)
	pt3dadd(45.67, 23.25, -55.44, 0.5)
	pt3dadd(45.83, 23.08, -55.44, 0.5)
	pt3dadd(46, 22.92, -55.44, 0.5)
	pt3dadd(46.17, 22.75, -55.44, 0.5)
	pt3dadd(46.33, 22.58, -55.44, 0.5)
	pt3dadd(46.5, 22.42, -55.44, 0.5)
	pt3dadd(46.67, 22.25, -55.44, 0.5)
	pt3dadd(46.83, 22.08, -55.44, 0.5)
	pt3dadd(47, 21.92, -55.44, 0.5)
	pt3dadd(47.17, 21.58, -55.44, 0.5)
	pt3dadd(47.33, 21.42, -55.44, 0.5)
	pt3dadd(47.5, 21.25, -55.44, 0.5)
  }
  dend[882] {pt3dclear()
	pt3dadd(47.5, 21.25, -55.44, 0.5)
	pt3dadd(47.67, 21.25, -55.44, 0.5)
	pt3dadd(48.17, 21.25, -53.28, 0.5)
	pt3dadd(48.5, 21.08, -53.28, 0.5)
	pt3dadd(48.67, 20.75, -53.28, 0.5)
	pt3dadd(48.83, 20.58, -53.28, 0.5)
	pt3dadd(49, 20.42, -53.28, 0.5)
	pt3dadd(49.17, 20.25, -53.28, 0.5)
	pt3dadd(49.33, 20.07, -53.28, 0.5)
	pt3dadd(49.5, 19.92, -53.28, 0.5)
	pt3dadd(49.67, 19.75, -53.28, 0.5)
	pt3dadd(52.17, 19.75, -53.28, 0.5)
	pt3dadd(52.33, 19.57, -53.28, 0.5)
	pt3dadd(52.67, 19.57, -53.28, 0.5)
  }
  dend[883] {pt3dclear()
	pt3dadd(47.5, 21.25, -55.44, 0.5)
	pt3dadd(47.83, 21.25, -55.44, 0.5)
	pt3dadd(48, 21.08, -55.44, 0.5)
	pt3dadd(48.17, 20.92, -55.44, 0.5)
	pt3dadd(48.17, 20.25, -55.44, 0.5)
	pt3dadd(48.33, 19.92, -55.44, 0.5)
	pt3dadd(48.33, 18.25, -55.44, 0.5)
	pt3dadd(48.17, 18.07, -55.44, 0.5)
	pt3dadd(48, 17.92, -55.44, 0.5)
	pt3dadd(47.83, 17.92, -55.44, 0.5)
  }
  dend[884] {pt3dclear()
	pt3dadd(40.83, 23.75, -52.2, 0.5)
	pt3dadd(41, 23.92, -52.2, 0.5)
	pt3dadd(41.17, 23.75, -52.2, 0.5)
	pt3dadd(41.33, 23.42, -52.2, 0.5)
	pt3dadd(41.5, 23.08, -52.2, 0.5)
	pt3dadd(41.83, 22.92, -52.2, 0.5)
	pt3dadd(42, 22.75, -52.2, 0.5)
	pt3dadd(42.17, 22.58, -52.2, 0.5)
	pt3dadd(42, 22.25, -52.2, 0.5)
	pt3dadd(41.67, 22.08, -52.2, 0.5)
	pt3dadd(41.5, 21.92, -52.2, 0.5)
	pt3dadd(41.33, 21.75, -52.2, 0.5)
	pt3dadd(41.17, 21.58, -52.2, 0.5)
	pt3dadd(41.17, 21.42, -52.2, 0.5)
  }
  dend[885] {pt3dclear()
	pt3dadd(41.17, 21.42, -52.2, 0.5)
	pt3dadd(40.83, 21.25, -51.84, 0.5)
	pt3dadd(37.17, 21.25, -51.84, 0.5)
	pt3dadd(37.17, 21.42, -51.84, 0.5)
  }
  dend[886] {pt3dclear()
	pt3dadd(37.17, 21.42, -51.84, 0.5)
	pt3dadd(37, 21.42, -51.48, 0.5)
	pt3dadd(37, 21.08, -51.48, 0.5)
	pt3dadd(36.83, 20.75, -51.48, 0.5)
	pt3dadd(36.67, 20.42, -51.48, 0.5)
	pt3dadd(36.5, 20.25, -51.48, 0.5)
	pt3dadd(36.33, 20.07, -51.48, 0.5)
	pt3dadd(36.17, 19.92, -51.48, 0.5)
	pt3dadd(36, 19.75, -51.48, 0.5)
	pt3dadd(36, 19.42, -51.48, 0.5)
	pt3dadd(35.83, 19.25, -51.48, 0.5)
	pt3dadd(35.67, 19.07, -51.48, 0.5)
	pt3dadd(35.5, 19.07, -51.48, 0.5)
  }
  dend[887] {pt3dclear()
	pt3dadd(35.5, 19.07, -51.48, 0.5)
	pt3dadd(35.67, 19.25, -51.48, 0.5)
	pt3dadd(35, 18.57, -51.48, 0.5)
	pt3dadd(35, 18.25, -51.48, 0.5)
	pt3dadd(34.83, 17.92, -51.48, 0.5)
	pt3dadd(34.83, 16.07, -51.48, 0.5)
	pt3dadd(34.67, 15.92, -50.4, 0.5)
	pt3dadd(34.5, 15.58, -50.4, 0.5)
	pt3dadd(34.33, 15.42, -50.4, 0.5)
	pt3dadd(34.17, 15.25, -50.4, 0.5)
	pt3dadd(34, 15.08, -50.4, 0.5)
	pt3dadd(33.67, 15.08, -50.4, 0.5)
	pt3dadd(33.67, 14.92, -50.4, 0.5)
  }
  dend[888] {pt3dclear()
	pt3dadd(35.5, 19.07, -51.48, 0.5)
	pt3dadd(36, 19.25, -51.48, 0.5)
	pt3dadd(35, 19.25, -51.48, 0.5)
	pt3dadd(34.83, 19.42, -51.48, 0.5)
	pt3dadd(34.83, 20.58, -51.48, 0.5)
	pt3dadd(34.67, 20.75, -51.48, 0.5)
	pt3dadd(34.5, 21.08, -51.48, 0.5)
	pt3dadd(34.5, 22.08, -51.48, 0.5)
	pt3dadd(34.33, 22.08, -51.48, 0.5)
  }
  dend[889] {pt3dclear()
	pt3dadd(37.17, 21.42, -51.84, 0.5)
	pt3dadd(37, 21.25, -51.48, 0.5)
	pt3dadd(36.67, 21.42, -51.48, 0.5)
	pt3dadd(36.33, 21.42, -51.48, 0.5)
	pt3dadd(36.17, 21.58, -51.48, 0.5)
	pt3dadd(34.5, 21.58, -51.48, 0.5)
	pt3dadd(34.17, 21.25, -51.48, 0.5)
	pt3dadd(34, 21.08, -51.48, 0.5)
	pt3dadd(33.83, 20.92, -51.48, 0.5)
	pt3dadd(33.67, 20.75, -51.48, 0.5)
	pt3dadd(33.5, 20.42, -51.48, 0.5)
	pt3dadd(33.33, 20.25, -51.48, 0.5)
	pt3dadd(33.17, 19.92, -51.48, 0.5)
	pt3dadd(33, 19.75, -51.48, 0.5)
	pt3dadd(32.83, 19.57, -51.48, 0.5)
  }
  dend[890] {pt3dclear()
	pt3dadd(41.17, 21.42, -52.2, 0.5)
	pt3dadd(41.33, 21.92, -52.2, 0.5)
	pt3dadd(41.17, 21.58, -52.2, 0.5)
	pt3dadd(41.17, 21.25, -52.2, 0.5)
	pt3dadd(41, 20.92, -52.2, 0.5)
	pt3dadd(41, 19.25, -52.2, 0.5)
  }
  dend[891] {pt3dclear()
	pt3dadd(36.67, 24.58, -50.4, 0.5)
	pt3dadd(36.83, 24.75, -52.92, 0.5)
	pt3dadd(36.83, 25.08, -52.92, 0.5)
	pt3dadd(37, 25.25, -52.92, 0.5)
	pt3dadd(37.17, 25.42, -52.92, 0.5)
	pt3dadd(37.17, 25.75, -52.92, 0.5)
	pt3dadd(37.33, 26.08, -52.92, 0.5)
	pt3dadd(37.5, 26.25, -52.92, 0.5)
	pt3dadd(37.67, 26.42, -52.92, 0.5)
	pt3dadd(37.83, 26.75, -52.92, 0.5)
	pt3dadd(38, 27.08, -53.28, 0.5)
	pt3dadd(38.33, 27.08, -51.84, 0.5)
  }
}
proc shape3d_73() {
  dend[891] {	pt3dadd(38.67, 27.25, -51.84, 0.5)
	pt3dadd(39, 27.42, -51.84, 0.5)
	pt3dadd(39.17, 27.58, -51.84, 0.5)
	pt3dadd(39.67, 27.58, -51.84, 0.5)
	pt3dadd(39.83, 27.42, -51.84, 0.5)
	pt3dadd(40, 27.25, -51.84, 0.5)
	pt3dadd(40.33, 27.25, -51.84, 0.5)
	pt3dadd(40.5, 27.08, -51.84, 0.5)
	pt3dadd(40.67, 26.92, -51.84, 0.5)
	pt3dadd(41, 26.92, -51.84, 0.5)
	pt3dadd(41.17, 26.75, -51.84, 0.5)
	pt3dadd(43.17, 26.75, -51.84, 0.5)
	pt3dadd(43.33, 26.92, -51.84, 0.5)
  }
  dend[892] {pt3dclear()
	pt3dadd(30.67, 23.08, -48.6, 0.5)
	pt3dadd(31, 22.92, -48.6, 0.5)
	pt3dadd(31, 22.58, -48.6, 0.5)
	pt3dadd(30.83, 22.42, -48.6, 0.5)
	pt3dadd(30.83, 21.75, -48.6, 0.5)
	pt3dadd(30.67, 21.42, -48.6, 0.5)
	pt3dadd(30.67, 20.25, -48.6, 0.5)
	pt3dadd(30.5, 20.07, -48.6, 0.5)
	pt3dadd(30.33, 19.92, -48.6, 0.5)
	pt3dadd(30, 19.92, -48.6, 0.5)
	pt3dadd(29.83, 19.75, -48.6, 0.5)
  }
  dend[893] {pt3dclear()
	pt3dadd(14.33, 22.58, -44.28, 0.5)
	pt3dadd(14.5, 22.58, -44.28, 0.5)
	pt3dadd(14.67, 22.42, -44.28, 0.5)
	pt3dadd(14.83, 22.08, -44.28, 0.5)
	pt3dadd(15, 21.75, -44.28, 0.5)
	pt3dadd(15, 21.25, -44.28, 0.5)
	pt3dadd(15.17, 20.92, -44.28, 0.5)
	pt3dadd(15.17, 20.58, -44.28, 0.5)
	pt3dadd(15.33, 20.42, -44.28, 0.5)
	pt3dadd(15.5, 20.25, -44.28, 0.5)
	pt3dadd(15.5, 19.92, -44.28, 0.5)
	pt3dadd(15.67, 19.75, -44.28, 0.5)
	pt3dadd(15.83, 19.57, -44.28, 0.5)
	pt3dadd(15.83, 19.42, -44.28, 0.5)
  }
  dend[894] {pt3dclear()
	pt3dadd(15.83, 19.42, -44.28, 0.5)
	pt3dadd(16.32, 19.25, -44.28, 0.5)
	pt3dadd(16.5, 18.92, -44.28, 0.5)
	pt3dadd(16.67, 18.57, -44.28, 0.5)
	pt3dadd(16.67, 17.07, -44.28, 0.5)
	pt3dadd(16.5, 16.92, -44.28, 0.5)
  }
  dend[895] {pt3dclear()
	pt3dadd(16.5, 16.92, -44.28, 0.5)
	pt3dadd(16.67, 16.92, -44.28, 0.5)
	pt3dadd(16.82, 16.75, -44.28, 0.5)
	pt3dadd(16.82, 16.42, -44.28, 0.5)
	pt3dadd(17, 16.07, -44.28, 0.5)
	pt3dadd(17.17, 15.92, -44.28, 0.5)
	pt3dadd(17.17, 15.42, -44.28, 0.5)
	pt3dadd(17.32, 15.25, -44.28, 0.5)
	pt3dadd(17.5, 15.08, -44.28, 0.5)
  }
  dend[896] {pt3dclear()
	pt3dadd(17.5, 15.08, -44.28, 0.5)
	pt3dadd(17.82, 15.08, -41.76, 0.5)
	pt3dadd(18.32, 15.08, -43.56, 0.5)
	pt3dadd(19, 15.08, -42.12, 0.5)
	pt3dadd(19.17, 14.92, -42.12, 0.5)
	pt3dadd(19.5, 14.92, -42.12, 0.5)
	pt3dadd(19.67, 14.75, -42.12, 0.5)
	pt3dadd(20, 14.58, -42.12, 0.5)
	pt3dadd(20.32, 14.42, -42.12, 0.5)
	pt3dadd(20.5, 14.25, -42.12, 0.5)
	pt3dadd(20.67, 14.08, -42.12, 0.5)
	pt3dadd(21, 13.92, -42.12, 0.5)
	pt3dadd(21.17, 13.75, -42.12, 0.5)
	pt3dadd(21.33, 13.58, -42.12, 0.5)
	pt3dadd(21.5, 13.42, -42.12, 0.5)
	pt3dadd(21.83, 13.25, -42.12, 0.5)
	pt3dadd(22, 13.08, -42.12, 0.5)
	pt3dadd(22.33, 13.08, -42.12, 0.5)
	pt3dadd(22.5, 12.92, -42.12, 0.5)
	pt3dadd(22.67, 12.75, -42.12, 0.5)
	pt3dadd(22.83, 12.58, -42.12, 0.5)
  }
  dend[897] {pt3dclear()
	pt3dadd(17.5, 15.08, -44.28, 0.5)
	pt3dadd(17.67, 14.92, -44.28, 0.5)
	pt3dadd(17.5, 14.58, -44.28, 0.5)
	pt3dadd(17.32, 14.25, -44.28, 0.5)
	pt3dadd(17.17, 14.08, -44.28, 0.5)
	pt3dadd(17.17, 13.58, -44.28, 0.5)
	pt3dadd(17, 13.25, -44.28, 0.5)
	pt3dadd(17, 12.08, -44.28, 0.5)
	pt3dadd(16.82, 11.75, -44.28, 0.5)
	pt3dadd(16.67, 11.58, -44.28, 0.5)
	pt3dadd(16.67, 11.42, -44.28, 0.5)
  }
  dend[898] {pt3dclear()
	pt3dadd(16.5, 16.92, -44.28, 0.5)
	pt3dadd(16.82, 16.75, -44.28, 0.5)
	pt3dadd(16.67, 16.57, -44.28, 0.5)
	pt3dadd(16.5, 16.42, -44.28, 0.5)
	pt3dadd(16.32, 16.25, -44.28, 0.5)
	pt3dadd(16.17, 16.07, -44.28, 0.5)
	pt3dadd(15.83, 16.07, -44.28, 0.5)
	pt3dadd(15.67, 15.92, -44.28, 0.5)
	pt3dadd(14.5, 15.92, -44.28, 0.5)
	pt3dadd(14.33, 15.75, -44.28, 0.5)
	pt3dadd(13.5, 15.75, -44.28, 0.5)
	pt3dadd(13.33, 15.58, -44.28, 0.5)
	pt3dadd(13, 15.58, -44.28, 0.5)
	pt3dadd(12.83, 15.75, -44.28, 0.5)
	pt3dadd(11.83, 15.75, -44.28, 0.5)
	pt3dadd(11.67, 15.58, -44.28, 0.5)
	pt3dadd(11.5, 15.42, -44.28, 0.5)
	pt3dadd(11.33, 15.25, -44.28, 0.5)
	pt3dadd(11, 15.08, -44.28, 0.5)
	pt3dadd(10.83, 14.92, -44.28, 0.5)
	pt3dadd(10.67, 14.75, -44.28, 0.5)
	pt3dadd(10.5, 14.58, -44.28, 0.5)
	pt3dadd(10.33, 14.42, -44.28, 0.5)
	pt3dadd(10.17, 14.25, -44.28, 0.5)
	pt3dadd(10, 14.08, -44.28, 0.5)
	pt3dadd(9.67, 14.08, -44.28, 0.5)
	pt3dadd(8.94, 13.39, -44.28, 0.5)
  }
  dend[899] {pt3dclear()
	pt3dadd(8.94, 13.39, -44.28, 0.5)
	pt3dadd(9.33, 13.92, -44.28, 0.5)
	pt3dadd(9.33, 14.08, -44.28, 0.5)
	pt3dadd(9.5, 13.75, -44.28, 0.5)
	pt3dadd(9.67, 13.42, -44.28, 0.5)
	pt3dadd(9.67, 12.58, -44.28, 0.5)
	pt3dadd(9.83, 12.25, -44.28, 0.5)
	pt3dadd(10, 11.92, -44.28, 0.5)
	pt3dadd(10.17, 11.58, -44.28, 0.5)
	pt3dadd(10.17, 11.25, -44.28, 0.5)
	pt3dadd(10.33, 11.08, -44.28, 0.5)
	pt3dadd(10.33, 10.75, -44.28, 0.5)
	pt3dadd(10.5, 10.58, -44.28, 0.5)
	pt3dadd(10.67, 10.42, -44.28, 0.5)
  }
  dend[900] {pt3dclear()
	pt3dadd(8.94, 13.39, -44.28, 0.5)
	pt3dadd(9.5, 13.92, -44.28, 0.5)
	pt3dadd(8.33, 13.92, -44.28, 0.5)
	pt3dadd(8.33, 14.42, -44.28, 0.5)
	pt3dadd(8.17, 14.58, -44.28, 0.5)
	pt3dadd(8, 14.92, -44.28, 0.5)
	pt3dadd(8, 15.42, -44.28, 0.5)
	pt3dadd(7.83, 15.75, -44.28, 0.5)
	pt3dadd(7.83, 17.42, -44.28, 0.5)
  }
  dend[901] {pt3dclear()
	pt3dadd(15.83, 19.42, -44.28, 0.5)
	pt3dadd(16.32, 19.57, -43.92, 0.5)
	pt3dadd(16.5, 19.75, -43.92, 0.5)
	pt3dadd(17.17, 19.75, -43.92, 0.5)
	pt3dadd(17.5, 19.92, -43.92, 0.5)
	pt3dadd(17.82, 20.07, -43.92, 0.5)
	pt3dadd(18.17, 20.07, -43.92, 0.5)
	pt3dadd(18.5, 20.25, -43.92, 0.5)
	pt3dadd(18.82, 20.25, -43.92, 0.5)
	pt3dadd(19.17, 20.42, -43.92, 0.5)
	pt3dadd(19.67, 20.42, -43.92, 0.5)
  }
  dend[902] {pt3dclear()
	pt3dadd(19.67, 20.42, -43.92, 0.5)
	pt3dadd(19.67, 20.42, -48.96, 0.5)
	pt3dadd(20.32, 20.42, -48.96, 0.5)
	pt3dadd(20.67, 20.25, -48.96, 0.5)
	pt3dadd(21, 20.07, -48.96, 0.5)
	pt3dadd(21.17, 19.92, -48.96, 0.5)
	pt3dadd(21.5, 19.92, -48.96, 0.5)
  }
  dend[903] {pt3dclear()
	pt3dadd(21.5, 19.92, -48.96, 0.5)
	pt3dadd(22, 19.92, -48.24, 0.5)
	pt3dadd(22.67, 19.92, -48.24, 0.5)
	pt3dadd(22.83, 20.07, -48.24, 0.5)
  }
  dend[904] {pt3dclear()
	pt3dadd(22.83, 20.07, -48.24, 0.5)
	pt3dadd(22.67, 20.07, -48.6, 0.5)
	pt3dadd(24, 20.07, -48.6, 0.5)
	pt3dadd(24.33, 19.92, -48.6, 0.5)
	pt3dadd(27.83, 19.92, -49.32, 0.5)
	pt3dadd(28.17, 19.75, -49.32, 0.5)
	pt3dadd(28.33, 19.42, -49.32, 0.5)
	pt3dadd(28.5, 19.25, -49.32, 0.5)
	pt3dadd(29.17, 19.25, -49.32, 0.5)
	pt3dadd(29.33, 19.07, -49.32, 0.5)
	pt3dadd(29.5, 18.92, -49.32, 0.5)
	pt3dadd(29.83, 18.92, -49.68, 0.5)
	pt3dadd(30, 18.75, -49.68, 0.5)
	pt3dadd(30.33, 18.75, -49.68, 0.5)
	pt3dadd(30.5, 18.57, -49.68, 0.5)
	pt3dadd(30.5, 18.25, -49.68, 0.5)
	pt3dadd(30.67, 17.92, -49.68, 0.5)
	pt3dadd(30.67, 17.25, -49.68, 0.5)
	pt3dadd(30.83, 17.07, -49.68, 0.5)
	pt3dadd(31.17, 16.75, -49.68, 0.5)
	pt3dadd(31.33, 16.57, -49.68, 0.5)
	pt3dadd(31.5, 16.42, -49.68, 0.5)
	pt3dadd(31.83, 16.42, -49.68, 0.5)
	pt3dadd(32, 16.25, -49.68, 0.5)
  }
  dend[905] {pt3dclear()
	pt3dadd(22.83, 20.07, -48.24, 0.5)
	pt3dadd(23, 19.92, -48.24, 0.5)
	pt3dadd(23, 20.58, -48.24, 0.5)
	pt3dadd(22.83, 20.92, -48.24, 0.5)
	pt3dadd(22.83, 22.08, -48.24, 0.5)
	pt3dadd(22.67, 22.25, -48.24, 0.5)
	pt3dadd(22.67, 23.08, -48.24, 0.5)
	pt3dadd(22.83, 23.42, -48.24, 0.5)
	pt3dadd(22.83, 24.25, -48.24, 0.5)
	pt3dadd(23, 24.42, -48.24, 0.5)
	pt3dadd(23, 24.58, -48.24, 0.5)
  }
  dend[906] {pt3dclear()
	pt3dadd(21.5, 19.92, -48.96, 0.5)
	pt3dadd(21.67, 19.92, -48.96, 0.5)
	pt3dadd(22, 19.92, -47.16, 0.5)
	pt3dadd(22.17, 19.75, -47.16, 0.5)
	pt3dadd(22.17, 19.42, -47.16, 0.5)
	pt3dadd(22.33, 19.25, -47.16, 0.5)
	pt3dadd(22.5, 19.07, -47.16, 0.5)
	pt3dadd(22.67, 18.92, -47.16, 0.5)
  }
}
proc shape3d_74() {
  dend[906] {	pt3dadd(22.83, 18.57, -47.16, 0.5)
	pt3dadd(22.83, 18.07, -47.16, 0.5)
	pt3dadd(23, 17.92, -47.16, 0.5)
	pt3dadd(23.17, 17.57, -47.16, 0.5)
	pt3dadd(23.33, 17.42, -47.16, 0.5)
  }
  dend[907] {pt3dclear()
	pt3dadd(23.33, 17.42, -47.16, 0.5)
	pt3dadd(23.17, 17.42, -47.16, 0.5)
	pt3dadd(23.67, 17.42, -47.16, 0.5)
	pt3dadd(23.83, 17.25, -47.16, 0.5)
	pt3dadd(24, 17.07, -47.16, 0.5)
	pt3dadd(24.17, 16.92, -47.16, 0.5)
	pt3dadd(24.33, 16.75, -47.16, 0.5)
	pt3dadd(24.67, 16.75, -47.16, 0.5)
	pt3dadd(24.83, 16.57, -47.16, 0.5)
	pt3dadd(25.5, 16.57, -47.16, 0.5)
	pt3dadd(25.67, 16.42, -47.16, 0.5)
	pt3dadd(25.67, 16.25, -47.16, 0.5)
  }
  dend[908] {pt3dclear()
	pt3dadd(23.33, 17.42, -47.16, 0.5)
	pt3dadd(23.17, 17.42, -47.16, 0.5)
	pt3dadd(23.17, 14.75, -47.16, 0.5)
	pt3dadd(23.33, 14.42, -47.16, 0.5)
	pt3dadd(23.5, 14.25, -47.16, 0.5)
	pt3dadd(23.5, 13.92, -47.16, 0.5)
  }
  dend[909] {pt3dclear()
	pt3dadd(19.67, 20.42, -43.92, 0.5)
	pt3dadd(19.5, 20.42, -46.44, 0.5)
	pt3dadd(19.67, 20.58, -46.44, 0.5)
	pt3dadd(19.82, 20.92, -46.44, 0.5)
	pt3dadd(20, 21.08, -46.44, 0.5)
	pt3dadd(20.17, 21.25, -46.44, 0.5)
	pt3dadd(20.5, 21.42, -46.44, 0.5)
	pt3dadd(20.83, 21.58, -46.44, 0.5)
	pt3dadd(23.17, 21.58, -46.44, 0.5)
	pt3dadd(23.33, 21.42, -46.44, 0.5)
	pt3dadd(23.83, 21.42, -46.44, 0.5)
	pt3dadd(24, 21.25, -46.44, 0.5)
	pt3dadd(24.33, 21.08, -46.44, 0.5)
	pt3dadd(24.67, 21.08, -46.44, 0.5)
  }
  dend[910] {pt3dclear()
	pt3dadd(11.5, 24.25, -44.28, 0.5)
	pt3dadd(11.67, 24.58, -44.28, 0.5)
	pt3dadd(11.5, 24.25, -44.28, 0.5)
	pt3dadd(11.33, 23.92, -44.28, 0.5)
	pt3dadd(11.33, 22.75, -44.28, 0.5)
	pt3dadd(11.5, 22.58, -44.64, 0.5)
	pt3dadd(11.67, 22.42, -44.64, 0.5)
	pt3dadd(11.67, 21.08, -42.12, 0.5)
  }
  dend[911] {pt3dclear()
	pt3dadd(11.67, 21.08, -42.12, 0.5)
	pt3dadd(11.5, 21.08, -43.56, 0.5)
	pt3dadd(11.67, 20.92, -43.56, 0.5)
	pt3dadd(11.83, 20.75, -43.56, 0.5)
	pt3dadd(12, 20.42, -43.56, 0.5)
	pt3dadd(12.17, 20.07, -43.56, 0.5)
	pt3dadd(12.17, 19.57, -43.56, 0.5)
	pt3dadd(12, 19.42, -43.56, 0.5)
	pt3dadd(12, 18.25, -43.56, 0.5)
	pt3dadd(12.17, 18.07, -43.56, 0.5)
	pt3dadd(12.33, 17.92, -43.56, 0.5)
	pt3dadd(12.33, 17.57, -43.56, 0.5)
	pt3dadd(12.5, 17.42, -43.56, 0.5)
	pt3dadd(12.67, 17.25, -43.56, 0.5)
	pt3dadd(12.83, 17.07, -43.56, 0.5)
	pt3dadd(13, 17.07, -43.56, 0.5)
  }
  dend[912] {pt3dclear()
	pt3dadd(13, 17.07, -43.56, 0.5)
	pt3dadd(13, 16.92, -43.2, 0.5)
	pt3dadd(13.17, 17.07, -43.2, 0.5)
	pt3dadd(13.33, 16.92, -43.2, 0.5)
	pt3dadd(13.5, 16.75, -43.2, 0.5)
	pt3dadd(13.67, 16.57, -43.2, 0.5)
	pt3dadd(13.83, 16.25, -43.2, 0.5)
	pt3dadd(14, 16.07, -43.2, 0.5)
	pt3dadd(14.17, 15.75, -43.2, 0.5)
	pt3dadd(14.33, 15.58, -43.2, 0.5)
	pt3dadd(14.33, 15.25, -43.2, 0.5)
	pt3dadd(14.5, 15.08, -43.2, 0.5)
	pt3dadd(14.83, 14.75, -43.2, 0.5)
	pt3dadd(15, 14.58, -43.2, 0.5)
	pt3dadd(15.17, 14.25, -43.2, 0.5)
	pt3dadd(15.33, 14.08, -43.2, 0.5)
	pt3dadd(15.5, 13.92, -43.2, 0.5)
	pt3dadd(15.67, 13.75, -43.2, 0.5)
	pt3dadd(15.83, 13.42, -43.2, 0.5)
	pt3dadd(16, 13.25, -43.2, 0.5)
	pt3dadd(16.17, 13.08, -43.2, 0.5)
	pt3dadd(16.32, 12.92, -43.2, 0.5)
	pt3dadd(16.32, 12.58, -43.2, 0.5)
	pt3dadd(16.67, 12.58, -43.2, 0.5)
	pt3dadd(16.82, 12.42, -43.2, 0.5)
	pt3dadd(16.82, 12.25, -43.2, 0.5)
  }
  dend[913] {pt3dclear()
	pt3dadd(13, 17.07, -43.56, 0.5)
	pt3dadd(13.5, 17.25, -43.56, 0.5)
	pt3dadd(13.5, 15.25, -43.56, 0.5)
	pt3dadd(13.33, 14.92, -43.56, 0.5)
	pt3dadd(13.17, 14.75, -43.56, 0.5)
	pt3dadd(13.17, 14.42, -43.56, 0.5)
	pt3dadd(13, 14.25, -43.56, 0.5)
	pt3dadd(12.83, 14.08, -43.56, 0.5)
	pt3dadd(12.83, 13.75, -43.56, 0.5)
	pt3dadd(12.67, 13.58, -43.56, 0.5)
	pt3dadd(12.5, 13.25, -43.56, 0.5)
  }
  dend[914] {pt3dclear()
	pt3dadd(11.67, 21.08, -42.12, 0.5)
	pt3dadd(11.83, 21.42, -42.12, 0.5)
	pt3dadd(11.67, 21.25, -42.12, 0.5)
	pt3dadd(11.33, 21.08, -42.12, 0.5)
	pt3dadd(11.17, 20.92, -42.12, 0.5)
	pt3dadd(10.83, 20.75, -42.12, 0.5)
	pt3dadd(10.83, 20.07, -42.12, 0.5)
	pt3dadd(10.67, 19.92, -42.12, 0.5)
	pt3dadd(10.67, 18.75, -42.12, 0.5)
	pt3dadd(10.5, 18.57, -42.12, 0.5)
	pt3dadd(10.33, 18.42, -42.12, 0.5)
	pt3dadd(10.33, 17.75, -42.12, 0.5)
	pt3dadd(10.17, 17.57, -42.12, 0.5)
	pt3dadd(10, 17.42, -42.12, 0.5)
	pt3dadd(10, 16.92, -42.12, 0.5)
	pt3dadd(9.83, 16.75, -42.12, 0.5)
	pt3dadd(9.67, 16.57, -42.12, 0.5)
	pt3dadd(9.67, 16.42, -42.12, 0.5)
  }
  dend[915] {pt3dclear()
	pt3dadd(9.67, 16.42, -42.12, 0.5)
	pt3dadd(10, 16.42, -42.48, 0.5)
	pt3dadd(10.17, 16.25, -42.48, 0.5)
	pt3dadd(10.33, 16.07, -42.48, 0.5)
	pt3dadd(10.5, 15.92, -42.48, 0.5)
	pt3dadd(10.5, 15.25, -42.48, 0.5)
	pt3dadd(10.67, 14.92, -42.48, 0.5)
	pt3dadd(10.67, 13.58, -42.48, 0.5)
	pt3dadd(10.83, 13.42, -42.48, 0.5)
	pt3dadd(10.83, 12.92, -42.48, 0.5)
	pt3dadd(11, 12.75, -42.48, 0.5)
	pt3dadd(11.17, 12.58, -42.48, 0.5)
	pt3dadd(11.33, 12.25, -42.48, 0.5)
	pt3dadd(11.5, 11.92, -42.48, 0.5)
	pt3dadd(11.67, 11.58, -42.48, 0.5)
	pt3dadd(12, 11.42, -42.48, 0.5)
	pt3dadd(12.17, 11.25, -42.48, 0.5)
	pt3dadd(12.33, 11.08, -42.48, 0.5)
	pt3dadd(12.33, 10.75, -42.48, 0.5)
	pt3dadd(12.5, 10.58, -42.48, 0.5)
	pt3dadd(12.67, 10.25, -42.48, 0.5)
	pt3dadd(12.83, 10.08, -42.48, 0.5)
	pt3dadd(13, 9.92, -42.48, 0.5)
	pt3dadd(13, 9.75, -42.48, 0.5)
  }
  dend[916] {pt3dclear()
	pt3dadd(9.67, 16.42, -42.12, 0.5)
	pt3dadd(9.83, 16.57, -42.12, 0.5)
	pt3dadd(9.83, 16.25, -42.12, 0.5)
	pt3dadd(9.5, 16.07, -42.12, 0.5)
	pt3dadd(9.33, 15.92, -42.12, 0.5)
	pt3dadd(9, 15.75, -42.12, 0.5)
	pt3dadd(8.83, 15.58, -42.12, 0.5)
	pt3dadd(8.5, 15.42, -42.12, 0.5)
	pt3dadd(8.17, 15.42, -42.12, 0.5)
	pt3dadd(8, 15.25, -42.12, 0.5)
	pt3dadd(7.67, 15.25, -42.12, 0.5)
	pt3dadd(7.33, 15.08, -42.12, 0.5)
	pt3dadd(7, 14.92, -42.12, 0.5)
	pt3dadd(6.83, 14.75, -42.12, 0.5)
	pt3dadd(6.67, 14.75, -42.12, 0.5)
  }
  dend[917] {pt3dclear()
	pt3dadd(11, 24.75, -44.28, 0.5)
	pt3dadd(10, 24.58, -45, 0.5)
	pt3dadd(10.17, 24.92, -45, 0.5)
	pt3dadd(10.17, 25.25, -45, 0.5)
	pt3dadd(10.33, 25.42, -45, 0.5)
	pt3dadd(10.33, 26.58, -45, 0.5)
  }
  dend[918] {pt3dclear()
	pt3dadd(10.33, 26.58, -45, 0.5)
	pt3dadd(10.5, 26.75, -44.64, 0.5)
	pt3dadd(10.67, 26.92, -44.64, 0.5)
	pt3dadd(10.67, 27.42, -44.64, 0.5)
	pt3dadd(10.83, 27.58, -44.64, 0.5)
	pt3dadd(11, 27.75, -44.64, 0.5)
	pt3dadd(11.17, 27.92, -44.64, 0.5)
	pt3dadd(11.17, 28.25, -44.64, 0.5)
	pt3dadd(11.33, 28.42, -44.64, 0.5)
	pt3dadd(11.5, 28.75, -44.64, 0.5)
	pt3dadd(11.67, 28.92, -44.64, 0.5)
	pt3dadd(11.83, 29.08, -44.64, 0.5)
	pt3dadd(12, 29.25, -44.64, 0.5)
	pt3dadd(12.17, 29.42, -44.64, 0.5)
  }
  dend[919] {pt3dclear()
	pt3dadd(10.33, 26.58, -45, 0.5)
	pt3dadd(10.33, 26.75, -45, 0.5)
	pt3dadd(10.17, 26.92, -45, 0.5)
	pt3dadd(10, 27.08, -45, 0.5)
	pt3dadd(9.67, 27.25, -45, 0.5)
	pt3dadd(9.5, 27.58, -45, 0.5)
	pt3dadd(9.33, 27.75, -45, 0.5)
	pt3dadd(9.33, 28.25, -45, 0.5)
	pt3dadd(9.17, 28.42, -45, 0.5)
	pt3dadd(9, 28.58, -45, 0.5)
	pt3dadd(9, 28.92, -45, 0.5)
	pt3dadd(8.83, 29.08, -45, 0.5)
	pt3dadd(8.67, 29.42, -45, 0.5)
	pt3dadd(8.5, 29.58, -45, 0.5)
	pt3dadd(8.33, 29.75, -45, 0.5)
	pt3dadd(8.17, 29.58, -45, 0.5)
  }
  dend[920] {pt3dclear()
	pt3dadd(10, 24.75, -44.28, 0.5)
	pt3dadd(10.33, 24.92, -42.84, 0.5)
	pt3dadd(10.33, 25.25, -42.84, 0.5)
	pt3dadd(10.5, 25.42, -42.84, 0.5)
	pt3dadd(10.5, 26.08, -42.84, 0.5)
	pt3dadd(10.67, 26.08, -42.84, 0.5)
  }
}
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()
  shape3d_25()
  shape3d_26()
  shape3d_27()
  shape3d_28()
  shape3d_29()
  shape3d_30()
  shape3d_31()
  shape3d_32()
  shape3d_33()
  shape3d_34()
  shape3d_35()
  shape3d_36()
  shape3d_37()
  shape3d_38()
  shape3d_39()
  shape3d_40()
  shape3d_41()
  shape3d_42()
  shape3d_43()
  shape3d_44()
  shape3d_45()
  shape3d_46()
  shape3d_47()
  shape3d_48()
  shape3d_49()
  shape3d_50()
  shape3d_51()
  shape3d_52()
  shape3d_53()
  shape3d_54()
  shape3d_55()
  shape3d_56()
  shape3d_57()
  shape3d_58()
  shape3d_59()
  shape3d_60()
  shape3d_61()
  shape3d_62()
  shape3d_63()
  shape3d_64()
  shape3d_65()
  shape3d_66()
  shape3d_67()
  shape3d_68()
  shape3d_69()
  shape3d_70()
  shape3d_71()
  shape3d_72()
  shape3d_73()
  shape3d_74()
}
access soma

celldef()