Fast Spiking Basket cells (Tzilivaki et al 2019)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:237595
"Interneurons are critical for the proper functioning of neural circuits. While often morphologically complex, dendritic integration and its role in neuronal output have been ignored for decades, treating interneurons as linear point neurons. Exciting new findings suggest that interneuron dendrites support complex, nonlinear computations: sublinear integration of EPSPs in the cerebellum, coupled to supralinear calcium accumulations and supralinear voltage integration in the hippocampus. These findings challenge the point neuron dogma and call for a new theory of interneuron arithmetic. Using detailed, biophysically constrained models, we predict that dendrites of FS basket cells in both hippocampus and mPFC come in two flavors: supralinear, supporting local sodium spikes within large-volume branches and sublinear, in small-volume branches. Synaptic activation of varying sets of these dendrites leads to somatic firing variability that cannot be explained by the point neuron reduction. Instead, a 2-stage Artificial Neural Network (ANN), with both sub- and supralinear hidden nodes, captures most of the variance. We propose that FS basket cells have substantially expanded computational capabilities sub-served by their non-linear dendrites and act as a 2-layer ANN."
Reference:
1 . Tzilivaki A, Kastellakis G, Poirazi P (2019) Challenging the point neuron dogma: FS basket cells as 2-stage nonlinear integrators Nature Communications 10(1):3664 [PubMed]
Model Information (Click on a link to find other models with that property)
Model Type: Neuron or other electrically excitable cell;
Brain Region(s)/Organism: Hippocampus; Prefrontal cortex (PFC);
Cell Type(s): Hippocampus CA3 interneuron basket GABA cell; Neocortex layer 5 interneuron;
Channel(s):
Gap Junctions:
Receptor(s):
Gene(s):
Transmitter(s):
Simulation Environment: NEURON; MATLAB; Python;
Model Concept(s): Active Dendrites; Detailed Neuronal Models;
Implementer(s): Tzilivaki, Alexandra [alexandra.tzilivaki at charite.de]; Kastellakis, George [gkastel at gmail.com];
Search NeuronDB for information about:  Hippocampus CA3 interneuron basket GABA cell;
/*
This is a CellBuilder-like file written for the simulator NEURON
by an automatic procedure "neuron_tree" part of the TREES package
in MATLAB
copyright 2009 Hermann Cuntz
*/

proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
}

create soma[3]
create axon[639]
create dend[65]

proc topol_1() {
  connect soma[1](0),soma[0](1)
  connect soma[2](0),soma[0](1)
  connect dend[0](0),soma[0](1)
  connect dend[1](0),dend[0](1)
  connect dend[2](0),dend[1](1)
  connect dend[3](0),dend[1](1)
  connect dend[4](0),dend[0](1)
  connect dend[5](0),dend[4](1)
  connect dend[6](0),dend[5](1)
  connect dend[7](0),dend[5](1)
  connect dend[8](0),dend[4](1)
  connect dend[9](0),dend[8](1)
  connect dend[10](0),dend[8](1)
  connect dend[11](0),dend[10](1)
  connect dend[12](0),soma[0](1)
  connect dend[13](0),soma[0](1)
  connect dend[14](0),soma[0](1)
  connect dend[15](0),dend[14](1)
  connect dend[16](0),dend[15](1)
  connect dend[17](0),dend[16](1)
  connect dend[18](0),dend[16](1)
  connect dend[19](0),dend[15](1)
  connect dend[20](0),dend[14](1)
  connect dend[21](0),dend[20](1)
  connect dend[22](0),dend[20](1)
  connect dend[23](0),soma[0](1)
  connect dend[24](0),soma[0](1)
  connect dend[25](0),dend[24](1)
  connect dend[26](0),dend[25](1)
  connect dend[27](0),dend[25](1)
  connect dend[28](0),dend[24](1)
  connect dend[29](0),soma[0](1)
  connect dend[30](0),dend[29](1)
  connect dend[31](0),dend[29](1)
  connect dend[32](0),soma[0](1)
  connect dend[33](0),dend[32](1)
  connect dend[34](0),dend[33](1)
  connect dend[35](0),dend[34](1)
  connect dend[36](0),dend[34](1)
  connect dend[37](0),dend[36](1)
  connect dend[38](0),dend[36](1)
  connect dend[39](0),dend[33](1)
  connect dend[40](0),dend[32](1)
  connect dend[41](0),dend[40](1)
  connect dend[42](0),dend[40](1)
  connect dend[43](0),soma[0](1)
  connect dend[44](0),dend[43](1)
  connect dend[45](0),dend[44](1)
  connect dend[46](0),dend[44](1)
  connect dend[47](0),dend[43](1)
  connect dend[48](0),soma[0](1)
  connect dend[49](0),dend[48](1)
  connect dend[50](0),soma[0](1)
  connect dend[51](0),dend[48](1)
  connect dend[52](0),soma[0](1)
  connect dend[53](0),dend[52](1)
  connect dend[54](0),dend[53](1)
  connect dend[55](0),dend[53](1)
  connect dend[56](0),dend[52](1)
  connect dend[57](0),dend[56](1)
  connect dend[58](0),dend[57](1)
  connect dend[59](0),dend[57](1)
  connect dend[60](0),dend[56](1)
  connect dend[61](0),dend[60](1)
  connect dend[62](0),dend[60](1)
  connect dend[63](0),dend[10](1)
  connect dend[64](0),soma[0](1)
  connect axon[0](0),soma[0](1)
  connect axon[1](0),axon[0](1)
  connect axon[2](0),axon[1](1)
  connect axon[3](0),axon[2](1)
  connect axon[4](0),axon[2](1)
  connect axon[5](0),axon[4](1)
  connect axon[6](0),axon[4](1)
  connect axon[7](0),axon[6](1)
  connect axon[8](0),axon[7](1)
  connect axon[9](0),axon[8](1)
  connect axon[10](0),axon[9](1)
  connect axon[11](0),axon[9](1)
  connect axon[12](0),axon[8](1)
  connect axon[13](0),axon[7](1)
  connect axon[14](0),axon[13](1)
  connect axon[15](0),axon[13](1)
  connect axon[16](0),axon[6](1)
  connect axon[17](0),axon[16](1)
  connect axon[18](0),axon[17](1)
  connect axon[19](0),axon[17](1)
  connect axon[20](0),axon[19](1)
  connect axon[21](0),axon[20](1)
  connect axon[22](0),axon[20](1)
  connect axon[23](0),axon[19](1)
  connect axon[24](0),axon[23](1)
  connect axon[25](0),axon[23](1)
  connect axon[26](0),axon[25](1)
  connect axon[27](0),axon[25](1)
  connect axon[28](0),axon[27](1)
  connect axon[29](0),axon[27](1)
  connect axon[30](0),axon[16](1)
  connect axon[31](0),axon[30](1)
  connect axon[32](0),axon[31](1)
  connect axon[33](0),axon[31](1)
  connect axon[34](0),axon[30](1)
  connect axon[35](0),axon[1](1)
  connect axon[36](0),axon[35](1)
  connect axon[37](0),axon[36](1)
  connect axon[38](0),axon[36](1)
  connect axon[39](0),axon[35](1)
  connect axon[40](0),axon[39](1)
  connect axon[41](0),axon[40](1)
  connect axon[42](0),axon[41](1)
  connect axon[43](0),axon[42](1)
  connect axon[44](0),axon[43](1)
  connect axon[45](0),axon[44](1)
  connect axon[46](0),axon[45](1)
  connect axon[47](0),axon[45](1)
  connect axon[48](0),axon[47](1)
  connect axon[49](0),axon[47](1)
  connect axon[50](0),axon[49](1)
  connect axon[51](0),axon[49](1)
  connect axon[52](0),axon[44](1)
  connect axon[53](0),axon[52](1)
  connect axon[54](0),axon[52](1)
  connect axon[55](0),axon[43](1)
  connect axon[56](0),axon[55](1)
  connect axon[57](0),axon[55](1)
  connect axon[58](0),axon[42](1)
  connect axon[59](0),axon[58](1)
  connect axon[60](0),axon[59](1)
  connect axon[61](0),axon[59](1)
  connect axon[62](0),axon[61](1)
  connect axon[63](0),axon[62](1)
  connect axon[64](0),axon[62](1)
  connect axon[65](0),axon[64](1)
  connect axon[66](0),axon[64](1)
  connect axon[67](0),axon[61](1)
  connect axon[68](0),axon[58](1)
  connect axon[69](0),axon[68](1)
  connect axon[70](0),axon[69](1)
  connect axon[71](0),axon[70](1)
  connect axon[72](0),axon[71](1)
  connect axon[73](0),axon[71](1)
  connect axon[74](0),axon[73](1)
  connect axon[75](0),axon[74](1)
  connect axon[76](0),axon[75](1)
  connect axon[77](0),axon[75](1)
  connect axon[78](0),axon[77](1)
  connect axon[79](0),axon[77](1)
  connect axon[80](0),axon[74](1)
  connect axon[81](0),axon[73](1)
  connect axon[82](0),axon[70](1)
  connect axon[83](0),axon[69](1)
  connect axon[84](0),axon[83](1)
  connect axon[85](0),axon[83](1)
  connect axon[86](0),axon[85](1)
  connect axon[87](0),axon[86](1)
  connect axon[88](0),axon[86](1)
  connect axon[89](0),axon[85](1)
  connect axon[90](0),axon[68](1)
  connect axon[91](0),axon[90](1)
  connect axon[92](0),axon[91](1)
  connect axon[93](0),axon[91](1)
  connect axon[94](0),axon[90](1)
  connect axon[95](0),axon[94](1)
  connect axon[96](0),axon[95](1)
  connect axon[97](0),axon[96](1)
  connect axon[98](0),axon[96](1)
  connect axon[99](0),axon[95](1)
  connect axon[100](0),axon[94](1)
  connect axon[101](0),axon[41](1)
  connect axon[102](0),axon[101](1)
  connect axon[103](0),axon[102](1)
  connect axon[104](0),axon[102](1)
  connect axon[105](0),axon[104](1)
  connect axon[106](0),axon[105](1)
  connect axon[107](0),axon[106](1)
  connect axon[108](0),axon[106](1)
  connect axon[109](0),axon[108](1)
  connect axon[110](0),axon[108](1)
  connect axon[111](0),axon[105](1)
  connect axon[112](0),axon[111](1)
  connect axon[113](0),axon[111](1)
  connect axon[114](0),axon[104](1)
  connect axon[115](0),axon[114](1)
  connect axon[116](0),axon[115](1)
  connect axon[117](0),axon[116](1)
  connect axon[118](0),axon[116](1)
  connect axon[119](0),axon[115](1)
  connect axon[120](0),axon[114](1)
  connect axon[121](0),axon[101](1)
  connect axon[122](0),axon[40](1)
  connect axon[123](0),axon[122](1)
  connect axon[124](0),axon[123](1)
  connect axon[125](0),axon[124](1)
  connect axon[126](0),axon[125](1)
  connect axon[127](0),axon[125](1)
  connect axon[128](0),axon[127](1)
  connect axon[129](0),axon[127](1)
  connect axon[130](0),axon[124](1)
  connect axon[131](0),axon[130](1)
  connect axon[132](0),axon[131](1)
  connect axon[133](0),axon[132](1)
  connect axon[134](0),axon[133](1)
  connect axon[135](0),axon[134](1)
  connect axon[136](0),axon[135](1)
  connect axon[137](0),axon[136](1)
  connect axon[138](0),axon[137](1)
  connect axon[139](0),axon[138](1)
  connect axon[140](0),axon[138](1)
  connect axon[141](0),axon[137](1)
  connect axon[142](0),axon[136](1)
  connect axon[143](0),axon[142](1)
  connect axon[144](0),axon[142](1)
  connect axon[145](0),axon[135](1)
  connect axon[146](0),axon[145](1)
  connect axon[147](0),axon[145](1)
  connect axon[148](0),axon[147](1)
  connect axon[149](0),axon[147](1)
  connect axon[150](0),axon[134](1)
  connect axon[151](0),axon[133](1)
  connect axon[152](0),axon[132](1)
  connect axon[153](0),axon[152](1)
  connect axon[154](0),axon[153](1)
  connect axon[155](0),axon[153](1)
  connect axon[156](0),axon[152](1)
  connect axon[157](0),axon[156](1)
  connect axon[158](0),axon[157](1)
  connect axon[159](0),axon[157](1)
  connect axon[160](0),axon[156](1)
  connect axon[161](0),axon[160](1)
  connect axon[162](0),axon[161](1)
  connect axon[163](0),axon[162](1)
  connect axon[164](0),axon[162](1)
  connect axon[165](0),axon[161](1)
  connect axon[166](0),axon[160](1)
  connect axon[167](0),axon[166](1)
  connect axon[168](0),axon[167](1)
  connect axon[169](0),axon[167](1)
  connect axon[170](0),axon[166](1)
  connect axon[171](0),axon[170](1)
  connect axon[172](0),axon[170](1)
  connect axon[173](0),axon[172](1)
  connect axon[174](0),axon[172](1)
  connect axon[175](0),axon[174](1)
  connect axon[176](0),axon[175](1)
  connect axon[177](0),axon[175](1)
  connect axon[178](0),axon[174](1)
  connect axon[179](0),axon[178](1)
  connect axon[180](0),axon[178](1)
  connect axon[181](0),axon[180](1)
}
proc topol_2() {
  connect axon[182](0),axon[181](1)
  connect axon[183](0),axon[181](1)
  connect axon[184](0),axon[183](1)
  connect axon[185](0),axon[183](1)
  connect axon[186](0),axon[180](1)
  connect axon[187](0),axon[131](1)
  connect axon[188](0),axon[187](1)
  connect axon[189](0),axon[188](1)
  connect axon[190](0),axon[188](1)
  connect axon[191](0),axon[190](1)
  connect axon[192](0),axon[191](1)
  connect axon[193](0),axon[192](1)
  connect axon[194](0),axon[192](1)
  connect axon[195](0),axon[191](1)
  connect axon[196](0),axon[195](1)
  connect axon[197](0),axon[196](1)
  connect axon[198](0),axon[197](1)
  connect axon[199](0),axon[197](1)
  connect axon[200](0),axon[199](1)
  connect axon[201](0),axon[199](1)
  connect axon[202](0),axon[201](1)
  connect axon[203](0),axon[201](1)
  connect axon[204](0),axon[196](1)
  connect axon[205](0),axon[195](1)
  connect axon[206](0),axon[205](1)
  connect axon[207](0),axon[206](1)
  connect axon[208](0),axon[206](1)
  connect axon[209](0),axon[208](1)
  connect axon[210](0),axon[208](1)
  connect axon[211](0),axon[205](1)
  connect axon[212](0),axon[211](1)
  connect axon[213](0),axon[211](1)
  connect axon[214](0),axon[190](1)
  connect axon[215](0),axon[187](1)
  connect axon[216](0),axon[130](1)
  connect axon[217](0),axon[216](1)
  connect axon[218](0),axon[216](1)
  connect axon[219](0),axon[123](1)
  connect axon[220](0),axon[219](1)
  connect axon[221](0),axon[220](1)
  connect axon[222](0),axon[221](1)
  connect axon[223](0),axon[221](1)
  connect axon[224](0),axon[220](1)
  connect axon[225](0),axon[224](1)
  connect axon[226](0),axon[224](1)
  connect axon[227](0),axon[219](1)
  connect axon[228](0),axon[227](1)
  connect axon[229](0),axon[227](1)
  connect axon[230](0),axon[229](1)
  connect axon[231](0),axon[230](1)
  connect axon[232](0),axon[230](1)
  connect axon[233](0),axon[229](1)
  connect axon[234](0),axon[233](1)
  connect axon[235](0),axon[234](1)
  connect axon[236](0),axon[234](1)
  connect axon[237](0),axon[236](1)
  connect axon[238](0),axon[236](1)
  connect axon[239](0),axon[233](1)
  connect axon[240](0),axon[122](1)
  connect axon[241](0),axon[39](1)
  connect axon[242](0),axon[241](1)
  connect axon[243](0),axon[241](1)
  connect axon[244](0),axon[243](1)
  connect axon[245](0),axon[243](1)
  connect axon[246](0),axon[0](1)
  connect axon[247](0),axon[246](1)
  connect axon[248](0),axon[247](1)
  connect axon[249](0),axon[248](1)
  connect axon[250](0),axon[249](1)
  connect axon[251](0),axon[250](1)
  connect axon[252](0),axon[251](1)
  connect axon[253](0),axon[252](1)
  connect axon[254](0),axon[253](1)
  connect axon[255](0),axon[254](1)
  connect axon[256](0),axon[255](1)
  connect axon[257](0),axon[255](1)
  connect axon[258](0),axon[254](1)
  connect axon[259](0),axon[253](1)
  connect axon[260](0),axon[259](1)
  connect axon[261](0),axon[260](1)
  connect axon[262](0),axon[261](1)
  connect axon[263](0),axon[261](1)
  connect axon[264](0),axon[263](1)
  connect axon[265](0),axon[263](1)
  connect axon[266](0),axon[260](1)
  connect axon[267](0),axon[266](1)
  connect axon[268](0),axon[266](1)
  connect axon[269](0),axon[268](1)
  connect axon[270](0),axon[268](1)
  connect axon[271](0),axon[270](1)
  connect axon[272](0),axon[270](1)
  connect axon[273](0),axon[259](1)
  connect axon[274](0),axon[273](1)
  connect axon[275](0),axon[274](1)
  connect axon[276](0),axon[275](1)
  connect axon[277](0),axon[275](1)
  connect axon[278](0),axon[274](1)
  connect axon[279](0),axon[278](1)
  connect axon[280](0),axon[279](1)
  connect axon[281](0),axon[279](1)
  connect axon[282](0),axon[281](1)
  connect axon[283](0),axon[282](1)
  connect axon[284](0),axon[283](1)
  connect axon[285](0),axon[283](1)
  connect axon[286](0),axon[282](1)
  connect axon[287](0),axon[286](1)
  connect axon[288](0),axon[286](1)
  connect axon[289](0),axon[281](1)
  connect axon[290](0),axon[278](1)
  connect axon[291](0),axon[273](1)
  connect axon[292](0),axon[291](1)
  connect axon[293](0),axon[291](1)
  connect axon[294](0),axon[252](1)
  connect axon[295](0),axon[294](1)
  connect axon[296](0),axon[295](1)
  connect axon[297](0),axon[296](1)
  connect axon[298](0),axon[296](1)
  connect axon[299](0),axon[298](1)
  connect axon[300](0),axon[299](1)
  connect axon[301](0),axon[300](1)
  connect axon[302](0),axon[300](1)
  connect axon[303](0),axon[299](1)
  connect axon[304](0),axon[298](1)
  connect axon[305](0),axon[295](1)
  connect axon[306](0),axon[305](1)
  connect axon[307](0),axon[306](1)
  connect axon[308](0),axon[307](1)
  connect axon[309](0),axon[307](1)
  connect axon[310](0),axon[309](1)
  connect axon[311](0),axon[310](1)
  connect axon[312](0),axon[310](1)
  connect axon[313](0),axon[312](1)
  connect axon[314](0),axon[312](1)
  connect axon[315](0),axon[309](1)
  connect axon[316](0),axon[306](1)
  connect axon[317](0),axon[316](1)
  connect axon[318](0),axon[316](1)
  connect axon[319](0),axon[318](1)
  connect axon[320](0),axon[318](1)
  connect axon[321](0),axon[305](1)
  connect axon[322](0),axon[321](1)
  connect axon[323](0),axon[322](1)
  connect axon[324](0),axon[323](1)
  connect axon[325](0),axon[324](1)
  connect axon[326](0),axon[324](1)
  connect axon[327](0),axon[326](1)
  connect axon[328](0),axon[327](1)
  connect axon[329](0),axon[328](1)
  connect axon[330](0),axon[328](1)
  connect axon[331](0),axon[327](1)
  connect axon[332](0),axon[326](1)
  connect axon[333](0),axon[323](1)
  connect axon[334](0),axon[333](1)
  connect axon[335](0),axon[334](1)
  connect axon[336](0),axon[334](1)
  connect axon[337](0),axon[333](1)
  connect axon[338](0),axon[322](1)
  connect axon[339](0),axon[338](1)
  connect axon[340](0),axon[338](1)
  connect axon[341](0),axon[340](1)
  connect axon[342](0),axon[340](1)
  connect axon[343](0),axon[342](1)
  connect axon[344](0),axon[342](1)
  connect axon[345](0),axon[344](1)
  connect axon[346](0),axon[344](1)
  connect axon[347](0),axon[346](1)
  connect axon[348](0),axon[346](1)
  connect axon[349](0),axon[321](1)
  connect axon[350](0),axon[349](1)
  connect axon[351](0),axon[349](1)
  connect axon[352](0),axon[294](1)
  connect axon[353](0),axon[352](1)
  connect axon[354](0),axon[352](1)
  connect axon[355](0),axon[251](1)
  connect axon[356](0),axon[355](1)
  connect axon[357](0),axon[356](1)
  connect axon[358](0),axon[357](1)
  connect axon[359](0),axon[358](1)
  connect axon[360](0),axon[358](1)
  connect axon[361](0),axon[357](1)
  connect axon[362](0),axon[356](1)
  connect axon[363](0),axon[362](1)
  connect axon[364](0),axon[363](1)
  connect axon[365](0),axon[364](1)
  connect axon[366](0),axon[364](1)
  connect axon[367](0),axon[363](1)
  connect axon[368](0),axon[362](1)
  connect axon[369](0),axon[355](1)
  connect axon[370](0),axon[369](1)
  connect axon[371](0),axon[369](1)
  connect axon[372](0),axon[371](1)
  connect axon[373](0),axon[372](1)
  connect axon[374](0),axon[373](1)
  connect axon[375](0),axon[373](1)
  connect axon[376](0),axon[372](1)
  connect axon[377](0),axon[371](1)
  connect axon[378](0),axon[250](1)
  connect axon[379](0),axon[378](1)
  connect axon[380](0),axon[379](1)
  connect axon[381](0),axon[380](1)
  connect axon[382](0),axon[381](1)
  connect axon[383](0),axon[382](1)
  connect axon[384](0),axon[382](1)
  connect axon[385](0),axon[384](1)
  connect axon[386](0),axon[384](1)
  connect axon[387](0),axon[381](1)
  connect axon[388](0),axon[387](1)
  connect axon[389](0),axon[388](1)
  connect axon[390](0),axon[388](1)
  connect axon[391](0),axon[390](1)
  connect axon[392](0),axon[390](1)
  connect axon[393](0),axon[387](1)
  connect axon[394](0),axon[380](1)
  connect axon[395](0),axon[394](1)
  connect axon[396](0),axon[394](1)
  connect axon[397](0),axon[379](1)
  connect axon[398](0),axon[397](1)
  connect axon[399](0),axon[398](1)
  connect axon[400](0),axon[398](1)
  connect axon[401](0),axon[397](1)
  connect axon[402](0),axon[401](1)
  connect axon[403](0),axon[402](1)
  connect axon[404](0),axon[402](1)
  connect axon[405](0),axon[404](1)
  connect axon[406](0),axon[404](1)
  connect axon[407](0),axon[401](1)
  connect axon[408](0),axon[407](1)
  connect axon[409](0),axon[408](1)
  connect axon[410](0),axon[409](1)
  connect axon[411](0),axon[410](1)
  connect axon[412](0),axon[410](1)
  connect axon[413](0),axon[412](1)
  connect axon[414](0),axon[412](1)
  connect axon[415](0),axon[414](1)
  connect axon[416](0),axon[414](1)
  connect axon[417](0),axon[416](1)
  connect axon[418](0),axon[416](1)
  connect axon[419](0),axon[418](1)
  connect axon[420](0),axon[418](1)
  connect axon[421](0),axon[420](1)
  connect axon[422](0),axon[420](1)
  connect axon[423](0),axon[409](1)
  connect axon[424](0),axon[423](1)
  connect axon[425](0),axon[423](1)
  connect axon[426](0),axon[408](1)
  connect axon[427](0),axon[407](1)
  connect axon[428](0),axon[427](1)
  connect axon[429](0),axon[428](1)
  connect axon[430](0),axon[429](1)
}
proc topol_3() {
  connect axon[431](0),axon[430](1)
  connect axon[432](0),axon[430](1)
  connect axon[433](0),axon[429](1)
  connect axon[434](0),axon[428](1)
  connect axon[435](0),axon[427](1)
  connect axon[436](0),axon[435](1)
  connect axon[437](0),axon[436](1)
  connect axon[438](0),axon[436](1)
  connect axon[439](0),axon[435](1)
  connect axon[440](0),axon[439](1)
  connect axon[441](0),axon[440](1)
  connect axon[442](0),axon[441](1)
  connect axon[443](0),axon[442](1)
  connect axon[444](0),axon[442](1)
  connect axon[445](0),axon[441](1)
  connect axon[446](0),axon[440](1)
  connect axon[447](0),axon[439](1)
  connect axon[448](0),axon[378](1)
  connect axon[449](0),axon[448](1)
  connect axon[450](0),axon[449](1)
  connect axon[451](0),axon[450](1)
  connect axon[452](0),axon[450](1)
  connect axon[453](0),axon[452](1)
  connect axon[454](0),axon[452](1)
  connect axon[455](0),axon[454](1)
  connect axon[456](0),axon[455](1)
  connect axon[457](0),axon[455](1)
  connect axon[458](0),axon[454](1)
  connect axon[459](0),axon[449](1)
  connect axon[460](0),axon[459](1)
  connect axon[461](0),axon[459](1)
  connect axon[462](0),axon[461](1)
  connect axon[463](0),axon[461](1)
  connect axon[464](0),axon[463](1)
  connect axon[465](0),axon[464](1)
  connect axon[466](0),axon[464](1)
  connect axon[467](0),axon[466](1)
  connect axon[468](0),axon[466](1)
  connect axon[469](0),axon[463](1)
  connect axon[470](0),axon[448](1)
  connect axon[471](0),axon[470](1)
  connect axon[472](0),axon[471](1)
  connect axon[473](0),axon[471](1)
  connect axon[474](0),axon[473](1)
  connect axon[475](0),axon[474](1)
  connect axon[476](0),axon[474](1)
  connect axon[477](0),axon[473](1)
  connect axon[478](0),axon[477](1)
  connect axon[479](0),axon[477](1)
  connect axon[480](0),axon[479](1)
  connect axon[481](0),axon[480](1)
  connect axon[482](0),axon[480](1)
  connect axon[483](0),axon[479](1)
  connect axon[484](0),axon[483](1)
  connect axon[485](0),axon[483](1)
  connect axon[486](0),axon[470](1)
  connect axon[487](0),axon[486](1)
  connect axon[488](0),axon[486](1)
  connect axon[489](0),axon[249](1)
  connect axon[490](0),axon[489](1)
  connect axon[491](0),axon[489](1)
  connect axon[492](0),axon[491](1)
  connect axon[493](0),axon[491](1)
  connect axon[494](0),axon[248](1)
  connect axon[495](0),axon[247](1)
  connect axon[496](0),axon[495](1)
  connect axon[497](0),axon[496](1)
  connect axon[498](0),axon[497](1)
  connect axon[499](0),axon[498](1)
  connect axon[500](0),axon[498](1)
  connect axon[501](0),axon[497](1)
  connect axon[502](0),axon[501](1)
  connect axon[503](0),axon[502](1)
  connect axon[504](0),axon[502](1)
  connect axon[505](0),axon[501](1)
  connect axon[506](0),axon[505](1)
  connect axon[507](0),axon[506](1)
  connect axon[508](0),axon[506](1)
  connect axon[509](0),axon[508](1)
  connect axon[510](0),axon[508](1)
  connect axon[511](0),axon[510](1)
  connect axon[512](0),axon[505](1)
  connect axon[513](0),axon[496](1)
  connect axon[514](0),axon[513](1)
  connect axon[515](0),axon[513](1)
  connect axon[516](0),axon[515](1)
  connect axon[517](0),axon[515](1)
  connect axon[518](0),axon[517](1)
  connect axon[519](0),axon[517](1)
  connect axon[520](0),axon[519](1)
  connect axon[521](0),axon[520](1)
  connect axon[522](0),axon[520](1)
  connect axon[523](0),axon[519](1)
  connect axon[524](0),axon[495](1)
  connect axon[525](0),axon[524](1)
  connect axon[526](0),axon[524](1)
  connect axon[527](0),axon[526](1)
  connect axon[528](0),axon[527](1)
  connect axon[529](0),axon[527](1)
  connect axon[530](0),axon[529](1)
  connect axon[531](0),axon[530](1)
  connect axon[532](0),axon[530](1)
  connect axon[533](0),axon[532](1)
  connect axon[534](0),axon[532](1)
  connect axon[535](0),axon[529](1)
  connect axon[536](0),axon[535](1)
  connect axon[537](0),axon[536](1)
  connect axon[538](0),axon[536](1)
  connect axon[539](0),axon[538](1)
  connect axon[540](0),axon[538](1)
  connect axon[541](0),axon[540](1)
  connect axon[542](0),axon[540](1)
  connect axon[543](0),axon[535](1)
  connect axon[544](0),axon[526](1)
  connect axon[545](0),axon[246](1)
  connect axon[546](0),axon[545](1)
  connect axon[547](0),axon[546](1)
  connect axon[548](0),axon[546](1)
  connect axon[549](0),axon[548](1)
  connect axon[550](0),axon[549](1)
  connect axon[551](0),axon[550](1)
  connect axon[552](0),axon[551](1)
  connect axon[553](0),axon[551](1)
  connect axon[554](0),axon[553](1)
  connect axon[555](0),axon[553](1)
  connect axon[556](0),axon[555](1)
  connect axon[557](0),axon[555](1)
  connect axon[558](0),axon[557](1)
  connect axon[559](0),axon[557](1)
  connect axon[560](0),axon[559](1)
  connect axon[561](0),axon[559](1)
  connect axon[562](0),axon[561](1)
  connect axon[563](0),axon[561](1)
  connect axon[564](0),axon[563](1)
  connect axon[565](0),axon[564](1)
  connect axon[566](0),axon[564](1)
  connect axon[567](0),axon[563](1)
  connect axon[568](0),axon[550](1)
  connect axon[569](0),axon[568](1)
  connect axon[570](0),axon[569](1)
  connect axon[571](0),axon[569](1)
  connect axon[572](0),axon[568](1)
  connect axon[573](0),axon[549](1)
  connect axon[574](0),axon[573](1)
  connect axon[575](0),axon[574](1)
  connect axon[576](0),axon[575](1)
  connect axon[577](0),axon[575](1)
  connect axon[578](0),axon[574](1)
  connect axon[579](0),axon[578](1)
  connect axon[580](0),axon[579](1)
  connect axon[581](0),axon[579](1)
  connect axon[582](0),axon[581](1)
  connect axon[583](0),axon[582](1)
  connect axon[584](0),axon[582](1)
  connect axon[585](0),axon[581](1)
  connect axon[586](0),axon[585](1)
  connect axon[587](0),axon[585](1)
  connect axon[588](0),axon[587](1)
  connect axon[589](0),axon[587](1)
  connect axon[590](0),axon[578](1)
  connect axon[591](0),axon[590](1)
  connect axon[592](0),axon[591](1)
  connect axon[593](0),axon[592](1)
  connect axon[594](0),axon[593](1)
  connect axon[595](0),axon[593](1)
  connect axon[596](0),axon[592](1)
  connect axon[597](0),axon[596](1)
  connect axon[598](0),axon[597](1)
  connect axon[599](0),axon[598](1)
  connect axon[600](0),axon[598](1)
  connect axon[601](0),axon[597](1)
  connect axon[602](0),axon[596](1)
  connect axon[603](0),axon[591](1)
  connect axon[604](0),axon[590](1)
  connect axon[605](0),axon[604](1)
  connect axon[606](0),axon[604](1)
  connect axon[607](0),axon[573](1)
  connect axon[608](0),axon[548](1)
  connect axon[609](0),axon[608](1)
  connect axon[610](0),axon[609](1)
  connect axon[611](0),axon[609](1)
  connect axon[612](0),axon[608](1)
  connect axon[613](0),axon[612](1)
  connect axon[614](0),axon[612](1)
  connect axon[615](0),axon[614](1)
  connect axon[616](0),axon[614](1)
  connect axon[617](0),axon[545](1)
  connect axon[618](0),axon[617](1)
  connect axon[619](0),axon[618](1)
  connect axon[620](0),axon[618](1)
  connect axon[621](0),axon[617](1)
  connect axon[622](0),axon[621](1)
  connect axon[623](0),axon[621](1)
  connect axon[624](0),axon[623](1)
  connect axon[625](0),axon[624](1)
  connect axon[626](0),axon[624](1)
  connect axon[627](0),axon[623](1)
  connect axon[628](0),axon[627](1)
  connect axon[629](0),axon[628](1)
  connect axon[630](0),axon[628](1)
  connect axon[631](0),axon[627](1)
  connect axon[632](0),axon[631](1)
  connect axon[633](0),axon[632](1)
  connect axon[634](0),axon[632](1)
  connect axon[635](0),axon[634](1)
  connect axon[636](0),axon[634](1)
  connect axon[637](0),axon[631](1)
  connect axon[638](0),axon[510](1)
}
proc topol() {
  topol_1()
  topol_2()
  topol_3()
  basic_shape()
}

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(0.2599, 0.23, 7.67, 10.9468)
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
  }
  soma[1] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(0.26, 5.71, 7.67, 10.9468)
  }
  soma[2] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(0.26, -5.23, 7.67, 10.9468)
  }
  dend[0] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(4.41, 3.47, 5.5, 0.94)
    pt3dadd(4.62, 3.57, 5.5, 0.94)
    pt3dadd(4.78, 3.84, 5.5, 0.94)
    pt3dadd(4.93, 4, 5.5, 0.94)
    pt3dadd(5.09, 4.21, 5.5, 0.94)
    pt3dadd(5.14, 4.36, 5, 0.94)
    pt3dadd(5.25, 4.47, 5, 0.94)
    pt3dadd(5.35, 4.63, 5, 0.94)
    pt3dadd(5.46, 4.73, 5, 0.94)
    pt3dadd(5.56, 4.84, 5, 0.94)
    pt3dadd(5.62, 4.99, 5, 0.94)
    pt3dadd(5.72, 5.09, 5, 0.94)
    pt3dadd(5.77, 5.26, 5, 0.94)
    pt3dadd(5.83, 5.41, 5, 0.94)
    pt3dadd(5.88, 5.57, 5, 0.94)
    pt3dadd(5.88, 5.89, 5, 0.94)
    pt3dadd(5.93, 6.05, 5, 0.94)
    pt3dadd(5.98, 6.15, 5, 0.94)
    pt3dadd(6.04, 6.36, 5, 0.94)
    pt3dadd(6.09, 6.52, 5, 0.94)
    pt3dadd(6.09, 6.99, 5, 0.94)
    pt3dadd(6.19, 7.1, 5, 0.94)
    pt3dadd(6.19, 7.31, 5, 0.94)
    pt3dadd(6.25, 7.46, 5, 0.94)
    pt3dadd(6.3, 7.68, 5, 0.94)
    pt3dadd(6.4, 7.83, 5, 0.94)
    pt3dadd(6.4, 8.03, 5, 0.94)
    pt3dadd(6.46, 8.19, 5, 0.94)
    pt3dadd(6.56, 8.41, 5, 0.94)
    pt3dadd(6.61, 8.57, 5, 0.94)
    pt3dadd(6.67, 8.77, 5, 0.94)
    pt3dadd(6.72, 8.88, 5, 0.94)
    pt3dadd(6.77, 9.09, 5, 0.94)
    pt3dadd(6.88, 9.09, 5, 0.94)
    pt3dadd(6.88, 9.25, 5, 0.94)
    pt3dadd(6.98, 9.36, 5, 0.94)
    pt3dadd(7.03, 9.52, 5, 0.94)
    pt3dadd(7.03, 9.73, 5, 0.94)
    pt3dadd(7.19, 9.88, 5, 0.94)
    pt3dadd(7.19, 10.09, 5, 0.94)
    pt3dadd(7.24, 10.25, 5, 0.94)
    pt3dadd(7.24, 10.41, 5, 0.94)
    pt3dadd(7.3, 10.62, 5, 0.94)
    pt3dadd(7.3, 10.88, 5, 0.94)
    pt3dadd(7.35, 10.99, 5, 0.94)
    pt3dadd(7.35, 11.3, 5, 0.94)
    pt3dadd(7.4, 11.51, 5, 0.94)
    pt3dadd(7.4, 12.14, 5, 0.94)
    pt3dadd(7.35, 12.25, 5, 0.94)
    pt3dadd(7.24, 12.35, 5, 0.94)
    pt3dadd(7.09, 12.46, 5, 0.94)
    pt3dadd(7.09, 12.62, 5, 0.94)
    pt3dadd(6.98, 12.62, 5, 0.94)
  }
  dend[1] {pt3dclear()
    pt3dadd(6.98, 12.62, 5, 0.94)
    pt3dadd(7.96, 12.47, 4, 0.84)
    pt3dadd(8.06, 12.57, 4, 0.84)
    pt3dadd(8.17, 12.68, 4, 0.84)
    pt3dadd(8.22, 12.78, 4, 0.84)
    pt3dadd(8.22, 12.89, 4, 0.84)
    pt3dadd(8.43, 12.99, 4, 0.84)
    pt3dadd(8.48, 13.1, 4, 0.84)
    pt3dadd(8.69, 13.15, 4, 0.84)
    pt3dadd(8.85, 13.26, 4, 0.84)
    pt3dadd(9.06, 13.26, 4, 0.84)
    pt3dadd(9.27, 13.41, 4, 0.84)
    pt3dadd(9.38, 13.41, 4, 0.84)
    pt3dadd(9.48, 13.52, 4, 0.84)
    pt3dadd(9.64, 13.47, 4, 0.84)
    pt3dadd(9.74, 13.41, 4, 0.84)
    pt3dadd(9.94, 13.36, 4, 0.84)
    pt3dadd(10.16, 13.36, 4, 0.84)
    pt3dadd(10.22, 13.26, 4, 0.84)
    pt3dadd(10.32, 13.15, 4, 0.84)
    pt3dadd(10.43, 13.15, 4, 0.84)
    pt3dadd(10.53, 13.05, 4, 0.84)
    pt3dadd(10.64, 12.99, 4, 0.84)
    pt3dadd(10.69, 12.89, 4, 0.84)
    pt3dadd(10.9, 12.84, 4, 0.84)
    pt3dadd(11, 12.78, 4, 0.84)
    pt3dadd(11.11, 12.63, 4, 0.84)
    pt3dadd(11.73, 12.21, 4, 0.94)
    pt3dadd(11.89, 12.21, 4, 0.94)
    pt3dadd(11.99, 12.15, 4, 0.94)
    pt3dadd(12.1, 12.1, 4, 0.94)
    pt3dadd(12.2, 12.05, 4, 0.94)
    pt3dadd(12.31, 11.94, 4, 0.94)
    pt3dadd(12.41, 11.84, 4, 0.94)
    pt3dadd(12.52, 11.78, 3.5, 0.94)
    pt3dadd(12.67, 11.68, 3.5, 0.94)
    pt3dadd(12.78, 11.57, 3.5, 0.94)
    pt3dadd(12.83, 11.47, 3, 0.94)
    pt3dadd(12.94, 11.36, 3, 0.94)
    pt3dadd(13.15, 11.15, 3, 0.94)
    pt3dadd(13.3, 11.05, 3, 0.94)
    pt3dadd(13.36, 10.94, 3, 0.94)
    pt3dadd(13.46, 10.89, 3, 0.94)
    pt3dadd(13.57, 10.84, 3, 0.94)
    pt3dadd(13.67, 10.79, 3, 0.94)
    pt3dadd(13.78, 10.73, 3, 0.94)
    pt3dadd(13.93, 10.73, 2.5, 0.94)
    pt3dadd(14.14, 10.79, 2.5, 0.94)
    pt3dadd(14.3, 10.84, 2.5, 0.94)
    pt3dadd(14.98, 10.84, 1.5, 0.94)
    pt3dadd(15.04, 10.73, 1.5, 0.94)
    pt3dadd(15.25, 10.68, 1.5, 0.94)
    pt3dadd(15.35, 10.63, 1, 0.94)
    pt3dadd(15.46, 10.58, 1, 0.94)
    pt3dadd(15.56, 10.63, 1, 0.94)
    pt3dadd(15.72, 10.73, 1, 0.94)
    pt3dadd(15.77, 10.89, 0.5, 0.94)
    pt3dadd(15.88, 11, 0.5, 0.94)
    pt3dadd(15.93, 11.15, 0.5, 0.94)
    pt3dadd(16.03, 11.26, 0.5, 0.94)
    pt3dadd(16.09, 11.47, 0, 0.94)
    pt3dadd(16.19, 11.52, 0, 0.94)
    pt3dadd(16.39, 11.73, 0, 0.94)
    pt3dadd(16.55, 11.84, -0.5, 0.94)
    pt3dadd(16.72, 11.94, -0.5, 0.94)
    pt3dadd(17.14, 11.94, -0.5, 0.94)
    pt3dadd(17.45, 12.1, -0.5, 0.94)
    pt3dadd(17.61, 12.15, -0.5, 0.94)
    pt3dadd(17.82, 12.21, -1, 0.94)
    pt3dadd(17.98, 12.26, -1.5, 0.94)
    pt3dadd(18.19, 12.21, -1.5, 0.94)
    pt3dadd(18.34, 12.15, -1.5, 0.94)
    pt3dadd(18.45, 12.1, -1.5, 0.94)
    pt3dadd(18.55, 12.05, -1.5, 0.94)
    pt3dadd(18.76, 11.84, -2, 0.94)
    pt3dadd(18.87, 11.73, -2, 0.94)
    pt3dadd(18.97, 11.52, -2, 0.94)
    pt3dadd(18.97, 11.36, -2, 0.94)
    pt3dadd(19.03, 11.26, -2, 0.94)
    pt3dadd(19.07, 11.15, -2, 0.94)
    pt3dadd(19.13, 11, -2, 0.94)
    pt3dadd(19.23, 10.89, -2, 0.94)
    pt3dadd(19.23, 10.68, -2, 0.94)
    pt3dadd(19.29, 10.58, -2, 0.94)
    pt3dadd(19.34, 10.47, -2.5, 0.94)
    pt3dadd(19.5, 10.42, -2.5, 0.94)
    pt3dadd(19.55, 10.31, -2.5, 0.94)
    pt3dadd(19.71, 10.26, -2.5, 0.94)
    pt3dadd(19.76, 10.16, -2.5, 0.94)
    pt3dadd(19.87, 10.1, -2.5, 0.94)
    pt3dadd(20.07, 10.1, -2.5, 0.94)
    pt3dadd(20.18, 10, -2.5, 0.94)
    pt3dadd(20.34, 9.94, -2.5, 0.94)
    pt3dadd(20.55, 9.84, -2.5, 0.94)
    pt3dadd(20.71, 9.78, -2.5, 0.94)
    pt3dadd(20.92, 9.78, -2.5, 0.94)
    pt3dadd(20.97, 9.63, -2.5, 0.94)
    pt3dadd(21.18, 9.63, -2.5, 0.94)
    pt3dadd(21.23, 9.52, -2.5, 0.94)
    pt3dadd(21.28, 9.42, -2.5, 0.94)
    pt3dadd(21.44, 9.36, -2.5, 0.94)
    pt3dadd(21.44, 9.16, -2.5, 0.94)
    pt3dadd(21.39, 9.05, -2.5, 0.94)
    pt3dadd(21.44, 8.89, -2.5, 0.94)
    pt3dadd(21.55, 8.78, -2.5, 0.94)
    pt3dadd(21.6, 8.63, -2.5, 0.94)
    pt3dadd(21.65, 8.47, -2.5, 0.94)
    pt3dadd(21.7, 8.36, -2.5, 0.94)
    pt3dadd(21.76, 8.26, -2.5, 0.94)
    pt3dadd(21.91, 8.21, -2.5, 0.94)
    pt3dadd(22.07, 8.11, -2.5, 0.94)
    pt3dadd(22.12, 8, -2.5, 0.94)
    pt3dadd(22.23, 7.95, -2.5, 0.94)
    pt3dadd(22.54, 7.89, -2.5, 0.94)
    pt3dadd(22.6, 7.79, -2.5, 0.94)
    pt3dadd(22.7, 7.74, -2.5, 0.94)
    pt3dadd(22.81, 7.68, -2.5, 0.94)
    pt3dadd(23.74, 7.8, -3.5, 1.05)
    pt3dadd(23.9, 7.91, -3.5, 1.05)
    pt3dadd(24.11, 7.96, -3.5, 1.05)
    pt3dadd(24.58, 7.96, -3.5, 1.05)
    pt3dadd(24.64, 7.91, -4, 1.05)
    pt3dadd(24.74, 7.85, -4, 1.05)
    pt3dadd(24.85, 7.8, -4, 1.05)
    pt3dadd(24.95, 7.75, -4, 1.05)
    pt3dadd(25.06, 7.64, -4, 1.05)
    pt3dadd(25.16, 7.59, -4, 1.05)
    pt3dadd(25.32, 7.43, -4, 1.05)
    pt3dadd(25.42, 7.33, -4, 1.05)
    pt3dadd(25.63, 7.33, -4.5, 1.05)
    pt3dadd(25.74, 7.28, -4.5, 1.05)
    pt3dadd(25.79, 7.17, -4.5, 1.05)
    pt3dadd(25.9, 7.07, -4.5, 1.05)
    pt3dadd(26, 7.07, -4.5, 1.05)
    pt3dadd(26.16, 7.01, -4.5, 1.05)
    pt3dadd(26.26, 6.91, -4.5, 1.05)
    pt3dadd(26.37, 6.8, -4.5, 1.05)
    pt3dadd(26.47, 6.7, -4.5, 1.05)
    pt3dadd(26.53, 6.54, -4.5, 1.05)
    pt3dadd(26.63, 6.44, -4.5, 1.05)
    pt3dadd(26.74, 6.33, -4.5, 1.05)
    pt3dadd(26.79, 6.28, -5, 1.05)
    pt3dadd(26.89, 6.23, -5, 1.05)
    pt3dadd(27, 6.12, -5, 1.05)
    pt3dadd(27.1, 6.01, -5, 1.05)
    pt3dadd(27.16, 5.91, -5, 1.05)
    pt3dadd(27.26, 5.8, -5, 1.05)
    pt3dadd(27.42, 5.7, -5, 1.05)
    pt3dadd(27.52, 5.65, -5, 1.05)
    pt3dadd(27.68, 5.65, -5.5, 1.05)
    pt3dadd(27.79, 5.59, -5.5, 1.05)
    pt3dadd(27.89, 5.54, -5.5, 1.05)
    pt3dadd(28.05, 5.49, -6.5, 1.05)
  }
  dend[2] {pt3dclear()
    pt3dadd(28.05, 5.49, -6.5, 1.05)
    pt3dadd(28.68, 5.12, -5.5, 1.05)
    pt3dadd(28.73, 5.01, -5.5, 1.05)
    pt3dadd(28.78, 4.8, -5.5, 1.05)
    pt3dadd(28.94, 4.65, -5.5, 1.05)
    pt3dadd(29.1, 4.49, -5.5, 1.05)
    pt3dadd(29.2, 4.38, -5.5, 1.05)
    pt3dadd(29.41, 4.38, -5.5, 1.05)
    pt3dadd(29.57, 4.33, -5.5, 1.05)
    pt3dadd(29.62, 4.23, -5.5, 1.05)
    pt3dadd(29.73, 4.12, -5.5, 1.05)
    pt3dadd(29.68, 3.91, -5.5, 1.05)
    pt3dadd(29.78, 3.81, -5.5, 1.05)
    pt3dadd(29.83, 3.6, -5.5, 1.05)
    pt3dadd(29.94, 3.65, -5.5, 1.05)
    pt3dadd(30.1, 3.54, -5.5, 1.05)
    pt3dadd(30.1, 3.39, -6, 1.05)
    pt3dadd(30.15, 3.23, -6, 1.05)
    pt3dadd(30.25, 3.12, -6, 1.05)
    pt3dadd(30.41, 2.91, -6, 1.05)
    pt3dadd(30.52, 2.81, -6, 1.05)
    pt3dadd(30.62, 2.76, -6, 1.05)
    pt3dadd(30.78, 2.6, -6, 1.05)
    pt3dadd(30.88, 2.49, -6, 1.05)
    pt3dadd(31.09, 2.49, -6, 1.05)
    pt3dadd(31.2, 2.44, -6, 1.05)
    pt3dadd(31.36, 2.44, -6, 1.05)
    pt3dadd(31.51, 2.34, -6, 1.05)
    pt3dadd(31.67, 2.34, -6, 1.05)
    pt3dadd(31.83, 2.27, -6, 1.05)
    pt3dadd(32.04, 2.18, -6, 1.05)
    pt3dadd(32.35, 2.23, -6.5, 1.05)
    pt3dadd(33.19, 1.28, -6.5, 0.94)
    pt3dadd(33.4, 1.18, -6.5, 0.94)
    pt3dadd(33.67, 1.18, -6.5, 0.94)
    pt3dadd(33.88, 1.23, -6.5, 0.94)
  }
}
proc shape3d_2() {
  dend[2] {
    pt3dadd(33.97, 1.28, -6.5, 0.94)
    pt3dadd(34.09, 1.28, -6.5, 0.94)
    pt3dadd(34.19, 1.23, -6.5, 0.94)
    pt3dadd(34.29, 1.23, -6.5, 0.94)
    pt3dadd(34.4, 1.18, -6.5, 0.94)
    pt3dadd(34.56, 1.12, -6.5, 0.94)
    pt3dadd(34.72, 1.07, -6.5, 0.94)
    pt3dadd(34.93, 0.97, -7, 0.94)
    pt3dadd(35.08, 0.81, -7, 0.94)
    pt3dadd(35.19, 0.71, -7.5, 0.94)
    pt3dadd(35.35, 0.71, -7.5, 0.94)
    pt3dadd(35.4, 0.6, -7.5, 0.94)
    pt3dadd(35.56, 0.44, -8, 0.94)
    pt3dadd(35.71, 0.34, -8, 0.94)
    pt3dadd(35.82, 0.23, -8, 0.94)
    pt3dadd(35.92, 0.13, -8, 0.94)
    pt3dadd(35.97, 0.02, -8, 0.94)
    pt3dadd(36.08, -0.03, -8, 0.94)
    pt3dadd(36.19, -0.14, -8, 0.94)
    pt3dadd(36.29, -0.45, -8, 0.94)
    pt3dadd(36.34, -0.56, -8, 0.94)
    pt3dadd(36.4, -0.71, -8, 0.94)
    pt3dadd(36.4, -0.82, -8, 0.94)
    pt3dadd(36.4, -0.92, -8, 0.94)
    pt3dadd(36.45, -1.03, -8.5, 0.94)
    pt3dadd(36.5, -1.12, -8.5, 0.94)
    pt3dadd(36.61, -1.24, -8.5, 0.94)
    pt3dadd(36.65, -1.34, -8.5, 0.94)
    pt3dadd(36.76, -1.45, -8.5, 0.94)
    pt3dadd(36.86, -1.61, -8.5, 0.94)
    pt3dadd(36.92, -1.71, -8.5, 0.94)
    pt3dadd(36.97, -1.87, -8.5, 0.94)
    pt3dadd(37.08, -1.87, -8.5, 0.94)
    pt3dadd(37.13, -2.02, -8.5, 0.94)
    pt3dadd(37.29, -2.19, -8.5, 0.94)
    pt3dadd(37.29, -2.29, -8.5, 0.94)
    pt3dadd(37.34, -2.4, -8.5, 0.94)
    pt3dadd(37.39, -2.5, -8.5, 0.94)
    pt3dadd(37.5, -2.61, -8.5, 0.94)
    pt3dadd(37.54, -2.71, -8.5, 0.94)
    pt3dadd(37.6, -2.82, -8.5, 0.94)
    pt3dadd(37.65, -2.97, -8.5, 0.94)
    pt3dadd(37.71, -3.13, -8.5, 0.94)
    pt3dadd(37.71, -3.39, -8.5, 0.94)
    pt3dadd(37.81, -3.5, -8.5, 0.94)
    pt3dadd(37.86, -3.61, -8.5, 0.94)
    pt3dadd(37.92, -3.71, -8.5, 0.94)
    pt3dadd(38.08, -3.87, -8.5, 0.94)
    pt3dadd(38.18, -3.97, -8.5, 0.94)
    pt3dadd(38.22, -4.08, -8.5, 0.94)
    pt3dadd(38.39, -4.13, -8.5, 0.94)
    pt3dadd(38.5, -4.18, -8.5, 0.94)
    pt3dadd(38.5, -4.34, -8.5, 0.94)
    pt3dadd(38.71, -4.34, -8.5, 0.94)
    pt3dadd(38.76, -4.5, -8.5, 0.94)
    pt3dadd(38.86, -4.66, -8.5, 0.94)
    pt3dadd(38.97, -4.76, -8.5, 0.94)
    pt3dadd(39.02, -4.92, -8.5, 0.94)
    pt3dadd(39.13, -5.01, -8.5, 0.94)
    pt3dadd(39.18, -5.13, -8.5, 0.94)
    pt3dadd(39.44, -5.39, -8.5, 0.94)
    pt3dadd(39.65, -5.5, -8.5, 0.94)
    pt3dadd(39.7, -5.6, -8.5, 0.94)
    pt3dadd(39.9, -5.71, -8.5, 0.94)
    pt3dadd(40.02, -5.81, -8.5, 0.94)
    pt3dadd(40.11, -5.87, -8.5, 0.94)
    pt3dadd(40.28, -5.97, -8.5, 0.94)
    pt3dadd(40.39, -6.02, -8.5, 0.94)
    pt3dadd(40.49, -6.08, -8.5, 0.94)
    pt3dadd(40.6, -6.13, -8.5, 0.94)
    pt3dadd(40.75, -6.13, -8.5, 0.94)
    pt3dadd(40.81, -6.23, -8.5, 0.94)
    pt3dadd(40.86, -6.34, -8.5, 0.94)
    pt3dadd(40.9, -6.55, -8.5, 0.94)
    pt3dadd(40.96, -6.71, -8.5, 0.94)
    pt3dadd(40.96, -6.86, -8.5, 0.94)
    pt3dadd(41.07, -6.92, -8.5, 0.94)
    pt3dadd(41.07, -7.13, -8.5, 0.94)
    pt3dadd(41.12, -7.34, -8.5, 0.94)
    pt3dadd(41.23, -7.39, -8.5, 0.94)
    pt3dadd(41.23, -7.55, -8.5, 0.94)
    pt3dadd(43.44, -8.15, -9, 0.94)
    pt3dadd(43.96, -8.15, -9, 0.94)
    pt3dadd(44.23, -8.19, -9, 0.94)
    pt3dadd(44.44, -8.3, -9, 0.94)
    pt3dadd(44.86, -8.36, -9, 0.94)
    pt3dadd(44.96, -8.46, -9, 0.94)
    pt3dadd(45.07, -8.57, -9, 0.94)
    pt3dadd(45.17, -8.57, -9, 0.94)
    pt3dadd(45.28, -8.57, -9.5, 0.94)
    pt3dadd(45.43, -8.61, -9.5, 0.94)
    pt3dadd(45.54, -8.72, -9.5, 0.94)
    pt3dadd(45.54, -8.88, -9.5, 0.94)
    pt3dadd(45.7, -8.99, -9.5, 0.94)
    pt3dadd(45.85, -9.03, -9.5, 0.94)
    pt3dadd(46.01, -9.09, -9.5, 0.94)
    pt3dadd(46.12, -9.14, -9.5, 0.94)
    pt3dadd(46.22, -9.25, -9.5, 0.94)
    pt3dadd(46.33, -9.25, -10, 0.94)
    pt3dadd(46.43, -9.3, -10, 0.94)
    pt3dadd(46.59, -9.35, -10, 0.94)
    pt3dadd(46.64, -9.46, -10, 0.94)
    pt3dadd(46.75, -9.56, -10, 0.94)
    pt3dadd(46.85, -9.56, -10, 0.94)
    pt3dadd(46.96, -9.67, -10, 0.94)
    pt3dadd(47.06, -9.72, -10, 0.94)
    pt3dadd(47.11, -9.83, -10, 0.94)
    pt3dadd(47.22, -9.93, -10, 0.94)
    pt3dadd(47.38, -9.99, -10, 0.94)
    pt3dadd(47.48, -10.19, -10, 0.94)
    pt3dadd(47.69, -10.25, -10, 0.94)
    pt3dadd(47.8, -10.35, -10, 0.94)
    pt3dadd(47.95, -10.41, -10, 0.94)
    pt3dadd(47.95, -10.46, -10.5, 0.94)
    pt3dadd(48.16, -10.46, -10.5, 0.94)
    pt3dadd(48.27, -10.56, -10.5, 0.94)
    pt3dadd(48.37, -10.67, -10.5, 0.94)
    pt3dadd(48.43, -10.77, -10.5, 0.94)
    pt3dadd(48.53, -10.83, -10.5, 0.94)
    pt3dadd(48.58, -10.98, -10.5, 0.94)
    pt3dadd(48.69, -11.09, -10.5, 0.94)
    pt3dadd(48.74, -11.19, -10.5, 0.94)
    pt3dadd(48.79, -11.35, -11, 0.94)
    pt3dadd(48.85, -11.46, -11, 0.94)
    pt3dadd(48.95, -11.51, -11, 0.94)
    pt3dadd(49, -11.72, -11, 0.94)
    pt3dadd(49.11, -11.88, -11, 0.94)
    pt3dadd(49.21, -12.09, -11, 0.94)
    pt3dadd(49.21, -12.25, -11, 0.94)
    pt3dadd(49.42, -12.4, -11, 0.94)
    pt3dadd(49.53, -12.51, -11, 0.94)
    pt3dadd(49.53, -12.67, -11, 0.94)
    pt3dadd(49.58, -12.77, -11, 0.94)
    pt3dadd(49.63, -12.88, -11, 0.94)
    pt3dadd(49.74, -12.98, -11, 0.94)
    pt3dadd(49.9, -13.14, -11, 0.94)
    pt3dadd(49.95, -13.35, -11, 0.94)
    pt3dadd(50.05, -13.51, -11, 0.94)
    pt3dadd(50.11, -13.72, -11, 0.94)
    pt3dadd(50.16, -13.82, -11, 0.94)
    pt3dadd(50.16, -13.93, -11, 0.94)
    pt3dadd(50.26, -14.03, -11, 0.94)
    pt3dadd(50.26, -14.14, -11, 0.94)
    pt3dadd(50.37, -14.3, -11, 0.94)
    pt3dadd(50.42, -14.4, -11, 0.94)
    pt3dadd(50.53, -14.51, -11, 0.94)
    pt3dadd(50.63, -14.61, -11, 0.94)
    pt3dadd(50.68, -14.72, -11, 0.94)
    pt3dadd(50.79, -14.82, -11, 0.94)
    pt3dadd(50.89, -14.98, -11, 0.94)
    pt3dadd(51.05, -15.08, -11, 0.94)
    pt3dadd(51.42, -15.45, -11, 0.94)
    pt3dadd(51.68, -15.56, -11, 0.94)
    pt3dadd(51.79, -15.66, -11, 0.94)
    pt3dadd(52, -15.77, -11, 0.94)
    pt3dadd(52.15, -15.93, -11, 0.94)
    pt3dadd(52.26, -15.93, -11, 0.94)
    pt3dadd(52.42, -16.07, -11, 0.94)
    pt3dadd(52.47, -16.19, -11, 0.94)
    pt3dadd(52.63, -16.14, -11, 0.94)
    pt3dadd(52.73, -16.19, -11, 0.94)
    pt3dadd(52.94, -16.23, -11, 0.94)
    pt3dadd(53.15, -16.23, -11, 0.94)
    pt3dadd(53.36, -16.29, -11, 0.94)
    pt3dadd(54.12, -16.79, -11.5, 0.94)
    pt3dadd(54.28, -16.79, -11.5, 0.94)
    pt3dadd(54.39, -16.89, -11.5, 0.94)
    pt3dadd(54.49, -17, -11.5, 0.94)
    pt3dadd(54.65, -17.14, -11.5, 0.94)
    pt3dadd(54.75, -17.26, -12, 0.94)
    pt3dadd(54.91, -17.42, -12, 0.94)
    pt3dadd(55.07, -17.52, -12, 0.94)
    pt3dadd(55.17, -17.63, -12, 0.94)
    pt3dadd(55.33, -17.68, -12, 0.94)
    pt3dadd(55.44, -17.79, -12.5, 0.94)
    pt3dadd(55.54, -17.84, -12.5, 0.94)
    pt3dadd(55.96, -17.84, -12.5, 0.94)
    pt3dadd(56.17, -17.73, -12.5, 0.94)
    pt3dadd(56.28, -17.73, -12.5, 0.94)
    pt3dadd(56.38, -17.68, -12.5, 0.94)
    pt3dadd(56.54, -17.63, -12.5, 0.94)
    pt3dadd(56.75, -17.52, -12.5, 0.94)
    pt3dadd(56.85, -17.47, -12.5, 0.94)
    pt3dadd(56.96, -17.42, -12.5, 0.94)
    pt3dadd(57.12, -17.3, -12.5, 0.94)
    pt3dadd(57.33, -17.3, -12.5, 0.94)
    pt3dadd(57.48, -17.21, -12.5, 0.94)
    pt3dadd(57.69, -17.14, -12.5, 0.94)
    pt3dadd(57.85, -17.1, -12.5, 0.94)
    pt3dadd(58.06, -17, -12, 0.94)
    pt3dadd(58.22, -16.89, -12, 0.94)
    pt3dadd(58.74, -16.63, -12, 0.94)
    pt3dadd(58.9, -16.57, -12, 0.94)
    pt3dadd(59.11, -16.57, -11.5, 0.94)
    pt3dadd(59.27, -16.52, -11.5, 0.94)
    pt3dadd(59.48, -16.57, -11.5, 0.94)
    pt3dadd(59.64, -16.52, -11.5, 0.94)
    pt3dadd(59.85, -16.52, -11.5, 0.94)
    pt3dadd(59.95, -16.57, -11.5, 0.94)
    pt3dadd(60.11, -16.68, -11.5, 0.94)
    pt3dadd(60.27, -16.73, -11.5, 0.94)
    pt3dadd(60.37, -16.84, -11.5, 0.94)
    pt3dadd(60.42, -16.94, -11.5, 0.94)
    pt3dadd(60.42, -18.3, -13, 0.94)
    pt3dadd(60.37, -18.52, -13, 0.94)
    pt3dadd(60.37, -18.73, -13.5, 0.94)
    pt3dadd(60.48, -18.78, -13.5, 0.94)
    pt3dadd(60.53, -18.89, -13.5, 0.94)
    pt3dadd(60.58, -18.98, -14, 0.94)
    pt3dadd(60.63, -19.1, -14, 0.94)
    pt3dadd(60.69, -19.2, -14, 0.94)
    pt3dadd(60.79, -19.14, -14, 0.94)
    pt3dadd(60.9, -19.26, -14, 0.94)
    pt3dadd(61.05, -19.36, -14, 0.94)
    pt3dadd(61.21, -19.47, -14.5, 0.94)
    pt3dadd(61.42, -19.68, -14.5, 0.94)
    pt3dadd(61.63, -19.68, -14.5, 0.94)
    pt3dadd(61.74, -19.73, -14.5, 0.94)
    pt3dadd(61.84, -19.78, -14.5, 0.94)
    pt3dadd(62, -19.89, -14.5, 0.94)
    pt3dadd(62.1, -19.98, -14.5, 0.94)
    pt3dadd(62.26, -20.14, -14.5, 0.94)
    pt3dadd(62.37, -20.26, -14.5, 0.94)
    pt3dadd(62.52, -20.3, -14.5, 0.94)
    pt3dadd(62.68, -20.41, -15, 0.94)
    pt3dadd(62.79, -20.47, -15, 0.94)
    pt3dadd(62.89, -20.57, -15, 0.94)
    pt3dadd(63.05, -20.62, -15, 0.94)
    pt3dadd(63.15, -20.78, -15, 0.94)
    pt3dadd(63.15, -20.89, -15, 0.94)
    pt3dadd(63.31, -20.94, -15, 0.94)
    pt3dadd(63.31, -21.1, -15, 0.94)
    pt3dadd(63.36, -21.2, -15, 0.94)
    pt3dadd(63.47, -21.31, -15, 0.94)
    pt3dadd(63.57, -21.46, -15, 0.94)
    pt3dadd(63.68, -21.52, -15, 0.94)
    pt3dadd(63.84, -21.62, -15, 0.94)
    pt3dadd(63.89, -21.73, -15, 0.94)
    pt3dadd(63.99, -21.78, -15, 0.94)
    pt3dadd(64.09, -21.83, -15, 0.94)
    pt3dadd(64.15, -21.94, -15, 0.94)
    pt3dadd(64.26, -21.83, -15, 0.94)
    pt3dadd(64.41, -21.68, -15, 0.94)
    pt3dadd(64.52, -21.57, -15.5, 0.94)
    pt3dadd(64.56, -21.41, -15.5, 0.94)
    pt3dadd(64.94, -21.04, -15.5, 0.94)
    pt3dadd(65.09, -20.99, -15.5, 0.94)
    pt3dadd(65.31, -20.99, -15.5, 0.94)
    pt3dadd(65.45, -20.89, -15.5, 0.94)
  }
}
proc shape3d_3() {
  dend[2] {
    pt3dadd(65.67, -20.83, -16, 0.94)
    pt3dadd(65.94, -20.83, -16, 0.94)
    pt3dadd(66.09, -20.78, -16, 0.94)
    pt3dadd(66.09, -20.89, -16, 0.94)
    pt3dadd(66.15, -20.99, -16, 0.94)
    pt3dadd(66.36, -20.99, -16, 0.94)
    pt3dadd(66.45, -21.04, -16, 0.94)
    pt3dadd(66.56, -21.15, -16, 0.94)
    pt3dadd(66.78, -21.25, -16, 0.94)
    pt3dadd(66.93, -21.31, -16, 0.94)
    pt3dadd(66.98, -21.41, -16, 0.94)
    pt3dadd(67.09, -21.46, -16, 0.94)
    pt3dadd(67.41, -21.78, -16, 0.94)
    pt3dadd(67.56, -21.94, -16, 0.94)
    pt3dadd(67.67, -22.04, -16, 0.94)
    pt3dadd(67.77, -22.25, -16.5, 0.94)
    pt3dadd(67.88, -22.36, -16.5, 0.94)
    pt3dadd(67.93, -22.52, -16.5, 0.94)
    pt3dadd(68.04, -22.62, -16.5, 0.94)
    pt3dadd(68.09, -22.73, -16.5, 0.94)
    pt3dadd(68.09, -22.88, -16.5, 0.94)
    pt3dadd(68.14, -22.99, -16.5, 0.94)
    pt3dadd(68.19, -23.09, -16.5, 0.94)
    pt3dadd(68.25, -23.25, -16.5, 0.94)
    pt3dadd(68.34, -23.36, -16.5, 0.94)
    pt3dadd(68.34, -23.52, -16.5, 0.94)
    pt3dadd(68.4, -23.62, -16.5, 0.94)
    pt3dadd(68.4, -23.83, -16.5, 0.94)
    pt3dadd(68.45, -23.99, -16.5, 0.94)
    pt3dadd(68.45, -24.3, -17, 0.94)
    pt3dadd(68.51, -24.46, -17, 0.94)
    pt3dadd(68.51, -24.83, -17, 0.94)
    pt3dadd(68.45, -25.04, -17, 0.94)
    pt3dadd(68.4, -25.2, -17, 0.94)
    pt3dadd(68.4, -25.41, -17, 0.94)
    pt3dadd(68.34, -25.57, -17, 0.94)
    pt3dadd(68.34, -26.35, -17, 0.94)
    pt3dadd(68.4, -26.46, -17, 0.94)
    pt3dadd(68.45, -26.56, -17, 0.94)
    pt3dadd(68.51, -26.67, -17, 0.94)
    pt3dadd(68.56, -26.83, -17, 0.94)
    pt3dadd(68.61, -26.93, -17, 0.94)
    pt3dadd(68.67, -27.04, -17, 0.94)
    pt3dadd(68.77, -27.14, -17, 0.94)
    pt3dadd(68.93, -27.25, -17, 0.94)
    pt3dadd(69.14, -27.41, -17, 0.94)
    pt3dadd(69.23, -27.51, -17, 0.94)
    pt3dadd(69.45, -27.51, -17, 0.94)
    pt3dadd(69.51, -27.67, -17, 0.94)
    pt3dadd(69.56, -27.77, -17, 0.94)
    pt3dadd(69.56, -28.4, -17, 0.94)
    pt3dadd(69.51, -28.61, -17, 0.94)
    pt3dadd(69.4, -28.88, -17, 0.94)
    pt3dadd(69.4, -29.35, -17, 0.94)
    pt3dadd(69.34, -29.51, -17, 0.94)
    pt3dadd(69.34, -29.72, -17, 0.94)
    pt3dadd(69.3, -29.88, -17, 0.94)
    pt3dadd(69.3, -30.09, -17, 0.94)
    pt3dadd(69.34, -30.3, -17, 0.94)
    pt3dadd(69.34, -30.56, -17, 0.94)
    pt3dadd(69.4, -30.77, -17, 0.94)
    pt3dadd(69.4, -30.93, -17, 0.94)
    pt3dadd(69.45, -31.03, -17, 0.94)
    pt3dadd(69.58, -31.31, -17, 0.94)
    pt3dadd(69.79, -31.31, -17, 0.94)
    pt3dadd(69.9, -31.25, -17, 0.94)
    pt3dadd(70.06, -31.2, -17, 0.94)
    pt3dadd(70.2, -31.15, -17, 0.94)
    pt3dadd(70.42, -30.99, -17, 0.94)
    pt3dadd(70.53, -30.89, -17, 0.94)
    pt3dadd(70.63, -30.78, -17, 0.94)
    pt3dadd(70.79, -30.62, -17, 0.94)
    pt3dadd(70.9, -30.52, -17, 0.94)
    pt3dadd(70.95, -30.36, -17, 0.94)
    pt3dadd(71.05, -30.15, -17, 0.94)
    pt3dadd(71.05, -29.94, -17, 0.94)
    pt3dadd(71.11, -29.73, -17, 0.94)
    pt3dadd(71.11, -29.15, -17, 0.94)
    pt3dadd(71.05, -29.05, -17, 0.94)
    pt3dadd(70.95, -28.99, -17, 0.94)
    pt3dadd(70.9, -28.89, -17, 0.94)
    pt3dadd(70.84, -28.68, -17, 0.94)
    pt3dadd(70.79, -28.52, -17, 0.94)
    pt3dadd(70.69, -28.31, -17, 0.94)
    pt3dadd(70.69, -28.1, -17, 0.94)
    pt3dadd(70.63, -27.94, -17, 0.94)
    pt3dadd(70.63, -27.68, -17, 0.94)
    pt3dadd(70.58, -27.57, -17, 0.94)
    pt3dadd(70.58, -27.15, -17, 0.94)
    pt3dadd(70.63, -27.05, -17, 0.94)
    pt3dadd(70.73, -26.89, -17, 0.94)
    pt3dadd(70.84, -26.79, -17, 0.94)
    pt3dadd(71.64, -27.5, -17, 0.94)
    pt3dadd(71.64, -27.98, -17, 0.94)
    pt3dadd(71.69, -28.08, -17, 0.94)
    pt3dadd(71.73, -28.24, -17, 0.94)
    pt3dadd(71.8, -28.45, -17, 0.94)
    pt3dadd(71.84, -28.66, -17, 0.94)
    pt3dadd(71.9, -28.92, -17, 0.94)
    pt3dadd(71.9, -29.08, -17, 0.94)
    pt3dadd(72.06, -29.13, -17, 0.94)
    pt3dadd(72.11, -29.29, -17, 0.94)
    pt3dadd(72.22, -29.4, -17, 0.94)
    pt3dadd(72.37, -29.45, -17, 0.94)
    pt3dadd(72.43, -29.55, -17, 0.94)
    pt3dadd(72.53, -29.71, -17, 0.94)
    pt3dadd(72.69, -29.87, -17, 0.94)
    pt3dadd(72.73, -29.97, -17, 0.94)
    pt3dadd(72.84, -30.08, -17, 0.94)
    pt3dadd(72.9, -30.18, -17, 0.94)
    pt3dadd(72.95, -30.29, -17, 0.94)
    pt3dadd(73.06, -30.34, -17, 0.94)
    pt3dadd(73.16, -30.39, -17, 0.94)
    pt3dadd(73.16, -30.55, -17, 0.94)
    pt3dadd(73.31, -30.66, -17, 0.94)
    pt3dadd(73.37, -30.81, -17, 0.94)
    pt3dadd(73.42, -30.92, -17, 0.94)
    pt3dadd(73.53, -31.08, -17, 0.94)
    pt3dadd(73.63, -31.18, -17, 0.94)
    pt3dadd(73.69, -31.29, -17, 0.94)
    pt3dadd(73.79, -31.45, -17, 0.94)
    pt3dadd(73.84, -31.55, -17, 0.94)
    pt3dadd(73.9, -31.81, -17, 0.94)
    pt3dadd(73.9, -32.08, -17.5, 0.94)
    pt3dadd(73.95, -32.29, -17.5, 0.94)
    pt3dadd(74.11, -32.44, -17.5, 0.94)
    pt3dadd(74.2, -32.54, -17.5, 0.94)
    pt3dadd(74.42, -32.54, -17.5, 0.94)
    pt3dadd(74.68, -32.6, -18, 0.94)
    pt3dadd(74.84, -32.71, -18, 0.94)
    pt3dadd(75.26, -32.71, -18.5, 0.94)
    pt3dadd(75.31, -32.86, -18.5, 0.94)
    pt3dadd(75.42, -32.97, -18.5, 0.94)
    pt3dadd(75.52, -33.08, -18.5, 0.94)
    pt3dadd(75.63, -33.22, -18.5, 0.94)
    pt3dadd(75.63, -33.39, -18.5, 0.94)
    pt3dadd(75.68, -33.6, -18.5, 0.94)
    pt3dadd(75.79, -33.71, -18.5, 0.94)
    pt3dadd(75.79, -34.13, -19, 0.94)
    pt3dadd(75.84, -34.28, -19, 0.94)
    pt3dadd(75.89, -34.54, -19, 0.94)
    pt3dadd(75.89, -34.86, -19, 0.94)
    pt3dadd(75.94, -35.02, -19, 0.94)
    pt3dadd(75.94, -35.65, -19.5, 0.94)
    pt3dadd(76, -35.76, -19.5, 0.94)
    pt3dadd(76, -35.97, -19.5, 0.94)
    pt3dadd(75.94, -36.11, -19.5, 0.94)
    pt3dadd(75.94, -36.54, -19.5, 0.94)
    pt3dadd(75.89, -36.7, -19.5, 0.94)
    pt3dadd(75.89, -37.11, -19.5, 0.94)
    pt3dadd(75.84, -37.28, -19.5, 0.94)
    pt3dadd(75.84, -37.9, -19.5, 0.94)
    pt3dadd(75.89, -38.07, -19.5, 0.94)
    pt3dadd(75.89, -38.28, -19.5, 0.94)
    pt3dadd(76, -38.54, -19.5, 0.94)
    pt3dadd(76.09, -38.65, -19.5, 0.94)
    pt3dadd(76.15, -38.81, -19.5, 0.94)
    pt3dadd(76.2, -38.9, -19.5, 0.94)
    pt3dadd(76.31, -39.02, -19.5, 0.94)
    pt3dadd(77.75, -39.46, -20, 0.94)
    pt3dadd(77.75, -39.51, -21, 0.94)
    pt3dadd(77.84, -39.56, -21, 0.94)
    pt3dadd(77.84, -39.67, -21, 0.94)
    pt3dadd(77.91, -39.82, -21, 0.94)
    pt3dadd(77.91, -40.03, -21, 0.94)
    pt3dadd(77.95, -40.19, -21, 0.94)
    pt3dadd(77.95, -40.51, -21.5, 0.94)
    pt3dadd(77.84, -40.65, -21.5, 0.94)
    pt3dadd(77.75, -40.72, -22, 0.94)
    pt3dadd(77.7, -40.93, -22, 0.94)
    pt3dadd(77.7, -41.3, -22, 0.94)
    pt3dadd(77.64, -41.45, -22.5, 0.94)
    pt3dadd(77.7, -41.61, -22.5, 0.94)
    pt3dadd(77.8, -41.82, -22.5, 0.94)
    pt3dadd(77.84, -41.98, -22.5, 0.94)
    pt3dadd(77.84, -42.19, -22.5, 0.94)
    pt3dadd(77.95, -42.29, -22.5, 0.94)
    pt3dadd(78.01, -42.4, -22.5, 0.94)
    pt3dadd(78.06, -42.56, -22.5, 0.94)
    pt3dadd(78.01, -42.66, -22.5, 0.94)
    pt3dadd(78.06, -42.82, -23, 0.94)
    pt3dadd(78.06, -43.03, -23, 0.94)
    pt3dadd(78.12, -43.19, -23, 0.94)
    pt3dadd(78.12, -43.98, -23, 0.94)
    pt3dadd(78.06, -44.13, -23, 0.94)
    pt3dadd(78.01, -44.24, -23, 0.94)
    pt3dadd(77.91, -44.5, -23.5, 0.94)
    pt3dadd(77.84, -44.66, -23.5, 0.94)
    pt3dadd(77.75, -44.82, -23.5, 0.94)
    pt3dadd(77.8, -44.92, -23.5, 0.94)
    pt3dadd(77.8, -45.13, -23.5, 0.94)
    pt3dadd(77.7, -45.29, -23.5, 0.94)
    pt3dadd(77.64, -45.45, -23.5, 0.94)
    pt3dadd(77.59, -45.61, -23.5, 0.94)
    pt3dadd(77.59, -45.92, -23.5, 0.94)
    pt3dadd(77.54, -46.08, -24, 0.94)
    pt3dadd(77.54, -46.55, -24, 0.94)
    pt3dadd(77.48, -46.71, -24, 0.94)
    pt3dadd(77.48, -47.24, -24, 0.94)
    pt3dadd(77.54, -47.97, -24, 0.94)
    pt3dadd(77.59, -48.18, -24, 0.94)
    pt3dadd(77.64, -48.34, -24, 0.94)
    pt3dadd(77.64, -48.55, -24, 0.94)
    pt3dadd(77.7, -48.71, -24, 0.94)
    pt3dadd(77.7, -48.81, -24, 0.94)
    pt3dadd(77.75, -48.97, -24, 0.94)
    pt3dadd(77.8, -49.08, -24, 0.94)
    pt3dadd(77.84, -49.18, -24, 0.94)
    pt3dadd(77.84, -49.44, -24, 0.94)
    pt3dadd(77.91, -49.6, -24, 0.94)
    pt3dadd(78.01, -49.71, -24, 0.94)
    pt3dadd(78.01, -50.34, -24, 0.94)
    pt3dadd(78.06, -50.55, -24, 0.94)
    pt3dadd(78.06, -50.71, -24, 0.94)
    pt3dadd(78.12, -50.81, -24, 0.94)
    pt3dadd(78.17, -50.92, -24, 0.94)
    pt3dadd(78.17, -51.02, -24, 0.94)
    pt3dadd(78.27, -51.18, -24, 0.94)
    pt3dadd(78.7, -52.31, -24.5, 0.94)
    pt3dadd(78.75, -52.41, -24.5, 0.94)
    pt3dadd(78.91, -52.41, -24.5, 0.94)
    pt3dadd(79.01, -52.57, -24.5, 0.94)
    pt3dadd(78.95, -52.67, -24.5, 0.94)
    pt3dadd(79.01, -52.89, -24.5, 0.94)
    pt3dadd(79.06, -52.99, -24.5, 0.94)
    pt3dadd(79.12, -53.15, -24.5, 0.94)
    pt3dadd(79.22, -53.31, -24.5, 0.94)
    pt3dadd(79.17, -53.46, -24.5, 0.94)
    pt3dadd(79.28, -53.52, -25, 0.94)
    pt3dadd(79.33, -53.73, -25, 0.94)
    pt3dadd(79.33, -53.99, -25.5, 0.94)
    pt3dadd(79.38, -54.2, -25.5, 0.94)
    pt3dadd(79.43, -54.25, -26, 0.94)
    pt3dadd(79.48, -54.36, -26, 0.94)
    pt3dadd(79.54, -54.46, -26.5, 0.94)
    pt3dadd(79.64, -54.57, -26.5, 0.94)
    pt3dadd(79.75, -54.62, -26.5, 0.94)
    pt3dadd(79.84, -54.73, -26.5, 0.94)
    pt3dadd(80.06, -54.88, -26.5, 0.94)
    pt3dadd(80.17, -55.09, -26.5, 0.94)
    pt3dadd(80.22, -55.25, -26.5, 0.94)
    pt3dadd(80.33, -55.51, -27, 0.94)
    pt3dadd(80.38, -55.67, -27, 0.94)
    pt3dadd(80.48, -55.78, -27, 0.94)
    pt3dadd(80.64, -55.78, -27, 0.94)
    pt3dadd(80.69, -55.93, -27, 0.94)
    pt3dadd(80.8, -56.04, -27, 0.94)
    pt3dadd(80.95, -56.14, -27, 0.94)
    pt3dadd(81.11, -56.09, -27, 0.94)
  }
}
proc shape3d_4() {
  dend[2] {
    pt3dadd(81.38, -56.2, -27, 0.94)
    pt3dadd(81.59, -56.2, -27.5, 0.94)
    pt3dadd(81.53, -56.41, -28, 0.94)
    pt3dadd(81.69, -56.51, -28, 0.94)
    pt3dadd(81.64, -56.88, -28, 0.94)
    pt3dadd(81.73, -56.93, -28, 0.94)
    pt3dadd(81.8, -57.14, -28, 0.94)
    pt3dadd(81.84, -57.25, -28, 0.94)
    pt3dadd(81.84, -57.41, -28, 0.94)
    pt3dadd(81.95, -57.62, -28, 0.94)
    pt3dadd(82.11, -57.77, -28.5, 0.94)
    pt3dadd(82.27, -57.88, -28.5, 0.94)
    pt3dadd(82.43, -57.83, -28.5, 0.94)
    pt3dadd(82.69, -57.83, -28.5, 0.94)
    pt3dadd(82.85, -57.77, -28.5, 0.94)
    pt3dadd(83.06, -57.83, -28.5, 0.94)
    pt3dadd(83.21, -57.83, -28.5, 0.94)
    pt3dadd(83.42, -57.98, -28.5, 0.94)
    pt3dadd(83.79, -57.93, -28.5, 0.94)
    pt3dadd(83.95, -57.98, -29, 0.94)
    pt3dadd(84.05, -58.09, -29, 0.94)
    pt3dadd(84.21, -58.09, -29, 0.94)
    pt3dadd(84.32, -58.14, -29.5, 0.94)
    pt3dadd(84.42, -58.25, -29.5, 0.94)
    pt3dadd(84.53, -58.35, -29.5, 0.94)
    pt3dadd(84.68, -58.51, -29.5, 0.94)
    pt3dadd(84.84, -58.56, -29.5, 0.94)
    pt3dadd(84.95, -58.67, -29.5, 0.94)
    pt3dadd(85, -58.77, -29.5, 0.94)
    pt3dadd(85.1, -58.88, -29.5, 0.94)
    pt3dadd(85.21, -58.93, -29.5, 0.94)
    pt3dadd(85.31, -58.93, -29.5, 0.94)
    pt3dadd(85.42, -59.04, -29.5, 0.94)
    pt3dadd(85.52, -59.09, -29.5, 0.94)
    pt3dadd(85.63, -59.14, -29.5, 0.94)
    pt3dadd(85.73, -59.19, -29.5, 0.94)
    pt3dadd(86.15, -59.19, -29.5, 0.94)
    pt3dadd(86.26, -59.25, -29.5, 0.94)
    pt3dadd(86.47, -59.35, -29.5, 0.94)
    pt3dadd(86.57, -59.46, -29.5, 0.94)
    pt3dadd(86.68, -59.56, -29.5, 0.94)
    pt3dadd(86.73, -59.67, -29.5, 0.94)
    pt3dadd(86.84, -59.72, -29.5, 0.94)
    pt3dadd(87.05, -59.88, -29.5, 0.94)
    pt3dadd(87.2, -59.93, -29.5, 0.94)
    pt3dadd(87.36, -60.03, -29.5, 0.94)
    pt3dadd(87.57, -60.19, -29.5, 0.94)
    pt3dadd(87.94, -60.19, -29.5, 0.94)
    pt3dadd(88.04, -60.09, -29.5, 0.94)
    pt3dadd(88.15, -60.03, -29.5, 0.94)
    pt3dadd(88.36, -59.93, -29.5, 0.94)
    pt3dadd(88.57, -59.93, -29.5, 0.94)
    pt3dadd(88.73, -59.88, -29.5, 0.94)
    pt3dadd(88.99, -59.77, -29.5, 0.94)
    pt3dadd(89.2, -59.77, -29.5, 0.94)
    pt3dadd(89.41, -59.72, -29.5, 0.94)
    pt3dadd(89.62, -59.67, -29.5, 0.94)
    pt3dadd(89.72, -59.61, -29.5, 0.94)
    pt3dadd(89.83, -59.61, -29.5, 0.94)
    pt3dadd(89.93, -59.67, -29.5, 0.94)
    pt3dadd(90.09, -59.72, -29.5, 0.94)
    pt3dadd(90.14, -59.82, -29.5, 0.94)
    pt3dadd(90.25, -59.93, -29.5, 0.94)
    pt3dadd(90.25, -60.03, -29.5, 0.94)
    pt3dadd(90.3, -60.14, -29.5, 0.94)
    pt3dadd(90.41, -60.3, -29.5, 0.94)
    pt3dadd(90.56, -60.46, -29.5, 0.94)
    pt3dadd(90.67, -60.61, -29.5, 0.94)
    pt3dadd(90.77, -60.72, -29.5, 0.94)
    pt3dadd(91.04, -60.72, -29.5, 0.94)
    pt3dadd(91.19, -60.77, -29.5, 0.94)
    pt3dadd(91.3, -60.82, -29.5, 0.94)
    pt3dadd(91.4, -60.93, -29.5, 0.94)
    pt3dadd(91.82, -60.93, -29.5, 0.94)
    pt3dadd(91.93, -60.98, -29.5, 0.94)
    pt3dadd(92.03, -61.03, -29.5, 0.94)
    pt3dadd(92.14, -61.14, -29.5, 0.94)
    pt3dadd(92.24, -61.3, -29.5, 0.94)
    pt3dadd(92.35, -61.4, -29.5, 0.94)
    pt3dadd(92.35, -61.56, -29.5, 0.94)
    pt3dadd(92.45, -61.66, -29.5, 0.94)
    pt3dadd(92.61, -61.87, -29.5, 0.94)
    pt3dadd(92.66, -62.08, -29.5, 0.94)
    pt3dadd(92.87, -62.3, -29.5, 0.94)
    pt3dadd(93.22, -61.65, -31, 0.94)
    pt3dadd(93.32, -61.76, -31, 0.94)
    pt3dadd(93.38, -61.86, -31.5, 0.94)
    pt3dadd(93.48, -62.02, -31.5, 0.94)
    pt3dadd(93.59, -62.18, -31.5, 0.94)
    pt3dadd(93.69, -62.28, -31.5, 0.94)
    pt3dadd(93.8, -62.39, -31.5, 0.94)
    pt3dadd(93.8, -62.6, -31.5, 0.94)
    pt3dadd(93.85, -62.76, -31.5, 0.94)
    pt3dadd(93.8, -62.97, -31.5, 0.94)
    pt3dadd(93.9, -63.02, -31.5, 0.94)
    pt3dadd(93.85, -63.23, -31.5, 0.94)
    pt3dadd(93.8, -63.39, -31.5, 0.94)
    pt3dadd(93.8, -63.6, -31.5, 0.94)
    pt3dadd(93.69, -63.65, -31.5, 0.94)
    pt3dadd(93.64, -63.91, -32, 0.94)
    pt3dadd(93.64, -64.23, -32, 0.94)
    pt3dadd(93.69, -64.39, -32, 0.94)
    pt3dadd(93.69, -64.81, -32, 0.94)
    pt3dadd(93.64, -64.95, -32, 0.94)
    pt3dadd(93.64, -65.17, -32, 0.94)
    pt3dadd(93.74, -65.44, -32, 0.94)
    pt3dadd(93.85, -65.54, -32, 0.94)
    pt3dadd(93.9, -65.65, -32.5, 0.94)
    pt3dadd(94.11, -65.7, -32.5, 0.94)
    pt3dadd(94.27, -65.65, -32.5, 0.94)
    pt3dadd(94.37, -65.7, -33, 0.94)
    pt3dadd(94.48, -65.75, -33, 0.94)
    pt3dadd(94.58, -65.8, -33, 0.94)
    pt3dadd(94.69, -65.8, -33, 0.94)
    pt3dadd(94.85, -65.91, -33.5, 0.94)
    pt3dadd(95, -66.06, -33.5, 0.94)
    pt3dadd(95.16, -66.17, -33.5, 0.94)
    pt3dadd(95.27, -66.23, -33.5, 0.94)
    pt3dadd(95.37, -66.23, -34, 0.94)
    pt3dadd(95.48, -66.38, -34.5, 0.94)
    pt3dadd(95.48, -66.54, -34.5, 0.94)
    pt3dadd(95.58, -66.59, -34.5, 0.94)
    pt3dadd(95.69, -66.7, -34.5, 0.94)
    pt3dadd(95.79, -66.8, -34.5, 0.94)
    pt3dadd(95.9, -66.95, -34.5, 0.94)
    pt3dadd(96.11, -67.06, -34.5, 0.94)
    pt3dadd(96.32, -67.12, -34.5, 0.94)
    pt3dadd(96.63, -67.12, -34.5, 0.94)
    pt3dadd(96.79, -67.06, -34.5, 0.94)
    pt3dadd(96.95, -67.06, -34.5, 0.94)
    pt3dadd(97.1, -67.01, -34.5, 0.94)
    pt3dadd(97.63, -67.01, -34.5, 0.94)
    pt3dadd(97.73, -67.12, -34.5, 0.94)
    pt3dadd(97.89, -67.12, -34.5, 0.94)
    pt3dadd(98.05, -67.17, -34.5, 0.94)
    pt3dadd(98.21, -67.33, -34.5, 0.94)
    pt3dadd(98.31, -67.43, -34.5, 0.94)
    pt3dadd(98.57, -67.54, -34.5, 0.94)
    pt3dadd(98.68, -67.59, -34.5, 0.94)
    pt3dadd(98.84, -67.59, -34.5, 0.94)
    pt3dadd(99.05, -67.54, -34.5, 0.94)
    pt3dadd(99.2, -67.48, -34.5, 0.94)
    pt3dadd(99.41, -67.43, -34.5, 0.94)
    pt3dadd(99.68, -67.48, -34.5, 0.94)
    pt3dadd(99.83, -67.54, -34.5, 0.94)
    pt3dadd(100.04, -67.64, -34.5, 0.94)
    pt3dadd(100.2, -67.7, -34.5, 0.94)
    pt3dadd(100.36, -67.7, -34.5, 0.94)
    pt3dadd(100.41, -67.8, -34.5, 0.94)
    pt3dadd(100.62, -67.84, -34.5, 0.94)
    pt3dadd(100.67, -68.01, -34.5, 0.94)
    pt3dadd(100.94, -68.12, -34.5, 0.94)
    pt3dadd(101.09, -68.28, -34.5, 0.94)
    pt3dadd(101.3, -68.48, -34.5, 0.94)
    pt3dadd(101.57, -68.59, -34.5, 0.94)
    pt3dadd(101.78, -68.7, -34.5, 0.94)
    pt3dadd(101.88, -68.84, -34.5, 0.94)
    pt3dadd(103.16, -69.18, -34.5, 0.94)
    pt3dadd(103.37, -69.18, -34.5, 0.94)
    pt3dadd(103.58, -69.29, -34.5, 0.94)
    pt3dadd(103.68, -69.34, -34.5, 0.94)
    pt3dadd(103.94, -69.34, -34.5, 0.94)
    pt3dadd(103.94, -69.55, -34, 0.94)
    pt3dadd(104, -69.7, -34, 0.94)
    pt3dadd(104.1, -69.81, -33.5, 0.94)
    pt3dadd(104.1, -69.97, -33.5, 0.94)
    pt3dadd(104.21, -70.08, -33.5, 0.94)
    pt3dadd(104.21, -70.29, -33.5, 0.94)
    pt3dadd(104.31, -70.44, -33.5, 0.94)
    pt3dadd(104.47, -70.59, -33.5, 0.94)
    pt3dadd(104.68, -70.81, -33.5, 0.94)
    pt3dadd(104.83, -70.81, -33.5, 0.94)
    pt3dadd(104.99, -70.87, -33.5, 0.94)
    pt3dadd(105.2, -70.81, -33.5, 0.94)
    pt3dadd(105.36, -70.76, -34.5, 0.94)
    pt3dadd(105.78, -70.76, -34.5, 0.94)
    pt3dadd(105.94, -70.7, -34.5, 0.94)
    pt3dadd(106.15, -70.59, -34.5, 0.94)
    pt3dadd(106.25, -70.66, -34.5, 0.94)
    pt3dadd(106.41, -70.59, -35, 0.94)
    pt3dadd(106.51, -70.59, -35, 0.94)
    pt3dadd(106.62, -70.5, -35, 0.94)
    pt3dadd(106.88, -70.5, -35, 0.94)
    pt3dadd(107.09, -70.44, -35.5, 0.94)
    pt3dadd(107.41, -70.44, -35.5, 0.94)
    pt3dadd(107.56, -70.39, -35.5, 0.94)
    pt3dadd(107.67, -70.29, -35.5, 0.94)
    pt3dadd(107.83, -70.18, -36, 0.94)
    pt3dadd(107.93, -70.13, -36, 0.94)
    pt3dadd(107.98, -70.02, -36, 0.94)
    pt3dadd(108.46, -70.02, -36.5, 0.94)
    pt3dadd(108.67, -70.02, -36.5, 0.94)
    pt3dadd(108.77, -70.08, -36.5, 0.94)
    pt3dadd(108.93, -70.08, -36.5, 0.94)
    pt3dadd(108.93, -69.92, -36.5, 0.94)
    pt3dadd(109.03, -69.81, -37, 0.94)
    pt3dadd(109.09, -69.66, -37, 0.94)
    pt3dadd(109.14, -69.55, -37, 0.94)
    pt3dadd(109.19, -69.39, -37, 0.94)
    pt3dadd(109.19, -69.23, -37, 0.94)
    pt3dadd(109.3, -69.08, -37, 0.94)
    pt3dadd(109.3, -68.97, -37, 0.94)
    pt3dadd(109.4, -68.76, -37.5, 0.94)
    pt3dadd(109.51, -68.66, -37.5, 0.94)
    pt3dadd(109.56, -68.55, -37.5, 0.94)
    pt3dadd(109.66, -68.45, -37.5, 0.94)
    pt3dadd(109.77, -68.45, -38.5, 0.94)
    pt3dadd(109.93, -68.34, -38.5, 0.94)
    pt3dadd(110.08, -68.29, -38.5, 0.94)
    pt3dadd(110.24, -68.23, -39, 0.94)
    pt3dadd(110.4, -68.18, -39, 0.94)
    pt3dadd(110.66, -67.92, -39, 0.94)
    pt3dadd(110.92, -67.81, -39, 0.94)
    pt3dadd(111.13, -67.76, -39, 0.94)
    pt3dadd(111.19, -67.66, -39, 0.94)
    pt3dadd(111.4, -67.61, -39.5, 0.94)
    pt3dadd(111.71, -67.45, -39.5, 0.94)
    pt3dadd(111.82, -67.45, -39.5, 0.94)
    pt3dadd(111.92, -67.34, -39.5, 0.94)
    pt3dadd(111.92, -66.98, -39.5, 0.94)
    pt3dadd(111.82, -66.92, -39.5, 0.94)
    pt3dadd(111.55, -66.92, -39.5, 0.94)
    pt3dadd(111.45, -66.77, -39.5, 0.94)
    pt3dadd(111.29, -66.7, -39.5, 0.94)
    pt3dadd(111.19, -66.61, -39.5, 0.94)
    pt3dadd(111.13, -66.5, -39.5, 0.94)
    pt3dadd(110.11, -66.9, -39.5, 1)
    pt3dadd(110.17, -67.12, -39.5, 1)
    pt3dadd(110.11, -67.27, -39.5, 1)
    pt3dadd(110.11, -67.59, -39.5, 1)
    pt3dadd(110.06, -67.75, -39.5, 1)
    pt3dadd(110.06, -67.95, -39.5, 1)
    pt3dadd(110.01, -68.06, -39.5, 1)
    pt3dadd(110.01, -68.22, -39.5, 1)
    pt3dadd(109.96, -68.38, -39.5, 1)
    pt3dadd(109.9, -68.59, -39.5, 1)
    pt3dadd(109.85, -68.69, -39.5, 1)
    pt3dadd(109.75, -68.84, -39.5, 1)
    pt3dadd(109.64, -69.06, -39.5, 1)
    pt3dadd(109.54, -69.22, -39.5, 1)
    pt3dadd(109.43, -69.38, -39.5, 1)
    pt3dadd(109.27, -69.48, -39.5, 1)
    pt3dadd(109.27, -69.69, -39.5, 1)
    pt3dadd(109.22, -69.84, -39.5, 1)
    pt3dadd(109.12, -69.95, -39.5, 1)
    pt3dadd(109.06, -70.16, -39.5, 1)
    pt3dadd(108.96, -70.27, -39.5, 1)
    pt3dadd(108.96, -70.43, -39.5, 1)
    pt3dadd(108.8, -70.48, -39.5, 1)
  }
}
proc shape3d_5() {
  dend[2] {
    pt3dadd(108.8, -70.8, -39.5, 1)
    pt3dadd(108.7, -70.84, -39.5, 1)
    pt3dadd(108.7, -71.43, -39.5, 1)
    pt3dadd(108.91, -71.69, -39.5, 1)
    pt3dadd(108.91, -71.79, -39.5, 1)
    pt3dadd(108.96, -71.95, -39.5, 1)
    pt3dadd(109.12, -72.16, -39.5, 1)
    pt3dadd(109.27, -72.31, -39.5, 1)
    pt3dadd(109.38, -72.37, -39.5, 1)
    pt3dadd(109.48, -72.42, -39.5, 1)
    pt3dadd(109.69, -72.58, -39.5, 1)
    pt3dadd(109.9, -72.63, -39.5, 1)
    pt3dadd(110.06, -72.69, -39.5, 1)
    pt3dadd(110.17, -72.73, -39.5, 1)
    pt3dadd(110.32, -72.73, -39.5, 1)
    pt3dadd(111.24, -73.47, -38.5, 1)
    pt3dadd(111.4, -73.63, -38.5, 1)
    pt3dadd(111.51, -73.79, -38.5, 1)
    pt3dadd(111.61, -73.95, -38.5, 1)
    pt3dadd(111.77, -74.05, -38.5, 1)
    pt3dadd(111.87, -74.16, -38.5, 1)
    pt3dadd(111.93, -74.31, -38, 1)
    pt3dadd(111.98, -74.42, -38, 1)
    pt3dadd(112.03, -74.53, -38, 1)
    pt3dadd(112.08, -74.68, -38, 1)
    pt3dadd(112.14, -74.89, -37.5, 1)
    pt3dadd(112.14, -75.58, -37.5, 1)
    pt3dadd(112.19, -75.73, -37.5, 1)
    pt3dadd(112.14, -75.95, -37.5, 1)
    pt3dadd(112.14, -76.42, -37.5, 1)
    pt3dadd(112.08, -76.63, -37.5, 1)
    pt3dadd(112.03, -76.73, -37.5, 1)
    pt3dadd(111.98, -76.89, -37.5, 1)
    pt3dadd(111.93, -77.09, -37.5, 1)
    pt3dadd(111.93, -77.68, -37.5, 1)
    pt3dadd(111.98, -77.84, -37, 1)
    pt3dadd(112.03, -78, -37, 1)
    pt3dadd(112.14, -78.09, -37, 1)
    pt3dadd(112.14, -78.31, -37, 1)
    pt3dadd(112.24, -78.42, -37, 1)
    pt3dadd(112.35, -78.52, -37, 1)
    pt3dadd(112.5, -78.68, -37, 1)
    pt3dadd(112.71, -78.68, -36.5, 1)
    pt3dadd(112.82, -78.73, -36.5, 1)
    pt3dadd(112.92, -78.73, -36, 1)
    pt3dadd(113.08, -78.78, -36, 1)
    pt3dadd(113.19, -78.84, -36, 1)
    pt3dadd(113.4, -78.94, -35.5, 1)
    pt3dadd(113.55, -78.94, -35.5, 1)
    pt3dadd(113.66, -79.09, -35.5, 1)
    pt3dadd(113.76, -79.2, -35, 1)
    pt3dadd(113.82, -79.42, -34.5, 1)
    pt3dadd(113.76, -79.56, -34.5, 1)
    pt3dadd(113.82, -79.68, -34.5, 1)
    pt3dadd(113.71, -79.84, -34, 1)
    pt3dadd(113.66, -79.98, -34, 1)
    pt3dadd(113.66, -80.26, -34, 1)
    pt3dadd(113.76, -80.36, -34, 1)
    pt3dadd(114.03, -80.62, -33.5, 1)
    pt3dadd(114.18, -80.73, -33.5, 1)
    pt3dadd(114.24, -80.89, -33.5, 1)
    pt3dadd(114.34, -80.98, -33.5, 1)
    pt3dadd(114.45, -81.15, -33.5, 1)
    pt3dadd(114.55, -81.36, -33.5, 1)
    pt3dadd(114.6, -81.52, -33.5, 1)
    pt3dadd(114.66, -81.62, -33.5, 1)
    pt3dadd(114.76, -81.78, -33.5, 1)
    pt3dadd(114.76, -81.94, -33.5, 1)
    pt3dadd(114.81, -82.04, -33.5, 1)
    pt3dadd(114.81, -82.83, -33, 1)
    pt3dadd(114.76, -83.04, -33, 1)
    pt3dadd(114.66, -83.1, -33, 1)
    pt3dadd(114.6, -83.2, -33, 1)
    pt3dadd(114.55, -83.31, -33.5, 1)
    pt3dadd(113.59, -83.81, -33.5, 1.21)
    pt3dadd(113.49, -83.76, -33.5, 1.21)
    pt3dadd(113.38, -83.65, -33.5, 1.21)
    pt3dadd(113.28, -83.6, -33.5, 1.21)
    pt3dadd(113.12, -83.65, -34, 1.21)
    pt3dadd(112.91, -83.76, -34, 1.21)
    pt3dadd(112.81, -83.81, -34, 1.21)
    pt3dadd(112.65, -83.92, -34, 1.21)
    pt3dadd(112.65, -84.07, -34, 1.21)
    pt3dadd(112.49, -84.29, -34, 1.21)
    pt3dadd(112.49, -84.5, -34, 1.21)
    pt3dadd(112.39, -84.55, -34, 1.21)
    pt3dadd(112.39, -84.71, -34, 1.21)
    pt3dadd(112.33, -84.92, -34, 1.21)
    pt3dadd(112.33, -85.86, -34, 1.21)
    pt3dadd(112.39, -85.97, -34, 1.21)
    pt3dadd(112.39, -86.12, -34, 1.21)
    pt3dadd(112.39, -86.55, -34, 1.21)
    pt3dadd(112.39, -86.7, -34, 1.21)
    pt3dadd(112.39, -87.07, -34, 1.21)
    pt3dadd(112.44, -87.28, -33.5, 1.21)
    pt3dadd(112.44, -87.65, -33.5, 1.21)
    pt3dadd(112.49, -87.86, -33.5, 1.21)
    pt3dadd(112.49, -88.75, -33, 1.21)
    pt3dadd(112.49, -88.91, -33, 1.21)
    pt3dadd(112.44, -89.02, -33, 1.21)
    pt3dadd(112.44, -89.23, -33, 1.21)
    pt3dadd(112.39, -89.33, -33, 1.21)
    pt3dadd(112.28, -89.49, -33, 1.21)
    pt3dadd(112.23, -89.59, -33, 1.21)
    pt3dadd(112.23, -89.91, -33, 1.21)
    pt3dadd(112.18, -90.02, -33, 1.21)
    pt3dadd(112.12, -90.12, -33, 1.21)
    pt3dadd(112.07, -90.28, -33, 1.21)
    pt3dadd(112.02, -90.49, -33, 1.21)
    pt3dadd(112.02, -90.65, -33, 1.21)
    pt3dadd(112.02, -90.91, -33, 1.21)
    pt3dadd(112.07, -91.01, -33, 1.21)
  }
  dend[3] {pt3dclear()
    pt3dadd(28.05, 5.49, -6.5, 1.05)
    pt3dadd(28.24, 5.96, -7, 0.94)
    pt3dadd(28.45, 6.12, -7, 0.94)
    pt3dadd(28.61, 6.22, -7, 0.94)
    pt3dadd(28.76, 6.27, -7, 0.94)
    pt3dadd(28.92, 6.33, -7, 0.94)
    pt3dadd(29.13, 6.33, -7, 0.94)
    pt3dadd(29.29, 6.27, -7, 0.94)
    pt3dadd(29.5, 6.17, -7, 0.94)
    pt3dadd(29.6, 6.12, -7, 0.94)
    pt3dadd(29.76, 6.06, -7.5, 0.94)
    pt3dadd(29.87, 6.01, -7.5, 0.94)
    pt3dadd(29.97, 5.91, -7.5, 0.94)
    pt3dadd(30.08, 5.8, -7.5, 0.94)
    pt3dadd(30.23, 5.64, -7.5, 0.94)
    pt3dadd(30.39, 5.54, -7.5, 0.94)
    pt3dadd(30.39, 5.38, -8, 0.94)
    pt3dadd(30.5, 5.28, -8, 0.94)
    pt3dadd(30.92, 5.28, -8, 0.94)
    pt3dadd(31.07, 5.28, -8, 0.94)
    pt3dadd(31.28, 5.28, -8, 0.94)
    pt3dadd(31.44, 5.33, -8, 0.94)
    pt3dadd(31.65, 5.38, -8.5, 0.94)
    pt3dadd(32.44, 5.38, -9, 0.94)
    pt3dadd(32.49, 5.28, -9, 0.94)
    pt3dadd(32.6, 5.22, -9, 0.94)
    pt3dadd(32.86, 5.12, -9.5, 0.94)
    pt3dadd(32.96, 5.01, -9.5, 0.94)
    pt3dadd(33.11, 4.91, -9.5, 0.94)
    pt3dadd(33.22, 4.84, -9.5, 0.94)
    pt3dadd(33.33, 4.75, -9.5, 0.94)
    pt3dadd(33.44, 4.75, -9.5, 0.94)
    pt3dadd(33.49, 4.63, -10, 0.94)
    pt3dadd(33.96, 4.63, -10, 0.94)
    pt3dadd(34.07, 4.75, -10, 0.94)
    pt3dadd(34.17, 4.84, -10.5, 0.94)
    pt3dadd(34.33, 5.01, -10.5, 0.94)
    pt3dadd(34.43, 5.12, -10.5, 0.94)
    pt3dadd(34.54, 5.22, -11, 0.94)
    pt3dadd(34.59, 5.12, -11, 0.94)
    pt3dadd(34.75, 5.22, -11, 0.94)
    pt3dadd(34.85, 5.22, -11, 0.94)
    pt3dadd(35.01, 5.28, -11.5, 0.94)
    pt3dadd(35.11, 5.17, -11.5, 0.94)
    pt3dadd(35.22, 5.17, -11.5, 0.94)
    pt3dadd(35.33, 5.05, -11.5, 0.94)
    pt3dadd(35.38, 4.96, -11.5, 0.94)
    pt3dadd(35.59, 4.91, -11.5, 0.94)
    pt3dadd(35.69, 4.75, -12, 0.94)
    pt3dadd(35.79, 4.7, -12, 0.94)
    pt3dadd(35.96, 4.59, -12, 0.94)
    pt3dadd(36.01, 4.43, -12.5, 0.94)
    pt3dadd(36.17, 4.38, -13, 0.94)
    pt3dadd(36.32, 4.28, -13, 0.94)
    pt3dadd(36.32, 4.07, -13, 0.94)
    pt3dadd(36.43, 3.96, -13, 0.94)
    pt3dadd(36.59, 3.8, -13, 0.94)
    pt3dadd(36.69, 3.59, -13, 0.94)
    pt3dadd(36.74, 3.49, -13, 0.94)
    pt3dadd(36.85, 3.44, -13, 0.94)
    pt3dadd(37.01, 3.33, -13, 0.94)
    pt3dadd(37.06, 3.12, -13, 0.94)
    pt3dadd(37.15, 3.07, -13, 0.94)
    pt3dadd(37.22, 2.91, -13, 0.94)
    pt3dadd(37.22, 2.38, -13.5, 0.94)
    pt3dadd(37.11, 2.27, -13.5, 0.94)
    pt3dadd(36.95, 2.17, -13.5, 0.94)
    pt3dadd(36.85, 2.12, -13.5, 0.94)
    pt3dadd(36.59, 2.02, -13.5, 0.94)
    pt3dadd(36.47, 1.91, -13.5, 0.94)
    pt3dadd(36.43, 1.7, -13.5, 0.94)
    pt3dadd(36.38, 1.49, -14, 0.94)
    pt3dadd(36.32, 1.38, -14, 0.94)
    pt3dadd(36.27, 1.17, -14, 0.94)
    pt3dadd(36.27, 0.91, -14, 0.94)
    pt3dadd(36.43, 0.75, -14, 0.94)
    pt3dadd(36.47, 0.65, -14, 0.94)
    pt3dadd(36.69, 0.65, -14, 0.94)
    pt3dadd(36.74, 0.75, -14, 0.94)
    pt3dadd(36.9, 0.75, -14, 0.94)
    pt3dadd(37.15, 0.91, -14, 0.94)
    pt3dadd(37.58, 0.91, -14.5, 0.94)
    pt3dadd(37.69, 0.91, -14.5, 0.94)
    pt3dadd(37.79, 0.81, -15, 0.94)
    pt3dadd(37.9, 0.75, -15, 0.94)
    pt3dadd(37.95, 0.6, -15, 0.94)
    pt3dadd(38.06, 0.44, -15, 0.94)
    pt3dadd(38.15, 0.39, -15, 0.94)
    pt3dadd(38.15, 0.02, -15.5, 0.94)
    pt3dadd(38.21, -0.09, -16, 0.94)
    pt3dadd(38.21, -0.24, -16, 0.94)
    pt3dadd(38.27, -0.35, -16, 0.94)
    pt3dadd(38.27, -0.61, -16, 0.94)
    pt3dadd(38.32, -0.82, -16, 0.94)
    pt3dadd(38.42, -0.98, -16, 0.94)
    pt3dadd(38.47, -1.09, -16, 0.94)
    pt3dadd(38.58, -1.09, -16, 0.94)
    pt3dadd(38.69, -1.19, -16, 0.94)
    pt3dadd(38.84, -1.24, -16, 0.94)
    pt3dadd(39, -1.24, -16, 0.94)
    pt3dadd(39.15, -1.3, -16, 0.94)
    pt3dadd(39.58, -1.3, -16, 0.94)
    pt3dadd(39.68, -1.3, -16, 0.94)
    pt3dadd(39.79, -1.24, -16, 0.94)
    pt3dadd(39.95, -1.19, -16, 0.94)
    pt3dadd(40.31, -1.19, -16, 0.94)
    pt3dadd(40.52, -1.13, -16, 0.94)
    pt3dadd(40.68, -1.09, -16, 0.94)
    pt3dadd(40.89, -1.09, -16, 0.94)
    pt3dadd(41.05, -1.13, -16, 0.94)
    pt3dadd(41.26, -1.19, -16, 0.94)
    pt3dadd(41.42, -1.24, -16, 0.94)
    pt3dadd(41.57, -1.35, -16, 0.94)
    pt3dadd(41.68, -1.3, -16, 0.94)
    pt3dadd(41.89, -1.3, -16, 0.94)
    pt3dadd(41.99, -1.4, -16, 0.94)
    pt3dadd(42.1, -1.45, -16, 0.94)
    pt3dadd(42.26, -1.56, -16, 0.94)
    pt3dadd(42.41, -1.61, -16, 0.94)
    pt3dadd(42.57, -1.72, -16, 0.94)
    pt3dadd(42.78, -1.82, -16, 0.94)
    pt3dadd(43.45, -1.42, -16.5, 0.94)
    pt3dadd(43.61, -1.42, -16.5, 0.94)
    pt3dadd(43.71, -1.53, -16.5, 0.94)
    pt3dadd(43.87, -1.63, -16.5, 0.94)
    pt3dadd(44.03, -1.68, -16.5, 0.94)
    pt3dadd(44.24, -1.74, -16.5, 0.94)
    pt3dadd(44.39, -1.84, -16.5, 0.94)
    pt3dadd(44.55, -1.79, -16.5, 0.94)
    pt3dadd(44.76, -1.79, -16.5, 0.94)
    pt3dadd(44.87, -1.74, -16.5, 0.94)
    pt3dadd(45.02, -1.53, -16.5, 0.94)
    pt3dadd(45.02, -1.37, -16.5, 0.94)
    pt3dadd(45.18, -1.05, -16.5, 0.94)
    pt3dadd(45.23, -0.9, -16.5, 0.94)
    pt3dadd(45.23, -0.69, -16.5, 0.94)
    pt3dadd(45.29, -0.53, -17.5, 0.94)
  }
}
proc shape3d_6() {
  dend[3] {
    pt3dadd(45.29, -0.37, -18, 0.94)
    pt3dadd(45.39, -0.21, -18, 0.94)
    pt3dadd(45.5, -0.11, -18, 0.94)
    pt3dadd(45.6, 0, -18, 0.94)
    pt3dadd(45.65, 0.16, -18.5, 0.94)
    pt3dadd(45.76, 0.16, -18.5, 0.94)
    pt3dadd(45.92, 0.31, -18.5, 0.94)
    pt3dadd(46.02, 0.42, -19, 0.94)
    pt3dadd(46.43, 1.43, -19, 0.94)
    pt3dadd(46.54, 1.54, -19, 0.94)
    pt3dadd(46.59, 1.64, -19, 0.94)
    pt3dadd(46.69, 1.75, -19, 0.94)
    pt3dadd(46.85, 1.9, -19, 0.94)
    pt3dadd(46.96, 2, -19, 0.94)
    pt3dadd(47.01, 2.17, -19.5, 0.94)
    pt3dadd(47.11, 2.27, -19.5, 0.94)
    pt3dadd(47.22, 2.38, -19.5, 0.94)
    pt3dadd(47.32, 2.52, -19.5, 0.94)
    pt3dadd(47.38, 2.64, -19.5, 0.94)
    pt3dadd(47.48, 2.69, -19.5, 0.94)
    pt3dadd(47.53, 2.8, -19.5, 0.94)
    pt3dadd(47.64, 2.9, -19.5, 0.94)
    pt3dadd(47.74, 3.06, -19.5, 0.94)
    pt3dadd(47.8, 3.16, -20, 0.94)
    pt3dadd(47.85, 3.32, -20, 0.94)
    pt3dadd(48.01, 3.64, -20.5, 0.94)
    pt3dadd(48.11, 3.74, -20.5, 0.94)
    pt3dadd(48.27, 3.74, -20.5, 0.94)
    pt3dadd(48.48, 3.8, -20.5, 0.94)
    pt3dadd(48.58, 3.85, -21, 0.94)
    pt3dadd(48.69, 3.8, -21.5, 0.94)
    pt3dadd(48.74, 3.69, -22, 0.94)
    pt3dadd(48.79, 3.53, -22, 0.94)
    pt3dadd(48.85, 3.43, -22.5, 0.94)
    pt3dadd(48.9, 3.32, -22.5, 0.94)
    pt3dadd(49.06, 3.16, -22.5, 0.94)
    pt3dadd(49.16, 3.06, -22.5, 0.94)
    pt3dadd(49.27, 3.11, -22.5, 0.94)
    pt3dadd(49.37, 3.16, -23, 0.94)
    pt3dadd(49.42, 3.27, -23, 0.94)
    pt3dadd(49.53, 3.32, -23, 0.94)
    pt3dadd(49.63, 3.38, -23, 0.94)
    pt3dadd(49.63, 3.48, -23, 0.94)
    pt3dadd(49.74, 3.59, -23, 0.94)
    pt3dadd(49.79, 3.74, -23, 0.94)
    pt3dadd(49.9, 3.85, -23, 0.94)
    pt3dadd(50.05, 3.85, -23.5, 0.94)
    pt3dadd(50.16, 3.74, -23.5, 0.94)
    pt3dadd(50.26, 3.59, -23.5, 0.94)
    pt3dadd(50.42, 3.48, -23.5, 0.94)
    pt3dadd(50.47, 3.38, -23.5, 0.94)
    pt3dadd(50.58, 3.27, -23.5, 0.94)
    pt3dadd(50.63, 3.22, -24, 0.94)
    pt3dadd(50.74, 3.11, -24, 0.94)
    pt3dadd(51.1, 3.11, -24, 0.94)
    pt3dadd(51.21, 3.11, -24, 0.94)
    pt3dadd(51.26, 3.27, -24, 0.94)
    pt3dadd(51.26, 3.43, -24, 0.94)
    pt3dadd(51.37, 3.59, -24, 0.94)
    pt3dadd(51.42, 3.69, -24, 0.94)
    pt3dadd(51.42, 3.9, -24, 0.94)
    pt3dadd(51.47, 4.11, -24.5, 0.94)
    pt3dadd(51.58, 4.22, -24.5, 0.94)
    pt3dadd(51.73, 4.26, -24.5, 0.94)
    pt3dadd(51.84, 4.37, -24.5, 0.94)
    pt3dadd(52, 4.43, -24.5, 0.94)
    pt3dadd(52.15, 4.43, -24.5, 0.94)
    pt3dadd(52.21, 4.43, -25, 0.94)
    pt3dadd(52.31, 4.26, -25, 0.94)
    pt3dadd(52.47, 4.22, -25, 0.94)
    pt3dadd(52.47, 4.05, -25, 0.94)
    pt3dadd(52.63, 3.9, -25, 0.94)
    pt3dadd(52.94, 3.59, -25, 0.94)
    pt3dadd(53.2, 3.59, -25, 0.94)
    pt3dadd(53.31, 3.69, -25, 0.94)
    pt3dadd(53.47, 3.74, -25, 0.94)
    pt3dadd(53.68, 3.95, -25, 0.94)
    pt3dadd(53.68, 4.37, -25.5, 0.94)
    pt3dadd(53.62, 4.58, -25.5, 0.94)
    pt3dadd(53.68, 4.74, -26, 0.94)
    pt3dadd(53.73, 4.9, -26.5, 0.94)
    pt3dadd(53.83, 5.11, -26.5, 0.94)
    pt3dadd(53.94, 5.27, -26.5, 0.94)
    pt3dadd(53.99, 5.37, -26.5, 0.94)
    pt3dadd(54.04, 5.48, -26.5, 0.94)
    pt3dadd(54.15, 5.58, -26.5, 0.94)
    pt3dadd(54.31, 5.74, -26.5, 0.94)
    pt3dadd(54.36, 5.9, -26.5, 0.94)
    pt3dadd(54.46, 6, -26.5, 0.94)
    pt3dadd(54.62, 6.27, -27, 0.94)
    pt3dadd(54.73, 6.27, -27, 0.94)
    pt3dadd(54.88, 6.37, -27, 0.94)
    pt3dadd(54.99, 6.37, -27, 0.94)
    pt3dadd(55.09, 6.37, -27, 0.94)
    pt3dadd(55.2, 6.27, -27.5, 0.94)
    pt3dadd(55.3, 6.21, -27.5, 0.94)
    pt3dadd(55.36, 6.11, -27.5, 0.94)
    pt3dadd(55.46, 6, -27.5, 0.94)
    pt3dadd(55.57, 6, -27.5, 0.94)
    pt3dadd(55.62, 5.9, -28, 0.94)
    pt3dadd(55.67, 5.79, -28, 0.94)
    pt3dadd(55.67, 5.43, -28, 0.94)
    pt3dadd(55.62, 5.32, -28, 0.94)
    pt3dadd(55.51, 5.16, -28.5, 0.94)
    pt3dadd(55.36, 5.16, -28.5, 0.94)
    pt3dadd(55.3, 5.05, -28.5, 0.94)
    pt3dadd(55.15, 4.95, -28.5, 0.94)
    pt3dadd(55.04, 4.84, -28.5, 0.94)
    pt3dadd(55.04, 4.48, -29, 0.94)
    pt3dadd(55.15, 4.32, -29, 0.94)
    pt3dadd(55.25, 4.32, -29, 0.94)
    pt3dadd(55.41, 4.32, -29, 0.94)
    pt3dadd(55.51, 4.43, -29, 0.94)
    pt3dadd(55.67, 4.32, -29, 0.94)
    pt3dadd(55.99, 4.32, -29.5, 0.94)
    pt3dadd(55.99, 3.9, -30, 0.94)
    pt3dadd(55.78, 3.8, -30, 0.94)
    pt3dadd(55.67, 3.64, -30, 0.94)
    pt3dadd(55.62, 3.48, -30, 0.94)
    pt3dadd(55.57, 3.48, -30.5, 0.94)
    pt3dadd(55.46, 3.38, -30.5, 0.94)
    pt3dadd(55.41, 3.22, -30.5, 0.94)
    pt3dadd(55.2, 3.01, -30.5, 0.94)
    pt3dadd(55.15, 2.85, -31, 0.94)
    pt3dadd(55.09, 2.64, -31, 0.94)
    pt3dadd(54.99, 2.48, -31, 0.94)
    pt3dadd(54.99, 2.17, -31.5, 0.94)
    pt3dadd(55.09, 2.11, -31.5, 0.94)
    pt3dadd(55.15, 2, -31.5, 0.94)
    pt3dadd(55.2, 1.9, -31.5, 0.94)
    pt3dadd(55.36, 2.17, -32, 0.94)
    pt3dadd(55.46, 2.22, -32, 0.94)
    pt3dadd(55.57, 2.27, -32, 0.94)
    pt3dadd(55.57, 2.38, -32, 0.94)
    pt3dadd(55.72, 2.52, -32, 0.94)
    pt3dadd(55.83, 2.59, -32, 0.94)
    pt3dadd(55.93, 2.69, -32, 0.94)
    pt3dadd(56.09, 2.74, -32.5, 0.94)
    pt3dadd(56.14, 2.64, -32.5, 0.94)
    pt3dadd(56.14, 2.48, -32.5, 0.94)
    pt3dadd(56.25, 2.38, -33, 0.94)
    pt3dadd(56.2, 2.22, -33, 0.94)
    pt3dadd(56.2, 1.75, -33, 0.94)
    pt3dadd(56.3, 1.64, -33, 0.94)
    pt3dadd(56.35, 1.43, -33, 0.94)
    pt3dadd(56.56, 1.43, -33, 0.94)
    pt3dadd(56.67, 1.32, -33.5, 0.94)
    pt3dadd(56.72, 1.22, -33.5, 0.94)
    pt3dadd(57.04, 1.22, -33.5, 0.94)
    pt3dadd(57.19, 1.27, -33.5, 0.94)
    pt3dadd(57.4, 1.38, -33.5, 0.94)
    pt3dadd(57.56, 1.48, -33.5, 0.94)
    pt3dadd(57.56, 1.64, -34, 0.94)
    pt3dadd(57.56, 1.9, -34, 0.94)
    pt3dadd(57.56, 2.11, -34, 0.94)
    pt3dadd(57.51, 2.27, -34, 0.94)
    pt3dadd(57.46, 2.48, -34, 0.94)
    pt3dadd(57.46, 2.69, -34, 0.94)
    pt3dadd(57.4, 2.8, -34, 0.94)
    pt3dadd(57.4, 3.06, -34, 0.94)
    pt3dadd(57.35, 3.16, -34, 0.94)
    pt3dadd(57.35, 3.38, -34, 0.94)
    pt3dadd(57.35, 3.48, -34, 0.94)
    pt3dadd(57.46, 3.53, -34, 0.94)
    pt3dadd(57.56, 3.64, -34, 0.94)
    pt3dadd(57.77, 3.69, -34, 0.94)
    pt3dadd(57.93, 3.74, -34, 0.94)
    pt3dadd(58.03, 3.8, -34, 0.94)
    pt3dadd(58.14, 3.95, -34, 0.94)
    pt3dadd(58.24, 4.01, -34, 0.94)
    pt3dadd(58.4, 4.05, -34, 0.94)
    pt3dadd(58.51, 4.22, -34.5, 0.94)
    pt3dadd(58.61, 4.32, -35, 0.94)
    pt3dadd(58.61, 4.53, -35, 0.94)
    pt3dadd(58.61, 4.58, -35.5, 0.94)
    pt3dadd(58.56, 4.84, -35.5, 0.94)
    pt3dadd(58.45, 5, -35.5, 0.94)
    pt3dadd(58.3, 5.22, -35.5, 0.94)
    pt3dadd(58.14, 5.37, -36, 0.94)
    pt3dadd(58.03, 5.43, -36, 0.94)
    pt3dadd(57.93, 5.53, -36, 0.94)
    pt3dadd(57.93, 5.64, -36.5, 0.94)
    pt3dadd(57.88, 5.74, -36.5, 0.94)
    pt3dadd(57.88, 5.9, -36.5, 0.94)
    pt3dadd(57.88, 6.06, -36.5, 0.94)
    pt3dadd(57.88, 6.21, -36.5, 0.94)
    pt3dadd(57.93, 6.32, -36.5, 0.94)
    pt3dadd(58.03, 6.42, -36.5, 0.94)
    pt3dadd(58.14, 6.58, -36.5, 0.94)
    pt3dadd(58.3, 6.74, -36.5, 0.94)
    pt3dadd(58.6, 7.42, -36.5, 0.94)
    pt3dadd(58.49, 7.47, -36.5, 0.94)
    pt3dadd(58.33, 7.53, -36.5, 0.94)
    pt3dadd(58.23, 7.58, -36.5, 0.94)
    pt3dadd(58.12, 7.74, -36.5, 0.94)
    pt3dadd(58.02, 7.84, -36.5, 0.94)
    pt3dadd(58.02, 8, -36.5, 0.94)
    pt3dadd(57.91, 8.1, -37, 0.94)
    pt3dadd(57.91, 8.58, -37.5, 0.94)
    pt3dadd(58.02, 8.63, -37.5, 0.94)
    pt3dadd(58.12, 8.73, -37.5, 0.94)
    pt3dadd(58.23, 8.84, -37.5, 0.94)
    pt3dadd(58.33, 8.84, -37.5, 0.94)
    pt3dadd(58.44, 8.89, -37.5, 0.94)
    pt3dadd(58.54, 9, -37.5, 0.94)
    pt3dadd(58.65, 9.05, -37.5, 0.94)
    pt3dadd(58.7, 9.16, -37.5, 0.94)
    pt3dadd(58.86, 9.47, -38, 0.94)
    pt3dadd(58.91, 9.63, -38.5, 0.94)
    pt3dadd(58.91, 10, -39.5, 0.94)
    pt3dadd(58.81, 10.1, -39.5, 0.94)
    pt3dadd(58.6, 10.1, -40, 0.94)
    pt3dadd(58.44, 10.15, -40, 0.94)
    pt3dadd(58.33, 10.26, -40, 0.94)
    pt3dadd(58.18, 10.21, -40, 0.94)
    pt3dadd(58.02, 10.31, -40, 0.94)
    pt3dadd(57.91, 10.31, -40.5, 0.94)
    pt3dadd(57.86, 10.42, -40.5, 0.94)
    pt3dadd(57.81, 10.52, -40.5, 0.94)
    pt3dadd(57.7, 10.52, -40.5, 0.94)
    pt3dadd(57.55, 10.73, -40.5, 0.94)
    pt3dadd(57.49, 10.89, -40.5, 0.94)
    pt3dadd(57.39, 11.05, -40.5, 0.94)
    pt3dadd(57.39, 11.42, -41, 0.94)
    pt3dadd(57.6, 11.42, -41, 0.94)
    pt3dadd(57.7, 11.57, -41.5, 0.94)
    pt3dadd(58.28, 11.57, -41.5, 0.94)
    pt3dadd(58.33, 11.47, -41.5, 0.94)
    pt3dadd(58.54, 11.47, -41.5, 0.94)
    pt3dadd(58.65, 11.36, -41.5, 0.94)
    pt3dadd(58.75, 11.31, -41.5, 0.94)
    pt3dadd(59.02, 11.31, -42, 0.94)
    pt3dadd(58.96, 11.47, -42, 0.94)
    pt3dadd(58.96, 11.63, -42.5, 0.94)
    pt3dadd(58.91, 11.84, -42.5, 0.94)
    pt3dadd(59.02, 11.94, -42.5, 0.94)
    pt3dadd(59.17, 12.05, -42.5, 0.94)
    pt3dadd(59.33, 12.15, -42.5, 0.94)
    pt3dadd(59.44, 12.1, -42.5, 0.94)
    pt3dadd(59.8, 12.1, -43.5, 0.94)
    pt3dadd(59.96, 12.15, -43.5, 0.94)
    pt3dadd(60.07, 12.31, -43.5, 0.94)
    pt3dadd(60.17, 12.47, -43.5, 0.94)
    pt3dadd(60.22, 12.57, -43.5, 0.94)
    pt3dadd(60.33, 12.78, -43.5, 0.94)
    pt3dadd(60.33, 12.89, -43.5, 0.94)
    pt3dadd(60.38, 12.99, -43.5, 0.94)
    pt3dadd(60.49, 13.36, -43.5, 0.94)
    pt3dadd(60.49, 13.68, -43.5, 0.94)
  }
}
proc shape3d_7() {
  dend[3] {
    pt3dadd(60.54, 13.83, -43.5, 0.94)
    pt3dadd(60.64, 14.04, -43.5, 0.94)
    pt3dadd(60.49, 14.71, -43.5, 0.84)
    pt3dadd(60.54, 14.82, -43.5, 0.84)
    pt3dadd(60.65, 15.03, -43.5, 0.84)
    pt3dadd(60.7, 15.19, -43.5, 0.84)
    pt3dadd(60.81, 15.29, -43.5, 0.84)
    pt3dadd(61.07, 15.55, -44, 0.84)
    pt3dadd(61.12, 15.66, -44, 0.84)
    pt3dadd(61.23, 15.76, -44, 0.84)
    pt3dadd(61.33, 15.92, -44, 0.84)
    pt3dadd(61.44, 16.07, -44, 0.84)
    pt3dadd(61.49, 16.29, -44, 0.84)
    pt3dadd(61.49, 16.5, -44, 0.84)
    pt3dadd(61.54, 16.66, -44.5, 0.84)
    pt3dadd(61.54, 16.92, -44.5, 0.84)
    pt3dadd(61.49, 17.07, -44.5, 0.84)
    pt3dadd(61.49, 17.66, -44.5, 0.84)
    pt3dadd(61.38, 17.76, -44.5, 0.84)
    pt3dadd(61.33, 17.97, -44.5, 0.84)
    pt3dadd(61.28, 18.23, -45, 0.84)
    pt3dadd(61.28, 18.34, -45, 0.84)
    pt3dadd(61.23, 18.5, -45, 0.84)
    pt3dadd(61.23, 18.8, -45, 0.84)
    pt3dadd(61.28, 18.92, -45, 0.84)
    pt3dadd(61.28, 19.5, -45.5, 0.84)
    pt3dadd(61.33, 19.64, -45.5, 0.84)
    pt3dadd(61.38, 19.92, -45.5, 0.84)
    pt3dadd(61.44, 20.07, -45.5, 0.84)
    pt3dadd(61.54, 20.23, -45.5, 0.84)
    pt3dadd(61.65, 20.29, -45.5, 0.84)
    pt3dadd(61.8, 20.39, -46, 0.84)
    pt3dadd(62.06, 20.39, -46, 0.84)
    pt3dadd(62.17, 20.44, -46, 0.84)
    pt3dadd(62.43, 20.55, -46, 0.84)
    pt3dadd(62.48, 20.65, -46.5, 0.84)
    pt3dadd(62.59, 20.76, -46.5, 0.84)
    pt3dadd(62.64, 20.92, -46.5, 0.84)
    pt3dadd(62.8, 21.07, -46.5, 0.84)
    pt3dadd(62.8, 21.28, -47, 0.84)
    pt3dadd(62.96, 21.44, -47, 0.84)
    pt3dadd(63.01, 21.55, -47, 0.84)
    pt3dadd(63.06, 21.71, -47, 0.84)
    pt3dadd(63.17, 21.76, -47, 0.84)
    pt3dadd(63.27, 21.92, -47, 0.84)
    pt3dadd(63.32, 22.02, -47, 0.84)
    pt3dadd(63.43, 22.28, -47, 0.84)
    pt3dadd(63.59, 22.44, -47.5, 0.84)
    pt3dadd(63.69, 22.49, -47.5, 0.84)
    pt3dadd(63.85, 22.65, -47.5, 0.84)
    pt3dadd(64.06, 22.76, -47.5, 0.84)
    pt3dadd(64.27, 22.86, -47.5, 0.84)
    pt3dadd(64.43, 22.91, -48, 0.84)
    pt3dadd(64.64, 23.02, -48, 0.84)
    pt3dadd(64.79, 23.12, -48, 0.84)
    pt3dadd(64.95, 23.18, -48, 0.84)
    pt3dadd(65.11, 23.28, -49.5, 0.84)
    pt3dadd(65.16, 23.39, -49.5, 0.84)
    pt3dadd(65.27, 23.39, -49.5, 0.84)
    pt3dadd(65.31, 23.54, -49.5, 0.84)
    pt3dadd(65.37, 23.65, -49.5, 0.84)
    pt3dadd(65.31, 23.86, -49.5, 0.84)
    pt3dadd(65.53, 23.86, -49.5, 0.84)
    pt3dadd(65.58, 24.02, -49.5, 0.84)
    pt3dadd(65.69, 24.02, -49.5, 0.84)
    pt3dadd(65.69, 24.6, -49.5, 0.84)
    pt3dadd(65.58, 24.7, -49, 0.84)
    pt3dadd(65.58, 24.91, -49, 0.84)
    pt3dadd(65.48, 25.02, -49, 0.84)
    pt3dadd(65.37, 25.17, -49, 0.84)
    pt3dadd(65.2, 25.38, -49, 0.84)
    pt3dadd(65.16, 25.49, -49, 0.84)
    pt3dadd(65.06, 25.6, -49, 0.84)
    pt3dadd(64.95, 25.81, -49, 0.84)
    pt3dadd(64.79, 25.96, -49, 0.84)
    pt3dadd(64.69, 26.07, -49, 0.84)
    pt3dadd(64.58, 26.17, -49, 0.84)
    pt3dadd(64.43, 26.28, -49, 0.84)
    pt3dadd(64.22, 26.49, -49, 0.84)
    pt3dadd(64.16, 26.65, -49, 0.84)
    pt3dadd(63.95, 26.65, -48.5, 0.84)
    pt3dadd(63.85, 26.86, -48.5, 0.84)
    pt3dadd(63.8, 27.01, -48.5, 0.84)
    pt3dadd(63.69, 27.12, -48.5, 0.84)
    pt3dadd(63.53, 27.33, -48.5, 0.84)
    pt3dadd(63.43, 27.54, -48.5, 0.84)
    pt3dadd(63.32, 27.54, -48.5, 0.84)
  }
  dend[4] {pt3dclear()
    pt3dadd(6.98, 12.62, 5, 0.94)
    pt3dadd(6.44, 13.1, 5, 0.84)
    pt3dadd(6.59, 13.26, 5, 0.84)
    pt3dadd(6.59, 14.41, 5, 0.84)
    pt3dadd(6.65, 14.57, 5, 0.84)
    pt3dadd(6.65, 14.89, 5, 0.84)
    pt3dadd(6.54, 14.94, 5, 0.84)
    pt3dadd(6.49, 15.04, 5, 0.84)
    pt3dadd(6.38, 15.04, 5, 0.84)
    pt3dadd(6.33, 15.25, 5, 0.84)
    pt3dadd(6.23, 15.31, 5, 0.84)
    pt3dadd(6.12, 15.41, 5, 0.84)
    pt3dadd(6.12, 15.57, 5, 0.84)
    pt3dadd(6.07, 15.67, 5, 0.84)
    pt3dadd(6.07, 15.88, 5, 0.84)
    pt3dadd(6.12, 16.04, 5, 0.84)
    pt3dadd(6.12, 16.41, 5, 0.84)
    pt3dadd(6.17, 16.62, 5, 0.84)
    pt3dadd(6.17, 17.09, 5, 0.84)
    pt3dadd(6.23, 17.25, 5, 0.84)
    pt3dadd(6.23, 17.72, 5, 0.84)
    pt3dadd(6.28, 17.88, 5, 0.84)
    pt3dadd(6.28, 18.2, 5, 0.84)
    pt3dadd(6.23, 18.36, 5, 0.84)
    pt3dadd(6.23, 18.57, 5, 0.84)
    pt3dadd(6.17, 18.72, 5, 0.84)
    pt3dadd(6.17, 18.98, 5, 0.84)
    pt3dadd(6.23, 19.2, 5, 0.84)
    pt3dadd(6.23, 19.55, 5, 0.84)
    pt3dadd(6.23, 19.72, 5, 0.84)
    pt3dadd(6.23, 20.88, 5, 0.84)
    pt3dadd(6.23, 21.09, 5, 0.84)
    pt3dadd(6.23, 21.51, 5, 0.84)
    pt3dadd(6.17, 21.83, 5, 0.84)
    pt3dadd(6.12, 21.93, 5, 0.84)
    pt3dadd(6.12, 22.35, 5, 0.84)
    pt3dadd(6.07, 22.46, 5, 0.84)
    pt3dadd(6.07, 22.93, 5, 0.84)
    pt3dadd(6.02, 23.03, 5, 0.84)
    pt3dadd(6.02, 23.3, 5, 0.84)
    pt3dadd(5.96, 23.45, 5, 0.84)
    pt3dadd(5.96, 23.67, 5, 0.84)
    pt3dadd(5.86, 23.82, 5, 0.84)
    pt3dadd(5.86, 23.93, 5, 0.84)
    pt3dadd(5.75, 24.19, 5, 0.84)
    pt3dadd(5.72, 25.36, 3.5, 0.84)
    pt3dadd(5.78, 25.52, 4, 0.84)
    pt3dadd(5.78, 25.73, 4, 0.84)
    pt3dadd(5.72, 25.89, 4, 0.84)
    pt3dadd(5.67, 26.1, 4, 0.84)
    pt3dadd(5.62, 26.26, 4, 0.84)
    pt3dadd(5.62, 26.52, 4, 0.84)
    pt3dadd(5.46, 26.83, 4.5, 0.84)
    pt3dadd(5.41, 26.99, 4.5, 0.84)
    pt3dadd(5.3, 27.1, 4.5, 0.84)
  }
  dend[5] {pt3dclear()
    pt3dadd(5.3, 27.1, 4.5, 0.84)
    pt3dadd(5.25, 28.04, 4.5, 0.68)
    pt3dadd(5.36, 28.25, 4.5, 0.68)
    pt3dadd(5.41, 28.36, 4.5, 0.68)
    pt3dadd(5.41, 28.62, 4.5, 0.68)
    pt3dadd(5.46, 28.78, 4.5, 0.68)
    pt3dadd(5.46, 29.72, 4, 0.68)
    pt3dadd(5.41, 29.88, 4, 0.68)
    pt3dadd(5.36, 30.04, 4, 0.68)
    pt3dadd(5.41, 30.15, 4, 0.68)
    pt3dadd(5.36, 30.25, 4, 0.68)
    pt3dadd(5.36, 30.46, 4, 0.68)
    pt3dadd(5.3, 30.67, 4, 0.68)
    pt3dadd(5.3, 31.04, 4, 0.68)
    pt3dadd(5.25, 31.2, 4, 0.68)
    pt3dadd(5.25, 31.41, 4, 0.68)
    pt3dadd(5.15, 31.56, 4.5, 0.68)
    pt3dadd(5.15, 31.78, 4.5, 0.68)
    pt3dadd(5.04, 31.93, 5, 0.68)
    pt3dadd(4.94, 32.04, 5, 0.68)
    pt3dadd(4.88, 32.2, 5, 0.68)
    pt3dadd(4.88, 32.4, 5, 0.68)
    pt3dadd(4.94, 32.56, 5, 0.68)
    pt3dadd(4.99, 32.77, 5, 0.68)
    pt3dadd(4.99, 33.04, 5, 0.68)
    pt3dadd(5.09, 33.25, 5, 0.68)
    pt3dadd(5.15, 33.35, 5, 0.68)
    pt3dadd(5.15, 33.51, 5, 0.68)
    pt3dadd(5.2, 33.77, 5, 0.68)
    pt3dadd(5.2, 33.93, 5, 0.68)
    pt3dadd(5.25, 34.14, 5, 0.68)
    pt3dadd(5.25, 34.35, 5, 0.68)
    pt3dadd(5.2, 34.46, 5, 0.68)
    pt3dadd(5.2, 34.67, 5.5, 0.68)
    pt3dadd(5.15, 34.88, 5.5, 0.68)
    pt3dadd(5.09, 35.51, 5.5, 0.68)
    pt3dadd(5.15, 35.67, 5.5, 0.68)
    pt3dadd(5.2, 35.82, 5.5, 0.68)
    pt3dadd(5.2, 35.93, 5.5, 0.68)
    pt3dadd(5.17, 37.11, 5.5, 0.79)
    pt3dadd(5.12, 37.28, 6, 0.79)
    pt3dadd(5.12, 37.6, 6, 0.79)
    pt3dadd(5.07, 37.76, 6, 0.79)
    pt3dadd(5.07, 37.97, 6, 0.79)
    pt3dadd(5.07, 38.11, 6, 0.79)
    pt3dadd(5.17, 38.28, 6, 0.79)
    pt3dadd(5.28, 38.39, 6, 0.79)
    pt3dadd(5.28, 38.6, 6, 0.79)
    pt3dadd(5.33, 38.75, 6, 0.79)
    pt3dadd(5.43, 38.86, 6, 0.79)
    pt3dadd(5.49, 39.02, 6, 0.79)
    pt3dadd(5.54, 39.22, 6, 0.79)
    pt3dadd(5.59, 39.38, 6, 0.79)
    pt3dadd(5.64, 39.49, 6, 0.79)
    pt3dadd(5.64, 39.6, 6, 0.79)
    pt3dadd(5.7, 39.75, 6, 0.79)
    pt3dadd(5.7, 39.96, 6, 0.79)
    pt3dadd(5.8, 40.02, 6, 0.79)
    pt3dadd(5.85, 40.22, 6, 0.79)
    pt3dadd(5.96, 40.33, 6, 0.79)
    pt3dadd(5.96, 40.59, 6, 0.79)
    pt3dadd(6.06, 40.75, 6, 0.79)
    pt3dadd(6.12, 40.96, 6, 0.79)
    pt3dadd(6.17, 41.22, 6, 0.79)
    pt3dadd(6.17, 41.38, 6, 0.79)
    pt3dadd(6.22, 41.59, 6, 0.79)
    pt3dadd(6.22, 42.07, 6, 0.79)
    pt3dadd(6.27, 42.17, 6, 0.79)
    pt3dadd(6.27, 42.33, 6, 0.79)
    pt3dadd(6.22, 42.49, 6, 0.79)
    pt3dadd(6.22, 42.75, 6, 0.79)
    pt3dadd(6.17, 42.96, 6, 0.79)
    pt3dadd(6.17, 43.33, 6, 0.79)
    pt3dadd(6.06, 43.43, 6, 0.79)
    pt3dadd(6.06, 43.7, 6, 0.79)
    pt3dadd(6.01, 43.85, 6, 0.79)
    pt3dadd(6.01, 44.06, 6, 0.79)
    pt3dadd(5.96, 44.22, 6, 0.79)
    pt3dadd(5.96, 45.9, 6, 0.79)
    pt3dadd(5.91, 46.06, 6, 0.79)
    pt3dadd(5.91, 46.43, 6, 0.79)
    pt3dadd(5.96, 46.64, 6, 0.79)
    pt3dadd(6.01, 46.8, 6, 0.79)
    pt3dadd(6.01, 47.01, 6, 0.79)
    pt3dadd(5.96, 47.11, 6, 0.79)
    pt3dadd(5.96, 47.38, 6, 0.79)
    pt3dadd(6.02, 48.13, 6.5, 0.79)
    pt3dadd(6.02, 48.45, 7, 0.79)
    pt3dadd(5.92, 48.5, 7, 0.79)
    pt3dadd(5.92, 48.71, 7, 0.79)
    pt3dadd(5.87, 48.87, 7, 0.79)
    pt3dadd(5.87, 49.08, 7, 0.79)
    pt3dadd(5.81, 49.23, 7, 0.79)
    pt3dadd(5.81, 50.55, 7, 0.79)
    pt3dadd(5.71, 50.71, 7, 0.79)
    pt3dadd(5.66, 50.81, 7, 0.79)
    pt3dadd(5.6, 50.92, 7, 0.79)
    pt3dadd(5.55, 51.02, 7, 0.79)
    pt3dadd(5.5, 51.18, 7, 0.79)
    pt3dadd(5.34, 51.34, 7, 0.79)
    pt3dadd(5.24, 51.55, 7, 0.79)
    pt3dadd(5.13, 51.76, 7, 0.79)
    pt3dadd(5.08, 51.92, 7, 0.79)
    pt3dadd(5.03, 52.13, 7, 0.79)
    pt3dadd(5.03, 52.28, 7, 0.79)
    pt3dadd(4.97, 52.49, 7, 0.79)
    pt3dadd(4.97, 52.76, 7, 0.79)
  }
}
proc shape3d_8() {
  dend[5] {
    pt3dadd(4.92, 52.91, 7, 0.79)
    pt3dadd(4.87, 53.12, 7, 0.79)
    pt3dadd(4.87, 54.07, 7, 0.79)
    pt3dadd(4.92, 54.23, 7, 0.79)
    pt3dadd(4.92, 54.39, 7, 0.79)
    pt3dadd(4.97, 54.6, 7, 0.79)
    pt3dadd(4.97, 54.75, 7, 0.79)
    pt3dadd(5.03, 54.96, 7, 0.79)
    pt3dadd(5.08, 55.12, 7, 0.79)
    pt3dadd(5.08, 55.39, 7, 0.79)
    pt3dadd(5.13, 55.54, 7, 0.79)
    pt3dadd(5.24, 55.75, 7, 0.79)
    pt3dadd(5.29, 55.91, 7, 0.79)
    pt3dadd(5.29, 56.12, 7, 0.79)
    pt3dadd(5.39, 56.33, 7, 0.79)
    pt3dadd(5.5, 56.59, 7, 0.79)
    pt3dadd(5.55, 56.7, 7, 0.79)
    pt3dadd(5.71, 56.86, 7, 0.79)
    pt3dadd(5.71, 57.07, 7, 0.79)
    pt3dadd(5.87, 57.12, 7, 0.79)
    pt3dadd(5.92, 57.28, 7, 0.79)
    pt3dadd(5.97, 57.49, 7, 0.79)
    pt3dadd(5.97, 57.75, 7, 0.79)
    pt3dadd(6.08, 57.91, 7, 0.79)
    pt3dadd(6.08, 58.01, 7, 0.79)
    pt3dadd(6.23, 58.22, 7, 0.79)
    pt3dadd(6.13, 58.28, 7, 0.79)
    pt3dadd(6.18, 58.43, 7, 0.79)
    pt3dadd(6.18, 58.54, 7, 0.79)
    pt3dadd(6.23, 58.64, 7, 0.79)
    pt3dadd(6.23, 58.8, 7, 0.79)
    pt3dadd(6.29, 58.96, 7, 0.79)
    pt3dadd(6.34, 59.07, 7, 0.79)
    pt3dadd(6.34, 59.17, 7, 0.79)
    pt3dadd(6.58, 60.1, 7.5, 0.79)
    pt3dadd(6.52, 60.15, 8, 0.79)
    pt3dadd(6.52, 60.36, 8.5, 0.79)
    pt3dadd(6.42, 60.47, 8.5, 0.79)
    pt3dadd(6.37, 60.62, 8.5, 0.79)
    pt3dadd(6.26, 60.73, 8.5, 0.79)
    pt3dadd(6.26, 61.1, 8.5, 0.79)
    pt3dadd(6.21, 61.26, 8.5, 0.79)
    pt3dadd(6.16, 61.36, 8.5, 0.79)
    pt3dadd(6.1, 61.57, 8.5, 0.79)
    pt3dadd(6.1, 62.41, 8.5, 0.79)
    pt3dadd(6.16, 62.57, 8.5, 0.79)
    pt3dadd(6.16, 62.88, 8.5, 0.79)
    pt3dadd(6.26, 63.1, 8.5, 0.79)
    pt3dadd(6.26, 63.46, 8.5, 0.79)
    pt3dadd(6.21, 63.57, 8.5, 0.79)
    pt3dadd(6.26, 63.73, 8.5, 0.79)
    pt3dadd(6.21, 63.88, 8.5, 0.79)
    pt3dadd(6.21, 64.88, 9, 0.79)
    pt3dadd(6.16, 65.09, 9, 0.79)
    pt3dadd(6.16, 65.25, 9, 0.79)
    pt3dadd(6.1, 65.36, 9, 0.79)
    pt3dadd(6, 65.51, 9, 0.79)
    pt3dadd(6, 65.88, 9, 0.79)
    pt3dadd(5.95, 66.14, 9, 0.79)
    pt3dadd(5.95, 66.67, 9, 0.79)
    pt3dadd(6, 66.78, 9, 0.79)
    pt3dadd(6, 66.98, 9, 0.79)
    pt3dadd(6.1, 67.25, 9, 0.79)
    pt3dadd(6.1, 67.45, 9, 0.79)
    pt3dadd(6.16, 67.56, 9, 0.79)
    pt3dadd(6.16, 68.04, 9, 0.79)
    pt3dadd(6.21, 68.19, 9, 0.79)
    pt3dadd(6.21, 68.4, 9, 0.79)
    pt3dadd(6.16, 68.56, 9, 0.79)
    pt3dadd(6.16, 68.83, 9, 0.79)
    pt3dadd(6.1, 68.93, 9, 0.79)
    pt3dadd(6, 69.04, 9, 0.79)
    pt3dadd(6, 69.98, 8.5, 0.79)
    pt3dadd(5.95, 70.09, 8.5, 0.79)
    pt3dadd(5.95, 70.34, 8.5, 0.79)
    pt3dadd(5.89, 70.45, 8.5, 0.79)
    pt3dadd(5.84, 70.56, 8.5, 0.79)
    pt3dadd(5.56, 71.67, 10, 0.79)
    pt3dadd(5.61, 71.81, 10.5, 0.79)
    pt3dadd(5.61, 72.51, 10.5, 0.79)
    pt3dadd(5.66, 72.77, 10.5, 0.79)
    pt3dadd(5.61, 72.93, 10.5, 0.79)
    pt3dadd(5.56, 73.09, 10.5, 0.79)
    pt3dadd(5.56, 73.3, 10.5, 0.79)
    pt3dadd(5.5, 73.4, 10.5, 0.79)
    pt3dadd(5.5, 73.61, 10.5, 0.79)
    pt3dadd(5.45, 73.72, 10.5, 0.79)
    pt3dadd(5.35, 73.98, 10.5, 0.79)
    pt3dadd(5.29, 74.08, 10.5, 0.79)
    pt3dadd(5.24, 74.19, 10.5, 0.79)
    pt3dadd(5.19, 74.45, 10.5, 0.79)
    pt3dadd(5.19, 74.66, 10.5, 0.79)
    pt3dadd(5.14, 74.87, 10.5, 0.79)
    pt3dadd(5.14, 75.23, 10.5, 0.79)
    pt3dadd(5.14, 75.45, 10.5, 0.79)
    pt3dadd(5.14, 75.61, 10.5, 0.79)
    pt3dadd(5.08, 75.87, 10.5, 0.79)
    pt3dadd(5.03, 75.98, 10.5, 0.79)
    pt3dadd(5.03, 76.23, 10.5, 0.79)
    pt3dadd(5.03, 76.45, 10.5, 0.79)
    pt3dadd(4.93, 76.61, 10.5, 0.79)
    pt3dadd(4.93, 77.19, 10.5, 0.79)
    pt3dadd(4.87, 77.34, 10.5, 0.79)
    pt3dadd(4.87, 78.29, 10.5, 0.79)
    pt3dadd(4.93, 78.45, 10.5, 0.79)
    pt3dadd(4.93, 78.66, 10.5, 0.79)
    pt3dadd(4.98, 78.81, 10.5, 0.79)
    pt3dadd(4.98, 79.03, 10.5, 0.79)
    pt3dadd(4.98, 79.18, 10.5, 0.79)
    pt3dadd(5.03, 79.39, 10.5, 0.79)
    pt3dadd(4.98, 80.03, 10.5, 0.79)
  }
  dend[6] {pt3dclear()
    pt3dadd(4.98, 80.03, 10.5, 0.79)
    pt3dadd(5.5, 80.59, 10.5, 0.63)
    pt3dadd(5.56, 80.76, 10.5, 0.63)
    pt3dadd(5.66, 80.87, 10.5, 0.63)
    pt3dadd(5.71, 81.02, 10.5, 0.63)
    pt3dadd(5.82, 81.13, 10.5, 0.63)
    pt3dadd(5.98, 81.18, 10.5, 0.63)
    pt3dadd(5.98, 81.29, 10.5, 0.63)
    pt3dadd(6.13, 81.44, 10.5, 0.63)
    pt3dadd(6.29, 81.55, 10.5, 0.63)
    pt3dadd(6.5, 81.65, 10.5, 0.63)
    pt3dadd(6.61, 81.87, 10.5, 0.63)
    pt3dadd(6.71, 81.97, 10.5, 0.63)
    pt3dadd(7.41, 82.71, 10, 0.63)
    pt3dadd(7.46, 82.92, 10, 0.63)
    pt3dadd(7.46, 83.4, 10, 0.63)
    pt3dadd(7.52, 83.56, 10, 0.63)
    pt3dadd(7.52, 83.77, 10, 0.63)
    pt3dadd(7.52, 83.98, 10, 0.63)
    pt3dadd(7.46, 84.13, 10.5, 0.63)
    pt3dadd(7.36, 84.24, 10.5, 0.63)
    pt3dadd(7.31, 84.4, 10.5, 0.63)
    pt3dadd(7.31, 84.97, 11, 0.63)
    pt3dadd(7.36, 85.08, 11, 0.63)
    pt3dadd(7.41, 85.18, 11, 0.63)
    pt3dadd(7.41, 85.29, 11, 0.63)
    pt3dadd(7.52, 85.34, 11, 0.63)
    pt3dadd(7.57, 85.45, 11, 0.63)
    pt3dadd(7.67, 85.66, 11, 0.63)
    pt3dadd(7.78, 85.82, 11, 0.63)
    pt3dadd(7.88, 85.97, 11, 0.63)
    pt3dadd(7.88, 86.08, 11, 0.63)
    pt3dadd(7.99, 86.18, 11, 0.63)
    pt3dadd(8.15, 86.39, 10.5, 0.63)
    pt3dadd(8.25, 86.5, 10.5, 0.63)
    pt3dadd(8.3, 86.71, 10.5, 0.63)
    pt3dadd(8.51, 87.08, 10, 0.63)
    pt3dadd(8.61, 87.18, 10, 0.63)
    pt3dadd(8.72, 87.34, 10, 0.63)
    pt3dadd(8.77, 87.55, 10, 0.63)
    pt3dadd(8.88, 87.71, 10, 0.63)
    pt3dadd(8.93, 87.87, 10, 0.63)
    pt3dadd(8.99, 87.97, 10, 0.63)
    pt3dadd(8.99, 88.18, 10, 0.63)
    pt3dadd(9.09, 88.29, 10, 0.63)
    pt3dadd(9.14, 88.44, 10, 0.63)
    pt3dadd(9.25, 88.55, 10, 0.63)
    pt3dadd(9.35, 88.65, 10, 0.63)
    pt3dadd(9.77, 89.08, 10, 0.63)
    pt3dadd(9.88, 89.23, 10, 0.63)
    pt3dadd(10.03, 89.44, 10, 0.63)
    pt3dadd(10.14, 89.55, 10, 0.63)
    pt3dadd(10.25, 89.6, 10, 0.63)
    pt3dadd(10.35, 89.71, 10, 0.63)
    pt3dadd(10.46, 89.81, 10, 0.63)
    pt3dadd(10.51, 89.97, 10, 0.63)
    pt3dadd(10.56, 90.07, 10, 0.63)
    pt3dadd(10.67, 90.18, 10, 0.63)
    pt3dadd(10.82, 90.44, 10, 0.63)
    pt3dadd(10.88, 90.55, 10, 0.63)
    pt3dadd(10.98, 90.65, 10, 0.63)
    pt3dadd(11.03, 90.76, 10, 0.63)
    pt3dadd(11.14, 90.81, 10, 0.63)
    pt3dadd(11.24, 91.07, 10, 0.63)
    pt3dadd(11.3, 91.18, 10, 0.63)
    pt3dadd(11.4, 91.23, 10, 0.63)
    pt3dadd(11.51, 91.44, 10, 0.63)
    pt3dadd(11.61, 91.55, 10, 0.63)
    pt3dadd(11.66, 91.76, 10, 0.63)
    pt3dadd(11.72, 91.86, 10, 0.63)
    pt3dadd(11.77, 92.02, 10, 0.63)
    pt3dadd(11.82, 92.23, 10, 0.63)
    pt3dadd(11.93, 92.39, 10, 0.63)
    pt3dadd(11.93, 92.65, 10, 0.63)
    pt3dadd(11.98, 92.86, 10, 0.63)
    pt3dadd(12.03, 92.97, 10, 0.63)
    pt3dadd(12.03, 93.12, 10, 0.63)
    pt3dadd(11.92, 94.2, 9.5, 0.63)
    pt3dadd(12.02, 94.36, 9.5, 0.63)
    pt3dadd(12.08, 94.57, 9.5, 0.63)
    pt3dadd(12.18, 94.62, 9.5, 0.63)
    pt3dadd(12.23, 94.78, 9.5, 0.63)
    pt3dadd(12.34, 94.99, 9.5, 0.63)
    pt3dadd(12.39, 95.15, 9.5, 0.63)
    pt3dadd(12.5, 95.36, 9.5, 0.63)
    pt3dadd(12.6, 95.62, 9.5, 0.63)
    pt3dadd(12.71, 95.83, 9.5, 0.63)
    pt3dadd(12.76, 95.99, 9.5, 0.63)
    pt3dadd(12.86, 96.2, 9.5, 0.63)
    pt3dadd(12.97, 96.31, 9.5, 0.63)
    pt3dadd(12.97, 96.52, 9.5, 0.63)
    pt3dadd(13.02, 96.62, 9.5, 0.63)
    pt3dadd(13.13, 96.73, 9.5, 0.63)
    pt3dadd(13.18, 96.88, 9.5, 0.63)
    pt3dadd(13.23, 97.04, 9.5, 0.63)
    pt3dadd(13.34, 97.2, 9.5, 0.63)
    pt3dadd(13.39, 97.31, 9.5, 0.63)
    pt3dadd(13.44, 97.41, 9.5, 0.63)
    pt3dadd(13.49, 97.52, 9.5, 0.63)
    pt3dadd(13.6, 97.73, 9.5, 0.63)
    pt3dadd(13.7, 97.83, 9.5, 0.63)
    pt3dadd(13.81, 97.94, 9.5, 0.63)
    pt3dadd(13.86, 98.04, 9.5, 0.63)
    pt3dadd(13.91, 98.25, 9.5, 0.63)
    pt3dadd(14.02, 98.3, 9.5, 0.63)
    pt3dadd(14.12, 98.51, 9.5, 0.63)
    pt3dadd(14.18, 98.67, 9.5, 0.63)
    pt3dadd(14.23, 98.88, 9.5, 0.63)
    pt3dadd(14.28, 98.99, 9.5, 0.63)
    pt3dadd(14.33, 99.15, 9.5, 0.63)
    pt3dadd(14.44, 99.36, 9.5, 0.63)
    pt3dadd(14.49, 99.51, 9.5, 0.63)
    pt3dadd(14.6, 99.67, 9.5, 0.63)
    pt3dadd(14.65, 99.78, 9.5, 0.63)
    pt3dadd(14.7, 99.99, 9.5, 0.63)
    pt3dadd(14.86, 100.09, 9.5, 0.63)
    pt3dadd(15.02, 100.14, 9.5, 0.63)
    pt3dadd(15.12, 100.25, 9.5, 0.63)
    pt3dadd(15.23, 100.35, 9.5, 0.63)
    pt3dadd(15.33, 100.41, 9.5, 0.63)
    pt3dadd(15.44, 100.51, 9.5, 0.63)
    pt3dadd(15.49, 100.62, 9.5, 0.63)
    pt3dadd(15.65, 100.67, 9.5, 0.63)
    pt3dadd(15.8, 100.78, 9.5, 0.63)
    pt3dadd(15.96, 100.99, 9.5, 0.63)
    pt3dadd(16.12, 101.04, 9.5, 0.63)
    pt3dadd(16.22, 101.25, 9.5, 0.63)
    pt3dadd(16.38, 101.3, 9.5, 0.63)
    pt3dadd(16.38, 101.51, 9.5, 0.63)
    pt3dadd(16.48, 101.62, 9.5, 0.63)
    pt3dadd(16.59, 101.67, 9.5, 0.63)
    pt3dadd(16.64, 101.77, 9.5, 0.63)
    pt3dadd(16.7, 101.88, 9.5, 0.63)
    pt3dadd(16.7, 101.98, 9.5, 0.63)
    pt3dadd(16.75, 102.14, 9.5, 0.63)
    pt3dadd(16.8, 102.25, 9.5, 0.63)
    pt3dadd(16.85, 102.35, 9.5, 0.63)
    pt3dadd(16.91, 102.51, 9.5, 0.63)
  }
}
proc shape3d_9() {
  dend[6] {
    pt3dadd(17.01, 102.67, 9.5, 0.63)
    pt3dadd(17.05, 102.77, 9.5, 0.63)
    pt3dadd(17.27, 102.98, 9.5, 0.63)
    pt3dadd(17.43, 102.98, 9.5, 0.63)
    pt3dadd(17.54, 103.14, 9.5, 0.63)
    pt3dadd(17.75, 103.3, 9.5, 0.63)
    pt3dadd(17.85, 103.35, 9.5, 0.63)
    pt3dadd(18.05, 103.56, 9.5, 0.63)
    pt3dadd(18.17, 103.67, 9.5, 0.63)
    pt3dadd(18.27, 103.77, 9.5, 0.63)
    pt3dadd(18.38, 103.88, 9.5, 0.63)
    pt3dadd(18.48, 104.03, 9.5, 0.63)
    pt3dadd(18.53, 104.14, 9.5, 0.63)
    pt3dadd(18.69, 104.4, 9.5, 0.63)
    pt3dadd(18.73, 104.51, 9.5, 0.63)
    pt3dadd(18.8, 104.67, 9.5, 0.63)
    pt3dadd(19.46, 105.34, 9.5, 0.63)
    pt3dadd(19.62, 105.34, 9.5, 0.63)
    pt3dadd(19.77, 105.55, 9.5, 0.63)
    pt3dadd(19.98, 105.76, 9.5, 0.63)
    pt3dadd(20.09, 105.86, 9.5, 0.63)
    pt3dadd(20.19, 105.97, 9.5, 0.63)
    pt3dadd(20.25, 106.12, 9.5, 0.63)
    pt3dadd(20.35, 106.23, 9.5, 0.63)
    pt3dadd(20.51, 106.49, 9.5, 0.63)
    pt3dadd(20.61, 106.7, 9.5, 0.63)
    pt3dadd(20.72, 106.86, 9.5, 0.63)
    pt3dadd(20.82, 106.97, 9.5, 0.63)
    pt3dadd(20.88, 107.12, 9.5, 0.63)
    pt3dadd(20.98, 107.33, 9.5, 0.63)
    pt3dadd(21.09, 107.49, 9.5, 0.63)
    pt3dadd(21.14, 107.7, 9.5, 0.63)
    pt3dadd(21.19, 107.81, 9.5, 0.63)
    pt3dadd(21.24, 107.96, 9.5, 0.63)
    pt3dadd(21.35, 108.17, 9.5, 0.63)
    pt3dadd(21.4, 108.33, 9.5, 0.63)
    pt3dadd(21.45, 108.44, 9.5, 0.63)
    pt3dadd(21.56, 108.7, 9.5, 0.63)
    pt3dadd(21.66, 108.81, 9.5, 0.63)
    pt3dadd(21.72, 108.91, 9.5, 0.63)
    pt3dadd(21.82, 108.96, 9.5, 0.63)
    pt3dadd(21.87, 109.07, 9.5, 0.63)
    pt3dadd(21.98, 109.12, 9.5, 0.63)
    pt3dadd(22.35, 109.49, 9.5, 0.63)
    pt3dadd(22.5, 109.54, 9.5, 0.63)
    pt3dadd(22.61, 109.59, 9.5, 0.63)
    pt3dadd(22.66, 109.7, 9.5, 0.63)
    pt3dadd(22.82, 109.8, 9.5, 0.63)
    pt3dadd(22.92, 109.96, 9.5, 0.63)
    pt3dadd(23.03, 110.07, 9.5, 0.63)
    pt3dadd(23.19, 110.22, 9.5, 0.63)
    pt3dadd(23.34, 110.38, 9.5, 0.63)
    pt3dadd(23.5, 110.59, 9.5, 0.63)
    pt3dadd(23.55, 110.75, 9.5, 0.63)
    pt3dadd(23.66, 110.86, 9.5, 0.63)
    pt3dadd(23.76, 110.96, 9.5, 0.63)
    pt3dadd(23.87, 111.12, 9.5, 0.63)
    pt3dadd(23.97, 111.17, 9.5, 0.63)
    pt3dadd(24.55, 111.75, 10, 0.63)
    pt3dadd(24.66, 111.85, 10, 0.63)
    pt3dadd(24.81, 111.96, 10, 0.63)
    pt3dadd(25.02, 112.12, 10, 0.63)
    pt3dadd(25.08, 112.28, 10, 0.63)
    pt3dadd(25.29, 112.49, 10, 0.63)
    pt3dadd(25.39, 112.59, 10, 0.63)
    pt3dadd(25.55, 112.75, 10, 0.63)
    pt3dadd(25.71, 112.8, 10, 0.63)
    pt3dadd(25.81, 112.91, 10, 0.63)
    pt3dadd(25.92, 112.96, 10, 0.63)
    pt3dadd(26.07, 112.96, 10, 0.63)
    pt3dadd(26.18, 113.01, 10, 0.63)
    pt3dadd(26.39, 113.01, 10, 0.63)
    pt3dadd(26.49, 113.06, 10, 0.63)
    pt3dadd(26.6, 113.06, 10, 0.63)
    pt3dadd(26.7, 113.12, 10, 0.63)
    pt3dadd(26.81, 113.17, 10, 0.63)
    pt3dadd(27.07, 113.43, 10, 0.63)
    pt3dadd(27.23, 113.48, 10, 0.63)
    pt3dadd(27.81, 114.06, 10, 0.63)
    pt3dadd(27.91, 114.22, 10, 0.63)
    pt3dadd(27.96, 114.38, 10, 0.63)
    pt3dadd(28.07, 114.54, 10, 0.63)
    pt3dadd(28.12, 114.64, 10, 0.63)
    pt3dadd(28.17, 114.85, 10, 0.63)
    pt3dadd(28.23, 115.01, 10, 0.63)
    pt3dadd(28.28, 115.11, 10, 0.63)
    pt3dadd(28.33, 115.32, 10, 0.63)
    pt3dadd(28.33, 115.48, 10, 0.63)
    pt3dadd(28.38, 115.69, 10, 0.63)
    pt3dadd(28.44, 115.85, 10, 0.63)
    pt3dadd(28.44, 116.06, 10, 0.63)
    pt3dadd(28.49, 116.22, 10, 0.63)
    pt3dadd(28.54, 116.32, 10, 0.63)
    pt3dadd(28.54, 116.53, 10, 0.63)
    pt3dadd(28.74, 117.67, 10, 0.63)
    pt3dadd(28.69, 117.82, 10, 0.63)
    pt3dadd(28.69, 118.14, 10, 0.63)
    pt3dadd(28.63, 118.25, 10, 0.63)
    pt3dadd(28.63, 118.77, 10, 0.63)
    pt3dadd(28.58, 118.93, 10, 0.63)
    pt3dadd(28.58, 119.3, 10, 0.63)
    pt3dadd(28.69, 119.56, 10, 0.63)
    pt3dadd(28.79, 119.66, 10, 0.63)
    pt3dadd(28.9, 119.82, 10, 0.63)
    pt3dadd(29, 120.03, 10, 0.63)
    pt3dadd(29.11, 120.14, 10, 0.63)
    pt3dadd(29.26, 120.35, 10, 0.63)
    pt3dadd(29.42, 120.51, 10, 0.63)
    pt3dadd(29.58, 120.77, 10, 0.63)
    pt3dadd(29.68, 120.98, 10, 0.63)
    pt3dadd(29.79, 121.08, 10, 0.63)
    pt3dadd(29.84, 121.19, 10, 0.63)
    pt3dadd(29.89, 121.35, 10, 0.63)
    pt3dadd(29.95, 121.45, 10, 0.63)
    pt3dadd(30, 121.61, 10, 0.63)
    pt3dadd(30.05, 121.77, 10, 0.63)
    pt3dadd(30.05, 122.03, 10, 0.63)
    pt3dadd(30.16, 122.29, 10, 0.63)
    pt3dadd(30.16, 122.5, 10, 0.63)
    pt3dadd(30.21, 122.61, 10, 0.63)
    pt3dadd(30.31, 122.77, 10, 0.63)
    pt3dadd(30.37, 122.87, 10, 0.63)
    pt3dadd(30.47, 122.98, 10, 0.63)
    pt3dadd(30.58, 123.13, 10, 0.63)
    pt3dadd(30.63, 123.24, 10, 0.63)
    pt3dadd(31, 123.61, 10, 0.63)
    pt3dadd(31.1, 123.71, 10, 0.63)
    pt3dadd(31.21, 123.87, 10, 0.63)
    pt3dadd(31.47, 124.08, 10, 0.63)
    pt3dadd(31.57, 124.29, 10, 0.63)
    pt3dadd(31.73, 124.45, 10, 0.63)
    pt3dadd(31.84, 124.66, 10, 0.63)
    pt3dadd(31.94, 124.82, 10, 0.63)
    pt3dadd(32.04, 125.03, 10, 0.63)
    pt3dadd(32.1, 125.18, 10, 0.63)
    pt3dadd(32.2, 125.29, 10, 0.63)
    pt3dadd(32.26, 125.39, 10, 0.63)
    pt3dadd(32.36, 125.6, 10, 0.63)
    pt3dadd(32.47, 125.76, 10, 0.63)
    pt3dadd(32.57, 125.97, 10, 0.63)
    pt3dadd(32.61, 126.13, 10, 0.63)
    pt3dadd(32.68, 126.24, 10, 0.63)
    pt3dadd(32.72, 126.39, 10, 0.63)
    pt3dadd(32.72, 126.81, 10, 0.63)
    pt3dadd(32.78, 126.97, 10, 0.63)
    pt3dadd(32.78, 127.18, 10, 0.63)
    pt3dadd(32.83, 127.34, 10, 0.63)
    pt3dadd(32.89, 127.5, 10, 0.63)
    pt3dadd(32.89, 127.71, 10, 0.63)
    pt3dadd(32.94, 127.87, 10, 0.63)
    pt3dadd(32.99, 128.02, 10, 0.63)
    pt3dadd(33.09, 129.22, 10, 0.63)
    pt3dadd(33.09, 129.34, 10, 0.63)
    pt3dadd(33.14, 129.5, 10, 0.63)
    pt3dadd(33.24, 129.6, 10, 0.63)
    pt3dadd(33.29, 129.71, 10, 0.63)
    pt3dadd(33.35, 129.81, 10, 0.63)
    pt3dadd(33.51, 129.91, 10, 0.63)
    pt3dadd(33.56, 130.02, 10, 0.63)
    pt3dadd(33.65, 130.08, 10, 0.63)
    pt3dadd(33.77, 130.13, 10, 0.63)
    pt3dadd(33.86, 130.18, 10, 0.63)
    pt3dadd(34.08, 130.38, 10, 0.63)
    pt3dadd(34.19, 130.55, 9.5, 0.63)
    pt3dadd(34.29, 130.6, 9.5, 0.63)
    pt3dadd(34.35, 130.76, 9.5, 0.63)
    pt3dadd(34.45, 130.97, 9.5, 0.63)
    pt3dadd(34.5, 131.13, 9.5, 0.63)
    pt3dadd(34.56, 131.34, 9.5, 0.63)
    pt3dadd(34.61, 131.44, 9.5, 0.63)
    pt3dadd(34.65, 131.6, 9.5, 0.63)
    pt3dadd(34.77, 131.71, 9.5, 0.63)
    pt3dadd(34.86, 131.97, 9.5, 0.63)
    pt3dadd(34.97, 132.07, 9.5, 0.63)
    pt3dadd(35.08, 132.22, 10, 0.63)
    pt3dadd(35.13, 132.34, 10, 0.63)
    pt3dadd(35.24, 132.44, 10, 0.63)
    pt3dadd(35.34, 132.49, 10, 0.63)
    pt3dadd(35.4, 132.6, 10, 0.63)
    pt3dadd(35.5, 132.65, 10, 0.63)
    pt3dadd(35.54, 132.76, 10, 0.63)
    pt3dadd(35.65, 132.81, 10, 0.63)
    pt3dadd(35.82, 132.91, 10, 0.63)
    pt3dadd(35.92, 133.02, 10, 0.63)
    pt3dadd(36.03, 133.12, 10, 0.63)
    pt3dadd(36.18, 133.22, 10, 0.63)
    pt3dadd(36.29, 133.22, 10, 0.63)
    pt3dadd(36.39, 133.28, 10, 0.63)
    pt3dadd(36.5, 133.38, 10.5, 0.63)
    pt3dadd(36.65, 133.38, 10.5, 0.63)
    pt3dadd(36.81, 133.49, 10.5, 0.63)
    pt3dadd(36.97, 133.6, 10.5, 0.63)
    pt3dadd(37.13, 133.65, 10.5, 0.63)
    pt3dadd(37.39, 133.86, 10.5, 0.63)
    pt3dadd(37.5, 133.97, 10.5, 0.63)
    pt3dadd(37.71, 134.07, 10.5, 0.63)
    pt3dadd(37.81, 134.18, 10.5, 0.63)
    pt3dadd(37.92, 134.28, 10.5, 0.63)
    pt3dadd(38.02, 134.33, 10.5, 0.63)
    pt3dadd(38.13, 134.38, 10.5, 0.63)
    pt3dadd(38.28, 134.38, 10.5, 0.63)
    pt3dadd(38.49, 134.54, 10.5, 0.63)
    pt3dadd(38.6, 134.54, 11, 0.63)
    pt3dadd(38.7, 134.6, 11, 0.63)
    pt3dadd(38.81, 134.65, 11, 0.63)
    pt3dadd(39.11, 134.75, 11, 0.63)
    pt3dadd(39.33, 134.75, 11, 0.63)
    pt3dadd(39.44, 134.81, 11, 0.63)
    pt3dadd(39.54, 134.81, 11, 0.63)
    pt3dadd(39.7, 134.91, 11, 0.63)
    pt3dadd(39.86, 134.91, 11, 0.63)
    pt3dadd(39.96, 134.96, 11, 0.63)
    pt3dadd(40.07, 134.96, 11, 0.63)
    pt3dadd(40.22, 135.02, 11, 0.63)
    pt3dadd(40.44, 135.12, 11, 0.63)
    pt3dadd(40.7, 135.12, 11, 0.63)
    pt3dadd(40.86, 135.22, 11, 0.63)
    pt3dadd(40.96, 135.33, 11, 0.63)
    pt3dadd(41.07, 135.33, 11, 0.63)
    pt3dadd(41.17, 135.44, 11, 0.63)
    pt3dadd(41.22, 135.6, 11, 0.63)
    pt3dadd(41.38, 135.69, 11, 0.63)
    pt3dadd(41.43, 135.86, 11, 0.63)
    pt3dadd(41.59, 136.07, 11, 0.63)
    pt3dadd(41.64, 136.16, 11, 0.63)
    pt3dadd(41.85, 136.33, 11, 0.63)
    pt3dadd(41.96, 136.44, 11, 0.63)
    pt3dadd(42.06, 136.54, 11, 0.63)
    pt3dadd(42.27, 136.65, 11, 0.63)
    pt3dadd(42.38, 136.69, 11, 0.63)
    pt3dadd(42.54, 136.75, 11, 0.63)
    pt3dadd(42.64, 136.86, 11, 0.63)
    pt3dadd(43.22, 136.86, 11, 0.63)
    pt3dadd(43.32, 136.91, 11, 0.63)
    pt3dadd(43.43, 136.96, 11, 0.63)
    pt3dadd(43.53, 137.02, 11, 0.63)
    pt3dadd(43.59, 137.12, 11, 0.63)
    pt3dadd(43.69, 137.16, 11, 0.63)
    pt3dadd(43.9, 137.38, 10.5, 0.63)
    pt3dadd(44.01, 137.38, 10.5, 0.63)
    pt3dadd(44.16, 137.38, 10.5, 0.63)
    pt3dadd(44.53, 137.33, 10, 0.63)
    pt3dadd(44.64, 137.38, 10, 0.63)
    pt3dadd(44.74, 137.33, 10.5, 0.63)
    pt3dadd(44.85, 137.22, 10.5, 0.63)
    pt3dadd(45, 137.28, 11.5, 0.63)
    pt3dadd(45.21, 137.28, 11.5, 0.63)
    pt3dadd(45.37, 137.44, 12, 0.63)
    pt3dadd(45.48, 137.54, 12, 0.63)
  }
}
proc shape3d_10() {
  dend[6] {
    pt3dadd(45.58, 137.75, 12, 0.63)
    pt3dadd(45.63, 137.86, 12, 0.63)
    pt3dadd(45.74, 137.96, 12, 0.63)
    pt3dadd(45.79, 138.16, 12, 0.63)
    pt3dadd(45.84, 138.28, 12, 0.63)
    pt3dadd(45.9, 138.38, 12, 0.63)
    pt3dadd(45.95, 138.49, 12, 0.63)
    pt3dadd(46, 138.69, 12, 0.63)
    pt3dadd(46.11, 138.8, 12, 0.63)
    pt3dadd(46.16, 138.96, 12, 0.63)
    pt3dadd(46.26, 139.16, 12, 0.63)
    pt3dadd(46.41, 140.83, 12, 0.63)
    pt3dadd(46.47, 140.94, 12, 0.63)
    pt3dadd(46.52, 141.05, 12, 0.63)
    pt3dadd(46.52, 141.72, 12.5, 0.63)
    pt3dadd(46.36, 141.94, 12.5, 0.63)
    pt3dadd(46.26, 142.04, 12.5, 0.63)
    pt3dadd(46.2, 142.15, 13, 0.63)
    pt3dadd(46.2, 142.36, 13, 0.63)
    pt3dadd(46.1, 142.46, 13, 0.63)
    pt3dadd(45.94, 142.62, 13, 0.63)
    pt3dadd(45.94, 142.83, 13, 0.63)
    pt3dadd(45.89, 142.99, 13, 0.63)
    pt3dadd(45.89, 143.88, 13, 0.63)
    pt3dadd(45.84, 144.04, 13, 0.63)
    pt3dadd(45.78, 144.25, 13, 0.63)
    pt3dadd(45.78, 144.41, 13, 0.63)
    pt3dadd(45.73, 144.78, 13, 0.63)
    pt3dadd(45.68, 145.15, 13, 0.63)
    pt3dadd(45.63, 145.3, 13, 0.63)
    pt3dadd(45.63, 146.13, 13, 0.63)
    pt3dadd(45.68, 146.3, 13, 0.63)
    pt3dadd(45.68, 146.51, 13, 0.63)
    pt3dadd(45.73, 146.66, 13, 0.63)
    pt3dadd(45.78, 146.88, 13, 0.63)
    pt3dadd(45.84, 147.04, 13, 0.63)
    pt3dadd(45.84, 147.97, 13, 0.63)
    pt3dadd(45.78, 148.13, 13, 0.63)
    pt3dadd(45.73, 148.3, 13, 0.63)
    pt3dadd(45.68, 148.46, 13, 0.63)
    pt3dadd(45.63, 148.56, 13, 0.63)
    pt3dadd(45.57, 148.77, 13, 0.63)
    pt3dadd(45.57, 148.88, 13, 0.63)
    pt3dadd(45.52, 149.09, 13, 0.63)
    pt3dadd(45.47, 149.25, 13, 0.63)
    pt3dadd(45.47, 149.56, 13, 0.63)
    pt3dadd(45.42, 149.77, 13, 0.63)
    pt3dadd(45.36, 149.88, 13, 0.63)
    pt3dadd(45.36, 150.13, 13, 0.63)
    pt3dadd(45.31, 150.24, 13, 0.63)
    pt3dadd(45.31, 150.56, 13, 0.63)
    pt3dadd(45.26, 150.77, 13, 0.63)
    pt3dadd(44.81, 152.44, 13, 0.63)
    pt3dadd(44.87, 152.56, 13.5, 0.63)
    pt3dadd(44.92, 152.66, 13.5, 0.63)
    pt3dadd(44.92, 152.82, 13.5, 0.63)
    pt3dadd(44.97, 152.97, 13.5, 0.63)
    pt3dadd(44.97, 153.19, 13.5, 0.63)
    pt3dadd(45.02, 153.34, 13.5, 0.63)
    pt3dadd(45.02, 154.34, 13.5, 0.63)
    pt3dadd(45.08, 154.5, 13.5, 0.63)
    pt3dadd(45.02, 154.71, 13.5, 0.63)
    pt3dadd(45.02, 154.87, 13.5, 0.63)
    pt3dadd(44.97, 155.08, 13.5, 0.63)
    pt3dadd(44.92, 155.24, 13.5, 0.63)
    pt3dadd(44.92, 155.55, 13.5, 0.63)
    pt3dadd(44.87, 155.71, 13.5, 0.63)
    pt3dadd(44.81, 155.91, 13.5, 0.63)
    pt3dadd(44.76, 156.02, 13.5, 0.63)
    pt3dadd(44.76, 156.18, 13.5, 0.63)
    pt3dadd(44.71, 156.29, 13.5, 0.63)
    pt3dadd(44.66, 156.5, 13.5, 0.63)
    pt3dadd(44.66, 156.76, 13.5, 0.63)
    pt3dadd(44.6, 156.87, 13.5, 0.63)
    pt3dadd(44.6, 157.02, 13.5, 0.63)
    pt3dadd(44.71, 157.29, 13.5, 0.63)
    pt3dadd(44.76, 157.38, 13.5, 0.63)
    pt3dadd(44.81, 157.55, 13.5, 0.63)
    pt3dadd(44.87, 157.76, 13.5, 0.63)
    pt3dadd(44.92, 157.86, 14, 0.63)
    pt3dadd(44.97, 158.02, 14, 0.63)
    pt3dadd(45.08, 158.18, 14, 0.63)
    pt3dadd(45.02, 158.29, 14, 0.63)
    pt3dadd(45.13, 158.38, 14, 0.63)
    pt3dadd(45.23, 158.6, 14, 0.63)
    pt3dadd(45.29, 158.76, 14, 0.63)
    pt3dadd(45.29, 158.86, 14, 0.63)
    pt3dadd(45.34, 158.97, 14, 0.63)
    pt3dadd(45.34, 159.34, 14, 0.63)
    pt3dadd(45.34, 159.55, 14, 0.63)
    pt3dadd(45.23, 159.65, 14, 0.63)
    pt3dadd(45.18, 159.81, 14, 0.63)
    pt3dadd(45.13, 159.91, 14, 0.63)
    pt3dadd(45.08, 160.07, 14, 0.63)
    pt3dadd(45.02, 160.28, 14, 0.63)
    pt3dadd(44.97, 160.38, 14, 0.63)
    pt3dadd(44.97, 160.55, 14, 0.63)
    pt3dadd(44.92, 161.18, 14, 0.63)
    pt3dadd(44.97, 161.33, 14, 0.63)
    pt3dadd(45.02, 161.54, 14, 0.63)
    pt3dadd(45.02, 161.81, 14, 0.63)
    pt3dadd(45.08, 162.02, 14, 0.63)
    pt3dadd(45.13, 162.28, 14, 0.63)
    pt3dadd(45.38, 162.75, 14, 0.63)
    pt3dadd(45.27, 162.85, 14.5, 0.63)
    pt3dadd(45.27, 163.06, 14.5, 0.63)
    pt3dadd(45.22, 163.22, 14.5, 0.63)
    pt3dadd(45.22, 163.43, 14.5, 0.63)
    pt3dadd(45.17, 163.53, 14.5, 0.63)
    pt3dadd(45.17, 164.43, 14.5, 0.63)
    pt3dadd(45.22, 164.64, 14.5, 0.63)
    pt3dadd(45.27, 164.8, 14.5, 0.63)
    pt3dadd(45.38, 165.01, 14.5, 0.63)
    pt3dadd(45.43, 165.16, 14.5, 0.63)
    pt3dadd(45.53, 165.37, 14.5, 0.63)
    pt3dadd(45.59, 165.53, 14.5, 0.63)
    pt3dadd(45.69, 165.74, 15, 0.63)
    pt3dadd(45.74, 165.9, 15, 0.63)
    pt3dadd(45.8, 166.06, 15, 0.63)
    pt3dadd(45.8, 166.27, 15, 0.63)
    pt3dadd(45.85, 166.43, 15, 0.63)
    pt3dadd(45.85, 166.64, 15, 0.63)
    pt3dadd(45.9, 166.74, 15, 0.63)
    pt3dadd(45.9, 167, 15, 0.63)
    pt3dadd(45.95, 167.16, 15, 0.63)
    pt3dadd(45.95, 167.37, 15, 0.63)
    pt3dadd(46.01, 167.48, 15, 0.63)
    pt3dadd(46.01, 167.69, 15, 0.63)
    pt3dadd(46.01, 167.85, 15, 0.63)
    pt3dadd(46.06, 168, 15.5, 0.63)
    pt3dadd(46.01, 168.21, 15.5, 0.63)
    pt3dadd(46.01, 169.11, 15.5, 0.63)
    pt3dadd(46.06, 169.32, 15.5, 0.63)
    pt3dadd(46.11, 169.48, 15.5, 0.63)
    pt3dadd(46.22, 169.69, 15.5, 0.63)
    pt3dadd(46.27, 169.79, 15.5, 0.63)
    pt3dadd(46.27, 169.9, 15.5, 0.63)
    pt3dadd(46.37, 170, 15.5, 0.63)
    pt3dadd(46.43, 170.11, 15.5, 0.63)
    pt3dadd(46.53, 170.37, 15.5, 0.63)
    pt3dadd(46.58, 170.47, 15.5, 0.63)
    pt3dadd(46.58, 170.58, 15.5, 0.63)
    pt3dadd(46.74, 170.89, 15.5, 0.63)
    pt3dadd(46.79, 171.16, 15.5, 0.63)
    pt3dadd(46.95, 171.53, 15.5, 0.63)
    pt3dadd(47.06, 171.58, 15.5, 0.63)
    pt3dadd(47.21, 171.74, 16, 0.63)
    pt3dadd(47.37, 171.84, 16, 0.63)
    pt3dadd(47.48, 171.84, 16, 0.63)
    pt3dadd(47.58, 171.95, 16, 0.63)
    pt3dadd(47.69, 172.05, 16, 0.63)
    pt3dadd(47.79, 172.21, 16, 0.63)
    pt3dadd(47.84, 172.31, 16, 0.63)
    pt3dadd(47.9, 172.47, 16, 0.63)
    pt3dadd(47.9, 172.58, 16, 0.63)
    pt3dadd(47.95, 172.73, 16, 0.63)
    pt3dadd(47.95, 172.89, 16, 0.63)
    pt3dadd(48, 173, 16, 0.63)
    pt3dadd(48, 173.79, 16, 0.63)
    pt3dadd(47.9, 173.94, 16, 0.63)
    pt3dadd(48.28, 175.07, 17, 0.63)
    pt3dadd(48.17, 175.07, 17, 0.63)
    pt3dadd(48.17, 175.28, 17, 0.63)
    pt3dadd(48.12, 175.43, 17, 0.63)
    pt3dadd(48.12, 175.59, 17, 0.63)
    pt3dadd(48.07, 175.7, 17, 0.63)
    pt3dadd(48.07, 175.96, 17, 0.63)
    pt3dadd(48.01, 176.22, 17, 0.63)
    pt3dadd(47.91, 176.28, 17, 0.63)
    pt3dadd(47.91, 176.54, 17, 0.63)
    pt3dadd(47.86, 176.7, 17, 0.63)
    pt3dadd(47.86, 177.01, 17, 0.63)
    pt3dadd(47.91, 177.17, 17, 0.63)
    pt3dadd(47.91, 177.43, 17.5, 0.63)
    pt3dadd(47.96, 177.64, 17.5, 0.63)
    pt3dadd(48.01, 177.8, 17.5, 0.63)
    pt3dadd(48.07, 177.91, 17.5, 0.63)
    pt3dadd(48.07, 178.12, 17.5, 0.63)
    pt3dadd(48.12, 178.22, 17.5, 0.63)
    pt3dadd(48.12, 178.33, 17.5, 0.63)
    pt3dadd(48.22, 178.48, 17.5, 0.63)
    pt3dadd(48.28, 178.64, 17.5, 0.63)
    pt3dadd(48.33, 178.8, 17.5, 0.63)
    pt3dadd(48.43, 179.01, 17.5, 0.63)
    pt3dadd(48.43, 179.17, 17.5, 0.63)
    pt3dadd(48.49, 179.38, 17.5, 0.63)
    pt3dadd(48.59, 179.54, 17.5, 0.63)
    pt3dadd(48.64, 179.75, 17.5, 0.63)
    pt3dadd(48.64, 179.96, 17.5, 0.63)
    pt3dadd(48.7, 180.17, 17.5, 0.63)
    pt3dadd(48.7, 180.64, 17.5, 0.63)
    pt3dadd(48.64, 180.8, 17.5, 0.63)
    pt3dadd(48.64, 181.01, 17.5, 0.63)
    pt3dadd(48.59, 181.16, 17.5, 0.63)
    pt3dadd(48.59, 181.38, 17.5, 0.63)
    pt3dadd(48.49, 181.38, 17.5, 0.63)
    pt3dadd(48.49, 181.64, 17.5, 0.63)
    pt3dadd(48.43, 181.8, 17.5, 0.63)
    pt3dadd(48.43, 182.11, 17.5, 0.63)
    pt3dadd(48.38, 182.27, 17.5, 0.63)
    pt3dadd(48.38, 182.74, 17.5, 0.63)
    pt3dadd(48.43, 182.85, 17.5, 0.63)
    pt3dadd(48.59, 183.06, 17.5, 0.63)
    pt3dadd(48.59, 183.22, 17.5, 0.63)
    pt3dadd(48.64, 183.43, 17.5, 0.63)
    pt3dadd(48.64, 183.58, 17.5, 0.63)
    pt3dadd(48.7, 183.79, 17.5, 0.63)
    pt3dadd(48.75, 183.95, 17.5, 0.63)
    pt3dadd(48.75, 184.63, 17.5, 0.63)
    pt3dadd(48.8, 184.79, 17.5, 0.63)
    pt3dadd(48.85, 185, 17.5, 0.63)
    pt3dadd(48.91, 185.11, 17.5, 0.63)
    pt3dadd(48.96, 185.21, 17.5, 0.63)
    pt3dadd(49.01, 185.37, 17.5, 0.63)
    pt3dadd(49.06, 185.48, 17.5, 0.63)
    pt3dadd(49.38, 186.08, 17.5, 0.63)
    pt3dadd(49.38, 186.24, 17.5, 0.63)
    pt3dadd(49.43, 186.34, 17.5, 0.63)
    pt3dadd(49.64, 186.45, 17.5, 0.63)
    pt3dadd(49.75, 186.6, 17.5, 0.63)
    pt3dadd(49.8, 186.76, 17.5, 0.63)
    pt3dadd(49.91, 186.81, 17.5, 0.63)
    pt3dadd(49.96, 186.92, 18, 0.63)
    pt3dadd(50.06, 187.02, 18, 0.63)
    pt3dadd(50.06, 187.18, 18, 0.63)
    pt3dadd(50.12, 187.34, 18, 0.63)
    pt3dadd(50.12, 187.5, 18, 0.63)
    pt3dadd(50.06, 187.6, 18, 0.63)
    pt3dadd(49.96, 187.71, 18, 0.63)
    pt3dadd(49.85, 187.76, 18, 0.63)
    pt3dadd(49.8, 187.87, 18, 0.63)
    pt3dadd(49.75, 188.08, 18, 0.63)
    pt3dadd(49.7, 188.18, 18, 0.63)
    pt3dadd(49.59, 188.39, 18, 0.63)
    pt3dadd(49.49, 188.55, 18, 0.63)
    pt3dadd(49.43, 188.65, 18, 0.63)
    pt3dadd(49.43, 188.86, 18, 0.63)
    pt3dadd(49.38, 188.97, 18, 0.63)
    pt3dadd(49.33, 189.07, 18, 0.63)
    pt3dadd(49.28, 189.23, 18, 0.63)
    pt3dadd(49.22, 189.34, 18, 0.63)
    pt3dadd(49.12, 189.44, 18, 0.63)
    pt3dadd(48.96, 189.6, 18, 0.63)
    pt3dadd(48.86, 189.71, 18, 0.63)
    pt3dadd(48.75, 189.81, 18, 0.63)
    pt3dadd(48.7, 189.97, 18, 0.63)
    pt3dadd(48.65, 190.07, 18, 0.63)
    pt3dadd(48.54, 190.23, 18, 0.63)
    pt3dadd(48.54, 190.44, 18, 0.63)
  }
}
proc shape3d_11() {
  dend[6] {
    pt3dadd(48.44, 190.49, 18, 0.63)
    pt3dadd(48.44, 190.65, 18, 0.63)
    pt3dadd(48.33, 190.65, 18, 0.63)
    pt3dadd(48.28, 190.81, 18, 0.63)
    pt3dadd(48.28, 191.02, 18, 0.63)
    pt3dadd(48.17, 191.07, 18, 0.63)
    pt3dadd(48.17, 191.18, 18, 0.63)
    pt3dadd(48.12, 191.34, 18, 0.63)
    pt3dadd(48.12, 191.55, 18.5, 0.63)
    pt3dadd(48.07, 191.76, 18.5, 0.63)
    pt3dadd(48.02, 191.91, 18.5, 0.63)
    pt3dadd(48.02, 192.12, 18.5, 0.63)
    pt3dadd(47.96, 192.28, 18.5, 0.63)
    pt3dadd(47.96, 192.39, 18.5, 0.63)
    pt3dadd(47.91, 192.49, 18.5, 0.63)
    pt3dadd(47.86, 192.65, 18.5, 0.63)
    pt3dadd(47.86, 192.86, 18.5, 0.63)
    pt3dadd(47.81, 193.07, 18.5, 0.63)
    pt3dadd(47.7, 193.23, 18.5, 0.63)
    pt3dadd(47.7, 193.44, 19, 0.63)
    pt3dadd(47.6, 193.6, 19, 0.63)
    pt3dadd(47.6, 193.81, 19, 0.63)
    pt3dadd(47.54, 193.91, 19, 0.63)
    pt3dadd(47.49, 194.17, 19, 0.63)
    pt3dadd(47.44, 194.33, 19, 0.63)
    pt3dadd(47.44, 194.65, 19, 0.63)
    pt3dadd(47.49, 194.8, 19.5, 0.63)
  }
  dend[7] {pt3dclear()
    pt3dadd(4.98, 80.03, 10.5, 0.79)
    pt3dadd(4.71, 80.2, 11, 0.63)
    pt3dadd(4.71, 80.52, 11, 0.63)
    pt3dadd(4.66, 80.62, 11, 0.63)
    pt3dadd(4.66, 80.78, 11, 0.63)
    pt3dadd(4.61, 80.98, 11, 0.63)
    pt3dadd(4.55, 81.09, 11, 0.63)
    pt3dadd(4.5, 81.25, 11, 0.63)
    pt3dadd(4.45, 81.41, 11, 0.63)
    pt3dadd(4.4, 81.51, 11, 0.63)
    pt3dadd(4.4, 81.72, 11, 0.63)
    pt3dadd(4.34, 81.88, 11, 0.63)
    pt3dadd(4.24, 81.99, 11, 0.63)
    pt3dadd(4.24, 82.2, 11, 0.63)
    pt3dadd(4.13, 82.3, 11, 0.63)
    pt3dadd(4.13, 82.67, 11, 0.63)
    pt3dadd(4.08, 82.83, 11, 0.63)
    pt3dadd(3.98, 82.93, 11, 0.63)
    pt3dadd(3.98, 83.09, 11, 0.63)
    pt3dadd(3.93, 83.2, 11, 0.63)
    pt3dadd(3.87, 83.41, 11, 0.63)
    pt3dadd(3.87, 83.56, 11, 0.63)
    pt3dadd(3.82, 83.77, 11, 0.63)
    pt3dadd(3.77, 83.93, 11, 0.63)
    pt3dadd(3.77, 84.41, 11, 0.63)
    pt3dadd(3.72, 84.56, 11, 0.63)
    pt3dadd(3.72, 86.09, 11, 0.63)
    pt3dadd(3.66, 86.25, 11, 0.63)
    pt3dadd(3.66, 86.61, 11, 0.63)
    pt3dadd(3.61, 86.72, 11, 0.63)
    pt3dadd(3.61, 86.93, 11, 0.63)
    pt3dadd(3.56, 87.03, 11, 0.63)
    pt3dadd(3.56, 87.51, 11, 0.63)
    pt3dadd(3.51, 87.72, 11, 0.63)
    pt3dadd(3.51, 88.45, 11, 0.63)
    pt3dadd(3.56, 88.61, 11, 0.63)
    pt3dadd(3.56, 90.77, 11, 0.63)
    pt3dadd(3.51, 91.61, 11.5, 0.63)
    pt3dadd(3.56, 91.71, 11.5, 0.63)
    pt3dadd(3.51, 91.87, 11.5, 0.63)
    pt3dadd(3.56, 92.46, 11, 0.68)
    pt3dadd(3.56, 92.61, 11, 0.68)
    pt3dadd(3.51, 92.82, 11, 0.68)
    pt3dadd(3.51, 93.35, 12.5, 0.68)
    pt3dadd(3.46, 93.56, 12.5, 0.68)
    pt3dadd(3.46, 93.72, 12.5, 0.68)
    pt3dadd(3.4, 93.82, 13, 0.68)
    pt3dadd(3.4, 94.09, 13, 0.68)
    pt3dadd(3.56, 94.35, 13, 0.68)
    pt3dadd(3.67, 94.56, 13, 0.68)
    pt3dadd(3.77, 94.66, 13, 0.68)
    pt3dadd(3.88, 94.87, 13, 0.68)
    pt3dadd(3.93, 95.03, 13, 0.68)
    pt3dadd(3.93, 95.66, 13, 0.68)
    pt3dadd(3.98, 95.87, 13, 0.68)
    pt3dadd(3.93, 96.03, 13, 0.68)
    pt3dadd(3.93, 96.19, 13, 0.68)
    pt3dadd(3.88, 96.29, 13, 0.68)
    pt3dadd(3.88, 96.66, 13, 0.68)
    pt3dadd(3.82, 97.08, 13, 0.68)
    pt3dadd(3.77, 97.19, 13, 0.68)
    pt3dadd(3.77, 97.87, 13, 0.68)
    pt3dadd(3.72, 97.98, 13, 0.68)
    pt3dadd(3.72, 98.29, 13, 0.68)
    pt3dadd(3.72, 98.5, 13, 0.68)
    pt3dadd(3.67, 98.66, 13, 0.68)
    pt3dadd(3.67, 99.13, 13, 0.68)
    pt3dadd(3.82, 99.4, 13, 0.68)
    pt3dadd(3.88, 99.5, 13, 0.68)
    pt3dadd(3.93, 99.66, 13, 0.68)
    pt3dadd(3.98, 99.76, 13, 0.68)
    pt3dadd(4.03, 99.87, 13, 0.68)
    pt3dadd(4.03, 100.03, 13, 0.68)
    pt3dadd(3.98, 100.24, 13, 0.68)
    pt3dadd(3.98, 100.5, 13, 0.68)
    pt3dadd(3.88, 100.76, 13, 0.68)
    pt3dadd(3.88, 100.97, 13.5, 0.68)
    pt3dadd(3.82, 101.13, 13.5, 0.68)
    pt3dadd(3.82, 101.29, 13.5, 0.68)
    pt3dadd(3.77, 101.39, 13.5, 0.68)
    pt3dadd(3.77, 101.6, 13.5, 0.68)
    pt3dadd(3.72, 101.71, 13.5, 0.68)
    pt3dadd(3.72, 101.87, 13.5, 0.68)
    pt3dadd(3.67, 102.02, 13.5, 0.68)
    pt3dadd(3.67, 102.23, 13.5, 0.68)
    pt3dadd(3.61, 102.39, 13.5, 0.68)
    pt3dadd(3.56, 102.6, 13.5, 0.68)
    pt3dadd(3.46, 102.76, 13.5, 0.68)
    pt3dadd(3.4, 102.97, 13.5, 0.68)
    pt3dadd(3.35, 103.13, 13.5, 0.68)
    pt3dadd(3.3, 103.34, 13.5, 0.68)
    pt3dadd(2.89, 104.08, 14, 0.68)
    pt3dadd(2.78, 104.24, 14, 0.68)
    pt3dadd(2.68, 104.29, 14, 0.68)
    pt3dadd(2.57, 104.5, 14, 0.68)
    pt3dadd(2.47, 104.77, 14.5, 0.68)
    pt3dadd(2.36, 104.82, 14.5, 0.68)
    pt3dadd(2.31, 104.98, 14.5, 0.68)
    pt3dadd(2.31, 105.19, 14.5, 0.68)
    pt3dadd(2.21, 105.29, 14.5, 0.68)
    pt3dadd(2.21, 106.08, 14.5, 0.68)
    pt3dadd(2.25, 106.29, 15, 0.68)
    pt3dadd(2.21, 106.45, 15, 0.68)
    pt3dadd(2.15, 106.66, 15, 0.68)
    pt3dadd(2.1, 106.87, 15, 0.68)
    pt3dadd(2.1, 107.03, 15, 0.68)
    pt3dadd(2.04, 107.24, 15, 0.68)
    pt3dadd(2.04, 107.71, 15.5, 0.68)
    pt3dadd(2.1, 107.87, 15.5, 0.68)
    pt3dadd(2.21, 108.08, 15.5, 0.68)
    pt3dadd(2.25, 108.24, 15.5, 0.68)
    pt3dadd(2.25, 108.39, 15.5, 0.68)
    pt3dadd(2.36, 108.5, 15.5, 0.68)
    pt3dadd(2.42, 108.66, 15.5, 0.68)
    pt3dadd(2.47, 108.81, 15.5, 0.68)
    pt3dadd(2.52, 108.92, 15.5, 0.68)
    pt3dadd(2.57, 109.02, 15.5, 0.68)
    pt3dadd(2.57, 109.18, 15.5, 0.68)
    pt3dadd(2.68, 109.34, 15.5, 0.68)
    pt3dadd(2.68, 109.5, 15.5, 0.68)
    pt3dadd(2.73, 109.66, 15.5, 0.68)
    pt3dadd(2.73, 109.97, 15.5, 0.68)
    pt3dadd(2.84, 110.08, 15.5, 0.68)
    pt3dadd(2.84, 110.44, 15.5, 0.68)
    pt3dadd(2.78, 110.6, 15.5, 0.68)
    pt3dadd(2.68, 110.76, 15.5, 0.68)
    pt3dadd(2.63, 110.86, 15.5, 0.68)
    pt3dadd(2.63, 111.08, 15.5, 0.68)
    pt3dadd(2.52, 111.13, 15.5, 0.68)
    pt3dadd(2.47, 111.23, 15.5, 0.68)
    pt3dadd(2.42, 111.34, 15.5, 0.68)
    pt3dadd(2.36, 111.5, 15.5, 0.68)
    pt3dadd(2.36, 111.76, 15.5, 0.68)
    pt3dadd(2.31, 111.92, 15.5, 0.68)
    pt3dadd(2.31, 112.18, 15.5, 0.68)
    pt3dadd(2.36, 112.28, 15.5, 0.68)
    pt3dadd(2.36, 112.39, 15.5, 0.68)
    pt3dadd(2.42, 112.55, 15.5, 0.68)
    pt3dadd(2.52, 112.65, 15.5, 0.68)
    pt3dadd(2.57, 112.86, 15.5, 0.68)
    pt3dadd(2.68, 113.13, 15.5, 0.68)
    pt3dadd(2.73, 113.23, 15.5, 0.68)
    pt3dadd(2.84, 113.44, 15.5, 0.68)
    pt3dadd(2.89, 113.6, 15.5, 0.68)
    pt3dadd(2.89, 113.81, 15.5, 0.68)
    pt3dadd(2.94, 113.97, 15.5, 0.68)
    pt3dadd(2.94, 115.28, 15.5, 0.68)
    pt3dadd(2.89, 115.44, 15.5, 0.68)
    pt3dadd(2.89, 115.65, 15.5, 0.68)
    pt3dadd(2.34, 116.57, 15.5, 0.68)
    pt3dadd(2.49, 116.78, 15.5, 0.68)
    pt3dadd(2.49, 116.93, 15.5, 0.68)
    pt3dadd(2.54, 117.15, 15.5, 0.68)
    pt3dadd(2.65, 117.3, 15.5, 0.68)
    pt3dadd(2.7, 117.51, 15.5, 0.68)
    pt3dadd(2.7, 118.25, 16, 0.68)
    pt3dadd(2.6, 118.41, 16, 0.68)
    pt3dadd(2.6, 118.62, 16, 0.68)
    pt3dadd(2.49, 118.72, 16, 0.68)
    pt3dadd(2.44, 118.88, 16, 0.68)
    pt3dadd(2.34, 118.98, 16, 0.68)
    pt3dadd(2.39, 119.14, 16, 0.68)
    pt3dadd(2.39, 119.35, 16, 0.68)
    pt3dadd(2.27, 119.46, 16, 0.68)
    pt3dadd(2.27, 119.62, 16, 0.68)
    pt3dadd(2.23, 119.83, 16, 0.68)
    pt3dadd(2.13, 119.88, 16, 0.68)
    pt3dadd(2.06, 119.98, 16, 0.68)
    pt3dadd(2.02, 120.09, 16, 0.68)
    pt3dadd(2.02, 120.25, 16, 0.68)
    pt3dadd(1.97, 120.35, 16, 0.68)
    pt3dadd(1.92, 120.46, 16, 0.68)
    pt3dadd(1.81, 120.72, 16, 0.68)
    pt3dadd(1.76, 120.82, 16, 0.68)
    pt3dadd(1.71, 120.98, 16, 0.68)
    pt3dadd(1.65, 121.19, 16, 0.68)
    pt3dadd(1.6, 121.3, 16.5, 0.68)
    pt3dadd(1.55, 121.4, 16.5, 0.68)
    pt3dadd(1.5, 121.51, 16.5, 0.68)
    pt3dadd(1.44, 121.61, 16.5, 0.68)
    pt3dadd(1.39, 121.88, 16.5, 0.68)
    pt3dadd(1.34, 122.03, 16.5, 0.68)
    pt3dadd(1.23, 122.14, 16.5, 0.68)
    pt3dadd(1.12, 122.3, 16.5, 0.68)
    pt3dadd(1.08, 122.45, 16.5, 0.68)
    pt3dadd(0.97, 122.61, 16.5, 0.68)
    pt3dadd(0.81, 122.72, 16.5, 0.68)
    pt3dadd(0.76, 122.82, 16.5, 0.68)
    pt3dadd(0.71, 122.93, 16.5, 0.68)
    pt3dadd(0.6, 123.03, 16.5, 0.68)
    pt3dadd(0.55, 123.14, 16.5, 0.68)
    pt3dadd(0.5, 123.3, 17, 0.68)
    pt3dadd(0.45, 123.4, 17, 0.68)
    pt3dadd(0.39, 123.56, 17, 0.68)
    pt3dadd(0.34, 123.77, 17, 0.68)
    pt3dadd(0.34, 124.24, 17, 0.68)
    pt3dadd(0.28, 124.35, 17, 0.68)
    pt3dadd(0.28, 124.98, 17.5, 0.68)
    pt3dadd(0.34, 125.08, 17.5, 0.68)
    pt3dadd(0.39, 125.19, 17.5, 0.68)
    pt3dadd(0.45, 125.29, 17.5, 0.68)
    pt3dadd(0.5, 125.45, 17.5, 0.68)
    pt3dadd(0.6, 125.61, 17.5, 0.68)
    pt3dadd(0.66, 125.82, 17.5, 0.68)
    pt3dadd(0.66, 126.03, 17.5, 0.68)
    pt3dadd(0.71, 126.13, 17.5, 0.68)
    pt3dadd(0.71, 126.45, 17.5, 0.68)
    pt3dadd(0.76, 126.71, 17.5, 0.68)
    pt3dadd(0.76, 127.19, 17.5, 0.68)
    pt3dadd(0.71, 127.4, 17.5, 0.68)
    pt3dadd(0.15, 128.37, 18, 0.68)
    pt3dadd(0.2, 128.47, 18, 0.68)
    pt3dadd(0.25, 128.69, 18, 0.68)
    pt3dadd(0.36, 128.85, 18, 0.68)
    pt3dadd(0.41, 129.06, 18, 0.68)
    pt3dadd(0.51, 129.21, 18, 0.68)
    pt3dadd(0.56, 129.37, 18, 0.68)
    pt3dadd(0.62, 129.63, 18, 0.68)
    pt3dadd(0.67, 129.79, 18, 0.68)
    pt3dadd(0.72, 129.94, 18, 0.68)
    pt3dadd(0.78, 130.05, 18, 0.68)
    pt3dadd(0.83, 130.26, 18, 0.68)
  }
}
proc shape3d_12() {
  dend[7] {
    pt3dadd(0.93, 130.41, 18, 0.68)
    pt3dadd(0.93, 130.58, 18, 0.68)
    pt3dadd(1.04, 130.68, 18, 0.68)
    pt3dadd(1.09, 130.79, 18, 0.68)
    pt3dadd(1.13, 130.94, 18, 0.68)
    pt3dadd(1.2, 131.11, 18, 0.68)
    pt3dadd(1.2, 131.32, 18, 0.68)
    pt3dadd(1.13, 131.41, 18, 0.68)
    pt3dadd(1.2, 131.58, 18, 0.68)
    pt3dadd(1.2, 131.84, 18, 0.68)
    pt3dadd(1.25, 131.94, 18, 0.68)
    pt3dadd(1.25, 132.21, 18, 0.68)
    pt3dadd(1.3, 132.47, 18, 0.68)
    pt3dadd(1.3, 133.21, 18, 0.68)
    pt3dadd(1.25, 133.37, 18.5, 0.68)
    pt3dadd(1.25, 134.41, 18.5, 0.68)
    pt3dadd(1.2, 134.58, 18.5, 0.68)
    pt3dadd(1.2, 134.79, 18.5, 0.68)
    pt3dadd(1.25, 134.94, 18.5, 0.68)
    pt3dadd(1.25, 135.31, 18.5, 0.68)
    pt3dadd(1.35, 135.52, 18.5, 0.68)
    pt3dadd(1.35, 135.68, 18.5, 0.68)
    pt3dadd(1.46, 135.72, 18.5, 0.68)
    pt3dadd(1.56, 135.94, 18.5, 0.68)
    pt3dadd(1.62, 136.1, 18.5, 0.68)
    pt3dadd(1.72, 136.19, 18.5, 0.68)
    pt3dadd(1.88, 136.47, 18.5, 0.68)
    pt3dadd(1.98, 136.68, 18.5, 0.68)
    pt3dadd(2.09, 136.84, 18.5, 0.68)
    pt3dadd(2.14, 136.94, 18.5, 0.68)
    pt3dadd(2.19, 137.05, 18.5, 0.68)
    pt3dadd(2.25, 137.19, 18.5, 0.68)
    pt3dadd(2.35, 137.31, 18.5, 0.68)
    pt3dadd(2.4, 137.47, 18.5, 0.68)
    pt3dadd(2.5, 137.68, 18.5, 0.68)
    pt3dadd(2.56, 137.83, 18.5, 0.68)
    pt3dadd(2.67, 138.04, 18.5, 0.68)
    pt3dadd(2.72, 138.19, 19, 0.68)
    pt3dadd(2.82, 138.41, 19.5, 0.68)
    pt3dadd(2.88, 138.57, 19.5, 0.68)
    pt3dadd(2.88, 138.78, 20, 0.68)
    pt3dadd(2.94, 139.5, 20, 0.68)
    pt3dadd(3.04, 139.6, 20, 0.68)
    pt3dadd(3.15, 139.71, 20, 0.68)
    pt3dadd(3.25, 139.87, 20, 0.68)
    pt3dadd(3.31, 139.97, 20, 0.68)
    pt3dadd(3.41, 140.08, 20, 0.68)
    pt3dadd(3.46, 140.22, 20, 0.68)
    pt3dadd(3.46, 140.44, 20, 0.68)
    pt3dadd(3.57, 140.6, 20, 0.68)
    pt3dadd(3.62, 140.87, 20, 0.68)
    pt3dadd(3.67, 141.02, 20, 0.68)
    pt3dadd(3.67, 141.5, 20.5, 0.68)
    pt3dadd(3.67, 141.71, 20.5, 0.68)
    pt3dadd(3.62, 142.07, 20.5, 0.68)
    pt3dadd(3.57, 142.18, 20.5, 0.68)
    pt3dadd(3.57, 142.34, 20.5, 0.68)
    pt3dadd(3.52, 142.44, 20.5, 0.68)
    pt3dadd(3.52, 142.76, 20.5, 0.68)
    pt3dadd(3.46, 142.86, 20.5, 0.68)
    pt3dadd(3.46, 143.18, 20.5, 0.68)
    pt3dadd(3.41, 143.28, 21, 0.68)
    pt3dadd(3.25, 143.38, 21, 0.68)
    pt3dadd(3.15, 143.44, 21, 0.68)
    pt3dadd(3.04, 143.55, 21, 0.68)
    pt3dadd(2.68, 143.55, 21, 0.68)
    pt3dadd(2.57, 143.65, 21, 0.68)
    pt3dadd(2.57, 143.76, 21, 0.68)
    pt3dadd(2.41, 143.86, 21, 0.68)
    pt3dadd(2.41, 143.97, 21, 0.68)
    pt3dadd(2.36, 144.07, 21, 0.68)
    pt3dadd(2.2, 144.28, 21, 0.68)
    pt3dadd(2.15, 144.44, 21.5, 0.68)
    pt3dadd(2.1, 144.6, 21.5, 0.68)
    pt3dadd(1.99, 144.69, 21.5, 0.68)
    pt3dadd(1.99, 144.86, 21.5, 0.68)
    pt3dadd(1.94, 145.07, 21.5, 0.68)
    pt3dadd(1.84, 145.18, 21.5, 0.68)
    pt3dadd(1.78, 145.33, 21.5, 0.68)
    pt3dadd(1.68, 145.44, 21.5, 0.68)
    pt3dadd(1.63, 145.6, 21.5, 0.68)
    pt3dadd(1.63, 145.81, 21.5, 0.68)
    pt3dadd(1.52, 145.91, 21.5, 0.68)
    pt3dadd(1.47, 146.07, 21.5, 0.68)
    pt3dadd(1.47, 146.28, 21.5, 0.68)
    pt3dadd(1.42, 146.44, 21.5, 0.68)
    pt3dadd(1.42, 146.69, 21.5, 0.68)
    pt3dadd(1.36, 146.81, 21.5, 0.68)
    pt3dadd(1.36, 147.07, 21.5, 0.68)
    pt3dadd(1.31, 147.28, 21.5, 0.68)
    pt3dadd(1.26, 147.38, 21.5, 0.68)
    pt3dadd(1.26, 147.49, 21.5, 0.68)
    pt3dadd(1.21, 147.59, 21.5, 0.68)
    pt3dadd(1.05, 147.75, 21.5, 0.68)
    pt3dadd(0.94, 147.8, 21.5, 0.68)
    pt3dadd(0.89, 147.96, 21.5, 0.68)
    pt3dadd(0.68, 148.07, 21.5, 0.68)
    pt3dadd(0.57, 148.16, 21.5, 0.68)
    pt3dadd(0.47, 148.22, 21.5, 0.68)
    pt3dadd(0.37, 148.38, 22, 0.68)
    pt3dadd(0.21, 148.54, 22, 0.68)
    pt3dadd(0.05, 148.65, 22, 0.68)
    pt3dadd(-0.05, 148.75, 22, 0.68)
    pt3dadd(-0.16, 148.86, 22, 0.68)
    pt3dadd(-0.21, 149.01, 22, 0.68)
    pt3dadd(-0.32, 149.12, 22, 0.68)
    pt3dadd(-0.42, 149.22, 22, 0.68)
    pt3dadd(-0.47, 149.38, 22, 0.68)
    pt3dadd(-0.63, 149.54, 22, 0.68)
    pt3dadd(-0.74, 149.63, 22, 0.68)
    pt3dadd(-0.84, 149.69, 22, 0.68)
    pt3dadd(-0.89, 149.8, 22, 0.68)
    pt3dadd(-1, 149.91, 22, 0.68)
    pt3dadd(-1.1, 150.01, 22, 0.68)
    pt3dadd(-1.15, 150.12, 22, 0.68)
    pt3dadd(-1.26, 150.22, 22, 0.68)
    pt3dadd(-1.31, 150.33, 22, 0.68)
    pt3dadd(-1.42, 150.43, 22.5, 0.68)
    pt3dadd(-1.52, 150.59, 22.5, 0.68)
    pt3dadd(-1.63, 150.69, 22.5, 0.68)
    pt3dadd(-1.79, 150.8, 22.5, 0.68)
    pt3dadd(-1.89, 150.85, 22.5, 0.68)
    pt3dadd(-2, 150.91, 22.5, 0.68)
    pt3dadd(-2.1, 151.01, 22.5, 0.68)
    pt3dadd(-3.15, 150.87, 24, 0.68)
    pt3dadd(-3.2, 150.93, 25, 0.68)
    pt3dadd(-3.26, 151.13, 25, 0.68)
    pt3dadd(-3.36, 151.08, 25.5, 0.68)
    pt3dadd(-3.47, 151.13, 25.5, 0.68)
    pt3dadd(-3.62, 151.24, 26, 0.68)
    pt3dadd(-3.73, 151.13, 26, 0.68)
    pt3dadd(-3.89, 151.08, 26, 0.68)
    pt3dadd(-3.99, 150.97, 26.5, 0.68)
  }
  dend[8] {pt3dclear()
    pt3dadd(5.3, 27.1, 4.5, 0.84)
    pt3dadd(4.95, 27.36, 4, 1)
    pt3dadd(4.84, 27.46, 4, 1)
    pt3dadd(4.79, 27.67, 4, 1)
    pt3dadd(4.58, 27.83, 4, 1)
    pt3dadd(4.48, 27.88, 4, 1)
    pt3dadd(4.37, 27.99, 4, 1)
    pt3dadd(4.26, 28.04, 4, 1)
    pt3dadd(4.11, 28.09, 4, 1)
    pt3dadd(3.95, 28.15, 4, 1)
    pt3dadd(3.85, 28.25, 4, 1)
    pt3dadd(3.69, 28.3, 4, 1)
    pt3dadd(3.59, 28.41, 4, 1)
    pt3dadd(3.43, 28.46, 4, 1)
    pt3dadd(3.22, 28.57, 4, 1)
    pt3dadd(3.06, 28.57, 4, 1)
    pt3dadd(2.96, 28.62, 4, 1)
    pt3dadd(2.8, 28.67, 4, 1)
    pt3dadd(2.59, 28.67, 4, 1)
    pt3dadd(2.43, 28.72, 4, 1)
    pt3dadd(2.22, 28.72, 4, 1)
    pt3dadd(2.12, 28.78, 4, 1)
    pt3dadd(1.96, 28.78, 4, 1)
    pt3dadd(1.75, 28.83, 4, 1)
    pt3dadd(1.28, 28.83, 4, 1)
    pt3dadd(1.07, 28.88, 4, 1)
    pt3dadd(0.91, 28.88, 4, 1)
    pt3dadd(0.7, 28.93, 4, 1)
    pt3dadd(0.54, 28.93, 4, 1)
    pt3dadd(0.54, 29.09, 4.5, 1)
    pt3dadd(0.44, 29.2, 4.5, 1)
    pt3dadd(0.28, 29.25, 4.5, 1)
    pt3dadd(0.17, 29.36, 4.5, 1)
    pt3dadd(0.02, 29.51, 4.5, 1)
    pt3dadd(-0.09, 29.62, 4.5, 1)
    pt3dadd(-0.25, 29.72, 4.5, 1)
    pt3dadd(-0.35, 29.88, 4.5, 1)
    pt3dadd(-0.51, 29.99, 4.5, 1)
    pt3dadd(-0.61, 30.04, 4.5, 1)
    pt3dadd(-0.77, 30.09, 4.5, 1)
    pt3dadd(-0.93, 30.2, 4.5, 1)
    pt3dadd(-0.98, 30.3, 4.5, 1)
    pt3dadd(-1.24, 30.3, 4.5, 1)
    pt3dadd(-1.35, 30.41, 4.5, 1)
    pt3dadd(-1.5, 30.56, 4.5, 1)
    pt3dadd(-1.66, 30.77, 4.5, 1)
    pt3dadd(-1.82, 30.88, 4.5, 1)
    pt3dadd(-1.92, 31.04, 4.5, 1)
    pt3dadd(-2.08, 31.14, 4.5, 1)
    pt3dadd(-2.19, 31.3, 4.5, 1)
    pt3dadd(-2.29, 31.41, 4.5, 1)
    pt3dadd(-2.4, 31.51, 4.5, 1)
    pt3dadd(-2.54, 31.62, 4.5, 1)
    pt3dadd(-2.61, 31.77, 4.5, 1)
    pt3dadd(-2.82, 31.77, 4.5, 1)
    pt3dadd(-2.92, 31.88, 4.5, 1)
    pt3dadd(-3.03, 31.98, 4.5, 1)
    pt3dadd(-3.08, 32.09, 4.5, 1)
    pt3dadd(-3.18, 32.29, 4.5, 1)
    pt3dadd(-3.29, 32.4, 4.5, 1)
    pt3dadd(-3.34, 32.51, 4.5, 1)
    pt3dadd(-3.45, 32.67, 4, 1)
    pt3dadd(-3.55, 32.82, 4, 1)
    pt3dadd(-3.66, 32.97, 4, 1)
    pt3dadd(-3.76, 33.09, 4, 1)
    pt3dadd(-3.81, 33.19, 4, 1)
    pt3dadd(-3.87, 33.4, 4, 1)
    pt3dadd(-3.97, 33.51, 3.5, 1)
    pt3dadd(-4.08, 33.61, 3.5, 1)
    pt3dadd(-4.18, 33.72, 3.5, 1)
    pt3dadd(-4.29, 33.82, 3.5, 1)
    pt3dadd(-4.44, 33.88, 3.5, 1)
    pt3dadd(-4.55, 33.97, 3.5, 1)
    pt3dadd(-4.65, 34.09, 3.5, 1)
    pt3dadd(-4.8, 34.14, 3.5, 1)
    pt3dadd(-4.92, 34.24, 3.5, 1)
    pt3dadd(-5.01, 34.35, 3, 1)
    pt3dadd(-5.18, 34.4, 3, 1)
    pt3dadd(-5.28, 34.51, 3, 1)
    pt3dadd(-5.39, 34.61, 3, 1)
    pt3dadd(-5.44, 34.77, 3, 1)
    pt3dadd(-5.65, 34.77, 3, 1)
    pt3dadd(-5.76, 34.88, 3, 1)
    pt3dadd(-5.97, 34.93, 3, 1)
    pt3dadd(-6.07, 35.03, 3, 1)
    pt3dadd(-6.18, 35.14, 3, 1)
    pt3dadd(-6.33, 35.19, 3, 1)
    pt3dadd(-6.54, 35.19, 3, 1)
    pt3dadd(-6.6, 35.29, 3, 1)
    pt3dadd(-6.65, 35.4, 3, 1)
    pt3dadd(-6.75, 35.45, 3, 1)
    pt3dadd(-6.91, 35.61, 3, 1)
    pt3dadd(-7.17, 35.77, 3, 1)
    pt3dadd(-7.23, 35.93, 3, 1)
    pt3dadd(-7.38, 36.03, 2.5, 1)
    pt3dadd(-7.54, 36.08, 2.5, 1)
    pt3dadd(-7.65, 36.19, 2.5, 1)
    pt3dadd(-7.75, 36.29, 2.5, 1)
    pt3dadd(-7.91, 36.45, 2.5, 1)
    pt3dadd(-7.96, 36.56, 2.5, 1)
    pt3dadd(-8.07, 36.65, 2.5, 1)
    pt3dadd(-8.11, 36.86, 2.5, 1)
    pt3dadd(-8.22, 36.93, 2.5, 1)
    pt3dadd(-8.27, 37.14, 2.5, 1)
    pt3dadd(-8.43, 37.19, 2.5, 1)
    pt3dadd(-8.53, 37.4, 2.5, 1)
    pt3dadd(-8.69, 37.45, 2.5, 1)
    pt3dadd(-8.8, 37.56, 2.5, 1)
    pt3dadd(-9.01, 37.65, 2.5, 1)
    pt3dadd(-9.17, 37.82, 2.5, 1)
    pt3dadd(-9.38, 37.82, 2.5, 1)
    pt3dadd(-9.53, 37.97, 2.5, 1)
    pt3dadd(-9.64, 37.97, 2.5, 1)
    pt3dadd(-9.75, 38.03, 2.5, 1)
    pt3dadd(-9.96, 38.08, 2.5, 1)
    pt3dadd(-10.22, 38.19, 2.5, 1)
  }
}
proc shape3d_13() {
  dend[8] {
    pt3dadd(-10.38, 38.24, 2.5, 1)
    pt3dadd(-10.74, 38.24, 2.5, 1)
    pt3dadd(-10.95, 38.19, 2.5, 1)
    pt3dadd(-11.22, 38.29, 2.5, 1)
    pt3dadd(-11.43, 38.29, 2.5, 1)
    pt3dadd(-11.43, 38.4, 2.5, 1)
    pt3dadd(-11.53, 38.5, 2.5, 1)
    pt3dadd(-11.74, 38.5, 2.5, 1)
    pt3dadd(-11.9, 38.61, 2.5, 1)
    pt3dadd(-12, 38.65, 2.5, 1)
    pt3dadd(-12.06, 38.77, 2.5, 1)
    pt3dadd(-12.16, 38.82, 2.5, 1)
    pt3dadd(-12.27, 38.92, 2.5, 1)
    pt3dadd(-12.53, 39.13, 2.5, 1)
    pt3dadd(-12.63, 39.19, 2.5, 1)
  }
  dend[9] {pt3dclear()
    pt3dadd(-12.63, 39.19, 2.5, 1)
    pt3dadd(-13.22, 40.29, 2, 0.84)
    pt3dadd(-13.22, 40.4, 2, 0.84)
    pt3dadd(-13.32, 40.51, 2, 0.84)
    pt3dadd(-13.37, 40.61, 2, 0.84)
    pt3dadd(-13.43, 40.78, 2, 0.84)
    pt3dadd(-13.58, 40.78, 2, 0.84)
    pt3dadd(-13.69, 40.88, 2.5, 0.84)
    pt3dadd(-13.85, 40.99, 2.5, 0.84)
    pt3dadd(-13.95, 41.04, 2.5, 0.84)
    pt3dadd(-14.11, 41.09, 2.5, 0.84)
    pt3dadd(-14.32, 41.15, 2.5, 0.84)
    pt3dadd(-14.42, 41.2, 2.5, 0.84)
    pt3dadd(-14.58, 41.3, 2.5, 0.84)
    pt3dadd(-14.69, 41.36, 2.5, 0.84)
    pt3dadd(-14.95, 41.46, 2.5, 0.84)
    pt3dadd(-15.05, 41.62, 2.5, 0.84)
    pt3dadd(-15.21, 41.67, 2, 0.84)
    pt3dadd(-15.32, 41.78, 2, 0.84)
    pt3dadd(-15.42, 41.88, 2, 0.84)
    pt3dadd(-15.53, 41.93, 1, 0.84)
    pt3dadd(-15.68, 41.99, 1, 0.84)
    pt3dadd(-15.74, 42.09, 1, 0.84)
    pt3dadd(-15.84, 42.2, 0.5, 0.84)
    pt3dadd(-15.95, 42.25, 0.5, 0.84)
    pt3dadd(-16.05, 42.35, 0.5, 0.84)
    pt3dadd(-16.1, 42.46, 0.5, 0.84)
    pt3dadd(-16.16, 42.56, 0.5, 0.84)
    pt3dadd(-16.21, 42.72, 0, 0.84)
    pt3dadd(-16.3, 42.83, 0, 0.84)
    pt3dadd(-16.37, 42.98, 0, 0.84)
    pt3dadd(-16.37, 43.14, -0.5, 0.84)
    pt3dadd(-16.42, 43.35, -0.5, 0.84)
    pt3dadd(-16.42, 43.46, -0.5, 0.84)
    pt3dadd(-17.01, 43.83, -0.5, 0.94)
    pt3dadd(-17.05, 44.04, -0.5, 0.94)
    pt3dadd(-17.12, 44.14, -0.5, 0.94)
    pt3dadd(-17.12, 44.3, -0.5, 0.94)
    pt3dadd(-17.22, 44.35, -0.5, 0.94)
    pt3dadd(-17.32, 44.46, -0.5, 0.94)
    pt3dadd(-17.48, 44.56, -0.5, 0.94)
    pt3dadd(-17.59, 44.67, -0.5, 0.94)
    pt3dadd(-17.75, 44.77, -0.5, 0.94)
    pt3dadd(-17.89, 44.83, -0.5, 0.94)
    pt3dadd(-17.96, 44.93, -0.5, 0.94)
    pt3dadd(-18.11, 45.04, -0.5, 0.94)
    pt3dadd(-18.27, 45.14, -1, 0.94)
    pt3dadd(-18.32, 45.3, -1, 0.94)
    pt3dadd(-18.48, 45.4, -1, 0.94)
    pt3dadd(-18.53, 45.51, -1.5, 0.94)
    pt3dadd(-18.64, 45.67, -1.5, 0.94)
    pt3dadd(-18.8, 46.03, -1.5, 0.94)
    pt3dadd(-18.85, 46.14, -1.5, 0.94)
    pt3dadd(-18.95, 46.4, -1.5, 0.94)
    pt3dadd(-19.01, 46.61, -1.5, 0.94)
    pt3dadd(-19.05, 46.77, -1.5, 0.94)
    pt3dadd(-19.16, 46.93, -1.5, 0.94)
    pt3dadd(-19.16, 47.24, -2, 0.94)
    pt3dadd(-19.27, 47.35, -2, 0.94)
    pt3dadd(-19.32, 47.51, -2, 0.94)
    pt3dadd(-19.37, 47.61, -2, 0.94)
    pt3dadd(-19.48, 47.61, -2, 0.94)
    pt3dadd(-19.53, 47.77, -2, 0.94)
    pt3dadd(-19.64, 47.87, -2, 0.94)
    pt3dadd(-19.73, 47.98, -2, 0.94)
    pt3dadd(-19.89, 47.98, -2, 0.94)
    pt3dadd(-20.05, 48.14, -2, 0.94)
    pt3dadd(-20.11, 48.24, -2, 0.94)
    pt3dadd(-20.27, 48.3, -2, 0.94)
    pt3dadd(-20.37, 48.51, -2, 0.94)
    pt3dadd(-20.42, 48.66, -2, 0.94)
    pt3dadd(-20.42, 48.98, -2, 0.94)
    pt3dadd(-20.48, 49.08, -2, 0.94)
    pt3dadd(-20.48, 49.24, -2, 0.94)
    pt3dadd(-20.53, 49.35, -2, 0.94)
    pt3dadd(-20.58, 49.45, -2, 0.94)
    pt3dadd(-21.18, 50.33, -2.5, 0.94)
    pt3dadd(-21.28, 50.39, -2.5, 0.94)
    pt3dadd(-21.39, 50.49, -2.5, 0.94)
    pt3dadd(-21.6, 50.6, -2.5, 0.94)
    pt3dadd(-21.76, 50.7, -2.5, 0.94)
    pt3dadd(-21.86, 50.81, -2.5, 0.94)
    pt3dadd(-21.97, 50.96, -2.5, 0.94)
    pt3dadd(-22.07, 51.07, -2.5, 0.94)
    pt3dadd(-22.23, 51.23, -2.5, 0.94)
    pt3dadd(-22.44, 51.39, -2.5, 0.94)
    pt3dadd(-22.54, 51.54, -2.5, 0.94)
    pt3dadd(-22.65, 51.7, -2.5, 0.94)
    pt3dadd(-22.81, 51.86, -2.5, 0.94)
    pt3dadd(-22.96, 51.96, -2.5, 0.94)
    pt3dadd(-23.02, 52.07, -2.5, 0.94)
    pt3dadd(-23.07, 52.28, -3, 0.94)
    pt3dadd(-23.17, 52.28, -3, 0.94)
    pt3dadd(-23.28, 52.44, -3, 0.94)
    pt3dadd(-23.38, 52.54, -3, 0.94)
    pt3dadd(-23.44, 52.65, -3, 0.94)
    pt3dadd(-23.54, 52.75, -3, 0.94)
    pt3dadd(-23.65, 52.91, -3, 0.94)
    pt3dadd(-23.7, 53.01, -3, 0.94)
    pt3dadd(-23.8, 53.17, -3.5, 0.94)
    pt3dadd(-23.86, 53.28, -3.5, 0.94)
    pt3dadd(-23.91, 53.49, -3.5, 0.94)
    pt3dadd(-23.96, 53.7, -3.5, 0.94)
    pt3dadd(-24.01, 53.86, -3.5, 0.94)
    pt3dadd(-24.12, 54.07, -3.5, 0.94)
    pt3dadd(-24.07, 54.33, -3.5, 0.94)
    pt3dadd(-24.12, 54.49, -3.5, 0.94)
    pt3dadd(-24.17, 54.7, -3.5, 0.94)
    pt3dadd(-24.22, 54.8, -3.5, 0.94)
    pt3dadd(-24.22, 55.01, -3.5, 0.94)
    pt3dadd(-24.33, 55.17, -3.5, 0.94)
    pt3dadd(-24.38, 55.28, -3.5, 0.94)
    pt3dadd(-24.49, 55.43, -3.5, 0.94)
    pt3dadd(-24.75, 55.54, -3.5, 0.94)
    pt3dadd(-24.85, 55.59, -3.5, 0.94)
    pt3dadd(-25.11, 55.64, -3.5, 0.94)
    pt3dadd(-25.22, 55.75, -4, 0.94)
    pt3dadd(-25.43, 55.75, -4, 0.94)
    pt3dadd(-25.59, 55.8, -4, 0.94)
    pt3dadd(-25.69, 55.91, -4, 0.94)
    pt3dadd(-25.8, 56.12, -4, 0.94)
    pt3dadd(-25.85, 56.27, -4, 0.94)
    pt3dadd(-25.9, 56.38, -4, 0.94)
    pt3dadd(-26.01, 56.64, -4, 0.94)
    pt3dadd(-26.06, 56.85, -4, 0.94)
    pt3dadd(-26.16, 56.96, -4, 0.94)
    pt3dadd(-26.22, 57.22, -4, 0.94)
    pt3dadd(-26.32, 57.38, -4.5, 0.94)
    pt3dadd(-26.32, 57.59, -4.5, 0.94)
    pt3dadd(-26.48, 57.9, -4.5, 0.94)
    pt3dadd(-26.53, 58.06, -4.5, 0.94)
    pt3dadd(-26.64, 58.22, -4.5, 0.94)
    pt3dadd(-26.64, 58.38, -4.5, 0.94)
    pt3dadd(-26.74, 58.48, -4.5, 0.94)
    pt3dadd(-26.79, 58.64, -4.5, 0.94)
    pt3dadd(-26.85, 58.74, -4.5, 0.94)
    pt3dadd(-26.95, 58.9, -4.5, 0.94)
    pt3dadd(-27, 59.11, -4.5, 0.94)
    pt3dadd(-27.11, 59.27, -5, 0.94)
    pt3dadd(-27.16, 59.48, -5, 0.94)
    pt3dadd(-27.27, 59.64, -5, 0.94)
    pt3dadd(-27.27, 59.74, -5, 0.94)
    pt3dadd(-27.32, 59.85, -5, 0.94)
    pt3dadd(-27.42, 59.95, -5, 0.94)
    pt3dadd(-27.42, 60.16, -5, 0.94)
    pt3dadd(-27.48, 60.27, -5, 0.94)
    pt3dadd(-27.58, 60.37, -5, 0.94)
    pt3dadd(-27.58, 60.53, -5, 0.94)
    pt3dadd(-27.63, 60.64, -5, 0.94)
    pt3dadd(-27.74, 60.74, -5, 0.94)
    pt3dadd(-27.79, 60.9, -5, 0.94)
    pt3dadd(-27.9, 61.06, -5, 0.94)
    pt3dadd(-28, 61.16, -5, 0.94)
    pt3dadd(-28.05, 61.27, -5, 0.94)
    pt3dadd(-29.82, 61.49, -5.5, 0.94)
    pt3dadd(-29.93, 61.6, -5.5, 0.94)
    pt3dadd(-30.09, 61.55, -5.5, 0.94)
    pt3dadd(-30.3, 61.6, -5.5, 0.94)
    pt3dadd(-30.51, 61.6, -6, 0.94)
    pt3dadd(-30.77, 61.34, -6, 0.94)
    pt3dadd(-30.87, 61.18, -6, 0.94)
    pt3dadd(-31.03, 61.12, -6, 0.94)
    pt3dadd(-31.08, 61.23, -6, 0.94)
    pt3dadd(-31.19, 61.23, -6.5, 0.94)
    pt3dadd(-31.29, 61.28, -6.5, 0.94)
    pt3dadd(-31.4, 61.39, -6.5, 0.94)
    pt3dadd(-31.5, 61.44, -6.5, 0.94)
    pt3dadd(-31.61, 61.49, -6.5, 0.94)
    pt3dadd(-31.66, 61.6, -6.5, 0.94)
    pt3dadd(-31.98, 61.91, -6.5, 0.94)
    pt3dadd(-32.19, 62.12, -6.5, 0.94)
    pt3dadd(-32.29, 62.39, -6.5, 0.94)
    pt3dadd(-32.4, 62.44, -6.5, 0.94)
    pt3dadd(-32.54, 62.6, -7, 0.94)
    pt3dadd(-32.76, 62.81, -7, 0.94)
    pt3dadd(-32.81, 62.91, -7, 0.94)
    pt3dadd(-32.97, 62.96, -7, 0.94)
    pt3dadd(-33.08, 63.07, -7, 0.94)
    pt3dadd(-33.18, 63.07, -7, 0.94)
    pt3dadd(-33.29, 63.17, -7, 0.94)
    pt3dadd(-33.39, 63.28, -7, 0.94)
    pt3dadd(-33.5, 63.33, -7, 0.94)
    pt3dadd(-33.6, 63.39, -7, 0.94)
    pt3dadd(-33.76, 63.49, -7, 0.94)
    pt3dadd(-33.81, 63.6, -7, 0.94)
    pt3dadd(-33.86, 63.75, -7, 0.94)
    pt3dadd(-34.02, 63.81, -7, 0.94)
    pt3dadd(-34.13, 64.02, -7, 0.94)
    pt3dadd(-34.22, 64.12, -7, 0.94)
    pt3dadd(-34.39, 64.17, -7, 0.94)
    pt3dadd(-34.6, 64.38, -7, 0.94)
    pt3dadd(-34.7, 64.44, -7, 0.94)
    pt3dadd(-34.81, 64.54, -7.5, 0.94)
    pt3dadd(-34.97, 64.65, -7.5, 0.94)
    pt3dadd(-35.07, 64.7, -7.5, 0.94)
    pt3dadd(-35.18, 64.8, -7.5, 0.94)
    pt3dadd(-35.28, 64.91, -7.5, 0.94)
    pt3dadd(-35.39, 65.06, -7.5, 0.94)
    pt3dadd(-35.44, 65.17, -7.5, 0.94)
    pt3dadd(-35.54, 65.28, -7.5, 0.94)
    pt3dadd(-35.65, 65.44, -7.5, 0.94)
    pt3dadd(-35.75, 65.48, -7.5, 0.94)
    pt3dadd(-35.86, 65.59, -7.5, 0.94)
    pt3dadd(-35.96, 65.7, -7.5, 0.94)
    pt3dadd(-36.07, 65.8, -7.5, 0.94)
    pt3dadd(-36.17, 65.86, -7.5, 0.94)
    pt3dadd(-36.49, 66.17, -7.5, 0.94)
    pt3dadd(-36.59, 66.28, -7.5, 0.94)
    pt3dadd(-36.7, 66.43, -7.5, 0.94)
    pt3dadd(-36.86, 66.54, -7.5, 0.94)
    pt3dadd(-36.96, 66.64, -7.5, 0.94)
    pt3dadd(-37.01, 66.75, -7.5, 0.94)
    pt3dadd(-37.17, 66.91, -7.5, 0.94)
    pt3dadd(-37.28, 67.01, -7.5, 0.94)
    pt3dadd(-37.43, 67.12, -7.5, 0.94)
    pt3dadd(-37.43, 67.28, -7.5, 0.94)
    pt3dadd(-37.49, 67.38, -7.5, 0.94)
    pt3dadd(-37.49, 67.64, -7.5, 0.94)
    pt3dadd(-37.64, 67.75, -7.5, 0.94)
    pt3dadd(-37.59, 67.91, -7.5, 0.94)
    pt3dadd(-37.59, 68.17, -7.5, 0.94)
    pt3dadd(-37.7, 68.22, -7.5, 0.94)
    pt3dadd(-37.7, 68.38, -7.5, 0.94)
    pt3dadd(-37.79, 68.48, -7.5, 0.94)
    pt3dadd(-37.75, 68.59, -7.5, 0.94)
    pt3dadd(-37.75, 68.75, -7.5, 0.94)
    pt3dadd(-37.79, 68.91, -7.5, 0.94)
    pt3dadd(-37.79, 69.12, -7.5, 0.94)
    pt3dadd(-37.85, 69.27, -7.5, 0.94)
    pt3dadd(-37.85, 69.38, -7.5, 0.94)
    pt3dadd(-37.9, 69.48, -7.5, 0.94)
    pt3dadd(-38.11, 69.69, -7.5, 0.94)
    pt3dadd(-38.27, 69.8, -7.5, 0.94)
    pt3dadd(-38.33, 69.9, -7.5, 0.94)
  }
}
proc shape3d_14() {
  dend[9] {
    pt3dadd(-38.38, 70.17, -7.5, 0.94)
    pt3dadd(-38.47, 70.31, -7.5, 0.94)
    pt3dadd(-38.59, 70.43, -7.5, 0.94)
    pt3dadd(-38.75, 70.48, -7.5, 0.94)
    pt3dadd(-38.85, 70.48, -7.5, 0.94)
    pt3dadd(-38.96, 70.53, -7.5, 0.94)
    pt3dadd(-38.96, 70.69, -7.5, 0.94)
    pt3dadd(-39.11, 70.73, -7.5, 0.94)
    pt3dadd(-39.27, 70.8, -7.5, 0.94)
    pt3dadd(-39.27, 70.9, -7.5, 0.94)
    pt3dadd(-39.32, 71.01, -7.5, 0.94)
    pt3dadd(-39.43, 70.95, -7.5, 0.94)
    pt3dadd(-39.53, 71.06, -7.5, 0.94)
    pt3dadd(-39.64, 71.17, -7.5, 0.94)
    pt3dadd(-39.79, 71.31, -7.5, 0.94)
    pt3dadd(-39.9, 71.43, -7.5, 0.94)
    pt3dadd(-40.01, 71.48, -7.5, 0.94)
    pt3dadd(-40.11, 71.48, -7.5, 0.94)
    pt3dadd(-40.22, 71.59, -7.5, 0.94)
    pt3dadd(-40.32, 71.59, -7.5, 0.94)
    pt3dadd(-40.53, 71.73, -7.5, 0.94)
    pt3dadd(-40.64, 71.84, -7.5, 0.94)
    pt3dadd(-40.74, 71.84, -7.5, 0.94)
    pt3dadd(-40.85, 71.9, -7.5, 0.94)
    pt3dadd(-40.85, 72.11, -7.5, 0.94)
    pt3dadd(-40.95, 72.22, -7.5, 0.94)
    pt3dadd(-41.06, 72.48, -7.5, 0.94)
    pt3dadd(-41.11, 72.58, -7.5, 0.94)
    pt3dadd(-41.16, 72.73, -7.5, 0.94)
    pt3dadd(-41.27, 72.84, -7.5, 0.94)
    pt3dadd(-41.27, 72.95, -7.5, 0.94)
    pt3dadd(-42.05, 73.47, -7.5, 0.94)
    pt3dadd(-42.16, 73.56, -7.5, 0.94)
    pt3dadd(-42.21, 73.68, -8, 0.94)
    pt3dadd(-42.37, 73.73, -8, 0.94)
    pt3dadd(-42.47, 73.83, -8, 0.94)
    pt3dadd(-42.47, 74.04, -8, 0.94)
    pt3dadd(-42.53, 74.2, -8, 0.94)
    pt3dadd(-42.47, 74.36, -8, 0.94)
    pt3dadd(-42.47, 74.67, -8, 0.94)
    pt3dadd(-42.37, 74.78, -8, 0.94)
    pt3dadd(-42.37, 74.89, -8, 0.94)
    pt3dadd(-42.26, 75.09, -8, 0.94)
    pt3dadd(-42.21, 75.2, -8, 0.94)
    pt3dadd(-42.16, 75.31, -8, 0.94)
    pt3dadd(-42.16, 75.67, -8.5, 0.94)
    pt3dadd(-42.21, 75.78, -8.5, 0.94)
    pt3dadd(-42.32, 75.88, -8.5, 0.94)
    pt3dadd(-42.37, 75.98, -8.5, 0.94)
    pt3dadd(-42.37, 76.15, -9, 0.94)
    pt3dadd(-42.42, 76.3, -9, 0.94)
    pt3dadd(-42.47, 76.41, -9, 0.94)
    pt3dadd(-42.47, 76.73, -9, 0.94)
    pt3dadd(-42.53, 76.94, -9, 0.94)
    pt3dadd(-42.58, 77.09, -9, 0.94)
    pt3dadd(-42.58, 77.25, -9.5, 0.94)
    pt3dadd(-42.63, 77.36, -9.5, 0.94)
    pt3dadd(-42.68, 77.56, -9.5, 0.94)
    pt3dadd(-42.74, 77.78, -9.5, 0.94)
    pt3dadd(-42.79, 77.93, -9.5, 0.94)
    pt3dadd(-42.79, 78.14, -9.5, 0.94)
    pt3dadd(-42.84, 78.3, -9.5, 0.94)
    pt3dadd(-42.89, 78.51, -9.5, 0.94)
    pt3dadd(-42.89, 78.72, -9.5, 0.94)
    pt3dadd(-43, 78.88, -9.5, 0.94)
    pt3dadd(-43.1, 78.98, -9.5, 0.94)
    pt3dadd(-43.1, 79.09, -9.5, 0.94)
    pt3dadd(-43.21, 79.2, -9.5, 0.94)
    pt3dadd(-43.37, 79.34, -9.5, 0.94)
    pt3dadd(-43.47, 79.45, -9.5, 0.94)
    pt3dadd(-43.63, 79.56, -9.5, 0.94)
    pt3dadd(-43.79, 79.67, -9.5, 0.94)
    pt3dadd(-43.84, 79.77, -9.5, 0.94)
    pt3dadd(-43.94, 79.88, -9.5, 0.94)
    pt3dadd(-44, 79.98, -10, 0.94)
    pt3dadd(-44.15, 80.14, -10, 0.94)
    pt3dadd(-44.21, 80.25, -10, 0.94)
    pt3dadd(-44.26, 80.34, -10, 0.94)
    pt3dadd(-44.31, 80.45, -10, 0.94)
    pt3dadd(-44.36, 80.56, -10, 0.94)
    pt3dadd(-44.42, 80.67, -10, 0.94)
    pt3dadd(-44.47, 80.77, -10, 0.94)
    pt3dadd(-44.52, 80.88, -10, 0.94)
    pt3dadd(-44.57, 80.98, -10, 0.94)
    pt3dadd(-44.68, 81.14, -10, 0.94)
    pt3dadd(-44.68, 81.3, -10, 0.94)
    pt3dadd(-44.73, 81.45, -10.5, 0.94)
    pt3dadd(-44.84, 81.56, -10.5, 0.94)
    pt3dadd(-44.84, 81.72, -10.5, 0.94)
    pt3dadd(-44.94, 81.81, -10.5, 0.94)
    pt3dadd(-44.94, 82.09, -10.5, 0.94)
    pt3dadd(-44.99, 82.19, -10.5, 0.94)
    pt3dadd(-45.05, 82.4, -10.5, 0.94)
    pt3dadd(-45.05, 82.82, -10.5, 0.94)
    pt3dadd(-45.1, 82.93, -11, 0.94)
    pt3dadd(-45.1, 83.14, -11, 0.94)
    pt3dadd(-45.15, 83.3, -11, 0.94)
    pt3dadd(-45.26, 83.4, -11, 0.94)
    pt3dadd(-45.26, 83.56, -11, 0.94)
    pt3dadd(-45.36, 83.66, -11, 0.94)
    pt3dadd(-45.41, 83.77, -11, 0.94)
    pt3dadd(-45.52, 83.93, -11, 0.94)
    pt3dadd(-45.52, 84.14, -11, 0.94)
    pt3dadd(-45.62, 84.24, -11, 0.94)
    pt3dadd(-45.68, 84.4, -11, 0.94)
    pt3dadd(-45.73, 84.51, -11, 0.94)
    pt3dadd(-45.73, 84.77, -11, 0.94)
    pt3dadd(-45.78, 84.98, -11, 0.94)
    pt3dadd(-45.78, 85.14, -11, 0.94)
    pt3dadd(-45.83, 85.24, -11, 0.94)
    pt3dadd(-45.89, 85.35, -11, 0.94)
    pt3dadd(-46.25, 87.1, -11, 0.94)
    pt3dadd(-46.3, 87.2, -11.5, 0.94)
    pt3dadd(-46.41, 87.41, -11.5, 0.94)
    pt3dadd(-46.46, 87.57, -11.5, 0.94)
    pt3dadd(-46.51, 87.73, -11.5, 0.94)
    pt3dadd(-46.62, 87.94, -11.5, 0.94)
    pt3dadd(-46.67, 88.1, -11.5, 0.94)
    pt3dadd(-46.77, 88.2, -11.5, 0.94)
    pt3dadd(-46.77, 88.52, -11.5, 0.94)
    pt3dadd(-46.83, 88.62, -11.5, 0.94)
    pt3dadd(-46.88, 88.73, -11.5, 0.94)
    pt3dadd(-46.93, 88.88, -11.5, 0.94)
    pt3dadd(-47.04, 88.99, -11.5, 0.94)
    pt3dadd(-47.09, 89.15, -11.5, 0.94)
    pt3dadd(-47.19, 89.25, -11.5, 0.94)
    pt3dadd(-47.3, 89.36, -12, 0.94)
    pt3dadd(-47.35, 89.51, -12, 0.94)
    pt3dadd(-47.46, 89.62, -12, 0.94)
    pt3dadd(-47.72, 89.78, -12, 0.94)
    pt3dadd(-47.82, 89.88, -12, 0.94)
    pt3dadd(-47.98, 89.88, -12, 0.94)
    pt3dadd(-48.09, 89.94, -12, 0.94)
    pt3dadd(-48.24, 89.99, -12, 0.94)
    pt3dadd(-48.35, 90.04, -12, 0.94)
    pt3dadd(-48.4, 90.15, -12, 0.94)
    pt3dadd(-48.51, 90.2, -12, 0.94)
    pt3dadd(-48.66, 90.36, -12, 0.94)
    pt3dadd(-48.77, 90.46, -12, 0.94)
    pt3dadd(-48.87, 90.51, -12, 0.94)
    pt3dadd(-48.98, 90.67, -12, 0.94)
    pt3dadd(-49.03, 90.78, -12, 0.94)
    pt3dadd(-49.08, 90.88, -12, 0.94)
    pt3dadd(-49.19, 90.99, -12, 0.94)
    pt3dadd(-49.19, 91.2, -12, 0.94)
    pt3dadd(-49.24, 91.35, -12, 0.94)
    pt3dadd(-49.24, 92.35, -12, 0.94)
    pt3dadd(-49.14, 92.62, -12, 0.94)
    pt3dadd(-49.03, 92.72, -12, 0.94)
    pt3dadd(-48.98, 92.88, -12, 0.94)
    pt3dadd(-48.93, 93.09, -12, 0.94)
    pt3dadd(-48.87, 93.25, -12, 0.94)
    pt3dadd(-48.77, 93.41, -12, 0.94)
    pt3dadd(-48.77, 93.51, -12, 0.94)
    pt3dadd(-48.72, 93.72, -12, 0.94)
    pt3dadd(-48.72, 94.19, -12, 0.94)
    pt3dadd(-48.87, 94.25, -12, 0.94)
    pt3dadd(-48.98, 94.46, -12, 0.94)
    pt3dadd(-49.08, 94.56, -12, 0.94)
    pt3dadd(-49.24, 94.67, -12, 0.94)
    pt3dadd(-49.29, 94.77, -12.5, 0.94)
    pt3dadd(-49.4, 94.77, -12.5, 0.94)
    pt3dadd(-49.45, 94.93, -12.5, 0.94)
    pt3dadd(-49.5, 95.09, -12.5, 0.94)
    pt3dadd(-49.45, 95.19, -12.5, 0.94)
    pt3dadd(-49.45, 95.46, -12.5, 0.94)
    pt3dadd(-49.4, 95.56, -12.5, 0.94)
    pt3dadd(-49.24, 95.72, -13, 0.94)
    pt3dadd(-49.14, 95.82, -13, 0.94)
    pt3dadd(-49.08, 95.98, -13, 0.94)
    pt3dadd(-48.82, 96.3, -13, 0.94)
    pt3dadd(-48.77, 96.45, -13, 0.94)
    pt3dadd(-48.72, 96.56, -13, 0.94)
    pt3dadd(-48.72, 96.93, -13, 0.94)
    pt3dadd(-48.66, 97.03, -13, 0.94)
    pt3dadd(-48.66, 97.3, -13.5, 0.94)
    pt3dadd(-48.61, 97.51, -13.5, 0.94)
    pt3dadd(-48.61, 97.93, -13.5, 0.94)
    pt3dadd(-48.66, 98.03, -13.5, 0.94)
    pt3dadd(-48.66, 98.24, -13.5, 0.94)
    pt3dadd(-48.72, 98.4, -13.5, 0.94)
    pt3dadd(-49.12, 98.8, -13.5, 0.94)
    pt3dadd(-49.22, 98.85, -13.5, 0.94)
    pt3dadd(-49.38, 98.9, -13.5, 0.94)
    pt3dadd(-49.48, 99.01, -13.5, 0.94)
    pt3dadd(-49.59, 99.11, -13.5, 0.94)
    pt3dadd(-49.64, 99.27, -13.5, 0.94)
    pt3dadd(-49.75, 99.43, -13.5, 0.94)
    pt3dadd(-50.01, 99.22, -13.5, 0.94)
    pt3dadd(-50.06, 99.32, -13.5, 0.94)
    pt3dadd(-50.17, 99.43, -13.5, 0.94)
    pt3dadd(-50.27, 99.53, -13.5, 0.94)
    pt3dadd(-50.43, 99.64, -13.5, 0.94)
    pt3dadd(-50.53, 99.69, -13.5, 0.94)
    pt3dadd(-50.64, 99.8, -13.5, 0.94)
    pt3dadd(-50.8, 99.95, -14, 0.94)
    pt3dadd(-50.9, 100.06, -14, 0.94)
    pt3dadd(-51.06, 100.22, -14, 0.94)
    pt3dadd(-51.16, 100.27, -14, 0.94)
    pt3dadd(-51.37, 100.37, -14, 0.94)
    pt3dadd(-51.48, 100.48, -14, 0.94)
    pt3dadd(-51.64, 100.64, -14, 0.94)
    pt3dadd(-51.74, 100.74, -14, 0.94)
    pt3dadd(-51.85, 101.01, -14, 0.94)
    pt3dadd(-51.9, 101.11, -14, 0.94)
    pt3dadd(-51.95, 101.22, -14, 0.94)
    pt3dadd(-51.95, 101.85, -14, 0.94)
    pt3dadd(-51.9, 102, -14, 0.94)
    pt3dadd(-51.85, 102.21, -14, 0.94)
    pt3dadd(-51.85, 102.43, -14, 0.94)
    pt3dadd(-51.79, 102.58, -14, 0.94)
    pt3dadd(-51.79, 103.06, -14, 0.94)
    pt3dadd(-51.74, 103.16, -14, 0.94)
    pt3dadd(-51.74, 103.69, -14, 0.94)
    pt3dadd(-51.79, 103.84, -14, 0.94)
    pt3dadd(-51.79, 104.05, -14, 0.94)
    pt3dadd(-51.85, 104.21, -14, 0.94)
    pt3dadd(-51.9, 104.37, -14, 0.94)
    pt3dadd(-51.95, 104.48, -14, 0.94)
    pt3dadd(-52, 104.63, -14.5, 0.94)
    pt3dadd(-52.11, 104.63, -14.5, 0.94)
    pt3dadd(-52.21, 104.79, -14.5, 0.94)
    pt3dadd(-52.27, 104.95, -14.5, 0.94)
    pt3dadd(-52.37, 105.11, -14.5, 0.94)
    pt3dadd(-52.48, 105.21, -14.5, 0.94)
    pt3dadd(-52.53, 105.32, -14.5, 0.94)
    pt3dadd(-52.63, 105.47, -14.5, 0.94)
    pt3dadd(-52.69, 105.63, -14.5, 0.94)
    pt3dadd(-52.79, 105.84, -14.5, 0.94)
    pt3dadd(-52.9, 105.89, -14.5, 0.94)
    pt3dadd(-52.95, 106.05, -14.5, 0.94)
    pt3dadd(-53, 106.16, -14.5, 0.94)
    pt3dadd(-53, 106.32, -14.5, 0.94)
    pt3dadd(-52.95, 106.53, -14.5, 0.94)
    pt3dadd(-53, 106.68, -14.5, 0.94)
    pt3dadd(-53, 106.95, -14.5, 0.94)
    pt3dadd(-53.05, 107.16, -14.5, 0.94)
    pt3dadd(-53.05, 107.63, -14.5, 0.94)
    pt3dadd(-53.11, 107.73, -14.5, 0.94)
    pt3dadd(-53.11, 107.94, -14.5, 0.94)
    pt3dadd(-53.16, 108.05, -14.5, 0.94)
    pt3dadd(-53.21, 108.16, -14.5, 0.94)
    pt3dadd(-53.21, 108.26, -14.5, 0.94)
    pt3dadd(-53.26, 108.37, -14.5, 0.94)
    pt3dadd(-53.42, 108.42, -14.5, 0.94)
    pt3dadd(-53.47, 108.52, -14.5, 0.94)
    pt3dadd(-53.63, 108.63, -14.5, 0.94)
    pt3dadd(-53.79, 108.63, -14.5, 0.94)
    pt3dadd(-53.94, 108.68, -14.5, 0.94)
  }
}
proc shape3d_15() {
  dend[9] {
    pt3dadd(-54.05, 108.79, -14.5, 0.94)
    pt3dadd(-54.15, 108.79, -14.5, 0.94)
    pt3dadd(-54.31, 108.84, -14.5, 0.94)
    pt3dadd(-54.42, 109, -14.5, 0.94)
    pt3dadd(-54.47, 109.1, -14.5, 0.94)
    pt3dadd(-54.63, 109.21, -14.5, 0.94)
    pt3dadd(-54.63, 109.42, -14.5, 0.94)
    pt3dadd(-54.68, 109.68, -14.5, 0.94)
    pt3dadd(-54.78, 109.78, -14.5, 0.94)
    pt3dadd(-54.89, 110, -14.5, 0.94)
    pt3dadd(-54.94, 110.21, -14.5, 0.94)
    pt3dadd(-55.05, 110.26, -14.5, 0.94)
    pt3dadd(-54.99, 110.36, -14.5, 0.94)
    pt3dadd(-54.99, 110.57, -14.5, 0.94)
    pt3dadd(-55.05, 110.68, -14.5, 0.94)
    pt3dadd(-55.05, 110.84, -14.5, 0.94)
    pt3dadd(-55.21, 111.88, -14.5, 0.94)
    pt3dadd(-55.11, 111.93, -14.5, 0.94)
    pt3dadd(-55.11, 112.19, -14.5, 0.94)
    pt3dadd(-55.05, 112.3, -14.5, 0.94)
    pt3dadd(-55.11, 112.51, -14.5, 0.94)
    pt3dadd(-55.16, 112.72, -14.5, 0.94)
    pt3dadd(-55.21, 112.87, -14.5, 0.94)
    pt3dadd(-55.21, 113.03, -14.5, 0.94)
    pt3dadd(-55.26, 113.3, -14.5, 0.94)
    pt3dadd(-55.37, 113.4, -14.5, 0.94)
    pt3dadd(-55.37, 113.61, -14.5, 0.94)
    pt3dadd(-55.47, 113.72, -14.5, 0.94)
    pt3dadd(-55.58, 113.87, -14.5, 0.94)
    pt3dadd(-55.63, 114.14, -14.5, 0.94)
    pt3dadd(-55.74, 114.24, -14.5, 0.94)
    pt3dadd(-55.79, 114.35, -14.5, 0.94)
    pt3dadd(-55.95, 114.61, -15, 0.94)
    pt3dadd(-56.1, 114.77, -15, 0.94)
    pt3dadd(-56.16, 114.87, -15, 0.94)
    pt3dadd(-56.31, 115.08, -15, 0.94)
    pt3dadd(-56.42, 115.19, -15, 0.94)
    pt3dadd(-56.52, 115.29, -15, 0.94)
    pt3dadd(-56.58, 115.45, -15, 0.94)
    pt3dadd(-56.73, 115.61, -15, 0.94)
    pt3dadd(-56.79, 115.77, -15, 0.94)
    pt3dadd(-56.89, 115.87, -15, 0.94)
    pt3dadd(-57, 115.98, -15.5, 0.94)
    pt3dadd(-57.21, 115.92, -15.5, 0.94)
    pt3dadd(-57.68, 115.92, -15.5, 0.94)
    pt3dadd(-57.84, 115.98, -15.5, 0.94)
    pt3dadd(-58.05, 115.98, -15.5, 0.94)
    pt3dadd(-58.15, 116.03, -15.5, 0.94)
    pt3dadd(-58.26, 115.98, -15.5, 0.94)
    pt3dadd(-58.52, 116.08, -15.5, 0.94)
    pt3dadd(-58.68, 116.08, -15.5, 0.94)
    pt3dadd(-58.78, 116.08, -15.5, 0.94)
    pt3dadd(-58.89, 116.03, -15.5, 0.94)
    pt3dadd(-58.94, 115.87, -15.5, 0.94)
    pt3dadd(-59.1, 115.77, -15.5, 0.94)
    pt3dadd(-59.1, 115.66, -15.5, 0.94)
    pt3dadd(-59.15, 115.5, -15.5, 0.94)
    pt3dadd(-59.2, 115.4, -15.5, 0.94)
    pt3dadd(-59.31, 115.29, -15.5, 0.94)
    pt3dadd(-59.31, 115.08, -15.5, 0.94)
    pt3dadd(-59.51, 115.03, -15.5, 0.94)
    pt3dadd(-59.62, 114.93, -15, 0.94)
    pt3dadd(-59.72, 114.87, -15, 0.94)
    pt3dadd(-59.88, 114.77, -15, 0.94)
    pt3dadd(-59.99, 114.66, -15, 0.94)
    pt3dadd(-60.14, 114.45, -14.5, 0.94)
    pt3dadd(-60.3, 114.45, -14.5, 0.94)
    pt3dadd(-60.46, 114.29, -14.5, 0.94)
    pt3dadd(-60.67, 114.19, -14.5, 0.94)
    pt3dadd(-60.77, 114.14, -14.5, 0.94)
    pt3dadd(-60.88, 114.08, -14.5, 0.94)
    pt3dadd(-61.09, 113.98, -14.5, 0.94)
    pt3dadd(-61.77, 113.98, -14.5, 0.94)
    pt3dadd(-61.93, 114.03, -14.5, 0.94)
    pt3dadd(-62.14, 114.03, -14.5, 0.94)
    pt3dadd(-62.24, 114.14, -14.5, 0.94)
    pt3dadd(-62.35, 114.24, -14.5, 0.94)
    pt3dadd(-62.61, 114.4, -14.5, 0.94)
    pt3dadd(-62.66, 114.45, -15, 0.94)
    pt3dadd(-62.77, 114.61, -15, 0.94)
    pt3dadd(-63.03, 114.71, -15, 0.94)
    pt3dadd(-63.14, 114.77, -15, 0.94)
    pt3dadd(-63.24, 114.87, -15, 0.94)
    pt3dadd(-63.35, 114.98, -15, 0.94)
    pt3dadd(-63.45, 115.03, -15, 0.94)
    pt3dadd(-63.5, 115.14, -15, 0.94)
    pt3dadd(-63.71, 115.14, -15, 0.94)
    pt3dadd(-64.34, 115.24, -16, 0.94)
    pt3dadd(-64.55, 115.14, -16, 0.94)
    pt3dadd(-64.66, 115.03, -16, 0.94)
    pt3dadd(-64.76, 114.82, -16.5, 0.94)
    pt3dadd(-64.87, 114.87, -17, 0.94)
    pt3dadd(-65.03, 114.82, -17, 0.94)
    pt3dadd(-65.13, 114.93, -17, 0.94)
    pt3dadd(-65.29, 115.03, -17, 0.94)
    pt3dadd(-65.45, 115.03, -17, 0.94)
    pt3dadd(-65.5, 115.08, -17.5, 0.94)
    pt3dadd(-65.59, 114.93, -17.5, 0.94)
    pt3dadd(-65.66, 114.77, -17.5, 0.94)
    pt3dadd(-65.7, 114.66, -17.5, 0.94)
    pt3dadd(-65.76, 114.45, -17.5, 0.94)
    pt3dadd(-65.81, 114.35, -17.5, 0.94)
    pt3dadd(-65.87, 114.19, -17.5, 0.94)
    pt3dadd(-65.97, 114.24, -18, 0.94)
    pt3dadd(-66.13, 114.24, -18, 0.94)
    pt3dadd(-66.18, 114.35, -18, 0.94)
    pt3dadd(-66.29, 114.45, -18, 0.94)
    pt3dadd(-66.5, 114.5, -18, 0.94)
    pt3dadd(-66.59, 114.56, -18, 0.94)
    pt3dadd(-66.76, 114.66, -18, 0.94)
    pt3dadd(-66.86, 114.77, -18, 0.94)
    pt3dadd(-66.97, 114.93, -18, 0.94)
    pt3dadd(-67.13, 115.03, -18, 0.94)
    pt3dadd(-67.06, 115.19, -18, 0.94)
    pt3dadd(-67.18, 115.4, -18, 0.94)
    pt3dadd(-67.28, 115.56, -18, 0.94)
    pt3dadd(-67.34, 115.66, -18, 0.94)
    pt3dadd(-67.44, 115.77, -18, 0.94)
    pt3dadd(-67.55, 115.82, -18.5, 0.94)
    pt3dadd(-67.59, 115.92, -18.5, 0.94)
    pt3dadd(-67.7, 116.03, -18.5, 0.94)
    pt3dadd(-67.76, 116.13, -19, 0.94)
    pt3dadd(-67.76, 116.5, -19, 0.94)
    pt3dadd(-67.76, 116.77, -19, 0.94)
    pt3dadd(-67.65, 116.92, -19, 0.94)
    pt3dadd(-67.55, 117.13, -19, 0.94)
    pt3dadd(-67.55, 117.29, -19.5, 0.94)
    pt3dadd(-67.44, 117.45, -19.5, 0.94)
    pt3dadd(-67.48, 117.66, -19.5, 0.94)
    pt3dadd(-67.59, 117.76, -19.5, 0.94)
    pt3dadd(-67.7, 117.82, -19.5, 0.94)
    pt3dadd(-67.81, 117.92, -19.5, 0.94)
    pt3dadd(-67.91, 118.03, -19.5, 0.94)
    pt3dadd(-68.02, 118.08, -20, 0.94)
    pt3dadd(-68.12, 118.13, -20, 0.94)
    pt3dadd(-68.12, 118.29, -20, 0.94)
    pt3dadd(-68.18, 118.39, -20, 0.94)
    pt3dadd(-68.23, 118.55, -20, 0.94)
    pt3dadd(-68.23, 118.92, -20, 0.94)
    pt3dadd(-68.12, 119.13, -20.5, 0.94)
    pt3dadd(-68.06, 119.29, -20.5, 0.94)
    pt3dadd(-67.91, 119.39, -20.5, 0.94)
    pt3dadd(-67.7, 119.39, -20.5, 0.94)
    pt3dadd(-67.48, 119.55, -20.5, 0.94)
    pt3dadd(-67.34, 119.6, -20.5, 0.94)
    pt3dadd(-67.23, 119.71, -21, 0.94)
    pt3dadd(-67.06, 119.92, -21, 0.94)
    pt3dadd(-67.06, 120.08, -21.5, 0.94)
    pt3dadd(-67.28, 120.08, -21.5, 0.94)
    pt3dadd(-67.39, 120.13, -21.5, 0.94)
    pt3dadd(-67.76, 120.13, -21.5, 0.94)
    pt3dadd(-67.91, 120.08, -21.5, 0.94)
    pt3dadd(-68.12, 119.97, -21.5, 0.94)
    pt3dadd(-68.28, 119.92, -21.5, 0.94)
    pt3dadd(-68.48, 119.71, -21.5, 0.94)
    pt3dadd(-68.65, 119.66, -21.5, 0.94)
    pt3dadd(-68.95, 119.66, -22, 0.94)
    pt3dadd(-69.06, 119.76, -22, 0.94)
    pt3dadd(-69.12, 119.87, -22, 0.94)
    pt3dadd(-69.23, 119.97, -22, 0.94)
    pt3dadd(-69.33, 120.08, -22, 0.94)
  }
  dend[10] {pt3dclear()
    pt3dadd(-12.63, 39.19, 2.5, 1)
    pt3dadd(-13.79, 39.31, 3.5, 0.89)
    pt3dadd(-13.9, 39.4, 3.5, 0.89)
    pt3dadd(-14, 39.46, 3.5, 0.89)
    pt3dadd(-14.11, 39.57, 3.5, 0.89)
    pt3dadd(-14.27, 39.67, 3.5, 0.89)
    pt3dadd(-14.42, 39.78, 3.5, 0.89)
    pt3dadd(-14.63, 39.83, 3.5, 0.89)
    pt3dadd(-14.74, 39.94, 3.5, 0.89)
    pt3dadd(-14.9, 39.88, 3.5, 0.89)
    pt3dadd(-15, 39.99, 3.5, 0.89)
    pt3dadd(-15.16, 40.04, 3.5, 0.89)
    pt3dadd(-15.26, 40.15, 3.5, 0.89)
    pt3dadd(-15.37, 40.25, 3.5, 0.89)
    pt3dadd(-15.53, 40.25, 3.5, 0.89)
    pt3dadd(-15.63, 40.36, 3.5, 0.89)
    pt3dadd(-15.68, 40.51, 3.5, 0.89)
    pt3dadd(-15.79, 40.57, 3.5, 0.89)
    pt3dadd(-15.89, 40.72, 3.5, 0.89)
    pt3dadd(-16, 40.83, 3.5, 0.89)
    pt3dadd(-16.16, 40.93, 3.5, 0.89)
    pt3dadd(-16.26, 41.09, 3.5, 0.89)
    pt3dadd(-16.37, 41.25, 3.5, 0.89)
    pt3dadd(-16.52, 41.41, 3.5, 0.89)
    pt3dadd(-16.68, 41.62, 3.5, 0.89)
    pt3dadd(-16.79, 41.83, 3.5, 0.89)
    pt3dadd(-16.84, 41.99, 3.5, 0.89)
    pt3dadd(-17, 42.14, 3.5, 0.89)
    pt3dadd(-17.1, 42.35, 3.5, 0.89)
    pt3dadd(-17.21, 42.46, 3.5, 0.89)
    pt3dadd(-17.3, 42.67, 3.5, 0.89)
    pt3dadd(-17.36, 42.77, 3.5, 0.89)
    pt3dadd(-17.36, 42.93, 3, 0.89)
    pt3dadd(-17.47, 43.04, 3, 0.89)
    pt3dadd(-17.52, 43.14, 3, 0.89)
    pt3dadd(-17.57, 43.3, 3, 0.89)
    pt3dadd(-17.68, 43.51, 3, 0.89)
    pt3dadd(-17.78, 43.62, 3, 0.89)
    pt3dadd(-17.84, 43.77, 3, 0.89)
    pt3dadd(-17.94, 43.88, 3, 0.89)
    pt3dadd(-17.98, 44.04, 3, 0.89)
    pt3dadd(-18.1, 44.14, 3, 0.89)
    pt3dadd(-18.2, 44.25, 3, 0.89)
    pt3dadd(-18.26, 44.4, 3, 0.89)
    pt3dadd(-18.36, 44.61, 3, 0.89)
    pt3dadd(-18.47, 44.72, 3, 0.89)
    pt3dadd(-18.57, 44.82, 3, 0.89)
    pt3dadd(-18.68, 44.93, 3, 0.89)
    pt3dadd(-18.78, 45.04, 3, 0.89)
    pt3dadd(-18.89, 45.19, 3, 0.89)
    pt3dadd(-18.94, 45.3, 3, 0.89)
    pt3dadd(-19.04, 45.35, 3, 0.89)
    pt3dadd(-19.2, 45.51, 3, 0.89)
    pt3dadd(-19.3, 45.56, 3, 0.89)
    pt3dadd(-19.36, 45.67, 3, 0.89)
    pt3dadd(-19.46, 45.82, 3, 0.89)
    pt3dadd(-19.57, 45.88, 3, 0.89)
    pt3dadd(-19.62, 45.98, 3, 0.89)
    pt3dadd(-19.62, 46.14, 3, 0.89)
    pt3dadd(-19.72, 46.24, 3, 0.89)
    pt3dadd(-19.78, 46.4, 3, 0.89)
    pt3dadd(-19.82, 46.51, 3, 0.89)
    pt3dadd(-19.88, 46.66, 3, 0.89)
    pt3dadd(-19.98, 46.77, 3, 0.89)
    pt3dadd(-20.04, 46.88, 3, 0.89)
    pt3dadd(-20.14, 46.98, 3, 0.89)
    pt3dadd(-20.25, 47.09, 3, 0.89)
    pt3dadd(-20.35, 47.14, 3, 0.89)
    pt3dadd(-20.51, 47.14, 3, 0.89)
    pt3dadd(-20.62, 47.35, 3, 0.89)
    pt3dadd(-20.77, 47.4, 3, 0.89)
    pt3dadd(-20.88, 47.45, 3, 0.89)
    pt3dadd(-20.98, 47.61, 3, 0.89)
    pt3dadd(-21.09, 47.72, 3, 0.89)
    pt3dadd(-21.14, 47.93, 3, 0.89)
    pt3dadd(-21.19, 48.14, 3, 0.89)
    pt3dadd(-21.19, 48.35, 3, 0.89)
    pt3dadd(-21.14, 48.5, 3, 0.89)
    pt3dadd(-21.14, 48.66, 3, 0.89)
    pt3dadd(-21.09, 48.93, 3.5, 0.89)
    pt3dadd(-21.04, 49.19, 3.5, 0.89)
    pt3dadd(-21.04, 49.56, 3.5, 0.89)
    pt3dadd(-20.98, 49.77, 3.5, 0.89)
    pt3dadd(-20.98, 50.24, 3.5, 0.89)
    pt3dadd(-20.93, 50.4, 3.5, 0.89)
    pt3dadd(-20.93, 50.66, 3.5, 0.89)
    pt3dadd(-20.88, 50.87, 3.5, 0.89)
    pt3dadd(-20.88, 51.03, 3.5, 0.89)
  }
}
proc shape3d_16() {
  dend[10] {
    pt3dadd(-20.83, 51.24, 3.5, 0.89)
    pt3dadd(-20.83, 51.61, 3.5, 0.89)
    pt3dadd(-20.88, 51.76, 3.5, 0.89)
    pt3dadd(-20.93, 51.87, 3.5, 0.89)
    pt3dadd(-20.97, 53.21, 2.5, 0.89)
    pt3dadd(-20.91, 53.32, 2.5, 0.89)
    pt3dadd(-20.91, 53.95, 3.5, 0.89)
    pt3dadd(-21.02, 54.06, 3.5, 0.89)
    pt3dadd(-21.07, 54.21, 3.5, 0.89)
    pt3dadd(-21.18, 54.32, 4, 0.89)
    pt3dadd(-21.18, 54.42, 4, 0.89)
    pt3dadd(-21.28, 54.53, 4, 0.89)
    pt3dadd(-21.39, 54.63, 4.5, 0.89)
    pt3dadd(-21.49, 54.69, 4.5, 0.89)
    pt3dadd(-21.65, 54.79, 4.5, 0.89)
    pt3dadd(-21.75, 54.84, 4.5, 0.89)
    pt3dadd(-21.91, 54.95, 4.5, 0.89)
    pt3dadd(-22.02, 55.05, 5, 0.89)
    pt3dadd(-22.12, 55.16, 5, 0.89)
    pt3dadd(-22.23, 55.21, 5, 0.89)
    pt3dadd(-22.28, 55.37, 5, 0.89)
    pt3dadd(-22.38, 55.47, 5, 0.89)
    pt3dadd(-22.54, 55.58, 5, 0.89)
    pt3dadd(-22.59, 55.68, 5, 0.89)
    pt3dadd(-22.7, 55.84, 5, 0.89)
    pt3dadd(-22.75, 56, 5, 0.89)
    pt3dadd(-22.86, 56.16, 5, 0.89)
    pt3dadd(-22.86, 56.32, 5, 0.89)
    pt3dadd(-22.91, 56.53, 5, 0.89)
    pt3dadd(-23.01, 56.79, 5.5, 0.89)
    pt3dadd(-23.01, 57.16, 5.5, 0.89)
    pt3dadd(-23.07, 57.31, 5.5, 0.89)
    pt3dadd(-23.07, 57.63, 5.5, 0.89)
    pt3dadd(-23.12, 57.79, 5.5, 0.89)
    pt3dadd(-23.07, 58, 5.5, 0.89)
    pt3dadd(-23.07, 58.21, 5.5, 0.89)
    pt3dadd(-23.07, 58.58, 5.5, 0.89)
    pt3dadd(-23.12, 58.68, 5.5, 0.89)
    pt3dadd(-23.22, 58.84, 5.5, 0.89)
    pt3dadd(-23.28, 58.94, 5.5, 0.89)
    pt3dadd(-23.33, 59.05, 5.5, 0.89)
    pt3dadd(-23.43, 59.15, 5.5, 0.89)
    pt3dadd(-23.54, 59.26, 6, 0.89)
    pt3dadd(-23.64, 59.36, 6, 0.89)
    pt3dadd(-23.75, 59.42, 6, 0.89)
    pt3dadd(-23.75, 59.52, 6, 0.89)
    pt3dadd(-23.85, 59.68, 6, 0.89)
    pt3dadd(-23.96, 59.84, 6, 0.89)
    pt3dadd(-24.01, 60, 6, 0.89)
    pt3dadd(-24.06, 60.1, 6, 0.89)
    pt3dadd(-24.06, 60.36, 6, 0.89)
    pt3dadd(-24.12, 60.47, 6, 0.89)
    pt3dadd(-24.17, 60.63, 6, 0.89)
    pt3dadd(-24.17, 60.89, 6, 0.89)
    pt3dadd(-24.22, 61.1, 6.5, 0.89)
    pt3dadd(-24.22, 61.47, 6.5, 0.89)
    pt3dadd(-24.27, 61.99, 6.5, 0.89)
    pt3dadd(-24.33, 62.2, 6.5, 0.89)
    pt3dadd(-24.43, 62.47, 6.5, 0.89)
    pt3dadd(-24.48, 62.68, 6.5, 0.89)
    pt3dadd(-24.54, 62.89, 6.5, 0.89)
    pt3dadd(-24.69, 62.99, 6.5, 0.89)
    pt3dadd(-24.69, 63.1, 6.5, 0.89)
    pt3dadd(-24.75, 63.25, 6.5, 0.89)
    pt3dadd(-24.8, 63.36, 6.5, 0.89)
    pt3dadd(-24.85, 63.47, 6.5, 0.89)
    pt3dadd(-24.96, 63.57, 6.5, 0.89)
    pt3dadd(-25.11, 63.68, 6.5, 0.89)
    pt3dadd(-25.17, 63.83, 6.5, 0.89)
    pt3dadd(-25.27, 63.94, 6.5, 0.89)
    pt3dadd(-25.32, 64.04, 6.5, 0.89)
    pt3dadd(-25.38, 64.2, 6.5, 0.89)
    pt3dadd(-25.87, 65.45, 7, 0.89)
    pt3dadd(-25.92, 65.67, 7, 0.89)
    pt3dadd(-25.97, 65.81, 7, 0.89)
    pt3dadd(-26.08, 65.93, 7, 0.89)
    pt3dadd(-26.13, 66.03, 7, 0.89)
    pt3dadd(-26.18, 66.14, 7, 0.89)
    pt3dadd(-26.29, 66.25, 7, 0.89)
    pt3dadd(-26.39, 66.4, 7, 0.89)
    pt3dadd(-26.45, 66.51, 7, 0.89)
    pt3dadd(-26.5, 66.72, 7, 0.89)
    pt3dadd(-26.55, 66.88, 7, 0.89)
    pt3dadd(-26.66, 66.98, 7, 0.89)
    pt3dadd(-26.71, 67.14, 7, 0.89)
    pt3dadd(-26.76, 67.23, 7, 0.89)
    pt3dadd(-26.81, 67.4, 7, 0.89)
    pt3dadd(-26.87, 67.56, 7, 0.89)
    pt3dadd(-26.92, 67.66, 7, 0.89)
    pt3dadd(-26.97, 67.81, 7, 0.89)
    pt3dadd(-27.08, 67.93, 7, 0.89)
    pt3dadd(-27.13, 68.08, 7, 0.89)
    pt3dadd(-27.13, 68.23, 7, 0.89)
    pt3dadd(-27.18, 68.4, 7.5, 0.89)
    pt3dadd(-27.29, 68.61, 7.5, 0.89)
    pt3dadd(-27.34, 68.77, 7.5, 0.89)
    pt3dadd(-27.44, 68.98, 7.5, 0.89)
    pt3dadd(-27.5, 69.08, 7.5, 0.89)
    pt3dadd(-27.44, 69.23, 7.5, 0.89)
    pt3dadd(-27.5, 69.45, 7.5, 0.89)
    pt3dadd(-27.6, 69.56, 7.5, 0.89)
    pt3dadd(-27.65, 69.7, 7.5, 0.89)
    pt3dadd(-27.65, 69.87, 7.5, 0.89)
    pt3dadd(-27.71, 70.03, 7.5, 0.89)
    pt3dadd(-27.71, 70.19, 7.5, 0.89)
    pt3dadd(-27.76, 70.34, 7.5, 0.89)
    pt3dadd(-27.81, 70.5, 7.5, 0.89)
    pt3dadd(-27.81, 70.77, 7.5, 0.89)
    pt3dadd(-27.92, 71.03, 7.5, 0.89)
    pt3dadd(-27.97, 71.29, 7.5, 0.89)
    pt3dadd(-28.02, 71.5, 7.5, 0.89)
    pt3dadd(-28.13, 71.66, 7.5, 0.89)
    pt3dadd(-28.18, 71.87, 7.5, 0.89)
    pt3dadd(-28.28, 71.98, 7.5, 0.89)
    pt3dadd(-28.34, 72.08, 7.5, 0.89)
    pt3dadd(-28.39, 72.23, 7.5, 0.89)
    pt3dadd(-28.44, 72.34, 7.5, 0.89)
    pt3dadd(-28.65, 72.55, 7.5, 0.89)
    pt3dadd(-28.7, 72.66, 7.5, 0.89)
    pt3dadd(-28.76, 72.76, 7.5, 0.89)
    pt3dadd(-28.81, 72.87, 7.5, 0.89)
    pt3dadd(-28.81, 73.08, 7.5, 0.89)
    pt3dadd(-28.91, 73.13, 7.5, 0.89)
    pt3dadd(-28.91, 73.34, 7.5, 0.89)
    pt3dadd(-28.97, 73.55, 7.5, 0.89)
    pt3dadd(-28.97, 73.87, 7.5, 0.89)
    pt3dadd(-29.02, 74.08, 7.5, 0.89)
    pt3dadd(-29.02, 74.87, 7.5, 0.89)
    pt3dadd(-29.07, 75.13, 7.5, 0.89)
    pt3dadd(-29.12, 75.29, 7.5, 0.89)
    pt3dadd(-29.18, 75.44, 7.5, 0.89)
    pt3dadd(-29.18, 75.65, 7.5, 0.89)
    pt3dadd(-29.23, 75.97, 7.5, 0.89)
    pt3dadd(-29.28, 76.08, 7.5, 0.89)
    pt3dadd(-29.33, 76.29, 7.5, 0.89)
    pt3dadd(-29.33, 76.65, 7.5, 0.89)
    pt3dadd(-29.39, 76.81, 7.5, 0.89)
    pt3dadd(-29.39, 76.92, 7.5, 0.89)
    pt3dadd(-28.86, 77.79, 7.5, 0.89)
    pt3dadd(-28.81, 78, 7.5, 0.89)
    pt3dadd(-28.76, 78.16, 7.5, 0.89)
    pt3dadd(-28.76, 78.37, 7.5, 0.89)
    pt3dadd(-28.7, 78.52, 7.5, 0.89)
    pt3dadd(-28.65, 78.68, 8, 0.89)
    pt3dadd(-28.65, 79.05, 8, 0.89)
    pt3dadd(-28.6, 79.26, 8, 0.89)
    pt3dadd(-28.6, 79.73, 8, 0.89)
    pt3dadd(-28.65, 79.89, 8, 0.89)
    pt3dadd(-28.65, 80.15, 8, 0.89)
    pt3dadd(-28.7, 80.36, 8, 0.89)
    pt3dadd(-28.76, 80.52, 8, 0.89)
    pt3dadd(-28.76, 81.09, 8, 0.89)
    pt3dadd(-28.81, 81.26, 8.5, 0.89)
    pt3dadd(-28.81, 81.56, 8.5, 0.89)
    pt3dadd(-28.86, 81.73, 8.5, 0.89)
    pt3dadd(-28.86, 81.94, 8.5, 0.89)
    pt3dadd(-28.91, 82.1, 8.5, 0.89)
    pt3dadd(-28.91, 82.31, 8.5, 0.89)
    pt3dadd(-28.97, 82.47, 8.5, 0.89)
    pt3dadd(-29.02, 82.62, 8.5, 0.89)
    pt3dadd(-29.02, 82.94, 9, 0.89)
    pt3dadd(-29.07, 83.1, 9, 0.89)
    pt3dadd(-29.12, 83.2, 9, 0.89)
    pt3dadd(-29.12, 83.36, 9, 0.89)
    pt3dadd(-29.18, 83.47, 9, 0.89)
    pt3dadd(-29.23, 83.57, 9, 0.89)
    pt3dadd(-29.23, 83.73, 9, 0.89)
    pt3dadd(-29.28, 83.94, 9, 0.89)
    pt3dadd(-29.28, 84.36, 9, 0.89)
    pt3dadd(-29.33, 84.52, 9, 0.89)
    pt3dadd(-29.33, 84.99, 9, 0.89)
    pt3dadd(-29.28, 85.1, 9.5, 0.89)
    pt3dadd(-29.28, 86.3, 9.5, 0.89)
    pt3dadd(-29.33, 86.41, 9.5, 0.89)
    pt3dadd(-29.33, 86.62, 9.5, 0.89)
    pt3dadd(-29.44, 86.94, 9.5, 0.89)
    pt3dadd(-29.49, 87.04, 9.5, 0.89)
    pt3dadd(-29.49, 87.15, 9.5, 0.89)
    pt3dadd(-29.6, 87.2, 9.5, 0.89)
    pt3dadd(-29.65, 87.36, 9.5, 0.89)
    pt3dadd(-29.75, 87.46, 9.5, 0.89)
    pt3dadd(-29.75, 87.67, 9.5, 0.89)
    pt3dadd(-29.86, 87.72, 9.5, 0.89)
    pt3dadd(-29.96, 87.83, 9.5, 0.89)
    pt3dadd(-30.02, 87.93, 9.5, 0.89)
    pt3dadd(-30.12, 88.09, 9.5, 0.89)
    pt3dadd(-30.17, 88.2, 9.5, 0.89)
    pt3dadd(-30.23, 88.3, 9.5, 0.89)
    pt3dadd(-30.33, 88.35, 10, 0.89)
    pt3dadd(-30.44, 88.46, 10, 0.89)
    pt3dadd(-30.54, 88.62, 10, 0.89)
    pt3dadd(-30.54, 89.09, 10, 0.89)
    pt3dadd(-30.44, 89.14, 10, 0.89)
    pt3dadd(-30.33, 89.3, 10, 0.89)
    pt3dadd(-30.23, 89.46, 10, 0.89)
    pt3dadd(-30.17, 89.62, 10, 0.89)
    pt3dadd(-30.07, 89.72, 10, 0.89)
    pt3dadd(-30.08, 91.07, 10, 0.89)
    pt3dadd(-30.08, 91.43, 10, 0.89)
    pt3dadd(-30.13, 91.59, 10, 0.89)
    pt3dadd(-30.13, 91.7, 10, 0.89)
    pt3dadd(-30.18, 91.8, 10, 0.89)
    pt3dadd(-30.29, 91.86, 10, 0.89)
    pt3dadd(-30.29, 92.01, 10, 0.89)
    pt3dadd(-30.39, 92.17, 10.5, 0.89)
    pt3dadd(-30.5, 92.38, 10.5, 0.89)
    pt3dadd(-30.55, 92.54, 10.5, 0.89)
    pt3dadd(-30.6, 92.64, 10.5, 0.89)
    pt3dadd(-30.65, 92.8, 10.5, 0.89)
    pt3dadd(-30.71, 92.91, 10.5, 0.89)
    pt3dadd(-30.71, 93.12, 10.5, 0.89)
    pt3dadd(-30.76, 93.33, 10.5, 0.89)
    pt3dadd(-30.65, 93.64, 10.5, 0.89)
    pt3dadd(-30.5, 93.96, 10.5, 0.89)
    pt3dadd(-30.39, 94.17, 10.5, 0.89)
    pt3dadd(-30.34, 94.33, 10.5, 0.89)
    pt3dadd(-30.23, 94.43, 11, 0.89)
    pt3dadd(-30.18, 94.59, 11, 0.89)
    pt3dadd(-30.13, 94.8, 11, 0.89)
    pt3dadd(-30.02, 94.96, 11, 0.89)
    pt3dadd(-30.02, 95.38, 11, 0.89)
    pt3dadd(-29.97, 95.54, 11, 0.89)
    pt3dadd(-30.02, 95.75, 11, 0.89)
    pt3dadd(-30.08, 95.9, 11, 0.89)
    pt3dadd(-30.08, 96.11, 11, 0.89)
    pt3dadd(-30.18, 96.17, 11.5, 0.89)
    pt3dadd(-30.29, 96.27, 11.5, 0.89)
    pt3dadd(-30.34, 96.48, 11.5, 0.89)
    pt3dadd(-30.44, 96.53, 11.5, 0.89)
    pt3dadd(-30.55, 96.64, 11.5, 0.89)
    pt3dadd(-30.55, 96.85, 11.5, 0.89)
    pt3dadd(-30.65, 97.01, 11.5, 0.89)
    pt3dadd(-30.71, 97.11, 11.5, 0.89)
    pt3dadd(-30.76, 97.22, 11.5, 0.89)
    pt3dadd(-30.81, 97.38, 11.5, 0.89)
    pt3dadd(-30.92, 97.43, 11.5, 0.89)
    pt3dadd(-31.07, 97.59, 11.5, 0.89)
    pt3dadd(-31.18, 97.74, 11.5, 0.89)
    pt3dadd(-31.28, 97.9, 11.5, 0.89)
    pt3dadd(-31.39, 98.01, 11.5, 0.89)
    pt3dadd(-31.49, 98.11, 11.5, 0.89)
    pt3dadd(-31.55, 98.22, 11.5, 0.89)
    pt3dadd(-31.65, 98.37, 11.5, 0.89)
    pt3dadd(-31.76, 98.48, 11.5, 0.89)
    pt3dadd(-31.86, 98.53, 12, 0.89)
    pt3dadd(-31.97, 98.74, 12, 0.89)
    pt3dadd(-32.07, 98.9, 12, 0.89)
    pt3dadd(-32.18, 99.06, 12, 0.89)
    pt3dadd(-32.28, 99.16, 12, 0.89)
  }
}
proc shape3d_17() {
  dend[10] {
    pt3dadd(-32.44, 99.37, 12, 0.89)
    pt3dadd(-32.49, 99.48, 12, 0.89)
    pt3dadd(-32.54, 99.58, 12, 0.89)
    pt3dadd(-32.65, 99.74, 12, 0.89)
    pt3dadd(-32.81, 99.9, 12, 0.89)
    pt3dadd(-32.86, 100, 12, 0.89)
    pt3dadd(-32.9, 100.21, 12.5, 0.89)
    pt3dadd(-32.96, 100.37, 12.5, 0.89)
    pt3dadd(-33.02, 100.58, 12.5, 0.89)
    pt3dadd(-33.02, 100.95, 12.5, 0.89)
    pt3dadd(-33.07, 101.84, 12.5, 0.89)
    pt3dadd(-33.17, 101.95, 12.5, 0.89)
    pt3dadd(-34.19, 102.61, 13, 0.89)
    pt3dadd(-34.24, 102.77, 13.5, 0.89)
    pt3dadd(-34.29, 102.93, 13.5, 0.89)
    pt3dadd(-34.4, 102.98, 13.5, 0.89)
    pt3dadd(-34.45, 103.09, 13.5, 0.89)
    pt3dadd(-34.56, 103.25, 13.5, 0.89)
    pt3dadd(-34.65, 103.3, 13.5, 0.89)
    pt3dadd(-34.77, 103.35, 13.5, 0.89)
    pt3dadd(-34.86, 103.4, 13.5, 0.89)
    pt3dadd(-34.92, 103.46, 14, 0.89)
    pt3dadd(-34.97, 103.56, 14, 0.89)
    pt3dadd(-35.13, 103.56, 14, 0.89)
    pt3dadd(-35.19, 103.77, 14, 0.89)
    pt3dadd(-35.29, 103.77, 14, 0.89)
    pt3dadd(-35.4, 103.88, 14, 0.89)
    pt3dadd(-35.5, 103.98, 14, 0.89)
    pt3dadd(-35.5, 104.3, 14, 0.89)
    pt3dadd(-35.61, 104.4, 14, 0.89)
    pt3dadd(-35.65, 104.56, 14, 0.89)
    pt3dadd(-35.65, 104.82, 14, 0.89)
    pt3dadd(-35.71, 104.93, 14, 0.89)
    pt3dadd(-35.71, 105.35, 14, 0.89)
    pt3dadd(-35.71, 105.51, 14.5, 0.89)
    pt3dadd(-35.76, 105.72, 14.5, 0.89)
    pt3dadd(-35.71, 105.87, 14.5, 0.89)
    pt3dadd(-35.71, 106.29, 14.5, 0.89)
    pt3dadd(-35.65, 106.56, 14.5, 0.89)
    pt3dadd(-35.65, 107.03, 14.5, 0.89)
    pt3dadd(-35.61, 107.24, 14.5, 0.89)
    pt3dadd(-35.61, 107.4, 14.5, 0.89)
    pt3dadd(-35.54, 107.61, 14.5, 0.89)
    pt3dadd(-35.45, 107.77, 14.5, 0.89)
    pt3dadd(-35.45, 107.98, 14.5, 0.89)
    pt3dadd(-35.4, 108.24, 14.5, 0.89)
    pt3dadd(-35.4, 108.4, 15, 0.89)
    pt3dadd(-35.34, 108.5, 15, 0.89)
    pt3dadd(-35.34, 109.4, 15, 0.89)
    pt3dadd(-35.45, 109.45, 15, 0.89)
    pt3dadd(-35.54, 109.61, 15, 0.89)
    pt3dadd(-35.61, 109.76, 15, 0.89)
    pt3dadd(-35.76, 109.92, 15, 0.89)
    pt3dadd(-35.82, 110.03, 15, 0.89)
    pt3dadd(-35.92, 110.08, 15, 0.89)
    pt3dadd(-35.97, 110.18, 15, 0.89)
    pt3dadd(-36.08, 110.29, 15, 0.89)
    pt3dadd(-36.18, 110.39, 15, 0.89)
    pt3dadd(-36.18, 110.5, 15.5, 0.89)
    pt3dadd(-36.34, 110.66, 15.5, 0.89)
    pt3dadd(-36.34, 110.87, 15.5, 0.89)
    pt3dadd(-36.39, 110.97, 15.5, 0.89)
    pt3dadd(-36.5, 111.03, 15.5, 0.89)
    pt3dadd(-36.5, 111.18, 15.5, 0.89)
    pt3dadd(-36.5, 111.92, 15.5, 0.89)
    pt3dadd(-36.45, 112.02, 15.5, 0.89)
    pt3dadd(-36.45, 112.71, 15.5, 0.89)
    pt3dadd(-36.39, 112.92, 15.5, 0.89)
    pt3dadd(-36.34, 113.08, 15.5, 0.89)
    pt3dadd(-36.34, 113.65, 15.5, 0.89)
    pt3dadd(-37.08, 115.34, 15.5, 0.89)
    pt3dadd(-37.03, 115.5, 15, 0.89)
    pt3dadd(-37.03, 116.02, 15, 0.89)
    pt3dadd(-37.08, 116.23, 15, 0.89)
    pt3dadd(-37.13, 116.34, 15, 0.89)
    pt3dadd(-37.18, 116.5, 15, 0.89)
    pt3dadd(-37.29, 116.65, 15, 0.89)
    pt3dadd(-37.34, 116.76, 15, 0.89)
    pt3dadd(-37.39, 116.86, 15.5, 0.89)
    pt3dadd(-37.45, 116.97, 15.5, 0.89)
    pt3dadd(-37.54, 117.18, 15.5, 0.89)
    pt3dadd(-37.6, 117.34, 15.5, 0.89)
    pt3dadd(-37.71, 117.44, 15.5, 0.89)
    pt3dadd(-37.76, 117.6, 15.5, 0.89)
    pt3dadd(-37.86, 117.76, 15.5, 0.89)
    pt3dadd(-37.92, 117.86, 15.5, 0.89)
    pt3dadd(-38.02, 117.92, 16, 0.89)
    pt3dadd(-38.08, 118.02, 16, 0.89)
    pt3dadd(-38.18, 118.13, 16, 0.89)
    pt3dadd(-38.22, 118.28, 16, 0.89)
    pt3dadd(-38.34, 118.39, 16, 0.89)
    pt3dadd(-38.44, 118.6, 16, 0.89)
    pt3dadd(-38.54, 118.76, 16.5, 0.89)
    pt3dadd(-38.71, 118.91, 16.5, 0.89)
    pt3dadd(-38.86, 119.12, 16.5, 0.89)
    pt3dadd(-38.92, 119.23, 16.5, 0.89)
    pt3dadd(-39.02, 119.34, 16.5, 0.89)
    pt3dadd(-39.07, 119.49, 16.5, 0.89)
    pt3dadd(-39.22, 119.6, 16.5, 0.89)
    pt3dadd(-39.28, 119.7, 16.5, 0.89)
    pt3dadd(-39.34, 119.86, 16.5, 0.89)
    pt3dadd(-39.39, 120.02, 16.5, 0.89)
    pt3dadd(-39.49, 120.12, 16.5, 0.89)
    pt3dadd(-39.6, 120.28, 16.5, 0.89)
    pt3dadd(-39.7, 120.49, 16.5, 0.89)
    pt3dadd(-39.76, 120.6, 16.5, 0.89)
    pt3dadd(-39.86, 120.75, 16.5, 0.89)
    pt3dadd(-39.97, 120.91, 16.5, 0.89)
    pt3dadd(-40.02, 121.12, 16.5, 0.89)
    pt3dadd(-40.07, 121.18, 16, 0.89)
    pt3dadd(-40.18, 121.28, 16, 0.89)
    pt3dadd(-40.22, 121.39, 16, 0.89)
    pt3dadd(-40.28, 121.49, 16, 0.89)
    pt3dadd(-40.39, 121.65, 16, 0.89)
    pt3dadd(-40.44, 121.81, 16, 0.89)
    pt3dadd(-40.65, 122.02, 16, 0.89)
    pt3dadd(-40.75, 122.12, 16, 0.89)
    pt3dadd(-40.81, 122.28, 16, 0.89)
    pt3dadd(-40.9, 122.44, 15.5, 0.89)
    pt3dadd(-41.02, 122.54, 15.5, 0.89)
    pt3dadd(-41.07, 122.7, 15.5, 0.89)
    pt3dadd(-41.12, 122.8, 15.5, 0.89)
    pt3dadd(-41.12, 122.96, 15.5, 0.89)
    pt3dadd(-41.23, 123.07, 15.5, 0.89)
    pt3dadd(-41.33, 123.23, 15.5, 0.89)
    pt3dadd(-41.38, 123.44, 15.5, 0.89)
    pt3dadd(-41.49, 123.59, 15.5, 0.89)
    pt3dadd(-41.54, 123.7, 15.5, 0.89)
    pt3dadd(-41.65, 123.8, 15.5, 0.89)
    pt3dadd(-41.65, 123.91, 15.5, 0.89)
    pt3dadd(-41.7, 124.01, 15.5, 0.89)
    pt3dadd(-41.75, 124.17, 15.5, 0.89)
    pt3dadd(-41.8, 124.28, 15.5, 0.89)
    pt3dadd(-41.86, 124.38, 15.5, 0.89)
    pt3dadd(-41.86, 124.49, 15.5, 0.89)
    pt3dadd(-41.91, 124.59, 15.5, 0.89)
    pt3dadd(-42.01, 124.8, 15.5, 0.89)
    pt3dadd(-42.12, 125.07, 15.5, 0.89)
    pt3dadd(-42.22, 125.28, 15.5, 0.89)
    pt3dadd(-42.33, 125.43, 15.5, 0.89)
    pt3dadd(-42.43, 125.64, 15.5, 0.89)
    pt3dadd(-42.54, 125.75, 15.5, 0.89)
    pt3dadd(-42.59, 125.91, 15.5, 0.89)
    pt3dadd(-42.64, 126.01, 15.5, 0.89)
  }
  dend[11] {pt3dclear()
    pt3dadd(-42.64, 126.01, 15.5, 0.89)
    pt3dadd(-44.17, 126.92, 15, 0.89)
    pt3dadd(-44.22, 127.03, 15, 0.89)
    pt3dadd(-44.22, 127.29, 15, 0.89)
    pt3dadd(-44.27, 127.5, 15, 0.89)
    pt3dadd(-44.32, 127.66, 15, 0.89)
    pt3dadd(-44.32, 127.87, 15, 0.89)
    pt3dadd(-44.38, 127.98, 16, 0.89)
    pt3dadd(-44.43, 128.08, 16, 0.89)
    pt3dadd(-44.48, 128.24, 16, 0.89)
    pt3dadd(-44.53, 128.4, 16, 0.89)
    pt3dadd(-44.59, 128.5, 16, 0.89)
    pt3dadd(-44.64, 128.66, 16, 0.89)
    pt3dadd(-44.69, 128.76, 16, 0.89)
    pt3dadd(-44.8, 128.91, 16, 0.89)
    pt3dadd(-44.85, 129.08, 16, 0.89)
    pt3dadd(-44.95, 129.18, 16, 0.89)
    pt3dadd(-45.06, 129.44, 16.5, 0.89)
    pt3dadd(-45.16, 129.55, 16.5, 0.89)
    pt3dadd(-45.27, 129.71, 16.5, 0.89)
    pt3dadd(-45.43, 129.91, 16.5, 0.89)
    pt3dadd(-45.69, 130.18, 16.5, 0.89)
    pt3dadd(-45.79, 130.29, 16.5, 0.89)
    pt3dadd(-45.9, 130.44, 16.5, 0.89)
    pt3dadd(-46, 130.6, 16.5, 0.89)
    pt3dadd(-46.11, 130.76, 16.5, 0.89)
    pt3dadd(-46.21, 130.87, 16.5, 0.89)
    pt3dadd(-46.32, 131.02, 16.5, 0.89)
    pt3dadd(-46.42, 131.13, 16.5, 0.89)
    pt3dadd(-46.48, 131.34, 16.5, 0.89)
    pt3dadd(-46.69, 131.44, 16.5, 0.89)
    pt3dadd(-46.69, 131.6, 16.5, 0.89)
    pt3dadd(-46.79, 131.71, 16.5, 0.89)
    pt3dadd(-46.9, 131.81, 16.5, 0.89)
    pt3dadd(-47.05, 131.97, 16.5, 0.89)
    pt3dadd(-47.05, 132.13, 16.5, 0.89)
    pt3dadd(-47.21, 132.22, 16.5, 0.89)
    pt3dadd(-47.32, 132.34, 16.5, 0.89)
    pt3dadd(-47.47, 132.44, 16.5, 0.89)
    pt3dadd(-47.63, 132.55, 16.5, 0.89)
    pt3dadd(-47.74, 132.65, 16.5, 0.89)
    pt3dadd(-47.84, 132.86, 16.5, 0.89)
    pt3dadd(-47.89, 132.97, 16.5, 0.89)
    pt3dadd(-48, 132.97, 16.5, 0.89)
    pt3dadd(-48.16, 133.18, 17, 0.89)
    pt3dadd(-48.31, 133.34, 17, 0.89)
    pt3dadd(-48.42, 133.38, 17, 0.89)
    pt3dadd(-48.52, 133.55, 17, 0.89)
    pt3dadd(-48.68, 133.65, 17, 0.89)
    pt3dadd(-48.84, 133.81, 17, 0.89)
    pt3dadd(-48.84, 133.97, 17, 0.89)
    pt3dadd(-48.89, 134.13, 17, 0.89)
    pt3dadd(-49, 134.18, 17, 0.89)
    pt3dadd(-49.1, 134.28, 17, 0.89)
    pt3dadd(-49.26, 134.38, 17, 0.89)
    pt3dadd(-49.41, 134.44, 17, 0.89)
    pt3dadd(-49.52, 134.55, 17, 0.89)
    pt3dadd(-49.68, 134.65, 17, 0.89)
    pt3dadd(-49.78, 134.69, 17, 0.89)
    pt3dadd(-49.89, 134.81, 17, 0.89)
    pt3dadd(-49.99, 134.86, 17, 0.89)
    pt3dadd(-50.04, 135.02, 17, 0.89)
    pt3dadd(-50.2, 135.07, 17, 0.89)
    pt3dadd(-50.31, 135.18, 17, 0.89)
    pt3dadd(-50.46, 135.22, 17, 0.89)
  }
  dend[12] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-3.43, -0.77, 0.5, 0.94)
    pt3dadd(-3.43, -0.62, 0.5, 0.94)
    pt3dadd(-3.59, -0.62, 0.5, 0.94)
    pt3dadd(-3.7, -0.51, 0.5, 0.94)
    pt3dadd(-3.85, -0.46, 0.5, 0.94)
    pt3dadd(-4.01, -0.35, 0.5, 0.94)
    pt3dadd(-4.12, -0.25, 0.5, 0.94)
    pt3dadd(-4.33, -0.09, 0.5, 0.94)
    pt3dadd(-4.63, -0.09, 0.5, 0.94)
    pt3dadd(-4.75, -0.04, 0.5, 0.94)
    pt3dadd(-4.84, -0.09, 0.5, 0.94)
    pt3dadd(-5.11, -0.09, 0.5, 0.94)
    pt3dadd(-5.22, -0.14, 0.5, 0.94)
    pt3dadd(-5.32, -0.14, 0.5, 0.94)
    pt3dadd(-5.48, -0.25, 0.5, 0.94)
    pt3dadd(-5.59, -0.35, 0.5, 0.94)
    pt3dadd(-5.74, -0.41, 0.5, 0.94)
    pt3dadd(-5.9, -0.51, 0.5, 0.94)
    pt3dadd(-6.06, -0.56, 0.5, 0.94)
    pt3dadd(-6.11, -0.67, 0.5, 0.94)
    pt3dadd(-6.22, -0.77, 0.5, 0.94)
    pt3dadd(-6.43, -0.93, 0.5, 0.94)
    pt3dadd(-6.43, -1.13, 0.5, 0.94)
    pt3dadd(-6.48, -1.35, 0.5, 0.94)
    pt3dadd(-6.64, -1.51, 0.5, 0.94)
  }
  dend[13] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-1.6, -3.61, 1, 1.05)
    pt3dadd(-1.81, -3.61, 1, 1.05)
    pt3dadd(-1.91, -3.67, 1, 1.05)
    pt3dadd(-2.02, -3.72, 1, 1.05)
    pt3dadd(-2.12, -3.82, 1, 1.05)
    pt3dadd(-2.17, -3.93, 1, 1.05)
    pt3dadd(-2.27, -4.03, 1, 1.05)
    pt3dadd(-2.44, -4.19, 1, 1.05)
    pt3dadd(-2.49, -4.3, 1, 1.05)
    pt3dadd(-2.59, -4.45, 1, 1.05)
    pt3dadd(-2.7, -4.66, 1, 1.05)
    pt3dadd(-2.75, -4.82, 1, 1.05)
    pt3dadd(-2.8, -4.93, 1, 1.05)
  }
}
proc shape3d_18() {
  dend[13] {
    pt3dadd(-2.91, -5.08, 1, 1.05)
    pt3dadd(-2.91, -5.72, 1, 1.05)
    pt3dadd(-2.96, -5.93, 1, 1.05)
    pt3dadd(-2.96, -6.08, 1, 1.05)
    pt3dadd(-3.01, -6.29, 1, 1.05)
    pt3dadd(-3.12, -6.5, 1, 1.05)
    pt3dadd(-3.12, -6.87, 1, 1.05)
    pt3dadd(-3.17, -6.98, 1, 1.05)
    pt3dadd(-3.17, -7.19, 1, 1.05)
    pt3dadd(-3.12, -7.29, 1, 1.05)
    pt3dadd(-3.12, -7.45, 1, 1.05)
    pt3dadd(-3.07, -7.66, 1, 1.05)
    pt3dadd(-3.01, -7.82, 1, 1.05)
    pt3dadd(-2.91, -8.02, 1, 1.05)
    pt3dadd(-2.91, -8.24, 1, 1.05)
    pt3dadd(-2.86, -8.4, 1, 1.05)
    pt3dadd(-2.75, -8.5, 1, 1.05)
    pt3dadd(-2.65, -8.61, 1, 1.05)
    pt3dadd(-2.65, -8.82, 1, 1.05)
    pt3dadd(-2.54, -9.02, 1, 1.05)
    pt3dadd(-2.49, -9.13, 1, 1.05)
    pt3dadd(-2.38, -9.24, 1.5, 1.05)
    pt3dadd(-2.38, -9.44, 1.5, 1.05)
    pt3dadd(-2.27, -9.44, 1.5, 1.05)
    pt3dadd(-2.23, -9.61, 1.5, 1.05)
    pt3dadd(-2.23, -9.71, 1.5, 1.05)
    pt3dadd(-2.12, -9.82, 1.5, 1.05)
    pt3dadd(-2.06, -10.08, 1.5, 1.05)
    pt3dadd(-1.96, -10.08, 1.5, 1.05)
  }
  dend[14] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(0.03, -3.77, 1.5, 1)
    pt3dadd(0.08, -3.93, 1.5, 1)
    pt3dadd(0.08, -4.61, 1.5, 1)
    pt3dadd(0.13, -4.72, 1.5, 1)
    pt3dadd(0.13, -4.87, 1.5, 1)
    pt3dadd(0.08, -5.03, 1.5, 1)
    pt3dadd(0.03, -5.24, 1, 1)
    pt3dadd(0.03, -5.51, 1, 1)
    pt3dadd(-0.02, -5.66, 1, 1)
    pt3dadd(-0.02, -5.98, 1, 1)
    pt3dadd(0.03, -6.14, 1, 1)
    pt3dadd(0.03, -6.5, 1, 1)
    pt3dadd(0.08, -6.66, 1, 1)
    pt3dadd(0.13, -6.87, 1, 1)
    pt3dadd(0.19, -7.03, 0.5, 1)
    pt3dadd(0.19, -7.35, 0.5, 1)
    pt3dadd(0.24, -7.5, 0.5, 1)
    pt3dadd(0.45, -7.61, 0.5, 1)
    pt3dadd(0.5, -7.71, 0.5, 1)
    pt3dadd(0.61, -7.82, 0.5, 1)
    pt3dadd(0.66, -7.98, 0.5, 1)
    pt3dadd(0.66, -8.19, 0.5, 1)
    pt3dadd(0.76, -8.24, 0.5, 1)
    pt3dadd(0.76, -8.4, 0.5, 1)
    pt3dadd(0.82, -8.5, 0.5, 1)
    pt3dadd(0.92, -8.66, 0.5, 1)
    pt3dadd(0.97, -8.82, 0.5, 1)
    pt3dadd(1.03, -8.86, 0, 1)
    pt3dadd(1.08, -9.02, 0, 1)
    pt3dadd(1.12, -9.18, 0, 1)
    pt3dadd(1.24, -9.4, 0, 1)
    pt3dadd(1.24, -9.61, 0, 1)
    pt3dadd(1.34, -9.66, 0, 1)
    pt3dadd(1.34, -10.13, 0, 1)
    pt3dadd(1.39, -10.29, 0, 1)
    pt3dadd(1.45, -10.5, 0, 1)
    pt3dadd(1.5, -10.66, 0, 1)
    pt3dadd(1.6, -10.76, -0.5, 1)
    pt3dadd(1.66, -10.92, -0.5, 1)
    pt3dadd(1.71, -11.13, -0.5, 1)
    pt3dadd(1.76, -11.24, -0.5, 1)
    pt3dadd(1.81, -11.39, -0.5, 1)
    pt3dadd(1.81, -11.5, -0.5, 1)
    pt3dadd(1.87, -11.6, -0.5, 1)
    pt3dadd(1.87, -11.97, -1, 1)
    pt3dadd(1.92, -12.08, -1, 1)
    pt3dadd(1.92, -12.34, -1, 1)
    pt3dadd(1.97, -12.44, -1, 1)
    pt3dadd(1.97, -13.08, -1, 1)
    pt3dadd(1.92, -13.29, -1, 1)
    pt3dadd(1.87, -13.44, -1, 1)
    pt3dadd(2.17, -14.38, -1, 0.89)
    pt3dadd(2.17, -14.54, -1, 0.89)
    pt3dadd(2.23, -14.7, -1, 0.89)
    pt3dadd(2.27, -14.8, -1, 0.89)
    pt3dadd(2.27, -14.91, -1, 0.89)
    pt3dadd(2.38, -15.01, -1, 0.89)
    pt3dadd(2.38, -15.17, -1, 0.89)
    pt3dadd(2.54, -15.28, -1, 0.89)
    pt3dadd(2.59, -15.38, -1, 0.89)
    pt3dadd(2.65, -15.54, -1, 0.89)
    pt3dadd(2.75, -15.65, -1, 0.89)
    pt3dadd(2.86, -15.75, -1, 0.89)
    pt3dadd(2.96, -15.86, -1.5, 0.89)
    pt3dadd(3.07, -15.96, -1.5, 0.89)
    pt3dadd(3.12, -16.12, -1.5, 0.89)
    pt3dadd(3.22, -16.22, -1.5, 0.89)
    pt3dadd(3.38, -16.38, -1.5, 0.89)
    pt3dadd(3.49, -16.48, -1.5, 0.89)
    pt3dadd(3.59, -16.59, -1.5, 0.89)
    pt3dadd(3.7, -16.75, -1.5, 0.89)
    pt3dadd(3.7, -17.48, -2, 0.89)
    pt3dadd(3.64, -17.7, -2, 0.89)
    pt3dadd(3.64, -17.85, -2, 0.89)
    pt3dadd(3.64, -17.96, -2, 0.89)
    pt3dadd(3.7, -18.22, -2, 0.89)
    pt3dadd(3.7, -18.59, -2, 0.89)
    pt3dadd(3.8, -18.85, -2.5, 0.89)
    pt3dadd(3.91, -18.96, -2.5, 0.89)
    pt3dadd(3.91, -19.22, -2.5, 0.89)
    pt3dadd(4.01, -19.38, -2.5, 0.89)
    pt3dadd(4.01, -19.54, -2.5, 0.89)
    pt3dadd(4.05, -19.69, -2.5, 0.89)
    pt3dadd(4.12, -19.89, -2.5, 0.89)
    pt3dadd(4.17, -20.01, -2.5, 0.89)
    pt3dadd(4.12, -20.17, -3, 0.89)
    pt3dadd(4.17, -20.38, -3, 0.89)
    pt3dadd(4.17, -20.64, -3, 0.89)
    pt3dadd(4.12, -20.8, -3, 0.89)
    pt3dadd(4.12, -21.01, -3, 0.89)
    pt3dadd(4.05, -21.17, -3, 0.89)
    pt3dadd(4.12, -21.38, -3, 0.89)
    pt3dadd(4.17, -21.48, -3, 0.89)
    pt3dadd(4.17, -21.85, -3, 0.89)
    pt3dadd(4.22, -21.95, -3, 0.89)
    pt3dadd(4.17, -22.11, -3, 0.89)
    pt3dadd(4.17, -22.32, -3, 0.89)
  }
  dend[15] {pt3dclear()
    pt3dadd(4.17, -22.32, -3, 0.89)
    pt3dadd(4.33, -23.25, -3, 0.89)
    pt3dadd(4.33, -23.72, -3, 0.89)
    pt3dadd(4.38, -23.93, -3, 0.89)
    pt3dadd(4.38, -24.2, -3, 0.89)
    pt3dadd(4.43, -24.41, -3, 0.89)
    pt3dadd(4.54, -24.51, -3, 0.89)
    pt3dadd(4.59, -24.67, -3, 0.89)
    pt3dadd(4.7, -24.88, -3, 0.89)
    pt3dadd(4.75, -25.04, -3, 0.89)
    pt3dadd(4.8, -25.14, -3.5, 0.89)
    pt3dadd(4.8, -25.25, -3.5, 0.89)
    pt3dadd(4.84, -25.46, -3.5, 0.89)
    pt3dadd(4.91, -25.56, -3.5, 0.89)
    pt3dadd(4.96, -25.77, -3.5, 0.89)
    pt3dadd(5.01, -25.93, -3.5, 0.89)
    pt3dadd(5.01, -26.14, -3.5, 0.89)
    pt3dadd(5.05, -26.3, -3.5, 0.89)
    pt3dadd(5.05, -26.51, -3.5, 0.89)
    pt3dadd(5.17, -26.61, -3.5, 0.89)
    pt3dadd(5.17, -26.98, -3.5, 0.89)
    pt3dadd(5.22, -27.19, -3.5, 0.89)
    pt3dadd(5.33, -27.3, -4, 0.89)
    pt3dadd(5.38, -27.46, -4, 0.89)
    pt3dadd(5.43, -27.67, -4, 0.89)
    pt3dadd(5.43, -27.93, -4, 0.89)
    pt3dadd(5.48, -28.09, -4, 0.89)
    pt3dadd(5.54, -28.3, -4, 0.89)
    pt3dadd(5.54, -28.56, -4, 0.89)
    pt3dadd(5.64, -28.82, -4, 0.89)
    pt3dadd(5.64, -29.03, -4, 0.89)
    pt3dadd(5.69, -29.19, -4, 0.89)
    pt3dadd(5.75, -29.4, -4, 0.89)
    pt3dadd(5.8, -29.56, -4, 0.89)
    pt3dadd(5.8, -29.72, -4, 0.89)
    pt3dadd(5.9, -29.87, -4, 0.89)
    pt3dadd(5.9, -30.08, -4.5, 0.89)
    pt3dadd(5.96, -30.29, -4.5, 0.89)
    pt3dadd(6.01, -30.4, -4.5, 0.89)
    pt3dadd(6.01, -30.66, -4.5, 0.89)
    pt3dadd(6.06, -30.82, -4.5, 0.89)
    pt3dadd(6.06, -31.03, -4.5, 0.89)
    pt3dadd(6.11, -31.4, -4.5, 0.89)
    pt3dadd(6.17, -31.56, -4.5, 0.89)
    pt3dadd(6.17, -31.82, -4.5, 0.89)
    pt3dadd(6.22, -32.03, -4.5, 0.89)
    pt3dadd(6.27, -32.19, -4.5, 0.89)
    pt3dadd(6.27, -32.86, -5, 0.89)
    pt3dadd(6.22, -32.97, -5, 0.89)
  }
  dend[16] {pt3dclear()
    pt3dadd(6.22, -32.97, -5, 0.89)
    pt3dadd(5.17, -34.34, -5, 0.89)
    pt3dadd(5.17, -34.34, -5.5, 0.89)
    pt3dadd(4.72, -35.22, -6, 0.89)
    pt3dadd(4.67, -35.33, -6, 0.89)
    pt3dadd(4.57, -35.39, -6, 0.89)
    pt3dadd(4.41, -35.6, -6, 0.89)
    pt3dadd(4.25, -35.81, -6, 0.89)
    pt3dadd(4.2, -35.9, -6, 0.89)
    pt3dadd(4.09, -36.07, -6.5, 0.89)
    pt3dadd(4.04, -36.28, -6.5, 0.89)
    pt3dadd(3.99, -36.28, -7, 0.89)
    pt3dadd(3.99, -36.44, -7, 0.89)
    pt3dadd(3.88, -36.6, -7, 0.89)
    pt3dadd(3.83, -36.81, -7, 0.89)
    pt3dadd(3.78, -36.9, -7, 0.89)
    pt3dadd(3.73, -37.11, -7, 0.89)
    pt3dadd(3.57, -37.38, -7, 0.89)
    pt3dadd(3.46, -37.49, -7, 0.89)
    pt3dadd(3.31, -37.54, -7, 0.89)
    pt3dadd(3.15, -37.65, -7.5, 0.89)
    pt3dadd(2.99, -37.75, -7.5, 0.89)
    pt3dadd(2.94, -37.86, -7.5, 0.89)
    pt3dadd(2.78, -37.96, -7.5, 0.89)
    pt3dadd(2.62, -38.07, -7.5, 0.89)
    pt3dadd(2.41, -38.17, -7.5, 0.89)
    pt3dadd(2.31, -38.28, -7.5, 0.89)
    pt3dadd(2.15, -38.33, -7.5, 0.89)
    pt3dadd(1.99, -38.38, -7.5, 0.89)
    pt3dadd(1.78, -38.38, -8, 0.89)
    pt3dadd(1.63, -38.54, -8, 0.89)
    pt3dadd(1.52, -38.54, -8, 0.89)
    pt3dadd(1.31, -38.65, -8, 0.89)
    pt3dadd(1.21, -38.7, -8, 0.89)
    pt3dadd(1.05, -38.75, -8, 0.89)
    pt3dadd(0.94, -38.75, -8, 0.89)
    pt3dadd(0.79, -38.86, -8, 0.89)
    pt3dadd(0.63, -38.96, -8, 0.89)
    pt3dadd(0.52, -39.07, -8, 0.89)
    pt3dadd(0.42, -39.22, -8, 0.89)
    pt3dadd(0.37, -39.38, -8, 0.89)
    pt3dadd(0.26, -39.49, -8, 0.89)
    pt3dadd(0.05, -39.59, -8, 0.89)
    pt3dadd(0, -39.75, -8, 0.89)
    pt3dadd(-0.1, -39.85, -8, 0.89)
    pt3dadd(-0.16, -39.96, -8, 0.89)
    pt3dadd(-0.21, -40.11, -8, 0.89)
    pt3dadd(-0.31, -40.17, -8, 0.89)
    pt3dadd(-0.42, -40.33, -8.5, 0.89)
    pt3dadd(-0.63, -40.54, -8.5, 0.89)
    pt3dadd(-1, -40.9, -8.5, 0.89)
    pt3dadd(-1.1, -40.96, -8.5, 0.89)
    pt3dadd(-1.21, -41.01, -8.5, 0.89)
    pt3dadd(-1.52, -41.33, -8.5, 0.89)
    pt3dadd(-1.57, -41.43, -8.5, 0.89)
    pt3dadd(-1.73, -41.59, -8.5, 0.89)
    pt3dadd(-1.84, -41.75, -8.5, 0.89)
    pt3dadd(-1.94, -41.85, -8.5, 0.89)
    pt3dadd(-1.99, -42.01, -8.5, 0.89)
    pt3dadd(-2.15, -42.33, -8.5, 0.89)
    pt3dadd(-2.31, -42.38, -8.5, 0.89)
    pt3dadd(-2.47, -42.54, -8.5, 0.89)
    pt3dadd(-2.47, -42.75, -8.5, 0.89)
    pt3dadd(-2.62, -42.96, -8.5, 0.89)
    pt3dadd(-2.68, -43.11, -8.5, 0.89)
    pt3dadd(-2.83, -43.27, -8.5, 0.89)
    pt3dadd(-2.94, -43.38, -8.5, 0.89)
    pt3dadd(-3.04, -43.48, -8.5, 0.89)
    pt3dadd(-3.1, -43.64, -8.5, 0.89)
    pt3dadd(-3.2, -43.74, -8.5, 0.89)
    pt3dadd(-3.31, -43.85, -8.5, 0.89)
    pt3dadd(-3.36, -44.01, -8.5, 0.89)
    pt3dadd(-3.46, -44.11, -8.5, 0.89)
  }
}
proc shape3d_19() {
  dend[16] {
    pt3dadd(-3.57, -44.22, -8.5, 0.89)
    pt3dadd(-3.67, -44.32, -8.5, 0.89)
    pt3dadd(-3.83, -44.43, -8.5, 0.89)
    pt3dadd(-3.94, -44.59, -8.5, 0.89)
    pt3dadd(-4.09, -44.64, -8.5, 0.89)
    pt3dadd(-4.3, -44.74, -8.5, 0.89)
    pt3dadd(-4.46, -44.8, -8.5, 0.89)
    pt3dadd(-4.62, -44.85, -8.5, 0.89)
    pt3dadd(-4.83, -44.85, -8.5, 0.89)
    pt3dadd(-4.88, -45.01, -8.5, 0.89)
    pt3dadd(-5.04, -45.06, -8.5, 0.89)
    pt3dadd(-5.14, -45.11, -8.5, 0.89)
    pt3dadd(-5.41, -45.11, -8.5, 0.89)
    pt3dadd(-5.51, -45.22, -8.5, 0.89)
    pt3dadd(-5.77, -45.27, -8.5, 0.89)
    pt3dadd(-5.83, -45.37, -8.5, 0.89)
    pt3dadd(-5.93, -45.53, -8.5, 0.89)
    pt3dadd(-6.09, -45.53, -8.5, 0.89)
    pt3dadd(-6.19, -45.58, -8.5, 0.89)
    pt3dadd(-6.3, -45.58, -8.5, 0.89)
    pt3dadd(-7.32, -45.89, -8.5, 0.89)
    pt3dadd(-7.48, -45.94, -8.5, 0.89)
    pt3dadd(-7.69, -45.99, -8.5, 0.89)
    pt3dadd(-7.85, -45.99, -8.5, 0.89)
    pt3dadd(-8.06, -46.05, -8.5, 0.89)
    pt3dadd(-8.27, -46.15, -8.5, 0.89)
    pt3dadd(-8.42, -46.26, -8.5, 0.89)
    pt3dadd(-8.52, -46.31, -8.5, 0.89)
    pt3dadd(-8.63, -46.31, -8.5, 0.89)
    pt3dadd(-8.78, -46.36, -8.5, 0.89)
    pt3dadd(-9.52, -46.36, -9, 0.89)
    pt3dadd(-9.74, -46.41, -9, 0.89)
    pt3dadd(-9.89, -46.47, -9, 0.89)
    pt3dadd(-10.05, -46.52, -9, 0.89)
    pt3dadd(-10.21, -46.62, -9, 0.89)
    pt3dadd(-10.37, -46.73, -9, 0.89)
    pt3dadd(-10.52, -46.89, -9.5, 0.89)
    pt3dadd(-10.63, -46.94, -9.5, 0.89)
    pt3dadd(-10.68, -47.04, -9.5, 0.89)
    pt3dadd(-10.84, -47.25, -9.5, 0.89)
    pt3dadd(-10.94, -47.46, -9.5, 0.89)
    pt3dadd(-11.1, -47.67, -9.5, 0.89)
    pt3dadd(-11.15, -47.83, -9.5, 0.89)
    pt3dadd(-11.2, -47.94, -9.5, 0.89)
    pt3dadd(-11.31, -48.15, -9.5, 0.89)
    pt3dadd(-11.36, -48.31, -9.5, 0.89)
    pt3dadd(-11.52, -48.57, -9.5, 0.89)
    pt3dadd(-11.62, -48.78, -9.5, 0.89)
    pt3dadd(-11.73, -48.99, -9.5, 0.89)
    pt3dadd(-11.78, -49.15, -9.5, 0.89)
    pt3dadd(-11.83, -49.25, -9.5, 0.89)
    pt3dadd(-11.99, -49.36, -9.5, 0.89)
    pt3dadd(-12.04, -49.25, -9.5, 0.89)
    pt3dadd(-12.36, -49.25, -10, 0.89)
    pt3dadd(-12.46, -49.3, -10, 0.89)
    pt3dadd(-12.73, -49.41, -10, 0.89)
    pt3dadd(-12.94, -49.41, -10, 0.89)
    pt3dadd(-13.04, -49.51, -10, 0.89)
    pt3dadd(-13.09, -49.62, -10, 0.89)
    pt3dadd(-13.2, -49.73, -10, 0.89)
    pt3dadd(-13.41, -49.83, -10, 0.89)
    pt3dadd(-13.72, -50.15, -10.5, 0.89)
    pt3dadd(-13.88, -50.25, -10.5, 0.89)
    pt3dadd(-13.99, -50.36, -10.5, 0.89)
    pt3dadd(-14.09, -50.41, -10.5, 0.89)
    pt3dadd(-14.2, -50.51, -10.5, 0.89)
    pt3dadd(-14.3, -50.62, -10.5, 0.89)
    pt3dadd(-14.41, -50.78, -10.5, 0.89)
    pt3dadd(-14.56, -50.93, -11, 0.89)
    pt3dadd(-14.67, -51.04, -11, 0.89)
    pt3dadd(-14.77, -51.3, -11, 0.89)
    pt3dadd(-14.88, -51.41, -11, 0.89)
    pt3dadd(-14.98, -51.56, -11, 0.89)
    pt3dadd(-15.19, -51.72, -11, 0.89)
    pt3dadd(-15.3, -51.78, -11, 0.89)
    pt3dadd(-15.46, -51.83, -11, 0.89)
    pt3dadd(-15.67, -51.83, -11, 0.89)
    pt3dadd(-15.82, -51.88, -11, 0.89)
    pt3dadd(-15.93, -51.99, -11.5, 0.89)
    pt3dadd(-15.93, -52.09, -11.5, 0.89)
    pt3dadd(-16.03, -52.35, -11.5, 0.89)
    pt3dadd(-16.14, -52.46, -11.5, 0.89)
    pt3dadd(-16.19, -52.56, -11.5, 0.89)
    pt3dadd(-16.19, -52.67, -11.5, 0.89)
    pt3dadd(-16.3, -52.77, -11.5, 0.89)
    pt3dadd(-16.35, -52.88, -11.5, 0.89)
    pt3dadd(-16.39, -53.04, -11.5, 0.89)
    pt3dadd(-16.51, -53.14, -11.5, 0.89)
    pt3dadd(-16.61, -53.25, -11.5, 0.89)
    pt3dadd(-16.72, -53.4, -11.5, 0.89)
    pt3dadd(-16.77, -53.51, -11.5, 0.89)
    pt3dadd(-16.87, -53.62, -11.5, 0.89)
    pt3dadd(-16.98, -53.77, -11.5, 0.89)
    pt3dadd(-17.07, -53.98, -11.5, 0.89)
    pt3dadd(-17.19, -54.14, -11.5, 0.89)
    pt3dadd(-17.23, -54.3, -11.5, 0.89)
    pt3dadd(-17.29, -54.4, -11.5, 0.89)
    pt3dadd(-17.39, -54.61, -11.5, 0.89)
    pt3dadd(-17.45, -54.77, -11.5, 0.89)
    pt3dadd(-17.45, -54.98, -11.5, 0.89)
    pt3dadd(-17.5, -55.14, -11.5, 0.89)
    pt3dadd(-17.5, -55.35, -11.5, 0.89)
    pt3dadd(-17.55, -55.51, -11.5, 0.89)
    pt3dadd(-17.61, -55.72, -11.5, 0.89)
    pt3dadd(-17.71, -55.98, -11.5, 0.89)
    pt3dadd(-17.87, -56.14, -11.5, 0.89)
    pt3dadd(-17.98, -56.24, -11.5, 0.89)
    pt3dadd(-18.07, -56.45, -11.5, 0.89)
    pt3dadd(-18.13, -56.61, -11.5, 0.89)
    pt3dadd(-18.23, -56.72, -11.5, 0.89)
    pt3dadd(-18.34, -56.82, -11.5, 0.89)
    pt3dadd(-18.45, -56.93, -11.5, 0.89)
    pt3dadd(-18.55, -57.03, -11.5, 0.89)
    pt3dadd(-18.55, -57.14, -11.5, 0.89)
    pt3dadd(-18.66, -57.3, -11.5, 0.89)
    pt3dadd(-18.71, -57.4, -11.5, 0.89)
    pt3dadd(-19.44, -58.27, -12, 0.89)
    pt3dadd(-19.55, -58.43, -12, 0.89)
    pt3dadd(-19.71, -58.59, -12, 0.89)
    pt3dadd(-19.86, -58.85, -12, 0.89)
    pt3dadd(-20.02, -58.95, -12, 0.89)
    pt3dadd(-20.07, -59.11, -12, 0.89)
    pt3dadd(-20.18, -59.22, -12, 0.89)
    pt3dadd(-20.28, -59.27, -12, 0.89)
    pt3dadd(-20.39, -59.43, -12, 0.89)
    pt3dadd(-20.44, -59.59, -12, 0.89)
    pt3dadd(-20.49, -59.69, -12.5, 0.89)
    pt3dadd(-20.6, -59.95, -12.5, 0.89)
    pt3dadd(-20.65, -60.16, -12.5, 0.89)
    pt3dadd(-20.76, -60.32, -12.5, 0.89)
    pt3dadd(-20.81, -60.43, -12.5, 0.89)
    pt3dadd(-20.86, -60.58, -12.5, 0.89)
    pt3dadd(-20.91, -60.79, -12.5, 0.89)
    pt3dadd(-21.02, -60.95, -12.5, 0.89)
    pt3dadd(-21.23, -61.37, -12.5, 0.89)
    pt3dadd(-21.33, -61.48, -12.5, 0.89)
    pt3dadd(-21.39, -61.64, -12.5, 0.89)
    pt3dadd(-21.49, -61.85, -12.5, 0.89)
    pt3dadd(-21.54, -62, -12.5, 0.89)
    pt3dadd(-21.65, -62.21, -12.5, 0.89)
    pt3dadd(-21.7, -62.32, -13, 0.89)
    pt3dadd(-21.75, -62.53, -13, 0.89)
    pt3dadd(-21.81, -62.69, -13, 0.89)
    pt3dadd(-21.81, -62.9, -13, 0.89)
    pt3dadd(-21.91, -63, -13, 0.89)
    pt3dadd(-21.91, -63.21, -13, 0.89)
    pt3dadd(-22.02, -63.32, -13, 0.89)
    pt3dadd(-22.07, -63.48, -13, 0.89)
    pt3dadd(-22.12, -63.58, -13, 0.89)
    pt3dadd(-22.23, -63.79, -13, 0.89)
    pt3dadd(-22.33, -63.9, -13, 0.89)
    pt3dadd(-22.33, -64, -13, 0.89)
    pt3dadd(-22.49, -64.11, -13, 0.89)
    pt3dadd(-22.59, -64.2, -13, 0.89)
    pt3dadd(-22.65, -64.37, -13, 0.89)
    pt3dadd(-22.86, -64.47, -13, 0.89)
    pt3dadd(-22.96, -64.58, -13, 0.89)
    pt3dadd(-23.12, -64.73, -13, 0.89)
    pt3dadd(-23.22, -64.79, -13, 0.89)
    pt3dadd(-23.49, -64.95, -13, 0.89)
    pt3dadd(-23.59, -65.05, -13, 0.89)
    pt3dadd(-23.69, -65.16, -13, 0.89)
    pt3dadd(-23.85, -65.2, -13, 0.89)
    pt3dadd(-24.01, -65.37, -13.5, 0.89)
    pt3dadd(-24.17, -65.53, -13.5, 0.89)
    pt3dadd(-24.27, -65.63, -13.5, 0.89)
    pt3dadd(-24.38, -65.73, -13.5, 0.89)
    pt3dadd(-24.53, -65.79, -13.5, 0.89)
    pt3dadd(-24.64, -65.89, -13.5, 0.89)
    pt3dadd(-24.74, -66, -13.5, 0.89)
    pt3dadd(-25.01, -66.09, -13.5, 0.89)
    pt3dadd(-25.11, -66.2, -13.5, 0.89)
    pt3dadd(-25.22, -66.31, -13.5, 0.89)
    pt3dadd(-25.32, -66.42, -13.5, 0.89)
    pt3dadd(-25.43, -66.47, -13.5, 0.89)
    pt3dadd(-25.53, -66.58, -13.5, 0.89)
    pt3dadd(-25.69, -66.73, -13.5, 0.89)
    pt3dadd(-25.79, -66.84, -13.5, 0.89)
    pt3dadd(-25.85, -66.94, -13.5, 0.89)
    pt3dadd(-25.95, -67, -13.5, 0.89)
    pt3dadd(-26, -67.09, -13.5, 0.89)
    pt3dadd(-26.21, -67.31, -13.5, 0.89)
    pt3dadd(-26.42, -67.52, -13.5, 0.89)
    pt3dadd(-26.53, -67.63, -13.5, 0.89)
    pt3dadd(-26.63, -67.79, -13.5, 0.89)
    pt3dadd(-26.69, -67.89, -13.5, 0.89)
    pt3dadd(-26.79, -68.09, -13.5, 0.89)
    pt3dadd(-27.05, -68.36, -13.5, 0.89)
    pt3dadd(-27.16, -68.52, -13.5, 0.89)
  }
  dend[17] {pt3dclear()
    pt3dadd(-27.16, -68.52, -13.5, 0.89)
    pt3dadd(-27.9, -68.5, -13.5, 0.16)
    pt3dadd(-28, -68.45, -13.5, 0.16)
    pt3dadd(-28.21, -68.45, -14, 0.16)
    pt3dadd(-28.32, -68.4, -14, 0.16)
    pt3dadd(-28.58, -68.4, -14, 0.16)
    pt3dadd(-29.52, -68.23, -14, 0.84)
  }
  dend[18] {pt3dclear()
    pt3dadd(-27.16, -68.52, -13.5, 0.89)
    pt3dadd(-27.37, -68.92, -13.5, 0.84)
    pt3dadd(-27.37, -69.08, -13.5, 0.84)
    pt3dadd(-27.48, -69.19, -13.5, 0.84)
    pt3dadd(-27.53, -69.34, -13.5, 0.84)
    pt3dadd(-27.58, -69.5, -13.5, 0.84)
    pt3dadd(-27.63, -69.66, -14, 0.84)
    pt3dadd(-27.74, -69.77, -14, 0.84)
    pt3dadd(-27.79, -69.92, -14, 0.84)
    pt3dadd(-27.84, -70.08, -14, 0.84)
    pt3dadd(-28.05, -70.29, -14, 0.84)
    pt3dadd(-28.11, -70.45, -14, 0.84)
    pt3dadd(-28.21, -70.55, -14, 0.84)
    pt3dadd(-28.32, -70.66, -14.5, 0.84)
    pt3dadd(-28.37, -70.81, -14.5, 0.84)
    pt3dadd(-28.37, -71.19, -14.5, 0.84)
    pt3dadd(-28.42, -71.29, -14.5, 0.84)
    pt3dadd(-28.42, -71.7, -14.5, 0.84)
    pt3dadd(-28.37, -71.87, -14.5, 0.84)
    pt3dadd(-28.32, -72.13, -14.5, 0.84)
    pt3dadd(-28.26, -72.23, -14.5, 0.84)
    pt3dadd(-28.26, -72.59, -14.5, 0.84)
    pt3dadd(-28.21, -72.76, -14.5, 0.84)
    pt3dadd(-28.16, -72.92, -14.5, 0.84)
    pt3dadd(-28.16, -73.5, -15, 0.84)
    pt3dadd(-28.21, -73.7, -15, 0.84)
    pt3dadd(-28.21, -73.97, -15, 0.84)
    pt3dadd(-28.26, -74.13, -15, 0.84)
    pt3dadd(-28.32, -74.23, -15, 0.84)
    pt3dadd(-28.32, -74.34, -15, 0.84)
    pt3dadd(-28.37, -74.44, -15, 0.84)
    pt3dadd(-28.42, -74.59, -15, 0.84)
    pt3dadd(-28.47, -74.7, -15, 0.84)
    pt3dadd(-28.53, -74.81, -15, 0.84)
    pt3dadd(-28.58, -74.97, -15, 0.84)
    pt3dadd(-28.63, -75.18, -15, 0.84)
    pt3dadd(-28.63, -75.34, -15, 0.84)
    pt3dadd(-28.68, -75.55, -15, 0.84)
    pt3dadd(-28.68, -77.02, -15, 0.84)
    pt3dadd(-28.63, -77.13, -15, 0.84)
    pt3dadd(-28.68, -77.28, -15, 0.84)
    pt3dadd(-28.63, -77.39, -15, 0.84)
    pt3dadd(-28.58, -77.55, -15, 0.84)
    pt3dadd(-28.47, -77.76, -15, 0.84)
    pt3dadd(-28.26, -77.91, -15, 0.84)
    pt3dadd(-28.16, -78.12, -15, 0.84)
    pt3dadd(-28, -78.12, -15, 0.84)
    pt3dadd(-28, -78.28, -15, 0.84)
    pt3dadd(-27.95, -78.48, -15, 0.84)
    pt3dadd(-27.9, -78.59, -15, 0.84)
    pt3dadd(-27.9, -78.76, -15, 0.84)
    pt3dadd(-28, -78.81, -15, 0.84)
    pt3dadd(-28.11, -78.91, -15, 0.84)
  }
}
proc shape3d_20() {
  dend[18] {
    pt3dadd(-28.21, -79.12, -15, 0.84)
    pt3dadd(-28.26, -79.28, -15, 0.84)
    pt3dadd(-28.32, -79.39, -15, 0.84)
    pt3dadd(-28.26, -79.54, -15, 0.84)
    pt3dadd(-28.21, -79.65, -15, 0.84)
    pt3dadd(-28.16, -79.81, -15, 0.84)
    pt3dadd(-28.26, -79.91, -15, 0.84)
    pt3dadd(-28.26, -80.12, -15, 0.84)
    pt3dadd(-28.32, -80.23, -15, 0.84)
    pt3dadd(-28.83, -80.92, -15.5, 0.84)
    pt3dadd(-28.94, -81.02, -16, 0.84)
    pt3dadd(-29.1, -81.08, -16, 0.84)
    pt3dadd(-29.15, -81.18, -16, 0.84)
    pt3dadd(-29.36, -81.29, -16, 0.84)
    pt3dadd(-29.52, -81.44, -16, 0.84)
    pt3dadd(-29.73, -81.5, -16.5, 0.84)
    pt3dadd(-29.78, -81.59, -16.5, 0.84)
    pt3dadd(-29.99, -81.7, -16.5, 0.84)
    pt3dadd(-30.09, -81.76, -16.5, 0.84)
    pt3dadd(-30.25, -81.86, -16.5, 0.84)
    pt3dadd(-30.46, -81.97, -16.5, 0.84)
    pt3dadd(-30.51, -82.02, -17, 0.84)
    pt3dadd(-30.72, -82.13, -17, 0.84)
    pt3dadd(-30.88, -82.18, -17, 0.84)
    pt3dadd(-30.99, -82.29, -17, 0.84)
    pt3dadd(-31.14, -82.44, -17, 0.84)
    pt3dadd(-31.35, -82.55, -17, 0.84)
    pt3dadd(-31.46, -82.65, -17.5, 0.84)
    pt3dadd(-31.62, -82.81, -17.5, 0.84)
    pt3dadd(-31.72, -82.92, -17.5, 0.84)
    pt3dadd(-31.88, -83.07, -17.5, 0.84)
    pt3dadd(-32.04, -83.39, -17.5, 0.84)
    pt3dadd(-32.19, -83.49, -17.5, 0.84)
    pt3dadd(-32.25, -83.65, -17.5, 0.84)
    pt3dadd(-32.35, -83.76, -17.5, 0.84)
    pt3dadd(-32.46, -83.91, -17.5, 0.84)
    pt3dadd(-32.46, -84.02, -17.5, 0.84)
    pt3dadd(-32.51, -84.23, -17.5, 0.84)
    pt3dadd(-32.51, -84.65, -18, 0.84)
    pt3dadd(-32.46, -84.76, -18, 0.84)
    pt3dadd(-32.51, -84.91, -18, 0.84)
    pt3dadd(-32.51, -85.12, -18.5, 0.84)
    pt3dadd(-32.61, -85.23, -18.5, 0.84)
    pt3dadd(-32.72, -85.28, -18.5, 0.84)
    pt3dadd(-32.82, -85.39, -18.5, 0.84)
    pt3dadd(-32.97, -85.6, -18.5, 0.84)
    pt3dadd(-32.97, -85.97, -18.5, 0.84)
    pt3dadd(-32.93, -86.12, -18.5, 0.84)
    pt3dadd(-32.82, -86.23, -18.5, 0.84)
    pt3dadd(-32.82, -87.12, -18.5, 0.84)
    pt3dadd(-32.93, -87.33, -19, 0.84)
    pt3dadd(-33.29, -87.7, -19.5, 0.84)
    pt3dadd(-33.45, -87.75, -19.5, 0.84)
    pt3dadd(-33.61, -87.75, -20, 0.84)
    pt3dadd(-33.71, -87.86, -20, 0.84)
    pt3dadd(-33.86, -88.02, -20, 0.84)
    pt3dadd(-33.92, -88.12, -20, 0.84)
    pt3dadd(-34.03, -88.38, -20, 0.84)
    pt3dadd(-34.08, -88.59, -20, 0.84)
    pt3dadd(-34.19, -88.75, -20, 0.84)
    pt3dadd(-34.19, -88.86, -20.5, 0.84)
    pt3dadd(-34.29, -88.96, -20.5, 0.84)
    pt3dadd(-34.34, -89.12, -20.5, 0.84)
    pt3dadd(-34.4, -89.22, -20.5, 0.84)
    pt3dadd(-34.45, -89.33, -20.5, 0.84)
    pt3dadd(-34.54, -89.49, -20.5, 0.84)
    pt3dadd(-34.61, -89.7, -20.5, 0.84)
    pt3dadd(-34.76, -89.75, -20.5, 0.84)
    pt3dadd(-34.86, -89.96, -20.5, 0.84)
    pt3dadd(-34.86, -90.12, -20.5, 0.84)
    pt3dadd(-34.97, -90.17, -20.5, 0.84)
    pt3dadd(-35.08, -90.38, -20.5, 0.84)
    pt3dadd(-35.13, -90.54, -20.5, 0.84)
    pt3dadd(-35.24, -90.75, -20.5, 0.84)
    pt3dadd(-35.34, -90.91, -20.5, 0.84)
    pt3dadd(-35.45, -91.06, -20.5, 0.84)
    pt3dadd(-35.5, -91.22, -20.5, 0.84)
    pt3dadd(-35.6, -91.33, -20.5, 0.84)
    pt3dadd(-35.71, -91.43, -20.5, 0.84)
    pt3dadd(-35.76, -91.54, -20.5, 0.84)
    pt3dadd(-35.86, -91.7, -20.5, 0.84)
    pt3dadd(-36.02, -91.85, -20.5, 0.84)
    pt3dadd(-36.13, -91.96, -20.5, 0.84)
    pt3dadd(-36.22, -92.12, -20.5, 0.84)
    pt3dadd(-37.64, -93.54, -21, 0.84)
    pt3dadd(-37.79, -93.65, -21, 0.84)
    pt3dadd(-37.9, -93.75, -21, 0.84)
    pt3dadd(-38.06, -93.91, -21, 0.84)
    pt3dadd(-38.21, -94.02, -21, 0.84)
    pt3dadd(-38.32, -94.12, -21, 0.84)
    pt3dadd(-38.42, -94.23, -21, 0.84)
    pt3dadd(-38.69, -94.33, -21, 0.84)
    pt3dadd(-38.9, -94.54, -21, 0.84)
    pt3dadd(-39.04, -94.6, -21, 0.84)
    pt3dadd(-39.15, -94.75, -21.5, 0.84)
    pt3dadd(-39.21, -94.86, -21.5, 0.84)
    pt3dadd(-39.32, -94.96, -21.5, 0.84)
    pt3dadd(-39.32, -95.12, -21.5, 0.84)
    pt3dadd(-39.36, -95.28, -21.5, 0.84)
    pt3dadd(-39.36, -95.65, -22, 0.84)
    pt3dadd(-39.47, -95.86, -22, 0.84)
    pt3dadd(-39.53, -95.96, -22, 0.84)
    pt3dadd(-39.63, -96.07, -22, 0.84)
    pt3dadd(-39.84, -96.07, -22, 0.84)
    pt3dadd(-40, -96.17, -22.5, 0.84)
    pt3dadd(-40.15, -96.28, -22.5, 0.84)
    pt3dadd(-40.26, -96.38, -22.5, 0.84)
    pt3dadd(-40.36, -96.65, -22.5, 0.84)
    pt3dadd(-40.42, -96.86, -22.5, 0.84)
    pt3dadd(-40.47, -97.01, -22.5, 0.84)
    pt3dadd(-40.47, -97.12, -22.5, 0.84)
    pt3dadd(-40.52, -97.28, -22.5, 0.84)
    pt3dadd(-40.52, -97.59, -22.5, 0.84)
    pt3dadd(-40.58, -97.7, -22.5, 0.84)
    pt3dadd(-40.58, -98.91, -23, 0.84)
    pt3dadd(-40.52, -99.17, -23, 0.84)
    pt3dadd(-40.58, -99.33, -23, 0.84)
    pt3dadd(-40.63, -99.48, -23, 0.84)
    pt3dadd(-40.63, -99.8, -23, 0.84)
    pt3dadd(-40.68, -100.01, -23.5, 0.84)
    pt3dadd(-40.72, -100.12, -23.5, 0.84)
    pt3dadd(-40.72, -100.27, -23.5, 0.84)
    pt3dadd(-40.84, -100.38, -23.5, 0.84)
    pt3dadd(-40.94, -100.59, -23.5, 0.84)
    pt3dadd(-41.05, -100.75, -23.5, 0.84)
    pt3dadd(-41.2, -100.85, -23.5, 0.84)
    pt3dadd(-41.26, -101.01, -23.5, 0.84)
    pt3dadd(-41.36, -101.11, -23.5, 0.84)
    pt3dadd(-41.57, -101.22, -23.5, 0.84)
    pt3dadd(-41.73, -101.32, -23.5, 0.84)
    pt3dadd(-41.94, -101.48, -23.5, 0.84)
    pt3dadd(-42.1, -101.53, -23.5, 0.84)
    pt3dadd(-42.15, -101.69, -23.5, 0.84)
    pt3dadd(-42.36, -101.8, -23.5, 0.84)
    pt3dadd(-42.52, -101.85, -23.5, 0.84)
    pt3dadd(-42.62, -101.96, -23.5, 0.84)
    pt3dadd(-42.78, -102.01, -23.5, 0.84)
    pt3dadd(-42.88, -102.22, -23.5, 0.84)
    pt3dadd(-42.99, -102.22, -23.5, 0.84)
    pt3dadd(-43.04, -102.32, -23.5, 0.84)
    pt3dadd(-43.25, -102.38, -23.5, 0.84)
    pt3dadd(-43.36, -102.48, -23.5, 0.84)
    pt3dadd(-43.41, -102.69, -23.5, 0.84)
    pt3dadd(-43.51, -102.8, -23.5, 0.84)
    pt3dadd(-43.62, -102.9, -23.5, 0.84)
    pt3dadd(-43.67, -103.06, -23.5, 0.84)
    pt3dadd(-43.72, -103.16, -23.5, 0.84)
    pt3dadd(-43.83, -103.27, -23.5, 0.84)
    pt3dadd(-43.88, -103.43, -23.5, 0.84)
    pt3dadd(-44.04, -103.64, -23.5, 0.84)
    pt3dadd(-44.14, -103.74, -23.5, 0.84)
    pt3dadd(-44.25, -103.9, -23.5, 0.84)
    pt3dadd(-44.2, -104.01, -23.5, 0.84)
    pt3dadd(-44.57, -104.95, -23.5, 0.84)
    pt3dadd(-44.67, -104.95, -23.5, 0.84)
    pt3dadd(-44.78, -104.89, -24, 0.84)
    pt3dadd(-45.35, -104.89, -24, 0.84)
    pt3dadd(-45.56, -105.05, -24, 0.84)
    pt3dadd(-45.72, -105.21, -24, 0.84)
    pt3dadd(-45.83, -105.31, -24, 0.84)
    pt3dadd(-45.83, -105.58, -24, 0.84)
    pt3dadd(-45.88, -105.68, -24, 0.84)
    pt3dadd(-45.93, -105.79, -24, 0.84)
    pt3dadd(-45.98, -106, -24, 0.84)
    pt3dadd(-46.04, -106.1, -24, 0.84)
    pt3dadd(-46.09, -106.26, -24.5, 0.84)
    pt3dadd(-46.19, -106.42, -24.5, 0.84)
    pt3dadd(-46.25, -106.52, -24.5, 0.84)
    pt3dadd(-46.35, -106.63, -24.5, 0.84)
    pt3dadd(-46.46, -106.73, -24.5, 0.84)
    pt3dadd(-46.51, -106.84, -24.5, 0.84)
    pt3dadd(-46.61, -106.89, -24.5, 0.84)
    pt3dadd(-46.72, -107.05, -24.5, 0.84)
    pt3dadd(-46.82, -107.15, -24.5, 0.84)
    pt3dadd(-46.82, -107.95, -24.5, 0.84)
    pt3dadd(-46.87, -108.05, -24, 0.84)
    pt3dadd(-46.87, -108.26, -24, 0.84)
    pt3dadd(-46.93, -108.42, -24, 0.84)
    pt3dadd(-46.98, -108.58, -24, 0.84)
    pt3dadd(-47.14, -108.73, -24, 0.84)
    pt3dadd(-47.19, -108.94, -24, 0.84)
    pt3dadd(-47.24, -109.05, -24, 0.84)
    pt3dadd(-47.29, -109.21, -24, 0.84)
    pt3dadd(-47.4, -109.31, -24, 0.84)
    pt3dadd(-47.4, -109.58, -24, 0.84)
    pt3dadd(-47.45, -109.79, -24, 0.84)
    pt3dadd(-47.61, -109.94, -24.5, 0.84)
    pt3dadd(-47.71, -110.1, -24.5, 0.84)
    pt3dadd(-47.82, -110.15, -24.5, 0.84)
    pt3dadd(-47.92, -110.26, -24.5, 0.84)
    pt3dadd(-48.03, -110.36, -25, 0.84)
    pt3dadd(-48.13, -110.47, -25, 0.84)
    pt3dadd(-48.19, -110.63, -25, 0.84)
    pt3dadd(-48.29, -110.73, -25, 0.84)
    pt3dadd(-48.34, -110.84, -25, 0.84)
    pt3dadd(-48.4, -110.94, -25, 0.84)
    pt3dadd(-48.4, -111.1, -25, 0.84)
    pt3dadd(-48.45, -111.26, -25.5, 0.84)
    pt3dadd(-48.45, -111.47, -25.5, 0.84)
    pt3dadd(-48.5, -111.63, -25.5, 0.84)
    pt3dadd(-48.5, -111.84, -25.5, 0.84)
    pt3dadd(-48.55, -111.99, -26, 0.84)
    pt3dadd(-48.55, -112.36, -26, 0.84)
    pt3dadd(-48.61, -112.57, -26, 0.84)
    pt3dadd(-48.61, -113.1, -26, 0.84)
    pt3dadd(-48.55, -113.31, -26, 0.84)
    pt3dadd(-48.5, -113.41, -26, 0.84)
    pt3dadd(-48.45, -113.57, -26.5, 0.84)
    pt3dadd(-48.45, -114.25, -27.5, 0.84)
    pt3dadd(-48.5, -114.41, -27.5, 0.84)
    pt3dadd(-48.82, -114.73, -27.5, 0.84)
    pt3dadd(-48.97, -114.88, -27.5, 0.84)
    pt3dadd(-49.03, -114.99, -28, 0.84)
    pt3dadd(-49.08, -115.1, -28, 0.84)
    pt3dadd(-49.18, -115.2, -28, 0.84)
    pt3dadd(-49.24, -115.36, -28, 0.84)
    pt3dadd(-49.29, -115.52, -28, 0.84)
    pt3dadd(-49.29, -115.99, -28.5, 0.84)
    pt3dadd(-49.34, -116.09, -28.5, 0.84)
    pt3dadd(-49.39, -116.2, -28.5, 0.84)
    pt3dadd(-49.5, -116.46, -29, 0.84)
    pt3dadd(-49.66, -116.51, -29, 0.84)
    pt3dadd(-49.76, -116.62, -29, 0.84)
    pt3dadd(-49.87, -116.67, -29, 0.84)
    pt3dadd(-50.02, -116.67, -29, 0.84)
    pt3dadd(-50.13, -116.78, -29, 0.84)
    pt3dadd(-50.23, -116.83, -29, 0.84)
    pt3dadd(-50.29, -116.94, -29, 0.84)
    pt3dadd(-50.39, -116.99, -29.5, 0.84)
    pt3dadd(-50.44, -117.15, -29.5, 0.84)
    pt3dadd(-50.55, -117.3, -29.5, 0.84)
    pt3dadd(-50.55, -117.41, -29.5, 0.84)
    pt3dadd(-50.6, -117.51, -29.5, 0.84)
    pt3dadd(-50.6, -119.25, -29.5, 0.84)
    pt3dadd(-50.55, -119.46, -29.5, 0.84)
    pt3dadd(-50.6, -119.62, -29.5, 0.84)
    pt3dadd(-50.6, -119.88, -29.5, 0.84)
    pt3dadd(-50.65, -120.09, -29.5, 0.84)
    pt3dadd(-50.71, -120.25, -29.5, 0.84)
    pt3dadd(-50.71, -120.46, -29.5, 0.84)
    pt3dadd(-50.76, -120.56, -29.5, 0.84)
    pt3dadd(-50.86, -120.72, -29.5, 0.84)
    pt3dadd(-50.86, -120.83, -29.5, 0.84)
    pt3dadd(-50.92, -120.93, -30.5, 0.84)
    pt3dadd(-51.02, -121.04, -30.5, 0.84)
    pt3dadd(-51.18, -121.14, -30.5, 0.84)
    pt3dadd(-51.28, -121.25, -30.5, 0.84)
    pt3dadd(-51.34, -121.35, -30.5, 0.84)
    pt3dadd(-51.55, -121.4, -30.5, 0.84)
  }
}
proc shape3d_21() {
  dend[18] {
    pt3dadd(-51.65, -121.46, -30.5, 0.84)
    pt3dadd(-51.81, -121.51, -30.5, 0.84)
    pt3dadd(-52.02, -121.56, -30.5, 0.84)
    pt3dadd(-52.12, -121.67, -30.5, 0.84)
    pt3dadd(-52.39, -121.67, -30.5, 0.84)
    pt3dadd(-52.54, -121.72, -30.5, 0.84)
    pt3dadd(-53.38, -121.72, -31, 0.84)
    pt3dadd(-53.49, -121.67, -31, 0.84)
    pt3dadd(-53.59, -121.67, -31, 0.84)
    pt3dadd(-53.75, -121.67, -31, 0.84)
    pt3dadd(-53.91, -121.72, -31, 0.84)
    pt3dadd(-54.07, -121.72, -31, 0.84)
    pt3dadd(-54.22, -121.82, -31.5, 0.84)
    pt3dadd(-54.28, -121.93, -31.5, 0.84)
    pt3dadd(-54.33, -122.14, -31.5, 0.84)
    pt3dadd(-54.33, -122.51, -31.5, 0.84)
    pt3dadd(-54.38, -122.67, -31.5, 0.84)
    pt3dadd(-54.38, -122.88, -32, 0.84)
    pt3dadd(-54.43, -122.98, -32, 0.84)
    pt3dadd(-54.43, -123.14, -32, 0.84)
    pt3dadd(-54.54, -123.24, -32, 0.84)
    pt3dadd(-54.59, -123.35, -32, 0.84)
    pt3dadd(-54.7, -123.45, -32, 0.84)
    pt3dadd(-54.85, -123.66, -32.5, 0.84)
    pt3dadd(-54.96, -123.77, -32.5, 0.84)
    pt3dadd(-55.06, -123.87, -32.5, 0.84)
    pt3dadd(-55.22, -124.03, -32.5, 0.84)
    pt3dadd(-55.33, -124.08, -32.5, 0.84)
    pt3dadd(-55.43, -124.24, -32.5, 0.84)
    pt3dadd(-55.54, -124.29, -32.5, 0.84)
    pt3dadd(-55.69, -124.4, -33, 0.84)
    pt3dadd(-55.8, -124.51, -33, 0.84)
    pt3dadd(-55.96, -124.56, -33, 0.84)
    pt3dadd(-56.06, -124.61, -33, 0.84)
    pt3dadd(-56.17, -124.72, -33, 0.84)
    pt3dadd(-56.32, -124.87, -33, 0.84)
    pt3dadd(-56.48, -124.93, -33, 0.84)
    pt3dadd(-56.69, -125.08, -33.5, 0.84)
    pt3dadd(-56.8, -125.19, -33.5, 0.84)
    pt3dadd(-56.9, -125.29, -33.5, 0.84)
    pt3dadd(-57.06, -125.29, -33.5, 0.84)
    pt3dadd(-57.22, -125.35, -33.5, 0.84)
    pt3dadd(-57.69, -125.35, -33.5, 0.84)
    pt3dadd(-57.79, -125.24, -33.5, 0.84)
    pt3dadd(-57.85, -125.14, -33.5, 0.84)
    pt3dadd(-58, -124.98, -33.5, 0.84)
    pt3dadd(-58.16, -124.82, -33.5, 0.84)
    pt3dadd(-58.27, -124.72, -33.5, 0.84)
    pt3dadd(-58.37, -124.66, -33.5, 0.84)
    pt3dadd(-58.63, -124.66, -33.5, 0.84)
    pt3dadd(-58.74, -124.77, -33.5, 0.84)
    pt3dadd(-58.9, -124.98, -33.5, 0.84)
    pt3dadd(-59, -125.08, -33.5, 0.84)
    pt3dadd(-59.05, -125.29, -34, 0.84)
    pt3dadd(-59.05, -125.66, -34, 0.84)
    pt3dadd(-59, -125.82, -34, 0.84)
    pt3dadd(-58.9, -125.92, -34, 0.84)
    pt3dadd(-58.9, -126.29, -34, 0.84)
    pt3dadd(-58.84, -126.4, -34, 0.84)
    pt3dadd(-58.79, -126.5, -34, 0.84)
    pt3dadd(-58.69, -126.56, -34, 0.84)
    pt3dadd(-58.69, -126.82, -34, 0.84)
    pt3dadd(-58.69, -126.98, -34, 0.84)
    pt3dadd(-58.69, -127.13, -34, 0.84)
    pt3dadd(-58.84, -127.29, -34, 0.84)
    pt3dadd(-58.95, -127.4, -34, 0.84)
    pt3dadd(-59.05, -127.55, -34, 0.84)
    pt3dadd(-59.21, -127.61, -34, 0.84)
    pt3dadd(-59.58, -127.97, -34, 0.84)
    pt3dadd(-59.74, -128.08, -34, 0.84)
    pt3dadd(-59.84, -128.24, -34, 0.84)
    pt3dadd(-60, -128.4, -34, 0.84)
    pt3dadd(-60.16, -128.66, -34, 0.84)
    pt3dadd(-60.26, -128.71, -34, 0.84)
    pt3dadd(-60.31, -128.87, -34, 0.84)
    pt3dadd(-60.42, -128.97, -34, 0.84)
    pt3dadd(-60.52, -128.97, -34, 0.84)
    pt3dadd(-62.02, -130.22, -34, 0.84)
    pt3dadd(-62.08, -130.33, -34.5, 0.84)
    pt3dadd(-62.18, -130.43, -34.5, 0.84)
    pt3dadd(-62.29, -130.59, -34.5, 0.84)
    pt3dadd(-62.34, -130.75, -34.5, 0.84)
    pt3dadd(-62.55, -130.96, -34.5, 0.84)
    pt3dadd(-62.65, -131.06, -34.5, 0.84)
    pt3dadd(-62.71, -131.22, -34.5, 0.84)
    pt3dadd(-62.81, -131.22, -34.5, 0.84)
    pt3dadd(-62.86, -131.38, -34.5, 0.84)
    pt3dadd(-62.92, -131.47, -34.5, 0.84)
    pt3dadd(-63.13, -131.59, -34.5, 0.84)
    pt3dadd(-63.34, -131.69, -34.5, 0.84)
    pt3dadd(-63.49, -131.69, -34.5, 0.84)
    pt3dadd(-63.49, -131.54, -35, 0.84)
    pt3dadd(-63.81, -131.54, -35, 0.84)
    pt3dadd(-63.86, -131.63, -35, 0.84)
    pt3dadd(-63.97, -131.69, -35, 0.84)
    pt3dadd(-64.18, -131.75, -35, 0.84)
    pt3dadd(-64.28, -131.9, -35, 0.84)
    pt3dadd(-64.39, -131.9, -35, 0.84)
    pt3dadd(-64.48, -131.96, -35.5, 0.84)
    pt3dadd(-64.65, -132.11, -35.5, 0.84)
    pt3dadd(-64.7, -132.22, -35.5, 0.84)
    pt3dadd(-64.7, -132.54, -36, 0.84)
    pt3dadd(-64.75, -132.63, -36, 0.84)
    pt3dadd(-64.7, -132.9, -36, 0.84)
    pt3dadd(-64.65, -133.01, -36, 0.84)
    pt3dadd(-64.65, -133.27, -36, 0.84)
    pt3dadd(-64.59, -133.38, -36, 0.84)
    pt3dadd(-64.59, -133.63, -36, 0.84)
    pt3dadd(-64.65, -133.85, -36, 0.84)
    pt3dadd(-64.75, -134.11, -36, 0.84)
    pt3dadd(-64.86, -134.27, -36.5, 0.84)
    pt3dadd(-65.06, -134.47, -36.5, 0.84)
    pt3dadd(-65.28, -134.59, -36.5, 0.84)
    pt3dadd(-65.44, -134.74, -36.5, 0.84)
    pt3dadd(-65.54, -134.85, -36.5, 0.84)
    pt3dadd(-65.7, -135.01, -36.5, 0.84)
    pt3dadd(-65.8, -135.11, -36.5, 0.84)
    pt3dadd(-65.91, -135.22, -36.5, 0.84)
    pt3dadd(-66.17, -135.47, -36.5, 0.84)
    pt3dadd(-66.22, -135.63, -36.5, 0.84)
    pt3dadd(-66.22, -135.94, -36.5, 0.84)
    pt3dadd(-66.17, -136.11, -37, 0.84)
    pt3dadd(-66.17, -136.22, -37, 0.84)
    pt3dadd(-66.12, -136.32, -37, 0.84)
    pt3dadd(-66.12, -136.47, -37, 0.84)
    pt3dadd(-66.12, -136.58, -37, 0.84)
    pt3dadd(-66.12, -137.32, -37, 0.84)
    pt3dadd(-66.22, -137.58, -37, 0.84)
    pt3dadd(-66.28, -137.69, -37, 0.84)
    pt3dadd(-66.43, -137.94, -37.5, 0.84)
    pt3dadd(-66.48, -138.06, -37.5, 0.84)
    pt3dadd(-66.7, -138.06, -37.5, 0.84)
    pt3dadd(-66.75, -138.21, -37.5, 0.84)
    pt3dadd(-66.84, -138.32, -37.5, 0.84)
    pt3dadd(-66.95, -138.41, -37.5, 0.84)
    pt3dadd(-67.06, -138.53, -37.5, 0.84)
    pt3dadd(-67.17, -138.58, -37.5, 0.84)
    pt3dadd(-67.22, -138.79, -37.5, 0.84)
    pt3dadd(-67.27, -138.94, -37.5, 0.84)
    pt3dadd(-67.27, -139.16, -37.5, 0.84)
    pt3dadd(-67.38, -139.21, -37.5, 0.84)
    pt3dadd(-67.38, -139.41, -37.5, 0.84)
    pt3dadd(-67.48, -139.68, -37.5, 0.84)
    pt3dadd(-67.59, -139.9, -37.5, 0.84)
    pt3dadd(-67.64, -140.05, -37.5, 0.84)
    pt3dadd(-67.8, -140.21, -37.5, 0.84)
    pt3dadd(-67.9, -140.32, -37.5, 0.84)
    pt3dadd(-67.9, -140.47, -37.5, 0.84)
    pt3dadd(-67.95, -140.68, -37.5, 0.84)
    pt3dadd(-67.95, -140.84, -37.5, 0.84)
    pt3dadd(-68.01, -141.05, -37.5, 0.84)
    pt3dadd(-68.01, -141.41, -37.5, 0.84)
    pt3dadd(-68.06, -141.52, -37.5, 0.84)
    pt3dadd(-68.17, -141.52, -37.5, 0.84)
    pt3dadd(-68.45, -143.38, -38, 0.84)
    pt3dadd(-68.52, -143.5, -38.5, 0.84)
    pt3dadd(-68.56, -143.71, -38.5, 0.84)
    pt3dadd(-68.56, -143.86, -38.5, 0.84)
    pt3dadd(-68.62, -144.07, -38.5, 0.84)
    pt3dadd(-68.73, -144.22, -38.5, 0.84)
    pt3dadd(-68.73, -144.44, -38.5, 0.84)
    pt3dadd(-68.78, -144.55, -38.5, 0.84)
    pt3dadd(-68.88, -144.65, -38.5, 0.84)
    pt3dadd(-68.98, -144.91, -38.5, 0.84)
    pt3dadd(-69.04, -145.02, -38.5, 0.84)
    pt3dadd(-69.09, -145.22, -38.5, 0.84)
    pt3dadd(-69.2, -145.28, -38.5, 0.84)
    pt3dadd(-69.25, -145.49, -38.5, 0.84)
  }
  dend[19] {pt3dclear()
    pt3dadd(6.22, -32.97, -5, 0.89)
    pt3dadd(6.71, -33.2, -5.5, 0.84)
    pt3dadd(6.76, -33.29, -6, 0.84)
    pt3dadd(6.86, -33.46, -6, 0.84)
    pt3dadd(6.97, -33.51, -6, 0.84)
    pt3dadd(7.13, -33.67, -6, 0.84)
    pt3dadd(7.23, -33.78, -6, 0.84)
    pt3dadd(7.28, -33.93, -6.5, 0.84)
    pt3dadd(7.39, -34.04, -6.5, 0.84)
    pt3dadd(7.39, -34.14, -6.5, 0.84)
    pt3dadd(7.55, -34.29, -6.5, 0.84)
    pt3dadd(7.55, -34.46, -6.5, 0.84)
    pt3dadd(7.55, -34.56, -6.5, 0.84)
    pt3dadd(7.6, -34.67, -6.5, 0.84)
    pt3dadd(7.65, -34.77, -6.5, 0.84)
    pt3dadd(7.7, -34.88, -6.5, 0.84)
    pt3dadd(7.7, -35.14, -6.5, 0.84)
    pt3dadd(7.76, -35.25, -6.5, 0.84)
    pt3dadd(7.81, -35.46, -6.5, 0.84)
    pt3dadd(7.86, -35.61, -6.5, 0.84)
    pt3dadd(7.91, -35.72, -6.5, 0.84)
    pt3dadd(8.02, -35.88, -6.5, 0.84)
    pt3dadd(8.11, -35.97, -6.5, 0.84)
    pt3dadd(8.11, -36.19, -6.5, 0.84)
    pt3dadd(8.23, -36.29, -6.5, 0.84)
    pt3dadd(8.33, -36.4, -6.5, 0.84)
    pt3dadd(8.49, -36.51, -6.5, 0.84)
    pt3dadd(8.6, -36.67, -6.5, 0.84)
    pt3dadd(8.81, -36.83, -6.5, 0.84)
    pt3dadd(8.91, -36.93, -6.5, 0.84)
    pt3dadd(9.07, -37.04, -6.5, 0.84)
    pt3dadd(9.17, -37.14, -6.5, 0.84)
    pt3dadd(9.27, -37.29, -6.5, 0.84)
    pt3dadd(9.44, -37.35, -6.5, 0.84)
    pt3dadd(9.59, -37.46, -6.5, 0.84)
    pt3dadd(9.75, -37.46, -6.5, 0.84)
    pt3dadd(9.91, -37.51, -6.5, 0.84)
    pt3dadd(9.91, -37.61, -6.5, 0.84)
    pt3dadd(10.01, -37.72, -6.5, 0.84)
    pt3dadd(10.11, -37.77, -6.5, 0.84)
    pt3dadd(10.28, -37.93, -6.5, 0.84)
    pt3dadd(10.38, -38.09, -6.5, 0.84)
    pt3dadd(10.49, -38.24, -6.5, 0.84)
    pt3dadd(10.54, -38.35, -6.5, 0.84)
    pt3dadd(10.64, -38.45, -6.5, 0.84)
    pt3dadd(10.75, -38.61, -6.5, 0.84)
    pt3dadd(10.8, -38.72, -6.5, 0.84)
    pt3dadd(10.91, -38.97, -6.5, 0.84)
    pt3dadd(10.96, -39.09, -6.5, 0.84)
    pt3dadd(11.06, -39.35, -6.5, 0.84)
    pt3dadd(11.12, -39.45, -6.5, 0.84)
    pt3dadd(11.17, -39.61, -7, 0.84)
    pt3dadd(11.22, -39.77, -7, 0.84)
    pt3dadd(11.22, -39.97, -7, 0.84)
    pt3dadd(11.33, -40.14, -7, 0.84)
    pt3dadd(11.38, -40.24, -7, 0.84)
    pt3dadd(11.43, -40.45, -7, 0.84)
    pt3dadd(11.54, -40.61, -7, 0.84)
    pt3dadd(11.64, -40.72, -7.5, 0.84)
    pt3dadd(11.75, -40.77, -7.5, 0.84)
    pt3dadd(11.8, -40.86, -7.5, 0.84)
    pt3dadd(11.9, -41.03, -7.5, 0.84)
    pt3dadd(11.9, -41.19, -7.5, 0.84)
    pt3dadd(11.96, -41.29, -7.5, 0.84)
    pt3dadd(12.06, -41.35, -7.5, 0.84)
    pt3dadd(12.06, -41.56, -7.5, 0.84)
    pt3dadd(12.11, -41.71, -7.5, 0.84)
    pt3dadd(12.11, -42.03, -7.5, 0.84)
    pt3dadd(12.17, -42.19, -7.5, 0.84)
    pt3dadd(12.17, -42.82, -7.5, 0.84)
    pt3dadd(12.22, -43.03, -7.5, 0.84)
    pt3dadd(12.27, -43.19, -7.5, 0.84)
    pt3dadd(12.32, -43.29, -7.5, 0.84)
    pt3dadd(12.38, -43.55, -7.5, 0.84)
    pt3dadd(12.48, -43.66, -7.5, 0.84)
    pt3dadd(12.59, -43.76, -7.5, 0.84)
    pt3dadd(12.69, -43.87, -7.5, 0.84)
    pt3dadd(12.69, -44.24, -7.5, 0.84)
    pt3dadd(12.8, -44.34, -7.5, 0.84)
    pt3dadd(12.85, -44.5, -7.5, 0.84)
    pt3dadd(12.9, -44.61, -7.5, 0.84)
  }
}
proc shape3d_22() {
  dend[19] {
    pt3dadd(13.01, -44.87, -7.5, 0.84)
    pt3dadd(13.06, -44.97, -7.5, 0.84)
    pt3dadd(13.16, -44.87, -7.5, 0.84)
    pt3dadd(13.79, -46.03, -7.5, 0.84)
    pt3dadd(13.68, -46.14, -8, 0.84)
    pt3dadd(13.53, -46.19, -8, 0.84)
    pt3dadd(13.37, -46.24, -8, 0.84)
    pt3dadd(13.21, -46.4, -8.5, 0.84)
    pt3dadd(13.21, -46.56, -8.5, 0.84)
    pt3dadd(13.26, -46.66, -8.5, 0.84)
    pt3dadd(13.37, -46.77, -8.5, 0.84)
    pt3dadd(13.42, -47.03, -8.5, 0.84)
    pt3dadd(13.53, -47.24, -8.5, 0.84)
    pt3dadd(13.58, -47.4, -8.5, 0.84)
    pt3dadd(13.58, -47.56, -9, 0.84)
    pt3dadd(13.63, -47.66, -9, 0.84)
    pt3dadd(13.74, -47.82, -9, 0.84)
    pt3dadd(13.74, -47.93, -9, 0.84)
    pt3dadd(13.79, -48.14, -9, 0.84)
    pt3dadd(13.84, -48.24, -9, 0.84)
    pt3dadd(14, -48.24, -9, 0.84)
    pt3dadd(14.05, -48.4, -9, 0.84)
    pt3dadd(14.05, -48.56, -9, 0.84)
    pt3dadd(14.16, -48.71, -9, 0.84)
    pt3dadd(14.26, -48.87, -9, 0.84)
    pt3dadd(14.31, -48.98, -9, 0.84)
    pt3dadd(14.37, -49.08, -9, 0.84)
    pt3dadd(14.42, -49.24, -9, 0.84)
    pt3dadd(14.42, -49.98, -9.5, 0.84)
    pt3dadd(14.37, -50.19, -9.5, 0.84)
    pt3dadd(14.31, -50.34, -9.5, 0.84)
    pt3dadd(14.21, -50.45, -9.5, 0.84)
    pt3dadd(14.21, -50.66, -9.5, 0.84)
    pt3dadd(14.16, -50.87, -9.5, 0.84)
    pt3dadd(14.16, -51.08, -9.5, 0.84)
    pt3dadd(14.1, -51.29, -9.5, 0.84)
    pt3dadd(14.16, -51.4, -9.5, 0.84)
    pt3dadd(14.1, -51.55, -9.5, 0.84)
    pt3dadd(14.1, -51.76, -10, 0.84)
    pt3dadd(14.16, -51.87, -10, 0.84)
    pt3dadd(14.16, -52.13, -10, 0.84)
    pt3dadd(14.21, -52.24, -10, 0.84)
    pt3dadd(14.26, -52.34, -10, 0.84)
    pt3dadd(14.31, -52.45, -10.5, 0.84)
    pt3dadd(14.37, -52.55, -10.5, 0.84)
    pt3dadd(14.37, -52.76, -10.5, 0.84)
    pt3dadd(14.47, -52.82, -10.5, 0.84)
    pt3dadd(14.63, -53.03, -10.5, 0.84)
    pt3dadd(14.63, -53.13, -10.5, 0.84)
    pt3dadd(14.68, -53.24, -10.5, 0.84)
    pt3dadd(14.84, -53.39, -10.5, 0.84)
    pt3dadd(14.84, -53.5, -10.5, 0.84)
    pt3dadd(14.89, -53.66, -10.5, 0.84)
    pt3dadd(14.94, -53.76, -10.5, 0.84)
    pt3dadd(14.94, -53.87, -11, 0.84)
    pt3dadd(15, -53.97, -11, 0.84)
    pt3dadd(15, -54.34, -11, 0.84)
    pt3dadd(15.05, -54.5, -11, 0.84)
    pt3dadd(15.21, -54.66, -11, 0.84)
    pt3dadd(15.31, -54.81, -11, 0.84)
    pt3dadd(15.47, -54.92, -11, 0.84)
    pt3dadd(15.52, -55.02, -11, 0.84)
    pt3dadd(15.63, -55.13, -11, 0.84)
    pt3dadd(15.73, -55.23, -11, 0.84)
    pt3dadd(15.84, -55.34, -11, 0.84)
    pt3dadd(15.84, -56.18, -11, 0.84)
    pt3dadd(15.78, -56.34, -11, 0.84)
    pt3dadd(15.78, -56.92, -11, 0.84)
    pt3dadd(15.84, -57.07, -11, 0.84)
    pt3dadd(15.94, -57.18, -11, 0.84)
    pt3dadd(15.89, -57.28, -11, 0.84)
    pt3dadd(16.16, -58.46, -12, 0.84)
    pt3dadd(16.26, -58.57, -12.5, 0.84)
    pt3dadd(16.26, -59.04, -12.5, 0.84)
    pt3dadd(16.21, -59.25, -12.5, 0.84)
    pt3dadd(16.21, -59.62, -13, 0.84)
    pt3dadd(16.26, -59.72, -13, 0.84)
    pt3dadd(16.26, -59.88, -13, 0.84)
    pt3dadd(16.37, -59.93, -13, 0.84)
    pt3dadd(16.42, -60.14, -13, 0.84)
    pt3dadd(16.53, -60.25, -13, 0.84)
    pt3dadd(16.53, -60.35, -13, 0.84)
    pt3dadd(16.63, -60.51, -13, 0.84)
    pt3dadd(16.73, -60.67, -13, 0.84)
    pt3dadd(16.89, -60.77, -13, 0.84)
    pt3dadd(16.95, -60.88, -13, 0.84)
    pt3dadd(17.05, -60.98, -13, 0.84)
    pt3dadd(17.16, -61.14, -13, 0.84)
    pt3dadd(17.26, -61.3, -13, 0.84)
    pt3dadd(17.3, -61.4, -13, 0.84)
    pt3dadd(17.42, -61.56, -13, 0.84)
    pt3dadd(17.47, -61.77, -13.5, 0.84)
    pt3dadd(17.52, -61.88, -13.5, 0.84)
    pt3dadd(17.47, -62.04, -13.5, 0.84)
    pt3dadd(17.37, -62.25, -13.5, 0.84)
    pt3dadd(17.3, -62.4, -13.5, 0.84)
    pt3dadd(17.21, -62.51, -13.5, 0.84)
    pt3dadd(17.1, -62.61, -13.5, 0.84)
    pt3dadd(17.05, -62.77, -13.5, 0.84)
    pt3dadd(16.95, -62.88, -13.5, 0.84)
    pt3dadd(16.84, -62.98, -13.5, 0.84)
    pt3dadd(16.89, -63.24, -13.5, 0.84)
    pt3dadd(16.84, -63.4, -13.5, 0.84)
    pt3dadd(16.84, -63.61, -14, 0.84)
    pt3dadd(16.79, -63.77, -14, 0.84)
    pt3dadd(16.79, -63.98, -14, 0.84)
    pt3dadd(16.84, -64.14, -14, 0.84)
    pt3dadd(16.84, -64.34, -14, 0.84)
    pt3dadd(16.89, -64.61, -14, 0.84)
    pt3dadd(16.95, -64.77, -14, 0.84)
    pt3dadd(17, -64.98, -14, 0.84)
    pt3dadd(17.05, -65.19, -14, 0.84)
    pt3dadd(17.05, -65.56, -14, 0.84)
    pt3dadd(17.1, -65.72, -14, 0.84)
    pt3dadd(17.1, -65.93, -14, 0.84)
    pt3dadd(17.21, -66.03, -14, 0.84)
    pt3dadd(17.21, -66.29, -14, 0.84)
    pt3dadd(17.26, -66.4, -14, 0.84)
    pt3dadd(17.37, -66.56, -14, 0.84)
    pt3dadd(17.37, -66.7, -14, 0.84)
    pt3dadd(17.47, -66.81, -14, 0.84)
    pt3dadd(17.47, -67.08, -14, 0.84)
    pt3dadd(17.57, -67.19, -14.5, 0.84)
    pt3dadd(17.63, -67.34, -14.5, 0.84)
    pt3dadd(17.63, -67.98, -14.5, 0.84)
    pt3dadd(17.57, -68.13, -14.5, 0.84)
    pt3dadd(17.57, -68.29, -14.5, 0.84)
    pt3dadd(17.68, -68.5, -14.5, 0.84)
    pt3dadd(17.79, -68.61, -14.5, 0.84)
    pt3dadd(17.84, -68.76, -14.5, 0.84)
    pt3dadd(17.94, -68.87, -14.5, 0.84)
    pt3dadd(18.05, -68.97, -15, 0.84)
    pt3dadd(18.1, -69.13, -15, 0.84)
    pt3dadd(18.26, -69.13, -15, 0.84)
    pt3dadd(18.3, -69.23, -15, 0.84)
    pt3dadd(18.77, -70.95, -15, 0.84)
    pt3dadd(18.72, -71.06, -15, 0.84)
    pt3dadd(18.66, -71.23, -15, 0.84)
    pt3dadd(18.66, -71.54, -15, 0.84)
    pt3dadd(18.61, -71.7, -15.5, 0.84)
    pt3dadd(18.55, -71.91, -15.5, 0.84)
    pt3dadd(18.55, -72.02, -15.5, 0.84)
    pt3dadd(18.39, -72.17, -15.5, 0.84)
    pt3dadd(18.39, -72.59, -15.5, 0.84)
    pt3dadd(18.35, -72.75, -16, 0.84)
    pt3dadd(18.35, -73.12, -16, 0.84)
    pt3dadd(18.3, -73.23, -16, 0.84)
    pt3dadd(18.23, -73.38, -16, 0.84)
    pt3dadd(18.19, -73.59, -16, 0.84)
    pt3dadd(18.19, -73.86, -16, 0.84)
    pt3dadd(18.14, -74.06, -16, 0.84)
    pt3dadd(18.14, -74.33, -16, 0.84)
    pt3dadd(18.09, -74.48, -16, 0.84)
    pt3dadd(18.09, -74.8, -16, 0.84)
    pt3dadd(18.03, -74.95, -16, 0.84)
    pt3dadd(17.93, -75.17, -16, 0.84)
    pt3dadd(17.93, -75.54, -16, 0.84)
    pt3dadd(17.82, -75.59, -16, 0.84)
    pt3dadd(17.82, -75.7, -16, 0.84)
    pt3dadd(17.77, -75.8, -16, 0.84)
    pt3dadd(17.77, -76.27, -16, 0.84)
    pt3dadd(17.82, -76.43, -16, 0.84)
    pt3dadd(17.82, -76.64, -16, 0.84)
    pt3dadd(17.93, -76.69, -16, 0.84)
    pt3dadd(17.98, -76.8, -16, 0.84)
    pt3dadd(17.98, -77.01, -16, 0.84)
    pt3dadd(18.03, -77.12, -16, 0.84)
    pt3dadd(18.03, -77.64, -16, 0.84)
    pt3dadd(17.93, -77.8, -16, 0.84)
    pt3dadd(17.88, -77.9, -16, 0.84)
    pt3dadd(17.82, -78.01, -16, 0.84)
    pt3dadd(17.72, -78.22, -16, 0.84)
    pt3dadd(17.61, -78.38, -16.5, 0.84)
    pt3dadd(17.55, -78.59, -16.5, 0.84)
    pt3dadd(17.46, -78.73, -16.5, 0.84)
    pt3dadd(17.35, -78.95, -16.5, 0.84)
    pt3dadd(17.35, -79.17, -16.5, 0.84)
    pt3dadd(17.25, -79.27, -16.5, 0.84)
    pt3dadd(17.25, -79.69, -17, 0.84)
    pt3dadd(17.19, -79.84, -17, 0.84)
    pt3dadd(17.19, -80.01, -17, 0.84)
    pt3dadd(17.3, -80.16, -17, 0.84)
    pt3dadd(17.35, -80.27, -17, 0.84)
    pt3dadd(17.39, -80.43, -17, 0.84)
    pt3dadd(17.51, -80.53, -17, 0.84)
    pt3dadd(17.55, -80.73, -17, 0.84)
    pt3dadd(17.67, -80.84, -17, 0.84)
    pt3dadd(17.77, -80.9, -17.5, 0.84)
    pt3dadd(17.82, -81.01, -17.5, 0.84)
    pt3dadd(17.93, -81.11, -17.5, 0.84)
    pt3dadd(17.98, -81.27, -17.5, 0.84)
    pt3dadd(18.09, -81.31, -17.5, 0.84)
    pt3dadd(18.19, -81.48, -17.5, 0.84)
    pt3dadd(18.3, -81.53, -17.5, 0.84)
    pt3dadd(18.35, -81.64, -17.5, 0.84)
    pt3dadd(18.45, -81.73, -17.5, 0.84)
    pt3dadd(18.61, -81.79, -17.5, 0.84)
    pt3dadd(18.66, -81.9, -17.5, 0.84)
    pt3dadd(18.89, -83.02, -17.5, 0.84)
    pt3dadd(18.89, -83.39, -17.5, 0.84)
    pt3dadd(18.94, -83.55, -17.5, 0.84)
    pt3dadd(18.94, -83.97, -17.5, 0.84)
    pt3dadd(18.89, -84.07, -17.5, 0.84)
    pt3dadd(18.82, -84.23, -18, 0.84)
    pt3dadd(18.78, -84.34, -18, 0.84)
    pt3dadd(18.73, -84.5, -18, 0.84)
    pt3dadd(18.73, -84.71, -18, 0.84)
    pt3dadd(18.68, -84.86, -18, 0.84)
    pt3dadd(18.62, -85.23, -18, 0.84)
    pt3dadd(18.57, -85.44, -18, 0.84)
    pt3dadd(18.52, -85.6, -18, 0.84)
    pt3dadd(18.52, -85.81, -18, 0.84)
    pt3dadd(18.57, -85.91, -18, 0.84)
    pt3dadd(18.57, -86.18, -18, 0.84)
    pt3dadd(18.68, -86.44, -18, 0.84)
    pt3dadd(18.78, -86.55, -18.5, 0.84)
    pt3dadd(18.78, -86.81, -18.5, 0.84)
    pt3dadd(18.73, -86.97, -19, 0.84)
    pt3dadd(18.78, -87.07, -19, 0.84)
    pt3dadd(18.82, -87.23, -19, 0.84)
    pt3dadd(19.25, -88.07, -19, 0.84)
    pt3dadd(19.36, -88.18, -19.5, 0.84)
    pt3dadd(19.46, -88.28, -19.5, 0.84)
    pt3dadd(19.57, -88.44, -19.5, 0.84)
    pt3dadd(19.62, -88.54, -19.5, 0.84)
    pt3dadd(19.73, -88.65, -19.5, 0.84)
    pt3dadd(19.78, -88.81, -20, 0.84)
    pt3dadd(19.82, -88.91, -20, 0.84)
    pt3dadd(19.98, -89.02, -20, 0.84)
    pt3dadd(20.04, -89.17, -20, 0.84)
    pt3dadd(20.14, -89.28, -20.5, 0.84)
    pt3dadd(20.14, -89.65, -20.5, 0.84)
    pt3dadd(20.2, -89.75, -20.5, 0.84)
    pt3dadd(20.2, -89.91, -20.5, 0.84)
    pt3dadd(20.36, -89.86, -20.5, 0.84)
    pt3dadd(20.3, -90.07, -20.5, 0.84)
    pt3dadd(20.25, -90.23, -20.5, 0.84)
    pt3dadd(20.2, -90.38, -20.5, 0.84)
    pt3dadd(20.09, -90.49, -20.5, 0.84)
    pt3dadd(20.04, -90.65, -20, 0.84)
    pt3dadd(19.98, -90.86, -20, 0.84)
    pt3dadd(19.94, -91.01, -19.5, 0.84)
    pt3dadd(19.94, -91.7, -19.5, 0.84)
    pt3dadd(19.98, -91.86, -19.5, 0.84)
    pt3dadd(20.04, -92.01, -19.5, 0.84)
    pt3dadd(20.14, -92.12, -19.5, 0.84)
    pt3dadd(20.2, -92.43, -19.5, 0.84)
    pt3dadd(20.3, -92.59, -19.5, 0.84)
    pt3dadd(20.41, -92.75, -19.5, 0.84)
  }
}
proc shape3d_23() {
  dend[19] {
    pt3dadd(20.46, -92.85, -19.5, 0.84)
    pt3dadd(20.46, -93.06, -19.5, 0.84)
    pt3dadd(20.51, -93.17, -19.5, 0.84)
    pt3dadd(20.51, -93.91, -19.5, 0.84)
    pt3dadd(20.23, -94.93, -19.5, 0.84)
    pt3dadd(20.23, -95.24, -20, 0.84)
    pt3dadd(20.19, -95.4, -20, 0.84)
    pt3dadd(20.13, -95.61, -20, 0.84)
    pt3dadd(20.07, -95.77, -20.5, 0.84)
    pt3dadd(19.98, -95.98, -20.5, 0.84)
    pt3dadd(19.98, -96.09, -20.5, 0.84)
    pt3dadd(19.87, -96.35, -20.5, 0.84)
    pt3dadd(19.77, -96.61, -21, 0.84)
    pt3dadd(19.71, -96.82, -21, 0.84)
    pt3dadd(19.66, -96.98, -21, 0.84)
    pt3dadd(19.66, -97.14, -21, 0.84)
    pt3dadd(19.61, -97.35, -21, 0.84)
    pt3dadd(19.61, -97.98, -21, 0.84)
    pt3dadd(19.66, -98.19, -21, 0.84)
    pt3dadd(19.77, -98.24, -21, 0.84)
    pt3dadd(19.87, -98.35, -21, 0.84)
    pt3dadd(19.92, -98.56, -21, 0.84)
    pt3dadd(19.98, -98.71, -21, 0.84)
    pt3dadd(20.03, -98.82, -21, 0.84)
    pt3dadd(20.07, -98.98, -21, 0.84)
    pt3dadd(20.07, -99.34, -21, 0.84)
    pt3dadd(20.13, -99.45, -21, 0.84)
    pt3dadd(20.13, -99.66, -21, 0.84)
    pt3dadd(20.19, -99.82, -21, 0.84)
    pt3dadd(20.19, -100.08, -21, 0.84)
    pt3dadd(20.23, -100.29, -21, 0.84)
    pt3dadd(20.23, -100.61, -21, 0.84)
    pt3dadd(20.29, -100.71, -21, 0.84)
    pt3dadd(20.29, -100.82, -21, 0.84)
    pt3dadd(20.34, -101.03, -21, 0.84)
    pt3dadd(20.39, -101.13, -21, 0.84)
    pt3dadd(20.45, -101.29, -21, 0.84)
    pt3dadd(20.55, -101.39, -21, 0.84)
    pt3dadd(20.61, -101.55, -21, 0.84)
    pt3dadd(20.71, -101.66, -21, 0.84)
    pt3dadd(20.71, -101.87, -21, 0.84)
    pt3dadd(20.82, -102.03, -21, 0.84)
    pt3dadd(20.87, -102.13, -21, 0.84)
    pt3dadd(20.87, -102.5, -21, 0.84)
    pt3dadd(20.97, -102.6, -21, 0.84)
    pt3dadd(21.08, -102.66, -21, 0.84)
    pt3dadd(21.13, -102.76, -21, 0.84)
    pt3dadd(21.18, -102.92, -21, 0.84)
    pt3dadd(21.18, -103.13, -21, 0.84)
    pt3dadd(21.24, -103.29, -21, 0.84)
    pt3dadd(21.24, -103.5, -21, 0.84)
    pt3dadd(21.29, -103.66, -21, 0.84)
    pt3dadd(21.29, -103.81, -21, 0.84)
    pt3dadd(21.34, -103.97, -21, 0.84)
    pt3dadd(21.39, -104.08, -21, 0.84)
    pt3dadd(21.5, -104.13, -21, 0.84)
    pt3dadd(21.45, -104.23, -21, 0.84)
    pt3dadd(21.45, -104.6, -21, 0.84)
    pt3dadd(21.39, -104.76, -21, 0.84)
    pt3dadd(21.39, -104.97, -21, 0.84)
    pt3dadd(21.34, -105.07, -21, 0.84)
    pt3dadd(21.34, -105.28, -21, 0.84)
    pt3dadd(21.29, -105.44, -21, 0.84)
    pt3dadd(21.24, -105.65, -21, 0.84)
    pt3dadd(21.24, -106.13, -21, 0.84)
    pt3dadd(21.18, -106.23, -21, 0.84)
    pt3dadd(21.34, -107.33, -21, 0.84)
    pt3dadd(21.34, -107.43, -21, 0.84)
    pt3dadd(21.4, -107.59, -21.5, 0.84)
    pt3dadd(21.45, -107.75, -21.5, 0.84)
    pt3dadd(21.5, -107.91, -21.5, 0.84)
    pt3dadd(21.5, -108.22, -21.5, 0.84)
    pt3dadd(21.55, -108.33, -21.5, 0.84)
    pt3dadd(21.55, -108.43, -21.5, 0.84)
    pt3dadd(21.66, -108.59, -21.5, 0.84)
    pt3dadd(21.71, -108.75, -22, 0.84)
    pt3dadd(21.82, -108.85, -22, 0.84)
    pt3dadd(21.76, -109.01, -22, 0.84)
    pt3dadd(21.76, -109.27, -22, 0.84)
    pt3dadd(21.87, -109.33, -22, 0.84)
    pt3dadd(21.92, -109.43, -22, 0.84)
    pt3dadd(21.92, -109.59, -22, 0.84)
    pt3dadd(21.92, -109.8, -22, 0.84)
    pt3dadd(21.92, -110.01, -22, 0.84)
    pt3dadd(22.03, -110.06, -22, 0.84)
    pt3dadd(22.03, -110.27, -22, 0.84)
    pt3dadd(21.97, -110.38, -22, 0.84)
    pt3dadd(21.97, -110.54, -22, 0.84)
    pt3dadd(21.92, -110.69, -22, 0.84)
    pt3dadd(21.92, -110.9, -22, 0.84)
    pt3dadd(21.87, -111.01, -22, 0.84)
    pt3dadd(21.87, -111.17, -22, 0.84)
    pt3dadd(21.82, -111.27, -22, 0.84)
    pt3dadd(21.71, -111.38, -22, 0.84)
    pt3dadd(21.71, -111.53, -22, 0.84)
    pt3dadd(21.66, -111.74, -22, 0.84)
    pt3dadd(21.66, -112.01, -22, 0.84)
    pt3dadd(21.61, -112.22, -22, 0.84)
    pt3dadd(21.61, -112.43, -22, 0.84)
    pt3dadd(21.55, -112.59, -22, 0.84)
    pt3dadd(21.55, -113.16, -22, 0.84)
    pt3dadd(21.61, -113.27, -22, 0.84)
    pt3dadd(21.61, -113.43, -22, 0.84)
    pt3dadd(21.66, -113.64, -22, 0.84)
    pt3dadd(21.71, -113.79, -22, 0.84)
    pt3dadd(21.76, -113.9, -22, 0.84)
    pt3dadd(21.82, -114.11, -22, 0.84)
    pt3dadd(21.92, -114.22, -22, 0.84)
    pt3dadd(21.97, -114.37, -22, 0.84)
    pt3dadd(22.03, -114.48, -22, 0.84)
    pt3dadd(22.13, -114.74, -22, 0.84)
    pt3dadd(22.24, -114.85, -22, 0.84)
    pt3dadd(22.34, -114.95, -22, 0.84)
    pt3dadd(22.39, -115.06, -22, 0.84)
    pt3dadd(22.5, -115.11, -22, 0.84)
    pt3dadd(22.55, -115.21, -22, 0.84)
    pt3dadd(22.66, -115.32, -22.5, 0.84)
    pt3dadd(22.81, -115.58, -22.5, 0.84)
    pt3dadd(22.92, -115.69, -22.5, 0.84)
    pt3dadd(22.97, -115.79, -22.5, 0.84)
    pt3dadd(23.08, -115.84, -22.5, 0.84)
    pt3dadd(23.08, -116.06, -22.5, 0.84)
    pt3dadd(23.18, -116.16, -22.5, 0.84)
    pt3dadd(23.34, -116.32, -22.5, 0.84)
    pt3dadd(23.34, -116.53, -22.5, 0.84)
    pt3dadd(23.44, -116.69, -22.5, 0.84)
    pt3dadd(23.55, -116.79, -22.5, 0.84)
    pt3dadd(23.6, -116.9, -22.5, 0.84)
    pt3dadd(23.71, -117.05, -22.5, 0.84)
    pt3dadd(23.76, -117.16, -22.5, 0.84)
    pt3dadd(23.92, -117.32, -22.5, 0.84)
    pt3dadd(24.02, -117.47, -22.5, 0.84)
    pt3dadd(24.13, -117.53, -22.5, 0.84)
    pt3dadd(24.23, -117.63, -22.5, 0.84)
    pt3dadd(24.23, -117.74, -22.5, 0.84)
    pt3dadd(24.44, -117.74, -22.5, 0.84)
    pt3dadd(24.39, -117.95, -22.5, 0.84)
    pt3dadd(24.83, -119, -23, 0.84)
    pt3dadd(24.88, -119.11, -23, 0.84)
    pt3dadd(24.94, -119.27, -23, 0.84)
    pt3dadd(24.99, -119.37, -23, 0.84)
    pt3dadd(25.09, -119.48, -23, 0.84)
    pt3dadd(25.2, -119.69, -23, 0.84)
    pt3dadd(25.36, -119.79, -23, 0.84)
    pt3dadd(25.46, -119.9, -23, 0.84)
    pt3dadd(25.62, -120, -23, 0.84)
    pt3dadd(25.72, -120.11, -23, 0.84)
    pt3dadd(25.83, -120.16, -23.5, 0.84)
    pt3dadd(25.99, -120.26, -23.5, 0.84)
    pt3dadd(26.14, -120.32, -23.5, 0.84)
    pt3dadd(26.25, -120.37, -23.5, 0.84)
    pt3dadd(26.35, -120.42, -23.5, 0.84)
    pt3dadd(26.46, -120.42, -24, 0.84)
    pt3dadd(26.56, -120.47, -24, 0.84)
    pt3dadd(26.93, -120.47, -24, 0.84)
    pt3dadd(27.14, -120.53, -24.5, 0.84)
    pt3dadd(27.3, -120.53, -24.5, 0.84)
    pt3dadd(27.51, -120.58, -24.5, 0.84)
    pt3dadd(27.67, -120.58, -24.5, 0.84)
    pt3dadd(27.82, -120.63, -25, 0.84)
    pt3dadd(27.98, -120.69, -25, 0.84)
    pt3dadd(28.14, -120.74, -25, 0.84)
    pt3dadd(28.24, -120.79, -25, 0.84)
    pt3dadd(28.35, -120.84, -25, 0.84)
    pt3dadd(28.45, -120.9, -25, 0.84)
    pt3dadd(28.66, -120.95, -25, 0.84)
    pt3dadd(29.61, -121.1, -25, 0.94)
    pt3dadd(29.61, -121.25, -25, 0.94)
    pt3dadd(29.66, -121.47, -25, 0.94)
    pt3dadd(29.72, -121.62, -25, 0.94)
    pt3dadd(29.77, -121.78, -25, 0.94)
    pt3dadd(29.82, -121.89, -25, 0.94)
    pt3dadd(29.93, -122.1, -25, 0.94)
    pt3dadd(30.19, -122.36, -25.5, 0.94)
    pt3dadd(31.19, -122.36, -27.5, 0.94)
    pt3dadd(31.24, -122.46, -27.5, 0.94)
    pt3dadd(31.34, -122.52, -27.5, 0.94)
    pt3dadd(31.4, -122.67, -27.5, 0.94)
    pt3dadd(31.5, -122.88, -28, 0.94)
    pt3dadd(31.66, -123.15, -28, 0.94)
    pt3dadd(31.66, -123.83, -28.5, 0.94)
    pt3dadd(31.61, -123.94, -29, 0.94)
    pt3dadd(31.55, -124.04, -29, 0.94)
    pt3dadd(31.45, -124.25, -29, 0.94)
    pt3dadd(31.34, -124.36, -29, 0.94)
    pt3dadd(31.24, -124.51, -29, 0.94)
    pt3dadd(31.08, -124.57, -29.5, 0.94)
    pt3dadd(30.82, -124.72, -29.5, 0.94)
    pt3dadd(30.82, -124.83, -29.5, 0.94)
    pt3dadd(30.71, -124.93, -29.5, 0.94)
    pt3dadd(30.56, -125.14, -29.5, 0.94)
    pt3dadd(30.45, -125.25, -29.5, 0.94)
    pt3dadd(30.4, -125.41, -29.5, 0.94)
    pt3dadd(30.29, -125.62, -30, 0.94)
    pt3dadd(30.35, -125.83, -30, 0.94)
    pt3dadd(30.4, -125.93, -30, 0.94)
    pt3dadd(30.56, -126.09, -30, 0.94)
    pt3dadd(30.66, -126.14, -30, 0.94)
    pt3dadd(30.82, -126.2, -30, 0.94)
    pt3dadd(30.98, -126.41, -30, 0.94)
    pt3dadd(31.08, -126.35, -30, 0.94)
    pt3dadd(31.24, -126.46, -30.5, 0.94)
    pt3dadd(31.4, -126.56, -30.5, 0.94)
    pt3dadd(31.55, -126.62, -30.5, 0.94)
    pt3dadd(31.71, -126.72, -30.5, 0.94)
    pt3dadd(31.82, -126.83, -30.5, 0.94)
    pt3dadd(31.92, -126.93, -31, 0.94)
    pt3dadd(32.03, -127.04, -31, 0.94)
    pt3dadd(32.13, -127.09, -31.5, 0.94)
    pt3dadd(32.13, -127.2, -31.5, 0.94)
    pt3dadd(32.24, -127.3, -31.5, 0.94)
    pt3dadd(32.29, -127.41, -31.5, 0.94)
    pt3dadd(32.39, -127.56, -31.5, 0.94)
    pt3dadd(32.39, -127.93, -31.5, 0.94)
    pt3dadd(32.45, -128.09, -31.5, 0.94)
    pt3dadd(32.45, -128.4, -31.5, 0.94)
    pt3dadd(32.39, -128.56, -32, 0.94)
    pt3dadd(32.34, -128.77, -32, 0.94)
    pt3dadd(32.24, -128.93, -32, 0.94)
    pt3dadd(32.18, -129.04, -32, 0.94)
    pt3dadd(32.13, -129.25, -32, 0.94)
    pt3dadd(32.03, -129.4, -32, 0.94)
    pt3dadd(32.13, -129.4, -32, 0.94)
    pt3dadd(32.18, -129.56, -32, 0.94)
    pt3dadd(32.13, -129.72, -32, 0.94)
    pt3dadd(32.13, -130.03, -32, 0.94)
    pt3dadd(32.18, -130.19, -32, 0.94)
    pt3dadd(32.29, -130.24, -32, 0.94)
    pt3dadd(32.29, -130.4, -32, 0.94)
    pt3dadd(32.34, -130.56, -32, 0.94)
    pt3dadd(32.45, -130.66, -32, 0.94)
    pt3dadd(32.54, -130.77, -32, 0.94)
    pt3dadd(32.6, -130.93, -32, 0.94)
    pt3dadd(32.76, -130.93, -32, 0.94)
    pt3dadd(32.92, -130.97, -32, 0.94)
    pt3dadd(33.02, -131.09, -32, 0.94)
    pt3dadd(33.13, -131.13, -32, 0.94)
    pt3dadd(33.34, -131.24, -32, 0.94)
    pt3dadd(33.5, -131.3, -32, 0.94)
    pt3dadd(33.65, -131.35, -32, 0.94)
    pt3dadd(33.81, -131.44, -32, 0.94)
    pt3dadd(33.97, -131.61, -32, 0.94)
    pt3dadd(34.13, -131.66, -32, 0.94)
    pt3dadd(34.13, -131.77, -32, 0.94)
    pt3dadd(34.22, -131.87, -32, 0.94)
    pt3dadd(34.34, -131.97, -32, 0.94)
    pt3dadd(34.39, -132.08, -32, 0.94)
    pt3dadd(34.54, -132.19, -32, 0.94)
    pt3dadd(34.54, -132.35, -32, 0.94)
  }
}
proc shape3d_24() {
  dend[19] {
    pt3dadd(34.54, -132.71, -32, 0.94)
    pt3dadd(34.54, -132.82, -32, 0.94)
    pt3dadd(34.54, -132.93, -32, 0.94)
    pt3dadd(34.39, -133.03, -32, 0.94)
    pt3dadd(34.28, -133.13, -32, 0.94)
    pt3dadd(34.18, -133.19, -32, 0.94)
    pt3dadd(34.07, -133.24, -32, 0.94)
    pt3dadd(33.92, -133.44, -32, 0.94)
    pt3dadd(33.76, -133.5, -32, 0.94)
    pt3dadd(33.65, -133.66, -32, 0.94)
    pt3dadd(33.54, -133.77, -32, 0.94)
    pt3dadd(33.54, -134.03, -32, 0.94)
    pt3dadd(33.5, -134.24, -32, 0.94)
    pt3dadd(33.5, -134.82, -32, 0.94)
    pt3dadd(33.6, -135.08, -32, 0.94)
    pt3dadd(34.34, -135.91, -32, 0.94)
    pt3dadd(34.45, -136.01, -32, 0.94)
    pt3dadd(34.54, -136.16, -32, 0.94)
    pt3dadd(34.6, -136.27, -32, 0.94)
    pt3dadd(34.71, -136.47, -32, 0.94)
    pt3dadd(34.81, -136.59, -32, 0.94)
    pt3dadd(34.97, -136.63, -32, 0.94)
    pt3dadd(35.02, -136.75, -32, 0.94)
    pt3dadd(35.08, -136.85, -32, 0.94)
    pt3dadd(35.13, -137.01, -32.5, 0.94)
    pt3dadd(35.22, -137.11, -32.5, 0.94)
    pt3dadd(35.29, -137.38, -32.5, 0.94)
    pt3dadd(35.34, -137.47, -32.5, 0.94)
    pt3dadd(35.39, -137.63, -32.5, 0.94)
    pt3dadd(35.44, -137.85, -32.5, 0.94)
    pt3dadd(35.44, -138.47, -32.5, 0.94)
    pt3dadd(35.29, -138.53, -32.5, 0.94)
    pt3dadd(35.22, -138.74, -32.5, 0.94)
    pt3dadd(35.08, -139.01, -32.5, 0.94)
    pt3dadd(35.02, -139.16, -32.5, 0.94)
    pt3dadd(35.02, -139.32, -33, 0.94)
    pt3dadd(34.97, -139.53, -33, 0.94)
    pt3dadd(34.97, -139.9, -33, 0.94)
    pt3dadd(34.92, -140.06, -33, 0.94)
    pt3dadd(34.92, -140.53, -33.5, 0.94)
    pt3dadd(34.92, -140.79, -33.5, 0.94)
    pt3dadd(34.97, -140.9, -33.5, 0.94)
    pt3dadd(35.08, -141, -33.5, 0.94)
    pt3dadd(35.18, -141.11, -33.5, 0.94)
    pt3dadd(35.29, -141.11, -34, 0.94)
    pt3dadd(35.39, -141.21, -34, 0.94)
    pt3dadd(35.5, -141.32, -34, 0.94)
    pt3dadd(35.6, -141.32, -34, 0.94)
    pt3dadd(35.76, -141.41, -34, 0.94)
    pt3dadd(35.86, -141.47, -34, 0.94)
    pt3dadd(36.02, -141.58, -34, 0.94)
    pt3dadd(36.13, -141.58, -34, 0.94)
    pt3dadd(36.28, -141.63, -34, 0.94)
    pt3dadd(36.39, -141.74, -34, 0.94)
    pt3dadd(36.49, -141.85, -34.5, 0.94)
    pt3dadd(36.6, -141.9, -34.5, 0.94)
    pt3dadd(36.7, -142, -34.5, 0.94)
    pt3dadd(36.86, -142.06, -34.5, 0.94)
    pt3dadd(36.97, -142.16, -34.5, 0.94)
    pt3dadd(37.22, -142.16, -34.5, 0.94)
    pt3dadd(37.33, -142.21, -34.5, 0.94)
    pt3dadd(37.44, -142.21, -34.5, 0.94)
    pt3dadd(37.7, -142.32, -34.5, 0.94)
    pt3dadd(37.81, -142.32, -34.5, 0.94)
    pt3dadd(37.96, -142.37, -34.5, 0.94)
    pt3dadd(38.17, -142.37, -34.5, 0.94)
    pt3dadd(38.38, -142.41, -34.5, 0.94)
    pt3dadd(38.65, -142.47, -34.5, 0.94)
    pt3dadd(38.79, -142.53, -34.5, 0.94)
    pt3dadd(39.33, -142.53, -34.5, 0.94)
    pt3dadd(39.43, -142.58, -34.5, 0.94)
    pt3dadd(39.7, -142.58, -34.5, 0.94)
    pt3dadd(39.9, -142.63, -34.5, 0.94)
    pt3dadd(40.06, -142.69, -34.5, 0.94)
    pt3dadd(40.27, -142.69, -35, 0.94)
    pt3dadd(40.54, -142.79, -35, 0.94)
    pt3dadd(40.64, -142.84, -35, 0.94)
    pt3dadd(40.75, -142.9, -35, 0.94)
    pt3dadd(40.75, -143.53, -35.5, 0.94)
    pt3dadd(40.64, -143.63, -36, 0.94)
    pt3dadd(40.59, -143.74, -36, 0.94)
    pt3dadd(40.54, -143.84, -36, 0.94)
    pt3dadd(40.47, -144, -36, 0.94)
    pt3dadd(40.54, -144, -36.5, 0.94)
    pt3dadd(40.64, -144.16, -36.5, 0.94)
    pt3dadd(40.75, -144.16, -36.5, 0.94)
    pt3dadd(40.79, -144.26, -36.5, 0.94)
    pt3dadd(40.96, -144.32, -36.5, 0.94)
    pt3dadd(41.06, -144.37, -36.5, 0.94)
    pt3dadd(41.17, -144.41, -36.5, 0.94)
    pt3dadd(41.27, -144.41, -36.5, 0.94)
    pt3dadd(41.38, -144.47, -36.5, 0.94)
    pt3dadd(41.48, -144.58, -36.5, 0.94)
    pt3dadd(41.59, -144.68, -37, 0.94)
    pt3dadd(41.74, -144.79, -37, 0.94)
    pt3dadd(41.8, -144.94, -37, 0.94)
    pt3dadd(41.95, -145.1, -37, 0.94)
    pt3dadd(42.01, -145.26, -37, 0.94)
    pt3dadd(42.22, -145.47, -37, 0.94)
    pt3dadd(42.27, -145.58, -37, 0.94)
    pt3dadd(42.32, -145.74, -37, 0.94)
    pt3dadd(42.43, -145.94, -37, 0.94)
    pt3dadd(42.48, -146.1, -37, 0.94)
    pt3dadd(42.53, -146.21, -37, 0.94)
    pt3dadd(42.53, -146.41, -37, 0.94)
    pt3dadd(42.58, -146.52, -37, 0.94)
    pt3dadd(42.58, -146.63, -37, 0.94)
    pt3dadd(42.53, -146.72, -37, 0.94)
    pt3dadd(42.48, -146.88, -37, 0.94)
    pt3dadd(42.48, -147, -37, 0.94)
    pt3dadd(42.37, -147.21, -37, 0.94)
    pt3dadd(42.3, -148.28, -37.5, 0.94)
    pt3dadd(42.3, -148.55, -37.5, 0.94)
    pt3dadd(42.4, -148.76, -37.5, 0.94)
    pt3dadd(42.4, -149.28, -37.5, 0.94)
    pt3dadd(42.46, -149.44, -37.5, 0.94)
    pt3dadd(42.46, -149.81, -37.5, 0.94)
    pt3dadd(42.46, -150.12, -37.5, 0.94)
    pt3dadd(42.51, -150.33, -37.5, 0.94)
    pt3dadd(42.51, -150.81, -37.5, 0.94)
    pt3dadd(42.56, -150.97, -37.5, 0.94)
    pt3dadd(42.56, -151.22, -37.5, 0.94)
    pt3dadd(42.51, -151.38, -37.5, 0.94)
    pt3dadd(42.46, -151.65, -37.5, 0.94)
    pt3dadd(42.4, -151.86, -38, 0.94)
    pt3dadd(42.4, -152.22, -38, 0.94)
    pt3dadd(42.51, -152.33, -38, 0.94)
    pt3dadd(42.56, -152.54, -38, 0.94)
    pt3dadd(42.67, -152.6, -38, 0.94)
    pt3dadd(42.82, -152.75, -38, 0.94)
    pt3dadd(43.03, -152.86, -38, 0.94)
    pt3dadd(43.14, -152.86, -38, 0.94)
    pt3dadd(43.3, -152.91, -38, 0.94)
    pt3dadd(43.4, -153.02, -38, 0.94)
    pt3dadd(43.56, -153.02, -38, 0.94)
    pt3dadd(43.72, -153.16, -38, 0.94)
    pt3dadd(43.82, -153.22, -38, 0.94)
    pt3dadd(43.93, -153.28, -38, 0.94)
    pt3dadd(44.08, -153.38, -38, 0.94)
    pt3dadd(44.14, -153.54, -38, 0.94)
    pt3dadd(44.24, -153.65, -38, 0.94)
    pt3dadd(44.35, -153.8, -38, 0.94)
    pt3dadd(44.45, -154.01, -38, 0.94)
    pt3dadd(44.56, -154.28, -38, 0.94)
    pt3dadd(44.61, -154.38, -38, 0.94)
    pt3dadd(44.66, -154.54, -38, 0.94)
    pt3dadd(44.71, -154.65, -38, 0.94)
    pt3dadd(44.77, -154.75, -38.5, 0.94)
    pt3dadd(44.82, -154.91, -38.5, 0.94)
    pt3dadd(44.92, -155.01, -38.5, 0.94)
    pt3dadd(44.92, -155.12, -38.5, 0.94)
    pt3dadd(44.98, -155.28, -38.5, 0.94)
    pt3dadd(45.03, -155.38, -38.5, 0.94)
    pt3dadd(45.03, -155.75, -38.5, 0.94)
    pt3dadd(45.08, -155.85, -38.5, 0.94)
    pt3dadd(45.13, -155.96, -38.5, 0.94)
    pt3dadd(45.13, -156.12, -38.5, 0.94)
    pt3dadd(45.19, -156.33, -38.5, 0.94)
    pt3dadd(45.19, -156.69, -38.5, 0.94)
    pt3dadd(45.24, -156.91, -38.5, 0.94)
    pt3dadd(45.29, -157.01, -38.5, 0.94)
    pt3dadd(45.34, -157.16, -38.5, 0.94)
    pt3dadd(45.45, -157.27, -38.5, 0.94)
    pt3dadd(45.55, -157.33, -38.5, 0.94)
    pt3dadd(45.66, -157.38, -38.5, 0.94)
    pt3dadd(45.82, -157.43, -38.5, 0.94)
    pt3dadd(45.97, -157.59, -38.5, 0.94)
    pt3dadd(46.18, -157.63, -38.5, 0.94)
    pt3dadd(46.45, -157.69, -38.5, 0.94)
    pt3dadd(46.66, -157.8, -38.5, 0.94)
    pt3dadd(46.76, -157.9, -38.5, 0.94)
    pt3dadd(46.92, -157.85, -38.5, 0.94)
    pt3dadd(47.02, -157.9, -38.5, 0.94)
    pt3dadd(47.13, -157.96, -38.5, 0.94)
    pt3dadd(47.29, -158.11, -38.5, 0.94)
    pt3dadd(47.39, -158.22, -38.5, 0.94)
    pt3dadd(47.5, -158.33, -38.5, 0.94)
    pt3dadd(47.65, -158.47, -38.5, 0.94)
    pt3dadd(47.76, -158.59, -38.5, 0.94)
    pt3dadd(47.86, -158.69, -38.5, 0.94)
    pt3dadd(47.97, -158.8, -38.5, 0.94)
    pt3dadd(48.07, -158.9, -38.5, 0.94)
    pt3dadd(48.18, -159.06, -38.5, 0.94)
    pt3dadd(48.23, -159.22, -38.5, 0.94)
    pt3dadd(48.28, -159.43, -38.5, 0.94)
    pt3dadd(48.34, -159.53, -38.5, 0.94)
    pt3dadd(48.34, -159.69, -38.5, 0.94)
    pt3dadd(48.66, -161.02, -38.5, 0.94)
    pt3dadd(48.87, -161.07, -38.5, 0.94)
    pt3dadd(49.08, -161.07, -38.5, 0.94)
    pt3dadd(49.13, -161.28, -38.5, 0.94)
    pt3dadd(49.13, -161.76, -38.5, 0.94)
    pt3dadd(49.18, -162.12, -38.5, 0.94)
    pt3dadd(49.23, -162.22, -38.5, 0.94)
    pt3dadd(49.23, -162.6, -38.5, 0.94)
    pt3dadd(49.18, -162.69, -38.5, 0.94)
    pt3dadd(49.18, -162.81, -38.5, 0.94)
    pt3dadd(49.23, -162.91, -38.5, 0.94)
    pt3dadd(49.18, -163.02, -38.5, 0.94)
    pt3dadd(49.23, -163.22, -38.5, 0.94)
    pt3dadd(49.23, -164.23, -38.5, 0.94)
    pt3dadd(49.29, -164.38, -38.5, 0.94)
    pt3dadd(49.34, -164.49, -38.5, 0.94)
    pt3dadd(49.34, -164.65, -38.5, 0.94)
    pt3dadd(49.44, -164.81, -38.5, 0.94)
    pt3dadd(49.6, -164.91, -38.5, 0.94)
    pt3dadd(49.65, -165.12, -38.5, 0.94)
    pt3dadd(49.76, -165.23, -38.5, 0.94)
    pt3dadd(49.86, -165.33, -38.5, 0.94)
    pt3dadd(49.92, -165.44, -38.5, 0.94)
    pt3dadd(50.02, -165.59, -38.5, 0.94)
    pt3dadd(50.13, -165.75, -38.5, 0.94)
    pt3dadd(50.28, -165.8, -38.5, 0.94)
    pt3dadd(50.34, -165.91, -38.5, 0.94)
    pt3dadd(50.6, -166.07, -38.5, 0.94)
    pt3dadd(50.7, -166.07, -38.5, 0.94)
    pt3dadd(50.81, -166.12, -38.5, 0.94)
    pt3dadd(50.86, -166.28, -38.5, 0.94)
    pt3dadd(50.97, -166.44, -38.5, 0.94)
    pt3dadd(51.07, -166.65, -38.5, 0.94)
    pt3dadd(51.12, -166.8, -38.5, 0.94)
    pt3dadd(51.12, -167.12, -38.5, 0.94)
    pt3dadd(51.23, -167.28, -38.5, 0.94)
    pt3dadd(51.23, -167.49, -38.5, 0.94)
    pt3dadd(51.28, -167.7, -38.5, 0.94)
    pt3dadd(51.33, -167.8, -38.5, 0.94)
    pt3dadd(51.39, -167.96, -38.5, 0.94)
    pt3dadd(51.44, -168.12, -38.5, 0.94)
    pt3dadd(51.54, -168.22, -38.5, 0.94)
    pt3dadd(51.6, -168.43, -38.5, 0.94)
    pt3dadd(51.7, -168.7, -38.5, 0.94)
    pt3dadd(51.7, -168.85, -38.5, 0.94)
    pt3dadd(51.81, -168.96, -38.5, 0.94)
    pt3dadd(51.86, -169.12, -38.5, 0.94)
    pt3dadd(51.91, -169.38, -38.5, 0.94)
    pt3dadd(52.02, -169.64, -38.5, 0.94)
    pt3dadd(52.07, -169.8, -38.5, 0.94)
    pt3dadd(52.17, -169.9, -38.5, 0.94)
    pt3dadd(52.23, -170.01, -38.5, 0.94)
    pt3dadd(52.28, -170.11, -38.5, 0.94)
    pt3dadd(52.33, -170.22, -38.5, 0.94)
    pt3dadd(52.38, -170.43, -38.5, 0.94)
    pt3dadd(52.38, -170.59, -38.5, 0.94)
    pt3dadd(52.49, -170.69, -38.5, 0.94)
    pt3dadd(52.54, -170.85, -38.5, 0.94)
    pt3dadd(52.59, -171.06, -38.5, 0.94)
    pt3dadd(52.7, -171.22, -38.5, 0.94)
    pt3dadd(52.75, -171.43, -38.5, 0.94)
    pt3dadd(52.8, -171.59, -38.5, 0.94)
  }
}
proc shape3d_25() {
  dend[19] {
    pt3dadd(52.96, -171.59, -38.5, 0.94)
    pt3dadd(52.96, -171.8, -38.5, 0.94)
    pt3dadd(53.93, -172.78, -39.5, 0.94)
    pt3dadd(53.98, -172.89, -39.5, 0.94)
    pt3dadd(53.93, -173.26, -40, 0.94)
    pt3dadd(53.88, -173.47, -40, 0.94)
    pt3dadd(53.88, -174.15, -40, 0.94)
    pt3dadd(53.98, -174.41, -40, 0.94)
    pt3dadd(54.04, -174.52, -40, 0.94)
    pt3dadd(54.14, -174.83, -40, 0.94)
    pt3dadd(54.25, -174.99, -40, 0.94)
    pt3dadd(54.35, -175.15, -40, 0.94)
    pt3dadd(54.4, -175.36, -40, 0.94)
    pt3dadd(54.46, -175.47, -40, 0.94)
    pt3dadd(54.56, -175.62, -40, 0.94)
    pt3dadd(54.67, -175.83, -40, 0.94)
    pt3dadd(54.77, -175.94, -40, 0.94)
    pt3dadd(54.82, -176.04, -40, 0.94)
    pt3dadd(54.88, -176.2, -40, 0.94)
    pt3dadd(54.93, -176.36, -39.5, 0.94)
    pt3dadd(54.98, -176.46, -39.5, 0.94)
    pt3dadd(55.03, -176.67, -39.5, 0.94)
    pt3dadd(55.03, -176.94, -39.5, 0.94)
    pt3dadd(55.09, -177.15, -39, 0.94)
    pt3dadd(55.19, -177.25, -39, 0.94)
    pt3dadd(55.19, -177.67, -39, 0.94)
    pt3dadd(55.24, -177.88, -39, 0.94)
    pt3dadd(55.24, -178.15, -39, 0.94)
    pt3dadd(55.3, -178.3, -39, 0.94)
    pt3dadd(55.35, -178.51, -38.5, 0.94)
    pt3dadd(55.35, -178.72, -38.5, 0.94)
    pt3dadd(55.45, -178.94, -38.5, 0.94)
    pt3dadd(55.51, -179.09, -38.5, 0.94)
    pt3dadd(55.61, -179.3, -38.5, 0.94)
    pt3dadd(55.66, -179.46, -38.5, 0.94)
    pt3dadd(55.72, -179.67, -38.5, 0.94)
    pt3dadd(55.82, -179.83, -38.5, 0.94)
    pt3dadd(55.87, -179.93, -38.5, 0.94)
    pt3dadd(55.93, -180.09, -38.5, 0.94)
  }
  dend[20] {pt3dclear()
    pt3dadd(4.17, -22.32, -3, 0.89)
    pt3dadd(5.15, -23.11, -3, 0.84)
    pt3dadd(5.2, -23.27, -4, 0.84)
    pt3dadd(5.31, -23.42, -4, 0.84)
    pt3dadd(5.36, -23.53, -4, 0.84)
    pt3dadd(5.52, -23.58, -4, 0.84)
    pt3dadd(5.57, -23.74, -4, 0.84)
    pt3dadd(5.73, -23.9, -4, 0.84)
    pt3dadd(5.83, -23.95, -4, 0.84)
    pt3dadd(5.89, -24.05, -4, 0.84)
    pt3dadd(5.99, -24.16, -4, 0.84)
    pt3dadd(6.1, -24.26, -4, 0.84)
    pt3dadd(6.25, -24.37, -4, 0.84)
    pt3dadd(6.36, -24.47, -4, 0.84)
    pt3dadd(6.52, -24.58, -4, 0.84)
    pt3dadd(6.52, -24.79, -4, 0.84)
    pt3dadd(6.78, -25.05, -4.5, 0.84)
    pt3dadd(6.83, -25.21, -4.5, 0.84)
    pt3dadd(6.94, -25.32, -4.5, 0.84)
    pt3dadd(6.94, -25.42, -4.5, 0.84)
    pt3dadd(7.09, -25.58, -4.5, 0.84)
    pt3dadd(7.2, -25.68, -4.5, 0.84)
    pt3dadd(7.3, -25.79, -4.5, 0.84)
    pt3dadd(7.3, -25.95, -4.5, 0.84)
    pt3dadd(7.36, -26.05, -4.5, 0.84)
    pt3dadd(7.46, -26.16, -4.5, 0.84)
    pt3dadd(7.57, -26.21, -4.5, 0.84)
    pt3dadd(7.62, -26.31, -4.5, 0.84)
    pt3dadd(7.83, -26.42, -5, 0.84)
    pt3dadd(7.99, -26.53, -5, 0.84)
    pt3dadd(8.35, -26.53, -5, 0.84)
    pt3dadd(8.46, -26.58, -5, 0.84)
    pt3dadd(8.72, -26.58, -5, 0.84)
    pt3dadd(8.93, -26.53, -5, 0.84)
    pt3dadd(9.19, -26.53, -5, 0.84)
    pt3dadd(9.35, -26.63, -5, 0.84)
    pt3dadd(9.46, -26.68, -5, 0.84)
    pt3dadd(9.56, -26.79, -5, 0.84)
    pt3dadd(9.67, -26.89, -5, 0.84)
    pt3dadd(9.72, -27, -5, 0.84)
    pt3dadd(9.82, -27.05, -5, 0.84)
    pt3dadd(9.88, -27.16, -5, 0.84)
    pt3dadd(9.98, -27.26, -5.5, 0.84)
    pt3dadd(9.98, -27.52, -5.5, 0.84)
    pt3dadd(10.09, -27.52, -6, 0.84)
    pt3dadd(10.82, -28.31, -5.5, 0.84)
    pt3dadd(10.87, -28.42, -5.5, 0.84)
    pt3dadd(10.93, -28.52, -5.5, 0.84)
    pt3dadd(11.08, -28.68, -5.5, 0.84)
    pt3dadd(11.24, -28.79, -5.5, 0.84)
    pt3dadd(11.24, -28.94, -5.5, 0.84)
    pt3dadd(11.35, -29.05, -5.5, 0.84)
    pt3dadd(11.45, -29.21, -5.5, 0.84)
    pt3dadd(11.5, -29.31, -5.5, 0.84)
    pt3dadd(11.71, -29.52, -5.5, 0.84)
    pt3dadd(11.82, -29.57, -5.5, 0.84)
    pt3dadd(11.92, -29.78, -5.5, 0.84)
    pt3dadd(12.13, -29.89, -6, 0.84)
    pt3dadd(12.29, -30.05, -6, 0.84)
    pt3dadd(12.4, -30.1, -6, 0.84)
    pt3dadd(12.5, -30.2, -6, 0.84)
    pt3dadd(12.66, -30.2, -6, 0.84)
    pt3dadd(12.71, -30.31, -6, 0.84)
    pt3dadd(12.82, -30.36, -6, 0.84)
    pt3dadd(13.03, -30.42, -6, 0.84)
    pt3dadd(13.18, -30.47, -6, 0.84)
    pt3dadd(13.29, -30.52, -6, 0.84)
    pt3dadd(13.39, -30.63, -6, 0.84)
    pt3dadd(13.55, -30.63, -6, 0.84)
    pt3dadd(13.66, -30.68, -6, 0.84)
    pt3dadd(13.81, -30.73, -6, 0.84)
    pt3dadd(13.92, -30.78, -6, 0.84)
    pt3dadd(14.02, -30.89, -6, 0.84)
    pt3dadd(14.13, -30.89, -6, 0.84)
    pt3dadd(14.29, -30.94, -6, 0.84)
    pt3dadd(14.44, -30.94, -6, 0.84)
    pt3dadd(14.6, -31.05, -6, 0.84)
    pt3dadd(14.81, -31.1, -6, 0.84)
    pt3dadd(14.92, -31.15, -6, 0.84)
    pt3dadd(15.1, -31.26, -6, 0.84)
    pt3dadd(15.23, -31.41, -6, 0.84)
    pt3dadd(15.39, -31.41, -6, 0.84)
    pt3dadd(15.44, -31.52, -6, 0.84)
    pt3dadd(15.55, -31.62, -6, 0.84)
    pt3dadd(15.6, -31.78, -6, 0.84)
    pt3dadd(15.81, -31.89, -6, 0.84)
    pt3dadd(15.86, -31.99, -6, 0.84)
    pt3dadd(15.97, -32.04, -6, 0.84)
    pt3dadd(16.07, -32.15, -6, 0.84)
    pt3dadd(16.12, -32.26, -6, 0.84)
    pt3dadd(16.28, -32.26, -6, 0.84)
    pt3dadd(16.39, -32.31, -6, 0.84)
    pt3dadd(16.48, -32.4, -6, 0.84)
    pt3dadd(16.6, -32.52, -6, 0.84)
    pt3dadd(16.7, -32.68, -6, 0.84)
    pt3dadd(16.91, -32.72, -6, 0.84)
    pt3dadd(17.12, -32.83, -6, 0.84)
    pt3dadd(17.17, -32.94, -6, 0.84)
    pt3dadd(17.28, -33.04, -6, 0.84)
    pt3dadd(17.32, -33.15, -6, 0.84)
    pt3dadd(17.32, -33.31, -6, 0.84)
    pt3dadd(17.32, -33.46, -6, 0.84)
    pt3dadd(17.48, -33.52, -6, 0.84)
    pt3dadd(17.48, -33.72, -6, 0.84)
    pt3dadd(17.64, -33.78, -6, 0.84)
    pt3dadd(17.75, -33.88, -6, 0.84)
    pt3dadd(18.32, -34.4, -6, 0.84)
    pt3dadd(18.32, -34.77, -6, 0.84)
    pt3dadd(18.43, -34.86, -6, 0.84)
    pt3dadd(18.64, -34.86, -6, 0.84)
    pt3dadd(18.69, -34.97, -6, 0.84)
    pt3dadd(18.8, -35.03, -6, 0.84)
    pt3dadd(18.89, -35.13, -6, 0.84)
    pt3dadd(18.96, -35.29, -6, 0.84)
    pt3dadd(19.05, -35.4, -6, 0.84)
    pt3dadd(19.17, -35.5, -6, 0.84)
    pt3dadd(19.32, -35.54, -6, 0.84)
    pt3dadd(19.43, -35.65, -6, 0.84)
    pt3dadd(19.53, -35.71, -6, 0.84)
    pt3dadd(19.64, -35.76, -6.5, 0.84)
    pt3dadd(19.69, -35.92, -6.5, 0.84)
    pt3dadd(19.8, -36.03, -6.5, 0.84)
    pt3dadd(19.89, -36.08, -6.5, 0.84)
    pt3dadd(20.05, -36.19, -6.5, 0.84)
    pt3dadd(20.11, -36.29, -6.5, 0.84)
    pt3dadd(20.27, -36.13, -6.5, 0.84)
    pt3dadd(20.37, -36.13, -6.5, 0.84)
    pt3dadd(20.48, -36.24, -6.5, 0.84)
    pt3dadd(20.58, -36.34, -6.5, 0.84)
    pt3dadd(20.74, -36.4, -6.5, 0.84)
    pt3dadd(20.85, -36.5, -6.5, 0.84)
    pt3dadd(20.95, -36.61, -6.5, 0.84)
    pt3dadd(21, -36.76, -6.5, 0.84)
    pt3dadd(21.11, -36.86, -6.5, 0.84)
    pt3dadd(21.21, -36.97, -6.5, 0.84)
    pt3dadd(21.32, -37.08, -6.5, 0.84)
    pt3dadd(21.37, -37.18, -7, 0.84)
    pt3dadd(21.48, -37.34, -7, 0.84)
    pt3dadd(21.53, -37.5, -7, 0.84)
    pt3dadd(21.58, -37.6, -7, 0.84)
    pt3dadd(21.63, -37.81, -7, 0.84)
    pt3dadd(21.69, -37.97, -7, 0.84)
    pt3dadd(21.79, -38.08, -7, 0.84)
    pt3dadd(21.84, -38.24, -7, 0.84)
    pt3dadd(21.95, -38.24, -7, 0.84)
    pt3dadd(22.05, -38.29, -7, 0.84)
    pt3dadd(22.16, -38.34, -7, 0.84)
    pt3dadd(22.21, -38.5, -7, 0.84)
    pt3dadd(22.32, -38.5, -7, 0.84)
    pt3dadd(22.53, -38.6, -7, 0.84)
    pt3dadd(22.63, -38.65, -7, 0.84)
    pt3dadd(22.84, -38.65, -7, 0.84)
    pt3dadd(22.95, -38.71, -7, 0.84)
    pt3dadd(23.1, -38.76, -7, 0.84)
    pt3dadd(23.21, -38.76, -7, 0.84)
    pt3dadd(23.26, -38.92, -7, 0.84)
    pt3dadd(23.42, -38.92, -7, 0.84)
    pt3dadd(23.47, -39.08, -7, 0.84)
    pt3dadd(23.58, -39.13, -7, 0.84)
    pt3dadd(23.68, -39.29, -7, 0.84)
    pt3dadd(23.84, -39.29, -7, 0.84)
    pt3dadd(23.89, -39.39, -7, 0.84)
    pt3dadd(24.05, -39.44, -7, 0.84)
    pt3dadd(24.05, -39.65, -7, 0.84)
    pt3dadd(24.21, -39.6, -7, 0.84)
    pt3dadd(24.26, -39.71, -7, 0.84)
    pt3dadd(24.42, -39.76, -7, 0.84)
    pt3dadd(24.47, -39.97, -7, 0.84)
    pt3dadd(24.57, -40.08, -7, 0.84)
    pt3dadd(24.68, -40.18, -7, 0.84)
    pt3dadd(24.73, -40.29, -7, 0.84)
    pt3dadd(24.84, -40.22, -7, 0.84)
    pt3dadd(24.94, -40.34, -7, 0.84)
    pt3dadd(25.05, -40.44, -7, 0.84)
    pt3dadd(25.05, -40.54, -7, 0.84)
    pt3dadd(25.1, -40.71, -7, 0.84)
    pt3dadd(25.1, -40.97, -7, 0.84)
    pt3dadd(25.15, -41.07, -7, 0.84)
    pt3dadd(25.2, -41.23, -7, 0.84)
    pt3dadd(25.26, -41.34, -7, 0.84)
    pt3dadd(25.26, -41.49, -7, 0.84)
    pt3dadd(25.36, -41.65, -7, 0.84)
    pt3dadd(25.36, -41.86, -7, 0.84)
    pt3dadd(25.41, -41.97, -7, 0.84)
    pt3dadd(25.47, -42.07, -7, 0.84)
    pt3dadd(25.57, -42.18, -7, 0.84)
    pt3dadd(25.57, -42.55, -7, 0.84)
    pt3dadd(25.73, -42.6, -7, 0.84)
    pt3dadd(25.89, -42.76, -7, 0.84)
    pt3dadd(25.89, -42.86, -7, 0.84)
    pt3dadd(26.04, -43.02, -7, 0.84)
    pt3dadd(26.1, -43.23, -7, 0.84)
    pt3dadd(26.15, -43.39, -7, 0.84)
    pt3dadd(26.25, -43.49, -7, 0.84)
    pt3dadd(26.36, -43.6, -7, 0.84)
    pt3dadd(26.41, -43.7, -7, 0.84)
    pt3dadd(26.52, -43.81, -7, 0.84)
    pt3dadd(26.57, -43.91, -7, 0.84)
    pt3dadd(26.67, -44.07, -7, 0.84)
    pt3dadd(26.73, -44.18, -7, 0.84)
    pt3dadd(26.83, -44.23, -7, 0.84)
    pt3dadd(26.88, -44.33, -7.5, 0.84)
    pt3dadd(26.94, -44.49, -7.5, 0.84)
    pt3dadd(27.04, -44.6, -7.5, 0.84)
    pt3dadd(27.09, -44.75, -7.5, 0.84)
    pt3dadd(27.15, -44.86, -7.5, 0.84)
    pt3dadd(27.2, -44.96, -7.5, 0.84)
    pt3dadd(27.2, -45.07, -7.5, 0.84)
    pt3dadd(27.25, -45.23, -7.5, 0.84)
    pt3dadd(27.36, -45.17, -7.5, 0.84)
  }
}
proc shape3d_26() {
  dend[20] {
    pt3dadd(28.5, -46.7, -8, 0.84)
    pt3dadd(28.5, -47.01, -8.5, 0.84)
    pt3dadd(28.56, -47.12, -8.5, 0.84)
    pt3dadd(28.5, -47.27, -8.5, 0.84)
    pt3dadd(28.5, -47.54, -8.5, 0.84)
    pt3dadd(28.45, -47.8, -8.5, 0.84)
    pt3dadd(28.5, -47.91, -8.5, 0.84)
    pt3dadd(28.56, -48.06, -8.5, 0.84)
    pt3dadd(28.56, -48.17, -8.5, 0.84)
    pt3dadd(28.61, -48.33, -8.5, 0.84)
    pt3dadd(28.82, -48.27, -8.5, 0.84)
    pt3dadd(28.98, -48.27, -8.5, 0.84)
    pt3dadd(29.08, -48.38, -8.5, 0.84)
    pt3dadd(29.19, -48.43, -8.5, 0.84)
    pt3dadd(29.34, -48.54, -8.5, 0.84)
    pt3dadd(29.45, -48.54, -8.5, 0.84)
    pt3dadd(29.61, -48.59, -8.5, 0.84)
    pt3dadd(29.76, -48.59, -8.5, 0.84)
    pt3dadd(29.92, -48.64, -8.5, 0.84)
    pt3dadd(30.13, -48.64, -8.5, 0.84)
    pt3dadd(30.13, -48.69, -9, 0.84)
    pt3dadd(30.29, -48.69, -9, 0.84)
    pt3dadd(30.39, -48.8, -9, 0.84)
    pt3dadd(30.66, -48.8, -9, 0.84)
    pt3dadd(30.76, -48.85, -9, 0.84)
    pt3dadd(30.87, -48.96, -9, 0.84)
    pt3dadd(31.02, -48.96, -9, 0.84)
    pt3dadd(31.13, -49.06, -9, 0.84)
    pt3dadd(31.23, -49.17, -9, 0.84)
    pt3dadd(31.39, -49.22, -9, 0.84)
    pt3dadd(31.5, -49.33, -9, 0.84)
    pt3dadd(31.55, -49.43, -9, 0.84)
    pt3dadd(31.65, -49.59, -9, 0.84)
    pt3dadd(31.76, -49.64, -9, 0.84)
    pt3dadd(31.76, -49.85, -9, 0.84)
    pt3dadd(31.86, -50.01, -9, 0.84)
    pt3dadd(31.97, -50.06, -9, 0.84)
    pt3dadd(32.02, -50.27, -9, 0.84)
    pt3dadd(32.02, -50.69, -9.5, 0.84)
    pt3dadd(32.07, -50.8, -9.5, 0.84)
    pt3dadd(32.07, -50.95, -9.5, 0.84)
    pt3dadd(32.13, -51.06, -9.5, 0.84)
    pt3dadd(32.13, -51.22, -10, 0.84)
    pt3dadd(32.22, -51.43, -10, 0.84)
    pt3dadd(32.34, -51.53, -10, 0.84)
    pt3dadd(32.39, -51.69, -10, 0.84)
    pt3dadd(32.44, -51.8, -10.5, 0.84)
    pt3dadd(32.49, -51.9, -10.5, 0.84)
    pt3dadd(32.54, -52.01, -10.5, 0.84)
    pt3dadd(32.65, -52.06, -10.5, 0.84)
    pt3dadd(32.76, -52.16, -11, 0.84)
    pt3dadd(32.86, -52.27, -11, 0.84)
    pt3dadd(33.02, -52.32, -11, 0.84)
    pt3dadd(33.11, -52.43, -11, 0.84)
    pt3dadd(33.28, -52.53, -11, 0.84)
    pt3dadd(33.33, -52.64, -11, 0.84)
    pt3dadd(33.49, -52.69, -11, 0.84)
    pt3dadd(33.65, -52.79, -11, 0.84)
    pt3dadd(33.96, -52.79, -11, 0.84)
    pt3dadd(34.07, -52.85, -11, 0.84)
    pt3dadd(34.17, -52.9, -11, 0.84)
    pt3dadd(34.33, -52.85, -11, 0.84)
    pt3dadd(34.44, -52.9, -11, 0.84)
    pt3dadd(34.59, -52.95, -11, 0.84)
    pt3dadd(35.01, -52.95, -11.5, 0.84)
    pt3dadd(35.17, -53, -11.5, 0.84)
    pt3dadd(35.38, -53, -11.5, 0.84)
    pt3dadd(35.54, -53.06, -11.5, 0.84)
    pt3dadd(35.64, -53.11, -11.5, 0.84)
    pt3dadd(35.79, -53.11, -11.5, 0.84)
    pt3dadd(35.75, -53.22, -11.5, 0.84)
    pt3dadd(35.85, -53.32, -11.5, 0.84)
    pt3dadd(35.96, -53.48, -11.5, 0.84)
    pt3dadd(36.01, -53.64, -11.5, 0.84)
    pt3dadd(36.11, -53.58, -11.5, 0.84)
    pt3dadd(36.17, -53.69, -11.5, 0.84)
    pt3dadd(36.27, -53.85, -11.5, 0.84)
    pt3dadd(36.38, -53.9, -11.5, 0.84)
    pt3dadd(36.43, -54.16, -11.5, 0.84)
    pt3dadd(36.54, -54.32, -12, 0.84)
    pt3dadd(36.59, -54.48, -12, 0.84)
    pt3dadd(36.69, -54.69, -12, 0.84)
    pt3dadd(36.75, -54.84, -12, 0.84)
    pt3dadd(36.79, -54.95, -12, 0.84)
    pt3dadd(36.75, -55.11, -12, 0.84)
    pt3dadd(36.75, -55.32, -12, 0.84)
    pt3dadd(36.79, -55.53, -12, 0.84)
    pt3dadd(36.85, -55.63, -12, 0.84)
    pt3dadd(36.9, -55.79, -12, 0.84)
    pt3dadd(37.01, -55.95, -12, 0.84)
    pt3dadd(37.06, -56.16, -12, 0.84)
    pt3dadd(37.17, -56.42, -12, 0.84)
    pt3dadd(37.43, -56.95, -12, 0.84)
    pt3dadd(37.47, -57.21, -12, 0.84)
    pt3dadd(37.59, -57.42, -12, 0.84)
    pt3dadd(37.64, -57.58, -12, 0.84)
    pt3dadd(38.34, -58.65, -12, 0.84)
    pt3dadd(38.45, -58.7, -12, 0.84)
    pt3dadd(38.54, -58.86, -12, 0.84)
    pt3dadd(38.65, -59.02, -12, 0.84)
    pt3dadd(38.71, -59.07, -12.5, 0.84)
    pt3dadd(38.76, -59.18, -12.5, 0.84)
    pt3dadd(38.81, -59.28, -12.5, 0.84)
    pt3dadd(38.92, -59.33, -12.5, 0.84)
    pt3dadd(38.97, -59.54, -12.5, 0.84)
    pt3dadd(38.97, -59.7, -12.5, 0.84)
    pt3dadd(39.02, -59.86, -12.5, 0.84)
    pt3dadd(39.02, -60.17, -12.5, 0.84)
    pt3dadd(38.97, -60.33, -12.5, 0.84)
    pt3dadd(39.02, -60.54, -13, 0.84)
    pt3dadd(39.02, -60.91, -13, 0.84)
    pt3dadd(39.08, -61.02, -13, 0.84)
    pt3dadd(39.13, -61.12, -13, 0.84)
    pt3dadd(39.29, -61.28, -13, 0.84)
    pt3dadd(39.39, -61.38, -13, 0.84)
    pt3dadd(39.5, -61.54, -13, 0.84)
    pt3dadd(39.65, -61.65, -13, 0.84)
    pt3dadd(39.76, -61.8, -13, 0.84)
    pt3dadd(39.92, -61.91, -13, 0.84)
    pt3dadd(40.07, -62.01, -13, 0.84)
    pt3dadd(40.22, -62.12, -13, 0.84)
    pt3dadd(40.34, -62.23, -13, 0.84)
    pt3dadd(40.44, -62.33, -13, 0.84)
    pt3dadd(40.44, -62.44, -13, 0.84)
    pt3dadd(40.54, -62.54, -13, 0.84)
    pt3dadd(40.6, -62.65, -13, 0.84)
    pt3dadd(40.7, -62.75, -13, 0.84)
    pt3dadd(40.81, -62.91, -13, 0.84)
    pt3dadd(40.86, -63.01, -13, 0.84)
    pt3dadd(40.97, -63.12, -13, 0.84)
    pt3dadd(41.12, -63.17, -13.5, 0.84)
    pt3dadd(41.12, -63.38, -13.5, 0.84)
    pt3dadd(41.23, -63.49, -13.5, 0.84)
    pt3dadd(41.39, -63.64, -13.5, 0.84)
    pt3dadd(41.49, -63.75, -13.5, 0.84)
    pt3dadd(41.6, -63.85, -13.5, 0.84)
    pt3dadd(41.6, -64.01, -13.5, 0.84)
    pt3dadd(41.7, -64.06, -13.5, 0.84)
    pt3dadd(41.86, -64.22, -13.5, 0.84)
    pt3dadd(41.96, -64.33, -13.5, 0.84)
    pt3dadd(41.96, -64.43, -13.5, 0.84)
    pt3dadd(42.12, -64.59, -13.5, 0.84)
    pt3dadd(42.23, -64.75, -13.5, 0.84)
    pt3dadd(42.33, -64.91, -13.5, 0.84)
    pt3dadd(42.38, -65.01, -13.5, 0.84)
    pt3dadd(42.49, -65.27, -13.5, 0.84)
    pt3dadd(42.54, -65.38, -13.5, 0.84)
    pt3dadd(42.54, -65.64, -13.5, 0.84)
    pt3dadd(42.75, -65.84, -13.5, 0.84)
    pt3dadd(42.86, -65.95, -13.5, 0.84)
    pt3dadd(42.91, -66.12, -13.5, 0.84)
    pt3dadd(43.01, -66.17, -13.5, 0.84)
    pt3dadd(43.12, -66.33, -13.5, 0.84)
    pt3dadd(43.49, -66.33, -14, 0.84)
    pt3dadd(43.59, -66.43, -14, 0.84)
    pt3dadd(43.91, -66.43, -14, 0.84)
    pt3dadd(44.06, -66.54, -14, 0.84)
    pt3dadd(43.91, -66.8, -14, 0.84)
    pt3dadd(44.01, -66.84, -14.5, 0.84)
    pt3dadd(44.12, -66.95, -14.5, 0.84)
    pt3dadd(44.22, -67.06, -14.5, 0.84)
    pt3dadd(44.38, -67.11, -14.5, 0.84)
    pt3dadd(44.48, -67.22, -14.5, 0.84)
    pt3dadd(44.59, -67.31, -14.5, 0.84)
    pt3dadd(44.59, -67.48, -14.5, 0.84)
    pt3dadd(44.64, -67.59, -14.5, 0.84)
    pt3dadd(44.75, -67.69, -14.5, 0.84)
    pt3dadd(44.85, -67.73, -14.5, 0.84)
    pt3dadd(44.9, -67.84, -14.5, 0.84)
    pt3dadd(45.01, -67.95, -14.5, 0.84)
    pt3dadd(45.11, -68.06, -14.5, 0.84)
    pt3dadd(45.17, -68.17, -14.5, 0.84)
    pt3dadd(45.38, -68.22, -14.5, 0.84)
    pt3dadd(45.48, -68.43, -14.5, 0.84)
    pt3dadd(45.59, -68.48, -14.5, 0.84)
    pt3dadd(45.64, -68.59, -14.5, 0.84)
    pt3dadd(45.8, -68.59, -15, 0.84)
    pt3dadd(45.85, -68.73, -15, 0.84)
    pt3dadd(46.01, -68.73, -15, 0.84)
    pt3dadd(46.16, -68.8, -15, 0.84)
    pt3dadd(46.27, -68.9, -15, 0.84)
    pt3dadd(46.37, -68.95, -15, 0.84)
    pt3dadd(46.48, -69.11, -15, 0.84)
    pt3dadd(46.64, -69.16, -15, 0.84)
    pt3dadd(46.74, -69.27, -15, 0.84)
    pt3dadd(46.85, -69.37, -15, 0.84)
    pt3dadd(47, -69.53, -15, 0.84)
    pt3dadd(47.11, -69.58, -15, 0.84)
    pt3dadd(47.21, -69.69, -15, 0.84)
    pt3dadd(47.32, -69.8, -15, 0.84)
    pt3dadd(47.48, -69.84, -15, 0.84)
    pt3dadd(47.53, -69.95, -15, 0.84)
    pt3dadd(47.63, -70.01, -15, 0.84)
    pt3dadd(47.84, -70.11, -15, 0.84)
    pt3dadd(47.95, -70.22, -15, 0.84)
    pt3dadd(48.11, -70.22, -15, 0.84)
    pt3dadd(48.57, -71.28, -15, 0.84)
    pt3dadd(48.67, -71.44, -15, 0.84)
    pt3dadd(48.73, -71.59, -15, 0.84)
    pt3dadd(48.73, -71.75, -15, 0.84)
    pt3dadd(48.83, -71.86, -15, 0.84)
    pt3dadd(48.88, -71.95, -15, 0.84)
    pt3dadd(48.99, -72.06, -15, 0.84)
    pt3dadd(48.99, -72.17, -15, 0.84)
    pt3dadd(48.99, -72.28, -15, 0.84)
    pt3dadd(49.04, -72.39, -15, 0.84)
    pt3dadd(49.04, -72.75, -15, 0.84)
    pt3dadd(49.09, -72.95, -15, 0.84)
    pt3dadd(49.04, -73.12, -15, 0.84)
    pt3dadd(49.04, -73.48, -15, 0.84)
    pt3dadd(48.99, -73.7, -15, 0.84)
    pt3dadd(49.09, -73.75, -15, 0.84)
    pt3dadd(49.09, -73.95, -15, 0.84)
    pt3dadd(49.15, -74.06, -15, 0.84)
    pt3dadd(49.25, -74.12, -15, 0.84)
    pt3dadd(49.3, -74.23, -15, 0.84)
    pt3dadd(49.41, -74.28, -15, 0.84)
    pt3dadd(49.46, -74.38, -15, 0.84)
    pt3dadd(49.57, -74.44, -15.5, 0.84)
    pt3dadd(49.67, -74.59, -15.5, 0.84)
    pt3dadd(49.78, -74.7, -16, 0.84)
    pt3dadd(49.93, -74.75, -16, 0.84)
    pt3dadd(50.04, -74.86, -16, 0.84)
    pt3dadd(50.14, -74.95, -16, 0.84)
    pt3dadd(50.2, -75.06, -16, 0.84)
    pt3dadd(50.25, -75.17, -16, 0.84)
    pt3dadd(50.35, -75.28, -16, 0.84)
    pt3dadd(50.46, -75.33, -16, 0.84)
    pt3dadd(50.51, -75.48, -16, 0.84)
    pt3dadd(50.56, -75.59, -16, 0.84)
    pt3dadd(50.62, -75.7, -16, 0.84)
    pt3dadd(50.67, -75.91, -16, 0.84)
    pt3dadd(50.72, -76.01, -16, 0.84)
    pt3dadd(50.77, -76.12, -16, 0.84)
    pt3dadd(50.83, -76.22, -16, 0.84)
    pt3dadd(50.93, -76.33, -16, 0.84)
    pt3dadd(50.93, -76.43, -16, 0.84)
    pt3dadd(51.04, -76.59, -16, 0.84)
    pt3dadd(51.19, -76.84, -16.5, 0.84)
    pt3dadd(51.35, -77.01, -16.5, 0.84)
    pt3dadd(51.35, -77.27, -16.5, 0.84)
    pt3dadd(51.46, -77.38, -16.5, 0.84)
    pt3dadd(51.51, -77.54, -16.5, 0.84)
    pt3dadd(51.61, -77.64, -16.5, 0.84)
    pt3dadd(51.77, -77.84, -16.5, 0.84)
    pt3dadd(51.88, -77.9, -16.5, 0.84)
    pt3dadd(52.03, -78.06, -16.5, 0.84)
    pt3dadd(52.14, -78.27, -16.5, 0.84)
    pt3dadd(52.19, -78.43, -16.5, 0.84)
  }
}
proc shape3d_27() {
  dend[20] {
    pt3dadd(52.24, -78.64, -16.5, 0.84)
    pt3dadd(52.24, -79.27, -16.5, 0.84)
    pt3dadd(52.3, -79.38, -16.5, 0.84)
    pt3dadd(52.24, -79.48, -16.5, 0.84)
    pt3dadd(52.24, -80.11, -16.5, 0.84)
    pt3dadd(52.3, -80.22, -16.5, 0.84)
    pt3dadd(52.3, -80.43, -16.5, 0.84)
    pt3dadd(52.4, -80.59, -16.5, 0.84)
    pt3dadd(52.45, -80.69, -16.5, 0.84)
    pt3dadd(52.51, -80.8, -16.5, 0.84)
    pt3dadd(52.56, -80.95, -16.5, 0.84)
    pt3dadd(52.66, -81.06, -16.5, 0.84)
    pt3dadd(52.72, -81.16, -16.5, 0.84)
    pt3dadd(52.82, -81.43, -16.5, 0.84)
    pt3dadd(52.93, -81.53, -16.5, 0.84)
    pt3dadd(53.03, -81.58, -16.5, 0.84)
    pt3dadd(53.08, -81.8, -16.5, 0.84)
    pt3dadd(53.08, -82.06, -16.5, 0.84)
    pt3dadd(53.14, -82.16, -16.5, 0.84)
    pt3dadd(53.19, -82.37, -16.5, 0.84)
    pt3dadd(53.29, -82.43, -16.5, 0.84)
    pt3dadd(53.35, -82.53, -16.5, 0.84)
    pt3dadd(54.03, -84.44, -17, 0.84)
    pt3dadd(54.08, -84.55, -17, 0.84)
    pt3dadd(54.13, -84.65, -17, 0.84)
    pt3dadd(54.24, -84.81, -17, 0.84)
    pt3dadd(54.34, -84.92, -17, 0.84)
    pt3dadd(54.45, -85.07, -17, 0.84)
    pt3dadd(54.5, -85.18, -17, 0.84)
    pt3dadd(54.6, -85.29, -17, 0.84)
    pt3dadd(54.76, -85.5, -17, 0.84)
    pt3dadd(54.92, -85.55, -17, 0.84)
    pt3dadd(54.97, -85.65, -17, 0.84)
    pt3dadd(55.02, -85.76, -17, 0.84)
    pt3dadd(55.08, -85.86, -17.5, 0.84)
    pt3dadd(55.18, -86.02, -17.5, 0.84)
    pt3dadd(55.23, -86.23, -17.5, 0.84)
    pt3dadd(55.29, -86.44, -17.5, 0.84)
    pt3dadd(55.34, -86.6, -17.5, 0.84)
    pt3dadd(55.39, -86.76, -17.5, 0.84)
    pt3dadd(55.39, -87.07, -17.5, 0.84)
    pt3dadd(55.44, -87.18, -17.5, 0.84)
    pt3dadd(55.5, -87.34, -17.5, 0.84)
    pt3dadd(55.55, -87.49, -17.5, 0.84)
    pt3dadd(55.55, -87.7, -17.5, 0.84)
    pt3dadd(55.6, -87.86, -17.5, 0.84)
    pt3dadd(55.6, -88.07, -17.5, 0.84)
    pt3dadd(55.65, -88.23, -18, 0.84)
    pt3dadd(55.65, -89.07, -18, 0.84)
    pt3dadd(55.6, -89.28, -18, 0.84)
    pt3dadd(55.55, -89.44, -18, 0.84)
    pt3dadd(55.55, -89.54, -18, 0.84)
    pt3dadd(55.44, -89.75, -18, 0.84)
    pt3dadd(55.29, -90.02, -18.5, 0.84)
    pt3dadd(55.29, -90.38, -18.5, 0.84)
    pt3dadd(55.18, -90.44, -18.5, 0.84)
    pt3dadd(55.18, -90.65, -18.5, 0.84)
    pt3dadd(55.23, -90.8, -18.5, 0.84)
    pt3dadd(55.29, -90.91, -18.5, 0.84)
    pt3dadd(55.29, -91.12, -18.5, 0.84)
    pt3dadd(55.34, -91.23, -18.5, 0.84)
    pt3dadd(55.39, -91.33, -18.5, 0.84)
    pt3dadd(55.55, -91.59, -18.5, 0.84)
    pt3dadd(55.6, -91.75, -18.5, 0.84)
    pt3dadd(55.71, -91.91, -18.5, 0.84)
    pt3dadd(55.76, -92.07, -18.5, 0.84)
    pt3dadd(55.81, -92.22, -18.5, 0.84)
    pt3dadd(55.92, -92.33, -18.5, 0.84)
    pt3dadd(55.97, -92.49, -18.5, 0.84)
    pt3dadd(56.07, -92.59, -18.5, 0.84)
    pt3dadd(56.07, -92.8, -18.5, 0.84)
    pt3dadd(56.23, -92.86, -18.5, 0.84)
    pt3dadd(56.34, -92.96, -18.5, 0.84)
    pt3dadd(56.34, -93.17, -19, 0.84)
    pt3dadd(56.44, -93.22, -19, 0.84)
    pt3dadd(56.49, -93.43, -19, 0.84)
    pt3dadd(56.49, -93.91, -19, 0.84)
    pt3dadd(56.44, -94.06, -19, 0.84)
    pt3dadd(56.44, -94.22, -19, 0.84)
    pt3dadd(56.39, -94.33, -19, 0.84)
    pt3dadd(56.28, -94.43, -19, 0.84)
    pt3dadd(56.28, -94.54, -19, 0.84)
    pt3dadd(56.18, -94.64, -19, 0.84)
    pt3dadd(56.02, -94.91, -19, 0.84)
    pt3dadd(55.92, -95.12, -19.5, 0.84)
    pt3dadd(55.86, -95.33, -19.5, 0.84)
    pt3dadd(55.86, -95.75, -19.5, 0.84)
    pt3dadd(55.92, -95.9, -19.5, 0.84)
    pt3dadd(55.88, -96.98, -20.5, 0.84)
    pt3dadd(55.83, -97.19, -20.5, 0.84)
    pt3dadd(55.83, -97.35, -20.5, 0.84)
    pt3dadd(55.83, -97.4, -21, 0.84)
  }
  dend[21] {pt3dclear()
    pt3dadd(55.83, -97.4, -21, 0.84)
    pt3dadd(56.09, -98.09, -20, 0.21)
    pt3dadd(56.25, -98.09, -20, 0.21)
    pt3dadd(56.62, -99.08, -20, 0.63)
    pt3dadd(56.54, -100.04, -20, 0.94)
    pt3dadd(56.49, -100.25, -20, 0.94)
    pt3dadd(56.49, -100.62, -20, 0.94)
    pt3dadd(56.43, -100.78, -20, 0.94)
    pt3dadd(56.43, -100.99, -20, 0.94)
    pt3dadd(56.38, -101.15, -20, 0.94)
    pt3dadd(56.38, -101.72, -21, 0.94)
    pt3dadd(56.33, -101.88, -21, 0.94)
    pt3dadd(56.22, -102.04, -21.5, 0.94)
    pt3dadd(56.07, -102.25, -21.5, 0.94)
    pt3dadd(55.96, -102.46, -21.5, 0.94)
    pt3dadd(55.8, -102.51, -21.5, 0.94)
    pt3dadd(55.54, -102.62, -22, 0.94)
    pt3dadd(55.23, -102.62, -22, 0.94)
    pt3dadd(55.07, -102.51, -22, 0.94)
    pt3dadd(54.96, -102.46, -22, 0.94)
    pt3dadd(54.86, -102.51, -22.5, 0.94)
    pt3dadd(54.49, -102.51, -22.5, 0.94)
    pt3dadd(54.33, -102.56, -22.5, 0.94)
    pt3dadd(54.18, -102.67, -22.5, 0.94)
    pt3dadd(54.07, -102.72, -23, 0.94)
    pt3dadd(53.91, -102.72, -23, 0.94)
    pt3dadd(53.76, -102.83, -23, 0.94)
    pt3dadd(53.65, -102.88, -23, 0.94)
    pt3dadd(53.55, -102.99, -23, 0.94)
    pt3dadd(53.39, -103.09, -23, 0.94)
    pt3dadd(53.28, -103.2, -23, 0.94)
    pt3dadd(53.23, -103.3, -23, 0.94)
    pt3dadd(53.13, -103.41, -23.5, 0.94)
    pt3dadd(53.02, -103.51, -23.5, 0.94)
    pt3dadd(52.86, -103.77, -23.5, 0.94)
    pt3dadd(52.81, -103.93, -23.5, 0.94)
    pt3dadd(52.81, -104.09, -23.5, 0.94)
    pt3dadd(52.76, -104.3, -24, 0.94)
    pt3dadd(52.76, -104.4, -24, 0.94)
    pt3dadd(52.86, -104.51, -24, 0.94)
    pt3dadd(52.92, -104.67, -24, 0.94)
    pt3dadd(52.97, -104.77, -24, 0.94)
    pt3dadd(53.02, -104.82, -24.5, 0.94)
    pt3dadd(53.13, -104.93, -24.5, 0.94)
    pt3dadd(53.23, -105.04, -25, 0.94)
    pt3dadd(53.23, -105.19, -25, 0.94)
    pt3dadd(53.34, -105.3, -25.5, 0.94)
    pt3dadd(53.28, -105.46, -25.5, 0.94)
    pt3dadd(53.28, -105.56, -25.5, 0.94)
    pt3dadd(53.34, -105.67, -26, 0.94)
    pt3dadd(53.28, -105.82, -26, 0.94)
    pt3dadd(53.23, -105.98, -26, 0.94)
    pt3dadd(53.07, -106.09, -26, 0.94)
    pt3dadd(52.86, -106.3, -26, 0.94)
    pt3dadd(52.71, -106.3, -26.5, 0.94)
    pt3dadd(52.6, -106.4, -26.5, 0.94)
    pt3dadd(52.39, -106.45, -26.5, 0.94)
    pt3dadd(52.29, -106.35, -26.5, 0.94)
    pt3dadd(52.13, -106.4, -26.5, 0.94)
    pt3dadd(52.02, -106.35, -26.5, 0.94)
    pt3dadd(51.76, -106.35, -26.5, 0.94)
    pt3dadd(51.66, -106.4, -26.5, 0.94)
    pt3dadd(51.5, -106.51, -26.5, 0.94)
    pt3dadd(51.39, -106.61, -27, 0.94)
    pt3dadd(51.34, -106.77, -27, 0.94)
    pt3dadd(51.24, -106.98, -27, 0.94)
    pt3dadd(51.13, -107.09, -27, 0.94)
    pt3dadd(51.08, -107.24, -27, 0.94)
    pt3dadd(50.97, -107.35, -27.5, 0.94)
    pt3dadd(50.97, -107.51, -27.5, 0.94)
    pt3dadd(50.92, -107.61, -27.5, 0.94)
    pt3dadd(50.92, -107.87, -28, 0.94)
    pt3dadd(51.03, -107.98, -28, 0.94)
    pt3dadd(51.13, -108.08, -28, 0.94)
    pt3dadd(51.24, -108.19, -28, 0.94)
    pt3dadd(51.66, -108.19, -28.5, 0.94)
    pt3dadd(51.92, -108.08, -28.5, 0.94)
    pt3dadd(52.02, -108.19, -29, 0.94)
    pt3dadd(52.08, -108.4, -29, 0.94)
    pt3dadd(52.13, -108.56, -29.5, 0.94)
    pt3dadd(52.13, -108.77, -29.5, 0.94)
    pt3dadd(52.18, -108.93, -29.5, 0.94)
    pt3dadd(52.18, -109.24, -30.5, 0.94)
    pt3dadd(52.13, -109.4, -30.5, 0.94)
    pt3dadd(52.08, -109.61, -31, 0.94)
    pt3dadd(52.02, -109.71, -31, 0.94)
    pt3dadd(51.97, -109.87, -31, 0.94)
    pt3dadd(51.81, -110.03, -31, 0.94)
    pt3dadd(51.76, -110.13, -31, 0.94)
    pt3dadd(51.81, -110.34, -31, 0.94)
    pt3dadd(51.81, -110.19, -31.5, 0.94)
    pt3dadd(51.81, -110.29, -31.5, 0.94)
    pt3dadd(51.76, -110.45, -32, 0.94)
    pt3dadd(51.66, -110.56, -32, 0.94)
    pt3dadd(51.55, -110.77, -32, 0.94)
    pt3dadd(51.39, -110.87, -32.5, 0.94)
    pt3dadd(51.24, -111.03, -32.5, 0.94)
    pt3dadd(51.03, -111.19, -32.5, 0.94)
    pt3dadd(50.92, -111.34, -33, 0.94)
    pt3dadd(50.76, -111.34, -33, 0.94)
    pt3dadd(50.61, -111.34, -33, 0.94)
    pt3dadd(50.61, -111.24, -33, 0.94)
    pt3dadd(50.5, -111.19, -33, 0.94)
    pt3dadd(50.5, -110.98, -33.5, 0.94)
    pt3dadd(50.4, -110.87, -33.5, 0.94)
    pt3dadd(50.4, -110.45, -33.5, 0.94)
    pt3dadd(50.5, -110.34, -33.5, 0.94)
    pt3dadd(50.55, -110.24, -33.5, 0.94)
    pt3dadd(50.71, -110.24, -33.5, 0.94)
    pt3dadd(50.92, -110.19, -33.5, 0.94)
    pt3dadd(51.18, -110.13, -33.5, 0.94)
    pt3dadd(51.39, -110.08, -33.5, 0.94)
    pt3dadd(51.6, -110.03, -33.5, 0.94)
    pt3dadd(51.6, -109.77, -33.5, 0.94)
    pt3dadd(51.5, -109.77, -34, 0.94)
    pt3dadd(51.39, -109.82, -34, 0.94)
    pt3dadd(51.18, -109.87, -34, 0.94)
    pt3dadd(50.76, -109.87, -34, 0.94)
    pt3dadd(50.66, -109.92, -34, 0.94)
    pt3dadd(50.45, -109.98, -34.5, 0.94)
    pt3dadd(50.29, -110.03, -34.5, 0.94)
    pt3dadd(49.82, -110.03, -34.5, 0.94)
    pt3dadd(49.66, -110.08, -34.5, 0.94)
    pt3dadd(49.29, -110.08, -34.5, 0.94)
    pt3dadd(49.08, -110.13, -35, 0.94)
    pt3dadd(48.93, -110.08, -35, 0.94)
    pt3dadd(48.72, -109.87, -35.5, 0.94)
    pt3dadd(48.66, -109.77, -35.5, 0.94)
    pt3dadd(48.66, -109.56, -35.5, 0.94)
    pt3dadd(48.61, -109.45, -36, 0.94)
    pt3dadd(48.61, -109.19, -36, 0.94)
    pt3dadd(48.56, -109.03, -36, 0.94)
    pt3dadd(48.4, -108.98, -36, 0.94)
    pt3dadd(48.19, -108.98, -36, 0.94)
    pt3dadd(47.98, -108.98, -36.5, 0.94)
    pt3dadd(47.93, -109.19, -36.5, 0.94)
    pt3dadd(47.93, -109.35, -36.5, 0.94)
    pt3dadd(47.88, -109.56, -37, 0.94)
    pt3dadd(47.82, -109.66, -37, 0.94)
    pt3dadd(47.72, -109.66, -37, 0.94)
    pt3dadd(47.51, -109.66, -37, 0.94)
  }
  dend[22] {pt3dclear()
    pt3dadd(55.83, -97.4, -21, 0.84)
    pt3dadd(55.25, -97.51, -22, 0.63)
    pt3dadd(55.15, -97.66, -22, 0.63)
    pt3dadd(55.09, -97.66, -22.5, 0.63)
    pt3dadd(55.09, -97.93, -22.5, 0.63)
    pt3dadd(55.15, -98.14, -22.5, 0.63)
    pt3dadd(55.15, -98.4, -22.5, 0.63)
    pt3dadd(55.15, -98.51, -22.5, 0.63)
    pt3dadd(55.2, -98.61, -22.5, 0.63)
    pt3dadd(55.2, -98.77, -22.5, 0.63)
    pt3dadd(55.3, -98.93, -22.5, 0.63)
    pt3dadd(55.41, -99.08, -22.5, 0.63)
    pt3dadd(55.46, -99.19, -22.5, 0.63)
    pt3dadd(55.51, -99.29, -22.5, 0.63)
    pt3dadd(55.62, -99.4, -22.5, 0.63)
    pt3dadd(55.67, -99.5, -22.5, 0.63)
  }
}
proc shape3d_28() {
  dend[22] {
    pt3dadd(55.78, -99.71, -23, 0.63)
    pt3dadd(55.88, -99.77, -23, 0.63)
    pt3dadd(55.99, -99.98, -23, 0.63)
    pt3dadd(56.14, -100.14, -23, 0.63)
    pt3dadd(56.2, -100.24, -23, 0.63)
    pt3dadd(56.3, -100.4, -23, 0.63)
    pt3dadd(56.35, -100.5, -23, 0.63)
    pt3dadd(56.41, -100.71, -23, 0.63)
    pt3dadd(56.46, -100.82, -23, 0.63)
    pt3dadd(56.51, -100.98, -23, 0.63)
    pt3dadd(56.51, -101.24, -23, 0.63)
    pt3dadd(56.56, -101.45, -23, 0.63)
    pt3dadd(56.56, -101.61, -23, 0.63)
    pt3dadd(56.62, -101.82, -23, 0.63)
    pt3dadd(56.56, -101.98, -23, 0.63)
    pt3dadd(56.56, -102.19, -23, 0.63)
    pt3dadd(56.51, -102.29, -23, 0.63)
    pt3dadd(56.51, -102.82, -23, 0.63)
    pt3dadd(56.56, -103.03, -23, 0.63)
    pt3dadd(56.56, -103.29, -22.5, 0.63)
    pt3dadd(56.67, -103.45, -22.5, 0.63)
    pt3dadd(56.67, -103.66, -22.5, 0.63)
    pt3dadd(56.77, -103.76, -22.5, 0.63)
    pt3dadd(56.83, -103.97, -22.5, 0.63)
    pt3dadd(56.88, -104.08, -22.5, 0.63)
    pt3dadd(56.93, -104.24, -22.5, 0.63)
    pt3dadd(56.98, -104.34, -22.5, 0.63)
    pt3dadd(57.09, -104.45, -22.5, 0.63)
    pt3dadd(57.14, -104.55, -22.5, 0.63)
    pt3dadd(57.25, -104.66, -22.5, 0.63)
    pt3dadd(57.35, -104.76, -22.5, 0.63)
    pt3dadd(57.35, -104.87, -22.5, 0.63)
    pt3dadd(57.46, -104.92, -22.5, 0.63)
    pt3dadd(57.51, -105.08, -22.5, 0.63)
    pt3dadd(57.61, -105.23, -22.5, 0.63)
    pt3dadd(57.61, -105.39, -22, 0.63)
    pt3dadd(57.67, -105.55, -22, 0.63)
    pt3dadd(57.77, -105.76, -22, 0.63)
    pt3dadd(57.82, -105.92, -22, 0.63)
    pt3dadd(57.82, -106.29, -22, 0.63)
    pt3dadd(57.88, -106.5, -22, 0.63)
    pt3dadd(57.82, -106.71, -22, 0.63)
    pt3dadd(57.82, -107.13, -22, 0.63)
    pt3dadd(57.77, -107.34, -22, 0.63)
    pt3dadd(57.77, -108.44, -22, 0.63)
    pt3dadd(57.67, -108.34, -22, 0.63)
    pt3dadd(57.61, -108.23, -22, 0.63)
    pt3dadd(58.59, -108.99, -23, 0.84)
    pt3dadd(58.65, -109.25, -23, 0.84)
    pt3dadd(58.8, -109.41, -23, 0.84)
    pt3dadd(58.8, -109.62, -23, 0.84)
    pt3dadd(58.86, -109.78, -23, 0.84)
    pt3dadd(58.91, -109.99, -23, 0.84)
    pt3dadd(58.91, -110.09, -23, 0.84)
    pt3dadd(58.96, -110.2, -23, 0.84)
    pt3dadd(58.96, -110.35, -23, 0.84)
    pt3dadd(59.01, -110.51, -23, 0.84)
    pt3dadd(59.01, -110.67, -23, 0.84)
    pt3dadd(59.07, -110.88, -23, 0.84)
    pt3dadd(59.12, -111.09, -23.5, 0.84)
    pt3dadd(59.12, -111.2, -23.5, 0.84)
    pt3dadd(59.17, -111.41, -23.5, 0.84)
    pt3dadd(59.17, -111.88, -23.5, 0.84)
    pt3dadd(59.22, -111.98, -23.5, 0.84)
    pt3dadd(59.22, -113.04, -23.5, 0.84)
    pt3dadd(59.17, -113.19, -23.5, 0.84)
    pt3dadd(59.17, -113.35, -23.5, 0.84)
    pt3dadd(59.12, -113.51, -23.5, 0.84)
  }
  dend[23] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(2.92, -1.33, 2, 1)
    pt3dadd(3.02, -1.49, 2, 1)
    pt3dadd(3.13, -1.59, 2, 1)
    pt3dadd(3.23, -1.75, 2, 1)
    pt3dadd(3.34, -1.86, 1.5, 1)
    pt3dadd(3.44, -2.12, 1.5, 1)
    pt3dadd(3.5, -2.23, 1.5, 1)
    pt3dadd(3.55, -2.38, 1.5, 1)
    pt3dadd(3.71, -2.59, 1.5, 1)
    pt3dadd(3.81, -2.7, 1.5, 1)
    pt3dadd(3.97, -2.8, 1.5, 1)
    pt3dadd(4.07, -2.91, 1.5, 1)
    pt3dadd(4.23, -3.07, 1.5, 1)
    pt3dadd(4.38, -3.12, 1, 1)
    pt3dadd(4.49, -3.22, 1, 1)
    pt3dadd(4.7, -3.28, 1, 1)
    pt3dadd(4.86, -3.33, 1, 1)
    pt3dadd(4.97, -3.33, 1, 1)
    pt3dadd(5.07, -3.43, 1, 1)
    pt3dadd(5.18, -3.49, 1, 1)
    pt3dadd(5.28, -3.54, 1, 1)
    pt3dadd(5.44, -3.64, 1, 1)
    pt3dadd(5.54, -3.7, 1, 1)
    pt3dadd(5.6, -3.8, 1, 1)
    pt3dadd(5.7, -3.85, 0.5, 1)
    pt3dadd(5.81, -3.91, 0.5, 1)
    pt3dadd(6.02, -4.12, 0.5, 1)
    pt3dadd(6.12, -4.22, 0.5, 1)
    pt3dadd(6.17, -4.33, 0.5, 1)
    pt3dadd(6.23, -4.43, 0.5, 1)
    pt3dadd(6.33, -4.63, 0.5, 1)
    pt3dadd(6.38, -4.8, 0.5, 1)
    pt3dadd(6.49, -4.91, 0, 1)
    pt3dadd(6.59, -5.01, 0, 1)
    pt3dadd(6.59, -5.17, 0, 1)
    pt3dadd(6.7, -5.27, 0, 1)
    pt3dadd(6.86, -5.38, 0, 1)
    pt3dadd(6.96, -5.48, 0, 1)
    pt3dadd(7.01, -5.64, 0, 1)
    pt3dadd(7.12, -5.75, 0, 1)
    pt3dadd(7.22, -5.85, 0, 1)
    pt3dadd(7.33, -6.01, 0, 1)
    pt3dadd(7.49, -6.22, 0, 1)
    pt3dadd(7.59, -6.38, 0, 1)
    pt3dadd(7.75, -6.54, 0, 1)
    pt3dadd(7.8, -6.64, 0, 1)
    pt3dadd(7.91, -6.75, 0, 1)
    pt3dadd(8.01, -6.9, 0, 1)
    pt3dadd(8.06, -7.01, 0, 1)
    pt3dadd(8.17, -7.11, 0, 1)
    pt3dadd(8.27, -7.22, 0, 1)
    pt3dadd(8.33, -7.32, 0, 1)
    pt3dadd(8.38, -7.43, 0, 1)
    pt3dadd(8.53, -7.59, 0, 1)
    pt3dadd(8.59, -7.75, 0, 1)
  }
  dend[24] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-3.74, 1.31, 4, 1)
    pt3dadd(-3.85, 1.31, 4, 1)
    pt3dadd(-4.01, 1.46, 4, 1)
    pt3dadd(-4.11, 1.52, 4, 1)
    pt3dadd(-4.22, 1.57, 3.5, 1)
    pt3dadd(-4.43, 1.57, 3.5, 1)
    pt3dadd(-4.58, 1.62, 3.5, 1)
    pt3dadd(-4.69, 1.67, 3.5, 1)
    pt3dadd(-4.9, 1.73, 3.5, 1)
    pt3dadd(-5.05, 1.73, 3.5, 1)
    pt3dadd(-5.21, 1.78, 3, 1)
    pt3dadd(-5.42, 1.78, 3, 1)
    pt3dadd(-5.63, 1.94, 3, 1)
    pt3dadd(-5.74, 2.04, 3, 1)
    pt3dadd(-5.9, 2.09, 2.5, 1)
    pt3dadd(-6, 2.2, 2.5, 1)
    pt3dadd(-6.11, 2.2, 2.5, 1)
    pt3dadd(-6.26, 2.25, 2.5, 1)
    pt3dadd(-6.37, 2.36, 2.5, 1)
    pt3dadd(-6.58, 2.29, 2.5, 1)
    pt3dadd(-6.74, 2.29, 2.5, 1)
    pt3dadd(-7, 2.36, 2.5, 1)
    pt3dadd(-7.1, 2.41, 2, 1)
  }
  dend[25] {pt3dclear()
    pt3dadd(-7.1, 2.41, 2, 1)
    pt3dadd(-8.94, 2.09, 1.5, 1)
    pt3dadd(-9.05, 2.04, 1.5, 1)
    pt3dadd(-9.26, 2.09, 1.5, 1)
    pt3dadd(-9.41, 1.99, 1.5, 1)
    pt3dadd(-9.47, 1.88, 1.5, 1)
    pt3dadd(-9.57, 1.83, 1.5, 1)
    pt3dadd(-9.68, 1.78, 1.5, 1)
    pt3dadd(-9.83, 1.78, 1.5, 1)
    pt3dadd(-9.94, 1.73, 1.5, 1)
    pt3dadd(-10.31, 1.73, 1.5, 1)
    pt3dadd(-10.46, 1.67, 1, 1)
    pt3dadd(-10.73, 1.67, 1, 1)
    pt3dadd(-10.94, 1.52, 1, 1)
    pt3dadd(-11.09, 1.41, 1, 1)
    pt3dadd(-11.3, 1.31, 1, 1)
    pt3dadd(-11.46, 1.25, 1, 1)
    pt3dadd(-11.57, 1.14, 1, 1)
    pt3dadd(-11.67, 1.04, 1, 1)
    pt3dadd(-11.83, 1.04, 1, 1)
    pt3dadd(-12.04, 0.99, 1, 1)
    pt3dadd(-12.3, 0.99, 1, 1)
    pt3dadd(-12.46, 1.04, 1, 1)
    pt3dadd(-12.56, 1.14, 1, 1)
    pt3dadd(-13.3, 1.14, 0.5, 1)
    pt3dadd(-13.4, 1.25, 0.5, 1)
    pt3dadd(-13.51, 1.31, 0.5, 1)
    pt3dadd(-13.61, 1.36, 0.5, 1)
    pt3dadd(-14.03, 1.36, 0.5, 1)
    pt3dadd(-14.14, 1.41, 0.5, 1)
    pt3dadd(-14.4, 1.41, 0, 1)
    pt3dadd(-14.56, 1.46, 0, 1)
    pt3dadd(-14.66, 1.57, 0, 1)
    pt3dadd(-14.82, 1.57, 0, 1)
    pt3dadd(-14.93, 1.62, 0, 1)
    pt3dadd(-15.08, 1.78, 0, 1)
  }
  dend[26] {pt3dclear()
    pt3dadd(-15.08, 1.78, 0, 1)
    pt3dadd(-15.77, 0.94, 0, 0.84)
    pt3dadd(-15.77, 0.83, 0, 0.84)
    pt3dadd(-15.98, 0.73, 0, 0.84)
    pt3dadd(-16.07, 0.62, 0, 0.84)
    pt3dadd(-16.19, 0.46, 0, 0.84)
    pt3dadd(-16.23, 0.31, 0, 0.84)
    pt3dadd(-16.34, 0.15, 0, 0.84)
    pt3dadd(-16.45, -0.01, 0, 0.84)
    pt3dadd(-16.55, -0.11, 0, 0.84)
    pt3dadd(-16.61, -0.27, 0, 0.84)
    pt3dadd(-16.71, -0.38, 0, 0.84)
    pt3dadd(-16.82, -0.48, 0, 0.84)
    pt3dadd(-16.87, -0.64, 0, 0.84)
    pt3dadd(-17.03, -0.8, 0, 0.84)
    pt3dadd(-17.13, -0.9, 0, 0.84)
    pt3dadd(-17.23, -0.95, -0.5, 0.84)
    pt3dadd(-17.23, -1.11, -0.5, 0.84)
    pt3dadd(-17.34, -1.15, -0.5, 0.84)
    pt3dadd(-17.45, -1.32, -0.5, 0.84)
    pt3dadd(-17.6, -1.38, -0.5, 0.84)
    pt3dadd(-18.84, -1.4, -0.5, 0.79)
    pt3dadd(-19.05, -1.4, -0.5, 0.79)
    pt3dadd(-19.16, -1.51, -0.5, 0.79)
    pt3dadd(-19.26, -1.61, -0.5, 0.79)
    pt3dadd(-19.42, -1.66, -0.5, 0.79)
    pt3dadd(-19.53, -1.72, -0.5, 0.79)
    pt3dadd(-19.63, -1.77, -0.5, 0.79)
    pt3dadd(-19.73, -1.98, -0.5, 0.79)
    pt3dadd(-19.79, -2.14, -0.5, 0.79)
    pt3dadd(-19.84, -2.35, -0.5, 0.79)
    pt3dadd(-19.95, -2.5, -0.5, 0.79)
    pt3dadd(-19.95, -2.71, -0.5, 0.79)
    pt3dadd(-20.05, -2.82, 0, 0.79)
    pt3dadd(-20.1, -2.98, 0, 0.79)
    pt3dadd(-20.16, -3.14, 0, 0.79)
    pt3dadd(-20.26, -3.35, 0, 0.79)
    pt3dadd(-20.3, -3.5, 0, 0.79)
    pt3dadd(-20.37, -3.71, 0, 0.79)
    pt3dadd(-20.47, -3.92, 0, 0.79)
    pt3dadd(-20.58, -4.19, 0, 0.79)
    pt3dadd(-20.68, -4.4, 0, 0.79)
    pt3dadd(-20.73, -4.55, 0, 0.79)
    pt3dadd(-20.84, -4.66, 0, 0.79)
    pt3dadd(-20.89, -4.82, 0, 0.79)
    pt3dadd(-21, -5.03, 0, 0.79)
    pt3dadd(-21.1, -5.13, 0, 0.79)
    pt3dadd(-21.21, -5.29, 0, 0.79)
    pt3dadd(-21.31, -5.4, -0.5, 0.79)
    pt3dadd(-21.42, -5.5, -0.5, 0.79)
    pt3dadd(-21.52, -5.66, -0.5, 0.79)
    pt3dadd(-21.63, -5.76, -0.5, 0.79)
    pt3dadd(-21.73, -5.97, -0.5, 0.79)
    pt3dadd(-21.94, -6.03, -0.5, 0.79)
    pt3dadd(-22.1, -6.29, -0.5, 0.79)
    pt3dadd(-22.15, -6.39, -0.5, 0.79)
    pt3dadd(-22.2, -6.55, -0.5, 0.79)
    pt3dadd(-22.26, -6.76, -0.5, 0.79)
    pt3dadd(-22.31, -6.87, -0.5, 0.79)
    pt3dadd(-22.41, -7.03, -0.5, 0.79)
    pt3dadd(-22.47, -7.29, -0.5, 0.79)
    pt3dadd(-22.52, -7.34, -1, 0.79)
    pt3dadd(-22.57, -7.5, -1, 0.79)
    pt3dadd(-22.62, -7.6, -1, 0.79)
    pt3dadd(-22.78, -7.87, -1, 0.79)
  }
}
proc shape3d_29() {
  dend[26] {
    pt3dadd(-22.83, -8.02, -1, 0.79)
    pt3dadd(-22.89, -8.13, -1, 0.79)
    pt3dadd(-22.94, -8.23, -1, 0.79)
    pt3dadd(-22.99, -8.34, -1, 0.79)
    pt3dadd(-23.1, -8.5, -1, 0.79)
    pt3dadd(-23.15, -8.6, -1, 0.79)
    pt3dadd(-23.15, -8.71, -1, 0.79)
    pt3dadd(-23.87, -9.86, -1.5, 0.79)
    pt3dadd(-23.97, -10.02, -1.5, 0.79)
    pt3dadd(-24.18, -10.18, -1.5, 0.79)
    pt3dadd(-24.18, -10.29, -1.5, 0.79)
    pt3dadd(-24.34, -10.39, -1.5, 0.79)
    pt3dadd(-24.44, -10.55, -1.5, 0.79)
    pt3dadd(-24.65, -10.81, -1.5, 0.79)
    pt3dadd(-24.81, -10.97, -1.5, 0.79)
    pt3dadd(-24.97, -11.13, -1.5, 0.79)
    pt3dadd(-25.02, -11.23, -1.5, 0.79)
    pt3dadd(-25.07, -11.34, -1.5, 0.79)
    pt3dadd(-25.18, -11.45, -2, 0.79)
    pt3dadd(-25.23, -11.66, -2, 0.79)
    pt3dadd(-25.39, -11.87, -2, 0.79)
    pt3dadd(-25.44, -12.02, -2, 0.79)
    pt3dadd(-25.49, -12.23, -2, 0.79)
    pt3dadd(-25.6, -12.5, -2, 0.79)
    pt3dadd(-25.7, -12.71, -2, 0.79)
    pt3dadd(-25.86, -12.92, -2, 0.79)
    pt3dadd(-25.97, -13.07, -2, 0.79)
    pt3dadd(-26.02, -13.23, -2, 0.79)
    pt3dadd(-26.12, -13.34, -2, 0.79)
    pt3dadd(-26.18, -13.55, -2, 0.79)
    pt3dadd(-26.28, -13.71, -2, 0.79)
    pt3dadd(-26.44, -14.02, -2, 0.79)
    pt3dadd(-26.6, -14.18, -2, 0.79)
    pt3dadd(-26.81, -14.6, -2, 0.79)
    pt3dadd(-26.91, -14.76, -2.5, 0.79)
    pt3dadd(-26.96, -14.86, -2.5, 0.79)
    pt3dadd(-27.07, -15.02, -2.5, 0.79)
    pt3dadd(-27.17, -15.12, -2.5, 0.79)
    pt3dadd(-27.33, -15.23, -2.5, 0.79)
    pt3dadd(-27.44, -15.39, -2.5, 0.79)
    pt3dadd(-27.59, -15.55, -2.5, 0.79)
    pt3dadd(-27.75, -15.81, -2.5, 0.79)
    pt3dadd(-27.8, -15.91, -2.5, 0.79)
    pt3dadd(-28.01, -16.18, -2.5, 0.79)
    pt3dadd(-28.12, -16.32, -2.5, 0.79)
    pt3dadd(-28.17, -16.48, -2.5, 0.79)
    pt3dadd(-28.33, -16.7, -2.5, 0.79)
    pt3dadd(-28.43, -16.91, -2.5, 0.79)
    pt3dadd(-28.48, -17.07, -2.5, 0.79)
    pt3dadd(-28.59, -17.18, -2.5, 0.79)
    pt3dadd(-28.59, -17.44, -2.5, 0.79)
    pt3dadd(-28.69, -17.64, -2.5, 0.79)
    pt3dadd(-28.8, -17.91, -2.5, 0.79)
    pt3dadd(-28.9, -18.02, -2.5, 0.79)
    pt3dadd(-29.01, -18.23, -2.5, 0.79)
    pt3dadd(-29.32, -18.54, -2.5, 0.79)
    pt3dadd(-29.43, -18.7, -2.5, 0.79)
    pt3dadd(-29.64, -18.86, -2.5, 0.79)
    pt3dadd(-29.69, -18.96, -2.5, 0.79)
    pt3dadd(-29.9, -19.17, -2.5, 0.79)
    pt3dadd(-29.95, -19.28, -2.5, 0.79)
    pt3dadd(-30.01, -19.38, -2.5, 0.79)
    pt3dadd(-30.06, -19.59, -2.5, 0.79)
    pt3dadd(-30.16, -19.75, -2.5, 0.79)
    pt3dadd(-30.22, -19.96, -2.5, 0.79)
    pt3dadd(-30.22, -20.12, -2.5, 0.79)
    pt3dadd(-30.27, -20.22, -2.5, 0.79)
    pt3dadd(-30.43, -20.38, -2.5, 0.79)
    pt3dadd(-30.53, -20.49, -2.5, 0.79)
    pt3dadd(-30.58, -20.7, -2.5, 0.79)
    pt3dadd(-30.69, -20.8, -2.5, 0.79)
    pt3dadd(-30.79, -21.01, -2.5, 0.79)
    pt3dadd(-30.85, -21.22, -2.5, 0.79)
    pt3dadd(-30.91, -22.58, -3.5, 0.79)
    pt3dadd(-31.12, -22.64, -3.5, 0.79)
    pt3dadd(-31.27, -22.74, -3.5, 0.79)
    pt3dadd(-31.38, -22.9, -3.5, 0.79)
    pt3dadd(-31.43, -23, -3.5, 0.79)
    pt3dadd(-31.54, -23.11, -3.5, 0.79)
    pt3dadd(-31.59, -23.37, -3.5, 0.79)
    pt3dadd(-31.69, -23.58, -3.5, 0.79)
    pt3dadd(-31.69, -24.37, -3.5, 0.79)
    pt3dadd(-31.8, -24.58, -3.5, 0.79)
    pt3dadd(-31.9, -24.74, -3.5, 0.79)
    pt3dadd(-32.01, -24.84, -4, 0.79)
    pt3dadd(-32.11, -25, -4, 0.79)
    pt3dadd(-32.17, -25.11, -4, 0.79)
    pt3dadd(-32.38, -25.26, -4, 0.79)
    pt3dadd(-32.47, -25.32, -4, 0.79)
    pt3dadd(-32.53, -25.42, -4, 0.79)
    pt3dadd(-32.74, -25.58, -4, 0.79)
    pt3dadd(-32.85, -25.74, -4, 0.79)
    pt3dadd(-33.01, -25.79, -4, 0.79)
    pt3dadd(-33.22, -25.95, -4, 0.79)
    pt3dadd(-33.32, -26.21, -4, 0.79)
    pt3dadd(-33.43, -26.32, -4, 0.79)
    pt3dadd(-33.53, -26.47, -4, 0.79)
    pt3dadd(-33.64, -26.63, -4, 0.79)
    pt3dadd(-33.79, -26.84, -4, 0.79)
    pt3dadd(-33.9, -27, -4, 0.79)
    pt3dadd(-34, -27.16, -4, 0.79)
    pt3dadd(-34.06, -27.26, -4, 0.79)
    pt3dadd(-34.21, -27.47, -4, 0.79)
    pt3dadd(-34.36, -27.74, -4, 0.79)
    pt3dadd(-34.53, -27.84, -4, 0.79)
    pt3dadd(-34.63, -28.05, -4, 0.79)
    pt3dadd(-34.74, -28.16, -4, 0.79)
    pt3dadd(-34.84, -28.31, -4, 0.79)
    pt3dadd(-34.9, -28.47, -4, 0.79)
    pt3dadd(-35, -28.63, -4.5, 0.79)
    pt3dadd(-35, -28.73, -4.5, 0.79)
    pt3dadd(-35.15, -28.89, -4.5, 0.79)
    pt3dadd(-35.26, -29.1, -4.5, 0.79)
    pt3dadd(-35.36, -29.26, -4.5, 0.79)
    pt3dadd(-35.42, -29.42, -4.5, 0.79)
    pt3dadd(-35.53, -29.52, -4.5, 0.79)
    pt3dadd(-35.63, -29.68, -4.5, 0.79)
    pt3dadd(-35.74, -29.73, -4.5, 0.79)
    pt3dadd(-36.04, -30.05, -4.5, 0.79)
    pt3dadd(-36.1, -30.21, -4.5, 0.79)
    pt3dadd(-36.21, -30.31, -4.5, 0.79)
    pt3dadd(-36.26, -30.52, -4.5, 0.79)
    pt3dadd(-36.26, -30.68, -4.5, 0.79)
    pt3dadd(-36.31, -30.89, -4.5, 0.79)
    pt3dadd(-36.31, -31.26, -4.5, 0.79)
    pt3dadd(-36.26, -31.36, -4.5, 0.79)
    pt3dadd(-36.26, -31.63, -4.5, 0.79)
    pt3dadd(-36.21, -31.78, -4.5, 0.79)
    pt3dadd(-36.21, -32.1, -4.5, 0.79)
    pt3dadd(-36.26, -32.26, -4.5, 0.79)
    pt3dadd(-36.31, -32.47, -4.5, 0.79)
    pt3dadd(-36.42, -32.61, -5, 0.79)
    pt3dadd(-36.47, -32.83, -5, 0.79)
    pt3dadd(-36.52, -32.94, -5, 0.79)
    pt3dadd(-36.57, -33.04, -5, 0.79)
    pt3dadd(-36.63, -33.2, -5, 0.79)
    pt3dadd(-36.68, -33.36, -5, 0.79)
    pt3dadd(-36.63, -33.26, -5, 0.79)
    pt3dadd(-37.54, -35.35, -5, 0.79)
    pt3dadd(-37.65, -35.4, -5, 0.79)
    pt3dadd(-37.86, -35.51, -5, 0.79)
    pt3dadd(-38.02, -35.61, -5, 0.79)
    pt3dadd(-38.11, -35.72, -5, 0.79)
    pt3dadd(-38.28, -35.88, -5, 0.79)
    pt3dadd(-38.44, -35.88, -5, 0.79)
    pt3dadd(-38.7, -36.03, -5.5, 0.79)
    pt3dadd(-38.86, -36.03, -5.5, 0.79)
    pt3dadd(-39.07, -36.09, -5.5, 0.79)
    pt3dadd(-39.28, -36.19, -5.5, 0.79)
    pt3dadd(-39.49, -36.35, -5.5, 0.79)
    pt3dadd(-39.59, -36.45, -5.5, 0.79)
    pt3dadd(-39.75, -36.56, -5.5, 0.79)
    pt3dadd(-39.96, -36.65, -5.5, 0.79)
    pt3dadd(-40.07, -36.77, -5.5, 0.79)
    pt3dadd(-40.28, -36.86, -5.5, 0.79)
    pt3dadd(-40.38, -37.03, -5.5, 0.79)
    pt3dadd(-40.54, -37.14, -5.5, 0.79)
    pt3dadd(-40.7, -37.24, -5.5, 0.79)
    pt3dadd(-40.85, -37.35, -5.5, 0.79)
    pt3dadd(-41.01, -37.4, -5.5, 0.79)
    pt3dadd(-41.12, -37.51, -5.5, 0.79)
    pt3dadd(-41.27, -37.56, -6, 0.79)
    pt3dadd(-41.43, -37.61, -6, 0.79)
    pt3dadd(-41.59, -37.72, -6, 0.79)
    pt3dadd(-41.75, -37.72, -6, 0.79)
    pt3dadd(-41.96, -37.82, -6, 0.79)
    pt3dadd(-42.11, -37.93, -6, 0.79)
    pt3dadd(-42.22, -37.97, -6, 0.79)
    pt3dadd(-42.43, -38.08, -6, 0.79)
    pt3dadd(-42.58, -38.24, -6, 0.79)
    pt3dadd(-42.69, -38.35, -6, 0.79)
    pt3dadd(-42.9, -38.45, -6, 0.79)
    pt3dadd(-43, -38.61, -6, 0.79)
    pt3dadd(-43.16, -38.71, -6, 0.79)
    pt3dadd(-43.32, -38.86, -6, 0.79)
    pt3dadd(-43.48, -39.08, -6, 0.79)
    pt3dadd(-43.58, -39.24, -6, 0.79)
    pt3dadd(-43.69, -39.35, -6, 0.79)
    pt3dadd(-43.79, -39.45, -6, 0.79)
    pt3dadd(-43.9, -39.61, -6, 0.79)
    pt3dadd(-44, -39.71, -6, 0.79)
    pt3dadd(-44.11, -39.92, -6, 0.79)
    pt3dadd(-44.32, -40.13, -6, 0.79)
    pt3dadd(-44.47, -40.4, -6, 0.79)
    pt3dadd(-44.53, -40.5, -6, 0.79)
    pt3dadd(-44.74, -40.71, -6, 0.79)
    pt3dadd(-44.84, -40.92, -6, 0.79)
    pt3dadd(-44.95, -41.13, -6, 0.79)
    pt3dadd(-45.05, -41.29, -6, 0.79)
    pt3dadd(-45.21, -41.5, -6, 0.79)
    pt3dadd(-45.31, -41.66, -6, 0.79)
    pt3dadd(-45.37, -41.76, -6, 0.79)
    pt3dadd(-45.52, -42.03, -6, 0.79)
    pt3dadd(-45.52, -42.18, -6, 0.79)
    pt3dadd(-45.63, -42.39, -6, 0.79)
    pt3dadd(-45.73, -42.6, -6, 0.79)
    pt3dadd(-45.84, -42.71, -6, 0.79)
    pt3dadd(-45.89, -42.87, -6, 0.79)
    pt3dadd(-46, -43.03, -6, 0.79)
    pt3dadd(-46.05, -43.24, -6, 0.79)
    pt3dadd(-46.15, -43.34, -6, 0.79)
    pt3dadd(-46.26, -43.45, -6, 0.79)
    pt3dadd(-46.31, -43.66, -6, 0.79)
    pt3dadd(-46.42, -43.71, -6, 0.79)
    pt3dadd(-46.42, -43.87, -6, 0.79)
    pt3dadd(-46.57, -44.08, -6, 0.79)
    pt3dadd(-46.68, -44.23, -6, 0.79)
    pt3dadd(-46.84, -44.44, -6, 0.79)
    pt3dadd(-46.84, -44.6, -6, 0.79)
    pt3dadd(-47.35, -46.03, -6, 0.79)
    pt3dadd(-47.46, -46.24, -6, 0.79)
    pt3dadd(-47.56, -46.4, -6, 0.79)
    pt3dadd(-47.72, -46.61, -6, 0.79)
    pt3dadd(-47.77, -46.77, -6, 0.79)
    pt3dadd(-47.93, -46.98, -6, 0.79)
    pt3dadd(-48.14, -47.24, -6, 0.79)
    pt3dadd(-48.3, -47.5, -6, 0.79)
    pt3dadd(-48.61, -47.82, -6, 0.79)
    pt3dadd(-48.72, -48.08, -6, 0.79)
    pt3dadd(-48.93, -48.24, -6.5, 0.79)
    pt3dadd(-49.19, -48.66, -6.5, 0.79)
    pt3dadd(-49.29, -48.82, -6.5, 0.79)
    pt3dadd(-49.45, -49.13, -6.5, 0.79)
    pt3dadd(-49.45, -49.34, -6.5, 0.79)
    pt3dadd(-49.61, -49.5, -6.5, 0.79)
    pt3dadd(-49.71, -49.76, -6.5, 0.79)
    pt3dadd(-49.82, -50.08, -6.5, 0.79)
    pt3dadd(-49.87, -50.39, -6.5, 0.79)
    pt3dadd(-49.98, -50.66, -6.5, 0.79)
    pt3dadd(-50.03, -50.87, -6.5, 0.79)
    pt3dadd(-50.03, -51.29, -6.5, 0.79)
    pt3dadd(-50.08, -51.5, -6.5, 0.79)
    pt3dadd(-50.13, -51.76, -6.5, 0.79)
    pt3dadd(-50.19, -51.92, -6.5, 0.79)
    pt3dadd(-50.19, -52.13, -6.5, 0.79)
    pt3dadd(-50.24, -52.34, -6.5, 0.79)
    pt3dadd(-50.24, -52.55, -6.5, 0.79)
    pt3dadd(-50.29, -52.76, -6.5, 0.79)
    pt3dadd(-50.29, -53.02, -6.5, 0.79)
    pt3dadd(-50.34, -53.18, -6.5, 0.79)
    pt3dadd(-50.34, -53.34, -6.5, 0.79)
    pt3dadd(-50.4, -53.55, -6.5, 0.79)
    pt3dadd(-50.4, -54.02, -6.5, 0.79)
    pt3dadd(-50.45, -54.23, -6.5, 0.79)
    pt3dadd(-50.34, -54.34, -6.5, 0.79)
    pt3dadd(-50.4, -54.6, -6.5, 0.79)
    pt3dadd(-50.29, -54.7, -6.5, 0.79)
    pt3dadd(-50.34, -54.86, -6.5, 0.79)
    pt3dadd(-50.34, -55.55, -6.5, 0.79)
  }
}
proc shape3d_30() {
  dend[26] {
    pt3dadd(-50.4, -55.7, -6.5, 0.79)
    pt3dadd(-50.5, -55.86, -6.5, 0.79)
    pt3dadd(-50.55, -56.02, -6.5, 0.79)
    pt3dadd(-50.66, -56.12, -6.5, 0.79)
    pt3dadd(-50.82, -56.33, -6.5, 0.79)
    pt3dadd(-51.08, -56.6, -6.5, 0.79)
    pt3dadd(-51.13, -56.76, -6.5, 0.79)
    pt3dadd(-51.24, -56.86, -6.5, 0.79)
    pt3dadd(-51.29, -56.97, -6.5, 0.79)
    pt3dadd(-52.31, -57.86, -6.5, 0.79)
    pt3dadd(-52.42, -58.02, -6.5, 0.79)
    pt3dadd(-52.52, -58.12, -6.5, 0.79)
    pt3dadd(-52.63, -58.28, -6.5, 0.79)
    pt3dadd(-52.73, -58.44, -6.5, 0.79)
    pt3dadd(-52.89, -58.65, -6.5, 0.79)
    pt3dadd(-53, -58.8, -6.5, 0.79)
    pt3dadd(-53.1, -59.01, -6.5, 0.79)
    pt3dadd(-53.21, -59.22, -6.5, 0.79)
    pt3dadd(-53.36, -59.49, -6.5, 0.79)
    pt3dadd(-53.47, -59.59, -6.5, 0.79)
    pt3dadd(-53.63, -59.75, -6.5, 0.79)
    pt3dadd(-53.63, -59.91, -6.5, 0.79)
    pt3dadd(-53.73, -60.12, -6.5, 0.79)
    pt3dadd(-53.78, -60.28, -6.5, 0.79)
    pt3dadd(-53.89, -60.49, -6.5, 0.79)
    pt3dadd(-54.05, -60.7, -6.5, 0.79)
    pt3dadd(-54.1, -60.85, -7, 0.79)
    pt3dadd(-54.1, -60.96, -7, 0.79)
    pt3dadd(-54.31, -61.17, -7, 0.79)
    pt3dadd(-54.31, -61.38, -7, 0.79)
    pt3dadd(-54.41, -61.59, -7, 0.79)
    pt3dadd(-54.47, -61.7, -7, 0.79)
    pt3dadd(-54.57, -61.91, -7, 0.79)
    pt3dadd(-54.62, -62.06, -7, 0.79)
    pt3dadd(-54.73, -62.27, -7, 0.79)
    pt3dadd(-54.73, -62.43, -7, 0.79)
    pt3dadd(-54.78, -62.64, -7, 0.79)
    pt3dadd(-54.94, -62.8, -7, 0.79)
    pt3dadd(-54.94, -63.01, -7, 0.79)
    pt3dadd(-55.04, -63.22, -7, 0.79)
    pt3dadd(-55.1, -63.38, -7, 0.79)
    pt3dadd(-55.2, -63.48, -7, 0.79)
    pt3dadd(-55.46, -63.75, -7, 0.79)
    pt3dadd(-55.67, -63.75, -7, 0.79)
    pt3dadd(-55.83, -63.8, -7, 0.79)
    pt3dadd(-56.04, -63.9, -7, 0.79)
    pt3dadd(-56.15, -63.96, -7, 0.79)
    pt3dadd(-56.41, -64.06, -7, 0.79)
    pt3dadd(-56.56, -64.11, -7, 0.79)
    pt3dadd(-56.72, -64.17, -7, 0.79)
    pt3dadd(-56.93, -64.27, -7, 0.79)
    pt3dadd(-57.09, -64.31, -7, 0.79)
    pt3dadd(-57.4, -64.64, -7, 0.79)
    pt3dadd(-57.56, -64.73, -7, 0.79)
    pt3dadd(-57.72, -64.8, -7, 0.79)
    pt3dadd(-58.35, -65.43, -7, 0.79)
    pt3dadd(-58.51, -65.59, -7, 0.79)
    pt3dadd(-58.61, -65.73, -7, 0.79)
    pt3dadd(-58.77, -65.9, -7, 0.79)
    pt3dadd(-58.98, -66.11, -7, 0.79)
    pt3dadd(-59.19, -66.31, -7, 0.79)
    pt3dadd(-59.45, -66.48, -7, 0.79)
    pt3dadd(-59.77, -66.79, -7, 0.79)
    pt3dadd(-60.03, -66.9, -7, 0.79)
    pt3dadd(-60.13, -67.16, -7, 0.79)
    pt3dadd(-60.34, -67.27, -7, 0.79)
    pt3dadd(-60.55, -67.37, -7, 0.79)
    pt3dadd(-60.71, -67.53, -7, 0.79)
    pt3dadd(-60.82, -67.64, -7, 0.79)
    pt3dadd(-60.87, -67.79, -7, 0.79)
    pt3dadd(-60.97, -68, -7, 0.79)
    pt3dadd(-61.13, -68.16, -7, 0.79)
    pt3dadd(-61.24, -68.37, -7, 0.79)
    pt3dadd(-61.34, -68.58, -7, 0.79)
    pt3dadd(-61.39, -68.73, -7, 0.79)
    pt3dadd(-61.5, -68.95, -7, 0.79)
    pt3dadd(-61.66, -69.11, -7, 0.79)
    pt3dadd(-61.76, -69.27, -7, 0.79)
    pt3dadd(-61.81, -69.42, -7, 0.79)
    pt3dadd(-61.92, -69.53, -7, 0.79)
    pt3dadd(-62.82, -70.43, -7, 0.79)
    pt3dadd(-62.87, -70.58, -7, 0.79)
    pt3dadd(-62.98, -70.69, -7, 0.79)
    pt3dadd(-63.4, -71.11, -7, 0.79)
    pt3dadd(-63.5, -71.2, -7.5, 0.79)
    pt3dadd(-63.61, -71.2, -7.5, 0.79)
    pt3dadd(-63.97, -71.2, -7.5, 0.79)
    pt3dadd(-64.13, -71.27, -7.5, 0.79)
    pt3dadd(-64.34, -71.31, -7.5, 0.79)
    pt3dadd(-64.5, -71.37, -7.5, 0.79)
    pt3dadd(-64.59, -71.37, -8, 0.79)
    pt3dadd(-64.76, -71.48, -8, 0.79)
    pt3dadd(-64.97, -71.58, -8, 0.79)
    pt3dadd(-65.13, -71.69, -8, 0.79)
    pt3dadd(-65.34, -71.84, -8, 0.79)
    pt3dadd(-65.5, -71.9, -8, 0.79)
    pt3dadd(-65.59, -72, -8, 0.79)
    pt3dadd(-65.7, -72.11, -8, 0.79)
    pt3dadd(-65.86, -72.2, -8, 0.79)
    pt3dadd(-65.97, -72.37, -8, 0.79)
    pt3dadd(-66.06, -72.42, -8.5, 0.79)
    pt3dadd(-66.28, -72.53, -8.5, 0.79)
    pt3dadd(-66.44, -72.69, -8.5, 0.79)
    pt3dadd(-66.65, -72.79, -8.5, 0.79)
    pt3dadd(-66.81, -72.95, -8.5, 0.79)
    pt3dadd(-66.91, -73.05, -8.5, 0.79)
    pt3dadd(-67.17, -73.31, -8.5, 0.79)
    pt3dadd(-67.28, -73.53, -8.5, 0.79)
    pt3dadd(-67.38, -73.63, -8.5, 0.79)
    pt3dadd(-67.44, -73.79, -9, 0.79)
    pt3dadd(-67.54, -73.9, -9, 0.79)
    pt3dadd(-67.59, -74.05, -9, 0.79)
    pt3dadd(-67.7, -74.26, -9, 0.79)
    pt3dadd(-67.75, -74.37, -9, 0.79)
    pt3dadd(-67.8, -74.53, -9, 0.79)
    pt3dadd(-67.91, -74.68, -9, 0.79)
    pt3dadd(-67.95, -74.79, -9, 0.79)
    pt3dadd(-68.01, -74.89, -9, 0.79)
    pt3dadd(-68.12, -75, -9, 0.79)
    pt3dadd(-68.28, -75.09, -9, 0.79)
    pt3dadd(-68.38, -75.16, -9, 0.79)
    pt3dadd(-68.59, -75.09, -9, 0.79)
    pt3dadd(-68.75, -75.05, -9, 0.79)
    pt3dadd(-68.84, -75, -9.5, 0.79)
    pt3dadd(-68.91, -74.89, -9.5, 0.79)
    pt3dadd(-68.95, -74.79, -9.5, 0.79)
    pt3dadd(-69.06, -74.73, -9.5, 0.79)
    pt3dadd(-69.22, -74.63, -9.5, 0.79)
    pt3dadd(-69.43, -74.63, -10, 0.79)
    pt3dadd(-69.59, -74.73, -10, 0.79)
    pt3dadd(-69.8, -74.84, -10, 0.79)
    pt3dadd(-69.95, -74.89, -10, 0.79)
    pt3dadd(-70.17, -75, -10, 0.79)
    pt3dadd(-70.22, -75.16, -10.5, 0.79)
    pt3dadd(-70.38, -75.31, -10.5, 0.79)
    pt3dadd(-70.43, -75.42, -10.5, 0.79)
    pt3dadd(-70.64, -75.63, -10.5, 0.79)
    pt3dadd(-70.73, -75.79, -10.5, 0.79)
    pt3dadd(-70.73, -76.26, -10.5, 0.79)
    pt3dadd(-70.8, -76.42, -10.5, 0.79)
    pt3dadd(-70.8, -76.68, -10.5, 0.79)
    pt3dadd(-70.84, -76.84, -10.5, 0.79)
    pt3dadd(-70.84, -77, -10.5, 0.79)
    pt3dadd(-70.95, -77.31, -10.5, 0.79)
    pt3dadd(-71.01, -77.42, -10.5, 0.79)
    pt3dadd(-71.11, -77.58, -11, 0.79)
    pt3dadd(-71.11, -77.68, -11, 0.79)
    pt3dadd(-71.22, -77.79, -11, 0.79)
    pt3dadd(-71.43, -77.94, -11, 0.79)
    pt3dadd(-71.64, -78, -11, 0.79)
    pt3dadd(-71.69, -78.09, -11, 0.79)
    pt3dadd(-71.79, -78.09, -11, 0.79)
    pt3dadd(-71.95, -78.2, -11, 0.79)
    pt3dadd(-72.06, -78.26, -11, 0.79)
    pt3dadd(-72.27, -78.36, -11, 0.79)
    pt3dadd(-72.42, -78.42, -11, 0.79)
    pt3dadd(-72.53, -78.56, -11.5, 0.79)
    pt3dadd(-72.69, -78.63, -11.5, 0.79)
    pt3dadd(-72.79, -78.73, -11.5, 0.79)
    pt3dadd(-72.9, -78.84, -11.5, 0.79)
    pt3dadd(-72.95, -79.05, -11.5, 0.79)
    pt3dadd(-73.05, -79.15, -11.5, 0.79)
    pt3dadd(-73.26, -79.42, -11.5, 0.79)
    pt3dadd(-73.37, -79.52, -11.5, 0.79)
    pt3dadd(-73.42, -79.68, -11.5, 0.79)
    pt3dadd(-73.53, -79.89, -12, 0.79)
    pt3dadd(-73.68, -80.05, -12, 0.79)
    pt3dadd(-73.79, -80.15, -12, 0.79)
    pt3dadd(-73.84, -80.31, -12, 0.79)
    pt3dadd(-73.89, -80.52, -12, 0.79)
    pt3dadd(-73.95, -80.62, -12, 0.79)
    pt3dadd(-74.05, -80.78, -12, 0.79)
    pt3dadd(-74.05, -80.89, -12, 0.79)
    pt3dadd(-74.39, -82.8, -12, 0.79)
    pt3dadd(-74.55, -82.86, -12, 0.79)
    pt3dadd(-74.65, -83.07, -12, 0.79)
    pt3dadd(-74.7, -83.22, -12, 0.79)
    pt3dadd(-74.81, -83.43, -12, 0.79)
    pt3dadd(-74.86, -83.59, -12, 0.79)
    pt3dadd(-74.97, -83.8, -12, 0.79)
    pt3dadd(-75.02, -84.01, -12, 0.79)
    pt3dadd(-75.12, -84.28, -12, 0.79)
    pt3dadd(-75.18, -84.49, -12, 0.79)
    pt3dadd(-75.23, -84.7, -12, 0.79)
    pt3dadd(-75.28, -84.85, -12, 0.79)
    pt3dadd(-75.33, -85.17, -12, 0.79)
    pt3dadd(-75.39, -85.43, -12, 0.79)
    pt3dadd(-75.44, -85.59, -12.5, 0.79)
    pt3dadd(-75.48, -85.85, -12.5, 0.79)
    pt3dadd(-75.54, -85.96, -12.5, 0.79)
    pt3dadd(-75.54, -87.32, -12.5, 0.79)
    pt3dadd(-75.48, -87.54, -12.5, 0.79)
    pt3dadd(-75.48, -87.8, -12.5, 0.79)
    pt3dadd(-75.44, -88.01, -12.5, 0.79)
    pt3dadd(-75.44, -88.17, -12.5, 0.79)
    pt3dadd(-75.39, -88.38, -12.5, 0.79)
    pt3dadd(-75.39, -88.95, -12.5, 0.79)
    pt3dadd(-75.33, -89.11, -12.5, 0.79)
    pt3dadd(-75.33, -89.43, -12.5, 0.79)
    pt3dadd(-75.28, -89.64, -12.5, 0.79)
    pt3dadd(-75.28, -89.9, -12.5, 0.79)
    pt3dadd(-75.23, -90.11, -12.5, 0.79)
    pt3dadd(-75.18, -90.22, -12.5, 0.79)
    pt3dadd(-75.18, -90.37, -12.5, 0.79)
    pt3dadd(-75.12, -90.53, -12.5, 0.79)
    pt3dadd(-75.12, -90.95, -12.5, 0.79)
    pt3dadd(-75.06, -91.06, -12.5, 0.79)
    pt3dadd(-75.12, -91.27, -12.5, 0.79)
    pt3dadd(-75.06, -91.48, -12.5, 0.79)
    pt3dadd(-75.12, -91.64, -12.5, 0.79)
    pt3dadd(-75.12, -91.85, -12.5, 0.79)
    pt3dadd(-75.23, -92.06, -12.5, 0.79)
    pt3dadd(-75.28, -92.16, -12.5, 0.79)
    pt3dadd(-75.28, -92.42, -12.5, 0.79)
    pt3dadd(-75.39, -92.63, -12.5, 0.79)
    pt3dadd(-75.39, -92.95, -12.5, 0.79)
    pt3dadd(-75.44, -93.11, -12.5, 0.79)
    pt3dadd(-75.44, -93.27, -12.5, 0.79)
    pt3dadd(-75.43, -94.88, -12.5, 0.79)
    pt3dadd(-75.58, -94.98, -12.5, 0.79)
    pt3dadd(-75.73, -95.19, -12.5, 0.79)
    pt3dadd(-75.79, -95.35, -12.5, 0.79)
    pt3dadd(-75.9, -95.46, -12.5, 0.79)
    pt3dadd(-75.95, -95.61, -12.5, 0.79)
    pt3dadd(-76.06, -95.77, -12.5, 0.79)
    pt3dadd(-76.11, -96.09, -12.5, 0.79)
    pt3dadd(-76.2, -96.35, -12.5, 0.79)
    pt3dadd(-76.42, -96.77, -12.5, 0.79)
    pt3dadd(-76.42, -97.03, -12.5, 0.79)
    pt3dadd(-76.48, -97.24, -12.5, 0.79)
    pt3dadd(-76.58, -97.45, -12.5, 0.79)
    pt3dadd(-76.69, -97.72, -12.5, 0.79)
    pt3dadd(-76.79, -97.93, -12.5, 0.79)
    pt3dadd(-76.84, -98.14, -12.5, 0.79)
    pt3dadd(-76.84, -98.29, -13, 0.79)
    pt3dadd(-76.95, -98.45, -13, 0.79)
    pt3dadd(-77, -98.61, -13, 0.79)
    pt3dadd(-77.05, -98.82, -13, 0.79)
    pt3dadd(-77.05, -99.08, -13, 0.79)
    pt3dadd(-77.16, -99.19, -13, 0.79)
    pt3dadd(-77.16, -99.35, -13, 0.79)
    pt3dadd(-77.2, -99.56, -13, 0.79)
    pt3dadd(-77.2, -99.92, -13, 0.79)
    pt3dadd(-77.26, -100.08, -13, 0.79)
    pt3dadd(-77.37, -100.29, -13, 0.79)
    pt3dadd(-77.42, -100.45, -13, 0.79)
    pt3dadd(-77.47, -100.61, -13, 0.79)
    pt3dadd(-77.53, -100.87, -13, 0.79)
    pt3dadd(-77.63, -100.98, -13, 0.79)
  }
}
proc shape3d_31() {
  dend[26] {
    pt3dadd(-77.68, -101.13, -13, 0.79)
    pt3dadd(-77.68, -101.34, -13, 0.79)
    pt3dadd(-77.79, -101.5, -12, 0.79)
    pt3dadd(-77.89, -101.71, -12, 0.79)
    pt3dadd(-78, -101.92, -12, 0.79)
    pt3dadd(-78.05, -102.08, -11.5, 0.79)
    pt3dadd(-78.16, -102.24, -11.5, 0.79)
    pt3dadd(-78.31, -102.39, -11.5, 0.79)
    pt3dadd(-78.37, -102.5, -11.5, 0.79)
    pt3dadd(-78.47, -102.6, -11.5, 0.79)
    pt3dadd(-78.58, -102.82, -11.5, 0.79)
    pt3dadd(-78.63, -102.92, -11.5, 0.79)
    pt3dadd(-78.73, -103.08, -11.5, 0.79)
    pt3dadd(-78.84, -103.18, -11.5, 0.79)
    pt3dadd(-78.94, -103.34, -11.5, 0.79)
    pt3dadd(-79.09, -103.45, -11, 0.79)
    pt3dadd(-79.2, -103.55, -11, 0.79)
    pt3dadd(-79.47, -103.81, -11, 0.79)
    pt3dadd(-79.94, -104.34, -11, 0.79)
    pt3dadd(-79.98, -104.5, -11, 0.79)
    pt3dadd(-79.98, -104.34, -11, 0.79)
    pt3dadd(-81.03, -106.46, -11.5, 0.79)
    pt3dadd(-81.19, -106.41, -11.5, 0.79)
    pt3dadd(-81.29, -106.46, -11.5, 0.79)
    pt3dadd(-81.45, -106.57, -11.5, 0.79)
    pt3dadd(-81.5, -106.72, -11.5, 0.79)
    pt3dadd(-81.55, -106.93, -11.5, 0.79)
    pt3dadd(-81.66, -107.09, -11.5, 0.79)
    pt3dadd(-81.66, -107.3, -11.5, 0.79)
    pt3dadd(-81.76, -107.51, -11.5, 0.79)
    pt3dadd(-81.81, -107.72, -11.5, 0.79)
    pt3dadd(-81.87, -107.93, -11.5, 0.79)
    pt3dadd(-81.87, -108.3, -11.5, 0.79)
    pt3dadd(-81.92, -108.51, -12, 0.79)
    pt3dadd(-81.92, -108.67, -12, 0.79)
    pt3dadd(-81.97, -108.88, -12, 0.79)
    pt3dadd(-81.97, -109.25, -12, 0.79)
    pt3dadd(-82.03, -109.41, -12, 0.79)
    pt3dadd(-82.03, -110.25, -12, 0.79)
    pt3dadd(-82.08, -110.35, -12, 0.79)
    pt3dadd(-82.08, -110.88, -12, 0.79)
    pt3dadd(-82.03, -111.04, -12, 0.79)
    pt3dadd(-81.92, -111.14, -12, 0.79)
    pt3dadd(-81.81, -111.25, -12, 0.79)
    pt3dadd(-81.7, -111.35, -12, 0.79)
    pt3dadd(-81.5, -111.46, -12, 0.79)
    pt3dadd(-81.23, -111.46, -12, 0.79)
    pt3dadd(-81.08, -111.51, -12, 0.79)
    pt3dadd(-80.61, -111.51, -12.5, 0.79)
    pt3dadd(-80.5, -111.67, -12.5, 0.79)
    pt3dadd(-80.34, -111.72, -12.5, 0.79)
    pt3dadd(-80.23, -111.82, -12.5, 0.79)
    pt3dadd(-80.23, -112.03, -12.5, 0.79)
    pt3dadd(-80.14, -112.09, -13, 0.79)
    pt3dadd(-80.08, -112.3, -13, 0.79)
    pt3dadd(-80.03, -112.4, -13, 0.79)
    pt3dadd(-80.03, -112.77, -13, 0.79)
    pt3dadd(-79.98, -112.93, -13, 0.79)
    pt3dadd(-79.98, -113.24, -13, 0.79)
    pt3dadd(-79.87, -113.24, -13, 0.79)
    pt3dadd(-79.81, -113.4, -13, 0.79)
    pt3dadd(-79.72, -113.45, -13, 0.79)
    pt3dadd(-79.72, -113.61, -13, 0.79)
    pt3dadd(-79.51, -113.61, -13, 0.79)
    pt3dadd(-79.19, -113.61, -13, 0.79)
    pt3dadd(-79.09, -113.56, -13, 0.79)
    pt3dadd(-78.88, -113.56, -13, 0.79)
    pt3dadd(-78.77, -113.61, -13, 0.79)
    pt3dadd(-78.67, -113.72, -13, 0.79)
    pt3dadd(-78.51, -113.82, -13, 0.79)
    pt3dadd(-78.34, -113.93, -13, 0.79)
    pt3dadd(-78.14, -114.14, -13, 0.79)
    pt3dadd(-78.04, -114.29, -13, 0.79)
    pt3dadd(-77.77, -114.56, -13, 0.79)
    pt3dadd(-77.67, -114.66, -13, 0.79)
    pt3dadd(-77.51, -114.77, -13, 0.79)
    pt3dadd(-77.41, -114.93, -13, 0.79)
    pt3dadd(-77.3, -114.98, -13, 0.79)
    pt3dadd(-77.25, -115.08, -13, 0.79)
    pt3dadd(-77.14, -115.19, -13, 0.79)
    pt3dadd(-76.98, -115.5, -13, 0.79)
    pt3dadd(-76.88, -115.61, -13, 0.79)
    pt3dadd(-76.62, -115.87, -13, 0.79)
    pt3dadd(-76.51, -115.92, -13, 0.79)
    pt3dadd(-76.41, -116.03, -13, 0.79)
    pt3dadd(-76.25, -116.19, -13, 0.79)
    pt3dadd(-75.98, -116.29, -13, 0.79)
    pt3dadd(-75.88, -116.29, -13, 0.79)
    pt3dadd(-74.88, -117.21, -13, 0.79)
    pt3dadd(-74.81, -117.42, -13, 0.79)
    pt3dadd(-74.77, -117.58, -13, 0.79)
    pt3dadd(-74.67, -117.68, -13, 0.79)
    pt3dadd(-74.56, -117.84, -13, 0.79)
    pt3dadd(-74.56, -118.05, -13.5, 0.79)
    pt3dadd(-74.45, -118.16, -13.5, 0.79)
    pt3dadd(-74.3, -118.31, -13.5, 0.79)
    pt3dadd(-74.19, -118.42, -13.5, 0.79)
    pt3dadd(-74.09, -118.52, -13.5, 0.79)
    pt3dadd(-74.09, -118.63, -13.5, 0.79)
    pt3dadd(-73.93, -118.68, -13.5, 0.79)
    pt3dadd(-73.83, -118.79, -14, 0.79)
    pt3dadd(-73.72, -118.89, -14, 0.79)
    pt3dadd(-73.62, -118.95, -14, 0.79)
    pt3dadd(-73.56, -119.05, -14, 0.79)
    pt3dadd(-73.45, -119.16, -14, 0.79)
    pt3dadd(-73.34, -119.21, -14, 0.79)
    pt3dadd(-73.2, -119.31, -14, 0.79)
    pt3dadd(-73.09, -119.42, -14, 0.79)
    pt3dadd(-72.93, -119.52, -14, 0.79)
    pt3dadd(-72.67, -119.63, -14, 0.79)
    pt3dadd(-72.09, -119.63, -14, 0.79)
    pt3dadd(-71.94, -119.79, -14, 0.79)
    pt3dadd(-71.83, -119.89, -14.5, 0.79)
    pt3dadd(-71.52, -120.05, -14.5, 0.79)
    pt3dadd(-71.52, -120.15, -14.5, 0.79)
    pt3dadd(-71.36, -120.31, -14.5, 0.79)
    pt3dadd(-71.2, -120.47, -14.5, 0.79)
    pt3dadd(-71.15, -120.68, -14.5, 0.79)
    pt3dadd(-70.98, -121, -14.5, 0.79)
    pt3dadd(-70.94, -121.1, -14.5, 0.79)
    pt3dadd(-70.83, -121.26, -14.5, 0.79)
    pt3dadd(-70.83, -121.57, -14.5, 0.79)
    pt3dadd(-70.78, -121.73, -14.5, 0.79)
    pt3dadd(-70.68, -121.94, -14.5, 0.79)
    pt3dadd(-70.68, -122.15, -14.5, 0.79)
    pt3dadd(-70.62, -122.31, -14.5, 0.79)
    pt3dadd(-70.56, -122.52, -14.5, 0.79)
    pt3dadd(-70.56, -122.68, -14.5, 0.79)
    pt3dadd(-70.52, -122.84, -14.5, 0.79)
    pt3dadd(-70.52, -122.99, -14.5, 0.79)
    pt3dadd(-70.47, -123.2, -14.5, 0.79)
    pt3dadd(-70.47, -124.25, -14.5, 0.79)
    pt3dadd(-70.52, -124.41, -14.5, 0.79)
    pt3dadd(-70.52, -124.73, -14.5, 0.79)
    pt3dadd(-70.56, -124.89, -14.5, 0.79)
    pt3dadd(-70.56, -125.1, -14.5, 0.79)
    pt3dadd(-70.62, -125.25, -14.5, 0.79)
    pt3dadd(-70.62, -125.41, -15, 0.79)
    pt3dadd(-70.68, -125.62, -15, 0.79)
    pt3dadd(-70.68, -125.78, -15, 0.79)
    pt3dadd(-70.73, -125.99, -15, 0.79)
    pt3dadd(-70.73, -126.15, -15, 0.79)
    pt3dadd(-70.78, -126.3, -15, 0.79)
    pt3dadd(-70.73, -126.46, -15, 0.79)
    pt3dadd(-70.68, -126.57, -15, 0.79)
    pt3dadd(-70.68, -126.83, -15.5, 0.79)
    pt3dadd(-70.62, -126.99, -15.5, 0.79)
    pt3dadd(-70.56, -127.09, -15.5, 0.79)
    pt3dadd(-70.52, -127.2, -15.5, 0.79)
    pt3dadd(-70.47, -127.3, -15.5, 0.79)
    pt3dadd(-70.41, -127.41, -15.5, 0.79)
    pt3dadd(-70.36, -127.51, -15.5, 0.79)
    pt3dadd(-70.31, -127.72, -15.5, 0.79)
    pt3dadd(-70.2, -127.88, -15.5, 0.79)
    pt3dadd(-70.2, -128.13, -15.5, 0.79)
    pt3dadd(-70.15, -128.25, -15.5, 0.79)
    pt3dadd(-69.69, -128.87, -15.5, 0.84)
    pt3dadd(-69.59, -129.03, -15.5, 0.84)
    pt3dadd(-69.53, -129.18, -15.5, 0.84)
    pt3dadd(-69.48, -129.34, -15.5, 0.84)
    pt3dadd(-69.38, -129.44, -15.5, 0.84)
    pt3dadd(-69.22, -129.71, -15.5, 0.84)
    pt3dadd(-69.06, -129.81, -15.5, 0.84)
    pt3dadd(-68.69, -130.18, -15.5, 0.84)
    pt3dadd(-68.54, -130.38, -15.5, 0.84)
    pt3dadd(-68.54, -130.55, -16, 0.84)
    pt3dadd(-68.38, -130.76, -16, 0.84)
    pt3dadd(-68.33, -130.87, -16, 0.84)
    pt3dadd(-68.22, -131.13, -16, 0.84)
    pt3dadd(-68.12, -131.22, -16, 0.84)
    pt3dadd(-67.95, -131.44, -16, 0.84)
    pt3dadd(-67.91, -131.65, -16, 0.84)
    pt3dadd(-67.7, -131.81, -16, 0.84)
    pt3dadd(-67.7, -132.13, -16, 0.84)
    pt3dadd(-67.64, -132.34, -16, 0.84)
    pt3dadd(-67.43, -132.6, -16, 0.84)
    pt3dadd(-67.33, -132.71, -16, 0.84)
    pt3dadd(-67.17, -132.86, -16, 0.84)
    pt3dadd(-67.06, -133.07, -16, 0.84)
    pt3dadd(-66.95, -133.18, -16, 0.84)
    pt3dadd(-66.91, -133.38, -16, 0.84)
    pt3dadd(-66.86, -133.49, -16, 0.84)
    pt3dadd(-66.75, -133.65, -16, 0.84)
    pt3dadd(-66.7, -133.76, -16, 0.84)
    pt3dadd(-66.54, -133.97, -16, 0.84)
    pt3dadd(-66.48, -134.13, -16, 0.84)
    pt3dadd(-66.38, -134.22, -16, 0.84)
    pt3dadd(-66.23, -134.49, -16, 0.84)
    pt3dadd(-66.17, -134.65, -16, 0.84)
    pt3dadd(-66.02, -134.91, -16, 0.84)
    pt3dadd(-65.86, -135.12, -16, 0.84)
    pt3dadd(-65.86, -135.28, -16, 0.84)
    pt3dadd(-65.75, -135.49, -16, 0.84)
    pt3dadd(-65.65, -135.6, -16, 0.84)
    pt3dadd(-65.59, -135.86, -16, 0.84)
    pt3dadd(-65.48, -136.02, -16, 0.84)
    pt3dadd(-65.48, -136.22, -16, 0.84)
    pt3dadd(-65.33, -136.38, -16, 0.84)
    pt3dadd(-65.33, -136.6, -16, 0.84)
    pt3dadd(-65.23, -136.81, -16, 0.84)
    pt3dadd(-65.18, -136.96, -16, 0.84)
    pt3dadd(-65.12, -137.16, -16, 0.84)
    pt3dadd(-65.06, -137.28, -16, 0.84)
    pt3dadd(-65.06, -137.44, -16, 0.84)
    pt3dadd(-65.02, -137.54, -16, 0.84)
    pt3dadd(-64.97, -137.65, -16, 0.84)
    pt3dadd(-64.91, -137.91, -16, 0.84)
    pt3dadd(-64.76, -137.86, -16, 0.84)
    pt3dadd(-64.7, -138.02, -16, 0.84)
    pt3dadd(-64.7, -138.28, -16, 0.84)
    pt3dadd(-64.65, -138.44, -16, 0.84)
    pt3dadd(-64.59, -138.54, -16, 0.84)
    pt3dadd(-64.59, -138.86, -16, 0.84)
    pt3dadd(-64.48, -138.96, -16, 0.84)
    pt3dadd(-64.48, -139.59, -16, 0.84)
    pt3dadd(-64.44, -139.69, -16, 0.84)
    pt3dadd(-64.48, -139.86, -16, 0.84)
    pt3dadd(-64.48, -140.07, -16, 0.84)
    pt3dadd(-64.19, -141.09, -16.5, 0.84)
    pt3dadd(-64.09, -141.13, -16.5, 0.84)
    pt3dadd(-64.09, -141.35, -16.5, 0.84)
    pt3dadd(-63.93, -141.4, -16.5, 0.84)
    pt3dadd(-63.82, -141.51, -16.5, 0.84)
    pt3dadd(-63.72, -141.72, -16.5, 0.84)
    pt3dadd(-63.61, -141.88, -16.5, 0.84)
    pt3dadd(-63.46, -141.97, -16.5, 0.84)
    pt3dadd(-63.35, -142.09, -15.5, 0.84)
    pt3dadd(-63.19, -142.09, -15.5, 0.84)
    pt3dadd(-63.09, -142.13, -15, 0.84)
    pt3dadd(-62.98, -142.19, -14.5, 0.84)
    pt3dadd(-62.67, -142.19, -14.5, 0.84)
    pt3dadd(-62.35, -142.35, -14, 0.84)
    pt3dadd(-62.2, -142.4, -14, 0.84)
    pt3dadd(-62.09, -142.51, -14, 0.84)
    pt3dadd(-61.93, -142.56, -14, 0.84)
    pt3dadd(-61.83, -142.61, -14, 0.84)
    pt3dadd(-61.83, -142.77, -14, 0.84)
    pt3dadd(-61.72, -142.88, -14, 0.84)
    pt3dadd(-61.57, -142.97, -14, 0.84)
    pt3dadd(-61.41, -143.13, -14, 0.84)
    pt3dadd(-61.3, -143.35, -14, 0.84)
    pt3dadd(-61.25, -143.44, -14, 0.84)
    pt3dadd(-61.2, -143.61, -14, 0.84)
    pt3dadd(-61.15, -143.77, -14, 0.84)
    pt3dadd(-61.09, -143.97, -14, 0.84)
    pt3dadd(-61.04, -144.09, -14, 0.84)
    pt3dadd(-60.99, -144.24, -14, 0.84)
    pt3dadd(-60.99, -144.82, -14, 0.84)
    pt3dadd(-60.94, -145.03, -14, 0.84)
  }
}
proc shape3d_32() {
  dend[26] {
    pt3dadd(-60.94, -145.24, -14, 0.84)
    pt3dadd(-61.04, -145.4, -14, 0.84)
    pt3dadd(-61.04, -145.77, -14, 0.84)
    pt3dadd(-61.09, -145.97, -14, 0.84)
    pt3dadd(-61.09, -146.13, -14, 0.84)
    pt3dadd(-61.09, -146.24, -14, 0.84)
    pt3dadd(-61.15, -146.44, -14, 0.84)
    pt3dadd(-61.15, -146.71, -14, 0.84)
    pt3dadd(-61.2, -146.91, -14, 0.84)
    pt3dadd(-61.2, -147.13, -14, 0.84)
    pt3dadd(-61.15, -147.24, -14, 0.84)
    pt3dadd(-61.09, -147.4, -14, 0.84)
    pt3dadd(-61.04, -147.5, -14, 0.84)
    pt3dadd(-60.99, -147.61, -14, 0.84)
    pt3dadd(-60.88, -147.66, -14, 0.84)
    pt3dadd(-60.78, -147.76, -14, 0.84)
    pt3dadd(-60.67, -147.87, -14, 0.84)
    pt3dadd(-60.57, -147.91, -14, 0.84)
    pt3dadd(-60.41, -147.97, -14, 0.84)
    pt3dadd(-60.2, -147.97, -14, 0.84)
    pt3dadd(-60.04, -148.03, -14, 0.84)
    pt3dadd(-59.94, -147.97, -14, 0.84)
    pt3dadd(-59.83, -148.03, -14, 0.84)
    pt3dadd(-59.57, -148.03, -14.5, 0.84)
    pt3dadd(-59.47, -148.13, -15, 0.84)
    pt3dadd(-59.41, -148.24, -15, 0.84)
    pt3dadd(-59.36, -148.34, -15, 0.84)
    pt3dadd(-59.36, -148.66, -15, 0.84)
    pt3dadd(-59.31, -149.08, -15, 0.84)
    pt3dadd(-59.26, -149.29, -15, 0.84)
    pt3dadd(-59.2, -149.44, -14.5, 0.84)
    pt3dadd(-59.2, -150.13, -14, 0.84)
    pt3dadd(-59.15, -150.29, -14, 0.84)
    pt3dadd(-59.15, -150.5, -14, 0.84)
    pt3dadd(-59.1, -150.6, -13.5, 0.84)
    pt3dadd(-59.1, -150.76, -13.5, 0.84)
    pt3dadd(-59.15, -150.76, -12.5, 0.84)
    pt3dadd(-59.15, -151.13, -12, 0.84)
    pt3dadd(-59.1, -151.29, -12, 0.84)
    pt3dadd(-59.05, -151.38, -12, 0.84)
    pt3dadd(-59.05, -151.5, -12, 0.84)
    pt3dadd(-58.38, -152.66, -11.5, 0.84)
    pt3dadd(-58.38, -153.09, -11.5, 0.84)
    pt3dadd(-58.22, -153.36, -11.5, 0.84)
    pt3dadd(-58.06, -153.57, -11.5, 0.84)
    pt3dadd(-58.01, -153.72, -11.5, 0.84)
    pt3dadd(-57.85, -153.93, -11.5, 0.84)
    pt3dadd(-57.59, -154.19, -11.5, 0.84)
    pt3dadd(-57.38, -154.3, -11.5, 0.84)
    pt3dadd(-57.27, -154.41, -11.5, 0.84)
    pt3dadd(-57.12, -154.62, -11.5, 0.84)
    pt3dadd(-57.01, -154.72, -11.5, 0.84)
    pt3dadd(-56.91, -154.93, -11.5, 0.84)
    pt3dadd(-56.75, -154.99, -12, 0.84)
    pt3dadd(-56.7, -155.19, -12, 0.84)
    pt3dadd(-56.64, -155.3, -12, 0.84)
  }
  dend[27] {pt3dclear()
    pt3dadd(-15.08, 1.78, 0, 1)
    pt3dadd(-15.19, 2.36, 1, 0.84)
    pt3dadd(-15.19, 2.41, 0, 0.84)
    pt3dadd(-15.19, 2.57, 0, 0.84)
    pt3dadd(-15.35, 2.73, -0.5, 0.84)
    pt3dadd(-15.5, 2.83, -0.5, 0.84)
    pt3dadd(-15.66, 2.99, -0.5, 0.84)
    pt3dadd(-15.77, 3.09, -0.5, 0.84)
    pt3dadd(-15.87, 3.15, -0.5, 0.84)
    pt3dadd(-16.03, 3.25, -0.5, 0.84)
    pt3dadd(-16.13, 3.3, -0.5, 0.84)
    pt3dadd(-16.29, 3.36, -0.5, 0.84)
    pt3dadd(-16.5, 3.36, -0.5, 0.84)
    pt3dadd(-16.61, 3.36, -0.5, 0.84)
    pt3dadd(-16.76, 3.3, -0.5, 0.84)
    pt3dadd(-17.03, 3.3, -0.5, 0.84)
    pt3dadd(-17.23, 3.25, -0.5, 0.84)
    pt3dadd(-17.34, 3.25, -0.5, 0.84)
    pt3dadd(-17.45, 3.3, -0.5, 0.84)
    pt3dadd(-17.45, 3.41, -0.5, 0.84)
  }
  dend[28] {pt3dclear()
    pt3dadd(-7.1, 2.41, 2, 1)
    pt3dadd(-7.1, 3.04, 3.5, 0.84)
    pt3dadd(-7.1, 3.36, 3.5, 0.84)
    pt3dadd(-7.1, 3.51, 3, 0.84)
    pt3dadd(-7.16, 3.62, 3, 0.84)
    pt3dadd(-7.21, 3.72, 3, 0.84)
    pt3dadd(-7.21, 3.83, 3, 0.84)
    pt3dadd(-7.31, 3.93, 3, 0.84)
    pt3dadd(-7.37, 4.13, 3, 0.84)
    pt3dadd(-7.47, 4.25, 3, 0.84)
    pt3dadd(-7.58, 4.34, 3, 0.84)
    pt3dadd(-7.73, 4.41, 3, 0.84)
    pt3dadd(-7.84, 4.51, 3, 0.84)
    pt3dadd(-8, 4.62, 3, 0.84)
    pt3dadd(-8.21, 4.67, 3, 0.84)
    pt3dadd(-8.36, 4.78, 3, 0.84)
    pt3dadd(-8.47, 4.83, 3, 0.84)
    pt3dadd(-8.52, 4.93, 3, 0.84)
    pt3dadd(-8.73, 4.93, 3, 0.84)
    pt3dadd(-8.89, 5.04, 3, 0.84)
    pt3dadd(-8.99, 5.09, 3, 0.84)
    pt3dadd(-9.1, 5.14, 3, 0.84)
    pt3dadd(-9.26, 5.2, 3, 0.84)
    pt3dadd(-9.36, 5.25, 3, 0.84)
    pt3dadd(-9.52, 5.3, 3.5, 0.84)
    pt3dadd(-9.57, 5.41, 3.5, 0.84)
    pt3dadd(-9.61, 5.51, 3.5, 0.84)
    pt3dadd(-9.61, 5.67, 3.5, 0.84)
    pt3dadd(-9.68, 5.77, 3.5, 0.84)
    pt3dadd(-9.68, 5.93, 3.5, 0.84)
    pt3dadd(-9.73, 6.09, 3.5, 0.84)
    pt3dadd(-9.83, 6.35, 3.5, 0.84)
    pt3dadd(-9.89, 6.51, 3.5, 0.84)
    pt3dadd(-9.99, 6.67, 3.5, 0.84)
    pt3dadd(-10.03, 6.77, 3.5, 0.84)
    pt3dadd(-10.1, 6.98, 3.5, 0.84)
    pt3dadd(-10.15, 7.09, 3.5, 0.84)
    pt3dadd(-10.25, 7.35, 3.5, 0.84)
    pt3dadd(-10.31, 7.46, 3.5, 0.84)
    pt3dadd(-10.46, 7.56, 3.5, 0.84)
    pt3dadd(-10.62, 7.72, 3.5, 0.84)
    pt3dadd(-10.62, 7.88, 3.5, 0.84)
    pt3dadd(-10.73, 7.98, 3.5, 0.84)
    pt3dadd(-10.78, 8.09, 3.5, 0.84)
    pt3dadd(-10.88, 8.25, 3.5, 0.84)
    pt3dadd(-10.99, 8.3, 3.5, 0.84)
    pt3dadd(-11.15, 8.35, 3.5, 0.84)
    pt3dadd(-11.25, 8.46, 3.5, 0.84)
    pt3dadd(-11.41, 8.51, 3.5, 0.84)
    pt3dadd(-11.51, 8.61, 3.5, 0.84)
    pt3dadd(-11.72, 8.61, 3.5, 0.84)
    pt3dadd(-11.88, 8.77, 3.5, 0.84)
    pt3dadd(-12.09, 8.82, 3, 0.84)
    pt3dadd(-12.2, 8.88, 3, 0.84)
    pt3dadd(-12.3, 8.93, 3, 0.84)
    pt3dadd(-12.41, 8.98, 3, 0.84)
    pt3dadd(-12.46, 9.09, 3, 0.84)
    pt3dadd(-12.56, 9.19, 3, 0.84)
    pt3dadd(-12.62, 9.35, 3, 0.84)
    pt3dadd(-12.77, 9.51, 3, 0.84)
    pt3dadd(-12.77, 9.72, 3, 0.84)
    pt3dadd(-12.88, 9.82, 3, 0.84)
    pt3dadd(-12.93, 10.02, 3, 0.84)
    pt3dadd(-12.93, 10.24, 3.5, 0.84)
    pt3dadd(-12.98, 10.4, 3.5, 0.84)
    pt3dadd(-13.09, 10.51, 3.5, 0.84)
    pt3dadd(-13.65, 11.56, 2.5, 0.84)
    pt3dadd(-13.76, 11.77, 2.5, 0.84)
    pt3dadd(-13.81, 11.93, 2.5, 0.84)
    pt3dadd(-13.91, 12.03, 2.5, 0.84)
    pt3dadd(-13.91, 12.19, 2.5, 0.84)
    pt3dadd(-13.97, 12.4, 2.5, 0.84)
    pt3dadd(-14.12, 12.66, 2.5, 0.84)
    pt3dadd(-14.23, 12.87, 2.5, 0.84)
    pt3dadd(-14.28, 13.03, 2.5, 0.84)
    pt3dadd(-14.33, 13.14, 2.5, 0.84)
    pt3dadd(-14.44, 13.29, 2.5, 0.84)
    pt3dadd(-14.44, 13.5, 2.5, 0.84)
    pt3dadd(-14.54, 13.61, 2.5, 0.84)
    pt3dadd(-14.6, 13.77, 2.5, 0.84)
    pt3dadd(-14.65, 13.98, 2.5, 0.84)
    pt3dadd(-14.7, 14.19, 2.5, 0.84)
    pt3dadd(-14.8, 14.24, 2.5, 0.84)
    pt3dadd(-14.8, 14.35, 2.5, 0.84)
    pt3dadd(-14.91, 14.45, 2.5, 0.84)
    pt3dadd(-14.91, 14.56, 2.5, 0.84)
    pt3dadd(-14.96, 14.66, 2.5, 0.84)
    pt3dadd(-15.07, 14.77, 2.5, 0.84)
    pt3dadd(-15.12, 14.92, 2.5, 0.84)
    pt3dadd(-15.17, 15.13, 2.5, 0.84)
    pt3dadd(-15.22, 15.24, 2.5, 0.84)
    pt3dadd(-15.28, 15.34, 2.5, 0.84)
    pt3dadd(-15.38, 15.5, 2.5, 0.84)
    pt3dadd(-15.43, 15.66, 2.5, 0.84)
    pt3dadd(-15.54, 15.87, 2.5, 0.84)
    pt3dadd(-15.59, 15.98, 2.5, 0.84)
    pt3dadd(-15.7, 16.03, 2.5, 0.84)
    pt3dadd(-15.75, 16.23, 2.5, 0.84)
    pt3dadd(-15.8, 16.34, 2.5, 0.84)
    pt3dadd(-15.91, 16.5, 2.5, 0.84)
    pt3dadd(-16.01, 16.71, 2.5, 0.84)
    pt3dadd(-16.05, 16.87, 2.5, 0.84)
    pt3dadd(-16.17, 16.97, 2.5, 0.84)
    pt3dadd(-16.22, 17.07, 2.5, 0.84)
    pt3dadd(-16.27, 17.23, 2.5, 0.84)
    pt3dadd(-16.43, 17.23, 2.5, 0.84)
    pt3dadd(-16.48, 17.34, 2.5, 0.84)
    pt3dadd(-16.59, 17.55, 2.5, 0.84)
    pt3dadd(-16.69, 17.66, 2.5, 0.84)
    pt3dadd(-16.8, 17.76, 2.5, 0.84)
    pt3dadd(-16.8, 17.87, 2.5, 0.84)
    pt3dadd(-16.96, 17.92, 2.5, 0.84)
    pt3dadd(-17.05, 18.03, 2.5, 0.84)
    pt3dadd(-17.22, 18.29, 2.5, 0.84)
    pt3dadd(-17.38, 18.45, 2.5, 0.84)
    pt3dadd(-17.38, 18.55, 2.5, 0.84)
    pt3dadd(-17.43, 18.66, 2.5, 0.84)
    pt3dadd(-17.43, 18.8, 2.5, 0.84)
    pt3dadd(-17.48, 18.92, 2.5, 0.84)
    pt3dadd(-17.59, 19.02, 2.5, 0.84)
    pt3dadd(-17.59, 19.18, 2.5, 0.84)
    pt3dadd(-17.69, 19.34, 2.5, 0.84)
    pt3dadd(-17.73, 19.45, 2.5, 0.84)
    pt3dadd(-17.8, 19.55, 2.5, 0.84)
    pt3dadd(-17.85, 19.66, 2.5, 0.84)
    pt3dadd(-17.95, 19.76, 2.5, 0.84)
    pt3dadd(-18.01, 19.87, 2.5, 0.84)
    pt3dadd(-18.11, 19.97, 2.5, 0.84)
    pt3dadd(-18.22, 20.13, 2.5, 0.84)
    pt3dadd(-18.27, 20.23, 2.5, 0.84)
    pt3dadd(-18.32, 20.34, 2.5, 0.84)
    pt3dadd(-18.43, 20.44, 2.5, 0.84)
    pt3dadd(-18.53, 20.55, 2.5, 0.84)
    pt3dadd(-18.64, 20.71, 2.5, 0.84)
    pt3dadd(-18.69, 20.81, 2.5, 0.84)
    pt3dadd(-18.79, 20.92, 2.5, 0.84)
    pt3dadd(-18.89, 21.13, 2.5, 0.84)
    pt3dadd(-18.95, 21.23, 2.5, 0.84)
    pt3dadd(-19.05, 21.39, 2.5, 0.84)
    pt3dadd(-19.11, 21.5, 2.5, 0.84)
    pt3dadd(-19.21, 21.6, 2.5, 0.84)
    pt3dadd(-19.21, 21.71, 2.5, 0.84)
    pt3dadd(-20.56, 22.49, 2, 0.84)
    pt3dadd(-20.66, 22.59, 2, 0.84)
    pt3dadd(-20.82, 22.64, 2, 0.84)
    pt3dadd(-21.13, 22.64, 2, 0.84)
    pt3dadd(-21.29, 22.7, 2, 0.84)
    pt3dadd(-21.5, 22.75, 2, 0.84)
    pt3dadd(-21.66, 22.8, 2.5, 0.84)
    pt3dadd(-21.71, 22.85, 3, 0.84)
    pt3dadd(-21.76, 22.96, 3, 0.84)
    pt3dadd(-21.92, 23.01, 3.5, 0.84)
    pt3dadd(-21.97, 23.12, 4, 0.84)
    pt3dadd(-22.08, 23.17, 4, 0.84)
    pt3dadd(-22.18, 23.33, 4, 0.84)
    pt3dadd(-22.34, 23.49, 4.5, 0.84)
    pt3dadd(-22.45, 23.54, 4.5, 0.84)
    pt3dadd(-22.55, 23.64, 4.5, 0.84)
    pt3dadd(-22.6, 23.75, 4.5, 0.84)
    pt3dadd(-22.81, 23.91, 4.5, 0.84)
    pt3dadd(-22.87, 24.06, 4.5, 0.84)
    pt3dadd(-22.92, 24.22, 4.5, 0.84)
    pt3dadd(-23.02, 24.33, 4.5, 0.84)
    pt3dadd(-23.13, 24.43, 4.5, 0.84)
    pt3dadd(-23.18, 24.59, 4.5, 0.84)
    pt3dadd(-23.29, 24.69, 4.5, 0.84)
    pt3dadd(-23.34, 24.8, 4.5, 0.84)
    pt3dadd(-23.39, 24.9, 4.5, 0.84)
    pt3dadd(-23.5, 25.06, 4.5, 0.84)
    pt3dadd(-23.6, 25.17, 4.5, 0.84)
    pt3dadd(-23.76, 25.22, 4.5, 0.84)
    pt3dadd(-23.86, 25.33, 4.5, 0.84)
    pt3dadd(-23.92, 25.48, 4.5, 0.84)
  }
}
proc shape3d_33() {
  dend[28] {
    pt3dadd(-24.13, 25.69, 4.5, 0.84)
    pt3dadd(-24.23, 25.85, 4.5, 0.84)
    pt3dadd(-24.28, 25.96, 4.5, 0.84)
    pt3dadd(-24.39, 26.06, 4.5, 0.84)
    pt3dadd(-24.49, 26.11, 4.5, 0.84)
    pt3dadd(-24.6, 26.22, 4.5, 0.84)
    pt3dadd(-24.7, 26.27, 4.5, 0.84)
    pt3dadd(-24.86, 26.43, 4.5, 0.84)
    pt3dadd(-24.91, 26.53, 4.5, 0.84)
    pt3dadd(-25.02, 26.64, 4.5, 0.84)
    pt3dadd(-25.12, 26.74, 4.5, 0.84)
    pt3dadd(-25.28, 26.85, 4.5, 0.84)
    pt3dadd(-25.39, 26.95, 4.5, 0.84)
    pt3dadd(-25.44, 27.11, 4.5, 0.84)
    pt3dadd(-25.6, 27.22, 4.5, 0.84)
    pt3dadd(-25.65, 27.38, 4.5, 0.84)
    pt3dadd(-25.81, 27.48, 4.5, 0.84)
    pt3dadd(-25.91, 27.64, 4.5, 0.84)
    pt3dadd(-25.96, 27.74, 4.5, 0.84)
    pt3dadd(-26.07, 27.9, 4.5, 0.84)
    pt3dadd(-26.12, 28.01, 4.5, 0.84)
    pt3dadd(-26.23, 28.32, 4.5, 0.84)
    pt3dadd(-26.28, 28.43, 4.5, 0.84)
    pt3dadd(-26.33, 28.53, 4.5, 0.84)
    pt3dadd(-26.44, 28.64, 4.5, 0.84)
    pt3dadd(-26.54, 28.74, 4.5, 0.84)
    pt3dadd(-26.59, 28.95, 4.5, 0.84)
    pt3dadd(-26.7, 29.01, 4.5, 0.84)
    pt3dadd(-26.8, 29.06, 4.5, 0.84)
    pt3dadd(-26.86, 29.16, 4.5, 0.84)
    pt3dadd(-26.91, 29.27, 4.5, 0.84)
    pt3dadd(-26.96, 29.37, 4.5, 0.84)
    pt3dadd(-27.07, 29.48, 4.5, 0.84)
    pt3dadd(-27.17, 29.58, 4.5, 0.84)
    pt3dadd(-27.22, 29.74, 4.5, 0.84)
    pt3dadd(-27.33, 29.85, 4.5, 0.84)
    pt3dadd(-27.49, 29.85, 4.5, 0.84)
    pt3dadd(-27.59, 30, 4.5, 0.84)
    pt3dadd(-27.7, 30.11, 4.5, 0.84)
    pt3dadd(-27.8, 30.21, 4.5, 0.84)
    pt3dadd(-27.96, 30.27, 4.5, 0.84)
    pt3dadd(-28.01, 30.37, 4.5, 0.84)
    pt3dadd(-28.17, 30.48, 4.5, 0.84)
    pt3dadd(-28.27, 30.53, 4.5, 0.84)
    pt3dadd(-28.38, 30.63, 4.5, 0.84)
    pt3dadd(-28.54, 30.74, 4.5, 0.84)
    pt3dadd(-28.59, 30.85, 4.5, 0.84)
    pt3dadd(-28.75, 30.85, 4.5, 0.84)
    pt3dadd(-28.85, 30.95, 4.5, 0.84)
    pt3dadd(-28.96, 31, 4.5, 0.84)
    pt3dadd(-29.06, 31.11, 4.5, 0.84)
    pt3dadd(-29.17, 31.21, 4.5, 0.84)
    pt3dadd(-29.27, 31.27, 4.5, 0.84)
    pt3dadd(-29.53, 31.53, 4.5, 0.84)
    pt3dadd(-29.64, 31.63, 4.5, 0.84)
    pt3dadd(-29.74, 31.74, 4.5, 0.84)
    pt3dadd(-29.74, 31.95, 4.5, 0.84)
    pt3dadd(-29.9, 32, 4.5, 0.84)
    pt3dadd(-29.9, 32.11, 4.5, 0.84)
    pt3dadd(-30.01, 32.26, 4.5, 0.84)
    pt3dadd(-30.06, 32.36, 4.5, 0.84)
    pt3dadd(-30.11, 32.47, 4.5, 0.84)
    pt3dadd(-30.16, 32.58, 4.5, 0.84)
    pt3dadd(-30.22, 32.74, 4.5, 0.84)
    pt3dadd(-30.27, 32.84, 4.5, 0.84)
    pt3dadd(-30.32, 32.95, 4.5, 0.84)
    pt3dadd(-30.37, 33.04, 4.5, 0.84)
    pt3dadd(-30.48, 33.15, 4.5, 0.84)
    pt3dadd(-30.48, 33.26, 4.5, 0.84)
    pt3dadd(-31.37, 34.1, 4.5, 0.84)
    pt3dadd(-31.48, 34.21, 4.5, 0.84)
    pt3dadd(-31.58, 34.26, 4.5, 0.84)
    pt3dadd(-31.74, 34.31, 4.5, 0.84)
    pt3dadd(-31.95, 34.42, 4.5, 0.84)
    pt3dadd(-32.1, 34.47, 4.5, 0.84)
    pt3dadd(-32.21, 34.52, 4.5, 0.84)
    pt3dadd(-32.36, 34.63, 4.5, 0.84)
    pt3dadd(-32.47, 34.72, 5, 0.84)
    pt3dadd(-32.52, 34.84, 5, 0.84)
    pt3dadd(-32.68, 34.89, 5, 0.84)
    pt3dadd(-32.72, 35.04, 5, 0.84)
    pt3dadd(-32.89, 35.21, 5, 0.84)
    pt3dadd(-33, 35.31, 5, 0.84)
    pt3dadd(-33.04, 35.47, 5, 0.84)
    pt3dadd(-33.15, 35.57, 5, 0.84)
    pt3dadd(-33.26, 35.68, 5, 0.84)
    pt3dadd(-33.31, 35.84, 5, 0.84)
    pt3dadd(-33.42, 35.94, 5, 0.84)
    pt3dadd(-33.42, 36.15, 5, 0.84)
    pt3dadd(-33.52, 36.31, 5, 0.84)
    pt3dadd(-33.57, 36.42, 5, 0.84)
    pt3dadd(-33.63, 36.57, 5, 0.84)
    pt3dadd(-33.68, 36.78, 5, 0.84)
    pt3dadd(-33.68, 36.99, 5, 0.84)
    pt3dadd(-33.72, 37.1, 5, 0.84)
    pt3dadd(-33.72, 37.26, 5, 0.84)
    pt3dadd(-33.78, 37.47, 5, 0.84)
    pt3dadd(-33.78, 37.61, 5.5, 0.84)
    pt3dadd(-33.84, 37.83, 5.5, 0.84)
    pt3dadd(-33.89, 38.1, 5.5, 0.84)
    pt3dadd(-33.89, 38.36, 5.5, 0.84)
    pt3dadd(-33.94, 38.52, 5.5, 0.84)
    pt3dadd(-33.94, 38.78, 6, 0.84)
    pt3dadd(-33.99, 38.99, 6, 0.84)
    pt3dadd(-34.1, 39.1, 6, 0.84)
    pt3dadd(-34.1, 39.36, 6, 0.84)
    pt3dadd(-34.15, 39.52, 6, 0.84)
    pt3dadd(-34.2, 39.67, 6, 0.84)
    pt3dadd(-34.26, 39.78, 6, 0.84)
    pt3dadd(-34.26, 39.94, 6, 0.84)
    pt3dadd(-34.31, 40.15, 6, 0.84)
    pt3dadd(-34.4, 40.25, 6, 0.84)
    pt3dadd(-34.47, 40.36, 6, 0.84)
    pt3dadd(-34.52, 40.46, 6, 0.84)
    pt3dadd(-34.68, 40.57, 6, 0.84)
    pt3dadd(-34.68, 40.72, 6, 0.84)
    pt3dadd(-34.78, 40.83, 6.5, 0.84)
    pt3dadd(-34.89, 40.88, 6.5, 0.84)
    pt3dadd(-34.99, 41.04, 6.5, 0.84)
    pt3dadd(-35.1, 41.09, 6.5, 0.84)
    pt3dadd(-35.15, 41.2, 6.5, 0.84)
    pt3dadd(-35.31, 41.2, 6.5, 0.84)
    pt3dadd(-35.36, 41.3, 6.5, 0.84)
    pt3dadd(-35.52, 41.3, 6.5, 0.84)
    pt3dadd(-35.67, 41.41, 6.5, 0.84)
    pt3dadd(-35.88, 41.41, 7, 0.84)
    pt3dadd(-35.94, 41.51, 7, 0.84)
    pt3dadd(-36.25, 41.51, 7.5, 0.84)
    pt3dadd(-36.4, 41.57, 7.5, 0.84)
    pt3dadd(-36.51, 41.67, 7.5, 0.84)
    pt3dadd(-36.67, 41.67, 7.5, 0.84)
    pt3dadd(-36.72, 41.78, 7.5, 0.84)
    pt3dadd(-36.99, 41.83, 7.5, 0.84)
    pt3dadd(-37.04, 41.93, 8, 0.84)
    pt3dadd(-37.09, 42.04, 8, 0.84)
    pt3dadd(-37.29, 42.2, 8, 0.84)
    pt3dadd(-37.25, 42.36, 8.5, 0.84)
    pt3dadd(-37.25, 42.72, 8.5, 0.84)
    pt3dadd(-37.29, 42.83, 8.5, 0.84)
    pt3dadd(-37.29, 43.04, 8.5, 0.84)
    pt3dadd(-37.35, 43.2, 8.5, 0.84)
    pt3dadd(-37.35, 43.46, 8.5, 0.84)
    pt3dadd(-37.29, 43.67, 8.5, 0.84)
    pt3dadd(-37.29, 43.83, 8.5, 0.84)
    pt3dadd(-37.25, 43.93, 8.5, 0.84)
    pt3dadd(-37.25, 44.3, 8.5, 0.84)
    pt3dadd(-37.2, 44.51, 8.5, 0.84)
    pt3dadd(-37.14, 44.62, 8.5, 0.84)
    pt3dadd(-37.14, 44.88, 8.5, 0.84)
    pt3dadd(-37.09, 44.98, 8.5, 0.84)
    pt3dadd(-37.42, 46.56, 9, 0.84)
    pt3dadd(-37.52, 46.66, 9.5, 0.84)
    pt3dadd(-37.63, 46.72, 9.5, 0.84)
    pt3dadd(-37.79, 46.88, 9.5, 0.84)
    pt3dadd(-37.94, 46.93, 9.5, 0.84)
    pt3dadd(-38, 47.03, 9.5, 0.84)
    pt3dadd(-38.1, 47.14, 9.5, 0.84)
    pt3dadd(-38.26, 47.3, 9.5, 0.84)
    pt3dadd(-38.36, 47.4, 9.5, 0.84)
    pt3dadd(-38.42, 47.56, 9.5, 0.84)
    pt3dadd(-38.52, 47.66, 9.5, 0.84)
    pt3dadd(-38.52, 48.61, 10, 0.84)
    pt3dadd(-38.57, 48.77, 10, 0.84)
    pt3dadd(-38.61, 48.98, 10, 0.84)
    pt3dadd(-38.61, 49.14, 10, 0.84)
    pt3dadd(-38.68, 49.35, 10, 0.84)
    pt3dadd(-38.78, 49.4, 10, 0.84)
    pt3dadd(-38.78, 49.61, 10, 0.84)
    pt3dadd(-38.78, 49.92, 10, 0.84)
    pt3dadd(-38.83, 50.13, 10, 0.84)
    pt3dadd(-38.94, 50.19, 10, 0.84)
    pt3dadd(-38.94, 50.45, 10.5, 0.84)
    pt3dadd(-38.99, 50.55, 10.5, 0.84)
    pt3dadd(-38.99, 51.24, 10.5, 0.84)
    pt3dadd(-39.04, 51.34, 10.5, 0.84)
    pt3dadd(-39.04, 51.61, 10.5, 0.84)
    pt3dadd(-39.1, 51.71, 10.5, 0.84)
    pt3dadd(-39.15, 51.92, 10.5, 0.84)
    pt3dadd(-39.2, 52.08, 10.5, 0.84)
    pt3dadd(-39.25, 52.24, 10.5, 0.84)
    pt3dadd(-39.31, 52.34, 10.5, 0.84)
    pt3dadd(-39.4, 52.45, 10.5, 0.84)
    pt3dadd(-39.52, 52.61, 10.5, 0.84)
    pt3dadd(-39.61, 52.76, 10.5, 0.84)
    pt3dadd(-39.72, 52.82, 10.5, 0.84)
    pt3dadd(-39.83, 52.92, 10.5, 0.84)
    pt3dadd(-39.99, 53.03, 10.5, 0.84)
    pt3dadd(-40.04, 53.13, 10.5, 0.84)
    pt3dadd(-40.09, 53.24, 10.5, 0.84)
    pt3dadd(-40.2, 53.29, 11, 0.84)
    pt3dadd(-40.29, 53.34, 11, 0.84)
    pt3dadd(-40.4, 53.39, 11, 0.84)
    pt3dadd(-40.51, 53.5, 11, 0.84)
    pt3dadd(-40.61, 53.6, 11, 0.84)
    pt3dadd(-40.72, 53.6, 11, 0.84)
    pt3dadd(-40.83, 53.76, 11, 0.84)
    pt3dadd(-40.93, 53.97, 11, 0.84)
    pt3dadd(-41.04, 54.02, 11, 0.84)
    pt3dadd(-41.09, 54.13, 11, 0.84)
    pt3dadd(-41.2, 54.13, 11, 0.84)
    pt3dadd(-41.3, 54.23, 11, 0.84)
    pt3dadd(-41.35, 54.39, 11, 0.84)
    pt3dadd(-41.35, 54.6, 11, 0.84)
    pt3dadd(-41.51, 54.66, 11, 0.84)
    pt3dadd(-41.51, 54.92, 11, 0.84)
    pt3dadd(-41.56, 55.02, 11, 0.84)
    pt3dadd(-41.67, 55.13, 11, 0.84)
    pt3dadd(-41.77, 55.23, 11, 0.84)
    pt3dadd(-41.83, 55.39, 11, 0.84)
    pt3dadd(-41.93, 55.44, 11, 0.84)
    pt3dadd(-42.04, 55.6, 11, 0.84)
    pt3dadd(-42.19, 55.65, 11, 0.84)
    pt3dadd(-42.4, 55.76, 11, 0.84)
    pt3dadd(-42.46, 55.86, 11, 0.84)
    pt3dadd(-42.61, 55.92, 11, 0.84)
    pt3dadd(-42.72, 55.97, 11, 0.84)
    pt3dadd(-42.88, 56.13, 11, 0.84)
    pt3dadd(-43.09, 56.13, 11, 0.84)
    pt3dadd(-43.14, 56.29, 11, 0.84)
    pt3dadd(-43.24, 56.29, 11, 0.84)
    pt3dadd(-43.35, 56.29, 11, 0.84)
    pt3dadd(-43.51, 56.5, 11, 0.84)
    pt3dadd(-43.56, 56.6, 11, 0.84)
    pt3dadd(-43.66, 56.65, 11, 0.84)
    pt3dadd(-43.72, 56.86, 11, 0.84)
    pt3dadd(-43.77, 56.97, 11, 0.84)
    pt3dadd(-43.82, 57.13, 11, 0.84)
    pt3dadd(-43.87, 57.23, 11, 0.84)
    pt3dadd(-43.87, 57.34, 11, 0.84)
    pt3dadd(-44.69, 57.89, 11, 0.84)
    pt3dadd(-44.69, 58.05, 11, 0.84)
    pt3dadd(-44.79, 58.15, 11, 0.84)
    pt3dadd(-44.79, 58.68, 11, 0.84)
    pt3dadd(-44.84, 58.79, 11, 0.84)
    pt3dadd(-44.84, 59.05, 11, 0.84)
    pt3dadd(-44.9, 59.15, 11, 0.84)
    pt3dadd(-44.84, 59.31, 11, 0.84)
    pt3dadd(-44.84, 59.42, 11, 0.84)
    pt3dadd(-44.79, 59.52, 11.5, 0.84)
    pt3dadd(-44.79, 59.78, 11.5, 0.84)
    pt3dadd(-44.74, 59.89, 11.5, 0.84)
    pt3dadd(-44.74, 60.26, 11.5, 0.84)
    pt3dadd(-44.69, 60.42, 11.5, 0.84)
    pt3dadd(-44.74, 60.68, 11.5, 0.84)
    pt3dadd(-44.79, 60.89, 11.5, 0.84)
    pt3dadd(-44.79, 61.05, 11.5, 0.84)
    pt3dadd(-44.84, 61.15, 11.5, 0.84)
    pt3dadd(-44.9, 61.26, 11.5, 0.84)
    pt3dadd(-44.95, 61.41, 11.5, 0.84)
  }
}
proc shape3d_34() {
  dend[28] {
    pt3dadd(-45.05, 61.62, 11.5, 0.84)
    pt3dadd(-45.26, 61.83, 11.5, 0.84)
    pt3dadd(-45.37, 61.99, 11.5, 0.84)
    pt3dadd(-45.52, 62.1, 11.5, 0.84)
    pt3dadd(-45.63, 62.25, 11.5, 0.84)
    pt3dadd(-45.84, 62.47, 12, 0.84)
    pt3dadd(-46, 62.52, 12, 0.84)
    pt3dadd(-46.1, 62.62, 12, 0.84)
    pt3dadd(-46.26, 62.73, 12, 0.84)
    pt3dadd(-46.36, 62.78, 12, 0.84)
    pt3dadd(-46.42, 62.89, 12, 0.84)
    pt3dadd(-46.57, 62.89, 12, 0.84)
    pt3dadd(-46.68, 62.99, 12, 0.84)
    pt3dadd(-46.84, 63.1, 12, 0.84)
    pt3dadd(-46.84, 63.25, 12, 0.84)
    pt3dadd(-46.94, 63.36, 12, 0.84)
    pt3dadd(-47.1, 63.36, 12, 0.84)
    pt3dadd(-47.2, 63.46, 12, 0.84)
    pt3dadd(-47.31, 63.52, 12, 0.84)
    pt3dadd(-47.36, 63.62, 12, 0.84)
    pt3dadd(-47.52, 63.78, 12, 0.84)
    pt3dadd(-47.57, 63.88, 12, 0.84)
    pt3dadd(-47.62, 64.04, 12, 0.84)
    pt3dadd(-47.68, 64.15, 12.5, 0.84)
    pt3dadd(-47.73, 64.31, 12.5, 0.84)
    pt3dadd(-47.78, 64.52, 12.5, 0.84)
    pt3dadd(-47.83, 64.62, 12.5, 0.84)
    pt3dadd(-47.89, 64.88, 12.5, 0.84)
    pt3dadd(-47.99, 64.98, 12.5, 0.84)
    pt3dadd(-47.99, 65.3, 12.5, 0.84)
    pt3dadd(-48.04, 65.88, 12.5, 0.84)
    pt3dadd(-48.1, 65.98, 12.5, 0.84)
    pt3dadd(-48.1, 66.51, 12.5, 0.84)
    pt3dadd(-48.15, 66.62, 12.5, 0.84)
    pt3dadd(-48.15, 67.3, 13, 0.84)
    pt3dadd(-48.2, 67.41, 13, 0.84)
    pt3dadd(-48.2, 67.67, 13, 0.84)
    pt3dadd(-48.15, 67.83, 13, 0.84)
    pt3dadd(-48.2, 67.93, 13, 0.84)
    pt3dadd(-48.2, 68.25, 13, 0.84)
    pt3dadd(-48.25, 68.41, 13, 0.84)
    pt3dadd(-48.25, 68.62, 13, 0.84)
    pt3dadd(-48.36, 68.83, 13.5, 0.84)
    pt3dadd(-48.83, 70.39, 13.5, 0.84)
    pt3dadd(-48.99, 70.44, 13.5, 0.84)
    pt3dadd(-49.09, 70.55, 13.5, 0.84)
    pt3dadd(-49.25, 70.59, 13.5, 0.84)
    pt3dadd(-49.4, 70.65, 13.5, 0.84)
    pt3dadd(-49.51, 70.7, 13.5, 0.84)
    pt3dadd(-49.67, 70.65, 13.5, 0.84)
    pt3dadd(-49.82, 70.65, 13.5, 0.84)
    pt3dadd(-49.93, 70.65, 13.5, 0.84)
    pt3dadd(-50.03, 70.76, 13.5, 0.84)
    pt3dadd(-50.19, 70.86, 13.5, 0.84)
    pt3dadd(-50.4, 70.97, 13.5, 0.84)
    pt3dadd(-50.56, 71.02, 13.5, 0.84)
    pt3dadd(-50.66, 71.13, 13.5, 0.84)
    pt3dadd(-50.77, 71.23, 13.5, 0.84)
    pt3dadd(-50.87, 71.34, 13.5, 0.84)
    pt3dadd(-50.87, 71.48, 13.5, 0.84)
    pt3dadd(-50.93, 71.59, 13.5, 0.84)
    pt3dadd(-51.03, 71.76, 13.5, 0.84)
    pt3dadd(-51.03, 71.92, 13.5, 0.84)
    pt3dadd(-51.08, 72.06, 14, 0.84)
    pt3dadd(-51.14, 72.23, 14, 0.84)
    pt3dadd(-51.14, 72.39, 14, 0.84)
    pt3dadd(-51.19, 72.48, 14, 0.84)
    pt3dadd(-51.19, 72.76, 14, 0.84)
    pt3dadd(-51.24, 72.91, 14, 0.84)
    pt3dadd(-51.29, 73.06, 14, 0.84)
    pt3dadd(-51.29, 73.48, 14, 0.84)
    pt3dadd(-51.35, 73.97, 14, 0.84)
    pt3dadd(-51.4, 74.06, 14, 0.84)
    pt3dadd(-51.45, 74.28, 14, 0.84)
    pt3dadd(-51.5, 74.48, 14, 0.84)
    pt3dadd(-51.56, 74.65, 14, 0.84)
    pt3dadd(-51.61, 74.81, 14, 0.84)
    pt3dadd(-51.66, 74.95, 14, 0.84)
    pt3dadd(-51.71, 75.12, 14, 0.84)
    pt3dadd(-51.77, 75.23, 14, 0.84)
    pt3dadd(-51.82, 75.33, 14, 0.84)
    pt3dadd(-51.82, 75.48, 14, 0.84)
    pt3dadd(-51.92, 75.65, 14, 0.84)
    pt3dadd(-51.98, 75.81, 14, 0.84)
    pt3dadd(-52.03, 75.95, 14, 0.84)
    pt3dadd(-52.08, 76.06, 14, 0.84)
    pt3dadd(-52.19, 76.33, 14, 0.84)
    pt3dadd(-52.24, 76.48, 14, 0.84)
    pt3dadd(-52.29, 76.59, 14, 0.84)
    pt3dadd(-52.4, 76.7, 14, 0.84)
    pt3dadd(-52.45, 76.91, 14, 0.84)
    pt3dadd(-52.45, 77.38, 14, 0.84)
    pt3dadd(-52.5, 77.59, 14, 0.84)
    pt3dadd(-52.55, 77.75, 14, 0.84)
    pt3dadd(-52.66, 77.86, 14, 0.84)
    pt3dadd(-52.71, 78.06, 14, 0.84)
    pt3dadd(-52.76, 78.38, 14, 0.84)
    pt3dadd(-52.87, 78.54, 14, 0.84)
    pt3dadd(-52.87, 78.7, 14, 0.84)
    pt3dadd(-52.87, 78.91, 14, 0.84)
    pt3dadd(-53.03, 79.06, 14, 0.84)
    pt3dadd(-53.03, 79.22, 14, 0.84)
    pt3dadd(-53.18, 79.38, 14, 0.84)
    pt3dadd(-53.29, 79.48, 14, 0.84)
    pt3dadd(-53.29, 79.64, 14, 0.84)
    pt3dadd(-53.39, 79.75, 14, 0.84)
    pt3dadd(-53.5, 79.84, 14, 0.84)
    pt3dadd(-53.66, 79.95, 14, 0.84)
    pt3dadd(-53.81, 80.12, 14, 0.84)
    pt3dadd(-53.92, 80.22, 14, 0.84)
    pt3dadd(-54.02, 80.27, 14, 0.84)
    pt3dadd(-54.13, 80.27, 14, 0.84)
    pt3dadd(-54.23, 80.33, 14, 0.84)
    pt3dadd(-54.34, 80.38, 14, 0.84)
    pt3dadd(-54.5, 80.43, 14, 0.84)
    pt3dadd(-54.6, 80.43, 14, 0.84)
    pt3dadd(-54.71, 80.54, 14, 0.84)
    pt3dadd(-54.81, 80.59, 14, 0.84)
    pt3dadd(-54.92, 80.64, 14, 0.84)
    pt3dadd(-55.07, 80.64, 14, 0.84)
    pt3dadd(-55.13, 80.48, 14, 0.84)
    pt3dadd(-55.49, 81.5, 14, 0.84)
    pt3dadd(-55.54, 81.65, 14, 0.84)
    pt3dadd(-55.59, 81.76, 14, 0.84)
    pt3dadd(-55.65, 81.86, 14, 0.84)
    pt3dadd(-55.7, 81.97, 14, 0.84)
    pt3dadd(-55.8, 82.23, 14, 0.84)
    pt3dadd(-55.86, 82.34, 14, 0.84)
    pt3dadd(-55.91, 82.5, 14, 0.84)
    pt3dadd(-56.01, 82.6, 14, 0.84)
    pt3dadd(-56.01, 82.92, 14, 0.84)
    pt3dadd(-56.07, 83.02, 14, 0.84)
    pt3dadd(-56.12, 83.18, 14, 0.84)
    pt3dadd(-56.12, 83.44, 14, 0.84)
    pt3dadd(-56.07, 83.65, 14, 0.84)
    pt3dadd(-56.01, 83.92, 14, 0.84)
    pt3dadd(-55.96, 84.02, 14, 0.84)
    pt3dadd(-55.91, 84.23, 14, 0.84)
    pt3dadd(-55.86, 84.34, 14, 0.84)
    pt3dadd(-55.8, 84.44, 14, 0.84)
    pt3dadd(-55.8, 84.65, 14, 0.84)
    pt3dadd(-55.75, 84.76, 14, 0.84)
    pt3dadd(-55.75, 85.07, 14, 0.84)
    pt3dadd(-55.7, 85.18, 14, 0.84)
    pt3dadd(-55.65, 85.28, 14, 0.84)
    pt3dadd(-55.65, 85.49, 14, 0.84)
    pt3dadd(-55.59, 85.6, 14.5, 0.84)
    pt3dadd(-55.59, 85.7, 14.5, 0.84)
    pt3dadd(-55.54, 85.91, 14.5, 0.84)
    pt3dadd(-55.54, 86.23, 14.5, 0.84)
    pt3dadd(-55.49, 86.33, 14.5, 0.84)
    pt3dadd(-55.49, 86.65, 14.5, 0.84)
    pt3dadd(-55.44, 86.86, 14.5, 0.84)
    pt3dadd(-55.44, 87.12, 14.5, 0.84)
    pt3dadd(-55.38, 87.38, 14.5, 0.84)
    pt3dadd(-55.38, 88.17, 14.5, 0.84)
    pt3dadd(-55.44, 88.28, 14.5, 0.84)
    pt3dadd(-55.44, 88.44, 14.5, 0.84)
    pt3dadd(-55.59, 88.65, 14.5, 0.84)
    pt3dadd(-55.59, 88.8, 14.5, 0.84)
    pt3dadd(-55.65, 88.91, 14.5, 0.84)
    pt3dadd(-55.75, 89.01, 15, 0.84)
    pt3dadd(-55.8, 89.12, 15, 0.84)
    pt3dadd(-55.91, 89.33, 15, 0.84)
    pt3dadd(-56.01, 89.43, 15, 0.84)
    pt3dadd(-56.17, 89.49, 15, 0.84)
    pt3dadd(-56.28, 89.59, 15, 0.84)
    pt3dadd(-56.38, 89.65, 15, 0.84)
    pt3dadd(-56.43, 89.75, 15, 0.84)
    pt3dadd(-56.54, 89.86, 15, 0.84)
    pt3dadd(-56.59, 90.01, 15, 0.84)
    pt3dadd(-56.7, 90.12, 15, 0.84)
    pt3dadd(-56.8, 90.22, 15, 0.84)
    pt3dadd(-56.8, 90.38, 15, 0.84)
    pt3dadd(-56.85, 90.49, 15, 0.84)
    pt3dadd(-56.85, 90.59, 15, 0.84)
    pt3dadd(-56.96, 90.64, 15, 0.84)
    pt3dadd(-56.96, 90.8, 15, 0.84)
    pt3dadd(-57.01, 90.91, 15, 0.84)
    pt3dadd(-57.06, 91.01, 15, 0.84)
    pt3dadd(-57.17, 91.17, 15, 0.84)
    pt3dadd(-57.17, 91.38, 15, 0.84)
    pt3dadd(-57.27, 91.49, 15, 0.84)
    pt3dadd(-57.38, 91.59, 15, 0.84)
    pt3dadd(-57.38, 91.75, 15, 0.84)
    pt3dadd(-57.43, 91.85, 15, 0.84)
    pt3dadd(-57.53, 91.91, 15, 0.84)
    pt3dadd(-57.53, 92.01, 15, 0.84)
    pt3dadd(-57.96, 93.3, 15.5, 0.84)
    pt3dadd(-58.06, 93.35, 15.5, 0.84)
    pt3dadd(-58.17, 93.46, 15.5, 0.84)
    pt3dadd(-58.27, 93.56, 15.5, 0.84)
    pt3dadd(-58.32, 93.67, 15.5, 0.84)
    pt3dadd(-58.38, 93.78, 15.5, 0.84)
    pt3dadd(-58.53, 93.83, 15.5, 0.84)
    pt3dadd(-58.53, 93.93, 15.5, 0.84)
    pt3dadd(-58.59, 94.04, 15.5, 0.84)
    pt3dadd(-58.74, 94.2, 16, 0.84)
    pt3dadd(-58.95, 94.35, 16, 0.84)
    pt3dadd(-58.95, 94.51, 16, 0.84)
    pt3dadd(-59.06, 94.62, 16, 0.84)
    pt3dadd(-59.06, 94.98, 16, 0.84)
    pt3dadd(-59.11, 95.14, 16, 0.84)
    pt3dadd(-59.16, 95.35, 16, 0.84)
    pt3dadd(-59.16, 95.72, 16, 0.84)
    pt3dadd(-59.16, 95.93, 16, 0.84)
    pt3dadd(-59.11, 96.04, 16, 0.84)
    pt3dadd(-59.16, 96.3, 16, 0.84)
    pt3dadd(-59.21, 96.51, 16, 0.84)
    pt3dadd(-59.21, 96.77, 16, 0.84)
    pt3dadd(-59.32, 96.98, 16, 0.84)
    pt3dadd(-59.42, 97.19, 16, 0.84)
    pt3dadd(-59.48, 97.3, 16, 0.84)
    pt3dadd(-59.58, 97.4, 16, 0.84)
    pt3dadd(-59.69, 97.51, 16.5, 0.84)
    pt3dadd(-59.74, 97.72, 16.5, 0.84)
    pt3dadd(-59.84, 97.82, 16.5, 0.84)
    pt3dadd(-59.95, 97.93, 16.5, 0.84)
    pt3dadd(-60, 98.09, 16.5, 0.84)
    pt3dadd(-60.11, 98.19, 16.5, 0.84)
    pt3dadd(-60.16, 98.3, 16.5, 0.84)
    pt3dadd(-60.26, 98.35, 16.5, 0.84)
    pt3dadd(-60.32, 98.45, 16.5, 0.84)
    pt3dadd(-60.42, 98.51, 16.5, 0.84)
    pt3dadd(-60.58, 98.61, 16.5, 0.84)
    pt3dadd(-60.68, 98.66, 16.5, 0.84)
    pt3dadd(-60.79, 98.77, 16.5, 0.84)
    pt3dadd(-60.89, 98.87, 17, 0.84)
    pt3dadd(-61.05, 98.93, 17, 0.84)
    pt3dadd(-61.1, 99.03, 17, 0.84)
    pt3dadd(-61.21, 99.14, 17, 0.84)
    pt3dadd(-61.31, 99.19, 17, 0.84)
    pt3dadd(-61.42, 99.19, 17, 0.84)
    pt3dadd(-61.47, 99.29, 17, 0.84)
    pt3dadd(-61.63, 99.4, 17, 0.84)
    pt3dadd(-61.84, 99.51, 17, 0.84)
    pt3dadd(-61.94, 99.61, 17, 0.84)
    pt3dadd(-62.05, 99.66, 17, 0.84)
    pt3dadd(-62.1, 99.77, 17, 0.84)
    pt3dadd(-62.21, 99.87, 17, 0.84)
    pt3dadd(-62.31, 99.98, 17, 0.84)
    pt3dadd(-62.47, 100.14, 17, 0.84)
    pt3dadd(-62.52, 100.24, 17, 0.84)
    pt3dadd(-62.57, 100.45, 17, 0.84)
    pt3dadd(-62.68, 100.56, 17, 0.84)
    pt3dadd(-62.73, 100.71, 17, 0.84)
    pt3dadd(-62.73, 100.92, 17, 0.84)
    pt3dadd(-62.84, 101.08, 17, 0.84)
    pt3dadd(-62.94, 101.29, 17, 0.84)
  }
}
proc shape3d_35() {
  dend[28] {
    pt3dadd(-62.99, 101.45, 17, 0.84)
    pt3dadd(-63.1, 101.61, 17.5, 0.84)
    pt3dadd(-63.15, 101.71, 17.5, 0.84)
    pt3dadd(-63.2, 101.82, 17.5, 0.84)
    pt3dadd(-63.36, 101.98, 17.5, 0.84)
    pt3dadd(-63.62, 102.03, 17.5, 0.84)
    pt3dadd(-64.15, 102.03, 18, 0.84)
    pt3dadd(-64.31, 102.08, 18, 0.84)
    pt3dadd(-64.56, 102.08, 18, 0.84)
    pt3dadd(-64.78, 102.13, 18, 0.84)
    pt3dadd(-64.88, 102.19, 18, 0.84)
    pt3dadd(-65.04, 102.29, 18, 0.84)
    pt3dadd(-65.15, 102.4, 18, 0.84)
    pt3dadd(-65.25, 102.5, 18, 0.84)
    pt3dadd(-65.3, 102.66, 18, 0.84)
    pt3dadd(-65.41, 102.66, 18, 0.84)
    pt3dadd(-65.51, 102.76, 18, 0.84)
    pt3dadd(-65.56, 102.92, 18, 0.84)
    pt3dadd(-65.56, 103.08, 18, 0.84)
    pt3dadd(-65.62, 103.24, 18, 0.84)
    pt3dadd(-65.62, 103.45, 18, 0.84)
    pt3dadd(-65.67, 103.55, 18, 0.84)
    pt3dadd(-65.67, 103.71, 18, 0.84)
    pt3dadd(-65.78, 103.87, 18, 0.84)
    pt3dadd(-66.66, 104.07, 18.5, 0.84)
    pt3dadd(-66.77, 104.12, 18.5, 0.84)
    pt3dadd(-67.03, 104.22, 18.5, 0.84)
    pt3dadd(-67.29, 104.22, 18.5, 0.84)
    pt3dadd(-67.4, 104.12, 18.5, 0.84)
    pt3dadd(-67.55, 104.07, 18.5, 0.84)
    pt3dadd(-67.66, 103.96, 18.5, 0.84)
    pt3dadd(-67.76, 103.86, 18.5, 0.84)
    pt3dadd(-68.02, 103.86, 18, 0.84)
    pt3dadd(-68.13, 103.96, 18, 0.84)
    pt3dadd(-68.18, 104.12, 18, 0.84)
    pt3dadd(-68.29, 104.22, 18, 0.84)
    pt3dadd(-68.39, 104.33, 17.5, 0.84)
    pt3dadd(-68.44, 104.49, 17.5, 0.84)
    pt3dadd(-68.55, 104.59, 17.5, 0.84)
    pt3dadd(-68.59, 104.75, 17.5, 0.84)
    pt3dadd(-68.59, 104.85, 17, 0.84)
    pt3dadd(-68.7, 104.96, 17, 0.84)
    pt3dadd(-68.81, 105.06, 17, 0.84)
    pt3dadd(-68.86, 105.22, 17, 0.84)
    pt3dadd(-68.97, 105.33, 17, 0.84)
    pt3dadd(-69.02, 105.43, 17, 0.84)
    pt3dadd(-69.02, 105.54, 17, 0.84)
    pt3dadd(-69.13, 105.7, 17, 0.84)
  }
  dend[29] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(0.03, -3.5, 8.5, 0.94)
    pt3dadd(0.03, -3.71, 8.5, 0.94)
    pt3dadd(0.14, -3.82, 8.5, 0.94)
    pt3dadd(0.14, -4.08, 8.5, 0.94)
    pt3dadd(0.19, -4.34, 8.5, 0.94)
    pt3dadd(0.19, -4.5, 8.5, 0.94)
    pt3dadd(0.24, -4.76, 8.5, 0.94)
    pt3dadd(0.3, -4.97, 8.5, 0.94)
    pt3dadd(0.35, -5.18, 8.5, 0.94)
    pt3dadd(0.35, -5.66, 8.5, 0.94)
    pt3dadd(0.45, -5.81, 8.5, 0.94)
    pt3dadd(0.51, -6.02, 8.5, 0.94)
    pt3dadd(0.56, -6.18, 8.5, 0.94)
    pt3dadd(0.56, -6.39, 8.5, 0.94)
    pt3dadd(0.66, -6.5, 8.5, 0.94)
    pt3dadd(0.66, -6.76, 8.5, 0.94)
    pt3dadd(0.72, -6.97, 8.5, 0.94)
    pt3dadd(0.72, -7.55, 8.5, 0.94)
    pt3dadd(0.61, -7.65, 8.5, 0.94)
    pt3dadd(0.51, -7.71, 8.5, 0.94)
    pt3dadd(0.35, -7.81, 8.5, 0.94)
    pt3dadd(0.24, -7.86, 8.5, 0.94)
    pt3dadd(0.14, -8.02, 8.5, 0.94)
    pt3dadd(0.03, -8.07, 8.5, 0.94)
    pt3dadd(-0.07, -8.13, 8.5, 0.94)
    pt3dadd(-0.23, -8.18, 8.5, 0.94)
    pt3dadd(-0.39, -8.34, 8.5, 0.94)
    pt3dadd(-0.6, -8.44, 8.5, 0.94)
    pt3dadd(-0.7, -8.55, 8.5, 0.94)
    pt3dadd(-0.86, -8.6, 8.5, 0.94)
    pt3dadd(-0.96, -8.71, 8.5, 0.94)
    pt3dadd(-1.12, -8.76, 8.5, 0.94)
    pt3dadd(-1.28, -8.86, 8.5, 0.94)
    pt3dadd(-1.44, -8.97, 8.5, 0.94)
    pt3dadd(-1.54, -9.13, 8.5, 0.94)
    pt3dadd(-1.65, -9.13, 8.5, 0.94)
    pt3dadd(-1.75, -9.27, 8.5, 0.94)
    pt3dadd(-1.86, -9.39, 8.5, 0.94)
    pt3dadd(-2, -9.49, 8.5, 0.94)
    pt3dadd(-2.06, -9.6, 8.5, 0.94)
    pt3dadd(-2.22, -9.76, 8.5, 0.94)
    pt3dadd(-2.22, -9.97, 8.5, 0.94)
    pt3dadd(-2.27, -10.11, 8.5, 0.94)
    pt3dadd(-2.27, -10.39, 8.5, 0.94)
    pt3dadd(-2.33, -10.6, 8.5, 0.94)
    pt3dadd(-2.33, -10.91, 8.5, 0.94)
    pt3dadd(-2.38, -11.07, 8.5, 0.94)
    pt3dadd(-2.38, -11.44, 8.5, 0.94)
    pt3dadd(-2.49, -11.65, 8.5, 0.94)
    pt3dadd(-3.06, -12.25, 8.5, 0.84)
    pt3dadd(-3.21, -12.25, 8.5, 0.84)
    pt3dadd(-3.42, -12.35, 8.5, 0.84)
    pt3dadd(-3.48, -12.51, 8.5, 0.84)
    pt3dadd(-3.63, -12.56, 8.5, 0.84)
    pt3dadd(-3.74, -12.62, 8.5, 0.84)
    pt3dadd(-3.9, -12.72, 8.5, 0.84)
    pt3dadd(-4, -12.77, 8.5, 0.84)
    pt3dadd(-4.09, -12.93, 8.5, 0.84)
    pt3dadd(-4.26, -12.98, 8.5, 0.84)
    pt3dadd(-4.42, -12.98, 8.5, 0.84)
    pt3dadd(-4.51, -13.09, 8.5, 0.84)
    pt3dadd(-4.73, -13.04, 8.5, 0.84)
    pt3dadd(-4.84, -12.93, 9, 0.84)
    pt3dadd(-5, -12.88, 9, 0.84)
    pt3dadd(-5.21, -12.83, 9, 0.84)
    pt3dadd(-5.63, -12.83, 8.5, 0.84)
    pt3dadd(-5.73, -12.88, 8.5, 0.84)
    pt3dadd(-5.78, -12.98, 8, 0.84)
    pt3dadd(-5.84, -13.14, 8, 0.84)
    pt3dadd(-5.84, -13.35, 8, 0.84)
    pt3dadd(-5.84, -13.46, 8, 0.84)
    pt3dadd(-5.78, -13.62, 8, 0.84)
    pt3dadd(-5.68, -13.83, 8, 0.84)
    pt3dadd(-5.63, -13.98, 8, 0.84)
    pt3dadd(-5.52, -14.04, 9, 0.84)
    pt3dadd(-5.52, -14.19, 9.5, 0.84)
    pt3dadd(-5.47, -14.3, 9.5, 0.84)
    pt3dadd(-5.47, -14.46, 10, 0.84)
    pt3dadd(-5.52, -14.61, 10, 0.84)
    pt3dadd(-5.63, -14.82, 10, 0.84)
    pt3dadd(-5.73, -14.61, 10.5, 0.84)
    pt3dadd(-5.89, -14.56, 10.5, 0.84)
    pt3dadd(-5.99, -14.46, 10.5, 0.84)
    pt3dadd(-6.1, -14.35, 10.5, 0.84)
    pt3dadd(-6.2, -14.25, 10.5, 0.84)
    pt3dadd(-6.31, -14.19, 10.5, 0.84)
    pt3dadd(-6.41, -14.09, 11, 0.84)
    pt3dadd(-6.52, -13.93, 11, 0.84)
    pt3dadd(-6.62, -13.77, 11, 0.84)
    pt3dadd(-6.68, -13.67, 11, 0.84)
    pt3dadd(-6.83, -13.62, 11, 0.84)
    pt3dadd(-6.94, -13.56, 11, 0.84)
    pt3dadd(-7.04, -13.3, 11, 0.84)
    pt3dadd(-7.15, -13.19, 11, 0.84)
    pt3dadd(-7.2, -13.04, 11, 0.84)
    pt3dadd(-7.25, -12.93, 11, 0.84)
    pt3dadd(-7.31, -12.77, 11, 0.84)
    pt3dadd(-7.31, -12.56, 11.5, 0.84)
    pt3dadd(-7.41, -12.46, 11.5, 0.84)
    pt3dadd(-7.46, -12.3, 11.5, 0.84)
    pt3dadd(-7.57, -12.2, 11.5, 0.84)
    pt3dadd(-7.62, -12.04, 12, 0.84)
    pt3dadd(-7.83, -11.99, 12, 0.84)
    pt3dadd(-7.94, -11.93, 12, 0.84)
    pt3dadd(-8.09, -11.88, 12, 0.84)
    pt3dadd(-8.46, -11.88, 12, 0.84)
    pt3dadd(-8.57, -11.83, 12, 0.84)
    pt3dadd(-8.72, -11.83, 12, 0.84)
    pt3dadd(-8.83, -11.83, 12, 0.84)
    pt3dadd(-8.93, -11.78, 12, 0.84)
    pt3dadd(-9.03, -11.67, 12, 0.84)
    pt3dadd(-9.19, -11.56, 12, 0.84)
    pt3dadd(-9.25, -11.41, 12, 0.84)
    pt3dadd(-9.35, -11.2, 12, 0.84)
    pt3dadd(-9.41, -11.09, 12, 0.84)
    pt3dadd(-9.51, -10.93, 12, 0.84)
    pt3dadd(-9.61, -10.72, 12, 0.84)
    pt3dadd(-9.67, -10.62, 12, 0.84)
    pt3dadd(-9.67, -10.46, 12, 0.84)
    pt3dadd(-9.72, -10.36, 12, 0.84)
    pt3dadd(-9.83, -10.25, 12, 0.84)
    pt3dadd(-9.83, -10.09, 12, 0.84)
    pt3dadd(-10.03, -9.99, 12.5, 0.84)
    pt3dadd(-10.19, -9.88, 12.5, 0.84)
    pt3dadd(-10.3, -9.94, 12.5, 0.84)
    pt3dadd(-10.46, -9.99, 12.5, 0.84)
    pt3dadd(-10.61, -10.09, 12.5, 0.84)
    pt3dadd(-10.77, -10.09, 13, 0.84)
    pt3dadd(-10.93, -10.19, 13, 0.84)
    pt3dadd(-11.03, -10.25, 13, 0.84)
    pt3dadd(-11.19, -10.3, 13, 0.84)
    pt3dadd(-11.3, -10.41, 13, 0.84)
    pt3dadd(-11.45, -10.46, 13, 0.84)
    pt3dadd(-11.56, -10.57, 13, 0.84)
    pt3dadd(-11.82, -10.57, 13.5, 0.84)
    pt3dadd(-12.03, -10.62, 13.5, 0.84)
    pt3dadd(-12.19, -10.67, 13.5, 0.84)
    pt3dadd(-12.4, -10.67, 13.5, 0.84)
    pt3dadd(-12.56, -10.62, 13.5, 0.84)
    pt3dadd(-12.87, -10.62, 13.5, 0.84)
    pt3dadd(-13.03, -10.57, 13.5, 0.84)
    pt3dadd(-13.24, -10.57, 13.5, 0.84)
    pt3dadd(-13.4, -10.51, 13.5, 0.84)
    pt3dadd(-13.61, -10.51, 13.5, 0.84)
    pt3dadd(-13.71, -10.46, 13.5, 0.84)
    pt3dadd(-13.82, -10.41, 13.5, 0.84)
    pt3dadd(-14.08, -10.36, 13.5, 0.84)
    pt3dadd(-14.24, -10.3, 13.5, 0.84)
    pt3dadd(-14.39, -10.25, 13.5, 0.84)
    pt3dadd(-14.5, -10.25, 13.5, 0.84)
    pt3dadd(-14.6, -10.19, 13.5, 0.84)
    pt3dadd(-14.71, -10.09, 13.5, 0.84)
    pt3dadd(-14.81, -10.03, 13.5, 0.84)
    pt3dadd(-14.97, -9.99, 13.5, 0.84)
    pt3dadd(-15.08, -9.88, 13.5, 0.84)
    pt3dadd(-15.23, -9.83, 13.5, 0.84)
    pt3dadd(-15.34, -9.72, 13.5, 0.84)
    pt3dadd(-15.44, -9.67, 13.5, 0.84)
    pt3dadd(-15.6, -9.67, 13.5, 0.84)
    pt3dadd(-15.71, -9.57, 14, 0.84)
    pt3dadd(-15.81, -9.51, 14, 0.84)
    pt3dadd(-15.97, -9.51, 14, 0.84)
    pt3dadd(-16.07, -9.46, 14, 0.84)
    pt3dadd(-16.18, -9.36, 14, 0.84)
    pt3dadd(-16.28, -9.46, 14, 0.84)
    pt3dadd(-16.44, -9.51, 14, 0.84)
    pt3dadd(-16.7, -9.51, 14.5, 0.84)
    pt3dadd(-16.91, -9.57, 14.5, 0.84)
    pt3dadd(-17.07, -9.61, 14.5, 0.84)
    pt3dadd(-17.23, -9.57, 14.5, 0.84)
    pt3dadd(-17.64, -9.57, 15, 0.84)
    pt3dadd(-17.8, -9.57, 15, 0.84)
    pt3dadd(-17.91, -9.51, 15.5, 0.84)
    pt3dadd(-18.02, -9.51, 15.5, 0.84)
  }
  dend[30] {pt3dclear()
    pt3dadd(-18.02, -9.51, 15.5, 0.84)
    pt3dadd(-18.48, -8.46, 15.5, 0.84)
    pt3dadd(-18.7, -8.41, 15.5, 0.84)
    pt3dadd(-18.86, -8.52, 15.5, 0.84)
    pt3dadd(-19.07, -8.52, 15.5, 0.84)
    pt3dadd(-19.22, -8.41, 15.5, 0.84)
    pt3dadd(-19.28, -8.31, 15.5, 0.84)
    pt3dadd(-19.43, -8.31, 15.5, 0.84)
    pt3dadd(-19.48, -8.19, 15.5, 0.84)
    pt3dadd(-19.64, -8.1, 15.5, 0.84)
    pt3dadd(-19.75, -7.99, 15.5, 0.84)
    pt3dadd(-19.85, -7.88, 16, 0.84)
    pt3dadd(-19.96, -7.83, 16, 0.84)
    pt3dadd(-20.01, -7.73, 16, 0.84)
    pt3dadd(-20.17, -7.67, 16, 0.84)
    pt3dadd(-20.27, -7.57, 16, 0.84)
    pt3dadd(-20.38, -7.46, 16, 0.84)
    pt3dadd(-20.59, -7.46, 16, 0.84)
    pt3dadd(-20.69, -7.31, 16, 0.84)
    pt3dadd(-20.8, -7.2, 16, 0.84)
    pt3dadd(-20.9, -7.15, 16, 0.84)
    pt3dadd(-21.01, -6.99, 16.5, 0.84)
    pt3dadd(-21.11, -6.94, 16.5, 0.84)
    pt3dadd(-21.11, -6.78, 16.5, 0.84)
    pt3dadd(-21.17, -6.62, 16.5, 0.84)
    pt3dadd(-21.22, -6.41, 16.5, 0.84)
  }
}
proc shape3d_36() {
  dend[30] {
    pt3dadd(-21.27, -6.31, 16.5, 0.84)
    pt3dadd(-21.27, -6.15, 17, 0.84)
    pt3dadd(-21.32, -6.05, 17, 0.84)
    pt3dadd(-21.38, -5.94, 17, 0.84)
    pt3dadd(-21.48, -5.83, 17, 0.84)
    pt3dadd(-21.59, -5.78, 17, 0.84)
    pt3dadd(-21.69, -5.68, 17.5, 0.84)
    pt3dadd(-21.85, -5.62, 17.5, 0.84)
    pt3dadd(-21.95, -5.52, 17.5, 0.84)
    pt3dadd(-22.11, -5.47, 17.5, 0.84)
    pt3dadd(-22.27, -5.41, 17.5, 0.84)
    pt3dadd(-22.37, -5.47, 17.5, 0.84)
    pt3dadd(-22.48, -5.47, 18, 0.84)
    pt3dadd(-23.58, -6.05, 17.5, 0.84)
    pt3dadd(-23.69, -6.05, 17.5, 0.84)
    pt3dadd(-23.79, -5.99, 17.5, 0.84)
    pt3dadd(-23.9, -6.05, 17.5, 0.84)
    pt3dadd(-24, -6.15, 17.5, 0.84)
    pt3dadd(-24.16, -6.15, 17.5, 0.84)
    pt3dadd(-24.32, -6.2, 17.5, 0.84)
    pt3dadd(-24.47, -6.36, 17.5, 0.84)
    pt3dadd(-24.58, -6.36, 17.5, 0.84)
    pt3dadd(-24.68, -6.47, 17.5, 0.84)
    pt3dadd(-24.79, -6.57, 17.5, 0.84)
    pt3dadd(-24.89, -6.62, 17.5, 0.84)
    pt3dadd(-25, -6.68, 17.5, 0.84)
    pt3dadd(-25.1, -6.73, 17.5, 0.84)
    pt3dadd(-25.26, -6.78, 17.5, 0.84)
    pt3dadd(-25.42, -6.94, 17.5, 0.84)
    pt3dadd(-25.95, -7.58, 18.5, 0.84)
    pt3dadd(-26.06, -7.63, 18.5, 0.84)
    pt3dadd(-26.16, -7.58, 18.5, 0.84)
    pt3dadd(-26.37, -7.52, 18.5, 0.84)
    pt3dadd(-26.48, -7.42, 18.5, 0.84)
    pt3dadd(-26.79, -7.36, 18.5, 0.84)
    pt3dadd(-27.05, -7.36, 19, 0.84)
    pt3dadd(-27.21, -7.31, 19, 0.84)
    pt3dadd(-27.31, -7.26, 19, 0.84)
    pt3dadd(-27.42, -7.26, 19, 0.84)
    pt3dadd(-27.58, -7.21, 19, 0.84)
    pt3dadd(-27.63, -7.1, 19, 0.84)
    pt3dadd(-27.79, -7, 19, 0.84)
    pt3dadd(-27.73, -6.79, 19, 0.84)
    pt3dadd(-27.84, -6.68, 19.5, 0.84)
    pt3dadd(-27.94, -6.58, 19.5, 0.84)
    pt3dadd(-28, -6.47, 19.5, 0.84)
    pt3dadd(-28.1, -6.37, 19.5, 0.84)
    pt3dadd(-28.21, -6.31, 19.5, 0.84)
    pt3dadd(-28.26, -6.21, 19.5, 0.84)
    pt3dadd(-28.42, -6.26, 19.5, 0.84)
    pt3dadd(-28.89, -6.26, 19.5, 0.84)
    pt3dadd(-29.15, -6.31, 19.5, 0.84)
    pt3dadd(-29.36, -6.37, 19.5, 0.84)
    pt3dadd(-29.57, -6.42, 19.5, 0.84)
    pt3dadd(-29.73, -6.63, 19.5, 0.84)
    pt3dadd(-29.94, -6.73, 19.5, 0.84)
    pt3dadd(-30.04, -6.79, 19.5, 0.84)
    pt3dadd(-30.15, -6.89, 19.5, 0.84)
    pt3dadd(-30.46, -6.89, 20, 0.84)
    pt3dadd(-30.62, -6.94, 20, 0.84)
    pt3dadd(-30.83, -6.94, 20, 0.84)
    pt3dadd(-30.99, -6.89, 20, 0.84)
    pt3dadd(-31.2, -6.84, 20, 0.84)
    pt3dadd(-31.36, -6.84, 20, 0.84)
    pt3dadd(-31.46, -6.73, 20, 0.84)
    pt3dadd(-31.62, -6.58, 20.5, 0.84)
    pt3dadd(-31.62, -6.26, 21, 0.84)
    pt3dadd(-31.46, -6.1, 21.5, 0.84)
    pt3dadd(-31.25, -5.95, 21.5, 0.84)
    pt3dadd(-31.09, -5.84, 21.5, 0.84)
    pt3dadd(-30.88, -5.74, 21.5, 0.84)
    pt3dadd(-30.73, -5.63, 21.5, 0.84)
    pt3dadd(-30.62, -5.47, 22, 0.84)
    pt3dadd(-30.57, -5.31, 22, 0.84)
    pt3dadd(-30.57, -4.95, 22, 0.84)
    pt3dadd(-30.52, -4.84, 22, 0.84)
    pt3dadd(-30.46, -4.63, 22.5, 0.84)
    pt3dadd(-30.46, -4.47, 22.5, 0.84)
    pt3dadd(-30.41, -4.26, 22.5, 0.84)
    pt3dadd(-30.46, -4.11, 22.5, 0.84)
    pt3dadd(-30.52, -4, 23.5, 0.84)
  }
  dend[31] {pt3dclear()
    pt3dadd(-18.02, -9.51, 15.5, 0.84)
    pt3dadd(-18.39, -9.77, 15.5, 0.84)
    pt3dadd(-18.6, -9.77, 16, 0.84)
    pt3dadd(-18.71, -9.89, 16, 0.84)
    pt3dadd(-18.71, -10.1, 16, 0.84)
    pt3dadd(-18.76, -10.26, 16, 0.84)
    pt3dadd(-18.76, -10.89, 16, 0.84)
    pt3dadd(-18.6, -11.2, 16, 0.84)
    pt3dadd(-18.5, -11.36, 16, 0.84)
    pt3dadd(-18.5, -11.57, 16.5, 0.84)
    pt3dadd(-18.64, -11.68, 16.5, 0.84)
    pt3dadd(-18.76, -11.73, 16.5, 0.84)
    pt3dadd(-18.86, -11.83, 16.5, 0.84)
    pt3dadd(-19.02, -11.89, 16.5, 0.84)
    pt3dadd(-19.13, -11.99, 16.5, 0.84)
    pt3dadd(-19.28, -12.04, 16.5, 0.84)
    pt3dadd(-19.6, -12.04, 16.5, 0.84)
    pt3dadd(-19.7, -12.1, 16.5, 0.84)
    pt3dadd(-20.07, -12.1, 17, 0.84)
    pt3dadd(-20.18, -12.04, 17, 0.84)
    pt3dadd(-20.32, -12.1, 17, 0.84)
    pt3dadd(-20.49, -12.15, 17, 0.84)
    pt3dadd(-20.7, -12.2, 17, 0.84)
    pt3dadd(-20.81, -12.2, 17, 0.84)
    pt3dadd(-20.91, -12.25, 17.5, 0.84)
    pt3dadd(-21.17, -12.36, 17.5, 0.84)
    pt3dadd(-21.28, -12.52, 17.5, 0.84)
    pt3dadd(-21.33, -12.67, 17.5, 0.84)
    pt3dadd(-21.38, -12.88, 18, 0.84)
    pt3dadd(-21.38, -13.31, 18, 0.84)
    pt3dadd(-21.44, -13.52, 18.5, 0.84)
    pt3dadd(-21.33, -13.78, 18.5, 0.84)
    pt3dadd(-21.28, -13.94, 18.5, 0.84)
    pt3dadd(-21.23, -14.04, 18.5, 0.84)
    pt3dadd(-21.17, -14.2, 19, 0.84)
    pt3dadd(-21.12, -14.41, 19, 0.84)
    pt3dadd(-21.07, -14.51, 19, 0.84)
    pt3dadd(-21.02, -14.67, 19.5, 0.84)
    pt3dadd(-20.96, -14.93, 19.5, 0.84)
    pt3dadd(-20.86, -15.09, 19.5, 0.84)
    pt3dadd(-20.81, -15.3, 19.5, 0.84)
    pt3dadd(-20.75, -15.46, 19.5, 0.84)
    pt3dadd(-20.75, -15.67, 19.5, 0.84)
    pt3dadd(-20.7, -15.83, 19.5, 0.84)
    pt3dadd(-20.7, -16.04, 19.5, 0.84)
    pt3dadd(-20.65, -16.14, 19.5, 0.84)
    pt3dadd(-20.65, -16.41, 19.5, 0.84)
    pt3dadd(-20.6, -16.55, 19.5, 0.84)
    pt3dadd(-20.54, -16.67, 19.5, 0.84)
    pt3dadd(-20.49, -16.88, 19.5, 0.84)
    pt3dadd(-20.44, -16.98, 19.5, 0.84)
  }
  dend[32] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-2.63, 4.67, 5.5, 1.05)
    pt3dadd(-2.68, 4.82, 5.5, 1.05)
    pt3dadd(-2.78, 4.93, 5.5, 1.05)
    pt3dadd(-2.78, 5.03, 5.5, 1.05)
    pt3dadd(-2.84, 5.14, 5.5, 1.05)
    pt3dadd(-2.89, 5.25, 5.5, 1.05)
    pt3dadd(-3.05, 5.4, 5.5, 1.05)
    pt3dadd(-3.15, 5.56, 5.5, 1.05)
    pt3dadd(-3.26, 5.67, 5.5, 1.05)
    pt3dadd(-3.41, 5.72, 5.5, 1.05)
    pt3dadd(-3.52, 5.82, 5.5, 1.05)
    pt3dadd(-3.62, 5.93, 5.5, 1.05)
    pt3dadd(-3.73, 6.09, 5.5, 1.05)
    pt3dadd(-3.83, 6.24, 5.5, 1.05)
    pt3dadd(-3.94, 6.3, 5.5, 1.05)
    pt3dadd(-4.04, 6.35, 5.5, 1.05)
    pt3dadd(-4.15, 6.45, 5.5, 1.05)
    pt3dadd(-4.2, 6.66, 5.5, 1.05)
    pt3dadd(-4.25, 6.82, 5.5, 1.05)
    pt3dadd(-4.41, 6.82, 5.5, 1.05)
    pt3dadd(-4.51, 6.93, 5.5, 1.05)
    pt3dadd(-4.51, 7.03, 5.5, 1.05)
    pt3dadd(-5.21, 7.74, 5, 1.05)
    pt3dadd(-5.32, 7.85, 5, 1.05)
    pt3dadd(-5.48, 7.9, 5, 1.05)
    pt3dadd(-5.63, 8.06, 5, 1.05)
    pt3dadd(-5.69, 8.21, 5, 1.05)
    pt3dadd(-5.79, 8.32, 5, 1.05)
    pt3dadd(-5.9, 8.42, 5, 1.05)
    pt3dadd(-6.05, 8.58, 5, 1.05)
    pt3dadd(-6.1, 8.69, 5, 1.05)
    pt3dadd(-6.31, 8.9, 5, 1.05)
    pt3dadd(-6.42, 8.94, 5, 1.05)
    pt3dadd(-6.58, 9, 5, 1.05)
    pt3dadd(-6.73, 9.11, 5, 1.05)
    pt3dadd(-6.94, 9.16, 5, 1.05)
    pt3dadd(-7.47, 9.16, 5, 1.05)
    pt3dadd(-7.57, 9.11, 5, 1.05)
    pt3dadd(-7.89, 9.11, 5, 1.05)
    pt3dadd(-8.1, 9.16, 5, 1.05)
    pt3dadd(-8.26, 9.16, 5, 1.05)
    pt3dadd(-8.47, 9.21, 5, 1.05)
    pt3dadd(-8.57, 9.26, 5, 1.05)
    pt3dadd(-8.73, 9.42, 5, 1.05)
  }
  dend[33] {pt3dclear()
    pt3dadd(-8.73, 9.42, 5, 1.05)
    pt3dadd(-8.61, 11.42, 5, 1)
    pt3dadd(-8.68, 11.58, 5, 1)
    pt3dadd(-8.73, 11.68, 5, 1)
    pt3dadd(-8.94, 11.84, 5, 1)
    pt3dadd(-8.99, 12, 5, 1)
    pt3dadd(-9.03, 12.1, 5, 1)
    pt3dadd(-9.15, 12.21, 5, 1)
    pt3dadd(-9.15, 12.37, 5, 1)
    pt3dadd(-9.19, 12.52, 5, 1)
    pt3dadd(-9.31, 12.73, 5, 1)
    pt3dadd(-9.36, 12.89, 5, 1)
    pt3dadd(-9.36, 13.15, 5, 1)
    pt3dadd(-9.41, 13.37, 5, 1)
    pt3dadd(-9.36, 13.52, 5, 1)
    pt3dadd(-9.36, 13.73, 5, 1)
    pt3dadd(-9.31, 13.89, 5, 1)
    pt3dadd(-9.25, 14.1, 5, 1)
    pt3dadd(-9.19, 14.26, 5, 1)
    pt3dadd(-9.1, 14.47, 5, 1)
    pt3dadd(-9.1, 14.78, 5, 1)
    pt3dadd(-9.03, 14.94, 5, 1)
    pt3dadd(-8.99, 15.15, 5, 1)
    pt3dadd(-8.94, 15.42, 5, 1)
    pt3dadd(-8.99, 15.52, 5, 1)
    pt3dadd(-8.99, 15.89, 5, 1)
    pt3dadd(-9.03, 16.05, 5, 1)
    pt3dadd(-9.03, 16.36, 5, 1)
    pt3dadd(-8.99, 16.47, 5, 1)
    pt3dadd(-8.94, 16.62, 5, 1)
    pt3dadd(-8.83, 16.82, 5, 1)
    pt3dadd(-8.77, 17.05, 5, 1)
    pt3dadd(-8.57, 17.41, 5, 1)
    pt3dadd(-8.57, 17.62, 5, 1)
    pt3dadd(-8.47, 17.73, 5, 1)
    pt3dadd(-8.47, 17.94, 5, 1)
    pt3dadd(-8.41, 18.1, 5, 1)
    pt3dadd(-8.41, 18.3, 5, 1)
    pt3dadd(-8.36, 18.46, 5, 1)
    pt3dadd(-8.01, 20.05, 4.5, 1)
    pt3dadd(-8.01, 21.15, 4.5, 1)
    pt3dadd(-7.96, 21.36, 4.5, 1)
    pt3dadd(-7.91, 21.47, 4.5, 1)
    pt3dadd(-7.8, 21.73, 4.5, 1)
    pt3dadd(-7.8, 21.89, 4.5, 1)
    pt3dadd(-7.7, 22.1, 4.5, 1)
    pt3dadd(-7.54, 22.31, 4.5, 1)
    pt3dadd(-7.43, 22.52, 4.5, 1)
    pt3dadd(-7.33, 22.73, 4.5, 1)
    pt3dadd(-7.22, 22.84, 4.5, 1)
    pt3dadd(-7.17, 22.99, 4.5, 1)
    pt3dadd(-7.17, 23.84, 4.5, 1)
    pt3dadd(-7.28, 23.94, 4.5, 1)
    pt3dadd(-7.28, 24.52, 4.5, 1)
    pt3dadd(-7.17, 24.78, 4.5, 1)
    pt3dadd(-7.07, 24.99, 4.5, 1)
    pt3dadd(-6.91, 25.15, 4.5, 1)
    pt3dadd(-6.8, 25.25, 4.5, 1)
    pt3dadd(-6.75, 25.36, 4.5, 1)
    pt3dadd(-6.65, 25.47, 4.5, 1)
    pt3dadd(-6.65, 25.57, 4.5, 1)
    pt3dadd(-6.59, 25.68, 4.5, 1)
    pt3dadd(-6.54, 25.78, 4.5, 1)
    pt3dadd(-6.54, 25.94, 4.5, 1)
    pt3dadd(-6.49, 26.04, 4.5, 1)
    pt3dadd(-6.49, 26.52, 4.5, 1)
    pt3dadd(-6.54, 26.62, 4.5, 1)
    pt3dadd(-6.54, 26.94, 4.5, 1)
    pt3dadd(-6.59, 27.04, 4.5, 1)
    pt3dadd(-6.59, 27.41, 4.5, 1)
    pt3dadd(-6.54, 27.52, 4.5, 1)
    pt3dadd(-6.54, 27.83, 4.5, 1)
  }
}
proc shape3d_37() {
  dend[33] {
    pt3dadd(-6.49, 27.99, 4.5, 1)
    pt3dadd(-6.49, 28.41, 4.5, 1)
    pt3dadd(-6.54, 28.51, 4.5, 1)
    pt3dadd(-6.49, 28.78, 4.5, 1)
    pt3dadd(-6.44, 28.93, 4.5, 1)
    pt3dadd(-6.44, 29.15, 4.5, 1)
    pt3dadd(-6.38, 29.36, 4.5, 1)
    pt3dadd(-6.38, 29.67, 4.5, 1)
    pt3dadd(-6.33, 29.83, 4.5, 1)
    pt3dadd(-6.33, 30.09, 4.5, 1)
    pt3dadd(-6.38, 30.3, 4.5, 1)
    pt3dadd(-6.38, 30.41, 4.5, 1)
  }
  dend[34] {pt3dclear()
    pt3dadd(-6.38, 30.41, 4.5, 1)
    pt3dadd(-6.37, 31.52, 5.5, 0.89)
    pt3dadd(-6.37, 31.79, 5.5, 0.89)
    pt3dadd(-6.32, 32, 5.5, 0.89)
    pt3dadd(-6.32, 32.21, 5, 0.89)
    pt3dadd(-6.27, 32.31, 5, 0.89)
    pt3dadd(-6.27, 32.58, 5, 0.89)
    pt3dadd(-6.22, 32.72, 5, 0.89)
    pt3dadd(-6.11, 32.84, 5, 0.89)
    pt3dadd(-6.11, 33, 5, 0.89)
    pt3dadd(-6.06, 33.21, 5.5, 0.89)
    pt3dadd(-6.01, 33.36, 5.5, 0.89)
    pt3dadd(-6.01, 33.58, 5.5, 0.89)
    pt3dadd(-5.9, 33.72, 6, 0.89)
    pt3dadd(-5.85, 33.84, 6, 0.89)
    pt3dadd(-5.8, 34, 6.5, 0.89)
    pt3dadd(-5.8, 34.21, 6.5, 0.89)
    pt3dadd(-5.74, 34.36, 6.5, 0.89)
    pt3dadd(-5.74, 34.47, 6.5, 0.89)
    pt3dadd(-5.69, 34.68, 6.5, 0.89)
    pt3dadd(-5.69, 34.94, 6.5, 0.89)
    pt3dadd(-5.64, 35.1, 6.5, 0.89)
    pt3dadd(-5.64, 35.31, 6, 0.89)
    pt3dadd(-5.59, 35.42, 6, 0.89)
    pt3dadd(-5.59, 36.2, 4.5, 0.89)
    pt3dadd(-5.64, 36.36, 4.5, 0.89)
    pt3dadd(-5.64, 36.52, 4.5, 0.89)
    pt3dadd(-5.69, 36.72, 4, 0.89)
    pt3dadd(-5.8, 36.83, 4, 0.89)
    pt3dadd(-5.85, 36.99, 4, 0.89)
    pt3dadd(-5.9, 37.1, 4, 0.89)
    pt3dadd(-6.06, 37.31, 4, 0.89)
    pt3dadd(-6.11, 37.47, 4, 0.89)
    pt3dadd(-6.16, 37.57, 4, 0.89)
    pt3dadd(-6.22, 37.78, 3.5, 0.89)
    pt3dadd(-6.27, 37.99, 3.5, 0.89)
    pt3dadd(-6.27, 38.52, 3.5, 0.89)
    pt3dadd(-6.32, 38.61, 3.5, 0.89)
    pt3dadd(-6.32, 38.99, 3.5, 0.89)
    pt3dadd(-6.22, 39.25, 3.5, 0.89)
    pt3dadd(-6.22, 39.46, 3.5, 0.89)
    pt3dadd(-6.16, 39.61, 3.5, 0.89)
    pt3dadd(-6.11, 40.4, 3, 0.89)
    pt3dadd(-6.16, 40.61, 3, 0.89)
    pt3dadd(-6.27, 40.72, 3, 0.89)
    pt3dadd(-6.32, 40.88, 3, 0.89)
    pt3dadd(-6.43, 40.99, 3, 0.89)
    pt3dadd(-6.53, 41.09, 3, 0.89)
    pt3dadd(-6.53, 41.25, 2.5, 0.89)
    pt3dadd(-6.64, 41.36, 2.5, 0.89)
    pt3dadd(-6.64, 41.51, 2.5, 0.89)
    pt3dadd(-6.69, 41.62, 2.5, 0.89)
    pt3dadd(-6.74, 41.72, 2.5, 0.89)
    pt3dadd(-6.85, 41.83, 2.5, 0.89)
    pt3dadd(-6.9, 41.93, 2.5, 0.89)
    pt3dadd(-7.06, 42.04, 2.5, 0.89)
    pt3dadd(-7.16, 42.04, 2.5, 0.89)
    pt3dadd(-7.37, 42.14, 2.5, 0.89)
    pt3dadd(-7.63, 42.2, 2.5, 0.89)
    pt3dadd(-8.53, 42.17, 1, 0.89)
    pt3dadd(-8.75, 42.07, 1, 0.89)
    pt3dadd(-8.9, 42.02, 1, 0.89)
    pt3dadd(-9.74, 42.02, 1, 0.89)
    pt3dadd(-9.9, 42.07, 1, 0.89)
    pt3dadd(-10.11, 42.02, 1, 0.89)
    pt3dadd(-10.27, 41.96, 1, 0.89)
    pt3dadd(-11.11, 41.96, 0.5, 0.89)
    pt3dadd(-11.21, 42.02, 0.5, 0.89)
    pt3dadd(-11.37, 42.07, 0.5, 0.89)
    pt3dadd(-11.53, 42.17, 0.5, 0.89)
    pt3dadd(-11.63, 42.23, 0.5, 0.89)
    pt3dadd(-11.84, 42.23, 0, 0.89)
    pt3dadd(-11.95, 42.33, 0, 0.89)
    pt3dadd(-12.05, 42.44, 0, 0.89)
    pt3dadd(-12.16, 42.49, 0, 0.89)
    pt3dadd(-12.26, 42.59, 0, 0.89)
    pt3dadd(-12.47, 42.8, -0.5, 0.89)
    pt3dadd(-12.47, 43.01, -0.5, 0.89)
    pt3dadd(-12.53, 43.17, -0.5, 0.89)
    pt3dadd(-12.58, 43.33, -0.5, 0.89)
    pt3dadd(-12.58, 43.65, -0.5, 0.89)
    pt3dadd(-12.53, 43.8, -0.5, 0.89)
    pt3dadd(-12.42, 43.91, -1, 0.89)
    pt3dadd(-12.26, 44.17, -1, 0.89)
    pt3dadd(-12.16, 44.28, -1, 0.89)
    pt3dadd(-12.11, 44.43, -1, 0.89)
    pt3dadd(-12.05, 44.54, -1, 0.89)
    pt3dadd(-12, 44.75, -1, 0.89)
    pt3dadd(-11.95, 44.91, -1, 0.89)
    pt3dadd(-11.95, 45.49, -1, 0.89)
    pt3dadd(-12, 45.64, -1, 0.89)
    pt3dadd(-12, 45.96, -1.5, 0.89)
    pt3dadd(-12.05, 46.12, -1.5, 0.89)
    pt3dadd(-12.11, 46.27, -1.5, 0.89)
    pt3dadd(-12.16, 46.48, -1.5, 0.89)
    pt3dadd(-12.16, 46.69, -1.5, 0.89)
    pt3dadd(-12.26, 46.85, -1.5, 0.89)
    pt3dadd(-12.32, 47.01, -1.5, 0.89)
    pt3dadd(-12.37, 47.17, -1.5, 0.89)
    pt3dadd(-12.42, 47.33, -1.5, 0.89)
    pt3dadd(-12.53, 47.43, -1.5, 0.89)
    pt3dadd(-12.47, 47.54, -1.5, 0.89)
    pt3dadd(-12.47, 47.75, -1.5, 0.89)
    pt3dadd(-12.53, 47.85, -1.5, 0.89)
    pt3dadd(-12.53, 48.22, -1.5, 0.89)
    pt3dadd(-12.16, 49.08, -1.5, 0.94)
    pt3dadd(-12.26, 49.13, -1.5, 0.94)
    pt3dadd(-12.37, 49.23, -1.5, 0.94)
    pt3dadd(-12.58, 49.23, -1.5, 0.94)
    pt3dadd(-12.63, 49.34, -1.5, 0.94)
    pt3dadd(-12.74, 49.44, -1.5, 0.94)
    pt3dadd(-12.95, 49.5, -1.5, 0.94)
    pt3dadd(-13, 49.6, -1.5, 0.94)
    pt3dadd(-13.1, 49.71, -1.5, 0.94)
    pt3dadd(-13.05, 49.87, -1.5, 0.94)
    pt3dadd(-13.16, 49.97, -1.5, 0.94)
    pt3dadd(-13.26, 50.08, -1.5, 0.94)
    pt3dadd(-13.21, 50.18, -1.5, 0.94)
    pt3dadd(-13.21, 50.29, -1.5, 0.94)
    pt3dadd(-13.26, 50.44, -1.5, 0.94)
    pt3dadd(-13.37, 50.5, -1.5, 0.94)
    pt3dadd(-13.42, 50.65, -1.5, 0.94)
    pt3dadd(-13.52, 50.86, -1.5, 0.94)
    pt3dadd(-13.63, 50.97, -1.5, 0.94)
    pt3dadd(-13.79, 51.02, -1.5, 0.94)
    pt3dadd(-13.89, 51.18, -1.5, 0.94)
    pt3dadd(-14, 51.28, -1.5, 0.94)
    pt3dadd(-14.05, 51.39, -1.5, 0.94)
    pt3dadd(-14.21, 51.44, -1.5, 0.94)
    pt3dadd(-14.42, 51.44, -1.5, 0.94)
    pt3dadd(-14.52, 51.6, -1.5, 0.94)
    pt3dadd(-14.73, 51.6, -1.5, 0.94)
    pt3dadd(-14.84, 51.71, -1.5, 0.94)
    pt3dadd(-14.99, 51.76, -1.5, 0.94)
    pt3dadd(-15.1, 51.86, -1.5, 0.94)
    pt3dadd(-15.31, 51.86, -1.5, 0.94)
    pt3dadd(-15.41, 51.92, -2, 0.94)
    pt3dadd(-15.52, 51.92, -2, 0.94)
    pt3dadd(-15.68, 52.07, -2, 0.94)
    pt3dadd(-15.78, 52.13, -2, 0.94)
    pt3dadd(-15.89, 52.23, -2, 0.94)
    pt3dadd(-15.99, 52.28, -2, 0.94)
    pt3dadd(-16.1, 52.44, -2, 0.94)
    pt3dadd(-16.14, 52.65, -2, 0.94)
    pt3dadd(-16.25, 52.81, -2.5, 0.94)
    pt3dadd(-16.25, 53.49, -3, 0.94)
    pt3dadd(-16.2, 53.65, -3, 0.94)
    pt3dadd(-16.1, 53.86, -3.5, 0.94)
    pt3dadd(-16.04, 54.02, -3.5, 0.94)
    pt3dadd(-16.04, 54.28, -3.5, 0.94)
    pt3dadd(-15.99, 54.44, -3.5, 0.94)
    pt3dadd(-16.04, 54.6, -3.5, 0.94)
    pt3dadd(-16.04, 55.02, -3.5, 0.94)
    pt3dadd(-16.2, 55.12, -3.5, 0.94)
    pt3dadd(-16.25, 55.23, -4, 0.94)
    pt3dadd(-16.25, 55.39, -4, 0.94)
    pt3dadd(-16.36, 55.54, -4, 0.94)
    pt3dadd(-16.36, 55.65, -4, 0.94)
    pt3dadd(-16.41, 55.75, -4, 0.94)
    pt3dadd(-16.41, 55.91, -4, 0.94)
    pt3dadd(-16.52, 55.96, -4, 0.94)
    pt3dadd(-16.57, 56.07, -4, 0.94)
    pt3dadd(-16.62, 56.23, -4, 0.94)
    pt3dadd(-16.67, 56.44, -4, 0.94)
    pt3dadd(-16.78, 56.54, -4, 0.94)
    pt3dadd(-16.82, 56.65, -4, 0.94)
    pt3dadd(-16.94, 56.86, -4, 0.94)
    pt3dadd(-16.98, 56.96, -4, 0.94)
    pt3dadd(-17.09, 57.07, -4, 0.94)
    pt3dadd(-17.09, 57.23, -4, 0.94)
    pt3dadd(-17.2, 57.28, -4, 0.94)
    pt3dadd(-17.3, 57.33, -4, 0.94)
    pt3dadd(-17.3, 57.44, -4, 0.94)
    pt3dadd(-17.36, 57.54, -4, 0.94)
    pt3dadd(-17.41, 57.7, -4, 0.94)
    pt3dadd(-17.57, 57.7, -4, 0.94)
    pt3dadd(-17.57, 57.86, -4, 0.94)
    pt3dadd(-18.09, 58.79, -4, 0.94)
    pt3dadd(-18.09, 59.47, -4, 0.94)
    pt3dadd(-18.04, 59.63, -4, 0.94)
    pt3dadd(-18.04, 60.21, -4.5, 0.94)
    pt3dadd(-18.09, 60.37, -4.5, 0.94)
    pt3dadd(-18.14, 60.47, -4.5, 0.94)
    pt3dadd(-18.14, 60.74, -4.5, 0.94)
    pt3dadd(-18.2, 60.89, -4.5, 0.94)
    pt3dadd(-18.3, 61, -4.5, 0.94)
    pt3dadd(-18.41, 61.1, -4.5, 0.94)
    pt3dadd(-18.57, 61.16, -4.5, 0.94)
    pt3dadd(-18.57, 61.26, -4.5, 0.94)
    pt3dadd(-18.72, 61.31, -4.5, 0.94)
    pt3dadd(-18.82, 61.42, -4.5, 0.94)
    pt3dadd(-18.88, 61.52, -5, 0.94)
    pt3dadd(-19.04, 61.58, -5, 0.94)
    pt3dadd(-19.2, 61.68, -5, 0.94)
    pt3dadd(-19.3, 61.79, -5, 0.94)
    pt3dadd(-19.46, 61.89, -5, 0.94)
    pt3dadd(-19.46, 62.05, -5, 0.94)
    pt3dadd(-20.07, 62.87, -6.5, 0.94)
    pt3dadd(-20.18, 62.76, -6.5, 0.94)
    pt3dadd(-20.34, 62.76, -6.5, 0.94)
    pt3dadd(-20.44, 62.82, -6.5, 0.94)
    pt3dadd(-20.55, 62.76, -6.5, 0.94)
    pt3dadd(-20.86, 62.71, -6.5, 0.94)
    pt3dadd(-21.07, 62.66, -6.5, 0.94)
    pt3dadd(-21.18, 62.71, -6.5, 0.94)
    pt3dadd(-21.28, 62.76, -6.5, 0.94)
    pt3dadd(-21.39, 62.97, -6.5, 0.94)
    pt3dadd(-21.44, 63.08, -6.5, 0.94)
  }
  dend[35] {pt3dclear()
    pt3dadd(-21.44, 63.08, -6.5, 0.94)
    pt3dadd(-22.39, 63.92, -6, 0.68)
    pt3dadd(-22.54, 64.08, -6, 0.68)
    pt3dadd(-22.6, 64.29, -6, 0.68)
    pt3dadd(-22.75, 64.34, -6, 0.68)
    pt3dadd(-22.91, 64.45, -6, 0.68)
    pt3dadd(-22.96, 64.59, -6, 0.68)
    pt3dadd(-23.12, 64.76, -6.5, 0.68)
    pt3dadd(-23.23, 64.81, -6.5, 0.68)
    pt3dadd(-23.33, 64.97, -6.5, 0.68)
    pt3dadd(-23.44, 65.02, -6.5, 0.68)
    pt3dadd(-23.54, 65.18, -6.5, 0.68)
    pt3dadd(-23.65, 65.23, -6.5, 0.68)
    pt3dadd(-23.7, 65.39, -6.5, 0.68)
    pt3dadd(-23.86, 65.44, -6.5, 0.68)
    pt3dadd(-23.96, 65.5, -6.5, 0.68)
    pt3dadd(-24.12, 65.65, -6.5, 0.68)
    pt3dadd(-24.17, 65.81, -6.5, 0.68)
    pt3dadd(-24.28, 65.86, -6.5, 0.68)
    pt3dadd(-24.43, 66.02, -6.5, 0.68)
    pt3dadd(-24.49, 66.13, -6.5, 0.68)
    pt3dadd(-24.59, 66.23, -6.5, 0.68)
    pt3dadd(-24.8, 66.23, -6.5, 0.68)
    pt3dadd(-24.91, 66.29, -6.5, 0.68)
    pt3dadd(-25.01, 66.39, -6.5, 0.68)
    pt3dadd(-25.12, 66.39, -6.5, 0.68)
    pt3dadd(-25.27, 66.44, -6, 0.68)
    pt3dadd(-25.38, 66.55, -6, 0.68)
    pt3dadd(-25.54, 66.65, -6, 0.68)
  }
}
proc shape3d_38() {
  dend[35] {
    pt3dadd(-25.64, 66.86, -6, 0.68)
    pt3dadd(-25.8, 66.81, -6, 0.68)
    pt3dadd(-25.9, 66.92, -6, 0.68)
    pt3dadd(-26.01, 67.02, -6, 0.68)
    pt3dadd(-26.11, 67.06, -6, 0.68)
    pt3dadd(-26.27, 67.13, -6, 0.68)
    pt3dadd(-26.38, 67.28, -6, 0.68)
    pt3dadd(-26.53, 67.39, -6, 0.68)
    pt3dadd(-26.59, 67.48, -6, 0.68)
    pt3dadd(-26.74, 67.48, -6, 0.68)
    pt3dadd(-26.85, 67.59, -6, 0.68)
    pt3dadd(-27.01, 67.7, -5.5, 0.68)
    pt3dadd(-27.06, 67.91, -5.5, 0.68)
    pt3dadd(-27.11, 68.02, -5.5, 0.68)
    pt3dadd(-27.22, 68.13, -5.5, 0.68)
    pt3dadd(-27.32, 68.18, -5.5, 0.68)
    pt3dadd(-27.43, 68.34, -5.5, 0.68)
    pt3dadd(-27.53, 68.39, -5.5, 0.68)
    pt3dadd(-27.64, 68.48, -5.5, 0.68)
    pt3dadd(-27.64, 68.59, -5.5, 0.68)
    pt3dadd(-27.69, 68.7, -5.5, 0.68)
    pt3dadd(-27.79, 68.81, -5.5, 0.68)
    pt3dadd(-27.95, 68.91, -5.5, 0.68)
    pt3dadd(-28.06, 69.02, -5.5, 0.68)
    pt3dadd(-28.32, 69.06, -5.5, 0.68)
    pt3dadd(-28.42, 69.12, -5.5, 0.68)
    pt3dadd(-28.58, 69.23, -5.5, 0.68)
    pt3dadd(-28.74, 69.28, -5.5, 0.68)
    pt3dadd(-28.79, 69.39, -5.5, 0.68)
    pt3dadd(-28.9, 69.44, -5.5, 0.68)
    pt3dadd(-29, 69.44, -5.5, 0.68)
    pt3dadd(-29.05, 69.59, -5.5, 0.68)
    pt3dadd(-29.16, 69.7, -5.5, 0.68)
    pt3dadd(-29.32, 69.75, -5.5, 0.68)
    pt3dadd(-29.47, 69.91, -5.5, 0.68)
    pt3dadd(-29.58, 70.02, -5.5, 0.68)
    pt3dadd(-29.74, 70.06, -5.5, 0.68)
    pt3dadd(-29.95, 70.23, -5.5, 0.68)
    pt3dadd(-30.05, 70.39, -5.5, 0.68)
    pt3dadd(-30.21, 70.44, -5.5, 0.68)
    pt3dadd(-30.31, 70.54, -5.5, 0.68)
    pt3dadd(-30.42, 70.65, -5.5, 0.68)
    pt3dadd(-30.58, 70.7, -5.5, 0.68)
    pt3dadd(-30.68, 70.81, -5.5, 0.68)
    pt3dadd(-30.89, 70.81, -5.5, 0.68)
    pt3dadd(-31.05, 70.91, -5.5, 0.68)
    pt3dadd(-31.26, 71.02, -5.5, 0.68)
    pt3dadd(-31.42, 71.06, -5.5, 0.68)
    pt3dadd(-31.52, 71.12, -5.5, 0.68)
    pt3dadd(-31.99, 71.12, -5.5, 0.68)
    pt3dadd(-32.1, 71.17, -5.5, 0.68)
    pt3dadd(-32.25, 71.17, -5.5, 0.68)
    pt3dadd(-32.36, 71.23, -5.5, 0.68)
    pt3dadd(-32.52, 71.33, -5.5, 0.68)
    pt3dadd(-32.67, 71.38, -5.5, 0.68)
    pt3dadd(-32.78, 71.44, -5.5, 0.68)
    pt3dadd(-32.94, 71.48, -5.5, 0.68)
    pt3dadd(-33.09, 71.48, -5.5, 0.68)
    pt3dadd(-33.2, 71.54, -5.5, 0.68)
    pt3dadd(-33.36, 71.65, -5.5, 0.68)
    pt3dadd(-33.51, 71.65, -5.5, 0.68)
    pt3dadd(-33.61, 71.75, -5.5, 0.68)
    pt3dadd(-33.67, 71.86, -5.5, 0.68)
    pt3dadd(-33.83, 71.95, -5.5, 0.68)
    pt3dadd(-33.93, 72.02, -5.5, 0.68)
    pt3dadd(-34.09, 72.17, -5.5, 0.68)
    pt3dadd(-34.14, 72.28, -5.5, 0.68)
    pt3dadd(-34.25, 72.33, -5.5, 0.68)
    pt3dadd(-34.46, 72.48, -5.5, 0.68)
    pt3dadd(-34.56, 72.54, -5.5, 0.68)
    pt3dadd(-34.67, 72.65, -5.5, 0.68)
    pt3dadd(-34.83, 72.7, -5.5, 0.68)
    pt3dadd(-35.04, 72.75, -5.5, 0.68)
    pt3dadd(-35.67, 72.75, -5.5, 0.68)
    pt3dadd(-35.82, 72.75, -5.5, 0.68)
    pt3dadd(-36.03, 72.75, -5.5, 0.68)
    pt3dadd(-36.19, 72.86, -5.5, 0.68)
    pt3dadd(-36.4, 72.86, -5.5, 0.68)
    pt3dadd(-36.51, 72.91, -5.5, 0.68)
    pt3dadd(-36.61, 72.95, -5.5, 0.68)
    pt3dadd(-36.86, 72.95, -5, 0.68)
    pt3dadd(-37.14, 73.12, -5, 0.68)
    pt3dadd(-37.24, 73.17, -5, 0.68)
    pt3dadd(-37.4, 73.22, -5, 0.68)
    pt3dadd(-37.61, 73.28, -5, 0.68)
    pt3dadd(-37.71, 73.43, -5, 0.68)
    pt3dadd(-37.82, 73.48, -5, 0.68)
    pt3dadd(-37.86, 73.59, -5, 0.68)
    pt3dadd(-37.97, 73.7, -5, 0.68)
    pt3dadd(-38.08, 73.8, -5, 0.68)
    pt3dadd(-38.24, 73.86, -5, 0.68)
    pt3dadd(-38.29, 73.95, -5, 0.68)
    pt3dadd(-38.54, 74.17, -5, 0.68)
    pt3dadd(-38.65, 74.33, -5, 0.68)
    pt3dadd(-38.82, 74.48, -5, 0.68)
    pt3dadd(-38.97, 74.59, -5, 0.68)
    pt3dadd(-39.03, 74.7, -5, 0.68)
    pt3dadd(-39.13, 74.75, -5, 0.68)
    pt3dadd(-39.18, 74.84, -5, 0.68)
    pt3dadd(-39.29, 74.91, -5, 0.68)
    pt3dadd(-39.34, 75.01, -5, 0.68)
    pt3dadd(-39.45, 75.06, -5, 0.68)
    pt3dadd(-39.54, 75.17, -5, 0.68)
    pt3dadd(-39.65, 75.27, -5, 0.68)
    pt3dadd(-39.76, 75.33, -5, 0.68)
    pt3dadd(-39.86, 75.43, -5, 0.68)
    pt3dadd(-39.97, 75.54, -5, 0.68)
    pt3dadd(-40.08, 75.59, -5, 0.68)
    pt3dadd(-40.18, 75.7, -5, 0.68)
    pt3dadd(-40.34, 75.7, -5, 0.68)
    pt3dadd(-40.39, 75.84, -5, 0.68)
    pt3dadd(-40.5, 75.91, -5, 0.68)
    pt3dadd(-40.6, 75.95, -5, 0.68)
    pt3dadd(-40.71, 76.06, -5, 0.68)
    pt3dadd(-40.86, 76.12, -5, 0.68)
    pt3dadd(-40.97, 76.22, -5, 0.68)
    pt3dadd(-41.13, 76.38, -5, 0.68)
    pt3dadd(-41.23, 76.48, -5, 0.68)
    pt3dadd(-41.44, 76.48, -5, 0.68)
    pt3dadd(-41.49, 76.59, -5, 0.68)
    pt3dadd(-41.6, 76.64, -5, 0.68)
    pt3dadd(-41.7, 76.69, -5, 0.68)
    pt3dadd(-41.81, 76.75, -5, 0.68)
    pt3dadd(-41.97, 76.8, -5, 0.68)
    pt3dadd(-42.02, 76.95, -5, 0.68)
    pt3dadd(-42.12, 77.06, -5, 0.68)
    pt3dadd(-42.23, 77.17, -5, 0.68)
    pt3dadd(-42.39, 77.22, -5, 0.68)
    pt3dadd(-42.6, 77.27, -5, 0.68)
    pt3dadd(-42.6, 77.38, -5, 0.68)
    pt3dadd(-42.7, 77.38, -5, 0.68)
    pt3dadd(-42.81, 77.48, -5, 0.68)
    pt3dadd(-42.91, 77.64, -5, 0.68)
    pt3dadd(-43.02, 77.75, -5, 0.68)
    pt3dadd(-43.17, 77.8, -5, 0.68)
    pt3dadd(-43.28, 77.95, -5, 0.68)
    pt3dadd(-43.44, 78.06, -5, 0.68)
    pt3dadd(-43.54, 78.11, -5, 0.68)
    pt3dadd(-43.65, 78.17, -5, 0.68)
    pt3dadd(-43.75, 78.22, -5, 0.68)
    pt3dadd(-43.8, 78.31, -5, 0.68)
    pt3dadd(-43.91, 78.38, -5, 0.68)
    pt3dadd(-44.07, 78.38, -5, 0.68)
    pt3dadd(-44.28, 78.43, -5, 0.68)
    pt3dadd(-44.38, 78.53, -5, 0.68)
    pt3dadd(-44.54, 78.53, -5, 0.68)
    pt3dadd(-44.64, 78.59, -5, 0.68)
    pt3dadd(-44.75, 78.59, -5, 0.68)
    pt3dadd(-44.85, 78.59, -5, 0.68)
    pt3dadd(-45.06, 78.59, -5, 0.68)
    pt3dadd(-45.22, 78.69, -5, 0.68)
    pt3dadd(-45.33, 78.8, -5, 0.68)
    pt3dadd(-45.48, 78.84, -5, 0.68)
    pt3dadd(-45.69, 78.84, -5, 0.68)
    pt3dadd(-45.75, 78.95, -5, 0.68)
    pt3dadd(-45.85, 79.06, -5, 0.68)
    pt3dadd(-46.01, 79.11, -5, 0.68)
    pt3dadd(-46.06, 79.22, -5, 0.68)
    pt3dadd(-46.22, 79.27, -5, 0.68)
    pt3dadd(-46.27, 79.37, -5, 0.68)
    pt3dadd(-46.32, 79.53, -5, 0.68)
    pt3dadd(-46.53, 79.69, -5, 0.68)
    pt3dadd(-46.74, 79.95, -5, 0.68)
    pt3dadd(-46.85, 80.06, -5, 0.68)
    pt3dadd(-46.95, 80.16, -5, 0.68)
    pt3dadd(-47.11, 80.22, -5, 0.68)
    pt3dadd(-47.22, 80.31, -5, 0.68)
    pt3dadd(-47.37, 80.37, -5, 0.68)
    pt3dadd(-47.48, 80.43, -5, 0.68)
    pt3dadd(-47.58, 80.53, -5, 0.68)
    pt3dadd(-47.69, 80.64, -5, 0.68)
    pt3dadd(-47.85, 80.69, -5, 0.68)
    pt3dadd(-47.9, 80.79, -5, 0.68)
    pt3dadd(-48.06, 80.9, -5, 0.68)
    pt3dadd(-48.16, 81.06, -5, 0.68)
    pt3dadd(-48.37, 81.11, -5, 0.68)
    pt3dadd(-48.48, 81.16, -5, 0.68)
    pt3dadd(-48.63, 81.2, -5, 0.68)
    pt3dadd(-48.79, 81.31, -5, 0.68)
    pt3dadd(-48.84, 81.43, -5, 0.68)
    pt3dadd(-48.95, 81.48, -5, 0.68)
    pt3dadd(-49.05, 81.69, -5, 0.68)
    pt3dadd(-50.13, 82.28, -5.5, 0.68)
    pt3dadd(-50.18, 82.39, -5.5, 0.68)
    pt3dadd(-50.29, 82.39, -5.5, 0.68)
    pt3dadd(-50.34, 82.54, -5.5, 0.68)
    pt3dadd(-50.55, 82.54, -5.5, 0.68)
    pt3dadd(-50.55, 82.7, -5.5, 0.68)
    pt3dadd(-50.81, 82.7, -5.5, 0.68)
    pt3dadd(-50.92, 82.91, -5.5, 0.68)
    pt3dadd(-51.07, 83.02, -5.5, 0.68)
    pt3dadd(-51.28, 83.17, -5.5, 0.68)
    pt3dadd(-51.44, 83.23, -5.5, 0.68)
    pt3dadd(-51.55, 83.33, -5.5, 0.68)
    pt3dadd(-51.65, 83.44, -5.5, 0.68)
    pt3dadd(-51.81, 83.49, -5.5, 0.68)
    pt3dadd(-52.02, 83.59, -5.5, 0.68)
    pt3dadd(-52.28, 83.65, -5.5, 0.68)
    pt3dadd(-52.49, 83.65, -5.5, 0.68)
    pt3dadd(-52.6, 83.75, -5.5, 0.68)
    pt3dadd(-52.75, 83.8, -5.5, 0.68)
    pt3dadd(-52.86, 83.86, -5.5, 0.68)
    pt3dadd(-52.96, 83.91, -5.5, 0.68)
    pt3dadd(-53.17, 83.96, -5.5, 0.68)
    pt3dadd(-53.33, 84.07, -5.5, 0.68)
    pt3dadd(-53.54, 84.07, -5.5, 0.68)
    pt3dadd(-53.65, 84.12, -5.5, 0.68)
    pt3dadd(-53.86, 84.12, -5, 0.68)
    pt3dadd(-53.96, 84.23, -5, 0.68)
    pt3dadd(-54.06, 84.23, -5, 0.68)
    pt3dadd(-54.17, 84.28, -5, 0.68)
    pt3dadd(-54.33, 84.38, -5, 0.68)
    pt3dadd(-54.48, 84.54, -5, 0.68)
    pt3dadd(-54.75, 84.7, -5, 0.68)
    pt3dadd(-54.85, 84.75, -5, 0.68)
    pt3dadd(-54.96, 84.91, -5, 0.68)
    pt3dadd(-55.11, 84.96, -5, 0.68)
    pt3dadd(-55.22, 85.07, -5, 0.68)
    pt3dadd(-55.32, 85.17, -5, 0.68)
    pt3dadd(-55.48, 85.22, -5, 0.68)
    pt3dadd(-55.59, 85.33, -5, 0.68)
    pt3dadd(-55.69, 85.43, -5, 0.68)
    pt3dadd(-55.8, 85.49, -5, 0.68)
    pt3dadd(-55.85, 85.59, -5, 0.68)
    pt3dadd(-56.06, 85.59, -5, 0.68)
    pt3dadd(-56.22, 85.64, -5, 0.68)
    pt3dadd(-56.32, 85.75, -5, 0.68)
    pt3dadd(-56.43, 85.86, -5, 0.68)
    pt3dadd(-56.37, 86.01, -5, 0.68)
    pt3dadd(-56.53, 86.12, -5, 0.68)
    pt3dadd(-56.64, 86.22, -5, 0.68)
    pt3dadd(-56.69, 86.38, -5, 0.68)
    pt3dadd(-56.79, 86.43, -5, 0.68)
    pt3dadd(-56.95, 86.7, -5, 0.68)
    pt3dadd(-57, 86.8, -5, 0.68)
    pt3dadd(-57.11, 86.91, -5, 0.68)
    pt3dadd(-57.11, 87.01, -5, 0.68)
    pt3dadd(-57.16, 87.12, -5, 0.68)
    pt3dadd(-57.27, 87.17, -5, 0.68)
    pt3dadd(-57.37, 87.33, -5, 0.68)
    pt3dadd(-57.37, 87.43, -5, 0.68)
    pt3dadd(-57.48, 87.48, -5, 0.68)
    pt3dadd(-57.53, 87.59, -5, 0.68)
    pt3dadd(-57.63, 87.7, -5, 0.68)
    pt3dadd(-57.69, 87.85, -5, 0.68)
    pt3dadd(-57.79, 87.96, -5, 0.68)
    pt3dadd(-57.9, 87.96, -5, 0.68)
    pt3dadd(-58, 88.01, -4.5, 0.68)
    pt3dadd(-58.11, 88.12, -4.5, 0.68)
  }
}
proc shape3d_39() {
  dend[35] {
    pt3dadd(-58.16, 88.27, -4.5, 0.68)
    pt3dadd(-58.37, 88.27, -4.5, 0.68)
    pt3dadd(-58.47, 88.38, -4.5, 0.68)
    pt3dadd(-58.58, 88.48, -4.5, 0.68)
    pt3dadd(-58.68, 88.64, -4.5, 0.68)
    pt3dadd(-58.84, 88.75, -4.5, 0.68)
    pt3dadd(-58.95, 88.75, -4.5, 0.68)
    pt3dadd(-59.1, 88.85, -4.5, 0.68)
    pt3dadd(-59.21, 89.01, -4.5, 0.68)
    pt3dadd(-59.37, 88.96, -4.5, 0.68)
    pt3dadd(-59.68, 88.96, -4.5, 0.68)
    pt3dadd(-59.73, 89.06, -4.5, 0.68)
    pt3dadd(-59.89, 89.17, -4.5, 0.68)
    pt3dadd(-60.1, 89.32, -4.5, 0.68)
    pt3dadd(-60.21, 89.43, -4.5, 0.68)
    pt3dadd(-60.47, 89.43, -4.5, 0.68)
    pt3dadd(-60.57, 89.54, -4.5, 0.68)
    pt3dadd(-60.68, 89.64, -4.5, 0.68)
    pt3dadd(-60.84, 89.69, -4.5, 0.68)
    pt3dadd(-60.94, 89.8, -4.5, 0.68)
    pt3dadd(-61.1, 89.85, -4.5, 0.68)
    pt3dadd(-61.2, 89.96, -4.5, 0.68)
    pt3dadd(-61.47, 90.22, -4.5, 0.68)
    pt3dadd(-61.68, 90.22, -4.5, 0.68)
    pt3dadd(-61.83, 90.27, -4.5, 0.68)
    pt3dadd(-61.99, 90.38, -4.5, 0.68)
    pt3dadd(-62.15, 90.48, -4.5, 0.68)
    pt3dadd(-62.2, 90.64, -4.5, 0.68)
    pt3dadd(-62.36, 90.74, -4.5, 0.68)
    pt3dadd(-62.52, 90.74, -4.5, 0.68)
    pt3dadd(-62.62, 90.85, -4.5, 0.68)
    pt3dadd(-62.67, 90.95, -4.5, 0.68)
    pt3dadd(-62.78, 91.01, -4.5, 0.68)
    pt3dadd(-62.88, 91.11, -4.5, 0.68)
    pt3dadd(-62.99, 91.22, -4.5, 0.68)
    pt3dadd(-63.09, 91.27, -4.5, 0.68)
    pt3dadd(-63.15, 91.37, -4.5, 0.68)
    pt3dadd(-63.36, 91.37, -4.5, 0.68)
    pt3dadd(-63.41, 91.53, -4.5, 0.68)
    pt3dadd(-63.62, 91.53, -4.5, 0.68)
    pt3dadd(-63.72, 91.64, -4.5, 0.68)
    pt3dadd(-63.88, 91.69, -4.5, 0.68)
    pt3dadd(-64.09, 91.69, -4.5, 0.68)
    pt3dadd(-64.45, 91.69, -4.5, 0.68)
    pt3dadd(-64.62, 91.8, -4.5, 0.68)
    pt3dadd(-64.72, 91.85, -4.5, 0.68)
    pt3dadd(-64.88, 91.9, -4.5, 0.68)
    pt3dadd(-64.98, 91.95, -4.5, 0.68)
    pt3dadd(-65.09, 92.06, -4.5, 0.68)
    pt3dadd(-65.19, 92.11, -4.5, 0.68)
    pt3dadd(-65.34, 92.27, -4.5, 0.68)
    pt3dadd(-65.45, 92.37, -4.5, 0.68)
    pt3dadd(-65.45, 92.64, -4.5, 0.68)
    pt3dadd(-65.51, 92.74, -4.5, 0.68)
    pt3dadd(-65.61, 92.85, -4.5, 0.68)
    pt3dadd(-65.67, 92.95, -4.5, 0.68)
    pt3dadd(-65.77, 93, -4.5, 0.68)
    pt3dadd(-65.81, 93.11, -4.5, 0.68)
    pt3dadd(-65.88, 93.21, -4.5, 0.68)
    pt3dadd(-65.98, 93.32, -4.5, 0.68)
    pt3dadd(-67.14, 94.26, -4, 0.68)
    pt3dadd(-67.3, 94.26, -4, 0.68)
    pt3dadd(-67.45, 94.42, -4, 0.68)
    pt3dadd(-67.62, 94.42, -4, 0.68)
    pt3dadd(-67.77, 94.47, -4, 0.68)
    pt3dadd(-67.88, 94.53, -4, 0.68)
    pt3dadd(-67.88, 94.68, -4, 0.68)
    pt3dadd(-68.04, 94.63, -3.5, 0.68)
    pt3dadd(-68.14, 94.74, -3.5, 0.68)
    pt3dadd(-68.19, 94.89, -3.5, 0.68)
    pt3dadd(-68.25, 95, -3.5, 0.68)
    pt3dadd(-68.34, 95.05, -3.5, 0.68)
    pt3dadd(-68.56, 95.1, -3.5, 0.68)
    pt3dadd(-68.72, 95.26, -3.5, 0.68)
    pt3dadd(-68.81, 95.32, -3.5, 0.68)
    pt3dadd(-68.93, 95.42, -3.5, 0.68)
    pt3dadd(-69.09, 95.58, -3.5, 0.68)
    pt3dadd(-69.19, 95.68, -3.5, 0.68)
    pt3dadd(-69.3, 95.74, -3.5, 0.68)
    pt3dadd(-69.45, 95.84, -3.5, 0.68)
    pt3dadd(-69.56, 95.95, -3.5, 0.68)
    pt3dadd(-69.66, 96, -3.5, 0.68)
    pt3dadd(-69.81, 96.1, -3.5, 0.68)
    pt3dadd(-69.93, 96.1, -3.5, 0.68)
    pt3dadd(-70.03, 96.16, -3.5, 0.68)
    pt3dadd(-70.14, 96.21, -3.5, 0.68)
    pt3dadd(-70.29, 96.31, -3, 0.68)
    pt3dadd(-70.4, 96.42, -3, 0.68)
    pt3dadd(-70.45, 96.52, -3, 0.68)
    pt3dadd(-70.56, 96.58, -3, 0.68)
    pt3dadd(-70.76, 96.68, -3, 0.68)
    pt3dadd(-70.87, 96.73, -3, 0.68)
    pt3dadd(-70.92, 96.84, -3, 0.68)
    pt3dadd(-70.97, 96.94, -3, 0.68)
    pt3dadd(-71.13, 96.94, -2.5, 0.68)
    pt3dadd(-71.23, 97, -2.5, 0.68)
    pt3dadd(-71.34, 97.1, -2.5, 0.68)
    pt3dadd(-71.45, 97.21, -2.5, 0.68)
    pt3dadd(-71.59, 97.31, -2, 0.68)
    pt3dadd(-71.7, 97.37, -2, 0.68)
    pt3dadd(-71.81, 97.47, -2, 0.68)
    pt3dadd(-71.97, 97.52, -2, 0.68)
    pt3dadd(-72.08, 97.63, -2, 0.68)
    pt3dadd(-72.18, 97.79, -2, 0.68)
    pt3dadd(-72.29, 97.84, -2, 0.68)
    pt3dadd(-72.29, 98.05, -2, 0.68)
    pt3dadd(-72.39, 98.1, -2, 0.68)
    pt3dadd(-72.5, 98.26, -2, 0.68)
    pt3dadd(-72.55, 98.47, -2, 0.68)
    pt3dadd(-72.65, 98.63, -2, 0.68)
    pt3dadd(-72.81, 98.73, -2, 0.68)
    pt3dadd(-72.92, 98.89, -2, 0.68)
    pt3dadd(-73.02, 99, -2, 0.68)
    pt3dadd(-73.06, 99.1, -2, 0.68)
    pt3dadd(-73.06, 99.21, -2, 0.68)
    pt3dadd(-73.18, 99.26, -2, 0.68)
    pt3dadd(-73.28, 99.36, -2, 0.68)
    pt3dadd(-73.44, 99.42, -2, 0.68)
  }
  dend[36] {pt3dclear()
    pt3dadd(-21.44, 63.08, -6.5, 0.94)
    pt3dadd(-22.01, 63.97, -6.5, 1)
    pt3dadd(-22.12, 64.13, -7, 1)
    pt3dadd(-22.12, 64.34, -7, 1)
    pt3dadd(-22.22, 64.44, -7.5, 1)
    pt3dadd(-22.28, 64.59, -7.5, 1)
    pt3dadd(-22.38, 64.65, -7.5, 1)
    pt3dadd(-22.49, 64.81, -7.5, 1)
    pt3dadd(-22.64, 64.86, -7.5, 1)
    pt3dadd(-22.7, 64.97, -8, 1)
    pt3dadd(-22.85, 64.97, -8, 1)
    pt3dadd(-23.01, 65.13, -8, 1)
    pt3dadd(-23.12, 65.23, -8, 1)
    pt3dadd(-23.27, 65.28, -8, 1)
    pt3dadd(-23.38, 65.39, -8, 1)
    pt3dadd(-23.48, 65.48, -8, 1)
    pt3dadd(-23.64, 65.55, -8, 1)
    pt3dadd(-23.69, 65.65, -8, 1)
    pt3dadd(-23.8, 65.76, -8, 1)
    pt3dadd(-23.9, 65.86, -8, 1)
    pt3dadd(-24.01, 65.91, -8, 1)
    pt3dadd(-24.01, 66.12, -8, 1)
    pt3dadd(-24.27, 66.18, -8, 1)
    pt3dadd(-24.38, 66.33, -8, 1)
    pt3dadd(-24.38, 66.48, -8, 1)
    pt3dadd(-24.48, 66.54, -8, 1)
    pt3dadd(-24.53, 66.65, -8, 1)
    pt3dadd(-24.64, 66.86, -8, 1)
    pt3dadd(-24.8, 67.12, -7.5, 1)
    pt3dadd(-24.85, 67.33, -7.5, 1)
    pt3dadd(-25.06, 67.44, -7.5, 1)
    pt3dadd(-25.16, 67.59, -7.5, 1)
    pt3dadd(-25.27, 67.7, -7.5, 1)
    pt3dadd(-25.37, 67.81, -7.5, 1)
    pt3dadd(-25.48, 67.91, -7.5, 1)
    pt3dadd(-25.58, 67.95, -7.5, 1)
    pt3dadd(-25.58, 68.06, -7.5, 1)
    pt3dadd(-25.69, 68.17, -7.5, 1)
    pt3dadd(-25.85, 68.28, -7, 1)
    pt3dadd(-25.95, 68.38, -7, 1)
    pt3dadd(-26.05, 68.48, -7, 1)
    pt3dadd(-26.16, 68.54, -7, 1)
    pt3dadd(-26.32, 68.65, -7, 1)
    pt3dadd(-26.37, 68.75, -7, 1)
    pt3dadd(-26.47, 68.91, -7, 1)
    pt3dadd(-26.53, 69.02, -7, 1)
    pt3dadd(-26.58, 69.17, -7, 1)
    pt3dadd(-26.63, 69.38, -7, 1)
    pt3dadd(-26.68, 69.48, -7, 1)
    pt3dadd(-26.79, 69.65, -7, 1)
    pt3dadd(-26.84, 69.75, -7, 1)
    pt3dadd(-26.95, 69.75, -7, 1)
    pt3dadd(-27, 69.86, -7, 1)
    pt3dadd(-27.1, 69.95, -7.5, 1)
    pt3dadd(-27.16, 70.06, -7.5, 1)
    pt3dadd(-27.37, 70.12, -7.5, 1)
    pt3dadd(-27.42, 70.28, -7.5, 1)
    pt3dadd(-27.52, 70.33, -8, 1)
    pt3dadd(-27.63, 70.44, -8, 1)
    pt3dadd(-27.73, 70.54, -8, 1)
    pt3dadd(-27.84, 70.59, -8, 1)
    pt3dadd(-28, 70.65, -8, 1)
    pt3dadd(-28.1, 70.7, -8, 1)
    pt3dadd(-28.21, 70.8, -8, 1)
    pt3dadd(-28.36, 70.8, -8, 1)
    pt3dadd(-28.52, 70.86, -8, 1)
    pt3dadd(-28.78, 70.95, -8, 1)
    pt3dadd(-28.89, 71.01, -8, 1)
    pt3dadd(-28.99, 71.12, -8, 1)
    pt3dadd(-29.2, 71.12, -8, 1)
    pt3dadd(-29.36, 71.17, -8, 1)
    pt3dadd(-29.57, 71.17, -8, 1)
    pt3dadd(-29.68, 71.28, -8, 1)
    pt3dadd(-29.78, 71.38, -8, 1)
    pt3dadd(-29.89, 71.33, -8, 1)
    pt3dadd(-30.04, 71.43, -8, 1)
    pt3dadd(-30.15, 71.54, -8, 1)
    pt3dadd(-30.31, 71.64, -8, 1)
    pt3dadd(-30.41, 71.75, -8, 1)
    pt3dadd(-30.57, 71.8, -8, 1)
    pt3dadd(-30.62, 71.91, -8, 1)
    pt3dadd(-30.73, 72.06, -8, 1)
    pt3dadd(-30.78, 72.17, -8, 1)
    pt3dadd(-30.83, 72.27, -8, 1)
    pt3dadd(-30.83, 72.43, -8, 1)
    pt3dadd(-30.94, 72.59, -8, 1)
    pt3dadd(-30.99, 72.8, -8, 1)
    pt3dadd(-31.04, 73.01, -8, 1)
    pt3dadd(-31.04, 73.38, -8, 1)
    pt3dadd(-31.09, 73.48, -8, 1)
    pt3dadd(-31.09, 73.8, -8, 1)
    pt3dadd(-31.04, 73.9, -8, 1)
    pt3dadd(-31.04, 74.17, -8, 1)
    pt3dadd(-30.99, 74.33, -8, 1)
    pt3dadd(-30.94, 74.43, -8, 1)
    pt3dadd(-30.88, 74.59, -8, 1)
    pt3dadd(-31.52, 75.26, -8, 1)
    pt3dadd(-31.57, 75.36, -8, 1)
    pt3dadd(-31.68, 75.47, -8, 1)
    pt3dadd(-31.78, 75.56, -8, 1)
    pt3dadd(-31.83, 75.68, -8, 1)
    pt3dadd(-31.89, 75.78, -8, 1)
    pt3dadd(-31.94, 75.94, -8, 1)
    pt3dadd(-32.04, 76.05, -8, 1)
    pt3dadd(-32.1, 76.15, -8.5, 1)
    pt3dadd(-32.2, 76.26, -8.5, 1)
    pt3dadd(-32.2, 76.42, -8.5, 1)
    pt3dadd(-32.25, 76.63, -8.5, 1)
    pt3dadd(-32.36, 76.78, -8.5, 1)
    pt3dadd(-32.4, 76.98, -8.5, 1)
    pt3dadd(-32.46, 77.15, -8.5, 1)
    pt3dadd(-32.57, 77.26, -8.5, 1)
    pt3dadd(-32.61, 77.41, -8.5, 1)
    pt3dadd(-32.67, 77.52, -8.5, 1)
    pt3dadd(-32.72, 77.73, -8.5, 1)
    pt3dadd(-32.78, 77.83, -8.5, 1)
    pt3dadd(-32.78, 78.09, -8.5, 1)
    pt3dadd(-32.61, 78.26, -8.5, 1)
    pt3dadd(-32.61, 78.56, -8.5, 1)
    pt3dadd(-32.57, 78.73, -8.5, 1)
    pt3dadd(-32.52, 78.94, -9, 1)
    pt3dadd(-32.46, 79.04, -9, 1)
    pt3dadd(-32.31, 79.09, -9, 1)
    pt3dadd(-32.31, 79.2, -9, 1)
    pt3dadd(-32.2, 79.31, -9, 1)
    pt3dadd(-32.1, 79.36, -9, 1)
    pt3dadd(-31.94, 79.45, -9, 1)
    pt3dadd(-31.89, 79.62, -9.5, 1)
    pt3dadd(-31.78, 79.78, -9.5, 1)
    pt3dadd(-31.78, 80.25, -9.5, 1)
    pt3dadd(-31.83, 80.41, -10, 1)
  }
}
proc shape3d_40() {
  dend[36] {
    pt3dadd(-31.94, 80.52, -10, 1)
    pt3dadd(-31.99, 80.67, -10, 1)
    pt3dadd(-32.1, 80.78, -10, 1)
    pt3dadd(-32.15, 80.88, -10, 1)
    pt3dadd(-32.2, 81.04, -10, 1)
    pt3dadd(-32.31, 81.15, -10, 1)
    pt3dadd(-32.4, 81.41, -10, 1)
    pt3dadd(-32.46, 81.56, -10, 1)
    pt3dadd(-32.52, 81.78, -10, 1)
    pt3dadd(-32.61, 81.99, -10, 1)
    pt3dadd(-32.67, 82.2, -10, 1)
    pt3dadd(-32.67, 82.57, -10.5, 1)
    pt3dadd(-32.72, 82.72, -10.5, 1)
    pt3dadd(-32.72, 82.93, -10.5, 1)
    pt3dadd(-32.78, 83.09, -10.5, 1)
    pt3dadd(-32.78, 83.3, -10.5, 1)
    pt3dadd(-32.83, 83.46, -10.5, 1)
    pt3dadd(-32.83, 84.04, -10.5, 1)
    pt3dadd(-32.83, 84.25, -10.5, 1)
    pt3dadd(-32.78, 84.41, -10.5, 1)
    pt3dadd(-32.72, 84.51, -10.5, 1)
    pt3dadd(-32.72, 84.62, -10.5, 1)
    pt3dadd(-32.67, 84.77, -10.5, 1)
    pt3dadd(-32.61, 84.88, -10.5, 1)
    pt3dadd(-32.52, 85.04, -10.5, 1)
    pt3dadd(-32.36, 85.3, -10.5, 1)
    pt3dadd(-32.25, 85.4, -10.5, 1)
    pt3dadd(-32.15, 85.51, -10.5, 1)
    pt3dadd(-32.1, 85.67, -10.5, 1)
    pt3dadd(-31.99, 85.77, -10.5, 1)
    pt3dadd(-31.89, 85.88, -10.5, 1)
    pt3dadd(-31.15, 86.72, -11, 1)
    pt3dadd(-31.2, 86.77, -12, 1)
    pt3dadd(-31.25, 86.98, -12, 1)
    pt3dadd(-31.2, 87.14, -12, 1)
    pt3dadd(-31.2, 87.45, -12, 1)
    pt3dadd(-31.15, 87.61, -12, 1)
    pt3dadd(-31.15, 87.82, -12, 1)
    pt3dadd(-31.2, 88.24, -12, 1)
    pt3dadd(-31.2, 88.35, -12, 1)
    pt3dadd(-31.2, 89.29, -12, 1)
    pt3dadd(-31.25, 89.45, -12, 1)
    pt3dadd(-31.25, 89.66, -12, 1)
    pt3dadd(-31.36, 89.82, -12, 1)
    pt3dadd(-31.36, 90.03, -12, 1)
    pt3dadd(-31.46, 90.13, -12, 1)
    pt3dadd(-31.57, 90.29, -12.5, 1)
    pt3dadd(-31.73, 90.4, -12.5, 1)
    pt3dadd(-31.83, 90.55, -12.5, 1)
    pt3dadd(-31.94, 90.61, -12.5, 1)
    pt3dadd(-32.04, 90.76, -12.5, 1)
    pt3dadd(-32.15, 90.82, -12.5, 1)
    pt3dadd(-32.25, 90.97, -12.5, 1)
    pt3dadd(-32.36, 91.08, -12.5, 1)
    pt3dadd(-32.4, 91.24, -12.5, 1)
    pt3dadd(-32.46, 91.34, -12.5, 1)
    pt3dadd(-32.51, 91.45, -12.5, 1)
    pt3dadd(-32.51, 92.18, -12.5, 1)
    pt3dadd(-32.46, 92.39, -13, 1)
    pt3dadd(-32.4, 92.55, -13, 1)
    pt3dadd(-32.36, 92.66, -13, 1)
    pt3dadd(-32.29, 92.87, -13, 1)
    pt3dadd(-32.2, 93.02, -13, 1)
    pt3dadd(-32.09, 93.24, -13, 1)
    pt3dadd(-32.04, 93.39, -13, 1)
    pt3dadd(-32.04, 93.55, -13, 1)
    pt3dadd(-31.99, 93.66, -13, 1)
    pt3dadd(-31.99, 93.81, -13, 1)
    pt3dadd(-31.88, 93.92, -13, 1)
    pt3dadd(-31.88, 94.13, -13.5, 1)
    pt3dadd(-31.83, 94.39, -13.5, 1)
    pt3dadd(-31.78, 94.5, -13.5, 1)
    pt3dadd(-31.78, 94.76, -13.5, 1)
    pt3dadd(-31.73, 94.86, -13.5, 1)
    pt3dadd(-31.73, 95.07, -13.5, 1)
    pt3dadd(-31.67, 95.29, -13.5, 1)
    pt3dadd(-31.67, 95.71, -13.5, 1)
    pt3dadd(-31.73, 95.92, -13.5, 1)
    pt3dadd(-31.73, 96.07, -13.5, 1)
    pt3dadd(-31.78, 96.28, -13.5, 1)
    pt3dadd(-31.88, 96.44, -13.5, 1)
    pt3dadd(-31.88, 96.7, -13.5, 1)
    pt3dadd(-31.94, 96.91, -13.5, 1)
    pt3dadd(-31.99, 97.07, -13.5, 1)
    pt3dadd(-31.99, 97.39, -13.5, 1)
    pt3dadd(-32.04, 97.55, -13.5, 1)
    pt3dadd(-31.99, 97.65, -13.5, 1)
    pt3dadd(-32.13, 98.34, -13.5, 1)
    pt3dadd(-32.13, 98.5, -13.5, 1)
    pt3dadd(-32.13, 99.18, -14, 1)
    pt3dadd(-32.29, 99.34, -14, 1)
    pt3dadd(-32.39, 99.49, -14, 1)
    pt3dadd(-32.45, 99.55, -14.5, 1)
    pt3dadd(-32.6, 99.65, -14.5, 1)
    pt3dadd(-32.71, 99.76, -14.5, 1)
    pt3dadd(-32.81, 99.81, -14.5, 1)
    pt3dadd(-33.02, 99.86, -14.5, 1)
    pt3dadd(-33.13, 99.92, -14.5, 1)
    pt3dadd(-33.18, 99.97, -15, 1)
    pt3dadd(-33.22, 100.07, -15, 1)
    pt3dadd(-33.34, 100.13, -15, 1)
    pt3dadd(-33.44, 100.23, -15, 1)
    pt3dadd(-33.54, 100.34, -15, 1)
    pt3dadd(-33.6, 100.49, -15, 1)
    pt3dadd(-33.71, 100.76, -15, 1)
    pt3dadd(-33.81, 100.81, -15, 1)
    pt3dadd(-33.92, 100.91, -15, 1)
    pt3dadd(-34.02, 101.02, -15, 1)
    pt3dadd(-34.07, 101.18, -15, 1)
    pt3dadd(-34.18, 101.28, -15.5, 1)
    pt3dadd(-34.44, 101.54, -15.5, 1)
    pt3dadd(-34.54, 101.65, -15.5, 1)
    pt3dadd(-34.65, 101.76, -15.5, 1)
    pt3dadd(-34.7, 101.86, -15.5, 1)
    pt3dadd(-34.81, 101.97, -15.5, 1)
    pt3dadd(-34.86, 102.12, -15.5, 1)
    pt3dadd(-35.02, 102.33, -15.5, 1)
    pt3dadd(-34.97, 102.54, -16, 1)
    pt3dadd(-34.97, 102.86, -16, 1)
    pt3dadd(-35.02, 103.02, -16, 1)
    pt3dadd(-35.02, 103.38, -16, 1)
    pt3dadd(-34.97, 103.54, -16, 1)
    pt3dadd(-34.9, 103.75, -16, 1)
    pt3dadd(-34.81, 103.91, -16, 1)
    pt3dadd(-34.76, 104.12, -16, 1)
    pt3dadd(-34.6, 104.28, -16, 1)
    pt3dadd(-34.54, 104.44, -16, 1)
    pt3dadd(-34.44, 104.65, -16, 1)
    pt3dadd(-34.34, 105.01, -16.5, 1)
    pt3dadd(-34.28, 105.12, -16.5, 1)
    pt3dadd(-34.22, 105.28, -16.5, 1)
    pt3dadd(-34.22, 105.49, -16.5, 1)
    pt3dadd(-34.18, 105.7, -16.5, 1)
    pt3dadd(-34.18, 105.96, -17, 1)
    pt3dadd(-34.28, 106.07, -17, 1)
    pt3dadd(-34.39, 106.17, -17, 1)
    pt3dadd(-34.65, 106.33, -17, 1)
    pt3dadd(-34.7, 106.49, -17, 1)
    pt3dadd(-34.76, 106.59, -17, 1)
    pt3dadd(-34.86, 106.7, -17, 1)
    pt3dadd(-34.97, 106.8, -17, 1)
    pt3dadd(-34.97, 106.91, -17, 1)
    pt3dadd(-35.02, 107.01, -17, 1)
    pt3dadd(-35.11, 107.12, -17, 1)
    pt3dadd(-35.18, 107.27, -17.5, 1)
    pt3dadd(-35.28, 107.43, -17.5, 1)
    pt3dadd(-35.28, 107.64, -17.5, 1)
    pt3dadd(-35.33, 107.85, -17.5, 1)
    pt3dadd(-35.33, 108.33, -17.5, 1)
    pt3dadd(-35.28, 108.48, -17.5, 1)
    pt3dadd(-35.28, 108.69, -17.5, 1)
    pt3dadd(-35.22, 108.85, -17.5, 1)
    pt3dadd(-35.18, 109.01, -17.5, 1)
    pt3dadd(-35.18, 109.33, -17.5, 1)
    pt3dadd(-35.11, 109.54, -17.5, 1)
    pt3dadd(-35.07, 109.69, -17.5, 1)
    pt3dadd(-35.38, 110.71, -17.5, 1)
    pt3dadd(-35.43, 110.82, -17.5, 1)
    pt3dadd(-35.54, 110.92, -17.5, 1)
    pt3dadd(-35.64, 111.03, -17.5, 1)
    pt3dadd(-35.69, 111.18, -17.5, 1)
    pt3dadd(-35.69, 111.55, -17.5, 1)
    pt3dadd(-35.54, 111.76, -17.5, 1)
    pt3dadd(-35.47, 111.87, -17.5, 1)
    pt3dadd(-35.43, 111.97, -17.5, 1)
    pt3dadd(-35.33, 112.13, -17.5, 1)
    pt3dadd(-35.22, 112.24, -17.5, 1)
    pt3dadd(-35.11, 112.34, -18, 1)
    pt3dadd(-35.06, 112.45, -18, 1)
    pt3dadd(-35.01, 112.6, -18, 1)
    pt3dadd(-35.01, 112.87, -18, 1)
    pt3dadd(-34.9, 113.13, -18, 1)
    pt3dadd(-34.85, 113.29, -18, 1)
    pt3dadd(-34.79, 113.5, -18.5, 1)
    pt3dadd(-34.79, 113.71, -18.5, 1)
    pt3dadd(-34.7, 113.87, -18.5, 1)
    pt3dadd(-34.7, 114.29, -18.5, 1)
    pt3dadd(-34.64, 114.44, -18.5, 1)
    pt3dadd(-34.59, 114.6, -18.5, 1)
    pt3dadd(-34.59, 114.97, -18.5, 1)
    pt3dadd(-34.64, 115.07, -18.5, 1)
    pt3dadd(-34.64, 115.76, -19, 1)
    pt3dadd(-34.7, 115.92, -19.5, 1)
    pt3dadd(-34.75, 116.02, -19.5, 1)
    pt3dadd(-34.79, 116.13, -19.5, 1)
    pt3dadd(-34.85, 116.23, -19.5, 1)
    pt3dadd(-34.9, 116.34, -20, 1)
    pt3dadd(-35.01, 116.39, -20, 1)
    pt3dadd(-35.11, 116.49, -20, 1)
    pt3dadd(-35.22, 116.55, -20, 1)
    pt3dadd(-35.38, 116.6, -20.5, 1)
    pt3dadd(-35.54, 116.6, -20.5, 1)
    pt3dadd(-35.59, 116.7, -20.5, 1)
    pt3dadd(-35.75, 116.76, -20.5, 1)
    pt3dadd(-36.22, 116.76, -21, 1)
    pt3dadd(-36.32, 116.81, -21, 1)
    pt3dadd(-36.47, 116.86, -21, 1)
    pt3dadd(-36.64, 116.91, -21, 1)
    pt3dadd(-36.79, 117.02, -21, 1)
    pt3dadd(-36.95, 117.07, -21, 1)
    pt3dadd(-37.06, 117.18, -21, 1)
    pt3dadd(-37.15, 117.23, -21, 1)
    pt3dadd(-37.22, 117.34, -21.5, 1)
    pt3dadd(-37.43, 117.44, -21.5, 1)
    pt3dadd(-37.53, 117.65, -21.5, 1)
    pt3dadd(-37.64, 117.76, -21.5, 1)
    pt3dadd(-37.74, 117.97, -21.5, 1)
    pt3dadd(-37.85, 118.07, -21.5, 1)
    pt3dadd(-37.95, 118.23, -21.5, 1)
    pt3dadd(-38, 118.33, -21.5, 1)
    pt3dadd(-38.11, 118.49, -21.5, 1)
    pt3dadd(-38.21, 118.6, -21.5, 1)
    pt3dadd(-38.27, 118.7, -21.5, 1)
    pt3dadd(-38.36, 118.86, -21.5, 1)
    pt3dadd(-38.47, 118.96, -21.5, 1)
    pt3dadd(-38.53, 119.07, -21.5, 1)
    pt3dadd(-38.63, 119.23, -21.5, 1)
    pt3dadd(-38.63, 119.44, -21.5, 1)
    pt3dadd(-38.79, 119.54, -21.5, 1)
    pt3dadd(-38.79, 119.81, -21.5, 1)
    pt3dadd(-38.84, 120.02, -21.5, 1)
    pt3dadd(-38.95, 120.12, -21.5, 1)
    pt3dadd(-38.95, 120.23, -21.5, 1)
    pt3dadd(-39, 120.33, -21.5, 1)
    pt3dadd(-39.04, 120.49, -21.5, 1)
    pt3dadd(-39.04, 120.96, -21.5, 1)
    pt3dadd(-39.11, 121.07, -21.5, 1)
    pt3dadd(-39.11, 121.23, -21.5, 1)
    pt3dadd(-39.15, 121.33, -21.5, 1)
    pt3dadd(-39.15, 121.7, -21.5, 1)
    pt3dadd(-39.21, 121.8, -21.5, 1)
    pt3dadd(-39.21, 122.07, -21.5, 1)
    pt3dadd(-38.77, 122.73, -22.5, 1)
    pt3dadd(-38.77, 122.89, -22.5, 1)
    pt3dadd(-38.67, 123, -22.5, 1)
    pt3dadd(-38.56, 123.15, -22.5, 1)
    pt3dadd(-38.46, 123.26, -22.5, 1)
    pt3dadd(-38.35, 123.36, -22.5, 1)
    pt3dadd(-38.2, 123.52, -22.5, 1)
    pt3dadd(-37.99, 123.73, -22.5, 1)
    pt3dadd(-38.04, 123.89, -22.5, 1)
    pt3dadd(-38.09, 124.05, -23, 1)
    pt3dadd(-38.14, 124.15, -23, 1)
    pt3dadd(-38.14, 124.31, -23, 1)
    pt3dadd(-38.35, 124.36, -23, 1)
    pt3dadd(-38.29, 124.57, -23, 1)
    pt3dadd(-38.4, 124.68, -23, 1)
    pt3dadd(-38.51, 124.78, -23, 1)
    pt3dadd(-38.67, 125.1, -23, 1)
  }
}
proc shape3d_41() {
  dend[36] {
    pt3dadd(-38.93, 125.26, -23, 1)
    pt3dadd(-39.04, 125.41, -23, 1)
    pt3dadd(-39.14, 125.52, -23, 1)
    pt3dadd(-39.19, 125.62, -23, 1)
    pt3dadd(-39.19, 125.83, -23, 1)
    pt3dadd(-39.25, 125.94, -23, 1)
    pt3dadd(-39.35, 126.04, -23, 1)
    pt3dadd(-39.4, 126.2, -23, 1)
    pt3dadd(-39.4, 126.31, -23, 1)
    pt3dadd(-39.46, 126.41, -23.5, 1)
    pt3dadd(-39.51, 126.52, -23.5, 1)
    pt3dadd(-39.56, 126.68, -23.5, 1)
    pt3dadd(-39.61, 126.89, -23.5, 1)
    pt3dadd(-39.61, 127.62, -23.5, 1)
    pt3dadd(-39.56, 127.78, -23.5, 1)
    pt3dadd(-39.51, 127.99, -24, 1)
    pt3dadd(-39.46, 128.19, -24, 1)
    pt3dadd(-39.46, 128.31, -24, 1)
  }
  dend[37] {pt3dclear()
    pt3dadd(-39.46, 128.31, -24, 1)
    pt3dadd(-39.88, 128.66, -23, 0.47)
    pt3dadd(-40.03, 128.66, -23, 0.47)
    pt3dadd(-40.14, 128.66, -23.5, 0.47)
    pt3dadd(-40.29, 128.88, -23.5, 0.47)
    pt3dadd(-40.4, 128.99, -23.5, 0.47)
    pt3dadd(-40.56, 129.04, -23.5, 0.47)
    pt3dadd(-40.65, 129.15, -23.5, 0.47)
    pt3dadd(-40.77, 129.25, -23.5, 0.47)
    pt3dadd(-40.82, 129.41, -23.5, 0.47)
    pt3dadd(-40.86, 129.62, -24, 0.47)
    pt3dadd(-40.93, 129.78, -24, 0.47)
    pt3dadd(-40.98, 129.99, -24, 0.47)
    pt3dadd(-41.03, 130.09, -24, 0.47)
    pt3dadd(-41.14, 130.15, -24, 0.47)
  }
  dend[38] {pt3dclear()
    pt3dadd(-39.46, 128.31, -24, 1)
    pt3dadd(-38.97, 128.62, -24.5, 0.47)
    pt3dadd(-38.88, 128.66, -25.5, 0.47)
    pt3dadd(-38.83, 128.78, -25.5, 0.47)
    pt3dadd(-38.72, 128.88, -25.5, 0.47)
    pt3dadd(-38.56, 129.04, -25.5, 0.47)
    pt3dadd(-38.61, 129.19, -25.5, 0.47)
    pt3dadd(-38.51, 129.3, -25.5, 0.47)
    pt3dadd(-38.4, 129.41, -26, 0.47)
    pt3dadd(-38.25, 129.46, -26, 0.47)
    pt3dadd(-38.04, 129.41, -26, 0.47)
    pt3dadd(-37.67, 129.41, -26, 0.47)
    pt3dadd(-37.51, 129.36, -25.5, 0.47)
    pt3dadd(-37.29, 129.41, -25.5, 0.47)
    pt3dadd(-37.25, 129.51, -24.5, 0.47)
    pt3dadd(-37.04, 129.51, -24.5, 0.47)
    pt3dadd(-36.88, 129.62, -23.5, 0.47)
    pt3dadd(-36.67, 129.72, -23.5, 0.47)
    pt3dadd(-36.52, 129.78, -23.5, 0.47)
  }
  dend[39] {pt3dclear()
    pt3dadd(-6.38, 30.41, 4.5, 1)
    pt3dadd(-5.65, 30.75, 6.5, 0.89)
    pt3dadd(-5.6, 30.96, 6.5, 0.89)
    pt3dadd(-5.5, 31.22, 6.5, 0.89)
    pt3dadd(-5.39, 31.43, 6.5, 0.89)
    pt3dadd(-5.34, 31.64, 6.5, 0.89)
    pt3dadd(-5.34, 31.8, 6.5, 0.89)
    pt3dadd(-5.23, 31.9, 6.5, 0.89)
    pt3dadd(-5.23, 32.11, 6.5, 0.89)
    pt3dadd(-5.18, 32.27, 6.5, 0.89)
    pt3dadd(-5.08, 32.47, 6.5, 0.89)
    pt3dadd(-5.01, 32.64, 6.5, 0.89)
    pt3dadd(-4.97, 32.74, 6.5, 0.89)
    pt3dadd(-4.92, 32.95, 6.5, 0.89)
    pt3dadd(-4.76, 33.22, 6.5, 0.89)
    pt3dadd(-4.66, 33.32, 6.5, 0.89)
    pt3dadd(-4.55, 33.47, 6.5, 0.89)
    pt3dadd(-4.5, 33.59, 6.5, 0.89)
    pt3dadd(-4.45, 33.74, 6.5, 0.89)
    pt3dadd(-4.34, 33.9, 6.5, 0.89)
    pt3dadd(-4.18, 34.11, 6.5, 0.89)
    pt3dadd(-4.08, 34.32, 6.5, 0.89)
    pt3dadd(-4.03, 34.47, 6.5, 0.89)
    pt3dadd(-3.92, 34.58, 6.5, 0.89)
    pt3dadd(-3.87, 34.74, 6.5, 0.89)
    pt3dadd(-3.82, 34.9, 6.5, 0.89)
    pt3dadd(-3.71, 35, 6.5, 0.89)
    pt3dadd(-3.55, 35.11, 6.5, 0.89)
    pt3dadd(-3.55, 35.27, 6.5, 0.89)
    pt3dadd(-3.45, 35.36, 6.5, 0.89)
    pt3dadd(-3.4, 35.58, 6.5, 0.89)
    pt3dadd(-3.29, 35.79, 6.5, 0.89)
    pt3dadd(-3.24, 35.95, 6.5, 0.89)
    pt3dadd(-3.24, 36.15, 6.5, 0.89)
    pt3dadd(-3.13, 36.36, 6.5, 0.89)
    pt3dadd(-3.13, 36.53, 6.5, 0.89)
    pt3dadd(-3.08, 36.74, 6.5, 0.89)
    pt3dadd(-3.03, 36.95, 6.5, 0.89)
    pt3dadd(-2.98, 37.11, 6.5, 0.89)
    pt3dadd(-2.87, 37.15, 6.5, 0.89)
    pt3dadd(-2.82, 37.32, 6.5, 0.89)
    pt3dadd(-2.77, 37.42, 6.5, 0.89)
    pt3dadd(-2.5, 37.95, 6.5, 0.89)
    pt3dadd(-2.45, 38.04, 6.5, 0.89)
    pt3dadd(-2.4, 38.26, 6.5, 0.89)
    pt3dadd(-2.35, 38.36, 6.5, 0.89)
    pt3dadd(-2.29, 38.53, 6.5, 0.89)
    pt3dadd(-2.19, 38.63, 6.5, 0.89)
    pt3dadd(-2.19, 38.79, 6.5, 0.89)
    pt3dadd(-2.14, 39, 6.5, 0.89)
    pt3dadd(-2.02, 39.11, 6.5, 0.89)
    pt3dadd(-1.98, 39.26, 6.5, 0.89)
    pt3dadd(-1.98, 39.42, 6.5, 0.89)
    pt3dadd(-1.93, 39.58, 6.5, 0.89)
    pt3dadd(-1.93, 39.84, 6.5, 0.89)
    pt3dadd(-1.77, 40, 6.5, 0.89)
    pt3dadd(-1.72, 40.21, 6.5, 0.89)
    pt3dadd(-1.61, 40.36, 6.5, 0.89)
    pt3dadd(-1.61, 40.52, 6.5, 0.89)
    pt3dadd(-1.45, 40.58, 6.5, 0.89)
    pt3dadd(-1.35, 40.72, 6.5, 0.89)
    pt3dadd(-1.3, 40.84, 6.5, 0.89)
    pt3dadd(-1.19, 40.95, 6.5, 0.89)
    pt3dadd(-1.09, 41.1, 6.5, 0.89)
    pt3dadd(-1.03, 41.21, 6.5, 0.89)
    pt3dadd(-0.98, 41.31, 6.5, 0.89)
    pt3dadd(-0.98, 41.58, 6.5, 0.89)
    pt3dadd(-0.93, 41.68, 6.5, 0.89)
    pt3dadd(-0.93, 42.73, 6.5, 0.89)
    pt3dadd(-0.41, 43.65, 8, 0.89)
    pt3dadd(-0.41, 44.17, 8, 0.89)
    pt3dadd(-0.35, 44.28, 8, 0.89)
    pt3dadd(-0.35, 44.43, 8.5, 0.89)
    pt3dadd(-0.41, 44.54, 8.5, 0.89)
    pt3dadd(-0.41, 44.8, 8.5, 0.89)
    pt3dadd(-0.35, 44.96, 8.5, 0.89)
    pt3dadd(-0.35, 45.96, 8.5, 0.89)
    pt3dadd(-0.41, 46.17, 8.5, 0.89)
    pt3dadd(-0.41, 46.8, 9, 0.89)
    pt3dadd(-0.35, 46.96, 9, 0.89)
    pt3dadd(-0.3, 47.06, 9, 0.89)
    pt3dadd(-0.25, 47.22, 9, 0.89)
    pt3dadd(-0.25, 47.59, 9, 0.89)
    pt3dadd(-0.2, 47.8, 9, 0.89)
    pt3dadd(-0.2, 48.01, 9, 0.89)
    pt3dadd(-0.14, 48.11, 9, 0.89)
    pt3dadd(-0.09, 48.27, 9, 0.89)
    pt3dadd(-0.04, 48.48, 9, 0.89)
    pt3dadd(-0.04, 48.64, 9, 0.89)
    pt3dadd(0.01, 48.85, 9, 0.89)
    pt3dadd(0.07, 49.06, 9, 0.89)
    pt3dadd(0.12, 49.32, 9, 0.89)
    pt3dadd(0.17, 49.48, 9, 0.89)
    pt3dadd(0.22, 49.69, 9, 0.89)
    pt3dadd(0.28, 49.8, 9, 0.89)
    pt3dadd(0.28, 50.06, 9, 0.89)
    pt3dadd(0.33, 50.16, 9, 0.89)
    pt3dadd(0.43, 50.43, 9, 0.89)
    pt3dadd(0.49, 50.58, 9, 0.89)
    pt3dadd(0.54, 50.74, 9, 0.89)
    pt3dadd(0.54, 50.95, 9, 0.89)
    pt3dadd(0.59, 51.11, 9, 0.89)
    pt3dadd(0.64, 51.32, 9, 0.89)
    pt3dadd(0.7, 51.53, 9, 0.89)
    pt3dadd(0.75, 51.69, 9, 0.89)
    pt3dadd(0.8, 51.85, 9, 0.89)
    pt3dadd(0.8, 52, 9, 0.89)
    pt3dadd(0.91, 52.21, 9, 0.89)
    pt3dadd(0.96, 52.37, 9, 0.89)
    pt3dadd(1.06, 52.53, 9, 0.89)
    pt3dadd(1.17, 52.63, 9, 0.89)
    pt3dadd(1.17, 52.79, 9, 0.89)
    pt3dadd(1.27, 52.95, 9, 0.89)
    pt3dadd(1.43, 53.11, 9, 0.89)
    pt3dadd(1.48, 53.27, 9, 0.89)
    pt3dadd(1.59, 53.37, 9, 0.89)
    pt3dadd(1.69, 53.53, 9, 0.89)
    pt3dadd(1.8, 53.58, 9, 0.89)
    pt3dadd(2, 53.79, 9, 0.89)
    pt3dadd(2.22, 53.9, 9, 0.89)
    pt3dadd(2.38, 54, 9, 0.89)
    pt3dadd(2.48, 54.05, 9, 0.89)
    pt3dadd(2.52, 54.21, 9, 0.89)
    pt3dadd(3.41, 54.75, 10, 0.89)
    pt3dadd(3.52, 54.85, 10.5, 0.89)
    pt3dadd(3.62, 55.01, 10.5, 0.89)
    pt3dadd(3.83, 55.22, 10.5, 0.89)
    pt3dadd(3.99, 55.27, 10.5, 0.89)
    pt3dadd(4.2, 55.48, 10.5, 0.89)
    pt3dadd(4.36, 55.59, 10.5, 0.89)
    pt3dadd(4.51, 55.85, 10.5, 0.89)
    pt3dadd(4.67, 55.96, 10.5, 0.89)
    pt3dadd(4.83, 56.11, 10.5, 0.89)
    pt3dadd(4.94, 56.32, 10.5, 0.89)
    pt3dadd(5.04, 56.43, 10.5, 0.89)
    pt3dadd(5.15, 56.59, 11, 0.89)
    pt3dadd(5.25, 56.74, 11, 0.89)
    pt3dadd(5.36, 56.85, 11, 0.89)
    pt3dadd(5.46, 56.95, 11, 0.89)
    pt3dadd(5.57, 57.11, 11, 0.89)
    pt3dadd(5.67, 57.22, 11, 0.89)
    pt3dadd(5.78, 57.43, 11, 0.89)
    pt3dadd(5.88, 57.64, 11, 0.89)
    pt3dadd(6.04, 57.85, 11, 0.89)
    pt3dadd(6.14, 57.95, 11, 0.89)
    pt3dadd(6.3, 58.22, 11, 0.89)
    pt3dadd(6.41, 58.37, 11, 0.89)
    pt3dadd(6.51, 58.53, 11, 0.89)
    pt3dadd(6.67, 58.74, 11, 0.89)
    pt3dadd(6.77, 58.95, 11, 0.89)
    pt3dadd(6.88, 59.11, 11, 0.89)
    pt3dadd(7.04, 59.27, 11, 0.89)
    pt3dadd(7.09, 59.48, 11, 0.89)
    pt3dadd(7.14, 59.58, 11, 0.89)
    pt3dadd(7.25, 59.85, 11, 0.89)
    pt3dadd(7.35, 60.06, 11, 0.89)
    pt3dadd(7.4, 60.16, 11, 0.89)
    pt3dadd(7.4, 60.37, 11, 0.89)
    pt3dadd(7.46, 60.53, 11, 0.89)
    pt3dadd(7.46, 61, 11, 0.89)
    pt3dadd(7.51, 61.16, 11, 0.89)
    pt3dadd(7.51, 61.84, 11, 0.89)
    pt3dadd(7.4, 63, 11, 0.89)
    pt3dadd(7.4, 63.53, 11, 0.89)
    pt3dadd(7.35, 63.68, 11, 0.89)
    pt3dadd(7.35, 63.89, 11, 0.89)
    pt3dadd(7.4, 64.05, 11, 0.89)
    pt3dadd(7.4, 64.84, 11, 0.89)
    pt3dadd(7.35, 65, 11, 0.89)
    pt3dadd(7.35, 65.2, 11, 0.89)
    pt3dadd(7.3, 65.37, 11, 0.89)
    pt3dadd(7.3, 65.63, 11, 0.89)
    pt3dadd(7.25, 65.73, 11, 0.89)
    pt3dadd(7.19, 65.94, 11, 0.89)
    pt3dadd(7.19, 66.2, 11, 0.89)
    pt3dadd(7.06, 67.31, 12.5, 0.89)
    pt3dadd(7.01, 67.48, 12.5, 0.89)
    pt3dadd(6.96, 67.64, 12.5, 0.89)
    pt3dadd(6.85, 67.79, 12.5, 0.89)
    pt3dadd(6.75, 67.95, 13, 0.89)
    pt3dadd(6.7, 68.06, 13, 0.89)
    pt3dadd(6.64, 68.27, 13, 0.89)
    pt3dadd(6.59, 68.48, 13, 0.89)
    pt3dadd(6.59, 68.9, 13, 0.89)
    pt3dadd(6.54, 69.11, 13, 0.89)
    pt3dadd(6.54, 70.11, 13.5, 0.89)
    pt3dadd(6.59, 70.31, 13.5, 0.89)
    pt3dadd(6.64, 70.47, 13.5, 0.89)
    pt3dadd(6.75, 70.68, 13.5, 0.89)
    pt3dadd(6.75, 70.95, 13.5, 0.89)
    pt3dadd(6.85, 71.2, 13.5, 0.89)
    pt3dadd(6.85, 71.42, 13.5, 0.89)
    pt3dadd(6.91, 71.58, 13.5, 0.89)
    pt3dadd(6.96, 71.73, 13.5, 0.89)
    pt3dadd(6.96, 71.95, 13.5, 0.89)
    pt3dadd(7.01, 72.09, 13.5, 0.89)
    pt3dadd(7.12, 72.2, 13.5, 0.89)
  }
}
proc shape3d_42() {
  dend[39] {
    pt3dadd(7.12, 72.31, 13.5, 0.89)
    pt3dadd(7.22, 72.42, 13.5, 0.89)
    pt3dadd(7.27, 72.58, 13.5, 0.89)
    pt3dadd(7.38, 72.79, 13.5, 0.89)
    pt3dadd(7.43, 72.94, 13.5, 0.89)
    pt3dadd(7.59, 73.09, 13.5, 0.89)
    pt3dadd(7.64, 73.26, 13.5, 0.89)
    pt3dadd(7.69, 73.42, 13.5, 0.89)
    pt3dadd(7.8, 73.63, 13.5, 0.89)
    pt3dadd(7.9, 73.84, 13.5, 0.89)
    pt3dadd(8.01, 74, 13.5, 0.89)
    pt3dadd(8.06, 74.2, 13.5, 0.89)
    pt3dadd(8.11, 74.36, 13.5, 0.89)
    pt3dadd(8.22, 74.47, 13.5, 0.89)
    pt3dadd(8.22, 74.63, 13.5, 0.89)
    pt3dadd(8.27, 74.73, 13.5, 0.89)
    pt3dadd(8.32, 74.94, 13.5, 0.89)
    pt3dadd(8.38, 75.09, 13.5, 0.89)
    pt3dadd(8.48, 75.2, 13.5, 0.89)
    pt3dadd(8.52, 75.36, 13.5, 0.89)
    pt3dadd(8.69, 75.68, 13.5, 0.89)
    pt3dadd(8.8, 75.73, 13.5, 0.89)
    pt3dadd(8.9, 75.84, 13.5, 0.89)
    pt3dadd(9.01, 75.94, 13.5, 0.89)
    pt3dadd(9.06, 76.09, 13.5, 0.89)
    pt3dadd(9.16, 76.2, 13.5, 0.89)
    pt3dadd(9.22, 76.31, 13.5, 0.89)
    pt3dadd(9.36, 76.41, 13.5, 0.89)
    pt3dadd(9.43, 76.56, 13.5, 0.89)
    pt3dadd(9.48, 76.68, 13.5, 0.89)
    pt3dadd(9.58, 76.78, 13.5, 0.89)
    pt3dadd(9.85, 77.05, 13.5, 0.89)
    pt3dadd(10.06, 77.2, 13.5, 0.89)
    pt3dadd(10.16, 77.36, 13.5, 0.89)
    pt3dadd(10.27, 77.47, 13.5, 0.89)
    pt3dadd(10.37, 77.62, 13.5, 0.89)
    pt3dadd(10.37, 77.73, 13.5, 0.89)
    pt3dadd(10.48, 77.83, 13.5, 0.89)
    pt3dadd(10.53, 77.94, 13.5, 0.89)
    pt3dadd(10.63, 78.04, 13.5, 0.89)
    pt3dadd(10.69, 78.15, 13.5, 0.89)
    pt3dadd(10.7, 79.13, 15, 0.89)
    pt3dadd(10.7, 79.34, 15, 0.89)
    pt3dadd(10.75, 79.55, 15.5, 0.89)
    pt3dadd(10.75, 79.7, 15.5, 0.89)
    pt3dadd(10.65, 79.81, 15.5, 0.89)
    pt3dadd(10.6, 79.97, 15.5, 0.89)
    pt3dadd(10.54, 80.18, 15.5, 0.89)
    pt3dadd(10.54, 80.34, 15.5, 0.89)
    pt3dadd(10.49, 80.55, 15.5, 0.89)
    pt3dadd(10.44, 80.65, 15.5, 0.89)
    pt3dadd(10.39, 80.76, 15.5, 0.89)
    pt3dadd(10.33, 80.86, 15.5, 0.89)
    pt3dadd(10.28, 80.97, 15.5, 0.89)
    pt3dadd(10.18, 81.13, 16, 0.89)
    pt3dadd(10.11, 81.23, 16, 0.89)
    pt3dadd(10.02, 81.39, 16, 0.89)
    pt3dadd(9.97, 81.5, 16, 0.89)
    pt3dadd(9.91, 81.59, 16, 0.89)
    pt3dadd(9.81, 81.7, 16, 0.89)
    pt3dadd(9.81, 82.49, 16.5, 0.89)
    pt3dadd(9.86, 82.65, 16.5, 0.89)
    pt3dadd(9.91, 82.86, 16.5, 0.89)
    pt3dadd(10.02, 82.97, 16.5, 0.89)
    pt3dadd(10.02, 83.13, 16.5, 0.89)
    pt3dadd(10.18, 83.44, 16.5, 0.89)
    pt3dadd(10.23, 83.6, 16.5, 0.89)
    pt3dadd(10.33, 83.91, 16.5, 0.89)
    pt3dadd(10.44, 84.02, 16.5, 0.89)
    pt3dadd(10.49, 84.18, 17, 0.89)
    pt3dadd(10.6, 84.28, 17, 0.89)
    pt3dadd(10.75, 84.44, 17, 0.89)
    pt3dadd(10.96, 84.54, 17, 0.89)
    pt3dadd(11.12, 84.6, 17, 0.89)
    pt3dadd(11.23, 84.7, 17, 0.89)
    pt3dadd(11.38, 84.75, 17, 0.89)
    pt3dadd(11.54, 84.86, 17, 0.89)
    pt3dadd(11.7, 85.02, 17, 0.89)
    pt3dadd(11.86, 85.12, 17, 0.89)
    pt3dadd(11.96, 85.28, 17.5, 0.89)
    pt3dadd(12.07, 85.39, 17.5, 0.89)
    pt3dadd(12.17, 85.6, 17.5, 0.89)
    pt3dadd(12.17, 86.07, 17.5, 0.89)
    pt3dadd(12.01, 86.12, 18, 0.89)
    pt3dadd(11.91, 86.23, 18, 0.89)
    pt3dadd(11.8, 86.28, 18, 0.89)
    pt3dadd(11.65, 86.38, 18.5, 0.89)
    pt3dadd(11.54, 86.49, 18.5, 0.89)
    pt3dadd(11.49, 86.65, 18.5, 0.89)
    pt3dadd(11.38, 86.7, 18.5, 0.89)
    pt3dadd(11.23, 86.86, 18.5, 0.89)
    pt3dadd(11.12, 86.91, 18.5, 0.89)
    pt3dadd(11.02, 86.96, 18.5, 0.89)
    pt3dadd(10.96, 87.07, 19, 0.89)
    pt3dadd(10.86, 87.23, 19, 0.89)
    pt3dadd(10.81, 87.33, 19, 0.89)
    pt3dadd(10.75, 87.44, 19, 0.89)
    pt3dadd(10.75, 87.65, 19, 0.89)
    pt3dadd(10.7, 87.75, 19, 0.89)
    pt3dadd(10.7, 88.07, 19, 0.89)
    pt3dadd(10.75, 88.22, 19, 0.89)
    pt3dadd(10.81, 88.38, 19.5, 0.89)
    pt3dadd(10.91, 88.43, 19.5, 0.89)
    pt3dadd(11.02, 88.43, 19.5, 0.89)
    pt3dadd(11.07, 88.33, 19.5, 0.89)
    pt3dadd(11.17, 88.38, 19.5, 0.89)
    pt3dadd(11.28, 88.43, 19.5, 0.89)
    pt3dadd(11.38, 88.49, 19.5, 0.89)
    pt3dadd(11.54, 88.59, 19.5, 0.89)
    pt3dadd(11.65, 88.65, 19.5, 0.89)
    pt3dadd(11.7, 88.75, 19.5, 0.89)
    pt3dadd(11.86, 88.91, 19.5, 0.89)
    pt3dadd(11.96, 89.12, 19.5, 0.89)
    pt3dadd(12.01, 89.28, 19.5, 0.89)
    pt3dadd(12.07, 89.49, 19.5, 0.89)
    pt3dadd(12.07, 90.12, 19.5, 0.89)
    pt3dadd(12.01, 90.27, 19.5, 0.89)
    pt3dadd(11.97, 91.64, 20.5, 0.89)
    pt3dadd(11.97, 92.43, 20.5, 0.89)
    pt3dadd(12.03, 92.59, 20.5, 0.89)
    pt3dadd(12.08, 92.8, 20.5, 0.89)
    pt3dadd(12.08, 92.95, 20.5, 0.89)
    pt3dadd(12.13, 93.16, 20.5, 0.89)
    pt3dadd(12.18, 93.43, 20.5, 0.89)
    pt3dadd(12.24, 93.53, 20.5, 0.89)
    pt3dadd(12.34, 93.69, 20.5, 0.89)
    pt3dadd(12.34, 93.85, 20.5, 0.89)
    pt3dadd(12.45, 94.11, 20.5, 0.89)
    pt3dadd(12.5, 94.22, 20.5, 0.89)
    pt3dadd(12.55, 94.37, 20.5, 0.89)
    pt3dadd(12.66, 94.58, 20.5, 0.89)
    pt3dadd(12.71, 94.74, 20.5, 0.89)
    pt3dadd(12.81, 94.95, 20.5, 0.89)
    pt3dadd(12.92, 95.11, 20.5, 0.89)
    pt3dadd(12.92, 95.22, 20.5, 0.89)
    pt3dadd(12.97, 95.32, 20.5, 0.89)
    pt3dadd(13.08, 95.53, 20.5, 0.89)
    pt3dadd(13.13, 95.69, 20.5, 0.89)
    pt3dadd(13.23, 95.79, 20.5, 0.89)
    pt3dadd(13.34, 96.06, 20.5, 0.89)
    pt3dadd(13.5, 96.16, 20.5, 0.89)
    pt3dadd(13.5, 96.58, 20.5, 0.89)
    pt3dadd(13.6, 96.79, 20.5, 0.89)
    pt3dadd(13.71, 96.95, 20.5, 0.89)
    pt3dadd(13.86, 97.27, 20.5, 0.89)
    pt3dadd(13.86, 97.37, 20.5, 0.89)
    pt3dadd(13.97, 97.48, 20.5, 0.89)
    pt3dadd(14.02, 97.63, 20.5, 0.89)
    pt3dadd(14.07, 97.79, 20.5, 0.89)
    pt3dadd(14.18, 98, 20.5, 0.89)
    pt3dadd(14.23, 98.16, 20.5, 0.89)
    pt3dadd(14.28, 98.32, 20.5, 0.89)
    pt3dadd(14.34, 98.47, 20.5, 0.89)
    pt3dadd(14.39, 98.68, 20.5, 0.89)
    pt3dadd(14.44, 98.84, 20.5, 0.89)
    pt3dadd(14.44, 99.16, 20.5, 0.89)
    pt3dadd(14.49, 100.26, 20.5, 0.89)
    pt3dadd(14.44, 100.47, 20.5, 0.89)
    pt3dadd(14.44, 100.73, 20.5, 0.89)
    pt3dadd(14.39, 100.89, 20.5, 0.89)
    pt3dadd(14.39, 101.16, 20.5, 0.89)
    pt3dadd(14.34, 101.31, 20.5, 0.89)
    pt3dadd(14.34, 101.42, 20.5, 0.89)
    pt3dadd(14.39, 101.58, 20.5, 0.89)
    pt3dadd(14.39, 102, 20.5, 0.89)
    pt3dadd(14.34, 102.1, 20.5, 0.89)
    pt3dadd(14.34, 102.47, 20.5, 0.89)
    pt3dadd(14.28, 102.68, 20.5, 0.89)
    pt3dadd(14.28, 102.84, 20.5, 0.89)
    pt3dadd(14.3, 103.53, 22, 0.89)
    pt3dadd(14.3, 104.27, 22.5, 0.89)
    pt3dadd(14.35, 104.48, 22.5, 0.89)
    pt3dadd(14.4, 104.63, 22.5, 0.89)
    pt3dadd(14.51, 104.84, 22.5, 0.89)
    pt3dadd(14.56, 105, 22.5, 0.89)
    pt3dadd(14.66, 105.21, 22.5, 0.89)
    pt3dadd(14.66, 105.42, 22.5, 0.89)
    pt3dadd(14.77, 105.42, 22.5, 0.89)
  }
  dend[40] {pt3dclear()
    pt3dadd(-8.73, 9.42, 5, 1.05)
    pt3dadd(-9.55, 9.43, 5, 0.89)
    pt3dadd(-9.69, 9.58, 5, 0.89)
    pt3dadd(-9.81, 9.64, 5, 0.89)
    pt3dadd(-9.97, 9.69, 5, 0.89)
    pt3dadd(-10.18, 9.69, 5, 0.89)
    pt3dadd(-10.28, 9.9, 5, 0.89)
    pt3dadd(-10.49, 9.9, 5, 0.89)
    pt3dadd(-10.6, 9.94, 5, 0.89)
    pt3dadd(-10.86, 10.06, 5, 0.89)
    pt3dadd(-11.02, 10.11, 5, 0.89)
    pt3dadd(-11.23, 10.21, 5, 0.89)
    pt3dadd(-11.38, 10.27, 5, 0.89)
    pt3dadd(-11.54, 10.27, 5, 0.89)
    pt3dadd(-11.65, 10.37, 5, 0.89)
    pt3dadd(-11.8, 10.42, 4.5, 0.89)
    pt3dadd(-12.07, 10.42, 4.5, 0.89)
    pt3dadd(-12.17, 10.48, 4.5, 0.89)
    pt3dadd(-12.64, 10.48, 4.5, 0.89)
    pt3dadd(-12.85, 10.53, 4.5, 0.89)
    pt3dadd(-12.96, 10.58, 4.5, 0.89)
    pt3dadd(-13.12, 10.69, 4.5, 0.89)
    pt3dadd(-13.27, 10.79, 4.5, 0.89)
    pt3dadd(-13.43, 10.95, 4.5, 0.89)
    pt3dadd(-13.54, 11.06, 5, 0.89)
    pt3dadd(-13.75, 11.16, 5, 0.89)
    pt3dadd(-13.8, 11.32, 5, 0.89)
    pt3dadd(-14.17, 11.69, 5, 0.89)
    pt3dadd(-14.32, 11.84, 5, 0.89)
    pt3dadd(-14.53, 12.11, 5, 0.89)
    pt3dadd(-14.69, 12.16, 5, 0.89)
    pt3dadd(-14.8, 12.26, 5, 0.89)
    pt3dadd(-14.95, 12.37, 5, 0.89)
    pt3dadd(-15.11, 12.48, 5, 0.89)
    pt3dadd(-15.22, 12.58, 5, 0.89)
    pt3dadd(-15.37, 12.58, 5.5, 0.89)
    pt3dadd(-15.43, 12.74, 5.5, 0.89)
    pt3dadd(-15.58, 12.74, 5.5, 0.89)
    pt3dadd(-15.74, 12.9, 5.5, 0.89)
    pt3dadd(-15.85, 13.05, 5.5, 0.89)
    pt3dadd(-15.9, 13.16, 5.5, 0.89)
    pt3dadd(-15.95, 13.26, 5.5, 0.89)
    pt3dadd(-16.05, 13.37, 5.5, 0.89)
    pt3dadd(-16.16, 13.47, 5.5, 0.89)
    pt3dadd(-16.21, 13.63, 5.5, 0.89)
    pt3dadd(-16.27, 13.74, 5.5, 0.89)
    pt3dadd(-16.37, 13.84, 5.5, 0.89)
    pt3dadd(-16.42, 14, 5.5, 0.89)
    pt3dadd(-16.53, 14.1, 5.5, 0.89)
    pt3dadd(-16.63, 14.16, 6, 0.89)
    pt3dadd(-16.69, 14.26, 6, 0.89)
    pt3dadd(-16.84, 14.47, 6, 0.89)
    pt3dadd(-16.89, 14.58, 6, 0.89)
    pt3dadd(-17, 14.68, 6, 0.89)
    pt3dadd(-17.16, 14.79, 6, 0.89)
    pt3dadd(-17.26, 14.89, 6, 0.89)
    pt3dadd(-17.37, 15, 6, 0.89)
    pt3dadd(-17.53, 15.16, 6, 0.89)
    pt3dadd(-17.68, 15.26, 6, 0.89)
    pt3dadd(-17.79, 15.21, 6, 0.89)
    pt3dadd(-18, 15.21, 6, 0.89)
    pt3dadd(-18.16, 15.26, 6, 0.89)
    pt3dadd(-18.68, 15.26, 6, 0.89)
    pt3dadd(-18.84, 15.21, 6, 0.89)
    pt3dadd(-19.1, 15.31, 6, 0.89)
    pt3dadd(-19.21, 15.37, 6, 0.89)
    pt3dadd(-19.36, 15.42, 6, 0.89)
    pt3dadd(-19.52, 15.42, 6, 0.89)
    pt3dadd(-19.73, 15.52, 6, 0.89)
    pt3dadd(-19.89, 15.52, 6, 0.89)
    pt3dadd(-20.1, 15.63, 6, 0.89)
  }
}
proc shape3d_43() {
  dend[40] {
    pt3dadd(-20.26, 15.73, 6, 0.89)
    pt3dadd(-20.36, 15.79, 6, 0.89)
    pt3dadd(-20.47, 15.79, 6, 0.89)
    pt3dadd(-20.57, 15.89, 6, 0.89)
    pt3dadd(-20.73, 15.89, 6, 0.89)
    pt3dadd(-20.94, 15.94, 6, 0.89)
    pt3dadd(-21.1, 16.05, 6, 0.89)
    pt3dadd(-21.2, 16, 6, 0.89)
    pt3dadd(-21.36, 16.1, 6, 0.89)
    pt3dadd(-21.52, 16.14, 6, 0.89)
    pt3dadd(-21.62, 16.21, 6, 0.89)
    pt3dadd(-21.78, 16.3, 6, 0.89)
    pt3dadd(-21.94, 16.37, 6, 0.89)
    pt3dadd(-22.09, 16.42, 6, 0.89)
    pt3dadd(-23.67, 16.42, 6, 0.89)
    pt3dadd(-23.77, 16.47, 6, 0.89)
    pt3dadd(-23.93, 16.52, 6, 0.89)
    pt3dadd(-24.04, 16.63, 6, 0.89)
    pt3dadd(-24.19, 16.57, 6, 0.89)
    pt3dadd(-24.35, 16.63, 6, 0.89)
    pt3dadd(-24.51, 16.68, 6, 0.89)
    pt3dadd(-24.82, 16.68, 6, 0.89)
    pt3dadd(-24.93, 16.73, 6, 0.89)
    pt3dadd(-25.14, 16.73, 6, 0.89)
    pt3dadd(-25.24, 16.84, 6, 0.89)
    pt3dadd(-25.35, 16.89, 6.5, 0.89)
    pt3dadd(-25.51, 16.89, 6.5, 0.89)
    pt3dadd(-25.77, 17.05, 7, 0.89)
    pt3dadd(-26.03, 17.05, 7, 0.89)
    pt3dadd(-26.19, 17.21, 7, 0.89)
    pt3dadd(-26.35, 17.3, 7, 0.89)
    pt3dadd(-26.5, 17.42, 7, 0.89)
    pt3dadd(-26.56, 17.57, 7, 0.89)
    pt3dadd(-26.66, 17.68, 7, 0.89)
    pt3dadd(-26.77, 17.78, 7, 0.89)
    pt3dadd(-26.92, 17.84, 7, 0.89)
    pt3dadd(-27.13, 17.89, 7, 0.89)
    pt3dadd(-27.24, 17.94, 7, 0.89)
    pt3dadd(-27.4, 17.98, 7, 0.89)
    pt3dadd(-27.55, 18.1, 7.5, 0.89)
    pt3dadd(-27.66, 18.14, 7.5, 0.89)
    pt3dadd(-28.08, 18.14, 7.5, 0.89)
    pt3dadd(-28.24, 18.21, 7.5, 0.89)
    pt3dadd(-28.45, 18.21, 7.5, 0.89)
    pt3dadd(-28.6, 18.26, 7.5, 0.89)
    pt3dadd(-28.81, 18.21, 7.5, 0.89)
    pt3dadd(-29.02, 18.21, 7.5, 0.89)
    pt3dadd(-29.18, 18.1, 7.5, 0.89)
    pt3dadd(-29.29, 18.05, 7.5, 0.89)
    pt3dadd(-29.39, 17.98, 7.5, 0.89)
    pt3dadd(-29.5, 17.94, 7.5, 0.89)
    pt3dadd(-29.6, 17.89, 7.5, 0.89)
    pt3dadd(-29.76, 17.78, 7.5, 0.89)
    pt3dadd(-29.92, 17.73, 7.5, 0.89)
    pt3dadd(-30.02, 17.63, 7.5, 0.89)
    pt3dadd(-30.13, 17.63, 7.5, 0.89)
    pt3dadd(-30.6, 17.14, 7.5, 0.89)
    pt3dadd(-30.7, 17.05, 7.5, 0.89)
    pt3dadd(-30.86, 16.89, 7.5, 0.89)
    pt3dadd(-30.97, 16.79, 7.5, 0.89)
    pt3dadd(-31.07, 16.68, 7.5, 0.89)
    pt3dadd(-31.18, 16.63, 7.5, 0.89)
    pt3dadd(-31.23, 16.52, 7.5, 0.89)
    pt3dadd(-31.33, 16.47, 7.5, 0.89)
    pt3dadd(-32.07, 15.3, 8.5, 0.89)
    pt3dadd(-32.33, 15.3, 8.5, 0.89)
    pt3dadd(-32.59, 15.19, 8.5, 0.89)
    pt3dadd(-32.7, 15.14, 8.5, 0.89)
    pt3dadd(-32.9, 14.98, 8.5, 0.89)
    pt3dadd(-33.06, 14.98, 9, 0.89)
    pt3dadd(-33.27, 15.03, 9, 0.89)
    pt3dadd(-33.38, 15.08, 9, 0.89)
    pt3dadd(-33.47, 15.19, 9, 0.89)
    pt3dadd(-33.64, 15.19, 9, 0.89)
    pt3dadd(-33.85, 15.24, 9, 0.89)
    pt3dadd(-34.06, 15.3, 9, 0.89)
    pt3dadd(-34.15, 15.35, 9, 0.89)
    pt3dadd(-34.43, 15.35, 9, 0.89)
    pt3dadd(-34.58, 15.4, 9, 0.89)
    pt3dadd(-34.79, 15.4, 9, 0.89)
    pt3dadd(-34.95, 15.35, 9, 0.89)
    pt3dadd(-35.15, 15.3, 9, 0.89)
    pt3dadd(-35.32, 15.24, 9.5, 0.89)
    pt3dadd(-35.63, 15.24, 9.5, 0.89)
    pt3dadd(-35.74, 15.3, 9.5, 0.89)
    pt3dadd(-35.84, 15.35, 9.5, 0.89)
    pt3dadd(-36, 15.3, 9.5, 0.89)
    pt3dadd(-36.15, 15.3, 9.5, 0.89)
    pt3dadd(-36.36, 15.3, 9.5, 0.89)
    pt3dadd(-36.58, 15.3, 9.5, 0.89)
    pt3dadd(-36.74, 15.35, 9.5, 0.89)
    pt3dadd(-37.47, 15.35, 9.5, 0.89)
    pt3dadd(-37.58, 15.4, 9.5, 0.89)
    pt3dadd(-37.72, 15.4, 9.5, 0.89)
    pt3dadd(-37.89, 15.45, 9.5, 0.89)
    pt3dadd(-38.21, 15.45, 9.5, 0.89)
    pt3dadd(-38.36, 15.56, 9.5, 0.89)
    pt3dadd(-38.57, 15.56, 9.5, 0.89)
    pt3dadd(-38.72, 15.66, 9.5, 0.89)
    pt3dadd(-38.94, 15.72, 9, 0.89)
    pt3dadd(-39.04, 15.72, 9, 0.89)
  }
  dend[41] {pt3dclear()
    pt3dadd(-39.04, 15.72, 9, 0.89)
    pt3dadd(-39.57, 16.23, 8, 0.89)
    pt3dadd(-39.68, 16.29, 8, 0.89)
    pt3dadd(-39.78, 16.39, 8, 0.89)
    pt3dadd(-39.83, 16.5, 8, 0.89)
    pt3dadd(-39.89, 16.61, 8, 0.89)
    pt3dadd(-40.04, 16.71, 8, 0.89)
    pt3dadd(-40.15, 16.82, 8, 0.89)
    pt3dadd(-40.36, 16.87, 8, 0.89)
    pt3dadd(-40.4, 16.98, 8, 0.89)
    pt3dadd(-40.46, 17.14, 8, 0.89)
    pt3dadd(-40.46, 17.29, 8, 0.89)
    pt3dadd(-40.57, 17.35, 8, 0.89)
    pt3dadd(-40.72, 17.39, 8, 0.89)
    pt3dadd(-40.83, 17.45, 7.5, 0.89)
    pt3dadd(-41.04, 17.39, 7.5, 0.89)
    pt3dadd(-41.2, 17.39, 7.5, 0.89)
    pt3dadd(-41.3, 17.35, 7.5, 0.89)
    pt3dadd(-41.51, 17.35, 7.5, 0.89)
    pt3dadd(-41.62, 17.29, 7.5, 0.89)
    pt3dadd(-41.83, 17.29, 7.5, 0.89)
    pt3dadd(-41.93, 17.23, 7.5, 0.89)
    pt3dadd(-42.14, 17.19, 7.5, 0.89)
    pt3dadd(-42.25, 17.14, 7, 0.89)
    pt3dadd(-42.41, 16.98, 7, 0.89)
    pt3dadd(-42.62, 16.98, 7, 0.89)
    pt3dadd(-42.72, 16.92, 7, 0.89)
    pt3dadd(-42.88, 16.98, 7, 0.89)
    pt3dadd(-42.98, 17.03, 6.5, 0.89)
    pt3dadd(-43.09, 17.03, 6.5, 0.89)
    pt3dadd(-43.14, 17.14, 6.5, 0.89)
    pt3dadd(-43.19, 17.29, 6.5, 0.89)
    pt3dadd(-43.25, 17.39, 6.5, 0.89)
    pt3dadd(-43.35, 17.5, 6.5, 0.89)
    pt3dadd(-43.4, 17.66, 6.5, 0.89)
    pt3dadd(-43.51, 17.77, 6.5, 0.89)
    pt3dadd(-43.67, 17.92, 6.5, 0.89)
    pt3dadd(-43.77, 17.98, 6.5, 0.89)
    pt3dadd(-44.03, 18.19, 6.5, 0.89)
    pt3dadd(-44.3, 18.29, 6.5, 0.89)
    pt3dadd(-44.51, 18.29, 6, 0.89)
    pt3dadd(-44.72, 18.34, 6, 0.89)
    pt3dadd(-44.98, 18.39, 6, 0.89)
    pt3dadd(-45.14, 18.39, 6, 0.89)
    pt3dadd(-45.4, 18.5, 6, 0.89)
    pt3dadd(-45.45, 18.61, 6, 0.89)
    pt3dadd(-45.66, 18.55, 6, 0.89)
    pt3dadd(-45.98, 18.55, 6, 0.89)
    pt3dadd(-46.08, 18.66, 6, 0.89)
    pt3dadd(-46.24, 18.71, 6, 0.89)
    pt3dadd(-46.45, 18.71, 6, 0.89)
    pt3dadd(-46.82, 18.76, 6, 0.89)
    pt3dadd(-46.97, 18.82, 5.5, 0.89)
    pt3dadd(-47.08, 18.92, 5.5, 0.89)
    pt3dadd(-47.24, 18.98, 5.5, 0.89)
    pt3dadd(-47.45, 19.03, 5.5, 0.89)
    pt3dadd(-47.55, 19.19, 5.5, 0.89)
    pt3dadd(-47.66, 19.23, 5.5, 0.89)
    pt3dadd(-47.81, 19.29, 5.5, 0.89)
    pt3dadd(-48.02, 19.45, 5.5, 0.89)
    pt3dadd(-48.13, 19.5, 5.5, 0.89)
    pt3dadd(-48.34, 19.55, 5.5, 0.89)
    pt3dadd(-48.5, 19.61, 5.5, 0.89)
    pt3dadd(-48.65, 19.61, 5.5, 0.89)
    pt3dadd(-48.81, 19.66, 5.5, 0.89)
    pt3dadd(-49.02, 19.66, 5, 0.89)
    pt3dadd(-49.13, 19.71, 5, 0.89)
    pt3dadd(-49.28, 19.76, 5, 0.89)
    pt3dadd(-49.55, 19.76, 5, 0.89)
    pt3dadd(-49.7, 19.71, 5, 0.89)
    pt3dadd(-50.23, 19.71, 5, 0.89)
    pt3dadd(-50.39, 19.76, 5, 0.89)
    pt3dadd(-50.6, 19.82, 5, 0.89)
    pt3dadd(-50.75, 19.87, 5, 0.89)
    pt3dadd(-50.86, 19.87, 5, 0.89)
    pt3dadd(-50.96, 19.97, 5, 0.89)
    pt3dadd(-51.07, 19.97, 5, 0.89)
    pt3dadd(-51.23, 19.97, 5, 0.89)
    pt3dadd(-51.33, 20.03, 4.5, 0.89)
    pt3dadd(-51.44, 20.07, 4.5, 0.89)
    pt3dadd(-51.59, 20.13, 4.5, 0.89)
    pt3dadd(-51.75, 20.18, 4.5, 0.89)
    pt3dadd(-51.86, 20.23, 4.5, 0.89)
    pt3dadd(-52.07, 20.29, 4.5, 0.89)
    pt3dadd(-52.43, 20.29, 4, 0.89)
    pt3dadd(-52.54, 20.34, 4, 0.89)
    pt3dadd(-52.8, 20.34, 4, 0.89)
    pt3dadd(-52.96, 20.39, 4, 0.89)
    pt3dadd(-53.17, 20.39, 4, 0.89)
    pt3dadd(-53.33, 20.45, 3.5, 0.89)
    pt3dadd(-53.54, 20.39, 3.5, 0.89)
    pt3dadd(-53.9, 20.39, 3, 0.89)
    pt3dadd(-54.01, 20.34, 3, 0.89)
    pt3dadd(-54.22, 20.34, 3, 0.89)
    pt3dadd(-54.27, 20.23, 3, 0.89)
    pt3dadd(-55.14, 20.59, 2.5, 0.89)
    pt3dadd(-55.3, 20.54, 2, 0.89)
    pt3dadd(-55.46, 20.49, 2, 0.89)
    pt3dadd(-55.61, 20.44, 2, 0.89)
    pt3dadd(-55.77, 20.44, 2, 0.89)
    pt3dadd(-55.88, 20.32, 1.5, 0.89)
    pt3dadd(-55.88, 19.75, 1.5, 0.89)
    pt3dadd(-55.82, 19.64, 1.5, 0.89)
    pt3dadd(-55.82, 19.38, 1, 0.89)
    pt3dadd(-55.77, 19.28, 1, 0.89)
    pt3dadd(-55.77, 18.75, 1, 0.89)
    pt3dadd(-55.82, 18.54, 1, 0.89)
    pt3dadd(-55.93, 18.39, 1, 0.89)
    pt3dadd(-55.93, 18.18, 1, 0.89)
    pt3dadd(-55.98, 17.97, 1, 0.89)
    pt3dadd(-56.09, 17.76, 0.5, 0.89)
    pt3dadd(-56.09, 17.6, 0.5, 0.89)
    pt3dadd(-56.14, 17.39, 0.5, 0.89)
    pt3dadd(-56.14, 17.23, 0.5, 0.89)
    pt3dadd(-56.19, 17.02, 0.5, 0.89)
    pt3dadd(-56.24, 16.86, 0.5, 0.89)
    pt3dadd(-56.35, 16.76, 0.5, 0.89)
    pt3dadd(-56.45, 16.64, 0.5, 0.89)
    pt3dadd(-56.56, 16.6, 0, 0.89)
    pt3dadd(-56.66, 16.48, 0, 0.89)
    pt3dadd(-56.87, 16.48, 0, 0.89)
    pt3dadd(-57.08, 16.44, 0, 0.89)
    pt3dadd(-57.19, 16.39, 0, 0.89)
    pt3dadd(-57.4, 16.34, 0, 0.89)
    pt3dadd(-57.56, 16.28, 0, 0.89)
    pt3dadd(-57.66, 16.23, 0, 0.89)
    pt3dadd(-57.87, 16.18, 0, 0.89)
    pt3dadd(-58.24, 16.18, -0.5, 0.89)
    pt3dadd(-58.4, 16.23, -0.5, 0.89)
    pt3dadd(-58.61, 16.28, -0.5, 0.89)
    pt3dadd(-58.97, 16.28, -0.5, 0.89)
    pt3dadd(-59.18, 16.34, -0.5, 0.89)
    pt3dadd(-60.02, 16.34, -0.5, 0.89)
    pt3dadd(-60.18, 16.28, -0.5, 0.89)
    pt3dadd(-60.34, 16.28, -0.5, 0.89)
    pt3dadd(-60.55, 16.23, -0.5, 0.89)
    pt3dadd(-60.86, 16.23, -0.5, 0.89)
    pt3dadd(-60.97, 16.13, -0.5, 0.89)
    pt3dadd(-61.13, 16.13, -0.5, 0.89)
    pt3dadd(-61.34, 16.07, -0.5, 0.89)
    pt3dadd(-61.55, 15.92, -0.5, 0.89)
    pt3dadd(-62.12, 15.92, -0.5, 0.89)
    pt3dadd(-62.23, 15.86, -0.5, 0.89)
    pt3dadd(-62.49, 15.86, -0.5, 0.89)
    pt3dadd(-62.65, 15.81, -0.5, 0.89)
    pt3dadd(-62.81, 15.71, -0.5, 0.89)
    pt3dadd(-62.91, 15.65, -1, 0.89)
    pt3dadd(-63.02, 15.6, -1, 0.89)
  }
}
proc shape3d_44() {
  dend[41] {
    pt3dadd(-63.71, 15.34, -1, 0.94)
    pt3dadd(-63.81, 15.4, -1, 0.94)
    pt3dadd(-64.02, 15.4, -1, 0.94)
    pt3dadd(-64.18, 15.4, -1, 0.94)
    pt3dadd(-64.29, 15.4, -1, 0.94)
    pt3dadd(-64.55, 15.29, -1.5, 0.94)
    pt3dadd(-64.7, 15.13, -1.5, 0.94)
    pt3dadd(-64.81, 15.08, -1.5, 0.94)
    pt3dadd(-64.92, 14.97, -1.5, 0.94)
    pt3dadd(-64.92, 14.87, -1.5, 0.94)
    pt3dadd(-65.02, 14.82, -1.5, 0.94)
    pt3dadd(-65.18, 14.76, -1.5, 0.94)
    pt3dadd(-65.34, 14.71, -1.5, 0.94)
    pt3dadd(-65.48, 14.71, -2, 0.94)
    pt3dadd(-65.59, 14.66, -2, 0.94)
    pt3dadd(-65.81, 14.61, -2, 0.94)
    pt3dadd(-66.28, 14.61, -2, 0.94)
    pt3dadd(-66.44, 14.55, -2, 0.94)
    pt3dadd(-66.7, 14.55, -2, 0.94)
    pt3dadd(-67.02, 14.61, -2, 0.94)
    pt3dadd(-67.12, 14.66, -2, 0.94)
    pt3dadd(-67.28, 14.61, -2, 0.94)
    pt3dadd(-67.65, 14.61, -2, 0.94)
    pt3dadd(-67.8, 14.55, -2, 0.94)
    pt3dadd(-68.01, 14.55, -2.5, 0.94)
    pt3dadd(-68.28, 14.5, -2.5, 0.94)
    pt3dadd(-68.43, 14.45, -2.5, 0.94)
    pt3dadd(-68.64, 14.34, -2.5, 0.94)
    pt3dadd(-68.8, 14.29, -2.5, 0.94)
    pt3dadd(-68.91, 14.24, -2.5, 0.94)
    pt3dadd(-69.12, 14.08, -3, 0.94)
    pt3dadd(-69.27, 14.03, -3, 0.94)
    pt3dadd(-69.38, 13.98, -3, 0.94)
    pt3dadd(-69.54, 13.87, -3, 0.94)
    pt3dadd(-69.64, 13.71, -3, 0.94)
    pt3dadd(-69.75, 13.56, -3, 0.94)
    pt3dadd(-69.84, 13.4, -3, 0.94)
    pt3dadd(-70.01, 13.24, -3, 0.94)
    pt3dadd(-70.11, 13.03, -3, 0.94)
    pt3dadd(-70.43, 12.71, -3, 0.94)
    pt3dadd(-70.59, 12.61, -3, 0.94)
    pt3dadd(-70.69, 12.45, -3.5, 0.94)
    pt3dadd(-70.8, 12.4, -3.5, 0.94)
    pt3dadd(-71.01, 12.24, -3.5, 0.94)
    pt3dadd(-71.27, 12.08, -3.5, 0.94)
    pt3dadd(-71.31, 11.98, -3.5, 0.94)
    pt3dadd(-71.48, 11.98, -3.5, 0.94)
    pt3dadd(-71.58, 11.87, -3.5, 0.94)
    pt3dadd(-71.73, 11.72, -3.5, 0.94)
    pt3dadd(-71.95, 11.72, -3.5, 0.94)
    pt3dadd(-72.06, 11.66, -3.5, 0.94)
    pt3dadd(-72.2, 11.61, -3.5, 0.94)
    pt3dadd(-72.48, 11.61, -3.5, 0.94)
    pt3dadd(-72.79, 11.56, -3.5, 0.94)
    pt3dadd(-73.42, 11.56, -3.5, 0.94)
    pt3dadd(-73.53, 11.51, -3.5, 0.94)
    pt3dadd(-73.84, 11.51, -3.5, 0.94)
    pt3dadd(-73.95, 11.45, -3.5, 0.94)
    pt3dadd(-75.06, 11.7, -3.5, 0.94)
    pt3dadd(-75.43, 11.7, -3.5, 0.94)
    pt3dadd(-75.54, 11.8, -3.5, 0.94)
    pt3dadd(-75.8, 11.86, -3.5, 0.94)
    pt3dadd(-75.91, 11.96, -3.5, 0.94)
    pt3dadd(-76.01, 11.96, -3.5, 0.94)
    pt3dadd(-76.12, 12.07, -4, 0.94)
    pt3dadd(-76.22, 12.17, -4, 0.94)
    pt3dadd(-76.38, 12.22, -4, 0.94)
    pt3dadd(-76.59, 12.33, -4, 0.94)
    pt3dadd(-76.8, 12.49, -4, 0.94)
    pt3dadd(-76.95, 12.54, -4, 0.94)
    pt3dadd(-77.06, 12.54, -4, 0.94)
    pt3dadd(-77.17, 12.59, -4, 0.94)
    pt3dadd(-77.64, 12.59, -4.5, 0.94)
    pt3dadd(-77.84, 12.49, -4.5, 0.94)
    pt3dadd(-77.9, 12.38, -4.5, 0.94)
    pt3dadd(-78.06, 12.33, -4.5, 0.94)
    pt3dadd(-78.11, 12.22, -4.5, 0.94)
    pt3dadd(-78.22, 12.12, -4.5, 0.94)
    pt3dadd(-78.31, 12.01, -4.5, 0.94)
    pt3dadd(-78.43, 12.07, -4.5, 0.94)
    pt3dadd(-78.48, 12.01, -5, 0.94)
    pt3dadd(-78.58, 12.07, -5, 0.94)
    pt3dadd(-78.69, 12.07, -5, 0.94)
    pt3dadd(-78.79, 12.17, -5, 0.94)
    pt3dadd(-78.9, 12.22, -5, 0.94)
    pt3dadd(-79.11, 12.43, -5, 0.94)
    pt3dadd(-79.2, 12.49, -5, 0.94)
    pt3dadd(-79.37, 12.59, -5, 0.94)
    pt3dadd(-79.53, 12.75, -5.5, 0.94)
    pt3dadd(-79.73, 12.8, -5.5, 0.94)
    pt3dadd(-79.84, 12.85, -5.5, 0.94)
    pt3dadd(-79.95, 12.91, -5.5, 0.94)
    pt3dadd(-80.16, 12.85, -5.5, 0.94)
    pt3dadd(-80.26, 12.85, -5.5, 0.94)
    pt3dadd(-80.37, 12.8, -5.5, 0.94)
    pt3dadd(-80.63, 12.8, -5.5, 0.94)
    pt3dadd(-80.73, 12.75, -5.5, 0.94)
    pt3dadd(-80.94, 12.75, -5.5, 0.94)
    pt3dadd(-81.09, 12.7, -5.5, 0.94)
    pt3dadd(-81.47, 12.7, -6, 0.94)
    pt3dadd(-81.63, 12.75, -6, 0.94)
    pt3dadd(-81.84, 12.7, -6, 0.94)
    pt3dadd(-82.26, 12.7, -6, 0.94)
    pt3dadd(-82.36, 12.64, -6, 0.94)
    pt3dadd(-82.47, 12.7, -6, 0.94)
    pt3dadd(-82.78, 12.7, -6, 0.94)
    pt3dadd(-82.89, 12.8, -6, 0.94)
    pt3dadd(-83.15, 12.85, -6, 0.94)
    pt3dadd(-83.36, 12.91, -6, 0.94)
    pt3dadd(-83.62, 12.96, -6.5, 0.94)
    pt3dadd(-83.83, 12.85, -6.5, 0.94)
    pt3dadd(-83.99, 12.7, -7, 0.94)
    pt3dadd(-84.15, 12.7, -7, 0.94)
    pt3dadd(-84.3, 12.59, -7, 0.94)
    pt3dadd(-84.41, 12.54, -7.5, 0.94)
    pt3dadd(-84.67, 12.54, -7.5, 0.94)
    pt3dadd(-84.83, 12.59, -7.5, 0.94)
    pt3dadd(-85.04, 12.59, -7.5, 0.94)
    pt3dadd(-85.2, 12.64, -7.5, 0.94)
    pt3dadd(-85.41, 12.7, -7.5, 0.94)
    pt3dadd(-85.83, 12.7, -7.5, 0.94)
    pt3dadd(-85.98, 12.75, -7.5, 0.94)
    pt3dadd(-86.14, 12.8, -7.5, 0.94)
    pt3dadd(-86.25, 12.8, -7.5, 0.94)
    pt3dadd(-86.4, 12.85, -7.5, 0.94)
    pt3dadd(-86.61, 12.91, -7.5, 0.94)
    pt3dadd(-86.77, 12.91, -7.5, 0.94)
    pt3dadd(-86.98, 12.96, -7, 0.94)
    pt3dadd(-87.24, 12.96, -7, 0.94)
    pt3dadd(-87.4, 13.01, -6, 0.94)
    pt3dadd(-87.61, 13.01, -6, 0.94)
    pt3dadd(-87.77, 13.06, -5.5, 0.94)
    pt3dadd(-87.93, 13.12, -5.5, 0.94)
    pt3dadd(-88.08, 13.17, -5.5, 0.94)
    pt3dadd(-88.24, 13.17, -5.5, 0.94)
    pt3dadd(-88.4, 13.22, -5.5, 0.94)
    pt3dadd(-88.61, 13.33, -5.5, 0.94)
    pt3dadd(-88.77, 13.38, -5.5, 0.94)
    pt3dadd(-88.87, 13.49, -5.5, 0.94)
    pt3dadd(-89.03, 13.38, -5.5, 0.94)
    pt3dadd(-89.24, 13.43, -5.5, 0.94)
    pt3dadd(-89.34, 13.49, -6, 0.94)
    pt3dadd(-90.39, 13.59, -4.5, 0.94)
    pt3dadd(-90.5, 13.7, -5, 0.94)
    pt3dadd(-90.76, 13.7, -5, 0.94)
    pt3dadd(-90.87, 13.8, -5.5, 0.94)
    pt3dadd(-91.02, 13.8, -5.5, 0.94)
    pt3dadd(-91.13, 13.91, -5.5, 0.94)
    pt3dadd(-91.39, 13.91, -6, 0.94)
    pt3dadd(-91.39, 14.06, -6, 0.94)
    pt3dadd(-91.55, 14.17, -6, 0.94)
    pt3dadd(-91.65, 14.12, -6, 0.94)
    pt3dadd(-91.76, 14.17, -6.5, 0.94)
    pt3dadd(-91.92, 14.33, -6.5, 0.94)
    pt3dadd(-92.07, 14.33, -6.5, 0.94)
    pt3dadd(-92.13, 14.38, -7, 0.94)
    pt3dadd(-92.28, 14.48, -7, 0.94)
    pt3dadd(-92.44, 14.54, -7, 0.94)
    pt3dadd(-92.55, 14.69, -7, 0.94)
    pt3dadd(-92.76, 14.8, -7, 0.94)
    pt3dadd(-92.86, 14.9, -7, 0.94)
    pt3dadd(-93.02, 14.96, -7, 0.94)
    pt3dadd(-93.02, 15.12, -7, 0.94)
    pt3dadd(-93.18, 15.27, -7, 0.94)
    pt3dadd(-93.39, 15.38, -7, 0.94)
    pt3dadd(-93.54, 15.54, -7, 0.94)
    pt3dadd(-93.75, 15.64, -7.5, 0.94)
    pt3dadd(-93.91, 15.69, -7.5, 0.94)
    pt3dadd(-93.96, 15.8, -7.5, 0.94)
    pt3dadd(-94.23, 15.8, -7.5, 0.94)
    pt3dadd(-94.33, 15.9, -7.5, 0.94)
    pt3dadd(-94.44, 15.96, -7.5, 0.94)
    pt3dadd(-94.91, 15.96, -7.5, 0.94)
    pt3dadd(-95.01, 16.01, -7.5, 0.94)
    pt3dadd(-95.12, 16.01, -7.5, 0.94)
    pt3dadd(-95.17, 16.11, -7.5, 0.94)
    pt3dadd(-95.28, 16.11, -7.5, 0.94)
    pt3dadd(-95.38, 16.17, -7.5, 0.94)
    pt3dadd(-95.43, 16.27, -7.5, 0.94)
    pt3dadd(-95.54, 16.32, -8, 0.94)
    pt3dadd(-95.64, 16.38, -8, 0.94)
    pt3dadd(-95.75, 16.48, -8, 0.94)
    pt3dadd(-95.91, 16.59, -8, 0.94)
    pt3dadd(-96.01, 16.69, -8, 0.94)
    pt3dadd(-96.12, 16.8, -8, 0.94)
    pt3dadd(-96.27, 16.96, -8, 0.94)
    pt3dadd(-96.38, 17.05, -8, 0.94)
    pt3dadd(-96.43, 17.22, -8, 0.94)
    pt3dadd(-96.54, 17.32, -8, 0.94)
    pt3dadd(-96.64, 17.43, -8, 0.94)
    pt3dadd(-96.75, 17.64, -8, 0.94)
    pt3dadd(-96.85, 17.73, -8, 0.94)
    pt3dadd(-96.96, 17.89, -8, 0.94)
    pt3dadd(-97.06, 17.95, -8, 0.94)
    pt3dadd(-97.11, 18.11, -8, 0.94)
    pt3dadd(-97.22, 18.32, -8, 0.94)
    pt3dadd(-97.22, 18.53, -8, 0.94)
    pt3dadd(-97.32, 18.64, -8, 0.94)
    pt3dadd(-97.32, 18.8, -8, 0.94)
    pt3dadd(-97.38, 19.01, -8, 0.94)
    pt3dadd(-97.43, 19.11, -8, 0.94)
    pt3dadd(-97.43, 19.53, -8, 0.94)
    pt3dadd(-97.48, 19.69, -8, 0.94)
    pt3dadd(-97.48, 20.11, -8, 0.94)
    pt3dadd(-97.43, 20.21, -8, 0.94)
    pt3dadd(-97.43, 20.79, -8, 0.94)
    pt3dadd(-97.38, 20.9, -8, 0.94)
    pt3dadd(-97.32, 21, -8, 0.94)
    pt3dadd(-97.32, 21.21, -8, 0.94)
    pt3dadd(-97.17, 21.42, -8, 0.94)
    pt3dadd(-97.17, 21.58, -8, 0.94)
    pt3dadd(-97.01, 21.95, -8, 0.94)
    pt3dadd(-97.01, 22.16, -8, 0.94)
    pt3dadd(-96.9, 22.37, -8, 0.94)
    pt3dadd(-96.85, 22.53, -8, 0.94)
    pt3dadd(-96.85, 22.9, -8, 0.94)
    pt3dadd(-96.8, 23.11, -8, 0.94)
    pt3dadd(-96.75, 23.32, -8, 0.94)
    pt3dadd(-96.69, 23.47, -8, 0.94)
    pt3dadd(-96.59, 23.68, -8, 0.94)
    pt3dadd(-95.52, 25.21, -9, 0.94)
    pt3dadd(-95.47, 25.32, -9, 0.94)
    pt3dadd(-95.36, 25.37, -8.5, 0.94)
    pt3dadd(-95.2, 25.42, -8.5, 0.94)
    pt3dadd(-95.05, 25.48, -8.5, 0.94)
    pt3dadd(-94.94, 25.58, -8.5, 0.94)
    pt3dadd(-94.84, 25.69, -8.5, 0.94)
    pt3dadd(-94.68, 25.74, -7.5, 0.94)
    pt3dadd(-94.57, 25.79, -7.5, 0.94)
    pt3dadd(-94.42, 25.9, -7.5, 0.94)
    pt3dadd(-94.31, 26.11, -7.5, 0.94)
    pt3dadd(-94.15, 26.16, -7.5, 0.94)
    pt3dadd(-94.05, 26.26, -7.5, 0.94)
    pt3dadd(-93.94, 26.47, -7.5, 0.94)
    pt3dadd(-93.79, 26.63, -7, 0.94)
    pt3dadd(-93.68, 26.74, -7, 0.94)
    pt3dadd(-93.63, 26.89, -7, 0.94)
    pt3dadd(-93.47, 27.21, -7, 0.94)
    pt3dadd(-93.42, 27.37, -7, 0.94)
    pt3dadd(-93.37, 27.53, -7, 0.94)
    pt3dadd(-93.37, 27.74, -7, 0.94)
    pt3dadd(-93.26, 27.84, -7, 0.94)
    pt3dadd(-93.16, 27.89, -7, 0.94)
    pt3dadd(-93.05, 28.05, -7, 0.94)
    pt3dadd(-92.89, 28.26, -7, 0.94)
    pt3dadd(-92.79, 28.37, -7, 0.94)
    pt3dadd(-92.74, 28.52, -7, 0.94)
    pt3dadd(-92.63, 28.63, -7, 0.94)
    pt3dadd(-92.53, 28.73, -7, 0.94)
  }
}
proc shape3d_45() {
  dend[41] {
    pt3dadd(-92.37, 28.89, -7, 0.94)
    pt3dadd(-92.26, 29, -7, 0.94)
    pt3dadd(-92.05, 29.16, -7, 0.94)
    pt3dadd(-91.95, 29.31, -7, 0.94)
    pt3dadd(-91.74, 29.47, -7, 0.94)
    pt3dadd(-91.58, 29.58, -7, 0.94)
    pt3dadd(-91.48, 29.68, -7, 0.94)
    pt3dadd(-91.37, 29.73, -7, 0.94)
    pt3dadd(-91.21, 29.84, -7, 0.94)
    pt3dadd(-91.11, 29.94, -7, 0.94)
    pt3dadd(-91, 30, -7, 0.94)
    pt3dadd(-90.85, 30.15, -7, 0.94)
    pt3dadd(-90.69, 30.15, -7.5, 0.94)
    pt3dadd(-90.53, 30.21, -7.5, 0.94)
    pt3dadd(-90.37, 30.26, -7.5, 0.94)
    pt3dadd(-90.22, 30.36, -7.5, 0.94)
    pt3dadd(-90.11, 30.36, -7.5, 0.94)
    pt3dadd(-89.95, 30.47, -7.5, 0.94)
    pt3dadd(-89.8, 30.52, -7.5, 0.94)
    pt3dadd(-89.69, 30.63, -7.5, 0.94)
    pt3dadd(-89.53, 30.63, -7.5, 0.94)
    pt3dadd(-89.38, 30.78, -7.5, 0.94)
    pt3dadd(-89.17, 30.89, -8, 0.94)
    pt3dadd(-89.06, 30.89, -8, 0.94)
    pt3dadd(-88.96, 30.94, -8, 0.94)
    pt3dadd(-88.85, 31.1, -8, 0.94)
    pt3dadd(-88.75, 31.31, -8, 0.94)
    pt3dadd(-88.69, 31.47, -8, 0.94)
    pt3dadd(-88.69, 31.73, -8, 0.94)
    pt3dadd(-88.64, 31.94, -8.5, 0.94)
    pt3dadd(-88.59, 32.1, -8.5, 0.94)
    pt3dadd(-88.54, 32.31, -8.5, 0.94)
    pt3dadd(-88.54, 32.57, -8.5, 0.94)
    pt3dadd(-88.48, 32.78, -8.5, 0.94)
    pt3dadd(-88.43, 32.94, -8.5, 0.94)
    pt3dadd(-88.38, 33.04, -8.5, 0.94)
    pt3dadd(-88.33, 33.2, -8.5, 0.94)
    pt3dadd(-88.27, 33.31, -8.5, 0.94)
    pt3dadd(-88.17, 33.47, -8.5, 0.94)
    pt3dadd(-88.12, 33.57, -8.5, 0.94)
    pt3dadd(-88.06, 33.72, -8.5, 0.94)
    pt3dadd(-87.96, 33.94, -8.5, 0.94)
    pt3dadd(-87.8, 34.25, -8.5, 0.94)
    pt3dadd(-87.75, 34.36, -8.5, 0.94)
    pt3dadd(-87.7, 34.46, -8.5, 0.94)
    pt3dadd(-87.64, 34.61, -8.5, 0.94)
    pt3dadd(-87.59, 34.78, -8.5, 0.94)
    pt3dadd(-87.49, 34.99, -8.5, 0.94)
    pt3dadd(-87.43, 35.15, -8.5, 0.94)
    pt3dadd(-87.33, 35.36, -8.5, 0.94)
    pt3dadd(-87.22, 35.52, -8.5, 0.94)
    pt3dadd(-87.12, 35.72, -8.5, 0.94)
    pt3dadd(-85.99, 36.47, -8.5, 0.94)
    pt3dadd(-85.88, 36.69, -8.5, 0.94)
    pt3dadd(-85.78, 36.79, -8.5, 0.94)
    pt3dadd(-85.62, 37.11, -8.5, 0.94)
    pt3dadd(-85.52, 37.21, -8.5, 0.94)
    pt3dadd(-85.15, 37.58, -8.5, 0.94)
    pt3dadd(-84.73, 37.9, -8.5, 0.94)
    pt3dadd(-84.31, 38.26, -8.5, 0.94)
    pt3dadd(-84.05, 38.47, -8.5, 0.94)
    pt3dadd(-83.84, 38.58, -8.5, 0.94)
    pt3dadd(-83.73, 38.69, -8.5, 0.94)
    pt3dadd(-83.57, 38.69, -8.5, 0.94)
    pt3dadd(-83.36, 38.74, -8.5, 0.94)
    pt3dadd(-83.21, 38.74, -8.5, 0.94)
    pt3dadd(-83, 38.79, -9, 0.94)
    pt3dadd(-82.89, 38.74, -9, 0.94)
    pt3dadd(-82.31, 38.74, -9, 0.94)
    pt3dadd(-82.16, 38.84, -9, 0.94)
    pt3dadd(-82, 38.84, -9, 0.94)
    pt3dadd(-81.79, 38.9, -9, 0.94)
    pt3dadd(-81.63, 38.9, -9, 0.94)
    pt3dadd(-81.42, 38.95, -9, 0.94)
    pt3dadd(-81.05, 38.95, -9.5, 0.94)
    pt3dadd(-80.9, 39, -9.5, 0.94)
    pt3dadd(-80.69, 39, -9.5, 0.94)
    pt3dadd(-80.53, 39.04, -9.5, 0.94)
    pt3dadd(-80.27, 39.04, -9.5, 0.94)
    pt3dadd(-80.16, 39.11, -9.5, 0.94)
    pt3dadd(-79.95, 39.11, -9.5, 0.94)
    pt3dadd(-79.73, 39.15, -9.5, 0.94)
    pt3dadd(-79.48, 39.26, -9.5, 0.94)
    pt3dadd(-79.31, 39.32, -9.5, 0.94)
    pt3dadd(-79.11, 39.36, -9.5, 0.94)
    pt3dadd(-78.95, 39.42, -9.5, 0.94)
    pt3dadd(-78.73, 39.53, -9.5, 0.94)
    pt3dadd(-78.59, 39.68, -9.5, 0.94)
    pt3dadd(-78.48, 39.68, -9.5, 0.94)
    pt3dadd(-78.31, 39.79, -9.5, 0.94)
    pt3dadd(-78.06, 39.89, -9.5, 0.94)
    pt3dadd(-77.84, 40, -9.5, 0.94)
    pt3dadd(-77.69, 40.1, -9.5, 0.94)
    pt3dadd(-77.54, 40.26, -9.5, 0.94)
    pt3dadd(-77.43, 40.21, -9.5, 0.94)
    pt3dadd(-77.22, 40.26, -9.5, 0.94)
    pt3dadd(-77.12, 40.42, -9.5, 0.94)
    pt3dadd(-76.95, 40.47, -9.5, 0.94)
    pt3dadd(-76.84, 40.53, -9.5, 0.94)
    pt3dadd(-76.64, 40.68, -9.5, 0.94)
    pt3dadd(-76.59, 40.84, -9.5, 0.94)
    pt3dadd(-76.48, 40.89, -9.5, 0.94)
    pt3dadd(-76.38, 41, -10, 0.94)
    pt3dadd(-76.12, 41.16, -10, 0.94)
    pt3dadd(-76.01, 41.26, -10, 0.94)
    pt3dadd(-75.91, 41.37, -10, 0.94)
    pt3dadd(-75.75, 41.42, -10, 0.94)
    pt3dadd(-75.65, 41.47, -10, 0.94)
    pt3dadd(-75.54, 41.47, -10, 0.94)
    pt3dadd(-75.44, 41.52, -10, 0.94)
    pt3dadd(-75.23, 41.52, -10, 0.94)
    pt3dadd(-75.02, 41.58, -10, 0.94)
    pt3dadd(-74.75, 41.58, -10, 0.94)
    pt3dadd(-74.59, 41.63, -10, 0.94)
    pt3dadd(-74.44, 41.68, -10, 0.94)
    pt3dadd(-74.33, 41.73, -10, 0.94)
    pt3dadd(-74.12, 41.79, -10, 0.94)
    pt3dadd(-72.39, 41.88, -10, 0.94)
    pt3dadd(-72.29, 41.93, -10, 0.94)
    pt3dadd(-72.08, 41.98, -10, 0.94)
    pt3dadd(-71.34, 41.98, -11, 0.94)
    pt3dadd(-71.18, 42.09, -11, 0.94)
    pt3dadd(-71.08, 42.19, -11, 0.94)
    pt3dadd(-70.97, 42.3, -11, 0.94)
    pt3dadd(-70.92, 42.4, -11, 0.94)
    pt3dadd(-70.81, 42.45, -11.5, 0.94)
    pt3dadd(-70.7, 42.51, -11.5, 0.94)
    pt3dadd(-70.61, 42.61, -11.5, 0.94)
    pt3dadd(-70.5, 42.77, -11.5, 0.94)
    pt3dadd(-70.4, 42.82, -11.5, 0.94)
    pt3dadd(-70.29, 42.93, -11.5, 0.94)
    pt3dadd(-70.19, 43.03, -11.5, 0.94)
    pt3dadd(-70.08, 43.14, -11.5, 0.94)
    pt3dadd(-69.98, 43.24, -11.5, 0.94)
    pt3dadd(-69.81, 43.3, -11.5, 0.94)
    pt3dadd(-69.72, 43.4, -11.5, 0.94)
    pt3dadd(-69.61, 43.51, -11.5, 0.94)
    pt3dadd(-69.56, 43.66, -11.5, 0.94)
    pt3dadd(-69.45, 43.77, -11, 0.94)
    pt3dadd(-69.34, 43.87, -11, 0.94)
    pt3dadd(-69.3, 44.03, -11, 0.94)
    pt3dadd(-69.19, 44.14, -11, 0.94)
    pt3dadd(-69.09, 44.19, -10.5, 0.94)
    pt3dadd(-69.03, 44.29, -10.5, 0.94)
    pt3dadd(-68.93, 44.4, -10.5, 0.94)
    pt3dadd(-68.88, 44.5, -10.5, 0.94)
    pt3dadd(-68.81, 44.66, -10.5, 0.94)
    pt3dadd(-68.72, 44.77, -11.5, 0.94)
    pt3dadd(-68.77, 44.93, -11.5, 0.94)
    pt3dadd(-68.77, 45.14, -12.5, 0.94)
    pt3dadd(-68.98, 45.24, -13, 0.94)
    pt3dadd(-69.14, 45.4, -13, 0.94)
    pt3dadd(-69.3, 45.5, -13, 0.94)
    pt3dadd(-69.45, 45.56, -13, 0.94)
    pt3dadd(-69.66, 45.61, -13, 0.94)
    pt3dadd(-69.81, 45.61, -13, 0.94)
    pt3dadd(-69.93, 45.66, -13, 0.94)
    pt3dadd(-70.14, 45.66, -13.5, 0.94)
    pt3dadd(-70.29, 45.66, -13.5, 0.94)
    pt3dadd(-70.5, 45.56, -13.5, 0.94)
    pt3dadd(-70.55, 45.45, -13.5, 0.94)
    pt3dadd(-70.55, 45.29, -13.5, 0.94)
    pt3dadd(-70.45, 45.19, -13.5, 0.94)
    pt3dadd(-70.34, 45.08, -13.5, 0.94)
    pt3dadd(-70.23, 44.98, -13.5, 0.94)
    pt3dadd(-70.14, 44.93, -13.5, 0.94)
    pt3dadd(-70.03, 44.87, -13.5, 0.94)
    pt3dadd(-69.93, 44.82, -13.5, 0.94)
    pt3dadd(-69.72, 44.61, -13.5, 0.94)
    pt3dadd(-69.61, 44.5, -14, 0.94)
    pt3dadd(-69.45, 44.35, -14, 0.94)
    pt3dadd(-69.34, 44.14, -14, 0.94)
    pt3dadd(-69.23, 44.03, -14, 0.94)
    pt3dadd(-69.19, 43.87, -14.5, 0.94)
    pt3dadd(-69.19, 43.72, -14.5, 0.94)
    pt3dadd(-69.09, 43.61, -14.5, 0.94)
    pt3dadd(-69.09, 43.4, -15, 0.94)
    pt3dadd(-69.03, 43.24, -15, 0.94)
    pt3dadd(-68.98, 43.24, -15.5, 0.94)
  }
  dend[42] {pt3dclear()
    pt3dadd(-39.04, 15.72, 9, 0.89)
    pt3dadd(-38.82, 15.44, 11, 0.89)
    pt3dadd(-39.03, 15.44, 11, 0.89)
    pt3dadd(-39.18, 15.34, 11, 0.89)
    pt3dadd(-39.29, 15.23, 11, 0.89)
    pt3dadd(-39.45, 15.13, 11, 0.89)
    pt3dadd(-39.76, 15.02, 11, 0.89)
    pt3dadd(-39.81, 14.92, 11, 0.89)
    pt3dadd(-40.02, 14.81, 10, 0.89)
    pt3dadd(-40.29, 14.55, 10, 0.89)
    pt3dadd(-40.39, 14.44, 10, 0.89)
    pt3dadd(-40.5, 14.34, 10, 0.89)
    pt3dadd(-40.65, 14.29, 10, 0.89)
    pt3dadd(-40.76, 14.29, 10, 0.89)
    pt3dadd(-40.92, 14.34, 10, 0.89)
    pt3dadd(-41.02, 14.39, 9.5, 0.89)
    pt3dadd(-41.23, 14.5, 9.5, 0.89)
    pt3dadd(-41.44, 14.6, 9.5, 0.89)
    pt3dadd(-41.7, 14.76, 9.5, 0.89)
    pt3dadd(-41.86, 14.92, 9.5, 0.89)
    pt3dadd(-41.97, 15.02, 9.5, 0.89)
    pt3dadd(-42.07, 15.13, 9.5, 0.89)
    pt3dadd(-42.18, 15.18, 9.5, 0.89)
    pt3dadd(-42.28, 15.28, 9.5, 0.89)
    pt3dadd(-42.39, 15.49, 9.5, 0.89)
    pt3dadd(-42.44, 15.6, 9.5, 0.89)
    pt3dadd(-42.54, 15.65, 9.5, 0.89)
    pt3dadd(-42.65, 15.81, 9.5, 0.89)
    pt3dadd(-42.75, 15.92, 9.5, 0.89)
    pt3dadd(-43.02, 16.07, 9.5, 0.89)
    pt3dadd(-43.17, 16.18, 9.5, 0.89)
    pt3dadd(-43.28, 16.23, 9.5, 0.89)
    pt3dadd(-43.44, 16.28, 9.5, 0.89)
    pt3dadd(-43.65, 16.34, 9.5, 0.89)
    pt3dadd(-43.86, 16.39, 9.5, 0.89)
    pt3dadd(-44.01, 16.34, 9.5, 0.89)
    pt3dadd(-44.22, 16.34, 10, 0.89)
    pt3dadd(-44.43, 16.28, 10, 0.89)
    pt3dadd(-44.59, 16.18, 10, 0.89)
    pt3dadd(-44.7, 16.13, 10.5, 0.89)
    pt3dadd(-44.96, 16.13, 10.5, 0.89)
    pt3dadd(-45.06, 16.07, 10.5, 0.89)
    pt3dadd(-45.54, 16.07, 10.5, 0.89)
    pt3dadd(-45.69, 16.07, 10.5, 0.89)
    pt3dadd(-45.85, 16.07, 10.5, 0.89)
    pt3dadd(-46.11, 15.97, 10.5, 0.89)
    pt3dadd(-46.32, 15.92, 11, 0.89)
    pt3dadd(-46.53, 15.86, 11, 0.89)
    pt3dadd(-46.69, 15.81, 11, 0.89)
    pt3dadd(-47.06, 15.81, 11, 0.89)
    pt3dadd(-47.16, 15.76, 11.5, 0.89)
    pt3dadd(-47.27, 15.65, 11.5, 0.89)
    pt3dadd(-47.43, 15.6, 11.5, 0.89)
    pt3dadd(-47.53, 15.49, 11.5, 0.89)
    pt3dadd(-47.69, 15.39, 11.5, 0.89)
    pt3dadd(-47.9, 15.28, 11.5, 0.89)
    pt3dadd(-48.06, 15.23, 11.5, 0.89)
    pt3dadd(-48.84, 15.23, 11.5, 0.89)
    pt3dadd(-48.95, 15.28, 11.5, 0.89)
    pt3dadd(-49.11, 15.28, 11.5, 0.89)
    pt3dadd(-49.32, 15.39, 11.5, 0.89)
    pt3dadd(-49.53, 15.49, 11.5, 0.89)
    pt3dadd(-49.63, 15.65, 11.5, 0.89)
    pt3dadd(-49.79, 15.71, 11.5, 0.89)
    pt3dadd(-49.89, 15.86, 11.5, 0.89)
    pt3dadd(-50, 15.86, 11.5, 0.89)
    pt3dadd(-50.1, 15.81, 11.5, 0.89)
    pt3dadd(-50.47, 15.81, 12, 0.89)
    pt3dadd(-50.63, 15.76, 12, 0.89)
    pt3dadd(-50.84, 15.65, 12, 0.89)
  }
}
proc shape3d_46() {
  dend[42] {
    pt3dadd(-51, 15.6, 12, 0.89)
    pt3dadd(-51.1, 15.49, 12, 0.89)
    pt3dadd(-51.21, 15.39, 12, 0.89)
    pt3dadd(-51.31, 15.34, 12, 0.89)
    pt3dadd(-51.42, 15.18, 12, 0.89)
    pt3dadd(-51.47, 15.02, 12.5, 0.89)
    pt3dadd(-51.57, 14.97, 12.5, 0.89)
    pt3dadd(-51.68, 14.76, 12.5, 0.89)
    pt3dadd(-51.73, 14.6, 12.5, 0.89)
    pt3dadd(-51.84, 14.39, 12.5, 0.89)
    pt3dadd(-51.99, 14.23, 12.5, 0.89)
    pt3dadd(-52.1, 14.13, 12.5, 0.89)
    pt3dadd(-52.57, 14.13, 13, 0.89)
    pt3dadd(-52.73, 14.18, 13, 0.89)
    pt3dadd(-52.83, 14.23, 13, 0.89)
    pt3dadd(-52.99, 14.29, 13, 0.89)
    pt3dadd(-53.25, 14.34, 13, 0.89)
    pt3dadd(-53.36, 14.44, 13, 0.89)
    pt3dadd(-53.57, 14.55, 13, 0.89)
    pt3dadd(-53.83, 14.71, 13, 0.89)
    pt3dadd(-54.04, 14.86, 13, 0.89)
    pt3dadd(-54.25, 15.02, 13, 0.89)
    pt3dadd(-54.36, 15.07, 13, 0.89)
    pt3dadd(-54.46, 15.18, 13, 0.89)
    pt3dadd(-54.62, 15.34, 13.5, 0.89)
    pt3dadd(-54.72, 15.39, 13.5, 0.89)
    pt3dadd(-54.83, 15.49, 13.5, 0.89)
    pt3dadd(-54.93, 15.49, 13.5, 0.89)
    pt3dadd(-55.04, 15.6, 13.5, 0.89)
    pt3dadd(-55.14, 15.65, 13.5, 0.89)
    pt3dadd(-55.3, 15.65, 13.5, 0.89)
    pt3dadd(-55.35, 15.44, 14, 0.89)
    pt3dadd(-55.46, 15.39, 14, 0.89)
    pt3dadd(-55.51, 15.23, 14, 0.89)
    pt3dadd(-55.61, 15.07, 14, 0.89)
    pt3dadd(-55.61, 14.86, 14, 0.89)
    pt3dadd(-55.67, 14.71, 14, 0.89)
    pt3dadd(-55.72, 14.55, 14, 0.89)
    pt3dadd(-55.72, 14.34, 14, 0.89)
    pt3dadd(-55.77, 14.13, 14, 0.89)
    pt3dadd(-55.88, 14.02, 14.5, 0.89)
    pt3dadd(-55.98, 13.92, 14.5, 0.89)
    pt3dadd(-56.09, 13.87, 14.5, 0.89)
    pt3dadd(-56.24, 13.87, 14.5, 0.89)
    pt3dadd(-56.4, 13.81, 14.5, 0.89)
    pt3dadd(-56.56, 13.81, 14.5, 0.89)
    pt3dadd(-56.66, 13.87, 14.5, 0.89)
    pt3dadd(-56.77, 13.92, 14.5, 0.89)
    pt3dadd(-56.87, 14.02, 14.5, 0.89)
    pt3dadd(-57.03, 14.02, 14.5, 0.89)
    pt3dadd(-57.19, 14.08, 14.5, 0.89)
    pt3dadd(-57.35, 14.18, 14.5, 0.89)
    pt3dadd(-57.56, 14.34, 15, 0.89)
    pt3dadd(-57.77, 14.44, 15, 0.89)
    pt3dadd(-57.92, 14.5, 15, 0.89)
    pt3dadd(-58.08, 14.6, 15, 0.89)
    pt3dadd(-58.34, 14.6, 15, 0.89)
    pt3dadd(-58.45, 14.65, 15, 0.89)
    pt3dadd(-58.66, 14.65, 15, 0.89)
    pt3dadd(-58.76, 14.76, 15, 0.89)
    pt3dadd(-59.03, 14.76, 15, 0.89)
    pt3dadd(-59.18, 14.81, 15, 0.89)
    pt3dadd(-59.71, 14.81, 15, 0.89)
    pt3dadd(-59.81, 14.76, 15, 0.89)
    pt3dadd(-60.55, 14.76, 15, 0.89)
    pt3dadd(-60.76, 14.71, 15, 0.89)
    pt3dadd(-61.13, 14.71, 15, 0.89)
    pt3dadd(-61.28, 14.65, 15, 0.89)
    pt3dadd(-61.49, 14.65, 15, 0.89)
    pt3dadd(-61.65, 14.6, 15, 0.89)
    pt3dadd(-61.86, 14.44, 15, 0.89)
    pt3dadd(-61.91, 14.34, 15, 0.89)
    pt3dadd(-62.07, 14.29, 15, 0.89)
    pt3dadd(-62.18, 14.18, 15, 0.89)
    pt3dadd(-62.28, 14.13, 15, 0.89)
    pt3dadd(-62.39, 14.08, 15, 0.89)
    pt3dadd(-62.49, 14.02, 15, 0.89)
    pt3dadd(-62.6, 14.02, 15, 0.89)
    pt3dadd(-62.7, 13.97, 15, 0.89)
    pt3dadd(-63.12, 13.97, 15, 0.89)
    pt3dadd(-63.33, 14.13, 15, 0.89)
    pt3dadd(-63.44, 14.23, 15, 0.89)
    pt3dadd(-63.54, 14.34, 15, 0.89)
    pt3dadd(-63.7, 14.44, 15, 0.89)
    pt3dadd(-63.91, 14.5, 15, 0.89)
    pt3dadd(-64.06, 14.5, 15, 0.89)
    pt3dadd(-64.28, 14.55, 15.5, 0.89)
    pt3dadd(-64.43, 14.44, 15.5, 0.89)
    pt3dadd(-64.54, 14.39, 15.5, 0.89)
    pt3dadd(-64.84, 14.39, 15.5, 0.89)
    pt3dadd(-64.95, 14.29, 15.5, 0.89)
    pt3dadd(-65.06, 14.23, 16, 0.89)
    pt3dadd(-65.27, 14.23, 16, 0.89)
    pt3dadd(-65.43, 14.29, 16, 0.89)
    pt3dadd(-65.54, 14.34, 16, 0.89)
    pt3dadd(-65.69, 14.34, 16, 0.89)
    pt3dadd(-65.8, 14.39, 16, 0.89)
    pt3dadd(-65.9, 14.44, 16, 0.89)
    pt3dadd(-66.06, 14.5, 16, 0.89)
    pt3dadd(-66.17, 14.65, 16, 0.89)
    pt3dadd(-66.27, 14.71, 16, 0.89)
    pt3dadd(-66.38, 14.81, 16.5, 0.89)
    pt3dadd(-66.69, 15.13, 16.5, 0.89)
    pt3dadd(-66.8, 15.23, 16.5, 0.89)
    pt3dadd(-67.01, 15.34, 17, 0.89)
    pt3dadd(-67.11, 15.39, 17, 0.89)
    pt3dadd(-67.27, 15.39, 17, 0.89)
    pt3dadd(-67.43, 15.28, 17, 0.89)
    pt3dadd(-67.53, 15.18, 17, 0.89)
    pt3dadd(-67.64, 15.07, 17, 0.89)
    pt3dadd(-67.79, 15.07, 17.5, 0.89)
    pt3dadd(-68.11, 14.92, 17.5, 0.89)
    pt3dadd(-68.27, 14.86, 17.5, 0.89)
    pt3dadd(-68.37, 14.76, 17.5, 0.89)
    pt3dadd(-68.53, 14.71, 17.5, 0.89)
    pt3dadd(-68.73, 14.6, 17.5, 0.89)
    pt3dadd(-68.84, 14.55, 17.5, 0.89)
    pt3dadd(-68.95, 14.44, 17.5, 0.89)
    pt3dadd(-69.16, 14.39, 17.5, 0.89)
    pt3dadd(-69.31, 14.29, 17.5, 0.89)
    pt3dadd(-69.47, 14.29, 17.5, 0.89)
    pt3dadd(-69.63, 14.13, 18, 0.89)
    pt3dadd(-69.73, 14.08, 18, 0.89)
    pt3dadd(-69.95, 13.97, 18, 0.89)
    pt3dadd(-70.09, 13.87, 18, 0.89)
    pt3dadd(-70.2, 13.76, 18, 0.89)
    pt3dadd(-70.52, 13.76, 18, 0.89)
    pt3dadd(-70.63, 13.81, 18, 0.89)
    pt3dadd(-70.73, 13.87, 18, 0.89)
    pt3dadd(-70.94, 13.92, 18, 0.89)
    pt3dadd(-71.05, 14.08, 18, 0.89)
    pt3dadd(-71.26, 14.18, 18, 0.89)
    pt3dadd(-71.36, 14.34, 18, 0.89)
    pt3dadd(-71.42, 14.44, 18, 0.89)
    pt3dadd(-71.56, 14.5, 18, 0.89)
    pt3dadd(-71.68, 14.5, 18, 0.89)
    pt3dadd(-71.78, 14.6, 18, 0.89)
    pt3dadd(-71.89, 14.65, 18, 0.89)
    pt3dadd(-72.31, 14.71, 18.5, 0.89)
    pt3dadd(-72.41, 14.65, 18.5, 0.89)
    pt3dadd(-72.56, 14.55, 18.5, 0.89)
    pt3dadd(-72.68, 14.5, 18.5, 0.89)
    pt3dadd(-72.78, 14.39, 18.5, 0.89)
    pt3dadd(-72.89, 14.29, 19, 0.89)
    pt3dadd(-73.04, 14.13, 19, 0.89)
    pt3dadd(-73.15, 13.92, 19, 0.89)
    pt3dadd(-73.2, 13.76, 19, 0.89)
    pt3dadd(-73.31, 13.65, 19, 0.89)
    pt3dadd(-73.41, 13.5, 19, 0.89)
    pt3dadd(-73.78, 13.13, 19, 0.89)
    pt3dadd(-73.88, 13.02, 19, 0.89)
    pt3dadd(-74.09, 12.92, 19, 0.89)
    pt3dadd(-74.25, 12.71, 19, 0.89)
    pt3dadd(-74.41, 12.71, 19, 0.89)
    pt3dadd(-74.62, 12.66, 19, 0.89)
    pt3dadd(-74.78, 12.6, 19, 0.89)
    pt3dadd(-74.98, 12.66, 19, 0.89)
    pt3dadd(-75.14, 12.71, 19, 0.89)
    pt3dadd(-75.34, 12.71, 19, 0.89)
    pt3dadd(-75.62, 12.6, 19, 0.89)
    pt3dadd(-75.72, 12.55, 19, 0.89)
    pt3dadd(-75.88, 12.39, 19, 0.89)
    pt3dadd(-75.98, 12.29, 19, 0.89)
    pt3dadd(-76.14, 12.03, 19, 0.89)
    pt3dadd(-76.25, 11.82, 19, 0.89)
    pt3dadd(-76.34, 11.71, 19, 0.89)
    pt3dadd(-76.51, 11.66, 19, 0.89)
    pt3dadd(-76.72, 11.5, 19, 0.89)
    pt3dadd(-76.88, 11.5, 19, 0.89)
    pt3dadd(-77.59, 11.63, 19, 0.89)
    pt3dadd(-77.59, 11.94, 19, 0.89)
    pt3dadd(-77.64, 12.15, 19, 0.89)
    pt3dadd(-77.75, 12.26, 19, 0.89)
    pt3dadd(-77.91, 12.41, 19, 0.89)
    pt3dadd(-78.01, 12.52, 19.5, 0.89)
    pt3dadd(-78.01, 12.68, 19.5, 0.89)
    pt3dadd(-78.12, 12.78, 19.5, 0.89)
    pt3dadd(-78.22, 12.89, 19.5, 0.89)
    pt3dadd(-78.27, 12.99, 20, 0.89)
    pt3dadd(-78.48, 12.99, 20, 0.89)
    pt3dadd(-78.59, 13.05, 20, 0.89)
    pt3dadd(-78.73, 13.1, 20.5, 0.89)
    pt3dadd(-79.06, 13.1, 20.5, 0.89)
    pt3dadd(-79.16, 13.05, 21, 0.89)
    pt3dadd(-79.31, 12.94, 21, 0.89)
    pt3dadd(-79.48, 12.84, 21, 0.89)
    pt3dadd(-79.58, 12.73, 21, 0.89)
    pt3dadd(-79.64, 12.57, 21, 0.89)
    pt3dadd(-79.79, 12.47, 21, 0.89)
    pt3dadd(-79.84, 12.36, 21, 0.89)
    pt3dadd(-80.16, 12.05, 21.5, 0.89)
    pt3dadd(-80.27, 11.94, 21.5, 0.89)
    pt3dadd(-80.37, 11.84, 21.5, 0.89)
    pt3dadd(-80.53, 11.68, 21.5, 0.89)
    pt3dadd(-80.63, 11.47, 21.5, 0.89)
    pt3dadd(-80.69, 11.31, 22, 0.89)
    pt3dadd(-80.73, 11.1, 22, 0.89)
    pt3dadd(-80.79, 11, 22, 0.89)
    pt3dadd(-80.84, 10.84, 22, 0.89)
    pt3dadd(-80.9, 10.73, 22, 0.89)
    pt3dadd(-80.95, 10.57, 22, 0.89)
    pt3dadd(-81, 10.47, 22, 0.89)
    pt3dadd(-81.11, 10.26, 22.5, 0.89)
  }
  dend[43] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(5.56, 1.73, 8.5, 1.1)
    pt3dadd(5.67, 1.68, 8.5, 1.1)
    pt3dadd(5.88, 1.63, 8.5, 1.1)
    pt3dadd(6.61, 1.63, 8.5, 1.1)
    pt3dadd(6.82, 1.79, 7.5, 1.1)
    pt3dadd(6.93, 1.79, 7.5, 1.1)
    pt3dadd(7.03, 1.84, 7.5, 1.1)
    pt3dadd(7.93, 1.89, 7, 1.1)
    pt3dadd(8.02, 1.95, 7, 1.1)
    pt3dadd(8.14, 1.89, 7, 1.1)
    pt3dadd(8.35, 1.89, 7.5, 1.1)
    pt3dadd(8.56, 1.84, 7.5, 1.1)
    pt3dadd(8.77, 1.79, 7.5, 1.1)
    pt3dadd(8.98, 1.79, 7.5, 1.1)
    pt3dadd(9.08, 1.68, 7.5, 1.1)
    pt3dadd(9.19, 1.63, 7.5, 1.1)
    pt3dadd(9.34, 1.58, 7.5, 1.1)
    pt3dadd(9.44, 1.52, 7.5, 1.1)
    pt3dadd(9.61, 1.47, 7.5, 1.1)
    pt3dadd(9.82, 1.37, 7.5, 1.1)
    pt3dadd(10.02, 1.26, 7.5, 1.1)
  }
  dend[44] {pt3dclear()
    pt3dadd(10.02, 1.26, 7.5, 1.1)
    pt3dadd(11.34, 1.52, 7, 0.84)
    pt3dadd(11.5, 1.47, 7, 0.84)
    pt3dadd(11.6, 1.37, 7, 0.84)
    pt3dadd(11.76, 1.42, 7, 0.84)
    pt3dadd(11.92, 1.37, 7.5, 0.84)
    pt3dadd(12.13, 1.31, 7.5, 0.84)
    pt3dadd(12.34, 1.21, 8, 0.84)
    pt3dadd(12.55, 1.21, 8, 0.84)
    pt3dadd(12.6, 1.05, 8.5, 0.84)
    pt3dadd(12.7, 0.95, 8.5, 0.84)
    pt3dadd(12.81, 0.84, 8.5, 0.84)
    pt3dadd(12.97, 0.84, 9, 0.84)
    pt3dadd(13.07, 0.79, 9, 0.84)
    pt3dadd(13.18, 0.68, 9, 0.84)
    pt3dadd(13.33, 0.74, 9, 0.84)
    pt3dadd(13.49, 0.79, 9, 0.84)
    pt3dadd(13.75, 1.05, 9.5, 0.84)
    pt3dadd(13.81, 1.15, 9.5, 0.84)
    pt3dadd(13.86, 1.26, 9.5, 0.84)
    pt3dadd(13.91, 1.37, 10, 0.84)
    pt3dadd(13.91, 1.58, 10, 0.84)
    pt3dadd(13.86, 1.79, 10, 0.84)
    pt3dadd(13.75, 1.89, 10, 0.84)
  }
}
proc shape3d_47() {
  dend[44] {
    pt3dadd(13.7, 2, 10, 0.84)
    pt3dadd(13.44, 2.25, 10.5, 0.84)
    pt3dadd(13.33, 2.37, 10.5, 0.84)
    pt3dadd(13.28, 2.52, 10.5, 0.84)
    pt3dadd(13.18, 2.73, 10.5, 0.84)
    pt3dadd(13.12, 2.89, 10.5, 0.84)
    pt3dadd(13.07, 3.05, 10.5, 0.84)
    pt3dadd(13.07, 3.21, 10.5, 0.84)
    pt3dadd(13.02, 3.31, 10.5, 0.84)
    pt3dadd(13.07, 3.42, 11, 0.84)
    pt3dadd(13.07, 3.63, 11, 0.84)
    pt3dadd(13.12, 3.78, 11, 0.84)
    pt3dadd(13.12, 3.94, 11, 0.84)
    pt3dadd(13.18, 4.05, 11, 0.84)
    pt3dadd(13.18, 4.3, 11, 0.84)
    pt3dadd(13.23, 4.51, 11, 0.84)
    pt3dadd(13.28, 4.68, 11, 0.84)
    pt3dadd(13.28, 4.88, 11, 0.84)
    pt3dadd(13.33, 5.05, 11, 0.84)
    pt3dadd(13.44, 5.09, 11, 0.84)
    pt3dadd(13.6, 5.26, 11, 0.84)
    pt3dadd(13.7, 5.36, 11, 0.84)
    pt3dadd(13.86, 5.41, 11, 0.84)
    pt3dadd(13.96, 5.52, 11, 0.84)
    pt3dadd(14.12, 5.52, 11, 0.84)
    pt3dadd(14.17, 5.62, 11, 0.84)
    pt3dadd(14.28, 5.68, 11, 0.84)
    pt3dadd(14.38, 5.78, 11, 0.84)
    pt3dadd(14.44, 5.62, 11, 0.84)
    pt3dadd(14.49, 5.52, 11, 0.84)
    pt3dadd(14.59, 5.36, 11, 0.84)
    pt3dadd(14.7, 5.26, 11, 0.84)
    pt3dadd(14.75, 5.09, 11, 0.84)
    pt3dadd(14.8, 4.99, 11, 0.84)
    pt3dadd(14.96, 4.88, 11, 0.84)
    pt3dadd(15.01, 4.68, 11, 0.84)
    pt3dadd(15.12, 4.63, 11, 0.84)
    pt3dadd(15.22, 4.51, 11, 0.84)
    pt3dadd(15.38, 4.47, 11, 0.84)
    pt3dadd(15.59, 4.51, 11, 0.84)
    pt3dadd(15.8, 4.57, 11, 0.84)
    pt3dadd(15.91, 4.63, 11.5, 0.84)
    pt3dadd(15.91, 4.78, 11.5, 0.84)
    pt3dadd(16.12, 4.84, 11.5, 0.84)
    pt3dadd(16.22, 4.84, 12, 0.84)
    pt3dadd(16.32, 5.05, 12.5, 0.84)
    pt3dadd(16.43, 5.05, 12.5, 0.84)
    pt3dadd(16.48, 5.15, 12.5, 0.84)
    pt3dadd(16.64, 5.36, 13, 0.84)
    pt3dadd(16.69, 5.47, 13, 0.84)
    pt3dadd(16.69, 5.57, 13, 0.84)
    pt3dadd(16.8, 5.62, 13, 0.84)
    pt3dadd(16.8, 5.73, 13, 0.84)
    pt3dadd(16.85, 5.89, 13, 0.84)
    pt3dadd(16.89, 6.05, 13, 0.84)
    pt3dadd(16.96, 6.15, 13, 0.84)
    pt3dadd(17.05, 6.36, 13, 0.84)
    pt3dadd(17.11, 6.47, 13, 0.84)
    pt3dadd(17.17, 6.62, 13.5, 0.84)
    pt3dadd(17.22, 6.73, 13.5, 0.84)
    pt3dadd(17.27, 6.89, 14, 0.84)
    pt3dadd(17.38, 7.04, 14, 0.84)
    pt3dadd(17.48, 7.1, 14, 0.84)
    pt3dadd(17.53, 7.25, 14, 0.84)
    pt3dadd(17.64, 7.46, 14, 0.84)
    pt3dadd(18.16, 8.41, 14.5, 0.84)
    pt3dadd(18.27, 8.57, 14.5, 0.84)
    pt3dadd(18.37, 8.77, 14.5, 0.84)
    pt3dadd(18.53, 8.99, 14.5, 0.84)
    pt3dadd(18.57, 9.15, 14.5, 0.84)
    pt3dadd(18.69, 9.25, 14.5, 0.84)
    pt3dadd(18.73, 9.41, 14.5, 0.84)
    pt3dadd(18.79, 9.52, 14.5, 0.84)
    pt3dadd(18.89, 9.73, 14.5, 0.84)
    pt3dadd(18.95, 9.88, 14.5, 0.84)
    pt3dadd(18.95, 10.09, 14.5, 0.84)
    pt3dadd(19, 10.25, 14.5, 0.84)
    pt3dadd(19, 10.46, 14.5, 0.84)
    pt3dadd(19.05, 10.62, 14.5, 0.84)
    pt3dadd(19.16, 10.83, 14.5, 0.84)
    pt3dadd(19.27, 10.99, 14.5, 0.84)
    pt3dadd(19.32, 11.2, 14.5, 0.84)
    pt3dadd(19.42, 11.3, 14.5, 0.84)
    pt3dadd(20.28, 12.53, 14.5, 0.84)
    pt3dadd(20.34, 12.64, 14.5, 0.84)
    pt3dadd(20.44, 12.75, 14.5, 0.84)
    pt3dadd(20.55, 12.85, 14.5, 0.84)
    pt3dadd(20.7, 12.85, 14.5, 0.84)
    pt3dadd(20.81, 12.9, 14.5, 0.84)
    pt3dadd(20.97, 13.06, 14.5, 0.84)
    pt3dadd(21.18, 13.06, 14.5, 0.84)
    pt3dadd(21.33, 13.01, 14, 0.84)
    pt3dadd(22.02, 13.01, 13.5, 0.84)
    pt3dadd(22.28, 12.96, 13.5, 0.84)
    pt3dadd(22.38, 12.9, 14, 0.84)
    pt3dadd(22.49, 12.9, 14, 0.84)
    pt3dadd(22.7, 12.85, 15, 0.84)
    pt3dadd(23.07, 12.85, 15.5, 0.84)
    pt3dadd(23.17, 12.9, 15.5, 0.84)
    pt3dadd(23.33, 13.01, 16, 0.84)
    pt3dadd(23.49, 13.17, 16, 0.84)
    pt3dadd(23.59, 13.32, 16, 0.84)
    pt3dadd(23.64, 13.43, 16, 0.84)
    pt3dadd(23.75, 13.59, 16, 0.84)
    pt3dadd(23.85, 13.74, 16, 0.84)
    pt3dadd(23.96, 13.9, 16.5, 0.84)
    pt3dadd(24.06, 13.95, 16.5, 0.84)
    pt3dadd(24.06, 14.06, 17, 0.84)
    pt3dadd(24.22, 14.32, 17, 0.84)
    pt3dadd(24.17, 14.48, 17.5, 0.84)
    pt3dadd(24.27, 14.58, 17.5, 0.84)
    pt3dadd(24.33, 14.69, 17.5, 0.84)
    pt3dadd(24.43, 14.85, 17.5, 0.84)
    pt3dadd(24.54, 14.95, 17.5, 0.84)
    pt3dadd(24.59, 15.06, 17.5, 0.84)
    pt3dadd(24.8, 15.22, 17.5, 0.84)
    pt3dadd(24.9, 15.27, 17.5, 0.84)
    pt3dadd(25.01, 15.32, 17.5, 0.84)
    pt3dadd(25.11, 15.37, 17.5, 0.84)
    pt3dadd(25.22, 15.37, 17.5, 0.84)
    pt3dadd(25.32, 15.32, 17.5, 0.84)
    pt3dadd(25.8, 15.32, 17.5, 0.84)
    pt3dadd(25.9, 15.43, 17.5, 0.84)
    pt3dadd(26.01, 15.53, 17.5, 0.84)
    pt3dadd(26.16, 15.74, 17.5, 0.84)
    pt3dadd(26.32, 15.9, 17.5, 0.84)
    pt3dadd(26.43, 16.05, 17.5, 0.84)
    pt3dadd(26.48, 16.16, 17.5, 0.84)
    pt3dadd(26.74, 16.42, 18, 0.84)
    pt3dadd(26.85, 16.48, 18, 0.84)
    pt3dadd(27, 16.57, 18, 0.84)
    pt3dadd(27.11, 16.69, 18.5, 0.84)
    pt3dadd(27.21, 16.79, 18.5, 0.84)
    pt3dadd(27.32, 17, 18.5, 0.84)
    pt3dadd(27.37, 17.16, 18.5, 0.84)
    pt3dadd(27.37, 17.32, 18.5, 0.84)
    pt3dadd(27.42, 17.48, 18.5, 0.84)
    pt3dadd(27.48, 17.63, 18.5, 0.84)
    pt3dadd(27.48, 17.84, 18.5, 0.84)
    pt3dadd(27.58, 17.89, 18.5, 0.84)
    pt3dadd(27.63, 18.11, 18.5, 0.84)
  }
  dend[45] {pt3dclear()
    pt3dadd(27.63, 18.11, 18.5, 0.84)
    pt3dadd(27.74, 19.21, 19, 0.84)
    pt3dadd(27.63, 19.21, 19, 0.84)
    pt3dadd(27.53, 19.16, 19, 0.84)
    pt3dadd(27.48, 19.11, 19.5, 0.84)
    pt3dadd(27.42, 19, 19.5, 0.84)
    pt3dadd(27.32, 18.89, 20, 0.84)
    pt3dadd(27.27, 18.73, 20, 0.84)
    pt3dadd(27.16, 18.63, 20, 0.84)
    pt3dadd(26.95, 18.53, 20.5, 0.84)
    pt3dadd(26.69, 18.53, 21, 0.84)
    pt3dadd(26.58, 18.63, 21, 0.84)
    pt3dadd(26.53, 18.79, 21, 0.84)
    pt3dadd(26.43, 18.89, 21, 0.84)
    pt3dadd(26.37, 19, 21, 0.84)
    pt3dadd(26.27, 19.05, 21, 0.84)
    pt3dadd(26.16, 19.16, 21, 0.84)
    pt3dadd(26.06, 19.26, 21, 0.84)
    pt3dadd(25.95, 19.53, 21, 0.84)
    pt3dadd(25.85, 19.68, 21.5, 0.84)
    pt3dadd(25.8, 19.89, 21.5, 0.84)
    pt3dadd(25.69, 20, 21.5, 0.84)
    pt3dadd(25.64, 20.21, 21.5, 0.84)
    pt3dadd(25.59, 20.32, 21.5, 0.84)
    pt3dadd(25.59, 20.47, 21.5, 0.84)
    pt3dadd(25.53, 20.58, 21.5, 0.84)
    pt3dadd(25.53, 21, 21.5, 0.84)
    pt3dadd(25.59, 21.1, 21.5, 0.84)
    pt3dadd(25.64, 21.37, 21.5, 0.84)
    pt3dadd(25.69, 21.58, 21.5, 0.84)
    pt3dadd(25.69, 21.73, 21.5, 0.84)
    pt3dadd(25.74, 21.84, 21.5, 0.84)
    pt3dadd(25.74, 22.1, 21.5, 0.84)
    pt3dadd(25.8, 22.31, 21.5, 0.84)
    pt3dadd(25.8, 23.89, 21.5, 0.84)
    pt3dadd(25.74, 24.05, 21.5, 0.84)
    pt3dadd(25.31, 25.06, 23, 0.84)
    pt3dadd(25.31, 25.16, 23, 0.84)
    pt3dadd(25.21, 25.21, 23.5, 0.84)
    pt3dadd(25.1, 25.27, 23.5, 0.84)
    pt3dadd(25, 25.48, 24, 0.84)
    pt3dadd(24.95, 25.58, 24, 0.84)
    pt3dadd(24.79, 25.74, 24, 0.84)
    pt3dadd(24.68, 25.79, 24, 0.84)
    pt3dadd(24.58, 25.84, 24, 0.84)
    pt3dadd(24.47, 25.9, 24.5, 0.84)
    pt3dadd(24.37, 25.95, 24.5, 0.84)
    pt3dadd(24.11, 25.95, 24.5, 0.84)
    pt3dadd(23.95, 25.9, 24.5, 0.84)
    pt3dadd(23.74, 25.95, 25, 0.84)
    pt3dadd(23.63, 26, 25, 0.84)
    pt3dadd(23.53, 26.05, 25.5, 0.84)
    pt3dadd(23.42, 26.21, 25.5, 0.84)
    pt3dadd(23.32, 26.21, 25.5, 0.84)
    pt3dadd(23.11, 26.42, 25.5, 0.84)
    pt3dadd(23.06, 26.53, 25.5, 0.84)
    pt3dadd(23, 26.68, 25.5, 0.84)
    pt3dadd(22.95, 26.79, 25.5, 0.84)
    pt3dadd(22.9, 26.95, 25.5, 0.84)
    pt3dadd(22.9, 27.16, 26.5, 0.84)
    pt3dadd(23.06, 27.26, 26.5, 0.84)
    pt3dadd(23.27, 27.32, 26.5, 0.84)
    pt3dadd(23.53, 27.21, 26.5, 0.84)
    pt3dadd(23.63, 27.11, 26.5, 0.84)
    pt3dadd(23.84, 26.95, 26.5, 0.84)
    pt3dadd(24, 26.9, 26.5, 0.84)
    pt3dadd(24.05, 26.79, 27, 0.84)
    pt3dadd(24.16, 26.74, 27, 0.84)
    pt3dadd(24.26, 26.68, 27, 0.84)
    pt3dadd(24.37, 26.68, 27, 0.84)
    pt3dadd(24.68, 26.68, 27, 0.84)
    pt3dadd(24.84, 26.9, 27, 0.84)
    pt3dadd(24.84, 27.21, 27, 0.84)
    pt3dadd(24.79, 27.42, 27, 0.84)
    pt3dadd(24.74, 27.53, 27, 0.84)
    pt3dadd(24.63, 27.68, 27, 0.84)
    pt3dadd(24.58, 27.84, 27, 0.84)
    pt3dadd(24.42, 28.16, 27, 0.84)
    pt3dadd(24.37, 28.31, 27, 0.84)
    pt3dadd(24.26, 28.52, 27, 0.84)
    pt3dadd(24.21, 28.68, 27, 0.84)
    pt3dadd(24.11, 28.84, 27, 0.84)
    pt3dadd(24.05, 29, 27, 0.84)
    pt3dadd(23.95, 29.16, 27, 0.84)
    pt3dadd(23.95, 29.37, 27, 0.84)
    pt3dadd(23.9, 29.47, 27, 0.84)
    pt3dadd(23.9, 29.79, 27, 0.84)
    pt3dadd(23.95, 29.89, 27, 0.84)
    pt3dadd(24, 30.05, 27, 0.84)
    pt3dadd(24.05, 30.15, 27, 0.84)
    pt3dadd(24.11, 30.26, 27, 0.84)
    pt3dadd(24.21, 30.42, 27, 0.84)
    pt3dadd(24.32, 30.63, 27.5, 0.84)
    pt3dadd(24.47, 30.79, 27.5, 0.84)
    pt3dadd(24.58, 30.89, 27.5, 0.84)
    pt3dadd(24.68, 31.05, 27.5, 0.84)
    pt3dadd(24.79, 31.15, 27.5, 0.84)
    pt3dadd(24.89, 31.31, 27.5, 0.84)
    pt3dadd(25, 31.47, 27.5, 0.84)
    pt3dadd(25.05, 31.63, 28, 0.84)
    pt3dadd(25.16, 31.73, 28, 0.84)
    pt3dadd(25.26, 31.84, 28, 0.84)
    pt3dadd(25.42, 31.99, 28, 0.84)
    pt3dadd(25.52, 32.1, 28, 0.84)
    pt3dadd(25.58, 32.26, 28.5, 0.84)
    pt3dadd(25.58, 32.47, 28.5, 0.84)
    pt3dadd(25.68, 32.63, 28.5, 0.84)
    pt3dadd(25.73, 32.84, 28.5, 0.84)
  }
}
proc shape3d_48() {
  dend[45] {
    pt3dadd(25.89, 32.99, 28.5, 0.84)
    pt3dadd(25.94, 33.1, 28.5, 0.84)
    pt3dadd(26.05, 33.2, 28.5, 0.84)
    pt3dadd(26.21, 33.2, 28.5, 0.84)
    pt3dadd(26.36, 33.26, 29, 0.84)
    pt3dadd(26.57, 33.36, 29, 0.84)
    pt3dadd(26.68, 33.4, 29, 0.84)
    pt3dadd(26.89, 33.4, 29, 0.84)
    pt3dadd(27.05, 33.47, 29, 0.84)
    pt3dadd(27.15, 33.52, 29, 0.84)
    pt3dadd(27.26, 33.57, 29, 0.84)
    pt3dadd(27.41, 33.61, 29, 0.84)
    pt3dadd(27.57, 33.72, 29, 0.84)
    pt3dadd(27.68, 33.72, 29, 0.84)
    pt3dadd(27.83, 33.89, 29, 0.84)
    pt3dadd(28.04, 33.99, 29, 0.84)
    pt3dadd(28.25, 34.2, 29, 0.84)
    pt3dadd(28.36, 34.31, 29, 0.84)
    pt3dadd(28.52, 34.47, 29, 0.84)
    pt3dadd(28.62, 34.68, 29, 0.84)
    pt3dadd(28.67, 34.83, 29, 0.84)
    pt3dadd(28.73, 34.94, 29, 0.84)
    pt3dadd(28.73, 35.15, 29, 0.84)
    pt3dadd(28.83, 35.2, 29, 0.84)
    pt3dadd(28.83, 35.46, 29, 0.84)
    pt3dadd(28.85, 36.72, 30, 0.84)
    pt3dadd(28.85, 36.93, 30.5, 0.84)
    pt3dadd(28.8, 37.09, 30.5, 0.84)
    pt3dadd(28.74, 37.29, 30.5, 0.84)
    pt3dadd(28.74, 37.56, 30.5, 0.84)
    pt3dadd(28.69, 37.72, 30.5, 0.84)
    pt3dadd(28.64, 37.93, 30.5, 0.84)
    pt3dadd(28.59, 38.08, 30.5, 0.84)
    pt3dadd(28.59, 38.35, 31, 0.84)
    pt3dadd(28.53, 38.45, 31, 0.84)
    pt3dadd(28.53, 38.77, 31, 0.84)
    pt3dadd(28.48, 38.86, 31, 0.84)
    pt3dadd(28.48, 39.19, 31, 0.84)
    pt3dadd(28.43, 39.4, 31, 0.84)
    pt3dadd(28.43, 39.71, 31, 0.84)
    pt3dadd(28.38, 39.82, 31, 0.84)
    pt3dadd(28.38, 40.03, 31, 0.84)
    pt3dadd(28.32, 40.19, 31, 0.84)
    pt3dadd(28.32, 40.45, 31, 0.84)
  }
  dend[46] {pt3dclear()
    pt3dadd(27.63, 18.11, 18.5, 0.84)
    pt3dadd(28.32, 18.1, 16, 0.84)
    pt3dadd(28.37, 18.26, 18, 0.84)
    pt3dadd(28.47, 18.42, 18, 0.84)
    pt3dadd(28.58, 18.52, 18, 0.84)
    pt3dadd(28.63, 18.68, 18, 0.84)
    pt3dadd(28.79, 18.84, 18, 0.84)
    pt3dadd(28.84, 19, 18, 0.84)
    pt3dadd(29, 19.1, 18, 0.84)
    pt3dadd(29.05, 19.21, 18, 0.84)
    pt3dadd(29.1, 19.37, 18, 0.84)
    pt3dadd(29.31, 19.47, 18, 0.84)
    pt3dadd(29.37, 19.57, 18, 0.84)
    pt3dadd(29.42, 19.68, 18, 0.84)
    pt3dadd(29.52, 19.79, 18, 0.84)
    pt3dadd(29.63, 19.89, 18, 0.84)
    pt3dadd(29.73, 19.94, 17.5, 0.84)
    pt3dadd(29.84, 20, 17.5, 0.84)
    pt3dadd(30.15, 20, 17, 0.84)
    pt3dadd(30.31, 19.89, 17, 0.84)
    pt3dadd(30.42, 19.84, 17, 0.84)
    pt3dadd(30.68, 19.73, 17, 0.84)
    pt3dadd(30.78, 19.63, 17, 0.84)
    pt3dadd(30.99, 19.37, 17, 0.84)
    pt3dadd(31.2, 19.26, 17, 0.84)
    pt3dadd(31.26, 19.05, 17, 0.84)
    pt3dadd(31.36, 18.89, 17, 0.84)
    pt3dadd(31.52, 18.89, 17, 0.84)
    pt3dadd(31.57, 18.79, 17, 0.84)
    pt3dadd(31.68, 18.63, 17, 0.84)
    pt3dadd(31.78, 18.52, 17, 0.84)
    pt3dadd(31.94, 18.52, 17, 0.84)
    pt3dadd(31.99, 18.42, 17, 0.84)
    pt3dadd(32.04, 18.3, 17, 0.84)
    pt3dadd(32.15, 18.16, 17, 0.84)
    pt3dadd(32.25, 18.1, 17, 0.84)
    pt3dadd(32.61, 17.73, 17.5, 0.84)
    pt3dadd(32.72, 17.63, 18.5, 0.84)
    pt3dadd(32.88, 17.57, 18.5, 0.84)
    pt3dadd(33.04, 17.53, 18.5, 0.84)
    pt3dadd(33.15, 17.37, 18.5, 0.84)
    pt3dadd(33.29, 17.32, 18.5, 0.84)
    pt3dadd(33.4, 17.21, 19, 0.84)
    pt3dadd(33.51, 17.11, 19, 0.84)
    pt3dadd(33.67, 17.05, 19, 0.84)
    pt3dadd(33.78, 16.95, 19, 0.84)
    pt3dadd(33.93, 16.95, 19, 0.84)
    pt3dadd(34.14, 16.84, 19, 0.84)
    pt3dadd(34.29, 16.84, 19, 0.84)
    pt3dadd(34.4, 16.73, 19, 0.84)
    pt3dadd(34.77, 16.68, 19, 0.84)
    pt3dadd(34.93, 16.63, 19, 0.84)
    pt3dadd(35.14, 16.57, 19, 0.84)
    pt3dadd(35.19, 16.53, 19.5, 0.84)
    pt3dadd(35.35, 16.53, 19.5, 0.84)
    pt3dadd(35.46, 16.47, 19.5, 0.84)
    pt3dadd(35.56, 16.42, 19.5, 0.84)
    pt3dadd(35.67, 16.37, 19.5, 0.84)
    pt3dadd(35.77, 16.32, 19.5, 0.84)
    pt3dadd(35.97, 16.26, 19.5, 0.84)
    pt3dadd(36.14, 16.21, 19.5, 0.84)
    pt3dadd(36.24, 16.11, 19.5, 0.84)
    pt3dadd(36.4, 16.11, 19.5, 0.84)
    pt3dadd(36.61, 16.05, 19.5, 0.84)
    pt3dadd(36.72, 15.95, 19.5, 0.84)
    pt3dadd(36.86, 15.9, 19.5, 0.84)
    pt3dadd(36.97, 15.79, 19.5, 0.84)
    pt3dadd(37.14, 15.74, 19.5, 0.84)
    pt3dadd(37.35, 15.69, 19.5, 0.84)
    pt3dadd(37.45, 15.58, 19.5, 0.84)
    pt3dadd(37.61, 15.58, 19.5, 0.84)
    pt3dadd(37.71, 15.48, 19.5, 0.84)
    pt3dadd(37.86, 15.53, 19.5, 0.84)
    pt3dadd(38.08, 15.48, 20, 0.84)
    pt3dadd(38.34, 15.48, 20, 0.84)
    pt3dadd(38.45, 15.42, 20, 0.84)
    pt3dadd(38.61, 15.32, 20, 0.84)
    pt3dadd(38.92, 15.32, 20, 0.84)
    pt3dadd(39.03, 15.32, 20, 0.84)
    pt3dadd(39.13, 15.27, 20.5, 0.84)
    pt3dadd(39.29, 15.27, 20.5, 0.84)
    pt3dadd(39.45, 15.21, 20.5, 0.84)
    pt3dadd(39.6, 15.21, 20.5, 0.84)
    pt3dadd(39.76, 15.16, 20.5, 0.84)
    pt3dadd(40.39, 15.16, 20.5, 0.84)
    pt3dadd(40.6, 15.21, 21, 0.84)
    pt3dadd(41.07, 15.21, 21, 0.84)
    pt3dadd(41.18, 15.27, 21, 0.84)
    pt3dadd(41.34, 15.21, 21, 0.84)
    pt3dadd(41.55, 15.16, 21, 0.84)
    pt3dadd(41.81, 15.16, 21, 0.84)
    pt3dadd(41.91, 15.05, 21, 0.84)
    pt3dadd(42.07, 15, 21, 0.84)
    pt3dadd(42.28, 14.9, 21, 0.84)
    pt3dadd(42.49, 14.79, 21, 0.84)
    pt3dadd(42.65, 14.74, 21, 0.84)
    pt3dadd(42.86, 14.63, 21, 0.84)
    pt3dadd(43.07, 14.53, 21, 0.84)
    pt3dadd(43.17, 14.48, 21, 0.84)
    pt3dadd(43.28, 14.42, 21, 0.84)
    pt3dadd(43.49, 14.37, 21.5, 0.84)
  }
  dend[47] {pt3dclear()
    pt3dadd(10.02, 1.26, 7.5, 1.1)
    pt3dadd(10.29, 0.32, 6.5, 0.94)
    pt3dadd(10.39, 0.21, 6.5, 0.94)
    pt3dadd(10.55, 0.16, 6.5, 0.94)
    pt3dadd(10.66, 0, 6.5, 0.94)
    pt3dadd(10.76, -0.11, 6.5, 0.94)
    pt3dadd(10.81, -0.21, 6.5, 0.94)
    pt3dadd(10.92, -0.42, 6.5, 0.94)
    pt3dadd(11.02, -0.57, 6.5, 0.94)
    pt3dadd(11.08, -0.79, 6.5, 0.94)
    pt3dadd(11.08, -0.95, 6.5, 0.94)
    pt3dadd(11.13, -1.05, 6.5, 0.94)
    pt3dadd(11.13, -1.26, 6.5, 0.94)
    pt3dadd(11.18, -1.26, 6, 0.94)
    pt3dadd(11.18, -1.42, 6, 0.94)
    pt3dadd(11.29, -1.52, 6, 0.94)
    pt3dadd(11.34, -1.68, 6, 0.94)
    pt3dadd(11.44, -1.79, 6, 0.94)
    pt3dadd(11.55, -1.89, 6, 0.94)
    pt3dadd(11.71, -1.95, 6, 0.94)
    pt3dadd(11.86, -2.04, 6, 0.94)
    pt3dadd(12.02, -2.1, 6, 0.94)
    pt3dadd(12.07, -2.21, 6, 0.94)
    pt3dadd(12.28, -2.31, 6, 0.94)
    pt3dadd(12.44, -2.31, 6, 0.94)
    pt3dadd(12.65, -2.47, 6.5, 0.94)
    pt3dadd(12.81, -2.52, 7, 0.94)
    pt3dadd(13.02, -2.58, 7, 0.94)
    pt3dadd(13.28, -2.58, 7, 0.94)
    pt3dadd(13.49, -2.63, 7, 0.94)
    pt3dadd(13.65, -2.68, 7, 0.94)
    pt3dadd(13.86, -2.68, 7, 0.94)
    pt3dadd(14.12, -2.73, 7, 0.94)
    pt3dadd(14.28, -2.63, 7, 0.94)
    pt3dadd(14.59, -2.31, 7, 0.94)
    pt3dadd(14.65, -2.16, 7, 0.94)
    pt3dadd(14.75, -2.04, 7, 0.94)
    pt3dadd(14.91, -1.89, 7, 0.94)
    pt3dadd(15.01, -1.79, 7, 0.94)
    pt3dadd(15.12, -1.68, 7, 0.94)
    pt3dadd(15.17, -1.52, 7, 0.94)
    pt3dadd(15.28, -1.47, 7, 0.94)
    pt3dadd(15.38, -1.37, 7, 0.94)
    pt3dadd(15.49, -1.31, 7, 0.94)
    pt3dadd(15.75, -1.31, 7, 0.94)
    pt3dadd(15.96, -1.15, 7, 0.94)
    pt3dadd(17.03, -1.84, 6.5, 0.94)
    pt3dadd(17.3, -1.84, 6, 0.94)
    pt3dadd(17.35, -2, 5.5, 0.94)
    pt3dadd(17.45, -2.11, 5.5, 0.94)
    pt3dadd(17.61, -2.21, 5.5, 0.94)
    pt3dadd(17.61, -2.31, 5.5, 0.94)
    pt3dadd(17.77, -2.48, 5.5, 0.94)
    pt3dadd(17.93, -2.58, 5.5, 0.94)
    pt3dadd(18.03, -2.63, 5.5, 0.94)
    pt3dadd(18.14, -2.74, 5.5, 0.94)
    pt3dadd(18.35, -2.79, 5.5, 0.94)
    pt3dadd(18.5, -2.84, 5.5, 0.94)
    pt3dadd(18.61, -2.9, 5.5, 0.94)
    pt3dadd(18.77, -2.95, 5.5, 0.94)
    pt3dadd(18.87, -3, 5.5, 0.94)
    pt3dadd(19.07, -3, 5.5, 0.94)
    pt3dadd(19.19, -3.05, 5.5, 0.94)
    pt3dadd(19.55, -3.05, 5.5, 0.94)
    pt3dadd(19.66, -3.05, 5.5, 0.94)
    pt3dadd(19.76, -3.05, 5.5, 0.94)
    pt3dadd(19.87, -3.11, 5.5, 0.94)
    pt3dadd(20.02, -3.11, 5.5, 0.94)
    pt3dadd(20.13, -3.16, 5.5, 0.94)
    pt3dadd(20.23, -3.26, 5.5, 0.94)
    pt3dadd(20.39, -3.32, 5.5, 0.94)
    pt3dadd(20.86, -3.32, 5.5, 0.94)
    pt3dadd(21.07, -3.37, 5.5, 0.94)
    pt3dadd(21.28, -3.32, 5.5, 0.94)
    pt3dadd(21.39, -3.26, 5.5, 0.94)
    pt3dadd(21.55, -3.26, 5.5, 0.94)
    pt3dadd(21.7, -3.16, 6, 0.94)
    pt3dadd(21.91, -3.16, 6, 0.94)
    pt3dadd(22.18, -3.05, 6, 0.94)
    pt3dadd(22.28, -3.11, 6, 0.94)
    pt3dadd(22.39, -3.05, 6, 0.94)
    pt3dadd(22.6, -3.05, 6, 0.94)
    pt3dadd(22.75, -3.16, 6, 0.94)
    pt3dadd(23.02, -3.16, 6, 0.94)
    pt3dadd(23.23, -3.26, 6, 0.94)
    pt3dadd(23.38, -3.32, 6, 0.94)
    pt3dadd(23.54, -3.26, 6, 0.94)
    pt3dadd(23.65, -3.26, 6, 0.94)
    pt3dadd(23.75, -3.32, 6, 0.94)
    pt3dadd(23.86, -3.37, 6, 0.94)
    pt3dadd(24.01, -3.32, 6, 0.94)
    pt3dadd(24.22, -3.26, 6, 0.94)
    pt3dadd(24.43, -3.26, 6, 0.94)
    pt3dadd(24.54, -3.21, 6, 0.94)
    pt3dadd(24.7, -3.11, 6, 0.94)
    pt3dadd(24.96, -3.11, 6, 0.94)
    pt3dadd(25.06, -3.05, 6, 0.94)
    pt3dadd(25.27, -3, 6, 0.94)
    pt3dadd(25.33, -2.9, 5.5, 0.94)
    pt3dadd(25.54, -2.84, 5.5, 0.94)
    pt3dadd(25.64, -2.79, 5.5, 0.94)
    pt3dadd(26.59, -2.79, 5.5, 0.94)
    pt3dadd(26.74, -2.79, 5.5, 0.94)
    pt3dadd(26.95, -2.79, 5.5, 0.94)
  }
}
proc shape3d_49() {
  dend[47] {
    pt3dadd(27.27, -2.79, 5.5, 0.94)
    pt3dadd(27.48, -2.79, 5.5, 0.94)
    pt3dadd(27.69, -2.84, 5.5, 0.94)
    pt3dadd(27.9, -2.84, 5.5, 0.94)
    pt3dadd(28.06, -2.9, 5.5, 0.94)
    pt3dadd(28.32, -2.9, 5.5, 0.94)
    pt3dadd(28.53, -2.95, 5.5, 0.94)
    pt3dadd(28.79, -3, 5.5, 0.94)
    pt3dadd(29.05, -3.05, 5.5, 0.94)
    pt3dadd(29.63, -3.05, 5.5, 0.94)
    pt3dadd(29.84, -3.11, 5.5, 0.94)
    pt3dadd(30, -3.11, 5.5, 0.94)
    pt3dadd(30.21, -3.16, 5.5, 0.94)
    pt3dadd(30.37, -3.21, 5.5, 0.94)
    pt3dadd(31, -3.21, 5.5, 0.94)
    pt3dadd(31.15, -3.32, 5.5, 0.94)
    pt3dadd(31.36, -3.26, 5.5, 0.94)
    pt3dadd(31.52, -3.32, 5.5, 0.94)
    pt3dadd(31.99, -3.32, 5.5, 0.94)
    pt3dadd(32.15, -3.37, 5.5, 0.94)
    pt3dadd(32.31, -3.37, 5.5, 0.94)
    pt3dadd(32.47, -3.42, 5.5, 0.94)
    pt3dadd(32.57, -3.47, 5.5, 0.94)
    pt3dadd(32.83, -3.58, 5.5, 0.94)
    pt3dadd(32.99, -3.63, 5.5, 0.94)
    pt3dadd(33.4, -3.79, 5.5, 0.94)
    pt3dadd(33.72, -3.84, 5.5, 0.94)
    pt3dadd(33.94, -3.89, 5.5, 0.94)
    pt3dadd(34.09, -4, 5.5, 0.94)
    pt3dadd(34.29, -4.05, 5.5, 0.94)
    pt3dadd(34.51, -4.05, 5.5, 0.94)
    pt3dadd(34.67, -4.16, 5.5, 0.94)
    pt3dadd(34.83, -4.16, 5.5, 0.94)
    pt3dadd(34.93, -4.21, 5.5, 0.94)
    pt3dadd(35.09, -4.21, 5.5, 0.94)
    pt3dadd(35.29, -4.26, 5.5, 0.94)
    pt3dadd(35.51, -4.32, 5.5, 0.94)
    pt3dadd(35.67, -4.42, 5.5, 0.94)
    pt3dadd(35.97, -4.58, 5.5, 0.94)
    pt3dadd(36.35, -4.63, 5.5, 0.94)
    pt3dadd(36.77, -4.63, 5.5, 0.94)
    pt3dadd(36.97, -4.68, 5.5, 0.94)
    pt3dadd(37.09, -4.74, 5.5, 0.94)
    pt3dadd(37.4, -4.84, 5.5, 0.94)
    pt3dadd(37.56, -4.95, 5.5, 0.94)
    pt3dadd(37.77, -5, 5.5, 0.94)
    pt3dadd(37.97, -5, 5.5, 0.94)
    pt3dadd(38.19, -5.09, 5.5, 0.94)
    pt3dadd(38.5, -5.26, 5.5, 0.94)
    pt3dadd(38.77, -5.31, 5.5, 0.94)
    pt3dadd(38.86, -5.37, 5.5, 0.94)
    pt3dadd(39.08, -5.47, 5.5, 0.94)
    pt3dadd(39.34, -5.58, 5.5, 0.94)
    pt3dadd(39.54, -5.73, 5.5, 0.94)
    pt3dadd(39.82, -5.79, 5.5, 0.94)
    pt3dadd(40.03, -5.84, 5.5, 0.94)
    pt3dadd(40.39, -6, 5.5, 0.94)
    pt3dadd(40.71, -6.1, 5.5, 0.94)
    pt3dadd(41.08, -6.26, 5.5, 0.94)
    pt3dadd(41.39, -6.26, 5.5, 0.94)
    pt3dadd(41.97, -6.42, 5.5, 0.94)
    pt3dadd(42.49, -6.52, 5.5, 0.94)
    pt3dadd(43.54, -6.68, 5.5, 0.94)
    pt3dadd(44.59, -6.84, 5.5, 0.94)
    pt3dadd(45.59, -6.89, 5.5, 0.94)
    pt3dadd(46.22, -6.94, 5.5, 0.94)
    pt3dadd(47, -6.51, 5.5, 0.94)
    pt3dadd(47.32, -6.51, 5.5, 0.94)
    pt3dadd(47.47, -6.56, 5.5, 0.94)
    pt3dadd(47.68, -6.67, 5.5, 0.94)
    pt3dadd(48, -6.72, 5.5, 0.94)
    pt3dadd(48.21, -6.82, 5.5, 0.94)
    pt3dadd(48.47, -6.82, 5.5, 0.94)
    pt3dadd(48.58, -6.88, 5.5, 0.94)
    pt3dadd(48.68, -6.93, 5.5, 0.94)
    pt3dadd(48.79, -6.93, 5, 0.94)
    pt3dadd(48.89, -7.03, 5, 0.94)
    pt3dadd(49, -7.14, 5, 0.94)
    pt3dadd(49.05, -7.24, 5, 0.94)
    pt3dadd(49.26, -7.45, 5, 0.94)
    pt3dadd(49.36, -7.56, 4.5, 0.94)
    pt3dadd(49.42, -7.72, 4.5, 0.94)
    pt3dadd(49.52, -7.93, 4.5, 0.94)
    pt3dadd(49.57, -8.09, 4.5, 0.94)
    pt3dadd(49.68, -8.24, 4.5, 0.94)
    pt3dadd(49.73, -8.35, 4.5, 0.94)
    pt3dadd(49.78, -8.56, 4.5, 0.94)
    pt3dadd(49.89, -8.66, 4.5, 0.94)
    pt3dadd(49.94, -8.86, 4.5, 0.94)
    pt3dadd(49.99, -9.02, 4.5, 0.94)
    pt3dadd(50.1, -9.14, 4.5, 0.94)
    pt3dadd(50.26, -9.24, 4.5, 0.94)
    pt3dadd(50.36, -9.28, 4.5, 0.94)
    pt3dadd(50.47, -9.4, 4.5, 0.94)
    pt3dadd(50.62, -9.51, 4.5, 0.94)
    pt3dadd(50.73, -9.56, 4, 0.94)
    pt3dadd(50.89, -9.66, 3.5, 0.94)
    pt3dadd(51.15, -9.66, 3.5, 0.94)
    pt3dadd(51.36, -9.72, 3.5, 0.94)
    pt3dadd(51.73, -9.72, 3.5, 0.94)
    pt3dadd(51.88, -9.66, 3.5, 0.94)
    pt3dadd(52.46, -9.66, 3.5, 0.94)
    pt3dadd(52.62, -9.66, 3.5, 0.94)
    pt3dadd(52.83, -9.72, 3.5, 0.94)
    pt3dadd(52.99, -9.77, 3.5, 0.94)
    pt3dadd(53.2, -9.82, 3.5, 0.94)
    pt3dadd(53.3, -9.86, 3, 0.94)
    pt3dadd(53.41, -9.93, 3, 0.94)
    pt3dadd(53.51, -9.98, 3, 0.94)
    pt3dadd(53.62, -10.02, 3, 0.94)
    pt3dadd(53.72, -10.08, 3, 0.94)
    pt3dadd(53.83, -10.14, 3, 0.94)
    pt3dadd(53.93, -10.19, 3, 0.94)
    pt3dadd(54.04, -10.24, 3, 0.94)
    pt3dadd(54.25, -10.45, 3, 0.94)
    pt3dadd(54.35, -10.56, 3, 0.94)
    pt3dadd(54.46, -10.61, 3, 0.94)
    pt3dadd(54.56, -10.66, 3, 0.94)
    pt3dadd(54.67, -10.71, 3, 0.94)
    pt3dadd(54.77, -10.77, 3, 0.94)
    pt3dadd(54.93, -10.87, 3, 0.94)
    pt3dadd(55.03, -10.87, 3, 0.94)
    pt3dadd(55.19, -10.92, 3, 0.94)
    pt3dadd(55.4, -10.92, 3, 0.94)
    pt3dadd(55.51, -10.98, 3, 0.94)
    pt3dadd(55.93, -10.98, 3, 0.94)
    pt3dadd(56.03, -11.03, 3, 0.94)
    pt3dadd(56.14, -11.03, 3, 0.94)
    pt3dadd(56.29, -11.03, 2.5, 0.94)
    pt3dadd(56.5, -11.08, 2.5, 0.94)
    pt3dadd(56.61, -11.03, 2.5, 0.94)
    pt3dadd(56.98, -11.03, 2.5, 0.94)
    pt3dadd(57.13, -11.08, 2.5, 0.94)
    pt3dadd(57.24, -11.08, 2.5, 0.94)
    pt3dadd(57.34, -11.19, 2.5, 0.94)
    pt3dadd(57.61, -11.19, 2.5, 0.94)
    pt3dadd(57.71, -11.29, 2, 0.94)
    pt3dadd(57.87, -11.35, 2, 0.94)
    pt3dadd(57.97, -11.45, 2, 0.94)
    pt3dadd(58.24, -11.61, 2, 0.94)
    pt3dadd(58.34, -11.71, 1.5, 0.94)
    pt3dadd(58.5, -11.82, 1.5, 0.94)
    pt3dadd(58.6, -11.92, 1.5, 0.94)
    pt3dadd(58.81, -12.03, 1.5, 0.94)
    pt3dadd(58.87, -12.13, 1, 0.94)
    pt3dadd(59.02, -12.24, 1, 0.94)
    pt3dadd(59.18, -12.4, 1, 0.94)
    pt3dadd(59.23, -12.61, 1, 0.94)
    pt3dadd(59.34, -12.55, 1, 0.94)
    pt3dadd(59.44, -12.66, 1, 0.94)
    pt3dadd(59.5, -12.82, 1, 0.94)
    pt3dadd(59.65, -12.97, 1, 0.94)
    pt3dadd(59.81, -12.97, 1, 0.94)
    pt3dadd(59.86, -13.08, 1, 0.94)
    pt3dadd(60.07, -13.18, 1, 0.94)
    pt3dadd(60.18, -13.24, 1, 0.94)
    pt3dadd(60.49, -13.24, 1, 0.94)
    pt3dadd(60.65, -13.29, 1, 0.94)
    pt3dadd(60.81, -13.34, 1, 0.94)
    pt3dadd(61.02, -13.34, 1, 0.94)
    pt3dadd(61.12, -13.45, 1, 0.94)
    pt3dadd(61.23, -13.5, 1, 0.94)
    pt3dadd(61.49, -13.5, 1, 0.94)
    pt3dadd(61.7, -13.55, 1, 0.94)
    pt3dadd(61.91, -13.71, 1, 0.94)
    pt3dadd(62.02, -13.76, 1, 0.94)
    pt3dadd(62.23, -13.82, 1, 0.94)
    pt3dadd(62.49, -13.92, 1, 0.94)
    pt3dadd(62.8, -14.08, 1, 0.94)
    pt3dadd(63.17, -14.13, 1, 0.94)
    pt3dadd(63.49, -14.34, 1, 0.94)
    pt3dadd(63.7, -14.39, 1, 0.94)
    pt3dadd(64.27, -14.66, 1, 0.94)
    pt3dadd(64.54, -14.81, 1, 0.94)
    pt3dadd(64.84, -14.92, 1, 0.94)
    pt3dadd(65.22, -14.97, 1, 0.94)
    pt3dadd(65.53, -15.08, 1, 0.94)
    pt3dadd(66.34, -15.74, 1.5, 0.94)
    pt3dadd(66.45, -15.89, 1.5, 0.94)
    pt3dadd(66.55, -16, 1.5, 0.94)
    pt3dadd(66.59, -16.16, 1.5, 0.94)
    pt3dadd(66.7, -16.26, 1.5, 0.94)
    pt3dadd(66.81, -16.37, 1.5, 0.94)
    pt3dadd(66.92, -16.52, 1.5, 0.94)
    pt3dadd(67.02, -16.63, 1.5, 0.94)
    pt3dadd(67.18, -16.73, 1.5, 0.94)
    pt3dadd(67.29, -16.73, 1.5, 0.94)
    pt3dadd(67.39, -16.79, 1.5, 0.94)
    pt3dadd(67.55, -16.79, 2, 0.94)
    pt3dadd(67.7, -16.89, 2, 0.94)
    pt3dadd(67.86, -17, 2, 0.94)
    pt3dadd(68.13, -17, 2, 0.94)
    pt3dadd(68.34, -17.05, 2, 0.94)
    pt3dadd(68.55, -17.1, 2, 0.94)
    pt3dadd(68.7, -17.1, 2, 0.94)
    pt3dadd(68.91, -17.14, 2, 0.94)
    pt3dadd(69.12, -17.14, 2, 0.94)
    pt3dadd(69.28, -17.21, 2.5, 0.94)
    pt3dadd(69.75, -17.21, 2.5, 0.94)
    pt3dadd(69.91, -17.26, 2.5, 0.94)
    pt3dadd(70.17, -17.26, 2.5, 0.94)
    pt3dadd(70.33, -17.3, 2.5, 0.94)
    pt3dadd(70.48, -17.37, 2.5, 0.94)
    pt3dadd(70.7, -17.37, 2.5, 0.94)
    pt3dadd(70.8, -17.42, 2.5, 0.94)
    pt3dadd(70.91, -17.47, 2.5, 0.94)
    pt3dadd(71.01, -17.47, 2.5, 0.94)
    pt3dadd(71.17, -17.52, 2.5, 0.94)
    pt3dadd(71.33, -17.57, 2.5, 0.94)
    pt3dadd(71.43, -17.63, 2.5, 0.94)
    pt3dadd(71.64, -17.68, 2.5, 0.94)
    pt3dadd(71.8, -17.79, 2.5, 0.94)
    pt3dadd(71.95, -17.89, 2.5, 0.94)
    pt3dadd(72.06, -17.94, 2.5, 0.94)
    pt3dadd(72.17, -18, 2, 0.94)
    pt3dadd(72.38, -18, 2, 0.94)
    pt3dadd(72.48, -18.1, 2, 0.94)
    pt3dadd(72.64, -18.14, 2, 0.94)
    pt3dadd(72.75, -18.21, 2, 0.94)
    pt3dadd(73.01, -18.3, 2, 0.94)
    pt3dadd(73.11, -18.42, 2, 0.94)
    pt3dadd(73.27, -18.47, 1.5, 0.94)
    pt3dadd(73.27, -18.78, 1.5, 0.94)
    pt3dadd(73.31, -18.94, 1.5, 0.94)
    pt3dadd(73.31, -19.63, 1.5, 0.94)
    pt3dadd(73.48, -19.78, 1.5, 0.94)
    pt3dadd(73.69, -19.94, 1.5, 0.94)
    pt3dadd(73.8, -19.98, 1.5, 0.94)
    pt3dadd(73.84, -20.14, 1.5, 0.94)
    pt3dadd(73.95, -20.2, 1.5, 0.94)
    pt3dadd(74.11, -20.26, 1.5, 0.94)
    pt3dadd(74.22, -20.3, 1.5, 0.94)
    pt3dadd(74.37, -20.36, 1.5, 0.94)
    pt3dadd(74.53, -20.47, 2, 0.94)
    pt3dadd(74.64, -20.52, 2, 0.94)
    pt3dadd(74.73, -20.57, 2, 0.94)
    pt3dadd(74.84, -20.62, 2, 0.94)
    pt3dadd(75.06, -20.62, 2.5, 0.94)
    pt3dadd(75.16, -20.68, 2.5, 0.94)
    pt3dadd(75.53, -20.68, 2.5, 0.94)
    pt3dadd(75.63, -20.73, 2.5, 0.94)
    pt3dadd(75.84, -20.73, 2.5, 0.94)
    pt3dadd(76.05, -20.78, 3, 0.94)
    pt3dadd(76.26, -20.78, 3, 0.94)
    pt3dadd(76.42, -20.62, 3, 0.94)
    pt3dadd(76.63, -20.68, 3, 0.94)
    pt3dadd(76.73, -20.57, 3, 0.94)
    pt3dadd(76.89, -20.52, 3, 0.94)
    pt3dadd(77, -20.47, 3, 0.94)
  }
}
proc shape3d_50() {
  dend[47] {
    pt3dadd(77.09, -20.3, 3, 0.94)
    pt3dadd(77.31, -20.3, 3, 0.94)
    pt3dadd(77.42, -20.2, 3, 0.94)
    pt3dadd(77.52, -20.14, 3, 0.94)
    pt3dadd(77.68, -19.98, 3, 0.94)
    pt3dadd(77.79, -19.89, 3, 0.94)
    pt3dadd(77.94, -19.78, 3, 0.94)
    pt3dadd(78.05, -19.78, 3, 0.94)
    pt3dadd(78.09, -19.68, 3, 0.94)
    pt3dadd(78.2, -19.63, 3, 0.94)
    pt3dadd(78.31, -19.63, 3, 0.94)
    pt3dadd(78.42, -19.57, 3, 0.94)
    pt3dadd(78.68, -19.52, 3, 0.94)
    pt3dadd(78.73, -19.63, 3, 0.94)
    pt3dadd(78.89, -19.78, 3, 0.94)
    pt3dadd(79.05, -19.94, 3, 0.94)
    pt3dadd(79.2, -20.1, 3, 0.94)
    pt3dadd(79.31, -20.14, 3, 0.94)
    pt3dadd(79.36, -20.26, 3, 0.94)
    pt3dadd(79.41, -20.36, 3, 0.94)
    pt3dadd(79.52, -20.47, 3, 0.94)
    pt3dadd(79.62, -20.52, 3, 0.94)
    pt3dadd(79.73, -20.68, 3, 0.94)
    pt3dadd(79.83, -20.73, 3, 0.94)
    pt3dadd(79.94, -20.73, 3, 0.94)
    pt3dadd(80.09, -20.83, 3, 0.94)
    pt3dadd(80.45, -20.83, 3, 0.94)
    pt3dadd(80.56, -20.78, 3, 0.94)
    pt3dadd(80.83, -20.78, 3, 0.94)
    pt3dadd(80.94, -20.73, 3, 0.94)
    pt3dadd(81.04, -20.73, 3, 0.94)
    pt3dadd(81.25, -20.68, 3, 0.94)
    pt3dadd(81.41, -20.62, 3, 0.94)
    pt3dadd(81.62, -20.62, 3, 0.94)
    pt3dadd(81.88, -20.52, 3, 0.94)
    pt3dadd(82.04, -20.52, 3, 0.94)
    pt3dadd(82.14, -20.41, 2.5, 0.94)
    pt3dadd(82.25, -20.41, 2.5, 0.94)
    pt3dadd(82.46, -20.36, 2.5, 0.94)
    pt3dadd(82.46, -20.26, 3, 0.94)
    pt3dadd(82.62, -20.1, 3.5, 0.94)
    pt3dadd(82.77, -19.98, 3.5, 0.94)
    pt3dadd(82.88, -19.94, 3.5, 0.94)
    pt3dadd(82.98, -19.89, 3.5, 0.94)
    pt3dadd(83.09, -19.84, 3.5, 0.94)
    pt3dadd(83.25, -19.78, 4, 0.94)
    pt3dadd(83.35, -19.73, 4, 0.94)
    pt3dadd(83.51, -19.57, 4, 0.94)
    pt3dadd(83.72, -19.57, 4, 0.94)
    pt3dadd(83.88, -19.52, 4, 0.94)
    pt3dadd(84.09, -19.52, 4, 0.94)
    pt3dadd(84.35, -19.42, 4, 0.94)
    pt3dadd(84.56, -19.3, 4, 0.94)
    pt3dadd(84.66, -19.3, 3.5, 0.94)
    pt3dadd(84.82, -19.26, 3, 0.94)
    pt3dadd(84.93, -19.14, 3, 0.94)
    pt3dadd(85.08, -19.14, 3, 0.94)
    pt3dadd(85.24, -18.98, 3, 0.94)
    pt3dadd(85.4, -18.94, 3, 0.94)
    pt3dadd(85.56, -18.84, 3, 0.94)
    pt3dadd(85.66, -18.73, 3, 0.94)
    pt3dadd(86.38, -17.78, 4.5, 0.94)
    pt3dadd(86.49, -17.62, 4.5, 0.94)
    pt3dadd(86.7, -17.62, 4.5, 0.94)
    pt3dadd(86.8, -17.51, 4.5, 0.94)
    pt3dadd(86.96, -17.41, 4.5, 0.94)
    pt3dadd(87.06, -17.36, 4.5, 0.94)
    pt3dadd(87.17, -17.25, 4.5, 0.94)
    pt3dadd(87.33, -17.2, 4.5, 0.94)
    pt3dadd(87.43, -17.09, 4.5, 0.94)
    pt3dadd(87.54, -16.98, 5, 0.94)
    pt3dadd(87.69, -16.94, 5, 0.94)
    pt3dadd(87.8, -16.82, 5, 0.94)
    pt3dadd(87.9, -16.73, 5, 0.94)
    pt3dadd(88.06, -16.62, 5, 0.94)
    pt3dadd(88.17, -16.57, 5, 0.94)
    pt3dadd(88.27, -16.52, 5, 0.94)
    pt3dadd(88.32, -16.41, 5, 0.94)
    pt3dadd(88.43, -16.3, 5, 0.94)
    pt3dadd(88.59, -16.3, 5, 0.94)
    pt3dadd(88.74, -16.2, 5, 0.94)
    pt3dadd(89, -16.2, 5, 0.94)
    pt3dadd(89.11, -16.25, 5.5, 0.94)
    pt3dadd(89.32, -16.3, 5.5, 0.94)
    pt3dadd(89.53, -16.3, 5.5, 0.94)
    pt3dadd(89.63, -16.41, 5.5, 0.94)
    pt3dadd(89.74, -16.46, 5.5, 0.94)
    pt3dadd(89.84, -16.46, 5.5, 0.94)
    pt3dadd(89.95, -16.57, 5.5, 0.94)
    pt3dadd(90.21, -16.57, 5.5, 0.94)
    pt3dadd(90.42, -16.62, 5.5, 0.94)
    pt3dadd(90.53, -16.67, 5.5, 0.94)
    pt3dadd(91.1, -16.67, 6, 0.94)
    pt3dadd(91.21, -16.57, 6, 0.94)
    pt3dadd(91.31, -16.52, 6, 0.94)
    pt3dadd(91.42, -16.41, 6, 0.94)
    pt3dadd(91.58, -16.25, 6, 0.94)
    pt3dadd(91.68, -16.04, 6, 0.94)
    pt3dadd(91.84, -15.78, 6, 0.94)
    pt3dadd(91.94, -15.67, 6.5, 0.94)
    pt3dadd(92, -15.46, 6.5, 0.94)
    pt3dadd(92.1, -15.31, 6.5, 0.94)
    pt3dadd(92.21, -15.1, 6.5, 0.94)
    pt3dadd(92.21, -14.94, 6.5, 0.94)
    pt3dadd(92.31, -14.78, 6.5, 0.94)
    pt3dadd(92.36, -14.68, 6.5, 0.94)
    pt3dadd(92.42, -14.57, 6.5, 0.94)
    pt3dadd(92.47, -14.47, 6.5, 0.94)
    pt3dadd(92.52, -14.36, 7, 0.94)
    pt3dadd(92.57, -14.26, 7, 0.94)
    pt3dadd(92.63, -14.1, 7, 0.94)
    pt3dadd(92.73, -14.05, 7, 0.94)
    pt3dadd(92.84, -13.94, 7, 0.94)
    pt3dadd(92.94, -13.83, 7, 0.94)
    pt3dadd(92.99, -13.68, 7, 0.94)
    pt3dadd(93.1, -13.47, 7, 0.94)
    pt3dadd(93.2, -13.36, 7, 0.94)
    pt3dadd(93.36, -13.2, 7, 0.94)
    pt3dadd(93.47, -12.99, 7, 0.94)
    pt3dadd(93.57, -12.94, 7, 0.94)
    pt3dadd(93.62, -12.84, 7, 0.94)
    pt3dadd(93.73, -12.73, 7, 0.94)
    pt3dadd(93.83, -12.52, 7, 0.94)
    pt3dadd(93.94, -12.52, 7, 0.94)
    pt3dadd(93.99, -12.36, 6.5, 0.94)
    pt3dadd(94.1, -12.31, 6.5, 0.94)
    pt3dadd(94.2, -12.15, 6.5, 0.94)
    pt3dadd(94.31, -12.15, 6.5, 0.94)
    pt3dadd(94.41, -11.99, 6.5, 0.94)
    pt3dadd(94.52, -11.89, 6.5, 0.94)
    pt3dadd(94.62, -11.73, 6.5, 0.94)
    pt3dadd(94.78, -11.57, 6.5, 0.94)
    pt3dadd(94.94, -11.36, 6, 0.94)
    pt3dadd(95.04, -11.26, 6, 0.94)
    pt3dadd(95.09, -11.15, 6, 0.94)
    pt3dadd(95.2, -11.1, 5.5, 0.94)
    pt3dadd(95.25, -11, 5.5, 0.94)
    pt3dadd(95.57, -10.68, 5, 0.94)
    pt3dadd(95.72, -10.47, 5, 0.94)
    pt3dadd(95.78, -10.37, 5, 0.94)
    pt3dadd(95.88, -10.26, 5, 0.94)
    pt3dadd(95.88, -10, 5, 0.94)
    pt3dadd(95.93, -9.78, 5, 0.94)
    pt3dadd(95.93, -9.63, 6, 0.94)
    pt3dadd(95.99, -9.52, 6, 0.94)
    pt3dadd(95.99, -9.31, 6, 0.94)
    pt3dadd(96.09, -9.26, 7.5, 0.94)
    pt3dadd(96.2, -9.16, 7.5, 0.94)
    pt3dadd(96.25, -9, 7.5, 0.94)
    pt3dadd(96.3, -8.89, 7.5, 0.94)
    pt3dadd(96.41, -8.78, 8.5, 0.94)
    pt3dadd(96.51, -8.63, 8.5, 0.94)
    pt3dadd(96.51, -8.47, 8.5, 0.94)
    pt3dadd(96.62, -8.26, 8.5, 0.94)
    pt3dadd(96.67, -8.1, 8.5, 0.94)
    pt3dadd(96.72, -7.89, 8.5, 0.94)
    pt3dadd(96.83, -7.74, 8.5, 0.94)
    pt3dadd(96.88, -7.63, 8.5, 0.94)
    pt3dadd(96.93, -7.47, 8.5, 0.94)
    pt3dadd(96.93, -7.16, 8.5, 0.94)
    pt3dadd(96.98, -7, 8.5, 0.94)
    pt3dadd(96.93, -6.79, 8.5, 0.94)
    pt3dadd(96.93, -6.63, 8.5, 0.94)
    pt3dadd(96.88, -6.42, 8.5, 0.94)
    pt3dadd(96.83, -6.26, 8.5, 0.94)
    pt3dadd(96.67, -6, 8.5, 0.94)
    pt3dadd(96.67, -5.79, 9, 0.94)
    pt3dadd(96.56, -5.69, 9, 0.94)
    pt3dadd(96.46, -5.53, 9, 0.94)
    pt3dadd(96.41, -5.42, 9.5, 0.94)
    pt3dadd(96.3, -5.32, 9.5, 0.94)
    pt3dadd(96.2, -5.16, 9.5, 0.94)
    pt3dadd(96.14, -5.05, 10, 0.94)
    pt3dadd(96.09, -4.84, 10, 0.94)
    pt3dadd(95.99, -4.74, 10, 0.94)
    pt3dadd(95.93, -4.63, 10, 0.94)
    pt3dadd(95.83, -4.53, 10, 0.94)
    pt3dadd(95.83, -4.32, 10, 0.94)
    pt3dadd(95.72, -4.16, 10, 0.94)
    pt3dadd(95.62, -4, 10, 0.94)
    pt3dadd(95.57, -3.85, 10, 0.94)
    pt3dadd(95.46, -3.69, 10.5, 0.94)
    pt3dadd(95.41, -3.58, 10.5, 0.94)
    pt3dadd(95.3, -3.43, 10.5, 0.94)
    pt3dadd(95.3, -3.27, 10.5, 0.94)
    pt3dadd(95.15, -3.01, 10.5, 0.94)
    pt3dadd(95.09, -2.85, 10.5, 0.94)
    pt3dadd(94.99, -2.69, 10.5, 0.94)
    pt3dadd(94.94, -2.52, 10.5, 0.94)
    pt3dadd(94.88, -2.31, 11, 0.94)
    pt3dadd(94.88, -2.06, 11, 0.94)
    pt3dadd(94.83, -1.85, 11, 0.94)
    pt3dadd(94.78, -1.64, 11, 0.94)
    pt3dadd(94.78, -1.01, 11.5, 0.94)
    pt3dadd(94.83, -0.85, 11.5, 0.94)
    pt3dadd(94.88, -0.64, 11.5, 0.94)
    pt3dadd(94.94, -0.48, 11.5, 0.94)
    pt3dadd(94.94, -0.27, 11.5, 0.94)
    pt3dadd(95.04, -0.17, 11.5, 0.94)
    pt3dadd(95.09, -0.01, 11.5, 0.94)
    pt3dadd(95.2, 0.1, 11.5, 0.94)
    pt3dadd(95.25, 0.2, 11.5, 0.94)
    pt3dadd(95.36, 0.41, 11.5, 0.94)
    pt3dadd(95.41, 0.56, 11.5, 0.94)
    pt3dadd(95.51, 0.67, 11.5, 0.94)
    pt3dadd(95.51, 0.99, 11.5, 0.94)
    pt3dadd(95.57, 1.09, 11.5, 0.94)
    pt3dadd(95.67, 1.2, 11.5, 0.94)
    pt3dadd(95.67, 1.36, 12, 0.94)
    pt3dadd(95.78, 1.46, 12, 0.94)
    pt3dadd(95.83, 1.73, 12, 0.94)
    pt3dadd(95.93, 1.94, 12, 0.94)
    pt3dadd(95.99, 2.2, 12, 0.94)
    pt3dadd(96.09, 2.29, 12, 0.94)
    pt3dadd(96.34, 3.41, 13, 0.94)
    pt3dadd(96.23, 3.46, 13, 0.94)
    pt3dadd(96.23, 3.67, 13, 0.94)
    pt3dadd(96.23, 4.3, 13.5, 0.94)
    pt3dadd(96.39, 4.41, 13.5, 0.94)
    pt3dadd(96.6, 4.62, 14, 0.94)
    pt3dadd(96.71, 4.73, 14, 0.94)
    pt3dadd(96.86, 4.73, 14, 0.94)
    pt3dadd(97.07, 4.78, 14, 0.94)
    pt3dadd(97.23, 4.83, 14, 0.94)
    pt3dadd(97.39, 4.88, 14, 0.94)
    pt3dadd(97.55, 4.94, 14, 0.94)
    pt3dadd(97.76, 4.99, 14, 0.94)
    pt3dadd(97.86, 5.09, 14.5, 0.94)
    pt3dadd(97.97, 5.2, 14.5, 0.94)
    pt3dadd(98.07, 5.3, 14.5, 0.94)
    pt3dadd(98.18, 5.46, 14.5, 0.94)
    pt3dadd(98.33, 5.51, 14.5, 0.94)
    pt3dadd(98.44, 5.67, 14.5, 0.94)
    pt3dadd(98.54, 5.72, 14.5, 0.94)
    pt3dadd(98.6, 5.83, 14.5, 0.94)
    pt3dadd(98.7, 5.94, 14.5, 0.94)
    pt3dadd(98.75, 6.04, 14.5, 0.94)
    pt3dadd(98.81, 6.15, 14.5, 0.94)
    pt3dadd(98.91, 6.25, 14.5, 0.94)
    pt3dadd(99.07, 6.41, 14.5, 0.94)
    pt3dadd(99.17, 6.62, 14.5, 0.94)
    pt3dadd(99.33, 6.78, 14.5, 0.94)
    pt3dadd(99.38, 6.99, 15, 0.94)
    pt3dadd(99.49, 7.09, 15, 0.94)
    pt3dadd(99.54, 7.3, 15, 0.94)
    pt3dadd(99.59, 7.46, 15, 0.94)
    pt3dadd(99.7, 7.67, 15, 0.94)
    pt3dadd(99.7, 7.88, 15, 0.94)
    pt3dadd(99.75, 8.03, 15, 0.94)
  }
}
proc shape3d_51() {
  dend[47] {
    pt3dadd(99.75, 8.51, 15, 0.94)
    pt3dadd(99.8, 8.67, 15, 0.94)
    pt3dadd(99.8, 8.83, 15, 0.94)
    pt3dadd(99.86, 8.98, 15, 0.94)
    pt3dadd(99.96, 9.09, 15, 0.94)
    pt3dadd(100.01, 9.35, 15, 0.94)
    pt3dadd(100.12, 9.46, 15, 0.94)
    pt3dadd(100.28, 9.46, 15, 0.94)
    pt3dadd(100.43, 9.51, 15, 0.94)
    pt3dadd(100.59, 9.67, 15, 0.94)
    pt3dadd(100.8, 9.88, 15, 0.94)
    pt3dadd(101.01, 10.03, 15, 0.94)
    pt3dadd(101.17, 10.14, 15, 0.94)
    pt3dadd(101.27, 10.19, 15, 0.94)
    pt3dadd(101.38, 10.3, 15, 0.94)
    pt3dadd(101.48, 10.4, 15, 0.94)
    pt3dadd(101.69, 10.51, 15, 0.94)
    pt3dadd(101.8, 10.61, 15, 0.94)
    pt3dadd(101.96, 10.77, 15, 0.94)
    pt3dadd(102.01, 10.88, 15, 0.94)
    pt3dadd(102.17, 10.88, 15, 0.94)
    pt3dadd(102.22, 10.98, 15, 0.94)
    pt3dadd(102.38, 10.98, 15, 0.94)
    pt3dadd(102.53, 11.09, 15, 0.94)
    pt3dadd(102.69, 11.24, 15, 0.94)
    pt3dadd(102.8, 11.24, 15, 0.94)
    pt3dadd(102.95, 11.35, 15.5, 0.94)
    pt3dadd(103.22, 11.61, 15.5, 0.94)
    pt3dadd(103.37, 11.67, 15.5, 0.94)
    pt3dadd(103.53, 11.77, 15.5, 0.94)
    pt3dadd(103.58, 11.88, 15.5, 0.94)
    pt3dadd(103.74, 11.93, 15.5, 0.94)
    pt3dadd(103.85, 12.14, 15.5, 0.94)
    pt3dadd(103.95, 12.3, 15.5, 0.94)
    pt3dadd(104, 12.4, 15.5, 0.94)
    pt3dadd(104.06, 12.51, 16, 0.94)
    pt3dadd(104.11, 12.66, 16, 0.94)
    pt3dadd(104.27, 12.98, 16, 0.94)
    pt3dadd(104.32, 13.08, 16, 0.94)
    pt3dadd(104.37, 13.24, 16, 0.94)
    pt3dadd(104.42, 13.35, 16, 0.94)
    pt3dadd(104.63, 13.51, 16, 0.94)
    pt3dadd(104.69, 13.66, 16, 0.94)
    pt3dadd(104.84, 13.87, 16, 0.94)
    pt3dadd(105, 13.98, 16, 0.94)
    pt3dadd(106.31, 14.77, 17.5, 0.94)
    pt3dadd(106.36, 14.93, 17.5, 0.94)
    pt3dadd(106.41, 15.03, 17.5, 0.94)
    pt3dadd(106.46, 15.14, 17.5, 0.94)
    pt3dadd(106.57, 15.24, 17.5, 0.94)
    pt3dadd(106.67, 15.4, 17.5, 0.94)
    pt3dadd(106.88, 15.61, 17.5, 0.94)
    pt3dadd(107.09, 15.82, 17.5, 0.94)
    pt3dadd(107.2, 15.93, 17.5, 0.94)
    pt3dadd(107.25, 16.03, 17.5, 0.94)
    pt3dadd(107.36, 16.07, 17.5, 0.94)
  }
  dend[48] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-3.52, 0.63, 9.5, 0.94)
    pt3dadd(-3.62, 0.79, 9.5, 0.94)
    pt3dadd(-3.78, 0.89, 9.5, 0.94)
    pt3dadd(-4.2, 0.89, 9.5, 0.94)
    pt3dadd(-4.3, 0.95, 9.5, 0.94)
    pt3dadd(-4.57, 0.95, 9.5, 0.94)
    pt3dadd(-4.67, 1, 9, 0.94)
    pt3dadd(-4.99, 1, 9, 0.94)
    pt3dadd(-5.2, 1.15, 9, 0.94)
    pt3dadd(-5.3, 1.21, 9, 0.94)
    pt3dadd(-5.41, 1.31, 9, 0.94)
    pt3dadd(-5.72, 1.31, 9.5, 0.94)
    pt3dadd(-5.83, 1.37, 9.5, 0.94)
    pt3dadd(-5.98, 1.42, 9.5, 0.94)
    pt3dadd(-6.67, 1.42, 10, 0.94)
    pt3dadd(-6.77, 1.37, 10, 0.94)
    pt3dadd(-6.93, 1.15, 10, 0.94)
    pt3dadd(-7.14, 1.15, 10.5, 0.94)
    pt3dadd(-7.24, 1.15, 10.5, 0.94)
    pt3dadd(-7.4, 1.15, 10.5, 0.94)
    pt3dadd(-7.51, 1.21, 10.5, 0.94)
    pt3dadd(-7.82, 1.21, 10.5, 0.94)
    pt3dadd(-8.56, 1.26, 11, 0.94)
    pt3dadd(-8.61, 1.1, 11, 0.94)
    pt3dadd(-8.61, 0.89, 11, 0.94)
    pt3dadd(-8.61, 0.53, 11, 0.94)
    pt3dadd(-8.61, 0.42, 11.5, 0.94)
    pt3dadd(-8.61, 0.21, 11.5, 0.94)
    pt3dadd(-8.71, 0.05, 11.5, 0.94)
    pt3dadd(-8.82, -0.05, 11.5, 0.94)
    pt3dadd(-8.82, -0.32, 11.5, 0.94)
    pt3dadd(-8.86, -0.42, 11.5, 0.94)
    pt3dadd(-9.08, -1.21, 11.5, 0.89)
    pt3dadd(-9.13, -1.37, 11.5, 0.89)
    pt3dadd(-9.13, -1.58, 11.5, 0.89)
    pt3dadd(-9.19, -1.68, 11.5, 0.89)
    pt3dadd(-9.19, -2, 11.5, 0.89)
    pt3dadd(-9.28, -2.16, 11.5, 0.89)
    pt3dadd(-9.66, -2.16, 12, 0.89)
    pt3dadd(-9.82, -2.1, 13, 0.89)
    pt3dadd(-9.92, -2.04, 13, 0.89)
    pt3dadd(-9.97, -1.95, 13, 0.89)
    pt3dadd(-9.97, -1.73, 13, 0.89)
    pt3dadd(-10.02, -1.58, 13.5, 0.89)
    pt3dadd(-10.02, -1.21, 13.5, 0.89)
    pt3dadd(-10.08, -1, 13.5, 0.89)
    pt3dadd(-10.08, -0.74, 13.5, 0.89)
    pt3dadd(-10.18, -0.47, 13.5, 0.89)
    pt3dadd(-10.24, -0.37, 14, 0.89)
    pt3dadd(-10.39, -0.11, 14, 0.89)
    pt3dadd(-10.5, -0.05, 14, 0.89)
    pt3dadd(-10.6, 0.05, 14, 0.89)
    pt3dadd(-10.71, 0.11, 14, 0.89)
    pt3dadd(-10.87, 0.16, 14, 0.89)
    pt3dadd(-10.97, 0.21, 14, 0.89)
    pt3dadd(-11.13, 0.26, 14, 0.89)
    pt3dadd(-11.34, 0.32, 14, 0.89)
  }
  dend[49] {pt3dclear()
    pt3dadd(-11.34, 0.32, 14, 0.89)
    pt3dadd(-11.5, 0.42, 14, 0.89)
    pt3dadd(-12.02, 0.42, 14.5, 0.89)
    pt3dadd(-12.23, 0.37, 14.5, 0.89)
    pt3dadd(-12.44, 0.37, 14.5, 0.89)
    pt3dadd(-12.6, 0.32, 14.5, 0.89)
    pt3dadd(-12.76, 0.37, 14.5, 0.89)
    pt3dadd(-12.97, 0.37, 14.5, 0.89)
    pt3dadd(-13.12, 0.42, 14.5, 0.89)
    pt3dadd(-13.23, 0.53, 15, 0.89)
    pt3dadd(-13.39, 0.47, 15, 0.89)
    pt3dadd(-13.75, 0.47, 15, 0.89)
    pt3dadd(-13.86, 0.53, 15, 0.89)
    pt3dadd(-14.02, 0.57, 15, 0.89)
    pt3dadd(-14.12, 0.68, 15, 0.89)
    pt3dadd(-14.33, 0.68, 15, 0.89)
    pt3dadd(-14.49, 0.74, 15, 0.89)
    pt3dadd(-14.54, 0.95, 15, 0.89)
    pt3dadd(-14.7, 0.95, 15, 0.89)
    pt3dadd(-14.86, 1.1, 15, 0.89)
    pt3dadd(-14.96, 1.21, 15, 0.89)
    pt3dadd(-15.07, 1.31, 15, 0.89)
    pt3dadd(-15.12, 1.47, 15, 0.89)
    pt3dadd(-15.22, 1.58, 15, 0.89)
    pt3dadd(-15.33, 1.68, 15, 0.89)
    pt3dadd(-15.38, 1.79, 15, 0.89)
    pt3dadd(-15.49, 1.84, 15, 0.89)
    pt3dadd(-15.59, 1.95, 15, 0.89)
    pt3dadd(-15.64, 2.1, 15, 0.89)
    pt3dadd(-15.75, 2.21, 15, 0.89)
    pt3dadd(-15.85, 2.42, 15, 0.89)
    pt3dadd(-16.01, 2.47, 15, 0.89)
    pt3dadd(-16.01, 2.68, 15, 0.89)
    pt3dadd(-16.12, 2.68, 15, 0.89)
    pt3dadd(-16.17, 2.84, 15, 0.89)
    pt3dadd(-16.27, 2.94, 15, 0.89)
    pt3dadd(-16.38, 3.05, 15, 0.89)
    pt3dadd(-16.48, 3.21, 15, 0.89)
    pt3dadd(-17.54, 3.28, 15.5, 0.89)
    pt3dadd(-17.7, 3.38, 15.5, 0.89)
    pt3dadd(-17.8, 3.43, 15.5, 0.89)
    pt3dadd(-17.91, 3.49, 15.5, 0.89)
    pt3dadd(-18.07, 3.49, 15.5, 0.89)
    pt3dadd(-18.17, 3.54, 15.5, 0.89)
    pt3dadd(-18.64, 3.59, 15.5, 0.89)
    pt3dadd(-18.7, 3.7, 16, 0.89)
    pt3dadd(-18.8, 3.75, 16, 0.89)
    pt3dadd(-18.91, 3.86, 16, 0.89)
    pt3dadd(-18.96, 3.96, 16, 0.89)
    pt3dadd(-19.05, 4.01, 16, 0.89)
    pt3dadd(-19.17, 4.07, 16, 0.89)
    pt3dadd(-19.27, 4.12, 16, 0.89)
    pt3dadd(-19.38, 4.22, 16, 0.89)
    pt3dadd(-19.54, 4.22, 16, 0.89)
    pt3dadd(-19.64, 4.28, 16, 0.89)
    pt3dadd(-19.8, 4.28, 16, 0.89)
    pt3dadd(-19.89, 4.22, 16, 0.89)
    pt3dadd(-20.05, 4.12, 16, 0.89)
    pt3dadd(-20.17, 4.01, 16, 0.89)
    pt3dadd(-20.32, 3.86, 16, 0.89)
    pt3dadd(-20.48, 3.7, 16.5, 0.89)
    pt3dadd(-20.59, 3.59, 16.5, 0.89)
    pt3dadd(-20.69, 3.54, 16.5, 0.89)
    pt3dadd(-20.85, 3.43, 16.5, 0.89)
    pt3dadd(-21.01, 3.43, 16.5, 0.89)
    pt3dadd(-21.11, 3.38, 16.5, 0.89)
    pt3dadd(-21.22, 3.43, 16.5, 0.89)
    pt3dadd(-21.32, 3.54, 16.5, 0.89)
    pt3dadd(-21.48, 3.59, 16.5, 0.89)
    pt3dadd(-21.58, 3.7, 17, 0.89)
    pt3dadd(-21.74, 3.86, 17, 0.89)
    pt3dadd(-21.85, 3.96, 17, 0.89)
    pt3dadd(-21.95, 4.07, 17, 0.89)
    pt3dadd(-22, 4.28, 17, 0.89)
    pt3dadd(-22.11, 4.28, 17, 0.89)
    pt3dadd(-22.21, 4.38, 17, 0.89)
    pt3dadd(-22.27, 4.54, 17, 0.89)
    pt3dadd(-22.21, 4.75, 17, 0.89)
    pt3dadd(-22.06, 4.8, 17, 0.89)
    pt3dadd(-22.06, 5.05, 17.5, 0.89)
    pt3dadd(-21.95, 5.17, 17.5, 0.89)
    pt3dadd(-21.95, 5.33, 17.5, 0.89)
    pt3dadd(-21.85, 5.43, 17.5, 0.89)
    pt3dadd(-21.64, 5.54, 17.5, 0.89)
    pt3dadd(-21.64, 5.7, 17.5, 0.89)
    pt3dadd(-21.58, 5.85, 17.5, 0.89)
    pt3dadd(-21.43, 6.06, 17.5, 0.89)
    pt3dadd(-21.43, 6.17, 17.5, 0.89)
    pt3dadd(-21.32, 6.27, 17.5, 0.89)
    pt3dadd(-21.27, 6.38, 17.5, 0.89)
    pt3dadd(-21.16, 6.54, 17.5, 0.89)
    pt3dadd(-21.11, 6.64, 17.5, 0.89)
    pt3dadd(-21.01, 6.75, 18, 0.89)
    pt3dadd(-20.95, 6.96, 18, 0.89)
    pt3dadd(-20.95, 7.11, 18, 0.89)
    pt3dadd(-20.9, 7.32, 18, 0.89)
    pt3dadd(-20.9, 7.59, 18.5, 0.89)
    pt3dadd(-20.95, 7.8, 18.5, 0.89)
    pt3dadd(-20.95, 7.96, 18.5, 0.89)
    pt3dadd(-21.11, 8.06, 18.5, 0.89)
    pt3dadd(-21.06, 8.22, 18.5, 0.89)
    pt3dadd(-21.16, 8.32, 18.5, 0.89)
    pt3dadd(-21.32, 8.38, 18.5, 0.89)
    pt3dadd(-21.53, 8.38, 19, 0.89)
    pt3dadd(-21.69, 8.48, 19, 0.89)
    pt3dadd(-21.9, 8.52, 19, 0.89)
    pt3dadd(-22.06, 8.64, 19, 0.89)
    pt3dadd(-22.27, 8.74, 19, 0.89)
    pt3dadd(-22.37, 8.94, 19, 0.89)
    pt3dadd(-22.42, 9.06, 19, 0.89)
    pt3dadd(-22.53, 9.22, 19, 0.89)
    pt3dadd(-22.53, 9.38, 19, 0.89)
    pt3dadd(-22.63, 9.52, 19, 0.89)
    pt3dadd(-22.74, 9.48, 19, 0.89)
    pt3dadd(-22.9, 9.59, 19.5, 0.89)
    pt3dadd(-23, 9.69, 19.5, 0.89)
    pt3dadd(-23.16, 9.69, 19.5, 0.89)
    pt3dadd(-23.26, 9.8, 19.5, 0.89)
    pt3dadd(-23.42, 9.85, 20, 0.89)
    pt3dadd(-23.52, 9.9, 20, 0.89)
    pt3dadd(-23.68, 10.01, 20, 0.89)
    pt3dadd(-23.84, 10.11, 20, 0.89)
    pt3dadd(-23.94, 10.16, 20, 0.89)
    pt3dadd(-24.15, 10.27, 20, 0.89)
    pt3dadd(-24.26, 10.32, 20, 0.89)
    pt3dadd(-24.42, 10.37, 20, 0.89)
    pt3dadd(-24.52, 10.43, 20.5, 0.89)
    pt3dadd(-24.68, 10.48, 20.5, 0.89)
    pt3dadd(-24.89, 10.48, 20.5, 0.89)
    pt3dadd(-24.99, 10.58, 20.5, 0.89)
    pt3dadd(-25.15, 10.58, 21, 0.89)
    pt3dadd(-25.26, 10.64, 21, 0.89)
    pt3dadd(-25.47, 10.74, 21, 0.89)
    pt3dadd(-25.62, 10.79, 21, 0.89)
    pt3dadd(-25.73, 10.9, 21, 0.89)
  }
}
proc shape3d_52() {
  dend[49] {
    pt3dadd(-25.83, 10.95, 21.5, 0.89)
    pt3dadd(-25.99, 11.16, 21.5, 0.89)
    pt3dadd(-26.1, 11.27, 21.5, 0.89)
    pt3dadd(-26.2, 11.43, 21.5, 0.89)
    pt3dadd(-26.36, 11.53, 21.5, 0.89)
    pt3dadd(-26.41, 11.64, 21.5, 0.89)
    pt3dadd(-26.57, 11.74, 21.5, 0.89)
    pt3dadd(-26.67, 11.79, 21.5, 0.89)
    pt3dadd(-26.88, 11.85, 21.5, 0.89)
    pt3dadd(-26.94, 11.95, 21.5, 0.89)
    pt3dadd(-27.09, 12.06, 21.5, 0.89)
    pt3dadd(-27.2, 12.16, 21.5, 0.89)
    pt3dadd(-27.2, 12.27, 21.5, 0.89)
    pt3dadd(-27.36, 12.32, 21.5, 0.89)
    pt3dadd(-27.46, 12.42, 21.5, 0.89)
    pt3dadd(-27.62, 12.53, 21.5, 0.89)
    pt3dadd(-27.78, 12.58, 21.5, 0.89)
    pt3dadd(-27.88, 12.69, 21.5, 0.89)
    pt3dadd(-28.09, 12.79, 21.5, 0.89)
    pt3dadd(-28.2, 12.84, 21.5, 0.89)
    pt3dadd(-28.35, 12.9, 21.5, 0.89)
    pt3dadd(-28.56, 12.95, 21.5, 0.89)
    pt3dadd(-28.67, 13, 21.5, 0.89)
    pt3dadd(-28.93, 13.11, 21.5, 0.89)
    pt3dadd(-29.09, 13.11, 21.5, 0.89)
    pt3dadd(-29.4, 13.11, 21.5, 0.89)
    pt3dadd(-29.56, 12.84, 22, 0.89)
    pt3dadd(-29.67, 12.74, 22, 0.89)
    pt3dadd(-29.77, 12.69, 22, 0.89)
    pt3dadd(-30.09, 12.69, 22, 0.89)
    pt3dadd(-30.24, 12.63, 22, 0.89)
    pt3dadd(-30.35, 12.69, 22, 0.89)
    pt3dadd(-30.61, 12.69, 22, 0.89)
    pt3dadd(-30.82, 12.74, 22, 0.89)
    pt3dadd(-31.08, 12.79, 22, 0.89)
    pt3dadd(-31.19, 12.9, 22, 0.89)
    pt3dadd(-31.35, 13, 22, 0.89)
    pt3dadd(-31.45, 13.11, 22, 0.89)
    pt3dadd(-31.66, 13.11, 22, 0.89)
    pt3dadd(-31.77, 13.16, 22, 0.89)
    pt3dadd(-31.92, 13.21, 22, 0.89)
    pt3dadd(-31.98, 13.32, 22, 0.89)
    pt3dadd(-32.19, 13.42, 22, 0.89)
    pt3dadd(-32.29, 13.48, 22, 0.89)
    pt3dadd(-32.4, 13.58, 22, 0.89)
    pt3dadd(-32.5, 13.69, 22, 0.89)
    pt3dadd(-32.5, 14.16, 22, 0.89)
    pt3dadd(-32.6, 14.8, 23.5, 0.89)
    pt3dadd(-32.6, 15.01, 24, 0.89)
    pt3dadd(-32.65, 15.12, 24, 0.89)
    pt3dadd(-32.81, 15.17, 24, 0.89)
    pt3dadd(-32.96, 15.22, 24, 0.89)
    pt3dadd(-33.07, 15.33, 24, 0.89)
    pt3dadd(-33.11, 15.49, 25, 0.89)
    pt3dadd(-32.9, 15.59, 25.5, 0.89)
    pt3dadd(-32.75, 15.54, 25.5, 0.89)
    pt3dadd(-32.6, 15.49, 25.5, 0.89)
    pt3dadd(-32.11, 15.49, 25.5, 0.89)
    pt3dadd(-32.02, 15.54, 25.5, 0.89)
    pt3dadd(-31.81, 15.7, 25.5, 0.89)
    pt3dadd(-31.7, 15.7, 25.5, 0.89)
    pt3dadd(-31.6, 15.8, 25.5, 0.89)
    pt3dadd(-31.6, 16.17, 25.5, 0.89)
    pt3dadd(-31.76, 16.27, 25.5, 0.89)
    pt3dadd(-31.86, 16.43, 25.5, 0.89)
    pt3dadd(-31.97, 16.54, 25.5, 0.89)
    pt3dadd(-32.07, 16.64, 25.5, 0.89)
    pt3dadd(-32.39, 16.64, 25.5, 0.89)
    pt3dadd(-32.49, 16.7, 25.5, 0.89)
    pt3dadd(-32.6, 16.7, 25.5, 0.89)
    pt3dadd(-32.7, 16.75, 25.5, 0.89)
    pt3dadd(-32.75, 16.85, 25.5, 0.89)
    pt3dadd(-33.11, 16.85, 26, 0.89)
    pt3dadd(-33.22, 16.91, 26, 0.89)
    pt3dadd(-33.44, 16.91, 26.5, 0.89)
    pt3dadd(-33.59, 16.96, 27, 0.89)
    pt3dadd(-33.75, 17.01, 27, 0.89)
    pt3dadd(-33.96, 17.01, 27.5, 0.89)
    pt3dadd(-34.07, 17.05, 27.5, 0.89)
    pt3dadd(-34.11, 17.17, 27.5, 0.89)
    pt3dadd(-34.33, 17.17, 27.5, 0.89)
    pt3dadd(-34.49, 17.32, 28.5, 0.89)
    pt3dadd(-34.43, 17.43, 28.5, 0.89)
    pt3dadd(-34.33, 17.54, 28.5, 0.89)
    pt3dadd(-33.9, 17.54, 29, 0.89)
    pt3dadd(-33.75, 17.59, 29.5, 0.89)
    pt3dadd(-33.65, 17.64, 29.5, 0.89)
    pt3dadd(-33.7, 17.8, 30, 0.89)
    pt3dadd(-33.86, 17.89, 30, 0.89)
    pt3dadd(-33.96, 17.96, 30, 0.89)
    pt3dadd(-34.07, 18.01, 30, 0.89)
    pt3dadd(-34.22, 18.05, 30, 0.89)
    pt3dadd(-34.33, 18.11, 30, 0.89)
    pt3dadd(-34.49, 18.17, 30, 0.89)
    pt3dadd(-34.7, 18.27, 30, 0.89)
    pt3dadd(-34.75, 18.43, 30, 0.89)
  }
  dend[50] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(1.12, 4.47, 9.5, 0.94)
    pt3dadd(1.07, 4.57, 9.5, 0.94)
    pt3dadd(1.12, 4.73, 9.5, 0.94)
    pt3dadd(1.28, 4.88, 9.5, 0.94)
    pt3dadd(1.49, 4.88, 9.5, 0.94)
    pt3dadd(1.54, 5.05, 9.5, 0.94)
    pt3dadd(1.65, 5.15, 9.5, 0.94)
    pt3dadd(1.75, 5.36, 9.5, 0.94)
    pt3dadd(1.8, 5.47, 9.5, 0.94)
    pt3dadd(1.91, 5.62, 9.5, 0.94)
    pt3dadd(1.96, 5.73, 9.5, 0.94)
    pt3dadd(2, 5.94, 9.5, 0.94)
    pt3dadd(1.96, 6.2, 9.5, 0.94)
    pt3dadd(1.12, 6.57, 9.5, 1)
    pt3dadd(0.96, 6.52, 9.5, 1)
    pt3dadd(0.86, 6.46, 9.5, 1)
    pt3dadd(0.81, 6.36, 9.5, 1)
    pt3dadd(0.39, 5.94, 10, 1)
    pt3dadd(0.23, 5.89, 10, 1)
    pt3dadd(0.02, 5.89, 10, 1)
    pt3dadd(-0.09, 5.78, 10, 1)
    pt3dadd(-0.14, 5.68, 10, 1)
    pt3dadd(-0.24, 5.52, 10, 1)
    pt3dadd(-0.45, 5.47, 10, 1)
    pt3dadd(-0.61, 5.36, 10, 1)
    pt3dadd(-0.82, 5.36, 10, 1)
    pt3dadd(-0.98, 5.36, 10, 1)
    pt3dadd(-1.13, 5.36, 10, 1)
    pt3dadd(-1.4, 5.47, 10.5, 1)
    pt3dadd(-1.45, 5.62, 10.5, 1)
    pt3dadd(-1.45, 6.1, 10.5, 1)
    pt3dadd(-1.5, 6.31, 11, 1)
    pt3dadd(-1.56, 6.46, 11, 1)
    pt3dadd(-1.61, 6.57, 11, 1)
    pt3dadd(-1.66, 6.62, 11.5, 1)
    pt3dadd(-1.77, 6.62, 11.5, 1)
    pt3dadd(-1.92, 6.36, 12, 1)
    pt3dadd(-2.02, 6.25, 12, 1)
    pt3dadd(-2.24, 6.04, 12, 1)
    pt3dadd(-2.45, 5.94, 12.5, 1)
    pt3dadd(-2.82, 5.94, 12.5, 1)
    pt3dadd(-2.92, 5.99, 12.5, 1)
    pt3dadd(-3.08, 5.94, 12.5, 1)
    pt3dadd(-3.29, 5.99, 13, 1)
    pt3dadd(-3.45, 5.99, 13, 1)
    pt3dadd(-3.55, 6.15, 13, 1)
    pt3dadd(-3.71, 6.1, 13, 1)
    pt3dadd(-4.23, 6.15, 13, 1)
    pt3dadd(-4.38, 6.04, 13, 1)
    pt3dadd(-4.71, 6.04, 13.5, 1)
    pt3dadd(-4.86, 5.99, 13.5, 1)
    pt3dadd(-5.07, 6.04, 13.5, 1)
    pt3dadd(-5.23, 6.1, 13.5, 1)
    pt3dadd(-5.28, 6.25, 13.5, 1)
    pt3dadd(-5.34, 6.41, 13.5, 1)
    pt3dadd(-5.28, 6.52, 13.5, 1)
    pt3dadd(-5.18, 6.68, 13.5, 1)
    pt3dadd(-5.13, 6.78, 13.5, 1)
    pt3dadd(-5.01, 6.99, 14, 1)
    pt3dadd(-4.97, 7.1, 14, 1)
    pt3dadd(-4.92, 7.2, 14, 1)
    pt3dadd(-4.86, 7.31, 14, 1)
    pt3dadd(-4.86, 7.62, 13.5, 1)
    pt3dadd(-5.01, 7.73, 13.5, 1)
    pt3dadd(-5.13, 7.78, 13.5, 1)
    pt3dadd(-5.49, 7.78, 13.5, 1)
    pt3dadd(-5.6, 7.67, 14, 1)
    pt3dadd(-5.65, 7.57, 14, 1)
    pt3dadd(-5.81, 7.57, 14.5, 1)
    pt3dadd(-5.91, 7.41, 14.5, 1)
    pt3dadd(-6.02, 7.15, 14.5, 1)
    pt3dadd(-6.18, 6.99, 15, 1)
    pt3dadd(-6.23, 6.89, 15, 1)
    pt3dadd(-6.44, 6.83, 15, 1)
    pt3dadd(-6.6, 6.94, 15, 1)
    pt3dadd(-6.54, 7.1, 15, 1)
    pt3dadd(-6.65, 7.2, 15, 1)
    pt3dadd(-6.65, 7.31, 15, 1)
    pt3dadd(-6.65, 7.41, 15, 1)
    pt3dadd(-6.65, 7.73, 15, 1)
    pt3dadd(-6.6, 7.83, 15, 1)
    pt3dadd(-6.54, 7.94, 15, 1)
    pt3dadd(-6.33, 8.19, 15, 1)
    pt3dadd(-6.28, 8.3, 15, 1)
    pt3dadd(-6.18, 8.3, 15, 1)
    pt3dadd(-6.07, 8.41, 15.5, 1)
    pt3dadd(-5.97, 8.46, 15.5, 1)
    pt3dadd(-5.81, 8.46, 15.5, 1)
    pt3dadd(-5.6, 8.52, 15.5, 1)
    pt3dadd(-5.49, 8.52, 15.5, 1)
    pt3dadd(-5.34, 8.57, 15.5, 1)
    pt3dadd(-4.86, 8.57, 15.5, 1)
    pt3dadd(-4.76, 8.61, 16, 1)
    pt3dadd(-4.65, 8.73, 16, 1)
    pt3dadd(-4.65, 9.09, 16, 1)
    pt3dadd(-4.8, 9.09, 16, 1)
    pt3dadd(-4.92, 9.19, 16, 1)
    pt3dadd(-5.01, 9.25, 16, 1)
    pt3dadd(-5.13, 9.36, 16.5, 1)
    pt3dadd(-5.23, 9.41, 16.5, 1)
    pt3dadd(-5.39, 9.46, 16.5, 1)
    pt3dadd(-5.55, 9.57, 17, 1)
    pt3dadd(-5.81, 9.57, 17, 1)
    pt3dadd(-5.97, 9.67, 17, 1)
    pt3dadd(-6.07, 9.67, 17, 1)
    pt3dadd(-6.23, 9.72, 17, 1)
    pt3dadd(-6.33, 9.77, 17, 1)
    pt3dadd(-6.81, 9.77, 17, 1)
    pt3dadd(-6.91, 9.88, 17, 1)
    pt3dadd(-7.12, 9.99, 17, 1)
    pt3dadd(-7.23, 10.09, 17, 1)
    pt3dadd(-7.33, 10.19, 17, 1)
    pt3dadd(-7.44, 10.25, 17, 1)
    pt3dadd(-7.59, 10.35, 17, 1)
    pt3dadd(-7.75, 10.41, 17, 1)
    pt3dadd(-7.86, 10.51, 17, 1)
    pt3dadd(-8.07, 10.51, 17, 1)
    pt3dadd(-8.11, 10.62, 17, 1)
    pt3dadd(-8.33, 10.67, 17, 1)
    pt3dadd(-8.49, 10.72, 17, 1)
    pt3dadd(-8.59, 10.83, 17, 1)
    pt3dadd(-8.75, 10.88, 17, 1)
    pt3dadd(-8.85, 10.99, 17, 1)
    pt3dadd(-8.91, 11.09, 17, 1)
    pt3dadd(-9.06, 11.14, 17, 1)
    pt3dadd(-9.11, 11.3, 17, 1)
    pt3dadd(-9.35, 12.38, 17, 1)
    pt3dadd(-9.51, 12.43, 17.5, 1)
    pt3dadd(-9.61, 12.48, 17.5, 1)
    pt3dadd(-9.72, 12.48, 17.5, 1)
    pt3dadd(-9.98, 12.48, 17.5, 1)
    pt3dadd(-10.08, 12.59, 17.5, 1)
    pt3dadd(-10.24, 12.64, 18, 1)
    pt3dadd(-10.35, 12.75, 18, 1)
    pt3dadd(-10.4, 12.96, 18, 1)
    pt3dadd(-10.35, 13.11, 18.5, 1)
    pt3dadd(-10.24, 13.22, 18.5, 1)
    pt3dadd(-10.14, 13.27, 18.5, 1)
    pt3dadd(-9.98, 13.32, 18.5, 1)
    pt3dadd(-9.82, 13.43, 18.5, 1)
    pt3dadd(-9.66, 13.59, 18.5, 1)
    pt3dadd(-9.61, 13.64, 19, 1)
    pt3dadd(-9.61, 13.9, 19, 1)
    pt3dadd(-9.72, 14.01, 19, 1)
    pt3dadd(-9.82, 14.06, 19, 1)
    pt3dadd(-9.93, 14.11, 19, 1)
    pt3dadd(-10.02, 14.22, 19, 1)
    pt3dadd(-10.19, 14.22, 19, 1)
    pt3dadd(-10.4, 14.27, 19, 1)
    pt3dadd(-10.5, 14.37, 19.5, 1)
    pt3dadd(-10.56, 14.53, 19.5, 1)
    pt3dadd(-10.56, 14.8, 19.5, 1)
  }
}
proc shape3d_53() {
  dend[50] {
    pt3dadd(-10.5, 14.9, 19.5, 1)
    pt3dadd(-10.5, 15.01, 19.5, 1)
    pt3dadd(-10.45, 15.16, 19.5, 1)
    pt3dadd(-10.45, 15.37, 19.5, 1)
    pt3dadd(-10.56, 15.53, 19.5, 1)
    pt3dadd(-10.66, 15.69, 20, 1)
    pt3dadd(-10.82, 15.69, 20, 1)
    pt3dadd(-10.92, 15.74, 20, 1)
    pt3dadd(-11.45, 15.74, 20.5, 1)
    pt3dadd(-11.61, 15.69, 20.5, 1)
    pt3dadd(-11.71, 15.64, 20.5, 1)
    pt3dadd(-11.87, 15.58, 20.5, 1)
    pt3dadd(-12.34, 15.58, 21, 1)
    pt3dadd(-12.45, 15.69, 21, 1)
    pt3dadd(-12.55, 15.74, 21, 1)
    pt3dadd(-12.66, 15.9, 21.5, 1)
    pt3dadd(-12.76, 15.95, 21.5, 1)
    pt3dadd(-12.81, 16.11, 21.5, 1)
    pt3dadd(-12.92, 16.27, 21.5, 1)
    pt3dadd(-13.02, 16.32, 21.5, 1)
    pt3dadd(-13.13, 16.42, 22, 1)
    pt3dadd(-13.23, 16.53, 22, 1)
    pt3dadd(-13.29, 16.69, 22, 1)
    pt3dadd(-13.39, 16.79, 22, 1)
    pt3dadd(-13.44, 16.95, 22, 1)
    pt3dadd(-13.44, 17.48, 22.5, 1)
    pt3dadd(-13.29, 17.53, 22.5, 1)
    pt3dadd(-13.23, 17.63, 22.5, 1)
    pt3dadd(-13.08, 17.69, 22.5, 1)
    pt3dadd(-12.97, 17.79, 23, 1)
    pt3dadd(-12.71, 17.89, 23, 1)
    pt3dadd(-12.66, 18, 23.5, 1)
    pt3dadd(-12.5, 18.21, 23.5, 1)
    pt3dadd(-12.39, 18.32, 23.5, 1)
    pt3dadd(-12.29, 18.37, 23.5, 1)
    pt3dadd(-12.18, 18.48, 23.5, 1)
    pt3dadd(-12.08, 18.57, 24, 1)
    pt3dadd(-12.03, 18.73, 24, 1)
    pt3dadd(-11.87, 18.89, 24, 1)
  }
  dend[51] {pt3dclear()
    pt3dadd(-11.34, 0.32, 14, 0.89)
    pt3dadd(-11.37, 0.35, 1, 1)
    pt3dadd(-11.42, 0.46, 1, 1)
    pt3dadd(-11.53, 0.51, 1, 1)
    pt3dadd(-11.74, 0.56, 1, 1)
    pt3dadd(-11.74, 0.67, 1, 1)
    pt3dadd(-12.11, 0.67, 1, 1)
    pt3dadd(-12.21, 0.72, 1, 1)
    pt3dadd(-12.58, 0.72, 1, 1)
    pt3dadd(-12.63, 0.78, 0.5, 1)
    pt3dadd(-12.84, 0.83, 0.5, 1)
    pt3dadd(-12.89, 0.99, 0.5, 1)
    pt3dadd(-13.05, 0.99, 0.5, 1)
    pt3dadd(-13.21, 0.99, 0.5, 1)
    pt3dadd(-13.26, 1.2, 0.5, 1)
    pt3dadd(-13.37, 1.35, 0.5, 1)
    pt3dadd(-13.47, 1.46, 0.5, 1)
    pt3dadd(-13.52, 1.56, 0, 1)
    pt3dadd(-13.68, 1.62, 0, 1)
    pt3dadd(-13.73, 1.72, 0, 1)
    pt3dadd(-13.84, 1.83, 0, 1)
    pt3dadd(-13.89, 1.93, 0, 1)
    pt3dadd(-14, 1.98, -0.5, 1)
    pt3dadd(-14.1, 2.04, -0.5, 1)
    pt3dadd(-14.21, 2.19, -0.5, 1)
    pt3dadd(-14.36, 2.25, -0.5, 1)
    pt3dadd(-14.47, 2.25, -0.5, 1)
    pt3dadd(-14.57, 2.35, -0.5, 1)
    pt3dadd(-14.84, 2.4, -0.5, 1)
    pt3dadd(-14.94, 2.46, -0.5, 1)
    pt3dadd(-15.15, 2.56, -0.5, 1)
    pt3dadd(-15.41, 2.56, -0.5, 1)
    pt3dadd(-15.52, 2.67, -0.5, 1)
    pt3dadd(-15.57, 2.83, -1, 1)
    pt3dadd(-15.68, 3.04, -1, 1)
    pt3dadd(-15.78, 3.09, -1, 1)
    pt3dadd(-15.83, 3.19, -1, 1)
    pt3dadd(-15.89, 3.3, -1, 1)
    pt3dadd(-15.99, 3.46, -1, 1)
    pt3dadd(-16.1, 3.72, -1, 1)
    pt3dadd(-16.14, 3.82, -1, 1)
    pt3dadd(-16.2, 3.98, -1.5, 1)
    pt3dadd(-16.3, 4.13, -1.5, 1)
    pt3dadd(-16.36, 4.24, -1.5, 1)
    pt3dadd(-16.36, 4.67, -1.5, 1)
    pt3dadd(-16.41, 4.76, -1.5, 1)
    pt3dadd(-16.41, 5.03, -1.5, 1)
    pt3dadd(-16.3, 5.3, -1.5, 1)
    pt3dadd(-16.14, 5.45, -1.5, 1)
    pt3dadd(-15.94, 5.72, -1.5, 1)
    pt3dadd(-15.68, 5.98, -2, 1)
    pt3dadd(-15.57, 6.08, -2, 1)
    pt3dadd(-15.52, 6.19, -2, 1)
    pt3dadd(-15.47, 6.4, -3, 1)
    pt3dadd(-15.47, 7.24, -3.5, 1)
    pt3dadd(-15.41, 7.45, -3.5, 1)
    pt3dadd(-15.74, 8.14, -4, 1)
    pt3dadd(-15.53, 8.3, -4, 1)
    pt3dadd(-15.38, 8.41, -4, 1)
    pt3dadd(-15.27, 8.41, -4, 1)
    pt3dadd(-15.22, 8.51, -4, 1)
    pt3dadd(-15.17, 8.67, -4, 1)
    pt3dadd(-15.17, 8.83, -4.5, 1)
    pt3dadd(-15.27, 8.93, -4.5, 1)
    pt3dadd(-15.38, 8.98, -4.5, 1)
    pt3dadd(-15.59, 9.14, -4.5, 1)
    pt3dadd(-15.69, 9.19, -4.5, 1)
    pt3dadd(-15.8, 9.19, -5, 1)
    pt3dadd(-15.9, 9.14, -5, 1)
    pt3dadd(-16.22, 9.14, -5, 1)
    pt3dadd(-16.32, 9.03, -5, 1)
    pt3dadd(-16.48, 8.98, -5, 1)
    pt3dadd(-16.57, 8.93, -5, 1)
    pt3dadd(-16.79, 8.83, -5.5, 1)
    pt3dadd(-16.89, 8.83, -5.5, 1)
    pt3dadd(-17, 8.83, -5.5, 1)
    pt3dadd(-17.11, 8.77, -5.5, 1)
    pt3dadd(-17.37, 8.77, -5.5, 1)
    pt3dadd(-17.48, 8.83, -5.5, 1)
    pt3dadd(-17.57, 8.88, -6, 1)
    pt3dadd(-17.69, 8.88, -6, 1)
    pt3dadd(-17.84, 8.93, -6, 1)
    pt3dadd(-17.95, 9.03, -6, 1)
    pt3dadd(-18.16, 9.09, -6, 1)
    pt3dadd(-18.26, 9.19, -6, 1)
    pt3dadd(-18.42, 9.25, -6, 1)
    pt3dadd(-18.53, 9.3, -6, 1)
    pt3dadd(-18.57, 9.41, -6, 1)
    pt3dadd(-18.68, 9.51, -6.5, 1)
    pt3dadd(-18.79, 9.61, -6.5, 1)
    pt3dadd(-18.84, 9.77, -6.5, 1)
    pt3dadd(-18.84, 9.98, -6.5, 1)
    pt3dadd(-18.95, 10.09, -6.5, 1)
    pt3dadd(-18.95, 10.25, -7, 1)
    pt3dadd(-19, 10.35, -7, 1)
    pt3dadd(-18.95, 10.46, -7, 1)
    pt3dadd(-18.95, 11.09, -7, 1)
    pt3dadd(-18.89, 11.25, -7, 1)
    pt3dadd(-18.79, 11.46, -7, 1)
    pt3dadd(-18.73, 11.67, -7.5, 1)
    pt3dadd(-18.73, 11.88, -8, 1)
    pt3dadd(-18.95, 11.93, -8, 1)
    pt3dadd(-19, 12.03, -8, 1)
    pt3dadd(-19.1, 12.03, -8, 1)
    pt3dadd(-19.21, 12.09, -8.5, 1)
    pt3dadd(-19.3, 12.19, -8.5, 1)
    pt3dadd(-19.42, 12.19, -8.5, 1)
    pt3dadd(-19.52, 12.24, -8.5, 1)
    pt3dadd(-19.57, 12.35, -9, 1)
    pt3dadd(-19.68, 12.4, -9, 1)
    pt3dadd(-19.84, 12.51, -9, 1)
    pt3dadd(-19.94, 12.56, -9, 1)
    pt3dadd(-20.05, 12.61, -9, 1)
    pt3dadd(-20.14, 12.72, -9, 1)
    pt3dadd(-20.41, 12.88, -9, 1)
    pt3dadd(-20.52, 12.88, -9, 1)
    pt3dadd(-20.68, 13.03, -9, 1)
    pt3dadd(-20.89, 13.09, -9, 1)
    pt3dadd(-21.04, 13.19, -9.5, 1)
    pt3dadd(-21.25, 13.4, -9.5, 1)
    pt3dadd(-21.36, 13.56, -9.5, 1)
    pt3dadd(-21.46, 13.61, -9.5, 1)
    pt3dadd(-21.46, 13.72, -9.5, 1)
    pt3dadd(-21.57, 13.87, -9.5, 1)
    pt3dadd(-21.67, 13.93, -9.5, 1)
    pt3dadd(-21.73, 14.03, -10, 1)
    pt3dadd(-21.78, 14.14, -10, 1)
    pt3dadd(-21.83, 14.24, -10, 1)
    pt3dadd(-21.78, 14.35, -10, 1)
    pt3dadd(-21.83, 14.56, -10.5, 1)
    pt3dadd(-21.83, 14.82, -10.5, 1)
    pt3dadd(-21.67, 14.87, -10.5, 1)
    pt3dadd(-21.46, 15.03, -10.5, 1)
    pt3dadd(-21.2, 15.03, -10.5, 1)
    pt3dadd(-21.1, 14.93, -11, 1)
    pt3dadd(-20.94, 14.82, -11, 1)
    pt3dadd(-20.83, 14.66, -11, 1)
    pt3dadd(-20.57, 14.5, -11, 1)
    pt3dadd(-20.52, 14.35, -11, 1)
    pt3dadd(-20.36, 14.29, -11, 1)
    pt3dadd(-20.3, 14.14, -11, 1)
    pt3dadd(-20.1, 14.14, -11, 1)
    pt3dadd(-19.94, 14.14, -11, 1)
    pt3dadd(-19.84, 14.35, -11, 1)
    pt3dadd(-19.68, 14.5, -11, 1)
    pt3dadd(-19.57, 14.72, -11, 1)
    pt3dadd(-19.57, 14.87, -11, 1)
    pt3dadd(-19.47, 15.14, -11, 1)
    pt3dadd(-19.47, 15.35, -11, 1)
    pt3dadd(-19.42, 15.5, -11, 1)
    pt3dadd(-19.42, 15.71, -11, 1)
    pt3dadd(-19.37, 15.87, -11, 1)
    pt3dadd(-19.37, 16.07, -11, 1)
    pt3dadd(-19.3, 16.23, -12, 1)
    pt3dadd(-19.16, 16.39, -12, 1)
    pt3dadd(-18.95, 16.5, -12.5, 1)
    pt3dadd(-18.84, 16.61, -12.5, 1)
    pt3dadd(-18.68, 16.61, -12.5, 1)
    pt3dadd(-18.57, 16.71, -12.5, 1)
    pt3dadd(-18.47, 16.71, -12.5, 1)
    pt3dadd(-18.26, 16.77, -12.5, 1)
    pt3dadd(-18.11, 16.82, -12.5, 1)
    pt3dadd(-18, 16.98, -12.5, 1)
    pt3dadd(-17.89, 16.92, -13, 1)
    pt3dadd(-17.79, 17.07, -13, 1)
    pt3dadd(-17.73, 17.23, -13, 1)
    pt3dadd(-17.63, 17.34, -13, 1)
    pt3dadd(-17.57, 17.45, -13, 1)
    pt3dadd(-17.53, 17.61, -13, 1)
    pt3dadd(-17.48, 17.71, -13.5, 1)
    pt3dadd(-17.48, 18.18, -13.5, 1)
    pt3dadd(-17.48, 18.39, -14.5, 1)
    pt3dadd(-17.53, 18.61, -14.5, 1)
    pt3dadd(-17.57, 18.82, -15, 1)
    pt3dadd(-17.63, 18.92, -15, 1)
    pt3dadd(-18.26, 19.61, -15.5, 1)
    pt3dadd(-18.37, 19.72, -15.5, 1)
    pt3dadd(-18.53, 19.66, -15.5, 1)
    pt3dadd(-18.53, 19.51, -16, 1)
    pt3dadd(-18.68, 19.23, -16, 1)
    pt3dadd(-18.84, 18.98, -16, 1)
    pt3dadd(-18.84, 18.82, -16.5, 1)
    pt3dadd(-18.89, 18.67, -16.5, 1)
    pt3dadd(-19, 18.46, -16.5, 1)
    pt3dadd(-19.1, 18.35, -16.5, 1)
    pt3dadd(-19.21, 18.25, -16.5, 1)
    pt3dadd(-19.37, 18.19, -16.5, 1)
    pt3dadd(-19.52, 18.14, -16.5, 1)
    pt3dadd(-19.68, 18.09, -16.5, 1)
    pt3dadd(-20.05, 18.09, -16.5, 1)
    pt3dadd(-20.26, 18.03, -17, 1)
    pt3dadd(-20.57, 18.03, -17, 1)
    pt3dadd(-20.84, 18.03, -17.5, 1)
    pt3dadd(-20.89, 18.19, -17.5, 1)
    pt3dadd(-20.99, 18.35, -17.5, 1)
    pt3dadd(-21.05, 18.72, -17.5, 1)
    pt3dadd(-20.94, 18.98, -18, 1)
    pt3dadd(-20.84, 19.09, -18, 1)
    pt3dadd(-20.78, 19.23, -18, 1)
    pt3dadd(-20.73, 19.35, -18, 1)
    pt3dadd(-20.57, 19.55, -18, 1)
    pt3dadd(-20.47, 19.61, -18, 1)
    pt3dadd(-20.26, 19.72, -18, 1)
    pt3dadd(-20.1, 19.87, -18, 1)
    pt3dadd(-20, 19.87, -18, 1)
    pt3dadd(-19.84, 19.98, -18, 1)
    pt3dadd(-19.73, 20.03, -18, 1)
    pt3dadd(-19.63, 20.14, -18.5, 1)
    pt3dadd(-19.57, 20.3, -18.5, 1)
    pt3dadd(-19.47, 20.51, -18.5, 1)
  }
}
proc shape3d_54() {
  dend[51] {
    pt3dadd(-19.47, 20.77, -18.5, 1)
    pt3dadd(-19.42, 20.98, -18.5, 1)
    pt3dadd(-19.42, 21.19, -19, 1)
    pt3dadd(-19.42, 21.4, -19, 1)
    pt3dadd(-19.42, 21.61, -19, 1)
    pt3dadd(-19.47, 21.77, -19, 1)
    pt3dadd(-19.47, 21.92, -19, 1)
    pt3dadd(-19.68, 22.29, -19.5, 1)
    pt3dadd(-19.79, 22.4, -19.5, 1)
    pt3dadd(-19.89, 22.5, -19.5, 1)
    pt3dadd(-19.94, 22.61, -19.5, 1)
    pt3dadd(-20.05, 22.77, -19.5, 1)
    pt3dadd(-20.14, 22.87, -19.5, 1)
    pt3dadd(-20.3, 22.92, -19.5, 1)
    pt3dadd(-20.42, 23.03, -19.5, 1)
    pt3dadd(-20.68, 23.08, -19.5, 1)
    pt3dadd(-20.78, 23.29, -19.5, 1)
    pt3dadd(-20.99, 23.29, -19.5, 1)
    pt3dadd(-21.15, 23.34, -19.5, 1)
    pt3dadd(-21.36, 23.34, -19.5, 1)
    pt3dadd(-21.52, 23.34, -19.5, 1)
    pt3dadd(-21.73, 23.24, -20, 1)
    pt3dadd(-21.94, 23.13, -20, 1)
    pt3dadd(-22.04, 22.92, -20, 1)
    pt3dadd(-22.15, 22.82, -20, 1)
    pt3dadd(-22.15, 22.5, -20.5, 1)
    pt3dadd(-22.04, 22.35, -20.5, 1)
    pt3dadd(-21.94, 22.29, -20.5, 1)
    pt3dadd(-21.83, 22.14, -20.5, 1)
    pt3dadd(-21.73, 22.08, -20.5, 1)
    pt3dadd(-21.57, 21.92, -20.5, 1)
    pt3dadd(-21.41, 21.71, -20.5, 1)
    pt3dadd(-21.36, 21.61, -20.5, 1)
    pt3dadd(-21.31, 21.4, -20.5, 1)
    pt3dadd(-21.26, 21.29, -21, 1)
    pt3dadd(-21.31, 21.14, -21, 1)
    pt3dadd(-21.41, 21.03, -21, 1)
    pt3dadd(-21.57, 20.98, -21.5, 1)
    pt3dadd(-21.78, 20.93, -21.5, 1)
    pt3dadd(-22.04, 20.93, -21.5, 1)
    pt3dadd(-22.15, 21.03, -22, 1)
    pt3dadd(-22.36, 21.03, -22, 1)
    pt3dadd(-22.57, 21.08, -22, 1)
    pt3dadd(-22.72, 21.14, -22, 1)
    pt3dadd(-22.88, 21.14, -22, 1)
    pt3dadd(-22.93, 21.4, -22, 1)
    pt3dadd(-23.09, 21.4, -22.5, 1)
    pt3dadd(-23.2, 21.45, -22.5, 1)
    pt3dadd(-23.3, 21.56, -22.5, 1)
    pt3dadd(-23.46, 21.61, -22.5, 1)
    pt3dadd(-23.56, 21.71, -22.5, 1)
    pt3dadd(-23.67, 21.82, -22.5, 1)
    pt3dadd(-23.93, 21.82, -23, 1)
    pt3dadd(-24.04, 21.87, -23, 1)
    pt3dadd(-24.14, 21.98, -23, 1)
    pt3dadd(-24.3, 22.14, -23, 1)
    pt3dadd(-24.4, 22.24, -23, 1)
    pt3dadd(-24.51, 22.35, -23, 1)
    pt3dadd(-24.67, 22.35, -23, 1)
    pt3dadd(-24.77, 22.4, -23, 1)
    pt3dadd(-24.88, 22.5, -23, 1)
    pt3dadd(-24.98, 22.61, -23, 1)
    pt3dadd(-25.03, 22.77, -23, 1)
    pt3dadd(-25.09, 22.87, -23, 1)
    pt3dadd(-25.19, 22.92, -23, 1)
    pt3dadd(-25.24, 23.08, -23, 1)
    pt3dadd(-25.24, 23.24, -23, 1)
    pt3dadd(-25.4, 23.45, -23, 1)
    pt3dadd(-25.4, 23.66, -23, 1)
    pt3dadd(-25.45, 23.82, -23, 1)
    pt3dadd(-25.3, 24.03, -23, 1)
    pt3dadd(-25.19, 24.19, -23, 1)
    pt3dadd(-24.98, 24.29, -23, 1)
    pt3dadd(-24.88, 24.34, -23, 1)
    pt3dadd(-24.72, 24.45, -23, 1)
    pt3dadd(-24.61, 24.55, -23, 1)
    pt3dadd(-25.18, 25.28, -23, 1.05)
    pt3dadd(-25.34, 25.28, -23, 1.05)
    pt3dadd(-25.45, 25.39, -23, 1.05)
    pt3dadd(-25.55, 25.49, -23, 1.05)
    pt3dadd(-25.66, 25.54, -23, 1.05)
    pt3dadd(-25.71, 25.65, -23, 1.05)
    pt3dadd(-25.92, 25.81, -23, 1.05)
    pt3dadd(-26.02, 25.91, -23, 1.05)
    pt3dadd(-26.18, 26.02, -23, 1.05)
    pt3dadd(-26.29, 26.07, -23, 1.05)
    pt3dadd(-26.44, 26.23, -23, 1.05)
    pt3dadd(-26.55, 26.28, -23, 1.05)
    pt3dadd(-26.71, 26.33, -23, 1.05)
    pt3dadd(-26.76, 26.44, -23, 1.05)
    pt3dadd(-26.81, 26.65, -23, 1.05)
    pt3dadd(-26.81, 26.81, -23, 1.05)
    pt3dadd(-26.86, 26.91, -23, 1.05)
    pt3dadd(-26.81, 27.07, -23, 1.05)
    pt3dadd(-26.76, 27.28, -23.5, 1.05)
    pt3dadd(-26.76, 27.54, -23.5, 1.05)
    pt3dadd(-26.81, 27.75, -23.5, 1.05)
    pt3dadd(-26.81, 28.17, -24, 1.05)
    pt3dadd(-26.86, 28.38, -24, 1.05)
    pt3dadd(-26.97, 28.38, -24, 1.05)
    pt3dadd(-27.81, 28.38, -25, 1.05)
    pt3dadd(-27.97, 28.38, -25.5, 1.05)
    pt3dadd(-27.97, 28.49, -26, 1.05)
    pt3dadd(-28.02, 28.59, -26, 1.05)
    pt3dadd(-28.07, 28.7, -26.5, 1.05)
    pt3dadd(-28.07, 29.07, -27, 1.05)
    pt3dadd(-27.97, 29.12, -27, 1.05)
    pt3dadd(-27.81, 29.12, -27, 1.05)
    pt3dadd(-27.7, 29.17, -27, 1.05)
    pt3dadd(-27.49, 28.96, -27.5, 1.05)
    pt3dadd(-27.34, 28.91, -27.5, 1.05)
    pt3dadd(-26.23, 28.86, -28, 1.05)
    pt3dadd(-26.08, 28.91, -28, 1.05)
    pt3dadd(-25.92, 28.91, -28, 1.05)
    pt3dadd(-25.81, 29.01, -28.5, 1.05)
    pt3dadd(-25.66, 29.12, -28.5, 1.05)
    pt3dadd(-25.55, 29.22, -28.5, 1.05)
    pt3dadd(-25.5, 29.38, -28.5, 1.05)
    pt3dadd(-25.55, 29.49, -29, 1.05)
    pt3dadd(-25.66, 29.54, -29, 1.05)
    pt3dadd(-25.76, 29.64, -29, 1.05)
    pt3dadd(-25.92, 29.75, -29, 1.05)
    pt3dadd(-26.02, 29.86, -29, 1.05)
    pt3dadd(-26.18, 29.96, -29.5, 1.05)
    pt3dadd(-26.44, 29.91, -29.5, 1.05)
    pt3dadd(-26.55, 29.96, -29.5, 1.05)
    pt3dadd(-26.71, 29.96, -29.5, 1.05)
    pt3dadd(-26.86, 30.12, -29.5, 1.05)
    pt3dadd(-26.97, 30.12, -29.5, 1.05)
    pt3dadd(-27.07, 30.22, -29.5, 1.05)
    pt3dadd(-27.18, 30.28, -29.5, 1.05)
    pt3dadd(-27.23, 30.38, -30, 1.05)
    pt3dadd(-27.34, 30.49, -30, 1.05)
    pt3dadd(-27.49, 30.49, -30, 1.05)
    pt3dadd(-27.6, 30.59, -30, 1.05)
    pt3dadd(-28.36, 31.66, -30, 1.05)
    pt3dadd(-28.46, 31.77, -30, 1.05)
    pt3dadd(-28.67, 31.92, -30, 1.05)
    pt3dadd(-28.88, 31.92, -30, 1.05)
    pt3dadd(-28.99, 31.98, -30, 1.05)
    pt3dadd(-29.2, 31.98, -30, 1.05)
    pt3dadd(-29.56, 32.03, -30, 1.05)
    pt3dadd(-29.72, 31.98, -30.5, 1.05)
    pt3dadd(-29.82, 31.77, -30.5, 1.05)
    pt3dadd(-29.93, 31.66, -30.5, 1.05)
    pt3dadd(-29.98, 31.5, -30.5, 1.05)
    pt3dadd(-30.03, 31.4, -30.5, 1.05)
    pt3dadd(-30.03, 31.29, -30.5, 1.05)
    pt3dadd(-30.14, 31.14, -31, 1.05)
    pt3dadd(-31.19, 31.14, -31, 1.05)
    pt3dadd(-31.35, 31.08, -31.5, 1.05)
    pt3dadd(-31.5, 31.14, -31.5, 1.05)
    pt3dadd(-31.66, 31.14, -31.5, 1.05)
    pt3dadd(-31.77, 31.08, -32, 1.05)
    pt3dadd(-31.87, 31.08, -32, 1.05)
    pt3dadd(-32.03, 31.08, -32, 1.05)
    pt3dadd(-32.13, 31.14, -32, 1.05)
    pt3dadd(-32.24, 31.19, -32, 1.05)
    pt3dadd(-32.34, 31.29, -32, 1.05)
    pt3dadd(-32.4, 31.45, -32, 1.05)
    pt3dadd(-32.5, 31.61, -32.5, 1.05)
    pt3dadd(-32.54, 31.82, -32.5, 1.05)
    pt3dadd(-32.65, 32.03, -32.5, 1.05)
    pt3dadd(-32.76, 32.29, -32.5, 1.05)
    pt3dadd(-32.76, 32.45, -32.5, 1.05)
    pt3dadd(-32.82, 32.61, -32.5, 1.05)
    pt3dadd(-32.82, 32.77, -33, 1.05)
    pt3dadd(-32.92, 32.86, -33, 1.05)
    pt3dadd(-32.92, 33.13, -33, 1.05)
    pt3dadd(-32.97, 33.24, -33, 1.05)
    pt3dadd(-33.03, 33.34, -33, 1.05)
    pt3dadd(-33.13, 33.4, -33.5, 1.05)
    pt3dadd(-33.13, 33.5, -33.5, 1.05)
    pt3dadd(-33.24, 33.61, -33.5, 1.05)
    pt3dadd(-33.18, 33.71, -33.5, 1.05)
    pt3dadd(-33.24, 33.92, -33.5, 1.05)
    pt3dadd(-33.29, 34.13, -33.5, 1.05)
    pt3dadd(-33.29, 34.5, -34, 1.05)
    pt3dadd(-33.34, 34.65, -34, 1.05)
    pt3dadd(-33.34, 36.45, -35, 1.05)
    pt3dadd(-33.5, 36.6, -35, 1.05)
    pt3dadd(-33.6, 36.65, -35, 1.05)
    pt3dadd(-33.71, 36.76, -35, 1.05)
    pt3dadd(-33.86, 36.86, -35, 1.05)
    pt3dadd(-34.02, 36.92, -35, 1.05)
    pt3dadd(-34.22, 36.86, -35, 1.05)
    pt3dadd(-34.22, 37.02, -35, 1.05)
    pt3dadd(-34.34, 37.02, -35, 1.05)
    pt3dadd(-34.39, 36.97, -35.5, 1.05)
    pt3dadd(-34.5, 36.92, -35.5, 1.05)
    pt3dadd(-34.6, 36.92, -35.5, 1.05)
    pt3dadd(-34.81, 36.76, -35.5, 1.05)
    pt3dadd(-34.92, 36.65, -35.5, 1.05)
    pt3dadd(-35.07, 36.54, -35.5, 1.05)
    pt3dadd(-35.22, 36.45, -35.5, 1.05)
    pt3dadd(-35.34, 36.39, -35.5, 1.05)
    pt3dadd(-35.44, 36.24, -35.5, 1.05)
    pt3dadd(-35.54, 36.08, -36, 1.05)
    pt3dadd(-35.65, 35.92, -36, 1.05)
    pt3dadd(-35.76, 35.76, -36, 1.05)
    pt3dadd(-35.86, 35.71, -36, 1.05)
    pt3dadd(-36.18, 35.54, -36, 1.05)
    pt3dadd(-36.49, 35.54, -36.5, 1.05)
    pt3dadd(-36.7, 35.5, -36.5, 1.05)
    pt3dadd(-36.86, 35.45, -36.5, 1.05)
    pt3dadd(-37.54, 35.45, -36.5, 1.05)
    pt3dadd(-37.65, 35.5, -36.5, 1.05)
    pt3dadd(-37.75, 35.54, -36.5, 1.05)
    pt3dadd(-37.86, 35.6, -36.5, 1.05)
    pt3dadd(-38.01, 35.6, -36.5, 1.05)
    pt3dadd(-38.11, 35.71, -36.5, 1.05)
    pt3dadd(-38.22, 35.81, -36.5, 1.05)
    pt3dadd(-38.38, 35.81, -36.5, 1.05)
    pt3dadd(-38.43, 35.92, -37, 1.05)
    pt3dadd(-38.49, 36.03, -37, 1.05)
    pt3dadd(-38.59, 36.08, -37, 1.05)
    pt3dadd(-38.59, 36.18, -37, 1.05)
    pt3dadd(-38.64, 36.34, -37, 1.05)
    pt3dadd(-38.75, 36.45, -37, 1.05)
    pt3dadd(-38.85, 36.54, -37, 1.05)
    pt3dadd(-39.01, 36.76, -37, 1.05)
    pt3dadd(-39.11, 36.81, -37, 1.05)
    pt3dadd(-39.17, 37.02, -37.5, 1.05)
    pt3dadd(-39.33, 37.18, -37.5, 1.05)
    pt3dadd(-39.59, 37.29, -37.5, 1.05)
    pt3dadd(-39.79, 37.39, -37.5, 1.05)
    pt3dadd(-39.9, 37.44, -37.5, 1.05)
    pt3dadd(-40.01, 37.54, -37.5, 1.05)
    pt3dadd(-40.17, 37.6, -38, 1.05)
    pt3dadd(-40.27, 37.65, -38, 1.05)
    pt3dadd(-40.38, 37.71, -38, 1.05)
    pt3dadd(-40.38, 37.92, -38, 1.05)
    pt3dadd(-40.53, 37.97, -38, 1.05)
    pt3dadd(-40.59, 38.08, -38, 1.05)
    pt3dadd(-40.64, 38.22, -38, 1.05)
    pt3dadd(-40.69, 38.44, -38, 1.05)
    pt3dadd(-40.79, 38.6, -38, 1.05)
    pt3dadd(-40.85, 38.76, -38.5, 1.05)
    pt3dadd(-40.95, 38.86, -38.5, 1.05)
    pt3dadd(-40.95, 39.6, -38.5, 1.05)
    pt3dadd(-41.01, 39.76, -39, 1.05)
    pt3dadd(-41.01, 39.97, -39, 1.05)
    pt3dadd(-41.11, 40.22, -39, 1.05)
    pt3dadd(-41.11, 40.39, -39, 1.05)
    pt3dadd(-41.27, 40.54, -39.5, 1.05)
    pt3dadd(-41.37, 40.7, -39.5, 1.05)
    pt3dadd(-41.48, 40.81, -39.5, 1.05)
    pt3dadd(-41.53, 40.97, -39.5, 1.05)
    pt3dadd(-41.69, 41.07, -39.5, 1.05)
  }
}
proc shape3d_55() {
  dend[51] {
    pt3dadd(-41.74, 41.23, -39.5, 1.05)
    pt3dadd(-41.85, 41.28, -39.5, 1.05)
    pt3dadd(-41.95, 41.33, -39.5, 1.05)
    pt3dadd(-42.06, 41.39, -39.5, 1.05)
    pt3dadd(-42.16, 41.49, -39.5, 1.05)
    pt3dadd(-42.32, 41.33, -39.5, 1.05)
    pt3dadd(-42.48, 41.18, -39.5, 1.05)
    pt3dadd(-42.53, 40.97, -39.5, 1.05)
    pt3dadd(-42.53, 40.76, -39.5, 1.05)
    pt3dadd(-42.58, 40.65, -39.5, 1.05)
    pt3dadd(-42.58, 40.34, -39.5, 1.05)
    pt3dadd(-42.69, 40.22, -39.5, 1.05)
    pt3dadd(-42.79, 40.13, -39.5, 1.05)
    pt3dadd(-42.95, 40.07, -39.5, 1.05)
    pt3dadd(-43.32, 40.07, -39.5, 1.05)
    pt3dadd(-43.47, 40.02, -40, 1.05)
    pt3dadd(-43.68, 40.02, -40, 1.05)
    pt3dadd(-43.95, 40.13, -40.5, 1.05)
    pt3dadd(-44.05, 40.18, -40.5, 1.05)
    pt3dadd(-44.21, 40.28, -40.5, 1.05)
    pt3dadd(-44.31, 40.39, -40.5, 1.05)
    pt3dadd(-44.47, 40.39, -40.5, 1.05)
    pt3dadd(-44.58, 40.49, -40.5, 1.05)
    pt3dadd(-44.68, 40.54, -41, 1.05)
    pt3dadd(-44.79, 40.7, -41, 1.05)
    pt3dadd(-44.84, 40.76, -41.5, 1.05)
    pt3dadd(-44.94, 40.86, -41.5, 1.05)
    pt3dadd(-45, 40.9, -42, 1.05)
    pt3dadd(-44.94, 41.12, -42, 1.05)
    pt3dadd(-44.94, 41.39, -42, 1.05)
    pt3dadd(-44.89, 41.6, -42.5, 1.05)
    pt3dadd(-44.94, 41.76, -42.5, 1.05)
    pt3dadd(-44.94, 42.02, -42.5, 1.05)
    pt3dadd(-44.89, 42.23, -42.5, 1.05)
    pt3dadd(-46.06, 42.74, -43, 1.05)
    pt3dadd(-46.38, 42.74, -43.5, 1.05)
    pt3dadd(-46.59, 42.64, -43.5, 1.05)
    pt3dadd(-46.69, 42.48, -43.5, 1.05)
    pt3dadd(-46.85, 42.32, -43.5, 1.05)
    pt3dadd(-46.9, 42.22, -43.5, 1.05)
    pt3dadd(-47.01, 42.16, -43.5, 1.05)
    pt3dadd(-47.11, 42.11, -43.5, 1.05)
    pt3dadd(-47.27, 42.16, -44, 1.05)
    pt3dadd(-47.53, 42.16, -44, 1.05)
    pt3dadd(-47.74, 42.11, -44, 1.05)
    pt3dadd(-47.95, 42.01, -44, 1.05)
    pt3dadd(-48.11, 41.95, -44, 1.05)
    pt3dadd(-48.26, 41.95, -44, 1.05)
    pt3dadd(-48.42, 41.9, -44, 1.05)
    pt3dadd(-48.53, 41.85, -44, 1.05)
    pt3dadd(-48.68, 41.8, -44, 1.05)
    pt3dadd(-48.79, 41.74, -44, 1.05)
    pt3dadd(-48.89, 41.74, -44, 1.05)
    pt3dadd(-49.05, 41.69, -44.5, 1.05)
    pt3dadd(-49.37, 41.69, -45, 1.05)
    pt3dadd(-49.42, 41.85, -45, 1.05)
    pt3dadd(-49.47, 41.95, -45, 1.05)
    pt3dadd(-49.58, 42.11, -45, 1.05)
    pt3dadd(-49.63, 42.32, -45.5, 1.05)
    pt3dadd(-49.63, 42.58, -45.5, 1.05)
    pt3dadd(-49.52, 42.69, -45.5, 1.05)
    pt3dadd(-49.42, 42.79, -45.5, 1.05)
    pt3dadd(-49.31, 42.79, -45.5, 1.05)
    pt3dadd(-48.68, 42.79, -45.5, 1.05)
    pt3dadd(-48.53, 42.74, -45.5, 1.05)
    pt3dadd(-48.42, 42.74, -46, 1.05)
    pt3dadd(-48.16, 42.69, -46, 1.05)
    pt3dadd(-47.9, 42.69, -46, 1.05)
    pt3dadd(-47.74, 42.85, -46.5, 1.05)
    pt3dadd(-47.74, 43.11, -46.5, 1.05)
    pt3dadd(-47.79, 43.21, -46.5, 1.05)
    pt3dadd(-47.79, 43.48, -46.5, 1.05)
    pt3dadd(-47.9, 43.63, -46.5, 1.05)
    pt3dadd(-47.95, 43.74, -46.5, 1.05)
    pt3dadd(-48.05, 43.9, -47, 1.05)
    pt3dadd(-48.16, 44, -47, 1.05)
    pt3dadd(-48.21, 44.11, -47, 1.05)
    pt3dadd(-48.37, 44.21, -47, 1.05)
    pt3dadd(-48.53, 44.32, -47.5, 1.05)
    pt3dadd(-48.79, 44.58, -47.5, 1.05)
    pt3dadd(-48.95, 44.63, -47.5, 1.05)
    pt3dadd(-49.1, 44.74, -48, 1.05)
    pt3dadd(-49.21, 44.84, -48, 1.05)
    pt3dadd(-49.26, 44.95, -48, 1.05)
    pt3dadd(-49.37, 45.11, -48.5, 1.05)
    pt3dadd(-49.42, 45.21, -48.5, 1.05)
    pt3dadd(-49.47, 45.47, -48.5, 1.05)
    pt3dadd(-49.52, 45.74, -48.5, 1.05)
    pt3dadd(-49.52, 46.63, -48.5, 1.05)
    pt3dadd(-49.42, 46.68, -48.5, 1.05)
    pt3dadd(-49.37, 46.79, -48.5, 1.05)
    pt3dadd(-49.26, 46.95, -48.5, 1.05)
    pt3dadd(-49.16, 47.1, -48.5, 1.05)
    pt3dadd(-49.1, 47.31, -48.5, 1.05)
    pt3dadd(-49.05, 47.42, -48.5, 1.05)
    pt3dadd(-48.95, 47.58, -48.5, 1.05)
    pt3dadd(-48.89, 47.79, -48.5, 1.05)
    pt3dadd(-48.84, 47.95, -48.5, 1.05)
    pt3dadd(-48.84, 48.21, -48.5, 1.05)
    pt3dadd(-48.89, 48.42, -48.5, 1.05)
    pt3dadd(-49, 48.52, -48.5, 1.05)
    pt3dadd(-49.05, 48.63, -48.5, 1.05)
    pt3dadd(-49.16, 48.79, -48.5, 1.05)
    pt3dadd(-49.26, 48.89, -48.5, 1.05)
    pt3dadd(-49.37, 49, -48.5, 1.05)
    pt3dadd(-49.47, 49.1, -48, 1.05)
    pt3dadd(-49.68, 50.07, -48, 1.21)
    pt3dadd(-49.63, 50.23, -48, 1.21)
    pt3dadd(-49.58, 50.34, -48, 1.21)
    pt3dadd(-49.47, 50.49, -48, 1.21)
    pt3dadd(-49.42, 50.6, -48, 1.21)
    pt3dadd(-49.31, 50.81, -48, 1.21)
    pt3dadd(-49.42, 50.97, -48, 1.21)
    pt3dadd(-50.04, 52.25, -49, 0.94)
    pt3dadd(-50.14, 52.3, -49.5, 0.94)
    pt3dadd(-50.72, 52.3, -50, 0.94)
    pt3dadd(-50.98, 52.36, -50, 0.94)
    pt3dadd(-51.14, 52.41, -50, 0.94)
    pt3dadd(-51.46, 52.41, -50.5, 0.94)
    pt3dadd(-51.61, 52.57, -50.5, 0.94)
    pt3dadd(-51.72, 52.46, -50.5, 0.94)
    pt3dadd(-51.82, 52.62, -50.5, 0.94)
    pt3dadd(-51.88, 52.67, -51, 0.94)
    pt3dadd(-51.98, 52.78, -51, 0.94)
    pt3dadd(-52.09, 52.88, -51, 0.94)
    pt3dadd(-52.24, 52.83, -51, 0.94)
    pt3dadd(-52.35, 52.94, -51, 0.94)
    pt3dadd(-52.45, 53.09, -51, 0.94)
    pt3dadd(-52.56, 53.3, -51, 0.94)
    pt3dadd(-52.61, 53.46, -51.5, 0.94)
    pt3dadd(-52.72, 53.62, -51.5, 0.94)
    pt3dadd(-52.77, 53.72, -51.5, 0.94)
    pt3dadd(-52.87, 53.83, -51.5, 0.94)
    pt3dadd(-52.98, 53.99, -51.5, 0.94)
    pt3dadd(-53.03, 54.09, -51.5, 0.94)
    pt3dadd(-53.14, 54.2, -51.5, 0.94)
    pt3dadd(-53.19, 54.36, -52, 0.94)
    pt3dadd(-53.4, 54.36, -52, 0.94)
    pt3dadd(-53.4, 54.46, -52, 0.94)
    pt3dadd(-53.5, 54.57, -52, 0.94)
    pt3dadd(-53.61, 54.62, -52, 0.94)
    pt3dadd(-53.66, 54.83, -52, 0.94)
    pt3dadd(-53.77, 54.93, -52, 0.94)
    pt3dadd(-53.87, 54.99, -52, 0.94)
    pt3dadd(-53.92, 55.09, -52, 0.94)
    pt3dadd(-54.08, 55.2, -52, 0.94)
    pt3dadd(-54.13, 55.35, -52, 0.94)
    pt3dadd(-54.29, 55.3, -52, 0.94)
    pt3dadd(-54.4, 55.35, -52, 0.94)
    pt3dadd(-54.66, 55.35, -52, 0.94)
    pt3dadd(-54.82, 55.51, -52, 0.94)
    pt3dadd(-54.71, 55.67, -52, 0.94)
    pt3dadd(-54.61, 55.83, -52, 0.94)
    pt3dadd(-54.61, 55.93, -52, 0.94)
    pt3dadd(-54.45, 56.04, -52, 0.94)
    pt3dadd(-54.24, 56.09, -52.5, 0.94)
    pt3dadd(-54.13, 56.09, -52.5, 0.94)
    pt3dadd(-54.03, 56.2, -52.5, 0.94)
    pt3dadd(-53.92, 56.3, -52.5, 0.94)
    pt3dadd(-53.87, 56.46, -52.5, 0.94)
    pt3dadd(-53.87, 56.83, -53, 0.94)
    pt3dadd(-53.82, 57.04, -53.5, 0.94)
    pt3dadd(-53.82, 57.19, -53.5, 0.94)
    pt3dadd(-53.77, 57.4, -53.5, 0.94)
    pt3dadd(-53.82, 57.56, -53.5, 0.94)
    pt3dadd(-53.87, 57.72, -54, 0.94)
    pt3dadd(-53.92, 57.82, -54, 0.94)
    pt3dadd(-54.08, 57.88, -54.5, 0.94)
    pt3dadd(-54.24, 57.93, -54.5, 0.94)
    pt3dadd(-54.34, 57.88, -54.5, 0.94)
    pt3dadd(-54.55, 57.93, -55, 0.94)
    pt3dadd(-54.66, 58.04, -55, 0.94)
    pt3dadd(-54.66, 58.14, -55, 0.94)
    pt3dadd(-54.76, 58.3, -55, 0.94)
    pt3dadd(-54.82, 58.4, -55, 0.94)
    pt3dadd(-54.87, 58.56, -55, 0.94)
    pt3dadd(-54.87, 59.3, -55, 0.94)
    pt3dadd(-54.71, 59.61, -55.5, 0.94)
    pt3dadd(-54.55, 59.72, -55.5, 0.94)
    pt3dadd(-54.45, 59.77, -55.5, 0.94)
    pt3dadd(-54.29, 59.93, -55.5, 0.94)
    pt3dadd(-54.08, 60.14, -55.5, 0.94)
    pt3dadd(-53.98, 60.24, -55.5, 0.94)
    pt3dadd(-53.82, 60.56, -56, 0.94)
    pt3dadd(-53.77, 60.72, -56, 0.94)
    pt3dadd(-53.66, 60.87, -56, 0.94)
    pt3dadd(-53.66, 60.98, -56.5, 0.94)
    pt3dadd(-53.61, 61.19, -56.5, 0.94)
    pt3dadd(-53.61, 61.56, -56.5, 0.94)
    pt3dadd(-53.9, 62.11, -57, 0.94)
    pt3dadd(-53.96, 62.27, -57, 0.94)
    pt3dadd(-54.06, 62.27, -57, 0.94)
    pt3dadd(-54.11, 62.37, -57, 0.94)
    pt3dadd(-54.22, 62.37, -57, 0.94)
    pt3dadd(-54.27, 62.53, -57, 0.94)
    pt3dadd(-54.43, 62.58, -57, 0.94)
    pt3dadd(-54.53, 62.74, -57, 0.94)
    pt3dadd(-54.69, 62.74, -57, 0.94)
    pt3dadd(-54.8, 62.95, -57.5, 0.94)
    pt3dadd(-54.64, 63.06, -57.5, 0.94)
    pt3dadd(-54.38, 63.06, -58, 0.94)
    pt3dadd(-54.11, 63.16, -58.5, 0.94)
    pt3dadd(-53.54, 63.16, -59, 0.94)
    pt3dadd(-53.43, 63.16, -59, 0.94)
    pt3dadd(-52.96, 63.16, -59.5, 0.94)
    pt3dadd(-52.85, 63.11, -59.5, 0.94)
    pt3dadd(-52.7, 63, -59.5, 0.94)
    pt3dadd(-52.54, 62.9, -60, 0.94)
    pt3dadd(-52.33, 62.85, -60, 0.94)
    pt3dadd(-52.28, 62.79, -60.5, 0.94)
    pt3dadd(-52.22, 62.69, -60.5, 0.94)
    pt3dadd(-52.07, 62.58, -60.5, 0.94)
    pt3dadd(-51.96, 62.53, -60.5, 0.94)
    pt3dadd(-51.86, 62.48, -60.5, 0.94)
    pt3dadd(-51.7, 62.43, -60.5, 0.94)
    pt3dadd(-51.49, 62.37, -60.5, 0.94)
    pt3dadd(-51.23, 62.37, -60.5, 0.94)
    pt3dadd(-50.96, 62.37, -60.5, 0.94)
    pt3dadd(-50.65, 62.37, -60.5, 0.94)
    pt3dadd(-50.49, 62.37, -60.5, 0.94)
    pt3dadd(-50.33, 62.53, -60.5, 0.94)
    pt3dadd(-50.23, 62.58, -60.5, 0.94)
    pt3dadd(-50.12, 62.69, -61, 0.94)
    pt3dadd(-50.07, 62.79, -61, 0.94)
    pt3dadd(-50.12, 62.95, -61, 0.94)
    pt3dadd(-50.23, 63.06, -61, 0.94)
    pt3dadd(-50.33, 63.27, -61, 0.94)
    pt3dadd(-50.49, 63.32, -61, 0.94)
    pt3dadd(-50.65, 63.48, -61, 0.94)
    pt3dadd(-50.75, 63.53, -61, 0.94)
    pt3dadd(-50.81, 63.58, -61.5, 0.94)
    pt3dadd(-51.02, 63.64, -61.5, 0.94)
    pt3dadd(-51.12, 63.74, -61.5, 0.94)
    pt3dadd(-51.28, 63.79, -61.5, 0.94)
    pt3dadd(-51.38, 63.9, -62, 0.94)
    pt3dadd(-51.49, 64, -62, 0.94)
    pt3dadd(-51.49, 64.11, -62, 0.94)
    pt3dadd(-51.59, 64.27, -62, 0.94)
    pt3dadd(-51.59, 64.53, -62, 0.94)
    pt3dadd(-51.65, 64.69, -62, 0.94)
    pt3dadd(-51.65, 64.9, -62, 0.94)
    pt3dadd(-51.7, 65, -62, 0.94)
    pt3dadd(-51.75, 65.11, -62, 0.94)
    pt3dadd(-51.86, 65.16, -62, 0.94)
    pt3dadd(-51.91, 65.27, -62, 0.94)
    pt3dadd(-52.17, 65.53, -62, 0.94)
    pt3dadd(-52.28, 65.58, -62.5, 0.94)
    pt3dadd(-52.38, 65.69, -62.5, 0.94)
    pt3dadd(-52.54, 65.79, -62.5, 0.94)
  }
}
proc shape3d_56() {
  dend[51] {
    pt3dadd(-52.75, 65.79, -62.5, 0.94)
    pt3dadd(-52.85, 65.84, -62.5, 0.94)
    pt3dadd(-52.96, 66.05, -63, 0.94)
    pt3dadd(-53.12, 66.16, -63, 0.94)
    pt3dadd(-53.22, 66.31, -63, 0.94)
    pt3dadd(-53.38, 66.47, -63, 0.94)
    pt3dadd(-53.43, 66.58, -63, 0.94)
    pt3dadd(-53.54, 66.58, -63, 0.94)
    pt3dadd(-53.64, 66.68, -63, 0.94)
    pt3dadd(-53.75, 66.73, -63, 0.94)
    pt3dadd(-53.85, 66.73, -63, 0.94)
    pt3dadd(-54.01, 66.79, -63, 0.94)
    pt3dadd(-54.11, 66.84, -63.5, 0.94)
    pt3dadd(-54.22, 66.84, -63.5, 0.94)
    pt3dadd(-54.38, 66.73, -63.5, 0.94)
    pt3dadd(-54.48, 66.58, -63.5, 0.94)
    pt3dadd(-54.59, 66.58, -64, 0.94)
    pt3dadd(-54.64, 66.47, -64, 0.94)
    pt3dadd(-54.69, 66.37, -64, 0.94)
    pt3dadd(-54.74, 66.2, -64, 0.94)
    pt3dadd(-54.85, 66.16, -64, 0.94)
    pt3dadd(-54.95, 66.11, -64, 0.94)
    pt3dadd(-55.16, 66.05, -64.5, 0.94)
    pt3dadd(-55.32, 66, -64.5, 0.94)
    pt3dadd(-55.48, 65.9, -64.5, 0.94)
    pt3dadd(-55.58, 65.9, -64.5, 0.94)
    pt3dadd(-55.69, 65.95, -64.5, 0.94)
    pt3dadd(-55.79, 65.79, -64.5, 0.94)
    pt3dadd(-56.16, 65.79, -64.5, 0.94)
    pt3dadd(-56.32, 65.84, -64.5, 0.94)
    pt3dadd(-56.63, 65.84, -65, 0.94)
    pt3dadd(-56.74, 65.9, -65, 0.94)
    pt3dadd(-56.84, 65.9, -65, 0.94)
    pt3dadd(-56.9, 66, -65, 0.94)
    pt3dadd(-57, 66.16, -65, 0.94)
    pt3dadd(-57.11, 66.2, -65, 0.94)
    pt3dadd(-57.16, 66.31, -65.5, 0.94)
    pt3dadd(-57.16, 66.42, -65.5, 0.94)
    pt3dadd(-57.21, 66.58, -65.5, 0.94)
    pt3dadd(-57.26, 66.73, -65.5, 0.94)
    pt3dadd(-57.32, 66.95, -65.5, 0.94)
    pt3dadd(-57.32, 67.16, -65.5, 0.94)
    pt3dadd(-57.37, 67.31, -65.5, 0.94)
    pt3dadd(-57.37, 67.63, -65.5, 0.94)
    pt3dadd(-57.42, 67.84, -65.5, 0.94)
    pt3dadd(-57.42, 68.37, -65.5, 0.94)
    pt3dadd(-57.37, 68.58, -65.5, 0.94)
    pt3dadd(-57.37, 68.84, -65.5, 0.94)
    pt3dadd(-57.42, 68.95, -65.5, 0.94)
    pt3dadd(-57.47, 69.09, -65.5, 0.94)
    pt3dadd(-57.53, 69.26, -65.5, 0.94)
    pt3dadd(-57.58, 69.42, -65.5, 0.94)
    pt3dadd(-57.79, 69.52, -65.5, 0.94)
    pt3dadd(-57.84, 69.68, -65.5, 0.94)
    pt3dadd(-57.95, 69.73, -65.5, 0.94)
    pt3dadd(-58.05, 69.79, -65.5, 0.94)
    pt3dadd(-58.16, 69.89, -65.5, 0.94)
    pt3dadd(-58.26, 69.94, -65.5, 0.94)
    pt3dadd(-58.31, 70.05, -65.5, 0.94)
    pt3dadd(-58.42, 70.15, -66, 0.94)
    pt3dadd(-58.58, 70.15, -66, 0.94)
    pt3dadd(-58.68, 70.31, -66, 0.94)
    pt3dadd(-58.79, 70.31, -66, 0.94)
    pt3dadd(-58.89, 70.42, -66, 0.94)
    pt3dadd(-59, 70.52, -66, 0.94)
    pt3dadd(-59.1, 70.56, -66, 0.94)
    pt3dadd(-59.15, 70.68, -66, 0.94)
    pt3dadd(-59.31, 70.79, -66, 0.94)
    pt3dadd(-59.36, 70.94, -66, 0.94)
    pt3dadd(-59.47, 71, -66, 0.94)
    pt3dadd(-59.52, 71.09, -66, 0.94)
    pt3dadd(-59.57, 71.2, -66, 0.94)
    pt3dadd(-59.73, 71.31, -66, 0.94)
    pt3dadd(-59.84, 71.42, -66, 0.94)
    pt3dadd(-59.99, 71.52, -66, 0.94)
    pt3dadd(-60.1, 71.73, -66, 0.94)
    pt3dadd(-60.15, 71.89, -66, 0.94)
    pt3dadd(-60.26, 71.94, -66, 0.94)
    pt3dadd(-60.36, 72.05, -66, 0.94)
    pt3dadd(-60.41, 72.15, -66, 0.94)
    pt3dadd(-60.52, 72.31, -66, 0.94)
    pt3dadd(-60.62, 72.41, -66, 0.94)
    pt3dadd(-60.73, 72.52, -66, 0.94)
    pt3dadd(-60.78, 72.68, -66, 0.94)
    pt3dadd(-60.89, 72.68, -66, 0.94)
    pt3dadd(-60.99, 72.78, -66, 0.94)
    pt3dadd(-61.1, 72.84, -66, 0.94)
    pt3dadd(-61.2, 72.89, -66, 0.94)
    pt3dadd(-61.31, 72.98, -66, 0.94)
    pt3dadd(-61.41, 73.09, -66, 0.94)
    pt3dadd(-62.85, 73.76, -66.5, 0.94)
    pt3dadd(-62.85, 73.92, -66.5, 0.94)
    pt3dadd(-62.85, 74.13, -66.5, 0.94)
    pt3dadd(-62.8, 74.29, -66.5, 0.94)
    pt3dadd(-62.8, 74.66, -66.5, 0.94)
    pt3dadd(-62.74, 74.87, -66.5, 0.94)
    pt3dadd(-62.74, 75.39, -67, 0.94)
    pt3dadd(-62.69, 75.55, -67, 0.94)
    pt3dadd(-62.69, 75.92, -67, 0.94)
    pt3dadd(-62.64, 76.13, -67, 0.94)
    pt3dadd(-62.64, 76.59, -67, 0.94)
    pt3dadd(-62.59, 76.81, -67, 0.94)
    pt3dadd(-62.48, 76.97, -67, 0.94)
    pt3dadd(-62.48, 77.18, -67, 0.94)
    pt3dadd(-62.43, 77.44, -67, 0.94)
    pt3dadd(-62.27, 77.7, -67, 0.94)
    pt3dadd(-62.22, 77.81, -67, 0.94)
    pt3dadd(-62.11, 78.02, -67, 0.94)
    pt3dadd(-62.06, 78.18, -67, 0.94)
    pt3dadd(-62.01, 78.34, -67.5, 0.94)
    pt3dadd(-61.9, 78.44, -67.5, 0.94)
    pt3dadd(-61.85, 78.55, -67.5, 0.94)
    pt3dadd(-61.75, 78.76, -67.5, 0.94)
    pt3dadd(-61.64, 78.86, -67.5, 0.94)
    pt3dadd(-61.54, 79.02, -67.5, 0.94)
    pt3dadd(-61.38, 79.23, -67.5, 0.94)
    pt3dadd(-61.27, 79.34, -67.5, 0.94)
    pt3dadd(-61.17, 79.55, -67.5, 0.94)
    pt3dadd(-60.91, 79.81, -67.5, 0.94)
    pt3dadd(-60.8, 79.91, -68, 0.94)
    pt3dadd(-60.64, 80.02, -68, 0.94)
    pt3dadd(-60.54, 80.12, -68, 0.94)
    pt3dadd(-60.38, 80.12, -68, 0.94)
    pt3dadd(-60.17, 80.34, -68, 0.94)
    pt3dadd(-60.01, 80.44, -68, 0.94)
    pt3dadd(-59.91, 80.55, -68, 0.94)
    pt3dadd(-59.8, 80.59, -68, 0.94)
    pt3dadd(-59.7, 80.7, -68, 0.94)
    pt3dadd(-59.59, 80.81, -68, 0.94)
    pt3dadd(-59.49, 80.86, -68, 0.94)
    pt3dadd(-59.33, 80.97, -68, 0.94)
    pt3dadd(-59.17, 81.12, -68, 0.94)
    pt3dadd(-59.07, 81.23, -68, 0.94)
    pt3dadd(-58.81, 81.48, -68, 0.94)
    pt3dadd(-58.75, 81.65, -68, 0.94)
    pt3dadd(-58.65, 81.75, -68, 0.94)
    pt3dadd(-58.54, 81.91, -68, 0.94)
    pt3dadd(-58.49, 82.07, -68, 0.94)
    pt3dadd(-58.33, 82.39, -68, 0.94)
    pt3dadd(-58.28, 82.49, -68, 0.94)
    pt3dadd(-58.18, 82.65, -68, 0.94)
    pt3dadd(-58.12, 82.81, -68, 0.94)
    pt3dadd(-57.91, 83.02, -68, 0.94)
    pt3dadd(-57.86, 83.12, -68, 0.94)
    pt3dadd(-57.81, 83.28, -68, 0.94)
    pt3dadd(-57.7, 83.38, -68, 0.94)
    pt3dadd(-57.6, 83.49, -68, 0.94)
    pt3dadd(-57.49, 83.54, -68, 0.94)
    pt3dadd(-57.39, 83.65, -68, 0.94)
    pt3dadd(-57.28, 83.75, -68, 0.94)
    pt3dadd(-57.13, 83.91, -68, 0.94)
    pt3dadd(-57.02, 84.01, -68, 0.94)
    pt3dadd(-56.81, 84.17, -68, 0.94)
    pt3dadd(-56.76, 84.28, -68, 0.94)
    pt3dadd(-56.65, 84.38, -68, 0.94)
    pt3dadd(-56.55, 84.49, -68, 0.94)
    pt3dadd(-56.44, 84.54, -68, 0.94)
    pt3dadd(-56.44, 84.7, -68, 0.94)
    pt3dadd(-54.72, 85.5, -69.5, 0.94)
    pt3dadd(-54.62, 85.66, -69.5, 0.94)
    pt3dadd(-54.51, 85.71, -69.5, 0.94)
    pt3dadd(-54.36, 85.76, -69.5, 0.94)
    pt3dadd(-54.25, 85.87, -69.5, 0.94)
    pt3dadd(-54.15, 85.97, -69.5, 0.94)
    pt3dadd(-53.99, 86.08, -69.5, 0.94)
    pt3dadd(-53.62, 86.45, -70, 0.94)
    pt3dadd(-53.52, 86.6, -70, 0.94)
    pt3dadd(-53.46, 86.71, -70, 0.94)
    pt3dadd(-53.41, 86.82, -70, 0.94)
    pt3dadd(-53.36, 86.97, -70, 0.94)
    pt3dadd(-53.36, 87.34, -70, 0.94)
    pt3dadd(-53.52, 87.45, -70.5, 0.94)
    pt3dadd(-53.67, 87.66, -70.5, 0.94)
    pt3dadd(-53.88, 87.81, -70.5, 0.94)
    pt3dadd(-54.09, 87.87, -70.5, 0.94)
    pt3dadd(-54.25, 87.97, -70.5, 0.94)
    pt3dadd(-54.36, 88.08, -70.5, 0.94)
    pt3dadd(-54.46, 88.08, -70.5, 0.94)
    pt3dadd(-54.57, 88.18, -71, 0.94)
    pt3dadd(-54.72, 88.29, -71.5, 0.94)
    pt3dadd(-54.72, 88.66, -71.5, 0.94)
    pt3dadd(-54.78, 88.81, -71.5, 0.94)
    pt3dadd(-54.67, 89.08, -71.5, 0.94)
    pt3dadd(-54.62, 89.18, -72, 0.94)
    pt3dadd(-54.41, 89.13, -72, 0.94)
    pt3dadd(-54.25, 89.08, -72, 0.94)
    pt3dadd(-54.15, 88.97, -72, 0.94)
    pt3dadd(-54.04, 88.87, -72, 0.94)
    pt3dadd(-53.78, 88.81, -72, 0.94)
    pt3dadd(-53.73, 88.66, -72.5, 0.94)
    pt3dadd(-53.52, 88.66, -72.5, 0.94)
    pt3dadd(-53.25, 88.81, -72.5, 0.94)
    pt3dadd(-53.15, 88.97, -72.5, 0.94)
    pt3dadd(-53.1, 89.13, -72.5, 0.94)
    pt3dadd(-52.99, 89.29, -72.5, 0.94)
    pt3dadd(-52.99, 89.81, -73, 0.94)
    pt3dadd(-53.1, 89.92, -73, 0.94)
    pt3dadd(-53.15, 90.13, -73, 0.94)
    pt3dadd(-53.31, 90.23, -73, 0.94)
    pt3dadd(-53.41, 90.39, -73, 0.94)
    pt3dadd(-53.46, 90.5, -73, 0.94)
    pt3dadd(-53.52, 90.6, -73.5, 0.94)
    pt3dadd(-53.57, 90.71, -73.5, 0.94)
    pt3dadd(-53.57, 90.86, -73.5, 0.94)
    pt3dadd(-53.62, 91.02, -73.5, 0.94)
    pt3dadd(-53.67, 91.13, -73.5, 0.94)
    pt3dadd(-53.67, 91.55, -73.5, 0.94)
    pt3dadd(-53.62, 91.65, -73.5, 0.94)
    pt3dadd(-53.57, 91.81, -73.5, 0.94)
    pt3dadd(-53.52, 91.91, -73.5, 0.94)
    pt3dadd(-53.41, 92.12, -73.5, 0.94)
    pt3dadd(-53.15, 92.39, -73.5, 0.94)
    pt3dadd(-52.68, 92.39, -74, 0.94)
    pt3dadd(-52.52, 92.44, -74, 0.94)
    pt3dadd(-52.41, 92.49, -74, 0.94)
    pt3dadd(-52.2, 92.55, -74, 0.94)
    pt3dadd(-52.05, 92.65, -74, 0.94)
    pt3dadd(-51.89, 92.7, -74, 0.94)
    pt3dadd(-51.73, 92.81, -74, 0.94)
    pt3dadd(-51.57, 93.02, -74, 0.94)
    pt3dadd(-51.36, 93.23, -74, 0.94)
    pt3dadd(-51.26, 93.33, -74, 0.94)
    pt3dadd(-51.21, 93.54, -74, 0.94)
    pt3dadd(-51.15, 93.75, -74, 0.94)
    pt3dadd(-51.05, 93.91, -74, 0.94)
    pt3dadd(-51.05, 94.39, -74.5, 0.94)
    pt3dadd(-51.05, 94.75, -75, 0.94)
    pt3dadd(-51.05, 94.86, -75, 0.94)
    pt3dadd(-51.1, 95.02, -75, 0.94)
    pt3dadd(-51.15, 95.12, -75, 0.94)
    pt3dadd(-51.15, 95.8, -75, 0.94)
    pt3dadd(-51.1, 95.91, -75, 0.94)
    pt3dadd(-51.1, 96.01, -75, 0.94)
  }
  dend[52] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(-3.74, -3.07, 2.5, 0.89)
    pt3dadd(-3.74, -2.86, 2.5, 0.89)
    pt3dadd(-3.59, -2.75, 2, 0.89)
    pt3dadd(-3.59, -2.59, 2, 0.89)
    pt3dadd(-3.43, -2.65, 1.5, 0.89)
    pt3dadd(-3.22, -2.7, 1, 0.89)
    pt3dadd(-3.17, -2.8, 1, 0.89)
    pt3dadd(-3.11, -2.91, 1, 0.89)
    pt3dadd(-3.11, -3.22, 1, 0.89)
    pt3dadd(-3.22, -3.33, 1, 0.89)
    pt3dadd(-3.22, -3.49, 0.5, 0.89)
    pt3dadd(-3.22, -3.65, 0.5, 0.89)
    pt3dadd(-3.22, -3.75, 0.5, 0.89)
    pt3dadd(-3.17, -3.86, 0.5, 0.89)
    pt3dadd(-3.06, -3.96, 0.5, 0.89)
  }
}
proc shape3d_57() {
  dend[52] {
    pt3dadd(-2.8, -3.96, 0, 0.89)
    pt3dadd(-2.69, -3.86, 0, 0.89)
    pt3dadd(-2.64, -3.8, -0.5, 0.89)
    pt3dadd(-2.48, -3.8, -0.5, 0.89)
    pt3dadd(-2.38, -3.75, -0.5, 0.89)
    pt3dadd(-2.06, -3.75, -1, 0.89)
    pt3dadd(-1.85, -3.7, -1.5, 0.89)
    pt3dadd(-1.8, -3.8, -1.5, 0.89)
    pt3dadd(-1.64, -3.91, -1.5, 0.89)
    pt3dadd(-1.59, -4.01, -1.5, 0.89)
    pt3dadd(-1.54, -4.22, -1.5, 0.89)
    pt3dadd(-1.49, -4.33, -1.5, 0.89)
    pt3dadd(-1.38, -4.49, -1.5, 0.89)
    pt3dadd(-1.28, -4.54, -2, 0.89)
    pt3dadd(-1.12, -4.59, -2, 0.89)
    pt3dadd(-1.01, -4.49, -2, 0.89)
    pt3dadd(-0.91, -4.38, -2, 0.89)
    pt3dadd(-0.75, -4.33, -2, 0.89)
    pt3dadd(-0.49, -4.22, -2, 0.89)
    pt3dadd(-0.38, -4.17, -2, 0.89)
    pt3dadd(-0.02, -4.17, -2.5, 0.89)
    pt3dadd(0.04, -4.28, -2.5, 0.89)
    pt3dadd(0.09, -4.49, -2.5, 0.89)
    pt3dadd(0.14, -4.7, -2.5, 0.89)
    pt3dadd(0.04, -4.84, -2.5, 0.89)
    pt3dadd(-0.02, -4.96, -2.5, 0.89)
    pt3dadd(-0.07, -5.05, -2.5, 0.89)
    pt3dadd(-0.23, -5.22, -2.5, 0.89)
    pt3dadd(-0.38, -5.33, -2.5, 0.89)
    pt3dadd(-0.49, -5.43, -2.5, 0.89)
    pt3dadd(-0.59, -5.59, -2.5, 0.89)
    pt3dadd(-0.75, -5.7, -2.5, 0.89)
    pt3dadd(-0.91, -5.91, -2.5, 0.89)
    pt3dadd(-1.01, -5.96, -2.5, 0.89)
    pt3dadd(-1.12, -6.17, -2.5, 0.89)
    pt3dadd(-1.12, -6.33, -2.5, 0.89)
    pt3dadd(-1.17, -6.54, -3, 0.89)
    pt3dadd(-1.07, -6.8, -3, 0.89)
    pt3dadd(-1.01, -6.9, -3, 0.89)
    pt3dadd(-0.96, -7.01, -3.5, 0.89)
    pt3dadd(-0.91, -7.17, -3.5, 0.89)
    pt3dadd(-0.59, -7.17, -3.5, 0.89)
    pt3dadd(-0.49, -7.22, -4, 0.89)
    pt3dadd(-0.38, -7.17, -4, 0.89)
    pt3dadd(-0.28, -7.11, -4, 0.89)
    pt3dadd(-0.17, -7.06, -4, 0.89)
    pt3dadd(-0.07, -7.11, -4, 0.89)
    pt3dadd(0.14, -7.11, -4, 0.89)
    pt3dadd(0.3, -7.22, -4, 0.89)
    pt3dadd(0.4, -7.27, -4.5, 0.89)
    pt3dadd(0.46, -7.43, -4.5, 0.89)
    pt3dadd(0.56, -7.59, -4.5, 0.89)
    pt3dadd(0.56, -7.69, -4.5, 0.89)
    pt3dadd(0.61, -7.8, -4.5, 0.89)
    pt3dadd(0.61, -8.17, -4.5, 0.89)
    pt3dadd(0.56, -8.27, -4.5, 0.89)
    pt3dadd(0.51, -8.48, -4.5, 0.89)
    pt3dadd(0.51, -8.85, -4.5, 0.89)
    pt3dadd(1.46, -9.66, -5, 0.89)
    pt3dadd(1.56, -9.55, -5, 0.89)
    pt3dadd(1.62, -9.66, -5, 0.89)
    pt3dadd(1.77, -9.5, -5, 0.89)
    pt3dadd(1.88, -9.5, -5, 0.89)
    pt3dadd(2.25, -9.5, -5.5, 0.89)
    pt3dadd(2.25, -9.76, -6, 0.89)
    pt3dadd(2.25, -10.81, -6.5, 0.89)
    pt3dadd(2.14, -10.87, -6.5, 0.89)
    pt3dadd(1.98, -10.87, -6.5, 0.89)
    pt3dadd(1.83, -10.97, -6.5, 0.89)
    pt3dadd(1.72, -11.02, -6.5, 0.89)
    pt3dadd(1.51, -11.02, -6.5, 0.89)
    pt3dadd(1.41, -10.92, -6.5, 0.89)
    pt3dadd(1.41, -10.71, -6.5, 0.89)
    pt3dadd(1.46, -10.55, -6.5, 0.89)
    pt3dadd(1.46, -10.34, -6.5, 0.89)
    pt3dadd(1.51, -10.18, -7, 0.89)
    pt3dadd(1.62, -9.97, -7, 0.89)
    pt3dadd(1.67, -9.81, -7, 0.89)
    pt3dadd(1.77, -9.71, -7, 0.89)
    pt3dadd(2.04, -9.44, -7.5, 0.89)
    pt3dadd(2.14, -9.34, -7.5, 0.89)
    pt3dadd(2.14, -9.18, -7.5, 0.89)
    pt3dadd(2.25, -9.08, -7.5, 0.89)
    pt3dadd(2.25, -8.97, -8, 0.89)
    pt3dadd(2.29, -8.86, -8, 0.89)
    pt3dadd(2.35, -8.76, -8, 0.89)
    pt3dadd(2.35, -8.5, -8, 0.89)
    pt3dadd(2.4, -8.28, -8.5, 0.89)
    pt3dadd(2.5, -8.13, -8.5, 0.89)
    pt3dadd(2.5, -7.92, -8.5, 0.89)
    pt3dadd(2.61, -7.66, -8.5, 0.89)
    pt3dadd(2.67, -7.55, -8.5, 0.89)
    pt3dadd(2.77, -7.29, -8.5, 0.89)
    pt3dadd(2.82, -7.13, -8.5, 0.89)
    pt3dadd(2.88, -6.98, -8.5, 0.89)
    pt3dadd(2.98, -6.82, -8.5, 0.89)
    pt3dadd(2.98, -6.71, -8.5, 0.89)
    pt3dadd(3.09, -6.5, -9, 0.89)
    pt3dadd(3.09, -6.34, -9, 0.89)
    pt3dadd(3.24, -6.13, -9, 0.89)
    pt3dadd(3.35, -5.98, -9, 0.89)
    pt3dadd(3.45, -5.77, -9, 0.89)
    pt3dadd(3.77, -5.45, -9.5, 0.89)
    pt3dadd(3.87, -5.4, -10, 0.89)
    pt3dadd(3.98, -5.5, -10, 0.89)
    pt3dadd(4.03, -5.61, -10, 0.89)
    pt3dadd(4.08, -5.77, -10, 0.89)
    pt3dadd(4.08, -6.08, -10, 0.89)
    pt3dadd(4.13, -6.24, -10, 0.89)
    pt3dadd(4.13, -6.61, -10, 0.89)
    pt3dadd(4.08, -6.82, -10, 0.89)
    pt3dadd(4.03, -7.03, -10.5, 0.89)
    pt3dadd(3.98, -7.19, -10.5, 0.89)
    pt3dadd(3.93, -7.4, -10.5, 0.89)
    pt3dadd(3.93, -7.55, -10.5, 0.89)
    pt3dadd(3.87, -7.76, -10.5, 0.89)
    pt3dadd(3.87, -7.92, -11, 0.89)
    pt3dadd(3.82, -8.13, -11, 0.89)
    pt3dadd(3.82, -8.5, -11, 0.89)
    pt3dadd(3.77, -8.66, -11, 0.89)
    pt3dadd(3.82, -8.76, -11, 0.89)
    pt3dadd(3.82, -9.24, -11, 0.89)
    pt3dadd(3.77, -9.34, -11, 0.89)
    pt3dadd(3.77, -9.76, -11.5, 0.89)
    pt3dadd(3.77, -10.23, -12.5, 0.89)
    pt3dadd(3.82, -10.34, -12.5, 0.89)
    pt3dadd(3.87, -10.5, -12.5, 0.89)
    pt3dadd(3.93, -10.6, -13, 0.89)
    pt3dadd(3.98, -10.71, -13, 0.89)
    pt3dadd(4.08, -10.92, -13, 0.89)
    pt3dadd(4.13, -11.02, -13, 0.89)
    pt3dadd(4.13, -11.18, -13, 0.89)
    pt3dadd(4.24, -11.23, -13.5, 0.89)
    pt3dadd(4.34, -11.34, -13.5, 0.89)
    pt3dadd(4.5, -11.34, -13.5, 0.89)
    pt3dadd(4.61, -11.29, -13.5, 0.89)
    pt3dadd(4.76, -11.29, -13.5, 0.89)
    pt3dadd(4.87, -11.29, -14, 0.89)
    pt3dadd(4.92, -11.39, -14, 0.89)
    pt3dadd(4.92, -11.6, -14, 0.89)
    pt3dadd(4.71, -11.81, -14, 0.89)
    pt3dadd(4.71, -12.02, -14, 0.89)
    pt3dadd(4.66, -12.18, -14, 0.89)
    pt3dadd(4.66, -12.39, -14, 0.89)
    pt3dadd(4.66, -12.55, -14.5, 0.89)
    pt3dadd(4.71, -12.65, -14.5, 0.89)
    pt3dadd(4.82, -12.81, -14.5, 0.89)
    pt3dadd(5.4, -12.81, -15, 0.89)
    pt3dadd(5.55, -12.76, -15, 0.89)
    pt3dadd(5.71, -12.71, -15, 0.89)
    pt3dadd(5.82, -12.6, -15, 0.89)
    pt3dadd(6.18, -12.23, -15, 0.89)
    pt3dadd(6.34, -12.13, -15, 0.89)
    pt3dadd(6.5, -12.02, -15.5, 0.89)
    pt3dadd(6.66, -11.86, -15.5, 0.89)
    pt3dadd(6.76, -11.76, -15.5, 0.89)
    pt3dadd(6.92, -11.6, -15.5, 0.89)
    pt3dadd(7.13, -11.5, -15.5, 0.89)
    pt3dadd(7.29, -11.5, -15.5, 0.89)
    pt3dadd(7.55, -11.39, -16, 0.89)
    pt3dadd(7.92, -11.39, -16, 0.89)
    pt3dadd(8.02, -11.55, -16.5, 0.89)
    pt3dadd(7.97, -11.76, -16.5, 0.89)
    pt3dadd(7.81, -11.86, -16.5, 0.89)
    pt3dadd(7.71, -12.02, -16.5, 0.89)
    pt3dadd(7.55, -12.07, -16.5, 0.89)
    pt3dadd(7.44, -12.13, -16.5, 0.89)
    pt3dadd(7.34, -12.23, -16.5, 0.89)
    pt3dadd(7.18, -12.34, -16.5, 0.89)
    pt3dadd(7.08, -12.44, -16.5, 0.89)
    pt3dadd(6.87, -12.44, -16.5, 0.89)
    pt3dadd(6.71, -12.49, -16.5, 0.89)
    pt3dadd(6.5, -12.6, -16.5, 0.89)
    pt3dadd(6.34, -12.65, -16.5, 0.89)
    pt3dadd(6.13, -12.76, -17, 0.89)
    pt3dadd(5.92, -12.86, -17, 0.89)
    pt3dadd(5.82, -12.92, -17, 0.89)
    pt3dadd(5.5, -13.18, -17, 0.89)
    pt3dadd(5.4, -13.28, -17, 0.89)
    pt3dadd(5.34, -13.39, -17, 0.89)
    pt3dadd(5.19, -13.65, -17, 0.89)
    pt3dadd(5.13, -13.81, -17, 0.89)
    pt3dadd(5.34, -13.97, -17, 0.89)
    pt3dadd(5.5, -14.02, -17, 0.89)
    pt3dadd(5.71, -13.97, -17, 0.89)
    pt3dadd(6.03, -13.97, -17, 0.89)
    pt3dadd(6.18, -13.91, -17, 0.89)
    pt3dadd(6.39, -13.86, -17, 0.89)
    pt3dadd(6.5, -13.86, -17, 0.89)
    pt3dadd(6.76, -13.86, -17, 0.89)
    pt3dadd(6.97, -13.91, -17, 0.89)
    pt3dadd(7.13, -13.97, -17, 0.89)
    pt3dadd(7.23, -14.02, -17.5, 0.89)
    pt3dadd(7.5, -14.12, -18, 0.89)
    pt3dadd(7.6, -14.23, -18, 0.89)
    pt3dadd(7.71, -14.33, -18, 0.89)
    pt3dadd(7.86, -14.49, -18.5, 0.89)
    pt3dadd(7.81, -14.65, -18.5, 0.89)
    pt3dadd(7.92, -14.76, -18.5, 0.89)
    pt3dadd(7.86, -14.91, -18.5, 0.89)
    pt3dadd(7.92, -15.02, -18.5, 0.89)
    pt3dadd(7.97, -15.12, -18.5, 0.89)
    pt3dadd(7.97, -15.28, -18.5, 0.89)
    pt3dadd(8.02, -15.39, -18.5, 0.89)
    pt3dadd(8.13, -15.54, -19, 0.89)
    pt3dadd(8.23, -15.65, -19, 0.89)
    pt3dadd(8.27, -15.75, -19, 0.89)
    pt3dadd(8.39, -15.75, -19, 0.89)
    pt3dadd(8.49, -15.81, -19, 0.89)
    pt3dadd(8.76, -15.81, -19.5, 0.89)
    pt3dadd(8.91, -15.75, -19.5, 0.89)
    pt3dadd(9.11, -15.7, -19.5, 0.89)
    pt3dadd(9.23, -15.54, -19.5, 0.89)
    pt3dadd(9.27, -15.39, -19.5, 0.89)
    pt3dadd(9.27, -15.18, -20, 0.89)
    pt3dadd(9.27, -14.97, -20, 0.89)
    pt3dadd(9.23, -14.81, -20, 0.89)
    pt3dadd(9.18, -14.65, -20, 0.89)
    pt3dadd(9.11, -14.55, -20.5, 0.89)
    pt3dadd(9.07, -14.39, -20.5, 0.89)
    pt3dadd(9.02, -14.23, -20.5, 0.89)
    pt3dadd(8.97, -14.07, -20.5, 0.89)
    pt3dadd(8.91, -13.91, -20.5, 0.89)
    pt3dadd(8.91, -13.7, -20.5, 0.89)
    pt3dadd(8.97, -13.55, -20.5, 0.89)
    pt3dadd(8.97, -13.28, -20.5, 0.89)
    pt3dadd(9.07, -13.13, -20.5, 0.89)
    pt3dadd(9.18, -12.92, -20.5, 0.89)
    pt3dadd(9.44, -12.65, -20.5, 0.89)
    pt3dadd(9.65, -12.55, -20.5, 0.89)
    pt3dadd(9.86, -12.55, -20.5, 0.89)
    pt3dadd(10.02, -12.39, -21, 0.89)
    pt3dadd(10.38, -12.39, -21, 0.89)
    pt3dadd(10.49, -12.39, -21, 0.89)
    pt3dadd(10.59, -12.39, -21.5, 0.89)
    pt3dadd(10.65, -12.6, -21.5, 0.89)
    pt3dadd(10.7, -12.76, -22, 0.89)
    pt3dadd(10.7, -13.07, -22, 0.89)
    pt3dadd(10.75, -13.23, -22, 0.89)
    pt3dadd(10.7, -13.44, -22, 0.89)
    pt3dadd(10.7, -13.55, -22, 0.89)
    pt3dadd(10.7, -13.81, -22, 0.89)
    pt3dadd(10, -13.78, -22, 1.21)
    pt3dadd(9.84, -13.47, -22, 1.21)
    pt3dadd(9.84, -13.47, -22.5, 1.21)
    pt3dadd(9.78, -12.47, -23, 0.84)
    pt3dadd(9.68, -12.47, -23.5, 0.84)
    pt3dadd(9.58, -12.42, -24, 0.84)
    pt3dadd(9.47, -12.36, -24, 0.84)
  }
}
proc shape3d_58() {
  dend[52] {
    pt3dadd(9.32, -12.36, -24.5, 0.84)
    pt3dadd(9.21, -12.26, -24.5, 0.84)
    pt3dadd(8.94, -12.26, -25, 0.84)
    pt3dadd(8.78, -12.36, -25, 0.84)
    pt3dadd(8.9, -12.42, -25, 0.84)
    pt3dadd(8.9, -13.1, -25.5, 0.84)
    pt3dadd(8.94, -13.26, -26, 0.84)
    pt3dadd(8.94, -13.52, -26, 0.84)
    pt3dadd(9.05, -13.63, -26.5, 0.84)
    pt3dadd(9.16, -13.78, -26.5, 0.84)
    pt3dadd(9.21, -13.89, -27, 0.84)
    pt3dadd(9.26, -13.99, -27, 0.84)
    pt3dadd(9.42, -14.15, -27, 0.84)
    pt3dadd(9.52, -14.26, -27, 0.84)
    pt3dadd(9.68, -14.26, -27.5, 0.84)
    pt3dadd(9.78, -14.41, -27.5, 0.84)
    pt3dadd(9.89, -14.52, -27.5, 0.84)
    pt3dadd(10, -14.62, -27.5, 0.84)
    pt3dadd(10.1, -14.73, -27.5, 0.84)
    pt3dadd(10.26, -14.78, -27.5, 0.84)
    pt3dadd(10.37, -14.89, -27.5, 0.84)
    pt3dadd(10.31, -15.1, -28.5, 0.84)
    pt3dadd(10.26, -15.25, -29, 0.84)
    pt3dadd(10.16, -15.36, -29, 0.84)
    pt3dadd(10.05, -15.41, -29, 0.84)
    pt3dadd(9.16, -15.41, -29, 0.84)
    pt3dadd(9.21, -15.52, -29.5, 0.84)
    pt3dadd(9.26, -15.62, -29.5, 0.84)
    pt3dadd(9.36, -15.62, -30, 0.84)
    pt3dadd(9.47, -15.78, -30, 0.84)
    pt3dadd(9.58, -15.89, -30, 0.84)
    pt3dadd(9.68, -15.99, -30, 0.84)
    pt3dadd(9.84, -16.04, -31, 0.84)
    pt3dadd(9.74, -16.2, -31, 0.84)
    pt3dadd(9.52, -16.14, -31, 0.84)
    pt3dadd(9.16, -16.14, -31, 0.84)
    pt3dadd(9.05, -16.2, -31, 0.84)
    pt3dadd(8.9, -16.2, -31, 0.84)
    pt3dadd(8.78, -16.14, -31.5, 0.84)
    pt3dadd(8.32, -16.14, -32, 0.84)
    pt3dadd(8.16, -16.2, -32, 0.84)
    pt3dadd(7.79, -16.2, -32.5, 0.84)
    pt3dadd(7.69, -16.25, -32.5, 0.84)
    pt3dadd(7.58, -16.3, -33, 0.84)
    pt3dadd(7.58, -15.94, -33, 0.84)
    pt3dadd(7.64, -15.83, -33, 0.84)
    pt3dadd(7.79, -15.73, -33, 0.84)
    pt3dadd(8, -15.52, -33, 0.84)
    pt3dadd(8.21, -15.31, -33, 0.84)
    pt3dadd(8.48, -15.15, -33, 0.84)
    pt3dadd(8.58, -14.99, -33, 0.84)
    pt3dadd(8.69, -14.83, -33, 0.84)
    pt3dadd(8.84, -14.62, -33, 0.84)
    pt3dadd(8.94, -14.47, -33, 0.84)
    pt3dadd(9, -14.31, -33, 0.84)
    pt3dadd(9.11, -14.2, -33, 0.84)
    pt3dadd(9.16, -14.05, -33, 0.84)
    pt3dadd(9.26, -13.84, -33.5, 0.84)
    pt3dadd(9.42, -13.68, -33.5, 0.84)
    pt3dadd(9.52, -13.57, -33.5, 0.84)
    pt3dadd(9.63, -13.57, -33.5, 0.84)
    pt3dadd(9.78, -13.41, -33.5, 0.84)
    pt3dadd(9.89, -13.31, -33.5, 0.84)
    pt3dadd(10.1, -13.2, -34, 0.84)
    pt3dadd(10.21, -13.15, -34, 0.84)
    pt3dadd(10.31, -13.05, -34, 0.84)
    pt3dadd(10.37, -12.89, -34, 0.84)
    pt3dadd(10.37, -12.47, -34.5, 0.84)
    pt3dadd(10.31, -12.36, -34.5, 0.84)
    pt3dadd(10.26, -12.26, -34.5, 0.84)
    pt3dadd(10.21, -12.15, -34.5, 0.84)
    pt3dadd(10.16, -12.05, -34.5, 0.84)
    pt3dadd(10.16, -11.84, -34.5, 0.84)
    pt3dadd(10.1, -11.73, -35, 0.84)
    pt3dadd(10.1, -11.52, -35, 0.84)
    pt3dadd(10.21, -11.36, -35, 0.84)
    pt3dadd(10.26, -11.21, -35, 0.84)
    pt3dadd(10.31, -11.1, -35, 0.84)
    pt3dadd(10.37, -11, -35.5, 0.84)
    pt3dadd(10.42, -10.89, -35.5, 0.84)
    pt3dadd(10.52, -10.79, -35.5, 0.84)
    pt3dadd(10.58, -10.63, -35.5, 0.84)
    pt3dadd(10.68, -10.47, -35.5, 0.84)
    pt3dadd(10.79, -10.37, -35.5, 0.84)
    pt3dadd(10.89, -10.26, -35.5, 0.84)
    pt3dadd(11.05, -10.16, -35.5, 0.84)
    pt3dadd(11.31, -10.05, -35.5, 0.84)
    pt3dadd(11.57, -10.05, -36, 0.84)
    pt3dadd(11.68, -10, -36, 0.84)
    pt3dadd(11.84, -9.94, -36, 0.84)
    pt3dadd(12.05, -9.94, -36, 0.84)
    pt3dadd(12.2, -9.84, -36, 0.84)
    pt3dadd(12.31, -9.68, -36, 0.84)
    pt3dadd(12.62, -9.52, -36.5, 0.84)
    pt3dadd(12.68, -9.36, -36.5, 0.84)
    pt3dadd(12.68, -9.16, -36.5, 0.84)
    pt3dadd(12.62, -9, -36.5, 0.84)
    pt3dadd(12.41, -8.94, -36.5, 0.84)
    pt3dadd(12.36, -8.78, -37, 0.84)
    pt3dadd(12.15, -8.84, -37, 0.84)
    pt3dadd(11.99, -9, -37, 0.84)
    pt3dadd(11.89, -9.05, -37, 0.84)
    pt3dadd(11.78, -9.16, -37, 0.84)
    pt3dadd(11.68, -9.21, -37, 0.84)
    pt3dadd(11.57, -9.31, -37, 0.84)
    pt3dadd(11.47, -9.36, -37.5, 0.84)
    pt3dadd(11.26, -9.63, -37.5, 0.84)
    pt3dadd(11.21, -9.74, -37.5, 0.84)
    pt3dadd(11.1, -9.84, -37.5, 0.84)
    pt3dadd(11, -9.94, -37.5, 0.84)
    pt3dadd(10.89, -10.05, -37.5, 0.84)
    pt3dadd(10.73, -10.21, -37.5, 0.84)
    pt3dadd(10.52, -10.21, -37.5, 0.84)
    pt3dadd(10.47, -10.31, -37.5, 0.84)
    pt3dadd(10.31, -10.37, -37.5, 0.84)
    pt3dadd(10.1, -10.37, -37.5, 0.84)
    pt3dadd(10, -10.42, -37.5, 0.84)
    pt3dadd(9.63, -10.42, -37.5, 0.84)
    pt3dadd(9.52, -10.37, -37.5, 0.84)
    pt3dadd(9.42, -10.26, -38, 0.84)
    pt3dadd(9.26, -10.21, -38, 0.84)
    pt3dadd(9.11, -10.21, -38.5, 0.84)
    pt3dadd(9.05, -10.1, -38.5, 0.84)
    pt3dadd(8.94, -10.05, -39, 0.84)
    pt3dadd(8.9, -9.94, -39, 0.84)
    pt3dadd(8.78, -9.89, -39, 0.84)
    pt3dadd(8.63, -9.58, -39.5, 0.84)
    pt3dadd(8.58, -9.36, -39.5, 0.84)
    pt3dadd(8.58, -9, -40, 0.84)
    pt3dadd(8.69, -8.78, -40, 0.84)
    pt3dadd(8.63, -8.36, -40.5, 0.84)
    pt3dadd(8.48, -8.26, -40.5, 0.84)
  }
  dend[53] {pt3dclear()
    pt3dadd(8.48, -8.26, -40.5, 0.84)
    pt3dadd(8.36, -8.16, -40.5, 0.84)
    pt3dadd(8.21, -8.11, -40.5, 0.84)
    pt3dadd(8.11, -8, -41, 0.84)
    pt3dadd(7.95, -8, -41, 0.84)
    pt3dadd(7.74, -7.95, -41.5, 0.84)
    pt3dadd(7.64, -8.05, -41.5, 0.84)
    pt3dadd(7.64, -8.16, -42, 0.84)
    pt3dadd(7.69, -8.26, -42, 0.84)
    pt3dadd(7.79, -8.42, -42, 0.84)
    pt3dadd(8, -8.42, -42.5, 0.84)
    pt3dadd(8.11, -8.47, -42.5, 0.84)
    pt3dadd(8.27, -8.42, -42.5, 0.84)
    pt3dadd(8.42, -8.47, -42.5, 0.84)
    pt3dadd(8.63, -8.47, -42.5, 0.84)
    pt3dadd(8.78, -8.42, -42.5, 0.84)
    pt3dadd(8.94, -8.42, -42.5, 0.84)
    pt3dadd(9.11, -8.36, -42.5, 0.84)
    pt3dadd(9.26, -8.32, -42.5, 0.84)
    pt3dadd(9.63, -8.32, -43.5, 0.84)
    pt3dadd(9.68, -8.42, -43.5, 0.84)
    pt3dadd(9.68, -8.47, -44.5, 0.84)
    pt3dadd(9.52, -7.74, -44.5, 0.79)
    pt3dadd(9.36, -7.74, -44.5, 0.79)
    pt3dadd(9.26, -7.89, -44.5, 0.79)
    pt3dadd(9.05, -7.89, -44.5, 0.79)
    pt3dadd(8.94, -7.95, -44.5, 0.79)
    pt3dadd(8.78, -8, -44.5, 0.79)
    pt3dadd(8.52, -8, -44.5, 0.79)
    pt3dadd(8.58, -7.89, -44.5, 0.79)
    pt3dadd(8.42, -7.95, -44, 0.79)
    pt3dadd(8.11, -7.95, -44, 0.79)
    pt3dadd(8, -7.89, -44.5, 0.79)
    pt3dadd(7.69, -7.89, -45.5, 0.79)
    pt3dadd(7.69, -8.05, -45.5, 0.79)
    pt3dadd(7.58, -8.16, -46, 0.79)
    pt3dadd(7.58, -8.42, -47, 0.79)
    pt3dadd(7.69, -8.52, -47, 0.79)
    pt3dadd(7.79, -8.78, -47, 0.79)
    pt3dadd(7.85, -8.89, -47, 0.79)
    pt3dadd(7.9, -9.05, -47.5, 0.79)
    pt3dadd(7.9, -10.1, -48.5, 0.79)
    pt3dadd(7.85, -10.26, -48.5, 0.79)
    pt3dadd(7.74, -10.36, -49, 0.79)
    pt3dadd(7.37, -10.36, -49, 0.79)
    pt3dadd(7.22, -10.47, -49, 0.79)
    pt3dadd(7.16, -10.31, -49, 0.79)
    pt3dadd(7.11, -10.21, -49.5, 0.79)
    pt3dadd(7.11, -10.05, -49.5, 0.79)
    pt3dadd(7.06, -9.84, -49.5, 0.79)
    pt3dadd(7.06, -9.63, -49.5, 0.79)
    pt3dadd(6.95, -9.52, -49.5, 0.79)
    pt3dadd(6.95, -9.1, -49.5, 0.79)
    pt3dadd(6.85, -9, -49.5, 0.79)
    pt3dadd(6.69, -8.94, -49.5, 0.79)
    pt3dadd(6.59, -8.84, -49.5, 0.79)
    pt3dadd(6.43, -8.78, -50, 0.79)
    pt3dadd(6.22, -8.78, -50, 0.79)
    pt3dadd(6.11, -8.73, -50, 0.79)
    pt3dadd(6.01, -8.63, -50, 0.79)
    pt3dadd(6.01, -8.21, -50, 0.79)
    pt3dadd(6.11, -8.1, -50, 0.79)
    pt3dadd(6.27, -8.1, -50, 0.79)
    pt3dadd(6.48, -8.05, -50, 0.79)
    pt3dadd(6.69, -7.84, -50, 0.79)
    pt3dadd(6.8, -7.68, -50.5, 0.79)
    pt3dadd(6.85, -7.58, -50.5, 0.79)
    pt3dadd(6.85, -7.21, -50.5, 0.79)
    pt3dadd(6.74, -7.16, -50.5, 0.79)
    pt3dadd(6.64, -6.89, -50.5, 0.79)
    pt3dadd(6.38, -6.74, -50.5, 0.79)
    pt3dadd(6.27, -6.68, -50.5, 0.79)
    pt3dadd(6.11, -6.63, -50.5, 0.79)
    pt3dadd(6.01, -6.53, -50.5, 0.79)
    pt3dadd(5.85, -6.47, -50.5, 0.79)
    pt3dadd(5.75, -6.47, -51, 0.79)
    pt3dadd(5.69, -6.37, -51, 0.79)
    pt3dadd(5.64, -6.16, -51, 0.79)
    pt3dadd(5.59, -6, -51, 0.79)
    pt3dadd(5.54, -5.79, -51.5, 0.79)
    pt3dadd(5.54, -5.05, -51.5, 0.79)
    pt3dadd(5.59, -4.9, -51.5, 0.79)
    pt3dadd(5.59, -4.74, -52, 0.79)
    pt3dadd(5.64, -4.53, -52, 0.79)
    pt3dadd(5.69, -4.42, -52, 0.79)
    pt3dadd(5.69, -4.21, -52, 0.79)
    pt3dadd(5.8, -4.11, -52, 0.79)
    pt3dadd(5.85, -3.95, -52, 0.79)
    pt3dadd(5.96, -3.9, -52.5, 0.79)
    pt3dadd(6.22, -4.05, -52.5, 0.79)
    pt3dadd(6.32, -4.16, -52.5, 0.79)
    pt3dadd(6.48, -4.21, -52.5, 0.79)
    pt3dadd(6.59, -4.26, -52.5, 0.79)
    pt3dadd(6.74, -4.26, -52.5, 0.79)
    pt3dadd(6.85, -4.32, -52.5, 0.79)
    pt3dadd(7.06, -4.32, -52.5, 0.79)
    pt3dadd(7.22, -4.26, -52.5, 0.79)
    pt3dadd(7.37, -4.26, -52.5, 0.79)
    pt3dadd(7.64, -4.16, -52.5, 0.79)
    pt3dadd(7.74, -4.16, -53, 0.79)
    pt3dadd(7.95, -4.05, -53, 0.79)
    pt3dadd(8.06, -3.95, -53, 0.79)
    pt3dadd(8.16, -3.79, -53.5, 0.79)
    pt3dadd(8.32, -3.63, -53.5, 0.79)
    pt3dadd(8.42, -3.42, -53.5, 0.79)
    pt3dadd(8.48, -3.32, -54, 0.79)
    pt3dadd(8.48, -2.95, -54, 0.79)
    pt3dadd(8.42, -2.79, -54, 0.79)
    pt3dadd(8.32, -2.69, -54, 0.79)
    pt3dadd(8.27, -2.58, -54, 0.79)
    pt3dadd(8.06, -2.48, -54, 0.79)
    pt3dadd(7.95, -2.37, -54.5, 0.79)
    pt3dadd(7.79, -2.31, -54.5, 0.79)
    pt3dadd(7.79, -2.22, -55, 0.79)
    pt3dadd(7.74, -2.06, -55, 0.79)
    pt3dadd(7.79, -1.85, -55.5, 0.79)
    pt3dadd(7.9, -1.79, -55.5, 0.79)
  }
}
proc shape3d_59() {
  dend[53] {
    pt3dadd(8.06, -1.74, -55.5, 0.79)
    pt3dadd(8.16, -1.69, -56, 0.79)
    pt3dadd(8.36, -1.69, -56, 0.79)
    pt3dadd(8.48, -1.53, -57, 0.79)
    pt3dadd(8.52, -1.37, -57, 0.79)
    pt3dadd(8.52, -0.95, -57.5, 0.79)
    pt3dadd(8.42, -0.74, -57.5, 0.79)
    pt3dadd(8.32, -0.53, -57.5, 0.79)
    pt3dadd(8.16, -0.53, -57.5, 0.79)
    pt3dadd(8.06, -0.48, -57.5, 0.79)
    pt3dadd(8, -0.32, -57.5, 0.79)
    pt3dadd(7.9, -0.22, -57.5, 0.79)
    pt3dadd(7.95, -0.06, -57.5, 0.79)
    pt3dadd(7.95, 0.15, -57.5, 0.79)
    pt3dadd(7.95, 0.36, -57.5, 0.79)
    pt3dadd(7.95, 0.68, -57.5, 0.79)
    pt3dadd(7.85, 0.73, -58, 0.79)
    pt3dadd(7.74, 0.78, -58, 0.79)
    pt3dadd(7.64, 0.83, -58, 0.79)
    pt3dadd(7.53, 0.89, -58, 0.79)
    pt3dadd(7.37, 0.89, -58, 0.79)
    pt3dadd(7.22, 0.78, -58, 0.79)
    pt3dadd(7.11, 0.68, -58, 0.79)
    pt3dadd(7.01, 0.56, -58, 0.79)
    pt3dadd(6.95, 0.41, -58, 0.79)
    pt3dadd(6.85, 0.31, -58, 0.79)
    pt3dadd(6.74, 0.1, -58, 0.79)
    pt3dadd(6.59, 0.1, -58, 0.79)
    pt3dadd(6.48, 0.1, -58, 0.79)
    pt3dadd(6.38, 0.15, -58.5, 0.79)
    pt3dadd(6.27, 0.2, -58.5, 0.79)
    pt3dadd(6.11, 0.31, -58.5, 0.79)
    pt3dadd(6.01, 0.41, -58.5, 0.79)
    pt3dadd(5.85, 0.47, -58.5, 0.79)
    pt3dadd(5.75, 0.56, -58.5, 0.79)
    pt3dadd(5.69, 0.73, -58.5, 0.79)
    pt3dadd(5.59, 0.83, -58.5, 0.79)
    pt3dadd(5.43, 0.99, -58.5, 0.79)
    pt3dadd(5.27, 1.04, -58.5, 0.79)
    pt3dadd(5.12, 1.14, -59, 0.79)
    pt3dadd(5.01, 1.2, -59, 0.79)
    pt3dadd(4.8, 1.31, -59, 0.79)
    pt3dadd(4.75, 1.41, -59, 0.79)
    pt3dadd(4.75, 1.57, -59, 0.79)
    pt3dadd(4.7, 1.78, -59.5, 0.79)
    pt3dadd(4.63, 1.89, -59.5, 0.79)
    pt3dadd(4.63, 2.15, -59.5, 0.79)
    pt3dadd(4.54, 2.31, -59.5, 0.79)
    pt3dadd(4.54, 2.46, -59.5, 0.79)
    pt3dadd(4.38, 2.62, -59.5, 0.79)
    pt3dadd(4.17, 2.67, -60, 0.79)
    pt3dadd(4.07, 2.62, -60, 0.79)
    pt3dadd(3.96, 2.57, -60, 0.79)
    pt3dadd(3.75, 2.57, -60, 0.79)
    pt3dadd(3.59, 2.41, -60, 0.79)
    pt3dadd(3.38, 2.31, -60, 0.79)
    pt3dadd(3.17, 2.1, -60, 0.79)
    pt3dadd(3.07, 1.94, -60, 0.79)
    pt3dadd(2.96, 1.78, -60, 0.79)
    pt3dadd(2.86, 1.67, -60, 0.79)
    pt3dadd(2.81, 1.57, -60, 0.79)
    pt3dadd(2.7, 1.57, -60, 0.79)
    pt3dadd(2.54, 1.46, -60, 0.79)
    pt3dadd(2.23, 1.46, -60, 0.79)
    pt3dadd(2.06, 1.41, -60, 0.79)
  }
  dend[54] {pt3dclear()
    pt3dadd(2.06, 1.41, -60, 0.79)
    pt3dadd(1.39, 2.1, -60.5, 0.79)
    pt3dadd(1.07, 2.15, -60.5, 0.79)
    pt3dadd(0.97, 2.2, -60.5, 0.79)
    pt3dadd(0.6, 2.2, -61, 0.79)
    pt3dadd(0.44, 2.15, -61, 0.79)
    pt3dadd(0.23, 2.15, -61, 0.79)
    pt3dadd(0.08, 2.1, -61.5, 0.79)
    pt3dadd(-0.08, 1.99, -61.5, 0.79)
    pt3dadd(-0.19, 1.89, -61.5, 0.79)
    pt3dadd(-0.28, 1.83, -62.5, 0.79)
    pt3dadd(-0.45, 1.78, -62.5, 0.79)
    pt3dadd(-0.71, 1.73, -63, 0.79)
    pt3dadd(-0.87, 1.78, -63, 0.79)
    pt3dadd(-0.97, 1.83, -63, 0.79)
    pt3dadd(-1.08, 1.89, -63, 0.79)
    pt3dadd(-1.24, 1.94, -63, 0.79)
    pt3dadd(-1.45, 1.99, -63, 0.79)
    pt3dadd(-1.55, 2.04, -63, 0.79)
    pt3dadd(-1.71, 2.04, -63, 0.79)
    pt3dadd(-1.76, 2.15, -63, 0.79)
    pt3dadd(-1.92, 2.15, -63.5, 0.79)
    pt3dadd(-2.02, 2.31, -63.5, 0.79)
    pt3dadd(-2.18, 2.36, -64, 0.79)
    pt3dadd(-2.23, 2.52, -64, 0.79)
    pt3dadd(-2.34, 2.62, -64, 0.79)
    pt3dadd(-2.39, 2.73, -64, 0.79)
    pt3dadd(-2.44, 2.83, -64, 0.79)
    pt3dadd(-2.39, 2.99, -64, 0.79)
    pt3dadd(-2.29, 2.99, -64, 0.79)
    pt3dadd(-2.13, 3.04, -64.5, 0.79)
    pt3dadd(-1.92, 2.99, -64.5, 0.79)
    pt3dadd(-1.55, 2.99, -64.5, 0.79)
    pt3dadd(-1.39, 3.04, -64.5, 0.79)
    pt3dadd(-1.29, 3.25, -64.5, 0.79)
    pt3dadd(-1.24, 3.41, -65, 0.79)
    pt3dadd(-1.24, 3.62, -65, 0.79)
    pt3dadd(-1.18, 3.78, -65, 0.79)
    pt3dadd(-1.12, 3.99, -65, 0.79)
    pt3dadd(-1.08, 4.15, -65.5, 0.79)
    pt3dadd(-1.08, 4.36, -65.5, 0.79)
    pt3dadd(-0.97, 4.51, -65.5, 0.79)
    pt3dadd(-0.87, 4.62, -65.5, 0.79)
    pt3dadd(-0.76, 4.67, -65.5, 0.79)
    pt3dadd(-0.71, 4.57, -65.5, 0.79)
    pt3dadd(-0.61, 4.62, -66.5, 0.79)
    pt3dadd(-0.61, 4.15, -67, 0.79)
    pt3dadd(-0.76, 4.04, -67, 0.79)
    pt3dadd(-0.87, 3.99, -67, 0.79)
    pt3dadd(-0.92, 3.88, -67, 0.79)
    pt3dadd(-1.08, 3.78, -67, 0.79)
    pt3dadd(-1.12, 3.51, -67.5, 0.79)
    pt3dadd(-1.18, 3.41, -67.5, 0.79)
    pt3dadd(-1.18, 2.88, -67.5, 0.79)
    pt3dadd(-1.24, 2.78, -67.5, 0.79)
    pt3dadd(-1.29, 2.67, -67.5, 0.79)
    pt3dadd(-1.34, 2.57, -67.5, 0.79)
    pt3dadd(-1.34, 2.46, -67.5, 0.79)
    pt3dadd(-1.39, 2.31, -67.5, 0.79)
    pt3dadd(-1.39, 2.1, -67.5, 0.79)
    pt3dadd(-1.45, 1.99, -67.5, 0.79)
    pt3dadd(-1.45, 1.73, -67.5, 0.79)
    pt3dadd(-1.39, 1.57, -67.5, 0.79)
    pt3dadd(-1.39, 1.46, -67.5, 0.79)
    pt3dadd(-1.29, 1.36, -67.5, 0.79)
    pt3dadd(-1.24, 1.25, -67.5, 0.79)
    pt3dadd(-1.12, 1.1, -67.5, 0.79)
    pt3dadd(-0.97, 0.94, -67.5, 0.79)
    pt3dadd(-0.87, 0.73, -67.5, 0.79)
    pt3dadd(-0.76, 0.68, -67.5, 0.79)
    pt3dadd(-0.66, 0.56, -67.5, 0.79)
    pt3dadd(-0.55, 0.47, -67.5, 0.79)
    pt3dadd(-0.45, 0.36, -68, 0.79)
    pt3dadd(-0.34, 0.26, -68, 0.79)
    pt3dadd(-0.24, 0.1, -68, 0.79)
    pt3dadd(-0.19, -0.01, -68.5, 0.79)
    pt3dadd(-0.08, -0.11, -68.5, 0.79)
    pt3dadd(-0.03, -0.27, -68.5, 0.79)
    pt3dadd(0.08, -0.32, -69, 0.79)
    pt3dadd(0.18, -0.48, -69, 0.79)
    pt3dadd(0.23, -0.64, -69, 0.79)
    pt3dadd(0.28, -0.85, -69, 0.79)
    pt3dadd(0.34, -0.95, -69, 0.79)
    pt3dadd(0.39, -1.11, -69.5, 0.79)
    pt3dadd(0.44, -1.32, -69.5, 0.79)
    pt3dadd(0.44, -1.43, -69.5, 0.79)
    pt3dadd(0.5, -1.79, -69.5, 0.79)
    pt3dadd(0.5, -1.95, -69.5, 0.79)
    pt3dadd(0.39, -2.06, -69.5, 0.79)
    pt3dadd(0.39, -2.22, -69.5, 0.79)
    pt3dadd(0.34, -2.37, -69.5, 0.79)
    pt3dadd(0.34, -2.74, -69.5, 0.79)
    pt3dadd(0.28, -2.85, -69.5, 0.79)
    pt3dadd(0.28, -3.06, -70, 0.79)
    pt3dadd(0.34, -3.16, -70, 0.79)
    pt3dadd(0.39, -3.37, -70, 0.79)
    pt3dadd(0.44, -3.58, -70, 0.79)
    pt3dadd(0.5, -3.74, -70, 0.79)
    pt3dadd(0.55, -3.79, -70.5, 0.79)
    pt3dadd(0.71, -3.95, -70.5, 0.79)
  }
  dend[55] {pt3dclear()
    pt3dadd(2.06, 1.41, -60, 0.79)
    pt3dadd(2.18, 0.68, -59, 0.79)
    pt3dadd(1.91, 0.73, -59.5, 0.79)
    pt3dadd(1.76, 0.68, -59.5, 0.79)
    pt3dadd(1.65, 0.56, -59.5, 0.79)
    pt3dadd(1.49, 0.56, -59.5, 0.79)
    pt3dadd(1.34, 0.41, -59.5, 0.79)
    pt3dadd(1.23, 0.36, -59.5, 0.79)
    pt3dadd(1.07, 0.2, -60, 0.79)
    pt3dadd(0.97, 0.1, -60, 0.79)
    pt3dadd(0.86, -0.01, -60, 0.79)
    pt3dadd(0.76, -0.06, -60, 0.79)
    pt3dadd(0.65, -0.17, -60, 0.79)
    pt3dadd(0.5, -0.27, -60, 0.79)
    pt3dadd(0.28, -0.48, -60, 0.79)
    pt3dadd(0.18, -0.59, -60, 0.79)
    pt3dadd(-0.03, -0.64, -60, 0.79)
    pt3dadd(-0.24, -0.74, -60, 0.79)
    pt3dadd(-0.5, -1.01, -60, 0.79)
    pt3dadd(-0.61, -1.11, -60, 0.79)
    pt3dadd(-0.82, -1.22, -60.5, 0.79)
    pt3dadd(-1.08, -1.37, -60.5, 0.79)
    pt3dadd(-1.29, -1.48, -60.5, 0.79)
    pt3dadd(-1.5, -1.48, -60.5, 0.79)
    pt3dadd(-1.66, -1.53, -60.5, 0.79)
    pt3dadd(-1.87, -1.58, -60.5, 0.79)
    pt3dadd(-2.13, -1.64, -60.5, 0.79)
    pt3dadd(-2.34, -1.69, -60.5, 0.79)
    pt3dadd(-2.5, -1.79, -60.5, 0.79)
    pt3dadd(-2.71, -1.9, -60.5, 0.79)
    pt3dadd(-2.81, -1.85, -60.5, 0.79)
    pt3dadd(-2.97, -1.9, -60.5, 0.79)
  }
  dend[56] {pt3dclear()
    pt3dadd(8.48, -8.26, -40.5, 0.84)
    pt3dadd(8.75, -8.38, 2.5, 1)
    pt3dadd(9.07, -8.38, 2, 1)
    pt3dadd(9.17, -8.53, 2, 1)
    pt3dadd(9.27, -8.49, 1.5, 1)
    pt3dadd(9.33, -8.6, 1, 1)
    pt3dadd(9.44, -8.69, 0.5, 1)
    pt3dadd(9.69, -8.69, 0.5, 1)
    pt3dadd(9.69, -8.81, 0.5, 1)
    pt3dadd(9.75, -8.91, 0.5, 1)
    pt3dadd(9.8, -9.02, 0.5, 1)
    pt3dadd(9.86, -9.11, 0.5, 1)
    pt3dadd(10.07, -9.33, 0, 1)
    pt3dadd(10.11, -9.44, 0, 1)
    pt3dadd(10.17, -9.59, 0, 1)
    pt3dadd(10.28, -9.69, 0, 1)
    pt3dadd(10.28, -9.86, 0, 1)
    pt3dadd(10.38, -9.86, 0, 1)
    pt3dadd(10.49, -9.96, 0, 1)
    pt3dadd(10.59, -10.07, 0, 1)
    pt3dadd(10.75, -10.22, 0, 1)
    pt3dadd(10.91, -10.22, 0, 1)
    pt3dadd(11.06, -10.28, 0, 1)
    pt3dadd(11.27, -10.28, 0, 1)
    pt3dadd(11.43, -10.38, 0, 1)
    pt3dadd(11.64, -10.44, 0, 1)
    pt3dadd(11.96, -10.44, 0, 1)
    pt3dadd(12.11, -10.49, 0, 1)
    pt3dadd(12.32, -10.54, -0.5, 1)
    pt3dadd(12.48, -10.59, -0.5, 1)
    pt3dadd(12.59, -10.59, -0.5, 1)
    pt3dadd(12.74, -10.65, -0.5, 1)
    pt3dadd(12.9, -10.65, -0.5, 1)
    pt3dadd(13.06, -10.75, -0.5, 1)
    pt3dadd(13.32, -10.8, -0.5, 1)
    pt3dadd(13.48, -10.8, -0.5, 1)
    pt3dadd(13.58, -10.86, -0.5, 1)
    pt3dadd(13.85, -10.91, -0.5, 1)
    pt3dadd(13.95, -10.96, -0.5, 1)
    pt3dadd(14, -11.07, -1, 1)
    pt3dadd(14.21, -11.07, -1, 1)
    pt3dadd(14.32, -11.17, -1, 1)
    pt3dadd(14.48, -11.22, -1, 1)
    pt3dadd(14.69, -11.33, -1.5, 1)
    pt3dadd(14.84, -11.38, -1.5, 1)
    pt3dadd(14.95, -11.43, -1.5, 1)
    pt3dadd(15.26, -11.43, -2, 1)
    pt3dadd(15.37, -11.38, -2, 1)
    pt3dadd(15.58, -11.38, -2.5, 1)
    pt3dadd(15.68, -11.33, -2.5, 1)
    pt3dadd(15.89, -11.33, -2.5, 1)
  }
  dend[57] {pt3dclear()
    pt3dadd(15.89, -11.33, -2.5, 1)
  }
}
proc shape3d_60() {
  dend[57] {
    pt3dadd(17.73, -10.59, -2.5, 1)
    pt3dadd(17.78, -10.49, -2.5, 1)
    pt3dadd(17.94, -10.33, -2.5, 1)
    pt3dadd(17.98, -10.22, -2.5, 1)
    pt3dadd(18.1, -10.07, -2.5, 1)
    pt3dadd(18.2, -9.96, -2.5, 1)
    pt3dadd(18.3, -9.86, -2.5, 1)
    pt3dadd(18.41, -9.75, -2.5, 1)
    pt3dadd(18.52, -9.65, -2.5, 1)
    pt3dadd(18.73, -9.49, -2.5, 1)
    pt3dadd(18.94, -9.27, -2.5, 1)
    pt3dadd(19.25, -9.17, -2.5, 1)
    pt3dadd(20.91, -8.61, -2, 1)
    pt3dadd(21.12, -8.61, -2, 1)
    pt3dadd(21.38, -8.35, -2, 1)
    pt3dadd(21.49, -8.25, -2, 1)
    pt3dadd(21.7, -8.19, -2, 1)
    pt3dadd(21.96, -8.14, -2, 1)
    pt3dadd(22.06, -8.09, -2, 1)
    pt3dadd(22.27, -8.03, -2, 1)
    pt3dadd(22.43, -7.99, -2, 1)
    pt3dadd(22.64, -7.88, -2, 1)
    pt3dadd(22.75, -7.78, -2, 1)
    pt3dadd(22.9, -7.67, -2, 1)
    pt3dadd(23.01, -7.57, -2, 1)
    pt3dadd(23.17, -7.51, -2, 1)
    pt3dadd(23.27, -7.46, -2.5, 1)
    pt3dadd(23.38, -7.35, -2.5, 1)
    pt3dadd(23.48, -7.25, -2.5, 1)
    pt3dadd(23.59, -7.2, -2.5, 1)
    pt3dadd(23.64, -7.09, -2.5, 1)
    pt3dadd(23.9, -7.04, -2.5, 1)
    pt3dadd(24.11, -6.93, -3, 1)
    pt3dadd(24.37, -6.88, -3, 1)
    pt3dadd(24.58, -6.83, -3, 1)
    pt3dadd(25.11, -6.83, -3, 1)
    pt3dadd(25.26, -6.78, -3, 1)
    pt3dadd(25.47, -6.67, -3, 1)
    pt3dadd(25.63, -6.62, -3, 1)
    pt3dadd(25.84, -6.51, -3, 1)
    pt3dadd(26, -6.46, -3.5, 1)
    pt3dadd(26.21, -6.36, -3.5, 1)
    pt3dadd(26.37, -6.25, -3.5, 1)
    pt3dadd(26.58, -6.09, -3.5, 1)
    pt3dadd(26.79, -5.99, -3.5, 1)
    pt3dadd(26.89, -5.88, -4, 1)
    pt3dadd(27.05, -5.94, -4, 1)
    pt3dadd(27.21, -5.94, -4, 1)
    pt3dadd(27.36, -5.78, -4, 1)
    pt3dadd(27.52, -5.83, -4, 1)
    pt3dadd(27.68, -5.78, -4, 1)
    pt3dadd(27.89, -5.73, -4, 1)
    pt3dadd(28.26, -5.73, -4, 1)
    pt3dadd(28.41, -5.78, -4.5, 1)
    pt3dadd(28.83, -5.78, -4.5, 1)
    pt3dadd(28.89, -5.88, -4.5, 1)
    pt3dadd(28.99, -5.94, -4.5, 1)
    pt3dadd(29.2, -5.94, -4.5, 1)
    pt3dadd(29.36, -5.99, -4.5, 1)
    pt3dadd(29.78, -6.04, -5, 1)
    pt3dadd(29.88, -6.09, -5, 1)
    pt3dadd(30.46, -6.09, -5, 1)
    pt3dadd(30.62, -6.04, -5, 1)
    pt3dadd(30.78, -6.09, -5, 1)
    pt3dadd(31.56, -6.09, -5, 1)
    pt3dadd(31.77, -6.04, -5, 1)
    pt3dadd(31.93, -5.99, -5, 1)
    pt3dadd(32.04, -6.04, -5, 1)
    pt3dadd(32.25, -5.99, -5, 1)
    pt3dadd(32.46, -5.94, -5, 1)
    pt3dadd(32.82, -5.94, -5, 1)
    pt3dadd(33.45, -5.94, -5, 1)
    pt3dadd(33.51, -5.99, -5.5, 1)
    pt3dadd(33.65, -6.04, -5.5, 1)
    pt3dadd(33.86, -6.04, -5.5, 1)
    pt3dadd(33.97, -6.09, -5.5, 1)
    pt3dadd(34.35, -6.09, -5.5, 1)
    pt3dadd(34.5, -6.15, -5.5, 1)
    pt3dadd(34.65, -6.15, -5.5, 1)
    pt3dadd(34.82, -6.2, -6, 1)
    pt3dadd(35.03, -6.15, -6, 1)
    pt3dadd(35.19, -6.09, -6, 1)
    pt3dadd(35.29, -5.99, -6, 1)
    pt3dadd(35.4, -5.94, -6, 1)
    pt3dadd(35.54, -5.83, -6, 1)
    pt3dadd(35.65, -5.83, -6, 1)
    pt3dadd(35.82, -5.73, -6, 1)
    pt3dadd(35.92, -5.62, -6, 1)
    pt3dadd(36.13, -5.67, -6, 1)
    pt3dadd(36.29, -5.73, -6, 1)
    pt3dadd(36.39, -5.83, -6, 1)
    pt3dadd(36.5, -5.78, -6, 1)
    pt3dadd(36.65, -5.88, -6, 1)
    pt3dadd(36.76, -5.94, -6, 1)
    pt3dadd(37.6, -5.94, -6.5, 1)
    pt3dadd(37.76, -5.88, -6.5, 1)
    pt3dadd(38.13, -5.88, -6.5, 1)
    pt3dadd(38.22, -5.99, -6.5, 1)
    pt3dadd(38.34, -6.09, -6.5, 1)
    pt3dadd(38.44, -6.25, -6.5, 1)
    pt3dadd(38.6, -6.36, -6.5, 1)
    pt3dadd(38.7, -6.46, -6.5, 1)
    pt3dadd(38.86, -6.62, -6.5, 1)
    pt3dadd(39.02, -6.72, -6.5, 1)
    pt3dadd(39.18, -6.88, -6.5, 1)
    pt3dadd(39.39, -6.88, -6.5, 1)
    pt3dadd(39.54, -6.99, -6.5, 1)
    pt3dadd(39.65, -7.04, -6.5, 1)
    pt3dadd(39.81, -7.14, -6.5, 1)
    pt3dadd(40.02, -7.14, -6.5, 1)
    pt3dadd(40.11, -7.25, -6.5, 1)
    pt3dadd(40.22, -7.3, -6.5, 1)
    pt3dadd(40.44, -7.41, -6.5, 1)
    pt3dadd(40.54, -7.46, -6.5, 1)
    pt3dadd(40.7, -7.57, -6.5, 1)
    pt3dadd(40.96, -7.57, -6.5, 1)
    pt3dadd(41.17, -7.72, -7, 1)
    pt3dadd(41.33, -7.78, -7, 1)
    pt3dadd(41.7, -7.78, -7, 1)
    pt3dadd(41.91, -7.88, -7, 1)
    pt3dadd(42.12, -7.83, -7, 1)
    pt3dadd(43.24, -8.14, -6.5, 1)
    pt3dadd(43.35, -8.09, -6.5, 1)
    pt3dadd(43.56, -7.93, -6.5, 1)
    pt3dadd(43.66, -7.88, -6.5, 1)
    pt3dadd(43.77, -7.83, -6.5, 1)
    pt3dadd(43.98, -7.72, -6.5, 1)
    pt3dadd(44.34, -7.72, -6.5, 1)
    pt3dadd(44.34, -7.83, -6.5, 1)
    pt3dadd(44.61, -7.83, -6.5, 1)
    pt3dadd(44.61, -7.98, -7, 1)
    pt3dadd(44.82, -7.93, -7, 1)
    pt3dadd(44.87, -8.03, -7, 1)
    pt3dadd(44.97, -8.09, -7, 1)
    pt3dadd(45.03, -8.19, -7, 1)
    pt3dadd(45.13, -8.35, -7, 1)
    pt3dadd(45.24, -8.51, -7.5, 1)
    pt3dadd(45.34, -8.61, -7.5, 1)
    pt3dadd(45.39, -8.72, -7.5, 1)
    pt3dadd(45.5, -8.88, -8, 1)
    pt3dadd(45.55, -8.98, -8, 1)
    pt3dadd(45.71, -8.98, -8, 1)
    pt3dadd(45.81, -9.09, -8, 1)
    pt3dadd(45.97, -9.25, -8, 1)
    pt3dadd(46.08, -9.35, -8, 1)
    pt3dadd(46.23, -9.4, -8, 1)
    pt3dadd(46.44, -9.46, -8, 1)
    pt3dadd(46.6, -9.56, -8, 1)
    pt3dadd(46.81, -9.56, -8, 1)
    pt3dadd(46.91, -9.61, -8, 1)
    pt3dadd(47.07, -9.67, -8, 1)
    pt3dadd(47.7, -9.67, -8, 1)
    pt3dadd(47.91, -9.61, -8, 1)
    pt3dadd(48.07, -9.56, -8, 1)
    pt3dadd(48.59, -9.56, -8, 1)
    pt3dadd(48.75, -9.51, -8, 1)
    pt3dadd(48.96, -9.4, -8, 1)
    pt3dadd(49.12, -9.35, -8, 1)
    pt3dadd(49.33, -9.25, -8, 1)
    pt3dadd(49.49, -9.19, -8, 1)
    pt3dadd(49.54, -9.09, -8, 1)
    pt3dadd(49.7, -9.09, -8, 1)
    pt3dadd(49.75, -8.93, -8, 1)
    pt3dadd(49.96, -8.93, -8, 1)
    pt3dadd(50.06, -8.83, -8, 1)
    pt3dadd(50.33, -8.67, -8, 1)
    pt3dadd(50.43, -8.61, -8, 1)
    pt3dadd(50.59, -8.51, -8, 1)
    pt3dadd(50.69, -8.46, -8, 1)
    pt3dadd(50.85, -8.3, -8, 1)
    pt3dadd(51.01, -8.19, -8, 1)
    pt3dadd(51.06, -8.09, -8, 1)
    pt3dadd(51.53, -7.62, -8.5, 1)
    pt3dadd(51.64, -7.35, -8.5, 1)
    pt3dadd(51.69, -7.25, -8.5, 1)
    pt3dadd(51.8, -7.04, -8.5, 1)
    pt3dadd(51.85, -6.99, -9, 1)
    pt3dadd(51.9, -6.83, -9, 1)
    pt3dadd(52.11, -6.62, -9, 1)
    pt3dadd(52.32, -6.51, -9, 1)
    pt3dadd(52.58, -6.46, -9, 1)
    pt3dadd(52.79, -6.41, -9, 1)
    pt3dadd(53.06, -6.41, -9, 1)
    pt3dadd(53.21, -6.35, -9, 1)
    pt3dadd(53.42, -6.3, -9, 1)
    pt3dadd(53.58, -6.2, -9, 1)
    pt3dadd(53.69, -6.14, -9, 1)
    pt3dadd(53.9, -5.99, -9, 1)
    pt3dadd(54, -5.93, -9, 1)
    pt3dadd(54.16, -5.83, -9, 1)
    pt3dadd(54.26, -5.67, -9, 1)
    pt3dadd(54.37, -5.57, -9, 1)
    pt3dadd(54.42, -5.36, -9, 1)
    pt3dadd(54.53, -5.3, -9, 1)
    pt3dadd(54.63, -5.2, -9.5, 1)
    pt3dadd(54.68, -5.09, -9.5, 1)
    pt3dadd(54.74, -4.94, -9.5, 1)
    pt3dadd(54.84, -4.78, -9.5, 1)
    pt3dadd(54.84, -4.62, -9.5, 1)
    pt3dadd(54.89, -4.51, -9.5, 1)
    pt3dadd(54.95, -4.2, -9.5, 1)
    pt3dadd(55, -4.04, -9.5, 1)
    pt3dadd(55.05, -3.88, -9.5, 1)
    pt3dadd(55.1, -3.73, -9.5, 1)
    pt3dadd(55.16, -3.52, -9.5, 1)
    pt3dadd(55.26, -3.36, -9.5, 1)
    pt3dadd(55.37, -3.15, -10, 1)
    pt3dadd(55.47, -2.99, -10, 1)
    pt3dadd(55.58, -2.88, -10.5, 1)
    pt3dadd(55.68, -2.78, -10.5, 1)
    pt3dadd(55.79, -2.67, -10.5, 1)
    pt3dadd(55.94, -2.57, -10.5, 1)
    pt3dadd(56.05, -2.46, -10.5, 1)
    pt3dadd(56.15, -2.36, -10.5, 1)
    pt3dadd(56.31, -2.25, -10.5, 1)
    pt3dadd(56.42, -2.25, -10.5, 1)
    pt3dadd(56.52, -2.15, -10.5, 1)
    pt3dadd(56.63, -2.04, -10.5, 1)
    pt3dadd(56.73, -1.94, -10.5, 1)
    pt3dadd(56.89, -1.83, -10.5, 1)
    pt3dadd(56.99, -1.78, -10.5, 1)
    pt3dadd(57.15, -1.62, -10.5, 1)
    pt3dadd(57.26, -1.52, -10.5, 1)
    pt3dadd(57.36, -1.41, -10.5, 1)
    pt3dadd(57.52, -1.41, -10.5, 1)
    pt3dadd(57.68, -1.31, -10.5, 1)
    pt3dadd(57.83, -1.14, -10.5, 1)
    pt3dadd(57.94, -1.1, -11, 1)
    pt3dadd(58.04, -1.05, -11, 1)
    pt3dadd(58.83, -1.05, -11, 1)
    pt3dadd(58.88, -1.14, -11.5, 1)
    pt3dadd(59.04, -1.2, -11.5, 1)
    pt3dadd(59.15, -1.2, -11.5, 1)
    pt3dadd(59.25, -1.31, -11.5, 1)
    pt3dadd(59.41, -1.36, -11.5, 1)
    pt3dadd(59.57, -1.41, -11.5, 1)
    pt3dadd(59.67, -1.41, -11.5, 1)
    pt3dadd(59.78, -1.52, -11.5, 1)
    pt3dadd(60.04, -1.52, -11.5, 1)
    pt3dadd(60.14, -1.57, -11.5, 1)
    pt3dadd(60.25, -1.57, -11.5, 1)
    pt3dadd(60.35, -1.52, -11.5, 1)
    pt3dadd(60.62, -1.26, -11.5, 1)
    pt3dadd(60.62, -0.62, -11.5, 1)
    pt3dadd(60.56, -0.52, -11.5, 1)
    pt3dadd(60.51, -0.36, -11.5, 1)
    pt3dadd(60.46, -0.2, -12, 1)
    pt3dadd(60.46, 0.01, -12, 1)
    pt3dadd(60.46, 0.48, -12, 1)
  }
}
proc shape3d_61() {
  dend[57] {
    pt3dadd(60.51, 0.64, -12, 1)
    pt3dadd(60.62, 0.79, -12, 1)
    pt3dadd(60.72, 0.95, -12, 1)
    pt3dadd(60.77, 1.11, -12, 1)
    pt3dadd(61.19, 1.99, -12, 1)
    pt3dadd(61.24, 2.2, -12, 1)
    pt3dadd(61.3, 2.35, -12, 1)
    pt3dadd(61.35, 2.46, -12, 1)
    pt3dadd(61.35, 2.67, -12, 1)
    pt3dadd(61.45, 2.77, -12, 1)
    pt3dadd(61.45, 2.93, -12, 1)
    pt3dadd(61.45, 3.04, -12, 1)
    pt3dadd(61.51, 3.2, -12, 1)
    pt3dadd(61.51, 3.51, -12, 1)
    pt3dadd(61.45, 3.67, -12, 1)
    pt3dadd(61.35, 3.77, -12.5, 1)
    pt3dadd(61.3, 3.88, -12.5, 1)
    pt3dadd(61.35, 3.98, -12.5, 1)
    pt3dadd(61.4, 4.13, -12.5, 1)
    pt3dadd(61.51, 4.19, -12.5, 1)
    pt3dadd(61.61, 4.3, -12.5, 1)
    pt3dadd(61.87, 4.4, -12.5, 1)
    pt3dadd(62.03, 4.46, -13, 1)
    pt3dadd(62.24, 4.55, -13, 1)
    pt3dadd(62.4, 4.61, -13, 1)
    pt3dadd(62.5, 4.67, -13, 1)
    pt3dadd(62.66, 4.67, -13, 1)
    pt3dadd(62.87, 4.88, -13.5, 1)
    pt3dadd(63.03, 4.88, -13.5, 1)
    pt3dadd(63.24, 5.04, -13.5, 1)
    pt3dadd(63.34, 5.09, -13.5, 1)
    pt3dadd(63.45, 5.19, -13.5, 1)
    pt3dadd(63.55, 5.3, -13.5, 1)
    pt3dadd(63.61, 5.4, -14, 1)
    pt3dadd(63.71, 5.46, -14, 1)
    pt3dadd(63.71, 5.72, -14, 1)
    pt3dadd(63.76, 5.82, -14, 1)
    pt3dadd(63.87, 5.93, -14, 1)
    pt3dadd(63.92, 6.09, -14, 1)
    pt3dadd(64.13, 6.3, -14, 1)
    pt3dadd(64.18, 6.45, -14, 1)
    pt3dadd(64.34, 6.61, -14, 1)
    pt3dadd(64.45, 6.72, -14, 1)
    pt3dadd(64.55, 6.88, -14, 1)
    pt3dadd(64.7, 6.98, -14.5, 1)
    pt3dadd(64.81, 7.09, -14.5, 1)
    pt3dadd(65.08, 7.19, -14.5, 1)
    pt3dadd(65.18, 7.19, -14.5, 1)
    pt3dadd(65.29, 7.3, -14.5, 1)
    pt3dadd(65.39, 7.4, -14.5, 1)
    pt3dadd(65.5, 7.4, -14.5, 1)
    pt3dadd(65.59, 7.45, -14.5, 1)
    pt3dadd(65.76, 7.66, -15, 1)
    pt3dadd(65.76, 7.82, -15, 1)
    pt3dadd(65.81, 7.93, -15, 1)
    pt3dadd(65.86, 8.14, -15, 1)
    pt3dadd(65.86, 8.4, -15, 1)
    pt3dadd(65.97, 8.66, -15, 1)
    pt3dadd(66.02, 8.86, -15, 1)
    pt3dadd(66.06, 9.02, -15, 1)
    pt3dadd(66.18, 9.24, -15, 1)
    pt3dadd(66.23, 9.35, -15, 1)
    pt3dadd(66.44, 9.61, -15.5, 1)
    pt3dadd(66.7, 9.82, -15.5, 1)
    pt3dadd(66.91, 10.08, -15.5, 1)
    pt3dadd(66.97, 10.24, -15.5, 1)
    pt3dadd(66.97, 10.66, -15.5, 1)
    pt3dadd(67.02, 10.82, -15.5, 1)
    pt3dadd(67.02, 11.19, -15.5, 1)
    pt3dadd(66.97, 11.4, -15.5, 1)
    pt3dadd(66.91, 11.55, -15.5, 1)
    pt3dadd(66.91, 11.76, -16, 1)
    pt3dadd(66.81, 11.87, -16, 1)
    pt3dadd(66.81, 12.08, -16, 1)
    pt3dadd(66.76, 12.24, -16, 1)
    pt3dadd(66.65, 12.34, -16, 1)
    pt3dadd(66.65, 12.71, -16, 1)
    pt3dadd(66.7, 12.82, -16, 1)
    pt3dadd(66.76, 12.92, -16, 1)
    pt3dadd(66.76, 13.08, -16, 1)
    pt3dadd(67.15, 15.04, -16, 1)
    pt3dadd(67.26, 15.15, -16, 1)
    pt3dadd(67.26, 15.94, -16.5, 1)
    pt3dadd(67.15, 15.99, -16.5, 1)
    pt3dadd(67.15, 16.2, -16.5, 1)
    pt3dadd(67.09, 16.3, -16.5, 1)
    pt3dadd(67.09, 16.57, -16.5, 1)
  }
  dend[58] {pt3dclear()
    pt3dadd(67.09, 16.57, -16.5, 1)
    pt3dadd(66.84, 17.14, -16.5, 0.63)
    pt3dadd(66.68, 17.14, -16.5, 0.63)
    pt3dadd(66.58, 17.25, -16.5, 0.63)
    pt3dadd(66.42, 17.25, -16.5, 0.63)
    pt3dadd(66.31, 17.3, -16.5, 0.63)
    pt3dadd(66.2, 17.41, -16.5, 0.63)
    pt3dadd(66.05, 17.41, -16.5, 0.63)
    pt3dadd(65.84, 17.41, -16.5, 0.63)
    pt3dadd(65.73, 17.41, -16.5, 0.63)
    pt3dadd(65.58, 17.46, -16.5, 0.63)
    pt3dadd(65.47, 17.51, -16.5, 0.63)
    pt3dadd(65.26, 17.51, -16.5, 0.63)
    pt3dadd(65.11, 17.46, -16.5, 0.63)
    pt3dadd(64.95, 17.41, -17, 0.63)
    pt3dadd(64.79, 17.41, -17, 0.63)
    pt3dadd(64.69, 17.3, -17, 0.63)
    pt3dadd(64.16, 17.3, -17, 0.63)
    pt3dadd(64, 17.36, -17, 0.63)
    pt3dadd(63.85, 17.46, -17, 0.63)
    pt3dadd(63.64, 17.46, -17, 0.63)
    pt3dadd(63.53, 17.51, -17, 0.63)
    pt3dadd(63.53, 17.67, -17, 0.63)
  }
  dend[59] {pt3dclear()
    pt3dadd(67.09, 16.57, -16.5, 1)
    pt3dadd(67.05, 17.51, -17, 0.89)
    pt3dadd(67, 17.62, -17, 0.89)
    pt3dadd(66.94, 17.72, -17, 0.89)
    pt3dadd(66.84, 17.82, -17, 0.89)
    pt3dadd(66.84, 18.04, -17, 0.89)
    pt3dadd(66.79, 18.25, -17, 0.89)
    pt3dadd(66.73, 18.35, -17, 0.89)
    pt3dadd(66.68, 18.51, -17, 0.89)
    pt3dadd(66.68, 18.93, -17, 0.89)
    pt3dadd(66.63, 19.04, -17, 0.89)
    pt3dadd(66.63, 19.41, -17, 0.89)
    pt3dadd(66.68, 19.55, -17, 0.89)
    pt3dadd(66.79, 19.77, -17, 0.89)
    pt3dadd(66.79, 19.93, -17, 0.89)
    pt3dadd(66.89, 20.14, -17, 0.89)
    pt3dadd(66.94, 20.3, -17, 0.89)
    pt3dadd(66.94, 20.62, -17, 0.89)
    pt3dadd(67, 20.77, -17, 0.89)
    pt3dadd(67, 20.98, -17, 0.89)
    pt3dadd(67.05, 21.14, -17, 0.89)
    pt3dadd(67.05, 21.19, -17.5, 0.89)
    pt3dadd(67.09, 21.4, -17.5, 0.89)
    pt3dadd(67.26, 21.56, -17.5, 0.89)
    pt3dadd(67.26, 21.67, -17.5, 0.89)
    pt3dadd(67.42, 21.82, -17.5, 0.89)
    pt3dadd(67.52, 21.98, -17.5, 0.89)
    pt3dadd(67.63, 22.09, -17.5, 0.89)
    pt3dadd(67.78, 22.3, -17.5, 0.89)
    pt3dadd(67.98, 22.45, -17.5, 0.89)
    pt3dadd(68.09, 22.51, -17.5, 0.89)
    pt3dadd(68.26, 22.61, -17.5, 0.89)
    pt3dadd(68.36, 22.72, -17.5, 0.89)
    pt3dadd(68.41, 22.88, -17.5, 0.89)
    pt3dadd(68.52, 23.09, -17.5, 0.89)
    pt3dadd(68.56, 23.09, -18, 0.89)
    pt3dadd(68.62, 23.19, -18, 0.89)
    pt3dadd(68.73, 23.35, -18, 0.89)
    pt3dadd(68.83, 23.4, -18, 0.89)
    pt3dadd(68.89, 23.56, -18, 0.89)
    pt3dadd(69.09, 23.66, -18, 0.89)
    pt3dadd(69.25, 23.77, -18, 0.89)
    pt3dadd(69.52, 23.93, -18, 0.89)
    pt3dadd(69.67, 24.03, -18, 0.89)
    pt3dadd(69.83, 24.08, -18, 0.89)
    pt3dadd(69.94, 24.14, -18, 0.89)
    pt3dadd(70.15, 24.19, -18, 0.89)
    pt3dadd(70.25, 24.29, -18, 0.89)
    pt3dadd(70.36, 24.4, -18, 0.89)
    pt3dadd(70.56, 24.51, -18, 0.89)
    pt3dadd(70.62, 24.66, -18, 0.89)
    pt3dadd(70.72, 24.87, -18, 0.89)
    pt3dadd(70.78, 25.03, -18, 0.89)
    pt3dadd(70.83, 25.24, -18, 0.89)
    pt3dadd(70.88, 25.4, -18, 0.89)
    pt3dadd(70.98, 25.5, -18, 0.89)
    pt3dadd(72.13, 26.1, -18, 0.89)
    pt3dadd(72.28, 26.31, -18, 0.89)
    pt3dadd(72.39, 26.36, -18, 0.89)
    pt3dadd(72.48, 26.46, -18.5, 0.89)
    pt3dadd(72.76, 26.62, -18.5, 0.89)
    pt3dadd(73.06, 26.67, -18.5, 0.89)
    pt3dadd(73.18, 26.78, -18.5, 0.89)
    pt3dadd(73.54, 26.94, -18.5, 0.89)
    pt3dadd(73.75, 27.04, -18.5, 0.89)
    pt3dadd(73.91, 27.1, -18.5, 0.89)
    pt3dadd(74.02, 27.15, -19, 0.89)
    pt3dadd(74.17, 27.2, -19, 0.89)
    pt3dadd(74.28, 27.25, -19, 0.89)
    pt3dadd(74.48, 27.25, -19, 0.89)
    pt3dadd(74.75, 27.36, -19, 0.89)
    pt3dadd(75.22, 27.36, -19, 0.89)
    pt3dadd(75.38, 27.31, -19, 0.89)
    pt3dadd(75.59, 27.25, -19, 0.89)
    pt3dadd(75.7, 27.2, -19, 0.89)
    pt3dadd(75.84, 27.15, -19, 0.89)
    pt3dadd(75.95, 27.1, -19, 0.89)
    pt3dadd(76.17, 26.99, -19.5, 0.89)
    pt3dadd(76.33, 26.99, -19.5, 0.89)
    pt3dadd(76.54, 26.94, -19.5, 0.89)
    pt3dadd(76.64, 26.83, -19.5, 0.89)
    pt3dadd(76.75, 26.78, -19.5, 0.89)
    pt3dadd(76.95, 26.78, -19.5, 0.89)
    pt3dadd(77.06, 26.73, -19.5, 0.89)
    pt3dadd(77.17, 26.73, -19.5, 0.89)
    pt3dadd(77.27, 26.62, -19.5, 0.89)
    pt3dadd(77.48, 26.62, -19.5, 0.89)
    pt3dadd(77.69, 26.52, -19.5, 0.89)
    pt3dadd(77.73, 26.41, -19.5, 0.89)
    pt3dadd(78.01, 26.41, -19.5, 0.89)
    pt3dadd(78.31, 26.41, -19.5, 0.89)
    pt3dadd(78.48, 26.52, -19.5, 0.89)
    pt3dadd(78.9, 26.52, -20, 0.89)
    pt3dadd(79.06, 26.46, -20, 0.89)
    pt3dadd(79.31, 26.41, -20, 0.89)
    pt3dadd(79.58, 26.41, -20, 0.89)
    pt3dadd(79.9, 26.25, -20, 0.89)
    pt3dadd(80.11, 26.15, -20, 0.89)
    pt3dadd(80.37, 26.1, -20, 0.89)
    pt3dadd(80.58, 25.99, -20, 0.89)
    pt3dadd(80.63, 25.89, -20, 0.89)
    pt3dadd(80.73, 25.94, -20, 0.89)
    pt3dadd(80.84, 25.83, -20, 0.89)
    pt3dadd(80.95, 25.73, -20, 0.89)
    pt3dadd(81.09, 25.68, -20, 0.89)
    pt3dadd(81.31, 25.47, -20, 0.89)
    pt3dadd(81.52, 25.41, -20.5, 0.89)
    pt3dadd(81.63, 25.31, -20.5, 0.89)
    pt3dadd(81.73, 25.2, -20.5, 0.89)
    pt3dadd(81.94, 25.15, -20.5, 0.89)
    pt3dadd(82.31, 25.15, -20.5, 0.89)
    pt3dadd(82.47, 25.31, -20.5, 0.89)
    pt3dadd(82.73, 25.36, -20.5, 0.89)
    pt3dadd(82.84, 25.36, -20.5, 0.89)
    pt3dadd(83.94, 24.39, -20.5, 1.26)
    pt3dadd(83.49, 24.48, -20.5, 1.26)
    pt3dadd(83.49, 23.27, -22, 0.79)
    pt3dadd(83.64, 23.21, -22, 0.79)
    pt3dadd(83.75, 23.11, -23, 0.79)
    pt3dadd(83.85, 23.06, -23, 0.79)
    pt3dadd(83.91, 22.95, -23, 0.79)
    pt3dadd(84.01, 22.9, -23.5, 0.79)
    pt3dadd(84.12, 22.79, -23.5, 0.79)
    pt3dadd(84.17, 22.69, -23.5, 0.79)
    pt3dadd(84.22, 22.58, -23.5, 0.79)
    pt3dadd(84.27, 22.48, -23.5, 0.79)
    pt3dadd(84.22, 22.32, -23.5, 0.79)
    pt3dadd(84.22, 22.22, -24, 0.79)
    pt3dadd(84.17, 22.11, -24, 0.79)
    pt3dadd(84.06, 22.01, -24, 0.79)
    pt3dadd(84.01, 21.9, -24, 0.79)
    pt3dadd(83.91, 21.74, -24, 0.79)
    pt3dadd(83.85, 21.64, -24, 0.79)
    pt3dadd(83.8, 21.53, -24, 0.79)
    pt3dadd(83.7, 21.48, -24, 0.79)
    pt3dadd(83.64, 21.32, -24, 0.79)
    pt3dadd(83.59, 21.16, -24, 0.79)
    pt3dadd(83.59, 20.48, -24, 0.79)
    pt3dadd(83.54, 20.32, -24, 0.79)
  }
}
proc shape3d_62() {
  dend[59] {
    pt3dadd(83.54, 19.64, -24, 0.79)
    pt3dadd(83.59, 19.48, -24, 0.79)
    pt3dadd(83.59, 19.27, -24, 0.79)
    pt3dadd(83.64, 19.11, -24, 0.79)
    pt3dadd(83.64, 18.89, -24, 0.79)
    pt3dadd(83.75, 18.85, -24, 0.79)
    pt3dadd(83.75, 18.75, -24, 0.79)
    pt3dadd(83.91, 18.64, -24, 0.79)
    pt3dadd(83.96, 18.48, -24, 0.79)
    pt3dadd(84.06, 18.48, -24, 0.79)
    pt3dadd(84.12, 18.38, -24, 0.79)
    pt3dadd(84.22, 18.32, -24, 0.79)
    pt3dadd(84.59, 18.32, -25, 0.79)
    pt3dadd(84.69, 18.38, -25, 0.79)
    pt3dadd(84.95, 18.38, -25, 0.79)
    pt3dadd(85.01, 18.48, -25, 0.79)
    pt3dadd(85.11, 18.54, -25.5, 0.79)
    pt3dadd(85.22, 18.59, -25.5, 0.79)
    pt3dadd(85.32, 18.48, -25.5, 0.79)
    pt3dadd(85.43, 18.38, -25.5, 0.79)
    pt3dadd(85.53, 18.27, -25.5, 0.79)
    pt3dadd(85.64, 18.17, -25.5, 0.79)
    pt3dadd(85.69, 18.01, -25.5, 0.79)
    pt3dadd(85.79, 18.01, -25.5, 0.79)
    pt3dadd(85.9, 17.85, -25.5, 0.79)
    pt3dadd(86, 17.75, -25.5, 0.79)
    pt3dadd(86.11, 17.64, -25.5, 0.79)
    pt3dadd(86.21, 17.54, -25.5, 0.79)
    pt3dadd(86.32, 17.43, -25.5, 0.79)
    pt3dadd(86.48, 17.38, -25.5, 0.79)
    pt3dadd(86.58, 17.27, -25.5, 0.79)
    pt3dadd(86.69, 17.17, -25.5, 0.79)
    pt3dadd(86.69, 17.01, -25.5, 0.79)
    pt3dadd(86.74, 16.91, -25.5, 0.79)
    pt3dadd(86.84, 16.91, -25.5, 0.79)
    pt3dadd(86.9, 16.8, -25.5, 0.79)
    pt3dadd(87, 16.64, -25.5, 0.79)
    pt3dadd(87.11, 16.54, -25.5, 0.79)
    pt3dadd(87.11, 16.43, -25.5, 0.79)
    pt3dadd(87.21, 16.32, -25.5, 0.79)
    pt3dadd(87.32, 16.17, -25.5, 0.79)
    pt3dadd(87.42, 16.07, -25.5, 0.79)
    pt3dadd(87.53, 15.91, -25.5, 0.79)
    pt3dadd(87.63, 15.8, -25.5, 0.79)
    pt3dadd(87.84, 15.8, -25.5, 0.79)
    pt3dadd(87.95, 15.75, -25.5, 0.79)
    pt3dadd(88.16, 15.64, -25.5, 0.79)
    pt3dadd(88.26, 15.59, -25.5, 0.79)
    pt3dadd(88.42, 15.59, -25.5, 0.79)
    pt3dadd(88.58, 15.43, -25.5, 0.79)
    pt3dadd(88.68, 15.43, -25.5, 0.79)
    pt3dadd(88.84, 15.33, -25.5, 0.79)
    pt3dadd(88.94, 15.22, -25.5, 0.79)
    pt3dadd(89.1, 15.12, -25.5, 0.79)
    pt3dadd(89.26, 15.01, -25.5, 0.79)
    pt3dadd(89.42, 14.96, -25.5, 0.79)
    pt3dadd(89.57, 14.91, -25.5, 0.79)
    pt3dadd(89.73, 14.75, -25.5, 0.79)
    pt3dadd(89.84, 14.65, -25.5, 0.79)
    pt3dadd(89.94, 14.59, -25.5, 0.79)
    pt3dadd(90.1, 14.49, -25.5, 0.79)
    pt3dadd(90.26, 14.44, -25.5, 0.79)
    pt3dadd(90.31, 14.33, -25.5, 0.79)
    pt3dadd(90.41, 14.23, -25.5, 0.79)
    pt3dadd(90.52, 14.23, -25.5, 0.79)
    pt3dadd(90.62, 14.12, -25.5, 0.79)
    pt3dadd(90.73, 14.07, -25.5, 0.79)
    pt3dadd(90.83, 13.96, -25.5, 0.79)
    pt3dadd(90.89, 13.86, -25.5, 0.79)
    pt3dadd(90.99, 13.75, -25.5, 0.79)
    pt3dadd(91.15, 13.59, -25.5, 0.79)
    pt3dadd(91.25, 13.44, -25.5, 0.79)
    pt3dadd(91.36, 13.28, -25.5, 0.79)
    pt3dadd(91.41, 13.07, -25.5, 0.79)
    pt3dadd(91.52, 12.96, -25.5, 0.79)
    pt3dadd(92.1, 11.87, -25.5, 0.89)
    pt3dadd(92.1, 11.71, -25.5, 0.89)
    pt3dadd(92.15, 11.55, -25.5, 0.89)
    pt3dadd(92.26, 11.5, -25.5, 0.89)
    pt3dadd(92.26, 11.29, -25.5, 0.89)
    pt3dadd(92.31, 11.18, -25.5, 0.89)
    pt3dadd(92.31, 11.03, -25.5, 0.89)
    pt3dadd(92.42, 10.82, -25.5, 0.89)
    pt3dadd(92.47, 10.61, -26, 0.89)
    pt3dadd(92.52, 10.4, -26, 0.89)
    pt3dadd(92.68, 10.24, -26, 0.89)
    pt3dadd(92.63, 9.97, -26.5, 0.89)
    pt3dadd(92.68, 9.82, -26.5, 0.89)
    pt3dadd(92.73, 9.66, -26.5, 0.89)
    pt3dadd(92.73, 9.4, -26.5, 0.89)
    pt3dadd(92.68, 9.02, -26.5, 0.89)
    pt3dadd(92.68, 8.66, -26.5, 0.89)
    pt3dadd(92.63, 8.56, -26.5, 0.89)
    pt3dadd(92.57, 8.35, -26.5, 0.89)
    pt3dadd(92.52, 8.24, -27, 0.89)
    pt3dadd(92.47, 8.13, -27, 0.89)
    pt3dadd(92.42, 8.02, -27, 0.89)
    pt3dadd(92.42, 7.77, -27, 0.89)
    pt3dadd(92.36, 7.61, -27, 0.89)
    pt3dadd(92.26, 7.4, -27, 0.89)
    pt3dadd(92.21, 7.24, -27, 0.89)
    pt3dadd(92.1, 7.03, -27, 0.89)
    pt3dadd(92.1, 6.87, -27, 0.89)
    pt3dadd(92.05, 6.77, -27, 0.89)
    pt3dadd(92, 6.61, -27, 0.89)
    pt3dadd(91.89, 6.4, -27.5, 0.89)
    pt3dadd(91.79, 6.35, -27.5, 0.89)
    pt3dadd(91.68, 6.29, -27.5, 0.89)
    pt3dadd(91.47, 6.29, -27.5, 0.89)
    pt3dadd(91.37, 6.24, -27.5, 0.89)
    pt3dadd(91.21, 6.08, -27.5, 0.89)
    pt3dadd(91.16, 5.98, -27.5, 0.89)
    pt3dadd(91.11, 5.87, -27.5, 0.89)
    pt3dadd(91, 5.82, -27.5, 0.89)
    pt3dadd(90.9, 5.66, -27.5, 0.89)
    pt3dadd(90.84, 5.56, -27.5, 0.89)
    pt3dadd(90.79, 5.35, -27.5, 0.89)
    pt3dadd(90.69, 5.3, -27.5, 0.89)
    pt3dadd(90.58, 5.19, -27.5, 0.89)
    pt3dadd(90.53, 5.03, -27.5, 0.89)
    pt3dadd(90.48, 4.88, -27.5, 0.89)
    pt3dadd(90.37, 4.72, -27.5, 0.89)
    pt3dadd(90.37, 4.55, -27.5, 0.89)
    pt3dadd(90.32, 4.4, -27.5, 0.89)
    pt3dadd(90.27, 4.3, -27.5, 0.89)
    pt3dadd(90.16, 4.09, -27.5, 0.89)
    pt3dadd(90.16, 3.93, -27.5, 0.89)
    pt3dadd(90.06, 3.72, -27.5, 0.89)
    pt3dadd(90, 3.56, -27.5, 0.89)
    pt3dadd(89.95, 3.4, -27.5, 0.89)
    pt3dadd(89.85, 3.19, -27.5, 0.89)
    pt3dadd(89.79, 3.04, -27.5, 0.89)
    pt3dadd(89.69, 2.93, -27.5, 0.89)
    pt3dadd(89.53, 2.77, -27.5, 0.89)
    pt3dadd(89.43, 2.67, -27.5, 0.89)
    pt3dadd(89.32, 2.56, -27.5, 0.89)
    pt3dadd(89.22, 2.4, -27.5, 0.89)
    pt3dadd(89.16, 2.29, -27.5, 0.89)
    pt3dadd(89.06, 2.19, -27.5, 0.89)
    pt3dadd(88.9, 2.14, -27.5, 0.89)
    pt3dadd(88.85, 1.93, -27.5, 0.89)
    pt3dadd(88.74, 1.77, -27.5, 0.89)
    pt3dadd(88.69, 1.56, -27.5, 0.89)
    pt3dadd(88.69, 1.35, -27.5, 0.89)
    pt3dadd(88.64, 1.13, -27.5, 0.89)
    pt3dadd(88.59, 1.04, -27.5, 0.89)
    pt3dadd(88.59, 0.83, -27.5, 0.89)
    pt3dadd(88.53, 0.67, -27.5, 0.89)
    pt3dadd(88.53, 0.41, -27.5, 0.89)
    pt3dadd(88.48, 0.3, -27.5, 0.89)
    pt3dadd(88.51, -0.78, -28.5, 0.89)
    pt3dadd(88.51, -1.14, -28.5, 0.89)
    pt3dadd(88.56, -1.25, -29, 0.89)
    pt3dadd(88.56, -1.46, -29, 0.89)
    pt3dadd(88.61, -1.62, -29, 0.89)
    pt3dadd(88.66, -1.78, -29, 0.89)
    pt3dadd(88.77, -1.88, -29.5, 0.89)
  }
  dend[60] {pt3dclear()
    pt3dadd(15.89, -11.33, -2.5, 1)
    pt3dadd(15.82, -12.09, -2.5, 0.89)
    pt3dadd(16.03, -12.03, -2.5, 0.89)
    pt3dadd(16.5, -12.03, -2.5, 0.89)
    pt3dadd(16.66, -12.09, -2.5, 0.89)
    pt3dadd(17.07, -12.09, -2.5, 0.89)
    pt3dadd(17.13, -12.14, -2, 0.89)
    pt3dadd(17.34, -12.14, -2, 0.89)
    pt3dadd(17.6, -12.24, -1.5, 0.89)
    pt3dadd(17.71, -12.3, -1.5, 0.89)
    pt3dadd(17.87, -12.35, -1.5, 0.89)
    pt3dadd(17.97, -12.4, -1.5, 0.89)
    pt3dadd(18.07, -12.45, -1.5, 0.89)
    pt3dadd(18.39, -12.45, -1.5, 0.89)
    pt3dadd(18.5, -12.51, -1.5, 0.89)
    pt3dadd(18.6, -12.61, -1.5, 0.89)
    pt3dadd(18.8, -12.61, -2.5, 0.89)
    pt3dadd(18.92, -12.72, -2.5, 0.89)
    pt3dadd(19.02, -12.77, -2.5, 0.89)
    pt3dadd(19.23, -12.77, -3, 0.89)
    pt3dadd(19.34, -12.82, -3, 0.89)
    pt3dadd(20.39, -12.82, -3.5, 0.89)
    pt3dadd(20.6, -12.87, -3.5, 0.89)
    pt3dadd(20.7, -12.93, -3.5, 0.89)
    pt3dadd(20.86, -12.98, -3.5, 0.89)
    pt3dadd(20.96, -13.08, -3.5, 0.89)
    pt3dadd(20.96, -13.56, -3.5, 0.89)
    pt3dadd(21.07, -13.61, -3.5, 0.89)
    pt3dadd(21.07, -13.93, -3.5, 0.89)
    pt3dadd(21.17, -14.08, -3.5, 0.89)
    pt3dadd(21.23, -14.19, -3.5, 0.89)
    pt3dadd(21.33, -14.24, -4, 0.89)
    pt3dadd(21.38, -14.35, -4, 0.89)
    pt3dadd(21.49, -14.45, -4, 0.89)
    pt3dadd(21.59, -14.56, -4, 0.89)
    pt3dadd(21.7, -14.61, -4, 0.89)
    pt3dadd(21.8, -14.61, -4.5, 0.89)
    pt3dadd(21.91, -14.66, -4.5, 0.89)
    pt3dadd(22.07, -14.66, -4.5, 0.89)
    pt3dadd(22.17, -14.71, -5, 0.89)
    pt3dadd(22.28, -14.71, -5.5, 0.89)
    pt3dadd(22.38, -14.77, -5.5, 0.89)
    pt3dadd(22.49, -14.87, -5.5, 0.89)
    pt3dadd(22.59, -14.98, -6, 0.89)
    pt3dadd(22.7, -15.13, -6, 0.89)
    pt3dadd(22.7, -15.24, -6, 0.89)
    pt3dadd(22.75, -15.35, -6, 0.89)
    pt3dadd(22.85, -15.5, -6, 0.89)
    pt3dadd(22.96, -15.61, -6, 0.89)
    pt3dadd(23.01, -15.71, -6, 0.89)
    pt3dadd(23.12, -15.82, -6, 0.89)
    pt3dadd(23.17, -15.92, -6, 0.89)
    pt3dadd(23.33, -15.98, -6.5, 0.89)
    pt3dadd(23.43, -16.07, -6.5, 0.89)
    pt3dadd(23.54, -16.19, -6.5, 0.89)
    pt3dadd(23.59, -16.29, -6.5, 0.89)
    pt3dadd(23.75, -16.39, -6.5, 0.89)
    pt3dadd(23.9, -16.39, -6.5, 0.89)
    pt3dadd(24.06, -16.5, -6.5, 0.89)
    pt3dadd(24.22, -16.76, -6.5, 0.89)
    pt3dadd(24.48, -16.97, -6.5, 0.89)
    pt3dadd(24.59, -17.07, -6.5, 0.89)
    pt3dadd(24.64, -17.18, -6.5, 0.89)
    pt3dadd(24.74, -17.29, -6.5, 0.89)
    pt3dadd(24.85, -17.39, -6.5, 0.89)
    pt3dadd(24.85, -17.61, -6.5, 0.89)
    pt3dadd(24.95, -17.87, -6.5, 0.89)
    pt3dadd(25.01, -18.03, -6.5, 0.89)
    pt3dadd(25.01, -18.29, -6.5, 0.89)
    pt3dadd(25.06, -18.5, -6.5, 0.89)
    pt3dadd(25.11, -18.66, -6.5, 0.89)
    pt3dadd(25.11, -18.92, -6.5, 0.89)
    pt3dadd(25.16, -19.13, -6.5, 0.89)
    pt3dadd(25.22, -19.29, -6.5, 0.89)
    pt3dadd(25.22, -19.5, -6.5, 0.89)
    pt3dadd(25.27, -19.71, -6.5, 0.89)
    pt3dadd(25.32, -19.87, -6.5, 0.89)
    pt3dadd(25.32, -20.07, -6.5, 0.89)
    pt3dadd(25.37, -20.23, -6.5, 0.89)
    pt3dadd(25.37, -20.44, -6.5, 0.89)
    pt3dadd(25.37, -20.6, -6.5, 0.89)
    pt3dadd(25.32, -20.81, -7, 0.89)
    pt3dadd(25.32, -21.23, -7, 0.89)
    pt3dadd(25.27, -21.44, -7, 0.89)
    pt3dadd(25.22, -21.6, -7, 0.89)
    pt3dadd(25.22, -21.81, -7, 0.89)
    pt3dadd(25.16, -21.97, -7, 0.89)
    pt3dadd(25.16, -22.97, -7, 0.89)
    pt3dadd(25.22, -23.13, -7, 0.89)
    pt3dadd(25.32, -23.23, -7, 0.89)
    pt3dadd(25.32, -23.49, -7, 0.89)
    pt3dadd(25.37, -23.6, -7, 0.89)
  }
}
proc shape3d_63() {
  dend[60] {
    pt3dadd(25.43, -23.7, -7, 0.89)
    pt3dadd(25.43, -23.86, -7, 0.89)
    pt3dadd(25.48, -24.02, -7, 0.89)
    pt3dadd(25.53, -24.12, -7, 0.89)
    pt3dadd(26.19, -25.36, -7.5, 0.89)
    pt3dadd(26.34, -25.52, -7.5, 0.89)
    pt3dadd(26.4, -25.67, -7.5, 0.89)
    pt3dadd(26.5, -25.78, -7.5, 0.89)
    pt3dadd(26.61, -25.88, -7.5, 0.89)
    pt3dadd(26.76, -25.94, -7.5, 0.89)
    pt3dadd(26.76, -26.09, -8, 0.89)
    pt3dadd(26.87, -26.2, -8, 0.89)
    pt3dadd(26.92, -26.31, -8, 0.89)
    pt3dadd(27.03, -26.41, -8, 0.89)
    pt3dadd(27.03, -26.73, -8.5, 0.89)
    pt3dadd(27.08, -26.88, -8.5, 0.89)
    pt3dadd(27.24, -27.04, -8.5, 0.89)
    pt3dadd(27.29, -27.15, -8.5, 0.89)
    pt3dadd(27.39, -27.15, -9.5, 0.89)
    pt3dadd(27.34, -27.3, -9.5, 0.89)
    pt3dadd(27.34, -27.41, -10, 0.89)
    pt3dadd(27.13, -27.57, -10, 0.89)
    pt3dadd(27.13, -28.15, -10.5, 0.89)
    pt3dadd(27.18, -28.25, -10.5, 0.89)
    pt3dadd(27.39, -28.36, -10.5, 0.89)
    pt3dadd(27.5, -28.36, -10.5, 0.89)
    pt3dadd(27.6, -28.3, -11, 0.89)
    pt3dadd(27.71, -28.3, -11, 0.89)
    pt3dadd(27.81, -28.15, -11, 0.89)
    pt3dadd(27.92, -27.88, -11, 0.89)
    pt3dadd(27.97, -27.67, -11, 0.89)
    pt3dadd(27.97, -27.25, -11, 0.89)
    pt3dadd(27.92, -27.15, -11, 0.89)
    pt3dadd(27.87, -27.04, -11.5, 0.89)
    pt3dadd(27.92, -26.94, -11.5, 0.89)
    pt3dadd(28.18, -27.04, -11.5, 0.89)
    pt3dadd(28.29, -27.15, -12, 0.89)
    pt3dadd(28.39, -27.25, -12, 0.89)
    pt3dadd(28.55, -27.36, -12, 0.89)
    pt3dadd(28.6, -27.46, -12, 0.89)
    pt3dadd(28.6, -27.67, -12, 0.89)
    pt3dadd(28.71, -27.78, -12, 0.89)
    pt3dadd(28.71, -27.93, -12, 0.89)
    pt3dadd(28.76, -28.04, -12.5, 0.89)
    pt3dadd(28.81, -28.2, -12.5, 0.89)
    pt3dadd(28.86, -28.41, -12.5, 0.89)
    pt3dadd(28.97, -28.57, -12.5, 0.89)
    pt3dadd(29.02, -28.78, -12.5, 0.89)
    pt3dadd(29.13, -28.99, -12.5, 0.89)
    pt3dadd(29.23, -29.14, -12.5, 0.89)
    pt3dadd(29.23, -29.3, -12.5, 0.89)
    pt3dadd(29.34, -29.41, -12.5, 0.89)
    pt3dadd(29.39, -29.51, -12.5, 0.89)
    pt3dadd(29.44, -29.67, -12.5, 0.89)
    pt3dadd(29.55, -29.77, -12.5, 0.89)
    pt3dadd(29.65, -29.88, -12.5, 0.89)
    pt3dadd(29.81, -29.83, -12.5, 0.89)
    pt3dadd(29.91, -29.93, -13, 0.89)
    pt3dadd(30.02, -30.04, -13, 0.89)
    pt3dadd(30.12, -29.98, -13, 0.89)
    pt3dadd(30.23, -29.98, -13, 0.89)
    pt3dadd(30.39, -29.98, -13, 0.89)
    pt3dadd(30.65, -29.98, -13, 0.89)
    pt3dadd(30.65, -30.14, -13, 0.89)
    pt3dadd(30.86, -30.09, -13, 0.89)
    pt3dadd(30.96, -30.09, -13, 0.89)
    pt3dadd(31.07, -30.25, -13, 0.89)
    pt3dadd(31.17, -30.3, -13, 0.89)
    pt3dadd(31.28, -30.56, -13, 0.89)
    pt3dadd(31.38, -30.77, -13.5, 0.89)
    pt3dadd(31.44, -30.93, -13.5, 0.89)
    pt3dadd(31.49, -31.04, -13.5, 0.89)
    pt3dadd(31.49, -31.88, -14, 0.89)
    pt3dadd(31.33, -32.14, -14, 0.89)
    pt3dadd(31.38, -32.29, -14, 0.89)
    pt3dadd(31.38, -32.51, -14, 0.89)
    pt3dadd(31.28, -32.67, -14, 0.89)
    pt3dadd(31.23, -32.82, -14, 0.89)
    pt3dadd(31.23, -32.97, -14, 0.89)
    pt3dadd(31.12, -33.19, -14, 0.89)
    pt3dadd(31.07, -33.4, -14, 0.89)
    pt3dadd(31.02, -33.61, -14, 0.89)
    pt3dadd(30.96, -33.88, -14, 0.89)
    pt3dadd(30.96, -34.14, -14, 0.89)
    pt3dadd(30.86, -34.35, -14, 0.89)
    pt3dadd(30.81, -34.56, -14, 0.89)
    pt3dadd(30.75, -34.77, -14, 0.89)
    pt3dadd(30.7, -34.86, -14, 0.89)
    pt3dadd(30.65, -34.97, -14, 0.89)
    pt3dadd(30.6, -35.14, -14, 0.89)
    pt3dadd(30.54, -35.24, -14, 0.89)
    pt3dadd(30.49, -35.45, -14, 0.89)
    pt3dadd(30.39, -35.65, -14, 0.89)
    pt3dadd(30.33, -35.86, -14, 0.89)
    pt3dadd(30.28, -35.97, -14, 0.89)
    pt3dadd(30.23, -36.19, -14, 0.89)
    pt3dadd(30.18, -36.29, -14, 0.89)
    pt3dadd(30.18, -36.71, -14, 0.89)
    pt3dadd(30.11, -38.39, -14, 0.89)
    pt3dadd(30.16, -38.54, -14, 0.89)
    pt3dadd(30.21, -38.76, -14, 0.89)
    pt3dadd(30.21, -39.13, -14, 0.89)
    pt3dadd(30.32, -39.24, -14, 0.89)
    pt3dadd(30.32, -39.65, -14.5, 0.89)
    pt3dadd(30.37, -39.81, -14.5, 0.89)
    pt3dadd(30.42, -39.92, -14.5, 0.89)
    pt3dadd(30.48, -40.13, -14.5, 0.89)
    pt3dadd(30.58, -40.22, -14.5, 0.89)
    pt3dadd(30.63, -40.34, -14.5, 0.89)
    pt3dadd(30.69, -40.45, -14.5, 0.89)
    pt3dadd(30.74, -40.6, -14.5, 0.89)
    pt3dadd(30.84, -40.65, -14.5, 0.89)
    pt3dadd(30.84, -41.02, -14.5, 0.89)
    pt3dadd(30.9, -41.13, -14.5, 0.89)
    pt3dadd(30.95, -41.29, -14.5, 0.89)
    pt3dadd(31.05, -41.5, -14.5, 0.89)
    pt3dadd(31.21, -41.76, -14.5, 0.89)
    pt3dadd(31.26, -41.92, -14.5, 0.89)
    pt3dadd(31.32, -42.02, -14.5, 0.89)
    pt3dadd(31.37, -42.13, -14.5, 0.89)
    pt3dadd(31.42, -42.34, -14.5, 0.89)
    pt3dadd(31.53, -42.5, -14.5, 0.89)
    pt3dadd(31.58, -42.6, -14.5, 0.89)
    pt3dadd(31.63, -42.81, -14.5, 0.89)
    pt3dadd(31.68, -42.92, -14.5, 0.89)
    pt3dadd(31.74, -43.07, -14.5, 0.89)
    pt3dadd(31.79, -43.18, -14.5, 0.89)
    pt3dadd(31.79, -43.34, -14.5, 0.89)
    pt3dadd(31.89, -43.44, -14.5, 0.89)
    pt3dadd(31.95, -43.6, -14.5, 0.89)
    pt3dadd(32.04, -43.7, -14.5, 0.89)
    pt3dadd(32.1, -43.86, -14.5, 0.89)
    pt3dadd(32.21, -43.97, -14.5, 0.89)
    pt3dadd(32.26, -44.18, -14.5, 0.89)
    pt3dadd(32.36, -44.23, -14.5, 0.89)
    pt3dadd(32.47, -44.34, -14.5, 0.89)
    pt3dadd(32.63, -44.49, -14.5, 0.89)
    pt3dadd(32.72, -44.7, -14.5, 0.89)
    pt3dadd(32.94, -44.81, -14.5, 0.89)
    pt3dadd(33.04, -44.97, -14.5, 0.89)
    pt3dadd(33.26, -45.07, -14.5, 0.89)
    pt3dadd(33.36, -45.18, -14.5, 0.89)
    pt3dadd(33.47, -45.28, -14.5, 0.89)
    pt3dadd(33.52, -45.44, -14.5, 0.89)
    pt3dadd(33.63, -45.54, -14.5, 0.89)
    pt3dadd(33.72, -45.65, -14.5, 0.89)
    pt3dadd(33.89, -45.75, -14.5, 0.89)
    pt3dadd(33.99, -45.81, -14.5, 0.89)
    pt3dadd(34.1, -46.07, -14.5, 0.89)
    pt3dadd(34.26, -46.18, -14.5, 0.89)
    pt3dadd(34.36, -46.28, -14.5, 0.89)
    pt3dadd(34.47, -46.39, -14.5, 0.89)
    pt3dadd(34.52, -46.54, -14.5, 0.89)
    pt3dadd(34.72, -46.65, -14.5, 0.89)
    pt3dadd(34.78, -46.81, -14.5, 0.89)
    pt3dadd(34.83, -46.91, -14.5, 0.89)
    pt3dadd(34.99, -47.07, -14.5, 0.89)
    pt3dadd(34.99, -47.17, -14.5, 0.89)
    pt3dadd(35.04, -47.38, -14.5, 0.89)
    pt3dadd(35.1, -47.49, -14.5, 0.89)
    pt3dadd(35.04, -47.65, -14.5, 0.89)
    pt3dadd(35.04, -47.91, -14.5, 0.89)
    pt3dadd(34.89, -48.23, -14.5, 0.89)
    pt3dadd(34.83, -48.38, -14.5, 0.89)
    pt3dadd(34.72, -48.59, -14.5, 0.89)
    pt3dadd(34.57, -48.65, -14.5, 0.89)
    pt3dadd(34.57, -48.96, -14.5, 0.89)
    pt3dadd(34.47, -49.01, -14.5, 0.89)
    pt3dadd(34.4, -49.22, -14.5, 0.89)
    pt3dadd(34.36, -51.14, -16, 0.89)
    pt3dadd(34.53, -51.35, -16, 0.89)
    pt3dadd(34.58, -51.46, -16, 0.89)
    pt3dadd(34.79, -51.62, -16, 0.89)
    pt3dadd(34.84, -51.77, -16, 0.89)
    pt3dadd(34.79, -51.88, -16, 0.89)
    pt3dadd(34.84, -52.09, -16, 0.89)
    pt3dadd(34.9, -52.25, -16, 0.89)
    pt3dadd(34.9, -52.46, -16, 0.89)
    pt3dadd(35, -52.56, -16, 0.89)
    pt3dadd(35, -52.72, -16, 0.89)
    pt3dadd(35.04, -52.82, -16, 0.89)
    pt3dadd(35.04, -53.09, -16, 0.89)
    pt3dadd(35.15, -53.19, -16, 0.89)
    pt3dadd(35.21, -53.35, -16, 0.89)
    pt3dadd(35.26, -53.51, -16.5, 0.89)
    pt3dadd(35.32, -53.67, -16.5, 0.89)
    pt3dadd(35.42, -53.77, -16.5, 0.89)
    pt3dadd(35.47, -53.93, -16.5, 0.89)
    pt3dadd(35.47, -54.24, -16.5, 0.89)
    pt3dadd(35.53, -54.35, -16.5, 0.89)
    pt3dadd(35.58, -54.45, -16.5, 0.89)
    pt3dadd(35.58, -54.77, -16.5, 0.89)
    pt3dadd(35.63, -54.93, -16.5, 0.89)
    pt3dadd(35.63, -55.51, -17, 0.89)
    pt3dadd(35.58, -55.66, -17, 0.89)
    pt3dadd(35.53, -55.87, -17.5, 0.89)
    pt3dadd(35.79, -56.98, -18, 0.89)
    pt3dadd(35.68, -57.19, -18, 0.89)
    pt3dadd(35.79, -57.35, -18, 0.89)
    pt3dadd(35.84, -57.45, -18, 0.89)
    pt3dadd(35.95, -57.45, -18, 0.89)
    pt3dadd(36, -57.56, -18, 0.89)
    pt3dadd(36.1, -57.66, -18, 0.89)
    pt3dadd(36.21, -57.71, -18, 0.89)
    pt3dadd(36.26, -57.82, -18, 0.89)
    pt3dadd(36.42, -57.98, -18, 0.89)
    pt3dadd(36.47, -58.08, -18, 0.89)
    pt3dadd(36.63, -58.19, -18, 0.89)
    pt3dadd(36.84, -58.24, -18.5, 0.89)
    pt3dadd(36.94, -58.29, -19, 0.89)
    pt3dadd(37.1, -58.45, -19, 0.89)
    pt3dadd(37.21, -58.5, -19, 0.89)
    pt3dadd(37.21, -58.66, -19, 0.89)
    pt3dadd(37.36, -58.87, -19, 0.89)
    pt3dadd(37.36, -59.03, -19, 0.89)
    pt3dadd(37.42, -59.08, -19.5, 0.89)
    pt3dadd(37.42, -59.4, -19.5, 0.89)
    pt3dadd(37.57, -59.45, -19.5, 0.89)
    pt3dadd(37.52, -59.71, -19.5, 0.89)
    pt3dadd(37.52, -60.08, -20, 0.89)
    pt3dadd(37.57, -60.18, -20, 0.89)
    pt3dadd(37.57, -60.39, -20, 0.89)
    pt3dadd(37.63, -60.55, -20, 0.89)
    pt3dadd(37.68, -60.76, -20, 0.89)
    pt3dadd(37.68, -60.92, -20, 0.89)
    pt3dadd(37.72, -61.08, -20, 0.89)
    pt3dadd(37.78, -61.18, -20, 0.89)
    pt3dadd(37.84, -61.29, -20, 0.89)
    pt3dadd(37.94, -61.45, -20, 0.89)
    pt3dadd(38.04, -61.6, -20, 0.89)
    pt3dadd(38.04, -61.81, -20, 0.89)
    pt3dadd(38.1, -61.92, -20, 0.89)
    pt3dadd(38.2, -62.02, -20, 0.89)
    pt3dadd(38.31, -62.13, -20, 0.89)
    pt3dadd(38.31, -62.29, -20, 0.89)
    pt3dadd(38.46, -62.79, -20.5, 0.89)
    pt3dadd(38.46, -63, -20.5, 0.89)
    pt3dadd(38.36, -63.15, -20.5, 0.89)
    pt3dadd(38.36, -63.78, -20.5, 0.89)
    pt3dadd(38.29, -63.94, -20.5, 0.89)
    pt3dadd(38.25, -64.09, -20.5, 0.89)
    pt3dadd(38.25, -64.56, -20.5, 0.89)
    pt3dadd(38.25, -64.63, -21, 0.89)
    pt3dadd(38.25, -64.94, -21, 0.89)
    pt3dadd(38.2, -65.09, -21, 0.89)
    pt3dadd(38.15, -65.2, -21.5, 0.89)
    pt3dadd(37.32, -65.87, -21.5, 0.94)
    pt3dadd(37.17, -65.98, -21.5, 0.94)
    pt3dadd(36.96, -65.98, -21.5, 0.94)
  }
}
proc shape3d_64() {
  dend[60] {
    pt3dadd(36.85, -66.03, -21.5, 0.94)
    pt3dadd(36.79, -66.13, -21.5, 0.94)
    pt3dadd(36.69, -66.13, -21.5, 0.94)
    pt3dadd(36.64, -66.29, -21.5, 0.94)
    pt3dadd(36.59, -66.5, -21.5, 0.94)
    pt3dadd(36.47, -66.66, -21.5, 0.94)
    pt3dadd(36.47, -66.76, -21.5, 0.94)
    pt3dadd(36.43, -67.03, -21.5, 0.94)
    pt3dadd(36.64, -67.19, -21.5, 0.94)
    pt3dadd(36.59, -67.29, -21.5, 0.94)
    pt3dadd(36.59, -67.61, -21.5, 0.94)
    pt3dadd(36.64, -67.7, -21.5, 0.94)
    pt3dadd(36.64, -67.92, -21.5, 0.94)
    pt3dadd(36.69, -68.29, -21.5, 0.94)
    pt3dadd(36.64, -68.39, -21.5, 0.94)
    pt3dadd(36.64, -68.66, -21.5, 0.94)
    pt3dadd(36.54, -68.92, -21.5, 0.94)
    pt3dadd(36.47, -69.08, -21.5, 0.94)
    pt3dadd(36.47, -69.39, -21.5, 0.94)
    pt3dadd(36.43, -69.55, -21.5, 0.94)
    pt3dadd(36.33, -69.76, -21.5, 0.94)
    pt3dadd(36.27, -69.92, -21.5, 0.94)
    pt3dadd(36.22, -70.02, -21.5, 0.94)
    pt3dadd(36.17, -70.13, -21.5, 0.94)
    pt3dadd(36.17, -70.29, -21.5, 0.94)
    pt3dadd(36.06, -70.5, -21.5, 0.94)
    pt3dadd(36.01, -70.65, -21.5, 0.94)
    pt3dadd(35.9, -70.76, -21.5, 0.94)
    pt3dadd(35.9, -70.92, -21.5, 0.94)
    pt3dadd(35.79, -71.08, -21.5, 0.94)
    pt3dadd(35.75, -71.29, -21.5, 0.94)
    pt3dadd(35.7, -71.44, -21.5, 0.94)
    pt3dadd(35.7, -71.55, -21.5, 0.94)
    pt3dadd(34.53, -73.2, -22, 0.94)
    pt3dadd(34.47, -73.42, -22, 0.94)
    pt3dadd(34.43, -73.52, -22, 0.94)
    pt3dadd(34.43, -73.68, -22, 0.94)
    pt3dadd(34.38, -73.79, -22, 0.94)
    pt3dadd(34.38, -74.26, -22.5, 0.94)
    pt3dadd(34.47, -74.36, -22.5, 0.94)
    pt3dadd(34.53, -74.52, -22.5, 0.94)
    pt3dadd(34.64, -74.63, -22.5, 0.94)
    pt3dadd(34.64, -74.78, -22.5, 0.94)
    pt3dadd(34.69, -75, -22.5, 0.94)
    pt3dadd(34.79, -75.09, -22.5, 0.94)
    pt3dadd(34.79, -75.56, -22.5, 0.94)
    pt3dadd(34.85, -75.73, -22.5, 0.94)
    pt3dadd(34.85, -75.94, -22.5, 0.94)
    pt3dadd(34.95, -76.2, -22.5, 0.94)
    pt3dadd(34.95, -76.98, -22.5, 0.94)
    pt3dadd(35.01, -77.09, -22.5, 0.94)
    pt3dadd(34.95, -77.26, -22.5, 0.94)
    pt3dadd(34.95, -78.31, -23, 0.94)
    pt3dadd(34.9, -78.52, -23, 0.94)
    pt3dadd(34.85, -78.78, -23, 0.94)
    pt3dadd(34.85, -79.04, -23, 0.94)
    pt3dadd(34.79, -79.2, -23, 0.94)
    pt3dadd(34.74, -79.31, -23, 0.94)
    pt3dadd(34.69, -79.41, -23, 0.94)
    pt3dadd(34.64, -79.56, -23, 0.94)
    pt3dadd(34.53, -79.67, -23, 0.94)
    pt3dadd(34.47, -79.78, -23, 0.94)
    pt3dadd(34.38, -79.88, -23, 0.94)
    pt3dadd(34.27, -80.04, -23.5, 0.94)
    pt3dadd(34.27, -80.2, -23.5, 0.94)
    pt3dadd(34.32, -80.36, -23.5, 0.94)
    pt3dadd(34.43, -80.51, -23.5, 0.94)
    pt3dadd(34.38, -80.62, -23.5, 0.94)
    pt3dadd(34.43, -80.83, -23.5, 0.94)
    pt3dadd(34.47, -80.94, -23.5, 0.94)
    pt3dadd(34.47, -81.2, -23.5, 0.94)
    pt3dadd(34.53, -81.3, -23.5, 0.94)
    pt3dadd(34.53, -81.67, -23.5, 0.94)
    pt3dadd(34.59, -81.83, -23.5, 0.94)
    pt3dadd(34.59, -82.2, -23.5, 0.94)
    pt3dadd(34.53, -82.41, -23.5, 0.94)
    pt3dadd(34.47, -82.57, -23.5, 0.94)
    pt3dadd(34.43, -82.78, -23.5, 0.94)
    pt3dadd(34.38, -82.93, -23.5, 0.94)
    pt3dadd(34.32, -83.04, -23.5, 0.94)
    pt3dadd(34.22, -83.2, -23.5, 0.94)
    pt3dadd(34.17, -83.3, -23.5, 0.94)
    pt3dadd(34.11, -83.51, -23.5, 0.94)
    pt3dadd(34.06, -83.62, -23.5, 0.94)
    pt3dadd(33.96, -83.72, -23.5, 0.94)
    pt3dadd(33.85, -83.83, -23.5, 0.94)
    pt3dadd(33.79, -83.93, -23.5, 0.94)
    pt3dadd(33.1, -85.21, -25, 0.94)
    pt3dadd(33.1, -85.42, -25, 0.94)
    pt3dadd(33.04, -85.53, -25, 0.94)
    pt3dadd(32.89, -85.9, -25, 0.94)
    pt3dadd(32.89, -86.27, -25, 0.94)
    pt3dadd(32.94, -86.53, -25, 0.94)
    pt3dadd(32.99, -86.74, -25, 0.94)
    pt3dadd(33.1, -86.9, -25.5, 0.94)
    pt3dadd(33.1, -87.11, -25.5, 0.94)
    pt3dadd(33.15, -87.21, -25.5, 0.94)
    pt3dadd(33.2, -87.37, -25.5, 0.94)
    pt3dadd(33.31, -87.53, -25.5, 0.94)
    pt3dadd(33.31, -87.68, -25.5, 0.94)
    pt3dadd(33.46, -87.74, -25.5, 0.94)
    pt3dadd(33.46, -87.9, -25.5, 0.94)
    pt3dadd(33.61, -87.95, -25.5, 0.94)
    pt3dadd(33.61, -88.16, -25.5, 0.94)
    pt3dadd(33.72, -88.26, -25.5, 0.94)
    pt3dadd(33.78, -88.42, -25.5, 0.94)
    pt3dadd(33.88, -88.53, -25.5, 0.94)
    pt3dadd(33.88, -88.68, -25.5, 0.94)
    pt3dadd(33.94, -88.89, -25.5, 0.94)
    pt3dadd(33.88, -89.16, -26, 0.94)
    pt3dadd(33.88, -89.31, -26, 0.94)
    pt3dadd(33.83, -89.47, -26, 0.94)
    pt3dadd(33.78, -89.68, -26, 0.94)
    pt3dadd(33.72, -89.84, -26, 0.94)
    pt3dadd(33.61, -90.05, -26.5, 0.94)
    pt3dadd(33.46, -90.21, -26.5, 0.94)
    pt3dadd(33.36, -90.31, -26.5, 0.94)
    pt3dadd(33.31, -90.42, -26.5, 0.94)
    pt3dadd(33.2, -90.63, -26.5, 0.94)
    pt3dadd(33.15, -90.84, -26.5, 0.94)
    pt3dadd(33.1, -91.05, -26.5, 0.94)
    pt3dadd(33.15, -91.15, -26.5, 0.94)
    pt3dadd(33.15, -91.31, -26.5, 0.94)
    pt3dadd(33.2, -91.42, -26.5, 0.94)
    pt3dadd(33.25, -91.73, -26.5, 0.94)
    pt3dadd(33.31, -91.89, -26.5, 0.94)
    pt3dadd(33.31, -92.1, -26.5, 0.94)
    pt3dadd(33.36, -92.26, -26.5, 0.94)
    pt3dadd(33.36, -92.57, -26.5, 0.94)
    pt3dadd(33.31, -92.73, -26.5, 0.94)
    pt3dadd(33.31, -92.94, -26.5, 0.94)
    pt3dadd(33.25, -93.1, -26.5, 0.94)
    pt3dadd(33.15, -93.31, -26.5, 0.94)
    pt3dadd(33.04, -93.47, -26.5, 0.94)
    pt3dadd(32.89, -93.68, -26.5, 0.94)
    pt3dadd(32.78, -93.84, -27, 0.94)
    pt3dadd(32.68, -93.94, -27, 0.94)
    pt3dadd(32.61, -94.05, -27, 0.94)
    pt3dadd(32.52, -94.1, -27, 0.94)
    pt3dadd(32.47, -94.26, -27.5, 0.94)
    pt3dadd(32.4, -94.36, -27.5, 0.94)
    pt3dadd(32.31, -94.47, -27.5, 0.94)
  }
  dend[61] {pt3dclear()
    pt3dadd(32.31, -94.47, -27.5, 0.94)
    pt3dadd(32.68, -95.06, -29, 0.94)
    pt3dadd(32.68, -95.22, -29, 0.94)
    pt3dadd(32.63, -95.33, -29, 0.94)
    pt3dadd(32.42, -95.54, -29, 0.94)
    pt3dadd(32.32, -95.69, -29, 0.94)
    pt3dadd(32.15, -95.91, -29, 0.94)
    pt3dadd(32.04, -96.06, -28.5, 0.94)
    pt3dadd(32, -96.27, -28.5, 0.94)
    pt3dadd(31.9, -96.48, -28.5, 0.94)
    pt3dadd(31.84, -96.64, -28.5, 0.94)
    pt3dadd(31.74, -96.8, -28.5, 0.94)
    pt3dadd(31.69, -96.9, -28.5, 0.94)
    pt3dadd(31.58, -97.01, -28.5, 0.94)
    pt3dadd(31.58, -97.17, -28.5, 0.94)
    pt3dadd(31.53, -97.38, -28.5, 0.94)
    pt3dadd(31.42, -97.53, -28.5, 0.94)
    pt3dadd(31.42, -98.01, -28.5, 0.94)
    pt3dadd(31.37, -98.22, -28.5, 0.94)
    pt3dadd(31.42, -98.38, -28.5, 0.94)
    pt3dadd(31.42, -98.64, -28.5, 0.94)
    pt3dadd(31.53, -98.9, -28.5, 0.94)
    pt3dadd(31.58, -99.11, -28.5, 0.94)
    pt3dadd(31.58, -99.27, -28.5, 0.94)
    pt3dadd(31.63, -99.43, -28.5, 0.94)
    pt3dadd(31.63, -99.69, -28.5, 0.94)
    pt3dadd(31.63, -99.9, -28.5, 0.94)
    pt3dadd(31.63, -100.16, -28.5, 0.94)
    pt3dadd(31.58, -100.32, -28.5, 0.94)
    pt3dadd(31.53, -100.48, -28.5, 0.94)
    pt3dadd(31.53, -100.64, -28.5, 0.94)
    pt3dadd(31.48, -100.79, -28.5, 0.94)
    pt3dadd(31.42, -101, -28.5, 0.94)
    pt3dadd(31.32, -101.06, -28.5, 0.94)
    pt3dadd(31.21, -101.21, -28, 0.94)
    pt3dadd(31.16, -101.37, -28, 0.94)
    pt3dadd(31.06, -101.42, -28, 0.94)
    pt3dadd(30.95, -101.53, -28, 0.94)
    pt3dadd(30.9, -101.74, -28, 0.94)
    pt3dadd(30.79, -101.85, -28, 0.94)
    pt3dadd(30.69, -102.11, -28, 0.94)
    pt3dadd(30.58, -102.21, -28, 0.94)
    pt3dadd(30.53, -102.37, -28, 0.94)
    pt3dadd(30.32, -102.58, -28, 0.94)
    pt3dadd(30.16, -102.79, -28, 0.94)
    pt3dadd(29.95, -103, -28, 0.94)
    pt3dadd(29.85, -103.11, -28, 0.94)
    pt3dadd(29.8, -103.21, -28, 0.94)
    pt3dadd(29.69, -103.32, -28, 0.94)
    pt3dadd(29.59, -103.48, -28, 0.94)
    pt3dadd(29.53, -103.58, -28, 0.94)
    pt3dadd(29.38, -103.9, -28, 0.94)
    pt3dadd(29.32, -104.16, -28, 0.94)
    pt3dadd(29.27, -104.32, -28, 0.94)
    pt3dadd(29.27, -105.05, -28, 0.94)
    pt3dadd(29.38, -105.21, -28, 0.94)
    pt3dadd(29.48, -105.31, -28, 0.94)
    pt3dadd(29.53, -105.47, -28, 0.94)
    pt3dadd(29.59, -105.58, -28, 0.94)
    pt3dadd(29.74, -105.79, -28, 0.94)
    pt3dadd(29.8, -105.89, -28, 0.94)
    pt3dadd(29.9, -105.95, -28, 0.94)
    pt3dadd(29.95, -106.05, -28, 0.94)
    pt3dadd(30.06, -106.16, -28, 0.94)
    pt3dadd(30.16, -106.31, -27.5, 0.94)
    pt3dadd(30.27, -106.42, -27.5, 0.94)
    pt3dadd(30.22, -106.52, -27.5, 0.94)
    pt3dadd(30.22, -106.68, -27.5, 0.94)
    pt3dadd(30.16, -106.79, -27, 0.94)
    pt3dadd(30.16, -106.94, -27, 0.94)
    pt3dadd(30.06, -107.1, -27.5, 0.94)
    pt3dadd(30.06, -107.84, -28.5, 0.94)
    pt3dadd(30.11, -108.05, -28.5, 0.94)
    pt3dadd(30.22, -108.05, -28.5, 0.94)
    pt3dadd(30.27, -108.21, -28.5, 0.94)
    pt3dadd(30.37, -108.21, -29, 0.94)
    pt3dadd(30.43, -108.31, -29, 0.94)
    pt3dadd(30.53, -108.47, -29, 0.94)
    pt3dadd(30.64, -108.52, -29, 0.94)
    pt3dadd(31.17, -110.02, -30.5, 0.94)
    pt3dadd(31.11, -110.23, -30.5, 0.94)
    pt3dadd(31.11, -110.39, -30.5, 0.94)
    pt3dadd(31.06, -110.6, -30.5, 0.94)
    pt3dadd(30.9, -110.81, -31, 0.94)
    pt3dadd(30.8, -110.92, -31, 0.94)
    pt3dadd(30.75, -111.02, -31, 0.94)
    pt3dadd(30.64, -111.13, -31, 0.94)
    pt3dadd(30.54, -111.23, -31, 0.94)
    pt3dadd(30.54, -111.76, -31, 0.94)
    pt3dadd(30.59, -111.86, -31, 0.94)
    pt3dadd(30.54, -112.18, -31, 0.94)
    pt3dadd(30.48, -112.34, -31, 0.94)
    pt3dadd(30.38, -112.55, -31, 0.94)
    pt3dadd(30.38, -112.71, -31, 0.94)
    pt3dadd(30.38, -112.97, -31, 0.94)
    pt3dadd(30.33, -113.23, -31, 0.94)
    pt3dadd(30.33, -113.65, -31, 0.94)
    pt3dadd(30.27, -113.76, -31, 0.94)
    pt3dadd(30.27, -113.91, -31, 0.94)
    pt3dadd(30.22, -114.02, -31, 0.94)
    pt3dadd(30.17, -114.12, -31, 0.94)
    pt3dadd(30.12, -114.28, -31, 0.94)
    pt3dadd(30.06, -114.39, -31, 0.94)
    pt3dadd(29.96, -114.65, -31, 0.94)
    pt3dadd(29.85, -114.76, -31, 0.94)
    pt3dadd(29.75, -114.86, -31, 0.94)
    pt3dadd(29.7, -115.02, -31, 0.94)
  }
}
proc shape3d_65() {
  dend[61] {
    pt3dadd(29.54, -115.12, -31, 0.94)
    pt3dadd(29.12, -115.54, -31, 0.94)
    pt3dadd(29.07, -115.75, -31, 0.94)
    pt3dadd(29.01, -115.91, -31, 0.94)
    pt3dadd(29.01, -116.12, -31, 0.94)
    pt3dadd(28.96, -117.28, -31, 0.94)
    pt3dadd(28.91, -117.49, -31, 0.94)
    pt3dadd(28.96, -117.59, -31, 0.94)
    pt3dadd(28.96, -117.75, -31, 0.94)
    pt3dadd(28.86, -118.01, -31, 0.94)
    pt3dadd(28.8, -118.12, -31, 0.94)
    pt3dadd(28.75, -118.28, -31, 0.94)
    pt3dadd(28.65, -118.38, -31, 0.94)
    pt3dadd(28.54, -118.49, -31, 0.94)
    pt3dadd(28.38, -118.65, -31, 0.94)
    pt3dadd(28.23, -118.8, -31, 0.94)
    pt3dadd(28.07, -118.91, -31, 0.94)
    pt3dadd(27.96, -118.96, -31, 0.94)
    pt3dadd(27.86, -119.07, -31, 0.94)
    pt3dadd(27.49, -119.22, -31, 0.94)
    pt3dadd(27.39, -119.43, -31, 0.94)
    pt3dadd(27.33, -119.54, -31, 0.94)
    pt3dadd(27.23, -119.7, -31, 0.94)
    pt3dadd(27.18, -119.85, -31, 0.94)
    pt3dadd(27.18, -120.33, -31, 0.94)
    pt3dadd(27.02, -120.43, -31, 0.94)
    pt3dadd(27.07, -120.54, -31, 0.94)
    pt3dadd(27.07, -120.8, -31, 0.94)
    pt3dadd(27.02, -121.01, -31, 0.94)
    pt3dadd(26.05, -121.97, -31.5, 0.94)
    pt3dadd(26.05, -122.18, -32, 0.94)
    pt3dadd(26.05, -122.34, -32, 0.94)
    pt3dadd(26.05, -122.71, -32.5, 0.94)
    pt3dadd(26, -123.34, -32, 0.94)
    pt3dadd(26.05, -123.45, -32, 0.94)
    pt3dadd(26, -123.6, -32, 0.94)
    pt3dadd(26, -123.81, -32, 0.94)
    pt3dadd(26, -123.92, -31.5, 0.94)
    pt3dadd(25.89, -124.13, -31.5, 0.94)
    pt3dadd(25.84, -124.29, -31.5, 0.94)
    pt3dadd(25.84, -124.44, -31.5, 0.94)
    pt3dadd(25.73, -124.6, -31, 0.94)
    pt3dadd(25.73, -124.71, -31, 0.94)
    pt3dadd(25.58, -124.92, -31, 0.94)
    pt3dadd(25.58, -125.07, -31, 0.94)
    pt3dadd(25.47, -125.28, -30.5, 0.94)
    pt3dadd(25.42, -125.5, -30.5, 0.94)
    pt3dadd(25.42, -125.65, -30.5, 0.94)
    pt3dadd(25.31, -125.86, -30.5, 0.94)
    pt3dadd(25.31, -126.02, -30.5, 0.94)
    pt3dadd(25.1, -126.23, -30.5, 0.94)
    pt3dadd(25.05, -126.39, -30.5, 0.94)
    pt3dadd(25, -126.49, -30.5, 0.94)
    pt3dadd(24.89, -126.6, -30.5, 0.94)
    pt3dadd(24.63, -126.86, -30.5, 0.94)
    pt3dadd(24.58, -127.02, -30.5, 0.94)
    pt3dadd(24.53, -127.18, -30.5, 0.94)
    pt3dadd(24.42, -127.28, -30.5, 0.94)
    pt3dadd(24.32, -127.39, -30.5, 0.94)
    pt3dadd(24.26, -127.49, -30.5, 0.94)
    pt3dadd(24.16, -127.6, -30.5, 0.94)
    pt3dadd(23.95, -127.76, -30.5, 0.94)
    pt3dadd(23.79, -127.81, -30.5, 0.94)
    pt3dadd(23.58, -127.91, -30.5, 0.94)
    pt3dadd(23.42, -128.02, -30.5, 0.94)
    pt3dadd(23.21, -128.12, -30.5, 0.94)
    pt3dadd(23.06, -128.18, -30.5, 0.94)
    pt3dadd(22.85, -128.28, -30.5, 0.94)
    pt3dadd(22.74, -128.33, -30.5, 0.94)
    pt3dadd(22.48, -128.38, -30.5, 0.94)
    pt3dadd(22.37, -128.49, -30.5, 0.94)
    pt3dadd(22.27, -128.65, -30.5, 0.94)
    pt3dadd(22.16, -128.69, -30.5, 0.94)
    pt3dadd(22.01, -128.75, -30.5, 0.94)
    pt3dadd(21.85, -128.86, -30.5, 0.94)
    pt3dadd(21.74, -128.91, -30.5, 0.94)
    pt3dadd(21.53, -129.12, -30.5, 0.94)
    pt3dadd(21.43, -129.18, -30.5, 0.94)
    pt3dadd(21.32, -129.28, -30.5, 0.94)
    pt3dadd(21.22, -129.38, -30.5, 0.94)
    pt3dadd(21.06, -129.54, -30.5, 0.94)
    pt3dadd(20.9, -129.65, -30.5, 0.94)
    pt3dadd(20.8, -129.69, -30.5, 0.94)
    pt3dadd(20.69, -129.81, -30.5, 0.94)
    pt3dadd(20.54, -129.91, -30.5, 0.94)
    pt3dadd(20.48, -130.02, -30.5, 0.94)
    pt3dadd(20.38, -130.16, -30.5, 0.94)
    pt3dadd(20.27, -130.38, -30.5, 0.94)
    pt3dadd(20.22, -130.49, -30.5, 0.94)
    pt3dadd(20.05, -130.65, -30.5, 0.94)
    pt3dadd(19.96, -130.75, -30.5, 0.94)
    pt3dadd(19.8, -130.91, -30.5, 0.94)
    pt3dadd(19.7, -130.96, -30.5, 0.94)
    pt3dadd(19.59, -131.01, -30.5, 0.94)
    pt3dadd(19.48, -131.07, -30.5, 0.94)
    pt3dadd(19.38, -131.12, -30.5, 0.94)
    pt3dadd(19.01, -131.28, -30.5, 0.94)
    pt3dadd(18.8, -131.28, -30.5, 0.94)
    pt3dadd(18.48, -131.44, -30.5, 0.94)
    pt3dadd(18.44, -131.54, -30.5, 0.94)
    pt3dadd(18.23, -131.59, -30.5, 0.94)
    pt3dadd(18.07, -131.69, -30.5, 0.94)
    pt3dadd(17.86, -131.69, -30.5, 0.94)
    pt3dadd(17.7, -131.8, -30.5, 0.94)
    pt3dadd(17.48, -131.86, -30.5, 0.94)
    pt3dadd(17.39, -131.91, -30.5, 0.94)
    pt3dadd(17.23, -131.91, -30.5, 0.94)
    pt3dadd(17.12, -132.01, -30.5, 0.94)
    pt3dadd(17.02, -132.07, -30.5, 0.94)
    pt3dadd(16.76, -132.07, -30.5, 0.94)
    pt3dadd(16.6, -132.12, -30.5, 0.94)
    pt3dadd(16.39, -132.12, -30.5, 0.94)
    pt3dadd(16.28, -132.22, -30.5, 0.94)
    pt3dadd(16.13, -132.22, -30.5, 0.94)
    pt3dadd(15.92, -132.28, -30.5, 0.94)
    pt3dadd(15.81, -132.38, -30.5, 0.94)
    pt3dadd(15.6, -132.49, -30.5, 0.94)
    pt3dadd(15.44, -132.54, -30.5, 0.94)
    pt3dadd(15.29, -132.59, -30.5, 0.94)
    pt3dadd(15.18, -132.63, -30.5, 0.94)
    pt3dadd(14.97, -132.8, -30.5, 0.94)
    pt3dadd(14.81, -132.85, -30.5, 0.94)
    pt3dadd(14.71, -132.91, -30.5, 0.94)
    pt3dadd(14.6, -133.01, -30.5, 0.94)
    pt3dadd(14.45, -133.16, -30.5, 0.94)
    pt3dadd(14.34, -133.38, -30.5, 0.94)
    pt3dadd(12.47, -134.78, -30, 0.94)
    pt3dadd(12.42, -134.99, -30, 0.94)
    pt3dadd(12.36, -135.26, -30, 0.94)
    pt3dadd(12.26, -135.36, -30, 0.94)
    pt3dadd(12.1, -135.52, -30, 0.94)
    pt3dadd(12, -135.62, -30, 0.94)
    pt3dadd(11.73, -135.88, -29.5, 0.94)
    pt3dadd(11.63, -135.99, -30, 0.94)
    pt3dadd(11.52, -136.04, -30, 0.94)
    pt3dadd(11.42, -136.1, -30.5, 0.94)
    pt3dadd(11.37, -136.19, -30.5, 0.94)
    pt3dadd(11.26, -136.31, -30.5, 0.94)
    pt3dadd(11.21, -136.41, -30.5, 0.94)
    pt3dadd(11.1, -136.41, -30.5, 0.94)
    pt3dadd(11, -136.57, -30.5, 0.94)
    pt3dadd(10.89, -136.66, -30.5, 0.94)
    pt3dadd(10.74, -136.94, -31, 0.94)
    pt3dadd(10.58, -137.1, -31, 0.94)
    pt3dadd(10.42, -137.19, -31, 0.94)
    pt3dadd(10.26, -137.25, -31, 0.94)
    pt3dadd(10.16, -137.36, -31, 0.94)
    pt3dadd(10, -137.62, -31, 0.94)
    pt3dadd(9.9, -137.83, -31, 0.94)
    pt3dadd(9.78, -138.09, -31, 0.94)
    pt3dadd(9.74, -138.25, -31, 0.94)
    pt3dadd(9.69, -138.36, -31, 0.94)
    pt3dadd(9.64, -138.51, -31, 0.94)
    pt3dadd(9.48, -138.72, -31, 0.94)
    pt3dadd(9.52, -138.83, -31, 0.94)
    pt3dadd(9.52, -139.83, -31, 0.94)
    pt3dadd(9.48, -139.99, -31, 0.94)
    pt3dadd(9.48, -140.19, -31, 0.94)
    pt3dadd(9.32, -140.35, -31, 0.94)
    pt3dadd(9.22, -140.46, -31, 0.94)
    pt3dadd(9.01, -140.56, -31, 0.94)
    pt3dadd(8.85, -140.62, -30.5, 0.94)
    pt3dadd(8.64, -140.72, -30.5, 0.94)
    pt3dadd(8.48, -140.78, -30.5, 0.94)
    pt3dadd(8.38, -140.83, -30.5, 0.94)
    pt3dadd(8.11, -140.83, -30.5, 0.94)
    pt3dadd(8.06, -140.99, -30, 0.94)
    pt3dadd(7.96, -141.04, -30, 0.94)
    pt3dadd(7.69, -141.19, -30, 0.94)
    pt3dadd(7.59, -141.35, -30, 0.94)
    pt3dadd(7.43, -141.46, -30, 0.94)
    pt3dadd(6.96, -141.93, -30, 0.94)
    pt3dadd(6.85, -142.09, -30, 0.94)
    pt3dadd(6.75, -142.25, -30, 0.94)
    pt3dadd(6.64, -142.4, -30, 0.94)
    pt3dadd(6.59, -142.51, -30, 0.94)
    pt3dadd(6.49, -142.61, -30, 0.94)
    pt3dadd(6.49, -142.77, -30, 0.94)
    pt3dadd(6.43, -142.97, -30, 0.94)
    pt3dadd(6.38, -143.13, -30, 0.94)
    pt3dadd(6.28, -143.35, -30, 0.94)
    pt3dadd(6.22, -143.51, -30, 0.94)
    pt3dadd(6.22, -143.66, -30, 0.94)
    pt3dadd(6.17, -143.93, -30, 0.94)
    pt3dadd(6.17, -144.13, -30, 0.94)
    pt3dadd(6.12, -144.4, -30, 0.94)
    pt3dadd(6.12, -144.72, -30, 0.94)
    pt3dadd(6.17, -144.88, -30, 0.94)
    pt3dadd(6.17, -145.4, -30, 0.94)
    pt3dadd(5.83, -147.3, -31, 0.94)
    pt3dadd(5.78, -147.4, -31, 0.94)
    pt3dadd(5.73, -147.56, -31, 0.94)
    pt3dadd(5.73, -147.72, -31, 0.94)
    pt3dadd(5.67, -147.93, -31, 0.94)
    pt3dadd(5.57, -148.09, -31.5, 0.94)
    pt3dadd(5.57, -148.4, -31.5, 0.94)
    pt3dadd(5.62, -148.51, -31.5, 0.94)
    pt3dadd(5.67, -148.61, -31.5, 0.94)
    pt3dadd(5.73, -148.72, -31.5, 0.94)
    pt3dadd(5.88, -148.87, -32, 0.94)
    pt3dadd(5.99, -148.93, -32, 0.94)
    pt3dadd(6.04, -149.08, -32, 0.94)
    pt3dadd(6.15, -149.19, -32, 0.94)
    pt3dadd(6.25, -149.3, -32, 0.94)
    pt3dadd(6.3, -149.44, -32, 0.94)
    pt3dadd(6.3, -149.66, -32, 0.94)
    pt3dadd(6.36, -149.87, -32, 0.94)
    pt3dadd(6.41, -149.97, -32, 0.94)
    pt3dadd(6.36, -150.13, -32, 0.94)
    pt3dadd(6.36, -151.35, -32, 0.94)
    pt3dadd(6.51, -151.5, -32, 0.94)
    pt3dadd(6.51, -151.66, -32, 0.94)
    pt3dadd(6.62, -151.71, -32.5, 0.94)
    pt3dadd(6.67, -151.87, -32.5, 0.94)
    pt3dadd(6.88, -152.08, -32.5, 0.94)
    pt3dadd(7.04, -152.19, -32.5, 0.94)
    pt3dadd(7.14, -152.29, -32.5, 0.94)
    pt3dadd(7.25, -152.29, -32.5, 0.94)
    pt3dadd(7.4, -152.44, -32.5, 0.94)
    pt3dadd(7.46, -152.55, -32.5, 0.94)
    pt3dadd(7.61, -152.66, -32.5, 0.94)
    pt3dadd(7.72, -152.76, -32.5, 0.94)
    pt3dadd(7.82, -152.87, -32.5, 0.94)
    pt3dadd(7.88, -152.97, -32.5, 0.94)
    pt3dadd(7.98, -153.13, -32.5, 0.94)
    pt3dadd(8.14, -153.19, -32.5, 0.94)
    pt3dadd(8.14, -153.34, -32.5, 0.94)
    pt3dadd(8.19, -153.5, -32.5, 0.94)
    pt3dadd(8.3, -153.55, -32.5, 0.94)
    pt3dadd(8.4, -153.61, -32.5, 0.94)
    pt3dadd(8.51, -153.66, -32.5, 0.94)
    pt3dadd(8.56, -153.82, -32.5, 0.94)
    pt3dadd(8.66, -153.91, -32.5, 0.94)
    pt3dadd(8.77, -154.03, -32.5, 0.94)
    pt3dadd(8.86, -154.08, -32.5, 0.94)
    pt3dadd(9.02, -154.13, -32.5, 0.94)
    pt3dadd(9.24, -154.24, -32.5, 0.94)
    pt3dadd(9.4, -154.29, -32.5, 0.94)
    pt3dadd(9.61, -154.34, -32.5, 0.94)
    pt3dadd(9.77, -154.38, -33, 0.94)
    pt3dadd(9.98, -154.44, -33, 0.94)
    pt3dadd(10.34, -154.44, -33.5, 0.94)
    pt3dadd(10.45, -154.44, -33.5, 0.94)
    pt3dadd(10.55, -154.44, -33.5, 0.94)
    pt3dadd(10.71, -154.44, -33.5, 0.94)
    pt3dadd(10.87, -154.34, -33.5, 0.94)
    pt3dadd(10.97, -154.38, -33.5, 0.94)
    pt3dadd(11.13, -154.34, -34, 0.94)
    pt3dadd(11.34, -154.34, -34, 0.94)
  }
}
proc shape3d_66() {
  dend[61] {
    pt3dadd(11.45, -154.44, -34, 0.94)
    pt3dadd(11.45, -154.6, -34, 0.94)
    pt3dadd(11.5, -154.81, -34, 0.94)
    pt3dadd(11.66, -154.97, -34, 0.94)
    pt3dadd(11.76, -155.03, -34, 0.94)
    pt3dadd(11.81, -155.24, -34, 0.94)
    pt3dadd(11.92, -155.29, -34, 0.94)
    pt3dadd(11.97, -155.5, -34, 0.94)
    pt3dadd(12.08, -155.66, -34, 0.94)
    pt3dadd(12.18, -155.76, -34, 0.94)
    pt3dadd(12.29, -155.97, -34, 0.94)
    pt3dadd(12.23, -156.13, -34, 0.94)
    pt3dadd(12.34, -156.13, -34, 0.94)
    pt3dadd(12.39, -156.29, -34, 0.94)
    pt3dadd(12.5, -156.38, -34, 0.94)
    pt3dadd(12.55, -156.6, -34, 0.94)
    pt3dadd(12.55, -156.76, -34, 0.94)
    pt3dadd(12.6, -156.87, -34, 0.94)
    pt3dadd(12.71, -156.91, -34, 0.94)
    pt3dadd(12.76, -157.02, -34, 0.94)
    pt3dadd(12.86, -157.13, -34, 0.94)
    pt3dadd(12.86, -157.34, -34, 0.94)
    pt3dadd(12.66, -158.37, -34.5, 0.94)
    pt3dadd(12.61, -158.52, -34.5, 0.94)
    pt3dadd(12.61, -158.63, -34.5, 0.94)
    pt3dadd(12.51, -158.72, -34.5, 0.94)
    pt3dadd(12.4, -158.84, -34.5, 0.94)
    pt3dadd(12.3, -159.05, -34.5, 0.94)
    pt3dadd(12.3, -159.21, -35, 0.94)
    pt3dadd(12.24, -159.41, -35, 0.94)
    pt3dadd(12.24, -159.79, -35, 0.94)
    pt3dadd(12.3, -160, -35, 0.94)
    pt3dadd(12.35, -160.15, -35, 0.94)
    pt3dadd(12.35, -160.36, -35, 0.94)
    pt3dadd(12.35, -160.47, -35, 0.94)
    pt3dadd(12.45, -160.57, -35, 0.94)
    pt3dadd(12.35, -160.72, -35, 0.94)
    pt3dadd(12.19, -160.84, -35, 0.94)
    pt3dadd(12.14, -161.1, -35, 0.94)
    pt3dadd(12.03, -161.15, -35.5, 0.94)
    pt3dadd(11.88, -161.26, -35.5, 0.94)
    pt3dadd(11.72, -161.31, -35.5, 0.94)
    pt3dadd(11.51, -161.31, -35.5, 0.94)
    pt3dadd(11.46, -161.36, -36, 0.94)
    pt3dadd(11.35, -161.41, -36, 0.94)
    pt3dadd(11.19, -161.47, -36, 0.94)
    pt3dadd(10.98, -161.52, -36.5, 0.94)
    pt3dadd(10.88, -161.57, -36.5, 0.94)
    pt3dadd(10.72, -161.68, -36.5, 0.94)
    pt3dadd(10.62, -161.78, -36.5, 0.94)
    pt3dadd(10.46, -161.88, -36.5, 0.94)
    pt3dadd(10.19, -162.15, -36.5, 0.94)
    pt3dadd(10.03, -162.26, -36.5, 0.94)
    pt3dadd(9.99, -162.36, -36.5, 0.94)
    pt3dadd(9.83, -162.47, -36.5, 0.94)
    pt3dadd(9.67, -162.57, -36.5, 0.94)
    pt3dadd(9.51, -162.72, -37, 0.94)
    pt3dadd(9.3, -162.72, -37, 0.94)
    pt3dadd(9.3, -162.84, -37, 0.94)
    pt3dadd(9.15, -162.88, -37, 0.94)
    pt3dadd(8.99, -162.88, -37, 0.94)
    pt3dadd(8.83, -163.05, -37, 0.94)
    pt3dadd(8.67, -163.05, -37, 0.94)
    pt3dadd(8.52, -163.1, -37, 0.94)
    pt3dadd(8.31, -163.19, -37, 0.94)
    pt3dadd(8.15, -163.26, -37.5, 0.94)
    pt3dadd(8.05, -163.36, -37.5, 0.94)
    pt3dadd(7.89, -163.36, -37.5, 0.94)
    pt3dadd(7.68, -163.47, -37.5, 0.94)
    pt3dadd(7.57, -163.62, -37.5, 0.94)
    pt3dadd(7.47, -163.68, -37.5, 0.94)
    pt3dadd(7.36, -163.78, -37.5, 0.94)
    pt3dadd(7.15, -163.94, -38, 0.94)
    pt3dadd(7, -163.99, -38, 0.94)
    pt3dadd(7, -164.15, -38, 0.94)
    pt3dadd(6.89, -164.25, -38, 0.94)
    pt3dadd(6.84, -164.41, -38.5, 0.94)
    pt3dadd(6.73, -164.62, -38.5, 0.94)
    pt3dadd(6.68, -164.78, -38.5, 0.94)
    pt3dadd(6.63, -164.89, -38.5, 0.94)
    pt3dadd(6.52, -165.04, -38.5, 0.94)
    pt3dadd(6.42, -165.15, -38.5, 0.94)
    pt3dadd(6.37, -165.25, -38.5, 0.94)
    pt3dadd(6.26, -165.41, -38.5, 0.94)
    pt3dadd(6.1, -165.57, -38.5, 0.94)
    pt3dadd(6, -165.78, -38.5, 0.94)
    pt3dadd(5.89, -165.99, -38.5, 0.94)
    pt3dadd(5.84, -166.15, -38.5, 0.94)
    pt3dadd(5.84, -166.41, -39, 0.94)
    pt3dadd(5.79, -166.62, -39, 0.94)
    pt3dadd(5.79, -166.99, -39, 0.94)
    pt3dadd(5.79, -167.15, -39, 0.94)
    pt3dadd(5.79, -167.46, -39, 0.94)
    pt3dadd(5.74, -167.67, -39, 0.94)
    pt3dadd(5.63, -167.72, -39, 0.94)
    pt3dadd(5.37, -167.99, -39, 0.94)
    pt3dadd(5.21, -168.14, -39, 0.94)
    pt3dadd(5.11, -168.25, -39, 0.94)
    pt3dadd(4.95, -168.41, -39, 0.94)
    pt3dadd(4.84, -168.51, -39, 0.94)
    pt3dadd(4.84, -168.67, -39, 0.94)
    pt3dadd(4.79, -168.88, -39, 0.94)
    pt3dadd(4.79, -169.14, -39, 0.94)
    pt3dadd(4.9, -169.25, -39, 0.94)
    pt3dadd(4.95, -169.41, -39, 0.94)
    pt3dadd(5.11, -169.41, -39, 0.94)
    pt3dadd(5.53, -169.41, -39, 0.94)
    pt3dadd(5.63, -169.46, -39, 0.94)
    pt3dadd(6, -169.46, -39, 0.94)
    pt3dadd(6.1, -169.41, -39, 0.94)
    pt3dadd(7.26, -169.23, -40, 0.94)
    pt3dadd(7.26, -169.34, -40.5, 0.94)
    pt3dadd(7.31, -169.55, -40.5, 0.94)
    pt3dadd(7.31, -169.81, -41, 0.94)
    pt3dadd(7.37, -169.97, -41, 0.94)
    pt3dadd(7.37, -170.23, -41, 0.94)
    pt3dadd(7.42, -170.34, -41.5, 0.94)
    pt3dadd(7.73, -170.34, -41.5, 0.94)
    pt3dadd(7.73, -170.39, -42, 0.94)
    pt3dadd(7.89, -170.49, -42.5, 0.94)
    pt3dadd(7.94, -170.65, -42.5, 0.94)
    pt3dadd(8.05, -170.76, -42.5, 0.94)
    pt3dadd(8.1, -170.97, -42.5, 0.94)
    pt3dadd(8.15, -171.07, -42.5, 0.94)
    pt3dadd(8.31, -171.28, -42.5, 0.94)
    pt3dadd(8.31, -171.44, -42.5, 0.94)
    pt3dadd(8.36, -171.6, -42.5, 0.94)
    pt3dadd(8.47, -171.76, -42.5, 0.94)
    pt3dadd(8.52, -171.86, -43, 0.94)
    pt3dadd(8.57, -172.02, -43, 0.94)
    pt3dadd(8.63, -172.18, -43, 0.94)
    pt3dadd(8.84, -172.33, -43, 0.94)
    pt3dadd(8.84, -172.54, -43, 0.94)
    pt3dadd(8.99, -172.65, -43, 0.94)
    pt3dadd(9.15, -172.96, -43, 0.94)
    pt3dadd(9.19, -173.12, -43, 0.94)
    pt3dadd(9.19, -173.38, -43, 0.94)
    pt3dadd(9.05, -173.54, -43, 0.94)
    pt3dadd(8.99, -173.7, -43, 0.94)
    pt3dadd(8.84, -173.86, -43, 0.94)
    pt3dadd(8.73, -174.02, -43, 0.94)
    pt3dadd(8.73, -174.17, -43, 0.94)
    pt3dadd(8.63, -174.28, -43, 0.94)
    pt3dadd(8.63, -174.54, -43, 0.94)
    pt3dadd(8.57, -174.7, -43, 0.94)
    pt3dadd(8.57, -175.22, -43, 0.94)
    pt3dadd(8.52, -175.38, -43, 0.94)
    pt3dadd(8.52, -175.65, -43, 0.94)
    pt3dadd(8.47, -175.91, -43, 0.94)
    pt3dadd(8.47, -176.59, -43, 0.94)
    pt3dadd(8.42, -176.91, -43, 0.94)
    pt3dadd(8.42, -177.59, -43, 0.94)
    pt3dadd(8.42, -177.7, -43, 0.94)
    pt3dadd(8.47, -177.8, -43, 0.94)
    pt3dadd(8.52, -177.96, -43, 0.94)
  }
  dend[62] {pt3dclear()
    pt3dadd(32.31, -94.47, -27.5, 0.94)
    pt3dadd(31.69, -94.52, -28, 0.94)
    pt3dadd(31.69, -93.89, -28.5, 0.94)
    pt3dadd(31.63, -93.78, -28.5, 0.94)
    pt3dadd(31.58, -93.57, -28.5, 0.94)
    pt3dadd(31.48, -93.41, -28.5, 0.94)
    pt3dadd(31.27, -93.41, -29, 0.94)
    pt3dadd(31.16, -93.52, -29.5, 0.94)
    pt3dadd(30.95, -93.62, -29.5, 0.94)
    pt3dadd(30.79, -93.68, -29.5, 0.94)
    pt3dadd(30.69, -93.78, -29.5, 0.94)
    pt3dadd(30.58, -93.89, -29.5, 0.94)
    pt3dadd(30.58, -94.73, -29.5, 0.94)
    pt3dadd(30.69, -94.83, -30, 0.94)
    pt3dadd(30.69, -94.99, -30, 0.94)
    pt3dadd(30.74, -95.15, -30, 0.94)
    pt3dadd(30.74, -95.57, -30, 0.94)
    pt3dadd(30.64, -95.73, -30, 0.94)
    pt3dadd(30.48, -95.78, -30.5, 0.94)
    pt3dadd(30.37, -95.94, -30.5, 0.94)
    pt3dadd(30.22, -96.04, -30.5, 0.94)
    pt3dadd(30.01, -96.09, -30.5, 0.94)
    pt3dadd(29.85, -96.15, -30.5, 0.94)
    pt3dadd(29.64, -96.25, -30.5, 0.94)
    pt3dadd(29.17, -96.25, -31, 0.94)
    pt3dadd(29.06, -96.2, -31, 0.94)
    pt3dadd(28.85, -96.15, -31, 0.94)
    pt3dadd(28.64, -96.09, -31, 0.94)
    pt3dadd(28.43, -96.04, -31.5, 0.94)
    pt3dadd(28.33, -95.94, -31.5, 0.94)
    pt3dadd(28.17, -95.83, -32, 0.94)
    pt3dadd(28.06, -95.83, -32.5, 0.94)
    pt3dadd(27.96, -95.78, -32.5, 0.94)
    pt3dadd(27.86, -95.67, -32.5, 0.94)
    pt3dadd(27.7, -95.52, -32.5, 0.94)
    pt3dadd(27.49, -95.46, -33, 0.94)
    pt3dadd(27.38, -95.41, -33, 0.94)
    pt3dadd(27.17, -95.36, -33, 0.94)
    pt3dadd(27.07, -95.31, -33, 0.94)
    pt3dadd(26.86, -95.41, -33, 0.94)
    pt3dadd(26.75, -95.46, -33, 0.94)
    pt3dadd(26.7, -95.57, -34, 0.94)
    pt3dadd(26.7, -95.88, -34, 0.94)
    pt3dadd(26.75, -96.09, -34.5, 0.94)
    pt3dadd(26.86, -96.25, -34.5, 0.94)
    pt3dadd(26.86, -96.46, -34.5, 0.94)
    pt3dadd(26.91, -96.62, -34.5, 0.94)
    pt3dadd(26.86, -96.83, -35, 0.94)
    pt3dadd(26.81, -96.99, -35, 0.94)
    pt3dadd(26.7, -97.09, -35.5, 0.94)
    pt3dadd(26.6, -97.15, -35.5, 0.94)
    pt3dadd(26.6, -97.25, -36, 0.94)
    pt3dadd(26.49, -97.36, -36, 0.94)
    pt3dadd(26.44, -97.51, -36, 0.94)
    pt3dadd(26.39, -97.62, -36, 0.94)
    pt3dadd(26.33, -97.83, -36.5, 0.94)
    pt3dadd(26.18, -98.09, -36.5, 0.94)
    pt3dadd(26.07, -98.09, -36.5, 0.94)
    pt3dadd(25.91, -98.14, -36.5, 0.94)
    pt3dadd(25.76, -98.09, -36.5, 0.94)
    pt3dadd(25.65, -98.04, -37, 0.94)
    pt3dadd(25.55, -97.99, -37, 0.94)
    pt3dadd(25.49, -97.78, -37, 0.94)
    pt3dadd(25.39, -97.67, -37, 0.94)
    pt3dadd(25.28, -97.51, -37, 0.94)
    pt3dadd(25.28, -97.36, -37.5, 0.94)
    pt3dadd(25.23, -97.15, -37.5, 0.94)
    pt3dadd(25.23, -96.93, -37.5, 0.94)
    pt3dadd(25.44, -96.72, -37.5, 0.94)
    pt3dadd(25.55, -96.62, -37.5, 0.94)
    pt3dadd(25.76, -96.36, -37.5, 0.94)
    pt3dadd(25.91, -96.2, -37.5, 0.94)
    pt3dadd(25.97, -96.09, -37.5, 0.94)
    pt3dadd(26.02, -95.94, -37.5, 0.94)
    pt3dadd(26.07, -95.78, -37.5, 0.94)
    pt3dadd(26.12, -95.57, -37.5, 0.94)
    pt3dadd(26.18, -95.41, -37.5, 0.94)
    pt3dadd(26.02, -95.36, -37.5, 0.94)
    pt3dadd(25.86, -95.31, -37.5, 0.94)
    pt3dadd(25.76, -95.25, -37.5, 0.94)
    pt3dadd(25.49, -95.41, -37.5, 0.94)
    pt3dadd(25.23, -95.46, -37.5, 0.94)
    pt3dadd(24.97, -95.62, -37.5, 0.94)
    pt3dadd(24.71, -95.88, -37.5, 0.94)
    pt3dadd(24.6, -95.99, -37.5, 0.94)
    pt3dadd(24.5, -96.09, -37.5, 0.94)
    pt3dadd(24.5, -97.2, -38, 0.94)
    pt3dadd(24.34, -97.2, -38, 0.94)
    pt3dadd(24.18, -97.3, -38.5, 0.94)
    pt3dadd(24.08, -97.36, -38.5, 0.94)
    pt3dadd(23.76, -97.36, -39.5, 0.94)
    pt3dadd(23.66, -97.41, -39.5, 0.94)
    pt3dadd(23.29, -97.41, -40.5, 0.94)
    pt3dadd(23.13, -97.51, -40.5, 0.94)
  }
}
proc shape3d_67() {
  dend[62] {
    pt3dadd(22.97, -97.62, -40.5, 0.94)
    pt3dadd(22.87, -97.67, -40.5, 0.94)
    pt3dadd(22.71, -97.72, -40.5, 0.94)
    pt3dadd(22.55, -97.78, -40.5, 0.94)
    pt3dadd(22.4, -97.93, -40.5, 0.94)
    pt3dadd(22.19, -97.93, -40.5, 0.94)
    pt3dadd(22.19, -98.09, -40.5, 0.94)
    pt3dadd(22.03, -98.25, -40.5, 0.94)
    pt3dadd(21.82, -98.35, -41, 0.94)
    pt3dadd(21.56, -98.35, -41, 0.94)
    pt3dadd(21.4, -98.41, -41, 0.94)
    pt3dadd(21.08, -98.41, -41, 0.94)
    pt3dadd(20.87, -98.25, -41, 0.94)
    pt3dadd(20.56, -98.3, -41, 0.94)
    pt3dadd(20.03, -98.3, -41, 0.94)
    pt3dadd(19.82, -98.25, -41, 0.94)
    pt3dadd(19.46, -98.25, -41, 0.94)
    pt3dadd(19.25, -98.3, -41, 0.94)
    pt3dadd(19.04, -98.3, -41, 0.94)
    pt3dadd(18.88, -98.35, -41, 0.94)
    pt3dadd(18.77, -98.35, -41, 0.94)
    pt3dadd(18.62, -98.46, -41, 0.94)
    pt3dadd(18.46, -98.56, -41, 0.94)
    pt3dadd(18.3, -98.62, -41.5, 0.94)
    pt3dadd(17.78, -99.14, -41.5, 0.94)
    pt3dadd(17.57, -99.25, -41.5, 0.94)
    pt3dadd(17.41, -99.25, -41.5, 0.94)
    pt3dadd(17.25, -99.3, -42, 0.94)
    pt3dadd(17.04, -99.3, -42, 0.94)
    pt3dadd(16.62, -99.3, -42, 0.94)
    pt3dadd(16.46, -99.14, -42, 0.94)
    pt3dadd(16.04, -99.14, -42, 0.94)
    pt3dadd(15.52, -99.04, -42, 0.94)
    pt3dadd(15.31, -98.98, -42, 0.94)
    pt3dadd(15.05, -98.93, -42, 0.94)
    pt3dadd(14.73, -98.93, -42, 0.94)
    pt3dadd(14.68, -98.83, -42, 0.94)
    pt3dadd(14.52, -98.77, -42, 0.94)
    pt3dadd(14.42, -98.72, -42, 0.94)
    pt3dadd(14, -98.72, -42, 0.94)
    pt3dadd(13.84, -98.67, -42.5, 0.94)
    pt3dadd(13.52, -98.67, -42.5, 0.94)
    pt3dadd(13.42, -98.77, -42.5, 0.94)
    pt3dadd(13.26, -98.83, -42.5, 0.94)
    pt3dadd(13.05, -98.88, -42.5, 0.94)
    pt3dadd(12.89, -98.88, -42.5, 0.94)
    pt3dadd(12.79, -98.98, -42.5, 0.94)
    pt3dadd(12.53, -99.14, -42.5, 0.94)
    pt3dadd(12.37, -99.25, -42.5, 0.94)
    pt3dadd(12.21, -99.25, -43, 0.94)
    pt3dadd(12.05, -99.3, -43, 0.94)
    pt3dadd(11.9, -99.3, -43, 0.94)
    pt3dadd(11.74, -99.35, -43, 0.94)
    pt3dadd(11.27, -99.35, -43, 0.94)
    pt3dadd(11.11, -99.41, -43, 0.94)
    pt3dadd(10.53, -99.41, -43, 0.94)
    pt3dadd(10.43, -99.35, -43, 0.94)
    pt3dadd(10.32, -99.35, -43, 0.94)
    pt3dadd(10.11, -99.41, -43, 0.94)
    pt3dadd(9.69, -99.41, -43, 0.94)
    pt3dadd(9.52, -99.46, -43, 0.94)
    pt3dadd(9.38, -99.56, -43, 0.94)
    pt3dadd(9.27, -99.67, -43, 0.94)
    pt3dadd(9.17, -99.72, -43, 0.94)
    pt3dadd(8.96, -99.88, -43, 0.94)
    pt3dadd(8.85, -99.98, -43, 0.94)
  }
  dend[63] {pt3dclear()
    pt3dadd(-42.64, 126.01, 15.5, 0.89)
    pt3dadd(-44.25, 125.61, -26.5, 1)
    pt3dadd(-44.35, 125.61, -26.5, 1)
    pt3dadd(-44.41, 125.72, -26.5, 1)
    pt3dadd(-44.51, 125.82, -26.5, 1)
    pt3dadd(-44.51, 125.98, -26.5, 1)
    pt3dadd(-44.62, 126.03, -26.5, 1)
    pt3dadd(-44.67, 126.14, -26.5, 1)
    pt3dadd(-44.77, 126.19, -26.5, 1)
    pt3dadd(-44.83, 126.3, -26.5, 1)
    pt3dadd(-44.93, 126.45, -26.5, 1)
    pt3dadd(-45.04, 126.66, -26, 1)
    pt3dadd(-45.04, 127.09, -26, 1)
    pt3dadd(-44.98, 127.24, -26, 1)
    pt3dadd(-44.88, 127.4, -26, 1)
    pt3dadd(-44.93, 127.51, -26, 1)
    pt3dadd(-44.93, 127.66, -26, 1)
    pt3dadd(-44.88, 127.82, -26, 1)
    pt3dadd(-44.88, 128.13, -26, 1)
    pt3dadd(-44.93, 128.29, -26, 1)
    pt3dadd(-45.04, 128.4, -26, 1)
    pt3dadd(-45.09, 128.56, -26.5, 1)
    pt3dadd(-45.14, 128.72, -26.5, 1)
    pt3dadd(-45.19, 128.87, -27, 1)
    pt3dadd(-45.25, 128.93, -27.5, 1)
    pt3dadd(-45.35, 128.87, -27.5, 1)
    pt3dadd(-45.46, 128.66, -28.5, 1)
    pt3dadd(-45.51, 128.56, -28.5, 1)
    pt3dadd(-45.61, 128.4, -28.5, 1)
    pt3dadd(-45.77, 128.13, -29, 1)
    pt3dadd(-45.82, 127.98, -29, 1)
    pt3dadd(-45.88, 127.87, -29.5, 1)
    pt3dadd(-45.98, 127.77, -29.5, 1)
    pt3dadd(-46.03, 127.66, -30, 1)
    pt3dadd(-46.19, 127.61, -30, 1)
    pt3dadd(-46.3, 127.77, -30, 1)
    pt3dadd(-46.4, 127.77, -30, 1)
    pt3dadd(-46.51, 127.82, -30, 1)
    pt3dadd(-46.56, 127.93, -30, 1)
    pt3dadd(-46.66, 127.98, -30, 1)
    pt3dadd(-46.82, 128.08, -30, 1)
    pt3dadd(-46.93, 128.13, -30, 1)
    pt3dadd(-47.03, 128.29, -30, 1)
    pt3dadd(-47.14, 128.24, -30, 1)
    pt3dadd(-47.45, 128.44, -30.5, 1)
    pt3dadd(-47.5, 128.5, -31, 1)
    pt3dadd(-47.56, 128.61, -31, 1)
    pt3dadd(-47.71, 128.77, -31.5, 1)
    pt3dadd(-47.82, 128.82, -31.5, 1)
    pt3dadd(-47.98, 128.93, -32, 1)
    pt3dadd(-47.98, 129.13, -32, 1)
    pt3dadd(-48.13, 129.29, -32, 1)
    pt3dadd(-48.34, 129.29, -32, 1)
    pt3dadd(-48.5, 129.35, -32.5, 1)
    pt3dadd(-48.76, 129.61, -32.5, 1)
    pt3dadd(-48.87, 129.71, -32.5, 1)
    pt3dadd(-49.03, 129.82, -32.5, 1)
    pt3dadd(-49.13, 129.82, -32.5, 1)
    pt3dadd(-49.24, 129.91, -32.5, 1)
    pt3dadd(-49.34, 129.97, -32.5, 1)
    pt3dadd(-49.45, 130.08, -32.5, 1)
    pt3dadd(-49.6, 130.13, -32.5, 1)
    pt3dadd(-49.81, 130.08, -33, 1)
    pt3dadd(-49.97, 130.03, -33, 1)
    pt3dadd(-50.18, 129.91, -33, 1)
    pt3dadd(-50.44, 129.91, -33, 1)
    pt3dadd(-50.71, 130.03, -33, 1)
    pt3dadd(-50.81, 130.08, -33, 1)
    pt3dadd(-50.92, 130.19, -33, 1)
    pt3dadd(-51.13, 130.29, -33, 1)
    pt3dadd(-51.23, 130.44, -33, 1)
    pt3dadd(-51.34, 130.5, -33, 1)
    pt3dadd(-51.39, 130.66, -33, 1)
    pt3dadd(-51.49, 130.77, -33, 1)
    pt3dadd(-51.55, 130.91, -33, 1)
    pt3dadd(-51.65, 131.08, -33, 1)
    pt3dadd(-51.7, 131.24, -33, 1)
    pt3dadd(-51.76, 131.4, -33, 1)
    pt3dadd(-51.81, 131.5, -33, 1)
    pt3dadd(-51.81, 131.61, -33, 1)
    pt3dadd(-51.86, 131.76, -33, 1)
    pt3dadd(-52.85, 131.71, -33, 1)
    pt3dadd(-52.95, 131.81, -33, 1)
    pt3dadd(-53.06, 131.87, -33, 1)
    pt3dadd(-53.11, 132.02, -33, 1)
    pt3dadd(-53.21, 132.13, -33, 1)
    pt3dadd(-53.42, 132.22, -33, 1)
    pt3dadd(-53.53, 132.38, -33, 1)
    pt3dadd(-53.63, 132.6, -33.5, 1)
    pt3dadd(-53.79, 132.71, -33.5, 1)
    pt3dadd(-53.9, 132.81, -33.5, 1)
    pt3dadd(-54.05, 132.87, -34, 1)
    pt3dadd(-54.16, 132.97, -34, 1)
    pt3dadd(-54.32, 133.13, -34, 1)
    pt3dadd(-54.42, 133.18, -34, 1)
    pt3dadd(-54.42, 133.29, -34, 1)
    pt3dadd(-54.53, 133.44, -34, 1)
    pt3dadd(-54.53, 133.6, -34, 1)
    pt3dadd(-54.58, 133.76, -34, 1)
    pt3dadd(-54.58, 134.28, -34.5, 1)
    pt3dadd(-54.53, 134.38, -34.5, 1)
    pt3dadd(-54.53, 134.86, -34.5, 1)
    pt3dadd(-54.58, 134.97, -34.5, 1)
    pt3dadd(-54.68, 135.07, -34.5, 1)
    pt3dadd(-54.79, 135.07, -34.5, 1)
    pt3dadd(-54.84, 135.22, -34.5, 1)
    pt3dadd(-54.95, 135.34, -34.5, 1)
    pt3dadd(-55.21, 135.34, -34.5, 1)
    pt3dadd(-55.42, 135.38, -35, 1)
    pt3dadd(-55.58, 135.34, -35, 1)
    pt3dadd(-55.79, 135.34, -35, 1)
    pt3dadd(-55.89, 135.44, -35, 1)
    pt3dadd(-56.05, 135.49, -35, 1)
    pt3dadd(-56.15, 135.6, -35, 1)
    pt3dadd(-56.42, 135.55, -35, 1)
    pt3dadd(-56.52, 135.65, -35, 1)
    pt3dadd(-56.83, 135.65, -35, 1)
    pt3dadd(-56.94, 135.69, -35, 1)
    pt3dadd(-57.04, 135.69, -35, 1)
    pt3dadd(-57.2, 135.76, -35, 1)
    pt3dadd(-57.36, 135.86, -35, 1)
    pt3dadd(-57.52, 135.86, -35, 1)
    pt3dadd(-57.62, 135.91, -35, 1)
    pt3dadd(-57.73, 135.97, -35, 1)
    pt3dadd(-57.83, 136.02, -35, 1)
    pt3dadd(-57.94, 136.12, -35, 1)
    pt3dadd(-58.04, 136.22, -35, 1)
    pt3dadd(-58.15, 136.22, -35.5, 1)
    pt3dadd(-58.2, 136.34, -35.5, 1)
    pt3dadd(-58.25, 136.6, -35.5, 1)
    pt3dadd(-58.3, 136.76, -35.5, 1)
    pt3dadd(-58.3, 137.02, -35.5, 1)
    pt3dadd(-58.36, 137.22, -35.5, 1)
    pt3dadd(-58.3, 137.38, -35.5, 1)
    pt3dadd(-58.3, 137.69, -36, 1)
    pt3dadd(-58.41, 137.81, -36, 1)
    pt3dadd(-58.46, 137.96, -36, 1)
    pt3dadd(-58.57, 138.07, -36, 1)
    pt3dadd(-58.67, 138.22, -36, 1)
    pt3dadd(-58.83, 138.33, -36, 1)
    pt3dadd(-58.93, 138.44, -36, 1)
    pt3dadd(-59.04, 138.49, -36, 1)
    pt3dadd(-59.2, 138.49, -36, 1)
    pt3dadd(-59.25, 138.6, -36, 1)
    pt3dadd(-59.35, 138.6, -36, 1)
    pt3dadd(-59.41, 138.69, -36, 1)
    pt3dadd(-59.51, 138.91, -36, 1)
    pt3dadd(-59.46, 139.02, -36, 1)
    pt3dadd(-59.25, 139.22, -36, 1)
    pt3dadd(-59.14, 139.33, -36, 1)
    pt3dadd(-58.99, 139.44, -36, 1)
    pt3dadd(-58.88, 139.49, -36, 1)
    pt3dadd(-58.78, 139.59, -36, 1)
    pt3dadd(-58.67, 139.65, -36, 1)
    pt3dadd(-58.51, 139.69, -36, 1)
    pt3dadd(-58.46, 139.8, -36, 1)
    pt3dadd(-58.36, 139.86, -36, 1)
    pt3dadd(-58.15, 140.07, -36, 1)
    pt3dadd(-57.94, 140.16, -36, 1)
    pt3dadd(-57.88, 140.33, -36.5, 1)
    pt3dadd(-57.83, 140.54, -36.5, 1)
    pt3dadd(-57.83, 140.8, -36.5, 1)
    pt3dadd(-57.94, 141.01, -36.5, 1)
    pt3dadd(-58.04, 141.12, -36.5, 1)
    pt3dadd(-58.09, 141.22, -36.5, 1)
    pt3dadd(-58.25, 141.43, -36.5, 1)
    pt3dadd(-58.46, 141.49, -36.5, 1)
    pt3dadd(-58.62, 141.49, -36.5, 1)
    pt3dadd(-58.72, 141.59, -36.5, 1)
    pt3dadd(-58.83, 141.63, -36.5, 1)
    pt3dadd(-58.93, 141.75, -36.5, 1)
    pt3dadd(-58.99, 141.85, -36.5, 1)
    pt3dadd(-59.09, 141.96, -36.5, 1)
    pt3dadd(-59.09, 142.12, -36.5, 1)
    pt3dadd(-59.14, 142.22, -36.5, 1)
    pt3dadd(-59.14, 142.49, -36.5, 1)
    pt3dadd(-59.2, 142.59, -36.5, 1)
    pt3dadd(-59.2, 142.75, -36.5, 1)
    pt3dadd(-59.14, 142.96, -36.5, 1)
    pt3dadd(-59.09, 143.16, -36.5, 1)
    pt3dadd(-58.99, 143.43, -36.5, 1)
    pt3dadd(-59.32, 145.07, -37, 1)
    pt3dadd(-59.27, 145.28, -37, 1)
  }
}
proc shape3d_68() {
  dend[63] {
    pt3dadd(-59.22, 145.44, -37, 1)
    pt3dadd(-59.11, 145.54, -37, 1)
    pt3dadd(-59.11, 145.65, -37, 1)
    pt3dadd(-59.22, 145.81, -37, 1)
    pt3dadd(-59.27, 145.96, -37, 1)
    pt3dadd(-59.27, 146.07, -37, 1)
    pt3dadd(-59.32, 146.16, -37, 1)
    pt3dadd(-59.38, 146.44, -37, 1)
    pt3dadd(-59.53, 146.49, -37, 1)
    pt3dadd(-59.64, 146.54, -37, 1)
    pt3dadd(-59.74, 146.65, -37, 1)
    pt3dadd(-59.8, 146.81, -37.5, 1)
    pt3dadd(-59.95, 146.81, -37.5, 1)
    pt3dadd(-60.01, 146.91, -37.5, 1)
    pt3dadd(-60.11, 147.02, -37.5, 1)
    pt3dadd(-60.22, 147.02, -38, 1)
    pt3dadd(-60.27, 147.16, -38, 1)
    pt3dadd(-60.27, 147.49, -38, 1)
    pt3dadd(-60.16, 147.54, -38, 1)
    pt3dadd(-60.11, 147.75, -38, 1)
    pt3dadd(-60.01, 147.91, -38, 1)
    pt3dadd(-59.95, 148.01, -38, 1)
    pt3dadd(-59.9, 148.16, -38, 1)
    pt3dadd(-59.85, 148.28, -38, 1)
    pt3dadd(-59.74, 148.44, -38, 1)
    pt3dadd(-59.69, 148.69, -38, 1)
    pt3dadd(-59.64, 148.86, -38, 1)
    pt3dadd(-59.64, 149.12, -38, 1)
    pt3dadd(-59.53, 149.28, -38, 1)
    pt3dadd(-59.48, 149.49, -38, 1)
    pt3dadd(-59.43, 149.59, -38, 1)
    pt3dadd(-59.38, 149.75, -38, 1)
    pt3dadd(-59.32, 149.96, -38.5, 1)
    pt3dadd(-59.32, 150.12, -38.5, 1)
    pt3dadd(-59.27, 150.33, -38.5, 1)
    pt3dadd(-59.27, 150.49, -38.5, 1)
    pt3dadd(-59.22, 150.69, -38.5, 1)
    pt3dadd(-59.22, 151.06, -38.5, 1)
    pt3dadd(-59.17, 151.16, -38.5, 1)
    pt3dadd(-59.22, 151.27, -38.5, 1)
    pt3dadd(-59.27, 151.43, -39, 1)
    pt3dadd(-59.32, 151.54, -39, 1)
    pt3dadd(-59.38, 151.69, -39, 1)
    pt3dadd(-59.48, 151.8, -39, 1)
    pt3dadd(-59.59, 151.96, -39, 1)
    pt3dadd(-59.9, 152.01, -39, 1)
    pt3dadd(-60.01, 152.12, -39, 1)
    pt3dadd(-60.16, 152.16, -39.5, 1)
    pt3dadd(-60.27, 152.22, -39.5, 1)
    pt3dadd(-60.43, 152.33, -39.5, 1)
    pt3dadd(-60.53, 152.38, -39.5, 1)
    pt3dadd(-60.48, 152.59, -39.5, 1)
    pt3dadd(-60.48, 152.85, -39.5, 1)
    pt3dadd(-60.43, 153.01, -39.5, 1)
    pt3dadd(-60.37, 153.22, -39.5, 1)
    pt3dadd(-60.37, 153.69, -39.5, 1)
    pt3dadd(-60.37, 153.85, -39.5, 1)
    pt3dadd(-60.43, 153.94, -39.5, 1)
    pt3dadd(-60.48, 154.06, -39.5, 1)
    pt3dadd(-60.53, 154.22, -39.5, 1)
    pt3dadd(-60.74, 154.32, -39.5, 1)
    pt3dadd(-60.79, 154.47, -39.5, 1)
    pt3dadd(-61.06, 154.74, -39.5, 1)
    pt3dadd(-61.11, 154.85, -39.5, 1)
    pt3dadd(-61.16, 155.06, -39.5, 1)
    pt3dadd(-61.27, 155.06, -39.5, 1)
    pt3dadd(-61.27, 155.27, -39.5, 1)
    pt3dadd(-61.32, 155.43, -39.5, 1)
    pt3dadd(-61.32, 155.63, -39.5, 1)
    pt3dadd(-61.59, 156.44, -40.5, 1)
    pt3dadd(-61.48, 156.55, -40.5, 1)
    pt3dadd(-61.33, 156.6, -40.5, 1)
    pt3dadd(-61.22, 156.69, -40.5, 1)
    pt3dadd(-61.06, 156.69, -40.5, 1)
    pt3dadd(-60.96, 156.81, -40.5, 1)
    pt3dadd(-60.85, 156.86, -40.5, 1)
    pt3dadd(-60.75, 156.91, -40.5, 1)
    pt3dadd(-60.7, 157.02, -40.5, 1)
    pt3dadd(-60.64, 157.12, -40.5, 1)
    pt3dadd(-60.59, 157.33, -40.5, 1)
    pt3dadd(-60.59, 157.49, -40.5, 1)
    pt3dadd(-60.54, 157.69, -40.5, 1)
    pt3dadd(-60.54, 158.16, -40.5, 1)
    pt3dadd(-60.64, 158.28, -40.5, 1)
    pt3dadd(-60.85, 158.28, -40.5, 1)
    pt3dadd(-61.01, 158.33, -40.5, 1)
    pt3dadd(-61.12, 158.44, -40.5, 1)
    pt3dadd(-61.17, 158.6, -40.5, 1)
    pt3dadd(-61.22, 158.69, -40.5, 1)
    pt3dadd(-61.22, 158.96, -40.5, 1)
    pt3dadd(-61.17, 159.16, -40.5, 1)
    pt3dadd(-61.12, 159.33, -40.5, 1)
    pt3dadd(-61.01, 159.49, -40.5, 1)
    pt3dadd(-60.91, 159.54, -40.5, 1)
    pt3dadd(-60.8, 159.59, -40.5, 1)
    pt3dadd(-60.59, 159.54, -40.5, 1)
    pt3dadd(-60.33, 159.54, -40.5, 1)
    pt3dadd(-60.22, 159.69, -40.5, 1)
    pt3dadd(-60.17, 159.86, -40.5, 1)
    pt3dadd(-60.12, 160.01, -40.5, 1)
    pt3dadd(-60.07, 160.12, -40.5, 1)
    pt3dadd(-60.01, 160.22, -40.5, 1)
    pt3dadd(-59.96, 160.33, -40.5, 1)
    pt3dadd(-59.96, 160.44, -40.5, 1)
    pt3dadd(-59.86, 160.54, -40.5, 1)
    pt3dadd(-59.8, 160.69, -41, 1)
    pt3dadd(-59.75, 160.8, -41, 1)
    pt3dadd(-59.65, 161.07, -41, 1)
    pt3dadd(-59.54, 161.22, -41, 1)
    pt3dadd(-59.54, 161.33, -41, 1)
    pt3dadd(-59.49, 161.54, -41, 1)
    pt3dadd(-59.38, 161.63, -41, 1)
    pt3dadd(-59.33, 161.8, -41, 1)
    pt3dadd(-59.12, 161.8, -41, 1)
    pt3dadd(-59.12, 162.01, -41, 1)
    pt3dadd(-58.96, 162.06, -41, 1)
    pt3dadd(-58.91, 162.16, -41, 1)
    pt3dadd(-58.75, 162.38, -41, 1)
    pt3dadd(-58.6, 162.54, -41, 1)
    pt3dadd(-58.49, 162.63, -41, 1)
    pt3dadd(-58.44, 162.8, -41, 1)
    pt3dadd(-58.33, 162.91, -41, 1)
    pt3dadd(-58.23, 163.12, -41, 1)
    pt3dadd(-58.18, 163.27, -41, 1)
    pt3dadd(-58.07, 163.38, -41, 1)
    pt3dadd(-58.02, 163.54, -41, 1)
    pt3dadd(-57.97, 163.63, -41, 1)
    pt3dadd(-57.91, 163.75, -41, 1)
    pt3dadd(-57.86, 163.9, -41, 1)
    pt3dadd(-57.76, 164.01, -41, 1)
    pt3dadd(-57.7, 164.12, -41, 1)
    pt3dadd(-57.6, 164.22, -41, 1)
    pt3dadd(-57.49, 164.27, -41, 1)
    pt3dadd(-57.44, 164.38, -41, 1)
    pt3dadd(-57.34, 164.33, -41, 1)
    pt3dadd(-57.07, 164.59, -41, 1)
    pt3dadd(-56.97, 164.69, -41, 1)
    pt3dadd(-56.92, 164.85, -41, 1)
    pt3dadd(-56.81, 165.01, -41, 1)
    pt3dadd(-56.81, 165.17, -41, 1)
    pt3dadd(-56.71, 165.32, -41, 1)
    pt3dadd(-56.65, 165.53, -41, 1)
    pt3dadd(-56.6, 165.69, -41, 1)
    pt3dadd(-56.5, 165.8, -41, 1)
    pt3dadd(-56.5, 166.01, -41, 1)
    pt3dadd(-56.39, 166.11, -41, 1)
    pt3dadd(-56.34, 166.27, -41, 1)
    pt3dadd(-56.23, 166.48, -41, 1)
    pt3dadd(-56.18, 166.74, -41, 1)
    pt3dadd(-56.08, 167.01, -41, 1)
    pt3dadd(-56.08, 167.22, -41, 1)
    pt3dadd(-55.99, 167.93, -42, 1)
    pt3dadd(-55.15, 167.93, -42, 1)
    pt3dadd(-54.99, 167.98, -42, 1)
    pt3dadd(-54.89, 168.09, -42, 1)
    pt3dadd(-54.89, 168.3, -42.5, 1)
    pt3dadd(-54.78, 168.51, -42.5, 1)
    pt3dadd(-54.78, 168.98, -42.5, 1)
    pt3dadd(-54.84, 169.14, -42.5, 1)
    pt3dadd(-54.94, 169.25, -42.5, 1)
    pt3dadd(-55.05, 169.3, -42.5, 1)
    pt3dadd(-55.1, 169.4, -43, 1)
    pt3dadd(-55.05, 169.51, -43, 1)
    pt3dadd(-54.94, 169.61, -43, 1)
    pt3dadd(-54.78, 169.72, -43, 1)
    pt3dadd(-54.63, 169.82, -43, 1)
    pt3dadd(-54.47, 169.88, -43, 1)
    pt3dadd(-54.36, 169.93, -43, 1)
    pt3dadd(-54.1, 170.14, -43, 1)
    pt3dadd(-53.94, 170.19, -43, 1)
    pt3dadd(-53.84, 170.3, -43.5, 1)
    pt3dadd(-53.73, 170.35, -43.5, 1)
    pt3dadd(-53.58, 170.56, -43.5, 1)
    pt3dadd(-53.47, 170.82, -44, 1)
    pt3dadd(-53.37, 170.93, -44, 1)
    pt3dadd(-53.32, 171.09, -44.5, 1)
    pt3dadd(-53.32, 171.3, -44.5, 1)
    pt3dadd(-53.26, 171.4, -44.5, 1)
    pt3dadd(-53.26, 171.93, -44.5, 1)
    pt3dadd(-53.47, 171.93, -44.5, 1)
    pt3dadd(-53.52, 172.08, -44.5, 1)
    pt3dadd(-53.73, 172.03, -45, 1)
    pt3dadd(-53.84, 171.98, -45, 1)
    pt3dadd(-54, 171.82, -45, 1)
    pt3dadd(-54.15, 171.56, -45.5, 1)
    pt3dadd(-54.21, 171.3, -45.5, 1)
    pt3dadd(-54.21, 170.98, -45.5, 1)
    pt3dadd(-54.15, 170.82, -45.5, 1)
    pt3dadd(-54.15, 170.61, -45.5, 1)
    pt3dadd(-54.1, 170.56, -46, 1)
    pt3dadd(-54.21, 170.61, -46, 1)
    pt3dadd(-54.26, 170.77, -46, 1)
    pt3dadd(-54.36, 170.82, -46, 1)
    pt3dadd(-54.42, 170.98, -46, 1)
    pt3dadd(-54.52, 171.14, -46, 1)
    pt3dadd(-54.63, 171.3, -46.5, 1)
    pt3dadd(-54.78, 171.35, -46.5, 1)
    pt3dadd(-54.89, 171.56, -46.5, 1)
    pt3dadd(-55.05, 171.61, -46.5, 1)
    pt3dadd(-55.15, 171.72, -46.5, 1)
    pt3dadd(-55.2, 171.87, -46.5, 1)
    pt3dadd(-55.31, 171.98, -46.5, 1)
    pt3dadd(-55.41, 172.08, -46.5, 1)
    pt3dadd(-55.52, 172.14, -47, 1)
    pt3dadd(-55.73, 172.03, -47, 1)
    pt3dadd(-55.89, 171.98, -47, 1)
    pt3dadd(-56.04, 171.93, -47, 1)
    pt3dadd(-56.2, 171.82, -47, 1)
    pt3dadd(-56.36, 171.82, -47, 1)
    pt3dadd(-56.52, 171.77, -47, 1)
    pt3dadd(-56.67, 171.61, -47, 1)
    pt3dadd(-56.78, 171.56, -47, 1)
    pt3dadd(-56.88, 171.51, -47, 1)
    pt3dadd(-56.99, 171.45, -47, 1)
    pt3dadd(-57.15, 171.35, -47, 1)
    pt3dadd(-57.3, 171.19, -47, 1)
    pt3dadd(-57.41, 171.14, -47, 1)
    pt3dadd(-57.51, 171.03, -47, 1)
    pt3dadd(-57.62, 171.03, -47, 1)
    pt3dadd(-57.72, 170.93, -47, 1)
    pt3dadd(-57.93, 170.77, -47, 1)
    pt3dadd(-58.09, 170.72, -47, 1)
    pt3dadd(-58.25, 170.67, -47, 1)
    pt3dadd(-58.46, 170.61, -47, 1)
    pt3dadd(-58.56, 170.56, -47, 1)
    pt3dadd(-58.77, 170.51, -47, 1)
    pt3dadd(-58.83, 170.4, -47, 1)
    pt3dadd(-58.98, 170.4, -47, 1)
    pt3dadd(-59.09, 170.35, -47, 1)
    pt3dadd(-59.19, 170.3, -47, 1)
    pt3dadd(-59.4, 170.35, -47.5, 1)
    pt3dadd(-59.72, 170.35, -47.5, 1)
    pt3dadd(-60.09, 170.3, -47.5, 1)
    pt3dadd(-60.3, 170.3, -47.5, 1)
    pt3dadd(-60.4, 170.25, -48, 1)
    pt3dadd(-60.77, 170.25, -48, 1)
    pt3dadd(-60.93, 170.19, -48, 1)
    pt3dadd(-61.14, 170.19, -48, 1)
    pt3dadd(-61.24, 170.25, -48, 1)
    pt3dadd(-61.45, 170.25, -48, 1)
    pt3dadd(-61.56, 170.19, -48, 1)
    pt3dadd(-61.82, 170.19, -48, 1)
    pt3dadd(-61.98, 170.14, -48, 1)
    pt3dadd(-62.13, 170.09, -48, 1)
    pt3dadd(-62.24, 170.03, -48, 1)
    pt3dadd(-62.45, 169.88, -48, 1)
    pt3dadd(-62.55, 169.77, -48, 1)
    pt3dadd(-62.66, 169.72, -48, 1)
    pt3dadd(-62.76, 169.67, -48, 1)
  }
}
proc shape3d_69() {
  dend[63] {
    pt3dadd(-62.87, 169.61, -48, 1)
    pt3dadd(-62.97, 169.56, -48, 1)
    pt3dadd(-63.13, 169.51, -48, 1)
    pt3dadd(-63.29, 169.46, -48, 1)
    pt3dadd(-63.45, 169.35, -48, 1)
    pt3dadd(-63.6, 169.35, -48, 1)
    pt3dadd(-63.71, 169.3, -48, 1)
    pt3dadd(-63.87, 169.19, -48, 1)
    pt3dadd(-64.08, 169.09, -48, 1)
    pt3dadd(-64.13, 168.98, -48, 1)
    pt3dadd(-64.34, 168.88, -48, 1)
    pt3dadd(-64.44, 168.77, -48, 1)
    pt3dadd(-64.5, 168.62, -48, 1)
    pt3dadd(-64.59, 168.51, -48, 1)
    pt3dadd(-64.76, 168.35, -48.5, 1)
    pt3dadd(-64.81, 168.25, -48.5, 1)
    pt3dadd(-64.92, 168.14, -48.5, 1)
    pt3dadd(-65.06, 168.04, -48.5, 1)
    pt3dadd(-65.23, 167.98, -48.5, 1)
    pt3dadd(-65.39, 167.83, -48.5, 1)
    pt3dadd(-65.55, 167.83, -48.5, 1)
    pt3dadd(-65.59, 167.72, -48.5, 1)
    pt3dadd(-65.76, 167.62, -48.5, 1)
    pt3dadd(-65.97, 167.41, -48.5, 1)
    pt3dadd(-66.12, 167.3, -48.5, 1)
    pt3dadd(-66.28, 167.2, -48.5, 1)
    pt3dadd(-66.33, 167.09, -48.5, 1)
    pt3dadd(-66.44, 166.88, -48.5, 1)
    pt3dadd(-66.54, 166.62, -48.5, 1)
    pt3dadd(-66.65, 166.41, -48.5, 1)
    pt3dadd(-66.7, 166.25, -48.5, 1)
    pt3dadd(-66.75, 166.09, -48.5, 1)
    pt3dadd(-66.75, 165.72, -48.5, 1)
    pt3dadd(-66.81, 165.51, -48.5, 1)
    pt3dadd(-66.91, 165.36, -48.5, 1)
    pt3dadd(-66.91, 165.15, -48.5, 1)
    pt3dadd(-66.95, 165.04, -48.5, 1)
    pt3dadd(-66.95, 164.67, -48.5, 1)
    pt3dadd(-67.06, 164.57, -48.5, 1)
    pt3dadd(-67.06, 164.2, -48.5, 1)
    pt3dadd(-67.12, 163.99, -48.5, 1)
    pt3dadd(-67.17, 163.83, -48.5, 1)
    pt3dadd(-67.17, 163.57, -48.5, 1)
    pt3dadd(-67.23, 163.46, -48.5, 1)
    pt3dadd(-67.23, 162.72, -48.5, 1)
    pt3dadd(-67.17, 162.62, -48.5, 1)
    pt3dadd(-67.12, 162.46, -48.5, 1)
    pt3dadd(-67.12, 161.72, -48.5, 1)
    pt3dadd(-67.17, 161.52, -48.5, 1)
    pt3dadd(-67.17, 161.26, -48.5, 1)
  }
  dend[64] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(1.2, -12.07, -4.5, 0.89)
    pt3dadd(1.09, -12.34, -4.5, 0.89)
    pt3dadd(0.99, -12.44, -4.5, 0.89)
    pt3dadd(0.88, -12.44, -4.5, 0.89)
    pt3dadd(0.83, -12.49, -5, 0.89)
    pt3dadd(0.67, -12.55, -5.5, 0.89)
    pt3dadd(0.51, -12.76, -5.5, 0.89)
    pt3dadd(0.36, -12.92, -5.5, 0.89)
    pt3dadd(0.2, -13.13, -6, 0.89)
    pt3dadd(0.15, -13.28, -6, 0.89)
    pt3dadd(0.04, -13.39, -6, 0.89)
    pt3dadd(-0.01, -13.55, -6, 0.89)
    pt3dadd(-0.01, -13.86, -6.5, 0.89)
    pt3dadd(-0.06, -14.02, -6.5, 0.89)
    pt3dadd(-0.06, -14.39, -6.5, 0.89)
    pt3dadd(-0.12, -14.49, -6.5, 0.89)
    pt3dadd(-0.12, -14.76, -7, 0.89)
    pt3dadd(-0.17, -14.86, -7, 0.89)
    pt3dadd(-0.17, -15.18, -7, 0.89)
    pt3dadd(-0.22, -15.28, -7, 0.89)
    pt3dadd(-0.22, -15.49, -7, 0.89)
    pt3dadd(-0.27, -15.65, -7, 0.89)
    pt3dadd(-0.38, -15.65, -7, 0.89)
    pt3dadd(-0.48, -15.81, -7, 0.89)
    pt3dadd(-0.64, -15.91, -7.5, 0.89)
    pt3dadd(-0.75, -16.02, -7.5, 0.89)
    pt3dadd(-0.85, -16.12, -7.5, 0.89)
    pt3dadd(-0.96, -16.17, -7.5, 0.89)
    pt3dadd(-1.17, -16.38, -7.5, 0.89)
    pt3dadd(-1.17, -16.48, -7.5, 0.89)
    pt3dadd(-1.27, -16.6, -7.5, 0.89)
    pt3dadd(-1.38, -16.75, -7.5, 0.89)
    pt3dadd(-1.43, -16.96, -8, 0.89)
    pt3dadd(-1.53, -17.07, -8, 0.89)
    pt3dadd(-1.59, -17.23, -8, 0.89)
    pt3dadd(-1.69, -17.32, -8, 0.89)
    pt3dadd(-1.69, -17.48, -8, 0.89)
    pt3dadd(-1.8, -17.64, -8, 0.89)
    pt3dadd(-1.95, -17.8, -8.5, 0.89)
    pt3dadd(-2.11, -17.86, -8.5, 0.89)
    pt3dadd(-2.31, -17.96, -8.5, 0.89)
    pt3dadd(-2.43, -18.01, -8.5, 0.89)
    pt3dadd(-2.52, -18.07, -8.5, 0.89)
    pt3dadd(-2.69, -18.12, -8.5, 0.89)
    pt3dadd(-2.79, -18.17, -8.5, 0.89)
    pt3dadd(-3.11, -18.17, -8.5, 0.89)
    pt3dadd(-3.27, -18.22, -8.5, 0.89)
    pt3dadd(-3.53, -18.22, -8.5, 0.89)
    pt3dadd(-3.74, -18.28, -8.5, 0.89)
    pt3dadd(-3.9, -18.32, -8.5, 0.89)
    pt3dadd(-4.09, -18.44, -9, 0.89)
    pt3dadd(-4.26, -18.44, -9, 0.89)
    pt3dadd(-4.37, -18.48, -9, 0.89)
    pt3dadd(-4.58, -18.54, -9, 0.89)
    pt3dadd(-4.73, -18.59, -9, 0.89)
    pt3dadd(-4.84, -18.64, -9, 0.89)
    pt3dadd(-4.94, -18.7, -9, 0.89)
    pt3dadd(-5.09, -18.8, -9, 0.89)
    pt3dadd(-5.42, -19.12, -9, 0.89)
    pt3dadd(-5.52, -19.38, -9, 0.89)
    pt3dadd(-5.63, -19.48, -9, 0.89)
    pt3dadd(-5.68, -19.7, -9, 0.89)
    pt3dadd(-5.78, -19.75, -9, 0.89)
    pt3dadd(-5.84, -19.96, -9, 0.89)
    pt3dadd(-5.89, -20.05, -9, 0.89)
    pt3dadd(-6.05, -20.22, -9, 0.89)
    pt3dadd(-6.2, -20.32, -9, 0.89)
    pt3dadd(-6.31, -20.38, -9, 0.89)
    pt3dadd(-6.41, -20.49, -9.5, 0.89)
    pt3dadd(-6.62, -20.49, -9.5, 0.89)
    pt3dadd(-6.78, -20.49, -9.5, 0.89)
    pt3dadd(-6.89, -20.54, -9.5, 0.89)
    pt3dadd(-7.04, -20.59, -9.5, 0.89)
    pt3dadd(-7.2, -20.64, -9.5, 0.89)
    pt3dadd(-7.36, -20.7, -9.5, 0.89)
    pt3dadd(-7.57, -20.7, -9.5, 0.89)
    pt3dadd(-7.73, -20.75, -9.5, 0.89)
    pt3dadd(-7.94, -20.85, -9.5, 0.89)
    pt3dadd(-8.09, -20.91, -9.5, 0.89)
    pt3dadd(-8.25, -21.01, -9.5, 0.89)
    pt3dadd(-8.36, -21.01, -9.5, 0.89)
    pt3dadd(-8.51, -21.12, -9.5, 0.89)
    pt3dadd(-8.67, -21.17, -10, 0.89)
    pt3dadd(-8.83, -21.22, -10, 0.89)
    pt3dadd(-9.03, -21.33, -10, 0.89)
    pt3dadd(-9.3, -21.43, -10, 0.89)
    pt3dadd(-9.41, -21.59, -10, 0.89)
    pt3dadd(-9.51, -21.64, -10, 0.89)
    pt3dadd(-9.67, -21.75, -10, 0.89)
    pt3dadd(-9.88, -21.8, -10, 0.89)
    pt3dadd(-10.14, -21.8, -10, 0.89)
    pt3dadd(-11.01, -22.17, -10, 0.89)
    pt3dadd(-11.22, -22.17, -10, 0.89)
    pt3dadd(-11.38, -22.17, -10, 0.89)
    pt3dadd(-11.48, -22.06, -10, 0.89)
    pt3dadd(-11.64, -22.22, -10, 0.89)
    pt3dadd(-11.8, -22.22, -10, 0.89)
    pt3dadd(-11.96, -22.27, -10, 0.89)
    pt3dadd(-12.06, -22.38, -10, 0.89)
    pt3dadd(-12.27, -22.38, -10, 0.89)
    pt3dadd(-12.38, -22.43, -10, 0.89)
    pt3dadd(-12.53, -22.53, -10, 0.89)
    pt3dadd(-12.64, -22.59, -10, 0.89)
    pt3dadd(-12.85, -22.69, -10, 0.89)
    pt3dadd(-12.95, -22.8, -10, 0.89)
    pt3dadd(-13.06, -22.9, -10, 0.89)
    pt3dadd(-13.27, -23.06, -10, 0.89)
    pt3dadd(-13.37, -23.16, -10, 0.89)
    pt3dadd(-13.48, -23.22, -10, 0.89)
    pt3dadd(-13.58, -23.32, -10, 0.89)
    pt3dadd(-13.69, -23.43, -10, 0.89)
    pt3dadd(-13.74, -23.69, -10, 0.89)
    pt3dadd(-13.85, -23.9, -10, 0.89)
    pt3dadd(-13.9, -24.06, -10, 0.89)
    pt3dadd(-13.95, -24.27, -10, 0.89)
    pt3dadd(-14, -24.43, -10, 0.89)
    pt3dadd(-14.11, -24.64, -10, 0.89)
    pt3dadd(-14.27, -24.69, -10, 0.89)
    pt3dadd(-14.42, -24.79, -10, 0.89)
    pt3dadd(-14.58, -24.85, -10, 0.89)
    pt3dadd(-14.9, -24.85, -10, 0.89)
    pt3dadd(-15.05, -24.79, -10.5, 0.89)
    pt3dadd(-15.16, -24.69, -10.5, 0.89)
    pt3dadd(-15.42, -24.69, -10.5, 0.89)
    pt3dadd(-15.68, -24.95, -10.5, 0.89)
    pt3dadd(-15.89, -25.11, -10.5, 0.89)
    pt3dadd(-16, -25.27, -11, 0.89)
    pt3dadd(-16.1, -25.42, -11, 0.89)
    pt3dadd(-16.21, -25.53, -11, 0.89)
    pt3dadd(-16.42, -25.74, -11, 0.89)
    pt3dadd(-16.36, -25.9, -11, 0.89)
    pt3dadd(-16.47, -26, -11, 0.89)
    pt3dadd(-16.63, -26.21, -11, 0.89)
    pt3dadd(-16.84, -26.37, -11, 0.89)
    pt3dadd(-16.94, -26.42, -11, 0.89)
    pt3dadd(-17.2, -26.42, -11, 0.89)
    pt3dadd(-17.41, -26.53, -11, 0.89)
    pt3dadd(-17.52, -26.63, -11.5, 0.89)
    pt3dadd(-17.68, -26.84, -11.5, 0.89)
    pt3dadd(-17.78, -27.11, -11.5, 0.89)
    pt3dadd(-17.82, -27.21, -11.5, 0.89)
    pt3dadd(-17.94, -27.47, -11.5, 0.89)
    pt3dadd(-17.94, -27.63, -11.5, 0.89)
    pt3dadd(-18.04, -27.79, -11.5, 0.89)
    pt3dadd(-18.1, -27.9, -11.5, 0.89)
    pt3dadd(-18.25, -28, -11.5, 0.89)
    pt3dadd(-18.25, -28.16, -11.5, 0.89)
    pt3dadd(-18.41, -28.26, -11.5, 0.89)
    pt3dadd(-18.46, -28.42, -12, 0.89)
    pt3dadd(-18.57, -28.53, -12, 0.89)
    pt3dadd(-18.73, -28.58, -12, 0.89)
    pt3dadd(-18.82, -28.68, -12, 0.89)
    pt3dadd(-18.98, -28.74, -12, 0.89)
    pt3dadd(-19.2, -28.79, -12, 0.89)
    pt3dadd(-19.36, -28.84, -12, 0.89)
    pt3dadd(-19.51, -28.89, -12, 0.89)
    pt3dadd(-19.72, -29, -12, 0.89)
    pt3dadd(-19.88, -29.05, -12, 0.89)
    pt3dadd(-20.2, -29.05, -12, 0.89)
    pt3dadd(-20.3, -29.1, -12, 0.89)
    pt3dadd(-20.41, -29.16, -12, 0.89)
    pt3dadd(-20.56, -29.26, -12, 0.89)
    pt3dadd(-20.67, -29.31, -12.5, 0.89)
    pt3dadd(-20.72, -29.42, -12.5, 0.89)
    pt3dadd(-20.83, -29.52, -12.5, 0.89)
    pt3dadd(-20.88, -29.68, -12.5, 0.89)
    pt3dadd(-20.98, -29.79, -12.5, 0.89)
    pt3dadd(-20.98, -30.05, -12.5, 0.89)
    pt3dadd(-21.14, -30.26, -13, 0.89)
    pt3dadd(-21.19, -30.42, -13, 0.89)
    pt3dadd(-21.4, -30.63, -13, 0.89)
    pt3dadd(-21.51, -30.73, -13, 0.89)
    pt3dadd(-21.67, -30.79, -13, 0.89)
    pt3dadd(-21.88, -30.79, -13, 0.89)
    pt3dadd(-22.03, -30.84, -13, 0.89)
    pt3dadd(-22.14, -30.94, -13, 0.89)
    pt3dadd(-22.24, -31, -13.5, 0.89)
    pt3dadd(-22.3, -31.1, -13.5, 0.89)
    pt3dadd(-22.4, -31.31, -13.5, 0.89)
    pt3dadd(-22.45, -31.47, -13.5, 0.89)
    pt3dadd(-22.56, -31.58, -13.5, 0.89)
    pt3dadd(-22.61, -31.73, -13.5, 0.89)
    pt3dadd(-22.77, -31.84, -13.5, 0.89)
    pt3dadd(-22.93, -31.84, -13.5, 0.89)
    pt3dadd(-23.08, -31.89, -13.5, 0.89)
    pt3dadd(-23.35, -31.79, -13.5, 0.89)
    pt3dadd(-23.66, -31.79, -14, 0.89)
    pt3dadd(-23.92, -31.73, -14, 0.89)
    pt3dadd(-24.03, -31.79, -14, 0.89)
    pt3dadd(-24.34, -31.84, -14, 0.89)
    pt3dadd(-24.5, -31.94, -14, 0.89)
    pt3dadd(-24.61, -32.04, -14, 0.89)
    pt3dadd(-24.71, -32.21, -14, 0.89)
    pt3dadd(-24.87, -32.52, -14, 0.89)
    pt3dadd(-24.87, -32.68, -14.5, 0.89)
    pt3dadd(-24.92, -32.89, -14.5, 0.89)
    pt3dadd(-24.97, -33.04, -14.5, 0.89)
    pt3dadd(-25.03, -33.15, -14.5, 0.89)
  }
}
proc shape3d_70() {
  dend[64] {
    pt3dadd(-25.18, -33.26, -14.5, 0.89)
    pt3dadd(-25.29, -33.31, -14.5, 0.89)
    pt3dadd(-25.5, -33.42, -14.5, 0.89)
    pt3dadd(-25.87, -33.9, -14.5, 0.89)
    pt3dadd(-25.87, -34.11, -14.5, 0.89)
    pt3dadd(-26.03, -34.27, -14.5, 0.89)
    pt3dadd(-26.24, -34.22, -14.5, 0.89)
    pt3dadd(-26.4, -34.17, -14.5, 0.89)
    pt3dadd(-26.5, -34.06, -14.5, 0.89)
    pt3dadd(-26.76, -34.17, -14.5, 0.89)
    pt3dadd(-26.87, -34.17, -14.5, 0.89)
    pt3dadd(-27.03, -34.22, -14.5, 0.89)
    pt3dadd(-27.18, -34.11, -14.5, 0.89)
    pt3dadd(-27.29, -34.01, -14.5, 0.89)
    pt3dadd(-27.39, -33.95, -14.5, 0.89)
    pt3dadd(-27.55, -33.95, -14.5, 0.89)
    pt3dadd(-27.66, -33.9, -14.5, 0.89)
    pt3dadd(-27.81, -33.85, -15, 0.89)
    pt3dadd(-27.97, -33.79, -15, 0.89)
    pt3dadd(-28.08, -33.69, -15, 0.89)
    pt3dadd(-28.23, -33.64, -15, 0.89)
    pt3dadd(-28.44, -33.64, -15, 0.89)
    pt3dadd(-28.55, -33.59, -15, 0.89)
    pt3dadd(-28.92, -33.59, -15.5, 0.89)
    pt3dadd(-29.07, -33.53, -15.5, 0.89)
    pt3dadd(-29.44, -33.53, -15.5, 0.89)
    pt3dadd(-29.55, -33.64, -15.5, 0.89)
    pt3dadd(-29.65, -33.69, -15.5, 0.89)
    pt3dadd(-29.81, -33.9, -16, 0.89)
    pt3dadd(-29.91, -34.01, -16, 0.89)
    pt3dadd(-30.02, -34.17, -16, 0.89)
    pt3dadd(-30.12, -34.43, -16.5, 0.89)
    pt3dadd(-30.33, -34.69, -16.5, 0.89)
    pt3dadd(-30.54, -34.9, -16.5, 0.89)
    pt3dadd(-30.54, -35.01, -16.5, 0.89)
    pt3dadd(-30.6, -35.11, -17, 0.89)
    pt3dadd(-30.44, -35.22, -17, 0.89)
    pt3dadd(-30.33, -35.32, -17, 0.89)
    pt3dadd(-30.23, -35.36, -17, 0.89)
    pt3dadd(-29.91, -35.36, -17.5, 0.89)
    pt3dadd(-29.86, -35.53, -17.5, 0.89)
    pt3dadd(-29.6, -35.47, -17.5, 0.89)
    pt3dadd(-29.49, -35.58, -17.5, 0.89)
    pt3dadd(-29.39, -35.69, -17.5, 0.89)
    pt3dadd(-29.28, -35.64, -18, 0.89)
    pt3dadd(-29.18, -35.69, -18, 0.89)
    pt3dadd(-29.13, -35.85, -18, 0.89)
    pt3dadd(-29.02, -35.9, -18, 0.89)
    pt3dadd(-28.97, -36.01, -18, 0.89)
    pt3dadd(-28.92, -36.15, -18.5, 0.89)
    pt3dadd(-28.86, -36.32, -18.5, 0.89)
    pt3dadd(-28.92, -36.47, -19, 0.89)
    pt3dadd(-28.92, -36.69, -19.5, 0.89)
    pt3dadd(-29.02, -36.85, -19.5, 0.89)
    pt3dadd(-29.18, -36.95, -19.5, 0.89)
    pt3dadd(-29.28, -37, -19.5, 0.89)
    pt3dadd(-29.39, -36.95, -19.5, 0.89)
    pt3dadd(-29.55, -36.79, -19.5, 0.89)
    pt3dadd(-29.7, -36.85, -20, 0.89)
    pt3dadd(-29.86, -36.74, -20, 0.89)
    pt3dadd(-29.97, -36.64, -20, 0.89)
    pt3dadd(-30.02, -36.53, -20, 0.89)
    pt3dadd(-30.12, -36.43, -20, 0.89)
    pt3dadd(-30.23, -36.32, -20, 0.89)
    pt3dadd(-30.33, -36.22, -20, 0.89)
    pt3dadd(-30.49, -36.06, -20, 0.89)
    pt3dadd(-30.6, -35.95, -20.5, 0.89)
    pt3dadd(-30.65, -35.85, -20.5, 0.89)
    pt3dadd(-30.75, -35.79, -20.5, 0.89)
    pt3dadd(-30.86, -35.69, -20.5, 0.89)
    pt3dadd(-30.96, -35.58, -20.5, 0.89)
    pt3dadd(-30.96, -35.43, -20.5, 0.89)
    pt3dadd(-31.12, -35.36, -20.5, 0.89)
    pt3dadd(-31.17, -35.22, -20.5, 0.89)
    pt3dadd(-31.28, -35.11, -20.5, 0.89)
    pt3dadd(-31.38, -34.95, -20.5, 0.89)
    pt3dadd(-31.64, -34.69, -20.5, 0.89)
    pt3dadd(-31.91, -34.69, -20.5, 0.89)
    pt3dadd(-32.01, -34.74, -20.5, 0.89)
    pt3dadd(-32.22, -34.95, -20.5, 0.89)
    pt3dadd(-32.33, -35.06, -20.5, 0.89)
    pt3dadd(-32.38, -35.22, -21, 0.89)
    pt3dadd(-32.38, -35.32, -21, 0.89)
    pt3dadd(-32.47, -35.43, -21, 0.89)
    pt3dadd(-32.47, -35.58, -21, 0.89)
    pt3dadd(-32.54, -35.74, -21, 0.89)
    pt3dadd(-32.64, -35.85, -21, 0.89)
    pt3dadd(-32.64, -36.32, -21, 0.89)
    pt3dadd(-32.69, -36.53, -21, 0.89)
    pt3dadd(-32.75, -36.69, -21, 0.89)
    pt3dadd(-32.79, -36.95, -21.5, 0.89)
    pt3dadd(-32.85, -37.06, -21.5, 0.89)
    pt3dadd(-33.17, -37.36, -21.5, 0.89)
    pt3dadd(-33.38, -37.42, -21.5, 0.89)
    pt3dadd(-33.53, -37.42, -21.5, 0.89)
    pt3dadd(-33.74, -37.47, -21.5, 0.89)
    pt3dadd(-34.01, -37.47, -22, 0.89)
    pt3dadd(-34.11, -37.36, -22, 0.89)
    pt3dadd(-34.27, -37.27, -22, 0.89)
    pt3dadd(-34.36, -37.21, -22, 0.89)
    pt3dadd(-34.53, -37.15, -22, 0.89)
    pt3dadd(-34.64, -37.06, -22, 0.89)
    pt3dadd(-34.74, -37, -22, 0.89)
    pt3dadd(-34.95, -37, -22, 0.89)
    pt3dadd(-35.06, -36.9, -22, 0.89)
    pt3dadd(-35.15, -36.79, -22, 0.89)
    pt3dadd(-35.32, -36.74, -22, 0.89)
    pt3dadd(-35.53, -36.74, -22, 0.89)
    pt3dadd(-35.53, -36.64, -22, 0.89)
    pt3dadd(-35.69, -36.58, -22, 0.89)
    pt3dadd(-35.74, -36.47, -22, 0.89)
    pt3dadd(-35.9, -36.53, -22, 0.89)
    pt3dadd(-36, -36.53, -22, 0.89)
    pt3dadd(-36.15, -36.58, -22, 0.89)
    pt3dadd(-36.32, -36.64, -22.5, 0.89)
    pt3dadd(-36.42, -36.74, -22.5, 0.89)
    pt3dadd(-36.63, -36.74, -22.5, 0.89)
    pt3dadd(-36.79, -36.9, -22.5, 0.89)
    pt3dadd(-36.89, -37, -22.5, 0.89)
    pt3dadd(-37, -37, -22.5, 0.89)
    pt3dadd(-37.21, -37.27, -22.5, 0.89)
    pt3dadd(-37.36, -37.42, -22.5, 0.89)
    pt3dadd(-37.47, -37.63, -22.5, 0.89)
    pt3dadd(-37.58, -37.79, -23, 0.89)
    pt3dadd(-37.72, -38, -23, 0.89)
    pt3dadd(-38, -38.27, -23, 0.89)
    pt3dadd(-38.1, -38.36, -23, 0.89)
    pt3dadd(-38.21, -38.53, -23, 0.89)
    pt3dadd(-38.31, -38.69, -23, 0.89)
    pt3dadd(-38.42, -38.79, -23, 0.89)
    pt3dadd(-38.47, -38.9, -23, 0.89)
    pt3dadd(-38.63, -39.04, -23, 0.89)
    pt3dadd(-38.72, -39.26, -23, 0.89)
    pt3dadd(-38.89, -39.32, -23, 0.89)
    pt3dadd(-38.99, -39.42, -23, 0.89)
    pt3dadd(-39.04, -39.53, -23, 0.89)
    pt3dadd(-39.26, -39.74, -23, 0.89)
    pt3dadd(-39.36, -39.74, -23, 0.89)
    pt3dadd(-39.52, -39.9, -23, 0.89)
    pt3dadd(-39.72, -40, -23, 0.89)
    pt3dadd(-39.83, -40.04, -23, 0.89)
    pt3dadd(-39.94, -40.11, -23, 0.89)
    pt3dadd(-40.04, -40.21, -23, 0.89)
    pt3dadd(-40.2, -40.26, -23, 0.89)
    pt3dadd(-40.36, -40.36, -23, 0.89)
    pt3dadd(-40.46, -40.42, -23, 0.89)
    pt3dadd(-40.57, -40.53, -23, 0.89)
    pt3dadd(-40.67, -40.58, -23, 0.89)
    pt3dadd(-40.78, -40.68, -23, 0.89)
    pt3dadd(-41.09, -40.68, -23, 0.89)
    pt3dadd(-41.2, -40.74, -23, 0.89)
    pt3dadd(-41.57, -40.74, -23, 0.89)
    pt3dadd(-41.72, -40.79, -23, 0.89)
    pt3dadd(-41.93, -40.84, -23, 0.89)
    pt3dadd(-42.14, -40.84, -23, 0.89)
    pt3dadd(-42.3, -40.89, -23, 0.89)
    pt3dadd(-42.41, -40.95, -23, 0.89)
    pt3dadd(-42.67, -40.95, -23, 0.89)
    pt3dadd(-42.83, -41.05, -23, 0.89)
    pt3dadd(-43.04, -41.1, -23, 0.89)
    pt3dadd(-43.14, -41.16, -23.5, 0.89)
    pt3dadd(-43.35, -41.21, -23.5, 0.89)
    pt3dadd(-43.51, -41.21, -23.5, 0.89)
    pt3dadd(-43.67, -41.26, -23.5, 0.89)
    pt3dadd(-43.77, -41.31, -23.5, 0.89)
    pt3dadd(-44.09, -41.31, -23.5, 0.89)
    pt3dadd(-44.45, -41.31, -24, 0.89)
    pt3dadd(-44.56, -41.26, -24, 0.89)
    pt3dadd(-44.66, -41.16, -24, 0.89)
    pt3dadd(-44.77, -41.1, -24, 0.89)
    pt3dadd(-44.93, -41.1, -24, 0.89)
    pt3dadd(-45.03, -41, -24, 0.89)
    pt3dadd(-45.14, -40.84, -24, 0.89)
    pt3dadd(-45.14, -40.74, -24, 0.89)
    pt3dadd(-45.24, -40.63, -24, 0.89)
    pt3dadd(-45.29, -40.47, -24.5, 0.89)
    pt3dadd(-45.35, -40.32, -24.5, 0.89)
    pt3dadd(-45.45, -40.32, -24.5, 0.89)
    pt3dadd(-45.5, -40.21, -24.5, 0.89)
    pt3dadd(-45.61, -40.11, -24.5, 0.89)
    pt3dadd(-45.71, -40.04, -24.5, 0.89)
    pt3dadd(-45.82, -39.95, -24.5, 0.89)
    pt3dadd(-45.92, -39.9, -24.5, 0.89)
    pt3dadd(-46.13, -39.84, -24.5, 0.89)
    pt3dadd(-46.5, -39.84, -24.5, 0.89)
    pt3dadd(-46.66, -39.95, -24.5, 0.89)
    pt3dadd(-46.76, -40.04, -24.5, 0.89)
    pt3dadd(-46.87, -40.15, -24.5, 0.89)
    pt3dadd(-46.92, -40.32, -24.5, 0.89)
    pt3dadd(-47.03, -40.47, -24.5, 0.89)
    pt3dadd(-47.03, -40.58, -24.5, 0.89)
    pt3dadd(-47.08, -40.68, -24.5, 0.89)
    pt3dadd(-47.24, -40.79, -24.5, 0.89)
    pt3dadd(-47.29, -40.95, -24.5, 0.89)
    pt3dadd(-47.39, -41.16, -24.5, 0.89)
    pt3dadd(-47.5, -41.31, -24.5, 0.89)
    pt3dadd(-47.6, -41.47, -24.5, 0.89)
    pt3dadd(-47.71, -41.68, -24.5, 0.89)
    pt3dadd(-47.76, -41.79, -24.5, 0.89)
    pt3dadd(-47.81, -41.89, -24.5, 0.89)
    pt3dadd(-47.81, -42.05, -24.5, 0.89)
    pt3dadd(-47.92, -42.1, -24.5, 0.89)
    pt3dadd(-47.97, -42.21, -24.5, 0.89)
    pt3dadd(-48.27, -42.58, -24.5, 0.89)
    pt3dadd(-48.48, -42.52, -25, 0.89)
    pt3dadd(-48.95, -42.52, -25, 0.89)
    pt3dadd(-49.06, -42.58, -25.5, 0.89)
    pt3dadd(-49.37, -42.58, -25.5, 0.89)
    pt3dadd(-49.58, -42.63, -25.5, 0.89)
    pt3dadd(-50.32, -42.63, -26, 0.89)
    pt3dadd(-50.37, -42.73, -26, 0.89)
    pt3dadd(-50.48, -42.79, -26, 0.89)
    pt3dadd(-50.69, -42.79, -26, 0.89)
    pt3dadd(-50.84, -42.94, -26, 0.89)
    pt3dadd(-50.95, -43.05, -26, 0.89)
    pt3dadd(-51.05, -43.15, -26, 0.89)
    pt3dadd(-51.16, -43.21, -26, 0.89)
    pt3dadd(-51.26, -43.31, -26.5, 0.89)
    pt3dadd(-51.47, -43.42, -26.5, 0.89)
    pt3dadd(-51.63, -43.47, -26.5, 0.89)
    pt3dadd(-51.74, -43.52, -26.5, 0.89)
    pt3dadd(-51.89, -43.57, -26.5, 0.89)
    pt3dadd(-52.1, -43.63, -26.5, 0.89)
    pt3dadd(-52.52, -43.63, -26.5, 0.89)
    pt3dadd(-52.73, -43.68, -26.5, 0.89)
    pt3dadd(-52.89, -43.63, -26.5, 0.89)
    pt3dadd(-53.21, -43.63, -26.5, 0.89)
    pt3dadd(-53.36, -43.57, -26.5, 0.89)
    pt3dadd(-53.57, -43.57, -27, 0.89)
    pt3dadd(-53.73, -43.52, -27, 0.89)
    pt3dadd(-53.94, -43.57, -27, 0.89)
    pt3dadd(-54.1, -43.63, -27, 0.89)
    pt3dadd(-54.36, -43.89, -27, 0.89)
    pt3dadd(-54.46, -43.94, -27, 0.89)
    pt3dadd(-54.57, -44.05, -27.5, 0.89)
    pt3dadd(-54.73, -44.1, -27.5, 0.89)
    pt3dadd(-55.09, -44.47, -27.5, 0.89)
    pt3dadd(-55.2, -44.57, -27.5, 0.89)
    pt3dadd(-55.3, -44.78, -27.5, 0.89)
    pt3dadd(-55.46, -44.94, -27.5, 0.89)
    pt3dadd(-55.51, -45.05, -27.5, 0.89)
    pt3dadd(-55.57, -45.15, -27.5, 0.89)
    pt3dadd(-55.72, -45.41, -27.5, 0.89)
    pt3dadd(-55.93, -45.62, -27.5, 0.89)
    pt3dadd(-56.04, -45.78, -27.5, 0.89)
    pt3dadd(-56.14, -45.94, -27.5, 0.89)
    pt3dadd(-56.2, -46.05, -27.5, 0.89)
    pt3dadd(-56.2, -46.26, -27.5, 0.89)
    pt3dadd(-56.25, -46.41, -27.5, 0.89)
  }
}
proc shape3d_71() {
  dend[64] {
    pt3dadd(-56.3, -46.62, -27.5, 0.89)
    pt3dadd(-56.3, -46.73, -27.5, 0.89)
    pt3dadd(-57.09, -47.09, -27.5, 0.89)
    pt3dadd(-57.19, -46.98, -28, 0.89)
    pt3dadd(-57.93, -46.98, -28, 0.89)
    pt3dadd(-58.19, -46.98, -26.5, 0.89)
    pt3dadd(-58.24, -47.09, -26, 0.89)
    pt3dadd(-58.24, -47.35, -26, 0.89)
    pt3dadd(-58.35, -47.46, -26, 0.89)
    pt3dadd(-58.4, -47.67, -25.5, 0.89)
    pt3dadd(-58.51, -47.77, -25.5, 0.89)
    pt3dadd(-58.56, -47.93, -25.5, 0.89)
    pt3dadd(-58.61, -48.14, -25.5, 0.89)
    pt3dadd(-58.77, -48.19, -25.5, 0.89)
    pt3dadd(-59.03, -48.19, -25.5, 0.89)
    pt3dadd(-59.19, -48.19, -25.5, 0.89)
    pt3dadd(-59.56, -48.19, -25.5, 0.89)
    pt3dadd(-59.71, -48.14, -25.5, 0.89)
    pt3dadd(-59.87, -48.09, -25.5, 0.89)
    pt3dadd(-61.03, -48.09, -26.5, 0.89)
    pt3dadd(-61.24, -48.14, -26.5, 0.89)
    pt3dadd(-61.34, -48.19, -26.5, 0.89)
    pt3dadd(-61.55, -48.3, -26.5, 0.89)
    pt3dadd(-61.71, -48.4, -26.5, 0.89)
    pt3dadd(-61.81, -48.51, -27, 0.89)
    pt3dadd(-61.92, -48.56, -27, 0.89)
    pt3dadd(-62.08, -48.61, -27, 0.89)
    pt3dadd(-62.29, -48.66, -27.5, 0.89)
    pt3dadd(-62.55, -48.66, -27.5, 0.89)
    pt3dadd(-62.71, -48.61, -27.5, 0.89)
    pt3dadd(-62.92, -48.61, -27.5, 0.89)
    pt3dadd(-63.13, -48.66, -27.5, 0.89)
    pt3dadd(-63.28, -48.72, -27.5, 0.89)
    pt3dadd(-63.39, -48.77, -27.5, 0.89)
    pt3dadd(-64.06, -48.77, -28, 0.89)
    pt3dadd(-64.23, -48.82, -28, 0.89)
    pt3dadd(-64.44, -48.93, -28, 0.89)
    pt3dadd(-64.59, -48.98, -28, 0.89)
    pt3dadd(-64.7, -49.09, -28, 0.89)
    pt3dadd(-64.81, -49.19, -28, 0.89)
    pt3dadd(-64.95, -49.3, -28, 0.89)
    pt3dadd(-65.12, -49.45, -28, 0.89)
    pt3dadd(-65.28, -49.66, -28, 0.89)
    pt3dadd(-65.33, -49.82, -28, 0.89)
    pt3dadd(-65.44, -49.93, -28.5, 0.89)
    pt3dadd(-65.54, -50.08, -28.5, 0.89)
    pt3dadd(-65.75, -50.19, -28.5, 0.89)
    pt3dadd(-65.86, -50.29, -28.5, 0.89)
    pt3dadd(-66.01, -50.35, -28.5, 0.89)
    pt3dadd(-66.17, -50.5, -29, 0.89)
    pt3dadd(-66.22, -50.71, -29.5, 0.89)
    pt3dadd(-66.17, -50.87, -29.5, 0.89)
    pt3dadd(-66.12, -51.08, -29.5, 0.89)
    pt3dadd(-66.01, -51.24, -30, 0.89)
    pt3dadd(-65.95, -51.35, -30, 0.89)
    pt3dadd(-65.86, -51.5, -30, 0.89)
    pt3dadd(-65.8, -51.61, -30, 0.89)
    pt3dadd(-65.7, -51.82, -30, 0.89)
    pt3dadd(-65.7, -51.98, -30, 0.89)
    pt3dadd(-65.65, -52.08, -30.5, 0.89)
    pt3dadd(-65.65, -52.24, -30.5, 0.89)
    pt3dadd(-65.7, -52.34, -30.5, 0.89)
    pt3dadd(-65.75, -52.5, -30.5, 0.89)
    pt3dadd(-65.86, -52.61, -30.5, 0.89)
    pt3dadd(-66.01, -52.77, -30.5, 0.89)
    pt3dadd(-66.22, -52.77, -30.5, 0.89)
    pt3dadd(-66.38, -52.82, -30.5, 0.89)
    pt3dadd(-66.75, -52.82, -30.5, 0.89)
    pt3dadd(-67.17, -52.77, -30.5, 0.89)
    pt3dadd(-67.27, -52.71, -30.5, 0.89)
    pt3dadd(-67.43, -52.66, -30.5, 0.89)
    pt3dadd(-69.14, -52.98, -30.5, 0.89)
    pt3dadd(-69.56, -52.98, -31, 0.89)
    pt3dadd(-69.7, -53.08, -31, 0.89)
    pt3dadd(-69.81, -53.19, -31, 0.89)
    pt3dadd(-69.92, -53.24, -31, 0.89)
    pt3dadd(-70.13, -53.45, -31, 0.89)
    pt3dadd(-70.18, -53.61, -31.5, 0.89)
    pt3dadd(-70.18, -53.82, -31.5, 0.89)
    pt3dadd(-70.29, -53.98, -31.5, 0.89)
    pt3dadd(-70.29, -54.19, -31.5, 0.89)
    pt3dadd(-70.39, -54.45, -32, 0.89)
    pt3dadd(-70.45, -54.66, -32, 0.89)
    pt3dadd(-70.5, -54.82, -32, 0.89)
    pt3dadd(-70.55, -55.03, -32.5, 0.89)
    pt3dadd(-70.55, -55.29, -33, 0.89)
    pt3dadd(-70.66, -55.5, -33, 0.89)
    pt3dadd(-70.81, -55.61, -33, 0.89)
    pt3dadd(-70.97, -55.66, -33, 0.89)
    pt3dadd(-71.13, -55.76, -33, 0.89)
    pt3dadd(-71.29, -55.76, -33, 0.89)
    pt3dadd(-71.44, -55.82, -33, 0.89)
    pt3dadd(-71.65, -55.82, -33.5, 0.89)
    pt3dadd(-71.76, -55.87, -33.5, 0.89)
    pt3dadd(-71.92, -56.08, -33.5, 0.89)
    pt3dadd(-72.06, -56.34, -33.5, 0.89)
    pt3dadd(-72.18, -56.55, -33.5, 0.89)
    pt3dadd(-72.23, -56.71, -33.5, 0.89)
    pt3dadd(-72.28, -56.92, -33.5, 0.89)
    pt3dadd(-72.34, -57.08, -33.5, 0.89)
    pt3dadd(-72.39, -57.24, -33.5, 0.89)
    pt3dadd(-72.39, -57.5, -33.5, 0.89)
    pt3dadd(-72.55, -57.76, -33.5, 0.89)
    pt3dadd(-72.59, -57.81, -34, 0.89)
    pt3dadd(-72.65, -58.02, -34, 0.89)
    pt3dadd(-72.76, -58.18, -34, 0.89)
    pt3dadd(-72.81, -58.39, -34, 0.89)
    pt3dadd(-72.91, -58.66, -34.5, 0.89)
    pt3dadd(-72.97, -58.76, -34.5, 0.89)
    pt3dadd(-73.02, -58.92, -34.5, 0.89)
    pt3dadd(-73.12, -59.02, -34.5, 0.89)
    pt3dadd(-73.23, -59.23, -34.5, 0.89)
    pt3dadd(-73.28, -59.39, -35, 0.89)
    pt3dadd(-73.39, -59.5, -35, 0.89)
    pt3dadd(-73.48, -59.6, -35.5, 0.89)
    pt3dadd(-73.65, -59.71, -35.5, 0.89)
    pt3dadd(-73.95, -59.71, -35.5, 0.89)
    pt3dadd(-74.12, -59.65, -35.5, 0.89)
    pt3dadd(-74.7, -59.65, -36, 0.89)
    pt3dadd(-74.75, -59.81, -36, 0.89)
    pt3dadd(-74.86, -59.86, -36, 0.89)
    pt3dadd(-74.95, -60.02, -36, 0.89)
    pt3dadd(-75.12, -60.08, -36, 0.89)
    pt3dadd(-75.43, -60.39, -36, 0.89)
    pt3dadd(-75.48, -60.65, -36, 0.89)
    pt3dadd(-75.54, -60.76, -36, 0.89)
    pt3dadd(-75.54, -61.02, -36, 0.89)
    pt3dadd(-75.59, -61.18, -36, 0.89)
    pt3dadd(-75.59, -61.39, -36, 0.89)
    pt3dadd(-75.64, -61.49, -36, 0.89)
    pt3dadd(-75.7, -61.6, -36, 0.89)
    pt3dadd(-75.75, -61.76, -36.5, 0.89)
    pt3dadd(-75.84, -61.91, -36.5, 0.89)
    pt3dadd(-75.95, -61.97, -36.5, 0.89)
    pt3dadd(-76.12, -62.02, -36.5, 0.89)
    pt3dadd(-76.27, -62.07, -37, 0.89)
    pt3dadd(-76.48, -62.07, -37, 0.89)
    pt3dadd(-76.64, -62.13, -37, 0.89)
    pt3dadd(-76.84, -62.07, -37, 0.89)
    pt3dadd(-77.22, -62.07, -37, 0.89)
    pt3dadd(-77.38, -62.07, -37, 0.89)
    pt3dadd(-77.64, -62.07, -37, 0.89)
    pt3dadd(-77.84, -62.07, -37.5, 0.89)
    pt3dadd(-78.22, -62.07, -37.5, 0.89)
    pt3dadd(-78.43, -62.13, -37.5, 0.89)
    pt3dadd(-78.58, -62.18, -37.5, 0.89)
    pt3dadd(-78.79, -62.18, -37.5, 0.89)
    pt3dadd(-78.9, -62.28, -37.5, 0.89)
    pt3dadd(-79.42, -62.81, -37.5, 0.89)
    pt3dadd(-79.53, -63.02, -37.5, 0.89)
    pt3dadd(-79.69, -63.18, -38.5, 0.89)
    pt3dadd(-79.69, -63.39, -38.5, 0.89)
    pt3dadd(-79.73, -63.49, -38.5, 0.89)
    pt3dadd(-79.73, -63.6, -38.5, 0.89)
    pt3dadd(-79.79, -63.7, -39, 0.89)
    pt3dadd(-79.84, -63.86, -39, 0.89)
    pt3dadd(-79.84, -64.06, -40, 0.89)
    pt3dadd(-80.52, -64.06, -40, 0.89)
    pt3dadd(-80.62, -64.01, -40.5, 0.89)
    pt3dadd(-80.88, -64.01, -40.5, 0.89)
    pt3dadd(-81.09, -64.06, -40.5, 0.89)
    pt3dadd(-81.25, -64.06, -41.5, 0.89)
    pt3dadd(-81.25, -63.8, -41.5, 0.89)
    pt3dadd(-81.09, -63.54, -41.5, 0.89)
    pt3dadd(-80.98, -63.43, -42, 0.89)
    pt3dadd(-80.88, -63.27, -42, 0.89)
    pt3dadd(-80.73, -63.06, -42, 0.89)
    pt3dadd(-80.56, -62.91, -42, 0.89)
    pt3dadd(-80.45, -62.75, -42, 0.89)
    pt3dadd(-80.31, -62.54, -42, 0.89)
    pt3dadd(-80.09, -62.43, -43, 0.89)
    pt3dadd(-79.83, -62.43, -43.5, 0.89)
    pt3dadd(-79.73, -62.54, -43.5, 0.89)
    pt3dadd(-79.56, -62.54, -43.5, 0.89)
    pt3dadd(-79.36, -62.59, -44, 0.89)
    pt3dadd(-79.26, -62.64, -44, 0.89)
    pt3dadd(-79.2, -62.75, -44, 0.89)
    pt3dadd(-79.09, -62.85, -44.5, 0.89)
    pt3dadd(-79.05, -62.96, -44.5, 0.89)
    pt3dadd(-78.94, -63.12, -45, 0.89)
    pt3dadd(-78.84, -63.17, -45, 0.89)
    pt3dadd(-78.73, -63.27, -45.5, 0.89)
    pt3dadd(-78.63, -63.43, -45.5, 0.89)
    pt3dadd(-78.56, -63.54, -45.5, 0.89)
    pt3dadd(-78.52, -63.69, -45.5, 0.89)
    pt3dadd(-78.42, -63.8, -46, 0.89)
    pt3dadd(-78.31, -63.91, -46.5, 0.89)
    pt3dadd(-78.26, -64.01, -46.5, 0.89)
    pt3dadd(-78.15, -64.12, -46.5, 0.89)
    pt3dadd(-78.05, -64.22, -47, 0.89)
    pt3dadd(-77.89, -64.33, -47, 0.89)
    pt3dadd(-77.79, -64.43, -47, 0.89)
    pt3dadd(-77.68, -64.48, -47, 0.89)
    pt3dadd(-77.58, -64.54, -47, 0.89)
    pt3dadd(-77.52, -64.69, -47, 0.89)
    pt3dadd(-77.42, -64.8, -47.5, 0.89)
    pt3dadd(-77.37, -65.01, -47.5, 0.89)
    pt3dadd(-77.26, -65.17, -47.5, 0.89)
    pt3dadd(-77.16, -65.31, -47.5, 0.89)
    pt3dadd(-77.09, -65.43, -47.5, 0.89)
    pt3dadd(-77, -65.69, -47.5, 0.89)
    pt3dadd(-76.95, -65.84, -48, 0.89)
    pt3dadd(-76.89, -66.06, -48, 0.89)
    pt3dadd(-76.89, -66.43, -48.5, 0.89)
    pt3dadd(-76.84, -66.59, -48.5, 0.89)
    pt3dadd(-76.89, -66.8, -48.5, 0.89)
    pt3dadd(-77, -66.95, -49, 0.89)
    pt3dadd(-77.09, -67.06, -49, 0.89)
    pt3dadd(-77.2, -67.16, -49.5, 0.89)
    pt3dadd(-77.2, -67.31, -49.5, 0.89)
    pt3dadd(-77.16, -67.53, -50, 0.89)
    pt3dadd(-77.16, -67.73, -50, 0.89)
    pt3dadd(-77.09, -67.9, -50, 0.89)
    pt3dadd(-77.09, -68.11, -50, 0.89)
    pt3dadd(-77.05, -68.27, -50.5, 0.89)
    pt3dadd(-77.09, -68.37, -50.5, 0.89)
    pt3dadd(-77.16, -68.48, -51, 0.89)
    pt3dadd(-77.26, -68.58, -51, 0.89)
    pt3dadd(-77.47, -68.58, -51, 0.89)
    pt3dadd(-77.63, -68.64, -51, 0.89)
    pt3dadd(-77.84, -68.64, -51, 0.89)
    pt3dadd(-78, -68.69, -51, 0.89)
    pt3dadd(-78.2, -68.64, -51, 0.89)
    pt3dadd(-78.42, -68.58, -51, 0.89)
    pt3dadd(-78.68, -68.53, -51, 0.89)
    pt3dadd(-78.84, -68.43, -51, 0.89)
    pt3dadd(-78.98, -68.43, -51, 0.89)
    pt3dadd(-79.15, -68.37, -51, 0.89)
    pt3dadd(-79.94, -68.37, -51, 0.89)
    pt3dadd(-80.04, -68.48, -51, 0.89)
    pt3dadd(-80.2, -68.53, -51, 0.89)
    pt3dadd(-80.36, -68.58, -51, 0.89)
    pt3dadd(-80.52, -68.64, -51, 0.89)
    pt3dadd(-80.73, -68.69, -51, 0.89)
    pt3dadd(-80.88, -68.69, -51, 0.89)
    pt3dadd(-80.98, -68.79, -51, 0.89)
    pt3dadd(-81.95, -68.51, -51, 1.05)
    pt3dadd(-82, -68.61, -51, 1.05)
    pt3dadd(-82.21, -68.67, -50.5, 1.05)
    pt3dadd(-82.32, -68.72, -50.5, 1.05)
    pt3dadd(-82.47, -68.77, -50.5, 1.05)
    pt3dadd(-82.63, -68.81, -50.5, 1.05)
    pt3dadd(-82.84, -68.81, -50.5, 1.05)
    pt3dadd(-83.1, -68.88, -50.5, 1.05)
    pt3dadd(-83.31, -68.88, -50.5, 1.05)
    pt3dadd(-83.47, -69.03, -50.5, 1.05)
    pt3dadd(-83.73, -69.03, -50.5, 1.05)
    pt3dadd(-83.84, -69.14, -50.5, 1.05)
    pt3dadd(-83.94, -69.19, -50.5, 1.05)
  }
}
proc shape3d_72() {
  dend[64] {
    pt3dadd(-84.1, -69.3, -50.5, 1.05)
    pt3dadd(-84.21, -69.3, -50.5, 1.05)
    pt3dadd(-84.31, -69.34, -51, 1.05)
    pt3dadd(-84.57, -69.34, -51, 1.05)
    pt3dadd(-84.73, -69.4, -51, 1.05)
    pt3dadd(-84.89, -69.4, -51, 1.05)
    pt3dadd(-84.99, -69.45, -51, 1.05)
    pt3dadd(-85.2, -69.45, -51, 1.05)
    pt3dadd(-85.31, -69.51, -51, 1.05)
    pt3dadd(-85.41, -69.61, -51, 1.05)
    pt3dadd(-85.52, -69.61, -51.5, 1.05)
    pt3dadd(-85.68, -69.88, -51.5, 1.05)
    pt3dadd(-85.78, -70.09, -51.5, 1.05)
    pt3dadd(-85.83, -70.23, -51.5, 1.05)
    pt3dadd(-85.83, -70.4, -52, 1.05)
    pt3dadd(-85.89, -70.56, -52, 1.05)
    pt3dadd(-85.89, -71.08, -52, 1.05)
    pt3dadd(-85.94, -71.29, -52, 1.05)
    pt3dadd(-85.99, -71.45, -52, 1.05)
    pt3dadd(-85.99, -71.56, -52, 1.05)
    pt3dadd(-86.1, -71.66, -52, 1.05)
    pt3dadd(-86.25, -71.66, -52.5, 1.05)
    pt3dadd(-86.36, -71.72, -52.5, 1.05)
    pt3dadd(-86.52, -71.77, -53, 1.05)
    pt3dadd(-86.67, -71.77, -53, 1.05)
    pt3dadd(-86.73, -71.61, -53, 1.05)
    pt3dadd(-87.09, -71.61, -53.5, 1.05)
    pt3dadd(-87.25, -71.56, -54, 1.05)
    pt3dadd(-87.36, -71.34, -55, 1.05)
    pt3dadd(-87.51, -71.23, -55, 1.05)
    pt3dadd(-87.62, -71.14, -55, 1.05)
    pt3dadd(-87.62, -71.03, -55, 1.05)
    pt3dadd(-87.88, -70.93, -55, 1.05)
    pt3dadd(-88.09, -70.77, -55, 1.05)
    pt3dadd(-88.2, -70.72, -55, 1.05)
    pt3dadd(-88.41, -70.61, -55, 1.05)
    pt3dadd(-88.62, -70.51, -55, 1.05)
    pt3dadd(-88.77, -70.4, -55, 1.05)
    pt3dadd(-88.93, -70.34, -55, 1.05)
    pt3dadd(-89.09, -70.23, -55, 1.05)
    pt3dadd(-89.25, -70.34, -55, 1.05)
    pt3dadd(-89.35, -70.3, -55, 1.05)
    pt3dadd(-89.61, -70.3, -55, 1.05)
    pt3dadd(-89.72, -70.23, -55, 1.05)
    pt3dadd(-89.88, -70.23, -55, 1.05)
    pt3dadd(-90.03, -70.3, -55, 1.05)
    pt3dadd(-90.4, -70.3, -55, 1.05)
    pt3dadd(-90.61, -70.23, -55, 1.05)
    pt3dadd(-90.93, -70.23, -55, 1.05)
    pt3dadd(-91.14, -70.19, -55, 1.05)
    pt3dadd(-91.29, -70.19, -55, 1.05)
    pt3dadd(-91.5, -70.14, -55, 1.05)
    pt3dadd(-91.66, -70.09, -55.5, 1.05)
    pt3dadd(-91.87, -70.03, -55.5, 1.05)
    pt3dadd(-92.19, -70.03, -55.5, 1.05)
    pt3dadd(-92.34, -70.03, -55.5, 1.05)
    pt3dadd(-92.55, -70.19, -56, 1.05)
    pt3dadd(-92.71, -70.3, -56, 1.05)
    pt3dadd(-92.82, -70.45, -56, 1.05)
    pt3dadd(-92.87, -70.66, -56, 1.05)
    pt3dadd(-92.92, -70.81, -56.5, 1.05)
    pt3dadd(-92.92, -71.03, -56.5, 1.05)
    pt3dadd(-92.97, -71.14, -56.5, 1.05)
    pt3dadd(-92.97, -71.29, -56.5, 1.05)
    pt3dadd(-93.08, -71.4, -56.5, 1.05)
    pt3dadd(-93.18, -71.45, -56.5, 1.05)
    pt3dadd(-93.34, -71.56, -57, 1.05)
    pt3dadd(-93.5, -71.56, -57, 1.05)
    pt3dadd(-93.66, -71.61, -57, 1.05)
    pt3dadd(-93.81, -71.61, -57, 1.05)
    pt3dadd(-94.02, -71.66, -57, 1.05)
    pt3dadd(-94.23, -71.72, -57, 1.05)
    pt3dadd(-94.44, -71.81, -57, 1.05)
    pt3dadd(-94.55, -71.93, -57, 1.05)
    pt3dadd(-94.65, -71.98, -57, 1.05)
    pt3dadd(-94.86, -72.19, -57.5, 1.05)
    pt3dadd(-94.97, -72.29, -57.5, 1.05)
    pt3dadd(-95.07, -72.45, -57.5, 1.05)
    pt3dadd(-95.13, -72.56, -57.5, 1.05)
    pt3dadd(-95.34, -72.66, -57.5, 1.05)
    pt3dadd(-95.49, -72.7, -57.5, 1.05)
    pt3dadd(-95.7, -72.7, -57.5, 1.05)
    pt3dadd(-95.86, -72.77, -57.5, 1.05)
    pt3dadd(-96.02, -72.77, -57.5, 1.05)
    pt3dadd(-96.12, -72.66, -57.5, 1.05)
    pt3dadd(-96.28, -72.61, -58, 1.05)
    pt3dadd(-96.44, -72.5, -58, 1.05)
    pt3dadd(-96.54, -72.45, -58, 1.05)
    pt3dadd(-96.65, -72.4, -58, 1.05)
    pt3dadd(-96.96, -72.4, -58.5, 1.05)
    pt3dadd(-97.28, -72.7, -58.5, 1.05)
    pt3dadd(-97.38, -72.87, -58.5, 1.05)
    pt3dadd(-97.44, -73.03, -58.5, 1.05)
    pt3dadd(-97.65, -73.13, -58.5, 1.05)
    pt3dadd(-97.7, -73.23, -58.5, 1.05)
    pt3dadd(-97.8, -73.34, -58.5, 1.05)
    pt3dadd(-97.96, -73.4, -58.5, 1.05)
    pt3dadd(-98.01, -73.5, -58.5, 1.05)
    pt3dadd(-98.12, -73.61, -59, 1.05)
    pt3dadd(-98.17, -73.87, -59, 1.05)
    pt3dadd(-98.22, -74.03, -59, 1.05)
    pt3dadd(-98.28, -74.34, -59, 1.05)
    pt3dadd(-98.28, -74.7, -59, 1.05)
    pt3dadd(-98.22, -74.87, -59, 1.05)
    pt3dadd(-98.22, -75.08, -59, 1.05)
    pt3dadd(-98.17, -75.18, -59, 1.05)
    pt3dadd(-98.28, -75.29, -59, 1.05)
    pt3dadd(-99.04, -76.7, -59.5, 1.05)
    pt3dadd(-98.93, -76.75, -60, 1.05)
    pt3dadd(-98.88, -76.91, -60, 1.05)
    pt3dadd(-98.83, -77.02, -60, 1.05)
    pt3dadd(-98.72, -77.17, -60, 1.05)
    pt3dadd(-98.67, -77.39, -61, 1.05)
    pt3dadd(-98.62, -77.54, -61, 1.05)
    pt3dadd(-98.62, -77.75, -61, 1.05)
    pt3dadd(-98.72, -78.02, -61, 1.05)
    pt3dadd(-98.77, -78.12, -61, 1.05)
    pt3dadd(-98.98, -78.23, -61, 1.05)
    pt3dadd(-99.14, -78.28, -61, 1.05)
    pt3dadd(-99.35, -78.33, -61.5, 1.05)
    pt3dadd(-99.61, -78.44, -61.5, 1.05)
    pt3dadd(-99.88, -78.44, -61.5, 1.05)
    pt3dadd(-100.14, -78.48, -61.5, 1.05)
    pt3dadd(-100.35, -78.65, -61.5, 1.05)
    pt3dadd(-100.45, -78.59, -61.5, 1.05)
    pt3dadd(-100.56, -78.75, -61.5, 1.05)
    pt3dadd(-100.72, -78.91, -61.5, 1.05)
    pt3dadd(-100.82, -79.12, -61.5, 1.05)
    pt3dadd(-100.87, -79.33, -62, 1.05)
    pt3dadd(-100.98, -79.48, -62, 1.05)
    pt3dadd(-100.98, -79.65, -62, 1.05)
    pt3dadd(-101.14, -79.8, -62, 1.05)
    pt3dadd(-101.19, -79.95, -62, 1.05)
    pt3dadd(-101.35, -80.06, -62, 1.05)
    pt3dadd(-101.45, -80.12, -62, 1.05)
    pt3dadd(-102.34, -80.12, -62, 1.05)
    pt3dadd(-102.55, -80.06, -62, 1.05)
    pt3dadd(-102.71, -80.01, -62, 1.05)
    pt3dadd(-102.87, -80.12, -62, 1.05)
    pt3dadd(-103.03, -80.38, -62, 1.05)
    pt3dadd(-103.08, -80.59, -62, 1.05)
    pt3dadd(-103.13, -80.8, -62, 1.05)
    pt3dadd(-103.18, -80.95, -62, 1.05)
    pt3dadd(-103.18, -81.64, -62, 1.05)
    pt3dadd(-103.24, -81.8, -62, 1.05)
    pt3dadd(-103.18, -82.01, -62, 1.05)
    pt3dadd(-103.18, -82.33, -62, 1.05)
    pt3dadd(-103.18, -82.43, -62.5, 1.05)
    pt3dadd(-103.13, -82.69, -62.5, 1.05)
    pt3dadd(-103.18, -82.9, -62.5, 1.05)
    pt3dadd(-103.24, -83.01, -62.5, 1.05)
    pt3dadd(-103.29, -83.17, -62.5, 1.05)
    pt3dadd(-103.66, -83.54, -62.5, 1.05)
    pt3dadd(-103.87, -83.64, -62.5, 1.05)
    pt3dadd(-104.02, -83.8, -62.5, 1.05)
    pt3dadd(-104.23, -83.9, -62.5, 1.05)
    pt3dadd(-104.44, -84.01, -62.5, 1.05)
    pt3dadd(-104.6, -84.17, -62.5, 1.05)
  }
  axon[0] {pt3dclear()
    pt3dadd(0.26, 0.23, 7.67, 10.9468)
    pt3dadd(1.46, 6.07, -47.5, 0.58)
    pt3dadd(1.51, 6.28, -47.5, 0.58)
    pt3dadd(1.51, 6.76, -47.5, 0.58)
    pt3dadd(1.56, 6.97, -47.5, 0.58)
    pt3dadd(1.62, 7.07, -47.5, 0.58)
    pt3dadd(1.72, 7.23, -47.5, 0.58)
    pt3dadd(1.77, 7.34, -47.5, 0.58)
    pt3dadd(1.88, 7.44, -47.5, 0.58)
    pt3dadd(1.98, 7.44, -47.5, 0.58)
    pt3dadd(2.09, 7.55, -47.5, 0.58)
    pt3dadd(2.14, 7.44, -47.5, 0.58)
    pt3dadd(2.25, 7.44, -47.5, 0.58)
    pt3dadd(2.35, 7.49, -47.5, 0.58)
    pt3dadd(2.46, 7.49, -48, 0.58)
    pt3dadd(2.5, 7.6, -48, 0.58)
    pt3dadd(2.56, 7.86, -48, 0.58)
    pt3dadd(2.61, 8.02, -48.5, 0.58)
    pt3dadd(2.56, 8.23, -48.5, 0.58)
    pt3dadd(2.5, 8.39, -48.5, 0.58)
    pt3dadd(2.35, 8.6, -48.5, 0.58)
    pt3dadd(2.29, 8.69, -49, 0.58)
    pt3dadd(2.14, 8.86, -49, 0.58)
    pt3dadd(2.09, 8.97, -48.5, 0.58)
    pt3dadd(1.98, 9.07, -48.5, 0.58)
    pt3dadd(1.88, 9.27, -47.5, 0.58)
    pt3dadd(1.77, 9.39, -47.5, 0.58)
    pt3dadd(1.67, 9.53, -47.5, 0.58)
    pt3dadd(1.62, 9.6, -46.5, 0.58)
    pt3dadd(1.51, 9.65, -46.5, 0.58)
    pt3dadd(1.41, 9.75, -46.5, 0.58)
    pt3dadd(1.3, 9.75, -46.5, 0.58)
    pt3dadd(1.2, 9.81, -46, 0.58)
    pt3dadd(0.88, 9.81, -46, 0.58)
    pt3dadd(0.72, 9.75, -45.5, 0.58)
    pt3dadd(0.62, 9.65, -45.5, 0.58)
    pt3dadd(0.51, 9.65, -45.5, 0.58)
    pt3dadd(0.41, 9.53, -45, 0.58)
    pt3dadd(0.3, 9.49, -45, 0.58)
    pt3dadd(0.25, 9.39, -45, 0.58)
    pt3dadd(0.15, 9.49, -45, 0.58)
    pt3dadd(0.04, 9.53, -44.5, 0.58)
    pt3dadd(-0.06, 9.6, -44.5, 0.58)
    pt3dadd(-0.22, 9.6, -44.5, 0.58)
    pt3dadd(-0.33, 9.49, -44.5, 0.58)
    pt3dadd(-0.48, 9.44, -44.5, 0.58)
    pt3dadd(-0.59, 9.33, -44.5, 0.58)
    pt3dadd(-0.69, 9.27, -44, 0.58)
    pt3dadd(-0.75, 9.07, -44, 0.58)
    pt3dadd(-0.8, 8.97, -44, 0.58)
    pt3dadd(-0.8, 8.75, -44, 0.58)
    pt3dadd(-2, 8.11, -44, 0.37)
    pt3dadd(-2.16, 8.07, -44, 0.37)
    pt3dadd(-2.27, 8.02, -44, 0.37)
    pt3dadd(-2.37, 7.97, -44, 0.37)
    pt3dadd(-2.58, 7.86, -44, 0.37)
    pt3dadd(-2.85, 7.76, -44, 0.37)
    pt3dadd(-3.06, 7.76, -44, 0.37)
    pt3dadd(-3.16, 7.7, -44, 0.37)
    pt3dadd(-3.48, 7.7, -44, 0.37)
    pt3dadd(-3.58, 7.7, -43.5, 0.37)
    pt3dadd(-3.79, 7.91, -43.5, 0.37)
    pt3dadd(-3.95, 8.07, -43, 0.37)
    pt3dadd(-4, 8.27, -43, 0.37)
    pt3dadd(-4.05, 8.44, -42.5, 0.37)
    pt3dadd(-4.05, 8.65, -42.5, 0.37)
    pt3dadd(-3.9, 8.91, -42, 0.37)
    pt3dadd(-3.74, 9.02, -42, 0.37)
    pt3dadd(-3.63, 9.11, -42, 0.37)
    pt3dadd(-3.53, 9.27, -42, 0.37)
    pt3dadd(-3.32, 9.39, -42, 0.37)
    pt3dadd(-3.06, 9.65, -41.5, 0.37)
    pt3dadd(-2.95, 9.81, -41.5, 0.37)
    pt3dadd(-2.85, 9.91, -41.5, 0.37)
    pt3dadd(-2.79, 10.11, -41.5, 0.37)
    pt3dadd(-2.69, 10.28, -41.5, 0.37)
    pt3dadd(-2.64, 10.44, -41.5, 0.37)
    pt3dadd(-2.52, 10.59, -41.5, 0.37)
    pt3dadd(-2.52, 10.75, -41.5, 0.37)
    pt3dadd(-2.43, 10.86, -41.5, 0.37)
    pt3dadd(-2.43, 11.02, -41, 0.37)
    pt3dadd(-2.31, 11.28, -41, 0.37)
    pt3dadd(-2.27, 11.44, -41, 0.37)
    pt3dadd(-2.22, 11.59, -40.5, 0.37)
    pt3dadd(-2.22, 12.91, -40.5, 0.37)
    pt3dadd(-2.27, 13.12, -40.5, 0.37)
    pt3dadd(-2.43, 13.38, -40.5, 0.37)
    pt3dadd(-2.58, 13.38, -40, 0.37)
    pt3dadd(-2.74, 13.38, -40, 0.37)
    pt3dadd(-2.9, 13.33, -40, 0.37)
    pt3dadd(-3, 13.22, -40, 0.37)
  }
}
proc shape3d_73() {
  axon[0] {
    pt3dadd(-3.11, 13.12, -39.5, 0.37)
    pt3dadd(-3.21, 12.96, -39.5, 0.37)
    pt3dadd(-3.27, 12.75, -39.5, 0.37)
    pt3dadd(-3.37, 12.59, -39.5, 0.37)
    pt3dadd(-3.42, 12.49, -39.5, 0.37)
    pt3dadd(-3.42, 12.01, -39.5, 0.37)
    pt3dadd(-3.37, 11.8, -39.5, 0.37)
    pt3dadd(-3.37, 10.75, -39.5, 0.37)
    pt3dadd(-3.42, 10.59, -39.5, 0.37)
    pt3dadd(-3.53, 10.38, -38.5, 0.37)
    pt3dadd(-3.69, 10.23, -38, 0.37)
    pt3dadd(-3.9, 10.23, -38, 0.37)
    pt3dadd(-4, 10.17, -38, 0.37)
    pt3dadd(-4.11, 10.17, -38, 0.37)
    pt3dadd(-4.26, 10.23, -37.5, 0.37)
    pt3dadd(-4.37, 10.28, -37.5, 0.37)
    pt3dadd(-4.58, 10.23, -37.5, 0.37)
    pt3dadd(-4.74, 10.17, -37.5, 0.37)
    pt3dadd(-4.63, 10.28, -37.5, 0.37)
    pt3dadd(-4.88, 10.28, -37.5, 0.37)
    pt3dadd(-5, 10.33, -37, 0.37)
    pt3dadd(-5.09, 10.38, -37, 0.37)
    pt3dadd(-5.26, 10.38, -37, 0.37)
    pt3dadd(-5.37, 10.49, -37, 0.37)
    pt3dadd(-5.47, 10.59, -37, 0.37)
    pt3dadd(-5.52, 10.7, -37, 0.37)
    pt3dadd(-5.63, 10.81, -37, 0.37)
    pt3dadd(-5.63, 10.91, -36.5, 0.37)
    pt3dadd(-5.73, 11.07, -36.5, 0.37)
    pt3dadd(-5.79, 11.17, -36.5, 0.37)
    pt3dadd(-5.84, 11.28, -36.5, 0.37)
    pt3dadd(-5.94, 11.28, -36.5, 0.37)
    pt3dadd(-6, 11.44, -36.5, 0.37)
    pt3dadd(-6.1, 11.38, -36.5, 0.37)
    pt3dadd(-6.2, 11.38, -36.5, 0.37)
    pt3dadd(-6.1, 11.07, -35, 0.37)
    pt3dadd(-6.2, 11.17, -35, 0.37)
    pt3dadd(-6.31, 11.28, -35, 0.37)
    pt3dadd(-6.41, 11.33, -35, 0.37)
    pt3dadd(-6.57, 11.44, -35, 0.37)
    pt3dadd(-6.68, 11.49, -35, 0.37)
    pt3dadd(-6.73, 11.59, -35, 0.37)
    pt3dadd(-6.83, 11.65, -35, 0.37)
    pt3dadd(-6.94, 11.75, -35, 0.37)
    pt3dadd(-7.1, 11.86, -35, 0.37)
    pt3dadd(-7.25, 11.96, -35, 0.37)
    pt3dadd(-7.36, 12.07, -34.5, 0.37)
    pt3dadd(-7.46, 12.12, -34.5, 0.37)
    pt3dadd(-7.62, 12.12, -34.5, 0.37)
    pt3dadd(-7.73, 12.17, -34.5, 0.37)
    pt3dadd(-8.15, 12.17, -34, 0.37)
    pt3dadd(-8.3, 12.17, -34, 0.37)
    pt3dadd(-8.41, 12.07, -34, 0.37)
    pt3dadd(-8.46, 11.86, -33.5, 0.37)
    pt3dadd(-8.46, 11.23, -32.5, 0.37)
    pt3dadd(-8.61, 11.07, -32.5, 0.37)
    pt3dadd(-8.83, 10.96, -32.5, 0.37)
    pt3dadd(-8.99, 10.91, -32.5, 0.37)
    pt3dadd(-9.03, 11.02, -32.5, 0.37)
    pt3dadd(-9.35, 11.02, -32.5, 0.37)
    pt3dadd(-9.46, 10.96, -32.5, 0.37)
    pt3dadd(-9.61, 10.96, -32.5, 0.37)
    pt3dadd(-9.77, 10.91, -32.5, 0.37)
    pt3dadd(-10.19, 10.91, -32, 0.37)
    pt3dadd(-10.25, 11.02, -32, 0.37)
    pt3dadd(-10.67, 11.28, -32, 0.21)
    pt3dadd(-10.61, 11.44, -31.5, 0.21)
    pt3dadd(-10.51, 11.59, -31.5, 0.21)
    pt3dadd(-10.51, 11.75, -31.5, 0.21)
    pt3dadd(-10.51, 11.86, -31, 0.21)
    pt3dadd(-10.61, 11.75, -31, 0.21)
    pt3dadd(-10.72, 11.7, -31, 0.21)
    pt3dadd(-10.77, 11.59, -31, 0.21)
    pt3dadd(-10.88, 11.44, -31, 0.21)
    pt3dadd(-10.98, 11.23, -30.5, 0.21)
    pt3dadd(-10.98, 11.07, -30.5, 0.21)
    pt3dadd(-11.03, 10.91, -30.5, 0.21)
    pt3dadd(-11.09, 10.81, -30.5, 0.21)
    pt3dadd(-11.14, 10.7, -30.5, 0.21)
    pt3dadd(-11.19, 10.59, -30.5, 0.21)
    pt3dadd(-11.3, 10.59, -30.5, 0.21)
    pt3dadd(-11.35, 10.49, -30.5, 0.21)
    pt3dadd(-11.56, 10.49, -30.5, 0.21)
    pt3dadd(-11.72, 10.54, -30.5, 0.21)
    pt3dadd(-11.82, 10.65, -30.5, 0.21)
    pt3dadd(-11.93, 10.7, -30.5, 0.21)
    pt3dadd(-12.03, 10.81, -30.5, 0.21)
    pt3dadd(-12.19, 11.02, -30.5, 0.21)
    pt3dadd(-12.24, 11.17, -30, 0.21)
    pt3dadd(-12.29, 11.28, -30, 0.21)
    pt3dadd(-12.4, 11.49, -30, 0.21)
    pt3dadd(-12.35, 11.59, -30, 0.21)
    pt3dadd(-12.4, 11.75, -30, 0.21)
    pt3dadd(-12.45, 11.91, -30, 0.21)
    pt3dadd(-12.45, 12.12, -30, 0.21)
    pt3dadd(-12.5, 12.28, -30, 0.21)
    pt3dadd(-12.61, 12.38, -30, 0.21)
    pt3dadd(-12.66, 12.54, -30, 0.21)
    pt3dadd(-12.71, 12.75, -30, 0.21)
    pt3dadd(-12.77, 12.96, -30, 0.21)
    pt3dadd(-12.87, 13.07, -29.5, 0.21)
    pt3dadd(-12.98, 13.22, -29.5, 0.21)
    pt3dadd(-13.03, 13.33, -29.5, 0.21)
    pt3dadd(-13.19, 13.33, -29.5, 0.21)
    pt3dadd(-13.29, 13.38, -29.5, 0.21)
    pt3dadd(-13.71, 13.38, -29.5, 0.21)
    pt3dadd(-13.82, 13.38, -29, 0.21)
    pt3dadd(-14.03, 13.28, -29, 0.21)
    pt3dadd(-14.08, 13.12, -29, 0.21)
    pt3dadd(-14.18, 13.01, -29, 0.21)
    pt3dadd(-14.24, 12.86, -29, 0.21)
    pt3dadd(-14.34, 12.75, -29, 0.21)
    pt3dadd(-14.45, 12.65, -29, 0.21)
    pt3dadd(-14.71, 12.7, -28.5, 0.21)
    pt3dadd(-14.92, 12.75, -28.5, 0.21)
    pt3dadd(-15.18, 12.86, -28.5, 0.21)
    pt3dadd(-15.29, 12.96, -28, 0.21)
    pt3dadd(-15.44, 12.96, -28, 0.21)
    pt3dadd(-15.55, 13.07, -28, 0.21)
    pt3dadd(-15.65, 13.17, -28, 0.21)
    pt3dadd(-15.71, 13.33, -28, 0.21)
    pt3dadd(-15.81, 13.43, -28, 0.21)
    pt3dadd(-15.92, 13.54, -28, 0.21)
    pt3dadd(-16.28, 13.75, -28, 0.21)
    pt3dadd(-16.34, 13.85, -28, 0.21)
  }
  axon[1] {pt3dclear()
    pt3dadd(-16.34, 13.85, -28, 0.21)
    pt3dadd(-17.39, 13.59, -28, 0.21)
    pt3dadd(-17.48, 13.49, -28, 0.21)
    pt3dadd(-17.6, 13.33, -28, 0.21)
    pt3dadd(-17.7, 13.28, -28, 0.21)
    pt3dadd(-17.75, 13.07, -28, 0.21)
    pt3dadd(-17.96, 12.96, -28, 0.21)
    pt3dadd(-18.07, 12.86, -27.5, 0.21)
    pt3dadd(-18.23, 12.8, -27.5, 0.21)
    pt3dadd(-18.7, 12.8, -27.5, 0.21)
    pt3dadd(-18.8, 12.75, -27.5, 0.21)
    pt3dadd(-18.96, 12.75, -27.5, 0.21)
    pt3dadd(-19.07, 12.75, -27.5, 0.21)
    pt3dadd(-19.59, 12.75, -27, 0.21)
    pt3dadd(-19.7, 12.7, -27, 0.21)
    pt3dadd(-19.91, 12.75, -27, 0.21)
    pt3dadd(-20.22, 12.75, -27, 0.21)
    pt3dadd(-20.38, 12.7, -27, 0.21)
    pt3dadd(-20.48, 12.65, -27, 0.21)
    pt3dadd(-20.64, 12.65, -27, 0.21)
    pt3dadd(-20.85, 12.59, -27, 0.21)
    pt3dadd(-21.01, 12.49, -27, 0.21)
    pt3dadd(-21.17, 12.33, -27, 0.21)
    pt3dadd(-21.38, 12.22, -27, 0.21)
    pt3dadd(-21.48, 12.07, -27, 0.21)
    pt3dadd(-21.64, 12.01, -27, 0.21)
    pt3dadd(-21.8, 11.91, -27, 0.21)
    pt3dadd(-21.9, 11.86, -27, 0.21)
    pt3dadd(-22.01, 11.75, -27, 0.21)
    pt3dadd(-22.22, 11.7, -27, 0.21)
    pt3dadd(-22.27, 11.59, -27, 0.21)
    pt3dadd(-22.37, 11.49, -27, 0.21)
    pt3dadd(-22.48, 11.38, -27, 0.21)
    pt3dadd(-22.53, 11.33, -26, 0.21)
  }
  axon[2] {pt3dclear()
    pt3dadd(-22.53, 11.33, -26, 0.21)
    pt3dadd(-22.58, 10.75, -26, 0.21)
    pt3dadd(-22.58, 10.49, -26, 0.21)
    pt3dadd(-22.53, 10.33, -26, 0.21)
    pt3dadd(-22.53, 9.91, -26, 0.21)
    pt3dadd(-22.48, 9.75, -26, 0.21)
    pt3dadd(-22.48, 8.75, -26, 0.21)
    pt3dadd(-22.64, 8.53, -26, 0.21)
    pt3dadd(-22.9, 8.39, -26, 0.21)
    pt3dadd(-23, 8.23, -26, 0.21)
    pt3dadd(-23.16, 8.11, -26, 0.21)
    pt3dadd(-23.27, 7.97, -26, 0.21)
    pt3dadd(-23.37, 7.91, -26, 0.21)
    pt3dadd(-23.63, 7.65, -26, 0.21)
    pt3dadd(-23.69, 7.49, -26, 0.21)
    pt3dadd(-23.74, 7.28, -26, 0.21)
    pt3dadd(-23.84, 7.13, -26, 0.21)
    pt3dadd(-23.84, 6.92, -26, 0.21)
    pt3dadd(-23.95, 6.81, -26, 0.21)
    pt3dadd(-24, 6.65, -26, 0.21)
    pt3dadd(-24, 6.34, -26, 0.21)
    pt3dadd(-23.95, 6.18, -26, 0.21)
    pt3dadd(-23.95, 5.97, -26, 0.21)
    pt3dadd(-24.05, 5.71, -26, 0.21)
    pt3dadd(-24.16, 5.39, -26, 0.21)
    pt3dadd(-24.26, 5.18, -26, 0.21)
    pt3dadd(-24.37, 5.13, -26, 0.21)
    pt3dadd(-24.47, 5.01, -26, 0.21)
    pt3dadd(-24.58, 4.92, -26, 0.21)
    pt3dadd(-24.74, 4.65, -26, 0.21)
    pt3dadd(-24.84, 4.5, -26, 0.21)
    pt3dadd(-24.95, 4.38, -26, 0.21)
    pt3dadd(-25, 4.18, -26, 0.21)
    pt3dadd(-25.1, 4.01, -26, 0.21)
    pt3dadd(-25.21, 3.92, -26, 0.21)
    pt3dadd(-25.31, 3.81, -26, 0.21)
    pt3dadd(-25.37, 3.66, -26, 0.21)
    pt3dadd(-25.47, 3.5, -26, 0.21)
    pt3dadd(-25.63, 3.34, -26, 0.21)
    pt3dadd(-26.06, 2.92, -26.5, 0.21)
    pt3dadd(-26.22, 2.76, -26.5, 0.21)
    pt3dadd(-26.32, 2.6, -26.5, 0.21)
    pt3dadd(-26.48, 2.44, -26.5, 0.21)
  }
  axon[3] {pt3dclear()
    pt3dadd(-26.48, 2.44, -26.5, 0.21)
    pt3dadd(-27, 2.39, -27, 0.21)
    pt3dadd(-27.11, 2.44, -27, 0.21)
    pt3dadd(-27.63, 2.44, -27, 0.21)
    pt3dadd(-27.74, 2.34, -27, 0.21)
    pt3dadd(-27.9, 2.34, -27, 0.21)
    pt3dadd(-28.21, 2.34, -27, 0.21)
    pt3dadd(-28.37, 2.29, -27, 0.21)
    pt3dadd(-28.63, 2.29, -27, 0.21)
    pt3dadd(-28.73, 2.23, -27, 0.21)
    pt3dadd(-29, 2.23, -27, 0.21)
    pt3dadd(-29, 2.39, -27, 0.21)
    pt3dadd(-29.05, 2.5, -27, 0.21)
    pt3dadd(-29.1, 2.6, -27, 0.21)
    pt3dadd(-29.15, 2.71, -27, 0.21)
    pt3dadd(-29.15, 2.92, -27, 0.21)
    pt3dadd(-29.21, 3.13, -27, 0.21)
    pt3dadd(-29.26, 3.23, -27, 0.21)
    pt3dadd(-29.26, 3.44, -27, 0.21)
    pt3dadd(-29.31, 3.6, -27, 0.21)
    pt3dadd(-29.36, 3.81, -27.5, 0.21)
    pt3dadd(-29.42, 3.92, -27.5, 0.21)
    pt3dadd(-29.52, 4.07, -27.5, 0.21)
    pt3dadd(-29.63, 4.28, -27.5, 0.21)
    pt3dadd(-29.73, 4.44, -27.5, 0.21)
    pt3dadd(-29.78, 4.55, -27.5, 0.21)
    pt3dadd(-29.89, 4.7, -27.5, 0.21)
    pt3dadd(-29.94, 4.86, -27.5, 0.21)
    pt3dadd(-29.99, 5.01, -27.5, 0.21)
    pt3dadd(-30.15, 5.18, -27.5, 0.21)
    pt3dadd(-30.15, 5.39, -27.5, 0.21)
    pt3dadd(-30.2, 5.55, -26.5, 0.21)
    pt3dadd(-30.26, 5.76, -26.5, 0.21)
    pt3dadd(-30.31, 5.91, -26.5, 0.21)
    pt3dadd(-30.36, 6.02, -26, 0.21)
    pt3dadd(-30.47, 6.18, -26, 0.21)
    pt3dadd(-30.57, 6.28, -26, 0.21)
    pt3dadd(-30.68, 6.39, -26, 0.21)
    pt3dadd(-30.78, 6.49, -26, 0.21)
    pt3dadd(-30.94, 6.6, -26, 0.21)
    pt3dadd(-31.04, 6.75, -26, 0.21)
    pt3dadd(-31.1, 6.91, -26, 0.21)
    pt3dadd(-31.2, 7.07, -25.5, 0.21)
    pt3dadd(-31.31, 7.28, -25.5, 0.21)
    pt3dadd(-31.36, 7.38, -25.5, 0.21)
    pt3dadd(-31.41, 7.49, -25.5, 0.21)
    pt3dadd(-31.52, 7.75, -25.5, 0.21)
  }
}
proc shape3d_74() {
  axon[3] {
    pt3dadd(-31.52, 8.23, -25.5, 0.21)
    pt3dadd(-31.57, 8.38, -25, 0.21)
    pt3dadd(-31.57, 8.65, -25, 0.21)
    pt3dadd(-31.67, 8.75, -25, 0.21)
    pt3dadd(-31.83, 8.91, -25, 0.21)
    pt3dadd(-31.94, 9.17, -25, 0.21)
    pt3dadd(-31.99, 9.27, -25, 0.21)
    pt3dadd(-32.15, 9.27, -25, 0.21)
    pt3dadd(-32.25, 9.44, -25, 0.21)
    pt3dadd(-32.36, 9.49, -25, 0.21)
    pt3dadd(-32.46, 9.65, -25, 0.21)
    pt3dadd(-32.57, 9.75, -25, 0.21)
    pt3dadd(-32.78, 9.96, -25, 0.21)
    pt3dadd(-32.88, 9.96, -25, 0.21)
    pt3dadd(-32.93, 10.07, -25, 0.21)
    pt3dadd(-33.04, 10.17, -25, 0.21)
    pt3dadd(-33.56, 10.85, -25.5, 0.89)
    pt3dadd(-33.85, 11.47, -25.5, 0.79)
    pt3dadd(-33.85, 11.58, -25.5, 0.79)
    pt3dadd(-34, 12.31, -25, 0.16)
    pt3dadd(-34.32, 13.78, -25, 0.58)
    pt3dadd(-34.32, 13.94, -25, 0.58)
    pt3dadd(-34.36, 14.15, -25, 0.58)
    pt3dadd(-34.36, 14.52, -25, 0.58)
    pt3dadd(-34.27, 14.68, -25, 0.58)
    pt3dadd(-34.15, 15.52, -25, 0.16)
    pt3dadd(-34.15, 15.78, -25, 0.16)
    pt3dadd(-34.06, 15.99, -25, 0.16)
    pt3dadd(-33.95, 16.04, -25, 0.16)
    pt3dadd(-33.79, 16.25, -25, 0.16)
    pt3dadd(-33.69, 16.36, -25, 0.16)
    pt3dadd(-33.79, 16.3, -25, 0.16)
    pt3dadd(-33.64, 17.3, -26, 1)
    pt3dadd(-33.47, 17.72, -25.5, 1)
  }
  axon[4] {pt3dclear()
    pt3dadd(-26.48, 2.44, -26.5, 0.21)
    pt3dadd(-26.58, 2.39, -27.5, 0.16)
    pt3dadd(-26.58, 1.6, -27.5, 0.16)
    pt3dadd(-26.48, 1.44, -27.5, 0.16)
    pt3dadd(-26.48, 0.97, -27.5, 0.16)
    pt3dadd(-26.53, 0.81, -27.5, 0.16)
    pt3dadd(-26.64, 0.6, -27.5, 0.16)
    pt3dadd(-26.64, 0.39, -27.5, 0.16)
    pt3dadd(-26.69, 0.24, -27.5, 0.16)
    pt3dadd(-26.74, 0.03, -27.5, 0.16)
    pt3dadd(-26.74, -0.5, -27.5, 0.16)
    pt3dadd(-26.64, -0.66, -27.5, 0.16)
    pt3dadd(-26.53, -0.76, -27.5, 0.16)
    pt3dadd(-26.48, -0.92, -27.5, 0.16)
    pt3dadd(-26.48, -1.12, -27.5, 0.16)
    pt3dadd(-26.37, -1.24, -27.5, 0.16)
    pt3dadd(-26.32, -1.34, -27.5, 0.16)
    pt3dadd(-26.32, -1.71, -27.5, 0.16)
    pt3dadd(-26.37, -1.87, -27.5, 0.16)
    pt3dadd(-26.43, -2.02, -27.5, 0.16)
    pt3dadd(-26.43, -2.5, -27.5, 0.16)
    pt3dadd(-26.48, -2.66, -27.5, 0.16)
    pt3dadd(-26.58, -2.87, -27.5, 0.16)
    pt3dadd(-26.53, -3.02, -27.5, 0.16)
    pt3dadd(-26.58, -3.18, -27.5, 0.16)
    pt3dadd(-26.69, -3.29, -27.5, 0.16)
    pt3dadd(-26.79, -3.55, -27.5, 0.16)
    pt3dadd(-26.85, -3.65, -27.5, 0.16)
    pt3dadd(-26.95, -3.81, -27.5, 0.16)
    pt3dadd(-27.06, -3.97, -27.5, 0.16)
    pt3dadd(-27.11, -4.13, -27.5, 0.16)
    pt3dadd(-27.21, -4.34, -27.5, 0.16)
    pt3dadd(-27.21, -5.97, -27.5, 0.16)
    pt3dadd(-27.16, -6.18, -27.5, 0.16)
    pt3dadd(-27.11, -6.34, -27.5, 0.16)
    pt3dadd(-27.11, -6.91, -27.5, 0.16)
    pt3dadd(-27.16, -7.07, -27.5, 0.16)
    pt3dadd(-27.16, -7.28, -27.5, 0.16)
    pt3dadd(-27.32, -7.39, -27.5, 0.16)
    pt3dadd(-27.37, -7.49, -27.5, 0.16)
    pt3dadd(-27.48, -7.6, -27.5, 0.16)
    pt3dadd(-27.63, -7.86, -27.5, 0.16)
    pt3dadd(-27.29, -8.51, -27.5, 0.16)
    pt3dadd(-27.29, -9.56, -27.5, 0.16)
    pt3dadd(-27.39, -9.72, -27.5, 0.16)
    pt3dadd(-27.45, -9.82, -27.5, 0.16)
    pt3dadd(-27.55, -9.93, -27.5, 0.16)
    pt3dadd(-27.6, -10.09, -27.5, 0.16)
    pt3dadd(-27.66, -10.19, -27.5, 0.16)
    pt3dadd(-27.66, -10.56, -27.5, 0.16)
    pt3dadd(-27.66, -10.77, -27.5, 0.16)
    pt3dadd(-27.66, -11.35, -27, 0.16)
    pt3dadd(-27.81, -11.4, -27, 0.16)
    pt3dadd(-27.87, -11.66, -27, 0.16)
    pt3dadd(-27.87, -11.87, -27, 0.16)
    pt3dadd(-27.81, -11.98, -27, 0.16)
    pt3dadd(-27.81, -12.24, -27, 0.16)
    pt3dadd(-27.76, -12.35, -27, 0.16)
    pt3dadd(-27.66, -12.45, -27, 0.16)
    pt3dadd(-27.6, -12.61, -27, 0.16)
    pt3dadd(-27.5, -12.72, -27, 0.16)
    pt3dadd(-27.55, -12.87, -27, 0.16)
    pt3dadd(-27.55, -13.08, -27, 0.16)
    pt3dadd(-27.45, -13.14, -27, 0.16)
    pt3dadd(-27.39, -13.35, -27, 0.16)
    pt3dadd(-27.39, -13.82, -27, 0.16)
    pt3dadd(-27.34, -13.92, -27, 0.16)
    pt3dadd(-27.39, -14.08, -27, 0.16)
    pt3dadd(-27.39, -14.66, -27, 0.16)
    pt3dadd(-27.45, -14.82, -27, 0.16)
    pt3dadd(-27.45, -15.29, -27, 0.16)
    pt3dadd(-27.39, -15.4, -27, 0.16)
    pt3dadd(-27.45, -15.55, -27, 0.16)
    pt3dadd(-27.45, -15.87, -27, 0.16)
    pt3dadd(-27.45, -16.03, -27.5, 0.16)
    pt3dadd(-27.45, -16.39, -27.5, 0.16)
    pt3dadd(-27.39, -16.55, -27.5, 0.16)
    pt3dadd(-27.39, -16.76, -27.5, 0.16)
    pt3dadd(-27.34, -16.87, -27.5, 0.16)
    pt3dadd(-27.29, -17.03, -27.5, 0.16)
    pt3dadd(-27.18, -17.13, -27.5, 0.16)
    pt3dadd(-27.24, -17.23, -27.5, 0.16)
    pt3dadd(-27.24, -17.34, -27.5, 0.16)
    pt3dadd(-27.18, -17.45, -27.5, 0.16)
    pt3dadd(-27.18, -17.6, -27.5, 0.16)
    pt3dadd(-27.08, -17.66, -27.5, 0.16)
    pt3dadd(-27.08, -17.82, -27.5, 0.16)
    pt3dadd(-26.97, -17.87, -27.5, 0.16)
    pt3dadd(-26.92, -18.03, -27.5, 0.16)
    pt3dadd(-26.87, -18.13, -27.5, 0.16)
    pt3dadd(-26.82, -18.23, -27.5, 0.16)
    pt3dadd(-26.76, -18.39, -27.5, 0.16)
    pt3dadd(-26.76, -18.71, -27.5, 0.16)
    pt3dadd(-26.76, -18.92, -27.5, 0.16)
    pt3dadd(-26.71, -19.07, -27.5, 0.16)
    pt3dadd(-26.71, -19.44, -27.5, 0.16)
    pt3dadd(-26.66, -19.64, -27.5, 0.16)
    pt3dadd(-26.61, -19.76, -27.5, 0.16)
    pt3dadd(-26.23, -20.7, -28.5, 0.16)
    pt3dadd(-26.23, -20.96, -28.5, 0.16)
    pt3dadd(-26.18, -21.07, -28.5, 0.16)
    pt3dadd(-26.18, -21.22, -28.5, 0.16)
    pt3dadd(-26.13, -21.38, -28.5, 0.16)
    pt3dadd(-26.13, -21.59, -28.5, 0.16)
    pt3dadd(-26.07, -21.7, -28.5, 0.16)
    pt3dadd(-26.13, -21.8, -28.5, 0.16)
    pt3dadd(-26.13, -22.01, -28.5, 0.16)
    pt3dadd(-26.18, -22.17, -28.5, 0.16)
    pt3dadd(-26.13, -22.28, -28.5, 0.16)
    pt3dadd(-26.07, -22.38, -28.5, 0.16)
    pt3dadd(-26.07, -22.54, -28.5, 0.16)
    pt3dadd(-26.02, -22.91, -28.5, 0.16)
    pt3dadd(-25.97, -23.06, -29, 0.16)
    pt3dadd(-26.02, -23.17, -29, 0.16)
    pt3dadd(-25.97, -23.38, -29, 0.16)
    pt3dadd(-25.97, -23.54, -29, 0.16)
    pt3dadd(-25.92, -23.64, -29, 0.16)
    pt3dadd(-25.92, -24.12, -29, 0.16)
    pt3dadd(-25.97, -24.27, -29, 0.16)
    pt3dadd(-26.02, -24.48, -29, 0.16)
    pt3dadd(-26.07, -24.59, -29, 0.16)
    pt3dadd(-26.13, -24.75, -29, 0.16)
    pt3dadd(-26.13, -24.96, -29, 0.16)
    pt3dadd(-26.23, -25.06, -29, 0.16)
    pt3dadd(-26.23, -25.32, -29, 0.16)
    pt3dadd(-26.28, -25.54, -29, 0.16)
    pt3dadd(-26.34, -25.69, -29, 0.16)
    pt3dadd(-26.34, -27.53, -29, 0.16)
    pt3dadd(-26.39, -27.74, -29, 0.16)
    pt3dadd(-26.39, -28.32, -29, 0.16)
    pt3dadd(-26.44, -28.48, -29, 0.16)
    pt3dadd(-26.44, -28.79, -29, 0.16)
    pt3dadd(-26.39, -28.95, -29, 0.16)
    pt3dadd(-26.39, -29.32, -29, 0.16)
    pt3dadd(-26.34, -29.43, -29, 0.16)
    pt3dadd(-26.34, -29.79, -29, 0.16)
    pt3dadd(-26.13, -30.74, -29, 0.79)
    pt3dadd(-25.88, -31.54, -30, 0.16)
    pt3dadd(-25.78, -31.54, -30.5, 0.16)
    pt3dadd(-25.78, -31.86, -30.5, 0.16)
    pt3dadd(-25.73, -32.01, -30.5, 0.16)
    pt3dadd(-25.67, -32.11, -30.5, 0.16)
    pt3dadd(-25.57, -32.22, -30.5, 0.16)
    pt3dadd(-25.52, -32.33, -30.5, 0.16)
    pt3dadd(-25.52, -32.54, -30.5, 0.16)
    pt3dadd(-25.46, -32.65, -30.5, 0.16)
    pt3dadd(-25.41, -32.79, -30.5, 0.16)
    pt3dadd(-25.36, -33.01, -30.5, 0.16)
    pt3dadd(-25.36, -33.38, -30.5, 0.16)
    pt3dadd(-25.41, -33.54, -30.5, 0.16)
    pt3dadd(-25.41, -33.79, -30.5, 0.16)
    pt3dadd(-25.41, -34.01, -30.5, 0.16)
    pt3dadd(-25.46, -34.22, -30.5, 0.16)
    pt3dadd(-25.41, -34.33, -30.5, 0.16)
    pt3dadd(-25.36, -34.47, -30.5, 0.16)
    pt3dadd(-25.25, -34.59, -30.5, 0.16)
    pt3dadd(-25.2, -34.75, -30.5, 0.16)
    pt3dadd(-25.1, -34.85, -30.5, 0.16)
    pt3dadd(-24.68, -34.9, -30.5, 0.73)
    pt3dadd(-24.47, -34.85, -30.5, 0.73)
    pt3dadd(-24.36, -34.96, -30.5, 0.73)
    pt3dadd(-24.2, -35.11, -30.5, 0.73)
    pt3dadd(-24.1, -35.17, -30.5, 0.73)
    pt3dadd(-23.99, -35.22, -30.5, 0.73)
    pt3dadd(-23.89, -35.33, -30.5, 0.73)
    pt3dadd(-23.78, -35.59, -30.5, 0.73)
    pt3dadd(-23.63, -35.59, -30.5, 0.73)
    pt3dadd(-22.94, -36.32, -30.5, 0.16)
    pt3dadd(-22.94, -36.75, -30.5, 0.16)
    pt3dadd(-22.84, -36.79, -30.5, 0.16)
    pt3dadd(-22.79, -36.96, -30.5, 0.16)
    pt3dadd(-22.68, -37.01, -31, 0.16)
    pt3dadd(-22.68, -37.17, -31, 0.16)
    pt3dadd(-22.58, -37.17, -31, 0.16)
    pt3dadd(-22.47, -37.22, -31, 0.16)
    pt3dadd(-22.47, -37.38, -31, 0.16)
    pt3dadd(-22.37, -37.43, -31, 0.16)
    pt3dadd(-22.31, -37.53, -31, 0.16)
    pt3dadd(-22.16, -37.64, -31, 0.16)
    pt3dadd(-22.05, -37.74, -31, 0.16)
    pt3dadd(-21.95, -37.85, -31, 0.16)
    pt3dadd(-21.84, -37.9, -31, 0.16)
    pt3dadd(-21.79, -38.06, -31.5, 0.16)
    pt3dadd(-21.74, -38.22, -31.5, 0.16)
    pt3dadd(-21.63, -38.47, -31.5, 0.16)
    pt3dadd(-21.63, -38.74, -31.5, 0.16)
    pt3dadd(-21.63, -38.85, -31.5, 0.16)
    pt3dadd(-21.26, -40.06, -31.5, 0.84)
    pt3dadd(-21.26, -41.27, -31.5, 0.16)
    pt3dadd(-21.11, -41.27, -31.5, 0.16)
    pt3dadd(-21, -41.37, -31.5, 0.16)
    pt3dadd(-21, -41.58, -31.5, 0.16)
    pt3dadd(-20.9, -41.63, -31.5, 0.16)
    pt3dadd(-20.84, -41.74, -31.5, 0.16)
    pt3dadd(-20.79, -41.95, -31.5, 0.16)
    pt3dadd(-20.79, -42.21, -31.5, 0.16)
    pt3dadd(-20.85, -43.54, -32, 0.16)
    pt3dadd(-20.8, -43.75, -32, 0.16)
    pt3dadd(-20.85, -43.96, -32, 0.16)
    pt3dadd(-20.96, -44.12, -32, 0.16)
    pt3dadd(-21.06, -44.28, -32.5, 0.16)
    pt3dadd(-21.11, -44.43, -32.5, 0.16)
  }
  axon[5] {pt3dclear()
    pt3dadd(-21.11, -44.43, -32.5, 0.16)
    pt3dadd(-21.74, -44.49, -33, 0.16)
    pt3dadd(-22.06, -44.49, -33, 0.16)
    pt3dadd(-22.16, -44.54, -33, 0.16)
    pt3dadd(-22.32, -44.54, -33, 0.16)
    pt3dadd(-22.48, -44.59, -33, 0.16)
    pt3dadd(-22.53, -44.7, -33, 0.16)
    pt3dadd(-22.69, -44.65, -33, 0.16)
    pt3dadd(-23, -44.65, -33, 0.16)
    pt3dadd(-23.63, -45.07, -33, 0.63)
    pt3dadd(-23.58, -45.33, -33, 0.63)
    pt3dadd(-24.84, -45.49, -33, 0.16)
    pt3dadd(-25.36, -45.33, -34.5, 0.58)
  }
}
proc shape3d_75() {
  axon[5] {
    pt3dadd(-25.36, -45.12, -34.5, 0.58)
    pt3dadd(-25.42, -45.01, -34.5, 0.58)
    pt3dadd(-25.52, -44.96, -34.5, 0.58)
    pt3dadd(-25.63, -44.91, -34.5, 0.58)
    pt3dadd(-25.68, -44.8, -34.5, 0.58)
    pt3dadd(-25.74, -44.45, -34.5, 0.16)
    pt3dadd(-25.79, -44.4, -36, 0.16)
    pt3dadd(-25.9, -44.3, -36.5, 0.16)
    pt3dadd(-26.11, -44.3, -37, 0.16)
    pt3dadd(-26.26, -44.35, -37, 0.16)
    pt3dadd(-26.32, -44.56, -37.5, 0.16)
    pt3dadd(-26.32, -44.82, -37.5, 0.16)
    pt3dadd(-26.26, -44.93, -37.5, 0.16)
    pt3dadd(-26.16, -45.03, -37.5, 0.16)
    pt3dadd(-26.11, -45.14, -37.5, 0.16)
    pt3dadd(-26.05, -45.24, -37.5, 0.16)
    pt3dadd(-25.95, -45.35, -37.5, 0.16)
    pt3dadd(-25.84, -45.5, -37.5, 0.16)
    pt3dadd(-25.69, -45.66, -37.5, 0.16)
    pt3dadd(-25.53, -45.77, -37.5, 0.16)
    pt3dadd(-25.42, -45.82, -37.5, 0.16)
    pt3dadd(-25.37, -45.98, -37.5, 0.16)
    pt3dadd(-25.21, -46.14, -37.5, 0.16)
    pt3dadd(-25.16, -46.24, -37.5, 0.16)
    pt3dadd(-25.06, -46.5, -37.5, 0.16)
    pt3dadd(-25, -46.71, -37.5, 0.16)
    pt3dadd(-25, -47.34, -37.5, 0.16)
    pt3dadd(-25.11, -47.5, -38, 0.16)
    pt3dadd(-25.16, -47.71, -38, 0.16)
    pt3dadd(-25.21, -47.87, -38, 0.16)
    pt3dadd(-25.27, -47.98, -38, 0.16)
    pt3dadd(-25.32, -48.13, -38.5, 0.16)
    pt3dadd(-25.37, -48.34, -38.5, 0.16)
    pt3dadd(-25.42, -48.45, -38.5, 0.16)
    pt3dadd(-25.48, -48.61, -38.5, 0.16)
    pt3dadd(-25.42, -48.82, -38.5, 0.16)
    pt3dadd(-25.37, -48.92, -39, 0.16)
    pt3dadd(-25.27, -48.92, -39, 0.16)
    pt3dadd(-25.27, -49.08, -39.5, 0.16)
    pt3dadd(-25.06, -49.82, -40.5, 0.84)
    pt3dadd(-25.79, -50.18, -42.5, 0.05)
    pt3dadd(-25.84, -50.29, -43, 0.05)
    pt3dadd(-25.84, -50.55, -43.5, 0.05)
    pt3dadd(-25.79, -50.66, -44, 0.05)
    pt3dadd(-25.79, -50.87, -44, 0.05)
    pt3dadd(-25.9, -51.08, -44, 0.16)
    pt3dadd(-25.9, -51.23, -44, 0.16)
    pt3dadd(-26, -51.29, -44, 0.16)
    pt3dadd(-26.05, -51.39, -44, 0.16)
    pt3dadd(-26.16, -51.55, -44.5, 0.16)
    pt3dadd(-26.37, -51.55, -45, 0.16)
    pt3dadd(-26.58, -51.6, -45, 0.16)
    pt3dadd(-26.74, -51.76, -45, 0.16)
    pt3dadd(-26.84, -51.87, -45, 0.16)
    pt3dadd(-27.21, -52.23, -45, 0.16)
    pt3dadd(-27.26, -52.39, -45, 0.16)
    pt3dadd(-27.26, -52.6, -45.5, 0.16)
    pt3dadd(-27.63, -53.23, -44.5, 0.63)
  }
  axon[6] {pt3dclear()
    pt3dadd(-21.11, -44.43, -32.5, 0.16)
    pt3dadd(-21.01, -45.01, -31.5, 0.16)
    pt3dadd(-21.01, -45.22, -31.5, 0.16)
    pt3dadd(-20.96, -45.33, -31.5, 0.16)
    pt3dadd(-21.01, -45.59, -31.5, 0.16)
    pt3dadd(-21.01, -45.7, -31.5, 0.16)
    pt3dadd(-20.9, -45.91, -31.5, 0.16)
    pt3dadd(-20.9, -46.48, -32, 0.16)
    pt3dadd(-20.85, -46.59, -32, 0.16)
    pt3dadd(-20.85, -46.85, -32, 0.16)
    pt3dadd(-20.8, -46.96, -32, 0.16)
    pt3dadd(-20.8, -47.17, -32, 0.16)
    pt3dadd(-20.75, -47.33, -32, 0.16)
    pt3dadd(-20.75, -47.54, -32, 0.16)
    pt3dadd(-20.69, -47.69, -32, 0.16)
    pt3dadd(-20.64, -47.9, -32, 0.16)
    pt3dadd(-20.59, -48.11, -32, 0.16)
    pt3dadd(-20.54, -48.22, -32, 0.16)
    pt3dadd(-20.54, -48.54, -32, 0.16)
    pt3dadd(-20.48, -48.75, -32, 0.16)
    pt3dadd(-20.48, -49.01, -32, 0.16)
    pt3dadd(-20.43, -49.22, -32, 0.16)
    pt3dadd(-20.38, -49.38, -32, 0.16)
    pt3dadd(-20.38, -49.59, -32, 0.16)
    pt3dadd(-20.32, -49.74, -32, 0.16)
    pt3dadd(-20.32, -49.95, -32, 0.16)
    pt3dadd(-20.27, -50.11, -32, 0.16)
    pt3dadd(-20.27, -50.32, -32, 0.16)
    pt3dadd(-20.22, -50.48, -32, 0.16)
    pt3dadd(-20.22, -51.01, -32, 0.16)
    pt3dadd(-20.27, -51.16, -32, 0.16)
    pt3dadd(-20.27, -51.43, -32, 0.16)
    pt3dadd(-20.22, -51.53, -32, 0.16)
    pt3dadd(-20.17, -51.69, -32, 0.16)
    pt3dadd(-20.17, -51.95, -32, 0.16)
    pt3dadd(-20.05, -52, -32, 0.16)
    pt3dadd(-20.01, -52.22, -32, 0.16)
    pt3dadd(-19.96, -52.32, -32, 0.16)
    pt3dadd(-19.75, -53.42, -32, 0.68)
    pt3dadd(-19.7, -53.58, -32, 0.68)
    pt3dadd(-19.64, -53.69, -32, 0.68)
    pt3dadd(-19.54, -53.79, -32, 0.68)
    pt3dadd(-19.54, -53.9, -32, 0.68)
    pt3dadd(-19.11, -55, -33, 0.16)
    pt3dadd(-19.11, -55.1, -33, 0.16)
    pt3dadd(-19.05, -55.26, -33, 0.16)
    pt3dadd(-19.05, -55.37, -33.5, 0.16)
    pt3dadd(-19, -55.47, -33.5, 0.16)
    pt3dadd(-19, -56.58, -34.5, 0.16)
    pt3dadd(-18.95, -56.79, -34.5, 0.16)
    pt3dadd(-18.89, -56.94, -34.5, 0.16)
    pt3dadd(-18.79, -57.05, -34.5, 0.16)
    pt3dadd(-18.69, -57.05, -33.5, 0.16)
    pt3dadd(-18.69, -58.1, -34.5, 0.16)
    pt3dadd(-18.64, -58.26, -34.5, 0.16)
    pt3dadd(-18.57, -58.47, -34.5, 0.16)
    pt3dadd(-18.57, -58.89, -34.5, 0.16)
    pt3dadd(-18.64, -59.1, -34.5, 0.16)
    pt3dadd(-18.73, -59.2, -34.5, 0.16)
    pt3dadd(-18.73, -59.41, -35, 0.16)
    pt3dadd(-18.79, -59.52, -35, 0.16)
    pt3dadd(-18.85, -59.62, -35, 0.16)
    pt3dadd(-18.89, -59.78, -35, 0.16)
    pt3dadd(-19.27, -60.89, -33.5, 0.58)
    pt3dadd(-19.27, -60.89, -34, 0.58)
  }
  axon[7] {pt3dclear()
    pt3dadd(-19.27, -60.89, -34, 0.58)
    pt3dadd(-20.05, -60.99, -33.5, 0.16)
    pt3dadd(-20.16, -60.94, -33.5, 0.16)
    pt3dadd(-20.26, -60.94, -33.5, 0.16)
    pt3dadd(-20.95, -60.57, -34, 0.16)
    pt3dadd(-21.1, -60.52, -34, 0.16)
    pt3dadd(-21.73, -60.52, -34, 0.16)
    pt3dadd(-22.05, -60.47, -33.5, 0.16)
    pt3dadd(-22.26, -60.47, -33.5, 0.16)
    pt3dadd(-22.73, -60.47, -33.5, 0.16)
    pt3dadd(-22.83, -60.52, -33.5, 0.16)
    pt3dadd(-23.04, -60.52, -33.5, 0.16)
    pt3dadd(-23.15, -60.57, -33.5, 0.16)
    pt3dadd(-23.41, -60.57, -34, 0.16)
    pt3dadd(-23.57, -60.62, -34, 0.16)
    pt3dadd(-23.67, -60.73, -34, 0.16)
    pt3dadd(-23.83, -60.68, -34, 0.16)
    pt3dadd(-24.04, -60.73, -34, 0.16)
    pt3dadd(-24.2, -60.78, -34, 0.16)
    pt3dadd(-24.3, -60.83, -34, 0.16)
    pt3dadd(-24.51, -60.89, -34, 0.16)
    pt3dadd(-24.57, -60.99, -34, 0.16)
    pt3dadd(-25.35, -61.2, -34, 0.73)
    pt3dadd(-25.88, -61.04, -34, 0.73)
    pt3dadd(-26.82, -60.89, -35, 0.21)
    pt3dadd(-26.93, -60.94, -35, 0.21)
    pt3dadd(-27.03, -60.99, -35, 0.21)
    pt3dadd(-27.14, -61.1, -35, 0.21)
    pt3dadd(-27.51, -61.1, -35, 0.21)
    pt3dadd(-27.66, -61.2, -35, 0.21)
    pt3dadd(-28.03, -61.2, -35, 0.21)
    pt3dadd(-28.14, -61.15, -35, 0.21)
    pt3dadd(-28.35, -61.1, -35, 0.21)
    pt3dadd(-28.66, -61.15, -35, 0.21)
    pt3dadd(-28.82, -61.04, -35, 0.21)
    pt3dadd(-28.92, -61.1, -35, 0.21)
    pt3dadd(-29.08, -61.1, -35, 0.21)
    pt3dadd(-29.24, -61.15, -35, 0.21)
    pt3dadd(-29.4, -61.25, -35, 0.21)
    pt3dadd(-29.5, -61.2, -35, 0.21)
    pt3dadd(-29.61, -61.2, -35, 0.21)
    pt3dadd(-30.18, -61.25, -35, 0.79)
    pt3dadd(-31.13, -60.68, -35, 0.16)
    pt3dadd(-31.34, -60.62, -35, 0.16)
    pt3dadd(-31.5, -60.57, -35, 0.16)
    pt3dadd(-31.6, -60.47, -35, 0.16)
    pt3dadd(-31.71, -60.47, -35.5, 0.16)
    pt3dadd(-31.86, -60.47, -35.5, 0.16)
    pt3dadd(-32.07, -60.41, -35.5, 0.16)
    pt3dadd(-32.22, -60.52, -35.5, 0.16)
    pt3dadd(-32.39, -60.57, -35.5, 0.16)
    pt3dadd(-32.6, -60.57, -35.5, 0.16)
    pt3dadd(-33.33, -60.83, -35.5, 0.52)
    pt3dadd(-34.02, -61.15, -35.5, 0.16)
    pt3dadd(-34.11, -61.1, -35.5, 0.16)
    pt3dadd(-34.22, -61.04, -35.5, 0.16)
    pt3dadd(-34.33, -61.04, -35.5, 0.16)
    pt3dadd(-34.38, -60.94, -35.5, 0.16)
    pt3dadd(-34.7, -60.94, -36, 0.16)
    pt3dadd(-34.79, -60.89, -36, 0.16)
    pt3dadd(-34.96, -60.89, -36, 0.16)
    pt3dadd(-35.11, -60.83, -36, 0.16)
    pt3dadd(-35.28, -60.83, -36, 0.16)
    pt3dadd(-35.43, -60.78, -36, 0.16)
    pt3dadd(-35.64, -60.78, -36, 0.16)
    pt3dadd(-35.75, -60.83, -36, 0.16)
    pt3dadd(-35.85, -60.89, -36, 0.16)
    pt3dadd(-35.96, -60.89, -36, 0.16)
    pt3dadd(-36.06, -60.94, -36, 0.16)
    pt3dadd(-36.33, -60.94, -36, 0.16)
    pt3dadd(-36.43, -61.04, -36, 0.16)
    pt3dadd(-36.59, -61.04, -36, 0.16)
    pt3dadd(-36.69, -61.15, -36, 0.16)
    pt3dadd(-36.79, -61.25, -36, 0.16)
    pt3dadd(-36.96, -61.31, -36, 0.16)
    pt3dadd(-37.06, -61.36, -36, 0.16)
    pt3dadd(-38.01, -61.89, -36, 0.84)
    pt3dadd(-38.01, -61.99, -36, 0.84)
    pt3dadd(-38.95, -62.94, -36, 0.16)
    pt3dadd(-39.06, -63.09, -36, 0.16)
    pt3dadd(-39.15, -63.2, -36, 0.16)
    pt3dadd(-39.32, -63.36, -36, 0.16)
    pt3dadd(-39.42, -63.46, -36, 0.16)
    pt3dadd(-39.47, -63.57, -36, 0.16)
    pt3dadd(-39.58, -63.67, -36, 0.16)
    pt3dadd(-39.63, -63.78, -36, 0.16)
    pt3dadd(-39.69, -63.88, -36, 0.16)
    pt3dadd(-39.79, -63.99, -36, 0.16)
    pt3dadd(-40, -64.15, -36, 0.16)
    pt3dadd(-40.26, -64.41, -36, 0.16)
    pt3dadd(-40.42, -64.51, -36, 0.16)
    pt3dadd(-40.58, -64.62, -36, 0.16)
    pt3dadd(-40.68, -64.67, -36, 0.16)
    pt3dadd(-40.79, -64.78, -36, 0.16)
    pt3dadd(-40.89, -64.88, -36, 0.16)
    pt3dadd(-41.05, -65.04, -36, 0.16)
    pt3dadd(-41.21, -65.04, -36, 0.16)
    pt3dadd(-41.31, -65.14, -36, 0.16)
    pt3dadd(-42.9, -65.94, -36, 0.16)
    pt3dadd(-43.01, -65.98, -36, 0.16)
    pt3dadd(-43.11, -66.09, -36, 0.16)
    pt3dadd(-43.27, -66.2, -36, 0.16)
    pt3dadd(-43.38, -66.26, -36, 0.16)
    pt3dadd(-43.53, -66.36, -36, 0.16)
    pt3dadd(-43.69, -66.47, -36, 0.16)
    pt3dadd(-43.9, -66.68, -36, 0.16)
    pt3dadd(-44.01, -66.78, -36, 0.16)
    pt3dadd(-44.06, -66.89, -36, 0.16)
    pt3dadd(-44.11, -66.98, -36, 0.16)
    pt3dadd(-44.21, -67.15, -36, 0.16)
    pt3dadd(-44.32, -67.26, -36, 0.16)
    pt3dadd(-44.37, -67.36, -36, 0.16)
    pt3dadd(-44.53, -67.52, -36, 0.16)
    pt3dadd(-44.58, -67.62, -36, 0.16)
    pt3dadd(-44.63, -67.73, -36, 0.16)
    pt3dadd(-44.84, -68.52, -36, 0.52)
    pt3dadd(-46.37, -69.36, -36, 0.16)
    pt3dadd(-46.52, -69.45, -36, 0.16)
    pt3dadd(-46.63, -69.56, -36, 0.16)
    pt3dadd(-46.79, -69.62, -36, 0.16)
    pt3dadd(-46.89, -69.73, -36, 0.16)
    pt3dadd(-47, -69.78, -36, 0.16)
    pt3dadd(-47.21, -69.98, -36, 0.16)
    pt3dadd(-47.36, -70.09, -36, 0.16)
    pt3dadd(-47.99, -70.67, -36, 0.73)
    pt3dadd(-48.15, -70.72, -36, 0.73)
  }
}
proc shape3d_76() {
  axon[7] {
    pt3dadd(-48.26, -70.78, -36, 0.73)
    pt3dadd(-48.41, -70.88, -36, 0.73)
    pt3dadd(-48.57, -70.94, -36, 0.73)
    pt3dadd(-48.73, -70.94, -36, 0.73)
    pt3dadd(-48.78, -71.04, -36, 0.73)
    pt3dadd(-49.46, -71.51, -36, 0.16)
    pt3dadd(-49.62, -71.67, -36, 0.16)
    pt3dadd(-49.73, -71.78, -36, 0.16)
    pt3dadd(-49.94, -71.88, -36, 0.16)
    pt3dadd(-50.09, -71.93, -36, 0.16)
    pt3dadd(-50.2, -72.04, -36, 0.16)
    pt3dadd(-50.3, -72.14, -36, 0.16)
    pt3dadd(-50.83, -72.67, -36, 0.16)
    pt3dadd(-50.88, -72.78, -36, 0.16)
    pt3dadd(-50.99, -72.93, -36, 0.16)
    pt3dadd(-51.14, -73.09, -36, 0.16)
    pt3dadd(-51.3, -73.09, -36, 0.16)
    pt3dadd(-51.46, -73.2, -36, 0.16)
    pt3dadd(-51.62, -73.25, -36, 0.16)
    pt3dadd(-51.77, -73.3, -36, 0.16)
    pt3dadd(-51.98, -73.3, -36, 0.16)
    pt3dadd(-52.09, -73.41, -36, 0.16)
    pt3dadd(-52.19, -73.45, -36, 0.16)
    pt3dadd(-52.3, -73.51, -36, 0.16)
    pt3dadd(-52.35, -73.67, -36, 0.16)
    pt3dadd(-52.4, -73.83, -36, 0.16)
    pt3dadd(-53.19, -73.98, -36, 0.79)
    pt3dadd(-53.87, -74.56, -36, 0.21)
    pt3dadd(-53.93, -74.67, -36, 0.21)
    pt3dadd(-54.14, -74.77, -36, 0.21)
    pt3dadd(-54.35, -74.88, -36, 0.21)
    pt3dadd(-54.56, -74.98, -36, 0.21)
    pt3dadd(-54.71, -75.04, -36, 0.21)
    pt3dadd(-54.82, -75.14, -36, 0.21)
    pt3dadd(-54.98, -75.3, -36, 0.21)
    pt3dadd(-55.08, -75.4, -36, 0.21)
    pt3dadd(-55.29, -75.4, -36, 0.21)
    pt3dadd(-55.29, -75.51, -36, 0.21)
    pt3dadd(-56.13, -76.14, -36, 0.58)
    pt3dadd(-56.89, -76.7, -36, 0.16)
    pt3dadd(-57.41, -76.66, -36, 0.16)
    pt3dadd(-57.57, -76.81, -36, 0.16)
    pt3dadd(-57.67, -76.81, -36, 0.16)
    pt3dadd(-57.83, -76.97, -36, 0.16)
    pt3dadd(-57.99, -77.08, -36, 0.16)
    pt3dadd(-58.09, -77.18, -36, 0.16)
    pt3dadd(-58.15, -77.29, -36, 0.16)
    pt3dadd(-58.25, -77.45, -36, 0.16)
    pt3dadd(-58.3, -77.55, -36, 0.16)
    pt3dadd(-58.41, -77.7, -36, 0.16)
    pt3dadd(-58.46, -77.81, -36, 0.16)
    pt3dadd(-58.51, -77.97, -36, 0.16)
    pt3dadd(-58.62, -78.18, -36, 0.16)
    pt3dadd(-58.67, -78.34, -36, 0.16)
    pt3dadd(-58.67, -78.55, -36, 0.16)
    pt3dadd(-58.88, -78.66, -36, 0.16)
    pt3dadd(-58.93, -78.81, -36, 0.16)
    pt3dadd(-59.04, -78.92, -36, 0.16)
    pt3dadd(-59.19, -79.08, -36, 0.16)
    pt3dadd(-59.3, -79.29, -36, 0.16)
    pt3dadd(-59.4, -79.34, -36, 0.16)
    pt3dadd(-59.51, -79.44, -36, 0.16)
    pt3dadd(-59.61, -79.55, -36, 0.16)
    pt3dadd(-59.72, -79.65, -36, 0.16)
    pt3dadd(-59.82, -79.81, -36, 0.16)
    pt3dadd(-59.93, -79.92, -36, 0.16)
    pt3dadd(-59.98, -80.06, -36, 0.16)
    pt3dadd(-60.03, -80.18, -36, 0.16)
    pt3dadd(-60.03, -80.39, -36, 0.16)
    pt3dadd(-60.09, -80.5, -36, 0.16)
    pt3dadd(-60.45, -81.39, -36, 0.79)
    pt3dadd(-60.51, -81.48, -36, 0.79)
    pt3dadd(-60.61, -81.59, -36, 0.79)
    pt3dadd(-60.77, -81.7, -36, 0.79)
    pt3dadd(-60.82, -81.86, -36, 0.79)
    pt3dadd(-60.93, -81.91, -36, 0.79)
    pt3dadd(-61.03, -82.02, -36, 0.79)
    pt3dadd(-61.14, -82.12, -36, 0.79)
    pt3dadd(-61.29, -82.18, -36, 0.79)
    pt3dadd(-61.4, -82.28, -36, 0.79)
    pt3dadd(-61.5, -82.34, -36, 0.79)
    pt3dadd(-61.98, -82.91, -36, 0.16)
    pt3dadd(-62.08, -83.07, -35.5, 0.16)
    pt3dadd(-62.13, -83.18, -35.5, 0.16)
    pt3dadd(-62.24, -83.28, -36, 0.16)
    pt3dadd(-62.34, -83.44, -36.5, 0.16)
    pt3dadd(-62.5, -83.49, -36.5, 0.16)
    pt3dadd(-62.61, -83.54, -36.5, 0.16)
    pt3dadd(-62.76, -83.6, -36.5, 0.16)
    pt3dadd(-62.87, -83.7, -36.5, 0.16)
    pt3dadd(-62.97, -83.81, -36.5, 0.16)
    pt3dadd(-63.13, -83.86, -36.5, 0.16)
    pt3dadd(-63.24, -83.96, -36.5, 0.16)
    pt3dadd(-63.34, -84.07, -36.5, 0.16)
    pt3dadd(-63.45, -84.23, -36.5, 0.16)
    pt3dadd(-63.6, -84.33, -36.5, 0.16)
    pt3dadd(-63.97, -84.7, -36.5, 0.16)
    pt3dadd(-64.02, -84.81, -36.5, 0.16)
    pt3dadd(-64.13, -84.96, -36.5, 0.16)
    pt3dadd(-64.23, -85.07, -36.5, 0.16)
    pt3dadd(-64.34, -85.23, -36, 0.16)
    pt3dadd(-64.5, -85.44, -36, 0.16)
    pt3dadd(-64.59, -85.59, -36, 0.16)
    pt3dadd(-64.76, -85.8, -36, 0.16)
    pt3dadd(-64.76, -85.96, -36, 0.16)
    pt3dadd(-64.86, -86.07, -36, 0.16)
    pt3dadd(-64.92, -86.23, -36, 0.16)
    pt3dadd(-64.97, -86.44, -36, 0.16)
    pt3dadd(-65.02, -86.59, -36, 0.16)
    pt3dadd(-65.13, -86.8, -36, 0.16)
    pt3dadd(-65.18, -86.96, -36, 0.16)
    pt3dadd(-65.06, -86.96, -36, 0.16)
    pt3dadd(-65.13, -87.12, -36, 0.16)
    pt3dadd(-65.18, -87.43, -36, 0.16)
  }
  axon[8] {pt3dclear()
    pt3dadd(-65.18, -87.43, -36, 0.16)
    pt3dadd(-65.54, -88.03, -36.5, 0.16)
    pt3dadd(-65.44, -88.08, -36.5, 0.16)
    pt3dadd(-65.33, -88.14, -36.5, 0.16)
    pt3dadd(-65.18, -88.19, -36.5, 0.16)
    pt3dadd(-65.06, -88.35, -36.5, 0.16)
    pt3dadd(-64.59, -89.29, -36.5, 0.79)
    pt3dadd(-64.31, -89.58, -38, 0.21)
    pt3dadd(-64.16, -89.58, -38, 0.21)
    pt3dadd(-64.16, -89.69, -38, 0.21)
    pt3dadd(-64.22, -89.9, -38, 0.21)
    pt3dadd(-64.06, -89.9, -38, 0.21)
    pt3dadd(-64.06, -90.05, -36.5, 0.21)
    pt3dadd(-63.9, -90.16, -36.5, 0.21)
    pt3dadd(-63.85, -90.37, -36, 0.21)
    pt3dadd(-63.8, -90.58, -36, 0.21)
    pt3dadd(-63.8, -90.74, -36, 0.21)
    pt3dadd(-63.8, -90.84, -36, 0.21)
    pt3dadd(-63.85, -91, -36, 0.21)
    pt3dadd(-63.95, -91.11, -36, 0.21)
    pt3dadd(-64.01, -91.32, -36, 0.21)
    pt3dadd(-64.01, -91.42, -36, 0.21)
    pt3dadd(-63.64, -92.16, -36, 0.79)
    pt3dadd(-63.74, -93.16, -36.5, 0.16)
    pt3dadd(-63.95, -93.21, -37, 0.16)
    pt3dadd(-64.06, -93.26, -37, 0.16)
    pt3dadd(-64.16, -93.37, -37, 0.16)
    pt3dadd(-64.37, -93.58, -37, 0.16)
    pt3dadd(-64.43, -93.73, -37, 0.16)
    pt3dadd(-64.31, -93.84, -37, 0.16)
    pt3dadd(-64.16, -94, -37, 0.16)
    pt3dadd(-64.22, -94.16, -37, 0.16)
    pt3dadd(-64.16, -94.26, -37, 0.16)
    pt3dadd(-64.11, -94.42, -37, 0.16)
    pt3dadd(-64.06, -94.73, -37, 0.16)
    pt3dadd(-64.06, -95.26, -37, 0.16)
    pt3dadd(-64.11, -95.47, -37, 0.16)
    pt3dadd(-64.16, -95.63, -37.5, 0.16)
    pt3dadd(-64.16, -96.31, -38, 0.16)
    pt3dadd(-64.48, -97.68, -40, 0.94)
    pt3dadd(-64.48, -97.68, -39.5, 0.94)
  }
  axon[9] {pt3dclear()
    pt3dadd(-64.48, -97.68, -39.5, 0.94)
    pt3dadd(-65.16, -98.89, -38, 0.16)
    pt3dadd(-65.2, -99.04, -38, 0.16)
    pt3dadd(-65.27, -99.15, -38, 0.16)
    pt3dadd(-65.37, -99.25, -38.5, 0.16)
    pt3dadd(-65.48, -99.41, -38.5, 0.16)
    pt3dadd(-65.69, -99.62, -38.5, 0.16)
    pt3dadd(-65.79, -99.62, -38.5, 0.16)
    pt3dadd(-65.84, -99.78, -38.5, 0.16)
    pt3dadd(-65.95, -100.04, -38.5, 0.16)
    pt3dadd(-66, -100.2, -39, 0.16)
    pt3dadd(-66, -100.46, -39, 0.16)
    pt3dadd(-66.05, -100.67, -39, 0.16)
    pt3dadd(-66.05, -100.94, -39, 0.16)
    pt3dadd(-66.11, -101.15, -39, 0.16)
    pt3dadd(-66.16, -101.3, -39, 0.16)
    pt3dadd(-66.2, -101.52, -39, 0.16)
    pt3dadd(-66.31, -101.67, -39, 0.16)
    pt3dadd(-66.31, -101.78, -39, 0.16)
    pt3dadd(-66.42, -101.99, -39, 0.16)
    pt3dadd(-66.47, -102.15, -39, 0.16)
    pt3dadd(-66.58, -102.25, -39, 0.16)
    pt3dadd(-66.47, -102.62, -39.5, 0.52)
    pt3dadd(-66.47, -102.62, -38, 0.52)
  }
  axon[10] {pt3dclear()
    pt3dadd(-66.47, -102.62, -38, 0.52)
    pt3dadd(-67.26, -103.3, -38.5, 0.16)
    pt3dadd(-67.84, -103.78, -39.5, 0.58)
  }
  axon[11] {pt3dclear()
    pt3dadd(-66.47, -102.62, -38, 0.52)
    pt3dadd(-66.2, -103.25, -39, 0.16)
    pt3dadd(-66.03, -103.66, -37.5, 0.16)
    pt3dadd(-66.08, -103.82, -38, 0.16)
    pt3dadd(-66.08, -104.13, -38.5, 0.16)
    pt3dadd(-66.13, -104.29, -38.5, 0.16)
    pt3dadd(-66.13, -104.55, -38.5, 0.16)
    pt3dadd(-66.18, -104.76, -39, 0.16)
    pt3dadd(-66.18, -104.92, -39, 0.16)
    pt3dadd(-66.23, -105.03, -39, 0.16)
    pt3dadd(-66.23, -105.34, -39.5, 0.16)
    pt3dadd(-66.29, -105.45, -39.5, 0.16)
    pt3dadd(-66.29, -105.66, -39.5, 0.16)
    pt3dadd(-66.34, -105.87, -39.5, 0.16)
    pt3dadd(-66.45, -105.97, -39.5, 0.16)
    pt3dadd(-66.5, -106.13, -39.5, 0.16)
    pt3dadd(-66.55, -106.29, -39.5, 0.16)
    pt3dadd(-66.59, -106.39, -39.5, 0.16)
    pt3dadd(-66.66, -106.55, -39.5, 0.16)
    pt3dadd(-66.76, -106.66, -39.5, 0.16)
    pt3dadd(-66.92, -106.81, -39.5, 0.16)
    pt3dadd(-66.92, -106.92, -39.5, 0.16)
    pt3dadd(-67.02, -107.02, -39.5, 0.16)
    pt3dadd(-67.29, -107.29, -39.5, 0.16)
    pt3dadd(-67.34, -107.5, -39.5, 0.16)
    pt3dadd(-67.44, -107.65, -39.5, 0.16)
    pt3dadd(-67.55, -107.76, -39.5, 0.16)
    pt3dadd(-67.65, -107.92, -39, 0.16)
    pt3dadd(-67.81, -108.02, -39, 0.16)
    pt3dadd(-67.97, -108.18, -39, 0.16)
    pt3dadd(-68.13, -108.28, -38.5, 0.16)
    pt3dadd(-68.28, -108.39, -38.5, 0.16)
    pt3dadd(-68.39, -108.44, -38.5, 0.16)
    pt3dadd(-68.48, -108.6, -38.5, 0.16)
    pt3dadd(-68.59, -108.6, -38.5, 0.16)
    pt3dadd(-68.7, -108.71, -38.5, 0.16)
    pt3dadd(-68.81, -108.81, -38, 0.16)
    pt3dadd(-68.86, -108.92, -38, 0.16)
    pt3dadd(-69.23, -109.86, -40, 0.79)
  }
  axon[12] {pt3dclear()
    pt3dadd(-64.48, -97.68, -39.5, 0.94)
    pt3dadd(-63.77, -98.45, -39, 0.16)
    pt3dadd(-63.77, -98.61, -39, 0.16)
    pt3dadd(-63.72, -98.77, -39, 0.16)
    pt3dadd(-63.72, -100.14, -39.5, 0.16)
    pt3dadd(-63.77, -100.24, -39.5, 0.16)
    pt3dadd(-63.77, -100.71, -40, 0.16)
    pt3dadd(-63.82, -100.87, -40, 0.16)
    pt3dadd(-63.77, -101.08, -40, 0.16)
    pt3dadd(-63.72, -101.24, -40, 0.16)
    pt3dadd(-63.66, -101.35, -40, 0.16)
    pt3dadd(-63.61, -101.5, -40, 0.16)
    pt3dadd(-63.56, -101.66, -40, 0.16)
    pt3dadd(-63.56, -101.77, -40, 0.16)
    pt3dadd(-63.45, -101.98, -40, 0.16)
    pt3dadd(-63.4, -102.13, -40, 0.16)
    pt3dadd(-63.4, -102.34, -40, 0.16)
    pt3dadd(-63.35, -102.45, -40, 0.16)
    pt3dadd(-63.35, -102.66, -40, 0.16)
    pt3dadd(-63.3, -102.82, -40, 0.16)
    pt3dadd(-63.3, -103.13, -40, 0.16)
    pt3dadd(-63.3, -103.29, -40, 0.16)
    pt3dadd(-63.3, -104.03, -40, 0.16)
    pt3dadd(-63.24, -104.13, -40, 0.16)
    pt3dadd(-63.24, -104.34, -40, 0.16)
    pt3dadd(-63.19, -104.5, -40, 0.16)
    pt3dadd(-63.09, -104.66, -40, 0.16)
    pt3dadd(-63.09, -104.82, -40, 0.16)
  }
}
proc shape3d_77() {
  axon[12] {
    pt3dadd(-62.98, -104.97, -40, 0.16)
    pt3dadd(-62.93, -105.18, -40, 0.16)
    pt3dadd(-62.82, -105.29, -40, 0.16)
    pt3dadd(-62.72, -105.45, -40, 0.16)
    pt3dadd(-62.67, -105.66, -40, 0.16)
    pt3dadd(-62.61, -105.76, -40, 0.16)
    pt3dadd(-62.46, -105.76, -40, 0.16)
    pt3dadd(-62.46, -105.92, -40, 0.16)
    pt3dadd(-62.35, -106.02, -40, 0.16)
    pt3dadd(-62.25, -106.13, -40, 0.16)
    pt3dadd(-62.19, -106.34, -40, 0.16)
    pt3dadd(-62.14, -106.45, -40, 0.16)
    pt3dadd(-62.14, -106.55, -40.5, 0.16)
    pt3dadd(-62.04, -106.6, -40.5, 0.16)
    pt3dadd(-62.04, -106.71, -40.5, 0.16)
    pt3dadd(-61.98, -106.81, -40.5, 0.16)
    pt3dadd(-61.98, -106.92, -40.5, 0.16)
    pt3dadd(-61.88, -106.97, -40.5, 0.16)
    pt3dadd(-61.88, -107.08, -41, 0.16)
    pt3dadd(-61.72, -107.18, -41, 0.16)
    pt3dadd(-61.77, -107.29, -41, 0.16)
    pt3dadd(-61.14, -107.71, -41, 0.89)
  }
  axon[13] {pt3dclear()
    pt3dadd(-65.18, -87.43, -36, 0.16)
    pt3dadd(-65.54, -87.72, -35.5, 0.16)
    pt3dadd(-65.59, -87.82, -35.5, 0.16)
    pt3dadd(-65.7, -87.93, -35.5, 0.16)
    pt3dadd(-65.81, -88.03, -35.5, 0.16)
    pt3dadd(-65.86, -88.14, -35.5, 0.16)
    pt3dadd(-66.12, -88.4, -35.5, 0.16)
    pt3dadd(-66.28, -88.5, -35.5, 0.16)
    pt3dadd(-66.44, -88.4, -36, 0.16)
    pt3dadd(-66.54, -88.4, -36, 0.16)
    pt3dadd(-66.65, -88.4, -36, 0.16)
    pt3dadd(-66.75, -88.45, -36.5, 0.16)
    pt3dadd(-67.01, -88.45, -36.5, 0.16)
    pt3dadd(-67.59, -88.61, -37, 0.73)
    pt3dadd(-68.22, -88.45, -37, 0.1)
    pt3dadd(-68.73, -88.66, -37, 0.21)
    pt3dadd(-68.84, -88.77, -37, 0.21)
    pt3dadd(-68.95, -88.82, -37, 0.21)
    pt3dadd(-69.06, -88.87, -37, 0.21)
    pt3dadd(-69.16, -88.92, -37, 0.21)
    pt3dadd(-69.31, -88.98, -37, 0.21)
    pt3dadd(-69.58, -88.98, -37, 0.21)
    pt3dadd(-69.69, -88.92, -37, 0.21)
    pt3dadd(-69.9, -88.92, -37, 0.21)
    pt3dadd(-70.06, -88.87, -37, 0.21)
    pt3dadd(-70.27, -88.92, -37, 0.21)
    pt3dadd(-70.31, -89.03, -37, 0.21)
    pt3dadd(-70.63, -89.19, -37, 0.21)
  }
  axon[14] {pt3dclear()
    pt3dadd(-70.63, -89.19, -37, 0.21)
    pt3dadd(-71, -89.4, -37, 0.21)
    pt3dadd(-71.05, -90.45, -37, 0.63)
    pt3dadd(-71.84, -90.4, -37, 0.16)
    pt3dadd(-72, -90.4, -37, 0.16)
    pt3dadd(-72.09, -90.45, -37, 0.16)
    pt3dadd(-72.37, -90.45, -37, 0.16)
    pt3dadd(-72.52, -90.5, -37, 0.16)
    pt3dadd(-72.63, -90.55, -37, 0.16)
    pt3dadd(-72.94, -90.55, -37, 0.16)
    pt3dadd(-73.15, -90.76, -37, 0.16)
    pt3dadd(-73.26, -91.03, -37, 0.16)
    pt3dadd(-73.36, -91.08, -37, 0.16)
    pt3dadd(-73.52, -91.24, -37, 0.16)
    pt3dadd(-73.63, -91.45, -37, 0.16)
    pt3dadd(-73.68, -91.61, -37, 0.16)
    pt3dadd(-73.78, -91.71, -37, 0.16)
    pt3dadd(-73.94, -91.76, -37, 0.16)
    pt3dadd(-73.98, -91.92, -37, 0.16)
    pt3dadd(-74.09, -92.03, -37, 0.16)
    pt3dadd(-74.47, -92.39, -37, 0.16)
    pt3dadd(-74.68, -92.45, -37.5, 0.16)
    pt3dadd(-74.83, -92.5, -37.5, 0.16)
    pt3dadd(-74.94, -92.5, -37.5, 0.16)
    pt3dadd(-75.15, -92.55, -37.5, 0.16)
    pt3dadd(-75.31, -92.6, -37.5, 0.16)
    pt3dadd(-75.52, -92.76, -37.5, 0.16)
    pt3dadd(-75.67, -92.76, -37.5, 0.16)
    pt3dadd(-76.2, -92.81, -36.5, 0.84)
    pt3dadd(-76.83, -93.29, -37.5, 0.16)
    pt3dadd(-76.98, -93.29, -37.5, 0.16)
    pt3dadd(-77.09, -93.34, -37.5, 0.16)
    pt3dadd(-77.41, -93.34, -37.5, 0.16)
    pt3dadd(-77.51, -93.39, -37.5, 0.16)
    pt3dadd(-77.72, -93.5, -37.5, 0.16)
    pt3dadd(-77.88, -93.55, -37.5, 0.16)
    pt3dadd(-78.09, -93.66, -37.5, 0.16)
    pt3dadd(-78.25, -93.81, -37.5, 0.16)
    pt3dadd(-78.34, -93.92, -37.5, 0.16)
    pt3dadd(-78.51, -93.97, -38, 0.16)
    pt3dadd(-78.61, -94.18, -38, 0.16)
    pt3dadd(-78.77, -94.18, -38, 0.16)
    pt3dadd(-78.88, -94.29, -38, 0.16)
    pt3dadd(-79.03, -94.39, -38, 0.16)
    pt3dadd(-79.14, -94.5, -38, 0.16)
    pt3dadd(-79.23, -94.55, -38, 0.16)
    pt3dadd(-79.4, -94.65, -38, 0.16)
    pt3dadd(-79.51, -94.6, -38, 0.16)
    pt3dadd(-79.66, -94.55, -38, 0.16)
    pt3dadd(-80.61, -95.39, -38.5, 0.89)
    pt3dadd(-80.92, -95.39, -38.5, 0.89)
    pt3dadd(-81.08, -95.44, -38.5, 0.89)
    pt3dadd(-81.34, -95.71, -38.5, 0.89)
    pt3dadd(-81.45, -95.81, -38.5, 0.89)
    pt3dadd(-82.87, -96.39, -38.5, 0.16)
    pt3dadd(-83.08, -96.49, -38.5, 0.16)
    pt3dadd(-83.29, -96.6, -38.5, 0.16)
    pt3dadd(-83.44, -96.65, -38.5, 0.16)
    pt3dadd(-83.55, -96.76, -38.5, 0.16)
    pt3dadd(-83.71, -96.81, -38.5, 0.16)
    pt3dadd(-83.92, -96.97, -38.5, 0.16)
    pt3dadd(-84.28, -96.97, -38.5, 0.16)
    pt3dadd(-84.44, -97.02, -39, 0.16)
    pt3dadd(-84.55, -96.97, -39, 0.16)
    pt3dadd(-84.7, -97.02, -39, 0.16)
    pt3dadd(-84.86, -97.07, -39, 0.16)
    pt3dadd(-85.07, -97.13, -39, 0.16)
    pt3dadd(-85.23, -97.13, -39, 0.16)
    pt3dadd(-86.54, -97.7, -39, 0.84)
    pt3dadd(-86.65, -97.7, -39, 0.84)
    pt3dadd(-86.8, -97.65, -39, 0.84)
    pt3dadd(-86.99, -97.99, -38.5, 0.16)
    pt3dadd(-87.04, -98.09, -38.5, 0.16)
    pt3dadd(-87.15, -98.15, -38.5, 0.16)
    pt3dadd(-87.36, -98.25, -38.5, 0.16)
    pt3dadd(-87.52, -98.31, -38.5, 0.16)
    pt3dadd(-87.62, -98.41, -38.5, 0.16)
    pt3dadd(-87.73, -98.41, -38.5, 0.16)
    pt3dadd(-88.04, -98.41, -38.5, 0.16)
    pt3dadd(-88.15, -98.36, -38.5, 0.16)
    pt3dadd(-88.3, -98.41, -38.5, 0.16)
    pt3dadd(-88.41, -98.46, -38.5, 0.16)
    pt3dadd(-88.62, -98.46, -38.5, 0.16)
    pt3dadd(-88.78, -98.52, -38.5, 0.16)
    pt3dadd(-89.04, -98.46, -38.5, 0.16)
    pt3dadd(-89.67, -98.46, -39, 0.16)
    pt3dadd(-89.93, -98.52, -39, 0.16)
    pt3dadd(-90.03, -98.57, -39, 0.16)
    pt3dadd(-90.24, -98.57, -39, 0.16)
    pt3dadd(-90.35, -98.62, -39, 0.16)
    pt3dadd(-90.61, -98.62, -39, 0.16)
    pt3dadd(-90.77, -98.67, -39, 0.16)
    pt3dadd(-90.98, -98.73, -39, 0.16)
    pt3dadd(-91.08, -98.78, -39, 0.16)
    pt3dadd(-91.35, -98.94, -39, 0.16)
    pt3dadd(-91.45, -99.04, -39, 0.16)
    pt3dadd(-91.56, -99.09, -39, 0.16)
    pt3dadd(-91.77, -99.3, -38.5, 0.16)
    pt3dadd(-91.98, -99.46, -38.5, 0.16)
    pt3dadd(-92.13, -99.62, -38.5, 0.16)
    pt3dadd(-92.24, -99.67, -38.5, 0.16)
    pt3dadd(-92.45, -99.78, -38.5, 0.16)
    pt3dadd(-92.61, -99.88, -38.5, 0.16)
    pt3dadd(-92.82, -99.99, -38.5, 0.16)
    pt3dadd(-92.97, -100.15, -38.5, 0.16)
    pt3dadd(-93.39, -100.36, -38.5, 0.16)
    pt3dadd(-93.5, -100.46, -38.5, 0.16)
    pt3dadd(-93.6, -100.51, -38.5, 0.16)
    pt3dadd(-93.76, -100.57, -38.5, 0.16)
    pt3dadd(-93.87, -100.62, -38.5, 0.16)
    pt3dadd(-93.97, -100.67, -38.5, 0.16)
    pt3dadd(-94.13, -100.72, -38.5, 0.16)
    pt3dadd(-94.29, -100.83, -38.5, 0.16)
    pt3dadd(-94.44, -100.88, -38.5, 0.16)
    pt3dadd(-94.55, -100.93, -38.5, 0.16)
    pt3dadd(-94.65, -100.99, -38.5, 0.16)
    pt3dadd(-94.76, -101.04, -38.5, 0.16)
    pt3dadd(-94.92, -101.14, -38.5, 0.16)
    pt3dadd(-95.13, -101.2, -38.5, 0.16)
    pt3dadd(-95.28, -101.3, -38.5, 0.16)
    pt3dadd(-95.44, -101.35, -38.5, 0.16)
    pt3dadd(-95.55, -101.41, -38.5, 0.16)
    pt3dadd(-95.65, -101.51, -38.5, 0.16)
    pt3dadd(-95.81, -101.67, -38.5, 0.16)
    pt3dadd(-95.97, -101.77, -38.5, 0.16)
    pt3dadd(-96.07, -101.99, -38.5, 0.16)
    pt3dadd(-96.18, -102.04, -38.5, 0.16)
    pt3dadd(-96.39, -102.25, -38.5, 0.16)
    pt3dadd(-96.49, -102.41, -38.5, 0.16)
    pt3dadd(-96.6, -102.62, -38.5, 0.16)
    pt3dadd(-96.86, -102.88, -38.5, 0.16)
    pt3dadd(-96.96, -103.09, -38.5, 0.16)
    pt3dadd(-97.28, -103.51, -38.5, 0.16)
    pt3dadd(-98.07, -104.35, -39, 0.89)
    pt3dadd(-99.17, -104.88, -38.5, 0.16)
    pt3dadd(-99.33, -104.82, -38.5, 0.16)
    pt3dadd(-99.48, -104.82, -38.5, 0.16)
    pt3dadd(-99.64, -104.77, -38.5, 0.16)
    pt3dadd(-99.75, -104.82, -38.5, 0.16)
    pt3dadd(-99.9, -104.82, -38.5, 0.16)
    pt3dadd(-100.01, -104.88, -38.5, 0.16)
    pt3dadd(-100.17, -104.93, -38.5, 0.16)
    pt3dadd(-100.32, -104.93, -38.5, 0.16)
    pt3dadd(-100.53, -105.09, -38, 0.16)
    pt3dadd(-100.69, -105.09, -38, 0.16)
    pt3dadd(-100.85, -105.19, -38, 0.16)
    pt3dadd(-101.01, -105.19, -38, 0.16)
    pt3dadd(-101.16, -105.24, -38, 0.16)
    pt3dadd(-101.37, -105.24, -38, 0.16)
    pt3dadd(-101.53, -105.14, -38, 0.16)
    pt3dadd(-101.64, -105.09, -38, 0.16)
    pt3dadd(-101.79, -104.93, -38, 0.16)
    pt3dadd(-101.9, -104.88, -38, 0.16)
    pt3dadd(-102, -104.72, -38, 0.16)
    pt3dadd(-102.11, -104.61, -38, 0.16)
    pt3dadd(-102.16, -104.51, -38, 0.16)
    pt3dadd(-102.32, -104.35, -38, 0.16)
    pt3dadd(-102.42, -104.25, -38, 0.16)
    pt3dadd(-102.42, -104.09, -38, 0.16)
    pt3dadd(-102.53, -103.98, -38, 0.16)
    pt3dadd(-102.53, -103.82, -38, 0.16)
    pt3dadd(-102.74, -103.77, -38, 0.16)
    pt3dadd(-102.79, -103.67, -38, 0.16)
    pt3dadd(-102.9, -103.56, -38, 0.16)
    pt3dadd(-103.11, -103.56, -38, 0.16)
    pt3dadd(-103.05, -103.4, -38, 0.16)
    pt3dadd(-103.16, -103.3, -38, 0.16)
    pt3dadd(-103.32, -103.3, -38, 0.16)
    pt3dadd(-103.37, -103.19, -38, 0.16)
    pt3dadd(-103.47, -103.09, -38, 0.16)
    pt3dadd(-103.68, -103.04, -38, 0.16)
    pt3dadd(-103.79, -102.93, -38, 0.16)
    pt3dadd(-103.95, -102.98, -38, 0.16)
    pt3dadd(-105, -102.98, -38, 0.16)
    pt3dadd(-105.21, -103.04, -38, 0.16)
    pt3dadd(-105.36, -103.09, -38, 0.16)
    pt3dadd(-105.57, -103.09, -38, 0.16)
    pt3dadd(-105.78, -103.14, -38, 0.16)
    pt3dadd(-105.89, -103.14, -38, 0.16)
    pt3dadd(-105.99, -103.19, -38, 0.16)
    pt3dadd(-106.26, -103.19, -38, 0.16)
    pt3dadd(-106.41, -103.3, -38, 0.16)
    pt3dadd(-106.57, -103.35, -38, 0.16)
    pt3dadd(-106.73, -103.4, -38, 0.16)
    pt3dadd(-106.83, -103.46, -38, 0.16)
    pt3dadd(-107.1, -103.46, -38, 0.16)
    pt3dadd(-107.2, -103.51, -38, 0.16)
    pt3dadd(-107.88, -103.19, -38, 0.63)
    pt3dadd(-108.04, -103.19, -38, 0.63)
    pt3dadd(-108.15, -103.14, -38, 0.63)
    pt3dadd(-108.25, -103.09, -38, 0.63)
    pt3dadd(-108.25, -102.93, -38, 0.63)
    pt3dadd(-108.51, -102.93, -38, 0.63)
    pt3dadd(-108.67, -102.83, -38, 0.63)
  }
  axon[15] {pt3dclear()
    pt3dadd(-70.63, -89.19, -37, 0.21)
    pt3dadd(-71.39, -88.78, -38, 0.16)
    pt3dadd(-71.5, -88.73, -38, 0.16)
    pt3dadd(-71.7, -88.63, -38, 0.16)
    pt3dadd(-71.81, -88.63, -38, 0.16)
  }
}
proc shape3d_78() {
  axon[15] {
    pt3dadd(-71.92, -88.57, -38, 0.16)
    pt3dadd(-72.02, -88.52, -38, 0.16)
    pt3dadd(-72.13, -88.47, -37.5, 0.16)
    pt3dadd(-72.23, -88.42, -37.5, 0.16)
    pt3dadd(-72.28, -88.31, -37.5, 0.16)
    pt3dadd(-72.55, -88.31, -37, 0.16)
    pt3dadd(-72.7, -88.15, -37, 0.16)
    pt3dadd(-72.86, -88.1, -37, 0.16)
    pt3dadd(-72.97, -88.05, -37, 0.16)
    pt3dadd(-73.06, -87.94, -37, 0.16)
    pt3dadd(-73.23, -87.84, -37, 0.16)
    pt3dadd(-74.01, -88, -37, 0.58)
    pt3dadd(-74.75, -87.1, -37, 0.16)
    pt3dadd(-75.48, -86.47, -37, 0.73)
    pt3dadd(-75.54, -86.37, -37, 0.73)
    pt3dadd(-76.38, -85.1, -36, 0.16)
    pt3dadd(-76.27, -84.84, -36, 0.16)
    pt3dadd(-76.59, -83.95, -36, 0.63)
    pt3dadd(-76.95, -83.32, -35.5, 0.16)
    pt3dadd(-77.01, -83.21, -35.5, 0.16)
    pt3dadd(-77.01, -82.58, -35.5, 0.16)
    pt3dadd(-77.06, -82.48, -35, 0.16)
    pt3dadd(-77.27, -82.27, -35, 0.16)
    pt3dadd(-77.31, -82.16, -35, 0.16)
    pt3dadd(-77.43, -82.11, -35, 0.16)
    pt3dadd(-77.9, -80.9, -35, 0.84)
    pt3dadd(-78, -80.84, -35, 0.84)
    pt3dadd(-78.06, -80.84, -34.5, 0.84)
    pt3dadd(-78.9, -80.48, -35.5, 0.16)
    pt3dadd(-79, -80.43, -35.5, 0.16)
    pt3dadd(-79.11, -80.37, -35.5, 0.16)
    pt3dadd(-79.2, -80.27, -35.5, 0.16)
    pt3dadd(-79.31, -80.16, -35.5, 0.16)
    pt3dadd(-79.47, -80.11, -35.5, 0.16)
    pt3dadd(-79.53, -79.95, -35.5, 0.16)
    pt3dadd(-79.58, -79.84, -35.5, 0.16)
    pt3dadd(-79.63, -79.73, -35.5, 0.16)
    pt3dadd(-79.68, -79.58, -35.5, 0.16)
    pt3dadd(-79.68, -79.43, -35.5, 0.16)
    pt3dadd(-79.79, -79.37, -35.5, 0.16)
    pt3dadd(-79.89, -79.16, -35.5, 0.16)
    pt3dadd(-80.05, -79.11, -35.5, 0.16)
    pt3dadd(-80.16, -79.06, -35.5, 0.16)
    pt3dadd(-80.42, -79.06, -35.5, 0.16)
    pt3dadd(-80.68, -79.16, -35.5, 0.16)
    pt3dadd(-80.84, -79.22, -35.5, 0.16)
    pt3dadd(-81.09, -79.31, -35.5, 0.16)
    pt3dadd(-81.31, -79.31, -35.5, 0.16)
    pt3dadd(-81.42, -79.22, -35.5, 0.16)
    pt3dadd(-81.47, -79.06, -35.5, 0.16)
    pt3dadd(-81.52, -78.95, -35.5, 0.16)
    pt3dadd(-81.56, -78.84, -35.5, 0.16)
    pt3dadd(-81.63, -78.69, -35.5, 0.16)
    pt3dadd(-81.63, -78.48, -35.5, 0.16)
    pt3dadd(-81.68, -78.38, -35.5, 0.16)
    pt3dadd(-81.68, -78.01, -35.5, 0.16)
    pt3dadd(-81.63, -77.84, -35.5, 0.16)
    pt3dadd(-81.63, -77.53, -35.5, 0.16)
    pt3dadd(-81.73, -77.38, -35.5, 0.16)
    pt3dadd(-82.52, -76.64, -35.5, 0.16)
    pt3dadd(-82.57, -76.48, -35.5, 0.16)
    pt3dadd(-82.62, -76.31, -35.5, 0.16)
    pt3dadd(-83.41, -75.27, -36, 0.84)
    pt3dadd(-84.41, -74.9, -36, 0.16)
    pt3dadd(-84.46, -74.75, -36.5, 0.16)
    pt3dadd(-84.56, -74.64, -36.5, 0.16)
    pt3dadd(-84.61, -74.54, -36.5, 0.16)
    pt3dadd(-84.77, -74.43, -36.5, 0.16)
    pt3dadd(-84.93, -74.38, -36.5, 0.16)
    pt3dadd(-84.98, -74.22, -36.5, 0.16)
    pt3dadd(-85.09, -74.27, -36.5, 0.16)
    pt3dadd(-85.35, -73.59, -37, 0.58)
    pt3dadd(-85.4, -73.22, -37, 0.58)
    pt3dadd(-85.45, -73.06, -37, 0.58)
    pt3dadd(-85.56, -72.95, -37, 0.58)
    pt3dadd(-85.61, -72.8, -37.5, 0.58)
    pt3dadd(-86.24, -71.84, -37.5, 0.16)
    pt3dadd(-86.29, -71.75, -37.5, 0.16)
    pt3dadd(-86.35, -71.59, -37.5, 0.16)
    pt3dadd(-86.5, -71.43, -37.5, 0.16)
    pt3dadd(-86.56, -71.33, -37.5, 0.16)
    pt3dadd(-86.77, -71.28, -37.5, 0.16)
    pt3dadd(-86.82, -71.17, -37.5, 0.16)
    pt3dadd(-87.03, -71.17, -37.5, 0.16)
    pt3dadd(-87.13, -71.06, -37.5, 0.16)
    pt3dadd(-87.29, -71.06, -37.5, 0.16)
    pt3dadd(-87.34, -70.95, -37.5, 0.16)
    pt3dadd(-87.55, -70.86, -37.5, 0.16)
    pt3dadd(-87.61, -70.75, -38, 0.16)
    pt3dadd(-87.71, -70.65, -38, 0.16)
    pt3dadd(-87.82, -70.59, -38, 0.16)
    pt3dadd(-87.87, -70.48, -38, 0.16)
    pt3dadd(-88.03, -70.44, -38, 0.16)
    pt3dadd(-88.13, -70.38, -38, 0.16)
    pt3dadd(-88.29, -70.22, -38, 0.16)
    pt3dadd(-88.39, -70.17, -38, 0.16)
    pt3dadd(-88.5, -70.17, -38, 0.16)
    pt3dadd(-89.02, -69.91, -38, 0.58)
    pt3dadd(-89.08, -69.8, -38, 0.58)
    pt3dadd(-89.18, -69.7, -38, 0.58)
    pt3dadd(-89.29, -69.59, -38, 0.58)
    pt3dadd(-89.29, -69.38, -38, 0.58)
    pt3dadd(-89.34, -69.28, -38, 0.58)
    pt3dadd(-89.44, -69.17, -38, 0.58)
    pt3dadd(-89.44, -69.06, -38, 0.58)
    pt3dadd(-89.5, -68.86, -38, 0.58)
    pt3dadd(-89.55, -68.75, -38, 0.58)
    pt3dadd(-89.65, -68.59, -38, 0.58)
    pt3dadd(-90.13, -67.86, -38, 0.21)
    pt3dadd(-90.13, -67.23, -38, 0.58)
    pt3dadd(-90.13, -67.12, -38, 0.58)
    pt3dadd(-90.18, -66.97, -38, 0.58)
    pt3dadd(-90.18, -66.23, -38, 0.58)
    pt3dadd(-91.22, -66.09, -38.5, 0.16)
    pt3dadd(-91.33, -65.88, -38.5, 0.16)
    pt3dadd(-91.48, -65.88, -38.5, 0.16)
    pt3dadd(-91.48, -65.73, -38.5, 0.16)
    pt3dadd(-91.59, -65.56, -38.5, 0.16)
    pt3dadd(-91.75, -65.41, -38.5, 0.16)
    pt3dadd(-91.85, -65.31, -38.5, 0.16)
    pt3dadd(-92.01, -65.25, -38.5, 0.16)
    pt3dadd(-92.11, -65.15, -38.5, 0.16)
    pt3dadd(-92.22, -65.04, -38.5, 0.16)
    pt3dadd(-92.38, -64.98, -38.5, 0.16)
    pt3dadd(-92.48, -64.89, -38.5, 0.16)
    pt3dadd(-92.64, -64.83, -38.5, 0.16)
    pt3dadd(-92.74, -64.73, -38.5, 0.16)
    pt3dadd(-93.48, -64.73, -39, 0.16)
    pt3dadd(-94.21, -64.78, -39, 0.16)
    pt3dadd(-94.37, -64.83, -39, 0.16)
    pt3dadd(-94.53, -64.89, -39, 0.16)
    pt3dadd(-94.74, -64.89, -39, 0.16)
    pt3dadd(-94.89, -64.94, -39, 0.16)
    pt3dadd(-95.21, -64.94, -39, 0.16)
    pt3dadd(-95.37, -64.98, -39, 0.16)
    pt3dadd(-95.58, -64.98, -39, 0.16)
    pt3dadd(-95.79, -65.04, -39, 0.16)
    pt3dadd(-96.1, -65.04, -39, 0.16)
    pt3dadd(-96.26, -65.09, -39, 0.16)
    pt3dadd(-96.42, -65.15, -39, 0.16)
    pt3dadd(-96.68, -65.15, -39, 0.16)
    pt3dadd(-96.84, -65.15, -39, 0.16)
    pt3dadd(-96.94, -65.2, -39, 0.16)
    pt3dadd(-98.04, -65.31, -39, 0.89)
    pt3dadd(-98.2, -65.25, -39, 0.89)
    pt3dadd(-99.15, -65.15, -39, 0.16)
    pt3dadd(-99.36, -65.09, -39, 0.16)
    pt3dadd(-99.72, -65.09, -39, 0.16)
    pt3dadd(-99.83, -65.09, -39, 0.16)
    pt3dadd(-100.04, -65.09, -39, 0.16)
    pt3dadd(-100.14, -65.15, -39, 0.16)
    pt3dadd(-100.25, -65.09, -39, 0.16)
    pt3dadd(-100.56, -65.15, -39.5, 0.16)
    pt3dadd(-100.67, -65.15, -39.5, 0.16)
    pt3dadd(-100.83, -65.04, -39.5, 0.16)
    pt3dadd(-101.04, -64.98, -39.5, 0.16)
    pt3dadd(-101.09, -64.89, -39.5, 0.16)
    pt3dadd(-101.19, -64.78, -39.5, 0.16)
    pt3dadd(-101.19, -64.62, -39.5, 0.16)
    pt3dadd(-101.35, -64.62, -39.5, 0.16)
    pt3dadd(-101.51, -64.52, -39.5, 0.16)
    pt3dadd(-101.51, -64.41, -39.5, 0.16)
    pt3dadd(-102.3, -64.31, -40.5, 0.94)
    pt3dadd(-102.51, -64.25, -40.5, 0.94)
    pt3dadd(-102.61, -64.31, -40.5, 0.94)
    pt3dadd(-102.72, -64.31, -40, 0.94)
  }
  axon[16] {pt3dclear()
    pt3dadd(-19.27, -60.89, -34, 0.58)
    pt3dadd(-18.62, -61.94, -35.5, 0.16)
    pt3dadd(-18.52, -62.1, -36, 0.16)
    pt3dadd(-18.46, -62.2, -36, 0.16)
    pt3dadd(-18.41, -62.36, -36, 0.16)
    pt3dadd(-18.3, -62.47, -36, 0.16)
    pt3dadd(-18.3, -62.68, -36, 0.16)
    pt3dadd(-18.25, -62.83, -36, 0.16)
    pt3dadd(-18.25, -63.2, -36, 0.16)
    pt3dadd(-18.2, -63.41, -36, 0.16)
    pt3dadd(-18.2, -63.62, -36, 0.16)
    pt3dadd(-18.14, -63.73, -36, 0.16)
    pt3dadd(-18.14, -63.94, -36, 0.16)
    pt3dadd(-18.1, -64.09, -35.5, 0.16)
    pt3dadd(-18.04, -64.25, -35.5, 0.16)
    pt3dadd(-17.98, -64.36, -35.5, 0.16)
    pt3dadd(-17.98, -64.52, -35.5, 0.16)
    pt3dadd(-17.89, -64.67, -35.5, 0.16)
    pt3dadd(-17.89, -64.88, -35.5, 0.16)
    pt3dadd(-17.82, -65.09, -35.5, 0.16)
    pt3dadd(-17.78, -65.25, -35.5, 0.16)
    pt3dadd(-17.78, -65.62, -35.5, 0.16)
    pt3dadd(-17.73, -65.73, -35.5, 0.16)
    pt3dadd(-17.73, -65.94, -35, 0.16)
    pt3dadd(-17.68, -66.04, -35, 0.16)
    pt3dadd(-17.68, -66.3, -35, 0.16)
    pt3dadd(-17.73, -66.45, -35, 0.16)
    pt3dadd(-17.73, -66.67, -35, 0.16)
    pt3dadd(-17.78, -66.83, -35, 0.16)
    pt3dadd(-17.73, -67.04, -35, 0.16)
    pt3dadd(-17.68, -67.2, -35, 0.16)
    pt3dadd(-17.68, -67.78, -35, 0.16)
    pt3dadd(-17.62, -67.93, -35, 0.16)
    pt3dadd(-17.62, -68.14, -35.5, 0.16)
    pt3dadd(-17.68, -68.3, -35.5, 0.16)
    pt3dadd(-17.68, -68.45, -35.5, 0.16)
    pt3dadd(-17.73, -68.56, -36, 0.16)
    pt3dadd(-17.73, -68.72, -36, 0.16)
    pt3dadd(-17.78, -68.93, -36, 0.16)
    pt3dadd(-17.82, -69.14, -36, 0.16)
    pt3dadd(-17.82, -69.25, -36, 0.16)
    pt3dadd(-17.89, -69.34, -36, 0.16)
    pt3dadd(-17.89, -69.51, -36, 0.16)
    pt3dadd(-17.89, -69.67, -36, 0.16)
    pt3dadd(-17.82, -69.98, -36, 0.16)
    pt3dadd(-17.82, -70.14, -36, 0.16)
    pt3dadd(-17.78, -70.25, -36, 0.16)
    pt3dadd(-17.68, -70.34, -36, 0.16)
    pt3dadd(-17.62, -70.51, -36, 0.16)
    pt3dadd(-17.57, -70.72, -36, 0.16)
    pt3dadd(-17.52, -70.83, -36, 0.16)
    pt3dadd(-17.47, -70.98, -36, 0.16)
    pt3dadd(-17.41, -71.09, -36, 0.16)
    pt3dadd(-17.26, -71.19, -36, 0.16)
    pt3dadd(-17.26, -71.34, -36, 0.16)
    pt3dadd(-17.2, -71.51, -36, 0.16)
    pt3dadd(-17.05, -71.67, -36, 0.16)
    pt3dadd(-16.94, -71.81, -36, 0.16)
    pt3dadd(-16.89, -71.93, -36, 0.16)
    pt3dadd(-16.78, -71.98, -36, 0.16)
    pt3dadd(-16.73, -72.09, -36, 0.16)
    pt3dadd(-16.63, -72.14, -36, 0.16)
    pt3dadd(-16.36, -72.51, -36, 0.16)
    pt3dadd(-16.26, -72.56, -36, 0.16)
    pt3dadd(-16.21, -72.72, -36, 0.16)
    pt3dadd(-16.14, -72.88, -36, 0.16)
    pt3dadd(-16.1, -72.98, -36, 0.16)
    pt3dadd(-16.05, -73.19, -36, 0.16)
    pt3dadd(-15.79, -74.19, -36, 0.16)
    pt3dadd(-15.53, -74.3, -36, 0.79)
    pt3dadd(-15.53, -74.19, -36, 0.79)
    pt3dadd(-15.85, -75.14, -36, 0.79)
    pt3dadd(-15.64, -76.19, -36, 0.16)
    pt3dadd(-15.69, -76.34, -36, 0.16)
    pt3dadd(-15.69, -76.56, -36, 0.16)
    pt3dadd(-15.64, -76.72, -36, 0.16)
    pt3dadd(-15.64, -77.03, -36.5, 0.16)
    pt3dadd(-15.53, -77.08, -36.5, 0.16)
    pt3dadd(-15.58, -77.23, -36.5, 0.16)
    pt3dadd(-15.53, -77.03, -36.5, 0.16)
    pt3dadd(-15.58, -77.19, -36.5, 0.16)
    pt3dadd(-15.37, -77.98, -37.5, 0.58)
    pt3dadd(-15.27, -78.03, -37.5, 0.58)
  }
}
proc shape3d_79() {
  axon[16] {
    pt3dadd(-15.27, -78.14, -37.5, 0.58)
    pt3dadd(-15.22, -78.23, -37.5, 0.58)
    pt3dadd(-14.53, -79.29, -37.5, 0.16)
    pt3dadd(-14.43, -79.4, -37.5, 0.16)
    pt3dadd(-14.32, -79.5, -37.5, 0.16)
    pt3dadd(-14.27, -79.7, -37.5, 0.16)
    pt3dadd(-14.17, -79.81, -37.5, 0.16)
    pt3dadd(-14.06, -79.92, -37.5, 0.16)
    pt3dadd(-13.9, -80.19, -37.5, 0.16)
    pt3dadd(-13.85, -80.29, -37.5, 0.16)
    pt3dadd(-13.8, -80.5, -37.5, 0.16)
    pt3dadd(-13.75, -80.61, -37.5, 0.16)
    pt3dadd(-13.59, -80.76, -37.5, 0.16)
    pt3dadd(-13.43, -80.87, -37.5, 0.16)
    pt3dadd(-13.38, -80.98, -37.5, 0.16)
    pt3dadd(-13.33, -81.29, -37.5, 0.16)
    pt3dadd(-13.33, -81.5, -37.5, 0.16)
    pt3dadd(-13.27, -81.61, -37.5, 0.16)
    pt3dadd(-13.12, -82.24, -37.5, 0.63)
    pt3dadd(-13.06, -82.45, -37.5, 0.63)
  }
  axon[17] {pt3dclear()
    pt3dadd(-13.06, -82.45, -37.5, 0.63)
    pt3dadd(-13.06, -82.6, -37.5, 0.63)
    pt3dadd(-12.96, -82.71, -37.5, 0.63)
    pt3dadd(-12.22, -84.55, -37.5, 0.16)
    pt3dadd(-11.8, -85.6, -38, 0.84)
    pt3dadd(-11.49, -86.76, -37.5, 0.16)
    pt3dadd(-11.49, -87.81, -37.5, 0.16)
    pt3dadd(-11.54, -88.02, -37.5, 0.16)
    pt3dadd(-11.65, -88.23, -37.5, 0.16)
    pt3dadd(-11.65, -88.5, -37.5, 0.16)
    pt3dadd(-11.59, -88.65, -37.5, 0.16)
    pt3dadd(-11.59, -88.81, -37.5, 0.16)
    pt3dadd(-11.49, -88.92, -37.5, 0.16)
    pt3dadd(-11.28, -88.92, -37.5, 0.16)
    pt3dadd(-11.17, -89.02, -37.5, 0.16)
    pt3dadd(-11.02, -89.13, -37.5, 0.16)
    pt3dadd(-10.81, -89.13, -37, 0.16)
    pt3dadd(-10.75, -89.23, -37, 0.16)
    pt3dadd(-10.75, -89.39, -37, 0.16)
    pt3dadd(-10.7, -89.6, -37, 0.16)
    pt3dadd(-10.7, -89.97, -37, 0.16)
    pt3dadd(-10.65, -90.18, -37, 0.16)
    pt3dadd(-10.7, -90.28, -37, 0.16)
    pt3dadd(-10.7, -90.49, -37.5, 0.16)
    pt3dadd(-10.75, -90.65, -37.5, 0.16)
    pt3dadd(-10.91, -91.96, -37.5, 0.79)
    pt3dadd(-10.81, -93.07, -37.5, 0.16)
    pt3dadd(-10.75, -93.17, -37.5, 0.16)
    pt3dadd(-10.65, -93.38, -37.5, 0.16)
    pt3dadd(-10.54, -93.49, -37.5, 0.16)
    pt3dadd(-10.54, -93.7, -37.5, 0.16)
    pt3dadd(-10.49, -93.8, -37.5, 0.16)
    pt3dadd(-10.18, -94.17, -37.5, 0.58)
    pt3dadd(-10.02, -94.28, -37.5, 0.58)
    pt3dadd(-9.97, -94.38, -37.5, 0.58)
    pt3dadd(-9.86, -94.49, -37.5, 0.58)
    pt3dadd(-9.76, -94.54, -37.5, 0.58)
    pt3dadd(-9.69, -94.65, -37.5, 0.58)
    pt3dadd(-9.65, -94.7, -38, 0.58)
    pt3dadd(-9.55, -94.75, -38, 0.58)
    pt3dadd(-8.81, -95.85, -38.5, 0.16)
    pt3dadd(-8.72, -96.29, -39.5, 0.16)
    pt3dadd(-8.36, -97.61, -40, 0.89)
    pt3dadd(-8.36, -97.61, -39.5, 0.89)
    pt3dadd(-8.51, -98.87, -39.5, 0.16)
    pt3dadd(-8.51, -99.24, -39.5, 0.16)
    pt3dadd(-8.57, -99.45, -39.5, 0.16)
    pt3dadd(-8.57, -101.13, -40, 0.16)
    pt3dadd(-8.51, -101.39, -40, 0.16)
    pt3dadd(-8.46, -101.76, -40, 0.16)
    pt3dadd(-8.36, -101.92, -40, 0.16)
    pt3dadd(-8.36, -102.24, -40, 0.16)
    pt3dadd(-8.3, -102.34, -40, 0.16)
    pt3dadd(-8.25, -102.5, -40, 0.16)
    pt3dadd(-8.15, -102.6, -40, 0.16)
    pt3dadd(-8.15, -102.81, -40, 0.16)
    pt3dadd(-8.09, -103.02, -40, 0.16)
    pt3dadd(-7.99, -103.18, -40, 0.16)
    pt3dadd(-7.94, -103.34, -40, 0.16)
    pt3dadd(-7.83, -103.6, -40, 0.16)
    pt3dadd(-7.73, -103.81, -40, 0.16)
    pt3dadd(-7.62, -103.92, -40, 0.16)
    pt3dadd(-7.57, -104.08, -40, 0.16)
    pt3dadd(-7.52, -104.18, -40, 0.16)
    pt3dadd(-7.46, -104.29, -40, 0.16)
    pt3dadd(-7.36, -104.39, -40, 0.16)
    pt3dadd(-7.2, -104.44, -40, 0.16)
    pt3dadd(-7.1, -104.55, -40, 0.16)
    pt3dadd(-6.99, -104.65, -40, 0.16)
    pt3dadd(-6.89, -104.65, -40, 0.16)
    pt3dadd(-6.73, -104.71, -40, 0.16)
    pt3dadd(-6.62, -104.76, -40, 0.16)
    pt3dadd(-6.52, -104.86, -40, 0.16)
    pt3dadd(-6.26, -104.97, -40, 0.16)
    pt3dadd(-6.15, -105.02, -40, 0.16)
    pt3dadd(-5.99, -105.07, -40, 0.16)
    pt3dadd(-5.89, -105.13, -40, 0.16)
    pt3dadd(-5.78, -105.23, -40, 0.16)
    pt3dadd(-5.63, -105.28, -40, 0.16)
    pt3dadd(-5.47, -105.34, -40, 0.16)
    pt3dadd(-5.26, -105.44, -40, 0.16)
    pt3dadd(-5.09, -105.6, -40, 0.16)
    pt3dadd(-4.94, -105.6, -40, 0.16)
    pt3dadd(-4.84, -105.65, -40, 0.16)
    pt3dadd(-4.84, -105.81, -40, 0.16)
    pt3dadd(-4.68, -105.76, -40, 0.16)
    pt3dadd(-3.47, -107.44, -40, 1.36)
    pt3dadd(-2.36, -107.48, -40, 0.16)
    pt3dadd(-2.25, -107.48, -40, 0.16)
    pt3dadd(-2.1, -107.58, -40, 0.16)
    pt3dadd(-2, -107.64, -40, 0.16)
    pt3dadd(-1.89, -107.69, -40, 0.16)
    pt3dadd(-1.73, -107.74, -40, 0.16)
    pt3dadd(-1.52, -107.79, -40, 0.16)
    pt3dadd(-1.42, -107.85, -40, 0.16)
    pt3dadd(-1.31, -107.95, -40, 0.16)
    pt3dadd(-1.15, -108.11, -40, 0.16)
    pt3dadd(-1, -108.22, -40, 0.16)
    pt3dadd(-0.79, -108.22, -40, 0.16)
    pt3dadd(-0.68, -108.27, -40, 0.16)
    pt3dadd(-0.57, -108.32, -40, 0.16)
    pt3dadd(-0.47, -108.43, -40, 0.16)
    pt3dadd(-0.32, -108.43, -40, 0.16)
    pt3dadd(-0.21, -108.53, -40, 0.16)
    pt3dadd(-0.11, -108.64, -40, 0.16)
    pt3dadd(0, -108.69, -40, 0.16)
    pt3dadd(0.1, -108.74, -40.5, 0.16)
    pt3dadd(0.21, -108.85, -40.5, 0.16)
    pt3dadd(0.63, -108.85, -40, 0.16)
    pt3dadd(0.68, -108.95, -40, 0.16)
    pt3dadd(0.84, -109, -40, 0.16)
    pt3dadd(1.05, -109.06, -40, 0.16)
    pt3dadd(1.14, -109.11, -40, 0.16)
    pt3dadd(1.26, -109.21, -40, 0.16)
    pt3dadd(1.42, -109.27, -40, 0.16)
    pt3dadd(1.52, -109.32, -40, 0.16)
    pt3dadd(1.63, -109.37, -40, 0.16)
    pt3dadd(1.68, -109.48, -40, 0.16)
    pt3dadd(1.78, -109.58, -40, 0.16)
    pt3dadd(1.89, -109.63, -40, 0.16)
    pt3dadd(1.99, -109.69, -40, 0.16)
    pt3dadd(2.04, -109.79, -40, 0.16)
    pt3dadd(2.15, -109.85, -40, 0.16)
    pt3dadd(2.36, -110.74, -40, 0.89)
    pt3dadd(3.46, -111.63, -40, 0.16)
    pt3dadd(4.57, -112.05, -40, 0.63)
    pt3dadd(4.83, -113.1, -40, 0.16)
    pt3dadd(4.93, -113.31, -40, 0.16)
    pt3dadd(5.04, -113.37, -40, 0.16)
    pt3dadd(5.09, -113.52, -40, 0.16)
    pt3dadd(5.2, -113.68, -40, 0.16)
    pt3dadd(5.3, -113.79, -40, 0.16)
    pt3dadd(5.41, -113.89, -40, 0.16)
    pt3dadd(5.51, -114, -40, 0.16)
    pt3dadd(5.62, -114.1, -40, 0.16)
    pt3dadd(5.77, -114.26, -40, 0.16)
    pt3dadd(5.88, -114.37, -40.5, 0.16)
    pt3dadd(5.98, -114.42, -40.5, 0.16)
    pt3dadd(6.14, -114.58, -40.5, 0.16)
    pt3dadd(6.35, -114.68, -40.5, 0.16)
    pt3dadd(6.46, -114.68, -40.5, 0.16)
    pt3dadd(6.61, -114.73, -40.5, 0.16)
    pt3dadd(6.82, -114.84, -40.5, 0.16)
    pt3dadd(6.93, -114.89, -40.5, 0.16)
    pt3dadd(7.09, -114.89, -40.5, 0.16)
    pt3dadd(7.24, -115, -40.5, 0.16)
    pt3dadd(7.45, -115, -40.5, 0.16)
    pt3dadd(7.56, -115.1, -40.5, 0.16)
    pt3dadd(7.56, -115.31, -40.5, 0.16)
    pt3dadd(7.61, -115.42, -40.5, 0.16)
    pt3dadd(7.72, -115.58, -40.5, 0.16)
    pt3dadd(7.82, -115.73, -40.5, 0.16)
    pt3dadd(7.93, -115.79, -40.5, 0.16)
    pt3dadd(8.28, -116.47, -40.5, 0.63)
    pt3dadd(8.35, -116.63, -40.5, 0.63)
    pt3dadd(8.4, -116.73, -40.5, 0.63)
    pt3dadd(8.5, -116.84, -40.5, 0.63)
    pt3dadd(8.61, -116.89, -40.5, 0.63)
    pt3dadd(8.66, -116.99, -40.5, 0.63)
    pt3dadd(9.19, -117.57, -40.5, 0.16)
    pt3dadd(9.28, -117.68, -40.5, 0.16)
    pt3dadd(9.4, -117.78, -40.5, 0.16)
    pt3dadd(9.55, -117.94, -40.5, 0.16)
    pt3dadd(9.66, -117.99, -40.5, 0.16)
    pt3dadd(9.76, -118.1, -40.5, 0.16)
    pt3dadd(9.86, -118.2, -40.5, 0.16)
    pt3dadd(10.02, -118.26, -40.5, 0.16)
    pt3dadd(10.08, -118.41, -40.5, 0.16)
    pt3dadd(10.08, -118.62, -40.5, 0.16)
    pt3dadd(10.13, -118.78, -40.5, 0.16)
    pt3dadd(10.18, -118.99, -40.5, 0.16)
    pt3dadd(10.93, -119.26, -40.5, 0.16)
    pt3dadd(11.04, -119.32, -41, 0.16)
    pt3dadd(11.14, -119.37, -41, 0.16)
    pt3dadd(11.4, -119.32, -41, 0.16)
    pt3dadd(11.61, -119.32, -41, 0.16)
    pt3dadd(11.72, -119.21, -41, 0.16)
    pt3dadd(11.88, -119.16, -41, 0.16)
    pt3dadd(12.09, -119.16, -41, 0.16)
    pt3dadd(12.14, -119.05, -41, 0.16)
    pt3dadd(12.35, -119.11, -41, 0.16)
    pt3dadd(12.51, -119.11, -41, 0.16)
    pt3dadd(12.72, -119.05, -41, 0.16)
    pt3dadd(12.82, -118.95, -41, 0.16)
    pt3dadd(12.98, -118.89, -41, 0.16)
    pt3dadd(13.08, -118.79, -41, 0.16)
    pt3dadd(13.24, -118.63, -41, 0.16)
    pt3dadd(13.45, -118.63, -41, 0.16)
    pt3dadd(13.56, -118.63, -41, 0.16)
    pt3dadd(13.66, -118.58, -41, 0.16)
    pt3dadd(13.82, -118.58, -40.5, 0.16)
    pt3dadd(13.98, -118.53, -40.5, 0.16)
    pt3dadd(14.08, -118.42, -40.5, 0.16)
    pt3dadd(14.19, -118.47, -40.5, 0.16)
    pt3dadd(14.4, -118.47, -40.5, 0.16)
    pt3dadd(14.5, -118.42, -40.5, 0.16)
    pt3dadd(14.66, -118.42, -40.5, 0.16)
    pt3dadd(14.71, -118.21, -40.5, 0.16)
    pt3dadd(14.76, -118.11, -40.5, 0.16)
    pt3dadd(14.92, -117.95, -40.5, 0.16)
    pt3dadd(15.39, -117.9, -40.5, 0.89)
    pt3dadd(15.45, -117.74, -40.5, 0.89)
    pt3dadd(15.76, -117, -40.5, 0.16)
    pt3dadd(15.92, -116.79, -40.5, 0.16)
    pt3dadd(15.97, -116.69, -40.5, 0.16)
    pt3dadd(16.07, -116.58, -40.5, 0.16)
    pt3dadd(16.23, -116.42, -40.5, 0.16)
    pt3dadd(16.34, -116.21, -40.5, 0.16)
    pt3dadd(16.5, -116.16, -40.5, 0.16)
    pt3dadd(16.5, -115.95, -40.5, 0.16)
    pt3dadd(16.64, -115.95, -40.5, 0.16)
    pt3dadd(16.76, -115.79, -40.5, 0.16)
    pt3dadd(16.8, -115.69, -40.5, 0.16)
    pt3dadd(16.97, -115.64, -40.5, 0.16)
    pt3dadd(17.02, -115.48, -40.5, 0.16)
    pt3dadd(17.18, -115.43, -40.5, 0.16)
    pt3dadd(17.28, -115.37, -40.5, 0.16)
    pt3dadd(17.44, -115.32, -40.5, 0.16)
    pt3dadd(17.55, -115.22, -40.5, 0.16)
    pt3dadd(17.64, -115.16, -40.5, 0.16)
    pt3dadd(17.8, -115.06, -40.5, 0.16)
    pt3dadd(17.97, -114.95, -40.5, 0.16)
    pt3dadd(18.07, -114.9, -40.5, 0.16)
    pt3dadd(18.18, -114.85, -40.5, 0.16)
    pt3dadd(18.32, -114.79, -40.5, 0.16)
    pt3dadd(18.48, -114.74, -40.5, 0.16)
    pt3dadd(18.64, -114.69, -40.5, 0.16)
    pt3dadd(18.75, -114.58, -40.5, 0.16)
    pt3dadd(18.91, -114.53, -40.5, 0.16)
  }
}
proc shape3d_80() {
  axon[17] {
    pt3dadd(19.07, -114.43, -40.5, 0.16)
    pt3dadd(19.23, -114.37, -40.5, 0.16)
    pt3dadd(19.44, -114.16, -40.5, 0.16)
    pt3dadd(19.59, -114.11, -40.5, 0.16)
    pt3dadd(19.7, -114.01, -40.5, 0.16)
    pt3dadd(19.86, -113.95, -40.5, 0.16)
    pt3dadd(20.07, -113.9, -40.5, 0.16)
    pt3dadd(20.17, -113.85, -40.5, 0.16)
    pt3dadd(20.32, -113.8, -40.5, 0.16)
    pt3dadd(20.59, -113.64, -40.5, 0.16)
    pt3dadd(20.8, -113.53, -40.5, 0.16)
    pt3dadd(21.01, -113.43, -40.5, 0.16)
    pt3dadd(21.12, -113.38, -40.5, 0.16)
    pt3dadd(21.27, -113.32, -40.5, 0.16)
    pt3dadd(21.48, -113.22, -40.5, 0.16)
    pt3dadd(21.69, -113.01, -40.5, 0.16)
    pt3dadd(21.96, -112.74, -40.5, 0.16)
    pt3dadd(22.06, -112.69, -40.5, 0.16)
    pt3dadd(22.22, -112.59, -40.5, 0.16)
    pt3dadd(22.43, -112.43, -40.5, 0.16)
    pt3dadd(22.69, -112.32, -40.5, 0.16)
    pt3dadd(23.06, -112.06, -40.5, 0.16)
    pt3dadd(23.37, -111.85, -40.5, 0.16)
    pt3dadd(23.64, -111.69, -40.5, 0.16)
    pt3dadd(23.85, -111.59, -40.5, 0.16)
    pt3dadd(24.06, -111.38, -40.5, 0.16)
    pt3dadd(24.16, -111.22, -40.5, 0.16)
    pt3dadd(24.37, -111.01, -40.5, 0.16)
    pt3dadd(24.48, -110.85, -40.5, 0.16)
    pt3dadd(24.69, -110.75, -40.5, 0.16)
    pt3dadd(24.74, -110.59, -40.5, 0.16)
    pt3dadd(24.84, -110.38, -40.5, 0.16)
    pt3dadd(26.05, -110.38, -40, 0.84)
    pt3dadd(26.52, -110.01, -41, 0.16)
    pt3dadd(26.63, -109.96, -41, 0.16)
    pt3dadd(26.73, -109.96, -41, 0.16)
    pt3dadd(26.84, -109.85, -41, 0.16)
    pt3dadd(26.99, -109.8, -41, 0.16)
    pt3dadd(27.1, -109.8, -41, 0.16)
    pt3dadd(27.2, -109.75, -40, 0.16)
    pt3dadd(27.47, -109.64, -40, 0.16)
    pt3dadd(27.52, -109.53, -39.5, 0.16)
    pt3dadd(27.62, -109.48, -39.5, 0.16)
    pt3dadd(27.73, -109.38, -39.5, 0.16)
    pt3dadd(27.83, -109.27, -39.5, 0.16)
    pt3dadd(27.89, -109.22, -39, 0.16)
    pt3dadd(27.99, -109.17, -39, 0.16)
    pt3dadd(28.1, -109.06, -39, 0.16)
    pt3dadd(28.36, -109.06, -39, 0.16)
    pt3dadd(28.62, -109.01, -39, 0.16)
    pt3dadd(28.83, -108.96, -39, 0.16)
    pt3dadd(28.99, -108.9, -39, 0.16)
    pt3dadd(29.09, -108.8, -39, 0.16)
    pt3dadd(29.25, -108.8, -39, 0.16)
  }
  axon[18] {pt3dclear()
    pt3dadd(29.25, -108.8, -39, 0.16)
    pt3dadd(28.88, -108.48, -37.5, 0.16)
    pt3dadd(28.88, -108.38, -36.5, 0.16)
    pt3dadd(28.94, -108.22, -36.5, 0.16)
    pt3dadd(28.83, -108.12, -36.5, 0.16)
    pt3dadd(28.41, -108.06, -36.5, 0.63)
    pt3dadd(27.89, -107.8, -36.5, 0.1)
    pt3dadd(27.26, -107.59, -36.5, 0.52)
    pt3dadd(27.2, -107.59, -36, 0.52)
    pt3dadd(27.83, -107.38, -36, 0.1)
    pt3dadd(27.99, -107.38, -36, 0.1)
    pt3dadd(28.2, -107.43, -36, 0.1)
    pt3dadd(28.57, -107.43, -35, 0.1)
    pt3dadd(28.57, -107.27, -34, 0.1)
    pt3dadd(28.78, -106.85, -34, 0.63)
    pt3dadd(28.78, -106.85, -33.5, 0.63)
    pt3dadd(28.94, -106.28, -33.5, 0.16)
    pt3dadd(28.73, -106.07, -32, 0.16)
    pt3dadd(28.62, -106.07, -31.5, 0.16)
    pt3dadd(28.67, -105.91, -31.5, 0.16)
    pt3dadd(28.83, -105.91, -31.5, 0.16)
    pt3dadd(28.94, -105.96, -31, 0.16)
    pt3dadd(29.15, -105.96, -31, 0.16)
    pt3dadd(29.2, -105.8, -31, 0.16)
    pt3dadd(29.25, -105.75, -30.5, 0.63)
    pt3dadd(29.36, -105.64, -30.5, 0.63)
    pt3dadd(29.41, -105.54, -30.5, 0.63)
    pt3dadd(29.51, -105.43, -30.5, 0.63)
    pt3dadd(29.57, -105.33, -30.5, 0.63)
    pt3dadd(29.57, -105.28, -30, 0.63)
    pt3dadd(29.67, -104.8, -29.5, 0.16)
    pt3dadd(29.67, -104.8, -27.5, 0.16)
  }
  axon[19] {pt3dclear()
    pt3dadd(29.25, -108.8, -39, 0.16)
    pt3dadd(29.41, -108.8, -39.5, 0.16)
    pt3dadd(29.78, -108.8, -39.5, 0.16)
    pt3dadd(29.88, -108.85, -39.5, 0.16)
    pt3dadd(30.2, -108.85, -39, 0.16)
    pt3dadd(30.3, -108.9, -39, 0.16)
    pt3dadd(30.98, -108.75, -39, 0.89)
    pt3dadd(31.82, -109.22, -39, 0.16)
    pt3dadd(31.98, -109.27, -39, 0.16)
    pt3dadd(32.19, -109.32, -39, 0.16)
    pt3dadd(32.82, -109.32, -38.5, 0.16)
    pt3dadd(32.86, -109.38, -38, 0.16)
    pt3dadd(32.97, -109.32, -38, 0.16)
    pt3dadd(33.19, -109.32, -38, 0.16)
    pt3dadd(33.65, -109.27, -38, 0.63)
    pt3dadd(34.19, -109.27, -38, 0.63)
    pt3dadd(35.29, -109.01, -38, 0.16)
    pt3dadd(35.39, -108.96, -38, 0.16)
    pt3dadd(36.71, -108.43, -38, 0.89)
    pt3dadd(36.81, -108.38, -38, 0.89)
    pt3dadd(37.6, -108.96, -38, 0.16)
    pt3dadd(37.6, -109.06, -38, 0.16)
    pt3dadd(37.7, -109.11, -38, 0.16)
    pt3dadd(37.81, -109.22, -38, 0.16)
    pt3dadd(37.97, -109.27, -38, 0.16)
    pt3dadd(38.22, -109.38, -38, 0.16)
    pt3dadd(38.85, -109.19, -37.5, 0.16)
    pt3dadd(39.01, -109.19, -37.5, 0.16)
    pt3dadd(39.22, -109.14, -37.5, 0.16)
    pt3dadd(39.38, -109.04, -37.5, 0.16)
    pt3dadd(39.47, -108.98, -37.5, 0.16)
    pt3dadd(39.59, -108.93, -37.5, 0.16)
    pt3dadd(39.75, -108.88, -37.5, 0.16)
    pt3dadd(40.06, -108.88, -37.5, 0.16)
    pt3dadd(40.27, -108.93, -37.5, 0.16)
    pt3dadd(40.38, -108.88, -37.5, 0.16)
    pt3dadd(40.47, -108.83, -37.5, 0.16)
    pt3dadd(40.95, -108.83, -37.5, 0.16)
    pt3dadd(41.06, -108.77, -37.5, 0.16)
    pt3dadd(41.69, -108.3, -37.5, 0.58)
    pt3dadd(41.79, -108.25, -37.5, 0.58)
    pt3dadd(42.16, -108.25, -37.5, 0.58)
    pt3dadd(43.21, -108.51, -37.5, 0.1)
    pt3dadd(43.37, -108.46, -37.5, 0.1)
    pt3dadd(43.58, -108.46, -37.5, 0.1)
    pt3dadd(43.68, -108.41, -37.5, 0.1)
    pt3dadd(43.79, -108.35, -37.5, 0.1)
    pt3dadd(43.89, -108.35, -37.5, 0.1)
    pt3dadd(44.1, -108.3, -37.5, 0.1)
    pt3dadd(44.26, -108.35, -37, 0.1)
    pt3dadd(44.37, -108.35, -37, 0.1)
    pt3dadd(44.47, -108.41, -37, 0.1)
    pt3dadd(44.63, -108.35, -37, 0.1)
    pt3dadd(44.79, -108.35, -37, 0.1)
    pt3dadd(45.78, -108.25, -38, 0.84)
    pt3dadd(45.89, -108.2, -38, 0.84)
    pt3dadd(46.78, -108.2, -38, 0.16)
    pt3dadd(46.83, -108.46, -38, 0.16)
    pt3dadd(47.2, -108.46, -38, 0.16)
    pt3dadd(47.41, -108.41, -38, 0.16)
    pt3dadd(47.57, -108.3, -38, 0.16)
    pt3dadd(48.2, -108.3, -38, 0.16)
    pt3dadd(48.35, -108.25, -38, 0.16)
    pt3dadd(48.62, -108.25, -38, 0.16)
    pt3dadd(48.83, -108.2, -38, 0.16)
    pt3dadd(49.04, -108.25, -38, 0.16)
    pt3dadd(49.3, -108.25, -38.5, 0.16)
    pt3dadd(49.46, -108.3, -38.5, 0.16)
    pt3dadd(49.67, -108.3, -38.5, 0.16)
    pt3dadd(49.82, -108.35, -38.5, 0.16)
    pt3dadd(50.14, -108.35, -38.5, 0.16)
    pt3dadd(50.3, -108.3, -38.5, 0.16)
    pt3dadd(50.4, -108.3, -38.5, 0.16)
    pt3dadd(50.51, -108.2, -38.5, 0.16)
    pt3dadd(50.66, -108.14, -38, 0.16)
    pt3dadd(50.87, -108.09, -38, 0.16)
    pt3dadd(51.03, -108.04, -37.5, 0.16)
    pt3dadd(51.24, -107.99, -37.5, 0.16)
    pt3dadd(51.5, -107.93, -37.5, 0.16)
    pt3dadd(51.98, -107.93, -37.5, 0.16)
    pt3dadd(52.03, -107.72, -37.5, 0.16)
    pt3dadd(52.13, -107.67, -37.5, 0.16)
    pt3dadd(52.24, -107.67, -37.5, 0.16)
    pt3dadd(52.4, -107.57, -37.5, 0.16)
    pt3dadd(52.61, -107.57, -37.5, 0.16)
    pt3dadd(53.92, -107.3, -38, 1.05)
    pt3dadd(55.18, -107.41, -38, 0.21)
    pt3dadd(55.28, -107.41, -38, 0.21)
    pt3dadd(55.39, -107.35, -38, 0.21)
    pt3dadd(55.7, -107.35, -37.5, 0.21)
    pt3dadd(56.18, -107.35, -37.5, 0.68)
    pt3dadd(56.33, -107.3, -37.5, 0.68)
    pt3dadd(57.17, -107.25, -37.5, 0.16)
    pt3dadd(57.28, -107.35, -37.5, 0.16)
    pt3dadd(57.38, -107.41, -37.5, 0.16)
    pt3dadd(57.86, -107.41, -37.5, 0.16)
    pt3dadd(57.96, -107.46, -37.5, 0.16)
    pt3dadd(58.38, -107.46, -37.5, 0.16)
    pt3dadd(58.49, -107.41, -37.5, 0.16)
    pt3dadd(58.54, -107.3, -37.5, 0.16)
    pt3dadd(58.7, -107.3, -37.5, 0.16)
    pt3dadd(59.12, -106.93, -37.5, 0.63)
    pt3dadd(59.22, -106.93, -37.5, 0.63)
    pt3dadd(60.01, -107.09, -37.5, 0.16)
    pt3dadd(60.32, -107.09, -37.5, 0.16)
    pt3dadd(60.48, -107.14, -37.5, 0.16)
    pt3dadd(60.8, -107.2, -37.5, 0.16)
    pt3dadd(61.16, -107.25, -37.5, 0.16)
    pt3dadd(61.48, -107.35, -37.5, 0.16)
    pt3dadd(62.84, -107.18, -37.5, 0.89)
    pt3dadd(64, -106.65, -37.5, 0.16)
    pt3dadd(64.2, -106.5, -37.5, 0.16)
    pt3dadd(64.31, -106.44, -37.5, 0.16)
    pt3dadd(64.42, -106.39, -37.5, 0.16)
    pt3dadd(64.58, -106.34, -37.5, 0.16)
    pt3dadd(64.73, -106.34, -37.5, 0.16)
    pt3dadd(64.89, -106.39, -37.5, 0.16)
    pt3dadd(65, -106.5, -37.5, 0.16)
    pt3dadd(65.15, -106.6, -37.5, 0.16)
    pt3dadd(65.26, -106.71, -37.5, 0.16)
    pt3dadd(65.56, -106.71, -37, 0.16)
    pt3dadd(65.68, -106.76, -37, 0.16)
    pt3dadd(65.78, -106.71, -37, 0.16)
    pt3dadd(65.89, -106.65, -37, 0.16)
    pt3dadd(66.36, -106.44, -37, 0.79)
    pt3dadd(67.72, -105.97, -37, 0.16)
    pt3dadd(68.56, -106.08, -37, 0.79)
    pt3dadd(69.61, -106.18, -36.5, 0.16)
    pt3dadd(69.72, -106.13, -36.5, 0.16)
    pt3dadd(69.88, -106.08, -36.5, 0.16)
    pt3dadd(70.51, -106.08, -36.5, 0.16)
    pt3dadd(70.66, -106.18, -36.5, 0.16)
    pt3dadd(70.77, -106.29, -36.5, 0.16)
    pt3dadd(70.93, -106.34, -36.5, 0.16)
    pt3dadd(71.14, -106.39, -36.5, 0.16)
    pt3dadd(71.19, -106.5, -36.5, 0.16)
    pt3dadd(72.03, -106.6, -36.5, 0.94)
    pt3dadd(72.13, -106.65, -36.5, 0.94)
    pt3dadd(73.45, -107.02, -36.5, 0.16)
    pt3dadd(74.65, -106.87, -36, 0.63)
    pt3dadd(75.48, -106.44, -36, 0.16)
    pt3dadd(75.65, -106.55, -36, 0.16)
    pt3dadd(76.12, -106.55, -36, 0.16)
    pt3dadd(76.18, -106.71, -36, 0.16)
    pt3dadd(76.65, -106.71, -36, 0.16)
    pt3dadd(76.75, -106.65, -36, 0.16)
    pt3dadd(76.91, -106.6, -36, 0.16)
    pt3dadd(77.02, -106.5, -36, 0.16)
    pt3dadd(77.12, -106.29, -36, 0.16)
    pt3dadd(77.23, -106.13, -36, 0.16)
    pt3dadd(77.28, -105.92, -36, 0.16)
    pt3dadd(77.44, -105.87, -36, 0.16)
    pt3dadd(77.65, -105.71, -36, 0.16)
    pt3dadd(77.91, -105.71, -36, 0.16)
    pt3dadd(78.06, -105.6, -36, 0.16)
    pt3dadd(78.28, -105.55, -36, 0.16)
    pt3dadd(78.48, -105.45, -36, 0.16)
    pt3dadd(78.64, -105.39, -36, 0.16)
    pt3dadd(78.95, -105.39, -36.5, 0.16)
    pt3dadd(79.12, -105.34, -36.5, 0.16)
    pt3dadd(79.27, -105.29, -37, 0.16)
    pt3dadd(80.22, -104.92, -37, 0.63)
    pt3dadd(80.27, -105.03, -37, 0.63)
  }
}
proc shape3d_81() {
  axon[19] {
    pt3dadd(82.27, -105.92, -37, 0.1)
    pt3dadd(83.42, -105.87, -37, 0.73)
    pt3dadd(83.53, -105.87, -37, 0.73)
    pt3dadd(84.52, -105.53, -36, 0.16)
    pt3dadd(84.63, -105.43, -36, 0.16)
    pt3dadd(84.79, -105.32, -36, 0.16)
    pt3dadd(84.89, -105.27, -36, 0.16)
    pt3dadd(85.05, -105.17, -36, 0.16)
    pt3dadd(85.1, -105.06, -36, 0.16)
    pt3dadd(85.47, -105.06, -36, 0.16)
    pt3dadd(85.63, -105.11, -36, 0.16)
    pt3dadd(85.89, -105.11, -36, 0.16)
    pt3dadd(86.1, -105.11, -36, 0.16)
    pt3dadd(86.31, -105.11, -36, 0.16)
    pt3dadd(86.57, -105.06, -36, 0.16)
    pt3dadd(86.78, -104.95, -36, 0.16)
    pt3dadd(86.89, -104.9, -36, 0.16)
    pt3dadd(87.1, -104.85, -36, 0.16)
    pt3dadd(87.78, -104.85, -36, 0.16)
    pt3dadd(87.99, -104.8, -36, 0.16)
    pt3dadd(88.25, -104.8, -36, 0.16)
    pt3dadd(88.36, -104.74, -36, 0.16)
    pt3dadd(88.78, -104.74, -36, 0.16)
    pt3dadd(88.99, -104.85, -36, 0.16)
    pt3dadd(89.98, -104.85, -36, 0.16)
    pt3dadd(90.09, -104.8, -36, 0.16)
    pt3dadd(90.19, -104.85, -36, 0.16)
    pt3dadd(90.4, -104.85, -36, 0.16)
    pt3dadd(90.61, -104.9, -36, 0.16)
    pt3dadd(90.72, -104.95, -36, 0.16)
    pt3dadd(90.93, -105.01, -36, 0.16)
    pt3dadd(91.19, -105.01, -36, 0.16)
    pt3dadd(91.29, -104.9, -36, 0.16)
    pt3dadd(91.4, -104.95, -36, 0.16)
    pt3dadd(91.61, -104.95, -36, 0.16)
    pt3dadd(91.71, -105.01, -36, 0.16)
    pt3dadd(91.82, -105.01, -36, 0.16)
    pt3dadd(92.4, -104.74, -36, 0.79)
    pt3dadd(93.24, -104.59, -36, 0.21)
    pt3dadd(94.13, -104.69, -35.5, 0.63)
    pt3dadd(95.34, -104.85, -35.5, 0.16)
    pt3dadd(95.44, -104.74, -35.5, 0.16)
    pt3dadd(95.81, -104.74, -35.5, 0.16)
    pt3dadd(96.02, -104.69, -35.5, 0.16)
    pt3dadd(96.65, -104.69, -35.5, 0.16)
    pt3dadd(96.81, -104.64, -35.5, 0.16)
    pt3dadd(97.02, -104.59, -35.5, 0.16)
    pt3dadd(97.44, -104.59, -35.5, 0.16)
    pt3dadd(97.54, -104.64, -35.5, 0.16)
    pt3dadd(97.75, -104.64, -35.5, 0.16)
    pt3dadd(97.91, -104.64, -35.5, 0.16)
    pt3dadd(98.12, -104.48, -35.5, 0.16)
    pt3dadd(98.54, -104.06, -35.5, 0.16)
    pt3dadd(98.64, -104.01, -35.5, 0.16)
    pt3dadd(98.8, -103.9, -35.5, 0.16)
    pt3dadd(98.91, -103.85, -35.5, 0.16)
    pt3dadd(99.06, -103.75, -35.5, 0.16)
    pt3dadd(99.27, -103.59, -35.5, 0.16)
    pt3dadd(99.38, -103.54, -35.5, 0.16)
    pt3dadd(99.48, -103.43, -35.5, 0.16)
    pt3dadd(99.64, -103.27, -35.5, 0.16)
    pt3dadd(99.75, -103.17, -35.5, 0.16)
    pt3dadd(99.96, -103.17, -35.5, 0.16)
    pt3dadd(100.06, -103.12, -35.5, 0.16)
    pt3dadd(100.17, -103.01, -35.5, 0.16)
    pt3dadd(100.32, -102.96, -35.5, 0.16)
    pt3dadd(100.43, -102.9, -35.5, 0.16)
    pt3dadd(100.59, -102.75, -35.5, 0.16)
    pt3dadd(100.69, -102.69, -35.5, 0.16)
    pt3dadd(100.85, -102.64, -35.5, 0.16)
    pt3dadd(101.01, -102.54, -35.5, 0.16)
    pt3dadd(101.11, -102.48, -35.5, 0.16)
    pt3dadd(101.27, -102.48, -35.5, 0.16)
    pt3dadd(101.43, -102.43, -35.5, 0.16)
    pt3dadd(101.53, -102.38, -35.5, 0.16)
    pt3dadd(101.69, -102.27, -35.5, 0.16)
    pt3dadd(101.79, -102.22, -35.5, 0.16)
    pt3dadd(101.9, -102.12, -35.5, 0.16)
    pt3dadd(102.11, -102.06, -35.5, 0.16)
    pt3dadd(102.16, -101.96, -35.5, 0.16)
    pt3dadd(102.27, -101.85, -35.5, 0.16)
    pt3dadd(102.37, -101.91, -35.5, 0.16)
    pt3dadd(102.48, -101.85, -35.5, 0.16)
    pt3dadd(102.63, -101.8, -35.5, 0.16)
    pt3dadd(102.84, -101.75, -35.5, 0.16)
    pt3dadd(103.63, -101.54, -35.5, 0.84)
    pt3dadd(104.84, -101.06, -35.5, 0.16)
    pt3dadd(105.78, -100.8, -35, 0.84)
    pt3dadd(106.94, -100.54, -35.5, 0.16)
    pt3dadd(107.04, -100.65, -35.5, 0.16)
    pt3dadd(107.2, -100.7, -35.5, 0.16)
    pt3dadd(107.31, -100.8, -35.5, 0.16)
    pt3dadd(107.46, -100.8, -35.5, 0.16)
    pt3dadd(107.67, -100.86, -35, 0.16)
    pt3dadd(107.94, -100.86, -35, 0.16)
    pt3dadd(108.15, -100.91, -35, 0.16)
    pt3dadd(108.41, -100.91, -35, 0.16)
    pt3dadd(108.57, -100.96, -35, 0.16)
    pt3dadd(108.93, -100.96, -35, 0.16)
    pt3dadd(109.04, -100.91, -35, 0.16)
    pt3dadd(109.3, -100.91, -35, 0.16)
    pt3dadd(109.41, -100.86, -35, 0.16)
    pt3dadd(109.51, -100.8, -35, 0.16)
    pt3dadd(109.67, -100.7, -35, 0.16)
    pt3dadd(109.88, -100.65, -35, 0.16)
    pt3dadd(110.46, -100.65, -35.5, 0.16)
    pt3dadd(110.61, -100.7, -35.5, 0.16)
    pt3dadd(110.72, -100.75, -35.5, 0.16)
    pt3dadd(110.88, -100.86, -35.5, 0.16)
    pt3dadd(111.45, -100.86, -35.5, 0.16)
    pt3dadd(111.56, -100.75, -35.5, 0.16)
    pt3dadd(111.72, -100.65, -35.5, 0.16)
    pt3dadd(111.72, -100.49, -35.5, 0.16)
    pt3dadd(111.82, -100.38, -35.5, 0.16)
    pt3dadd(111.98, -100.33, -35.5, 0.16)
    pt3dadd(112.08, -100.23, -35.5, 0.16)
    pt3dadd(112.24, -100.07, -35.5, 0.16)
    pt3dadd(112.35, -99.96, -35.5, 0.16)
    pt3dadd(112.56, -99.86, -35.5, 0.16)
    pt3dadd(112.71, -99.81, -35.5, 0.16)
    pt3dadd(112.82, -99.75, -35.5, 0.16)
    pt3dadd(113.08, -99.65, -35.5, 0.16)
    pt3dadd(113.19, -99.6, -35.5, 0.16)
    pt3dadd(113.34, -99.54, -35.5, 0.16)
    pt3dadd(113.55, -99.33, -35, 0.16)
    pt3dadd(113.61, -99.07, -35, 0.16)
    pt3dadd(113.66, -98.96, -35, 0.16)
    pt3dadd(113.76, -98.86, -35, 0.16)
    pt3dadd(113.82, -98.75, -35, 0.16)
    pt3dadd(113.97, -98.7, -35, 0.16)
    pt3dadd(114.13, -98.7, -35, 0.16)
    pt3dadd(114.34, -98.6, -35, 0.16)
    pt3dadd(114.55, -98.54, -35, 0.16)
    pt3dadd(114.71, -98.54, -34.5, 0.16)
    pt3dadd(114.81, -98.44, -34.5, 0.16)
    pt3dadd(114.97, -98.39, -34.5, 0.16)
    pt3dadd(115.08, -98.39, -34.5, 0.16)
    pt3dadd(115.29, -98.39, -34.5, 0.16)
    pt3dadd(115.92, -98.07, -34.5, 0.84)
    pt3dadd(115.97, -97.97, -34.5, 0.84)
    pt3dadd(116.76, -97.7, -34, 0.21)
    pt3dadd(116.86, -97.65, -34, 0.21)
    pt3dadd(117.02, -97.55, -34, 0.21)
    pt3dadd(117.12, -97.49, -34, 0.21)
    pt3dadd(117.23, -97.39, -34, 0.21)
    pt3dadd(117.49, -97.28, -34, 0.21)
    pt3dadd(117.6, -97.07, -34, 0.21)
    pt3dadd(117.7, -96.91, -33.5, 0.21)
    pt3dadd(117.81, -96.86, -33.5, 0.21)
    pt3dadd(117.91, -96.81, -33.5, 0.21)
    pt3dadd(118.07, -96.76, -33.5, 0.21)
    pt3dadd(118.38, -96.76, -33.5, 0.21)
    pt3dadd(119.17, -97.02, -33.5, 0.68)
    pt3dadd(119.28, -96.91, -33.5, 0.68)
    pt3dadd(120.06, -97.12, -33.5, 0.21)
    pt3dadd(120.22, -97.18, -33.5, 0.21)
    pt3dadd(120.38, -97.07, -33.5, 0.21)
    pt3dadd(120.48, -97.02, -33.5, 0.21)
    pt3dadd(120.64, -96.97, -33.5, 0.21)
    pt3dadd(120.96, -96.97, -33.5, 0.21)
    pt3dadd(121.11, -96.91, -33.5, 0.21)
    pt3dadd(121.22, -96.81, -33, 0.21)
    pt3dadd(121.32, -96.76, -33, 0.21)
    pt3dadd(121.43, -96.65, -33, 0.21)
    pt3dadd(121.48, -96.44, -33, 0.21)
    pt3dadd(121.64, -96.28, -33, 0.21)
    pt3dadd(122.32, -96.91, -33, 0.16)
    pt3dadd(122.37, -96.76, -33, 0.16)
    pt3dadd(122.47, -96.6, -33, 0.16)
    pt3dadd(123.31, -96.6, -33, 0.16)
    pt3dadd(123.68, -96.65, -33, 0.16)
    pt3dadd(124.42, -96.55, -33, 0.79)
    pt3dadd(125.57, -96.6, -32.5, 0.21)
    pt3dadd(125.68, -96.49, -32.5, 0.21)
    pt3dadd(125.78, -96.39, -32.5, 0.21)
    pt3dadd(125.89, -96.23, -32.5, 0.21)
    pt3dadd(126.04, -96.13, -32.5, 0.21)
    pt3dadd(126.04, -95.92, -32, 0.21)
    pt3dadd(126.1, -95.76, -32, 0.21)
    pt3dadd(126.2, -95.65, -32, 0.21)
    pt3dadd(126.31, -95.55, -32, 0.21)
    pt3dadd(126.46, -95.28, -32, 0.21)
    pt3dadd(126.57, -95.23, -32, 0.21)
    pt3dadd(126.99, -95.23, -32, 0.21)
    pt3dadd(127.15, -95.18, -32, 0.21)
    pt3dadd(127.25, -95.13, -32, 0.21)
    pt3dadd(127.3, -95.02, -32.5, 0.21)
    pt3dadd(127.41, -94.92, -32.5, 0.21)
    pt3dadd(127.51, -94.86, -32.5, 0.21)
    pt3dadd(127.57, -94.76, -32.5, 0.21)
    pt3dadd(127.67, -94.71, -33, 0.21)
    pt3dadd(127.78, -94.6, -33, 0.21)
    pt3dadd(127.88, -94.5, -33, 0.21)
    pt3dadd(128.04, -94.44, -33, 0.21)
    pt3dadd(128.13, -94.39, -33, 0.21)
    pt3dadd(128.25, -94.34, -33, 0.21)
    pt3dadd(128.35, -94.29, -33, 0.21)
    pt3dadd(128.46, -94.23, -33, 0.21)
    pt3dadd(128.66, -94.18, -33, 0.21)
    pt3dadd(128.77, -94.13, -33.5, 0.21)
    pt3dadd(128.88, -94.08, -33.5, 0.21)
    pt3dadd(128.97, -94.02, -33.5, 0.21)
    pt3dadd(129.09, -93.97, -33.5, 0.21)
    pt3dadd(129.19, -93.92, -33.5, 0.21)
    pt3dadd(129.19, -93.76, -33.5, 0.21)
    pt3dadd(129.3, -93.71, -33.5, 0.21)
    pt3dadd(129.3, -93.65, -34, 0.21)
    pt3dadd(129.97, -92.66, -34, 0.89)
    pt3dadd(129.87, -92.71, -34, 0.89)
    pt3dadd(130.87, -91.87, -34, 0.21)
    pt3dadd(130.91, -91.76, -34, 0.21)
    pt3dadd(130.97, -91.66, -34, 0.21)
    pt3dadd(131.08, -91.45, -34, 0.21)
    pt3dadd(131.19, -91.39, -34, 0.21)
    pt3dadd(131.4, -91.29, -34, 0.21)
    pt3dadd(131.5, -91.29, -34.5, 0.21)
    pt3dadd(131.61, -91.13, -34.5, 0.73)
    pt3dadd(131.66, -91.03, -34.5, 0.73)
    pt3dadd(131.76, -90.82, -34.5, 0.73)
    pt3dadd(132.55, -90.55, -34.5, 0.16)
    pt3dadd(132.66, -90.45, -34.5, 0.16)
    pt3dadd(133.5, -89.87, -34.5, 0.79)
    pt3dadd(133.6, -89.82, -34.5, 0.79)
    pt3dadd(134.28, -89.4, -35, 0.16)
    pt3dadd(134.44, -89.4, -35, 0.16)
    pt3dadd(134.6, -89.34, -35, 0.16)
    pt3dadd(134.76, -89.24, -35, 0.16)
    pt3dadd(134.91, -89.19, -35, 0.16)
    pt3dadd(135.02, -89.13, -35, 0.16)
    pt3dadd(134.97, -89.08, -35.5, 0.16)
    pt3dadd(134.97, -88.87, -35.5, 0.16)
    pt3dadd(134.91, -88.71, -35.5, 0.16)
    pt3dadd(134.91, -88.5, -36, 0.16)
    pt3dadd(134.97, -88.4, -36, 0.16)
    pt3dadd(135.38, -87.87, -36, 0.68)
    pt3dadd(135.38, -87.87, -36.5, 0.68)
    pt3dadd(135.69, -87.66, -37.5, 0.16)
    pt3dadd(135.69, -87.5, -37.5, 0.16)
    pt3dadd(135.75, -87.29, -38, 0.16)
    pt3dadd(135.75, -87.14, -38, 0.16)
    pt3dadd(135.91, -87.03, -38, 0.16)
    pt3dadd(136.02, -86.93, -38.5, 0.16)
    pt3dadd(136.33, -86.93, -38.5, 0.16)
    pt3dadd(136.59, -86.93, -38.5, 0.16)
    pt3dadd(136.69, -86.82, -38.5, 0.16)
    pt3dadd(136.86, -86.72, -38.5, 0.16)
    pt3dadd(136.96, -86.66, -38.5, 0.16)
    pt3dadd(137.12, -86.61, -38.5, 0.16)
    pt3dadd(137.33, -86.66, -38.5, 0.16)
  }
}
proc shape3d_82() {
  axon[19] {
    pt3dadd(137.38, -86.77, -39, 0.16)
    pt3dadd(137.49, -86.82, -39, 0.16)
    pt3dadd(137.69, -86.77, -39, 0.16)
    pt3dadd(137.8, -86.72, -39, 0.16)
    pt3dadd(137.91, -86.61, -39, 0.16)
    pt3dadd(138.01, -86.45, -39, 0.16)
    pt3dadd(138.16, -86.3, -39, 0.16)
    pt3dadd(139.11, -85.82, -39, 0.79)
    pt3dadd(139.16, -85.72, -39, 0.79)
    pt3dadd(140.16, -86.4, -39, 0.16)
    pt3dadd(140.69, -86.4, -39, 0.16)
    pt3dadd(140.79, -86.35, -39, 0.16)
    pt3dadd(140.9, -86.3, -39, 0.16)
    pt3dadd(141.11, -86.08, -39, 0.16)
    pt3dadd(141.21, -85.93, -39.5, 0.16)
    pt3dadd(141.21, -85.82, -39.5, 0.16)
    pt3dadd(141.27, -85.72, -39.5, 0.16)
    pt3dadd(141.84, -85.43, -39.5, 0.16)
  }
  axon[20] {pt3dclear()
    pt3dadd(141.84, -85.43, -39.5, 0.16)
    pt3dadd(142.05, -85.51, -40, 0.79)
    pt3dadd(142.37, -86.24, -41, 0.16)
    pt3dadd(143.28, -86.91, -40, 0.16)
    pt3dadd(143.38, -86.96, -40, 0.16)
    pt3dadd(143.49, -87.22, -39.5, 0.16)
    pt3dadd(143.54, -87.33, -39.5, 0.16)
    pt3dadd(143.59, -87.49, -39.5, 0.16)
    pt3dadd(143.59, -87.59, -39.5, 0.16)
    pt3dadd(143.69, -87.8, -39.5, 0.16)
    pt3dadd(143.8, -87.96, -39.5, 0.16)
    pt3dadd(143.96, -88.17, -39.5, 0.16)
    pt3dadd(144.06, -88.22, -39.5, 0.16)
    pt3dadd(144.16, -88.33, -39.5, 0.16)
    pt3dadd(144.27, -88.38, -39.5, 0.16)
    pt3dadd(144.33, -88.54, -39.5, 0.16)
    pt3dadd(144.54, -88.54, -40, 0.16)
    pt3dadd(144.75, -88.8, -40, 0.16)
    pt3dadd(144.9, -88.8, -40.5, 0.16)
    pt3dadd(145.11, -88.91, -41, 0.16)
    pt3dadd(145.27, -89.06, -41, 0.16)
    pt3dadd(145.38, -89.22, -41, 0.16)
    pt3dadd(145.47, -89.33, -41.5, 0.16)
    pt3dadd(145.53, -89.48, -41.5, 0.16)
    pt3dadd(145.69, -89.8, -41.5, 0.16)
    pt3dadd(145.74, -89.9, -42, 0.16)
    pt3dadd(145.85, -89.96, -42, 0.16)
    pt3dadd(145.9, -90.06, -42, 0.16)
    pt3dadd(146.01, -90.17, -42, 0.16)
    pt3dadd(146.11, -90.27, -42, 0.16)
    pt3dadd(146.22, -90.27, -42, 0.16)
    pt3dadd(146.32, -90.38, -42, 0.16)
    pt3dadd(146.43, -90.43, -42, 0.16)
    pt3dadd(146.53, -90.53, -42, 0.16)
    pt3dadd(146.79, -90.53, -42, 0.16)
    pt3dadd(146.9, -90.64, -42, 0.16)
    pt3dadd(147.06, -90.64, -41.5, 0.16)
    pt3dadd(147.69, -90.53, -41.5, 0.63)
    pt3dadd(147.79, -90.43, -41.5, 0.63)
    pt3dadd(147.94, -90.38, -41.5, 0.63)
    pt3dadd(148.16, -90.38, -41.5, 0.63)
    pt3dadd(148.26, -90.48, -41.5, 0.63)
    pt3dadd(148.41, -90.53, -41.5, 0.63)
    pt3dadd(148.53, -90.59, -41.5, 0.63)
    pt3dadd(149.21, -90.53, -42, 0.16)
    pt3dadd(149.41, -90.48, -42, 0.16)
    pt3dadd(149.58, -90.38, -42, 0.16)
    pt3dadd(149.79, -90.32, -42, 0.16)
    pt3dadd(149.88, -90.27, -42, 0.16)
    pt3dadd(150.15, -90.27, -42, 0.16)
    pt3dadd(150.26, -90.22, -42, 0.16)
    pt3dadd(150.41, -90.22, -42.5, 0.16)
    pt3dadd(150.52, -90.11, -42.5, 0.16)
    pt3dadd(150.57, -90.01, -42.5, 0.16)
    pt3dadd(150.68, -89.96, -42.5, 0.16)
    pt3dadd(150.83, -89.85, -42.5, 0.16)
    pt3dadd(150.99, -89.8, -42.5, 0.16)
    pt3dadd(150.99, -89.69, -42.5, 0.16)
    pt3dadd(151.88, -89.22, -42.5, 0.52)
    pt3dadd(151.99, -89.06, -42.5, 0.52)
    pt3dadd(152.04, -88.96, -42.5, 0.52)
    pt3dadd(152.09, -88.8, -42.5, 0.52)
    pt3dadd(152.25, -88.48, -42.5, 0.52)
    pt3dadd(152.3, -88.33, -43, 0.52)
    pt3dadd(152.72, -88.33, -43, 0.52)
    pt3dadd(152.88, -88.43, -43, 0.52)
    pt3dadd(153.51, -88.33, -43, 0.16)
    pt3dadd(153.83, -88.33, -43, 0.16)
    pt3dadd(153.97, -88.43, -43.5, 0.16)
    pt3dadd(154.09, -88.54, -43.5, 0.16)
    pt3dadd(154.19, -88.64, -43.5, 0.16)
    pt3dadd(154.19, -88.75, -44, 0.16)
    pt3dadd(154.35, -88.75, -44, 0.16)
    pt3dadd(154.35, -88.96, -44, 0.16)
    pt3dadd(154.46, -88.96, -44.5, 0.16)
    pt3dadd(154.61, -89.06, -45, 0.16)
    pt3dadd(154.72, -89.01, -45, 0.16)
    pt3dadd(154.88, -88.96, -45.5, 0.16)
    pt3dadd(155.09, -88.85, -45.5, 0.16)
    pt3dadd(155.24, -88.91, -45.5, 0.16)
    pt3dadd(155.35, -89.01, -45.5, 0.16)
    pt3dadd(155.44, -89.01, -46, 0.16)
    pt3dadd(155.61, -89.06, -46, 0.16)
    pt3dadd(155.77, -89.17, -46, 0.16)
    pt3dadd(155.97, -89.17, -46, 0.16)
    pt3dadd(156.08, -89.22, -46, 0.16)
    pt3dadd(156.44, -88.85, -46, 0.16)
    pt3dadd(156.61, -88.8, -46, 0.16)
    pt3dadd(156.71, -88.75, -46, 0.16)
    pt3dadd(156.71, -88.64, -46, 0.16)
    pt3dadd(156.82, -88.59, -46, 0.16)
    pt3dadd(156.91, -88.54, -46, 0.16)
    pt3dadd(157.03, -88.38, -46, 0.16)
    pt3dadd(157.19, -88.22, -46, 0.16)
    pt3dadd(157.29, -88.27, -46, 0.16)
    pt3dadd(157.44, -88.27, -46, 0.16)
    pt3dadd(157.44, -88.12, -46, 0.16)
  }
  axon[21] {pt3dclear()
    pt3dadd(157.44, -88.12, -46, 0.16)
    pt3dadd(158.29, -88.17, -45.5, 0.16)
    pt3dadd(158.29, -88.01, -45.5, 0.16)
    pt3dadd(158.34, -87.8, -45.5, 0.16)
    pt3dadd(158.34, -87.43, -45.5, 0.16)
    pt3dadd(158.66, -86.64, -45.5, 0.58)
    pt3dadd(158.66, -85.86, -45.5, 0.16)
    pt3dadd(158.97, -85.28, -45, 0.47)
  }
  axon[22] {pt3dclear()
    pt3dadd(157.44, -88.12, -46, 0.16)
    pt3dadd(158.38, -88.85, -47.5, 0.16)
    pt3dadd(158.6, -88.85, -47.5, 0.16)
    pt3dadd(158.71, -88.91, -47.5, 0.16)
    pt3dadd(158.87, -89.12, -47.5, 0.16)
    pt3dadd(158.97, -89.22, -47.5, 0.16)
    pt3dadd(159.13, -89.33, -48, 0.16)
    pt3dadd(159.22, -89.43, -48, 0.16)
    pt3dadd(159.86, -89.9, -47, 0.73)
    pt3dadd(160.44, -90.8, -48.5, 0.16)
    pt3dadd(160.6, -90.96, -48.5, 0.16)
    pt3dadd(160.76, -90.96, -48.5, 0.16)
    pt3dadd(160.91, -91.22, -48.5, 0.16)
    pt3dadd(161.22, -91.32, -48.5, 0.16)
    pt3dadd(161.38, -91.38, -48.5, 0.16)
    pt3dadd(161.49, -91.48, -48.5, 0.16)
    pt3dadd(161.75, -91.64, -48.5, 0.16)
    pt3dadd(161.86, -91.69, -48.5, 0.16)
    pt3dadd(162.02, -91.74, -48.5, 0.16)
    pt3dadd(162.12, -91.74, -49, 0.16)
    pt3dadd(162.33, -91.69, -49, 0.16)
    pt3dadd(162.49, -91.69, -49, 0.16)
    pt3dadd(162.69, -91.64, -49, 0.16)
    pt3dadd(162.96, -91.64, -49, 0.16)
    pt3dadd(163.12, -91.59, -49, 0.16)
    pt3dadd(163.33, -91.59, -49, 0.16)
    pt3dadd(163.49, -91.64, -49, 0.16)
    pt3dadd(163.69, -91.69, -49, 0.16)
    pt3dadd(163.85, -91.74, -49, 0.16)
    pt3dadd(164.22, -91.74, -49, 0.16)
    pt3dadd(165.68, -91.78, -48.5, 1)
    pt3dadd(166.73, -92.46, -48.5, 0.16)
    pt3dadd(166.84, -92.31, -48.5, 0.16)
    pt3dadd(166.99, -92.31, -48.5, 0.16)
    pt3dadd(167.1, -92.25, -48.5, 0.16)
    pt3dadd(167.31, -92.25, -48.5, 0.16)
    pt3dadd(167.47, -92.2, -48.5, 0.16)
    pt3dadd(167.68, -92.15, -48.5, 0.16)
    pt3dadd(167.78, -92.04, -48.5, 0.16)
    pt3dadd(167.94, -91.94, -48.5, 0.16)
    pt3dadd(168.1, -91.78, -48, 0.16)
    pt3dadd(168.15, -91.67, -48, 0.16)
    pt3dadd(168.25, -91.57, -48, 0.16)
    pt3dadd(168.99, -90.99, -48, 1)
    pt3dadd(170.56, -90.83, -48, 0.16)
    pt3dadd(171.56, -90.36, -48, 0.89)
  }
  axon[23] {pt3dclear()
    pt3dadd(141.84, -85.43, -39.5, 0.16)
    pt3dadd(142.05, -85.85, -41, 0.16)
    pt3dadd(142.19, -85.85, -41.5, 0.16)
    pt3dadd(142.31, -85.9, -41.5, 0.16)
    pt3dadd(142.41, -85.96, -43, 0.16)
    pt3dadd(142.52, -85.85, -43, 0.16)
    pt3dadd(142.62, -85.75, -43.5, 0.16)
    pt3dadd(142.62, -85.54, -43.5, 0.16)
    pt3dadd(142.57, -85.43, -43.5, 0.16)
    pt3dadd(142.47, -85.38, -43.5, 0.16)
    pt3dadd(142.26, -85.33, -43.5, 0.16)
    pt3dadd(142.15, -85.27, -44, 0.16)
    pt3dadd(141.99, -85.33, -44.5, 0.16)
    pt3dadd(141.94, -85.27, -45, 0.16)
    pt3dadd(141.72, -85.22, -45, 0.16)
    pt3dadd(141.72, -85.17, -45.5, 0.16)
    pt3dadd(141.57, -85.17, -45.5, 0.16)
    pt3dadd(141.57, -85.06, -45.5, 0.16)
    pt3dadd(141.52, -85.01, -46, 0.16)
    pt3dadd(141.47, -84.91, -46, 0.16)
    pt3dadd(141.47, -84.54, -46.5, 0.16)
    pt3dadd(141.57, -84.48, -47, 0.16)
    pt3dadd(141.78, -84.38, -47, 0.16)
    pt3dadd(142.05, -84.38, -47.5, 0.16)
    pt3dadd(142.05, -84.12, -48.5, 0.16)
    pt3dadd(142.1, -84.01, -48.5, 0.16)
    pt3dadd(142.1, -83.91, -49, 0.16)
    pt3dadd(142.26, -83.8, -49, 0.16)
    pt3dadd(142.47, -83.75, -49, 0.16)
    pt3dadd(142.62, -83.7, -49, 0.16)
    pt3dadd(142.83, -83.59, -49, 0.16)
    pt3dadd(142.99, -83.54, -49, 0.16)
    pt3dadd(143.19, -83.43, -49.5, 0.16)
    pt3dadd(143.36, -83.38, -49.5, 0.16)
    pt3dadd(143.46, -83.28, -49.5, 0.16)
    pt3dadd(143.62, -83.22, -50, 0.16)
    pt3dadd(143.83, -83.12, -50, 0.16)
    pt3dadd(143.94, -83.01, -50, 0.16)
    pt3dadd(143.99, -82.85, -50.5, 0.16)
    pt3dadd(144.88, -82.84, -51.5, 0.73)
    pt3dadd(146.04, -81.89, -53, 0.1)
    pt3dadd(146.35, -81.89, -53.5, 0.1)
    pt3dadd(146.4, -82.05, -53.5, 0.1)
    pt3dadd(146.56, -82.16, -53.5, 0.1)
    pt3dadd(146.72, -82.1, -54, 0.1)
    pt3dadd(146.88, -82.05, -54, 0.1)
    pt3dadd(146.93, -81.95, -54.5, 0.1)
    pt3dadd(147.03, -81.84, -54.5, 0.1)
    pt3dadd(147.09, -81.73, -54.5, 0.1)
    pt3dadd(147.19, -81.63, -54.5, 0.1)
    pt3dadd(147.35, -81.58, -54.5, 0.1)
    pt3dadd(147.51, -81.58, -54.5, 0.1)
    pt3dadd(147.61, -81.52, -54.5, 0.1)
    pt3dadd(147.87, -81.52, -54.5, 0.1)
    pt3dadd(147.87, -81.47, -55, 0.1)
    pt3dadd(147.97, -81.42, -55, 0.1)
    pt3dadd(148.13, -81.37, -55.5, 0.1)
    pt3dadd(148.29, -81.31, -55.5, 0.1)
    pt3dadd(148.44, -81.31, -55.5, 0.1)
    pt3dadd(149.29, -81.05, -55.5, 0.73)
    pt3dadd(149.91, -80.47, -55.5, 0.16)
    pt3dadd(149.97, -80.26, -55.5, 0.16)
    pt3dadd(150.03, -80.16, -55.5, 0.16)
    pt3dadd(150.13, -80, -55.5, 0.16)
    pt3dadd(150.29, -79.89, -55.5, 0.16)
    pt3dadd(150.55, -79.79, -55.5, 0.16)
    pt3dadd(150.66, -79.73, -55.5, 0.16)
    pt3dadd(150.81, -79.58, -56, 0.16)
    pt3dadd(151.37, -79.61, -56.5, 0.84)
    pt3dadd(152.26, -79.81, -57, 0.16)
    pt3dadd(152.52, -79.81, -57, 0.16)
    pt3dadd(152.63, -80.03, -57, 0.16)
    pt3dadd(152.88, -80.03, -57.5, 0.16)
    pt3dadd(153.05, -79.98, -57.5, 0.16)
    pt3dadd(153.47, -79.98, -57.5, 0.16)
    pt3dadd(153.57, -79.93, -57.5, 0.16)
    pt3dadd(153.72, -79.77, -57.5, 0.16)
    pt3dadd(153.84, -79.61, -58, 0.16)
    pt3dadd(153.94, -79.51, -58, 0.16)
    pt3dadd(154.05, -79.45, -58, 0.16)
  }
}
proc shape3d_83() {
  axon[23] {
    pt3dadd(154.26, -79.34, -58, 0.16)
    pt3dadd(155.04, -79.34, -58.5, 0.16)
    pt3dadd(155.15, -79.4, -58.5, 0.16)
    pt3dadd(155.25, -79.51, -58.5, 0.16)
    pt3dadd(155.36, -79.61, -58.5, 0.16)
    pt3dadd(155.46, -79.81, -58.5, 0.16)
    pt3dadd(155.57, -79.93, -58.5, 0.16)
    pt3dadd(155.72, -80.09, -59, 0.16)
    pt3dadd(155.83, -80.09, -59, 0.16)
    pt3dadd(155.94, -80.03, -59, 0.16)
    pt3dadd(156.09, -80.03, -59, 0.16)
    pt3dadd(156.19, -79.98, -59, 0.16)
    pt3dadd(156.72, -79.88, -57, 0.84)
    pt3dadd(156.72, -79.88, -58, 0.84)
    pt3dadd(157.25, -80.56, -58.5, 0.16)
    pt3dadd(157.25, -80.72, -59, 0.16)
    pt3dadd(157.3, -80.93, -59, 0.16)
    pt3dadd(157.41, -80.98, -59, 0.16)
    pt3dadd(157.41, -81.09, -59, 0.16)
    pt3dadd(157.56, -81.19, -59.5, 0.16)
    pt3dadd(157.66, -81.3, -60, 0.16)
    pt3dadd(158.25, -81.3, -60, 0.16)
    pt3dadd(158.35, -81.23, -60, 0.16)
    pt3dadd(158.46, -81.19, -60, 0.16)
    pt3dadd(158.56, -81.14, -60, 0.16)
    pt3dadd(158.61, -80.98, -60, 0.16)
    pt3dadd(158.72, -80.93, -60, 0.16)
    pt3dadd(158.77, -80.81, -60, 0.16)
    pt3dadd(158.88, -80.77, -60, 0.16)
    pt3dadd(158.97, -80.72, -60, 0.16)
    pt3dadd(159.24, -80.72, -61, 0.16)
    pt3dadd(159.35, -80.81, -61, 0.16)
    pt3dadd(159.4, -80.93, -61, 0.16)
    pt3dadd(159.4, -81.09, -61, 0.16)
    pt3dadd(159.44, -81.19, -61, 0.16)
    pt3dadd(159.51, -81.34, -61.5, 0.16)
    pt3dadd(159.61, -81.4, -61.5, 0.16)
    pt3dadd(159.66, -81.51, -61.5, 0.16)
    pt3dadd(159.77, -81.51, -62, 0.16)
    pt3dadd(159.82, -81.61, -62, 0.16)
    pt3dadd(160.13, -81.61, -62, 0.16)
    pt3dadd(160.29, -81.61, -62, 0.16)
    pt3dadd(161.03, -81.72, -62.5, 0.84)
    pt3dadd(161.44, -80.98, -61.5, 0.21)
    pt3dadd(161.82, -80.51, -61, 0.79)
    pt3dadd(162.26, -79.58, -61, 0.16)
    pt3dadd(162.26, -79.37, -61.5, 0.16)
    pt3dadd(162.37, -79.37, -61.5, 0.16)
    pt3dadd(162.41, -79.27, -62, 0.16)
    pt3dadd(162.47, -79.16, -62.5, 0.16)
    pt3dadd(162.63, -78.95, -62.5, 0.16)
    pt3dadd(162.63, -78.64, -63, 0.16)
    pt3dadd(162.52, -78.53, -63, 0.16)
    pt3dadd(162.37, -78.48, -63.5, 0.16)
    pt3dadd(162.26, -78.38, -63.5, 0.16)
    pt3dadd(162.21, -78.31, -64, 0.16)
    pt3dadd(162.26, -78.06, -64, 0.16)
    pt3dadd(162.37, -78.06, -64, 0.16)
    pt3dadd(162.52, -77.95, -64, 0.16)
    pt3dadd(162.68, -77.9, -64, 0.16)
    pt3dadd(162.84, -77.9, -64, 0.16)
    pt3dadd(162.94, -77.73, -64, 0.16)
    pt3dadd(163.31, -77.73, -64, 0.16)
    pt3dadd(163.52, -77.59, -64, 0.16)
    pt3dadd(163.63, -77.38, -64, 0.16)
    pt3dadd(163.68, -77.27, -64, 0.16)
    pt3dadd(163.72, -77.11, -64, 0.16)
    pt3dadd(163.84, -77.01, -64, 0.16)
    pt3dadd(163.94, -76.9, -64, 0.16)
    pt3dadd(164.31, -76.69, -64.5, 0.68)
    pt3dadd(164.31, -76.48, -64.5, 0.68)
    pt3dadd(165.15, -75.48, -64.5, 0.26)
    pt3dadd(165.83, -74.7, -65, 0.94)
    pt3dadd(167.04, -73.48, -65, 0.26)
    pt3dadd(167.04, -73.48, -65.5, 0.26)
    pt3dadd(167.77, -73.22, -66, 0.89)
    pt3dadd(168.56, -72.86, -66.5, 0.16)
    pt3dadd(168.82, -72.86, -67, 0.16)
    pt3dadd(168.98, -72.8, -67, 0.16)
    pt3dadd(169.14, -72.75, -67, 0.16)
    pt3dadd(169.3, -72.65, -67, 0.16)
    pt3dadd(169.4, -72.59, -67, 0.16)
    pt3dadd(169.51, -72.54, -67, 0.16)
    pt3dadd(169.51, -72.44, -67.5, 0.16)
    pt3dadd(169.72, -72.38, -67.5, 0.16)
    pt3dadd(169.82, -72.28, -67.5, 0.16)
    pt3dadd(169.98, -72.22, -67.5, 0.16)
    pt3dadd(170.45, -72.22, -68, 0.16)
    pt3dadd(170.56, -72.12, -68.5, 0.16)
    pt3dadd(170.56, -72.01, -68.5, 0.16)
    pt3dadd(170.71, -71.95, -68.5, 0.16)
    pt3dadd(170.82, -71.86, -68.5, 0.16)
    pt3dadd(171.19, -71.86, -69, 0.16)
    pt3dadd(171.29, -71.75, -69, 0.16)
    pt3dadd(172.29, -71.38, -69, 0.79)
    pt3dadd(172.81, -71.23, -69, 0.1)
    pt3dadd(172.97, -71.23, -69, 0.1)
    pt3dadd(173.02, -71.12, -69.5, 0.1)
    pt3dadd(173.18, -71.06, -69.5, 0.1)
    pt3dadd(173.34, -71.12, -69.5, 0.1)
    pt3dadd(173.44, -71.23, -69.5, 0.1)
    pt3dadd(173.55, -71.33, -69.5, 0.1)
    pt3dadd(173.65, -71.38, -69.5, 0.1)
    pt3dadd(173.76, -71.44, -69.5, 0.1)
    pt3dadd(173.86, -71.54, -70, 0.1)
    pt3dadd(174.02, -71.7, -70, 0.1)
    pt3dadd(174.13, -71.8, -70, 0.1)
    pt3dadd(174.28, -71.8, -70, 0.1)
    pt3dadd(174.39, -71.75, -70, 0.1)
    pt3dadd(174.49, -71.59, -70, 0.1)
    pt3dadd(174.65, -71.54, -70, 0.1)
    pt3dadd(174.76, -71.33, -70, 0.1)
    pt3dadd(174.86, -71.33, -70, 0.1)
    pt3dadd(175.02, -71.28, -70, 0.1)
    pt3dadd(175.18, -71.28, -70, 0.1)
    pt3dadd(175.49, -71.28, -70, 0.1)
    pt3dadd(175.6, -71.33, -70, 0.1)
    pt3dadd(175.86, -71.33, -70, 0.1)
    pt3dadd(176.07, -71.38, -70, 0.1)
    pt3dadd(176.28, -71.48, -70, 0.1)
    pt3dadd(176.44, -71.48, -70, 0.1)
    pt3dadd(176.65, -71.54, -70, 0.1)
    pt3dadd(176.75, -71.38, -70, 0.1)
    pt3dadd(176.91, -71.33, -70, 0.1)
    pt3dadd(177.01, -71.28, -70, 0.1)
    pt3dadd(177.12, -71.17, -70, 0.1)
    pt3dadd(177.33, -71.12, -70, 0.1)
    pt3dadd(177.49, -71.06, -70, 0.1)
    pt3dadd(177.8, -71.06, -70, 0.1)
    pt3dadd(177.91, -71.12, -70, 0.1)
    pt3dadd(178.01, -71.17, -70, 0.1)
    pt3dadd(178.12, -71.28, -70, 0.1)
    pt3dadd(178.22, -71.33, -70, 0.1)
    pt3dadd(178.27, -71.59, -70, 0.84)
    pt3dadd(178.48, -71.65, -70.5, 0.84)
    pt3dadd(178.59, -71.65, -70.5, 0.84)
    pt3dadd(178.74, -71.7, -70.5, 0.84)
    pt3dadd(179.58, -71.7, -70.5, 0.16)
    pt3dadd(179.85, -71.7, -70.5, 0.16)
    pt3dadd(180.11, -71.59, -70.5, 0.16)
    pt3dadd(180.21, -71.48, -70.5, 0.16)
    pt3dadd(180.37, -71.44, -70.5, 0.16)
    pt3dadd(180.48, -71.38, -70.5, 0.16)
    pt3dadd(180.58, -71.33, -70.5, 0.16)
    pt3dadd(180.74, -71.28, -70.5, 0.16)
    pt3dadd(180.84, -71.17, -70.5, 0.16)
    pt3dadd(180.95, -71.17, -70.5, 0.16)
    pt3dadd(181.16, -70.95, -70.5, 0.16)
    pt3dadd(181.26, -70.86, -70.5, 0.16)
    pt3dadd(181.32, -70.75, -70.5, 0.16)
    pt3dadd(181.37, -70.48, -70.5, 0.16)
    pt3dadd(181.37, -70.12, -70.5, 0.16)
    pt3dadd(181.42, -70.02, -70.5, 0.16)
    pt3dadd(181.68, -69.31, -71, 0.16)
    pt3dadd(181.57, -69.31, -71.5, 0.16)
    pt3dadd(181.78, -69.31, -71.5, 0.16)
    pt3dadd(181.73, -69.2, -71.5, 0.16)
    pt3dadd(182.41, -68.58, -71.5, 0.79)
    pt3dadd(182.78, -67.53, -71.5, 0.1)
    pt3dadd(183.09, -66.43, -71, 1.1)
    pt3dadd(183.15, -66.17, -71, 1.1)
    pt3dadd(183.2, -65.95, -71, 1.1)
    pt3dadd(183.2, -65.8, -71, 1.1)
    pt3dadd(183.25, -65.59, -71, 1.1)
    pt3dadd(184.04, -64.9, -71, 0.16)
    pt3dadd(184.56, -64.22, -71, 0.84)
    pt3dadd(184.56, -64.22, -71.5, 0.84)
    pt3dadd(185.46, -63.8, -71.5, 0.16)
    pt3dadd(185.46, -63.8, -72, 0.16)
  }
  axon[24] {pt3dclear()
    pt3dadd(185.46, -63.8, -72, 0.16)
    pt3dadd(185.09, -63.43, -72, 0.16)
    pt3dadd(185.09, -63.17, -71.5, 0.16)
    pt3dadd(185.25, -63.01, -71.5, 0.16)
    pt3dadd(185.25, -62.85, -71.5, 0.16)
    pt3dadd(185.14, -62.28, -71.5, 0.79)
  }
  axon[25] {pt3dclear()
    pt3dadd(185.46, -63.8, -72, 0.16)
    pt3dadd(185.82, -63.54, -71.5, 0.16)
    pt3dadd(186.03, -63.54, -71.5, 0.16)
    pt3dadd(186.09, -63.43, -71.5, 0.16)
    pt3dadd(186.19, -63.33, -71.5, 0.16)
    pt3dadd(186.35, -63.22, -71.5, 0.16)
    pt3dadd(186.56, -63.22, -71.5, 0.16)
    pt3dadd(186.61, -63.17, -72, 0.16)
    pt3dadd(186.72, -63.12, -72, 0.16)
    pt3dadd(187.19, -63.12, -72, 0.16)
    pt3dadd(187.29, -63.06, -72, 0.16)
    pt3dadd(187.98, -62.91, -71, 1.05)
    pt3dadd(188.87, -63.12, -71.5, 0.1)
    pt3dadd(189.03, -63.06, -71.5, 0.1)
    pt3dadd(189.18, -63.12, -71.5, 0.1)
    pt3dadd(189.29, -63.22, -71.5, 0.1)
    pt3dadd(189.5, -63.22, -71.5, 0.1)
    pt3dadd(189.66, -63.27, -71.5, 0.1)
    pt3dadd(189.76, -63.38, -71.5, 0.1)
    pt3dadd(189.92, -63.43, -71.5, 0.1)
    pt3dadd(190.02, -63.48, -71.5, 0.1)
    pt3dadd(190.13, -63.54, -71.5, 0.1)
    pt3dadd(190.39, -63.54, -71.5, 0.1)
    pt3dadd(190.5, -63.43, -71.5, 0.1)
  }
  axon[26] {pt3dclear()
    pt3dadd(190.5, -63.43, -71.5, 0.1)
    pt3dadd(190.23, -63.43, -71.5, 0.1)
    pt3dadd(190.23, -62.85, -71.5, 0.1)
    pt3dadd(190.18, -62.75, -71.5, 0.1)
    pt3dadd(190.18, -62.64, -71.5, 0.1)
    pt3dadd(190.29, -61.91, -71.5, 0.52)
  }
  axon[27] {pt3dclear()
    pt3dadd(190.5, -63.43, -71.5, 0.1)
    pt3dadd(191.39, -63.43, -72, 0.16)
    pt3dadd(191.49, -63.43, -72, 0.16)
    pt3dadd(191.6, -63.48, -72, 0.16)
    pt3dadd(191.91, -63.48, -72, 0.16)
    pt3dadd(192.12, -63.59, -72, 0.16)
    pt3dadd(192.23, -63.64, -72, 0.16)
    pt3dadd(192.33, -63.64, -72, 0.16)
    pt3dadd(192.44, -63.69, -72, 0.16)
    pt3dadd(192.6, -63.85, -72, 0.16)
    pt3dadd(192.7, -63.9, -72, 0.16)
    pt3dadd(192.81, -64.01, -72, 0.16)
    pt3dadd(192.96, -64.12, -72, 0.16)
    pt3dadd(193.59, -64.47, -72.5, 0.68)
    pt3dadd(193.65, -64.78, -72.5, 0.68)
    pt3dadd(193.7, -64.83, -72, 0.68)
    pt3dadd(193.75, -64.94, -72, 0.68)
    pt3dadd(194.49, -65.36, -72, 0.1)
    pt3dadd(194.7, -65.36, -72, 0.1)
    pt3dadd(194.75, -65.47, -72, 0.1)
    pt3dadd(194.85, -65.52, -72, 0.1)
    pt3dadd(195.12, -65.73, -71.5, 0.79)
    pt3dadd(195.96, -66.67, -71.5, 0.16)
    pt3dadd(196.01, -66.83, -71.5, 0.16)
    pt3dadd(196.06, -66.94, -71.5, 0.16)
    pt3dadd(196.11, -67.04, -71.5, 0.16)
    pt3dadd(196.22, -67.15, -71.5, 0.16)
    pt3dadd(196.38, -67.31, -71.5, 0.16)
    pt3dadd(196.48, -67.41, -71.5, 0.16)
    pt3dadd(196.53, -67.56, -71.5, 0.16)
    pt3dadd(196.64, -67.62, -71.5, 0.16)
    pt3dadd(196.69, -67.73, -71.5, 0.16)
    pt3dadd(196.8, -67.94, -71.5, 0.16)
    pt3dadd(196.9, -68.04, -71.5, 0.16)
    pt3dadd(197.06, -68.2, -71.5, 0.16)
    pt3dadd(197.27, -68.88, -71, 0.63)
    pt3dadd(197.37, -68.83, -71, 0.63)
    pt3dadd(198.16, -69.62, -71, 0.16)
    pt3dadd(198.37, -69.72, -71, 0.16)
    pt3dadd(198.47, -69.83, -71, 0.16)
    pt3dadd(198.58, -69.88, -71, 0.16)
    pt3dadd(198.63, -69.98, -71, 0.16)
    pt3dadd(198.74, -70.04, -71, 0.16)
    pt3dadd(198.84, -70.14, -71, 0.16)
  }
}
proc shape3d_84() {
  axon[27] {
    pt3dadd(198.95, -70.2, -71, 0.16)
    pt3dadd(199.05, -70.25, -70.5, 0.16)
    pt3dadd(199.1, -70.34, -70.5, 0.16)
    pt3dadd(199.21, -70.51, -70.5, 0.16)
    pt3dadd(199.37, -70.72, -70.5, 0.16)
    pt3dadd(199.47, -70.83, -70.5, 0.16)
    pt3dadd(199.58, -70.93, -70.5, 0.16)
    pt3dadd(199.68, -71.04, -70.5, 0.16)
    pt3dadd(199.63, -71.2, -70.5, 0.16)
    pt3dadd(199.73, -71.41, -70.5, 0.16)
    pt3dadd(199.84, -71.56, -70.5, 0.16)
    pt3dadd(199.89, -71.67, -70.5, 0.16)
    pt3dadd(199.94, -71.77, -70.5, 0.16)
    pt3dadd(200.63, -72.61, -72, 1.31)
    pt3dadd(201.78, -73.34, -71.5, 0.16)
    pt3dadd(201.94, -73.4, -71.5, 0.16)
    pt3dadd(201.99, -73.51, -71.5, 0.16)
    pt3dadd(202.1, -73.56, -71.5, 0.16)
    pt3dadd(202.25, -73.56, -71.5, 0.16)
    pt3dadd(202.36, -73.61, -71.5, 0.16)
    pt3dadd(202.46, -73.67, -71.5, 0.16)
    pt3dadd(202.57, -73.72, -71.5, 0.16)
    pt3dadd(202.73, -73.88, -71.5, 0.16)
    pt3dadd(202.88, -73.98, -71.5, 0.16)
    pt3dadd(202.99, -74.03, -71.5, 0.16)
    pt3dadd(203.09, -74.09, -71.5, 0.16)
    pt3dadd(203.2, -74.14, -71.5, 0.16)
    pt3dadd(203.3, -74.23, -71.5, 0.16)
    pt3dadd(203.46, -74.4, -71.5, 0.16)
    pt3dadd(203.57, -74.51, -71.5, 0.16)
    pt3dadd(203.62, -74.66, -71.5, 0.16)
    pt3dadd(203.67, -74.77, -71.5, 0.16)
    pt3dadd(203.78, -74.77, -71.5, 0.16)
    pt3dadd(203.88, -74.88, -71.5, 0.16)
    pt3dadd(204.04, -74.93, -71.5, 0.16)
    pt3dadd(204.14, -75.03, -71.5, 0.16)
    pt3dadd(204.25, -75.14, -71.5, 0.16)
    pt3dadd(204.35, -75.09, -71.5, 0.16)
    pt3dadd(204.51, -75.14, -71.5, 0.16)
    pt3dadd(204.62, -75.19, -71.5, 0.16)
    pt3dadd(204.83, -75.23, -71.5, 0.16)
    pt3dadd(205.56, -75.23, -71.5, 0.16)
    pt3dadd(205.77, -75.14, -71.5, 0.16)
    pt3dadd(205.93, -75.14, -71.5, 0.16)
    pt3dadd(206.03, -75.03, -71, 0.16)
    pt3dadd(206.14, -74.93, -71, 0.16)
    pt3dadd(206.3, -74.88, -71, 0.16)
    pt3dadd(206.4, -74.81, -71, 0.16)
    pt3dadd(206.56, -74.72, -71, 0.16)
    pt3dadd(206.77, -74.61, -71, 0.16)
    pt3dadd(206.93, -74.56, -71, 0.16)
    pt3dadd(207.14, -74.51, -71, 0.16)
    pt3dadd(207.24, -74.45, -71, 0.16)
    pt3dadd(207.4, -74.4, -71, 0.16)
    pt3dadd(207.61, -74.4, -71, 0.16)
    pt3dadd(207.77, -74.34, -71, 0.16)
    pt3dadd(208.03, -74.34, -71.5, 0.16)
    pt3dadd(208.13, -74.3, -72, 0.16)
    pt3dadd(208.29, -74.23, -72, 0.16)
    pt3dadd(208.45, -74.23, -72, 0.16)
    pt3dadd(208.55, -74.19, -72, 0.16)
    pt3dadd(208.71, -74.03, -72, 0.16)
    pt3dadd(208.82, -74.03, -72, 0.16)
    pt3dadd(208.92, -73.98, -72.5, 0.16)
    pt3dadd(209.03, -73.93, -72.5, 0.16)
    pt3dadd(209.24, -73.93, -72.5, 0.16)
    pt3dadd(209.39, -73.93, -72.5, 0.16)
    pt3dadd(209.55, -73.98, -72.5, 0.16)
    pt3dadd(210.13, -73.98, -72.5, 0.16)
    pt3dadd(210.23, -74.03, -72.5, 0.16)
    pt3dadd(210.44, -74.03, -72.5, 0.16)
    pt3dadd(210.6, -73.98, -72.5, 0.16)
    pt3dadd(210.81, -73.98, -72.5, 0.16)
    pt3dadd(210.92, -73.93, -72.5, 0.16)
    pt3dadd(211.02, -73.88, -72.5, 0.16)
    pt3dadd(211.18, -73.77, -72.5, 0.16)
    pt3dadd(211.28, -73.72, -72.5, 0.16)
    pt3dadd(211.39, -73.67, -72.5, 0.16)
    pt3dadd(211.49, -73.61, -72.5, 0.16)
    pt3dadd(211.6, -73.56, -72.5, 0.16)
    pt3dadd(211.7, -73.51, -72.5, 0.16)
    pt3dadd(211.86, -73.45, -72.5, 0.16)
    pt3dadd(211.97, -73.45, -72.5, 0.16)
    pt3dadd(212.02, -73.3, -72.5, 0.16)
    pt3dadd(212.12, -73.19, -72.5, 0.16)
    pt3dadd(212.49, -73.19, -72.5, 0.16)
    pt3dadd(212.6, -73.14, -72.5, 0.16)
    pt3dadd(212.7, -73.04, -72.5, 0.16)
    pt3dadd(212.86, -72.98, -72.5, 0.16)
    pt3dadd(212.96, -72.88, -72.5, 0.16)
    pt3dadd(213.07, -72.88, -72.5, 0.16)
    pt3dadd(213.23, -72.83, -72.5, 0.16)
    pt3dadd(213.33, -72.72, -72.5, 0.16)
    pt3dadd(213.54, -72.72, -72.5, 0.16)
    pt3dadd(214.8, -72.3, -72.5, 0.94)
    pt3dadd(214.85, -72.19, -72.5, 0.94)
    pt3dadd(215.71, -71.88, -71, 0.26)
    pt3dadd(216.5, -71.88, -71, 1)
    pt3dadd(217.13, -71.3, -70, 0.16)
    pt3dadd(217.07, -71.09, -70, 0.16)
    pt3dadd(217.07, -70.88, -70, 0.16)
    pt3dadd(217.18, -70.62, -70, 0.16)
    pt3dadd(217.23, -70.51, -69.5, 0.16)
    pt3dadd(217.34, -70.41, -69.5, 0.16)
    pt3dadd(217.49, -70.36, -69.5, 0.16)
    pt3dadd(217.6, -70.25, -69.5, 0.16)
    pt3dadd(217.76, -70.2, -69.5, 0.16)
    pt3dadd(217.97, -70.09, -69.5, 0.16)
    pt3dadd(218.12, -69.98, -69.5, 0.16)
    pt3dadd(218.23, -69.83, -69.5, 0.16)
    pt3dadd(218.23, -69.36, -69.5, 0.16)
    pt3dadd(218.12, -69.36, -69.5, 0.16)
    pt3dadd(218.02, -69.2, -69.5, 0.16)
    pt3dadd(217.91, -69.09, -69.5, 0.16)
    pt3dadd(217.86, -68.94, -69.5, 0.16)
    pt3dadd(217.76, -68.73, -70, 0.16)
    pt3dadd(217.65, -68.73, -70, 0.16)
    pt3dadd(218.39, -68.62, -69.5, 0.89)
    pt3dadd(218.44, -67.78, -69, 0.16)
    pt3dadd(218.54, -67.73, -69, 0.16)
    pt3dadd(218.54, -67.56, -69, 0.16)
    pt3dadd(218.6, -67.45, -69, 0.16)
    pt3dadd(218.81, -67.31, -69, 0.16)
    pt3dadd(218.96, -67.25, -68.5, 0.16)
    pt3dadd(219.22, -67.25, -68.5, 0.16)
    pt3dadd(219.33, -67.15, -68.5, 0.16)
    pt3dadd(219.43, -67.09, -68.5, 0.16)
    pt3dadd(219.43, -66.52, -68.5, 0.16)
    pt3dadd(219.38, -66.36, -68.5, 0.16)
    pt3dadd(219.38, -66.25, -68.5, 0.16)
    pt3dadd(219.33, -66.09, -68.5, 0.16)
    pt3dadd(219.33, -65.98, -68.5, 0.16)
    pt3dadd(219.43, -65.83, -68.5, 0.16)
    pt3dadd(219.49, -65.73, -68.5, 0.16)
    pt3dadd(219.59, -65.56, -68.5, 0.16)
    pt3dadd(219.64, -65.41, -68.5, 0.16)
    pt3dadd(219.7, -65.31, -68.5, 0.16)
    pt3dadd(219.8, -65.15, -68.5, 0.16)
    pt3dadd(220.22, -64.41, -68, 0.63)
    pt3dadd(220.48, -63.84, -68, 0.1)
    pt3dadd(220.59, -63.78, -68, 0.1)
    pt3dadd(220.69, -63.68, -68, 0.1)
    pt3dadd(220.8, -63.57, -68, 0.1)
    pt3dadd(220.9, -63.47, -68, 0.1)
    pt3dadd(221.01, -63.36, -68, 0.1)
    pt3dadd(221.06, -63.21, -68, 0.1)
    pt3dadd(221.17, -63.21, -68, 0.1)
    pt3dadd(221.38, -63.1, -68, 0.1)
    pt3dadd(221.53, -63.05, -68, 0.1)
    pt3dadd(221.64, -63.05, -68, 0.1)
    pt3dadd(221.74, -62.94, -68, 0.1)
    pt3dadd(221.9, -62.89, -68, 0.1)
    pt3dadd(222.01, -62.84, -67.5, 0.1)
    pt3dadd(222.16, -62.68, -67.5, 0.1)
    pt3dadd(222.32, -62.68, -67.5, 0.1)
    pt3dadd(222.43, -62.63, -67.5, 0.1)
    pt3dadd(222.73, -62.83, -67.5, 0.79)
    pt3dadd(223.57, -62.83, -67.5, 0.79)
    pt3dadd(223.67, -62.89, -67.5, 0.79)
    pt3dadd(223.78, -62.89, -67.5, 0.79)
    pt3dadd(224.67, -62.41, -67.5, 0.26)
    pt3dadd(225.88, -62.05, -68.5, 0.68)
    pt3dadd(226.72, -62.26, -69, 0.16)
    pt3dadd(226.77, -62.2, -68.5, 0.16)
    pt3dadd(226.93, -62.15, -68.5, 0.16)
    pt3dadd(227.09, -62.1, -68.5, 0.16)
    pt3dadd(227.19, -62.05, -68.5, 0.16)
    pt3dadd(227.3, -61.99, -68.5, 0.16)
    pt3dadd(227.45, -61.94, -68.5, 0.16)
    pt3dadd(227.56, -61.94, -68.5, 0.16)
    pt3dadd(227.77, -61.84, -68.5, 0.16)
    pt3dadd(227.87, -61.78, -68, 0.16)
    pt3dadd(228.14, -61.78, -68, 0.16)
    pt3dadd(228.29, -61.73, -68, 0.16)
    pt3dadd(228.45, -61.73, -68, 0.16)
    pt3dadd(228.56, -61.78, -68, 0.16)
    pt3dadd(228.82, -61.78, -68, 0.16)
  }
  axon[28] {pt3dclear()
    pt3dadd(228.82, -61.78, -68, 0.16)
    pt3dadd(229.29, -61.63, -67.5, 0.16)
    pt3dadd(229.34, -61.47, -67, 0.16)
    pt3dadd(229.34, -61.26, -66.5, 0.16)
    pt3dadd(229.4, -61.1, -66.5, 0.16)
    pt3dadd(229.4, -60.89, -66.5, 0.16)
    pt3dadd(229.45, -60.73, -66.5, 0.16)
    pt3dadd(229.5, -60.52, -66.5, 0.16)
    pt3dadd(229.5, -60, -66.5, 0.16)
    pt3dadd(229.45, -59.89, -66.5, 0.16)
    pt3dadd(229.4, -59.79, -66.5, 0.16)
    pt3dadd(229.34, -59.68, -66.5, 0.16)
    pt3dadd(229.24, -59.58, -66.5, 0.16)
    pt3dadd(229.03, -59.58, -66.5, 0.16)
    pt3dadd(228.87, -59.52, -66.5, 0.16)
    pt3dadd(228.66, -59.47, -66.5, 0.16)
    pt3dadd(228.5, -59.37, -66.5, 0.16)
    pt3dadd(228.24, -59.42, -66, 0.63)
    pt3dadd(227.3, -58.73, -66, 0.16)
    pt3dadd(227.19, -58.31, -64.5, 0.68)
  }
  axon[29] {pt3dclear()
    pt3dadd(228.82, -61.78, -68, 0.16)
    pt3dadd(229.4, -61.84, -68.5, 0.16)
    pt3dadd(229.66, -61.84, -68.5, 0.16)
    pt3dadd(229.92, -61.78, -68.5, 0.16)
    pt3dadd(230.03, -61.89, -69, 0.16)
    pt3dadd(230.34, -62.36, -69, 0.63)
    pt3dadd(230.45, -62.47, -69, 0.63)
    pt3dadd(230.55, -62.57, -69, 0.63)
    pt3dadd(230.66, -62.62, -69, 0.63)
    pt3dadd(230.81, -62.68, -69, 0.63)
    pt3dadd(230.81, -62.78, -69, 0.63)
    pt3dadd(230.92, -62.89, -69, 0.63)
    pt3dadd(231.02, -62.94, -69, 0.63)
    pt3dadd(231.08, -63.05, -69, 0.63)
    pt3dadd(231.92, -63.15, -69.5, 0.16)
    pt3dadd(232.07, -63.2, -69.5, 0.16)
    pt3dadd(232.23, -63.31, -69.5, 0.16)
    pt3dadd(232.39, -63.31, -69.5, 0.16)
    pt3dadd(232.44, -63.47, -69.5, 0.16)
    pt3dadd(232.6, -63.47, -69.5, 0.16)
    pt3dadd(232.76, -63.52, -69.5, 0.16)
    pt3dadd(233.23, -63.52, -69.5, 0.16)
    pt3dadd(233.39, -63.52, -69, 0.16)
    pt3dadd(233.54, -63.47, -69, 0.16)
    pt3dadd(233.75, -63.36, -69, 0.16)
    pt3dadd(234.02, -63.41, -69, 0.16)
    pt3dadd(234.23, -63.36, -69, 0.16)
    pt3dadd(234.33, -63.26, -69, 0.16)
    pt3dadd(234.44, -63.2, -69, 0.16)
    pt3dadd(234.54, -63.1, -69, 0.16)
    pt3dadd(234.65, -62.99, -69, 0.16)
    pt3dadd(234.75, -62.89, -69, 0.16)
    pt3dadd(234.96, -62.68, -69, 0.16)
    pt3dadd(235.07, -62.57, -69, 0.16)
    pt3dadd(235.22, -62.47, -69, 0.16)
    pt3dadd(235.33, -62.41, -69, 0.16)
    pt3dadd(235.49, -62.31, -69, 0.16)
    pt3dadd(235.59, -62.36, -69, 0.16)
    pt3dadd(235.96, -62.36, -69, 0.16)
    pt3dadd(236.33, -62.31, -69, 0.16)
    pt3dadd(236.75, -62.31, -69, 0.16)
    pt3dadd(236.89, -62.22, -69, 0.63)
    pt3dadd(237.52, -62.59, -69, 0.89)
  }
  axon[30] {pt3dclear()
    pt3dadd(-13.06, -82.45, -37.5, 0.63)
    pt3dadd(-12.6, -82.53, -37, 0.16)
    pt3dadd(-12.5, -82.58, -37, 0.16)
    pt3dadd(-12.5, -82.74, -37, 0.16)
    pt3dadd(-12.34, -82.9, -37, 0.16)
    pt3dadd(-12.18, -83, -37, 0.16)
    pt3dadd(-12.08, -82.84, -37, 0.16)
    pt3dadd(-12.02, -82.69, -37.5, 0.16)
    pt3dadd(-11.92, -82.58, -37.5, 0.16)
  }
}
proc shape3d_85() {
  axon[30] {
    pt3dadd(-11.81, -82.42, -37.5, 0.16)
    pt3dadd(-11.66, -82.32, -38, 0.16)
    pt3dadd(-11.6, -82.16, -38, 0.16)
    pt3dadd(-11.5, -81.95, -38, 0.16)
    pt3dadd(-11.34, -81.9, -38.5, 0.16)
    pt3dadd(-11.03, -81.9, -38.5, 0.16)
    pt3dadd(-10.92, -81.84, -38.5, 0.16)
    pt3dadd(-10.76, -81.73, -39, 0.16)
    pt3dadd(-10.66, -81.84, -39.5, 0.16)
    pt3dadd(-10.55, -81.84, -39.5, 0.16)
    pt3dadd(-10.5, -81.9, -40, 0.16)
    pt3dadd(-10.5, -82.05, -40, 0.16)
    pt3dadd(-10.4, -82.11, -40, 0.16)
    pt3dadd(-10.29, -82.27, -40, 0.16)
    pt3dadd(-10.24, -82.32, -40.5, 0.16)
    pt3dadd(-10.24, -82.42, -40.5, 0.16)
    pt3dadd(-10.24, -82.58, -40.5, 0.16)
    pt3dadd(-10.24, -82.79, -40.5, 0.16)
    pt3dadd(-10.19, -82.9, -40.5, 0.16)
    pt3dadd(-10.08, -83.05, -40.5, 0.16)
    pt3dadd(-10.02, -83.16, -40.5, 0.16)
    pt3dadd(-9.28, -83.68, -40.5, 0.73)
    pt3dadd(-9.28, -84.53, -40.5, 0.16)
    pt3dadd(-9.24, -84.68, -40.5, 0.16)
    pt3dadd(-9.14, -84.79, -41, 0.16)
    pt3dadd(-8.98, -84.84, -41, 0.16)
    pt3dadd(-8.86, -84.95, -41, 0.16)
    pt3dadd(-8.77, -85.05, -41, 0.16)
    pt3dadd(-8.66, -85.16, -41, 0.16)
    pt3dadd(-8.51, -85.21, -41, 0.16)
    pt3dadd(-8.4, -85.31, -41, 0.16)
    pt3dadd(-8.3, -85.37, -41, 0.16)
    pt3dadd(-8.14, -85.52, -41, 0.16)
    pt3dadd(-8.02, -85.52, -41, 0.16)
    pt3dadd(-7.72, -85.52, -41, 0.16)
    pt3dadd(-7.61, -85.58, -41, 0.16)
  }
  axon[31] {pt3dclear()
    pt3dadd(-7.61, -85.58, -41, 0.16)
    pt3dadd(-7.3, -84.95, -41, 0.16)
    pt3dadd(-6.72, -84.95, -41.5, 0.16)
    pt3dadd(-6.56, -84.89, -41.5, 0.16)
    pt3dadd(-6.2, -84.89, -41.5, 0.16)
    pt3dadd(-5.99, -84.79, -41.5, 0.16)
    pt3dadd(-5.83, -84.58, -41.5, 0.16)
    pt3dadd(-5.51, -84.47, -41.5, 0.63)
    pt3dadd(-5.25, -85.05, -42, 0.16)
    pt3dadd(-5.04, -85.1, -42, 0.16)
    pt3dadd(-4.94, -85.21, -42, 0.16)
    pt3dadd(-4.78, -85.21, -42, 0.16)
    pt3dadd(-4.78, -85.31, -42, 0.16)
    pt3dadd(-4.51, -85.31, -41.5, 0.16)
    pt3dadd(-4.51, -85.52, -41, 0.16)
    pt3dadd(-4.46, -85.63, -41.5, 0.16)
    pt3dadd(-4.41, -85.73, -42.5, 0.16)
    pt3dadd(-3.73, -87, -43, 1.05)
    pt3dadd(-2.94, -87.21, -43.5, 0.16)
    pt3dadd(-2.78, -87.36, -43.5, 0.16)
    pt3dadd(-2.78, -87.57, -43.5, 0.16)
    pt3dadd(-2.73, -87.68, -44, 0.16)
    pt3dadd(-2.68, -87.78, -44, 0.16)
    pt3dadd(-2.57, -87.89, -44.5, 0.16)
    pt3dadd(-2.52, -88.05, -44.5, 0.16)
    pt3dadd(-2.25, -88.15, -44.5, 0.16)
    pt3dadd(-2.15, -88.21, -44.5, 0.16)
    pt3dadd(-2.1, -88.31, -44.5, 0.16)
    pt3dadd(-1.83, -88.1, -44.5, 0.16)
  }
  axon[32] {pt3dclear()
    pt3dadd(-1.83, -88.1, -44.5, 0.16)
    pt3dadd(-1.79, -88.31, -44.5, 0.16)
    pt3dadd(-1.84, -88.42, -44.5, 0.16)
    pt3dadd(-1.73, -88.52, -44.5, 0.16)
    pt3dadd(-1.63, -88.63, -44.5, 0.16)
    pt3dadd(-1.37, -88.73, -45, 0.16)
    pt3dadd(-1.31, -88.84, -45, 0.16)
    pt3dadd(-1, -88.84, -45, 0.16)
    pt3dadd(-0.16, -88.99, -45.5, 0.58)
    pt3dadd(0.68, -88.94, -45.5, 0.16)
    pt3dadd(0.79, -88.99, -46.5, 0.16)
    pt3dadd(0.89, -89.1, -47, 0.16)
    pt3dadd(1, -89.05, -47, 0.16)
    pt3dadd(1.1, -88.94, -47, 0.16)
    pt3dadd(1.2, -88.84, -47, 0.16)
    pt3dadd(1.41, -88.73, -47.5, 0.16)
    pt3dadd(1.52, -88.68, -47.5, 0.16)
    pt3dadd(1.78, -88.68, -47.5, 0.16)
    pt3dadd(1.99, -88.63, -48, 0.16)
    pt3dadd(2.15, -88.68, -48, 0.16)
    pt3dadd(2.36, -88.68, -48, 0.16)
    pt3dadd(2.52, -88.63, -48, 0.16)
    pt3dadd(2.73, -88.63, -48, 0.16)
    pt3dadd(3.78, -88.78, -47, 1)
    pt3dadd(3.78, -88.94, -47, 1)
    pt3dadd(3.83, -89.05, -47.5, 1)
    pt3dadd(4.25, -89.84, -47.5, 0.26)
    pt3dadd(4.72, -90.2, -48, 0.63)
    pt3dadd(5.19, -90.57, -48.5, 0.16)
    pt3dadd(5.35, -90.62, -48.5, 0.16)
    pt3dadd(5.51, -90.78, -48.5, 0.16)
    pt3dadd(5.61, -90.78, -48.5, 0.16)
    pt3dadd(5.72, -90.83, -48.5, 0.16)
    pt3dadd(5.88, -90.83, -49, 0.16)
    pt3dadd(6.03, -90.78, -49, 0.16)
    pt3dadd(6.14, -90.73, -49, 0.16)
    pt3dadd(6.35, -90.73, -49.5, 0.16)
    pt3dadd(6.51, -90.78, -49.5, 0.16)
    pt3dadd(6.72, -90.73, -49.5, 0.16)
    pt3dadd(6.77, -90.83, -49.5, 0.16)
    pt3dadd(6.87, -90.78, -49.5, 0.16)
    pt3dadd(7.66, -91.2, -49.5, 1.15)
    pt3dadd(7.77, -91.2, -49.5, 1.15)
    pt3dadd(9.13, -91.57, -51, 0.16)
    pt3dadd(9.24, -91.68, -51.5, 0.16)
    pt3dadd(9.34, -91.68, -52, 0.16)
    pt3dadd(9.5, -91.83, -52, 0.16)
    pt3dadd(9.6, -91.94, -52, 0.16)
    pt3dadd(9.6, -92.04, -52, 0.16)
    pt3dadd(9.92, -92.1, -52.5, 0.16)
    pt3dadd(10.13, -91.99, -52.5, 0.16)
    pt3dadd(10.29, -91.94, -52.5, 0.16)
    pt3dadd(10.5, -91.94, -52.5, 0.16)
    pt3dadd(10.65, -91.89, -52.5, 0.16)
    pt3dadd(10.81, -91.94, -52.5, 0.16)
    pt3dadd(10.86, -92.04, -52.5, 0.16)
    pt3dadd(11.02, -92.1, -52.5, 0.16)
    pt3dadd(11.13, -92.31, -52.5, 0.16)
    pt3dadd(11.23, -92.46, -52.5, 0.16)
    pt3dadd(11.49, -92.83, -52.5, 0.58)
    pt3dadd(11.7, -92.83, -52.5, 0.58)
    pt3dadd(12.28, -93.25, -53, 0.16)
    pt3dadd(12.6, -93.25, -53, 0.16)
    pt3dadd(12.7, -93.36, -53, 0.16)
    pt3dadd(12.81, -93.41, -53, 0.16)
    pt3dadd(12.91, -93.41, -53.5, 0.16)
    pt3dadd(13.02, -93.52, -53.5, 0.16)
    pt3dadd(13.23, -93.62, -53.5, 0.16)
    pt3dadd(13.38, -93.62, -53.5, 0.16)
    pt3dadd(13.49, -93.67, -54, 0.16)
    pt3dadd(13.86, -93.67, -54, 0.16)
    pt3dadd(14.01, -93.73, -54, 0.16)
    pt3dadd(14.12, -93.73, -54, 0.16)
    pt3dadd(14.22, -93.67, -54.5, 0.16)
    pt3dadd(14.33, -93.67, -54.5, 0.16)
    pt3dadd(14.43, -93.62, -54.5, 0.16)
    pt3dadd(14.54, -93.57, -54.5, 0.16)
    pt3dadd(14.64, -93.46, -54.5, 0.16)
    pt3dadd(14.8, -93.46, -54.5, 0.16)
    pt3dadd(15.96, -92.99, -54.5, 0.84)
    pt3dadd(17.01, -93.62, -55, 0.16)
    pt3dadd(17.11, -93.57, -55, 0.16)
    pt3dadd(17.27, -93.52, -55, 0.16)
    pt3dadd(17.37, -93.57, -55, 0.16)
    pt3dadd(17.57, -93.57, -55, 0.16)
    pt3dadd(17.69, -93.62, -55, 0.16)
    pt3dadd(17.79, -93.67, -55, 0.16)
    pt3dadd(17.89, -93.73, -55, 0.16)
    pt3dadd(18.16, -93.83, -55, 0.16)
    pt3dadd(18.27, -93.88, -55, 0.16)
    pt3dadd(18.48, -93.88, -55, 0.16)
    pt3dadd(18.69, -94.04, -55, 0.16)
    pt3dadd(18.84, -94.15, -55, 0.16)
    pt3dadd(18.95, -94.15, -55, 0.16)
    pt3dadd(19.05, -94.25, -55, 0.16)
    pt3dadd(19.16, -94.3, -55, 0.16)
    pt3dadd(19.21, -94.41, -55, 0.16)
    pt3dadd(19.32, -94.51, -55, 0.16)
    pt3dadd(19.37, -94.62, -55, 0.16)
    pt3dadd(19.47, -94.72, -55, 0.16)
    pt3dadd(20.88, -93.91, -55.5, 1.15)
    pt3dadd(20.99, -93.81, -55.5, 1.15)
    pt3dadd(21.2, -93.75, -55.5, 1.15)
    pt3dadd(21.3, -93.86, -55.5, 1.15)
    pt3dadd(21.41, -93.86, -55.5, 1.15)
    pt3dadd(21.57, -93.91, -55.5, 1.15)
    pt3dadd(21.67, -94.02, -55.5, 1.15)
    pt3dadd(21.88, -94.12, -55.5, 1.15)
    pt3dadd(23.3, -94.07, -55.5, 0.16)
    pt3dadd(23.4, -94.12, -55.5, 0.16)
    pt3dadd(23.61, -94.12, -55.5, 0.16)
    pt3dadd(23.77, -94.12, -55.5, 0.16)
    pt3dadd(23.98, -94.12, -55.5, 0.16)
    pt3dadd(24.09, -94.07, -55.5, 0.16)
    pt3dadd(25.24, -94.91, -55.5, 0.84)
    pt3dadd(25.24, -94.91, -56, 0.84)
  }
  axon[33] {pt3dclear()
    pt3dadd(-1.83, -88.1, -44.5, 0.16)
    pt3dadd(-1.36, -88.2, -44.5, 0.16)
    pt3dadd(-1.26, -88.26, -45.5, 0.16)
    pt3dadd(-1.14, -88.36, -46, 0.16)
    pt3dadd(-0.84, -88.36, -46, 0.16)
    pt3dadd(-0.68, -88.26, -47.5, 0.16)
    pt3dadd(0.11, -87.94, -48.5, 0.16)
    pt3dadd(0.26, -87.89, -49, 0.16)
    pt3dadd(0.47, -87.78, -49, 0.16)
    pt3dadd(0.63, -87.78, -49, 0.16)
    pt3dadd(0.74, -87.89, -49, 0.16)
    pt3dadd(0.84, -87.94, -49, 0.16)
    pt3dadd(1, -87.99, -49, 0.16)
    pt3dadd(1.1, -88.05, -49, 0.16)
    pt3dadd(1.21, -88.1, -49, 0.16)
    pt3dadd(1.73, -88.1, -49, 0.16)
    pt3dadd(1.84, -88.05, -48.5, 0.16)
    pt3dadd(2, -87.99, -48.5, 0.16)
    pt3dadd(2.36, -87.99, -47, 0.16)
    pt3dadd(2.47, -88.2, -47, 0.16)
    pt3dadd(2.89, -88.2, -48.5, 0.16)
    pt3dadd(3.05, -88.15, -49, 0.16)
    pt3dadd(3.26, -88.15, -50, 0.16)
    pt3dadd(3.36, -88.26, -50, 0.16)
    pt3dadd(3.41, -88.47, -50, 0.16)
    pt3dadd(3.52, -88.57, -50.5, 0.16)
    pt3dadd(3.47, -88.78, -50.5, 0.16)
    pt3dadd(3.52, -88.94, -51, 0.16)
    pt3dadd(3.62, -89.04, -51, 0.16)
    pt3dadd(3.68, -89.2, -51, 0.16)
    pt3dadd(3.89, -89.31, -51, 0.16)
    pt3dadd(4.04, -89.41, -51, 0.16)
    pt3dadd(4.15, -89.47, -51, 0.16)
    pt3dadd(4.36, -89.47, -51, 0.16)
    pt3dadd(4.46, -89.25, -51, 0.16)
    pt3dadd(4.62, -89.25, -51, 0.16)
    pt3dadd(4.67, -89.2, -51.5, 0.16)
    pt3dadd(5.41, -89.1, -51.5, 0.79)
    pt3dadd(5.41, -88.89, -51.5, 0.79)
    pt3dadd(5.36, -87.84, -51.5, 0.1)
    pt3dadd(6.67, -87.68, -52, 0.79)
    pt3dadd(6.83, -87.68, -52.5, 0.79)
    pt3dadd(8.19, -88.1, -51.5, 0.16)
    pt3dadd(8.44, -88.1, -51.5, 0.16)
    pt3dadd(8.56, -88.2, -50.5, 0.16)
    pt3dadd(8.66, -88.26, -50.5, 0.16)
    pt3dadd(8.82, -88.31, -50.5, 0.16)
    pt3dadd(9.02, -88.31, -50.5, 0.16)
    pt3dadd(9.19, -88.36, -50.5, 0.16)
    pt3dadd(9.4, -88.47, -51, 0.16)
    pt3dadd(9.56, -88.52, -51, 0.16)
    pt3dadd(9.77, -88.52, -52, 0.16)
    pt3dadd(9.92, -88.57, -52, 0.16)
    pt3dadd(10.13, -88.52, -52.5, 0.16)
    pt3dadd(10.24, -88.52, -53, 0.16)
    pt3dadd(10.4, -88.52, -53, 0.16)
    pt3dadd(10.66, -88.52, -53.5, 0.16)
    pt3dadd(10.76, -88.68, -53.5, 0.16)
    pt3dadd(10.92, -88.68, -53.5, 0.16)
    pt3dadd(11.08, -88.83, -53.5, 0.16)
    pt3dadd(11.18, -88.83, -54, 0.16)
    pt3dadd(11.34, -88.99, -54, 0.16)
    pt3dadd(11.45, -89.1, -54, 0.16)
    pt3dadd(11.6, -89.2, -54, 0.16)
    pt3dadd(11.76, -89.36, -54, 0.16)
    pt3dadd(11.87, -89.47, -54, 0.16)
    pt3dadd(11.97, -89.47, -54, 0.16)
    pt3dadd(12.08, -89.52, -54, 0.16)
  }
}
proc shape3d_86() {
  axon[33] {
    pt3dadd(12.23, -89.57, -54, 0.16)
    pt3dadd(12.34, -89.73, -54, 0.16)
    pt3dadd(12.44, -89.78, -54, 0.16)
    pt3dadd(12.55, -89.83, -54, 0.16)
    pt3dadd(13.23, -90.31, -52.5, 0.89)
  }
  axon[34] {pt3dclear()
    pt3dadd(-7.61, -85.58, -41, 0.16)
    pt3dadd(-7.25, -85.69, -41.5, 0.16)
    pt3dadd(-7.14, -85.75, -41.5, 0.16)
    pt3dadd(-6.93, -85.75, -41.5, 0.16)
    pt3dadd(-6.83, -85.8, -41.5, 0.16)
    pt3dadd(-6.62, -85.85, -41.5, 0.16)
    pt3dadd(-6.46, -85.85, -41.5, 0.16)
    pt3dadd(-6.25, -85.91, -41, 0.16)
    pt3dadd(-5.51, -85.85, -41, 0.63)
    pt3dadd(-3.57, -85.91, -42.5, 0.16)
    pt3dadd(-3.47, -85.96, -42.5, 0.16)
    pt3dadd(-3.31, -85.96, -42.5, 0.16)
    pt3dadd(-3.15, -86.12, -42.5, 0.16)
    pt3dadd(-3.05, -86.22, -42.5, 0.16)
    pt3dadd(-2.94, -86.38, -42.5, 0.16)
    pt3dadd(-2.84, -86.54, -42.5, 0.16)
    pt3dadd(-2.73, -86.9, -43, 0.63)
    pt3dadd(-2.63, -86.9, -43, 0.63)
  }
  axon[35] {pt3dclear()
    pt3dadd(-22.53, 11.33, -26, 0.21)
    pt3dadd(-22.58, 11.86, -26, 0.31)
    pt3dadd(-22.63, 12.01, -26, 0.31)
    pt3dadd(-22.68, 12.12, -26, 0.31)
    pt3dadd(-22.79, 12.38, -26, 0.31)
    pt3dadd(-22.84, 12.59, -26, 0.31)
    pt3dadd(-22.94, 12.8, -26, 0.31)
    pt3dadd(-22.94, 13.01, -26, 0.31)
    pt3dadd(-23, 13.28, -26, 0.31)
    pt3dadd(-23.05, 13.49, -26, 0.31)
    pt3dadd(-23.05, 13.75, -26, 0.31)
    pt3dadd(-23.1, 13.96, -26, 0.31)
    pt3dadd(-23.05, 14.22, -26, 0.31)
    pt3dadd(-23, 14.38, -26, 0.31)
    pt3dadd(-23, 14.7, -26, 0.31)
    pt3dadd(-22.79, 15.01, -26.5, 0.1)
    pt3dadd(-22.89, 15.27, -26.5, 0.1)
    pt3dadd(-22.89, 15.43, -26.5, 0.1)
    pt3dadd(-22.94, 15.54, -27, 0.1)
    pt3dadd(-23, 15.69, -27, 0.1)
    pt3dadd(-23.1, 15.8, -27, 0.1)
    pt3dadd(-23.21, 15.9, -27, 0.1)
    pt3dadd(-23.31, 16.05, -27, 0.1)
    pt3dadd(-23.42, 16.17, -27, 0.1)
    pt3dadd(-23.52, 16.27, -27, 0.1)
    pt3dadd(-23.47, 16.43, -27, 0.1)
  }
  axon[36] {pt3dclear()
    pt3dadd(-23.47, 16.43, -27, 0.1)
    pt3dadd(-23.47, 16.75, -26.5, 0.1)
    pt3dadd(-23.36, 16.89, -26.5, 0.1)
    pt3dadd(-23.26, 17.05, -26, 0.1)
    pt3dadd(-23.26, 17.17, -26, 0.1)
    pt3dadd(-23.21, 17.27, -26, 0.1)
    pt3dadd(-23.05, 17.43, -26, 0.1)
    pt3dadd(-23, 17.64, -26, 0.1)
    pt3dadd(-22.89, 17.85, -26, 0.1)
    pt3dadd(-22.84, 18.01, -26, 0.1)
    pt3dadd(-22.84, 18.22, -26, 0.1)
    pt3dadd(-22.73, 18.32, -26, 0.1)
    pt3dadd(-22.58, 18.48, -26.5, 0.1)
    pt3dadd(-22.47, 18.59, -26.5, 0.1)
    pt3dadd(-22.21, 18.64, -26.5, 0.1)
    pt3dadd(-21.95, 18.89, -26.5, 0.1)
    pt3dadd(-21.74, 19.01, -26.5, 0.1)
    pt3dadd(-21.47, 19.16, -27, 0.1)
    pt3dadd(-21.32, 19.32, -27, 0.1)
    pt3dadd(-21.16, 19.43, -27, 0.1)
    pt3dadd(-21.05, 19.53, -27, 0.1)
    pt3dadd(-20.95, 19.64, -27, 0.1)
    pt3dadd(-20.84, 19.79, -27, 0.1)
    pt3dadd(-20.79, 19.95, -27, 0.1)
    pt3dadd(-20.69, 20.11, -27.5, 0.1)
    pt3dadd(-20.63, 20.22, -27.5, 0.1)
    pt3dadd(-20.58, 20.43, -27.5, 0.1)
    pt3dadd(-20.53, 20.53, -27.5, 0.1)
    pt3dadd(-20.48, 20.69, -27.5, 0.1)
    pt3dadd(-20.42, 20.79, -27.5, 0.1)
    pt3dadd(-20.32, 20.95, -27.5, 0.1)
    pt3dadd(-20.21, 21.11, -27.5, 0.1)
    pt3dadd(-20, 21.27, -27.5, 0.1)
    pt3dadd(-19.85, 21.32, -27.5, 0.1)
    pt3dadd(-19.73, 21.42, -27.5, 0.1)
    pt3dadd(-19.64, 21.53, -27.5, 0.1)
    pt3dadd(-19.48, 21.63, -27.5, 0.1)
    pt3dadd(-19.43, 21.79, -27, 0.1)
    pt3dadd(-19.27, 21.79, -27, 0.1)
    pt3dadd(-19.11, 21.84, -27, 0.1)
    pt3dadd(-19.05, 21.95, -27, 0.1)
    pt3dadd(-18.19, 22.29, -26, 0.1)
    pt3dadd(-18.14, 22.73, -26, 0.1)
    pt3dadd(-18.14, 22.89, -26.5, 0.1)
    pt3dadd(-18.1, 23.1, -26.5, 0.1)
    pt3dadd(-18.1, 23.36, -27, 0.1)
    pt3dadd(-18.05, 23.52, -27, 0.1)
    pt3dadd(-18.05, 23.68, -27, 0.1)
    pt3dadd(-18.1, 23.78, -27, 0.1)
    pt3dadd(-18, 23.68, -27.5, 0.1)
    pt3dadd(-17.89, 23.57, -28, 0.1)
    pt3dadd(-17.79, 23.47, -28, 0.1)
    pt3dadd(-17.73, 23.36, -28, 0.1)
    pt3dadd(-17.63, 23.26, -28, 0.1)
    pt3dadd(-17.52, 23.04, -28.5, 0.1)
    pt3dadd(-17.37, 22.89, -28.5, 0.1)
    pt3dadd(-17.21, 22.73, -28.5, 0.1)
    pt3dadd(-17, 22.68, -28.5, 0.1)
    pt3dadd(-16.84, 22.73, -28.5, 0.1)
    pt3dadd(-16.63, 22.83, -29, 0.1)
    pt3dadd(-16.63, 23.2, -29.5, 0.1)
    pt3dadd(-16.68, 23.36, -30, 0.1)
    pt3dadd(-16.73, 23.52, -30.5, 0.1)
    pt3dadd(-16.84, 23.68, -30.5, 0.1)
    pt3dadd(-16.95, 23.94, -32, 0.68)
    pt3dadd(-17.05, 23.83, -32.5, 0.68)
    pt3dadd(-17.16, 23.68, -32.5, 0.68)
    pt3dadd(-17.16, 23.47, -33, 0.68)
    pt3dadd(-17.3, 23.31, -33, 0.68)
    pt3dadd(-17.47, 23.26, -33, 0.68)
    pt3dadd(-17.68, 23.2, -33, 0.68)
    pt3dadd(-17.79, 23.26, -33, 0.68)
    pt3dadd(-17.94, 23.36, -33.5, 0.68)
    pt3dadd(-18.14, 23.36, -33.5, 0.68)
    pt3dadd(-17.94, 23.94, -34, 0.16)
    pt3dadd(-18.1, 23.94, -34.5, 0.16)
    pt3dadd(-18.14, 24.04, -34.5, 0.16)
    pt3dadd(-18.1, 24.25, -35, 0.16)
    pt3dadd(-18, 24.41, -35, 0.16)
    pt3dadd(-17.84, 24.36, -35, 0.16)
    pt3dadd(-17.57, 24.36, -35, 0.16)
    pt3dadd(-17.47, 24.41, -35, 0.16)
    pt3dadd(-17.37, 24.52, -35, 0.16)
    pt3dadd(-17.37, 24.67, -35.5, 0.16)
    pt3dadd(-17.42, 24.88, -35.5, 0.16)
    pt3dadd(-17.47, 24.94, -36, 0.16)
    pt3dadd(-17.57, 25.04, -36, 0.16)
    pt3dadd(-17.68, 25.04, -36.5, 0.16)
    pt3dadd(-18.3, 25.2, -36.5, 0.63)
    pt3dadd(-18.3, 25.1, -37, 0.63)
    pt3dadd(-18.47, 25.04, -37, 0.63)
    pt3dadd(-18.63, 25.15, -37.5, 0.63)
    pt3dadd(-18.89, 25.31, -37.5, 0.63)
    pt3dadd(-19.1, 25.78, -38, 0.16)
    pt3dadd(-19.05, 26.09, -38, 0.16)
    pt3dadd(-19.05, 26.46, -38, 0.16)
    pt3dadd(-19.1, 26.62, -38, 0.16)
    pt3dadd(-19.26, 26.57, -38.5, 0.16)
    pt3dadd(-19.36, 26.46, -38.5, 0.16)
    pt3dadd(-19.47, 26.36, -38.5, 0.16)
    pt3dadd(-19.57, 26.36, -38.5, 0.16)
    pt3dadd(-19.62, 26.2, -38.5, 0.16)
    pt3dadd(-19.82, 26.2, -39, 0.16)
    pt3dadd(-19.94, 26.04, -39, 0.16)
    pt3dadd(-20.04, 25.99, -39, 0.16)
    pt3dadd(-20.25, 25.99, -39, 0.16)
    pt3dadd(-21.15, 26.46, -40, 0.79)
    pt3dadd(-21.83, 26.51, -39.5, 0.16)
    pt3dadd(-21.83, 26.62, -39.5, 0.16)
    pt3dadd(-22.09, 26.62, -40, 0.16)
    pt3dadd(-22.2, 26.78, -40, 0.16)
    pt3dadd(-22.3, 26.83, -40, 0.16)
    pt3dadd(-22.35, 27.83, -40, 0.68)
    pt3dadd(-22.35, 27.88, -40.5, 0.68)
    pt3dadd(-22.25, 27.83, -40.5, 0.68)
    pt3dadd(-22.14, 27.78, -40.5, 0.68)
    pt3dadd(-22.04, 27.72, -40.5, 0.68)
    pt3dadd(-21.67, 27.83, -41, 0.21)
    pt3dadd(-20.83, 28.14, -41.5, 0.63)
    pt3dadd(-21.2, 28.62, -42, 0.16)
    pt3dadd(-21.36, 28.35, -42.5, 0.16)
    pt3dadd(-21.46, 28.25, -42.5, 0.16)
    pt3dadd(-22.14, 28.41, -45, 0.16)
  }
  axon[37] {pt3dclear()
    pt3dadd(-22.14, 28.41, -45, 0.16)
    pt3dadd(-21.25, 28.93, -46, 0.1)
    pt3dadd(-21.15, 28.99, -46, 0.1)
    pt3dadd(-21.04, 29.04, -46, 0.1)
    pt3dadd(-20.99, 29.14, -46, 0.1)
    pt3dadd(-20.88, 29.25, -46, 0.1)
    pt3dadd(-20.83, 29.35, -46, 0.1)
    pt3dadd(-20.78, 29.46, -46, 0.1)
    pt3dadd(-20.57, 29.62, -45.5, 0.84)
    pt3dadd(-20.52, 29.72, -45.5, 0.84)
    pt3dadd(-20.52, 29.93, -45.5, 0.84)
    pt3dadd(-20.36, 30.83, -46.5, 0.16)
    pt3dadd(-20.41, 30.98, -47, 0.16)
    pt3dadd(-20.41, 31.67, -47, 0.16)
    pt3dadd(-20.3, 31.72, -47, 0.16)
    pt3dadd(-20.25, 31.93, -47, 0.16)
    pt3dadd(-20.14, 32.03, -47, 0.16)
    pt3dadd(-20.1, 32.19, -47, 0.16)
    pt3dadd(-20.04, 32.29, -47, 0.16)
    pt3dadd(-19.89, 32.4, -47, 0.16)
    pt3dadd(-19.78, 32.51, -46.5, 0.16)
    pt3dadd(-19.57, 32.51, -46.5, 0.16)
    pt3dadd(-19.47, 32.65, -46.5, 0.16)
    pt3dadd(-19.36, 32.77, -46.5, 0.16)
    pt3dadd(-19.36, 33.51, -46, 0.16)
    pt3dadd(-19.2, 33.65, -46, 0.16)
    pt3dadd(-19.1, 33.77, -46, 0.16)
    pt3dadd(-18.94, 33.82, -46.5, 0.16)
    pt3dadd(-18.78, 33.86, -46.5, 0.16)
    pt3dadd(-18.57, 33.93, -46.5, 0.16)
    pt3dadd(-18.47, 33.93, -46.5, 0.16)
    pt3dadd(-18.36, 33.97, -46.5, 0.16)
    pt3dadd(-18, 33.97, -47.5, 0.16)
    pt3dadd(-17.84, 33.93, -47.5, 0.16)
    pt3dadd(-17.63, 33.86, -47.5, 0.16)
    pt3dadd(-17.52, 33.86, -47.5, 0.16)
    pt3dadd(-17.3, 33.65, -47.5, 0.94)
    pt3dadd(-16.53, 33.53, -48.5, 0.84)
    pt3dadd(-16.16, 34.32, -48.5, 0.16)
    pt3dadd(-16.21, 34.53, -49, 0.16)
    pt3dadd(-16.21, 34.69, -49, 0.16)
    pt3dadd(-16.26, 34.9, -49, 0.16)
    pt3dadd(-16.26, 35.04, -49, 0.16)
    pt3dadd(-16.16, 35.15, -49, 0.16)
    pt3dadd(-16.05, 35.21, -49.5, 0.16)
    pt3dadd(-15.79, 35.89, -49.5, 0.84)
    pt3dadd(-15.48, 36.26, -50, 0.16)
    pt3dadd(-15.32, 36.26, -50, 0.16)
    pt3dadd(-15.11, 36.31, -50, 0.16)
    pt3dadd(-14.95, 36.31, -50, 0.16)
    pt3dadd(-14.85, 36.21, -50, 0.16)
    pt3dadd(-14.69, 36.21, -50, 0.16)
    pt3dadd(-14.58, 36.15, -50, 0.16)
    pt3dadd(-14.48, 36.04, -50, 0.16)
    pt3dadd(-14.32, 36.21, -50, 0.16)
    pt3dadd(-14.22, 36.42, -50, 0.16)
    pt3dadd(-14.11, 36.58, -50.5, 0.16)
    pt3dadd(-14.01, 36.79, -50.5, 0.16)
    pt3dadd(-14.01, 37.04, -50.5, 0.16)
    pt3dadd(-14.11, 37.15, -50.5, 0.16)
    pt3dadd(-14.11, 37.68, -51, 0.16)
    pt3dadd(-13.8, 38.36, -51, 0.63)
    pt3dadd(-13.63, 38.72, -51, 0.16)
    pt3dadd(-13.58, 38.93, -51, 0.16)
    pt3dadd(-13.53, 39.09, -51, 0.16)
    pt3dadd(-13.47, 39.29, -51, 0.16)
    pt3dadd(-13.37, 39.29, -51, 0.16)
    pt3dadd(-13.21, 39.4, -51, 0.16)
    pt3dadd(-13.11, 39.46, -51, 0.16)
    pt3dadd(-12.42, 39.67, -51.5, 0.79)
    pt3dadd(-12.37, 39.88, -51.5, 0.79)
    pt3dadd(-12.27, 39.93, -52, 0.79)
    pt3dadd(-12.21, 40.04, -52, 0.79)
    pt3dadd(-11.85, 40.72, -52.5, 0.16)
    pt3dadd(-11.85, 40.82, -52.5, 0.16)
    pt3dadd(-11.74, 41.03, -52.5, 0.16)
    pt3dadd(-11.64, 41.3, -52.5, 0.16)
  }
}
proc shape3d_87() {
  axon[37] {
    pt3dadd(-11.53, 41.4, -52.5, 0.16)
    pt3dadd(-11.43, 41.51, -52.5, 0.16)
    pt3dadd(-11.32, 41.51, -52.5, 0.16)
    pt3dadd(-11.16, 41.67, -52.5, 0.16)
    pt3dadd(-11.11, 41.72, -53, 0.16)
    pt3dadd(-10.9, 41.98, -53, 0.16)
    pt3dadd(-10.85, 42.09, -53.5, 0.16)
    pt3dadd(-10.8, 42.24, -53.5, 0.16)
    pt3dadd(-10.8, 42.51, -54, 0.16)
    pt3dadd(-10.85, 42.72, -54, 0.16)
    pt3dadd(-10.85, 43.19, -54.5, 0.16)
    pt3dadd(-10.69, 43.35, -54.5, 0.16)
    pt3dadd(-10.64, 43.3, -55, 0.16)
    pt3dadd(-10.48, 43.4, -55, 0.16)
    pt3dadd(-10.43, 43.56, -55, 0.16)
    pt3dadd(-10.43, 43.87, -55, 0.16)
    pt3dadd(-10.38, 43.98, -55, 0.16)
    pt3dadd(-10.38, 44.19, -55, 0.16)
    pt3dadd(-10.32, 44.35, -55, 0.16)
    pt3dadd(-10.22, 44.45, -55.5, 0.16)
    pt3dadd(-10.11, 44.66, -56, 0.16)
    pt3dadd(-10.01, 44.77, -56, 0.16)
    pt3dadd(-9.9, 44.92, -56, 0.16)
    pt3dadd(-9.85, 45.24, -56.5, 0.79)
    pt3dadd(-9.85, 45.56, -56.5, 0.79)
    pt3dadd(-9.9, 45.71, -56.5, 0.79)
    pt3dadd(-9.9, 45.92, -56.5, 0.79)
    pt3dadd(-10.01, 45.92, -56.5, 0.79)
    pt3dadd(-10.43, 46.61, -56.5, 0.16)
    pt3dadd(-10.43, 46.87, -56.5, 0.16)
    pt3dadd(-10.38, 47.03, -56.5, 0.16)
    pt3dadd(-10.38, 47.5, -57, 0.16)
    pt3dadd(-10.32, 47.66, -57, 0.16)
    pt3dadd(-10.27, 47.87, -57, 0.16)
    pt3dadd(-10.27, 48.03, -57, 0.16)
    pt3dadd(-10.22, 48.24, -57, 0.16)
    pt3dadd(-10.11, 48.34, -57, 0.16)
    pt3dadd(-10.06, 48.45, -57, 0.16)
    pt3dadd(-9.85, 48.55, -57, 0.16)
    pt3dadd(-9.75, 48.66, -57, 0.16)
    pt3dadd(-9.75, 48.81, -57, 0.16)
    pt3dadd(-9.85, 48.92, -57, 0.16)
    pt3dadd(-9.9, 49.03, -57, 0.16)
    pt3dadd(-10.01, 49.18, -57, 0.16)
    pt3dadd(-10.32, 49.88, -57, 0.16)
    pt3dadd(-10.32, 50.25, -57, 0.16)
    pt3dadd(-10.27, 50.25, -57.5, 0.16)
    pt3dadd(-10.27, 50.56, -57.5, 0.16)
    pt3dadd(-10.32, 50.72, -57.5, 0.16)
    pt3dadd(-10.32, 51.14, -58, 0.16)
    pt3dadd(-10.37, 51.3, -58, 0.16)
    pt3dadd(-10.37, 51.93, -58, 0.16)
    pt3dadd(-10.48, 52.09, -58, 0.16)
    pt3dadd(-10.53, 52.19, -58, 0.16)
    pt3dadd(-10.69, 52.35, -58, 0.16)
    pt3dadd(-10.79, 52.51, -58, 0.16)
    pt3dadd(-11, 52.61, -58, 0.16)
    pt3dadd(-11.11, 52.72, -58, 0.16)
    pt3dadd(-11.26, 52.77, -58, 0.16)
    pt3dadd(-11.37, 52.88, -58, 0.16)
    pt3dadd(-11.47, 53.09, -58, 0.16)
    pt3dadd(-11.53, 53.19, -58, 0.16)
    pt3dadd(-11.58, 53.4, -58, 0.16)
    pt3dadd(-11.53, 53.67, -58, 0.16)
    pt3dadd(-11.47, 53.82, -58, 0.16)
    pt3dadd(-11.42, 53.98, -58, 0.16)
    pt3dadd(-11.32, 54.09, -58, 0.16)
    pt3dadd(-11.32, 54.24, -58, 0.16)
    pt3dadd(-11.16, 54.56, -58.5, 0.16)
    pt3dadd(-11.16, 54.93, -58.5, 0.16)
    pt3dadd(-11.21, 55.08, -58.5, 0.16)
    pt3dadd(-11.21, 55.19, -58.5, 0.16)
    pt3dadd(-11.26, 55.35, -58.5, 0.16)
    pt3dadd(-11.26, 55.77, -58.5, 0.16)
    pt3dadd(-11.11, 55.87, -58.5, 0.16)
    pt3dadd(-10.95, 56.03, -58.5, 0.16)
    pt3dadd(-10.84, 56.19, -59, 0.16)
    pt3dadd(-10.53, 57.35, -58.5, 0.84)
    pt3dadd(-10.53, 57.35, -59, 0.84)
    pt3dadd(-9.74, 57.56, -59.5, 0.16)
    pt3dadd(-9.69, 57.45, -59.5, 0.16)
    pt3dadd(-9.52, 57.45, -59.5, 0.16)
    pt3dadd(-9.32, 57.45, -59.5, 0.16)
    pt3dadd(-9.16, 57.5, -59.5, 0.16)
    pt3dadd(-9.11, 57.61, -59.5, 0.16)
    pt3dadd(-8.94, 57.77, -59.5, 0.16)
    pt3dadd(-8.9, 57.87, -60, 0.16)
    pt3dadd(-8.85, 57.98, -60, 0.16)
    pt3dadd(-8.85, 58.13, -60, 0.16)
    pt3dadd(-8.8, 58.34, -60, 0.16)
    pt3dadd(-8.85, 58.45, -60, 0.16)
    pt3dadd(-9.01, 58.45, -60, 0.16)
    pt3dadd(-9.06, 58.61, -60, 0.16)
    pt3dadd(-9.16, 58.66, -60, 0.16)
    pt3dadd(-9.32, 58.71, -60, 0.16)
    pt3dadd(-9.43, 58.87, -60, 0.16)
    pt3dadd(-9.43, 58.97, -60, 0.16)
    pt3dadd(-9.43, 59.45, -60, 0.16)
    pt3dadd(-9.32, 59.61, -60, 0.16)
    pt3dadd(-9.11, 59.82, -60, 0.16)
    pt3dadd(-9.06, 59.97, -60, 0.16)
    pt3dadd(-8.94, 60.13, -60, 0.16)
    pt3dadd(-8.27, 61.29, -60, 0.84)
    pt3dadd(-7.84, 61.96, -61, 0.16)
    pt3dadd(-7.89, 62.07, -60.5, 0.16)
    pt3dadd(-7.99, 62.17, -60.5, 0.16)
    pt3dadd(-8.1, 62.28, -61, 0.16)
    pt3dadd(-8.19, 62.33, -61, 0.16)
    pt3dadd(-8.31, 62.44, -61, 0.16)
    pt3dadd(-8.36, 62.49, -61.5, 0.16)
    pt3dadd(-8.47, 62.59, -61.5, 0.16)
    pt3dadd(-8.47, 62.8, -62, 0.16)
    pt3dadd(-8.52, 62.91, -62, 0.16)
    pt3dadd(-8.61, 63.02, -62, 0.16)
    pt3dadd(-8.73, 63.17, -62, 0.16)
    pt3dadd(-8.73, 63.38, -62, 0.16)
    pt3dadd(-8.83, 63.49, -62, 0.16)
    pt3dadd(-8.83, 63.7, -62, 0.16)
    pt3dadd(-8.73, 63.8, -62, 0.16)
    pt3dadd(-8.68, 63.96, -62.5, 0.16)
    pt3dadd(-8.73, 64.06, -62.5, 0.16)
    pt3dadd(-8.83, 64.17, -62.5, 0.16)
    pt3dadd(-8.94, 64.17, -62.5, 0.16)
    pt3dadd(-9.1, 64.22, -62.5, 0.16)
    pt3dadd(-9.19, 64.28, -63, 0.16)
    pt3dadd(-9.31, 64.33, -63, 0.16)
    pt3dadd(-9.52, 64.33, -63, 0.16)
    pt3dadd(-9.52, 64.43, -63.5, 0.16)
    pt3dadd(-9.57, 64.59, -64, 0.16)
    pt3dadd(-9.77, 64.64, -64, 0.16)
    pt3dadd(-9.99, 64.59, -64.5, 0.16)
    pt3dadd(-10.19, 64.54, -64.5, 0.16)
    pt3dadd(-10.36, 64.43, -64.5, 0.16)
    pt3dadd(-10.93, 64.43, -65, 0.16)
    pt3dadd(-11.04, 64.59, -65, 0.16)
    pt3dadd(-11.3, 65.12, -65.5, 0.58)
    pt3dadd(-11.3, 65.59, -65.5, 0.58)
    pt3dadd(-11.41, 65.75, -65.5, 0.58)
    pt3dadd(-11.41, 66.12, -65.5, 0.58)
    pt3dadd(-11.25, 66.17, -65.5, 0.58)
    pt3dadd(-11.2, 66.33, -65.5, 0.58)
    pt3dadd(-11.04, 66.38, -65.5, 0.16)
    pt3dadd(-10.99, 66.54, -65.5, 0.16)
    pt3dadd(-10.83, 66.7, -65.5, 0.16)
    pt3dadd(-10.67, 66.84, -65.5, 0.16)
    pt3dadd(-10.62, 67.01, -65.5, 0.16)
    pt3dadd(-10.57, 67.17, -65.5, 0.16)
    pt3dadd(-10.41, 67.48, -65.5, 0.16)
    pt3dadd(-10.41, 67.9, -66, 0.16)
    pt3dadd(-10.46, 68.01, -66, 0.16)
    pt3dadd(-10.51, 68.11, -66, 0.16)
    pt3dadd(-10.62, 68.27, -66, 0.16)
    pt3dadd(-10.62, 68.38, -66, 0.16)
    pt3dadd(-10.62, 68.48, -66, 0.16)
    pt3dadd(-10.62, 68.75, -66, 0.16)
    pt3dadd(-10.57, 68.95, -66, 0.16)
    pt3dadd(-10.46, 69.48, -66.5, 0.68)
    pt3dadd(-10.46, 70.06, -66.5, 0.68)
    pt3dadd(-10.46, 70.73, -66.5, 0.16)
    pt3dadd(-10.41, 70.9, -66.5, 0.16)
    pt3dadd(-10.41, 71.16, -66.5, 0.16)
    pt3dadd(-10.36, 71.31, -66.5, 0.16)
    pt3dadd(-10.36, 71.79, -66.5, 0.16)
    pt3dadd(-10.51, 71.95, -66.5, 0.16)
    pt3dadd(-10.57, 72.11, -66.5, 0.16)
    pt3dadd(-10.72, 72.2, -66.5, 0.16)
    pt3dadd(-10.78, 72.37, -66.5, 0.16)
    pt3dadd(-10.83, 72.48, -66.5, 0.16)
    pt3dadd(-10.88, 72.58, -66.5, 0.16)
    pt3dadd(-10.93, 72.73, -66.5, 0.16)
    pt3dadd(-10.9, 73.47, -67, 0.16)
    pt3dadd(-10.9, 73.68, -67.5, 0.16)
    pt3dadd(-10.8, 73.84, -67.5, 0.16)
    pt3dadd(-10.64, 74.15, -67.5, 0.16)
    pt3dadd(-10.59, 74.31, -67.5, 0.16)
    pt3dadd(-10.54, 74.47, -67.5, 0.16)
    pt3dadd(-10.48, 74.56, -67.5, 0.16)
    pt3dadd(-10.48, 74.78, -67.5, 0.16)
    pt3dadd(-10.43, 74.94, -67.5, 0.16)
    pt3dadd(-10.43, 75.56, -67.5, 0.16)
    pt3dadd(-10.48, 75.68, -67.5, 0.16)
    pt3dadd(-10.54, 75.89, -67.5, 0.16)
    pt3dadd(-10.54, 76.04, -67.5, 0.16)
    pt3dadd(-10.64, 76.15, -67.5, 0.16)
    pt3dadd(-10.64, 76.47, -67.5, 0.16)
    pt3dadd(-10.69, 76.62, -68, 0.16)
    pt3dadd(-10.69, 77.36, -68, 0.16)
    pt3dadd(-10.59, 77.62, -68, 0.16)
    pt3dadd(-10.59, 77.83, -68, 0.16)
    pt3dadd(-10.54, 78.04, -68, 0.16)
    pt3dadd(-10.48, 78.2, -68, 0.16)
    pt3dadd(-10.48, 78.41, -68, 0.16)
    pt3dadd(-10.43, 78.52, -68.5, 0.16)
    pt3dadd(-10.43, 78.78, -68.5, 0.16)
    pt3dadd(-10.33, 78.94, -68.5, 0.16)
    pt3dadd(-10.27, 79.04, -68.5, 0.16)
    pt3dadd(-10.17, 79.2, -68.5, 0.16)
    pt3dadd(-10.11, 79.36, -68.5, 0.16)
    pt3dadd(-10.06, 79.45, -69, 0.16)
    pt3dadd(-10.06, 79.67, -69, 0.16)
    pt3dadd(-9.85, 80.56, -69, 0.63)
    pt3dadd(-9.85, 80.56, -69.5, 0.63)
    pt3dadd(-9.49, 81.2, -69.5, 0.16)
    pt3dadd(-9.33, 81.34, -69.5, 0.16)
    pt3dadd(-9.33, 81.45, -69.5, 0.16)
    pt3dadd(-9.27, 81.56, -69.5, 0.16)
    pt3dadd(-9.07, 81.72, -69.5, 0.16)
    pt3dadd(-9.01, 81.83, -69.5, 0.16)
    pt3dadd(-8.91, 81.93, -70, 0.16)
    pt3dadd(-8.8, 82.09, -70.5, 0.16)
    pt3dadd(-8.8, 82.25, -70.5, 0.16)
    pt3dadd(-8.69, 82.41, -70.5, 0.16)
    pt3dadd(-8.49, 83.83, -71, 1.1)
    pt3dadd(-9.57, 84.12, -71.5, 0.16)
    pt3dadd(-10.31, 84.28, -72, 0.89)
    pt3dadd(-10.41, 84.38, -72, 0.89)
    pt3dadd(-11.15, 84.33, -72.5, 0.16)
    pt3dadd(-11.2, 84.22, -73, 0.16)
    pt3dadd(-11.2, 84.07, -73, 0.16)
    pt3dadd(-11.31, 84.01, -73, 0.16)
    pt3dadd(-11.46, 83.85, -73, 0.16)
    pt3dadd(-11.62, 83.8, -73, 0.16)
    pt3dadd(-11.73, 83.91, -73.5, 0.16)
    pt3dadd(-11.83, 84.01, -73.5, 0.16)
    pt3dadd(-11.88, 84.17, -74, 0.16)
    pt3dadd(-11.99, 84.12, -74, 0.16)
    pt3dadd(-12.09, 84.01, -74, 0.16)
    pt3dadd(-12.41, 84.01, -74.5, 0.16)
    pt3dadd(-12.51, 84.12, -74.5, 0.16)
    pt3dadd(-12.62, 84.12, -74.5, 0.16)
    pt3dadd(-12.62, 84.49, -74.5, 0.16)
    pt3dadd(-12.67, 84.64, -74.5, 0.16)
    pt3dadd(-12.78, 84.7, -75.5, 0.16)
    pt3dadd(-13.46, 84.59, -75.5, 0.63)
    pt3dadd(-13.46, 84.59, -76.5, 0.63)
  }
  axon[38] {pt3dclear()
    pt3dadd(-22.14, 28.41, -45, 0.16)
    pt3dadd(-22.25, 28.46, -45, 0.16)
    pt3dadd(-22.35, 28.56, -45, 0.16)
    pt3dadd(-22.41, 28.51, -41, 0.16)
    pt3dadd(-22.51, 28.35, -42.5, 0.16)
    pt3dadd(-22.56, 28.25, -42.5, 0.16)
    pt3dadd(-22.62, 28.14, -42.5, 0.16)
    pt3dadd(-22.62, 27.99, -42.5, 0.16)
    pt3dadd(-22.72, 28.04, -42.5, 0.16)
    pt3dadd(-22.88, 28.04, -43, 0.16)
    pt3dadd(-22.98, 28.09, -43, 0.16)
    pt3dadd(-23.09, 28.09, -43.5, 0.16)
    pt3dadd(-23.14, 28.2, -43.5, 0.16)
    pt3dadd(-23.19, 28.41, -43.5, 0.16)
  }
}
proc shape3d_88() {
  axon[38] {
    pt3dadd(-23.3, 28.51, -43.5, 0.16)
    pt3dadd(-23.3, 28.72, -43.5, 0.16)
    pt3dadd(-23.67, 28.72, -44, 0.16)
    pt3dadd(-23.82, 28.67, -44, 0.16)
    pt3dadd(-24.14, 28.67, -44, 0.16)
    pt3dadd(-24.24, 28.56, -44, 0.16)
    pt3dadd(-24.35, 28.51, -44, 0.16)
    pt3dadd(-24.4, 28.3, -44.5, 0.16)
    pt3dadd(-24.4, 27.72, -44.5, 0.16)
    pt3dadd(-24.51, 27.57, -44.5, 0.16)
    pt3dadd(-24.51, 27.67, -44.5, 0.16)
    pt3dadd(-24.61, 27.83, -44.5, 0.16)
    pt3dadd(-24.72, 27.93, -44.5, 0.16)
    pt3dadd(-24.77, 28.04, -44.5, 0.16)
    pt3dadd(-24.98, 28.04, -45, 0.16)
    pt3dadd(-25.24, 27.88, -45, 0.16)
    pt3dadd(-25.35, 27.83, -45.5, 0.16)
    pt3dadd(-25.45, 27.78, -45.5, 0.16)
    pt3dadd(-25.45, 27.99, -45.5, 0.16)
    pt3dadd(-25.4, 28.14, -45.5, 0.16)
    pt3dadd(-25.4, 28.56, -46, 0.16)
    pt3dadd(-25.5, 28.62, -46.5, 0.16)
    pt3dadd(-25.66, 28.72, -47, 0.16)
    pt3dadd(-25.66, 28.93, -47, 0.16)
    pt3dadd(-25.71, 29.04, -47.5, 0.16)
    pt3dadd(-25.77, 29.35, -47.5, 0.16)
    pt3dadd(-25.87, 29.46, -48, 0.16)
    pt3dadd(-25.92, 29.56, -48.5, 0.16)
    pt3dadd(-26.13, 29.62, -48.5, 0.16)
    pt3dadd(-26.24, 29.67, -48.5, 0.16)
    pt3dadd(-26.34, 29.51, -48.5, 0.16)
    pt3dadd(-26.45, 29.35, -48.5, 0.16)
    pt3dadd(-26.5, 29.2, -48.5, 0.16)
    pt3dadd(-26.55, 29.04, -48.5, 0.16)
    pt3dadd(-26.45, 28.99, -48.5, 0.16)
    pt3dadd(-26.24, 28.99, -49, 0.16)
    pt3dadd(-26.08, 29.04, -49, 0.16)
    pt3dadd(-25.87, 29.04, -49.5, 0.16)
    pt3dadd(-25.82, 28.88, -49.5, 0.16)
    pt3dadd(-25.77, 28.77, -49.5, 0.16)
    pt3dadd(-25.87, 28.67, -50, 0.16)
    pt3dadd(-25.98, 28.62, -52, 0.16)
    pt3dadd(-26.76, 28.25, -50.5, 1)
    pt3dadd(-26.73, 28.08, -51, 1)
  }
  axon[39] {pt3dclear()
    pt3dadd(-23.47, 16.43, -27, 0.1)
    pt3dadd(-23.73, 16.19, -26, 0.16)
    pt3dadd(-23.89, 16.19, -26, 0.16)
    pt3dadd(-23.94, 16.29, -26.5, 0.16)
    pt3dadd(-24.05, 16.29, -26.5, 0.16)
    pt3dadd(-24.15, 16.39, -26.5, 0.16)
    pt3dadd(-24.26, 16.51, -27, 0.16)
    pt3dadd(-24.42, 16.55, -27, 0.16)
    pt3dadd(-24.52, 16.66, -27, 0.16)
    pt3dadd(-24.63, 16.72, -27, 0.16)
    pt3dadd(-24.78, 16.77, -27.5, 0.16)
    pt3dadd(-24.84, 16.93, -27.5, 0.16)
    pt3dadd(-24.94, 16.98, -27.5, 0.16)
    pt3dadd(-25.05, 17.07, -27.5, 0.16)
    pt3dadd(-25.05, 17.29, -28, 0.16)
    pt3dadd(-25.2, 17.45, -28, 0.16)
    pt3dadd(-25.31, 17.61, -28, 0.16)
    pt3dadd(-25.36, 17.71, -28.5, 0.16)
    pt3dadd(-25.47, 17.77, -28.5, 0.16)
    pt3dadd(-25.47, 17.92, -28.5, 0.16)
    pt3dadd(-25.57, 17.92, -28.5, 0.16)
    pt3dadd(-25.73, 17.98, -29, 0.16)
    pt3dadd(-25.94, 17.98, -29, 0.16)
    pt3dadd(-26.04, 18.07, -29.5, 0.16)
    pt3dadd(-26.15, 18.13, -29.5, 0.16)
    pt3dadd(-26.31, 18.19, -29.5, 0.16)
    pt3dadd(-26.41, 18.35, -30, 0.16)
    pt3dadd(-26.57, 18.29, -30, 0.16)
    pt3dadd(-26.57, 18.13, -30, 0.16)
    pt3dadd(-26.67, 17.98, -30.5, 0.16)
    pt3dadd(-26.73, 17.77, -30.5, 0.16)
    pt3dadd(-26.78, 17.66, -30.5, 0.16)
    pt3dadd(-26.78, 17.45, -30.5, 0.16)
    pt3dadd(-26.88, 17.35, -30.5, 0.16)
    pt3dadd(-26.99, 17.29, -30.5, 0.16)
    pt3dadd(-27.09, 17.23, -30.5, 0.16)
    pt3dadd(-27.3, 17.23, -30.5, 0.16)
    pt3dadd(-27.46, 17.29, -30.5, 0.16)
    pt3dadd(-27.67, 17.29, -31, 0.16)
    pt3dadd(-27.88, 17.35, -31, 0.16)
    pt3dadd(-28.09, 17.39, -31, 0.16)
    pt3dadd(-28.25, 17.5, -31, 0.16)
    pt3dadd(-28.46, 17.61, -31, 0.16)
    pt3dadd(-28.61, 17.66, -31, 0.16)
    pt3dadd(-28.72, 17.77, -31, 0.16)
    pt3dadd(-28.98, 17.98, -31, 0.16)
    pt3dadd(-29.19, 18.13, -31, 0.16)
    pt3dadd(-29.35, 18.35, -31, 0.16)
    pt3dadd(-29.45, 18.5, -31, 0.16)
    pt3dadd(-29.45, 18.61, -31, 0.16)
    pt3dadd(-29.61, 18.77, -31.5, 0.16)
    pt3dadd(-29.72, 18.82, -32, 0.16)
    pt3dadd(-29.87, 18.77, -32, 0.16)
    pt3dadd(-30.03, 18.77, -32, 0.16)
    pt3dadd(-30.14, 18.71, -32, 0.16)
    pt3dadd(-30.29, 18.61, -32, 0.16)
    pt3dadd(-30.4, 18.5, -32, 0.16)
    pt3dadd(-30.5, 18.39, -32, 0.16)
    pt3dadd(-30.56, 18.23, -32.5, 0.16)
    pt3dadd(-30.61, 18.07, -32.5, 0.16)
    pt3dadd(-30.71, 18.03, -32.5, 0.16)
    pt3dadd(-30.82, 18.13, -32.5, 0.16)
    pt3dadd(-30.92, 18.19, -32.5, 0.16)
    pt3dadd(-30.99, 18.05, -32.5, 0.16)
  }
  axon[40] {pt3dclear()
    pt3dadd(-30.99, 18.05, -32.5, 0.16)
    pt3dadd(-31.13, 18.19, -32.5, 0.16)
    pt3dadd(-31.4, 18.35, -32.5, 0.16)
    pt3dadd(-31.61, 18.45, -32.5, 0.16)
    pt3dadd(-31.82, 18.55, -32.5, 0.16)
    pt3dadd(-31.87, 18.66, -32.5, 0.16)
    pt3dadd(-32.03, 18.71, -32.5, 0.16)
    pt3dadd(-32.08, 18.82, -33, 0.16)
    pt3dadd(-32.24, 18.82, -33, 0.16)
    pt3dadd(-32.39, 18.77, -33, 0.16)
    pt3dadd(-32.5, 18.71, -33, 0.16)
    pt3dadd(-32.6, 18.61, -33, 0.16)
    pt3dadd(-32.65, 18.5, -33, 0.16)
    pt3dadd(-32.71, 18.39, -33, 0.16)
    pt3dadd(-32.81, 18.23, -33, 0.16)
    pt3dadd(-32.97, 18.07, -33, 0.16)
    pt3dadd(-33.08, 18.03, -33, 0.16)
    pt3dadd(-33.54, 18.03, -33, 0.16)
    pt3dadd(-33.65, 17.98, -33, 0.16)
    pt3dadd(-33.76, 17.98, -33, 0.16)
    pt3dadd(-33.86, 17.87, -33, 0.16)
    pt3dadd(-33.97, 17.87, -33, 0.16)
    pt3dadd(-34.02, 17.77, -33, 0.16)
    pt3dadd(-34.13, 17.71, -33, 0.16)
    pt3dadd(-34.22, 17.66, -33, 0.16)
    pt3dadd(-34.34, 17.61, -33.5, 0.16)
    pt3dadd(-34.44, 17.55, -33.5, 0.16)
    pt3dadd(-34.65, 17.55, -33.5, 0.16)
    pt3dadd(-34.76, 17.5, -33.5, 0.16)
    pt3dadd(-35.02, 17.5, -33.5, 0.16)
    pt3dadd(-35.18, 17.55, -33.5, 0.16)
    pt3dadd(-35.49, 17.55, -33.5, 0.16)
    pt3dadd(-35.6, 17.61, -33.5, 0.16)
    pt3dadd(-35.86, 17.66, -33.5, 0.16)
    pt3dadd(-36.11, 17.66, -33.5, 0.16)
    pt3dadd(-36.22, 17.61, -33.5, 0.16)
    pt3dadd(-36.44, 17.61, -33.5, 0.16)
    pt3dadd(-36.59, 17.55, -33.5, 0.16)
    pt3dadd(-36.79, 17.5, -33.5, 0.16)
    pt3dadd(-37.07, 17.5, -33.5, 0.16)
    pt3dadd(-37.33, 17.39, -33.5, 0.16)
    pt3dadd(-37.49, 17.39, -33.5, 0.16)
    pt3dadd(-37.7, 17.35, -34, 0.16)
  }
  axon[41] {pt3dclear()
    pt3dadd(-37.7, 17.35, -34, 0.16)
    pt3dadd(-38.27, 16.93, -35, 0.16)
    pt3dadd(-38.43, 16.93, -35, 0.16)
    pt3dadd(-38.59, 16.87, -35, 0.16)
    pt3dadd(-38.59, 16.77, -35, 0.16)
    pt3dadd(-38.59, 16.55, -34, 0.16)
    pt3dadd(-38.64, 16.35, -34, 0.16)
    pt3dadd(-38.75, 16.29, -34, 0.16)
    pt3dadd(-38.79, 16.19, -34, 0.16)
    pt3dadd(-38.79, 16.07, -33.5, 0.16)
    pt3dadd(-38.85, 15.98, -33.5, 0.16)
    pt3dadd(-38.9, 15.87, -33.5, 0.16)
    pt3dadd(-38.96, 15.77, -33.5, 0.16)
    pt3dadd(-38.96, 15.45, -33.5, 0.16)
    pt3dadd(-39.01, 15.35, -33.5, 0.16)
    pt3dadd(-39.06, 15.24, -33.5, 0.16)
    pt3dadd(-39.11, 15.14, -33.5, 0.16)
    pt3dadd(-39.27, 14.98, -34, 0.16)
    pt3dadd(-39.43, 14.93, -34, 0.16)
    pt3dadd(-39.64, 14.88, -34, 0.16)
    pt3dadd(-39.79, 14.82, -34, 0.16)
    pt3dadd(-39.85, 14.77, -34.5, 0.16)
    pt3dadd(-39.95, 14.67, -34.5, 0.16)
    pt3dadd(-40.06, 14.67, -34.5, 0.16)
    pt3dadd(-40.22, 14.61, -34.5, 0.16)
    pt3dadd(-40.32, 14.56, -34.5, 0.16)
    pt3dadd(-40.47, 14.51, -35, 0.16)
    pt3dadd(-40.58, 14.35, -35, 0.16)
    pt3dadd(-40.74, 14.3, -35, 0.16)
    pt3dadd(-40.95, 14.3, -35, 0.16)
    pt3dadd(-41.11, 14.19, -35, 0.16)
    pt3dadd(-41.27, 14.14, -35, 0.16)
    pt3dadd(-41.48, 14.03, -35, 0.16)
    pt3dadd(-41.58, 14.09, -35, 0.16)
    pt3dadd(-41.74, 14.09, -35, 0.16)
    pt3dadd(-41.84, 13.93, -35, 0.16)
    pt3dadd(-41.95, 13.82, -35.5, 0.16)
    pt3dadd(-42, 13.56, -35.5, 0.16)
    pt3dadd(-42.05, 13.35, -35.5, 0.16)
    pt3dadd(-42.11, 13.19, -35.5, 0.16)
    pt3dadd(-42.21, 13.14, -35.5, 0.16)
    pt3dadd(-42.37, 13.04, -36, 0.16)
    pt3dadd(-42.63, 13.04, -36, 0.16)
    pt3dadd(-43.05, 12.98, -36, 0.16)
    pt3dadd(-43.26, 12.93, -36, 0.16)
    pt3dadd(-43.58, 12.93, -36, 0.16)
    pt3dadd(-43.73, 12.88, -36, 0.16)
    pt3dadd(-43.94, 12.88, -36, 0.16)
    pt3dadd(-44.05, 12.77, -36, 0.16)
    pt3dadd(-44.21, 12.72, -36, 0.16)
    pt3dadd(-44.31, 12.72, -36, 0.16)
    pt3dadd(-44.52, 12.62, -36, 0.16)
    pt3dadd(-44.63, 12.51, -36, 0.16)
    pt3dadd(-44.68, 12.35, -36, 0.16)
    pt3dadd(-44.78, 12.14, -36, 0.16)
    pt3dadd(-44.78, 11.67, -36, 0.16)
    pt3dadd(-45.97, 11.77, -36.5, 0.16)
    pt3dadd(-46.08, 11.87, -36.5, 0.16)
    pt3dadd(-46.18, 11.92, -36, 0.16)
    pt3dadd(-46.39, 11.98, -36, 0.16)
    pt3dadd(-46.55, 11.92, -36, 0.16)
    pt3dadd(-46.65, 11.82, -36, 0.16)
    pt3dadd(-46.81, 11.71, -36, 0.16)
    pt3dadd(-46.92, 11.61, -36, 0.16)
    pt3dadd(-47.07, 11.56, -36, 0.16)
    pt3dadd(-47.18, 11.45, -36, 0.16)
    pt3dadd(-47.28, 11.35, -36.5, 0.16)
    pt3dadd(-47.34, 11.24, -36.5, 0.16)
    pt3dadd(-47.39, 11.08, -36.5, 0.16)
    pt3dadd(-47.39, 10.77, -37, 0.16)
    pt3dadd(-47.34, 10.66, -37, 0.16)
    pt3dadd(-47.34, 10.5, -37.5, 0.16)
    pt3dadd(-47.44, 10.24, -37.5, 0.16)
    pt3dadd(-47.49, 10.14, -37.5, 0.16)
    pt3dadd(-47.6, 10.08, -37.5, 0.16)
    pt3dadd(-47.76, 9.98, -37.5, 0.16)
    pt3dadd(-47.86, 9.93, -37.5, 0.16)
    pt3dadd(-47.97, 9.93, -37.5, 0.16)
    pt3dadd(-48.12, 9.82, -37.5, 0.16)
    pt3dadd(-48.23, 9.82, -37.5, 0.16)
    pt3dadd(-48.33, 9.86, -37.5, 0.16)
    pt3dadd(-48.6, 9.86, -38, 0.16)
    pt3dadd(-48.75, 9.93, -38, 0.16)
    pt3dadd(-48.96, 9.98, -38, 0.16)
    pt3dadd(-49.07, 9.98, -38, 0.16)
    pt3dadd(-49.23, 10.02, -38, 0.16)
    pt3dadd(-49.38, 10.08, -38, 0.16)
    pt3dadd(-49.49, 10.08, -38, 0.16)
    pt3dadd(-49.59, 10.14, -38.5, 0.16)
    pt3dadd(-49.7, 10.19, -38.5, 0.16)
    pt3dadd(-49.86, 10.19, -38.5, 0.16)
    pt3dadd(-50.49, 10.61, -39.5, 0.63)
    pt3dadd(-50.59, 10.66, -39.5, 0.63)
    pt3dadd(-50.69, 10.82, -39.5, 0.63)
    pt3dadd(-50.9, 10.82, -39.5, 0.63)
    pt3dadd(-50.96, 10.92, -39.5, 0.63)
    pt3dadd(-51.11, 10.98, -39.5, 0.63)
    pt3dadd(-51.27, 10.98, -39.5, 0.63)
  }
}
proc shape3d_89() {
  axon[41] {
    pt3dadd(-51.74, 11.03, -39.5, 0.16)
    pt3dadd(-51.8, 10.82, -39, 0.16)
    pt3dadd(-51.8, 10.66, -39, 0.16)
    pt3dadd(-51.85, 10.45, -39, 0.16)
    pt3dadd(-51.85, 10.29, -39, 0.16)
    pt3dadd(-51.9, 10.19, -40, 0.16)
    pt3dadd(-52.11, 10.19, -40, 0.16)
    pt3dadd(-52.22, 10.14, -40, 0.16)
    pt3dadd(-52.58, 10.14, -40, 0.16)
    pt3dadd(-52.74, 10.19, -40, 0.16)
    pt3dadd(-52.95, 10.19, -40.5, 0.16)
    pt3dadd(-53.11, 10.35, -40.5, 0.16)
    pt3dadd(-53.11, 10.56, -41, 0.16)
    pt3dadd(-53.21, 10.61, -41, 0.16)
    pt3dadd(-53.32, 10.71, -41, 0.16)
    pt3dadd(-53.37, 10.92, -41, 0.16)
    pt3dadd(-53.48, 10.98, -41.5, 0.16)
    pt3dadd(-53.58, 11.08, -41.5, 0.16)
    pt3dadd(-53.69, 11.19, -41.5, 0.16)
    pt3dadd(-53.79, 11.24, -41.5, 0.16)
    pt3dadd(-53.95, 11.29, -41.5, 0.16)
    pt3dadd(-54.11, 11.29, -41.5, 0.16)
    pt3dadd(-54.26, 11.19, -41.5, 0.16)
    pt3dadd(-54.37, 11.19, -42, 0.16)
    pt3dadd(-54.42, 11.08, -42, 0.16)
    pt3dadd(-54.89, 11.08, -42.5, 0.16)
    pt3dadd(-55, 11.13, -42.5, 0.16)
    pt3dadd(-55.1, 11.24, -42.5, 0.16)
    pt3dadd(-55.16, 11.4, -42.5, 0.16)
    pt3dadd(-55.26, 11.56, -42.5, 0.16)
    pt3dadd(-55.37, 11.61, -43, 0.16)
    pt3dadd(-55.42, 11.77, -43, 0.16)
    pt3dadd(-55.52, 11.87, -43, 0.16)
    pt3dadd(-55.63, 11.98, -43, 0.16)
    pt3dadd(-55.89, 11.82, -43, 0.16)
    pt3dadd(-56, 11.66, -43.5, 0.16)
    pt3dadd(-56, 11.5, -43.5, 0.16)
    pt3dadd(-56.05, 11.29, -43.5, 0.16)
    pt3dadd(-56.05, 10.92, -43.5, 0.16)
    pt3dadd(-56.84, 10.92, -43.5, 0.16)
    pt3dadd(-56.94, 10.87, -43.5, 0.16)
    pt3dadd(-57.1, 10.71, -43.5, 0.16)
    pt3dadd(-57.05, 10.5, -44, 0.16)
    pt3dadd(-56.99, 10.4, -44, 0.16)
    pt3dadd(-56.89, 10.24, -44, 0.16)
    pt3dadd(-56.84, 10.14, -44, 0.16)
    pt3dadd(-56.78, 9.98, -44, 0.16)
    pt3dadd(-56.78, 9.66, -44.5, 0.16)
    pt3dadd(-56.89, 9.51, -45, 0.16)
    pt3dadd(-56.99, 9.4, -45, 0.16)
    pt3dadd(-57.1, 9.28, -45, 0.16)
    pt3dadd(-57.26, 9.24, -45, 0.16)
    pt3dadd(-57.36, 9.14, -45, 0.16)
    pt3dadd(-57.47, 9.19, -45, 0.16)
    pt3dadd(-58.31, 8.72, -44.5, 0.73)
  }
  axon[42] {pt3dclear()
    pt3dadd(-58.31, 8.72, -44.5, 0.73)
    pt3dadd(-59.15, 8.86, -45, 0.16)
    pt3dadd(-59.25, 8.93, -45.5, 0.16)
    pt3dadd(-59.51, 8.98, -45.5, 0.16)
    pt3dadd(-59.57, 9.14, -45.5, 0.16)
    pt3dadd(-59.67, 9.28, -45.5, 0.16)
    pt3dadd(-59.83, 9.35, -45.5, 0.16)
    pt3dadd(-59.99, 9.44, -45.5, 0.16)
    pt3dadd(-60.14, 9.44, -45.5, 0.16)
    pt3dadd(-60.25, 9.51, -45.5, 0.16)
    pt3dadd(-60.46, 9.56, -46, 0.16)
    pt3dadd(-60.41, 9.44, -46.5, 0.16)
    pt3dadd(-60.41, 9.35, -47, 0.16)
    pt3dadd(-60.46, 9.19, -47, 0.16)
    pt3dadd(-60.46, 9.02, -47.5, 0.16)
    pt3dadd(-60.35, 8.86, -47.5, 0.16)
    pt3dadd(-60.3, 8.72, -47.5, 0.16)
    pt3dadd(-60.2, 8.66, -48, 0.16)
    pt3dadd(-60.2, 8.51, -48, 0.16)
    pt3dadd(-60.14, 8.3, -48.5, 0.16)
    pt3dadd(-60.09, 8.14, -48.5, 0.16)
    pt3dadd(-60.09, 7.88, -48.5, 0.16)
    pt3dadd(-60.2, 7.88, -48.5, 0.16)
    pt3dadd(-60.3, 7.82, -48.5, 0.16)
    pt3dadd(-60.41, 7.82, -49, 0.16)
    pt3dadd(-60.51, 7.93, -49.5, 0.16)
    pt3dadd(-60.62, 7.93, -49.5, 0.16)
    pt3dadd(-60.77, 8.09, -49.5, 0.16)
    pt3dadd(-60.98, 8.19, -49.5, 0.16)
    pt3dadd(-61.09, 8.3, -49.5, 0.16)
    pt3dadd(-61.19, 8.35, -49.5, 0.16)
    pt3dadd(-61.25, 8.44, -49.5, 0.16)
    pt3dadd(-61.35, 8.56, -49.5, 0.16)
    pt3dadd(-61.56, 8.66, -50, 0.16)
    pt3dadd(-61.72, 8.77, -50, 0.16)
    pt3dadd(-61.82, 8.86, -50, 0.16)
    pt3dadd(-61.93, 8.93, -50, 0.16)
    pt3dadd(-62.03, 9.02, -50, 0.16)
    pt3dadd(-62.14, 9.02, -50, 0.16)
    pt3dadd(-62.45, 9.19, -50.5, 0.16)
    pt3dadd(-62.66, 9.28, -51, 0.16)
    pt3dadd(-62.77, 9.24, -51, 0.16)
    pt3dadd(-62.82, 9.14, -51, 0.16)
    pt3dadd(-62.82, 8.61, -51.5, 0.16)
    pt3dadd(-62.98, 8.51, -52, 0.16)
    pt3dadd(-63.14, 8.44, -52, 0.16)
    pt3dadd(-63.35, 8.44, -52, 0.16)
    pt3dadd(-63.5, 8.4, -52, 0.16)
    pt3dadd(-63.71, 8.4, -52, 0.16)
    pt3dadd(-63.87, 8.44, -52.5, 0.16)
    pt3dadd(-63.98, 8.56, -52.5, 0.16)
    pt3dadd(-64.13, 8.61, -52.5, 0.16)
    pt3dadd(-64.34, 8.66, -52.5, 0.16)
    pt3dadd(-64.45, 8.72, -52.5, 0.16)
    pt3dadd(-64.61, 8.66, -52.5, 0.16)
    pt3dadd(-64.76, 8.72, -53, 0.16)
    pt3dadd(-64.97, 8.77, -53, 0.16)
    pt3dadd(-65.08, 8.77, -53, 0.16)
    pt3dadd(-65.23, 8.82, -53, 0.16)
    pt3dadd(-65.59, 8.82, -53, 0.16)
    pt3dadd(-65.7, 8.86, -53, 0.16)
    pt3dadd(-65.81, 8.98, -53, 0.16)
    pt3dadd(-66.02, 8.98, -53, 0.16)
    pt3dadd(-66.18, 8.98, -53, 0.16)
    pt3dadd(-66.29, 8.98, -53, 0.16)
    pt3dadd(-66.5, 8.93, -53, 0.16)
    pt3dadd(-66.76, 8.93, -53, 0.16)
    pt3dadd(-66.97, 8.86, -54.5, 0.16)
    pt3dadd(-67.39, 9.02, -54.5, 0.16)
  }
  axon[43] {pt3dclear()
    pt3dadd(-67.39, 9.02, -54.5, 0.16)
    pt3dadd(-67.79, 8.78, -53.5, 0.63)
    pt3dadd(-67.79, 8.89, -53.5, 0.63)
    pt3dadd(-69.16, 8.68, -53.5, 0.16)
    pt3dadd(-69.26, 8.73, -53.5, 0.16)
    pt3dadd(-69.37, 8.78, -53.5, 0.16)
    pt3dadd(-69.73, 8.78, -54, 0.16)
    pt3dadd(-69.79, 8.73, -54.5, 0.16)
    pt3dadd(-69.95, 8.68, -54.5, 0.16)
    pt3dadd(-70.16, 8.63, -54.5, 0.16)
    pt3dadd(-70.37, 8.58, -54.5, 0.16)
    pt3dadd(-70.52, 8.52, -54.5, 0.16)
    pt3dadd(-70.63, 8.52, -54.5, 0.16)
    pt3dadd(-70.79, 8.52, -54.5, 0.16)
    pt3dadd(-71, 8.47, -54.5, 0.16)
    pt3dadd(-71.26, 8.52, -54.5, 0.16)
    pt3dadd(-71.36, 8.42, -54.5, 0.16)
    pt3dadd(-71.47, 8.36, -54.5, 0.16)
    pt3dadd(-71.63, 8.31, -54.5, 0.16)
    pt3dadd(-72.52, 8.21, -54, 0.89)
    pt3dadd(-73.31, 8.52, -55, 0.16)
    pt3dadd(-73.51, 8.68, -55, 0.16)
    pt3dadd(-73.67, 8.68, -55, 0.16)
    pt3dadd(-73.88, 8.84, -55, 0.16)
    pt3dadd(-74.04, 8.84, -55, 0.16)
    pt3dadd(-74.25, 8.94, -55, 0.16)
    pt3dadd(-74.41, 9, -55.5, 0.16)
    pt3dadd(-74.56, 9.05, -55.5, 0.16)
    pt3dadd(-74.67, 9.16, -55.5, 0.16)
    pt3dadd(-74.88, 9.16, -55.5, 0.16)
    pt3dadd(-75.09, 9.1, -55.5, 0.16)
    pt3dadd(-75.19, 9.16, -56, 0.16)
    pt3dadd(-75.34, 9.26, -56, 0.16)
    pt3dadd(-75.56, 9.26, -56, 0.16)
    pt3dadd(-75.67, 9.36, -56, 0.16)
    pt3dadd(-76.34, 9.36, -56, 0.16)
    pt3dadd(-76.45, 9.31, -56, 0.16)
    pt3dadd(-76.61, 9.21, -56, 0.16)
    pt3dadd(-76.72, 9.26, -56, 0.16)
    pt3dadd(-76.87, 9.16, -56, 0.16)
    pt3dadd(-76.98, 9.1, -55.5, 0.16)
    pt3dadd(-77.08, 9, -55.5, 0.16)
    pt3dadd(-77.19, 8.89, -55.5, 0.16)
    pt3dadd(-77.29, 8.78, -55.5, 0.16)
    pt3dadd(-77.45, 8.73, -55.5, 0.16)
    pt3dadd(-77.56, 8.63, -55.5, 0.16)
    pt3dadd(-77.66, 8.52, -55.5, 0.16)
    pt3dadd(-77.81, 8.47, -55, 0.16)
    pt3dadd(-77.87, 8.26, -55, 0.16)
    pt3dadd(-77.98, 7.95, -55, 0.16)
    pt3dadd(-78.03, 7.84, -54.5, 0.16)
    pt3dadd(-78.08, 7.74, -54.5, 0.16)
    pt3dadd(-78.08, 7.58, -54.5, 0.16)
    pt3dadd(-78.19, 7.47, -54.5, 0.16)
    pt3dadd(-78.23, 7.42, -55, 0.16)
    pt3dadd(-79.23, 7.11, -56, 0.89)
    pt3dadd(-79.87, 6.05, -56, 0.16)
    pt3dadd(-79.97, 5.95, -56, 0.16)
    pt3dadd(-80.08, 5.95, -56, 0.16)
    pt3dadd(-81.13, 5.95, -56, 0.16)
    pt3dadd(-81.23, 5.95, -56, 0.16)
    pt3dadd(-81.39, 5.95, -56, 0.16)
    pt3dadd(-81.55, 5.95, -56, 0.16)
    pt3dadd(-81.65, 6, -56, 0.16)
    pt3dadd(-82.6, 6.16, -56.5, 0.89)
  }
  axon[44] {pt3dclear()
    pt3dadd(-82.6, 6.16, -56.5, 0.89)
    pt3dadd(-83.17, 6.42, -56.5, 0.16)
    pt3dadd(-83.38, 6.47, -56.5, 0.16)
    pt3dadd(-83.54, 6.47, -56.5, 0.16)
    pt3dadd(-83.65, 6.58, -56.5, 0.16)
    pt3dadd(-84.01, 6.53, -56.5, 0.16)
    pt3dadd(-84.17, 6.37, -56.5, 0.16)
    pt3dadd(-84.28, 6.32, -56.5, 0.16)
    pt3dadd(-84.38, 6.26, -57, 0.16)
    pt3dadd(-85.54, 6.47, -57, 0.89)
    pt3dadd(-86.09, 6.96, -57, 0.79)
    pt3dadd(-86.88, 7.38, -57, 0.79)
    pt3dadd(-88.19, 7.96, -57.5, 0.16)
    pt3dadd(-89, 8.26, -58.5, 0.16)
    pt3dadd(-89.05, 8.36, -58.5, 0.16)
    pt3dadd(-89.16, 8.47, -58.5, 0.16)
    pt3dadd(-89.11, 8.57, -59, 0.16)
    pt3dadd(-89.16, 8.77, -59, 0.16)
    pt3dadd(-89.21, 8.89, -59, 0.16)
    pt3dadd(-89.26, 9.05, -59, 0.16)
    pt3dadd(-89.37, 9.15, -59, 0.16)
    pt3dadd(-89.47, 9.31, -59, 0.16)
    pt3dadd(-89.58, 9.36, -59, 0.16)
    pt3dadd(-89.63, 9.47, -59, 0.16)
    pt3dadd(-89.74, 9.52, -59, 0.16)
    pt3dadd(-89.95, 9.57, -59, 0.16)
    pt3dadd(-90, 9.73, -59.5, 0.16)
    pt3dadd(-90.16, 9.99, -59.5, 0.63)
    pt3dadd(-90.21, 10.15, -59.5, 0.63)
    pt3dadd(-90.31, 10.25, -59.5, 0.63)
    pt3dadd(-91.1, 10.83, -59.5, 0.16)
    pt3dadd(-91.1, 11.25, -60, 0.16)
    pt3dadd(-91.52, 11.57, -60.5, 0.42)
    pt3dadd(-92.2, 12.88, -61, 0.89)
  }
  axon[45] {pt3dclear()
    pt3dadd(-92.2, 12.88, -61, 0.89)
    pt3dadd(-92.89, 13.46, -60.5, 0.16)
    pt3dadd(-92.83, 13.67, -60.5, 0.16)
    pt3dadd(-92.94, 13.78, -60.5, 0.16)
    pt3dadd(-92.94, 14.04, -60.5, 0.16)
    pt3dadd(-93.04, 14.14, -60.5, 0.16)
    pt3dadd(-93.31, 14.72, -61, 0.84)
    pt3dadd(-94.41, 15.25, -61, 0.16)
    pt3dadd(-94.46, 15.51, -61, 0.58)
    pt3dadd(-94.88, 16.14, -61, 0.16)
    pt3dadd(-94.83, 16.3, -61.5, 0.16)
    pt3dadd(-94.93, 16.35, -61.5, 0.16)
    pt3dadd(-95.09, 16.41, -61.5, 0.16)
    pt3dadd(-95.19, 16.51, -61.5, 0.16)
    pt3dadd(-95.3, 16.62, -61.5, 0.16)
    pt3dadd(-95.35, 16.72, -61.5, 0.16)
    pt3dadd(-95.46, 16.82, -61.5, 0.16)
    pt3dadd(-95.51, 16.93, -61.5, 0.16)
    pt3dadd(-95.67, 16.98, -62, 0.16)
    pt3dadd(-95.98, 16.98, -62, 0.16)
    pt3dadd(-96.14, 16.93, -62, 0.16)
    pt3dadd(-96.35, 16.72, -62, 0.16)
    pt3dadd(-96.4, 16.62, -62, 0.16)
    pt3dadd(-96.51, 16.62, -62, 0.16)
    pt3dadd(-96.77, 16.62, -62.5, 0.16)
    pt3dadd(-96.82, 16.82, -62.5, 0.16)
  }
}
proc shape3d_90() {
  axon[45] {
    pt3dadd(-96.82, 17.3, -62.5, 0.16)
    pt3dadd(-96.77, 17.46, -63.5, 0.16)
    pt3dadd(-96.82, 17.61, -63.5, 0.16)
    pt3dadd(-96.87, 17.77, -63.5, 0.16)
    pt3dadd(-96.98, 17.88, -63.5, 0.16)
    pt3dadd(-97.24, 18.09, -63.5, 0.16)
    pt3dadd(-97.4, 18.14, -64, 0.16)
    pt3dadd(-97.71, 18.14, -64, 0.16)
    pt3dadd(-97.92, 18.14, -64.5, 0.16)
    pt3dadd(-98.19, 18.14, -64.5, 0.16)
    pt3dadd(-98.45, 18.25, -64.5, 0.16)
    pt3dadd(-98.66, 18.25, -64.5, 0.16)
    pt3dadd(-98.82, 18.3, -64.5, 0.16)
    pt3dadd(-99.29, 18.3, -64.5, 0.16)
    pt3dadd(-99.45, 18.19, -64.5, 0.16)
    pt3dadd(-99.66, 18.19, -64.5, 0.16)
    pt3dadd(-99.76, 18.14, -64.5, 0.16)
    pt3dadd(-99.92, 18.09, -64.5, 0.16)
    pt3dadd(-100.13, 18.09, -64.5, 0.16)
    pt3dadd(-100.29, 18.09, -64.5, 0.16)
    pt3dadd(-100.39, 18.14, -65.5, 0.16)
    pt3dadd(-100.44, 18.25, -65.5, 0.16)
    pt3dadd(-100.55, 18.3, -65.5, 0.16)
    pt3dadd(-101.49, 18.98, -66, 0.68)
    pt3dadd(-101.76, 19.55, -66, 0.16)
    pt3dadd(-101.91, 19.66, -66, 0.16)
    pt3dadd(-102.39, 20.27, -66.5, 0.16)
    pt3dadd(-102.75, 20.27, -66.5, 0.63)
    pt3dadd(-102.91, 20.32, -66.5, 0.63)
    pt3dadd(-104.01, 20.53, -66.5, 0.16)
    pt3dadd(-104.12, 20.64, -66.5, 0.16)
    pt3dadd(-104.17, 20.79, -66.5, 0.16)
    pt3dadd(-104.22, 20.9, -66.5, 0.16)
    pt3dadd(-104.33, 21.16, -66.5, 0.16)
    pt3dadd(-104.43, 21.16, -66.5, 0.16)
    pt3dadd(-104.54, 21.27, -66.5, 0.16)
    pt3dadd(-104.64, 21.37, -66.5, 0.16)
    pt3dadd(-104.75, 21.48, -67, 0.16)
    pt3dadd(-104.91, 21.48, -67, 0.16)
    pt3dadd(-105.06, 21.53, -67, 0.16)
    pt3dadd(-105.17, 21.58, -67, 0.16)
    pt3dadd(-105.27, 21.63, -67, 0.16)
    pt3dadd(-105.43, 21.69, -67, 0.16)
    pt3dadd(-105.59, 21.79, -67, 0.16)
    pt3dadd(-105.8, 21.79, -67, 0.16)
    pt3dadd(-105.9, 21.84, -67, 0.16)
    pt3dadd(-106.06, 21.84, -67, 0.16)
    pt3dadd(-106.17, 21.9, -67, 0.16)
    pt3dadd(-106.27, 22, -67, 0.16)
    pt3dadd(-106.38, 22.11, -67, 0.16)
    pt3dadd(-106.43, 22.26, -67, 0.16)
    pt3dadd(-106.53, 22.21, -67, 0.16)
    pt3dadd(-106.64, 22.37, -67, 0.16)
    pt3dadd(-106.8, 22.42, -67, 0.16)
    pt3dadd(-106.9, 22.53, -67, 0.16)
    pt3dadd(-107.01, 22.63, -67, 0.16)
    pt3dadd(-107.11, 22.69, -67, 0.16)
    pt3dadd(-107.22, 22.79, -67, 0.16)
    pt3dadd(-107.27, 22.95, -67, 0.16)
    pt3dadd(-107.43, 23, -67.5, 0.16)
    pt3dadd(-107.43, 23.21, -67.5, 0.16)
    pt3dadd(-107.53, 23.32, -67.5, 0.16)
    pt3dadd(-107.63, 23.42, -67.5, 0.16)
    pt3dadd(-107.74, 23.58, -67.5, 0.16)
    pt3dadd(-107.79, 23.68, -67.5, 0.16)
    pt3dadd(-107.95, 23.79, -67.5, 0.16)
    pt3dadd(-108.05, 23.84, -67.5, 0.16)
    pt3dadd(-108.16, 23.95, -67.5, 0.16)
    pt3dadd(-108.26, 24.05, -67.5, 0.16)
    pt3dadd(-108.32, 24.16, -67.5, 0.16)
    pt3dadd(-108.95, 25.05, -67.5, 0.84)
    pt3dadd(-109.26, 26.16, -67.5, 0.63)
    pt3dadd(-109.26, 26.37, -67.5, 0.63)
    pt3dadd(-109.21, 26.47, -67.5, 0.63)
    pt3dadd(-109.21, 26.58, -67.5, 0.63)
    pt3dadd(-109.26, 26.68, -67.5, 0.63)
    pt3dadd(-109.26, 27.1, -67.5, 0.63)
    pt3dadd(-109.31, 27.26, -67.5, 0.63)
    pt3dadd(-109.52, 28.26, -67, 0.16)
    pt3dadd(-109.63, 28.36, -67, 0.16)
    pt3dadd(-109.73, 28.47, -66.5, 0.16)
    pt3dadd(-109.94, 28.57, -66.5, 0.16)
    pt3dadd(-110.1, 28.84, -66.5, 0.16)
    pt3dadd(-110.26, 28.99, -66.5, 0.16)
    pt3dadd(-110.36, 29.15, -66.5, 0.16)
    pt3dadd(-110.47, 29.26, -66.5, 0.16)
    pt3dadd(-110.47, 29.41, -66.5, 0.16)
    pt3dadd(-110.52, 29.52, -66.5, 0.16)
    pt3dadd(-110.52, 29.73, -66.5, 0.16)
    pt3dadd(-110.68, 29.89, -66.5, 0.16)
    pt3dadd(-110.68, 30.05, -66.5, 0.16)
    pt3dadd(-110.78, 30.15, -66.5, 0.16)
    pt3dadd(-110.84, 30.31, -66.5, 0.16)
    pt3dadd(-110.94, 30.41, -66.5, 0.16)
    pt3dadd(-111.1, 30.57, -66.5, 0.16)
    pt3dadd(-111.2, 30.68, -66.5, 0.16)
    pt3dadd(-111.2, 30.94, -66.5, 0.16)
    pt3dadd(-111.26, 31.04, -66.5, 0.16)
    pt3dadd(-111.36, 31.15, -66.5, 0.16)
    pt3dadd(-111.41, 31.31, -66.5, 0.16)
    pt3dadd(-111.52, 31.41, -66.5, 0.16)
    pt3dadd(-111.57, 31.52, -66.5, 0.16)
    pt3dadd(-111.73, 31.52, -66.5, 0.16)
    pt3dadd(-111.73, 31.67, -66.5, 0.16)
    pt3dadd(-112.15, 32.1, -66.5, 0.16)
    pt3dadd(-112.35, 32.65, -66.5, 0.16)
    pt3dadd(-112.46, 32.7, -66.5, 0.16)
    pt3dadd(-112.62, 32.86, -66.5, 0.16)
    pt3dadd(-112.83, 32.9, -66.5, 0.16)
    pt3dadd(-112.93, 32.96, -66.5, 0.16)
    pt3dadd(-113.09, 33.11, -66.5, 0.16)
    pt3dadd(-113.19, 33.17, -67, 0.16)
    pt3dadd(-113.25, 33.38, -67, 0.16)
    pt3dadd(-113.25, 34.22, -67, 0.16)
    pt3dadd(-113.19, 34.38, -67, 0.16)
    pt3dadd(-113.19, 34.64, -67, 0.16)
    pt3dadd(-113.25, 34.75, -67, 0.16)
    pt3dadd(-113.3, 34.96, -67, 0.16)
    pt3dadd(-113.35, 35.06, -67, 0.16)
    pt3dadd(-113.4, 35.17, -67, 0.16)
    pt3dadd(-113.46, 35.27, -67, 0.16)
    pt3dadd(-113.51, 35.38, -67, 0.16)
    pt3dadd(-113.67, 35.43, -67, 0.16)
    pt3dadd(-113.77, 35.59, -67, 0.16)
    pt3dadd(-113.88, 35.75, -67, 0.16)
    pt3dadd(-114.03, 35.79, -67, 0.16)
    pt3dadd(-114.14, 35.85, -67, 0.16)
    pt3dadd(-114.3, 35.96, -67, 0.16)
    pt3dadd(-114.4, 36.06, -67, 0.16)
    pt3dadd(-114.56, 36.11, -67, 0.16)
    pt3dadd(-114.66, 36.22, -67, 0.16)
    pt3dadd(-114.77, 36.33, -67, 0.16)
    pt3dadd(-114.87, 36.33, -66.5, 0.16)
    pt3dadd(-115.03, 36.47, -66.5, 0.16)
    pt3dadd(-115.08, 36.59, -66.5, 0.16)
    pt3dadd(-115.19, 36.69, -66.5, 0.16)
    pt3dadd(-115.29, 36.75, -66.5, 0.16)
    pt3dadd(-115.4, 36.9, -66.5, 0.16)
    pt3dadd(-115.45, 37.01, -66.5, 0.16)
    pt3dadd(-115.56, 37.11, -66.5, 0.16)
    pt3dadd(-115.66, 37.27, -66.5, 0.16)
    pt3dadd(-115.71, 37.38, -66.5, 0.16)
    pt3dadd(-115.82, 37.47, -66.5, 0.16)
    pt3dadd(-115.92, 37.59, -66.5, 0.16)
    pt3dadd(-116.03, 37.74, -66.5, 0.16)
    pt3dadd(-116.08, 37.96, -66.5, 0.16)
    pt3dadd(-116.19, 38.22, -66.5, 0.16)
    pt3dadd(-116.29, 38.32, -66.5, 0.16)
    pt3dadd(-116.34, 38.47, -66, 0.16)
    pt3dadd(-116.4, 38.59, -66, 0.16)
    pt3dadd(-116.45, 38.74, -66, 0.16)
    pt3dadd(-116.45, 38.95, -66, 0.16)
    pt3dadd(-117.23, 39.74, -67, 0.84)
    pt3dadd(-117.97, 40.36, -67, 0.16)
    pt3dadd(-118.07, 40.47, -67, 0.16)
    pt3dadd(-118.18, 40.58, -67, 0.16)
    pt3dadd(-118.23, 40.74, -67, 0.16)
    pt3dadd(-118.34, 40.85, -67, 0.16)
    pt3dadd(-118.44, 41, -67, 0.16)
    pt3dadd(-118.49, 41.16, -67, 0.16)
    pt3dadd(-118.55, 41.37, -67, 0.16)
    pt3dadd(-118.6, 41.53, -67, 0.16)
    pt3dadd(-118.6, 41.63, -67, 0.16)
    pt3dadd(-118.65, 42.48, -67, 0.68)
    pt3dadd(-119.28, 43.74, -67.5, 0.16)
    pt3dadd(-120.19, 45, -67.5, 0.84)
    pt3dadd(-120.67, 45.63, -67.5, 0.21)
    pt3dadd(-121.09, 46.32, -67.5, 0.89)
    pt3dadd(-121.45, 46.68, -67.5, 0.16)
    pt3dadd(-121.51, 46.84, -67.5, 0.16)
    pt3dadd(-121.56, 46.95, -67.5, 0.16)
    pt3dadd(-121.66, 47.05, -67.5, 0.16)
    pt3dadd(-121.82, 47.21, -67.5, 0.16)
    pt3dadd(-121.93, 47.32, -68, 0.16)
    pt3dadd(-122.08, 47.42, -68, 0.16)
    pt3dadd(-122.29, 47.47, -68, 0.16)
    pt3dadd(-122.4, 47.53, -68, 0.16)
    pt3dadd(-122.61, 47.47, -68, 0.16)
    pt3dadd(-122.77, 47.58, -68, 0.16)
    pt3dadd(-122.87, 47.74, -68, 0.16)
    pt3dadd(-122.92, 47.84, -68, 0.16)
    pt3dadd(-123.03, 47.95, -68, 0.16)
    pt3dadd(-123.19, 48.1, -68, 0.16)
    pt3dadd(-123.19, 48.31, -68, 0.16)
    pt3dadd(-123.29, 48.37, -68, 0.16)
    pt3dadd(-123.34, 48.47, -68, 0.16)
    pt3dadd(-123.45, 48.58, -68, 0.16)
    pt3dadd(-123.55, 48.68, -68, 0.16)
    pt3dadd(-123.76, 48.84, -68, 0.16)
    pt3dadd(-123.92, 48.89, -68, 0.16)
    pt3dadd(-124.02, 48.94, -68, 0.16)
    pt3dadd(-124.23, 49, -68, 0.16)
    pt3dadd(-124.34, 49.05, -68, 0.16)
    pt3dadd(-124.34, 49.21, -68, 0.16)
    pt3dadd(-124.44, 49.31, -68, 0.16)
    pt3dadd(-124.81, 49.79, -68, 0.94)
    pt3dadd(-124.81, 49.79, -67.5, 0.94)
  }
  axon[46] {pt3dclear()
    pt3dadd(-124.81, 49.79, -67.5, 0.94)
    pt3dadd(-124.71, 50.52, -66.5, 0.21)
    pt3dadd(-124.71, 50.84, -66.5, 0.21)
    pt3dadd(-124.76, 50.94, -66.5, 0.21)
    pt3dadd(-124.81, 51.05, -66.5, 0.21)
    pt3dadd(-125.39, 51.36, -66.5, 0.68)
    pt3dadd(-125.76, 51.94, -66.5, 0.16)
    pt3dadd(-125.81, 52.15, -66.5, 0.16)
    pt3dadd(-125.81, 52.31, -66.5, 0.16)
    pt3dadd(-125.91, 52.47, -66.5, 0.16)
    pt3dadd(-125.97, 52.57, -66.5, 0.16)
    pt3dadd(-126.02, 52.73, -66.5, 0.16)
    pt3dadd(-126.07, 52.83, -66.5, 0.16)
    pt3dadd(-126.39, 52.83, -66.5, 0.16)
    pt3dadd(-126.39, 52.94, -66.5, 0.16)
    pt3dadd(-126.49, 52.99, -66.5, 0.16)
    pt3dadd(-126.6, 53.05, -66.5, 0.16)
    pt3dadd(-126.7, 53.1, -66.5, 0.16)
    pt3dadd(-126.81, 53.15, -66.5, 0.16)
    pt3dadd(-126.96, 53.15, -66.5, 0.16)
    pt3dadd(-127.07, 53.26, -66.5, 0.16)
    pt3dadd(-127.23, 53.31, -66.5, 0.16)
    pt3dadd(-127.33, 53.41, -66.5, 0.16)
    pt3dadd(-127.44, 53.52, -66.5, 0.16)
    pt3dadd(-127.49, 53.62, -66.5, 0.16)
    pt3dadd(-127.59, 53.73, -66.5, 0.16)
    pt3dadd(-127.75, 53.73, -66.5, 0.16)
    pt3dadd(-127.91, 53.89, -66.5, 0.16)
    pt3dadd(-127.96, 54.04, -66.5, 0.16)
    pt3dadd(-128.12, 54.2, -66.5, 0.16)
    pt3dadd(-128.22, 54.31, -66.5, 0.16)
    pt3dadd(-128.33, 54.41, -66.5, 0.16)
    pt3dadd(-128.38, 54.57, -66.5, 0.16)
    pt3dadd(-128.43, 54.67, -66.5, 0.16)
    pt3dadd(-128.49, 54.89, -66.5, 0.16)
    pt3dadd(-128.54, 55.04, -66.5, 0.16)
    pt3dadd(-128.63, 55.15, -66.5, 0.16)
    pt3dadd(-128.88, 55.85, -66, 0.89)
    pt3dadd(-128.88, 55.75, -66, 0.89)
    pt3dadd(-129.46, 56.53, -66, 0.16)
    pt3dadd(-129.46, 56.69, -66, 0.16)
    pt3dadd(-129.52, 56.9, -66, 0.16)
    pt3dadd(-129.57, 57.11, -66, 0.16)
    pt3dadd(-129.57, 57.27, -66, 0.16)
    pt3dadd(-129.62, 57.48, -66, 0.16)
    pt3dadd(-129.66, 57.64, -66, 0.16)
    pt3dadd(-129.66, 57.85, -66, 0.16)
    pt3dadd(-129.72, 58.01, -66, 0.16)
    pt3dadd(-129.83, 58.11, -66, 0.16)
    pt3dadd(-129.88, 58.27, -65.5, 0.16)
    pt3dadd(-130.41, 59.48, -65.5, 0.89)
    pt3dadd(-130.88, 60.42, -65.5, 0.16)
  }
}
proc shape3d_91() {
  axon[46] {
    pt3dadd(-130.99, 61.27, -65.5, 0.63)
    pt3dadd(-131.04, 61.37, -65.5, 0.63)
    pt3dadd(-131.3, 62.05, -65.5, 0.16)
    pt3dadd(-131.3, 62.42, -66, 0.16)
    pt3dadd(-131.35, 62.58, -66, 0.16)
    pt3dadd(-131.41, 62.68, -66, 0.16)
    pt3dadd(-131.41, 62.95, -66, 0.16)
    pt3dadd(-131.46, 63.05, -66, 0.16)
    pt3dadd(-131.46, 63.16, -66, 0.16)
    pt3dadd(-131.51, 63.37, -66, 0.16)
    pt3dadd(-131.56, 63.53, -66, 0.16)
    pt3dadd(-131.56, 63.74, -66, 0.16)
    pt3dadd(-131.62, 63.89, -66, 0.16)
    pt3dadd(-131.62, 64.09, -66, 0.16)
    pt3dadd(-131.66, 64.26, -66, 0.16)
    pt3dadd(-131.72, 64.37, -65.5, 0.16)
    pt3dadd(-131.93, 64.37, -65.5, 0.16)
    pt3dadd(-132.04, 64.47, -65.5, 0.16)
    pt3dadd(-132.19, 64.58, -65.5, 0.16)
    pt3dadd(-132.35, 64.63, -65.5, 0.16)
    pt3dadd(-132.46, 64.68, -65.5, 0.16)
    pt3dadd(-132.46, 64.79, -65.5, 0.16)
    pt3dadd(-132.51, 64.95, -65.5, 0.16)
    pt3dadd(-132.61, 65.05, -65.5, 0.16)
    pt3dadd(-132.66, 65.2, -65.5, 0.16)
    pt3dadd(-132.72, 65.42, -65.5, 0.16)
    pt3dadd(-132.82, 65.58, -65.5, 0.16)
    pt3dadd(-132.88, 65.68, -65.5, 0.16)
    pt3dadd(-132.97, 65.84, -65.5, 0.16)
    pt3dadd(-133.03, 65.94, -65.5, 0.16)
    pt3dadd(-133.13, 66.09, -65.5, 0.16)
    pt3dadd(-133.24, 66.2, -65, 0.16)
    pt3dadd(-133.24, 66.31, -65, 0.16)
    pt3dadd(-133.44, 67.15, -65, 0.94)
    pt3dadd(-134.46, 67.2, -64.5, 0.16)
    pt3dadd(-134.62, 67.31, -64.5, 0.16)
    pt3dadd(-134.78, 67.43, -64.5, 0.16)
    pt3dadd(-134.88, 67.48, -64.5, 0.16)
    pt3dadd(-134.99, 67.48, -64.5, 0.16)
    pt3dadd(-135.19, 67.48, -64.5, 0.16)
    pt3dadd(-135.3, 67.53, -64.5, 0.16)
    pt3dadd(-135.41, 67.53, -64, 0.16)
    pt3dadd(-135.51, 67.64, -64, 0.16)
    pt3dadd(-135.66, 67.69, -64, 0.16)
    pt3dadd(-135.93, 67.69, -64, 0.16)
    pt3dadd(-136.04, 67.73, -63.5, 0.16)
    pt3dadd(-136.13, 67.79, -63.5, 0.16)
    pt3dadd(-136.25, 67.79, -63.5, 0.16)
    pt3dadd(-136.41, 67.9, -63.5, 0.16)
    pt3dadd(-136.56, 67.95, -63.5, 0.16)
    pt3dadd(-136.72, 68.11, -63.5, 0.16)
    pt3dadd(-136.83, 68.16, -63.5, 0.16)
    pt3dadd(-136.93, 68.27, -63.5, 0.16)
    pt3dadd(-137.09, 68.42, -63.5, 0.16)
    pt3dadd(-137.19, 68.48, -63.5, 0.16)
    pt3dadd(-137.3, 68.58, -63.5, 0.16)
    pt3dadd(-137.51, 68.69, -63, 0.16)
    pt3dadd(-137.66, 68.73, -63, 0.16)
    pt3dadd(-137.77, 68.84, -63, 0.16)
    pt3dadd(-137.93, 69, -63, 0.16)
    pt3dadd(-138.03, 69.11, -63, 0.16)
    pt3dadd(-138.13, 69.2, -63, 0.16)
    pt3dadd(-138.19, 69.31, -63, 0.16)
    pt3dadd(-138.24, 69.42, -63, 0.16)
    pt3dadd(-138.29, 69.48, -62.5, 0.16)
    pt3dadd(-138.4, 69.58, -62.5, 0.16)
    pt3dadd(-138.56, 69.63, -62.5, 0.16)
    pt3dadd(-138.77, 69.73, -62.5, 0.16)
    pt3dadd(-138.87, 69.84, -62.5, 0.16)
    pt3dadd(-139.03, 69.84, -62, 0.16)
    pt3dadd(-139.13, 70, -62, 0.16)
    pt3dadd(-139.29, 69.95, -62, 0.16)
    pt3dadd(-139.4, 70, -62, 0.16)
    pt3dadd(-139.5, 70.05, -62, 0.16)
    pt3dadd(-139.76, 70.05, -62, 0.16)
    pt3dadd(-139.91, 70.11, -62, 0.16)
    pt3dadd(-140.08, 70.16, -62, 0.16)
    pt3dadd(-141.08, 70.16, -61.5, 0.16)
    pt3dadd(-141.18, 70.11, -61.5, 0.16)
    pt3dadd(-141.29, 70.16, -61.5, 0.16)
    pt3dadd(-141.5, 70.2, -61.5, 0.16)
    pt3dadd(-141.65, 70.26, -61.5, 0.16)
    pt3dadd(-141.76, 70.42, -61.5, 0.16)
    pt3dadd(-141.86, 70.47, -61.5, 0.16)
    pt3dadd(-141.86, 70.68, -61.5, 0.16)
    pt3dadd(-142.44, 71.05, -61.5, 0.84)
    pt3dadd(-142.65, 71.79, -61.5, 0.16)
    pt3dadd(-142.97, 72.37, -60.5, 0.79)
    pt3dadd(-143.65, 72.52, -60.5, 0.21)
    pt3dadd(-143.81, 72.63, -60, 0.21)
    pt3dadd(-143.91, 72.73, -60, 0.21)
    pt3dadd(-144.02, 72.73, -60, 0.21)
    pt3dadd(-144.07, 72.89, -60, 0.21)
    pt3dadd(-144.12, 73.09, -60, 0.21)
    pt3dadd(-144.16, 73.31, -60, 0.21)
    pt3dadd(-144.28, 73.52, -60, 0.21)
    pt3dadd(-144.28, 73.68, -60, 0.21)
    pt3dadd(-144.44, 73.94, -60, 0.21)
    pt3dadd(-144.49, 74.2, -60, 0.21)
    pt3dadd(-144.54, 74.31, -60, 0.21)
    pt3dadd(-144.65, 74.42, -60, 0.21)
    pt3dadd(-144.8, 74.52, -60, 0.21)
    pt3dadd(-144.8, 74.63, -60, 0.21)
    pt3dadd(-144.91, 74.73, -60, 0.21)
    pt3dadd(-145.07, 74.68, -60, 0.21)
    pt3dadd(-145.16, 74.78, -60, 0.21)
    pt3dadd(-145.28, 74.89, -60, 0.21)
    pt3dadd(-145.43, 74.94, -60, 0.21)
    pt3dadd(-145.49, 75.05, -59.5, 0.21)
    pt3dadd(-145.59, 75.2, -59.5, 0.21)
    pt3dadd(-145.69, 75.36, -59.5, 0.21)
    pt3dadd(-145.8, 75.42, -59, 0.21)
    pt3dadd(-145.91, 75.52, -59, 0.21)
    pt3dadd(-146.06, 75.56, -59, 0.21)
    pt3dadd(-146.16, 75.68, -59, 0.21)
    pt3dadd(-146.38, 75.68, -59, 0.21)
    pt3dadd(-146.54, 75.73, -59, 0.21)
    pt3dadd(-146.63, 75.89, -59, 0.21)
    pt3dadd(-146.75, 75.94, -59, 0.21)
    pt3dadd(-146.8, 75.98, -58.5, 0.21)
    pt3dadd(-146.85, 76.09, -58.5, 0.21)
    pt3dadd(-146.96, 76.36, -58.5, 0.21)
    pt3dadd(-147.01, 76.47, -58.5, 0.21)
    pt3dadd(-147.11, 76.73, -58.5, 0.21)
    pt3dadd(-147.11, 76.94, -58.5, 0.21)
    pt3dadd(-147.22, 77.05, -58.5, 0.21)
    pt3dadd(-147.22, 77.2, -58.5, 0.21)
    pt3dadd(-147.27, 77.41, -58.5, 0.21)
    pt3dadd(-147.32, 77.56, -58.5, 0.21)
    pt3dadd(-147.38, 77.78, -58.5, 0.21)
    pt3dadd(-147.43, 77.89, -58.5, 0.21)
    pt3dadd(-147.53, 78.04, -58.5, 0.21)
    pt3dadd(-147.63, 78.15, -58.5, 0.21)
    pt3dadd(-147.74, 78.36, -58.5, 0.21)
    pt3dadd(-147.85, 78.56, -58.5, 0.21)
    pt3dadd(-147.94, 78.73, -58.5, 0.21)
    pt3dadd(-148.01, 78.94, -58.5, 0.21)
    pt3dadd(-148.06, 79.09, -58.5, 0.21)
    pt3dadd(-148.38, 79.19, -58.5, 0.21)
    pt3dadd(-148.49, 79.25, -58, 0.21)
    pt3dadd(-148.54, 79.34, -58, 0.21)
    pt3dadd(-148.65, 79.45, -58, 0.21)
    pt3dadd(-148.91, 79.45, -58, 0.21)
    pt3dadd(-149.02, 79.61, -57.5, 0.21)
    pt3dadd(-149.12, 79.72, -57.5, 0.21)
    pt3dadd(-149.28, 79.72, -57.5, 0.21)
    pt3dadd(-149.49, 79.56, -57.5, 0.21)
    pt3dadd(-149.86, 80.66, -57.5, 1.05)
    pt3dadd(-150.16, 80.66, -57.5, 1.05)
    pt3dadd(-151.22, 81.14, -56.5, 0.16)
    pt3dadd(-151.33, 81.23, -56.5, 0.16)
    pt3dadd(-151.43, 81.34, -56.5, 0.16)
    pt3dadd(-151.54, 81.4, -56.5, 0.16)
    pt3dadd(-151.63, 81.51, -56.5, 0.16)
    pt3dadd(-151.8, 81.56, -56.5, 0.16)
    pt3dadd(-151.9, 81.51, -56.5, 0.16)
    pt3dadd(-152.06, 81.45, -56.5, 0.16)
    pt3dadd(-152.16, 81.4, -56.5, 0.16)
    pt3dadd(-152.32, 81.34, -56, 0.16)
    pt3dadd(-152.47, 81.34, -56, 0.16)
    pt3dadd(-152.63, 81.3, -56, 0.16)
    pt3dadd(-152.79, 81.19, -56, 0.16)
    pt3dadd(-153.11, 81.19, -55.5, 0.16)
    pt3dadd(-153.27, 81.3, -55.5, 0.16)
    pt3dadd(-153.37, 81.34, -55.5, 0.16)
    pt3dadd(-153.53, 81.4, -55.5, 0.16)
    pt3dadd(-153.74, 81.56, -55.5, 0.16)
    pt3dadd(-153.79, 81.77, -55.5, 0.16)
    pt3dadd(-153.79, 81.93, -55.5, 0.16)
    pt3dadd(-153.84, 82.14, -55, 0.16)
    pt3dadd(-153.84, 82.29, -55, 0.16)
    pt3dadd(-153.9, 82.4, -55, 0.16)
    pt3dadd(-154.05, 82.56, -55, 0.16)
    pt3dadd(-154.26, 82.77, -55, 0.16)
    pt3dadd(-154.37, 82.77, -55, 0.16)
    pt3dadd(-154.47, 82.82, -55, 0.16)
    pt3dadd(-154.58, 82.93, -55, 0.16)
    pt3dadd(-154.68, 83.03, -55, 0.16)
    pt3dadd(-154.41, 83.82, -55, 0.63)
    pt3dadd(-152.58, 84.13, -55, 0.79)
    pt3dadd(-152.79, 84.66, -55, 0.79)
    pt3dadd(-153.58, 85.18, -55, 0.16)
    pt3dadd(-153.63, 85.29, -55.5, 0.16)
    pt3dadd(-153.74, 85.34, -55.5, 0.16)
    pt3dadd(-153.84, 85.29, -55.5, 0.16)
    pt3dadd(-154, 85.08, -56, 0.16)
    pt3dadd(-154.05, 84.92, -56, 0.16)
    pt3dadd(-154.05, 84.66, -56.5, 0.16)
    pt3dadd(-154.47, 84.08, -53, 0.73)
    pt3dadd(-153.68, 83.98, -52.5, 0.16)
    pt3dadd(-153.47, 83.98, -52.5, 0.16)
    pt3dadd(-153.37, 84.03, -52.5, 0.16)
    pt3dadd(-153.21, 83.98, -52.5, 0.16)
    pt3dadd(-152.94, 83.82, -52.5, 0.16)
    pt3dadd(-152.84, 83.66, -52.5, 0.16)
    pt3dadd(-152.79, 83.56, -52.5, 0.16)
    pt3dadd(-152.74, 83.45, -52.5, 0.16)
    pt3dadd(-152.69, 83.24, -52.5, 0.16)
    pt3dadd(-152.53, 83.08, -52, 0.16)
    pt3dadd(-152.41, 82.87, -52, 0.16)
    pt3dadd(-152.32, 82.77, -52, 0.16)
    pt3dadd(-152.32, 82.56, -51.5, 0.16)
    pt3dadd(-152.47, 82.45, -51.5, 0.16)
    pt3dadd(-152.69, 82.4, -51.5, 0.16)
    pt3dadd(-153.05, 82.4, -51.5, 0.16)
    pt3dadd(-153.21, 82.45, -51.5, 0.16)
    pt3dadd(-153.41, 82.45, -51.5, 0.16)
    pt3dadd(-153.58, 82.5, -51.5, 0.16)
    pt3dadd(-153.84, 82.61, -51, 0.16)
    pt3dadd(-153.94, 82.71, -50.5, 0.16)
    pt3dadd(-154.05, 82.82, -50.5, 0.16)
    pt3dadd(-154.16, 82.92, -50.5, 0.16)
    pt3dadd(-154.21, 83.13, -49.5, 0.16)
    pt3dadd(-154.31, 83.24, -49.5, 0.16)
    pt3dadd(-154.37, 83.37, -49.5, 0.16)
    pt3dadd(-154.47, 83.56, -49, 0.16)
    pt3dadd(-154.47, 84.13, -49, 0.16)
    pt3dadd(-154.37, 84.29, -48.5, 0.16)
    pt3dadd(-154.31, 84.45, -48.5, 0.16)
    pt3dadd(-154.26, 84.61, -48.5, 0.16)
    pt3dadd(-154.16, 84.71, -48.5, 0.16)
    pt3dadd(-154.1, 84.87, -48.5, 0.16)
    pt3dadd(-154, 85.08, -48, 0.16)
    pt3dadd(-154, 85.24, -48, 0.16)
    pt3dadd(-153.84, 85.34, -48, 0.16)
    pt3dadd(-153.84, 85.55, -48, 0.16)
    pt3dadd(-153.68, 85.76, -47.5, 0.16)
    pt3dadd(-153.63, 85.92, -47.5, 0.16)
    pt3dadd(-153.53, 86.03, -47.5, 0.16)
    pt3dadd(-153.37, 86.24, -47.5, 0.16)
    pt3dadd(-153.32, 86.34, -47.5, 0.16)
    pt3dadd(-153.16, 86.5, -47.5, 0.16)
    pt3dadd(-153.05, 86.71, -47.5, 0.16)
    pt3dadd(-152.9, 86.87, -47.5, 0.16)
    pt3dadd(-152.79, 87.02, -47.5, 0.16)
    pt3dadd(-152.74, 87.23, -47.5, 0.16)
    pt3dadd(-152.63, 87.5, -47.5, 0.16)
    pt3dadd(-152.58, 87.71, -47.5, 0.16)
    pt3dadd(-152.58, 88.29, -47.5, 0.16)
    pt3dadd(-152.69, 88.39, -47, 0.16)
    pt3dadd(-152.84, 88.55, -47, 0.16)
    pt3dadd(-152.94, 88.6, -47, 0.16)
    pt3dadd(-153.21, 88.65, -47, 0.16)
    pt3dadd(-153.32, 88.76, -47, 0.16)
    pt3dadd(-153.74, 88.76, -47, 0.16)
    pt3dadd(-153.88, 88.65, -47, 0.16)
    pt3dadd(-154, 88.6, -46.5, 0.16)
    pt3dadd(-154.16, 88.55, -46.5, 0.16)
    pt3dadd(-154.37, 88.34, -46.5, 0.16)
  }
}
proc shape3d_92() {
  axon[46] {
    pt3dadd(-154.52, 88.29, -46.5, 0.16)
    pt3dadd(-154.63, 88.18, -46.5, 0.16)
    pt3dadd(-154.84, 88.18, -46.5, 0.16)
    pt3dadd(-155.1, 88.13, -46.5, 0.16)
    pt3dadd(-155.31, 88.02, -46.5, 0.16)
    pt3dadd(-156.68, 88.02, -46.5, 0.16)
    pt3dadd(-156.78, 88.08, -46.5, 0.16)
    pt3dadd(-157.15, 88.08, -46.5, 0.16)
    pt3dadd(-157.25, 87.97, -46.5, 0.16)
    pt3dadd(-157.41, 87.76, -46.5, 0.16)
    pt3dadd(-157.46, 87.6, -46.5, 0.16)
    pt3dadd(-157.52, 87.5, -46.5, 0.16)
    pt3dadd(-157.57, 87.34, -46.5, 0.16)
    pt3dadd(-157.57, 86.97, -46.5, 0.16)
    pt3dadd(-157.62, 86.76, -46.5, 0.16)
    pt3dadd(-157.57, 86.66, -48.5, 0.16)
  }
  axon[47] {pt3dclear()
    pt3dadd(-124.81, 49.79, -67.5, 0.94)
    pt3dadd(-125.45, 49.66, -68, 0.16)
    pt3dadd(-125.51, 49.77, -68, 0.16)
    pt3dadd(-125.61, 49.82, -68, 0.16)
    pt3dadd(-125.72, 49.87, -68, 0.16)
    pt3dadd(-125.87, 49.98, -68, 0.16)
    pt3dadd(-125.98, 50.08, -68, 0.16)
    pt3dadd(-126.19, 50.19, -68, 0.16)
    pt3dadd(-126.24, 50.29, -68, 0.16)
    pt3dadd(-126.35, 50.4, -68, 0.16)
    pt3dadd(-126.4, 50.56, -68, 0.16)
    pt3dadd(-126.5, 50.66, -68, 0.16)
    pt3dadd(-126.56, 50.82, -68, 0.16)
    pt3dadd(-126.61, 51.19, -68, 0.16)
    pt3dadd(-126.66, 51.4, -68, 0.16)
    pt3dadd(-126.77, 51.55, -68, 0.16)
    pt3dadd(-126.82, 51.76, -68, 0.16)
    pt3dadd(-126.92, 51.87, -68, 0.16)
    pt3dadd(-127.03, 52.03, -68, 0.16)
    pt3dadd(-127.13, 52.29, -68, 0.16)
    pt3dadd(-127.19, 52.4, -68, 0.16)
    pt3dadd(-127.24, 52.55, -68, 0.16)
    pt3dadd(-127.76, 53.13, -68, 0.37)
    pt3dadd(-127.76, 53.45, -68.5, 0.37)
    pt3dadd(-127.71, 53.6, -68.5, 0.37)
    pt3dadd(-127.71, 53.82, -68.5, 0.37)
    pt3dadd(-127.76, 53.97, -68.5, 0.37)
    pt3dadd(-127.82, 54.18, -68.5, 0.37)
    pt3dadd(-127.82, 54.34, -68.5, 0.37)
    pt3dadd(-127.87, 54.55, -68.5, 0.37)
    pt3dadd(-127.87, 54.81, -68.5, 0.37)
    pt3dadd(-127.92, 55.08, -68.5, 0.37)
    pt3dadd(-127.97, 55.18, -68.5, 0.37)
    pt3dadd(-128.03, 55.39, -68.5, 0.37)
    pt3dadd(-128.03, 55.5, -68.5, 0.37)
    pt3dadd(-128.08, 55.6, -68.5, 0.37)
    pt3dadd(-128.13, 55.71, -68.5, 0.37)
    pt3dadd(-128.24, 55.92, -68.5, 0.37)
    pt3dadd(-128.24, 56.02, -68.5, 0.37)
    pt3dadd(-128.34, 56.13, -68.5, 0.37)
    pt3dadd(-128.5, 56.39, -68.5, 0.37)
    pt3dadd(-128.6, 56.5, -69, 0.37)
    pt3dadd(-128.76, 56.55, -69, 0.37)
    pt3dadd(-128.87, 56.65, -69, 0.37)
    pt3dadd(-129.02, 56.81, -69, 0.37)
    pt3dadd(-129.13, 56.92, -69, 0.37)
    pt3dadd(-129.34, 56.92, -69, 0.37)
    pt3dadd(-129.44, 56.97, -69, 0.37)
    pt3dadd(-129.5, 57.07, -69, 0.37)
    pt3dadd(-129.71, 57.07, -69, 0.37)
    pt3dadd(-129.76, 57.18, -69, 0.37)
    pt3dadd(-129.97, 57.39, -68.5, 0.37)
    pt3dadd(-130.12, 57.44, -68.5, 0.37)
    pt3dadd(-130.22, 57.55, -68.5, 0.37)
    pt3dadd(-130.33, 57.65, -68.5, 0.37)
    pt3dadd(-130.44, 57.71, -68.5, 0.37)
    pt3dadd(-130.54, 57.81, -68, 0.37)
    pt3dadd(-130.65, 57.86, -68, 0.37)
    pt3dadd(-131.02, 58.49, -68, 0.58)
    pt3dadd(-132.01, 59.39, -68, 0.16)
    pt3dadd(-132.38, 59.76, -68, 0.58)
    pt3dadd(-132.96, 60.28, -68, 0.16)
    pt3dadd(-133.06, 60.39, -68, 0.16)
    pt3dadd(-133.16, 60.49, -68, 0.16)
    pt3dadd(-133.27, 60.6, -68, 0.16)
    pt3dadd(-133.63, 60.54, -68.5, 0.16)
    pt3dadd(-133.8, 60.49, -68.5, 0.16)
    pt3dadd(-134.06, 60.49, -68.5, 0.16)
    pt3dadd(-135.11, 61.07, -68.5, 0.58)
    pt3dadd(-137.07, 62.28, -69, 0.16)
    pt3dadd(-137.54, 63.23, -69.5, 0.79)
    pt3dadd(-138.38, 63.91, -69.5, 0.16)
    pt3dadd(-138.49, 64.02, -69.5, 0.16)
    pt3dadd(-138.59, 64.06, -69.5, 0.16)
    pt3dadd(-138.69, 64.12, -69.5, 0.16)
    pt3dadd(-138.8, 64.17, -69.5, 0.16)
    pt3dadd(-138.91, 64.28, -69.5, 0.16)
    pt3dadd(-139.01, 64.23, -69.5, 0.16)
    pt3dadd(-139.43, 64.23, -69.5, 0.16)
    pt3dadd(-139.54, 64.28, -69.5, 0.16)
    pt3dadd(-139.69, 64.38, -69.5, 0.16)
    pt3dadd(-139.75, 64.48, -69.5, 0.16)
    pt3dadd(-139.91, 64.54, -69.5, 0.16)
    pt3dadd(-140.11, 64.75, -69.5, 0.16)
    pt3dadd(-140.27, 64.8, -69.5, 0.16)
    pt3dadd(-140.38, 64.95, -69.5, 0.16)
    pt3dadd(-140.47, 65.06, -69.5, 0.16)
    pt3dadd(-140.63, 65.23, -69.5, 0.16)
    pt3dadd(-140.74, 65.38, -69.5, 0.16)
    pt3dadd(-140.8, 65.48, -69.5, 0.16)
    pt3dadd(-140.85, 65.65, -69.5, 0.16)
    pt3dadd(-140.94, 65.86, -69.5, 0.16)
    pt3dadd(-141.11, 66.95, -70, 0.84)
    pt3dadd(-141.94, 67.43, -70, 0.16)
    pt3dadd(-142.06, 67.59, -70, 0.16)
    pt3dadd(-142.16, 67.7, -70, 0.16)
    pt3dadd(-142.21, 67.84, -70, 0.16)
    pt3dadd(-142.32, 67.84, -70, 0.16)
    pt3dadd(-142.32, 68.06, -70, 0.16)
    pt3dadd(-142.41, 68.12, -70, 0.16)
    pt3dadd(-142.53, 68.27, -70, 0.16)
    pt3dadd(-142.63, 68.38, -70, 0.16)
    pt3dadd(-142.69, 68.48, -70, 0.16)
    pt3dadd(-143.05, 68.48, -70.5, 0.16)
    pt3dadd(-143.26, 68.48, -70.5, 0.16)
    pt3dadd(-143.63, 68.48, -70.5, 0.16)
    pt3dadd(-143.74, 68.59, -70, 0.16)
    pt3dadd(-144.16, 69.01, -70, 0.16)
    pt3dadd(-144.26, 69.22, -70, 0.16)
    pt3dadd(-144.37, 69.33, -69.5, 0.16)
    pt3dadd(-144.47, 69.48, -69.5, 0.16)
    pt3dadd(-144.63, 69.69, -69.5, 0.16)
    pt3dadd(-144.68, 69.84, -69.5, 0.16)
    pt3dadd(-145.05, 70.84, -70, 0.84)
    pt3dadd(-145.88, 72.48, -70, 0.21)
    pt3dadd(-147.21, 73.31, -70.5, 0.21)
    pt3dadd(-147.26, 73.42, -71, 0.21)
    pt3dadd(-147.37, 73.58, -71, 0.21)
    pt3dadd(-147.47, 73.73, -71, 0.21)
    pt3dadd(-147.47, 73.94, -71, 0.21)
    pt3dadd(-147.58, 74.05, -71, 0.21)
    pt3dadd(-147.63, 74.15, -71, 0.21)
    pt3dadd(-147.63, 74.26, -71, 0.21)
    pt3dadd(-147.72, 74.37, -71, 0.21)
    pt3dadd(-147.88, 74.47, -71, 0.21)
    pt3dadd(-148.15, 75.05, -71, 0.84)
    pt3dadd(-148.36, 75.89, -71.5, 0.21)
    pt3dadd(-148.47, 75.94, -71.5, 0.21)
    pt3dadd(-148.52, 76.05, -71.5, 0.21)
    pt3dadd(-148.68, 76.2, -71.5, 0.21)
    pt3dadd(-148.72, 76.42, -71.5, 0.21)
    pt3dadd(-148.78, 76.56, -72, 0.21)
    pt3dadd(-148.88, 76.68, -72, 0.21)
    pt3dadd(-148.94, 76.84, -72, 0.21)
    pt3dadd(-149.05, 77.05, -72, 0.21)
    pt3dadd(-149.1, 77.2, -72, 0.21)
    pt3dadd(-149.19, 77.31, -72, 0.21)
    pt3dadd(-149.19, 77.52, -72, 0.21)
    pt3dadd(-149.26, 77.62, -72, 0.21)
    pt3dadd(-149.31, 77.83, -72, 0.21)
    pt3dadd(-149.47, 77.83, -72, 0.21)
    pt3dadd(-149.52, 77.94, -72, 0.21)
    pt3dadd(-149.68, 78.04, -72, 0.21)
    pt3dadd(-149.78, 78.15, -72, 0.21)
    pt3dadd(-149.83, 78.26, -72, 0.21)
    pt3dadd(-149.94, 78.31, -72, 0.21)
    pt3dadd(-150.04, 78.41, -72, 0.21)
    pt3dadd(-150.25, 78.47, -72, 0.21)
    pt3dadd(-150.36, 78.52, -72, 0.21)
    pt3dadd(-150.51, 78.56, -72, 0.21)
    pt3dadd(-150.57, 78.68, -72, 0.21)
    pt3dadd(-150.66, 78.83, -72, 0.21)
    pt3dadd(-150.78, 78.83, -72, 0.21)
    pt3dadd(-150.93, 78.89, -71.5, 0.21)
    pt3dadd(-151.41, 79.36, -71.5, 0.21)
    pt3dadd(-151.46, 79.45, -71.5, 0.21)
    pt3dadd(-151.62, 79.62, -71.5, 0.21)
    pt3dadd(-151.83, 79.67, -71.5, 0.21)
    pt3dadd(-151.93, 79.78, -71.5, 0.21)
    pt3dadd(-152.04, 79.83, -71.5, 0.21)
    pt3dadd(-152.25, 79.88, -71.5, 0.21)
    pt3dadd(-152.35, 79.94, -71.5, 0.21)
    pt3dadd(-152.61, 80.04, -71.5, 0.21)
    pt3dadd(-152.66, 80.15, -71.5, 0.21)
    pt3dadd(-152.77, 80.15, -71.5, 0.21)
    pt3dadd(-152.88, 80.2, -71.5, 0.21)
    pt3dadd(-153.09, 80.31, -71.5, 0.21)
    pt3dadd(-153.19, 80.41, -71.5, 0.21)
    pt3dadd(-153.3, 80.52, -71.5, 0.21)
    pt3dadd(-153.77, 80.45, -71.5, 0.94)
    pt3dadd(-154.87, 81.09, -71.5, 0.1)
  }
  axon[48] {pt3dclear()
    pt3dadd(-154.87, 81.09, -71.5, 0.1)
    pt3dadd(-154.87, 80.83, -71.5, 0.1)
    pt3dadd(-154.87, 80.56, -71.5, 0.1)
    pt3dadd(-154.91, 80.45, -71.5, 0.1)
    pt3dadd(-154.91, 80.15, -71.5, 0.1)
    pt3dadd(-155.03, 79.98, -71.5, 0.1)
    pt3dadd(-155.13, 79.94, -71.5, 0.1)
    pt3dadd(-155.55, 79.31, -72, 0.73)
  }
  axon[49] {pt3dclear()
    pt3dadd(-154.87, 81.09, -71.5, 0.1)
    pt3dadd(-155.44, 81.72, -72.5, 0.1)
    pt3dadd(-155.55, 81.83, -72.5, 0.1)
    pt3dadd(-155.66, 81.93, -72.5, 0.1)
    pt3dadd(-155.82, 82.04, -72.5, 0.1)
    pt3dadd(-155.91, 82.15, -72.5, 0.1)
    pt3dadd(-155.97, 82.25, -72.5, 0.1)
    pt3dadd(-156.71, 83.14, -72.5, 1)
    pt3dadd(-158.81, 84.2, -72.5, 0.16)
    pt3dadd(-159.93, 84.56, -72.5, 0.79)
    pt3dadd(-160.56, 84.98, -72.5, 0.16)
    pt3dadd(-160.71, 85.08, -72.5, 0.16)
    pt3dadd(-160.82, 85.19, -72.5, 0.16)
    pt3dadd(-161.61, 85.87, -72.5, 0.58)
    pt3dadd(-162.5, 86.71, -72.5, 0.16)
    pt3dadd(-162.76, 86.76, -72.5, 0.16)
    pt3dadd(-162.87, 86.87, -72.5, 0.16)
    pt3dadd(-163.02, 86.92, -72.5, 0.16)
    pt3dadd(-163.18, 86.97, -72.5, 0.16)
    pt3dadd(-163.49, 86.97, -72.5, 0.16)
    pt3dadd(-163.65, 87.03, -72.5, 0.16)
    pt3dadd(-163.86, 87.08, -72.5, 0.16)
    pt3dadd(-163.86, 87.18, -73, 0.16)
    pt3dadd(-163.97, 87.24, -73, 0.16)
    pt3dadd(-164.23, 87.29, -73, 0.16)
    pt3dadd(-164.33, 87.39, -73, 0.16)
    pt3dadd(-164.49, 87.5, -73, 0.16)
    pt3dadd(-164.6, 87.6, -73, 0.16)
    pt3dadd(-165.44, 88.45, -73, 0.16)
    pt3dadd(-165.54, 88.55, -73, 0.16)
    pt3dadd(-165.65, 88.66, -73, 0.16)
    pt3dadd(-165.75, 88.71, -73, 0.16)
    pt3dadd(-165.91, 88.71, -73, 0.16)
    pt3dadd(-165.96, 88.81, -72.5, 0.16)
    pt3dadd(-166.07, 88.97, -72.5, 0.16)
    pt3dadd(-166.12, 89.08, -72.5, 0.16)
    pt3dadd(-166.22, 89.18, -72.5, 0.16)
    pt3dadd(-166.33, 89.23, -72.5, 0.16)
    pt3dadd(-166.43, 89.34, -72.5, 0.16)
    pt3dadd(-166.59, 89.5, -72.5, 0.52)
    pt3dadd(-167.38, 90.44, -72.5, 0.1)
    pt3dadd(-167.96, 90.76, -71, 0.79)
    pt3dadd(-167.96, 90.76, -71.5, 0.79)
    pt3dadd(-168.32, 91.39, -72.5, 0.16)
    pt3dadd(-168.32, 91.55, -72.5, 0.16)
    pt3dadd(-168.43, 91.65, -72.5, 0.16)
    pt3dadd(-168.53, 91.76, -72.5, 0.16)
    pt3dadd(-168.64, 91.92, -73, 0.16)
    pt3dadd(-168.74, 91.97, -73, 0.16)
    pt3dadd(-168.8, 92.13, -73, 0.16)
    pt3dadd(-168.95, 92.13, -73, 0.16)
    pt3dadd(-169.11, 92.18, -73, 0.16)
    pt3dadd(-169.27, 92.28, -73, 0.16)
    pt3dadd(-169.58, 92.28, -73, 0.16)
  }
}
proc shape3d_93() {
  axon[49] {
    pt3dadd(-169.69, 92.34, -73, 0.16)
    pt3dadd(-169.85, 92.34, -73, 0.16)
    pt3dadd(-169.95, 92.39, -73, 0.16)
    pt3dadd(-170.37, 92.39, -72.5, 0.16)
    pt3dadd(-170.48, 92.44, -72.5, 0.16)
    pt3dadd(-170.69, 92.44, -72.5, 0.16)
    pt3dadd(-170.79, 92.49, -72.5, 0.16)
    pt3dadd(-171.16, 92.49, -72.5, 0.16)
    pt3dadd(-171.26, 92.55, -72.5, 0.16)
    pt3dadd(-171.42, 92.55, -72.5, 0.16)
    pt3dadd(-171.47, 92.65, -72.5, 0.16)
    pt3dadd(-171.58, 92.7, -72.5, 0.16)
    pt3dadd(-171.68, 92.81, -72.5, 0.16)
    pt3dadd(-171.84, 92.91, -72.5, 0.16)
    pt3dadd(-171.95, 92.91, -72.5, 0.16)
    pt3dadd(-172.05, 92.97, -72.5, 0.16)
    pt3dadd(-172.16, 93.07, -72.5, 0.16)
    pt3dadd(-172.26, 93.12, -72.5, 0.16)
    pt3dadd(-172.37, 93.23, -72.5, 0.16)
    pt3dadd(-172.52, 93.33, -72.5, 0.16)
    pt3dadd(-172.63, 93.44, -72.5, 0.16)
    pt3dadd(-172.73, 93.55, -72.5, 0.16)
    pt3dadd(-172.79, 93.7, -73, 0.16)
    pt3dadd(-172.89, 93.81, -73, 0.16)
    pt3dadd(-173, 93.91, -73, 0.16)
    pt3dadd(-173.05, 94.07, -73, 0.16)
    pt3dadd(-173.15, 94.18, -73, 0.16)
    pt3dadd(-173.31, 94.23, -73, 0.16)
    pt3dadd(-173.42, 94.28, -73, 0.16)
    pt3dadd(-173.52, 94.33, -73, 0.16)
    pt3dadd(-173.63, 94.44, -73, 0.16)
    pt3dadd(-173.84, 94.49, -73, 0.16)
    pt3dadd(-173.99, 94.6, -73, 0.16)
    pt3dadd(-174.05, 94.75, -73, 0.16)
    pt3dadd(-174.2, 94.75, -73, 0.16)
    pt3dadd(-174.31, 94.81, -73, 0.16)
    pt3dadd(-174.41, 94.86, -73, 0.16)
    pt3dadd(-174.47, 95.02, -73, 0.16)
    pt3dadd(-174.68, 95.12, -73, 0.16)
    pt3dadd(-174.83, 95.17, -73, 0.16)
    pt3dadd(-175.79, 95.25, -74, 0.79)
    pt3dadd(-176.73, 95.25, -74, 0.16)
    pt3dadd(-176.84, 95.3, -74, 0.16)
    pt3dadd(-176.94, 95.41, -74, 0.16)
    pt3dadd(-177, 95.51, -74, 0.16)
    pt3dadd(-177.21, 95.62, -74, 0.16)
    pt3dadd(-177.31, 95.72, -74, 0.16)
    pt3dadd(-177.47, 95.99, -74, 0.16)
    pt3dadd(-177.63, 96.09, -74, 0.16)
    pt3dadd(-177.73, 96.14, -74, 0.16)
    pt3dadd(-177.84, 96.2, -74, 0.16)
    pt3dadd(-177.94, 96.3, -74, 0.16)
    pt3dadd(-178.05, 96.41, -74, 0.16)
    pt3dadd(-178.2, 96.51, -74, 0.16)
    pt3dadd(-178.2, 96.67, -74, 0.16)
    pt3dadd(-178.36, 96.78, -74, 0.16)
    pt3dadd(-178.47, 96.83, -74, 0.16)
    pt3dadd(-178.52, 96.93, -74, 0.16)
    pt3dadd(-178.68, 97.09, -74, 0.16)
    pt3dadd(-178.83, 97.2, -74, 0.16)
    pt3dadd(-178.89, 97.3, -74, 0.16)
    pt3dadd(-179.1, 97.51, -74, 0.16)
    pt3dadd(-179.25, 97.51, -74, 0.16)
    pt3dadd(-179.3, 97.62, -74, 0.16)
    pt3dadd(-179.41, 97.62, -74, 0.16)
    pt3dadd(-179.62, 97.72, -74, 0.16)
    pt3dadd(-179.78, 97.72, -74, 0.16)
    pt3dadd(-179.88, 97.77, -74, 0.16)
    pt3dadd(-180.2, 97.77, -74, 0.16)
    pt3dadd(-180.3, 97.83, -74, 0.16)
    pt3dadd(-180.51, 97.83, -74, 0.16)
    pt3dadd(-180.67, 97.88, -74, 0.16)
    pt3dadd(-181.09, 97.93, -74, 0.58)
    pt3dadd(-181.93, 98.04, -74, 0.21)
    pt3dadd(-182.24, 98.35, -74.5, 0.63)
    pt3dadd(-182.24, 98.46, -74.5, 0.63)
    pt3dadd(-183.14, 99.3, -74.5, 0.21)
    pt3dadd(-183.66, 99.72, -74, 0.84)
    pt3dadd(-184.61, 99.82, -74, 0.21)
    pt3dadd(-184.76, 99.93, -74, 0.21)
    pt3dadd(-184.87, 100.09, -74, 0.21)
    pt3dadd(-185.08, 100.3, -74.5, 0.21)
    pt3dadd(-185.18, 100.4, -74.5, 0.21)
    pt3dadd(-185.29, 100.51, -74.5, 0.21)
    pt3dadd(-185.34, 100.67, -74.5, 0.21)
    pt3dadd(-185.45, 100.77, -74.5, 0.21)
    pt3dadd(-186.23, 100.77, -74, 0.68)
    pt3dadd(-186.34, 100.88, -74, 0.68)
    pt3dadd(-186.97, 101.19, -74.5, 0.31)
    pt3dadd(-187.13, 101.3, -74.5, 0.31)
    pt3dadd(-187.44, 101.3, -74.5, 0.31)
    pt3dadd(-187.44, 101.19, -74.5, 0.31)
    pt3dadd(-187.55, 101.14, -74.5, 0.31)
    pt3dadd(-187.76, 101.09, -74.5, 0.31)
    pt3dadd(-188.54, 100.82, -75, 1.05)
    pt3dadd(-189.07, 100.77, -74.5, 0.16)
    pt3dadd(-189.23, 100.82, -74.5, 0.16)
    pt3dadd(-189.38, 100.82, -74.5, 0.16)
    pt3dadd(-189.49, 100.88, -74.5, 0.16)
    pt3dadd(-189.7, 100.82, -74.5, 0.16)
    pt3dadd(-189.86, 100.82, -74.5, 0.16)
    pt3dadd(-189.96, 100.93, -74.5, 0.16)
    pt3dadd(-190.12, 100.93, -74.5, 0.16)
    pt3dadd(-190.22, 100.98, -74.5, 0.16)
    pt3dadd(-190.43, 101.09, -74.5, 0.16)
    pt3dadd(-190.59, 101.14, -74.5, 0.16)
    pt3dadd(-190.75, 101.19, -74.5, 0.16)
    pt3dadd(-190.91, 101.19, -74, 0.16)
    pt3dadd(-191.01, 101.24, -74, 0.16)
    pt3dadd(-191.12, 101.35, -74, 0.16)
    pt3dadd(-191.22, 101.4, -74, 0.16)
    pt3dadd(-191.27, 101.51, -74, 0.16)
    pt3dadd(-191.38, 101.61, -74, 0.16)
    pt3dadd(-191.59, 101.61, -74, 0.16)
    pt3dadd(-191.64, 101.77, -74, 0.16)
    pt3dadd(-191.75, 101.77, -74, 0.16)
    pt3dadd(-192.22, 102.03, -75, 0.84)
    pt3dadd(-192.38, 102.14, -75, 0.84)
    pt3dadd(-192.48, 102.3, -75, 0.84)
    pt3dadd(-192.53, 102.35, -74.5, 0.84)
    pt3dadd(-193.06, 102.98, -74.5, 0.16)
    pt3dadd(-193.43, 102.98, -74.5, 0.16)
    pt3dadd(-193.48, 103.14, -74.5, 0.16)
    pt3dadd(-193.69, 103.14, -74.5, 0.16)
    pt3dadd(-193.79, 103.19, -74.5, 0.16)
    pt3dadd(-193.95, 103.19, -74.5, 0.16)
    pt3dadd(-194.06, 103.24, -74.5, 0.16)
    pt3dadd(-194.16, 103.29, -74.5, 0.16)
    pt3dadd(-194.21, 103.4, -74.5, 0.16)
    pt3dadd(-194.37, 103.56, -74.5, 0.16)
    pt3dadd(-194.48, 103.66, -74, 0.16)
    pt3dadd(-194.58, 103.71, -74.5, 0.16)
    pt3dadd(-194.74, 103.82, -74.5, 0.16)
    pt3dadd(-194.84, 103.87, -75, 0.16)
    pt3dadd(-194.95, 103.87, -75, 0.16)
    pt3dadd(-196.31, 103.71, -75, 0.79)
    pt3dadd(-197.69, 103.29, -75, 0.16)
    pt3dadd(-197.53, 103.29, -75, 0.16)
    pt3dadd(-198.69, 103.08, -75, 0.47)
    pt3dadd(-199.05, 103.29, -75, 0.47)
    pt3dadd(-199.53, 102.97, -75, 0.1)
    pt3dadd(-200.21, 102.5, -75.5, 0.73)
    pt3dadd(-201.05, 102.5, -76.5, 0.16)
    pt3dadd(-201.21, 102.5, -76.5, 0.16)
    pt3dadd(-201.31, 102.45, -76.5, 0.16)
    pt3dadd(-201.36, 102.29, -76.5, 0.16)
    pt3dadd(-201.52, 102.08, -76.5, 0.16)
    pt3dadd(-201.63, 101.97, -76.5, 0.16)
    pt3dadd(-201.84, 101.92, -76, 0.16)
    pt3dadd(-201.99, 102.03, -75.5, 0.16)
    pt3dadd(-202.05, 102.13, -75.5, 0.16)
    pt3dadd(-202.1, 102.24, -75.5, 0.16)
    pt3dadd(-202.36, 102.24, -75.5, 0.16)
    pt3dadd(-202.68, 102.29, -75, 0.16)
    pt3dadd(-202.94, 102.34, -75, 0.16)
    pt3dadd(-203.04, 102.29, -75, 0.16)
    pt3dadd(-203.15, 102.29, -75, 0.16)
    pt3dadd(-203.25, 102.18, -75, 0.16)
    pt3dadd(-203.41, 102.13, -75, 0.16)
    pt3dadd(-203.57, 102.03, -75, 0.16)
    pt3dadd(-203.67, 101.97, -75.5, 0.16)
    pt3dadd(-203.78, 101.87, -75.5, 0.16)
    pt3dadd(-203.83, 101.76, -76, 0.16)
    pt3dadd(-203.94, 101.71, -76.5, 0.16)
    pt3dadd(-204.04, 101.61, -76.5, 0.16)
    pt3dadd(-204.2, 101.4, -76.5, 0.16)
    pt3dadd(-204.3, 101.34, -76.5, 0.16)
    pt3dadd(-204.46, 101.24, -76.5, 0.16)
    pt3dadd(-204.99, 101.19, -76.5, 0.16)
    pt3dadd(-205.09, 101.13, -77, 0.16)
    pt3dadd(-205.25, 101.13, -77, 0.16)
    pt3dadd(-205.46, 101.08, -77, 0.16)
    pt3dadd(-205.62, 100.97, -77, 0.16)
    pt3dadd(-205.72, 100.82, -77, 0.16)
    pt3dadd(-205.88, 100.71, -77, 0.16)
    pt3dadd(-206.04, 100.66, -77, 0.16)
    pt3dadd(-206.09, 100.55, -77, 0.16)
    pt3dadd(-206.19, 100.34, -77, 0.16)
    pt3dadd(-206.56, 100.4, -77, 0.16)
    pt3dadd(-206.67, 100.34, -77, 0.16)
    pt3dadd(-206.93, 100.34, -77, 0.16)
    pt3dadd(-207.03, 100.29, -77, 0.16)
    pt3dadd(-207.63, 100.17, -77, 0.16)
    pt3dadd(-208, 100.17, -77, 0.16)
    pt3dadd(-208.15, 100.12, -77, 0.16)
    pt3dadd(-208.21, 100.01, -77.5, 0.16)
    pt3dadd(-208.26, 99.91, -77.5, 0.16)
    pt3dadd(-208.36, 99.86, -77.5, 0.16)
    pt3dadd(-208.36, 99.59, -77.5, 0.16)
    pt3dadd(-208.52, 99.38, -77.5, 0.16)
    pt3dadd(-208.52, 99.17, -77.5, 0.16)
    pt3dadd(-208.63, 99.12, -77.5, 0.16)
    pt3dadd(-208.78, 99.02, -77.5, 0.16)
    pt3dadd(-208.94, 98.91, -77.5, 0.16)
    pt3dadd(-209.1, 98.86, -77.5, 0.16)
    pt3dadd(-209.2, 98.75, -77.5, 0.16)
    pt3dadd(-209.31, 98.65, -77.5, 0.16)
    pt3dadd(-209.36, 98.54, -77.5, 0.16)
    pt3dadd(-209.41, 98.44, -77.5, 0.16)
    pt3dadd(-209.57, 98.44, -77.5, 0.16)
    pt3dadd(-209.73, 98.44, -77.5, 0.16)
    pt3dadd(-209.88, 98.44, -77.5, 0.16)
    pt3dadd(-210.04, 98.39, -77.5, 0.16)
    pt3dadd(-210.36, 98.23, -77.5, 0.16)
    pt3dadd(-210.46, 98.12, -77.5, 0.16)
    pt3dadd(-210.57, 98.02, -78, 0.16)
    pt3dadd(-210.62, 97.91, -78, 0.16)
    pt3dadd(-210.72, 97.65, -78, 0.16)
    pt3dadd(-211.3, 97.65, -78, 0.16)
    pt3dadd(-211.46, 97.6, -78, 0.16)
    pt3dadd(-211.77, 97.6, -78, 0.16)
    pt3dadd(-211.93, 97.54, -78, 0.16)
    pt3dadd(-212.09, 97.49, -78, 0.16)
    pt3dadd(-212.25, 97.49, -78, 0.16)
    pt3dadd(-212.35, 97.39, -78, 0.16)
    pt3dadd(-212.46, 97.33, -78, 0.16)
    pt3dadd(-212.56, 97.23, -78, 0.16)
    pt3dadd(-212.72, 97.33, -78, 0.16)
    pt3dadd(-212.98, 97.33, -78, 0.16)
    pt3dadd(-213.14, 97.39, -78, 0.16)
    pt3dadd(-213.3, 97.6, -78, 0.16)
    pt3dadd(-213.51, 97.7, -78, 0.16)
    pt3dadd(-213.66, 97.75, -78, 0.16)
    pt3dadd(-213.77, 97.75, -78, 0.16)
    pt3dadd(-213.98, 97.86, -78, 0.16)
    pt3dadd(-214.08, 97.91, -78, 0.16)
    pt3dadd(-214.19, 97.96, -78, 0.16)
    pt3dadd(-214.24, 98.02, -78.5, 0.16)
    pt3dadd(-214.4, 98.07, -78.5, 0.16)
    pt3dadd(-214.45, 98.17, -78.5, 0.16)
    pt3dadd(-214.56, 98.28, -78.5, 0.16)
    pt3dadd(-214.66, 98.39, -78.5, 0.16)
    pt3dadd(-214.77, 98.49, -78.5, 0.16)
    pt3dadd(-215.34, 98.44, -78.5, 0.63)
    pt3dadd(-215.92, 98.61, -78.5, 0.16)
    pt3dadd(-216.13, 98.61, -78.5, 0.16)
    pt3dadd(-216.19, 98.72, -78.5, 0.16)
    pt3dadd(-216.55, 98.72, -78.5, 0.16)
    pt3dadd(-216.66, 98.77, -78.5, 0.16)
    pt3dadd(-216.92, 98.77, -78.5, 0.16)
    pt3dadd(-217.08, 98.72, -78.5, 0.16)
    pt3dadd(-217.29, 98.72, -78.5, 0.16)
    pt3dadd(-217.45, 98.67, -79, 0.16)
    pt3dadd(-217.66, 98.72, -79, 0.16)
    pt3dadd(-217.92, 98.72, -79, 0.16)
    pt3dadd(-218.02, 98.72, -79, 0.16)
    pt3dadd(-218.39, 98.77, -79.5, 0.16)
    pt3dadd(-218.55, 98.72, -79.5, 0.16)
    pt3dadd(-218.81, 98.67, -80, 0.16)
  }
}
proc shape3d_94() {
  axon[49] {
    pt3dadd(-218.97, 98.61, -80, 0.16)
    pt3dadd(-219.13, 98.51, -80, 0.16)
    pt3dadd(-219.44, 98.35, -80.5, 0.16)
    pt3dadd(-219.7, 98.09, -80.5, 0.16)
    pt3dadd(-219.86, 97.98, -81, 0.16)
    pt3dadd(-220.02, 97.93, -81, 0.16)
    pt3dadd(-220.18, 97.88, -81, 0.16)
    pt3dadd(-220.28, 97.83, -81, 0.16)
    pt3dadd(-220.39, 97.67, -81, 0.16)
    pt3dadd(-220.49, 97.46, -81, 0.16)
    pt3dadd(-220.6, 97.46, -81, 0.16)
    pt3dadd(-220.91, 97.14, -81.5, 0.16)
    pt3dadd(-221.02, 97.09, -81.5, 0.16)
    pt3dadd(-221.23, 97.04, -81.5, 0.16)
    pt3dadd(-221.49, 96.83, -81.5, 0.16)
    pt3dadd(-221.75, 96.83, -81.5, 0.16)
    pt3dadd(-221.86, 96.72, -81.5, 0.16)
    pt3dadd(-222.01, 96.67, -81.5, 0.16)
    pt3dadd(-222.17, 96.56, -81.5, 0.16)
    pt3dadd(-222.28, 96.62, -81.5, 0.16)
    pt3dadd(-222.49, 96.56, -81.5, 0.16)
    pt3dadd(-222.64, 96.46, -81.5, 0.16)
    pt3dadd(-222.8, 96.41, -81.5, 0.16)
    pt3dadd(-222.96, 96.35, -81.5, 0.16)
    pt3dadd(-223.06, 96.3, -81.5, 0.16)
    pt3dadd(-223.22, 96.25, -81.5, 0.16)
    pt3dadd(-223.43, 96.2, -81.5, 0.16)
    pt3dadd(-223.64, 96.2, -81.5, 0.16)
    pt3dadd(-223.8, 96.14, -81.5, 0.16)
    pt3dadd(-224.01, 96.14, -81.5, 0.16)
    pt3dadd(-224.16, 96.09, -81.5, 0.16)
    pt3dadd(-224.27, 96.09, -81.5, 0.16)
    pt3dadd(-224.43, 96.04, -81.5, 0.16)
    pt3dadd(-224.58, 96.04, -81.5, 0.16)
    pt3dadd(-224.74, 95.99, -81.5, 0.16)
    pt3dadd(-225.06, 95.99, -81.5, 0.16)
    pt3dadd(-225.27, 95.88, -81.5, 0.16)
    pt3dadd(-225.48, 95.88, -81.5, 0.16)
    pt3dadd(-225.69, 95.83, -81.5, 0.16)
    pt3dadd(-225.84, 95.78, -81.5, 0.16)
    pt3dadd(-226, 95.78, -81.5, 0.16)
    pt3dadd(-226.11, 95.72, -81.5, 0.16)
    pt3dadd(-226.32, 95.67, -81.5, 0.16)
    pt3dadd(-226.42, 95.57, -81.5, 0.16)
    pt3dadd(-226.63, 95.57, -82, 0.16)
    pt3dadd(-226.74, 95.46, -82, 0.16)
    pt3dadd(-226.89, 95.41, -82, 0.16)
    pt3dadd(-227, 95.41, -82, 0.16)
    pt3dadd(-227.37, 94.67, -82, 0.73)
  }
  axon[50] {pt3dclear()
    pt3dadd(-227.37, 94.67, -82, 0.73)
    pt3dadd(-228.31, 94.99, -81.5, 0.16)
    pt3dadd(-228.52, 94.99, -81.5, 0.16)
    pt3dadd(-228.73, 95.09, -82, 0.16)
    pt3dadd(-229.05, 95.09, -82, 0.16)
    pt3dadd(-229.15, 94.88, -82.5, 0.16)
    pt3dadd(-229.15, 94.57, -83, 0.16)
    pt3dadd(-229.68, 94.09, -83, 0.68)
    pt3dadd(-229.78, 94.2, -83, 0.68)
    pt3dadd(-229.89, 94.25, -83, 0.68)
    pt3dadd(-230.04, 94.3, -83.5, 0.68)
    pt3dadd(-230.25, 94.09, -83.5, 0.16)
    pt3dadd(-230.36, 93.99, -84.5, 0.16)
    pt3dadd(-230.36, 93.83, -84.5, 0.16)
    pt3dadd(-230.25, 93.73, -84.5, 0.16)
    pt3dadd(-230.2, 93.62, -84.5, 0.16)
    pt3dadd(-230.04, 93.52, -84.5, 0.16)
    pt3dadd(-229.99, 93.46, -85.5, 0.16)
    pt3dadd(-229.94, 93.36, -85.5, 0.16)
    pt3dadd(-229.94, 93.1, -85.5, 0.16)
    pt3dadd(-230.1, 93.1, -86, 0.16)
    pt3dadd(-230.31, 93.04, -86, 0.16)
    pt3dadd(-230.52, 93.04, -86, 0.16)
    pt3dadd(-230.62, 93.15, -86, 0.16)
    pt3dadd(-230.73, 93.2, -86, 0.16)
    pt3dadd(-230.78, 93.31, -86.5, 0.16)
    pt3dadd(-230.88, 93.41, -86.5, 0.16)
    pt3dadd(-230.99, 93.41, -85.5, 0.16)
    pt3dadd(-231.72, 94.41, -86.5, 0.84)
    pt3dadd(-231.72, 94.41, -86, 0.84)
  }
  axon[51] {pt3dclear()
    pt3dadd(-227.37, 94.67, -82, 0.73)
    pt3dadd(-227.37, 93.83, -81.5, 0.16)
    pt3dadd(-227.16, 93.88, -81.5, 0.16)
    pt3dadd(-227.16, 93.73, -81.5, 0.16)
    pt3dadd(-227.05, 93.73, -81.5, 0.16)
    pt3dadd(-226.89, 93.62, -82, 0.16)
    pt3dadd(-226.84, 93.52, -82, 0.16)
    pt3dadd(-226.79, 93.36, -82, 0.16)
    pt3dadd(-226.79, 93.1, -82, 0.16)
    pt3dadd(-226.89, 92.99, -82.5, 0.16)
    pt3dadd(-226.89, 92.88, -82.5, 0.16)
    pt3dadd(-226.84, 92.73, -82.5, 0.16)
    pt3dadd(-227, 92.04, -82.5, 0.58)
    pt3dadd(-226.89, 91.99, -82.5, 0.58)
    pt3dadd(-226.89, 91.83, -82.5, 0.58)
    pt3dadd(-226.79, 91.68, -82.5, 0.58)
    pt3dadd(-226.79, 91.47, -82.5, 0.58)
    pt3dadd(-226.74, 91.31, -82.5, 0.58)
    pt3dadd(-226.63, 91.26, -82.5, 0.58)
    pt3dadd(-226.21, 90.47, -83.5, 0.16)
    pt3dadd(-227.05, 89.52, -84.5, 0.58)
    pt3dadd(-227.05, 89.52, -84, 0.58)
  }
  axon[52] {pt3dclear()
    pt3dadd(-92.2, 12.88, -61, 0.89)
    pt3dadd(-92.66, 12.57, -62, 0.21)
    pt3dadd(-92.92, 12.57, -61.5, 0.21)
    pt3dadd(-93.13, 12.62, -61.5, 0.21)
    pt3dadd(-93.29, 12.57, -61, 0.21)
    pt3dadd(-93.6, 12.57, -61, 0.21)
    pt3dadd(-93.76, 12.51, -61, 0.21)
    pt3dadd(-94.02, 12.57, -61, 0.21)
    pt3dadd(-94.18, 12.57, -61, 0.21)
    pt3dadd(-94.29, 12.51, -61, 0.21)
    pt3dadd(-94.55, 12.51, -61, 0.21)
    pt3dadd(-94.65, 12.57, -61, 0.21)
    pt3dadd(-94.76, 12.67, -61, 0.21)
    pt3dadd(-95.07, 12.67, -61.5, 0.21)
    pt3dadd(-95.18, 12.73, -61.5, 0.21)
    pt3dadd(-95.28, 12.78, -61.5, 0.21)
    pt3dadd(-95.44, 12.78, -61.5, 0.21)
    pt3dadd(-95.6, 12.88, -62, 0.21)
    pt3dadd(-95.81, 12.88, -62, 0.21)
    pt3dadd(-96.28, 12.99, -62, 0.63)
    pt3dadd(-96.39, 13.09, -62, 0.63)
    pt3dadd(-96.49, 13.15, -62, 0.63)
    pt3dadd(-96.54, 13.3, -62, 0.63)
    pt3dadd(-96.65, 13.41, -62, 0.63)
    pt3dadd(-96.75, 13.51, -62.5, 0.63)
    pt3dadd(-96.96, 14.2, -63, 0.21)
    pt3dadd(-97.02, 14.3, -63, 0.21)
    pt3dadd(-97.02, 14.93, -63.5, 0.21)
    pt3dadd(-97.12, 15.04, -63.5, 0.21)
    pt3dadd(-97.28, 15.14, -63.5, 0.21)
    pt3dadd(-97.86, 15.14, -64, 0.21)
    pt3dadd(-98.01, 15.14, -64, 0.21)
    pt3dadd(-98.12, 15.2, -64, 0.21)
    pt3dadd(-98.17, 15.35, -64, 0.21)
    pt3dadd(-98.27, 15.46, -64.5, 0.21)
    pt3dadd(-98.27, 15.72, -64.5, 0.21)
    pt3dadd(-98.22, 15.88, -64.5, 0.21)
    pt3dadd(-98.27, 15.98, -64.5, 0.21)
    pt3dadd(-98.43, 15.98, -64.5, 0.21)
    pt3dadd(-98.54, 15.88, -65, 0.21)
    pt3dadd(-98.75, 15.93, -65, 0.21)
    pt3dadd(-98.96, 16.39, -65.5, 0.84)
    pt3dadd(-99.17, 16.51, -65.5, 0.84)
    pt3dadd(-99.22, 16.62, -65.5, 0.84)
    pt3dadd(-99.43, 16.62, -65.5, 0.84)
    pt3dadd(-99.53, 16.72, -65.5, 0.84)
    pt3dadd(-99.69, 16.72, -65.5, 0.84)
    pt3dadd(-99.8, 16.77, -65.5, 0.84)
    pt3dadd(-100.69, 17.14, -66, 0.16)
    pt3dadd(-100.74, 17.3, -66, 0.16)
    pt3dadd(-100.85, 17.55, -66, 0.16)
    pt3dadd(-100.95, 17.67, -66.5, 0.16)
    pt3dadd(-101.32, 17.67, -66.5, 0.16)
    pt3dadd(-101.48, 17.72, -66.5, 0.16)
    pt3dadd(-101.69, 17.72, -66.5, 0.16)
    pt3dadd(-101.84, 17.77, -66.5, 0.16)
    pt3dadd(-101.95, 17.88, -66.5, 0.16)
    pt3dadd(-102.16, 17.88, -66.5, 0.16)
    pt3dadd(-102.11, 17.98, -67, 0.16)
    pt3dadd(-102.53, 18.46, -67.5, 0.84)
    pt3dadd(-102.63, 18.61, -67, 0.84)
    pt3dadd(-103.37, 18.82, -67.5, 0.1)
    pt3dadd(-103.42, 18.67, -67.5, 0.1)
    pt3dadd(-103.47, 18.55, -67.5, 0.1)
    pt3dadd(-103.47, 18.39, -67.5, 0.1)
    pt3dadd(-103.58, 18.39, -67.5, 0.1)
    pt3dadd(-103.68, 18.35, -67.5, 0.1)
    pt3dadd(-104.36, 18.67, -69, 0.84)
    pt3dadd(-104.42, 18.72, -69.5, 0.84)
    pt3dadd(-104.57, 17.88, -71, 0.16)
    pt3dadd(-104.68, 17.82, -71, 0.16)
    pt3dadd(-104.73, 17.72, -71, 0.16)
    pt3dadd(-104.78, 17.55, -71, 0.16)
    pt3dadd(-104.84, 17.39, -71, 0.16)
    pt3dadd(-104.84, 17.35, -71.5, 0.16)
    pt3dadd(-105.1, 17.3, -71.5, 0.16)
    pt3dadd(-105.15, 17.25, -72, 0.16)
    pt3dadd(-105.26, 17.19, -72, 0.16)
    pt3dadd(-105.36, 16.98, -72, 0.16)
    pt3dadd(-105.41, 16.82, -72, 0.16)
    pt3dadd(-105.41, 16.62, -73, 0.16)
    pt3dadd(-105.57, 16.55, -73.5, 0.16)
    pt3dadd(-105.68, 16.46, -73.5, 0.16)
    pt3dadd(-105.83, 16.51, -73.5, 0.16)
    pt3dadd(-105.89, 16.39, -73.5, 0.16)
    pt3dadd(-105.99, 16.3, -73.5, 0.16)
    pt3dadd(-106.04, 16.14, -73.5, 0.16)
    pt3dadd(-106.04, 15.93, -73.5, 0.16)
    pt3dadd(-105.99, 15.67, -74, 0.16)
    pt3dadd(-106.15, 15.67, -74, 0.16)
    pt3dadd(-106.25, 15.56, -74, 0.16)
    pt3dadd(-106.36, 15.51, -74, 0.16)
    pt3dadd(-106.46, 15.35, -74, 0.16)
    pt3dadd(-106.52, 15.2, -74, 0.16)
    pt3dadd(-106.52, 14.99, -74, 0.16)
    pt3dadd(-106.57, 14.83, -74.5, 0.16)
    pt3dadd(-106.78, 14.72, -74.5, 0.16)
    pt3dadd(-106.94, 14.72, -74.5, 0.16)
    pt3dadd(-107.09, 14.56, -74.5, 0.16)
    pt3dadd(-107.2, 14.46, -74.5, 0.16)
    pt3dadd(-107.25, 14.35, -74.5, 0.16)
    pt3dadd(-107.3, 14.3, -75, 0.16)
    pt3dadd(-107.78, 13.72, -75, 0.89)
    pt3dadd(-107.83, 13.57, -75, 0.89)
    pt3dadd(-107.83, 13.36, -75.5, 0.89)
    pt3dadd(-108.14, 12.57, -75.5, 0.21)
    pt3dadd(-108.2, 12.04, -76.5, 0.84)
    pt3dadd(-108.2, 12.04, -77, 0.84)
  }
  axon[53] {pt3dclear()
    pt3dadd(-108.2, 12.04, -77, 0.84)
    pt3dadd(-108.77, 12.51, -76.5, 0.16)
    pt3dadd(-108.67, 12.57, -76.5, 0.16)
    pt3dadd(-108.62, 12.67, -76.5, 0.16)
    pt3dadd(-108.56, 12.78, -76.5, 0.16)
    pt3dadd(-108.51, 12.94, -77, 0.16)
    pt3dadd(-108.51, 13.25, -77, 0.16)
    pt3dadd(-108.62, 13.3, -77, 0.16)
    pt3dadd(-108.72, 13.36, -77, 0.16)
    pt3dadd(-108.72, 13.46, -77, 0.16)
    pt3dadd(-108.83, 13.51, -77, 0.16)
    pt3dadd(-108.93, 13.62, -77, 0.16)
    pt3dadd(-108.98, 13.83, -77.5, 0.16)
    pt3dadd(-109.09, 13.99, -77.5, 0.16)
    pt3dadd(-109.14, 14.14, -77.5, 0.16)
    pt3dadd(-109.19, 14.25, -77.5, 0.16)
    pt3dadd(-109.35, 14.41, -77.5, 0.16)
    pt3dadd(-109.46, 14.46, -77.5, 0.16)
    pt3dadd(-109.56, 14.51, -77.5, 0.16)
    pt3dadd(-109.67, 14.56, -77.5, 0.16)
    pt3dadd(-109.88, 14.56, -78, 0.16)
    pt3dadd(-110.09, 14.62, -78, 0.16)
    pt3dadd(-110.45, 14.62, -78, 0.16)
    pt3dadd(-110.98, 15.09, -78, 0.94)
    pt3dadd(-110.98, 15.09, -78.5, 0.94)
  }
  axon[54] {pt3dclear()
    pt3dadd(-108.2, 12.04, -77, 0.84)
    pt3dadd(-109.14, 11.99, -77, 0.16)
    pt3dadd(-109.19, 12.09, -77, 0.16)
    pt3dadd(-109.35, 12.15, -77, 0.16)
    pt3dadd(-109.46, 12.25, -77, 0.16)
    pt3dadd(-109.56, 12.36, -77.5, 0.16)
    pt3dadd(-109.72, 12.41, -77.5, 0.16)
    pt3dadd(-109.82, 12.51, -77.5, 0.16)
    pt3dadd(-110.03, 12.57, -78, 0.16)
    pt3dadd(-110.3, 12.57, -78, 0.16)
    pt3dadd(-110.56, 12.46, -78, 0.16)
    pt3dadd(-110.72, 12.36, -78, 0.16)
    pt3dadd(-110.93, 12.25, -78, 0.16)
    pt3dadd(-111.19, 12.36, -78, 0.16)
    pt3dadd(-111.24, 12.46, -78, 0.16)
  }
}
proc shape3d_95() {
  axon[54] {
    pt3dadd(-111.29, 12.57, -78, 0.16)
    pt3dadd(-111.5, 12.57, -78, 0.16)
    pt3dadd(-111.61, 12.67, -78, 0.16)
    pt3dadd(-111.77, 12.83, -78, 0.16)
    pt3dadd(-111.87, 12.94, -78, 0.16)
    pt3dadd(-112.24, 12.94, -78, 0.16)
    pt3dadd(-112.34, 12.99, -78, 0.16)
    pt3dadd(-112.45, 13.04, -78, 0.16)
    pt3dadd(-112.55, 13.09, -78.5, 0.16)
    pt3dadd(-112.87, 13.09, -78.5, 0.16)
    pt3dadd(-113.24, 13.41, -79, 0.89)
  }
  axon[55] {pt3dclear()
    pt3dadd(-82.6, 6.16, -56.5, 0.89)
    pt3dadd(-82.6, 5.32, -56.5, 0.16)
    pt3dadd(-82.81, 5.32, -56.5, 0.16)
    pt3dadd(-82.91, 5.27, -56.5, 0.16)
    pt3dadd(-83.02, 5.21, -56.5, 0.16)
    pt3dadd(-83.12, 5.16, -56.5, 0.16)
    pt3dadd(-83.23, 5.05, -56.5, 0.16)
    pt3dadd(-83.33, 4.9, -56.5, 0.16)
    pt3dadd(-83.44, 4.74, -57, 0.16)
    pt3dadd(-83.44, 4.63, -57, 0.16)
    pt3dadd(-83.54, 4.53, -57, 0.16)
    pt3dadd(-83.65, 4.42, -57, 0.16)
    pt3dadd(-83.7, 4.32, -57, 0.16)
    pt3dadd(-83.75, 4.16, -57, 0.16)
    pt3dadd(-83.86, 4.11, -57, 0.16)
    pt3dadd(-83.91, 4, -57, 0.16)
    pt3dadd(-84.49, 3.27, -57, 0.84)
    pt3dadd(-85.43, 2.85, -56, 0.16)
    pt3dadd(-85.59, 2.9, -56, 0.16)
    pt3dadd(-85.75, 2.95, -56, 0.16)
    pt3dadd(-86.43, 2.95, -56, 0.16)
    pt3dadd(-86.69, 2.9, -56, 0.16)
    pt3dadd(-86.9, 2.85, -56, 0.16)
    pt3dadd(-87.22, 2.79, -56, 0.16)
    pt3dadd(-87.43, 2.69, -56, 0.16)
    pt3dadd(-87.64, 2.58, -56, 0.16)
    pt3dadd(-87.9, 2.52, -56, 0.16)
    pt3dadd(-88.21, 2.48, -56, 0.16)
    pt3dadd(-88.32, 2.37, -56, 0.16)
    pt3dadd(-88.48, 2.27, -56, 0.16)
    pt3dadd(-88.53, 2.16, -55.5, 0.16)
    pt3dadd(-88.63, 2.11, -55.5, 0.16)
    pt3dadd(-88.74, 2.06, -55.5, 0.16)
    pt3dadd(-88.74, 1.9, -55.5, 0.16)
    pt3dadd(-88.9, 1.74, -56, 0.16)
    pt3dadd(-88.95, 1.53, -56, 0.16)
    pt3dadd(-89, 1.43, -56.5, 0.16)
    pt3dadd(-89.05, 1.38, -57, 0.16)
    pt3dadd(-90.14, 1.73, -56, 0.16)
    pt3dadd(-90.14, 1.58, -56, 0.16)
    pt3dadd(-90.29, 1.37, -56, 0.16)
    pt3dadd(-90.4, 1.31, -56.5, 0.16)
    pt3dadd(-90.61, 1.31, -56.5, 0.16)
    pt3dadd(-90.66, 1.15, -56.5, 0.16)
    pt3dadd(-90.98, 1.15, -56.5, 0.16)
    pt3dadd(-91.13, 1.1, -56.5, 0.16)
    pt3dadd(-91.4, 1.1, -56.5, 0.16)
    pt3dadd(-91.55, 1.05, -56.5, 0.16)
    pt3dadd(-91.71, 1.05, -56.5, 0.16)
    pt3dadd(-91.82, 1, -56.5, 0.16)
    pt3dadd(-92.03, 0.95, -56.5, 0.16)
    pt3dadd(-92.18, 0.89, -56.5, 0.16)
    pt3dadd(-92.39, 0.84, -56.5, 0.16)
    pt3dadd(-92.5, 0.84, -56.5, 0.16)
    pt3dadd(-92.71, 0.79, -56.5, 0.16)
    pt3dadd(-92.81, 0.68, -56.5, 0.16)
    pt3dadd(-92.92, 0.57, -56.5, 0.16)
    pt3dadd(-93.18, 0.47, -56.5, 0.16)
    pt3dadd(-93.34, 0.37, -56.5, 0.16)
    pt3dadd(-93.6, 0.31, -56, 0.16)
    pt3dadd(-93.81, 0.26, -56, 0.16)
    pt3dadd(-93.92, 0.26, -56, 0.16)
    pt3dadd(-94.44, 0.26, -56, 0.16)
    pt3dadd(-94.55, 0.21, -56, 0.16)
    pt3dadd(-94.86, 0.21, -56, 0.16)
    pt3dadd(-95.02, 0.26, -56, 0.16)
    pt3dadd(-95.12, 0.37, -56, 0.16)
    pt3dadd(-95.23, 0.47, -56, 0.16)
    pt3dadd(-95.49, 0.47, -56, 0.16)
    pt3dadd(-95.6, 0.52, -56, 0.16)
    pt3dadd(-96.01, 0.52, -56, 0.16)
    pt3dadd(-96.22, 0.57, -56, 0.16)
    pt3dadd(-96.38, 0.52, -56, 0.16)
    pt3dadd(-96.59, 0.37, -56, 0.16)
    pt3dadd(-96.75, 0.31, -56, 0.16)
    pt3dadd(-96.85, 0.21, -56, 0.16)
    pt3dadd(-96.96, 0.1, -56, 0.16)
    pt3dadd(-97.38, 0.1, -56, 0.16)
    pt3dadd(-97.48, 0.16, -56, 0.16)
    pt3dadd(-97.59, 0.26, -56, 0.16)
    pt3dadd(-97.8, 0.31, -56, 0.16)
    pt3dadd(-97.9, 0.37, -56, 0.16)
    pt3dadd(-98.06, 0.47, -56, 0.16)
    pt3dadd(-98.22, 0.63, -56, 0.16)
    pt3dadd(-98.32, 0.68, -56, 0.16)
    pt3dadd(-98.48, 0.79, -55.5, 0.16)
    pt3dadd(-98.59, 0.89, -55.5, 0.16)
    pt3dadd(-98.69, 1, -55.5, 0.16)
    pt3dadd(-98.8, 1.15, -55.5, 0.16)
    pt3dadd(-98.85, 1.26, -55.5, 0.16)
    pt3dadd(-98.95, 1.42, -55.5, 0.16)
    pt3dadd(-99.43, 1.68, -56, 0.89)
    pt3dadd(-100.32, 1.63, -56, 0.16)
    pt3dadd(-100.48, 1.68, -56, 0.16)
    pt3dadd(-100.84, 1.68, -56, 0.16)
    pt3dadd(-101.05, 1.68, -56, 0.16)
    pt3dadd(-101.32, 1.68, -55.5, 0.16)
    pt3dadd(-101.42, 1.73, -55.5, 0.16)
    pt3dadd(-101.58, 1.73, -55.5, 0.16)
    pt3dadd(-101.68, 1.84, -55.5, 0.16)
    pt3dadd(-101.84, 1.94, -55.5, 0.16)
    pt3dadd(-101.95, 2.04, -55.5, 0.16)
    pt3dadd(-102.05, 2.1, -55.5, 0.16)
    pt3dadd(-102.16, 2.21, -55.5, 0.16)
    pt3dadd(-102.31, 2.36, -55.5, 0.16)
    pt3dadd(-102.31, 2.47, -55.5, 0.16)
    pt3dadd(-102.37, 2.57, -55.5, 0.16)
    pt3dadd(-102.47, 2.68, -55.5, 0.16)
    pt3dadd(-102.58, 2.78, -55.5, 0.16)
    pt3dadd(-102.79, 2.94, -55.5, 0.16)
    pt3dadd(-102.84, 3.05, -55.5, 0.16)
    pt3dadd(-103.1, 3.21, -55.5, 0.16)
    pt3dadd(-103.21, 3.26, -55.5, 0.16)
    pt3dadd(-103.31, 3.36, -55.5, 0.16)
    pt3dadd(-103.47, 3.52, -56, 0.16)
    pt3dadd(-103.57, 3.63, -56, 0.16)
    pt3dadd(-103.73, 3.68, -56, 0.16)
    pt3dadd(-103.84, 3.78, -56, 0.16)
    pt3dadd(-103.99, 3.73, -56, 0.16)
    pt3dadd(-104.2, 3.68, -56.5, 0.16)
    pt3dadd(-104.47, 3.42, -56.5, 0.16)
    pt3dadd(-104.52, 3.26, -56.5, 0.16)
    pt3dadd(-104.52, 3, -56, 0.16)
    pt3dadd(-104.57, 2.84, -55.5, 0.16)
    pt3dadd(-104.57, 2.73, -55.5, 0.16)
    pt3dadd(-104.83, 1.89, -54.5, 0.63)
    pt3dadd(-104.89, 2, -54.5, 0.63)
    pt3dadd(-105.31, 1.1, -54.5, 0.16)
    pt3dadd(-105.31, 0.42, -54, 0.16)
    pt3dadd(-105.25, 0.31, -54, 0.16)
    pt3dadd(-105.2, 0.21, -53.5, 0.16)
    pt3dadd(-105.2, 0.1, -53.5, 0.16)
    pt3dadd(-105.15, 0, -53.5, 0.16)
    pt3dadd(-105.15, -0.16, -53.5, 0.16)
    pt3dadd(-105.2, -0.37, -53.5, 0.16)
    pt3dadd(-105.25, -0.47, -53.5, 0.16)
    pt3dadd(-105.31, -0.63, -53.5, 0.16)
    pt3dadd(-105.36, -0.74, -53.5, 0.16)
    pt3dadd(-105.46, -0.79, -53.5, 0.16)
    pt3dadd(-106.04, -1.53, -53.5, 0.84)
    pt3dadd(-107.2, -1.63, -53, 0.16)
    pt3dadd(-107.14, -1.53, -53, 0.16)
    pt3dadd(-107.62, -1.68, -52.5, 0.94)
    pt3dadd(-107.62, -1.79, -52.5, 0.94)
    pt3dadd(-108.61, -2.16, -52, 0.16)
    pt3dadd(-108.77, -2.21, -52, 0.16)
    pt3dadd(-109.35, -2.21, -52, 0.16)
    pt3dadd(-109.51, -2.25, -52, 0.16)
    pt3dadd(-110.08, -2.25, -51.5, 0.16)
    pt3dadd(-110.19, -2.37, -51.5, 0.16)
    pt3dadd(-110.24, -2.52, -51.5, 0.16)
    pt3dadd(-110.35, -2.52, -51.5, 0.16)
    pt3dadd(-110.4, -2.63, -51.5, 0.16)
    pt3dadd(-110.56, -2.89, -51.5, 0.16)
    pt3dadd(-110.71, -3.1, -51.5, 0.16)
    pt3dadd(-110.77, -3.26, -51.5, 0.16)
    pt3dadd(-110.87, -3.47, -51.5, 0.16)
    pt3dadd(-110.92, -3.63, -51.5, 0.16)
    pt3dadd(-111.03, -3.73, -51.5, 0.16)
    pt3dadd(-111.08, -3.89, -51.5, 0.16)
    pt3dadd(-111.19, -4.05, -51.5, 0.16)
    pt3dadd(-111.19, -4.21, -51.5, 0.16)
    pt3dadd(-111.29, -4.21, -51.5, 0.16)
    pt3dadd(-112.02, -4.68, -52.5, 0.16)
    pt3dadd(-112.18, -4.79, -51.5, 0.16)
    pt3dadd(-112.18, -5, -51.5, 0.16)
    pt3dadd(-112.23, -5.09, -51, 0.16)
    pt3dadd(-112.23, -5.31, -51, 0.16)
    pt3dadd(-112.28, -5.42, -51, 0.16)
    pt3dadd(-112.28, -5.68, -51, 0.16)
    pt3dadd(-112.34, -5.89, -51, 0.16)
    pt3dadd(-112.44, -5.99, -51, 0.16)
    pt3dadd(-112.49, -6.15, -51, 0.16)
    pt3dadd(-112.6, -6.31, -51, 0.16)
    pt3dadd(-112.7, -6.42, -51, 0.16)
    pt3dadd(-112.86, -6.52, -51, 0.16)
    pt3dadd(-112.91, -6.68, -51, 0.16)
    pt3dadd(-113.02, -6.68, -50.5, 0.16)
    pt3dadd(-113.12, -6.78, -50.5, 0.16)
    pt3dadd(-113.12, -6.94, -50.5, 0.16)
    pt3dadd(-113.18, -7.1, -50.5, 0.16)
    pt3dadd(-113.28, -7.26, -50.5, 0.16)
    pt3dadd(-113.33, -7.36, -50, 0.16)
    pt3dadd(-113.7, -7.36, -50, 0.16)
    pt3dadd(-113.81, -7.31, -50, 0.16)
    pt3dadd(-114.49, -7.31, -50, 0.16)
    pt3dadd(-114.38, -7.47, -50, 0.16)
    pt3dadd(-114.44, -7.62, -50, 0.16)
    pt3dadd(-114.49, -7.83, -50, 0.16)
    pt3dadd(-114.49, -8.52, -50, 0.16)
    pt3dadd(-114.54, -8.77, -50, 0.16)
    pt3dadd(-114.59, -8.94, -50, 0.16)
    pt3dadd(-114.65, -9.03, -50, 0.16)
    pt3dadd(-114.75, -9.19, -50, 0.16)
    pt3dadd(-114.8, -9.36, -50, 0.16)
    pt3dadd(-114.91, -9.46, -49.5, 0.16)
    pt3dadd(-114.96, -9.57, -49, 0.16)
    pt3dadd(-115.01, -9.67, -49, 0.16)
    pt3dadd(-115.12, -9.83, -49, 0.16)
    pt3dadd(-115.17, -9.94, -49, 0.16)
    pt3dadd(-115.28, -10.1, -49, 0.16)
    pt3dadd(-115.28, -10.31, -49, 0.16)
    pt3dadd(-115.38, -10.41, -49, 0.16)
    pt3dadd(-115.43, -10.52, -48.5, 0.16)
    pt3dadd(-115.85, -11.09, -48.5, 1.05)
    pt3dadd(-116.75, -12.09, -48.5, 0.16)
    pt3dadd(-116.85, -12.2, -48.5, 0.16)
    pt3dadd(-117.11, -12.2, -48.5, 0.16)
    pt3dadd(-117.22, -12.2, -48.5, 0.16)
    pt3dadd(-117.43, -12.25, -48.5, 0.16)
    pt3dadd(-117.8, -12.15, -48.5, 0.68)
    pt3dadd(-118.69, -11.62, -48.5, 0.16)
    pt3dadd(-118.9, -11.3, -48, 0.63)
    pt3dadd(-119, -11.2, -48, 0.63)
    pt3dadd(-119.16, -11.09, -48, 0.63)
    pt3dadd(-119.32, -11.04, -48, 0.63)
    pt3dadd(-119.42, -10.94, -48, 0.63)
    pt3dadd(-119.53, -10.88, -48, 0.63)
    pt3dadd(-119.58, -10.78, -48, 0.63)
    pt3dadd(-120.26, -11.09, -48, 0.21)
    pt3dadd(-120.37, -11.2, -48, 0.21)
    pt3dadd(-120.52, -11.25, -48, 0.21)
    pt3dadd(-120.63, -11.36, -48, 0.21)
    pt3dadd(-120.68, -11.46, -47.5, 0.21)
    pt3dadd(-121, -11.51, -47.5, 0.21)
    pt3dadd(-121.1, -11.62, -47.5, 0.21)
    pt3dadd(-121.26, -11.67, -47.5, 0.21)
    pt3dadd(-121.47, -11.57, -47.5, 0.94)
    pt3dadd(-121.73, -11.57, -47.5, 0.94)
    pt3dadd(-121.94, -11.46, -47.5, 0.94)
    pt3dadd(-122.1, -11.41, -47.5, 0.94)
    pt3dadd(-122.2, -11.41, -47.5, 0.94)
    pt3dadd(-122.31, -11.3, -47.5, 0.94)
    pt3dadd(-122.31, -10.94, -47.5, 0.94)
    pt3dadd(-122.26, -10.73, -47, 0.94)
    pt3dadd(-123.36, -10.1, -46.5, 0.16)
    pt3dadd(-123.36, -9.83, -46.5, 0.16)
    pt3dadd(-123.78, -9.83, -46.5, 0.16)
  }
}
proc shape3d_96() {
  axon[55] {
    pt3dadd(-123.99, -9.88, -46.5, 0.16)
    pt3dadd(-124.15, -10.03, -46.5, 0.16)
    pt3dadd(-124.2, -10.25, -46.5, 0.16)
    pt3dadd(-124.25, -10.46, -46, 0.16)
    pt3dadd(-124.3, -10.62, -46, 0.16)
    pt3dadd(-124.3, -10.83, -46, 0.16)
    pt3dadd(-124.36, -10.99, -46, 0.16)
    pt3dadd(-124.36, -11.3, -46, 0.16)
    pt3dadd(-124.41, -11.46, -45.5, 0.16)
    pt3dadd(-124.51, -11.57, -45.5, 0.16)
    pt3dadd(-124.57, -11.72, -45.5, 0.16)
    pt3dadd(-124.67, -11.94, -45.5, 0.16)
    pt3dadd(-124.72, -12.09, -45.5, 0.16)
    pt3dadd(-124.88, -12.3, -46, 0.16)
    pt3dadd(-124.99, -12.41, -46, 0.16)
    pt3dadd(-124.99, -12.57, -46.5, 0.16)
    pt3dadd(-125.2, -12.83, -46.5, 0.63)
    pt3dadd(-125.2, -12.99, -46.5, 0.63)
    pt3dadd(-125.14, -13.09, -46.5, 0.63)
    pt3dadd(-125.09, -13.2, -46.5, 0.63)
    pt3dadd(-125.09, -13.46, -46.5, 0.63)
    pt3dadd(-125.04, -13.56, -46.5, 0.63)
    pt3dadd(-125.04, -13.83, -46.5, 0.63)
    pt3dadd(-125.09, -13.93, -46.5, 0.63)
    pt3dadd(-125.2, -14.09, -46.5, 0.63)
    pt3dadd(-125.25, -14.25, -46.5, 0.63)
  }
  axon[56] {pt3dclear()
    pt3dadd(-125.25, -14.25, -46.5, 0.63)
    pt3dadd(-125.88, -14.83, -46.5, 0.16)
    pt3dadd(-125.93, -14.93, -46.5, 0.16)
    pt3dadd(-125.98, -15.04, -46.5, 0.16)
    pt3dadd(-126.09, -15.14, -46.5, 0.16)
    pt3dadd(-126.09, -15.4, -46.5, 0.16)
    pt3dadd(-126.25, -15.51, -46.5, 0.16)
    pt3dadd(-126.25, -15.88, -46, 0.16)
    pt3dadd(-126.25, -16.04, -46, 0.16)
    pt3dadd(-126.25, -16.55, -46, 0.16)
    pt3dadd(-126.23, -18.03, -46, 0.94)
    pt3dadd(-126.17, -18.55, -46, 0.05)
    pt3dadd(-126.27, -18.61, -46, 0.05)
    pt3dadd(-126.38, -18.61, -46, 0.05)
    pt3dadd(-126.54, -18.71, -46, 0.05)
    pt3dadd(-126.59, -18.66, -47, 0.05)
    pt3dadd(-126.59, -17.97, -48.5, 0.05)
    pt3dadd(-126.59, -17.87, -47.5, 0.05)
    pt3dadd(-126.69, -17.76, -47.5, 0.05)
    pt3dadd(-126.69, -17.39, -45, 0.05)
    pt3dadd(-126.64, -17.19, -44.5, 0.05)
    pt3dadd(-126.59, -17.07, -44.5, 0.05)
    pt3dadd(-126.54, -16.92, -44.5, 0.05)
    pt3dadd(-126.48, -16.87, -44, 0.05)
    pt3dadd(-126.38, -16.61, -43.5, 0.05)
    pt3dadd(-126.48, -16.45, -43.5, 0.05)
    pt3dadd(-126.54, -16.35, -43.5, 0.05)
    pt3dadd(-126.64, -16.07, -43.5, 0.05)
    pt3dadd(-126.64, -15.66, -43, 0.05)
    pt3dadd(-126.48, -15.45, -43, 0.05)
    pt3dadd(-126.64, -15.45, -42.5, 0.05)
    pt3dadd(-126.8, -15.5, -42.5, 0.05)
    pt3dadd(-126.96, -15.5, -42.5, 0.05)
    pt3dadd(-127.11, -15.5, -42.5, 0.05)
    pt3dadd(-127.59, -15.5, -42, 0.05)
    pt3dadd(-127.69, -15.4, -42, 0.05)
    pt3dadd(-127.69, -15.03, -42, 0.05)
    pt3dadd(-127.74, -14.82, -42, 0.05)
    pt3dadd(-127.59, -14.66, -42, 0.05)
    pt3dadd(-127.38, -14.45, -42, 0.05)
    pt3dadd(-127.27, -14.35, -42, 0.05)
    pt3dadd(-127.32, -14.29, -42.5, 0.05)
    pt3dadd(-127.22, -14.08, -43, 0.52)
    pt3dadd(-126.59, -13.72, -43, 0.16)
    pt3dadd(-126.43, -13.61, -43.5, 0.16)
    pt3dadd(-126.48, -13.56, -44, 0.16)
    pt3dadd(-126.33, -13.4, -44, 0.16)
    pt3dadd(-126.27, -13.24, -43, 0.16)
    pt3dadd(-126.17, -12.93, -43, 0.16)
    pt3dadd(-126.17, -12.82, -41.5, 0.16)
    pt3dadd(-126.27, -12.77, -41.5, 0.16)
    pt3dadd(-126.43, -12.72, -41, 0.16)
    pt3dadd(-126.48, -12.61, -41, 0.16)
    pt3dadd(-126.54, -12.56, -40.5, 0.16)
    pt3dadd(-126.54, -12.24, -40.5, 0.16)
    pt3dadd(-126.48, -12.09, -40, 0.16)
    pt3dadd(-126.33, -12.03, -40, 0.16)
    pt3dadd(-126.27, -12.19, -39, 0.16)
    pt3dadd(-126.22, -12.3, -39, 0.16)
    pt3dadd(-126.17, -12.45, -39, 0.16)
    pt3dadd(-126.17, -12.77, -38, 0.16)
    pt3dadd(-126.12, -12.93, -38, 0.16)
    pt3dadd(-126.01, -13.03, -38, 0.16)
    pt3dadd(-126.06, -13.19, -37.5, 0.16)
    pt3dadd(-126.01, -13.35, -37.5, 0.16)
    pt3dadd(-125.96, -13.45, -37.5, 0.16)
    pt3dadd(-125.91, -13.56, -37.5, 0.16)
    pt3dadd(-125.8, -13.66, -37.5, 0.16)
    pt3dadd(-125.7, -13.77, -37.5, 0.16)
    pt3dadd(-125.59, -13.93, -37.5, 0.16)
    pt3dadd(-125.38, -13.93, -37.5, 0.16)
    pt3dadd(-125.22, -13.98, -37.5, 0.16)
    pt3dadd(-125.17, -14.08, -37.5, 0.16)
    pt3dadd(-124.59, -14.72, -37.5, 0.58)
    pt3dadd(-123.91, -15.08, -37.5, 0.26)
    pt3dadd(-123.28, -15.87, -38, 1)
    pt3dadd(-123.28, -15.87, -38.5, 1)
  }
  axon[57] {pt3dclear()
    pt3dadd(-125.25, -14.25, -46.5, 0.63)
    pt3dadd(-125.13, -15.51, -46, 0.21)
    pt3dadd(-125.07, -15.61, -46, 0.21)
    pt3dadd(-125.02, -15.77, -46, 0.21)
    pt3dadd(-124.92, -15.93, -46, 0.21)
    pt3dadd(-125.02, -16.67, -46.5, 0.94)
    pt3dadd(-124.92, -18.03, -46.5, 0.21)
    pt3dadd(-124.39, -19.14, -46.5, 0.89)
    pt3dadd(-124.39, -19.14, -46, 0.89)
  }
  axon[58] {pt3dclear()
    pt3dadd(-67.39, 9.02, -54.5, 0.16)
    pt3dadd(-67.02, 9.23, -52.5, 0.26)
    pt3dadd(-66.87, 9.23, -52.5, 0.26)
    pt3dadd(-66.76, 9.34, -52.5, 0.26)
    pt3dadd(-66.76, 9.5, -52.5, 0.26)
    pt3dadd(-66.7, 9.6, -52.5, 0.26)
    pt3dadd(-66.66, 9.81, -52.5, 0.26)
    pt3dadd(-66.7, 10.02, -52.5, 0.26)
    pt3dadd(-66.81, 10.13, -52.5, 0.26)
    pt3dadd(-66.92, 10.23, -52.5, 0.26)
    pt3dadd(-66.97, 10.34, -52.5, 0.26)
    pt3dadd(-67.02, 10.44, -53, 0.26)
    pt3dadd(-66.97, 10.6, -53, 0.26)
    pt3dadd(-66.76, 10.6, -53, 0.26)
    pt3dadd(-66.34, 10.6, -53.5, 0.26)
    pt3dadd(-66.23, 10.55, -53.5, 0.26)
    pt3dadd(-66.18, 10.44, -54, 0.26)
    pt3dadd(-66.08, 10.44, -54, 0.26)
    pt3dadd(-65.87, 10.23, -54, 0.26)
    pt3dadd(-65.66, 10.18, -54, 0.26)
    pt3dadd(-65.45, 10.18, -54, 0.26)
    pt3dadd(-65.34, 10.13, -54.5, 0.26)
    pt3dadd(-65.13, 10.13, -54.5, 0.26)
    pt3dadd(-65.08, 10.23, -54.5, 0.26)
    pt3dadd(-65.03, 10.34, -54.5, 0.26)
    pt3dadd(-64.98, 10.44, -54.5, 0.26)
    pt3dadd(-64.98, 10.6, -54.5, 0.26)
    pt3dadd(-64.87, 10.71, -54.5, 0.26)
    pt3dadd(-64.7, 10.76, -55, 0.26)
    pt3dadd(-64.61, 10.81, -55, 0.26)
    pt3dadd(-64.45, 10.81, -55.5, 0.26)
    pt3dadd(-64.23, 10.76, -55.5, 0.26)
    pt3dadd(-64.14, 10.81, -56, 0.26)
    pt3dadd(-63.87, 10.81, -56.5, 0.26)
    pt3dadd(-63.77, 10.76, -56.5, 0.26)
    pt3dadd(-63.61, 10.71, -56.5, 0.26)
    pt3dadd(-63.51, 10.71, -56.5, 0.26)
    pt3dadd(-63.4, 10.6, -57, 0.26)
    pt3dadd(-63.3, 10.55, -57, 0.26)
    pt3dadd(-63.14, 10.49, -57, 0.26)
    pt3dadd(-62.98, 10.34, -57, 0.26)
    pt3dadd(-62.88, 10.28, -57, 0.26)
    pt3dadd(-62.77, 10.23, -57, 0.26)
    pt3dadd(-62.67, 10.18, -57, 0.26)
    pt3dadd(-62.56, 10.13, -57, 0.26)
    pt3dadd(-62.4, 10.13, -57, 0.26)
    pt3dadd(-62.3, 10.18, -57, 0.26)
    pt3dadd(-62.19, 10.23, -57, 0.26)
    pt3dadd(-61.98, 10.28, -57, 0.26)
    pt3dadd(-61.88, 10.39, -57, 0.26)
    pt3dadd(-61.77, 10.49, -57, 0.26)
    pt3dadd(-61.67, 10.6, -57, 0.26)
    pt3dadd(-61.62, 10.65, -57.5, 0.26)
    pt3dadd(-61.41, 10.76, -57.5, 0.26)
    pt3dadd(-61.25, 10.81, -57.5, 0.26)
    pt3dadd(-61.48, 11.87, -55.5, 0.84)
    pt3dadd(-61.15, 12.26, -55.5, 0.16)
    pt3dadd(-61.1, 12.47, -55.5, 0.16)
    pt3dadd(-61.04, 12.57, -55.5, 0.16)
    pt3dadd(-60.99, 12.73, -55.5, 0.16)
    pt3dadd(-60.99, 12.94, -55.5, 0.16)
    pt3dadd(-60.94, 13.1, -55.5, 0.16)
    pt3dadd(-60.89, 13.31, -55.5, 0.16)
    pt3dadd(-60.78, 13.52, -55.5, 0.16)
    pt3dadd(-60.78, 13.89, -55.5, 0.16)
    pt3dadd(-60.73, 13.99, -56, 0.16)
    pt3dadd(-60.73, 14.2, -56, 0.16)
    pt3dadd(-60.68, 14.36, -56, 0.16)
    pt3dadd(-60.57, 14.47, -56, 0.16)
    pt3dadd(-60.47, 14.57, -56, 0.16)
    pt3dadd(-60.36, 14.68, -56, 0.16)
    pt3dadd(-60.26, 14.84, -56, 0.16)
    pt3dadd(-59.89, 14.99, -56.5, 0.89)
    pt3dadd(-59.84, 14.99, -57, 0.89)
    pt3dadd(-59.15, 15.05, -58, 0.89)
    pt3dadd(-59.26, 15.89, -58, 0.16)
    pt3dadd(-59.1, 15.94, -58.5, 0.16)
    pt3dadd(-59, 16.04, -58.5, 0.16)
    pt3dadd(-58.84, 15.89, -58.5, 0.16)
    pt3dadd(-58.73, 15.83, -58.5, 0.16)
    pt3dadd(-58.68, 15.68, -59, 0.16)
    pt3dadd(-58.58, 15.47, -59, 0.16)
    pt3dadd(-58.52, 15.36, -59, 0.16)
    pt3dadd(-58.42, 15.2, -59, 0.16)
    pt3dadd(-58.31, 15.2, -59, 0.16)
    pt3dadd(-58.1, 15.31, -59.5, 0.16)
    pt3dadd(-58.05, 15.52, -59.5, 0.16)
    pt3dadd(-57.95, 15.68, -60, 0.16)
    pt3dadd(-57.84, 15.78, -60, 0.16)
    pt3dadd(-57.74, 15.83, -60, 0.58)
  }
  axon[59] {pt3dclear()
    pt3dadd(-57.74, 15.83, -60, 0.58)
    pt3dadd(-56.95, 16.04, -60, 0.16)
    pt3dadd(-56.9, 15.99, -61, 0.16)
    pt3dadd(-56.79, 15.89, -61, 0.16)
    pt3dadd(-56.21, 15.26, -60.5, 0.84)
    pt3dadd(-56.11, 15.15, -61, 0.84)
    pt3dadd(-56, 15.15, -61.5, 0.84)
    pt3dadd(-55.74, 15.1, -61.5, 0.84)
    pt3dadd(-55.53, 15.62, -62.5, 0.16)
    pt3dadd(-55.53, 15.68, -64, 0.16)
    pt3dadd(-55.58, 15.83, -64, 0.16)
    pt3dadd(-55.64, 16.04, -64.5, 0.16)
    pt3dadd(-55.43, 15.99, -65, 0.16)
    pt3dadd(-55.27, 15.99, -65, 0.16)
    pt3dadd(-55.11, 16.1, -65, 0.16)
    pt3dadd(-55.01, 16.14, -65, 0.16)
    pt3dadd(-54.95, 16.3, -65.5, 0.16)
    pt3dadd(-54.95, 16.41, -65.5, 0.16)
    pt3dadd(-55.32, 16.52, -66.5, 0.58)
    pt3dadd(-55.43, 16.62, -66.5, 0.58)
    pt3dadd(-55.53, 16.62, -66.5, 0.58)
    pt3dadd(-55.64, 16.68, -66.5, 0.58)
    pt3dadd(-55.74, 16.78, -66.5, 0.58)
    pt3dadd(-55.79, 16.78, -67, 0.58)
    pt3dadd(-55.06, 15.47, -67, 0.16)
    pt3dadd(-54.95, 15.31, -67.5, 0.16)
    pt3dadd(-54.64, 15.31, -67.5, 0.16)
    pt3dadd(-54.53, 15.36, -68, 0.16)
    pt3dadd(-54.38, 15.47, -68, 0.16)
    pt3dadd(-54.27, 15.57, -68, 0.16)
    pt3dadd(-54.11, 15.57, -68, 0.16)
    pt3dadd(-54.06, 15.68, -68, 0.16)
    pt3dadd(-54.01, 15.83, -68, 0.16)
    pt3dadd(-53.9, 15.89, -68.5, 0.16)
    pt3dadd(-53.8, 15.94, -68.5, 0.16)
    pt3dadd(-53.22, 15.94, -69, 0.16)
    pt3dadd(-53.22, 15.73, -69, 0.16)
    pt3dadd(-53.17, 15.41, -69, 0.16)
    pt3dadd(-53.14, 14.99, -71, 0.31)
    pt3dadd(-53.09, 14.89, -71.5, 0.31)
    pt3dadd(-52.99, 14.78, -71, 0.31)
    pt3dadd(-52.72, 14.73, -70.5, 0.52)
    pt3dadd(-52.51, 14.73, -70.5, 0.52)
    pt3dadd(-52.36, 14.68, -70.5, 0.52)
    pt3dadd(-52.25, 14.63, -70.5, 0.52)
    pt3dadd(-52.25, 14.47, -70.5, 0.52)
    pt3dadd(-52.15, 14.41, -70.5, 0.52)
  }
}
proc shape3d_97() {
  axon[59] {
    pt3dadd(-52.04, 14.2, -70.5, 0.52)
    pt3dadd(-51.99, 14.1, -70.5, 0.52)
    pt3dadd(-51.52, 13.63, -70.5, 0.16)
    pt3dadd(-50.94, 13.63, -69.5, 0.16)
    pt3dadd(-50.78, 13.68, -69.5, 0.16)
    pt3dadd(-50.57, 13.63, -69.5, 0.16)
    pt3dadd(-50.41, 13.63, -69.5, 0.16)
    pt3dadd(-50.26, 13.57, -69.5, 0.16)
    pt3dadd(-50.26, 13.52, -70.5, 0.16)
    pt3dadd(-50.05, 13.36, -72, 0.84)
    pt3dadd(-49.89, 13.21, -72, 0.84)
    pt3dadd(-49.78, 13.05, -72, 0.84)
    pt3dadd(-49.57, 12.94, -72, 0.84)
    pt3dadd(-49.57, 12.73, -72, 0.84)
    pt3dadd(-49.47, 12.63, -72.5, 0.84)
    pt3dadd(-49.42, 12.47, -72.5, 0.84)
    pt3dadd(-49.31, 12.31, -72.5, 0.84)
    pt3dadd(-49.26, 12.1, -73, 0.84)
    pt3dadd(-48.89, 11.21, -73, 0.16)
    pt3dadd(-48.79, 11.1, -73.5, 0.16)
    pt3dadd(-48.68, 11, -73.5, 0.16)
    pt3dadd(-48.58, 10.89, -73.5, 0.16)
    pt3dadd(-48.47, 10.84, -73.5, 0.16)
    pt3dadd(-48.37, 10.79, -73.5, 0.16)
    pt3dadd(-48.26, 10.74, -73.5, 0.16)
    pt3dadd(-48.21, 10.68, -74, 0.16)
    pt3dadd(-48.21, 10.1, -74.5, 0.37)
    pt3dadd(-48.16, 10, -75, 0.37)
    pt3dadd(-48.05, 9.89, -75, 0.37)
    pt3dadd(-48.1, 9.68, -75, 0.37)
    pt3dadd(-48.37, 9.16, -75.5, 0.16)
    pt3dadd(-48.42, 9, -76, 0.16)
    pt3dadd(-48.42, 8.63, -76.5, 0.16)
    pt3dadd(-48.37, 8.52, -76.5, 0.16)
    pt3dadd(-48.31, 8.42, -76.5, 0.16)
    pt3dadd(-48.16, 8.32, -76.5, 0.16)
    pt3dadd(-48, 8.26, -76.5, 0.16)
    pt3dadd(-47.74, 8.26, -76.5, 0.16)
    pt3dadd(-47.58, 8.26, -76.5, 0.16)
    pt3dadd(-47.37, 8.11, -77, 0.16)
    pt3dadd(-47.26, 8, -77, 0.16)
    pt3dadd(-47.16, 7.9, -77, 0.16)
    pt3dadd(-47, 7.9, -77, 0.16)
    pt3dadd(-46.69, 7.9, -77, 0.16)
    pt3dadd(-46.53, 7.95, -77, 0.16)
    pt3dadd(-46.43, 8.05, -77, 0.16)
    pt3dadd(-46.27, 8.05, -77, 0.16)
    pt3dadd(-46.16, 8.11, -77, 0.16)
    pt3dadd(-46.16, 8.26, -77, 0.16)
    pt3dadd(-46.11, 8.36, -77.5, 0.16)
    pt3dadd(-45.27, 8, -77.5, 0.84)
    pt3dadd(-44.48, 8, -77.5, 0.16)
    pt3dadd(-44.43, 8.16, -77.5, 0.16)
    pt3dadd(-44.38, 8.36, -78, 0.16)
    pt3dadd(-44.33, 8.47, -78, 0.16)
    pt3dadd(-43.64, 9.05, -77, 0.79)
    pt3dadd(-43.54, 9.11, -77.5, 0.79)
    pt3dadd(-43.38, 9.11, -77.5, 0.79)
    pt3dadd(-43.17, 9.11, -77.5, 0.79)
    pt3dadd(-43.07, 9.11, -77.5, 0.79)
    pt3dadd(-42.96, 9.11, -77.5, 0.79)
    pt3dadd(-42.91, 9.16, -78, 0.79)
    pt3dadd(-42.12, 9.05, -78.5, 0.16)
    pt3dadd(-41.86, 9.84, -78, 0.63)
    pt3dadd(-41.65, 9.89, -77.5, 0.63)
    pt3dadd(-41.54, 10, -77.5, 0.63)
    pt3dadd(-41.39, 9.94, -77.5, 0.63)
    pt3dadd(-41.28, 10.05, -77.5, 0.63)
    pt3dadd(-40.34, 10.47, -77.5, 0.16)
    pt3dadd(-40.22, 10.42, -77.5, 0.16)
    pt3dadd(-39.92, 10.42, -77.5, 0.16)
    pt3dadd(-39.76, 10.37, -77, 0.16)
    pt3dadd(-39.54, 10.37, -77, 0.16)
    pt3dadd(-39.44, 10.31, -77, 0.16)
    pt3dadd(-39.18, 10.31, -77, 0.16)
    pt3dadd(-39.08, 10.26, -77, 0.16)
    pt3dadd(-38.97, 10.21, -77, 0.16)
    pt3dadd(-38.81, 10.16, -77, 0.16)
    pt3dadd(-38.71, 10.1, -77, 0.16)
    pt3dadd(-38.13, 10.52, -78, 0.63)
    pt3dadd(-37.74, 10.22, -78, 0.1)
    pt3dadd(-37.79, 10.06, -78, 0.1)
    pt3dadd(-37.79, 9.69, -78, 0.1)
    pt3dadd(-37.74, 9.58, -78, 0.1)
    pt3dadd(-37.74, 9.43, -78, 0.1)
    pt3dadd(-37.64, 9.27, -78, 0.1)
    pt3dadd(-37.53, 9.16, -78, 0.1)
    pt3dadd(-37.43, 9.06, -78.5, 0.1)
    pt3dadd(-37.27, 9.01, -78.5, 0.1)
    pt3dadd(-37.17, 8.94, -78.5, 0.1)
    pt3dadd(-37.11, 8.85, -78.5, 0.1)
    pt3dadd(-36.9, 8.85, -78.5, 0.1)
    pt3dadd(-36.79, 8.8, -79, 0.1)
    pt3dadd(-36.79, 8.69, -79, 0.1)
    pt3dadd(-36.01, 8.11, -79, 0.84)
    pt3dadd(-35.54, 7.59, -80, 0.16)
    pt3dadd(-35.43, 7.43, -81, 0.16)
    pt3dadd(-35.43, 6.96, -81, 0.16)
    pt3dadd(-35.33, 6.8, -81, 0.16)
    pt3dadd(-34.75, 6.8, -81.5, 0.16)
    pt3dadd(-34.75, 6.48, -81.5, 0.16)
    pt3dadd(-34.86, 6.54, -82, 0.16)
    pt3dadd(-34.96, 6.48, -82, 0.16)
    pt3dadd(-35.07, 6.54, -82, 0.16)
    pt3dadd(-35.17, 6.48, -82, 0.16)
    pt3dadd(-35.33, 6.48, -82, 0.16)
    pt3dadd(-35.38, 6.27, -82, 0.16)
    pt3dadd(-35.43, 5.8, -82.5, 0.68)
    pt3dadd(-35.28, 5.8, -82.5, 0.68)
    pt3dadd(-35.17, 5.69, -83, 0.68)
    pt3dadd(-34.96, 5.75, -83, 0.68)
    pt3dadd(-34.9, 5.64, -83, 0.68)
    pt3dadd(-33.96, 5.59, -83, 0.16)
    pt3dadd(-33.86, 5.64, -83.5, 0.16)
    pt3dadd(-33.75, 5.75, -83.5, 0.16)
    pt3dadd(-33.65, 5.9, -84, 0.16)
    pt3dadd(-33.54, 6.01, -84, 0.16)
    pt3dadd(-33.39, 6.01, -84, 0.16)
    pt3dadd(-32.65, 6.54, -84.5, 0.73)
    pt3dadd(-31.71, 6.8, -85, 0.21)
    pt3dadd(-31.65, 6.85, -85.5, 0.21)
    pt3dadd(-31.6, 7.01, -85.5, 0.21)
    pt3dadd(-31.5, 7.22, -85.5, 0.21)
    pt3dadd(-31.5, 7.43, -86, 0.21)
    pt3dadd(-31.6, 7.85, -86, 0.68)
    pt3dadd(-31.65, 7.8, -86.5, 0.68)
    pt3dadd(-31.08, 8.06, -87.5, 0.16)
    pt3dadd(-30.71, 8.06, -87.5, 0.16)
    pt3dadd(-30.55, 8.11, -87.5, 0.16)
    pt3dadd(-30.34, 8.22, -87.5, 0.16)
    pt3dadd(-30.24, 8.43, -88, 0.16)
    pt3dadd(-30.13, 8.59, -88, 0.16)
    pt3dadd(-29.97, 8.69, -88, 0.16)
    pt3dadd(-29.87, 8.85, -88, 0.16)
    pt3dadd(-29.55, 8.85, -88, 0.16)
    pt3dadd(-29.45, 8.9, -88, 0.16)
    pt3dadd(-29.24, 8.9, -88.5, 0.16)
    pt3dadd(-29.08, 8.74, -89, 0.16)
    pt3dadd(-29.08, 8.59, -89, 0.16)
    pt3dadd(-29.13, 8.48, -89, 0.16)
    pt3dadd(-29.24, 8.27, -89.5, 0.16)
    pt3dadd(-29.29, 8.17, -89.5, 0.16)
    pt3dadd(-29.13, 8.06, -89.5, 0.16)
    pt3dadd(-29.03, 7.95, -89.5, 0.16)
    pt3dadd(-28.92, 7.85, -90, 0.16)
    pt3dadd(-28.87, 8.06, -90, 0.16)
    pt3dadd(-28.77, 8.17, -90, 0.16)
    pt3dadd(-28.66, 8.22, -90, 0.16)
    pt3dadd(-28.5, 8.22, -90, 0.16)
    pt3dadd(-28.35, 8.32, -90, 0.16)
    pt3dadd(-28.24, 8.32, -90, 0.16)
    pt3dadd(-28.14, 8.27, -90.5, 0.16)
    pt3dadd(-27.87, 8.17, -90.5, 0.16)
    pt3dadd(-27.82, 8.17, -91, 0.16)
    pt3dadd(-27.98, 7.38, -91, 0.84)
    pt3dadd(-27.87, 7.38, -91, 0.84)
    pt3dadd(-27.09, 7.17, -91.5, 0.16)
    pt3dadd(-27.14, 7.38, -92, 0.16)
    pt3dadd(-27.14, 8.11, -92.5, 0.16)
    pt3dadd(-27.24, 8.17, -92.5, 0.16)
    pt3dadd(-27.35, 8.27, -92.5, 0.16)
    pt3dadd(-27.51, 8.32, -92.5, 0.16)
    pt3dadd(-27.61, 8.52, -93, 0.16)
    pt3dadd(-27.66, 8.64, -93, 0.16)
    pt3dadd(-27.66, 8.9, -93, 0.16)
    pt3dadd(-27.56, 9.01, -93.5, 0.16)
    pt3dadd(-27.45, 8.94, -93.5, 0.16)
    pt3dadd(-27.35, 9.01, -93.5, 0.16)
    pt3dadd(-27.09, 9.01, -93.5, 0.16)
    pt3dadd(-27.09, 8.94, -94, 0.16)
    pt3dadd(-26.98, 9.06, -94, 0.16)
    pt3dadd(-26.82, 9.01, -94, 0.16)
    pt3dadd(-26.72, 9.22, -94.5, 0.16)
    pt3dadd(-26.72, 9.69, -94.5, 0.16)
    pt3dadd(-26.77, 9.85, -94.5, 0.16)
    pt3dadd(-26.88, 10.06, -94.5, 0.16)
    pt3dadd(-26.88, 10.32, -95, 0.16)
    pt3dadd(-26.72, 10.37, -95, 0.16)
    pt3dadd(-26.56, 10.43, -95, 0.16)
    pt3dadd(-26.35, 10.48, -95, 0.16)
    pt3dadd(-25.83, 10.48, -94.5, 0.16)
    pt3dadd(-25.72, 10.48, -94.5, 0.16)
    pt3dadd(-25.62, 10.43, -94.5, 0.16)
    pt3dadd(-25.51, 10.32, -95, 0.16)
    pt3dadd(-25.41, 10.37, -95, 0.16)
    pt3dadd(-25.3, 10.22, -95.5, 0.16)
    pt3dadd(-25.2, 10.16, -95.5, 0.16)
    pt3dadd(-25.09, 10, -95.5, 0.16)
    pt3dadd(-25.04, 9.9, -95.5, 0.16)
    pt3dadd(-24.93, 9.85, -95.5, 0.16)
    pt3dadd(-24.83, 9.78, -95.5, 0.16)
    pt3dadd(-24.72, 9.74, -95.5, 0.16)
    pt3dadd(-24.51, 9.69, -96, 0.16)
    pt3dadd(-24.41, 9.69, -96, 0.16)
    pt3dadd(-24.3, 9.74, -96, 0.16)
    pt3dadd(-24.04, 9.74, -96.5, 0.16)
    pt3dadd(-23.94, 9.64, -96.5, 0.16)
    pt3dadd(-23.83, 9.52, -96.5, 0.16)
    pt3dadd(-23.78, 9.43, -96.5, 0.16)
    pt3dadd(-23.78, 9.16, -96.5, 0.16)
    pt3dadd(-23.88, 9.06, -96.5, 0.16)
    pt3dadd(-23.94, 8.9, -96.5, 0.16)
    pt3dadd(-23.99, 8.8, -96.5, 0.16)
    pt3dadd(-23.94, 8.64, -97, 0.16)
    pt3dadd(-24.09, 8.22, -97, 0.63)
  }
  axon[60] {pt3dclear()
    pt3dadd(-24.09, 8.22, -97, 0.63)
    pt3dadd(-24.72, 7.8, -97, 0.16)
    pt3dadd(-24.83, 7.9, -97, 0.16)
    pt3dadd(-24.93, 7.9, -97, 0.16)
    pt3dadd(-25.04, 8.01, -97, 0.16)
    pt3dadd(-25.14, 8.06, -97, 0.16)
    pt3dadd(-25.3, 8.06, -96.5, 0.16)
    pt3dadd(-25.41, 8.17, -96.5, 0.16)
    pt3dadd(-25.51, 8.06, -96.5, 0.16)
    pt3dadd(-25.62, 7.85, -96.5, 0.16)
    pt3dadd(-25.72, 7.8, -96.5, 0.16)
    pt3dadd(-25.83, 7.69, -96.5, 0.16)
    pt3dadd(-25.93, 7.48, -96.5, 0.16)
    pt3dadd(-26.09, 7.32, -96.5, 0.16)
    pt3dadd(-26.14, 7.22, -97, 0.16)
    pt3dadd(-26.19, 7.11, -97, 0.16)
    pt3dadd(-26.93, 6.38, -97, 0.84)
    pt3dadd(-26.93, 6.54, -97, 0.84)
    pt3dadd(-27.61, 6.17, -97, 0.16)
    pt3dadd(-27.72, 6.17, -96.5, 0.16)
    pt3dadd(-27.82, 6.11, -96.5, 0.16)
    pt3dadd(-27.93, 6.11, -96.5, 0.16)
    pt3dadd(-28.03, 6.06, -96.5, 0.16)
    pt3dadd(-28.5, 5.85, -97, 0.58)
    pt3dadd(-28.45, 5.75, -97, 0.58)
    pt3dadd(-28.56, 5.75, -97, 0.58)
    pt3dadd(-29.29, 5.12, -97, 0.16)
    pt3dadd(-30.18, 4.43, -97, 0.16)
    pt3dadd(-30.66, 4.05, -97.5, 0.84)
    pt3dadd(-31.81, 3.17, -97.5, 0.21)
    pt3dadd(-32.52, 2.75, -97.5, 1)
    pt3dadd(-33.4, 1.28, -97.5, 0.16)
    pt3dadd(-33.61, 0.75, -97, 0.58)
    pt3dadd(-34.57, 0.17, -97.5, 0.16)
    pt3dadd(-34.61, -0.04, -97.5, 0.16)
    pt3dadd(-34.72, -0.14, -97.5, 0.16)
    pt3dadd(-34.72, -0.3, -97.5, 0.16)
    pt3dadd(-34.78, -0.46, -97.5, 0.16)
    pt3dadd(-34.83, -0.67, -97.5, 0.16)
    pt3dadd(-34.83, -0.83, -97.5, 0.16)
    pt3dadd(-34.94, -0.93, -98, 0.16)
    pt3dadd(-34.94, -1.13, -98, 0.16)
    pt3dadd(-34.99, -1.25, -98, 0.16)
    pt3dadd(-35.04, -1.41, -98, 0.16)
  }
}
proc shape3d_98() {
  axon[60] {
    pt3dadd(-35.09, -1.56, -98, 0.16)
    pt3dadd(-35.09, -1.72, -98, 0.16)
    pt3dadd(-35.2, -1.83, -98, 0.16)
    pt3dadd(-35.25, -2.09, -98, 0.16)
    pt3dadd(-35.36, -2.25, -98, 0.16)
    pt3dadd(-35.4, -2.4, -98, 0.16)
    pt3dadd(-35.51, -2.56, -98, 0.16)
    pt3dadd(-35.57, -2.67, -97.5, 0.16)
    pt3dadd(-35.57, -2.82, -97.5, 0.16)
    pt3dadd(-35.67, -2.93, -97.5, 0.16)
    pt3dadd(-35.72, -3.09, -97, 0.16)
    pt3dadd(-36.35, -3.61, -98.5, 0.84)
    pt3dadd(-36.46, -3.67, -98.5, 0.84)
    pt3dadd(-36.51, -3.82, -98.5, 0.84)
    pt3dadd(-36.61, -3.93, -98.5, 0.84)
    pt3dadd(-36.72, -4.03, -98.5, 0.84)
    pt3dadd(-36.67, -4.19, -98, 0.84)
    pt3dadd(-36.67, -4.3, -98, 0.84)
    pt3dadd(-37.61, -4.98, -97.5, 0.16)
    pt3dadd(-38.08, -6.08, -98, 1)
    pt3dadd(-38.35, -6.08, -97.5, 1)
    pt3dadd(-38.45, -6.14, -97.5, 1)
    pt3dadd(-38.56, -6.19, -97.5, 1)
  }
  axon[61] {pt3dclear()
    pt3dadd(-24.09, 8.22, -97, 0.63)
    pt3dadd(-23.12, 8.78, -97.5, 0.16)
    pt3dadd(-23.12, 8.78, -98, 0.16)
    pt3dadd(-21.92, 8.94, -98.5, 0.89)
    pt3dadd(-21.92, 8.94, -98, 0.89)
    pt3dadd(-21.13, 8.88, -98.5, 0.1)
    pt3dadd(-21.13, 9.09, -98.5, 0.1)
    pt3dadd(-21.02, 9.15, -98.5, 0.1)
    pt3dadd(-20.87, 9.36, -99, 0.1)
    pt3dadd(-20.76, 9.36, -99, 0.1)
    pt3dadd(-20.6, 9.41, -99.5, 0.1)
    pt3dadd(-20.5, 9.36, -99.5, 0.1)
    pt3dadd(-20.39, 9.25, -99.5, 0.1)
    pt3dadd(-20.23, 9.19, -99.5, 0.1)
    pt3dadd(-20.13, 9.15, -99.5, 0.1)
    pt3dadd(-19.66, 9.15, -100, 0.1)
    pt3dadd(-19.5, 9.15, -100, 0.1)
    pt3dadd(-19.29, 9.15, -100, 0.1)
    pt3dadd(-18.77, 8.94, -100, 0.79)
    pt3dadd(-18.77, 8.94, -100.5, 0.79)
    pt3dadd(-17.87, 8.88, -100.5, 0.16)
    pt3dadd(-17.61, 9.15, -100.5, 0.16)
    pt3dadd(-17.51, 9.25, -100.5, 0.16)
    pt3dadd(-17.39, 9.25, -100.5, 0.16)
    pt3dadd(-17.3, 9.3, -100.5, 0.16)
    pt3dadd(-17.09, 9.3, -100.5, 0.16)
    pt3dadd(-16.93, 9.25, -100.5, 0.16)
    pt3dadd(-16.72, 9.15, -100.5, 0.16)
    pt3dadd(-16.55, 9.09, -101, 0.16)
    pt3dadd(-16.46, 8.99, -101, 0.16)
    pt3dadd(-16.35, 8.88, -101, 0.16)
    pt3dadd(-15.46, 8.1, -100, 0.63)
    pt3dadd(-15.41, 8.15, -100.5, 0.63)
    pt3dadd(-14.78, 7.31, -100.5, 0.16)
    pt3dadd(-14.73, 7.15, -100.5, 0.16)
    pt3dadd(-14.73, 6.94, -100.5, 0.16)
    pt3dadd(-14.67, 6.78, -100.5, 0.16)
    pt3dadd(-14.57, 6.68, -100.5, 0.16)
    pt3dadd(-14.57, 6.57, -100.5, 0.16)
    pt3dadd(-14.46, 6.52, -100.5, 0.16)
    pt3dadd(-14.36, 6.41, -100.5, 0.16)
    pt3dadd(-14.25, 6.41, -100.5, 0.16)
    pt3dadd(-14.15, 6.31, -101, 0.16)
    pt3dadd(-13.89, 6.2, -101, 0.16)
    pt3dadd(-13.73, 6.2, -101, 0.16)
    pt3dadd(-13.62, 6.1, -101, 0.16)
    pt3dadd(-13.52, 5.99, -101, 0.16)
    pt3dadd(-13.47, 5.78, -101, 0.16)
    pt3dadd(-13.41, 5.62, -101, 0.16)
    pt3dadd(-13.31, 5.52, -101, 0.16)
    pt3dadd(-13.26, 5.36, -101, 0.16)
    pt3dadd(-13.15, 5.26, -101, 0.16)
    pt3dadd(-13.15, 5.05, -101, 0.16)
    pt3dadd(-13.05, 4.94, -101, 0.16)
    pt3dadd(-12.99, 4.84, -101, 0.16)
    pt3dadd(-12.94, 4.68, -101, 0.16)
    pt3dadd(-12.73, 4.51, -101, 0.16)
    pt3dadd(-12.63, 4.3, -101, 0.16)
    pt3dadd(-12.57, 4.2, -101, 0.16)
    pt3dadd(-12.47, 4.15, -101, 0.16)
    pt3dadd(-12.36, 4.09, -101, 0.16)
    pt3dadd(-12.31, 3.89, -101, 0.16)
    pt3dadd(-12.26, 3.78, -101, 0.16)
    pt3dadd(-12.26, 3.63, -101, 0.16)
    pt3dadd(-12.15, 3.57, -101, 0.16)
    pt3dadd(-12.1, 3.47, -101, 0.16)
    pt3dadd(-12.05, 3.36, -101, 0.16)
    pt3dadd(-12, 3.21, -101, 0.16)
    pt3dadd(-11.89, 3.1, -101, 0.16)
    pt3dadd(-11.79, 2.94, -101, 0.16)
    pt3dadd(-11.73, 2.84, -101, 0.16)
    pt3dadd(-11.58, 2.68, -101, 0.16)
    pt3dadd(-11.52, 2.52, -101, 0.16)
    pt3dadd(-11.42, 2.47, -101, 0.16)
    pt3dadd(-11.31, 2.42, -101, 0.16)
    pt3dadd(-11.21, 2.25, -101, 0.16)
    pt3dadd(-11.16, 2.15, -101, 0.16)
    pt3dadd(-11.1, 1.94, -101, 0.16)
    pt3dadd(-11, 2, -101, 0.16)
    pt3dadd(-10.47, 1.05, -101, 0.89)
    pt3dadd(-10.63, 0.89, -101, 0.89)
    pt3dadd(-10.68, 0.79, -101, 0.89)
    pt3dadd(-10.89, -0.47, -101.5, 0.16)
    pt3dadd(-10.95, -0.57, -101.5, 0.16)
    pt3dadd(-11.05, -0.63, -101.5, 0.16)
    pt3dadd(-11.16, -0.79, -101.5, 0.16)
    pt3dadd(-11.21, -0.95, -101.5, 0.16)
    pt3dadd(-11.21, -1.68, -101.5, 0.16)
    pt3dadd(-11.16, -1.79, -101.5, 0.16)
    pt3dadd(-11.21, -1.95, -101.5, 0.16)
    pt3dadd(-11.31, -2.16, -101.5, 0.16)
    pt3dadd(-11.47, -2.94, -101.5, 0.79)
    pt3dadd(-11.41, -3.94, -102, 0.26)
    pt3dadd(-11.36, -4.04, -102, 0.26)
    pt3dadd(-11.31, -4.15, -102, 0.26)
    pt3dadd(-11.26, -4.25, -102, 0.26)
    pt3dadd(-11.26, -4.46, -102, 0.26)
    pt3dadd(-11.2, -4.62, -102, 0.26)
    pt3dadd(-11.2, -4.88, -102, 0.26)
    pt3dadd(-11.06, -5.66, -102, 1)
    pt3dadd(-10.95, -5.92, -102, 1)
    pt3dadd(-11.27, -6.82, -102, 0.16)
    pt3dadd(-11.22, -6.97, -102.5, 0.16)
    pt3dadd(-11.22, -7.55, -103, 0.16)
    pt3dadd(-11.22, -7.76, -103, 0.16)
    pt3dadd(-11.22, -8.08, -103, 0.16)
    pt3dadd(-11.27, -8.18, -103, 0.16)
    pt3dadd(-11.27, -9.13, -103.5, 0.16)
    pt3dadd(-11.22, -9.28, -103.5, 0.16)
    pt3dadd(-11.27, -9.39, -104, 0.16)
    pt3dadd(-11.27, -9.5, -104, 0.16)
    pt3dadd(-11.32, -9.6, -104, 0.16)
    pt3dadd(-11.43, -9.66, -104, 0.16)
    pt3dadd(-11.43, -10.02, -104, 0.16)
    pt3dadd(-11.37, -10.23, -104, 0.16)
    pt3dadd(-11.27, -10.34, -104, 0.16)
    pt3dadd(-11.16, -10.5, -104, 0.16)
    pt3dadd(-11.11, -10.6, -104, 0.16)
    pt3dadd(-11.01, -10.76, -104, 0.16)
    pt3dadd(-11.01, -10.92, -104, 0.16)
    pt3dadd(-10.95, -11.08, -104, 0.16)
    pt3dadd(-10.95, -11.34, -104, 0.16)
    pt3dadd(-10.9, -11.55, -104, 0.16)
    pt3dadd(-10.9, -11.71, -104, 0.16)
    pt3dadd(-10.8, -11.86, -104.5, 0.16)
    pt3dadd(-10.64, -12.02, -104.5, 0.16)
    pt3dadd(-10.11, -12.02, -104.5, 0.16)
    pt3dadd(-9.9, -11.97, -104.5, 0.16)
    pt3dadd(-9.8, -11.92, -104.5, 0.16)
    pt3dadd(-9.75, -12.07, -104.5, 0.16)
    pt3dadd(-9.64, -12.18, -104.5, 0.16)
    pt3dadd(-9.64, -12.44, -104.5, 0.16)
    pt3dadd(-9.53, -12.6, -104.5, 0.16)
    pt3dadd(-9.53, -12.97, -104.5, 0.16)
    pt3dadd(-9.59, -13.07, -104.5, 0.16)
    pt3dadd(-9.59, -13.55, -104.5, 0.16)
    pt3dadd(-9.57, -14.55, -104.5, 0.16)
    pt3dadd(-9.57, -15.39, -105, 0.16)
    pt3dadd(-9.52, -15.45, -105.5, 0.16)
    pt3dadd(-9.05, -16.07, -105.5, 0.79)
    pt3dadd(-8.31, -16.87, -106, 0.31)
    pt3dadd(-7.68, -17.34, -107, 0.94)
    pt3dadd(-7.84, -18.34, -108, 0.21)
    pt3dadd(-7.79, -18.55, -108, 0.21)
    pt3dadd(-7.68, -18.8, -108, 0.21)
    pt3dadd(-7.68, -18.97, -108, 0.21)
    pt3dadd(-7.63, -19.18, -108, 0.21)
    pt3dadd(-7.63, -19.34, -108, 0.21)
    pt3dadd(-7.58, -19.55, -108, 0.21)
    pt3dadd(-7.58, -20.18, -108, 0.21)
    pt3dadd(-7.52, -20.39, -108, 0.21)
    pt3dadd(-7.52, -20.6, -108, 0.21)
    pt3dadd(-7.47, -20.81, -108, 0.21)
    pt3dadd(-7.47, -21.07, -108.5, 0.21)
    pt3dadd(-7.42, -21.18, -108.5, 0.21)
    pt3dadd(-7.16, -21.7, -108, 0.63)
    pt3dadd(-7.05, -21.81, -108, 0.63)
    pt3dadd(-7.42, -22.18, -106.5, 0.73)
    pt3dadd(-6.95, -23.07, -107.5, 0.16)
    pt3dadd(-6.84, -23.17, -107.5, 0.16)
    pt3dadd(-6.74, -23.33, -107.5, 0.16)
    pt3dadd(-6.68, -23.44, -107.5, 0.16)
    pt3dadd(-6.63, -23.65, -107.5, 0.16)
    pt3dadd(-6.58, -23.75, -107.5, 0.16)
    pt3dadd(-6.58, -24.38, -107.5, 0.16)
    pt3dadd(-6.47, -24.65, -107.5, 0.16)
    pt3dadd(-6.42, -24.75, -107.5, 0.16)
    pt3dadd(-6.26, -24.86, -107.5, 0.16)
    pt3dadd(-6.32, -24.96, -107.5, 0.16)
    pt3dadd(-6.01, -25.98, -108, 0.16)
    pt3dadd(-5.91, -26.08, -108.5, 0.16)
    pt3dadd(-5.54, -26.45, -108.5, 0.16)
    pt3dadd(-5.44, -26.56, -108.5, 0.16)
    pt3dadd(-5.33, -26.66, -108.5, 0.16)
    pt3dadd(-5.28, -26.82, -108.5, 0.16)
    pt3dadd(-5.17, -26.82, -108.5, 0.16)
    pt3dadd(-5.17, -27.08, -109, 0.16)
    pt3dadd(-5.12, -27.19, -109, 0.16)
    pt3dadd(-5.01, -27.29, -109, 0.16)
    pt3dadd(-4.96, -27.45, -109, 0.16)
    pt3dadd(-4.86, -27.56, -109, 0.16)
    pt3dadd(-4.8, -27.71, -109, 0.16)
    pt3dadd(-4.91, -27.87, -109, 0.16)
    pt3dadd(-4.91, -28.19, -109.5, 0.16)
    pt3dadd(-5.01, -28.35, -109.5, 0.16)
    pt3dadd(-5.07, -28.56, -109.5, 0.16)
    pt3dadd(-5.07, -28.98, -110, 0.16)
    pt3dadd(-4.96, -29.19, -110, 0.16)
    pt3dadd(-4.91, -29.34, -110, 0.16)
    pt3dadd(-4.75, -29.61, -110, 0.16)
    pt3dadd(-4.49, -29.82, -110, 0.16)
    pt3dadd(-4.33, -30.03, -110, 0.16)
    pt3dadd(-4.23, -30.13, -110.5, 0.16)
    pt3dadd(-4.12, -30.29, -110.5, 0.16)
    pt3dadd(-4.07, -30.4, -110.5, 0.16)
    pt3dadd(-4.01, -30.55, -110.5, 0.16)
    pt3dadd(-4.01, -30.71, -110.5, 0.16)
    pt3dadd(-3.97, -30.87, -110.5, 0.16)
    pt3dadd(-3.86, -31.03, -111, 0.16)
    pt3dadd(-3.76, -31.13, -111, 0.16)
    pt3dadd(-3.76, -31.24, -111, 0.16)
    pt3dadd(-3.6, -31.39, -111.5, 0.16)
    pt3dadd(-3.6, -31.5, -111.5, 0.16)
    pt3dadd(-3.49, -31.5, -111.5, 0.16)
    pt3dadd(-2.65, -32.5, -111, 0.63)
    pt3dadd(-1.5, -33.13, -111, 0.21)
    pt3dadd(-1.45, -33.39, -111, 0.21)
    pt3dadd(-1.29, -33.5, -111, 0.21)
    pt3dadd(-1.18, -33.71, -111, 0.21)
    pt3dadd(-1.12, -33.86, -111, 0.21)
    pt3dadd(-1.03, -34.08, -111, 0.21)
    pt3dadd(-0.97, -34.22, -111, 0.21)
    pt3dadd(-0.97, -34.5, -111, 0.21)
    pt3dadd(-0.92, -34.71, -111, 0.21)
    pt3dadd(-0.87, -34.86, -111, 0.21)
    pt3dadd(-0.76, -34.97, -111, 0.21)
    pt3dadd(-0.76, -35.22, -111, 0.21)
    pt3dadd(-0.66, -35.34, -111, 0.21)
    pt3dadd(-0.5, -35.44, -111, 0.21)
    pt3dadd(-0.5, -35.6, -111, 0.21)
    pt3dadd(-0.34, -35.76, -111, 0.21)
    pt3dadd(-0.24, -35.9, -111, 0.21)
    pt3dadd(-0.13, -36.02, -111, 0.21)
    pt3dadd(-0.03, -36.18, -111, 0.21)
    pt3dadd(0.13, -36.28, -111, 0.21)
    pt3dadd(0.18, -36.44, -111, 0.21)
  }
}
proc shape3d_99() {
  axon[61] {
    pt3dadd(0.28, -36.49, -111, 0.21)
    pt3dadd(0.28, -36.6, -111, 0.21)
    pt3dadd(0.84, -37.03, -111.5, 0.84)
    pt3dadd(1.63, -38.34, -112.5, 0.16)
    pt3dadd(1.73, -38.54, -112.5, 0.16)
    pt3dadd(1.78, -38.71, -112.5, 0.16)
    pt3dadd(1.84, -38.97, -112.5, 0.16)
    pt3dadd(1.94, -39.13, -112.5, 0.16)
    pt3dadd(1.94, -39.45, -112.5, 0.16)
    pt3dadd(1.99, -39.65, -112.5, 0.16)
    pt3dadd(1.99, -39.92, -112.5, 0.16)
    pt3dadd(2.04, -40.02, -112.5, 0.16)
    pt3dadd(2.1, -40.18, -112.5, 0.16)
    pt3dadd(2.1, -40.39, -113, 0.16)
    pt3dadd(2.2, -40.54, -113, 0.16)
    pt3dadd(2.31, -40.76, -113, 0.16)
    pt3dadd(2.41, -41.02, -113, 0.16)
    pt3dadd(2.52, -41.13, -113, 0.16)
    pt3dadd(2.62, -41.23, -113, 0.16)
    pt3dadd(2.68, -41.39, -113, 0.16)
    pt3dadd(2.73, -41.5, -113, 0.16)
    pt3dadd(2.78, -41.6, -113, 0.16)
    pt3dadd(2.89, -41.71, -113, 0.16)
    pt3dadd(2.94, -41.86, -113, 0.16)
    pt3dadd(2.99, -42.02, -113, 0.16)
    pt3dadd(3.36, -42.81, -113, 0.84)
    pt3dadd(3.36, -42.81, -114, 0.84)
  }
  axon[62] {pt3dclear()
    pt3dadd(3.36, -42.81, -114, 0.84)
    pt3dadd(3.99, -43.65, -113.5, 0.16)
    pt3dadd(3.99, -43.86, -114, 0.16)
    pt3dadd(4.15, -43.91, -114, 0.16)
    pt3dadd(4.25, -44.02, -114, 0.16)
    pt3dadd(4.41, -44.07, -114, 0.16)
    pt3dadd(4.51, -44.12, -114, 0.16)
    pt3dadd(4.57, -44.23, -114, 0.16)
    pt3dadd(4.67, -44.39, -114, 0.16)
    pt3dadd(4.78, -44.49, -114, 0.16)
    pt3dadd(4.99, -44.55, -114, 0.16)
    pt3dadd(5.04, -44.65, -114, 0.16)
    pt3dadd(5.14, -44.81, -114, 0.16)
    pt3dadd(5.2, -44.91, -114, 0.16)
    pt3dadd(5.3, -45.02, -114, 0.16)
    pt3dadd(5.35, -45.12, -114, 0.16)
    pt3dadd(5.46, -45.23, -114, 0.16)
    pt3dadd(5.51, -45.33, -114, 0.16)
    pt3dadd(5.56, -45.44, -114, 0.16)
    pt3dadd(5.67, -45.6, -113.5, 0.16)
    pt3dadd(5.77, -45.7, -113.5, 0.16)
    pt3dadd(5.83, -45.81, -113, 0.16)
    pt3dadd(6.04, -45.91, -113, 0.16)
    pt3dadd(6.19, -46.07, -113, 0.16)
    pt3dadd(6.3, -46.07, -113, 0.16)
    pt3dadd(6.4, -46.18, -113, 0.16)
    pt3dadd(6.56, -46.18, -113, 0.16)
    pt3dadd(6.67, -46.23, -113, 0.16)
    pt3dadd(6.77, -46.28, -113, 0.16)
    pt3dadd(6.93, -46.39, -113, 0.16)
    pt3dadd(7.03, -46.44, -113, 0.16)
    pt3dadd(7.24, -46.44, -113, 0.16)
    pt3dadd(7.24, -46.54, -113, 0.16)
    pt3dadd(7.35, -46.54, -113, 0.16)
    pt3dadd(7.45, -46.65, -113, 0.16)
    pt3dadd(7.56, -46.7, -113, 0.16)
    pt3dadd(7.66, -46.81, -113, 0.16)
    pt3dadd(7.87, -46.81, -113, 0.16)
    pt3dadd(7.98, -46.86, -113, 0.16)
    pt3dadd(8.02, -46.96, -113, 0.16)
    pt3dadd(8.14, -47.07, -113, 0.16)
    pt3dadd(8.24, -47.12, -113, 0.16)
    pt3dadd(8.28, -47.23, -113, 0.16)
    pt3dadd(8.4, -47.33, -113, 0.16)
    pt3dadd(8.5, -47.44, -113, 0.16)
    pt3dadd(8.64, -47.57, -113, 0.16)
    pt3dadd(8.74, -47.72, -113, 0.16)
    pt3dadd(8.85, -47.88, -113, 0.16)
    pt3dadd(8.94, -47.99, -113, 0.16)
    pt3dadd(9, -48.09, -113, 0.16)
    pt3dadd(9.16, -48.25, -113, 0.16)
    pt3dadd(9.21, -48.41, -113, 0.16)
    pt3dadd(9.21, -48.77, -113, 0.16)
    pt3dadd(9.32, -48.83, -113.5, 0.16)
    pt3dadd(9.52, -49.67, -115, 0.84)
    pt3dadd(9.58, -49.67, -114, 0.84)
    pt3dadd(9.78, -50.3, -113.5, 0.16)
    pt3dadd(9.78, -50.56, -113.5, 0.16)
    pt3dadd(9.74, -50.72, -113.5, 0.16)
    pt3dadd(9.74, -51.3, -114, 0.16)
    pt3dadd(9.84, -51.35, -114, 0.16)
    pt3dadd(9.9, -51.51, -114, 0.16)
    pt3dadd(10, -51.67, -114, 0.16)
    pt3dadd(10.05, -51.77, -113.5, 0.16)
    pt3dadd(10.42, -52.14, -113, 0.16)
    pt3dadd(10.47, -52.24, -113, 0.16)
    pt3dadd(10.53, -52.45, -113, 0.16)
    pt3dadd(10.58, -52.61, -113, 0.16)
    pt3dadd(10.63, -52.77, -113, 0.16)
    pt3dadd(10.68, -52.93, -113, 0.16)
    pt3dadd(10.68, -53.24, -113, 0.16)
    pt3dadd(10.79, -53.4, -113.5, 0.16)
    pt3dadd(10.84, -53.51, -113.5, 0.16)
    pt3dadd(10.95, -53.51, -113.5, 0.16)
    pt3dadd(11.16, -53.56, -113.5, 0.16)
    pt3dadd(11.31, -53.61, -113.5, 0.16)
    pt3dadd(11.58, -53.66, -114, 0.16)
    pt3dadd(11.58, -54.08, -114, 0.16)
    pt3dadd(11.63, -54.35, -114, 0.16)
    pt3dadd(11.68, -54.61, -114, 0.16)
    pt3dadd(11.79, -54.71, -114, 0.16)
    pt3dadd(11.84, -54.87, -114, 0.16)
    pt3dadd(11.94, -55.08, -114, 0.16)
    pt3dadd(12, -55.24, -114, 0.16)
    pt3dadd(12.1, -55.35, -114, 0.16)
    pt3dadd(12.21, -55.45, -114, 0.16)
    pt3dadd(12.36, -55.5, -114, 0.16)
    pt3dadd(12.47, -55.61, -114, 0.16)
    pt3dadd(12.57, -55.71, -114, 0.16)
    pt3dadd(12.68, -55.77, -114, 0.16)
    pt3dadd(12.84, -55.82, -114, 0.16)
    pt3dadd(12.94, -55.92, -114, 0.16)
    pt3dadd(13.05, -56.03, -114, 0.16)
    pt3dadd(13.15, -56.08, -114, 0.16)
    pt3dadd(13.2, -56.4, -114, 0.16)
  }
  axon[63] {pt3dclear()
    pt3dadd(13.2, -56.4, -114, 0.16)
    pt3dadd(12.99, -56.82, -114, 0.16)
    pt3dadd(13.05, -56.92, -114, 0.16)
    pt3dadd(13.15, -57.03, -114, 0.16)
    pt3dadd(13.2, -57.19, -114, 0.16)
    pt3dadd(13.26, -57.29, -114, 0.16)
    pt3dadd(13.31, -57.5, -114, 0.16)
    pt3dadd(13.36, -57.66, -114, 0.16)
    pt3dadd(13.41, -57.82, -114, 0.16)
    pt3dadd(13.36, -58.03, -114, 0.16)
    pt3dadd(13.36, -58.81, -114, 0.16)
    pt3dadd(13.41, -58.92, -114, 0.16)
    pt3dadd(13.47, -59.03, -114, 0.16)
    pt3dadd(13.79, -59.45, -113, 0.79)
    pt3dadd(13.79, -59.51, -114, 0.79)
  }
  axon[64] {pt3dclear()
    pt3dadd(13.2, -56.4, -114, 0.16)
    pt3dadd(13.63, -56.88, -113.5, 0.16)
    pt3dadd(13.73, -57.04, -113.5, 0.16)
    pt3dadd(13.73, -57.14, -113.5, 0.16)
    pt3dadd(13.89, -57.19, -113.5, 0.16)
    pt3dadd(14, -57