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[716]

proc topol() { local i
  connect soma[1](0), soma(0)
  connect dend(0), soma(0)
  for i = 1, 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)
  for i = 19, 20 connect dend[i](0), dend[18](1)
  for i = 21, 22 connect dend[i](0), dend[20](1)
  connect dend[23](0), dend[13](1)
  for i = 24, 25 connect dend[i](0), dend[i-1](1)
  connect dend[26](0), dend[24](1)
  connect dend[27](0), dend[23](1)
  for i = 28, 30 connect dend[i](0), dend[i-1](1)
  connect dend[31](0), dend[29](1)
  connect dend[32](0), dend[28](1)
  connect dend[33](0), dend[27](1)
  connect dend[34](0), dend[12](1)
  for i = 35, 36 connect dend[i](0), dend[i-1](1)
  connect dend[37](0), dend[35](1)
  connect dend[38](0), dend[34](1)
  for i = 39, 40 connect dend[i](0), dend[38](1)
  for i = 41, 42 connect dend[i](0), dend[40](1)
  connect dend[43](0), dend[11](1)
  for i = 44, 45 connect dend[i](0), dend[43](1)
  for i = 46, 47 connect dend[i](0), dend[i-1](1)
  connect dend[48](0), dend[46](1)
  connect dend[49](0), dend[45](1)
  connect dend[50](0), dend[10](1)
  for i = 51, 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[52](1)
  connect dend[59](0), dend[51](1)
  connect dend[60](0), dend[50](1)
  connect dend[61](0), dend[9](1)
  for i = 62, 63 connect dend[i](0), dend[61](1)
  for i = 64, 65 connect dend[i](0), dend[63](1)
  for i = 66, 67 connect dend[i](0), dend[65](1)
  for i = 68, 69 connect dend[i](0), dend[67](1)
  connect dend[70](0), dend[8](1)
  for i = 71, 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[77](1)
  connect dend[84](0), dend[76](1)
  for i = 85, 86 connect dend[i](0), dend[i-1](1)
  connect dend[87](0), dend[85](1)
  for i = 88, 89 connect dend[i](0), dend[87](1)
  connect dend[90](0), dend[84](1)
  connect dend[91](0), dend[75](1)
  for i = 92, 93 connect dend[i](0), dend[91](1)
  connect dend[94](0), dend[74](1)
  for i = 95, 98 connect dend[i](0), dend[i-1](1)
  connect dend[99](0), dend[97](1)
  for i = 100, 102 connect dend[i](0), dend[i-1](1)
  connect dend[103](0), dend[101](1)
  for i = 104, 105 connect dend[i](0), dend[i-1](1)
  connect dend[106](0), dend[104](1)
  connect dend[107](0), dend[103](1)
  connect dend[108](0), dend[100](1)
  for i = 109, 110 connect dend[i](0), dend[108](1)
  connect dend[111](0), dend[99](1)
  for i = 112, 113 connect dend[i](0), dend[111](1)
  connect dend[114](0), dend[96](1)
  for i = 115, 117 connect dend[i](0), dend[i-1](1)
  connect dend[118](0), dend[116](1)
  connect dend[119](0), dend[115](1)
  for i = 120, 121 connect dend[i](0), dend[119](1)
  connect dend[122](0), dend[114](1)
  connect dend[123](0), dend[95](1)
  connect dend[124](0), dend[94](1)
  connect dend[125](0), dend[73](1)
  connect dend[126](0), dend[72](1)
  for i = 127, 128 connect dend[i](0), dend[126](1)
  for i = 129, 130 connect dend[i](0), dend[i-1](1)
  connect dend[131](0), dend[129](1)
  for i = 132, 133 connect dend[i](0), dend[131](1)
  connect dend[134](0), dend[128](1)
  connect dend[135](0), dend[71](1)
  for i = 136, 137 connect dend[i](0), dend[135](1)
  for i = 138, 139 connect dend[i](0), dend[i-1](1)
  connect dend[140](0), dend[138](1)
  connect dend[141](0), dend[137](1)
  connect dend[142](0), dend[70](1)
  for i = 143, 146 connect dend[i](0), dend[i-1](1)
  connect dend[147](0), dend[145](1)
  for i = 148, 149 connect dend[i](0), dend[i-1](1)
  connect dend[150](0), dend[148](1)
  connect dend[151](0), dend[147](1)
  connect dend[152](0), dend[144](1)
  connect dend[153](0), dend[143](1)
  connect dend[154](0), dend[142](1)
  connect dend[155](0), dend[7](1)
  for i = 156, 163 connect dend[i](0), dend[i-1](1)
  connect dend[164](0), dend[162](1)
  connect dend[165](0), dend[161](1)
  for i = 166, 167 connect dend[i](0), dend[165](1)
  connect dend[168](0), dend[160](1)
  for i = 169, 170 connect dend[i](0), dend[168](1)
  connect dend[171](0), dend[159](1)
  for i = 172, 176 connect dend[i](0), dend[i-1](1)
  connect dend[177](0), dend[175](1)
  connect dend[178](0), dend[174](1)
  connect dend[179](0), dend[173](1)
  connect dend[180](0), dend[172](1)
  connect dend[181](0), dend[171](1)
  connect dend[182](0), dend[158](1)
  connect dend[183](0), dend[157](1)
  for i = 184, 185 connect dend[i](0), dend[183](1)
  connect dend[186](0), dend[156](1)
  for i = 187, 188 connect dend[i](0), dend[i-1](1)
  connect dend[189](0), dend[187](1)
  connect dend[190](0), dend[186](1)
  connect dend[191](0), dend[155](1)
  for i = 192, 195 connect dend[i](0), dend[i-1](1)
  connect dend[196](0), dend[194](1)
  connect dend[197](0), dend[193](1)
  for i = 198, 199 connect dend[i](0), dend[i-1](1)
  connect dend[200](0), dend[198](1)
  connect dend[201](0), dend[197](1)
  connect dend[202](0), dend[192](1)
  for i = 203, 204 connect dend[i](0), dend[i-1](1)
  connect dend[205](0), dend[203](1)
  for i = 206, 207 connect dend[i](0), dend[205](1)
  connect dend[208](0), dend[202](1)
  connect dend[209](0), dend[191](1)
  connect dend[210](0), dend[6](1)
  for i = 211, 212 connect dend[i](0), dend[i-1](1)
  connect dend[213](0), dend[211](1)
  for i = 214, 215 connect dend[i](0), dend[213](1)
  connect dend[216](0), dend[210](1)
  for i = 217, 218 connect dend[i](0), dend[i-1](1)
  connect dend[219](0), dend[217](1)
  for i = 220, 221 connect dend[i](0), dend[219](1)
  for i = 222, 223 connect dend[i](0), dend[221](1)
  connect dend[224](0), dend[216](1)
  connect dend[225](0), dend[5](1)
  for i = 226, 237 connect dend[i](0), dend[i-1](1)
  connect dend[238](0), dend[236](1)
  connect dend[239](0), dend[235](1)
  for i = 240, 241 connect dend[i](0), dend[239](1)
  for i = 242, 243 connect dend[i](0), dend[241](1)
  connect dend[244](0), dend[234](1)
  connect dend[245](0), dend[233](1)
  for i = 246, 247 connect dend[i](0), dend[i-1](1)
  connect dend[248](0), dend[246](1)
  connect dend[249](0), dend[245](1)
  for i = 250, 251 connect dend[i](0), dend[249](1)
  connect dend[252](0), dend[232](1)
  for i = 253, 256 connect dend[i](0), dend[i-1](1)
  connect dend[257](0), dend[255](1)
  connect dend[258](0), dend[254](1)
  for i = 259, 260 connect dend[i](0), dend[258](1)
  for i = 261, 262 connect dend[i](0), dend[260](1)
  for i = 263, 264 connect dend[i](0), dend[262](1)
  for i = 265, 266 connect dend[i](0), dend[264](1)
  for i = 267, 268 connect dend[i](0), dend[266](1)
  connect dend[269](0), dend[253](1)
  for i = 270, 271 connect dend[i](0), dend[269](1)
  connect dend[272](0), dend[252](1)
  for i = 273, 274 connect dend[i](0), dend[272](1)
  for i = 275, 276 connect dend[i](0), dend[i-1](1)
  connect dend[277](0), dend[275](1)
  connect dend[278](0), dend[274](1)
  for i = 279, 280 connect dend[i](0), dend[278](1)
  connect dend[281](0), dend[231](1)
  for i = 282, 283 connect dend[i](0), dend[281](1)
  connect dend[284](0), dend[230](1)
  for i = 285, 286 connect dend[i](0), dend[284](1)
  for i = 287, 288 connect dend[i](0), dend[i-1](1)
  connect dend[289](0), dend[287](1)
  for i = 290, 291 connect dend[i](0), dend[289](1)
  connect dend[292](0), dend[286](1)
  connect dend[293](0), dend[229](1)
  for i = 294, 297 connect dend[i](0), dend[i-1](1)
  connect dend[298](0), dend[296](1)
  for i = 299, 300 connect dend[i](0), dend[298](1)
  connect dend[301](0), dend[295](1)
  for i = 302, 303 connect dend[i](0), dend[301](1)
  connect dend[304](0), dend[294](1)
  for i = 305, 306 connect dend[i](0), dend[304](1)
  for i = 307, 308 connect dend[i](0), dend[306](1)
  for i = 309, 310 connect dend[i](0), dend[308](1)
  connect dend[311](0), dend[293](1)
  connect dend[312](0), dend[228](1)
  for i = 313, 318 connect dend[i](0), dend[i-1](1)
  connect dend[319](0), dend[317](1)
  for i = 320, 321 connect dend[i](0), dend[319](1)
  connect dend[322](0), dend[316](1)
  connect dend[323](0), dend[315](1)
  connect dend[324](0), dend[314](1)
  connect dend[325](0), dend[313](1)
  for i = 326, 327 connect dend[i](0), dend[i-1](1)
  connect dend[328](0), dend[326](1)
  connect dend[329](0), dend[325](1)
  connect dend[330](0), dend[312](1)
  connect dend[331](0), dend[227](1)
  for i = 332, 333 connect dend[i](0), dend[331](1)
  connect dend[334](0), dend[226](1)
  for i = 335, 339 connect dend[i](0), dend[i-1](1)
  connect dend[340](0), dend[338](1)
  topol_1()
}
proc topol_1() {
  for i = 341, 342 connect dend[i](0), dend[340](1)
  connect dend[343](0), dend[337](1)
  for i = 344, 346 connect dend[i](0), dend[i-1](1)
  connect dend[347](0), dend[345](1)
  connect dend[348](0), dend[344](1)
  connect dend[349](0), dend[343](1)
  connect dend[350](0), dend[336](1)
  for i = 351, 352 connect dend[i](0), dend[350](1)
  for i = 353, 354 connect dend[i](0), dend[i-1](1)
  connect dend[355](0), dend[353](1)
  connect dend[356](0), dend[352](1)
  for i = 357, 358 connect dend[i](0), dend[356](1)
  connect dend[359](0), dend[335](1)
  for i = 360, 361 connect dend[i](0), dend[359](1)
  connect dend[362](0), dend[334](1)
  for i = 363, 364 connect dend[i](0), dend[362](1)
  for i = 365, 366 connect dend[i](0), dend[i-1](1)
  connect dend[367](0), dend[365](1)
  connect dend[368](0), dend[364](1)
  connect dend[369](0), dend[225](1)
  for i = 370, 371 connect dend[i](0), dend[369](1)
  for i = 372, 373 connect dend[i](0), dend[371](1)
  for i = 374, 375 connect dend[i](0), dend[373](1)
  for i = 376, 377 connect dend[i](0), dend[375](1)
  connect dend[378](0), dend[4](1)
  for i = 379, 384 connect dend[i](0), dend[i-1](1)
  connect dend[385](0), dend[383](1)
  for i = 386, 387 connect dend[i](0), dend[385](1)
  connect dend[388](0), dend[382](1)
  connect dend[389](0), dend[381](1)
  for i = 390, 394 connect dend[i](0), dend[i-1](1)
  connect dend[395](0), dend[393](1)
  connect dend[396](0), dend[392](1)
  connect dend[397](0), dend[391](1)
  connect dend[398](0), dend[390](1)
  for i = 399, 400 connect dend[i](0), dend[398](1)
  connect dend[401](0), dend[389](1)
  connect dend[402](0), dend[380](1)
  for i = 403, 404 connect dend[i](0), dend[i-1](1)
  connect dend[405](0), dend[403](1)
  for i = 406, 407 connect dend[i](0), dend[405](1)
  connect dend[408](0), dend[402](1)
  for i = 409, 410 connect dend[i](0), dend[i-1](1)
  connect dend[411](0), dend[409](1)
  connect dend[412](0), dend[408](1)
  connect dend[413](0), dend[379](1)
  for i = 414, 415 connect dend[i](0), dend[413](1)
  for i = 416, 417 connect dend[i](0), dend[415](1)
  connect dend[418](0), dend[378](1)
  connect dend[419](0), dend[3](1)
  for i = 420, 421 connect dend[i](0), dend[419](1)
  for i = 422, 423 connect dend[i](0), dend[421](1)
  for i = 424, 425 connect dend[i](0), dend[423](1)
  for i = 426, 434 connect dend[i](0), dend[i-1](1)
  connect dend[435](0), dend[433](1)
  for i = 436, 437 connect dend[i](0), dend[435](1)
  connect dend[438](0), dend[432](1)
  connect dend[439](0), dend[431](1)
  for i = 440, 441 connect dend[i](0), dend[i-1](1)
  connect dend[442](0), dend[440](1)
  connect dend[443](0), dend[439](1)
  connect dend[444](0), dend[430](1)
  connect dend[445](0), dend[429](1)
  connect dend[446](0), dend[428](1)
  for i = 447, 448 connect dend[i](0), dend[i-1](1)
  connect dend[449](0), dend[447](1)
  connect dend[450](0), dend[446](1)
  for i = 451, 452 connect dend[i](0), dend[450](1)
  for i = 453, 454 connect dend[i](0), dend[452](1)
  connect dend[455](0), dend[427](1)
  for i = 456, 458 connect dend[i](0), dend[i-1](1)
  connect dend[459](0), dend[457](1)
  connect dend[460](0), dend[456](1)
  connect dend[461](0), dend[455](1)
  connect dend[462](0), dend[426](1)
  for i = 463, 464 connect dend[i](0), dend[i-1](1)
  connect dend[465](0), dend[463](1)
  for i = 466, 467 connect dend[i](0), dend[465](1)
  for i = 468, 469 connect dend[i](0), dend[467](1)
  connect dend[470](0), dend[462](1)
  for i = 471, 472 connect dend[i](0), dend[i-1](1)
  connect dend[473](0), dend[471](1)
  connect dend[474](0), dend[470](1)
  for i = 475, 476 connect dend[i](0), dend[474](1)
  connect dend[477](0), dend[425](1)
  connect dend[478](0), dend[2](1)
  for i = 479, 491 connect dend[i](0), dend[i-1](1)
  connect dend[492](0), dend[490](1)
  connect dend[493](0), dend[489](1)
  connect dend[494](0), dend[488](1)
  connect dend[495](0), dend[487](1)
  connect dend[496](0), dend[486](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)
  connect dend[501](0), dend[485](1)
  for i = 502, 503 connect dend[i](0), dend[i-1](1)
  connect dend[504](0), dend[502](1)
  for i = 505, 506 connect dend[i](0), dend[504](1)
  connect dend[507](0), dend[501](1)
  connect dend[508](0), dend[484](1)
  for i = 509, 510 connect dend[i](0), dend[508](1)
  connect dend[511](0), dend[483](1)
  for i = 512, 513 connect dend[i](0), dend[i-1](1)
  connect dend[514](0), dend[512](1)
  for i = 515, 516 connect dend[i](0), dend[514](1)
  for i = 517, 518 connect dend[i](0), dend[516](1)
  connect dend[519](0), dend[511](1)
  connect dend[520](0), dend[482](1)
  for i = 521, 524 connect dend[i](0), dend[i-1](1)
  connect dend[525](0), dend[523](1)
  connect dend[526](0), dend[522](1)
  connect dend[527](0), dend[521](1)
  for i = 528, 529 connect dend[i](0), dend[527](1)
  connect dend[530](0), dend[520](1)
  for i = 531, 532 connect dend[i](0), dend[530](1)
  for i = 533, 534 connect dend[i](0), dend[532](1)
  connect dend[535](0), dend[481](1)
  for i = 536, 537 connect dend[i](0), dend[i-1](1)
  connect dend[538](0), dend[536](1)
  connect dend[539](0), dend[535](1)
  for i = 540, 541 connect dend[i](0), dend[539](1)
  connect dend[542](0), dend[480](1)
  for i = 543, 548 connect dend[i](0), dend[i-1](1)
  connect dend[549](0), dend[547](1)
  connect dend[550](0), dend[546](1)
  connect dend[551](0), dend[545](1)
  connect dend[552](0), dend[544](1)
  for i = 553, 554 connect dend[i](0), dend[552](1)
  connect dend[555](0), dend[543](1)
  connect dend[556](0), dend[542](1)
  for i = 557, 558 connect dend[i](0), dend[556](1)
  connect dend[559](0), dend[479](1)
  for i = 560, 561 connect dend[i](0), dend[559](1)
  for i = 562, 563 connect dend[i](0), dend[i-1](1)
  connect dend[564](0), dend[562](1)
  connect dend[565](0), dend[561](1)
  connect dend[566](0), dend[478](1)
  for i = 567, 568 connect dend[i](0), dend[566](1)
  connect dend[569](0), dend[1](1)
  for i = 570, 576 connect dend[i](0), dend[i-1](1)
  connect dend[577](0), dend[575](1)
  for i = 578, 579 connect dend[i](0), dend[577](1)
  connect dend[580](0), dend[574](1)
  for i = 581, 582 connect dend[i](0), dend[i-1](1)
  connect dend[583](0), dend[581](1)
  connect dend[584](0), dend[580](1)
  connect dend[585](0), dend[573](1)
  connect dend[586](0), dend[572](1)
  for i = 587, 588 connect dend[i](0), dend[586](1)
  connect dend[589](0), dend[571](1)
  for i = 590, 591 connect dend[i](0), dend[i-1](1)
  connect dend[592](0), dend[590](1)
  for i = 593, 594 connect dend[i](0), dend[i-1](1)
  connect dend[595](0), dend[593](1)
  connect dend[596](0), dend[592](1)
  connect dend[597](0), dend[589](1)
  for i = 598, 599 connect dend[i](0), dend[i-1](1)
  connect dend[600](0), dend[598](1)
  for i = 601, 602 connect dend[i](0), dend[600](1)
  connect dend[603](0), dend[597](1)
  for i = 604, 605 connect dend[i](0), dend[603](1)
  connect dend[606](0), dend[570](1)
  for i = 607, 608 connect dend[i](0), dend[i-1](1)
  connect dend[609](0), dend[607](1)
  connect dend[610](0), dend[606](1)
  for i = 611, 612 connect dend[i](0), dend[i-1](1)
  connect dend[613](0), dend[611](1)
  for i = 614, 615 connect dend[i](0), dend[i-1](1)
  connect dend[616](0), dend[614](1)
  connect dend[617](0), dend[613](1)
  connect dend[618](0), dend[610](1)
  for i = 619, 620 connect dend[i](0), dend[i-1](1)
  connect dend[621](0), dend[619](1)
  connect dend[622](0), dend[618](1)
  connect dend[623](0), dend[569](1)
  for i = 624, 625 connect dend[i](0), dend[623](1)
  for i = 626, 627 connect dend[i](0), dend[625](1)
  for i = 628, 629 connect dend[i](0), dend[627](1)
  connect dend[630](0), dend(1)
  for i = 631, 636 connect dend[i](0), dend[i-1](1)
  connect dend[637](0), dend[635](1)
  connect dend[638](0), dend[634](1)
  connect dend[639](0), dend[633](1)
  connect dend[640](0), dend[632](1)
  for i = 641, 644 connect dend[i](0), dend[i-1](1)
  connect dend[645](0), dend[643](1)
  connect dend[646](0), dend[642](1)
  for i = 647, 648 connect dend[i](0), dend[646](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, 654 connect dend[i](0), dend[652](1)
  for i = 655, 656 connect dend[i](0), dend[654](1)
  connect dend[657](0), dend[641](1)
  connect dend[658](0), dend[640](1)
  connect dend[659](0), dend[631](1)
  for i = 660, 661 connect dend[i](0), dend[i-1](1)
  connect dend[662](0), dend[660](1)
  connect dend[663](0), dend[659](1)
  topol_2()
}
proc topol_2() {
  for i = 664, 667 connect dend[i](0), dend[i-1](1)
  connect dend[668](0), dend[666](1)
  connect dend[669](0), dend[665](1)
  for i = 670, 671 connect dend[i](0), dend[i-1](1)
  connect dend[672](0), dend[670](1)
  connect dend[673](0), dend[669](1)
  connect dend[674](0), dend[664](1)
  for i = 675, 676 connect dend[i](0), dend[674](1)
  connect dend[677](0), dend[663](1)
  for i = 678, 680 connect dend[i](0), dend[i-1](1)
  connect dend[681](0), dend[679](1)
  connect dend[682](0), dend[678](1)
  for i = 683, 684 connect dend[i](0), dend[i-1](1)
  connect dend[685](0), dend[683](1)
  for i = 686, 687 connect dend[i](0), dend[685](1)
  connect dend[688](0), dend[682](1)
  for i = 689, 690 connect dend[i](0), dend[688](1)
  connect dend[691](0), dend[677](1)
  for i = 692, 693 connect dend[i](0), dend[691](1)
  connect dend[694](0), dend[630](1)
  for i = 695, 696 connect dend[i](0), dend[694](1)
  for i = 697, 698 connect dend[i](0), dend[696](1)
  for i = 699, 700 connect dend[i](0), dend[698](1)
  connect dend[701](0), dend[0](0)
  for i = 702, 706 connect dend[i](0), dend[i-1](1)
  connect dend[707](0), dend[705](1)
  connect dend[708](0), dend[704](1)
  for i = 709, 710 connect dend[i](0), dend[708](1)
  connect dend[711](0), dend[703](1)
  connect dend[712](0), dend[702](1)
  connect dend[713](0), dend[701](1)
  for i = 714, 715 connect dend[i](0), dend[713](1)
  basic_shape()
}
proc shape3d_1() {
  soma {pt3dclear()
	pt3dadd(-3.97, 21.11, -6.25, 17.754)
	pt3dadd(-3.97, 29.98, -6.25, 17.754)
  }
  soma[1] {pt3dclear()
	pt3dadd(-3.97, 21.11, -6.25, 17.754)
	pt3dadd(-3.97, 12.23, -6.25, 17.754)
  }
  dend {pt3dclear()
	pt3dadd(-3.97, 21.11, -6.25, 1.5)
	pt3dadd(-6.45, 35.6, -6.25, 1.5)
	pt3dadd(-6.51, 38.47, -6.5, 1.87)
	pt3dadd(-6.45, 41.21, -6.5, 1.87)
	pt3dadd(-5.77, 43.7, -6.5, 1.87)
	pt3dadd(-4.88, 46.2, -6.5, 1.87)
	pt3dadd(-3.77, 48.32, -6.5, 2.06)
	pt3dadd(-1.71, 50, -6.5, 2.74)
	pt3dadd(-1.71, 50.19, -6.5, 2.74)
  }
  dend[1] {pt3dclear()
	pt3dadd(-1.71, 50.19, -6.5, 2.74)
	pt3dadd(-1.28, 51.93, -6.5, 2.37)
	pt3dadd(-0.72, 55.05, -6.5, 2)
	pt3dadd(-0.65, 58.1, -6.5, 1.75)
	pt3dadd(-0.9, 60.54, -6.75, 1.87)
	pt3dadd(-1.65, 63.65, -6.75, 1.87)
	pt3dadd(-2.46, 65.84, -7, 2)
	pt3dadd(-3.4, 68.27, -7, 2.37)
	pt3dadd(-4.33, 70.51, -7, 2.56)
	pt3dadd(-5.07, 72.76, -7, 2.56)
  }
  dend[2] {pt3dclear()
	pt3dadd(-5.07, 72.76, -7, 2.56)
	pt3dadd(-4.97, 76.09, -7, 3.43)
  }
  dend[3] {pt3dclear()
	pt3dadd(-4.97, 76.09, -7, 3.43)
	pt3dadd(-3.65, 77.93, -7, 3.12)
	pt3dadd(-2.96, 80.36, -7, 2)
	pt3dadd(-2.09, 82.48, -6.75, 2.18)
	pt3dadd(-1.14, 84.54, -6.75, 2.68)
	pt3dadd(-0.06, 85.73, -6.75, 2.68)
  }
  dend[4] {pt3dclear()
	pt3dadd(-0.06, 85.73, -6.75, 2.68)
	pt3dadd(1.9, 87.41, -6.75, 3.12)
	pt3dadd(4.16, 89.21, -6.75, 3.12)
  }
  dend[5] {pt3dclear()
	pt3dadd(4.16, 89.21, -6.75, 3.12)
	pt3dadd(5.46, 90.4, -6.5, 2.81)
	pt3dadd(7.64, 92.39, -6.5, 3.05)
	pt3dadd(10.71, 94.53, -6.5, 3.05)
  }
  dend[6] {pt3dclear()
	pt3dadd(10.71, 94.53, -6.5, 3.05)
	pt3dadd(10.77, 95.62, -6.5, 4.49)
	pt3dadd(11.07, 98.19, -6.5, 2.68)
	pt3dadd(11.63, 100.3, -6.5, 2.31)
	pt3dadd(12.13, 102.6, -6.5, 2.31)
  }
  dend[7] {pt3dclear()
	pt3dadd(12.13, 102.6, -6.5, 2.31)
	pt3dadd(12.38, 103.6, -6.25, 3.3)
	pt3dadd(12.72, 104.4, -6.25, 3.3)
  }
  dend[8] {pt3dclear()
	pt3dadd(12.72, 104.4, -6.25, 3.3)
	pt3dadd(13.62, 106.9, -6.25, 1.87)
	pt3dadd(14.06, 109.2, -6.25, 2.37)
	pt3dadd(15.07, 110.4, -6.25, 2.37)
  }
  dend[9] {pt3dclear()
	pt3dadd(15.07, 110.4, -6.25, 2.37)
	pt3dadd(15.93, 111.5, -5.75, 2.37)
	pt3dadd(17.86, 113.6, -5.75, 2.37)
	pt3dadd(20.48, 116.5, -5.75, 2.37)
  }
  dend[10] {pt3dclear()
	pt3dadd(20.48, 116.5, -5.75, 2.37)
	pt3dadd(22.1, 116.8, -5.5, 1.5)
	pt3dadd(24.47, 118.2, -5.5, 1.31)
	pt3dadd(25.19, 118.7, -5.5, 1.31)
  }
  dend[11] {pt3dclear()
	pt3dadd(25.19, 118.7, -5.5, 1.31)
	pt3dadd(25.84, 119.2, -5.25, 2.18)
	pt3dadd(27.09, 121.5, -5, 1.06)
	pt3dadd(28.4, 123.4, -5, 1.06)
	pt3dadd(29.46, 124.8, -5, 1.06)
	pt3dadd(30.52, 126.2, -5, 1.06)
	pt3dadd(31.58, 127.6, -5, 1.06)
	pt3dadd(32.57, 129.3, -5, 1.06)
	pt3dadd(33.45, 130.1, -5, 1.06)
	pt3dadd(33.99, 130.69, -5, 1.06)
  }
  dend[12] {pt3dclear()
	pt3dadd(33.99, 130.69, -5, 1.06)
	pt3dadd(34.2, 130.9, -5, 1.06)
	pt3dadd(34.69, 131.9, -4.75, 1.18)
	pt3dadd(35.51, 133.3, -4.75, 1.31)
	pt3dadd(36.04, 133.8, -4.75, 1.31)
  }
  dend[13] {pt3dclear()
	pt3dadd(36.04, 133.8, -4.75, 1.31)
	pt3dadd(36.75, 134.19, -4.5, 1.31)
	pt3dadd(38, 134.8, -4.5, 1.12)
	pt3dadd(39.36, 135.5, -4.5, 0.94)
	pt3dadd(40.49, 136.19, -4.25, 0.87)
	pt3dadd(41.86, 137.3, -4.25, 0.87)
	pt3dadd(42.61, 138, -4, 1)
	pt3dadd(43.03, 138.19, -4, 1)
  }
  dend[14] {pt3dclear()
	pt3dadd(43.03, 138.19, -4, 1)
	pt3dadd(44.5, 138.4, -3.5, 1)
	pt3dadd(46.68, 138.6, -3.5, 1)
	pt3dadd(47.68, 139.69, -3.5, 0.69)
	pt3dadd(48.74, 140.69, -3.25, 0.69)
	pt3dadd(49.74, 141.69, -3, 0.81)
	pt3dadd(51.2, 142.19, -3, 0.81)
  }
  dend[15] {pt3dclear()
	pt3dadd(51.2, 142.19, -3, 0.81)
	pt3dadd(52.85, 142.4, -2.75, 0.87)
	pt3dadd(54.22, 142.6, -2.75, 0.87)
	pt3dadd(56.09, 142.9, -2.5, 0.87)
	pt3dadd(57.47, 143.4, -2.5, 0.87)
	pt3dadd(58.9, 144.6, -2.5, 0.87)
	pt3dadd(60.15, 146.1, -2, 1.06)
	pt3dadd(60.4, 147.1, -2.25, 1.06)
	pt3dadd(61.27, 148.1, -2.25, 1.06)
	pt3dadd(62.14, 148.19, -2.25, 1.06)
	pt3dadd(63.01, 148.8, -2, 0.87)
	pt3dadd(64.31, 149.4, -2, 1.25)
	pt3dadd(65.45, 149.19, -1.75, 1.25)
	pt3dadd(66.81, 148.6, -1.75, 0.81)
	pt3dadd(68.25, 147.8, -1.75, 0.75)
	pt3dadd(68.87, 147.1, -1.5, 0.75)
	pt3dadd(69.69, 146.19, -1.5, 0.75)
	pt3dadd(70.43, 145.1, -1.5, 0.75)
  }
  dend[16] {pt3dclear()
	pt3dadd(51.2, 142.19, -3, 0.81)
	pt3dadd(51.49, 143.1, -3, 0.72)
	pt3dadd(51.8, 144.19, -3, 0.51)
	pt3dadd(52, 145.19, -3, 0.51)
	pt3dadd(52.26, 145.9, -3, 0.51)
	pt3dadd(52.47, 147, -2.75, 0.56)
	pt3dadd(53.08, 147.9, -2.75, 0.56)
	pt3dadd(53.28, 148.69, -2.75, 0.56)
	pt3dadd(53.8, 149.4, -2.75, 0.56)
  }
  dend[17] {pt3dclear()
	pt3dadd(53.8, 149.4, -2.75, 0.56)
	pt3dadd(54.26, 148.8, -2.75, 0.56)
	pt3dadd(54.66, 148.4, -2.75, 0.56)
	pt3dadd(55.53, 148.19, -2.75, 0.56)
	pt3dadd(56.46, 148, -2.5, 0.46)
  }
  dend[18] {pt3dclear()
	pt3dadd(53.8, 149.4, -2.75, 0.56)
	pt3dadd(54.05, 150.4, -2.75, 0.46)
	pt3dadd(54.26, 151.19, -2.75, 0.46)
	pt3dadd(54.87, 152.1, -2.75, 0.46)
	pt3dadd(55.53, 152.4, -2.75, 0.46)
  }
  dend[19] {pt3dclear()
	pt3dadd(55.53, 152.4, -2.75, 0.46)
	pt3dadd(56.05, 152, -2.75, 0.46)
	pt3dadd(56.35, 151.19, -2.75, 0.46)
	pt3dadd(57.07, 150.9, -2.75, 0.31)
	pt3dadd(57.79, 150.69, -2.75, 0.31)
	pt3dadd(58.4, 150.9, -2.75, 0.31)
	pt3dadd(58.96, 151.1, -2.75, 0.31)
  }
  dend[20] {pt3dclear()
	pt3dadd(55.53, 152.4, -2.75, 0.46)
	pt3dadd(55.74, 153.3, -3, 0.46)
	pt3dadd(56.25, 154.1, -3, 0.46)
	pt3dadd(56.35, 154.69, -2.75, 0.46)
	pt3dadd(56.71, 155.1, -2.75, 0.46)
	pt3dadd(57.17, 155.9, -2.75, 0.46)
	pt3dadd(57.32, 156.3, -2.75, 0.46)
  }
  dend[21] {pt3dclear()
	pt3dadd(57.32, 156.3, -2.75, 0.46)
	pt3dadd(57.53, 157.3, -2.75, 0.46)
	pt3dadd(57.99, 158.1, -2.75, 0.46)
	pt3dadd(58.4, 158.8, -2.75, 0.46)
	pt3dadd(59.06, 159.8, -2.75, 0.46)
	pt3dadd(59.32, 160.69, -2.5, 0.46)
  }
  dend[22] {pt3dclear()
	pt3dadd(57.32, 156.3, -2.75, 0.46)
	pt3dadd(57.84, 156.19, -2.75, 0.46)
	pt3dadd(58.4, 156.19, -2.5, 0.46)
	pt3dadd(58.86, 156.6, -2.5, 0.46)
	pt3dadd(59.47, 157, -2.25, 0.46)
	pt3dadd(60.14, 157.5, -2.25, 0.46)
	pt3dadd(60.55, 158, -2, 0.46)
	pt3dadd(60.91, 158.5, -1.75, 0.46)
	pt3dadd(61.06, 159.5, -1.5, 0.46)
	pt3dadd(61.37, 160.19, -1.5, 0.46)
	pt3dadd(61.52, 161, -1.25, 0.46)
  }
  dend[23] {pt3dclear()
	pt3dadd(43.03, 138.19, -4, 1)
	pt3dadd(43.21, 139.3, -4, 0.97)
	pt3dadd(43.41, 140.3, -3.75, 0.77)
	pt3dadd(43.56, 141.1, -3.75, 0.56)
	pt3dadd(43.77, 141.9, -3.75, 0.56)
	pt3dadd(44.08, 142.69, -3.75, 0.56)
	pt3dadd(44.59, 143.5, -3.75, 0.72)
	pt3dadd(45.09, 144.1, -3.75, 0.72)
  }
  dend[24] {pt3dclear()
	pt3dadd(45.09, 144.1, -3.75, 0.72)
	pt3dadd(45.87, 144.6, -3.75, 0.67)
	pt3dadd(46.52, 144.69, -3.75, 0.67)
  }
  dend[25] {pt3dclear()
	pt3dadd(46.52, 144.69, -3.75, 0.67)
	pt3dadd(47.3, 144.6, -3.75, 0.67)
	pt3dadd(48.12, 144.3, -3.75, 0.67)
	pt3dadd(48.88, 144.4, -3.5, 0.56)
	pt3dadd(49.55, 144.6, -3.5, 0.56)
	pt3dadd(50.37, 144.9, -3.5, 0.67)
	pt3dadd(51.6, 145.3, -3.5, 0.67)
	pt3dadd(52.31, 145.4, -3.5, 0.61)
	pt3dadd(53.18, 145.5, -3.5, 0.61)
	pt3dadd(53.74, 145.5, -3.5, 0.61)
	pt3dadd(54.36, 145.69, -3.25, 0.61)
	pt3dadd(55.07, 146.19, -3.25, 0.61)
	pt3dadd(55.84, 146.19, -3.25, 0.61)
	pt3dadd(56.76, 145.9, -3.25, 0.61)
	pt3dadd(57.32, 145.8, -3.25, 0.61)
	pt3dadd(58.19, 145.8, -3, 0.61)
	pt3dadd(59.17, 146.1, -3, 0.61)
	pt3dadd(59.93, 146.4, -3, 0.61)
	pt3dadd(60.55, 146.69, -3, 0.61)
	pt3dadd(61.57, 147, -3, 0.61)
  }
  dend[26] {pt3dclear()
	pt3dadd(46.52, 144.69, -3.75, 0.67)
	pt3dadd(47.01, 145.3, -4, 0.36)
	pt3dadd(47.58, 145.8, -4, 0.36)
	pt3dadd(48.29, 146.6, -4, 0.36)
	pt3dadd(48.75, 147.19, -3.75, 0.36)
	pt3dadd(49.37, 147.6, -3.75, 0.36)
	pt3dadd(49.83, 148.1, -3.75, 0.36)
	pt3dadd(50.54, 148.6, -3.75, 0.36)
	pt3dadd(50.9, 149.3, -3.75, 0.36)
	pt3dadd(51.41, 149.9, -3.5, 0.51)
	pt3dadd(52.08, 150.3, -3.5, 0.51)
	pt3dadd(52.49, 151, -3.5, 0.51)
	pt3dadd(52.85, 151.8, -3.25, 0.51)
  }
}
proc shape3d_2() {
  dend[26] {	pt3dadd(53.2, 152.8, -3.25, 0.51)
	pt3dadd(53.46, 153.69, -3.25, 0.51)
	pt3dadd(53.56, 154.6, -3.25, 0.51)
	pt3dadd(53.46, 155.3, -3.25, 0.51)
	pt3dadd(53.46, 156.19, -3.25, 0.51)
	pt3dadd(53.2, 156.9, -3.5, 0.51)
  }
  dend[27] {pt3dclear()
	pt3dadd(45.09, 144.1, -3.75, 0.72)
	pt3dadd(44.59, 144.5, -3.75, 0.67)
	pt3dadd(44.33, 145.1, -3.75, 0.61)
	pt3dadd(44.28, 145.6, -3.75, 0.61)
	pt3dadd(44.43, 146.4, -3.75, 0.61)
	pt3dadd(44.69, 146.8, -3.75, 0.61)
	pt3dadd(45.71, 148.19, -3.75, 0.61)
	pt3dadd(46.02, 148.6, -3.75, 0.61)
	pt3dadd(46.22, 149.5, -3.75, 0.61)
	pt3dadd(46.84, 150.6, -3.5, 0.61)
	pt3dadd(47.04, 151.19, -3.5, 0.61)
	pt3dadd(47.5, 152.19, -3.5, 0.61)
	pt3dadd(47.81, 153.1, -3.5, 0.61)
	pt3dadd(47.96, 154.1, -3.5, 0.61)
	pt3dadd(48.07, 155, -3.5, 0.61)
  }
  dend[28] {pt3dclear()
	pt3dadd(48.07, 155, -3.5, 0.61)
	pt3dadd(48.73, 155.69, -3.25, 0.36)
	pt3dadd(49.29, 156.4, -3.25, 0.36)
	pt3dadd(49.7, 157.3, -3.25, 0.26)
	pt3dadd(49.96, 157.9, -3.25, 0.26)
	pt3dadd(50.27, 158.5, -3.25, 0.26)
	pt3dadd(50.67, 159.1, -3.25, 0.26)
	pt3dadd(51.19, 159.5, -3.25, 0.26)
	pt3dadd(51.65, 159.9, -3.25, 0.26)
	pt3dadd(52.41, 160.4, -3.25, 0.26)
	pt3dadd(52.62, 160.9, -3, 0.26)
  }
  dend[29] {pt3dclear()
	pt3dadd(52.62, 160.9, -3, 0.26)
	pt3dadd(53.44, 160.8, -3, 0.26)
	pt3dadd(53.85, 160.8, -3, 0.26)
	pt3dadd(54.2, 161, -3, 0.26)
	pt3dadd(55.18, 161.4, -3, 0.26)
	pt3dadd(55.69, 161.9, -2.75, 0.26)
  }
  dend[30] {pt3dclear()
	pt3dadd(55.69, 161.9, -2.75, 0.26)
	pt3dadd(55.64, 162.6, -2.5, 0.26)
	pt3dadd(55.99, 163.6, -2.5, 0.26)
	pt3dadd(56.25, 164.3, -2.5, 0.26)
	pt3dadd(56.46, 165.1, -2.5, 0.26)
	pt3dadd(56.61, 165.5, -2.5, 0.26)
	pt3dadd(56.92, 166.1, -2.25, 0.26)
  }
  dend[31] {pt3dclear()
	pt3dadd(55.69, 161.9, -2.75, 0.26)
	pt3dadd(56.25, 161.8, -2.75, 0.26)
	pt3dadd(56.97, 161.8, -2.5, 0.26)
	pt3dadd(57.53, 161.9, -2.5, 0.26)
	pt3dadd(58.09, 162.19, -2.25, 0.26)
	pt3dadd(58.86, 162.8, -2.25, 0.26)
	pt3dadd(59.27, 163.1, -2.25, 0.26)
	pt3dadd(59.78, 163.69, -2.5, 0.26)
  }
  dend[32] {pt3dclear()
	pt3dadd(52.62, 160.9, -3, 0.26)
	pt3dadd(52.67, 161.6, -3, 0.36)
	pt3dadd(52.62, 162.3, -3, 0.36)
	pt3dadd(52.82, 162.8, -3, 0.36)
	pt3dadd(53.18, 163.4, -3, 0.36)
	pt3dadd(53.59, 164.2, -2.75, 0.36)
	pt3dadd(54.26, 164.9, -2.75, 0.36)
	pt3dadd(54.77, 165.6, -2.75, 0.36)
	pt3dadd(55.23, 166.4, -2.5, 0.36)
	pt3dadd(55.43, 167.2, -2.5, 0.36)
	pt3dadd(55.33, 168, -2.5, 0.46)
	pt3dadd(55.23, 168.7, -2.5, 0.46)
	pt3dadd(54.92, 169.5, -2.5, 0.26)
	pt3dadd(54.41, 170.2, -2.5, 0.26)
	pt3dadd(54.15, 170.7, -2.5, 0.26)
  }
  dend[33] {pt3dclear()
	pt3dadd(48.07, 155, -3.5, 0.61)
	pt3dadd(48.12, 156.1, -3.5, 0.72)
	pt3dadd(48.12, 157.1, -3.5, 0.56)
	pt3dadd(48.01, 157.8, -3.5, 0.56)
	pt3dadd(48.07, 158.9, -3.25, 0.56)
	pt3dadd(48.12, 159.6, -3.25, 0.56)
	pt3dadd(48.22, 160.6, -3.25, 0.51)
	pt3dadd(48.58, 161.5, -3, 0.51)
	pt3dadd(48.94, 162.3, -3, 0.51)
	pt3dadd(49.29, 163, -3, 0.51)
	pt3dadd(49.55, 163.9, -2.75, 0.51)
	pt3dadd(49.34, 164.9, -2.75, 0.51)
	pt3dadd(49.91, 165.6, -2.5, 0.51)
	pt3dadd(50.42, 166.1, -2.5, 0.41)
	pt3dadd(51.08, 166.8, -2.5, 0.41)
	pt3dadd(51.7, 167.3, -2.5, 0.36)
	pt3dadd(52.47, 167.7, -2.5, 0.36)
	pt3dadd(53.03, 168.3, -2.25, 0.36)
	pt3dadd(53.85, 168.2, -2.25, 0.36)
	pt3dadd(54.61, 168.3, -2, 0.36)
  }
  dend[34] {pt3dclear()
	pt3dadd(36.04, 133.8, -4.75, 1.31)
	pt3dadd(35.79, 134.6, -4.5, 1.02)
	pt3dadd(35.38, 136.3, -4.5, 1.02)
  }
  dend[35] {pt3dclear()
	pt3dadd(35.38, 136.3, -4.5, 1.02)
	pt3dadd(36.04, 136.6, -4.5, 0.51)
	pt3dadd(36.81, 137.1, -4.5, 0.41)
	pt3dadd(37.32, 137.6, -4.5, 0.36)
	pt3dadd(38.04, 138, -4.5, 0.36)
	pt3dadd(38.54, 138.6, -4.5, 0.36)
  }
  dend[36] {pt3dclear()
	pt3dadd(38.54, 138.6, -4.5, 0.36)
	pt3dadd(39.22, 138.69, -4.5, 0.46)
	pt3dadd(39.57, 139, -4.5, 0.46)
	pt3dadd(40.24, 139.19, -4.5, 0.46)
	pt3dadd(40.54, 139.6, -4.5, 0.46)
	pt3dadd(40.7, 140, -4.5, 0.46)
	pt3dadd(40.9, 140.6, -4.5, 0.46)
	pt3dadd(41.47, 140.9, -4.5, 0.46)
	pt3dadd(41.98, 141.5, -4.25, 0.46)
	pt3dadd(42.39, 142.1, -4.25, 0.46)
	pt3dadd(42.9, 142.6, -4.25, 0.46)
	pt3dadd(43.21, 143.4, -4.25, 0.51)
	pt3dadd(43.72, 144, -4.25, 0.51)
	pt3dadd(44.18, 144.6, -4.25, 0.51)
	pt3dadd(44.28, 145.19, -4.25, 0.51)
	pt3dadd(44.48, 145.8, -4.25, 0.51)
	pt3dadd(45.05, 146.4, -4.25, 0.51)
	pt3dadd(45.81, 146.69, -4.25, 0.51)
	pt3dadd(46.58, 146.8, -4.25, 0.51)
  }
  dend[37] {pt3dclear()
	pt3dadd(38.54, 138.6, -4.5, 0.36)
	pt3dadd(38.5, 139.5, -4.5, 0.51)
	pt3dadd(38.5, 140.1, -4.5, 0.46)
	pt3dadd(38.45, 140.69, -4.5, 0.46)
	pt3dadd(38.6, 141.3, -4.5, 0.46)
	pt3dadd(38.7, 141.9, -4.5, 0.46)
	pt3dadd(39.15, 142.5, -4.5, 0.46)
	pt3dadd(39.47, 143.3, -4.5, 0.46)
	pt3dadd(39.72, 143.69, -4.5, 0.46)
	pt3dadd(39.88, 144.1, -4.5, 0.46)
	pt3dadd(40.29, 144.69, -4.25, 0.46)
	pt3dadd(40.9, 145.19, -4.25, 0.46)
	pt3dadd(41.26, 145.6, -4.25, 0.46)
	pt3dadd(41.93, 146.1, -4.25, 0.46)
	pt3dadd(42.44, 146.8, -4.25, 0.46)
	pt3dadd(42.9, 147.3, -4, 0.46)
	pt3dadd(43.36, 148, -4, 0.46)
	pt3dadd(43.67, 148.5, -4, 0.46)
	pt3dadd(44.08, 149.19, -4, 0.18)
	pt3dadd(44.43, 149.69, -4, 0.18)
	pt3dadd(44.79, 150.4, -4, 0.18)
	pt3dadd(45.1, 151.19, -4, 0.18)
	pt3dadd(45.46, 152, -3.75, 0.18)
	pt3dadd(45.87, 153, -3.75, 0.18)
	pt3dadd(46.02, 153.8, -3.75, 0.26)
  }
  dend[38] {pt3dclear()
	pt3dadd(35.38, 136.3, -4.5, 1.02)
	pt3dadd(35.02, 136.8, -4.5, 0.46)
	pt3dadd(34.82, 137.3, -4.5, 0.46)
	pt3dadd(34.51, 137.8, -4.5, 0.46)
	pt3dadd(34.25, 138.69, -4.5, 0.46)
	pt3dadd(34.2, 139.1, -4.5, 0.61)
	pt3dadd(34.46, 140.19, -4.5, 0.77)
	pt3dadd(34.77, 140.9, -4.5, 0.67)
	pt3dadd(35.43, 141.8, -4.25, 0.67)
	pt3dadd(36.1, 142.3, -4.25, 0.67)
	pt3dadd(36.9, 143, -4.25, 0.67)
	pt3dadd(37.32, 143.19, -4.25, 0.67)
	pt3dadd(38.14, 143.9, -4, 0.61)
	pt3dadd(39.11, 144.9, -4, 0.61)
	pt3dadd(39.78, 145.8, -3.75, 0.61)
	pt3dadd(39.93, 146.69, -3.75, 0.61)
  }
  dend[39] {pt3dclear()
	pt3dadd(39.93, 146.69, -3.75, 0.61)
	pt3dadd(40.49, 147.1, -3.75, 0.46)
	pt3dadd(41.01, 147.8, -3.75, 0.46)
	pt3dadd(41.62, 148.4, -3.75, 0.46)
	pt3dadd(42.23, 149.4, -3.75, 0.46)
	pt3dadd(42.44, 150, -3.75, 0.46)
	pt3dadd(42.59, 150.5, -3.75, 0.46)
	pt3dadd(42.9, 151.5, -3.75, 0.46)
	pt3dadd(43.36, 152.19, -3.75, 0.46)
	pt3dadd(43.15, 152.69, -3.75, 0.46)
	pt3dadd(42.95, 153.69, -3.75, 0.46)
	pt3dadd(42.95, 154.69, -3.75, 0.46)
	pt3dadd(42.85, 155.4, -3.75, 0.46)
	pt3dadd(43, 156.1, -3.75, 0.41)
	pt3dadd(43.51, 156.8, -3.75, 0.41)
	pt3dadd(43.92, 157.69, -3.75, 0.36)
	pt3dadd(44.48, 158.6, -3.75, 0.31)
	pt3dadd(44.84, 159.69, -3.5, 0.31)
	pt3dadd(45.3, 160.3, -3.5, 0.31)
	pt3dadd(45.61, 160.9, -3.5, 0.31)
	pt3dadd(45.97, 161.3, -3.5, 0.31)
	pt3dadd(46.28, 161.9, -3.5, 0.31)
	pt3dadd(46.58, 162.69, -3.5, 0.31)
	pt3dadd(46.63, 163.19, -3.5, 0.46)
	pt3dadd(46.48, 163.69, -3.5, 0.46)
	pt3dadd(46.02, 164.3, -3.5, 0.46)
  }
  dend[40] {pt3dclear()
	pt3dadd(39.93, 146.69, -3.75, 0.61)
	pt3dadd(39.78, 147.4, -3.75, 0.46)
	pt3dadd(39.78, 148.19, -3.75, 0.46)
	pt3dadd(39.83, 148.8, -3.75, 0.46)
	pt3dadd(39.63, 149.5, -4, 0.46)
	pt3dadd(39.78, 150.19, -4, 0.46)
	pt3dadd(39.83, 150.69, -4, 0.46)
	pt3dadd(39.93, 151.4, -4, 0.46)
	pt3dadd(39.88, 151.9, -4, 0.46)
	pt3dadd(40.03, 152.5, -4, 0.46)
	pt3dadd(40.29, 153.19, -4, 0.46)
	pt3dadd(40.24, 153.9, -3.75, 0.46)
	pt3dadd(40.19, 154.6, -3.75, 0.46)
	pt3dadd(39.97, 155.1, -3.75, 0.36)
	pt3dadd(39.97, 155.6, -3.75, 0.36)
	pt3dadd(40.14, 156, -3.75, 0.46)
	pt3dadd(40.39, 156.69, -3.75, 0.46)
  }
}
proc shape3d_3() {
  dend[40] {	pt3dadd(40.49, 157.3, -3.75, 0.46)
	pt3dadd(40.85, 157.8, -3.5, 0.26)
	pt3dadd(41.01, 158.6, -3.5, 0.26)
	pt3dadd(41.01, 159.4, -3.5, 0.26)
	pt3dadd(40.9, 160.19, -3.5, 0.26)
	pt3dadd(40.9, 160.8, -3.5, 0.41)
	pt3dadd(41.11, 161.6, -3.5, 0.41)
	pt3dadd(40.75, 162, -3.5, 0.41)
	pt3dadd(40.24, 162.6, -3.5, 0.31)
	pt3dadd(39.47, 163.19, -3.5, 0.31)
  }
  dend[41] {pt3dclear()
	pt3dadd(39.47, 163.19, -3.5, 0.31)
	pt3dadd(38.6, 163.3, -3.25, 0.31)
	pt3dadd(37.68, 163.6, -3.25, 0.31)
	pt3dadd(36.97, 164.3, -3.25, 0.31)
	pt3dadd(36.81, 164.6, -3.25, 0.31)
	pt3dadd(36.15, 165.1, -3.25, 0.31)
	pt3dadd(35.99, 165.8, -3.25, 0.31)
	pt3dadd(35.74, 166.3, -3.25, 0.31)
  }
  dend[42] {pt3dclear()
	pt3dadd(39.47, 163.19, -3.5, 0.31)
	pt3dadd(40.29, 163.69, -3.5, 0.31)
	pt3dadd(40.7, 164.2, -3.5, 0.31)
	pt3dadd(41.06, 165.1, -3.25, 0.31)
	pt3dadd(41.31, 166.1, -3.25, 0.31)
	pt3dadd(41.62, 166.6, -3.25, 0.31)
	pt3dadd(42.39, 167.1, -3.25, 0.31)
  }
  dend[43] {pt3dclear()
	pt3dadd(33.99, 130.69, -5, 1.06)
	pt3dadd(35.14, 130.6, -4.5, 0.46)
	pt3dadd(36.88, 130.69, -4.5, 0.46)
	pt3dadd(38.4, 131.3, -4.5, 0.46)
	pt3dadd(39.95, 131.69, -4.25, 0.82)
	pt3dadd(41.48, 132, -4.25, 0.61)
	pt3dadd(43.02, 133.5, -4.25, 0.41)
	pt3dadd(44.14, 134.6, -4.25, 0.18)
	pt3dadd(45.27, 136.1, -4.25, 0.18)
	pt3dadd(46.19, 137.8, -4.25, 0.18)
	pt3dadd(46.71, 138.5, -4.25, 0.18)
  }
  dend[44] {pt3dclear()
	pt3dadd(46.71, 138.5, -4.25, 0.18)
	pt3dadd(47.52, 139.5, -4, 0.18)
	pt3dadd(48.03, 140.3, -4, 0.51)
	pt3dadd(49.87, 140.19, -3.75, 0.51)
	pt3dadd(51, 139.8, -3.75, 0.51)
	pt3dadd(52.63, 141.1, -3.5, 0.51)
	pt3dadd(54.58, 142.9, -3.25, 0.51)
  }
  dend[45] {pt3dclear()
	pt3dadd(46.71, 138.5, -4.25, 0.18)
	pt3dadd(47.17, 138, -3.25, 0.72)
	pt3dadd(47.79, 137.19, -3.25, 0.56)
	pt3dadd(48.55, 136.69, -3.25, 0.46)
	pt3dadd(49.58, 136.3, -3.25, 0.46)
	pt3dadd(50.7, 136.69, -3, 0.46)
	pt3dadd(51.67, 137, -3, 0.41)
	pt3dadd(52.75, 137.19, -3, 0.41)
	pt3dadd(53.41, 137.4, -2.75, 0.31)
	pt3dadd(54.79, 137.8, -2.75, 0.31)
	pt3dadd(55.61, 138.4, -2.5, 0.31)
	pt3dadd(56.99, 138.8, -2.25, 0.31)
	pt3dadd(57.97, 139.1, -2.25, 0.31)
	pt3dadd(59.24, 139.9, -2, 0.31)
	pt3dadd(60.32, 141, -2, 0.51)
	pt3dadd(61.14, 141.69, -1.75, 0.61)
	pt3dadd(62.42, 142.5, -1.5, 0.51)
	pt3dadd(64.09, 143.69, -1.5, 0.51)
	pt3dadd(64.81, 144.6, -1.25, 0.51)
  }
  dend[46] {pt3dclear()
	pt3dadd(64.81, 144.6, -1.25, 0.51)
	pt3dadd(64.88, 144.8, -1.25, 0.098)
  }
  dend[47] {pt3dclear()
	pt3dadd(64.88, 144.8, -1.25, 0.098)
	pt3dadd(65.13, 145.5, -1.25, 0.098)
	pt3dadd(65.54, 146.6, -1.25, 0.098)
	pt3dadd(65.54, 147.3, -1.25, 0.098)
	pt3dadd(65.59, 148.19, -1.25, 0.098)
	pt3dadd(65.79, 149.19, -1, 0.098)
	pt3dadd(65.95, 150.5, -1, 0.098)
	pt3dadd(66, 151.69, -1, 0.098)
	pt3dadd(66.7, 153.8, -0.75, 0.098)
	pt3dadd(66.05, 155.9, -0.75, 0.098)
  }
  dend[48] {pt3dclear()
	pt3dadd(64.88, 144.8, -1.25, 0.098)
	pt3dadd(66.05, 145.69, -1.25, 0.098)
	pt3dadd(67.38, 146.8, -1.25, 0.098)
	pt3dadd(68.2, 148, -1, 0.098)
	pt3dadd(68.76, 149.3, -0.75, 0.098)
	pt3dadd(69.58, 150.5, -0.75, 0.098)
  }
  dend[49] {pt3dclear()
	pt3dadd(64.81, 144.6, -1.25, 0.51)
	pt3dadd(66.34, 144.3, -1.25, 0.098)
	pt3dadd(67.68, 144.4, -1, 0.098)
	pt3dadd(68.95, 145.19, -1, 0.098)
	pt3dadd(69.98, 146.19, -1, 0.098)
	pt3dadd(71.42, 147.6, -0.75, 0.098)
  }
  dend[50] {pt3dclear()
	pt3dadd(25.19, 118.7, -5.5, 1.31)
	pt3dadd(26.47, 117.7, -5, 0.87)
	pt3dadd(27.59, 116.9, -5, 0.81)
  }
  dend[51] {pt3dclear()
	pt3dadd(27.59, 116.9, -5, 0.81)
	pt3dadd(27.94, 116.1, -5, 0.44)
  }
  dend[52] {pt3dclear()
	pt3dadd(27.94, 116.1, -5, 0.44)
	pt3dadd(28.02, 115.9, -5, 0.44)
	pt3dadd(28.27, 114.8, -5, 0.44)
	pt3dadd(28.46, 114, -5, 0.44)
	pt3dadd(28.9, 113.5, -5, 0.44)
	pt3dadd(29.58, 112.4, -5, 0.44)
  }
  dend[53] {pt3dclear()
	pt3dadd(29.58, 112.4, -5, 0.44)
	pt3dadd(29.4, 111.4, -5, 0.44)
	pt3dadd(29.64, 110.7, -5, 0.25)
	pt3dadd(29.52, 109, -5, 0.25)
	pt3dadd(29.52, 107.8, -5, 0.25)
	pt3dadd(29.58, 106.6, -5, 0.25)
	pt3dadd(29.46, 105.7, -5, 0.25)
	pt3dadd(28.96, 105, -5, 0.25)
	pt3dadd(28.83, 104.7, -5, 0.25)
  }
  dend[54] {pt3dclear()
	pt3dadd(28.83, 104.7, -5, 0.25)
	pt3dadd(28.71, 104.2, -5, 0.44)
	pt3dadd(28.83, 103.2, -5, 0.44)
	pt3dadd(28.77, 101.7, -5, 0.44)
	pt3dadd(28.58, 100.9, -5, 0.44)
  }
  dend[55] {pt3dclear()
	pt3dadd(28.58, 100.9, -5, 0.44)
	pt3dadd(28.21, 99.81, -5, 0.12)
	pt3dadd(28.15, 99.06, -5, 0.12)
	pt3dadd(28.02, 98.32, -5, 0.12)
	pt3dadd(28.09, 97.32, -5, 0.12)
	pt3dadd(27.9, 96.7, -5, 0.12)
  }
  dend[56] {pt3dclear()
	pt3dadd(28.58, 100.9, -5, 0.44)
	pt3dadd(29.21, 99.81, -5, 0.12)
	pt3dadd(29.52, 98.5, -5, 0.12)
	pt3dadd(29.96, 97.69, -5, 0.12)
	pt3dadd(29.77, 96.7, -5, 0.12)
	pt3dadd(29.52, 96.01, -5, 0.12)
  }
  dend[57] {pt3dclear()
	pt3dadd(28.83, 104.7, -5, 0.25)
	pt3dadd(28.31, 105.8, -5.25, 0.46)
	pt3dadd(28.21, 106.6, -5.25, 0.46)
	pt3dadd(27.85, 107.3, -5.25, 0.46)
	pt3dadd(27.65, 108.1, -5.25, 0.46)
	pt3dadd(27.44, 109.1, -5.5, 0.46)
	pt3dadd(26.93, 109.6, -5.5, 0.46)
	pt3dadd(26.21, 110.3, -5.5, 0.46)
	pt3dadd(25.24, 111.1, -5.5, 0.46)
	pt3dadd(24.52, 111.5, -5.5, 0.46)
	pt3dadd(24.17, 112.4, -5.5, 0.46)
	pt3dadd(23.91, 113.2, -5.5, 0.46)
	pt3dadd(23.66, 114, -5.5, 0.46)
	pt3dadd(23.91, 114.9, -5.5, 0.46)
	pt3dadd(24.01, 115.9, -5.5, 0.46)
	pt3dadd(23.96, 116.7, -5.75, 0.46)
	pt3dadd(23.76, 117.4, -5.75, 0.46)
	pt3dadd(23.45, 118.2, -5.75, 0.46)
	pt3dadd(23.25, 119.2, -5.75, 0.46)
	pt3dadd(22.79, 119.9, -5.75, 0.46)
	pt3dadd(22.22, 120.7, -5.75, 0.46)
	pt3dadd(21.81, 121.2, -5.75, 0.46)
	pt3dadd(21.61, 121.7, -5.75, 0.46)
  }
  dend[58] {pt3dclear()
	pt3dadd(29.58, 112.4, -5, 0.44)
	pt3dadd(30.46, 111.7, -4.75, 0.31)
	pt3dadd(31.52, 110.6, -4.75, 0.31)
	pt3dadd(32.26, 109.5, -4.75, 0.31)
  }
  dend[59] {pt3dclear()
	pt3dadd(27.94, 116.1, -5, 0.44)
	pt3dadd(28.52, 117.2, -5, 0.1898)
	pt3dadd(28.96, 118, -5, 0.12)
	pt3dadd(29.52, 118.8, -5, 0.12)
	pt3dadd(30.02, 119.9, -5, 0.12)
	pt3dadd(30.77, 120.8, -5, 0.12)
	pt3dadd(31.33, 121.6, -5, 0.12)
	pt3dadd(32.39, 122.3, -5, 0.25)
	pt3dadd(33.39, 122.9, -5, 0.25)
	pt3dadd(34.13, 123.5, -4.75, 0.25)
	pt3dadd(34.88, 124.3, -4.75, 0.25)
	pt3dadd(35.57, 125.4, -4.75, 0.1898)
	pt3dadd(36.25, 126, -4.75, 0.1898)
  }
  dend[60] {pt3dclear()
	pt3dadd(27.59, 116.9, -5, 0.81)
	pt3dadd(27.21, 115.8, -5.5, 0.1898)
	pt3dadd(27.09, 114.5, -5.5, 0.1898)
	pt3dadd(27.15, 112.9, -5.5, 0.1898)
  }
  dend[61] {pt3dclear()
	pt3dadd(20.48, 116.5, -5.75, 2.37)
	pt3dadd(20.18, 118.1, -5.5, 0.87)
	pt3dadd(20.37, 120, -5.5, 0.81)
	pt3dadd(20.87, 122.2, -5.5, 0.94)
	pt3dadd(21.45, 123.6, -5.5, 0.94)
  }
  dend[62] {pt3dclear()
	pt3dadd(21.45, 123.6, -5.5, 0.94)
	pt3dadd(22.05, 124.1, -5.5, 1.25)
	pt3dadd(22.49, 124.3, -5.25, 1.25)
	pt3dadd(23.36, 125.2, -5.25, 1.06)
	pt3dadd(24.42, 126.3, -5.25, 1.06)
	pt3dadd(25.42, 127.4, -5, 1.06)
	pt3dadd(26.17, 128.1, -5, 0.87)
	pt3dadd(27.1, 129, -5, 0.87)
	pt3dadd(27.91, 129.9, -5, 0.81)
	pt3dadd(28.73, 131.5, -4.75, 0.81)
	pt3dadd(29.29, 132.5, -4.75, 0.81)
	pt3dadd(29.47, 134, -4.75, 0.81)
	pt3dadd(29.66, 136.19, -4.75, 0.81)
	pt3dadd(29.66, 137.8, -4.75, 0.81)
	pt3dadd(29.66, 139.4, -4.75, 0.81)
	pt3dadd(29.57, 140.3, -4.75, 0.69)
	pt3dadd(29.63, 142, -4.75, 0.69)
	pt3dadd(30.13, 144.1, -4.5, 0.69)
	pt3dadd(30.5, 145.4, -4.5, 0.69)
	pt3dadd(30.25, 146.5, -4.25, 0.69)
	pt3dadd(29.69, 147.6, -4.25, 0.44)
	pt3dadd(29.25, 149.3, -4.25, 0.44)
	pt3dadd(29.01, 150.8, -4.25, 0.44)
	pt3dadd(28.82, 151.8, -4.25, 0.69)
	pt3dadd(28.63, 153.1, -4.25, 0.81)
	pt3dadd(28.51, 154.3, -4.25, 0.81)
	pt3dadd(28.57, 155.4, -4.25, 0.81)
	pt3dadd(28.57, 156.4, -4.25, 0.75)
  }
}
proc shape3d_4() {
  dend[62] {	pt3dadd(28.82, 157.69, -4.25, 0.75)
	pt3dadd(29.75, 158.5, -4.25, 0.75)
	pt3dadd(30.56, 159.5, -4, 0.56)
	pt3dadd(31.37, 160.1, -4, 0.5)
	pt3dadd(32.43, 160.8, -4, 0.44)
	pt3dadd(33.49, 161.69, -4, 0.44)
	pt3dadd(34.68, 162.5, -4, 0.44)
	pt3dadd(35.99, 163.19, -4, 0.44)
  }
  dend[63] {pt3dclear()
	pt3dadd(21.45, 123.6, -5.5, 0.94)
	pt3dadd(21.39, 124.7, -5.5, 0.61)
	pt3dadd(21.9, 127, -5.5, 0.41)
	pt3dadd(22.51, 129.1, -5.5, 0.61)
	pt3dadd(22.72, 130.9, -5.5, 0.72)
	pt3dadd(22.92, 133.1, -5.5, 0.72)
	pt3dadd(23.33, 135, -5.25, 0.82)
	pt3dadd(23.84, 137, -5.25, 0.82)
	pt3dadd(24.87, 138.6, -5.25, 0.92)
	pt3dadd(25.95, 139.69, -5.25, 0.92)
  }
  dend[64] {pt3dclear()
	pt3dadd(25.95, 139.69, -5.25, 0.92)
	pt3dadd(26.09, 142.4, -5.25, 0.72)
	pt3dadd(26.09, 145.9, -5.25, 0.72)
	pt3dadd(26.5, 148.3, -5.25, 0.72)
	pt3dadd(25.99, 150, -5.25, 0.72)
	pt3dadd(25.68, 151.8, -5.25, 0.72)
  }
  dend[65] {pt3dclear()
	pt3dadd(25.95, 139.69, -5.25, 0.92)
	pt3dadd(26.83, 139.4, -4.75, 0.41)
	pt3dadd(27.59, 139.9, -4.75, 0.41)
	pt3dadd(28.82, 140.69, -4.75, 0.41)
	pt3dadd(30.1, 140.69, -4.75, 0.41)
	pt3dadd(30.38, 140.5, -4.75, 0.41)
  }
  dend[66] {pt3dclear()
	pt3dadd(30.38, 140.5, -4.75, 0.41)
	pt3dadd(30.97, 139.9, -4.5, 0.41)
	pt3dadd(31.38, 139.1, -4.5, 0.41)
	pt3dadd(31.38, 138.19, -4.5, 0.41)
	pt3dadd(31.58, 137.3, -4.5, 0.41)
	pt3dadd(31.84, 136.6, -4.5, 0.41)
	pt3dadd(32.04, 136.19, -4.5, 0.41)
	pt3dadd(32.5, 135.6, -4.5, 0.41)
	pt3dadd(32.9, 135.1, -4.5, 0.41)
	pt3dadd(33.43, 134.69, -4.5, 0.41)
	pt3dadd(33.58, 134.19, -4.5, 0.41)
	pt3dadd(33.27, 133.3, -4.5, 0.41)
	pt3dadd(32.9, 132.6, -4.5, 0.41)
	pt3dadd(32.4, 131.6, -4.5, 0.41)
	pt3dadd(31.99, 131.3, -4.5, 0.41)
	pt3dadd(31.43, 130.4, -4.5, 0.41)
	pt3dadd(31.02, 129.8, -4.5, 0.41)
	pt3dadd(30.56, 129.4, -4.5, 0.41)
	pt3dadd(29.9, 128.4, -4.75, 0.41)
	pt3dadd(29.28, 127.8, -4.75, 0.41)
	pt3dadd(28.77, 127.6, -5, 0.41)
  }
  dend[67] {pt3dclear()
	pt3dadd(30.38, 140.5, -4.75, 0.41)
	pt3dadd(30.82, 140.8, -5.25, 0.41)
	pt3dadd(31.74, 141.1, -5.25, 0.41)
  }
  dend[68] {pt3dclear()
	pt3dadd(31.74, 141.1, -5.25, 0.41)
	pt3dadd(32.71, 140.69, -5.25, 0.41)
	pt3dadd(33.63, 140.1, -5, 0.41)
	pt3dadd(34.35, 140.19, -5, 0.41)
	pt3dadd(35.06, 140.5, -5, 0.41)
	pt3dadd(35.83, 140.8, -5, 0.41)
	pt3dadd(36.44, 141.5, -5, 0.41)
	pt3dadd(36.85, 142, -5, 0.41)
	pt3dadd(37.06, 142.8, -5, 0.41)
	pt3dadd(37.15, 143.5, -5, 0.41)
	pt3dadd(37.01, 144.3, -5, 0.41)
	pt3dadd(36.85, 145.19, -5, 0.41)
	pt3dadd(36.24, 145.4, -5, 0.41)
	pt3dadd(35.78, 145.6, -5, 0.41)
  }
  dend[69] {pt3dclear()
	pt3dadd(31.74, 141.1, -5.25, 0.41)
	pt3dadd(32.29, 141.8, -5, 0.41)
	pt3dadd(32.76, 142.5, -5, 0.41)
	pt3dadd(33.02, 143.1, -5, 0.41)
	pt3dadd(33.27, 143.9, -4.75, 0.41)
	pt3dadd(33.32, 144.3, -4.75, 0.41)
	pt3dadd(33.47, 145, -4.75, 0.41)
	pt3dadd(33.58, 145.69, -4.75, 0.41)
  }
  dend[70] {pt3dclear()
	pt3dadd(15.07, 110.4, -6.25, 2.37)
	pt3dadd(13.93, 112, -6, 2.12)
	pt3dadd(13.59, 113.1, -6, 2.12)
	pt3dadd(13.44, 113.5, -6, 1.31)
	pt3dadd(13.44, 115, -6, 0.94)
	pt3dadd(13.56, 117.1, -6, 1.06)
	pt3dadd(14.06, 119, -6, 1.25)
	pt3dadd(14.37, 120.8, -6, 1.25)
  }
  dend[71] {pt3dclear()
	pt3dadd(14.37, 120.8, -6, 1.25)
	pt3dadd(14.09, 121.5, -6, 1.68)
	pt3dadd(13.93, 122.4, -6.25, 1.12)
	pt3dadd(13.93, 123.8, -6.25, 0.81)
	pt3dadd(13.75, 125.1, -6.25, 1)
	pt3dadd(13.62, 126.8, -6.25, 1)
  }
  dend[72] {pt3dclear()
	pt3dadd(13.62, 126.8, -6.25, 1)
	pt3dadd(13.34, 127.6, -6.25, 1.56)
	pt3dadd(13.25, 127.9, -6.25, 1.12)
	pt3dadd(12.82, 129.3, -6.25, 0.81)
	pt3dadd(12.69, 130.4, -6.25, 0.69)
	pt3dadd(12.68, 131.6, -6.25, 0.69)
	pt3dadd(12.62, 132.8, -6.5, 0.94)
	pt3dadd(12.62, 133.69, -6.5, 0.94)
  }
  dend[73] {pt3dclear()
	pt3dadd(12.62, 133.69, -6.5, 0.94)
	pt3dadd(12.5, 134.6, -6.5, 1.87)
	pt3dadd(12.13, 135.6, -6.5, 1.06)
	pt3dadd(11.5, 137, -6.5, 1.31)
	pt3dadd(10.94, 138.19, -6.5, 1.56)
	pt3dadd(10.94, 138.6, -6.5, 1.56)
  }
  dend[74] {pt3dclear()
	pt3dadd(10.94, 138.6, -6.5, 1.56)
	pt3dadd(10.88, 139.3, -6.5, 1.18)
	pt3dadd(10.75, 140.19, -6.5, 1.06)
	pt3dadd(10.32, 141.3, -6.5, 1.06)
	pt3dadd(9.53, 142.6, -6.5, 1.06)
  }
  dend[75] {pt3dclear()
	pt3dadd(9.53, 142.6, -6.5, 1.06)
	pt3dadd(8.98, 143.19, -6.5, 1.06)
	pt3dadd(8.26, 143.69, -6.5, 0.87)
	pt3dadd(7.2, 144.1, -6.5, 0.87)
	pt3dadd(6.27, 144.69, -6.5, 0.87)
	pt3dadd(4.88, 145.69, -6.75, 0.87)
	pt3dadd(3.71, 146.6, -6.75, 1.06)
	pt3dadd(2.15, 147.6, -6.75, 1.18)
	pt3dadd(1.14, 147.9, -6.75, 1.18)
  }
  dend[76] {pt3dclear()
	pt3dadd(1.14, 147.9, -6.75, 1.18)
	pt3dadd(0.72, 148, -6.75, 1.18)
	pt3dadd(-0.9, 148.1, -7, 1.06)
	pt3dadd(-2.09, 148.9, -7, 1.31)
	pt3dadd(-3.02, 150, -7, 1.18)
	pt3dadd(-3.46, 151.1, -7, 1.06)
	pt3dadd(-3.9, 151.9, -7, 1.06)
	pt3dadd(-4.24, 152.5, -7, 1)
	pt3dadd(-4.4, 152.9, -7, 1)
  }
  dend[77] {pt3dclear()
	pt3dadd(-4.4, 152.9, -7, 1)
	pt3dadd(-4.63, 154.19, -7, 0.87)
	pt3dadd(-4.96, 155.9, -7, 0.87)
	pt3dadd(-5.39, 157.4, -7, 0.87)
	pt3dadd(-5.46, 158.69, -7, 0.87)
	pt3dadd(-5.52, 159.19, -7, 1)
	pt3dadd(-6.33, 159.9, -7, 0.87)
	pt3dadd(-6.27, 160.9, -7, 0.87)
	pt3dadd(-6.39, 162.3, -7, 0.87)
	pt3dadd(-6.7, 163.5, -6.75, 0.87)
	pt3dadd(-6.95, 164.8, -6.75, 0.69)
	pt3dadd(-7.08, 166, -6.75, 0.69)
	pt3dadd(-7.08, 167.1, -6.75, 0.69)
	pt3dadd(-6.92, 168.7, -6.75, 0.69)
  }
  dend[78] {pt3dclear()
	pt3dadd(-6.92, 168.7, -6.75, 0.69)
	pt3dadd(-6.51, 169.4, -6.75, 0.69)
	pt3dadd(-5.83, 170.9, -6.5, 0.69)
	pt3dadd(-5.33, 172.2, -6.5, 0.69)
	pt3dadd(-5.14, 173.4, -6.5, 0.87)
	pt3dadd(-4.96, 174.6, -6.5, 0.87)
	pt3dadd(-5.12, 175.2, -6.5, 0.87)
  }
  dend[79] {pt3dclear()
	pt3dadd(-5.12, 175.2, -6.5, 0.87)
	pt3dadd(-5.46, 175.6, -6.5, 0.56)
	pt3dadd(-6.02, 176.9, -6.5, 0.56)
	pt3dadd(-6.24, 178.1, -6.5, 0.56)
  }
  dend[80] {pt3dclear()
	pt3dadd(-6.24, 178.1, -6.5, 0.56)
	pt3dadd(-7.2, 178.7, -6.5, 0.87)
	pt3dadd(-8.19, 179.6, -6.5, 0.87)
	pt3dadd(-8.82, 180.6, -6.5, 0.87)
  }
  dend[81] {pt3dclear()
	pt3dadd(-6.24, 178.1, -6.5, 0.56)
	pt3dadd(-5.96, 178.7, -6.5, 0.41)
	pt3dadd(-5.29, 179.2, -6.5, 0.41)
	pt3dadd(-5.04, 179.6, -6.5, 0.41)
	pt3dadd(-5.09, 180.3, -6.5, 0.41)
	pt3dadd(-4.78, 180.8, -6.5, 0.41)
	pt3dadd(-4.37, 181.1, -6.5, 0.41)
	pt3dadd(-3.81, 181.5, -6.5, 0.41)
	pt3dadd(-3.5, 181.8, -6.5, 0.41)
	pt3dadd(-2.94, 182.3, -6.5, 0.41)
  }
  dend[82] {pt3dclear()
	pt3dadd(-5.12, 175.2, -6.5, 0.87)
	pt3dadd(-4.78, 175.4, -6.5, 0.51)
	pt3dadd(-4.01, 176.2, -6.25, 0.41)
	pt3dadd(-3.66, 177, -6.25, 0.41)
	pt3dadd(-3.09, 177.7, -6.25, 0.41)
	pt3dadd(-2.89, 178.7, -6.25, 0.41)
	pt3dadd(-2.17, 179.2, -6.25, 0.41)
	pt3dadd(-2.02, 180.2, -6.25, 0.41)
	pt3dadd(-1.97, 180.9, -6.25, 0.41)
	pt3dadd(-1.76, 181.7, -6.25, 0.41)
	pt3dadd(-1.56, 182.4, -6, 0.41)
	pt3dadd(-1.41, 183.3, -6, 0.41)
	pt3dadd(-0.74, 184, -6, 0.41)
	pt3dadd(-0.18, 184.5, -6, 0.41)
	pt3dadd(0.59, 185.2, -6, 0.41)
	pt3dadd(1.14, 185.7, -6, 0.41)
	pt3dadd(1.77, 186.4, -6, 0.41)
	pt3dadd(2.27, 186.7, -6, 0.41)
  }
  dend[83] {pt3dclear()
	pt3dadd(-6.92, 168.7, -6.75, 0.69)
	pt3dadd(-7.49, 169, -6.75, 0.56)
	pt3dadd(-8.06, 169.3, -7, 0.46)
	pt3dadd(-8.31, 169.8, -7, 0.46)
	pt3dadd(-8.52, 170.5, -7, 0.46)
	pt3dadd(-8.57, 171.1, -7, 0.46)
	pt3dadd(-8.67, 172.2, -7, 0.46)
	pt3dadd(-8.57, 172.9, -7, 0.46)
	pt3dadd(-8.41, 173.6, -7, 0.46)
	pt3dadd(-8.26, 174.9, -7, 0.46)
	pt3dadd(-8.21, 175.7, -7, 0.46)
	pt3dadd(-8.21, 176.8, -7, 0.46)
	pt3dadd(-8.16, 177.8, -7, 0.46)
	pt3dadd(-8.21, 178.8, -7, 0.46)
	pt3dadd(-8.31, 179.1, -7, 0.46)
	pt3dadd(-8.77, 179.1, -7, 0.46)
  }
}
proc shape3d_5() {
  dend[83] {  }
  dend[84] {pt3dclear()
	pt3dadd(-4.4, 152.9, -7, 1)
	pt3dadd(-5.14, 152.8, -7.25, 0.92)
	pt3dadd(-6.16, 152.69, -7.25, 0.82)
	pt3dadd(-7.03, 152.6, -7.25, 0.72)
	pt3dadd(-8.11, 152.8, -7.25, 0.77)
	pt3dadd(-8.82, 153.5, -7.25, 1.02)
  }
  dend[85] {pt3dclear()
	pt3dadd(-8.82, 153.5, -7.25, 1.02)
	pt3dadd(-9.8, 153.6, -7.5, 0.92)
	pt3dadd(-10.66, 153.19, -7.5, 0.87)
	pt3dadd(-11.48, 152.6, -7.5, 0.61)
	pt3dadd(-12.3, 152.3, -7.5, 0.61)
	pt3dadd(-12.81, 151.8, -7.5, 0.61)
	pt3dadd(-13.68, 151.9, -7.5, 0.61)
  }
  dend[86] {pt3dclear()
	pt3dadd(-13.68, 151.9, -7.5, 0.61)
	pt3dadd(-13.99, 151.19, -7.5, 0.41)
	pt3dadd(-14.3, 150.5, -7.5, 0.36)
	pt3dadd(-14.4, 149.8, -7.5, 0.36)
	pt3dadd(-14.55, 149.1, -7.5, 0.46)
	pt3dadd(-14.96, 148.8, -7.5, 0.46)
  }
  dend[87] {pt3dclear()
	pt3dadd(-13.68, 151.9, -7.5, 0.61)
	pt3dadd(-14.3, 152.3, -7.5, 0.56)
	pt3dadd(-14.91, 153, -7.5, 0.56)
  }
  dend[88] {pt3dclear()
	pt3dadd(-14.91, 153, -7.5, 0.56)
	pt3dadd(-15.68, 152.69, -7.75, 0.56)
	pt3dadd(-16.19, 152.69, -7.75, 0.46)
	pt3dadd(-17.01, 152.5, -7.75, 0.46)
	pt3dadd(-17.42, 152.19, -7.75, 0.46)
	pt3dadd(-18.07, 151.9, -7.75, 0.46)
	pt3dadd(-18.95, 151.69, -7.75, 0.46)
	pt3dadd(-19.41, 151.5, -7.75, 0.46)
	pt3dadd(-19.97, 151.6, -7.75, 0.72)
  }
  dend[89] {pt3dclear()
	pt3dadd(-14.91, 153, -7.5, 0.56)
	pt3dadd(-14.71, 153.69, -7.75, 0.46)
	pt3dadd(-14.81, 154.4, -7.75, 0.46)
	pt3dadd(-14.86, 155.4, -7.75, 0.46)
	pt3dadd(-14.65, 156, -7.75, 0.46)
	pt3dadd(-14.45, 156.69, -7.75, 0.46)
	pt3dadd(-13.94, 157.1, -7.75, 0.46)
	pt3dadd(-13.84, 158.3, -8, 0.56)
	pt3dadd(-13.89, 159.19, -8, 0.56)
	pt3dadd(-14.09, 160.1, -8, 0.56)
	pt3dadd(-14.71, 160.8, -8, 0.56)
	pt3dadd(-15.37, 161.19, -8.25, 0.56)
	pt3dadd(-15.93, 161.9, -8.25, 0.56)
	pt3dadd(-16.29, 162.3, -8.25, 0.56)
	pt3dadd(-16.75, 162.8, -8.5, 0.36)
  }
  dend[90] {pt3dclear()
	pt3dadd(-8.82, 153.5, -7.25, 1.02)
	pt3dadd(-8.57, 154.6, -7.25, 0.51)
	pt3dadd(-8.52, 155.4, -7.25, 0.36)
	pt3dadd(-8.57, 156.19, -7.25, 0.51)
	pt3dadd(-9.02, 156.9, -7.5, 0.36)
	pt3dadd(-9.39, 157.69, -7.5, 0.31)
	pt3dadd(-9.59, 158.4, -7.5, 0.31)
	pt3dadd(-9.64, 158.9, -7.5, 0.31)
	pt3dadd(-10.15, 159.5, -7.5, 0.31)
	pt3dadd(-10.82, 159.9, -7.5, 0.31)
	pt3dadd(-11.38, 160.4, -7.5, 0.31)
	pt3dadd(-12.35, 160.3, -7.5, 0.31)
	pt3dadd(-12.86, 160.1, -7.5, 0.31)
	pt3dadd(-13.32, 160.1, -7.5, 0.31)
	pt3dadd(-13.84, 160.19, -7.5, 0.31)
	pt3dadd(-14.25, 160.3, -7.5, 0.31)
	pt3dadd(-14.55, 160.4, -7.5, 0.31)
	pt3dadd(-15.17, 160.5, -7.5, 0.31)
	pt3dadd(-15.68, 160.9, -7.5, 0.31)
	pt3dadd(-16.04, 161.1, -7.5, 0.31)
	pt3dadd(-16.55, 160.5, -7.25, 0.41)
	pt3dadd(-16.91, 160.1, -7.25, 0.41)
  }
  dend[91] {pt3dclear()
	pt3dadd(1.14, 147.9, -6.75, 1.18)
	pt3dadd(0.85, 148.6, -6.75, 0.72)
	pt3dadd(0.69, 149.5, -6.75, 0.72)
	pt3dadd(0.23, 150.5, -7, 0.56)
	pt3dadd(0.03, 151.4, -7, 0.51)
	pt3dadd(-0.23, 152.1, -7, 0.51)
	pt3dadd(-0.54, 153, -7, 0.56)
	pt3dadd(-0.95, 153.8, -7, 0.56)
	pt3dadd(-1.1, 154.4, -7, 0.56)
	pt3dadd(-1.25, 155, -7, 0.56)
	pt3dadd(-1.51, 155.5, -7, 0.56)
	pt3dadd(-1.82, 155.9, -7, 0.56)
	pt3dadd(-2.02, 156.3, -7, 0.56)
	pt3dadd(-2.27, 156.9, -7, 0.56)
	pt3dadd(-2.52, 157.1, -7, 0.56)
	pt3dadd(-2.52, 158, -7, 0.56)
	pt3dadd(-2.68, 159, -7, 0.56)
	pt3dadd(-2.79, 159.6, -7, 0.56)
	pt3dadd(-2.79, 160.4, -7, 0.56)
	pt3dadd(-2.74, 161.1, -7, 0.56)
  }
  dend[92] {pt3dclear()
	pt3dadd(-2.74, 161.1, -7, 0.56)
	pt3dadd(-1.82, 161.6, -7, 0.56)
	pt3dadd(-1.3, 162.3, -7, 0.56)
	pt3dadd(-0.69, 163.1, -6.75, 0.56)
	pt3dadd(-0.07, 164.1, -6.75, 0.56)
	pt3dadd(0.59, 164.9, -6.75, 0.56)
	pt3dadd(0.69, 165.7, -6.75, 0.56)
	pt3dadd(0.69, 166.4, -6.75, 0.31)
	pt3dadd(0.74, 167.2, -6.75, 0.41)
	pt3dadd(0.95, 167.9, -6.75, 0.41)
	pt3dadd(1, 168.1, -6.75, 0.41)
  }
  dend[93] {pt3dclear()
	pt3dadd(-2.74, 161.1, -7, 0.56)
	pt3dadd(-3.2, 162, -7, 0.46)
	pt3dadd(-3.76, 162.69, -7, 0.41)
	pt3dadd(-4.07, 163.5, -7, 0.41)
	pt3dadd(-4.12, 164.2, -7, 0.51)
	pt3dadd(-4.07, 165.3, -7, 0.51)
	pt3dadd(-4.07, 166.5, -6.75, 0.51)
	pt3dadd(-4.01, 167.3, -6.75, 0.51)
	pt3dadd(-4.07, 168.2, -6.75, 0.51)
	pt3dadd(-4.01, 169.1, -6.75, 0.51)
	pt3dadd(-3.91, 170.3, -6.75, 0.51)
	pt3dadd(-3.71, 171.6, -6.5, 0.41)
	pt3dadd(-3.45, 172.6, -6.5, 0.41)
	pt3dadd(-3.15, 173.4, -6.5, 0.41)
	pt3dadd(-2.58, 174.2, -6.5, 0.41)
	pt3dadd(-2.17, 174.7, -6.5, 0.41)
	pt3dadd(-1.61, 175.6, -6.5, 0.41)
	pt3dadd(-1.14, 176, -6.5, 0.41)
  }
  dend[94] {pt3dclear()
	pt3dadd(9.53, 142.6, -6.5, 1.06)
	pt3dadd(9.67, 143.69, -6.25, 0.87)
	pt3dadd(9.82, 144.8, -6.25, 0.77)
	pt3dadd(9.82, 145.6, -6.25, 0.77)
	pt3dadd(10.01, 146.3, -6.25, 0.77)
  }
  dend[95] {pt3dclear()
	pt3dadd(10.01, 146.3, -6.25, 0.77)
	pt3dadd(10.02, 147.5, -6, 0.92)
	pt3dadd(10.23, 148.6, -6, 0.92)
	pt3dadd(10.28, 149.5, -6, 0.92)
	pt3dadd(10.69, 150.3, -6, 0.92)
  }
  dend[96] {pt3dclear()
	pt3dadd(10.69, 150.3, -6, 0.92)
	pt3dadd(10.49, 151.4, -5.75, 0.77)
	pt3dadd(10.74, 151.9, -5.75, 0.77)
	pt3dadd(10.9, 152.6, -5.75, 0.77)
	pt3dadd(10.91, 152.69, -5.75, 0.77)
  }
  dend[97] {pt3dclear()
	pt3dadd(10.91, 152.69, -5.75, 0.77)
	pt3dadd(11.15, 153.3, -5.75, 0.77)
	pt3dadd(11.36, 153.9, -5.75, 0.77)
	pt3dadd(11.97, 154.9, -5.5, 0.77)
	pt3dadd(12.38, 155.69, -5.5, 0.77)
	pt3dadd(12.53, 156, -5.5, 0.77)
  }
  dend[98] {pt3dclear()
	pt3dadd(12.53, 156, -5.5, 0.77)
	pt3dadd(13, 156.69, -5.5, 0.77)
	pt3dadd(13.51, 157.6, -5.5, 0.77)
	pt3dadd(14.12, 158.3, -5.5, 0.77)
	pt3dadd(14.84, 159, -5.5, 0.67)
	pt3dadd(15.81, 159.8, -5.5, 0.67)
	pt3dadd(16.37, 160.19, -5.5, 0.67)
	pt3dadd(17.04, 160.8, -5.25, 0.67)
	pt3dadd(17.39, 161.5, -5, 0.67)
	pt3dadd(18.05, 162.4, -5, 0.67)
	pt3dadd(18.47, 163.1, -5, 0.67)
	pt3dadd(18.82, 163.69, -5, 0.67)
	pt3dadd(19.03, 164.3, -5, 0.67)
	pt3dadd(19.23, 164.8, -5, 0.67)
	pt3dadd(19.7, 165.3, -5, 0.67)
	pt3dadd(20.11, 166.1, -4.75, 0.51)
	pt3dadd(20.16, 167.1, -4.75, 0.51)
	pt3dadd(20.36, 167.8, -4.75, 0.51)
	pt3dadd(20.26, 168.5, -4.5, 0.61)
	pt3dadd(20.3, 169.3, -4.5, 0.61)
	pt3dadd(20.05, 170.1, -4.5, 0.61)
	pt3dadd(19.7, 170.4, -4.5, 0.61)
	pt3dadd(19.39, 171.8, -4.5, 0.61)
	pt3dadd(19.34, 172.4, -4.5, 0.61)
	pt3dadd(19.29, 173.3, -4.5, 0.61)
	pt3dadd(18.72, 173.9, -4.5, 0.61)
	pt3dadd(18.32, 174.6, -4.5, 0.61)
	pt3dadd(17.6, 175, -4.5, 0.61)
	pt3dadd(16.98, 175.7, -4.5, 0.61)
	pt3dadd(16.73, 176.3, -4.5, 0.61)
  }
  dend[99] {pt3dclear()
	pt3dadd(12.53, 156, -5.5, 0.77)
	pt3dadd(11.89, 156.6, -6.75, 0.31)
	pt3dadd(11.43, 157.3, -6.75, 0.31)
	pt3dadd(11.33, 158.4, -6.75, 0.31)
	pt3dadd(11.12, 159.69, -6.5, 0.41)
	pt3dadd(11.12, 160.8, -6.5, 0.41)
	pt3dadd(10.97, 161.3, -6.5, 0.41)
	pt3dadd(10.61, 162.3, -6.5, 0.41)
	pt3dadd(10.25, 163.69, -6.25, 0.41)
	pt3dadd(10.35, 164.9, -6.25, 0.41)
	pt3dadd(10.3, 165.7, -6.25, 0.41)
	pt3dadd(10.35, 166.5, -6.25, 0.41)
	pt3dadd(10.35, 167.3, -6.25, 0.41)
	pt3dadd(10.25, 168.1, -6.25, 0.41)
	pt3dadd(10.3, 169.2, -6.25, 0.41)
	pt3dadd(10.25, 170.1, -6.25, 0.41)
  }
  dend[100] {pt3dclear()
	pt3dadd(10.25, 170.1, -6.25, 0.41)
	pt3dadd(10.71, 171, -6.25, 0.41)
	pt3dadd(10.82, 171.8, -6.25, 0.41)
	pt3dadd(11.07, 172.8, -6.25, 0.41)
	pt3dadd(11.48, 173.6, -6.25, 0.41)
	pt3dadd(11.43, 175, -6, 0.41)
	pt3dadd(11.28, 175.9, -6, 0.41)
	pt3dadd(11.22, 177, -6, 0.41)
	pt3dadd(10.92, 177.7, -5.75, 0.41)
  }
  dend[101] {pt3dclear()
	pt3dadd(10.92, 177.7, -5.75, 0.41)
	pt3dadd(10.15, 178.4, -5.75, 0.31)
	pt3dadd(10, 179.1, -5.75, 0.31)
	pt3dadd(10, 179.8, -5.75, 0.31)
	pt3dadd(10, 180.7, -5.75, 0.31)
	pt3dadd(10, 181.5, -5.75, 0.31)
	pt3dadd(9.84, 182.3, -5.5, 0.31)
  }
}
proc shape3d_6() {
  dend[101] {	pt3dadd(10.1, 183.3, -5.5, 0.31)
  }
  dend[102] {pt3dclear()
	pt3dadd(10.1, 183.3, -5.5, 0.31)
	pt3dadd(11.12, 184.3, -5.5, 0.31)
	pt3dadd(11.63, 185.1, -5.5, 0.31)
	pt3dadd(11.99, 186, -5.5, 0.31)
  }
  dend[103] {pt3dclear()
	pt3dadd(10.1, 183.3, -5.5, 0.31)
	pt3dadd(9.69, 184.3, -5.5, 0.31)
	pt3dadd(9.18, 185.3, -5.5, 0.31)
  }
  dend[104] {pt3dclear()
	pt3dadd(9.18, 185.3, -5.5, 0.31)
	pt3dadd(9.38, 186.4, -5.5, 0.31)
	pt3dadd(9.69, 188.1, -5.25, 0.31)
	pt3dadd(9.64, 189, -5.25, 0.31)
	pt3dadd(9.59, 189.8, -5.25, 0.31)
  }
  dend[105] {pt3dclear()
	pt3dadd(9.59, 189.8, -5.25, 0.31)
	pt3dadd(8.61, 190.1, -5, 0.31)
	pt3dadd(8.26, 190.9, -5, 0.31)
  }
  dend[106] {pt3dclear()
	pt3dadd(9.59, 189.8, -5.25, 0.31)
	pt3dadd(9.84, 190.6, -5, 0.31)
	pt3dadd(10.05, 191, -5, 0.31)
  }
  dend[107] {pt3dclear()
	pt3dadd(9.18, 185.3, -5.5, 0.31)
	pt3dadd(8.26, 185.4, -5.5, 0.31)
	pt3dadd(7.54, 185.7, -5.5, 0.31)
	pt3dadd(6.72, 185.4, -5.5, 0.31)
	pt3dadd(5.55, 185.2, -5.5, 0.31)
	pt3dadd(5.14, 186, -5.5, 0.31)
  }
  dend[108] {pt3dclear()
	pt3dadd(10.92, 177.7, -5.75, 0.41)
	pt3dadd(11.89, 178.2, -5.75, 0.31)
	pt3dadd(12.25, 178.6, -5.75, 0.31)
	pt3dadd(12.71, 179.1, -5.75, 0.31)
  }
  dend[109] {pt3dclear()
	pt3dadd(12.71, 179.1, -5.75, 0.31)
	pt3dadd(13.78, 179.2, -5.75, 0.31)
	pt3dadd(15.01, 179.2, -5.75, 0.31)
	pt3dadd(15.62, 179.6, -5.5, 0.31)
	pt3dadd(16.03, 180.3, -5.5, 0.31)
	pt3dadd(17.05, 181.4, -5.5, 0.31)
  }
  dend[110] {pt3dclear()
	pt3dadd(12.71, 179.1, -5.75, 0.31)
	pt3dadd(12.76, 180.1, -5.75, 0.31)
	pt3dadd(13.12, 181.2, -5.75, 0.31)
	pt3dadd(13.12, 181.8, -5.75, 0.31)
	pt3dadd(13.58, 182.7, -5.75, 0.31)
	pt3dadd(13.99, 183.3, -5.5, 0.31)
	pt3dadd(14.29, 184.2, -5.5, 0.31)
	pt3dadd(14.7, 184.9, -5.5, 0.31)
	pt3dadd(15.01, 185.9, -5.25, 0.31)
  }
  dend[111] {pt3dclear()
	pt3dadd(10.25, 170.1, -6.25, 0.41)
	pt3dadd(10, 170.9, -6.25, 0.31)
	pt3dadd(9.59, 171.7, -6.25, 0.31)
	pt3dadd(9.18, 172.2, -6.25, 0.31)
	pt3dadd(8.97, 173.3, -6.25, 0.31)
	pt3dadd(8.51, 173.9, -6.25, 0.31)
	pt3dadd(8.16, 174.9, -6, 0.31)
	pt3dadd(7.85, 175.9, -6, 0.31)
	pt3dadd(7.49, 177.1, -6, 0.31)
	pt3dadd(7.34, 178, -6, 0.31)
	pt3dadd(7.03, 178.8, -6, 0.31)
	pt3dadd(7.08, 179.9, -6, 0.31)
  }
  dend[112] {pt3dclear()
	pt3dadd(7.08, 179.9, -6, 0.31)
	pt3dadd(7.13, 181, -6, 0.31)
	pt3dadd(6.88, 182.1, -6, 0.31)
	pt3dadd(6.42, 183, -6, 0.31)
	pt3dadd(5.65, 183.7, -6, 0.31)
  }
  dend[113] {pt3dclear()
	pt3dadd(7.08, 179.9, -6, 0.31)
	pt3dadd(6.31, 180.3, -5.75, 0.31)
	pt3dadd(5.7, 180.6, -5.75, 0.31)
	pt3dadd(4.68, 180.6, -6, 0.31)
	pt3dadd(3.76, 180.4, -6, 0.31)
	pt3dadd(3.09, 180.1, -6, 0.31)
	pt3dadd(2.52, 179.4, -6, 0.31)
	pt3dadd(2.12, 178.9, -6, 0.31)
	pt3dadd(1.97, 178.6, -6, 0.31)
	pt3dadd(1.61, 177.6, -6, 0.31)
  }
  dend[114] {pt3dclear()
	pt3dadd(10.91, 152.69, -5.75, 0.77)
	pt3dadd(10.19, 153.1, -5.75, 0.67)
	pt3dadd(9.16, 153.69, -5.75, 0.67)
  }
  dend[115] {pt3dclear()
	pt3dadd(9.16, 153.69, -5.75, 0.67)
	pt3dadd(8.36, 153.6, -5.75, 0.67)
	pt3dadd(7.49, 153.6, -5.75, 0.67)
	pt3dadd(7.23, 154.4, -5.75, 0.31)
	pt3dadd(6.62, 155, -5.5, 0.31)
	pt3dadd(6.06, 156, -5.5, 0.31)
	pt3dadd(5.85, 157.1, -5.5, 0.31)
	pt3dadd(5.44, 157.69, -5.5, 0.31)
	pt3dadd(4.57, 157.9, -5.5, 0.31)
  }
  dend[116] {pt3dclear()
	pt3dadd(4.57, 157.9, -5.5, 0.31)
	pt3dadd(4.37, 158.5, -5.25, 0.31)
	pt3dadd(4.22, 159.69, -5.25, 0.31)
	pt3dadd(4.11, 160.6, -5.25, 0.31)
	pt3dadd(3.86, 161.1, -5.25, 0.56)
	pt3dadd(3.65, 161.6, -5.25, 0.56)
	pt3dadd(3.45, 162.1, -5.25, 0.41)
	pt3dadd(3.35, 162.69, -5.25, 0.36)
	pt3dadd(3.35, 163.4, -5.25, 0.36)
	pt3dadd(3.14, 163.8, -5.25, 0.36)
	pt3dadd(3.14, 164.3, -5.25, 0.36)
	pt3dadd(3.3, 164.9, -5.25, 0.36)
	pt3dadd(3.4, 165.3, -5.25, 0.36)
	pt3dadd(3.5, 165.9, -5.25, 0.46)
	pt3dadd(3.81, 166.5, -5.25, 0.51)
	pt3dadd(4.01, 167, -5.25, 0.51)
	pt3dadd(3.96, 167.5, -5.25, 0.51)
	pt3dadd(3.76, 168, -5.5, 0.51)
  }
  dend[117] {pt3dclear()
	pt3dadd(3.76, 168, -5.5, 0.51)
	pt3dadd(4.05, 168.4, -5.5, 0.41)
	pt3dadd(4.22, 169.4, -5.5, 0.41)
	pt3dadd(4.22, 169.9, -5.5, 0.41)
	pt3dadd(4.22, 170.8, -5.5, 0.41)
	pt3dadd(4.26, 171.4, -5.5, 0.41)
	pt3dadd(4.26, 171.7, -5.5, 0.41)
  }
  dend[118] {pt3dclear()
	pt3dadd(3.76, 168, -5.5, 0.51)
	pt3dadd(2.94, 168.2, -5.5, 0.41)
	pt3dadd(2.43, 168.6, -5.5, 0.41)
	pt3dadd(2.17, 169.2, -5.5, 0.41)
	pt3dadd(1.81, 169.4, -5.5, 0.41)
	pt3dadd(1.56, 170.4, -5.75, 0.41)
	pt3dadd(1.61, 171.1, -5.75, 0.41)
	pt3dadd(1.97, 172, -5.75, 0.41)
	pt3dadd(2.43, 172.4, -5.75, 0.41)
	pt3dadd(2.68, 172.7, -5.75, 0.41)
	pt3dadd(3.6, 173.2, -5.75, 0.41)
	pt3dadd(4.37, 173.5, -5.75, 0.41)
	pt3dadd(4.47, 174, -5.75, 0.41)
	pt3dadd(4.37, 175, -5.75, 0.41)
	pt3dadd(4.05, 175.6, -5.75, 0.41)
	pt3dadd(3.4, 176.3, -5.75, 0.41)
  }
  dend[119] {pt3dclear()
	pt3dadd(4.57, 157.9, -5.5, 0.31)
	pt3dadd(3.91, 157.3, -5.5, 0.41)
	pt3dadd(3.09, 157.1, -5.5, 0.41)
	pt3dadd(2.06, 156.9, -5.5, 0.41)
	pt3dadd(1.61, 156.6, -5.5, 0.41)
  }
  dend[120] {pt3dclear()
	pt3dadd(1.61, 156.6, -5.5, 0.41)
	pt3dadd(1.1, 157.19, -5.5, 0.41)
	pt3dadd(0.89, 158.3, -5.5, 0.41)
	pt3dadd(0.64, 159, -5.5, 0.41)
	pt3dadd(0.38, 159.6, -5.5, 0.41)
	pt3dadd(0.33, 160.4, -5.5, 0.41)
	pt3dadd(0.53, 160.8, -5.5, 0.41)
  }
  dend[121] {pt3dclear()
	pt3dadd(1.61, 156.6, -5.5, 0.41)
	pt3dadd(0.89, 156, -5.5, 0.41)
	pt3dadd(0.64, 155.19, -5.5, 0.41)
	pt3dadd(0.48, 154.5, -5.5, 0.41)
	pt3dadd(-0.39, 154, -5.25, 0.41)
	pt3dadd(-0.8, 153.5, -5.25, 0.51)
	pt3dadd(-1.31, 153.3, -5.25, 0.51)
	pt3dadd(-1.92, 153.19, -5.25, 0.51)
  }
  dend[122] {pt3dclear()
	pt3dadd(9.16, 153.69, -5.75, 0.67)
	pt3dadd(9.02, 154.19, -5.75, 0.51)
	pt3dadd(8.51, 154.8, -5.75, 0.51)
	pt3dadd(8.21, 155.6, -5.75, 0.36)
	pt3dadd(7.9, 156.19, -5.75, 0.46)
	pt3dadd(7.8, 156.9, -5.75, 0.46)
	pt3dadd(7.59, 157.3, -5.75, 0.46)
	pt3dadd(7.59, 158.1, -5.75, 0.46)
	pt3dadd(7.23, 158.69, -5.75, 0.46)
	pt3dadd(7.13, 159.19, -5.75, 0.46)
	pt3dadd(7.18, 159.9, -5.5, 0.41)
	pt3dadd(7.03, 160.5, -5.5, 0.41)
	pt3dadd(6.98, 161.3, -5.5, 0.41)
	pt3dadd(6.72, 161.8, -5.5, 0.41)
	pt3dadd(6.62, 163.1, -5.5, 0.41)
	pt3dadd(6.67, 164.3, -5.5, 0.41)
	pt3dadd(6.62, 165.4, -5.5, 0.41)
	pt3dadd(6.88, 166.1, -5.5, 0.41)
	pt3dadd(7.03, 166.4, -5.5, 0.41)
	pt3dadd(7.03, 167.1, -5.5, 0.41)
	pt3dadd(6.93, 167.9, -5.5, 0.41)
	pt3dadd(6.57, 168.6, -5.5, 0.41)
	pt3dadd(6.52, 169.2, -5.5, 0.41)
	pt3dadd(6.52, 169.8, -5.5, 0.41)
	pt3dadd(6.62, 170.2, -5.5, 0.41)
  }
  dend[123] {pt3dclear()
	pt3dadd(10.69, 150.3, -6, 0.92)
	pt3dadd(11.28, 150.6, -5.75, 0.61)
	pt3dadd(11.79, 150.9, -5.75, 0.51)
	pt3dadd(12.15, 151.19, -5.75, 0.51)
	pt3dadd(12.66, 151.3, -5.75, 0.51)
	pt3dadd(13.12, 151.3, -5.75, 0.51)
	pt3dadd(13.99, 151.69, -5.75, 0.51)
	pt3dadd(14.86, 151.8, -5.75, 0.51)
	pt3dadd(15.37, 152.1, -5.75, 0.51)
	pt3dadd(16.3, 152.5, -5.75, 0.51)
	pt3dadd(16.96, 153.1, -5.75, 0.61)
	pt3dadd(17.42, 153.6, -5.75, 0.61)
	pt3dadd(17.78, 154.1, -5.75, 0.61)
	pt3dadd(18.14, 154.9, -5.5, 0.61)
	pt3dadd(18.23, 155.9, -5.5, 0.61)
	pt3dadd(18.29, 156.1, -5.5, 0.61)
	pt3dadd(18.34, 156.69, -5.5, 0.61)
	pt3dadd(18.6, 157.3, -5.5, 0.51)
	pt3dadd(18.64, 158.1, -5.5, 0.46)
	pt3dadd(18.96, 158.4, -5.5, 0.41)
	pt3dadd(19.3, 159.1, -5.5, 0.36)
  }
  dend[124] {pt3dclear()
	pt3dadd(10.01, 146.3, -6.25, 0.77)
	pt3dadd(9.53, 147.19, -6.25, 0.41)
	pt3dadd(9.08, 148, -6.25, 0.41)
	pt3dadd(8.41, 148.69, -6.25, 0.41)
	pt3dadd(7.95, 149, -6.5, 0.41)
	pt3dadd(7.34, 149.1, -6.5, 0.41)
	pt3dadd(6.57, 149.19, -6.5, 0.41)
	pt3dadd(5.96, 149.4, -6.5, 0.41)
	pt3dadd(4.83, 149.8, -6.5, 0.41)
	pt3dadd(3.81, 150.6, -6.25, 0.41)
  }
}
proc shape3d_7() {
  dend[124] {	pt3dadd(3.3, 151.19, -6.25, 0.41)
	pt3dadd(2.27, 151.1, -6.25, 0.41)
	pt3dadd(1.04, 151.4, -6.25, 0.41)
	pt3dadd(0.94, 152, -6.25, 0.41)
	pt3dadd(0.74, 152.6, -6.25, 0.41)
	pt3dadd(0.84, 153.5, -6.25, 0.41)
	pt3dadd(0.74, 154.1, -6.25, 0.41)
	pt3dadd(0.69, 155.1, -6.25, 0.41)
	pt3dadd(0.84, 156.4, -6.5, 0.41)
	pt3dadd(0.79, 157.3, -6.5, 0.41)
	pt3dadd(1.04, 158.3, -6.5, 0.41)
	pt3dadd(1.35, 159.19, -6.5, 0.41)
	pt3dadd(1.97, 160.3, -6.5, 0.41)
	pt3dadd(2.17, 160.8, -6.5, 0.41)
	pt3dadd(2.27, 161.69, -6.25, 0.41)
  }
  dend[125] {pt3dclear()
	pt3dadd(10.94, 138.6, -6.5, 1.56)
	pt3dadd(10.29, 138.1, -6.5, 0.67)
	pt3dadd(9.67, 137.8, -6.5, 0.51)
	pt3dadd(9.01, 138, -6.75, 0.36)
	pt3dadd(8.5, 138.4, -6.75, 0.41)
	pt3dadd(7.78, 138.8, -6.75, 0.51)
	pt3dadd(7.37, 139.19, -6.75, 0.51)
	pt3dadd(6.66, 139.5, -6.75, 0.51)
	pt3dadd(6.2, 140.19, -6.75, 0.46)
	pt3dadd(5.74, 140.6, -6.75, 0.41)
	pt3dadd(5.48, 141.3, -6.75, 0.41)
	pt3dadd(5.07, 141.8, -6.75, 0.41)
	pt3dadd(4.2, 141.6, -6.75, 0.56)
	pt3dadd(3.84, 141.4, -6.75, 0.56)
	pt3dadd(3.13, 141, -6.75, 0.56)
	pt3dadd(2.31, 140.9, -6.75, 0.56)
	pt3dadd(1.54, 141.19, -7, 0.56)
	pt3dadd(0.82, 141.6, -7, 0.56)
	pt3dadd(0.36, 142.6, -7, 0.56)
  }
  dend[126] {pt3dclear()
	pt3dadd(12.62, 133.69, -6.5, 0.94)
	pt3dadd(13.13, 134.1, -6.75, 0.41)
	pt3dadd(13.64, 134.4, -6.75, 0.41)
	pt3dadd(14.16, 134.9, -6.5, 0.41)
	pt3dadd(14.67, 135.4, -6.5, 0.41)
	pt3dadd(15.03, 135.9, -6.5, 0.41)
  }
  dend[127] {pt3dclear()
	pt3dadd(15.03, 135.9, -6.5, 0.41)
	pt3dadd(15.84, 135.8, -6.5, 0.41)
	pt3dadd(16.51, 136.19, -6.5, 0.41)
	pt3dadd(17.12, 136.9, -6.25, 0.41)
	pt3dadd(17.57, 137.5, -6.25, 0.41)
	pt3dadd(17.98, 138.4, -6.25, 0.41)
	pt3dadd(17.94, 139.19, -6, 0.41)
	pt3dadd(18.04, 140.3, -6, 0.41)
	pt3dadd(18.39, 141.3, -6, 0.41)
	pt3dadd(18.3, 142, -6, 0.41)
	pt3dadd(18.09, 142.69, -6, 0.41)
	pt3dadd(17.94, 143.6, -6, 0.41)
	pt3dadd(17.94, 144.8, -6, 0.41)
	pt3dadd(17.98, 145.9, -6, 0.41)
	pt3dadd(18.66, 146.8, -6, 0.41)
	pt3dadd(19.12, 147.8, -6, 0.41)
	pt3dadd(19.53, 148.69, -6, 0.41)
  }
  dend[128] {pt3dclear()
	pt3dadd(15.03, 135.9, -6.5, 0.41)
	pt3dadd(14.92, 136.69, -6.5, 0.41)
	pt3dadd(14.87, 137.6, -6.5, 0.41)
	pt3dadd(14.97, 138.5, -6.5, 0.41)
	pt3dadd(15.08, 139.69, -6.5, 0.41)
	pt3dadd(15.13, 140.69, -6.5, 0.41)
	pt3dadd(15.33, 141.69, -6.5, 0.41)
	pt3dadd(15.59, 142.5, -6.5, 0.41)
	pt3dadd(15.69, 143.6, -6.5, 0.41)
	pt3dadd(15.43, 144.3, -6.5, 0.41)
	pt3dadd(15.18, 145.3, -6.5, 0.41)
  }
  dend[129] {pt3dclear()
	pt3dadd(15.18, 145.3, -6.5, 0.41)
	pt3dadd(15.03, 146.1, -6.25, 0.41)
	pt3dadd(15.23, 147.19, -6.25, 0.41)
	pt3dadd(15.49, 148, -6.25, 0.41)
	pt3dadd(15.79, 148.9, -6.25, 0.41)
	pt3dadd(16.3, 149.9, -6.25, 0.41)
	pt3dadd(16.92, 150.6, -6.25, 0.41)
	pt3dadd(17.79, 151.4, -6.25, 0.41)
	pt3dadd(17.98, 152.6, -6.25, 0.41)
	pt3dadd(18.23, 153.5, -6.25, 0.41)
	pt3dadd(18.8, 154.6, -6, 0.41)
	pt3dadd(19.14, 155.69, -6, 0.41)
	pt3dadd(19.46, 156.9, -6, 0.41)
	pt3dadd(19.55, 158, -6, 0.41)
	pt3dadd(19.51, 158.5, -6, 0.41)
	pt3dadd(19.55, 159.9, -5.75, 0.41)
	pt3dadd(19.61, 160.9, -5.75, 0.67)
  }
  dend[130] {pt3dclear()
	pt3dadd(19.61, 160.9, -5.75, 0.67)
	pt3dadd(20.23, 161.69, -5.75, 0.51)
	pt3dadd(20.94, 162.6, -5.75, 0.51)
	pt3dadd(21.81, 163.6, -5.75, 0.51)
	pt3dadd(22.73, 164.2, -5.5, 0.51)
	pt3dadd(23.96, 164.2, -5.25, 0.51)
	pt3dadd(24.83, 164.2, -5.25, 0.51)
	pt3dadd(25.6, 164.1, -5.25, 0.51)
	pt3dadd(25.96, 164.4, -5.25, 0.51)
  }
  dend[131] {pt3dclear()
	pt3dadd(19.61, 160.9, -5.75, 0.67)
	pt3dadd(18.73, 161.4, -5.5, 0.51)
	pt3dadd(18.18, 161.9, -5.5, 0.51)
	pt3dadd(17.16, 162.3, -5.5, 0.51)
	pt3dadd(16.34, 163, -5.5, 0.51)
	pt3dadd(15.52, 163.6, -5.5, 0.51)
	pt3dadd(14.7, 164.3, -5.5, 0.51)
  }
  dend[132] {pt3dclear()
	pt3dadd(14.7, 164.3, -5.5, 0.51)
	pt3dadd(14.45, 165.1, -5.5, 0.51)
	pt3dadd(14.55, 165.9, -5.5, 0.51)
	pt3dadd(14.86, 166.8, -5.5, 0.51)
	pt3dadd(15.37, 167.7, -5.5, 0.41)
	pt3dadd(15.67, 168, -5.5, 0.41)
	pt3dadd(16.29, 168.6, -5.5, 0.41)
	pt3dadd(16.7, 169.3, -5.5, 0.41)
	pt3dadd(17.36, 170.2, -5.75, 0.41)
  }
  dend[133] {pt3dclear()
	pt3dadd(14.7, 164.3, -5.5, 0.51)
	pt3dadd(14.09, 164.5, -5.5, 0.41)
	pt3dadd(13.58, 165, -5.5, 0.41)
	pt3dadd(12.71, 165.2, -5.5, 0.41)
	pt3dadd(12.09, 165.7, -5.5, 0.41)
	pt3dadd(11.33, 166.1, -5.5, 0.41)
	pt3dadd(10.46, 166.1, -5.5, 0.41)
	pt3dadd(9.59, 165.9, -5.5, 0.41)
	pt3dadd(9.27, 165.7, -5.5, 0.31)
	pt3dadd(8.82, 165.1, -5.5, 0.31)
	pt3dadd(8.67, 164.2, -5.5, 0.41)
	pt3dadd(8.51, 163.3, -5.5, 0.41)
	pt3dadd(8.26, 163, -5.25, 0.41)
  }
  dend[134] {pt3dclear()
	pt3dadd(15.18, 145.3, -6.5, 0.41)
	pt3dadd(14.62, 145.5, -6.5, 0.41)
	pt3dadd(14.16, 145.5, -6.5, 0.41)
	pt3dadd(13.54, 145.6, -6.5, 0.26)
	pt3dadd(13.03, 145.5, -6.5, 0.26)
	pt3dadd(12.62, 145.3, -6.5, 0.26)
	pt3dadd(12.26, 144.8, -6.5, 0.26)
	pt3dadd(12.11, 144.5, -6.5, 0.26)
	pt3dadd(12.26, 143.9, -6.5, 0.26)
	pt3dadd(12.52, 143.6, -6.5, 0.26)
	pt3dadd(12.52, 143.19, -6.5, 0.26)
	pt3dadd(12.57, 142.9, -6.5, 0.26)
	pt3dadd(12.52, 142.1, -6.5, 0.26)
	pt3dadd(12.62, 141.69, -6.5, 0.26)
	pt3dadd(12.83, 141.3, -6.5, 0.26)
	pt3dadd(12.88, 140.8, -6.5, 0.26)
	pt3dadd(12.98, 140.3, -6.75, 0.26)
  }
  dend[135] {pt3dclear()
	pt3dadd(13.62, 126.8, -6.25, 1)
	pt3dadd(14.18, 127.9, -6, 0.77)
	pt3dadd(14.48, 129.19, -5.75, 0.67)
	pt3dadd(14.54, 130.3, -5.75, 0.77)
	pt3dadd(14.43, 131.6, -5.75, 0.77)
	pt3dadd(14.13, 132.8, -5.75, 0.77)
	pt3dadd(13.46, 133.8, -5.75, 0.77)
  }
  dend[136] {pt3dclear()
	pt3dadd(13.46, 133.8, -5.75, 0.77)
	pt3dadd(13.26, 135.5, -5.75, 0.67)
	pt3dadd(13.26, 136.3, -5.75, 0.67)
	pt3dadd(13.46, 137.9, -5.75, 0.67)
	pt3dadd(13.26, 139.8, -5.75, 0.67)
	pt3dadd(13.36, 141.1, -5.75, 0.67)
	pt3dadd(13.51, 142.6, -5.75, 0.67)
	pt3dadd(13.72, 143.6, -5.5, 0.41)
	pt3dadd(13.92, 145.19, -5.5, 0.41)
	pt3dadd(14.54, 146.4, -5.5, 0.82)
	pt3dadd(15.15, 147.69, -5.5, 0.97)
  }
  dend[137] {pt3dclear()
	pt3dadd(13.46, 133.8, -5.75, 0.77)
	pt3dadd(12.39, 133.9, -5.5, 0.97)
	pt3dadd(11.81, 134, -5.5, 0.97)
  }
  dend[138] {pt3dclear()
	pt3dadd(11.81, 134, -5.5, 0.97)
	pt3dadd(11.47, 134, -5.5, 0.67)
	pt3dadd(10.24, 134.9, -5.5, 0.26)
	pt3dadd(9.57, 135.9, -5.5, 0.26)
	pt3dadd(8.4, 137.8, -5.5, 0.26)
	pt3dadd(7.89, 139.3, -5.5, 0.26)
	pt3dadd(7.48, 139.9, -5.5, 0.92)
  }
  dend[139] {pt3dclear()
	pt3dadd(7.48, 139.9, -5.5, 0.92)
	pt3dadd(7.53, 141.4, -5.25, 0.67)
	pt3dadd(7.42, 142.6, -5.25, 0.67)
	pt3dadd(7.17, 144, -5.25, 0.67)
	pt3dadd(7.17, 145.1, -5.25, 0.67)
	pt3dadd(7.12, 146.4, -5.25, 0.67)
	pt3dadd(7.07, 148, -5.25, 0.67)
	pt3dadd(6.96, 149.19, -5.25, 0.67)
	pt3dadd(6.45, 150.4, -5.25, 0.51)
	pt3dadd(6.25, 151.69, -5.25, 0.51)
	pt3dadd(5.74, 152.1, -5.25, 0.51)
  }
  dend[140] {pt3dclear()
	pt3dadd(7.48, 139.9, -5.5, 0.92)
	pt3dadd(6.56, 140.69, -5.5, 0.61)
	pt3dadd(5.63, 141.69, -5.25, 0.61)
	pt3dadd(5.17, 142.9, -5.25, 0.61)
	pt3dadd(5.07, 143.8, -5.25, 0.51)
	pt3dadd(5.07, 144.8, -5.25, 0.51)
	pt3dadd(5.07, 146.19, -5, 0.46)
	pt3dadd(4.97, 147.5, -5, 0.46)
	pt3dadd(4.92, 148.6, -5, 0.51)
	pt3dadd(4.71, 150.19, -5, 0.51)
	pt3dadd(4.92, 151.5, -4.75, 0.36)
	pt3dadd(5.07, 152.6, -4.75, 0.36)
	pt3dadd(5.28, 153.6, -4.75, 0.36)
  }
  dend[141] {pt3dclear()
	pt3dadd(11.81, 134, -5.5, 0.97)
	pt3dadd(10.88, 133.5, -6.5, 0.1898)
	pt3dadd(8.94, 133.3, -6.5, 0.25)
	pt3dadd(7.33, 132.8, -6.5, 0.25)
	pt3dadd(5.89, 131.9, -6.5, 0.31)
	pt3dadd(3.83, 130.4, -6.5, 0.44)
  }
  dend[142] {pt3dclear()
	pt3dadd(14.37, 120.8, -6, 1.25)
	pt3dadd(15.02, 121.3, -6, 0.61)
  }
}
proc shape3d_8() {
  dend[142] {	pt3dadd(16.09, 122.3, -6, 0.0498)
	pt3dadd(16.91, 123.2, -6, 0.0498)
	pt3dadd(17.47, 123.8, -6, 0.31)
	pt3dadd(17.93, 124.7, -6, 0.15)
	pt3dadd(18.64, 125.9, -6, 0.26)
	pt3dadd(19.11, 127.1, -6, 0.26)
	pt3dadd(19.52, 128.5, -6, 0.82)
	pt3dadd(19.88, 129.8, -6, 1.38)
  }
  dend[143] {pt3dclear()
	pt3dadd(19.88, 129.8, -6, 1.38)
	pt3dadd(19.72, 131.19, -6, 0.82)
	pt3dadd(20.03, 132.5, -5.75, 0.82)
	pt3dadd(20.13, 133.6, -5.75, 0.61)
	pt3dadd(20.44, 135, -5.75, 0.61)
	pt3dadd(20.64, 136.3, -5.5, 0.61)
	pt3dadd(20.85, 137.3, -5.5, 0.61)
  }
  dend[144] {pt3dclear()
	pt3dadd(20.85, 137.3, -5.5, 0.61)
	pt3dadd(20.8, 138.3, -5.5, 0.82)
	pt3dadd(20.69, 139.8, -5.5, 0.82)
	pt3dadd(20.69, 140.8, -5.5, 0.82)
	pt3dadd(21, 142.19, -5.25, 0.97)
	pt3dadd(21.36, 143.4, -5.25, 0.97)
  }
  dend[145] {pt3dclear()
	pt3dadd(21.36, 143.4, -5.25, 0.97)
	pt3dadd(21.92, 144.6, -5, 0.67)
	pt3dadd(22.59, 145.9, -4.75, 0.61)
	pt3dadd(23.25, 146.9, -4.75, 0.61)
  }
  dend[146] {pt3dclear()
	pt3dadd(23.25, 146.9, -4.75, 0.61)
	pt3dadd(23.14, 147.5, -4.75, 0.41)
	pt3dadd(23.19, 148, -4.75, 0.41)
	pt3dadd(23.25, 149, -4.5, 0.41)
	pt3dadd(23.25, 149.6, -4.5, 0.41)
	pt3dadd(23.5, 150.4, -4.5, 0.41)
	pt3dadd(23.96, 151, -4.5, 0.41)
	pt3dadd(24.27, 152, -4.25, 0.41)
	pt3dadd(24.58, 153.19, -4.25, 0.41)
	pt3dadd(24.32, 154, -4.25, 0.41)
	pt3dadd(24.22, 155, -4.25, 0.41)
	pt3dadd(24.37, 155.9, -4.25, 0.41)
  }
  dend[147] {pt3dclear()
	pt3dadd(23.25, 146.9, -4.75, 0.61)
	pt3dadd(24.06, 147.1, -4.75, 0.41)
	pt3dadd(24.73, 147.1, -4.75, 0.41)
	pt3dadd(25.7, 147.19, -4.75, 0.41)
	pt3dadd(26.57, 147.19, -4.75, 0.41)
  }
  dend[148] {pt3dclear()
	pt3dadd(26.57, 147.19, -4.75, 0.41)
	pt3dadd(27.29, 148, -4.75, 0.41)
	pt3dadd(27.95, 148.8, -4.75, 0.41)
	pt3dadd(28, 149.4, -4.75, 0.41)
  }
  dend[149] {pt3dclear()
	pt3dadd(28, 149.4, -4.75, 0.41)
	pt3dadd(27.54, 150, -4.75, 0.41)
	pt3dadd(27.13, 150.5, -4.75, 0.41)
	pt3dadd(26.78, 150.9, -4.75, 0.41)
  }
  dend[150] {pt3dclear()
	pt3dadd(28, 149.4, -4.75, 0.41)
	pt3dadd(28.62, 149.9, -4.75, 0.41)
	pt3dadd(28.92, 150.4, -4.75, 0.41)
	pt3dadd(29.28, 151.1, -4.75, 0.41)
	pt3dadd(29.69, 151.6, -4.75, 0.41)
	pt3dadd(30.25, 152.4, -4.75, 0.41)
  }
  dend[151] {pt3dclear()
	pt3dadd(26.57, 147.19, -4.75, 0.41)
	pt3dadd(27.03, 146.3, -4.75, 0.41)
	pt3dadd(27.59, 145.8, -4.75, 0.41)
	pt3dadd(28.11, 145.19, -4.75, 0.41)
	pt3dadd(29.13, 144.69, -5, 0.41)
	pt3dadd(29.84, 144.8, -5, 0.41)
	pt3dadd(30.56, 145.6, -5, 0.41)
	pt3dadd(30.92, 146.4, -5, 0.41)
	pt3dadd(31.23, 147.3, -5, 0.41)
	pt3dadd(31.23, 148.1, -5, 0.41)
	pt3dadd(31.23, 149.3, -5, 0.41)
	pt3dadd(31.38, 150.4, -5, 0.41)
  }
  dend[152] {pt3dclear()
	pt3dadd(21.36, 143.4, -5.25, 0.97)
	pt3dadd(20.8, 144.3, -5, 0.61)
	pt3dadd(20.54, 145.6, -5, 0.61)
	pt3dadd(20.59, 146.6, -5, 0.56)
	pt3dadd(20.54, 147.69, -5, 0.56)
	pt3dadd(20.64, 148.3, -5, 0.67)
	pt3dadd(20.69, 149.5, -5, 0.77)
	pt3dadd(21.15, 150.69, -4.75, 0.77)
	pt3dadd(21.26, 151.8, -4.75, 0.46)
	pt3dadd(21.72, 153.19, -4.75, 0.46)
	pt3dadd(21.77, 153.69, -4.75, 0.46)
	pt3dadd(22.23, 155, -4.75, 0.46)
	pt3dadd(22.79, 156.19, -4.75, 0.46)
	pt3dadd(22.94, 157.5, -4.5, 0.46)
	pt3dadd(22.94, 158.19, -4.5, 0.46)
	pt3dadd(23.66, 158.9, -4.5, 0.46)
	pt3dadd(24.27, 159.6, -4.5, 0.46)
	pt3dadd(24.68, 160.5, -4.5, 0.46)
	pt3dadd(24.68, 161.3, -4.5, 0.46)
  }
  dend[153] {pt3dclear()
	pt3dadd(20.85, 137.3, -5.5, 0.61)
	pt3dadd(21.92, 138.1, -5.5, 0.46)
	pt3dadd(22.74, 139.1, -5.5, 0.31)
	pt3dadd(23.35, 140.5, -5.5, 0.31)
	pt3dadd(23.97, 142.1, -5.25, 0.36)
	pt3dadd(24.12, 143.3, -5.25, 0.26)
	pt3dadd(24.27, 144.4, -5.25, 0.26)
	pt3dadd(24.17, 145.69, -5.25, 0.26)
	pt3dadd(24.27, 148, -5.25, 0.26)
  }
  dend[154] {pt3dclear()
	pt3dadd(19.88, 129.8, -6, 1.38)
	pt3dadd(20.48, 130.6, -5.75, 0.56)
	pt3dadd(21.24, 131.6, -5.75, 0.41)
	pt3dadd(22.17, 132.8, -5.75, 0.41)
	pt3dadd(23.6, 133.6, -5.75, 0.41)
	pt3dadd(24.57, 134.19, -5.5, 0.41)
	pt3dadd(25.85, 134.8, -5.5, 0.41)
	pt3dadd(27.03, 134.9, -5.5, 0.41)
	pt3dadd(28.71, 135.1, -5.25, 0.41)
	pt3dadd(29.74, 135.1, -5.25, 0.41)
	pt3dadd(30.71, 135, -5, 0.41)
  }
  dend[155] {pt3dclear()
	pt3dadd(12.72, 104.4, -6.25, 3.3)
	pt3dadd(11.38, 105.2, -6.5, 1.25)
	pt3dadd(10.44, 106.4, -6.5, 0.94)
	pt3dadd(9.57, 107.5, -6.5, 0.81)
	pt3dadd(8.63, 108.2, -6.5, 1.12)
	pt3dadd(8.17, 109, -6.5, 1.12)
  }
  dend[156] {pt3dclear()
	pt3dadd(8.17, 109, -6.5, 1.12)
	pt3dadd(7.89, 109.3, -6.5, 1.68)
	pt3dadd(7.86, 109.5, -6.5, 1.68)
  }
  dend[157] {pt3dclear()
	pt3dadd(7.86, 109.5, -6.5, 1.68)
	pt3dadd(7.2, 110.8, -6.75, 1.25)
	pt3dadd(6.83, 111.8, -6.75, 0.87)
	pt3dadd(6.58, 113.1, -6.75, 0.75)
	pt3dadd(6.64, 112.8, -6.5, 0.75)
	pt3dadd(6.51, 113.3, -6.75, 0.75)
  }
  dend[158] {pt3dclear()
	pt3dadd(6.51, 113.3, -6.75, 0.75)
	pt3dadd(6.27, 114.5, -6.75, 0.75)
	pt3dadd(5.83, 115.6, -6.75, 1)
	pt3dadd(5.39, 116.5, -6.75, 1)
  }
  dend[159] {pt3dclear()
	pt3dadd(5.39, 116.5, -6.75, 1)
	pt3dadd(5.21, 116.7, -6.75, 1.75)
	pt3dadd(5.08, 117.9, -6.75, 1.43)
	pt3dadd(4.86, 118.3, -6.75, 1.43)
  }
  dend[160] {pt3dclear()
	pt3dadd(4.86, 118.3, -6.75, 1.43)
	pt3dadd(4.58, 119, -6.75, 1.18)
	pt3dadd(3.65, 119.8, -7, 1.06)
	pt3dadd(2.65, 121, -7, 1)
	pt3dadd(1.65, 122.2, -7, 1)
	pt3dadd(0.22, 123.8, -7, 1)
	pt3dadd(-0.13, 124.3, -7.25, 1.25)
	pt3dadd(-0.41, 125, -7.25, 1.25)
  }
  dend[161] {pt3dclear()
	pt3dadd(-0.41, 125, -7.25, 1.25)
	pt3dadd(-1.71, 125.3, -7.25, 1)
	pt3dadd(-2.84, 125.8, -7.25, 1.25)
	pt3dadd(-3.4, 126.3, -7.25, 1.25)
  }
  dend[162] {pt3dclear()
	pt3dadd(-3.4, 126.3, -7.25, 1.25)
	pt3dadd(-6.09, 125, -7.25, 1.5)
  }
  dend[163] {pt3dclear()
	pt3dadd(-6.09, 125, -7.25, 1.5)
	pt3dadd(-3.99, 126, -7.25, 1.5)
	pt3dadd(-4.63, 125.6, -7.5, 1.06)
	pt3dadd(-5.83, 125.2, -7.5, 0.81)
	pt3dadd(-6.7, 124.8, -7.5, 1.12)
	pt3dadd(-7.76, 125.3, -7.75, 1)
	pt3dadd(-8.32, 126.1, -7.75, 0.81)
	pt3dadd(-8.69, 127.2, -7.75, 0.69)
	pt3dadd(-9.44, 128.1, -7.75, 0.62)
	pt3dadd(-10.13, 128.69, -8, 0.5)
	pt3dadd(-11.13, 129.4, -8, 0.69)
	pt3dadd(-12.13, 129.6, -8, 0.81)
	pt3dadd(-13.06, 129.4, -8.25, 0.62)
	pt3dadd(-14.37, 129.9, -8.25, 0.75)
	pt3dadd(-14.25, 131.1, -8.25, 0.81)
	pt3dadd(-15.06, 132.4, -8.25, 0.81)
	pt3dadd(-14.62, 133.5, -8.25, 0.81)
	pt3dadd(-14.5, 134.69, -8.25, 0.56)
	pt3dadd(-14.99, 136, -8.25, 0.62)
	pt3dadd(-15.55, 137.19, -8.25, 0.62)
	pt3dadd(-15.68, 138, -8, 0.62)
	pt3dadd(-15.93, 138.8, -8, 0.56)
	pt3dadd(-16.18, 139.8, -8, 0.5)
	pt3dadd(-16.37, 140.8, -8, 0.37)
	pt3dadd(-16.3, 141.69, -8, 0.5)
	pt3dadd(-16.05, 142.4, -7.75, 0.1898)
  }
  dend[164] {pt3dclear()
	pt3dadd(-6.09, 125, -7.25, 1.5)
	pt3dadd(-4.09, 126.9, -7.25, 0.97)
	pt3dadd(-4.59, 127.3, -7.5, 0.67)
	pt3dadd(-5.11, 127.5, -7.5, 0.67)
	pt3dadd(-5.78, 127.9, -7.5, 0.67)
	pt3dadd(-6.03, 128.19, -7.5, 0.67)
	pt3dadd(-6.49, 128.6, -7.5, 0.67)
	pt3dadd(-6.7, 128.9, -7.5, 0.67)
	pt3dadd(-7.11, 129.3, -7.5, 0.67)
	pt3dadd(-7.62, 129.6, -7.5, 0.67)
	pt3dadd(-7.93, 130.1, -7.5, 0.67)
	pt3dadd(-8.59, 130.6, -7.75, 0.67)
	pt3dadd(-9.1, 131.3, -7.75, 0.67)
	pt3dadd(-9.41, 131.5, -7.75, 0.67)
	pt3dadd(-9.15, 132.1, -7.75, 0.67)
	pt3dadd(-9.1, 132.8, -7.75, 0.67)
	pt3dadd(-9.05, 133.3, -7.75, 0.67)
	pt3dadd(-9.05, 133.9, -7.75, 0.56)
	pt3dadd(-9.05, 134.3, -7.75, 0.56)
	pt3dadd(-9.05, 135, -7.75, 0.56)
	pt3dadd(-9.05, 135.3, -7.75, 0.56)
  }
  dend[165] {pt3dclear()
	pt3dadd(-3.4, 126.3, -7.25, 1.25)
	pt3dadd(-3.17, 127.3, -7.25, 0.77)
	pt3dadd(-3.06, 128.5, -7.25, 0.72)
	pt3dadd(-3.22, 129.5, -7.25, 0.72)
	pt3dadd(-3.42, 131.19, -7.25, 0.67)
	pt3dadd(-3.83, 132.19, -7.25, 0.67)
	pt3dadd(-3.98, 132.9, -7.25, 0.67)
	pt3dadd(-3.93, 134, -7.25, 0.67)
	pt3dadd(-3.88, 135, -7.25, 0.67)
  }
}
proc shape3d_9() {
  dend[165] {	pt3dadd(-3.83, 136.3, -7.25, 0.67)
	pt3dadd(-4.19, 137.1, -7.25, 0.51)
	pt3dadd(-4.44, 137.69, -7.25, 0.51)
	pt3dadd(-5.05, 138.9, -7.5, 0.56)
	pt3dadd(-5.58, 139.4, -7.5, 0.56)
  }
  dend[166] {pt3dclear()
	pt3dadd(-5.58, 139.4, -7.5, 0.56)
	pt3dadd(-5.93, 140, -7.5, 0.61)
	pt3dadd(-6.34, 140.69, -7.5, 0.56)
	pt3dadd(-6.8, 141.6, -7.5, 0.56)
	pt3dadd(-7.26, 142.4, -7.5, 0.51)
	pt3dadd(-7.56, 143.19, -7.5, 0.51)
	pt3dadd(-7.72, 143.9, -7.75, 0.51)
	pt3dadd(-7.92, 144.8, -7.75, 0.51)
	pt3dadd(-8.18, 145.3, -7.75, 0.51)
	pt3dadd(-8.33, 146.3, -7.75, 0.51)
	pt3dadd(-8.53, 147.19, -7.75, 0.51)
	pt3dadd(-9.1, 147.8, -7.75, 0.51)
	pt3dadd(-9.51, 148.4, -7.75, 0.51)
	pt3dadd(-10.28, 148.69, -7.75, 0.51)
	pt3dadd(-10.84, 148.3, -7.75, 0.51)
	pt3dadd(-11.55, 147.69, -7.75, 0.51)
	pt3dadd(-11.76, 147, -7.75, 0.51)
	pt3dadd(-11.86, 146.4, -7.75, 0.51)
	pt3dadd(-11.96, 145.6, -7.75, 0.51)
	pt3dadd(-12.07, 144.9, -7.75, 0.51)
  }
  dend[167] {pt3dclear()
	pt3dadd(-5.58, 139.4, -7.5, 0.56)
	pt3dadd(-5.98, 139.1, -7.5, 0.51)
	pt3dadd(-6.85, 138.9, -7.5, 0.41)
	pt3dadd(-7.51, 138.9, -7.5, 0.41)
	pt3dadd(-8.13, 139.19, -7.5, 0.46)
	pt3dadd(-8.49, 139.6, -7.5, 0.46)
	pt3dadd(-9.25, 139.6, -7.75, 0.46)
	pt3dadd(-9.76, 139.3, -7.75, 0.46)
	pt3dadd(-10.11, 138.9, -7.75, 0.46)
	pt3dadd(-10.28, 138.5, -7.75, 0.46)
	pt3dadd(-10.38, 138.1, -7.75, 0.46)
  }
  dend[168] {pt3dclear()
	pt3dadd(-0.41, 125, -7.25, 1.25)
	pt3dadd(-0.03, 125.5, -7.25, 0.51)
	pt3dadd(0.21, 126.5, -7.25, 0.46)
	pt3dadd(0.31, 127.2, -7.25, 0.41)
	pt3dadd(0.26, 127.9, -7.25, 0.41)
	pt3dadd(0.42, 128.5, -7.25, 0.41)
	pt3dadd(0.52, 129.3, -7.25, 0.41)
	pt3dadd(0.72, 130, -7.25, 0.41)
	pt3dadd(1.03, 130.6, -7.25, 0.41)
	pt3dadd(1.08, 131.1, -7.25, 0.41)
	pt3dadd(0.98, 131.9, -7.25, 0.41)
	pt3dadd(0.77, 132.4, -7.25, 0.41)
	pt3dadd(0.67, 133.4, -7.25, 0.41)
	pt3dadd(0.62, 134.19, -7.25, 0.41)
  }
  dend[169] {pt3dclear()
	pt3dadd(0.62, 134.19, -7.25, 0.41)
	pt3dadd(-0.09, 134.4, -7.25, 0.41)
	pt3dadd(-0.45, 135.1, -7.25, 0.36)
	pt3dadd(-0.81, 136.4, -7.25, 0.41)
	pt3dadd(-1.07, 137.6, -7.25, 0.51)
	pt3dadd(-1.22, 138.5, -7.25, 0.51)
	pt3dadd(-1.32, 139.1, -7.25, 0.51)
	pt3dadd(-1.58, 139.8, -7.25, 0.51)
	pt3dadd(-1.78, 140.69, -7.25, 0.41)
	pt3dadd(-1.84, 141.4, -7.25, 0.41)
	pt3dadd(-2.14, 142.3, -7, 0.41)
	pt3dadd(-2.7, 142.9, -7, 0.41)
	pt3dadd(-3.06, 143.8, -7.25, 0.41)
	pt3dadd(-3.73, 144.4, -7.25, 0.31)
	pt3dadd(-4.29, 144.9, -7.25, 0.31)
	pt3dadd(-4.44, 145.8, -7.25, 0.31)
	pt3dadd(-4.59, 146.5, -7.25, 0.31)
	pt3dadd(-4.8, 147.1, -7.5, 0.31)
	pt3dadd(-5.11, 147.9, -7.5, 0.31)
	pt3dadd(-5.62, 148.3, -7.5, 0.31)
  }
  dend[170] {pt3dclear()
	pt3dadd(0.62, 134.19, -7.25, 0.41)
	pt3dadd(1.08, 134.9, -7.25, 0.41)
	pt3dadd(1.18, 135.6, -7.25, 0.41)
	pt3dadd(1.39, 136.3, -7.25, 0.41)
	pt3dadd(1.64, 136.9, -7.25, 0.41)
	pt3dadd(1.9, 137.19, -7, 0.41)
	pt3dadd(2.15, 137.6, -7, 0.41)
	pt3dadd(2.56, 138.1, -7, 0.41)
	pt3dadd(3.18, 138.69, -7, 0.41)
  }
  dend[171] {pt3dclear()
	pt3dadd(4.86, 118.3, -6.75, 1.43)
	pt3dadd(5.77, 119.6, -7, 0.5)
	pt3dadd(6.27, 121.6, -7, 0.5)
	pt3dadd(6.14, 124.1, -7, 0.5)
  }
  dend[172] {pt3dclear()
	pt3dadd(6.14, 124.1, -7, 0.5)
	pt3dadd(5.34, 124.4, -7, 0.44)
  }
  dend[173] {pt3dclear()
	pt3dadd(5.34, 124.4, -7, 0.44)
	pt3dadd(4.55, 124.8, -7, 0.44)
	pt3dadd(7.64, 125.1, -7, 0.06)
	pt3dadd(8.44, 126.1, -7, 0.06)
  }
  dend[174] {pt3dclear()
	pt3dadd(8.44, 126.1, -7, 0.06)
	pt3dadd(8.33, 126.7, -7, 0.31)
  }
  dend[175] {pt3dclear()
	pt3dadd(8.33, 126.7, -7, 0.31)
	pt3dadd(8.21, 127.3, -7, 0.31)
  }
  dend[176] {pt3dclear()
	pt3dadd(8.21, 127.3, -7, 0.31)
	pt3dadd(8.07, 128.1, -7, 0.31)
  }
  dend[177] {pt3dclear()
	pt3dadd(8.21, 127.3, -7, 0.31)
	pt3dadd(9.51, 127.7, -7, 0.06)
	pt3dadd(10.94, 128.9, -7, 0.06)
  }
  dend[178] {pt3dclear()
	pt3dadd(8.33, 126.7, -7, 0.31)
	pt3dadd(7.39, 129.19, -7, 0.06)
	pt3dadd(6.45, 130.1, -7, 0.06)
  }
  dend[179] {pt3dclear()
	pt3dadd(8.44, 126.1, -7, 0.06)
	pt3dadd(8.57, 128.4, -7, 0.06)
	pt3dadd(8.44, 130.9, -7, 0.06)
	pt3dadd(8.44, 131.9, -7, 0.06)
	pt3dadd(8.07, 133, -7, 0.06)
	pt3dadd(7.76, 134, -7, 0.44)
	pt3dadd(6.27, 135.4, -7, 0.44)
  }
  dend[180] {pt3dclear()
	pt3dadd(5.34, 124.4, -7, 0.44)
	pt3dadd(4.01, 126.2, -7, 0.37)
	pt3dadd(3.09, 127.4, -7, 0.37)
	pt3dadd(2.52, 128.69, -7, 0.37)
	pt3dadd(1.65, 129.4, -7, 0.5)
  }
  dend[181] {pt3dclear()
	pt3dadd(6.14, 124.1, -7, 0.5)
	pt3dadd(6.14, 126.1, -7, 0.1898)
	pt3dadd(5.89, 128.1, -7, 0.37)
	pt3dadd(5.39, 130.1, -7, 0.37)
	pt3dadd(4.71, 131.9, -7, 0.37)
	pt3dadd(4.26, 134.19, -7, 0.37)
  }
  dend[182] {pt3dclear()
	pt3dadd(5.39, 116.5, -6.75, 1)
	pt3dadd(4.71, 116.2, -7, 0.5)
	pt3dadd(3.65, 115.9, -7, 0.37)
	pt3dadd(2.15, 115.9, -7, 0.44)
	pt3dadd(0.97, 116.2, -7, 0.44)
	pt3dadd(0.03, 116.3, -7, 0.56)
	pt3dadd(-1.28, 116.7, -7, 0.56)
	pt3dadd(-1.84, 116.1, -7, 0.31)
	pt3dadd(-2.27, 115.5, -7, 0.31)
	pt3dadd(-2.96, 114.5, -7, 0.31)
	pt3dadd(-3.27, 113.2, -7, 0.31)
	pt3dadd(-3.58, 112.4, -7, 0.44)
	pt3dadd(-3.15, 111.5, -7, 0.44)
	pt3dadd(-2.96, 110.7, -7, 0.44)
	pt3dadd(-3.9, 109.5, -7, 0.44)
  }
  dend[183] {pt3dclear()
	pt3dadd(6.51, 113.3, -6.75, 0.75)
	pt3dadd(5.39, 113.5, -6, 0.25)
	pt3dadd(5.01, 113.9, -6, 0.25)
  }
  dend[184] {pt3dclear()
	pt3dadd(5.01, 113.9, -6, 0.25)
	pt3dadd(3.77, 113.5, -6.75, 0.25)
	pt3dadd(2.9, 113.3, -6.75, 0.25)
	pt3dadd(2.09, 113, -6.75, 0.25)
	pt3dadd(1.47, 112.7, -6.75, 0.37)
	pt3dadd(0.22, 112.7, -6.75, 0.37)
	pt3dadd(-0.41, 112.6, -6.75, 0.37)
	pt3dadd(-1.22, 111.7, -6.75, 0.37)
	pt3dadd(-2.27, 111.2, -6.75, 0.31)
  }
  dend[185] {pt3dclear()
	pt3dadd(5.01, 113.9, -6, 0.25)
	pt3dadd(4.46, 114.4, -6, 0.25)
	pt3dadd(3.9, 115.3, -6, 0.25)
	pt3dadd(3.27, 116.1, -6, 0.25)
	pt3dadd(2.71, 117, -6, 0.25)
	pt3dadd(2.02, 118, -6, 0.5)
	pt3dadd(1.53, 118.6, -6, 0.44)
	pt3dadd(0.97, 119.3, -6, 0.44)
	pt3dadd(0.97, 120.6, -6.25, 0.44)
	pt3dadd(1.09, 121.3, -6.25, 0.44)
	pt3dadd(1.47, 122.4, -6.25, 0.44)
	pt3dadd(1.96, 123.6, -6.25, 0.1898)
	pt3dadd(3.09, 123.9, -6.25, 0.1898)
	pt3dadd(4.15, 124.7, -6.25, 0.1898)
	pt3dadd(4.76, 125.2, -6.25, 0.1898)
	pt3dadd(5.58, 125.8, -6.25, 0.1898)
	pt3dadd(6.27, 126.6, -6.25, 0.1898)
	pt3dadd(7.2, 127.5, -6.25, 0.1898)
	pt3dadd(8.32, 128.69, -6, 0.1898)
	pt3dadd(9.44, 129.6, -5.75, 0.1898)
	pt3dadd(9.94, 130.5, -5.75, 0.1898)
	pt3dadd(10.69, 131.6, -5.75, 0.1898)
	pt3dadd(11.07, 132.5, -5.75, 0.1898)
	pt3dadd(11.63, 133.19, -5.75, 0.25)
  }
  dend[186] {pt3dclear()
	pt3dadd(7.86, 109.5, -6.5, 1.68)
	pt3dadd(8.63, 110.4, -6.5, 0.25)
	pt3dadd(9.13, 111.5, -6.5, 0.06)
	pt3dadd(9.19, 113.6, -6.5, 0.06)
	pt3dadd(9.19, 114.9, -6.5, 0.06)
	pt3dadd(9.19, 116, -6.5, 0.12)
	pt3dadd(9.13, 117.8, -6.5, 0.12)
	pt3dadd(9.01, 119.5, -6.5, 0.12)
	pt3dadd(9.13, 120.5, -6.5, 0.37)
	pt3dadd(9.06, 121.2, -6.5, 0.37)
  }
  dend[187] {pt3dclear()
	pt3dadd(9.06, 121.2, -6.5, 0.37)
	pt3dadd(9.07, 121.5, -6.5, 0.37)
	pt3dadd(9.3, 123.1, -6.5, 0.37)
  }
  dend[188] {pt3dclear()
	pt3dadd(9.3, 123.1, -6.5, 0.37)
	pt3dadd(9.01, 124.3, -6.5, 0.37)
  }
  dend[189] {pt3dclear()
	pt3dadd(9.3, 123.1, -6.5, 0.37)
	pt3dadd(10.13, 123.7, -6.5, 0.06)
	pt3dadd(11, 124.3, -6.5, 0.12)
	pt3dadd(11.75, 124.6, -6.5, 0.25)
	pt3dadd(13.5, 125.6, -6.5, 0.25)
	pt3dadd(14.74, 125.7, -6.5, 0.25)
	pt3dadd(16.93, 125.3, -6.5, 0.25)
	pt3dadd(17.67, 124.3, -6.5, 0.44)
  }
  dend[190] {pt3dclear()
	pt3dadd(9.06, 121.2, -6.5, 0.37)
	pt3dadd(9.94, 121.1, -6.5, 0.31)
	pt3dadd(10.82, 121.1, -6.5, 0.31)
	pt3dadd(11.07, 121, -6.5, 0.31)
	pt3dadd(11.44, 121.1, -6.5, 0.31)
  }
  dend[191] {pt3dclear()
	pt3dadd(8.17, 109, -6.5, 1.12)
	pt3dadd(7.14, 108, -6.75, 0.87)
  }
}
proc shape3d_10() {
  dend[191] {	pt3dadd(6.45, 107.2, -6.75, 0.75)
	pt3dadd(5.92, 106.8, -6.75, 0.75)
  }
  dend[192] {pt3dclear()
	pt3dadd(5.92, 106.8, -6.75, 0.75)
	pt3dadd(5.52, 106.4, -6.75, 0.94)
	pt3dadd(5.01, 105.3, -6.75, 1.12)
  }
  dend[193] {pt3dclear()
	pt3dadd(5.01, 105.3, -6.75, 1.12)
	pt3dadd(5.55, 104.5, -6.75, 0.5)
  }
  dend[194] {pt3dclear()
	pt3dadd(5.55, 104.5, -6.75, 0.5)
	pt3dadd(5.77, 104.1, -6.75, 0.5)
	pt3dadd(6.2, 103.3, -6.75, 0.37)
	pt3dadd(6.76, 102.7, -6.75, 0.37)
	pt3dadd(7.7, 101.8, -6.75, 0.37)
	pt3dadd(8.01, 101.3, -6.75, 0.37)
  }
  dend[195] {pt3dclear()
	pt3dadd(8.01, 101.3, -6.75, 0.37)
	pt3dadd(9.82, 103, -6.5, 0.37)
	pt3dadd(10.63, 104.7, -6.25, 0.37)
	pt3dadd(11.32, 106.1, -6.25, 0.37)
	pt3dadd(11.81, 107.9, -6.25, 0.37)
	pt3dadd(11.81, 109.3, -6, 0.37)
	pt3dadd(11.88, 110.8, -6, 0.37)
	pt3dadd(11.81, 112.6, -6, 0.37)
	pt3dadd(11.69, 114.5, -6, 0.1898)
	pt3dadd(12.06, 116.4, -6, 0.12)
	pt3dadd(12.44, 117.5, -6, 0.12)
  }
  dend[196] {pt3dclear()
	pt3dadd(8.01, 101.3, -6.75, 0.37)
	pt3dadd(7.39, 100.6, -6.75, 0.12)
	pt3dadd(7.01, 99.75, -6.75, 0.12)
	pt3dadd(7.08, 98.44, -6.75, 0.25)
	pt3dadd(7.33, 96.76, -6.75, 0.25)
	pt3dadd(7.2, 95.7, -6.75, 0.25)
	pt3dadd(6.45, 95.01, -6.75, 0.12)
	pt3dadd(5.52, 94.33, -6.75, 0.12)
	pt3dadd(3.9, 94.83, -6.75, 0.12)
	pt3dadd(3.02, 94.76, -6.75, 0.12)
  }
  dend[197] {pt3dclear()
	pt3dadd(5.55, 104.5, -6.75, 0.5)
	pt3dadd(4.58, 103.9, -6.75, 0.12)
	pt3dadd(4.33, 102.6, -6.75, 0.12)
	pt3dadd(4.15, 101.5, -6.75, 0.25)
	pt3dadd(3.46, 100.2, -6.75, 0.31)
	pt3dadd(2.59, 99.19, -7, 0.31)
  }
  dend[198] {pt3dclear()
	pt3dadd(2.59, 99.19, -7, 0.31)
	pt3dadd(1.34, 98.57, -7, 0.31)
	pt3dadd(0.41, 97.57, -7, 0.31)
  }
  dend[199] {pt3dclear()
	pt3dadd(0.41, 97.57, -7, 0.31)
	pt3dadd(-0.41, 97.38, -7.25, 0.25)
	pt3dadd(-1.9, 97.07, -7.25, 0.25)
	pt3dadd(-3.4, 97.13, -7.25, 0.25)
	pt3dadd(-4.71, 97.94, -7.75, 0.25)
	pt3dadd(-5.89, 98.88, -7.75, 0.25)
	pt3dadd(-6.27, 100.1, -7.75, 0.37)
	pt3dadd(-6.27, 100.9, -7.75, 0.5)
	pt3dadd(-6.51, 102.3, -8, 0.5)
  }
  dend[200] {pt3dclear()
	pt3dadd(0.41, 97.57, -7, 0.31)
	pt3dadd(0.09, 96.88, -7.25, 0.37)
	pt3dadd(-0.16, 95.89, -7.25, 0.37)
	pt3dadd(-0.34, 94.89, -7.25, 0.44)
	pt3dadd(-0.47, 93.58, -7.25, 0.44)
	pt3dadd(-0.47, 92.02, -7.25, 0.44)
	pt3dadd(-0.65, 91.52, -7.25, 0.25)
	pt3dadd(-1.28, 90.65, -7.25, 0.25)
	pt3dadd(-2.34, 90.4, -7.25, 0.44)
	pt3dadd(-2.96, 90.84, -7.25, 0.37)
	pt3dadd(-3.77, 91.9, -7.25, 0.31)
	pt3dadd(-4.26, 93.2, -7.25, 0.31)
  }
  dend[201] {pt3dclear()
	pt3dadd(2.59, 99.19, -7, 0.31)
	pt3dadd(2.96, 97.88, -7, 0.31)
	pt3dadd(2.9, 96.01, -7, 0.31)
	pt3dadd(2.65, 94.95, -7, 0.31)
	pt3dadd(2.77, 93.95, -7, 0.31)
	pt3dadd(2.71, 92.39, -7, 0.31)
	pt3dadd(1.96, 91.4, -7, 0.31)
	pt3dadd(1.28, 90.77, -7, 0.31)
  }
  dend[202] {pt3dclear()
	pt3dadd(5.01, 105.3, -6.75, 1.12)
	pt3dadd(3.96, 105.2, -6.75, 0.44)
	pt3dadd(3.02, 104.8, -7, 0.37)
	pt3dadd(2.02, 104.6, -7, 0.37)
	pt3dadd(1.28, 104.2, -7, 0.5)
	pt3dadd(-0.16, 104.4, -7.25, 0.44)
	pt3dadd(-1.53, 105.1, -7.25, 0.44)
  }
  dend[203] {pt3dclear()
	pt3dadd(-1.53, 105.1, -7.25, 0.44)
	pt3dadd(-1.51, 105.6, -7.32, 0.25)
  }
  dend[204] {pt3dclear()
	pt3dadd(-1.51, 105.6, -7.32, 0.25)
	pt3dadd(-1.47, 106.7, -7.5, 0.25)
	pt3dadd(-1.4, 108, -7.5, 0.25)
	pt3dadd(-1.53, 109.2, -7.5, 0.25)
	pt3dadd(-1.4, 110.8, -7.5, 0.25)
	pt3dadd(-1.53, 112.3, -7.75, 0.25)
	pt3dadd(-1.71, 113.8, -7.75, 0.25)
	pt3dadd(-2.34, 115.2, -7.75, 0.25)
	pt3dadd(-3.71, 116.5, -7.75, 0.25)
  }
  dend[205] {pt3dclear()
	pt3dadd(-1.51, 105.6, -7.32, 0.25)
	pt3dadd(-2.59, 105.6, -7.5, 0.25)
	pt3dadd(-4.58, 106.5, -7.75, 0.25)
  }
  dend[206] {pt3dclear()
	pt3dadd(-4.58, 106.5, -7.75, 0.25)
	pt3dadd(-4.4, 108.2, -7.75, 0.25)
	pt3dadd(-4.4, 109.5, -7.75, 0.25)
	pt3dadd(-3.96, 110.7, -7.75, 0.25)
	pt3dadd(-4.51, 112, -7.75, 0.25)
  }
  dend[207] {pt3dclear()
	pt3dadd(-4.58, 106.5, -7.75, 0.25)
	pt3dadd(-5.7, 106.7, -7.75, 0.25)
	pt3dadd(-6.58, 107.4, -7.75, 0.25)
	pt3dadd(-7.76, 108, -7.75, 0.25)
	pt3dadd(-8.82, 108.8, -8, 0.25)
	pt3dadd(-9.19, 109.6, -8, 0.25)
  }
  dend[208] {pt3dclear()
	pt3dadd(-1.53, 105.1, -7.25, 0.44)
	pt3dadd(-1.53, 104.4, -7.5, 0.1898)
	pt3dadd(-1.84, 103.4, -7.5, 0.1898)
	pt3dadd(-2.65, 102.8, -7.5, 0.1898)
	pt3dadd(-2.71, 101.8, -7.5, 0.1898)
	pt3dadd(-2.59, 100.6, -7.5, 0.1898)
	pt3dadd(-3.34, 99.5, -7.5, 0.1898)
  }
  dend[209] {pt3dclear()
	pt3dadd(5.92, 106.8, -6.75, 0.75)
	pt3dadd(5.27, 107.3, -6.75, 0.06)
	pt3dadd(4.83, 108.7, -6.75, 0.06)
	pt3dadd(4.4, 109.7, -6.75, 0.06)
	pt3dadd(4.15, 110.3, -6.75, 0.06)
	pt3dadd(3.34, 110.7, -7, 0.06)
	pt3dadd(2.46, 110.4, -7, 0.06)
	pt3dadd(2.02, 109.7, -7, 0.06)
	pt3dadd(1.71, 109.3, -7.25, 0.06)
  }
  dend[210] {pt3dclear()
	pt3dadd(12.13, 102.6, -6.5, 2.31)
	pt3dadd(14.33, 102.9, -6.25, 0.51)
	pt3dadd(15.38, 103.1, -6, 0.18)
	pt3dadd(16.45, 103.5, -6, 0.18)
	pt3dadd(17.27, 104.3, -6, 0.18)
	pt3dadd(18.14, 105, -5.75, 0.92)
  }
  dend[211] {pt3dclear()
	pt3dadd(18.14, 105, -5.75, 0.92)
	pt3dadd(18.6, 106, -5.75, 0.56)
	pt3dadd(19.21, 106.8, -5.75, 0.51)
	pt3dadd(19.98, 107.6, -5.75, 0.46)
	pt3dadd(20.19, 108.3, -5.5, 0.46)
  }
  dend[212] {pt3dclear()
	pt3dadd(20.19, 108.3, -5.5, 0.46)
	pt3dadd(19.73, 109.2, -5.5, 0.46)
	pt3dadd(19.27, 109.8, -5.5, 0.46)
	pt3dadd(19.21, 110.2, -5.5, 0.51)
	pt3dadd(19.68, 111.4, -5.5, 0.51)
	pt3dadd(20.29, 112.6, -5.5, 0.51)
	pt3dadd(21.57, 113.9, -5.5, 0.51)
  }
  dend[213] {pt3dclear()
	pt3dadd(20.19, 108.3, -5.5, 0.46)
	pt3dadd(21.11, 109, -5.5, 0.41)
  }
  dend[214] {pt3dclear()
	pt3dadd(21.11, 109, -5.5, 0.41)
	pt3dadd(21.77, 109.9, -5.25, 0.31)
	pt3dadd(22.13, 111.3, -5.25, 0.31)
	pt3dadd(22.8, 112.3, -5.25, 0.31)
	pt3dadd(23.92, 113.3, -5.25, 0.31)
	pt3dadd(25, 114.7, -5, 0.31)
  }
  dend[215] {pt3dclear()
	pt3dadd(21.11, 109, -5.5, 0.41)
	pt3dadd(22.54, 109.4, -5.5, 0.31)
	pt3dadd(24.18, 109.6, -5.25, 0.31)
	pt3dadd(25.1, 109.2, -5.25, 0.31)
	pt3dadd(26.02, 108.6, -5.25, 0.31)
	pt3dadd(26.99, 107.8, -5, 0.31)
  }
  dend[216] {pt3dclear()
	pt3dadd(18.14, 105, -5.75, 0.92)
	pt3dadd(18.96, 104.1, -5.75, 0.61)
	pt3dadd(20.23, 103.9, -5.75, 0.82)
  }
  dend[217] {pt3dclear()
	pt3dadd(20.23, 103.9, -5.75, 0.82)
	pt3dadd(21.45, 103.1, -5.75, 0.72)
  }
  dend[218] {pt3dclear()
	pt3dadd(21.45, 103.1, -5.75, 0.72)
	pt3dadd(21.21, 103.3, -5.75, 0.72)
	pt3dadd(22.34, 102.4, -5.75, 0.61)
	pt3dadd(23.46, 101.7, -5.75, 0.61)
	pt3dadd(24.89, 100.7, -5.75, 0.61)
	pt3dadd(26.02, 99.74, -5.75, 0.77)
	pt3dadd(26.68, 98.77, -5.75, 0.67)
	pt3dadd(26.89, 97.8, -5.75, 0.67)
	pt3dadd(26.73, 96.62, -5.75, 0.72)
	pt3dadd(26.79, 96.27, -5.75, 0.72)
	pt3dadd(27.01, 95.79, -6, 0.18)
	pt3dadd(26.96, 95.12, -6, 0.18)
	pt3dadd(27.12, 94.3, -6, 0.18)
	pt3dadd(27.12, 93.79, -6, 0.18)
	pt3dadd(27.12, 93.43, -6.25, 0.18)
	pt3dadd(27.32, 92.87, -6.25, 0.18)
	pt3dadd(27.47, 92.31, -6.25, 0.31)
	pt3dadd(25.72, 90.4, -6.25, 0.31)
	pt3dadd(27.63, 91.85, -6.25, 0.31)
  }
  dend[219] {pt3dclear()
	pt3dadd(21.45, 103.1, -5.75, 0.72)
	pt3dadd(20.54, 103, -5.75, 0.51)
	pt3dadd(20.6, 101.7, -5.75, 0.46)
	pt3dadd(20.65, 100.7, -5.75, 0.46)
	pt3dadd(20.65, 100, -5.75, 0.61)
	pt3dadd(20.36, 99.63, -5.75, 0.61)
  }
  dend[220] {pt3dclear()
	pt3dadd(20.36, 99.63, -5.75, 0.61)
	pt3dadd(19.88, 99.08, -5.75, 0.77)
	pt3dadd(18.86, 98.72, -5.75, 0.67)
	pt3dadd(17.94, 97.85, -6, 0.56)
	pt3dadd(16.61, 97.08, -6, 0.56)
	pt3dadd(15.89, 96.78, -6, 0.56)
	pt3dadd(14.76, 96.16, -6, 0.56)
  }
  dend[221] {pt3dclear()
	pt3dadd(20.36, 99.63, -5.75, 0.61)
	pt3dadd(20.6, 99.31, -5.5, 0.25)
	pt3dadd(21.04, 98.94, -5.5, 0.25)
  }
  dend[222] {pt3dclear()
	pt3dadd(21.04, 98.94, -5.5, 0.25)
	pt3dadd(20.79, 98.07, -5.5, 0.12)
	pt3dadd(20.85, 97.01, -5.5, 0.12)
	pt3dadd(21.42, 96.32, -5.5, 0.12)
	pt3dadd(22.66, 95.32, -5.25, 0.12)
	pt3dadd(23.04, 94.76, -5.25, 0.12)
  }
  dend[223] {pt3dclear()
	pt3dadd(21.04, 98.94, -5.5, 0.25)
	pt3dadd(21.66, 99.5, -5.5, 0.12)
  }
}
proc shape3d_11() {
  dend[223] {	pt3dadd(22.6, 98.88, -5.5, 0.12)
	pt3dadd(23.53, 98.5, -5.25, 0.12)
  }
  dend[224] {pt3dclear()
	pt3dadd(20.23, 103.9, -5.75, 0.82)
	pt3dadd(20.75, 104.9, -5.75, 0.46)
	pt3dadd(21.67, 106, -5.75, 0.46)
	pt3dadd(22.69, 106.6, -5.75, 0.46)
	pt3dadd(23.51, 106.8, -5.75, 0.46)
	pt3dadd(24.59, 106.2, -5.75, 0.46)
	pt3dadd(25.71, 105, -5.75, 0.46)
	pt3dadd(26.63, 104, -5.75, 0.46)
  }
  dend[225] {pt3dclear()
	pt3dadd(10.71, 94.53, -6.5, 3.05)
	pt3dadd(12.58, 93.7, -6.25, 2.93)
	pt3dadd(14.4, 93.09, -6.25, 2.93)
  }
  dend[226] {pt3dclear()
	pt3dadd(14.4, 93.09, -6.25, 2.93)
	pt3dadd(15.51, 92.83, -6.25, 2.31)
	pt3dadd(17.75, 92.46, -6.25, 2.62)
	pt3dadd(18.28, 92.69, -6.25, 2.62)
  }
  dend[227] {pt3dclear()
	pt3dadd(18.28, 92.69, -6.25, 2.62)
	pt3dadd(19.44, 92.89, -6, 2.37)
	pt3dadd(21.31, 93.52, -6, 1.81)
	pt3dadd(23.43, 93.45, -5.75, 1.81)
	pt3dadd(25.73, 93.58, -5.75, 1.37)
	pt3dadd(27.42, 93.7, -5.5, 2.43)
	pt3dadd(28.43, 93.52, -5.5, 2.43)
  }
  dend[228] {pt3dclear()
	pt3dadd(28.43, 93.52, -5.5, 2.43)
	pt3dadd(32.1, 91.48, -4.33, 2.18)
  }
  dend[229] {pt3dclear()
	pt3dadd(32.1, 91.48, -4.33, 2.18)
	pt3dadd(29.22, 93.08, -5.25, 2.18)
	pt3dadd(31.09, 92.52, -5.25, 1.5)
	pt3dadd(32.72, 92.27, -5.25, 1.5)
	pt3dadd(33.29, 92.39, -5.25, 1.5)
  }
  dend[230] {pt3dclear()
	pt3dadd(33.29, 92.39, -5.25, 1.5)
	pt3dadd(34.4, 92.58, -5, 2.24)
	pt3dadd(34.99, 92.71, -5, 2.24)
  }
  dend[231] {pt3dclear()
	pt3dadd(34.99, 92.71, -5, 2.24)
	pt3dadd(36.21, 92.52, -4.75, 1.56)
	pt3dadd(37.53, 93.02, -4.75, 1.56)
  }
  dend[232] {pt3dclear()
	pt3dadd(37.53, 93.02, -4.75, 1.56)
	pt3dadd(38.14, 93.14, -4.75, 1.56)
	pt3dadd(39.76, 94.7, -4.5, 1.31)
	pt3dadd(40.45, 95.39, -4.5, 1.31)
	pt3dadd(40.84, 95.89, -4.5, 1.31)
  }
  dend[233] {pt3dclear()
	pt3dadd(40.84, 95.89, -4.5, 1.31)
	pt3dadd(41.51, 97.13, -4.5, 1)
	pt3dadd(42.19, 98.57, -4.25, 1)
	pt3dadd(42.94, 99.69, -4.5, 1.25)
	pt3dadd(43.75, 100.8, -4, 1.25)
	pt3dadd(44.87, 101.9, -4, 1.25)
	pt3dadd(46.24, 103.5, -4, 1.37)
	pt3dadd(47.12, 104.5, -4, 1.56)
	pt3dadd(47.58, 105, -4, 1.56)
  }
  dend[234] {pt3dclear()
	pt3dadd(47.58, 105, -4, 1.56)
	pt3dadd(48.18, 105.2, -3.75, 1.06)
	pt3dadd(49.98, 105.9, -3.5, 1.06)
	pt3dadd(51.01, 106.1, -3.5, 1.06)
  }
  dend[235] {pt3dclear()
	pt3dadd(51.01, 106.1, -3.5, 1.06)
	pt3dadd(51.79, 106.2, -3.25, 0.62)
	pt3dadd(53.35, 107.1, -3.25, 0.62)
	pt3dadd(55.28, 107.7, -3, 0.62)
	pt3dadd(56.78, 108.3, -3, 0.62)
	pt3dadd(58.28, 109.4, -3, 0.62)
	pt3dadd(59.4, 110.5, -3, 0.56)
	pt3dadd(60.52, 111.7, -3, 0.56)
	pt3dadd(61.58, 112.3, -2.75, 0.56)
	pt3dadd(62.77, 112.8, -2.5, 0.5)
	pt3dadd(63.79, 113.4, -2.5, 0.5)
  }
  dend[236] {pt3dclear()
	pt3dadd(63.79, 113.4, -2.5, 0.5)
	pt3dadd(64.81, 114.3, -2, 0.5)
	pt3dadd(65.94, 115.2, -2, 0.5)
	pt3dadd(66.88, 115.8, -2, 0.25)
	pt3dadd(67.75, 116.2, -2, 0.25)
	pt3dadd(68.56, 116.8, -2, 0.25)
	pt3dadd(70.25, 117.6, -1.5, 0.25)
	pt3dadd(71.8, 118.2, -1.5, 0.25)
	pt3dadd(73.11, 119.2, -1.25, 0.25)
	pt3dadd(74.61, 120.6, -1.25, 0.25)
	pt3dadd(75.73, 121.6, -1.25, 0.25)
	pt3dadd(76.67, 122.7, -1.25, 0.25)
	pt3dadd(77.31, 123.6, -1.25, 0.25)
  }
  dend[237] {pt3dclear()
	pt3dadd(77.31, 123.6, -1.25, 0.25)
	pt3dadd(78.04, 124.1, -0.75, 0.25)
	pt3dadd(79.47, 124.8, -0.5, 0.25)
	pt3dadd(80.41, 124.6, -0.5, 0.25)
  }
  dend[238] {pt3dclear()
	pt3dadd(77.31, 123.6, -1.25, 0.25)
	pt3dadd(76.89, 124.1, -1, 0.51)
	pt3dadd(76.48, 124.7, -1, 0.41)
	pt3dadd(75.92, 125.4, -0.75, 0.51)
	pt3dadd(75.61, 125.8, -0.75, 0.51)
	pt3dadd(75.66, 126.4, -0.75, 0.51)
	pt3dadd(75.87, 126.9, -0.75, 0.51)
	pt3dadd(76.02, 127.4, -0.75, 0.51)
	pt3dadd(76.23, 128.3, -0.5, 0.36)
	pt3dadd(76.38, 129, -0.5, 0.36)
	pt3dadd(76.69, 129.6, -0.5, 0.36)
	pt3dadd(76.94, 130, -0.5, 0.36)
	pt3dadd(77.2, 130.9, -0.25, 0.41)
  }
  dend[239] {pt3dclear()
	pt3dadd(63.79, 113.4, -2.5, 0.5)
	pt3dadd(64.41, 112.8, -2.25, 0.67)
	pt3dadd(64.97, 112.5, -2.25, 0.51)
	pt3dadd(65.38, 112.2, -2.25, 0.51)
	pt3dadd(66, 111.7, -2.25, 0.51)
	pt3dadd(66.34, 111.3, -2.25, 0.51)
	pt3dadd(66.56, 110.8, -2.25, 0.51)
	pt3dadd(67.17, 110.1, -2.25, 0.51)
	pt3dadd(67.73, 109.7, -2.25, 0.51)
	pt3dadd(68.19, 109.1, -2.25, 0.51)
	pt3dadd(68.95, 108.2, -2, 0.51)
	pt3dadd(69.58, 107.9, -2, 0.51)
	pt3dadd(70.59, 107.6, -2, 0.51)
	pt3dadd(71.2, 107.6, -2, 0.51)
	pt3dadd(71.93, 107.6, -2, 0.51)
  }
  dend[240] {pt3dclear()
	pt3dadd(71.93, 107.6, -2, 0.51)
	pt3dadd(72.39, 107, -2, 0.41)
	pt3dadd(72.7, 106.3, -2, 0.41)
	pt3dadd(72.95, 105.6, -2, 0.41)
	pt3dadd(73.26, 105.2, -2, 0.41)
	pt3dadd(73.72, 104.5, -2, 0.41)
	pt3dadd(74.28, 104.3, -2, 0.41)
	pt3dadd(74.79, 103.9, -2, 0.41)
	pt3dadd(75.31, 103.4, -2, 0.41)
	pt3dadd(75.77, 103.3, -2, 0.41)
	pt3dadd(76.53, 103.4, -2, 0.41)
	pt3dadd(77.09, 103.5, -2, 0.41)
	pt3dadd(77.56, 103.8, -2, 0.41)
	pt3dadd(77.97, 103.8, -2, 0.41)
  }
  dend[241] {pt3dclear()
	pt3dadd(71.93, 107.6, -2, 0.51)
	pt3dadd(72.44, 108.5, -2, 0.41)
	pt3dadd(72.84, 109, -2, 0.41)
	pt3dadd(73.41, 109.6, -2, 0.41)
	pt3dadd(73.87, 110.2, -2, 0.41)
	pt3dadd(74.28, 111.1, -1.75, 0.41)
	pt3dadd(74.79, 111.6, -1.75, 0.41)
	pt3dadd(75.09, 112.3, -1.75, 0.41)
	pt3dadd(75.66, 113, -1.75, 0.41)
	pt3dadd(75.87, 113.3, -1.75, 0.41)
  }
  dend[242] {pt3dclear()
	pt3dadd(75.87, 113.3, -1.75, 0.41)
	pt3dadd(76.69, 113.5, -1.75, 0.41)
	pt3dadd(77.3, 113.6, -1.75, 0.41)
	pt3dadd(78.17, 114.2, -1.75, 0.41)
	pt3dadd(78.68, 114.5, -1.75, 0.41)
	pt3dadd(79.45, 115, -1.75, 0.41)
	pt3dadd(79.81, 115.5, -1.75, 0.41)
	pt3dadd(80.27, 115.9, -1.75, 0.41)
	pt3dadd(80.78, 116.3, -1.75, 0.41)
  }
  dend[243] {pt3dclear()
	pt3dadd(75.87, 113.3, -1.75, 0.41)
	pt3dadd(75.56, 113.8, -1.75, 0.41)
	pt3dadd(75.51, 114.6, -1.75, 0.41)
	pt3dadd(75.45, 115.1, -1.75, 0.41)
	pt3dadd(75.45, 115.9, -1.75, 0.41)
	pt3dadd(75.56, 116.5, -1.75, 0.41)
  }
  dend[244] {pt3dclear()
	pt3dadd(51.01, 106.1, -3.5, 1.06)
	pt3dadd(50.98, 107.1, -3.5, 0.77)
	pt3dadd(51.49, 108.5, -3.5, 0.51)
	pt3dadd(52.1, 109.6, -3.5, 0.67)
	pt3dadd(52.77, 110.6, -3.5, 0.67)
	pt3dadd(53.13, 111, -3.25, 0.61)
	pt3dadd(54.1, 112, -3.25, 0.61)
	pt3dadd(54.61, 112.7, -3.25, 0.61)
	pt3dadd(55.17, 113, -3, 0.61)
	pt3dadd(56.04, 113, -3, 0.51)
	pt3dadd(57.52, 113.2, -3, 0.51)
	pt3dadd(58.24, 113.4, -3, 0.36)
	pt3dadd(59.98, 114.3, -2.75, 0.36)
	pt3dadd(61.05, 115.1, -2.75, 0.36)
	pt3dadd(62.38, 116.5, -2.75, 0.36)
	pt3dadd(63.1, 117.3, -2.5, 0.36)
	pt3dadd(64.02, 118.1, -2.5, 0.36)
	pt3dadd(65.09, 118.6, -2.25, 0.36)
	pt3dadd(65.86, 118.8, -2.25, 0.36)
	pt3dadd(66.68, 119.1, -2.25, 0.36)
	pt3dadd(67.65, 119.4, -2.25, 0.36)
	pt3dadd(68.52, 119.8, -1.75, 0.36)
	pt3dadd(69.14, 120.1, -1.75, 0.36)
	pt3dadd(70.01, 120.5, -1.5, 0.36)
	pt3dadd(70.93, 121.3, -1.5, 0.36)
	pt3dadd(71.48, 121.8, -1.5, 0.36)
	pt3dadd(72.31, 122.8, -1.5, 0.36)
	pt3dadd(72.45, 123.2, -1.25, 0.36)
	pt3dadd(72.81, 124.8, -1.25, 0.36)
	pt3dadd(73.23, 126.1, -1.25, 0.36)
	pt3dadd(73.48, 127.3, -1.25, 0.36)
	pt3dadd(73.54, 128.3, -1, 0.36)
	pt3dadd(73.69, 129.4, -1, 0.36)
	pt3dadd(74.25, 130.8, -0.75, 0.36)
	pt3dadd(75.02, 131.19, -0.75, 0.36)
  }
  dend[245] {pt3dclear()
	pt3dadd(47.58, 105, -4, 1.56)
	pt3dadd(47.63, 106.1, -4, 0.92)
	pt3dadd(48.19, 107.5, -4, 0.46)
	pt3dadd(48.8, 108.8, -4, 0.46)
	pt3dadd(49.67, 110.1, -3.75, 0.77)
	pt3dadd(49.98, 111.1, -3.75, 0.77)
	pt3dadd(50.13, 111.5, -3.75, 0.67)
	pt3dadd(50.7, 112.5, -3.75, 0.56)
	pt3dadd(51.21, 113.3, -3.75, 0.87)
	pt3dadd(52.33, 114, -3.5, 0.87)
	pt3dadd(53.41, 114.7, -3.5, 0.87)
  }
  dend[246] {pt3dclear()
	pt3dadd(53.41, 114.7, -3.5, 0.87)
	pt3dadd(55.1, 115, -3.15, 0.87)
  }
  dend[247] {pt3dclear()
	pt3dadd(55.1, 115, -3.15, 0.87)
	pt3dadd(54.63, 114.9, -3.25, 0.87)
  }
}
proc shape3d_12() {
  dend[247] {	pt3dadd(55.56, 115.1, -3.25, 0.87)
	pt3dadd(56.53, 115.2, -3.25, 0.67)
	pt3dadd(57.55, 115.9, -3, 0.56)
	pt3dadd(58.73, 116.7, -3, 0.56)
	pt3dadd(59.34, 117.3, -3, 0.56)
	pt3dadd(59.7, 118, -2.75, 0.51)
	pt3dadd(60.42, 118.8, -2.75, 0.51)
	pt3dadd(61.03, 119.6, -2.5, 0.51)
	pt3dadd(61.75, 120.4, -2.5, 0.51)
	pt3dadd(62.31, 121.4, -2.5, 0.51)
	pt3dadd(63.18, 122.4, -2.25, 0.51)
	pt3dadd(64.3, 123.7, -2.25, 0.51)
	pt3dadd(65.27, 124.9, -2.25, 0.51)
	pt3dadd(66.3, 125.5, -1.75, 0.51)
	pt3dadd(66.81, 126.1, -1.75, 0.51)
	pt3dadd(67.47, 127.3, -1.75, 0.51)
	pt3dadd(67.78, 128.3, -1.75, 0.51)
  }
  dend[248] {pt3dclear()
	pt3dadd(55.1, 115, -3.15, 0.87)
	pt3dadd(54.74, 115.8, -3.25, 0.51)
	pt3dadd(55.56, 116.6, -3, 0.77)
	pt3dadd(56.27, 117.9, -3, 0.77)
	pt3dadd(57.19, 119.1, -3, 0.77)
	pt3dadd(57.81, 120.1, -3, 0.56)
	pt3dadd(58.32, 120.9, -3, 0.46)
	pt3dadd(58.93, 122.3, -2.75, 0.46)
	pt3dadd(59.34, 123.8, -2.75, 0.31)
	pt3dadd(59.95, 125.5, -2.75, 0.41)
	pt3dadd(60.01, 126.6, -2.75, 0.56)
  }
  dend[249] {pt3dclear()
	pt3dadd(53.41, 114.7, -3.5, 0.87)
	pt3dadd(53.61, 115.9, -3.5, 0.72)
	pt3dadd(53.71, 117, -3.5, 0.61)
	pt3dadd(53.87, 118.2, -3.5, 0.61)
	pt3dadd(53.87, 118.6, -3.5, 0.51)
	pt3dadd(53.92, 120, -3.5, 0.51)
	pt3dadd(53.71, 121.3, -3.5, 0.51)
	pt3dadd(53.66, 122.6, -3.25, 0.51)
	pt3dadd(53.56, 124.3, -3.25, 0.51)
	pt3dadd(53.41, 125.8, -3.25, 0.51)
	pt3dadd(53.25, 128.3, -3.25, 0.51)
  }
  dend[250] {pt3dclear()
	pt3dadd(53.25, 128.3, -3.25, 0.51)
	pt3dadd(54.12, 129.1, -3.25, 0.51)
	pt3dadd(55.15, 129.6, -3.25, 0.36)
	pt3dadd(55.96, 130.5, -3.25, 0.31)
	pt3dadd(56.94, 131.19, -3.25, 0.31)
	pt3dadd(58.16, 132.19, -3, 0.31)
	pt3dadd(58.88, 132.9, -3, 0.31)
	pt3dadd(59.8, 134.1, -3, 0.31)
	pt3dadd(60.42, 134.9, -3, 0.31)
  }
  dend[251] {pt3dclear()
	pt3dadd(53.25, 128.3, -3.25, 0.51)
	pt3dadd(52.69, 129.19, -3.25, 0.31)
	pt3dadd(52.33, 130.19, -3.25, 0.31)
	pt3dadd(52.18, 131.5, -3.25, 0.31)
	pt3dadd(52.08, 132.5, -3.25, 0.31)
	pt3dadd(52.23, 134.3, -3.5, 0.31)
	pt3dadd(52.38, 135.3, -3.5, 0.31)
	pt3dadd(52.64, 136.5, -3.5, 0.31)
  }
  dend[252] {pt3dclear()
	pt3dadd(40.84, 95.89, -4.5, 1.31)
	pt3dadd(41.87, 95.68, -4.25, 0.61)
	pt3dadd(42.69, 95.78, -4.25, 0.51)
	pt3dadd(43.35, 95.93, -4.25, 0.51)
	pt3dadd(43.97, 95.88, -4.25, 0.51)
	pt3dadd(44.59, 95.82, -4.25, 0.51)
  }
  dend[253] {pt3dclear()
	pt3dadd(44.59, 95.82, -4.25, 0.51)
	pt3dadd(44.94, 95.57, -4, 0.67)
	pt3dadd(45.91, 94.91, -3.75, 0.61)
	pt3dadd(46.47, 94.65, -3.75, 0.61)
	pt3dadd(46.88, 94.09, -3.75, 0.61)
	pt3dadd(47.44, 93.45, -3.75, 0.61)
  }
  dend[254] {pt3dclear()
	pt3dadd(47.44, 93.45, -3.75, 0.61)
	pt3dadd(47.65, 93.02, -3.75, 0.61)
	pt3dadd(48.11, 92.71, -3.75, 0.61)
	pt3dadd(48.42, 92.45, -3.75, 0.61)
	pt3dadd(48.78, 91.94, -3.75, 0.61)
	pt3dadd(49.19, 91.43, -3.75, 0.61)
	pt3dadd(49.95, 90.97, -3.5, 0.61)
	pt3dadd(50.52, 90.25, -3.5, 0.61)
	pt3dadd(50.77, 89.95, -3.5, 0.61)
	pt3dadd(51.44, 89.54, -3.5, 0.61)
	pt3dadd(52.05, 89.03, -3.5, 0.61)
	pt3dadd(53.02, 88.72, -3.25, 0.61)
	pt3dadd(53.63, 87.84, -3.25, 0.61)
  }
  dend[255] {pt3dclear()
	pt3dadd(53.63, 87.84, -3.25, 0.61)
	pt3dadd(54.1, 87.39, -3.25, 0.51)
	pt3dadd(54.4, 86.57, -3.25, 0.51)
	pt3dadd(54.86, 85.86, -3.25, 0.51)
	pt3dadd(54.66, 85.09, -3, 0.41)
	pt3dadd(54.66, 83.66, -3, 0.41)
	pt3dadd(54.92, 82.63, -3, 0.41)
	pt3dadd(55.07, 81.3, -3, 0.41)
	pt3dadd(55.43, 80.38, -3, 0.41)
	pt3dadd(55.88, 79.8, -3, 0.41)
  }
  dend[256] {pt3dclear()
	pt3dadd(55.88, 79.8, -3, 0.41)
	pt3dadd(56.3, 79.09, -3, 0.51)
	pt3dadd(57.06, 78.54, -3, 0.51)
	pt3dadd(57.83, 78.08, -3, 0.67)
	pt3dadd(58.5, 77.52, -3, 0.61)
	pt3dadd(59.21, 76.75, -3, 0.61)
	pt3dadd(60.29, 76.23, -3, 0.61)
	pt3dadd(60.85, 75.83, -3, 0.61)
	pt3dadd(61.57, 75.16, -3, 0.61)
	pt3dadd(62.23, 74.76, -3, 0.61)
	pt3dadd(62.59, 74.34, -3, 0.61)
	pt3dadd(63.2, 73.73, -3, 0.61)
	pt3dadd(63.36, 72.91, -3, 0.51)
	pt3dadd(64.06, 72.34, -3, 0.51)
	pt3dadd(64.53, 72.25, -2.75, 0.51)
  }
  dend[257] {pt3dclear()
	pt3dadd(55.88, 79.8, -3, 0.41)
	pt3dadd(56, 78.7, -3.25, 0.31)
	pt3dadd(56, 77.79, -3.25, 0.41)
	pt3dadd(55.9, 77.28, -3.25, 0.41)
	pt3dadd(56.1, 76.77, -3.25, 0.41)
	pt3dadd(56.2, 76.2, -3.25, 0.41)
	pt3dadd(56.31, 75.59, -3.25, 0.41)
	pt3dadd(56.61, 75.03, -3.25, 0.41)
	pt3dadd(56.87, 74.77, -3.25, 0.41)
	pt3dadd(56.82, 74, -3, 0.41)
	pt3dadd(57.23, 73.39, -3, 0.41)
	pt3dadd(57.53, 72.78, -3, 0.41)
	pt3dadd(57.84, 72.31, -3, 0.41)
  }
  dend[258] {pt3dclear()
	pt3dadd(53.63, 87.84, -3.25, 0.61)
	pt3dadd(54.35, 88.67, -3.5, 0.51)
	pt3dadd(55.27, 88.87, -3.25, 0.51)
	pt3dadd(56.04, 89.23, -3.25, 0.51)
	pt3dadd(56.87, 89.71, -3.25, 0.51)
  }
  dend[259] {pt3dclear()
	pt3dadd(56.87, 89.71, -3.25, 0.51)
	pt3dadd(57.47, 89.18, -3.25, 0.41)
	pt3dadd(58.34, 88.82, -3.25, 0.41)
	pt3dadd(58.5, 87.95, -3.25, 0.56)
	pt3dadd(58.55, 87.24, -3.25, 0.67)
	pt3dadd(58.75, 86.42, -3.25, 0.67)
	pt3dadd(58.8, 85.65, -3.5, 0.56)
	pt3dadd(58.91, 84.53, -3.5, 0.51)
	pt3dadd(58.85, 83.71, -3.5, 0.51)
	pt3dadd(58.8, 82.79, -3.5, 0.51)
	pt3dadd(59.01, 81.81, -3.75, 0.51)
	pt3dadd(59.16, 80.89, -3.75, 0.51)
	pt3dadd(59.06, 80.08, -3.75, 0.51)
	pt3dadd(58.8, 78.84, -3.75, 0.51)
	pt3dadd(59.01, 77.93, -3.75, 0.51)
	pt3dadd(59.47, 77.2, -3.75, 0.51)
	pt3dadd(59.67, 76.7, -3.75, 0.51)
	pt3dadd(59.52, 75.93, -3.75, 0.51)
	pt3dadd(59.52, 74.86, -3.75, 0.41)
	pt3dadd(59.26, 74.14, -4, 0.36)
	pt3dadd(58.8, 73.22, -4, 0.36)
	pt3dadd(58.65, 72.56, -4, 0.36)
	pt3dadd(58.5, 71.79, -4, 0.51)
	pt3dadd(58.24, 71.02, -4, 0.51)
	pt3dadd(58.14, 70.41, -4, 0.51)
	pt3dadd(57.98, 69.84, -4, 0.56)
  }
  dend[260] {pt3dclear()
	pt3dadd(56.87, 89.71, -3.25, 0.51)
	pt3dadd(57.2, 90.08, -3.25, 0.56)
	pt3dadd(57.55, 90.49, -3.25, 0.51)
	pt3dadd(57.76, 90.59, -3.25, 0.51)
	pt3dadd(58.42, 90.74, -3.25, 0.51)
	pt3dadd(58.94, 91.41, -3.25, 0.51)
	pt3dadd(59.35, 91.92, -3.25, 0.51)
	pt3dadd(59.96, 92.48, -3.25, 0.51)
	pt3dadd(60.27, 92.74, -3.25, 0.51)
	pt3dadd(61.03, 93.25, -3.25, 0.51)
	pt3dadd(61.6, 93.4, -3.25, 0.51)
	pt3dadd(62.31, 93.61, -3.25, 0.51)
	pt3dadd(63.64, 93.61, -3, 0.51)
	pt3dadd(64.31, 93.91, -3, 0.51)
	pt3dadd(65.43, 94.17, -3, 0.51)
	pt3dadd(66.15, 94.68, -3, 0.51)
	pt3dadd(66.81, 94.99, -3, 0.51)
	pt3dadd(67.12, 95.04, -3, 0.51)
  }
  dend[261] {pt3dclear()
	pt3dadd(67.12, 95.04, -3, 0.51)
	pt3dadd(67.89, 94.42, -2.75, 0.51)
	pt3dadd(68.45, 94.07, -2.75, 0.51)
	pt3dadd(69.22, 93.5, -2.75, 0.51)
	pt3dadd(69.83, 93.04, -2.75, 0.51)
	pt3dadd(70.19, 92.22, -2.75, 0.51)
	pt3dadd(70.29, 91.61, -2.75, 0.51)
	pt3dadd(70.23, 90.74, -2.75, 0.51)
	pt3dadd(70.19, 90.33, -2.75, 0.51)
	pt3dadd(70.23, 89.1, -3, 0.51)
	pt3dadd(70.19, 88.34, -3, 0.51)
	pt3dadd(70.04, 87.62, -3, 0.51)
	pt3dadd(70.04, 86.75, -3, 0.51)
	pt3dadd(70.14, 85.78, -3, 0.51)
	pt3dadd(70.34, 85.06, -3, 0.51)
	pt3dadd(70.8, 84.7, -3, 0.51)
	pt3dadd(71.37, 83.99, -3, 0.41)
  }
  dend[262] {pt3dclear()
	pt3dadd(67.12, 95.04, -3, 0.51)
	pt3dadd(67.53, 96.06, -3, 0.41)
	pt3dadd(67.79, 96.73, -3, 0.41)
	pt3dadd(68.04, 97.29, -3, 0.41)
	pt3dadd(68.4, 98.11, -2.75, 0.41)
	pt3dadd(68.45, 98.57, -2.75, 0.41)
  }
  dend[263] {pt3dclear()
	pt3dadd(68.45, 98.57, -2.75, 0.41)
	pt3dadd(67.94, 99.08, -2.75, 0.41)
	pt3dadd(67.43, 99.59, -2.75, 0.41)
	pt3dadd(66.92, 100.3, -2.75, 0.41)
  }
  dend[264] {pt3dclear()
	pt3dadd(68.45, 98.57, -2.75, 0.41)
	pt3dadd(69.31, 99.03, -2.75, 0.41)
	pt3dadd(69.83, 99.85, -2.75, 0.41)
	pt3dadd(70.45, 100.3, -2.75, 0.41)
  }
  dend[265] {pt3dclear()
	pt3dadd(70.45, 100.3, -2.75, 0.41)
  }
}
proc shape3d_13() {
  dend[265] {	pt3dadd(71.31, 100.3, -2.5, 0.41)
	pt3dadd(71.98, 100.4, -2.5, 0.41)
	pt3dadd(72.59, 100.5, -2.5, 0.41)
	pt3dadd(73.31, 100.9, -2.5, 0.41)
	pt3dadd(73.67, 100.3, -2.25, 0.41)
	pt3dadd(74.33, 100.1, -2.25, 0.41)
  }
  dend[266] {pt3dclear()
	pt3dadd(70.45, 100.3, -2.75, 0.41)
	pt3dadd(70.59, 101, -2.5, 0.41)
	pt3dadd(70.8, 101.7, -2.5, 0.41)
	pt3dadd(70.95, 102.6, -2.5, 0.41)
  }
  dend[267] {pt3dclear()
	pt3dadd(70.95, 102.6, -2.5, 0.41)
	pt3dadd(71.52, 103, -2.5, 0.41)
	pt3dadd(72.08, 103.4, -2.5, 0.41)
	pt3dadd(72.8, 103.7, -2.5, 0.41)
  }
  dend[268] {pt3dclear()
	pt3dadd(70.95, 102.6, -2.5, 0.41)
	pt3dadd(70.95, 103.1, -2.5, 0.41)
	pt3dadd(70.75, 103.8, -2.5, 0.41)
	pt3dadd(70.65, 104.4, -2.5, 0.41)
	pt3dadd(70.65, 105, -2.5, 0.41)
  }
  dend[269] {pt3dclear()
	pt3dadd(47.44, 93.45, -3.75, 0.61)
	pt3dadd(48.21, 93.5, -3.25, 0.41)
	pt3dadd(48.93, 93.5, -3, 0.41)
	pt3dadd(49.74, 93.61, -3, 0.41)
	pt3dadd(50.61, 93.61, -2.75, 0.41)
  }
  dend[270] {pt3dclear()
	pt3dadd(50.61, 93.61, -2.75, 0.41)
	pt3dadd(51.33, 93.09, -2.75, 0.41)
	pt3dadd(51.94, 92.94, -2.75, 0.41)
	pt3dadd(52.92, 92.89, -2.75, 0.41)
	pt3dadd(53.43, 92.58, -2.75, 0.41)
	pt3dadd(54.45, 92.53, -2.75, 0.41)
	pt3dadd(55.78, 92.63, -2.75, 0.41)
	pt3dadd(56.34, 92.48, -2.5, 0.41)
	pt3dadd(57.16, 92.33, -2.25, 0.41)
	pt3dadd(57.77, 91.82, -2, 0.41)
	pt3dadd(58.13, 91.36, -2, 0.41)
  }
  dend[271] {pt3dclear()
	pt3dadd(50.61, 93.61, -2.75, 0.41)
	pt3dadd(51.18, 94.32, -2.75, 0.41)
	pt3dadd(51.53, 94.89, -2.75, 0.41)
	pt3dadd(51.99, 95.5, -2.5, 0.41)
	pt3dadd(52.51, 96.06, -2.5, 0.41)
	pt3dadd(52.66, 96.52, -2.5, 0.41)
  }
  dend[272] {pt3dclear()
	pt3dadd(44.59, 95.82, -4.25, 0.51)
	pt3dadd(44.86, 96.6, -4, 0.56)
	pt3dadd(45.12, 97.31, -4, 0.51)
	pt3dadd(45.43, 97.67, -4, 0.41)
	pt3dadd(45.99, 98.39, -4, 0.41)
	pt3dadd(46.65, 99, -4, 0.41)
	pt3dadd(47.37, 99.26, -3.75, 0.41)
	pt3dadd(48.39, 99.77, -3.75, 0.41)
	pt3dadd(48.85, 99.62, -3.5, 0.41)
	pt3dadd(49.93, 99.77, -3.5, 0.41)
	pt3dadd(51.05, 99.92, -3.25, 0.41)
	pt3dadd(51.56, 100.2, -3.25, 0.41)
	pt3dadd(52.64, 100.8, -3.25, 0.41)
	pt3dadd(53.2, 101, -3.25, 0.41)
  }
  dend[273] {pt3dclear()
	pt3dadd(53.2, 101, -3.25, 0.41)
	pt3dadd(54.17, 100.5, -3.25, 0.41)
	pt3dadd(54.79, 99.97, -3.25, 0.41)
	pt3dadd(55.3, 99.36, -3.25, 0.41)
	pt3dadd(55.81, 98.95, -3.25, 0.41)
	pt3dadd(56.58, 98.23, -3.25, 0.41)
	pt3dadd(57.19, 97.57, -3.25, 0.41)
	pt3dadd(57.75, 97.31, -3.25, 0.41)
	pt3dadd(58.67, 97.31, -3, 0.41)
	pt3dadd(59.44, 97.11, -3, 0.46)
	pt3dadd(60.21, 97.01, -3, 0.46)
	pt3dadd(61.28, 97.01, -3, 0.46)
	pt3dadd(62.05, 97.31, -3, 0.41)
	pt3dadd(62.92, 97.42, -3, 0.41)
  }
  dend[274] {pt3dclear()
	pt3dadd(53.2, 101, -3.25, 0.41)
	pt3dadd(53.92, 101.6, -3.25, 0.41)
	pt3dadd(54.43, 102.3, -3.25, 0.41)
	pt3dadd(55.09, 103, -3.25, 0.41)
  }
  dend[275] {pt3dclear()
	pt3dadd(55.09, 103, -3.25, 0.41)
	pt3dadd(55.81, 103.9, -3, 0.41)
	pt3dadd(56.42, 104.4, -3, 0.41)
	pt3dadd(56.88, 105, -3, 0.41)
	pt3dadd(57.55, 105.5, -2.75, 0.41)
	pt3dadd(58.27, 105.8, -2.75, 0.41)
	pt3dadd(58.98, 106.3, -2.5, 0.31)
	pt3dadd(59.39, 106.4, -2.5, 0.31)
	pt3dadd(60.16, 106.5, -2.25, 0.31)
	pt3dadd(60.93, 106.9, -2.25, 0.31)
	pt3dadd(61.23, 107.1, -2.25, 0.31)
  }
  dend[276] {pt3dclear()
	pt3dadd(61.23, 107.1, -2.25, 0.31)
	pt3dadd(61.9, 107.1, -2, 0.31)
	pt3dadd(62.36, 107.3, -2, 0.31)
	pt3dadd(62.72, 107.6, -2, 0.15)
	pt3dadd(63.23, 107.8, -2, 0.098)
  }
  dend[277] {pt3dclear()
	pt3dadd(61.23, 107.1, -2.25, 0.31)
	pt3dadd(61.23, 108, -2, 0.26)
	pt3dadd(61.28, 108.7, -2, 0.26)
	pt3dadd(61.44, 109.1, -2, 0.26)
	pt3dadd(61.54, 109.8, -2, 0.26)
	pt3dadd(61.23, 110.3, -2, 0.26)
  }
  dend[278] {pt3dclear()
	pt3dadd(55.09, 103, -3.25, 0.41)
	pt3dadd(56.07, 102.5, -3.25, 0.26)
	pt3dadd(56.83, 102, -3.25, 0.26)
	pt3dadd(57.55, 101.7, -3.25, 0.26)
	pt3dadd(58.47, 101.5, -3.25, 0.26)
	pt3dadd(59.24, 101.4, -3, 0.26)
	pt3dadd(59.95, 101.5, -3, 0.26)
	pt3dadd(61.08, 101.5, -3, 0.26)
	pt3dadd(62.15, 101.8, -3, 0.26)
	pt3dadd(63.07, 101.8, -3, 0.26)
	pt3dadd(64.05, 102, -3, 0.26)
  }
  dend[279] {pt3dclear()
	pt3dadd(64.05, 102, -3, 0.26)
	pt3dadd(64.3, 101.2, -3, 0.36)
	pt3dadd(64.51, 100.2, -3, 0.36)
	pt3dadd(64.7, 99.41, -3, 0.36)
	pt3dadd(65.02, 98.49, -3, 0.36)
	pt3dadd(65.17, 97.98, -3, 0.36)
	pt3dadd(65.27, 97.42, -2.75, 0.36)
	pt3dadd(65.58, 96.65, -2.75, 0.36)
  }
  dend[280] {pt3dclear()
	pt3dadd(64.05, 102, -3, 0.26)
	pt3dadd(64.34, 102.5, -3, 0.36)
	pt3dadd(64.81, 103.2, -3, 0.36)
	pt3dadd(65.38, 103.7, -3, 0.36)
	pt3dadd(66.14, 104.1, -3, 0.36)
	pt3dadd(66.91, 104.5, -2.75, 0.36)
	pt3dadd(67.78, 104.6, -2.75, 0.36)
	pt3dadd(68.39, 104.1, -2.5, 0.36)
	pt3dadd(68.84, 103.4, -2.5, 0.36)
	pt3dadd(68.7, 102.7, -2.5, 0.36)
  }
  dend[281] {pt3dclear()
	pt3dadd(37.53, 93.02, -4.75, 1.56)
	pt3dadd(38.67, 92.51, -4.75, 0.72)
	pt3dadd(39.7, 91.74, -4.75, 0.56)
	pt3dadd(40.86, 91.58, -4.5, 0.61)
	pt3dadd(41.49, 91.43, -4.5, 0.67)
  }
  dend[282] {pt3dclear()
	pt3dadd(41.49, 91.43, -4.5, 0.67)
	pt3dadd(42.31, 91.94, -4.5, 0.56)
	pt3dadd(43.18, 92.2, -4.5, 0.56)
	pt3dadd(44.04, 92.51, -4.5, 0.56)
	pt3dadd(44.56, 92.66, -4.5, 0.56)
	pt3dadd(45.53, 93.12, -4.5, 0.56)
	pt3dadd(46.45, 93.78, -4.5, 0.56)
	pt3dadd(47.42, 93.73, -4.5, 0.56)
	pt3dadd(48.19, 94.45, -4.5, 0.56)
	pt3dadd(48.7, 94.96, -4.5, 0.56)
	pt3dadd(49.62, 95.52, -4.5, 0.56)
	pt3dadd(50.59, 95.68, -4.25, 0.56)
	pt3dadd(51.72, 95.83, -4.25, 0.56)
	pt3dadd(52.23, 95.37, -4.25, 0.56)
	pt3dadd(52.38, 94.71, -4.25, 0.56)
	pt3dadd(52.38, 93.84, -4.25, 0.56)
	pt3dadd(52.43, 93.12, -4.5, 0.56)
	pt3dadd(52.59, 92.4, -4.75, 0.46)
	pt3dadd(52.79, 91.58, -4.75, 0.46)
	pt3dadd(52.64, 90.97, -4.75, 0.46)
	pt3dadd(52.79, 90.36, -4.75, 0.46)
  }
  dend[283] {pt3dclear()
	pt3dadd(41.49, 91.43, -4.5, 0.67)
	pt3dadd(41.79, 90.77, -4.5, 0.46)
	pt3dadd(42.1, 90.15, -4.5, 0.46)
	pt3dadd(42.87, 89.74, -4.5, 0.46)
	pt3dadd(43.38, 89.44, -4.5, 0.46)
	pt3dadd(43.84, 88.92, -4.5, 0.46)
	pt3dadd(44.25, 88.67, -4.5, 0.46)
	pt3dadd(44.76, 88.36, -4.5, 0.46)
	pt3dadd(45.58, 88.26, -4.25, 0.46)
	pt3dadd(46.14, 88.26, -4.25, 0.46)
	pt3dadd(46.86, 88.36, -4.25, 0.46)
	pt3dadd(47.68, 88.16, -4.25, 0.46)
	pt3dadd(48.34, 87.95, -4.25, 0.46)
	pt3dadd(48.96, 87.75, -4.25, 0.46)
	pt3dadd(49.57, 87.65, -4.25, 0.46)
	pt3dadd(50.23, 87.7, -4.25, 0.46)
  }
  dend[284] {pt3dclear()
	pt3dadd(34.99, 92.71, -5, 2.24)
	pt3dadd(34.84, 93.21, -5.25, 0.67)
	pt3dadd(34.89, 93.93, -5.25, 0.46)
	pt3dadd(34.89, 94.8, -5.25, 0.46)
	pt3dadd(34.99, 95.67, -5.25, 0.46)
	pt3dadd(35.15, 96.9, -5.25, 0.51)
	pt3dadd(35.29, 97.92, -5.25, 0.51)
	pt3dadd(35.45, 98.94, -5.25, 0.51)
	pt3dadd(35.61, 99.96, -5.25, 0.51)
	pt3dadd(36.11, 101.1, -5.25, 0.51)
	pt3dadd(36.89, 101.9, -5.25, 0.51)
	pt3dadd(37.29, 102.9, -5.25, 0.51)
	pt3dadd(37.96, 103.8, -5, 0.46)
	pt3dadd(38.27, 104.7, -5, 0.51)
	pt3dadd(38.78, 105.5, -5, 0.56)
	pt3dadd(39.44, 106.1, -5, 0.56)
	pt3dadd(39.95, 106.7, -5, 0.56)
	pt3dadd(40.36, 107, -5, 0.56)
	pt3dadd(40.98, 107.8, -4.75, 0.51)
	pt3dadd(41.49, 108.6, -4.75, 0.46)
	pt3dadd(42.26, 109.4, -4.75, 0.46)
	pt3dadd(42.67, 109.6, -4.75, 0.46)
  }
  dend[285] {pt3dclear()
	pt3dadd(42.67, 109.6, -4.75, 0.46)
	pt3dadd(42.92, 109.1, -4.5, 0.46)
	pt3dadd(43.48, 108.7, -4.5, 0.36)
	pt3dadd(44.25, 108.7, -4.5, 0.36)
	pt3dadd(45.07, 108.6, -4.5, 0.36)
	pt3dadd(45.68, 108.3, -4.5, 0.36)
	pt3dadd(46.3, 108.3, -4.25, 0.41)
	pt3dadd(46.76, 108.6, -4.25, 0.41)
	pt3dadd(47.42, 109.2, -4.25, 0.41)
	pt3dadd(48.14, 110, -4.25, 0.41)
	pt3dadd(48.29, 110.8, -4.5, 0.41)
	pt3dadd(48.6, 111.5, -4.5, 0.41)
  }
}
proc shape3d_14() {
  dend[285] {	pt3dadd(49.01, 112.5, -4.5, 0.41)
	pt3dadd(49.73, 113.2, -4.5, 0.41)
	pt3dadd(50.03, 114.1, -4.5, 0.41)
	pt3dadd(50.7, 115, -4.5, 0.41)
	pt3dadd(51.26, 115.8, -4.5, 0.41)
	pt3dadd(51.87, 116.6, -4.5, 0.41)
	pt3dadd(52.59, 117.4, -4.5, 0.41)
	pt3dadd(53.25, 118.4, -4.5, 0.41)
	pt3dadd(53.77, 119.2, -4.5, 0.41)
	pt3dadd(54.79, 120.1, -4.5, 0.41)
  }
  dend[286] {pt3dclear()
	pt3dadd(42.67, 109.6, -4.75, 0.46)
	pt3dadd(42.92, 110.3, -4.5, 0.41)
	pt3dadd(43.33, 111.3, -4.5, 0.41)
	pt3dadd(43.59, 111.9, -4.5, 0.41)
	pt3dadd(43.94, 113.1, -4.5, 0.41)
	pt3dadd(44.25, 114.1, -4.5, 0.41)
	pt3dadd(44.71, 115, -4.5, 0.41)
	pt3dadd(45.27, 116, -4.5, 0.41)
	pt3dadd(45.68, 117, -4.5, 0.41)
	pt3dadd(46.25, 118, -4.5, 0.41)
	pt3dadd(46.76, 118.8, -4.25, 0.41)
	pt3dadd(47.32, 119.6, -4, 0.41)
  }
  dend[287] {pt3dclear()
	pt3dadd(47.32, 119.6, -4, 0.41)
	pt3dadd(48.4, 119.6, -4, 0.41)
	pt3dadd(49.26, 119.3, -4, 0.41)
	pt3dadd(50.34, 119.3, -4, 0.41)
	pt3dadd(51.36, 119.4, -3.75, 0.41)
	pt3dadd(51.98, 119.9, -3.75, 0.41)
	pt3dadd(52.59, 120.4, -3.75, 0.41)
	pt3dadd(53.25, 120.6, -3.75, 0.31)
	pt3dadd(53.92, 120.9, -3.75, 0.31)
	pt3dadd(54.64, 121.1, -3.75, 0.31)
	pt3dadd(55.35, 121.6, -3.75, 0.31)
  }
  dend[288] {pt3dclear()
	pt3dadd(55.35, 121.6, -3.75, 0.31)
	pt3dadd(55.91, 122, -3.5, 0.31)
	pt3dadd(56.53, 122.4, -3.5, 0.31)
	pt3dadd(57.24, 122.7, -3.5, 0.31)
	pt3dadd(57.65, 123.2, -3.5, 0.31)
	pt3dadd(57.86, 123.7, -3.5, 0.31)
  }
  dend[289] {pt3dclear()
	pt3dadd(55.35, 121.6, -3.75, 0.31)
	pt3dadd(56.27, 121.2, -3.75, 0.31)
	pt3dadd(56.84, 120.5, -3.75, 0.31)
	pt3dadd(57.09, 119.7, -3.75, 0.31)
	pt3dadd(57.3, 119.1, -3.75, 0.31)
	pt3dadd(57.6, 118.7, -3.75, 0.51)
  }
  dend[290] {pt3dclear()
	pt3dadd(57.6, 118.7, -3.75, 0.51)
	pt3dadd(58.47, 118.7, -3.75, 0.51)
	pt3dadd(59.34, 118.9, -3.75, 0.51)
  }
  dend[291] {pt3dclear()
	pt3dadd(57.6, 118.7, -3.75, 0.51)
	pt3dadd(57.4, 118.1, -4, 0.51)
	pt3dadd(57.19, 117.5, -4, 0.36)
	pt3dadd(56.89, 116.7, -4, 0.36)
	pt3dadd(56.68, 116.1, -4, 0.36)
	pt3dadd(56.53, 115.6, -4.25, 0.36)
  }
  dend[292] {pt3dclear()
	pt3dadd(47.32, 119.6, -4, 0.41)
	pt3dadd(47.42, 120.7, -4, 0.36)
	pt3dadd(47.32, 121.7, -4, 0.36)
	pt3dadd(47.07, 122.3, -4, 0.36)
	pt3dadd(47.17, 123.1, -4, 0.36)
	pt3dadd(47.07, 124.1, -4, 0.36)
	pt3dadd(47.27, 124.9, -4, 0.36)
	pt3dadd(47.58, 126.1, -4, 0.36)
	pt3dadd(47.73, 127.3, -4, 0.36)
	pt3dadd(47.88, 128.4, -4, 0.36)
	pt3dadd(48.04, 129.19, -4, 0.36)
	pt3dadd(48.24, 130.4, -3.75, 0.36)
	pt3dadd(48.19, 131.3, -3.75, 0.36)
	pt3dadd(48.24, 132.69, -3.75, 0.36)
	pt3dadd(47.88, 133.3, -3.75, 0.36)
	pt3dadd(47.37, 133.8, -3.75, 0.36)
	pt3dadd(46.76, 134.4, -3.75, 0.36)
  }
  dend[293] {pt3dclear()
	pt3dadd(33.29, 92.39, -5.25, 1.5)
	pt3dadd(33.46, 91.23, -5, 1.23)
	pt3dadd(33.46, 90.36, -5, 0.97)
	pt3dadd(33.51, 89.49, -5, 0.77)
	pt3dadd(33.76, 89.03, -5, 0.77)
	pt3dadd(34.33, 88.52, -5, 0.61)
	pt3dadd(34.72, 88.16, -5, 0.61)
	pt3dadd(35.25, 87.8, -5, 0.61)
	pt3dadd(35.65, 87.34, -5, 0.61)
	pt3dadd(35.96, 87.08, -5, 0.61)
	pt3dadd(36.53, 86.73, -4.75, 0.67)
	pt3dadd(37.24, 86.52, -4.75, 0.67)
	pt3dadd(37.86, 86.37, -4.75, 0.67)
	pt3dadd(38.58, 86.07, -4.75, 0.67)
  }
  dend[294] {pt3dclear()
	pt3dadd(38.58, 86.07, -4.75, 0.67)
	pt3dadd(38.52, 85.29, -4.5, 0.46)
	pt3dadd(38.88, 84.78, -4.5, 0.46)
	pt3dadd(39.19, 84.17, -4.5, 0.46)
	pt3dadd(39.54, 83.71, -4.5, 0.61)
	pt3dadd(40.11, 83.3, -4.5, 0.61)
	pt3dadd(40.67, 82.63, -4.5, 0.61)
	pt3dadd(40.96, 82.61, -4.5, 0.61)
  }
  dend[295] {pt3dclear()
	pt3dadd(40.96, 82.61, -4.5, 0.61)
	pt3dadd(41.38, 82.63, -4.25, 0.51)
	pt3dadd(42.1, 82.48, -4.25, 0.51)
	pt3dadd(42.51, 82.17, -4.25, 0.51)
	pt3dadd(43.23, 81.61, -4.25, 0.51)
	pt3dadd(43.84, 81.3, -4, 0.51)
	pt3dadd(44.61, 81, -4, 0.51)
	pt3dadd(45.22, 80.43, -3.75, 0.56)
	pt3dadd(45.51, 80.23, -3.75, 0.56)
  }
  dend[296] {pt3dclear()
	pt3dadd(45.51, 80.23, -3.75, 0.56)
	pt3dadd(45.78, 80.23, -3.75, 0.56)
	pt3dadd(46.45, 80.59, -3.75, 0.46)
	pt3dadd(47.37, 80.79, -3.75, 0.46)
	pt3dadd(47.88, 80.79, -3.75, 0.46)
	pt3dadd(48.55, 80.94, -3.75, 0.46)
	pt3dadd(49.25, 81.01, -3.75, 0.46)
  }
  dend[297] {pt3dclear()
	pt3dadd(49.25, 81.01, -3.75, 0.46)
	pt3dadd(49.57, 81.7, -3.5, 0.36)
	pt3dadd(50.03, 82.48, -3.5, 0.36)
	pt3dadd(50.49, 83.04, -3.5, 0.36)
	pt3dadd(51.05, 83.66, -3.5, 0.36)
	pt3dadd(51.36, 84.32, -3.5, 0.36)
	pt3dadd(51.26, 84.78, -3.5, 0.36)
	pt3dadd(51.26, 85.29, -3.5, 0.36)
  }
  dend[298] {pt3dclear()
	pt3dadd(49.25, 81.01, -3.75, 0.46)
	pt3dadd(49.55, 80.5, -4, 0.41)
	pt3dadd(50.01, 79.84, -3.75, 0.41)
	pt3dadd(50.37, 79.22, -3.75, 0.41)
	pt3dadd(50.94, 78.76, -3.75, 0.41)
	pt3dadd(51.19, 78.66, -3.75, 0.41)
  }
  dend[299] {pt3dclear()
	pt3dadd(51.19, 78.66, -3.75, 0.41)
	pt3dadd(51.75, 78.97, -3.75, 0.41)
	pt3dadd(52.06, 79.22, -3.5, 0.41)
	pt3dadd(52.62, 79.89, -3.5, 0.41)
	pt3dadd(53.08, 80.5, -3.5, 0.41)
	pt3dadd(53.34, 80.91, -3.5, 0.41)
	pt3dadd(53.49, 81.73, -3.5, 0.41)
	pt3dadd(53.54, 82.55, -3.5, 0.41)
	pt3dadd(53.54, 82.96, -3.5, 0.41)
	pt3dadd(53.19, 83.57, -3.25, 0.41)
  }
  dend[300] {pt3dclear()
	pt3dadd(51.19, 78.66, -3.75, 0.41)
	pt3dadd(51.45, 78.15, -3.75, 0.41)
	pt3dadd(51.81, 77.33, -3.5, 0.41)
	pt3dadd(52.11, 76.87, -3.5, 0.41)
	pt3dadd(52.52, 76.31, -3.5, 0.41)
	pt3dadd(52.88, 76.09, -3.5, 0.41)
	pt3dadd(53.54, 75.28, -3.25, 0.41)
	pt3dadd(53.9, 74.87, -3.25, 0.41)
	pt3dadd(54.26, 74.45, -3.25, 0.41)
	pt3dadd(54.52, 73.9, -3.25, 0.41)
	pt3dadd(54.82, 73.23, -3.25, 0.41)
  }
  dend[301] {pt3dclear()
	pt3dadd(45.51, 80.23, -3.75, 0.56)
	pt3dadd(45.71, 79.09, -3.75, 0.61)
	pt3dadd(46.12, 78.39, -3.75, 0.51)
	pt3dadd(46.27, 77.56, -3.75, 0.51)
	pt3dadd(46.42, 77.01, -3.75, 0.51)
	pt3dadd(46.68, 76.48, -3.75, 0.51)
	pt3dadd(46.99, 75.73, -3.75, 0.61)
	pt3dadd(47.24, 75.06, -3.75, 0.61)
	pt3dadd(47.34, 74.29, -3.75, 0.51)
	pt3dadd(47.55, 73.53, -3.75, 0.46)
	pt3dadd(47.7, 72.61, -3.75, 0.46)
	pt3dadd(48.11, 72.04, -3.5, 0.46)
	pt3dadd(48.88, 71.48, -3.5, 0.46)
	pt3dadd(49.7, 71.17, -3.5, 0.46)
	pt3dadd(50.62, 71.06, -3.5, 0.46)
	pt3dadd(51.39, 70.92, -3.5, 0.46)
	pt3dadd(52.46, 70.77, -3.5, 0.46)
	pt3dadd(53.23, 70.56, -3.5, 0.46)
	pt3dadd(54.19, 70.39, -3.5, 0.46)
  }
  dend[302] {pt3dclear()
	pt3dadd(54.19, 70.39, -3.5, 0.46)
	pt3dadd(55.02, 70.2, -3.25, 0.46)
	pt3dadd(55.78, 70.05, -3.25, 0.46)
	pt3dadd(56.81, 70, -3.25, 0.46)
	pt3dadd(57.06, 69.79, -3.25, 0.46)
	pt3dadd(57.52, 69.44, -3.25, 0.46)
	pt3dadd(58.14, 68.77, -3, 0.36)
	pt3dadd(58.55, 68.41, -3, 0.36)
	pt3dadd(59.31, 68.16, -3, 0.36)
	pt3dadd(60.08, 68.11, -2.75, 0.36)
	pt3dadd(60.95, 68.11, -2.75, 0.36)
	pt3dadd(61.77, 68.16, -2.75, 0.46)
	pt3dadd(62.28, 68.11, -2.75, 0.46)
	pt3dadd(63.1, 68.05, -2.75, 0.46)
  }
  dend[303] {pt3dclear()
	pt3dadd(54.19, 70.39, -3.5, 0.46)
	pt3dadd(54.38, 69.56, -3.5, 0.61)
	pt3dadd(54.49, 68.84, -3.5, 0.61)
	pt3dadd(54.69, 68.23, -3.5, 0.61)
	pt3dadd(55.05, 67.56, -3.5, 0.61)
	pt3dadd(55.36, 67.01, -3.5, 0.61)
	pt3dadd(55.82, 66.48, -3.5, 0.61)
	pt3dadd(56.22, 65.78, -3.5, 0.61)
	pt3dadd(57.09, 65.37, -3.25, 0.77)
	pt3dadd(58.02, 64.59, -3.25, 0.72)
	pt3dadd(58.73, 64.29, -3.25, 0.72)
	pt3dadd(59.5, 63.68, -3.25, 0.61)
	pt3dadd(60.42, 63.22, -3.25, 0.61)
	pt3dadd(61.19, 62.71, -3, 0.61)
	pt3dadd(61.65, 62.3, -3, 0.67)
	pt3dadd(62.21, 61.84, -3, 0.67)
	pt3dadd(62.31, 61.17, -3, 0.67)
	pt3dadd(62.47, 60.61, -3, 0.67)
	pt3dadd(62.62, 59.84, -3.25, 0.56)
	pt3dadd(62.52, 59.18, -3.25, 0.67)
	pt3dadd(62.31, 58.82, -3.25, 0.67)
	pt3dadd(62.16, 58.21, -3.25, 0.51)
	pt3dadd(61.9, 57.49, -3.25, 0.51)
  }
}
proc shape3d_15() {
  dend[303] {	pt3dadd(61.54, 56.93, -3.25, 0.51)
	pt3dadd(61.29, 56.26, -3.25, 0.41)
  }
  dend[304] {pt3dclear()
	pt3dadd(40.96, 82.61, -4.5, 0.61)
	pt3dadd(41.29, 81.77, -4.25, 0.36)
	pt3dadd(42.11, 80.84, -4.25, 0.36)
	pt3dadd(42.92, 79.77, -4.25, 0.41)
	pt3dadd(43.59, 78.59, -4.25, 0.46)
	pt3dadd(44.25, 77.63, -4.25, 0.72)
	pt3dadd(44.61, 77.11, -4.25, 0.77)
  }
  dend[305] {pt3dclear()
	pt3dadd(44.61, 77.11, -4.25, 0.77)
	pt3dadd(44.36, 76.14, -4.25, 0.41)
	pt3dadd(44.51, 74.97, -4.25, 0.41)
	pt3dadd(44.61, 73.84, -4.25, 0.41)
	pt3dadd(44.82, 72.77, -4.25, 0.41)
	pt3dadd(45.02, 71.69, -4.25, 0.41)
	pt3dadd(45.38, 70.45, -4.25, 0.41)
	pt3dadd(45.74, 69.54, -4.25, 0.41)
	pt3dadd(46.3, 68.2, -4, 0.41)
	pt3dadd(47.02, 66.73, -4, 0.31)
	pt3dadd(47.63, 65.55, -4, 0.26)
	pt3dadd(48.4, 63.97, -4, 0.15)
  }
  dend[306] {pt3dclear()
	pt3dadd(44.61, 77.11, -4.25, 0.77)
	pt3dadd(45.43, 76.5, -4.25, 0.15)
	pt3dadd(45.69, 75.63, -4.25, 0.36)
	pt3dadd(45.94, 74.34, -4.25, 0.51)
	pt3dadd(46.56, 73.43, -4.25, 0.67)
	pt3dadd(46.96, 72.45, -4.25, 0.67)
	pt3dadd(47.22, 70.81, -4.25, 0.67)
	pt3dadd(47.83, 69.95, -4.25, 0.56)
	pt3dadd(47.89, 68.98, -4.25, 0.51)
	pt3dadd(48.35, 68.11, -4.25, 0.46)
	pt3dadd(48.86, 66.98, -4.25, 0.36)
	pt3dadd(49.57, 65.86, -4.25, 0.36)
	pt3dadd(50.09, 65.09, -4.25, 0.36)
	pt3dadd(51.11, 64.17, -4, 0.36)
	pt3dadd(51.52, 63.05, -4, 0.46)
	pt3dadd(51.57, 61.61, -4, 0.46)
  }
  dend[307] {pt3dclear()
	pt3dadd(51.57, 61.61, -4, 0.46)
	pt3dadd(51.06, 60.39, -4.5, 0.36)
	pt3dadd(50.55, 59.21, -4.5, 0.36)
	pt3dadd(50.24, 57.37, -4.75, 0.36)
	pt3dadd(50.24, 56.45, -4.75, 0.36)
	pt3dadd(49.93, 55.22, -4.75, 0.36)
	pt3dadd(49.37, 53.48, -4.75, 0.36)
	pt3dadd(49.42, 52.46, -5, 0.36)
	pt3dadd(49.73, 51.13, -5, 0.31)
	pt3dadd(49.98, 49.44, -5, 0.31)
	pt3dadd(49.93, 47.96, -5, 0.31)
  }
  dend[308] {pt3dclear()
	pt3dadd(51.57, 61.61, -4, 0.46)
	pt3dadd(52.54, 60.54, -4.25, 0.46)
	pt3dadd(53.67, 59.36, -4.25, 0.56)
  }
  dend[309] {pt3dclear()
	pt3dadd(53.67, 59.36, -4.25, 0.56)
	pt3dadd(52.95, 59.06, -4.25, 0.56)
	pt3dadd(52.9, 58.19, -4.25, 0.18)
	pt3dadd(52.9, 57.11, -4.25, 0.18)
	pt3dadd(52.85, 56.29, -4.25, 0.18)
	pt3dadd(52.59, 54.96, -4.25, 0.18)
	pt3dadd(52.13, 54.09, -4.25, 0.18)
	pt3dadd(52.08, 53.12, -4.25, 0.26)
	pt3dadd(51.93, 51.79, -4.25, 0.18)
	pt3dadd(51.98, 50.57, -4.25, 0.18)
	pt3dadd(51.77, 48.72, -4.25, 0.18)
	pt3dadd(51.88, 48.16, -4.5, 0.31)
	pt3dadd(51.98, 46.63, -4.5, 0.31)
  }
  dend[310] {pt3dclear()
	pt3dadd(53.67, 59.36, -4.25, 0.56)
	pt3dadd(54.08, 58.49, -4.25, 0.31)
	pt3dadd(54.64, 57.01, -4, 0.31)
	pt3dadd(54.89, 55.99, -4, 0.31)
	pt3dadd(55.15, 55.37, -4, 0.31)
	pt3dadd(55.81, 54.66, -4, 0.31)
	pt3dadd(56.58, 54.3, -4, 0.31)
	pt3dadd(57.4, 53.89, -4, 0.18)
	pt3dadd(58.42, 53.12, -4, 0.18)
	pt3dadd(59.45, 52.3, -4, 0.18)
  }
  dend[311] {pt3dclear()
	pt3dadd(38.58, 86.07, -4.75, 0.67)
	pt3dadd(39.14, 86.22, -4.5, 0.31)
	pt3dadd(39.75, 86.42, -4.5, 0.31)
	pt3dadd(40.42, 86.48, -4.5, 0.31)
	pt3dadd(40.83, 86.37, -4.5, 0.31)
	pt3dadd(41.39, 86.32, -4.5, 0.31)
	pt3dadd(42.05, 86.07, -4.5, 0.31)
	pt3dadd(42.57, 85.86, -4.5, 0.36)
	pt3dadd(43.28, 85.55, -4.5, 0.36)
	pt3dadd(43.64, 85.25, -4.5, 0.36)
	pt3dadd(44, 84.79, -4.5, 0.36)
	pt3dadd(44.46, 84.74, -4.5, 0.36)
	pt3dadd(44.92, 84.48, -4.5, 0.36)
	pt3dadd(45.48, 84.43, -4.5, 0.36)
	pt3dadd(45.79, 83.92, -4.25, 0.26)
	pt3dadd(46.45, 83.41, -4.25, 0.26)
	pt3dadd(47.07, 83.05, -4.25, 0.41)
	pt3dadd(47.68, 83.66, -4, 0.41)
	pt3dadd(48.24, 83.82, -4, 0.41)
	pt3dadd(49.27, 84.02, -4, 0.41)
	pt3dadd(49.78, 83.71, -4, 0.36)
	pt3dadd(50.24, 83.41, -4, 0.36)
	pt3dadd(50.7, 82.95, -4, 0.36)
	pt3dadd(50.9, 82.49, -4, 0.36)
	pt3dadd(51.47, 82.08, -4, 0.46)
  }
  dend[312] {pt3dclear()
	pt3dadd(32.1, 91.48, -4.33, 2.18)
	pt3dadd(28.9, 95.01, -5.25, 0.87)
	pt3dadd(29.4, 96.2, -5.25, 0.75)
	pt3dadd(29.64, 97.51, -5.25, 0.56)
	pt3dadd(29.77, 98.82, -5.25, 0.56)
	pt3dadd(30.21, 100, -5.25, 0.56)
	pt3dadd(30.83, 101.1, -5.25, 0.56)
	pt3dadd(31.2, 101.9, -5.25, 0.56)
	pt3dadd(31.89, 102.7, -5.25, 0.62)
	pt3dadd(32.51, 103.9, -5.25, 1)
	pt3dadd(33.22, 105.5, -5.25, 1)
  }
  dend[313] {pt3dclear()
	pt3dadd(33.22, 105.5, -5.25, 1)
	pt3dadd(34.81, 107.2, -5.25, 1.18)
  }
  dend[314] {pt3dclear()
	pt3dadd(34.81, 107.2, -5.25, 1.18)
	pt3dadd(33.51, 105.8, -5.25, 1.18)
	pt3dadd(34.01, 106.9, -5.25, 0.81)
	pt3dadd(34.63, 108, -5.25, 0.56)
	pt3dadd(35.69, 109.3, -5.25, 0.56)
	pt3dadd(36.29, 110.3, -5.25, 0.56)
  }
  dend[315] {pt3dclear()
	pt3dadd(36.29, 110.3, -5.25, 0.56)
	pt3dadd(36.44, 112.2, -5, 0.56)
	pt3dadd(36.88, 114.3, -5, 0.56)
	pt3dadd(37.11, 115.2, -5, 0.56)
  }
  dend[316] {pt3dclear()
	pt3dadd(37.11, 115.2, -5, 0.56)
	pt3dadd(37.06, 115.8, -4.75, 0.56)
	pt3dadd(37.06, 117.3, -4.75, 0.56)
	pt3dadd(37.56, 119.8, -4.75, 0.5)
	pt3dadd(37.61, 120.1, -4.75, 0.5)
  }
  dend[317] {pt3dclear()
	pt3dadd(37.61, 120.1, -4.75, 0.5)
	pt3dadd(37.94, 122, -4.75, 0.5)
	pt3dadd(38.04, 123.2, -4.75, 0.5)
  }
  dend[318] {pt3dclear()
	pt3dadd(38.04, 123.2, -4.75, 0.5)
	pt3dadd(38.19, 124.9, -4.75, 0.25)
	pt3dadd(38.56, 125.6, -4.75, 0.25)
	pt3dadd(39.25, 127.7, -4.75, 0.25)
	pt3dadd(39.36, 129.4, -4.75, 0.25)
	pt3dadd(39.18, 130.69, -4.75, 0.25)
  }
  dend[319] {pt3dclear()
	pt3dadd(38.04, 123.2, -4.75, 0.5)
	pt3dadd(38.81, 123.1, -4.5, 0.31)
	pt3dadd(40.24, 123.8, -4.5, 0.31)
	pt3dadd(42.11, 125.2, -4.25, 0.31)
	pt3dadd(43.24, 126.7, -4.25, 0.31)
	pt3dadd(44.36, 128.5, -4.25, 0.31)
  }
  dend[320] {pt3dclear()
	pt3dadd(44.36, 128.5, -4.25, 0.31)
	pt3dadd(44.67, 129.9, -4.25, 0.1898)
	pt3dadd(45.42, 131.4, -4.25, 0.1898)
	pt3dadd(46.29, 132.5, -4.25, 0.1898)
	pt3dadd(48.29, 133.8, -4, 0.1898)
	pt3dadd(49.59, 135, -4, 0.1898)
	pt3dadd(50.84, 136.19, -4, 0.1898)
  }
  dend[321] {pt3dclear()
	pt3dadd(44.36, 128.5, -4.25, 0.31)
	pt3dadd(45.6, 128.6, -4.25, 0.1898)
	pt3dadd(47.16, 129.19, -4.25, 0.1898)
	pt3dadd(48.97, 129.9, -4, 0.1898)
	pt3dadd(49.97, 130.6, -4, 0.1898)
	pt3dadd(51.47, 130.6, -4, 0.1898)
	pt3dadd(52.77, 131.1, -4, 0.1898)
	pt3dadd(54.71, 131.19, -3.75, 0.1898)
	pt3dadd(55.83, 130.9, -3.75, 0.1898)
	pt3dadd(56.33, 129.69, -3.75, 0.1898)
  }
  dend[322] {pt3dclear()
	pt3dadd(37.61, 120.1, -4.75, 0.5)
	pt3dadd(38.36, 120.1, -4.75, 0.31)
	pt3dadd(39.5, 120.7, -4.75, 0.31)
	pt3dadd(40.49, 121.1, -4.75, 0.31)
	pt3dadd(41.61, 121.4, -4.5, 0.31)
	pt3dadd(42.43, 121.6, -4.5, 0.31)
	pt3dadd(43.55, 122.9, -4.5, 0.31)
	pt3dadd(45.36, 124.6, -4.25, 0.31)
	pt3dadd(46.35, 126, -4, 0.31)
  }
  dend[323] {pt3dclear()
	pt3dadd(37.11, 115.2, -5, 0.56)
	pt3dadd(37.94, 115.5, -4.75, 0.25)
	pt3dadd(39.25, 116, -4.75, 0.25)
	pt3dadd(40.43, 116.5, -4.75, 0.25)
	pt3dadd(40.24, 117.3, -4.5, 0.25)
	pt3dadd(41.18, 117.6, -4.5, 0.25)
  }
  dend[324] {pt3dclear()
	pt3dadd(36.29, 110.3, -5.25, 0.56)
	pt3dadd(37.19, 110, -4.75, 0.25)
	pt3dadd(38.11, 109.9, -4.75, 0.25)
	pt3dadd(39.81, 110.5, -4.5, 0.25)
	pt3dadd(40.74, 111.1, -4.5, 0.25)
	pt3dadd(41.18, 111.6, -4.75, 0.25)
	pt3dadd(42.11, 112.7, -4.75, 0.25)
	pt3dadd(42.3, 114.2, -4.5, 0.25)
	pt3dadd(42.43, 115, -4.5, 0.31)
	pt3dadd(42.8, 116.7, -4.5, 0.31)
	pt3dadd(42.99, 118, -4.5, 0.31)
  }
  dend[325] {pt3dclear()
	pt3dadd(34.81, 107.2, -5.25, 1.18)
	pt3dadd(33.01, 107.2, -5.25, 0.44)
	pt3dadd(32.89, 108.8, -5.25, 0.44)
  }
  dend[326] {pt3dclear()
	pt3dadd(32.89, 108.8, -5.25, 0.44)
	pt3dadd(33.26, 110.3, -5.25, 0.25)
	pt3dadd(33.57, 111.5, -5.25, 0.25)
	pt3dadd(33.76, 113, -5.25, 0.25)
	pt3dadd(33.95, 114, -5.25, 0.25)
	pt3dadd(34.63, 115, -5.25, 0.25)
	pt3dadd(34.88, 116.5, -5.25, 0.25)
	pt3dadd(35.13, 117.7, -5.25, 0.25)
	pt3dadd(35.19, 119.5, -5.25, 0.25)
	pt3dadd(35.19, 120.6, -5.25, 0.25)
  }
  dend[327] {pt3dclear()
	pt3dadd(35.19, 120.6, -5.25, 0.25)
	pt3dadd(36, 121.5, -5.5, 0.25)
  }
}
proc shape3d_16() {
  dend[327] {	pt3dadd(36, 122.8, -5.5, 0.25)
	pt3dadd(35.88, 124, -5.5, 0.25)
	pt3dadd(35.13, 125.1, -5.5, 0.25)
	pt3dadd(34.63, 126.1, -5.5, 0.25)
	pt3dadd(34.2, 127, -5.5, 0.25)
	pt3dadd(34.32, 128.69, -5.5, 0.25)
  }
  dend[328] {pt3dclear()
	pt3dadd(35.19, 120.6, -5.25, 0.25)
	pt3dadd(34.32, 121.7, -5.5, 0.25)
	pt3dadd(33.32, 122.4, -5.5, 0.25)
	pt3dadd(32.7, 122.7, -5.5, 0.25)
	pt3dadd(31.52, 123.1, -5.5, 0.06)
	pt3dadd(31.08, 123.4, -5.5, 0.06)
	pt3dadd(30.56, 123.4, -5.5, 0.46)
	pt3dadd(29.95, 123.5, -5.5, 0.46)
	pt3dadd(28.92, 123.4, -5.5, 0.46)
	pt3dadd(28.21, 123.4, -5.5, 0.46)
	pt3dadd(27.49, 123.4, -5.5, 0.46)
	pt3dadd(26.88, 123, -5.5, 0.46)
	pt3dadd(26.52, 122.8, -5.5, 0.46)
	pt3dadd(26.11, 122.7, -5.5, 0.67)
	pt3dadd(25.5, 122.5, -5.5, 0.67)
  }
  dend[329] {pt3dclear()
	pt3dadd(32.89, 108.8, -5.25, 0.44)
	pt3dadd(31.89, 109.3, -5.5, 0.06)
	pt3dadd(30.83, 110.2, -5.5, 0.06)
	pt3dadd(30.27, 111.2, -5.5, 0.06)
	pt3dadd(30.21, 113, -5.5, 0.06)
	pt3dadd(29.83, 114.3, -5.5, 0.06)
	pt3dadd(29.46, 115.5, -5.5, 0.06)
	pt3dadd(29.21, 116.9, -5.5, 0.06)
  }
  dend[330] {pt3dclear()
	pt3dadd(33.22, 105.5, -5.25, 1)
	pt3dadd(34.14, 105.5, -4.75, 0.41)
	pt3dadd(34.7, 105.7, -4.75, 0.41)
	pt3dadd(35.42, 106, -4.75, 0.41)
	pt3dadd(36.34, 106.3, -4.75, 0.41)
	pt3dadd(36.85, 106.5, -4.75, 0.41)
	pt3dadd(37.26, 106, -4.75, 0.41)
	pt3dadd(37.72, 105.6, -4.75, 0.41)
	pt3dadd(38.08, 105.2, -4.75, 0.41)
	pt3dadd(38.22, 104.8, -4.75, 0.41)
	pt3dadd(38.49, 104.2, -4.75, 0.41)
	pt3dadd(39.04, 103.6, -4.75, 0.41)
	pt3dadd(39.97, 103.4, -4.75, 0.41)
	pt3dadd(40.84, 103, -4.75, 0.41)
	pt3dadd(41.35, 103.3, -4.75, 0.41)
	pt3dadd(41.41, 103.8, -4.75, 0.41)
	pt3dadd(41.61, 104.5, -5, 0.41)
	pt3dadd(42.02, 105.2, -5, 0.41)
	pt3dadd(41.97, 105.9, -5, 0.41)
	pt3dadd(41.87, 106.9, -5, 0.41)
	pt3dadd(42.07, 107.8, -4.75, 0.41)
	pt3dadd(42.43, 108.5, -4.75, 0.41)
	pt3dadd(42.84, 109, -4.75, 0.41)
	pt3dadd(43.55, 109.7, -4.75, 0.41)
	pt3dadd(44.22, 110.3, -4.75, 0.41)
	pt3dadd(44.88, 111.1, -4.75, 0.41)
	pt3dadd(44.83, 111.8, -4.75, 0.41)
	pt3dadd(44.63, 112.5, -4.75, 0.41)
	pt3dadd(44.22, 113.2, -5, 0.41)
	pt3dadd(43.71, 113.6, -5, 0.41)
	pt3dadd(42.89, 113.6, -5, 0.41)
	pt3dadd(42.48, 113.6, -5, 0.41)
	pt3dadd(42.12, 113.4, -5, 0.41)
	pt3dadd(41.76, 113, -4.75, 0.41)
	pt3dadd(41.41, 112.5, -4.75, 0.41)
	pt3dadd(41.05, 111.8, -4.75, 0.41)
	pt3dadd(40.59, 111.3, -4.75, 0.41)
	pt3dadd(40.13, 110.7, -4.75, 0.41)
	pt3dadd(39.77, 110.2, -4.75, 0.41)
	pt3dadd(38.9, 109.6, -4.75, 0.41)
	pt3dadd(38.22, 108.9, -4.75, 0.41)
	pt3dadd(37.77, 108, -4.75, 0.41)
  }
  dend[331] {pt3dclear()
	pt3dadd(28.43, 93.52, -5.5, 2.43)
	pt3dadd(29.38, 93.76, -5.25, 0.41)
	pt3dadd(29.95, 94.22, -5.25, 0.41)
	pt3dadd(30.51, 94.78, -5.25, 0.41)
	pt3dadd(31.33, 95.29, -5.25, 0.41)
  }
  dend[332] {pt3dclear()
	pt3dadd(31.33, 95.29, -5.25, 0.41)
	pt3dadd(31.33, 96.16, -5.25, 0.41)
	pt3dadd(31.43, 97.14, -5, 0.41)
	pt3dadd(31.74, 98.06, -5, 0.41)
	pt3dadd(31.84, 98.67, -5, 0.41)
	pt3dadd(32.56, 99.64, -5, 0.41)
	pt3dadd(32.65, 100.3, -4.75, 0.41)
  }
  dend[333] {pt3dclear()
	pt3dadd(31.33, 95.29, -5.25, 0.41)
	pt3dadd(31.89, 94.83, -5.25, 0.41)
	pt3dadd(32.56, 94.48, -5.25, 0.41)
	pt3dadd(33.02, 94.07, -5.25, 0.41)
	pt3dadd(33.83, 93.96, -5.25, 0.41)
	pt3dadd(34.4, 93.86, -5.25, 0.41)
	pt3dadd(35.36, 94.02, -5.25, 0.41)
	pt3dadd(35.97, 93.86, -5, 0.41)
	pt3dadd(36.75, 94.58, -5, 0.41)
	pt3dadd(36.9, 95.09, -5, 0.41)
	pt3dadd(36.7, 95.91, -5, 0.41)
	pt3dadd(36.34, 96.42, -5, 0.41)
	pt3dadd(36.54, 97.29, -5, 0.41)
	pt3dadd(36.9, 97.95, -5, 0.41)
	pt3dadd(37.42, 98.47, -5, 0.41)
	pt3dadd(38.13, 99.23, -5, 0.41)
	pt3dadd(38.85, 99.69, -5, 0.41)
	pt3dadd(39.4, 100, -4.75, 0.41)
	pt3dadd(39.86, 99.54, -4.75, 0.41)
	pt3dadd(40.13, 98.93, -4.75, 0.41)
  }
  dend[334] {pt3dclear()
	pt3dadd(18.28, 92.69, -6.25, 2.62)
	pt3dadd(18.47, 90.52, -6, 1.37)
	pt3dadd(19.03, 89.34, -6, 0.81)
	pt3dadd(19.78, 88.15, -6, 0.81)
	pt3dadd(20.71, 87.22, -5.75, 0.81)
	pt3dadd(21.21, 86.6, -5.75, 1)
	pt3dadd(22.09, 85.66, -5.75, 1.56)
	pt3dadd(22.35, 85.16, -5.75, 1.56)
  }
  dend[335] {pt3dclear()
	pt3dadd(22.35, 85.16, -5.75, 1.56)
	pt3dadd(22.9, 83.98, -5.75, 0.81)
	pt3dadd(23.33, 82.86, -5.75, 0.69)
	pt3dadd(23.71, 81.98, -5.75, 0.87)
	pt3dadd(24.45, 81.23, -5.75, 0.87)
	pt3dadd(25.02, 80.36, -5.75, 0.81)
	pt3dadd(25.58, 79.55, -5.75, 0.81)
	pt3dadd(26.2, 78.3, -5.75, 0.81)
	pt3dadd(26.59, 77.93, -5.75, 0.81)
  }
  dend[336] {pt3dclear()
	pt3dadd(26.59, 77.93, -5.75, 0.81)
	pt3dadd(26.89, 77.62, -5.75, 1.12)
	pt3dadd(27.14, 76.56, -5.75, 1.12)
	pt3dadd(27.38, 75.5, -5.75, 0.81)
	pt3dadd(27.51, 74.13, -5.75, 0.75)
	pt3dadd(27.59, 73.88, -5.75, 0.75)
  }
  dend[337] {pt3dclear()
	pt3dadd(27.59, 73.88, -5.75, 0.75)
	pt3dadd(27.51, 72.31, -5.75, 0.75)
	pt3dadd(27.38, 70.51, -5.75, 0.75)
	pt3dadd(27.45, 68.77, -5.75, 0.75)
	pt3dadd(27.82, 67.89, -5.75, 0.75)
	pt3dadd(28.2, 66.77, -5.75, 0.75)
	pt3dadd(28.2, 65.34, -5.75, 0.75)
	pt3dadd(28.76, 64.34, -5.75, 0.75)
	pt3dadd(29.69, 63.28, -5.5, 0.75)
	pt3dadd(30.56, 62.28, -5.5, 0.75)
	pt3dadd(30.7, 61.75, -5.5, 0.75)
  }
  dend[338] {pt3dclear()
	pt3dadd(30.7, 61.75, -5.5, 0.75)
	pt3dadd(30.94, 61.16, -5.5, 0.75)
	pt3dadd(31.37, 60.22, -5.5, 0.37)
	pt3dadd(31.75, 59.04, -5.5, 0.5)
	pt3dadd(32.11, 57.92, -5.5, 0.5)
	pt3dadd(32.56, 56.61, -5.5, 0.5)
	pt3dadd(32.86, 55.49, -5.5, 0.5)
	pt3dadd(32.5, 54.73, -5.5, 0.5)
  }
  dend[339] {pt3dclear()
	pt3dadd(32.5, 54.73, -5.5, 0.5)
	pt3dadd(32.22, 54, -5.5, 0.44)
	pt3dadd(32.06, 53.55, -5.5, 0.44)
	pt3dadd(31.19, 52.56, -5.5, 0.44)
	pt3dadd(31, 51.12, -5.5, 0.44)
	pt3dadd(30.75, 49.5, -5.5, 0.44)
	pt3dadd(30.7, 48.76, -5.5, 0.41)
	pt3dadd(30.7, 47.94, -5.75, 0.41)
	pt3dadd(30.7, 47.48, -5.75, 0.41)
	pt3dadd(30.75, 46.71, -6, 0.41)
	pt3dadd(30.64, 46.36, -6, 0.41)
	pt3dadd(30.59, 45.84, -6, 0.41)
	pt3dadd(30.24, 45.49, -6.25, 0.26)
  }
  dend[340] {pt3dclear()
	pt3dadd(32.5, 54.73, -5.5, 0.5)
	pt3dadd(32.9, 54.23, -5.25, 0.46)
	pt3dadd(33.29, 53.62, -5.25, 0.41)
	pt3dadd(33.82, 53.11, -5.25, 0.51)
	pt3dadd(34.22, 52.54, -5, 0.67)
  }
  dend[341] {pt3dclear()
	pt3dadd(34.22, 52.54, -5, 0.67)
	pt3dadd(34.28, 51.57, -5, 0.56)
	pt3dadd(34.28, 50.91, -5, 0.56)
	pt3dadd(34.43, 50.09, -5, 0.56)
	pt3dadd(34.89, 49.68, -5.25, 0.51)
	pt3dadd(35.56, 49.63, -5.25, 0.46)
	pt3dadd(36.27, 49.83, -5.25, 0.46)
	pt3dadd(36.72, 50.19, -5.25, 0.46)
	pt3dadd(37.04, 50.5, -5.25, 0.61)
	pt3dadd(37.76, 50.09, -5.25, 0.61)
	pt3dadd(38.52, 49.94, -5.25, 0.61)
	pt3dadd(39.24, 49.53, -5.5, 0.46)
	pt3dadd(39.9, 49.27, -5.5, 0.36)
	pt3dadd(40.47, 49.07, -5.5, 0.46)
	pt3dadd(41.03, 48.71, -5.5, 0.51)
	pt3dadd(41.59, 48.4, -5.5, 0.51)
  }
  dend[342] {pt3dclear()
	pt3dadd(34.22, 52.54, -5, 0.67)
	pt3dadd(34.84, 52.29, -5, 0.41)
	pt3dadd(35.56, 51.88, -5, 0.41)
	pt3dadd(36.11, 51.42, -4.75, 0.36)
	pt3dadd(36.68, 50.81, -4.75, 0.41)
	pt3dadd(37.04, 50.45, -4.75, 0.41)
	pt3dadd(37.35, 50.14, -4.75, 0.41)
	pt3dadd(37.6, 49.48, -4.5, 0.41)
	pt3dadd(38.15, 49.02, -4.5, 0.26)
	pt3dadd(38.42, 48.71, -4.5, 0.26)
	pt3dadd(38.68, 48.35, -4.5, 0.26)
	pt3dadd(39.03, 47.94, -4.5, 0.26)
	pt3dadd(39.39, 47.43, -4.5, 0.26)
	pt3dadd(39.9, 46.97, -4.5, 0.26)
	pt3dadd(40.21, 46.51, -4.5, 0.36)
	pt3dadd(40.47, 46.05, -4.5, 0.41)
	pt3dadd(40.93, 45.64, -4.5, 0.36)
	pt3dadd(41.23, 45.18, -4.5, 0.36)
	pt3dadd(41.49, 44.51, -4.5, 0.31)
	pt3dadd(41.64, 43.9, -4.5, 0.31)
	pt3dadd(41.8, 43.03, -4.25, 0.18)
  }
}
proc shape3d_17() {
  dend[342] {	pt3dadd(42, 42.37, -4.25, 0.31)
	pt3dadd(42.05, 41.55, -4.25, 0.56)
	pt3dadd(42.21, 40.88, -4.25, 0.51)
	pt3dadd(42.31, 40.17, -4.25, 0.51)
	pt3dadd(42.21, 39.4, -4.25, 0.41)
	pt3dadd(42.1, 38.47, -4.25, 0.51)
	pt3dadd(42.15, 37.4, -4.25, 0.51)
	pt3dadd(42.46, 36.53, -4.25, 0.51)
	pt3dadd(42.41, 35.72, -4.25, 0.51)
	pt3dadd(42.46, 35, -4, 0.36)
	pt3dadd(42.61, 34.33, -4, 0.36)
	pt3dadd(42.72, 33.31, -4, 0.51)
	pt3dadd(43.08, 32.59, -4, 0.46)
	pt3dadd(43.02, 31.73, -4, 0.46)
  }
  dend[343] {pt3dclear()
	pt3dadd(30.7, 61.75, -5.5, 0.75)
	pt3dadd(31.36, 61.7, -5.25, 0.51)
	pt3dadd(32.08, 61.5, -5, 0.51)
	pt3dadd(32.64, 61.39, -5, 0.46)
	pt3dadd(33.2, 60.88, -4.75, 0.51)
	pt3dadd(33.82, 60.42, -4.75, 0.51)
	pt3dadd(34.38, 59.66, -4.75, 0.51)
	pt3dadd(34.89, 59.04, -4.75, 0.51)
	pt3dadd(35.61, 58.33, -4.5, 0.46)
	pt3dadd(36.47, 57.86, -4.5, 0.46)
	pt3dadd(36.72, 57.25, -4.5, 0.46)
	pt3dadd(37.5, 56.59, -4.5, 0.31)
	pt3dadd(38.36, 56.13, -4.5, 0.46)
  }
  dend[344] {pt3dclear()
	pt3dadd(38.36, 56.13, -4.5, 0.46)
	pt3dadd(39.34, 56.23, -4.5, 0.46)
	pt3dadd(40.31, 56.28, -4.5, 0.46)
	pt3dadd(41.44, 56.38, -4.5, 0.46)
	pt3dadd(42.21, 56.02, -4.5, 0.46)
	pt3dadd(42.92, 55.67, -4.5, 0.31)
  }
  dend[345] {pt3dclear()
	pt3dadd(42.92, 55.67, -4.5, 0.31)
	pt3dadd(42.78, 56.56, -4.01, 0.51)
  }
  dend[346] {pt3dclear()
	pt3dadd(42.78, 56.56, -4.01, 0.51)
	pt3dadd(43.02, 57.35, -4, 0.51)
	pt3dadd(43.28, 58.27, -4, 0.51)
	pt3dadd(43.38, 59.14, -4, 0.72)
  }
  dend[347] {pt3dclear()
	pt3dadd(42.78, 56.56, -4.01, 0.51)
	pt3dadd(42.72, 54.69, -4.25, 0.31)
	pt3dadd(42.41, 53.98, -4.25, 0.36)
	pt3dadd(41.95, 53.52, -4.25, 0.36)
  }
  dend[348] {pt3dclear()
	pt3dadd(42.92, 55.67, -4.5, 0.31)
	pt3dadd(43.54, 55.41, -4.25, 0.46)
	pt3dadd(44.2, 54.95, -4.25, 0.46)
	pt3dadd(44.76, 54.34, -4.5, 0.61)
	pt3dadd(45.22, 53.87, -4.5, 0.61)
	pt3dadd(45.48, 53.31, -4.5, 0.61)
	pt3dadd(46.14, 52.75, -4.25, 0.41)
	pt3dadd(46.55, 52.34, -4.25, 0.41)
	pt3dadd(46.86, 51.62, -4.25, 0.41)
	pt3dadd(47.58, 50.81, -4.25, 0.41)
	pt3dadd(47.99, 50.24, -4.25, 0.41)
	pt3dadd(48.45, 49.73, -4.25, 0.41)
	pt3dadd(48.7, 49.32, -4.25, 0.41)
	pt3dadd(49.21, 48.81, -4, 0.31)
	pt3dadd(49.88, 48.2, -4, 0.31)
  }
  dend[349] {pt3dclear()
	pt3dadd(38.36, 56.13, -4.5, 0.46)
	pt3dadd(38.52, 55.1, -4.5, 0.56)
	pt3dadd(38.97, 54.64, -4.5, 0.56)
	pt3dadd(39.29, 54.13, -4.5, 0.56)
	pt3dadd(39.49, 53.26, -4.5, 0.56)
	pt3dadd(39.79, 52.65, -4.5, 0.56)
	pt3dadd(40.01, 51.62, -4.5, 0.31)
	pt3dadd(40.31, 51.11, -4.5, 0.31)
	pt3dadd(40.82, 50.5, -4.5, 0.31)
	pt3dadd(41.28, 49.73, -4.5, 0.31)
	pt3dadd(41.44, 49.22, -4.25, 0.31)
  }
  dend[350] {pt3dclear()
	pt3dadd(27.59, 73.88, -5.75, 0.75)
	pt3dadd(28.19, 73.56, -5.5, 0.67)
	pt3dadd(28.75, 73.16, -5.5, 0.51)
	pt3dadd(29.21, 72.75, -5.5, 0.46)
	pt3dadd(29.67, 72.34, -5.5, 0.46)
	pt3dadd(30.18, 71.78, -5.25, 0.46)
	pt3dadd(30.85, 71.37, -5.25, 0.46)
	pt3dadd(31.46, 70.7, -5, 0.56)
	pt3dadd(31.92, 70.14, -5, 0.56)
	pt3dadd(32.43, 69.73, -5, 0.77)
	pt3dadd(33.15, 69.22, -5, 0.67)
	pt3dadd(34.28, 69.17, -4.75, 0.82)
  }
  dend[351] {pt3dclear()
	pt3dadd(34.28, 69.17, -4.75, 0.82)
	pt3dadd(34.84, 69.73, -4.5, 0.56)
	pt3dadd(35.25, 70.34, -4.5, 0.41)
	pt3dadd(35.81, 71.27, -4.5, 0.41)
	pt3dadd(36.36, 71.73, -4.5, 0.41)
	pt3dadd(37.14, 72.39, -4.5, 0.41)
	pt3dadd(37.6, 72.55, -4.5, 0.41)
	pt3dadd(38.32, 72.34, -4.25, 0.41)
	pt3dadd(38.78, 71.83, -4.25, 0.41)
	pt3dadd(39.39, 71.47, -4, 0.36)
	pt3dadd(39.95, 71.17, -4, 0.36)
	pt3dadd(40.11, 70.5, -4, 0.36)
  }
  dend[352] {pt3dclear()
	pt3dadd(34.28, 69.17, -4.75, 0.82)
	pt3dadd(35.25, 68.66, -4.75, 0.67)
  }
  dend[353] {pt3dclear()
	pt3dadd(35.25, 68.66, -4.75, 0.67)
	pt3dadd(35.9, 68.34, -4.5, 0.61)
	pt3dadd(36.78, 68.3, -4.5, 0.61)
	pt3dadd(37.9, 68.15, -4.5, 0.61)
  }
  dend[354] {pt3dclear()
	pt3dadd(37.9, 68.15, -4.5, 0.61)
	pt3dadd(38.42, 68.7, -4.5, 0.51)
	pt3dadd(38.72, 69.37, -4.5, 0.51)
	pt3dadd(39.29, 70.23, -4.75, 0.46)
	pt3dadd(39.7, 70.91, -4.75, 0.46)
	pt3dadd(39.75, 71.52, -4.75, 0.46)
	pt3dadd(39.75, 72.5, -4.75, 0.46)
	pt3dadd(39.65, 73.16, -4.75, 0.46)
  }
  dend[355] {pt3dclear()
	pt3dadd(37.9, 68.15, -4.5, 0.61)
	pt3dadd(38.47, 67.43, -4.5, 0.46)
	pt3dadd(39.03, 66.66, -4.25, 0.46)
	pt3dadd(39.54, 66, -4.25, 0.46)
	pt3dadd(39.95, 65.13, -4.25, 0.46)
	pt3dadd(40.57, 64.77, -4.25, 0.46)
	pt3dadd(41.08, 63.95, -4.25, 0.46)
	pt3dadd(41.59, 63.49, -4.25, 0.46)
	pt3dadd(42.15, 62.57, -4.25, 0.46)
	pt3dadd(42.56, 62.32, -4, 0.41)
	pt3dadd(43.38, 62.26, -3.75, 0.41)
	pt3dadd(44.2, 61.91, -3.75, 0.41)
	pt3dadd(45.17, 61.96, -3.5, 0.41)
	pt3dadd(46.04, 62.01, -3.5, 0.41)
	pt3dadd(46.6, 62.32, -3.5, 0.41)
	pt3dadd(47.42, 62.72, -3.5, 0.41)
	pt3dadd(47.88, 63.03, -3.25, 0.41)
  }
  dend[356] {pt3dclear()
	pt3dadd(35.25, 68.66, -4.75, 0.67)
	pt3dadd(35.09, 67.94, -4.5, 0.41)
	pt3dadd(35.2, 66.77, -4.75, 0.41)
	pt3dadd(35.4, 65.84, -4.75, 0.41)
	pt3dadd(35.4, 64.72, -4.75, 0.41)
	pt3dadd(35.56, 63.9, -4.75, 0.61)
	pt3dadd(35.81, 63.13, -4.75, 0.61)
	pt3dadd(36.02, 62.72, -4.75, 0.61)
  }
  dend[357] {pt3dclear()
	pt3dadd(36.02, 62.72, -4.75, 0.61)
	pt3dadd(36.17, 62.21, -4.75, 0.61)
	pt3dadd(36.22, 61.39, -4.75, 0.51)
	pt3dadd(36.22, 60.42, -4.75, 0.51)
	pt3dadd(36.47, 59.5, -5, 0.51)
	pt3dadd(36.68, 58.48, -5, 0.61)
	pt3dadd(37.29, 57.81, -5, 0.61)
	pt3dadd(37.54, 56.84, -5, 0.61)
	pt3dadd(37.86, 56.07, -5, 0.61)
	pt3dadd(38.32, 55.1, -5, 0.61)
	pt3dadd(38.47, 54.28, -5, 0.61)
	pt3dadd(39.03, 53.47, -5, 0.61)
  }
  dend[358] {pt3dclear()
	pt3dadd(36.02, 62.72, -4.75, 0.61)
	pt3dadd(36.83, 62.06, -4.75, 0.61)
	pt3dadd(37.6, 61.7, -4.75, 0.51)
	pt3dadd(38.15, 61.39, -4.75, 0.46)
	pt3dadd(38.97, 61.04, -4.75, 0.46)
	pt3dadd(39.44, 60.52, -4.75, 0.46)
	pt3dadd(39.54, 60.01, -4.75, 0.56)
	pt3dadd(39.85, 59.3, -4.75, 0.56)
	pt3dadd(39.85, 58.43, -4.75, 0.51)
	pt3dadd(39.65, 57.46, -5, 0.51)
	pt3dadd(40.21, 56.94, -5, 0.51)
	pt3dadd(40.42, 56.79, -5, 0.51)
  }
  dend[359] {pt3dclear()
	pt3dadd(26.59, 77.93, -5.75, 0.81)
	pt3dadd(27.37, 77.97, -5.25, 0.46)
	pt3dadd(28.19, 77.76, -5.25, 0.41)
	pt3dadd(29.26, 77.66, -5.25, 0.41)
	pt3dadd(29.88, 77.3, -5.25, 0.41)
	pt3dadd(30.7, 76.89, -5.25, 0.41)
	pt3dadd(31.51, 76.69, -5.25, 0.41)
	pt3dadd(32.43, 76.28, -5, 0.46)
	pt3dadd(33.4, 76.23, -5, 0.46)
	pt3dadd(34.33, 75.92, -5, 0.46)
	pt3dadd(34.99, 75.56, -5, 0.46)
  }
  dend[360] {pt3dclear()
	pt3dadd(34.99, 75.56, -5, 0.46)
	pt3dadd(35.71, 75.2, -4.75, 0.46)
	pt3dadd(36.43, 75.16, -4.75, 0.46)
	pt3dadd(37.4, 75.2, -4.75, 0.46)
	pt3dadd(37.96, 75.05, -4.75, 0.46)
	pt3dadd(38.93, 75, -4.75, 0.46)
	pt3dadd(39.85, 74.75, -4.5, 0.46)
	pt3dadd(40.57, 74.44, -4.5, 0.46)
	pt3dadd(41.34, 74.18, -4.5, 0.46)
	pt3dadd(41.85, 73.31, -4.5, 0.46)
	pt3dadd(42.1, 72.95, -4.25, 0.46)
	pt3dadd(42.82, 72.29, -4.25, 0.46)
	pt3dadd(42.97, 71.37, -4.25, 0.46)
	pt3dadd(42.87, 70.34, -4.25, 0.46)
	pt3dadd(42.51, 69.31, -4.25, 0.46)
	pt3dadd(41.95, 68.45, -4.25, 0.46)
	pt3dadd(41.9, 67.69, -4.5, 0.46)
	pt3dadd(41.95, 66.66, -4.75, 0.46)
	pt3dadd(42.05, 66, -4.75, 0.36)
	pt3dadd(42.26, 65.48, -4.75, 0.36)
	pt3dadd(42.56, 64.45, -5, 0.36)
	pt3dadd(42.82, 63.65, -5, 0.36)
	pt3dadd(43.08, 63.08, -5, 0.36)
  }
  dend[361] {pt3dclear()
	pt3dadd(34.99, 75.56, -5, 0.46)
	pt3dadd(35.4, 74.59, -5, 0.36)
	pt3dadd(35.2, 73.83, -5, 0.36)
	pt3dadd(34.99, 73.26, -5, 0.36)
	pt3dadd(35.2, 72.55, -5, 0.36)
	pt3dadd(35.4, 71.52, -5, 0.36)
	pt3dadd(35.71, 70.4, -5.25, 0.41)
	pt3dadd(36.02, 69.98, -5.25, 0.41)
	pt3dadd(36.11, 69.12, -5.25, 0.41)
	pt3dadd(36.32, 68.2, -5.25, 0.41)
  }
}
proc shape3d_18() {
  dend[361] {	pt3dadd(36.47, 67.53, -5.25, 0.61)
  }
  dend[362] {pt3dclear()
	pt3dadd(22.35, 85.16, -5.75, 1.56)
	pt3dadd(23.18, 85.66, -6, 0.67)
	pt3dadd(23.74, 85.96, -6, 0.67)
  }
  dend[363] {pt3dclear()
	pt3dadd(23.74, 85.96, -6, 0.67)
	pt3dadd(24.2, 85.55, -6, 0.46)
	pt3dadd(24.81, 85.5, -6, 0.46)
	pt3dadd(25.22, 85.25, -6, 0.46)
	pt3dadd(25.74, 85.15, -6, 0.46)
	pt3dadd(26.2, 84.74, -6, 0.46)
	pt3dadd(26.76, 84.53, -6, 0.46)
	pt3dadd(27.37, 84.48, -6, 0.46)
	pt3dadd(27.88, 84.38, -5.75, 0.46)
	pt3dadd(28.75, 84.12, -5.75, 0.46)
	pt3dadd(29.57, 84.07, -5.75, 0.46)
	pt3dadd(30.65, 83.25, -5.5, 0.46)
	pt3dadd(31.16, 82.95, -5.5, 0.56)
	pt3dadd(31.11, 82.13, -5.5, 0.56)
	pt3dadd(30.19, 81.77, -5.5, 0.56)
	pt3dadd(30.49, 81, -5.75, 0.56)
	pt3dadd(31.06, 80.44, -5.75, 0.56)
	pt3dadd(31.77, 80.18, -5.75, 0.41)
	pt3dadd(32.49, 80.03, -5.75, 0.41)
	pt3dadd(32.95, 79.98, -5.75, 0.41)
	pt3dadd(33.77, 79.72, -5.75, 0.41)
	pt3dadd(34.64, 79.31, -5.75, 0.51)
	pt3dadd(35.61, 79.26, -5.75, 0.51)
	pt3dadd(36.22, 79.01, -5.75, 0.51)
  }
  dend[364] {pt3dclear()
	pt3dadd(23.74, 85.96, -6, 0.67)
	pt3dadd(23.89, 87.14, -6, 0.67)
  }
  dend[365] {pt3dclear()
	pt3dadd(23.89, 87.14, -6, 0.67)
	pt3dadd(24.56, 87.4, -5.75, 0.46)
	pt3dadd(25.33, 87.45, -5.75, 0.46)
	pt3dadd(26.2, 87.65, -5.75, 0.46)
	pt3dadd(26.86, 87.81, -5.75, 0.46)
	pt3dadd(27.73, 87.81, -5.75, 0.56)
	pt3dadd(28.6, 87.7, -5.75, 0.56)
  }
  dend[366] {pt3dclear()
	pt3dadd(28.6, 87.7, -5.75, 0.56)
	pt3dadd(29.21, 88.27, -5.75, 0.41)
	pt3dadd(29.93, 88.62, -5.75, 0.41)
	pt3dadd(30.34, 88.98, -5.75, 0.41)
	pt3dadd(30.85, 89.03, -5.75, 0.41)
	pt3dadd(31.52, 89.14, -5.75, 0.41)
	pt3dadd(32.22, 89.54, -5.75, 0.41)
  }
  dend[367] {pt3dclear()
	pt3dadd(28.6, 87.7, -5.75, 0.56)
	pt3dadd(29.27, 87.09, -5.75, 0.41)
	pt3dadd(29.83, 86.83, -5.75, 0.41)
	pt3dadd(30.29, 86.63, -5.75, 0.41)
	pt3dadd(31.06, 86.37, -5.75, 0.41)
	pt3dadd(31.82, 86.32, -5.75, 0.41)
	pt3dadd(32.28, 86.42, -5.75, 0.41)
	pt3dadd(32.9, 86.37, -5.75, 0.41)
	pt3dadd(33.1, 85.81, -5.75, 0.41)
	pt3dadd(33.46, 85.45, -5.75, 0.41)
	pt3dadd(33.92, 85.2, -5.75, 0.41)
	pt3dadd(34.47, 84.63, -5.75, 0.41)
	pt3dadd(34.99, 84.38, -5.75, 0.41)
	pt3dadd(35.71, 84.17, -5.75, 0.41)
	pt3dadd(36.11, 83.82, -5.75, 0.41)
	pt3dadd(36.68, 83.56, -5.5, 0.41)
	pt3dadd(37.09, 83.1, -5.5, 0.41)
	pt3dadd(37.45, 82.74, -5.5, 0.41)
	pt3dadd(37.65, 82.33, -5.5, 0.41)
	pt3dadd(37.9, 81.87, -5.5, 0.41)
	pt3dadd(38.42, 81.45, -5.5, 0.41)
	pt3dadd(38.83, 80.75, -5.5, 0.41)
	pt3dadd(39.39, 79.98, -5.25, 0.41)
	pt3dadd(39.85, 79.42, -5.25, 0.41)
	pt3dadd(40.52, 79.06, -5.25, 0.41)
	pt3dadd(41.08, 78.59, -5.25, 0.41)
	pt3dadd(41.54, 78.29, -5.25, 0.51)
	pt3dadd(41.95, 77.83, -5.25, 0.51)
	pt3dadd(42.26, 77.52, -5.25, 0.51)
	pt3dadd(42.87, 77.06, -5.25, 0.51)
	pt3dadd(43.18, 76.76, -5.25, 0.51)
	pt3dadd(43.64, 76.4, -5.25, 0.41)
	pt3dadd(44.15, 75.78, -5.25, 0.41)
  }
  dend[368] {pt3dclear()
	pt3dadd(23.89, 87.14, -6, 0.67)
	pt3dadd(23.74, 87.6, -5.75, 0.41)
	pt3dadd(23.33, 88.21, -5.75, 0.26)
	pt3dadd(22.87, 88.47, -5.75, 0.31)
	pt3dadd(22.46, 88.68, -5.75, 0.31)
	pt3dadd(22, 89.29, -6, 0.36)
	pt3dadd(21.59, 89.85, -6, 0.36)
	pt3dadd(21.18, 90.41, -6.25, 0.36)
	pt3dadd(20.77, 90.98, -6.25, 0.36)
	pt3dadd(20.62, 91.95, -6.5, 0.36)
	pt3dadd(20.36, 92.46, -6.5, 0.36)
	pt3dadd(20.21, 92.97, -6.5, 0.36)
	pt3dadd(20.3, 93.59, -6.5, 0.36)
	pt3dadd(20.01, 94.25, -6.75, 0.31)
	pt3dadd(19.48, 94.81, -6.75, 0.18)
	pt3dadd(18.82, 95.12, -6.75, 0.18)
	pt3dadd(18.05, 95.07, -6.75, 0.18)
	pt3dadd(17.6, 94.86, -6.75, 0.18)
	pt3dadd(17.04, 94.35, -6.75, 0.18)
	pt3dadd(17.04, 93.79, -6.75, 0.18)
	pt3dadd(17.04, 93.07, -7, 0.18)
	pt3dadd(17.14, 92.56, -7, 0.18)
	pt3dadd(17.3, 91.9, -7, 0.18)
  }
  dend[369] {pt3dclear()
	pt3dadd(14.4, 93.09, -6.25, 2.93)
	pt3dadd(14.07, 89.99, -6.25, 0.31)
	pt3dadd(14.12, 88.92, -6.25, 0.098)
	pt3dadd(14.22, 87.99, -6.25, 0.098)
	pt3dadd(14.58, 86.97, -6.25, 0.098)
	pt3dadd(15.45, 85.85, -6.25, 0.098)
	pt3dadd(16.53, 84.57, -6.25, 0.098)
	pt3dadd(17.34, 83.08, -6, 0.098)
  }
  dend[370] {pt3dclear()
	pt3dadd(17.34, 83.08, -6, 0.098)
	pt3dadd(18.62, 82.62, -5.75, 0.098)
	pt3dadd(19.29, 82.16, -5.75, 0.098)
	pt3dadd(19.89, 82.06, -5.75, 0.0498)
	pt3dadd(20.82, 81.5, -5.75, 0.098)
	pt3dadd(21.54, 80.98, -5.75, 0.15)
	pt3dadd(22.56, 80.27, -5.75, 0.18)
	pt3dadd(23.18, 79.81, -5.75, 0.18)
	pt3dadd(23.69, 78.94, -5.75, 0.18)
	pt3dadd(24.05, 77.7, -5.75, 0.18)
	pt3dadd(23.99, 77.05, -6, 0.18)
	pt3dadd(24.05, 76.28, -6, 0.18)
	pt3dadd(23.74, 75.31, -6, 0.18)
	pt3dadd(23.38, 73.98, -6, 0.18)
	pt3dadd(23.74, 73.26, -6, 0.18)
	pt3dadd(24.61, 72.8, -6, 0.18)
  }
  dend[371] {pt3dclear()
	pt3dadd(17.34, 83.08, -6, 0.098)
	pt3dadd(17.45, 82.01, -6, 0.18)
	pt3dadd(17.5, 81.59, -6, 0.15)
	pt3dadd(17.7, 80.94, -6, 0.18)
	pt3dadd(18.52, 80.42, -6, 0.18)
	pt3dadd(18.37, 79.3, -6, 0.18)
	pt3dadd(18.98, 78.38, -5.75, 0.18)
  }
  dend[372] {pt3dclear()
	pt3dadd(18.98, 78.38, -5.75, 0.18)
	pt3dadd(18.05, 77.95, -5.75, 0.51)
	pt3dadd(17.96, 77.52, -6, 0.51)
	pt3dadd(17.5, 77.42, -6, 0.51)
	pt3dadd(17.3, 77.78, -6.25, 0.51)
	pt3dadd(17.04, 78.39, -6.5, 0.51)
  }
  dend[373] {pt3dclear()
	pt3dadd(18.98, 78.38, -5.75, 0.18)
	pt3dadd(19.19, 77.34, -5.75, 0.15)
  }
  dend[374] {pt3dclear()
	pt3dadd(19.19, 77.34, -5.75, 0.15)
	pt3dadd(19.23, 76.95, -5.75, 0.26)
	pt3dadd(19.34, 75.77, -5.75, 0.26)
	pt3dadd(19.6, 75, -5.75, 0.26)
	pt3dadd(19.54, 74.08, -5.75, 0.26)
	pt3dadd(19.54, 72.65, -5.75, 0.26)
	pt3dadd(19.44, 71.31, -5.75, 0.26)
	pt3dadd(19.8, 70.3, -6, 0.36)
	pt3dadd(20.3, 69.31, -6, 0.36)
	pt3dadd(20.87, 68.25, -6, 0.36)
	pt3dadd(21.85, 66.81, -6, 0.36)
  }
  dend[375] {pt3dclear()
	pt3dadd(19.19, 77.34, -5.75, 0.15)
	pt3dadd(20, 77.92, -5.75, 0.18)
	pt3dadd(20.82, 77.66, -5.75, 0.15)
	pt3dadd(21.74, 76.89, -5.75, 0.15)
	pt3dadd(22.36, 76.02, -5.5, 0.15)
	pt3dadd(22.97, 74.59, -5.5, 0.15)
	pt3dadd(23.69, 74.29, -5.5, 0.15)
	pt3dadd(24.35, 73.72, -5.5, 0.15)
	pt3dadd(25.48, 72.95, -5.5, 0.15)
	pt3dadd(26.09, 72.29, -5.5, 0.15)
  }
  dend[376] {pt3dclear()
	pt3dadd(26.09, 72.29, -5.5, 0.15)
	pt3dadd(27.01, 72.55, -5.5, 0.15)
	pt3dadd(28.04, 71.73, -5.5, 0.15)
	pt3dadd(28.5, 71.42, -5.5, 0.15)
  }
  dend[377] {pt3dclear()
	pt3dadd(26.09, 72.29, -5.5, 0.15)
	pt3dadd(26.35, 71.22, -5.5, 0.15)
	pt3dadd(26.71, 70.34, -5.5, 0.15)
	pt3dadd(27.68, 69.27, -5.5, 0.15)
	pt3dadd(28.19, 68.34, -5.5, 0.15)
	pt3dadd(28.85, 67.43, -5.5, 0.15)
  }
  dend[378] {pt3dclear()
	pt3dadd(4.16, 89.21, -6.75, 3.12)
	pt3dadd(5.14, 86.53, -6.5, 1)
	pt3dadd(5.83, 85.29, -6.5, 0.75)
	pt3dadd(6.33, 84.16, -6.5, 0.87)
	pt3dadd(6.5, 83.56, -6.5, 0.87)
  }
  dend[379] {pt3dclear()
	pt3dadd(6.5, 83.56, -6.5, 0.87)
	pt3dadd(6.58, 82.79, -6.5, 0.94)
	pt3dadd(6.51, 81.42, -6.5, 1.12)
	pt3dadd(6.5, 80.93, -6.5, 1.12)
  }
  dend[380] {pt3dclear()
	pt3dadd(6.5, 80.93, -6.5, 1.12)
	pt3dadd(6.64, 79.68, -6.5, 0.94)
	pt3dadd(6.62, 78.67, -6.5, 0.94)
  }
  dend[381] {pt3dclear()
	pt3dadd(6.62, 78.67, -6.5, 0.94)
	pt3dadd(6.64, 78.12, -6.5, 0.94)
	pt3dadd(7.57, 76.68, -6.75, 0.5)
	pt3dadd(8.01, 76, -6.75, 0.5)
	pt3dadd(8.51, 74.81, -6.75, 0.56)
	pt3dadd(9.07, 73.81, -6.75, 0.94)
	pt3dadd(9.59, 73.04, -6.75, 0.94)
  }
  dend[382] {pt3dclear()
	pt3dadd(9.59, 73.04, -6.75, 0.94)
	pt3dadd(10.82, 72.76, -6.75, 0.75)
	pt3dadd(11.87, 72.66, -6.75, 0.75)
  }
  dend[383] {pt3dclear()
	pt3dadd(11.87, 72.66, -6.75, 0.75)
	pt3dadd(12.69, 72.56, -6.5, 1.18)
	pt3dadd(13.5, 71.56, -6.5, 0.94)
	pt3dadd(14.06, 70.7, -6.5, 0.75)
	pt3dadd(14.68, 69.89, -6.5, 0.62)
	pt3dadd(15.18, 69.2, -6.5, 0.62)
	pt3dadd(15.87, 68.64, -6.5, 0.62)
	pt3dadd(16.75, 68.03, -6.5, 0.62)
  }
}
proc shape3d_19() {
  dend[383] {  }
  dend[384] {pt3dclear()
	pt3dadd(16.75, 68.03, -6.5, 0.62)
	pt3dadd(17.05, 67.89, -6.25, 0.94)
	pt3dadd(18.23, 66.77, -6.25, 0.5)
	pt3dadd(19.3, 66.15, -6.25, 0.5)
	pt3dadd(19.92, 65.59, -6.25, 0.69)
	pt3dadd(21.1, 64.9, -6.25, 0.69)
	pt3dadd(21.79, 64.53, -6.25, 0.56)
	pt3dadd(22.54, 63.78, -6.25, 1.06)
	pt3dadd(22.72, 62.72, -6.25, 0.75)
	pt3dadd(22.91, 61.53, -6.25, 0.5)
	pt3dadd(23.22, 60.22, -6.25, 0.81)
	pt3dadd(23.85, 59.48, -6.25, 0.75)
	pt3dadd(24.17, 58.04, -6.25, 0.62)
	pt3dadd(24.55, 56.86, -6, 0.69)
	pt3dadd(25.11, 55.86, -6.25, 0.69)
	pt3dadd(25.98, 55.05, -6.25, 0.69)
	pt3dadd(26.61, 54.43, -6.25, 0.56)
	pt3dadd(27.1, 53.24, -6.25, 0.69)
	pt3dadd(27.85, 52.43, -6.25, 0.75)
	pt3dadd(28.29, 51.62, -6.25, 0.69)
  }
  dend[385] {pt3dclear()
	pt3dadd(16.75, 68.03, -6.5, 0.62)
	pt3dadd(16.78, 66.92, -6.5, 0.67)
	pt3dadd(16.63, 66.31, -6.5, 0.56)
	pt3dadd(17.04, 65.84, -6.5, 0.56)
	pt3dadd(17.19, 65.44, -6.5, 0.56)
	pt3dadd(17.34, 65.08, -6.5, 0.41)
	pt3dadd(17.45, 64.81, -6.5, 0.41)
	pt3dadd(17.6, 64.31, -6.5, 0.41)
	pt3dadd(17.7, 63.9, -6.5, 0.56)
	pt3dadd(17.91, 63.08, -6.5, 0.67)
	pt3dadd(18.21, 62.42, -6.5, 0.61)
	pt3dadd(18.73, 61.85, -6.5, 0.61)
	pt3dadd(19.19, 61.39, -6.5, 0.61)
	pt3dadd(19.29, 60.73, -6.25, 0.46)
	pt3dadd(19.8, 60.32, -6.25, 0.51)
	pt3dadd(19.89, 59.71, -6.25, 0.61)
	pt3dadd(20.26, 59.14, -6.25, 0.56)
	pt3dadd(20.62, 58.68, -6.25, 0.61)
  }
  dend[386] {pt3dclear()
	pt3dadd(20.62, 58.68, -6.25, 0.61)
	pt3dadd(20.16, 58.12, -6.25, 0.46)
	pt3dadd(19.85, 57.66, -6.25, 0.41)
	pt3dadd(19.6, 57.15, -6.25, 0.41)
	pt3dadd(19.29, 56.74, -6.25, 0.41)
	pt3dadd(18.93, 56.13, -6.25, 0.41)
  }
  dend[387] {pt3dclear()
	pt3dadd(20.62, 58.68, -6.25, 0.61)
	pt3dadd(21.08, 58.12, -6.25, 0.41)
	pt3dadd(21.39, 57.66, -6.25, 0.36)
	pt3dadd(21.74, 57.15, -6.25, 0.41)
	pt3dadd(22.1, 56.74, -6.25, 0.41)
	pt3dadd(22.46, 56.38, -6.25, 0.41)
  }
  dend[388] {pt3dclear()
	pt3dadd(11.87, 72.66, -6.75, 0.75)
	pt3dadd(12.33, 73.23, -7, 0.41)
	pt3dadd(12.69, 73.84, -7, 0.36)
	pt3dadd(13.1, 74.34, -7, 0.36)
	pt3dadd(13.36, 75.06, -7, 0.36)
	pt3dadd(13.61, 75.94, -7, 0.36)
	pt3dadd(13.77, 76.86, -7, 0.36)
	pt3dadd(13.82, 77.78, -7, 0.36)
	pt3dadd(13.77, 79.06, -7, 0.36)
	pt3dadd(13.61, 79.98, -7, 0.36)
	pt3dadd(13.46, 80.8, -7, 0.36)
	pt3dadd(13.25, 81.62, -7, 0.36)
	pt3dadd(13.1, 82.08, -7, 0.36)
	pt3dadd(12.74, 82.69, -7, 0.36)
	pt3dadd(12.13, 83.56, -7, 0.36)
	pt3dadd(11.57, 84.22, -7, 0.36)
	pt3dadd(11.05, 84.99, -7, 0.36)
  }
  dend[389] {pt3dclear()
	pt3dadd(9.59, 73.04, -6.75, 0.94)
	pt3dadd(9.19, 72.19, -6.5, 0.75)
	pt3dadd(9.13, 70.89, -6.5, 0.75)
	pt3dadd(8.91, 69.48, -6.5, 0.75)
  }
  dend[390] {pt3dclear()
	pt3dadd(8.91, 69.48, -6.5, 0.75)
	pt3dadd(8.63, 68.27, -6.5, 0.75)
	pt3dadd(8.26, 66.77, -6.5, 0.81)
	pt3dadd(7.95, 66.19, -6.5, 0.81)
  }
  dend[391] {pt3dclear()
	pt3dadd(7.95, 66.19, -6.5, 0.81)
	pt3dadd(7.51, 65.27, -6.75, 0.69)
	pt3dadd(7.08, 64.03, -6.75, 0.69)
	pt3dadd(6.89, 63.09, -6.75, 0.69)
	pt3dadd(6.58, 62.03, -6.75, 0.69)
	pt3dadd(6.14, 61.6, -6.75, 0.69)
	pt3dadd(5.64, 60.97, -6.75, 0.81)
	pt3dadd(5.46, 60.1, -6.75, 0.75)
	pt3dadd(5.33, 59.29, -6.75, 0.69)
	pt3dadd(5.21, 58.29, -6.5, 0.62)
	pt3dadd(4.96, 57.17, -6.5, 0.62)
	pt3dadd(5.08, 56.11, -6.5, 0.62)
	pt3dadd(5.27, 55.17, -6.5, 0.62)
	pt3dadd(5.64, 54.49, -6.5, 0.87)
	pt3dadd(6.31, 53.6, -6.5, 0.87)
  }
  dend[392] {pt3dclear()
	pt3dadd(6.31, 53.6, -6.5, 0.87)
	pt3dadd(6.23, 52.86, -6.5, 0.37)
  }
  dend[393] {pt3dclear()
	pt3dadd(6.23, 52.86, -6.5, 0.37)
	pt3dadd(6.2, 52.49, -6.5, 0.37)
  }
  dend[394] {pt3dclear()
	pt3dadd(6.2, 52.49, -6.5, 0.37)
	pt3dadd(6.84, 52.48, -6.5, 0.41)
	pt3dadd(7.14, 51.45, -6.5, 0.41)
	pt3dadd(7.76, 50.74, -6.5, 0.41)
	pt3dadd(8.52, 49.97, -6.5, 0.41)
	pt3dadd(8.52, 48.49, -6.5, 0.41)
	pt3dadd(8.36, 47.57, -6.5, 0.41)
	pt3dadd(8.32, 46.08, -6.5, 0.41)
	pt3dadd(8.32, 45.67, -6.5, 0.41)
  }
  dend[395] {pt3dclear()
	pt3dadd(6.2, 52.49, -6.5, 0.37)
	pt3dadd(5.83, 51.62, -6.5, 0.37)
	pt3dadd(6.02, 50.94, -6.5, 0.37)
	pt3dadd(6.39, 50.31, -6.5, 0.37)
	pt3dadd(6.33, 49.44, -6.5, 0.37)
	pt3dadd(6.33, 48.69, -6.5, 0.37)
	pt3dadd(5.89, 47.63, -6.5, 0.25)
  }
  dend[396] {pt3dclear()
	pt3dadd(6.23, 52.86, -6.5, 0.37)
	pt3dadd(4.99, 53.35, -6.5, 0.41)
	pt3dadd(4.28, 52.22, -6.5, 0.41)
	pt3dadd(3.05, 51.2, -6.5, 0.41)
	pt3dadd(2.44, 50.48, -6.5, 0.41)
  }
  dend[397] {pt3dclear()
	pt3dadd(6.31, 53.6, -6.5, 0.87)
	pt3dadd(7.09, 53.19, -6.5, 0.41)
	pt3dadd(7.96, 53.55, -6.5, 0.41)
	pt3dadd(8.52, 53.35, -6.5, 0.41)
	pt3dadd(9.28, 52.99, -6.5, 0.41)
	pt3dadd(9.96, 52.38, -6.5, 0.41)
	pt3dadd(10.67, 51.51, -6.25, 0.41)
	pt3dadd(11.34, 50.64, -6.25, 0.41)
	pt3dadd(12, 49.82, -6.25, 0.41)
	pt3dadd(12.36, 48.79, -6, 0.41)
	pt3dadd(11.7, 47.36, -6, 0.41)
  }
  dend[398] {pt3dclear()
	pt3dadd(7.95, 66.19, -6.5, 0.81)
	pt3dadd(8.49, 65.48, -6.5, 0.67)
	pt3dadd(9.01, 64.62, -6.5, 0.51)
	pt3dadd(9.42, 63.59, -6.5, 0.87)
	pt3dadd(10.18, 62.78, -6.5, 0.82)
	pt3dadd(10.69, 62.16, -6.5, 0.82)
  }
  dend[399] {pt3dclear()
	pt3dadd(10.69, 62.16, -6.5, 0.82)
	pt3dadd(11.62, 62.01, -6.5, 0.61)
	pt3dadd(12.38, 61.85, -6.5, 0.61)
	pt3dadd(13.05, 61.55, -6.5, 0.82)
	pt3dadd(13.76, 61.09, -6.5, 0.56)
	pt3dadd(14.33, 60.83, -6.5, 0.56)
	pt3dadd(14.99, 60.99, -6.5, 0.41)
  }
  dend[400] {pt3dclear()
	pt3dadd(10.69, 62.16, -6.5, 0.82)
	pt3dadd(10.54, 61.29, -6.5, 0.41)
	pt3dadd(10.8, 60.68, -6.5, 0.51)
	pt3dadd(11, 60.01, -6.5, 0.51)
	pt3dadd(11.26, 59.5, -6.5, 0.41)
	pt3dadd(11.21, 58.89, -6.5, 0.41)
	pt3dadd(11, 58.33, -6.5, 0.41)
	pt3dadd(10.75, 57.92, -6.5, 0.41)
	pt3dadd(10.23, 57.51, -6.5, 0.46)
	pt3dadd(9.57, 57.3, -6.5, 0.56)
	pt3dadd(8.75, 57.25, -6.5, 0.56)
	pt3dadd(8.02, 57.2, -6.5, 0.56)
	pt3dadd(7.37, 57.3, -6.25, 0.61)
  }
  dend[401] {pt3dclear()
	pt3dadd(8.91, 69.48, -6.5, 0.75)
	pt3dadd(9.61, 69.29, -6.5, 0.31)
	pt3dadd(9.88, 69.03, -6.5, 0.31)
	pt3dadd(10.29, 68.78, -6.5, 0.31)
	pt3dadd(10.7, 68.26, -6.5, 0.31)
	pt3dadd(10.95, 68.11, -6.5, 0.31)
	pt3dadd(11.05, 67.7, -6.5, 0.31)
	pt3dadd(11.36, 67.45, -6.5, 0.31)
	pt3dadd(12.03, 67.34, -6.5, 0.46)
	pt3dadd(12.74, 67.04, -6.5, 0.72)
  }
  dend[402] {pt3dclear()
	pt3dadd(6.62, 78.67, -6.5, 0.94)
	pt3dadd(5.97, 77.44, -6.5, 0.72)
	pt3dadd(5.66, 76.52, -6.5, 0.46)
	pt3dadd(4.94, 75.59, -6.5, 0.92)
  }
  dend[403] {pt3dclear()
	pt3dadd(4.94, 75.59, -6.5, 0.92)
	pt3dadd(4.23, 74.63, -6.5, 0.46)
	pt3dadd(3.77, 73.45, -6.5, 1.02)
	pt3dadd(3.92, 72.02, -6.5, 0.72)
  }
  dend[404] {pt3dclear()
	pt3dadd(3.92, 72.02, -6.5, 0.72)
	pt3dadd(4.23, 70.84, -6.5, 0.46)
	pt3dadd(4.48, 70.18, -6.5, 0.41)
	pt3dadd(4.58, 69.2, -6.5, 0.41)
	pt3dadd(4.63, 68.48, -6.5, 0.41)
	pt3dadd(4.84, 67.52, -6.5, 0.41)
	pt3dadd(4.74, 65.98, -6.5, 0.41)
  }
  dend[405] {pt3dclear()
	pt3dadd(3.92, 72.02, -6.5, 0.72)
	pt3dadd(3.25, 71.09, -6.5, 0.56)
	pt3dadd(3, 70.28, -6.75, 0.56)
	pt3dadd(2.64, 68.95, -6.75, 0.56)
	pt3dadd(2.69, 67.62, -6.75, 0.56)
	pt3dadd(2.69, 66.7, -6.75, 0.56)
	pt3dadd(2.44, 65.78, -6.75, 0.72)
	pt3dadd(2.15, 65.53, -6.75, 0.72)
  }
  dend[406] {pt3dclear()
	pt3dadd(2.15, 65.53, -6.75, 0.72)
	pt3dadd(1.87, 65.06, -6.75, 0.56)
	pt3dadd(1.41, 63.68, -6.75, 0.56)
	pt3dadd(1.31, 62.66, -6.75, 0.56)
  }
  dend[407] {pt3dclear()
	pt3dadd(2.15, 65.53, -6.75, 0.72)
	pt3dadd(2.97, 64.97, -6.75, 0.31)
	pt3dadd(3.23, 64.2, -6.75, 0.18)
	pt3dadd(3.33, 63.02, -6.75, 0.18)
	pt3dadd(3.07, 62.1, -6.75, 0.18)
	pt3dadd(2.82, 61.38, -6.75, 0.26)
	pt3dadd(2.56, 60.41, -6.75, 0.36)
	pt3dadd(2.41, 59.7, -6.75, 0.51)
	pt3dadd(2.82, 58.83, -6.75, 0.31)
	pt3dadd(2.82, 57.96, -6.75, 0.18)
	pt3dadd(2.41, 57.14, -6.75, 0.15)
  }
}
proc shape3d_20() {
  dend[407] {	pt3dadd(2.36, 56.06, -6.75, 0.15)
	pt3dadd(2.41, 55.25, -6.75, 0.15)
	pt3dadd(2.15, 54.53, -6.75, 0.15)
	pt3dadd(1.95, 53.86, -6.75, 0.15)
	pt3dadd(1.79, 52.59, -6.75, 0.15)
	pt3dadd(1.95, 51.56, -6.75, 0.15)
  }
  dend[408] {pt3dclear()
	pt3dadd(4.94, 75.59, -6.5, 0.92)
	pt3dadd(5.76, 75.14, -6.25, 0.51)
	pt3dadd(6.07, 73.91, -6.25, 0.51)
	pt3dadd(6.22, 73.09, -6.25, 0.41)
	pt3dadd(6.32, 71.97, -6.25, 0.41)
	pt3dadd(6.27, 70.64, -6.25, 0.41)
	pt3dadd(6.27, 70.02, -6.25, 0.41)
	pt3dadd(6.68, 68.84, -6.25, 0.41)
	pt3dadd(7.27, 68.16, -6.25, 0.31)
	pt3dadd(7.37, 67.5, -6, 0.31)
  }
  dend[409] {pt3dclear()
	pt3dadd(7.37, 67.5, -6, 0.31)
	pt3dadd(6.76, 66.42, -6, 0.31)
	pt3dadd(6.66, 65.59, -6, 0.31)
	pt3dadd(6.66, 64.84, -6, 0.31)
	pt3dadd(6.86, 64.02, -5.75, 0.31)
	pt3dadd(7.22, 63.3, -5.75, 0.31)
	pt3dadd(7.63, 62.59, -5.75, 0.31)
	pt3dadd(8.09, 62.18, -5.75, 0.31)
  }
  dend[410] {pt3dclear()
	pt3dadd(8.09, 62.18, -5.75, 0.31)
	pt3dadd(8.5, 61.72, -5.75, 0.31)
	pt3dadd(8.91, 61.15, -5.75, 0.31)
  }
  dend[411] {pt3dclear()
	pt3dadd(8.09, 62.18, -5.75, 0.31)
	pt3dadd(8.44, 62.43, -5.75, 0.31)
	pt3dadd(9.01, 62.74, -5.5, 0.31)
	pt3dadd(9.52, 63.1, -5.5, 0.31)
	pt3dadd(9.93, 63.1, -5.5, 0.31)
	pt3dadd(10.59, 63.15, -5.5, 0.31)
  }
  dend[412] {pt3dclear()
	pt3dadd(7.37, 67.5, -6, 0.31)
	pt3dadd(8.03, 67.45, -6, 0.31)
	pt3dadd(9.16, 67.5, -5.75, 0.31)
	pt3dadd(9.72, 67.59, -5.75, 0.31)
	pt3dadd(10.34, 67.55, -5.75, 0.31)
	pt3dadd(10.95, 67.45, -5.75, 0.31)
	pt3dadd(11.57, 67.59, -5.75, 0.31)
	pt3dadd(12.03, 68.06, -5.75, 0.31)
	pt3dadd(12.38, 68.67, -5.75, 0.31)
	pt3dadd(12.64, 69.23, -5.75, 0.31)
	pt3dadd(12.84, 69.7, -5.75, 0.31)
	pt3dadd(13.15, 70.16, -5.75, 0.31)
  }
  dend[413] {pt3dclear()
	pt3dadd(6.5, 80.93, -6.5, 1.12)
	pt3dadd(5.48, 81.03, -6.5, 0.51)
	pt3dadd(4.61, 81.13, -6.5, 0.41)
	pt3dadd(4.09, 81.18, -6.5, 0.41)
  }
  dend[414] {pt3dclear()
	pt3dadd(4.09, 81.18, -6.5, 0.41)
	pt3dadd(3.79, 82.26, -6.5, 0.31)
	pt3dadd(3.07, 82.82, -6.5, 0.31)
	pt3dadd(3.12, 83.28, -6.5, 0.31)
	pt3dadd(3.79, 83.94, -6.5, 0.31)
  }
  dend[415] {pt3dclear()
	pt3dadd(4.09, 81.18, -6.5, 0.41)
	pt3dadd(3.38, 80.52, -6.5, 0.31)
	pt3dadd(2.97, 79.48, -6.5, 0.36)
	pt3dadd(2.97, 78.52, -6.5, 0.46)
	pt3dadd(2.66, 77.7, -6.5, 0.41)
	pt3dadd(2.36, 77.04, -6.5, 0.31)
	pt3dadd(2.04, 76.42, -6.75, 0.26)
	pt3dadd(1.84, 75.7, -6.75, 0.31)
	pt3dadd(1.59, 74.73, -6.75, 0.31)
  }
  dend[416] {pt3dclear()
	pt3dadd(1.59, 74.73, -6.75, 0.31)
	pt3dadd(2.2, 74.22, -6.75, 0.31)
	pt3dadd(2.92, 73.56, -6.75, 0.31)
  }
  dend[417] {pt3dclear()
	pt3dadd(1.59, 74.73, -6.75, 0.31)
	pt3dadd(1.54, 74.02, -6.75, 0.26)
	pt3dadd(1.12, 72.95, -6.75, 0.26)
	pt3dadd(0.62, 71.67, -6.75, 0.26)
	pt3dadd(0.51, 70.9, -6.75, 0.26)
	pt3dadd(0.26, 69.77, -6.75, 0.26)
	pt3dadd(0.16, 68.7, -6.75, 0.26)
	pt3dadd(-0.3, 67.27, -6.75, 0.26)
	pt3dadd(-0.3, 66.7, -6.75, 0.26)
  }
  dend[418] {pt3dclear()
	pt3dadd(6.5, 83.56, -6.5, 0.87)
	pt3dadd(7.17, 83.61, -6.75, 0.36)
	pt3dadd(7.78, 83.71, -6.75, 0.36)
	pt3dadd(8.44, 83.61, -6.75, 0.31)
	pt3dadd(9.01, 83.76, -6.75, 0.31)
	pt3dadd(9.88, 84.22, -6.75, 0.31)
	pt3dadd(10.85, 83.97, -6.5, 0.31)
	pt3dadd(11.46, 84.12, -6.5, 0.31)
	pt3dadd(12.44, 83.92, -6.5, 0.31)
	pt3dadd(13.15, 83.71, -6.5, 0.31)
	pt3dadd(13.51, 83.2, -6.5, 0.31)
	pt3dadd(14.07, 82.28, -6.5, 0.31)
	pt3dadd(14.79, 81.56, -6.25, 0.31)
	pt3dadd(15.25, 80.9, -6.25, 0.31)
	pt3dadd(15.56, 80.34, -6.25, 0.31)
	pt3dadd(15.66, 79.67, -6.25, 0.31)
	pt3dadd(15.97, 79.2, -6.25, 0.31)
	pt3dadd(15.91, 78.29, -6, 0.31)
	pt3dadd(16.17, 77.42, -6, 0.31)
	pt3dadd(15.91, 76.81, -6, 0.31)
  }
  dend[419] {pt3dclear()
	pt3dadd(-0.06, 85.73, -6.75, 2.68)
	pt3dadd(-1.73, 87.45, -6.75, 0.61)
	pt3dadd(-2.35, 87.96, -6.75, 0.18)
	pt3dadd(-2.96, 88.37, -6.75, 0.18)
	pt3dadd(-3.47, 88.88, -6.75, 0.18)
	pt3dadd(-4.24, 89.7, -6.75, 0.18)
	pt3dadd(-4.96, 90.52, -6.75, 0.18)
	pt3dadd(-5.16, 91.18, -6.75, 0.41)
	pt3dadd(-5.78, 92, -6.75, 0.72)
	pt3dadd(-5.83, 92.82, -6.75, 0.61)
	pt3dadd(-5.83, 93.59, -6.75, 0.51)
	pt3dadd(-5.88, 94.61, -6.75, 0.36)
	pt3dadd(-5.88, 95.53, -6.75, 0.36)
	pt3dadd(-5.98, 96.76, -7, 0.31)
	pt3dadd(-6.24, 97.68, -7, 0.31)
	pt3dadd(-6.85, 98.5, -7, 0.36)
	pt3dadd(-7.87, 98.91, -7, 0.46)
	pt3dadd(-8.13, 99.52, -7, 0.41)
	pt3dadd(-8.53, 100.8, -7.5, 0.41)
  }
  dend[420] {pt3dclear()
	pt3dadd(-8.53, 100.8, -7.5, 0.41)
	pt3dadd(-9.15, 101.6, -7.5, 0.31)
	pt3dadd(-9.71, 102.5, -7.5, 0.26)
	pt3dadd(-10.38, 103.4, -7.75, 0.26)
	pt3dadd(-11.25, 104.3, -7.75, 0.26)
	pt3dadd(-11.4, 105.9, -8, 0.26)
  }
  dend[421] {pt3dclear()
	pt3dadd(-8.53, 100.8, -7.5, 0.41)
	pt3dadd(-9.61, 100.1, -7.5, 0.26)
	pt3dadd(-10.58, 99.57, -7.5, 0.26)
	pt3dadd(-11.76, 99.01, -7.75, 0.26)
	pt3dadd(-12.63, 98.8, -7.75, 0.56)
  }
  dend[422] {pt3dclear()
	pt3dadd(-12.63, 98.8, -7.75, 0.56)
	pt3dadd(-12.78, 99.72, -7.75, 0.51)
	pt3dadd(-12.83, 100.8, -7.75, 0.46)
	pt3dadd(-12.89, 102.2, -8, 0.31)
	pt3dadd(-12.99, 103.5, -8, 0.31)
	pt3dadd(-13.14, 105.8, -8, 0.31)
  }
  dend[423] {pt3dclear()
	pt3dadd(-12.63, 98.8, -7.75, 0.56)
	pt3dadd(-13.09, 97.93, -7.75, 0.31)
	pt3dadd(-13.65, 96.96, -7.75, 0.31)
	pt3dadd(-14.11, 96.09, -7.75, 0.31)
	pt3dadd(-14.63, 95.33, -8, 0.31)
	pt3dadd(-15.19, 94.56, -8.25, 0.31)
	pt3dadd(-15.34, 93.74, -8.25, 0.18)
	pt3dadd(-15.75, 93.13, -8.25, 0.36)
	pt3dadd(-16.05, 92.1, -8.25, 0.36)
	pt3dadd(-16.47, 91.23, -8.5, 0.36)
	pt3dadd(-17.59, 90.77, -8.5, 0.36)
	pt3dadd(-18.77, 90.57, -8.5, 0.36)
  }
  dend[424] {pt3dclear()
	pt3dadd(-18.77, 90.57, -8.5, 0.36)
	pt3dadd(-19.59, 90.26, -8.5, 0.41)
	pt3dadd(-20.25, 89.75, -8.5, 0.41)
	pt3dadd(-20.81, 89.8, -8.5, 0.31)
	pt3dadd(-21.53, 90.06, -8.5, 0.31)
  }
  dend[425] {pt3dclear()
	pt3dadd(-18.77, 90.57, -8.5, 0.36)
	pt3dadd(-19.23, 91.08, -8.5, 0.41)
	pt3dadd(-19.28, 91.8, -8.5, 0.31)
	pt3dadd(-19.23, 92.97, -8.5, 0.31)
	pt3dadd(-19.23, 93.79, -8.5, 0.31)
	pt3dadd(-18.92, 94.4, -8.5, 0.31)
	pt3dadd(-18.14, 95.38, -8.5, 0.31)
	pt3dadd(-17.69, 96.09, -8.5, 0.31)
	pt3dadd(-17.39, 96.68, -7.75, 0.94)
  }
  dend[426] {pt3dclear()
	pt3dadd(-17.39, 96.68, -7.75, 0.94)
	pt3dadd(-16.87, 99.37, -7.75, 1.37)
  }
  dend[427] {pt3dclear()
	pt3dadd(-16.87, 99.37, -7.75, 1.37)
	pt3dadd(-17.3, 97.19, -7.75, 1.37)
	pt3dadd(-16.68, 98.32, -7.75, 0.94)
	pt3dadd(-16.12, 99.25, -7.75, 0.62)
	pt3dadd(-16.12, 100.3, -7.75, 0.69)
	pt3dadd(-15.8, 101.5, -7.75, 0.69)
	pt3dadd(-15.62, 102.6, -7.75, 0.69)
	pt3dadd(-15.43, 103.7, -7.75, 0.69)
	pt3dadd(-15.43, 104.7, -7.75, 0.69)
	pt3dadd(-15.24, 106.2, -7.5, 0.62)
	pt3dadd(-15.24, 107.5, -7.5, 0.62)
	pt3dadd(-15.24, 108.6, -7.5, 0.62)
	pt3dadd(-15.12, 109.5, -7.5, 0.62)
  }
  dend[428] {pt3dclear()
	pt3dadd(-15.12, 109.5, -7.5, 0.62)
	pt3dadd(-15.18, 110, -7.5, 1)
	pt3dadd(-15.8, 110.7, -7.5, 1)
  }
  dend[429] {pt3dclear()
	pt3dadd(-15.8, 110.7, -7.5, 1)
	pt3dadd(-15.98, 110.8, -7.5, 1)
  }
  dend[430] {pt3dclear()
	pt3dadd(-15.98, 110.8, -7.5, 1)
	pt3dadd(-16.18, 111, -7.5, 1.31)
	pt3dadd(-16.61, 111, -7.5, 1.31)
  }
  dend[431] {pt3dclear()
	pt3dadd(-16.61, 111, -7.5, 1.31)
	pt3dadd(-17.48, 111.2, -7.5, 0.94)
	pt3dadd(-18.3, 111.8, -7.5, 0.81)
	pt3dadd(-19.17, 112.4, -7.5, 0.81)
	pt3dadd(-19.92, 113.3, -7.5, 0.81)
	pt3dadd(-20.36, 114.2, -7.5, 0.81)
	pt3dadd(-21.04, 115.1, -7.5, 0.81)
	pt3dadd(-21.6, 116.1, -7.5, 0.81)
	pt3dadd(-22.16, 117.3, -7.75, 0.81)
	pt3dadd(-22.79, 118.3, -7.75, 0.75)
	pt3dadd(-23.66, 118.8, -7.75, 0.75)
  }
  dend[432] {pt3dclear()
	pt3dadd(-23.66, 118.8, -7.75, 0.75)
	pt3dadd(-24.53, 119.5, -8, 0.75)
	pt3dadd(-25.53, 120, -8, 0.75)
	pt3dadd(-26.84, 120.6, -8, 0.75)
	pt3dadd(-27.9, 121.4, -8, 0.75)
	pt3dadd(-28.09, 122.6, -8, 0.75)
	pt3dadd(-28.21, 123.9, -8.25, 0.75)
	pt3dadd(-28.21, 124.8, -8.25, 0.75)
	pt3dadd(-28.4, 126.1, -8.25, 0.75)
  }
}
proc shape3d_21() {
  dend[432] {  }
  dend[433] {pt3dclear()
	pt3dadd(-28.4, 126.1, -8.25, 0.75)
	pt3dadd(-28.52, 127.1, -8, 0.81)
	pt3dadd(-28.9, 128.69, -8, 0.81)
	pt3dadd(-28.9, 129, -8, 0.81)
  }
  dend[434] {pt3dclear()
	pt3dadd(-28.9, 129, -8, 0.81)
	pt3dadd(-28.9, 129.8, -8, 0.81)
	pt3dadd(-28.71, 130.4, -8, 0.75)
	pt3dadd(-28.52, 131.1, -8, 0.75)
	pt3dadd(-28.46, 131.8, -8, 0.75)
	pt3dadd(-28.34, 132.9, -8, 0.75)
  }
  dend[435] {pt3dclear()
	pt3dadd(-28.9, 129, -8, 0.81)
	pt3dadd(-29.51, 129.4, -8, 0.87)
	pt3dadd(-30.12, 130.1, -8, 0.72)
	pt3dadd(-30.79, 130.5, -8, 0.67)
	pt3dadd(-31.3, 130.69, -8, 0.67)
	pt3dadd(-31.91, 131.19, -8, 0.67)
	pt3dadd(-32.27, 131.4, -8, 0.67)
	pt3dadd(-32.63, 131.69, -8, 0.67)
  }
  dend[436] {pt3dclear()
	pt3dadd(-32.63, 131.69, -8, 0.67)
	pt3dadd(-33.04, 131.9, -8, 0.67)
	pt3dadd(-33.54, 132.3, -7.75, 0.56)
	pt3dadd(-34.22, 132.69, -7.75, 0.56)
	pt3dadd(-34.63, 133.1, -7.75, 0.67)
	pt3dadd(-35.09, 133.69, -7.75, 0.56)
	pt3dadd(-35.44, 134.1, -7.75, 0.51)
	pt3dadd(-35.44, 134.9, -7.75, 0.51)
	pt3dadd(-35.09, 135.9, -7.75, 0.61)
	pt3dadd(-34.93, 136.69, -7.5, 0.51)
  }
  dend[437] {pt3dclear()
	pt3dadd(-32.63, 131.69, -8, 0.67)
	pt3dadd(-32.36, 132.5, -8, 0.51)
	pt3dadd(-32.07, 133.3, -8, 0.51)
	pt3dadd(-31.4, 133.5, -8, 0.51)
	pt3dadd(-30.84, 134, -8, 0.61)
	pt3dadd(-30.38, 134.6, -8, 0.77)
	pt3dadd(-29.82, 135.1, -8, 0.51)
  }
  dend[438] {pt3dclear()
	pt3dadd(-28.4, 126.1, -8.25, 0.75)
	pt3dadd(-29.2, 126.2, -8, 0.67)
	pt3dadd(-29.97, 126.2, -8, 0.51)
	pt3dadd(-30.43, 126.5, -8, 0.51)
	pt3dadd(-30.84, 126.6, -8, 0.51)
	pt3dadd(-31.35, 126.7, -8, 0.51)
	pt3dadd(-31.66, 126.7, -8, 0.67)
	pt3dadd(-32.07, 126.8, -8, 0.77)
  }
  dend[439] {pt3dclear()
	pt3dadd(-23.66, 118.8, -7.75, 0.75)
	pt3dadd(-23.29, 120.5, -7.75, 0.56)
	pt3dadd(-23.22, 121.6, -7.75, 0.69)
	pt3dadd(-23.22, 123.2, -7.75, 0.75)
	pt3dadd(-23.1, 124.2, -7.75, 0.69)
	pt3dadd(-23.1, 125.4, -7.75, 0.44)
	pt3dadd(-23.22, 126.9, -7.75, 0.44)
  }
  dend[440] {pt3dclear()
	pt3dadd(-23.22, 126.9, -7.75, 0.44)
	pt3dadd(-22.41, 127.4, -7.5, 0.56)
	pt3dadd(-22.04, 128.4, -7.5, 0.56)
  }
  dend[441] {pt3dclear()
	pt3dadd(-22.04, 128.4, -7.5, 0.56)
	pt3dadd(-21.6, 129.6, -7.5, 0.62)
	pt3dadd(-21.35, 130.69, -7.5, 0.5)
	pt3dadd(-21.23, 131.8, -7.5, 0.5)
	pt3dadd(-20.98, 132.69, -7.5, 0.75)
	pt3dadd(-20.67, 133.6, -7.5, 0.62)
	pt3dadd(-20.67, 134.5, -7.5, 0.37)
  }
  dend[442] {pt3dclear()
	pt3dadd(-22.04, 128.4, -7.5, 0.56)
	pt3dadd(-20.97, 128.6, -7.25, 0.41)
	pt3dadd(-20.14, 129.3, -7, 0.41)
	pt3dadd(-19.44, 130.1, -7, 0.36)
	pt3dadd(-18.57, 131.1, -7, 0.46)
	pt3dadd(-18.05, 132.19, -7, 0.61)
	pt3dadd(-17.64, 133, -7, 0.67)
	pt3dadd(-17.34, 133.69, -7, 0.61)
	pt3dadd(-16.98, 134.4, -7, 0.46)
	pt3dadd(-16.16, 135.3, -7, 0.56)
	pt3dadd(-15.65, 136.19, -7, 0.51)
	pt3dadd(-15.04, 137.1, -7, 0.51)
  }
  dend[443] {pt3dclear()
	pt3dadd(-23.22, 126.9, -7.75, 0.44)
	pt3dadd(-23.78, 128.19, -7.75, 0.37)
	pt3dadd(-24.28, 129.4, -7.75, 0.44)
	pt3dadd(-24.91, 130.1, -7.75, 0.44)
	pt3dadd(-25.34, 131.19, -8, 0.56)
	pt3dadd(-25.72, 131.9, -8, 0.62)
	pt3dadd(-26.03, 133.1, -8, 0.5)
	pt3dadd(-25.97, 134, -8, 0.87)
	pt3dadd(-26.09, 134.9, -8, 0.69)
	pt3dadd(-26.22, 135.8, -8, 0.44)
	pt3dadd(-26.34, 136.5, -7.75, 0.44)
  }
  dend[444] {pt3dclear()
	pt3dadd(-16.61, 111, -7.5, 1.31)
	pt3dadd(-16.6, 111.5, -7.5, 0.46)
	pt3dadd(-16.91, 112.2, -7.5, 0.46)
	pt3dadd(-17.26, 112.7, -7.5, 0.46)
	pt3dadd(-17.62, 113.3, -7.5, 0.46)
	pt3dadd(-17.82, 113.8, -7.5, 0.46)
	pt3dadd(-18.07, 114.5, -7.5, 0.46)
	pt3dadd(-18.44, 115, -7.5, 0.46)
	pt3dadd(-18.48, 115.4, -7.5, 0.46)
	pt3dadd(-18.59, 115.7, -7.5, 0.46)
	pt3dadd(-18.75, 116.1, -7.5, 0.51)
	pt3dadd(-18.95, 116.6, -7.5, 0.61)
  }
  dend[445] {pt3dclear()
	pt3dadd(-15.98, 110.8, -7.5, 1)
	pt3dadd(-15.18, 113.7, -7.5, 0.62)
	pt3dadd(-15.24, 114.7, -7.5, 0.5)
	pt3dadd(-15.18, 115.7, -7.5, 0.56)
	pt3dadd(-15.12, 116.5, -7.5, 0.62)
	pt3dadd(-15.49, 117.5, -7.5, 0.5)
	pt3dadd(-15.8, 118.5, -7.5, 0.44)
	pt3dadd(-16.48, 119.5, -7.75, 0.56)
	pt3dadd(-17.11, 120.5, -7.75, 0.69)
	pt3dadd(-17.92, 121.4, -7.75, 0.75)
	pt3dadd(-18.73, 122.1, -7.75, 0.69)
	pt3dadd(-19.48, 122.4, -7.75, 0.56)
	pt3dadd(-20.36, 122.6, -7.75, 0.56)
  }
  dend[446] {pt3dclear()
	pt3dadd(-15.8, 110.7, -7.5, 1)
	pt3dadd(-17.21, 108.6, -8.25, 0.51)
	pt3dadd(-17.3, 108.8, -8.25, 0.51)
	pt3dadd(-17.21, 109.5, -8.25, 0.51)
	pt3dadd(-16.85, 110.1, -8.25, 0.51)
	pt3dadd(-16.89, 110.7, -8.25, 0.51)
	pt3dadd(-16.54, 111.1, -8.25, 0.51)
	pt3dadd(-16.13, 111.4, -8.25, 0.56)
	pt3dadd(-15.88, 112, -8.25, 0.56)
	pt3dadd(-15.31, 113, -8.25, 0.56)
	pt3dadd(-15.26, 114, -8.25, 0.56)
	pt3dadd(-15.16, 114.9, -8.25, 0.56)
	pt3dadd(-15.11, 115.3, -8.25, 0.56)
	pt3dadd(-15.11, 116.1, -8.25, 0.56)
	pt3dadd(-15.06, 116.8, -8.25, 0.56)
	pt3dadd(-15.26, 117.8, -8.25, 0.77)
  }
  dend[447] {pt3dclear()
	pt3dadd(-15.26, 117.8, -8.25, 0.77)
	pt3dadd(-15.98, 117.8, -8.5, 0.51)
	pt3dadd(-16.34, 117.6, -8.5, 0.51)
	pt3dadd(-17.1, 117.6, -8.5, 0.51)
	pt3dadd(-17.46, 117.9, -8.5, 0.51)
	pt3dadd(-18.03, 118.2, -8.5, 0.51)
	pt3dadd(-18.43, 118.8, -8.5, 0.51)
	pt3dadd(-18.54, 119.3, -8.5, 0.51)
	pt3dadd(-18.73, 120.3, -8.5, 0.56)
	pt3dadd(-18.79, 120.9, -8.5, 0.61)
	pt3dadd(-18.73, 121.6, -8.5, 0.61)
  }
  dend[448] {pt3dclear()
	pt3dadd(-18.73, 121.6, -8.5, 0.61)
	pt3dadd(-18.69, 122.3, -8.5, 0.61)
	pt3dadd(-18.89, 122.8, -8.5, 0.61)
	pt3dadd(-19.3, 123.2, -8.5, 0.61)
	pt3dadd(-19.82, 123.6, -8.5, 0.61)
  }
  dend[449] {pt3dclear()
	pt3dadd(-18.73, 121.6, -8.5, 0.61)
	pt3dadd(-19.41, 121.6, -8.5, 0.46)
	pt3dadd(-19.87, 121.7, -8.5, 0.46)
	pt3dadd(-20.53, 121.5, -8.25, 0.46)
	pt3dadd(-21.04, 121.5, -8.25, 0.56)
	pt3dadd(-21.45, 121.3, -8.25, 0.77)
  }
  dend[450] {pt3dclear()
	pt3dadd(-15.26, 117.8, -8.25, 0.77)
	pt3dadd(-14.91, 118.6, -8.25, 0.77)
	pt3dadd(-14.5, 119.3, -8, 0.82)
	pt3dadd(-14.01, 119.7, -8, 0.82)
	pt3dadd(-13.93, 120.3, -8.25, 0.56)
  }
  dend[451] {pt3dclear()
	pt3dadd(-13.93, 120.3, -8.25, 0.56)
	pt3dadd(-14.39, 120.9, -8.25, 0.56)
	pt3dadd(-14.55, 121.5, -8.25, 0.56)
	pt3dadd(-14.85, 122.1, -8.25, 0.56)
	pt3dadd(-15.01, 122.8, -8.25, 0.56)
	pt3dadd(-15.37, 123.4, -8.25, 0.56)
	pt3dadd(-15.72, 124.5, -8.25, 0.56)
	pt3dadd(-16.07, 125.2, -8.25, 0.56)
	pt3dadd(-16.75, 125.8, -8.25, 0.56)
	pt3dadd(-17.21, 126.1, -8.25, 0.56)
	pt3dadd(-18.13, 126.3, -8.25, 0.56)
	pt3dadd(-18.84, 126.7, -8.25, 0.56)
	pt3dadd(-19.46, 127.4, -8.25, 0.56)
	pt3dadd(-20.23, 127.8, -8.25, 0.56)
	pt3dadd(-21.09, 128.1, -8.5, 0.56)
	pt3dadd(-21.5, 128.4, -8.5, 0.56)
	pt3dadd(-21.91, 128.69, -8.5, 1.02)
  }
  dend[452] {pt3dclear()
	pt3dadd(-13.93, 120.3, -8.25, 0.56)
	pt3dadd(-13.52, 120.2, -8.25, 0.56)
	pt3dadd(-13.01, 120.5, -7.75, 0.56)
	pt3dadd(-12.5, 120.8, -7.75, 0.56)
	pt3dadd(-11.99, 121.2, -7.75, 0.56)
	pt3dadd(-11.63, 121.5, -7.75, 0.72)
	pt3dadd(-11.12, 121.8, -7.75, 0.72)
	pt3dadd(-10.66, 122.3, -7.75, 0.82)
	pt3dadd(-10.05, 122.9, -7.75, 0.97)
  }
  dend[453] {pt3dclear()
	pt3dadd(-10.05, 122.9, -7.75, 0.97)
	pt3dadd(-10.81, 123.5, -7.75, 0.72)
	pt3dadd(-11.32, 124.1, -7.75, 0.72)
	pt3dadd(-11.63, 124.5, -7.75, 0.72)
	pt3dadd(-11.84, 125.3, -7.75, 0.72)
	pt3dadd(-12.35, 125.8, -7.75, 0.72)
	pt3dadd(-12.71, 126.2, -7.75, 0.72)
	pt3dadd(-13.32, 126.8, -7.75, 0.72)
	pt3dadd(-13.68, 127.1, -7.75, 0.72)
	pt3dadd(-14.24, 127.4, -7.75, 0.72)
	pt3dadd(-14.85, 127.4, -7.75, 0.72)
	pt3dadd(-15.31, 127.7, -7.75, 0.72)
	pt3dadd(-15.98, 127.9, -7.75, 0.72)
	pt3dadd(-16.29, 128.1, -7.75, 0.72)
	pt3dadd(-16.64, 128.4, -7.75, 0.72)
  }
  dend[454] {pt3dclear()
	pt3dadd(-10.05, 122.9, -7.75, 0.97)
	pt3dadd(-8.92, 123.5, -7.75, 0.97)
	pt3dadd(-7.9, 124.3, -7.75, 0.97)
  }
  dend[455] {pt3dclear()
	pt3dadd(-15.12, 109.5, -7.5, 0.62)
	pt3dadd(-14.22, 109.6, -7.5, 0.67)
	pt3dadd(-13.62, 109.7, -7.5, 0.67)
	pt3dadd(-12.94, 109.6, -7.5, 0.67)
	pt3dadd(-12.79, 109.9, -7.5, 0.67)
  }
}
proc shape3d_22() {
  dend[455] {  }
  dend[456] {pt3dclear()
	pt3dadd(-12.79, 109.9, -7.5, 0.67)
	pt3dadd(-12.43, 110.5, -7.75, 0.31)
	pt3dadd(-12.22, 111.5, -7.75, 0.36)
	pt3dadd(-11.97, 112.5, -7.75, 0.67)
  }
  dend[457] {pt3dclear()
	pt3dadd(-11.97, 112.5, -7.75, 0.67)
	pt3dadd(-11.81, 113.5, -7.75, 0.46)
	pt3dadd(-11.66, 114.7, -7.75, 0.51)
	pt3dadd(-11.1, 116, -7.75, 0.56)
	pt3dadd(-10.48, 116.6, -7.75, 0.56)
	pt3dadd(-9.77, 117.5, -7.75, 0.56)
	pt3dadd(-9, 118.3, -7.75, 0.56)
	pt3dadd(-8.08, 118.8, -7.75, 0.72)
	pt3dadd(-7.62, 119.1, -7.75, 0.72)
  }
  dend[458] {pt3dclear()
	pt3dadd(-7.62, 119.1, -7.75, 0.72)
	pt3dadd(-7.16, 120, -7.75, 0.41)
	pt3dadd(-6.34, 121.1, -7.5, 0.31)
  }
  dend[459] {pt3dclear()
	pt3dadd(-7.62, 119.1, -7.75, 0.72)
	pt3dadd(-6.49, 118.9, -7.5, 0.31)
	pt3dadd(-5.22, 118.9, -7.5, 0.46)
  }
  dend[460] {pt3dclear()
	pt3dadd(-11.97, 112.5, -7.75, 0.67)
	pt3dadd(-10.84, 112.6, -7.75, 0.46)
	pt3dadd(-9.56, 113.3, -7.75, 0.46)
	pt3dadd(-8.9, 113.9, -7.75, 0.36)
	pt3dadd(-8.13, 114.5, -7.75, 0.26)
	pt3dadd(-6.44, 114.9, -7.5, 0.56)
  }
  dend[461] {pt3dclear()
	pt3dadd(-12.79, 109.9, -7.5, 0.67)
	pt3dadd(-12.48, 109, -7.5, 0.46)
	pt3dadd(-11.76, 108.3, -7.75, 0.31)
	pt3dadd(-10.84, 107.8, -7.75, 0.26)
	pt3dadd(-10.23, 107.2, -7.75, 0.31)
	pt3dadd(-9.51, 106.6, -7.75, 0.31)
	pt3dadd(-8.59, 105.7, -7.75, 0.31)
	pt3dadd(-7.93, 105.2, -7.75, 0.31)
	pt3dadd(-7.01, 104.6, -7.75, 0.18)
	pt3dadd(-6.08, 104, -7.75, 0.26)
	pt3dadd(-4.96, 103.1, -7.5, 0.36)
  }
  dend[462] {pt3dclear()
	pt3dadd(-16.87, 99.37, -7.75, 1.37)
	pt3dadd(-17.98, 97.14, -7.75, 0.36)
  }
  dend[463] {pt3dclear()
	pt3dadd(-17.98, 97.14, -7.75, 0.36)
	pt3dadd(-18.34, 98.31, -7.75, 0.18)
	pt3dadd(-18.64, 99.34, -7.5, 0.18)
	pt3dadd(-19.01, 100.3, -7.5, 0.41)
	pt3dadd(-19.01, 101.3, -7.5, 0.41)
	pt3dadd(-19.3, 102.5, -7.5, 0.41)
	pt3dadd(-19.52, 103.5, -7.5, 0.56)
	pt3dadd(-19.82, 104.4, -7.5, 0.67)
	pt3dadd(-20.39, 105.7, -7.5, 0.77)
  }
  dend[464] {pt3dclear()
	pt3dadd(-20.39, 105.7, -7.5, 0.77)
	pt3dadd(-19.37, 106.3, -7.25, 0.51)
	pt3dadd(-18.04, 107.2, -7.25, 0.46)
	pt3dadd(-17.37, 107.9, -7, 0.46)
	pt3dadd(-16.25, 109, -7, 0.46)
	pt3dadd(-15.73, 110, -7, 0.46)
  }
  dend[465] {pt3dclear()
	pt3dadd(-20.39, 105.7, -7.5, 0.77)
	pt3dadd(-21.36, 105.9, -7.5, 0.46)
	pt3dadd(-22.38, 106.7, -7.25, 0.46)
	pt3dadd(-23, 107.1, -7.25, 0.61)
	pt3dadd(-23.76, 107.4, -7.25, 0.61)
	pt3dadd(-24.17, 107.4, -7.25, 0.61)
  }
  dend[466] {pt3dclear()
	pt3dadd(-24.17, 107.4, -7.25, 0.61)
	pt3dadd(-24.63, 107.2, -7.25, 0.61)
	pt3dadd(-25.4, 106.2, -7.25, 0.61)
	pt3dadd(-25.15, 105.3, -7.25, 0.46)
  }
  dend[467] {pt3dclear()
	pt3dadd(-24.17, 107.4, -7.25, 0.61)
	pt3dadd(-24.23, 108.3, -7.75, 0.36)
	pt3dadd(-24.07, 109.4, -7.75, 0.46)
  }
  dend[468] {pt3dclear()
	pt3dadd(-24.07, 109.4, -7.75, 0.46)
	pt3dadd(-25.45, 110.7, -7.75, 0.77)
  }
  dend[469] {pt3dclear()
	pt3dadd(-24.07, 109.4, -7.75, 0.46)
	pt3dadd(-23.3, 110.1, -7.75, 0.56)
	pt3dadd(-22.95, 111, -7.75, 0.56)
	pt3dadd(-22.84, 113.9, -7.75, 0.41)
  }
  dend[470] {pt3dclear()
	pt3dadd(-17.98, 97.14, -7.75, 0.36)
	pt3dadd(-18.53, 96.76, -7.75, 1.06)
	pt3dadd(-19.78, 96.82, -8, 0.69)
	pt3dadd(-21.15, 97.13, -8, 0.87)
	pt3dadd(-22.27, 97.63, -8, 0.87)
	pt3dadd(-23.21, 98.57, -8, 0.75)
	pt3dadd(-24.08, 99.44, -8, 0.75)
	pt3dadd(-25.08, 100.3, -8, 0.75)
	pt3dadd(-25.89, 101.6, -8, 0.75)
	pt3dadd(-26.32, 102.7, -8, 0.62)
	pt3dadd(-26.57, 104.1, -8, 0.62)
	pt3dadd(-27.01, 105.6, -8, 0.75)
	pt3dadd(-27.38, 106.7, -8.25, 1.18)
	pt3dadd(-27.99, 107.8, -8.25, 1.18)
  }
  dend[471] {pt3dclear()
	pt3dadd(-27.99, 107.8, -8.25, 1.18)
	pt3dadd(-29.07, 108.3, -8.25, 0.81)
	pt3dadd(-29.75, 109.1, -8.25, 0.75)
	pt3dadd(-30.5, 110.3, -8.25, 0.75)
	pt3dadd(-30.94, 111.5, -8.25, 0.75)
	pt3dadd(-31.44, 112.7, -8.5, 0.69)
	pt3dadd(-31.94, 113.7, -8.5, 0.62)
	pt3dadd(-32.64, 114.8, -8.5, 0.62)
  }
  dend[472] {pt3dclear()
	pt3dadd(-32.64, 114.8, -8.5, 0.62)
	pt3dadd(-33.36, 115.5, -8.25, 0.62)
	pt3dadd(-34.18, 116.2, -8.25, 0.62)
	pt3dadd(-34.86, 116.5, -8.25, 0.62)
	pt3dadd(-35.18, 117.7, -8.25, 0.62)
	pt3dadd(-35.36, 119.2, -8.25, 0.5)
	pt3dadd(-35.36, 121, -8.25, 0.5)
	pt3dadd(-35.38, 125.8, -8.25, 0.5)
  }
  dend[473] {pt3dclear()
	pt3dadd(-32.64, 114.8, -8.5, 0.62)
	pt3dadd(-32.36, 115.7, -8.25, 0.72)
	pt3dadd(-32.32, 116.5, -8.25, 0.61)
	pt3dadd(-32.21, 117.4, -8.25, 0.61)
	pt3dadd(-32.47, 118.2, -8.25, 0.61)
	pt3dadd(-32.57, 119.4, -8.5, 0.61)
	pt3dadd(-32.67, 120.3, -8.5, 0.61)
	pt3dadd(-32.93, 121.4, -8.5, 0.61)
	pt3dadd(-33.03, 122.4, -8.5, 0.72)
	pt3dadd(-33.24, 123.3, -8.5, 0.72)
	pt3dadd(-33.29, 124.2, -8.5, 0.61)
  }
  dend[474] {pt3dclear()
	pt3dadd(-27.99, 107.8, -8.25, 1.18)
	pt3dadd(-27.46, 108.1, -8.25, 0.67)
	pt3dadd(-27.4, 109.1, -8.25, 0.51)
	pt3dadd(-27.46, 109.8, -8.25, 0.51)
	pt3dadd(-27.81, 110.5, -8.25, 0.51)
	pt3dadd(-27.81, 111.3, -8.25, 0.46)
	pt3dadd(-28.07, 111.9, -8.25, 0.46)
	pt3dadd(-28.48, 112.6, -8.25, 0.46)
	pt3dadd(-28.79, 113.6, -8.5, 0.46)
	pt3dadd(-28.68, 114.7, -8.5, 0.46)
	pt3dadd(-28.84, 115.6, -8.5, 0.56)
	pt3dadd(-28.9, 116.1, -8.5, 0.56)
  }
  dend[475] {pt3dclear()
	pt3dadd(-28.9, 116.1, -8.5, 0.56)
	pt3dadd(-28.79, 116.7, -8.5, 0.56)
	pt3dadd(-28.43, 117.6, -8.5, 0.56)
  }
  dend[476] {pt3dclear()
	pt3dadd(-28.9, 116.1, -8.5, 0.56)
	pt3dadd(-29.36, 116.6, -8.25, 0.41)
	pt3dadd(-29.51, 117.1, -8, 0.41)
	pt3dadd(-29.51, 117.9, -8, 0.41)
	pt3dadd(-29.82, 118.4, -8, 0.41)
	pt3dadd(-30.17, 119.1, -8, 0.46)
	pt3dadd(-30.38, 119.5, -8, 0.46)
  }
  dend[477] {pt3dclear()
	pt3dadd(-17.39, 96.68, -7.75, 0.94)
	pt3dadd(-17.48, 95.76, -7.75, 0.94)
	pt3dadd(-17.75, 94.57, -7.75, 0.69)
	pt3dadd(-17.79, 93.41, -7.75, 0.69)
	pt3dadd(-17.96, 92.35, -7.75, 0.69)
	pt3dadd(-17.92, 90.98, -7.75, 0.75)
	pt3dadd(-17.98, 89.84, -7.75, 1.5)
  }
  dend[478] {pt3dclear()
	pt3dadd(-4.97, 76.09, -7, 3.43)
	pt3dadd(-6.64, 77.87, -7.25, 2.06)
	pt3dadd(-7.95, 79.3, -7.25, 1.37)
	pt3dadd(-9.69, 80.92, -7.25, 1.12)
	pt3dadd(-10.59, 81.69, -7.25, 1.12)
  }
  dend[479] {pt3dclear()
	pt3dadd(-10.59, 81.69, -7.25, 1.12)
	pt3dadd(-12.42, 82.98, -8.36, 1.25)
  }
  dend[480] {pt3dclear()
	pt3dadd(-12.42, 82.98, -8.36, 1.25)
	pt3dadd(-11, 81.98, -7.5, 1.25)
	pt3dadd(-12.44, 82.79, -7.5, 1.5)
	pt3dadd(-13.75, 83.79, -7.5, 1.56)
	pt3dadd(-14.99, 84.85, -7.75, 1.31)
	pt3dadd(-15.99, 85.97, -7.75, 1.12)
	pt3dadd(-17.11, 87.03, -7.75, 1.62)
	pt3dadd(-18.17, 88.28, -7.75, 2.37)
	pt3dadd(-19.98, 88.53, -7.75, 1.75)
	pt3dadd(-21.98, 89.34, -7.75, 1.62)
	pt3dadd(-23.18, 89.77, -7.75, 1.62)
  }
  dend[481] {pt3dclear()
	pt3dadd(-23.18, 89.77, -7.75, 1.62)
	pt3dadd(-23.53, 89.9, -7.75, 1.62)
	pt3dadd(-24.84, 90.84, -7.75, 1.75)
	pt3dadd(-25.97, 91.96, -7.75, 1.62)
	pt3dadd(-26.5, 92.28, -7.75, 1.62)
  }
  dend[482] {pt3dclear()
	pt3dadd(-26.5, 92.28, -7.75, 1.62)
	pt3dadd(-27.34, 92.83, -8, 1.37)
	pt3dadd(-28.4, 93.14, -8, 1.18)
	pt3dadd(-30.08, 93.64, -8, 2)
	pt3dadd(-30.49, 94.07, -8, 2)
  }
  dend[483] {pt3dclear()
	pt3dadd(-30.49, 94.07, -8, 2)
	pt3dadd(-31.06, 94.58, -8, 2)
  }
  dend[484] {pt3dclear()
	pt3dadd(-31.06, 94.58, -8, 2)
	pt3dadd(-31.52, 95.01, -8, 1.87)
	pt3dadd(-32.51, 96.51, -8, 1.31)
	pt3dadd(-33.14, 97.69, -8, 1.12)
	pt3dadd(-34.2, 98.75, -8, 1.25)
	pt3dadd(-35.07, 99.5, -8, 1.12)
	pt3dadd(-36.19, 100.7, -8.25, 1.31)
	pt3dadd(-36.83, 101.1, -8.25, 1.5)
	pt3dadd(-37.19, 101.8, -8.25, 1.5)
  }
  dend[485] {pt3dclear()
	pt3dadd(-37.19, 101.8, -8.25, 1.5)
	pt3dadd(-37.86, 103.1, -8.25, 1.37)
	pt3dadd(-38.47, 104.4, -8.25, 1.37)
  }
  dend[486] {pt3dclear()
	pt3dadd(-38.47, 104.4, -8.25, 1.37)
	pt3dadd(-38.5, 104.6, -8.25, 1.43)
	pt3dadd(-38.44, 106.1, -8.25, 1)
	pt3dadd(-38.5, 107.7, -8.25, 0.75)
	pt3dadd(-38.81, 109, -8.25, 1)
	pt3dadd(-38.93, 110.2, -8.25, 1.12)
	pt3dadd(-39.06, 111.4, -8.25, 0.81)
	pt3dadd(-39.17, 111.9, -8.25, 0.81)
  }
  dend[487] {pt3dclear()
	pt3dadd(-39.17, 111.9, -8.25, 0.81)
	pt3dadd(-39.25, 112.7, -8.25, 1.12)
	pt3dadd(-38.86, 113.8, -8.25, 0.94)
	pt3dadd(-38.5, 114.9, -8.25, 0.81)
	pt3dadd(-38.11, 116.3, -8.25, 0.87)
	pt3dadd(-37.94, 117.6, -8.25, 0.81)
	pt3dadd(-38.11, 118.8, -8.25, 0.81)
  }
  dend[488] {pt3dclear()
	pt3dadd(-38.11, 118.8, -8.25, 0.81)
  }
}
proc shape3d_23() {
  dend[488] {	pt3dadd(-37.69, 120.7, -8.5, 1)
	pt3dadd(-37.56, 122.3, -8.5, 1.06)
	pt3dadd(-37.44, 123.7, -8.5, 1.06)
  }
  dend[489] {pt3dclear()
	pt3dadd(-37.44, 123.7, -8.5, 1.06)
	pt3dadd(-37.13, 125.2, -8.25, 0.87)
	pt3dadd(-36.75, 126.9, -8.25, 1)
	pt3dadd(-36.94, 128, -8.25, 1)
  }
  dend[490] {pt3dclear()
	pt3dadd(-36.94, 128, -8.25, 1)
	pt3dadd(-37.13, 129.6, -8.25, 0.75)
	pt3dadd(-37.06, 131.1, -8.25, 0.87)
	pt3dadd(-37, 132.3, -8.25, 0.75)
	pt3dadd(-37.13, 133.8, -8.25, 0.87)
	pt3dadd(-37.19, 135, -8.25, 0.5)
	pt3dadd(-37.31, 136.3, -8, 0.56)
	pt3dadd(-37.86, 137.5, -8, 0.69)
	pt3dadd(-38.56, 138.8, -8, 0.69)
	pt3dadd(-38.75, 139.8, -8, 0.5)
	pt3dadd(-39, 140.8, -8, 0.5)
	pt3dadd(-39, 141.6, -8, 0.31)
	pt3dadd(-39, 142.4, -8, 0.5)
	pt3dadd(-38.81, 143.4, -8, 1)
	pt3dadd(-39, 143.8, -8, 1)
  }
  dend[491] {pt3dclear()
	pt3dadd(-39, 143.8, -8, 1)
	pt3dadd(-39.36, 144.3, -8.25, 0.87)
	pt3dadd(-40.54, 144.5, -8.25, 0.75)
	pt3dadd(-41.68, 145.3, -8.5, 0.75)
	pt3dadd(-42.18, 146.1, -8.5, 0.75)
  }
  dend[492] {pt3dclear()
	pt3dadd(-39, 143.8, -8, 1)
	pt3dadd(-38.4, 144.1, -8, 0.77)
	pt3dadd(-37.53, 144.4, -8, 0.56)
	pt3dadd(-36.86, 144.8, -8, 0.36)
	pt3dadd(-36.31, 145.3, -8, 0.61)
	pt3dadd(-35.85, 146.1, -8, 0.97)
  }
  dend[493] {pt3dclear()
	pt3dadd(-36.94, 128, -8.25, 1)
	pt3dadd(-35.95, 128.4, -8.25, 0.67)
	pt3dadd(-35.44, 128.9, -8.25, 0.56)
	pt3dadd(-34.82, 129.4, -8.25, 0.56)
	pt3dadd(-34.77, 130.4, -8.5, 0.56)
	pt3dadd(-34.61, 131.3, -8.5, 0.56)
	pt3dadd(-34.31, 132.3, -8.5, 0.56)
	pt3dadd(-34.21, 133.1, -8.5, 0.56)
	pt3dadd(-34.04, 133.8, -8.5, 0.46)
	pt3dadd(-34, 134.4, -8.5, 0.46)
	pt3dadd(-33.59, 135.1, -8.5, 0.46)
	pt3dadd(-33.34, 135.69, -8.75, 0.36)
	pt3dadd(-32.83, 136.3, -8.75, 0.36)
	pt3dadd(-32.36, 136.8, -8.75, 0.36)
	pt3dadd(-31.8, 137.19, -9, 0.46)
	pt3dadd(-31.04, 137.4, -9, 0.41)
	pt3dadd(-30.32, 138.1, -9.25, 0.51)
	pt3dadd(-29.66, 138.8, -9.25, 0.51)
	pt3dadd(-28.99, 139.6, -9.25, 0.51)
	pt3dadd(-28.12, 140.19, -9.5, 0.31)
	pt3dadd(-27.61, 140.8, -9.5, 0.46)
	pt3dadd(-27.15, 141.1, -9.5, 0.56)
  }
  dend[494] {pt3dclear()
	pt3dadd(-37.44, 123.7, -8.5, 1.06)
	pt3dadd(-38.25, 124, -8.25, 0.67)
	pt3dadd(-38.9, 124.4, -8.25, 0.51)
	pt3dadd(-39.22, 125, -8.25, 0.51)
	pt3dadd(-39.38, 125.5, -8.25, 0.51)
	pt3dadd(-39.58, 125.8, -8.25, 0.51)
	pt3dadd(-39.78, 126.3, -8.25, 0.51)
	pt3dadd(-39.94, 126.6, -8.25, 0.51)
	pt3dadd(-40.14, 127.3, -8.25, 0.51)
	pt3dadd(-40.24, 128.1, -8.25, 0.51)
	pt3dadd(-40.29, 128.69, -8.25, 0.41)
	pt3dadd(-40.14, 129.5, -8.25, 0.41)
	pt3dadd(-40.04, 130.4, -8.25, 0.67)
	pt3dadd(-39.94, 131.19, -8.25, 0.67)
	pt3dadd(-39.99, 131.9, -8.25, 0.67)
	pt3dadd(-39.78, 132.69, -8.25, 0.36)
	pt3dadd(-39.78, 133.3, -8.25, 0.26)
	pt3dadd(-39.78, 134, -8.25, 0.26)
	pt3dadd(-39.78, 134.69, -8.5, 0.46)
	pt3dadd(-39.72, 135.4, -8.5, 0.51)
	pt3dadd(-39.78, 136.1, -8.5, 0.56)
  }
  dend[495] {pt3dclear()
	pt3dadd(-38.11, 118.8, -8.25, 0.81)
	pt3dadd(-38.9, 119.3, -8.25, 0.56)
	pt3dadd(-39.53, 119.9, -8.25, 0.77)
	pt3dadd(-39.68, 120.8, -8.25, 0.46)
	pt3dadd(-39.78, 121.4, -8.25, 0.46)
	pt3dadd(-40.14, 121.8, -8.25, 0.46)
	pt3dadd(-40.45, 122.5, -8.25, 0.56)
	pt3dadd(-41.01, 123.2, -8.25, 0.61)
	pt3dadd(-41.32, 123.6, -8.25, 0.61)
	pt3dadd(-42.29, 123.6, -8.25, 0.61)
  }
  dend[496] {pt3dclear()
	pt3dadd(-39.17, 111.9, -8.25, 0.81)
	pt3dadd(-40.09, 112.7, -8.25, 0.72)
	pt3dadd(-40.81, 113.8, -8.25, 0.56)
	pt3dadd(-41.22, 114.7, -8.25, 0.56)
	pt3dadd(-42.04, 115.6, -8.25, 0.56)
	pt3dadd(-42.75, 116.3, -8.25, 0.56)
	pt3dadd(-43.47, 116.6, -8.25, 0.56)
	pt3dadd(-44.05, 117.5, -8.25, 0.56)
  }
  dend[497] {pt3dclear()
	pt3dadd(-44.05, 117.5, -8.25, 0.56)
	pt3dadd(-44.8, 118.9, -8.25, 0.56)
	pt3dadd(-44.9, 119.8, -8.25, 0.46)
	pt3dadd(-45, 120.7, -8.25, 0.46)
	pt3dadd(-45.31, 121.4, -8.25, 0.46)
	pt3dadd(-45.46, 121.9, -8.25, 0.46)
	pt3dadd(-45.46, 122.6, -8.25, 0.46)
	pt3dadd(-45.62, 123, -8.25, 0.46)
	pt3dadd(-45.79, 123.4, -8.25, 0.46)
  }
  dend[498] {pt3dclear()
	pt3dadd(-45.79, 123.4, -8.25, 0.46)
	pt3dadd(-46.03, 123.8, -8.25, 0.46)
	pt3dadd(-46.43, 123.9, -8.25, 0.46)
	pt3dadd(-46.79, 124.2, -8.25, 0.46)
	pt3dadd(-46.89, 124.3, -8.25, 0.46)
	pt3dadd(-47.25, 124.6, -8.25, 0.46)
	pt3dadd(-47.46, 125.2, -8.25, 0.36)
	pt3dadd(-47.71, 125.7, -8.25, 0.36)
	pt3dadd(-47.87, 126.2, -8.25, 0.36)
	pt3dadd(-47.87, 126.5, -8.25, 0.36)
	pt3dadd(-47.82, 126.9, -8.25, 0.36)
	pt3dadd(-47.87, 127.1, -8.25, 0.46)
	pt3dadd(-48.17, 128, -8.25, 0.46)
	pt3dadd(-48.38, 128.8, -8.5, 0.36)
	pt3dadd(-48.58, 129.5, -8.5, 0.41)
	pt3dadd(-48.53, 130.3, -8.5, 0.51)
	pt3dadd(-48.63, 130.8, -8.5, 0.61)
	pt3dadd(-48.63, 131.5, -8.5, 0.61)
	pt3dadd(-48.74, 132.3, -8.75, 0.61)
	pt3dadd(-48.84, 133.1, -8.75, 0.46)
	pt3dadd(-49.04, 133.69, -8.75, 0.46)
	pt3dadd(-49.35, 134.5, -8.75, 0.46)
	pt3dadd(-49.76, 135.19, -8.75, 0.56)
	pt3dadd(-50.37, 135.69, -8.75, 0.56)
  }
  dend[499] {pt3dclear()
	pt3dadd(-45.79, 123.4, -8.25, 0.46)
	pt3dadd(-45.41, 124, -8.25, 0.51)
	pt3dadd(-44.95, 124.9, -8.25, 0.46)
	pt3dadd(-44.95, 126, -8.5, 0.46)
	pt3dadd(-45.21, 126.7, -8.5, 0.46)
	pt3dadd(-44.95, 127.4, -8.5, 0.46)
	pt3dadd(-44.64, 127.9, -8.5, 0.46)
	pt3dadd(-44.75, 128.5, -8.5, 0.36)
	pt3dadd(-45, 129, -8.5, 0.36)
	pt3dadd(-44.85, 129.9, -8.5, 0.36)
	pt3dadd(-44.9, 130.9, -8.5, 0.36)
	pt3dadd(-44.59, 131.3, -8.5, 0.36)
	pt3dadd(-44.39, 132, -8.5, 0.46)
	pt3dadd(-44.23, 132.6, -8.5, 0.61)
	pt3dadd(-44.23, 133.1, -8.5, 0.56)
	pt3dadd(-44.34, 133.8, -8.5, 0.46)
	pt3dadd(-44.08, 134.3, -8.5, 0.46)
  }
  dend[500] {pt3dclear()
	pt3dadd(-44.05, 117.5, -8.25, 0.56)
	pt3dadd(-44.95, 117.3, -8.5, 0.41)
	pt3dadd(-45.77, 117.4, -8.5, 0.41)
	pt3dadd(-46.49, 117.6, -8.5, 0.41)
	pt3dadd(-47.05, 118.1, -8.5, 0.51)
	pt3dadd(-47.36, 118.8, -8.5, 0.67)
	pt3dadd(-47.61, 119.8, -8.5, 0.67)
	pt3dadd(-47.87, 120.4, -8.5, 0.56)
	pt3dadd(-48.48, 120.9, -8.5, 0.56)
	pt3dadd(-48.53, 121.8, -8.5, 0.56)
	pt3dadd(-48.58, 122.6, -8.5, 0.41)
	pt3dadd(-49.09, 123.1, -8.5, 0.41)
	pt3dadd(-49.3, 123.7, -8.5, 0.41)
	pt3dadd(-49.71, 124.8, -8.75, 0.51)
	pt3dadd(-49.91, 125.5, -8.75, 0.51)
	pt3dadd(-50.32, 125.9, -8.75, 0.56)
	pt3dadd(-50.63, 126.7, -8.75, 0.56)
	pt3dadd(-51.09, 127.4, -9, 0.56)
	pt3dadd(-51.29, 128.1, -9, 0.46)
	pt3dadd(-51.35, 128.69, -9, 0.41)
	pt3dadd(-51.29, 129.4, -9.25, 0.41)
  }
  dend[501] {pt3dclear()
	pt3dadd(-38.47, 104.4, -8.25, 1.37)
	pt3dadd(-39.47, 104.8, -8.25, 0.82)
	pt3dadd(-40.19, 105.2, -8.25, 0.72)
	pt3dadd(-41.01, 105.6, -8.25, 0.67)
	pt3dadd(-41.78, 105.9, -8.25, 0.56)
	pt3dadd(-42.55, 106.5, -8.25, 0.72)
	pt3dadd(-43.31, 107.1, -8.25, 0.72)
	pt3dadd(-43.83, 107.8, -8.25, 0.72)
	pt3dadd(-44.54, 108.4, -8.25, 0.72)
	pt3dadd(-45.36, 109.3, -8.5, 0.82)
  }
  dend[502] {pt3dclear()
	pt3dadd(-45.36, 109.3, -8.5, 0.82)
	pt3dadd(-45.67, 110.4, -8.5, 0.72)
	pt3dadd(-46.59, 111.6, -8.5, 0.72)
	pt3dadd(-47.36, 112.3, -8.5, 0.72)
	pt3dadd(-48.12, 113.2, -8.5, 0.87)
	pt3dadd(-48.53, 114.5, -8.5, 0.72)
	pt3dadd(-49.15, 114.9, -8.5, 0.61)
	pt3dadd(-49.96, 116, -8.75, 0.92)
	pt3dadd(-51.03, 116.7, -8.75, 0.92)
  }
  dend[503] {pt3dclear()
	pt3dadd(-51.03, 116.7, -8.75, 0.92)
	pt3dadd(-51.7, 117.1, -8.75, 0.67)
	pt3dadd(-52.78, 117.7, -8.75, 0.67)
	pt3dadd(-53.29, 118.8, -8.75, 0.67)
	pt3dadd(-53.39, 119.9, -8.75, 0.67)
	pt3dadd(-53.44, 121, -8.75, 0.67)
  }
  dend[504] {pt3dclear()
	pt3dadd(-51.03, 116.7, -8.75, 0.92)
	pt3dadd(-50.68, 117.9, -8.75, 0.46)
	pt3dadd(-50.88, 118.7, -8.75, 0.46)
	pt3dadd(-51.04, 119.6, -8.75, 0.46)
	pt3dadd(-51.55, 120.3, -8.75, 0.46)
	pt3dadd(-51.75, 121.3, -8.5, 0.41)
	pt3dadd(-52.11, 121.9, -8.5, 0.41)
	pt3dadd(-52.52, 122.5, -8.5, 0.41)
	pt3dadd(-52.88, 123.2, -8.5, 0.41)
	pt3dadd(-52.98, 124.1, -8.5, 0.41)
  }
}
proc shape3d_24() {
  dend[504] {  }
  dend[505] {pt3dclear()
	pt3dadd(-52.98, 124.1, -8.5, 0.41)
	pt3dadd(-53.7, 124.6, -8.5, 0.41)
	pt3dadd(-54.36, 125.7, -8.5, 0.41)
  }
  dend[506] {pt3dclear()
	pt3dadd(-52.98, 124.1, -8.5, 0.41)
	pt3dadd(-52.37, 124.8, -8.5, 0.41)
	pt3dadd(-52.21, 125.9, -8.5, 0.41)
	pt3dadd(-52.32, 126.9, -8.5, 0.41)
	pt3dadd(-52.37, 127.5, -8.5, 0.41)
	pt3dadd(-52.52, 128.4, -8.5, 0.41)
	pt3dadd(-52.83, 129.19, -8.5, 0.41)
	pt3dadd(-52.98, 130.19, -8.5, 0.41)
	pt3dadd(-53.19, 131.1, -8.5, 0.41)
	pt3dadd(-53.29, 132, -8.5, 0.41)
	pt3dadd(-53.49, 132.8, -8.5, 0.41)
	pt3dadd(-53.85, 133.4, -8.5, 0.41)
	pt3dadd(-54.26, 134, -8.5, 0.36)
	pt3dadd(-54.57, 134.6, -8.5, 0.46)
	pt3dadd(-54.82, 135.19, -8.5, 0.46)
  }
  dend[507] {pt3dclear()
	pt3dadd(-45.36, 109.3, -8.5, 0.82)
	pt3dadd(-46.28, 109.2, -8.5, 0.56)
	pt3dadd(-47.2, 109.3, -8.5, 0.56)
	pt3dadd(-48.22, 109.2, -8.5, 0.61)
	pt3dadd(-48.94, 109.9, -8.5, 0.61)
	pt3dadd(-49.5, 110.5, -8.5, 0.67)
	pt3dadd(-50.17, 111.1, -8.5, 0.67)
	pt3dadd(-50.94, 111.8, -8.5, 0.67)
	pt3dadd(-51.55, 112.3, -8.5, 0.67)
	pt3dadd(-51.96, 113, -8.75, 0.56)
	pt3dadd(-52.16, 113.7, -8.75, 0.56)
	pt3dadd(-52.57, 114.3, -8.75, 0.56)
  }
  dend[508] {pt3dclear()
	pt3dadd(-37.19, 101.8, -8.25, 1.5)
	pt3dadd(-37.99, 101.3, -8.25, 0.77)
	pt3dadd(-38.76, 100.9, -8.25, 0.56)
	pt3dadd(-39.43, 100.6, -8.25, 0.61)
	pt3dadd(-40.29, 100.4, -8.25, 0.77)
	pt3dadd(-40.9, 99.97, -8.25, 0.61)
	pt3dadd(-42.04, 99.87, -8.25, 0.61)
	pt3dadd(-42.6, 99.87, -8.25, 0.61)
  }
  dend[509] {pt3dclear()
	pt3dadd(-42.6, 99.87, -8.25, 0.61)
	pt3dadd(-42.75, 100.8, -8.25, 0.61)
	pt3dadd(-43.11, 101.4, -8.25, 0.61)
	pt3dadd(-43.67, 102.1, -8.25, 0.46)
	pt3dadd(-43.93, 102.7, -8.25, 0.51)
	pt3dadd(-44.34, 103.3, -8.25, 0.51)
	pt3dadd(-44.64, 104, -8.25, 0.56)
	pt3dadd(-45.41, 104.5, -8.5, 0.56)
	pt3dadd(-46.03, 105.1, -8.5, 0.67)
  }
  dend[510] {pt3dclear()
	pt3dadd(-42.6, 99.87, -8.25, 0.61)
	pt3dadd(-43.42, 99.77, -8.25, 0.56)
	pt3dadd(-44.29, 99.57, -8.25, 0.56)
	pt3dadd(-45.05, 99.87, -8.25, 0.56)
	pt3dadd(-45.82, 100.5, -8.25, 0.56)
	pt3dadd(-46.54, 101, -8.25, 0.56)
	pt3dadd(-47.3, 101.6, -8.5, 0.56)
	pt3dadd(-48.17, 102.3, -8.5, 0.56)
	pt3dadd(-48.94, 103.2, -8.5, 0.56)
	pt3dadd(-49.76, 104, -8.5, 0.56)
	pt3dadd(-50.27, 104.9, -8.5, 0.56)
	pt3dadd(-50.83, 105.8, -8.5, 0.56)
	pt3dadd(-51.5, 106.5, -8.5, 0.56)
	pt3dadd(-52.06, 107.1, -8.75, 0.56)
	pt3dadd(-52.68, 107.7, -8.75, 0.56)
	pt3dadd(-52.73, 108.4, -8.75, 0.56)
	pt3dadd(-52.93, 109.3, -8.75, 0.36)
  }
  dend[511] {pt3dclear()
	pt3dadd(-31.06, 94.58, -8, 2)
	pt3dadd(-32.11, 93.68, -8, 0.92)
	pt3dadd(-32.61, 93.32, -8, 0.56)
	pt3dadd(-33.13, 93.02, -8, 0.56)
	pt3dadd(-33.85, 92.81, -8, 0.56)
	pt3dadd(-34.86, 92.81, -8, 0.56)
	pt3dadd(-35.59, 92.81, -8, 0.56)
	pt3dadd(-35.71, 92.84, -8, 0.56)
  }
  dend[512] {pt3dclear()
	pt3dadd(-35.71, 92.84, -8, 0.56)
	pt3dadd(-36.36, 93.07, -8, 0.56)
	pt3dadd(-37.02, 93.27, -8, 0.77)
	pt3dadd(-37.94, 93.73, -8, 1.07)
  }
  dend[513] {pt3dclear()
	pt3dadd(-37.94, 93.73, -8, 1.07)
	pt3dadd(-38.45, 94.71, -8.25, 0.67)
	pt3dadd(-39.27, 95.68, -8.25, 0.67)
	pt3dadd(-40.09, 96.24, -8.25, 0.67)
	pt3dadd(-41.06, 96.5, -8.25, 0.56)
	pt3dadd(-42.14, 96.65, -8.25, 0.56)
	pt3dadd(-43.06, 96.6, -8.25, 0.61)
	pt3dadd(-43.83, 96.6, -8.25, 0.67)
	pt3dadd(-44.54, 96.96, -8.25, 0.67)
	pt3dadd(-45, 97.47, -8.25, 0.87)
	pt3dadd(-46.28, 97.72, -8.25, 0.87)
	pt3dadd(-47.15, 97.93, -8.25, 0.61)
	pt3dadd(-47.87, 98.39, -8.25, 0.61)
	pt3dadd(-48.53, 98.64, -8.25, 0.61)
	pt3dadd(-49.2, 99.16, -8.5, 0.67)
	pt3dadd(-50.07, 99.97, -8.5, 0.67)
	pt3dadd(-50.58, 100.5, -8.5, 0.67)
	pt3dadd(-51.4, 100.7, -8.5, 0.67)
  }
  dend[514] {pt3dclear()
	pt3dadd(-37.94, 93.73, -8, 1.07)
	pt3dadd(-38.71, 93.43, -8, 0.77)
	pt3dadd(-39.63, 93.22, -8.25, 0.61)
	pt3dadd(-40.6, 93.17, -8.25, 0.61)
	pt3dadd(-41.57, 93.02, -8.25, 0.61)
	pt3dadd(-42.55, 93.12, -8.25, 0.61)
  }
  dend[515] {pt3dclear()
	pt3dadd(-42.55, 93.12, -8.25, 0.61)
	pt3dadd(-42.8, 92.3, -8.25, 0.61)
	pt3dadd(-43.11, 91.58, -8.25, 0.61)
	pt3dadd(-43.67, 90.66, -8.25, 0.61)
	pt3dadd(-44.03, 89.85, -8.25, 0.61)
	pt3dadd(-44.59, 89.13, -8.25, 0.61)
	pt3dadd(-45.31, 88.46, -8.25, 0.61)
	pt3dadd(-46.13, 88.46, -8.25, 0.61)
  }
  dend[516] {pt3dclear()
	pt3dadd(-42.55, 93.12, -8.25, 0.61)
	pt3dadd(-43.57, 93.48, -8.25, 0.61)
	pt3dadd(-44.13, 93.63, -8.25, 0.61)
  }
  dend[517] {pt3dclear()
	pt3dadd(-44.13, 93.63, -8.25, 0.61)
	pt3dadd(-44.75, 92.91, -8.25, 0.61)
	pt3dadd(-45.21, 92.45, -8.25, 0.61)
	pt3dadd(-45.62, 91.79, -8.25, 0.61)
	pt3dadd(-46.13, 91.33, -8.25, 0.61)
	pt3dadd(-46.74, 90.97, -8.25, 0.61)
	pt3dadd(-47.46, 90.72, -8.25, 0.61)
	pt3dadd(-47.92, 90.56, -8.25, 0.61)
	pt3dadd(-48.48, 90.36, -8.5, 0.46)
	pt3dadd(-49.15, 90.51, -8.5, 0.41)
	pt3dadd(-49.71, 90.82, -8.5, 0.41)
	pt3dadd(-50.17, 91.18, -8.5, 0.51)
	pt3dadd(-50.78, 91.48, -8.5, 0.67)
	pt3dadd(-51.45, 91.38, -8.5, 0.61)
	pt3dadd(-51.65, 90.92, -8.5, 0.51)
  }
  dend[518] {pt3dclear()
	pt3dadd(-44.13, 93.63, -8.25, 0.61)
	pt3dadd(-44.9, 93.94, -8.25, 0.56)
	pt3dadd(-45.67, 94.55, -8.5, 0.56)
	pt3dadd(-46.54, 94.96, -8.5, 0.72)
	pt3dadd(-47.41, 95.11, -8.5, 0.56)
	pt3dadd(-48.28, 95.27, -8.5, 0.56)
	pt3dadd(-49.09, 95.63, -8.5, 0.56)
	pt3dadd(-49.71, 95.98, -8.5, 0.82)
	pt3dadd(-50.32, 96.19, -8.5, 0.97)
	pt3dadd(-50.99, 95.52, -8.5, 0.82)
	pt3dadd(-51.5, 94.81, -8.5, 0.67)
	pt3dadd(-51.91, 94.45, -8.5, 0.61)
	pt3dadd(-52.27, 93.78, -8.5, 0.36)
  }
  dend[519] {pt3dclear()
	pt3dadd(-35.71, 92.84, -8, 0.56)
	pt3dadd(-36.1, 91.84, -8, 0.77)
	pt3dadd(-36.65, 91.38, -8, 0.46)
	pt3dadd(-37.02, 90.92, -8, 0.36)
	pt3dadd(-37.43, 90.72, -8, 0.46)
	pt3dadd(-38.2, 90.56, -8, 0.67)
	pt3dadd(-38.9, 90.46, -8, 0.67)
	pt3dadd(-39.78, 90.36, -8, 0.67)
	pt3dadd(-40.14, 89.69, -8, 0.67)
	pt3dadd(-40.6, 89.13, -8.25, 0.67)
	pt3dadd(-41.27, 88.87, -8.25, 0.67)
	pt3dadd(-41.93, 88.72, -8.25, 0.67)
	pt3dadd(-42.34, 88.26, -8.25, 0.56)
	pt3dadd(-42.85, 87.75, -8.25, 0.56)
	pt3dadd(-43.31, 87.29, -8.25, 0.56)
	pt3dadd(-43.67, 86.98, -8.25, 0.56)
	pt3dadd(-43.98, 86.67, -8.25, 0.56)
	pt3dadd(-44.85, 86.67, -8.25, 0.56)
	pt3dadd(-46.13, 86.62, -8.25, 0.56)
	pt3dadd(-46.74, 87.08, -8.25, 0.56)
	pt3dadd(-47.51, 87.24, -8.5, 0.56)
	pt3dadd(-48.33, 87.49, -8.5, 0.56)
	pt3dadd(-48.99, 88.11, -8.5, 0.56)
	pt3dadd(-49.61, 88.46, -8.5, 0.56)
	pt3dadd(-50.48, 88.57, -8.5, 0.56)
	pt3dadd(-51.24, 88.52, -8.5, 0.56)
	pt3dadd(-51.75, 88.41, -8.5, 0.56)
  }
  dend[520] {pt3dclear()
	pt3dadd(-30.49, 94.07, -8, 2)
	pt3dadd(-31.2, 92.33, -8, 0.81)
	pt3dadd(-31.39, 90.84, -8, 1.06)
	pt3dadd(-32.26, 89.9, -7.75, 0.94)
	pt3dadd(-33.63, 89.21, -7.75, 0.94)
	pt3dadd(-34.63, 88.4, -7.75, 1.06)
	pt3dadd(-35.94, 87.66, -7.75, 1)
	pt3dadd(-36.88, 87.09, -7.75, 0.94)
	pt3dadd(-37.6, 86.5, -7.75, 0.94)
  }
  dend[521] {pt3dclear()
	pt3dadd(-37.6, 86.5, -7.75, 0.94)
	pt3dadd(-37.94, 86.35, -7.75, 0.81)
	pt3dadd(-38.86, 85.54, -8, 0.69)
	pt3dadd(-39.61, 84.91, -8, 0.5)
	pt3dadd(-40.06, 84.1, -8, 0.81)
	pt3dadd(-40.68, 83.48, -8, 0.69)
	pt3dadd(-41.3, 82.54, -8, 0.62)
	pt3dadd(-42.05, 81.8, -8, 0.69)
	pt3dadd(-42.86, 80.86, -8, 0.81)
	pt3dadd(-43.05, 79.61, -7.75, 0.81)
	pt3dadd(-43.55, 78.43, -7.75, 0.62)
	pt3dadd(-43.86, 77.87, -7.75, 0.5)
	pt3dadd(-44.23, 76.81, -7.75, 0.62)
	pt3dadd(-44.51, 76.01, -7.75, 0.62)
  }
  dend[522] {pt3dclear()
	pt3dadd(-44.51, 76.01, -7.75, 0.62)
	pt3dadd(-44.54, 75.69, -7.75, 0.81)
	pt3dadd(-44.42, 74.25, -7.75, 0.81)
	pt3dadd(-44.67, 72.88, -7.75, 0.75)
	pt3dadd(-44.86, 71.95, -7.75, 0.62)
	pt3dadd(-44.98, 71.01, -7.75, 0.5)
	pt3dadd(-44.92, 70.43, -7.75, 0.5)
  }
  dend[523] {pt3dclear()
	pt3dadd(-44.92, 70.43, -7.75, 0.5)
	pt3dadd(-44.87, 69.88, -7.75, 0.69)
	pt3dadd(-44.67, 69.39, -7.75, 0.5)
	pt3dadd(-44.54, 68.27, -7.75, 0.62)
  }
}
proc shape3d_25() {
  dend[523] {	pt3dadd(-44.51, 67.93, -7.75, 0.62)
  }
  dend[524] {pt3dclear()
	pt3dadd(-44.51, 67.93, -7.75, 0.62)
	pt3dadd(-44.36, 67.33, -7.75, 0.87)
	pt3dadd(-44.23, 66.45, -7.75, 0.69)
	pt3dadd(-43.98, 65.45, -7.75, 0.5)
	pt3dadd(-43.98, 64.59, -7.75, 0.37)
	pt3dadd(-44.05, 63.4, -8, 0.75)
	pt3dadd(-43.67, 62.78, -8, 0.62)
	pt3dadd(-43.24, 61.78, -8, 0.62)
	pt3dadd(-43.55, 60.97, -8, 0.5)
	pt3dadd(-43.67, 60.1, -8, 0.5)
	pt3dadd(-43.73, 59.04, -8, 0.5)
	pt3dadd(-42.92, 58.35, -8, 0.5)
	pt3dadd(-42.05, 58.04, -8, 0.62)
	pt3dadd(-41.3, 58.04, -8, 0.75)
  }
  dend[525] {pt3dclear()
	pt3dadd(-44.51, 67.93, -7.75, 0.62)
	pt3dadd(-45.41, 67.7, -7.75, 0.51)
	pt3dadd(-46.23, 67.34, -7.75, 0.36)
	pt3dadd(-46.64, 66.42, -7.75, 0.51)
	pt3dadd(-47.1, 65.7, -7.75, 0.77)
	pt3dadd(-47.76, 65.39, -7.75, 0.56)
	pt3dadd(-48.63, 64.73, -7.75, 0.61)
	pt3dadd(-49.15, 64.22, -7.75, 0.61)
	pt3dadd(-49.4, 63.55, -7.75, 0.61)
  }
  dend[526] {pt3dclear()
	pt3dadd(-44.92, 70.43, -7.75, 0.5)
	pt3dadd(-45.56, 70.2, -7.75, 0.72)
	pt3dadd(-46.38, 70.25, -7.75, 0.67)
	pt3dadd(-47.15, 70.45, -7.75, 0.67)
	pt3dadd(-47.87, 70.3, -7.75, 0.67)
	pt3dadd(-48.53, 69.95, -7.75, 0.56)
	pt3dadd(-49.04, 69.73, -7.75, 0.56)
	pt3dadd(-49.81, 69.38, -7.75, 0.56)
	pt3dadd(-49.86, 68.81, -7.75, 0.56)
	pt3dadd(-49.91, 68.16, -7.75, 0.56)
	pt3dadd(-50.07, 67.54, -7.75, 0.56)
	pt3dadd(-50.22, 67.23, -7.75, 0.56)
	pt3dadd(-50.78, 66.93, -7.75, 0.56)
	pt3dadd(-51.35, 66.42, -7.5, 0.56)
  }
  dend[527] {pt3dclear()
	pt3dadd(-44.51, 76.01, -7.75, 0.62)
	pt3dadd(-45.1, 75.68, -7.75, 0.61)
	pt3dadd(-45.82, 75.42, -7.75, 0.51)
	pt3dadd(-46.64, 75.37, -7.75, 0.61)
	pt3dadd(-47.36, 75.37, -7.75, 0.82)
  }
  dend[528] {pt3dclear()
	pt3dadd(-47.36, 75.37, -7.75, 0.82)
	pt3dadd(-48.07, 74.81, -8, 0.67)
	pt3dadd(-48.63, 74.19, -8, 0.56)
	pt3dadd(-49.2, 73.68, -8, 0.51)
	pt3dadd(-49.61, 72.95, -8.25, 0.61)
	pt3dadd(-50.17, 72.34, -8.25, 0.72)
	pt3dadd(-50.99, 71.98, -8.25, 0.67)
	pt3dadd(-51.75, 71.73, -8.25, 0.67)
	pt3dadd(-52.47, 71.63, -8.25, 0.67)
	pt3dadd(-52.88, 71.73, -8, 0.67)
	pt3dadd(-53.29, 72.15, -8, 0.67)
  }
  dend[529] {pt3dclear()
	pt3dadd(-47.36, 75.37, -7.75, 0.82)
	pt3dadd(-48.17, 75.56, -7.75, 0.56)
	pt3dadd(-48.89, 75.83, -7.75, 0.46)
	pt3dadd(-49.61, 76.19, -7.5, 0.56)
	pt3dadd(-50.27, 76.65, -7.5, 0.56)
	pt3dadd(-50.94, 76.95, -7.5, 0.56)
  }
  dend[530] {pt3dclear()
	pt3dadd(-37.6, 86.5, -7.75, 0.94)
	pt3dadd(-38.1, 87.03, -7.75, 0.72)
	pt3dadd(-38.76, 87.39, -7.75, 0.61)
	pt3dadd(-39.38, 87.7, -7.75, 0.61)
	pt3dadd(-40.4, 87.59, -7.75, 0.61)
	pt3dadd(-40.9, 87.24, -7.75, 0.61)
	pt3dadd(-41.57, 86.88, -7.75, 0.51)
	pt3dadd(-41.98, 86.42, -7.75, 0.51)
	pt3dadd(-42.6, 86.01, -7.75, 0.51)
	pt3dadd(-43.01, 85.86, -7.75, 0.51)
	pt3dadd(-43.83, 85.6, -7.75, 0.51)
  }
  dend[531] {pt3dclear()
	pt3dadd(-43.83, 85.6, -7.75, 0.51)
	pt3dadd(-44.44, 85.34, -7.75, 0.31)
	pt3dadd(-45, 85.04, -7.75, 0.31)
	pt3dadd(-45.67, 84.78, -7.75, 0.31)
	pt3dadd(-46.49, 84.53, -8, 0.56)
	pt3dadd(-47.66, 84.47, -8, 0.56)
	pt3dadd(-48.63, 84.58, -8.25, 0.56)
	pt3dadd(-49.5, 84.58, -8.25, 0.56)
	pt3dadd(-50.17, 84.78, -8.25, 0.56)
	pt3dadd(-50.68, 85.29, -8.25, 0.56)
	pt3dadd(-51.14, 85.6, -8, 0.41)
  }
  dend[532] {pt3dclear()
	pt3dadd(-43.83, 85.6, -7.75, 0.51)
	pt3dadd(-43.57, 84.73, -7.75, 0.51)
	pt3dadd(-43.88, 83.96, -8, 0.41)
	pt3dadd(-44.23, 83.14, -8, 0.46)
	pt3dadd(-44.59, 82.48, -8, 0.67)
	pt3dadd(-45.21, 81.92, -8, 0.67)
	pt3dadd(-45.82, 81.3, -8, 0.67)
	pt3dadd(-46.33, 80.89, -8, 0.67)
  }
  dend[533] {pt3dclear()
	pt3dadd(-46.33, 80.89, -8, 0.67)
	pt3dadd(-45.92, 79.92, -8, 0.51)
	pt3dadd(-45.92, 78.69, -8, 0.56)
	pt3dadd(-46.03, 77.93, -8, 0.56)
	pt3dadd(-46.33, 77.2, -8, 0.56)
  }
  dend[534] {pt3dclear()
	pt3dadd(-46.33, 80.89, -8, 0.67)
	pt3dadd(-47.2, 80.73, -8, 0.61)
	pt3dadd(-48.02, 81, -8, 0.61)
	pt3dadd(-48.74, 81.05, -8, 0.61)
	pt3dadd(-49.4, 81.2, -8, 0.51)
	pt3dadd(-50.27, 81.51, -8, 0.51)
	pt3dadd(-51.19, 81.81, -8, 0.51)
	pt3dadd(-51.86, 81.97, -8, 0.51)
	pt3dadd(-52.47, 82.07, -8.25, 0.51)
	pt3dadd(-52.73, 81.87, -8.25, 0.51)
  }
  dend[535] {pt3dclear()
	pt3dadd(-26.5, 92.28, -7.75, 1.62)
	pt3dadd(-26.34, 92.8, -8.25, 0.51)
	pt3dadd(-26.55, 93.72, -8.25, 0.46)
	pt3dadd(-26.75, 94.44, -8.25, 0.46)
	pt3dadd(-27.26, 95.21, -8.25, 0.56)
	pt3dadd(-27.67, 96.03, -8.25, 0.77)
	pt3dadd(-28.18, 96.74, -8.25, 0.92)
	pt3dadd(-28.75, 97.25, -8.25, 0.87)
  }
  dend[536] {pt3dclear()
	pt3dadd(-28.75, 97.25, -8.25, 0.87)
	pt3dadd(-28.75, 98.02, -8.25, 0.61)
	pt3dadd(-29, 98.43, -8.25, 0.61)
	pt3dadd(-29.05, 99.1, -8.25, 0.56)
	pt3dadd(-29.21, 99.71, -8.25, 0.56)
	pt3dadd(-29.21, 100.5, -8.25, 0.61)
	pt3dadd(-29.36, 101.1, -8.25, 0.61)
  }
  dend[537] {pt3dclear()
	pt3dadd(-29.36, 101.1, -8.25, 0.61)
	pt3dadd(-29.26, 101.9, -8.25, 0.51)
	pt3dadd(-29.31, 102.6, -8.25, 0.51)
	pt3dadd(-29.31, 103.6, -8.25, 0.51)
	pt3dadd(-29.31, 104.3, -8.25, 0.51)
	pt3dadd(-29.41, 105.2, -8.25, 0.51)
  }
  dend[538] {pt3dclear()
	pt3dadd(-29.36, 101.1, -8.25, 0.61)
	pt3dadd(-29.97, 101.5, -8.5, 0.41)
	pt3dadd(-30.48, 101.8, -8.5, 0.41)
	pt3dadd(-30.95, 102.3, -8.5, 0.41)
	pt3dadd(-31.35, 103, -8.5, 0.41)
	pt3dadd(-31.51, 103.8, -8.5, 0.41)
	pt3dadd(-31.76, 104.6, -8.5, 0.41)
	pt3dadd(-32.02, 105.6, -8.5, 0.41)
	pt3dadd(-32.28, 106.7, -8.5, 0.41)
	pt3dadd(-32.63, 107.5, -8.5, 0.41)
	pt3dadd(-32.84, 108.6, -8.5, 0.41)
	pt3dadd(-32.84, 109.4, -8.5, 0.41)
	pt3dadd(-32.99, 110.3, -8.5, 0.41)
	pt3dadd(-33.04, 110.8, -8.5, 0.41)
  }
  dend[539] {pt3dclear()
	pt3dadd(-28.75, 97.25, -8.25, 0.87)
	pt3dadd(-29.41, 97.82, -8.5, 0.41)
	pt3dadd(-30.28, 98.23, -8.5, 0.41)
	pt3dadd(-31, 99.04, -8.5, 0.51)
	pt3dadd(-31.35, 99.81, -8.5, 0.51)
	pt3dadd(-31.87, 100.7, -8.5, 0.51)
	pt3dadd(-32.53, 101.3, -8.5, 0.51)
	pt3dadd(-32.89, 101.7, -8.5, 0.51)
  }
  dend[540] {pt3dclear()
	pt3dadd(-32.89, 101.7, -8.5, 0.51)
	pt3dadd(-33.65, 101.8, -8.75, 0.51)
	pt3dadd(-34.58, 102.1, -8.75, 0.51)
	pt3dadd(-35.04, 102.8, -8.75, 0.51)
	pt3dadd(-35.5, 103.4, -8.75, 0.51)
	pt3dadd(-35.75, 103.8, -8.75, 0.51)
	pt3dadd(-35.9, 104.6, -9, 0.51)
	pt3dadd(-36.01, 105.4, -9, 0.51)
	pt3dadd(-36.06, 106.4, -9, 0.51)
	pt3dadd(-36.15, 107.6, -9, 0.51)
	pt3dadd(-36.57, 108.7, -8.75, 0.46)
	pt3dadd(-36.61, 109.5, -8.75, 0.46)
	pt3dadd(-36.78, 110.2, -8.75, 0.46)
	pt3dadd(-37.39, 111, -9, 0.56)
	pt3dadd(-38.26, 111.2, -9, 0.46)
	pt3dadd(-38.72, 111.2, -9, 0.46)
	pt3dadd(-39.03, 110.9, -9, 0.46)
	pt3dadd(-39.22, 110.4, -9, 0.46)
	pt3dadd(-39.28, 109.5, -9, 0.46)
	pt3dadd(-39.08, 108.8, -9, 0.56)
	pt3dadd(-38.82, 107.9, -9, 0.56)
	pt3dadd(-38.36, 106.6, -9, 0.51)
	pt3dadd(-38.26, 105.8, -9, 0.51)
	pt3dadd(-38.06, 105.3, -9, 0.51)
	pt3dadd(-37.95, 104.5, -9, 0.61)
	pt3dadd(-38, 103.9, -9, 0.61)
  }
  dend[541] {pt3dclear()
	pt3dadd(-32.89, 101.7, -8.5, 0.51)
	pt3dadd(-32.89, 102.5, -8.5, 0.56)
	pt3dadd(-33.35, 103.1, -8.5, 0.56)
	pt3dadd(-33.81, 103.5, -8.5, 0.56)
	pt3dadd(-34.22, 103.9, -8.5, 0.56)
	pt3dadd(-34.27, 104.7, -8.5, 0.56)
	pt3dadd(-34.27, 105.3, -8.5, 0.56)
	pt3dadd(-34.36, 106, -8.25, 0.46)
	pt3dadd(-34.63, 107, -8.25, 0.51)
	pt3dadd(-34.99, 107.7, -8.25, 0.51)
	pt3dadd(-35.14, 108.5, -8.25, 0.51)
	pt3dadd(-35.14, 109.3, -8.25, 0.51)
	pt3dadd(-35.19, 110, -8.25, 0.51)
	pt3dadd(-35.5, 110.7, -8.25, 0.51)
	pt3dadd(-35.9, 111.3, -8.25, 0.51)
	pt3dadd(-35.6, 112.1, -8.25, 0.51)
	pt3dadd(-35.29, 112.8, -8.25, 0.51)
	pt3dadd(-34.36, 112.9, -8.25, 0.51)
	pt3dadd(-33.54, 112.7, -8.25, 0.61)
	pt3dadd(-32.89, 112.3, -8.25, 0.61)
	pt3dadd(-32.22, 111.8, -8, 0.41)
	pt3dadd(-31.71, 111.3, -8, 0.36)
	pt3dadd(-31.3, 110.9, -8, 0.31)
  }
  dend[542] {pt3dclear()
	pt3dadd(-23.18, 89.77, -7.75, 1.62)
	pt3dadd(-24.03, 88.72, -7.75, 1)
	pt3dadd(-24.72, 87.53, -7.75, 0.5)
  }
}
proc shape3d_26() {
  dend[542] {	pt3dadd(-25.47, 86.41, -7.75, 0.56)
	pt3dadd(-26.09, 85.47, -7.75, 0.87)
	pt3dadd(-26.5, 85.32, -7.75, 0.87)
  }
  dend[543] {pt3dclear()
	pt3dadd(-26.5, 85.32, -7.75, 0.87)
	pt3dadd(-27.4, 84.85, -7.75, 0.75)
	pt3dadd(-27.68, 84.55, -7.75, 0.75)
  }
  dend[544] {pt3dclear()
	pt3dadd(-27.68, 84.55, -7.75, 0.75)
	pt3dadd(-28.4, 84.35, -7.75, 0.81)
	pt3dadd(-29.77, 84.16, -7.75, 1)
	pt3dadd(-31.2, 83.6, -7.75, 0.75)
	pt3dadd(-32.2, 82.98, -7.75, 0.81)
	pt3dadd(-32.28, 82.71, -7.75, 0.81)
  }
  dend[545] {pt3dclear()
	pt3dadd(-32.28, 82.71, -7.75, 0.81)
	pt3dadd(-32.7, 81.48, -7.75, 0.75)
	pt3dadd(-32.95, 80.3, -7.75, 0.81)
	pt3dadd(-32.95, 79.05, -7.75, 0.81)
	pt3dadd(-33, 77.84, -7.75, 0.81)
  }
  dend[546] {pt3dclear()
	pt3dadd(-33, 77.84, -7.75, 0.81)
	pt3dadd(-33.01, 77.23, -7.5, 0.94)
	pt3dadd(-33.14, 76.25, -7.5, 0.94)
	pt3dadd(-33.25, 75.7, -7.5, 0.94)
  }
  dend[547] {pt3dclear()
	pt3dadd(-33.25, 75.7, -7.5, 0.94)
	pt3dadd(-33.51, 74.88, -7.5, 0.62)
	pt3dadd(-34.38, 73.94, -7.5, 0.62)
	pt3dadd(-34.43, 73.61, -7.5, 0.62)
  }
  dend[548] {pt3dclear()
	pt3dadd(-34.43, 73.61, -7.5, 0.62)
	pt3dadd(-34.57, 72.44, -7.5, 0.62)
	pt3dadd(-34.51, 71.13, -7.5, 0.5)
	pt3dadd(-34.63, 70.06, -7.5, 0.5)
	pt3dadd(-34.57, 69.39, -7.5, 0.62)
	pt3dadd(-34.26, 68.64, -7.5, 0.5)
	pt3dadd(-34.2, 68.02, -7.5, 0.37)
	pt3dadd(-33.88, 67.27, -7.5, 0.37)
	pt3dadd(-33.57, 66.65, -7.75, 0.37)
  }
  dend[549] {pt3dclear()
	pt3dadd(-34.43, 73.61, -7.5, 0.62)
	pt3dadd(-35.28, 73.22, -7.75, 0.41)
	pt3dadd(-35.9, 72.76, -7.75, 0.41)
	pt3dadd(-36.61, 72.3, -7.75, 0.46)
	pt3dadd(-37.38, 71.79, -7.75, 0.46)
	pt3dadd(-38.1, 71.53, -7.5, 0.46)
	pt3dadd(-38.86, 71.02, -7.5, 0.31)
	pt3dadd(-39.53, 70, -7.5, 0.46)
	pt3dadd(-39.89, 69.18, -7.5, 0.56)
	pt3dadd(-40.45, 68.56, -7.5, 0.46)
	pt3dadd(-40.81, 67.95, -7.25, 0.46)
	pt3dadd(-41.52, 67.54, -7.25, 0.46)
	pt3dadd(-41.83, 66.88, -7.25, 0.56)
	pt3dadd(-41.98, 66.26, -7.25, 0.56)
	pt3dadd(-42.14, 65.59, -7, 0.56)
	pt3dadd(-42.29, 64.98, -7, 0.41)
  }
  dend[550] {pt3dclear()
	pt3dadd(-33.25, 75.7, -7.5, 0.94)
	pt3dadd(-32.63, 74.64, -7.5, 0.56)
	pt3dadd(-32.53, 73.88, -7.5, 0.51)
	pt3dadd(-32.28, 73.16, -7.5, 0.51)
	pt3dadd(-31.87, 72.8, -7.5, 0.51)
	pt3dadd(-31.92, 72.09, -7.5, 0.51)
	pt3dadd(-31.97, 71.37, -7.5, 0.51)
	pt3dadd(-31.76, 70.76, -7.5, 0.51)
	pt3dadd(-31.81, 70.19, -7.5, 0.51)
	pt3dadd(-31.56, 69.31, -7.5, 0.51)
	pt3dadd(-31.51, 68.66, -7.5, 0.41)
	pt3dadd(-31.46, 68.04, -7.5, 0.51)
	pt3dadd(-31.41, 67.28, -7.5, 0.61)
	pt3dadd(-31.3, 66.51, -7.5, 0.72)
	pt3dadd(-31.05, 65.9, -7.5, 0.67)
  }
  dend[551] {pt3dclear()
	pt3dadd(-33, 77.84, -7.75, 0.81)
	pt3dadd(-33.68, 77.16, -7.5, 0.61)
	pt3dadd(-34.4, 76.9, -7.5, 0.51)
	pt3dadd(-35.01, 77.01, -7.5, 0.46)
	pt3dadd(-35.53, 77.36, -7.5, 0.46)
	pt3dadd(-35.93, 76.65, -7.5, 0.46)
	pt3dadd(-36.7, 75.93, -7.5, 0.46)
	pt3dadd(-36.75, 75.31, -7.5, 0.46)
	pt3dadd(-37.11, 75.01, -7.5, 0.46)
  }
  dend[552] {pt3dclear()
	pt3dadd(-32.28, 82.71, -7.75, 0.81)
	pt3dadd(-32.81, 82.94, -7.75, 0.51)
	pt3dadd(-33.84, 83.04, -7.75, 0.46)
	pt3dadd(-34.5, 82.68, -7.75, 0.46)
	pt3dadd(-35.07, 82.17, -7.75, 0.46)
	pt3dadd(-35.58, 81.61, -7.75, 0.46)
	pt3dadd(-36.14, 81.34, -7.5, 0.46)
	pt3dadd(-36.75, 81, -7.5, 0.46)
	pt3dadd(-36.96, 80.48, -7.5, 0.18)
	pt3dadd(-37.36, 79.61, -7.5, 0.41)
	pt3dadd(-37.61, 78.95, -7.5, 0.56)
	pt3dadd(-37.72, 77.93, -7.5, 0.56)
	pt3dadd(-37.88, 77.56, -7.5, 0.56)
  }
  dend[553] {pt3dclear()
	pt3dadd(-37.88, 77.56, -7.5, 0.56)
	pt3dadd(-38.44, 77.72, -7.25, 0.41)
	pt3dadd(-39.31, 77.62, -7.25, 0.41)
	pt3dadd(-39.72, 77.72, -7.25, 0.41)
  }
  dend[554] {pt3dclear()
	pt3dadd(-37.88, 77.56, -7.5, 0.56)
	pt3dadd(-37.97, 76.7, -7.5, 0.36)
	pt3dadd(-38.13, 76.09, -7.5, 0.36)
	pt3dadd(-38.24, 75.62, -7.5, 0.36)
	pt3dadd(-38.65, 74.91, -7.25, 0.36)
	pt3dadd(-39.21, 74.5, -7.25, 0.46)
	pt3dadd(-39.67, 73.98, -7.25, 0.51)
  }
  dend[555] {pt3dclear()
	pt3dadd(-27.68, 84.55, -7.75, 0.75)
	pt3dadd(-27.62, 83.94, -7.75, 0.56)
	pt3dadd(-27.67, 83.12, -7.75, 0.46)
	pt3dadd(-27.87, 82.61, -7.75, 0.36)
	pt3dadd(-28.03, 81.73, -7.75, 0.41)
	pt3dadd(-28.13, 81.18, -7.75, 0.46)
	pt3dadd(-28.49, 80.51, -8, 0.46)
	pt3dadd(-28.84, 79.79, -8, 0.56)
	pt3dadd(-29.25, 78.77, -8, 0.61)
	pt3dadd(-29.56, 78.2, -8, 0.51)
	pt3dadd(-29.82, 77.34, -8, 0.51)
	pt3dadd(-29.97, 76.52, -8, 0.51)
	pt3dadd(-30.17, 76.11, -8, 0.67)
	pt3dadd(-30.48, 75.5, -8, 0.72)
	pt3dadd(-30.53, 75.09, -8, 0.36)
  }
  dend[556] {pt3dclear()
	pt3dadd(-26.5, 85.32, -7.75, 0.87)
	pt3dadd(-25.88, 84.7, -7.75, 0.56)
	pt3dadd(-25.78, 84.09, -7.75, 0.46)
	pt3dadd(-25.72, 83.07, -7.75, 0.51)
	pt3dadd(-25.67, 82.35, -7.75, 0.51)
	pt3dadd(-25.83, 81.53, -7.75, 0.56)
	pt3dadd(-25.98, 80.61, -7.75, 0.56)
	pt3dadd(-26.39, 79.84, -7.75, 0.56)
	pt3dadd(-26.7, 78.81, -7.75, 0.61)
	pt3dadd(-26.85, 77.84, -7.5, 0.61)
	pt3dadd(-27, 77.13, -7.5, 0.61)
  }
  dend[557] {pt3dclear()
	pt3dadd(-27, 77.13, -7.5, 0.61)
	pt3dadd(-26.34, 76.67, -7.5, 0.41)
	pt3dadd(-25.98, 76.11, -7.5, 0.41)
	pt3dadd(-25.88, 75.34, -7.5, 0.41)
	pt3dadd(-25.67, 74.93, -7.5, 0.41)
	pt3dadd(-25.47, 74.68, -7.5, 0.41)
	pt3dadd(-25.01, 74.31, -7.5, 0.41)
	pt3dadd(-24.39, 74.01, -7.5, 0.41)
  }
  dend[558] {pt3dclear()
	pt3dadd(-27, 77.13, -7.5, 0.61)
	pt3dadd(-27.36, 76.52, -7.5, 0.31)
	pt3dadd(-27.72, 75.95, -7.5, 0.36)
	pt3dadd(-27.87, 75.23, -7.5, 0.41)
	pt3dadd(-27.98, 74.42, -7.5, 0.56)
	pt3dadd(-28.03, 73.76, -7.5, 0.51)
	pt3dadd(-28.03, 73.19, -7.5, 0.51)
	pt3dadd(-28.08, 72.53, -7.5, 0.51)
	pt3dadd(-28.23, 71.61, -7.5, 0.51)
	pt3dadd(-28.23, 70.73, -7.5, 0.51)
	pt3dadd(-28.33, 70.13, -7.5, 0.82)
	pt3dadd(-28.44, 69.45, -7.5, 0.72)
	pt3dadd(-28.28, 68.9, -7.5, 0.61)
  }
  dend[559] {pt3dclear()
	pt3dadd(-12.42, 82.98, -8.36, 1.25)
	pt3dadd(-10.63, 83, -7, 0.51)
	pt3dadd(-10.48, 84.12, -7, 0.51)
	pt3dadd(-10.02, 84.79, -7, 0.41)
	pt3dadd(-9.36, 85.45, -7, 0.36)
	pt3dadd(-8.27, 86.17, -7, 0.36)
	pt3dadd(-8.03, 86.41, -7, 0.36)
	pt3dadd(-7.72, 87.22, -7, 0.36)
  }
  dend[560] {pt3dclear()
	pt3dadd(-7.72, 87.22, -7, 0.36)
	pt3dadd(-7.51, 87.6, -7, 0.26)
	pt3dadd(-7.11, 88.57, -7, 0.26)
	pt3dadd(-7, 89.03, -7, 0.26)
  }
  dend[561] {pt3dclear()
	pt3dadd(-7.72, 87.22, -7, 0.36)
	pt3dadd(-7.77, 86.94, -7, 0.26)
	pt3dadd(-6.8, 85.86, -7, 0.26)
	pt3dadd(-6.7, 85.25, -7, 0.26)
  }
  dend[562] {pt3dclear()
	pt3dadd(-6.7, 85.25, -7, 0.26)
	pt3dadd(-6.37, 84.61, -7, 0.36)
  }
  dend[563] {pt3dclear()
	pt3dadd(-6.37, 84.61, -7, 0.36)
	pt3dadd(-5.88, 84.28, -7, 0.31)
	pt3dadd(-5.37, 83.97, -7, 0.26)
	pt3dadd(-5.21, 83.61, -7, 0.26)
  }
  dend[564] {pt3dclear()
	pt3dadd(-6.37, 84.61, -7, 0.36)
	pt3dadd(-5.72, 85.55, -7, 0.15)
	pt3dadd(-4.96, 85.55, -7, 0.15)
	pt3dadd(-4.19, 85.4, -7, 0.15)
	pt3dadd(-3.37, 84.69, -7, 0.15)
  }
  dend[565] {pt3dclear()
	pt3dadd(-6.7, 85.25, -7, 0.26)
	pt3dadd(-6.8, 84.28, -7, 0.31)
	pt3dadd(-6.95, 83.46, -7, 0.31)
	pt3dadd(-7.57, 82.43, -7, 0.31)
  }
  dend[566] {pt3dclear()
	pt3dadd(-10.59, 81.69, -7.25, 1.12)
	pt3dadd(-11.35, 81.81, -7, 0.67)
	pt3dadd(-11.56, 81.31, -7, 0.67)
  }
  dend[567] {pt3dclear()
	pt3dadd(-11.56, 81.31, -7, 0.67)
	pt3dadd(-10.99, 80.8, -7, 0.46)
	pt3dadd(-10.94, 79.47, -7, 0.46)
	pt3dadd(-10.94, 78.7, -7, 0.46)
	pt3dadd(-10.94, 77.88, -7, 0.46)
  }
  dend[568] {pt3dclear()
	pt3dadd(-11.56, 81.31, -7, 0.67)
	pt3dadd(-12.22, 81.16, -7, 0.46)
	pt3dadd(-12.78, 80.95, -7, 0.36)
	pt3dadd(-13.45, 80.34, -6.75, 0.36)
	pt3dadd(-13.91, 79.83, -6.75, 0.36)
	pt3dadd(-15.14, 79.06, -6.75, 0.36)
  }
  dend[569] {pt3dclear()
	pt3dadd(-5.07, 72.76, -7, 2.56)
	pt3dadd(-6.83, 73.25, -7.25, 1.5)
	pt3dadd(-8.51, 73.44, -7.25, 1.06)
	pt3dadd(-9.88, 73.38, -7.25, 1.06)
	pt3dadd(-11.38, 73.19, -7.25, 1.37)
	pt3dadd(-11.92, 73.09, -7.25, 1.37)
  }
  dend[570] {pt3dclear()
	pt3dadd(-11.92, 73.09, -7.25, 1.37)
	pt3dadd(-13, 72.88, -7.25, 2.06)
	pt3dadd(-13.66, 72.53, -7.25, 2.06)
  }
  dend[571] {pt3dclear()
	pt3dadd(-13.66, 72.53, -7.25, 2.06)
  }
}
proc shape3d_27() {
  dend[571] {	pt3dadd(-14.56, 71.95, -7.25, 1.87)
	pt3dadd(-15.04, 71.66, -7.25, 1.87)
  }
  dend[572] {pt3dclear()
	pt3dadd(-15.04, 71.66, -7.25, 1.87)
	pt3dadd(-15.43, 71.13, -7.25, 0.94)
	pt3dadd(-16.73, 70.81, -7.5, 0.69)
	pt3dadd(-17.67, 70.31, -7.5, 0.75)
	pt3dadd(-18.55, 69.51, -7.5, 0.87)
	pt3dadd(-19.54, 68.77, -7.25, 0.94)
	pt3dadd(-20.85, 67.77, -7.25, 1)
	pt3dadd(-22.16, 66.7, -7.25, 0.94)
	pt3dadd(-23.23, 65.73, -7.25, 0.94)
  }
  dend[573] {pt3dclear()
	pt3dadd(-23.23, 65.73, -7.25, 0.94)
	pt3dadd(-23.47, 65.4, -7.25, 1.75)
	pt3dadd(-24.84, 65.27, -7.25, 0.81)
	pt3dadd(-26.22, 65.27, -7.25, 1)
	pt3dadd(-27.4, 64.9, -7.25, 1.56)
	pt3dadd(-27.37, 64.76, -7.25, 1.56)
  }
  dend[574] {pt3dclear()
	pt3dadd(-27.37, 64.76, -7.25, 1.56)
	pt3dadd(-29.15, 64.11, -7.66, 0.97)
  }
  dend[575] {pt3dclear()
	pt3dadd(-29.15, 64.11, -7.66, 0.97)
	pt3dadd(-28.43, 64.37, -7.5, 0.97)
	pt3dadd(-29.35, 63.3, -7.5, 0.97)
	pt3dadd(-29.62, 63.27, -7.5, 0.97)
  }
  dend[576] {pt3dclear()
	pt3dadd(-29.62, 63.27, -7.5, 0.97)
	pt3dadd(-30.42, 62.73, -7.5, 0.92)
	pt3dadd(-31.65, 62.94, -7.5, 0.72)
	pt3dadd(-32.32, 63.45, -7.5, 0.72)
	pt3dadd(-33.34, 63.6, -7.75, 0.56)
	pt3dadd(-34.31, 63.91, -7.75, 0.67)
	pt3dadd(-35.22, 64.27, -7.75, 0.82)
	pt3dadd(-36.15, 64.88, -7.75, 0.77)
	pt3dadd(-37.02, 65.55, -7.75, 0.77)
	pt3dadd(-37.89, 66.31, -7.75, 0.77)
	pt3dadd(-38.65, 66.47, -8, 0.61)
	pt3dadd(-39.38, 66.88, -8, 0.56)
	pt3dadd(-40.45, 67.44, -8.25, 0.67)
  }
  dend[577] {pt3dclear()
	pt3dadd(-29.62, 63.27, -7.5, 0.97)
	pt3dadd(-29.45, 62.07, -7.5, 0.67)
	pt3dadd(-29.55, 60.79, -7.5, 0.67)
	pt3dadd(-29.66, 59.61, -7.5, 0.67)
	pt3dadd(-29.86, 58.13, -7.5, 0.67)
  }
  dend[578] {pt3dclear()
	pt3dadd(-29.86, 58.13, -7.5, 0.67)
	pt3dadd(-29.81, 56.95, -7.5, 0.67)
	pt3dadd(-29.96, 55.88, -7.5, 0.67)
	pt3dadd(-30.22, 54.86, -7.5, 0.67)
	pt3dadd(-30.68, 54.29, -7.5, 0.56)
	pt3dadd(-31.86, 54.19, -7.75, 0.56)
	pt3dadd(-32.72, 53.83, -7.75, 0.56)
	pt3dadd(-33.39, 53.17, -7.75, 0.56)
	pt3dadd(-34.31, 53.48, -7.75, 0.56)
	pt3dadd(-35.08, 53.78, -7.75, 0.56)
	pt3dadd(-35.85, 53.17, -7.75, 0.56)
	pt3dadd(-36.71, 52.5, -7.75, 0.56)
	pt3dadd(-37.33, 51.58, -7.75, 0.56)
	pt3dadd(-37.74, 50.71, -7.75, 0.56)
	pt3dadd(-38.25, 49.38, -7.75, 0.56)
  }
  dend[579] {pt3dclear()
	pt3dadd(-29.86, 58.13, -7.5, 0.67)
	pt3dadd(-31.14, 58.39, -7.5, 0.56)
	pt3dadd(-31.8, 59, -7.5, 0.56)
	pt3dadd(-32.67, 59.26, -7.75, 0.46)
	pt3dadd(-33.39, 59.56, -7.75, 0.56)
	pt3dadd(-34.36, 59.26, -7.75, 0.61)
	pt3dadd(-35.49, 59.1, -7.75, 0.61)
	pt3dadd(-36.15, 59.82, -7.75, 0.61)
	pt3dadd(-36.97, 60.48, -7.75, 0.61)
	pt3dadd(-37.38, 61.35, -7.75, 0.61)
  }
  dend[580] {pt3dclear()
	pt3dadd(-29.15, 64.11, -7.66, 0.97)
	pt3dadd(-27.4, 63.47, -7.25, 0.81)
	pt3dadd(-27.15, 62.09, -7.25, 1)
	pt3dadd(-27.15, 61.16, -7.25, 0.81)
	pt3dadd(-27.28, 59.85, -7.25, 0.81)
	pt3dadd(-27.28, 58.42, -7.25, 0.87)
	pt3dadd(-27.21, 56.86, -7.25, 0.87)
	pt3dadd(-27.71, 55.11, -7.25, 0.94)
	pt3dadd(-28.34, 53.37, -7.5, 0.94)
	pt3dadd(-28.65, 51.25, -7.5, 0.94)
	pt3dadd(-28.88, 49.22, -7.5, 0.94)
  }
  dend[581] {pt3dclear()
	pt3dadd(-28.88, 49.22, -7.5, 0.94)
	pt3dadd(-28.94, 48.63, -7.5, 0.94)
  }
  dend[582] {pt3dclear()
	pt3dadd(-28.94, 48.63, -7.5, 0.94)
	pt3dadd(-29.02, 48.19, -7.5, 0.81)
	pt3dadd(-29.4, 47.01, -7.5, 0.69)
	pt3dadd(-30.33, 46.2, -7.5, 0.69)
	pt3dadd(-30.83, 45.01, -7.5, 0.81)
	pt3dadd(-31.14, 44.08, -7.5, 0.56)
	pt3dadd(-31.58, 43.08, -7.5, 0.31)
	pt3dadd(-31.27, 42.21, -7.5, 0.56)
	pt3dadd(-30.83, 41.52, -7.5, 0.81)
  }
  dend[583] {pt3dclear()
	pt3dadd(-28.94, 48.63, -7.5, 0.94)
	pt3dadd(-28.22, 47.95, -7.5, 0.51)
	pt3dadd(-27.56, 47.54, -7.5, 0.46)
	pt3dadd(-27.05, 46.98, -7.5, 0.46)
	pt3dadd(-26.33, 46.26, -7.5, 0.46)
	pt3dadd(-25.56, 45.8, -7.5, 0.46)
	pt3dadd(-24.95, 45.03, -7.5, 0.46)
	pt3dadd(-24.59, 44.22, -7.5, 0.46)
	pt3dadd(-24.49, 43.19, -7.5, 0.46)
	pt3dadd(-24.44, 42.73, -7.5, 0.46)
	pt3dadd(-24.39, 42.17, -7.5, 0.31)
  }
  dend[584] {pt3dclear()
	pt3dadd(-28.88, 49.22, -7.5, 0.94)
	pt3dadd(-29.6, 49.54, -7.5, 0.61)
	pt3dadd(-30.78, 49.13, -7.5, 0.61)
	pt3dadd(-31.5, 49.13, -7.5, 0.51)
	pt3dadd(-32.36, 49.23, -7.5, 0.46)
	pt3dadd(-32.52, 49.59, -7.5, 0.46)
	pt3dadd(-33.34, 49.74, -7.75, 0.46)
	pt3dadd(-34.31, 49.64, -7.75, 0.46)
	pt3dadd(-35.08, 49.18, -8, 0.46)
	pt3dadd(-35.18, 48.51, -8, 0.46)
  }
  dend[585] {pt3dclear()
	pt3dadd(-27.37, 64.76, -7.25, 1.56)
	pt3dadd(-27.82, 65.37, -7.5, 0.61)
	pt3dadd(-28.33, 65.93, -7.5, 0.41)
	pt3dadd(-28.79, 66.7, -7.75, 0.46)
	pt3dadd(-29.2, 67.26, -7.75, 0.46)
	pt3dadd(-29.61, 67.87, -7.75, 0.46)
	pt3dadd(-29.66, 68.48, -7.75, 0.46)
  }
  dend[586] {pt3dclear()
	pt3dadd(-23.23, 65.73, -7.25, 0.94)
	pt3dadd(-23.31, 64.42, -7.25, 0.92)
	pt3dadd(-23.36, 63.45, -7.25, 0.72)
	pt3dadd(-23.52, 62.48, -7.25, 0.56)
	pt3dadd(-23.77, 61.51, -7.25, 0.56)
	pt3dadd(-23.82, 60.64, -7.25, 0.82)
	pt3dadd(-23.82, 59.92, -7.25, 0.77)
	pt3dadd(-24.03, 59.1, -7.25, 0.61)
	pt3dadd(-24.08, 58.08, -7.25, 0.61)
	pt3dadd(-24.39, 57.26, -7.25, 0.61)
	pt3dadd(-24.64, 56.49, -7.25, 0.61)
	pt3dadd(-25, 55.47, -7.25, 0.61)
	pt3dadd(-25, 54.34, -7.25, 0.61)
	pt3dadd(-25, 53.22, -7.25, 0.61)
	pt3dadd(-24.74, 52.25, -7.25, 0.61)
	pt3dadd(-24.34, 51.74, -7.25, 0.61)
  }
  dend[587] {pt3dclear()
	pt3dadd(-24.34, 51.74, -7.25, 0.61)
	pt3dadd(-23.72, 50.87, -7.25, 0.41)
	pt3dadd(-23.47, 50.1, -7.25, 0.41)
	pt3dadd(-23.41, 49.33, -7.25, 0.41)
	pt3dadd(-23.31, 48.51, -7.25, 0.41)
	pt3dadd(-23.11, 47.64, -7.25, 0.41)
	pt3dadd(-22.75, 47.08, -7, 0.41)
  }
  dend[588] {pt3dclear()
	pt3dadd(-24.34, 51.74, -7.25, 0.61)
	pt3dadd(-24.8, 51.12, -7, 0.41)
	pt3dadd(-25.26, 50.46, -7, 0.41)
	pt3dadd(-25.51, 49.95, -7, 0.41)
	pt3dadd(-26.13, 49.18, -6.75, 0.41)
	pt3dadd(-26.79, 48.72, -6.75, 0.41)
	pt3dadd(-27.25, 48.36, -6.75, 0.41)
	pt3dadd(-27.61, 48.26, -6.5, 0.51)
	pt3dadd(-28.38, 48.26, -6.5, 0.51)
	pt3dadd(-28.73, 48.26, -6.5, 0.51)
	pt3dadd(-29.25, 48.21, -6.25, 0.41)
	pt3dadd(-29.86, 48.1, -6.25, 0.31)
  }
  dend[589] {pt3dclear()
	pt3dadd(-15.04, 71.66, -7.25, 1.87)
	pt3dadd(-14.93, 70.2, -7.5, 1.02)
	pt3dadd(-15.04, 69.56, -7.5, 1.02)
  }
  dend[590] {pt3dclear()
	pt3dadd(-15.04, 69.56, -7.5, 1.02)
	pt3dadd(-15.09, 69.03, -7.5, 0.87)
	pt3dadd(-15.39, 68.05, -7.5, 0.77)
	pt3dadd(-15.55, 66.83, -7.5, 0.77)
	pt3dadd(-15.55, 65.84, -7.25, 0.77)
	pt3dadd(-15.55, 65.19, -7.25, 0.87)
	pt3dadd(-15.6, 63.86, -7.25, 0.87)
	pt3dadd(-15.35, 63.17, -7.25, 0.87)
  }
  dend[591] {pt3dclear()
	pt3dadd(-15.35, 63.17, -7.25, 0.87)
	pt3dadd(-15.24, 62.68, -7.25, 0.87)
	pt3dadd(-14.73, 61.66, -7.5, 0.51)
	pt3dadd(-14.01, 60.02, -7.5, 0.51)
	pt3dadd(-14.06, 59.2, -7.25, 0.51)
	pt3dadd(-13.65, 57.93, -7.25, 0.51)
	pt3dadd(-13.45, 56.75, -7.25, 1.33)
	pt3dadd(-14.06, 55.37, -7.25, 0.77)
	pt3dadd(-14.01, 53.37, -7.25, 0.77)
	pt3dadd(-13.91, 52.2, -7.25, 0.77)
	pt3dadd(-13.65, 50.71, -7.25, 0.61)
	pt3dadd(-13.45, 49.18, -7.25, 0.61)
	pt3dadd(-14.17, 48, -7.25, 0.31)
	pt3dadd(-14.88, 47.39, -7.25, 0.31)
	pt3dadd(-15.7, 46.57, -7.25, 0.56)
	pt3dadd(-16.36, 45.49, -7.25, 0.61)
	pt3dadd(-17.07, 44.06, -7.25, 0.61)
	pt3dadd(-16.82, 42.78, -7.25, 0.36)
	pt3dadd(-16.52, 41.25, -7.25, 0.36)
	pt3dadd(-15.8, 39.77, -7.25, 0.36)
	pt3dadd(-15.24, 38.84, -7.25, 0.36)
	pt3dadd(-15.09, 37.82, -7.25, 0.36)
	pt3dadd(-14.93, 36.54, -7.25, 0.36)
	pt3dadd(-14.37, 35.42, -7.25, 0.36)
	pt3dadd(-13.7, 34.14, -7.25, 0.36)
  }
  dend[592] {pt3dclear()
	pt3dadd(-15.35, 63.17, -7.25, 0.87)
	pt3dadd(-15.8, 62.4, -7.5, 0.72)
	pt3dadd(-16.16, 61.53, -7.75, 0.51)
	pt3dadd(-16.52, 60.61, -7.75, 0.51)
	pt3dadd(-16.98, 60.46, -7.75, 0.72)
	pt3dadd(-17.73, 60.2, -8, 0.72)
  }
  dend[593] {pt3dclear()
	pt3dadd(-17.73, 60.2, -8, 0.72)
	pt3dadd(-18.71, 60.51, -8, 0.51)
  }
  dend[594] {pt3dclear()
	pt3dadd(-18.71, 60.51, -8, 0.51)
	pt3dadd(-18.55, 60.46, -8, 0.51)
	pt3dadd(-19.07, 60.41, -8, 0.51)
	pt3dadd(-19.69, 60.1, -8, 0.51)
	pt3dadd(-20.1, 59.54, -8, 0.51)
  }
}
proc shape3d_28() {
  dend[594] {  }
  dend[595] {pt3dclear()
	pt3dadd(-18.71, 60.51, -8, 0.51)
	pt3dadd(-17.23, 59.59, -7.75, 0.51)
	pt3dadd(-17.32, 58.92, -7.75, 0.51)
	pt3dadd(-17.39, 58.51, -7.75, 0.51)
	pt3dadd(-17.54, 57.85, -8, 0.51)
	pt3dadd(-17.59, 57.44, -8, 0.51)
	pt3dadd(-17.69, 56.57, -8, 0.46)
	pt3dadd(-17.8, 56.06, -8, 0.51)
	pt3dadd(-17.73, 55.55, -8, 0.72)
	pt3dadd(-17.85, 54.93, -8, 0.56)
	pt3dadd(-18, 54.37, -8, 0.51)
	pt3dadd(-18.05, 53.76, -7.75, 0.51)
	pt3dadd(-18.26, 52.99, -7.75, 0.51)
	pt3dadd(-18.36, 52.38, -7.75, 0.51)
	pt3dadd(-18.41, 51.56, -7.75, 0.51)
	pt3dadd(-18.61, 50.84, -7.75, 0.51)
	pt3dadd(-19.32, 49.97, -7.75, 0.51)
  }
  dend[596] {pt3dclear()
	pt3dadd(-17.73, 60.2, -8, 0.72)
	pt3dadd(-18, 60.97, -8, 0.51)
	pt3dadd(-18.26, 61.69, -8, 0.51)
	pt3dadd(-18.41, 62.09, -7.75, 0.51)
	pt3dadd(-18.72, 62.81, -7.75, 0.41)
	pt3dadd(-19.02, 63.78, -7.75, 0.46)
	pt3dadd(-19.23, 64.4, -7.75, 0.72)
	pt3dadd(-19.53, 65.01, -7.75, 0.61)
	pt3dadd(-19.64, 66.03, -7.75, 0.46)
	pt3dadd(-19.69, 66.9, -7.75, 0.46)
	pt3dadd(-19.48, 67.56, -7.75, 0.46)
	pt3dadd(-19.18, 68.28, -8, 0.56)
	pt3dadd(-18.72, 69.05, -8, 0.61)
  }
  dend[597] {pt3dclear()
	pt3dadd(-15.04, 69.56, -7.5, 1.02)
	pt3dadd(-14.22, 68.59, -7.25, 0.15)
	pt3dadd(-13.91, 67.88, -7.25, 0.098)
	pt3dadd(-13.45, 67.37, -7.25, 0.18)
	pt3dadd(-13.2, 66.86, -7.25, 0.15)
	pt3dadd(-12.79, 66.34, -7.25, 0.41)
  }
  dend[598] {pt3dclear()
	pt3dadd(-12.79, 66.34, -7.25, 0.41)
	pt3dadd(-12.58, 65.22, -7.25, 0.31)
	pt3dadd(-12.53, 64.5, -7.25, 0.26)
	pt3dadd(-12.22, 63.89, -7.25, 0.51)
	pt3dadd(-12.17, 62.82, -7.25, 0.61)
  }
  dend[599] {pt3dclear()
	pt3dadd(-12.17, 62.82, -7.25, 0.61)
	pt3dadd(-12.22, 61.9, -7.25, 0.46)
	pt3dadd(-12.22, 60.62, -7.25, 0.46)
	pt3dadd(-12.02, 60, -7.25, 0.41)
	pt3dadd(-11.4, 59.34, -7.25, 0.41)
	pt3dadd(-10.74, 58.47, -7.5, 0.41)
  }
  dend[600] {pt3dclear()
	pt3dadd(-12.17, 62.82, -7.25, 0.61)
	pt3dadd(-10.89, 62.46, -7, 0.41)
	pt3dadd(-10.43, 61.74, -7, 0.31)
	pt3dadd(-10.02, 60.77, -7, 0.31)
	pt3dadd(-9.31, 60.16, -7, 0.18)
	pt3dadd(-9.26, 59.13, -6.75, 0.46)
	pt3dadd(-8.94, 58.01, -6.75, 0.61)
  }
  dend[601] {pt3dclear()
	pt3dadd(-8.94, 58.01, -6.75, 0.61)
	pt3dadd(-8.18, 57.8, -6.75, 0.41)
	pt3dadd(-7.21, 56.93, -6.75, 0.56)
	pt3dadd(-6.55, 56.12, -6.75, 0.51)
	pt3dadd(-5.98, 55.4, -6.75, 0.46)
	pt3dadd(-5.27, 54.58, -6.75, 0.41)
	pt3dadd(-5.11, 53.92, -6.75, 0.41)
	pt3dadd(-4.86, 53.15, -6.75, 0.36)
	pt3dadd(-4.29, 52.18, -6.75, 0.36)
  }
  dend[602] {pt3dclear()
	pt3dadd(-8.94, 58.01, -6.75, 0.61)
	pt3dadd(-8.9, 57.09, -6.75, 0.36)
	pt3dadd(-8.94, 55.96, -6.5, 0.36)
	pt3dadd(-9.15, 54.63, -6.5, 0.36)
	pt3dadd(-9.36, 53.66, -6.5, 0.36)
	pt3dadd(-9.82, 53, -6.5, 0.36)
	pt3dadd(-10.74, 53.05, -6.5, 0.36)
	pt3dadd(-11.56, 53.4, -6.5, 0.36)
  }
  dend[603] {pt3dclear()
	pt3dadd(-12.79, 66.34, -7.25, 0.41)
	pt3dadd(-11.92, 66.55, -7.5, 0.36)
	pt3dadd(-11.2, 66.91, -7.5, 0.61)
  }
  dend[604] {pt3dclear()
	pt3dadd(-11.2, 66.91, -7.5, 0.61)
	pt3dadd(-10.94, 66.23, -7.5, 0.31)
	pt3dadd(-10.74, 65.63, -7.5, 0.31)
	pt3dadd(-9.82, 65.31, -7.5, 0.31)
	pt3dadd(-9, 65.27, -7.5, 0.31)
  }
  dend[605] {pt3dclear()
	pt3dadd(-11.2, 66.91, -7.5, 0.61)
	pt3dadd(-10.59, 67.56, -7.5, 0.26)
	pt3dadd(-9.86, 68.03, -7.5, 0.18)
	pt3dadd(-9.97, 68.7, -7.5, 0.18)
	pt3dadd(-9.77, 69.31, -7.5, 0.31)
	pt3dadd(-9.61, 70.08, -7.5, 0.41)
	pt3dadd(-9.46, 70.9, -7.5, 0.51)
  }
  dend[606] {pt3dclear()
	pt3dadd(-13.66, 72.53, -7.25, 2.06)
	pt3dadd(-14.27, 73.26, -7.25, 0.77)
	pt3dadd(-15.19, 74.34, -7.25, 0.56)
  }
  dend[607] {pt3dclear()
	pt3dadd(-15.19, 74.34, -7.25, 0.56)
	pt3dadd(-14.76, 75.45, -7.46, 0.61)
  }
  dend[608] {pt3dclear()
	pt3dadd(-14.76, 75.45, -7.46, 0.61)
	pt3dadd(-14.7, 75.62, -7.5, 0.61)
	pt3dadd(-13.68, 75.92, -7.5, 0.51)
	pt3dadd(-12.66, 76.33, -7.25, 0.51)
	pt3dadd(-11.63, 76.84, -7.25, 0.61)
	pt3dadd(-10.82, 77.45, -7.25, 0.72)
  }
  dend[609] {pt3dclear()
	pt3dadd(-14.76, 75.45, -7.46, 0.61)
	pt3dadd(-16.14, 74.39, -7.25, 0.31)
	pt3dadd(-17.05, 74.18, -7.25, 0.18)
	pt3dadd(-17.77, 73.67, -7.25, 0.18)
	pt3dadd(-18.89, 73.36, -7.25, 0.18)
	pt3dadd(-19.41, 72.84, -7.5, 0.18)
	pt3dadd(-20.32, 72.55, -7.5, 0.18)
	pt3dadd(-21.46, 72.14, -7.5, 0.92)
	pt3dadd(-22.27, 71.42, -7.5, 0.92)
	pt3dadd(-23.3, 71.22, -7.5, 0.41)
	pt3dadd(-24.53, 70.91, -7.5, 0.41)
	pt3dadd(-25.24, 70.3, -7.5, 0.92)
	pt3dadd(-25.65, 69.27, -7.5, 0.41)
	pt3dadd(-25.96, 68.56, -7.5, 0.41)
	pt3dadd(-26.47, 67.73, -7.75, 0.72)
	pt3dadd(-26.57, 67.23, -7.75, 0.72)
  }
  dend[610] {pt3dclear()
	pt3dadd(-15.19, 74.34, -7.25, 0.56)
	pt3dadd(-15.85, 75.67, -7.25, 0.36)
	pt3dadd(-16.37, 76.69, -7.25, 0.61)
	pt3dadd(-17.07, 77.81, -7.5, 0.97)
	pt3dadd(-17.35, 77.84, -7.5, 0.97)
  }
  dend[611] {pt3dclear()
	pt3dadd(-17.35, 77.84, -7.5, 0.97)
	pt3dadd(-18, 78.17, -7.5, 0.87)
	pt3dadd(-18.92, 78.38, -7.5, 0.87)
  }
  dend[612] {pt3dclear()
	pt3dadd(-18.92, 78.38, -7.5, 0.87)
	pt3dadd(-19.38, 79.25, -7.5, 0.56)
	pt3dadd(-19.73, 80.31, -7.5, 0.77)
	pt3dadd(-20.2, 81.75, -7.75, 0.72)
	pt3dadd(-20.41, 82.93, -7.75, 0.82)
	pt3dadd(-20.56, 83.8, -7.75, 0.77)
	pt3dadd(-20.36, 84.72, -7.75, 0.82)
	pt3dadd(-20.46, 85.49, -8, 0.67)
	pt3dadd(-20.97, 86, -8, 0.56)
	pt3dadd(-21.74, 86.36, -8, 0.56)
	pt3dadd(-22.56, 86.82, -8, 0.56)
	pt3dadd(-23.12, 87.13, -8, 0.72)
  }
  dend[613] {pt3dclear()
	pt3dadd(-18.92, 78.38, -7.5, 0.87)
	pt3dadd(-19.89, 78.12, -7.5, 0.51)
	pt3dadd(-20.82, 78.02, -7.5, 0.51)
	pt3dadd(-21.64, 78.02, -7.5, 0.51)
  }
  dend[614] {pt3dclear()
	pt3dadd(-21.64, 78.02, -7.5, 0.51)
	pt3dadd(-20.91, 77.36, -7.22, 0.51)
  }
  dend[615] {pt3dclear()
	pt3dadd(-20.91, 77.36, -7.22, 0.51)
	pt3dadd(-20.46, 76.89, -7.25, 0.51)
	pt3dadd(-19.95, 76.38, -7.25, 0.51)
	pt3dadd(-19.54, 75.87, -7.25, 0.51)
	pt3dadd(-19.38, 75.31, -7.25, 0.51)
	pt3dadd(-19.13, 75.05, -7, 0.51)
  }
  dend[616] {pt3dclear()
	pt3dadd(-20.91, 77.36, -7.22, 0.51)
	pt3dadd(-22.04, 78.58, -7.25, 0.46)
	pt3dadd(-22.4, 79.34, -7.25, 0.56)
	pt3dadd(-22.86, 80.01, -7.25, 0.92)
	pt3dadd(-23.37, 80.63, -7.5, 0.61)
	pt3dadd(-23.78, 81.23, -7.5, 0.56)
  }
  dend[617] {pt3dclear()
	pt3dadd(-21.64, 78.02, -7.5, 0.51)
	pt3dadd(-22.2, 77.97, -7.5, 0.46)
	pt3dadd(-22.81, 77.92, -7.5, 0.46)
	pt3dadd(-23.58, 77.56, -7.75, 0.72)
  }
  dend[618] {pt3dclear()
	pt3dadd(-17.35, 77.84, -7.5, 0.97)
	pt3dadd(-17.03, 78.53, -7.75, 0.51)
	pt3dadd(-16.72, 80.01, -7.5, 0.51)
  }
  dend[619] {pt3dclear()
	pt3dadd(-16.72, 80.01, -7.5, 0.51)
	pt3dadd(-16.21, 80.58, -7.5, 0.41)
	pt3dadd(-16.05, 81.55, -7.5, 0.41)
	pt3dadd(-15.85, 82.21, -7.5, 0.41)
	pt3dadd(-15.96, 83.29, -7.25, 0.41)
	pt3dadd(-15.96, 84.36, -7.25, 0.41)
	pt3dadd(-16.01, 85.23, -7.25, 0.46)
	pt3dadd(-16.11, 86.15, -7.25, 0.46)
	pt3dadd(-16.21, 86.97, -7.25, 0.46)
	pt3dadd(-16.26, 87.99, -7.25, 0.46)
	pt3dadd(-16.32, 88.71, -7.25, 0.46)
	pt3dadd(-16.32, 89.94, -7.25, 0.46)
  }
  dend[620] {pt3dclear()
	pt3dadd(-16.32, 89.94, -7.25, 0.46)
	pt3dadd(-16.88, 91.06, -7.25, 0.46)
	pt3dadd(-17.64, 91.52, -7.25, 0.46)
	pt3dadd(-17.95, 91.98, -7.25, 0.46)
  }
  dend[621] {pt3dclear()
	pt3dadd(-16.32, 89.94, -7.25, 0.46)
	pt3dadd(-15.91, 90.4, -7.25, 0.46)
	pt3dadd(-15.5, 91.22, -7.25, 0.46)
	pt3dadd(-15.04, 91.83, -7, 0.46)
	pt3dadd(-14.58, 92.24, -7, 0.46)
  }
  dend[622] {pt3dclear()
	pt3dadd(-16.72, 80.01, -7.5, 0.51)
	pt3dadd(-17.18, 80.53, -7.75, 0.46)
	pt3dadd(-17.44, 81.14, -7.75, 0.46)
	pt3dadd(-17.95, 81.91, -7.75, 0.46)
	pt3dadd(-18.26, 82.67, -7.75, 0.46)
	pt3dadd(-18.41, 83.6, -7.75, 0.46)
	pt3dadd(-18.57, 84.77, -7.5, 0.26)
	pt3dadd(-18.82, 85.69, -7.5, 0.26)
	pt3dadd(-19.07, 86.26, -7.5, 0.26)
	pt3dadd(-19.28, 87.13, -7.5, 0.51)
	pt3dadd(-19.44, 87.79, -7.5, 0.51)
	pt3dadd(-19.79, 88.61, -7.5, 0.46)
	pt3dadd(-19.84, 89.22, -7.5, 0.46)
	pt3dadd(-20.3, 90.04, -7.5, 0.46)
	pt3dadd(-20.77, 90.91, -7.5, 0.56)
	pt3dadd(-21.28, 91.47, -7.5, 0.56)
	pt3dadd(-22.04, 91.98, -7.5, 0.77)
	pt3dadd(-22.56, 92.55, -7.5, 0.67)
	pt3dadd(-23.12, 93.11, -7.5, 0.41)
	pt3dadd(-23.48, 93.83, -7.5, 0.41)
	pt3dadd(-23.94, 94.49, -7.5, 0.67)
  }
}
proc shape3d_29() {
  dend[622] {	pt3dadd(-23.63, 95.31, -7.5, 0.51)
  }
  dend[623] {pt3dclear()
	pt3dadd(-11.92, 73.09, -7.25, 1.37)
	pt3dadd(-11.87, 71.92, -7.25, 0.72)
	pt3dadd(-11.3, 70.95, -7.25, 0.46)
	pt3dadd(-11.15, 69.93, -7.25, 0.41)
	pt3dadd(-10.94, 69.2, -7.25, 0.41)
	pt3dadd(-10.43, 68.44, -7.25, 0.41)
	pt3dadd(-9.77, 67.27, -7.25, 0.41)
	pt3dadd(-9.41, 66.59, -7, 0.51)
	pt3dadd(-8.85, 65.98, -7, 0.87)
	pt3dadd(-8.44, 65.12, -7, 0.67)
	pt3dadd(-7.98, 64.2, -7, 0.51)
	pt3dadd(-7.52, 63.58, -6.75, 0.51)
	pt3dadd(-6.9, 62.66, -6.75, 1.13)
	pt3dadd(-6.7, 61.64, -6.75, 0.87)
	pt3dadd(-6.34, 60.87, -6.75, 0.51)
	pt3dadd(-6.08, 60.26, -6.75, 0.41)
	pt3dadd(-5.73, 59.34, -6.75, 0.51)
	pt3dadd(-5.47, 58.37, -6.5, 0.61)
	pt3dadd(-5.37, 57.45, -6.5, 0.51)
	pt3dadd(-4.5, 56.93, -6.5, 0.51)
	pt3dadd(-4.09, 55.76, -6.5, 0.92)
  }
  dend[624] {pt3dclear()
	pt3dadd(-4.09, 55.76, -6.5, 0.92)
	pt3dadd(-3.32, 56.32, -6.5, 0.31)
	pt3dadd(-3.02, 56.88, -6.5, 0.31)
	pt3dadd(-2.61, 57.55, -6.5, 0.26)
	pt3dadd(-2.81, 58.37, -6.5, 0.36)
	pt3dadd(-2.86, 59.44, -6.5, 0.36)
  }
  dend[625] {pt3dclear()
	pt3dadd(-4.09, 55.76, -6.5, 0.92)
	pt3dadd(-4.34, 54.89, -6.5, 0.61)
	pt3dadd(-4.8, 54.33, -6.5, 0.46)
	pt3dadd(-5.11, 53.61, -6.5, 0.36)
	pt3dadd(-5.78, 53.05, -6.5, 0.41)
	pt3dadd(-6.49, 52.74, -6.5, 0.41)
	pt3dadd(-7.06, 51.72, -6.5, 0.41)
	pt3dadd(-7.62, 51.05, -6.5, 0.26)
	pt3dadd(-8.18, 50.59, -6.5, 0.26)
  }
  dend[626] {pt3dclear()
	pt3dadd(-8.18, 50.59, -6.5, 0.26)
	pt3dadd(-8.02, 49.52, -6.5, 0.26)
	pt3dadd(-7.93, 48.49, -6.5, 0.26)
	pt3dadd(-8.13, 47.37, -6.5, 0.26)
	pt3dadd(-8.02, 46.65, -6.5, 0.15)
	pt3dadd(-8.13, 45.37, -6.5, 0.15)
	pt3dadd(-8.08, 44.4, -6.5, 0.15)
	pt3dadd(-8.27, 43.48, -6.5, 0.15)
	pt3dadd(-8.39, 42.71, -6.5, 0.15)
	pt3dadd(-8.85, 41.84, -6.5, 0.15)
	pt3dadd(-9.1, 39.9, -6.5, 0.15)
	pt3dadd(-9.21, 38.26, -6.5, 0.15)
	pt3dadd(-8.49, 36.47, -6.5, 0.15)
  }
  dend[627] {pt3dclear()
	pt3dadd(-8.18, 50.59, -6.5, 0.26)
	pt3dadd(-9.15, 50.39, -6.5, 0.36)
	pt3dadd(-9.92, 49.77, -6.5, 0.36)
	pt3dadd(-10.84, 49.31, -6.5, 0.56)
  }
  dend[628] {pt3dclear()
	pt3dadd(-10.84, 49.31, -6.5, 0.56)
	pt3dadd(-12.07, 50.08, -6.5, 0.36)
	pt3dadd(-13.04, 50.9, -6.5, 0.36)
	pt3dadd(-13.76, 52.13, -6.5, 0.51)
	pt3dadd(-13.76, 53.76, -6.5, 0.61)
	pt3dadd(-14.06, 54.89, -6.5, 0.61)
	pt3dadd(-14.37, 55.96, -6.5, 0.56)
	pt3dadd(-14.83, 56.93, -6.5, 0.51)
	pt3dadd(-14.99, 57.55, -6.5, 0.51)
	pt3dadd(-15.5, 58.01, -6.5, 0.41)
	pt3dadd(-15.5, 59.13, -6.5, 0.31)
	pt3dadd(-15.96, 60.92, -6.5, 0.18)
  }
  dend[629] {pt3dclear()
	pt3dadd(-10.84, 49.31, -6.5, 0.56)
	pt3dadd(-11.05, 48.54, -6.5, 0.31)
	pt3dadd(-11.4, 47.62, -6.5, 0.41)
	pt3dadd(-11.92, 46.75, -6.5, 0.51)
	pt3dadd(-12.33, 45.83, -6.5, 0.36)
	pt3dadd(-12.73, 44.96, -6.75, 0.36)
	pt3dadd(-13.2, 44.25, -6.75, 0.51)
	pt3dadd(-13.45, 43.02, -6.75, 0.46)
	pt3dadd(-13.55, 42.1, -6.75, 0.36)
	pt3dadd(-13.81, 41.13, -6.75, 0.31)
	pt3dadd(-13.66, 39.49, -6.75, 0.31)
  }
  dend[630] {pt3dclear()
	pt3dadd(-1.71, 50.19, -6.5, 2.74)
	pt3dadd(-0.09, 48.94, -6.5, 1.56)
	pt3dadd(1.4, 47.44, -6.5, 1)
	pt3dadd(2.15, 46.7, -6.5, 1.18)
	pt3dadd(2.63, 46.1, -6.5, 1.18)
  }
  dend[631] {pt3dclear()
	pt3dadd(2.63, 46.1, -6.5, 1.18)
	pt3dadd(3.83, 44.64, -6.5, 1.43)
	pt3dadd(3.9, 44.45, -6.5, 1.87)
	pt3dadd(3.9, 44.14, -6.5, 1.87)
  }
  dend[632] {pt3dclear()
	pt3dadd(3.9, 44.14, -6.5, 1.87)
	pt3dadd(4.19, 41.54, -6.5, 1.31)
  }
  dend[633] {pt3dclear()
	pt3dadd(4.19, 41.54, -6.5, 1.31)
	pt3dadd(4.01, 43.08, -6.5, 1.31)
	pt3dadd(3.83, 41.58, -6.5, 0.94)
	pt3dadd(4.01, 40.96, -6.5, 0.62)
	pt3dadd(4.15, 40.03, -6.5, 0.56)
	pt3dadd(4.4, 38.97, -6.5, 0.56)
	pt3dadd(4.58, 37.72, -6.5, 0.56)
	pt3dadd(4.58, 36.47, -6.5, 0.56)
	pt3dadd(4.63, 35.6, -6.5, 0.56)
	pt3dadd(4.88, 34.47, -6.25, 1.12)
	pt3dadd(5.25, 33.2, -6.25, 1.12)
  }
  dend[634] {pt3dclear()
	pt3dadd(5.25, 33.2, -6.25, 1.12)
	pt3dadd(5.58, 31.98, -6, 0.36)
	pt3dadd(5.63, 30.86, -6, 0.36)
	pt3dadd(5.94, 29.83, -6, 0.36)
	pt3dadd(5.99, 28.66, -6, 0.41)
	pt3dadd(5.83, 27.74, -6, 0.67)
	pt3dadd(5.68, 27.02, -6, 0.67)
  }
  dend[635] {pt3dclear()
	pt3dadd(5.68, 27.02, -6, 0.67)
	pt3dadd(6.42, 25.91, -6, 0.67)
  }
  dend[636] {pt3dclear()
	pt3dadd(6.42, 25.91, -6, 0.67)
	pt3dadd(6.09, 26.41, -6, 0.67)
	pt3dadd(6.6, 25.94, -6, 0.46)
	pt3dadd(7.11, 25.43, -6, 0.46)
	pt3dadd(7.37, 24.87, -6, 0.46)
	pt3dadd(7.68, 24.51, -6, 0.46)
	pt3dadd(7.93, 23.95, -6, 0.46)
	pt3dadd(8.55, 23.18, -5.75, 0.46)
	pt3dadd(8.9, 22.52, -5.75, 0.46)
	pt3dadd(9.16, 22.06, -5.75, 0.46)
	pt3dadd(9.52, 21.7, -5.75, 0.46)
	pt3dadd(9.93, 21.24, -5.75, 0.46)
	pt3dadd(10.44, 20.83, -5.75, 0.61)
	pt3dadd(10.59, 20.05, -5.75, 0.77)
	pt3dadd(10.69, 19.6, -5.75, 0.77)
	pt3dadd(10.85, 18.78, -5.75, 0.72)
	pt3dadd(11.1, 18.07, -5.5, 0.56)
  }
  dend[637] {pt3dclear()
	pt3dadd(6.42, 25.91, -6, 0.67)
	pt3dadd(4.86, 26.76, -6, 0.61)
	pt3dadd(4.15, 26.97, -6, 0.56)
	pt3dadd(3.28, 27.53, -6, 0.56)
	pt3dadd(2.25, 28.04, -6, 0.61)
	pt3dadd(1.23, 28.35, -6, 0.82)
	pt3dadd(0.92, 28.86, -6, 0.61)
	pt3dadd(0.62, 29.68, -6, 0.41)
	pt3dadd(0.41, 30.34, -6, 0.41)
	pt3dadd(0.26, 31.21, -6, 0.41)
	pt3dadd(0, 31.57, -6, 0.41)
	pt3dadd(-0.41, 32.29, -6, 0.41)
	pt3dadd(-0.61, 32.7, -6, 0.41)
	pt3dadd(-0.82, 33.46, -6, 0.41)
	pt3dadd(-1.33, 33.97, -6, 0.41)
	pt3dadd(-1.53, 34.44, -6, 0.41)
	pt3dadd(-1.79, 35, -6, 0.41)
	pt3dadd(-2.15, 35.72, -6, 0.51)
	pt3dadd(-2.61, 36.47, -6, 0.51)
	pt3dadd(-2.81, 37.2, -6, 0.41)
	pt3dadd(-3.17, 38.11, -6, 0.41)
	pt3dadd(-3.58, 39.19, -5.75, 0.51)
	pt3dadd(-3.83, 40.01, -5.75, 0.51)
	pt3dadd(-4.29, 40.68, -5.75, 0.51)
	pt3dadd(-4.5, 41.29, -5.5, 0.46)
	pt3dadd(-4.55, 41.75, -5.5, 0.46)
	pt3dadd(-4.55, 42.88, -5.5, 0.46)
	pt3dadd(-4.59, 43.8, -5.5, 0.51)
	pt3dadd(-5.11, 44.26, -5.5, 0.77)
	pt3dadd(-5.62, 44.67, -5.5, 0.61)
	pt3dadd(-5.88, 45.43, -5.5, 0.61)
	pt3dadd(-6.14, 45.89, -5.5, 0.61)
  }
  dend[638] {pt3dclear()
	pt3dadd(5.68, 27.02, -6, 0.67)
	pt3dadd(5.37, 25.94, -5.75, 0.67)
	pt3dadd(5.32, 25.18, -5.75, 0.61)
	pt3dadd(5.12, 24.26, -5.75, 0.61)
	pt3dadd(4.71, 23.54, -5.75, 0.61)
	pt3dadd(4.04, 23.23, -5.75, 0.61)
	pt3dadd(3.53, 22.82, -5.75, 0.61)
	pt3dadd(3.38, 22.11, -5.75, 0.61)
	pt3dadd(3.48, 21.44, -5.75, 0.61)
	pt3dadd(4.2, 21.39, -5.5, 0.51)
	pt3dadd(4.86, 21.08, -5.5, 0.51)
	pt3dadd(5.32, 20.47, -5.5, 0.51)
	pt3dadd(5.32, 19.29, -5.25, 0.51)
	pt3dadd(5.53, 18.42, -5.25, 0.51)
	pt3dadd(5.78, 17.66, -5.25, 0.51)
	pt3dadd(5.99, 16.84, -5.25, 0.51)
	pt3dadd(6.19, 15.92, -5.25, 0.51)
	pt3dadd(6.7, 15.71, -5, 0.36)
	pt3dadd(7.22, 15.41, -5, 0.36)
	pt3dadd(7.32, 14.79, -4.75, 0.18)
	pt3dadd(7.42, 14.33, -4.75, 0.18)
	pt3dadd(7.78, 13.92, -4.75, 0.18)
	pt3dadd(7.63, 13.16, -4.5, 0.26)
	pt3dadd(7.73, 12.85, -4.5, 0.41)
	pt3dadd(7.78, 12.29, -4.25, 0.36)
  }
  dend[639] {pt3dclear()
	pt3dadd(5.25, 33.2, -6.25, 1.12)
	pt3dadd(5.9, 32.94, -6.25, 0.51)
	pt3dadd(6.47, 32.22, -6.25, 0.41)
	pt3dadd(6.83, 31.81, -6.25, 0.41)
	pt3dadd(7.44, 30.99, -6, 0.41)
	pt3dadd(7.8, 30.48, -6, 0.41)
	pt3dadd(7.95, 30.02, -6, 0.41)
	pt3dadd(8.05, 29.66, -6, 0.41)
	pt3dadd(8.21, 29.25, -6, 0.41)
	pt3dadd(8.67, 28.74, -6, 0.41)
	pt3dadd(8.82, 28.44, -6, 0.41)
	pt3dadd(9.13, 28.18, -6, 0.41)
	pt3dadd(9.27, 27.92, -6, 0.41)
	pt3dadd(9.43, 27.31, -6, 0.41)
	pt3dadd(9.49, 26.75, -6, 0.41)
	pt3dadd(9.64, 25.98, -6, 0.41)
	pt3dadd(9.74, 25.26, -6, 0.41)
  }
  dend[640] {pt3dclear()
	pt3dadd(4.19, 41.54, -6.5, 1.31)
  }
}
proc shape3d_30() {
  dend[640] {	pt3dadd(4.63, 42.87, -6.5, 0.72)
	pt3dadd(5, 41.89, -6.5, 0.61)
	pt3dadd(5.46, 41.08, -6.5, 0.56)
	pt3dadd(5.87, 40.51, -6.5, 0.56)
	pt3dadd(6.48, 39.69, -6.5, 0.51)
	pt3dadd(6.89, 38.97, -6.5, 0.46)
	pt3dadd(7.2, 38.31, -6.5, 0.41)
	pt3dadd(7.5, 37.44, -6.5, 0.36)
	pt3dadd(7.71, 36.72, -6.5, 0.36)
	pt3dadd(8.07, 35.54, -6.5, 0.36)
	pt3dadd(8.36, 34.83, -6.25, 0.36)
	pt3dadd(8.49, 34.35, -6.25, 0.36)
  }
  dend[641] {pt3dclear()
	pt3dadd(8.49, 34.35, -6.25, 0.36)
	pt3dadd(8.63, 33.81, -6.25, 0.41)
	pt3dadd(8.89, 32.94, -6.25, 0.46)
	pt3dadd(9.4, 31.92, -6.25, 0.46)
	pt3dadd(9.86, 30.64, -6.25, 0.46)
	pt3dadd(10.37, 29.87, -6.25, 0.46)
	pt3dadd(10.78, 28.95, -6.25, 0.36)
	pt3dadd(11.34, 27.98, -6, 0.36)
	pt3dadd(11.67, 27.21, -6, 0.36)
  }
  dend[642] {pt3dclear()
	pt3dadd(11.67, 27.21, -6, 0.36)
	pt3dadd(11.85, 26.85, -6, 0.36)
	pt3dadd(12.47, 25.37, -6, 0.36)
	pt3dadd(13.03, 24.55, -6, 0.72)
	pt3dadd(13.39, 24.19, -6, 0.72)
  }
  dend[643] {pt3dclear()
	pt3dadd(13.39, 24.19, -6, 0.72)
	pt3dadd(13.64, 23.94, -6, 0.72)
	pt3dadd(14.46, 23.58, -6, 0.51)
	pt3dadd(15.28, 23.02, -6, 0.51)
	pt3dadd(16.1, 22.25, -6, 0.51)
	pt3dadd(16.87, 21.74, -6, 0.51)
	pt3dadd(17.73, 20.87, -6, 0.51)
	pt3dadd(17.97, 20.51, -6, 0.51)
  }
  dend[644] {pt3dclear()
	pt3dadd(17.97, 20.51, -6, 0.51)
	pt3dadd(18.25, 20.05, -6, 0.51)
	pt3dadd(18.8, 19.32, -5.75, 0.46)
	pt3dadd(19.48, 18.57, -5.75, 0.41)
	pt3dadd(19.88, 18, -5.75, 0.46)
	pt3dadd(20.34, 17.13, -5.75, 0.46)
	pt3dadd(20.91, 16.21, -5.75, 0.82)
	pt3dadd(21.01, 15.19, -5.5, 0.67)
	pt3dadd(21.32, 13.76, -5.5, 0.61)
	pt3dadd(22.03, 12.33, -5.5, 0.61)
	pt3dadd(22.8, 11.3, -5.25, 0.46)
	pt3dadd(23.62, 9.77, -5.25, 0.46)
	pt3dadd(24.28, 9.1, -5.25, 0.46)
	pt3dadd(25, 7.93, -5, 0.46)
	pt3dadd(25.77, 7.01, -5, 0.31)
	pt3dadd(26.79, 5.88, -4.75, 0.31)
	pt3dadd(27.76, 4.59, -4.5, 0.31)
	pt3dadd(29.14, 3.48, -4.5, 0.31)
	pt3dadd(30.12, 2.76, -4.5, 0.31)
	pt3dadd(31.19, 2.1, -4.5, 0.31)
	pt3dadd(32.21, 1.38, -4.25, 0.31)
	pt3dadd(33.85, 0.36, -4.25, 0.31)
  }
  dend[645] {pt3dclear()
	pt3dadd(17.97, 20.51, -6, 0.51)
	pt3dadd(19.13, 20.47, -6, 0.46)
	pt3dadd(19.75, 20.32, -6, 0.46)
	pt3dadd(20.26, 19.86, -6, 0.61)
	pt3dadd(20.93, 19.64, -6, 0.61)
	pt3dadd(21.39, 19.29, -6, 0.61)
	pt3dadd(21.74, 18.98, -6, 0.61)
	pt3dadd(22.46, 18.73, -5.75, 0.61)
	pt3dadd(23.07, 18.42, -5.75, 0.61)
	pt3dadd(23.74, 18.27, -5.5, 0.61)
	pt3dadd(24.4, 18.27, -5.25, 0.51)
	pt3dadd(25.12, 18.17, -5.25, 0.51)
	pt3dadd(25.78, 18.27, -5, 0.51)
  }
  dend[646] {pt3dclear()
	pt3dadd(13.39, 24.19, -6, 0.72)
	pt3dadd(13.46, 23.39, -6, 0.41)
	pt3dadd(13.46, 22.42, -6, 0.41)
	pt3dadd(13.61, 21.7, -6, 0.41)
	pt3dadd(13.66, 20.93, -6, 0.41)
	pt3dadd(13.51, 19.96, -6, 0.41)
	pt3dadd(13.35, 18.98, -6, 0.41)
	pt3dadd(13.15, 18.42, -6, 0.36)
	pt3dadd(12.89, 17.8, -6, 0.36)
	pt3dadd(12.54, 16.98, -6, 0.36)
	pt3dadd(11.97, 16.32, -6, 0.46)
	pt3dadd(11.51, 15.76, -6, 0.46)
	pt3dadd(11, 15.66, -6, 0.41)
	pt3dadd(10.08, 15.66, -6.25, 0.36)
	pt3dadd(10.1, 15.55, -6.25, 0.46)
  }
  dend[647] {pt3dclear()
	pt3dadd(10.1, 15.55, -6.25, 0.46)
	pt3dadd(10.15, 14.88, -6.25, 0.46)
	pt3dadd(10.05, 14.32, -6.25, 0.31)
	pt3dadd(10.35, 13.35, -6.25, 0.31)
	pt3dadd(10.51, 12.27, -6.25, 0.31)
	pt3dadd(10.56, 11.45, -6.25, 0.31)
	pt3dadd(10.46, 10.53, -6.25, 0.31)
	pt3dadd(10.71, 9.97, -6.25, 0.31)
	pt3dadd(11.17, 8.9, -6.25, 0.31)
	pt3dadd(11.12, 7.67, -6.25, 0.31)
	pt3dadd(10.87, 6.95, -6.25, 0.31)
	pt3dadd(10.71, 6.39, -6.25, 0.31)
  }
  dend[648] {pt3dclear()
	pt3dadd(10.1, 15.55, -6.25, 0.46)
	pt3dadd(9.49, 16.21, -6.25, 0.36)
	pt3dadd(8.56, 16.98, -6.25, 0.41)
	pt3dadd(7.44, 17.69, -6.25, 0.36)
	pt3dadd(7.18, 18.82, -6.5, 0.36)
	pt3dadd(6.42, 19.48, -6.5, 0.46)
	pt3dadd(6.21, 20.56, -6.5, 0.56)
	pt3dadd(6.42, 21.58, -6.5, 0.56)
  }
  dend[649] {pt3dclear()
	pt3dadd(6.42, 21.58, -6.5, 0.56)
	pt3dadd(6.42, 21.89, -6.5, 0.77)
	pt3dadd(6.97, 21.85, -6.5, 0.77)
  }
  dend[650] {pt3dclear()
	pt3dadd(6.97, 21.85, -6.5, 0.77)
	pt3dadd(7.34, 21.84, -6.5, 0.46)
	pt3dadd(8.26, 21.38, -6.5, 0.46)
	pt3dadd(8.82, 20.76, -6.5, 0.46)
	pt3dadd(9.69, 19.89, -6.5, 0.46)
	pt3dadd(10.76, 19.54, -6.5, 0.46)
	pt3dadd(11.79, 19.79, -6.5, 0.46)
	pt3dadd(12.3, 20.46, -6.5, 0.41)
  }
  dend[651] {pt3dclear()
	pt3dadd(6.97, 21.85, -6.5, 0.77)
	pt3dadd(6.47, 22.71, -6.5, 0.41)
	pt3dadd(6.47, 23.58, -6.5, 0.41)
	pt3dadd(6.47, 25.11, -6.5, 0.41)
	pt3dadd(6.42, 26.03, -6.5, 0.72)
	pt3dadd(6.52, 27.41, -6.75, 0.46)
	pt3dadd(6.47, 28.64, -6.75, 0.46)
	pt3dadd(5.9, 30.23, -6.75, 0.82)
  }
  dend[652] {pt3dclear()
	pt3dadd(6.42, 21.58, -6.5, 0.56)
	pt3dadd(5.6, 22.14, -6.5, 0.51)
	pt3dadd(4.98, 22.71, -6.5, 0.31)
	pt3dadd(4.51, 23.17, -6.5, 0.31)
	pt3dadd(4.17, 23.37, -6.5, 0.31)
	pt3dadd(4.17, 23.78, -6.5, 0.31)
	pt3dadd(4.01, 24.04, -6.5, 0.31)
	pt3dadd(3.45, 24.04, -6.5, 0.31)
	pt3dadd(2.84, 24.6, -6.5, 0.46)
	pt3dadd(2.52, 25.26, -6.5, 0.56)
	pt3dadd(2.25, 25.37, -6.5, 0.56)
  }
  dend[653] {pt3dclear()
	pt3dadd(2.25, 25.37, -6.5, 0.56)
	pt3dadd(1.71, 25.47, -6.75, 0.56)
	pt3dadd(0.79, 25.52, -6.75, 0.56)
  }
  dend[654] {pt3dclear()
	pt3dadd(2.25, 25.37, -6.5, 0.56)
	pt3dadd(2.37, 26.34, -4.75, 0.46)
	pt3dadd(2.48, 27.16, -4.75, 0.46)
	pt3dadd(2.52, 28.18, -4.75, 0.46)
	pt3dadd(2.63, 28.74, -4.75, 0.46)
	pt3dadd(2.84, 29.25, -4.75, 0.46)
	pt3dadd(3.3, 29.87, -4.75, 0.46)
	pt3dadd(3.55, 30.28, -4.75, 0.46)
	pt3dadd(3.96, 30.79, -4.75, 0.46)
	pt3dadd(4.57, 30.89, -4.75, 0.46)
	pt3dadd(4.83, 31.25, -4.75, 0.46)
	pt3dadd(4.83, 31.91, -4.75, 0.46)
	pt3dadd(4.68, 32.72, -4.75, 0.46)
	pt3dadd(4.51, 33.6, -4.75, 0.46)
	pt3dadd(4.51, 34.36, -4.75, 0.46)
	pt3dadd(4.47, 34.83, -4.75, 0.46)
	pt3dadd(4.51, 35.19, -4.75, 0.46)
	pt3dadd(4.47, 36.06, -4.75, 0.46)
	pt3dadd(4.57, 36.67, -4.75, 0.46)
	pt3dadd(4.51, 37.34, -4.75, 0.46)
	pt3dadd(5.09, 37.69, -5, 0.31)
  }
  dend[655] {pt3dclear()
	pt3dadd(5.09, 37.69, -5, 0.31)
	pt3dadd(6.01, 37.03, -4.75, 0.31)
	pt3dadd(6.26, 36.42, -4.75, 0.56)
	pt3dadd(6.36, 35.29, -4.75, 0.56)
  }
  dend[656] {pt3dclear()
	pt3dadd(5.09, 37.69, -5, 0.31)
	pt3dadd(4.73, 38.51, -5, 0.46)
	pt3dadd(4.57, 39.38, -5, 0.46)
	pt3dadd(4.26, 40.51, -5, 0.46)
	pt3dadd(3.76, 41.48, -5, 0.46)
	pt3dadd(3.7, 42.76, -5.25, 0.46)
	pt3dadd(3.19, 43.17, -5.25, 0.46)
	pt3dadd(2.48, 43.63, -5.5, 0.46)
	pt3dadd(1.97, 44.04, -5.5, 0.46)
	pt3dadd(1.51, 44.86, -5.5, 0.46)
	pt3dadd(1.25, 45.27, -5.5, 0.46)
	pt3dadd(0.94, 45.73, -5.5, 0.46)
	pt3dadd(0.28, 46.19, -5.5, 0.46)
	pt3dadd(-0.23, 46.9, -5.75, 0.46)
	pt3dadd(-0.69, 47.21, -5.75, 0.46)
	pt3dadd(-1.14, 47.72, -5.75, 0.46)
	pt3dadd(-1.51, 48.23, -5.75, 0.46)
	pt3dadd(-1.72, 48.74, -5.75, 0.46)
	pt3dadd(-2.13, 49.46, -5.75, 0.46)
	pt3dadd(-2.43, 49.87, -5.75, 0.46)
	pt3dadd(-2.79, 50.33, -5.75, 0.51)
  }
  dend[657] {pt3dclear()
	pt3dadd(11.67, 27.21, -6, 0.36)
	pt3dadd(12.25, 27.16, -5.75, 0.31)
	pt3dadd(12.66, 27.16, -5.75, 0.31)
	pt3dadd(13.12, 27.21, -5.75, 0.31)
	pt3dadd(13.63, 26.95, -5.5, 0.31)
	pt3dadd(14.24, 26.75, -5.5, 0.31)
	pt3dadd(14.55, 26.65, -5.5, 0.31)
	pt3dadd(15.06, 26.44, -5.5, 0.51)
	pt3dadd(15.32, 26.19, -5.5, 0.51)
	pt3dadd(15.83, 25.93, -5.5, 0.46)
	pt3dadd(16.14, 25.72, -5.5, 0.46)
  }
  dend[658] {pt3dclear()
	pt3dadd(8.49, 34.35, -6.25, 0.36)
	pt3dadd(9.08, 34.72, -6.25, 0.46)
	pt3dadd(9.43, 35.29, -6.25, 0.41)
	pt3dadd(9.84, 35.79, -6.25, 0.41)
	pt3dadd(10.35, 36.21, -6.25, 0.61)
	pt3dadd(10.46, 35.75, -6.25, 0.51)
  }
}
proc shape3d_31() {
  dend[658] {	pt3dadd(10.56, 35.14, -6.25, 0.51)
	pt3dadd(10.87, 34.83, -6.25, 0.51)
	pt3dadd(11.12, 34.63, -6.25, 0.51)
	pt3dadd(11.22, 34.22, -6.25, 0.51)
  }
  dend[659] {pt3dclear()
	pt3dadd(3.9, 44.14, -6.5, 1.87)
	pt3dadd(5.05, 44.55, -6.75, 0.97)
	pt3dadd(6.53, 44.45, -6.5, 0.46)
	pt3dadd(8.22, 43.99, -6.5, 0.67)
	pt3dadd(9.96, 43.27, -6.5, 0.87)
	pt3dadd(11.5, 43.17, -6.5, 0.87)
	pt3dadd(12.83, 42.66, -6.5, 0.72)
	pt3dadd(14.21, 42.2, -6.5, 0.82)
	pt3dadd(15.54, 41.59, -6.5, 0.82)
	pt3dadd(16.3, 41.26, -6.5, 1.33)
	pt3dadd(17.36, 40.96, -6.5, 1.33)
  }
  dend[660] {pt3dclear()
	pt3dadd(17.36, 40.96, -6.5, 1.33)
	pt3dadd(18.19, 41.71, -6.5, 0.82)
	pt3dadd(18.14, 42.83, -6.5, 0.61)
	pt3dadd(18.14, 43.65, -6.5, 0.61)
	pt3dadd(18.14, 44.37, -6.5, 0.61)
	pt3dadd(18.04, 44.98, -6.5, 0.61)
	pt3dadd(17.82, 45.9, -6.5, 0.51)
	pt3dadd(17.63, 47.44, -6.5, 0.46)
	pt3dadd(17.37, 48.05, -6.5, 0.46)
	pt3dadd(16.96, 48.87, -6.5, 1.13)
  }
  dend[661] {pt3dclear()
	pt3dadd(16.96, 48.87, -6.5, 1.13)
	pt3dadd(17.42, 49.43, -6.5, 0.56)
	pt3dadd(17.78, 50, -6.5, 0.56)
	pt3dadd(18.14, 50.61, -6.25, 0.56)
	pt3dadd(18.64, 51.02, -6.25, 0.56)
	pt3dadd(19.21, 51.68, -6.25, 0.56)
	pt3dadd(19.73, 52.4, -6.25, 0.56)
	pt3dadd(20.29, 52.71, -6.25, 0.56)
	pt3dadd(20.95, 52.91, -6, 0.56)
	pt3dadd(21.93, 53.17, -6, 0.56)
	pt3dadd(22.28, 53.58, -6, 0.56)
	pt3dadd(22.54, 53.88, -6, 0.56)
	pt3dadd(22.79, 54.55, -5.75, 0.56)
	pt3dadd(23.15, 54.91, -5.75, 0.56)
  }
  dend[662] {pt3dclear()
	pt3dadd(16.96, 48.87, -6.5, 1.13)
	pt3dadd(16.35, 49.28, -6.5, 0.56)
	pt3dadd(15.89, 50, -6.25, 0.56)
	pt3dadd(15.74, 50.51, -6.25, 0.56)
	pt3dadd(15.84, 51.53, -6.25, 0.36)
	pt3dadd(15.84, 52.09, -6.25, 0.36)
	pt3dadd(16.2, 52.76, -6.25, 0.36)
	pt3dadd(16.14, 53.17, -6.25, 0.36)
	pt3dadd(16.25, 53.63, -6.25, 0.36)
	pt3dadd(16.2, 54.19, -6.25, 0.36)
	pt3dadd(16.2, 54.55, -6.25, 0.36)
	pt3dadd(16.2, 55.32, -6.25, 0.46)
	pt3dadd(16.2, 55.78, -6.25, 0.46)
	pt3dadd(16.14, 56.29, -6.25, 0.61)
  }
  dend[663] {pt3dclear()
	pt3dadd(17.36, 40.96, -6.5, 1.33)
	pt3dadd(18.04, 40.82, -6.5, 1.64)
  }
  dend[664] {pt3dclear()
	pt3dadd(18.04, 40.82, -6.5, 1.64)
	pt3dadd(18.86, 40.92, -6.5, 1.13)
	pt3dadd(19.68, 40.97, -6.25, 0.72)
	pt3dadd(20.6, 41.13, -6.25, 0.72)
	pt3dadd(21.32, 41.59, -6.25, 0.72)
	pt3dadd(21.98, 42.05, -6.25, 0.72)
	pt3dadd(22.72, 42.21, -6.25, 0.72)
  }
  dend[665] {pt3dclear()
	pt3dadd(22.72, 42.21, -6.25, 0.72)
	pt3dadd(23.21, 42.2, -6, 0.72)
	pt3dadd(24.39, 42.2, -6, 0.67)
	pt3dadd(25.03, 41.96, -6, 0.67)
  }
  dend[666] {pt3dclear()
	pt3dadd(25.03, 41.96, -6, 0.67)
	pt3dadd(25.35, 41.79, -5.75, 0.67)
	pt3dadd(26.02, 40.97, -5.75, 0.67)
	pt3dadd(26.74, 40.31, -5.75, 0.67)
	pt3dadd(26.96, 40.15, -5.75, 0.67)
  }
  dend[667] {pt3dclear()
	pt3dadd(26.96, 40.15, -5.75, 0.67)
	pt3dadd(27.46, 39.59, -5.75, 0.67)
	pt3dadd(28.22, 38.57, -5.75, 0.67)
	pt3dadd(28.84, 37.6, -5.75, 0.67)
	pt3dadd(29.25, 36.68, -5.75, 0.82)
	pt3dadd(29.76, 35.5, -5.75, 0.72)
	pt3dadd(30.27, 34.72, -5.75, 0.72)
	pt3dadd(30.27, 33.25, -5.75, 0.82)
	pt3dadd(30.27, 31.97, -5.75, 0.82)
	pt3dadd(29.81, 31.25, -6, 0.56)
	pt3dadd(29.55, 30.23, -6, 0.56)
	pt3dadd(29.3, 29.51, -6, 0.56)
	pt3dadd(29.5, 28.49, -6, 0.67)
	pt3dadd(30.27, 27.72, -6, 0.67)
	pt3dadd(30.83, 27.06, -6, 0.46)
	pt3dadd(31.39, 25.88, -6, 0.46)
	pt3dadd(32.06, 25.06, -6, 0.46)
  }
  dend[668] {pt3dclear()
	pt3dadd(26.96, 40.15, -5.75, 0.67)
	pt3dadd(27.88, 40.22, -5.75, 0.51)
	pt3dadd(28.65, 40.27, -5.75, 0.46)
	pt3dadd(29.57, 40.42, -5.75, 0.46)
	pt3dadd(30.34, 40.42, -5.75, 0.46)
	pt3dadd(31.16, 40.36, -5.75, 0.46)
	pt3dadd(31.87, 40.83, -5.75, 0.46)
	pt3dadd(32.54, 41.24, -5.5, 0.56)
	pt3dadd(33.04, 41.34, -5.5, 0.51)
  }
  dend[669] {pt3dclear()
	pt3dadd(25.03, 41.96, -6, 0.67)
	pt3dadd(25.68, 42.37, -5.75, 0.36)
	pt3dadd(25.94, 42.83, -5.75, 0.26)
	pt3dadd(26.45, 43.13, -5.75, 0.26)
	pt3dadd(26.76, 43.34, -5.75, 0.26)
	pt3dadd(27.11, 43.59, -5.75, 0.26)
	pt3dadd(27.68, 43.95, -5.75, 0.41)
	pt3dadd(28.29, 44.26, -5.75, 0.41)
  }
  dend[670] {pt3dclear()
	pt3dadd(28.29, 44.26, -5.75, 0.41)
	pt3dadd(29.18, 43.88, -5.44, 0.51)
  }
  dend[671] {pt3dclear()
	pt3dadd(29.18, 43.88, -5.44, 0.51)
	pt3dadd(29.01, 43.95, -5.5, 0.51)
	pt3dadd(29.62, 43.64, -5.5, 0.51)
  }
  dend[672] {pt3dclear()
	pt3dadd(29.18, 43.88, -5.44, 0.51)
	pt3dadd(28.85, 44.82, -5.75, 0.41)
	pt3dadd(29.26, 45.08, -5.5, 0.36)
	pt3dadd(29.67, 45.54, -5.5, 0.36)
	pt3dadd(30.44, 46.1, -5.25, 0.46)
	pt3dadd(31.21, 46.05, -5.25, 0.46)
	pt3dadd(31.92, 45.95, -5.25, 0.46)
	pt3dadd(32.49, 45.84, -5.25, 0.36)
	pt3dadd(33.04, 45.59, -5, 0.41)
	pt3dadd(33.61, 45.38, -5, 0.41)
	pt3dadd(34.33, 45.23, -5, 0.41)
  }
  dend[673] {pt3dclear()
	pt3dadd(28.29, 44.26, -5.75, 0.41)
	pt3dadd(28.14, 44.92, -5.75, 0.46)
	pt3dadd(28.24, 45.89, -5.5, 0.46)
	pt3dadd(28.24, 46.82, -5.5, 0.46)
	pt3dadd(28.24, 47.63, -5.5, 0.46)
	pt3dadd(28.44, 48.45, -5.5, 0.56)
	pt3dadd(28.7, 49.22, -5.5, 0.56)
	pt3dadd(28.91, 50.19, -5.25, 0.51)
	pt3dadd(29.11, 50.91, -5.25, 0.51)
	pt3dadd(29.31, 51.93, -5.25, 0.51)
	pt3dadd(29.37, 52.7, -5.25, 0.51)
	pt3dadd(29.42, 53.31, -5.25, 0.51)
	pt3dadd(29.67, 53.98, -5.5, 0.36)
	pt3dadd(29.67, 54.8, -5.5, 0.41)
	pt3dadd(29.67, 55.46, -5.5, 0.46)
	pt3dadd(29.57, 56.18, -5.5, 0.51)
	pt3dadd(29.52, 57, -5.5, 0.51)
	pt3dadd(29.67, 57.71, -5.5, 0.51)
	pt3dadd(29.77, 58.12, -5.5, 0.51)
  }
  dend[674] {pt3dclear()
	pt3dadd(22.72, 42.21, -6.25, 0.72)
	pt3dadd(22.97, 42.67, -6, 0.41)
	pt3dadd(22.92, 43.39, -6, 0.31)
	pt3dadd(22.87, 44.16, -6, 0.31)
	pt3dadd(23.02, 44.82, -6, 0.31)
	pt3dadd(23.07, 45.74, -6, 0.51)
	pt3dadd(23.16, 46.26, -6, 0.51)
  }
  dend[675] {pt3dclear()
	pt3dadd(23.16, 46.26, -6, 0.51)
	pt3dadd(23.18, 46.51, -6, 0.51)
	pt3dadd(23.18, 47.28, -6, 0.41)
	pt3dadd(23.12, 47.74, -6, 0.41)
	pt3dadd(23.23, 48.35, -6, 0.41)
	pt3dadd(23.64, 48.86, -6, 0.36)
	pt3dadd(24.25, 49.07, -6, 0.36)
  }
  dend[676] {pt3dclear()
	pt3dadd(23.16, 46.26, -6, 0.51)
	pt3dadd(23.79, 46.05, -6.25, 0.36)
	pt3dadd(23.99, 45.69, -6.25, 0.31)
	pt3dadd(24.35, 45.08, -6.25, 0.26)
	pt3dadd(24.45, 44.41, -6.25, 0.26)
	pt3dadd(24.61, 44.1, -6.25, 0.26)
	pt3dadd(25.12, 43.49, -6.25, 0.51)
	pt3dadd(25.43, 42.83, -6.5, 0.51)
	pt3dadd(25.94, 42.42, -6.5, 0.51)
	pt3dadd(26.25, 41.96, -6.5, 0.51)
	pt3dadd(26.55, 41.44, -6.5, 0.51)
	pt3dadd(26.65, 40.83, -6.5, 0.51)
	pt3dadd(27.01, 40.47, -6.5, 0.51)
	pt3dadd(27.42, 39.96, -6.5, 0.36)
	pt3dadd(27.58, 39.45, -6.5, 0.36)
	pt3dadd(27.93, 38.99, -6.5, 0.36)
  }
  dend[677] {pt3dclear()
	pt3dadd(18.04, 40.82, -6.5, 1.64)
	pt3dadd(18.29, 40.04, -6.5, 0.56)
  }
  dend[678] {pt3dclear()
	pt3dadd(18.29, 40.04, -6.5, 0.56)
	pt3dadd(20.57, 40.29, -6.5, 1.64)
	pt3dadd(17.37, 39.33, -6.5, 0.41)
	pt3dadd(17.82, 37.9, -6.5, 0.41)
	pt3dadd(17.88, 36.11, -6.5, 0.82)
  }
  dend[679] {pt3dclear()
	pt3dadd(17.88, 36.11, -6.5, 0.82)
	pt3dadd(16.86, 36.21, -6.5, 0.41)
	pt3dadd(15.48, 36.52, -6.5, 0.41)
	pt3dadd(14.82, 37.22, -6.5, 0.41)
	pt3dadd(13.84, 37.9, -6.5, 0.41)
	pt3dadd(13.74, 38.51, -6.5, 0.72)
	pt3dadd(12.92, 39.02, -6.5, 0.61)
	pt3dadd(12.1, 39.43, -6.5, 0.51)
	pt3dadd(11.24, 39.9, -6.5, 0.51)
  }
  dend[680] {pt3dclear()
	pt3dadd(11.24, 39.9, -6.5, 0.51)
	pt3dadd(11.03, 39.94, -6.5, 0.72)
	pt3dadd(9.85, 40.92, -6.5, 0.51)
	pt3dadd(8.52, 42.04, -6.5, 0.51)
  }
  dend[681] {pt3dclear()
	pt3dadd(11.24, 39.9, -6.5, 0.51)
	pt3dadd(10.76, 39.43, -6.25, 0.51)
	pt3dadd(10.46, 39.08, -6.25, 0.36)
	pt3dadd(10.92, 38.72, -6, 0.36)
	pt3dadd(11.33, 38.31, -6, 0.36)
	pt3dadd(11.79, 37.75, -5.75, 0.56)
	pt3dadd(11.94, 37.18, -5.75, 0.46)
	pt3dadd(12.09, 36.72, -5.75, 0.31)
	pt3dadd(12.25, 36.31, -5.75, 0.31)
	pt3dadd(12.5, 36.01, -5.75, 0.31)
  }
}
proc shape3d_32() {
  dend[681] {	pt3dadd(12.91, 35.39, -5.75, 0.31)
	pt3dadd(12.96, 34.97, -5.75, 0.31)
	pt3dadd(13.12, 34.63, -5.75, 0.31)
	pt3dadd(13.27, 34.11, -5.75, 0.31)
	pt3dadd(13.42, 33.96, -5.75, 0.31)
	pt3dadd(13.58, 33.7, -5.75, 0.31)
	pt3dadd(13.73, 33.54, -5.75, 0.31)
	pt3dadd(13.88, 33.29, -5.75, 0.31)
	pt3dadd(14.14, 32.84, -5.75, 0.31)
	pt3dadd(14.34, 32.53, -5.75, 0.31)
	pt3dadd(14.75, 32.17, -5.5, 0.31)
	pt3dadd(15.11, 31.76, -5.5, 0.31)
	pt3dadd(15.37, 31.56, -5.5, 0.31)
	pt3dadd(15.67, 31.1, -5.5, 0.31)
	pt3dadd(15.83, 30.64, -5.5, 0.31)
	pt3dadd(15.93, 30.33, -5.5, 0.31)
	pt3dadd(16.03, 29.92, -5.5, 0.31)
	pt3dadd(16.03, 29.51, -5.5, 0.31)
	pt3dadd(16.07, 29, -5.5, 0.31)
	pt3dadd(16.07, 28.28, -5.5, 0.31)
  }
  dend[682] {pt3dclear()
	pt3dadd(17.88, 36.11, -6.5, 0.82)
	pt3dadd(18.29, 35.49, -6.5, 0.51)
	pt3dadd(18.6, 35.19, -6.5, 0.31)
	pt3dadd(19.21, 34.27, -6.5, 0.31)
	pt3dadd(19.88, 33.86, -6.5, 0.41)
	pt3dadd(20.19, 32.68, -6.25, 0.61)
	pt3dadd(20.49, 32.07, -6.25, 0.72)
	pt3dadd(20.75, 30.63, -6.25, 0.82)
	pt3dadd(21.31, 30.02, -6.25, 0.92)
	pt3dadd(22.18, 29.15, -6, 0.72)
	pt3dadd(23.51, 28.08, -6.25, 0.72)
  }
  dend[683] {pt3dclear()
	pt3dadd(23.51, 28.08, -6.25, 0.72)
	pt3dadd(24.43, 27.97, -6, 0.61)
	pt3dadd(25.3, 27.31, -6, 0.61)
	pt3dadd(25.81, 26.85, -6, 0.61)
	pt3dadd(27.45, 25.26, -5.5, 0.61)
	pt3dadd(28.68, 23.88, -5.25, 0.61)
	pt3dadd(30.06, 23.52, -5.25, 0.51)
	pt3dadd(31.85, 23.01, -5.25, 0.72)
	pt3dadd(33.95, 23.52, -5.25, 0.56)
	pt3dadd(35.11, 23.58, -5.25, 0.56)
  }
  dend[684] {pt3dclear()
	pt3dadd(35.11, 23.58, -5.25, 0.56)
	pt3dadd(35.07, 25.42, -5, 0.51)
	pt3dadd(35.22, 27.72, -5, 0.51)
	pt3dadd(35.53, 29.46, -5, 0.61)
	pt3dadd(35.53, 30.33, -5, 0.61)
	pt3dadd(35.38, 31.91, -5, 0.46)
	pt3dadd(34.36, 33.45, -5, 0.36)
	pt3dadd(34.36, 34.36, -4.75, 0.46)
	pt3dadd(35.11, 35.24, -4.5, 0.46)
  }
  dend[685] {pt3dclear()
	pt3dadd(35.11, 23.58, -5.25, 0.56)
	pt3dadd(35.47, 22.6, -5, 0.46)
	pt3dadd(36.04, 22.19, -5, 0.46)
  }
  dend[686] {pt3dclear()
	pt3dadd(36.04, 22.19, -5, 0.46)
	pt3dadd(37.07, 22.91, -4.75, 0.46)
	pt3dadd(37.83, 23.52, -4.75, 0.46)
	pt3dadd(38.9, 23.37, -4.75, 0.46)
	pt3dadd(39.68, 22.76, -4.5, 0.36)
	pt3dadd(40.79, 22.14, -4.5, 0.31)
	pt3dadd(41.77, 22.19, -4.5, 0.31)
  }
  dend[687] {pt3dclear()
	pt3dadd(36.04, 22.19, -5, 0.46)
	pt3dadd(36.5, 21.17, -5, 0.41)
	pt3dadd(37.68, 19.94, -5, 0.41)
	pt3dadd(38.24, 18.97, -4.75, 0.41)
	pt3dadd(38.7, 17.48, -4.75, 0.41)
	pt3dadd(39.97, 16.21, -4.75, 0.41)
	pt3dadd(40.7, 15.54, -4.75, 0.41)
  }
  dend[688] {pt3dclear()
	pt3dadd(23.51, 28.08, -6.25, 0.72)
	pt3dadd(23.31, 27.05, -6.25, 0.46)
	pt3dadd(23.26, 25.72, -6.25, 0.56)
	pt3dadd(23.56, 24.34, -6.25, 0.72)
  }
  dend[689] {pt3dclear()
	pt3dadd(23.56, 24.34, -6.25, 0.72)
	pt3dadd(23.1, 23.32, -6, 0.46)
	pt3dadd(22.9, 22.55, -6, 0.46)
	pt3dadd(22.59, 21.78, -6, 0.67)
	pt3dadd(21.57, 22.09, -6, 0.56)
	pt3dadd(20.54, 22.45, -6, 0.51)
	pt3dadd(19.62, 23.06, -6.25, 0.51)
	pt3dadd(18.19, 23.83, -6.25, 0.41)
	pt3dadd(16.66, 24.44, -6.25, 0.41)
  }
  dend[690] {pt3dclear()
	pt3dadd(23.56, 24.34, -6.25, 0.72)
	pt3dadd(24.23, 23.42, -6, 0.41)
	pt3dadd(24.79, 22.25, -6, 0.36)
	pt3dadd(25.71, 21.73, -6, 0.36)
	pt3dadd(26.63, 21.89, -5.75, 0.46)
	pt3dadd(27.76, 21.89, -5.75, 0.46)
  }
  dend[691] {pt3dclear()
	pt3dadd(18.29, 40.04, -6.5, 0.56)
	pt3dadd(18.91, 39.22, -6.25, 0.36)
	pt3dadd(19.42, 38.21, -6.25, 0.36)
	pt3dadd(19.93, 37.22, -6.25, 0.46)
	pt3dadd(20.75, 36.01, -6.25, 0.67)
	pt3dadd(21.06, 34.97, -6, 0.67)
	pt3dadd(21.62, 34.15, -6, 0.51)
	pt3dadd(22.64, 32.78, -6, 0.51)
	pt3dadd(23.51, 31.96, -6, 0.51)
  }
  dend[692] {pt3dclear()
	pt3dadd(23.51, 31.96, -6, 0.51)
	pt3dadd(24.28, 32.68, -5.75, 0.61)
	pt3dadd(25, 33.54, -5.75, 0.61)
	pt3dadd(25.76, 34.06, -5.75, 0.56)
	pt3dadd(27.09, 35.09, -5.75, 0.56)
	pt3dadd(26.89, 35.24, -5.5, 0.56)
  }
  dend[693] {pt3dclear()
	pt3dadd(23.51, 31.96, -6, 0.51)
	pt3dadd(24.18, 31.56, -5.75, 0.56)
	pt3dadd(25.86, 30.84, -5.5, 0.56)
	pt3dadd(27.25, 30.84, -5.5, 0.56)
	pt3dadd(28.52, 30.84, -5.25, 0.56)
	pt3dadd(28.99, 31.56, -5, 0.56)
  }
  dend[694] {pt3dclear()
	pt3dadd(2.63, 46.1, -6.5, 1.18)
	pt3dadd(2.02, 45.52, -6.75, 0.56)
	pt3dadd(1.2, 44.91, -6.75, 0.41)
	pt3dadd(0.74, 44.34, -6.75, 0.41)
	pt3dadd(-0.03, 43.58, -6.75, 0.56)
  }
  dend[695] {pt3dclear()
	pt3dadd(-0.03, 43.58, -6.75, 0.56)
	pt3dadd(0.64, 42.66, -6.5, 0.46)
	pt3dadd(1.1, 41.58, -6.5, 0.46)
	pt3dadd(1.97, 40.65, -6.5, 0.36)
	pt3dadd(2.58, 39.89, -6.5, 0.41)
	pt3dadd(2.94, 38.86, -6.5, 0.46)
	pt3dadd(3.6, 37.64, -6.5, 0.56)
  }
  dend[696] {pt3dclear()
	pt3dadd(-0.03, 43.58, -6.75, 0.56)
	pt3dadd(-0.85, 43.27, -6.75, 0.56)
	pt3dadd(-1.82, 43.17, -6.75, 0.56)
  }
  dend[697] {pt3dclear()
	pt3dadd(-1.82, 43.17, -6.75, 0.56)
	pt3dadd(-2.18, 44.4, -7, 0.51)
	pt3dadd(-1.87, 45.62, -7, 0.56)
	pt3dadd(-1.26, 47.11, -7, 0.46)
  }
  dend[698] {pt3dclear()
	pt3dadd(-1.82, 43.17, -6.75, 0.56)
	pt3dadd(-1.87, 42.3, -7, 0.36)
	pt3dadd(-2.38, 41.53, -7, 0.36)
	pt3dadd(-2.27, 41.02, -7, 0.36)
	pt3dadd(-2.43, 40.04, -7, 0.56)
	pt3dadd(-2.84, 38.97, -7, 0.61)
	pt3dadd(-3.1, 37.69, -7, 0.61)
	pt3dadd(-3.15, 36.52, -7, 0.61)
	pt3dadd(-3.15, 35.54, -7, 0.61)
	pt3dadd(-3.15, 34.11, -7, 0.72)
  }
  dend[699] {pt3dclear()
	pt3dadd(-3.15, 34.11, -7, 0.72)
	pt3dadd(-2.48, 34.22, -7, 0.56)
	pt3dadd(-1.62, 34.22, -7, 0.46)
	pt3dadd(-0.85, 34.42, -7, 0.46)
	pt3dadd(-0.07, 34.88, -7, 0.46)
	pt3dadd(1.25, 35.29, -6.75, 0.46)
	pt3dadd(2.89, 35.03, -6.75, 0.46)
	pt3dadd(4.26, 34.72, -6.5, 0.46)
  }
  dend[700] {pt3dclear()
	pt3dadd(-3.15, 34.11, -7, 0.72)
	pt3dadd(-4.12, 33.86, -7, 0.46)
	pt3dadd(-4.68, 33.4, -7, 0.46)
	pt3dadd(-5.91, 33.09, -7.25, 0.46)
	pt3dadd(-7.19, 32.94, -7.25, 0.46)
	pt3dadd(-8.32, 32.78, -7.25, 0.46)
	pt3dadd(-9.6, 32.94, -7.25, 0.56)
	pt3dadd(-10.62, 33.14, -7.25, 0.77)
  }
  dend[701] {pt3dclear()
	pt3dadd(-3.97, 21.11, -6.25, 0.67)
	pt3dadd(-7.66, 34.09, -7.75, 0.67)
	pt3dadd(-8.06, 34.38, -7.75, 0.67)
  }
  dend[702] {pt3dclear()
	pt3dadd(-8.06, 34.38, -7.75, 0.67)
	pt3dadd(-8.52, 34.6, -7.75, 0.51)
	pt3dadd(-9.19, 35.06, -7.75, 0.61)
	pt3dadd(-9.66, 35.57, -7.75, 0.67)
	pt3dadd(-10.37, 36.08, -7.75, 0.97)
	pt3dadd(-10.68, 36.39, -7.75, 0.97)
  }
  dend[703] {pt3dclear()
	pt3dadd(-10.68, 36.39, -7.75, 0.97)
	pt3dadd(-10.68, 38.33, -7.75, 0.97)
  }
  dend[704] {pt3dclear()
	pt3dadd(-10.68, 38.33, -7.75, 0.97)
	pt3dadd(-10.68, 37.46, -7.75, 0.97)
	pt3dadd(-11.29, 38.44, -8, 0.61)
	pt3dadd(-12.17, 39.74, -8, 0.61)
  }
  dend[705] {pt3dclear()
	pt3dadd(-12.17, 39.74, -8, 0.61)
	pt3dadd(-14.11, 40.64, -8, 0.41)
	pt3dadd(-15.18, 40.99, -8, 0.41)
	pt3dadd(-16.2, 41.2, -8.25, 0.26)
	pt3dadd(-17.12, 42.02, -8.25, 0.36)
	pt3dadd(-17.98, 42.73, -8.25, 0.36)
	pt3dadd(-19.22, 42.63, -8.25, 0.36)
	pt3dadd(-20.19, 42.63, -8.5, 0.26)
	pt3dadd(-22.14, 42.58, -8.5, 0.56)
  }
  dend[706] {pt3dclear()
	pt3dadd(-22.14, 42.58, -8.5, 0.56)
	pt3dadd(-22.29, 43.6, -8.75, 0.41)
	pt3dadd(-22.9, 44.68, -9, 0.41)
  }
  dend[707] {pt3dclear()
	pt3dadd(-22.14, 42.58, -8.5, 0.56)
	pt3dadd(-23.01, 42.78, -8.75, 0.41)
	pt3dadd(-24.39, 42.89, -8.75, 0.41)
	pt3dadd(-25.87, 43.04, -8.75, 0.41)
  }
  dend[708] {pt3dclear()
	pt3dadd(-12.17, 39.74, -8, 0.61)
	pt3dadd(-12.37, 40.56, -8, 0.46)
	pt3dadd(-12.63, 41.53, -8, 0.46)
	pt3dadd(-12.94, 42.2, -8, 0.46)
	pt3dadd(-13.09, 43.37, -8, 0.46)
	pt3dadd(-13.29, 44.04, -8, 0.46)
	pt3dadd(-13.5, 44.96, -7.75, 0.46)
	pt3dadd(-13.65, 45.78, -7.75, 0.46)
	pt3dadd(-13.96, 46.85, -8, 0.67)
  }
  dend[709] {pt3dclear()
	pt3dadd(-13.96, 46.85, -8, 0.67)
	pt3dadd(-13.6, 47.46, -7.75, 0.46)
	pt3dadd(-13.34, 48.08, -7.75, 0.46)
	pt3dadd(-13.14, 49, -8, 0.46)
	pt3dadd(-13.04, 49.51, -8, 0.46)
	pt3dadd(-13.04, 50.33, -8, 0.46)
	pt3dadd(-12.83, 50.84, -8, 0.46)
	pt3dadd(-12.68, 51.4, -8, 0.56)
  }
}
proc shape3d_33() {
  dend[709] {	pt3dadd(-12.27, 52.02, -8, 0.67)
  }
  dend[710] {pt3dclear()
	pt3dadd(-13.96, 46.85, -8, 0.67)
	pt3dadd(-14.47, 47.21, -8, 0.51)
	pt3dadd(-14.88, 47.67, -7.75, 0.41)
	pt3dadd(-15.49, 47.77, -7.75, 0.41)
	pt3dadd(-16, 48.23, -7.75, 0.41)
	pt3dadd(-16.52, 48.28, -7.75, 0.41)
	pt3dadd(-17.23, 47.92, -7.75, 0.41)
  }
  dend[711] {pt3dclear()
	pt3dadd(-10.68, 38.33, -7.75, 0.97)
	pt3dadd(-11.4, 36.13, -8, 0.41)
	pt3dadd(-12.06, 36.03, -8, 0.31)
	pt3dadd(-13.03, 36.49, -8, 0.31)
	pt3dadd(-14.31, 37.26, -8, 0.31)
	pt3dadd(-15.64, 37.61, -8.25, 0.56)
  }
  dend[712] {pt3dclear()
	pt3dadd(-10.68, 36.39, -7.75, 0.97)
	pt3dadd(-11.6, 35.67, -7.75, 0.36)
	pt3dadd(-12.42, 35.36, -7.75, 0.36)
	pt3dadd(-13.13, 34.79, -7.75, 0.36)
	pt3dadd(-14.52, 35.32, -7.75, 0.36)
	pt3dadd(-15.23, 35.83, -7.75, 0.36)
	pt3dadd(-15.85, 36.7, -7.75, 0.31)
	pt3dadd(-16.1, 37.51, -7.75, 0.41)
	pt3dadd(-16, 38.69, -7.75, 0.51)
  }
  dend[713] {pt3dclear()
	pt3dadd(-8.06, 34.38, -7.75, 0.67)
	pt3dadd(-7.91, 34.63, -7.5, 0.46)
	pt3dadd(-7.29, 35.39, -7.5, 0.46)
	pt3dadd(-7.14, 36.52, -7.5, 0.46)
	pt3dadd(-7.14, 37.75, -7.5, 0.46)
	pt3dadd(-6.94, 38.67, -7.5, 0.56)
  }
  dend[714] {pt3dclear()
	pt3dadd(-6.94, 38.67, -7.5, 0.56)
	pt3dadd(-7.75, 39.54, -7.5, 0.46)
	pt3dadd(-8.11, 40.46, -7.5, 0.46)
	pt3dadd(-8.16, 40.86, -7.75, 0.46)
	pt3dadd(-8.98, 41.43, -7.75, 0.46)
	pt3dadd(-9.85, 41.68, -7.75, 0.46)
  }
  dend[715] {pt3dclear()
	pt3dadd(-6.94, 38.67, -7.5, 0.56)
	pt3dadd(-5.96, 38.82, -7.5, 0.46)
	pt3dadd(-4.84, 39.49, -7.5, 0.61)
	pt3dadd(-3.71, 39.95, -7.5, 0.67)
	pt3dadd(-2.23, 40.25, -7.5, 0.67)
	pt3dadd(-1.14, 40.46, -7.5, 0.67)
	pt3dadd(0.38, 40.56, -7.5, 0.61)
	pt3dadd(1.1, 40, -7.5, 0.61)
	pt3dadd(2.43, 39.43, -7.75, 0.61)
	pt3dadd(3.3, 39.02, -8, 0.51)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
  shape3d_20()
  shape3d_21()
  shape3d_22()
  shape3d_23()
  shape3d_24()
  shape3d_25()
  shape3d_26()
  shape3d_27()
  shape3d_28()
  shape3d_29()
  shape3d_30()
  shape3d_31()
  shape3d_32()
  shape3d_33()
}
access soma

celldef()

Loading data, please wait...