Using Strahler`s analysis to reduce realistic models (Marasco et al, 2013)

 Download zip file 
Help downloading and running models
Accession:149000
Building on our previous work (Marasco et al., (2012)), we present a general reduction method based on Strahler's analysis of neuron morphologies. We show that, without any fitting or tuning procedures, it is possible to map any morphologically and biophysically accurate neuron model into an equivalent reduced version. Using this method for Purkinje cells, we demonstrate how run times can be reduced up to 200-fold, while accurately taking into account the effects of arbitrarily located and activated synaptic inputs.
Reference:
1 . Marasco A, Limongiello A, Migliore M (2013) Using Strahler's analysis to reduce up to 200-fold the run time of realistic neuron models. Sci Rep 3:2934 [PubMed]
Model Information (Click on a link to find other models with that property)
Model Type: Neuron or other electrically excitable cell; Dendrite;
Brain Region(s)/Organism: Hippocampus; Cerebellum;
Cell Type(s): Hippocampus CA1 pyramidal GLU cell; Cerebellum Purkinje GABA cell;
Channel(s): I Na,t; I T low threshold; I K; I Calcium; Ca pump;
Gap Junctions:
Receptor(s): AMPA;
Gene(s):
Transmitter(s): Glutamate;
Simulation Environment: NEURON;
Model Concept(s): Activity Patterns; Active Dendrites; Influence of Dendritic Geometry; Detailed Neuronal Models; Action Potentials; Synaptic Integration;
Implementer(s): Limongiello, Alessandro [alessandro.limongiello at unina.it];
Search NeuronDB for information about:  Hippocampus CA1 pyramidal GLU cell; Cerebellum Purkinje GABA cell; AMPA; I Na,t; I T low threshold; I K; I Calcium; Ca pump; Glutamate;
proc celldef() {
  topol()
}

create soma[2], dend[739]

proc topol() { local i
  connect soma[1](0), soma(0)
  connect dend(0), soma(0)
  for i = 1, 8 connect dend[i](0), dend[i-1](1)
  connect dend[9](0), dend[7](1)
  connect dend[10](0), dend[6](1)
  for i = 11, 12 connect dend[i](0), dend[10](1)
  for i = 13, 15 connect dend[i](0), dend[i-1](1)
  connect dend[16](0), dend[14](1)
  for i = 17, 18 connect dend[i](0), dend[16](1)
  connect dend[19](0), dend[13](1)
  connect dend[20](0), dend[12](1)
  connect dend[21](0), dend[5](1)
  for i = 22, 23 connect dend[i](0), dend[21](1)
  connect dend[24](0), dend[4](1)
  for i = 25, 26 connect dend[i](0), dend[i-1](1)
  connect dend[27](0), dend[25](1)
  connect dend[28](0), dend[24](1)
  for i = 29, 30 connect dend[i](0), dend[i-1](1)
  connect dend[31](0), dend[29](1)
  for i = 32, 33 connect dend[i](0), dend[31](1)
  for i = 34, 35 connect dend[i](0), dend[i-1](1)
  connect dend[36](0), dend[34](1)
  connect dend[37](0), dend[33](1)
  connect dend[38](0), dend[28](1)
  for i = 39, 40 connect dend[i](0), dend[i-1](1)
  connect dend[41](0), dend[39](1)
  connect dend[42](0), dend[38](1)
  connect dend[43](0), dend[3](1)
  for i = 44, 46 connect dend[i](0), dend[i-1](1)
  connect dend[47](0), dend[45](1)
  connect dend[48](0), dend[44](1)
  connect dend[49](0), dend[43](1)
  for i = 50, 51 connect dend[i](0), dend[49](1)
  for i = 52, 53 connect dend[i](0), dend[51](1)
  for i = 54, 55 connect dend[i](0), dend[i-1](1)
  connect dend[56](0), dend[54](1)
  connect dend[57](0), dend[53](1)
  connect dend[58](0), dend[2](1)
  for i = 59, 77 connect dend[i](0), dend[i-1](1)
  connect dend[78](0), dend[76](1)
  for i = 79, 80 connect dend[i](0), dend[i-1](1)
  connect dend[81](0), dend[79](1)
  connect dend[82](0), dend[78](1)
  connect dend[83](0), dend[75](1)
  for i = 84, 85 connect dend[i](0), dend[i-1](1)
  connect dend[86](0), dend[84](1)
  connect dend[87](0), dend[83](1)
  for i = 88, 90 connect dend[i](0), dend[i-1](1)
  connect dend[91](0), dend[89](1)
  connect dend[92](0), dend[88](1)
  for i = 93, 94 connect dend[i](0), dend[92](1)
  connect dend[95](0), dend[87](1)
  connect dend[96](0), dend[74](1)
  for i = 97, 98 connect dend[i](0), dend[96](1)
  for i = 99, 100 connect dend[i](0), dend[98](1)
  connect dend[101](0), dend[73](1)
  connect dend[102](0), dend[72](1)
  for i = 103, 105 connect dend[i](0), dend[i-1](1)
  connect dend[106](0), dend[104](1)
  for i = 107, 108 connect dend[i](0), dend[106](1)
  connect dend[109](0), dend[103](1)
  connect dend[110](0), dend[102](1)
  for i = 111, 112 connect dend[i](0), dend[i-1](1)
  connect dend[113](0), dend[111](1)
  connect dend[114](0), dend[110](1)
  connect dend[115](0), dend[71](1)
  for i = 116, 117 connect dend[i](0), dend[i-1](1)
  connect dend[118](0), dend[116](1)
  for i = 119, 120 connect dend[i](0), dend[118](1)
  connect dend[121](0), dend[115](1)
  connect dend[122](0), dend[70](1)
  connect dend[123](0), dend[69](1)
  for i = 124, 127 connect dend[i](0), dend[i-1](1)
  connect dend[128](0), dend[126](1)
  connect dend[129](0), dend[125](1)
  connect dend[130](0), dend[124](1)
  for i = 131, 132 connect dend[i](0), dend[130](1)
  connect dend[133](0), dend[123](1)
  for i = 134, 135 connect dend[i](0), dend[133](1)
  for i = 136, 137 connect dend[i](0), dend[135](1)
  for i = 138, 139 connect dend[i](0), dend[137](1)
  connect dend[140](0), dend[68](1)
  for i = 141, 144 connect dend[i](0), dend[i-1](1)
  connect dend[145](0), dend[143](1)
  connect dend[146](0), dend[142](1)
  connect dend[147](0), dend[141](1)
  connect dend[148](0), dend[140](1)
  connect dend[149](0), dend[67](1)
  for i = 150, 151 connect dend[i](0), dend[149](1)
  for i = 152, 153 connect dend[i](0), dend[i-1](1)
  connect dend[154](0), dend[152](1)
  connect dend[155](0), dend[151](1)
  for i = 156, 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, 161 connect dend[i](0), dend[159](1)
  connect dend[162](0), dend[66](1)
  for i = 163, 164 connect dend[i](0), dend[i-1](1)
  connect dend[165](0), dend[163](1)
  connect dend[166](0), dend[162](1)
  connect dend[167](0), dend[65](1)
  connect dend[168](0), dend[64](1)
  connect dend[169](0), dend[63](1)
  for i = 170, 175 connect dend[i](0), dend[i-1](1)
  connect dend[176](0), dend[174](1)
  connect dend[177](0), dend[173](1)
  connect dend[178](0), dend[172](1)
  for i = 179, 180 connect dend[i](0), dend[178](1)
  for i = 181, 182 connect dend[i](0), dend[180](1)
  for i = 183, 184 connect dend[i](0), dend[182](1)
  connect dend[185](0), dend[171](1)
  for i = 186, 187 connect dend[i](0), dend[185](1)
  for i = 188, 189 connect dend[i](0), dend[187](1)
  for i = 190, 191 connect dend[i](0), dend[189](1)
  connect dend[192](0), dend[170](1)
  connect dend[193](0), dend[169](1)
  for i = 194, 195 connect dend[i](0), dend[193](1)
  for i = 196, 197 connect dend[i](0), dend[195](1)
  connect dend[198](0), dend[62](1)
  for i = 199, 209 connect dend[i](0), dend[i-1](1)
  connect dend[210](0), dend[208](1)
  connect dend[211](0), dend[207](1)
  for i = 212, 213 connect dend[i](0), dend[211](1)
  for i = 214, 215 connect dend[i](0), dend[i-1](1)
  connect dend[216](0), dend[214](1)
  for i = 217, 218 connect dend[i](0), dend[i-1](1)
  connect dend[219](0), dend[217](1)
  connect dend[220](0), dend[216](1)
  connect dend[221](0), dend[213](1)
  connect dend[222](0), dend[206](1)
  connect dend[223](0), dend[205](1)
  connect dend[224](0), dend[204](1)
  for i = 225, 226 connect dend[i](0), dend[i-1](1)
  connect dend[227](0), dend[225](1)
  for i = 228, 229 connect dend[i](0), dend[227](1)
  connect dend[230](0), dend[224](1)
  for i = 231, 232 connect dend[i](0), dend[230](1)
  for i = 233, 234 connect dend[i](0), dend[232](1)
  connect dend[235](0), dend[203](1)
  for i = 236, 237 connect dend[i](0), dend[235](1)
  connect dend[238](0), dend[202](1)
  for i = 239, 240 connect dend[i](0), dend[i-1](1)
  connect dend[241](0), dend[239](1)
  for i = 242, 243 connect dend[i](0), dend[241](1)
  for i = 244, 245 connect dend[i](0), dend[243](1)
  connect dend[246](0), dend[238](1)
  for i = 247, 249 connect dend[i](0), dend[i-1](1)
  connect dend[250](0), dend[248](1)
  for i = 251, 252 connect dend[i](0), dend[250](1)
  connect dend[253](0), dend[247](1)
  connect dend[254](0), dend[246](1)
  connect dend[255](0), dend[201](1)
  for i = 256, 257 connect dend[i](0), dend[255](1)
  connect dend[258](0), dend[200](1)
  for i = 259, 260 connect dend[i](0), dend[258](1)
  for i = 261, 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, 267 connect dend[i](0), dend[265](1)
  connect dend[268](0), dend[260](1)
  for i = 269, 270 connect dend[i](0), dend[i-1](1)
  connect dend[271](0), dend[269](1)
  for i = 272, 273 connect dend[i](0), dend[271](1)
  connect dend[274](0), dend[268](1)
  for i = 275, 276 connect dend[i](0), dend[274](1)
  for i = 277, 279 connect dend[i](0), dend[i-1](1)
  connect dend[280](0), dend[278](1)
  for i = 281, 282 connect dend[i](0), dend[280](1)
  connect dend[283](0), dend[277](1)
  for i = 284, 285 connect dend[i](0), dend[283](1)
  for i = 286, 287 connect dend[i](0), dend[285](1)
  connect dend[288](0), dend[276](1)
  for i = 289, 290 connect dend[i](0), dend[288](1)
  connect dend[291](0), dend[199](1)
  for i = 292, 293 connect dend[i](0), dend[i-1](1)
  connect dend[294](0), dend[292](1)
  connect dend[295](0), dend[291](1)
  for i = 296, 297 connect dend[i](0), dend[295](1)
  for i = 298, 299 connect dend[i](0), dend[297](1)
  connect dend[300](0), dend[198](1)
  for i = 301, 302 connect dend[i](0), dend[300](1)
  connect dend[303](0), dend[61](1)
  for i = 304, 306 connect dend[i](0), dend[i-1](1)
  connect dend[307](0), dend[305](1)
  for i = 308, 309 connect dend[i](0), dend[307](1)
  connect dend[310](0), dend[304](1)
  for i = 311, 312 connect dend[i](0), dend[310](1)
  for i = 313, 314 connect dend[i](0), dend[312](1)
  for i = 315, 316 connect dend[i](0), dend[i-1](1)
  connect dend[317](0), dend[315](1)
  connect dend[318](0), dend[314](1)
  connect dend[319](0), dend[303](1)
  for i = 320, 321 connect dend[i](0), dend[319](1)
  for i = 322, 323 connect dend[i](0), dend[321](1)
  connect dend[324](0), dend[60](1)
  for i = 325, 326 connect dend[i](0), dend[i-1](1)
  connect dend[327](0), dend[325](1)
  for i = 328, 329 connect dend[i](0), dend[327](1)
  connect dend[330](0), dend[324](1)
  for i = 331, 332 connect dend[i](0), dend[330](1)
  topol_1()
}
proc topol_1() {
  connect dend[333](0), dend[59](1)
  for i = 334, 336 connect dend[i](0), dend[i-1](1)
  connect dend[337](0), dend[335](1)
  connect dend[338](0), dend[334](1)
  for i = 339, 344 connect dend[i](0), dend[i-1](1)
  connect dend[345](0), dend[343](1)
  for i = 346, 347 connect dend[i](0), dend[345](1)
  connect dend[348](0), dend[342](1)
  for i = 349, 350 connect dend[i](0), dend[348](1)
  for i = 351, 354 connect dend[i](0), dend[i-1](1)
  connect dend[355](0), dend[353](1)
  connect dend[356](0), dend[352](1)
  connect dend[357](0), dend[351](1)
  connect dend[358](0), dend[350](1)
  connect dend[359](0), dend[341](1)
  for i = 360, 361 connect dend[i](0), dend[359](1)
  connect dend[362](0), dend[340](1)
  connect dend[363](0), dend[339](1)
  connect dend[364](0), dend[338](1)
  for i = 365, 367 connect dend[i](0), dend[i-1](1)
  connect dend[368](0), dend[366](1)
  connect dend[369](0), dend[365](1)
  for i = 370, 371 connect dend[i](0), dend[369](1)
  connect dend[372](0), dend[364](1)
  connect dend[373](0), dend[333](1)
  for i = 374, 377 connect dend[i](0), dend[i-1](1)
  connect dend[378](0), dend[376](1)
  connect dend[379](0), dend[375](1)
  for i = 380, 382 connect dend[i](0), dend[i-1](1)
  connect dend[383](0), dend[381](1)
  connect dend[384](0), dend[380](1)
  connect dend[385](0), dend[379](1)
  for i = 386, 387 connect dend[i](0), dend[385](1)
  for i = 388, 389 connect dend[i](0), dend[387](1)
  connect dend[390](0), dend[374](1)
  connect dend[391](0), dend[373](1)
  connect dend[392](0), dend[58](1)
  for i = 393, 394 connect dend[i](0), dend[392](1)
  for i = 395, 396 connect dend[i](0), dend[394](1)
  for i = 397, 398 connect dend[i](0), dend[i-1](1)
  connect dend[399](0), dend[397](1)
  for i = 400, 401 connect dend[i](0), dend[399](1)
  connect dend[402](0), dend[396](1)
  for i = 403, 404 connect dend[i](0), dend[i-1](1)
  connect dend[405](0), dend[403](1)
  connect dend[406](0), dend[402](1)
  for i = 407, 408 connect dend[i](0), dend[i-1](1)
  connect dend[409](0), dend[407](1)
  connect dend[410](0), dend[406](1)
  for i = 411, 412 connect dend[i](0), dend[410](1)
  for i = 413, 414 connect dend[i](0), dend[i-1](1)
  connect dend[415](0), dend[413](1)
  connect dend[416](0), dend[412](1)
  connect dend[417](0), dend[1](1)
  for i = 418, 419 connect dend[i](0), dend[417](1)
  for i = 420, 421 connect dend[i](0), dend[i-1](1)
  connect dend[422](0), dend[420](1)
  for i = 423, 424 connect dend[i](0), dend[422](1)
  for i = 425, 426 connect dend[i](0), dend[424](1)
  connect dend[427](0), dend[419](1)
  for i = 428, 429 connect dend[i](0), dend[i-1](1)
  connect dend[430](0), dend[428](1)
  for i = 431, 432 connect dend[i](0), dend[430](1)
  connect dend[433](0), dend[427](1)
  for i = 434, 435 connect dend[i](0), dend[433](1)
  connect dend[436](0), dend(1)
  for i = 437, 451 connect dend[i](0), dend[i-1](1)
  connect dend[452](0), dend[450](1)
  connect dend[453](0), dend[449](1)
  for i = 454, 458 connect dend[i](0), dend[i-1](1)
  connect dend[459](0), dend[457](1)
  for i = 460, 461 connect dend[i](0), dend[459](1)
  for i = 462, 463 connect dend[i](0), dend[461](1)
  for i = 464, 465 connect dend[i](0), dend[463](1)
  connect dend[466](0), dend[456](1)
  connect dend[467](0), dend[455](1)
  connect dend[468](0), dend[454](1)
  for i = 469, 475 connect dend[i](0), dend[i-1](1)
  connect dend[476](0), dend[474](1)
  connect dend[477](0), dend[473](1)
  connect dend[478](0), dend[472](1)
  for i = 479, 480 connect dend[i](0), dend[478](1)
  for i = 481, 482 connect dend[i](0), dend[480](1)
  connect dend[483](0), dend[471](1)
  for i = 484, 485 connect dend[i](0), dend[i-1](1)
  connect dend[486](0), dend[484](1)
  connect dend[487](0), dend[483](1)
  for i = 488, 489 connect dend[i](0), dend[i-1](1)
  connect dend[490](0), dend[488](1)
  connect dend[491](0), dend[487](1)
  connect dend[492](0), dend[470](1)
  for i = 493, 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[i-1](1)
  connect dend[499](0), dend[497](1)
  connect dend[500](0), dend[496](1)
  for i = 501, 502 connect dend[i](0), dend[500](1)
  connect dend[503](0), dend[469](1)
  for i = 504, 509 connect dend[i](0), dend[i-1](1)
  connect dend[510](0), dend[508](1)
  connect dend[511](0), dend[507](1)
  connect dend[512](0), dend[506](1)
  for i = 513, 514 connect dend[i](0), dend[512](1)
  for i = 515, 516 connect dend[i](0), dend[i-1](1)
  connect dend[517](0), dend[515](1)
  connect dend[518](0), dend[514](1)
  for i = 519, 520 connect dend[i](0), dend[518](1)
  connect dend[521](0), dend[505](1)
  connect dend[522](0), dend[504](1)
  for i = 523, 524 connect dend[i](0), dend[522](1)
  connect dend[525](0), dend[503](1)
  for i = 526, 527 connect dend[i](0), dend[525](1)
  for i = 528, 529 connect dend[i](0), dend[527](1)
  connect dend[530](0), dend[468](1)
  for i = 531, 532 connect dend[i](0), dend[530](1)
  for i = 533, 534 connect dend[i](0), dend[532](1)
  for i = 535, 536 connect dend[i](0), dend[534](1)
  connect dend[537](0), dend[453](1)
  for i = 538, 539 connect dend[i](0), dend[537](1)
  for i = 540, 541 connect dend[i](0), dend[539](1)
  connect dend[542](0), dend[448](1)
  connect dend[543](0), dend[447](1)
  for i = 544, 545 connect dend[i](0), dend[543](1)
  connect dend[546](0), dend[446](1)
  for i = 547, 548 connect dend[i](0), dend[546](1)
  connect dend[549](0), dend[445](1)
  for i = 550, 551 connect dend[i](0), dend[549](1)
  connect dend[552](0), dend[444](1)
  for i = 553, 554 connect dend[i](0), dend[552](1)
  for i = 555, 556 connect dend[i](0), dend[i-1](1)
  connect dend[557](0), dend[555](1)
  for i = 558, 559 connect dend[i](0), dend[557](1)
  for i = 560, 561 connect dend[i](0), dend[559](1)
  for i = 562, 563 connect dend[i](0), dend[561](1)
  connect dend[564](0), dend[554](1)
  for i = 565, 569 connect dend[i](0), dend[i-1](1)
  connect dend[570](0), dend[568](1)
  for i = 571, 572 connect dend[i](0), dend[570](1)
  connect dend[573](0), dend[567](1)
  for i = 574, 575 connect dend[i](0), dend[573](1)
  for i = 576, 577 connect dend[i](0), dend[575](1)
  connect dend[578](0), dend[566](1)
  connect dend[579](0), dend[565](1)
  for i = 580, 581 connect dend[i](0), dend[579](1)
  connect dend[582](0), dend[564](1)
  for i = 583, 584 connect dend[i](0), dend[582](1)
  connect dend[585](0), dend[443](1)
  for i = 586, 588 connect dend[i](0), dend[i-1](1)
  connect dend[589](0), dend[587](1)
  connect dend[590](0), dend[586](1)
  for i = 591, 592 connect dend[i](0), dend[590](1)
  connect dend[593](0), dend[585](1)
  connect dend[594](0), dend[442](1)
  for i = 595, 596 connect dend[i](0), dend[594](1)
  connect dend[597](0), dend[441](1)
  for i = 598, 599 connect dend[i](0), dend[i-1](1)
  connect dend[600](0), dend[598](1)
  connect dend[601](0), dend[597](1)
  for i = 602, 603 connect dend[i](0), dend[i-1](1)
  connect dend[604](0), dend[602](1)
  for i = 605, 606 connect dend[i](0), dend[i-1](1)
  connect dend[607](0), dend[605](1)
  connect dend[608](0), dend[604](1)
  connect dend[609](0), dend[601](1)
  for i = 610, 611 connect dend[i](0), dend[609](1)
  for i = 612, 614 connect dend[i](0), dend[i-1](1)
  connect dend[615](0), dend[613](1)
  connect dend[616](0), dend[612](1)
  connect dend[617](0), dend[611](1)
  connect dend[618](0), dend[440](1)
  connect dend[619](0), dend[439](1)
  for i = 620, 624 connect dend[i](0), dend[i-1](1)
  connect dend[625](0), dend[623](1)
  for i = 626, 627 connect dend[i](0), dend[625](1)
  for i = 628, 629 connect dend[i](0), dend[i-1](1)
  connect dend[630](0), dend[628](1)
  connect dend[631](0), dend[627](1)
  for i = 632, 633 connect dend[i](0), dend[631](1)
  connect dend[634](0), dend[622](1)
  connect dend[635](0), dend[621](1)
  for i = 636, 637 connect dend[i](0), dend[635](1)
  connect dend[638](0), dend[620](1)
  connect dend[639](0), dend[619](1)
  for i = 640, 641 connect dend[i](0), dend[i-1](1)
  connect dend[642](0), dend[640](1)
  connect dend[643](0), dend[639](1)
  for i = 644, 645 connect dend[i](0), dend[i-1](1)
  connect dend[646](0), dend[644](1)
  connect dend[647](0), dend[643](1)
  connect dend[648](0), dend[438](1)
  for i = 649, 650 connect dend[i](0), dend[i-1](1)
  connect dend[651](0), dend[649](1)
  connect dend[652](0), dend[648](1)
  for i = 653, 656 connect dend[i](0), dend[i-1](1)
  connect dend[657](0), dend[655](1)
  connect dend[658](0), dend[654](1)
  connect dend[659](0), dend[653](1)
  connect dend[660](0), dend[652](1)
  for i = 661, 663 connect dend[i](0), dend[i-1](1)
  topol_2()
}
proc topol_2() {
  connect dend[664](0), dend[662](1)
  connect dend[665](0), dend[661](1)
  for i = 666, 667 connect dend[i](0), dend[665](1)
  connect dend[668](0), dend[660](1)
  for i = 669, 670 connect dend[i](0), dend[668](1)
  connect dend[671](0), dend[437](1)
  for i = 672, 674 connect dend[i](0), dend[i-1](1)
  connect dend[675](0), dend[673](1)
  for i = 676, 677 connect dend[i](0), dend[675](1)
  connect dend[678](0), dend[672](1)
  for i = 679, 680 connect dend[i](0), dend[678](1)
  connect dend[681](0), dend[671](1)
  for i = 682, 684 connect dend[i](0), dend[i-1](1)
  connect dend[685](0), dend[683](1)
  connect dend[686](0), dend[682](1)
  for i = 687, 689 connect dend[i](0), dend[i-1](1)
  connect dend[690](0), dend[688](1)
  for i = 691, 692 connect dend[i](0), dend[690](1)
  connect dend[693](0), dend[687](1)
  connect dend[694](0), dend[686](1)
  connect dend[695](0), dend[681](1)
  connect dend[696](0), dend[436](1)
  for i = 697, 698 connect dend[i](0), dend[i-1](1)
  connect dend[699](0), dend[697](1)
  for i = 700, 701 connect dend[i](0), dend[i-1](1)
  connect dend[702](0), dend[700](1)
  for i = 703, 704 connect dend[i](0), dend[702](1)
  connect dend[705](0), dend[699](1)
  for i = 706, 707 connect dend[i](0), dend[i-1](1)
  connect dend[708](0), dend[706](1)
  for i = 709, 710 connect dend[i](0), dend[i-1](1)
  connect dend[711](0), dend[709](1)
  connect dend[712](0), dend[708](1)
  connect dend[713](0), dend[705](1)
  for i = 714, 716 connect dend[i](0), dend[i-1](1)
  connect dend[717](0), dend[715](1)
  connect dend[718](0), dend[714](1)
  connect dend[719](0), dend[713](1)
  connect dend[720](0), dend[696](1)
  for i = 721, 724 connect dend[i](0), dend[i-1](1)
  connect dend[725](0), dend[723](1)
  connect dend[726](0), dend[722](1)
  connect dend[727](0), dend[721](1)
  for i = 728, 729 connect dend[i](0), dend[i-1](1)
  connect dend[730](0), dend[728](1)
  connect dend[731](0), dend[727](1)
  for i = 732, 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[720](1)
  for i = 737, 738 connect dend[i](0), dend[736](1)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(3.66, 9.7, -6.25, 15.956)
	pt3dadd(3.66, 17.68, -6.25, 15.956)
  }
  soma[1] {pt3dclear()
	pt3dadd(3.66, 9.7, -6.25, 15.956)
	pt3dadd(3.66, 1.73, -6.25, 15.956)
  }
  dend {pt3dclear()
	pt3dadd(3.66, 9.7, -6.25, 2.99)
	pt3dadd(-0.69, 20.57, -6.5, 2.99)
	pt3dadd(-1.43, 22.32, -6.5, 2.24)
	pt3dadd(-2.43, 24.19, -6.5, 2.12)
	pt3dadd(-3.55, 26.31, -6.5, 2.12)
	pt3dadd(-4.55, 28.8, -6.5, 2.12)
	pt3dadd(-5.55, 31.55, -6.5, 2.12)
	pt3dadd(-6.55, 33.67, -6.5, 2.12)
	pt3dadd(-8.03, 36.53, -6.5, 3.24)
  }
  dend[1] {pt3dclear()
	pt3dadd(-8.03, 36.53, -6.5, 3.24)
	pt3dadd(-10.66, 37.53, -6.5, 2.24)
	pt3dadd(-13.4, 39.4, -6.5, 2.12)
	pt3dadd(-15.27, 40.52, -6.5, 2.24)
	pt3dadd(-15.54, 40.94, -6.5, 2.24)
  }
  dend[2] {pt3dclear()
	pt3dadd(-15.54, 40.94, -6.5, 2.24)
	pt3dadd(-16.62, 42.53, -6.5, 2.24)
  }
  dend[3] {pt3dclear()
	pt3dadd(-16.62, 42.53, -6.5, 2.24)
	pt3dadd(-15.96, 43.89, -6.5, 1.62)
	pt3dadd(-15.09, 45.01, -6.5, 1.12)
	pt3dadd(-13.97, 45.89, -6.5, 1.12)
	pt3dadd(-12.84, 46.63, -6.5, 1)
	pt3dadd(-11.22, 47.63, -6.5, 1)
	pt3dadd(-10.97, 48.38, -6.5, 1.37)
	pt3dadd(-10.78, 48.71, -6.5, 1.37)
  }
  dend[4] {pt3dclear()
	pt3dadd(-10.78, 48.71, -6.5, 1.37)
	pt3dadd(-10.38, 49.56, -6.5, 0.94)
	pt3dadd(-9.38, 50.5, -6.5, 0.81)
	pt3dadd(-8.39, 51.43, -6.5, 0.81)
	pt3dadd(-7.58, 52.17, -6.5, 0.81)
  }
  dend[5] {pt3dclear()
	pt3dadd(-7.58, 52.17, -6.5, 0.81)
	pt3dadd(-7.33, 52.24, -6.5, 0.81)
	pt3dadd(-6.95, 53.49, -6.5, 0.81)
	pt3dadd(-6.27, 54.93, -6.75, 0.81)
	pt3dadd(-5.52, 55.67, -6.75, 0.81)
	pt3dadd(-4.96, 56.05, -6.75, 0.81)
  }
  dend[6] {pt3dclear()
	pt3dadd(-4.96, 56.05, -6.75, 0.81)
	pt3dadd(-4.08, 56.11, -6.75, 0.75)
	pt3dadd(-3.46, 56.23, -6.75, 0.75)
  }
  dend[7] {pt3dclear()
	pt3dadd(-3.46, 56.23, -6.75, 0.75)
	pt3dadd(-3.15, 56.98, -6.75, 0.56)
	pt3dadd(-2.84, 57.42, -6.75, 0.56)
	pt3dadd(-2.84, 58.23, -6.75, 0.56)
	pt3dadd(-2.46, 58.79, -6.75, 0.56)
	pt3dadd(-1.59, 58.98, -6.75, 0.56)
	pt3dadd(-0.9, 59.48, -6.75, 0.56)
	pt3dadd(0.03, 59.73, -6.75, 0.56)
	pt3dadd(1.03, 60.1, -6.75, 0.56)
	pt3dadd(1.9, 60.47, -6.75, 0.56)
  }
  dend[8] {pt3dclear()
	pt3dadd(1.9, 60.47, -6.75, 0.56)
	pt3dadd(2.65, 60.35, -6.75, 0.5)
	pt3dadd(3.34, 60.47, -6.75, 0.5)
	pt3dadd(4.26, 60.79, -6.75, 0.5)
	pt3dadd(4.63, 61.41, -6.75, 0.5)
	pt3dadd(4.96, 62.16, -6.75, 0.75)
	pt3dadd(5.64, 62.84, -6.75, 0.75)
	pt3dadd(6.33, 63.59, -6.5, 0.62)
	pt3dadd(6.83, 64.03, -6.5, 0.62)
	pt3dadd(7.45, 64.4, -6.5, 0.62)
  }
  dend[9] {pt3dclear()
	pt3dadd(1.9, 60.47, -6.75, 0.56)
	pt3dadd(1.71, 61.47, -6.75, 0.56)
	pt3dadd(1.59, 62.41, -6.75, 0.56)
	pt3dadd(1.53, 63.28, -6.75, 0.56)
	pt3dadd(1.09, 63.59, -6.75, 0.56)
	pt3dadd(0.34, 64.09, -6.75, 0.56)
	pt3dadd(-0.03, 64.28, -6.75, 0.56)
  }
  dend[10] {pt3dclear()
	pt3dadd(-3.46, 56.23, -6.75, 0.75)
	pt3dadd(-2.71, 55.55, -6.75, 0.62)
	pt3dadd(-1.78, 55.05, -6.75, 0.62)
	pt3dadd(-0.97, 54.43, -6.75, 0.62)
	pt3dadd(0.47, 54.11, -6.75, 0.62)
  }
  dend[11] {pt3dclear()
	pt3dadd(0.47, 54.11, -6.75, 0.62)
	pt3dadd(1.47, 54.8, -6.75, 0.56)
	pt3dadd(2.34, 55.05, -6.75, 0.56)
	pt3dadd(3.02, 55.36, -6.75, 0.56)
	pt3dadd(3.83, 56.11, -6.5, 0.56)
	pt3dadd(4.71, 56.92, -6.5, 0.62)
	pt3dadd(5.58, 57.54, -6.5, 0.62)
	pt3dadd(6.51, 58.42, -6.5, 0.62)
	pt3dadd(7.33, 59.16, -6.5, 0.56)
	pt3dadd(8.14, 59.85, -6.5, 0.69)
	pt3dadd(9.01, 60.29, -6.5, 0.87)
  }
  dend[12] {pt3dclear()
	pt3dadd(0.47, 54.11, -6.75, 0.62)
	pt3dadd(1.14, 53.43, -6.75, 0.87)
	pt3dadd(1.84, 52.99, -6.75, 0.75)
	pt3dadd(2.4, 52.56, -6.75, 0.75)
	pt3dadd(2.96, 52.37, -6.75, 0.5)
	pt3dadd(3.58, 52.12, -6.75, 0.5)
	pt3dadd(4.26, 51.75, -6.75, 0.5)
	pt3dadd(5.27, 51.12, -6.75, 0.5)
	pt3dadd(5.83, 50.69, -6.75, 0.5)
	pt3dadd(6.58, 50.12, -6.75, 0.5)
	pt3dadd(7.45, 49.75, -6.75, 0.5)
  }
  dend[13] {pt3dclear()
	pt3dadd(7.45, 49.75, -6.75, 0.5)
	pt3dadd(8.66, 49.25, -7.15, 0.69)
  }
  dend[14] {pt3dclear()
	pt3dadd(8.66, 49.25, -7.15, 0.69)
	pt3dadd(8.19, 49.44, -7, 0.69)
	pt3dadd(9.13, 49.38, -7, 0.69)
	pt3dadd(10.07, 49.38, -7, 0.69)
	pt3dadd(11.13, 49.44, -7, 0.69)
  }
  dend[15] {pt3dclear()
	pt3dadd(11.13, 49.44, -7, 0.69)
	pt3dadd(11.56, 48.5, -7, 0.56)
	pt3dadd(11.81, 47.88, -7, 0.56)
	pt3dadd(12.31, 47.51, -7, 0.56)
	pt3dadd(12.94, 47.13, -7, 0.56)
	pt3dadd(13.56, 46.63, -7, 0.56)
	pt3dadd(14.06, 46.38, -7, 0.56)
	pt3dadd(14.93, 46.32, -7.25, 0.44)
	pt3dadd(15.62, 46.32, -7.25, 0.44)
	pt3dadd(16.43, 46.2, -7.5, 0.44)
	pt3dadd(17.36, 46.32, -7.5, 0.44)
	pt3dadd(17.73, 46.57, -7.5, 0.44)
  }
  dend[16] {pt3dclear()
	pt3dadd(11.13, 49.44, -7, 0.69)
	pt3dadd(11.88, 49.44, -7, 0.44)
	pt3dadd(12.75, 49.56, -7, 0.44)
	pt3dadd(13.62, 49.88, -7, 0.44)
	pt3dadd(14.37, 50.19, -6.75, 0.44)
  }
  dend[17] {pt3dclear()
	pt3dadd(14.37, 50.19, -6.75, 0.44)
	pt3dadd(13.62, 50.69, -6.75, 0.37)
	pt3dadd(13.12, 51, -6.75, 0.37)
	pt3dadd(12.56, 51.37, -6.75, 0.37)
	pt3dadd(11.88, 51.87, -6.75, 0.37)
	pt3dadd(11.56, 52.18, -6.5, 0.37)
  }
  dend[18] {pt3dclear()
	pt3dadd(14.37, 50.19, -6.75, 0.44)
	pt3dadd(14.99, 50.5, -6.75, 0.37)
	pt3dadd(15.74, 51.06, -6.75, 0.37)
	pt3dadd(16.18, 51.56, -6.75, 0.37)
	pt3dadd(16.93, 51.93, -6.75, 0.37)
	pt3dadd(17.11, 52.43, -6.5, 0.37)
	pt3dadd(17.43, 53.12, -6.5, 0.37)
  }
  dend[19] {pt3dclear()
	pt3dadd(8.66, 49.25, -7.15, 0.69)
	pt3dadd(7.64, 48.75, -7, 0.5)
	pt3dadd(7.64, 47.94, -7, 0.5)
	pt3dadd(7.7, 47.26, -7, 0.37)
	pt3dadd(7.64, 46.76, -7, 0.37)
	pt3dadd(7.7, 45.95, -7, 0.37)
	pt3dadd(7.76, 45.64, -7, 0.37)
	pt3dadd(7.89, 45.01, -7, 0.62)
	pt3dadd(7.95, 44.51, -7, 0.75)
	pt3dadd(7.7, 43.77, -6.75, 0.69)
  }
  dend[20] {pt3dclear()
	pt3dadd(7.45, 49.75, -6.75, 0.5)
	pt3dadd(8.07, 48.82, -7, 0.37)
	pt3dadd(8.26, 48.25, -7, 0.37)
	pt3dadd(8.76, 47.69, -7, 0.37)
	pt3dadd(9.88, 46.82, -7, 0.37)
	pt3dadd(10.82, 46.13, -7, 0.56)
	pt3dadd(11.25, 45.32, -7, 0.5)
	pt3dadd(12, 44.26, -7.25, 0.5)
	pt3dadd(12.62, 43.77, -7.25, 0.5)
	pt3dadd(13.37, 43.02, -7.5, 0.5)
	pt3dadd(13.87, 42.21, -7.5, 0.5)
	pt3dadd(14.31, 41.52, -7.5, 0.5)
	pt3dadd(14.74, 41.08, -7.5, 0.5)
	pt3dadd(15.55, 40.4, -7.5, 0.5)
	pt3dadd(15.74, 39.96, -7.5, 0.5)
  }
  dend[21] {pt3dclear()
	pt3dadd(-4.96, 56.05, -6.75, 0.81)
	pt3dadd(-5.33, 56.8, -6.75, 0.56)
	pt3dadd(-5.52, 57.61, -6.75, 0.56)
	pt3dadd(-5.7, 58.54, -6.75, 0.87)
	pt3dadd(-5.64, 59.73, -6.75, 0.75)
	pt3dadd(-6.08, 60.29, -6.75, 0.75)
	pt3dadd(-6.27, 61.1, -6.75, 0.75)
	pt3dadd(-6.45, 62.03, -6.75, 0.75)
  }
  dend[22] {pt3dclear()
	pt3dadd(-6.45, 62.03, -6.75, 0.75)
	pt3dadd(-7.08, 62.78, -6.75, 0.75)
	pt3dadd(-8.01, 63.34, -6.75, 0.75)
	pt3dadd(-8.69, 63.53, -6.75, 0.44)
	pt3dadd(-9.57, 63.84, -6.75, 0.44)
	pt3dadd(-10.32, 63.59, -6.75, 0.87)
  }
  dend[23] {pt3dclear()
	pt3dadd(-6.45, 62.03, -6.75, 0.75)
	pt3dadd(-5.95, 62.53, -6.75, 0.5)
	pt3dadd(-5.33, 62.97, -7, 0.44)
	pt3dadd(-4.76, 63.65, -7, 0.5)
	pt3dadd(-4.4, 64.2, -7, 0.81)
	pt3dadd(-4.21, 64.9, -7, 1)
  }
  dend[24] {pt3dclear()
	pt3dadd(-7.58, 52.17, -6.5, 0.81)
	pt3dadd(-6.64, 51.68, -6.75, 0.5)
	pt3dadd(-6.14, 51.31, -6.75, 0.5)
	pt3dadd(-5.46, 50.69, -6.75, 0.5)
	pt3dadd(-5.01, 50.19, -6.75, 0.5)
	pt3dadd(-4.71, 49.63, -6.75, 0.5)
	pt3dadd(-4.46, 49.19, -6.75, 0.5)
	pt3dadd(-4.15, 48.75, -6.75, 0.5)
	pt3dadd(-3.52, 48.13, -7, 0.5)
	pt3dadd(-3.02, 47.69, -7, 0.75)
  }
  dend[25] {pt3dclear()
	pt3dadd(-3.02, 47.69, -7, 0.75)
	pt3dadd(-1.84, 48.01, -7.25, 0.62)
	pt3dadd(-0.97, 48.13, -7.25, 0.62)
  }
  dend[26] {pt3dclear()
	pt3dadd(-0.97, 48.13, -7.25, 0.62)
	pt3dadd(-0.47, 47.51, -7.25, 0.5)
	pt3dadd(-0.09, 47.07, -7.25, 0.5)
	pt3dadd(0.16, 46.32, -7.5, 0.5)
  }
  dend[27] {pt3dclear()
	pt3dadd(-0.97, 48.13, -7.25, 0.62)
	pt3dadd(-0.28, 48.88, -7.25, 0.69)
	pt3dadd(0.41, 49.56, -7.25, 0.69)
	pt3dadd(1.14, 50.25, -7.5, 0.62)
	pt3dadd(1.65, 51.25, -7.5, 0.62)
  }
}
proc shape3d_2() {
  dend[27] {	pt3dadd(2.02, 51.81, -7.5, 0.62)
	pt3dadd(2.77, 52.81, -7.75, 0.62)
	pt3dadd(3.52, 53.62, -7.75, 0.87)
	pt3dadd(4.58, 53.99, -7.75, 0.87)
	pt3dadd(5.46, 54.36, -7.75, 0.75)
	pt3dadd(6.02, 54.68, -7.75, 0.69)
	pt3dadd(6.58, 55.42, -7.75, 0.69)
	pt3dadd(6.95, 56.11, -7.75, 0.69)
	pt3dadd(7.33, 56.98, -7.75, 0.69)
	pt3dadd(7.82, 57.79, -7.75, 0.69)
	pt3dadd(8.07, 58.67, -7.75, 0.69)
	pt3dadd(8.14, 59.41, -7.75, 0.69)
  }
  dend[28] {pt3dclear()
	pt3dadd(-3.02, 47.69, -7, 0.75)
	pt3dadd(-3.02, 46.7, -7, 0.69)
	pt3dadd(-2.65, 45.89, -7.25, 0.62)
	pt3dadd(-2.27, 44.89, -7.25, 0.62)
	pt3dadd(-1.96, 44.14, -7.25, 0.62)
	pt3dadd(-1.59, 43.45, -7.25, 0.62)
	pt3dadd(-1.28, 42.46, -7.5, 0.62)
	pt3dadd(-0.9, 42.02, -7.5, 0.62)
	pt3dadd(-0.28, 41.33, -7.5, 0.62)
	pt3dadd(0.41, 40.65, -7.25, 0.62)
	pt3dadd(0.72, 40.4, -7.25, 0.62)
  }
  dend[29] {pt3dclear()
	pt3dadd(0.72, 40.4, -7.25, 0.62)
	pt3dadd(0.47, 39.46, -7.25, 0.56)
	pt3dadd(0.09, 38.9, -7.25, 0.56)
	pt3dadd(-0.16, 38.03, -7.25, 0.56)
  }
  dend[30] {pt3dclear()
	pt3dadd(-0.16, 38.03, -7.25, 0.56)
	pt3dadd(-0.78, 38.47, -7.25, 0.25)
	pt3dadd(-1.47, 38.84, -7.25, 0.25)
	pt3dadd(-1.78, 39.15, -7.25, 0.25)
	pt3dadd(-1.96, 39.4, -7.25, 0.25)
  }
  dend[31] {pt3dclear()
	pt3dadd(-0.16, 38.03, -7.25, 0.56)
	pt3dadd(-0.09, 37.22, -7.25, 0.25)
  }
  dend[32] {pt3dclear()
	pt3dadd(-0.09, 37.22, -7.25, 0.25)
	pt3dadd(0.59, 36.85, -7.25, 0.5)
	pt3dadd(1.09, 36.28, -7.25, 0.5)
	pt3dadd(1.71, 35.79, -7.25, 0.5)
	pt3dadd(2.09, 35.1, -7.25, 0.5)
	pt3dadd(2.84, 35.04, -7.25, 0.5)
	pt3dadd(3.21, 34.65, -7.25, 0.5)
	pt3dadd(3.77, 34.29, -7.25, 0.37)
	pt3dadd(4.26, 33.79, -7.25, 0.25)
	pt3dadd(4.71, 33.42, -7.25, 0.25)
	pt3dadd(5.39, 33.1, -7.25, 0.25)
  }
  dend[33] {pt3dclear()
	pt3dadd(-0.09, 37.22, -7.25, 0.25)
	pt3dadd(-0.65, 36.65, -7, 0.5)
	pt3dadd(-1.14, 36.1, -7, 0.5)
	pt3dadd(-1.53, 35.65, -7, 0.5)
	pt3dadd(-2.09, 35.22, -7, 0.5)
  }
  dend[34] {pt3dclear()
	pt3dadd(-2.09, 35.22, -7, 0.5)
	pt3dadd(-2.69, 35.35, -7, 0.31)
  }
  dend[35] {pt3dclear()
	pt3dadd(-2.69, 35.35, -7, 0.31)
	pt3dadd(-3.65, 35.54, -7, 0.31)
	pt3dadd(-4.26, 35.54, -7, 0.31)
	pt3dadd(-4.88, 35.35, -7.25, 0.5)
	pt3dadd(-5.52, 35.04, -7.25, 0.5)
	pt3dadd(-6.02, 34.6, -7.25, 0.5)
  }
  dend[36] {pt3dclear()
	pt3dadd(-2.69, 35.35, -7, 0.31)
	pt3dadd(-1.4, 34.6, -7, 0.25)
	pt3dadd(-0.59, 34.1, -6.75, 0.25)
	pt3dadd(0.03, 33.72, -6.75, 0.44)
	pt3dadd(0.34, 33.17, -6.75, 0.44)
	pt3dadd(0.47, 32.47, -6.75, 0.44)
	pt3dadd(0.28, 31.92, -6.75, 0.44)
  }
  dend[37] {pt3dclear()
	pt3dadd(-2.09, 35.22, -7, 0.5)
	pt3dadd(-2.4, 34.54, -7, 0.25)
	pt3dadd(-2.96, 34.15, -7, 0.25)
	pt3dadd(-3.27, 33.54, -7, 0.44)
	pt3dadd(-3.27, 32.67, -7, 0.56)
	pt3dadd(-2.96, 32.04, -7, 0.81)
	pt3dadd(-2.9, 31.23, -7, 0.69)
	pt3dadd(-2.59, 30.42, -6.75, 0.69)
	pt3dadd(-2.15, 29.68, -6.75, 0.69)
  }
  dend[38] {pt3dclear()
	pt3dadd(0.72, 40.4, -7.25, 0.62)
	pt3dadd(1.84, 39.96, -7.25, 0.69)
	pt3dadd(3.09, 39.78, -7.25, 0.69)
  }
  dend[39] {pt3dclear()
	pt3dadd(3.09, 39.78, -7.25, 0.69)
	pt3dadd(3.96, 39.9, -7.25, 0.56)
	pt3dadd(5.08, 40.21, -7.25, 0.56)
  }
  dend[40] {pt3dclear()
	pt3dadd(5.08, 40.21, -7.25, 0.56)
	pt3dadd(4.63, 40.71, -7.25, 0.37)
	pt3dadd(4.15, 41.21, -7.25, 0.37)
	pt3dadd(3.65, 41.71, -7.25, 0.37)
	pt3dadd(3.52, 42.14, -7.25, 0.37)
  }
  dend[41] {pt3dclear()
	pt3dadd(5.08, 40.21, -7.25, 0.56)
	pt3dadd(5.89, 40.02, -7.25, 0.5)
	pt3dadd(6.7, 39.96, -7.25, 0.5)
	pt3dadd(7.51, 39.53, -7.25, 0.5)
	pt3dadd(8.07, 39.34, -7.25, 0.5)
	pt3dadd(8.39, 38.65, -7.25, 0.5)
	pt3dadd(8.88, 38.15, -7.25, 0.5)
	pt3dadd(9.38, 38.15, -7.25, 0.5)
  }
  dend[42] {pt3dclear()
	pt3dadd(3.09, 39.78, -7.25, 0.69)
	pt3dadd(3.58, 38.97, -7, 0.37)
	pt3dadd(3.96, 38.65, -7, 0.37)
	pt3dadd(4.58, 38.22, -7, 0.37)
	pt3dadd(4.96, 37.78, -7, 0.37)
	pt3dadd(5.39, 37.47, -7, 0.37)
	pt3dadd(6.08, 36.85, -6.75, 1.06)
	pt3dadd(7.01, 36.4, -6.75, 0.94)
	pt3dadd(7.82, 36.03, -6.75, 0.69)
	pt3dadd(8.63, 35.85, -6.75, 0.5)
	pt3dadd(9.57, 35.85, -6.75, 0.62)
	pt3dadd(10.32, 35.85, -6.75, 0.69)
	pt3dadd(11.07, 35.79, -6.75, 0.69)
  }
  dend[43] {pt3dclear()
	pt3dadd(-10.78, 48.71, -6.5, 1.37)
	pt3dadd(-9.94, 47.88, -6.75, 0.69)
	pt3dadd(-9.19, 47.63, -6.75, 0.56)
	pt3dadd(-8.44, 47.44, -6.75, 0.44)
	pt3dadd(-7.89, 47.38, -6.75, 0.44)
	pt3dadd(-7.08, 47.32, -6.75, 0.44)
	pt3dadd(-6.08, 47.26, -6.5, 0.56)
	pt3dadd(-5.27, 46.95, -6.5, 0.5)
	pt3dadd(-4.71, 47.01, -6.5, 0.5)
	pt3dadd(-3.9, 46.88, -6.5, 0.5)
	pt3dadd(-3.15, 46.76, -6.5, 0.5)
	pt3dadd(-2.4, 46.7, -6.5, 0.5)
	pt3dadd(-1.53, 46.38, -6.25, 0.5)
	pt3dadd(-0.72, 46.13, -6.25, 0.5)
	pt3dadd(0.09, 45.76, -6.25, 0.5)
	pt3dadd(1.09, 45.45, -6.25, 0.5)
	pt3dadd(1.96, 45.07, -6.25, 0.5)
	pt3dadd(2.9, 44.83, -6.25, 0.81)
	pt3dadd(3.65, 44.7, -6.25, 0.81)
	pt3dadd(4.71, 44.51, -6.25, 0.62)
	pt3dadd(5.52, 44.51, -6.25, 0.62)
	pt3dadd(6.64, 44.39, -6.25, 0.62)
	pt3dadd(7.51, 44.26, -6.25, 0.62)
	pt3dadd(8.57, 44.33, -6.25, 0.62)
	pt3dadd(9.26, 44.01, -6, 1.43)
  }
  dend[44] {pt3dclear()
	pt3dadd(9.26, 44.01, -6, 1.43)
	pt3dadd(9.88, 42.77, -6, 0.87)
	pt3dadd(10.51, 41.9, -6, 0.81)
	pt3dadd(11.13, 41.27, -6, 0.69)
	pt3dadd(11.94, 40.59, -6, 0.69)
	pt3dadd(12.62, 40.09, -6, 0.69)
	pt3dadd(13.44, 39.53, -6, 0.69)
  }
  dend[45] {pt3dclear()
	pt3dadd(13.44, 39.53, -6, 0.69)
	pt3dadd(14.37, 39.15, -6, 0.69)
	pt3dadd(15.31, 38.9, -6, 0.69)
	pt3dadd(16.18, 38.59, -6, 0.69)
  }
  dend[46] {pt3dclear()
	pt3dadd(16.18, 38.59, -6, 0.69)
	pt3dadd(16.73, 39.28, -6, 0.69)
	pt3dadd(17.48, 39.46, -6, 0.69)
	pt3dadd(18.36, 39.84, -6, 0.69)
	pt3dadd(19.3, 39.96, -6, 0.69)
	pt3dadd(20.04, 40.02, -6.25, 0.69)
	pt3dadd(21.04, 39.96, -6.25, 0.69)
	pt3dadd(21.66, 39.96, -6.25, 0.69)
  }
  dend[47] {pt3dclear()
	pt3dadd(16.18, 38.59, -6, 0.69)
	pt3dadd(16.68, 37.9, -6, 0.56)
	pt3dadd(17.61, 37.53, -6, 0.56)
	pt3dadd(18.36, 37.34, -6, 0.56)
	pt3dadd(19.48, 37.22, -6, 0.56)
	pt3dadd(20.29, 37.22, -6, 0.56)
	pt3dadd(21.35, 37.28, -6, 0.56)
	pt3dadd(22.54, 37.34, -6, 0.56)
	pt3dadd(23.1, 37.47, -6, 0.56)
	pt3dadd(24.03, 37.34, -5.75, 0.56)
	pt3dadd(24.66, 36.97, -5.75, 0.56)
  }
  dend[48] {pt3dclear()
	pt3dadd(13.44, 39.53, -6, 0.69)
	pt3dadd(13.12, 38.65, -6.25, 0.56)
	pt3dadd(13.12, 37.84, -6.25, 0.56)
	pt3dadd(13, 37.09, -6.25, 0.75)
	pt3dadd(12.75, 36.28, -6.25, 0.75)
	pt3dadd(12.19, 35.35, -6, 0.5)
	pt3dadd(11.75, 34.6, -6, 0.5)
	pt3dadd(11.63, 33.79, -6, 0.5)
  }
  dend[49] {pt3dclear()
	pt3dadd(9.26, 44.01, -6, 1.43)
	pt3dadd(10.13, 44.58, -6.25, 0.5)
	pt3dadd(11.19, 44.7, -6.25, 0.5)
	pt3dadd(12.13, 44.51, -6.25, 0.5)
	pt3dadd(13.37, 44.7, -6.25, 0.5)
	pt3dadd(14.43, 44.95, -6.25, 0.5)
	pt3dadd(14.93, 45.01, -6.25, 0.5)
  }
  dend[50] {pt3dclear()
	pt3dadd(14.93, 45.01, -6.25, 0.5)
	pt3dadd(15.43, 45.7, -6.25, 0.5)
	pt3dadd(16.18, 46.13, -6.25, 0.5)
	pt3dadd(16.93, 46.57, -6.25, 0.5)
	pt3dadd(17.61, 46.95, -6.25, 0.5)
	pt3dadd(18.42, 47.38, -6.25, 0.5)
	pt3dadd(19.23, 47.38, -6.25, 0.5)
  }
  dend[51] {pt3dclear()
	pt3dadd(14.93, 45.01, -6.25, 0.5)
	pt3dadd(15.31, 44.2, -6.25, 0.5)
	pt3dadd(15.99, 43.7, -6.25, 0.5)
	pt3dadd(16.93, 43.08, -6.25, 0.5)
	pt3dadd(18.23, 42.83, -6.25, 0.5)
	pt3dadd(19.23, 42.89, -6.25, 0.5)
	pt3dadd(20.11, 43.27, -6.25, 0.5)
  }
  dend[52] {pt3dclear()
	pt3dadd(20.11, 43.27, -6.25, 0.5)
	pt3dadd(20.11, 44.2, -6.25, 0.5)
	pt3dadd(20.6, 45.01, -6.25, 0.5)
	pt3dadd(21.35, 45.45, -6.25, 0.5)
	pt3dadd(21.91, 45.95, -6.25, 0.5)
	pt3dadd(22.54, 46.76, -6.25, 0.5)
  }
  dend[53] {pt3dclear()
	pt3dadd(20.11, 43.27, -6.25, 0.5)
	pt3dadd(21.17, 42.96, -6.25, 0.5)
	pt3dadd(22.16, 43.02, -6, 0.5)
	pt3dadd(23.1, 43.2, -6, 0.5)
  }
}
proc shape3d_3() {
  dend[53] {	pt3dadd(23.85, 43.39, -6, 0.5)
  }
  dend[54] {pt3dclear()
	pt3dadd(23.85, 43.39, -6, 0.5)
	pt3dadd(24.47, 44.08, -5.75, 0.5)
	pt3dadd(24.84, 44.89, -5.75, 0.5)
	pt3dadd(25.16, 45.89, -5.5, 0.5)
	pt3dadd(25.59, 46.45, -5.5, 0.5)
  }
  dend[55] {pt3dclear()
	pt3dadd(25.59, 46.45, -5.5, 0.5)
	pt3dadd(26.15, 46.88, -5.5, 0.5)
	pt3dadd(26.65, 47.26, -5.5, 0.5)
  }
  dend[56] {pt3dclear()
	pt3dadd(25.59, 46.45, -5.5, 0.5)
	pt3dadd(25.03, 47.26, -5.5, 0.5)
	pt3dadd(25.03, 48.13, -5.5, 0.5)
  }
  dend[57] {pt3dclear()
	pt3dadd(23.85, 43.39, -6, 0.5)
	pt3dadd(23.85, 42.33, -6, 0.5)
	pt3dadd(24.22, 41.65, -6, 0.5)
	pt3dadd(24.78, 41.27, -6, 0.5)
	pt3dadd(25.53, 40.84, -6, 0.5)
	pt3dadd(26.53, 40.65, -6, 0.5)
	pt3dadd(27.03, 40.27, -6, 0.5)
	pt3dadd(27.96, 40.15, -6, 0.5)
	pt3dadd(28.71, 40.4, -6, 0.5)
	pt3dadd(29.21, 40.65, -6, 0.5)
  }
  dend[58] {pt3dclear()
	pt3dadd(-16.62, 42.53, -6.5, 2.24)
	pt3dadd(-16.89, 42.89, -6.5, 2.87)
	pt3dadd(-19.39, 43.77, -6.75, 2.37)
	pt3dadd(-19.73, 44.06, -6.75, 2.37)
  }
  dend[59] {pt3dclear()
	pt3dadd(-19.73, 44.06, -6.75, 2.37)
	pt3dadd(-21.38, 45.14, -6.75, 1.62)
	pt3dadd(-23.88, 46.13, -6.75, 1.62)
	pt3dadd(-26.25, 47.13, -6.75, 1.62)
	pt3dadd(-28.74, 47.51, -6.75, 1.62)
	pt3dadd(-32.36, 47.26, -6.75, 1.62)
	pt3dadd(-35.22, 47.26, -6.75, 1.62)
	pt3dadd(-38.71, 47.33, -6.75, 1.62)
  }
  dend[60] {pt3dclear()
	pt3dadd(-38.71, 47.33, -6.75, 1.62)
	pt3dadd(-39.46, 47.26, -6.75, 2.62)
	pt3dadd(-41.21, 48.63, -6.75, 2.24)
	pt3dadd(-43.2, 50.75, -6.75, 2.12)
	pt3dadd(-44.6, 53.06, -6.75, 2.12)
  }
  dend[61] {pt3dclear()
	pt3dadd(-44.6, 53.06, -6.75, 2.12)
	pt3dadd(-46.86, 57.79, -6.75, 2.62)
  }
  dend[62] {pt3dclear()
	pt3dadd(-46.86, 57.79, -6.75, 2.62)
	pt3dadd(-45.82, 55.61, -6.75, 2.62)
	pt3dadd(-46.8, 57.97, -6.75, 2.62)
  }
  dend[63] {pt3dclear()
	pt3dadd(-46.8, 57.97, -6.75, 2.62)
	pt3dadd(-49.05, 59.25, -6.75, 3.99)
	pt3dadd(-49.19, 59.48, -6.75, 3.12)
	pt3dadd(-51.56, 61.1, -6.75, 2.74)
	pt3dadd(-51.76, 61.4, -6.75, 2.74)
  }
  dend[64] {pt3dclear()
	pt3dadd(-51.76, 61.4, -6.75, 2.74)
	pt3dadd(-52.56, 62.72, -6.75, 2)
	pt3dadd(-53.55, 64.59, -6.75, 1.87)
	pt3dadd(-54.55, 66.33, -6.75, 1.87)
	pt3dadd(-55.8, 67.95, -6.5, 1.75)
	pt3dadd(-57.67, 69.45, -6.5, 1.75)
	pt3dadd(-57.96, 69.84, -6.5, 1.75)
  }
  dend[65] {pt3dclear()
	pt3dadd(-57.96, 69.84, -6.5, 1.75)
	pt3dadd(-59.29, 71.45, -6.5, 1.5)
	pt3dadd(-60.79, 72.81, -6.5, 1.5)
	pt3dadd(-63.03, 74.31, -6.5, 1.5)
	pt3dadd(-64.78, 75.06, -6.25, 1.5)
	pt3dadd(-67.14, 76.06, -6.25, 1.5)
	pt3dadd(-68.5, 76.7, -6.25, 1.5)
  }
  dend[66] {pt3dclear()
	pt3dadd(-68.5, 76.7, -6.25, 1.5)
	pt3dadd(-69.76, 77.18, -6.25, 1.5)
	pt3dadd(-71.38, 78.43, -6.25, 1.37)
	pt3dadd(-72.76, 79.3, -6.25, 1.37)
	pt3dadd(-74.75, 80.55, -6.25, 1.12)
	pt3dadd(-76.37, 82.29, -6.25, 1.12)
	pt3dadd(-77.48, 83.92, -6, 1.25)
	pt3dadd(-78.62, 86.04, -6, 1.25)
	pt3dadd(-79.86, 88.28, -6, 1.25)
	pt3dadd(-80.98, 90.27, -6, 1.25)
	pt3dadd(-81.59, 91.63, -6, 1.25)
  }
  dend[67] {pt3dclear()
	pt3dadd(-81.59, 91.63, -6, 1.25)
	pt3dadd(-82.63, 93.9, -6, 1.25)
  }
  dend[68] {pt3dclear()
	pt3dadd(-82.63, 93.9, -6, 1.25)
	pt3dadd(-82.11, 92.77, -6, 1.25)
	pt3dadd(-83.23, 94.39, -6, 1.12)
	pt3dadd(-84.6, 96.01, -6, 1.12)
	pt3dadd(-86.72, 98.13, -6, 1.12)
	pt3dadd(-87.34, 99.75, -6, 1.12)
	pt3dadd(-88.47, 101.1, -6, 1.12)
	pt3dadd(-89.17, 101.5, -6, 1.12)
  }
  dend[69] {pt3dclear()
	pt3dadd(-89.17, 101.5, -6, 1.12)
	pt3dadd(-91.21, 102.2, -6, 1.12)
	pt3dadd(-92.54, 103.1, -6, 1.12)
  }
  dend[70] {pt3dclear()
	pt3dadd(-92.54, 103.1, -6, 1.12)
	pt3dadd(-93.02, 104, -6, 1.12)
	pt3dadd(-93.7, 106.6, -6, 1.12)
	pt3dadd(-93.87, 107.1, -6, 1.12)
  }
  dend[71] {pt3dclear()
	pt3dadd(-93.87, 107.1, -6, 1.12)
	pt3dadd(-94.03, 109.3, -6, 1.12)
  }
  dend[72] {pt3dclear()
	pt3dadd(-94.03, 109.3, -6, 1.12)
	pt3dadd(-93.95, 108.2, -6, 1.12)
	pt3dadd(-93.56, 111.1, -6, 1.12)
  }
  dend[73] {pt3dclear()
	pt3dadd(-93.56, 111.1, -6, 1.12)
	pt3dadd(-92.87, 112.9, -6, 1.12)
	pt3dadd(-92.21, 114.2, -6.25, 1.12)
	pt3dadd(-91.77, 115.1, -6.25, 1.12)
  }
  dend[74] {pt3dclear()
	pt3dadd(-91.77, 115.1, -6.25, 1.12)
	pt3dadd(-91.15, 116.1, -6.25, 1.12)
	pt3dadd(-89.65, 118.5, -6.25, 1.12)
	pt3dadd(-89.03, 120.3, -6.5, 1.12)
	pt3dadd(-88.9, 122.9, -6.5, 1.12)
	pt3dadd(-89.03, 125.4, -6.75, 1.12)
	pt3dadd(-89.42, 126.3, -6.75, 1.12)
  }
  dend[75] {pt3dclear()
	pt3dadd(-89.42, 126.3, -6.75, 1.12)
	pt3dadd(-89.9, 127.3, -6.75, 1.12)
  }
  dend[76] {pt3dclear()
	pt3dadd(-89.9, 127.3, -6.75, 1.12)
	pt3dadd(-90.04, 128.19, -6.75, 0.36)
	pt3dadd(-89.93, 129.19, -6.75, 0.36)
	pt3dadd(-89.83, 130.19, -7, 0.36)
	pt3dadd(-89.57, 131.19, -7, 0.36)
  }
  dend[77] {pt3dclear()
	pt3dadd(-89.57, 131.19, -7, 0.36)
	pt3dadd(-88.65, 131.6, -7, 0.36)
	pt3dadd(-87.99, 132.3, -7, 0.36)
	pt3dadd(-87.38, 132.8, -7, 0.36)
	pt3dadd(-86.4, 132.9, -7, 0.36)
	pt3dadd(-85.48, 132.8, -7, 0.36)
	pt3dadd(-84.25, 133, -6.75, 0.36)
	pt3dadd(-83.08, 132.69, -6.75, 0.36)
	pt3dadd(-82.21, 132.69, -6.75, 0.36)
	pt3dadd(-81.19, 133, -7, 0.36)
	pt3dadd(-80.47, 133.5, -7, 0.36)
	pt3dadd(-79.8, 134.3, -7, 0.36)
	pt3dadd(-79.75, 134.9, -7, 0.36)
	pt3dadd(-79.59, 135.6, -7, 0.36)
	pt3dadd(-79.19, 135.9, -7, 0.36)
  }
  dend[78] {pt3dclear()
	pt3dadd(-89.57, 131.19, -7, 0.36)
	pt3dadd(-90.34, 132, -7, 0.36)
	pt3dadd(-91.06, 132.8, -7, 0.36)
	pt3dadd(-91.72, 133.9, -7, 0.36)
	pt3dadd(-91.83, 134.6, -7, 0.36)
	pt3dadd(-91.77, 135.5, -7, 0.36)
	pt3dadd(-92.03, 136.6, -7.25, 0.36)
	pt3dadd(-91.98, 137.69, -7.25, 0.36)
	pt3dadd(-91.88, 138.8, -7.25, 0.36)
	pt3dadd(-91.62, 140.19, -7.25, 0.36)
  }
  dend[79] {pt3dclear()
	pt3dadd(-91.62, 140.19, -7.25, 0.36)
	pt3dadd(-91.42, 141.3, -7.25, 0.36)
  }
  dend[80] {pt3dclear()
	pt3dadd(-91.42, 141.3, -7.25, 0.36)
	pt3dadd(-91.72, 142.3, -7.5, 0.31)
	pt3dadd(-91.88, 143.19, -7.5, 0.31)
	pt3dadd(-92.03, 144, -7.5, 0.31)
	pt3dadd(-91.77, 144.8, -7.5, 0.31)
  }
  dend[81] {pt3dclear()
	pt3dadd(-91.42, 141.3, -7.25, 0.36)
	pt3dadd(-90.5, 141.69, -7.25, 0.31)
	pt3dadd(-89.42, 142.3, -7.5, 0.31)
	pt3dadd(-88.04, 142.69, -7.5, 0.31)
	pt3dadd(-87.07, 142.9, -7.5, 0.31)
	pt3dadd(-86.35, 143.5, -7.5, 0.26)
	pt3dadd(-85.02, 143.8, -7.5, 0.26)
	pt3dadd(-84.2, 143.8, -7.5, 0.26)
	pt3dadd(-82.87, 143.69, -7.5, 0.26)
	pt3dadd(-81.95, 143.3, -7.5, 0.26)
  }
  dend[82] {pt3dclear()
	pt3dadd(-91.62, 140.19, -7.25, 0.36)
	pt3dadd(-90.96, 139.69, -7.25, 0.18)
	pt3dadd(-90.24, 138.9, -7.25, 0.18)
	pt3dadd(-89.37, 138.9, -7.25, 0.18)
	pt3dadd(-88.3, 138.8, -7.5, 0.18)
	pt3dadd(-87.27, 138.5, -7.5, 0.18)
	pt3dadd(-86.15, 138.5, -7.5, 0.18)
	pt3dadd(-84.92, 138.5, -7.5, 0.18)
	pt3dadd(-83.64, 138.6, -7.5, 0.18)
	pt3dadd(-82.92, 138.8, -7.5, 0.18)
  }
  dend[83] {pt3dclear()
	pt3dadd(-89.9, 127.3, -6.75, 1.12)
	pt3dadd(-91.06, 127.7, -6.75, 0.41)
	pt3dadd(-91.83, 128.69, -6.75, 0.41)
	pt3dadd(-93, 129.3, -6.75, 0.41)
  }
  dend[84] {pt3dclear()
	pt3dadd(-93, 129.3, -6.75, 0.41)
	pt3dadd(-94.08, 129.5, -7, 0.41)
	pt3dadd(-95.3, 129.4, -7, 0.41)
	pt3dadd(-96.02, 129.3, -7, 0.36)
	pt3dadd(-97.2, 129.3, -7, 0.36)
  }
  dend[85] {pt3dclear()
	pt3dadd(-97.2, 129.3, -7, 0.36)
	pt3dadd(-98.32, 128.8, -7, 0.36)
	pt3dadd(-99.4, 128.6, -7, 0.36)
	pt3dadd(-99.96, 127.9, -7, 0.36)
	pt3dadd(-100.1, 127.3, -7, 0.36)
	pt3dadd(-99.6, 126.4, -6.75, 0.36)
	pt3dadd(-98.68, 125.9, -6.75, 0.36)
	pt3dadd(-98.53, 125, -6.75, 0.36)
	pt3dadd(-98.22, 124.1, -6.75, 0.36)
	pt3dadd(-97.4, 122.6, -6.75, 0.36)
  }
  dend[86] {pt3dclear()
	pt3dadd(-97.2, 129.3, -7, 0.36)
	pt3dadd(-98.02, 130.19, -7, 0.36)
	pt3dadd(-98.68, 131.3, -7, 0.36)
	pt3dadd(-99.75, 132.1, -7, 0.36)
	pt3dadd(-100.6, 132.8, -7, 0.26)
	pt3dadd(-101.8, 133.5, -7, 0.26)
	pt3dadd(-102.8, 133.5, -7, 0.41)
	pt3dadd(-103.7, 132.8, -7, 0.41)
  }
  dend[87] {pt3dclear()
	pt3dadd(-93, 129.3, -6.75, 0.41)
	pt3dadd(-93.56, 130.19, -6.75, 0.41)
	pt3dadd(-94.74, 131.6, -7, 0.41)
	pt3dadd(-95.46, 132.8, -7, 0.41)
	pt3dadd(-95.71, 133.8, -7, 0.41)
  }
  dend[88] {pt3dclear()
	pt3dadd(-95.71, 133.8, -7, 0.41)
	pt3dadd(-96.07, 134.4, -7, 0.36)
  }
}
proc shape3d_4() {
  dend[88] {  }
  dend[89] {pt3dclear()
	pt3dadd(-96.07, 134.4, -7, 0.36)
	pt3dadd(-96.44, 135, -7, 0.36)
  }
  dend[90] {pt3dclear()
	pt3dadd(-96.44, 135, -7, 0.36)
	pt3dadd(-96.22, 134.69, -7, 0.36)
  }
  dend[91] {pt3dclear()
	pt3dadd(-96.44, 135, -7, 0.36)
	pt3dadd(-96.84, 134, -7, 0.31)
	pt3dadd(-97.96, 134.6, -7, 0.26)
	pt3dadd(-99.09, 135, -7, 0.26)
	pt3dadd(-100.1, 135.5, -7, 0.26)
	pt3dadd(-101, 136.4, -7, 0.26)
	pt3dadd(-101.4, 137.1, -7, 0.26)
  }
  dend[92] {pt3dclear()
	pt3dadd(-96.07, 134.4, -7, 0.36)
	pt3dadd(-96.58, 135.9, -7, 0.36)
	pt3dadd(-96.99, 136.8, -7, 0.36)
  }
  dend[93] {pt3dclear()
	pt3dadd(-96.99, 136.8, -7, 0.36)
	pt3dadd(-97.45, 137.5, -7, 0.26)
	pt3dadd(-98.02, 137.6, -7, 0.26)
	pt3dadd(-98.63, 137.69, -7, 0.26)
	pt3dadd(-99.35, 138.1, -7, 0.26)
	pt3dadd(-99.86, 138.69, -7, 0.26)
	pt3dadd(-100.4, 139.4, -7, 0.26)
  }
  dend[94] {pt3dclear()
	pt3dadd(-96.99, 136.8, -7, 0.36)
	pt3dadd(-96.99, 137.9, -7, 0.26)
	pt3dadd(-96.99, 138.8, -7, 0.26)
	pt3dadd(-96.99, 139.69, -7, 0.26)
	pt3dadd(-96.99, 140.6, -7, 0.26)
	pt3dadd(-97.09, 141.4, -7, 0.26)
  }
  dend[95] {pt3dclear()
	pt3dadd(-95.71, 133.8, -7, 0.41)
	pt3dadd(-95.2, 134.9, -7, 0.26)
	pt3dadd(-94.74, 135.9, -7, 0.26)
	pt3dadd(-94.28, 137.1, -7.25, 0.26)
	pt3dadd(-94.13, 138.19, -7.25, 0.26)
	pt3dadd(-94.08, 139.19, -7.25, 0.26)
	pt3dadd(-94.18, 140.5, -7.25, 0.26)
	pt3dadd(-94.49, 140.9, -7.25, 0.26)
  }
  dend[96] {pt3dclear()
	pt3dadd(-89.42, 126.3, -6.75, 1.12)
	pt3dadd(-88.45, 126.5, -6.75, 0.51)
	pt3dadd(-87.53, 126.6, -6.75, 0.41)
	pt3dadd(-86.1, 126.9, -6.75, 0.41)
  }
  dend[97] {pt3dclear()
	pt3dadd(-86.1, 126.9, -6.75, 0.41)
	pt3dadd(-86.25, 128.1, -6.75, 0.41)
	pt3dadd(-86.3, 129.1, -6.75, 0.41)
	pt3dadd(-85.84, 129.9, -6.75, 0.41)
  }
  dend[98] {pt3dclear()
	pt3dadd(-86.1, 126.9, -6.75, 0.41)
	pt3dadd(-84.97, 127, -6.75, 0.41)
	pt3dadd(-83.59, 126.9, -6.75, 0.41)
	pt3dadd(-82.21, 127, -6.75, 0.41)
	pt3dadd(-80.26, 127.4, -6.75, 0.41)
  }
  dend[99] {pt3dclear()
	pt3dadd(-80.26, 127.4, -6.75, 0.41)
	pt3dadd(-79.75, 126.8, -6.75, 0.41)
	pt3dadd(-79.23, 125.8, -7, 0.41)
	pt3dadd(-78.17, 125.2, -7, 0.31)
	pt3dadd(-76.84, 124.7, -7, 0.31)
	pt3dadd(-75.76, 124.2, -7, 0.31)
	pt3dadd(-74.73, 123.7, -7, 0.31)
	pt3dadd(-73.45, 123.7, -7, 0.31)
	pt3dadd(-72.84, 123.5, -7, 0.31)
	pt3dadd(-71.52, 124.6, -6.75, 0.31)
	pt3dadd(-70.75, 125.5, -6.75, 0.31)
	pt3dadd(-69.93, 126.6, -6.75, 0.31)
  }
  dend[100] {pt3dclear()
	pt3dadd(-80.26, 127.4, -6.75, 0.41)
	pt3dadd(-79.59, 128.19, -6.75, 0.31)
	pt3dadd(-78.42, 128.69, -6.75, 0.31)
	pt3dadd(-77.2, 128.4, -7, 0.31)
	pt3dadd(-76.02, 128.8, -7, 0.31)
	pt3dadd(-74.79, 129.5, -7, 0.18)
	pt3dadd(-74.28, 130.3, -7, 0.15)
	pt3dadd(-74.43, 131.5, -7, 0.15)
	pt3dadd(-74.64, 132.3, -7, 0.15)
	pt3dadd(-75.3, 133, -7, 0.15)
  }
  dend[101] {pt3dclear()
	pt3dadd(-91.77, 115.1, -6.25, 1.12)
	pt3dadd(-92.13, 115.9, -6.25, 0.61)
	pt3dadd(-92.49, 116.8, -6.25, 0.56)
	pt3dadd(-92.95, 117.8, -6.25, 0.46)
	pt3dadd(-93.67, 119.3, -6.5, 0.46)
	pt3dadd(-93.92, 120.1, -6.5, 0.46)
	pt3dadd(-94.28, 121.2, -6.5, 0.46)
	pt3dadd(-94.23, 122.4, -6.25, 0.31)
	pt3dadd(-94.89, 123.7, -6.25, 0.31)
	pt3dadd(-95.36, 124.5, -6.25, 0.31)
	pt3dadd(-95.51, 125.5, -6.25, 0.31)
	pt3dadd(-96.07, 126.5, -6.25, 0.31)
	pt3dadd(-96.63, 127, -6.25, 0.31)
	pt3dadd(-96.74, 128.4, -6.5, 0.31)
	pt3dadd(-96.69, 129.4, -6.5, 0.31)
	pt3dadd(-96.69, 129.9, -6.5, 0.31)
	pt3dadd(-96.84, 130.5, -6.5, 0.31)
	pt3dadd(-96.63, 131.19, -6.5, 0.31)
	pt3dadd(-96.63, 131.8, -6.5, 0.31)
	pt3dadd(-96.99, 132.8, -6.25, 0.26)
	pt3dadd(-97.09, 133.9, -6.25, 0.26)
	pt3dadd(-97.91, 134.6, -6.25, 0.26)
	pt3dadd(-98.83, 135.6, -6.25, 0.26)
	pt3dadd(-99.6, 136, -6.25, 0.26)
  }
  dend[102] {pt3dclear()
	pt3dadd(-93.56, 111.1, -6, 1.12)
	pt3dadd(-93.97, 112, -6, 0.67)
	pt3dadd(-94.54, 113, -6, 0.67)
	pt3dadd(-95.25, 113.9, -6, 0.67)
	pt3dadd(-96.12, 115, -6, 0.56)
	pt3dadd(-96.89, 115.9, -6, 0.56)
	pt3dadd(-97.91, 117.3, -6, 0.56)
	pt3dadd(-98.63, 118.8, -6, 0.56)
  }
  dend[103] {pt3dclear()
	pt3dadd(-98.63, 118.8, -6, 0.56)
	pt3dadd(-98.37, 120.1, -6, 0.56)
	pt3dadd(-98.63, 121.5, -6, 0.56)
	pt3dadd(-99.24, 122.6, -6, 0.41)
	pt3dadd(-99.5, 123.8, -6, 0.41)
  }
  dend[104] {pt3dclear()
	pt3dadd(-99.5, 123.8, -6, 0.41)
	pt3dadd(-100.2, 124.9, -6.25, 0.18)
	pt3dadd(-101, 125.9, -6.25, 0.18)
	pt3dadd(-102, 126.8, -6.25, 0.18)
	pt3dadd(-102.8, 127.5, -6.25, 0.18)
	pt3dadd(-103.6, 128.6, -6.25, 0.18)
  }
  dend[105] {pt3dclear()
	pt3dadd(-103.6, 128.6, -6.25, 0.18)
	pt3dadd(-103.3, 129.9, -6.25, 0.18)
	pt3dadd(-103.1, 131.19, -6.25, 0.18)
  }
  dend[106] {pt3dclear()
	pt3dadd(-103.6, 128.6, -6.25, 0.18)
	pt3dadd(-104.4, 129.19, -6.25, 0.18)
	pt3dadd(-105.6, 129.6, -6, 0.18)
	pt3dadd(-106.6, 130.69, -6, 0.18)
  }
  dend[107] {pt3dclear()
	pt3dadd(-106.6, 130.69, -6, 0.18)
	pt3dadd(-106.7, 132.1, -6, 0.18)
  }
  dend[108] {pt3dclear()
	pt3dadd(-106.6, 130.69, -6, 0.18)
	pt3dadd(-107.5, 130.4, -6, 0.18)
	pt3dadd(-108.7, 130.19, -6, 0.18)
  }
  dend[109] {pt3dclear()
	pt3dadd(-99.5, 123.8, -6, 0.41)
	pt3dadd(-98.83, 125.1, -6, 0.18)
	pt3dadd(-98.94, 126.7, -6, 0.18)
	pt3dadd(-99.35, 127.8, -6, 0.18)
	pt3dadd(-100.4, 128.9, -6, 0.18)
	pt3dadd(-101.6, 130.5, -6, 0.18)
  }
  dend[110] {pt3dclear()
	pt3dadd(-98.63, 118.8, -6, 0.56)
	pt3dadd(-99.75, 119, -6, 0.46)
	pt3dadd(-100.5, 119.6, -6, 0.46)
	pt3dadd(-101.1, 119.9, -5.75, 0.46)
  }
  dend[111] {pt3dclear()
	pt3dadd(-101.1, 119.9, -5.75, 0.46)
	pt3dadd(-101.5, 121.4, -6, 0.46)
	pt3dadd(-102.3, 122.7, -6, 0.46)
	pt3dadd(-103.6, 124, -6, 0.41)
	pt3dadd(-105, 124.9, -6, 0.41)
  }
  dend[112] {pt3dclear()
	pt3dadd(-105, 124.9, -6, 0.41)
	pt3dadd(-106.6, 125.5, -6, 0.41)
	pt3dadd(-107.8, 125.9, -6, 0.41)
	pt3dadd(-109.8, 126.5, -6, 0.41)
  }
  dend[113] {pt3dclear()
	pt3dadd(-105, 124.9, -6, 0.41)
	pt3dadd(-105, 126, -6, 0.41)
	pt3dadd(-105.4, 126.9, -6, 0.41)
	pt3dadd(-106.1, 127.9, -6, 0.41)
  }
  dend[114] {pt3dclear()
	pt3dadd(-101.1, 119.9, -5.75, 0.46)
	pt3dadd(-102.5, 119.9, -5.75, 0.41)
	pt3dadd(-103.7, 120.7, -5.75, 0.41)
	pt3dadd(-105.1, 121.8, -5.75, 0.41)
	pt3dadd(-105.6, 122.2, -5.75, 0.36)
	pt3dadd(-106.7, 123.1, -5.5, 0.36)
	pt3dadd(-107.6, 124.3, -5.5, 0.36)
  }
  dend[115] {pt3dclear()
	pt3dadd(-94.03, 109.3, -6, 1.12)
	pt3dadd(-95.15, 107.2, -6, 0.97)
	pt3dadd(-95.71, 107.3, -6, 0.97)
	pt3dadd(-96.38, 107.9, -6, 0.56)
	pt3dadd(-96.99, 108.4, -6, 0.56)
	pt3dadd(-97.81, 108.8, -6, 0.56)
	pt3dadd(-98.83, 109.5, -6, 0.56)
	pt3dadd(-99.4, 110.5, -5.75, 0.56)
	pt3dadd(-100.4, 111.2, -5.75, 0.56)
	pt3dadd(-100.6, 112.3, -5.75, 0.56)
	pt3dadd(-101.5, 113.3, -5.75, 0.46)
	pt3dadd(-102.8, 114.2, -5.75, 0.46)
	pt3dadd(-103.5, 115, -5.75, 0.46)
	pt3dadd(-104.4, 115.9, -5.75, 0.46)
	pt3dadd(-105.2, 116.7, -5.75, 0.46)
  }
  dend[116] {pt3dclear()
	pt3dadd(-105.2, 116.7, -5.75, 0.46)
	pt3dadd(-105.2, 117.4, -5.75, 0.36)
  }
  dend[117] {pt3dclear()
	pt3dadd(-105.2, 117.4, -5.75, 0.36)
	pt3dadd(-105.2, 117.6, -5.75, 0.36)
	pt3dadd(-105.9, 118.6, -5.75, 0.36)
	pt3dadd(-106.7, 119.6, -5.75, 0.36)
	pt3dadd(-107.5, 121.1, -5.5, 0.36)
	pt3dadd(-108.6, 122.2, -5.5, 0.36)
	pt3dadd(-109.5, 123.6, -5.5, 0.36)
	pt3dadd(-110.1, 124.6, -5.5, 0.36)
  }
  dend[118] {pt3dclear()
	pt3dadd(-105.2, 117.4, -5.75, 0.36)
	pt3dadd(-106, 116.8, -5.75, 0.36)
	pt3dadd(-106.8, 117.4, -5.75, 0.36)
	pt3dadd(-107.6, 118.1, -5.75, 0.36)
	pt3dadd(-108.4, 118.4, -5.75, 0.36)
	pt3dadd(-109.6, 119.5, -5.75, 0.36)
  }
  dend[119] {pt3dclear()
	pt3dadd(-109.6, 119.5, -5.75, 0.36)
	pt3dadd(-110.8, 119.6, -6, 0.36)
	pt3dadd(-111.7, 120.1, -6, 0.15)
	pt3dadd(-112.2, 120.7, -6, 0.15)
	pt3dadd(-112.8, 121.2, -6, 0.15)
  }
  dend[120] {pt3dclear()
	pt3dadd(-109.6, 119.5, -5.75, 0.36)
	pt3dadd(-109.7, 120.3, -5.75, 0.15)
	pt3dadd(-110.5, 121.7, -5.75, 0.15)
	pt3dadd(-111, 122.6, -5.75, 0.15)
  }
  dend[121] {pt3dclear()
	pt3dadd(-105.2, 116.7, -5.75, 0.46)
	pt3dadd(-104.7, 117.1, -5.75, 0.26)
	pt3dadd(-103.5, 117.5, -6, 0.26)
	pt3dadd(-102.9, 117.3, -6, 0.26)
	pt3dadd(-101.8, 116.7, -6, 0.26)
  }
}
proc shape3d_5() {
  dend[121] {	pt3dadd(-101, 116.1, -6, 0.18)
	pt3dadd(-100.4, 115.5, -6, 0.18)
	pt3dadd(-99.5, 114.6, -6, 0.18)
	pt3dadd(-99.04, 113.9, -6, 0.18)
	pt3dadd(-98.32, 113.2, -6, 0.18)
	pt3dadd(-97.81, 112.4, -6, 0.18)
	pt3dadd(-97.09, 111.7, -6, 0.18)
	pt3dadd(-96.63, 110.6, -6, 0.18)
  }
  dend[122] {pt3dclear()
	pt3dadd(-93.87, 107.1, -6, 1.12)
	pt3dadd(-95.15, 106.6, -6, 0.36)
	pt3dadd(-95.66, 106.6, -6, 0.36)
	pt3dadd(-96.38, 106.6, -6, 0.26)
	pt3dadd(-97.3, 106.6, -6.25, 0.26)
	pt3dadd(-98.02, 106.7, -6.25, 0.26)
	pt3dadd(-98.94, 107.1, -6.25, 0.26)
	pt3dadd(-99.7, 107.3, -6.25, 0.26)
	pt3dadd(-100.8, 107.4, -6.25, 0.26)
	pt3dadd(-101.3, 107, -6.25, 0.26)
	pt3dadd(-102.2, 107, -6.25, 0.26)
	pt3dadd(-103.1, 106.9, -6.25, 0.26)
  }
  dend[123] {pt3dclear()
	pt3dadd(-92.54, 103.1, -6, 1.12)
	pt3dadd(-93.62, 103, -5.75, 0.87)
	pt3dadd(-94.69, 103.1, -5.75, 0.67)
	pt3dadd(-96.17, 103.3, -5.75, 0.61)
	pt3dadd(-97.5, 103.6, -5.75, 0.61)
	pt3dadd(-98.94, 103.8, -5.75, 0.61)
	pt3dadd(-100.1, 104, -5.75, 0.61)
  }
  dend[124] {pt3dclear()
	pt3dadd(-100.1, 104, -5.75, 0.61)
	pt3dadd(-101.2, 104, -5.75, 0.46)
	pt3dadd(-102.1, 104, -5.75, 0.46)
	pt3dadd(-102.8, 103.9, -5.75, 0.46)
	pt3dadd(-103.4, 103.8, -5.75, 0.46)
  }
  dend[125] {pt3dclear()
	pt3dadd(-103.4, 103.8, -5.75, 0.46)
	pt3dadd(-103.9, 104.5, -5.75, 0.41)
  }
  dend[126] {pt3dclear()
	pt3dadd(-103.9, 104.5, -5.75, 0.41)
	pt3dadd(-104.1, 104.8, -5.75, 0.41)
	pt3dadd(-105.1, 105.8, -5.75, 0.41)
	pt3dadd(-105.8, 106.8, -5.75, 0.41)
	pt3dadd(-106.9, 107.5, -5.75, 0.41)
	pt3dadd(-108.4, 108, -5.75, 0.41)
	pt3dadd(-109, 108.4, -5.75, 0.41)
  }
  dend[127] {pt3dclear()
	pt3dadd(-109, 108.4, -5.75, 0.41)
	pt3dadd(-109.4, 107.8, -5.75, 0.26)
	pt3dadd(-109.8, 107.2, -5.75, 0.26)
	pt3dadd(-109.9, 106.7, -5.75, 0.26)
  }
  dend[128] {pt3dclear()
	pt3dadd(-109, 108.4, -5.75, 0.41)
	pt3dadd(-109.6, 108.9, -5.75, 0.36)
	pt3dadd(-110.5, 109.3, -5.75, 0.36)
	pt3dadd(-111.5, 109.8, -5.75, 0.36)
	pt3dadd(-112.6, 110, -5.75, 0.36)
  }
  dend[129] {pt3dclear()
	pt3dadd(-103.9, 104.5, -5.75, 0.41)
	pt3dadd(-102.7, 102.4, -5.75, 0.36)
	pt3dadd(-102.7, 101.3, -5.75, 0.36)
	pt3dadd(-102.7, 100.6, -5.75, 0.36)
	pt3dadd(-102.3, 100, -5.75, 0.36)
	pt3dadd(-101.9, 98.95, -5.75, 0.26)
	pt3dadd(-101.8, 98.23, -5.75, 0.26)
	pt3dadd(-101.1, 97.62, -5.75, 0.26)
	pt3dadd(-100.9, 96.95, -5.75, 0.26)
	pt3dadd(-100.7, 95.93, -5.75, 0.26)
	pt3dadd(-99.91, 95.11, -5.5, 0.26)
	pt3dadd(-99.14, 94.24, -5.5, 0.26)
	pt3dadd(-98.78, 93.73, -5.5, 0.26)
	pt3dadd(-98.22, 92.71, -5.5, 0.26)
	pt3dadd(-97.66, 91.63, -5.5, 0.26)
	pt3dadd(-96.99, 90.81, -5.5, 0.26)
	pt3dadd(-95.92, 90.1, -5.5, 0.26)
	pt3dadd(-94.64, 89.79, -5.5, 0.26)
  }
  dend[130] {pt3dclear()
	pt3dadd(-103.4, 103.8, -5.75, 0.46)
	pt3dadd(-104.1, 103.7, -5.75, 0.36)
	pt3dadd(-104.7, 103.5, -5.75, 0.31)
	pt3dadd(-105.3, 103, -5.75, 0.31)
	pt3dadd(-106.3, 102.6, -5.75, 0.31)
  }
  dend[131] {pt3dclear()
	pt3dadd(-106.3, 102.6, -5.75, 0.31)
	pt3dadd(-105.7, 101.8, -5.5, 0.31)
	pt3dadd(-105.3, 100.9, -5.5, 0.15)
	pt3dadd(-105, 100.3, -5.5, 0.15)
	pt3dadd(-104.9, 99.26, -5.5, 0.15)
	pt3dadd(-104.6, 98.64, -5.5, 0.15)
	pt3dadd(-104.3, 97.82, -5.5, 0.15)
	pt3dadd(-103.5, 96.8, -5.5, 0.15)
	pt3dadd(-103.1, 96.13, -5.5, 0.15)
	pt3dadd(-102.9, 95.47, -5.5, 0.15)
  }
  dend[132] {pt3dclear()
	pt3dadd(-106.3, 102.6, -5.75, 0.31)
	pt3dadd(-106.8, 101.7, -5.5, 0.36)
	pt3dadd(-106.9, 101, -5.5, 0.36)
	pt3dadd(-107, 100.3, -5.5, 0.36)
	pt3dadd(-107, 99.61, -5.5, 0.36)
	pt3dadd(-107.1, 98.9, -5.5, 0.36)
	pt3dadd(-107, 97.98, -5.5, 0.36)
	pt3dadd(-106.7, 96.75, -5.25, 0.36)
	pt3dadd(-106.3, 95.83, -5.25, 0.36)
	pt3dadd(-105.7, 95.42, -5.25, 0.36)
	pt3dadd(-105.4, 94.55, -5.25, 0.31)
	pt3dadd(-105.4, 93.78, -5.25, 0.31)
	pt3dadd(-105.7, 92.81, -5.25, 0.15)
	pt3dadd(-106.4, 92.71, -5.25, 0.15)
	pt3dadd(-106.7, 92.86, -5.25, 0.15)
  }
  dend[133] {pt3dclear()
	pt3dadd(-100.1, 104, -5.75, 0.61)
	pt3dadd(-100.5, 104.8, -5.75, 0.61)
	pt3dadd(-101.4, 106, -5.75, 0.46)
	pt3dadd(-102, 107.2, -5.75, 0.41)
	pt3dadd(-102.5, 107.8, -5.75, 0.41)
	pt3dadd(-103.3, 109.1, -5.75, 0.41)
  }
  dend[134] {pt3dclear()
	pt3dadd(-103.3, 109.1, -5.75, 0.41)
	pt3dadd(-102.8, 109.9, -5.75, 0.26)
	pt3dadd(-103, 111, -5.75, 0.15)
	pt3dadd(-103.6, 111.6, -5.75, 0.15)
	pt3dadd(-104.6, 112.3, -5.75, 0.15)
	pt3dadd(-105.2, 112.9, -5.75, 0.15)
	pt3dadd(-106.3, 113.9, -5.75, 0.15)
  }
  dend[135] {pt3dclear()
	pt3dadd(-103.3, 109.1, -5.75, 0.41)
	pt3dadd(-104.1, 109.7, -5.75, 0.31)
	pt3dadd(-105.1, 110.5, -5.75, 0.31)
	pt3dadd(-106.2, 111.4, -5.75, 0.31)
	pt3dadd(-107, 112.2, -5.75, 0.31)
	pt3dadd(-108.2, 112.7, -5.75, 0.31)
	pt3dadd(-109.2, 114, -5.75, 0.31)
	pt3dadd(-109.8, 114.8, -5.75, 0.31)
	pt3dadd(-110.4, 115.6, -5.75, 0.31)
  }
  dend[136] {pt3dclear()
	pt3dadd(-110.4, 115.6, -5.75, 0.31)
	pt3dadd(-111.1, 116.8, -5.75, 0.31)
	pt3dadd(-112, 118, -5.75, 0.18)
	pt3dadd(-112.9, 119.3, -5.75, 0.15)
	pt3dadd(-113.6, 120.4, -5.75, 0.15)
	pt3dadd(-114.5, 121.2, -5.75, 0.15)
  }
  dend[137] {pt3dclear()
	pt3dadd(-110.4, 115.6, -5.75, 0.31)
	pt3dadd(-111.3, 115.6, -5.75, 0.31)
	pt3dadd(-111.9, 115.5, -5.75, 0.31)
  }
  dend[138] {pt3dclear()
	pt3dadd(-111.9, 115.5, -5.75, 0.31)
	pt3dadd(-112.7, 115.9, -5.75, 0.31)
	pt3dadd(-113.7, 116.1, -5.75, 0.31)
	pt3dadd(-114.7, 116.8, -5.5, 0.31)
	pt3dadd(-115.3, 117.3, -5.5, 0.31)
  }
  dend[139] {pt3dclear()
	pt3dadd(-111.9, 115.5, -5.75, 0.31)
	pt3dadd(-112.3, 114.8, -5.75, 0.31)
	pt3dadd(-112.8, 114.3, -5.75, 0.31)
	pt3dadd(-113.6, 113.7, -5.75, 0.31)
	pt3dadd(-114.2, 113.3, -5.75, 0.18)
	pt3dadd(-115.1, 113, -5.5, 0.18)
	pt3dadd(-116.3, 113.1, -5.5, 0.18)
	pt3dadd(-117, 113.9, -5.5, 0.18)
	pt3dadd(-117.3, 114.6, -5.5, 0.18)
	pt3dadd(-117.5, 115.3, -5.5, 0.18)
  }
  dend[140] {pt3dclear()
	pt3dadd(-89.17, 101.5, -6, 1.12)
	pt3dadd(-88.65, 102.2, -6, 0.51)
	pt3dadd(-88.24, 102.8, -6, 0.51)
  }
  dend[141] {pt3dclear()
	pt3dadd(-88.24, 102.8, -6, 0.51)
	pt3dadd(-87.99, 103.1, -6, 0.51)
	pt3dadd(-87.38, 104, -6, 0.51)
	pt3dadd(-86.91, 105.3, -6.25, 0.51)
	pt3dadd(-86.97, 106.5, -6.25, 0.51)
	pt3dadd(-86.81, 107, -6.25, 0.51)
	pt3dadd(-86.56, 107.9, -6.25, 0.51)
	pt3dadd(-86.1, 108.8, -6.5, 0.46)
	pt3dadd(-85.38, 110.3, -6.5, 0.46)
  }
  dend[142] {pt3dclear()
	pt3dadd(-85.38, 110.3, -6.5, 0.46)
	pt3dadd(-84.31, 111.7, -6.75, 0.46)
	pt3dadd(-83.18, 112.4, -6.75, 0.46)
	pt3dadd(-82.31, 113.4, -6.75, 0.46)
	pt3dadd(-82.41, 114.6, -6.75, 0.46)
	pt3dadd(-82.26, 115.2, -6.75, 0.46)
  }
  dend[143] {pt3dclear()
	pt3dadd(-82.26, 115.2, -6.75, 0.46)
	pt3dadd(-82.06, 115.8, -6.75, 0.46)
	pt3dadd(-81.7, 116.6, -6.75, 0.46)
  }
  dend[144] {pt3dclear()
	pt3dadd(-81.7, 116.6, -6.75, 0.46)
	pt3dadd(-81.34, 117.2, -7, 0.31)
	pt3dadd(-80.26, 118, -7, 0.26)
	pt3dadd(-79.45, 119, -7, 0.26)
  }
  dend[145] {pt3dclear()
	pt3dadd(-81.7, 116.6, -6.75, 0.46)
	pt3dadd(-81.95, 117.2, -6.75, 0.18)
	pt3dadd(-82.31, 117.7, -6.75, 0.18)
	pt3dadd(-82.52, 118.3, -6.75, 0.18)
	pt3dadd(-83.03, 119.1, -6.75, 0.18)
	pt3dadd(-83.18, 119.8, -6.75, 0.18)
	pt3dadd(-83.39, 120.1, -6.75, 0.18)
	pt3dadd(-83.74, 121.2, -6.75, 0.18)
	pt3dadd(-83.85, 121.8, -6.75, 0.18)
	pt3dadd(-84, 122.5, -6.75, 0.18)
	pt3dadd(-83.59, 123.5, -6.75, 0.18)
  }
  dend[146] {pt3dclear()
	pt3dadd(-82.26, 115.2, -6.75, 0.46)
	pt3dadd(-81.48, 114.8, -6.75, 0.41)
	pt3dadd(-80.56, 115, -6.75, 0.41)
	pt3dadd(-79.95, 114.8, -6.75, 0.41)
	pt3dadd(-79.19, 114, -6.75, 0.36)
	pt3dadd(-78.53, 113.2, -6.75, 0.36)
	pt3dadd(-77.91, 112.7, -6.75, 0.36)
	pt3dadd(-77.14, 112.2, -6.75, 0.36)
	pt3dadd(-76.68, 111.3, -6.75, 0.36)
	pt3dadd(-75.76, 110.7, -6.75, 0.36)
	pt3dadd(-74.64, 110, -6.5, 0.36)
	pt3dadd(-73.26, 109.4, -6.5, 0.36)
	pt3dadd(-72.28, 109.2, -6.5, 0.36)
	pt3dadd(-71.11, 109.4, -6.5, 0.36)
	pt3dadd(-70.34, 109.6, -6.5, 0.36)
  }
  dend[147] {pt3dclear()
	pt3dadd(-85.38, 110.3, -6.5, 0.46)
	pt3dadd(-85.38, 111.6, -6.75, 0.51)
	pt3dadd(-85.53, 113.1, -6.75, 0.36)
	pt3dadd(-85.58, 114.3, -6.75, 0.36)
	pt3dadd(-85.79, 115.6, -6.75, 0.36)
  }
}
proc shape3d_6() {
  dend[147] {	pt3dadd(-86.3, 116.9, -6.75, 0.36)
	pt3dadd(-86.76, 118.3, -7, 0.36)
	pt3dadd(-87.12, 119.5, -7, 0.36)
	pt3dadd(-86.45, 120.4, -7, 0.36)
	pt3dadd(-85.64, 120.6, -7, 0.36)
  }
  dend[148] {pt3dclear()
	pt3dadd(-88.24, 102.8, -6, 0.51)
	pt3dadd(-88.71, 103.2, -6, 0.31)
	pt3dadd(-89.11, 103.9, -6, 0.31)
	pt3dadd(-89.73, 104.9, -6, 0.31)
	pt3dadd(-90.04, 105.8, -6, 0.31)
	pt3dadd(-90.14, 106.8, -6, 0.31)
	pt3dadd(-89.73, 108.3, -6, 0.31)
	pt3dadd(-89.73, 109.5, -6.25, 0.26)
  }
  dend[149] {pt3dclear()
	pt3dadd(-82.63, 93.9, -6, 1.25)
	pt3dadd(-82.77, 91.17, -6, 0.82)
	pt3dadd(-83.74, 91.33, -6, 0.51)
	pt3dadd(-84.51, 91.48, -6, 0.36)
	pt3dadd(-85.79, 91.99, -6, 0.36)
	pt3dadd(-87.17, 92.71, -6, 0.36)
	pt3dadd(-88.14, 93.63, -6, 0.36)
	pt3dadd(-89.73, 94.65, -6, 0.36)
	pt3dadd(-90.44, 95.52, -6, 0.36)
	pt3dadd(-91.16, 96.34, -6, 0.36)
  }
  dend[150] {pt3dclear()
	pt3dadd(-91.16, 96.34, -6, 0.36)
	pt3dadd(-91.11, 97.21, -6, 0.36)
	pt3dadd(-91.31, 97.77, -6, 0.36)
	pt3dadd(-91.16, 98.79, -6, 0.36)
  }
  dend[151] {pt3dclear()
	pt3dadd(-91.16, 96.34, -6, 0.36)
	pt3dadd(-92.18, 96.6, -6, 0.36)
	pt3dadd(-93.31, 97, -6, 0.36)
	pt3dadd(-94.23, 97.41, -6, 0.36)
	pt3dadd(-95.41, 98.49, -6, 0.36)
  }
  dend[152] {pt3dclear()
	pt3dadd(-95.41, 98.49, -6, 0.36)
	pt3dadd(-95.53, 99.2, -6, 0.36)
  }
  dend[153] {pt3dclear()
	pt3dadd(-95.53, 99.2, -6, 0.36)
	pt3dadd(-95.61, 99.66, -6, 0.36)
	pt3dadd(-96.43, 100.6, -6, 0.36)
	pt3dadd(-97.76, 101.5, -6, 0.36)
	pt3dadd(-99.09, 102, -6.25, 0.18)
	pt3dadd(-100.7, 103, -6.25, 0.18)
	pt3dadd(-101.4, 103.6, -6.5, 0.18)
  }
  dend[154] {pt3dclear()
	pt3dadd(-95.53, 99.2, -6, 0.36)
	pt3dadd(-96.22, 98.49, -6, 0.36)
	pt3dadd(-97.25, 98.59, -6.25, 0.36)
	pt3dadd(-98.32, 98.79, -6.25, 0.36)
	pt3dadd(-99.29, 98.79, -6.5, 0.36)
	pt3dadd(-100.7, 99.26, -6.5, 0.36)
	pt3dadd(-102, 99.87, -6.25, 0.36)
	pt3dadd(-103.3, 100.1, -6.25, 0.36)
	pt3dadd(-104.2, 100.6, -6.25, 0.36)
	pt3dadd(-105.7, 100.6, -6.25, 0.36)
	pt3dadd(-107.5, 100.6, -6.25, 0.36)
  }
  dend[155] {pt3dclear()
	pt3dadd(-95.41, 98.49, -6, 0.36)
	pt3dadd(-95.51, 97.67, -6, 0.36)
	pt3dadd(-95.51, 96.7, -6.25, 0.36)
	pt3dadd(-95.61, 95.42, -6.5, 0.36)
	pt3dadd(-95.51, 94.6, -6.5, 0.36)
	pt3dadd(-95.05, 93.53, -6.25, 0.36)
	pt3dadd(-94.79, 92.61, -6.25, 0.36)
	pt3dadd(-94.74, 91.68, -6.25, 0.36)
	pt3dadd(-94.49, 90.15, -6.25, 0.36)
  }
  dend[156] {pt3dclear()
	pt3dadd(-94.49, 90.15, -6.25, 0.36)
	pt3dadd(-95.36, 89.59, -6.25, 0.36)
	pt3dadd(-95.71, 88.92, -6.25, 0.36)
	pt3dadd(-96.17, 88, -6.25, 0.36)
	pt3dadd(-95.82, 86.82, -6, 0.36)
	pt3dadd(-95.56, 86.06, -6, 0.36)
	pt3dadd(-94.79, 84.68, -6, 0.36)
	pt3dadd(-94.49, 84.16, -6, 0.36)
  }
  dend[157] {pt3dclear()
	pt3dadd(-94.49, 84.16, -6, 0.36)
	pt3dadd(-95.25, 83.81, -6, 0.36)
	pt3dadd(-95.82, 83.14, -6, 0.36)
	pt3dadd(-96.99, 82.73, -5.75, 0.36)
	pt3dadd(-97.55, 83.4, -5.75, 0.36)
  }
  dend[158] {pt3dclear()
	pt3dadd(-94.49, 84.16, -6, 0.36)
	pt3dadd(-93.51, 83.65, -6, 0.36)
	pt3dadd(-92.9, 83.04, -6, 0.36)
	pt3dadd(-92.34, 82.32, -6, 0.36)
	pt3dadd(-91.37, 81.25, -6, 0.36)
	pt3dadd(-90.9, 80.69, -6, 0.36)
	pt3dadd(-90.34, 79.77, -6.25, 0.36)
	pt3dadd(-89.88, 79.15, -6.25, 0.36)
	pt3dadd(-89.37, 78.33, -6.25, 0.36)
	pt3dadd(-89.01, 77.31, -6.25, 0.36)
	pt3dadd(-88.91, 76.34, -6, 0.36)
	pt3dadd(-88.24, 75.52, -6, 0.36)
	pt3dadd(-87.99, 75.06, -6, 0.36)
  }
  dend[159] {pt3dclear()
	pt3dadd(-94.49, 90.15, -6.25, 0.36)
	pt3dadd(-93.72, 89.79, -6.25, 0.36)
	pt3dadd(-92.64, 89.54, -6.25, 0.36)
	pt3dadd(-91.67, 88.87, -6.25, 0.36)
	pt3dadd(-90.8, 88.36, -6.25, 0.36)
  }
  dend[160] {pt3dclear()
	pt3dadd(-90.8, 88.36, -6.25, 0.36)
	pt3dadd(-90.96, 87.69, -6.25, 0.36)
	pt3dadd(-91.42, 87.08, -6.25, 0.36)
	pt3dadd(-91.06, 86.16, -6.25, 0.36)
	pt3dadd(-90.5, 85.75, -6.25, 0.36)
	pt3dadd(-89.83, 84.63, -6.25, 0.36)
	pt3dadd(-88.96, 83.76, -6.25, 0.36)
	pt3dadd(-88.09, 83.3, -6.25, 0.36)
	pt3dadd(-86.97, 82.48, -6.25, 0.36)
  }
  dend[161] {pt3dclear()
	pt3dadd(-90.8, 88.36, -6.25, 0.36)
	pt3dadd(-89.93, 88.31, -6, 0.36)
	pt3dadd(-89.11, 88.26, -6, 0.36)
	pt3dadd(-88.19, 88.26, -6, 0.36)
	pt3dadd(-87.53, 88.21, -6, 0.36)
	pt3dadd(-86.91, 87.9, -6, 0.36)
	pt3dadd(-85.69, 87.75, -6, 0.36)
	pt3dadd(-84.82, 87.44, -6, 0.36)
	pt3dadd(-84.05, 87.13, -6, 0.15)
	pt3dadd(-83.64, 86.67, -6, 0.15)
	pt3dadd(-82.98, 86.21, -6, 0.15)
	pt3dadd(-82.31, 85.9, -6, 0.15)
	pt3dadd(-81.59, 85.7, -6, 0.15)
	pt3dadd(-81.13, 85.03, -6, 0.15)
  }
  dend[162] {pt3dclear()
	pt3dadd(-81.59, 91.63, -6, 1.25)
	pt3dadd(-81.27, 92.77, -6, 0.44)
	pt3dadd(-81.02, 93.58, -6, 0.44)
	pt3dadd(-80.64, 94.39, -6, 0.44)
	pt3dadd(-80.58, 95.51, -6, 0.44)
	pt3dadd(-81.02, 96.95, -6, 0.44)
	pt3dadd(-81.14, 97.51, -6, 0.44)
	pt3dadd(-81.27, 98.5, -6, 0.44)
	pt3dadd(-81.14, 99.19, -6, 0.44)
	pt3dadd(-81.02, 99.81, -6, 0.44)
	pt3dadd(-80.95, 100.2, -6, 0.44)
	pt3dadd(-80.45, 101.1, -6.25, 0.44)
  }
  dend[163] {pt3dclear()
	pt3dadd(-80.45, 101.1, -6.25, 0.44)
	pt3dadd(-79.73, 101.2, -6.37, 0.37)
  }
  dend[164] {pt3dclear()
	pt3dadd(-79.73, 101.2, -6.37, 0.37)
	pt3dadd(-78.95, 101.3, -6.5, 0.37)
	pt3dadd(-77.59, 101.5, -6.5, 0.37)
	pt3dadd(-76.95, 101.8, -6.5, 0.37)
	pt3dadd(-76.09, 102.3, -6.5, 0.37)
	pt3dadd(-75.47, 103, -6.5, 0.37)
	pt3dadd(-74.97, 104.2, -6.75, 0.37)
	pt3dadd(-74.72, 105.1, -6.75, 0.37)
	pt3dadd(-75.03, 105.7, -6.75, 0.37)
  }
  dend[165] {pt3dclear()
	pt3dadd(-79.73, 101.2, -6.37, 0.37)
	pt3dadd(-80.39, 102.2, -6.5, 0.37)
	pt3dadd(-80.14, 103, -6.5, 0.37)
	pt3dadd(-79.95, 103.8, -6.5, 0.37)
	pt3dadd(-80.02, 105.6, -6.75, 0.37)
	pt3dadd(-80.52, 106.1, -6.75, 0.37)
	pt3dadd(-80.95, 106.6, -6.75, 0.37)
	pt3dadd(-81.45, 107.5, -6.75, 0.37)
	pt3dadd(-81.52, 108.2, -6.75, 0.37)
	pt3dadd(-81.27, 108.8, -6.75, 0.37)
	pt3dadd(-80.77, 109.8, -6.75, 0.37)
  }
  dend[166] {pt3dclear()
	pt3dadd(-80.45, 101.1, -6.25, 0.44)
	pt3dadd(-81.39, 101.8, -6.25, 0.25)
	pt3dadd(-82.26, 102.2, -6.25, 0.25)
	pt3dadd(-82.95, 102.9, -6.25, 0.25)
	pt3dadd(-84.13, 103.3, -6.25, 0.25)
	pt3dadd(-84.69, 104, -6.25, 0.25)
	pt3dadd(-84.51, 105.3, -6.25, 0.25)
	pt3dadd(-84.26, 106.4, -6.25, 0.25)
	pt3dadd(-84.01, 107.5, -6.25, 0.25)
	pt3dadd(-83.76, 108.1, -6.25, 0.25)
	pt3dadd(-83.32, 109, -6.25, 0.25)
	pt3dadd(-82.89, 110, -6.25, 0.25)
	pt3dadd(-82.08, 111.3, -6.25, 0.25)
  }
  dend[167] {pt3dclear()
	pt3dadd(-68.5, 76.7, -6.25, 1.5)
	pt3dadd(-68.8, 77.93, -6.25, 0.44)
	pt3dadd(-69.11, 78.73, -6.25, 0.31)
	pt3dadd(-69.61, 79.48, -6.25, 0.31)
	pt3dadd(-70.17, 79.98, -6.25, 0.31)
	pt3dadd(-70.73, 80.23, -6.25, 0.31)
	pt3dadd(-71.34, 80.98, -6.25, 0.44)
	pt3dadd(-71.54, 82.05, -6.25, 0.56)
	pt3dadd(-71.66, 82.98, -6.25, 0.56)
	pt3dadd(-71.91, 84.04, -6.5, 0.56)
	pt3dadd(-72.16, 85.1, -6.5, 0.56)
	pt3dadd(-72.23, 85.97, -6.5, 0.56)
	pt3dadd(-72.41, 87.22, -6.5, 0.56)
	pt3dadd(-72.66, 88.03, -6.5, 0.56)
	pt3dadd(-72.91, 88.59, -6.5, 0.56)
	pt3dadd(-73.41, 89.28, -6.25, 0.56)
	pt3dadd(-73.78, 89.9, -6.25, 0.56)
	pt3dadd(-74.59, 90.15, -6.25, 0.5)
	pt3dadd(-75.59, 90.9, -6, 0.5)
	pt3dadd(-76.09, 91.9, -6, 0.5)
	pt3dadd(-76.15, 92.33, -6, 0.5)
  }
  dend[168] {pt3dclear()
	pt3dadd(-57.96, 69.84, -6.5, 1.75)
	pt3dadd(-59.19, 68.92, -6.5, 0.46)
	pt3dadd(-59.85, 68.77, -6.25, 0.31)
	pt3dadd(-60.78, 68.97, -6.25, 0.36)
	pt3dadd(-61.8, 69.48, -6.25, 0.36)
	pt3dadd(-63.13, 70.15, -6.25, 0.56)
	pt3dadd(-64.41, 71.02, -6.25, 0.56)
	pt3dadd(-65.43, 71.53, -6.25, 0.56)
	pt3dadd(-66.91, 72.34, -6.25, 0.56)
	pt3dadd(-67.53, 72.66, -6.25, 0.56)
	pt3dadd(-68.34, 73.58, -6.25, 0.61)
	pt3dadd(-69.47, 73.68, -6.25, 0.51)
	pt3dadd(-70.55, 73.98, -6.25, 0.51)
	pt3dadd(-71.77, 74.8, -6.25, 0.51)
	pt3dadd(-73.2, 75.93, -6.25, 0.51)
	pt3dadd(-74.02, 76.65, -6.25, 0.51)
	pt3dadd(-75.25, 77.51, -6.25, 0.51)
  }
}
proc shape3d_7() {
  dend[168] {	pt3dadd(-76.53, 78.9, -6.25, 0.51)
  }
  dend[169] {pt3dclear()
	pt3dadd(-51.76, 61.4, -6.75, 2.74)
	pt3dadd(-53.03, 61.09, -6.75, 1.28)
	pt3dadd(-54.15, 60.94, -6.75, 0.77)
	pt3dadd(-55.07, 60.99, -6.75, 0.56)
	pt3dadd(-56.04, 61.2, -6.75, 0.56)
	pt3dadd(-57.27, 61.66, -6.5, 0.46)
	pt3dadd(-58.55, 62.07, -6.5, 0.46)
	pt3dadd(-59.73, 62.17, -6.5, 0.46)
	pt3dadd(-60.9, 62.42, -6.5, 0.46)
	pt3dadd(-62.74, 62.99, -6.5, 0.46)
	pt3dadd(-64.48, 63.14, -6.5, 0.46)
	pt3dadd(-65.92, 63.5, -6.5, 0.46)
	pt3dadd(-67.19, 63.81, -6.5, 0.46)
	pt3dadd(-68.31, 64.83, -6.5, 0.46)
	pt3dadd(-69.5, 65.95, -6.5, 0.46)
	pt3dadd(-70.44, 66.41, -6.5, 0.46)
  }
  dend[170] {pt3dclear()
	pt3dadd(-70.44, 66.41, -6.5, 0.46)
	pt3dadd(-70.83, 66.41, -6.5, 0.67)
	pt3dadd(-72.03, 66.67, -6.5, 0.67)
  }
  dend[171] {pt3dclear()
	pt3dadd(-72.03, 66.67, -6.5, 0.67)
	pt3dadd(-73.08, 66.11, -6.5, 0.67)
	pt3dadd(-74.31, 65.84, -6.5, 0.67)
	pt3dadd(-75.33, 65.54, -6.5, 0.67)
	pt3dadd(-76.33, 65.08, -6.5, 0.67)
  }
  dend[172] {pt3dclear()
	pt3dadd(-76.33, 65.08, -6.5, 0.67)
	pt3dadd(-76.81, 64.27, -6.25, 0.67)
	pt3dadd(-77.06, 62.83, -6.25, 0.67)
	pt3dadd(-77.12, 61.91, -6.25, 0.67)
	pt3dadd(-77.31, 60.74, -6.25, 0.67)
	pt3dadd(-77.98, 59.87, -6.25, 0.67)
	pt3dadd(-78.34, 59.25, -6.25, 0.67)
  }
  dend[173] {pt3dclear()
	pt3dadd(-78.34, 59.25, -6.25, 0.67)
	pt3dadd(-77.86, 58.54, -6.25, 0.67)
	pt3dadd(-77.2, 57.62, -6.25, 0.46)
	pt3dadd(-76.84, 56.9, -6.25, 0.46)
	pt3dadd(-76.58, 55.93, -6.25, 0.46)
	pt3dadd(-76.06, 55.36, -6.25, 0.46)
	pt3dadd(-75.92, 54.5, -6, 0.46)
	pt3dadd(-75.41, 53.73, -6, 0.46)
	pt3dadd(-75.25, 52.81, -6, 0.46)
	pt3dadd(-75.25, 52.09, -6, 0.46)
	pt3dadd(-75.3, 51.02, -6, 0.46)
  }
  dend[174] {pt3dclear()
	pt3dadd(-75.3, 51.02, -6, 0.46)
	pt3dadd(-74.48, 50.2, -6, 0.46)
	pt3dadd(-73.87, 49.53, -6, 0.46)
	pt3dadd(-73.36, 48.87, -6, 0.46)
	pt3dadd(-72.8, 47.85, -6, 0.46)
	pt3dadd(-72.39, 46.57, -5.75, 0.46)
	pt3dadd(-72.18, 45.59, -5.75, 0.46)
	pt3dadd(-71.56, 44.52, -5.75, 0.46)
	pt3dadd(-70.95, 43.39, -5.75, 0.46)
	pt3dadd(-70.55, 42.73, -6, 0.46)
  }
  dend[175] {pt3dclear()
	pt3dadd(-70.55, 42.73, -6, 0.46)
	pt3dadd(-70.55, 41.91, -6, 0.46)
	pt3dadd(-70.55, 40.99, -6, 0.46)
	pt3dadd(-70.39, 40.22, -6, 0.46)
  }
  dend[176] {pt3dclear()
	pt3dadd(-70.55, 42.73, -6, 0.46)
	pt3dadd(-69.73, 42.47, -6, 0.18)
	pt3dadd(-69.22, 42.17, -6, 0.26)
	pt3dadd(-68.7, 41.76, -6, 0.26)
	pt3dadd(-67.94, 40.94, -6, 0.26)
  }
  dend[177] {pt3dclear()
	pt3dadd(-75.3, 51.02, -6, 0.46)
	pt3dadd(-76.12, 50.61, -6, 0.46)
	pt3dadd(-77.2, 50.1, -6, 0.46)
	pt3dadd(-78.01, 49.28, -6, 0.46)
	pt3dadd(-78.31, 48.56, -6.25, 0.46)
	pt3dadd(-78.42, 48, -6.25, 0.46)
	pt3dadd(-78.47, 47.33, -6.25, 0.46)
	pt3dadd(-78.42, 46.36, -6.25, 0.46)
	pt3dadd(-78.47, 45.49, -6, 0.46)
	pt3dadd(-78.63, 44.52, -6, 0.46)
	pt3dadd(-79.09, 43.75, -6, 0.46)
  }
  dend[178] {pt3dclear()
	pt3dadd(-78.34, 59.25, -6.25, 0.67)
	pt3dadd(-79.23, 58.79, -6.25, 0.56)
	pt3dadd(-80.56, 58.43, -6.25, 0.56)
  }
  dend[179] {pt3dclear()
	pt3dadd(-80.56, 58.43, -6.25, 0.56)
	pt3dadd(-80.42, 57.41, -6, 0.56)
	pt3dadd(-80.56, 56.18, -6, 0.56)
	pt3dadd(-80.67, 55.16, -6, 0.56)
	pt3dadd(-80.98, 54.14, -6, 0.56)
	pt3dadd(-81.75, 53.27, -6, 0.46)
	pt3dadd(-82.21, 52.81, -6, 0.46)
	pt3dadd(-82.82, 52.19, -5.75, 0.46)
	pt3dadd(-83.23, 51.17, -5.75, 0.46)
	pt3dadd(-84.05, 50.66, -5.75, 0.46)
	pt3dadd(-84.61, 49.89, -5.75, 0.46)
	pt3dadd(-85.18, 48.92, -5.75, 0.46)
	pt3dadd(-85.94, 48.56, -5.75, 0.46)
	pt3dadd(-86.56, 48.31, -5.75, 0.46)
	pt3dadd(-87.43, 47.95, -5.75, 0.36)
	pt3dadd(-88.24, 47.38, -5.75, 0.36)
	pt3dadd(-88.81, 47.08, -5.75, 0.36)
  }
  dend[180] {pt3dclear()
	pt3dadd(-80.56, 58.43, -6.25, 0.56)
	pt3dadd(-81.19, 58.69, -6.25, 0.36)
	pt3dadd(-82.31, 59, -6.25, 0.36)
	pt3dadd(-83.03, 59.25, -6.25, 0.36)
	pt3dadd(-84.05, 59.41, -6.25, 0.36)
	pt3dadd(-84.51, 59.92, -6.25, 0.36)
  }
  dend[181] {pt3dclear()
	pt3dadd(-84.51, 59.92, -6.25, 0.36)
	pt3dadd(-85.02, 59.61, -6, 0.36)
	pt3dadd(-85.64, 59.15, -6, 0.36)
	pt3dadd(-86.15, 58.95, -6, 0.36)
	pt3dadd(-86.81, 58.13, -6, 0.36)
	pt3dadd(-87.22, 57.41, -6, 0.36)
	pt3dadd(-87.89, 56.44, -6, 0.36)
	pt3dadd(-88.6, 55.52, -5.75, 0.36)
	pt3dadd(-89.42, 54.7, -5.75, 0.36)
	pt3dadd(-90.24, 54.29, -5.75, 0.36)
	pt3dadd(-91.31, 53.98, -5.5, 0.36)
	pt3dadd(-92.8, 53.98, -5.5, 0.36)
	pt3dadd(-94.08, 54.29, -5.5, 0.36)
	pt3dadd(-95.1, 55.16, -5.5, 0.36)
	pt3dadd(-95.97, 55.77, -5.5, 0.36)
	pt3dadd(-96.58, 56.44, -5.5, 0.36)
	pt3dadd(-96.99, 57.16, -5.5, 0.36)
  }
  dend[182] {pt3dclear()
	pt3dadd(-84.51, 59.92, -6.25, 0.36)
	pt3dadd(-85.23, 60.38, -6, 0.41)
	pt3dadd(-86.35, 61.09, -6, 0.41)
	pt3dadd(-87.58, 61.66, -6, 0.41)
	pt3dadd(-89.01, 62.22, -6, 0.41)
	pt3dadd(-90.19, 62.58, -6, 0.41)
  }
  dend[183] {pt3dclear()
	pt3dadd(-90.19, 62.58, -6, 0.41)
	pt3dadd(-90.29, 61.5, -6, 0.41)
	pt3dadd(-90.34, 60.53, -6, 0.41)
	pt3dadd(-90.55, 59.66, -6, 0.41)
  }
  dend[184] {pt3dclear()
	pt3dadd(-90.19, 62.58, -6, 0.41)
	pt3dadd(-90.9, 62.99, -6, 0.41)
	pt3dadd(-92.03, 63.29, -6, 0.41)
	pt3dadd(-93.67, 63.7, -6, 0.41)
	pt3dadd(-95.05, 63.91, -6, 0.41)
	pt3dadd(-95.87, 64.52, -6, 0.41)
	pt3dadd(-96.99, 65.23, -6, 0.41)
	pt3dadd(-97.35, 65.8, -6, 0.41)
	pt3dadd(-98.17, 66.41, -6, 0.41)
  }
  dend[185] {pt3dclear()
	pt3dadd(-76.33, 65.08, -6.5, 0.67)
	pt3dadd(-77.2, 65.23, -6.25, 0.56)
	pt3dadd(-78.01, 65.75, -6.25, 0.56)
	pt3dadd(-78.93, 65.95, -6.25, 0.56)
	pt3dadd(-79.91, 66.2, -6.25, 0.56)
	pt3dadd(-82, 66.87, -6.25, 0.56)
  }
  dend[186] {pt3dclear()
	pt3dadd(-82, 66.87, -6.25, 0.56)
	pt3dadd(-82.36, 67.59, -6.25, 0.36)
	pt3dadd(-82.77, 68.2, -6.25, 0.36)
	pt3dadd(-83.28, 68.61, -6.25, 0.36)
  }
  dend[187] {pt3dclear()
	pt3dadd(-82, 66.87, -6.25, 0.56)
	pt3dadd(-82.77, 66.52, -6.25, 0.36)
	pt3dadd(-84.05, 66.11, -6.25, 0.36)
	pt3dadd(-85.18, 66.16, -6.25, 0.36)
  }
  dend[188] {pt3dclear()
	pt3dadd(-85.18, 66.16, -6.25, 0.36)
	pt3dadd(-85.23, 65.44, -6.25, 0.36)
	pt3dadd(-85.33, 64.88, -6.25, 0.36)
	pt3dadd(-85.69, 64.42, -6.25, 0.36)
	pt3dadd(-86.2, 63.65, -6.25, 0.36)
	pt3dadd(-85.28, 63.24, -6.25, 0.36)
	pt3dadd(-84, 63.14, -6.25, 0.36)
	pt3dadd(-83.18, 62.88, -6.25, 0.36)
  }
  dend[189] {pt3dclear()
	pt3dadd(-85.18, 66.16, -6.25, 0.36)
	pt3dadd(-86.1, 66.31, -6.25, 0.36)
	pt3dadd(-87.43, 66.41, -6.25, 0.36)
	pt3dadd(-88.76, 66.56, -6.25, 0.36)
  }
  dend[190] {pt3dclear()
	pt3dadd(-88.76, 66.56, -6.25, 0.36)
	pt3dadd(-89.22, 67.39, -6, 0.36)
	pt3dadd(-90.19, 68.26, -6, 0.36)
	pt3dadd(-91.01, 69.02, -6, 0.36)
	pt3dadd(-91.47, 69.94, -6, 0.36)
	pt3dadd(-91.98, 70.81, -6, 0.36)
	pt3dadd(-92.13, 71.58, -6, 0.36)
  }
  dend[191] {pt3dclear()
	pt3dadd(-88.76, 66.56, -6.25, 0.36)
	pt3dadd(-89.63, 66.31, -6, 0.36)
	pt3dadd(-90.55, 66.06, -6, 0.36)
	pt3dadd(-91.88, 66.26, -6, 0.36)
	pt3dadd(-92.59, 66.47, -5.75, 0.36)
	pt3dadd(-93.26, 67.08, -5.75, 0.36)
	pt3dadd(-93.41, 67.9, -5.75, 0.36)
	pt3dadd(-93.62, 68.09, -5.75, 0.36)
  }
  dend[192] {pt3dclear()
	pt3dadd(-72.03, 66.67, -6.5, 0.67)
	pt3dadd(-72.48, 67.23, -6.25, 0.36)
	pt3dadd(-73.2, 67.54, -6.25, 0.36)
	pt3dadd(-74.18, 68.26, -6.25, 0.36)
	pt3dadd(-75.25, 68.61, -6.25, 0.36)
	pt3dadd(-76.33, 69.28, -6.25, 0.36)
	pt3dadd(-77.34, 69.64, -6.25, 0.36)
	pt3dadd(-78.37, 70.3, -6.25, 0.36)
	pt3dadd(-79.55, 70.66, -6.25, 0.36)
	pt3dadd(-81.08, 71.27, -6, 0.36)
	pt3dadd(-82.62, 71.48, -6, 0.36)
	pt3dadd(-84, 71.84, -6, 0.36)
	pt3dadd(-84.66, 72.4, -6, 0.36)
	pt3dadd(-85.74, 73.27, -6, 0.36)
	pt3dadd(-86.25, 73.52, -6, 0.36)
  }
  dend[193] {pt3dclear()
	pt3dadd(-70.44, 66.41, -6.5, 0.46)
	pt3dadd(-70.75, 67.23, -6.5, 0.51)
	pt3dadd(-70.7, 67.95, -6.25, 0.41)
  }
  dend[194] {pt3dclear()
	pt3dadd(-70.7, 67.95, -6.25, 0.41)
	pt3dadd(-71.31, 68.2, -6.25, 0.26)
	pt3dadd(-72.18, 68.87, -6.25, 0.26)
	pt3dadd(-73.05, 69.59, -6.25, 0.26)
	pt3dadd(-73.92, 70.3, -6.25, 0.26)
	pt3dadd(-75, 71.33, -6.25, 0.26)
  }
}
proc shape3d_8() {
  dend[194] {	pt3dadd(-75.92, 72.04, -6.25, 0.26)
	pt3dadd(-76.73, 72.59, -6, 0.26)
	pt3dadd(-77.66, 72.86, -6, 0.26)
	pt3dadd(-78.83, 73.12, -6, 0.26)
  }
  dend[195] {pt3dclear()
	pt3dadd(-70.7, 67.95, -6.25, 0.41)
	pt3dadd(-70.59, 69.02, -6.25, 0.26)
	pt3dadd(-70.95, 70.05, -6.25, 0.26)
	pt3dadd(-71.11, 70.92, -6.25, 0.26)
  }
  dend[196] {pt3dclear()
	pt3dadd(-71.11, 70.92, -6.25, 0.26)
	pt3dadd(-70.29, 71.12, -6.25, 0.26)
	pt3dadd(-69.37, 71.06, -6.25, 0.26)
	pt3dadd(-68.65, 70.56, -6.25, 0.26)
	pt3dadd(-68.4, 69.98, -6.25, 0.26)
	pt3dadd(-68.29, 69.18, -6.25, 0.31)
	pt3dadd(-67.83, 68.45, -6.25, 0.36)
	pt3dadd(-67.02, 68.09, -6.25, 0.36)
	pt3dadd(-65.79, 67.8, -6.25, 0.36)
	pt3dadd(-65.23, 67.44, -6.25, 0.36)
	pt3dadd(-64.2, 67.03, -6.25, 0.36)
	pt3dadd(-63.33, 66.98, -6.25, 0.36)
	pt3dadd(-62.41, 67.13, -6.25, 0.36)
	pt3dadd(-61.7, 67.18, -6.25, 0.36)
	pt3dadd(-61.03, 67.03, -6.5, 0.36)
	pt3dadd(-60.06, 67.03, -6.5, 0.36)
	pt3dadd(-59.55, 66.98, -6.5, 0.36)
  }
  dend[197] {pt3dclear()
	pt3dadd(-71.11, 70.92, -6.25, 0.26)
	pt3dadd(-71.72, 71.27, -6.25, 0.36)
	pt3dadd(-72.59, 72.14, -6.25, 0.36)
	pt3dadd(-73.56, 73.06, -6.25, 0.36)
	pt3dadd(-74.94, 73.78, -6.25, 0.36)
	pt3dadd(-76.22, 74.45, -6.25, 0.36)
	pt3dadd(-77.4, 74.84, -6.25, 0.36)
	pt3dadd(-78.53, 75.52, -6.25, 0.36)
	pt3dadd(-79.45, 76.13, -6.25, 0.18)
	pt3dadd(-80.11, 76.9, -6.25, 0.26)
	pt3dadd(-80.83, 78.08, -6.25, 0.36)
	pt3dadd(-80.67, 78.69, -6.25, 0.36)
	pt3dadd(-79.75, 79.61, -6.25, 0.36)
	pt3dadd(-79.5, 80.17, -6.25, 0.36)
	pt3dadd(-79.34, 80.94, -6.25, 0.36)
  }
  dend[198] {pt3dclear()
	pt3dadd(-46.8, 57.97, -6.75, 2.62)
	pt3dadd(-45.67, 59.48, -6.75, 2.37)
	pt3dadd(-44.86, 60.47, -6.75, 1.87)
	pt3dadd(-44.5, 61.09, -6.75, 1.87)
  }
  dend[199] {pt3dclear()
	pt3dadd(-44.5, 61.09, -6.75, 1.87)
	pt3dadd(-44.05, 61.53, -6.75, 1.81)
	pt3dadd(-43.17, 62.28, -6.75, 1.81)
	pt3dadd(-43.11, 62.58, -6.75, 1.81)
  }
  dend[200] {pt3dclear()
	pt3dadd(-43.11, 62.58, -6.75, 1.81)
	pt3dadd(-43.17, 63.47, -6.75, 1.31)
	pt3dadd(-43.05, 64.45, -6.75, 1.31)
	pt3dadd(-42.86, 65.19, -6.75, 1.31)
  }
  dend[201] {pt3dclear()
	pt3dadd(-42.86, 65.19, -6.75, 1.31)
	pt3dadd(-42.74, 65.52, -6.75, 1.31)
	pt3dadd(-43.36, 66.27, -6.75, 1.06)
	pt3dadd(-43.92, 67.08, -6.75, 1.06)
	pt3dadd(-44.67, 68.27, -6.75, 1)
	pt3dadd(-45.11, 69.14, -6.75, 1)
	pt3dadd(-45.73, 69.7, -6.75, 1)
	pt3dadd(-46.54, 71.2, -6.75, 1)
	pt3dadd(-47.41, 72.26, -6.75, 1)
	pt3dadd(-48.1, 73.5, -6.5, 1)
	pt3dadd(-48.85, 74.19, -6.5, 1)
	pt3dadd(-49.66, 75.12, -6.5, 1)
	pt3dadd(-50.47, 76.06, -6.5, 1)
	pt3dadd(-51.15, 77.18, -6.5, 1)
	pt3dadd(-51.84, 78.18, -6.5, 1)
	pt3dadd(-52.26, 78.75, -6.5, 1)
  }
  dend[202] {pt3dclear()
	pt3dadd(-52.26, 78.75, -6.5, 1)
	pt3dadd(-52.65, 79.11, -6.5, 1)
	pt3dadd(-53.52, 80.17, -6.5, 1)
	pt3dadd(-54.27, 81.42, -6.5, 1)
	pt3dadd(-54.96, 82.11, -6.5, 1)
	pt3dadd(-55.48, 83.02, -6.5, 1)
  }
  dend[203] {pt3dclear()
	pt3dadd(-55.48, 83.02, -6.5, 1)
	pt3dadd(-56.2, 83.85, -6.5, 1)
	pt3dadd(-56.76, 84.54, -6.5, 0.69)
	pt3dadd(-57.91, 84.88, -6.5, 0.69)
  }
  dend[204] {pt3dclear()
	pt3dadd(-57.91, 84.88, -6.5, 0.69)
	pt3dadd(-58.63, 85.54, -6.5, 1)
	pt3dadd(-59.55, 86.72, -6.5, 1)
  }
  dend[205] {pt3dclear()
	pt3dadd(-59.55, 86.72, -6.5, 1)
	pt3dadd(-59.01, 88.09, -6.5, 1)
	pt3dadd(-58.78, 89.95, -6.5, 1)
  }
  dend[206] {pt3dclear()
	pt3dadd(-58.78, 89.95, -6.5, 1)
	pt3dadd(-59.32, 90.77, -6.5, 0.81)
	pt3dadd(-59.69, 91.65, -6.5, 0.81)
	pt3dadd(-60.26, 92.33, -6.5, 0.75)
	pt3dadd(-61, 93.33, -6.5, 0.62)
	pt3dadd(-61.32, 94.2, -6.5, 0.62)
	pt3dadd(-61.88, 95.01, -6.5, 0.62)
	pt3dadd(-62.62, 96.2, -6.5, 0.62)
	pt3dadd(-62.62, 96.6, -6.5, 0.62)
  }
  dend[207] {pt3dclear()
	pt3dadd(-62.62, 96.6, -6.5, 0.62)
	pt3dadd(-62.18, 97.59, -7.1, 0.62)
  }
  dend[208] {pt3dclear()
	pt3dadd(-62.18, 97.59, -7.1, 0.62)
	pt3dadd(-62.44, 97.01, -6.75, 0.62)
	pt3dadd(-62.06, 98.13, -6.75, 0.62)
	pt3dadd(-62.19, 99.31, -6.5, 0.62)
	pt3dadd(-62.31, 100.6, -6.5, 0.62)
	pt3dadd(-62.44, 101.8, -6.5, 0.62)
	pt3dadd(-62.38, 102.6, -6.5, 0.62)
	pt3dadd(-62.56, 103.4, -6.5, 0.62)
	pt3dadd(-62.69, 104.7, -6.5, 0.62)
  }
  dend[209] {pt3dclear()
	pt3dadd(-62.69, 104.7, -6.5, 0.62)
	pt3dadd(-62.38, 106, -6.5, 0.62)
	pt3dadd(-61.75, 107.1, -6.5, 0.62)
	pt3dadd(-61.81, 108, -6.5, 0.62)
	pt3dadd(-61.69, 109.4, -6.75, 0.62)
	pt3dadd(-61.81, 110.5, -6.75, 0.62)
	pt3dadd(-62, 111.6, -6.75, 0.37)
  }
  dend[210] {pt3dclear()
	pt3dadd(-62.69, 104.7, -6.5, 0.62)
	pt3dadd(-63.62, 105.2, -6.5, 0.5)
	pt3dadd(-64.5, 106.3, -6.5, 0.5)
	pt3dadd(-65.23, 107.3, -6.5, 0.5)
	pt3dadd(-66.12, 108.1, -6.75, 0.5)
  }
  dend[211] {pt3dclear()
	pt3dadd(-62.18, 97.59, -7.1, 0.62)
	pt3dadd(-63.31, 96.82, -6.75, 0.62)
	pt3dadd(-64.18, 97.32, -6.75, 0.5)
	pt3dadd(-64.62, 97.57, -6.75, 0.5)
  }
  dend[212] {pt3dclear()
	pt3dadd(-64.62, 97.57, -6.75, 0.5)
	pt3dadd(-65.18, 97.32, -6.75, 0.1898)
	pt3dadd(-65.73, 97.19, -6.75, 0.1898)
	pt3dadd(-66.55, 97.01, -6.75, 0.1898)
	pt3dadd(-67.18, 96.7, -6.75, 0.1898)
  }
  dend[213] {pt3dclear()
	pt3dadd(-64.62, 97.57, -6.75, 0.5)
	pt3dadd(-64.68, 98.32, -6.75, 0.5)
	pt3dadd(-64.98, 99.13, -6.75, 0.5)
	pt3dadd(-65.55, 100.2, -6.75, 0.5)
  }
  dend[214] {pt3dclear()
	pt3dadd(-65.55, 100.2, -6.75, 0.5)
	pt3dadd(-65.62, 101.1, -7, 0.56)
	pt3dadd(-65.93, 101.8, -7, 0.56)
	pt3dadd(-66.68, 102.7, -7, 0.56)
	pt3dadd(-67.48, 103.6, -7, 0.56)
	pt3dadd(-67.92, 104.3, -7, 0.56)
	pt3dadd(-68.55, 105.3, -7.25, 0.56)
	pt3dadd(-69.23, 106.6, -7.25, 0.56)
	pt3dadd(-69.73, 107.2, -7.25, 0.56)
  }
  dend[215] {pt3dclear()
	pt3dadd(-69.73, 107.2, -7.25, 0.56)
	pt3dadd(-70.59, 107.4, -7.5, 0.5)
	pt3dadd(-71.59, 107.5, -7.5, 0.5)
	pt3dadd(-72.41, 107.9, -7.5, 0.5)
	pt3dadd(-73.16, 108.7, -7.5, 0.5)
	pt3dadd(-74.03, 109.2, -7.5, 0.5)
	pt3dadd(-75.41, 109.4, -7.5, 0.5)
	pt3dadd(-76.4, 110, -7.5, 0.5)
	pt3dadd(-77.34, 110.1, -7.5, 0.5)
	pt3dadd(-78.52, 110.3, -7.5, 0.5)
	pt3dadd(-79.4, 110.5, -7.5, 0.5)
	pt3dadd(-79.7, 111.3, -7.5, 0.31)
  }
  dend[216] {pt3dclear()
	pt3dadd(-69.73, 107.2, -7.25, 0.56)
	pt3dadd(-69.62, 108.1, -7.25, 0.46)
	pt3dadd(-69.73, 109.3, -7.25, 0.46)
	pt3dadd(-69.62, 110.5, -7.25, 0.46)
	pt3dadd(-69.37, 112.3, -7.25, 0.46)
	pt3dadd(-69.31, 112.6, -7.25, 0.46)
  }
  dend[217] {pt3dclear()
	pt3dadd(-69.31, 112.6, -7.25, 0.46)
	pt3dadd(-68.65, 113.3, -7.25, 0.46)
	pt3dadd(-67.58, 113.8, -7.25, 0.46)
	pt3dadd(-66.86, 114.1, -7.25, 0.46)
	pt3dadd(-66.15, 114.1, -7.25, 0.46)
	pt3dadd(-65.38, 114.1, -7.25, 0.46)
	pt3dadd(-65.06, 114.7, -7.25, 0.46)
	pt3dadd(-64.7, 115.7, -7.25, 0.46)
  }
  dend[218] {pt3dclear()
	pt3dadd(-64.7, 115.7, -7.25, 0.46)
	pt3dadd(-64.09, 116.1, -7, 0.46)
	pt3dadd(-63.64, 117, -7, 0.46)
	pt3dadd(-63.44, 117.6, -7, 0.46)
	pt3dadd(-63.44, 118.2, -7, 0.46)
  }
  dend[219] {pt3dclear()
	pt3dadd(-64.7, 115.7, -7.25, 0.46)
	pt3dadd(-65.48, 116.4, -7.25, 0.46)
	pt3dadd(-66.09, 117.4, -7.25, 0.46)
	pt3dadd(-66.56, 118.3, -7.25, 0.46)
	pt3dadd(-66.95, 119.4, -7.25, 0.46)
	pt3dadd(-67.37, 120.3, -7.25, 0.46)
	pt3dadd(-67.89, 120.8, -7.25, 0.46)
	pt3dadd(-68.23, 121.7, -7.25, 0.46)
  }
  dend[220] {pt3dclear()
	pt3dadd(-69.31, 112.6, -7.25, 0.46)
	pt3dadd(-69.98, 113.7, -7.5, 0.26)
	pt3dadd(-70.75, 114.7, -7.5, 0.26)
	pt3dadd(-71.62, 115.6, -7.5, 0.26)
	pt3dadd(-72.18, 116.4, -7.5, 0.26)
	pt3dadd(-73.05, 117.2, -7.5, 0.26)
	pt3dadd(-74.13, 117.8, -7.5, 0.26)
	pt3dadd(-75.05, 118.6, -7.25, 0.26)
	pt3dadd(-76.48, 119.4, -7.25, 0.26)
	pt3dadd(-77.34, 120, -7.25, 0.26)
	pt3dadd(-78.68, 121.1, -7.25, 0.36)
	pt3dadd(-79.45, 122.1, -7.25, 0.51)
	pt3dadd(-80.01, 122.4, -7.25, 0.51)
  }
  dend[221] {pt3dclear()
	pt3dadd(-65.55, 100.2, -6.75, 0.5)
	pt3dadd(-66.3, 100.3, -7, 0.31)
	pt3dadd(-67.18, 100.1, -7, 0.31)
	pt3dadd(-68.23, 100.2, -7, 0.37)
	pt3dadd(-68.92, 100.6, -7, 0.37)
	pt3dadd(-70.11, 101.3, -7, 0.37)
	pt3dadd(-70.79, 102, -7.25, 0.37)
	pt3dadd(-71.54, 102.8, -7.25, 0.37)
	pt3dadd(-72.04, 103.7, -7.25, 0.37)
	pt3dadd(-72.72, 104.6, -7.25, 0.37)
  }
}
proc shape3d_9() {
  dend[221] {	pt3dadd(-73.54, 105.3, -7.25, 0.37)
  }
  dend[222] {pt3dclear()
	pt3dadd(-62.62, 96.6, -6.5, 0.62)
	pt3dadd(-61.44, 96.95, -6.75, 0.5)
	pt3dadd(-60.75, 97.63, -6.75, 0.5)
	pt3dadd(-60.13, 98.69, -6.75, 0.5)
	pt3dadd(-60.01, 99.5, -6.75, 0.5)
	pt3dadd(-60.01, 100.3, -6.75, 0.31)
  }
  dend[223] {pt3dclear()
	pt3dadd(-58.78, 89.95, -6.5, 1)
	pt3dadd(-58.14, 90.03, -6.5, 0.62)
	pt3dadd(-57.45, 90.9, -6.5, 0.56)
	pt3dadd(-56.95, 91.83, -6.5, 0.56)
	pt3dadd(-56.76, 92.89, -6.5, 0.56)
	pt3dadd(-56.83, 93.83, -6.5, 0.56)
	pt3dadd(-56.95, 94.89, -6.5, 0.56)
	pt3dadd(-57.01, 95.7, -6.5, 0.56)
	pt3dadd(-56.83, 96.63, -6.5, 0.56)
	pt3dadd(-56.83, 97.44, -6.5, 0.56)
	pt3dadd(-57.2, 98.57, -6.5, 0.5)
	pt3dadd(-57.57, 99.31, -6.25, 0.5)
	pt3dadd(-58.14, 100.3, -6.25, 0.5)
	pt3dadd(-58.63, 100.9, -6.25, 0.5)
	pt3dadd(-58.95, 102.1, -6.25, 0.5)
	pt3dadd(-59.01, 102.6, -6.25, 0.5)
  }
  dend[224] {pt3dclear()
	pt3dadd(-59.55, 86.72, -6.5, 1)
	pt3dadd(-60.32, 86.91, -6.5, 1.12)
	pt3dadd(-61.19, 87.22, -6.5, 0.62)
	pt3dadd(-62.21, 87.59, -6.5, 0.62)
  }
  dend[225] {pt3dclear()
	pt3dadd(-62.21, 87.59, -6.5, 0.62)
	pt3dadd(-63.75, 87.66, -6.5, 0.56)
	pt3dadd(-65.06, 87.41, -6.5, 0.56)
	pt3dadd(-66.23, 87.47, -6.75, 0.56)
	pt3dadd(-67.11, 87.41, -6.75, 0.56)
  }
  dend[226] {pt3dclear()
	pt3dadd(-67.11, 87.41, -6.75, 0.56)
	pt3dadd(-68.17, 87.91, -6.75, 0.56)
	pt3dadd(-69.05, 88.59, -6.75, 0.56)
	pt3dadd(-70.23, 89.4, -6.75, 0.56)
	pt3dadd(-71.09, 90.15, -6.75, 0.56)
	pt3dadd(-71.73, 90.84, -6.75, 0.56)
	pt3dadd(-72.16, 91.83, -6.75, 0.56)
	pt3dadd(-73.09, 92.46, -6.75, 0.56)
	pt3dadd(-74.16, 93.58, -6.75, 0.56)
  }
  dend[227] {pt3dclear()
	pt3dadd(-67.11, 87.41, -6.75, 0.56)
	pt3dadd(-67.23, 86.41, -6.75, 0.56)
	pt3dadd(-67.86, 85.66, -6.75, 0.56)
	pt3dadd(-68.11, 84.29, -6.75, 0.56)
  }
  dend[228] {pt3dclear()
	pt3dadd(-68.11, 84.29, -6.75, 0.56)
	pt3dadd(-68.67, 83.6, -6.75, 0.25)
	pt3dadd(-68.8, 82.98, -6.75, 0.25)
	pt3dadd(-68.98, 82.36, -6.75, 0.25)
	pt3dadd(-69.3, 81.8, -6.75, 0.25)
	pt3dadd(-69.73, 80.86, -6.75, 0.25)
  }
  dend[229] {pt3dclear()
	pt3dadd(-68.11, 84.29, -6.75, 0.56)
	pt3dadd(-67.67, 83.35, -6.75, 0.5)
	pt3dadd(-67.36, 82.48, -6.75, 0.5)
	pt3dadd(-67.05, 81.55, -6.75, 0.5)
	pt3dadd(-66.23, 80.73, -6.75, 0.5)
	pt3dadd(-66.05, 79.73, -6.75, 0.5)
	pt3dadd(-65.55, 78.68, -6.75, 0.5)
	pt3dadd(-66.12, 77.87, -6.75, 0.5)
	pt3dadd(-66.98, 77.48, -6.75, 0.5)
	pt3dadd(-68.17, 77.48, -7, 0.5)
	pt3dadd(-69.48, 77.73, -7, 0.37)
	pt3dadd(-70.36, 77.98, -7, 0.37)
	pt3dadd(-71.04, 78.8, -7, 0.37)
	pt3dadd(-71.84, 79.23, -7, 0.37)
	pt3dadd(-72.79, 79.55, -7, 0.37)
	pt3dadd(-73.54, 79.36, -7, 0.37)
  }
  dend[230] {pt3dclear()
	pt3dadd(-62.21, 87.59, -6.5, 0.62)
	pt3dadd(-62.38, 88.15, -6.75, 0.5)
	pt3dadd(-62.75, 88.78, -6.75, 0.5)
	pt3dadd(-63.75, 89.84, -6.75, 0.5)
	pt3dadd(-64.62, 90.59, -6.75, 0.5)
	pt3dadd(-66.12, 91.65, -6.75, 0.5)
	pt3dadd(-66.8, 92.58, -6.75, 0.5)
	pt3dadd(-67.98, 93.52, -6.75, 0.5)
	pt3dadd(-69.48, 94.39, -6.75, 0.5)
	pt3dadd(-70.92, 95.32, -6.75, 0.5)
  }
  dend[231] {pt3dclear()
	pt3dadd(-70.92, 95.32, -6.75, 0.5)
	pt3dadd(-70.54, 96.13, -6.75, 0.37)
	pt3dadd(-70.67, 97.01, -6.75, 0.37)
	pt3dadd(-70.92, 98.13, -6.75, 0.37)
	pt3dadd(-71.17, 98.75, -6.75, 0.37)
	pt3dadd(-71.73, 99.38, -6.75, 0.37)
	pt3dadd(-72.23, 100, -6.75, 0.37)
  }
  dend[232] {pt3dclear()
	pt3dadd(-70.92, 95.32, -6.75, 0.5)
	pt3dadd(-71.54, 96.01, -6.75, 0.37)
	pt3dadd(-72.29, 96.51, -6.75, 0.37)
	pt3dadd(-72.84, 96.82, -6.75, 0.37)
	pt3dadd(-73.78, 97.13, -6.75, 0.37)
	pt3dadd(-74.34, 97.82, -6.75, 0.37)
	pt3dadd(-74.97, 98.25, -6.75, 0.37)
  }
  dend[233] {pt3dclear()
	pt3dadd(-74.97, 98.25, -6.75, 0.37)
	pt3dadd(-75.9, 98.07, -6.75, 0.37)
	pt3dadd(-76.7, 97.38, -6.75, 0.37)
	pt3dadd(-77.03, 96.63, -6.75, 0.37)
	pt3dadd(-77.28, 96.07, -6.75, 0.37)
	pt3dadd(-77.77, 95.26, -6.75, 0.37)
	pt3dadd(-77.65, 93.83, -6.5, 0.37)
	pt3dadd(-78.15, 92.83, -6.5, 0.37)
	pt3dadd(-78.27, 92.21, -6.5, 0.37)
	pt3dadd(-78.45, 91.46, -6.5, 0.37)
	pt3dadd(-78.52, 91.02, -6.5, 0.37)
  }
  dend[234] {pt3dclear()
	pt3dadd(-74.97, 98.25, -6.75, 0.37)
	pt3dadd(-74.91, 99, -6.75, 0.37)
	pt3dadd(-75.03, 100.3, -6.75, 0.37)
	pt3dadd(-75.59, 101.1, -6.75, 0.37)
	pt3dadd(-76.22, 102.6, -7, 0.37)
	pt3dadd(-76.9, 103.6, -7, 0.37)
	pt3dadd(-77.28, 104.7, -7, 0.37)
	pt3dadd(-78.09, 106.6, -7, 0.37)
	pt3dadd(-78.09, 107.2, -7, 0.37)
  }
  dend[235] {pt3dclear()
	pt3dadd(-57.91, 84.88, -6.5, 0.69)
	pt3dadd(-58.63, 84.68, -6.5, 0.36)
	pt3dadd(-59.34, 84.47, -6.5, 0.36)
	pt3dadd(-59.91, 84.16, -6.5, 0.26)
	pt3dadd(-60.67, 84.11, -6.5, 0.31)
	pt3dadd(-60.93, 83.7, -6.5, 0.31)
	pt3dadd(-61.08, 83.24, -6.5, 0.36)
	pt3dadd(-61.24, 82.73, -6.5, 0.36)
	pt3dadd(-61.08, 82.32, -6.5, 0.36)
	pt3dadd(-60.88, 81.56, -6.5, 0.36)
  }
  dend[236] {pt3dclear()
	pt3dadd(-60.88, 81.56, -6.5, 0.36)
	pt3dadd(-61.08, 80.98, -6.5, 0.26)
	pt3dadd(-61.29, 80.48, -6.5, 0.26)
	pt3dadd(-61.29, 79.77, -6.5, 0.26)
	pt3dadd(-61.08, 79.25, -6.5, 0.26)
	pt3dadd(-60.67, 78.73, -6.5, 0.26)
	pt3dadd(-60.26, 78.33, -6.5, 0.26)
	pt3dadd(-60.06, 77.87, -6.5, 0.26)
  }
  dend[237] {pt3dclear()
	pt3dadd(-60.88, 81.56, -6.5, 0.36)
	pt3dadd(-60.16, 81.45, -6.5, 0.26)
	pt3dadd(-59.45, 81.15, -6.5, 0.26)
	pt3dadd(-58.68, 80.89, -6.5, 0.26)
	pt3dadd(-58.17, 80.53, -6.5, 0.26)
	pt3dadd(-57.19, 80.12, -6.5, 0.26)
	pt3dadd(-56.43, 80.12, -6.5, 0.26)
  }
  dend[238] {pt3dclear()
	pt3dadd(-55.48, 83.02, -6.5, 1)
	pt3dadd(-54.83, 84.23, -6.5, 1.18)
	pt3dadd(-53.9, 85.35, -6.5, 0.81)
	pt3dadd(-53.27, 86.16, -6.5, 0.81)
	pt3dadd(-52.72, 86.63, -6.5, 0.81)
  }
  dend[239] {pt3dclear()
	pt3dadd(-52.72, 86.63, -6.5, 0.81)
	pt3dadd(-52.34, 87.16, -6.5, 0.81)
	pt3dadd(-51.9, 88.15, -6.5, 0.81)
	pt3dadd(-51.65, 89.09, -6.5, 0.81)
	pt3dadd(-51.15, 90.15, -6.5, 0.81)
	pt3dadd(-50.65, 91.21, -6.5, 0.81)
  }
  dend[240] {pt3dclear()
	pt3dadd(-50.65, 91.21, -6.5, 0.81)
	pt3dadd(-51.22, 91.83, -6.5, 0.44)
	pt3dadd(-51.78, 92.52, -6.5, 0.44)
	pt3dadd(-52.09, 93.08, -6.5, 0.44)
	pt3dadd(-52.4, 93.95, -6.5, 0.44)
	pt3dadd(-53.09, 95.14, -6.5, 0.44)
	pt3dadd(-53.21, 96.07, -6.5, 0.44)
	pt3dadd(-53.4, 96.95, -6.5, 0.44)
	pt3dadd(-53.58, 97.94, -6.5, 0.44)
	pt3dadd(-53.83, 98.75, -6.5, 0.44)
	pt3dadd(-54.02, 99.31, -6.5, 0.44)
	pt3dadd(-54.27, 100.2, -6.5, 0.44)
	pt3dadd(-54.58, 100.8, -6.5, 0.44)
	pt3dadd(-54.77, 101.8, -6.25, 0.44)
	pt3dadd(-54.83, 102.6, -6.25, 0.44)
  }
  dend[241] {pt3dclear()
	pt3dadd(-50.65, 91.21, -6.5, 0.81)
	pt3dadd(-49.97, 91.52, -6.5, 0.69)
	pt3dadd(-49.16, 92.02, -6.5, 0.69)
  }
  dend[242] {pt3dclear()
	pt3dadd(-49.16, 92.02, -6.5, 0.69)
	pt3dadd(-49.16, 93.14, -6.5, 0.5)
	pt3dadd(-49.22, 94.14, -6.75, 0.5)
	pt3dadd(-49.47, 95.26, -6.75, 0.5)
	pt3dadd(-49.91, 96.01, -6.5, 0.5)
	pt3dadd(-50.28, 97.01, -6.5, 0.5)
	pt3dadd(-50.47, 97.69, -6.5, 0.5)
	pt3dadd(-50.59, 98.5, -6.5, 0.5)
	pt3dadd(-50.65, 99.44, -6.5, 0.5)
	pt3dadd(-50.65, 100.1, -6.5, 0.5)
	pt3dadd(-50.65, 100.8, -6.5, 0.5)
	pt3dadd(-50.72, 101.3, -6.5, 0.5)
	pt3dadd(-50.78, 101.8, -6.5, 0.5)
	pt3dadd(-50.97, 102.3, -6.5, 0.5)
	pt3dadd(-51.09, 103.2, -6.5, 0.5)
	pt3dadd(-50.97, 103.8, -6.5, 0.5)
	pt3dadd(-50.78, 104.5, -6.5, 0.5)
	pt3dadd(-50.22, 105.4, -6.75, 0.5)
	pt3dadd(-49.72, 106, -6.75, 0.5)
	pt3dadd(-49.35, 107.1, -6.75, 0.5)
	pt3dadd(-49.84, 107.9, -6.75, 0.5)
  }
  dend[243] {pt3dclear()
	pt3dadd(-49.16, 92.02, -6.5, 0.69)
	pt3dadd(-48.29, 91.83, -6.5, 0.5)
	pt3dadd(-47.29, 91.9, -6.5, 0.5)
	pt3dadd(-46.42, 92.08, -6.5, 0.5)
	pt3dadd(-45.54, 92.46, -6.5, 0.5)
	pt3dadd(-44.42, 93.02, -6.5, 0.5)
	pt3dadd(-44.23, 93.7, -6.5, 0.5)
	pt3dadd(-43.55, 94.76, -6.5, 0.5)
	pt3dadd(-43.61, 95.45, -6.5, 0.5)
	pt3dadd(-43.49, 96.26, -6.5, 0.5)
  }
  dend[244] {pt3dclear()
	pt3dadd(-43.49, 96.26, -6.5, 0.5)
	pt3dadd(-42.67, 96.7, -6.5, 0.5)
	pt3dadd(-42.24, 97.38, -6.5, 0.5)
	pt3dadd(-41.55, 97.94, -6.5, 0.5)
  }
}
proc shape3d_10() {
  dend[244] {	pt3dadd(-40.74, 98.38, -6.5, 0.5)
	pt3dadd(-40.11, 98.38, -6.5, 0.5)
	pt3dadd(-38.81, 98.44, -6.5, 0.5)
	pt3dadd(-38.06, 98.5, -6.5, 0.5)
	pt3dadd(-37.06, 98.69, -6.5, 0.37)
	pt3dadd(-35.63, 99.07, -6.5, 0.37)
	pt3dadd(-34.94, 99.44, -6.5, 0.37)
  }
  dend[245] {pt3dclear()
	pt3dadd(-43.49, 96.26, -6.5, 0.5)
	pt3dadd(-44.42, 97.01, -6.5, 0.37)
	pt3dadd(-45.36, 98.01, -6.5, 0.37)
	pt3dadd(-45.98, 98.82, -6.5, 0.37)
	pt3dadd(-46.6, 100.3, -6.5, 0.37)
	pt3dadd(-47.29, 100.9, -6.5, 0.37)
	pt3dadd(-47.6, 102.3, -6.5, 0.37)
	pt3dadd(-47.85, 103.3, -6.5, 0.37)
	pt3dadd(-47.66, 104.2, -6.5, 0.25)
	pt3dadd(-47.1, 104.6, -6.5, 0.25)
  }
  dend[246] {pt3dclear()
	pt3dadd(-52.72, 86.63, -6.5, 0.81)
	pt3dadd(-51.96, 86.1, -6.5, 0.81)
	pt3dadd(-51.15, 85.72, -6.5, 0.62)
	pt3dadd(-50.09, 85.35, -6.5, 0.56)
	pt3dadd(-49.35, 85.41, -6.5, 0.56)
	pt3dadd(-48.6, 85.47, -6.5, 0.56)
	pt3dadd(-47.41, 85.47, -6.5, 0.56)
	pt3dadd(-46.6, 85.47, -6.5, 0.56)
	pt3dadd(-45.92, 85.66, -6.5, 0.56)
	pt3dadd(-44.73, 86.22, -6.5, 0.56)
  }
  dend[247] {pt3dclear()
	pt3dadd(-44.73, 86.22, -6.5, 0.56)
	pt3dadd(-44.05, 87.09, -6.5, 0.56)
	pt3dadd(-43.55, 87.78, -6.5, 0.56)
	pt3dadd(-42.92, 88.28, -6.5, 0.56)
	pt3dadd(-42.36, 88.78, -6.5, 0.44)
	pt3dadd(-41.37, 88.9, -6.5, 0.5)
	pt3dadd(-40.06, 89.28, -6.75, 0.5)
	pt3dadd(-39.31, 89.34, -6.75, 0.5)
  }
  dend[248] {pt3dclear()
	pt3dadd(-39.31, 89.34, -6.75, 0.5)
	pt3dadd(-38.81, 90.27, -6.75, 0.44)
	pt3dadd(-38.44, 91.02, -6.75, 0.44)
	pt3dadd(-38, 91.77, -6.5, 0.44)
  }
  dend[249] {pt3dclear()
	pt3dadd(-38, 91.77, -6.5, 0.44)
	pt3dadd(-38.44, 92.52, -6.5, 0.37)
	pt3dadd(-38.86, 93.45, -6.5, 0.37)
	pt3dadd(-39.18, 94.33, -6.5, 0.37)
  }
  dend[250] {pt3dclear()
	pt3dadd(-38, 91.77, -6.5, 0.44)
	pt3dadd(-37.06, 92.33, -6.5, 0.37)
	pt3dadd(-36.13, 93.14, -6.5, 0.37)
  }
  dend[251] {pt3dclear()
	pt3dadd(-36.13, 93.14, -6.5, 0.37)
	pt3dadd(-35.32, 93.58, -6.5, 0.37)
	pt3dadd(-34.69, 94.39, -6.5, 0.37)
	pt3dadd(-33.95, 94.89, -6.5, 0.37)
  }
  dend[252] {pt3dclear()
	pt3dadd(-36.13, 93.14, -6.5, 0.37)
	pt3dadd(-35.63, 92.83, -6.5, 0.06)
	pt3dadd(-35.26, 92.64, -6.5, 0.06)
	pt3dadd(-34.82, 92.14, -6.5, 0.06)
	pt3dadd(-34.38, 91.96, -6.5, 0.06)
	pt3dadd(-33.82, 91.71, -6.5, 0.06)
	pt3dadd(-33.63, 91.33, -6.5, 0.06)
  }
  dend[253] {pt3dclear()
	pt3dadd(-39.31, 89.34, -6.75, 0.5)
	pt3dadd(-38.44, 88.59, -6.5, 0.5)
	pt3dadd(-37.75, 88.28, -6.5, 0.5)
	pt3dadd(-36.88, 88.03, -6.5, 0.5)
	pt3dadd(-35.69, 87.78, -6.25, 0.5)
	pt3dadd(-35.13, 87.16, -6.25, 0.5)
	pt3dadd(-34.63, 86.85, -6.25, 0.5)
	pt3dadd(-33.7, 86.78, -6.25, 0.5)
	pt3dadd(-33.01, 86.78, -6.25, 0.5)
	pt3dadd(-32.57, 86.41, -6.25, 0.5)
	pt3dadd(-32.45, 86.22, -6.25, 0.5)
	pt3dadd(-31.08, 86.66, -6, 0.5)
	pt3dadd(-30.21, 86.78, -6, 0.5)
	pt3dadd(-29.77, 86.85, -6, 0.5)
	pt3dadd(-29.08, 87.53, -6.25, 0.5)
	pt3dadd(-28.15, 88.28, -6.25, 0.5)
  }
  dend[254] {pt3dclear()
	pt3dadd(-44.73, 86.22, -6.5, 0.56)
	pt3dadd(-43.36, 86.04, -6.5, 0.5)
	pt3dadd(-42.36, 85.97, -6.5, 0.5)
	pt3dadd(-41.24, 86.04, -6.5, 0.5)
	pt3dadd(-40.06, 86.1, -6.5, 0.5)
	pt3dadd(-39.36, 86.04, -6.5, 0.5)
	pt3dadd(-38.11, 85.91, -6.5, 0.5)
	pt3dadd(-37.44, 85.35, -6.5, 0.5)
	pt3dadd(-36.81, 85.04, -6.5, 0.5)
	pt3dadd(-36.25, 84.35, -6.5, 0.44)
	pt3dadd(-35.38, 83.35, -6.75, 0.37)
	pt3dadd(-34.82, 82.86, -6.75, 0.37)
	pt3dadd(-34.57, 82.42, -6.75, 0.37)
	pt3dadd(-34.13, 81.48, -7, 0.37)
  }
  dend[255] {pt3dclear()
	pt3dadd(-52.26, 78.75, -6.5, 1)
	pt3dadd(-51.47, 79.18, -6.5, 0.5)
	pt3dadd(-50.65, 79.68, -6.5, 0.31)
	pt3dadd(-49.47, 80.05, -6.5, 0.31)
	pt3dadd(-49.22, 80.11, -6.5, 0.31)
  }
  dend[256] {pt3dclear()
	pt3dadd(-49.22, 80.11, -6.5, 0.31)
	pt3dadd(-48.04, 80.98, -6.5, 0.44)
	pt3dadd(-46.85, 81.17, -6.5, 0.44)
	pt3dadd(-45.79, 81.11, -6.5, 0.44)
	pt3dadd(-44.79, 81.11, -6.5, 0.44)
	pt3dadd(-44.17, 81.05, -6.5, 0.44)
	pt3dadd(-44.05, 80.36, -6.75, 0.44)
	pt3dadd(-43.73, 79.86, -6.75, 0.44)
	pt3dadd(-43.24, 79.3, -6.75, 0.44)
	pt3dadd(-42.86, 79.05, -6.75, 0.44)
  }
  dend[257] {pt3dclear()
	pt3dadd(-49.22, 80.11, -6.5, 0.31)
	pt3dadd(-48.85, 79.36, -6.5, 0.44)
	pt3dadd(-48.29, 79.05, -6.5, 0.44)
	pt3dadd(-47.91, 78.48, -6.5, 0.44)
	pt3dadd(-47.66, 77.81, -6.5, 0.44)
	pt3dadd(-47.41, 77.06, -6.5, 0.44)
	pt3dadd(-46.66, 76.18, -6.5, 0.44)
	pt3dadd(-46.17, 75.69, -6.5, 0.44)
	pt3dadd(-45.6, 74.94, -6.5, 0.44)
	pt3dadd(-45.36, 73.01, -6.25, 0.44)
	pt3dadd(-45.04, 71.95, -6.25, 0.44)
	pt3dadd(-44.54, 71.2, -6.25, 0.44)
	pt3dadd(-44.11, 70.89, -6.25, 0.44)
	pt3dadd(-43.55, 70.01, -6.25, 0.44)
	pt3dadd(-43.24, 68.95, -6, 0.44)
	pt3dadd(-42.43, 68.08, -6, 0.44)
	pt3dadd(-42.3, 67.33, -6, 0.44)
	pt3dadd(-42.11, 66.77, -6, 0.44)
	pt3dadd(-41.93, 65.7, -6, 0.44)
	pt3dadd(-41.49, 65.2, -6.25, 0.44)
	pt3dadd(-40.68, 64.45, -6.25, 0.44)
	pt3dadd(-39.93, 63.72, -6.25, 0.44)
  }
  dend[258] {pt3dclear()
	pt3dadd(-42.86, 65.19, -6.75, 1.31)
	pt3dadd(-41.37, 65.52, -6.75, 0.94)
	pt3dadd(-40.43, 65.84, -6.75, 0.69)
	pt3dadd(-39.18, 66.33, -6.75, 0.69)
	pt3dadd(-38.25, 66.77, -6.75, 0.69)
	pt3dadd(-37.25, 67.14, -6.75, 0.69)
  }
  dend[259] {pt3dclear()
	pt3dadd(-37.25, 67.14, -6.75, 0.69)
	pt3dadd(-38.06, 67.7, -6.75, 0.31)
	pt3dadd(-38.56, 68.39, -6.75, 0.31)
	pt3dadd(-39.25, 69.02, -6.75, 0.31)
	pt3dadd(-40.11, 69.51, -6.75, 0.31)
	pt3dadd(-40.49, 70.26, -6.75, 0.5)
	pt3dadd(-41.12, 71.01, -6.75, 0.5)
	pt3dadd(-41.49, 71.45, -6.75, 0.5)
  }
  dend[260] {pt3dclear()
	pt3dadd(-37.25, 67.14, -6.75, 0.69)
	pt3dadd(-36.13, 67.52, -6.5, 0.75)
	pt3dadd(-35.01, 67.95, -6.5, 0.75)
  }
  dend[261] {pt3dclear()
	pt3dadd(-35.01, 67.95, -6.5, 0.75)
	pt3dadd(-34.32, 67.02, -6.5, 0.5)
	pt3dadd(-33.57, 66.08, -6.5, 0.44)
	pt3dadd(-32.82, 65.65, -6.5, 0.44)
	pt3dadd(-31.83, 65.27, -6.5, 0.44)
	pt3dadd(-30.7, 64.78, -6.25, 0.56)
	pt3dadd(-29.71, 64.45, -6.25, 0.56)
	pt3dadd(-28.4, 64.53, -6.25, 0.56)
	pt3dadd(-27.59, 64.84, -6.25, 0.56)
  }
  dend[262] {pt3dclear()
	pt3dadd(-27.59, 64.84, -6.25, 0.56)
	pt3dadd(-27.52, 66.02, -6, 0.5)
	pt3dadd(-27.96, 66.95, -6, 0.5)
	pt3dadd(-28.34, 67.89, -6, 0.5)
	pt3dadd(-29.08, 68.45, -6, 0.5)
	pt3dadd(-30.14, 69.51, -6, 0.5)
	pt3dadd(-30.95, 70.31, -6, 0.5)
	pt3dadd(-31.76, 70.95, -6, 0.5)
	pt3dadd(-32.08, 72.01, -6, 0.5)
	pt3dadd(-32.08, 72.69, -6, 0.5)
	pt3dadd(-31.95, 73.69, -6, 0.5)
  }
  dend[263] {pt3dclear()
	pt3dadd(-31.95, 73.69, -6, 0.5)
	pt3dadd(-31.08, 74.19, -6, 0.31)
	pt3dadd(-30.33, 74.31, -6, 0.31)
	pt3dadd(-29.52, 74.25, -6, 0.31)
  }
  dend[264] {pt3dclear()
	pt3dadd(-31.95, 73.69, -6, 0.5)
	pt3dadd(-32.64, 74.5, -6, 0.31)
	pt3dadd(-33.39, 75.19, -5.75, 0.31)
	pt3dadd(-34.2, 75.44, -5.75, 0.31)
	pt3dadd(-34.88, 75.44, -5.75, 0.31)
	pt3dadd(-35.44, 75, -5.75, 0.56)
  }
  dend[265] {pt3dclear()
	pt3dadd(-27.59, 64.84, -6.25, 0.56)
	pt3dadd(-26.34, 64.65, -6.25, 0.56)
	pt3dadd(-25.09, 64.65, -6.25, 0.56)
  }
  dend[266] {pt3dclear()
	pt3dadd(-25.09, 64.65, -6.25, 0.56)
	pt3dadd(-24.59, 63.97, -6.25, 0.37)
	pt3dadd(-24.28, 63.28, -6.25, 0.37)
	pt3dadd(-23.6, 62.72, -6.25, 0.37)
	pt3dadd(-22.91, 62.03, -6.25, 0.37)
	pt3dadd(-22.35, 61.66, -6.25, 0.37)
	pt3dadd(-21.35, 60.66, -6.25, 0.37)
	pt3dadd(-20.54, 60.04, -6.25, 0.37)
	pt3dadd(-20.23, 59.73, -6.25, 0.37)
  }
  dend[267] {pt3dclear()
	pt3dadd(-25.09, 64.65, -6.25, 0.56)
	pt3dadd(-24.47, 65.15, -6.25, 0.44)
	pt3dadd(-23.97, 65.15, -6.25, 0.44)
	pt3dadd(-23.1, 64.9, -6.25, 0.44)
	pt3dadd(-22.6, 64.65, -6.25, 0.44)
	pt3dadd(-21.91, 64.03, -6.25, 0.44)
	pt3dadd(-21.29, 63.53, -6, 0.44)
	pt3dadd(-20.29, 62.84, -6, 0.44)
	pt3dadd(-19.79, 62.28, -6, 0.44)
	pt3dadd(-19.17, 61.47, -6, 0.44)
	pt3dadd(-17.98, 60.1, -6, 0.44)
  }
  dend[268] {pt3dclear()
	pt3dadd(-35.01, 67.95, -6.5, 0.75)
	pt3dadd(-34.63, 68.89, -6.5, 0.81)
	pt3dadd(-34.01, 70.14, -6.5, 0.81)
  }
  dend[269] {pt3dclear()
	pt3dadd(-34.01, 70.14, -6.5, 0.81)
	pt3dadd(-35.44, 71.01, -6.5, 0.62)
	pt3dadd(-35.88, 71.51, -6.5, 0.62)
  }
}
proc shape3d_11() {
  dend[269] {  }
  dend[270] {pt3dclear()
	pt3dadd(-35.88, 71.51, -6.5, 0.62)
	pt3dadd(-36.5, 71.2, -6.5, 0.44)
	pt3dadd(-37.19, 71.13, -6.5, 0.44)
	pt3dadd(-38.19, 71.26, -6.5, 0.44)
	pt3dadd(-38.93, 71.76, -6.5, 0.44)
	pt3dadd(-39.56, 72.13, -6.5, 0.44)
	pt3dadd(-40.31, 72.13, -6.25, 0.44)
	pt3dadd(-41.05, 71.95, -6.25, 0.44)
  }
  dend[271] {pt3dclear()
	pt3dadd(-35.88, 71.51, -6.5, 0.62)
	pt3dadd(-36.44, 72.63, -6.75, 0.37)
	pt3dadd(-36.69, 73.38, -6.75, 0.37)
	pt3dadd(-37.75, 74.13, -6.75, 0.37)
  }
  dend[272] {pt3dclear()
	pt3dadd(-37.75, 74.13, -6.75, 0.37)
	pt3dadd(-38.68, 74.38, -6.75, 0.31)
	pt3dadd(-39.81, 74.69, -6.75, 0.31)
	pt3dadd(-40.74, 74.81, -6.75, 0.31)
	pt3dadd(-41.37, 74.94, -6.75, 0.31)
	pt3dadd(-42.05, 75, -6.75, 0.31)
  }
  dend[273] {pt3dclear()
	pt3dadd(-37.75, 74.13, -6.75, 0.37)
	pt3dadd(-37.75, 75.06, -6.75, 0.31)
	pt3dadd(-38, 75.94, -6.75, 0.31)
	pt3dadd(-38.5, 76.31, -6.75, 0.31)
	pt3dadd(-38.75, 77.31, -6.75, 0.31)
	pt3dadd(-39.36, 78.05, -6.5, 0.31)
	pt3dadd(-39.74, 79.43, -6.5, 0.31)
  }
  dend[274] {pt3dclear()
	pt3dadd(-34.01, 70.14, -6.5, 0.81)
	pt3dadd(-33.09, 70.51, -6.5, 0.81)
  }
  dend[275] {pt3dclear()
	pt3dadd(-33.09, 70.51, -6.5, 0.81)
	pt3dadd(-33.2, 71.23, -6.5, 0.37)
	pt3dadd(-33.32, 71.81, -6.5, 0.25)
	pt3dadd(-33.26, 73.63, -6.5, 0.37)
	pt3dadd(-33.57, 74.25, -6.5, 0.37)
	pt3dadd(-34.45, 75.5, -6.5, 0.62)
	pt3dadd(-35.07, 76.43, -6.5, 0.56)
	pt3dadd(-35.57, 77, -6.5, 0.56)
	pt3dadd(-36, 77.62, -6.5, 0.56)
	pt3dadd(-36.13, 78.37, -6.5, 0.56)
	pt3dadd(-36.25, 78.93, -6.5, 0.56)
	pt3dadd(-36.63, 79.86, -6.5, 0.56)
	pt3dadd(-37.19, 80.86, -6.5, 0.56)
	pt3dadd(-37.75, 81.73, -6.5, 0.56)
	pt3dadd(-38.68, 82.48, -6.5, 0.56)
  }
  dend[276] {pt3dclear()
	pt3dadd(-33.09, 70.51, -6.5, 0.81)
	pt3dadd(-32.45, 70.89, -6.5, 0.56)
	pt3dadd(-31.14, 71.31, -6.5, 0.56)
	pt3dadd(-29.64, 71.88, -6.5, 0.56)
	pt3dadd(-28.52, 72.76, -6.5, 0.56)
	pt3dadd(-27.56, 73.31, -6.5, 0.56)
  }
  dend[277] {pt3dclear()
	pt3dadd(-27.56, 73.31, -6.5, 0.56)
	pt3dadd(-26.18, 72.65, -6.5, 0.56)
  }
  dend[278] {pt3dclear()
	pt3dadd(-26.18, 72.65, -6.5, 0.56)
	pt3dadd(-25.4, 73.14, -6.25, 0.56)
	pt3dadd(-24.66, 73.81, -6.25, 0.56)
	pt3dadd(-23.29, 75.06, -6.25, 0.56)
	pt3dadd(-22.23, 76.18, -6, 0.56)
	pt3dadd(-21.35, 76.68, -6, 0.56)
  }
  dend[279] {pt3dclear()
	pt3dadd(-21.35, 76.68, -6, 0.56)
	pt3dadd(-21.04, 77.98, -6, 0.5)
	pt3dadd(-20.36, 78.8, -6, 0.5)
	pt3dadd(-19.67, 79.48, -6, 0.5)
	pt3dadd(-19.3, 80.61, -6, 0.44)
	pt3dadd(-19.05, 81.92, -6, 0.37)
	pt3dadd(-19.11, 83.17, -6, 0.37)
	pt3dadd(-19.17, 84.1, -6, 0.37)
	pt3dadd(-19.36, 85.6, -6, 0.37)
  }
  dend[280] {pt3dclear()
	pt3dadd(-21.35, 76.68, -6, 0.56)
	pt3dadd(-20.29, 75.81, -6, 0.37)
	pt3dadd(-19.48, 75.5, -6, 0.37)
	pt3dadd(-18.55, 75.31, -6, 0.37)
  }
  dend[281] {pt3dclear()
	pt3dadd(-18.55, 75.31, -6, 0.37)
	pt3dadd(-17.23, 76, -6, 0.31)
	pt3dadd(-16.23, 76.5, -6, 0.31)
	pt3dadd(-15.12, 76.81, -6, 0.31)
	pt3dadd(-14.18, 77.62, -6, 0.31)
	pt3dadd(-13.12, 78.23, -6, 0.31)
	pt3dadd(-12.19, 78.8, -6.25, 0.31)
	pt3dadd(-11.25, 79.23, -6.25, 0.31)
	pt3dadd(-10.26, 79.55, -6.25, 0.31)
	pt3dadd(-9.01, 80.36, -6, 0.31)
	pt3dadd(-7.57, 80.48, -6, 0.31)
	pt3dadd(-6.76, 80.23, -6, 0.31)
  }
  dend[282] {pt3dclear()
	pt3dadd(-18.55, 75.31, -6, 0.37)
	pt3dadd(-18.36, 74.38, -6.25, 0.31)
	pt3dadd(-17.92, 73.56, -6.25, 0.31)
	pt3dadd(-17.3, 72.63, -6.25, 0.31)
	pt3dadd(-16.48, 72.44, -6.25, 0.31)
	pt3dadd(-15.37, 72.06, -6.25, 0.31)
	pt3dadd(-14.99, 71.56, -6.25, 0.31)
	pt3dadd(-14.31, 71.26, -6.25, 0.31)
	pt3dadd(-13.62, 70.76, -6.25, 0.31)
	pt3dadd(-12.69, 70.51, -6.25, 0.31)
	pt3dadd(-12, 70.31, -6.25, 0.31)
	pt3dadd(-11.19, 69.95, -6.25, 0.31)
	pt3dadd(-10.69, 69.51, -6.25, 0.31)
  }
  dend[283] {pt3dclear()
	pt3dadd(-26.18, 72.65, -6.5, 0.56)
	pt3dadd(-25.34, 72.13, -6.5, 0.56)
	pt3dadd(-24.41, 71.45, -6.5, 0.44)
	pt3dadd(-23.91, 70.81, -6.5, 0.44)
	pt3dadd(-23.1, 70.51, -6.5, 0.44)
	pt3dadd(-22.41, 69.83, -6.5, 0.44)
	pt3dadd(-22.35, 69.64, -6.25, 0.44)
	pt3dadd(-21.91, 69.14, -6.25, 0.44)
	pt3dadd(-21.66, 68.7, -6.25, 0.44)
  }
  dend[284] {pt3dclear()
	pt3dadd(-21.66, 68.7, -6.25, 0.44)
	pt3dadd(-21.91, 67.83, -6.25, 0.44)
	pt3dadd(-21.85, 67.2, -6.25, 0.44)
	pt3dadd(-21.35, 66.65, -6.25, 0.44)
	pt3dadd(-21.04, 66.08, -6.25, 0.44)
	pt3dadd(-20.48, 65.59, -6.25, 0.44)
	pt3dadd(-19.79, 64.9, -6.25, 0.44)
	pt3dadd(-18.86, 64.09, -6.25, 0.44)
	pt3dadd(-18.23, 63.59, -6.25, 0.44)
	pt3dadd(-17.67, 62.97, -6.25, 0.44)
	pt3dadd(-16.93, 62.41, -6.25, 0.44)
	pt3dadd(-16.18, 61.97, -6.25, 0.37)
	pt3dadd(-15.31, 61.47, -6.25, 0.37)
	pt3dadd(-14.93, 61.04, -6.25, 0.37)
	pt3dadd(-14.06, 60.66, -6.25, 0.5)
	pt3dadd(-13.56, 60.29, -6.25, 0.5)
	pt3dadd(-12.5, 59.54, -6.25, 0.37)
	pt3dadd(-11.75, 59.1, -6.25, 0.37)
	pt3dadd(-11.5, 58.6, -6.25, 0.37)
  }
  dend[285] {pt3dclear()
	pt3dadd(-21.66, 68.7, -6.25, 0.44)
	pt3dadd(-20.67, 68.33, -6.5, 0.37)
	pt3dadd(-19.86, 68.2, -6.5, 0.37)
  }
  dend[286] {pt3dclear()
	pt3dadd(-19.86, 68.2, -6.5, 0.37)
	pt3dadd(-19.67, 67.33, -6.5, 0.37)
	pt3dadd(-19.11, 66.58, -6.5, 0.37)
	pt3dadd(-18.67, 66.27, -6.5, 0.37)
	pt3dadd(-17.98, 65.95, -6.5, 0.37)
	pt3dadd(-17.43, 65.59, -6.5, 0.37)
	pt3dadd(-16.86, 65.03, -6.5, 0.37)
	pt3dadd(-16.12, 64.7, -6.5, 0.37)
	pt3dadd(-15.31, 64.34, -6.5, 0.37)
	pt3dadd(-14.5, 63.53, -6.25, 0.25)
	pt3dadd(-13.87, 63.15, -6.25, 0.25)
	pt3dadd(-13, 63.03, -6.25, 0.25)
	pt3dadd(-11.88, 63.09, -6.25, 0.62)
  }
  dend[287] {pt3dclear()
	pt3dadd(-19.86, 68.2, -6.5, 0.37)
	pt3dadd(-19.17, 68.83, -6.5, 0.44)
	pt3dadd(-18.05, 69.2, -6.5, 0.44)
	pt3dadd(-17.18, 69.89, -6.5, 0.44)
	pt3dadd(-16.37, 69.95, -6.75, 0.44)
	pt3dadd(-15.74, 69.95, -6.75, 0.44)
	pt3dadd(-15.18, 69.39, -6.5, 0.44)
	pt3dadd(-14.37, 68.95, -6.5, 0.44)
	pt3dadd(-13.75, 68.64, -6.5, 0.44)
	pt3dadd(-13.12, 68.2, -6.5, 0.44)
	pt3dadd(-12, 67.27, -6.5, 0.44)
	pt3dadd(-10.82, 66.7, -6.5, 0.44)
  }
  dend[288] {pt3dclear()
	pt3dadd(-27.56, 73.31, -6.5, 0.56)
	pt3dadd(-27.28, 73.88, -6.5, 0.5)
	pt3dadd(-26.96, 74.81, -6.5, 0.5)
	pt3dadd(-26.71, 75.5, -6.5, 0.5)
	pt3dadd(-26.59, 76.25, -6.5, 0.5)
	pt3dadd(-26.53, 76.87, -6.5, 0.5)
	pt3dadd(-26.34, 77.81, -6.5, 0.5)
	pt3dadd(-26.59, 78.93, -6.5, 0.5)
  }
  dend[289] {pt3dclear()
	pt3dadd(-26.59, 78.93, -6.5, 0.5)
	pt3dadd(-26.03, 80.67, -6.5, 0.44)
	pt3dadd(-26.09, 81.92, -6.5, 0.44)
	pt3dadd(-26.53, 82.86, -6.5, 0.44)
	pt3dadd(-26.34, 83.54, -6.5, 0.44)
	pt3dadd(-26.28, 84.35, -6.25, 0.44)
	pt3dadd(-25.72, 84.98, -6.25, 0.44)
	pt3dadd(-25.03, 85.85, -6.25, 0.44)
	pt3dadd(-24.1, 86.22, -6, 0.44)
	pt3dadd(-22.85, 86.78, -6, 0.44)
  }
  dend[290] {pt3dclear()
	pt3dadd(-26.59, 78.93, -6.5, 0.5)
	pt3dadd(-27.09, 79.36, -6.5, 0.37)
	pt3dadd(-27.71, 80.42, -6.75, 0.37)
	pt3dadd(-28.34, 81.23, -6.75, 0.37)
	pt3dadd(-29.21, 82.29, -6.75, 0.37)
	pt3dadd(-29.96, 83.17, -6.75, 0.37)
	pt3dadd(-30.33, 83.67, -6.75, 0.37)
	pt3dadd(-31.08, 84.54, -6.75, 0.37)
	pt3dadd(-31.39, 85.29, -6.75, 0.37)
	pt3dadd(-31.02, 86.41, -6.75, 0.37)
	pt3dadd(-30.46, 86.91, -6.75, 0.37)
	pt3dadd(-30.21, 87.72, -6.75, 0.37)
	pt3dadd(-30.27, 88.22, -6.75, 0.37)
	pt3dadd(-30.52, 88.9, -6.75, 0.37)
	pt3dadd(-30.89, 89.4, -6.75, 0.37)
	pt3dadd(-31.08, 89.9, -6.75, 0.37)
	pt3dadd(-30.95, 91.27, -6.5, 0.37)
	pt3dadd(-30.7, 92.08, -6.5, 0.37)
	pt3dadd(-30.14, 92.58, -6.5, 0.37)
	pt3dadd(-29.27, 93.14, -6.5, 0.37)
	pt3dadd(-28.9, 93.58, -6.5, 0.31)
  }
  dend[291] {pt3dclear()
	pt3dadd(-43.11, 62.58, -6.75, 1.81)
	pt3dadd(-42.24, 62.03, -6.75, 0.87)
	pt3dadd(-41.18, 61.72, -6.75, 0.5)
	pt3dadd(-39.93, 61.35, -6.75, 0.44)
	pt3dadd(-38.75, 61.16, -6.75, 0.5)
	pt3dadd(-37.75, 60.91, -6.75, 0.69)
	pt3dadd(-36.63, 60.79, -6.75, 0.69)
	pt3dadd(-35.88, 60.47, -6.75, 0.69)
	pt3dadd(-35.54, 60.53, -6.75, 0.69)
  }
  dend[292] {pt3dclear()
	pt3dadd(-35.54, 60.53, -6.75, 0.69)
	pt3dadd(-34.76, 60.54, -6.75, 0.69)
  }
}
proc shape3d_12() {
  dend[292] {	pt3dadd(-33.39, 60.85, -6.5, 0.69)
	pt3dadd(-32.08, 60.54, -6.5, 0.69)
	pt3dadd(-30.95, 60.35, -6.5, 0.62)
	pt3dadd(-30.08, 59.91, -6.5, 0.62)
  }
  dend[293] {pt3dclear()
	pt3dadd(-30.08, 59.91, -6.5, 0.62)
	pt3dadd(-29.77, 60.6, -6.25, 0.56)
	pt3dadd(-28.83, 60.72, -6.25, 0.56)
	pt3dadd(-28.15, 60.6, -6.25, 0.56)
	pt3dadd(-27.21, 60.29, -6.25, 0.56)
	pt3dadd(-26.59, 59.85, -6.25, 0.56)
	pt3dadd(-25.84, 59.35, -6.25, 0.56)
	pt3dadd(-25.09, 58.67, -6.25, 0.56)
	pt3dadd(-24.41, 58.35, -6.25, 0.56)
	pt3dadd(-23.91, 57.73, -6.25, 0.56)
	pt3dadd(-23.22, 57.23, -6.25, 0.56)
	pt3dadd(-22.54, 56.42, -6.25, 0.56)
	pt3dadd(-21.66, 55.99, -6.25, 0.56)
	pt3dadd(-20.98, 55.3, -6.25, 0.56)
	pt3dadd(-20.04, 55.17, -6.25, 0.56)
	pt3dadd(-19.42, 54.99, -6.25, 0.56)
  }
  dend[294] {pt3dclear()
	pt3dadd(-30.08, 59.91, -6.5, 0.62)
	pt3dadd(-29.58, 59.35, -6.5, 0.5)
	pt3dadd(-28.77, 58.92, -6.5, 0.5)
	pt3dadd(-28.15, 58.23, -6.5, 0.5)
	pt3dadd(-27.77, 57.79, -6.5, 0.5)
	pt3dadd(-26.96, 56.8, -6.25, 0.5)
	pt3dadd(-25.97, 55.74, -6.25, 0.5)
	pt3dadd(-25.72, 54.86, -6.25, 0.5)
	pt3dadd(-24.78, 54.18, -6.25, 0.5)
	pt3dadd(-23.35, 53.37, -6.25, 0.5)
	pt3dadd(-22.54, 52.74, -6.25, 0.5)
	pt3dadd(-21.17, 52.43, -6.25, 0.5)
	pt3dadd(-20.04, 52.12, -6.25, 0.5)
	pt3dadd(-19.05, 52, -6.25, 0.5)
	pt3dadd(-18.23, 51.43, -6.25, 0.5)
	pt3dadd(-17.48, 50.87, -6.25, 0.5)
	pt3dadd(-16.86, 50.31, -6.25, 0.5)
	pt3dadd(-16.3, 49.81, -6.25, 0.5)
  }
  dend[295] {pt3dclear()
	pt3dadd(-35.54, 60.53, -6.75, 0.69)
	pt3dadd(-34.76, 61.1, -6.75, 0.69)
	pt3dadd(-34.38, 61.35, -6.75, 0.69)
  }
  dend[296] {pt3dclear()
	pt3dadd(-34.38, 61.35, -6.75, 0.69)
	pt3dadd(-34.94, 61.72, -6.75, 0.25)
	pt3dadd(-35.63, 62.28, -6.75, 0.25)
	pt3dadd(-36.44, 62.72, -6.75, 0.5)
	pt3dadd(-37.31, 62.91, -6.75, 0.62)
	pt3dadd(-38.11, 62.97, -6.75, 0.62)
	pt3dadd(-39.11, 63.28, -6.75, 0.62)
  }
  dend[297] {pt3dclear()
	pt3dadd(-34.38, 61.35, -6.75, 0.69)
	pt3dadd(-33.57, 61.66, -6.75, 0.44)
	pt3dadd(-32.82, 62.03, -6.75, 0.44)
  }
  dend[298] {pt3dclear()
	pt3dadd(-32.82, 62.03, -6.75, 0.44)
	pt3dadd(-33.76, 62.84, -6.5, 0.31)
	pt3dadd(-34.07, 63.72, -6.5, 0.31)
	pt3dadd(-34.76, 64.09, -6.5, 0.31)
	pt3dadd(-35.07, 64.34, -6.5, 0.31)
  }
  dend[299] {pt3dclear()
	pt3dadd(-32.82, 62.03, -6.75, 0.44)
	pt3dadd(-32.01, 62.41, -6.75, 0.5)
	pt3dadd(-31.33, 62.78, -6.75, 0.5)
	pt3dadd(-30.27, 62.84, -6.75, 0.5)
	pt3dadd(-29.58, 63.09, -6.75, 0.5)
	pt3dadd(-29.02, 63.53, -6.75, 0.5)
	pt3dadd(-28.65, 64.2, -6.75, 0.5)
	pt3dadd(-28.58, 65.27, -6.75, 0.5)
	pt3dadd(-28.71, 66.27, -6.75, 0.5)
	pt3dadd(-28.77, 67.27, -6.75, 0.5)
	pt3dadd(-28.96, 67.52, -6.75, 0.5)
  }
  dend[300] {pt3dclear()
	pt3dadd(-44.5, 61.09, -6.75, 1.87)
	pt3dadd(-44.92, 61.85, -6.75, 0.75)
	pt3dadd(-45.36, 62.59, -6.75, 0.44)
	pt3dadd(-45.98, 63.4, -6.75, 0.31)
	pt3dadd(-46.79, 64.59, -6.75, 0.31)
	pt3dadd(-47.29, 65.77, -6.75, 0.44)
	pt3dadd(-47.66, 66.77, -6.75, 0.87)
	pt3dadd(-48.41, 67.77, -6.75, 0.87)
  }
  dend[301] {pt3dclear()
	pt3dadd(-48.41, 67.77, -6.75, 0.87)
	pt3dadd(-48.47, 68.64, -6.75, 0.44)
	pt3dadd(-48.78, 69.58, -6.75, 0.44)
	pt3dadd(-49.53, 70.7, -6.75, 0.44)
	pt3dadd(-50.03, 71.51, -6.75, 0.62)
	pt3dadd(-50.59, 72.69, -6.5, 0.62)
	pt3dadd(-51.96, 74, -6.5, 0.62)
	pt3dadd(-53.09, 75.31, -6.5, 0.62)
	pt3dadd(-54.33, 76.18, -6.5, 0.62)
	pt3dadd(-55.52, 76.87, -6.5, 0.62)
	pt3dadd(-57.57, 78.05, -6.5, 0.62)
  }
  dend[302] {pt3dclear()
	pt3dadd(-48.41, 67.77, -6.75, 0.87)
	pt3dadd(-49.28, 68.02, -6.75, 0.5)
	pt3dadd(-50.72, 68.77, -6.75, 0.5)
	pt3dadd(-51.65, 69.64, -6.75, 0.5)
	pt3dadd(-53.34, 71.26, -6.75, 0.5)
	pt3dadd(-54.64, 72.51, -6.75, 0.5)
	pt3dadd(-56.02, 73.56, -6.75, 0.5)
	pt3dadd(-56.64, 74.31, -6.75, 0.5)
	pt3dadd(-57.45, 74.81, -6.5, 0.5)
	pt3dadd(-59.07, 75.69, -6.5, 0.5)
  }
  dend[303] {pt3dclear()
	pt3dadd(-46.86, 57.79, -6.75, 2.62)
	pt3dadd(-45.96, 52.09, -6.75, 1.74)
	pt3dadd(-46.99, 51.53, -6.5, 0.92)
	pt3dadd(-47.86, 51.17, -6.5, 0.51)
	pt3dadd(-48.78, 50.86, -6.5, 0.51)
  }
  dend[304] {pt3dclear()
	pt3dadd(-48.78, 50.86, -6.5, 0.51)
	pt3dadd(-49.32, 49.77, -6.5, 0.61)
  }
  dend[305] {pt3dclear()
	pt3dadd(-49.32, 49.77, -6.5, 0.61)
	pt3dadd(-49.08, 50.25, -6.5, 0.61)
	pt3dadd(-49.34, 49.73, -6.5, 0.61)
	pt3dadd(-49.65, 49.12, -6.5, 0.61)
  }
  dend[306] {pt3dclear()
	pt3dadd(-49.65, 49.12, -6.5, 0.61)
	pt3dadd(-50.36, 48.81, -6.5, 0.61)
	pt3dadd(-50.98, 48.61, -6.5, 0.61)
	pt3dadd(-51.64, 48.51, -6.5, 0.61)
	pt3dadd(-52.41, 48.15, -6.5, 0.72)
	pt3dadd(-53.18, 47.74, -6.5, 0.61)
	pt3dadd(-53.74, 47.38, -6.5, 0.41)
	pt3dadd(-54.15, 47.02, -6.5, 0.51)
	pt3dadd(-55.02, 46.72, -6.5, 0.72)
	pt3dadd(-55.48, 46.77, -6.5, 0.97)
  }
  dend[307] {pt3dclear()
	pt3dadd(-49.65, 49.12, -6.5, 0.61)
	pt3dadd(-49.29, 48.56, -6.5, 0.77)
	pt3dadd(-49.08, 47.89, -6.5, 0.56)
	pt3dadd(-48.83, 47.23, -6.5, 0.56)
	pt3dadd(-48.57, 46.72, -6.5, 0.56)
	pt3dadd(-48.27, 46.46, -6.5, 0.56)
	pt3dadd(-47.81, 46.05, -6.5, 0.56)
  }
  dend[308] {pt3dclear()
	pt3dadd(-47.81, 46.05, -6.5, 0.56)
	pt3dadd(-47.5, 45.85, -6.5, 0.56)
	pt3dadd(-47.5, 45.39, -6.5, 0.56)
	pt3dadd(-47.09, 45.18, -6.5, 0.56)
	pt3dadd(-46.68, 45.13, -6.5, 0.56)
	pt3dadd(-45.96, 44.93, -6.5, 0.56)
	pt3dadd(-45.3, 44.82, -6.5, 0.56)
	pt3dadd(-44.99, 44.62, -6.5, 0.56)
	pt3dadd(-44.38, 44.31, -6.5, 0.56)
	pt3dadd(-44.02, 44.21, -6.5, 0.56)
	pt3dadd(-43.51, 44.01, -6.5, 0.72)
	pt3dadd(-43.05, 43.55, -6.5, 0.67)
  }
  dend[309] {pt3dclear()
	pt3dadd(-47.81, 46.05, -6.5, 0.56)
	pt3dadd(-48.16, 45.54, -6.75, 0.67)
	pt3dadd(-48.52, 45.23, -6.75, 0.67)
	pt3dadd(-48.57, 44.88, -6.75, 0.67)
	pt3dadd(-48.22, 44.62, -6.75, 0.67)
	pt3dadd(-47.91, 44.16, -6.75, 0.41)
	pt3dadd(-47.5, 43.75, -6.75, 0.31)
	pt3dadd(-47.19, 43.49, -6.75, 0.31)
	pt3dadd(-46.89, 43.19, -6.75, 0.41)
	pt3dadd(-46.68, 42.78, -6.75, 0.41)
	pt3dadd(-46.22, 42.52, -6.75, 0.41)
	pt3dadd(-45.96, 42.37, -6.75, 0.41)
	pt3dadd(-45.61, 41.91, -6.75, 0.41)
  }
  dend[310] {pt3dclear()
	pt3dadd(-49.32, 49.77, -6.5, 0.61)
	pt3dadd(-49.34, 51.06, -6.5, 0.41)
	pt3dadd(-49.8, 51.12, -6.5, 0.36)
	pt3dadd(-50.31, 51.17, -6.5, 0.36)
	pt3dadd(-51.13, 51.32, -6.5, 0.36)
	pt3dadd(-51.8, 51.53, -6.5, 0.61)
	pt3dadd(-52.41, 51.68, -6.5, 0.82)
  }
  dend[311] {pt3dclear()
	pt3dadd(-52.41, 51.68, -6.5, 0.82)
	pt3dadd(-52.97, 52.34, -6.5, 0.61)
	pt3dadd(-53.64, 52.7, -6.5, 0.61)
	pt3dadd(-54.3, 53.11, -6.5, 0.56)
	pt3dadd(-54.97, 53.67, -6.5, 0.56)
	pt3dadd(-55.58, 54.03, -6.5, 0.56)
	pt3dadd(-56.09, 54.13, -6.5, 0.56)
	pt3dadd(-56.86, 54.19, -6.5, 0.56)
	pt3dadd(-57.37, 54.24, -6.5, 0.56)
	pt3dadd(-57.88, 54.24, -6.5, 0.56)
	pt3dadd(-58.5, 54.34, -6.5, 0.56)
	pt3dadd(-58.86, 54.39, -6.5, 0.56)
	pt3dadd(-59.32, 54.44, -6.5, 0.56)
	pt3dadd(-60.03, 54.49, -6.5, 0.56)
	pt3dadd(-60.29, 54.54, -6.5, 0.56)
	pt3dadd(-60.59, 54.59, -6.5, 0.56)
	pt3dadd(-61.26, 54.95, -6.5, 0.56)
	pt3dadd(-62.28, 55.36, -6.5, 0.46)
	pt3dadd(-62.9, 55.62, -6.5, 0.41)
  }
  dend[312] {pt3dclear()
	pt3dadd(-52.41, 51.68, -6.5, 0.82)
	pt3dadd(-52.82, 51.32, -6.5, 0.41)
	pt3dadd(-53.43, 51.17, -6.5, 0.41)
	pt3dadd(-53.54, 51.06, -6.5, 0.41)
	pt3dadd(-54, 50.86, -6.5, 0.41)
	pt3dadd(-54.61, 50.55, -6.5, 0.41)
	pt3dadd(-54.92, 50.3, -6.5, 0.41)
	pt3dadd(-55.27, 50.14, -6.5, 0.41)
	pt3dadd(-56.14, 50.14, -6.5, 0.41)
	pt3dadd(-56.45, 50.14, -6.5, 0.41)
	pt3dadd(-57.06, 50.2, -6.5, 0.41)
	pt3dadd(-57.63, 50.14, -6.5, 0.41)
	pt3dadd(-58.09, 50.14, -6.5, 0.41)
	pt3dadd(-58.55, 50.3, -6.5, 0.41)
	pt3dadd(-59.06, 50.4, -6.5, 0.41)
	pt3dadd(-59.42, 50.4, -6.5, 0.41)
	pt3dadd(-59.98, 50.4, -6.5, 0.41)
  }
  dend[313] {pt3dclear()
	pt3dadd(-59.98, 50.4, -6.5, 0.41)
	pt3dadd(-60.03, 49.68, -6.5, 0.41)
	pt3dadd(-60.13, 49.22, -6.5, 0.41)
	pt3dadd(-60.19, 48.87, -6.5, 0.41)
	pt3dadd(-60.13, 48.51, -6.5, 0.41)
	pt3dadd(-60.03, 48.35, -6.5, 0.41)
	pt3dadd(-59.88, 47.84, -6.5, 0.41)
	pt3dadd(-59.67, 47.28, -6.25, 0.51)
  }
}
proc shape3d_13() {
  dend[313] {	pt3dadd(-59.26, 46.87, -6.25, 0.51)
	pt3dadd(-59.06, 46.56, -6.25, 0.51)
	pt3dadd(-58.86, 46.1, -6.25, 0.51)
  }
  dend[314] {pt3dclear()
	pt3dadd(-59.98, 50.4, -6.5, 0.41)
	pt3dadd(-60.34, 50.86, -6.5, 0.51)
	pt3dadd(-60.9, 51.22, -6.5, 0.51)
	pt3dadd(-61.72, 51.37, -6.5, 0.51)
	pt3dadd(-62.18, 51.53, -6.5, 0.51)
	pt3dadd(-62.69, 51.68, -6.5, 0.82)
	pt3dadd(-63.41, 52.29, -6.5, 0.82)
  }
  dend[315] {pt3dclear()
	pt3dadd(-63.41, 52.29, -6.5, 0.82)
	pt3dadd(-63.82, 51.99, -6.5, 0.67)
	pt3dadd(-64.53, 51.58, -6.25, 0.36)
	pt3dadd(-65.09, 51.47, -6.25, 0.36)
	pt3dadd(-65.61, 51.27, -6.25, 0.36)
	pt3dadd(-66.02, 51.06, -6.25, 0.36)
	pt3dadd(-66.58, 50.71, -6, 0.72)
	pt3dadd(-67.23, 50.09, -6, 0.72)
	pt3dadd(-67.5, 49.89, -6, 0.72)
	pt3dadd(-67.86, 49.68, -6, 0.72)
  }
  dend[316] {pt3dclear()
	pt3dadd(-67.86, 49.68, -6, 0.72)
	pt3dadd(-67.7, 48.97, -6, 0.56)
	pt3dadd(-67.7, 48.3, -6, 0.56)
	pt3dadd(-67.59, 47.59, -5.75, 0.56)
	pt3dadd(-67.4, 47.28, -5.75, 0.56)
	pt3dadd(-67.09, 46.67, -5.75, 0.56)
  }
  dend[317] {pt3dclear()
	pt3dadd(-67.86, 49.68, -6, 0.72)
	pt3dadd(-68.52, 49.79, -6, 0.51)
	pt3dadd(-69.19, 49.43, -6, 0.51)
	pt3dadd(-69.75, 49.43, -6, 0.51)
  }
  dend[318] {pt3dclear()
	pt3dadd(-63.41, 52.29, -6.5, 0.82)
	pt3dadd(-64.02, 52.34, -6.5, 0.51)
	pt3dadd(-64.48, 53.01, -6.5, 0.51)
	pt3dadd(-64.89, 53.32, -6.5, 0.51)
	pt3dadd(-65.61, 53.93, -6.5, 0.51)
	pt3dadd(-65.91, 54.44, -6.5, 0.51)
	pt3dadd(-66.31, 54.85, -6.5, 0.51)
	pt3dadd(-66.63, 55.21, -6.5, 0.51)
	pt3dadd(-67.23, 55.21, -6.5, 0.51)
	pt3dadd(-67.86, 55.21, -6.5, 0.51)
	pt3dadd(-68.42, 55.26, -6.5, 0.51)
	pt3dadd(-68.78, 55.21, -6.5, 0.51)
	pt3dadd(-69.09, 54.85, -6.5, 0.51)
	pt3dadd(-69.5, 54.75, -6.5, 0.51)
	pt3dadd(-70.01, 54.29, -6.25, 0.51)
	pt3dadd(-70.26, 53.98, -6.25, 0.51)
	pt3dadd(-70.42, 53.47, -6.25, 0.51)
	pt3dadd(-70.2, 53.11, -6.25, 0.51)
	pt3dadd(-69.9, 53.01, -6.25, 0.51)
	pt3dadd(-69.55, 52.86, -6.25, 0.51)
	pt3dadd(-68.88, 52.8, -6.25, 0.51)
	pt3dadd(-68.37, 52.86, -6.25, 0.51)
	pt3dadd(-67.7, 52.96, -6.25, 0.51)
	pt3dadd(-67.19, 53.06, -6.25, 0.26)
  }
  dend[319] {pt3dclear()
	pt3dadd(-48.78, 50.86, -6.5, 0.51)
	pt3dadd(-49.37, 51.73, -6.75, 0.18)
	pt3dadd(-50.24, 52.6, -6.75, 0.18)
	pt3dadd(-50.34, 53.37, -6.75, 0.18)
  }
  dend[320] {pt3dclear()
	pt3dadd(-50.34, 53.37, -6.75, 0.18)
	pt3dadd(-49.62, 53.78, -6.75, 0.18)
	pt3dadd(-49.37, 54.6, -6.75, 0.18)
	pt3dadd(-49.42, 54.96, -6.75, 0.18)
	pt3dadd(-49.78, 55.83, -6.75, 0.18)
	pt3dadd(-50.49, 56.44, -6.75, 0.18)
	pt3dadd(-51.21, 57.26, -6.75, 0.18)
	pt3dadd(-51.98, 57.67, -6.75, 0.18)
  }
  dend[321] {pt3dclear()
	pt3dadd(-50.34, 53.37, -6.75, 0.18)
	pt3dadd(-50.8, 53.98, -6.75, 0.18)
	pt3dadd(-51.93, 54.85, -6.75, 0.18)
	pt3dadd(-52.95, 55.42, -6.75, 0.18)
	pt3dadd(-53.31, 55.93, -6.75, 0.18)
	pt3dadd(-54.38, 56.39, -6.75, 0.18)
	pt3dadd(-55.92, 56.64, -6.75, 0.18)
	pt3dadd(-57.14, 56.95, -7, 0.18)
  }
  dend[322] {pt3dclear()
	pt3dadd(-57.14, 56.95, -7, 0.18)
	pt3dadd(-57.96, 57.51, -7, 0.18)
	pt3dadd(-59.04, 58.59, -7, 0.18)
	pt3dadd(-59.8, 59.2, -7, 0.18)
	pt3dadd(-60.83, 59.82, -7, 0.18)
  }
  dend[323] {pt3dclear()
	pt3dadd(-57.14, 56.95, -7, 0.18)
	pt3dadd(-57.45, 56.29, -7, 0.18)
	pt3dadd(-58.22, 56.08, -7, 0.18)
	pt3dadd(-58.93, 56.03, -7, 0.18)
	pt3dadd(-60.37, 56.29, -7, 0.18)
	pt3dadd(-61.34, 56.9, -7, 0.18)
  }
  dend[324] {pt3dclear()
	pt3dadd(-44.6, 53.06, -6.75, 2.12)
	pt3dadd(-43.42, 53.87, -6.75, 0.94)
	pt3dadd(-42.55, 54.3, -6.75, 0.37)
	pt3dadd(-41.37, 54.36, -6.75, 0.37)
	pt3dadd(-40.36, 54.36, -6.75, 0.37)
	pt3dadd(-39.36, 54.36, -6.75, 0.37)
	pt3dadd(-38.75, 54.49, -6.75, 0.94)
	pt3dadd(-37.86, 54.7, -6.75, 0.94)
  }
  dend[325] {pt3dclear()
	pt3dadd(-37.86, 54.7, -6.75, 0.94)
	pt3dadd(-37.38, 55.3, -6.75, 0.94)
	pt3dadd(-36.5, 55.8, -6.75, 0.94)
  }
  dend[326] {pt3dclear()
	pt3dadd(-36.5, 55.8, -6.75, 0.94)
	pt3dadd(-35.57, 56.42, -7, 0.62)
	pt3dadd(-34.82, 57.29, -7, 0.62)
	pt3dadd(-33.88, 58.29, -7, 0.62)
	pt3dadd(-33.2, 59.23, -7.25, 0.62)
	pt3dadd(-32.7, 59.79, -7.25, 0.62)
	pt3dadd(-32.08, 60.79, -7.25, 0.62)
  }
  dend[327] {pt3dclear()
	pt3dadd(-36.5, 55.8, -6.75, 0.94)
	pt3dadd(-35.75, 55.3, -6.75, 0.25)
	pt3dadd(-35.07, 54.93, -6.75, 0.25)
	pt3dadd(-34.2, 54.68, -6.75, 0.25)
	pt3dadd(-33.7, 54.18, -6.75, 0.25)
	pt3dadd(-32.89, 53.99, -6.75, 0.25)
	pt3dadd(-32.2, 53.87, -6.75, 0.62)
	pt3dadd(-31.39, 53.18, -6.75, 0.62)
	pt3dadd(-30.95, 52.56, -6.75, 0.62)
	pt3dadd(-30.33, 51.62, -6.75, 0.62)
  }
  dend[328] {pt3dclear()
	pt3dadd(-30.33, 51.62, -6.75, 0.62)
	pt3dadd(-29.4, 51.93, -6.75, 0.44)
	pt3dadd(-28.65, 52, -6.5, 0.44)
	pt3dadd(-27.77, 51.56, -6.5, 0.44)
	pt3dadd(-27.03, 51.12, -6.5, 0.44)
	pt3dadd(-26.4, 50.44, -6.5, 0.44)
	pt3dadd(-25.78, 49.94, -6.5, 0.44)
	pt3dadd(-24.97, 49.75, -6.5, 0.44)
	pt3dadd(-24.16, 49.06, -6.5, 0.44)
	pt3dadd(-23.29, 48.44, -6.5, 0.44)
	pt3dadd(-22.23, 48.13, -6.5, 0.44)
	pt3dadd(-21.48, 47.69, -6.5, 0.44)
	pt3dadd(-20.48, 47.69, -6.5, 0.44)
	pt3dadd(-19.86, 47.63, -6.5, 0.44)
	pt3dadd(-18.98, 47.19, -6.5, 0.1898)
	pt3dadd(-18.3, 46.7, -6.5, 0.1898)
  }
  dend[329] {pt3dclear()
	pt3dadd(-30.33, 51.62, -6.75, 0.62)
	pt3dadd(-31.2, 51.37, -6.75, 0.5)
	pt3dadd(-32.33, 51.06, -6.75, 0.5)
	pt3dadd(-32.82, 50.75, -6.75, 0.5)
	pt3dadd(-33.39, 50.5, -6.75, 0.5)
	pt3dadd(-34.88, 50.37, -6.5, 0.5)
	pt3dadd(-35.63, 50.56, -6.5, 0.5)
	pt3dadd(-36.13, 50.75, -6.5, 0.5)
	pt3dadd(-36.88, 50.87, -6.5, 0.5)
	pt3dadd(-37.38, 50.87, -6.5, 0.5)
	pt3dadd(-38.11, 50.81, -6.5, 0.5)
	pt3dadd(-39.31, 50.94, -6.5, 0.1898)
	pt3dadd(-39.93, 51.31, -6.5, 0.1898)
	pt3dadd(-40.54, 51.87, -6.5, 0.1898)
	pt3dadd(-40.61, 52.12, -6.5, 0.1898)
  }
  dend[330] {pt3dclear()
	pt3dadd(-37.86, 54.7, -6.75, 0.94)
	pt3dadd(-37.54, 53.98, -7, 0.26)
	pt3dadd(-37.4, 53.27, -7, 0.26)
	pt3dadd(-36.99, 52.45, -7, 0.26)
	pt3dadd(-36.47, 51.37, -7, 0.26)
	pt3dadd(-36.02, 50.81, -7, 0.26)
	pt3dadd(-35.81, 49.99, -7, 0.26)
	pt3dadd(-35.71, 49.12, -7, 0.26)
	pt3dadd(-35.81, 48.61, -7, 0.26)
	pt3dadd(-36.07, 47.9, -7.25, 0.26)
	pt3dadd(-36.11, 46.82, -7.25, 0.26)
	pt3dadd(-36.17, 46.41, -7.25, 0.26)
	pt3dadd(-36.17, 46, -7.25, 0.26)
  }
  dend[331] {pt3dclear()
	pt3dadd(-36.17, 46, -7.25, 0.26)
	pt3dadd(-36.68, 45.8, -7.5, 0.26)
	pt3dadd(-37.7, 45.49, -7.5, 0.26)
	pt3dadd(-38.22, 45.19, -7.5, 0.26)
  }
  dend[332] {pt3dclear()
	pt3dadd(-36.17, 46, -7.25, 0.26)
	pt3dadd(-36.02, 44.67, -7.5, 0.26)
	pt3dadd(-35.81, 43.14, -7.5, 0.36)
	pt3dadd(-35.35, 42.17, -7.5, 0.36)
	pt3dadd(-35.25, 41.4, -7.5, 0.36)
	pt3dadd(-35.25, 40.27, -7.5, 0.36)
	pt3dadd(-35.15, 39.4, -7.5, 0.36)
	pt3dadd(-35.1, 38.69, -7.5, 0.36)
	pt3dadd(-35.15, 37.67, -7.75, 0.31)
	pt3dadd(-34.47, 36.74, -7.75, 0.31)
  }
  dend[333] {pt3dclear()
	pt3dadd(-38.71, 47.33, -6.75, 1.62)
	pt3dadd(-39.59, 45.46, -6.75, 2.4)
	pt3dadd(-39.89, 44.33, -6.75, 1.07)
	pt3dadd(-40.25, 43.41, -6.75, 0.67)
	pt3dadd(-40.65, 42.34, -6.75, 0.77)
	pt3dadd(-40.76, 41.76, -6.75, 0.77)
  }
  dend[334] {pt3dclear()
	pt3dadd(-40.76, 41.76, -6.75, 0.77)
	pt3dadd(-40.81, 41.37, -6.75, 1.23)
	pt3dadd(-41.38, 40.7, -6.75, 1.07)
	pt3dadd(-42.04, 40.19, -6.75, 1.02)
	pt3dadd(-42.86, 39.68, -6.75, 1.02)
	pt3dadd(-43.73, 39.27, -6.75, 0.87)
	pt3dadd(-44.75, 38.81, -6.75, 0.87)
	pt3dadd(-45.26, 38.5, -6.75, 0.87)
	pt3dadd(-46.03, 37.79, -6.75, 0.87)
	pt3dadd(-46.39, 37.58, -6.75, 0.87)
  }
  dend[335] {pt3dclear()
	pt3dadd(-46.39, 37.58, -6.75, 0.87)
	pt3dadd(-47.41, 37.68, -6.75, 0.61)
	pt3dadd(-48.38, 37.94, -6.75, 0.61)
	pt3dadd(-48.95, 38.4, -6.75, 0.56)
	pt3dadd(-49.61, 38.96, -6.75, 0.56)
  }
  dend[336] {pt3dclear()
	pt3dadd(-49.61, 38.96, -6.75, 0.56)
	pt3dadd(-49.97, 39.63, -6.75, 0.56)
	pt3dadd(-51.1, 40.29, -6.75, 0.56)
	pt3dadd(-51.3, 40.79, -6.75, 0.56)
	pt3dadd(-51.61, 41.31, -6.75, 0.56)
	pt3dadd(-52.07, 41.93, -6.75, 0.56)
  }
  dend[337] {pt3dclear()
	pt3dadd(-49.61, 38.96, -6.75, 0.56)
	pt3dadd(-49.82, 38.5, -6.5, 0.41)
  }
}
proc shape3d_14() {
  dend[337] {	pt3dadd(-50.23, 38.29, -6.5, 0.36)
	pt3dadd(-50.94, 38.35, -6.5, 0.36)
	pt3dadd(-51.4, 38.35, -6.5, 0.36)
	pt3dadd(-52.27, 38.09, -6.5, 0.36)
	pt3dadd(-52.84, 38.19, -6.5, 0.67)
	pt3dadd(-53.65, 37.99, -6.5, 0.82)
	pt3dadd(-54.22, 38.14, -6.5, 0.87)
	pt3dadd(-54.83, 38.35, -6.5, 0.87)
	pt3dadd(-55.7, 38.45, -6.5, 0.67)
	pt3dadd(-55.75, 39.17, -6.5, 0.61)
	pt3dadd(-55.9, 40.09, -6.5, 0.61)
	pt3dadd(-55.85, 40.79, -6.5, 0.61)
	pt3dadd(-55.34, 41.06, -6.5, 0.61)
	pt3dadd(-54.83, 41.06, -6.5, 0.61)
	pt3dadd(-54.11, 41.01, -6.5, 0.61)
  }
  dend[338] {pt3dclear()
	pt3dadd(-46.39, 37.58, -6.75, 0.87)
	pt3dadd(-47.14, 36.64, -6.75, 0.87)
  }
  dend[339] {pt3dclear()
	pt3dadd(-47.14, 36.64, -6.75, 0.87)
	pt3dadd(-47.46, 35.99, -6.75, 0.77)
	pt3dadd(-47.72, 35.43, -6.75, 0.77)
	pt3dadd(-47.87, 34.77, -6.75, 0.46)
	pt3dadd(-47.98, 34.26, -6.75, 0.46)
	pt3dadd(-48.16, 33.85, -6.75, 0.46)
  }
  dend[340] {pt3dclear()
	pt3dadd(-48.16, 33.85, -6.75, 0.46)
	pt3dadd(-48.33, 33.39, -6.75, 0.51)
	pt3dadd(-48.54, 32.93, -6.75, 0.56)
	pt3dadd(-48.74, 32.15, -6.75, 0.56)
	pt3dadd(-48.95, 31.14, -6.5, 0.56)
	pt3dadd(-49.21, 30.31, -6.5, 0.56)
  }
  dend[341] {pt3dclear()
	pt3dadd(-49.21, 30.31, -6.5, 0.56)
	pt3dadd(-48.64, 30.01, -6.5, 0.56)
	pt3dadd(-48.38, 29.14, -6.5, 0.56)
	pt3dadd(-48.23, 28.63, -6.5, 0.56)
	pt3dadd(-48.03, 27.76, -6.75, 0.56)
	pt3dadd(-47.82, 27.3, -6.75, 0.56)
	pt3dadd(-47.67, 26.63, -6.75, 0.56)
	pt3dadd(-47.62, 26.22, -6.75, 0.56)
	pt3dadd(-47.46, 25.87, -6.75, 0.56)
	pt3dadd(-47.34, 25.58, -6.75, 0.56)
  }
  dend[342] {pt3dclear()
	pt3dadd(-47.34, 25.58, -6.75, 0.56)
	pt3dadd(-47.21, 25.35, -6.75, 0.56)
	pt3dadd(-47.11, 24.89, -6.75, 0.56)
	pt3dadd(-46.65, 24.69, -6.75, 0.56)
	pt3dadd(-46.39, 24.33, -6.75, 0.56)
	pt3dadd(-46.24, 23.56, -6.5, 0.56)
	pt3dadd(-45.93, 22.85, -6.5, 0.56)
	pt3dadd(-45.64, 22.34, -6.5, 0.56)
  }
  dend[343] {pt3dclear()
	pt3dadd(-45.64, 22.34, -6.5, 0.56)
	pt3dadd(-45.37, 22.03, -6.5, 0.56)
	pt3dadd(-45.01, 21.67, -6.5, 0.56)
	pt3dadd(-44.55, 21.47, -6.5, 0.56)
	pt3dadd(-44.04, 20.7, -6.5, 0.56)
	pt3dadd(-43.47, 20.29, -6.5, 0.56)
	pt3dadd(-43.01, 20.19, -6.5, 0.56)
	pt3dadd(-42.81, 19.98, -6.5, 0.56)
	pt3dadd(-42.52, 19.73, -6.5, 0.56)
  }
  dend[344] {pt3dclear()
	pt3dadd(-42.52, 19.73, -6.5, 0.56)
	pt3dadd(-41.84, 19.57, -6.5, 0.56)
	pt3dadd(-41.43, 19.27, -6.5, 0.56)
	pt3dadd(-41.22, 19.05, -6.5, 0.56)
  }
  dend[345] {pt3dclear()
	pt3dadd(-42.52, 19.73, -6.5, 0.56)
	pt3dadd(-42.55, 19.07, -6.25, 0.62)
	pt3dadd(-42.55, 18.39, -6.25, 0.56)
	pt3dadd(-42.3, 17.96, -6.25, 0.56)
	pt3dadd(-41.99, 17.39, -6.25, 0.56)
	pt3dadd(-41.8, 16.82, -6.25, 0.56)
	pt3dadd(-41.68, 16.46, -6.25, 0.56)
	pt3dadd(-41.43, 15.9, -6.25, 0.56)
  }
  dend[346] {pt3dclear()
	pt3dadd(-41.43, 15.9, -6.25, 0.56)
	pt3dadd(-41.99, 15.52, -6.25, 0.56)
	pt3dadd(-42.67, 15.4, -6.25, 0.56)
	pt3dadd(-42.99, 14.9, -6.25, 0.56)
	pt3dadd(-42.86, 14.21, -6.25, 0.69)
  }
  dend[347] {pt3dclear()
	pt3dadd(-41.43, 15.9, -6.25, 0.56)
	pt3dadd(-40.93, 15.4, -6.25, 0.5)
	pt3dadd(-40.54, 15.09, -6.25, 0.5)
	pt3dadd(-39.93, 14.71, -6.25, 0.5)
	pt3dadd(-39.61, 14.4, -6, 0.62)
	pt3dadd(-39.06, 14.15, -6, 0.56)
	pt3dadd(-38.68, 14.09, -6, 0.44)
  }
  dend[348] {pt3dclear()
	pt3dadd(-45.64, 22.34, -6.5, 0.56)
	pt3dadd(-45.92, 21.82, -6.25, 0.75)
	pt3dadd(-46.48, 21.07, -6.25, 0.44)
	pt3dadd(-47.16, 19.82, -6.25, 0.62)
	pt3dadd(-47.91, 18.39, -6.25, 0.69)
  }
  dend[349] {pt3dclear()
	pt3dadd(-47.91, 18.39, -6.25, 0.69)
	pt3dadd(-47.16, 17.77, -6.25, 0.5)
	pt3dadd(-46.17, 16.71, -6.25, 0.44)
	pt3dadd(-45.85, 15.4, -6.25, 0.56)
	pt3dadd(-45.85, 14.09, -6.25, 0.56)
	pt3dadd(-45.92, 12.28, -6.25, 0.5)
	pt3dadd(-45.85, 10.66, -6.25, 0.44)
	pt3dadd(-45.48, 9.48, -6, 0.44)
	pt3dadd(-43.98, 8.03, -6, 0.44)
	pt3dadd(-42.11, 7.04, -6, 0.44)
  }
  dend[350] {pt3dclear()
	pt3dadd(-47.91, 18.39, -6.25, 0.69)
	pt3dadd(-49.28, 17.39, -6.25, 0.44)
	pt3dadd(-50.44, 16.85, -6.25, 0.44)
	pt3dadd(-50.95, 16.79, -6.25, 0.44)
  }
  dend[351] {pt3dclear()
	pt3dadd(-50.95, 16.79, -6.25, 0.44)
	pt3dadd(-52.65, 16.64, -6.25, 0.44)
	pt3dadd(-55.02, 17.07, -6.25, 0.44)
  }
  dend[352] {pt3dclear()
	pt3dadd(-55.02, 17.07, -6.25, 0.44)
	pt3dadd(-55.86, 16.82, -6.25, 0.44)
  }
  dend[353] {pt3dclear()
	pt3dadd(-55.86, 16.82, -6.25, 0.44)
	pt3dadd(-56.7, 16.55, -6.25, 0.44)
  }
  dend[354] {pt3dclear()
	pt3dadd(-56.7, 16.55, -6.25, 0.44)
	pt3dadd(-56.02, 16.77, -6.25, 0.44)
  }
  dend[355] {pt3dclear()
	pt3dadd(-56.7, 16.55, -6.25, 0.44)
	pt3dadd(-55.64, 18.32, -6.25, 0.31)
	pt3dadd(-56.52, 19.64, -6.25, 0.31)
	pt3dadd(-57.45, 20.64, -6.25, 0.31)
	pt3dadd(-59.07, 22.07, -6.25, 0.31)
	pt3dadd(-59.88, 22.94, -6.25, 0.31)
	pt3dadd(-62, 22.88, -6.25, 0.31)
	pt3dadd(-64.43, 22.32, -6.25, 0.31)
  }
  dend[356] {pt3dclear()
	pt3dadd(-55.86, 16.82, -6.25, 0.44)
	pt3dadd(-57.76, 16.21, -6.25, 0.44)
	pt3dadd(-57.2, 14.96, -6.25, 0.62)
	pt3dadd(-57.64, 13.53, -6.25, 0.5)
	pt3dadd(-57.01, 12.09, -6.25, 0.62)
	pt3dadd(-56.89, 9.48, -6.5, 0.56)
  }
  dend[357] {pt3dclear()
	pt3dadd(-55.02, 17.07, -6.25, 0.44)
	pt3dadd(-56.83, 18.07, -6.25, 0.1898)
	pt3dadd(-58.82, 18.77, -6.25, 0.1898)
	pt3dadd(-60.38, 19.7, -6.25, 0.1898)
	pt3dadd(-61.88, 20.51, -6.25, 0.1898)
	pt3dadd(-64.5, 20.45, -6.25, 0.1898)
  }
  dend[358] {pt3dclear()
	pt3dadd(-50.95, 16.79, -6.25, 0.44)
	pt3dadd(-50.9, 15.59, -6.25, 0.56)
	pt3dadd(-50.78, 14.09, -6.25, 0.56)
	pt3dadd(-51.15, 12.66, -6.25, 0.37)
	pt3dadd(-52.28, 12.41, -6.25, 0.31)
	pt3dadd(-54.27, 11.85, -6.25, 0.31)
  }
  dend[359] {pt3dclear()
	pt3dadd(-47.34, 25.58, -6.75, 0.56)
	pt3dadd(-47.66, 25.25, -6.25, 0.5)
	pt3dadd(-48.6, 24.25, -6.25, 0.25)
	pt3dadd(-49.47, 23.82, -6.25, 0.25)
	pt3dadd(-50.22, 22.76, -6.25, 0.62)
  }
  dend[360] {pt3dclear()
	pt3dadd(-50.22, 22.76, -6.25, 0.62)
	pt3dadd(-51.09, 22.69, -6, 0.44)
	pt3dadd(-52.4, 22.63, -6, 0.44)
	pt3dadd(-53.34, 22.63, -6, 0.44)
	pt3dadd(-54.27, 22.82, -6, 0.44)
	pt3dadd(-55.77, 23.01, -6, 0.44)
  }
  dend[361] {pt3dclear()
	pt3dadd(-50.22, 22.76, -6.25, 0.62)
	pt3dadd(-50.41, 21.07, -6.25, 0.44)
	pt3dadd(-50.84, 20.26, -6, 0.44)
	pt3dadd(-52.53, 19.07, -6, 0.44)
  }
  dend[362] {pt3dclear()
	pt3dadd(-49.21, 30.31, -6.5, 0.56)
	pt3dadd(-49.47, 30.05, -6.25, 0.62)
	pt3dadd(-50.28, 29.55, -6.25, 0.5)
	pt3dadd(-51.4, 29.18, -6.25, 0.5)
	pt3dadd(-52.34, 28.55, -6.25, 0.5)
  }
  dend[363] {pt3dclear()
	pt3dadd(-48.16, 33.85, -6.75, 0.46)
	pt3dadd(-49.16, 34.04, -6.25, 0.31)
	pt3dadd(-50.28, 33.97, -6.25, 0.31)
	pt3dadd(-51.71, 33.92, -6.25, 0.44)
	pt3dadd(-53.15, 34.35, -6.25, 0.44)
	pt3dadd(-54.58, 34.6, -6.25, 0.44)
  }
  dend[364] {pt3dclear()
	pt3dadd(-47.14, 36.64, -6.75, 0.87)
	pt3dadd(-46.84, 35.97, -6.75, 0.41)
	pt3dadd(-46.12, 35.47, -6.75, 0.41)
	pt3dadd(-45.56, 35.01, -6.75, 0.41)
	pt3dadd(-44.99, 34.65, -6.75, 0.41)
	pt3dadd(-44.23, 34.44, -6.75, 0.41)
  }
  dend[365] {pt3dclear()
	pt3dadd(-44.23, 34.44, -6.75, 0.41)
	pt3dadd(-44, 33.65, -6.75, 0.41)
  }
  dend[366] {pt3dclear()
	pt3dadd(-44, 33.65, -6.75, 0.41)
	pt3dadd(-44.07, 33.88, -6.75, 0.41)
	pt3dadd(-44.12, 33.36, -6.75, 0.41)
	pt3dadd(-44.28, 32.75, -6.75, 0.41)
	pt3dadd(-44.18, 31.83, -6.75, 0.41)
	pt3dadd(-44.07, 30.96, -6.75, 0.41)
	pt3dadd(-43.77, 30.56, -6.75, 0.41)
	pt3dadd(-43.51, 29.89, -6.75, 0.41)
	pt3dadd(-43.2, 29.12, -6.75, 0.41)
	pt3dadd(-43, 28.61, -6.75, 0.41)
	pt3dadd(-42.69, 27.38, -6.75, 0.31)
	pt3dadd(-41.92, 26.21, -6.75, 0.18)
	pt3dadd(-41.46, 25.54, -6.75, 0.18)
	pt3dadd(-41.31, 25.03, -6.75, 0.18)
  }
  dend[367] {pt3dclear()
	pt3dadd(-41.31, 25.03, -6.75, 0.18)
	pt3dadd(-41.62, 24.47, -6.75, 0.18)
	pt3dadd(-41.87, 24.01, -6.75, 0.18)
	pt3dadd(-41.46, 23.19, -6.5, 0.18)
	pt3dadd(-41.36, 22.47, -6.5, 0.36)
	pt3dadd(-41.21, 21.91, -6.5, 0.46)
  }
  dend[368] {pt3dclear()
	pt3dadd(-41.31, 25.03, -6.75, 0.18)
	pt3dadd(-40.65, 24.93, -6.75, 0.36)
	pt3dadd(-39.97, 24.77, -6.75, 0.36)
	pt3dadd(-39.52, 23.85, -6.75, 0.26)
	pt3dadd(-39.11, 23.14, -6.75, 0.26)
	pt3dadd(-38.7, 22.63, -6.75, 0.26)
	pt3dadd(-38.34, 21.71, -6.75, 0.26)
	pt3dadd(-37.47, 21.19, -6.75, 0.26)
	pt3dadd(-36.6, 20.84, -6.75, 0.26)
	pt3dadd(-36.09, 20.78, -6.75, 0.26)
  }
  dend[369] {pt3dclear()
	pt3dadd(-44, 33.65, -6.75, 0.41)
	pt3dadd(-43.56, 33.68, -6.75, 0.26)
  }
}
proc shape3d_15() {
  dend[369] {	pt3dadd(-43.31, 33.27, -6.75, 0.26)
	pt3dadd(-42.79, 32.75, -6.75, 0.26)
  }
  dend[370] {pt3dclear()
	pt3dadd(-42.79, 32.75, -6.75, 0.26)
	pt3dadd(-42.33, 33.22, -6.75, 0.26)
	pt3dadd(-41.62, 33.93, -6.75, 0.26)
  }
  dend[371] {pt3dclear()
	pt3dadd(-42.79, 32.75, -6.75, 0.26)
	pt3dadd(-42.39, 31.78, -7, 0.26)
	pt3dadd(-41.52, 31.27, -7, 0.26)
	pt3dadd(-41.11, 30.56, -7, 0.36)
	pt3dadd(-40.65, 29.79, -7, 0.36)
	pt3dadd(-40.54, 29.07, -7, 0.36)
	pt3dadd(-40.08, 28.2, -7, 0.36)
  }
  dend[372] {pt3dclear()
	pt3dadd(-44.23, 34.44, -6.75, 0.41)
	pt3dadd(-44.18, 35.06, -6.75, 0.36)
	pt3dadd(-43.72, 35.67, -6.75, 0.36)
	pt3dadd(-43.05, 36.28, -7, 0.36)
	pt3dadd(-42.49, 36.49, -7, 0.36)
	pt3dadd(-41.82, 36.64, -7, 0.36)
	pt3dadd(-41.31, 37.04, -7, 0.36)
	pt3dadd(-40.95, 37.46, -7, 0.36)
	pt3dadd(-40.54, 38.59, -7, 0.36)
	pt3dadd(-39.93, 38.94, -7, 0.36)
	pt3dadd(-39.21, 38.79, -7, 0.36)
	pt3dadd(-38.54, 38.43, -7, 0.36)
	pt3dadd(-37.47, 38.38, -7, 0.36)
  }
  dend[373] {pt3dclear()
	pt3dadd(-40.76, 41.76, -6.75, 0.77)
	pt3dadd(-39.83, 41.14, -6.75, 0.31)
	pt3dadd(-38.7, 40.22, -6.75, 0.31)
	pt3dadd(-37.83, 39.65, -6.75, 0.31)
  }
  dend[374] {pt3dclear()
	pt3dadd(-37.83, 39.65, -6.75, 0.31)
	pt3dadd(-36.81, 39.86, -6.75, 0.31)
	pt3dadd(-35.63, 40.11, -6.75, 0.26)
	pt3dadd(-33.89, 40.58, -7, 0.26)
	pt3dadd(-32.86, 40.79, -7, 0.46)
  }
  dend[375] {pt3dclear()
	pt3dadd(-32.86, 40.79, -7, 0.46)
	pt3dadd(-31.82, 40.39, -7, 0.56)
  }
  dend[376] {pt3dclear()
	pt3dadd(-31.82, 40.39, -7, 0.56)
	pt3dadd(-30.78, 39.99, -7, 0.56)
  }
  dend[377] {pt3dclear()
	pt3dadd(-30.78, 39.99, -7, 0.56)
	pt3dadd(-31.64, 40.32, -7, 0.56)
  }
  dend[378] {pt3dclear()
	pt3dadd(-30.78, 39.99, -7, 0.56)
	pt3dadd(-32.67, 41.66, -7, 0.36)
	pt3dadd(-32.82, 42.83, -7, 0.36)
	pt3dadd(-32.67, 43.86, -7.25, 0.36)
	pt3dadd(-32.04, 44.78, -7.25, 0.36)
	pt3dadd(-32.1, 45.9, -7.25, 0.36)
	pt3dadd(-32.67, 46.57, -7.25, 0.36)
  }
  dend[379] {pt3dclear()
	pt3dadd(-31.82, 40.39, -7, 0.56)
	pt3dadd(-30.93, 40.27, -7, 0.56)
	pt3dadd(-29.85, 39.96, -7, 0.56)
	pt3dadd(-29.49, 39.9, -7, 0.56)
  }
  dend[380] {pt3dclear()
	pt3dadd(-29.49, 39.9, -7, 0.56)
	pt3dadd(-28.67, 40.36, -7, 0.51)
	pt3dadd(-28.27, 40.83, -7, 0.51)
	pt3dadd(-27.24, 41.24, -7, 0.51)
  }
  dend[381] {pt3dclear()
	pt3dadd(-27.24, 41.24, -7, 0.51)
	pt3dadd(-26.12, 42.06, -7, 0.46)
	pt3dadd(-25.61, 42.27, -7, 0.46)
	pt3dadd(-24.58, 42.52, -7, 0.46)
	pt3dadd(-23.97, 42.57, -7, 0.46)
	pt3dadd(-23.1, 42.22, -7.25, 0.46)
	pt3dadd(-22.38, 42.11, -7.25, 0.46)
	pt3dadd(-22.02, 42.06, -7.25, 0.46)
	pt3dadd(-21.46, 41.91, -7.25, 0.46)
	pt3dadd(-21.05, 41.75, -7.25, 0.46)
	pt3dadd(-20.59, 41.29, -7.25, 0.46)
	pt3dadd(-20.07, 40.99, -7.25, 0.46)
	pt3dadd(-19.77, 40.72, -7.25, 0.46)
	pt3dadd(-19.52, 40.47, -7.25, 0.46)
	pt3dadd(-18.95, 40.22, -7.25, 0.46)
	pt3dadd(-18.6, 39.86, -7.25, 0.46)
	pt3dadd(-18.14, 39.2, -7.25, 0.46)
	pt3dadd(-17.82, 39.04, -7.25, 0.46)
	pt3dadd(-17.22, 38.74, -7.25, 0.46)
	pt3dadd(-16.91, 38.47, -7.25, 0.46)
	pt3dadd(-16.7, 38.17, -7.25, 0.46)
  }
  dend[382] {pt3dclear()
	pt3dadd(-16.7, 38.17, -7.25, 0.46)
	pt3dadd(-16.09, 38.79, -7.25, 0.46)
	pt3dadd(-15.53, 39.25, -7.25, 0.46)
	pt3dadd(-15.22, 39.4, -7.25, 0.46)
  }
  dend[383] {pt3dclear()
	pt3dadd(-16.7, 38.17, -7.25, 0.46)
	pt3dadd(-16.8, 37.71, -7.25, 0.46)
	pt3dadd(-16.91, 37, -7.25, 0.46)
	pt3dadd(-17.37, 36.13, -7.25, 0.46)
	pt3dadd(-17.57, 35.46, -7.25, 0.46)
	pt3dadd(-17.93, 34.9, -7.25, 0.46)
	pt3dadd(-18.39, 34.49, -7.25, 0.46)
	pt3dadd(-18.6, 33.77, -7.25, 0.46)
  }
  dend[384] {pt3dclear()
	pt3dadd(-27.24, 41.24, -7, 0.51)
	pt3dadd(-26.88, 40.63, -6.75, 0.41)
	pt3dadd(-26.01, 40.36, -6.75, 0.41)
	pt3dadd(-25.4, 40.22, -6.75, 0.41)
	pt3dadd(-24.74, 39.86, -6.5, 0.41)
	pt3dadd(-24.12, 39.9, -6.75, 0.41)
	pt3dadd(-23.41, 39.76, -6.75, 0.41)
	pt3dadd(-22.59, 39.76, -6.75, 0.41)
	pt3dadd(-22.08, 39.65, -6.75, 0.41)
	pt3dadd(-21.15, 39.61, -6.75, 0.41)
	pt3dadd(-20.49, 39.56, -6.75, 0.41)
	pt3dadd(-19.82, 39.35, -6.75, 0.41)
	pt3dadd(-19.72, 38.99, -6.75, 0.41)
	pt3dadd(-19.77, 38.63, -6.75, 0.41)
	pt3dadd(-20.13, 37.92, -6.75, 0.41)
	pt3dadd(-20.39, 37.51, -6.75, 0.41)
	pt3dadd(-20.49, 37.25, -6.75, 0.41)
  }
  dend[385] {pt3dclear()
	pt3dadd(-29.49, 39.9, -7, 0.56)
	pt3dadd(-29.34, 39.04, -6.75, 0.56)
	pt3dadd(-29.13, 38.22, -6.75, 0.56)
	pt3dadd(-28.83, 37.46, -6.75, 0.56)
	pt3dadd(-28.52, 36.84, -6.75, 0.56)
  }
  dend[386] {pt3dclear()
	pt3dadd(-28.52, 36.84, -6.75, 0.56)
	pt3dadd(-29.24, 36.33, -6.75, 0.51)
	pt3dadd(-29.54, 35.82, -6.75, 0.51)
	pt3dadd(-30, 35.51, -6.75, 0.51)
	pt3dadd(-30.87, 35.15, -6.75, 0.41)
	pt3dadd(-31.28, 34.79, -6.75, 0.41)
	pt3dadd(-31.74, 34.44, -6.75, 0.61)
	pt3dadd(-32.4, 34.08, -6.75, 0.61)
	pt3dadd(-32.46, 33.57, -6.75, 0.61)
	pt3dadd(-32.61, 32.65, -6.75, 0.61)
	pt3dadd(-32.82, 31.88, -6.75, 0.61)
  }
  dend[387] {pt3dclear()
	pt3dadd(-28.52, 36.84, -6.75, 0.56)
	pt3dadd(-28.06, 36.22, -6.75, 0.61)
	pt3dadd(-27.6, 36.03, -6.75, 0.61)
	pt3dadd(-27.45, 35.67, -6.75, 0.61)
	pt3dadd(-27.29, 35.1, -6.75, 0.61)
	pt3dadd(-27.04, 34.95, -6.75, 0.61)
	pt3dadd(-26.78, 34.59, -6.75, 0.61)
  }
  dend[388] {pt3dclear()
	pt3dadd(-26.78, 34.59, -6.75, 0.61)
	pt3dadd(-26.12, 34.18, -6.75, 0.41)
	pt3dadd(-25.55, 33.83, -6.75, 0.41)
	pt3dadd(-25.09, 33.47, -6.75, 0.41)
	pt3dadd(-24.43, 33.15, -6.75, 0.41)
	pt3dadd(-24.33, 32.75, -6.75, 0.41)
	pt3dadd(-24.22, 32.24, -6.75, 0.41)
	pt3dadd(-23.97, 31.57, -6.75, 0.41)
	pt3dadd(-23.81, 31.22, -6.75, 0.41)
	pt3dadd(-23.76, 30.71, -6.75, 0.41)
	pt3dadd(-23.2, 30.3, -6.75, 0.41)
	pt3dadd(-22.89, 29.99, -6.75, 0.41)
	pt3dadd(-22.38, 29.53, -6.75, 0.41)
	pt3dadd(-22.08, 29.38, -6.75, 0.41)
	pt3dadd(-21.87, 29.02, -6.75, 0.41)
	pt3dadd(-21.51, 28.51, -6.75, 0.41)
	pt3dadd(-21.15, 27.64, -6.5, 0.41)
	pt3dadd(-20.69, 27.12, -6.5, 0.41)
	pt3dadd(-20.39, 26.77, -6.5, 0.41)
	pt3dadd(-20.49, 26.2, -6.5, 0.41)
	pt3dadd(-20.69, 25.95, -6.5, 0.41)
	pt3dadd(-20.95, 25.69, -6.5, 0.41)
	pt3dadd(-21.46, 25.23, -6.5, 0.41)
  }
  dend[389] {pt3dclear()
	pt3dadd(-26.78, 34.59, -6.75, 0.61)
	pt3dadd(-27.09, 33.42, -6.5, 0.41)
	pt3dadd(-26.99, 32.85, -6.5, 0.41)
	pt3dadd(-27.14, 31.93, -6.5, 0.41)
	pt3dadd(-27.24, 31.47, -6.5, 0.41)
	pt3dadd(-27.55, 31.06, -6.5, 0.41)
	pt3dadd(-28.01, 30.4, -6.5, 0.41)
	pt3dadd(-28.32, 29.63, -6.5, 0.41)
	pt3dadd(-28.57, 29.27, -6.5, 0.41)
	pt3dadd(-28.83, 28.91, -6.5, 0.41)
	pt3dadd(-29.08, 28.2, -6.5, 0.41)
	pt3dadd(-29.13, 27.18, -6.5, 0.41)
	pt3dadd(-29.13, 26.51, -6.5, 0.41)
	pt3dadd(-28.88, 25.79, -6.5, 0.41)
	pt3dadd(-28.73, 25.13, -6.5, 0.41)
	pt3dadd(-28.42, 24.72, -6.5, 0.41)
	pt3dadd(-28.16, 24.11, -6.5, 0.41)
	pt3dadd(-27.55, 23.7, -6.5, 0.41)
	pt3dadd(-27.19, 23.24, -6.5, 0.41)
	pt3dadd(-26.47, 22.93, -6.5, 0.41)
	pt3dadd(-26.01, 22.47, -6.5, 0.41)
  }
  dend[390] {pt3dclear()
	pt3dadd(-32.86, 40.79, -7, 0.46)
	pt3dadd(-31.54, 40.84, -7, 0.36)
  }
  dend[391] {pt3dclear()
	pt3dadd(-37.83, 39.65, -6.75, 0.31)
	pt3dadd(-38.24, 38.69, -6.75, 0.26)
	pt3dadd(-38.24, 37.36, -6.75, 0.26)
	pt3dadd(-38.19, 35.93, -6.75, 0.26)
	pt3dadd(-38.19, 34.14, -6.5, 0.26)
	pt3dadd(-38.09, 33.01, -6.5, 0.26)
	pt3dadd(-37.27, 32.4, -6.5, 0.26)
  }
  dend[392] {pt3dclear()
	pt3dadd(-19.73, 44.06, -6.75, 2.37)
	pt3dadd(-20.42, 42.96, -6.75, 1.18)
	pt3dadd(-21.1, 42.33, -6.75, 0.81)
	pt3dadd(-21.73, 41.65, -6.75, 0.75)
	pt3dadd(-22.16, 40.96, -6.75, 0.75)
	pt3dadd(-22.66, 40.34, -6.75, 0.75)
	pt3dadd(-23.1, 39.59, -6.75, 0.75)
  }
  dend[393] {pt3dclear()
	pt3dadd(-23.1, 39.59, -6.75, 0.75)
	pt3dadd(-23.6, 39.21, -7, 0.56)
	pt3dadd(-24.1, 38.97, -7, 0.56)
	pt3dadd(-24.78, 38.4, -7, 0.56)
	pt3dadd(-24.91, 37.84, -7, 0.81)
	pt3dadd(-25.59, 37.15, -7, 0.81)
	pt3dadd(-26.03, 36.4, -7, 0.81)
	pt3dadd(-26.65, 35.9, -7, 0.81)
	pt3dadd(-27.4, 34.9, -7, 0.69)
	pt3dadd(-28.27, 34.35, -7, 0.69)
	pt3dadd(-28.77, 34.04, -7, 0.69)
	pt3dadd(-29.46, 33.1, -6.75, 0.69)
  }
}
proc shape3d_16() {
  dend[393] {	pt3dadd(-30.33, 32.47, -6.75, 0.81)
	pt3dadd(-30.52, 31.55, -6.75, 0.81)
	pt3dadd(-30.64, 30.74, -6.75, 0.69)
	pt3dadd(-31.02, 29.86, -6.75, 0.69)
	pt3dadd(-31.64, 28.68, -6.75, 0.69)
	pt3dadd(-31.76, 27.81, -6.75, 0.69)
	pt3dadd(-32.26, 27.24, -6.5, 0.69)
	pt3dadd(-32.76, 26.56, -6.5, 0.69)
	pt3dadd(-33.2, 25.69, -6.5, 0.69)
	pt3dadd(-33.63, 24.94, -6.5, 0.69)
	pt3dadd(-33.63, 23.94, -6.5, 0.69)
	pt3dadd(-33.45, 23.13, -6.5, 0.69)
	pt3dadd(-32.45, 22.57, -6.5, 0.69)
	pt3dadd(-31.52, 22.69, -6.5, 0.69)
	pt3dadd(-30.7, 22.44, -6.75, 0.37)
	pt3dadd(-30.02, 22.19, -6.75, 0.31)
  }
  dend[394] {pt3dclear()
	pt3dadd(-23.1, 39.59, -6.75, 0.75)
	pt3dadd(-22.79, 38.65, -6.75, 0.62)
	pt3dadd(-22.48, 37.47, -7, 0.62)
	pt3dadd(-22.04, 36.22, -7, 0.62)
	pt3dadd(-21.91, 35.04, -7, 0.62)
	pt3dadd(-21.35, 34.1, -7, 0.62)
	pt3dadd(-20.48, 32.97, -7, 0.56)
	pt3dadd(-19.73, 31.86, -7, 0.69)
	pt3dadd(-19.67, 31.55, -7, 0.87)
  }
  dend[395] {pt3dclear()
	pt3dadd(-19.67, 31.55, -7, 0.87)
	pt3dadd(-18.73, 31.61, -7, 0.56)
	pt3dadd(-17.8, 31.73, -7, 0.56)
	pt3dadd(-16.86, 32.11, -7, 0.56)
	pt3dadd(-15.99, 32.79, -7, 0.56)
	pt3dadd(-15.24, 33.17, -7, 0.56)
	pt3dadd(-14.74, 33.47, -7, 0.56)
	pt3dadd(-13.87, 33.97, -6.75, 0.62)
	pt3dadd(-13.12, 34.15, -6.75, 0.62)
	pt3dadd(-12.25, 34.1, -6.75, 0.62)
	pt3dadd(-11.56, 33.79, -6.75, 0.5)
	pt3dadd(-11, 33.29, -6.75, 0.44)
	pt3dadd(-10.51, 32.97, -6.75, 0.37)
	pt3dadd(-9.82, 32.79, -6.75, 0.44)
	pt3dadd(-9.51, 32.17, -6.75, 0.5)
	pt3dadd(-8.76, 31.86, -6.75, 0.5)
	pt3dadd(-8.57, 31.05, -6.75, 0.5)
  }
  dend[396] {pt3dclear()
	pt3dadd(-19.67, 31.55, -7, 0.87)
	pt3dadd(-19.67, 30.42, -7, 0.69)
	pt3dadd(-19.73, 29.3, -7, 0.69)
	pt3dadd(-19.42, 28.49, -7, 0.69)
	pt3dadd(-19.23, 27.62, -7, 0.62)
	pt3dadd(-18.86, 26.68, -7, 0.75)
	pt3dadd(-18.61, 25.94, -7, 0.75)
  }
  dend[397] {pt3dclear()
	pt3dadd(-18.61, 25.94, -7, 0.75)
	pt3dadd(-17.25, 26.19, -7, 0.69)
  }
  dend[398] {pt3dclear()
	pt3dadd(-17.25, 26.19, -7, 0.69)
	pt3dadd(-16.18, 25.94, -7, 0.69)
	pt3dadd(-15.8, 25.37, -7, 0.69)
	pt3dadd(-15.24, 24.75, -7, 0.69)
	pt3dadd(-14.25, 24.19, -7.25, 0.69)
	pt3dadd(-13.5, 23.82, -7.25, 0.69)
	pt3dadd(-12.81, 23.63, -7.25, 0.69)
	pt3dadd(-11.94, 23.32, -7.25, 0.69)
	pt3dadd(-11.25, 22.94, -7.25, 0.5)
	pt3dadd(-10.44, 22.44, -7.25, 0.56)
	pt3dadd(-9.76, 22.07, -7.25, 0.56)
	pt3dadd(-9.32, 21.57, -7.25, 0.56)
	pt3dadd(-8.82, 21.01, -7.25, 0.56)
	pt3dadd(-8.14, 21.13, -7.25, 0.56)
	pt3dadd(-6.95, 20.95, -7.25, 0.56)
	pt3dadd(-5.83, 21.01, -7, 0.56)
	pt3dadd(-4.96, 21.51, -7, 0.56)
	pt3dadd(-4.58, 22.01, -7, 0.56)
	pt3dadd(-3.71, 22.19, -6.75, 0.37)
  }
  dend[399] {pt3dclear()
	pt3dadd(-17.25, 26.19, -7, 0.69)
	pt3dadd(-19.23, 25.12, -6.75, 0.62)
	pt3dadd(-19.92, 24.63, -6.75, 0.5)
	pt3dadd(-20.36, 24.06, -6.75, 0.5)
	pt3dadd(-20.98, 23.38, -6.75, 0.5)
	pt3dadd(-21.48, 23, -6.75, 0.5)
	pt3dadd(-22.35, 22.82, -6.75, 0.5)
	pt3dadd(-23.22, 22.69, -6.75, 0.5)
  }
  dend[400] {pt3dclear()
	pt3dadd(-23.22, 22.69, -6.75, 0.5)
	pt3dadd(-24.16, 23.25, -6.75, 0.56)
	pt3dadd(-24.47, 24.13, -6.75, 0.56)
	pt3dadd(-24.59, 25, -6.75, 0.56)
	pt3dadd(-24.84, 25.56, -6.75, 0.56)
	pt3dadd(-24.91, 26.68, -6.75, 0.56)
  }
  dend[401] {pt3dclear()
	pt3dadd(-23.22, 22.69, -6.75, 0.5)
	pt3dadd(-23.66, 21.63, -6.75, 0.56)
	pt3dadd(-24.22, 20.95, -6.5, 0.56)
	pt3dadd(-24.91, 20.51, -6.5, 0.56)
	pt3dadd(-25.78, 19.76, -6.5, 0.56)
  }
  dend[402] {pt3dclear()
	pt3dadd(-18.61, 25.94, -7, 0.75)
	pt3dadd(-18.3, 24.88, -7, 0.5)
	pt3dadd(-18.17, 23.69, -7, 0.5)
	pt3dadd(-17.98, 23, -7, 0.5)
	pt3dadd(-18.05, 21.88, -7, 0.75)
  }
  dend[403] {pt3dclear()
	pt3dadd(-18.05, 21.88, -7, 0.75)
	pt3dadd(-18.8, 21.32, -7, 0.69)
	pt3dadd(-19.05, 20.45, -7, 0.69)
	pt3dadd(-19.54, 20.14, -7, 0.69)
	pt3dadd(-19.79, 19.89, -7, 0.69)
  }
  dend[404] {pt3dclear()
	pt3dadd(-19.79, 19.89, -7, 0.69)
	pt3dadd(-19.48, 19.14, -7, 0.62)
	pt3dadd(-19.36, 18.39, -7, 0.62)
	pt3dadd(-19.23, 17.89, -7, 0.62)
	pt3dadd(-19.3, 17.21, -7, 0.62)
	pt3dadd(-19.23, 16.96, -7, 0.62)
	pt3dadd(-19.23, 16.46, -7, 0.44)
	pt3dadd(-19.05, 15.84, -6.75, 0.44)
	pt3dadd(-18.92, 15.34, -6.75, 0.44)
	pt3dadd(-18.92, 14.78, -6.75, 0.44)
	pt3dadd(-18.86, 14.09, -6.5, 0.44)
	pt3dadd(-18.86, 13.72, -6.5, 0.44)
  }
  dend[405] {pt3dclear()
	pt3dadd(-19.79, 19.89, -7, 0.69)
	pt3dadd(-20.6, 19.51, -7, 0.5)
	pt3dadd(-20.85, 19.14, -7, 0.5)
	pt3dadd(-21.23, 18.77, -7, 0.44)
	pt3dadd(-21.98, 18.39, -7, 0.44)
	pt3dadd(-22.35, 18.02, -7, 0.44)
	pt3dadd(-22.6, 17.64, -7, 0.69)
	pt3dadd(-22.72, 16.89, -7, 0.81)
  }
  dend[406] {pt3dclear()
	pt3dadd(-18.05, 21.88, -7, 0.75)
	pt3dadd(-17.18, 21.7, -7, 0.75)
	pt3dadd(-16.55, 21.07, -7, 0.62)
	pt3dadd(-16.23, 20.51, -7, 0.62)
	pt3dadd(-15.87, 19.89, -7, 0.62)
	pt3dadd(-15.49, 19.01, -7, 0.62)
  }
  dend[407] {pt3dclear()
	pt3dadd(-15.49, 19.01, -7, 0.62)
	pt3dadd(-14.12, 18.77, -7, 0.62)
	pt3dadd(-13.31, 19.07, -7, 0.62)
	pt3dadd(-12.75, 19.01, -7, 0.62)
	pt3dadd(-11.94, 18.77, -7, 0.56)
	pt3dadd(-10.82, 18.52, -6.75, 0.56)
	pt3dadd(-10.13, 18.2, -6.75, 0.56)
	pt3dadd(-9.51, 18.02, -6.75, 0.56)
	pt3dadd(-8.76, 17.57, -6.75, 0.56)
	pt3dadd(-8.32, 17.02, -6.75, 0.56)
  }
  dend[408] {pt3dclear()
	pt3dadd(-8.32, 17.02, -6.75, 0.56)
	pt3dadd(-8.44, 16.21, -6.75, 0.37)
	pt3dadd(-8.94, 15.52, -6.75, 0.37)
	pt3dadd(-9.38, 15.09, -6.75, 0.37)
	pt3dadd(-10.19, 14.9, -6.75, 0.37)
	pt3dadd(-10.88, 15.15, -6.75, 0.37)
	pt3dadd(-11.25, 15.52, -6.75, 0.37)
	pt3dadd(-11.5, 15.34, -7, 0.37)
  }
  dend[409] {pt3dclear()
	pt3dadd(-8.32, 17.02, -6.75, 0.56)
	pt3dadd(-7.33, 16.96, -6.75, 0.5)
	pt3dadd(-6.64, 17.02, -6.75, 0.56)
	pt3dadd(-6.2, 17.02, -6.75, 0.56)
	pt3dadd(-5.33, 16.32, -6.5, 0.56)
	pt3dadd(-4.46, 16.02, -6.5, 0.56)
	pt3dadd(-3.52, 16.57, -6.5, 0.56)
  }
  dend[410] {pt3dclear()
	pt3dadd(-15.49, 19.01, -7, 0.62)
	pt3dadd(-15.68, 17.77, -7, 0.62)
	pt3dadd(-15.74, 16.71, -7, 0.62)
	pt3dadd(-15.87, 15.77, -7, 0.62)
	pt3dadd(-15.87, 14.78, -7, 0.62)
  }
  dend[411] {pt3dclear()
	pt3dadd(-15.87, 14.78, -7, 0.62)
	pt3dadd(-16.3, 14.15, -6.75, 0.56)
	pt3dadd(-16.68, 13.47, -6.75, 0.56)
	pt3dadd(-17.23, 12.59, -6.75, 0.56)
	pt3dadd(-17.73, 11.72, -6.75, 0.56)
	pt3dadd(-18.42, 11.1, -6.75, 0.56)
	pt3dadd(-18.92, 10.29, -6.75, 0.56)
	pt3dadd(-19.48, 9.6, -6.75, 0.56)
	pt3dadd(-19.73, 8.53, -6.75, 0.56)
  }
  dend[412] {pt3dclear()
	pt3dadd(-15.87, 14.78, -7, 0.62)
	pt3dadd(-15.12, 14.4, -7, 0.37)
	pt3dadd(-14.68, 13.78, -7, 0.31)
	pt3dadd(-14.37, 13.22, -7, 0.25)
	pt3dadd(-13.81, 12.72, -7, 0.62)
	pt3dadd(-13.44, 12.03, -7, 0.62)
	pt3dadd(-13.19, 11.66, -7, 0.62)
  }
  dend[413] {pt3dclear()
	pt3dadd(-13.19, 11.66, -7, 0.62)
	pt3dadd(-12.38, 11.6, -7, 0.44)
	pt3dadd(-11.69, 11.72, -7, 0.44)
  }
  dend[414] {pt3dclear()
	pt3dadd(-11.69, 11.72, -7, 0.44)
	pt3dadd(-11.25, 11.91, -7, 0.44)
	pt3dadd(-10.63, 12.03, -7, 0.44)
	pt3dadd(-9.94, 11.97, -7, 0.44)
  }
  dend[415] {pt3dclear()
	pt3dadd(-11.69, 11.72, -7, 0.44)
	pt3dadd(-11.5, 10.79, -6.75, 0.44)
	pt3dadd(-10.94, 10.16, -6.75, 0.44)
	pt3dadd(-10.44, 9.53, -6.75, 0.44)
	pt3dadd(-10.13, 9.16, -6.75, 0.44)
  }
  dend[416] {pt3dclear()
	pt3dadd(-13.19, 11.66, -7, 0.62)
	pt3dadd(-13.37, 10.79, -7, 0.44)
	pt3dadd(-13.5, 9.91, -7, 0.44)
	pt3dadd(-13.25, 9.23, -7, 0.44)
	pt3dadd(-13.37, 8.42, -7, 0.44)
	pt3dadd(-13.68, 7.48, -6.75, 0.44)
	pt3dadd(-14.06, 6.8, -6.75, 0.44)
	pt3dadd(-14.56, 6.23, -6.75, 0.44)
	pt3dadd(-14.99, 5.61, -6.75, 0.44)
	pt3dadd(-15.49, 5.42, -7, 0.44)
  }
  dend[417] {pt3dclear()
	pt3dadd(-15.54, 40.94, -6.5, 2.24)
	pt3dadd(-16.12, 39.71, -6.5, 1.25)
	pt3dadd(-16.61, 38.9, -6.25, 0.69)
	pt3dadd(-16.68, 38.09, -6.25, 0.69)
	pt3dadd(-16.68, 37.09, -6.25, 0.69)
  }
  dend[418] {pt3dclear()
	pt3dadd(-16.68, 37.09, -6.25, 0.69)
	pt3dadd(-17.3, 36.97, -6.25, 0.44)
  }
}
proc shape3d_17() {
  dend[418] {	pt3dadd(-17.8, 37.53, -6.25, 0.44)
  }
  dend[419] {pt3dclear()
	pt3dadd(-16.68, 37.09, -6.25, 0.69)
	pt3dadd(-16.43, 36.15, -6.25, 0.62)
	pt3dadd(-16.12, 35.54, -6.25, 0.62)
	pt3dadd(-15.8, 34.6, -6.25, 0.62)
	pt3dadd(-15.62, 33.79, -6.25, 0.62)
	pt3dadd(-15.37, 32.67, -6.25, 0.62)
	pt3dadd(-15.12, 31.8, -6, 0.62)
	pt3dadd(-14.99, 31.05, -6, 0.62)
	pt3dadd(-14.74, 30.05, -6, 0.62)
  }
  dend[420] {pt3dclear()
	pt3dadd(-14.74, 30.05, -6, 0.62)
	pt3dadd(-14, 29.8, -6, 0.5)
	pt3dadd(-13.44, 29.55, -6, 0.31)
	pt3dadd(-12.75, 29.36, -6, 0.31)
	pt3dadd(-12.13, 28.99, -6, 0.37)
	pt3dadd(-11.32, 28.49, -6, 0.37)
	pt3dadd(-10.69, 28.24, -6, 0.69)
	pt3dadd(-9.94, 27.74, -6, 1)
	pt3dadd(-9.19, 27.31, -6, 0.87)
	pt3dadd(-8.57, 26.87, -6, 0.62)
	pt3dadd(-7.89, 26.06, -6, 0.62)
	pt3dadd(-7.26, 25.44, -5.75, 0.81)
	pt3dadd(-6.95, 24.69, -5.75, 0.75)
  }
  dend[421] {pt3dclear()
	pt3dadd(-6.95, 24.69, -5.75, 0.75)
	pt3dadd(-6.08, 24.56, -5.75, 0.5)
	pt3dadd(-5.52, 24.38, -5.75, 0.5)
	pt3dadd(-4.96, 24.13, -5.75, 0.5)
	pt3dadd(-4.71, 24.06, -5.75, 0.5)
  }
  dend[422] {pt3dclear()
	pt3dadd(-6.95, 24.69, -5.75, 0.75)
	pt3dadd(-7.14, 23.94, -5.75, 0.5)
	pt3dadd(-7.39, 23.44, -5.5, 0.5)
  }
  dend[423] {pt3dclear()
	pt3dadd(-7.39, 23.44, -5.5, 0.5)
	pt3dadd(-6.89, 22.82, -5.5, 0.44)
	pt3dadd(-6.64, 22.26, -5.5, 0.44)
	pt3dadd(-6.76, 21.51, -5.25, 0.62)
	pt3dadd(-7.14, 20.82, -5.25, 0.62)
	pt3dadd(-7.08, 19.82, -5.25, 0.62)
	pt3dadd(-6.95, 18.89, -5, 0.62)
	pt3dadd(-6.51, 18.27, -5, 0.62)
	pt3dadd(-6.14, 17.64, -5, 0.62)
	pt3dadd(-5.58, 17.27, -4.75, 0.62)
  }
  dend[424] {pt3dclear()
	pt3dadd(-7.39, 23.44, -5.5, 0.5)
	pt3dadd(-8.26, 23.38, -5.5, 0.62)
	pt3dadd(-8.94, 23.38, -5.5, 0.62)
  }
  dend[425] {pt3dclear()
	pt3dadd(-8.94, 23.38, -5.5, 0.62)
	pt3dadd(-9.26, 22.63, -5.5, 0.44)
	pt3dadd(-9.57, 22.19, -5.5, 0.44)
	pt3dadd(-9.94, 21.76, -5.5, 0.44)
	pt3dadd(-10.44, 21.45, -5.5, 0.44)
	pt3dadd(-10.57, 21.2, -5.5, 0.62)
	pt3dadd(-11.07, 20.89, -5.25, 0.56)
  }
  dend[426] {pt3dclear()
	pt3dadd(-8.94, 23.38, -5.5, 0.62)
	pt3dadd(-9.82, 23.32, -5.5, 0.69)
	pt3dadd(-10.88, 23.32, -5.5, 0.69)
	pt3dadd(-11.5, 23.13, -5.5, 0.69)
	pt3dadd(-12.38, 22.76, -5.5, 0.69)
	pt3dadd(-13.12, 22.07, -5.5, 0.62)
	pt3dadd(-13.44, 21.7, -5.5, 0.62)
	pt3dadd(-13.5, 21.2, -5.5, 0.62)
	pt3dadd(-13.81, 20.64, -5.5, 0.62)
	pt3dadd(-14, 20.32, -5.5, 0.62)
	pt3dadd(-13.87, 19.32, -5.25, 0.62)
	pt3dadd(-13.56, 18.77, -5.25, 0.62)
	pt3dadd(-13.25, 18.45, -5.25, 0.62)
	pt3dadd(-13.62, 17.39, -5, 0.62)
	pt3dadd(-13.75, 16.39, -5, 0.62)
	pt3dadd(-14.18, 16.02, -5, 0.62)
	pt3dadd(-14.93, 15.52, -4.75, 0.62)
  }
  dend[427] {pt3dclear()
	pt3dadd(-14.74, 30.05, -6, 0.62)
	pt3dadd(-15.06, 28.74, -6, 0.62)
	pt3dadd(-15.37, 27.49, -6, 0.56)
	pt3dadd(-15.68, 26.75, -6, 0.81)
	pt3dadd(-16.37, 25.69, -5.75, 0.81)
	pt3dadd(-16.73, 25.19, -5.75, 0.81)
	pt3dadd(-17.23, 24.69, -5.75, 0.81)
	pt3dadd(-17.73, 23.82, -5.75, 0.81)
  }
  dend[428] {pt3dclear()
	pt3dadd(-17.73, 23.82, -5.75, 0.81)
	pt3dadd(-18.92, 23.69, -5.75, 0.69)
	pt3dadd(-20.17, 24, -5.5, 0.69)
	pt3dadd(-20.98, 23.82, -5.5, 0.69)
	pt3dadd(-22.35, 23.88, -5.5, 0.69)
	pt3dadd(-22.66, 23.82, -5.5, 0.69)
  }
  dend[429] {pt3dclear()
	pt3dadd(-22.66, 23.82, -5.5, 0.69)
	pt3dadd(-22.54, 22.82, -5.25, 0.69)
	pt3dadd(-22.41, 21.95, -5, 0.5)
	pt3dadd(-22.29, 21.2, -5, 0.5)
	pt3dadd(-22.04, 20.64, -5, 0.37)
  }
  dend[430] {pt3dclear()
	pt3dadd(-22.66, 23.82, -5.5, 0.69)
	pt3dadd(-23.66, 23.75, -5.5, 0.37)
	pt3dadd(-24.53, 23.82, -5.5, 0.5)
  }
  dend[431] {pt3dclear()
	pt3dadd(-24.53, 23.82, -5.5, 0.5)
	pt3dadd(-24.66, 22.88, -5.5, 0.37)
	pt3dadd(-24.78, 22.19, -5.5, 0.37)
	pt3dadd(-24.91, 21.38, -5.25, 0.37)
  }
  dend[432] {pt3dclear()
	pt3dadd(-24.53, 23.82, -5.5, 0.5)
	pt3dadd(-25.41, 23.82, -5.5, 0.56)
	pt3dadd(-26.22, 24.06, -5.5, 0.56)
	pt3dadd(-27.03, 24.38, -5.5, 0.56)
	pt3dadd(-27.84, 24.81, -5.5, 0.56)
	pt3dadd(-28.4, 25.25, -5.5, 0.56)
	pt3dadd(-29.02, 25.81, -5.5, 0.56)
	pt3dadd(-29.08, 26.62, -5.5, 0.56)
	pt3dadd(-28.83, 27.24, -5.5, 0.56)
	pt3dadd(-28.52, 27.99, -5.5, 0.56)
	pt3dadd(-28.15, 28.55, -5.5, 0.56)
	pt3dadd(-27.77, 29.05, -5.5, 0.56)
	pt3dadd(-27.4, 29.86, -5.5, 0.56)
	pt3dadd(-27.21, 30.42, -5.75, 0.56)
  }
  dend[433] {pt3dclear()
	pt3dadd(-17.73, 23.82, -5.75, 0.81)
	pt3dadd(-17.98, 22.63, -5.75, 0.69)
	pt3dadd(-18.23, 21.63, -5.5, 0.75)
	pt3dadd(-18.61, 21.07, -5.5, 0.75)
	pt3dadd(-19.23, 20.07, -5.5, 0.87)
	pt3dadd(-19.98, 19.45, -5.25, 0.75)
	pt3dadd(-20.85, 19.14, -5.25, 0.75)
	pt3dadd(-21.42, 19.07, -5.25, 0.75)
  }
  dend[434] {pt3dclear()
	pt3dadd(-21.42, 19.07, -5.25, 0.75)
	pt3dadd(-21.35, 18.27, -5.25, 0.62)
	pt3dadd(-21.6, 17.77, -5.25, 0.62)
	pt3dadd(-22.16, 17.07, -5, 0.62)
	pt3dadd(-23.04, 16.71, -5, 0.62)
	pt3dadd(-23.16, 15.96, -5, 0.62)
	pt3dadd(-23.22, 15.34, -5, 0.62)
	pt3dadd(-23.47, 14.71, -5, 0.62)
	pt3dadd(-23.6, 14.15, -5, 0.5)
	pt3dadd(-23.78, 13.72, -5, 0.5)
	pt3dadd(-24.16, 13.09, -5, 0.37)
	pt3dadd(-24.97, 12.91, -5, 0.56)
	pt3dadd(-25.53, 12.91, -5, 0.87)
	pt3dadd(-26.34, 12.72, -5, 0.69)
  }
  dend[435] {pt3dclear()
	pt3dadd(-21.42, 19.07, -5.25, 0.75)
	pt3dadd(-22.35, 19.01, -5.25, 0.56)
	pt3dadd(-23.47, 19.14, -5.25, 0.56)
	pt3dadd(-24.28, 19.14, -5.25, 0.56)
	pt3dadd(-24.78, 18.32, -5.25, 0.87)
	pt3dadd(-25.34, 17.71, -5.25, 0.87)
	pt3dadd(-26.09, 17.02, -5.25, 0.69)
	pt3dadd(-26.65, 16.39, -5.25, 0.62)
	pt3dadd(-27.34, 15.9, -5.25, 0.5)
	pt3dadd(-27.96, 15.71, -5.25, 0.5)
	pt3dadd(-28.34, 15.34, -5.25, 0.5)
	pt3dadd(-28.77, 14.59, -5.25, 0.75)
	pt3dadd(-29.15, 14.03, -5.25, 0.75)
	pt3dadd(-29.52, 13.9, -5.25, 0.75)
	pt3dadd(-30.02, 13.59, -5.25, 0.75)
  }
  dend[436] {pt3dclear()
	pt3dadd(-8.03, 36.53, -6.5, 3.24)
	pt3dadd(-6.36, 37.65, -6.75, 2)
	pt3dadd(-4.74, 39.15, -6.75, 1.87)
	pt3dadd(-2.87, 40.77, -6.75, 1.87)
	pt3dadd(-1.62, 41.9, -6.75, 1.87)
	pt3dadd(-0.12, 43.27, -6.75, 1.87)
	pt3dadd(1.62, 44.26, -6.75, 1.87)
	pt3dadd(2.95, 45.14, -6.75, 1.87)
	pt3dadd(3.24, 45.26, -6.75, 1.87)
  }
  dend[437] {pt3dclear()
	pt3dadd(3.24, 45.26, -6.75, 1.87)
	pt3dadd(3.49, 47.76, -7, 2)
	pt3dadd(4.11, 50.75, -7, 2)
	pt3dadd(4.49, 53.24, -7, 2)
	pt3dadd(5.11, 55.49, -7, 2.49)
	pt3dadd(5.49, 57.86, -7, 2.12)
	pt3dadd(6.61, 59.85, -7, 1.87)
	pt3dadd(8.23, 62.22, -7, 1.87)
	pt3dadd(8.73, 63.47, -7, 2.49)
  }
  dend[438] {pt3dclear()
	pt3dadd(8.73, 63.47, -7, 2.49)
	pt3dadd(8.63, 63.92, -7, 2.49)
  }
  dend[439] {pt3dclear()
	pt3dadd(8.63, 63.92, -7, 2.49)
	pt3dadd(8.43, 64.93, -7, 2.49)
	pt3dadd(8.35, 65.59, -7.25, 2.12)
	pt3dadd(8.23, 68.33, -7.25, 2.12)
	pt3dadd(7.86, 69.58, -7.25, 2)
	pt3dadd(7.36, 71.45, -7.25, 2)
	pt3dadd(6.61, 73.06, -7.25, 2)
	pt3dadd(6.11, 74.81, -7.25, 2)
	pt3dadd(5.69, 75.27, -7.25, 2)
  }
  dend[440] {pt3dclear()
	pt3dadd(5.69, 75.27, -7.25, 2)
	pt3dadd(4.49, 76.56, -7, 1.87)
	pt3dadd(2.62, 78.68, -7, 1.75)
	pt3dadd(0.75, 80.92, -7, 1.75)
	pt3dadd(-0.75, 82.92, -7, 1.62)
	pt3dadd(-1.79, 85.19, -7, 1.62)
  }
  dend[441] {pt3dclear()
	pt3dadd(-1.79, 85.19, -7, 1.62)
	pt3dadd(-2.24, 87.28, -6.75, 2)
	pt3dadd(-2.74, 89.4, -6.75, 1.62)
	pt3dadd(-2.87, 91.77, -6.75, 2)
	pt3dadd(-2.94, 93.03, -6.75, 2)
	pt3dadd(-2.82, 93.88, -6.75, 2)
  }
  dend[442] {pt3dclear()
	pt3dadd(-2.82, 93.88, -6.75, 2)
	pt3dadd(-2.45, 95.53, -6.75, 2)
  }
  dend[443] {pt3dclear()
	pt3dadd(-2.45, 95.53, -6.75, 2)
	pt3dadd(-2.37, 96.26, -6.75, 1.87)
	pt3dadd(-1.87, 98.75, -6.5, 1.87)
	pt3dadd(-1.59, 100.6, -6.5, 1.87)
  }
  dend[444] {pt3dclear()
	pt3dadd(-1.59, 100.6, -6.5, 1.87)
	pt3dadd(-2.12, 103.1, -6.5, 1.62)
	pt3dadd(-2.12, 105.2, -6.5, 1.62)
	pt3dadd(-1.74, 106.5, -6.5, 1.62)
  }
  dend[445] {pt3dclear()
	pt3dadd(-1.74, 106.5, -6.5, 1.62)
	pt3dadd(-1.37, 107.2, -6.5, 1.62)
	pt3dadd(-0.62, 108.7, -6.5, 1.62)
	pt3dadd(-0.56, 109.4, -6.5, 1.62)
  }
}
proc shape3d_18() {
  dend[445] {  }
  dend[446] {pt3dclear()
	pt3dadd(-0.56, 109.4, -6.5, 1.62)
	pt3dadd(-0.43, 112.6, -6.03, 1.62)
  }
  dend[447] {pt3dclear()
	pt3dadd(-0.43, 112.6, -6.03, 1.62)
	pt3dadd(-0.5, 111.1, -6.25, 1.62)
	pt3dadd(-0.62, 113.3, -6.25, 1.62)
  }
  dend[448] {pt3dclear()
	pt3dadd(-0.62, 113.3, -6.25, 1.62)
	pt3dadd(-0.37, 114.8, -6.25, 1.62)
	pt3dadd(-0.26, 115.4, -6.25, 1.62)
  }
  dend[449] {pt3dclear()
	pt3dadd(-0.26, 115.4, -6.25, 1.62)
	pt3dadd(0, 117.5, -6.5, 1.62)
	pt3dadd(0, 120.6, -6.5, 1.62)
	pt3dadd(0, 122.6, -6.5, 1.62)
  }
  dend[450] {pt3dclear()
	pt3dadd(0, 122.6, -6.5, 1.62)
	pt3dadd(1.43, 123.5, -6.5, 0.82)
	pt3dadd(2.41, 123.2, -6.25, 0.31)
	pt3dadd(3.12, 122.8, -6.25, 0.31)
	pt3dadd(3.43, 122.1, -6.25, 0.31)
	pt3dadd(4.25, 121.4, -6.25, 0.51)
	pt3dadd(4.61, 121, -6.25, 0.51)
	pt3dadd(5.32, 120.2, -6.25, 0.51)
	pt3dadd(5.94, 119.9, -6.25, 0.51)
	pt3dadd(6.81, 119.5, -6.25, 0.51)
	pt3dadd(7.52, 119.4, -6.25, 0.51)
	pt3dadd(7.78, 119.3, -6.25, 0.51)
  }
  dend[451] {pt3dclear()
	pt3dadd(7.78, 119.3, -6.25, 0.51)
	pt3dadd(8.08, 120.3, -6.25, 0.46)
	pt3dadd(8.6, 121.1, -6.25, 0.41)
	pt3dadd(8.39, 121.7, -6.25, 0.31)
	pt3dadd(7.78, 122, -6.25, 0.18)
	pt3dadd(7.37, 122.7, -6.25, 0.18)
  }
  dend[452] {pt3dclear()
	pt3dadd(7.78, 119.3, -6.25, 0.51)
	pt3dadd(8.69, 118.9, -6.25, 0.46)
	pt3dadd(9.72, 118.4, -6.25, 0.51)
	pt3dadd(10.49, 118, -6.25, 0.51)
	pt3dadd(11.31, 117.5, -6.25, 0.36)
	pt3dadd(11.92, 117.5, -6.25, 0.36)
  }
  dend[453] {pt3dclear()
	pt3dadd(0, 122.6, -6.5, 1.62)
	pt3dadd(0.15, 124.2, -6.5, 1.62)
  }
  dend[454] {pt3dclear()
	pt3dadd(0.15, 124.2, -6.5, 1.62)
	pt3dadd(-1.97, 126.3, -6.5, 1.5)
  }
  dend[455] {pt3dclear()
	pt3dadd(-1.97, 126.3, -6.5, 1.5)
	pt3dadd(0.97, 125.1, -6.5, 1.33)
	pt3dadd(2.25, 125.8, -6.5, 0.92)
	pt3dadd(3.38, 126.2, -6.5, 0.92)
	pt3dadd(4.34, 126.7, -6.5, 0.72)
	pt3dadd(4.91, 127.1, -6.25, 0.72)
  }
  dend[456] {pt3dclear()
	pt3dadd(4.91, 127.1, -6.25, 0.72)
	pt3dadd(5.72, 127.7, -6.25, 0.51)
  }
  dend[457] {pt3dclear()
	pt3dadd(5.72, 127.7, -6.25, 0.51)
	pt3dadd(6.45, 128.19, -6.25, 0.51)
	pt3dadd(7.27, 128.5, -6.25, 0.51)
	pt3dadd(8.08, 128.9, -6.25, 0.51)
  }
  dend[458] {pt3dclear()
	pt3dadd(8.08, 128.9, -6.25, 0.51)
	pt3dadd(7.52, 129.8, -6.25, 0.51)
	pt3dadd(6.75, 130.6, -6.25, 0.51)
	pt3dadd(6.35, 132.1, -6.25, 0.51)
	pt3dadd(5.89, 133.1, -6.25, 0.51)
	pt3dadd(5.53, 134.6, -6.25, 0.51)
	pt3dadd(4.91, 135.5, -6.25, 0.51)
	pt3dadd(4.3, 137.1, -6.25, 0.51)
	pt3dadd(3.58, 139.19, -6.25, 0.41)
	pt3dadd(2.92, 140.4, -6, 0.41)
	pt3dadd(1.84, 141.4, -6, 0.41)
	pt3dadd(1.74, 142.3, -6, 0.41)
	pt3dadd(1.69, 143.6, -5.75, 0.41)
	pt3dadd(2.15, 144.6, -5.75, 0.41)
	pt3dadd(3.02, 144.8, -5.75, 0.41)
	pt3dadd(3.79, 144.6, -5.75, 0.41)
	pt3dadd(4.2, 144, -5.75, 0.41)
	pt3dadd(4.4, 142.8, -5.75, 0.41)
  }
  dend[459] {pt3dclear()
	pt3dadd(8.08, 128.9, -6.25, 0.51)
	pt3dadd(9.01, 128.9, -6.25, 0.41)
	pt3dadd(10.18, 129.1, -6.25, 0.41)
	pt3dadd(11.21, 129, -6.25, 0.41)
	pt3dadd(12.43, 128.6, -6.25, 0.41)
	pt3dadd(13.3, 128.3, -6.25, 0.41)
	pt3dadd(14.33, 127.7, -6.25, 0.41)
	pt3dadd(14.99, 127, -6.25, 0.41)
	pt3dadd(15.76, 126.5, -6.25, 0.41)
	pt3dadd(16.01, 125.9, -6.25, 0.41)
	pt3dadd(17.09, 125.4, -6.25, 0.41)
	pt3dadd(18.16, 124.5, -6.25, 0.41)
	pt3dadd(18.78, 124.2, -6.25, 0.41)
	pt3dadd(19.75, 123.2, -6.25, 0.41)
  }
  dend[460] {pt3dclear()
	pt3dadd(19.75, 123.2, -6.25, 0.41)
	pt3dadd(19.85, 122, -6.5, 0.41)
	pt3dadd(19.75, 121.5, -6.5, 0.41)
	pt3dadd(19.95, 120.2, -6.5, 0.41)
	pt3dadd(20.26, 119.7, -6.5, 0.41)
	pt3dadd(20.52, 118.8, -6.5, 0.41)
	pt3dadd(20.67, 118.2, -6.5, 0.41)
	pt3dadd(20.52, 116.8, -6.5, 0.41)
	pt3dadd(20.57, 116.3, -6.75, 0.41)
  }
  dend[461] {pt3dclear()
	pt3dadd(19.75, 123.2, -6.25, 0.41)
	pt3dadd(20.46, 123.4, -6.5, 0.41)
	pt3dadd(21.85, 122.9, -6.5, 0.41)
  }
  dend[462] {pt3dclear()
	pt3dadd(21.85, 122.9, -6.5, 0.41)
	pt3dadd(22, 123.7, -6.75, 0.41)
	pt3dadd(21.95, 124.7, -6.75, 0.41)
	pt3dadd(22.36, 125.7, -6.75, 0.41)
	pt3dadd(23.02, 126.4, -6.75, 0.41)
	pt3dadd(23.23, 126.9, -6.75, 0.41)
	pt3dadd(23.18, 127.7, -6.75, 0.41)
	pt3dadd(22.97, 128.1, -6.75, 0.41)
  }
  dend[463] {pt3dclear()
	pt3dadd(21.85, 122.9, -6.5, 0.41)
	pt3dadd(22.82, 122.8, -6.75, 0.41)
	pt3dadd(23.58, 122.6, -6.75, 0.41)
	pt3dadd(24.15, 122.3, -6.75, 0.41)
	pt3dadd(24.86, 122, -6.75, 0.41)
	pt3dadd(25.07, 121.3, -6.75, 0.41)
  }
  dend[464] {pt3dclear()
	pt3dadd(25.07, 121.3, -6.75, 0.41)
	pt3dadd(25.78, 121.4, -7, 0.36)
	pt3dadd(26.5, 121.1, -7, 0.36)
	pt3dadd(27.37, 120.7, -7, 0.36)
	pt3dadd(28.09, 120.4, -7, 0.36)
	pt3dadd(28.44, 119.9, -7, 0.36)
	pt3dadd(29.47, 119.7, -7, 0.36)
	pt3dadd(30.44, 119.2, -7, 0.36)
	pt3dadd(31.56, 119, -7.25, 0.36)
	pt3dadd(32.13, 119.3, -7.25, 0.36)
  }
  dend[465] {pt3dclear()
	pt3dadd(25.07, 121.3, -6.75, 0.41)
	pt3dadd(25.07, 120.1, -6.75, 0.36)
	pt3dadd(25.48, 119.1, -6.75, 0.36)
	pt3dadd(25.84, 117.8, -6.5, 0.36)
	pt3dadd(25.73, 117, -6.5, 0.36)
	pt3dadd(24.91, 116.6, -6.5, 0.36)
	pt3dadd(26.14, 116.2, -6.5, 0.36)
	pt3dadd(26.71, 115.4, -6.5, 0.36)
	pt3dadd(27.11, 114.6, -6.5, 0.36)
	pt3dadd(27.78, 113.8, -6.5, 0.36)
	pt3dadd(28.44, 113.2, -6.25, 0.098)
	pt3dadd(29.06, 112.8, -6.25, 0.098)
	pt3dadd(29.47, 112.4, -6.25, 0.098)
	pt3dadd(29.98, 111.8, -6.25, 0.098)
	pt3dadd(30.54, 111.3, -6.25, 0.098)
	pt3dadd(30.54, 108.8, -6.25, 0.098)
  }
  dend[466] {pt3dclear()
	pt3dadd(5.72, 127.7, -6.25, 0.51)
	pt3dadd(4.66, 127.9, -6.25, 0.31)
	pt3dadd(4.34, 128.6, -6.25, 0.31)
	pt3dadd(4.25, 129.3, -6.25, 0.31)
	pt3dadd(3.89, 130.5, -6.25, 0.31)
	pt3dadd(3.79, 131.8, -6.25, 0.31)
	pt3dadd(3.74, 132.9, -6.25, 0.31)
	pt3dadd(3.53, 133.8, -6.25, 0.31)
	pt3dadd(3.38, 134.6, -6.25, 0.31)
	pt3dadd(2.56, 135.5, -6.25, 0.31)
  }
  dend[467] {pt3dclear()
	pt3dadd(4.91, 127.1, -6.25, 0.72)
	pt3dadd(5.48, 126.7, -6.25, 0.31)
	pt3dadd(6.5, 126.1, -6.25, 0.31)
	pt3dadd(7.47, 125.9, -6.25, 0.18)
	pt3dadd(8.65, 125.3, -6.25, 0.18)
	pt3dadd(9.47, 125.1, -6.25, 0.18)
	pt3dadd(9.98, 124.8, -6.25, 0.18)
	pt3dadd(10.49, 124.4, -6.25, 0.18)
	pt3dadd(11.56, 124, -6.25, 0.18)
	pt3dadd(11.92, 123.9, -6.25, 0.18)
	pt3dadd(12.74, 123, -6, 0.18)
	pt3dadd(13.4, 122.5, -6, 0.18)
	pt3dadd(13.61, 121.8, -6, 0.18)
	pt3dadd(14.17, 121.2, -6, 0.18)
	pt3dadd(14.79, 120.5, -6, 0.18)
	pt3dadd(15.6, 120.1, -6, 0.18)
	pt3dadd(16.88, 120.3, -6, 0.18)
  }
  dend[468] {pt3dclear()
	pt3dadd(-1.97, 126.3, -6.5, 1.5)
	pt3dadd(-3.37, 128.1, -6.5, 1.5)
	pt3dadd(-4.74, 130.1, -6.5, 1.5)
	pt3dadd(-6.61, 132.3, -6.5, 1.5)
	pt3dadd(-7.86, 134, -6.5, 1.5)
	pt3dadd(-8.85, 134.3, -6.5, 1.5)
  }
  dend[469] {pt3dclear()
	pt3dadd(-8.85, 134.3, -6.5, 1.5)
	pt3dadd(-9.48, 135.19, -6.5, 1.5)
	pt3dadd(-10.72, 137, -6.5, 1.5)
  }
  dend[470] {pt3dclear()
	pt3dadd(-10.72, 137, -6.5, 1.5)
	pt3dadd(-12.09, 137.4, -6.5, 1.12)
	pt3dadd(-13.47, 138.19, -6.5, 1)
	pt3dadd(-14.84, 139, -6.5, 1)
	pt3dadd(-16.07, 140.3, -6.5, 1)
	pt3dadd(-17.32, 141.5, -6.5, 1)
	pt3dadd(-18.57, 143.4, -6.75, 1)
	pt3dadd(-19.7, 144.6, -6.75, 1)
	pt3dadd(-20.95, 145.4, -6.75, 1)
	pt3dadd(-22.05, 146, -6.75, 1)
  }
  dend[471] {pt3dclear()
	pt3dadd(-22.05, 146, -6.75, 1)
	pt3dadd(-22.57, 146.9, -6.75, 1)
	pt3dadd(-23.44, 148.3, -7, 1)
	pt3dadd(-24.56, 149.5, -7, 1)
	pt3dadd(-25.81, 150.8, -7, 1)
	pt3dadd(-26.81, 152.6, -7, 1)
  }
  dend[472] {pt3dclear()
	pt3dadd(-26.81, 152.6, -7, 1)
	pt3dadd(-27.44, 154, -7, 1)
	pt3dadd(-27.81, 154.9, -7, 1)
	pt3dadd(-28.43, 157.1, -7, 1)
	pt3dadd(-29.37, 158.4, -7, 1)
  }
  dend[473] {pt3dclear()
	pt3dadd(-29.37, 158.4, -7, 1)
	pt3dadd(-30.17, 159.69, -7, 1)
	pt3dadd(-30.95, 162, -7, 1)
  }
  dend[474] {pt3dclear()
	pt3dadd(-30.95, 162, -7, 1)
	pt3dadd(-31.38, 163.5, -7, 0.5)
	pt3dadd(-31.67, 164.5, -7, 0.5)
	pt3dadd(-31.68, 165.4, -7, 0.5)
  }
}
proc shape3d_19() {
  dend[474] {  }
  dend[475] {pt3dclear()
	pt3dadd(-31.68, 165.4, -7, 0.5)
	pt3dadd(-31.67, 166, -7, 0.5)
	pt3dadd(-31.62, 166.9, -6.5, 0.26)
	pt3dadd(-31.98, 168.1, -6.5, 0.26)
	pt3dadd(-32.08, 168.9, -6.5, 0.26)
	pt3dadd(-32.28, 169.8, -6.5, 0.26)
	pt3dadd(-32.38, 170.5, -6.5, 0.18)
	pt3dadd(-32.44, 171.6, -6.25, 0.18)
	pt3dadd(-32.79, 172.6, -6.25, 0.18)
  }
  dend[476] {pt3dclear()
	pt3dadd(-31.68, 165.4, -7, 0.5)
	pt3dadd(-32.49, 165.7, -6.75, 0.26)
	pt3dadd(-33.2, 166.1, -6.75, 0.26)
	pt3dadd(-33.82, 167, -6.75, 0.26)
	pt3dadd(-34.33, 168.1, -6.75, 0.26)
	pt3dadd(-34.47, 168.8, -6.75, 0.26)
	pt3dadd(-34.99, 169.7, -6.5, 0.26)
	pt3dadd(-35.61, 170.9, -6.5, 0.26)
	pt3dadd(-35.65, 171.8, -6.5, 0.26)
  }
  dend[477] {pt3dclear()
	pt3dadd(-30.95, 162, -7, 1)
	pt3dadd(-31.98, 162.4, -7, 0.15)
	pt3dadd(-32.9, 163, -7, 0.15)
	pt3dadd(-33.97, 163.6, -7, 0.15)
	pt3dadd(-35.2, 164.2, -7, 0.15)
	pt3dadd(-35.97, 165.3, -7, 0.15)
	pt3dadd(-36.68, 166.2, -7, 0.15)
	pt3dadd(-37.19, 167.1, -7, 0.15)
	pt3dadd(-37.6, 168.7, -7, 0.15)
	pt3dadd(-38.15, 169.9, -7, 0.15)
	pt3dadd(-38.22, 171.4, -7, 0.15)
  }
  dend[478] {pt3dclear()
	pt3dadd(-29.37, 158.4, -7, 1)
	pt3dadd(-30.18, 158.4, -7, 0.18)
	pt3dadd(-30.8, 158.4, -7, 0.18)
	pt3dadd(-31.57, 158.69, -7, 0.18)
	pt3dadd(-32.74, 158.8, -7, 0.18)
	pt3dadd(-33.92, 158.8, -7, 0.18)
	pt3dadd(-35.9, 159.6, -7, 0.18)
	pt3dadd(-37.09, 160.69, -7, 0.18)
	pt3dadd(-38.32, 161.4, -7, 0.18)
	pt3dadd(-39.34, 162.19, -7, 0.18)
	pt3dadd(-40.61, 163.19, -7, 0.18)
	pt3dadd(-41.23, 163.9, -7, 0.18)
  }
  dend[479] {pt3dclear()
	pt3dadd(-41.23, 163.9, -7, 0.18)
	pt3dadd(-40.61, 165.1, -7, 0.18)
	pt3dadd(-40.67, 166.5, -7, 0.18)
	pt3dadd(-40.67, 168.1, -7, 0.18)
	pt3dadd(-40.82, 168.8, -7, 0.18)
	pt3dadd(-41.29, 169.6, -7, 0.18)
  }
  dend[480] {pt3dclear()
	pt3dadd(-41.23, 163.9, -7, 0.18)
	pt3dadd(-42.15, 164.3, -7, 0.18)
	pt3dadd(-43.13, 164.9, -7, 0.18)
	pt3dadd(-44.2, 166.1, -7, 0.18)
  }
  dend[481] {pt3dclear()
	pt3dadd(-44.2, 166.1, -7, 0.18)
	pt3dadd(-45.38, 166.9, -7, 0.15)
	pt3dadd(-46.45, 167.6, -7, 0.15)
	pt3dadd(-46.76, 168.1, -7, 0.15)
  }
  dend[482] {pt3dclear()
	pt3dadd(-44.2, 166.1, -7, 0.18)
	pt3dadd(-44.25, 167.2, -7, 0.15)
	pt3dadd(-44.56, 168, -7, 0.15)
	pt3dadd(-44.51, 169.2, -7.25, 0.15)
	pt3dadd(-44.71, 169.8, -7.25, 0.15)
  }
  dend[483] {pt3dclear()
	pt3dadd(-26.81, 152.6, -7, 1)
	pt3dadd(-27.99, 152.9, -7, 0.41)
	pt3dadd(-29.01, 153.19, -7, 0.36)
	pt3dadd(-30.08, 153.5, -7, 0.36)
	pt3dadd(-31.62, 154, -7, 0.36)
	pt3dadd(-32.49, 154.19, -7, 0.36)
  }
  dend[484] {pt3dclear()
	pt3dadd(-32.49, 154.19, -7, 0.36)
	pt3dadd(-33.65, 154, -7, 0.26)
	pt3dadd(-34.74, 153.8, -7, 0.26)
	pt3dadd(-35.56, 153.6, -7, 0.26)
	pt3dadd(-36.53, 153.3, -7, 0.26)
	pt3dadd(-37.35, 153.4, -7, 0.26)
	pt3dadd(-38.57, 153.8, -7, 0.26)
	pt3dadd(-39.79, 154.1, -7, 0.26)
	pt3dadd(-41.23, 154.69, -7, 0.26)
	pt3dadd(-42.51, 155.5, -7, 0.26)
	pt3dadd(-43.54, 156.3, -7, 0.26)
	pt3dadd(-44.71, 157.3, -7, 0.26)
	pt3dadd(-45.94, 158.4, -7, 0.26)
	pt3dadd(-47.27, 158.9, -6.75, 0.26)
	pt3dadd(-48.34, 159.5, -6.75, 0.26)
	pt3dadd(-49.16, 160.19, -6.75, 0.26)
  }
  dend[485] {pt3dclear()
	pt3dadd(-49.16, 160.19, -6.75, 0.26)
	pt3dadd(-49.27, 161.69, -6.75, 0.26)
	pt3dadd(-49.73, 162.8, -6.75, 0.26)
	pt3dadd(-50.14, 164.4, -6.75, 0.26)
	pt3dadd(-49.98, 166.1, -6.75, 0.26)
  }
  dend[486] {pt3dclear()
	pt3dadd(-49.16, 160.19, -6.75, 0.26)
	pt3dadd(-49.98, 160, -6.75, 0.26)
	pt3dadd(-50.9, 159.19, -6.75, 0.26)
	pt3dadd(-51.52, 158.69, -6.75, 0.26)
	pt3dadd(-52.39, 157.9, -7, 0.26)
	pt3dadd(-52.8, 157.1, -7, 0.26)
	pt3dadd(-53.92, 156.19, -7, 0.26)
	pt3dadd(-54.74, 155.9, -7, 0.26)
	pt3dadd(-55.51, 155.9, -7, 0.26)
	pt3dadd(-56.12, 156.1, -7, 0.26)
	pt3dadd(-56.89, 156.19, -7, 0.26)
  }
  dend[487] {pt3dclear()
	pt3dadd(-32.49, 154.19, -7, 0.36)
	pt3dadd(-33.86, 155.3, -7, 0.26)
	pt3dadd(-34.89, 156.19, -7, 0.26)
	pt3dadd(-36.43, 156.69, -7, 0.26)
	pt3dadd(-37.81, 157.5, -7, 0.26)
	pt3dadd(-39.54, 158.19, -7, 0.26)
	pt3dadd(-40.98, 159.3, -7, 0.26)
	pt3dadd(-42.72, 160.5, -7, 0.26)
	pt3dadd(-44.1, 160.9, -7, 0.26)
	pt3dadd(-44.61, 161.5, -7, 0.26)
  }
  dend[488] {pt3dclear()
	pt3dadd(-44.61, 161.5, -7, 0.26)
	pt3dadd(-45.53, 162.3, -6.75, 0.26)
	pt3dadd(-46.2, 163.3, -6.75, 0.26)
	pt3dadd(-47.01, 164.5, -6.5, 0.26)
	pt3dadd(-47.53, 165.8, -6.5, 0.26)
  }
  dend[489] {pt3dclear()
	pt3dadd(-47.53, 165.8, -6.5, 0.26)
	pt3dadd(-47.73, 166.7, -6.5, 0.26)
	pt3dadd(-47.42, 167.7, -6.5, 0.26)
	pt3dadd(-47.53, 168.6, -6.5, 0.26)
  }
  dend[490] {pt3dclear()
	pt3dadd(-47.53, 165.8, -6.5, 0.26)
	pt3dadd(-48.19, 165.9, -6.5, 0.098)
	pt3dadd(-48.86, 166, -6.5, 0.098)
	pt3dadd(-49.37, 166.5, -6.5, 0.098)
  }
  dend[491] {pt3dclear()
	pt3dadd(-44.61, 161.5, -7, 0.26)
	pt3dadd(-44.97, 161.19, -7, 0.18)
	pt3dadd(-45.38, 160.8, -7, 0.18)
	pt3dadd(-46.04, 160.8, -7, 0.18)
  }
  dend[492] {pt3dclear()
	pt3dadd(-22.05, 146, -6.75, 1)
	pt3dadd(-23.07, 145.69, -7, 0.31)
	pt3dadd(-23.84, 145.5, -7, 0.41)
	pt3dadd(-24.81, 145.3, -7, 0.41)
	pt3dadd(-26.19, 144.69, -7, 0.41)
  }
  dend[493] {pt3dclear()
	pt3dadd(-26.19, 144.69, -7, 0.41)
	pt3dadd(-26.91, 145.8, -7, 0.41)
	pt3dadd(-27.73, 146.69, -7, 0.41)
	pt3dadd(-28.75, 147.69, -7, 0.41)
	pt3dadd(-29.98, 148.5, -7, 0.41)
	pt3dadd(-31.31, 148.9, -7, 0.41)
	pt3dadd(-31.98, 149, -7, 0.41)
	pt3dadd(-33.46, 148.6, -7, 0.41)
  }
  dend[494] {pt3dclear()
	pt3dadd(-33.46, 148.6, -7, 0.41)
	pt3dadd(-34.02, 149, -7, 0.31)
	pt3dadd(-34.74, 149.8, -7, 0.31)
  }
  dend[495] {pt3dclear()
	pt3dadd(-33.46, 148.6, -7, 0.41)
	pt3dadd(-33.56, 147.6, -7, 0.31)
	pt3dadd(-34.02, 146.69, -7, 0.31)
	pt3dadd(-34.53, 146.1, -6.75, 0.31)
	pt3dadd(-35.1, 145.19, -6.75, 0.31)
	pt3dadd(-35.56, 144.5, -6.75, 0.31)
	pt3dadd(-36.17, 143.8, -7, 0.31)
	pt3dadd(-37.14, 143.19, -7, 0.31)
	pt3dadd(-37.7, 143, -7, 0.31)
  }
  dend[496] {pt3dclear()
	pt3dadd(-26.19, 144.69, -7, 0.41)
	pt3dadd(-26.86, 144.1, -7, 0.46)
	pt3dadd(-27.88, 143.3, -7, 0.46)
	pt3dadd(-29.11, 142.8, -7, 0.46)
	pt3dadd(-29.57, 142.1, -7, 0.36)
	pt3dadd(-30.7, 141.4, -7, 0.36)
  }
  dend[497] {pt3dclear()
	pt3dadd(-30.7, 141.4, -7, 0.36)
	pt3dadd(-31.57, 140.8, -7, 0.36)
	pt3dadd(-32.9, 140.5, -7, 0.36)
	pt3dadd(-34.07, 140.19, -7, 0.36)
	pt3dadd(-35.61, 139.9, -7, 0.36)
  }
  dend[498] {pt3dclear()
	pt3dadd(-35.61, 139.9, -7, 0.36)
	pt3dadd(-36.83, 140.1, -7, 0.36)
	pt3dadd(-38.83, 141.1, -7, 0.36)
	pt3dadd(-40.72, 141.5, -7, 0.36)
	pt3dadd(-42.41, 142, -7, 0.36)
	pt3dadd(-43.38, 142.9, -7, 0.36)
	pt3dadd(-44.35, 144.19, -7, 0.36)
	pt3dadd(-45.22, 145.19, -7, 0.36)
  }
  dend[499] {pt3dclear()
	pt3dadd(-35.61, 139.9, -7, 0.36)
	pt3dadd(-35.97, 139, -7, 0.36)
	pt3dadd(-36.89, 138.4, -7, 0.36)
	pt3dadd(-37.45, 137.3, -7, 0.36)
	pt3dadd(-37.6, 136.19, -7, 0.36)
	pt3dadd(-37.24, 135.5, -7, 0.36)
	pt3dadd(-36.78, 134.8, -6.75, 0.31)
	pt3dadd(-36.36, 134.19, -6.75, 0.31)
	pt3dadd(-36.32, 132.69, -6.75, 0.18)
	pt3dadd(-36.07, 131.5, -6.75, 0.18)
  }
  dend[500] {pt3dclear()
	pt3dadd(-30.7, 141.4, -7, 0.36)
	pt3dadd(-30.29, 140.4, -7, 0.18)
	pt3dadd(-30.34, 139.6, -6.75, 0.18)
	pt3dadd(-30.29, 138.6, -6.75, 0.18)
	pt3dadd(-30.39, 137.5, -6.75, 0.18)
	pt3dadd(-30.44, 137.1, -6.75, 0.18)
	pt3dadd(-30.75, 136.3, -6.75, 0.18)
  }
  dend[501] {pt3dclear()
	pt3dadd(-30.75, 136.3, -6.75, 0.18)
	pt3dadd(-31.16, 135.9, -6.5, 0.18)
	pt3dadd(-31.57, 135.3, -6.5, 0.18)
	pt3dadd(-31.82, 134.5, -6.5, 0.18)
	pt3dadd(-31.82, 133.4, -6.5, 0.18)
	pt3dadd(-32.03, 132.6, -6.25, 0.18)
	pt3dadd(-32.08, 131.69, -6.25, 0.18)
	pt3dadd(-31.82, 131.5, -6.25, 0.18)
  }
  dend[502] {pt3dclear()
	pt3dadd(-30.75, 136.3, -6.75, 0.18)
	pt3dadd(-29.93, 136, -6.5, 0.18)
	pt3dadd(-29.67, 135.19, -6.5, 0.18)
	pt3dadd(-29.32, 134.19, -6.25, 0.18)
	pt3dadd(-29.11, 133.4, -6.25, 0.18)
	pt3dadd(-28.8, 132.3, -6.5, 0.18)
  }
}
proc shape3d_20() {
  dend[502] {	pt3dadd(-28.65, 131.5, -6.5, 0.18)
	pt3dadd(-28.45, 130.6, -6.5, 0.18)
	pt3dadd(-28.6, 130, -6.5, 0.18)
	pt3dadd(-28.24, 129.3, -6.5, 0.18)
  }
  dend[503] {pt3dclear()
	pt3dadd(-10.72, 137, -6.5, 1.5)
	pt3dadd(-10.85, 138.8, -6.5, 1.12)
	pt3dadd(-11.21, 140.4, -6.5, 1.12)
  }
  dend[504] {pt3dclear()
	pt3dadd(-11.21, 140.4, -6.5, 1.12)
	pt3dadd(-12.09, 141.4, -6.5, 0.75)
	pt3dadd(-13.72, 142.9, -6.5, 0.75)
	pt3dadd(-15.4, 144.69, -6.5, 0.75)
  }
  dend[505] {pt3dclear()
	pt3dadd(-15.4, 144.69, -6.5, 0.75)
	pt3dadd(-16.21, 145.6, -6.5, 1.12)
	pt3dadd(-17.57, 146.8, -6.5, 0.75)
	pt3dadd(-18.95, 148.5, -6.5, 0.75)
	pt3dadd(-19.82, 150.6, -6.75, 0.75)
	pt3dadd(-19.92, 151.6, -6.75, 0.75)
	pt3dadd(-19.84, 152.5, -6.75, 0.75)
  }
  dend[506] {pt3dclear()
	pt3dadd(-19.84, 152.5, -6.75, 0.75)
	pt3dadd(-19.7, 153.9, -6.75, 0.75)
	pt3dadd(-19.46, 156.5, -6.75, 0.75)
  }
  dend[507] {pt3dclear()
	pt3dadd(-19.46, 156.5, -6.75, 0.75)
	pt3dadd(-19.82, 157.9, -7, 1)
	pt3dadd(-20.48, 159.1, -7, 1)
  }
  dend[508] {pt3dclear()
	pt3dadd(-20.48, 159.1, -7, 1)
	pt3dadd(-20.7, 159.6, -7, 1)
	pt3dadd(-21.95, 160.69, -7, 0.87)
	pt3dadd(-22.57, 162.6, -7, 0.87)
	pt3dadd(-23.44, 163.8, -7, 0.87)
	pt3dadd(-24.19, 165, -7, 0.87)
	pt3dadd(-24.44, 166.6, -7, 0.87)
	pt3dadd(-24.62, 168.2, -7, 0.87)
  }
  dend[509] {pt3dclear()
	pt3dadd(-24.62, 168.2, -7, 0.87)
	pt3dadd(-24.25, 168.8, -6.75, 0.31)
	pt3dadd(-24, 169.4, -6.75, 0.31)
	pt3dadd(-23.28, 170.2, -6.75, 0.31)
	pt3dadd(-23.53, 171.1, -6.75, 0.15)
	pt3dadd(-23.89, 172.1, -6.75, 0.15)
	pt3dadd(-24.56, 172.7, -6.75, 0.0498)
	pt3dadd(-24.97, 173.8, -6.75, 0.0498)
	pt3dadd(-25.17, 175, -6.75, 0.0498)
  }
  dend[510] {pt3dclear()
	pt3dadd(-24.62, 168.2, -7, 0.87)
	pt3dadd(-25.33, 168.9, -6.75, 0.18)
	pt3dadd(-26.09, 169.9, -6.75, 0.18)
	pt3dadd(-26.6, 170.6, -6.75, 0.18)
	pt3dadd(-27.22, 171.5, -6.75, 0.18)
	pt3dadd(-27.93, 172.1, -6.75, 0.18)
	pt3dadd(-28.55, 173, -6.75, 0.18)
  }
  dend[511] {pt3dclear()
	pt3dadd(-20.48, 159.1, -7, 1)
	pt3dadd(-20.01, 160.1, -6.75, 0.56)
	pt3dadd(-19.34, 161.1, -6.75, 0.56)
	pt3dadd(-18.62, 161.9, -6.75, 0.56)
	pt3dadd(-18.27, 163, -6.75, 0.56)
	pt3dadd(-17.75, 164.3, -6.75, 0.56)
	pt3dadd(-17.04, 165.6, -6.75, 0.56)
	pt3dadd(-16.82, 167.2, -6.75, 0.56)
	pt3dadd(-16.73, 168.1, -6.75, 0.31)
	pt3dadd(-16.82, 169.4, -6.5, 0.31)
	pt3dadd(-17.09, 170.5, -6.5, 0.31)
	pt3dadd(-17.64, 171.5, -6.5, 0.31)
	pt3dadd(-19.07, 172.5, -6.5, 0.15)
	pt3dadd(-19.7, 173.3, -6.5, 0.15)
	pt3dadd(-20.98, 174.3, -6.5, 0.15)
	pt3dadd(-21.8, 175.7, -6.5, 0.15)
	pt3dadd(-22.56, 177, -6.5, 0.15)
	pt3dadd(-22.82, 177.8, -6.5, 0.15)
  }
  dend[512] {pt3dclear()
	pt3dadd(-19.46, 156.5, -6.75, 0.75)
	pt3dadd(-18.62, 156.9, -7, 0.36)
	pt3dadd(-17.75, 157.4, -7, 0.36)
	pt3dadd(-17.09, 157.69, -7, 0.36)
	pt3dadd(-16.12, 158.1, -7, 0.36)
	pt3dadd(-15.04, 159.1, -7, 0.36)
	pt3dadd(-14.22, 159.6, -6.75, 0.36)
	pt3dadd(-13.1, 160.5, -6.75, 0.36)
	pt3dadd(-12.49, 161.1, -6.75, 0.36)
  }
  dend[513] {pt3dclear()
	pt3dadd(-12.49, 161.1, -6.75, 0.36)
	pt3dadd(-11.67, 160.3, -6.75, 0.18)
	pt3dadd(-11.31, 159.69, -6.75, 0.18)
	pt3dadd(-11.05, 158.9, -6.75, 0.18)
	pt3dadd(-10.34, 158.69, -6.75, 0.18)
	pt3dadd(-9.67, 158.1, -6.75, 0.18)
	pt3dadd(-8.96, 157.3, -6.5, 0.18)
	pt3dadd(-8.34, 156.6, -6.5, 0.18)
	pt3dadd(-7.68, 155.8, -6.5, 0.18)
	pt3dadd(-6.71, 155.5, -6.5, 0.18)
	pt3dadd(-5.63, 155.4, -6.5, 0.18)
	pt3dadd(-4.25, 155.3, -6.5, 0.18)
	pt3dadd(-3.84, 155.3, -6.5, 0.18)
	pt3dadd(-2.97, 155.3, -6.5, 0.098)
	pt3dadd(-2.31, 155.1, -6.5, 0.098)
  }
  dend[514] {pt3dclear()
	pt3dadd(-12.49, 161.1, -6.75, 0.36)
	pt3dadd(-11.97, 161.69, -6.75, 0.36)
	pt3dadd(-11.51, 162.3, -6.75, 0.36)
	pt3dadd(-10.8, 162.9, -6.75, 0.36)
  }
  dend[515] {pt3dclear()
	pt3dadd(-10.8, 162.9, -6.75, 0.36)
	pt3dadd(-9.88, 162.6, -6.75, 0.26)
	pt3dadd(-8.8, 162.6, -6.75, 0.26)
	pt3dadd(-7.83, 162.3, -6.75, 0.26)
	pt3dadd(-6.86, 162, -6.75, 0.26)
	pt3dadd(-6.04, 161.69, -6.75, 0.26)
	pt3dadd(-5.38, 161.1, -6.75, 0.26)
	pt3dadd(-4.71, 160.69, -6.75, 0.26)
	pt3dadd(-3.74, 160.4, -6.75, 0.26)
	pt3dadd(-2.66, 159.5, -6.5, 0.26)
	pt3dadd(-1.85, 158.9, -6.5, 0.26)
	pt3dadd(-0.92, 158.5, -6.5, 0.26)
	pt3dadd(0.04, 158.1, -6.75, 0.26)
	pt3dadd(0.61, 157.9, -6.75, 0.26)
	pt3dadd(1.79, 157.69, -6.75, 0.26)
	pt3dadd(3.12, 157.69, -6.75, 0.26)
	pt3dadd(3.99, 158.1, -6.75, 0.26)
  }
  dend[516] {pt3dclear()
	pt3dadd(3.99, 158.1, -6.75, 0.26)
	pt3dadd(4.75, 157.69, -6.75, 0.26)
	pt3dadd(5.47, 157, -6.75, 0.26)
	pt3dadd(6.34, 156.19, -6.75, 0.26)
	pt3dadd(6.6, 155.69, -6.75, 0.26)
  }
  dend[517] {pt3dclear()
	pt3dadd(3.99, 158.1, -6.75, 0.26)
	pt3dadd(3.32, 158.8, -6.75, 0.26)
	pt3dadd(2.71, 160, -6.5, 0.26)
	pt3dadd(1.48, 160.9, -6.5, 0.26)
  }
  dend[518] {pt3dclear()
	pt3dadd(-10.8, 162.9, -6.75, 0.36)
	pt3dadd(-11.1, 164, -6.75, 0.26)
	pt3dadd(-11.16, 165.1, -6.75, 0.26)
	pt3dadd(-11.41, 166.5, -6.75, 0.26)
	pt3dadd(-11.31, 167.7, -6.75, 0.26)
	pt3dadd(-11.72, 168.9, -6.75, 0.26)
	pt3dadd(-12.08, 170.5, -6.75, 0.26)
	pt3dadd(-12.38, 172.1, -6.75, 0.26)
	pt3dadd(-13.66, 173.5, -6.75, 0.26)
  }
  dend[519] {pt3dclear()
	pt3dadd(-13.66, 173.5, -6.75, 0.26)
	pt3dadd(-13.25, 174.3, -6.5, 0.26)
	pt3dadd(-12.54, 175.1, -6.5, 0.18)
	pt3dadd(-11.56, 175.9, -6.5, 0.098)
	pt3dadd(-10.85, 176, -6.5, 0.098)
  }
  dend[520] {pt3dclear()
	pt3dadd(-13.66, 173.5, -6.75, 0.26)
	pt3dadd(-14.74, 174.4, -6.5, 0.098)
	pt3dadd(-15.96, 175.2, -6.5, 0.098)
	pt3dadd(-16.68, 176, -6.5, 0.098)
	pt3dadd(-18.01, 176.9, -6.25, 0.098)
	pt3dadd(-18.98, 177.7, -6.25, 0.098)
	pt3dadd(-19.8, 179.2, -6.25, 0.098)
  }
  dend[521] {pt3dclear()
	pt3dadd(-19.84, 152.5, -6.75, 0.75)
	pt3dadd(-20.67, 153, -6.5, 0.56)
	pt3dadd(-21.39, 153.69, -6.75, 0.31)
	pt3dadd(-22.36, 154.19, -6.75, 0.31)
	pt3dadd(-23.18, 154.6, -6.75, 0.31)
	pt3dadd(-23.84, 155.3, -6.75, 0.31)
	pt3dadd(-24.35, 155.9, -6.75, 0.31)
	pt3dadd(-24.92, 156.5, -6.75, 0.31)
	pt3dadd(-25.07, 157.4, -6.75, 0.31)
	pt3dadd(-25.17, 158, -6.75, 0.31)
	pt3dadd(-25.33, 159.19, -6.75, 0.31)
	pt3dadd(-25.58, 160.1, -6.75, 0.31)
	pt3dadd(-25.99, 160.69, -6.75, 0.31)
	pt3dadd(-26.66, 161.5, -6.75, 0.31)
	pt3dadd(-27.01, 162.1, -6.75, 0.31)
	pt3dadd(-27.01, 163.3, -6.5, 0.18)
	pt3dadd(-27.73, 163.9, -6.5, 0.18)
	pt3dadd(-28.5, 164.9, -6.5, 0.18)
  }
  dend[522] {pt3dclear()
	pt3dadd(-15.4, 144.69, -6.5, 0.75)
	pt3dadd(-15.61, 145.9, -6.25, 0.31)
	pt3dadd(-15.81, 147.3, -6.5, 0.26)
	pt3dadd(-16.48, 148.5, -6.5, 0.26)
	pt3dadd(-16.68, 149.69, -6.5, 0.26)
	pt3dadd(-16.78, 151.3, -6.5, 0.26)
	pt3dadd(-16.73, 152.8, -6.5, 0.26)
	pt3dadd(-16.53, 154.5, -6.5, 0.26)
	pt3dadd(-15.86, 155.69, -6.5, 0.26)
	pt3dadd(-15.45, 157, -6.25, 0.26)
  }
  dend[523] {pt3dclear()
	pt3dadd(-15.45, 157, -6.25, 0.26)
	pt3dadd(-16.07, 157.8, -6.25, 0.26)
	pt3dadd(-16.98, 158.5, -6.25, 0.26)
	pt3dadd(-18.11, 159.4, -6, 0.26)
	pt3dadd(-18.47, 159.9, -6, 0.26)
	pt3dadd(-18.37, 160.9, -5.75, 0.18)
  }
  dend[524] {pt3dclear()
	pt3dadd(-15.45, 157, -6.25, 0.26)
	pt3dadd(-14.53, 157.3, -6, 0.26)
	pt3dadd(-13.97, 157.5, -6, 0.26)
	pt3dadd(-13.05, 157.3, -6, 0.26)
  }
  dend[525] {pt3dclear()
	pt3dadd(-11.21, 140.4, -6.5, 1.12)
	pt3dadd(-11.1, 141.19, -6.25, 0.41)
	pt3dadd(-10.9, 142.3, -6.25, 0.41)
	pt3dadd(-11.26, 142.9, -6.25, 0.36)
	pt3dadd(-11.72, 143.6, -6.25, 0.36)
	pt3dadd(-12.59, 144.8, -6.25, 0.36)
	pt3dadd(-12.79, 146.4, -6, 0.36)
	pt3dadd(-13.15, 147.4, -6, 0.36)
	pt3dadd(-13.76, 148.69, -6, 0.36)
  }
  dend[526] {pt3dclear()
	pt3dadd(-13.76, 148.69, -6, 0.36)
	pt3dadd(-14.79, 149.5, -5.75, 0.36)
	pt3dadd(-15.86, 150.6, -5.75, 0.36)
  }
  dend[527] {pt3dclear()
	pt3dadd(-13.76, 148.69, -6, 0.36)
	pt3dadd(-13, 149.19, -6, 0.36)
	pt3dadd(-11.82, 150.19, -6, 0.36)
  }
  dend[528] {pt3dclear()
	pt3dadd(-11.82, 150.19, -6, 0.36)
	pt3dadd(-12.23, 151.19, -6, 0.36)
	pt3dadd(-12.59, 152.5, -6, 0.36)
	pt3dadd(-13.2, 153.6, -6, 0.36)
	pt3dadd(-14.02, 153.9, -6, 0.36)
	pt3dadd(-14.94, 153.69, -6, 0.36)
  }
}
proc shape3d_21() {
  dend[528] {	pt3dadd(-15.66, 153.3, -6, 0.36)
  }
  dend[529] {pt3dclear()
	pt3dadd(-11.82, 150.19, -6, 0.36)
	pt3dadd(-11.16, 149.9, -6, 0.36)
	pt3dadd(-10.75, 149.3, -6, 0.36)
	pt3dadd(-10.29, 148.6, -6, 0.36)
  }
  dend[530] {pt3dclear()
	pt3dadd(-8.85, 134.3, -6.5, 1.5)
	pt3dadd(-9.67, 133.9, -6.5, 0.26)
	pt3dadd(-10.23, 133.4, -6.25, 0.26)
	pt3dadd(-10.9, 133.1, -6.25, 0.15)
	pt3dadd(-11.97, 133.1, -6.25, 0.15)
	pt3dadd(-13.1, 132.9, -6.25, 0.15)
  }
  dend[531] {pt3dclear()
	pt3dadd(-13.1, 132.9, -6.25, 0.15)
	pt3dadd(-13.3, 131.8, -6.5, 0.26)
	pt3dadd(-13.61, 131.4, -6.5, 0.26)
	pt3dadd(-14.07, 130.69, -6.5, 0.26)
	pt3dadd(-14.48, 130.3, -6.5, 0.26)
	pt3dadd(-14.74, 129.3, -6.5, 0.26)
	pt3dadd(-14.48, 128.69, -6.5, 0.26)
	pt3dadd(-14.43, 127.8, -6.5, 0.26)
	pt3dadd(-13.92, 127, -6.5, 0.26)
	pt3dadd(-13.66, 126.5, -6.5, 0.26)
	pt3dadd(-13.56, 125.7, -6.5, 0.26)
	pt3dadd(-13.1, 124.4, -6.5, 0.26)
  }
  dend[532] {pt3dclear()
	pt3dadd(-13.1, 132.9, -6.25, 0.15)
	pt3dadd(-14.22, 133.1, -6.5, 0.26)
	pt3dadd(-15.71, 133.19, -6.5, 0.26)
  }
  dend[533] {pt3dclear()
	pt3dadd(-15.71, 133.19, -6.5, 0.26)
	pt3dadd(-16.48, 132.69, -6.5, 0.31)
	pt3dadd(-17.19, 132.3, -6.5, 0.31)
	pt3dadd(-18.21, 132.1, -6.5, 0.31)
	pt3dadd(-18.68, 131.19, -6.5, 0.31)
	pt3dadd(-19.34, 130.69, -6.5, 0.31)
	pt3dadd(-19.44, 129.69, -6.5, 0.31)
	pt3dadd(-19.44, 128.6, -6.5, 0.31)
	pt3dadd(-19.64, 127.4, -6.25, 0.31)
	pt3dadd(-19.8, 126.7, -6.25, 0.31)
	pt3dadd(-20.47, 125.7, -6.25, 0.31)
  }
  dend[534] {pt3dclear()
	pt3dadd(-15.71, 133.19, -6.5, 0.26)
	pt3dadd(-15.91, 133.8, -6.5, 0.31)
	pt3dadd(-16.63, 134.9, -6.5, 0.31)
	pt3dadd(-16.88, 136.19, -6.5, 0.31)
  }
  dend[535] {pt3dclear()
	pt3dadd(-16.88, 136.19, -6.5, 0.31)
	pt3dadd(-16.17, 136.5, -6.5, 0.26)
	pt3dadd(-15.5, 136.9, -6.5, 0.26)
	pt3dadd(-14.79, 136.6, -6.5, 0.26)
	pt3dadd(-14.17, 136.3, -6.5, 0.26)
	pt3dadd(-13.82, 135.69, -6.5, 0.26)
	pt3dadd(-13.71, 135.19, -6.5, 0.26)
  }
  dend[536] {pt3dclear()
	pt3dadd(-16.88, 136.19, -6.5, 0.31)
	pt3dadd(-17.6, 136.69, -6.5, 0.31)
	pt3dadd(-18.47, 137.69, -6.5, 0.31)
	pt3dadd(-19.29, 138.5, -6.5, 0.31)
	pt3dadd(-20.01, 139.4, -6.5, 0.31)
	pt3dadd(-21.39, 140.9, -6.5, 0.31)
	pt3dadd(-22.67, 141.1, -6.75, 0.31)
	pt3dadd(-23.64, 142, -6.75, 0.31)
	pt3dadd(-24.3, 142.6, -6.75, 0.31)
  }
  dend[537] {pt3dclear()
	pt3dadd(0.15, 124.2, -6.5, 1.62)
	pt3dadd(0.87, 126.2, -6.5, 0.46)
	pt3dadd(0.77, 127.3, -6.5, 0.46)
	pt3dadd(0.31, 128.4, -6.5, 0.46)
	pt3dadd(-0.04, 129.4, -6.5, 0.46)
	pt3dadd(-0.76, 130.69, -6.5, 0.46)
	pt3dadd(-1.33, 131.5, -6.5, 0.46)
	pt3dadd(-1.89, 132.69, -6.5, 0.46)
	pt3dadd(-2.81, 133.9, -6.5, 0.46)
	pt3dadd(-3.17, 135.19, -6.5, 0.46)
	pt3dadd(-3.42, 135.8, -6.5, 0.46)
  }
  dend[538] {pt3dclear()
	pt3dadd(-3.42, 135.8, -6.5, 0.46)
	pt3dadd(-3.37, 137.1, -6.5, 0.41)
	pt3dadd(-3.27, 139.19, -6.25, 0.41)
	pt3dadd(-3.37, 140.4, -6.25, 0.41)
	pt3dadd(-3.58, 141.8, -6.25, 0.41)
	pt3dadd(-4.19, 142.9, -6.25, 0.41)
	pt3dadd(-4.5, 144.19, -6.25, 0.41)
	pt3dadd(-4.7, 145.4, -6.25, 0.41)
	pt3dadd(-5.01, 146.6, -6.25, 0.41)
	pt3dadd(-5.32, 147.8, -6.25, 0.41)
	pt3dadd(-5.57, 148.9, -6.25, 0.41)
	pt3dadd(-4.96, 150.1, -6, 0.41)
	pt3dadd(-4.75, 151, -6, 0.41)
	pt3dadd(-4.91, 152.1, -6, 0.41)
  }
  dend[539] {pt3dclear()
	pt3dadd(-3.42, 135.8, -6.5, 0.46)
	pt3dadd(-4.5, 136.3, -6.5, 0.41)
	pt3dadd(-5.47, 137.3, -6.5, 0.41)
	pt3dadd(-6.6, 138.5, -6.5, 0.41)
	pt3dadd(-6.85, 139.5, -6.5, 0.41)
	pt3dadd(-7.41, 141, -6.5, 0.41)
	pt3dadd(-7.67, 142.3, -6.5, 0.41)
	pt3dadd(-7.72, 143.9, -6.25, 0.41)
	pt3dadd(-7.72, 145.19, -6.25, 0.41)
	pt3dadd(-7.62, 146.8, -6.25, 0.41)
	pt3dadd(-7.57, 148.3, -6.25, 0.41)
	pt3dadd(-7.52, 149.4, -6.25, 0.41)
	pt3dadd(-7.93, 150.6, -6.25, 0.41)
	pt3dadd(-8.23, 151.9, -6.25, 0.41)
	pt3dadd(-8.34, 153.1, -6, 0.41)
	pt3dadd(-7.98, 153.9, -6, 0.31)
	pt3dadd(-7.73, 155, -6, 0.36)
	pt3dadd(-7.68, 155.9, -6, 0.36)
	pt3dadd(-7.73, 157.1, -6, 0.36)
	pt3dadd(-8.19, 158.19, -5.75, 0.36)
	pt3dadd(-8.28, 159.8, -5.75, 0.36)
	pt3dadd(-9.16, 160.19, -5.75, 0.18)
	pt3dadd(-10.13, 161.19, -5.75, 0.18)
  }
  dend[540] {pt3dclear()
	pt3dadd(-10.13, 161.19, -5.75, 0.18)
	pt3dadd(-9.72, 162.3, -5.75, 0.098)
	pt3dadd(-9.61, 163.3, -5.75, 0.098)
	pt3dadd(-9.77, 163.9, -5.75, 0.098)
  }
  dend[541] {pt3dclear()
	pt3dadd(-10.13, 161.19, -5.75, 0.18)
	pt3dadd(-10.8, 161.5, -5.75, 0.098)
	pt3dadd(-11.46, 161.9, -5.75, 0.098)
	pt3dadd(-12.18, 162.5, -5.75, 0.098)
	pt3dadd(-12.54, 163, -5.5, 0.098)
	pt3dadd(-12.84, 163.3, -5.5, 0.098)
  }
  dend[542] {pt3dclear()
	pt3dadd(-0.26, 115.4, -6.25, 1.62)
	pt3dadd(-1.33, 115.9, -6.75, 0.56)
	pt3dadd(-1.9, 116.6, -6.75, 0.26)
	pt3dadd(-2.46, 117.4, -6.75, 0.26)
	pt3dadd(-2.92, 118.3, -6.75, 0.26)
	pt3dadd(-3.12, 119.8, -6.75, 0.31)
	pt3dadd(-3.33, 121.2, -6.75, 0.31)
	pt3dadd(-3.58, 122.2, -6.5, 0.31)
	pt3dadd(-3.69, 123.6, -6.5, 0.31)
	pt3dadd(-4.2, 124.9, -6.5, 0.31)
	pt3dadd(-5.17, 126.1, -6.5, 0.31)
	pt3dadd(-5.73, 126.7, -6.5, 0.31)
	pt3dadd(-6.5, 127.9, -6.5, 0.31)
	pt3dadd(-7.37, 128.6, -6.5, 0.31)
	pt3dadd(-8.5, 129.6, -6.5, 0.31)
	pt3dadd(-9.01, 130, -6.5, 0.31)
  }
  dend[543] {pt3dclear()
	pt3dadd(-0.62, 113.3, -6.25, 1.62)
	pt3dadd(-1.54, 113.6, -6.75, 0.41)
	pt3dadd(-2.31, 113.7, -6.75, 0.26)
	pt3dadd(-3.23, 114.1, -6.75, 0.26)
	pt3dadd(-4.4, 114.9, -6.75, 0.26)
	pt3dadd(-4.91, 115.5, -6.75, 0.26)
	pt3dadd(-5.01, 116.2, -6.5, 0.41)
	pt3dadd(-5.27, 117.2, -6.5, 0.41)
	pt3dadd(-6.04, 117.6, -6.5, 0.41)
	pt3dadd(-6.3, 118.8, -6.5, 0.31)
	pt3dadd(-6.24, 119.9, -6.5, 0.31)
	pt3dadd(-6.5, 121.5, -6.5, 0.31)
	pt3dadd(-6.65, 122.5, -6.5, 0.31)
	pt3dadd(-7.06, 123.5, -6.5, 0.31)
	pt3dadd(-7.57, 124.5, -6.5, 0.31)
  }
  dend[544] {pt3dclear()
	pt3dadd(-7.57, 124.5, -6.5, 0.31)
	pt3dadd(-7.98, 125.1, -6.5, 0.31)
	pt3dadd(-8.5, 126, -6.5, 0.26)
	pt3dadd(-9.67, 127.4, -6.5, 0.26)
	pt3dadd(-10.59, 128.4, -6.5, 0.26)
  }
  dend[545] {pt3dclear()
	pt3dadd(-7.57, 124.5, -6.5, 0.31)
	pt3dadd(-7.93, 124, -6.5, 0.26)
	pt3dadd(-8.75, 123.6, -6.25, 0.26)
	pt3dadd(-9.42, 123.5, -6.25, 0.26)
	pt3dadd(-9.88, 124, -6.25, 0.26)
	pt3dadd(-10.44, 124.3, -6.25, 0.26)
	pt3dadd(-11.1, 124.6, -6.25, 0.26)
  }
  dend[546] {pt3dclear()
	pt3dadd(-0.43, 112.6, -6.03, 1.62)
	pt3dadd(0.56, 109.2, -6.25, 1.13)
	pt3dadd(1.43, 109.3, -6.25, 0.51)
	pt3dadd(2.76, 109.8, -6.25, 0.26)
	pt3dadd(3.12, 110.1, -6.25, 0.36)
  }
  dend[547] {pt3dclear()
	pt3dadd(3.12, 110.1, -6.25, 0.36)
	pt3dadd(2.71, 110.9, -6.25, 0.36)
	pt3dadd(2.87, 112, -6.25, 0.36)
	pt3dadd(3.33, 112.8, -6.25, 0.36)
	pt3dadd(3.74, 113.4, -6.25, 0.36)
	pt3dadd(4.71, 113.9, -6.25, 0.36)
	pt3dadd(5.48, 114, -6, 0.36)
	pt3dadd(6.6, 114.8, -6, 0.36)
	pt3dadd(7.32, 115, -6.25, 0.36)
	pt3dadd(8.6, 115.6, -5.75, 0.36)
	pt3dadd(9.67, 115.4, -5.75, 0.36)
	pt3dadd(10.69, 115.3, -5.75, 0.36)
	pt3dadd(12.02, 115, -5.75, 0.36)
	pt3dadd(12.84, 114, -5.75, 0.26)
	pt3dadd(13.76, 113.3, -5.75, 0.26)
	pt3dadd(14.48, 113.3, -5.5, 0.26)
  }
  dend[548] {pt3dclear()
	pt3dadd(3.12, 110.1, -6.25, 0.36)
	pt3dadd(3.94, 109.8, -6.25, 0.36)
	pt3dadd(4.76, 109.8, -6.25, 0.36)
	pt3dadd(6.04, 110, -6.25, 0.36)
	pt3dadd(7.62, 110.6, -6.25, 0.36)
	pt3dadd(8.75, 111.1, -6.25, 0.36)
	pt3dadd(9.72, 112.4, -6.25, 0.36)
	pt3dadd(10.54, 113.3, -6.25, 0.36)
	pt3dadd(11.46, 114.4, -6.5, 0.36)
	pt3dadd(12.59, 115.9, -6.5, 0.36)
  }
  dend[549] {pt3dclear()
	pt3dadd(-0.56, 109.4, -6.5, 1.62)
	pt3dadd(0.56, 108.5, -6.25, 0.41)
	pt3dadd(1.23, 107.9, -6.25, 0.31)
	pt3dadd(1.84, 107.6, -6.25, 0.31)
	pt3dadd(2.61, 107.1, -6.25, 0.31)
	pt3dadd(3.43, 106.9, -6.25, 0.31)
	pt3dadd(3.94, 106.6, -6.25, 0.31)
	pt3dadd(4.66, 106.3, -6.25, 0.31)
	pt3dadd(5.07, 105.9, -6.25, 0.31)
	pt3dadd(5.83, 105.8, -6.25, 0.46)
	pt3dadd(6.55, 105.7, -6.25, 0.46)
  }
}
proc shape3d_22() {
  dend[549] {	pt3dadd(7.47, 105.7, -6.25, 0.67)
  }
  dend[550] {pt3dclear()
	pt3dadd(7.47, 105.7, -6.25, 0.67)
	pt3dadd(8.02, 106.6, -6.25, 0.46)
	pt3dadd(8.39, 107.1, -6.25, 0.46)
	pt3dadd(9.16, 107.8, -6.5, 0.46)
	pt3dadd(10.02, 108.4, -6.5, 0.46)
	pt3dadd(11.26, 108.8, -6.5, 0.46)
	pt3dadd(12.38, 109.1, -6.25, 0.46)
	pt3dadd(13.35, 109.2, -6.25, 0.46)
	pt3dadd(14.43, 109.6, -6.25, 0.46)
	pt3dadd(14.68, 110.5, -6, 0.36)
	pt3dadd(15.71, 111.2, -6, 0.36)
	pt3dadd(17.04, 111.7, -6, 0.36)
	pt3dadd(18.21, 112.3, -6, 0.36)
	pt3dadd(18.67, 112.6, -6, 0.36)
  }
  dend[551] {pt3dclear()
	pt3dadd(7.47, 105.7, -6.25, 0.67)
	pt3dadd(8.02, 104.7, -6.25, 0.41)
	pt3dadd(8.6, 104.2, -6.25, 0.41)
	pt3dadd(9.21, 103.8, -6.25, 0.41)
	pt3dadd(9.72, 103.6, -6.25, 0.41)
	pt3dadd(10.02, 103.1, -6.25, 0.41)
	pt3dadd(10.49, 102.6, -6.25, 0.41)
	pt3dadd(11.21, 101.8, -6.25, 0.41)
	pt3dadd(11.15, 100.3, -6.25, 0.41)
  }
  dend[552] {pt3dclear()
	pt3dadd(-1.74, 106.5, -6.5, 1.62)
	pt3dadd(-2.91, 107, -6.25, 1.74)
	pt3dadd(-4.5, 107.7, -6.25, 1.59)
	pt3dadd(-5.93, 108.5, -6.25, 1.48)
	pt3dadd(-6.7, 109.1, -6.25, 1.48)
  }
  dend[553] {pt3dclear()
	pt3dadd(-6.7, 109.1, -6.25, 1.48)
	pt3dadd(-6.44, 109.8, -6.25, 0.61)
	pt3dadd(-6.65, 111.4, -6.25, 0.41)
	pt3dadd(-6.9, 112.3, -6.25, 0.41)
	pt3dadd(-7.26, 113.2, -6.25, 0.41)
	pt3dadd(-7.62, 113.8, -6.25, 0.41)
	pt3dadd(-8.08, 114.7, -6.25, 0.41)
	pt3dadd(-8.39, 115.6, -6.25, 0.41)
	pt3dadd(-8.59, 116.9, -6.25, 0.41)
	pt3dadd(-9.15, 118.2, -6.5, 0.41)
	pt3dadd(-9.82, 119.1, -6.5, 0.41)
	pt3dadd(-10.43, 120, -6.5, 0.41)
	pt3dadd(-10.79, 121, -6.5, 0.41)
	pt3dadd(-11.92, 122.3, -6.5, 0.41)
	pt3dadd(-12.73, 122.5, -6.25, 0.41)
	pt3dadd(-13.91, 122.8, -6.25, 0.41)
	pt3dadd(-15.14, 123.9, -6.25, 0.41)
	pt3dadd(-15.8, 124.4, -6.25, 0.41)
	pt3dadd(-16.72, 125.6, -6.25, 0.41)
	pt3dadd(-17.13, 127.2, -6.25, 0.36)
	pt3dadd(-17.29, 128.5, -6.25, 0.36)
	pt3dadd(-17.13, 129.4, -6.25, 0.36)
  }
  dend[554] {pt3dclear()
	pt3dadd(-6.7, 109.1, -6.25, 1.48)
	pt3dadd(-7.72, 109.5, -6.25, 0.51)
	pt3dadd(-9.1, 110.4, -6.25, 0.51)
	pt3dadd(-10.38, 111.2, -6.25, 0.51)
	pt3dadd(-11.2, 111.7, -6.25, 0.51)
  }
  dend[555] {pt3dclear()
	pt3dadd(-11.2, 111.7, -6.25, 0.51)
	pt3dadd(-12.17, 111.2, -6, 0.51)
	pt3dadd(-12.94, 110.9, -6, 0.51)
	pt3dadd(-14.06, 110.3, -6, 0.51)
	pt3dadd(-15.04, 109.8, -6.25, 0.51)
	pt3dadd(-15.55, 109.4, -6.25, 0.51)
  }
  dend[556] {pt3dclear()
	pt3dadd(-15.55, 109.4, -6.25, 0.51)
	pt3dadd(-15.55, 108.6, -6.25, 0.51)
	pt3dadd(-15.65, 107.7, -6.25, 0.51)
	pt3dadd(-15.65, 106.9, -6.25, 0.51)
	pt3dadd(-15.55, 105.9, -6.25, 0.51)
	pt3dadd(-15.34, 105.1, -6.25, 0.51)
	pt3dadd(-14.88, 103.9, -6.25, 0.51)
	pt3dadd(-14.47, 102.9, -6.25, 0.51)
	pt3dadd(-13.81, 102.5, -6.25, 0.51)
	pt3dadd(-13.35, 101.8, -6.25, 0.51)
	pt3dadd(-13.35, 101, -6.25, 0.51)
	pt3dadd(-13.3, 99.67, -6.25, 0.51)
	pt3dadd(-12.99, 98.95, -6.25, 0.51)
	pt3dadd(-12.33, 98.24, -6.25, 0.51)
	pt3dadd(-11.76, 97.42, -6, 0.41)
	pt3dadd(-11.2, 97.06, -6, 0.41)
	pt3dadd(-10.89, 96.7, -6, 0.41)
	pt3dadd(-9.97, 96.14, -5.75, 0.41)
	pt3dadd(-8.9, 95.47, -5.75, 0.41)
	pt3dadd(-7.93, 95.22, -5.5, 0.41)
	pt3dadd(-7.11, 94.14, -5.25, 0.41)
	pt3dadd(-6.49, 93.22, -5.25, 0.41)
	pt3dadd(-6.19, 92.05, -5.25, 0.41)
	pt3dadd(-5.57, 91.48, -5.25, 0.41)
	pt3dadd(-4.59, 91.43, -5.25, 0.41)
	pt3dadd(-3.73, 91.69, -5.25, 0.41)
  }
  dend[557] {pt3dclear()
	pt3dadd(-15.55, 109.4, -6.25, 0.51)
	pt3dadd(-16.32, 110.5, -6.25, 0.41)
	pt3dadd(-17.03, 111, -6.25, 0.41)
	pt3dadd(-17.89, 112, -6.25, 0.41)
	pt3dadd(-19.03, 112.4, -6.25, 0.41)
  }
  dend[558] {pt3dclear()
	pt3dadd(-19.03, 112.4, -6.25, 0.41)
	pt3dadd(-19.32, 111.7, -6.25, 0.41)
	pt3dadd(-19.89, 110.7, -6.25, 0.41)
	pt3dadd(-20.71, 110.2, -6.25, 0.41)
	pt3dadd(-21.38, 109.2, -6.25, 0.41)
	pt3dadd(-21.48, 108.4, -6.25, 0.41)
	pt3dadd(-21.64, 107.5, -6.25, 0.41)
	pt3dadd(-22.04, 106.6, -6.25, 0.41)
	pt3dadd(-22.61, 106.1, -6.25, 0.41)
  }
  dend[559] {pt3dclear()
	pt3dadd(-19.03, 112.4, -6.25, 0.41)
	pt3dadd(-19.95, 113.1, -6.25, 0.41)
	pt3dadd(-20.61, 113.7, -6.25, 0.41)
	pt3dadd(-21.28, 114.5, -6.25, 0.41)
  }
  dend[560] {pt3dclear()
	pt3dadd(-21.28, 114.5, -6.25, 0.41)
	pt3dadd(-21.38, 115.4, -6.25, 0.41)
	pt3dadd(-21.99, 116.3, -6.5, 0.41)
	pt3dadd(-22.35, 117, -6.5, 0.41)
	pt3dadd(-22.61, 118.2, -6.75, 0.41)
	pt3dadd(-23.58, 118.6, -6.75, 0.41)
	pt3dadd(-24.09, 118.8, -6.75, 0.41)
  }
  dend[561] {pt3dclear()
	pt3dadd(-21.28, 114.5, -6.25, 0.41)
	pt3dadd(-22.2, 114.3, -6.25, 0.41)
	pt3dadd(-23.48, 114.1, -6.25, 0.41)
	pt3dadd(-24.24, 113.9, -6.5, 0.41)
  }
  dend[562] {pt3dclear()
	pt3dadd(-24.24, 113.9, -6.5, 0.41)
	pt3dadd(-24.76, 114.5, -6.5, 0.41)
	pt3dadd(-25.32, 114.9, -6.5, 0.41)
	pt3dadd(-26.34, 115.4, -6.5, 0.41)
  }
  dend[563] {pt3dclear()
	pt3dadd(-24.24, 113.9, -6.5, 0.41)
	pt3dadd(-24.91, 113.3, -6.5, 0.36)
	pt3dadd(-25.27, 113, -6.5, 0.36)
	pt3dadd(-25.63, 112.5, -6.5, 0.36)
	pt3dadd(-25.47, 111.8, -6.5, 0.36)
	pt3dadd(-25.37, 110.8, -6.75, 0.36)
	pt3dadd(-24.91, 110.2, -6.75, 0.36)
	pt3dadd(-24.91, 109.2, -6.75, 0.36)
	pt3dadd(-25.06, 108.4, -6.75, 0.36)
	pt3dadd(-25.17, 107.6, -6.75, 0.36)
	pt3dadd(-24.81, 106.7, -6.75, 0.36)
	pt3dadd(-23.99, 106.1, -6.75, 0.31)
	pt3dadd(-23.12, 105.6, -6.75, 0.31)
	pt3dadd(-22.25, 105.6, -6.75, 0.46)
	pt3dadd(-21.23, 105.6, -6.75, 0.46)
	pt3dadd(-20.51, 105.5, -6.75, 0.46)
	pt3dadd(-19.28, 105.3, -6.75, 0.46)
	pt3dadd(-18.3, 105.1, -6.75, 0.46)
  }
  dend[564] {pt3dclear()
	pt3dadd(-11.2, 111.7, -6.25, 0.51)
	pt3dadd(-12.48, 112.8, -6, 0.46)
	pt3dadd(-13.04, 113.6, -6, 0.46)
	pt3dadd(-14.07, 114.6, -6, 0.46)
  }
  dend[565] {pt3dclear()
	pt3dadd(-14.07, 114.6, -6, 0.46)
	pt3dadd(-15.86, 115.4, -6, 0.46)
	pt3dadd(-17.44, 116, -6, 0.46)
	pt3dadd(-18.41, 116.7, -6, 0.56)
	pt3dadd(-19.95, 117.5, -6, 0.56)
  }
  dend[566] {pt3dclear()
	pt3dadd(-19.95, 117.5, -6, 0.56)
	pt3dadd(-21.02, 117.1, -5.75, 0.41)
	pt3dadd(-22.45, 116.9, -5.75, 0.41)
	pt3dadd(-23.53, 116.7, -5.75, 0.41)
  }
  dend[567] {pt3dclear()
	pt3dadd(-23.53, 116.7, -5.75, 0.41)
	pt3dadd(-24.81, 116, -6, 0.41)
	pt3dadd(-25.57, 115.8, -6, 0.41)
	pt3dadd(-26.24, 115.5, -6, 0.41)
	pt3dadd(-27.16, 115.1, -6, 0.41)
  }
  dend[568] {pt3dclear()
	pt3dadd(-27.16, 115.1, -6, 0.41)
	pt3dadd(-27.74, 114.5, -5.81, 0.41)
  }
  dend[569] {pt3dclear()
	pt3dadd(-27.74, 114.5, -5.81, 0.41)
	pt3dadd(-27.93, 114.3, -5.75, 0.41)
	pt3dadd(-28.69, 113.4, -5.75, 0.41)
	pt3dadd(-29.82, 113.1, -5.75, 0.41)
	pt3dadd(-30.54, 112.9, -5.75, 0.41)
	pt3dadd(-31.61, 112.8, -5.75, 0.41)
	pt3dadd(-32.94, 112.5, -5.5, 0.41)
	pt3dadd(-34.11, 112.8, -5.5, 0.41)
	pt3dadd(-35.29, 113, -5.5, 0.41)
	pt3dadd(-36.27, 113.7, -5.5, 0.41)
	pt3dadd(-37.08, 114.9, -5.75, 0.41)
	pt3dadd(-37.79, 116.1, -5.75, 0.41)
  }
  dend[570] {pt3dclear()
	pt3dadd(-27.74, 114.5, -5.81, 0.41)
	pt3dadd(-27.16, 113.9, -5.75, 0.41)
	pt3dadd(-27.16, 113, -5.75, 0.41)
	pt3dadd(-27.11, 112.1, -5.75, 0.41)
	pt3dadd(-27.06, 111.2, -5.75, 0.41)
	pt3dadd(-27.21, 110.5, -5.75, 0.41)
	pt3dadd(-27.52, 110, -5.75, 0.41)
	pt3dadd(-28.34, 109.3, -5.75, 0.41)
  }
  dend[571] {pt3dclear()
	pt3dadd(-28.34, 109.3, -5.75, 0.41)
	pt3dadd(-29.31, 109.1, -5.75, 0.41)
	pt3dadd(-29.92, 108.9, -5.75, 0.36)
	pt3dadd(-31.1, 108.6, -5.75, 0.36)
	pt3dadd(-32.07, 108.5, -5.75, 0.36)
	pt3dadd(-33.29, 108.7, -5.75, 0.36)
	pt3dadd(-34.17, 108.7, -5.75, 0.36)
	pt3dadd(-35.5, 108.7, -5.75, 0.36)
	pt3dadd(-36.93, 108.7, -5.75, 0.36)
	pt3dadd(-38.36, 108.8, -5.75, 0.36)
	pt3dadd(-39.34, 108.7, -5.75, 0.36)
	pt3dadd(-40.46, 108.1, -5.75, 0.36)
	pt3dadd(-41.64, 107.8, -5.75, 0.36)
	pt3dadd(-42.3, 107.8, -5.75, 0.36)
  }
  dend[572] {pt3dclear()
	pt3dadd(-28.34, 109.3, -5.75, 0.41)
	pt3dadd(-28.18, 108.3, -5.75, 0.36)
	pt3dadd(-28.23, 107.3, -5.75, 0.46)
	pt3dadd(-28.39, 106.3, -5.75, 0.36)
	pt3dadd(-28.69, 105.7, -5.75, 0.36)
	pt3dadd(-28.64, 104.8, -5.75, 0.36)
	pt3dadd(-28.95, 104, -5.75, 0.26)
  }
}
proc shape3d_23() {
  dend[572] {	pt3dadd(-29.21, 103.2, -5.75, 0.51)
	pt3dadd(-29.26, 102.1, -5.75, 0.51)
	pt3dadd(-29.05, 101.2, -6, 0.41)
	pt3dadd(-28.44, 100.4, -6, 0.41)
	pt3dadd(-27.62, 99.67, -6, 0.41)
	pt3dadd(-26.9, 98.7, -6, 0.41)
	pt3dadd(-26.8, 97.83, -6, 0.26)
	pt3dadd(-26.34, 96.7, -6, 0.31)
	pt3dadd(-25.98, 95.63, -6, 0.46)
	pt3dadd(-25.22, 94.91, -6, 0.46)
	pt3dadd(-24.5, 93.99, -6, 0.46)
	pt3dadd(-24.09, 93.53, -6, 0.36)
	pt3dadd(-23.32, 93.63, -6, 0.31)
  }
  dend[573] {pt3dclear()
	pt3dadd(-27.16, 115.1, -6, 0.41)
	pt3dadd(-27.72, 115.7, -6, 0.36)
	pt3dadd(-28.85, 116.6, -5.75, 0.31)
	pt3dadd(-29.72, 117.2, -5.75, 0.31)
	pt3dadd(-31.51, 118, -5.75, 0.31)
  }
  dend[574] {pt3dclear()
	pt3dadd(-31.51, 118, -5.75, 0.31)
	pt3dadd(-32.28, 117.8, -5.75, 0.31)
	pt3dadd(-33.2, 117.7, -5.75, 0.31)
	pt3dadd(-34.17, 118.1, -5.75, 0.31)
	pt3dadd(-34.78, 118.7, -5.75, 0.31)
	pt3dadd(-35.29, 119.1, -5.75, 0.31)
	pt3dadd(-36.72, 119.8, -5.75, 0.31)
	pt3dadd(-37.75, 120.8, -5.5, 0.31)
	pt3dadd(-38.67, 120.8, -5.5, 0.31)
	pt3dadd(-39.74, 120.8, -5.5, 0.31)
	pt3dadd(-40.86, 120.5, -5.5, 0.31)
  }
  dend[575] {pt3dclear()
	pt3dadd(-31.51, 118, -5.75, 0.31)
	pt3dadd(-31.92, 119.3, -5.75, 0.31)
	pt3dadd(-32.84, 120.2, -5.75, 0.31)
	pt3dadd(-33.54, 121.4, -5.75, 0.31)
	pt3dadd(-34.17, 122.5, -5.75, 0.31)
	pt3dadd(-34.78, 123.3, -5.75, 0.31)
	pt3dadd(-35.35, 124.3, -5.75, 0.31)
	pt3dadd(-36.01, 125, -5.75, 0.31)
	pt3dadd(-36.57, 126.6, -5.75, 0.31)
	pt3dadd(-37.54, 127.8, -5.75, 0.31)
	pt3dadd(-38.26, 129.19, -5.75, 0.31)
  }
  dend[576] {pt3dclear()
	pt3dadd(-38.26, 129.19, -5.75, 0.31)
	pt3dadd(-37.54, 129.8, -5.75, 0.15)
	pt3dadd(-36.88, 130.4, -5.75, 0.15)
	pt3dadd(-36.42, 130.9, -5.75, 0.15)
  }
  dend[577] {pt3dclear()
	pt3dadd(-38.26, 129.19, -5.75, 0.31)
	pt3dadd(-38.77, 129.9, -5.75, 0.31)
	pt3dadd(-39.08, 131, -5.75, 0.31)
	pt3dadd(-39.79, 132.19, -5.75, 0.26)
	pt3dadd(-40.13, 133.4, -5.75, 0.26)
	pt3dadd(-40.65, 134.3, -5.75, 0.18)
	pt3dadd(-41.36, 135.19, -5.75, 0.15)
	pt3dadd(-43.05, 136.8, -5.75, 0.0498)
  }
  dend[578] {pt3dclear()
	pt3dadd(-23.53, 116.7, -5.75, 0.41)
	pt3dadd(-23.87, 117.3, -6, 0.18)
	pt3dadd(-25.86, 119, -5.75, 0.098)
	pt3dadd(-27.81, 120.1, -5.75, 0.098)
	pt3dadd(-29.39, 121.1, -5.75, 0.098)
	pt3dadd(-31.39, 122.2, -5.75, 0.098)
	pt3dadd(-32.61, 123.7, -5.75, 0.098)
  }
  dend[579] {pt3dclear()
	pt3dadd(-19.95, 117.5, -6, 0.56)
	pt3dadd(-20.59, 118.3, -6, 0.18)
	pt3dadd(-21.05, 119.2, -6, 0.15)
	pt3dadd(-21.57, 119.9, -6, 0.15)
	pt3dadd(-22.38, 121, -6, 0.15)
	pt3dadd(-23, 121.9, -6, 0.15)
	pt3dadd(-23.25, 123, -6, 0.15)
  }
  dend[580] {pt3dclear()
	pt3dadd(-23.25, 123, -6, 0.15)
	pt3dadd(-24.43, 123.9, -6, 0.15)
	pt3dadd(-25.35, 124.6, -6, 0.15)
	pt3dadd(-26.78, 125.6, -6, 0.15)
	pt3dadd(-28.88, 126.8, -6, 0.15)
	pt3dadd(-31.44, 126.9, -6, 0.15)
	pt3dadd(-33.69, 127.2, -6, 0.15)
	pt3dadd(-34.25, 127.4, -6, 0.15)
  }
  dend[581] {pt3dclear()
	pt3dadd(-23.25, 123, -6, 0.15)
	pt3dadd(-23.2, 125, -6, 0.26)
	pt3dadd(-23.2, 126.8, -6, 0.26)
	pt3dadd(-23, 129.3, -6.25, 0.26)
	pt3dadd(-23, 130.8, -6.25, 0.26)
	pt3dadd(-22.79, 134.19, -6.25, 0.26)
	pt3dadd(-22.84, 136.19, -6.25, 0.26)
	pt3dadd(-23.3, 137.5, -6.5, 0.18)
	pt3dadd(-24.17, 138.6, -6.5, 0.18)
	pt3dadd(-25.25, 139.8, -6.5, 0.18)
	pt3dadd(-26.53, 140.19, -6.5, 0.18)
	pt3dadd(-28.06, 140.69, -6.5, 0.18)
	pt3dadd(-29.9, 141.1, -6.5, 0.18)
  }
  dend[582] {pt3dclear()
	pt3dadd(-14.07, 114.6, -6, 0.46)
	pt3dadd(-13.64, 115.1, -6.25, 0.31)
	pt3dadd(-12.56, 116.3, -6.25, 0.18)
	pt3dadd(-12.1, 117.2, -6.25, 0.18)
	pt3dadd(-11.85, 117.7, -6, 0.18)
  }
  dend[583] {pt3dclear()
	pt3dadd(-11.85, 117.7, -6, 0.18)
	pt3dadd(-10.41, 117.6, -6, 0.15)
	pt3dadd(-9.28, 117.7, -5.75, 0.15)
	pt3dadd(-7.8, 117.7, -5.75, 0.15)
	pt3dadd(-6.58, 116.7, -5.75, 0.15)
	pt3dadd(-5.91, 115.3, -5.75, 0.15)
	pt3dadd(-4.79, 113.6, -5.75, 0.15)
	pt3dadd(-3.41, 112.3, -5.75, 0.15)
  }
  dend[584] {pt3dclear()
	pt3dadd(-11.85, 117.7, -6, 0.18)
	pt3dadd(-13.48, 119.2, -6, 0.26)
	pt3dadd(-15.27, 120.5, -6.25, 0.26)
	pt3dadd(-16.86, 121.9, -6.25, 0.26)
	pt3dadd(-18.64, 123.1, -6.25, 0.26)
	pt3dadd(-19.37, 123.5, -6.5, 0.18)
  }
  dend[585] {pt3dclear()
	pt3dadd(-1.59, 100.6, -6.5, 1.87)
	pt3dadd(-0.56, 100.5, -6.75, 0.26)
	pt3dadd(-0.06, 100.5, -6.75, 0.26)
	pt3dadd(0.81, 100.6, -6.75, 0.26)
	pt3dadd(1.48, 100.8, -6.75, 0.26)
	pt3dadd(2.25, 100.9, -6.75, 0.26)
	pt3dadd(2.81, 101, -6.75, 0.26)
	pt3dadd(3.53, 101.4, -6.75, 0.26)
	pt3dadd(4.19, 101.5, -7, 0.31)
  }
  dend[586] {pt3dclear()
	pt3dadd(4.19, 101.5, -7, 0.31)
	pt3dadd(4.4, 100.7, -7, 0.31)
	pt3dadd(5.21, 100.1, -6.75, 0.31)
	pt3dadd(5.73, 99.72, -6.75, 0.31)
	pt3dadd(5.88, 99.15, -6.75, 0.31)
  }
  dend[587] {pt3dclear()
	pt3dadd(5.88, 99.15, -6.75, 0.31)
	pt3dadd(5.98, 98.54, -6.75, 0.31)
	pt3dadd(5.67, 97.98, -6.75, 0.31)
	pt3dadd(5.01, 97.57, -6.75, 0.31)
	pt3dadd(4.13, 97.52, -6.75, 0.31)
	pt3dadd(3.12, 97.62, -6.5, 0.31)
	pt3dadd(2.5, 97.82, -6.5, 0.31)
  }
  dend[588] {pt3dclear()
	pt3dadd(2.5, 97.82, -6.5, 0.31)
	pt3dadd(2.6, 97.11, -6.5, 0.18)
	pt3dadd(2.66, 96.54, -6.5, 0.18)
	pt3dadd(2.54, 95.67, -6.5, 0.18)
  }
  dend[589] {pt3dclear()
	pt3dadd(2.5, 97.82, -6.5, 0.31)
	pt3dadd(1.89, 98.13, -6.75, 0.18)
	pt3dadd(1.27, 98.44, -6.75, 0.18)
	pt3dadd(0.66, 98.44, -6.75, 0.18)
	pt3dadd(0.51, 97.82, -6.75, 0.15)
	pt3dadd(0.15, 97.11, -6.75, 0.15)
	pt3dadd(0, 96.7, -6.75, 0.15)
	pt3dadd(0, 96.24, -6.75, 0.15)
  }
  dend[590] {pt3dclear()
	pt3dadd(5.88, 99.15, -6.75, 0.31)
	pt3dadd(6.34, 99.41, -7, 0.15)
	pt3dadd(7.06, 99.66, -6.75, 0.15)
	pt3dadd(8.18, 99.77, -6.75, 0.15)
  }
  dend[591] {pt3dclear()
	pt3dadd(8.18, 99.77, -6.75, 0.15)
	pt3dadd(8.18, 100.5, -6.75, 0.15)
	pt3dadd(7.98, 101.3, -6.75, 0.15)
	pt3dadd(7.98, 102.1, -6.75, 0.15)
	pt3dadd(8.33, 102.8, -7, 0.0498)
	pt3dadd(8.78, 103, -7, 0.0498)
	pt3dadd(9.41, 103.3, -7, 0.0498)
	pt3dadd(9.97, 103.3, -7, 0.0498)
  }
  dend[592] {pt3dclear()
	pt3dadd(8.18, 99.77, -6.75, 0.15)
	pt3dadd(8.53, 99.15, -7, 0.26)
	pt3dadd(9, 98.39, -7, 0.26)
	pt3dadd(9.41, 97.46, -7, 0.26)
	pt3dadd(9.72, 97, -7, 0.26)
	pt3dadd(10.11, 96.34, -7, 0.26)
	pt3dadd(10.28, 95.37, -7, 0.26)
  }
  dend[593] {pt3dclear()
	pt3dadd(4.19, 101.5, -7, 0.31)
	pt3dadd(4.04, 102.4, -7, 0.31)
	pt3dadd(4.04, 102.8, -7, 0.31)
	pt3dadd(3.88, 103.8, -7, 0.31)
	pt3dadd(3.32, 104.4, -7, 0.31)
	pt3dadd(2.66, 104.7, -7, 0.36)
	pt3dadd(2.09, 105.1, -7, 0.36)
	pt3dadd(1.02, 105.2, -7, 0.36)
	pt3dadd(0.51, 105.7, -7, 0.36)
	pt3dadd(-0.26, 106.3, -7, 0.36)
  }
  dend[594] {pt3dclear()
	pt3dadd(-2.45, 95.53, -6.75, 2)
	pt3dadd(-3.17, 95.99, -6.75, 0.31)
	pt3dadd(-3.63, 96.7, -6.5, 0.18)
	pt3dadd(-4.24, 97.57, -6.5, 0.18)
	pt3dadd(-4.96, 98.34, -6.5, 0.18)
	pt3dadd(-5.47, 99.52, -6.5, 0.26)
	pt3dadd(-5.68, 100.6, -6.5, 0.41)
	pt3dadd(-5.88, 101.5, -6.5, 0.41)
	pt3dadd(-6.29, 102.3, -6.5, 0.41)
	pt3dadd(-6.39, 103.1, -6.5, 0.41)
	pt3dadd(-6.6, 103.5, -6.5, 0.41)
	pt3dadd(-6.95, 104.2, -6.5, 0.41)
	pt3dadd(-7.47, 104.8, -6.5, 0.41)
	pt3dadd(-8.02, 105.7, -6.5, 0.41)
	pt3dadd(-8.69, 106.2, -6.5, 0.41)
  }
  dend[595] {pt3dclear()
	pt3dadd(-8.69, 106.2, -6.5, 0.41)
	pt3dadd(-9.46, 107, -6.25, 0.36)
	pt3dadd(-9.77, 107.8, -6.25, 0.36)
	pt3dadd(-10.38, 108.3, -6.25, 0.36)
	pt3dadd(-11.3, 108.4, -6.25, 0.36)
	pt3dadd(-11.66, 108.4, -6.25, 0.36)
  }
  dend[596] {pt3dclear()
	pt3dadd(-8.69, 106.2, -6.5, 0.41)
	pt3dadd(-9.21, 105.8, -6.5, 0.36)
	pt3dadd(-9.77, 106, -6.5, 0.36)
	pt3dadd(-10.94, 105.7, -6.25, 0.36)
	pt3dadd(-11.61, 105.6, -6.25, 0.36)
	pt3dadd(-12.22, 105.4, -6.25, 0.36)
  }
  dend[597] {pt3dclear()
	pt3dadd(-2.82, 93.88, -6.75, 2)
	pt3dadd(-4.15, 94.2, -6.5, 1.31)
	pt3dadd(-5.39, 94.45, -6.5, 0.75)
	pt3dadd(-6.76, 94.7, -6.5, 0.75)
	pt3dadd(-7.45, 94.89, -6.25, 0.75)
  }
}
proc shape3d_24() {
  dend[597] {  }
  dend[598] {pt3dclear()
	pt3dadd(-7.45, 94.89, -6.25, 0.75)
	pt3dadd(-7.7, 95.45, -6.25, 0.44)
	pt3dadd(-8.63, 96.45, -6.5, 0.44)
	pt3dadd(-9.19, 97.57, -6.5, 0.44)
	pt3dadd(-10.19, 98.32, -6.5, 0.44)
	pt3dadd(-10.57, 98.75, -6.5, 0.44)
	pt3dadd(-11.32, 100.2, -6.5, 0.44)
  }
  dend[599] {pt3dclear()
	pt3dadd(-11.32, 100.2, -6.5, 0.44)
	pt3dadd(-10.94, 100.8, -6.5, 0.37)
	pt3dadd(-10.38, 101.5, -6.5, 0.37)
	pt3dadd(-9.94, 102.1, -6.25, 0.37)
  }
  dend[600] {pt3dclear()
	pt3dadd(-11.32, 100.2, -6.5, 0.44)
	pt3dadd(-12.44, 100.4, -6.5, 0.37)
	pt3dadd(-14.06, 101.1, -6.75, 0.37)
	pt3dadd(-15.18, 101.5, -6.75, 0.37)
	pt3dadd(-15.55, 101.6, -6.75, 0.37)
	pt3dadd(-16.61, 101.4, -6.75, 0.37)
	pt3dadd(-17.05, 101.1, -6.75, 0.37)
	pt3dadd(-18.23, 100.6, -6.75, 0.37)
  }
  dend[601] {pt3dclear()
	pt3dadd(-7.45, 94.89, -6.25, 0.75)
	pt3dadd(-8.32, 94.51, -6.25, 0.37)
	pt3dadd(-9.57, 94.39, -6.25, 0.37)
	pt3dadd(-10.69, 94.14, -6.5, 0.5)
	pt3dadd(-12.06, 94.2, -6.5, 0.5)
	pt3dadd(-13.06, 94.2, -6.5, 0.5)
	pt3dadd(-14.25, 94.26, -6.5, 0.5)
  }
  dend[602] {pt3dclear()
	pt3dadd(-14.25, 94.26, -6.5, 0.5)
	pt3dadd(-14.93, 93.7, -6.5, 0.37)
	pt3dadd(-15.31, 93.2, -6.5, 0.37)
	pt3dadd(-15.37, 92.33, -6.5, 0.37)
	pt3dadd(-15.31, 91.58, -6.5, 0.37)
  }
  dend[603] {pt3dclear()
	pt3dadd(-15.31, 91.58, -6.5, 0.37)
	pt3dadd(-14.43, 91.4, -6.5, 0.37)
	pt3dadd(-13.87, 91.08, -6.5, 0.37)
	pt3dadd(-13.25, 90.71, -6.5, 0.37)
	pt3dadd(-12.44, 90.4, -6.5, 0.37)
	pt3dadd(-11.94, 90.27, -6.5, 0.37)
	pt3dadd(-11.69, 89.9, -6.5, 0.37)
	pt3dadd(-11.25, 89.34, -6.5, 0.37)
	pt3dadd(-10.94, 88.65, -6.5, 0.25)
	pt3dadd(-10.51, 87.91, -6.5, 0.25)
  }
  dend[604] {pt3dclear()
	pt3dadd(-15.31, 91.58, -6.5, 0.37)
	pt3dadd(-15.74, 90.65, -6.5, 0.25)
	pt3dadd(-16.12, 89.96, -6.5, 0.37)
	pt3dadd(-16.43, 89.34, -6.5, 0.37)
  }
  dend[605] {pt3dclear()
	pt3dadd(-16.43, 89.34, -6.5, 0.37)
	pt3dadd(-16.12, 88.4, -6.25, 0.44)
	pt3dadd(-15.68, 87.78, -6.25, 0.44)
	pt3dadd(-15.31, 87.47, -6.25, 0.44)
  }
  dend[606] {pt3dclear()
	pt3dadd(-15.31, 87.47, -6.25, 0.44)
	pt3dadd(-14.74, 86.85, -6.25, 0.31)
	pt3dadd(-13.75, 86.72, -6.25, 0.31)
	pt3dadd(-13.25, 86.41, -6.25, 0.31)
	pt3dadd(-12.62, 85.97, -6.25, 0.31)
	pt3dadd(-11.94, 85.35, -6.25, 0.31)
	pt3dadd(-11, 84.91, -6, 0.31)
	pt3dadd(-10.51, 84.48, -6, 0.31)
	pt3dadd(-9.88, 83.98, -6, 0.31)
	pt3dadd(-8.76, 83.29, -6, 0.31)
	pt3dadd(-8.14, 82.67, -6.25, 0.31)
	pt3dadd(-7.39, 81.86, -6.5, 0.31)
  }
  dend[607] {pt3dclear()
	pt3dadd(-15.31, 87.47, -6.25, 0.44)
	pt3dadd(-15.43, 86.47, -6.5, 0.5)
	pt3dadd(-15.68, 85.85, -6.5, 0.5)
	pt3dadd(-16.05, 85.29, -6.5, 0.5)
	pt3dadd(-16.23, 84.66, -6.5, 0.5)
	pt3dadd(-16.55, 83.98, -6.5, 0.5)
	pt3dadd(-17.3, 83.42, -6.5, 0.37)
	pt3dadd(-17.55, 82.98, -6.5, 0.37)
	pt3dadd(-17.92, 82.17, -6.75, 0.37)
	pt3dadd(-17.43, 81.48, -6.75, 0.37)
  }
  dend[608] {pt3dclear()
	pt3dadd(-16.43, 89.34, -6.5, 0.37)
	pt3dadd(-17.05, 88.84, -6.25, 0.31)
	pt3dadd(-17.92, 88.84, -6.25, 0.31)
	pt3dadd(-19.3, 89.09, -6.25, 0.31)
	pt3dadd(-20.6, 89.59, -6, 0.5)
	pt3dadd(-21.85, 90.21, -6, 0.5)
	pt3dadd(-22.97, 91.08, -6, 0.5)
	pt3dadd(-24.28, 91.27, -6, 0.31)
	pt3dadd(-25.22, 91.58, -6, 0.31)
	pt3dadd(-26.53, 91.71, -6, 0.31)
	pt3dadd(-28.02, 92.33, -6, 0.31)
	pt3dadd(-28.96, 92.96, -6, 0.31)
	pt3dadd(-29.58, 94.02, -6, 0.31)
  }
  dend[609] {pt3dclear()
	pt3dadd(-14.25, 94.26, -6.5, 0.5)
	pt3dadd(-15.12, 94.83, -6.5, 0.56)
	pt3dadd(-16.12, 95.64, -6.5, 0.56)
	pt3dadd(-17.05, 96.32, -6.5, 0.56)
  }
  dend[610] {pt3dclear()
	pt3dadd(-17.05, 96.32, -6.5, 0.56)
	pt3dadd(-16.43, 97.13, -6.5, 0.31)
	pt3dadd(-16.05, 97.88, -6.5, 0.31)
	pt3dadd(-15.74, 98.07, -6.5, 0.31)
  }
  dend[611] {pt3dclear()
	pt3dadd(-17.05, 96.32, -6.5, 0.56)
	pt3dadd(-18.23, 96.88, -6.5, 0.5)
	pt3dadd(-19.05, 97.82, -6.5, 0.5)
	pt3dadd(-19.79, 98.19, -6.5, 0.5)
	pt3dadd(-20.67, 98.75, -6.5, 0.5)
	pt3dadd(-22.04, 99.94, -6.5, 0.5)
  }
  dend[612] {pt3dclear()
	pt3dadd(-22.04, 99.94, -6.5, 0.5)
	pt3dadd(-23.03, 99.77, -6.5, 0.5)
  }
  dend[613] {pt3dclear()
	pt3dadd(-23.03, 99.77, -6.5, 0.5)
	pt3dadd(-24.01, 99.61, -6.5, 0.5)
  }
  dend[614] {pt3dclear()
	pt3dadd(-24.01, 99.61, -6.5, 0.5)
	pt3dadd(-23.16, 99.75, -6.5, 0.5)
  }
  dend[615] {pt3dclear()
	pt3dadd(-24.01, 99.61, -6.5, 0.5)
	pt3dadd(-21.42, 100.8, -6.5, 0.31)
	pt3dadd(-20.79, 101.9, -6.5, 0.31)
	pt3dadd(-20.23, 102.4, -6.5, 0.31)
	pt3dadd(-19.54, 103.1, -6.5, 0.31)
	pt3dadd(-19.17, 103.2, -6.5, 0.31)
  }
  dend[616] {pt3dclear()
	pt3dadd(-23.03, 99.77, -6.5, 0.5)
	pt3dadd(-24.28, 99.56, -6.5, 0.5)
	pt3dadd(-25.22, 98.57, -6.5, 0.5)
	pt3dadd(-25.84, 98.01, -6.5, 0.5)
	pt3dadd(-26.09, 97.57, -6.5, 0.5)
  }
  dend[617] {pt3dclear()
	pt3dadd(-22.04, 99.94, -6.5, 0.5)
	pt3dadd(-23.04, 100.3, -6.5, 0.31)
	pt3dadd(-23.41, 101.3, -6.5, 0.31)
	pt3dadd(-23.91, 101.9, -6.5, 0.5)
	pt3dadd(-25.03, 102.2, -6.5, 0.5)
	pt3dadd(-25.84, 102.9, -6.5, 0.5)
	pt3dadd(-26.65, 102.9, -6.5, 0.5)
  }
  dend[618] {pt3dclear()
	pt3dadd(-1.79, 85.19, -7, 1.62)
	pt3dadd(-2.84, 85.35, -7, 0.87)
	pt3dadd(-3.46, 85.54, -6.75, 0.44)
	pt3dadd(-4.21, 85.47, -6.75, 0.44)
	pt3dadd(-5.33, 85.6, -6.75, 0.44)
	pt3dadd(-6.39, 85.66, -6.75, 0.62)
	pt3dadd(-7.7, 85.91, -6.75, 0.56)
	pt3dadd(-8.44, 86.41, -6.75, 0.56)
	pt3dadd(-9.76, 86.66, -7, 0.56)
	pt3dadd(-10.88, 86.85, -7, 0.56)
	pt3dadd(-11.44, 86.72, -7, 0.56)
	pt3dadd(-12.38, 86.04, -7, 0.56)
	pt3dadd(-12.75, 85.66, -7, 0.56)
	pt3dadd(-12.94, 84.91, -7, 0.56)
	pt3dadd(-13.06, 84.29, -7, 0.56)
	pt3dadd(-13.06, 83.79, -7, 0.56)
	pt3dadd(-12.81, 83.04, -7, 0.56)
	pt3dadd(-12.69, 82.86, -7, 0.56)
	pt3dadd(-12.25, 81.8, -7, 0.56)
  }
  dend[619] {pt3dclear()
	pt3dadd(5.69, 75.27, -7.25, 2)
	pt3dadd(6.67, 76.08, -7, 1.07)
	pt3dadd(7.24, 76.95, -7, 0.82)
	pt3dadd(7.8, 77.36, -7, 0.82)
	pt3dadd(8.61, 78.28, -6.75, 0.82)
	pt3dadd(8.86, 78.84, -6.75, 0.82)
  }
  dend[620] {pt3dclear()
	pt3dadd(8.86, 78.84, -6.75, 0.82)
	pt3dadd(9.9, 79.25, -6.75, 0.82)
	pt3dadd(10.66, 79.92, -6.75, 0.82)
	pt3dadd(11.23, 80.79, -6.75, 0.82)
	pt3dadd(11.76, 81.09, -6.75, 0.82)
  }
  dend[621] {pt3dclear()
	pt3dadd(11.76, 81.09, -6.75, 0.82)
	pt3dadd(11.89, 81.59, -6.75, 0.82)
	pt3dadd(12.1, 82.37, -6.75, 0.82)
	pt3dadd(12.35, 83.04, -6.75, 0.82)
	pt3dadd(12.66, 83.91, -6.75, 0.82)
	pt3dadd(13.12, 84.57, -6.75, 0.82)
	pt3dadd(13.68, 85.34, -6.75, 0.82)
	pt3dadd(13.99, 85.9, -6.75, 0.82)
	pt3dadd(14.17, 86.77, -6.75, 0.82)
  }
  dend[622] {pt3dclear()
	pt3dadd(14.17, 86.77, -6.75, 0.82)
	pt3dadd(14.14, 87.28, -6.75, 0.82)
	pt3dadd(14.14, 88.31, -6.75, 0.82)
  }
  dend[623] {pt3dclear()
	pt3dadd(14.14, 88.31, -6.75, 0.82)
	pt3dadd(15.22, 89.48, -6.75, 0.67)
	pt3dadd(15.57, 90.2, -6.75, 0.67)
	pt3dadd(15.83, 90.91, -6.75, 0.67)
	pt3dadd(16.39, 91.53, -6.75, 0.67)
	pt3dadd(16.96, 92.4, -6.75, 0.67)
  }
  dend[624] {pt3dclear()
	pt3dadd(16.96, 92.4, -6.75, 0.67)
	pt3dadd(18.13, 92.35, -6.75, 0.67)
	pt3dadd(18.85, 92.24, -6.75, 0.67)
	pt3dadd(19.82, 91.89, -6.75, 0.67)
	pt3dadd(20.43, 91.68, -6.75, 0.67)
	pt3dadd(21.05, 91.48, -6.75, 0.67)
	pt3dadd(21.71, 91.37, -6.75, 0.67)
	pt3dadd(22.22, 91.12, -6.75, 0.67)
	pt3dadd(23.04, 90.91, -6.75, 0.67)
	pt3dadd(23.45, 90.71, -6.75, 0.67)
	pt3dadd(23.71, 90.15, -6.75, 0.67)
	pt3dadd(24.12, 89.69, -6.75, 0.67)
	pt3dadd(24.73, 89.28, -6.75, 0.67)
	pt3dadd(25.45, 89.02, -6.75, 0.67)
	pt3dadd(26.01, 88.71, -6.75, 0.67)
	pt3dadd(26.47, 88.2, -6.75, 0.67)
	pt3dadd(26.78, 88.05, -6.75, 0.67)
	pt3dadd(28, 87.59, -6.75, 0.67)
	pt3dadd(28.82, 87.33, -6.75, 0.67)
	pt3dadd(29.44, 87.23, -6.75, 0.67)
	pt3dadd(30.61, 87.23, -6.75, 0.67)
	pt3dadd(31.07, 87.23, -6.75, 0.67)
	pt3dadd(31.84, 87.08, -7, 0.67)
	pt3dadd(32.51, 86.41, -7, 0.67)
	pt3dadd(33.32, 86.05, -7, 0.46)
	pt3dadd(34.09, 85.59, -7.25, 0.46)
	pt3dadd(34.9, 85.44, -7.25, 0.46)
  }
  dend[625] {pt3dclear()
	pt3dadd(16.96, 92.4, -6.75, 0.67)
	pt3dadd(17.21, 93.47, -6.5, 0.61)
	pt3dadd(17.3, 94.24, -6.5, 0.61)
  }
}
proc shape3d_25() {
  dend[625] {	pt3dadd(17.36, 94.7, -6.5, 0.61)
	pt3dadd(17.67, 95.42, -6.5, 0.61)
	pt3dadd(17.98, 95.93, -6.5, 0.61)
	pt3dadd(18.29, 96.39, -6.5, 0.61)
	pt3dadd(18.54, 96.85, -6.5, 0.61)
	pt3dadd(19.1, 97.51, -6.5, 0.61)
	pt3dadd(19.21, 97.67, -6.5, 0.61)
  }
  dend[626] {pt3dclear()
	pt3dadd(19.21, 97.67, -6.5, 0.61)
	pt3dadd(18.89, 98.23, -6.5, 0.61)
	pt3dadd(18.44, 98.64, -6.25, 0.56)
	pt3dadd(18.29, 99.1, -6.25, 0.51)
	pt3dadd(18.13, 99.81, -6.25, 0.41)
	pt3dadd(18.29, 100.6, -6.25, 0.36)
	pt3dadd(18.39, 100.9, -6.25, 0.36)
	pt3dadd(18.64, 101.4, -6.25, 0.36)
	pt3dadd(18.95, 101.9, -6.25, 0.36)
	pt3dadd(19.14, 102.2, -6.25, 0.36)
	pt3dadd(19.67, 102.6, -6.25, 0.36)
	pt3dadd(19.92, 103, -6.25, 0.36)
	pt3dadd(20.32, 103.3, -6.25, 0.36)
	pt3dadd(20.89, 103.8, -6.5, 0.36)
	pt3dadd(21.2, 104.2, -6.5, 0.36)
	pt3dadd(21.56, 104.7, -6.5, 0.36)
	pt3dadd(21.66, 105, -6.5, 0.36)
	pt3dadd(21.87, 105.8, -6.5, 0.36)
	pt3dadd(21.87, 106.1, -6.5, 0.36)
	pt3dadd(21.92, 106.5, -6.5, 0.36)
	pt3dadd(21.66, 107.2, -6.5, 0.36)
	pt3dadd(21.3, 107.6, -6.5, 0.36)
	pt3dadd(20.89, 107.7, -6.5, 0.36)
	pt3dadd(20.64, 107.6, -6.5, 0.36)
	pt3dadd(20.18, 107.2, -6.5, 0.36)
	pt3dadd(19.82, 106.9, -6.5, 0.36)
  }
  dend[627] {pt3dclear()
	pt3dadd(19.21, 97.67, -6.5, 0.61)
	pt3dadd(19.97, 97.67, -6.25, 0.67)
	pt3dadd(20.74, 98.13, -6.25, 0.67)
	pt3dadd(21.46, 98.38, -6.25, 0.67)
	pt3dadd(22.22, 98.74, -6.25, 0.67)
	pt3dadd(23.04, 99.1, -6.25, 0.67)
	pt3dadd(23.76, 99.25, -6.25, 0.67)
	pt3dadd(24.63, 99.66, -6.5, 0.67)
  }
  dend[628] {pt3dclear()
	pt3dadd(24.63, 99.66, -6.5, 0.67)
	pt3dadd(25.5, 100.5, -6.5, 0.51)
	pt3dadd(26.06, 101.1, -6.5, 0.51)
	pt3dadd(26.37, 102, -6.5, 0.51)
	pt3dadd(26.57, 102.5, -6.5, 0.51)
	pt3dadd(26.83, 103, -6.5, 0.51)
	pt3dadd(27.54, 103.9, -6.5, 0.51)
	pt3dadd(28.11, 104.2, -6.5, 0.51)
	pt3dadd(28.77, 104.4, -6.5, 0.51)
	pt3dadd(29.33, 104.7, -6.5, 0.51)
	pt3dadd(29.9, 104.8, -6.5, 0.51)
	pt3dadd(30.31, 105, -6.5, 0.51)
	pt3dadd(31.28, 105.3, -6.5, 0.51)
  }
  dend[629] {pt3dclear()
	pt3dadd(31.28, 105.3, -6.5, 0.51)
	pt3dadd(31.64, 106, -6.75, 0.51)
	pt3dadd(31.99, 106.7, -6.75, 0.31)
	pt3dadd(32.25, 107.4, -6.75, 0.31)
	pt3dadd(32.46, 107.7, -6.75, 0.31)
	pt3dadd(32.65, 108.2, -6.75, 0.31)
	pt3dadd(32.71, 108.6, -6.75, 0.31)
	pt3dadd(32.65, 108.9, -6.75, 0.31)
  }
  dend[630] {pt3dclear()
	pt3dadd(31.28, 105.3, -6.5, 0.51)
	pt3dadd(31.99, 105.2, -6.5, 0.41)
	pt3dadd(32.81, 105.2, -6.75, 0.31)
	pt3dadd(33.68, 104.8, -6.75, 0.31)
	pt3dadd(34.09, 104.5, -6.75, 0.31)
	pt3dadd(34.6, 104.4, -6.75, 0.31)
	pt3dadd(34.86, 104.3, -6.75, 0.31)
	pt3dadd(35.47, 104.1, -6.75, 0.31)
	pt3dadd(35.72, 103.8, -6.75, 0.31)
	pt3dadd(36.79, 103.5, -6.75, 0.31)
	pt3dadd(37.31, 103.5, -6.75, 0.31)
	pt3dadd(37.47, 103.6, -6.75, 0.31)
	pt3dadd(38.34, 103.9, -7, 0.31)
	pt3dadd(38.79, 104.3, -7, 0.31)
	pt3dadd(39.26, 104.8, -7, 0.31)
	pt3dadd(39.57, 105.2, -7, 0.31)
	pt3dadd(39.92, 105.5, -7, 0.31)
	pt3dadd(40.33, 105.7, -7, 0.31)
	pt3dadd(40.95, 105.9, -7, 0.31)
	pt3dadd(41.15, 105.9, -7, 0.31)
	pt3dadd(41.87, 106, -7.25, 0.31)
	pt3dadd(42.43, 106.1, -7.25, 0.31)
	pt3dadd(43.1, 106.5, -7.25, 0.31)
	pt3dadd(43.4, 106.5, -7.25, 0.31)
	pt3dadd(43.71, 106.4, -7.25, 0.31)
	pt3dadd(44.02, 106.3, -7.25, 0.31)
	pt3dadd(44.83, 106.4, -7.25, 0.31)
	pt3dadd(45.72, 106.3, -7.25, 0.31)
  }
  dend[631] {pt3dclear()
	pt3dadd(24.63, 99.66, -6.5, 0.67)
	pt3dadd(25.5, 99.61, -6.5, 0.41)
	pt3dadd(25.91, 99.46, -6.5, 0.41)
	pt3dadd(26.27, 99.41, -6.5, 0.41)
	pt3dadd(26.52, 99.3, -6.5, 0.41)
	pt3dadd(26.73, 99.2, -6.5, 0.41)
	pt3dadd(27.54, 99.05, -6.5, 0.41)
	pt3dadd(28, 99.05, -6.5, 0.41)
	pt3dadd(28.41, 99.15, -6.5, 0.41)
	pt3dadd(28.77, 99.15, -6.5, 0.41)
	pt3dadd(29.33, 99.2, -6.5, 0.41)
	pt3dadd(29.74, 99.2, -6.5, 0.41)
	pt3dadd(30.46, 99.05, -6.5, 0.41)
	pt3dadd(30.87, 99, -6.5, 0.41)
	pt3dadd(31.79, 99.1, -6.5, 0.41)
	pt3dadd(32.2, 99.05, -6.5, 0.41)
	pt3dadd(32.81, 99, -6.5, 0.41)
	pt3dadd(33.43, 98.89, -6.5, 0.41)
	pt3dadd(34.04, 98.69, -6.75, 0.41)
	pt3dadd(34.71, 98.59, -6.75, 0.41)
	pt3dadd(35.22, 98.54, -6.75, 0.41)
	pt3dadd(35.88, 98.48, -6.75, 0.41)
	pt3dadd(36.5, 98.48, -6.75, 0.41)
	pt3dadd(36.7, 98.48, -6.75, 0.41)
	pt3dadd(37.61, 98.64, -6.75, 0.41)
	pt3dadd(37.83, 98.64, -6.75, 0.41)
	pt3dadd(38.85, 98.69, -7, 0.31)
	pt3dadd(39.51, 98.79, -7, 0.31)
	pt3dadd(40.18, 99, -7, 0.31)
	pt3dadd(40.49, 99.05, -7, 0.31)
	pt3dadd(41.1, 99.2, -7, 0.31)
  }
  dend[632] {pt3dclear()
	pt3dadd(41.1, 99.2, -7, 0.31)
	pt3dadd(41.61, 99.81, -7, 0.31)
	pt3dadd(42.02, 100.5, -7, 0.31)
	pt3dadd(42.43, 101.3, -7, 0.31)
  }
  dend[633] {pt3dclear()
	pt3dadd(41.1, 99.2, -7, 0.31)
	pt3dadd(41.25, 98.48, -7, 0.31)
	pt3dadd(41.56, 97.92, -7, 0.31)
	pt3dadd(41.77, 97.21, -7, 0.31)
	pt3dadd(41.97, 96.23, -7, 0.31)
  }
  dend[634] {pt3dclear()
	pt3dadd(14.14, 88.31, -6.75, 0.82)
	pt3dadd(13.73, 89.28, -6.75, 0.31)
	pt3dadd(13.37, 90.2, -6.75, 0.31)
	pt3dadd(13.27, 90.5, -6.75, 0.31)
	pt3dadd(13.17, 91.17, -6.75, 0.56)
	pt3dadd(13.07, 91.89, -6.75, 0.56)
	pt3dadd(13.02, 92.24, -6.75, 0.56)
	pt3dadd(13.17, 93.06, -6.75, 0.56)
	pt3dadd(13.12, 93.78, -6.75, 0.56)
	pt3dadd(13.12, 94.55, -6.75, 0.56)
	pt3dadd(13.17, 95.11, -6.75, 0.56)
	pt3dadd(13.22, 95.57, -6.75, 0.56)
	pt3dadd(13.68, 97, -6.75, 0.56)
	pt3dadd(13.53, 97.72, -6.75, 0.56)
	pt3dadd(13.22, 98.43, -6.75, 0.56)
	pt3dadd(13.53, 99.76, -6.5, 0.56)
	pt3dadd(13.73, 100.3, -6.5, 0.56)
	pt3dadd(14.04, 101.1, -6.5, 0.56)
	pt3dadd(14.19, 101.7, -6.5, 0.56)
	pt3dadd(14.24, 102.5, -6.5, 0.56)
	pt3dadd(14.3, 103.3, -6.5, 0.56)
	pt3dadd(14.4, 104.2, -6.5, 0.56)
	pt3dadd(14.45, 105.1, -6.5, 0.56)
	pt3dadd(14.5, 105.7, -6.5, 0.56)
	pt3dadd(14.6, 106.2, -6.5, 0.56)
  }
  dend[635] {pt3dclear()
	pt3dadd(14.17, 86.77, -6.75, 0.82)
	pt3dadd(15.04, 86.82, -6.75, 0.31)
	pt3dadd(15.91, 87.39, -7, 0.31)
	pt3dadd(16.57, 87.69, -7, 0.31)
	pt3dadd(18.21, 88.1, -7, 0.31)
  }
  dend[636] {pt3dclear()
	pt3dadd(18.21, 88.1, -7, 0.31)
	pt3dadd(18.41, 87.29, -7, 0.51)
	pt3dadd(18.77, 86.62, -7, 0.51)
	pt3dadd(18.92, 86.16, -7, 0.51)
	pt3dadd(19.54, 86.16, -7, 0.41)
	pt3dadd(20.61, 86.26, -7, 0.41)
	pt3dadd(21.48, 86.06, -7, 0.31)
	pt3dadd(22.86, 85.8, -7, 0.26)
	pt3dadd(23.42, 85.49, -7, 0.26)
	pt3dadd(24.29, 85.44, -7, 0.26)
	pt3dadd(24.65, 85.6, -7, 0.26)
  }
  dend[637] {pt3dclear()
	pt3dadd(18.21, 88.1, -7, 0.31)
	pt3dadd(18.67, 88.62, -7, 0.26)
	pt3dadd(19.59, 89.23, -7, 0.26)
	pt3dadd(20.41, 89.33, -7, 0.26)
	pt3dadd(21.33, 89.28, -6.75, 0.26)
	pt3dadd(22.45, 89.43, -6.75, 0.26)
	pt3dadd(23.48, 89.54, -6.5, 0.26)
	pt3dadd(24.5, 89.23, -6.5, 0.26)
	pt3dadd(25.52, 89.95, -6.25, 0.26)
	pt3dadd(26.29, 90.87, -6.25, 0.26)
	pt3dadd(26.7, 91.68, -6.25, 0.26)
	pt3dadd(26.75, 92.66, -6, 0.26)
	pt3dadd(26.7, 93.83, -6, 0.26)
	pt3dadd(26.55, 94.75, -5.75, 0.26)
  }
  dend[638] {pt3dclear()
	pt3dadd(11.76, 81.09, -6.75, 0.82)
	pt3dadd(12.38, 80.69, -6.75, 0.31)
	pt3dadd(13.45, 80.69, -7, 0.31)
	pt3dadd(14.32, 81.56, -7, 0.31)
	pt3dadd(15.14, 82.37, -7, 0.31)
	pt3dadd(16.11, 83.14, -7, 0.31)
	pt3dadd(16.72, 83.96, -7, 0.31)
	pt3dadd(17.03, 84.73, -7, 0.31)
  }
  dend[639] {pt3dclear()
	pt3dadd(8.86, 78.84, -6.75, 0.82)
	pt3dadd(8.46, 79.25, -6.75, 0.56)
	pt3dadd(8.21, 79.7, -6.75, 0.56)
	pt3dadd(8.05, 80.06, -6.75, 0.56)
	pt3dadd(8, 80.73, -6.75, 0.56)
	pt3dadd(7.95, 81.25, -6.75, 0.56)
	pt3dadd(7.85, 81.7, -6.75, 0.56)
  }
}
proc shape3d_26() {
  dend[639] {	pt3dadd(7.75, 82.06, -6.75, 0.56)
	pt3dadd(7.54, 82.58, -6.75, 0.56)
	pt3dadd(7.49, 83.39, -6.75, 0.56)
	pt3dadd(7.44, 83.6, -6.75, 0.56)
  }
  dend[640] {pt3dclear()
	pt3dadd(7.44, 83.6, -6.75, 0.56)
	pt3dadd(8.36, 84.21, -6.75, 0.56)
	pt3dadd(8.57, 84.83, -6.75, 0.56)
	pt3dadd(8.72, 85.24, -6.75, 0.46)
	pt3dadd(8.77, 85.9, -6.75, 0.46)
	pt3dadd(8.92, 86.31, -6.75, 0.46)
	pt3dadd(9.33, 87.18, -6.75, 0.46)
	pt3dadd(9.44, 87.49, -6.75, 0.46)
	pt3dadd(9.9, 88.05, -6.75, 0.46)
	pt3dadd(10, 88.36, -6.75, 0.46)
	pt3dadd(10.1, 89.02, -6.75, 0.46)
	pt3dadd(10.15, 89.84, -6.5, 0.46)
	pt3dadd(9.94, 90.66, -6.5, 0.46)
  }
  dend[641] {pt3dclear()
	pt3dadd(9.94, 90.66, -6.5, 0.46)
	pt3dadd(9.27, 90.97, -6.5, 0.46)
	pt3dadd(8.77, 91.37, -6.5, 0.46)
	pt3dadd(8.21, 91.83, -6.5, 0.46)
	pt3dadd(7.59, 91.89, -6.5, 0.36)
	pt3dadd(7.13, 91.73, -6.25, 0.18)
	pt3dadd(6.67, 91.43, -6.25, 0.18)
	pt3dadd(6.32, 91.17, -6.25, 0.18)
	pt3dadd(6.11, 91.07, -5.75, 0.18)
  }
  dend[642] {pt3dclear()
	pt3dadd(9.94, 90.66, -6.5, 0.46)
	pt3dadd(9.9, 91.53, -6.5, 0.41)
	pt3dadd(9.69, 92.3, -6.5, 0.41)
	pt3dadd(9.53, 92.96, -6.5, 0.41)
	pt3dadd(9.33, 93.42, -6.5, 0.41)
	pt3dadd(9.23, 94.03, -6.5, 0.41)
	pt3dadd(8.92, 94.24, -6.5, 0.41)
  }
  dend[643] {pt3dclear()
	pt3dadd(7.44, 83.6, -6.75, 0.56)
	pt3dadd(6.93, 84.06, -6.75, 0.41)
	pt3dadd(6.47, 84.93, -6.75, 0.41)
	pt3dadd(6.06, 85.75, -6.75, 0.41)
	pt3dadd(5.75, 86.16, -6.75, 0.41)
	pt3dadd(5.29, 86.87, -6.75, 0.41)
	pt3dadd(4.99, 87.28, -6.75, 0.41)
  }
  dend[644] {pt3dclear()
	pt3dadd(4.99, 87.28, -6.75, 0.41)
	pt3dadd(4.83, 87.79, -6.75, 0.41)
	pt3dadd(4.63, 88.25, -6.75, 0.41)
	pt3dadd(4.58, 88.77, -6.75, 0.41)
	pt3dadd(4.51, 89.53, -6.75, 0.41)
  }
  dend[645] {pt3dclear()
	pt3dadd(4.51, 89.53, -6.75, 0.41)
	pt3dadd(3.76, 89.94, -6.75, 0.36)
	pt3dadd(3.4, 90.35, -6.75, 0.36)
	pt3dadd(2.79, 90.81, -6.75, 0.36)
	pt3dadd(2.27, 91.53, -6.5, 0.36)
	pt3dadd(1.81, 91.94, -6.5, 0.36)
	pt3dadd(1.46, 92.4, -6.25, 0.36)
	pt3dadd(0.79, 92.81, -6, 0.36)
	pt3dadd(0.06, 93.57, -6, 0.36)
	pt3dadd(-0.95, 93.98, -6, 0.36)
	pt3dadd(-1.92, 94.09, -6, 0.36)
	pt3dadd(-2.33, 94.9, -6, 0.36)
	pt3dadd(-3.05, 95.52, -5.75, 0.36)
  }
  dend[646] {pt3dclear()
	pt3dadd(4.51, 89.53, -6.75, 0.41)
	pt3dadd(5.04, 90.35, -6.75, 0.36)
	pt3dadd(5.39, 91.02, -6.75, 0.36)
	pt3dadd(5.39, 91.99, -6.75, 0.36)
	pt3dadd(4.88, 92.65, -6.5, 0.36)
	pt3dadd(4.78, 93.22, -6.5, 0.36)
	pt3dadd(5.55, 93.83, -6.5, 0.36)
	pt3dadd(5.6, 94.49, -6.25, 0.36)
	pt3dadd(5.96, 95.26, -6.25, 0.36)
	pt3dadd(6.21, 95.52, -6.25, 0.36)
	pt3dadd(6.98, 96.34, -6, 0.36)
	pt3dadd(7.54, 96.39, -6, 0.36)
  }
  dend[647] {pt3dclear()
	pt3dadd(4.99, 87.28, -6.75, 0.41)
	pt3dadd(4.32, 87.23, -6.75, 0.18)
	pt3dadd(3.76, 87.69, -6.75, 0.18)
	pt3dadd(3.14, 87.95, -6.75, 0.18)
	pt3dadd(2.68, 88.1, -6.75, 0.18)
	pt3dadd(1.86, 88.51, -6.5, 0.18)
	pt3dadd(0.84, 88.77, -6.5, 0.18)
	pt3dadd(0.18, 88.87, -6.25, 0.18)
	pt3dadd(-0.44, 88.66, -6.25, 0.18)
	pt3dadd(-1, 88.66, -6.25, 0.18)
	pt3dadd(-2.13, 88.82, -6, 0.18)
	pt3dadd(-2.89, 89.07, -6, 0.18)
	pt3dadd(-3.46, 89.53, -6, 0.18)
	pt3dadd(-3.66, 90.35, -6, 0.18)
	pt3dadd(-3.76, 91.27, -6.25, 0.18)
	pt3dadd(-4.01, 91.99, -6.25, 0.18)
	pt3dadd(-4.88, 92.4, -6.25, 0.18)
	pt3dadd(-5.3, 93.01, -6.25, 0.18)
	pt3dadd(-5.5, 93.68, -6.25, 0.18)
  }
  dend[648] {pt3dclear()
	pt3dadd(8.63, 63.92, -7, 2.49)
	pt3dadd(10.02, 63.9, -7.5, 1.28)
	pt3dadd(10.99, 64.2, -7.25, 0.82)
	pt3dadd(11.91, 64.81, -7.25, 0.72)
	pt3dadd(12.52, 65.33, -7.25, 0.72)
	pt3dadd(13.19, 66.05, -7.25, 0.82)
	pt3dadd(13.96, 66.92, -7.25, 0.82)
	pt3dadd(14.72, 67.68, -7.25, 0.82)
	pt3dadd(15.64, 68.76, -7.25, 0.82)
	pt3dadd(16.3, 69.53, -7.25, 0.82)
	pt3dadd(17.43, 69.73, -7.25, 0.72)
	pt3dadd(18.25, 69.83, -7.25, 0.72)
	pt3dadd(19.28, 69.98, -7.25, 0.72)
  }
  dend[649] {pt3dclear()
	pt3dadd(19.28, 69.98, -7.25, 0.72)
	pt3dadd(19.84, 71.06, -7.25, 0.72)
	pt3dadd(20.45, 72.23, -7.25, 0.72)
	pt3dadd(21.12, 73.56, -7, 0.67)
	pt3dadd(21.48, 74.54, -7, 0.56)
	pt3dadd(22.24, 75.66, -7, 0.46)
	pt3dadd(22.7, 76.59, -7, 0.46)
  }
  dend[650] {pt3dclear()
	pt3dadd(22.7, 76.59, -7, 0.46)
	pt3dadd(22.7, 77.66, -7, 0.56)
	pt3dadd(22.75, 78.63, -7, 0.56)
	pt3dadd(22.96, 79.25, -7, 0.56)
	pt3dadd(23.37, 80.12, -7, 0.56)
	pt3dadd(23.83, 80.83, -7, 0.56)
	pt3dadd(24.24, 81.29, -7, 0.56)
	pt3dadd(25.26, 82.21, -6.75, 0.46)
	pt3dadd(25.77, 82.37, -6.75, 0.46)
	pt3dadd(26.39, 82.21, -6.75, 0.46)
	pt3dadd(26.59, 81.96, -6.75, 0.46)
	pt3dadd(26.95, 81.7, -6.75, 0.46)
	pt3dadd(27.1, 81.45, -6.75, 0.46)
	pt3dadd(27.26, 80.83, -6.75, 0.46)
	pt3dadd(27.41, 80.47, -6.75, 0.46)
  }
  dend[651] {pt3dclear()
	pt3dadd(22.7, 76.59, -7, 0.46)
	pt3dadd(23.52, 76.43, -7, 0.61)
	pt3dadd(24.14, 76.33, -7, 0.61)
	pt3dadd(24.95, 76.06, -7, 0.61)
	pt3dadd(25.93, 75.97, -6.75, 0.61)
	pt3dadd(26.69, 76.02, -6.75, 0.61)
	pt3dadd(27.36, 76.23, -6.75, 0.61)
	pt3dadd(28.02, 76.02, -6.75, 0.61)
	pt3dadd(29, 76.28, -6.75, 0.61)
	pt3dadd(29.61, 76.33, -6.75, 0.61)
	pt3dadd(30.53, 76.53, -6.5, 0.51)
	pt3dadd(31.2, 76.43, -6.5, 0.51)
	pt3dadd(31.55, 75.97, -6.5, 0.51)
  }
  dend[652] {pt3dclear()
	pt3dadd(19.28, 69.98, -7.25, 0.72)
	pt3dadd(20.3, 69.78, -7.5, 0.61)
	pt3dadd(21.12, 69.53, -7.5, 0.61)
	pt3dadd(21.68, 69.27, -7.5, 0.61)
	pt3dadd(22.14, 68.34, -7.5, 0.61)
  }
  dend[653] {pt3dclear()
	pt3dadd(22.14, 68.34, -7.5, 0.61)
	pt3dadd(23.29, 67.67, -7.5, 0.67)
  }
  dend[654] {pt3dclear()
	pt3dadd(23.29, 67.67, -7.5, 0.67)
	pt3dadd(22.75, 67.98, -7.5, 0.67)
	pt3dadd(23.22, 67.48, -7.5, 0.51)
	pt3dadd(23.68, 67.12, -7.5, 0.51)
	pt3dadd(23.88, 66.66, -7.5, 0.51)
	pt3dadd(24.34, 66.3, -7.5, 0.51)
	pt3dadd(24.75, 65.73, -7.5, 0.51)
	pt3dadd(25.36, 65.33, -7.5, 0.51)
	pt3dadd(25.98, 64.97, -7.5, 0.51)
	pt3dadd(26.49, 64.62, -7.5, 0.51)
	pt3dadd(27.04, 64.44, -7.5, 0.51)
  }
  dend[655] {pt3dclear()
	pt3dadd(27.04, 64.44, -7.5, 0.51)
	pt3dadd(27.51, 64.36, -7.5, 0.51)
	pt3dadd(27.72, 64.31, -7.5, 0.51)
	pt3dadd(28.89, 63.9, -7.5, 0.51)
	pt3dadd(29.92, 63.54, -7.5, 0.51)
	pt3dadd(30.48, 63.23, -7.5, 0.51)
	pt3dadd(31.35, 62.62, -7.5, 0.51)
	pt3dadd(32.36, 62.16, -7.75, 0.41)
	pt3dadd(32.99, 61.85, -7.75, 0.41)
	pt3dadd(33.9, 61.7, -7.75, 0.51)
	pt3dadd(34.52, 61.55, -7.75, 0.67)
	pt3dadd(35.24, 61.5, -7.75, 0.67)
	pt3dadd(35.75, 61.44, -7.75, 0.67)
	pt3dadd(36.61, 61.19, -7.75, 0.67)
	pt3dadd(37.13, 60.93, -7.75, 0.67)
	pt3dadd(37.49, 60.42, -7.75, 0.67)
	pt3dadd(38.2, 59.91, -7.75, 0.67)
	pt3dadd(38.29, 59.68, -7.75, 0.67)
  }
  dend[656] {pt3dclear()
	pt3dadd(38.29, 59.68, -7.75, 0.67)
	pt3dadd(38.31, 59.3, -7.75, 0.51)
	pt3dadd(38.72, 58.53, -7.75, 0.51)
	pt3dadd(38.82, 57.81, -7.5, 0.51)
	pt3dadd(38.86, 57.15, -7.5, 0.51)
	pt3dadd(39.07, 56.64, -7.5, 0.51)
	pt3dadd(39.33, 56.07, -7.5, 0.51)
  }
  dend[657] {pt3dclear()
	pt3dadd(38.29, 59.68, -7.75, 0.67)
	pt3dadd(38.65, 59.6, -7.75, 0.31)
	pt3dadd(39.07, 59.24, -7.75, 0.31)
	pt3dadd(39.89, 58.99, -7.75, 0.31)
	pt3dadd(40.65, 58.78, -7.5, 0.41)
	pt3dadd(41.17, 58.63, -7.5, 0.41)
	pt3dadd(41.58, 58.37, -7.5, 0.41)
	pt3dadd(42.09, 58.22, -7.5, 0.41)
	pt3dadd(42.35, 58.07, -7.5, 0.41)
	pt3dadd(42.91, 57.71, -7.5, 0.41)
	pt3dadd(43.57, 57.66, -7.5, 0.41)
	pt3dadd(44.39, 57.51, -7.5, 0.41)
  }
  dend[658] {pt3dclear()
	pt3dadd(27.04, 64.44, -7.5, 0.51)
	pt3dadd(27, 63.69, -7.5, 0.51)
	pt3dadd(27.15, 63.13, -7.5, 0.51)
	pt3dadd(27.46, 62.77, -7.5, 0.51)
	pt3dadd(27.87, 62.31, -7.5, 0.51)
	pt3dadd(28.48, 62.11, -7.5, 0.51)
	pt3dadd(28.89, 61.75, -7.5, 0.51)
	pt3dadd(29.61, 61.55, -7.5, 0.51)
  }
}
proc shape3d_27() {
  dend[658] {	pt3dadd(30.07, 61.24, -7.5, 0.51)
	pt3dadd(30.43, 60.83, -7.75, 0.51)
	pt3dadd(31.14, 60.47, -7.75, 0.51)
	pt3dadd(31.66, 60.17, -7.75, 0.51)
	pt3dadd(31.91, 59.7, -7.75, 0.51)
	pt3dadd(32.47, 59.45, -7.75, 0.51)
	pt3dadd(32.72, 59.14, -7.75, 0.41)
	pt3dadd(33.29, 58.84, -7.75, 0.41)
	pt3dadd(33.79, 58.37, -7.75, 0.41)
	pt3dadd(34.47, 58.02, -7.75, 0.41)
	pt3dadd(35.39, 57.91, -7.75, 0.41)
	pt3dadd(35.9, 57.97, -7.75, 0.41)
	pt3dadd(36.21, 57.81, -8, 0.41)
  }
  dend[659] {pt3dclear()
	pt3dadd(23.29, 67.67, -7.5, 0.67)
	pt3dadd(21.78, 67.48, -7.5, 0.61)
	pt3dadd(21.32, 66.87, -7.5, 0.61)
	pt3dadd(21.32, 66, -7.25, 0.61)
	pt3dadd(21.12, 65.54, -7.25, 0.61)
	pt3dadd(20.76, 65.18, -7.25, 0.61)
	pt3dadd(20.5, 64.87, -7.25, 0.61)
	pt3dadd(19.98, 64.36, -7.25, 0.61)
	pt3dadd(19.84, 64.05, -7.25, 0.61)
	pt3dadd(19.48, 63.59, -7.25, 0.61)
	pt3dadd(18.92, 63.18, -7.25, 0.61)
	pt3dadd(18.71, 62.98, -7.25, 0.61)
	pt3dadd(18.14, 62.36, -7.25, 0.61)
	pt3dadd(17.32, 61.8, -7, 0.51)
	pt3dadd(16.51, 61.6, -7, 0.41)
	pt3dadd(16, 61.39, -7, 0.41)
	pt3dadd(14.98, 60.78, -7, 0.61)
	pt3dadd(14.31, 59.81, -7, 0.67)
	pt3dadd(14.11, 59.24, -7, 0.67)
	pt3dadd(13.75, 58.63, -7, 0.67)
	pt3dadd(13.14, 57.97, -7, 0.67)
	pt3dadd(12.78, 57.35, -7, 0.67)
  }
  dend[660] {pt3dclear()
	pt3dadd(22.14, 68.34, -7.5, 0.61)
	pt3dadd(23.16, 68.5, -7.5, 0.51)
	pt3dadd(23.78, 68.7, -7.5, 0.51)
	pt3dadd(24.9, 68.91, -7.5, 0.51)
	pt3dadd(25.77, 69.17, -7.5, 0.51)
	pt3dadd(26.29, 69.33, -7.5, 0.51)
  }
  dend[661] {pt3dclear()
	pt3dadd(26.29, 69.33, -7.5, 0.51)
	pt3dadd(26.59, 69.37, -7.5, 0.51)
	pt3dadd(27.36, 70.14, -7.5, 0.51)
	pt3dadd(28.38, 70.81, -7.5, 0.51)
	pt3dadd(28.89, 71.11, -7.5, 0.51)
	pt3dadd(29.56, 71.52, -7.5, 0.51)
	pt3dadd(30.43, 72.08, -7.5, 0.51)
	pt3dadd(31.4, 72.54, -7.5, 0.51)
	pt3dadd(32.03, 73.06, -7.5, 0.51)
  }
  dend[662] {pt3dclear()
	pt3dadd(32.03, 73.06, -7.5, 0.51)
	pt3dadd(32.36, 73.36, -7.5, 0.51)
	pt3dadd(33.09, 73.98, -7.5, 0.51)
	pt3dadd(33.9, 74.88, -7.5, 0.51)
  }
  dend[663] {pt3dclear()
	pt3dadd(33.9, 74.88, -7.5, 0.51)
	pt3dadd(33.61, 75.66, -7.5, 0.51)
	pt3dadd(33.34, 76.53, -7.5, 0.51)
	pt3dadd(33.29, 77.34, -7.5, 0.51)
	pt3dadd(33.39, 78.31, -7.5, 0.51)
	pt3dadd(33.29, 78.89, -7.5, 0.51)
	pt3dadd(33.04, 79.81, -7.5, 0.51)
  }
  dend[664] {pt3dclear()
	pt3dadd(33.9, 74.88, -7.5, 0.51)
	pt3dadd(34.72, 75.15, -7.5, 0.46)
	pt3dadd(35.54, 75.2, -7.5, 0.46)
	pt3dadd(36.57, 75.31, -7.5, 0.46)
	pt3dadd(37.13, 75.41, -7.5, 0.46)
	pt3dadd(38.31, 75.66, -7.5, 0.46)
	pt3dadd(39.11, 75.92, -7.5, 0.46)
	pt3dadd(40.1, 76.38, -7.5, 0.46)
  }
  dend[665] {pt3dclear()
	pt3dadd(32.03, 73.06, -7.5, 0.51)
	pt3dadd(33.24, 72.75, -7.5, 0.46)
	pt3dadd(34.11, 72.7, -7.5, 0.46)
	pt3dadd(34.93, 72.54, -7.5, 0.46)
	pt3dadd(35.75, 72.39, -7.5, 0.46)
	pt3dadd(36.52, 71.93, -7.5, 0.46)
	pt3dadd(37.39, 71.62, -7.5, 0.46)
	pt3dadd(38.46, 71.52, -7.5, 0.46)
	pt3dadd(39.02, 71.31, -7.5, 0.46)
	pt3dadd(40.25, 71.11, -7.5, 0.46)
	pt3dadd(40.97, 70.91, -7.5, 0.46)
	pt3dadd(41.68, 70.86, -7.5, 0.46)
	pt3dadd(42.45, 70.75, -7.5, 0.46)
	pt3dadd(42.96, 70.65, -7.5, 0.46)
  }
  dend[666] {pt3dclear()
	pt3dadd(42.96, 70.65, -7.5, 0.46)
	pt3dadd(43.73, 70.91, -7.5, 0.46)
	pt3dadd(44.29, 71.2, -7.5, 0.46)
	pt3dadd(44.96, 70.91, -7.75, 0.46)
	pt3dadd(45.52, 71.06, -7.75, 0.46)
	pt3dadd(46.23, 71.37, -7.75, 0.46)
  }
  dend[667] {pt3dclear()
	pt3dadd(42.96, 70.65, -7.5, 0.46)
	pt3dadd(43.06, 69.78, -7.75, 0.46)
	pt3dadd(43.37, 69.27, -7.75, 0.46)
	pt3dadd(43.63, 69.06, -7.75, 0.46)
  }
  dend[668] {pt3dclear()
	pt3dadd(26.29, 69.33, -7.5, 0.51)
	pt3dadd(27.05, 68.66, -7.5, 0.51)
	pt3dadd(27.41, 68.25, -7.5, 0.51)
	pt3dadd(28.07, 67.94, -7.5, 0.51)
	pt3dadd(28.79, 67.73, -7.5, 0.51)
	pt3dadd(29.2, 67.58, -7.5, 0.51)
	pt3dadd(29.92, 67.43, -7.5, 0.51)
	pt3dadd(30.68, 67.22, -7.5, 0.51)
	pt3dadd(31.5, 66.97, -7.5, 0.51)
	pt3dadd(32.17, 66.87, -7.5, 0.51)
  }
  dend[669] {pt3dclear()
	pt3dadd(32.17, 66.87, -7.5, 0.51)
	pt3dadd(32.78, 67.28, -7.5, 0.46)
	pt3dadd(33.54, 67.63, -7.5, 0.46)
	pt3dadd(34.21, 67.89, -7.5, 0.46)
	pt3dadd(34.78, 67.98, -7.75, 0.46)
	pt3dadd(35.13, 68.04, -7.75, 0.46)
	pt3dadd(36.06, 68.15, -7.75, 0.46)
	pt3dadd(36.77, 68.15, -7.75, 0.46)
	pt3dadd(37.44, 68.09, -7.75, 0.46)
	pt3dadd(38.2, 67.98, -7.75, 0.46)
	pt3dadd(38.46, 67.84, -7.75, 0.46)
	pt3dadd(38.65, 67.63, -7.75, 0.46)
	pt3dadd(38.97, 67.12, -7.75, 0.46)
  }
  dend[670] {pt3dclear()
	pt3dadd(32.17, 66.87, -7.5, 0.51)
	pt3dadd(32.68, 66.2, -7.75, 0.46)
	pt3dadd(33.24, 65.79, -7.75, 0.46)
	pt3dadd(34.21, 65.38, -7.75, 0.46)
	pt3dadd(35.19, 65.02, -7.75, 0.36)
	pt3dadd(36.06, 64.92, -7.75, 0.36)
	pt3dadd(36.57, 64.81, -7.75, 0.36)
	pt3dadd(37.39, 64.67, -7.75, 0.36)
	pt3dadd(37.79, 64.51, -7.75, 0.36)
	pt3dadd(38.31, 64.09, -7.75, 0.36)
	pt3dadd(38.97, 64.09, -7.75, 0.36)
	pt3dadd(39.79, 64.2, -7.75, 0.36)
	pt3dadd(40.71, 64.56, -7.75, 0.36)
	pt3dadd(41.38, 64.92, -7.75, 0.36)
	pt3dadd(41.89, 65.38, -7.75, 0.36)
	pt3dadd(42.65, 65.73, -7.75, 0.36)
	pt3dadd(43.42, 66.15, -8, 0.36)
	pt3dadd(43.98, 66.76, -8, 0.36)
  }
  dend[671] {pt3dclear()
	pt3dadd(8.73, 63.47, -7, 2.49)
	pt3dadd(10.13, 62.84, -7.25, 0.87)
	pt3dadd(11.13, 62.47, -7.25, 0.5)
	pt3dadd(12, 62.16, -7.25, 0.5)
	pt3dadd(12.75, 61.91, -7.25, 0.5)
	pt3dadd(13.37, 61.6, -7.25, 0.5)
	pt3dadd(14.12, 61.16, -7.25, 0.5)
	pt3dadd(14.62, 60.79, -7.25, 0.5)
	pt3dadd(15.55, 60.47, -7.5, 0.56)
	pt3dadd(16.37, 60.04, -7.5, 0.56)
	pt3dadd(16.98, 59.66, -7.5, 0.56)
	pt3dadd(17.36, 59.48, -7.5, 0.56)
  }
  dend[672] {pt3dclear()
	pt3dadd(17.36, 59.48, -7.5, 0.56)
	pt3dadd(17.23, 58.54, -7.5, 0.62)
	pt3dadd(17.23, 57.67, -7.5, 0.62)
	pt3dadd(16.93, 56.73, -7.5, 0.62)
  }
  dend[673] {pt3dclear()
	pt3dadd(16.93, 56.73, -7.5, 0.62)
	pt3dadd(15.68, 56.98, -7.5, 0.62)
	pt3dadd(14.74, 57.29, -7.5, 0.62)
	pt3dadd(13.68, 57.48, -7.5, 0.62)
	pt3dadd(13.12, 57.79, -7.5, 0.62)
	pt3dadd(12.13, 58.23, -7.25, 0.56)
  }
  dend[674] {pt3dclear()
	pt3dadd(12.13, 58.23, -7.25, 0.56)
	pt3dadd(12, 59.04, -7.25, 0.56)
	pt3dadd(11.38, 60.16, -7.25, 0.56)
  }
  dend[675] {pt3dclear()
	pt3dadd(12.13, 58.23, -7.25, 0.56)
	pt3dadd(11.5, 57.79, -7.25, 0.56)
	pt3dadd(10.69, 57.61, -7.25, 0.56)
	pt3dadd(9.69, 57.11, -7.25, 0.56)
	pt3dadd(8.94, 56.11, -7.25, 0.56)
	pt3dadd(8.88, 55.49, -7.25, 0.56)
	pt3dadd(8.69, 54.74, -7.25, 0.56)
	pt3dadd(8.39, 54.05, -7.25, 0.56)
	pt3dadd(8.14, 53.55, -7.25, 0.56)
	pt3dadd(8.26, 52.24, -7.25, 0.56)
  }
  dend[676] {pt3dclear()
	pt3dadd(8.26, 52.24, -7.25, 0.56)
	pt3dadd(9.38, 52.12, -7.25, 0.44)
	pt3dadd(10.13, 51.81, -7.25, 0.44)
  }
  dend[677] {pt3dclear()
	pt3dadd(8.26, 52.24, -7.25, 0.56)
	pt3dadd(7.51, 51.93, -7.25, 0.31)
	pt3dadd(6.51, 51.43, -7.25, 0.31)
	pt3dadd(6.14, 50.94, -7.25, 0.31)
	pt3dadd(6.14, 50.44, -7.25, 0.31)
	pt3dadd(6.08, 49.5, -7.25, 0.31)
  }
  dend[678] {pt3dclear()
	pt3dadd(16.93, 56.73, -7.5, 0.62)
	pt3dadd(17.86, 55.8, -7.5, 0.44)
	pt3dadd(18.48, 54.8, -7.25, 0.44)
	pt3dadd(18.36, 53.74, -7.25, 0.44)
  }
  dend[679] {pt3dclear()
	pt3dadd(18.36, 53.74, -7.25, 0.44)
	pt3dadd(18.98, 53.12, -7.25, 0.44)
	pt3dadd(19.73, 52.56, -7.25, 0.44)
	pt3dadd(19.73, 51.62, -7.25, 0.44)
	pt3dadd(19.79, 50.62, -7.25, 0.44)
	pt3dadd(19.86, 49.94, -7.25, 0.44)
	pt3dadd(19.92, 49.31, -7.25, 0.44)
	pt3dadd(20.29, 48.32, -7.25, 0.44)
  }
  dend[680] {pt3dclear()
	pt3dadd(18.36, 53.74, -7.25, 0.44)
	pt3dadd(17.86, 52.81, -7.25, 0.37)
	pt3dadd(17.8, 51.87, -7.25, 0.37)
	pt3dadd(17.73, 51.12, -7.25, 0.37)
	pt3dadd(17.36, 50, -7.25, 0.5)
	pt3dadd(16.93, 49.25, -7.25, 0.5)
	pt3dadd(16.23, 48.63, -7.25, 0.5)
	pt3dadd(15.93, 48.57, -7.25, 0.5)
	pt3dadd(15.12, 48.44, -7.25, 0.5)
  }
  dend[681] {pt3dclear()
	pt3dadd(17.36, 59.48, -7.5, 0.56)
  }
}
proc shape3d_28() {
  dend[681] {	pt3dadd(18.3, 59.79, -7.5, 0.5)
	pt3dadd(19.23, 60.04, -7.5, 0.5)
	pt3dadd(20.29, 60.1, -7.5, 0.5)
	pt3dadd(21.54, 59.98, -7.5, 0.5)
	pt3dadd(21.85, 59.91, -7.5, 0.5)
	pt3dadd(22.48, 60.6, -7.5, 0.5)
	pt3dadd(23.6, 60.97, -7.5, 0.5)
	pt3dadd(24.66, 61.22, -7.5, 0.5)
  }
  dend[682] {pt3dclear()
	pt3dadd(24.66, 61.22, -7.5, 0.5)
	pt3dadd(25.47, 61.28, -7.25, 0.5)
  }
  dend[683] {pt3dclear()
	pt3dadd(25.47, 61.28, -7.25, 0.5)
	pt3dadd(24.66, 61.77, -7.57, 0.5)
  }
  dend[684] {pt3dclear()
	pt3dadd(24.66, 61.77, -7.57, 0.5)
	pt3dadd(26.53, 61.28, -7.5, 0.5)
	pt3dadd(27.65, 61.03, -7.75, 0.5)
	pt3dadd(28.58, 60.72, -7.75, 0.5)
  }
  dend[685] {pt3dclear()
	pt3dadd(24.66, 61.77, -7.57, 0.5)
	pt3dadd(24.28, 62.47, -7.25, 0.5)
	pt3dadd(24.1, 63.4, -7.25, 0.5)
	pt3dadd(23.47, 64.28, -7, 0.5)
  }
  dend[686] {pt3dclear()
	pt3dadd(25.47, 61.28, -7.25, 0.5)
	pt3dadd(22.41, 59.1, -7.5, 0.5)
  }
  dend[687] {pt3dclear()
	pt3dadd(22.41, 59.1, -7.5, 0.5)
	pt3dadd(23.22, 58.17, -7.25, 0.37)
	pt3dadd(24.03, 57.48, -7.25, 0.37)
	pt3dadd(24.16, 57.11, -7.25, 0.37)
  }
  dend[688] {pt3dclear()
	pt3dadd(24.16, 57.11, -7.25, 0.37)
	pt3dadd(24.72, 56.61, -7.25, 0.37)
	pt3dadd(25.59, 55.86, -7.25, 0.37)
  }
  dend[689] {pt3dclear()
	pt3dadd(25.59, 55.86, -7.25, 0.37)
	pt3dadd(26.78, 56.11, -7.5, 0.25)
	pt3dadd(27.71, 56.05, -7.5, 0.44)
	pt3dadd(28.52, 56.48, -7.5, 0.62)
  }
  dend[690] {pt3dclear()
	pt3dadd(25.59, 55.86, -7.25, 0.37)
	pt3dadd(26.03, 55.05, -7.25, 0.62)
	pt3dadd(26.59, 54.3, -7.25, 0.62)
	pt3dadd(27.21, 53.93, -7.25, 0.62)
	pt3dadd(28.46, 52.81, -7.25, 0.62)
  }
  dend[691] {pt3dclear()
	pt3dadd(28.46, 52.81, -7.25, 0.62)
	pt3dadd(28.96, 53.3, -7, 0.44)
	pt3dadd(29.27, 54.3, -7, 0.44)
	pt3dadd(29.02, 55.11, -7, 0.44)
  }
  dend[692] {pt3dclear()
	pt3dadd(28.46, 52.81, -7.25, 0.62)
	pt3dadd(29.08, 52.06, -7.25, 0.44)
	pt3dadd(29.71, 51.43, -7.25, 0.37)
	pt3dadd(30.58, 50.87, -7.25, 0.44)
	pt3dadd(31.45, 50.62, -7.25, 0.56)
  }
  dend[693] {pt3dclear()
	pt3dadd(24.16, 57.11, -7.25, 0.37)
	pt3dadd(23.47, 56.48, -7, 0.31)
	pt3dadd(23.04, 56.11, -7, 0.31)
	pt3dadd(22.29, 55.74, -7, 0.31)
	pt3dadd(21.79, 55.05, -7, 0.31)
  }
  dend[694] {pt3dclear()
	pt3dadd(22.41, 59.1, -7.5, 0.5)
	pt3dadd(21.85, 58.48, -7.25, 0.56)
	pt3dadd(21.1, 57.98, -7.25, 0.56)
	pt3dadd(20.54, 57.48, -7, 0.56)
	pt3dadd(19.86, 56.86, -6.75, 0.56)
	pt3dadd(19.92, 56.55, -6.5, 0.31)
  }
  dend[695] {pt3dclear()
	pt3dadd(24.66, 61.22, -7.5, 0.5)
	pt3dadd(25.84, 60.35, -7.25, 0.5)
	pt3dadd(26.9, 59.54, -7.25, 0.5)
  }
  dend[696] {pt3dclear()
	pt3dadd(3.24, 45.26, -6.75, 1.87)
	pt3dadd(4.01, 44.08, -7, 1.31)
	pt3dadd(4.96, 43.2, -7, 0.94)
	pt3dadd(5.89, 42.46, -7, 0.94)
	pt3dadd(6.64, 41.58, -7, 0.87)
	pt3dadd(7.45, 40.96, -7, 0.81)
	pt3dadd(8.19, 40.27, -7, 0.81)
	pt3dadd(9.07, 39.9, -7, 0.75)
	pt3dadd(10.01, 39.4, -7, 0.69)
	pt3dadd(10.94, 38.97, -7, 0.69)
	pt3dadd(12.19, 38.53, -7, 0.69)
	pt3dadd(13.19, 38.34, -7, 0.81)
	pt3dadd(14.12, 38.15, -7, 0.94)
	pt3dadd(15.18, 37.9, -7, 1.25)
	pt3dadd(16.18, 37.72, -7, 1.62)
	pt3dadd(16.23, 37.4, -7, 1.62)
  }
  dend[697] {pt3dclear()
	pt3dadd(16.23, 37.4, -7, 1.62)
	pt3dadd(16.43, 36.72, -7, 1)
	pt3dadd(16.43, 35.6, -7, 0.81)
	pt3dadd(16.43, 34.4, -7, 0.81)
	pt3dadd(16.37, 33.22, -7.25, 0.75)
	pt3dadd(16.23, 32.17, -7.25, 0.75)
	pt3dadd(15.99, 31.05, -7.25, 0.75)
	pt3dadd(15.62, 30.24, -7.25, 0.75)
	pt3dadd(15.24, 29.43, -7.25, 0.87)
  }
  dend[698] {pt3dclear()
	pt3dadd(15.24, 29.43, -7.25, 0.87)
	pt3dadd(14.37, 29.74, -7, 0.87)
	pt3dadd(13.68, 30.11, -7, 0.56)
	pt3dadd(12.94, 30.42, -7, 0.56)
	pt3dadd(11.94, 31.23, -6.75, 0.56)
	pt3dadd(11.25, 31.67, -6.75, 0.56)
	pt3dadd(10.63, 32.47, -6.75, 0.56)
	pt3dadd(9.82, 33.04, -6.75, 0.56)
	pt3dadd(9.32, 33.6, -6.75, 0.56)
	pt3dadd(8.44, 33.85, -6.75, 0.56)
	pt3dadd(7.64, 33.54, -6.75, 0.56)
	pt3dadd(7.33, 33.22, -6.75, 0.56)
  }
  dend[699] {pt3dclear()
	pt3dadd(15.24, 29.43, -7.25, 0.87)
	pt3dadd(15.06, 28.37, -7.25, 0.81)
	pt3dadd(14.93, 27.49, -7.25, 0.81)
  }
  dend[700] {pt3dclear()
	pt3dadd(14.93, 27.49, -7.25, 0.81)
	pt3dadd(16.07, 27.11, -7.55, 0.62)
  }
  dend[701] {pt3dclear()
	pt3dadd(16.07, 27.11, -7.55, 0.62)
	pt3dadd(15.87, 27.18, -7.5, 0.62)
	pt3dadd(16.55, 26.87, -7.5, 0.62)
	pt3dadd(16.98, 26.68, -7.5, 0.62)
	pt3dadd(17.8, 26.43, -7.5, 0.75)
	pt3dadd(18.61, 26.31, -7.5, 0.75)
	pt3dadd(19.54, 26.5, -7.75, 0.75)
	pt3dadd(20.36, 26.75, -7.75, 0.75)
	pt3dadd(20.98, 27.12, -8, 0.75)
	pt3dadd(21.91, 27.18, -8.25, 0.56)
	pt3dadd(22.66, 26.93, -8.25, 0.44)
	pt3dadd(23.22, 26.43, -8.25, 0.44)
	pt3dadd(24.03, 26.06, -8.25, 0.44)
	pt3dadd(24.72, 25.75, -8.25, 0.44)
	pt3dadd(25.09, 25.75, -8.25, 0.44)
	pt3dadd(26.28, 25.87, -8.5, 0.37)
  }
  dend[702] {pt3dclear()
	pt3dadd(16.07, 27.11, -7.55, 0.62)
	pt3dadd(14.81, 26, -7.25, 0.5)
	pt3dadd(14.93, 25.19, -7.5, 0.5)
	pt3dadd(14.99, 24.19, -7.5, 0.62)
  }
  dend[703] {pt3dclear()
	pt3dadd(14.99, 24.19, -7.5, 0.62)
	pt3dadd(14.56, 23.57, -7.5, 0.37)
	pt3dadd(14.12, 23.13, -7.5, 0.31)
	pt3dadd(13.62, 22.69, -7.5, 0.37)
	pt3dadd(13.19, 22.13, -7.5, 0.62)
	pt3dadd(12.87, 21.7, -7.5, 0.75)
  }
  dend[704] {pt3dclear()
	pt3dadd(14.99, 24.19, -7.5, 0.62)
	pt3dadd(15.93, 23.94, -7.5, 0.75)
	pt3dadd(16.8, 23.57, -7.5, 0.75)
	pt3dadd(17.61, 23.13, -7.5, 0.75)
	pt3dadd(18.73, 23.13, -7.5, 0.62)
	pt3dadd(19.67, 23.13, -7.5, 0.62)
	pt3dadd(20.6, 23.44, -7.5, 0.62)
	pt3dadd(21.35, 23.57, -7.5, 0.62)
	pt3dadd(22.23, 24.25, -7.5, 0.62)
  }
  dend[705] {pt3dclear()
	pt3dadd(14.93, 27.49, -7.25, 0.81)
	pt3dadd(14.31, 27.43, -7.25, 0.62)
	pt3dadd(13.62, 27, -7.25, 0.56)
	pt3dadd(13, 26.62, -7.25, 0.56)
	pt3dadd(12.31, 25.94, -7.25, 0.56)
	pt3dadd(11.88, 25, -7.25, 0.75)
	pt3dadd(11.56, 24.5, -7.25, 1)
  }
  dend[706] {pt3dclear()
	pt3dadd(11.56, 24.5, -7.25, 1)
	pt3dadd(12.12, 23.39, -7.25, 0.62)
  }
  dend[707] {pt3dclear()
	pt3dadd(12.12, 23.39, -7.25, 0.62)
	pt3dadd(12, 23.63, -7.25, 0.62)
	pt3dadd(12.62, 23.07, -7.25, 0.5)
	pt3dadd(13.25, 22.69, -7.25, 0.44)
	pt3dadd(14.18, 21.82, -7, 0.44)
	pt3dadd(14.87, 21.38, -7, 0.44)
	pt3dadd(15.55, 20.82, -7, 0.5)
	pt3dadd(16.3, 20.32, -7, 0.5)
	pt3dadd(16.93, 20.14, -7, 0.5)
	pt3dadd(17.67, 19.89, -7, 0.37)
	pt3dadd(18.42, 19.76, -6.75, 0.37)
  }
  dend[708] {pt3dclear()
	pt3dadd(12.12, 23.39, -7.25, 0.62)
	pt3dadd(11.32, 23.38, -7.25, 0.44)
	pt3dadd(11, 22.57, -7.25, 0.37)
	pt3dadd(10.69, 22.01, -7.25, 0.37)
	pt3dadd(10.19, 21.32, -7.25, 0.37)
	pt3dadd(9.69, 20.57, -7.25, 0.56)
	pt3dadd(9.38, 19.76, -7.25, 0.87)
	pt3dadd(9.13, 19.2, -7.25, 0.87)
  }
  dend[709] {pt3dclear()
	pt3dadd(9.13, 19.2, -7.25, 0.87)
	pt3dadd(8.16, 19.98, -7.25, 0.62)
  }
  dend[710] {pt3dclear()
	pt3dadd(8.16, 19.98, -7.25, 0.62)
	pt3dadd(8.51, 19.7, -7.25, 0.62)
	pt3dadd(7.57, 19.82, -7.25, 0.62)
	pt3dadd(6.51, 19.82, -7.25, 0.62)
	pt3dadd(5.64, 19.64, -7.25, 0.62)
	pt3dadd(4.96, 20.07, -7, 0.62)
	pt3dadd(4.21, 20.32, -6.75, 0.44)
	pt3dadd(3.46, 20.76, -6.75, 0.44)
	pt3dadd(3.27, 21.2, -6.75, 0.44)
  }
  dend[711] {pt3dclear()
	pt3dadd(8.16, 19.98, -7.25, 0.62)
	pt3dadd(9.07, 18.27, -7.25, 0.56)
	pt3dadd(9.07, 17.32, -7, 0.56)
	pt3dadd(8.88, 16.64, -7, 0.56)
	pt3dadd(8.39, 16.52, -7, 0.56)
	pt3dadd(7.26, 16.39, -7, 0.56)
  }
  dend[712] {pt3dclear()
	pt3dadd(9.13, 19.2, -7.25, 0.87)
	pt3dadd(9.94, 18.89, -7.25, 0.56)
	pt3dadd(10.82, 18.7, -7, 0.56)
	pt3dadd(11.81, 18.64, -7, 0.56)
	pt3dadd(12.62, 18.57, -6.75, 0.56)
	pt3dadd(13.44, 18.32, -6.75, 0.75)
	pt3dadd(14.12, 17.96, -6.75, 0.75)
	pt3dadd(14.87, 17.39, -6.75, 0.5)
  }
  dend[713] {pt3dclear()
	pt3dadd(11.56, 24.5, -7.25, 1)
	pt3dadd(10.94, 24.56, -7.25, 0.5)
	pt3dadd(10.26, 24.94, -7.25, 0.5)
	pt3dadd(9.26, 24.88, -7.25, 0.37)
	pt3dadd(8.57, 24.63, -7.25, 0.37)
	pt3dadd(7.64, 24.56, -7.25, 0.44)
	pt3dadd(6.83, 24.69, -7.25, 0.56)
	pt3dadd(5.58, 24.63, -7, 0.56)
  }
  dend[714] {pt3dclear()
	pt3dadd(5.58, 24.63, -7, 0.56)
  }
}
proc shape3d_29() {
  dend[714] {	pt3dadd(4.34, 24.56, -7, 0.62)
  }
  dend[715] {pt3dclear()
	pt3dadd(4.34, 24.56, -7, 0.62)
	pt3dadd(3.71, 24.25, -7, 0.62)
	pt3dadd(3.09, 24, -7, 0.62)
  }
  dend[716] {pt3dclear()
	pt3dadd(3.09, 24, -7, 0.62)
	pt3dadd(2.96, 23.19, -7, 0.56)
	pt3dadd(2.77, 22.44, -7, 0.56)
	pt3dadd(2.4, 21.95, -7.25, 0.56)
	pt3dadd(1.9, 21.32, -7.25, 0.56)
	pt3dadd(1.84, 20.76, -7.25, 0.56)
  }
  dend[717] {pt3dclear()
	pt3dadd(3.09, 24, -7, 0.62)
	pt3dadd(2.21, 24.19, -7, 0.56)
	pt3dadd(0.65, 24.38, -7, 0.56)
	pt3dadd(-0.09, 24.81, -7.25, 0.56)
	pt3dadd(-0.97, 25.44, -7.25, 0.56)
	pt3dadd(-2.15, 26, -7.25, 0.56)
	pt3dadd(-2.96, 26.62, -7.25, 0.56)
  }
  dend[718] {pt3dclear()
	pt3dadd(4.34, 24.56, -7, 0.62)
	pt3dadd(5.14, 25.44, -7, 0.44)
	pt3dadd(4.51, 26.18, -7, 0.44)
	pt3dadd(3.77, 26.56, -7, 0.44)
	pt3dadd(3.02, 27, -7, 0.44)
	pt3dadd(2.15, 27.31, -7, 0.44)
	pt3dadd(1.4, 27.31, -7, 0.62)
	pt3dadd(0.47, 27.56, -6.75, 0.62)
	pt3dadd(-0.22, 27.37, -6.5, 0.62)
  }
  dend[719] {pt3dclear()
	pt3dadd(5.58, 24.63, -7, 0.56)
	pt3dadd(5.89, 25.44, -7, 0.56)
	pt3dadd(6.7, 26.18, -6.75, 0.56)
	pt3dadd(7.26, 26.68, -6.75, 0.56)
	pt3dadd(7.89, 27.56, -7, 0.56)
	pt3dadd(9.01, 27.81, -7, 0.56)
	pt3dadd(10.13, 27.74, -7.25, 0.56)
	pt3dadd(10.94, 27.93, -7.25, 0.56)
	pt3dadd(12, 28.18, -7.25, 0.56)
	pt3dadd(12.69, 28.74, -7.25, 0.56)
  }
  dend[720] {pt3dclear()
	pt3dadd(16.23, 37.4, -7, 1.62)
	pt3dadd(16.93, 38.4, -7.25, 0.81)
	pt3dadd(17.86, 39.34, -7.25, 0.81)
	pt3dadd(18.8, 39.9, -7.25, 0.81)
	pt3dadd(19.54, 40.71, -7.5, 0.81)
	pt3dadd(20.04, 41.33, -7.5, 0.81)
	pt3dadd(20.98, 42.39, -7.5, 0.81)
  }
  dend[721] {pt3dclear()
	pt3dadd(20.98, 42.39, -7.5, 0.81)
	pt3dadd(22.48, 42.52, -7.5, 0.62)
	pt3dadd(23.53, 42.71, -7.5, 0.62)
	pt3dadd(24.78, 42.77, -7.5, 0.62)
	pt3dadd(24.97, 42.77, -7.5, 0.62)
  }
  dend[722] {pt3dclear()
	pt3dadd(24.97, 42.77, -7.5, 0.62)
	pt3dadd(25.34, 41.9, -7.5, 0.62)
	pt3dadd(25.78, 41.33, -7.5, 0.62)
	pt3dadd(26.47, 40.59, -7.5, 0.62)
	pt3dadd(26.78, 40.21, -7.5, 0.62)
  }
  dend[723] {pt3dclear()
	pt3dadd(26.78, 40.21, -7.5, 0.62)
	pt3dadd(26.71, 39.65, -7.5, 0.5)
	pt3dadd(26.65, 38.9, -7.5, 0.5)
	pt3dadd(26.71, 38.09, -7.5, 0.5)
	pt3dadd(26.71, 36.9, -7.5, 0.5)
  }
  dend[724] {pt3dclear()
	pt3dadd(26.71, 36.9, -7.5, 0.5)
	pt3dadd(26.53, 36.28, -8, 0.37)
	pt3dadd(25.78, 35.79, -8, 0.37)
	pt3dadd(25.53, 35.4, -8, 0.37)
	pt3dadd(24.97, 34.85, -8, 0.56)
	pt3dadd(24.28, 34.54, -8, 0.56)
	pt3dadd(23.6, 34.04, -8, 0.37)
	pt3dadd(22.41, 33.6, -8, 0.5)
	pt3dadd(21.29, 33.6, -8, 0.5)
	pt3dadd(20.23, 33.47, -8, 0.5)
	pt3dadd(19.61, 33.54, -8, 0.5)
  }
  dend[725] {pt3dclear()
	pt3dadd(26.71, 36.9, -7.5, 0.5)
	pt3dadd(27.28, 36.28, -8, 0.44)
	pt3dadd(27.59, 35.79, -8, 0.37)
	pt3dadd(28.65, 35.15, -8, 0.37)
	pt3dadd(29.33, 34.85, -8, 0.5)
	pt3dadd(29.89, 34.85, -8, 0.5)
	pt3dadd(30.52, 34.35, -8.25, 0.5)
  }
  dend[726] {pt3dclear()
	pt3dadd(26.78, 40.21, -7.5, 0.62)
	pt3dadd(28.09, 39.78, -7.5, 0.37)
	pt3dadd(28.83, 39.46, -7.5, 0.44)
	pt3dadd(29.52, 38.84, -7.5, 0.44)
	pt3dadd(30.52, 38.22, -7.5, 0.44)
	pt3dadd(31.02, 37.9, -7.5, 0.44)
	pt3dadd(31.7, 37.34, -7.75, 0.37)
	pt3dadd(32.01, 36.9, -7.75, 0.37)
	pt3dadd(32.57, 36.53, -7.75, 0.44)
	pt3dadd(32.95, 36.15, -7.75, 0.44)
  }
  dend[727] {pt3dclear()
	pt3dadd(24.97, 42.77, -7.5, 0.62)
	pt3dadd(25.72, 43.2, -7.25, 0.44)
	pt3dadd(26.59, 43.77, -7.25, 0.44)
	pt3dadd(27.9, 44.26, -7.25, 0.44)
	pt3dadd(29.27, 44.89, -7.25, 0.44)
  }
  dend[728] {pt3dclear()
	pt3dadd(29.27, 44.89, -7.25, 0.44)
	pt3dadd(30.08, 44.51, -7.25, 0.44)
	pt3dadd(31.08, 44.2, -7.25, 0.44)
	pt3dadd(31.89, 43.77, -7.25, 0.44)
	pt3dadd(33.07, 43.45, -7.5, 0.44)
	pt3dadd(33.7, 43.45, -7.5, 0.44)
  }
  dend[729] {pt3dclear()
	pt3dadd(33.7, 43.45, -7.5, 0.44)
	pt3dadd(33.88, 42.52, -7.5, 0.37)
	pt3dadd(33.95, 41.46, -7.5, 0.37)
	pt3dadd(34.51, 40.65, -7.5, 0.37)
  }
  dend[730] {pt3dclear()
	pt3dadd(33.7, 43.45, -7.5, 0.44)
	pt3dadd(34.69, 43.77, -7.5, 0.37)
	pt3dadd(35.69, 43.45, -7.5, 0.37)
	pt3dadd(36.94, 43.02, -7.5, 0.37)
	pt3dadd(38.31, 42.89, -7.5, 0.37)
	pt3dadd(39.61, 42.64, -7.5, 0.37)
	pt3dadd(40.93, 42.58, -7.5, 0.37)
	pt3dadd(42.18, 42.71, -7.5, 0.37)
  }
  dend[731] {pt3dclear()
	pt3dadd(29.27, 44.89, -7.25, 0.44)
	pt3dadd(29.83, 45.57, -7.25, 0.37)
	pt3dadd(30.21, 46.2, -7.25, 0.37)
  }
  dend[732] {pt3dclear()
	pt3dadd(30.21, 46.2, -7.25, 0.37)
	pt3dadd(31.39, 46.2, -7.25, 0.37)
	pt3dadd(32.82, 46.32, -7.25, 0.37)
  }
  dend[733] {pt3dclear()
	pt3dadd(32.82, 46.32, -7.25, 0.37)
	pt3dadd(34.13, 46.07, -7.5, 0.37)
	pt3dadd(35.26, 46.07, -7.75, 0.37)
	pt3dadd(36.44, 46.13, -7.75, 0.37)
	pt3dadd(37.69, 46.2, -7.75, 0.37)
	pt3dadd(38.5, 46.51, -7.75, 0.37)
	pt3dadd(39.31, 46.76, -7.75, 0.37)
	pt3dadd(39.81, 46.88, -7.75, 0.37)
	pt3dadd(40.86, 46.82, -7.75, 0.37)
	pt3dadd(41.8, 46.63, -7.75, 0.37)
  }
  dend[734] {pt3dclear()
	pt3dadd(32.82, 46.32, -7.25, 0.37)
	pt3dadd(33.14, 47.01, -7.25, 0.37)
	pt3dadd(34.26, 47.82, -7.25, 0.37)
	pt3dadd(34.76, 48.57, -7.5, 0.37)
	pt3dadd(35.82, 49.31, -7.5, 0.37)
	pt3dadd(36.88, 49.88, -7.5, 0.37)
	pt3dadd(38, 50.31, -7.5, 0.37)
	pt3dadd(38.93, 50.56, -7.5, 0.5)
	pt3dadd(39.93, 51, -7.5, 0.5)
	pt3dadd(40.93, 51.25, -7.5, 0.37)
	pt3dadd(41.99, 51.37, -7.5, 0.37)
	pt3dadd(42.67, 51.31, -7.5, 0.37)
	pt3dadd(42.99, 50.81, -7.5, 0.37)
  }
  dend[735] {pt3dclear()
	pt3dadd(30.21, 46.2, -7.25, 0.37)
	pt3dadd(30.58, 47.26, -7.5, 0.37)
	pt3dadd(31.2, 48.32, -7.5, 0.37)
	pt3dadd(31.83, 49.38, -7.5, 0.37)
	pt3dadd(32.7, 50.37, -7.5, 0.37)
	pt3dadd(33.7, 51.12, -7.75, 0.37)
	pt3dadd(34.82, 51.56, -7.75, 0.37)
	pt3dadd(35.44, 51.81, -7.75, 0.37)
	pt3dadd(36.07, 52.62, -7.75, 0.37)
	pt3dadd(37.13, 53.18, -7.75, 0.37)
  }
  dend[736] {pt3dclear()
	pt3dadd(20.98, 42.39, -7.5, 0.81)
	pt3dadd(21.29, 43.45, -7.5, 0.44)
	pt3dadd(21.79, 44.33, -7.5, 0.44)
	pt3dadd(22.16, 45.7, -7.5, 0.44)
	pt3dadd(22.66, 47.19, -7.5, 0.44)
	pt3dadd(23.29, 48.19, -7.5, 0.44)
	pt3dadd(24.22, 49.56, -7.5, 0.44)
  }
  dend[737] {pt3dclear()
	pt3dadd(24.22, 49.56, -7.5, 0.44)
	pt3dadd(23.72, 50.37, -7.5, 0.44)
	pt3dadd(23.16, 51.93, -7.5, 0.44)
	pt3dadd(22.97, 53.18, -7.5, 0.44)
	pt3dadd(22.54, 53.99, -7.5, 0.44)
	pt3dadd(21.98, 54.55, -7.5, 0.44)
	pt3dadd(21.54, 55.49, -7.5, 0.44)
	pt3dadd(20.67, 56.48, -7.5, 0.56)
  }
  dend[738] {pt3dclear()
	pt3dadd(24.22, 49.56, -7.5, 0.44)
	pt3dadd(25.28, 49.81, -7.5, 0.5)
	pt3dadd(26.34, 50.5, -7.5, 0.56)
	pt3dadd(26.96, 51, -7.5, 0.56)
	pt3dadd(28.15, 51.75, -7.5, 0.56)
	pt3dadd(28.77, 52.24, -7.5, 0.44)
	pt3dadd(29.64, 52.93, -7.5, 0.5)
	pt3dadd(30.52, 53.43, -7.5, 0.5)
	pt3dadd(31.33, 53.93, -7.5, 0.5)
	pt3dadd(32.26, 54.3, -7.5, 0.5)
	pt3dadd(32.89, 54.55, -7.5, 0.5)
	pt3dadd(33.82, 54.93, -7.5, 0.5)
	pt3dadd(34.32, 55.3, -7.5, 0.5)
	pt3dadd(35.19, 55.55, -7.75, 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()
}
access soma

celldef()

Loading data, please wait...