GC model (Beining et al 2017)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:231818
A companion modeldb entry (NEURON only) to modeldb accession number 231862.
Reference:
1 . Beining M, Mongiat LA, Schwarzacher SW, Cuntz H, Jedlicka P (2017) T2N as a new tool for robust electrophysiological modeling demonstrated for mature and adult-born dentate granule cells eLife
Citations  Citation Browser
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: Dentate gyrus;
Cell Type(s): Dentate gyrus granule GLU cell;
Channel(s): I A; I Calcium; I h; I K; I K,Ca; I K,leak; I Na,t; I M; Kir2 leak;
Gap Junctions:
Receptor(s):
Gene(s): Cav1.2 CACNA1C; Cav1.3 CACNA1D; Cav2.2 CACNA1B; Cav3.2 CACNA1H; HCN1; Nav1.2 SCN2A; Nav1.6 SCN8A; Kir2.1 KCNJ2; Kv1.1 KCNA1; Kv1.4 KCNA4; Kv2.1 KCNB1; Kv3.3 KCNC3; Kv3.4 KCNC4; Kv4.2 KCND2; KCa1.1 KCNMA1; KCa2.2 KCNN2;
Transmitter(s):
Simulation Environment: NEURON;
Model Concept(s): Methods; Neurogenesis; Conductance distributions;
Implementer(s): Beining, Marcel [beining at fias.uni-frankfurt.de];
Search NeuronDB for information about:  Dentate gyrus granule GLU cell; I Na,t; I A; I K; I K,leak; I M; I h; I K,Ca; I Calcium; Kir2 leak;
/
BeiningEtAl2017nrn
morphos
cell_mouse_matGC_art_01.hoc
cell_mouse_matGC_art_02.hoc
cell_mouse_matGC_art_03.hoc
cell_mouse_matGC_art_04.hoc
cell_mouse_matGC_art_05.hoc
cell_mouse_matGC_art_06.hoc
cell_mouse_matGC_art_07.hoc
cell_mouse_matGC_art_08.hoc
cell_mouse_matGC_art_09.hoc
cell_mouse_matGC_art_10.hoc
cell_mouse_matGC_art_11.hoc
cell_mouse_matGC_art_12.hoc
cell_mouse_matGC_art_13.hoc
cell_mouse_matGC_art_14.hoc
cell_mouse_matGC_art_15.hoc
cell_rat_matGC_art_01.hoc
cell_rat_matGC_art_02.hoc
cell_rat_matGC_art_03.hoc
cell_rat_matGC_art_04.hoc
cell_rat_matGC_art_05.hoc
cell_rat_matGC_art_06.hoc
cell_rat_matGC_art_07.hoc
cell_rat_matGC_art_08.hoc
cell_rat_matGC_art_09.hoc
cell_rat_matGC_art_10.hoc
cell_rat_matGC_art_11.hoc
cell_rat_matGC_art_12.hoc
cell_rat_matGC_art_13.hoc
cell_rat_matGC_art_14.hoc
cell_rat_matGC_art_15.hoc
cell_rat_mGC_Beining_01.hoc
cell_rat_mGC_Beining_02.hoc
cell_rat_mGC_Beining_03.hoc
cell_rat_mGC_Beining_04.hoc
cell_rat_mGC_Beining_05.hoc
cell_rat_mGC_Claiborne_01.hoc
cell_rat_mGC_Claiborne_02.hoc
cell_rat_mGC_Claiborne_03.hoc
cell_rat_mGC_Claiborne_04.hoc
cell_rat_mGC_Claiborne_05.hoc
cell_rat_mGC_Claiborne_06.hoc
cell_rat_mGC_Claiborne_07.hoc
cell_rat_mGC_Claiborne_08.hoc
cell_rat_mGC_Claiborne_09.hoc
cell_rat_mGC_Claiborne_10.hoc
cell_rat_mGC_Claiborne_11.hoc
cell_rat_mGC_Claiborne_12.hoc
cell_rat_mGC_Claiborne_13.hoc
cell_SH07all2_01.hoc
cell_SH07all2_02.hoc
cell_SH07all2_03.hoc
cell_SH07all2_04.hoc
cell_SH07all2_05.hoc
cell_SH07all2_06.hoc
cell_SH07all2_07.hoc
cell_SH07all2_08.hoc
                            
/*
This is a CellBuilder-like file written for the simulator NEURON
by an automatic procedure "neuron_template_tree" 
in MATLAB, based on a script of Hermann Cuntz
copyright 2014 Marcel Beining
*/

begintemplate cell_rat_mGC_Claiborne_06

proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
is_artificial = 0
}

public axon
public GCL
public adendIML
public adendMML
public adendOML
public soma
public axonh

public allregobj
public allreg
public alladendreg
public allaxonreg
public regaxon
public regGCL
public regadendIML
public regadendMML
public regadendOML
public regsoma
public regaxonh
public is_artificial

create axon[1]
create GCL[17]
create adendIML[23]
create adendMML[20]
create adendOML[15]
create soma[3]
create axonh[1]

proc topol_1() {
  connect soma[1](0),soma[0](1)
  connect GCL[0](0),soma[1](1)
  connect GCL[1](0),GCL[0](1)
  connect GCL[2](0),GCL[1](1)
  connect GCL[3](0),GCL[2](1)
  connect GCL[4](0),GCL[3](1)
  connect adendIML[0](0),GCL[4](1)
  connect adendIML[1](0),adendIML[0](1)
  connect adendIML[2](0),adendIML[1](1)
  connect adendMML[0](0),adendIML[2](1)
  connect adendOML[0](0),adendMML[0](1)
  connect adendIML[3](0),adendIML[1](1)
  connect adendMML[1](0),adendIML[3](1)
  connect adendOML[1](0),adendMML[1](1)
  connect adendOML[2](0),adendOML[1](1)
  connect adendOML[3](0),adendOML[1](1)
  connect adendIML[4](0),adendIML[0](1)
  connect adendMML[2](0),adendIML[4](1)
  connect adendOML[4](0),adendMML[2](1)
  connect GCL[5](0),GCL[3](1)
  connect adendIML[5](0),GCL[5](1)
  connect adendMML[3](0),adendIML[5](1)
  connect adendOML[5](0),adendMML[3](1)
  connect GCL[6](0),GCL[2](1)
  connect adendIML[6](0),GCL[6](1)
  connect adendIML[7](0),adendIML[6](1)
  connect adendIML[8](0),adendIML[7](1)
  connect adendMML[4](0),adendIML[8](1)
  connect adendMML[5](0),adendMML[4](1)
  connect adendOML[6](0),adendMML[5](1)
  connect adendMML[6](0),adendMML[4](1)
  connect adendOML[7](0),adendMML[6](1)
  connect adendIML[9](0),adendIML[7](1)
  connect adendMML[7](0),adendIML[9](1)
  connect adendOML[8](0),adendMML[7](1)
  connect adendIML[10](0),adendIML[6](1)
  connect adendMML[8](0),adendIML[10](1)
  connect adendOML[9](0),adendMML[8](1)
  connect GCL[7](0),GCL[1](1)
  connect GCL[8](0),GCL[7](1)
  connect adendIML[11](0),GCL[8](1)
  connect adendIML[12](0),adendIML[11](1)
  connect adendMML[9](0),adendIML[12](1)
  connect adendIML[13](0),adendIML[11](1)
  connect adendMML[10](0),adendIML[13](1)
  connect GCL[9](0),GCL[7](1)
  connect adendIML[14](0),GCL[9](1)
  connect adendMML[11](0),adendIML[14](1)
  connect GCL[10](0),GCL[0](1)
  connect GCL[11](0),GCL[10](1)
  connect adendIML[15](0),GCL[11](1)
  connect adendIML[16](0),adendIML[15](1)
  connect adendIML[17](0),adendIML[16](1)
  connect adendMML[12](0),adendIML[17](1)
  connect adendOML[10](0),adendMML[12](1)
  connect adendIML[18](0),adendIML[16](1)
  connect adendMML[13](0),adendIML[18](1)
  connect adendIML[19](0),adendIML[15](1)
  connect adendMML[14](0),adendIML[19](1)
  connect adendMML[15](0),adendMML[14](1)
  connect adendOML[11](0),adendMML[15](1)
  connect adendMML[16](0),adendMML[14](1)
  connect GCL[12](0),GCL[10](1)
  connect GCL[13](0),GCL[12](1)
  connect GCL[14](0),GCL[13](1)
  connect adendIML[20](0),GCL[14](1)
  connect adendMML[17](0),adendIML[20](1)
  connect adendOML[12](0),adendMML[17](1)
  connect GCL[15](0),GCL[13](1)
  connect adendIML[21](0),GCL[15](1)
  connect adendMML[18](0),adendIML[21](1)
  connect adendOML[13](0),adendMML[18](1)
  connect GCL[16](0),GCL[12](1)
  connect adendIML[22](0),GCL[16](1)
  connect adendMML[19](0),adendIML[22](1)
  connect adendOML[14](0),adendMML[19](1)
  connect soma[2](0),soma[0](1)
  connect axonh[0](0),soma[2](1)
  connect axon[0](0),axonh[0](1)
}
proc topol() {
  topol_1()
  basic_shape()
}

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-9.78632875870107, 133.523792875946, 0, 10.5)
    pt3dadd(-9.78622875870107, 133.523792875946, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-9.78622875870107, 133.523792875946, 0, 10.2667572303772)
    pt3dadd(-9.65027689181776, 132.545558447405, -0.156762536053001, 10.2667572303772)
    pt3dadd(-9.51432502493445, 131.567324018865, -0.313525072106002, 9.58775356515896)
    pt3dadd(-9.37837315805113, 130.589089590325, -0.470287608159003, 8.52332145975836)
    pt3dadd(-9.24242129116782, 129.610855161785, -0.627050144212003, 7.16804037792358)
    pt3dadd(-9.10646942428451, 128.632620733245, -0.783812680265004, 5.64233299132872)
    pt3dadd(-8.97051755740119, 127.654386304705, -0.940575216318005, 4.08176509672936)
    pt3dadd(-8.83456569051788, 126.676151876165, -1.09733775237101, 3.2872507939872)
    pt3dadd(-8.69861382363457, 125.697917447625, -1.25410028842401, 3.15312947884252)
    pt3dadd(-8.56266195675126, 124.719683019085, -1.41086282447701, 3.01900816369783)
    pt3dadd(-8.4940820712721, 123.737259718645, -1.56994289110121, 2.95)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-8.4940820712721, 123.737259718645, -1.56994289110121, 2.95)
    pt3dadd(-8.49690430069717, 122.750396971622, -1.73147912096554, 2.95)
    pt3dadd(-8.49972653012225, 121.763534224599, -1.89301535082987, 2.95)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-8.49972653012225, 121.763534224599, -1.89301535082987, 2.79732913147042)
    pt3dadd(-8.97673481130054, 120.990487397838, -1.78280191626219, 2.79732913147042)
    pt3dadd(-9.67776490705075, 120.318454572364, -1.5442045853098, 2.57253128899504)
    pt3dadd(-10.378795002801, 119.64642174689, -1.3056072543574, 2.34773344651967)
    pt3dadd(-11.0798250985512, 118.974388921416, -1.06700992340501, 2.12293560404429)
    pt3dadd(-11.6058599438898, 118.245132445476, -1.06520507209468, 1.97)
    pt3dadd(-11.7594738222383, 117.394093880074, -1.56733666498423, 1.97)
    pt3dadd(-11.9130877005869, 116.543055314673, -2.06946825787377, 1.97)
    pt3dadd(-12.0667015789354, 115.692016749271, -2.57159985076331, 1.97)
    pt3dadd(-12.220315457284, 114.840978183869, -3.07373144365285, 1.97)
    pt3dadd(-12.3663631019731, 113.985680749763, -3.56843174316678, 1.97)
    pt3dadd(-12.3729154432356, 113.051864437048, -3.92612457358307, 1.97)
    pt3dadd(-12.3794677844981, 112.118048124333, -4.28381740399936, 1.97)
    pt3dadd(-12.3860201257606, 111.184231811618, -4.64151023441566, 1.97)
    pt3dadd(-12.3925724670231, 110.250415498903, -4.99920306483195, 1.97)
    pt3dadd(-12.3991248082856, 109.316599186188, -5.35689589524824, 1.97)
    pt3dadd(-12.117400721665, 108.747559157912, -6.07954450054066, 1.97)
    pt3dadd(-11.7741163342561, 108.256415674823, -6.88012798049773, 1.97)
    pt3dadd(-11.4308319468472, 107.765272191734, -7.6807114604548, 1.97)
    pt3dadd(-11.0875475594383, 107.274128708644, -8.48129494041187, 1.97)
    pt3dadd(-10.7442631720294, 106.782985225555, -9.28187842036895, 1.97)
    pt3dadd(-10.4009787846205, 106.291841742466, -10.082461900326, 1.97)
    pt3dadd(-10.21696941114, 105.640516561516, -10.6153575388831, 1.97)
    pt3dadd(-10.3678309073785, 104.652414235472, -10.5854476371867, 1.97)
    pt3dadd(-10.5186924036171, 103.664311909428, -10.5555377354904, 1.97)
    pt3dadd(-10.6695538998557, 102.676209583385, -10.525627833794, 1.97)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-10.6695538998557, 102.676209583385, -10.525627833794, 1.97)
    pt3dadd(-11.0600287409029, 102.046242721817, -9.93983779327256, 1.97)
    pt3dadd(-11.5025849243462, 101.494118668898, -9.23322399869696, 1.97)
    pt3dadd(-11.9451411077894, 100.941994615979, -8.52661020412136, 1.97)
    pt3dadd(-12.3876972912326, 100.38987056306, -7.81999640954577, 1.97)
    pt3dadd(-12.8302534746758, 99.8377465101415, -7.11338261497017, 1.97)
    pt3dadd(-13.2728096581191, 99.2856224572225, -6.40676882039457, 1.97)
    pt3dadd(-13.7153658415623, 98.7334984043036, -5.70015502581897, 1.97)
    pt3dadd(-14.1579220250055, 98.1813743513846, -4.99354123124338, 1.97)
    pt3dadd(-14.6004782084488, 97.6292502984657, -4.28692743666778, 1.97)
    pt3dadd(-14.6941319683893, 96.6787626096958, -4.45432629907553, 1.97)
    pt3dadd(-14.7678136826873, 95.7054715920249, -4.67175582765685, 1.97)
    pt3dadd(-14.8414953969853, 94.7321805743539, -4.88918535623816, 1.97)
    pt3dadd(-14.9151771112833, 93.7588895566829, -5.10661488481947, 1.97)
    pt3dadd(-15.0249025557798, 92.771837118458, -5.08938390127623, 1.97)
    pt3dadd(-15.1431624528297, 91.7815262441573, -5.01658988372288, 1.97)
    pt3dadd(-15.2614223498795, 90.7912153698566, -4.94379586616954, 1.97)
    pt3dadd(-15.3796822469293, 89.8009044955559, -4.87100184861619, 1.97)
    pt3dadd(-15.4975691383881, 88.8112101796185, -4.81747528176321, 1.97)
    pt3dadd(-15.6117006799336, 87.8277232569521, -4.95792977321319, 1.97)
    pt3dadd(-15.725832221479, 86.8442363342856, -5.09838426466317, 1.97)
    pt3dadd(-15.8399637630245, 85.8607494116191, -5.23883875611315, 1.97)
    pt3dadd(-15.95409530457, 84.8772624889526, -5.37929324756313, 1.97)
    pt3dadd(-16.0682268461155, 83.8937755662861, -5.5197477390131, 1.97)
    pt3dadd(-16.182358387661, 82.9102886436197, -5.66020223046308, 1.97)
    pt3dadd(-16.3794268871441, 81.9306744251522, -5.65926569857958, 1.97)
    pt3dadd(-16.5811816710332, 80.9512790306415, -5.65033998353485, 1.97)
    pt3dadd(-16.7829364549224, 79.9718836361308, -5.64141426849012, 1.97)
    pt3dadd(-16.9846912388115, 78.9924882416201, -5.63248855344539, 1.97)
    pt3dadd(-17.1864460227006, 78.0130928471094, -5.62356283840066, 1.97)
    pt3dadd(-17.3882008065898, 77.0336974525986, -5.61463712335593, 1.97)
    pt3dadd(-17.6039423664986, 76.0594259336759, -5.58967046641448, 1.97)
    pt3dadd(-17.9255562441725, 75.1239393773263, -5.44328256877072, 1.97)
    pt3dadd(-18.2471701218464, 74.1884528209766, -5.29689467112697, 1.97)
    pt3dadd(-18.5687839995203, 73.2529662646269, -5.15050677348321, 1.97)
    pt3dadd(-18.8903978771942, 72.3174797082772, -5.00411887583946, 1.97)
    pt3dadd(-19.212011754868, 71.3819931519275, -4.8577309781957, 1.97)
    pt3dadd(-19.5336256325419, 70.4465065955778, -4.71134308055195, 1.97)
    pt3dadd(-19.8007880513721, 69.508014755529, -4.68203378085749, 1.97)
    pt3dadd(-19.9145385334013, 68.5610558072942, -4.98258257589115, 1.97)
    pt3dadd(-20.0282890154304, 67.6140968590594, -5.2831313709248, 1.97)
    pt3dadd(-20.1420394974596, 66.6671379108246, -5.58368016595845, 1.97)
    pt3dadd(-20.2557899794888, 65.7201789625898, -5.8842289609921, 1.97)
    pt3dadd(-20.31621297517, 64.7544377198425, -6.02792936409637, 1.97)
    pt3dadd(-20.294062417581, 63.7596135237689, -5.92876197174857, 1.97)
    pt3dadd(-20.271911859992, 62.7647893276954, -5.82959457940077, 1.97)
  }
  GCL[3] {pt3dclear()
    pt3dadd(-20.271911859992, 62.7647893276954, -5.82959457940077, 1.97)
    pt3dadd(-20.5260279833319, 61.9519896953698, -5.32470692195014, 1.97)
    pt3dadd(-20.800173928137, 61.1523871648515, -4.79040382993624, 1.97)
    pt3dadd(-21.0743198729422, 60.3527846343332, -4.25610073792235, 1.97)
    pt3dadd(-21.3484658177474, 59.5531821038149, -3.72179764590846, 1.97)
    pt3dadd(-21.61062192798, 58.7149394532846, -3.30446268001607, 1.97)
    pt3dadd(-21.8301555868269, 57.7393357218505, -3.30293564200735, 1.97)
    pt3dadd(-22.0496892456738, 56.7637319904164, -3.30140860399864, 1.97)
    pt3dadd(-22.106950660707, 55.8835760437118, -3.67202898425882, 1.97)
    pt3dadd(-22.085203952037, 55.049892310652, -4.22384282414815, 1.97)
    pt3dadd(-22.0634572433671, 54.2162085775921, -4.77565666403748, 1.97)
  }
  GCL[4] {pt3dclear()
    pt3dadd(-22.0634572433671, 54.2162085775921, -4.77565666403748, 1.88932401637324)
    pt3dadd(-22.4605752883597, 53.3900028226919, -4.63936663716731, 1.88932401637324)
    pt3dadd(-22.9487647253738, 52.5654229622469, -4.35346608218964, 1.79110711036679)
    pt3dadd(-23.4369541623878, 51.740843101802, -4.06756552721198, 1.69289020436035)
    pt3dadd(-23.9251435994018, 50.9162632413571, -3.78166497223431, 1.5946732983539)
    pt3dadd(-24.4133330364159, 50.0916833809121, -3.49576441725665, 1.49645639234745)
    pt3dadd(-24.7341823587358, 49.1564535242787, -3.47029842198872, 1.48)
    pt3dadd(-25.0213502074491, 48.1989525288152, -3.49725153594135, 1.48)
    pt3dadd(-25.3085180561623, 47.2414515333517, -3.52420464989397, 1.48)
    pt3dadd(-25.5956859048756, 46.2839505378881, -3.55115776384659, 1.48)
    pt3dadd(-25.8828537535889, 45.3264495424246, -3.57811087779921, 1.48)
    pt3dadd(-26.204125100824, 44.4405732502265, -3.26810050136901, 1.48)
    pt3dadd(-26.5299217094674, 43.5642009831169, -2.91337776564761, 1.48)
    pt3dadd(-26.8557183181108, 42.6878287160073, -2.55865502992622, 1.48)
    pt3dadd(-27.1815149267541, 41.8114564488977, -2.20393229420482, 1.48)
    pt3dadd(-27.489081472218, 40.8985455840692, -2.09134939533193, 1.48)
    pt3dadd(-27.7787134615756, 39.949688407679, -2.21698127645161, 1.48)
    pt3dadd(-28.0683454509332, 39.0008312312888, -2.34261315757128, 1.48)
    pt3dadd(-28.3579774402907, 38.0519740548987, -2.46824503869097, 1.48)
    pt3dadd(-28.6314595757074, 37.0944919810455, -2.53884914917568, 1.48)
    pt3dadd(-28.8883721893362, 36.1281608843496, -2.55299554506961, 1.48)
    pt3dadd(-29.145284802965, 35.1618297876536, -2.56714194096353, 1.48)
    pt3dadd(-29.4021974165938, 34.1954986909576, -2.58128833685745, 1.48)
    pt3dadd(-29.6830514143376, 33.2392703260964, -2.60585189108401, 1.48)
    pt3dadd(-30.1516120808685, 32.3622500023926, -2.71208867186495, 1.48)
    pt3dadd(-30.6201727473993, 31.4852296786889, -2.81832545264589, 1.48)
    pt3dadd(-31.0887334139302, 30.6082093549851, -2.92456223342683, 1.48)
    pt3dadd(-31.5041365809969, 29.7063581401928, -3.00745160265726, 1.48)
    pt3dadd(-31.8231011927666, 28.7594586201292, -3.04798400132747, 1.48)
    pt3dadd(-32.1420658045362, 27.8125591000656, -3.08851639999769, 1.48)
    pt3dadd(-32.4610304163058, 26.865659580002, -3.1290487986679, 1.48)
    pt3dadd(-32.7799950280755, 25.9187600599384, -3.16958119733812, 1.48)
    pt3dadd(-33.1755359436451, 25.0039658860063, -3.24341387379784, 1.48)
    pt3dadd(-33.583014907266, 24.0941768526438, -3.32243797758751, 1.48)
    pt3dadd(-33.9904938708869, 23.1843878192813, -3.40146208137718, 1.48)
    pt3dadd(-34.3859926957666, 22.2732205360975, -3.41081981179799, 1.48)
    pt3dadd(-34.7496952547885, 21.3583952654162, -3.23527730217799, 1.48)
    pt3dadd(-35.1133978138105, 20.4435699947349, -3.05973479255798, 1.48)
    pt3dadd(-35.4771003728324, 19.5287447240535, -2.88419228293798, 1.48)
    pt3dadd(-35.8458730232927, 18.6126565783998, -2.73199820936192, 1.48)
    pt3dadd(-36.229048694376, 17.6929808812211, -2.64613193479056, 1.48)
    pt3dadd(-36.6122243654593, 16.7733051840424, -2.5602656602192, 1.48)
    pt3dadd(-36.9954000365426, 15.8536294868638, -2.47439938564784, 1.48)
    pt3dadd(-37.3228927659918, 14.9108468737165, -2.48209007542138, 1.48)
    pt3dadd(-37.6330778973437, 13.96088207509, -2.51886052087145, 1.48)
    pt3dadd(-37.9432630286957, 13.0109172764634, -2.55563096632153, 1.48)
    pt3dadd(-38.2205465010088, 12.0621721678262, -2.61743026640026, 1.48)
    pt3dadd(-38.1289390396931, 11.1271021318761, -2.95985120749409, 1.48)
    pt3dadd(-38.0373315783775, 10.192032095926, -3.30227214858792, 1.48)
    pt3dadd(-37.9457241170619, 9.2569620599759, -3.64469308968174, 1.48)
    pt3dadd(-37.9489979939135, 8.29442461789125, -3.74405568320311, 1.48)
    pt3dadd(-38.0399906754303, 7.30649326716329, -3.61870825339632, 1.48)
    pt3dadd(-38.1309833569472, 6.3185619164353, -3.49336082358953, 1.48)
    pt3dadd(-38.2188025058839, 5.33015222241309, -3.37073843089472, 1.48)
    pt3dadd(-38.2533015243997, 4.33370564009951, -3.29390076879445, 1.48)
    pt3dadd(-38.2878005429154, 3.33725905778593, -3.21706310669417, 1.48)
    pt3dadd(-38.3222995614311, 2.34081247547235, -3.14022544459389, 1.48)
    pt3dadd(-38.3567985799468, 1.34436589315874, -3.06338778249361, 1.48)
    pt3dadd(-38.3912975984625, 0.347919310845183, -2.98655012039333, 1.48)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-38.3912975984625, 0.347919310845183, -2.98655012039333, 1.48)
    pt3dadd(-38.4862197924991, -0.644953264852179, -2.93401154374404, 1.48)
    pt3dadd(-38.6157059313823, -1.63578139706405, -2.89537280340938, 1.48)
    pt3dadd(-38.7451920702655, -2.62660952927595, -2.85673406307471, 1.48)
    pt3dadd(-38.8746782091486, -3.6174376614878, -2.81809532274005, 1.48)
    pt3dadd(-38.9647438094617, -4.59894733145521, -2.67234843709037, 1.48)
    pt3dadd(-39.0329096551789, -5.57528020669159, -2.46709850600561, 1.48)
    pt3dadd(-39.1010755008962, -6.551613081928, -2.26184857492084, 1.48)
    pt3dadd(-39.3459329537777, -7.51858298716835, -2.26198223820825, 1.48)
    pt3dadd(-39.6028455674065, -8.48491408386431, -2.27612863410217, 1.48)
    pt3dadd(-39.8597581810353, -9.45124518056028, -2.29027502999609, 1.48)
    pt3dadd(-40.116670794664, -10.4175762772563, -2.30442142589002, 1.48)
    pt3dadd(-40.3237072542414, -11.3252271375855, -2.57789303097386, 1.48)
    pt3dadd(-40.4908600682866, -12.1859541363719, -3.05873496999011, 1.48)
    pt3dadd(-40.6580128823317, -13.0466811351584, -3.53957690900637, 1.48)
    pt3dadd(-40.8251656963769, -13.9074081339448, -4.02041884802261, 1.48)
    pt3dadd(-40.992318510422, -14.7681351327312, -4.50126078703887, 1.48)
    pt3dadd(-41.2284671643933, -15.654741261429, -4.82857784038407, 1.48)
    pt3dadd(-41.5860172147854, -16.5868829254977, -4.88576070120734, 1.48)
    pt3dadd(-41.9435672651774, -17.5190245895664, -4.94294356203063, 1.48)
    pt3dadd(-42.3011173155695, -18.451166253635, -5.0001264228539, 1.48)
    pt3dadd(-42.6586673659616, -19.3833079177037, -5.05730928367718, 1.48)
    pt3dadd(-42.9737969595683, -20.3303816000675, -5.09630422148425, 1.48)
    pt3dadd(-43.2488330436974, -21.291568214314, -5.11810892328051, 1.48)
    pt3dadd(-43.5238691278266, -22.2527548285604, -5.13991362507677, 1.48)
    pt3dadd(-43.7989052119557, -23.2139414428068, -5.16171832687302, 1.48)
    pt3dadd(-44.0323968652109, -24.16971737129, -5.27824406674435, 1.48)
    pt3dadd(-44.1946457392311, -25.1162147446643, -5.55720289000461, 1.48)
    pt3dadd(-44.3568946132513, -26.0627121180386, -5.83616171326487, 1.48)
    pt3dadd(-44.5191434872715, -27.0092094914129, -6.11512053652514, 1.48)
    pt3dadd(-44.918988417904, -27.8896076575662, -6.02470461004754, 1.48)
    pt3dadd(-45.3873062486154, -28.7509566674505, -5.82783843060261, 1.48)
    pt3dadd(-45.8556240793268, -29.6123056773347, -5.63097225115768, 1.48)
    pt3dadd(-46.3239419100382, -30.473654687219, -5.43410607171274, 1.48)
    pt3dadd(-46.650715344308, -31.4110240271041, -5.41898908765035, 1.48)
    pt3dadd(-46.943022346904, -32.3669045166758, -5.44812850922423, 1.48)
    pt3dadd(-47.2353293494998, -33.3227850062474, -5.47726793079812, 1.48)
    pt3dadd(-47.5276363520957, -34.2786654958191, -5.506407352372, 1.48)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(-47.5276363520957, -34.2786654958191, -5.506407352372, 1.48)
    pt3dadd(-47.9937197753684, -35.0966351480911, -5.81781394352331, 1.48)
    pt3dadd(-48.4823426494684, -35.89671724966, -6.16583164085404, 1.48)
    pt3dadd(-48.9709655235685, -36.6967993512288, -6.51384933818477, 1.48)
    pt3dadd(-49.4595883976685, -37.4968814527977, -6.86186703551551, 1.48)
    pt3dadd(-49.9482112717686, -38.2969635543665, -7.20988473284625, 1.48)
    pt3dadd(-50.3135017016278, -39.1566083153551, -7.55256784328722, 1.48)
    pt3dadd(-50.6122119108759, -40.04840759196, -7.89237111157331, 1.48)
    pt3dadd(-50.910922120124, -40.9402068685649, -8.23217437985941, 1.48)
    pt3dadd(-51.2096323293721, -41.8320061451698, -8.57197764814551, 1.48)
    pt3dadd(-51.4966979513607, -42.745427746552, -8.81686596464098, 1.48)
    pt3dadd(-51.7555557439079, -43.7112272326851, -8.83183245463464, 1.48)
    pt3dadd(-52.0144135364551, -44.6770267188182, -8.84679894462831, 1.48)
    pt3dadd(-52.2732713290022, -45.6428262049512, -8.86176543462198, 1.48)
    pt3dadd(-52.5321291215494, -46.6086256910843, -8.87673192461565, 1.48)
    pt3dadd(-52.8873574848951, -47.5389700181165, -8.7972515108833, 1.48)
    pt3dadd(-53.2522657300542, -48.4657530738299, -8.7082844368755, 1.48)
    pt3dadd(-53.6171739752134, -49.3925361295432, -8.6193173628677, 1.48)
    pt3dadd(-53.9820822203725, -50.3193191852566, -8.5303502888599, 1.48)
    pt3dadd(-54.3155646420477, -51.2586972157662, -8.49250622255024, 1.48)
    pt3dadd(-54.6078716446436, -52.2145777053379, -8.52164564412412, 1.48)
    pt3dadd(-54.9001786472396, -53.1704581949096, -8.550785065698, 1.48)
    pt3dadd(-55.1924856498355, -54.1263386844812, -8.57992448727189, 1.48)
    pt3dadd(-55.4840900891948, -55.0824424889972, -8.60876486158362, 1.48)
    pt3dadd(-55.775029872715, -56.0387575593095, -8.63732232398278, 1.48)
    pt3dadd(-56.0659696562352, -56.9950726296219, -8.66587978638195, 1.48)
    pt3dadd(-56.3569094397554, -57.9513876999342, -8.69443724878111, 1.48)
    pt3dadd(-56.791983420893, -58.8361851383499, -8.78668081616193, 1.48)
    pt3dadd(-57.3201225919944, -59.6748047639477, -8.92004550230677, 1.48)
    pt3dadd(-57.8482617630959, -60.5134243895454, -9.05341018845161, 1.48)
    pt3dadd(-58.3060108085364, -61.3956857646045, -9.15488104747518, 1.48)
    pt3dadd(-58.7478138542317, -62.2878336304069, -9.24912676015372, 1.48)
    pt3dadd(-59.1896168999271, -63.1799814962095, -9.34337247283224, 1.48)
    pt3dadd(-59.6314199456225, -64.072129362012, -9.43761818551078, 1.48)
    pt3dadd(-59.855069185106, -64.9790264124138, -9.76666321407104, 1.48)
    pt3dadd(-60.037926904882, -65.8886813411434, -10.1396122252729, 1.48)
    pt3dadd(-60.2207846246579, -66.7983362698728, -10.5125612364748, 1.48)
    pt3dadd(-60.4573118278189, -67.6873143090652, -10.8797605003169, 1.48)
    pt3dadd(-60.9980505472489, -68.4590907744563, -11.214368815781, 1.48)
    pt3dadd(-61.5387892666789, -69.2308672398473, -11.548977131245, 1.48)
    pt3dadd(-62.0795279861089, -70.0026437052384, -11.883585446709, 1.48)
    pt3dadd(-62.6202667055388, -70.7744201706295, -12.2181937621731, 1.48)
    pt3dadd(-63.226563754876, -71.5330874942257, -12.4427680605297, 1.48)
    pt3dadd(-63.8581479464818, -72.2866983629968, -12.6249000659097, 1.48)
    pt3dadd(-64.4897321380875, -73.040309231768, -12.8070320712898, 1.48)
    pt3dadd(-65.1213163296932, -73.7939201005391, -12.9891640766698, 1.48)
    pt3dadd(-65.6503116213183, -74.6314272975235, -13.1229695126659, 1.48)
    pt3dadd(-66.1749670221733, -75.4724836201982, -13.2547305556286, 1.48)
    pt3dadd(-66.6996224230284, -76.3135399428728, -13.3864915985913, 1.48)
    pt3dadd(-67.2251814571665, -77.153920457156, -13.5186725768346, 1.48)
    pt3dadd(-67.7984162541023, -77.9586452677688, -13.6730093733745, 1.48)
    pt3dadd(-68.371651051038, -78.7633700783816, -13.8273461699144, 1.48)
    pt3dadd(-68.9448858479738, -79.5680948889944, -13.9816829664543, 1.48)
  }
}
proc shape3d_2() {
  adendIML[1] {
    pt3dadd(-69.5181206449096, -80.3728196996073, -14.1360197629942, 1.48)
    pt3dadd(-70.0739318207798, -81.1938611456571, -14.0445282963338, 1.48)
    pt3dadd(-70.6272882649524, -82.0172013654266, -13.9184032464719, 1.48)
    pt3dadd(-71.180644709125, -82.840541585196, -13.79227819661, 1.48)
    pt3dadd(-71.7340011532976, -83.6638818049654, -13.6661531467481, 1.48)
    pt3dadd(-72.2873575974702, -84.4872220247348, -13.5400280968861, 1.48)
    pt3dadd(-72.8506475020924, -85.3098103664903, -13.5551130082816, 1.48)
    pt3dadd(-73.4168249984582, -86.1321801422429, -13.6112467284289, 1.48)
    pt3dadd(-73.9811045892348, -86.9556427428096, -13.6667588773901, 1.48)
    pt3dadd(-74.3929375288687, -87.8668849906541, -13.6723441773615, 1.48)
    pt3dadd(-74.8047704685027, -88.7781272384986, -13.677929477333, 1.48)
    pt3dadd(-75.2166034081366, -89.6893694863431, -13.6835147773044, 1.48)
    pt3dadd(-75.6573619813638, -90.5821099856074, -13.7765875282341, 1.48)
    pt3dadd(-76.09595939421, -91.4741845438347, -13.8727859345012, 1.48)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(-76.09595939421, -91.4741845438347, -13.8727859345012, 1.48)
    pt3dadd(-76.675130824278, -92.2106771325472, -14.2267110373897, 1.48)
    pt3dadd(-77.2503887217164, -92.9483845397132, -14.5800750605261, 1.48)
    pt3dadd(-77.8256466191548, -93.6860919468793, -14.9334390836626, 1.48)
    pt3dadd(-78.4009045165931, -94.4237993540453, -15.286803106799, 1.48)
    pt3dadd(-78.9224303468321, -95.2179945560528, -15.5561302240842, 1.48)
    pt3dadd(-79.3428413295664, -96.1184904283861, -15.6673138087862, 1.48)
    pt3dadd(-79.7632523123007, -97.0189863007194, -15.7784973934882, 1.48)
    pt3dadd(-80.1836632950349, -97.9194821730526, -15.8896809781902, 1.48)
    pt3dadd(-80.6408226179874, -98.7964613118666, -16.011726323379, 1.48)
    pt3dadd(-81.2255610001028, -99.5917975051986, -16.1714803970582, 1.48)
    pt3dadd(-81.8102993822183, -100.387133698531, -16.3312344707373, 1.48)
    pt3dadd(-82.3950377643338, -101.182469891863, -16.4909885444165, 1.48)
    pt3dadd(-82.8778380377204, -102.045951448058, -16.6041052229638, 1.48)
    pt3dadd(-83.3102437539979, -102.943121635751, -16.6941660404432, 1.48)
    pt3dadd(-83.7426494702754, -103.840291823445, -16.7842268579226, 1.48)
    pt3dadd(-84.2318393629615, -104.696932823216, -16.9005002326722, 1.48)
    pt3dadd(-84.8574132557466, -105.456230987022, -17.0797308190862, 1.48)
    pt3dadd(-85.4829871485318, -106.215529150828, -17.2589614055002, 1.48)
    pt3dadd(-86.1085610413169, -106.974827314634, -17.4381919919142, 1.48)
    pt3dadd(-86.734134934102, -107.73412547844, -17.6174225783282, 1.48)
    pt3dadd(-87.2890208861967, -108.472999162962, -17.9616169400705, 1.48)
    pt3dadd(-87.7838988775056, -109.194534227347, -18.4458513095464, 1.48)
    pt3dadd(-88.2787768688146, -109.916069291731, -18.9300856790222, 1.48)
    pt3dadd(-88.7736548601235, -110.637604356116, -19.4143200484981, 1.48)
    pt3dadd(-89.2685328514325, -111.3591394205, -19.898554417974, 1.48)
    pt3dadd(-89.5490790203554, -112.259609948409, -20.0398590592331, 1.48)
    pt3dadd(-89.7304587550984, -113.242869824482, -20.0224979552802, 1.48)
    pt3dadd(-89.9118384898414, -114.226129700554, -20.0051368513273, 1.48)
    pt3dadd(-90.1841272715867, -115.185364513808, -20.0260288116997, 1.48)
    pt3dadd(-90.5030918833562, -116.132264033872, -20.0665612103699, 1.48)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-90.5030918833562, -116.132264033872, -20.0665612103699, 1.48)
    pt3dadd(-90.8220564951258, -117.079163553936, -20.1070936090401, 1.48)
    pt3dadd(-91.1410211068954, -118.026063073999, -20.1476260077103, 1.48)
    pt3dadd(-91.4501398799455, -118.975937692424, -20.1740159050357, 1.48)
    pt3dadd(-91.7113702529829, -119.940282657608, -20.1316192031809, 1.48)
    pt3dadd(-91.9726006260203, -120.904627622791, -20.0892225013261, 1.48)
    pt3dadd(-92.2338309990577, -121.868972587974, -20.0468257994713, 1.48)
    pt3dadd(-92.4950613720951, -122.833317553158, -20.0044290976165, 1.48)
    pt3dadd(-92.8266565637021, -123.775264283834, -20.0458117193459, 1.48)
    pt3dadd(-93.1642799066638, -124.715292158605, -20.0943717125689, 1.48)
    pt3dadd(-93.5019032496254, -125.655320033375, -20.1429317057918, 1.48)
    pt3dadd(-93.8395265925871, -126.595347908146, -20.1914916990148, 1.48)
    pt3dadd(-94.2100200831497, -127.521649470696, -20.2543407566096, 1.48)
    pt3dadd(-94.5972491537574, -128.440962388119, -20.3244649802143, 1.48)
    pt3dadd(-94.9844782243652, -129.360275305542, -20.394589203819, 1.48)
    pt3dadd(-95.3311978869586, -130.296126591497, -20.4471378252977, 1.48)
    pt3dadd(-95.6559361506716, -131.240952002066, -20.4901494937615, 1.48)
    pt3dadd(-95.9795901010892, -132.183747857037, -20.5389216248436, 1.48)
    pt3dadd(-96.1903715306532, -132.915275384465, -21.1873340441931, 1.48)
    pt3dadd(-96.4011529602171, -133.646802911892, -21.8357464635427, 1.48)
    pt3dadd(-96.611934389781, -134.37833043932, -22.4841588828923, 1.48)
    pt3dadd(-96.8227158193449, -135.109857966747, -23.1325713022419, 1.48)
    pt3dadd(-97.0152010598238, -135.881340368812, -23.674155753515, 1.48)
    pt3dadd(-97.1056008545884, -136.875755052939, -23.6196827042263, 1.48)
    pt3dadd(-97.196000649353, -137.870169737066, -23.5652096549376, 1.48)
    pt3dadd(-97.4491892974325, -138.75127585311, -23.7431518246801, 1.48)
    pt3dadd(-97.9253752286979, -139.477165550279, -24.2394693706211, 1.48)
    pt3dadd(-98.4015611599635, -140.203055247448, -24.7357869165621, 1.48)
    pt3dadd(-98.8777470912289, -140.928944944617, -25.232104462503, 1.48)
    pt3dadd(-99.3539330224944, -141.654834641786, -25.728422008444, 1.48)
    pt3dadd(-99.8937019367063, -142.430830509438, -25.4354561139184, 1.48)
    pt3dadd(-100.435556635679, -143.208470066674, -25.1165984588071, 1.48)
    pt3dadd(-100.977411334651, -143.98610962391, -24.7977408036958, 1.48)
    pt3dadd(-101.456437149686, -144.841585019015, -24.7842486957393, 1.48)
    pt3dadd(-101.912027586231, -145.726093435339, -24.8846589321693, 1.48)
    pt3dadd(-102.367618022776, -146.610601851664, -24.9850691685994, 1.48)
    pt3dadd(-102.823208459321, -147.495110267988, -25.0854794050294, 1.48)
    pt3dadd(-103.278798895866, -148.379618684313, -25.1858896414595, 1.48)
    pt3dadd(-103.67706433138, -149.25265188956, -25.432733207748, 1.48)
    pt3dadd(-104.033211086058, -150.117253856357, -25.7871664569568, 1.48)
    pt3dadd(-104.389357840735, -150.981855823153, -26.1415997061657, 1.48)
    pt3dadd(-104.745504595412, -151.846457789949, -26.4960329553746, 1.48)
    pt3dadd(-105.092424958101, -152.71797567562, -26.8285514270841, 1.48)
    pt3dadd(-105.295892535198, -153.697022899817, -26.8203369360228, 1.48)
    pt3dadd(-105.499360112296, -154.676070124013, -26.8121224449616, 1.48)
    pt3dadd(-105.702827689393, -155.65511734821, -26.8039079539004, 1.48)
    pt3dadd(-105.906457281126, -156.63412984731, -26.7957609008917, 1.48)
    pt3dadd(-106.125990939972, -157.609733578745, -26.794233862883, 1.48)
    pt3dadd(-106.345524598819, -158.585337310179, -26.7927068248743, 1.48)
    pt3dadd(-106.565058257666, -159.560941041613, -26.7911797868656, 1.48)
    pt3dadd(-106.819629326673, -160.524354757596, -26.8046621575592, 1.48)
    pt3dadd(-107.223972206244, -161.43566072142, -26.8823041309919, 1.48)
    pt3dadd(-107.628315085815, -162.346966685245, -26.9599461044246, 1.48)
    pt3dadd(-108.032657965386, -163.258272649069, -27.0375880778573, 1.48)
    pt3dadd(-108.263490899494, -164.120950836019, -27.3940949411305, 1.48)
    pt3dadd(-108.375636825466, -164.950365884454, -27.9413553624259, 1.48)
    pt3dadd(-108.487782751438, -165.77978093289, -28.4886157837212, 1.48)
    pt3dadd(-108.59992867741, -166.609195981326, -29.0358762050166, 1.48)
    pt3dadd(-108.889098408159, -167.44360675176, -29.4048297380739, 1.48)
    pt3dadd(-109.413753809014, -168.284663074434, -29.5365907810366, 1.48)
    pt3dadd(-109.938409209869, -169.125719397109, -29.6683518239993, 1.48)
    pt3dadd(-110.463064610724, -169.966775719784, -29.800112866962, 1.48)
    pt3dadd(-111.017703957656, -170.784970234727, -29.9458477514112, 1.48)
    pt3dadd(-111.603760769571, -171.579209929245, -30.1062245603915, 1.48)
    pt3dadd(-112.189817581487, -172.373449623764, -30.2666013693718, 1.48)
    pt3dadd(-112.775874393402, -173.167689318282, -30.4269781783521, 1.48)
    pt3dadd(-113.029939087427, -174.129631492947, -30.4403933200334, 1.48)
    pt3dadd(-113.263374397964, -175.101994393251, -30.4446765322821, 1.48)
    pt3dadd(-113.496809708501, -176.074357293555, -30.4489597445307, 1.48)
    pt3dadd(-113.78411222534, -177.028371313817, -30.4762830789997, 1.48)
    pt3dadd(-114.165279913138, -177.950411877864, -30.5437544953836, 1.48)
    pt3dadd(-114.546447600937, -178.872452441912, -30.6112259117675, 1.48)
    pt3dadd(-114.927615288735, -179.79449300596, -30.6786973281515, 1.48)
    pt3dadd(-115.38927247708, -180.67070044134, -30.7822688329609, 1.48)
    pt3dadd(-115.919394853565, -181.507921751127, -30.9165474403015, 1.48)
    pt3dadd(-116.44951723005, -182.345143060913, -31.0508260476422, 1.48)
    pt3dadd(-116.875885605696, -183.18931713379, -31.2553432260197, 1.48)
    pt3dadd(-116.882190159219, -184.061640523462, -31.7442319213653, 1.48)
    pt3dadd(-116.888494712742, -184.933963913133, -32.233120616711, 1.48)
    pt3dadd(-116.894799266264, -185.806287302805, -32.7220093120566, 1.48)
    pt3dadd(-116.901103819787, -186.678610692476, -33.2108980074022, 1.48)
    pt3dadd(-117.186284992875, -187.53902472225, -32.7898762862983, 1.48)
    pt3dadd(-117.471804846299, -188.39942428876, -32.3677495289735, 1.48)
    pt3dadd(-117.757324699723, -189.259823855271, -31.9456227716486, 1.48)
    pt3dadd(-118.042844553147, -190.120223421781, -31.5234960143238, 1.48)
    pt3dadd(-118.295527640892, -191.015254869229, -31.2115405811208, 1.48)
    pt3dadd(-118.462211251126, -192.000987200408, -31.1881238062054, 1.48)
    pt3dadd(-118.628894861359, -192.986719531588, -31.1647070312899, 1.48)
    pt3dadd(-118.796523986435, -193.97035908154, -31.1335807223966, 1.48)
    pt3dadd(-119.013610818946, -194.844530057401, -30.6991864175164, 1.48)
    pt3dadd(-119.230697651457, -195.718701033262, -30.2647921126361, 1.48)
    pt3dadd(-119.447784483968, -196.592872009123, -29.8303978077559, 1.48)
    pt3dadd(-119.718223800129, -197.501905721043, -29.6320034913199, 1.48)
    pt3dadd(-120.043267400533, -198.446620147693, -29.6751463924356, 1.48)
    pt3dadd(-120.368311000937, -199.391334574342, -29.7182892935513, 1.48)
    pt3dadd(-120.693354601341, -200.336049000992, -29.761432194667, 1.48)
    pt3dadd(-121.018398201744, -201.280763427641, -29.8045750957827, 1.48)
    pt3dadd(-121.302675724144, -202.234736571848, -29.8307019023415, 1.48)
    pt3dadd(-121.418078777353, -203.227064178622, -29.786339123523, 1.48)
    pt3dadd(-121.533481830562, -204.219391785396, -29.7419763447046, 1.48)
    pt3dadd(-121.648884883771, -205.21171939217, -29.6976135658861, 1.48)
    pt3dadd(-121.76428793698, -206.204046998944, -29.6532507870676, 1.48)
    pt3dadd(-122.032491289472, -207.16217019368, -29.6544788160151, 1.48)
    pt3dadd(-122.358521867379, -208.107348739391, -29.6729606718854, 1.48)
    pt3dadd(-122.684552445287, -209.052527285102, -29.6914425277556, 1.48)
    pt3dadd(-123.010583023195, -209.997705830813, -29.7099243836259, 1.48)
    pt3dadd(-123.3597411145, -210.901158282881, -29.5664274677957, 1.48)
    pt3dadd(-123.742374869002, -211.744214762701, -29.1884761723237, 1.48)
    pt3dadd(-124.125008623504, -212.587271242521, -28.8105248768516, 1.48)
    pt3dadd(-124.507642378005, -213.430327722341, -28.4325735813796, 1.48)
    pt3dadd(-124.890276132507, -214.273384202161, -28.0546222859076, 1.48)
    pt3dadd(-125.272909887009, -215.116440681982, -27.6766709904355, 1.48)
    pt3dadd(-125.757211915056, -215.967553889664, -27.5756447883105, 1.48)
    pt3dadd(-126.277530317254, -216.821521223959, -27.572720358014, 1.48)
    pt3dadd(-126.797848719452, -217.675488558253, -27.5697959277175, 1.48)
    pt3dadd(-127.318167121649, -218.529455892548, -27.566871497421, 1.48)
    pt3dadd(-127.838485523847, -219.383423226842, -27.5639470671246, 1.48)
    pt3dadd(-128.329038651614, -220.251619895585, -27.5670514059554, 1.48)
    pt3dadd(-128.671861543567, -221.190439226936, -27.6000775749017, 1.48)
    pt3dadd(-129.01468443552, -222.129258558286, -27.6331037438479, 1.48)
    pt3dadd(-129.357507327473, -223.068077889637, -27.6661299127942, 1.48)
    pt3dadd(-129.700330219426, -224.006897220988, -27.6991560817405, 1.48)
    pt3dadd(-130.102027424403, -224.863858512141, -27.3980923071229, 1.48)
    pt3dadd(-130.510307726871, -225.711666754514, -27.0596718899186, 1.48)
    pt3dadd(-130.91858802934, -226.559474996887, -26.7212514727142, 1.48)
    pt3dadd(-131.326868331808, -227.40728323926, -26.3828310555098, 1.48)
    pt3dadd(-131.735148634276, -228.255091481633, -26.0444106383054, 1.48)
    pt3dadd(-132.037723527516, -229.17087820051, -25.8775521822143, 1.48)
    pt3dadd(-132.242274866465, -230.149703243829, -25.8697878853765, 1.48)
    pt3dadd(-132.446826205413, -231.128528287148, -25.8620235885386, 1.48)
    pt3dadd(-132.651377544362, -232.107353330468, -25.8542592917008, 1.48)
    pt3dadd(-132.90404049601, -233.060588991154, -25.7468753054395, 1.48)
    pt3dadd(-133.216301364504, -233.982125986742, -25.516088139918, 1.48)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(-133.216301364504, -233.982125986742, -25.516088139918, 1.48)
    pt3dadd(-133.528562232998, -234.903662982331, -25.2853009743964, 1.48)
    pt3dadd(-133.840823101492, -235.825199977919, -25.0545138088749, 1.48)
    pt3dadd(-134.153083969986, -236.746736973508, -24.8237266433534, 1.48)
    pt3dadd(-134.410832151569, -237.692793475704, -24.6737570073747, 1.48)
    pt3dadd(-134.581979497278, -238.677802557342, -24.6521770364159, 1.48)
    pt3dadd(-134.753126842986, -239.662811638981, -24.6305970654572, 1.48)
    pt3dadd(-134.924274188694, -240.647820720619, -24.6090170944984, 1.48)
    pt3dadd(-135.095421534402, -241.632829802258, -24.5874371235396, 1.48)
    pt3dadd(-135.246737483184, -242.620718932637, -24.5577269057192, 1.48)
    pt3dadd(-135.385508159161, -243.610429971846, -24.5228735219769, 1.48)
    pt3dadd(-135.524278835137, -244.600141011054, -24.4880201382346, 1.48)
    pt3dadd(-135.663049511113, -245.589852050262, -24.4531667544922, 1.48)
    pt3dadd(-135.80181285071, -246.579440664627, -24.4442743794645, 1.48)
    pt3dadd(-135.940561168598, -247.568778606301, -24.4885388284723, 1.48)
    pt3dadd(-136.079309486487, -248.558116547976, -24.53280327748, 1.48)
    pt3dadd(-136.21771444449, -249.547515876789, -24.5728150916427, 1.48)
    pt3dadd(-136.349856467601, -250.538034916036, -24.535258219876, 1.48)
    pt3dadd(-136.481998490712, -251.528553955283, -24.4977013481094, 1.48)
    pt3dadd(-136.614140513823, -252.51907299453, -24.4601444763428, 1.48)
    pt3dadd(-136.741904198309, -253.509940003143, -24.4208187776972, 1.48)
    pt3dadd(-136.80863945679, -254.505657258511, -24.3568379005656, 1.48)
    pt3dadd(-136.875374715271, -255.501374513879, -24.292857023434, 1.48)
    pt3dadd(-136.942109973753, -256.497091769246, -24.2288761463025, 1.48)
    pt3dadd(-136.985996420679, -257.478778699076, -24.3445302342614, 1.48)
    pt3dadd(-137.015344966134, -258.451538622362, -24.5744797820504, 1.48)
    pt3dadd(-137.04469351159, -259.424298545648, -24.8044293298394, 1.48)
    pt3dadd(-137.074042057045, -260.397058468934, -25.0343788776284, 1.48)
    pt3dadd(-137.335477094106, -261.340739061448, -25.1433464790802, 1.48)
    pt3dadd(-137.694787538786, -262.272156332073, -25.2012936302235, 1.48)
    pt3dadd(-138.054097983466, -263.203573602698, -25.2592407813668, 1.48)
    pt3dadd(-138.413408428146, -264.134990873323, -25.3171879325101, 1.48)
    pt3dadd(-138.715047742303, -265.086664606779, -25.3504123586456, 1.48)
    pt3dadd(-138.987145530294, -266.048714534032, -25.3709727877151, 1.48)
    pt3dadd(-139.259243318285, -267.010764461284, -25.3915332167845, 1.48)
    pt3dadd(-139.594823087042, -267.863141292036, -25.1150407422283, 1.48)
    pt3dadd(-139.981768493887, -268.626777530344, -24.5981916852833, 1.48)
    pt3dadd(-140.368713900732, -269.390413768652, -24.0813426283384, 1.48)
    pt3dadd(-140.755659307577, -270.154050006959, -23.5644935713935, 1.48)
    pt3dadd(-141.142604714422, -270.917686245267, -23.0476445144485, 1.48)
    pt3dadd(-141.204816100785, -271.83042266794, -22.6524874285831, 1.48)
    pt3dadd(-141.251318948704, -272.750371596327, -22.2632170157651, 1.48)
    pt3dadd(-141.297821796624, -273.670320524714, -21.873946602947, 1.48)
    pt3dadd(-141.501777842837, -274.618755716555, -21.7681113296989, 1.48)
    pt3dadd(-141.776586651431, -275.580009514037, -21.7898197507806, 1.48)
    pt3dadd(-142.051395460025, -276.541263311519, -21.8115281718622, 1.48)
    pt3dadd(-142.154570342319, -277.521919828611, -21.7633738682209, 1.48)
    pt3dadd(-142.13241978473, -278.516744024685, -21.664206475873, 1.48)
    pt3dadd(-142.110269227141, -279.511568220759, -21.5650390835253, 1.48)
    pt3dadd(-142.088118669552, -280.506392416832, -21.4658716911775, 1.48)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(-76.09595939421, -91.4741845438347, -13.8727859345012, 1.48)
    pt3dadd(-75.9565511289794, -92.4337349058662, -14.1236888946285, 1.48)
    pt3dadd(-75.8210563963783, -93.3920704494442, -14.3751529345077, 1.48)
    pt3dadd(-75.6855616637772, -94.3504059930222, -14.626616974387, 1.48)
    pt3dadd(-75.5500669311761, -95.3087415366003, -14.8780810142663, 1.48)
    pt3dadd(-75.4219588061196, -96.2680799245061, -15.1208214897116, 1.48)
    pt3dadd(-75.5370575633295, -97.2604373459654, -15.076335265291, 1.48)
    pt3dadd(-75.6521563205395, -98.2527947674248, -15.0318490408704, 1.48)
    pt3dadd(-75.7672550777495, -99.2451521888842, -14.9873628164498, 1.48)
    pt3dadd(-75.8823538349594, -100.237509610344, -14.9428765920292, 1.48)
    pt3dadd(-75.7749071803587, -101.082486071285, -15.2672793875219, 1.48)
    pt3dadd(-75.485805267379, -101.807161123875, -15.8927920988755, 1.48)
    pt3dadd(-75.1967033543992, -102.531836176466, -16.5183048102291, 1.48)
    pt3dadd(-74.9484401774602, -103.316035780737, -16.9702202141857, 1.48)
    pt3dadd(-74.8378606786377, -104.300916405243, -16.8368698114398, 1.48)
    pt3dadd(-74.7272811798152, -105.285797029749, -16.7035194086939, 1.48)
    pt3dadd(-74.6167016809927, -106.270677654256, -16.5701690059481, 1.48)
    pt3dadd(-74.5735946173707, -107.263145353524, -16.4629006858537, 1.48)
    pt3dadd(-74.5514440597817, -108.257969549597, -16.3637332935059, 1.48)
    pt3dadd(-74.5292935021927, -109.252793745671, -16.2645659011581, 1.48)
    pt3dadd(-74.5071429446038, -110.247617941744, -16.1653985088103, 1.48)
  }
}
proc shape3d_3() {
  adendIML[3] {
    pt3dadd(-74.4423707592611, -111.238029502536, -16.0497208129464, 1.48)
    pt3dadd(-74.3471144134809, -112.225285025208, -15.9222344939074, 1.48)
    pt3dadd(-74.2518580677006, -113.21254054788, -15.7947481748683, 1.48)
    pt3dadd(-74.1566017219204, -114.199796070552, -15.6672618558292, 1.48)
    pt3dadd(-74.1001989864236, -115.186633649886, -15.5249122263371, 1.48)
    pt3dadd(-74.1045655051234, -116.172817542093, -15.3593155347434, 1.48)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(-74.1045655051234, -116.172817542093, -15.3593155347434, 1.48)
    pt3dadd(-74.1089320238233, -117.159001434299, -15.1937188431497, 1.48)
    pt3dadd(-74.1132985425231, -118.145185326506, -15.0281221515561, 1.48)
    pt3dadd(-74.117665061223, -119.131369218713, -14.8625254599624, 1.48)
    pt3dadd(-74.0640606810059, -120.11945344429, -14.7256627494194, 1.48)
    pt3dadd(-73.9816120744576, -121.108483207143, -14.6030970304413, 1.48)
    pt3dadd(-73.8991634679092, -122.097512969996, -14.4805313114632, 1.48)
    pt3dadd(-73.8167148613608, -123.08654273285, -14.3579655924851, 1.48)
    pt3dadd(-73.7342662548125, -124.075572495703, -14.235399873507, 1.48)
    pt3dadd(-73.6012847709064, -124.99347610662, -14.5164988431272, 1.48)
    pt3dadd(-73.4503035919453, -125.886044745293, -14.9413822493194, 1.48)
    pt3dadd(-73.2993224129843, -126.778613383966, -15.3662656555116, 1.48)
    pt3dadd(-73.1483412340232, -127.671182022638, -15.7911490617038, 1.48)
    pt3dadd(-72.9973600550621, -128.563750661311, -16.216032467896, 1.48)
    pt3dadd(-72.8221462495073, -129.519783406552, -16.1644378197925, 1.48)
    pt3dadd(-72.6414257998147, -130.490237793172, -16.0045678646621, 1.48)
    pt3dadd(-72.460705350122, -131.460692179791, -15.8446979095318, 1.48)
    pt3dadd(-72.2799849004294, -132.431146566411, -15.6848279544015, 1.48)
    pt3dadd(-72.0992644507367, -133.401600953031, -15.5249579992712, 1.48)
    pt3dadd(-71.9250661066057, -134.373354566314, -15.3675578178124, 1.48)
    pt3dadd(-71.8253911768022, -135.35995350923, -15.2383779656446, 1.48)
    pt3dadd(-71.7257162469987, -136.346552452146, -15.1091981134769, 1.48)
    pt3dadd(-71.6260413171953, -137.333151395062, -14.9800182613092, 1.48)
    pt3dadd(-71.4971761560025, -138.31121910288, -14.8400315146917, 1.48)
    pt3dadd(-71.1670743807761, -139.23047272178, -14.625542349156, 1.48)
    pt3dadd(-70.8369726055498, -140.14972634068, -14.4110531836202, 1.48)
    pt3dadd(-70.5068708303234, -141.068979959579, -14.1965640180845, 1.48)
    pt3dadd(-70.1767690550971, -141.988233578479, -13.9820748525487, 1.48)
    pt3dadd(-70.1611700022448, -142.965165186267, -14.1363893699823, 1.48)
    pt3dadd(-70.1740153182236, -143.947313327563, -14.3240593633412, 1.48)
    pt3dadd(-70.1868606342025, -144.929461468858, -14.5117293567002, 1.48)
    pt3dadd(-70.2067095573241, -145.910896902603, -14.6956601031159, 1.48)
    pt3dadd(-70.5087278743127, -146.863617953389, -14.7289397604602, 1.48)
    pt3dadd(-70.8107461913014, -147.816339004174, -14.7622194178046, 1.48)
    pt3dadd(-71.11276450829, -148.76906005496, -14.7954990751489, 1.48)
    pt3dadd(-71.4147828252786, -149.721781105746, -14.8287787324932, 1.48)
    pt3dadd(-71.7264292949751, -150.671093663224, -14.8661882554611, 1.48)
    pt3dadd(-72.0604990575368, -151.612468078673, -14.9132159460235, 1.48)
    pt3dadd(-72.3945688200986, -152.553842494122, -14.960243636586, 1.48)
    pt3dadd(-72.7286385826603, -153.495216909572, -15.0072713271484, 1.48)
    pt3dadd(-72.677308727988, -154.470942418644, -14.8982614194049, 1.48)
    pt3dadd(-72.5519330303331, -155.453267715497, -14.759272406891, 1.48)
    pt3dadd(-72.4265573326782, -156.43559301235, -14.6202833943771, 1.48)
    pt3dadd(-72.0408551245703, -157.329049659913, -14.7870016623991, 1.48)
    pt3dadd(-71.616403519643, -158.209278278758, -14.99922421926, 1.48)
    pt3dadd(-71.1919519147158, -159.089506897603, -15.2114467761208, 1.48)
    pt3dadd(-70.8526387613948, -159.969149897466, -15.30928693113, 1.48)
    pt3dadd(-70.9384354755113, -160.84586880835, -14.8359975110657, 1.48)
    pt3dadd(-71.0242321896279, -161.722587719235, -14.3627080910013, 1.48)
    pt3dadd(-71.1100289037444, -162.599306630119, -13.889418670937, 1.48)
    pt3dadd(-71.195825617861, -163.476025541003, -13.4161292508727, 1.48)
    pt3dadd(-71.0777951051551, -164.448954436248, -13.249157271116, 1.48)
    pt3dadd(-70.9434190405339, -165.429598715344, -13.1067498586216, 1.48)
    pt3dadd(-70.9445817707183, -166.378139339396, -13.0210373986776, 1.48)
    pt3dadd(-71.5026415474642, -167.194773591524, -13.1682711714005, 1.48)
    pt3dadd(-72.06070132421, -168.011407843651, -13.3155049441234, 1.48)
    pt3dadd(-72.6131797180613, -168.829472316886, -13.4653596423241, 1.48)
    pt3dadd(-72.7363677909199, -169.757541799602, -13.8168020045363, 1.48)
    pt3dadd(-72.8595558637785, -170.685611282318, -14.1682443667484, 1.48)
    pt3dadd(-72.9827439366371, -171.613680765033, -14.5196867289605, 1.48)
    pt3dadd(-73.1059320094957, -172.541750247749, -14.8711290911726, 1.48)
    pt3dadd(-73.0632470973715, -173.442039919591, -15.2768711127866, 1.48)
    pt3dadd(-72.8982583221326, -174.32184658037, -15.7226501429064, 1.48)
    pt3dadd(-72.7332695468937, -175.201653241148, -16.1684291730262, 1.48)
    pt3dadd(-72.5682807716548, -176.081459901927, -16.614208203146, 1.48)
    pt3dadd(-72.4032919964159, -176.961266562706, -17.0599872332659, 1.48)
    pt3dadd(-72.238303221177, -177.841073223485, -17.5057662633857, 1.48)
    pt3dadd(-72.209177959411, -178.828449709381, -17.6482784612276, 1.48)
    pt3dadd(-72.1844288810541, -179.819291034894, -17.7810223905624, 1.48)
    pt3dadd(-72.1596798026972, -180.810132360408, -17.9137663198973, 1.48)
    pt3dadd(-72.1349307243402, -181.800973685921, -18.0465102492321, 1.48)
    pt3dadd(-72.1214589804624, -182.686288920097, -17.6096751207558, 1.48)
    pt3dadd(-72.1088341881779, -183.563678922352, -17.1300634042995, 1.48)
    pt3dadd(-72.0962093958933, -184.441068924608, -16.6504516878431, 1.48)
    pt3dadd(-72.0835846036088, -185.318458926863, -16.1708399713868, 1.48)
    pt3dadd(-72.185746286903, -186.307668612082, -16.1079726439554, 1.48)
    pt3dadd(-72.2919816057083, -187.300846644871, -16.0598950792868, 1.48)
    pt3dadd(-72.3982169245136, -188.29402467766, -16.0118175146182, 1.48)
    pt3dadd(-72.504452243319, -189.287202710448, -15.9637399499497, 1.48)
    pt3dadd(-72.5419511032988, -190.245366219098, -16.0513814426871, 1.48)
    pt3dadd(-72.374018043266, -191.098882193601, -16.5446450320765, 1.48)
    pt3dadd(-72.2060849832331, -191.952398168103, -17.0379086214659, 1.48)
    pt3dadd(-72.0381519232003, -192.805914142605, -17.5311722108552, 1.48)
    pt3dadd(-71.8702188631674, -193.659430117108, -18.0244358002446, 1.48)
    pt3dadd(-71.7985897229763, -194.606294301546, -18.1263394882703, 1.48)
    pt3dadd(-71.7764391653873, -195.60111849762, -18.0271720959225, 1.48)
    pt3dadd(-71.7542886077983, -196.595942693693, -17.9280047035747, 1.48)
    pt3dadd(-72.0366744892551, -197.530708933219, -17.9551258794847, 1.48)
    pt3dadd(-72.4430863335619, -198.441015880087, -18.0336795254275, 1.48)
    pt3dadd(-72.8494981778686, -199.351322826956, -18.1122331713704, 1.48)
    pt3dadd(-73.218165025951, -200.271058208607, -18.1749539931528, 1.48)
    pt3dadd(-73.2822272783317, -201.266881677494, -18.1099028852858, 1.48)
    pt3dadd(-73.3462895307125, -202.26270514638, -18.0448517774187, 1.48)
    pt3dadd(-73.4103517830933, -203.258528615267, -17.9798006695517, 1.48)
    pt3dadd(-73.4923973855685, -204.2539106043, -17.981054190259, 1.48)
    pt3dadd(-73.5838983307072, -205.24906047066, -18.0171695681874, 1.48)
    pt3dadd(-73.6753992758459, -206.244210337019, -18.0532849461157, 1.48)
    pt3dadd(-73.7669002209846, -207.239360203379, -18.0894003240441, 1.48)
    pt3dadd(-73.8584011661233, -208.234510069739, -18.1255157019725, 1.48)
    pt3dadd(-73.9072182867717, -209.23063093479, -18.0770502942702, 1.48)
    pt3dadd(-73.9417173052874, -210.227077517104, -18.0002126321699, 1.48)
    pt3dadd(-73.9762163238031, -211.223524099417, -17.9233749700697, 1.48)
    pt3dadd(-74.0107153423188, -212.219970681731, -17.8465373079694, 1.48)
    pt3dadd(-74.0452143608346, -213.216417264045, -17.7696996458691, 1.48)
    pt3dadd(-74.0370552178475, -214.209842208612, -17.6762108140903, 1.48)
    pt3dadd(-73.9417988720673, -215.197097731284, -17.5487244950512, 1.48)
    pt3dadd(-73.8465425262872, -216.184353253956, -17.4212381760121, 1.48)
    pt3dadd(-73.751286180507, -217.171608776628, -17.2937518569731, 1.48)
    pt3dadd(-73.6845860204318, -218.159556893714, -17.1775329903598, 1.48)
    pt3dadd(-73.7996847776417, -219.151914315173, -17.1330467659392, 1.48)
    pt3dadd(-73.9147835348516, -220.144271736632, -17.0885605415186, 1.48)
    pt3dadd(-74.0298822920615, -221.136629158092, -17.044074317098, 1.48)
    pt3dadd(-74.1449810492715, -222.128986579551, -16.9995880926774, 1.48)
    pt3dadd(-74.0827471357724, -223.097990878066, -17.1459411226485, 1.48)
    pt3dadd(-73.9278745273449, -224.054795490964, -17.3919886950709, 1.48)
    pt3dadd(-73.7730019189174, -225.011600103863, -17.6380362674933, 1.48)
    pt3dadd(-73.6181293104899, -225.968404716761, -17.8840838399156, 1.48)
    pt3dadd(-73.6153141162337, -226.884632506221, -17.5048167359005, 1.48)
    pt3dadd(-73.6185972078067, -227.799232955976, -17.1004712912408, 1.48)
    pt3dadd(-73.6129628136681, -228.741961265283, -16.8031266510525, 1.48)
    pt3dadd(-73.5908122560792, -229.736785461357, -16.7039592587047, 1.48)
    pt3dadd(-73.5686616984902, -230.731609657431, -16.6047918663569, 1.48)
    pt3dadd(-73.5465111409012, -231.726433853504, -16.5056244740091, 1.48)
    pt3dadd(-73.4892943318681, -232.717998522239, -16.4966030897347, 1.48)
    pt3dadd(-73.381744977076, -233.704884609656, -16.61697329679, 1.48)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(-73.381744977076, -233.704884609656, -16.61697329679, 1.48)
    pt3dadd(-73.274195622284, -234.691770697073, -16.7373435038453, 1.48)
    pt3dadd(-73.2462723892918, -235.684656911932, -16.7286818174955, 1.48)
    pt3dadd(-73.2644196171784, -236.681014709108, -16.6453642435693, 1.48)
    pt3dadd(-73.282566845065, -237.677372506285, -16.5620466696431, 1.48)
    pt3dadd(-73.3007140729516, -238.673730303462, -16.4787290957169, 1.48)
    pt3dadd(-73.3188613008382, -239.670088100639, -16.3954115217907, 1.48)
    pt3dadd(-73.3370085287248, -240.666445897816, -16.3120939478645, 1.48)
    pt3dadd(-73.3551557566114, -241.662803694993, -16.2287763739383, 1.48)
    pt3dadd(-73.3240047289615, -242.655469552584, -16.1812632438817, 1.48)
    pt3dadd(-73.1421950503149, -243.636852604496, -16.2431708053768, 1.48)
    pt3dadd(-72.9603853716683, -244.618235656408, -16.3050783668718, 1.48)
    pt3dadd(-72.7785756930217, -245.59961870832, -16.3669859283668, 1.48)
    pt3dadd(-72.5683433552294, -246.576110501368, -16.4091848547794, 1.48)
    pt3dadd(-72.3468045673396, -247.550656566045, -16.4435437442021, 1.48)
    pt3dadd(-72.1252657794498, -248.525202630722, -16.4779026336249, 1.48)
    pt3dadd(-71.90372699156, -249.499748695399, -16.5122615230476, 1.48)
    pt3dadd(-71.4551784220636, -250.352310767325, -16.2833909442123, 1.48)
    pt3dadd(-70.9739085280296, -251.187289994198, -16.0165783137272, 1.48)
    pt3dadd(-70.4926386339957, -252.022269221071, -15.749765683242, 1.48)
    pt3dadd(-70.0113687399617, -252.857248447945, -15.4829530527569, 1.48)
    pt3dadd(-70.101254240288, -253.791558382549, -15.1903334453486, 1.48)
    pt3dadd(-70.2477196607705, -254.73570823737, -14.8951573415678, 1.48)
    pt3dadd(-70.394185081253, -255.679858092192, -14.599981237787, 1.48)
    pt3dadd(-70.5142403030807, -256.616769334968, -14.3044501345975, 1.48)
    pt3dadd(-69.9143594648614, -257.356357645627, -13.9992418275772, 1.48)
    pt3dadd(-69.3144786266421, -258.095945956286, -13.6940335205569, 1.48)
    pt3dadd(-68.7145977884228, -258.835534266944, -13.3888252135366, 1.48)
    pt3dadd(-68.3451743681463, -259.666867966197, -12.9841918933106, 1.48)
    pt3dadd(-68.0037702184711, -260.509356172396, -12.5674703687889, 1.48)
    pt3dadd(-67.6623660687959, -261.351844378595, -12.1507488442673, 1.48)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(-67.6623660687959, -261.351844378595, -12.1507488442673, 1.48)
    pt3dadd(-68.1947617056165, -261.983500091645, -12.2595740562301, 1.48)
    pt3dadd(-68.9735571551829, -262.555703871156, -12.5165963946517, 1.48)
    pt3dadd(-69.6805084722256, -263.215370127533, -12.7371669310924, 1.48)
    pt3dadd(-70.3040875381848, -263.976533100838, -12.915436604812, 1.48)
    pt3dadd(-70.9178573986745, -264.745346079637, -13.0891192393396, 1.48)
    pt3dadd(-71.4173711891605, -265.6032651095, -13.2093727686587, 1.48)
    pt3dadd(-71.9168849796465, -266.461184139363, -13.3296262979778, 1.48)
    pt3dadd(-72.4163987701324, -267.319103169226, -13.449879827297, 1.48)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-67.6623660687959, -261.351844378595, -12.1507488442673, 1.48)
    pt3dadd(-67.2194757880974, -262.224599872951, -12.034329413111, 1.48)
    pt3dadd(-66.7400028631703, -263.095001851544, -11.9700644334768, 1.48)
    pt3dadd(-66.206726803736, -263.891851953712, -11.68608105525, 1.48)
    pt3dadd(-65.6734507443018, -264.68870205588, -11.4020976770232, 1.48)
    pt3dadd(-65.2410995748279, -265.552226757234, -11.1521014390422, 1.48)
    pt3dadd(-64.8400711426985, -266.4364443814, -10.912653345007, 1.48)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(-47.5276363520957, -34.2786654958191, -5.506407352372, 1.48)
    pt3dadd(-47.8356664435684, -35.2239834264578, -5.4095300395534, 1.48)
    pt3dadd(-48.1457358783952, -36.167931353751, -5.29630788560383, 1.48)
    pt3dadd(-48.4558053132219, -37.1118792810443, -5.18308573165426, 1.48)
    pt3dadd(-48.7658747480486, -38.0558272083376, -5.06986357770469, 1.48)
    pt3dadd(-49.0759441828753, -38.9997751356308, -4.95664142375513, 1.48)
    pt3dadd(-49.3857332028823, -39.943811396601, -4.84365339899788, 1.48)
    pt3dadd(-49.576394943316, -40.9253740287961, -4.83012935326638, 1.48)
    pt3dadd(-49.7670566837497, -41.9069366609913, -4.81660530753486, 1.48)
    pt3dadd(-49.9577184241833, -42.8884992931864, -4.80308126180335, 1.48)
    pt3dadd(-50.148380164617, -43.8700619253816, -4.78955721607184, 1.48)
    pt3dadd(-50.2759412556695, -44.8601344910856, -4.75022330767047, 1.48)
    pt3dadd(-50.3776040801315, -45.8536997708718, -4.70029631170752, 1.48)
    pt3dadd(-50.4792669045935, -46.8472650506579, -4.65036931574457, 1.48)
    pt3dadd(-50.5809297290555, -47.8408303304441, -4.60044231978161, 1.48)
    pt3dadd(-50.6825925535175, -48.8343956102302, -4.55051532381867, 1.48)
    pt3dadd(-50.809775029526, -49.7448661980698, -4.87388395592663, 1.48)
    pt3dadd(-50.9456954645579, -50.6268850646167, -5.32506945480274, 1.48)
    pt3dadd(-51.0816158995897, -51.5089039311636, -5.77625495367885, 1.48)
    pt3dadd(-51.2175363346216, -52.3909227977105, -6.22744045255497, 1.48)
    pt3dadd(-51.5182527669969, -53.3122832337276, -6.0895895284502, 1.48)
    pt3dadd(-51.8372450587639, -54.2380066458089, -5.88641452477685, 1.48)
    pt3dadd(-52.156237350531, -55.1637300578903, -5.68323952110348, 1.48)
    pt3dadd(-52.4752296422981, -56.0894534699716, -5.48006451743012, 1.48)
    pt3dadd(-52.7297567543262, -57.0495654282223, -5.42619113658541, 1.48)
    pt3dadd(-52.9597882660843, -58.0227444109386, -5.42904966725138, 1.48)
    pt3dadd(-53.1898197778425, -58.9959233936549, -5.43190819791736, 1.48)
    pt3dadd(-53.4150024376414, -59.9701070829307, -5.43275155008522, 1.48)
    pt3dadd(-53.5963821723844, -60.9533669590032, -5.41539044613233, 1.48)
    pt3dadd(-53.7777619071274, -61.9366268350757, -5.39802934217943, 1.48)
    pt3dadd(-53.9494994656954, -62.9208721224591, -5.37675294259945, 1.48)
    pt3dadd(-54.005224327132, -63.9169736777517, -5.30836850459311, 1.48)
    pt3dadd(-54.0609491885686, -64.9130752330443, -5.23998406658677, 1.48)
    pt3dadd(-54.1166740500052, -65.909176788337, -5.17159962858043, 1.48)
    pt3dadd(-54.1689642242282, -66.8705445161752, -5.20236951941594, 1.48)
    pt3dadd(-54.1988458653563, -67.6053023451704, -5.8800405459869, 1.48)
    pt3dadd(-54.2287275064844, -68.3400601741656, -6.55771157255787, 1.48)
    pt3dadd(-54.2586091476125, -69.0748180031608, -7.23538259912883, 1.48)
    pt3dadd(-54.2884907887405, -69.809575832156, -7.91305362569981, 1.48)
    pt3dadd(-54.3183724298686, -70.5443336611512, -8.59072465227078, 1.48)
    pt3dadd(-54.436379057618, -71.5217637656918, -8.58898612289881, 1.48)
    pt3dadd(-54.559507464311, -72.5132978582017, -8.54776065921709, 1.48)
    pt3dadd(-54.682635871004, -73.5048319507116, -8.50653519553536, 1.48)
    pt3dadd(-54.805764277697, -74.4963660432216, -8.46530973185363, 1.48)
    pt3dadd(-55.0617148609044, -75.458455844769, -8.47945973503931, 1.48)
    pt3dadd(-55.3710543210177, -76.4087102912045, -8.51586832532072, 1.48)
    pt3dadd(-55.680393781131, -77.3589647376401, -8.55227691560215, 1.48)
    pt3dadd(-55.9907217526884, -78.3088646784344, -8.58886093872065, 1.48)
    pt3dadd(-56.3431343199857, -79.2436720002343, -8.63291378789285, 1.48)
    pt3dadd(-56.695546887283, -80.1784793220343, -8.67696663706505, 1.48)
    pt3dadd(-57.0479594545804, -81.1132866438341, -8.72101948623725, 1.48)
    pt3dadd(-57.4003720218777, -82.0480939656341, -8.76507233540945, 1.48)
    pt3dadd(-57.752784589175, -82.9829012874339, -8.80912518458165, 1.48)
    pt3dadd(-58.0995908406422, -83.9195177417805, -8.85135461803789, 1.48)
    pt3dadd(-58.3444216830267, -84.8890411955024, -8.8604172501224, 1.48)
    pt3dadd(-58.5892525254111, -85.8585646492244, -8.86947988220692, 1.48)
    pt3dadd(-58.8340833677955, -86.8280881029464, -8.87854251429144, 1.48)
    pt3dadd(-59.0789142101799, -87.7976115566684, -8.88760514637596, 1.48)
    pt3dadd(-59.3810833788417, -88.7474012738705, -8.9212109660713, 1.48)
    pt3dadd(-59.756460856931, -89.6719953918443, -8.98615298599441, 1.48)
    pt3dadd(-60.1318383350203, -90.596589509818, -9.05109500591753, 1.48)
    pt3dadd(-60.5072158131096, -91.5211836277918, -9.11603702584063, 1.48)
    pt3dadd(-60.689044054639, -92.4876265990242, -9.1003816741203, 1.48)
    pt3dadd(-60.7324856231614, -93.4839912773869, -9.02709963105722, 1.48)
    pt3dadd(-60.7759271916838, -94.4803559557496, -8.95381758799414, 1.48)
    pt3dadd(-60.8193687602062, -95.4767206341123, -8.88053554493105, 1.48)
    pt3dadd(-60.8628103287286, -96.473085312475, -8.80725350186798, 1.48)
    pt3dadd(-61.0049618696734, -97.4617363246648, -8.77383786223215, 1.48)
    pt3dadd(-61.1579051090422, -98.4495440222731, -8.74478071032032, 1.48)
    pt3dadd(-61.310848348411, -99.4373517198813, -8.71572355840848, 1.48)
    pt3dadd(-61.4120780703265, -100.429594978551, -8.68464346354136, 1.48)
  }
}
proc shape3d_4() {
  adendIML[4] {
    pt3dadd(-61.4320420262998, -101.428808547591, -8.65038439310237, 1.48)
    pt3dadd(-61.4520059822731, -102.428022116632, -8.61612532266338, 1.48)
    pt3dadd(-61.4719699382465, -103.427235685672, -8.5818662522244, 1.48)
    pt3dadd(-61.4919338942198, -104.426449254713, -8.54760718178541, 1.48)
    pt3dadd(-61.7189341270557, -105.399018811748, -8.54340952890917, 1.48)
    pt3dadd(-61.9578588128286, -106.370053781358, -8.54094329220976, 1.48)
    pt3dadd(-62.1967834986016, -107.341088750968, -8.53847705551034, 1.48)
    pt3dadd(-62.340208927218, -108.320825631285, -8.50063830163282, 1.48)
    pt3dadd(-62.3180583696291, -109.315649827358, -8.40147090928503, 1.48)
    pt3dadd(-62.2959078120401, -110.310474023432, -8.30230351693723, 1.48)
    pt3dadd(-62.2737572544511, -111.305298219505, -8.20313612458943, 1.48)
    pt3dadd(-62.4761965244326, -112.269806789924, -8.19583444684066, 1.48)
    pt3dadd(-62.7863816557846, -113.219771588551, -8.23260489229072, 1.48)
    pt3dadd(-63.0965667871365, -114.169736387178, -8.26937533774079, 1.48)
    pt3dadd(-63.4067519184885, -115.119701185804, -8.30614578319086, 1.48)
    pt3dadd(-63.4591917498674, -116.115681945124, -8.23646890233422, 1.48)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(-63.4591917498674, -116.115681945124, -8.23646890233422, 1.48)
    pt3dadd(-63.5102843959435, -117.111903221055, -8.16623564169668, 1.48)
    pt3dadd(-63.5613770420195, -118.108124496986, -8.09600238105912, 1.48)
    pt3dadd(-63.6124696880956, -119.104345772917, -8.02576912042157, 1.48)
    pt3dadd(-63.6048363518748, -120.099446878199, -7.932336638265, 1.48)
    pt3dadd(-63.5826857942859, -121.094271074272, -7.83316924591719, 1.48)
    pt3dadd(-63.5605352366969, -122.089095270346, -7.73400185356939, 1.48)
    pt3dadd(-63.482573595694, -123.078387104822, -7.61319264038292, 1.48)
    pt3dadd(-63.3949012516445, -124.066716350556, -7.48861791535364, 1.48)
    pt3dadd(-63.3072289075949, -125.05504559629, -7.36404319032436, 1.48)
    pt3dadd(-63.2195565635454, -126.043374842024, -7.23946846529508, 1.48)
    pt3dadd(-63.3237298295874, -127.033869698637, -7.19081649353506, 1.48)
    pt3dadd(-63.4535922948021, -128.024654542648, -7.15233100267364, 1.48)
    pt3dadd(-63.5834547600168, -129.015439386659, -7.11384551181224, 1.48)
    pt3dadd(-63.7133172252316, -130.006224230669, -7.07536002095082, 1.48)
    pt3dadd(-63.7747783217828, -130.974316710088, -7.30029472112178, 1.48)
    pt3dadd(-63.828513836419, -131.939846203928, -7.55498137368325, 1.48)
    pt3dadd(-63.8822493510551, -132.905375697767, -7.80966802624474, 1.48)
    pt3dadd(-63.9359848656912, -133.870905191607, -8.06435467880622, 1.48)
    pt3dadd(-63.9897203803274, -134.836434685446, -8.3190413313677, 1.48)
    pt3dadd(-63.9730697819524, -135.829841138406, -8.4134574899639, 1.48)
    pt3dadd(-63.9475655373914, -136.826754145745, -8.48771373083006, 1.48)
    pt3dadd(-63.9220612928304, -137.823667153084, -8.56196997169623, 1.48)
    pt3dadd(-63.8965570482693, -138.820580160423, -8.63622621256239, 1.48)
    pt3dadd(-63.8710528037083, -139.817493167762, -8.71048245342856, 1.48)
    pt3dadd(-63.8149790958353, -140.811212426845, -8.79803087219856, 1.48)
    pt3dadd(-63.7122064754222, -141.800052811575, -8.90588485692059, 1.48)
    pt3dadd(-63.609433855009, -142.788893196305, -9.01373884164265, 1.48)
    pt3dadd(-63.5066612345959, -143.777733581035, -9.12159282636468, 1.48)
    pt3dadd(-63.4175328275617, -144.755225364623, -9.08754957578439, 1.48)
    pt3dadd(-63.3520281762883, -145.713068043192, -8.80782373898299, 1.48)
    pt3dadd(-63.286523525015, -146.67091072176, -8.5280979021816, 1.48)
    pt3dadd(-63.2210188737416, -147.628753400329, -8.2483720653802, 1.48)
    pt3dadd(-63.1555142224683, -148.586596078897, -7.96864622857881, 1.48)
    pt3dadd(-63.0900095711949, -149.544438757466, -7.68892039177742, 1.48)
    pt3dadd(-63.0245049199215, -150.502281436034, -7.40919455497601, 1.48)
    pt3dadd(-63.2414685388686, -151.468886747033, -7.38913181063765, 1.48)
    pt3dadd(-63.4933325777954, -152.436574726721, -7.40115178827415, 1.48)
    pt3dadd(-63.7451966167222, -153.404262706409, -7.41317176591064, 1.48)
    pt3dadd(-64.0138601655677, -154.367335225462, -7.41935032714045, 1.48)
    pt3dadd(-64.2961089748186, -155.326675359764, -7.42080510991455, 1.48)
    pt3dadd(-64.5783577840694, -156.286015494067, -7.42225989268864, 1.48)
    pt3dadd(-64.8606065933202, -157.245355628369, -7.42371467546274, 1.48)
    pt3dadd(-65.1592251472048, -158.199113821903, -7.44144585664428, 1.48)
    pt3dadd(-65.4827408096133, -159.14438231763, -7.48393217399894, 1.48)
    pt3dadd(-65.8062564720219, -160.089650813357, -7.52641849135361, 1.48)
    pt3dadd(-66.1383911872473, -161.031733364465, -7.57261407067469, 1.48)
    pt3dadd(-66.4734194570488, -161.972746342753, -7.62005490886175, 1.48)
    pt3dadd(-66.8084477268504, -162.91375932104, -7.66749574704879, 1.48)
    pt3dadd(-67.0968667958446, -163.858803132848, -7.77170108286672, 1.48)
    pt3dadd(-67.2746143549015, -164.813417982652, -8.01069123702132, 1.48)
    pt3dadd(-67.4523619139584, -165.768032832456, -8.24968139117593, 1.48)
    pt3dadd(-67.6301094730153, -166.72264768226, -8.48867154533053, 1.48)
    pt3dadd(-67.8092404994749, -167.677651771851, -8.7222560488593, 1.48)
    pt3dadd(-68.0466323179037, -168.649047587208, -8.72819696212093, 1.48)
    pt3dadd(-68.2840241363325, -169.620443402565, -8.73413787538255, 1.48)
    pt3dadd(-68.5214159547613, -170.591839217922, -8.74007878864416, 1.48)
    pt3dadd(-68.7588077731901, -171.563235033278, -8.74601970190578, 1.48)
    pt3dadd(-68.9961995916189, -172.534630848635, -8.75196061516741, 1.48)
    pt3dadd(-69.2335914100478, -173.506026663992, -8.75790152842903, 1.48)
    pt3dadd(-69.5136942543742, -174.444110618564, -8.91285901107901, 1.48)
    pt3dadd(-69.8235778866553, -175.358967468623, -9.17172012894746, 1.48)
    pt3dadd(-70.1334615189365, -176.273824318683, -9.43058124681589, 1.48)
    pt3dadd(-70.4433451512176, -177.188681168742, -9.68944236468432, 1.48)
    pt3dadd(-70.7490617743464, -178.106653554437, -9.93453524366113, 1.48)
    pt3dadd(-70.9818092872939, -179.079182542906, -9.93853046626945, 1.48)
    pt3dadd(-71.2145568002415, -180.051711531375, -9.94252568887776, 1.48)
    pt3dadd(-71.447304313189, -181.024240519844, -9.94652091148608, 1.48)
    pt3dadd(-71.5972879000685, -182.007790460498, -9.91667625637927, 1.48)
    pt3dadd(-71.6530127615051, -183.00389201579, -9.84829181837292, 1.48)
    pt3dadd(-71.7087376229417, -183.999993571083, -9.77990738036658, 1.48)
    pt3dadd(-71.7644624843783, -184.996095126376, -9.71152294236023, 1.48)
    pt3dadd(-71.9059743971692, -185.981461923244, -9.67815188152097, 1.48)
    pt3dadd(-72.1255080560162, -186.957065654678, -9.67662484351227, 1.48)
    pt3dadd(-72.3450417148631, -187.932669386112, -9.67509780550359, 1.48)
    pt3dadd(-72.5645753737101, -188.908273117546, -9.67357076749489, 1.48)
    pt3dadd(-72.7432740458743, -189.87409136062, -9.82891401151413, 1.48)
    pt3dadd(-72.9047378858833, -190.835779536241, -10.05046599467, 1.48)
    pt3dadd(-73.0662017258921, -191.797467711863, -10.2720179778258, 1.48)
    pt3dadd(-73.227665565901, -192.759155887484, -10.4935699609816, 1.48)
    pt3dadd(-73.4539170843769, -193.731988162348, -10.5059283539906, 1.48)
    pt3dadd(-73.6832068283468, -194.705343041004, -10.5084765899786, 1.48)
    pt3dadd(-73.9124965723168, -195.67869791966, -10.5110248259666, 1.48)
    pt3dadd(-74.1417863162867, -196.652052798316, -10.5135730619547, 1.48)
    pt3dadd(-74.362532935555, -197.617461168933, -10.5572534458755, 1.48)
    pt3dadd(-74.5021957249453, -198.507448270579, -10.9913240209704, 1.48)
    pt3dadd(-74.6418585143357, -199.397435372225, -11.4253945960653, 1.48)
    pt3dadd(-74.781521303726, -200.287422473871, -11.8594651711603, 1.48)
    pt3dadd(-74.9211840931163, -201.177409575517, -12.2935357462552, 1.48)
    pt3dadd(-75.0608468825066, -202.067396677164, -12.7276063213501, 1.48)
    pt3dadd(-75.232985069871, -202.975008313456, -13.0604742680101, 1.48)
    pt3dadd(-75.5053102322633, -203.936991841168, -13.0811309458241, 1.48)
    pt3dadd(-75.7776353946556, -204.89897536888, -13.1017876236381, 1.48)
    pt3dadd(-76.0499605570479, -205.860958896592, -13.1224443014521, 1.48)
    pt3dadd(-76.3092871561738, -206.825588396238, -13.1377030939635, 1.48)
    pt3dadd(-76.441429179285, -207.816107435485, -13.1001462221969, 1.48)
    pt3dadd(-76.5735712023962, -208.806626474732, -13.0625893504303, 1.48)
    pt3dadd(-76.7057132255075, -209.797145513979, -13.0250324786636, 1.48)
    pt3dadd(-76.8518330705676, -210.784827481869, -12.9870070855894, 1.48)
    pt3dadd(-77.1137706362301, -211.749001986362, -12.9450996091627, 1.48)
    pt3dadd(-77.3757082018926, -212.713176490855, -12.9031921327361, 1.48)
    pt3dadd(-77.6376457675551, -213.677350995348, -12.8612846563094, 1.48)
    pt3dadd(-77.8995833332176, -214.641525499841, -12.8193771798827, 1.48)
    pt3dadd(-78.1615208988801, -215.605700004334, -12.777469703456, 1.48)
    pt3dadd(-78.3829885487429, -216.580709732246, -12.771947018558, 1.48)
    pt3dadd(-78.6008074098078, -217.556696369576, -12.7697048055148, 1.48)
    pt3dadd(-78.8186262708727, -218.532683006905, -12.7674625924716, 1.48)
    pt3dadd(-79.0364451319376, -219.508669644234, -12.7652203794283, 1.48)
    pt3dadd(-79.2542639930024, -220.484656281563, -12.7629781663851, 1.48)
    pt3dadd(-79.209870522878, -221.469407428521, -12.6559004723725, 1.48)
    pt3dadd(-79.1101955930745, -222.456006371437, -12.5267206202047, 1.48)
    pt3dadd(-79.010520663271, -223.442605314353, -12.3975407680369, 1.48)
    pt3dadd(-78.9108457334675, -224.429204257268, -12.2683609158692, 1.48)
    pt3dadd(-78.9510806663134, -225.42395234706, -12.1939534258691, 1.48)
    pt3dadd(-79.011836982912, -226.419895719065, -12.1275797130581, 1.48)
    pt3dadd(-79.0725932995106, -227.415839091071, -12.0612060002471, 1.48)
    pt3dadd(-79.0941329364355, -228.407808070987, -11.9796331675079, 1.48)
    pt3dadd(-78.9205631364852, -229.380003796031, -11.822442211183, 1.48)
    pt3dadd(-78.7469933365348, -230.352199521076, -11.6652512548582, 1.48)
    pt3dadd(-78.5734235365844, -231.32439524612, -11.5080602985333, 1.48)
    pt3dadd(-78.4091768354906, -232.298536722452, -11.3543917433279, 1.48)
    pt3dadd(-78.2862846193334, -233.28130897097, -11.2163475085627, 1.48)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(-78.2862846193334, -233.28130897097, -11.2163475085627, 1.48)
    pt3dadd(-78.1633924031761, -234.264081219487, -11.0783032737975, 1.48)
    pt3dadd(-78.0405001870189, -235.246853468005, -10.9402590390323, 1.48)
    pt3dadd(-77.9126057039281, -236.228665516532, -10.8003172640318, 1.48)
    pt3dadd(-77.7670350685937, -237.207084575154, -10.6536702870632, 1.48)
    pt3dadd(-77.6214644332593, -238.185503633775, -10.5070233100946, 1.48)
    pt3dadd(-77.475893797925, -239.163922692397, -10.360376333126, 1.48)
    pt3dadd(-77.3303231625906, -240.142341751019, -10.2137293561575, 1.48)
    pt3dadd(-77.1694766256483, -241.117072483122, -10.0613563670824, 1.48)
    pt3dadd(-76.9643515081592, -242.081112267676, -9.89238601473706, 1.48)
    pt3dadd(-76.7592263906701, -243.04515205223, -9.72341566239169, 1.48)
    pt3dadd(-76.554101273181, -244.009191836784, -9.55444531004633, 1.48)
    pt3dadd(-76.3489761556919, -244.973231621339, -9.38547495770096, 1.48)
    pt3dadd(-76.1529340720682, -245.934324372707, -9.1953598918016, 1.48)
    pt3dadd(-75.98599099074, -246.88597581551, -8.93750423642905, 1.48)
    pt3dadd(-75.8190479094119, -247.837627258313, -8.67964858105652, 1.48)
    pt3dadd(-75.6521048280837, -248.789278701116, -8.42179292568397, 1.48)
    pt3dadd(-75.4851617467555, -249.740930143919, -8.16393727031142, 1.48)
    pt3dadd(-75.3219104809478, -250.676958627002, -7.86457453223804, 1.48)
    pt3dadd(-75.1727917283867, -251.553181390111, -7.40631994465139, 1.48)
    pt3dadd(-75.0236729758256, -252.42940415322, -6.94806535706472, 1.48)
    pt3dadd(-74.8745542232645, -253.305626916329, -6.48981076947805, 1.48)
    pt3dadd(-74.7254354707034, -254.181849679438, -6.03155618189139, 1.48)
    pt3dadd(-74.5763167181423, -255.058072442547, -5.57330159430473, 1.48)
    pt3dadd(-74.4271979655812, -255.934295205656, -5.11504700671805, 1.48)
    pt3dadd(-74.3203342476957, -256.879206327787, -4.82067845131471, 1.48)
    pt3dadd(-74.2249585157515, -257.842791932352, -4.57086601681331, 1.48)
    pt3dadd(-74.1295827838075, -258.806377536916, -4.32105358231191, 1.48)
    pt3dadd(-74.0342070518633, -259.769963141481, -4.07124114781051, 1.48)
    pt3dadd(-73.8904254100121, -260.736520570397, -3.8684629606052, 1.48)
    pt3dadd(-73.7044909345439, -261.705665923342, -3.70664313580588, 1.48)
    pt3dadd(-73.5185564590757, -262.674811276286, -3.54482331100657, 1.48)
    pt3dadd(-73.3326219836075, -263.643956629231, -3.38300348620725, 1.48)
    pt3dadd(-73.0858979973211, -264.594749492558, -3.19873121979341, 1.48)
    pt3dadd(-72.823576423698, -265.540833409294, -3.0086980266294, 1.48)
    pt3dadd(-72.5612548500749, -266.486917326031, -2.81866483346538, 1.48)
    pt3dadd(-72.2989332764518, -267.433001242767, -2.62863164030135, 1.48)
    pt3dadd(-71.6510568229519, -268.120238683061, -2.3091358995068, 1.48)
    pt3dadd(-70.9934205498286, -268.800923761934, -1.98636298293571, 1.48)
    pt3dadd(-70.8290136097795, -269.664312683524, -1.84269258851158, 1.48)
    pt3dadd(-70.9951298260023, -270.650135221097, -1.81904249082715, 1.48)
    pt3dadd(-71.1612460422252, -271.63595775867, -1.79539239314271, 1.48)
    pt3dadd(-71.4363063848701, -272.580384103856, -1.81872937087041, 1.48)
    pt3dadd(-71.9311562390328, -273.44129563092, -1.93686050310322, 1.48)
    pt3dadd(-71.9751820551659, -274.338820600126, -1.87569861750371, 1.48)
    pt3dadd(-71.6597164013979, -275.265541483974, -1.67156673676988, 1.48)
    pt3dadd(-71.4612372599326, -276.117303275229, -1.25904728460781, 1.48)
    pt3dadd(-71.3838576964888, -276.891470527563, -0.630813674734902, 1.48)
    pt3dadd(-71.3064781330451, -277.665637779898, -0.00258006486199847, 1.48)
  }
  GCL[5] {pt3dclear()
    pt3dadd(-22.0634572433671, 54.2162085775921, -4.77565666403748, 1.97)
    pt3dadd(-21.6270675016981, 53.3784832388902, -4.98889682768503, 1.97)
    pt3dadd(-21.1005242728306, 52.5398791567546, -5.12852283371364, 1.97)
    pt3dadd(-20.5739810439632, 51.7012750746191, -5.26814883974226, 1.97)
    pt3dadd(-20.0474378150958, 50.8626709924836, -5.40777484577087, 1.97)
    pt3dadd(-19.7102358011202, 49.9489505486545, -5.34935319384378, 1.97)
    pt3dadd(-19.4856237284994, 48.9905628792417, -5.17316439751861, 1.97)
    pt3dadd(-19.2610116558785, 48.0321752098289, -4.99697560119344, 1.97)
    pt3dadd(-19.1587210757833, 47.0517736266958, -4.86732094786055, 1.86964607728109)
    pt3dadd(-19.1365705181943, 46.0569494306223, -4.76815355551276, 1.70354438236584)
    pt3dadd(-19.1144199606053, 45.0621252345487, -4.66898616316495, 1.53744268745058)
    pt3dadd(-19.0523301636148, 44.1012500687048, -4.84561870648646, 1.48)
    pt3dadd(-18.9691264497987, 43.158322089921, -5.16805314762755, 1.48)
    pt3dadd(-18.8859227359827, 42.2153941111373, -5.49048758876865, 1.48)
    pt3dadd(-18.8072003686602, 41.2652886716902, -5.76697847843453, 1.48)
    pt3dadd(-18.7585709798229, 40.266985403838, -5.73495086633442, 1.48)
    pt3dadd(-18.7099415909856, 39.2686821359857, -5.70292325423432, 1.48)
    pt3dadd(-18.9598119677419, 38.3257464536196, -5.50979410540254, 1.48)
    pt3dadd(-19.2378293031729, 37.388031643496, -5.30147392857186, 1.48)
    pt3dadd(-19.5158466386038, 36.4503168333724, -5.09315375174118, 1.48)
    pt3dadd(-19.792584395285, 35.5032145412222, -4.97657028794929, 1.48)
    pt3dadd(-20.0673932038792, 34.5419607437404, -4.99827870903095, 1.48)
    pt3dadd(-20.3422020124733, 33.5807069462586, -5.01998713011261, 1.48)
    pt3dadd(-20.5276149204722, 32.6328304702889, -5.15104599042803, 1.48)
    pt3dadd(-20.4910678144578, 31.7181683861484, -5.55360975044347, 1.48)
    pt3dadd(-20.4545207084433, 30.8035063020079, -5.95617351045891, 1.48)
    pt3dadd(-20.4179736024289, 29.8888442178674, -6.35873727047435, 1.48)
    pt3dadd(-20.4187862471606, 28.9614580286713, -6.72524361273234, 1.48)
    pt3dadd(-20.4931642402237, 28.00901671459, -7.0207490397196, 1.48)
    pt3dadd(-20.5675422332867, 27.0565754005086, -7.31625446670685, 1.48)
    pt3dadd(-20.6419202263498, 26.1041340864273, -7.61175989369411, 1.48)
    pt3dadd(-20.7318312862415, 25.1551799348356, -7.87978259282569, 1.48)
    pt3dadd(-21.1230277667012, 24.2738641465411, -7.61473958692136, 1.48)
    pt3dadd(-21.5142242471608, 23.3925483582466, -7.34969658101703, 1.48)
    pt3dadd(-21.9054207276205, 22.5112325699521, -7.08465357511269, 1.48)
    pt3dadd(-22.2966172080802, 21.6299167816576, -6.81961056920836, 1.48)
    pt3dadd(-22.420507128444, 20.6449687391447, -6.75316941648359, 1.48)
    pt3dadd(-22.5221699529061, 19.6514034593585, -6.70324242052066, 1.48)
    pt3dadd(-22.6238327773682, 18.6578381795724, -6.65331542455773, 1.48)
    pt3dadd(-22.7254956018302, 17.6642728997863, -6.6033884285948, 1.48)
    pt3dadd(-22.8271584262923, 16.6707076200001, -6.55346143263187, 1.48)
    pt3dadd(-22.6721580130084, 15.7220348854142, -6.81603729988538, 1.48)
    pt3dadd(-22.5062292897313, 14.7752736035733, -7.09191903903927, 1.48)
    pt3dadd(-22.3403005664542, 13.8285123217323, -7.36780077819315, 1.48)
    pt3dadd(-22.1743718431771, 12.8817510398914, -7.64368251734704, 1.48)
    pt3dadd(-22.0076151213312, 11.9129810363656, -7.66137706132935, 1.48)
    pt3dadd(-21.8404469783146, 10.9332751998733, -7.55078191720825, 1.48)
    pt3dadd(-21.673278835298, 9.95356936338089, -7.44018677308716, 1.48)
    pt3dadd(-21.5061106922813, 8.97386352688854, -7.32959162896606, 1.48)
    pt3dadd(-21.6495640981231, 7.99716487378799, -7.30642365805798, 1.48)
    pt3dadd(-21.8674202642355, 7.02118652726571, -7.30419699992621, 1.48)
    pt3dadd(-22.0852764303478, 6.04520818074341, -7.30197034179444, 1.48)
    pt3dadd(-22.3031325964602, 5.06922983422112, -7.29974368366267, 1.48)
    pt3dadd(-22.6416658293706, 4.12956444486605, -7.34869762962878, 1.48)
    pt3dadd(-22.9803798553157, 3.1899534579745, -7.3977282521083, 1.48)
    pt3dadd(-23.3190938812608, 2.25034247108292, -7.44675887458781, 1.48)
    pt3dadd(-23.6578079072059, 1.31073148419139, -7.49578949706733, 1.48)
    pt3dadd(-23.8446954745658, 0.333919216776024, -7.48119951977143, 1.48)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-23.8446954745658, 0.333919216776024, -7.48119951977143, 1.48)
    pt3dadd(-23.9745579397805, -0.656865627234766, -7.44271402891002, 1.48)
    pt3dadd(-24.1044204049953, -1.64765047124558, -7.4042285380486, 1.48)
    pt3dadd(-24.23428287021, -2.63843531525637, -7.36574304718719, 1.48)
  }
}
proc shape3d_5() {
  adendIML[5] {
    pt3dadd(-24.2997817212521, -3.63337062457703, -7.30134263366723, 1.48)
    pt3dadd(-24.3430837126178, -4.62973729068608, -7.22800502932646, 1.48)
    pt3dadd(-24.3863857039835, -5.62610395679519, -7.15466742498568, 1.48)
    pt3dadd(-24.4296876953492, -6.62247062290425, -7.08132982064491, 1.48)
    pt3dadd(-24.460843588285, -7.61736208918546, -7.00330697115058, 1.48)
    pt3dadd(-24.2703329184968, -8.58533112625452, -6.83977829485062, 1.48)
    pt3dadd(-24.0798222487085, -9.5533001633236, -6.67624961855066, 1.48)
    pt3dadd(-23.8893115789202, -10.5212692003927, -6.5127209422507, 1.48)
    pt3dadd(-23.6988009091319, -11.4892382374617, -6.34919226595073, 1.48)
    pt3dadd(-23.5281644561384, -12.4325296740036, -6.62479901201525, 1.48)
    pt3dadd(-23.3580534934096, -13.3751686149544, -6.91201685157736, 1.48)
    pt3dadd(-23.1879425306809, -14.3178075559052, -7.19923469113948, 1.48)
    pt3dadd(-23.0178315679521, -15.260446496856, -7.4864525307016, 1.48)
    pt3dadd(-22.9517988780502, -16.2357319338511, -7.50251541078943, 1.48)
    pt3dadd(-22.9396188158874, -17.2279094612962, -7.37827612505959, 1.48)
    pt3dadd(-22.9274387537245, -18.2200869887413, -7.25403683932975, 1.48)
    pt3dadd(-22.9152586915616, -19.2122645161864, -7.12979755359991, 1.48)
    pt3dadd(-22.9030786293988, -20.2044420436315, -7.00555826787008, 1.48)
    pt3dadd(-22.8908985672359, -21.1966195710766, -6.88131898214024, 1.48)
    pt3dadd(-22.7653505152827, -22.1572517907754, -7.05180837871028, 1.48)
    pt3dadd(-22.6033796971973, -23.10774916228, -7.31698794212265, 1.48)
    pt3dadd(-22.441408879112, -24.0582465337846, -7.58216750553501, 1.48)
    pt3dadd(-22.2794380610267, -25.0087439052892, -7.84734706894737, 1.48)
    pt3dadd(-22.2224179961204, -25.9780290061367, -7.9079595889306, 1.48)
    pt3dadd(-22.2710308913579, -26.9662239614135, -7.76267532694024, 1.48)
    pt3dadd(-22.3196437865955, -27.9544189166904, -7.61739106494988, 1.48)
    pt3dadd(-22.368256681833, -28.9426138719672, -7.47210680295952, 1.48)
    pt3dadd(-22.4168695770705, -29.930808827244, -7.32682254096916, 1.48)
    pt3dadd(-22.4654824723081, -30.9190037825208, -7.1815382789788, 1.48)
    pt3dadd(-22.5140953675456, -31.9071987377976, -7.03625401698844, 1.48)
    pt3dadd(-22.4365305090943, -32.8455173236788, -7.26209859191516, 1.48)
    pt3dadd(-22.3084314255292, -33.7638604098763, -7.63658036827153, 1.48)
    pt3dadd(-22.1803323419641, -34.6822034960738, -8.01106214462789, 1.48)
    pt3dadd(-22.052233258399, -35.6005465822713, -8.38554392098425, 1.48)
    pt3dadd(-21.9241341748338, -36.5188896684688, -8.76002569734062, 1.48)
    pt3dadd(-22.0210431081621, -37.5090893098987, -8.72876577131779, 1.48)
    pt3dadd(-22.1272784269675, -38.5022673426874, -8.68068820664921, 1.48)
    pt3dadd(-22.2335137457728, -39.495445375476, -8.63261064198065, 1.48)
    pt3dadd(-22.3397490645781, -40.4886234082646, -8.58453307731207, 1.48)
    pt3dadd(-22.4873712876102, -41.473957722023, -8.55358938442294, 1.48)
    pt3dadd(-22.7624073717394, -42.4351443362694, -8.57539408621919, 1.48)
    pt3dadd(-23.0374434558685, -43.3963309505158, -8.59719878801544, 1.48)
    pt3dadd(-23.3124795399976, -44.3575175647622, -8.61900348981169, 1.48)
    pt3dadd(-23.5795549237997, -45.3140663624495, -8.67387705937917, 1.48)
    pt3dadd(-23.7745237003594, -46.2286066428768, -9.02828254980329, 1.48)
    pt3dadd(-23.9694924769192, -47.1431469233041, -9.38268804022741, 1.48)
    pt3dadd(-24.1644612534789, -48.0576872037314, -9.73709353065153, 1.48)
    pt3dadd(-24.3594300300387, -48.9722274841587, -10.0914990210756, 1.48)
    pt3dadd(-24.390843730663, -49.909840006654, -10.4049799389453, 1.48)
    pt3dadd(-24.3001130544905, -50.8646830835212, -10.6878980241926, 1.48)
    pt3dadd(-24.209382378318, -51.8195261603885, -10.97081610944, 1.48)
    pt3dadd(-24.1186517021455, -52.7743692372557, -11.2537341946873, 1.48)
    pt3dadd(-24.0242349720162, -53.7302771250225, -11.5167823768344, 1.48)
    pt3dadd(-23.8566320892398, -54.7073267035932, -11.3853160514887, 1.48)
    pt3dadd(-23.6890292064634, -55.684376282164, -11.2538497261431, 1.48)
    pt3dadd(-23.521426323687, -56.6614258607346, -11.1223834007975, 1.48)
    pt3dadd(-23.5774435252797, -57.6537169431117, -11.0575025619848, 1.48)
    pt3dadd(-23.6662273206517, -58.6482413318808, -11.0023783583822, 1.48)
    pt3dadd(-23.7467698894443, -59.6433207594977, -10.9521920219749, 1.48)
    pt3dadd(-23.7551273884566, -60.6432617835744, -10.9452565638945, 1.48)
    pt3dadd(-23.7634848874689, -61.643202807651, -10.9383211058141, 1.48)
    pt3dadd(-23.7718423864812, -62.6431438317277, -10.9313856477337, 1.48)
    pt3dadd(-23.6491852420478, -63.6155736162406, -11.1119191460093, 1.48)
    pt3dadd(-23.5098799224337, -64.5845075172122, -11.3162745312458, 1.48)
    pt3dadd(-23.3705746028195, -65.5534414181838, -11.5206299164823, 1.48)
    pt3dadd(-23.2994464240488, -66.5130752639488, -11.7588448167435, 1.48)
    pt3dadd(-23.4288396011864, -67.4453559579538, -12.0966467014271, 1.48)
    pt3dadd(-23.558232778324, -68.3776366519588, -12.4344485861108, 1.48)
    pt3dadd(-23.6876259554616, -69.3099173459637, -12.7722504707945, 1.48)
    pt3dadd(-23.8170191325992, -70.2421980399687, -13.1100523554781, 1.48)
    pt3dadd(-24.2136351417948, -71.1371002984399, -13.2484060264727, 1.48)
    pt3dadd(-24.6641395545049, -72.0244647870234, -13.34653878619, 1.48)
    pt3dadd(-25.1146439672149, -72.9118292756069, -13.4446715459073, 1.48)
    pt3dadd(-25.5651483799249, -73.7991937641904, -13.5428043056245, 1.48)
    pt3dadd(-25.959045948965, -74.7009789718524, -13.6800420464601, 1.48)
    pt3dadd(-26.2063835254001, -75.6401006629584, -13.9185259506915, 1.48)
    pt3dadd(-26.4537211018351, -76.5792223540644, -14.1570098549229, 1.48)
    pt3dadd(-26.7010586782702, -77.5183440451704, -14.3954937591543, 1.48)
    pt3dadd(-26.9483962547052, -78.4574657362764, -14.6339776633857, 1.48)
    pt3dadd(-27.1957338311403, -79.3965874273824, -14.8724615676171, 1.48)
    pt3dadd(-27.5859329861746, -80.2947256717657, -15.0284978316712, 1.48)
    pt3dadd(-28.0589459581794, -81.1691066842258, -15.1367409532288, 1.48)
    pt3dadd(-28.5319589301842, -82.0434876966858, -15.2449840747864, 1.48)
    pt3dadd(-29.0049719021889, -82.9178687091459, -15.353227196344, 1.48)
    pt3dadd(-29.3986388271044, -83.7740703476086, -15.5880157669409, 1.48)
    pt3dadd(-29.5931719009701, -84.5846474226988, -16.1403939784142, 1.48)
    pt3dadd(-29.7877049748357, -85.3952244977891, -16.6927721898876, 1.48)
    pt3dadd(-29.9822380487013, -86.2058015728794, -17.2451504013609, 1.48)
    pt3dadd(-30.176771122567, -87.0163786479697, -17.7975286128343, 1.48)
    pt3dadd(-30.4823029672089, -87.9098710953178, -18.0123012369276, 1.48)
    pt3dadd(-30.8396732092182, -88.8420864941447, -18.0694060556062, 1.48)
    pt3dadd(-31.1970434512275, -89.7743018929716, -18.1265108742848, 1.48)
    pt3dadd(-31.5544136932368, -90.7065172917984, -18.1836156929634, 1.48)
    pt3dadd(-31.7805266642072, -91.6744678767504, -18.1853944393349, 1.48)
    pt3dadd(-31.9339619808926, -92.6622051712878, -18.15653892732, 1.48)
    pt3dadd(-32.0873972975779, -93.6499424658252, -18.1276834153051, 1.48)
    pt3dadd(-32.246423556738, -94.6322983665646, -18.0680752678782, 1.48)
    pt3dadd(-32.4395442936781, -95.5818376514831, -17.8209325411793, 1.48)
    pt3dadd(-32.6326650306182, -96.5313769364016, -17.5737898144804, 1.48)
    pt3dadd(-32.8257857675582, -97.4809162213201, -17.3266470877816, 1.48)
    pt3dadd(-33.0189065044983, -98.4304555062386, -17.0795043610827, 1.48)
    pt3dadd(-33.0711812856987, -99.3894767726136, -17.1042443165487, 1.48)
    pt3dadd(-33.0079948130089, -100.356271080554, -17.3518654703346, 1.48)
    pt3dadd(-32.9448083403192, -101.323065388495, -17.5994866241205, 1.48)
    pt3dadd(-32.8816218676294, -102.289859696436, -17.8471077779063, 1.48)
    pt3dadd(-32.8184353949397, -103.256654004377, -18.0947289316922, 1.48)
    pt3dadd(-32.75524892225, -104.223448312318, -18.3423500854781, 1.48)
    pt3dadd(-32.871365969737, -105.187269787137, -18.4702580979041, 1.48)
    pt3dadd(-33.1464020538661, -106.148456401383, -18.4920627997003, 1.48)
    pt3dadd(-33.4214381379952, -107.10964301563, -18.5138675014966, 1.48)
    pt3dadd(-33.6964742221244, -108.070829629876, -18.5356722032928, 1.48)
    pt3dadd(-33.989946287547, -109.014415596353, -18.6414427509481, 1.48)
    pt3dadd(-34.3129455443401, -109.929812247236, -18.8816935608572, 1.48)
    pt3dadd(-34.6359448011332, -110.84520889812, -19.1219443707664, 1.48)
    pt3dadd(-34.9589440579263, -111.760605549004, -19.3621951806755, 1.48)
    pt3dadd(-35.2819433147193, -112.676002199887, -19.6024459905846, 1.48)
    pt3dadd(-35.7377610304954, -113.556050500915, -19.7218087717716, 1.48)
    pt3dadd(-36.2074445555419, -114.432408550746, -19.8285512412776, 1.48)
    pt3dadd(-36.6771280805883, -115.308766600577, -19.9352937107837, 1.48)
    pt3dadd(-37.0639296606498, -116.202768764596, -20.0460558009786, 1.48)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(-37.0639296606498, -116.202768764596, -20.0460558009786, 1.48)
    pt3dadd(-37.0030164040618, -117.192081574412, -20.178531230797, 1.48)
    pt3dadd(-36.9421031474738, -118.181394384228, -20.3110066606155, 1.48)
    pt3dadd(-36.8811898908858, -119.170707194044, -20.4434820904339, 1.48)
    pt3dadd(-36.8202766342978, -120.16002000386, -20.5759575202523, 1.48)
    pt3dadd(-36.7593633777098, -121.149332813676, -20.7084329500707, 1.48)
    pt3dadd(-36.6984501211218, -122.138645623492, -20.8409083798892, 1.48)
    pt3dadd(-36.9370584658828, -123.103010718739, -20.874255325928, 1.48)
    pt3dadd(-37.211413706789, -124.064398388125, -20.8957716206925, 1.48)
    pt3dadd(-37.4857689476952, -125.02578605751, -20.917287915457, 1.48)
    pt3dadd(-37.7601241886014, -125.987173726896, -20.9388042102215, 1.48)
    pt3dadd(-37.6932499221137, -126.920212861452, -21.1923338905608, 1.48)
    pt3dadd(-37.505322656289, -127.843195201114, -21.5281715647916, 1.48)
    pt3dadd(-37.3173953904644, -128.766177540775, -21.8640092390224, 1.48)
    pt3dadd(-37.1294681246398, -129.689159880437, -22.1998469132531, 1.48)
    pt3dadd(-36.9903475310989, -130.649058209153, -22.26121937169, 1.48)
    pt3dadd(-36.8854662013002, -131.634854150355, -22.130046703161, 1.48)
    pt3dadd(-36.7805848715016, -132.620650091557, -21.998874034632, 1.48)
    pt3dadd(-36.675703541703, -133.606446032759, -21.8677013661029, 1.48)
    pt3dadd(-36.9211108920016, -134.466023516983, -21.4531127832743, 1.48)
    pt3dadd(-37.2129413701943, -135.308873496427, -21.000963599763, 1.48)
    pt3dadd(-37.5047718483871, -136.15172347587, -20.5488144162517, 1.48)
    pt3dadd(-37.7966023265798, -136.994573455314, -20.0966652327404, 1.48)
    pt3dadd(-37.7905955866776, -137.880727337613, -20.2284133029706, 1.48)
    pt3dadd(-37.6483848699945, -138.786684533335, -20.6271835019318, 1.48)
    pt3dadd(-37.5061741533115, -139.692641729057, -21.025953700893, 1.48)
    pt3dadd(-37.3639634366284, -140.598598924779, -21.4247238998541, 1.48)
    pt3dadd(-37.2217527199454, -141.504556120502, -21.8234940988153, 1.48)
    pt3dadd(-37.2314279863773, -142.44749634944, -21.8845270110245, 1.48)
    pt3dadd(-37.3584911995427, -143.419019613128, -21.6845332911902, 1.48)
    pt3dadd(-37.485554412708, -144.390542876816, -21.484539571356, 1.48)
    pt3dadd(-37.6126176258734, -145.362066140504, -21.2845458515217, 1.48)
    pt3dadd(-37.7396808390388, -146.333589404192, -21.0845521316875, 1.48)
    pt3dadd(-37.8761266699644, -147.305590240467, -20.9051075013269, 1.48)
    pt3dadd(-38.0933733713079, -148.281703818165, -20.9026267373625, 1.48)
    pt3dadd(-38.3106200726515, -149.257817395862, -20.900145973398, 1.48)
    pt3dadd(-38.5278667739951, -150.23393097356, -20.8976652094336, 1.48)
    pt3dadd(-38.7005932098534, -151.200274746017, -20.9903124897693, 1.48)
    pt3dadd(-38.7622404325458, -152.142242601863, -21.3203066995468, 1.48)
    pt3dadd(-38.8238876552381, -153.084210457709, -21.6503009093242, 1.48)
    pt3dadd(-38.8855348779305, -154.026178313556, -21.9802951191016, 1.48)
    pt3dadd(-38.9471821006229, -154.968146169402, -22.310289328879, 1.48)
    pt3dadd(-39.0088293233152, -155.910114025248, -22.6402835386565, 1.48)
    pt3dadd(-39.18674166124, -156.864087322263, -22.7529797128352, 1.48)
    pt3dadd(-39.4517031369451, -157.827049242394, -22.7029821451944, 1.48)
    pt3dadd(-39.7166646126502, -158.790011162525, -22.6529845775537, 1.48)
    pt3dadd(-39.9816260883554, -159.752973082656, -22.6029870099129, 1.48)
    pt3dadd(-40.2465875640605, -160.715935002787, -22.5529894422722, 1.48)
    pt3dadd(-40.1736053782174, -161.577917513459, -23.0298713670256, 1.48)
    pt3dadd(-40.0802430924081, -162.433810339094, -23.5385273948232, 1.48)
    pt3dadd(-39.9868808065987, -163.289703164729, -24.0471834226207, 1.48)
    pt3dadd(-39.8935185207894, -164.145595990365, -24.5558394504183, 1.48)
    pt3dadd(-39.8001562349801, -165.001488816, -25.0644954782158, 1.48)
    pt3dadd(-39.7067939491708, -165.857381641635, -25.5731515060133, 1.48)
    pt3dadd(-39.6262379742977, -166.740779874212, -25.9468405881258, 1.48)
    pt3dadd(-39.5948516255753, -167.729784677113, -25.802326239521, 1.48)
    pt3dadd(-39.5634652768528, -168.718789480014, -25.6578118909162, 1.48)
    pt3dadd(-39.5320789281304, -169.707794282915, -25.5132975423114, 1.48)
    pt3dadd(-39.5006925794079, -170.696799085816, -25.3687831937066, 1.48)
    pt3dadd(-39.480246271439, -171.682395651778, -25.2642324575638, 1.48)
    pt3dadd(-39.5689889133456, -172.633975725414, -25.5585453980977, 1.48)
    pt3dadd(-39.6577315552521, -173.58555579905, -25.8528583386318, 1.48)
    pt3dadd(-39.7464741971587, -174.537135872687, -26.1471712791658, 1.48)
    pt3dadd(-39.8352168390652, -175.488715946323, -26.4414842196998, 1.48)
    pt3dadd(-39.9239594809718, -176.440296019959, -26.7357971602338, 1.48)
    pt3dadd(-40.0037809954046, -177.415443814531, -26.9325364709362, 1.48)
    pt3dadd(-40.0800808856253, -178.399894991091, -27.0907584912753, 1.48)
    pt3dadd(-40.156380775846, -179.384346167652, -27.2489805116145, 1.48)
    pt3dadd(-40.2326806660668, -180.368797344213, -27.4072025319537, 1.48)
    pt3dadd(-40.3089805562875, -181.353248520774, -27.5654245522928, 1.48)
    pt3dadd(-40.4206988833201, -182.319715909211, -27.7779439637755, 1.48)
    pt3dadd(-40.5973312319228, -183.253223062378, -28.0899782702435, 1.48)
    pt3dadd(-40.7739635805254, -184.186730215545, -28.4020125767116, 1.48)
    pt3dadd(-40.9505959291281, -185.120237368712, -28.7140468831796, 1.48)
    pt3dadd(-41.1272282777307, -186.053744521879, -29.0260811896477, 1.48)
    pt3dadd(-41.2953308128009, -186.998627827488, -29.3031581536321, 1.48)
    pt3dadd(-41.4504640594153, -187.960808182087, -29.5270836792424, 1.48)
    pt3dadd(-41.6055973060297, -188.922988536685, -29.7510092048527, 1.48)
    pt3dadd(-41.7607305526441, -189.885168891284, -29.9749347304629, 1.48)
    pt3dadd(-41.9158637992585, -190.847349245882, -30.1988602560732, 1.48)
    pt3dadd(-42.0829236584759, -191.819799376513, -30.3379758759933, 1.48)
    pt3dadd(-42.2613301181402, -192.8020198459, -30.3964060451613, 1.48)
    pt3dadd(-42.4397365778045, -193.784240315286, -30.4548362143293, 1.48)
    pt3dadd(-42.6181430374688, -194.766460784672, -30.5132663834973, 1.48)
    pt3dadd(-42.7372123659747, -195.754899736332, -30.513789457374, 1.48)
    pt3dadd(-42.7806539344971, -196.751264414694, -30.4405074143109, 1.48)
    pt3dadd(-42.8240955030194, -197.747629093057, -30.3672253712479, 1.48)
    pt3dadd(-42.8675370715418, -198.74399377142, -30.2939433281848, 1.48)
    pt3dadd(-42.9109786400642, -199.740358449783, -30.2206612851217, 1.48)
    pt3dadd(-42.8600298337384, -200.668937861348, -30.5162752150007, 1.48)
    pt3dadd(-42.7789464384986, -201.575876494892, -30.9296609888257, 1.48)
    pt3dadd(-42.6978630432588, -202.482815128437, -31.3430467626506, 1.48)
    pt3dadd(-42.6167796480189, -203.389753761981, -31.7564325364755, 1.48)
    pt3dadd(-42.5356962527791, -204.296692395526, -32.1698183103005, 1.48)
    pt3dadd(-42.4457544510421, -205.253830855172, -32.2451471038282, 1.48)
    pt3dadd(-42.3504981052619, -206.241086377844, -32.1176607847892, 1.48)
    pt3dadd(-42.2552417594817, -207.228341900516, -31.9901744657501, 1.48)
    pt3dadd(-42.1599854137014, -208.215597423188, -31.862688146711, 1.48)
    pt3dadd(-42.0439198742382, -209.200369505941, -31.8450495083655, 1.48)
    pt3dadd(-41.9004958782854, -210.181876537485, -31.9718308335473, 1.48)
    pt3dadd(-41.7570718823325, -211.163383569029, -32.0986121587292, 1.48)
    pt3dadd(-41.6136478863797, -212.144890600573, -32.2253934839111, 1.48)
    pt3dadd(-41.4702238904269, -213.126397632116, -32.352174809093, 1.48)
    pt3dadd(-41.4932263238397, -214.094246345732, -32.2335551152053, 1.48)
    pt3dadd(-41.6081615609983, -215.054550299382, -31.9793776026997, 1.48)
    pt3dadd(-41.723096798157, -216.014854253032, -31.7252000901942, 1.48)
    pt3dadd(-41.8380320353157, -216.975158206682, -31.4710225776886, 1.48)
    pt3dadd(-41.9529672724744, -217.935462160332, -31.216845065183, 1.48)
    pt3dadd(-41.7679210571994, -218.905232004071, -31.2369404612498, 1.48)
    pt3dadd(-41.5376872449914, -219.876427738718, -31.2983508570996, 1.48)
    pt3dadd(-41.3074534327834, -220.847623473366, -31.3597612529495, 1.48)
    pt3dadd(-41.0772196205753, -221.818819208014, -31.4211716487994, 1.48)
    pt3dadd(-40.8508292135431, -222.788707717161, -31.4916078122358, 1.48)
    pt3dadd(-40.7461786585306, -223.717189860944, -31.8479351477176, 1.48)
    pt3dadd(-40.6415281035181, -224.645672004727, -32.2042624831994, 1.48)
    pt3dadd(-40.5368775485057, -225.57415414851, -32.5605898186812, 1.48)
    pt3dadd(-40.4329777592668, -226.51175981555, -32.8406487069368, 1.48)
    pt3dadd(-40.3331071422954, -227.49832915166, -32.711393900783, 1.48)
    pt3dadd(-40.233236525324, -228.48489848777, -32.5821390946291, 1.48)
    pt3dadd(-40.1333659083525, -229.471467823879, -32.4528842884753, 1.48)
    pt3dadd(-39.9750318750861, -230.444921167491, -32.3652638741054, 1.48)
    pt3dadd(-39.6009881060728, -231.369981046348, -32.4312599299809, 1.48)
    pt3dadd(-39.2269443370595, -232.295040925205, -32.4972559858564, 1.48)
    pt3dadd(-38.8529005680462, -233.220100804062, -32.5632520417319, 1.48)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(-38.8529005680462, -233.220100804062, -32.5632520417319, 1.48)
    pt3dadd(-38.4788567990329, -234.145160682919, -32.6292480976073, 1.48)
    pt3dadd(-38.1048130300196, -235.070220561777, -32.6952441534828, 1.48)
    pt3dadd(-37.6929059404798, -235.954372367353, -32.5563597291835, 1.48)
    pt3dadd(-37.2563749034882, -236.811920107761, -32.2842337902056, 1.48)
  }
}
proc shape3d_6() {
  adendOML[5] {
    pt3dadd(-36.8198438664966, -237.669467848169, -32.0121078512278, 1.48)
    pt3dadd(-36.3849857372783, -238.527862382314, -31.7407679640551, 1.48)
    pt3dadd(-36.1249222171928, -239.474734585549, -31.5515590946455, 1.48)
    pt3dadd(-35.8648586971073, -240.421606788783, -31.362350225236, 1.48)
    pt3dadd(-35.6047951770218, -241.368478992017, -31.1731413558264, 1.48)
    pt3dadd(-35.3354217986799, -242.314984912325, -31.0409665968475, 1.48)
    pt3dadd(-35.0267584879727, -243.259945026996, -31.1494900611522, 1.48)
    pt3dadd(-34.7180951772655, -244.204905141667, -31.2580135254569, 1.48)
    pt3dadd(-34.4094318665583, -245.149865256337, -31.3665369897615, 1.48)
    pt3dadd(-34.0466141578142, -246.056872232926, -31.2086277690663, 1.48)
    pt3dadd(-33.6688734729553, -246.953420709493, -30.977299421973, 1.48)
    pt3dadd(-33.2911327880963, -247.849969186059, -30.7459710748797, 1.48)
    pt3dadd(-32.9133921032373, -248.746517662625, -30.5146427277864, 1.48)
    pt3dadd(-32.598576415077, -249.636295760907, -30.2000898552668, 1.48)
    pt3dadd(-32.3427185239185, -250.51973032944, -29.8075594708981, 1.48)
    pt3dadd(-32.08686063276, -251.403164897974, -29.4150290865294, 1.48)
    pt3dadd(-31.8310027416015, -252.286599466507, -29.0224987021606, 1.48)
    pt3dadd(-31.6994440937101, -253.167518135129, -28.5858763846044, 1.48)
    pt3dadd(-31.6824329157967, -254.04611828626, -28.1086213225493, 1.48)
    pt3dadd(-31.6654217378834, -254.924718437392, -27.6313662604943, 1.48)
    pt3dadd(-31.64841055997, -255.803318588524, -27.1541111984392, 1.48)
    pt3dadd(-31.452112282138, -256.676304247094, -26.7743815273323, 1.48)
    pt3dadd(-31.0185438581921, -257.541859636162, -26.5237178279022, 1.48)
    pt3dadd(-30.5849754342461, -258.40741502523, -26.2730541284722, 1.48)
    pt3dadd(-30.1514070103001, -259.272970414299, -26.0223904290421, 1.48)
    pt3dadd(-29.7178385863541, -260.138525803367, -25.771726729612, 1.48)
    pt3dadd(-29.2682209011899, -260.98420101428, -25.5165011792083, 1.48)
    pt3dadd(-28.4007645768949, -261.312300588976, -25.1425089406185, 1.48)
    pt3dadd(-27.5333082526, -261.640400163671, -24.7685167020288, 1.48)
    pt3dadd(-26.665851928305, -261.968499738366, -24.394524463439, 1.48)
  }
  GCL[6] {pt3dclear()
    pt3dadd(-20.271911859992, 62.7647893276954, -5.82959457940077, 1.97)
    pt3dadd(-20.7817563685268, 62.2987927665914, -5.15289091554298, 1.97)
    pt3dadd(-21.3301714573395, 61.871137141422, -4.43431485372102, 1.97)
    pt3dadd(-21.8785865461522, 61.4434815162527, -3.71573879189906, 1.97)
    pt3dadd(-22.427001634965, 61.0158258910834, -2.9971627300771, 1.97)
    pt3dadd(-22.9754167237777, 60.588170265914, -2.27858666825515, 1.97)
    pt3dadd(-23.5238318125904, 60.1605146407447, -1.56001060643319, 1.97)
    pt3dadd(-24.0722469014031, 59.7328590155754, -0.84143454461123, 1.97)
    pt3dadd(-24.6206619902159, 59.305203390406, -0.122858482789272, 1.97)
    pt3dadd(-25.1690770790286, 58.8775477652367, 0.595717579032687, 1.97)
    pt3dadd(-25.7135812707329, 58.3529023072688, 1.21314770366697, 1.95028603344746)
    pt3dadd(-26.2487240661365, 57.5960952155946, 1.58846785303161, 1.8833833405139)
    pt3dadd(-26.7838668615402, 56.8392881239203, 1.96378800239625, 1.81648064758034)
    pt3dadd(-27.3190096569438, 56.082481032246, 2.33910815176089, 1.74957795464677)
    pt3dadd(-27.8541524523475, 55.3256739405718, 2.71442830112553, 1.68267526171321)
    pt3dadd(-28.3892952477512, 54.5688668488975, 3.08974845049018, 1.61577256877965)
    pt3dadd(-28.9244380431548, 53.8120597572233, 3.46506859985482, 1.54886987584608)
    pt3dadd(-29.4595808385585, 53.055252665549, 3.84038874921946, 1.48196718291252)
    pt3dadd(-29.9973512399016, 52.2981786795896, 4.21138901683027, 1.48)
    pt3dadd(-30.5352012430142, 51.5410966082254, 4.58225841617551, 1.48)
    pt3dadd(-31.0730512461269, 50.7840145368613, 4.95312781552076, 1.48)
    pt3dadd(-31.6109012492396, 50.0269324654971, 5.323997214866, 1.48)
    pt3dadd(-32.1487512523522, 49.269850394133, 5.69486661421124, 1.48)
    pt3dadd(-32.6866012554649, 48.5127683227689, 6.06573601355649, 1.48)
    pt3dadd(-33.2244512585775, 47.7556862514047, 6.43660541290174, 1.48)
    pt3dadd(-33.6652590203051, 46.9131308390729, 6.64472062139247, 1.48)
    pt3dadd(-33.9882175031033, 45.9667755612705, 6.65518515981245, 1.48)
    pt3dadd(-34.3111759859015, 45.0204202834682, 6.66564969823243, 1.48)
    pt3dadd(-34.6341344686997, 44.0740650056658, 6.67611423665242, 1.48)
    pt3dadd(-34.9570929514979, 43.1277097278635, 6.68657877507239, 1.48)
    pt3dadd(-35.280051434296, 42.1813544500612, 6.69704331349238, 1.48)
    pt3dadd(-35.6030099170942, 41.2349991722588, 6.70750785191236, 1.48)
    pt3dadd(-35.9584775975478, 40.3869333715163, 7.07716888062903, 1.48)
    pt3dadd(-36.3180811339069, 39.5513720662234, 7.49252728217552, 1.48)
    pt3dadd(-36.677684670266, 38.7158107609305, 7.90788568372202, 1.48)
    pt3dadd(-37.0372882066252, 37.8802494556376, 8.32324408526852, 1.48)
    pt3dadd(-37.3968917429843, 37.0446881503447, 8.73860248681502, 1.48)
    pt3dadd(-37.7564952793434, 36.2091268450518, 9.15396088836152, 1.48)
    pt3dadd(-38.1281807696236, 35.2874544329386, 9.11297241591532, 1.48)
    pt3dadd(-38.5004647104479, 34.3615167141488, 9.04937989806386, 1.48)
    pt3dadd(-38.8727486512722, 33.435578995359, 8.98578738021239, 1.48)
    pt3dadd(-39.2450325920964, 32.5096412765692, 8.92219486236093, 1.48)
    pt3dadd(-39.6173165329207, 31.5837035577794, 8.85860234450946, 1.48)
    pt3dadd(-39.9896004737449, 30.6577658389895, 8.795009826658, 1.48)
    pt3dadd(-40.3347354547458, 29.7378726092093, 8.93204293591612, 1.48)
    pt3dadd(-40.6693480146828, 28.8203221085386, 9.1468347268473, 1.48)
    pt3dadd(-41.0039605746198, 27.9027716078679, 9.36162651777848, 1.48)
    pt3dadd(-41.3385731345568, 26.9852211071973, 9.57641830870967, 1.48)
    pt3dadd(-41.6731856944939, 26.0676706065266, 9.79121009964085, 1.48)
    pt3dadd(-42.0077982544309, 25.150120105856, 10.006001890572, 1.48)
    pt3dadd(-42.3424108143679, 24.2325696051853, 10.2207936815032, 1.48)
    pt3dadd(-42.7176892511142, 23.3105525747757, 10.2699288718889, 1.48)
    pt3dadd(-43.1022367526948, 22.3875174781891, 10.2813055804427, 1.48)
    pt3dadd(-43.4867842542754, 21.4644823816025, 10.2926822889964, 1.48)
    pt3dadd(-43.871331755856, 20.5414472850159, 10.3040589975502, 1.48)
    pt3dadd(-44.2558792574366, 19.6184121884293, 10.315435706104, 1.48)
    pt3dadd(-44.7164283471457, 18.7713714873441, 10.5752646023065, 1.48)
    pt3dadd(-45.1799908834012, 17.9273439476192, 10.8449445740626, 1.48)
    pt3dadd(-45.6435534196567, 17.0833164078944, 11.1146245458186, 1.48)
    pt3dadd(-46.1071159559122, 16.2392888681695, 11.3843045175747, 1.48)
    pt3dadd(-46.5706784921677, 15.3952613284446, 11.6539844893307, 1.48)
    pt3dadd(-47.0342410284232, 14.5512337887197, 11.9236644610867, 1.48)
    pt3dadd(-47.4963102732244, 13.706669901898, 12.1941335593804, 1.48)
    pt3dadd(-47.9344507048802, 12.8535114775351, 12.4772477855987, 1.48)
    pt3dadd(-48.372591136536, 12.0003530531723, 12.760362011817, 1.48)
    pt3dadd(-48.8107315681918, 11.1471946288094, 13.0434762380353, 1.48)
    pt3dadd(-49.2488719998476, 10.2940362044466, 13.3265904642536, 1.48)
    pt3dadd(-49.6870124315035, 9.44087778008377, 13.6097046904719, 1.48)
    pt3dadd(-50.1251528631593, 8.58771935572093, 13.8928189166902, 1.48)
    pt3dadd(-50.3975579774018, 7.66476895774342, 13.9482468291877, 1.48)
    pt3dadd(-50.5304020274886, 6.68304869550755, 13.8119464804279, 1.48)
    pt3dadd(-50.6632460775754, 5.70132843327167, 13.6756461316681, 1.48)
    pt3dadd(-50.7960901276622, 4.71960817103578, 13.5393457829082, 1.48)
    pt3dadd(-50.9870182423422, 3.73898741585745, 13.538605060345, 1.48)
    pt3dadd(-51.1830970609765, 2.75846416135147, 13.5498853199147, 1.48)
    pt3dadd(-51.4177485491361, 1.79276955835067, 13.5759374761124, 1.48)
    pt3dadd(-51.8866040272509, 0.917110967659224, 13.6916810426289, 1.48)
    pt3dadd(-52.3554595053657, 0.0414523769677518, 13.8074246091454, 1.48)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(-52.3554595053657, 0.0414523769677518, 13.8074246091454, 1.48)
    pt3dadd(-52.8243149834806, -0.834206213723692, 13.9231681756619, 1.48)
    pt3dadd(-53.2931704615954, -1.70986480441516, 14.0389117421783, 1.48)
    pt3dadd(-53.7620259397103, -2.58552339510664, 14.1546553086948, 1.48)
    pt3dadd(-54.2241557684978, -3.46607468430929, 14.2378669525375, 1.48)
    pt3dadd(-54.6615824812933, -4.36459671402395, 14.2015897827148, 1.48)
    pt3dadd(-55.0990091940888, -5.2631187437386, 14.165312612892, 1.48)
    pt3dadd(-55.5364359068844, -6.16164077345326, 14.1290354430693, 1.48)
    pt3dadd(-55.9738626196799, -7.06016280316792, 14.0927582732465, 1.48)
    pt3dadd(-56.4112893324754, -7.95868483288257, 14.0564811034238, 1.48)
    pt3dadd(-56.8487160452709, -8.85720686259726, 14.020203933601, 1.48)
    pt3dadd(-57.2945406547683, -9.75158847198506, 13.9941350236037, 1.48)
    pt3dadd(-57.7684798631601, -10.6321087228832, 14.0022414721025, 1.48)
    pt3dadd(-58.2424190715518, -11.5126289737814, 14.0103479206013, 1.48)
    pt3dadd(-58.7163582799435, -12.3931492246795, 14.0184543691002, 1.48)
    pt3dadd(-59.1902974883353, -13.2736694755777, 14.026560817599, 1.48)
    pt3dadd(-59.664236696727, -14.1541897264758, 14.0346672660979, 1.48)
    pt3dadd(-60.1384623164445, -14.8527120218384, 14.5213788506251, 1.48)
    pt3dadd(-60.6127428711457, -15.5163262887607, 15.0998890581146, 1.48)
    pt3dadd(-61.0870234258468, -16.179940555683, 15.6783992656041, 1.48)
    pt3dadd(-61.5613039805479, -16.8435548226053, 16.2569094730936, 1.48)
    pt3dadd(-62.035584535249, -17.5071690895277, 16.8354196805831, 1.48)
    pt3dadd(-62.5098650899502, -18.17078335645, 17.4139298880726, 1.48)
    pt3dadd(-62.9458611433049, -18.8948112770009, 17.8677362396355, 1.48)
    pt3dadd(-63.2341200189638, -19.8519712057408, 17.8403192482137, 1.48)
    pt3dadd(-63.5223788946226, -20.8091311344806, 17.812902256792, 1.48)
    pt3dadd(-63.8106377702814, -21.7662910632205, 17.7854852653702, 1.48)
    pt3dadd(-64.0988966459403, -22.7234509919603, 17.7580682739485, 1.48)
    pt3dadd(-64.4222634443465, -23.6670903541301, 17.7390172102868, 1.48)
    pt3dadd(-64.8547273191749, -24.5687148612779, 17.7459630780513, 1.48)
    pt3dadd(-65.2871911940033, -25.4703393684257, 17.7529089458158, 1.48)
    pt3dadd(-65.7196550688316, -26.3719638755734, 17.7598548135803, 1.48)
    pt3dadd(-66.15211894366, -27.2735883827212, 17.7668006813448, 1.48)
    pt3dadd(-66.5845828184884, -28.1752128898689, 17.7737465491093, 1.48)
    pt3dadd(-66.9983538807859, -29.0810252941772, 17.7196013103303, 1.48)
    pt3dadd(-67.3876560986855, -29.992319645293, 17.5854879673592, 1.48)
    pt3dadd(-67.7769583165851, -30.9036139964088, 17.4513746243881, 1.48)
    pt3dadd(-68.1662605344848, -31.8149083475246, 17.317261281417, 1.48)
    pt3dadd(-68.5555627523844, -32.7262026986404, 17.1831479384459, 1.48)
    pt3dadd(-68.944864970284, -33.6374970497562, 17.0490345954748, 1.48)
    pt3dadd(-69.3350196810841, -34.5464625219005, 16.9315363549186, 1.48)
    pt3dadd(-69.7486010430885, -35.3914300002419, 17.2706239800952, 1.48)
    pt3dadd(-70.1621824050929, -36.2363974785833, 17.6097116052719, 1.48)
    pt3dadd(-70.5757637670973, -37.0813649569246, 17.9487992304486, 1.48)
    pt3dadd(-70.9893451291018, -37.926332435266, 18.2878868556253, 1.48)
    pt3dadd(-71.4029264911062, -38.7712999136074, 18.626974480802, 1.48)
    pt3dadd(-71.8402985480855, -39.6128905893037, 18.9393862378476, 1.48)
    pt3dadd(-72.3298977000814, -40.4470682578229, 19.1932371541523, 1.48)
    pt3dadd(-72.8194968520773, -41.2812459263421, 19.4470880704571, 1.48)
    pt3dadd(-73.3090960040732, -42.1154235948613, 19.7009389867619, 1.48)
    pt3dadd(-73.7986951560691, -42.9496012633805, 19.9547899030666, 1.48)
    pt3dadd(-74.288294308065, -43.7837789318997, 20.2086408193714, 1.48)
    pt3dadd(-74.7778934600609, -44.6179566004189, 20.4624917356762, 1.48)
    pt3dadd(-75.1498496932558, -45.5400011580309, 20.4342535146496, 1.48)
    pt3dadd(-75.5093768203648, -46.4713289508523, 20.3762122604334, 1.48)
    pt3dadd(-75.8689039474739, -47.4026567436738, 20.3181710062171, 1.48)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-75.8689039474739, -47.4026567436738, 20.3181710062171, 1.48)
    pt3dadd(-76.4075673604052, -48.2155593909988, 20.4300773709856, 1.48)
    pt3dadd(-77.0334335397897, -48.9708131914833, 20.6247134990714, 1.48)
    pt3dadd(-77.6592997191743, -49.7260669919679, 20.8193496271572, 1.48)
    pt3dadd(-78.2851658985588, -50.4813207924524, 21.013985755243, 1.48)
    pt3dadd(-78.9110320779434, -51.236574592937, 21.2086218833287, 1.48)
    pt3dadd(-79.5368982573279, -51.9918283934215, 21.4032580114145, 1.48)
    pt3dadd(-80.1076323256446, -52.7851385838373, 21.5950974328819, 1.48)
    pt3dadd(-80.5787973186857, -53.6471789476563, 21.781885977711, 1.48)
    pt3dadd(-81.0499623117269, -54.5092193114753, 21.9686745225401, 1.48)
    pt3dadd(-81.521127304768, -55.3712596752943, 22.1554630673692, 1.48)
    pt3dadd(-81.9922922978092, -56.2333000391133, 22.3422516121984, 1.48)
    pt3dadd(-82.4634572908503, -57.0953404029322, 22.5290401570275, 1.48)
    pt3dadd(-82.9422395959883, -57.9535663177671, 22.7120407273798, 1.48)
    pt3dadd(-83.4846942983718, -58.7799076113731, 22.8633779744263, 1.48)
    pt3dadd(-84.0271490007552, -59.6062489049791, 23.0147152214728, 1.48)
    pt3dadd(-84.5696037031387, -60.4325901985851, 23.1660524685193, 1.48)
    pt3dadd(-85.1120584055222, -61.2589314921911, 23.3173897155658, 1.48)
    pt3dadd(-85.6545131079057, -62.0852727857971, 23.4687269626123, 1.48)
    pt3dadd(-86.2054367694055, -62.8871698434734, 23.6637939685203, 1.48)
    pt3dadd(-86.8068588448514, -63.543311663982, 24.1196112548819, 1.48)
    pt3dadd(-87.4082809202972, -64.1994534844906, 24.5754285412436, 1.48)
    pt3dadd(-88.0097029957431, -64.8555953049992, 25.0312458276052, 1.48)
    pt3dadd(-88.6111250711889, -65.5117371255078, 25.4870631139668, 1.48)
    pt3dadd(-89.2125471466348, -66.1678789460164, 25.9428804003284, 1.48)
    pt3dadd(-89.8145837849973, -66.8289817518145, 26.3806999900705, 1.48)
    pt3dadd(-90.4321365392053, -67.615336538135, 26.3641245322819, 1.48)
    pt3dadd(-91.0496892934133, -68.4016913244556, 26.3475490744933, 1.48)
    pt3dadd(-91.6672420476213, -69.1880461107761, 26.3309736167047, 1.48)
    pt3dadd(-92.2847948018293, -69.9744008970966, 26.3143981589161, 1.48)
    pt3dadd(-92.9023475560373, -70.7607556834171, 26.2978227011275, 1.48)
    pt3dadd(-93.4699221662147, -71.576912127469, 26.2626371779429, 1.48)
    pt3dadd(-93.8967639998104, -72.4769866545272, 26.175047824517, 1.48)
    pt3dadd(-94.3236058334061, -73.3770611815854, 26.0874584710911, 1.48)
    pt3dadd(-94.7504476670018, -74.2771357086437, 25.9998691176652, 1.48)
    pt3dadd(-95.1772895005975, -75.1772102357019, 25.9122797642393, 1.48)
    pt3dadd(-95.6041313341933, -76.0772847627601, 25.8246904108135, 1.48)
    pt3dadd(-96.0358109634998, -76.9727437018883, 25.7660068236506, 1.48)
    pt3dadd(-96.5134487494673, -77.8243554168162, 25.9819226230117, 1.48)
    pt3dadd(-96.9910865354349, -78.6759671317439, 26.1978384223728, 1.48)
    pt3dadd(-97.4687243214025, -79.5275788466718, 26.4137542217338, 1.48)
    pt3dadd(-97.9463621073701, -80.3791905615995, 26.6296700210949, 1.48)
    pt3dadd(-98.4239998933377, -81.2308022765274, 26.845585820456, 1.48)
    pt3dadd(-98.9016376793052, -82.0824139914552, 27.0615016198171, 1.48)
    pt3dadd(-99.3048932352009, -82.9739704077827, 27.2614137992327, 1.48)
    pt3dadd(-99.682490831895, -83.8793056462542, 27.4558055710557, 1.48)
    pt3dadd(-100.060088428589, -84.7846408847258, 27.6501973428787, 1.48)
    pt3dadd(-100.437686025283, -85.6899761231974, 27.8445891147017, 1.48)
    pt3dadd(-100.815283621977, -86.5953113616689, 28.0389808865247, 1.48)
    pt3dadd(-101.192881218671, -87.5006466001405, 28.2333726583478, 1.48)
    pt3dadd(-101.418785435195, -88.4441407831215, 28.4629460368592, 1.48)
    pt3dadd(-101.608797015661, -89.3966638710294, 28.7008438432615, 1.48)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(-101.608797015661, -89.3966638710294, 28.7008438432615, 1.48)
    pt3dadd(-102.043557186302, -90.2314692293487, 28.7123028879607, 1.48)
    pt3dadd(-102.70137426916, -90.9589899930703, 28.5173920779622, 1.48)
    pt3dadd(-103.359191352018, -91.6865107567919, 28.3224812679638, 1.48)
    pt3dadd(-104.017008434875, -92.4140315205135, 28.1275704579653, 1.48)
    pt3dadd(-104.674825517733, -93.1415522842351, 27.9326596479669, 1.48)
    pt3dadd(-105.259543028817, -93.9311365059388, 27.7723912955179, 1.48)
    pt3dadd(-105.78114108001, -94.7743108082913, 27.6420357477097, 1.48)
    pt3dadd(-106.302739131202, -95.6174851106437, 27.5116801999015, 1.48)
    pt3dadd(-106.824337182395, -96.4606594129962, 27.3813246520932, 1.48)
    pt3dadd(-107.345126956666, -97.3042856731519, 27.2518798550925, 1.48)
    pt3dadd(-107.71414064235, -98.2327793664319, 27.29345342022, 1.48)
    pt3dadd(-108.083154328033, -99.1612730597119, 27.3350269853474, 1.48)
    pt3dadd(-108.452168013717, -100.089766752992, 27.3766005504748, 1.48)
    pt3dadd(-108.8211816994, -101.018260446272, 27.4181741156022, 1.48)
    pt3dadd(-109.190195385084, -101.946754139552, 27.4597476807296, 1.48)
    pt3dadd(-109.559209070768, -102.875247832832, 27.501321245857, 1.48)
    pt3dadd(-109.989489118047, -103.771489463633, 27.4590469388889, 1.48)
    pt3dadd(-110.470665809113, -104.640937896786, 27.3471165405972, 1.48)
    pt3dadd(-110.95184250018, -105.51038632994, 27.2351861423055, 1.48)
    pt3dadd(-111.433019191246, -106.379834763093, 27.1232557440138, 1.48)
    pt3dadd(-111.914195882313, -107.249283196246, 27.0113253457221, 1.48)
    pt3dadd(-112.395372573379, -108.118731629399, 26.8993949474304, 1.48)
    pt3dadd(-112.85710605549, -108.999285079592, 26.7961880015226, 1.48)
    pt3dadd(-113.292706683641, -109.894764347286, 26.7047059055456, 1.48)
    pt3dadd(-113.728307311791, -110.790243614981, 26.6132238095686, 1.48)
    pt3dadd(-114.163907939942, -111.685722882675, 26.5217417135917, 1.48)
    pt3dadd(-114.599508568092, -112.58120215037, 26.4302596176147, 1.48)
    pt3dadd(-115.04194029244, -113.467440416474, 26.3712912580884, 1.48)
    pt3dadd(-115.572596085149, -114.234330523438, 26.7322399989151, 1.48)
    pt3dadd(-116.103251877859, -115.001220630402, 27.0931887397418, 1.48)
    pt3dadd(-116.633907670568, -115.768110737366, 27.4541374805685, 1.48)
    pt3dadd(-117.164287615193, -116.535573591979, 27.812443181641, 1.48)
  }
}
proc shape3d_7() {
  adendIML[8] {
  }
  adendMML[4] {pt3dclear()
    pt3dadd(-117.164287615193, -116.535573591979, 27.812443181641, 1.48)
    pt3dadd(-117.645584410734, -117.40494854866, 27.7004584536737, 1.48)
    pt3dadd(-118.126881206275, -118.274323505341, 27.5884737257064, 1.48)
    pt3dadd(-118.608178001815, -119.143698462022, 27.4764889977391, 1.48)
    pt3dadd(-119.089474797356, -120.013073418703, 27.3645042697717, 1.48)
    pt3dadd(-119.570771592897, -120.882448375384, 27.2525195418044, 1.48)
    pt3dadd(-120.052068388438, -121.751823332065, 27.1405348138371, 1.48)
    pt3dadd(-120.531931020362, -122.622069386015, 27.0291982639631, 1.48)
    pt3dadd(-121.008322017498, -123.494424077747, 26.9194307384259, 1.48)
    pt3dadd(-121.484713014634, -124.366778769478, 26.8096632128888, 1.48)
    pt3dadd(-121.961104011769, -125.239133461209, 26.6998956873516, 1.48)
    pt3dadd(-122.437495008905, -126.11148815294, 26.5901281618144, 1.48)
    pt3dadd(-122.921865730945, -126.97886533173, 26.4767422816134, 1.48)
    pt3dadd(-123.420811825542, -127.837150830492, 26.3567472929652, 1.48)
    pt3dadd(-123.919757920139, -128.695436329254, 26.2367523043171, 1.48)
    pt3dadd(-124.418704014736, -129.553721828017, 26.1167573156689, 1.48)
    pt3dadd(-124.917650109333, -130.412007326779, 25.9967623270207, 1.48)
    pt3dadd(-125.416974933361, -131.269980367806, 25.8761787797487, 1.48)
    pt3dadd(-125.926994456182, -132.11913011417, 25.7389753009626, 1.48)
    pt3dadd(-126.437013979002, -132.968279860535, 25.6017718221764, 1.48)
    pt3dadd(-126.947033501823, -133.817429606899, 25.4645683433903, 1.48)
    pt3dadd(-127.457053024643, -134.666579353264, 25.3273648646042, 1.48)
    pt3dadd(-127.967072547464, -135.515729099628, 25.1901613858181, 1.48)
    pt3dadd(-128.477092070284, -136.364878845993, 25.052957907032, 1.48)
    pt3dadd(-128.900387055438, -137.263889887169, 24.96342152073, 1.48)
    pt3dadd(-129.291309029407, -138.181513426008, 24.8916785682088, 1.48)
    pt3dadd(-129.682231003376, -139.099136964848, 24.8199356156877, 1.48)
    pt3dadd(-130.073152977345, -140.016760503687, 24.7481926631665, 1.48)
    pt3dadd(-130.464074951313, -140.934384042526, 24.6764497106454, 1.48)
    pt3dadd(-130.831838794554, -141.862615792053, 24.6488605816203, 1.48)
    pt3dadd(-131.1784407116, -142.800541336568, 24.6616192667153, 1.48)
    pt3dadd(-131.525042628646, -143.738466881083, 24.6743779518104, 1.48)
    pt3dadd(-131.871644545693, -144.676392425599, 24.6871366369054, 1.48)
    pt3dadd(-132.218246462739, -145.614317970114, 24.6998953220004, 1.48)
    pt3dadd(-132.554608151363, -146.551662684783, 24.7505214127837, 1.48)
    pt3dadd(-132.85316162488, -147.486862902387, 24.9409587422244, 1.48)
    pt3dadd(-133.151715098398, -148.42206311999, 25.131396071665, 1.48)
    pt3dadd(-133.450268571915, -149.357263337594, 25.3218334011057, 1.48)
    pt3dadd(-133.748822045432, -150.292463555198, 25.5122707305464, 1.48)
    pt3dadd(-134.047375518949, -151.227663772802, 25.7027080599871, 1.48)
    pt3dadd(-134.345928992466, -152.162863990406, 25.8931453894277, 1.48)
    pt3dadd(-134.679338199303, -153.078628856895, 25.7652496899137, 1.48)
    pt3dadd(-135.024212300958, -153.988000965722, 25.5326465478534, 1.48)
    pt3dadd(-135.369086402614, -154.897373074548, 25.300043405793, 1.48)
    pt3dadd(-135.713960504269, -155.806745183374, 25.0674402637326, 1.48)
    pt3dadd(-136.058834605924, -156.7161172922, 24.8348371216723, 1.48)
    pt3dadd(-136.40370870758, -157.625489401026, 24.6022339796119, 1.48)
    pt3dadd(-136.78166841659, -158.527952053889, 24.4462541283467, 1.48)
    pt3dadd(-137.246324043517, -159.412309504065, 24.4910542252348, 1.48)
    pt3dadd(-137.710979670445, -160.296666954242, 24.5358543221229, 1.48)
    pt3dadd(-138.175635297372, -161.181024404419, 24.5806544190109, 1.48)
    pt3dadd(-138.6402909243, -162.065381854596, 24.625454515899, 1.48)
    pt3dadd(-139.104946551227, -162.949739304773, 24.6702546127871, 1.48)
    pt3dadd(-139.569602178155, -163.83409675495, 24.7150547096752, 1.48)
    pt3dadd(-140.0439407831, -164.71320590778, 24.7413144273139, 1.48)
    pt3dadd(-140.549103580855, -165.575607955723, 24.708553849365, 1.48)
    pt3dadd(-141.05426637861, -166.438010003666, 24.6757932714161, 1.48)
    pt3dadd(-141.559429176366, -167.300412051609, 24.6430326934672, 1.48)
    pt3dadd(-142.064591974121, -168.162814099553, 24.6102721155184, 1.48)
    pt3dadd(-142.558683829358, -169.005995012292, 24.6970902010816, 1.48)
    pt3dadd(-143.024795848887, -169.800597928692, 25.086122064171, 1.48)
    pt3dadd(-143.490907868417, -170.595200845092, 25.4751539272604, 1.48)
    pt3dadd(-143.957019887946, -171.389803761492, 25.8641857903499, 1.48)
    pt3dadd(-144.417489991071, -172.190082098857, 26.2245216377051, 1.48)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(-144.417489991071, -172.190082098857, 26.2245216377051, 1.48)
    pt3dadd(-144.536705844214, -173.178957418914, 26.4062335383046, 1.48)
    pt3dadd(-144.691058879463, -174.150379617419, 26.586550073215, 1.48)
    pt3dadd(-144.845411914711, -175.121801815923, 26.7668666081254, 1.48)
    pt3dadd(-144.999764949959, -176.093224014428, 26.9471831430358, 1.48)
    pt3dadd(-145.224743838919, -177.034607261963, 26.8719264332498, 1.48)
    pt3dadd(-145.506770979024, -177.951726454214, 26.590229646882, 1.48)
    pt3dadd(-145.788798119129, -178.868845646465, 26.3085328605142, 1.48)
    pt3dadd(-146.070825259233, -179.785964838715, 26.0268360741464, 1.48)
    pt3dadd(-146.352852399338, -180.703084030966, 25.7451392877786, 1.48)
    pt3dadd(-146.634879539442, -181.620203223217, 25.4634425014108, 1.48)
    pt3dadd(-146.916906679547, -182.537322415467, 25.181745715043, 1.48)
    pt3dadd(-147.198933819652, -183.454441607718, 24.9000489286752, 1.48)
    pt3dadd(-147.463854523565, -184.404330572689, 24.8031347950832, 1.48)
    pt3dadd(-147.720038923232, -185.370955151169, 24.800589673029, 1.48)
    pt3dadd(-147.976223322899, -186.337579729649, 24.7980445509749, 1.48)
    pt3dadd(-148.232407722565, -187.304204308128, 24.7954994289207, 1.48)
    pt3dadd(-148.488592122232, -188.270828886608, 24.7929543068665, 1.48)
    pt3dadd(-148.744776521899, -189.237453465088, 24.7904091848124, 1.48)
    pt3dadd(-149.000960921565, -190.204078043568, 24.7878640627582, 1.48)
    pt3dadd(-149.224699711614, -191.177228703051, 24.840491951648, 1.48)
    pt3dadd(-149.447270178938, -192.150614357926, 24.8951065463903, 1.48)
    pt3dadd(-149.669840646262, -193.124000012801, 24.9497211411325, 1.48)
    pt3dadd(-149.892411113586, -194.097385667676, 25.0043357358747, 1.48)
    pt3dadd(-150.11498158091, -195.070771322551, 25.058950330617, 1.48)
    pt3dadd(-150.337552048234, -196.044156977426, 25.1135649253592, 1.48)
    pt3dadd(-150.560122515558, -197.017542632301, 25.1681795201014, 1.48)
    pt3dadd(-150.782692982882, -197.990928287176, 25.2227941148436, 1.48)
    pt3dadd(-150.975912478621, -198.968713920942, 25.3022934506949, 1.48)
    pt3dadd(-151.163627304429, -199.947324755041, 25.3864598308967, 1.48)
    pt3dadd(-151.351342130237, -200.92593558914, 25.4706262110986, 1.48)
    pt3dadd(-151.539056956046, -201.904546423238, 25.5547925913005, 1.48)
    pt3dadd(-151.726771781854, -202.883157257337, 25.6389589715023, 1.48)
    pt3dadd(-151.914486607662, -203.861768091436, 25.7231253517042, 1.48)
    pt3dadd(-152.10685500172, -204.839196818347, 25.8038823508857, 1.48)
    pt3dadd(-152.447618145767, -205.778930062745, 25.7759197145192, 1.48)
    pt3dadd(-152.788381289813, -206.718663307143, 25.7479570781528, 1.48)
    pt3dadd(-153.129144433859, -207.658396551542, 25.7199944417862, 1.48)
    pt3dadd(-153.469907577905, -208.59812979594, 25.6920318054198, 1.48)
    pt3dadd(-153.810670721952, -209.537863040338, 25.6640691690533, 1.48)
    pt3dadd(-154.151433865998, -210.477596284736, 25.6361065326868, 1.48)
    pt3dadd(-154.492640255594, -211.416701337771, 25.600747797436, 1.48)
    pt3dadd(-154.837130573947, -212.351152230867, 25.5105926591863, 1.48)
    pt3dadd(-155.181620892299, -213.285603123963, 25.4204375209367, 1.48)
    pt3dadd(-155.526111210651, -214.22005401706, 25.330282382687, 1.48)
    pt3dadd(-155.870601529004, -215.154504910156, 25.2401272444374, 1.48)
    pt3dadd(-156.215091847356, -216.088955803253, 25.1499721061878, 1.48)
    pt3dadd(-156.559582165708, -217.023406696349, 25.0598169679381, 1.48)
    pt3dadd(-156.823400373454, -217.984116613953, 25.0478665481716, 1.48)
    pt3dadd(-157.043023626399, -218.959212127675, 25.0787593609995, 1.48)
    pt3dadd(-157.262646879344, -219.934307641398, 25.1096521738274, 1.48)
    pt3dadd(-157.482270132289, -220.90940315512, 25.1405449866552, 1.48)
    pt3dadd(-157.701893385234, -221.884498668842, 25.1714377994831, 1.48)
    pt3dadd(-157.921516638179, -222.859594182565, 25.202330612311, 1.48)
    pt3dadd(-158.141148238265, -223.833726500239, 25.2411851412001, 1.48)
    pt3dadd(-158.360950957379, -224.788112994279, 25.4432573675552, 1.48)
    pt3dadd(-158.580753676494, -225.742499488319, 25.6453295939102, 1.48)
    pt3dadd(-158.800556395608, -226.696885982359, 25.8474018202652, 1.48)
    pt3dadd(-159.020359114723, -227.651272476399, 26.0494740466202, 1.48)
    pt3dadd(-159.497875646117, -228.372581181489, 25.6174048837859, 1.48)
    pt3dadd(-160.007433075103, -229.06491192261, 25.106494547754, 1.48)
    pt3dadd(-160.516990504089, -229.757242663731, 24.5955842117221, 1.48)
    pt3dadd(-161.026547933075, -230.449573404852, 24.0846738756903, 1.48)
    pt3dadd(-161.54282165125, -231.121056630441, 23.77806217684, 1.48)
    pt3dadd(-162.089093008631, -231.699426496606, 24.3839300683949, 1.48)
    pt3dadd(-162.635364366011, -232.277796362771, 24.9897979599498, 1.48)
    pt3dadd(-163.181635723392, -232.856166228937, 25.5956658515046, 1.48)
    pt3dadd(-163.727907080773, -233.434536095102, 26.2015337430595, 1.48)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(-163.727907080773, -233.434536095102, 26.2015337430595, 1.48)
    pt3dadd(-164.279426839761, -234.022567703079, 26.749114544373, 1.48)
    pt3dadd(-164.905832631337, -234.748456427621, 26.4650347248443, 1.48)
    pt3dadd(-165.532238422913, -235.474345152163, 26.1809549053157, 1.48)
    pt3dadd(-166.158644214489, -236.200233876705, 25.896875085787, 1.48)
    pt3dadd(-166.588986168387, -236.991430121895, 25.9429408474515, 1.48)
    pt3dadd(-166.778042249959, -237.862997037556, 26.3953001178836, 1.48)
    pt3dadd(-166.967098331531, -238.734563953217, 26.8476593883158, 1.48)
    pt3dadd(-167.156154413103, -239.606130868878, 27.3000186587479, 1.48)
    pt3dadd(-167.345210494675, -240.477697784539, 27.7523779291801, 1.48)
    pt3dadd(-167.534398517535, -241.35233697758, 28.1928091947526, 1.48)
    pt3dadd(-167.728138223717, -242.332962961697, 28.221750610097, 1.48)
    pt3dadd(-167.921877929898, -243.313588945815, 28.2506920254415, 1.48)
    pt3dadd(-168.11561763608, -244.294214929932, 28.2796334407859, 1.48)
    pt3dadd(-168.309357342262, -245.27484091405, 28.3085748561303, 1.48)
    pt3dadd(-168.503097048444, -246.255466898168, 28.3375162714747, 1.48)
    pt3dadd(-168.720631331455, -247.206607851602, 28.2642700002095, 1.48)
    pt3dadd(-169.023594445379, -248.05188973813, 27.8241428777676, 1.48)
    pt3dadd(-169.326557559303, -248.897171624659, 27.3840157553258, 1.48)
    pt3dadd(-169.629520673227, -249.742453511187, 26.9438886328838, 1.48)
    pt3dadd(-169.932483787151, -250.587735397715, 26.503761510442, 1.48)
    pt3dadd(-170.235446901075, -251.433017284243, 26.0636343880001, 1.48)
    pt3dadd(-170.357291444217, -252.382728865444, 26.173094006346, 1.48)
    pt3dadd(-170.441828251879, -253.353951412683, 26.3957603304386, 1.48)
    pt3dadd(-170.526365059542, -254.325173959922, 26.6184266545312, 1.48)
    pt3dadd(-170.610901867205, -255.296396507161, 26.8410929786238, 1.48)
    pt3dadd(-170.695438674868, -256.267619054399, 27.0637593027163, 1.48)
    pt3dadd(-170.77997548253, -257.238841601638, 27.2864256268089, 1.48)
    pt3dadd(-170.705440998823, -258.216388071006, 27.4060694487186, 1.48)
    pt3dadd(-170.522375718591, -259.198249211487, 27.455423313681, 1.48)
    pt3dadd(-170.400222628087, -260.16539047282, 27.4658863601165, 1.48)
    pt3dadd(-170.833577540204, -260.99828913508, 27.1216722718651, 1.48)
    pt3dadd(-171.266932452321, -261.831187797339, 26.7774581836137, 1.48)
    pt3dadd(-171.700287364437, -262.664086459599, 26.4332440953622, 1.48)
    pt3dadd(-172.18137695185, -263.304914899941, 26.7581742885566, 1.48)
    pt3dadd(-172.559604098479, -264.003816850418, 27.2889382344687, 1.48)
    pt3dadd(-172.75624524935, -264.927001528749, 27.6191840633294, 1.48)
    pt3dadd(-172.952886400222, -265.850186207079, 27.9494298921902, 1.48)
    pt3dadd(-172.981674004243, -266.727338019793, 27.8048738713088, 1.48)
    pt3dadd(-172.873359654327, -267.56689041361, 27.2725020279152, 1.48)
    pt3dadd(-172.76504530441, -268.406442807427, 26.7401301845215, 1.48)
    pt3dadd(-172.656730954494, -269.245995201244, 26.2077583411278, 1.48)
    pt3dadd(-172.548416604577, -270.085547595061, 25.6753864977342, 1.48)
    pt3dadd(-172.627607646758, -271.052954062744, 25.6957232069623, 1.48)
    pt3dadd(-172.736968286571, -272.040932237303, 25.8049906634807, 1.48)
    pt3dadd(-172.846328926383, -273.028910411862, 25.9142581199991, 1.48)
    pt3dadd(-172.955689566196, -274.016888586422, 26.0235255765174, 1.48)
    pt3dadd(-173.065050206009, -275.004866760981, 26.1327930330359, 1.48)
    pt3dadd(-173.174410845821, -275.992844935541, 26.2420604895543, 1.48)
    pt3dadd(-173.283771485634, -276.9808231101, 26.3513279460726, 1.48)
    pt3dadd(-173.393132125447, -277.96880128466, 26.4605954025911, 1.48)
    pt3dadd(-173.502492765259, -278.956779459219, 26.5698628591095, 1.48)
    pt3dadd(-173.611853405072, -279.944757633778, 26.6791303156279, 1.48)
    pt3dadd(-173.721214044885, -280.932735808338, 26.7883977721463, 1.48)
    pt3dadd(-173.829820062482, -281.920775766529, 26.8977162913186, 1.48)
    pt3dadd(-173.897495854002, -282.912166829386, 27.0098044161614, 1.48)
    pt3dadd(-173.965171645522, -283.903557892242, 27.1218925410043, 1.48)
    pt3dadd(-174.032847437043, -284.894948955098, 27.2339806658471, 1.48)
    pt3dadd(-174.100523228563, -285.886340017954, 27.34606879069, 1.48)
    pt3dadd(-174.217579989608, -286.828021313158, 27.0851410955842, 1.48)
    pt3dadd(-174.345418193536, -287.758849378345, 26.7427721328024, 1.48)
    pt3dadd(-174.473256397464, -288.689677443532, 26.4004031700206, 1.48)
    pt3dadd(-174.601094601391, -289.620505508719, 26.0580342072387, 1.48)
    pt3dadd(-174.557442193125, -290.531080205581, 25.705483361572, 1.48)
    pt3dadd(-174.257862041782, -291.411429347943, 25.337737361642, 1.48)
    pt3dadd(-173.958281890438, -292.291778490304, 24.9699913617121, 1.48)
    pt3dadd(-173.658701739094, -293.172127632665, 24.6022453617821, 1.48)
    pt3dadd(-173.755865994016, -294.112403830806, 24.3007650992413, 1.48)
    pt3dadd(-173.890331201014, -295.058314226178, 24.0055149814879, 1.48)
    pt3dadd(-174.024796408013, -296.00422462155, 23.7102648637346, 1.48)
    pt3dadd(-174.159261615011, -296.950135016923, 23.4150147459812, 1.48)
    pt3dadd(-174.368507081294, -297.866022737747, 23.3218456069523, 1.48)
    pt3dadd(-174.749472447025, -298.712968592041, 23.692720397153, 1.48)
    pt3dadd(-175.130437812757, -299.559914446336, 24.0635951873535, 1.48)
    pt3dadd(-175.511403178488, -300.40686030063, 24.4344699775541, 1.48)
    pt3dadd(-175.594490326948, -301.348439809256, 24.5298680275048, 1.48)
    pt3dadd(-175.510384509434, -302.343135257319, 24.4706466034924, 1.48)
    pt3dadd(-175.426278691919, -303.337830705382, 24.4114251794799, 1.48)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(-144.417489991071, -172.190082098857, 26.2245216377051, 1.48)
    pt3dadd(-145.144232506973, -172.877190570912, 26.3821074755513, 1.48)
    pt3dadd(-145.83583784077, -173.581752164519, 26.5410886790866, 1.48)
    pt3dadd(-146.527443174566, -174.286313758126, 26.700069882622, 1.48)
    pt3dadd(-147.219048508363, -174.990875351734, 26.8590510861573, 1.48)
    pt3dadd(-147.91065384216, -175.695436945341, 27.0180322896926, 1.48)
    pt3dadd(-148.242094088879, -176.62210027078, 27.0723736179728, 1.48)
    pt3dadd(-148.519528854368, -177.582066965535, 27.1110245669748, 1.48)
    pt3dadd(-148.796963619857, -178.542033660291, 27.1496755159768, 1.48)
    pt3dadd(-149.074398385345, -179.502000355046, 27.1883264649787, 1.48)
    pt3dadd(-149.436316853465, -180.343608049169, 27.4655201586355, 1.48)
    pt3dadd(-149.889025538478, -181.058021515248, 27.9990632646734, 1.48)
    pt3dadd(-150.34173422349, -181.772434981326, 28.5326063707112, 1.48)
    pt3dadd(-150.794442908502, -182.486848447404, 29.066149476749, 1.48)
    pt3dadd(-151.247151593514, -183.201261913483, 29.5996925827868, 1.48)
    pt3dadd(-151.713522042533, -183.978450526111, 30.0044248850033, 1.48)
    pt3dadd(-152.189564203737, -184.800080189655, 30.317966838721, 1.48)
    pt3dadd(-152.665606364941, -185.621709853199, 30.6315087924387, 1.48)
    pt3dadd(-153.141648526145, -186.443339516743, 30.9450507461565, 1.48)
    pt3dadd(-153.61769068735, -187.264969180286, 31.2585926998742, 1.48)
    pt3dadd(-154.124539478207, -188.082467358358, 31.5136862518737, 1.48)
    pt3dadd(-154.699775696513, -188.890794079955, 31.6390305947919, 1.48)
    pt3dadd(-155.275011914818, -189.699120801552, 31.7643749377101, 1.48)
    pt3dadd(-155.850248133124, -190.507447523149, 31.8897192806284, 1.48)
    pt3dadd(-156.42548435143, -191.315774244746, 32.0150636235466, 1.48)
    pt3dadd(-157.000720569735, -192.124100966343, 32.1404079664648, 1.48)
    pt3dadd(-157.698736320097, -192.832195846667, 32.2047589655401, 1.48)
    pt3dadd(-158.427550168973, -193.515148506052, 32.2538103541598, 1.48)
    pt3dadd(-159.156364017849, -194.198101165438, 32.3028617427795, 1.48)
    pt3dadd(-159.885177866725, -194.881053824823, 32.3519131313993, 1.48)
    pt3dadd(-160.6139917156, -195.564006484208, 32.400964520019, 1.48)
    pt3dadd(-161.334608418029, -196.245897831414, 32.3319116698091, 1.48)
    pt3dadd(-162.048811312845, -196.926958761331, 32.1704488729265, 1.48)
    pt3dadd(-162.763014207661, -197.608019691248, 32.008986076044, 1.48)
    pt3dadd(-163.477217102477, -198.289080621165, 31.8475232791615, 1.48)
    pt3dadd(-164.191419997293, -198.970141551082, 31.6860604822789, 1.48)
    pt3dadd(-164.905622892109, -199.651202480999, 31.5245976853964, 1.48)
    pt3dadd(-165.619863468421, -200.331625804002, 31.3937004561288, 1.48)
    pt3dadd(-166.334497139038, -201.005397595821, 31.5816639881453, 1.48)
  }
}
proc shape3d_8() {
  adendMML[6] {
    pt3dadd(-167.049130809655, -201.679169387641, 31.7696275201616, 1.48)
    pt3dadd(-167.763764480272, -202.352941179461, 31.9575910521781, 1.48)
    pt3dadd(-168.478398150889, -203.026712971281, 32.1455545841944, 1.48)
    pt3dadd(-169.193031821506, -203.700484763101, 32.3335181162108, 1.48)
    pt3dadd(-169.907665492124, -204.374256554921, 32.5214816482272, 1.48)
    pt3dadd(-170.635157203416, -205.051218376611, 32.6289434527403, 1.48)
    pt3dadd(-171.364446370359, -205.728626140055, 32.7251517320432, 1.48)
    pt3dadd(-172.093735537301, -206.406033903499, 32.8213600113462, 1.48)
    pt3dadd(-172.823024704243, -207.083441666943, 32.9175682906492, 1.48)
    pt3dadd(-173.552313871186, -207.760849430387, 33.0137765699521, 1.48)
    pt3dadd(-174.281603038128, -208.438257193831, 33.1099848492551, 1.48)
    pt3dadd(-174.888917319973, -209.21355341498, 33.0647897904248, 1.48)
    pt3dadd(-175.419288825304, -210.050598493023, 32.9303963245985, 1.48)
    pt3dadd(-175.949660330635, -210.887643571066, 32.7960028587722, 1.48)
    pt3dadd(-176.480031835966, -211.724688649109, 32.6616093929459, 1.48)
    pt3dadd(-177.010403341297, -212.561733727152, 32.5272159271196, 1.48)
    pt3dadd(-177.540774846628, -213.398778805195, 32.3928224612933, 1.48)
    pt3dadd(-178.07114635196, -214.235823883238, 32.258428995467, 1.48)
    pt3dadd(-178.573156367745, -215.075509949148, 32.0526100782191, 1.48)
    pt3dadd(-179.072519535183, -215.915442486398, 31.8401253496543, 1.48)
    pt3dadd(-179.571882702622, -216.755375023649, 31.6276406210896, 1.48)
    pt3dadd(-180.071245870061, -217.5953075609, 31.4151558925248, 1.48)
    pt3dadd(-180.570609037499, -218.43524009815, 31.20267116396, 1.48)
    pt3dadd(-181.069972204938, -219.275172635401, 30.9901864353953, 1.48)
    pt3dadd(-181.728788718925, -219.992030300033, 30.7794825535895, 1.48)
    pt3dadd(-182.417784774373, -220.685593732832, 30.5691157304894, 1.48)
    pt3dadd(-183.10678082982, -221.379157165632, 30.3587489073892, 1.48)
    pt3dadd(-183.795776885267, -222.072720598431, 30.1483820842891, 1.48)
    pt3dadd(-184.484772940715, -222.766284031231, 29.938015261189, 1.48)
    pt3dadd(-185.173258365004, -223.448816067469, 29.8381643808005, 1.48)
    pt3dadd(-185.859667125067, -224.086484984311, 30.1877661064865, 1.48)
    pt3dadd(-186.54607588513, -224.724153901153, 30.5373678321725, 1.48)
    pt3dadd(-187.232484645193, -225.361822817994, 30.8869695578585, 1.48)
    pt3dadd(-187.918893405256, -225.999491734836, 31.2365712835445, 1.48)
    pt3dadd(-188.60530216532, -226.637160651678, 31.5861730092305, 1.48)
    pt3dadd(-189.294414978529, -227.282667294006, 31.8301373816157, 1.48)
    pt3dadd(-189.995310730808, -227.962326904813, 31.6137859132231, 1.48)
    pt3dadd(-190.696206483087, -228.641986515619, 31.3974344448305, 1.48)
    pt3dadd(-191.397102235365, -229.321646126426, 31.1810829764378, 1.48)
    pt3dadd(-192.054403673371, -230.043930906405, 30.9859010783284, 1.48)
    pt3dadd(-192.626269426579, -230.849752050669, 30.832207084414, 1.48)
    pt3dadd(-193.198135179787, -231.655573194932, 30.6785130904995, 1.48)
    pt3dadd(-193.770000932995, -232.461394339196, 30.524819096585, 1.48)
    pt3dadd(-194.377276097618, -233.238667545842, 30.3990503882174, 1.48)
    pt3dadd(-195.124336016465, -233.90324284862, 30.3835215573541, 1.48)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(-195.124336016465, -233.90324284862, 30.3835215573541, 1.48)
    pt3dadd(-195.871395935313, -234.567818151399, 30.3679927264908, 1.48)
    pt3dadd(-196.61845585416, -235.232393454178, 30.3524638956275, 1.48)
    pt3dadd(-197.365515773008, -235.896968756957, 30.3369350647641, 1.48)
    pt3dadd(-198.060161817499, -236.601548414403, 30.2792719115916, 1.48)
    pt3dadd(-198.603209662273, -237.421833850575, 30.0997424112552, 1.48)
    pt3dadd(-199.146257507046, -238.242119286747, 29.9202129109188, 1.48)
    pt3dadd(-199.68930535182, -239.062404722919, 29.7406834105824, 1.48)
    pt3dadd(-200.232353196593, -239.882690159091, 29.561153910246, 1.48)
    pt3dadd(-200.775401041367, -240.702975595263, 29.3816244099096, 1.48)
    pt3dadd(-201.241751608891, -241.552361736994, 29.1359524050311, 1.48)
    pt3dadd(-201.703228565776, -242.403597038347, 28.8860774763279, 1.48)
    pt3dadd(-202.164705522661, -243.2548323397, 28.6362025476246, 1.48)
    pt3dadd(-202.626182479546, -244.106067641053, 28.3863276189213, 1.48)
    pt3dadd(-203.087659436431, -244.957302942407, 28.136452690218, 1.48)
    pt3dadd(-203.549136393316, -245.80853824376, 27.8865777615148, 1.48)
    pt3dadd(-204.017878024005, -246.582374158187, 28.0727035805968, 1.48)
    pt3dadd(-204.49205746976, -247.298274429037, 28.5851883661456, 1.48)
    pt3dadd(-204.966236915515, -248.014174699888, 29.0976731516944, 1.48)
    pt3dadd(-205.440416361271, -248.730074970739, 29.6101579372431, 1.48)
    pt3dadd(-205.914595807026, -249.44597524159, 30.1226427227919, 1.48)
    pt3dadd(-206.392093727622, -250.16235899391, 30.6269247374975, 1.48)
    pt3dadd(-207.059311399717, -250.906383752532, 30.6622480527748, 1.48)
    pt3dadd(-207.726529071812, -251.650408511154, 30.6975713680521, 1.48)
    pt3dadd(-208.393746743906, -252.394433269775, 30.7328946833294, 1.48)
    pt3dadd(-209.060964416001, -253.138458028397, 30.7682179986067, 1.48)
    pt3dadd(-209.728182088096, -253.882482787019, 30.803541313884, 1.48)
    pt3dadd(-210.230437126192, -254.73059632742, 30.6458263169356, 1.48)
    pt3dadd(-210.724873941475, -255.583643041283, 30.4789624812489, 1.48)
    pt3dadd(-211.219310756759, -256.436689755146, 30.3120986455623, 1.48)
    pt3dadd(-211.713747572043, -257.289736469009, 30.1452348098757, 1.48)
    pt3dadd(-212.288982801368, -258.079727384622, 29.9633801706089, 1.48)
    pt3dadd(-212.954192902577, -258.799501112973, 29.7648321884394, 1.48)
    pt3dadd(-213.619403003786, -259.519274841325, 29.5662842062699, 1.48)
    pt3dadd(-214.284613104995, -260.239048569677, 29.3677362241003, 1.48)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(-101.608797015661, -89.3966638710294, 28.7008438432615, 1.48)
    pt3dadd(-101.679261821362, -90.3607340140612, 28.9297170017453, 1.48)
    pt3dadd(-101.640775092651, -91.3353278151018, 29.15036535249, 1.48)
    pt3dadd(-101.60228836394, -92.3099216161424, 29.3710137032347, 1.48)
    pt3dadd(-101.563801635229, -93.284515417183, 29.5916620539795, 1.48)
    pt3dadd(-101.525314906518, -94.2591092182236, 29.8123104047242, 1.48)
    pt3dadd(-101.493828422089, -95.2256597581868, 29.9814116061345, 1.48)
    pt3dadd(-101.553782083758, -96.087145826344, 29.4771821813449, 1.48)
    pt3dadd(-101.613735745426, -96.9486318945012, 28.9729527565553, 1.48)
    pt3dadd(-101.673689407094, -97.8101179626584, 28.4687233317658, 1.48)
    pt3dadd(-101.733643068763, -98.6716040308155, 27.9644939069761, 1.48)
    pt3dadd(-101.635288471397, -99.5746463113652, 27.8013006349053, 1.48)
    pt3dadd(-101.372966897774, -100.520730228102, 27.9913338280693, 1.48)
    pt3dadd(-101.110645324151, -101.466814144839, 28.1813670212334, 1.48)
    pt3dadd(-100.848323750528, -102.412898061575, 28.3714002143974, 1.48)
    pt3dadd(-100.586002176905, -103.358981978312, 28.5614334075614, 1.48)
    pt3dadd(-100.38821005618, -104.32114768377, 28.7273239539683, 1.48)
    pt3dadd(-100.288339439209, -105.30771701988, 28.8565787601222, 1.48)
    pt3dadd(-100.188468822237, -106.294286355989, 28.9858335662761, 1.48)
    pt3dadd(-100.088598205266, -107.280855692099, 29.11508837243, 1.48)
    pt3dadd(-99.9126835469904, -108.256746523795, 29.1714554252635, 1.48)
    pt3dadd(-99.6450910127491, -109.219763465751, 29.1399497888793, 1.48)
    pt3dadd(-99.3774984785079, -110.182780407707, 29.108444152495, 1.48)
    pt3dadd(-99.1099059442667, -111.145797349663, 29.0769385161108, 1.48)
    pt3dadd(-98.8423134100255, -112.108814291619, 29.0454328797266, 1.48)
    pt3dadd(-98.5855848693892, -113.073256398608, 29.0284503960076, 1.48)
    pt3dadd(-98.4487771322635, -114.05343000748, 29.1717798749464, 1.48)
    pt3dadd(-98.3119693951378, -115.033603616353, 29.3151093538853, 1.48)
    pt3dadd(-98.1751616580121, -116.013777225225, 29.4584388328241, 1.48)
    pt3dadd(-98.0383539208864, -116.993950834097, 29.6017683117629, 1.48)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(-98.0383539208864, -116.993950834097, 29.6017683117629, 1.48)
    pt3dadd(-97.8833526302809, -117.970152761131, 29.7519557109401, 1.48)
    pt3dadd(-97.7076477179756, -118.941835054419, 29.9099471812913, 1.48)
    pt3dadd(-97.5319428056704, -119.913517347706, 30.0679386516424, 1.48)
    pt3dadd(-97.3562378933651, -120.885199640993, 30.2259301219936, 1.48)
    pt3dadd(-97.1805329810598, -121.856881934281, 30.3839215923447, 1.48)
    pt3dadd(-97.0048280687545, -122.828564227568, 30.5419130626959, 1.48)
    pt3dadd(-97.0079041305778, -123.804850996181, 30.6293870655868, 1.48)
    pt3dadd(-97.2006284987202, -124.786022126518, 30.6420571452139, 1.48)
    pt3dadd(-97.3933528668626, -125.767193256854, 30.654727224841, 1.48)
    pt3dadd(-97.586077235005, -126.748364387191, 30.6673973044681, 1.48)
    pt3dadd(-97.7882233281198, -127.727443802017, 30.6761390515042, 1.48)
    pt3dadd(-98.0306365423148, -128.697583520345, 30.6680916601873, 1.48)
    pt3dadd(-98.2730497565099, -129.667723238672, 30.6600442688704, 1.48)
    pt3dadd(-98.515462970705, -130.637862957, 30.6519968775536, 1.48)
    pt3dadd(-98.7578761849001, -131.608002675327, 30.6439494862367, 1.48)
    pt3dadd(-99.0787796531564, -132.55099230465, 30.6022925892605, 1.48)
    pt3dadd(-99.4588993036516, -133.473498822564, 30.5352793389909, 1.48)
    pt3dadd(-99.8390189541469, -134.39600534048, 30.4682660887212, 1.48)
    pt3dadd(-100.219138604642, -135.318511858394, 30.4012528384516, 1.48)
    pt3dadd(-100.512671762881, -136.211748827291, 30.6769791181627, 1.48)
    pt3dadd(-100.778719351415, -137.095694621447, 31.0615028672721, 1.48)
    pt3dadd(-101.04476693995, -137.979640415603, 31.4460266163815, 1.48)
    pt3dadd(-101.310814528484, -138.863586209759, 31.8305503654908, 1.48)
    pt3dadd(-101.576862117018, -139.747532003915, 32.2150741146002, 1.48)
    pt3dadd(-101.808131856948, -140.644857871216, 32.5651629434736, 1.48)
    pt3dadd(-101.785981299359, -141.639682067289, 32.6643303358214, 1.48)
    pt3dadd(-101.76383074177, -142.634506263363, 32.7634977281692, 1.48)
    pt3dadd(-101.741680184181, -143.629330459437, 32.862665120517, 1.48)
    pt3dadd(-101.705623329453, -144.622716330447, 32.967219510473, 1.48)
    pt3dadd(-101.610540220527, -145.609997129782, 33.0946393898554, 1.48)
    pt3dadd(-101.515457111601, -146.597277929117, 33.2220592692379, 1.48)
    pt3dadd(-101.420374002675, -147.584558728452, 33.3494791486203, 1.48)
    pt3dadd(-101.325290893749, -148.571839527786, 33.4768990280027, 1.48)
    pt3dadd(-101.313175102787, -149.457236427186, 33.0170993832358, 1.48)
    pt3dadd(-101.302092666439, -150.341364366702, 32.5499859428687, 1.48)
    pt3dadd(-101.291010230092, -151.225492306219, 32.0828725025017, 1.48)
    pt3dadd(-101.279927793744, -152.109620245735, 31.6157590621347, 1.48)
    pt3dadd(-101.350118389635, -153.013742301066, 31.2685890591775, 1.48)
    pt3dadd(-101.637286238348, -153.97124329653, 31.2416359452249, 1.48)
    pt3dadd(-101.924454087061, -154.928744291993, 31.2146828312723, 1.48)
    pt3dadd(-102.211621935775, -155.886245287457, 31.1877297173197, 1.48)
    pt3dadd(-102.498789784488, -156.84374628292, 31.1607766033671, 1.48)
    pt3dadd(-102.831785111308, -157.783729747287, 31.1439213612233, 1.48)
    pt3dadd(-103.260876104786, -158.686980690065, 31.1482403526043, 1.48)
    pt3dadd(-103.689967098265, -159.590231632843, 31.1525593439853, 1.48)
    pt3dadd(-103.627308994326, -160.560907720137, 31.2774387644443, 1.48)
    pt3dadd(-103.492523985571, -161.541473336473, 31.420001289231, 1.48)
    pt3dadd(-103.432544303457, -162.514689942902, 31.5322152993486, 1.48)
    pt3dadd(-103.789914545466, -163.446905341729, 31.47511048067, 1.48)
    pt3dadd(-104.147284787475, -164.379120740556, 31.4180056619914, 1.48)
    pt3dadd(-104.504655029484, -165.311336139383, 31.3609008433128, 1.48)
    pt3dadd(-104.814111351681, -166.251048317931, 31.3097442701774, 1.48)
    pt3dadd(-104.75105012524, -167.24904589695, 31.3048336701774, 1.48)
    pt3dadd(-104.687988898799, -168.247043475969, 31.2999230701775, 1.48)
    pt3dadd(-104.624927672358, -169.245041054987, 31.2950124701775, 1.48)
    pt3dadd(-104.561866445916, -170.243038634006, 31.2901018701775, 1.48)
    pt3dadd(-104.498805219475, -171.241036213025, 31.2851912701775, 1.48)
    pt3dadd(-104.624605996439, -172.231030207002, 31.3157457714288, 1.48)
    pt3dadd(-104.766502269842, -173.220342106794, 31.3493227356457, 1.48)
    pt3dadd(-104.908398543244, -174.209654006585, 31.3828996998626, 1.48)
    pt3dadd(-105.061222336895, -175.197133291299, 31.4119744088952, 1.48)
    pt3dadd(-105.266316571647, -176.175846488536, 31.4195131372941, 1.48)
    pt3dadd(-105.471410806398, -177.154559685773, 31.427051865693, 1.48)
    pt3dadd(-105.67650504115, -178.13327288301, 31.4345905940919, 1.48)
    pt3dadd(-105.835460169776, -179.11012919014, 31.4602674591026, 1.48)
    pt3dadd(-105.622759277332, -180.072028025255, 31.6320491850177, 1.48)
    pt3dadd(-105.410058384887, -181.03392686037, 31.8038309109327, 1.48)
    pt3dadd(-105.197357492443, -181.995825695484, 31.9756126368478, 1.48)
    pt3dadd(-104.984656599998, -182.957724530599, 32.1473943627628, 1.48)
    pt3dadd(-104.837764291221, -183.858423588989, 32.5139566107887, 1.48)
    pt3dadd(-104.737774663445, -184.715504726356, 33.0193416108691, 1.48)
    pt3dadd(-104.637785035668, -185.572585863723, 33.5247266109495, 1.48)
    pt3dadd(-104.537795407892, -186.42966700109, 34.0301116110299, 1.48)
    pt3dadd(-104.425315593037, -187.315704518522, 34.4495267315291, 1.48)
    pt3dadd(-104.27354668194, -188.292827141085, 34.5985152482004, 1.48)
    pt3dadd(-104.121777770844, -189.269949763648, 34.7475037648718, 1.48)
    pt3dadd(-103.970008859748, -190.247072386211, 34.8964922815431, 1.48)
    pt3dadd(-103.818239948651, -191.224195008774, 35.0454807982144, 1.48)
    pt3dadd(-103.692652429637, -192.207511928642, 35.1727117771457, 1.48)
    pt3dadd(-103.59173001614, -193.196664405158, 35.2794452988563, 1.48)
    pt3dadd(-103.490807602644, -194.185816881673, 35.3861788205669, 1.48)
    pt3dadd(-103.389885189147, -195.174969358189, 35.4929123422775, 1.48)
    pt3dadd(-103.344137255519, -196.163763803285, 35.6094150573064, 1.48)
    pt3dadd(-103.414716719636, -197.151803390999, 35.7465147011961, 1.48)
    pt3dadd(-103.485296183754, -198.139842978713, 35.8836143450859, 1.48)
    pt3dadd(-103.555875647871, -199.127882566427, 36.0207139889757, 1.48)
    pt3dadd(-103.626455111988, -200.115922154141, 36.1578136328655, 1.48)
    pt3dadd(-103.740143499729, -201.098173053623, 36.3060747692639, 1.48)
    pt3dadd(-103.859748507756, -202.079629466317, 36.4558677999307, 1.48)
    pt3dadd(-103.979353515783, -203.061085879011, 36.6056608305974, 1.48)
    pt3dadd(-104.017473145668, -204.010362005629, 36.8965389176336, 1.48)
    pt3dadd(-104.01774116991, -204.944689738734, 37.252953865852, 1.48)
    pt3dadd(-104.018009194152, -205.879017471839, 37.6093688140703, 1.48)
    pt3dadd(-104.018277218395, -206.813345204944, 37.9657837622886, 1.48)
    pt3dadd(-103.990350647639, -207.724899448515, 38.3681931627685, 1.48)
    pt3dadd(-103.910166335871, -208.594243789154, 38.855851745738, 1.48)
    pt3dadd(-103.829982024103, -209.463588129794, 39.3435103287076, 1.48)
    pt3dadd(-103.749797712336, -210.332932470434, 39.831168911677, 1.48)
    pt3dadd(-103.669613400568, -211.202276811074, 40.3188274946466, 1.48)
    pt3dadd(-103.453447669618, -212.104719910436, 40.5984106175346, 1.48)
    pt3dadd(-103.106014238912, -213.039114418661, 40.6771310991547, 1.48)
    pt3dadd(-102.758580808206, -213.973508926886, 40.7558515807748, 1.48)
    pt3dadd(-102.4111473775, -214.907903435111, 40.834572062395, 1.48)
    pt3dadd(-102.084019446168, -215.846627191002, 40.9179893444286, 1.48)
    pt3dadd(-101.973185519229, -216.831466055732, 41.0514369040035, 1.48)
    pt3dadd(-101.86235159229, -217.816304920463, 41.1848844635784, 1.48)
    pt3dadd(-101.751517665351, -218.801143785193, 41.3183320231533, 1.48)
    pt3dadd(-101.638915363063, -219.704971433879, 41.6851736415268, 1.48)
    pt3dadd(-101.525274624786, -220.561227189959, 42.1890703202072, 1.48)
    pt3dadd(-101.41163388651, -221.417482946038, 42.6929669988876, 1.48)
    pt3dadd(-101.297993148233, -222.273738702117, 43.196863677568, 1.48)
    pt3dadd(-101.076224249778, -223.169259187633, 43.5378319712229, 1.48)
    pt3dadd(-100.765835394422, -224.096960361554, 43.7452669981039, 1.48)
    pt3dadd(-100.455446539066, -225.024661535474, 43.952702024985, 1.48)
    pt3dadd(-100.14505768371, -225.952362709395, 44.160137051866, 1.48)
    pt3dadd(-99.9640076856534, -226.895208911097, 44.3821582165564, 1.48)
    pt3dadd(-100.001164579134, -227.863606207831, 44.6287875760105, 1.48)
    pt3dadd(-100.038321472615, -228.832003504565, 44.8754169354646, 1.48)
    pt3dadd(-99.7579874486388, -229.659784577785, 44.984900929187, 1.48)
    pt3dadd(-98.9669505472157, -230.261376157021, 44.8737785084998, 1.48)
    pt3dadd(-98.1759136457926, -230.862967736257, 44.7626560878126, 1.48)
    pt3dadd(-97.3848767443695, -231.464559315493, 44.6515336671255, 1.48)
    pt3dadd(-96.5938398429464, -232.066150894729, 44.5404112464383, 1.48)
    pt3dadd(-96.4275252233293, -233.015711100516, 44.6465578289195, 1.48)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(-96.4275252233293, -233.015711100516, 44.6465578289195, 1.48)
    pt3dadd(-96.3276546063579, -234.002280436625, 44.7758126350733, 1.48)
    pt3dadd(-96.2277839893865, -234.988849772735, 44.9050674412271, 1.48)
    pt3dadd(-96.127913372415, -235.975419108845, 45.034322247381, 1.48)
    pt3dadd(-96.6742483256542, -236.787411115965, 44.8913188462179, 1.48)
    pt3dadd(-97.2474831225899, -237.592135926578, 44.736982049678, 1.48)
    pt3dadd(-97.8207179195256, -238.39686073719, 44.5826452531381, 1.48)
    pt3dadd(-98.3939527164613, -239.201585547803, 44.4283084565982, 1.48)
    pt3dadd(-98.579051179614, -240.092531198352, 44.0710863301729, 1.48)
    pt3dadd(-98.6777611469566, -241.002667241609, 43.6687074973401, 1.48)
    pt3dadd(-98.7764711142992, -241.912803284866, 43.2663286645072, 1.48)
    pt3dadd(-98.8751810816418, -242.822939328123, 42.8639498316744, 1.48)
    pt3dadd(-98.9540134643562, -243.738339567139, 42.666083992132, 1.48)
    pt3dadd(-98.9779501210209, -244.668277882773, 43.0330196344232, 1.48)
  }
}
proc shape3d_9() {
  adendOML[8] {
    pt3dadd(-99.0018867776857, -245.598216198407, 43.3999552767143, 1.48)
    pt3dadd(-99.0258234343504, -246.528154514041, 43.7668909190054, 1.48)
    pt3dadd(-99.0497600910151, -247.458092829675, 44.1338265612966, 1.48)
    pt3dadd(-99.0180317632858, -248.414143608761, 44.3914320868662, 1.48)
    pt3dadd(-98.9204982716003, -249.401063613044, 44.5197914384805, 1.48)
    pt3dadd(-98.8229647799147, -250.387983617326, 44.6481507900947, 1.48)
    pt3dadd(-98.7254312882291, -251.374903621609, 44.7765101417089, 1.48)
    pt3dadd(-98.8617051428416, -252.323363729492, 44.734598460395, 1.48)
    pt3dadd(-99.2179425700641, -253.235641158138, 44.5324975236626, 1.48)
    pt3dadd(-99.5741799972866, -254.147918586784, 44.3303965869302, 1.48)
    pt3dadd(-99.9304174245091, -255.060196015431, 44.1282956501978, 1.48)
    pt3dadd(-100.286654851732, -255.972473444077, 43.9261947134654, 1.48)
    pt3dadd(-100.603022219373, -256.90846544841, 43.8108692526144, 1.48)
    pt3dadd(-100.876024576731, -257.870250813208, 43.7899258780606, 1.48)
    pt3dadd(-101.149026934088, -258.832036178006, 43.7689825035068, 1.48)
    pt3dadd(-101.422029291445, -259.793821542804, 43.748039128953, 1.48)
    pt3dadd(-101.61516799775, -260.720416168521, 43.5612946322573, 1.48)
    pt3dadd(-101.650778932073, -261.577598506556, 43.0475142309996, 1.48)
    pt3dadd(-101.686389866395, -262.434780844592, 42.533733829742, 1.48)
    pt3dadd(-101.722000800717, -263.291963182627, 42.0199534284844, 1.48)
    pt3dadd(-102.059884057342, -264.132417536792, 42.0025041789461, 1.48)
    pt3dadd(-102.557999028808, -264.964004544053, 42.2481554043797, 1.48)
    pt3dadd(-103.056114000274, -265.795591551313, 42.4938066298134, 1.48)
    pt3dadd(-103.55422897174, -266.627178558574, 42.7394578552471, 1.48)
    pt3dadd(-104.052343943206, -267.458765565834, 42.9851090806808, 1.48)
    pt3dadd(-104.550458914671, -268.290352573095, 43.2307603061144, 1.48)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(-75.8689039474739, -47.4026567436738, 20.3181710062171, 1.48)
    pt3dadd(-76.0973873708451, -48.3286704351618, 20.5323134603176, 1.48)
    pt3dadd(-76.2620792879909, -49.2520972451849, 20.8789537622984, 1.48)
    pt3dadd(-76.4267712051367, -50.1755240552081, 21.2255940642793, 1.48)
    pt3dadd(-76.5914631222825, -51.0989508652312, 21.5722343662601, 1.48)
    pt3dadd(-76.7561550394283, -52.0223776752543, 21.918874668241, 1.48)
    pt3dadd(-76.8810131635684, -52.7927978531601, 21.3709562991038, 1.48)
    pt3dadd(-77.001495699209, -53.5464108427638, 20.7247741107807, 1.48)
    pt3dadd(-77.1219782348496, -54.3000238323676, 20.0785919224576, 1.48)
    pt3dadd(-77.2424607704902, -55.0536368219714, 19.4324097341344, 1.48)
    pt3dadd(-77.3629433061309, -55.8072498115752, 18.7862275458113, 1.48)
    pt3dadd(-77.4660283651527, -56.6949310087397, 18.3499316673552, 1.48)
    pt3dadd(-77.566031503616, -57.6063620619428, 17.9508166368758, 1.48)
    pt3dadd(-77.6660346420793, -58.5177931151459, 17.5517016063965, 1.48)
    pt3dadd(-77.7660377805426, -59.429224168349, 17.1525865759171, 1.48)
    pt3dadd(-77.8660409190059, -60.3406552215522, 16.7534715454378, 1.48)
    pt3dadd(-77.9077717007458, -61.2536028886991, 16.3720829086552, 1.48)
    pt3dadd(-77.6461031357044, -62.1744469188172, 16.0829880552506, 1.48)
    pt3dadd(-77.3844345706629, -63.0952909489353, 15.7938932018461, 1.48)
    pt3dadd(-77.1227660056215, -64.0161349790534, 15.5047983484416, 1.48)
    pt3dadd(-76.8705973398311, -64.9425034471508, 15.2259634595307, 1.48)
    pt3dadd(-76.6395913164797, -65.8811785410916, 14.969984387748, 1.48)
    pt3dadd(-76.4085852931283, -66.8198536350323, 14.7140053159652, 1.48)
    pt3dadd(-76.177579269777, -67.758528728973, 14.4580262441824, 1.48)
    pt3dadd(-75.9465732464256, -68.6972038229137, 14.2020471723997, 1.48)
    pt3dadd(-75.7442787115646, -69.6282247575869, 13.9033177016257, 1.48)
    pt3dadd(-75.5741606129053, -70.5506678169809, 13.5566786462895, 1.48)
    pt3dadd(-75.404042514246, -71.4731108763749, 13.2100395909533, 1.48)
    pt3dadd(-75.2339244155867, -72.3955539357689, 12.8634005356171, 1.48)
    pt3dadd(-75.0638063169274, -73.3179969951629, 12.5167614802809, 1.48)
    pt3dadd(-74.8952758965752, -74.2438060019643, 12.1800081365617, 1.48)
    pt3dadd(-74.7420045577166, -75.2019649284971, 11.9382657774479, 1.48)
    pt3dadd(-74.588733218858, -76.16012385503, 11.6965234183341, 1.48)
    pt3dadd(-74.4354618799995, -77.1182827815628, 11.4547810592203, 1.48)
    pt3dadd(-74.2821905411409, -78.0764417080957, 11.2130387001065, 1.48)
    pt3dadd(-74.1289192022823, -79.0346006346285, 10.9712963409927, 1.48)
    pt3dadd(-73.9726801334831, -79.9921796138266, 10.7298929749684, 1.48)
    pt3dadd(-73.7022450636064, -80.9274426586919, 10.5015338063545, 1.48)
    pt3dadd(-73.4318099937297, -81.8627057035572, 10.2731746377406, 1.48)
    pt3dadd(-73.161374923853, -82.7979687484225, 10.0448154691267, 1.48)
    pt3dadd(-72.8909398539763, -83.7332317932879, 9.8164563005128, 1.48)
    pt3dadd(-72.6205047840996, -84.6684948381532, 9.58809713189891, 1.48)
    pt3dadd(-72.4239944629639, -85.6199704203659, 9.37271030744054, 1.48)
    pt3dadd(-72.3489337730527, -86.5980812866425, 9.17863551231794, 1.48)
    pt3dadd(-72.2738730831415, -87.576192152919, 8.98456071719532, 1.48)
    pt3dadd(-72.1988123932302, -88.5543030191954, 8.7904859220727, 1.48)
    pt3dadd(-72.123751703319, -89.532413885472, 8.59641112695009, 1.48)
    pt3dadd(-72.0486910134078, -90.5105247517484, 8.40233633182748, 1.48)
    pt3dadd(-71.9952853565986, -91.4960770776812, 8.45069404745182, 1.48)
    pt3dadd(-71.9504602187697, -92.4845779830744, 8.59511242251315, 1.48)
    pt3dadd(-71.9056350809408, -93.4730788884677, 8.73953079757446, 1.48)
    pt3dadd(-71.8608099431118, -94.4615797938609, 8.88394917263578, 1.48)
    pt3dadd(-71.8159848052829, -95.4500806992542, 9.0283675476971, 1.48)
    pt3dadd(-71.7114757292762, -96.413497456341, 8.97051449659125, 1.48)
    pt3dadd(-71.5308034635665, -97.3449041148262, 8.65454112914939, 1.48)
    pt3dadd(-71.3501311978569, -98.2763107733116, 8.33856776170752, 1.48)
    pt3dadd(-71.1694589321472, -99.2077174317969, 8.02259439426567, 1.48)
    pt3dadd(-70.9887866664375, -100.139124090282, 7.7066210268238, 1.48)
    pt3dadd(-70.8081144007279, -101.070530748767, 7.39064765938193, 1.48)
    pt3dadd(-70.6889686491983, -101.988038756384, 7.01542400466708, 1.48)
    pt3dadd(-70.5960341875371, -102.899625714002, 6.61495876955086, 1.48)
    pt3dadd(-70.5030997258758, -103.81121267162, 6.21449353443465, 1.48)
    pt3dadd(-70.4101652642146, -104.722799629238, 5.81402829931843, 1.48)
    pt3dadd(-70.3172308025533, -105.634386586856, 5.41356306420223, 1.48)
    pt3dadd(-70.2242963408921, -106.545973544474, 5.013097829086, 1.48)
    pt3dadd(-70.1902053176307, -107.496364168236, 4.71131252889289, 1.48)
    pt3dadd(-70.1742046529968, -108.458684282453, 4.43986460293615, 1.48)
    pt3dadd(-70.1582039883629, -109.421004396669, 4.16841667697945, 1.48)
    pt3dadd(-70.142203323729, -110.383324510885, 3.89696875102273, 1.48)
    pt3dadd(-70.1270916859986, -111.345779703448, 3.62726564863562, 1.48)
    pt3dadd(-70.2762349308664, -112.333191708725, 3.67993275738469, 1.48)
    pt3dadd(-70.4253781757341, -113.320603714003, 3.73259986613375, 1.48)
    pt3dadd(-70.5745214206019, -114.30801571928, 3.78526697488282, 1.48)
    pt3dadd(-70.7236646654697, -115.295427724558, 3.8379340836319, 1.48)
    pt3dadd(-70.8728079103374, -116.282839729836, 3.89060119238095, 1.48)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-70.8728079103374, -116.282839729836, 3.89060119238095, 1.48)
    pt3dadd(-71.0219511552052, -117.270251735113, 3.94326830113003, 1.48)
    pt3dadd(-71.1504480563484, -118.254772891896, 4.02854489109187, 1.48)
    pt3dadd(-71.1833693377359, -119.225911793679, 4.26477660504107, 1.48)
    pt3dadd(-71.2162906191234, -120.197050695462, 4.5010083189903, 1.48)
    pt3dadd(-71.2492119005109, -121.168189597245, 4.73724003293951, 1.48)
    pt3dadd(-71.2821331818985, -122.139328499028, 4.97347174688871, 1.48)
    pt3dadd(-71.315054463286, -123.110467400811, 5.20970346083791, 1.48)
    pt3dadd(-71.1887994309946, -124.09055355002, 5.35703024329343, 1.48)
    pt3dadd(-71.0540144222397, -125.071119166356, 5.4995927680802, 1.48)
    pt3dadd(-70.9385282102226, -126.042999649395, 5.68507449869751, 1.48)
    pt3dadd(-70.8880006824042, -126.985646453321, 6.01501990627322, 1.48)
    pt3dadd(-70.8374731545859, -127.928293257248, 6.3449653138489, 1.48)
    pt3dadd(-70.7869456267675, -128.870940061174, 6.67491072142458, 1.48)
    pt3dadd(-70.7364180989492, -129.8135868651, 7.00485612900029, 1.48)
    pt3dadd(-70.6858905711308, -130.756233669026, 7.33480153657596, 1.48)
    pt3dadd(-70.623053481186, -131.720642817821, 7.53856244983973, 1.48)
    pt3dadd(-70.5420298843894, -132.717204290964, 7.55589470326615, 1.48)
    pt3dadd(-70.4610062875927, -133.713765764108, 7.57322695669256, 1.48)
    pt3dadd(-70.3799826907961, -134.710327237251, 7.59055921011895, 1.48)
    pt3dadd(-70.2989590939994, -135.706888710394, 7.60789146354539, 1.48)
    pt3dadd(-70.217661522516, -136.702113649987, 7.64386652072282, 1.48)
    pt3dadd(-70.1350907233545, -137.691127389822, 7.76647926697363, 1.48)
    pt3dadd(-70.052519924193, -138.680141129657, 7.88909201322443, 1.48)
    pt3dadd(-69.9699491250316, -139.669154869492, 8.01170475947523, 1.48)
    pt3dadd(-69.8873783258701, -140.658168609328, 8.13431750572605, 1.48)
    pt3dadd(-69.8722268038745, -141.624725436347, 8.32645168847856, 1.48)
    pt3dadd(-70.0523344914747, -142.526242719326, 8.71993333907592, 1.48)
    pt3dadd(-70.2324421790748, -143.427760002306, 9.11341498967327, 1.48)
    pt3dadd(-70.412549866675, -144.329277285285, 9.50689664027062, 1.48)
    pt3dadd(-70.5890651131118, -145.233338223862, 9.89276722234728, 1.48)
    pt3dadd(-70.6438212685791, -146.223611623315, 10.0206748365575, 1.48)
    pt3dadd(-70.6985774240465, -147.213885022769, 10.1485824507677, 1.48)
    pt3dadd(-70.7533335795138, -148.204158422223, 10.2764900649778, 1.48)
    pt3dadd(-70.8080897349811, -149.194431821676, 10.404397679188, 1.48)
    pt3dadd(-70.8628458904484, -150.18470522113, 10.5323052933982, 1.48)
    pt3dadd(-70.980352282715, -151.157839969088, 10.4495785396585, 1.48)
    pt3dadd(-71.1396386060178, -152.119563577996, 10.2266086599049, 1.48)
    pt3dadd(-71.2989249293207, -153.081287186904, 10.0036387801513, 1.48)
    pt3dadd(-71.4582112526236, -154.043010795813, 9.78066890039774, 1.48)
    pt3dadd(-71.6174975759264, -155.004734404721, 9.55769902064417, 1.48)
    pt3dadd(-71.7767838992293, -155.966458013629, 9.3347291408906, 1.48)
    pt3dadd(-71.9255326016263, -156.874230416615, 9.62352851593217, 1.48)
    pt3dadd(-72.0714804148861, -157.767662642823, 10.0483556489847, 1.48)
    pt3dadd(-72.2174282281458, -158.661094869031, 10.4731827820372, 1.48)
    pt3dadd(-72.3633760414055, -159.554527095239, 10.8980099150898, 1.48)
    pt3dadd(-72.511578669418, -160.458288500087, 11.2779857081777, 1.48)
    pt3dadd(-72.6776948856408, -161.44411103766, 11.3016358058621, 1.48)
    pt3dadd(-72.8438111018636, -162.429933575234, 11.3252859035466, 1.48)
    pt3dadd(-73.0099273180863, -163.415756112807, 11.3489360012311, 1.48)
    pt3dadd(-73.2790990305297, -164.289595159915, 11.7197282924373, 1.48)
    pt3dadd(-73.5672544685564, -165.142805866654, 12.1544672180477, 1.48)
    pt3dadd(-73.8554099065829, -165.996016573393, 12.5892061436581, 1.48)
    pt3dadd(-74.1435653446096, -166.849227280133, 13.0239450692685, 1.48)
    pt3dadd(-74.1335230302442, -167.786339239229, 13.2651803005503, 1.48)
    pt3dadd(-73.9814824544275, -168.763403987616, 13.4142713491256, 1.48)
    pt3dadd(-73.8294418786109, -169.740468736002, 13.563362397701, 1.48)
    pt3dadd(-73.6774013027942, -170.717533484389, 13.7124534462764, 1.48)
    pt3dadd(-73.5253607269775, -171.694598232776, 13.8615444948517, 1.48)
    pt3dadd(-73.7628962135064, -172.326480981195, 14.5826788125192, 1.48)
    pt3dadd(-74.0162363373432, -172.944360106594, 15.3270202449619, 1.48)
    pt3dadd(-74.26957646118, -173.562239231992, 16.0713616774045, 1.48)
    pt3dadd(-74.5229165850168, -174.180118357391, 16.8157031098472, 1.48)
    pt3dadd(-74.7762567088536, -174.79799748279, 17.5600445422898, 1.48)
    pt3dadd(-74.8972640982265, -175.676233596048, 18.0068915483805, 1.48)
    pt3dadd(-75.0073176868923, -176.576020677547, 18.429113546374, 1.48)
    pt3dadd(-75.1173712755582, -177.475807759045, 18.8513355443676, 1.48)
    pt3dadd(-75.2274248642241, -178.375594840544, 19.2735575423611, 1.48)
    pt3dadd(-75.3223479554332, -179.257827294016, 19.7338140856987, 1.48)
    pt3dadd(-75.4110210735908, -180.132808435863, 20.2097816051032, 1.48)
    pt3dadd(-75.4996941917483, -181.00778957771, 20.6857491245076, 1.48)
    pt3dadd(-75.5883673099059, -181.882770719558, 21.1617166439121, 1.48)
    pt3dadd(-75.6830330342591, -182.761372840196, 21.6266936819284, 1.48)
    pt3dadd(-75.8797932306216, -183.701664634046, 21.9044287491173, 1.48)
    pt3dadd(-76.0765534269841, -184.641956427896, 22.1821638163062, 1.48)
    pt3dadd(-76.2733136233466, -185.582248221745, 22.4598988834951, 1.48)
    pt3dadd(-76.4700738197091, -186.522540015595, 22.737633950684, 1.48)
    pt3dadd(-76.6631104845375, -187.455189603388, 23.038107881488, 1.48)
    pt3dadd(-76.8396120717143, -188.353902464868, 23.4395582300155, 1.48)
    pt3dadd(-77.0161136588911, -189.252615326349, 23.8410085785431, 1.48)
    pt3dadd(-77.1926152460679, -190.15132818783, 24.2424589270707, 1.48)
    pt3dadd(-77.3691168332447, -191.050041049311, 24.6439092755982, 1.48)
    pt3dadd(-77.5346836412696, -191.982646138795, 24.9333332053712, 1.48)
    pt3dadd(-77.6851603812414, -192.962022728638, 25.068159931191, 1.48)
    pt3dadd(-77.8356371212132, -193.941399318481, 25.2029866570108, 1.48)
    pt3dadd(-77.986113861185, -194.920775908323, 25.3378133828306, 1.48)
    pt3dadd(-78.1365906011568, -195.900152498166, 25.4726401086503, 1.48)
    pt3dadd(-78.0610638308792, -196.886775432029, 25.6007157789742, 1.48)
    pt3dadd(-77.965807485099, -197.874030954701, 25.7282020980132, 1.48)
    pt3dadd(-77.8705511393188, -198.861286477373, 25.8556884170523, 1.48)
    pt3dadd(-77.7752947935387, -199.848542000045, 25.9831747360913, 1.48)
    pt3dadd(-77.9655535026694, -200.561211761974, 26.5520527684623, 1.48)
    pt3dadd(-78.2631869070707, -201.170617048428, 27.2869266035022, 1.48)
    pt3dadd(-78.560820311472, -201.780022334882, 28.0218004385422, 1.48)
    pt3dadd(-78.8584537158733, -202.389427621336, 28.7566742735822, 1.48)
    pt3dadd(-79.1560871202746, -202.99883290779, 29.4915481086221, 1.48)
    pt3dadd(-79.453720524676, -203.608238194244, 30.2264219436621, 1.48)
    pt3dadd(-79.7513539290773, -204.217643480698, 30.961295778702, 1.48)
    pt3dadd(-80.0395550739637, -204.836329711982, 31.6812209045314, 1.48)
    pt3dadd(-79.9520616922742, -205.824683483521, 31.8057268499532, 1.48)
    pt3dadd(-79.8645683105849, -206.81303725506, 31.930232795375, 1.48)
    pt3dadd(-79.7770749288955, -207.801391026599, 32.0547387407969, 1.48)
    pt3dadd(-79.6895815472061, -208.789744798137, 32.1792446862187, 1.48)
    pt3dadd(-79.647693437217, -209.781562977648, 32.2639414360352, 1.48)
    pt3dadd(-79.6972058480166, -210.78032440475, 32.2688539619047, 1.48)
    pt3dadd(-79.7467182588161, -211.779085831852, 32.2737664877743, 1.48)
    pt3dadd(-79.814566723867, -212.765681605624, 32.3113396987918, 1.48)
    pt3dadd(-80.126121461613, -213.59058250288, 32.7830092389305, 1.48)
    pt3dadd(-80.4376761993589, -214.415483400135, 33.2546787790692, 1.48)
    pt3dadd(-80.7492309371049, -215.240384297391, 33.7263483192079, 1.48)
    pt3dadd(-81.0607856748509, -216.065285194647, 34.1980178593466, 1.48)
    pt3dadd(-81.3723404125969, -216.890186091903, 34.6696873994853, 1.48)
    pt3dadd(-81.6864795980128, -217.720090407967, 35.1277849743412, 1.48)
    pt3dadd(-82.0332010357604, -218.613073058346, 35.4147801497869, 1.48)
    pt3dadd(-82.379922473508, -219.506055708724, 35.7017753252327, 1.48)
    pt3dadd(-82.7266439112556, -220.399038359103, 35.9887705006785, 1.48)
    pt3dadd(-83.0733653490032, -221.292021009481, 36.2757656761243, 1.48)
    pt3dadd(-83.4046573721286, -222.177889287936, 36.5930637634027, 1.48)
    pt3dadd(-83.6745242040597, -223.035434932881, 37.0309991009356, 1.48)
    pt3dadd(-83.9443910359908, -223.892980577825, 37.4689344384685, 1.48)
    pt3dadd(-84.2142578679219, -224.75052622277, 37.9068697760014, 1.48)
    pt3dadd(-84.3239850216184, -225.699149104123, 38.0508829433653, 1.48)
    pt3dadd(-84.3441005290213, -226.698737375093, 38.0304218852196, 1.48)
    pt3dadd(-84.3642160364242, -227.698325646064, 38.0099608270739, 1.48)
    pt3dadd(-84.3843315438271, -228.697913917034, 37.9894997689282, 1.48)
    pt3dadd(-84.7133086959264, -229.296441270649, 38.5044313579493, 1.48)
    pt3dadd(-85.1949753003037, -229.69669935758, 39.2840407127382, 1.48)
    pt3dadd(-85.676641904681, -230.096957444511, 40.0636500675271, 1.48)
    pt3dadd(-86.1583085090583, -230.497215531441, 40.843259422316, 1.48)
    pt3dadd(-86.6399751134356, -230.897473618371, 41.6228687771049, 1.48)
    pt3dadd(-86.8154784282597, -231.493261406694, 42.1895464867338, 1.48)
    pt3dadd(-86.4848554446978, -232.4122843031, 42.4042214937157, 1.48)
    pt3dadd(-86.1542324611359, -233.331307199505, 42.6188965006975, 1.48)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(-86.1542324611359, -233.331307199505, 42.6188965006975, 1.48)
    pt3dadd(-85.823609477574, -234.250330095911, 42.8335715076794, 1.48)
    pt3dadd(-85.4929864940121, -235.169352992317, 43.0482465146613, 1.48)
    pt3dadd(-85.3268071731407, -236.120453286977, 43.2082298593654, 1.48)
    pt3dadd(-85.3840270106928, -237.115131203647, 43.2939137684711, 1.48)
    pt3dadd(-85.441246848245, -238.109809120317, 43.3795976775768, 1.48)
    pt3dadd(-85.4984666857972, -239.104487036987, 43.4652815866826, 1.48)
    pt3dadd(-85.5830980182317, -240.079569639259, 43.6179026459092, 1.48)
    pt3dadd(-85.7592886281312, -240.989200399677, 43.9941057143239, 1.48)
    pt3dadd(-85.9354792380308, -241.898831160095, 44.3703087827386, 1.48)
    pt3dadd(-86.1116698479304, -242.808461920513, 44.7465118511533, 1.48)
    pt3dadd(-86.2853339213625, -243.720720334702, 45.1154666855408, 1.48)
    pt3dadd(-86.4015119880995, -244.6927654665, 45.3195032473567, 1.48)
    pt3dadd(-86.5176900548366, -245.664810598298, 45.5235398091725, 1.48)
    pt3dadd(-86.6338681215737, -246.636855730095, 45.7275763709884, 1.48)
  }
}
proc shape3d_10() {
  adendOML[9] {
    pt3dadd(-86.7500461883107, -247.608900861893, 45.9316129328043, 1.48)
    pt3dadd(-86.8662242550478, -248.580945993691, 46.1356494946202, 1.48)
    pt3dadd(-87.0316217873296, -249.413748259497, 46.6327889346009, 1.48)
    pt3dadd(-87.2116116631712, -250.2052684895, 47.2168260653469, 1.48)
    pt3dadd(-87.3916015390128, -250.996788719503, 47.8008631960929, 1.48)
    pt3dadd(-87.5715914148544, -251.788308949507, 48.384900326839, 1.48)
    pt3dadd(-87.751581290696, -252.57982917951, 48.9689374575849, 1.48)
    pt3dadd(-87.8209188641543, -253.402113908637, 49.3856691268184, 1.48)
    pt3dadd(-87.4996427069261, -254.333000406699, 49.2117957288451, 1.48)
    pt3dadd(-87.1783665496978, -255.263886904761, 49.0379223308719, 1.48)
    pt3dadd(-86.8570903924696, -256.194773402823, 48.8640489328987, 1.48)
    pt3dadd(-86.5358142352414, -257.125659900885, 48.6901755349255, 1.48)
    pt3dadd(-86.2145380780132, -258.056546398947, 48.5163021369522, 1.48)
    pt3dadd(-86.0923844072309, -258.855663252699, 49.0209191569141, 1.48)
    pt3dadd(-86.0055829056996, -259.631385748281, 49.6459952396276, 1.48)
    pt3dadd(-85.9187814041683, -260.407108243863, 50.271071322341, 1.48)
    pt3dadd(-85.8319799026371, -261.182830739444, 50.8961474050544, 1.48)
    pt3dadd(-85.7451784011058, -261.958553235026, 51.5212234877678, 1.48)
    pt3dadd(-85.5518081836099, -262.89197301717, 51.7623646618159, 1.48)
    pt3dadd(-85.3391785498597, -263.853892323369, 51.9341199738534, 1.48)
    pt3dadd(-85.1265489161094, -264.815811629568, 52.1058752858909, 1.48)
    pt3dadd(-84.9139192823592, -265.777730935767, 52.2776305979283, 1.48)
    pt3dadd(-84.7135554398551, -266.74183782661, 52.4458188433316, 1.48)
    pt3dadd(-84.6639914896076, -267.732839641887, 52.5701523342143, 1.48)
    pt3dadd(-84.6144275393601, -268.723841457163, 52.6944858250969, 1.48)
    pt3dadd(-84.5648635891126, -269.714843272439, 52.8188193159795, 1.48)
    pt3dadd(-84.5152996388652, -270.705845087715, 52.9431528068621, 1.48)
    pt3dadd(-84.4657356886176, -271.696846902992, 53.0674862977447, 1.48)
    pt3dadd(-84.6614829663944, -272.673811719317, 53.0798685830214, 1.48)
    pt3dadd(-84.8810166252414, -273.649415450751, 53.08139562103, 1.48)
    pt3dadd(-85.1005502840883, -274.625019182185, 53.0829226590388, 1.48)
    pt3dadd(-85.3381172637433, -275.594177038234, 53.0767089302477, 1.48)
    pt3dadd(-85.7555810796331, -276.499032118274, 52.9932748451997, 1.48)
    pt3dadd(-86.1730448955229, -277.403887198315, 52.9098407601516, 1.48)
    pt3dadd(-86.4389716246962, -278.33627683764, 52.8362700606083, 1.48)
    pt3dadd(-86.35804037384, -279.331691191387, 52.7852759728147, 1.48)
    pt3dadd(-86.2771091229837, -280.327105545133, 52.7342818850211, 1.48)
    pt3dadd(-86.1961778721275, -281.32251989888, 52.6832877972274, 1.48)
    pt3dadd(-86.1009566916137, -282.316816005592, 52.6426722997344, 1.48)
    pt3dadd(-85.975685219783, -283.30876055075, 52.6238819385062, 1.48)
    pt3dadd(-85.8504137479523, -284.300705095909, 52.6050915772779, 1.48)
    pt3dadd(-85.710237264364, -285.287673056871, 52.6112719805663, 1.48)
    pt3dadd(-85.4637848664437, -286.239156910586, 52.795499263236, 1.48)
    pt3dadd(-85.2173324685233, -287.190640764301, 52.9797265459056, 1.48)
    pt3dadd(-84.970880070603, -288.142124618015, 53.1639538285753, 1.48)
    pt3dadd(-84.7244276726826, -289.09360847173, 53.3481811112449, 1.48)
  }
  GCL[7] {pt3dclear()
    pt3dadd(-10.6695538998557, 102.676209583385, -10.525627833794, 1.97)
    pt3dadd(-10.1440365464976, 101.948867161323, -10.7773237055248, 1.97)
    pt3dadd(-9.47150434935711, 101.27820240825, -11.0902282161912, 1.97)
    pt3dadd(-8.79897215221664, 100.607537655177, -11.4031327268575, 1.97)
    pt3dadd(-8.12643995507617, 99.9368729021047, -11.7160372375239, 1.97)
    pt3dadd(-7.52262542647205, 99.1694207333039, -11.7611811393949, 1.97)
    pt3dadd(-6.95436678812571, 98.3518888280209, -11.6677803696484, 1.97)
    pt3dadd(-6.38610814977938, 97.534356922738, -11.5743795999019, 1.97)
    pt3dadd(-5.81784951143304, 96.7168250174551, -11.4809788301554, 1.97)
    pt3dadd(-5.16112875821537, 96.006885939063, -11.6896146734361, 1.97)
    pt3dadd(-4.48747534358532, 95.3175413593532, -11.9560637818638, 1.97)
    pt3dadd(-3.81382192895527, 94.6281967796433, -12.2225128902916, 1.97)
    pt3dadd(-3.14016851432522, 93.9388521999335, -12.4889619987193, 1.97)
    pt3dadd(-2.92814602705308, 93.007139856125, -12.4274113243841, 1.97)
    pt3dadd(-2.81731210011407, 92.0223009913949, -12.2939637648092, 1.97)
    pt3dadd(-2.70647817317505, 91.0374621266648, -12.1605162052344, 1.97)
    pt3dadd(-2.62796216014316, 90.0489844164437, -12.0395609934501, 1.97)
    pt3dadd(-2.60581160255419, 89.0541602203701, -11.9403936011023, 1.97)
    pt3dadd(-2.58366104496521, 88.0593360242966, -11.8412262087545, 1.97)
    pt3dadd(-2.56151048737623, 87.064511828223, -11.7420588164067, 1.97)
    pt3dadd(-2.50094470845976, 86.0740073095901, -11.6280416713449, 1.97)
    pt3dadd(-2.39036520963722, 85.0891266850839, -11.494691268599, 1.97)
    pt3dadd(-2.27978571081467, 84.1042460605777, -11.3613408658531, 1.97)
    pt3dadd(-2.16920621199213, 83.1193654360715, -11.2279904631072, 1.97)
    pt3dadd(-2.00457856007161, 82.2668607500633, -11.7108885061742, 1.97)
    pt3dadd(-1.83820295163112, 81.4186371980351, -12.2137164714871, 1.97)
    pt3dadd(-1.67182734319064, 80.570413646007, -12.7165444368, 1.97)
    pt3dadd(-1.50545173475015, 79.7221900939788, -13.2193724021129, 1.97)
    pt3dadd(-1.35207755581136, 78.7818290696622, -13.3710662631417, 1.97)
    pt3dadd(-1.20552034681366, 77.7931580976621, -13.3386518587002, 1.97)
    pt3dadd(-1.05618795345192, 76.8055702008799, -13.3142984517057, 1.97)
    pt3dadd(-0.84008621728594, 75.8440404721385, -13.4838880161624, 1.97)
    pt3dadd(-0.623984481119965, 74.8825107433972, -13.653477580619, 1.97)
    pt3dadd(-0.407882744953991, 73.9209810146558, -13.8230671450757, 1.97)
    pt3dadd(-0.19322174852678, 72.958597443994, -13.9507989370484, 1.97)
    pt3dadd(0.0120609732539521, 71.990655920137, -13.8060639705347, 1.97)
    pt3dadd(0.21734369503468, 71.02271439628, -13.661329004021, 1.97)
    pt3dadd(0.42262641681541, 70.0547728724231, -13.5165940375073, 1.97)
    pt3dadd(0.512625217981459, 69.0699083800455, -13.4005444121292, 1.97)
    pt3dadd(0.534775775570436, 68.0750841839719, -13.3013770197814, 1.97)
    pt3dadd(0.556926333159412, 67.0802599878983, -13.2022096274336, 1.97)
    pt3dadd(0.718389047872753, 66.141213106803, -12.9396930647613, 1.97)
    pt3dadd(0.94555751299913, 65.2284732646073, -12.6001338373492, 1.97)
    pt3dadd(1.23275617295359, 64.5065528879372, -12.6685104340546, 1.97)
    pt3dadd(1.63385534691838, 64.1466908931996, -13.510899178868, 1.97)
    pt3dadd(2.03495452088318, 63.7868288984621, -14.3532879236814, 1.97)
    pt3dadd(2.43605369484797, 63.4269669037244, -15.1956766684947, 1.97)
    pt3dadd(2.83715286881277, 63.0671049089868, -16.0380654133081, 1.97)
    pt3dadd(3.23825204277757, 62.7072429142493, -16.8804541581215, 1.97)
    pt3dadd(3.63935121674236, 62.3473809195117, -17.7228429029348, 1.97)
    pt3dadd(3.87155201393661, 61.7928730773354, -18.4373397913685, 1.97)
    pt3dadd(3.84235916231268, 60.9371238066613, -18.9539063051446, 1.97)
    pt3dadd(3.81316631068875, 60.0813745359872, -19.4704728189208, 1.97)
    pt3dadd(4.21796043074476, 59.3141543237899, -19.9524203285525, 1.97)
    pt3dadd(4.65626644733514, 58.5537702077004, -20.4316946047446, 1.97)
    pt3dadd(5.09457246392552, 57.793386091611, -20.9109688809367, 1.97)
    pt3dadd(5.34419262092955, 57.0524710917818, -20.8001009481024, 1.97)
    pt3dadd(5.40896015123807, 56.3306296848973, -20.1110797943453, 1.97)
    pt3dadd(5.4737276815466, 55.6087882780128, -19.4220586405882, 1.97)
    pt3dadd(5.6109933505969, 54.7352559374984, -19.4043359964734, 1.97)
    pt3dadd(5.78122784618134, 53.7927415215204, -19.6918891084141, 1.97)
    pt3dadd(5.95146234176579, 52.8502271055425, -19.9794422203549, 1.97)
    pt3dadd(6.17581312887438, 51.9793770706881, -20.4165487379164, 1.97)
    pt3dadd(6.40056374904573, 51.1090565212842, -20.8547602165633, 1.97)
    pt3dadd(6.62531436921707, 50.2387359718802, -21.2929716952101, 1.97)
    pt3dadd(6.87695706043136, 49.4314399011543, -21.8097936365433, 1.97)
    pt3dadd(7.17272574328315, 48.7275578670291, -22.4556039556617, 1.97)
    pt3dadd(7.46849442613494, 48.0236758329038, -23.1014142747801, 1.97)
    pt3dadd(7.76426310898674, 47.3197937987786, -23.7472245938985, 1.97)
    pt3dadd(7.95946790966952, 46.5767136808208, -24.295062787147, 1.97)
    pt3dadd(7.63595224726102, 45.6314451850938, -24.3375491045017, 1.97)
    pt3dadd(7.31243658485252, 44.6861766893668, -24.3800354218564, 1.97)
    pt3dadd(7.23627418825353, 43.8867942180437, -24.7777597062674, 1.97)
    pt3dadd(7.39364521669604, 43.2251469928402, -25.5108745054547, 1.97)
    pt3dadd(7.55101624513855, 42.5634997676366, -26.243989304642, 1.97)
    pt3dadd(7.70838727358105, 41.9018525424331, -26.9771041038293, 1.97)
    pt3dadd(7.88847578532774, 41.1399511321649, -27.4030093779132, 1.97)
    pt3dadd(8.11308785794856, 40.1815634627521, -27.226820581588, 1.97)
    pt3dadd(8.33769993056938, 39.2231757933393, -27.0506317852628, 1.97)
    pt3dadd(8.52542412124708, 38.3417331438691, -27.1477881938582, 1.97)
    pt3dadd(8.63290294823733, 37.62767557546, -27.8395757990858, 1.97)
    pt3dadd(8.74038177522758, 36.9136180070509, -28.5313634043133, 1.97)
    pt3dadd(8.84786060221782, 36.1995604386418, -29.2231510095409, 1.97)
    pt3dadd(8.74403901338878, 35.2404831985998, -29.3143213295157, 1.97)
    pt3dadd(8.61248740169222, 34.2492507871114, -29.3266696036838, 1.97)
    pt3dadd(8.48093578999565, 33.258018375623, -29.3390178778519, 1.97)
    pt3dadd(8.39849152693785, 32.3004725689489, -29.4695368040777, 1.97)
    pt3dadd(8.48227655297113, 31.4569565465208, -30.0000655868214, 1.97)
    pt3dadd(8.56606157900442, 30.6134405240926, -30.5305943695652, 1.97)
    pt3dadd(8.64984660503772, 29.7699245016645, -31.061123152309, 1.97)
    pt3dadd(8.72192902027994, 28.9204919893709, -31.5827954953362, 1.97)
    pt3dadd(8.74136217279391, 28.0444415851458, -32.0646233088136, 1.97)
    pt3dadd(8.76079532530788, 27.1683911809207, -32.546451122291, 1.97)
    pt3dadd(8.78022847782185, 26.2923407766956, -33.0282789357684, 1.97)
    pt3dadd(8.79966163033582, 25.4162903724706, -33.5101067492458, 1.97)
    pt3dadd(8.61717237647678, 24.540656616007, -33.7916472508116, 1.97)
    pt3dadd(8.13338122485396, 23.6656445674732, -33.7743256881766, 1.97)
    pt3dadd(7.64959007323113, 22.7906325189394, -33.7570041255417, 1.97)
    pt3dadd(7.16579892160829, 21.9156204704055, -33.7396825629068, 1.97)
    pt3dadd(6.94984006368157, 21.144343388033, -34.0415561244652, 1.97)
    pt3dadd(7.12225823014536, 20.5234898297508, -34.8062866881552, 1.97)
    pt3dadd(7.29467639660917, 19.9026362714687, -35.5710172518452, 1.97)
    pt3dadd(7.46709456307296, 19.2817827131865, -36.3357478155352, 1.97)
    pt3dadd(7.63951272953676, 18.6609291549043, -37.1004783792252, 1.97)
    pt3dadd(7.81193089600056, 18.0400755966221, -37.8652089429152, 1.97)
    pt3dadd(7.981356545691, 17.4148100874488, -38.6202361971879, 1.97)
    pt3dadd(7.90000735359344, 16.4198202390297, -38.5621198441704, 1.97)
    pt3dadd(7.81865816149587, 15.4248303906106, -38.504003491153, 1.97)
    pt3dadd(7.75812532743997, 14.4429582143399, -38.4744977949116, 1.97)
    pt3dadd(8.15650282066855, 13.75027376278, -39.0757328766027, 1.97)
    pt3dadd(8.55488031389713, 13.0575893112202, -39.6769679582938, 1.97)
    pt3dadd(8.95325780712571, 12.3649048596603, -40.278203039985, 1.97)
    pt3dadd(9.35163530035429, 11.6722204081004, -40.8794381216761, 1.97)
    pt3dadd(9.54880713767766, 10.8826782540532, -41.4115255690215, 1.97)
    pt3dadd(9.54483636843354, 9.99630874862368, -41.8744870499637, 1.97)
    pt3dadd(9.54086559918943, 9.10993924319414, -42.337448530906, 1.97)
    pt3dadd(9.53689482994531, 8.22356973776459, -42.8004100118482, 1.97)
    pt3dadd(9.56035696566784, 7.3591704784719, -43.2861462494177, 1.97)
    pt3dadd(9.8391337881216, 6.69924560921044, -43.9838443576227, 1.97)
    pt3dadd(10.1179106105754, 6.03932073994894, -44.6815424658277, 1.97)
    pt3dadd(10.3966874330291, 5.37939587068743, -45.3792405740326, 1.97)
    pt3dadd(10.6754642554829, 4.71947100142595, -46.0769386822376, 1.97)
    pt3dadd(10.9542410779366, 4.05954613216449, -46.7746367904426, 1.97)
    pt3dadd(11.2330179003904, 3.399621262903, -47.4723348986475, 1.97)
  }
  GCL[8] {pt3dclear()
    pt3dadd(11.2330179003904, 3.399621262903, -47.4723348986475, 1.97)
    pt3dadd(11.7844032180188, 2.61271832113144, -47.4850088322589, 1.97)
    pt3dadd(12.373096389812, 1.80843778660253, -47.4039337358236, 1.97)
    pt3dadd(12.9617895616052, 1.00415725207358, -47.3228586393882, 1.97)
    pt3dadd(13.4815904621332, 0.296364392687168, -47.5762691955201, 1.97)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(13.4815904621332, 0.296364392687168, -47.5762691955201, 1.97)
    pt3dadd(13.9113381376565, -0.285303632080881, -48.2669060352158, 1.97)
    pt3dadd(14.3410858131798, -0.866971656848902, -48.9575428749114, 1.97)
    pt3dadd(14.770833488703, -1.44863968161695, -49.6481797146071, 1.97)
    pt3dadd(15.2005811642263, -2.03030770638503, -50.3388165543028, 1.97)
    pt3dadd(15.6303288397495, -2.61197573115305, -51.0294533939984, 1.97)
    pt3dadd(16.0600765152728, -3.19364375592113, -51.720090233694, 1.97)
    pt3dadd(16.4898241907961, -3.77531178068915, -52.4107270733897, 1.97)
    pt3dadd(16.9195718663193, -4.3569798054572, -53.1013639130853, 1.97)
    pt3dadd(17.0667622225718, -5.31058957578139, -53.0218350547436, 1.97)
    pt3dadd(17.1921379202266, -6.29291487263472, -52.8828460422298, 1.97)
    pt3dadd(17.3175136178814, -7.27524016948806, -52.7438570297159, 1.97)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(17.3175136178814, -7.27524016948806, -52.7438570297159, 1.86697998453609)
    pt3dadd(17.3393602220981, -8.14247505820313, -53.2238885616147, 1.86697998453609)
    pt3dadd(17.3568851049933, -9.00490560975831, -53.7297605041296, 1.75965949871578)
    pt3dadd(17.3744099878886, -9.86733616131349, -54.2356324466444, 1.65233901289546)
    pt3dadd(17.3919348707839, -10.7297667128687, -54.7415043891593, 1.54501852707515)
    pt3dadd(17.4519707494291, -11.6394555537485, -54.993194836804, 1.48)
    pt3dadd(17.577346447084, -12.6217808506019, -54.8542058242901, 1.48)
    pt3dadd(17.7027221447388, -13.6041061474552, -54.7152168117762, 1.48)
    pt3dadd(17.8775510080502, -14.5739857180724, -54.5577367107949, 1.48)
    pt3dadd(18.1190781415174, -15.5270795399967, -54.3753173850398, 1.48)
    pt3dadd(18.3606052749846, -16.4801733619209, -54.1928980592847, 1.48)
    pt3dadd(18.7785202200773, -17.2442084073917, -54.4755860786925, 1.48)
    pt3dadd(19.2971456533166, -17.9002983432227, -55.0238320600718, 1.48)
    pt3dadd(19.8157710865559, -18.5563882790538, -55.5720780414511, 1.48)
    pt3dadd(20.3343965197951, -19.2124782148849, -56.1203240228304, 1.48)
    pt3dadd(20.8867191547484, -19.8617830653611, -56.6419523854354, 1.48)
    pt3dadd(21.4612702713088, -20.5066121096178, -57.1460223390551, 1.48)
    pt3dadd(22.0358213878692, -21.1514411538744, -57.6500922926749, 1.48)
    pt3dadd(22.6103725044297, -21.7962701981311, -58.1541622462946, 1.48)
    pt3dadd(23.1849236209901, -22.4410992423878, -58.6582321999143, 1.48)
    pt3dadd(23.7376782859948, -23.1593875132387, -59.069364251332, 1.48)
    pt3dadd(24.2761691730451, -23.9257481088055, -59.4196769718065, 1.48)
    pt3dadd(24.8146600600954, -24.6921087043724, -59.7699896922809, 1.48)
    pt3dadd(25.3531509471457, -25.4584692999393, -60.1203024127553, 1.48)
    pt3dadd(25.891641834196, -26.2248298955061, -60.4706151332297, 1.48)
    pt3dadd(26.4317620372912, -26.9372444705564, -60.9112877029785, 1.48)
    pt3dadd(26.9728446347987, -27.6177945409451, -61.4053334745104, 1.48)
    pt3dadd(27.5139272323061, -28.2983446113338, -61.8993792460422, 1.48)
    pt3dadd(28.0550098298136, -28.9788946817226, -62.393425017574, 1.48)
    pt3dadd(28.596092427321, -29.6594447521113, -62.8874707891058, 1.48)
    pt3dadd(29.1371750248285, -30.3399948225, -63.3815165606377, 1.48)
    pt3dadd(29.6782576223359, -31.0205448928888, -63.8755623321695, 1.48)
    pt3dadd(30.1584549684247, -31.742916948897, -64.3708676329885, 1.48)
    pt3dadd(30.6134201452409, -32.4826209431968, -64.8666949100734, 1.48)
    pt3dadd(31.0683853220573, -33.2223249374967, -65.3625221871582, 1.48)
    pt3dadd(31.5233504988735, -33.9620289317965, -65.858349464243, 1.48)
    pt3dadd(31.9783156756898, -34.7017329260964, -66.3541767413279, 1.48)
    pt3dadd(32.4092288256552, -35.5064812628819, -66.7575432192628, 1.48)
    pt3dadd(32.8329588197854, -36.3306551412718, -67.1332962102742, 1.48)
    pt3dadd(33.2566888139157, -37.1548290196618, -67.5090492012855, 1.48)
    pt3dadd(33.6804188080459, -37.9790028980518, -67.8848021922969, 1.48)
    pt3dadd(34.107217088481, -38.8039359336418, -68.2549316895647, 1.48)
    pt3dadd(34.5585583269306, -39.6349414023216, -68.5800793444834, 1.48)
    pt3dadd(35.0098995653802, -40.4659468710013, -68.905226999402, 1.48)
    pt3dadd(35.4612408038298, -41.2969523396811, -69.2303746543207, 1.48)
    pt3dadd(35.9125820422794, -42.1279578083609, -69.5555223092393, 1.48)
    pt3dadd(36.363923280729, -42.9589632770406, -69.880669964158, 1.48)
    pt3dadd(36.9362534023664, -43.7436673839007, -70.1137662998447, 1.48)
    pt3dadd(37.5198116651341, -44.5240745817279, -70.3383199894938, 1.48)
    pt3dadd(38.1033699279017, -45.3044817795551, -70.5628736791429, 1.48)
    pt3dadd(38.6869281906694, -46.0848889773824, -70.787427368792, 1.48)
    pt3dadd(39.270486453437, -46.8652961752096, -71.011981058441, 1.48)
    pt3dadd(39.7504022436691, -47.7041491156022, -70.8759016091478, 1.48)
    pt3dadd(40.1961890594658, -48.5622479617037, -70.6210673783602, 1.48)
    pt3dadd(40.6419758752625, -49.4203468078052, -70.3662331475727, 1.48)
    pt3dadd(41.0992698531449, -50.2682299047213, -70.1987701268491, 1.48)
    pt3dadd(41.6207960077636, -51.0590894017021, -70.519007111103, 1.48)
    pt3dadd(42.1423221623822, -51.8499488986828, -70.8392440953569, 1.48)
    pt3dadd(42.6638483170008, -52.6408083956636, -71.1594810796108, 1.48)
    pt3dadd(43.1853744716195, -53.4316678926443, -71.4797180638648, 1.48)
    pt3dadd(43.7069006262382, -54.222527389625, -71.7999550481186, 1.48)
    pt3dadd(44.2334496330797, -55.0088624717897, -72.1219146255477, 1.48)
  }
}
proc shape3d_11() {
  adendIML[12] {
    pt3dadd(44.8389859406164, -55.7240484741702, -72.4709629921875, 1.48)
    pt3dadd(45.4445222481531, -56.4392344765506, -72.8200113588272, 1.48)
    pt3dadd(46.0500585556898, -57.1544204789311, -73.169059725467, 1.48)
    pt3dadd(46.6555948632265, -57.8696064813115, -73.5181080921067, 1.48)
    pt3dadd(47.2154321410826, -58.5940236278994, -73.8823790117759, 1.48)
    pt3dadd(47.222233539565, -59.4301532985832, -74.4308686787533, 1.48)
    pt3dadd(47.2290349380474, -60.2662829692669, -74.9793583457306, 1.48)
    pt3dadd(47.2358363365298, -61.1024126399507, -75.527848012708, 1.48)
    pt3dadd(47.2426377350123, -61.9385423106345, -76.0763376796854, 1.48)
    pt3dadd(47.2494391334947, -62.7746719813182, -76.6248273466627, 1.48)
    pt3dadd(47.5688612894069, -63.6184108757386, -76.9391859513716, 1.48)
    pt3dadd(48.0670239208796, -64.4665003330601, -77.1196804526301, 1.48)
    pt3dadd(48.5651865523523, -65.3145897903814, -77.3001749538887, 1.48)
    pt3dadd(49.063349183825, -66.1626792477028, -77.4806694551472, 1.48)
    pt3dadd(49.5615118152977, -67.0107687050241, -77.6611639564057, 1.48)
    pt3dadd(50.1600156362047, -67.7983357802725, -77.8045742438874, 1.48)
    pt3dadd(50.7649276664665, -68.5820376422704, -77.9456161778845, 1.48)
    pt3dadd(51.3698396967282, -69.3657395042682, -78.0866581118816, 1.48)
    pt3dadd(51.97475172699, -70.1494413662661, -78.2277000458787, 1.48)
    pt3dadd(52.5796637572517, -70.933143228264, -78.3687419798759, 1.48)
    pt3dadd(53.1845757875135, -71.7168450902619, -78.509783913873, 1.48)
    pt3dadd(53.8933319424974, -72.3956160680749, -78.6660206154828, 1.48)
    pt3dadd(54.6611403049034, -73.0147168396585, -78.830898003999, 1.48)
    pt3dadd(55.4289486673095, -73.6338176112422, -78.9957753925151, 1.48)
    pt3dadd(56.1967570297155, -74.2529183828258, -79.1606527810313, 1.48)
    pt3dadd(56.9645653921216, -74.8720191544094, -79.3255301695474, 1.48)
    pt3dadd(57.5633832819255, -75.585462133483, -79.6722905710482, 1.48)
    pt3dadd(58.1330374200835, -76.3151863423005, -80.0504396711993, 1.48)
    pt3dadd(58.7026915582416, -77.0449105511181, -80.4285887713504, 1.48)
    pt3dadd(59.2723456963996, -77.7746347599355, -80.8067378715015, 1.48)
    pt3dadd(59.8419998345576, -78.504358968753, -81.1848869716526, 1.48)
    pt3dadd(60.3940425270008, -79.2318159888702, -81.5884751897487, 1.48)
    pt3dadd(60.8880478048801, -79.9518016308489, -82.0758964252031, 1.48)
    pt3dadd(61.3820530827593, -80.6717872728277, -82.5633176606575, 1.48)
    pt3dadd(61.8760583606385, -81.3917729148065, -83.050738896112, 1.48)
    pt3dadd(62.3700636385177, -82.1117585567852, -83.5381601315664, 1.48)
    pt3dadd(62.8640689163969, -82.831744198764, -84.0255813670208, 1.48)
    pt3dadd(63.400168309608, -83.612352524051, -84.3313068125496, 1.48)
    pt3dadd(63.9469717540177, -84.4083765030655, -84.5908291006398, 1.48)
    pt3dadd(64.4937751984274, -85.20440048208, -84.8503513887299, 1.48)
    pt3dadd(65.0405786428371, -86.0004244610946, -85.1098736768201, 1.48)
    pt3dadd(65.5873820872468, -86.7964484401091, -85.3693959649102, 1.48)
    pt3dadd(66.1047152470373, -87.4908809950318, -85.8076860927034, 1.48)
    pt3dadd(66.5824118756638, -88.0486765374841, -86.4864128888588, 1.48)
    pt3dadd(67.0601085042902, -88.6064720799363, -87.1651396850142, 1.48)
    pt3dadd(67.5378051329166, -89.1642676223886, -87.8438664811696, 1.48)
    pt3dadd(68.015501761543, -89.7220631648408, -88.5225932773249, 1.48)
    pt3dadd(68.4931983901694, -90.279858707293, -89.2013200734803, 1.48)
    pt3dadd(68.9365948771362, -90.9572005054187, -89.3111074481285, 1.48)
    pt3dadd(69.3463592538642, -91.751760269853, -88.8630360963253, 1.48)
    pt3dadd(69.7561236305921, -92.5463200342874, -88.4149647445221, 1.48)
    pt3dadd(70.16588800732, -93.3408797987217, -87.9668933927189, 1.48)
    pt3dadd(70.575652384048, -94.1354395631561, -87.5188220409156, 1.48)
    pt3dadd(71.0118664806254, -94.9149337939259, -87.3308492148658, 1.48)
    pt3dadd(71.5124028287523, -95.6577906216679, -87.7754019087962, 1.48)
    pt3dadd(72.0129391768793, -96.4006474494099, -88.2199546027267, 1.48)
    pt3dadd(72.5134755250062, -97.1435042771519, -88.6645072966572, 1.48)
    pt3dadd(73.0140118731332, -97.8863611048938, -89.1090599905878, 1.48)
    pt3dadd(73.5145482212601, -98.6292179326358, -89.5536126845182, 1.48)
    pt3dadd(74.0166186519549, -99.372265388328, -89.995470342734, 1.48)
    pt3dadd(74.6088894340546, -100.126521307279, -90.2788664072781, 1.48)
    pt3dadd(75.2011602161543, -100.880777226229, -90.5622624718223, 1.48)
    pt3dadd(75.7934309982541, -101.63503314518, -90.8456585363664, 1.48)
    pt3dadd(76.3857017803538, -102.38928906413, -91.1290546009105, 1.48)
    pt3dadd(76.9779725624536, -103.14354498308, -91.4124506654546, 1.48)
    pt3dadd(77.5729180327935, -103.891588119246, -91.7060021135105, 1.48)
    pt3dadd(78.1732332197655, -104.62715844361, -92.0199415570444, 1.48)
    pt3dadd(78.7735484067373, -105.362728767974, -92.3338810005783, 1.48)
    pt3dadd(79.3738635937092, -106.098299092337, -92.6478204441122, 1.48)
    pt3dadd(79.9741787806811, -106.833869416701, -92.9617598876461, 1.48)
    pt3dadd(80.5744939676531, -107.569439741065, -93.2756993311801, 1.48)
    pt3dadd(81.174809154625, -108.305010065428, -93.5896387747139, 1.48)
    pt3dadd(81.7830614648549, -108.912806075837, -94.087038704008, 1.48)
    pt3dadd(82.3934082293115, -109.486884901415, -94.632850328234, 1.48)
    pt3dadd(83.003754993768, -110.060963726993, -95.1786619524599, 1.48)
    pt3dadd(83.6141017582246, -110.635042552571, -95.7244735766859, 1.48)
    pt3dadd(84.2244485226811, -111.209121378149, -96.2702852009119, 1.48)
    pt3dadd(84.8347952871377, -111.783200203727, -96.8160968251379, 1.48)
    pt3dadd(85.4451420515943, -112.357279029305, -97.3619084493639, 1.48)
    pt3dadd(86.0554888160508, -112.931357854884, -97.9077200735899, 1.48)
    pt3dadd(86.6658355805073, -113.505436680462, -98.4535316978159, 1.48)
    pt3dadd(86.9428400870785, -114.451167230316, -98.311281490188, 1.48)
    pt3dadd(87.2158652180482, -115.401334486795, -98.1608173330795, 1.48)
    pt3dadd(87.4888903490179, -116.351501743274, -98.010353175971, 1.48)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(87.4888903490179, -116.351501743274, -98.010353175971, 1.48)
    pt3dadd(87.7619154799875, -117.301668999753, -97.8598890188625, 1.48)
    pt3dadd(88.0349406109572, -118.251836256231, -97.709424861754, 1.48)
    pt3dadd(88.3224666178412, -119.185643024167, -97.7198811137494, 1.48)
    pt3dadd(88.6348584049841, -120.09139518937, -98.006280112623, 1.48)
    pt3dadd(88.9472501921271, -120.997147354573, -98.2926791114968, 1.48)
    pt3dadd(89.25964197927, -121.902899519776, -98.5790781103705, 1.48)
    pt3dadd(89.5720337664129, -122.808651684979, -98.8654771092442, 1.48)
    pt3dadd(89.8844255535558, -123.714403850182, -99.1518761081179, 1.48)
    pt3dadd(90.1968173406987, -124.620156015384, -99.4382751069917, 1.48)
    pt3dadd(90.5059913267184, -125.522399086515, -99.7362946426389, 1.48)
    pt3dadd(90.7834730227777, -126.390080908343, -100.148765446966, 1.48)
    pt3dadd(91.060954718837, -127.25776273017, -100.561236251293, 1.48)
    pt3dadd(91.3384364148964, -128.125444551998, -100.97370705562, 1.48)
    pt3dadd(91.6159181109557, -128.993126373825, -101.386177859947, 1.48)
    pt3dadd(91.893399807015, -129.860808195653, -101.798648664274, 1.48)
    pt3dadd(92.2022954092632, -130.689989304264, -102.25843524879, 1.48)
    pt3dadd(92.5488142137445, -131.473059620071, -102.774890085772, 1.48)
    pt3dadd(92.8953330182258, -132.256129935878, -103.291344922755, 1.48)
    pt3dadd(93.2418518227071, -133.039200251686, -103.807799759737, 1.48)
    pt3dadd(93.5883706271884, -133.822270567493, -104.324254596719, 1.48)
    pt3dadd(93.9348894316697, -134.6053408833, -104.840709433702, 1.48)
    pt3dadd(94.281408236151, -135.388411199107, -105.357164270684, 1.48)
    pt3dadd(94.6100505471016, -136.184941313595, -105.786792233949, 1.48)
    pt3dadd(94.7764768483141, -137.103609185698, -105.428530280862, 1.48)
    pt3dadd(94.9429031495266, -138.022277057802, -105.070268327775, 1.48)
    pt3dadd(95.1093294507391, -138.940944929905, -104.712006374688, 1.48)
    pt3dadd(95.2757557519515, -139.859612802009, -104.353744421601, 1.48)
    pt3dadd(95.442182053164, -140.778280674112, -103.995482468514, 1.48)
    pt3dadd(95.6982848879174, -141.669710986792, -103.797558962135, 1.48)
    pt3dadd(96.2159115757351, -142.481708350768, -104.067230786681, 1.48)
    pt3dadd(96.7335382635529, -143.293705714744, -104.336902611228, 1.48)
    pt3dadd(97.2511649513706, -144.105703078721, -104.606574435774, 1.48)
    pt3dadd(97.7687916391884, -144.917700442697, -104.876246260321, 1.48)
    pt3dadd(98.2864183270062, -145.729697806673, -105.145918084867, 1.48)
    pt3dadd(98.8040450148239, -146.54169517065, -105.415589909414, 1.48)
    pt3dadd(99.3232853303794, -147.239269086371, -105.851157004077, 1.48)
    pt3dadd(99.8446734153722, -147.784543200017, -106.507533881957, 1.48)
    pt3dadd(100.366061500365, -148.329817313662, -107.163910759837, 1.48)
    pt3dadd(100.887449585358, -148.875091427307, -107.820287637717, 1.48)
    pt3dadd(101.408837670351, -149.420365540953, -108.476664515597, 1.48)
    pt3dadd(101.930225755343, -149.965639654598, -109.133041393478, 1.48)
    pt3dadd(102.451613840336, -150.510913768243, -109.789418271358, 1.48)
    pt3dadd(102.973001925329, -151.056187881889, -110.445795149238, 1.48)
    pt3dadd(103.409818980455, -151.866005691285, -110.381667545251, 1.48)
    pt3dadd(103.825463770317, -152.742051726932, -110.137162428563, 1.48)
    pt3dadd(104.24110856018, -153.61809776258, -109.892657311874, 1.48)
    pt3dadd(104.656753350042, -154.494143798227, -109.648152195186, 1.48)
    pt3dadd(105.067756344217, -155.35555977572, -109.52574170961, 1.48)
    pt3dadd(105.456058811212, -156.1454280042, -110.000430424205, 1.48)
    pt3dadd(105.844361278207, -156.935296232679, -110.475119138801, 1.48)
    pt3dadd(106.232663745201, -157.725164461159, -110.949807853396, 1.48)
    pt3dadd(106.620966212196, -158.515032689639, -111.424496567991, 1.48)
    pt3dadd(107.009268679191, -159.304900918119, -111.899185282586, 1.48)
    pt3dadd(107.397571146186, -160.094769146598, -112.373873997181, 1.48)
    pt3dadd(107.815398814924, -160.890383618716, -112.803000508144, 1.48)
    pt3dadd(108.315126486263, -161.701937604914, -113.105741952256, 1.48)
    pt3dadd(108.814854157603, -162.513491591113, -113.408483396369, 1.48)
    pt3dadd(109.314581828942, -163.325045577311, -113.711224840482, 1.48)
    pt3dadd(109.814309500281, -164.136599563509, -114.013966284594, 1.48)
    pt3dadd(110.314037171621, -164.948153549707, -114.316707728707, 1.48)
    pt3dadd(110.629819977091, -165.783386598315, -114.367080985272, 1.48)
    pt3dadd(110.570291799857, -166.666933102915, -113.902536078591, 1.48)
    pt3dadd(110.510763622622, -167.550479607515, -113.437991171909, 1.48)
    pt3dadd(110.451235445388, -168.434026112116, -112.973446265228, 1.48)
    pt3dadd(110.391707268153, -169.317572616716, -112.508901358546, 1.48)
    pt3dadd(110.45175193894, -170.201110684328, -112.246893086716, 1.48)
    pt3dadd(110.829771544816, -171.084626315821, -112.523481782221, 1.48)
    pt3dadd(111.207791150691, -171.968141947315, -112.800070477725, 1.48)
    pt3dadd(111.585810756567, -172.851657578808, -113.07665917323, 1.48)
    pt3dadd(111.963830362443, -173.735173210301, -113.353247868734, 1.48)
    pt3dadd(112.341849968318, -174.618688841794, -113.629836564238, 1.48)
    pt3dadd(112.719869574194, -175.502204473287, -113.906425259743, 1.48)
    pt3dadd(113.306495498251, -176.227956894755, -113.764336151771, 1.48)
    pt3dadd(113.986395501367, -176.883168700518, -113.435043765961, 1.48)
    pt3dadd(114.666295504482, -177.538380506281, -113.105751380151, 1.48)
    pt3dadd(115.346195507597, -178.193592312044, -112.776458994341, 1.48)
    pt3dadd(116.026095510712, -178.848804117808, -112.44716660853, 1.48)
    pt3dadd(116.705995513828, -179.504015923571, -112.11787422272, 1.48)
    pt3dadd(117.521550650808, -179.92107711925, -111.756393006617, 1.48)
    pt3dadd(118.391010594022, -180.24350523968, -111.382121027566, 1.48)
    pt3dadd(119.260470537236, -180.56593336011, -111.007849048516, 1.48)
    pt3dadd(120.12993048045, -180.88836148054, -110.633577069465, 1.48)
    pt3dadd(120.517988279603, -181.033420164151, -109.785244580385, 1.48)
    pt3dadd(120.798801730147, -181.138965376645, -108.831303275003, 1.48)
    pt3dadd(121.079615180692, -181.244510589139, -107.877361969622, 1.48)
    pt3dadd(121.360428631237, -181.350055801634, -106.923420664241, 1.48)
    pt3dadd(121.641242081782, -181.455601014128, -105.969479358859, 1.48)
    pt3dadd(121.922055532327, -181.561146226622, -105.015538053478, 1.48)
    pt3dadd(122.202868982871, -181.666691439116, -104.061596748097, 1.48)
    pt3dadd(122.912390185842, -181.797836059099, -103.49797003524, 1.48)
    pt3dadd(123.827749573605, -181.941271885711, -103.121747554681, 1.48)
    pt3dadd(124.743108961368, -182.084707712323, -102.745525074122, 1.48)
    pt3dadd(125.658468349131, -182.228143538936, -102.369302593563, 1.48)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(17.3175136178814, -7.27524016948806, -52.7438570297159, 1.97)
    pt3dadd(17.8159674605448, -7.82896434086527, -52.0953080017573, 1.97)
    pt3dadd(18.3299950875453, -8.36479697508304, -51.4254878865118, 1.97)
    pt3dadd(18.8440227145458, -8.90062960930086, -50.7556677712663, 1.97)
    pt3dadd(19.3580503415462, -9.43646224351866, -50.0858476560208, 1.97)
    pt3dadd(19.8720779685466, -9.97229487773649, -49.4160275407753, 1.97)
    pt3dadd(20.3861055955471, -10.5081275119543, -48.7462074255298, 1.97)
    pt3dadd(20.8174195375718, -11.2963737988524, -48.3878667228626, 1.89699827388368)
    pt3dadd(21.2170307837275, -12.1813657846809, -48.1489105826084, 1.79601627435008)
    pt3dadd(21.6166420298833, -13.0663577705094, -47.9099544423543, 1.69503427481648)
    pt3dadd(22.0162532760391, -13.9513497563379, -47.6709983021001, 1.59405227528288)
    pt3dadd(22.4158645221948, -14.8363417421664, -47.4320421618459, 1.49307027574928)
    pt3dadd(22.9393461303632, -15.5834299093397, -47.7688401801566, 1.48)
    pt3dadd(23.4812441649077, -16.310015225936, -48.1912384494042, 1.48)
    pt3dadd(24.0231421994521, -17.0366005425324, -48.6136367186518, 1.48)
    pt3dadd(24.5650402339966, -17.7631858591288, -49.0360349878994, 1.48)
    pt3dadd(25.1069382685411, -18.4897711757252, -49.458433257147, 1.48)
    pt3dadd(25.5312839518111, -19.323769780545, -49.5238972398815, 1.48)
    pt3dadd(25.8632153667764, -20.2422117872176, -49.3087558534898, 1.48)
    pt3dadd(26.1951467817417, -21.16065379389, -49.0936144670982, 1.48)
    pt3dadd(26.527078196707, -22.0790958005626, -48.8784730807066, 1.48)
    pt3dadd(26.8489791183202, -23.0018906401241, -48.6669160911805, 1.48)
    pt3dadd(27.1653407155745, -23.927089324881, -48.4573385792505, 1.48)
    pt3dadd(27.4817023128288, -24.8522880096379, -48.2477610673205, 1.48)
    pt3dadd(27.7980639100831, -25.7774866943949, -48.0381835553905, 1.48)
    pt3dadd(28.2182608532251, -26.6453973274701, -48.0581626640358, 1.48)
    pt3dadd(28.7469694000756, -27.4534399232392, -48.3180365486608, 1.48)
    pt3dadd(29.275677946926, -28.2614825190083, -48.5779104332858, 1.48)
    pt3dadd(29.8043864937764, -29.0695251147774, -48.8377843179108, 1.48)
    pt3dadd(30.3330950406268, -29.8775677105465, -49.0976582025358, 1.48)
    pt3dadd(30.9235758535188, -30.6426275804756, -49.3520987801611, 1.48)
    pt3dadd(31.5279001585176, -31.3980547938093, -49.6053217249006, 1.48)
    pt3dadd(32.1322244635164, -32.153482007143, -49.85854466964, 1.48)
    pt3dadd(32.7365487685152, -32.9089092204767, -50.1117676143795, 1.48)
    pt3dadd(33.340873073514, -33.6643364338105, -50.364990559119, 1.48)
    pt3dadd(33.9451973785128, -34.4197636471442, -50.6182135038585, 1.48)
    pt3dadd(34.4201303166601, -35.2485251990114, -50.693594846463, 1.48)
    pt3dadd(34.6978728016449, -36.1890471549897, -50.4979483224524, 1.48)
    pt3dadd(34.9756152866298, -37.1295691109679, -50.3023017984419, 1.48)
    pt3dadd(35.2533577716146, -38.070091066946, -50.1066552744314, 1.48)
    pt3dadd(35.5906892989259, -38.985517119105, -49.8896452556698, 1.48)
    pt3dadd(35.9422751853039, -39.8949399530519, -49.6675248522937, 1.48)
    pt3dadd(36.2938610716818, -40.8043627869987, -49.4454044489176, 1.48)
    pt3dadd(36.6540422019734, -41.7050636790755, -49.2945093513299, 1.48)
    pt3dadd(37.0738587618923, -42.5452500871159, -49.6377889105263, 1.48)
    pt3dadd(37.4936753218111, -43.3854364951563, -49.9810684697227, 1.48)
    pt3dadd(37.9134918817299, -44.2256229031967, -50.3243480289192, 1.48)
    pt3dadd(38.3333084416487, -45.065809311237, -50.6676275881156, 1.48)
    pt3dadd(38.6810241879178, -45.9407236771765, -50.9974488358548, 1.48)
    pt3dadd(38.975788769449, -46.8411424129925, -51.3173862385858, 1.48)
    pt3dadd(39.2705533509802, -47.7415611488084, -51.6373236413168, 1.48)
    pt3dadd(39.530961642824, -48.6698304692365, -51.7219227550217, 1.48)
    pt3dadd(39.7534147740866, -49.6288677631811, -51.5465315545163, 1.48)
    pt3dadd(39.9758679053492, -50.5879050571258, -51.3711403540109, 1.48)
    pt3dadd(40.1983210366118, -51.5469423510705, -51.1957491535055, 1.48)
    pt3dadd(40.4207741678744, -52.5059796450152, -51.0203579530001, 1.48)
    pt3dadd(40.7066996984272, -53.4313266120087, -50.7727816994673, 1.48)
    pt3dadd(40.996819703308, -54.3544472063886, -50.5204352094983, 1.48)
    pt3dadd(41.2869397081887, -55.2775678007685, -50.2680887195294, 1.48)
    pt3dadd(41.5770597130694, -56.2006883951484, -50.0157422295604, 1.48)
    pt3dadd(41.8671797179501, -57.1238089895284, -49.7633957395915, 1.48)
    pt3dadd(42.2203362303573, -58.0266718288226, -49.604780038368, 1.48)
    pt3dadd(42.7408325122, -58.8757574491951, -49.6949866338288, 1.48)
    pt3dadd(43.2613287940427, -59.7248430695676, -49.7851932292895, 1.48)
    pt3dadd(43.7818250758853, -60.5739286899401, -49.8753998247503, 1.48)
    pt3dadd(44.3521840866671, -61.3759690761403, -49.9831471065198, 1.48)
    pt3dadd(45.1198376238171, -61.9918630682021, -50.1602985599242, 1.48)
    pt3dadd(45.8874911609671, -62.6077570602639, -50.3374500133285, 1.48)
    pt3dadd(46.6551446981172, -63.2236510523256, -50.5146014667329, 1.48)
    pt3dadd(47.4227982352672, -63.8395450443873, -50.6917529201373, 1.48)
    pt3dadd(48.0493012390639, -64.5585801785757, -50.7098155616016, 1.48)
  }
}
proc shape3d_12() {
  adendIML[13] {
    pt3dadd(48.4480360354624, -65.4440494911767, -50.4711638099153, 1.48)
    pt3dadd(48.846770831861, -66.3295188037776, -50.232512058229, 1.48)
    pt3dadd(49.2455056282596, -67.2149881163786, -49.9938603065427, 1.48)
    pt3dadd(49.6442404246582, -68.1004574289796, -49.7552085548565, 1.48)
    pt3dadd(50.0711335399398, -68.9154774007699, -49.9044516075086, 1.48)
    pt3dadd(50.5216810464952, -69.6713164150806, -50.3795456285008, 1.48)
    pt3dadd(50.9722285530505, -70.4271554293914, -50.8546396494929, 1.48)
    pt3dadd(51.4227760596059, -71.1829944437021, -51.329733670485, 1.48)
    pt3dadd(51.8733235661613, -71.9388334580129, -51.8048276914772, 1.48)
    pt3dadd(52.2855577667629, -72.8035786191112, -52.0362895002183, 1.48)
    pt3dadd(52.682661594715, -73.7113320913875, -52.1715380987177, 1.48)
    pt3dadd(53.0797654226671, -74.6190855636639, -52.3067866972171, 1.48)
    pt3dadd(53.4768692506192, -75.5268390359402, -52.4420352957164, 1.48)
    pt3dadd(53.8739730785713, -76.4345925082166, -52.5772838942158, 1.48)
    pt3dadd(54.2175058031981, -77.3629456147515, -52.7162246673226, 1.48)
    pt3dadd(54.5474145135455, -78.2965375477033, -52.856104421269, 1.48)
    pt3dadd(54.8773232238929, -79.2301294806552, -52.9959841752154, 1.48)
    pt3dadd(55.2072319342402, -80.1637214136071, -53.1358639291618, 1.48)
    pt3dadd(55.5371406445876, -81.097313346559, -53.2757436831082, 1.48)
    pt3dadd(55.867049354935, -82.0309052795108, -53.4156234370546, 1.48)
    pt3dadd(56.1969580652824, -82.9644972124627, -53.555503191001, 1.48)
    pt3dadd(56.5268667756297, -83.8980891454146, -53.6953829449474, 1.48)
    pt3dadd(56.6219781282343, -84.8892122787881, -53.7292708870593, 1.48)
    pt3dadd(56.6918810221185, -85.8865121123804, -53.7517792709044, 1.48)
    pt3dadd(56.7617839160026, -86.8838119459727, -53.7742876547495, 1.48)
    pt3dadd(56.8316868098866, -87.881111779565, -53.7967960385946, 1.48)
    pt3dadd(57.0063944049682, -88.8521245741875, -53.6833439207625, 1.48)
    pt3dadd(57.2288475362308, -89.8111618681322, -53.5079527202572, 1.48)
    pt3dadd(57.4513006674934, -90.7701991620769, -53.3325615197518, 1.48)
    pt3dadd(57.673753798756, -91.7292364560216, -53.1571703192464, 1.48)
    pt3dadd(57.8867270923469, -92.6907422846442, -52.9853162156094, 1.48)
    pt3dadd(58.0459454818512, -93.6662458049402, -52.8335190274482, 1.48)
    pt3dadd(58.2051638713555, -94.6417493252363, -52.681721839287, 1.48)
    pt3dadd(58.3643822608597, -95.6172528455324, -52.5299246511258, 1.48)
    pt3dadd(58.523600650364, -96.5927563658284, -52.3781274629646, 1.48)
    pt3dadd(58.73529238302, -97.5243163779434, -52.0994765810602, 1.48)
    pt3dadd(58.971574249979, -98.4352835194117, -51.7613793368961, 1.48)
    pt3dadd(59.2078561169379, -99.3462506608801, -51.423282092732, 1.48)
    pt3dadd(59.4441379838968, -100.257217802348, -51.0851848485679, 1.48)
    pt3dadd(59.6810683708448, -101.167674981829, -50.7501480591551, 1.48)
    pt3dadd(60.0911220148363, -101.941997143423, -51.23210365785, 1.48)
    pt3dadd(60.5011756588277, -102.716319305017, -51.714059256545, 1.48)
    pt3dadd(60.9112293028191, -103.490641466612, -52.19601485524, 1.48)
    pt3dadd(61.3212829468106, -104.264963628206, -52.6779704539349, 1.48)
    pt3dadd(61.731336590802, -105.0392857898, -53.1599260526299, 1.48)
    pt3dadd(62.1413902347935, -105.813607951394, -53.6418816513249, 1.48)
    pt3dadd(62.121287386672, -106.798545412726, -53.59717441064, 1.48)
    pt3dadd(62.0778458181496, -107.794910091088, -53.5238923675769, 1.48)
    pt3dadd(62.0344042496272, -108.791274769451, -53.4506103245138, 1.48)
    pt3dadd(61.9909626811048, -109.787639447814, -53.3773282814507, 1.48)
    pt3dadd(62.0753275195341, -110.7565038068, -53.3532896313441, 1.48)
    pt3dadd(62.5107573139877, -111.649828929194, -53.4645151670876, 1.48)
    pt3dadd(62.9461871084414, -112.543154051588, -53.5757407028312, 1.48)
    pt3dadd(63.381616902895, -113.436479173982, -53.6869662385747, 1.48)
    pt3dadd(63.8170466973486, -114.329804296377, -53.7981917743182, 1.48)
    pt3dadd(64.2530517353319, -115.222331180733, -53.9106519112778, 1.48)
    pt3dadd(64.8386384504427, -115.907290698817, -54.3441477678577, 1.48)
    pt3dadd(65.4242251655535, -116.592250216901, -54.7776436244376, 1.48)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(65.4242251655535, -116.592250216901, -54.7776436244376, 1.48)
    pt3dadd(66.0098118806644, -117.277209734985, -55.2111394810175, 1.48)
    pt3dadd(66.5953985957752, -117.962169253069, -55.6446353375974, 1.48)
    pt3dadd(67.180985310886, -118.647128771153, -56.0781311941773, 1.48)
    pt3dadd(67.693435781689, -119.407237451523, -56.2957459683053, 1.48)
    pt3dadd(68.0633324496804, -120.313823421827, -56.0925752680106, 1.48)
    pt3dadd(68.4332291176718, -121.22040939213, -55.8894045677159, 1.48)
    pt3dadd(68.8031257856632, -122.126995362433, -55.6862338674212, 1.48)
    pt3dadd(69.1730224536546, -123.033581332736, -55.4830631671265, 1.48)
    pt3dadd(69.542919121646, -123.940167303039, -55.2798924668318, 1.48)
    pt3dadd(70.0876190450054, -124.698879839347, -55.6018461026723, 1.48)
    pt3dadd(70.645104172381, -125.446776833243, -55.962207614597, 1.48)
    pt3dadd(71.2025892997565, -126.194673827139, -56.3225691265217, 1.48)
    pt3dadd(71.760074427132, -126.942570821035, -56.6829306384465, 1.48)
    pt3dadd(72.300079175615, -127.707209771985, -56.9549035011922, 1.48)
    pt3dadd(72.7365286464788, -128.571029525666, -56.703254355491, 1.48)
    pt3dadd(73.1729781173426, -129.434849279348, -56.4516052097899, 1.48)
    pt3dadd(73.6094275882063, -130.29866903303, -56.1999560640887, 1.48)
    pt3dadd(74.0458770590701, -131.162488786711, -55.9483069183876, 1.48)
    pt3dadd(74.4525551128613, -131.91459017156, -56.3162140197147, 1.48)
    pt3dadd(74.8492197902094, -132.629115982496, -56.8925038766886, 1.48)
    pt3dadd(75.2458844675576, -133.343641793432, -57.4687937336624, 1.48)
    pt3dadd(75.6425491449057, -134.058167604367, -58.0450835906363, 1.48)
    pt3dadd(76.0392138222539, -134.772693415303, -58.6213734476101, 1.48)
    pt3dadd(76.4279750726953, -135.521889147701, -59.055337695187, 1.48)
    pt3dadd(76.7802892404027, -136.430967107239, -58.8329596595941, 1.48)
    pt3dadd(77.13260340811, -137.340045066778, -58.6105816240011, 1.48)
    pt3dadd(77.4849175758173, -138.249123026316, -58.3882035884082, 1.48)
    pt3dadd(77.8372317435247, -139.158200985854, -58.1658255528153, 1.48)
    pt3dadd(78.1895459112321, -140.067278945393, -57.9434475172224, 1.48)
    pt3dadd(78.581903261212, -140.912230247656, -57.5958303181753, 1.48)
    pt3dadd(78.9953581457817, -141.723395164992, -57.1822284137921, 1.48)
    pt3dadd(79.4088130303514, -142.534560082327, -56.7686265094089, 1.48)
    pt3dadd(79.8222679149211, -143.345724999663, -56.3550246050258, 1.48)
    pt3dadd(80.0966957812001, -144.280182767082, -56.1454035274492, 1.48)
    pt3dadd(80.3573610917614, -145.226845534218, -55.9559749097899, 1.48)
    pt3dadd(80.6180264023228, -146.173508301354, -55.7665462921305, 1.48)
    pt3dadd(80.9008936496923, -147.101151033021, -55.6411063298792, 1.48)
    pt3dadd(81.3799302636657, -147.860738682691, -56.0810501046293, 1.48)
    pt3dadd(81.8589668776392, -148.620326332361, -56.5209938793795, 1.48)
    pt3dadd(82.3380034916127, -149.379913982031, -56.9609376541297, 1.48)
    pt3dadd(82.8170401055861, -150.139501631701, -57.4008814288799, 1.48)
    pt3dadd(83.2960767195596, -150.899089281372, -57.8408252036301, 1.48)
    pt3dadd(83.7958679278505, -151.65782051441, -58.2579852851997, 1.48)
    pt3dadd(84.3068625884552, -152.416089448704, -58.6628465949322, 1.48)
    pt3dadd(84.8178572490599, -153.174358382998, -59.0677079046646, 1.48)
    pt3dadd(85.3288519096646, -153.932627317292, -59.4725692143971, 1.48)
    pt3dadd(85.8398465702693, -154.690896251585, -59.8774305241296, 1.48)
    pt3dadd(86.3508412308741, -155.449165185879, -60.2822918338621, 1.48)
    pt3dadd(86.5373392135803, -156.402927517003, -60.1974135684923, 1.48)
    pt3dadd(86.6829098489147, -157.381346575625, -60.0507665915237, 1.48)
    pt3dadd(86.8284804842491, -158.359765634247, -59.9041196145551, 1.48)
    pt3dadd(86.9740511195836, -159.338184692868, -59.7574726375864, 1.48)
    pt3dadd(87.119621754918, -160.31660375149, -59.6108256606178, 1.48)
    pt3dadd(87.4944673608988, -161.214017496703, -59.8094593131061, 1.48)
    pt3dadd(87.8881900197168, -162.104761776091, -60.036521191613, 1.48)
    pt3dadd(88.2819126785348, -162.995506055479, -60.2635830701199, 1.48)
    pt3dadd(88.6756353373528, -163.886250334867, -60.4906449486268, 1.48)
    pt3dadd(89.0693579961709, -164.776994614254, -60.7177068271337, 1.48)
    pt3dadd(89.5122735074338, -165.598325278838, -60.72821955011, 1.48)
    pt3dadd(90.0725386097813, -166.254069706638, -60.2221540795429, 1.48)
    pt3dadd(90.6328037121289, -166.909814134439, -59.7160886089758, 1.48)
    pt3dadd(91.1930688144764, -167.565558562239, -59.2100231384086, 1.48)
    pt3dadd(91.6729474645545, -168.282476927943, -59.1897503024932, 1.48)
    pt3dadd(92.0694570436633, -169.062838998731, -59.6732947080552, 1.48)
    pt3dadd(92.4659666227721, -169.843201069519, -60.1568391136171, 1.48)
    pt3dadd(92.8624762018809, -170.623563140307, -60.6403835191791, 1.48)
    pt3dadd(93.2589857809897, -171.403925211095, -61.1239279247411, 1.48)
    pt3dadd(93.6554953600985, -172.184287281883, -61.607472330303, 1.48)
    pt3dadd(94.0520049392073, -172.964649352672, -62.0910167358649, 1.48)
    pt3dadd(94.4908859940522, -173.725536416048, -62.5684446569534, 1.48)
    pt3dadd(94.9392847335583, -174.482048909597, -63.0444986638828, 1.48)
    pt3dadd(95.3876834730645, -175.238561403147, -63.5205526708121, 1.48)
    pt3dadd(95.8360822125706, -175.995073896696, -63.9966066777415, 1.48)
    pt3dadd(96.2844809520767, -176.751586390245, -64.4726606846709, 1.48)
    pt3dadd(96.7328796915829, -177.508098883794, -64.9487146916003, 1.48)
    pt3dadd(97.1553035625401, -178.294186970295, -65.3928762911041, 1.48)
    pt3dadd(97.5135216861072, -179.153381222719, -65.7582049274697, 1.48)
    pt3dadd(97.8717398096742, -180.012575475144, -66.1235335638353, 1.48)
    pt3dadd(98.2299579332411, -180.871769727568, -66.488862200201, 1.48)
    pt3dadd(98.5881760568082, -181.730963979993, -66.8541908365666, 1.48)
    pt3dadd(98.9463941803752, -182.590158232417, -67.2195194729322, 1.48)
    pt3dadd(99.3046123039422, -183.449352484842, -67.5848481092978, 1.48)
    pt3dadd(99.4646751592575, -184.404003270921, -67.5856813841768, 1.48)
    pt3dadd(99.5558329894649, -185.391847395265, -67.4597677789119, 1.48)
    pt3dadd(99.6469908196724, -186.379691519609, -67.3338541736471, 1.48)
    pt3dadd(99.7381486498799, -187.367535643953, -67.2079405683823, 1.48)
    pt3dadd(99.9232217477429, -188.312393556751, -67.2250185066222, 1.48)
    pt3dadd(100.327730434122, -189.156813011948, -67.576200092598, 1.48)
    pt3dadd(100.732239120501, -190.001232467145, -67.9273816785739, 1.48)
    pt3dadd(101.158741372638, -190.75055024172, -68.3755974089607, 1.48)
    pt3dadd(101.649936015166, -191.220133701372, -69.1092316486007, 1.48)
    pt3dadd(102.141130657694, -191.689717161025, -69.8428658882407, 1.48)
    pt3dadd(102.632325300223, -192.159300620678, -70.5765001278807, 1.48)
    pt3dadd(103.123519942751, -192.62888408033, -71.3101343675207, 1.48)
    pt3dadd(103.614714585279, -193.098467539983, -72.0437686071607, 1.48)
    pt3dadd(103.996914018762, -193.6643836111, -72.6333472762305, 1.48)
    pt3dadd(103.8952511943, -194.657948890886, -72.5834202802676, 1.48)
    pt3dadd(103.793588369838, -195.651514170672, -72.5334932843046, 1.48)
  }
  GCL[9] {pt3dclear()
    pt3dadd(11.2330179003904, 3.399621262903, -47.4723348986475, 1.88414241983453)
    pt3dadd(11.0875002442018, 2.65412037226688, -48.1022431884105, 1.88414241983453)
    pt3dadd(10.8839157382551, 1.89690796939999, -48.7228740979558, 1.78653479469082)
    pt3dadd(10.6803312323084, 1.13969556653311, -49.3435050075011, 1.68892716954711)
    pt3dadd(10.4767467263617, 0.382483163666252, -49.9641359170464, 1.5913195444034)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(10.4767467263617, 0.382483163666252, -49.9641359170464, 1.49371191925969)
    pt3dadd(10.273162220415, -0.374729239200632, -50.5847668265917, 1.49371191925969)
    pt3dadd(10.1746414113283, -1.33631611187488, -50.6220008895718, 1.48)
    pt3dadd(10.0932922192307, -2.33130596029397, -50.5638845365544, 1.48)
    pt3dadd(10.0119430271332, -3.32629580871304, -50.505768183537, 1.48)
    pt3dadd(9.75819814866538, -4.29122279563123, -50.5187852637878, 1.48)
    pt3dadd(9.4833893400713, -5.2524765931131, -50.5404936848695, 1.48)
    pt3dadd(9.20858053147722, -6.21373039059492, -50.5622021059511, 1.48)
    pt3dadd(8.69616048400332, -7.04892341822546, -50.6896411429461, 1.48)
    pt3dadd(8.116499931002, -7.84844309163276, -50.8470003979293, 1.48)
    pt3dadd(7.64992021876092, -8.6712839574657, -50.8747805041212, 1.48)
    pt3dadd(7.57551147774494, -9.5750040829698, -50.4531725416498, 1.48)
    pt3dadd(7.50110273672897, -10.4787242084739, -50.0315645791785, 1.48)
    pt3dadd(7.42669399571298, -11.382444333978, -49.6099566167071, 1.48)
    pt3dadd(7.31831201887472, -12.1955974564996, -50.0587491927365, 1.48)
    pt3dadd(7.20436551125105, -12.9939164643411, -50.6501060690128, 1.48)
    pt3dadd(7.09041900362737, -13.7922354721827, -51.2414629452892, 1.48)
    pt3dadd(6.9764724960037, -14.5905544800242, -51.8328198215655, 1.48)
    pt3dadd(6.86252598838003, -15.3888734878657, -52.4241766978418, 1.48)
    pt3dadd(6.73699586026566, -16.2469540789267, -52.9047088021979, 1.48)
    pt3dadd(6.59912785660793, -17.1686875647481, -53.267199898203, 1.48)
    pt3dadd(6.4612598529502, -18.0904210505694, -53.6296909942082, 1.48)
    pt3dadd(6.32339184929246, -19.0121545363908, -53.9921820902134, 1.48)
    pt3dadd(6.22392294040137, -19.9189996268491, -54.3924261781766, 1.48)
    pt3dadd(6.2172407772396, -20.7898687193504, -54.8838957829554, 1.48)
    pt3dadd(6.21055861407782, -21.6607378118518, -55.3753653877341, 1.48)
    pt3dadd(6.20387645091605, -22.5316069043531, -55.8668349925129, 1.48)
    pt3dadd(6.18947087464809, -23.4112838840323, -56.3194505633432, 1.48)
    pt3dadd(6.07611110344236, -24.4038095968816, -56.2742590640878, 1.48)
    pt3dadd(5.96275133223664, -25.3963353097311, -56.2290675648324, 1.48)
    pt3dadd(5.84939156103091, -26.3888610225805, -56.1838760655769, 1.48)
    pt3dadd(5.73603178982519, -27.3813867354299, -56.1386845663215, 1.48)
    pt3dadd(5.64622315414271, -28.2706394305473, -56.4625215911698, 1.48)
    pt3dadd(5.57179981900424, -29.0924267410626, -57.0274346671938, 1.48)
    pt3dadd(5.49737648386576, -29.914214051578, -57.5923477432177, 1.48)
    pt3dadd(5.4229531487273, -30.7360013620933, -58.1572608192417, 1.48)
    pt3dadd(5.34852981358884, -31.5577886726086, -58.7221738952657, 1.48)
    pt3dadd(5.27410647845036, -32.3795759831239, -59.2870869712897, 1.48)
    pt3dadd(5.0987696817746, -33.2596578893762, -59.5790641026044, 1.48)
    pt3dadd(4.79801582935373, -34.2121893623346, -59.5318315579156, 1.48)
    pt3dadd(4.49726197693286, -35.1647208352929, -59.4845990132268, 1.48)
    pt3dadd(4.19650812451199, -36.1172523082513, -59.4373664685381, 1.48)
    pt3dadd(3.89575427209112, -37.0697837812097, -59.3901339238493, 1.48)
    pt3dadd(3.66601989830114, -38.0430091024231, -59.3923724376561, 1.48)
    pt3dadd(3.43673015433116, -39.0163639810792, -59.3949206736441, 1.48)
    pt3dadd(3.2074404103612, -39.9897188597353, -59.3974689096322, 1.48)
    pt3dadd(2.97815066639123, -40.9630737383913, -59.4000171456202, 1.48)
    pt3dadd(2.7686688971268, -41.939325354476, -59.3944429119451, 1.48)
    pt3dadd(2.68731970502924, -42.9343152028951, -59.3363265589276, 1.48)
    pt3dadd(2.60597051293167, -43.9293050513141, -59.2782102059102, 1.48)
    pt3dadd(2.51049922511234, -44.9227628620459, -59.2258363279007, 1.48)
    pt3dadd(2.34381561487896, -45.9084951932252, -59.2024195529853, 1.48)
    pt3dadd(2.17713200464558, -46.8942275244045, -59.1790027780699, 1.48)
    pt3dadd(2.01044839441221, -47.8799598555838, -59.1555860031544, 1.48)
    pt3dadd(2.11516147335501, -48.6276054724225, -59.7685881679081, 1.48)
    pt3dadd(2.2473956865739, -49.3511077717631, -60.4461267540442, 1.48)
    pt3dadd(2.37962989979278, -50.0746100711036, -61.1236653401802, 1.48)
    pt3dadd(2.51186411301166, -50.7981123704442, -61.8012039263163, 1.48)
    pt3dadd(2.64409832623053, -51.5216146697848, -62.4787425124523, 1.48)
    pt3dadd(2.77633253944941, -52.2451169691254, -63.1562810985884, 1.48)
    pt3dadd(2.74606296108418, -53.2133525557104, -63.1621109840309, 1.48)
    pt3dadd(2.69717868661334, -54.2096221698375, -63.0909971058047, 1.48)
    pt3dadd(2.64829441214249, -55.2058917839647, -63.0198832275785, 1.48)
    pt3dadd(2.59941013767165, -56.2021613980919, -62.9487693493524, 1.48)
    pt3dadd(2.52565366002701, -57.1974098764842, -62.887616902628, 1.48)
    pt3dadd(2.44148930171879, -58.1922310562251, -62.830632859868, 1.48)
    pt3dadd(2.35732494341057, -59.1870522359661, -62.7736488171079, 1.48)
    pt3dadd(2.26690937190974, -60.181375540241, -62.7191903293823, 1.48)
    pt3dadd(2.15181061469979, -61.1737329617004, -62.6747041049617, 1.48)
    pt3dadd(2.03671185748983, -62.1660903831597, -62.6302178805411, 1.48)
    pt3dadd(1.92161310027989, -63.1584478046191, -62.5857316561205, 1.48)
    pt3dadd(1.80651434306993, -64.1508052260785, -62.5412454316999, 1.48)
    pt3dadd(1.67327205792616, -65.1411190569359, -62.5041437590817, 1.48)
    pt3dadd(1.53308492778773, -66.1306506573464, -62.4698686904079, 1.48)
    pt3dadd(1.39289779764928, -67.1201822577569, -62.4355936217341, 1.48)
    pt3dadd(1.25271066751086, -68.1097138581674, -62.4013185530603, 1.48)
    pt3dadd(1.14855313714012, -69.1030179302927, -62.3524051238523, 1.48)
    pt3dadd(1.0468903126781, -70.0965832100788, -62.3024781278894, 1.48)
    pt3dadd(0.945227488216092, -71.0901484898649, -62.2525511319264, 1.48)
    pt3dadd(0.843564663754089, -72.0837137696511, -62.2026241359635, 1.48)
    pt3dadd(0.741901839292066, -73.0772790494372, -62.1526971400005, 1.48)
    pt3dadd(0.760483156187558, -74.0720669539955, -62.0549492293245, 1.48)
    pt3dadd(0.782633713776537, -75.0668911500692, -61.9557818369767, 1.48)
    pt3dadd(0.804478579553535, -76.061731531378, -61.8567342650155, 1.48)
    pt3dadd(0.812190925908507, -77.0573201765996, -61.7632261412006, 1.48)
    pt3dadd(0.819903272263453, -78.0529088218213, -61.6697180173857, 1.48)
    pt3dadd(0.827615618618424, -79.0484974670429, -61.5762098935708, 1.48)
  }
}
proc shape3d_13() {
  adendIML[14] {
    pt3dadd(0.555241615408868, -79.9614167818691, -61.7933792279113, 1.48)
    pt3dadd(0.213188899700235, -80.8537699658785, -62.0878376030081, 1.48)
    pt3dadd(-0.128863816008394, -81.7461231498879, -62.3822959781048, 1.48)
    pt3dadd(-0.378039933032237, -82.6730457504496, -62.5566422544882, 1.48)
    pt3dadd(-0.442102185412931, -83.6688692193361, -62.4915911466211, 1.48)
    pt3dadd(-0.50616443779364, -84.6646926882226, -62.4265400387541, 1.48)
    pt3dadd(-0.570226690174341, -85.6605161571092, -62.361488930887, 1.48)
    pt3dadd(-0.577129459205249, -86.6497477199835, -62.2196810583018, 1.48)
    pt3dadd(-0.576182220690988, -87.6380739823039, -62.0673317821406, 1.48)
    pt3dadd(-0.575234982176731, -88.6264002446244, -61.9149825059794, 1.48)
    pt3dadd(-0.574287743662474, -89.6147265069449, -61.7626332298182, 1.48)
    pt3dadd(-0.611592533819426, -90.5807250323759, -61.5537028371067, 1.48)
    pt3dadd(-0.810429957464596, -91.4524368424381, -61.1058387961791, 1.48)
    pt3dadd(-1.00926738110974, -92.3241486525004, -60.6579747552514, 1.48)
    pt3dadd(-1.2081048047549, -93.1958604625628, -60.2101107143237, 1.48)
    pt3dadd(-1.40694222840005, -94.0675722726251, -59.7622466733961, 1.48)
    pt3dadd(-1.57253006370108, -95.0079541842935, -59.5562968666956, 1.48)
    pt3dadd(-1.71442633710375, -95.9972660840846, -59.5227199024787, 1.48)
    pt3dadd(-1.85632261050643, -96.9865779838758, -59.4891429382617, 1.48)
    pt3dadd(-1.9982188839091, -97.9758898836669, -59.4555659740448, 1.48)
    pt3dadd(-2.07048914725486, -98.9708025064412, -59.3938543470828, 1.48)
    pt3dadd(-2.12903783671919, -99.9668188939456, -59.3265980701665, 1.48)
    pt3dadd(-2.18758652618354, -100.96283528145, -59.2593417932501, 1.48)
    pt3dadd(-2.24613521564789, -101.958851668954, -59.1920855163338, 1.48)
    pt3dadd(-2.30468390511224, -102.954868056459, -59.1248292394175, 1.48)
    pt3dadd(-2.39974866081284, -103.945419790801, -59.0725580733506, 1.48)
    pt3dadd(-2.65666127444166, -104.911750887497, -59.0867044692445, 1.48)
    pt3dadd(-2.9135738880705, -105.878081984193, -59.1008508651385, 1.48)
    pt3dadd(-3.17048650169933, -106.844413080889, -59.1149972610324, 1.48)
    pt3dadd(-3.42739911532817, -107.810744177585, -59.1291436569264, 1.48)
    pt3dadd(-3.71983547682425, -108.751517278154, -58.9794738953044, 1.48)
    pt3dadd(-4.02095284740551, -109.686044720257, -58.7897720526924, 1.48)
    pt3dadd(-4.32207021798677, -110.62057216236, -58.6000702100803, 1.48)
    pt3dadd(-4.62318758856803, -111.555099604463, -58.4103683674683, 1.48)
    pt3dadd(-4.92430495914928, -112.489627046566, -58.2206665248563, 1.48)
    pt3dadd(-5.1338084417303, -113.463577786609, -58.1805921281279, 1.48)
    pt3dadd(-5.3265328098727, -114.444748916946, -58.1679220485008, 1.48)
    pt3dadd(-5.5192571780151, -115.425920047283, -58.1552519688737, 1.48)
    pt3dadd(-5.71198154615751, -116.40709117762, -58.1425818892466, 1.48)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(-5.71198154615751, -116.40709117762, -58.1425818892466, 1.48)
    pt3dadd(-5.96925809849214, -117.371112437502, -58.1570825327966, 1.48)
    pt3dadd(-6.27944322984412, -118.321077236128, -58.1938529782467, 1.48)
    pt3dadd(-6.5896283611961, -119.271042034755, -58.2306234236968, 1.48)
    pt3dadd(-6.89981349254808, -120.221006833381, -58.2673938691468, 1.48)
    pt3dadd(-7.21119124463535, -121.170561333241, -58.3046747915677, 1.48)
    pt3dadd(-7.52274945802083, -122.120053748779, -58.3420329567651, 1.48)
    pt3dadd(-7.8343076714063, -123.069546164318, -58.3793911219625, 1.48)
    pt3dadd(-8.07345460063281, -123.998923231332, -58.5048182835562, 1.48)
    pt3dadd(-7.97045637520059, -124.833254766261, -59.0463736873519, 1.48)
    pt3dadd(-7.86745814976837, -125.66758630119, -59.5879290911477, 1.48)
    pt3dadd(-7.76445992433616, -126.50191783612, -60.1294844949435, 1.48)
    pt3dadd(-7.66146169890394, -127.336249371049, -60.6710398987393, 1.48)
    pt3dadd(-7.55846347347172, -128.170580905978, -61.2125953025351, 1.48)
    pt3dadd(-7.61444273820988, -129.120102291396, -61.3269672301519, 1.48)
    pt3dadd(-7.7295414954198, -130.112459712855, -61.2824810057313, 1.48)
    pt3dadd(-7.84464025262971, -131.104817134314, -61.2379947813107, 1.48)
    pt3dadd(-7.95973900983962, -132.097174555774, -61.1935085568901, 1.48)
    pt3dadd(-8.12581142849523, -133.078165896921, -61.1702799899589, 1.48)
    pt3dadd(-8.44477604026486, -134.025065416985, -61.2108123886291, 1.48)
    pt3dadd(-8.76374065203448, -134.971964937049, -61.2513447872993, 1.48)
    pt3dadd(-9.08270526380409, -135.918864457112, -61.2918771859695, 1.48)
    pt3dadd(-9.40166987557373, -136.865763977176, -61.3324095846397, 1.48)
    pt3dadd(-9.87557793260136, -137.635050251636, -60.987364966575, 1.48)
    pt3dadd(-10.3984627946672, -138.348193916851, -60.520441489134, 1.48)
    pt3dadd(-10.9213476567331, -139.061337582067, -60.0535180116931, 1.48)
    pt3dadd(-11.444232518799, -139.774481247282, -59.5865945342522, 1.48)
    pt3dadd(-11.9232035460459, -140.524134970958, -59.1825974357786, 1.48)
    pt3dadd(-12.1261302743238, -141.50329252946, -59.174158325813, 1.48)
    pt3dadd(-12.3290570026017, -142.482450087963, -59.1657192158474, 1.48)
    pt3dadd(-12.5319837308796, -143.461607646466, -59.1572801058818, 1.48)
    pt3dadd(-12.7321486619765, -144.441267003636, -59.1476995966746, 1.48)
    pt3dadd(-12.8993005510142, -145.42692459291, -59.1244754131852, 1.48)
    pt3dadd(-13.066452440052, -146.412582182183, -59.1012512296958, 1.48)
    pt3dadd(-13.2336043290897, -147.398239771457, -59.0780270462064, 1.48)
    pt3dadd(-13.541419140127, -148.33297517994, -58.9332928270851, 1.48)
    pt3dadd(-13.8892690209793, -149.25321726613, -58.7539747766984, 1.48)
    pt3dadd(-14.2371189018315, -150.173459352321, -58.5746567263116, 1.48)
    pt3dadd(-14.4018660067408, -151.04213233998, -58.8276387895006, 1.48)
    pt3dadd(-14.4399866851273, -151.875142238249, -59.3795820141768, 1.48)
    pt3dadd(-14.4781073635138, -152.708152136517, -59.9315252388529, 1.48)
    pt3dadd(-14.5162280419003, -153.541162034786, -60.4834684635291, 1.48)
    pt3dadd(-14.5543487202868, -154.374171933054, -61.0354116882052, 1.48)
    pt3dadd(-14.5924693986733, -155.207181831323, -61.5873549128814, 1.48)
    pt3dadd(-14.9021896417092, -156.114918496186, -61.7445205583233, 1.48)
    pt3dadd(-15.2758680452225, -157.040252341427, -61.8087212249805, 1.48)
    pt3dadd(-15.6495464487357, -157.965586186668, -61.8729218916378, 1.48)
    pt3dadd(-16.023224852249, -158.890920031909, -61.937122558295, 1.48)
    pt3dadd(-16.3969032557623, -159.81625387715, -62.0013232249523, 1.48)
    pt3dadd(-16.7715875341477, -160.741149068683, -62.0659628485478, 1.48)
    pt3dadd(-17.1479246006531, -161.665323492997, -62.1313237376135, 1.48)
    pt3dadd(-17.5242616671585, -162.58949791731, -62.1966846266793, 1.48)
    pt3dadd(-17.9005987336639, -163.513672341623, -62.262045515745, 1.48)
    pt3dadd(-18.2769358001693, -164.437846765936, -62.3274064048107, 1.48)
    pt3dadd(-18.5843853141448, -165.329007443549, -62.0567323632684, 1.48)
    pt3dadd(-18.8697667694439, -166.209592200366, -61.6784098671992, 1.48)
    pt3dadd(-19.155148224743, -167.090176957184, -61.30008737113, 1.48)
    pt3dadd(-19.4405296800421, -167.970761714001, -60.9217648750608, 1.48)
    pt3dadd(-19.7316059418504, -168.913261379581, -60.8784941346748, 1.48)
    pt3dadd(-20.0239129444463, -169.869141869152, -60.9076335562487, 1.48)
    pt3dadd(-20.3162199470422, -170.825022358724, -60.9367729778226, 1.48)
    pt3dadd(-20.6085269496381, -171.780902848296, -60.9659123993965, 1.48)
    pt3dadd(-20.4994558839902, -172.755919026444, -60.8340566782349, 1.48)
    pt3dadd(-20.3474153081736, -173.732983774831, -60.6849656296595, 1.48)
    pt3dadd(-20.1953747323569, -174.710048523217, -60.5358745810842, 1.48)
    pt3dadd(-20.0433341565403, -175.687113271604, -60.3867835325088, 1.48)
    pt3dadd(-19.9349117932337, -176.667528041843, -60.2546947443125, 1.48)
    pt3dadd(-20.0162609853312, -177.662517890262, -60.1965783912951, 1.48)
    pt3dadd(-20.0976101774288, -178.657507738681, -60.1384620382777, 1.48)
    pt3dadd(-20.1961228859494, -179.650704843132, -60.0873186041055, 1.48)
    pt3dadd(-20.3560273249052, -180.63748952884, -60.0611164199399, 1.48)
    pt3dadd(-20.515931763861, -181.624274214547, -60.0349142357743, 1.48)
    pt3dadd(-20.6758362028168, -182.611058900255, -60.0087120516087, 1.48)
    pt3dadd(-20.8357406417726, -183.597843585963, -59.9825098674431, 1.48)
    pt3dadd(-20.9479747334531, -184.585240180435, -59.9373377013429, 1.48)
    pt3dadd(-20.8716973354595, -185.575056556583, -59.8171490992823, 1.48)
    pt3dadd(-20.7954199374659, -186.56487293273, -59.6969604972217, 1.48)
    pt3dadd(-20.7191425394723, -187.554689308878, -59.5767718951611, 1.48)
    pt3dadd(-20.7436472446478, -188.543169743167, -59.4966924569484, 1.48)
    pt3dadd(-20.904267955842, -189.529845858391, -59.4707843350313, 1.48)
    pt3dadd(-21.0648886670361, -190.516521973616, -59.4448762131143, 1.48)
    pt3dadd(-21.1745262819282, -191.49950292597, -59.4169324618119, 1.48)
    pt3dadd(-20.8760927358525, -192.452907616547, -59.3726954347609, 1.48)
    pt3dadd(-20.5776591897767, -193.406312307124, -59.32845840771, 1.48)
    pt3dadd(-20.279225643701, -194.359716997701, -59.284221380659, 1.48)
    pt3dadd(-19.9810929801466, -195.312924130424, -59.2377036188508, 1.48)
    pt3dadd(-19.7026666572059, -196.253192185345, -59.0418088318104, 1.48)
    pt3dadd(-19.4242403342652, -197.193460240265, -58.8459140447699, 1.48)
    pt3dadd(-19.1458140113245, -198.133728295186, -58.6500192577295, 1.48)
    pt3dadd(-18.9301094482292, -199.091576796444, -58.477413719179, 1.48)
    pt3dadd(-18.795733383608, -200.072221075539, -58.3350063066847, 1.48)
    pt3dadd(-18.6613573189868, -201.052865354635, -58.1925988941903, 1.48)
    pt3dadd(-17.9862016972976, -201.493157323978, -57.8847141739803, 1.48)
    pt3dadd(-17.0851946746766, -201.707776328136, -57.5077194416007, 1.48)
    pt3dadd(-16.1841876520557, -201.922395332294, -57.1307247092212, 1.48)
    pt3dadd(-15.2602477470929, -201.791130975625, -56.7760538850875, 1.48)
    pt3dadd(-14.3356781022708, -201.650368617974, -56.4219960783072, 1.48)
    pt3dadd(-13.4118385027487, -201.515573837594, -56.0676857876898, 1.48)
    pt3dadd(-12.5447549581812, -201.844717587503, -55.6937465965959, 1.48)
    pt3dadd(-11.6776714136136, -202.173861337412, -55.319807405502, 1.48)
    pt3dadd(-10.8105878690461, -202.503005087321, -54.9458682144082, 1.48)
    pt3dadd(-10.1589433005756, -203.163245510112, -54.62733002803, 1.48)
    pt3dadd(-9.64202118136723, -203.864472397842, -54.2124133179505, 1.48)
    pt3dadd(-9.4065341614409, -204.43718707244, -53.4272103092029, 1.48)
    pt3dadd(-9.17104714151458, -205.009901747038, -52.6420073004554, 1.48)
    pt3dadd(-8.93556012158825, -205.582616421637, -51.8568042917078, 1.48)
    pt3dadd(-8.47751621985584, -206.13619984308, -51.2500423406511, 1.48)
    pt3dadd(-7.70477014232548, -206.662731092761, -50.8956014530962, 1.48)
    pt3dadd(-6.93202406479512, -207.189262342442, -50.5411605655414, 1.48)
  }
  GCL[10] {pt3dclear()
    pt3dadd(-8.49972653012225, 121.763534224599, -1.89301535082987, 2.8028523878276)
    pt3dadd(-8.43195070918746, 120.879806216516, -1.57751322229768, 2.8028523878276)
    pt3dadd(-8.33082193894431, 120.044802609495, -1.03664175134542, 2.58618717814911)
    pt3dadd(-8.22969316870116, 119.209799002473, -0.495770280393163, 2.36952196847062)
    pt3dadd(-8.12856439845802, 118.374795395452, 0.0451011905590942, 2.15285675879212)
    pt3dadd(-8.02265705025698, 117.527871448584, 0.562410209706514, 1.97)
    pt3dadd(-7.89090423282838, 116.616475020699, 0.952279093228994, 1.97)
    pt3dadd(-7.75915141539978, 115.705078592815, 1.34214797675147, 1.97)
    pt3dadd(-7.62739859797118, 114.793682164931, 1.73201686027395, 1.97)
    pt3dadd(-7.49564578054258, 113.882285737046, 2.12188574379643, 1.97)
    pt3dadd(-7.57203815791061, 112.948334447989, 2.30512717083907, 1.97)
    pt3dadd(-7.86089057429819, 111.991360736102, 2.27745775985292, 1.97)
    pt3dadd(-8.14974299068578, 111.034387024215, 2.24978834886677, 1.97)
    pt3dadd(-8.43859540707337, 110.077413312329, 2.22211893788062, 1.97)
    pt3dadd(-8.72744782346095, 109.120439600442, 2.19444952689448, 1.97)
    pt3dadd(-8.62191820474627, 108.448398463749, 1.75454137148437, 1.97)
    pt3dadd(-8.18306450090548, 108.017176840869, 0.966216984835367, 1.97)
    pt3dadd(-7.74421079706468, 107.585955217988, 0.177892598186366, 1.97)
    pt3dadd(-7.30535709322388, 107.154733595108, -0.610431788462634, 1.97)
    pt3dadd(-6.86650338938308, 106.723511972227, -1.39875617511163, 1.97)
    pt3dadd(-6.42764968554228, 106.292290349347, -2.18708056176063, 1.97)
    pt3dadd(-5.98879598170148, 105.861068726466, -2.97540494840963, 1.97)
    pt3dadd(-5.59812049527998, 105.121434923042, -2.9464834416919, 1.97)
    pt3dadd(-5.22629742191325, 104.261117662857, -2.59776892530374, 1.97)
    pt3dadd(-4.85447434854652, 103.400800402672, -2.24905440891558, 1.97)
    pt3dadd(-4.4826512751798, 102.540483142487, -1.90033989252742, 1.97)
    pt3dadd(-4.09480156824721, 101.68531855329, -1.5671293378593, 1.97)
    pt3dadd(-3.48551658299079, 100.901346902375, -1.4481324584769, 1.97)
    pt3dadd(-2.87623159773437, 100.11737525146, -1.3291355790945, 1.97)
    pt3dadd(-2.26694661247795, 99.333403600545, -1.2101386997121, 1.97)
    pt3dadd(-1.65766162722153, 98.54943194963, -1.09114182032969, 1.97)
    pt3dadd(-1.04837664196511, 97.7654602987151, -0.972144940947294, 1.97)
    pt3dadd(-0.439091656708689, 96.9814886478001, -0.853148061564893, 1.97)
    pt3dadd(0.0363436585371382, 96.1406718407246, -0.598814061929233, 1.97)
    pt3dadd(0.503969203667802, 95.2965382708828, -0.336583503436588, 1.97)
    pt3dadd(0.971594748798466, 94.452404701041, -0.0743529449439437, 1.97)
    pt3dadd(1.43922029392913, 93.6082711311992, 0.1878776135487, 1.97)
    pt3dadd(1.85576583809672, 92.7964336546183, 0.531845290075058, 1.97)
    pt3dadd(2.02961491048264, 92.1380446459112, 1.26417063665555, 1.97)
    pt3dadd(2.20346398286856, 91.4796556372041, 1.99649598323604, 1.97)
    pt3dadd(2.37731305525448, 90.821266628497, 2.72882132981653, 1.97)
    pt3dadd(2.55116212764041, 90.1628776197899, 3.46114667639703, 1.97)
    pt3dadd(2.7542560904842, 89.4752763570328, 4.12979306767757, 1.97)
    pt3dadd(3.15457473703188, 88.5906705073176, 4.36899480654207, 1.97)
    pt3dadd(3.55489338357955, 87.7060646576023, 4.60819654540658, 1.97)
    pt3dadd(4.04928243473221, 86.8835480024567, 4.8790823163399, 1.97)
    pt3dadd(4.5825584941665, 86.0866979002887, 5.16306569456672, 1.97)
    pt3dadd(5.02605894985555, 85.3009676078954, 5.42548841256287, 1.93303241992551)
  }
  GCL[11] {pt3dclear()
    pt3dadd(5.02605894985555, 85.3009676078954, 5.42548841256287, 1.97)
    pt3dadd(5.90329958148688, 84.830376128324, 5.91957940005723, 1.97)
    pt3dadd(6.6260250394133, 84.284977304574, 6.34408857017866, 1.97)
    pt3dadd(7.34875049733973, 83.7395784808241, 6.76859774030009, 1.97)
    pt3dadd(8.06865911197389, 83.1804651523157, 7.17737750884532, 1.97)
    pt3dadd(8.77571718083937, 82.5587857337531, 7.51439915175262, 1.97)
    pt3dadd(9.48277524970486, 81.9371063151906, 7.85142079465992, 1.97)
    pt3dadd(10.1898333185703, 81.315426896628, 8.18844243756721, 1.97)
    pt3dadd(10.8968913874358, 80.6937474780655, 8.52546408047451, 1.97)
    pt3dadd(11.6039494563013, 80.0720680595029, 8.8624857233818, 1.97)
    pt3dadd(12.3110075251668, 79.4503886409403, 9.1995073662891, 1.97)
    pt3dadd(13.014525323834, 78.8241925423378, 9.5355346544058, 1.97)
    pt3dadd(13.715244660286, 78.1944261630158, 9.87077593915153, 1.97)
    pt3dadd(14.415963996738, 77.5646597836938, 10.2060172238972, 1.97)
    pt3dadd(15.11668333319, 76.9348934043718, 10.541258508643, 1.97)
    pt3dadd(15.7671355554757, 76.2497291717087, 10.8615879010081, 1.97)
    pt3dadd(16.3756763118029, 75.5183755907413, 11.1694841294598, 1.97)
    pt3dadd(16.9842170681302, 74.7870220097738, 11.4773803579115, 1.97)
    pt3dadd(17.5927578244574, 74.0556684288064, 11.7852765863633, 1.97)
    pt3dadd(18.2053974065988, 73.3283142919479, 12.0944357806547, 1.97)
    pt3dadd(18.823912067031, 72.606692783975, 12.4054052551394, 1.97)
    pt3dadd(19.4424267274633, 71.885071276002, 12.7163747296242, 1.97)
    pt3dadd(20.0609413878955, 71.1634497680291, 13.0273442041089, 1.97)
    pt3dadd(20.6454834840353, 70.5377247456404, 13.535784778019, 1.97)
    pt3dadd(21.2243340660415, 69.9280655167657, 14.0773082108998, 1.97)
    pt3dadd(21.8031846480478, 69.318406287891, 14.6188316437806, 1.97)
    pt3dadd(22.4728594467873, 68.6713143265824, 14.8360641958674, 1.90692247249265)
    pt3dadd(23.2102620713739, 67.9963086912073, 14.8114722975143, 1.79680788866342)
    pt3dadd(23.9476646959604, 67.3213030558321, 14.7868803991613, 1.68669330483418)
    pt3dadd(24.685067320547, 66.6462974204569, 14.7622885008082, 1.57657872100495)
    pt3dadd(25.4195483612227, 65.9687605184517, 14.7305319891149, 1.48)
    pt3dadd(26.1331838273616, 65.2731629655058, 14.6476557814056, 1.48)
    pt3dadd(26.8468192935005, 64.5775654125598, 14.5647795736963, 1.48)
    pt3dadd(27.5604547596394, 63.8819678596138, 14.4819033659869, 1.48)
    pt3dadd(28.1691268455232, 63.1704026811582, 14.5644293607666, 1.48)
    pt3dadd(28.4615712691091, 62.4107311548021, 15.1452696410136, 1.48)
    pt3dadd(28.7540156926949, 61.651059628446, 15.7261099212606, 1.48)
    pt3dadd(29.0737050239012, 60.862355851711, 16.0967738587295, 1.48)
    pt3dadd(29.4757694715929, 59.9858729185881, 15.8319685569574, 1.48)
    pt3dadd(29.8778339192845, 59.1093899854651, 15.5671632551853, 1.48)
    pt3dadd(30.2798983669762, 58.2329070523422, 15.3023579534132, 1.48)
    pt3dadd(30.6819628146678, 57.3564241192192, 15.0375526516412, 1.48)
    pt3dadd(30.9530925635306, 56.4512410135194, 14.7122677412632, 1.48)
    pt3dadd(31.2162184429313, 55.5443035032432, 14.3832857903243, 1.48)
    pt3dadd(31.479344322332, 54.637365992967, 14.0543038393855, 1.48)
    pt3dadd(31.7424702017327, 53.7304284826907, 13.7253218884466, 1.48)
    pt3dadd(32.0048402472271, 52.7982609431517, 13.5628347943862, 1.48)
    pt3dadd(32.2662554651789, 51.8342208894987, 13.6106768133239, 1.48)
    pt3dadd(32.5276706831307, 50.8701808358458, 13.6585188322616, 1.48)
    pt3dadd(32.7890859010824, 49.9061407821928, 13.7063608511993, 1.48)
    pt3dadd(33.0505011190342, 48.9421007285399, 13.754202870137, 1.48)
    pt3dadd(33.3036212084778, 47.981750041762, 13.8614191361068, 1.48)
    pt3dadd(33.5517715371883, 47.0236097210572, 14.0042075817196, 1.48)
  }
}
proc shape3d_14() {
  GCL[11] {
    pt3dadd(33.7999218658988, 46.0654694003523, 14.1469960273323, 1.48)
    pt3dadd(34.0480721946093, 45.1073290796475, 14.2897844729451, 1.48)
    pt3dadd(34.2777806958682, 44.1716467859805, 14.5216937874403, 1.48)
    pt3dadd(34.4698148682123, 43.2818434107461, 14.9356658034917, 1.48)
    pt3dadd(34.6618490405563, 42.3920400355117, 15.3496378195431, 1.48)
    pt3dadd(34.8538832129004, 41.5022366602773, 15.7636098355945, 1.48)
    pt3dadd(35.0748371716715, 40.6105106974019, 16.1169394800334, 1.48)
    pt3dadd(35.4952815717862, 39.7055226083345, 16.0519543659048, 1.48)
    pt3dadd(35.9157259719009, 38.8005345192671, 15.9869692517761, 1.48)
    pt3dadd(36.3361703720156, 37.8955464301997, 15.9219841376474, 1.48)
    pt3dadd(36.7566147721303, 36.9905583411322, 15.8569990235187, 1.48)
    pt3dadd(37.177059172245, 36.0855702520648, 15.79201390939, 1.48)
    pt3dadd(37.6333647526783, 35.203847987804, 15.8967506674301, 1.48)
    pt3dadd(38.0936287194233, 34.3246938242478, 16.0202214640501, 1.48)
    pt3dadd(38.5538926861684, 33.4455396606917, 16.1436922606701, 1.48)
    pt3dadd(39.0141566529134, 32.5663854971355, 16.2671630572902, 1.48)
    pt3dadd(39.4262046010374, 31.6709222078178, 16.4064661269876, 1.48)
    pt3dadd(39.6862681211229, 30.7240500045836, 16.5956749963971, 1.48)
    pt3dadd(39.9463316412084, 29.7771778013495, 16.7848838658066, 1.48)
    pt3dadd(40.2063951612938, 28.8303055981153, 16.9740927352162, 1.48)
    pt3dadd(40.5406540678742, 27.9199802816205, 16.9714233493519, 1.48)
    pt3dadd(40.9761533916087, 27.0595235921923, 16.706933983507, 1.48)
    pt3dadd(41.4116527153433, 26.1990669027642, 16.442444617662, 1.48)
    pt3dadd(41.8471520390779, 25.338610213336, 16.1779552518171, 1.48)
    pt3dadd(42.2616851777527, 24.4787152681069, 16.2683982252116, 1.48)
    pt3dadd(42.6628569709343, 23.6191783116248, 16.5850327350129, 1.48)
    pt3dadd(43.0640287641159, 22.7596413551428, 16.9016672448141, 1.48)
    pt3dadd(43.4652005572975, 21.9001043986608, 17.2183017546154, 1.48)
    pt3dadd(43.8663723504791, 21.0405674421788, 17.5349362644167, 1.48)
    pt3dadd(44.2126738769428, 20.1505415545025, 17.8083036704336, 1.48)
    pt3dadd(44.4343692176534, 19.1912776322572, 17.9834147876874, 1.48)
    pt3dadd(44.656064558364, 18.2320137100119, 18.1585259049411, 1.48)
    pt3dadd(44.9674119762636, 17.3197122157381, 18.3649422224342, 1.48)
    pt3dadd(45.5037173498899, 16.5252503981753, 18.6499105832295, 1.48)
    pt3dadd(46.0400227235162, 15.7307885806125, 18.9348789440248, 1.48)
    pt3dadd(46.5959611247575, 14.9416884198976, 19.0645840209021, 1.48)
    pt3dadd(47.1930777642526, 14.1638337780832, 18.8686404702406, 1.48)
    pt3dadd(47.7901944037478, 13.3859791362689, 18.6726969195791, 1.48)
    pt3dadd(48.387311043243, 12.6081244944546, 18.4767533689175, 1.48)
    pt3dadd(48.9844276827382, 11.8302698526402, 18.280809818256, 1.48)
    pt3dadd(49.3308388221002, 10.9224821395887, 18.4209138879468, 1.48)
    pt3dadd(49.6300251519065, 9.99021923735754, 18.6243184630687, 1.48)
    pt3dadd(49.9292114817127, 9.05795633512635, 18.8277230381906, 1.48)
    pt3dadd(50.228397811519, 8.12569343289515, 19.0311276133124, 1.48)
    pt3dadd(50.5693470754609, 7.19919086480079, 19.1196178829861, 1.48)
    pt3dadd(50.9591210508187, 6.27942265715574, 19.073762759617, 1.48)
    pt3dadd(51.3488950261765, 5.35965444951069, 19.0279076362479, 1.48)
    pt3dadd(51.7386690015343, 4.43988624186563, 18.9820525128788, 1.48)
    pt3dadd(52.1284429768921, 3.52011803422056, 18.9361973895098, 1.48)
    pt3dadd(52.5182169522498, 2.6003498265755, 18.8903422661407, 1.48)
    pt3dadd(52.9861565445259, 1.7424102478137, 19.0716962995113, 1.48)
    pt3dadd(53.4694392379619, 0.896606988637562, 19.2976491374937, 1.48)
    pt3dadd(53.9527219313978, 0.0508037294614251, 19.5236019754761, 1.48)
  }
  adendIML[15] {pt3dclear()
    pt3dadd(53.9527219313978, 0.0508037294614251, 19.5236019754761, 1.48)
    pt3dadd(54.4360046248338, -0.79499952971474, 19.7495548134585, 1.48)
    pt3dadd(54.9192873182698, -1.6408027888909, 19.975507651441, 1.48)
    pt3dadd(55.3697939390329, -2.50096654749191, 20.2118839323631, 1.48)
    pt3dadd(55.7899027182828, -3.37444880797457, 20.4579273314193, 1.48)
    pt3dadd(56.2100114975327, -4.24793106845729, 20.7039707304756, 1.48)
    pt3dadd(56.6301202767826, -5.12141332894, 20.9500141295319, 1.48)
    pt3dadd(56.8908717253033, -6.03475326367026, 21.2428946791589, 1.48)
    pt3dadd(57.0858649490547, -6.96454032317325, 21.555102409159, 1.48)
    pt3dadd(57.2808581728062, -7.89432738267623, 21.8673101391591, 1.48)
    pt3dadd(57.4758513965576, -8.82411444217928, 22.1795178691591, 1.48)
    pt3dadd(57.6635339724399, -9.7785545332926, 22.398553366877, 1.48)
    pt3dadd(57.8466443513679, -10.7484130275432, 22.5593174494911, 1.48)
    pt3dadd(58.0297547302958, -11.7182715217938, 22.7200815321053, 1.48)
    pt3dadd(58.2128651092238, -12.6881300160444, 22.8808456147195, 1.48)
    pt3dadd(58.4467054797281, -13.6434298157458, 23.0604154374126, 1.48)
    pt3dadd(58.6882326131953, -14.59652363767, 23.2428347631677, 1.48)
    pt3dadd(58.9221596332087, -15.5516233130372, 23.4224207851385, 1.48)
    pt3dadd(59.0677302685431, -16.5300423716589, 23.5690677621071, 1.48)
    pt3dadd(59.2133009038775, -17.5084614302807, 23.7157147390757, 1.48)
    pt3dadd(59.4409149840593, -18.4630837557401, 23.8927525791624, 1.48)
    pt3dadd(59.7238730979652, -19.4016535226421, 24.0902911790165, 1.48)
    pt3dadd(60.006831211871, -20.3402232895441, 24.2878297788707, 1.48)
    pt3dadd(60.2232182142441, -21.282257151963, 24.4090661523393, 1.48)
  }
  adendIML[16] {pt3dclear()
    pt3dadd(60.2232182142441, -21.282257151963, 24.4090661523393, 1.48)
    pt3dadd(60.0072336647115, -22.2900583566836, 24.2211649191589, 1.48)
    pt3dadd(59.9056885241968, -23.2780551585872, 24.1047565695177, 1.48)
    pt3dadd(59.8041433836822, -24.2660519604908, 23.9883482198765, 1.48)
    pt3dadd(59.7025982431675, -25.2540487623943, 23.8719398702352, 1.48)
    pt3dadd(59.6315338549505, -26.2387690502899, 23.7229563510811, 1.48)
    pt3dadd(59.6073831674058, -27.2184463721879, 23.5238355604792, 1.48)
    pt3dadd(59.5832324798611, -28.1981236940859, 23.3247147698773, 1.48)
    pt3dadd(59.5590817923165, -29.1778010159839, 23.1255939792755, 1.48)
    pt3dadd(59.5355691043088, -30.1576870514636, 22.930583396122, 1.48)
    pt3dadd(59.5577196618978, -31.1525112475372, 23.0297507884698, 1.48)
    pt3dadd(59.5798702194868, -32.1473354436108, 23.1289181808176, 1.48)
    pt3dadd(59.6020207770757, -33.1421596396843, 23.2280855731654, 1.48)
    pt3dadd(59.6241713346647, -34.1369838357579, 23.3272529655131, 1.48)
    pt3dadd(59.6463218922537, -35.1318080318315, 23.426420357861, 1.48)
    pt3dadd(59.6684724498427, -36.1266322279051, 23.5255877502088, 1.48)
    pt3dadd(59.6906230074317, -37.1214564239787, 23.6247551425566, 1.48)
    pt3dadd(59.7127735650206, -38.1162806200522, 23.7239225349044, 1.48)
    pt3dadd(59.7349241226096, -39.1111048161258, 23.8230899272522, 1.48)
    pt3dadd(59.7570746801986, -40.1059290121994, 23.9222573195999, 1.48)
    pt3dadd(59.7792252377875, -41.1007532082729, 24.0214247119477, 1.48)
    pt3dadd(60.1577336079106, -41.894854525322, 23.5704678860475, 1.48)
    pt3dadd(60.5535112783544, -42.6792286985926, 23.092851730663, 1.48)
    pt3dadd(60.9492889487982, -43.4636028718631, 22.6152355752786, 1.48)
    pt3dadd(61.345066619242, -44.2479770451337, 22.1376194198941, 1.48)
    pt3dadd(61.7408442896857, -45.0323512184043, 21.6600032645097, 1.48)
    pt3dadd(62.1366219601295, -45.8167253916748, 21.1823871091252, 1.48)
    pt3dadd(62.2767100416563, -46.4994181480019, 21.3082886631126, 1.48)
    pt3dadd(62.1271067649708, -47.066907825846, 22.1179641074391, 1.48)
    pt3dadd(61.9775034882854, -47.63439750369, 22.9276395517657, 1.48)
    pt3dadd(61.8279002115999, -48.201887181534, 23.7373149960923, 1.48)
    pt3dadd(61.6782969349145, -48.7693768593781, 24.5469904404189, 1.48)
    pt3dadd(61.6019630130735, -49.344192211581, 25.2112434872026, 1.48)
    pt3dadd(62.1392786373056, -49.9803619561426, 24.6575468409599, 1.48)
    pt3dadd(62.6765942615378, -50.6165317007042, 24.1038501947172, 1.48)
    pt3dadd(63.2139098857699, -51.2527014452659, 23.5501535484745, 1.48)
    pt3dadd(63.7512255100021, -51.8888711898275, 22.9964569022318, 1.48)
    pt3dadd(64.2934300656967, -52.537534988101, 22.5328921034859, 1.48)
    pt3dadd(64.8770582286368, -53.292060113709, 22.833008751224, 1.48)
    pt3dadd(65.4606863915768, -54.0465852393169, 23.1331253989621, 1.48)
    pt3dadd(64.9327398970538, -54.8254739610315, 22.994410679538, 1.48)
    pt3dadd(64.3306012120058, -55.6059888340372, 22.8264061052381, 1.48)
    pt3dadd(63.7284625269579, -56.3865037070429, 22.6584015309382, 1.48)
    pt3dadd(63.0388016307103, -57.0790017569451, 22.4476741270018, 1.48)
    pt3dadd(62.3470672002446, -57.7694145545213, 22.2359345542921, 1.48)
    pt3dadd(61.6553327697788, -58.4598273520974, 22.0241949815825, 1.48)
    pt3dadd(61.1094827585105, -59.1425244771552, 22.4829012607093, 1.48)
    pt3dadd(60.5715525264305, -59.8248027334744, 22.9780047310752, 1.48)
    pt3dadd(60.0336222943506, -60.5070809897937, 23.4731082014411, 1.48)
    pt3dadd(59.4956920622706, -61.1893592461129, 23.968211671807, 1.48)
    pt3dadd(58.9577618301907, -61.8716375024322, 24.4633151421729, 1.48)
    pt3dadd(58.9504936060787, -62.6590631270575, 24.1969426431936, 1.48)
    pt3dadd(59.1311328958033, -63.4837214539833, 23.6609313645439, 1.48)
    pt3dadd(59.3117721855279, -64.3083797809091, 23.1249200858941, 1.48)
    pt3dadd(59.4924114752525, -65.1330381078348, 22.5889088072443, 1.48)
    pt3dadd(59.6151085734276, -66.0063565991456, 22.2014029376211, 1.48)
    pt3dadd(59.5874185271775, -67.0059710239277, 22.1993382085196, 1.48)
    pt3dadd(59.5597284809275, -68.0055854487098, 22.1972734794181, 1.48)
    pt3dadd(59.5320384346774, -69.0051998734918, 22.1952087503166, 1.48)
    pt3dadd(59.4918230857471, -70.0035592839427, 22.2145034310588, 1.48)
    pt3dadd(59.4253434193109, -70.9992870538085, 22.2785866758933, 1.48)
    pt3dadd(59.3588637528747, -71.9950148236743, 22.3426699207278, 1.48)
    pt3dadd(59.2923840864386, -72.9907425935402, 22.4067531655623, 1.48)
    pt3dadd(59.3778899705306, -73.9771368644328, 22.5302925037631, 1.48)
    pt3dadd(59.4887238974697, -74.9619757291628, 22.663740063338, 1.48)
    pt3dadd(59.5995578244087, -75.9468145938928, 22.7971876229129, 1.48)
    pt3dadd(59.6747973906349, -76.9356612166533, 22.9168763385633, 1.48)
    pt3dadd(59.6969479482239, -77.9304854127269, 23.0160437309111, 1.48)
    pt3dadd(59.7190985058129, -78.9253096088005, 23.1152111232589, 1.48)
    pt3dadd(59.7412490634019, -79.920133804874, 23.2143785156068, 1.48)
    pt3dadd(59.8626366114134, -80.9029420023118, 23.3518290019423, 1.48)
    pt3dadd(59.9880123090683, -81.8852672991651, 23.4908180144561, 1.48)
    pt3dadd(60.1133880067231, -82.8675925960184, 23.62980702697, 1.48)
    pt3dadd(60.286247978794, -83.8399481789893, 23.7867308644112, 1.48)
    pt3dadd(60.4594444027492, -84.8122331211203, 23.9437817798316, 1.48)
    pt3dadd(60.6326408267044, -85.7845180632513, 24.100832695252, 1.48)
    pt3dadd(60.8058372506596, -86.7568030053824, 24.2578836106724, 1.48)
  }
  adendIML[17] {pt3dclear()
    pt3dadd(60.8058372506596, -86.7568030053824, 24.2578836106724, 1.48)
    pt3dadd(60.7761034213784, -87.7441866266896, 24.1024847577803, 1.48)
    pt3dadd(60.7463102160427, -88.7315746657709, 23.9469944841452, 1.48)
    pt3dadd(60.7165170107069, -89.7189627048521, 23.7915042105102, 1.48)
    pt3dadd(60.6867238053711, -90.7063507439334, 23.6360139368751, 1.48)
    pt3dadd(60.6763225893346, -91.6965148983498, 23.5755941482352, 1.48)
    pt3dadd(60.6984731469236, -92.6913390944234, 23.674761540583, 1.48)
    pt3dadd(60.7590441687798, -93.6816899829721, 23.7887668087983, 1.48)
    pt3dadd(60.8764536619936, -94.6654231492607, 23.9247229357182, 1.48)
    pt3dadd(60.9938631552074, -95.6491563155493, 24.0606790626382, 1.48)
    pt3dadd(61.093520574922, -96.6349563617021, 24.1897793884117, 1.48)
    pt3dadd(61.1156711325109, -97.6297805577757, 24.2889467807595, 1.48)
    pt3dadd(61.1378216900999, -98.6246047538493, 24.3881141731073, 1.48)
    pt3dadd(61.1599722476889, -99.6194289499228, 24.4872815654551, 1.48)
    pt3dadd(61.1284624267586, -100.521388158229, 24.8267270232266, 1.48)
    pt3dadd(61.0425043298278, -101.329118838443, 25.4099785588552, 1.48)
    pt3dadd(60.9565462328969, -102.136849518657, 25.9932300944838, 1.48)
    pt3dadd(60.8705881359661, -102.944580198871, 26.5764816301124, 1.48)
    pt3dadd(60.9713595567588, -103.885222654561, 26.8189669524321, 1.48)
    pt3dadd(61.1233239528841, -104.86230364084, 26.9680292500219, 1.48)
    pt3dadd(61.2752883490094, -105.839384627119, 27.1170915476118, 1.48)
    pt3dadd(61.4272527451348, -106.816465613398, 27.2661538452016, 1.48)
    pt3dadd(61.5792171412601, -107.793546599676, 27.4152161427914, 1.48)
    pt3dadd(61.7311815373854, -108.770627585955, 27.5642784403812, 1.48)
    pt3dadd(61.8831459335107, -109.747708572234, 27.713340737971, 1.48)
    pt3dadd(62.0924284433676, -110.709410963181, 27.883748289223, 1.48)
    pt3dadd(62.3347200789063, -111.662256921962, 28.0664484320308, 1.48)
    pt3dadd(62.5770117144449, -112.615102880744, 28.2491485748386, 1.48)
    pt3dadd(62.9536845976473, -113.420909580802, 27.8649655065032, 1.48)
    pt3dadd(63.3531354612871, -114.201792733736, 27.3846942196237, 1.48)
    pt3dadd(63.752586324927, -114.982675886671, 26.9044229327444, 1.48)
    pt3dadd(64.1520371885668, -115.763559039605, 26.424151645865, 1.48)
    pt3dadd(64.4694645602567, -116.633886131117, 26.2880730782894, 1.48)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(64.4694645602567, -116.633886131117, 26.2880730782894, 1.48)
    pt3dadd(64.7109916937239, -117.586979953042, 26.4704924040444, 1.48)
    pt3dadd(64.9525188271911, -118.540073774966, 26.6529117297995, 1.48)
    pt3dadd(65.0338625847929, -119.523638088922, 26.7745425429838, 1.48)
    pt3dadd(65.0560131423819, -120.518462284996, 26.8737099353316, 1.48)
    pt3dadd(65.0781636999709, -121.513286481069, 26.9728773276794, 1.48)
    pt3dadd(65.0555300048335, -122.508715228433, 27.0543303815409, 1.48)
    pt3dadd(64.994773688235, -123.504658600438, 27.1207040943519, 1.48)
    pt3dadd(64.9340173716365, -124.500601972444, 27.187077807163, 1.48)
    pt3dadd(64.8732610550379, -125.496545344449, 27.253451519974, 1.48)
    pt3dadd(64.9411388218677, -126.485477589443, 27.3702270380932, 1.48)
    pt3dadd(65.0343525662501, -127.473028911497, 27.4969297774733, 1.48)
    pt3dadd(65.1275663106325, -128.460580233552, 27.6236325168535, 1.48)
    pt3dadd(65.2207800550149, -129.448131555606, 27.7503352562336, 1.48)
    pt3dadd(65.3433884292446, -130.430906517374, 27.8882671161808, 1.48)
    pt3dadd(65.4687641268996, -131.413231814227, 28.0272561286948, 1.48)
    pt3dadd(65.5941398245545, -132.395557111081, 28.1662451412087, 1.48)
    pt3dadd(65.5154876309882, -133.389313605073, 28.2253195463777, 1.48)
    pt3dadd(65.4250878362236, -134.3837282892, 28.2797925956664, 1.48)
    pt3dadd(65.3789958370048, -135.375923153068, 28.3516441919673, 1.48)
    pt3dadd(65.4941643612867, -136.360038865789, 28.4867459128647, 1.48)
    pt3dadd(65.6093328855686, -137.344154578511, 28.6218476337621, 1.48)
    pt3dadd(65.7245014098505, -138.328270291232, 28.7569493546595, 1.48)
    pt3dadd(65.8396699341324, -139.312386003954, 28.8920510755569, 1.48)
    pt3dadd(65.9986942765494, -140.287490946486, 29.0437350604092, 1.48)
    pt3dadd(66.1745256033452, -141.259142667069, 29.2017739113456, 1.48)
    pt3dadd(66.350356930141, -142.230794387652, 29.359812762282, 1.48)
    pt3dadd(66.5261882569368, -143.202446108235, 29.5178516132183, 1.48)
    pt3dadd(66.5886170619319, -144.191197021974, 29.6324486470654, 1.48)
    pt3dadd(66.6107676195209, -145.186021218048, 29.7316160394132, 1.48)
    pt3dadd(66.6329181771099, -146.180845414121, 29.830783431761, 1.48)
    pt3dadd(66.6622095591302, -147.174612499037, 29.9326880857226, 1.48)
    pt3dadd(66.8334078601931, -148.147372011367, 30.0889893105514, 1.48)
    pt3dadd(67.004606161256, -149.120131523698, 30.2452905353803, 1.48)
    pt3dadd(67.175804462319, -150.092891036029, 30.4015917602091, 1.48)
    pt3dadd(67.3418911385909, -151.066774503132, 30.5559669312943, 1.48)
    pt3dadd(67.4858699853036, -152.045519086132, 30.7020119002173, 1.48)
    pt3dadd(67.6298488320162, -153.024263669132, 30.8480568691402, 1.48)
    pt3dadd(67.7738276787288, -154.003008252132, 30.9941018380632, 1.48)
    pt3dadd(67.9178065254414, -154.981752835131, 31.1401468069862, 1.48)
    pt3dadd(68.0833669891262, -155.954898878869, 31.29424619615, 1.48)
    pt3dadd(68.3191998991622, -156.909815377966, 31.4745717858337, 1.48)
    pt3dadd(68.5550328091981, -157.864731877064, 31.6548973755175, 1.48)
    pt3dadd(68.7908657192339, -158.819648376162, 31.8352229652013, 1.48)
    pt3dadd(69.0266986292698, -159.77456487526, 32.015548554885, 1.48)
    pt3dadd(69.4398319687014, -160.650542174957, 32.2590509468437, 1.48)
    pt3dadd(69.8644192692398, -161.521419845044, 32.5066346861436, 1.48)
    pt3dadd(70.2890065697783, -162.392297515131, 32.7542184254435, 1.48)
    pt3dadd(70.3396087762404, -163.378358885498, 32.8638786216033, 1.48)
    pt3dadd(70.3617593338294, -164.373183081571, 32.9630460139511, 1.48)
    pt3dadd(70.3839098914184, -165.368007277645, 33.0622134062989, 1.48)
    pt3dadd(70.4754821072225, -166.352091339004, 33.1351730997133, 1.48)
    pt3dadd(70.7877338135747, -167.302034362565, 33.1248230336411, 1.48)
    pt3dadd(71.099985519927, -168.251977386127, 33.1144729675689, 1.48)
    pt3dadd(71.3944703263719, -169.199597165564, 33.1850660892304, 1.48)
    pt3dadd(71.662297612429, -170.143731141181, 33.3771066602794, 1.48)
    pt3dadd(71.9301248984861, -171.087865116798, 33.5691472313284, 1.48)
    pt3dadd(72.1979521845432, -172.031999092416, 33.7611878023774, 1.48)
    pt3dadd(72.4929829754814, -172.96589393139, 33.9630918240867, 1.48)
    pt3dadd(72.7889385346485, -173.899440696529, 34.1653311483916, 1.48)
    pt3dadd(73.0848940938156, -174.832987461669, 34.3675704726966, 1.48)
    pt3dadd(73.4079465175761, -175.755007845325, 34.5795139908047, 1.48)
  }
}
proc shape3d_15() {
  adendMML[12] {
    pt3dadd(73.7477849602217, -176.669887843547, 34.7974690819448, 1.48)
    pt3dadd(74.0876234028672, -177.584767841769, 35.015424173085, 1.48)
    pt3dadd(74.1339374788754, -178.559005906741, 35.1223088138878, 1.48)
    pt3dadd(74.0729574276863, -179.554941563763, 35.1885930535625, 1.48)
    pt3dadd(74.0119773764973, -180.550877220785, 35.2548772932373, 1.48)
    pt3dadd(73.9552724080305, -181.541733507549, 35.3376876119637, 1.48)
    pt3dadd(74.008155302364, -182.402384751036, 35.8441289576019, 1.48)
    pt3dadd(74.0610381966975, -183.263035994523, 36.3505703032401, 1.48)
    pt3dadd(74.113921091031, -184.123687238009, 36.8570116488783, 1.48)
    pt3dadd(74.4539309675931, -184.915476027703, 37.2627108919171, 1.48)
    pt3dadd(75.0679081337597, -185.641558488877, 37.5722852755503, 1.48)
    pt3dadd(75.6818852999263, -186.36764095005, 37.8818596591836, 1.48)
    pt3dadd(76.1692055110571, -187.197427121973, 38.1506011198561, 1.48)
    pt3dadd(76.6487299737448, -188.033596267822, 38.4168293099742, 1.48)
    pt3dadd(76.8683807018917, -188.991648388863, 38.591019085846, 1.48)
    pt3dadd(77.0778848041286, -189.954459363107, 38.761615272853, 1.48)
    pt3dadd(77.2873889063656, -190.917270337351, 38.93221145986, 1.48)
    pt3dadd(77.3106732783362, -191.768759347156, 39.3968115639551, 1.48)
    pt3dadd(77.2522619478204, -192.571410749505, 39.9903929339231, 1.48)
    pt3dadd(77.1938506173045, -193.374062151855, 40.5839743038911, 1.48)
    pt3dadd(77.1354392867887, -194.176713554205, 41.1775556738592, 1.48)
    pt3dadd(77.0865682975003, -194.934885702758, 41.8235273811878, 1.48)
    pt3dadd(77.0486109887063, -195.642175775608, 42.52943105419, 1.48)
    pt3dadd(77.0106536799124, -196.349465848457, 43.2353347271922, 1.48)
    pt3dadd(76.9726963711185, -197.056755921306, 43.9412384001944, 1.48)
    pt3dadd(76.9347390623245, -197.764045994156, 44.6471420731965, 1.48)
    pt3dadd(76.904436722221, -198.487423957992, 45.3198076614939, 1.48)
    pt3dadd(76.9996930680011, -199.474679480664, 45.447293980533, 1.48)
    pt3dadd(77.0949494137813, -200.461935003336, 45.574780299572, 1.48)
    pt3dadd(77.1902057595615, -201.449190526008, 45.7022666186111, 1.48)
    pt3dadd(77.2854621053416, -202.43644604868, 45.8297529376501, 1.48)
    pt3dadd(77.5548887671801, -203.377005770796, 46.0221033839119, 1.48)
    pt3dadd(77.8516243796031, -204.310243847416, 46.2246241696731, 1.48)
    pt3dadd(78.1483599920261, -205.243481924037, 46.4271449554343, 1.48)
    pt3dadd(78.5121369312164, -206.144020202529, 46.6532953094697, 1.48)
    pt3dadd(78.9367242317549, -207.014897872616, 46.9008790487695, 1.48)
    pt3dadd(79.3613115322933, -207.885775542703, 47.1484627880694, 1.48)
    pt3dadd(79.6053396259969, -208.735616896556, 47.5530992460063, 1.48)
    pt3dadd(79.6788843695876, -209.565595836699, 48.1060243129091, 1.48)
    pt3dadd(79.7524291131783, -210.395574776842, 48.6589493798119, 1.48)
    pt3dadd(79.825973856769, -211.225553716985, 49.2118744467147, 1.48)
    pt3dadd(79.920836346045, -212.05766082553, 49.7468654195199, 1.48)
    pt3dadd(80.3538828923655, -212.923529131673, 49.9973504792276, 1.48)
    pt3dadd(80.7869294386861, -213.789397437816, 50.2478355389354, 1.48)
    pt3dadd(81.2199759850066, -214.655265743959, 50.4983205986431, 1.48)
    pt3dadd(81.6530225313271, -215.521134050102, 50.7488056583509, 1.48)
    pt3dadd(81.9196228306402, -216.459742856163, 50.9398574368587, 1.48)
    pt3dadd(82.134108180324, -217.421126987937, 51.1123004301778, 1.48)
    pt3dadd(82.3485935300079, -218.382511119711, 51.2847434234969, 1.48)
    pt3dadd(82.5630788796918, -219.343895251484, 51.457186416816, 1.48)
    pt3dadd(82.7775642293757, -220.305279383258, 51.6296294101351, 1.48)
    pt3dadd(82.7091797111282, -221.300351530112, 51.6928972952628, 1.48)
    pt3dadd(82.6372934002141, -222.29584071836, 51.7548136451562, 1.48)
    pt3dadd(82.5654070893001, -223.291329906608, 51.8167299950495, 1.48)
    pt3dadd(82.5040996092738, -224.201346520855, 51.4899393983059, 1.48)
    pt3dadd(82.4468844998754, -225.078298474646, 51.0127793601647, 1.48)
    pt3dadd(82.389669390477, -225.955250428437, 50.5356193220236, 1.48)
    pt3dadd(82.3324542810786, -226.832202382228, 50.0584592838825, 1.48)
    pt3dadd(82.2752391716802, -227.709154336019, 49.5812992457413, 1.48)
    pt3dadd(82.1649357632184, -228.696002779412, 49.6008239845431, 1.48)
    pt3dadd(82.0518759558169, -229.688557161265, 49.6461371064112, 1.48)
    pt3dadd(81.9388161484153, -230.681111543119, 49.6914502282793, 1.48)
    pt3dadd(81.8257563410137, -231.673665924973, 49.7367633501474, 1.48)
    pt3dadd(81.8168337272496, -232.607261283602, 49.5311422471469, 1.48)
    pt3dadd(81.9238396919246, -233.475221728231, 49.0461738047887, 1.48)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(81.9238396919246, -233.475221728231, 49.0461738047887, 1.48)
    pt3dadd(82.0308456565997, -234.34318217286, 48.5612053624304, 1.48)
    pt3dadd(82.1378516212748, -235.211142617489, 48.0762369200722, 1.48)
    pt3dadd(82.2448575859499, -236.079103062118, 47.591268477714, 1.48)
    pt3dadd(82.3518635506249, -236.947063506747, 47.1063000353557, 1.48)
    pt3dadd(82.4465933429018, -237.907887418865, 47.0945288230478, 1.48)
    pt3dadd(82.5377511731092, -238.895731543209, 47.2204424283126, 1.48)
    pt3dadd(82.6289090033166, -239.883575667553, 47.3463560335774, 1.48)
    pt3dadd(82.720066833524, -240.871419791898, 47.4722696388423, 1.48)
    pt3dadd(82.8556489842105, -241.849452531881, 47.6149183405874, 1.48)
    pt3dadd(83.0804785600335, -242.807774429205, 47.791187461377, 1.48)
    pt3dadd(83.3053081358565, -243.76609632653, 47.9674565821667, 1.48)
    pt3dadd(83.5301377116795, -244.724418223854, 48.1437257029564, 1.48)
    pt3dadd(83.7549672875025, -245.682740121178, 48.319994823746, 1.48)
    pt3dadd(83.6346434632016, -246.657432655171, 48.3608030391254, 1.48)
    pt3dadd(83.4295492284499, -247.636145852408, 48.3683417675243, 1.48)
    pt3dadd(83.2244549936982, -248.614859049644, 48.3758804959232, 1.48)
    pt3dadd(83.0193607589464, -249.593572246881, 48.3834192243221, 1.48)
    pt3dadd(82.9825071968425, -250.584213221443, 48.4587952303008, 1.48)
    pt3dadd(83.0046577544315, -251.579037417517, 48.5579626226486, 1.48)
    pt3dadd(83.0268083120205, -252.57386161359, 48.6571300149964, 1.48)
    pt3dadd(83.0325768844939, -253.569493846195, 48.7498708582527, 1.48)
    pt3dadd(83.0339999340555, -254.565340420422, 48.8409069803704, 1.48)
    pt3dadd(83.0354229836171, -255.56118699465, 48.931943102488, 1.48)
    pt3dadd(83.2941832503912, -256.485740119953, 49.1186072118504, 1.48)
    pt3dadd(83.6917719111593, -257.371831824388, 49.3568607494109, 1.48)
    pt3dadd(84.0893605719274, -258.257923528823, 49.5951142869714, 1.48)
    pt3dadd(84.5454577479982, -259.105367196351, 49.8530713980507, 1.48)
    pt3dadd(85.0817631216245, -259.899829013913, 50.138039758846, 1.48)
    pt3dadd(85.6180684952508, -260.694290831476, 50.4230081196412, 1.48)
    pt3dadd(86.0273928234759, -261.558811656588, 50.6639583848171, 1.48)
    pt3dadd(86.2874563435614, -262.505683859822, 50.8531672542266, 1.48)
    pt3dadd(86.5475198636469, -263.452556063056, 51.0423761236361, 1.48)
    pt3dadd(86.8075833837323, -264.39942826629, 51.2315849930457, 1.48)
    pt3dadd(87.0559425566826, -265.358781772844, 51.355843799597, 1.48)
    pt3dadd(87.2977680512259, -266.325102675446, 51.4438457506123, 1.48)
    pt3dadd(87.5395935457693, -267.291423578048, 51.5318477016277, 1.48)
    pt3dadd(87.8794672744537, -268.177855236267, 51.4297139912824, 1.48)
    pt3dadd(88.3853518197128, -268.929022054565, 51.0056512153201, 1.48)
    pt3dadd(88.8912363649719, -269.680188872862, 50.5815884393577, 1.48)
    pt3dadd(89.3647550307853, -270.477796939432, 50.9180316507424, 1.48)
    pt3dadd(89.8368040650128, -271.277513755293, 51.2890070188114, 1.48)
    pt3dadd(90.3088530992404, -272.077230571154, 51.6599823868805, 1.48)
    pt3dadd(90.7809021334679, -272.876947387015, 52.0309577549495, 1.48)
    pt3dadd(91.2529511676955, -273.676664202876, 52.4019331230185, 1.48)
  }
  adendIML[18] {pt3dclear()
    pt3dadd(60.8058372506596, -86.7568030053824, 24.2578836106724, 1.48)
    pt3dadd(61.234575688655, -87.4891946880584, 24.7867591892352, 1.48)
    pt3dadd(61.6633888965595, -88.2215161795478, 25.3157435612438, 1.48)
    pt3dadd(62.092202104464, -88.9538376710373, 25.8447279332525, 1.48)
    pt3dadd(62.5210153123686, -89.6861591625267, 26.3737123052611, 1.48)
    pt3dadd(62.9498285202731, -90.4184806540161, 26.9026966772697, 1.48)
    pt3dadd(63.5362074728812, -91.1095281230077, 26.5469750605743, 1.48)
    pt3dadd(64.1327259692771, -91.7979195593749, 26.1343215572646, 1.48)
    pt3dadd(64.729244465673, -92.4863109957422, 25.7216680539549, 1.48)
    pt3dadd(65.325762962069, -93.1747024321095, 25.3090145506452, 1.48)
    pt3dadd(65.8031505264953, -93.9666746581828, 25.1790271166367, 1.48)
    pt3dadd(66.1350819414607, -94.8851166648552, 25.3941685030283, 1.48)
    pt3dadd(66.467013356426, -95.8035586715278, 25.60930988942, 1.48)
    pt3dadd(66.7989447713913, -96.7220006782003, 25.8244512758117, 1.48)
    pt3dadd(67.0825445262887, -97.6589681322048, 26.0220988943728, 1.48)
    pt3dadd(67.3240716597559, -98.612061954129, 26.2045182201279, 1.48)
    pt3dadd(67.565598793223, -99.5651557760533, 26.3869375458829, 1.48)
    pt3dadd(67.9254900064297, -100.467198281402, 26.6116827991558, 1.48)
    pt3dadd(68.3258086529773, -101.351804131118, 26.8508845380202, 1.48)
    pt3dadd(68.6361026921911, -102.268230542274, 27.0572576452904, 1.48)
    pt3dadd(68.7583913078457, -103.25111031889, 27.1950721554107, 1.48)
    pt3dadd(68.8806799235004, -104.233990095507, 27.3328866655311, 1.48)
    pt3dadd(69.0482734256603, -105.206818037145, 27.4794861780255, 1.48)
    pt3dadd(69.2976482612449, -106.161501082476, 27.6419437858317, 1.48)
    pt3dadd(69.5470230968296, -107.116184127808, 27.804401393638, 1.48)
    pt3dadd(69.8790292277967, -108.032731274916, 28.0093375495423, 1.48)
    pt3dadd(70.274232726467, -108.92011164724, 28.2467617889413, 1.48)
    pt3dadd(70.6694362251372, -109.807492019563, 28.4841860283402, 1.48)
    pt3dadd(71.1032762971721, -110.657814492881, 28.5143346600715, 1.48)
    pt3dadd(71.611158122674, -111.437120528062, 28.1472676977128, 1.48)
    pt3dadd(72.1190399481758, -112.216426563243, 27.7802007353541, 1.48)
    pt3dadd(72.6269217736777, -112.995732598424, 27.4131337729954, 1.48)
    pt3dadd(73.1348035991795, -113.775038633605, 27.0460668106366, 1.48)
    pt3dadd(73.6426854246813, -114.554344668786, 26.6789998482779, 1.48)
    pt3dadd(73.9691131948107, -115.411812045218, 26.2962571587385, 1.48)
    pt3dadd(74.2414812631308, -116.292565640259, 25.9088442779747, 1.48)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(74.2414812631308, -116.292565640259, 25.9088442779747, 1.48)
    pt3dadd(74.5138493314508, -117.1733192353, 25.5214313972109, 1.48)
    pt3dadd(74.7862173997709, -118.054072830341, 25.1340185164471, 1.48)
    pt3dadd(75.058585468091, -118.934826425382, 24.7466056356833, 1.48)
    pt3dadd(75.2823053845369, -119.858478173641, 24.6092094696584, 1.48)
    pt3dadd(75.4491927921256, -120.83224507692, 24.7638917610355, 1.48)
    pt3dadd(75.6160801997142, -121.8060119802, 24.9185740524126, 1.48)
    pt3dadd(75.7829676073028, -122.779778883479, 25.0732563437897, 1.48)
    pt3dadd(75.9542247926916, -123.752485510805, 25.2295761278924, 1.48)
    pt3dadd(76.1401592681598, -124.72163086375, 25.3913959526917, 1.48)
    pt3dadd(76.3260937436281, -125.690776216695, 25.553215777491, 1.48)
    pt3dadd(76.5120282190963, -126.659921569639, 25.7150356022904, 1.48)
    pt3dadd(76.701876954915, -127.628052587672, 25.8783163556768, 1.48)
    pt3dadd(76.8957882624753, -128.595130837626, 26.0431133922593, 1.48)
    pt3dadd(77.0896995700358, -129.56220908758, 26.2079104288419, 1.48)
    pt3dadd(77.2836108775962, -130.529287337534, 26.3727074654244, 1.48)
    pt3dadd(77.5218047115761, -131.440211874633, 26.0434715371547, 1.48)
    pt3dadd(77.7609020087129, -132.349990749665, 25.704156225025, 1.48)
    pt3dadd(77.9999993058498, -133.259769624698, 25.3648409128953, 1.48)
    pt3dadd(78.2390966029866, -134.169548499731, 25.0255256007656, 1.48)
    pt3dadd(78.4781939001235, -135.079327374764, 24.6862102886359, 1.48)
    pt3dadd(78.7172911972603, -135.989106249797, 24.3468949765062, 1.48)
    pt3dadd(78.9563884943972, -136.89888512483, 24.0075796643765, 1.48)
    pt3dadd(79.2459106548791, -137.813369567593, 23.9694295262975, 1.48)
    pt3dadd(79.5778420698444, -138.731811574265, 24.1845709126892, 1.48)
    pt3dadd(79.9097734848097, -139.650253580938, 24.3997122990809, 1.48)
    pt3dadd(80.2417048997751, -140.56869558761, 24.6148536854725, 1.48)
    pt3dadd(80.517384094698, -141.508727324832, 24.8096370122594, 1.48)
    pt3dadd(80.7596757302367, -142.461573283614, 24.9923371550672, 1.48)
    pt3dadd(81.0019673657754, -143.414419242395, 25.1750372978749, 1.48)
    pt3dadd(81.2287149790446, -144.372131126403, 25.3520120285242, 1.48)
    pt3dadd(81.4526772640893, -145.330714933948, 25.5279608244569, 1.48)
    pt3dadd(81.676639549134, -146.289298741493, 25.7039096203895, 1.48)
    pt3dadd(82.1104828998791, -147.176379656015, 25.6555465435645, 1.48)
    pt3dadd(82.5918569724059, -148.047267665744, 25.5563846718087, 1.48)
    pt3dadd(83.0732310449328, -148.918155675472, 25.4572228000528, 1.48)
    pt3dadd(83.5546051174597, -149.789043685201, 25.358060928297, 1.48)
    pt3dadd(83.9588837383154, -150.685998724181, 25.3353956234848, 1.48)
    pt3dadd(84.1683878405523, -151.648809698425, 25.5059918104918, 1.48)
    pt3dadd(84.3778919427892, -152.611620672669, 25.6765879974988, 1.48)
    pt3dadd(84.5943352697489, -153.571313307621, 25.8442760824568, 1.48)
    pt3dadd(85.2316305987261, -154.341884046897, 25.8355927976642, 1.48)
    pt3dadd(85.8689259277033, -155.112454786173, 25.8269095128715, 1.48)
    pt3dadd(86.5062212566805, -155.88302552545, 25.8182262280788, 1.48)
    pt3dadd(87.1435165856577, -156.653596264726, 25.8095429432861, 1.48)
    pt3dadd(87.7776112975968, -157.422768185597, 25.8215020662318, 1.48)
    pt3dadd(88.3667579222463, -158.172295703196, 26.1233542734872, 1.48)
    pt3dadd(88.9559045468959, -158.921823220796, 26.4252064807427, 1.48)
    pt3dadd(89.5450511715455, -159.671350738396, 26.7270586879981, 1.48)
    pt3dadd(90.122812725468, -160.430790433971, 27.0252940962447, 1.48)
    pt3dadd(90.6770163725997, -161.210740337207, 27.316045649891, 1.48)
    pt3dadd(91.2312200197314, -161.990690240443, 27.6067972035373, 1.48)
    pt3dadd(91.7854236668631, -162.77064014368, 27.8975487571837, 1.48)
    pt3dadd(92.3396273139948, -163.550590046916, 28.1883003108301, 1.48)
    pt3dadd(92.8829770707212, -164.338957487373, 28.4755100380561, 1.48)
    pt3dadd(93.3854160146694, -165.159052564323, 28.7493698057598, 1.48)
    pt3dadd(93.8878549586177, -165.979147641273, 29.0232295734635, 1.48)
    pt3dadd(94.389138853758, -166.800043982997, 29.296703840914, 1.48)
    pt3dadd(94.8602645193757, -167.641861282167, 29.5601127284126, 1.48)
    pt3dadd(95.3313901849933, -168.483678581338, 29.8235216159111, 1.48)
    pt3dadd(95.8025158506109, -169.325495880509, 30.0869305034097, 1.48)
    pt3dadd(96.1815410849642, -170.21801332407, 30.3184023127088, 1.48)
    pt3dadd(96.5134724999295, -171.136455330743, 30.5335436991004, 1.48)
    pt3dadd(96.8454039148949, -172.054897337415, 30.7486850854921, 1.48)
    pt3dadd(97.1773353298601, -172.973339344088, 30.9638264718837, 1.48)
    pt3dadd(97.6899642690565, -173.775773635501, 31.2401249109078, 1.48)
    pt3dadd(98.2641068413052, -174.538716206935, 31.5372426307172, 1.48)
    pt3dadd(98.8382494135538, -175.301658778369, 31.8343603505266, 1.48)
    pt3dadd(99.144999005979, -176.20654945547, 32.0382791028683, 1.48)
    pt3dadd(99.3305043258071, -177.175803807449, 32.1999385519745, 1.48)
    pt3dadd(99.5160096456351, -178.145058159428, 32.3615980010807, 1.48)
    pt3dadd(99.7015149654632, -179.114312511407, 32.5232574501869, 1.48)
    pt3dadd(100.025281756309, -180.035519013593, 32.73541047095, 1.48)
    pt3dadd(100.357957129738, -180.953629655199, 32.9508169371574, 1.48)
    pt3dadd(100.690632503166, -181.871740296805, 33.1662234033647, 1.48)
    pt3dadd(101.030597976867, -182.786937797019, 33.3719639197032, 1.48)
    pt3dadd(101.582495322838, -183.617446817486, 33.296703794576, 1.48)
    pt3dadd(102.134392668809, -184.447955837953, 33.2214436694489, 1.48)
    pt3dadd(102.686290014779, -185.278464858419, 33.1461835443217, 1.48)
    pt3dadd(103.23818736075, -186.108973878886, 33.0709234191944, 1.48)
    pt3dadd(103.800403127907, -186.915946659326, 32.9338338927097, 1.48)
    pt3dadd(104.394644198541, -187.649869966797, 32.6048443355462, 1.48)
    pt3dadd(104.988885269174, -188.383793274269, 32.2758547783827, 1.48)
    pt3dadd(105.583126339808, -189.11771658174, 31.9468652212192, 1.48)
    pt3dadd(106.177367410441, -189.851639889211, 31.6178756640557, 1.48)
    pt3dadd(106.771608481075, -190.585563196683, 31.2888861068922, 1.48)
    pt3dadd(107.312131977946, -191.364418922313, 31.1711508342739, 1.48)
    pt3dadd(107.757918793743, -192.222517768414, 31.4259850650615, 1.48)
    pt3dadd(108.20370560954, -193.080616614516, 31.6808192958491, 1.48)
    pt3dadd(108.649492425336, -193.938715460617, 31.9356535266367, 1.48)
    pt3dadd(109.124127014079, -194.808360834383, 31.9515256858762, 1.48)
    pt3dadd(109.607796718609, -195.681622577932, 31.8925549798065, 1.48)
    pt3dadd(110.091466423139, -196.55488432148, 31.8335842737368, 1.48)
    pt3dadd(110.575136127669, -197.428146065029, 31.7746135676671, 1.48)
    pt3dadd(111.058805832199, -198.301407808578, 31.7156428615975, 1.48)
    pt3dadd(111.542475536729, -199.174669552126, 31.6566721555278, 1.48)
    pt3dadd(111.784288533643, -200.126386419199, 31.7874044575421, 1.48)
    pt3dadd(111.981231435427, -201.092658552862, 31.9533311194856, 1.48)
    pt3dadd(112.178174337211, -202.058930686525, 32.1192577814291, 1.48)
    pt3dadd(112.407999483537, -203.014388721473, 32.2972488399872, 1.48)
    pt3dadd(112.701437058863, -203.948926314515, 32.4985791074017, 1.48)
    pt3dadd(112.994874634188, -204.883463907558, 32.6999093748162, 1.48)
    pt3dadd(113.288312209513, -205.818001500601, 32.9012396422307, 1.48)
  }
}
proc shape3d_16() {
  adendMML[13] {
    pt3dadd(113.6278753832, -206.73299811573, 33.1190961081042, 1.48)
    pt3dadd(113.967713825846, -207.647878113952, 33.3370511992444, 1.48)
    pt3dadd(114.331724479157, -208.543386378361, 33.4903488812348, 1.48)
    pt3dadd(114.89353277939, -209.280378592343, 33.1145644878396, 1.48)
    pt3dadd(115.455341079623, -210.017370806325, 32.7387800944443, 1.48)
    pt3dadd(116.017149379856, -210.754363020307, 32.3629957010491, 1.48)
    pt3dadd(116.415579945194, -211.375995713899, 32.3774700955043, 1.48)
    pt3dadd(116.427773324423, -211.724909872284, 33.3145454561778, 1.48)
    pt3dadd(116.439966703653, -212.073824030669, 34.2516208168512, 1.48)
    pt3dadd(116.452160082883, -212.422738189054, 35.1886961775247, 1.48)
    pt3dadd(116.464353462112, -212.77165234744, 36.1257715381982, 1.48)
    pt3dadd(116.476546841342, -213.120566505825, 37.0628468988717, 1.48)
    pt3dadd(116.420570053033, -213.580231926127, 37.5649031633687, 1.48)
    pt3dadd(116.188173622571, -214.326513892943, 36.941160327648, 1.48)
    pt3dadd(115.955777192109, -215.07279585976, 36.3174174919272, 1.48)
    pt3dadd(115.723380761647, -215.819077826577, 35.6936746562064, 1.48)
    pt3dadd(115.490984331186, -216.565359793393, 35.0699318204856, 1.48)
  }
  adendIML[19] {pt3dclear()
    pt3dadd(60.2232182142441, -21.282257151963, 24.4090661523393, 1.48)
    pt3dadd(60.7222977615638, -22.1663123714883, 24.6678816108826, 1.48)
    pt3dadd(61.1069378998656, -23.0701719938308, 24.8552041858867, 1.48)
    pt3dadd(61.4915780381675, -23.9740316161732, 25.0425267608909, 1.48)
    pt3dadd(61.8762181764693, -24.8778912385156, 25.229849335895, 1.48)
    pt3dadd(62.238110986289, -25.7855793608062, 25.4411191366378, 1.48)
    pt3dadd(62.589696872667, -26.6950021947531, 25.6632395400139, 1.48)
    pt3dadd(62.9412827590449, -27.6044250286999, 25.88535994339, 1.48)
    pt3dadd(63.2937430211719, -28.5133518529826, 26.1077822151011, 1.48)
    pt3dadd(63.7669405590019, -29.3537876931158, 26.3718876652742, 1.48)
    pt3dadd(64.240138096832, -30.1942235332491, 26.6359931154473, 1.48)
    pt3dadd(64.713335634662, -31.0346593733823, 26.9000985656204, 1.48)
    pt3dadd(65.2788496539088, -31.8294220541579, 26.8977049993563, 1.48)
    pt3dadd(65.8992586618008, -32.5970256889445, 26.7368407000577, 1.48)
    pt3dadd(66.5196676696928, -33.3646293237311, 26.5759764007592, 1.48)
    pt3dadd(67.1400766775848, -34.1322329585178, 26.4151121014606, 1.48)
    pt3dadd(67.7604856854768, -34.8998365933044, 26.2542478021621, 1.48)
    pt3dadd(68.398317491058, -35.6660363737497, 26.2024002079894, 1.48)
    pt3dadd(69.0410377769899, -36.4318422614066, 26.1811404694766, 1.48)
    pt3dadd(69.6837580629218, -37.1976481490635, 26.1598807309638, 1.48)
    pt3dadd(70.3264783488537, -37.9634540367204, 26.1386209924509, 1.48)
    pt3dadd(70.9691986347856, -38.7292599243773, 26.1173612539381, 1.48)
    pt3dadd(71.5807097691047, -39.4983972288529, 26.2155034854341, 1.48)
    pt3dadd(72.141338356452, -40.2729659841691, 26.5083154222416, 1.48)
    pt3dadd(72.7019669437992, -41.0475347394852, 26.8011273590491, 1.48)
    pt3dadd(73.2625955311465, -41.8221034948014, 27.0939392958566, 1.48)
    pt3dadd(73.8618151426743, -42.5831486544573, 27.1868828635138, 1.48)
    pt3dadd(74.5102779285471, -43.3269373459834, 27.024789070616, 1.48)
    pt3dadd(75.1587407144199, -44.0707260375094, 26.8626952777181, 1.48)
    pt3dadd(75.8072035002928, -44.8145147290355, 26.7006014848202, 1.48)
    pt3dadd(76.4556662861656, -45.5583034205616, 26.5385076919224, 1.48)
    pt3dadd(76.939048955697, -46.3921852024776, 26.5601893936584, 1.48)
    pt3dadd(77.2540790411085, -47.3179460363026, 26.7692896658753, 1.48)
    pt3dadd(77.5691091265201, -48.2437068701276, 26.9783899380923, 1.48)
    pt3dadd(77.8841392119316, -49.1694677039526, 27.1874902103092, 1.48)
    pt3dadd(78.2051271685685, -50.0926485851439, 27.398720029802, 1.48)
    pt3dadd(78.5370585835338, -51.0110905918164, 27.6138614161936, 1.48)
    pt3dadd(78.8689899984991, -51.9295325984889, 27.8290028025853, 1.48)
    pt3dadd(79.2009214134644, -52.8479746051614, 28.0441441889769, 1.48)
    pt3dadd(79.5734322349416, -53.7104801552809, 27.9724807580168, 1.48)
    pt3dadd(79.998249548976, -54.5008841125025, 27.5311284791, 1.48)
    pt3dadd(80.4230668630105, -55.291288069724, 27.0897762001831, 1.48)
    pt3dadd(80.8478841770449, -56.0816920269456, 26.6484239212663, 1.48)
    pt3dadd(81.2727014910793, -56.8720959841671, 26.2070716423494, 1.48)
    pt3dadd(81.6363814204788, -57.7025452027109, 25.8885997768045, 1.48)
    pt3dadd(81.7707574851, -58.6831894818068, 26.0310071892988, 1.48)
    pt3dadd(81.9051335497212, -59.6638337609028, 26.1734146017932, 1.48)
    pt3dadd(82.0933600475083, -60.6304670397111, 26.3359156242192, 1.48)
    pt3dadd(82.3398124454286, -61.5819508934256, 26.5201429068888, 1.48)
    pt3dadd(82.586264843349, -62.5334347471402, 26.7043701895585, 1.48)
    pt3dadd(82.8327172412693, -63.4849186008547, 26.8885974722281, 1.48)
    pt3dadd(83.0853728615341, -64.4005308622318, 27.1752439882272, 1.48)
    pt3dadd(83.3462468535333, -65.2686184559182, 27.5975811639367, 1.48)
    pt3dadd(83.6071208455325, -66.1367060496045, 28.0199183396461, 1.48)
    pt3dadd(83.8679948375317, -67.0047936432909, 28.4422555153556, 1.48)
    pt3dadd(84.1288688295309, -67.8728812369772, 28.8645926910651, 1.48)
    pt3dadd(84.4891499549784, -68.7721892596795, 29.1058388395149, 1.48)
    pt3dadd(84.8568162518422, -69.6738167157259, 29.3336313430212, 1.48)
    pt3dadd(85.1594144246893, -70.5974898158062, 29.5376092779176, 1.48)
    pt3dadd(85.293953712767, -71.5781027217645, 29.6800786031475, 1.48)
    pt3dadd(85.4284930008448, -72.5587156277229, 29.8225479283774, 1.48)
    pt3dadd(85.5630322889226, -73.5393285336812, 29.9650172536074, 1.48)
    pt3dadd(85.8253418112144, -74.4771424064956, 30.1542943413275, 1.48)
    pt3dadd(86.1873223663023, -75.3815695999916, 30.3800852388482, 1.48)
    pt3dadd(86.5493029213901, -76.2859967934876, 30.6058761363688, 1.48)
    pt3dadd(86.911283476478, -77.1904239869836, 30.8316670338895, 1.48)
    pt3dadd(87.2871106099025, -78.0857288417058, 31.0621231504816, 1.48)
    pt3dadd(87.8530207319353, -78.8558040999844, 31.3566224380325, 1.48)
    pt3dadd(88.4189308539681, -79.6258793582629, 31.6511217255834, 1.48)
    pt3dadd(88.984840976001, -80.3959546165415, 31.9456210131343, 1.48)
    pt3dadd(89.5018123108323, -81.089818456939, 31.622916676646, 1.48)
    pt3dadd(90.0002773291995, -81.7548627720041, 31.0668153509293, 1.48)
    pt3dadd(90.4987423475666, -82.4199070870692, 30.5107140252126, 1.48)
    pt3dadd(90.9972073659338, -83.0849514021342, 29.9546126994959, 1.48)
    pt3dadd(91.436659587302, -83.8145991469107, 29.7212192581574, 1.48)
    pt3dadd(91.7599704440594, -84.6713910174833, 30.1229377919887, 1.48)
    pt3dadd(92.0832813008168, -85.5281828880558, 30.5246563258201, 1.48)
    pt3dadd(92.375408643497, -86.4119191534708, 30.8683680785991, 1.48)
    pt3dadd(92.5718639394782, -87.3783217083639, 31.0341131194815, 1.48)
    pt3dadd(92.7683192354594, -88.344724263257, 31.1998581603638, 1.48)
    pt3dadd(92.9647745314407, -89.31112681815, 31.3656032012462, 1.48)
    pt3dadd(93.3804471265474, -90.1326425139535, 31.1133283783111, 1.48)
    pt3dadd(93.87586667581, -90.9014512119258, 30.7089861270799, 1.48)
    pt3dadd(94.3712862250725, -91.670259909898, 30.3046438758488, 1.48)
    pt3dadd(94.8540912104638, -92.4500048677423, 29.9157377148322, 1.48)
    pt3dadd(95.1502612379147, -93.3915539451797, 29.7552115499354, 1.48)
    pt3dadd(95.4464312653657, -94.3331030226171, 29.5946853850385, 1.48)
    pt3dadd(95.7426012928167, -95.2746521000545, 29.4341592201416, 1.48)
    pt3dadd(96.0314836384836, -96.2179890766884, 29.301476920366, 1.48)
    pt3dadd(96.2409877407205, -97.1808000509324, 29.472073107373, 1.48)
    pt3dadd(96.4504918429573, -98.1436110251763, 29.6426692943799, 1.48)
    pt3dadd(96.6599959451942, -99.1064219994203, 29.8132654813869, 1.48)
    pt3dadd(96.9286647003691, -100.025040063007, 29.5931018959899, 1.48)
    pt3dadd(97.2106091942083, -100.933741842062, 29.2852571638035, 1.48)
    pt3dadd(97.4925536880476, -101.842443621118, 28.9774124316171, 1.48)
    pt3dadd(97.7253275518157, -102.780315091119, 28.8854484422285, 1.48)
    pt3dadd(97.9011588786114, -103.751966811702, 29.0434872931649, 1.48)
    pt3dadd(98.0769902054072, -104.723618532285, 29.2015261441012, 1.48)
    pt3dadd(98.252821532203, -105.695270252868, 29.3595649950376, 1.48)
    pt3dadd(98.3981714098201, -106.673129352127, 29.5060735092646, 1.48)
    pt3dadd(98.5102799607996, -107.657757863855, 29.6400076971678, 1.48)
    pt3dadd(98.6223885117791, -108.642386375583, 29.773941885071, 1.48)
    pt3dadd(98.7344970627586, -109.627014887311, 29.9078760729742, 1.48)
    pt3dadd(98.8816800138799, -110.603719571125, 30.0550070272188, 1.48)
    pt3dadd(99.0943096476302, -111.565638877324, 30.2267623392562, 1.48)
    pt3dadd(99.3069392813804, -112.527558183523, 30.3985176512937, 1.48)
    pt3dadd(99.5195689151306, -113.489477489722, 30.5702729633312, 1.48)
    pt3dadd(99.7321985488809, -114.451396795921, 30.7420282753687, 1.48)
    pt3dadd(99.943024103834, -115.413830779194, 30.9131145322769, 1.48)
    pt3dadd(100.152528206071, -116.376641753438, 31.0837107192839, 1.48)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(100.152528206071, -116.376641753438, 31.0837107192839, 1.48)
    pt3dadd(100.362032308308, -117.339452727682, 31.2543069062908, 1.48)
    pt3dadd(100.539118691719, -118.309385671442, 31.4126875831621, 1.48)
    pt3dadd(100.644000021517, -119.295181612645, 31.5438602516911, 1.48)
    pt3dadd(100.748881351316, -120.280977553847, 31.6750329202202, 1.48)
    pt3dadd(100.853762681115, -121.266773495049, 31.8062055887492, 1.48)
    pt3dadd(101.003816303411, -122.157366466873, 32.1790094826073, 1.48)
    pt3dadd(101.183346951076, -122.985835065804, 32.709489008258, 1.48)
    pt3dadd(101.362877598741, -123.814303664735, 33.2399685339086, 1.48)
    pt3dadd(101.542408246407, -124.642772263666, 33.7704480595593, 1.48)
    pt3dadd(101.813546888594, -125.49465073292, 34.1798272477017, 1.48)
    pt3dadd(102.213511537444, -126.379449910964, 34.4189060928651, 1.48)
    pt3dadd(102.613476186294, -127.264249089007, 34.6579849380285, 1.48)
    pt3dadd(103.039670111976, -128.131508822087, 34.9058774603103, 1.48)
    pt3dadd(103.582400028268, -128.920841260163, 35.1929289193953, 1.48)
    pt3dadd(104.125129944559, -129.710173698239, 35.4799803784803, 1.48)
    pt3dadd(104.66785986085, -130.499506136316, 35.7670318375653, 1.48)
    pt3dadd(105.210589777142, -131.288838574392, 36.0540832966503, 1.48)
    pt3dadd(105.753319693433, -132.078171012468, 36.3411347557353, 1.48)
    pt3dadd(106.296049609725, -132.867503450545, 36.6281862148203, 1.48)
    pt3dadd(106.850848673533, -133.646582875664, 36.9190949328628, 1.48)
    pt3dadd(107.43314926897, -134.402299129546, 37.2187930479246, 1.48)
    pt3dadd(108.015449864407, -135.158015383429, 37.5184911629864, 1.48)
    pt3dadd(108.597750459845, -135.913731637311, 37.8181892780483, 1.48)
    pt3dadd(109.180051055282, -136.669447891193, 38.1178873931101, 1.48)
    pt3dadd(109.790752763097, -137.378645771209, 37.7809386760854, 1.48)
    pt3dadd(110.402188157091, -138.086641941675, 37.4275434560032, 1.48)
    pt3dadd(111.013623551085, -138.794638112141, 37.074148235921, 1.48)
    pt3dadd(111.625058945079, -139.502634282607, 36.7207530158387, 1.48)
    pt3dadd(112.236494339072, -140.210630453073, 36.3673577957565, 1.48)
    pt3dadd(112.767394114321, -140.87532359572, 36.2723206089809, 1.48)
    pt3dadd(113.011689220459, -141.385912875346, 37.0967103764143, 1.48)
    pt3dadd(113.255984326596, -141.896502154972, 37.9211001438477, 1.48)
    pt3dadd(113.500279432733, -142.407091434597, 38.7454899112811, 1.48)
    pt3dadd(113.74457453887, -142.917680714222, 39.5698796787145, 1.48)
    pt3dadd(114.047646357281, -143.473283423294, 40.3002595993812, 1.48)
    pt3dadd(114.621632767136, -144.236362773644, 40.5973277840978, 1.48)
    pt3dadd(115.195619176991, -144.999442123994, 40.8943959688143, 1.48)
    pt3dadd(115.54897870626, -145.780699785568, 41.2300339645769, 1.48)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(115.54897870626, -145.780699785568, 41.2300339645769, 1.48)
    pt3dadd(115.620907161269, -146.858999815934, 41.052015729868, 1.48)
    pt3dadd(115.686057873449, -147.856822307407, 41.0417366145145, 1.48)
    pt3dadd(115.798875119001, -148.843377971772, 41.1050858419625, 1.48)
    pt3dadd(115.972444918951, -149.815573696816, 41.2622767982873, 1.48)
    pt3dadd(116.146014718902, -150.787769421861, 41.4194677546122, 1.48)
    pt3dadd(116.319584518852, -151.759965146905, 41.5766587109371, 1.48)
    pt3dadd(116.558508202657, -152.710631755744, 41.7578245441106, 1.48)
    pt3dadd(116.875316178483, -153.635641435343, 41.9675619968958, 1.48)
    pt3dadd(117.192124154309, -154.560651114942, 42.177299449681, 1.48)
    pt3dadd(117.557383464879, -155.460077309045, 42.4039369397082, 1.48)
    pt3dadd(118.014804292921, -156.310839975961, 42.662720769682, 1.48)
    pt3dadd(118.472225120963, -157.161602642876, 42.9215045996559, 1.48)
    pt3dadd(118.929645949005, -158.012365309792, 43.1802884296297, 1.48)
    pt3dadd(119.383677154739, -158.865238407244, 43.4379190731519, 1.48)
    pt3dadd(119.820126625603, -159.729058160925, 43.689568218853, 1.48)
    pt3dadd(120.256576096467, -160.592877914607, 43.9412173645542, 1.48)
    pt3dadd(120.69302556733, -161.456697668289, 44.1928665102553, 1.48)
    pt3dadd(121.129475038194, -162.32051742197, 44.4445156559565, 1.48)
    pt3dadd(121.639713790833, -163.133332204044, 44.7208087846637, 1.48)
    pt3dadd(122.172554428858, -163.930524005454, 45.0046504416388, 1.48)
    pt3dadd(122.705395066882, -164.727715806864, 45.2884920986139, 1.48)
    pt3dadd(123.126165968671, -165.593352537403, 45.5340854540003, 1.48)
    pt3dadd(123.467207744967, -166.507682648753, 45.7524680409876, 1.48)
    pt3dadd(123.808249521262, -167.422012760104, 45.970850627975, 1.48)
    pt3dadd(124.149291297558, -168.336342871454, 46.1892332149623, 1.48)
    pt3dadd(124.490333073853, -169.250672982804, 46.4076158019496, 1.48)
    pt3dadd(124.712386854921, -170.207856310101, 46.5826801196828, 1.48)
    pt3dadd(124.908842150902, -171.174258864994, 46.7484251605652, 1.48)
    pt3dadd(125.105297446883, -172.140661419887, 46.9141702014476, 1.48)
    pt3dadd(125.310492342953, -173.104576229299, 47.0831568863278, 1.48)
    pt3dadd(125.535104415574, -174.062963898711, 47.259345682653, 1.48)
    pt3dadd(125.759716488195, -175.021351568124, 47.4355344789781, 1.48)
    pt3dadd(126.055191753362, -175.946229732072, 47.6367957025054, 1.48)
    pt3dadd(126.52631741898, -176.788047031243, 47.900204590004, 1.48)
    pt3dadd(126.997443084598, -177.629864330414, 48.1636134775026, 1.48)
    pt3dadd(127.468568750215, -178.471681629584, 48.4270223650012, 1.48)
    pt3dadd(127.932716736238, -179.325348769455, 48.2371844271377, 1.48)
    pt3dadd(128.396193476189, -180.180155852612, 48.0037445802651, 1.48)
    pt3dadd(128.859670216141, -181.034962935769, 47.7703047333925, 1.48)
    pt3dadd(129.323146956092, -181.889770018927, 47.5368648865198, 1.48)
    pt3dadd(129.78867909371, -182.757993297936, 47.4563431983634, 1.48)
    pt3dadd(130.256215719062, -183.63930046843, 47.5249520548645, 1.48)
    pt3dadd(130.723752344414, -184.520607638924, 47.5935609113656, 1.48)
    pt3dadd(131.191288969766, -185.401914809418, 47.6621697678667, 1.48)
    pt3dadd(131.658825595117, -186.283221979912, 47.7307786243678, 1.48)
    pt3dadd(132.118161117209, -187.129965706495, 47.5611469400644, 1.48)
    pt3dadd(132.571381757127, -187.950938341032, 47.2138790537089, 1.48)
    pt3dadd(133.024602397045, -188.771910975569, 46.8666111673533, 1.48)
    pt3dadd(133.477823036963, -189.592883610106, 46.5193432809977, 1.48)
    pt3dadd(133.931043676882, -190.413856244642, 46.1720753946421, 1.48)
    pt3dadd(134.343450709337, -191.265865974134, 45.9902821848681, 1.48)
    pt3dadd(134.659367202048, -192.191252849887, 46.1997001874792, 1.48)
    pt3dadd(134.975283694758, -193.11663972564, 46.4091181900904, 1.48)
    pt3dadd(135.334350497961, -194.02383336655, 46.5644847792947, 1.48)
    pt3dadd(135.895327844324, -194.845896544037, 46.4669319777652, 1.48)
    pt3dadd(136.456305190688, -195.667959721524, 46.3693791762356, 1.48)
    pt3dadd(137.017282537052, -196.490022899011, 46.271826374706, 1.48)
    pt3dadd(137.578259883416, -197.312086076498, 46.1742735731764, 1.48)
    pt3dadd(138.165560899539, -198.077667843774, 46.3549871757324, 1.48)
    pt3dadd(138.764614591484, -198.818032469584, 46.659937819306, 1.48)
    pt3dadd(139.36366828343, -199.558397095394, 46.9648884628796, 1.48)
    pt3dadd(139.962721975376, -200.298761721203, 47.2698391064532, 1.48)
    pt3dadd(140.561775667322, -201.039126347013, 47.5747897500268, 1.48)
    pt3dadd(141.152723792014, -201.813359283927, 47.3727589761563, 1.48)
    pt3dadd(141.743341494291, -202.588972858226, 47.1500611694306, 1.48)
    pt3dadd(142.333959196567, -203.364586432525, 46.9273633627049, 1.48)
    pt3dadd(142.921825658794, -204.143188854057, 46.7419736167076, 1.48)
    pt3dadd(143.482691537373, -204.951123728685, 46.9227240098062, 1.48)
    pt3dadd(144.043557415952, -205.759058603313, 47.1034744029049, 1.48)
    pt3dadd(144.604423294531, -206.566993477942, 47.2842247960035, 1.48)
    pt3dadd(145.16528917311, -207.37492835257, 47.4649751891021, 1.48)
    pt3dadd(145.726155051689, -208.182863227198, 47.6457255822008, 1.48)
    pt3dadd(146.090878858539, -209.085914975575, 47.8652489102463, 1.48)
    pt3dadd(146.442464744916, -209.995337809522, 48.0873693136224, 1.48)
    pt3dadd(146.794050631294, -210.904760643469, 48.3094897169986, 1.48)
    pt3dadd(147.242160241761, -211.738166962362, 48.3960834439804, 1.48)
    pt3dadd(147.970451238556, -212.350918589647, 48.089281117968, 1.48)
    pt3dadd(148.698742235351, -212.963670216932, 47.7824787919555, 1.48)
    pt3dadd(149.427033232146, -213.576421844217, 47.4756764659431, 1.48)
    pt3dadd(150.12847530174, -214.248121738692, 47.2607463131698, 1.48)
    pt3dadd(150.807387971187, -214.96928614583, 47.1229076932469, 1.48)
    pt3dadd(151.486300640634, -215.690450552968, 46.985069073324, 1.48)
  }
}
proc shape3d_17() {
  adendMML[15] {
    pt3dadd(152.165213310081, -216.411614960106, 46.847230453401, 1.48)
    pt3dadd(152.844125979528, -217.132779367243, 46.7093918334781, 1.48)
    pt3dadd(153.520252510651, -217.852978895493, 46.5998532514422, 1.48)
    pt3dadd(154.154507583533, -218.55867774883, 46.9156215698685, 1.48)
    pt3dadd(154.788762656415, -219.264376602167, 47.2313898882949, 1.48)
    pt3dadd(155.423017729297, -219.970075455504, 47.5471582067212, 1.48)
    pt3dadd(156.057272802179, -220.675774308842, 47.8629265251475, 1.48)
    pt3dadd(156.693107982534, -221.385293255896, 48.1640629770483, 1.48)
    pt3dadd(157.339970115911, -222.121471145252, 48.3630893462241, 1.48)
    pt3dadd(157.986832249287, -222.857649034608, 48.5621157153999, 1.48)
    pt3dadd(158.633694382664, -223.593826923964, 48.7611420845757, 1.48)
    pt3dadd(159.28055651604, -224.330004813319, 48.9601684537515, 1.48)
    pt3dadd(159.845757804459, -225.153026983477, 48.9337634579449, 1.48)
    pt3dadd(160.407838830135, -225.979367475578, 48.8987447245561, 1.48)
    pt3dadd(160.969919855811, -226.80570796768, 48.8637259911673, 1.48)
    pt3dadd(161.532000881488, -227.632048459782, 48.8287072577785, 1.48)
    pt3dadd(162.067728952065, -228.429883115411, 49.0951459771883, 1.48)
    pt3dadd(162.60189789957, -229.226031276787, 49.3794198603708, 1.48)
    pt3dadd(163.136066847074, -230.022179438163, 49.6636937435534, 1.48)
    pt3dadd(163.670235794579, -230.818327599539, 49.947967626736, 1.48)
    pt3dadd(164.226391161361, -231.596517782292, 50.2393337049442, 1.48)
    pt3dadd(164.788120382085, -232.370155375164, 50.5324977502842, 1.48)
    pt3dadd(165.349849602808, -233.143792968036, 50.8256617956242, 1.48)
    pt3dadd(165.911578823532, -233.917430560908, 51.1188258409641, 1.48)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(165.911578823532, -233.917430560908, 51.1188258409641, 1.48)
    pt3dadd(166.497025781843, -234.67021145852, 51.4195056797388, 1.48)
    pt3dadd(167.086172406492, -235.41973897612, 51.7213578869943, 1.48)
    pt3dadd(167.675319031142, -236.169266493719, 52.0232100942498, 1.48)
    pt3dadd(168.27854347625, -236.88630735403, 52.2230779579156, 1.48)
    pt3dadd(168.980850067158, -237.374701477195, 51.7051622960307, 1.48)
    pt3dadd(169.683156658066, -237.86309560036, 51.1872466341458, 1.48)
    pt3dadd(170.385463248974, -238.351489723524, 50.6693309722609, 1.48)
    pt3dadd(171.087769839882, -238.839883846689, 50.1514153103761, 1.48)
    pt3dadd(171.79007643079, -239.328277969853, 49.6334996484912, 1.48)
    pt3dadd(172.49426277436, -239.828570631421, 49.2040443313201, 1.48)
    pt3dadd(173.214815939323, -240.432462695576, 49.5448045275204, 1.48)
    pt3dadd(173.935369104285, -241.03635475973, 49.8855647237206, 1.48)
    pt3dadd(174.667751673635, -241.617106289302, 50.2289162386476, 1.48)
    pt3dadd(175.546727077807, -241.911094728159, 50.6043800007869, 1.48)
    pt3dadd(176.425702481978, -242.205083167016, 50.9798437629263, 1.48)
    pt3dadd(177.289119991692, -242.422534523674, 51.4077067440207, 1.48)
    pt3dadd(178.110047295603, -242.430955257143, 51.9786773675562, 1.48)
    pt3dadd(178.930974599515, -242.439375990611, 52.5496479910917, 1.48)
    pt3dadd(179.751901903426, -242.447796724079, 53.1206186146273, 1.48)
    pt3dadd(180.572829207338, -242.456217457548, 53.6915892381628, 1.48)
    pt3dadd(181.493855645006, -242.495938408004, 54.0752578620881, 1.48)
    pt3dadd(182.421248704263, -242.537650151285, 54.4470134862739, 1.48)
    pt3dadd(183.348641763521, -242.579361894566, 54.8187691104597, 1.48)
    pt3dadd(184.276034822778, -242.621073637847, 55.1905247346455, 1.48)
    pt3dadd(185.203427882035, -242.662785381128, 55.5622803588313, 1.48)
    pt3dadd(186.119711164053, -242.604305435041, 55.9583250242776, 1.48)
    pt3dadd(187.035835663247, -242.544393532299, 56.3547168328303, 1.48)
    pt3dadd(187.95196016244, -242.484481629558, 56.7511086413831, 1.48)
    pt3dadd(188.868656671605, -242.427438364965, 57.146323210465, 1.48)
    pt3dadd(189.797954236169, -242.433589572567, 57.5156038613805, 1.48)
    pt3dadd(190.727251800733, -242.439740780169, 57.8848845122961, 1.48)
    pt3dadd(191.656549365297, -242.445891987771, 58.2541651632116, 1.48)
    pt3dadd(192.585292548989, -242.437050199348, 58.6218637537038, 1.48)
    pt3dadd(193.508785028895, -242.286205349312, 58.9745781860352, 1.48)
    pt3dadd(194.432277508801, -242.135360499275, 59.3272926183666, 1.48)
    pt3dadd(195.355769988707, -241.984515649239, 59.680007050698, 1.48)
  }
  adendMML[16] {pt3dclear()
    pt3dadd(115.54897870626, -145.780699785568, 41.2300339645769, 1.48)
    pt3dadd(115.57509755911, -146.315065923468, 42.185735689074, 1.48)
    pt3dadd(115.60799415479, -146.92990960026, 42.9736982942157, 1.48)
    pt3dadd(115.640890750469, -147.544753277052, 43.7616608993574, 1.48)
    pt3dadd(115.673787346149, -148.159596953844, 44.5496235044991, 1.48)
    pt3dadd(115.706683941829, -148.774440630636, 45.3375861096408, 1.48)
    pt3dadd(116.011487996312, -149.335317655937, 46.0867220417764, 1.48)
    pt3dadd(116.424934878494, -149.874631868487, 46.8203444622041, 1.48)
    pt3dadd(116.838381760677, -150.413946081038, 47.5539668826319, 1.48)
    pt3dadd(117.251828642859, -150.953260293589, 48.2875893030597, 1.48)
    pt3dadd(117.665275525042, -151.492574506139, 49.0212117234875, 1.48)
    pt3dadd(117.841117679026, -152.036978693096, 49.8391109524355, 1.48)
    pt3dadd(118.002967371011, -152.581682626922, 50.6619732141044, 1.48)
    pt3dadd(118.164817062995, -153.126386560748, 51.4848354757734, 1.48)
    pt3dadd(118.326666754979, -153.671090494574, 52.3076977374424, 1.48)
    pt3dadd(118.591056019092, -154.264946484117, 53.0055318419443, 1.48)
    pt3dadd(119.180202643742, -155.014474001717, 53.3073840491998, 1.48)
    pt3dadd(119.769349268391, -155.764001519316, 53.6092362564553, 1.48)
    pt3dadd(120.358495893041, -156.513529036916, 53.9110884637108, 1.48)
    pt3dadd(120.823574026856, -157.071840755699, 54.4945176219699, 1.48)
    pt3dadd(121.164244557176, -157.438414031295, 55.3602933570135, 1.48)
    pt3dadd(121.504915087496, -157.804987306891, 56.2260690920571, 1.48)
    pt3dadd(121.845585617816, -158.171560582487, 57.0918448271008, 1.48)
    pt3dadd(122.186256148136, -158.538133858083, 57.9576205621444, 1.48)
    pt3dadd(122.701191190088, -159.140117776447, 58.4668458965315, 1.48)
    pt3dadd(123.308733724132, -159.867203409639, 58.7865935334791, 1.48)
    pt3dadd(123.89982397198, -160.567052821795, 59.1494236948915, 1.48)
    pt3dadd(124.323572683129, -160.989873799885, 59.9504601798819, 1.48)
    pt3dadd(124.747321394279, -161.412694777976, 60.7514966648723, 1.48)
    pt3dadd(125.171070105428, -161.835515756066, 61.5525331498627, 1.48)
    pt3dadd(125.495541056109, -162.284269356131, 62.3599042993954, 1.48)
    pt3dadd(125.430267159603, -162.834829299741, 63.1921440887156, 1.48)
    pt3dadd(125.364993263098, -163.38538924335, 64.0243838780357, 1.48)
    pt3dadd(125.299719366592, -163.93594918696, 64.8566236673559, 1.48)
    pt3dadd(125.234445470087, -164.48650913057, 65.688863456676, 1.48)
    pt3dadd(125.169171573581, -165.037069074179, 66.5211032459962, 1.48)
    pt3dadd(125.103897677075, -165.587629017789, 67.3533430353164, 1.48)
    pt3dadd(125.498779590185, -166.437688559599, 67.6381082533437, 1.48)
    pt3dadd(125.924566427522, -167.307863054205, 67.8861040559057, 1.48)
    pt3dadd(126.350353264859, -168.178037548811, 68.1340998584677, 1.48)
    pt3dadd(126.270276512733, -168.739689840858, 68.930108733824, 1.48)
    pt3dadd(126.155638783272, -169.280263666157, 69.7635582706202, 1.48)
    pt3dadd(126.622385623098, -170.086535640939, 70.0673128019704, 1.48)
    pt3dadd(127.122712408449, -170.908153962799, 70.3404729034587, 1.48)
    pt3dadd(127.6230391938, -171.729772284658, 70.6136330049469, 1.48)
    pt3dadd(127.663582640867, -172.68576843015, 70.7165707488541, 1.48)
    pt3dadd(127.572771517896, -173.680154703722, 70.7708780124255, 1.48)
    pt3dadd(127.521195170905, -174.660412189923, 70.8394690611945, 1.48)
    pt3dadd(128.110341795555, -175.409939707522, 71.14132126845, 1.48)
    pt3dadd(128.699488420204, -176.159467225122, 71.4431734757055, 1.48)
    pt3dadd(129.288635044854, -176.908994742721, 71.745025682961, 1.48)
    pt3dadd(129.816272701169, -177.617010391023, 72.1664895775144, 1.48)
    pt3dadd(130.211413344316, -178.235604954206, 72.8456100664806, 1.48)
    pt3dadd(130.606553987464, -178.854199517389, 73.5247305554469, 1.48)
    pt3dadd(131.182540091869, -179.391871645956, 74.0903381676175, 1.48)
    pt3dadd(131.963991481363, -179.837604773219, 74.5269795595139, 1.48)
    pt3dadd(132.745442870858, -180.283337900482, 74.9636209514103, 1.48)
    pt3dadd(133.526894260352, -180.729071027746, 75.4002623433068, 1.48)
  }
  GCL[12] {pt3dclear()
    pt3dadd(5.02605894985555, 85.3009676078954, 5.42548841256287, 1.82485305121508)
    pt3dadd(4.68994420582804, 84.2429393671218, 5.37317693269308, 1.82485305121508)
    pt3dadd(4.50834463550543, 83.2597184705268, 5.39044727019621, 1.71667368250465)
    pt3dadd(4.32674506518281, 82.2764975739317, 5.40771760769935, 1.60849431379421)
    pt3dadd(4.1451454948602, 81.2932766773367, 5.42498794520249, 1.50031494508378)
    pt3dadd(4.20924888009076, 80.3093924742148, 5.5342872893257, 1.48)
    pt3dadd(4.33016071910684, 79.3253549094123, 5.66486446284145, 1.48)
    pt3dadd(4.45107255812291, 78.3413173446098, 5.7954416363572, 1.48)
    pt3dadd(4.50927460746097, 77.3504306647638, 5.90607475140781, 1.48)
    pt3dadd(4.53142516504995, 76.3556064686902, 6.00524214375561, 1.48)
    pt3dadd(4.55357572263893, 75.3607822726166, 6.1044095361034, 1.48)
    pt3dadd(4.5757262802279, 74.365958076543, 6.2035769284512, 1.48)
    pt3dadd(4.69050571399607, 73.5441389545383, 5.66897230026352, 1.48)
    pt3dadd(4.81068005269077, 72.7323960200563, 5.09745542681361, 1.48)
    pt3dadd(4.93085439138548, 71.9206530855744, 4.5259385533637, 1.48)
    pt3dadd(5.05102873008018, 71.1089101510925, 3.95442167991378, 1.48)
    pt3dadd(5.02924245969683, 70.2381233257754, 3.59510141082015, 1.48)
    pt3dadd(4.77560890933648, 69.2709071770123, 3.58233647041849, 1.48)
    pt3dadd(4.52197535897613, 68.3036910282492, 3.56957153001682, 1.48)
    pt3dadd(4.27397251651867, 67.3356162231304, 3.5591187203305, 1.48)
    pt3dadd(4.20723725803745, 66.3398989677627, 3.62309959746208, 1.48)
    pt3dadd(4.14050199955622, 65.344181712395, 3.68708047459366, 1.48)
    pt3dadd(4.07376674107499, 64.3484644570274, 3.75106135172524, 1.48)
    pt3dadd(3.88391744811246, 63.3734454284565, 3.77924344862106, 1.48)
    pt3dadd(3.60282287096194, 62.4137667759381, 3.78089347799137, 1.48)
    pt3dadd(3.32172829381142, 61.4540881234196, 3.78254350736168, 1.48)
    pt3dadd(3.04063371666091, 60.4944094709012, 3.78419353673199, 1.48)
    pt3dadd(2.80520753654891, 59.5243251326309, 3.79955370677648, 1.48)
    pt3dadd(2.63257374419114, 58.5399333542719, 3.83376482244649, 1.48)
    pt3dadd(2.45993995183338, 57.5555415759129, 3.8679759381165, 1.48)
    pt3dadd(2.28730615947562, 56.5711497975539, 3.90218705378652, 1.48)
    pt3dadd(2.11589837584433, 55.5864246254318, 3.9321998764428, 1.48)
    pt3dadd(1.94671688985424, 54.6010940467312, 3.95458905855592, 1.48)
    pt3dadd(1.77753540386414, 53.6157634680306, 3.97697824066903, 1.48)
    pt3dadd(1.60835391787405, 52.63043288933, 3.99936742278214, 1.48)
    pt3dadd(1.43917243188395, 51.6451023106293, 4.02175660489526, 1.48)
    pt3dadd(1.21507511417414, 50.6722021859124, 4.02122727874452, 1.48)
    pt3dadd(0.942749951781773, 49.7102186582002, 4.00057060093051, 1.48)
    pt3dadd(0.67042478938941, 48.748235130488, 3.9799139231165, 1.48)
    pt3dadd(0.398099626997045, 47.7862516027758, 3.95925724530248, 1.48)
    pt3dadd(0.326570613456617, 46.8817225963364, 3.74625246194874, 1.48)
    pt3dadd(0.582171565852653, 46.0707964587486, 3.21988096527443, 1.48)
    pt3dadd(0.837772518248689, 45.2598703211608, 2.69350946860013, 1.48)
    pt3dadd(1.09337347064473, 44.448944183573, 2.16713797192583, 1.48)
    pt3dadd(1.34897442304076, 43.6380180459851, 1.64076647525153, 1.48)
    pt3dadd(1.6045753754368, 42.8270919083973, 1.11439497857722, 1.48)
    pt3dadd(1.86017632783284, 42.0161657708095, 0.588023481902921, 1.48)
    pt3dadd(2.07231546370664, 41.1092086544963, 0.457571188780873, 1.48)
    pt3dadd(2.25457402186617, 40.1362289613008, 0.59931862123324, 1.48)
    pt3dadd(2.4368325800257, 39.1632492681053, 0.741066053685605, 1.48)
    pt3dadd(2.61909113818524, 38.1902695749098, 0.882813486137974, 1.48)
    pt3dadd(2.75933590475862, 37.2050366261449, 0.920943000930627, 1.48)
    pt3dadd(2.87237199538268, 36.2118683102654, 0.891968209310816, 1.48)
    pt3dadd(2.98540808600674, 35.2186999943858, 0.862993417691008, 1.48)
    pt3dadd(3.0984441766308, 34.2255316785063, 0.834018626071198, 1.48)
    pt3dadd(3.15165898368479, 33.2312734545265, 0.889387620182995, 1.48)
    pt3dadd(3.17380954127377, 32.236449258453, 0.988555012530794, 1.48)
    pt3dadd(3.19596009886274, 31.2416250623794, 1.08772240487859, 1.48)
    pt3dadd(3.21811065645172, 30.2468008663058, 1.18688979722639, 1.48)
    pt3dadd(3.18369503998941, 29.2510424263489, 1.26369803423153, 1.48)
    pt3dadd(3.12816664923005, 28.2549352889492, 1.33216093397216, 1.48)
    pt3dadd(3.07263825847069, 27.2588281515494, 1.40062383371277, 1.48)
    pt3dadd(3.01710986771133, 26.2627210141496, 1.46908673345339, 1.48)
    pt3dadd(3.2177839795902, 25.2973498827715, 1.40916584456314, 1.48)
    pt3dadd(3.49309173557866, 24.3409323724984, 1.31184582845342, 1.48)
    pt3dadd(3.7683994915671, 23.3845148622253, 1.21452581234369, 1.48)
    pt3dadd(4.04370724755555, 22.4280973519522, 1.11720579623396, 1.48)
    pt3dadd(4.319015003544, 21.4716798416791, 1.01988578012423, 1.48)
    pt3dadd(4.59432275953245, 20.515262331406, 0.922565764014505, 1.48)
  }
  GCL[13] {pt3dclear()
    pt3dadd(4.59432275953245, 20.515262331406, 0.922565764014505, 1.48)
    pt3dadd(4.83926372055133, 19.5736187610594, 0.700139966598499, 1.48)
    pt3dadd(5.07726381666084, 18.6353520344433, 0.449119043213558, 1.48)
    pt3dadd(5.31526391277034, 17.6970853078272, 0.198098119828614, 1.48)
    pt3dadd(5.55326400887984, 16.7588185812112, -0.0529228035563287, 1.48)
    pt3dadd(5.90299794599569, 15.8469550899416, -0.148119077236077, 1.48)
    pt3dadd(6.36346930156225, 14.9612593746535, -0.0888803177698483, 1.48)
    pt3dadd(6.8239406571288, 14.0755636593655, -0.0296415583036165, 1.48)
    pt3dadd(7.28441201269536, 13.1898679440774, 0.0295972011626127, 1.48)
    pt3dadd(7.74488336826192, 12.3041722287894, 0.0888359606288436, 1.48)
  }
  GCL[14] {pt3dclear()
    pt3dadd(7.74488336826192, 12.3041722287894, 0.0888359606288436, 1.48)
    pt3dadd(8.29789256321222, 11.5070639770543, -0.117618490899321, 1.48)
    pt3dadd(8.86810646211036, 10.7264259724534, -0.373470821895495, 1.48)
    pt3dadd(9.4383203610085, 9.94578796785261, -0.629323152891667, 1.48)
    pt3dadd(10.0085342599066, 9.16514996325177, -0.885175483887842, 1.48)
    pt3dadd(10.5787481588048, 8.38451195865092, -1.14102781488401, 1.48)
    pt3dadd(11.0497333912053, 7.55696833656498, -1.29922382672482, 1.48)
    pt3dadd(11.2066250037787, 6.58095194238477, -1.14830325093876, 1.48)
    pt3dadd(11.3635166163521, 5.60493554820458, -0.997382675152702, 1.48)
    pt3dadd(11.5204082289255, 4.62891915402437, -0.84646209936664, 1.48)
    pt3dadd(11.6772998414989, 3.65290275984415, -0.69554152358058, 1.48)
    pt3dadd(11.9231645157554, 2.73684030733466, -0.923725348347405, 1.48)
    pt3dadd(12.1967201595179, 1.83943724160082, -1.26989733938249, 1.48)
    pt3dadd(12.4702758032804, 0.942034175866981, -1.61606933041759, 1.48)
    pt3dadd(12.7438314470429, 0.0446311101331403, -1.96224132145269, 1.48)
  }
  adendIML[20] {pt3dclear()
    pt3dadd(12.7438314470429, 0.0446311101331403, -1.96224132145269, 1.48)
    pt3dadd(13.0050527514226, -0.879148458937975, -2.04588802380432, 1.48)
    pt3dadd(13.253651441641, -1.82992099570819, -1.86087376882594, 1.48)
    pt3dadd(13.5022501318595, -2.78069353247841, -1.67585951384757, 1.48)
    pt3dadd(13.750848822078, -3.73146606924862, -1.49084525886919, 1.48)
    pt3dadd(13.9985000364247, -4.68255261527216, -1.3061784110333, 1.48)
    pt3dadd(14.244952434345, -5.63403646898666, -1.12195112836363, 1.48)
    pt3dadd(14.4914048322654, -6.5855203227012, -0.93772384569397, 1.48)
    pt3dadd(14.7378572301857, -7.5370041764157, -0.753496563024305, 1.48)
    pt3dadd(15.0089539642117, -8.48144284087559, -0.570419320743286, 1.48)
    pt3dadd(15.3184189054181, -9.41491301018953, -0.389132550224549, 1.48)
    pt3dadd(15.6278838466244, -10.3483831795035, -0.207845779705815, 1.48)
    pt3dadd(15.9373487878308, -11.2818533488174, -0.026559009187082, 1.48)
    pt3dadd(16.2468137290372, -12.2153235181314, 0.154727761331655, 1.48)
    pt3dadd(16.5562786702435, -13.1487936874454, 0.336014531850385, 1.48)
    pt3dadd(16.8149632496227, -14.0949593163771, 0.504478958975294, 1.48)
    pt3dadd(16.908019389965, -15.082533259147, 0.631121220115176, 1.48)
    pt3dadd(17.0010755303072, -16.0701072019168, 0.757763481255061, 1.48)
    pt3dadd(17.0941316706494, -17.0576811446867, 0.884405742394943, 1.48)
    pt3dadd(17.2011443652682, -18.040367172667, 1.01614155073074, 1.48)
    pt3dadd(17.6232150687517, -18.9127124481547, 1.26286009805806, 1.48)
    pt3dadd(18.0452857722353, -19.7850577236423, 1.50957864538539, 1.48)
    pt3dadd(18.4673564757188, -20.6574029991299, 1.75629719271271, 1.48)
    pt3dadd(18.8753729591115, -21.5372328210473, 1.99811934244939, 1.48)
    pt3dadd(19.235578091132, -22.4425244812522, 2.2232843326888, 1.48)
    pt3dadd(19.5957832231526, -23.3478161414571, 2.44844932292822, 1.48)
    pt3dadd(19.9559883551731, -24.253107801662, 2.67361431316763, 1.48)
    pt3dadd(20.3161934871937, -25.1583994618669, 2.89877930340703, 1.48)
    pt3dadd(20.7669976373503, -25.9303255066818, 2.59552265781968, 1.48)
    pt3dadd(21.2501385844526, -26.6546504084254, 2.103660622339, 1.48)
    pt3dadd(21.733279531555, -27.378975310169, 1.61179858685834, 1.48)
    pt3dadd(22.2164204786573, -28.1033002119126, 1.11993655137767, 1.48)
    pt3dadd(22.6429068740569, -28.9053609084256, 0.923362487588317, 1.48)
    pt3dadd(22.9894072337046, -29.8171705637201, 1.14368192221824, 1.48)
    pt3dadd(23.3359075933523, -30.7289802190146, 1.36400135684817, 1.48)
    pt3dadd(23.5607114330408, -31.6790189763822, 1.53950775264997, 1.48)
  }
}
proc shape3d_18() {
  adendIML[20] {
    pt3dadd(23.6784160211698, -32.6627013270192, 1.6755763492427, 1.48)
    pt3dadd(23.7961206092988, -33.6463836776562, 1.81164494583543, 1.48)
    pt3dadd(23.9211901179633, -34.6279390620943, 1.95538820202414, 1.48)
    pt3dadd(24.0615646025838, -35.6050744169646, 2.11508010015959, 1.48)
    pt3dadd(24.2019390872043, -36.5822097718348, 2.27477199829504, 1.48)
    pt3dadd(24.3423135718247, -37.5593451267051, 2.43446389643049, 1.48)
    pt3dadd(24.4826880564452, -38.5364804815754, 2.59415579456594, 1.48)
    pt3dadd(24.5804650130558, -39.5199893424485, 2.73203997242593, 1.48)
    pt3dadd(24.6026155706448, -40.514813538522, 2.83120736477373, 1.48)
    pt3dadd(24.6247661282338, -41.5096377345956, 2.93037475712152, 1.48)
    pt3dadd(24.6469166858228, -42.5044619306692, 3.02954214946932, 1.48)
    pt3dadd(24.6690672434118, -43.4992861267428, 3.12870954181711, 1.48)
    pt3dadd(24.7530897875716, -44.4617815198017, 2.95369305449316, 1.48)
    pt3dadd(24.8648693318072, -45.4097735707592, 2.65567224177732, 1.48)
    pt3dadd(24.9766488760428, -46.3577656217167, 2.35765142906148, 1.48)
    pt3dadd(25.0884284202784, -47.3057576726743, 2.05963061634563, 1.48)
    pt3dadd(25.2002079645139, -48.2537497236318, 1.7616098036298, 1.48)
    pt3dadd(25.3181897687773, -49.2019121239039, 1.48588477510207, 1.48)
    pt3dadd(25.5640623252734, -50.1535871311739, 1.66989935740412, 1.48)
    pt3dadd(25.8099348817695, -51.1052621384438, 1.85391393970617, 1.48)
    pt3dadd(26.0558074382656, -52.0569371457138, 2.03792852200822, 1.48)
    pt3dadd(26.3034380322481, -52.9867030915188, 2.11374812130061, 1.48)
    pt3dadd(26.5609433403021, -53.7934081132995, 1.58184773198161, 1.48)
    pt3dadd(26.8184486483561, -54.6001131350803, 1.04994734266262, 1.48)
    pt3dadd(27.0759539564101, -55.4068181568611, 0.518046953343628, 1.48)
    pt3dadd(27.3334592644641, -56.2135231786418, -0.013853435975367, 1.48)
    pt3dadd(27.5488463387192, -57.0682342580228, -0.36933954764142, 1.48)
    pt3dadd(27.6485212685227, -58.0548332009386, -0.240159695473679, 1.48)
    pt3dadd(27.7481961983262, -59.0414321438545, -0.110979843305937, 1.48)
    pt3dadd(27.8478711281296, -60.0280310867703, 0.0182000088618004, 1.48)
    pt3dadd(27.9768771291422, -61.0122508657715, 0.0867223317995496, 1.48)
    pt3dadd(28.1702430104877, -61.9912501499692, 0.0221465044956624, 1.48)
    pt3dadd(28.3636088918333, -62.9702494341668, -0.0424293228082213, 1.48)
    pt3dadd(28.5443679471756, -63.9491450438899, -0.104986869052944, 1.48)
    pt3dadd(28.3248342883287, -64.924748775324, -0.103459831044244, 1.48)
    pt3dadd(28.1053006294817, -65.9003525067581, -0.101932793035555, 1.48)
    pt3dadd(27.8857669706348, -66.8759562381922, -0.100405755026863, 1.48)
    pt3dadd(27.7343718396994, -67.8537006912146, -0.0716485867128505, 1.48)
    pt3dadd(27.8392531694981, -68.8394966324168, 0.0595240818161997, 1.48)
    pt3dadd(27.9441344992967, -69.825292573619, 0.19069675034525, 1.48)
    pt3dadd(28.0490158290954, -70.8110885148211, 0.321869418874304, 1.48)
    pt3dadd(28.0633257371056, -71.7502508021572, 0.16298512757643, 1.48)
    pt3dadd(27.9889671663444, -72.643759227975, -0.279861906902731, 1.48)
    pt3dadd(27.9146085955833, -73.5372676537928, -0.722708941381885, 1.48)
    pt3dadd(27.8402500248221, -74.4307760796106, -1.16555597586105, 1.48)
    pt3dadd(27.765891454061, -75.3242845054284, -1.6084030103402, 1.48)
    pt3dadd(27.6199357298778, -76.249512979611, -1.86993148814861, 1.48)
    pt3dadd(27.3744050582685, -77.2188566454921, -1.87928812832221, 1.48)
    pt3dadd(27.1288743866591, -78.1882003113732, -1.88864476849581, 1.48)
    pt3dadd(26.8833437150498, -79.1575439772542, -1.89800140866941, 1.48)
    pt3dadd(26.7195546784318, -80.1346686153186, -1.87421813880633, 1.48)
    pt3dadd(26.7417052360207, -81.1294928113922, -1.77505074645853, 1.48)
    pt3dadd(26.7638557936097, -82.1243170074657, -1.67588335411073, 1.48)
    pt3dadd(26.7860063511987, -83.1191412035393, -1.57671596176294, 1.48)
    pt3dadd(26.8081569087877, -84.1139653996129, -1.47754856941514, 1.48)
    pt3dadd(26.745989065967, -85.048011305974, -1.17236616101154, 1.48)
    pt3dadd(26.635431924697, -85.9471772954267, -0.74895425526763, 1.48)
    pt3dadd(26.524874783427, -86.8463432848795, -0.32554234952373, 1.48)
    pt3dadd(26.414317642157, -87.7455092743322, 0.0978695562201715, 1.48)
    pt3dadd(26.4683221241377, -88.6279250573907, -0.0394129580601152, 1.48)
    pt3dadd(26.6184323489983, -89.5005585412891, -0.504146992935578, 1.48)
    pt3dadd(26.7685425738589, -90.3731920251875, -0.96888102781104, 1.48)
    pt3dadd(26.9186527987195, -91.2458255090859, -1.4336150626865, 1.48)
    pt3dadd(27.0401368288744, -92.1720309418421, -1.62514050358928, 1.48)
    pt3dadd(27.1284738186052, -93.1602687743859, -1.50031036870833, 1.48)
    pt3dadd(27.216810808336, -94.1485066069297, -1.37548023382739, 1.48)
    pt3dadd(27.3051477980668, -95.1367444394735, -1.25065009894644, 1.48)
    pt3dadd(27.1813560356527, -96.1047211569814, -1.21182799793203, 1.48)
    pt3dadd(26.8720165755395, -97.054975603417, -1.24823658821343, 1.48)
    pt3dadd(26.5626771154262, -98.0052300498525, -1.28464517849484, 1.48)
    pt3dadd(26.253337655313, -98.9554844962881, -1.32105376877625, 1.48)
    pt3dadd(26.0423142469877, -99.9318042336237, -1.31608502983839, 1.48)
    pt3dadd(25.8495898788453, -100.91297536396, -1.30341495021129, 1.48)
    pt3dadd(25.6568655107029, -101.894146494297, -1.29074487058418, 1.48)
    pt3dadd(25.4641411425605, -102.875317624634, -1.27807479095707, 1.48)
    pt3dadd(25.3890488478602, -103.863963049265, -1.21805224240941, 1.48)
    pt3dadd(25.4111994054492, -104.858787245339, -1.11888485006161, 1.48)
    pt3dadd(25.4333499630381, -105.853611441413, -1.01971745771381, 1.48)
    pt3dadd(25.4555005206271, -106.848435637486, -0.920550065366012, 1.48)
    pt3dadd(25.3537869941317, -107.84063411512, -0.870767359061045, 1.48)
    pt3dadd(25.233145592972, -108.832431352395, -0.828531207955354, 1.48)
    pt3dadd(25.1125041918124, -109.824228589669, -0.78629505684966, 1.48)
    pt3dadd(24.9918627906527, -110.816025826944, -0.744058905743966, 1.48)
    pt3dadd(24.9607985650376, -111.8097219556, -0.666108279989952, 1.48)
    pt3dadd(24.9829491226266, -112.804546151673, -0.566940887642151, 1.48)
    pt3dadd(25.0050996802156, -113.799370347747, -0.467773495294349, 1.48)
    pt3dadd(25.0272502378045, -114.79419454382, -0.368606102946547, 1.48)
    pt3dadd(24.9463027136129, -115.760144983613, -0.17872000831796, 1.48)
    pt3dadd(24.7379771234578, -116.690421789439, 0.123249382562758, 1.48)
  }
  adendMML[17] {pt3dclear()
    pt3dadd(24.7379771234578, -116.690421789439, 0.123249382562758, 1.48)
    pt3dadd(24.5296515333026, -117.620698595265, 0.425218773443476, 1.48)
    pt3dadd(24.3213259431475, -118.550975401091, 0.7271881643242, 1.48)
    pt3dadd(24.1130003529924, -119.481252206917, 1.02915755520492, 1.48)
    pt3dadd(23.9046747628373, -120.411529012743, 1.33112694608564, 1.48)
    pt3dadd(23.6963491726821, -121.341805818569, 1.63309633696636, 1.48)
    pt3dadd(23.5712921429466, -122.300620395647, 1.84100970434557, 1.48)
    pt3dadd(23.555660450843, -123.296937185309, 1.92532165390136, 1.48)
    pt3dadd(23.5400287587394, -124.293253974972, 2.00963360345716, 1.48)
    pt3dadd(23.5243970666358, -125.289570764635, 2.09394555301295, 1.48)
    pt3dadd(23.5087653745322, -126.285887554298, 2.17825750256874, 1.48)
    pt3dadd(23.5123598517928, -127.283251249465, 2.19309346284927, 1.48)
    pt3dadd(23.5345700839263, -128.281628611778, 2.14065923730133, 1.48)
    pt3dadd(23.5567803160598, -129.280005974091, 2.08822501175337, 1.48)
    pt3dadd(23.5789905481932, -130.278383336405, 2.03579078620543, 1.48)
    pt3dadd(23.6012007803267, -131.276760698718, 1.98335656065748, 1.48)
    pt3dadd(23.6234110124602, -132.275138061032, 1.93092233510953, 1.48)
    pt3dadd(23.6932910745816, -133.266234756426, 1.9787075860488, 1.48)
    pt3dadd(23.8038705734041, -134.251115380932, 2.11205798879469, 1.48)
    pt3dadd(23.9144500722266, -135.235996005438, 2.24540839154058, 1.48)
    pt3dadd(24.0181259180637, -136.221631939322, 2.37608821797951, 1.48)
    pt3dadd(24.0350233193758, -137.216762060284, 2.47319908340747, 1.48)
    pt3dadd(24.051920720688, -138.211892181245, 2.57030994883542, 1.48)
    pt3dadd(24.0688181220001, -139.207022302207, 2.66742081426338, 1.48)
    pt3dadd(23.9033632507203, -140.066441705851, 3.02646000784911, 1.48)
    pt3dadd(23.5785439647527, -140.807258479956, 3.61440808265531, 1.48)
    pt3dadd(23.253724678785, -141.548075254061, 4.20235615746152, 1.48)
    pt3dadd(22.9289053928174, -142.288892028166, 4.79030423226773, 1.48)
    pt3dadd(22.6040861068498, -143.029708802271, 5.37825230707393, 1.48)
    pt3dadd(22.5226166741532, -143.901787490581, 5.56070153871742, 1.48)
    pt3dadd(22.6427486745342, -144.882609166227, 5.40721817457719, 1.48)
    pt3dadd(22.7628806749153, -145.863430841873, 5.25373481043696, 1.48)
    pt3dadd(22.8830126752963, -146.844252517519, 5.10025144629672, 1.48)
    pt3dadd(23.0031446756774, -147.825074193164, 4.9467680821565, 1.48)
    pt3dadd(23.1232766760584, -148.80589586881, 4.79328471801627, 1.48)
    pt3dadd(23.0971427623346, -149.801237382097, 4.8530623789553, 1.48)
    pt3dadd(23.0600224194314, -150.797669519737, 4.92885865341135, 1.48)
    pt3dadd(23.0229020765282, -151.794101657377, 5.0046549278674, 1.48)
    pt3dadd(22.985781733625, -152.790533795016, 5.08045120232344, 1.48)
    pt3dadd(22.9486613907218, -153.786965932656, 5.15624747677949, 1.48)
    pt3dadd(23.0107724440921, -154.776519152826, 5.27079132339819, 1.48)
    pt3dadd(23.1060287898722, -155.763774675499, 5.39827764243725, 1.48)
    pt3dadd(23.2012851356524, -156.751030198171, 5.5257639614763, 1.48)
    pt3dadd(23.2965414814326, -157.738285720843, 5.65325028051536, 1.48)
    pt3dadd(23.3852302824366, -158.712613658272, 5.56931585551977, 1.48)
    pt3dadd(23.4686873946913, -159.676643515585, 5.3169642265906, 1.48)
    pt3dadd(23.5521445069461, -160.640673372898, 5.06461259766144, 1.48)
    pt3dadd(23.6356016192009, -161.604703230211, 4.81226096873227, 1.48)
    pt3dadd(23.7190587314557, -162.568733087524, 4.55990933980311, 1.48)
    pt3dadd(23.6976120669506, -163.545920195498, 4.45058214702693, 1.48)
    pt3dadd(23.5677496017359, -164.536705039509, 4.48906763788835, 1.48)
    pt3dadd(23.4378871365212, -165.52748988352, 4.52755312874976, 1.48)
    pt3dadd(23.3080246713064, -166.51827472753, 4.56603861961118, 1.48)
    pt3dadd(23.3522775336319, -167.494384977336, 4.67227550863749, 1.48)
    pt3dadd(23.5649071673822, -168.456304283535, 4.84403082067496, 1.48)
    pt3dadd(23.7775368011324, -169.418223589734, 5.01578613271245, 1.48)
    pt3dadd(23.9901664348827, -170.380142895933, 5.18754144474993, 1.48)
    pt3dadd(24.2027960686329, -171.342062202132, 5.35929675678741, 1.48)
    pt3dadd(24.2292344767464, -172.329386337475, 5.45948408829994, 1.48)
    pt3dadd(24.1891131686311, -173.325792201633, 5.53408726858017, 1.48)
    pt3dadd(24.1489918605157, -174.32219806579, 5.60869044886041, 1.48)
    pt3dadd(24.1088705524004, -175.318603929948, 5.68329362914066, 1.48)
    pt3dadd(24.068749244285, -176.315009794105, 5.75789680942089, 1.48)
    pt3dadd(24.0787944143178, -177.31014145977, 5.85228902274159, 1.48)
    pt3dadd(24.1009449719068, -178.304965655844, 5.95145641508938, 1.48)
    pt3dadd(24.1230955294958, -179.299789851918, 6.05062380743718, 1.48)
    pt3dadd(24.1452460870847, -180.294614047991, 6.14979119978498, 1.48)
    pt3dadd(24.1889953270351, -181.282099523888, 6.27437937696036, 1.48)
    pt3dadd(24.3704232394695, -182.222805051137, 6.56100984217965, 1.48)
    pt3dadd(24.5518511519039, -183.163510578387, 6.84764030739895, 1.48)
    pt3dadd(24.7332790643383, -184.104216105636, 7.13427077261824, 1.48)
    pt3dadd(24.9147069767727, -185.044921632886, 7.42090123783754, 1.48)
    pt3dadd(25.0961348892071, -185.985627160136, 7.70753170305683, 1.48)
    pt3dadd(25.2775628016415, -186.926332687385, 7.99416216827612, 1.48)
    pt3dadd(25.458990714076, -187.867038214635, 8.28079263349542, 1.48)
    pt3dadd(25.6404186265104, -188.807743741884, 8.56742309871471, 1.48)
    pt3dadd(25.8305021425771, -189.749101721348, 8.84342918148257, 1.48)
    pt3dadd(26.0911306184253, -190.695777321303, 9.03284434990385, 1.48)
    pt3dadd(26.3517590942736, -191.642452921257, 9.22225951832513, 1.48)
    pt3dadd(26.6123875701218, -192.589128521211, 9.41167468674641, 1.48)
    pt3dadd(26.87301604597, -193.535804121166, 9.60108985516768, 1.48)
    pt3dadd(27.1293822523952, -194.483340271608, 9.78889204265025, 1.48)
    pt3dadd(27.1515328099842, -195.478164467682, 9.88805943499804, 1.48)
    pt3dadd(27.1736833675732, -196.472988663755, 9.98722682734585, 1.48)
    pt3dadd(27.1958339251622, -197.467812859829, 10.0863942196936, 1.48)
    pt3dadd(27.2179844827511, -198.462637055903, 10.1855616120414, 1.48)
    pt3dadd(27.2401350403401, -199.457461251976, 10.2847290043892, 1.48)
    pt3dadd(27.3044368891034, -200.446822187514, 10.4001246344976, 1.48)
    pt3dadd(27.4443703308326, -201.426380455432, 10.5446384111366, 1.48)
    pt3dadd(27.5843037725618, -202.405938723351, 10.6891521877755, 1.48)
    pt3dadd(27.724237214291, -203.385496991269, 10.8336659644144, 1.48)
    pt3dadd(27.8641706560202, -204.365055259188, 10.9781797410533, 1.48)
    pt3dadd(27.9985147067964, -205.345605496501, 11.1205659076764, 1.48)
    pt3dadd(28.1025807236076, -206.331529285833, 11.2514266954406, 1.48)
    pt3dadd(28.2066467404188, -207.317453075165, 11.3822874832048, 1.48)
    pt3dadd(28.3107127572301, -208.303376864497, 11.5131482709689, 1.48)
    pt3dadd(28.4147787740413, -209.289300653829, 11.6440090587331, 1.48)
    pt3dadd(28.5188447908525, -210.275224443161, 11.7748698464973, 1.48)
    pt3dadd(28.628002095838, -211.260311501867, 11.9076747129252, 1.48)
    pt3dadd(28.745706683967, -212.243993852504, 12.0437433095179, 1.48)
    pt3dadd(28.8634112720961, -213.227676203141, 12.1798119061107, 1.48)
    pt3dadd(29.0219589866327, -214.184300240665, 12.2200134824178, 1.48)
    pt3dadd(29.3852963950559, -215.005252400278, 11.7795325188484, 1.48)
    pt3dadd(29.7486338034792, -215.826204559891, 11.339051555279, 1.48)
    pt3dadd(30.1119712119025, -216.647156719504, 10.8985705917096, 1.48)
    pt3dadd(30.4753086203257, -217.468108879117, 10.4580896281402, 1.48)
    pt3dadd(30.8144355223221, -218.307751150588, 10.0900694512848, 1.48)
    pt3dadd(30.9791861103311, -219.282009061915, 10.2439485140842, 1.48)
    pt3dadd(31.14393669834, -220.256266973242, 10.3978275768836, 1.48)
    pt3dadd(31.308687286349, -221.230524884568, 10.551706639683, 1.48)
    pt3dadd(31.4734378743579, -222.204782795895, 10.7055857024824, 1.48)
    pt3dadd(31.5110352146521, -223.1973792019, 10.8106795962651, 1.48)
    pt3dadd(31.5331857722411, -224.192203397974, 10.9098469886129, 1.48)
    pt3dadd(31.5553363298301, -225.187027594047, 11.0090143809607, 1.48)
    pt3dadd(31.6067492009577, -226.182467796864, 11.0601487267945, 1.48)
    pt3dadd(31.6936856055478, -227.178655812602, 11.0529724563848, 1.48)
    pt3dadd(31.780622010138, -228.17484382834, 11.045796185975, 1.48)
    pt3dadd(31.8675584147281, -229.171031844078, 11.0386199155653, 1.48)
    pt3dadd(31.9544948193183, -230.167219859816, 11.0314436451555, 1.48)
    pt3dadd(31.9898892857091, -231.16232285603, 11.1088716324262, 1.48)
    pt3dadd(32.0120398432981, -232.157147052104, 11.208039024774, 1.48)
    pt3dadd(32.0341904008871, -233.151971248178, 11.3072064171218, 1.48)
  }
  adendOML[12] {pt3dclear()
    pt3dadd(32.0341904008871, -233.151971248178, 11.3072064171218, 1.48)
    pt3dadd(32.0563409584761, -234.146795444251, 11.4063738094696, 1.48)
    pt3dadd(32.078491516065, -235.141619640325, 11.5055412018174, 1.48)
    pt3dadd(32.2950499123795, -236.104031350196, 11.5670088035278, 1.48)
    pt3dadd(32.6230780321531, -237.047858362572, 11.6068600688579, 1.48)
    pt3dadd(32.9511061519266, -237.991685374947, 11.6467113341881, 1.48)
    pt3dadd(33.2791342717001, -238.935512387322, 11.6865625995183, 1.48)
    pt3dadd(33.6071623914737, -239.879339399698, 11.7264138648485, 1.48)
    pt3dadd(34.0571558341573, -240.745038509539, 11.5821862433613, 1.48)
    pt3dadd(34.5677697475336, -241.571905678359, 11.3464658229606, 1.48)
    pt3dadd(35.0783836609099, -242.398772847179, 11.1107454025599, 1.48)
    pt3dadd(35.5889975742863, -243.225640015999, 10.8750249821591, 1.48)
    pt3dadd(36.0996114876626, -244.052507184819, 10.6393045617584, 1.48)
    pt3dadd(36.6102254010389, -244.879374353639, 10.4035841413577, 1.48)
    pt3dadd(37.0184078483628, -245.759914979225, 10.5974123949416, 1.48)
    pt3dadd(37.4159965091309, -246.64600668366, 10.8356659325021, 1.48)
    pt3dadd(37.813585169899, -247.532098388095, 11.0739194700625, 1.48)
    pt3dadd(37.7969821736206, -248.307459580055, 11.5965266562328, 1.48)
    pt3dadd(37.5841053788083, -249.030348690727, 12.2538810537247, 1.48)
    pt3dadd(37.371228583996, -249.7532378014, 12.9112354512165, 1.48)
    pt3dadd(37.5101798987335, -250.556151027607, 13.3444174909722, 1.48)
    pt3dadd(37.9384400334453, -251.424868212642, 13.5932622406506, 1.48)
    pt3dadd(38.3667001681571, -252.293585397676, 13.8421069903289, 1.48)
  }
  GCL[15] {pt3dclear()
    pt3dadd(7.74488336826192, 12.3041722287894, 0.0888359606288436, 1.48)
    pt3dadd(7.83640619200234, 11.5605396009174, -0.489158524799857, 1.48)
    pt3dadd(7.85933383020213, 10.8433194479549, -1.18562788923098, 1.48)
    pt3dadd(7.88226146840192, 10.1260992949925, -1.88209725366211, 1.48)
    pt3dadd(7.90518910660171, 9.40887914203005, -2.57856661809324, 1.48)
    pt3dadd(7.92811674480151, 8.69165898906759, -3.27503598252437, 1.48)
    pt3dadd(7.9510443830013, 7.97443883610514, -3.9715053469555, 1.48)
    pt3dadd(7.97397202120109, 7.25721868314271, -4.66797471138662, 1.48)
    pt3dadd(7.98662370933762, 6.46221060475706, -5.26506250976175, 1.48)
    pt3dadd(7.9920405892372, 5.61243574372615, -5.79218046901948, 1.48)
    pt3dadd(7.99745746913677, 4.76266088269523, -6.31929842827721, 1.48)
    pt3dadd(8.00287434903634, 3.91288602166432, -6.84641638753494, 1.48)
    pt3dadd(8.00829122893591, 3.06311116063341, -7.37353434679267, 1.48)
    pt3dadd(8.01198360295708, 2.21129748051607, -7.8943347269546, 1.48)
    pt3dadd(7.8995865292617, 1.22223556906587, -7.98985139117152, 1.48)
  }
}
proc shape3d_19() {
  GCL[15] {
    pt3dadd(7.78718945556632, 0.233173657615624, -8.08536805538843, 1.48)
  }
  adendIML[21] {pt3dclear()
    pt3dadd(7.78718945556632, 0.233173657615624, -8.08536805538843, 1.48)
    pt3dadd(7.67479238187094, -0.755888253834597, -8.18088471960534, 1.48)
    pt3dadd(7.56239530817556, -1.74495016528482, -8.27640138382226, 1.48)
    pt3dadd(7.44999823448019, -2.73401207673504, -8.37191804803917, 1.48)
    pt3dadd(7.45112797438255, -3.5895647658177, -8.87993362734668, 1.48)
    pt3dadd(7.4578804028932, -4.43850508941665, -9.40837920796677, 1.48)
    pt3dadd(7.46463283140386, -5.28744541301566, -9.93682478858686, 1.48)
    pt3dadd(7.47138525991451, -6.13638573661458, -10.465270369207, 1.48)
    pt3dadd(7.47813768842517, -6.98532606021354, -10.993715949827, 1.48)
    pt3dadd(7.31589404389295, -7.82271935879368, -11.2058726739345, 1.48)
    pt3dadd(6.85507350235187, -8.63971174013511, -10.8592202870628, 1.48)
    pt3dadd(6.3942529608108, -9.45670412147663, -10.5125679001912, 1.48)
    pt3dadd(5.93343241926972, -10.2736965028181, -10.1659155133196, 1.48)
    pt3dadd(5.47261187772865, -11.0906888841596, -9.81926312644798, 1.48)
    pt3dadd(5.31460853594301, -11.8508974151917, -10.1792917317271, 1.48)
    pt3dadd(5.2928999526022, -12.5855481471038, -10.8573898363627, 1.48)
    pt3dadd(5.27119136926138, -13.3201988790159, -11.5354879409983, 1.48)
    pt3dadd(5.24948278592057, -14.054849610928, -12.2135860456339, 1.48)
    pt3dadd(5.22777420257975, -14.78950034284, -12.8916841502695, 1.48)
    pt3dadd(5.20606561923894, -15.5241510747521, -13.5697822549051, 1.48)
    pt3dadd(5.18435703589812, -16.2588018066642, -14.2478803595407, 1.48)
    pt3dadd(5.16264845255731, -16.9934525385762, -14.9259784641763, 1.48)
    pt3dadd(5.08212366945853, -17.7607231213805, -15.4997967725066, 1.48)
    pt3dadd(4.71303452861088, -18.6880333932724, -15.5619969795169, 1.48)
    pt3dadd(4.34394538776322, -19.6153436651643, -15.6241971865271, 1.48)
    pt3dadd(3.97485624691557, -20.5426539370562, -15.6863973935374, 1.48)
    pt3dadd(3.60576710606792, -21.4699642089481, -15.7485976005476, 1.48)
    pt3dadd(3.23667796522027, -22.39727448084, -15.8107978075579, 1.48)
    pt3dadd(2.86758882437262, -23.3245847527319, -15.8729980145681, 1.48)
    pt3dadd(2.5435189569378, -24.25475241034, -15.9654798761038, 1.48)
    pt3dadd(2.54298440065612, -25.2054549434956, -16.2755837420924, 1.48)
    pt3dadd(2.54244984437443, -26.1561574766512, -16.5856876080809, 1.48)
    pt3dadd(2.54191528809275, -27.1068600098069, -16.8957914740695, 1.48)
    pt3dadd(2.54138073181106, -28.0575625429625, -17.2058953400581, 1.48)
    pt3dadd(2.54084617552938, -29.0082650761181, -17.5159992060467, 1.48)
    pt3dadd(2.51178397989875, -29.9661681840761, -17.7390392627086, 1.48)
    pt3dadd(2.37520784117489, -30.9512085598633, -17.6339563601961, 1.48)
    pt3dadd(2.23863170245103, -31.9362489356504, -17.5288734576837, 1.48)
    pt3dadd(2.10205556372717, -32.9212893114375, -17.4237905551712, 1.48)
    pt3dadd(1.96547942500331, -33.9063296872247, -17.3187076526588, 1.48)
    pt3dadd(1.82890328627945, -34.8913700630117, -17.2136247501464, 1.48)
    pt3dadd(1.69232714755559, -35.8764104387989, -17.1085418476339, 1.48)
    pt3dadd(1.55575100883173, -36.861450814586, -17.0034589451215, 1.48)
    pt3dadd(1.41917487010787, -37.8464911903731, -16.8983760426091, 1.48)
    pt3dadd(1.32006932819703, -38.8338412317286, -16.7946896140451, 1.48)
    pt3dadd(1.34221988578601, -39.8286654278022, -16.6955222216973, 1.48)
    pt3dadd(1.36437044337499, -40.8234896238757, -16.5963548293495, 1.48)
    pt3dadd(1.38652100096397, -41.8183138199493, -16.4971874370017, 1.48)
    pt3dadd(1.40867155855295, -42.8131380160229, -16.3980200446539, 1.48)
    pt3dadd(1.43082211614193, -43.8079622120965, -16.2988526523061, 1.48)
    pt3dadd(1.4529726737309, -44.80278640817, -16.1996852599583, 1.48)
    pt3dadd(1.47512323131988, -45.7976106042436, -16.1005178676105, 1.48)
    pt3dadd(1.49727378890886, -46.7924348003172, -16.0013504752627, 1.48)
    pt3dadd(1.51942434649783, -47.7872589963907, -15.9021830829149, 1.48)
    pt3dadd(1.56136953575014, -48.7723714151861, -15.9361600012664, 1.48)
    pt3dadd(1.63226694999263, -49.7432790957676, -16.1648778021508, 1.48)
    pt3dadd(1.70316436423513, -50.7141867763492, -16.3935956030352, 1.48)
    pt3dadd(1.77406177847763, -51.6850944569308, -16.6223134039196, 1.48)
    pt3dadd(1.84495919272013, -52.6560021375124, -16.851031204804, 1.48)
    pt3dadd(1.91585660696263, -53.626909818094, -17.0797490056884, 1.48)
    pt3dadd(1.98675402120513, -54.5978174986756, -17.3084668065728, 1.48)
    pt3dadd(2.05765143544763, -55.5687251792572, -17.5371846074572, 1.48)
    pt3dadd(2.07584690824466, -56.5425473458443, -17.5205238645815, 1.48)
    pt3dadd(2.05132497041564, -57.5187318408779, -17.304972232203, 1.48)
    pt3dadd(2.02680303258663, -58.4949163359115, -17.0894205998244, 1.48)
    pt3dadd(2.00228109475761, -59.4711008309452, -16.8738689674458, 1.48)
    pt3dadd(1.9777591569286, -60.4472853259788, -16.6583173350672, 1.48)
    pt3dadd(1.9377875312903, -61.4241667097252, -16.4622864523815, 1.48)
    pt3dadd(1.75640779654734, -62.4074265857977, -16.4449253484286, 1.48)
    pt3dadd(1.57502806180438, -63.3906864618702, -16.4275642444757, 1.48)
    pt3dadd(1.39364832706141, -64.3739463379427, -16.4102031405228, 1.48)
    pt3dadd(1.21226859231845, -65.3572062140152, -16.3928420365699, 1.48)
    pt3dadd(1.03088885757549, -66.3404660900877, -16.3754809326169, 1.48)
    pt3dadd(0.857196716083704, -67.3244198761029, -16.3550065447703, 1.48)
    pt3dadd(0.821866819229891, -68.3208627382312, -16.2784988922002, 1.48)
    pt3dadd(0.786536922376079, -69.3173056003595, -16.20199123963, 1.48)
    pt3dadd(0.751207025522266, -70.3137484624879, -16.1254835870599, 1.48)
    pt3dadd(0.715877128668454, -71.3101913246162, -16.0489759344898, 1.48)
    pt3dadd(0.680547231814645, -72.3066341867445, -15.9724682819196, 1.48)
    pt3dadd(0.59697630236103, -73.3012946172496, -15.9152633854458, 1.48)
    pt3dadd(0.506371215837035, -74.2956951465185, -15.8608730766985, 1.48)
    pt3dadd(0.41576612931304, -75.2900956757875, -15.8064827679512, 1.48)
    pt3dadd(0.325161042789045, -76.2844962050564, -15.7520924592039, 1.48)
    pt3dadd(0.234555956265048, -77.2788967343253, -15.6977021504566, 1.48)
    pt3dadd(0.088734297910765, -78.2651891896611, -15.6659569929069, 1.48)
    pt3dadd(-0.132519812729758, -79.2404050446244, -15.6651478248728, 1.48)
    pt3dadd(-0.35377392337028, -80.2156208995877, -15.6643386568386, 1.48)
    pt3dadd(-0.575028034010803, -81.190836754551, -15.6635294888045, 1.48)
    pt3dadd(-0.799527265905496, -82.1652453145869, -15.6640812447831, 1.48)
    pt3dadd(-1.05583092445002, -83.1317418274938, -15.6779709947993, 1.48)
    pt3dadd(-1.31213458299455, -84.0982383404007, -15.6918607448155, 1.48)
    pt3dadd(-1.56843824153908, -85.0647348533075, -15.7057504948316, 1.48)
    pt3dadd(-1.82474190008361, -86.0312313662144, -15.7196402448478, 1.48)
    pt3dadd(-2.10391351160468, -86.9910373944344, -15.7432112441643, 1.48)
    pt3dadd(-2.39276592799223, -87.9480111063213, -15.7708806551504, 1.48)
    pt3dadd(-2.68161834437978, -88.9049848182083, -15.7985500661365, 1.48)
    pt3dadd(-2.97047076076733, -89.8619585300953, -15.8262194771226, 1.48)
    pt3dadd(-3.25932317715488, -90.8189322419823, -15.8538888881088, 1.48)
    pt3dadd(-3.47949003212202, -91.7908190637212, -15.9227764527112, 1.48)
    pt3dadd(-3.67671979275068, -92.7676860210299, -16.0054285503305, 1.48)
    pt3dadd(-3.87394955337934, -93.7445529783386, -16.0880806479499, 1.48)
    pt3dadd(-4.071179314008, -94.7214199356472, -16.1707327455692, 1.48)
    pt3dadd(-4.26840907463666, -95.6982868929559, -16.2533848431886, 1.48)
    pt3dadd(-4.46166846447102, -96.6789468966943, -16.2520344061244, 1.48)
    pt3dadd(-4.65439283261343, -97.6601180270311, -16.2393643264973, 1.48)
    pt3dadd(-4.84711720075584, -98.6412891573679, -16.2266942468702, 1.48)
    pt3dadd(-5.03984156889825, -99.6224602877047, -16.2140241672431, 1.48)
    pt3dadd(-5.20208431281251, -100.608189174654, -16.2361219817808, 1.48)
    pt3dadd(-5.34275772895299, -101.597143209499, -16.2828221632931, 1.48)
    pt3dadd(-5.48343114509346, -102.586097244345, -16.3295223448054, 1.48)
    pt3dadd(-5.62410456123394, -103.575051279191, -16.3762225263177, 1.48)
    pt3dadd(-5.76477797737442, -104.564005314037, -16.42292270783, 1.48)
    pt3dadd(-5.9039864444161, -105.553473475279, -16.4175467467412, 1.48)
    pt3dadd(-6.04236113791663, -106.543234250774, -16.3825317286627, 1.48)
    pt3dadd(-6.18073583141715, -107.532995026268, -16.3475167105841, 1.48)
    pt3dadd(-6.31911052491767, -108.522755801763, -16.3125016925056, 1.48)
    pt3dadd(-6.4574852184182, -109.512516577257, -16.277486674427, 1.48)
    pt3dadd(-6.59585991191872, -110.502277352752, -16.2424716563485, 1.48)
    pt3dadd(-6.83989448653894, -111.47115386544, -16.2512771233129, 1.48)
    pt3dadd(-7.09680710016778, -112.437484962136, -16.2654235192069, 1.48)
    pt3dadd(-7.35371971379663, -113.403816058832, -16.2795699151008, 1.48)
    pt3dadd(-7.61063232742547, -114.370147155528, -16.2937163109948, 1.48)
    pt3dadd(-7.77258439467432, -115.297661433552, -16.5303807946521, 1.48)
    pt3dadd(-7.84362470462398, -116.188013907724, -16.9800759648481, 1.48)
  }
  adendMML[18] {pt3dclear()
    pt3dadd(-7.84362470462398, -116.188013907724, -16.9800759648481, 1.48)
    pt3dadd(-7.91466501457365, -117.078366381896, -17.4297711350441, 1.48)
    pt3dadd(-7.98570532452331, -117.968718856068, -17.8794663052401, 1.48)
    pt3dadd(-8.05674563447298, -118.859071330241, -18.3291614754361, 1.48)
    pt3dadd(-8.12778594442265, -119.749423804413, -18.7788566456321, 1.48)
    pt3dadd(-8.19882625437232, -120.639776278585, -19.2285518158281, 1.48)
    pt3dadd(-8.38738705721138, -121.558300769368, -19.4793931368904, 1.48)
    pt3dadd(-8.70147406538338, -122.506916406423, -19.5178343183355, 1.48)
    pt3dadd(-9.01556107355538, -123.455532043479, -19.5562754997806, 1.48)
    pt3dadd(-9.32964808172738, -124.404147680535, -19.5947166812257, 1.48)
    pt3dadd(-9.62803294165709, -125.35588876258, -19.6266437035161, 1.48)
    pt3dadd(-9.70903631282454, -126.350898693853, -19.5683883129773, 1.48)
    pt3dadd(-9.790039683992, -127.345908625127, -19.5101329224386, 1.48)
    pt3dadd(-9.87890156199837, -128.340055496164, -19.4550739970974, 1.48)
    pt3dadd(-10.0481744478044, -129.325371231103, -19.4327224286629, 1.48)
    pt3dadd(-10.2174473336103, -130.310686966043, -19.4103708602283, 1.48)
    pt3dadd(-10.3867202194163, -131.296002700982, -19.3880192917937, 1.48)
    pt3dadd(-10.5559931052223, -132.281318435922, -19.3656677233592, 1.48)
    pt3dadd(-10.6853384832441, -133.270140108684, -19.3271554171522, 1.48)
    pt3dadd(-10.7287800517665, -134.266504787047, -19.2538733740891, 1.48)
    pt3dadd(-10.7722216202889, -135.262869465409, -19.180591331026, 1.48)
    pt3dadd(-10.8156631888113, -136.259234143772, -19.1073092879629, 1.48)
    pt3dadd(-10.8591047573337, -137.255598822135, -19.0340272448998, 1.48)
    pt3dadd(-10.8402768721053, -138.239635105549, -19.1384615750159, 1.48)
    pt3dadd(-10.7857588610615, -139.216605292501, -19.3447551529044, 1.48)
    pt3dadd(-10.7312408500176, -140.193575479454, -19.5510487307928, 1.48)
    pt3dadd(-10.6767228389738, -141.170545666406, -19.7573423086813, 1.48)
    pt3dadd(-10.6975021870912, -142.098836201872, -20.0945315951638, 1.48)
    pt3dadd(-10.7905135228068, -142.980428844854, -20.5572877980049, 1.48)
    pt3dadd(-10.8835248585225, -143.862021487837, -21.0200440008459, 1.48)
    pt3dadd(-10.9765361942381, -144.743614130819, -21.482800203687, 1.48)
    pt3dadd(-11.2316432959765, -145.697878370203, -21.5459081334655, 1.48)
    pt3dadd(-11.5039684583688, -146.659861897916, -21.5665648112795, 1.48)
    pt3dadd(-11.7762936207611, -147.621845425628, -21.5872214890935, 1.48)
    pt3dadd(-12.0486187831535, -148.58382895334, -21.6078781669075, 1.48)
    pt3dadd(-12.3918721763469, -149.504062088911, -21.4554647567482, 1.48)
    pt3dadd(-12.7585285492724, -150.410519558995, -21.2459463586975, 1.48)
    pt3dadd(-13.1251849221979, -151.316977029079, -21.0364279606468, 1.48)
    pt3dadd(-13.4918412951234, -152.223434499164, -20.826909562596, 1.48)
    pt3dadd(-13.3966521345028, -153.209199937081, -20.6968493357266, 1.48)
    pt3dadd(-13.2967815175313, -154.19576927319, -20.5675945295728, 1.48)
    pt3dadd(-13.1969109005599, -155.1823386093, -20.4383397234189, 1.48)
    pt3dadd(-13.0912473945648, -156.16695668907, -20.3261131075931, 1.48)
    pt3dadd(-12.8658120370393, -157.111231240145, -20.5659557054995, 1.48)
    pt3dadd(-12.6403766795139, -158.055505791219, -20.8057983034058, 1.48)
    pt3dadd(-12.4149413219884, -158.999780342294, -21.0456409013122, 1.48)
    pt3dadd(-12.189505964463, -159.944054893368, -21.2854834992185, 1.48)
    pt3dadd(-12.0568849767989, -160.897862764366, -21.464143975971, 1.48)
    pt3dadd(-12.2280323225072, -161.882871846004, -21.4425640050123, 1.48)
    pt3dadd(-12.3991796682155, -162.867880927643, -21.4209840340535, 1.48)
    pt3dadd(-12.5703270139238, -163.852890009282, -21.3994040630947, 1.48)
    pt3dadd(-12.741474359632, -164.83789909092, -21.3778240921359, 1.48)
    pt3dadd(-12.7888483994186, -165.821059440109, -21.2890325868911, 1.48)
    pt3dadd(-12.6910711196552, -166.802051745448, -21.1214208318519, 1.48)
    pt3dadd(-12.5932938398918, -167.783044050787, -20.9538090768127, 1.48)
    pt3dadd(-12.4955165601284, -168.764036356126, -20.7861973217735, 1.48)
    pt3dadd(-12.397739280365, -169.745028661465, -20.6185855667342, 1.48)
    pt3dadd(-12.2987806975773, -170.729168172754, -20.4726192396492, 1.48)
    pt3dadd(-12.1989100806058, -171.715737508864, -20.3433644334953, 1.48)
    pt3dadd(-12.0990394636343, -172.702306844974, -20.2141096273415, 1.48)
    pt3dadd(-11.9991688466628, -173.688876181083, -20.0848548211876, 1.48)
    pt3dadd(-12.1620030913517, -174.649818962702, -20.0621628166407, 1.48)
    pt3dadd(-12.4855187537602, -175.595087458429, -20.1046491339954, 1.48)
    pt3dadd(-12.8090344161687, -176.540355954156, -20.1471354513501, 1.48)
    pt3dadd(-12.6678961333419, -177.527018859271, -20.1671531165165, 1.48)
    pt3dadd(-12.5136022902557, -178.514853747649, -20.1865346357708, 1.48)
    pt3dadd(-12.3593084471696, -179.502688636027, -20.2059161550251, 1.48)
    pt3dadd(-12.2050146040834, -180.490523524405, -20.2252976742794, 1.48)
    pt3dadd(-12.0780083439759, -181.173326888511, -20.9363824037904, 1.48)
    pt3dadd(-11.9515746652197, -181.849729709097, -21.661981293797, 1.48)
    pt3dadd(-11.8251409864635, -182.526132529684, -22.3875801838037, 1.48)
    pt3dadd(-11.6987073077073, -183.20253535027, -23.1131790738103, 1.48)
    pt3dadd(-11.5722736289512, -183.878938170857, -23.8387779638169, 1.48)
    pt3dadd(-11.7520850317113, -184.635301241151, -23.7224937224774, 1.48)
    pt3dadd(-12.0765341392145, -185.429429055065, -23.2085931564059, 1.48)
    pt3dadd(-12.4009832467176, -186.223556868979, -22.6946925903344, 1.48)
    pt3dadd(-12.7254323542207, -187.017684682893, -22.180792024263, 1.48)
    pt3dadd(-12.8326011868786, -187.900658800726, -22.1117513369519, 1.48)
    pt3dadd(-12.7644848309345, -188.855307354493, -22.4015897416595, 1.48)
    pt3dadd(-12.6963684749903, -189.80995590826, -22.691428146367, 1.48)
    pt3dadd(-12.6282521190462, -190.764604462027, -22.9812665510746, 1.48)
    pt3dadd(-12.5601357631021, -191.719253015794, -23.2711049557821, 1.48)
    pt3dadd(-12.4402764487863, -192.519654442191, -23.8029355310078, 1.48)
    pt3dadd(-12.2825986213123, -193.207317880664, -24.5116362422473, 1.48)
    pt3dadd(-12.1249207938384, -193.894981319136, -25.2203369534867, 1.48)
    pt3dadd(-11.9672429663644, -194.582644757609, -25.9290376647261, 1.48)
    pt3dadd(-11.8679831567564, -195.326653356078, -26.4992467261071, 1.48)
    pt3dadd(-12.0214184734418, -196.314390650615, -26.4703912140922, 1.48)
    pt3dadd(-12.1748537901271, -197.302127945153, -26.4415357020774, 1.48)
    pt3dadd(-12.3282891068124, -198.28986523969, -26.4126801900625, 1.48)
    pt3dadd(-12.4367508002025, -199.28335349806, -26.4061679483737, 1.48)
    pt3dadd(-12.5245339900129, -200.279486002491, -26.4099289593509, 1.48)
    pt3dadd(-12.6123171798233, -201.275618506921, -26.4136899703281, 1.48)
    pt3dadd(-12.7001003696337, -202.271751011352, -26.4174509813053, 1.48)
    pt3dadd(-12.7878835594442, -203.267883515783, -26.4212119922825, 1.48)
    pt3dadd(-12.7699697799074, -204.262758133244, -26.3260113963959, 1.48)
    pt3dadd(-12.7478192223184, -205.257582329318, -26.2268440040481, 1.48)
    pt3dadd(-12.7256686647294, -206.252406525391, -26.1276766117003, 1.48)
    pt3dadd(-12.7035181071404, -207.247230721465, -26.0285092193525, 1.48)
    pt3dadd(-12.599759483426, -208.162091354529, -26.2510384506075, 1.48)
    pt3dadd(-12.4240546219497, -209.006455555198, -26.7571776590104, 1.48)
    pt3dadd(-12.2483497604734, -209.850819755867, -27.2633168674132, 1.48)
    pt3dadd(-12.072644898997, -210.695183956535, -27.769456075816, 1.48)
    pt3dadd(-11.8969400375207, -211.539548157204, -28.2755952842189, 1.48)
    pt3dadd(-11.6616386656928, -212.478570325997, -28.5006853483593, 1.48)
    pt3dadd(-11.4183878177808, -213.430218758464, -28.6882867502005, 1.48)
    pt3dadd(-11.1751369698688, -214.381867190931, -28.8758881520418, 1.48)
    pt3dadd(-10.9318861219567, -215.333515623399, -29.063489553883, 1.48)
    pt3dadd(-10.6886352740447, -216.285164055866, -29.2510909557242, 1.48)
    pt3dadd(-10.5735619883033, -217.261842596235, -29.2724450636698, 1.48)
    pt3dadd(-10.5514114307143, -218.256666792308, -29.173277671322, 1.48)
    pt3dadd(-10.5292608731253, -219.251490988382, -29.0741102789742, 1.48)
    pt3dadd(-10.5071103155364, -220.246315184456, -28.9749428866264, 1.48)
    pt3dadd(-10.4518901265512, -221.237530553333, -28.8629821568326, 1.48)
    pt3dadd(-10.3470087967526, -222.223326494535, -28.7318094883036, 1.48)
    pt3dadd(-10.242127466954, -223.209122435737, -28.6006368197746, 1.48)
    pt3dadd(-10.1372461371554, -224.194918376939, -28.4694641512455, 1.48)
    pt3dadd(-10.0181212385523, -225.178302223173, -28.3328591300756, 1.48)
    pt3dadd(-9.8927455408975, -226.160627520026, -28.1938701175617, 1.48)
    pt3dadd(-9.76736984324269, -227.14295281688, -28.0548811050478, 1.48)
    pt3dadd(-9.30501868395221, -227.956127495258, -27.797555868685, 1.48)
    pt3dadd(-8.71587205930264, -228.705655012858, -27.4957036614295, 1.48)
    pt3dadd(-8.12672543465308, -229.455182530458, -27.193851454174, 1.48)
    pt3dadd(-7.53757881000352, -230.204710048057, -26.8919992469186, 1.48)
  }
}
proc shape3d_20() {
  adendMML[18] {
    pt3dadd(-7.01917500237875, -231.058958573958, -26.8906581895678, 1.48)
    pt3dadd(-6.5017797381805, -231.914700052628, -26.8936013628652, 1.48)
    pt3dadd(-5.98438447398227, -232.770441531298, -26.8965445361627, 1.48)
    pt3dadd(-5.46698920978403, -233.626183009968, -26.8994877094601, 1.48)
  }
  adendOML[13] {pt3dclear()
    pt3dadd(-5.46698920978403, -233.626183009968, -26.8994877094601, 1.48)
    pt3dadd(-4.9298195478349, -234.454737094799, -26.9999983104256, 1.48)
    pt3dadd(-4.36508626640102, -235.245394552487, -27.2365085754125, 1.48)
    pt3dadd(-3.80035298496714, -236.036052010174, -27.4730188403993, 1.48)
    pt3dadd(-3.23561970353326, -236.826709467862, -27.7095291053862, 1.48)
    pt3dadd(-2.91784982279399, -237.695472468037, -27.8334190865883, 1.48)
    pt3dadd(-2.99919901489163, -238.690462316456, -27.7753027335709, 1.48)
    pt3dadd(-3.08054820698925, -239.685452164875, -27.7171863805535, 1.48)
    pt3dadd(-2.92414328773057, -240.610808807367, -27.5710612913493, 1.48)
    pt3dadd(-2.43099520910454, -241.437540422402, -27.3002849828393, 1.48)
    pt3dadd(-1.93784713047851, -242.264272037436, -27.0295086743293, 1.48)
    pt3dadd(-1.52582768939238, -243.02596660225, -26.5403174991598, 1.48)
    pt3dadd(-1.12871690474617, -243.775709591555, -26.0109891750483, 1.48)
    pt3dadd(-0.731606120099974, -244.525452580859, -25.4816608509367, 1.48)
    pt3dadd(-0.334495335453774, -245.275195570163, -24.9523325268252, 1.48)
    pt3dadd(0.0626154491924229, -246.024938559468, -24.4230042027137, 1.48)
  }
  GCL[16] {pt3dclear()
    pt3dadd(4.59432275953245, 20.515262331406, 0.922565764014505, 1.48)
    pt3dadd(5.11562824724815, 19.6861945079413, 1.03701339443759, 1.48)
    pt3dadd(5.69316084176391, 18.8862346945011, 1.19986424384482, 1.48)
    pt3dadd(6.27069343627967, 18.0862748810609, 1.36271509325206, 1.48)
    pt3dadd(6.84822603079543, 17.2863150676207, 1.52556594265929, 1.48)
    pt3dadd(7.1450073174186, 16.5580696989183, 2.03245900352981, 1.48)
    pt3dadd(7.2688400733735, 15.8740018905562, 2.75128908227953, 1.48)
    pt3dadd(7.39267282932839, 15.1899340821941, 3.47011916102926, 1.48)
    pt3dadd(7.51650558528329, 14.5058662738321, 4.18894923977898, 1.48)
    pt3dadd(7.91157929127324, 13.7273095171922, 4.59310282816681, 1.48)
    pt3dadd(8.41786532262544, 12.9100110600176, 4.86823495344055, 1.48)
    pt3dadd(8.92415135397764, 12.092712602843, 5.14336707871429, 1.48)
    pt3dadd(9.43043738532985, 11.2754141456684, 5.41849920398802, 1.48)
    pt3dadd(9.90327062458103, 10.4347876113615, 5.6824774340206, 1.48)
    pt3dadd(10.3743962901987, 9.59297031219077, 5.94588632151915, 1.48)
    pt3dadd(10.8455219558163, 8.75115301302002, 6.20929520901769, 1.48)
    pt3dadd(11.1978657924858, 8.00585321279114, 6.71808766264589, 1.48)
    pt3dadd(11.4628503762333, 7.33153814714788, 7.40734984978709, 1.48)
    pt3dadd(11.7278349599807, 6.6572230815046, 8.0966120369283, 1.48)
    pt3dadd(11.9928195437282, 5.98290801586131, 8.78587422406951, 1.48)
    pt3dadd(12.3312409780574, 5.27519834979074, 9.36762183693894, 1.48)
    pt3dadd(12.8573954874989, 4.48211913177605, 9.67452049471958, 1.48)
    pt3dadd(13.3835499969404, 3.68903991376132, 9.98141915250022, 1.48)
    pt3dadd(13.9097045063819, 2.89596069574662, 10.2883178102809, 1.48)
    pt3dadd(14.4345229946623, 2.10849217000248, 10.6093354586362, 1.48)
    pt3dadd(14.951262862962, 1.35495024063423, 11.0157274728216, 1.48)
    pt3dadd(15.4680027312617, 0.601408311265944, 11.4221194870069, 1.48)
  }
  adendIML[22] {pt3dclear()
    pt3dadd(15.4680027312617, 0.601408311265944, 11.4221194870069, 1.48)
    pt3dadd(15.9847425995614, -0.15213361810231, 11.8285115011922, 1.48)
    pt3dadd(16.3967439624309, -0.943897019892431, 12.1753783812155, 1.48)
    pt3dadd(16.2642184010358, -1.93437073106941, 12.2127789566685, 1.48)
    pt3dadd(16.2732621558187, -2.85966803406424, 12.3122534702752, 1.48)
    pt3dadd(16.9556084749379, -3.47498684773683, 12.7069511499301, 1.48)
    pt3dadd(17.6379547940571, -4.09030566140944, 13.1016488295851, 1.48)
    pt3dadd(17.808856538458, -5.05158956994012, 13.2600016263097, 1.48)
    pt3dadd(17.9544271737924, -6.03000862856191, 13.4066486032783, 1.48)
    pt3dadd(18.169609617453, -6.9877694645198, 13.5790390137243, 1.48)
    pt3dadd(18.4630471927782, -7.9223070575625, 13.7803692811388, 1.48)
    pt3dadd(18.7564847681034, -8.85684465060521, 13.9816995485533, 1.48)
    pt3dadd(19.0656388754363, -9.78380689851275, 14.1885775280194, 1.48)
    pt3dadd(19.4857476546863, -10.6572891589954, 14.4346209270757, 1.48)
    pt3dadd(19.9058564339362, -11.5307714194781, 14.680664326132, 1.48)
    pt3dadd(20.3259652131862, -12.4042536799608, 14.9267077251883, 1.48)
    pt3dadd(20.7732350459047, -13.2741396428834, 15.0982695934591, 1.48)
    pt3dadd(21.2800810601006, -14.1361373375425, 15.1064605821749, 1.48)
    pt3dadd(21.7869270742966, -14.9981350322015, 15.1146515708906, 1.48)
    pt3dadd(22.2493461406633, -15.8752339398121, 15.1630499136545, 1.48)
    pt3dadd(22.5427837159885, -16.8097715328548, 15.3643801810689, 1.48)
    pt3dadd(22.8362212913138, -17.7443091258975, 15.5657104484834, 1.48)
    pt3dadd(23.129658866639, -18.6788467189402, 15.7670407158979, 1.48)
    pt3dadd(23.7920463215941, -19.3415377076792, 16.0618417686727, 1.48)
    pt3dadd(24.5137592689653, -19.9605169768803, 16.3716725061667, 1.48)
    pt3dadd(25.2354722163366, -20.5794962460812, 16.6815032436607, 1.48)
    pt3dadd(25.9571851637079, -21.1984755152822, 16.9913339811547, 1.48)
    pt3dadd(26.4392687803895, -22.0276089903684, 17.2548813246758, 1.48)
    pt3dadd(26.8966896084316, -22.878371657284, 17.5136651546497, 1.48)
    pt3dadd(27.3541104364737, -23.7291343241996, 17.7724489846235, 1.48)
    pt3dadd(27.8115312645159, -24.5798969911152, 18.0312328145974, 1.48)
    pt3dadd(27.9636165281793, -25.2993920187847, 18.6397850480692, 1.48)
    pt3dadd(27.9991528421676, -25.9687811719172, 19.3818465900296, 1.48)
    pt3dadd(28.0346891561559, -26.6381703250496, 20.12390813199, 1.48)
    pt3dadd(28.0702254701443, -27.3075594781821, 20.8659696739505, 1.48)
    pt3dadd(28.1057617841326, -27.9769486313146, 21.6080312159109, 1.48)
    pt3dadd(28.3325307623101, -28.8421311434288, 21.9505497183089, 1.48)
    pt3dadd(28.6267426136934, -29.7763649692417, 22.1521596020267, 1.48)
    pt3dadd(28.9209544650767, -30.7105987950546, 22.3537694857445, 1.48)
    pt3dadd(29.2643069465407, -31.6212572083031, 22.572735332766, 1.48)
    pt3dadd(29.6807176204983, -32.4968656633721, 22.8175045792531, 1.48)
    pt3dadd(30.0971282944559, -33.3724741184411, 23.0622738257401, 1.48)
    pt3dadd(30.5135389684135, -34.2480825735101, 23.3070430722272, 1.48)
    pt3dadd(30.9299496423711, -35.1236910285791, 23.5518123187142, 1.48)
    pt3dadd(31.4899507363153, -35.8927918533124, 23.8438785269024, 1.48)
    pt3dadd(32.0901751263496, -36.6320572060745, 24.149193806267, 1.48)
    pt3dadd(32.6903995163839, -37.3713225588367, 24.4545090856315, 1.48)
    pt3dadd(33.0648124502134, -38.2445883576009, 24.6824018611585, 1.48)
    pt3dadd(33.3027683374495, -39.1988301414235, 24.8635084975272, 1.48)
    pt3dadd(33.5407242246856, -40.1530719252461, 25.0446151338959, 1.48)
    pt3dadd(33.7786801119217, -41.1073137090686, 25.2257217702646, 1.48)
    pt3dadd(34.0489233121667, -42.0488204451547, 25.4184822334664, 1.48)
    pt3dadd(34.4005091985447, -42.9582432791015, 25.6406026368425, 1.48)
    pt3dadd(34.7520950849226, -43.8676661130484, 25.8627230402186, 1.48)
    pt3dadd(35.1036809713006, -44.7770889469952, 26.0848434435947, 1.48)
    pt3dadd(35.3854501543062, -45.7139514012916, 26.2817551983272, 1.48)
    pt3dadd(35.6212830643421, -46.6688679003894, 26.462080788011, 1.48)
    pt3dadd(35.857115974378, -47.6237843994873, 26.6424063776947, 1.48)
    pt3dadd(36.0929488844139, -48.5787008985851, 26.8227319673785, 1.48)
    pt3dadd(36.3786596095901, -49.5123792411457, 27.020918353759, 1.48)
    pt3dadd(36.7766887617217, -50.3982319857533, 27.2593249579561, 1.48)
    pt3dadd(37.1747179138533, -51.2840847303607, 27.4977315621532, 1.48)
    pt3dadd(37.5727470659849, -52.1699374749682, 27.7361381663503, 1.48)
    pt3dadd(37.9707762181165, -53.0557902195757, 27.9745447705474, 1.48)
    pt3dadd(38.3370892110351, -53.9572120786361, 28.2017816389568, 1.48)
    pt3dadd(38.6660556651819, -54.876966943678, 28.4158658753637, 1.48)
    pt3dadd(38.9950221193286, -55.7967218087198, 28.6299501117707, 1.48)
    pt3dadd(39.3239885734754, -56.7164766737617, 28.8440343481776, 1.48)
    pt3dadd(39.6529550276221, -57.6362315388035, 29.0581185845845, 1.48)
    pt3dadd(40.0136990153083, -58.5405469492518, 29.2834086880088, 1.48)
    pt3dadd(40.4050182202624, -59.4300070633282, 29.5194806797854, 1.48)
    pt3dadd(40.7963374252166, -60.3194671774045, 29.755552671562, 1.48)
    pt3dadd(41.1876566301707, -61.2089272914808, 29.9916246633386, 1.48)
    pt3dadd(41.5789758351249, -62.0983874055572, 30.2276966551152, 1.48)
    pt3dadd(42.0816179369958, -62.9466692282159, 30.1735679172624, 1.48)
    pt3dadd(42.6123882746987, -63.7845464286073, 30.0461134325267, 1.48)
    pt3dadd(43.1431586124015, -64.6224236289986, 29.918658947791, 1.48)
    pt3dadd(43.6739289501044, -65.4603008293899, 29.7912044630553, 1.48)
    pt3dadd(44.0894985980774, -66.1775483659179, 30.0159923735267, 1.48)
    pt3dadd(44.306115600306, -66.6864673686749, 30.8491061250507, 1.48)
    pt3dadd(44.5227326025347, -67.1953863714319, 31.6822198765746, 1.48)
    pt3dadd(44.7393496047634, -67.7043053741888, 32.5153336280986, 1.48)
    pt3dadd(44.9625066082133, -68.3120447004088, 33.2035714003242, 1.48)
    pt3dadd(45.2084245374816, -69.2637047654202, 33.3876026279105, 1.48)
    pt3dadd(45.4543424667498, -70.2153648304316, 33.5716338554968, 1.48)
    pt3dadd(45.7002603960181, -71.167024895443, 33.7556650830831, 1.48)
    pt3dadd(45.9159351715253, -72.1109833957493, 33.978562052446, 1.48)
    pt3dadd(45.9764850364206, -73.0154385907494, 34.4008114030655, 1.48)
    pt3dadd(46.0370349013159, -73.9198937857495, 34.8230607536849, 1.48)
    pt3dadd(46.0975847662112, -74.8243489807495, 35.2453101043043, 1.48)
    pt3dadd(46.1581346311065, -75.7288041757496, 35.6675594549237, 1.48)
    pt3dadd(46.531579638791, -76.603602635925, 35.9754011375409, 1.48)
    pt3dadd(46.9064230385127, -77.4782685541203, 36.2827315090188, 1.48)
    pt3dadd(47.2812664382345, -78.3529344723155, 36.5900618804967, 1.48)
    pt3dadd(47.6561098379562, -79.2276003905108, 36.8973922519746, 1.48)
    pt3dadd(47.9600275826404, -80.0723884372546, 37.2850325040753, 1.48)
    pt3dadd(48.0134277671986, -80.8116444102548, 37.9563364789426, 1.48)
    pt3dadd(48.0668279517568, -81.550900383255, 38.62764045381, 1.48)
    pt3dadd(48.1202281363151, -82.2901563562552, 39.2989444286773, 1.48)
    pt3dadd(48.1736283208733, -83.0294123292554, 39.9702484035447, 1.48)
    pt3dadd(48.2336066268712, -83.7704695319449, 40.6262049969747, 1.48)
    pt3dadd(48.6890716706559, -84.6198194228115, 40.3594535081782, 1.48)
    pt3dadd(49.1445367144405, -85.4691693136782, 40.0927020193817, 1.48)
    pt3dadd(49.6000017582252, -86.3185192045447, 39.8259505305852, 1.48)
    pt3dadd(50.0401713232059, -87.180380954126, 39.786089251982, 1.48)
    pt3dadd(50.4621005635855, -88.0571634765216, 40.0168014634802, 1.48)
    pt3dadd(50.8840298039651, -88.9339459989171, 40.2475136749784, 1.48)
    pt3dadd(51.3059590443447, -89.8107285213127, 40.4782258864766, 1.48)
    pt3dadd(51.7278882847243, -90.6875110437082, 40.7089380979748, 1.48)
    pt3dadd(51.7564833914146, -91.5271335124579, 41.2079533573491, 1.48)
    pt3dadd(51.7071284403604, -92.3593916868852, 41.7601403002455, 1.48)
    pt3dadd(51.6577734893062, -93.1916498613126, 42.3123272431419, 1.48)
    pt3dadd(51.6084185382521, -94.0239080357399, 42.8645141860383, 1.48)
    pt3dadd(51.5590635871979, -94.8561662101673, 43.4167011289347, 1.48)
    pt3dadd(51.5097086361437, -95.6884243845947, 43.9688880718311, 1.48)
    pt3dadd(51.6849362179541, -96.6065648714996, 44.2160500278049, 1.48)
    pt3dadd(51.9572663333865, -97.5618382112072, 44.3313286237042, 1.48)
    pt3dadd(52.229596448819, -98.5171115509148, 44.4466072196035, 1.48)
    pt3dadd(52.5019265642514, -99.4723848906223, 44.5618858155028, 1.48)
    pt3dadd(52.7216454021153, -100.378453962201, 44.8822772428956, 1.48)
    pt3dadd(52.9100695064552, -101.255254889561, 45.3246758083131, 1.48)
    pt3dadd(53.0984936107951, -102.132055816922, 45.7670743737305, 1.48)
    pt3dadd(53.2869177151349, -103.008856744282, 46.209472939148, 1.48)
    pt3dadd(53.4753418194748, -103.885657671643, 46.6518715045655, 1.48)
    pt3dadd(53.6637659238147, -104.762458599003, 47.0942700699829, 1.48)
    pt3dadd(53.7664691503729, -105.745311017223, 47.2341375619826, 1.48)
    pt3dadd(53.8661440801764, -106.731909960139, 47.3633174141504, 1.48)
    pt3dadd(53.9658190099799, -107.718508903054, 47.4924972663181, 1.48)
    pt3dadd(54.0655966158475, -108.705091811579, 47.6217164010512, 1.48)
    pt3dadd(54.1737695424807, -109.69036366615, 47.7541474794791, 1.48)
    pt3dadd(54.2819424691138, -110.675635520721, 47.8865785579069, 1.48)
    pt3dadd(54.390115395747, -111.660907375292, 48.0190096363348, 1.48)
    pt3dadd(54.6856094959085, -112.596093855743, 48.0938196268728, 1.48)
    pt3dadd(55.1299468975025, -113.491483060226, 48.122844547885, 1.48)
    pt3dadd(55.5742842990966, -114.386872264709, 48.1518694688971, 1.48)
    pt3dadd(56.0157926008417, -115.283051871732, 48.1833536444737, 1.48)
    pt3dadd(56.2758561209271, -116.229924074967, 48.3725625138833, 1.48)
  }
  adendMML[19] {pt3dclear()
    pt3dadd(56.2758561209271, -116.229924074967, 48.3725625138833, 1.48)
    pt3dadd(56.5359196410126, -117.176796278201, 48.5617713832928, 1.48)
    pt3dadd(56.795983161098, -118.123668481435, 48.7509802527023, 1.48)
    pt3dadd(57.0564924986502, -119.07038504979, 48.9403518719855, 1.48)
    pt3dadd(57.3188140722733, -120.016468966527, 49.1303850651495, 1.48)
    pt3dadd(57.5811356458963, -120.962552883263, 49.3204182583136, 1.48)
    pt3dadd(57.8434572195194, -121.9086368, 49.5104514514776, 1.48)
    pt3dadd(58.0959601693214, -122.829756645867, 49.784282887834, 1.48)
    pt3dadd(58.3322332991244, -123.709611811057, 50.1966297035375, 1.48)
    pt3dadd(58.5685064289274, -124.589466976248, 50.608976519241, 1.48)
    pt3dadd(58.8047795587304, -125.469322141438, 51.0213233349444, 1.48)
    pt3dadd(59.0410526885334, -126.349177306629, 51.4336701506479, 1.48)
    pt3dadd(59.1049903320193, -127.284859540739, 51.7670260255475, 1.48)
    pt3dadd(59.1279592265168, -128.233813360536, 52.0816036435987, 1.48)
    pt3dadd(59.1509281210142, -129.182767180333, 52.3961812616498, 1.48)
    pt3dadd(59.1738970155117, -130.13172100013, 52.710758879701, 1.48)
    pt3dadd(59.2828241825849, -131.066824969069, 53.0444385185796, 1.48)
    pt3dadd(59.4174271752207, -131.997791973129, 53.3838239509783, 1.48)
    pt3dadd(59.5520301678565, -132.928758977189, 53.723209383377, 1.48)
    pt3dadd(59.8674017250699, -133.765190180334, 54.1064937428545, 1.48)
    pt3dadd(60.4070316625275, -134.484341890566, 54.5442383582075, 1.48)
    pt3dadd(60.946661599985, -135.203493600798, 54.9819829735605, 1.48)
    pt3dadd(61.4862915374425, -135.922645311029, 55.4197275889135, 1.48)
    pt3dadd(62.0259214749001, -136.641797021261, 55.8574722042665, 1.48)
    pt3dadd(62.3685048259683, -137.430791343116, 56.3449021411306, 1.48)
    pt3dadd(62.6149133858152, -138.253874550824, 56.8565825636826, 1.48)
    pt3dadd(62.8613219456622, -139.076957758532, 57.3682629862346, 1.48)
    pt3dadd(63.1077305055092, -139.90004096624, 57.8799434087866, 1.48)
    pt3dadd(63.3541390653561, -140.723124173948, 58.3916238313385, 1.48)
    pt3dadd(63.5532243024383, -141.597626834099, 58.7895676741742, 1.48)
    pt3dadd(63.6533820747937, -142.579619750017, 58.9497498633328, 1.48)
    pt3dadd(63.7535398471491, -143.561612665935, 59.1099320524915, 1.48)
    pt3dadd(63.8536976195045, -144.543605581853, 59.2701142416501, 1.48)
    pt3dadd(63.9176160719939, -145.305131244265, 59.8837635892998, 1.48)
    pt3dadd(63.9759433690528, -146.032642287026, 60.5673757666925, 1.48)
    pt3dadd(64.0342706661117, -146.760153329786, 61.2509879440853, 1.48)
    pt3dadd(64.0925979631706, -147.487664372546, 61.9346001214781, 1.48)
    pt3dadd(64.1699221197522, -148.254645603442, 62.5332429350629, 1.48)
    pt3dadd(64.345753446548, -149.226297324025, 62.6912817859993, 1.48)
    pt3dadd(64.5215847733438, -150.197949044608, 62.8493206369356, 1.48)
    pt3dadd(64.6974161001395, -151.169600765191, 63.007359487872, 1.48)
    pt3dadd(64.8856271985902, -152.137721252667, 63.1699895113911, 1.48)
    pt3dadd(65.1315451278585, -153.089381317679, 63.3540207389775, 1.48)
    pt3dadd(65.3774630571267, -154.04104138269, 63.5380519665638, 1.48)
    pt3dadd(65.623380986395, -154.992701447702, 63.7220831941501, 1.48)
    pt3dadd(65.8577522542375, -155.928720413835, 63.94958380483, 1.48)
    pt3dadd(66.0046303978279, -156.746221259695, 64.5064672557895, 1.48)
    pt3dadd(66.1515085414183, -157.563722105556, 65.0633507067491, 1.48)
    pt3dadd(66.2983866850087, -158.381222951416, 65.6202341577086, 1.48)
    pt3dadd(66.3538919448567, -159.328627264371, 65.8418041663789, 1.48)
    pt3dadd(66.3760425024456, -160.323451460444, 65.9409715587266, 1.48)
    pt3dadd(66.3981930600346, -161.318275656518, 66.0401389510744, 1.48)
    pt3dadd(66.4203436176236, -162.313099852592, 66.1393063434222, 1.48)
    pt3dadd(66.412785079082, -163.244827540777, 66.48026037935, 1.48)
    pt3dadd(66.3979186273648, -164.161034601902, 66.8806896611939, 1.48)
    pt3dadd(66.3830521756475, -165.077241663027, 67.2811189430377, 1.48)
    pt3dadd(66.3681857239303, -165.993448724152, 67.6815482248816, 1.48)
    pt3dadd(66.4090937373228, -166.946995405664, 67.9634536179715, 1.48)
    pt3dadd(66.4788754323333, -167.91987230054, 68.1840008067065, 1.48)
    pt3dadd(66.5486571273436, -168.892749195415, 68.4045479954415, 1.48)
    pt3dadd(66.6184388223541, -169.865626090291, 68.6250951841765, 1.48)
    pt3dadd(66.6952352066038, -170.776591140339, 68.9875077204452, 1.48)
    pt3dadd(66.7816449598862, -171.602708324501, 69.5443414052824, 1.48)
    pt3dadd(66.8680547131685, -172.428825508663, 70.1011750901196, 1.48)
    pt3dadd(66.9544644664508, -173.254942692826, 70.6580087749567, 1.48)
  }
}
proc shape3d_21() {
  adendMML[19] {
    pt3dadd(67.0272998275785, -174.09384172989, 71.1950132479182, 1.48)
    pt3dadd(67.0530521011559, -174.977074914105, 71.6632396490394, 1.48)
    pt3dadd(67.0788043747333, -175.86030809832, 72.1314660501607, 1.48)
    pt3dadd(67.1045566483106, -176.743541282535, 72.5996924512819, 1.48)
    pt3dadd(67.130308921888, -177.62677446675, 73.0679188524031, 1.48)
    pt3dadd(67.0877181020041, -178.589534915658, 73.2487503538856, 1.48)
    pt3dadd(67.0169562454371, -179.585076518848, 73.311117620722, 1.48)
    pt3dadd(66.9461943888702, -180.580618122038, 73.3734848875583, 1.48)
    pt3dadd(66.9468730403232, -181.564532164794, 73.5160839782966, 1.48)
    pt3dadd(67.018393216022, -182.536916136906, 73.7382421995024, 1.48)
    pt3dadd(67.0899133917209, -183.509300109017, 73.9604004207082, 1.48)
    pt3dadd(67.1620191194224, -184.481977066631, 74.1806398082631, 1.48)
    pt3dadd(67.2618897363938, -185.468546402741, 74.309894614417, 1.48)
    pt3dadd(67.3617603533653, -186.45511573885, 74.4391494205709, 1.48)
    pt3dadd(67.4616309703368, -187.44168507496, 74.5684042267247, 1.48)
    pt3dadd(67.5551504830739, -188.419311915708, 74.7255615701397, 1.48)
    pt3dadd(67.5723496676938, -189.289478044897, 75.2180197873123, 1.48)
    pt3dadd(67.5895488523136, -190.159644174085, 75.710478004485, 1.48)
    pt3dadd(67.6067480369334, -191.029810303274, 76.2029362216576, 1.48)
    pt3dadd(67.6239472215532, -191.899976432463, 76.6953944388302, 1.48)
    pt3dadd(67.76759507971, -192.85134505043, 76.7542839273682, 1.48)
    pt3dadd(67.9537568653305, -193.830015154613, 76.6674011514445, 1.48)
    pt3dadd(68.1399186509509, -194.808685258796, 76.5805183755207, 1.48)
    pt3dadd(68.3260804365714, -195.78735536298, 76.493635599597, 1.48)
    pt3dadd(68.5026094009784, -196.759794748083, 76.6269320901582, 1.48)
    pt3dadd(68.6780620984059, -197.731537980206, 76.7848290242326, 1.48)
    pt3dadd(68.8535147958332, -198.703281212328, 76.942725958307, 1.48)
    pt3dadd(69.0289674932606, -199.67502444445, 77.1006228923813, 1.48)
    pt3dadd(69.2027169161365, -200.64717700299, 77.2578811969236, 1.48)
    pt3dadd(69.3762867160869, -201.619372728034, 77.4150721532485, 1.48)
    pt3dadd(69.5498565160373, -202.591568453079, 77.5722631095734, 1.48)
    pt3dadd(69.7234263159877, -203.563764178124, 77.7294540658982, 1.48)
    pt3dadd(69.7575068319598, -204.55680553132, 77.833192995474, 1.48)
    pt3dadd(69.7796573895488, -205.551629727394, 77.9323603878218, 1.48)
    pt3dadd(69.8018079471378, -206.546453923468, 78.0315277801696, 1.48)
    pt3dadd(69.7850280956635, -207.50769171773, 78.2249486303785, 1.48)
    pt3dadd(69.638803563026, -208.357253801961, 78.7317648210152, 1.48)
    pt3dadd(69.4925790303884, -209.206815886192, 79.2385810116519, 1.48)
    pt3dadd(69.3463544977508, -210.056377970423, 79.7453972022886, 1.48)
    pt3dadd(69.2645846256497, -211.000468771774, 79.8782343509986, 1.48)
    pt3dadd(69.2183650345195, -211.996697346024, 79.8048015433239, 1.48)
    pt3dadd(69.1721454433894, -212.992925920274, 79.7313687356491, 1.48)
    pt3dadd(69.1259258522591, -213.989154494525, 79.6579359279743, 1.48)
    pt3dadd(69.0797062611289, -214.985383068775, 79.5845031202994, 1.48)
    pt3dadd(69.0334866699987, -215.981611643025, 79.5110703126246, 1.48)
    pt3dadd(69.1650321511729, -216.955262335647, 79.6098272748513, 1.48)
    pt3dadd(69.3683841872385, -217.919792902052, 79.77813870019, 1.48)
    pt3dadd(69.5717362233042, -218.884323468456, 79.9464501255286, 1.48)
    pt3dadd(69.7750882593699, -219.84885403486, 80.1147615508673, 1.48)
    pt3dadd(69.9784402954356, -220.813384601265, 80.2830729762059, 1.48)
    pt3dadd(70.3946911160087, -221.675381020853, 80.1466097582971, 1.48)
    pt3dadd(70.9040955675628, -222.492513736322, 79.8767927276125, 1.48)
    pt3dadd(71.413500019117, -223.30964645179, 79.6069756969279, 1.48)
    pt3dadd(71.922904470671, -224.126779167259, 79.3371586662433, 1.48)
    pt3dadd(72.2527818837134, -225.035638346304, 79.3773343882417, 1.48)
    pt3dadd(72.4992342816338, -225.987122200019, 79.5615616709114, 1.48)
    pt3dadd(72.7456866795541, -226.938606053733, 79.745788953581, 1.48)
    pt3dadd(72.9921390774745, -227.890089907448, 79.9300162362507, 1.48)
    pt3dadd(73.2246425880892, -228.845981142051, 80.1091093578443, 1.48)
    pt3dadd(73.449037612102, -229.804434386663, 80.2852179921894, 1.48)
    pt3dadd(73.6734326361149, -230.762887631275, 80.4613266265344, 1.48)
    pt3dadd(73.8978276601277, -231.721340875887, 80.6374352608795, 1.48)
    pt3dadd(74.1422536976393, -232.673986226318, 80.8029369210437, 1.48)
    pt3dadd(74.5817629151113, -233.570068164924, 80.8651366562661, 1.48)
  }
  adendOML[14] {pt3dclear()
    pt3dadd(74.5817629151113, -233.570068164924, 80.8651366562661, 1.48)
    pt3dadd(75.0212721325832, -234.466150103529, 80.9273363914885, 1.48)
    pt3dadd(75.4607813500552, -235.362232042135, 80.9895361267108, 1.48)
    pt3dadd(75.9002905675271, -236.258313980741, 81.0517358619332, 1.48)
    pt3dadd(76.3114802412, -237.154430151781, 81.192576751802, 1.48)
    pt3dadd(76.6899876817431, -238.050585828838, 81.4241736428259, 1.48)
    pt3dadd(77.0684951222862, -238.946741505895, 81.6557705338498, 1.48)
    pt3dadd(77.4470025628293, -239.842897182952, 81.8873674248738, 1.48)
    pt3dadd(77.7529172871015, -240.75033632724, 82.1347179769489, 1.48)
    pt3dadd(77.7786546653057, -241.701324908245, 82.4428710333373, 1.48)
    pt3dadd(77.8043920435099, -242.65231348925, 82.7510240897257, 1.48)
    pt3dadd(77.8301294217141, -243.603302070255, 83.0591771461141, 1.48)
    pt3dadd(77.9060581944728, -244.553990339126, 83.3132036241198, 1.48)
    pt3dadd(78.2205311252478, -245.503251317412, 83.3099832337877, 1.48)
    pt3dadd(78.5350040560229, -246.452512295698, 83.3067628434557, 1.48)
    pt3dadd(78.8494769867979, -247.401773273984, 83.3035424531237, 1.48)
    pt3dadd(79.1518728185492, -248.352916665466, 83.3045521440433, 1.48)
    pt3dadd(79.1740233761382, -249.34774086154, 83.4037195363911, 1.48)
    pt3dadd(79.1961739337272, -250.342565057613, 83.5028869287389, 1.48)
    pt3dadd(79.2183244913161, -251.337389253687, 83.6020543210867, 1.48)
    pt3dadd(79.234343890615, -252.329454292898, 83.7164619632901, 1.48)
    pt3dadd(79.1959782397699, -253.297044856449, 83.9660547880289, 1.48)
    pt3dadd(79.1576125889248, -254.264635420001, 84.2156476127678, 1.48)
    pt3dadd(79.1530878660587, -255.200521978361, 84.5131098416524, 1.48)
    pt3dadd(79.419880569642, -255.882223748935, 85.194361887015, 1.48)
    pt3dadd(79.6866732732254, -256.563925519509, 85.8756139323776, 1.48)
    pt3dadd(79.9534659768088, -257.245627290083, 86.5568659777403, 1.48)
    pt3dadd(80.2202586803921, -257.927329060657, 87.2381180231029, 1.48)
    pt3dadd(80.3981048527323, -258.61809922098, 87.9374970400757, 1.48)
    pt3dadd(80.553759941659, -259.311131834829, 88.6413985171537, 1.48)
    pt3dadd(80.7094150305857, -260.004164448678, 89.3452999942317, 1.48)
    pt3dadd(80.8650701195124, -260.697197062527, 90.0492014713096, 1.48)
    pt3dadd(81.0207252084391, -261.390229676376, 90.7531029483876, 1.48)
    pt3dadd(81.371819692489, -262.06556153895, 91.255295471776, 1.48)
    pt3dadd(82.1386421910992, -262.703241329486, 91.328423717803, 1.48)
    pt3dadd(82.9054646897093, -263.340921120022, 91.40155196383, 1.48)
    pt3dadd(83.6722871883195, -263.978600910558, 91.4746802098571, 1.48)
    pt3dadd(84.4391096869297, -264.616280701094, 91.5478084558841, 1.48)
    pt3dadd(85.2059321855399, -265.253960491631, 91.6209367019112, 1.48)
  }
  soma[2] {pt3dclear()
    pt3dadd(-9.78622875870107, 133.523792875946, 0, 10.4043260233424)
    pt3dadd(-9.92218062558439, 134.502027304486, 0.156762536053, 10.4043260233424)
    pt3dadd(-10.0581324924677, 135.480261733026, 0.313525072106, 10.1118742080783)
    pt3dadd(-10.194084359351, 136.458496161566, 0.470287608159, 9.60468635614927)
    pt3dadd(-10.3300362262343, 137.436730590106, 0.627050144211999, 8.84590300647707)
    pt3dadd(-10.4659880931176, 138.414965018646, 0.783812680264999, 7.76208734813001)
    pt3dadd(-10.601939960001, 139.393199447186, 0.940575216317999, 6.18465843842649)
    pt3dadd(-10.7378918268843, 140.371433875726, 1.097337752371, 3.5)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-10.7378918268843, 140.371433875726, 1.097337752371, 2.47906000584629)
    pt3dadd(-10.8738436937676, 141.349668304266, 1.254100288424, 2.47906000584629)
    pt3dadd(-11.0097955606509, 142.327902732806, 1.410862824477, 2.11125382662694)
    pt3dadd(-11.1457474275342, 143.306137161347, 1.56762536053, 1.81011959652796)
    pt3dadd(-11.2816992944175, 144.284371589887, 1.724387896583, 1.56357174154146)
    pt3dadd(-11.4176511613008, 145.262606018427, 1.881150432636, 1.3617154305586)
    pt3dadd(-11.5536030281841, 146.240840446967, 2.037912968689, 1.19644946105406)
    pt3dadd(-11.6895548950675, 147.219074875507, 2.194675504742, 1.06114112938344)
    pt3dadd(-11.8255067619508, 148.197309304047, 2.351438040795, 0.950360037097033)
    pt3dadd(-11.9614586288341, 149.175543732587, 2.508200576848, 0.85966014998258)
    pt3dadd(-12.0974104957174, 150.153778161127, 2.664963112901, 0.785401363101277)
    pt3dadd(-12.2333623626007, 151.132012589667, 2.821725648954, 0.72460341059529)
    pt3dadd(-12.369314229484, 152.110247018207, 2.978488185007, 0.674826257154464)
    pt3dadd(-12.5052660963673, 153.088481446748, 3.13525072106, 0.634072170831778)
    pt3dadd(-12.6412179632506, 154.066715875288, 3.292013257113, 0.600705547045801)
    pt3dadd(-12.777169830134, 155.044950303828, 3.448775793166, 0.573387266025838)
    pt3dadd(-12.9131216970173, 156.023184732368, 3.605538329219, 0.551020949233567)
    pt3dadd(-13.0490735639006, 157.001419160908, 3.762300865272, 0.532708957842651)
    pt3dadd(-13.1850254307839, 157.979653589448, 3.919063401325, 0.517716367340809)
    pt3dadd(-13.3209772976672, 158.957888017988, 4.075825937378, 0.505441472428646)
    pt3dadd(-13.4569291645505, 159.936122446528, 4.232588473431, 0.495391638473257)
    pt3dadd(-13.5928810314338, 160.914356875068, 4.389351009484, 0.487163530350653)
    pt3dadd(-13.7288328983172, 161.892591303608, 4.546113545537, 0.480426925191027)
    pt3dadd(-13.8647847652005, 162.870825732149, 4.70287608159, 0.474911459375497)
    pt3dadd(-14.0007366320838, 163.849060160689, 4.85963861764299, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-14.0007366320838, 163.849060160689, 4.85963861764299, 0.466698650595398)
    pt3dadd(-14.1366884989671, 164.827294589229, 5.01640115369599, 0.466698650595398)
    pt3dadd(-14.2726403658504, 165.805529017769, 5.17316368974899, 0.463671698777356)
    pt3dadd(-14.4085922327337, 166.783763446309, 5.32992622580199, 0.46119344023584)
    pt3dadd(-14.544544099617, 167.761997874849, 5.48668876185499, 0.459164413753823)
    pt3dadd(-14.6804959665003, 168.740232303389, 5.64345129790799, 0.457503187374186)
    pt3dadd(-14.8164478333837, 169.718466731929, 5.80021383396099, 0.456143090249352)
    pt3dadd(-14.952399700267, 170.696701160469, 5.95697637001399, 0.455029536906078)
    pt3dadd(-15.0883515671503, 171.674935589009, 6.11373890606699, 0.454117836538747)
    pt3dadd(-15.2243034340336, 172.65317001755, 6.27050144211999, 0.45337139941042)
    pt3dadd(-15.3602553009169, 173.63140444609, 6.42726397817299, 0.45276026837822)
    pt3dadd(-15.4962071678002, 174.60963887463, 6.58402651422599, 0.452259916607997)
    pt3dadd(-15.6321590346835, 175.58787330317, 6.74078905027899, 0.451850263226359)
    pt3dadd(-15.7681109015668, 176.56610773171, 6.89755158633199, 0.45151486740471)
    pt3dadd(-15.9040627684502, 177.54434216025, 7.05431412238499, 0.451240268531071)
    pt3dadd(-16.0400146353335, 178.52257658879, 7.21107665843799, 0.451015445988463)
    pt3dadd(-16.1759665022168, 179.50081101733, 7.36783919449099, 0.450831376858844)
    pt3dadd(-16.3119183691001, 180.47904544587, 7.52460173054399, 0.450680673801733)
    pt3dadd(-16.4478702359834, 181.45727987441, 7.68136426659699, 0.450557288574293)
    pt3dadd(-16.5838221028667, 182.435514302951, 7.83812680264999, 0.450456269294113)
    pt3dadd(-16.71977396975, 183.413748731491, 7.99488933870299, 0.450373561702775)
    pt3dadd(-16.8557258366334, 184.391983160031, 8.15165187475599, 0.450305846454234)
    pt3dadd(-16.9916777035167, 185.370217588571, 8.30841441080899, 0.450250405897802)
    pt3dadd(-17.1276295704, 186.348452017111, 8.46517694686199, 0.450205015009282)
    pt3dadd(-17.2635814372833, 187.326686445651, 8.62193948291499, 0.450167852092942)
    pt3dadd(-17.3995333041666, 188.304920874191, 8.77870201896799, 0.45013742567046)
    pt3dadd(-17.5354851710499, 189.283155302731, 8.93546455502099, 0.450112514622668)
    pt3dadd(-17.6714370379332, 190.261389731271, 9.09222709107399, 0.450092119181749)
    pt3dadd(-17.8073889048165, 191.239624159811, 9.24898962712699, 0.450075420807047)
    pt3dadd(-17.9433407716999, 192.217858588352, 9.40575216317999, 0.450061749334151)
    pt3dadd(-18.0792926385832, 193.196093016892, 9.56251469923299, 0.450050556078851)
    pt3dadd(-18.2152445054665, 194.174327445432, 9.71927723528599, 0.450041391816511)
    pt3dadd(-18.3511963723498, 195.152561873972, 9.87603977133899, 0.450033888753103)
    pt3dadd(-18.4871482392331, 196.130796302512, 10.032802307392, 0.450027745764349)
    pt3dadd(-18.6231001061164, 197.109030731052, 10.189564843445, 0.45002271631054)
    pt3dadd(-18.7590519729997, 198.087265159592, 10.346327379498, 0.450018598542036)
    pt3dadd(-18.895003839883, 199.065499588132, 10.503089915551, 0.450015227198327)
    pt3dadd(-19.0309557067664, 200.043734016672, 10.659852451604, 0.450012466975554)
    pt3dadd(-19.1669075736497, 201.021968445212, 10.816614987657, 0.450010207096284)
    pt3dadd(-19.302859440533, 202.000202873752, 10.97337752371, 0.450008356863627)
    pt3dadd(-19.4388113074163, 202.978437302293, 11.130140059763, 0.450006842021251)
    pt3dadd(-19.5747631742996, 203.956671730833, 11.286902595816, 0.450005601773211)
    pt3dadd(-19.7107150411829, 204.934906159373, 11.443665131869, 0.450004586344)
    pt3dadd(-19.8466669080662, 205.913140587913, 11.600427667922, 0.450003754980877)
    pt3dadd(-19.9826187749496, 206.891375016453, 11.757190203975, 0.450003074318321)
    pt3dadd(-20.1185706418329, 207.869609444993, 11.913952740028, 0.450002517038954)
    pt3dadd(-20.2545225087162, 208.847843873533, 12.070715276081, 0.450002060777199)
    pt3dadd(-20.3904743755995, 209.826078302073, 12.227477812134, 0.450001687221668)
    pt3dadd(-20.5264262424828, 210.804312730613, 12.384240348187, 0.450001381380267)
    pt3dadd(-20.6623781093661, 211.782547159153, 12.54100288424, 0.450001130978506)
    pt3dadd(-20.7983299762494, 212.760781587694, 12.697765420293, 0.450000925966884)
    pt3dadd(-20.9342818431327, 213.739016016234, 12.854527956346, 0.450000758117564)
    pt3dadd(-21.0702337100161, 214.717250444774, 13.011290492399, 0.450000620694164)
    pt3dadd(-21.2061855768994, 215.695484873314, 13.168053028452, 0.450000508181401)
    pt3dadd(-21.3421374437827, 216.673719301854, 13.324815564505, 0.450000416063741)
    pt3dadd(-21.478089310666, 217.651953730394, 13.481578100558, 0.45000034064418)
    pt3dadd(-21.6140411775493, 218.630188158934, 13.638340636611, 0.450000278895866)
    pt3dadd(-21.7499930444326, 219.608422587474, 13.795103172664, 0.450000228340622)
    pt3dadd(-21.8859449113159, 220.586657016014, 13.951865708717, 0.45000018694949)
    pt3dadd(-22.0218967781992, 221.564891444554, 14.10862824477, 0.450000153061296)
    pt3dadd(-22.1578486450826, 222.543125873095, 14.265390780823, 0.45000012531599)
    pt3dadd(-22.2938005119659, 223.521360301635, 14.422153316876, 0.450000102600055)
    pt3dadd(-22.4297523788492, 224.499594730175, 14.578915852929, 0.450000084001821)
    pt3dadd(-22.5657042457325, 225.477829158715, 14.735678388982, 0.450000068774874)
    pt3dadd(-22.7016561126158, 226.456063587255, 14.892440925035, 0.450000056308104)
    pt3dadd(-22.8376079794991, 227.434298015795, 15.049203461088, 0.450000046101177)
    pt3dadd(-22.9735598463824, 228.412532444335, 15.205965997141, 0.450000037744451)
    pt3dadd(-23.1095117132658, 229.390766872875, 15.362728533194, 0.450000030902543)
    pt3dadd(-23.2454635801491, 230.369001301415, 15.519491069247, 0.450000025300862)
    pt3dadd(-23.3814154470324, 231.347235729955, 15.6762536053, 0.450000020714594)
    pt3dadd(-23.5173673139157, 232.325470158496, 15.833016141353, 0.450000016959675)
    pt3dadd(-23.653319180799, 233.303704587036, 15.989778677406, 0.450000013885408)
    pt3dadd(-23.7892710476823, 234.281939015576, 16.146541213459, 0.45000001136841)
    pt3dadd(-23.9252229145656, 235.260173444116, 16.303303749512, 0.450000009307667)
    pt3dadd(-24.0611747814489, 236.238407872656, 16.460066285565, 0.450000007620473)
    pt3dadd(-24.1971266483323, 237.216642301196, 16.616828821618, 0.450000006239116)
    pt3dadd(-24.3330785152156, 238.194876729736, 16.773591357671, 0.450000005108156)
    pt3dadd(-24.4690303820989, 239.173111158276, 16.930353893724, 0.450000004182204)
    pt3dadd(-24.6049822489822, 240.151345586816, 17.087116429777, 0.450000003424099)
    pt3dadd(-24.7409341158655, 241.129580015356, 17.24387896583, 0.450000002803415)
    pt3dadd(-24.8768859827488, 242.107814443897, 17.400641501883, 0.450000002295242)
    pt3dadd(-25.0128378496321, 243.086048872437, 17.557404037936, 0.450000001879186)
    pt3dadd(-25.1487897165154, 244.064283300977, 17.714166573989, 0.450000001538547)
    pt3dadd(-25.2847415833988, 245.042517729517, 17.870929110042, 0.450000001259656)
    pt3dadd(-25.4206934502821, 246.020752158057, 18.027691646095, 0.450000001031319)
    pt3dadd(-25.5566453171654, 246.998986586597, 18.184454182148, 0.450000000844373)
    pt3dadd(-25.6925971840487, 247.977221015137, 18.341216718201, 0.450000000691314)
    pt3dadd(-25.828549050932, 248.955455443677, 18.497979254254, 0.450000000566)
    pt3dadd(-25.9645009178153, 249.933689872217, 18.654741790307, 0.450000000463401)
    pt3dadd(-26.1004527846986, 250.911924300757, 18.81150432636, 0.450000000379401)
    pt3dadd(-26.236404651582, 251.890158729298, 18.968266862413, 0.450000000310627)
    pt3dadd(-26.3723565184653, 252.868393157838, 19.125029398466, 0.45000000025432)
    pt3dadd(-26.5083083853486, 253.846627586378, 19.281791934519, 0.45000000020822)
    pt3dadd(-26.6442602522319, 254.824862014918, 19.438554470572, 0.450000000170476)
    pt3dadd(-26.7802121191152, 255.803096443458, 19.595317006625, 0.450000000139574)
    pt3dadd(-26.9161639859985, 256.781330871998, 19.752079542678, 0.450000000114273)
    pt3dadd(-27.0521158528818, 257.759565300538, 19.908842078731, 0.450000000093559)
    pt3dadd(-27.1880677197651, 258.737799729078, 20.065604614784, 0.4500000000766)
    pt3dadd(-27.3240195866485, 259.716034157618, 20.222367150837, 0.450000000062715)
    pt3dadd(-27.4599714535318, 260.694268586158, 20.37912968689, 0.450000000051346)
    pt3dadd(-27.5959233204151, 261.672503014699, 20.535892222943, 0.450000000042039)
    pt3dadd(-27.7318751872984, 262.650737443239, 20.692654758996, 0.450000000034418)
    pt3dadd(-27.8678270541817, 263.628971871779, 20.849417295049, 0.450000000028179)
    pt3dadd(-28.003778921065, 264.607206300319, 21.006179831102, 0.450000000023071)
    pt3dadd(-28.1397307879483, 265.585440728859, 21.162942367155, 0.450000000018889)
    pt3dadd(-28.2756826548316, 266.563675157399, 21.319704903208, 0.450000000015465)
    pt3dadd(-28.411634521715, 267.541909585939, 21.476467439261, 0.450000000012662)
    pt3dadd(-28.5475863885983, 268.520144014479, 21.633229975314, 0.450000000010367)
    pt3dadd(-28.6835382554816, 269.498378443019, 21.789992511367, 0.450000000008488)
    pt3dadd(-28.8194901223649, 270.476612871559, 21.94675504742, 0.450000000006949)
    pt3dadd(-28.9554419892482, 271.4548473001, 22.103517583473, 0.450000000005689)
    pt3dadd(-29.0913938561315, 272.43308172864, 22.260280119526, 0.450000000004658)
    pt3dadd(-29.2273457230148, 273.41131615718, 22.417042655579, 0.450000000003814)
  }
}
proc shape3d_22() {
  axon[0] {
    pt3dadd(-29.3632975898982, 274.38955058572, 22.573805191632, 0.450000000003122)
    pt3dadd(-29.4992494567815, 275.36778501426, 22.730567727685, 0.450000000002556)
    pt3dadd(-29.6352013236648, 276.3460194428, 22.887330263738, 0.450000000002093)
    pt3dadd(-29.7711531905481, 277.32425387134, 23.044092799791, 0.450000000001714)
    pt3dadd(-29.9071050574314, 278.30248829988, 23.200855335844, 0.450000000001403)
    pt3dadd(-30.0430569243147, 279.28072272842, 23.357617871897, 0.450000000001149)
    pt3dadd(-30.179008791198, 280.25895715696, 23.51438040795, 0.45000000000094)
    pt3dadd(-30.3149606580813, 281.2371915855, 23.671142944003, 0.45000000000077)
    pt3dadd(-30.4509125249647, 282.215426014041, 23.827905480056, 0.45000000000063)
    pt3dadd(-30.586864391848, 283.193660442581, 23.984668016109, 0.450000000000516)
    pt3dadd(-30.7228162587313, 284.171894871121, 24.141430552162, 0.450000000000423)
    pt3dadd(-30.8587681256146, 285.150129299661, 24.298193088215, 0.450000000000346)
    pt3dadd(-30.9947199924979, 286.128363728201, 24.454955624268, 0.450000000000283)
    pt3dadd(-31.1306718593812, 287.106598156741, 24.611718160321, 0.450000000000232)
    pt3dadd(-31.2666237262645, 288.084832585281, 24.768480696374, 0.45000000000019)
    pt3dadd(-31.4025755931478, 289.063067013821, 24.925243232427, 0.450000000000155)
    pt3dadd(-31.5385274600312, 290.041301442361, 25.08200576848, 0.450000000000127)
    pt3dadd(-31.6744793269145, 291.019535870901, 25.238768304533, 0.450000000000104)
    pt3dadd(-31.8104311937978, 291.997770299442, 25.395530840586, 0.450000000000085)
    pt3dadd(-31.9463830606811, 292.976004727982, 25.552293376639, 0.45000000000007)
    pt3dadd(-32.0823349275644, 293.954239156522, 25.709055912692, 0.450000000000057)
    pt3dadd(-32.2182867944477, 294.932473585062, 25.865818448745, 0.450000000000047)
    pt3dadd(-32.354238661331, 295.910708013602, 26.022580984798, 0.450000000000038)
    pt3dadd(-32.4901905282144, 296.888942442142, 26.179343520851, 0.450000000000031)
    pt3dadd(-32.6261423950977, 297.867176870682, 26.336106056904, 0.450000000000026)
    pt3dadd(-32.762094261981, 298.845411299222, 26.492868592957, 0.450000000000021)
    pt3dadd(-32.8980461288643, 299.823645727762, 26.64963112901, 0.450000000000017)
    pt3dadd(-33.0339979957476, 300.801880156302, 26.806393665063, 0.450000000000014)
    pt3dadd(-33.1699498626309, 301.780114584843, 26.963156201116, 0.450000000000012)
    pt3dadd(-33.3059017295142, 302.758349013383, 27.119918737169, 0.450000000000009)
    pt3dadd(-33.4418535963975, 303.736583441923, 27.276681273222, 0.450000000000008)
    pt3dadd(-33.5778054632809, 304.714817870463, 27.433443809275, 0.450000000000006)
    pt3dadd(-33.7137573301642, 305.693052299003, 27.590206345328, 0.450000000000005)
    pt3dadd(-33.8497091970475, 306.671286727543, 27.746968881381, 0.450000000000004)
    pt3dadd(-33.9856610639308, 307.649521156083, 27.903731417434, 0.450000000000004)
    pt3dadd(-34.1216129308141, 308.627755584623, 28.060493953487, 0.450000000000003)
    pt3dadd(-34.2575647976974, 309.605990013163, 28.21725648954, 0.450000000000002)
    pt3dadd(-34.3935166645807, 310.584224441703, 28.374019025593, 0.450000000000002)
    pt3dadd(-34.529468531464, 311.562458870244, 28.530781561646, 0.450000000000002)
    pt3dadd(-34.6654203983474, 312.540693298784, 28.687544097699, 0.450000000000001)
    pt3dadd(-34.8013722652307, 313.518927727324, 28.844306633752, 0.450000000000001)
    pt3dadd(-34.937324132114, 314.497162155864, 29.001069169805, 0.450000000000001)
    pt3dadd(-35.0732759989973, 315.475396584404, 29.157831705858, 0.450000000000001)
    pt3dadd(-35.2092278658806, 316.453631012944, 29.314594241911, 0.450000000000001)
    pt3dadd(-35.3451797327639, 317.431865441484, 29.471356777964, 0.45)
    pt3dadd(-35.4811315996472, 318.410099870024, 29.628119314017, 0.45)
    pt3dadd(-35.6170834665306, 319.388334298564, 29.78488185007, 0.45)
    pt3dadd(-35.7530353334139, 320.366568727104, 29.941644386123, 0.45)
    pt3dadd(-35.8889872002972, 321.344803155645, 30.098406922176, 0.45)
    pt3dadd(-36.0249390671805, 322.323037584185, 30.255169458229, 0.45)
    pt3dadd(-36.1608909340638, 323.301272012725, 30.411931994282, 0.45)
    pt3dadd(-36.2968428009471, 324.279506441265, 30.568694530335, 0.45)
    pt3dadd(-36.4327946678304, 325.257740869805, 30.725457066388, 0.45)
    pt3dadd(-36.5687465347137, 326.235975298345, 30.882219602441, 0.45)
    pt3dadd(-36.7046984015971, 327.214209726885, 31.038982138494, 0.45)
    pt3dadd(-36.8406502684804, 328.192444155425, 31.195744674547, 0.45)
    pt3dadd(-36.9766021353637, 329.170678583965, 31.3525072106, 0.45)
    pt3dadd(-37.112554002247, 330.148913012505, 31.509269746653, 0.45)
    pt3dadd(-37.2485058691303, 331.127147441046, 31.666032282706, 0.45)
    pt3dadd(-37.3844577360136, 332.105381869586, 31.822794818759, 0.45)
    pt3dadd(-37.5204096028969, 333.083616298126, 31.979557354812, 0.45)
    pt3dadd(-37.6563614697803, 334.061850726666, 32.136319890865, 0.45)
    pt3dadd(-37.7923133366636, 335.040085155206, 32.293082426918, 0.45)
    pt3dadd(-37.9282652035469, 336.018319583746, 32.449844962971, 0.45)
    pt3dadd(-38.0642170704302, 336.996554012286, 32.606607499024, 0.45)
    pt3dadd(-38.2001689373135, 337.974788440826, 32.763370035077, 0.45)
    pt3dadd(-38.3361208041968, 338.953022869366, 32.92013257113, 0.45)
    pt3dadd(-38.4720726710801, 339.931257297906, 33.076895107183, 0.45)
    pt3dadd(-38.6080245379634, 340.909491726447, 33.233657643236, 0.45)
    pt3dadd(-38.7439764048468, 341.887726154987, 33.390420179289, 0.45)
    pt3dadd(-38.8799282717301, 342.865960583527, 33.547182715342, 0.45)
    pt3dadd(-39.0158801386134, 343.844195012067, 33.703945251395, 0.45)
    pt3dadd(-39.1518320054967, 344.822429440607, 33.860707787448, 0.45)
    pt3dadd(-39.28778387238, 345.800663869147, 34.017470323501, 0.45)
    pt3dadd(-39.4237357392633, 346.778898297687, 34.174232859554, 0.45)
    pt3dadd(-39.5596876061466, 347.757132726227, 34.330995395607, 0.45)
    pt3dadd(-39.6956394730299, 348.735367154767, 34.48775793166, 0.45)
    pt3dadd(-39.8315913399133, 349.713601583307, 34.644520467713, 0.45)
    pt3dadd(-39.9675432067966, 350.691836011848, 34.801283003766, 0.45)
    pt3dadd(-40.1034950736799, 351.670070440388, 34.958045539819, 0.45)
    pt3dadd(-40.2394469405632, 352.648304868928, 35.114808075872, 0.45)
    pt3dadd(-40.3753988074465, 353.626539297468, 35.271570611925, 0.45)
    pt3dadd(-40.5113506743298, 354.604773726008, 35.428333147978, 0.45)
    pt3dadd(-40.6473025412131, 355.583008154548, 35.585095684031, 0.45)
    pt3dadd(-40.7832544080965, 356.561242583088, 35.741858220084, 0.45)
    pt3dadd(-40.9192062749798, 357.539477011628, 35.898620756137, 0.45)
    pt3dadd(-41.0551581418631, 358.517711440168, 36.05538329219, 0.45)
    pt3dadd(-41.1911100087464, 359.495945868708, 36.212145828243, 0.45)
    pt3dadd(-41.3270618756297, 360.474180297248, 36.368908364296, 0.45)
    pt3dadd(-41.463013742513, 361.452414725789, 36.525670900349, 0.45)
    pt3dadd(-41.5989656093963, 362.430649154329, 36.682433436402, 0.45)
    pt3dadd(-41.7349174762796, 363.408883582869, 36.839195972455, 0.45)
    pt3dadd(-41.870869343163, 364.387118011409, 36.995958508508, 0.45)
    pt3dadd(-42.0068212100463, 365.365352439949, 37.152721044561, 0.45)
    pt3dadd(-42.1427730769296, 366.343586868489, 37.309483580614, 0.45)
    pt3dadd(-42.2787249438129, 367.321821297029, 37.466246116667, 0.45)
    pt3dadd(-42.4146768106962, 368.300055725569, 37.62300865272, 0.45)
    pt3dadd(-42.5506286775795, 369.278290154109, 37.779771188773, 0.45)
    pt3dadd(-42.6865805444628, 370.256524582649, 37.936533724826, 0.45)
    pt3dadd(-42.8225324113461, 371.23475901119, 38.093296260879, 0.45)
    pt3dadd(-42.9584842782295, 372.21299343973, 38.250058796932, 0.45)
    pt3dadd(-43.0944361451128, 373.19122786827, 38.406821332985, 0.45)
    pt3dadd(-43.2303880119961, 374.16946229681, 38.563583869038, 0.45)
    pt3dadd(-43.3663398788794, 375.14769672535, 38.720346405091, 0.45)
    pt3dadd(-43.5022917457627, 376.12593115389, 38.877108941144, 0.45)
    pt3dadd(-43.638243612646, 377.10416558243, 39.033871477197, 0.45)
    pt3dadd(-43.7741954795293, 378.08240001097, 39.19063401325, 0.45)
    pt3dadd(-43.9101473464127, 379.06063443951, 39.347396549303, 0.45)
    pt3dadd(-44.046099213296, 380.03886886805, 39.504159085356, 0.45)
    pt3dadd(-44.1820510801793, 381.017103296591, 39.660921621409, 0.45)
    pt3dadd(-44.3180029470626, 381.995337725131, 39.817684157462, 0.45)
    pt3dadd(-44.4539548139459, 382.973572153671, 39.974446693515, 0.45)
    pt3dadd(-44.5899066808292, 383.951806582211, 40.131209229568, 0.45)
    pt3dadd(-44.7258585477125, 384.930041010751, 40.287971765621, 0.45)
    pt3dadd(-44.8618104145958, 385.908275439291, 40.444734301674, 0.45)
    pt3dadd(-44.9977622814792, 386.886509867831, 40.601496837727, 0.45)
    pt3dadd(-45.1337141483625, 387.864744296371, 40.75825937378, 0.45)
    pt3dadd(-45.2696660152458, 388.842978724911, 40.915021909833, 0.45)
    pt3dadd(-45.4056178821291, 389.821213153451, 41.071784445886, 0.45)
    pt3dadd(-45.5415697490124, 390.799447581992, 41.228546981939, 0.45)
    pt3dadd(-45.6775216158957, 391.777682010532, 41.385309517992, 0.45)
    pt3dadd(-45.813473482779, 392.755916439072, 41.542072054045, 0.45)
    pt3dadd(-45.9494253496623, 393.734150867612, 41.698834590098, 0.45)
    pt3dadd(-46.0853772165457, 394.712385296152, 41.855597126151, 0.45)
    pt3dadd(-46.221329083429, 395.690619724692, 42.012359662204, 0.45)
    pt3dadd(-46.3572809503123, 396.668854153232, 42.169122198257, 0.45)
    pt3dadd(-46.4932328171956, 397.647088581772, 42.32588473431, 0.45)
    pt3dadd(-46.6291846840789, 398.625323010312, 42.482647270363, 0.45)
    pt3dadd(-46.7651365509622, 399.603557438852, 42.639409806416, 0.45)
    pt3dadd(-46.9010884178455, 400.581791867393, 42.796172342469, 0.45)
    pt3dadd(-47.0370402847289, 401.560026295933, 42.952934878522, 0.45)
    pt3dadd(-47.1729921516122, 402.538260724473, 43.109697414575, 0.45)
    pt3dadd(-47.3089440184955, 403.516495153013, 43.266459950628, 0.45)
    pt3dadd(-47.4448958853788, 404.494729581553, 43.423222486681, 0.45)
    pt3dadd(-47.5808477522621, 405.472964010093, 43.579985022734, 0.45)
    pt3dadd(-47.7167996191454, 406.451198438633, 43.736747558787, 0.45)
    pt3dadd(-47.8527514860287, 407.429432867173, 43.89351009484, 0.45)
    pt3dadd(-47.988703352912, 408.407667295713, 44.050272630893, 0.45)
    pt3dadd(-48.1246552197954, 409.385901724253, 44.207035166946, 0.45)
    pt3dadd(-48.2606070866787, 410.364136152794, 44.363797702999, 0.45)
    pt3dadd(-48.396558953562, 411.342370581334, 44.520560239052, 0.45)
    pt3dadd(-48.5325108204453, 412.320605009874, 44.677322775105, 0.45)
    pt3dadd(-48.6684626873286, 413.298839438414, 44.8340853111579, 0.45)
    pt3dadd(-48.8044145542119, 414.277073866954, 44.990847847211, 0.45)
    pt3dadd(-48.9403664210952, 415.255308295494, 45.147610383264, 0.45)
    pt3dadd(-49.0763182879785, 416.233542724034, 45.304372919317, 0.45)
    pt3dadd(-49.2122701548619, 417.211777152574, 45.46113545537, 0.45)
    pt3dadd(-49.3482220217452, 418.190011581114, 45.617897991423, 0.45)
    pt3dadd(-49.4841738886285, 419.168246009654, 45.774660527476, 0.45)
    pt3dadd(-49.6201257555118, 420.146480438195, 45.931423063529, 0.45)
    pt3dadd(-49.7560776223951, 421.124714866735, 46.0881855995819, 0.45)
    pt3dadd(-49.8920294892784, 422.102949295275, 46.2449481356349, 0.45)
    pt3dadd(-50.0279813561617, 423.081183723815, 46.401710671688, 0.45)
    pt3dadd(-50.163933223045, 424.059418152355, 46.558473207741, 0.45)
    pt3dadd(-50.2998850899284, 425.037652580895, 46.715235743794, 0.45)
    pt3dadd(-50.4358369568117, 426.015887009435, 46.8719982798469, 0.45)
    pt3dadd(-50.571788823695, 426.994121437975, 47.0287608159, 0.45)
    pt3dadd(-50.7077406905783, 427.972355866515, 47.185523351953, 0.45)
    pt3dadd(-50.8436925574616, 428.950590295055, 47.3422858880059, 0.45)
    pt3dadd(-50.9796444243449, 429.928824723596, 47.4990484240589, 0.45)
    pt3dadd(-51.1155962912282, 430.907059152136, 47.655810960112, 0.45)
    pt3dadd(-51.2515481581116, 431.885293580676, 47.812573496165, 0.45)
    pt3dadd(-51.3875000249949, 432.863528009216, 47.969336032218, 0.45)
    pt3dadd(-51.5234518918782, 433.841762437756, 48.1260985682709, 0.45)
    pt3dadd(-51.6594037587615, 434.819996866296, 48.2828611043239, 0.45)
    pt3dadd(-51.7953556256448, 435.798231294836, 48.439623640377, 0.45)
    pt3dadd(-51.9313074925281, 436.776465723376, 48.5963861764299, 0.45)
    pt3dadd(-52.0672593594114, 437.754700151916, 48.7531487124829, 0.45)
    pt3dadd(-52.2032112262947, 438.732934580456, 48.9099112485359, 0.45)
    pt3dadd(-52.3391630931781, 439.711169008997, 49.066673784589, 0.45)
    pt3dadd(-52.4751149600614, 440.689403437537, 49.223436320642, 0.45)
    pt3dadd(-52.6110668269447, 441.667637866077, 49.3801988566949, 0.45)
    pt3dadd(-52.747018693828, 442.645872294617, 49.5369613927479, 0.45)
    pt3dadd(-52.8829705607113, 443.624106723157, 49.6937239288009, 0.45)
    pt3dadd(-53.0189224275946, 444.602341151697, 49.8504864648539, 0.45)
    pt3dadd(-53.1548742944779, 445.580575580237, 50.0072490009069, 0.45)
    pt3dadd(-53.2908261613613, 446.558810008777, 50.1640115369599, 0.45)
    pt3dadd(-53.4267780282446, 447.537044437317, 50.3207740730129, 0.45)
    pt3dadd(-53.5627298951279, 448.515278865857, 50.477536609066, 0.45)
    pt3dadd(-53.6986817620112, 449.493513294398, 50.6342991451189, 0.45)
    pt3dadd(-53.8346336288945, 450.471747722938, 50.7910616811719, 0.45)
    pt3dadd(-53.9705854957778, 451.449982151478, 50.9478242172249, 0.45)
    pt3dadd(-54.1065373626611, 452.428216580018, 51.1045867532779, 0.45)
    pt3dadd(-54.2424892295444, 453.406451008558, 51.2613492893309, 0.45)
    pt3dadd(-54.3784410964278, 454.384685437098, 51.4181118253839, 0.45)
    pt3dadd(-54.5143929633111, 455.362919865638, 51.5748743614369, 0.45)
    pt3dadd(-54.6503448301944, 456.341154294178, 51.7316368974899, 0.45)
    pt3dadd(-54.7862966970777, 457.319388722718, 51.8883994335429, 0.45)
    pt3dadd(-54.922248563961, 458.297623151258, 52.0451619695959, 0.45)
    pt3dadd(-55.0582004308443, 459.275857579798, 52.2019245056489, 0.45)
    pt3dadd(-55.1941522977276, 460.254092008339, 52.3586870417019, 0.45)
    pt3dadd(-55.330104164611, 461.232326436879, 52.5154495777549, 0.45)
    pt3dadd(-55.4660560314943, 462.210560865419, 52.6722121138079, 0.45)
    pt3dadd(-55.6020078983776, 463.188795293959, 52.8289746498609, 0.45)
    pt3dadd(-55.7379597652609, 464.167029722499, 52.9857371859139, 0.45)
    pt3dadd(-55.8739116321442, 465.145264151039, 53.1424997219669, 0.45)
    pt3dadd(-56.0098634990275, 466.123498579579, 53.2992622580199, 0.45)
    pt3dadd(-56.1458153659108, 467.101733008119, 53.4560247940729, 0.45)
    pt3dadd(-56.2817672327941, 468.079967436659, 53.6127873301259, 0.45)
    pt3dadd(-56.4177190996775, 469.058201865199, 53.7695498661789, 0.45)
    pt3dadd(-56.5536709665608, 470.03643629374, 53.9263124022319, 0.45)
    pt3dadd(-56.6896228334441, 471.01467072228, 54.0830749382849, 0.45)
    pt3dadd(-56.8255747003274, 471.99290515082, 54.2398374743379, 0.45)
    pt3dadd(-56.9615265672107, 472.97113957936, 54.3966000103909, 0.45)
    pt3dadd(-57.097478434094, 473.9493740079, 54.5533625464439, 0.45)
    pt3dadd(-57.2334303009773, 474.92760843644, 54.7101250824969, 0.45)
    pt3dadd(-57.3693821678606, 475.90584286498, 54.8668876185499, 0.45)
    pt3dadd(-57.505334034744, 476.88407729352, 55.0236501546029, 0.45)
    pt3dadd(-57.6412859016273, 477.86231172206, 55.1804126906559, 0.45)
    pt3dadd(-57.7772377685106, 478.8405461506, 55.3371752267089, 0.45)
    pt3dadd(-57.9131896353939, 479.818780579141, 55.4939377627619, 0.45)
    pt3dadd(-58.0491415022772, 480.797015007681, 55.6507002988149, 0.45)
    pt3dadd(-58.1850933691605, 481.775249436221, 55.8074628348679, 0.45)
    pt3dadd(-58.3210452360438, 482.753483864761, 55.9642253709209, 0.45)
    pt3dadd(-58.4569971029271, 483.731718293301, 56.1209879069739, 0.45)
    pt3dadd(-58.5929489698105, 484.709952721841, 56.2777504430269, 0.45)
    pt3dadd(-58.7289008366938, 485.688187150381, 56.4345129790799, 0.45)
    pt3dadd(-58.8648527035771, 486.666421578921, 56.5912755151329, 0.45)
    pt3dadd(-59.0008045704604, 487.644656007461, 56.7480380511859, 0.45)
    pt3dadd(-59.1367564373437, 488.622890436001, 56.9048005872389, 0.45)
    pt3dadd(-59.272708304227, 489.601124864542, 57.0615631232919, 0.45)
    pt3dadd(-59.4086601711103, 490.579359293082, 57.2183256593449, 0.45)
    pt3dadd(-59.5446120379937, 491.557593721622, 57.3750881953979, 0.45)
    pt3dadd(-59.680563904877, 492.535828150162, 57.5318507314509, 0.45)
    pt3dadd(-59.8165157717603, 493.514062578702, 57.6886132675039, 0.45)
    pt3dadd(-59.9524676386436, 494.492297007242, 57.8453758035569, 0.45)
    pt3dadd(-60.0884195055269, 495.470531435782, 58.0021383396099, 0.45)
    pt3dadd(-60.2243713724102, 496.448765864322, 58.1589008756629, 0.45)
    pt3dadd(-60.3603232392935, 497.427000292862, 58.3156634117159, 0.45)
    pt3dadd(-60.4962751061768, 498.405234721402, 58.4724259477689, 0.45)
    pt3dadd(-60.6322269730602, 499.383469149943, 58.6291884838219, 0.45)
    pt3dadd(-60.7681788399435, 500.361703578483, 58.7859510198749, 0.45)
    pt3dadd(-60.9041307068268, 501.339938007023, 58.9427135559279, 0.45)
    pt3dadd(-61.0400825737101, 502.318172435563, 59.0994760919809, 0.45)
    pt3dadd(-61.1760344405934, 503.296406864103, 59.2562386280339, 0.45)
    pt3dadd(-61.3119863074767, 504.274641292643, 59.4130011640869, 0.45)
    pt3dadd(-61.44793817436, 505.252875721183, 59.5697637001399, 0.45)
    pt3dadd(-61.5838900412434, 506.231110149723, 59.7265262361929, 0.45)
    pt3dadd(-61.7198419081267, 507.209344578263, 59.8832887722459, 0.45)
    pt3dadd(-61.85579377501, 508.187579006803, 60.0400513082989, 0.45)
    pt3dadd(-61.9917456418933, 509.165813435344, 60.1968138443519, 0.45)
    pt3dadd(-62.1276975087766, 510.144047863884, 60.3535763804049, 0.45)
    pt3dadd(-62.2636493756599, 511.122282292424, 60.5103389164579, 0.45)
    pt3dadd(-62.3996012425432, 512.100516720964, 60.6671014525109, 0.45)
    pt3dadd(-62.5355531094265, 513.078751149504, 60.8238639885639, 0.45)
    pt3dadd(-62.6715049763099, 514.056985578044, 60.9806265246169, 0.45)
    pt3dadd(-62.8074568431932, 515.035220006584, 61.1373890606699, 0.45)
    pt3dadd(-62.9434087100765, 516.013454435124, 61.2941515967229, 0.45)
    pt3dadd(-63.0793605769598, 516.991688863664, 61.4509141327759, 0.45)
  }
}
proc shape3d_23() {
  axon[0] {
    pt3dadd(-63.2153124438431, 517.969923292204, 61.6076766688289, 0.45)
    pt3dadd(-63.3512643107264, 518.948157720745, 61.7644392048819, 0.45)
    pt3dadd(-63.4872161776097, 519.926392149285, 61.9212017409349, 0.45)
    pt3dadd(-63.623168044493, 520.904626577825, 62.0779642769879, 0.45)
    pt3dadd(-63.7591199113764, 521.882861006365, 62.2347268130409, 0.45)
    pt3dadd(-63.8950717782597, 522.861095434905, 62.3914893490939, 0.45)
    pt3dadd(-64.031023645143, 523.839329863445, 62.5482518851469, 0.45)
    pt3dadd(-64.1669755120263, 524.817564291985, 62.7050144211999, 0.45)
    pt3dadd(-64.3029273789096, 525.795798720525, 62.8617769572529, 0.45)
    pt3dadd(-64.4388792457929, 526.774033149065, 63.0185394933059, 0.45)
    pt3dadd(-64.5748311126762, 527.752267577605, 63.1753020293589, 0.45)
    pt3dadd(-64.7107829795596, 528.730502006146, 63.3320645654119, 0.45)
    pt3dadd(-64.8467348464429, 529.708736434686, 63.4888271014649, 0.45)
    pt3dadd(-64.9826867133262, 530.686970863226, 63.6455896375179, 0.45)
    pt3dadd(-65.1186385802095, 531.665205291766, 63.8023521735709, 0.45)
    pt3dadd(-65.2545904470928, 532.643439720306, 63.9591147096239, 0.45)
    pt3dadd(-65.3905423139761, 533.621674148846, 64.1158772456769, 0.45)
    pt3dadd(-65.5264941808594, 534.599908577386, 64.2726397817299, 0.45)
    pt3dadd(-65.6624460477427, 535.578143005926, 64.4294023177829, 0.45)
    pt3dadd(-65.7983979146261, 536.556377434466, 64.5861648538359, 0.45)
    pt3dadd(-65.9343497815094, 537.534611863006, 64.7429273898889, 0.45)
    pt3dadd(-66.0703016483927, 538.512846291547, 64.8996899259419, 0.45)
    pt3dadd(-66.206253515276, 539.491080720087, 65.0564524619949, 0.45)
    pt3dadd(-66.3422053821593, 540.469315148627, 65.2132149980479, 0.45)
    pt3dadd(-66.4781572490426, 541.447549577167, 65.3699775341009, 0.45)
    pt3dadd(-66.6141091159259, 542.425784005707, 65.5267400701539, 0.45)
    pt3dadd(-66.7500609828092, 543.404018434247, 65.6835026062069, 0.45)
    pt3dadd(-66.8860128496926, 544.382252862787, 65.8402651422599, 0.45)
    pt3dadd(-67.0219647165759, 545.360487291327, 65.9970276783129, 0.45)
    pt3dadd(-67.1579165834592, 546.338721719867, 66.1537902143659, 0.45)
    pt3dadd(-67.2938684503425, 547.316956148407, 66.3105527504189, 0.45)
    pt3dadd(-67.4298203172258, 548.295190576948, 66.4673152864719, 0.45)
    pt3dadd(-67.5657721841091, 549.273425005488, 66.6240778225249, 0.45)
    pt3dadd(-67.7017240509924, 550.251659434028, 66.7808403585779, 0.45)
    pt3dadd(-67.8376759178757, 551.229893862568, 66.9376028946309, 0.45)
    pt3dadd(-67.9736277847591, 552.208128291108, 67.0943654306839, 0.45)
    pt3dadd(-68.1095796516424, 553.186362719648, 67.2511279667369, 0.45)
    pt3dadd(-68.2455315185257, 554.164597148188, 67.4078905027899, 0.45)
    pt3dadd(-68.381483385409, 555.142831576728, 67.5646530388429, 0.45)
    pt3dadd(-68.5174352522923, 556.121066005268, 67.7214155748959, 0.45)
    pt3dadd(-68.6533871191756, 557.099300433808, 67.8781781109489, 0.45)
    pt3dadd(-68.7893389860589, 558.077534862349, 68.0349406470019, 0.45)
    pt3dadd(-68.9252908529423, 559.055769290889, 68.1917031830549, 0.45)
    pt3dadd(-69.0612427198256, 560.034003719429, 68.3484657191079, 0.45)
    pt3dadd(-69.1971945867089, 561.012238147969, 68.5052282551609, 0.45)
    pt3dadd(-69.3331464535922, 561.990472576509, 68.6619907912139, 0.45)
    pt3dadd(-69.4690983204755, 562.968707005049, 68.8187533272669, 0.45)
    pt3dadd(-69.6050501873588, 563.946941433589, 68.9755158633199, 0.45)
    pt3dadd(-69.7410020542421, 564.925175862129, 69.1322783993729, 0.45)
    pt3dadd(-69.8769539211254, 565.903410290669, 69.2890409354259, 0.45)
    pt3dadd(-70.0129057880088, 566.881644719209, 69.4458034714789, 0.45)
    pt3dadd(-70.1488576548921, 567.85987914775, 69.6025660075319, 0.45)
    pt3dadd(-70.2848095217754, 568.83811357629, 69.7593285435849, 0.45)
    pt3dadd(-70.4207613886587, 569.81634800483, 69.9160910796379, 0.45)
    pt3dadd(-70.556713255542, 570.79458243337, 70.0728536156909, 0.45)
    pt3dadd(-70.6926651224253, 571.77281686191, 70.2296161517439, 0.45)
    pt3dadd(-70.8286169893086, 572.75105129045, 70.3863786877969, 0.45)
    pt3dadd(-70.964568856192, 573.72928571899, 70.5431412238499, 0.45)
    pt3dadd(-71.1005207230753, 574.70752014753, 70.6999037599029, 0.45)
    pt3dadd(-71.2364725899586, 575.68575457607, 70.8566662959559, 0.45)
    pt3dadd(-71.3724244568419, 576.66398900461, 71.0134288320089, 0.45)
    pt3dadd(-71.5083763237252, 577.64222343315, 71.1701913680619, 0.45)
    pt3dadd(-71.6443281906085, 578.620457861691, 71.3269539041149, 0.45)
    pt3dadd(-71.7802800574918, 579.598692290231, 71.4837164401679, 0.45)
    pt3dadd(-71.9162319243751, 580.576926718771, 71.6404789762209, 0.45)
    pt3dadd(-72.0521837912585, 581.555161147311, 71.7972415122739, 0.45)
    pt3dadd(-72.1881356581418, 582.533395575851, 71.9540040483269, 0.45)
    pt3dadd(-72.3240875250251, 583.511630004391, 72.1107665843799, 0.45)
    pt3dadd(-72.4600393919084, 584.489864432931, 72.2675291204329, 0.45)
    pt3dadd(-72.5959912587917, 585.468098861471, 72.4242916564859, 0.45)
    pt3dadd(-72.731943125675, 586.446333290011, 72.5810541925389, 0.45)
    pt3dadd(-72.8678949925583, 587.424567718551, 72.7378167285919, 0.45)
    pt3dadd(-73.0038468594416, 588.402802147092, 72.8945792646449, 0.45)
    pt3dadd(-73.139798726325, 589.381036575632, 73.0513418006979, 0.45)
    pt3dadd(-73.2757505932083, 590.359271004172, 73.2081043367509, 0.45)
    pt3dadd(-73.4117024600916, 591.337505432712, 73.3648668728039, 0.45)
    pt3dadd(-73.5476543269749, 592.315739861252, 73.5216294088569, 0.45)
    pt3dadd(-73.6836061938582, 593.293974289792, 73.6783919449099, 0.45)
    pt3dadd(-73.8195580607415, 594.272208718332, 73.8351544809629, 0.45)
    pt3dadd(-73.9555099276248, 595.250443146872, 73.9919170170159, 0.45)
    pt3dadd(-74.0914617945081, 596.228677575412, 74.1486795530689, 0.45)
    pt3dadd(-74.2274136613915, 597.206912003952, 74.3054420891219, 0.45)
    pt3dadd(-74.3633655282748, 598.185146432493, 74.4622046251749, 0.45)
    pt3dadd(-74.4993173951581, 599.163380861033, 74.6189671612279, 0.45)
    pt3dadd(-74.6352692620414, 600.141615289573, 74.7757296972809, 0.45)
    pt3dadd(-74.7712211289247, 601.119849718113, 74.9324922333339, 0.45)
    pt3dadd(-74.907172995808, 602.098084146653, 75.0892547693869, 0.45)
    pt3dadd(-75.0431248626913, 603.076318575193, 75.2460173054399, 0.45)
    pt3dadd(-75.1790767295747, 604.054553003733, 75.4027798414929, 0.45)
    pt3dadd(-75.315028596458, 605.032787432273, 75.5595423775459, 0.45)
    pt3dadd(-75.4509804633413, 606.011021860813, 75.7163049135989, 0.45)
    pt3dadd(-75.5869323302246, 606.989256289353, 75.8730674496519, 0.45)
    pt3dadd(-75.7228841971079, 607.967490717894, 76.0298299857049, 0.45)
    pt3dadd(-75.8588360639912, 608.945725146434, 76.1865925217579, 0.45)
    pt3dadd(-75.9947879308745, 609.923959574974, 76.3433550578109, 0.45)
    pt3dadd(-76.1307397977579, 610.902194003514, 76.5001175938639, 0.45)
    pt3dadd(-76.2666916646412, 611.880428432054, 76.6568801299169, 0.45)
    pt3dadd(-76.4026435315245, 612.858662860594, 76.8136426659699, 0.45)
    pt3dadd(-76.5385953984078, 613.836897289134, 76.9704052020229, 0.45)
    pt3dadd(-76.6745472652911, 614.815131717674, 77.1271677380759, 0.45)
    pt3dadd(-76.8104991321744, 615.793366146214, 77.2839302741289, 0.45)
    pt3dadd(-76.9464509990577, 616.771600574754, 77.4406928101819, 0.45)
    pt3dadd(-77.082402865941, 617.749835003294, 77.5974553462349, 0.45)
    pt3dadd(-77.2183547328244, 618.728069431835, 77.7542178822879, 0.45)
    pt3dadd(-77.3543065997077, 619.706303860375, 77.9109804183409, 0.45)
    pt3dadd(-77.490258466591, 620.684538288915, 78.0677429543939, 0.45)
    pt3dadd(-77.6262103334743, 621.662772717455, 78.2245054904469, 0.45)
    pt3dadd(-77.7621622003576, 622.641007145995, 78.3812680264999, 0.45)
    pt3dadd(-77.8981140672409, 623.619241574535, 78.5380305625529, 0.45)
    pt3dadd(-78.0340659341242, 624.597476003075, 78.6947930986059, 0.45)
    pt3dadd(-78.1700178010075, 625.575710431615, 78.8515556346589, 0.45)
    pt3dadd(-78.3059696678908, 626.553944860155, 79.0083181707119, 0.45)
    pt3dadd(-78.4419215347742, 627.532179288695, 79.1650807067649, 0.45)
    pt3dadd(-78.5778734016575, 628.510413717236, 79.3218432428179, 0.45)
    pt3dadd(-78.7138252685408, 629.488648145776, 79.4786057788709, 0.45)
    pt3dadd(-78.8497771354241, 630.466882574316, 79.6353683149239, 0.45)
    pt3dadd(-78.9857290023074, 631.445117002856, 79.7921308509769, 0.45)
    pt3dadd(-79.1216808691907, 632.423351431396, 79.9488933870299, 0.45)
    pt3dadd(-79.257632736074, 633.401585859936, 80.1056559230829, 0.45)
    pt3dadd(-79.3935846029574, 634.379820288476, 80.2624184591359, 0.45)
    pt3dadd(-79.5295364698407, 635.358054717016, 80.4191809951889, 0.45)
    pt3dadd(-79.665488336724, 636.336289145556, 80.5759435312419, 0.45)
    pt3dadd(-79.8014402036073, 637.314523574096, 80.7327060672949, 0.45)
    pt3dadd(-79.9373920704906, 638.292758002637, 80.8894686033479, 0.45)
    pt3dadd(-80.0733439373739, 639.270992431177, 81.0462311394009, 0.45)
    pt3dadd(-80.2092958042572, 640.249226859717, 81.2029936754539, 0.45)
    pt3dadd(-80.3452476711406, 641.227461288257, 81.3597562115069, 0.45)
    pt3dadd(-80.4811995380239, 642.205695716797, 81.5165187475599, 0.45)
    pt3dadd(-80.6171514049072, 643.183930145337, 81.6732812836129, 0.45)
    pt3dadd(-80.7531032717905, 644.162164573877, 81.8300438196659, 0.45)
    pt3dadd(-80.8890551386738, 645.140399002417, 81.9868063557189, 0.45)
    pt3dadd(-81.0250070055571, 646.118633430957, 82.1435688917719, 0.45)
    pt3dadd(-81.1609588724404, 647.096867859497, 82.3003314278249, 0.45)
    pt3dadd(-81.2969107393237, 648.075102288038, 82.4570939638779, 0.45)
    pt3dadd(-81.4328626062071, 649.053336716578, 82.6138564999309, 0.45)
    pt3dadd(-81.5688144730904, 650.031571145118, 82.7706190359839, 0.45)
    pt3dadd(-81.7047663399737, 651.009805573658, 82.9273815720369, 0.45)
    pt3dadd(-81.840718206857, 651.988040002198, 83.0841441080899, 0.45)
    pt3dadd(-81.9766700737403, 652.966274430738, 83.2409066441429, 0.45)
    pt3dadd(-82.1126219406236, 653.944508859278, 83.3976691801959, 0.45)
    pt3dadd(-82.2485738075069, 654.922743287818, 83.5544317162489, 0.45)
    pt3dadd(-82.3845256743902, 655.900977716358, 83.7111942523019, 0.45)
    pt3dadd(-82.5204775412736, 656.879212144898, 83.8679567883549, 0.45)
    pt3dadd(-82.6564294081569, 657.857446573439, 84.0247193244079, 0.45)
    pt3dadd(-82.7923812750402, 658.835681001979, 84.1814818604609, 0.45)
    pt3dadd(-82.9283331419235, 659.813915430519, 84.3382443965139, 0.45)
    pt3dadd(-83.0642850088068, 660.792149859059, 84.4950069325669, 0.45)
    pt3dadd(-83.2002368756901, 661.770384287599, 84.6517694686199, 0.45)
    pt3dadd(-83.3361887425734, 662.748618716139, 84.8085320046729, 0.45)
    pt3dadd(-83.4721406094568, 663.726853144679, 84.9652945407259, 0.45)
    pt3dadd(-83.6080924763401, 664.705087573219, 85.1220570767789, 0.45)
    pt3dadd(-83.7440443432234, 665.683322001759, 85.2788196128319, 0.45)
    pt3dadd(-83.8799962101067, 666.661556430299, 85.4355821488849, 0.45)
    pt3dadd(-84.01594807699, 667.63979085884, 85.5923446849379, 0.45)
    pt3dadd(-84.1518999438733, 668.61802528738, 85.7491072209909, 0.45)
    pt3dadd(-84.2878518107566, 669.59625971592, 85.9058697570439, 0.45)
    pt3dadd(-84.4238036776399, 670.57449414446, 86.0626322930969, 0.45)
    pt3dadd(-84.5597555445233, 671.552728573, 86.2193948291499, 0.45)
    pt3dadd(-84.6957074114066, 672.53096300154, 86.3761573652029, 0.45)
    pt3dadd(-84.8316592782899, 673.50919743008, 86.5329199012559, 0.45)
    pt3dadd(-84.9676111451732, 674.48743185862, 86.6896824373089, 0.45)
    pt3dadd(-85.1035630120565, 675.46566628716, 86.8464449733619, 0.45)
    pt3dadd(-85.2395148789398, 676.4439007157, 87.0032075094149, 0.45)
    pt3dadd(-85.3754667458231, 677.422135144241, 87.1599700454679, 0.45)
    pt3dadd(-85.5114186127065, 678.400369572781, 87.3167325815209, 0.45)
    pt3dadd(-85.6473704795898, 679.378604001321, 87.4734951175739, 0.45)
    pt3dadd(-85.7833223464731, 680.356838429861, 87.6302576536269, 0.45)
    pt3dadd(-85.9192742133564, 681.335072858401, 87.7870201896799, 0.45)
    pt3dadd(-86.0552260802397, 682.313307286941, 87.9437827257329, 0.45)
    pt3dadd(-86.191177947123, 683.291541715481, 88.1005452617859, 0.45)
    pt3dadd(-86.3271298140063, 684.269776144021, 88.2573077978389, 0.45)
    pt3dadd(-86.4630816808896, 685.248010572561, 88.4140703338919, 0.45)
    pt3dadd(-86.5990335477729, 686.226245001101, 88.5708328699449, 0.45)
    pt3dadd(-86.7349854146563, 687.204479429642, 88.7275954059979, 0.45)
    pt3dadd(-86.8709372815396, 688.182713858182, 88.8843579420509, 0.45)
    pt3dadd(-87.0068891484229, 689.160948286722, 89.0411204781039, 0.45)
    pt3dadd(-87.1428410153062, 690.139182715262, 89.1978830141569, 0.45)
    pt3dadd(-87.2787928821895, 691.117417143802, 89.3546455502099, 0.45)
    pt3dadd(-87.4147447490728, 692.095651572342, 89.5114080862629, 0.45)
    pt3dadd(-87.5506966159561, 693.073886000882, 89.6681706223159, 0.45)
    pt3dadd(-87.6866484828395, 694.052120429422, 89.8249331583689, 0.45)
    pt3dadd(-87.8226003497228, 695.030354857962, 89.9816956944219, 0.45)
    pt3dadd(-87.9585522166061, 696.008589286502, 90.1384582304749, 0.45)
    pt3dadd(-88.0945040834894, 696.986823715043, 90.2952207665279, 0.45)
    pt3dadd(-88.2304559503727, 697.965058143583, 90.4519833025809, 0.45)
    pt3dadd(-88.366407817256, 698.943292572123, 90.6087458386339, 0.45)
    pt3dadd(-88.5023596841393, 699.921527000663, 90.7655083746869, 0.45)
    pt3dadd(-88.6383115510227, 700.899761429203, 90.9222709107399, 0.45)
    pt3dadd(-88.774263417906, 701.877995857743, 91.0790334467929, 0.45)
    pt3dadd(-88.9102152847893, 702.856230286283, 91.2357959828459, 0.45)
    pt3dadd(-89.0461671516726, 703.834464714823, 91.3925585188989, 0.45)
    pt3dadd(-89.1821190185559, 704.812699143363, 91.5493210549519, 0.45)
    pt3dadd(-89.3180708854392, 705.790933571903, 91.7060835910049, 0.45)
    pt3dadd(-89.4540227523225, 706.769168000444, 91.8628461270579, 0.45)
    pt3dadd(-89.5899746192058, 707.747402428984, 92.0196086631109, 0.45)
    pt3dadd(-89.7259264860892, 708.725636857524, 92.1763711991639, 0.45)
    pt3dadd(-89.8618783529725, 709.703871286064, 92.3331337352169, 0.45)
    pt3dadd(-89.9978302198558, 710.682105714604, 92.4898962712699, 0.45)
    pt3dadd(-90.1337820867391, 711.660340143144, 92.6466588073229, 0.45)
    pt3dadd(-90.2697339536224, 712.638574571684, 92.8034213433759, 0.45)
    pt3dadd(-90.4056858205057, 713.616809000224, 92.9601838794289, 0.45)
    pt3dadd(-90.541637687389, 714.595043428764, 93.1169464154819, 0.45)
    pt3dadd(-90.6775895542723, 715.573277857304, 93.2737089515349, 0.45)
    pt3dadd(-90.8135414211557, 716.551512285845, 93.4304714875879, 0.45)
    pt3dadd(-90.949493288039, 717.529746714385, 93.5872340236409, 0.45)
    pt3dadd(-91.0854451549223, 718.507981142925, 93.7439965596939, 0.45)
    pt3dadd(-91.2213970218056, 719.486215571465, 93.9007590957469, 0.45)
    pt3dadd(-91.3573488886889, 720.464450000005, 94.0575216317999, 0.45)
    pt3dadd(-91.4933007555722, 721.442684428545, 94.2142841678529, 0.45)
    pt3dadd(-91.6292526224555, 722.420918857085, 94.3710467039059, 0.45)
    pt3dadd(-91.7652044893389, 723.399153285625, 94.5278092399589, 0.45)
    pt3dadd(-91.9011563562222, 724.377387714165, 94.6845717760119, 0.45)
    pt3dadd(-92.0371082231055, 725.355622142705, 94.8413343120649, 0.45)
    pt3dadd(-92.1730600899888, 726.333856571246, 94.9980968481179, 0.45)
    pt3dadd(-92.3090119568721, 727.312090999786, 95.1548593841709, 0.45)
    pt3dadd(-92.4449638237554, 728.290325428326, 95.3116219202239, 0.45)
    pt3dadd(-92.5809156906387, 729.268559856866, 95.4683844562769, 0.45)
    pt3dadd(-92.716867557522, 730.246794285406, 95.6251469923299, 0.45)
    pt3dadd(-92.8528194244054, 731.225028713946, 95.7819095283829, 0.45)
    pt3dadd(-92.9887712912887, 732.203263142486, 95.9386720644359, 0.45)
    pt3dadd(-93.124723158172, 733.181497571026, 96.0954346004889, 0.45)
    pt3dadd(-93.2606750250553, 734.159731999566, 96.2521971365419, 0.45)
    pt3dadd(-93.3966268919386, 735.137966428106, 96.4089596725949, 0.45)
    pt3dadd(-93.5325787588219, 736.116200856647, 96.5657222086479, 0.45)
    pt3dadd(-93.6685306257052, 737.094435285187, 96.7224847447009, 0.45)
    pt3dadd(-93.8044824925885, 738.072669713727, 96.8792472807539, 0.45)
    pt3dadd(-93.9404343594719, 739.050904142267, 97.0360098168069, 0.45)
    pt3dadd(-94.0763862263552, 740.029138570807, 97.1927723528599, 0.45)
    pt3dadd(-94.2123380932385, 741.007372999347, 97.3495348889129, 0.45)
    pt3dadd(-94.3482899601218, 741.985607427887, 97.5062974249659, 0.45)
    pt3dadd(-94.4842418270051, 742.963841856427, 97.6630599610189, 0.45)
    pt3dadd(-94.6201936938884, 743.942076284967, 97.8198224970719, 0.45)
    pt3dadd(-94.7561455607717, 744.920310713507, 97.9765850331249, 0.45)
    pt3dadd(-94.892097427655, 745.898545142048, 98.1333475691779, 0.45)
    pt3dadd(-95.0280492945384, 746.876779570588, 98.2901101052309, 0.45)
    pt3dadd(-95.1640011614217, 747.855013999128, 98.4468726412839, 0.45)
    pt3dadd(-95.299953028305, 748.833248427668, 98.6036351773369, 0.45)
    pt3dadd(-95.4359048951883, 749.811482856208, 98.7603977133899, 0.45)
    pt3dadd(-95.5718567620716, 750.789717284748, 98.9171602494429, 0.45)
    pt3dadd(-95.7078086289549, 751.767951713288, 99.0739227854959, 0.45)
    pt3dadd(-95.8437604958382, 752.746186141828, 99.2306853215489, 0.45)
    pt3dadd(-95.9797123627216, 753.724420570368, 99.3874478576019, 0.45)
    pt3dadd(-96.1156642296049, 754.702654998908, 99.5442103936549, 0.45)
    pt3dadd(-96.2516160964882, 755.680889427449, 99.7009729297079, 0.45)
    pt3dadd(-96.3875679633715, 756.659123855989, 99.8577354657609, 0.45)
    pt3dadd(-96.5235198302548, 757.637358284529, 100.014498001814, 0.45)
    pt3dadd(-96.6594716971381, 758.615592713069, 100.171260537867, 0.45)
    pt3dadd(-96.7954235640214, 759.593827141609, 100.32802307392, 0.45)
    pt3dadd(-96.9313754309048, 760.572061570149, 100.484785609973, 0.45)
  }
}
proc shape3d_24() {
  axon[0] {
    pt3dadd(-97.0673272977881, 761.550295998689, 100.641548146026, 0.45)
    pt3dadd(-97.2032791646714, 762.528530427229, 100.798310682079, 0.45)
    pt3dadd(-97.3392310315547, 763.506764855769, 100.955073218132, 0.45)
    pt3dadd(-97.475182898438, 764.484999284309, 101.111835754185, 0.45)
    pt3dadd(-97.6111347653213, 765.46323371285, 101.268598290238, 0.45)
    pt3dadd(-97.7470866322046, 766.44146814139, 101.425360826291, 0.45)
    pt3dadd(-97.8830384990879, 767.41970256993, 101.582123362344, 0.45)
    pt3dadd(-98.0189903659712, 768.39793699847, 101.738885898397, 0.45)
    pt3dadd(-98.1549422328546, 769.37617142701, 101.89564843445, 0.45)
    pt3dadd(-98.2908940997379, 770.35440585555, 102.052410970503, 0.45)
    pt3dadd(-98.4268459666212, 771.33264028409, 102.209173506556, 0.45)
    pt3dadd(-98.5627978335045, 772.31087471263, 102.365936042609, 0.45)
    pt3dadd(-98.6987497003878, 773.28910914117, 102.522698578662, 0.45)
    pt3dadd(-98.8347015672711, 774.26734356971, 102.679461114715, 0.45)
    pt3dadd(-98.9706534341544, 775.24557799825, 102.836223650768, 0.45)
    pt3dadd(-99.1066053010378, 776.223812426791, 102.992986186821, 0.45)
    pt3dadd(-99.2425571679211, 777.202046855331, 103.149748722874, 0.45)
    pt3dadd(-99.3785090348044, 778.180281283871, 103.306511258927, 0.45)
    pt3dadd(-99.5144609016877, 779.158515712411, 103.46327379498, 0.45)
    pt3dadd(-99.650412768571, 780.136750140951, 103.620036331033, 0.45)
    pt3dadd(-99.7863646354543, 781.114984569491, 103.776798867086, 0.45)
    pt3dadd(-99.9223165023376, 782.093218998031, 103.933561403139, 0.45)
    pt3dadd(-100.058268369221, 783.071453426571, 104.090323939192, 0.45)
    pt3dadd(-100.194220236104, 784.049687855111, 104.247086475245, 0.45)
    pt3dadd(-100.330172102988, 785.027922283651, 104.403849011298, 0.45)
    pt3dadd(-100.466123969871, 786.006156712192, 104.560611547351, 0.45)
    pt3dadd(-100.602075836754, 786.984391140732, 104.717374083404, 0.45)
    pt3dadd(-100.738027703638, 787.962625569272, 104.874136619457, 0.45)
    pt3dadd(-100.873979570521, 788.940859997812, 105.03089915551, 0.45)
    pt3dadd(-101.009931437404, 789.919094426352, 105.187661691563, 0.45)
    pt3dadd(-101.145883304287, 790.897328854892, 105.344424227616, 0.45)
    pt3dadd(-101.281835171171, 791.875563283432, 105.501186763669, 0.45)
    pt3dadd(-101.417787038054, 792.853797711972, 105.657949299722, 0.45)
    pt3dadd(-101.553738904937, 793.832032140512, 105.814711835775, 0.45)
    pt3dadd(-101.689690771821, 794.810266569052, 105.971474371828, 0.45)
    pt3dadd(-101.825642638704, 795.788500997593, 106.128236907881, 0.45)
    pt3dadd(-101.961594505587, 796.766735426133, 106.284999443934, 0.45)
    pt3dadd(-102.097546372471, 797.744969854673, 106.441761979987, 0.45)
    pt3dadd(-102.233498239354, 798.723204283213, 106.59852451604, 0.45)
    pt3dadd(-102.369450106237, 799.701438711753, 106.755287052093, 0.45)
    pt3dadd(-102.505401973121, 800.679673140293, 106.912049588146, 0.45)
    pt3dadd(-102.641353840004, 801.657907568833, 107.068812124199, 0.45)
    pt3dadd(-102.777305706887, 802.636141997373, 107.225574660252, 0.45)
    pt3dadd(-102.913257573771, 803.614376425913, 107.382337196305, 0.45)
    pt3dadd(-103.049209440654, 804.592610854453, 107.539099732358, 0.45)
    pt3dadd(-103.185161307537, 805.570845282994, 107.695862268411, 0.45)
    pt3dadd(-103.32111317442, 806.549079711534, 107.852624804464, 0.45)
    pt3dadd(-103.457065041304, 807.527314140074, 108.009387340517, 0.45)
    pt3dadd(-103.593016908187, 808.505548568614, 108.16614987657, 0.45)
    pt3dadd(-103.72896877507, 809.483782997154, 108.322912412623, 0.45)
    pt3dadd(-103.864920641954, 810.462017425694, 108.479674948676, 0.45)
    pt3dadd(-104.000872508837, 811.440251854234, 108.636437484729, 0.45)
    pt3dadd(-104.13682437572, 812.418486282774, 108.793200020782, 0.45)
    pt3dadd(-104.272776242604, 813.396720711314, 108.949962556835, 0.45)
    pt3dadd(-104.408728109487, 814.374955139854, 109.106725092888, 0.45)
    pt3dadd(-104.54467997637, 815.353189568394, 109.263487628941, 0.45)
    pt3dadd(-104.680631843254, 816.331423996935, 109.420250164994, 0.45)
    pt3dadd(-104.816583710137, 817.309658425475, 109.577012701047, 0.45)
    pt3dadd(-104.95253557702, 818.287892854015, 109.7337752371, 0.45)
    pt3dadd(-105.088487443904, 819.266127282555, 109.890537773153, 0.45)
    pt3dadd(-105.224439310787, 820.244361711095, 110.047300309206, 0.45)
    pt3dadd(-105.36039117767, 821.222596139635, 110.204062845259, 0.45)
    pt3dadd(-105.496343044553, 822.200830568175, 110.360825381312, 0.45)
    pt3dadd(-105.632294911437, 823.179064996715, 110.517587917365, 0.45)
    pt3dadd(-105.76824677832, 824.157299425255, 110.674350453418, 0.45)
    pt3dadd(-105.904198645203, 825.135533853795, 110.831112989471, 0.45)
    pt3dadd(-106.040150512087, 826.113768282336, 110.987875525524, 0.45)
    pt3dadd(-106.17610237897, 827.092002710876, 111.144638061577, 0.45)
    pt3dadd(-106.312054245853, 828.070237139416, 111.30140059763, 0.45)
    pt3dadd(-106.448006112737, 829.048471567956, 111.458163133683, 0.45)
    pt3dadd(-106.58395797962, 830.026705996496, 111.614925669736, 0.45)
    pt3dadd(-106.719909846503, 831.004940425036, 111.771688205789, 0.45)
    pt3dadd(-106.855861713387, 831.983174853576, 111.928450741842, 0.45)
    pt3dadd(-106.99181358027, 832.961409282116, 112.085213277895, 0.45)
    pt3dadd(-107.127765447153, 833.939643710656, 112.241975813948, 0.45)
    pt3dadd(-107.263717314037, 834.917878139196, 112.398738350001, 0.45)
    pt3dadd(-107.39966918092, 835.896112567737, 112.555500886054, 0.45)
    pt3dadd(-107.535621047803, 836.874346996277, 112.712263422107, 0.45)
    pt3dadd(-107.671572914686, 837.852581424817, 112.86902595816, 0.45)
    pt3dadd(-107.80752478157, 838.830815853357, 113.025788494213, 0.45)
    pt3dadd(-107.943476648453, 839.809050281897, 113.182551030266, 0.45)
    pt3dadd(-108.079428515336, 840.787284710437, 113.339313566319, 0.45)
    pt3dadd(-108.21538038222, 841.765519138977, 113.496076102372, 0.45)
    pt3dadd(-108.351332249103, 842.743753567517, 113.652838638425, 0.45)
    pt3dadd(-108.487284115986, 843.721987996057, 113.809601174478, 0.45)
    pt3dadd(-108.62323598287, 844.700222424597, 113.966363710531, 0.45)
    pt3dadd(-108.759187849753, 845.678456853138, 114.123126246584, 0.45)
    pt3dadd(-108.895139716636, 846.656691281678, 114.279888782637, 0.45)
    pt3dadd(-109.03109158352, 847.634925710218, 114.43665131869, 0.45)
    pt3dadd(-109.167043450403, 848.613160138758, 114.593413854743, 0.45)
    pt3dadd(-109.302995317286, 849.591394567298, 114.750176390796, 0.45)
    pt3dadd(-109.43894718417, 850.569628995838, 114.906938926849, 0.45)
    pt3dadd(-109.574899051053, 851.547863424378, 115.063701462902, 0.45)
    pt3dadd(-109.710850917936, 852.526097852918, 115.220463998955, 0.45)
    pt3dadd(-109.846802784819, 853.504332281458, 115.377226535008, 0.45)
    pt3dadd(-109.982754651703, 854.482566709998, 115.533989071061, 0.45)
    pt3dadd(-110.118706518586, 855.460801138539, 115.690751607114, 0.45)
    pt3dadd(-110.254658385469, 856.439035567079, 115.847514143167, 0.45)
    pt3dadd(-110.390610252353, 857.417269995619, 116.00427667922, 0.45)
    pt3dadd(-110.526562119236, 858.395504424159, 116.161039215273, 0.45)
    pt3dadd(-110.662513986119, 859.373738852699, 116.317801751326, 0.45)
    pt3dadd(-110.798465853003, 860.351973281239, 116.474564287379, 0.45)
    pt3dadd(-110.934417719886, 861.330207709779, 116.631326823432, 0.45)
    pt3dadd(-111.070369586769, 862.308442138319, 116.788089359485, 0.45)
    pt3dadd(-111.206321453653, 863.286676566859, 116.944851895538, 0.45)
    pt3dadd(-111.342273320536, 864.264910995399, 117.101614431591, 0.45)
    pt3dadd(-111.478225187419, 865.24314542394, 117.258376967644, 0.45)
    pt3dadd(-111.614177054303, 866.22137985248, 117.415139503697, 0.45)
    pt3dadd(-111.750128921186, 867.19961428102, 117.57190203975, 0.45)
    pt3dadd(-111.886080788069, 868.17784870956, 117.728664575803, 0.45)
    pt3dadd(-112.022032654953, 869.1560831381, 117.885427111856, 0.45)
    pt3dadd(-112.157984521836, 870.13431756664, 118.042189647909, 0.45)
    pt3dadd(-112.293936388719, 871.11255199518, 118.198952183962, 0.45)
    pt3dadd(-112.429888255602, 872.09078642372, 118.355714720015, 0.45)
    pt3dadd(-112.565840122486, 873.06902085226, 118.512477256068, 0.45)
    pt3dadd(-112.701791989369, 874.0472552808, 118.669239792121, 0.45)
    pt3dadd(-112.837743856252, 875.02548970934, 118.826002328174, 0.45)
    pt3dadd(-112.973695723136, 876.003724137881, 118.982764864227, 0.45)
    pt3dadd(-113.109647590019, 876.981958566421, 119.13952740028, 0.45)
    pt3dadd(-113.245599456902, 877.960192994961, 119.296289936333, 0.45)
    pt3dadd(-113.381551323786, 878.938427423501, 119.453052472386, 0.45)
    pt3dadd(-113.517503190669, 879.916661852041, 119.609815008439, 0.45)
    pt3dadd(-113.653455057552, 880.894896280581, 119.766577544492, 0.45)
    pt3dadd(-113.789406924436, 881.873130709121, 119.923340080545, 0.45)
    pt3dadd(-113.925358791319, 882.851365137661, 120.080102616598, 0.45)
    pt3dadd(-114.061310658202, 883.829599566201, 120.236865152651, 0.45)
    pt3dadd(-114.197262525086, 884.807833994741, 120.393627688704, 0.45)
    pt3dadd(-114.333214391969, 885.786068423282, 120.550390224757, 0.45)
    pt3dadd(-114.469166258852, 886.764302851822, 120.70715276081, 0.45)
    pt3dadd(-114.605118125735, 887.742537280362, 120.863915296863, 0.45)
    pt3dadd(-114.741069992619, 888.720771708902, 121.020677832916, 0.45)
    pt3dadd(-114.877021859502, 889.699006137442, 121.177440368969, 0.45)
    pt3dadd(-115.012973726385, 890.677240565982, 121.334202905022, 0.45)
    pt3dadd(-115.148925593269, 891.655474994522, 121.490965441075, 0.45)
    pt3dadd(-115.284877460152, 892.633709423062, 121.647727977128, 0.45)
    pt3dadd(-115.420829327035, 893.611943851602, 121.804490513181, 0.45)
    pt3dadd(-115.556781193919, 894.590178280142, 121.961253049234, 0.45)
    pt3dadd(-115.692733060802, 895.568412708683, 122.118015585287, 0.45)
    pt3dadd(-115.828684927685, 896.546647137223, 122.27477812134, 0.45)
    pt3dadd(-115.964636794569, 897.524881565763, 122.431540657393, 0.45)
    pt3dadd(-116.100588661452, 898.503115994303, 122.588303193446, 0.45)
    pt3dadd(-116.236540528335, 899.481350422843, 122.745065729499, 0.45)
    pt3dadd(-116.372492395219, 900.459584851383, 122.901828265552, 0.45)
    pt3dadd(-116.508444262102, 901.437819279923, 123.058590801605, 0.45)
    pt3dadd(-116.644396128985, 902.416053708463, 123.215353337658, 0.45)
    pt3dadd(-116.780347995868, 903.394288137003, 123.372115873711, 0.45)
    pt3dadd(-116.916299862752, 904.372522565543, 123.528878409764, 0.45)
    pt3dadd(-117.052251729635, 905.350756994084, 123.685640945817, 0.45)
    pt3dadd(-117.188203596518, 906.328991422624, 123.84240348187, 0.45)
    pt3dadd(-117.324155463402, 907.307225851164, 123.999166017923, 0.45)
    pt3dadd(-117.460107330285, 908.285460279704, 124.155928553976, 0.45)
    pt3dadd(-117.596059197168, 909.263694708244, 124.312691090029, 0.45)
    pt3dadd(-117.732011064052, 910.241929136784, 124.469453626082, 0.45)
    pt3dadd(-117.867962930935, 911.220163565324, 124.626216162135, 0.45)
    pt3dadd(-118.003914797818, 912.198397993864, 124.782978698188, 0.45)
    pt3dadd(-118.139866664702, 913.176632422404, 124.939741234241, 0.45)
    pt3dadd(-118.275818531585, 914.154866850944, 125.096503770294, 0.45)
    pt3dadd(-118.411770398468, 915.133101279485, 125.253266306347, 0.45)
    pt3dadd(-118.547722265352, 916.111335708025, 125.4100288424, 0.45)
    pt3dadd(-118.683674132235, 917.089570136565, 125.566791378453, 0.45)
    pt3dadd(-118.819625999118, 918.067804565105, 125.723553914506, 0.45)
    pt3dadd(-118.955577866001, 919.046038993645, 125.880316450559, 0.45)
    pt3dadd(-119.091529732885, 920.024273422185, 126.037078986612, 0.45)
    pt3dadd(-119.227481599768, 921.002507850725, 126.193841522665, 0.45)
    pt3dadd(-119.363433466651, 921.980742279265, 126.350604058718, 0.45)
    pt3dadd(-119.499385333535, 922.958976707805, 126.507366594771, 0.45)
    pt3dadd(-119.635337200418, 923.937211136345, 126.664129130824, 0.45)
    pt3dadd(-119.771289067301, 924.915445564886, 126.820891666877, 0.45)
    pt3dadd(-119.907240934185, 925.893679993426, 126.97765420293, 0.45)
    pt3dadd(-120.043192801068, 926.871914421966, 127.134416738983, 0.45)
    pt3dadd(-120.179144667951, 927.850148850506, 127.291179275036, 0.45)
    pt3dadd(-120.315096534835, 928.828383279046, 127.447941811089, 0.45)
    pt3dadd(-120.451048401718, 929.806617707586, 127.604704347142, 0.45)
    pt3dadd(-120.587000268601, 930.784852136126, 127.761466883195, 0.45)
    pt3dadd(-120.722952135485, 931.763086564666, 127.918229419248, 0.45)
    pt3dadd(-120.858904002368, 932.741320993206, 128.074991955301, 0.45)
    pt3dadd(-120.994855869251, 933.719555421746, 128.231754491354, 0.45)
    pt3dadd(-121.130807736134, 934.697789850287, 128.388517027407, 0.45)
    pt3dadd(-121.266759603018, 935.676024278827, 128.54527956346, 0.45)
    pt3dadd(-121.402711469901, 936.654258707367, 128.702042099513, 0.45)
    pt3dadd(-121.538663336784, 937.632493135907, 128.858804635566, 0.45)
    pt3dadd(-121.674615203668, 938.610727564447, 129.015567171619, 0.45)
    pt3dadd(-121.810567070551, 939.588961992987, 129.172329707672, 0.45)
    pt3dadd(-121.946518937434, 940.567196421527, 129.329092243725, 0.45)
    pt3dadd(-122.082470804318, 941.545430850067, 129.485854779778, 0.45)
    pt3dadd(-122.218422671201, 942.523665278607, 129.642617315831, 0.45)
    pt3dadd(-122.354374538084, 943.501899707147, 129.799379851884, 0.45)
    pt3dadd(-122.490326404968, 944.480134135688, 129.956142387937, 0.45)
    pt3dadd(-122.626278271851, 945.458368564228, 130.11290492399, 0.45)
    pt3dadd(-122.762230138734, 946.436602992768, 130.269667460043, 0.45)
    pt3dadd(-122.898182005618, 947.414837421308, 130.426429996096, 0.45)
    pt3dadd(-123.034133872501, 948.393071849848, 130.583192532149, 0.45)
    pt3dadd(-123.170085739384, 949.371306278388, 130.739955068202, 0.45)
    pt3dadd(-123.306037606267, 950.349540706928, 130.896717604255, 0.45)
    pt3dadd(-123.441989473151, 951.327775135468, 131.053480140308, 0.45)
    pt3dadd(-123.577941340034, 952.306009564008, 131.210242676361, 0.45)
    pt3dadd(-123.713893206917, 953.284243992548, 131.367005212414, 0.45)
    pt3dadd(-123.849845073801, 954.262478421089, 131.523767748467, 0.45)
    pt3dadd(-123.985796940684, 955.240712849629, 131.68053028452, 0.45)
    pt3dadd(-124.121748807567, 956.218947278169, 131.837292820573, 0.45)
    pt3dadd(-124.257700674451, 957.197181706709, 131.994055356626, 0.45)
    pt3dadd(-124.393652541334, 958.175416135249, 132.150817892679, 0.45)
    pt3dadd(-124.529604408217, 959.153650563789, 132.307580428732, 0.45)
    pt3dadd(-124.665556275101, 960.131884992329, 132.464342964785, 0.45)
    pt3dadd(-124.801508141984, 961.110119420869, 132.621105500838, 0.45)
    pt3dadd(-124.937460008867, 962.088353849409, 132.777868036891, 0.45)
    pt3dadd(-125.073411875751, 963.066588277949, 132.934630572944, 0.45)
    pt3dadd(-125.209363742634, 964.04482270649, 133.091393108997, 0.45)
    pt3dadd(-125.345315609517, 965.02305713503, 133.24815564505, 0.45)
    pt3dadd(-125.4812674764, 966.00129156357, 133.404918181103, 0.45)
    pt3dadd(-125.617219343284, 966.97952599211, 133.561680717156, 0.45)
    pt3dadd(-125.753171210167, 967.95776042065, 133.718443253209, 0.45)
    pt3dadd(-125.88912307705, 968.93599484919, 133.875205789262, 0.45)
    pt3dadd(-126.025074943934, 969.91422927773, 134.031968325315, 0.45)
    pt3dadd(-126.161026810817, 970.89246370627, 134.188730861368, 0.45)
    pt3dadd(-126.2969786777, 971.87069813481, 134.345493397421, 0.45)
    pt3dadd(-126.432930544584, 972.84893256335, 134.502255933474, 0.45)
    pt3dadd(-126.568882411467, 973.827166991891, 134.659018469527, 0.45)
    pt3dadd(-126.70483427835, 974.805401420431, 134.81578100558, 0.45)
    pt3dadd(-126.840786145234, 975.783635848971, 134.972543541633, 0.45)
    pt3dadd(-126.976738012117, 976.761870277511, 135.129306077686, 0.45)
    pt3dadd(-127.112689879, 977.740104706051, 135.286068613739, 0.45)
    pt3dadd(-127.248641745884, 978.718339134591, 135.442831149792, 0.45)
    pt3dadd(-127.384593612767, 979.696573563131, 135.599593685845, 0.45)
    pt3dadd(-127.52054547965, 980.674807991671, 135.756356221898, 0.45)
    pt3dadd(-127.656497346534, 981.653042420211, 135.913118757951, 0.45)
    pt3dadd(-127.792449213417, 982.631276848751, 136.069881294004, 0.45)
    pt3dadd(-127.9284010803, 983.609511277292, 136.226643830057, 0.45)
    pt3dadd(-128.064352947183, 984.587745705832, 136.38340636611, 0.45)
    pt3dadd(-128.200304814067, 985.565980134372, 136.540168902163, 0.45)
    pt3dadd(-128.33625668095, 986.544214562912, 136.696931438216, 0.45)
    pt3dadd(-128.472208547833, 987.522448991452, 136.853693974269, 0.45)
    pt3dadd(-128.608160414717, 988.500683419992, 137.010456510322, 0.45)
    pt3dadd(-128.7441122816, 989.478917848532, 137.167219046375, 0.45)
    pt3dadd(-128.880064148483, 990.457152277072, 137.323981582428, 0.45)
    pt3dadd(-129.016016015367, 991.435386705612, 137.480744118481, 0.45)
    pt3dadd(-129.15196788225, 992.413621134152, 137.637506654534, 0.45)
    pt3dadd(-129.287919749133, 993.391855562693, 137.794269190587, 0.45)
    pt3dadd(-129.423871616017, 994.370089991233, 137.95103172664, 0.45)
    pt3dadd(-129.5598234829, 995.348324419773, 138.107794262693, 0.45)
    pt3dadd(-129.695775349783, 996.326558848313, 138.264556798746, 0.45)
    pt3dadd(-129.831727216667, 997.304793276853, 138.421319334799, 0.45)
    pt3dadd(-129.96767908355, 998.283027705393, 138.578081870852, 0.45)
    pt3dadd(-130.103630950433, 999.261262133933, 138.734844406905, 0.45)
    pt3dadd(-130.239582817316, 1000.23949656247, 138.891606942958, 0.45)
    pt3dadd(-130.3755346842, 1001.21773099101, 139.048369479011, 0.45)
    pt3dadd(-130.511486551083, 1002.19596541955, 139.205132015064, 0.45)
    pt3dadd(-130.647438417966, 1003.17419984809, 139.361894551117, 0.45)
    pt3dadd(-130.78339028485, 1004.15243427663, 139.51865708717, 0.45)
  }
}
proc shape3d_25() {
  axon[0] {
    pt3dadd(-130.919342151733, 1005.13066870517, 139.675419623223, 0.45)
    pt3dadd(-131.055294018616, 1006.10890313371, 139.832182159276, 0.45)
    pt3dadd(-131.1912458855, 1007.08713756225, 139.988944695329, 0.45)
    pt3dadd(-131.327197752383, 1008.06537199079, 140.145707231382, 0.45)
    pt3dadd(-131.463149619266, 1009.04360641933, 140.302469767435, 0.45)
    pt3dadd(-131.59910148615, 1010.02184084787, 140.459232303488, 0.45)
    pt3dadd(-131.735053353033, 1011.00007527641, 140.615994839541, 0.45)
    pt3dadd(-131.871005219916, 1011.97830970495, 140.772757375594, 0.45)
    pt3dadd(-132.0069570868, 1012.95654413349, 140.929519911647, 0.45)
    pt3dadd(-132.142908953683, 1013.93477856203, 141.0862824477, 0.45)
    pt3dadd(-132.278860820566, 1014.91301299057, 141.243044983753, 0.45)
    pt3dadd(-132.414812687449, 1015.89124741911, 141.399807519806, 0.45)
    pt3dadd(-132.550764554333, 1016.86948184765, 141.556570055859, 0.45)
    pt3dadd(-132.686716421216, 1017.8477162762, 141.713332591912, 0.45)
    pt3dadd(-132.822668288099, 1018.82595070474, 141.870095127965, 0.45)
    pt3dadd(-132.958620154983, 1019.80418513328, 142.026857664018, 0.45)
    pt3dadd(-133.094572021866, 1020.78241956182, 142.183620200071, 0.45)
    pt3dadd(-133.230523888749, 1021.76065399036, 142.340382736124, 0.45)
    pt3dadd(-133.366475755633, 1022.7388884189, 142.497145272177, 0.45)
    pt3dadd(-133.502427622516, 1023.71712284744, 142.65390780823, 0.45)
    pt3dadd(-133.638379489399, 1024.69535727598, 142.810670344283, 0.45)
    pt3dadd(-133.774331356283, 1025.67359170452, 142.967432880336, 0.45)
    pt3dadd(-133.910283223166, 1026.65182613306, 143.124195416389, 0.45)
    pt3dadd(-134.046235090049, 1027.6300605616, 143.280957952442, 0.45)
    pt3dadd(-134.182186956933, 1028.60829499014, 143.437720488495, 0.45)
    pt3dadd(-134.318138823816, 1029.58652941868, 143.594483024548, 0.45)
    pt3dadd(-134.454090690699, 1030.56476384722, 143.751245560601, 0.45)
    pt3dadd(-134.590042557582, 1031.54299827576, 143.908008096654, 0.45)
    pt3dadd(-134.725994424466, 1032.5212327043, 144.064770632707, 0.45)
    pt3dadd(-134.861946291349, 1033.49946713284, 144.22153316876, 0.45)
    pt3dadd(-134.997898158232, 1034.47770156138, 144.378295704813, 0.45)
    pt3dadd(-135.133850025116, 1035.45593598992, 144.535058240866, 0.45)
    pt3dadd(-135.269801891999, 1036.43417041846, 144.691820776919, 0.45)
    pt3dadd(-135.405753758882, 1037.412404847, 144.848583312972, 0.45)
    pt3dadd(-135.541705625766, 1038.39063927554, 145.005345849025, 0.45)
    pt3dadd(-135.677657492649, 1039.36887370408, 145.162108385078, 0.45)
    pt3dadd(-135.813609359532, 1040.34710813262, 145.318870921131, 0.45)
    pt3dadd(-135.949561226416, 1041.32534256116, 145.475633457184, 0.45)
    pt3dadd(-136.085513093299, 1042.3035769897, 145.632395993237, 0.45)
    pt3dadd(-136.221464960182, 1043.28181141824, 145.78915852929, 0.45)
    pt3dadd(-136.357416827066, 1044.26004584678, 145.945921065343, 0.45)
    pt3dadd(-136.493368693949, 1045.23828027532, 146.102683601396, 0.45)
    pt3dadd(-136.629320560832, 1046.21651470386, 146.259446137449, 0.45)
    pt3dadd(-136.765272427715, 1047.1947491324, 146.416208673502, 0.45)
    pt3dadd(-136.901224294599, 1048.17298356094, 146.572971209555, 0.45)
    pt3dadd(-137.037176161482, 1049.15121798948, 146.729733745608, 0.45)
    pt3dadd(-137.173128028365, 1050.12945241802, 146.886496281661, 0.45)
    pt3dadd(-137.309079895249, 1051.10768684656, 147.043258817714, 0.45)
    pt3dadd(-137.445031762132, 1052.0859212751, 147.200021353767, 0.45)
    pt3dadd(-137.580983629015, 1053.06415570364, 147.35678388982, 0.45)
    pt3dadd(-137.716935495899, 1054.04239013218, 147.513546425873, 0.45)
    pt3dadd(-137.852887362782, 1055.02062456072, 147.670308961926, 0.45)
    pt3dadd(-137.988839229665, 1055.99885898926, 147.827071497979, 0.45)
    pt3dadd(-138.124791096549, 1056.9770934178, 147.983834034032, 0.45)
    pt3dadd(-138.260742963432, 1057.95532784634, 148.140596570085, 0.45)
    pt3dadd(-138.396694830315, 1058.93356227488, 148.297359106138, 0.45)
    pt3dadd(-138.532646697199, 1059.91179670342, 148.454121642191, 0.45)
    pt3dadd(-138.668598564082, 1060.89003113196, 148.610884178244, 0.45)
    pt3dadd(-138.804550430965, 1061.8682655605, 148.767646714297, 0.45)
    pt3dadd(-138.940502297849, 1062.84649998904, 148.92440925035, 0.45)
    pt3dadd(-139.076454164732, 1063.82473441758, 149.081171786403, 0.45)
    pt3dadd(-139.212406031615, 1064.80296884612, 149.237934322456, 0.45)
    pt3dadd(-139.348357898498, 1065.78120327466, 149.394696858509, 0.45)
    pt3dadd(-139.484309765382, 1066.7594377032, 149.551459394562, 0.45)
    pt3dadd(-139.620261632265, 1067.73767213174, 149.708221930615, 0.45)
    pt3dadd(-139.756213499148, 1068.71590656028, 149.864984466668, 0.45)
    pt3dadd(-139.892165366032, 1069.69414098882, 150.021747002721, 0.45)
    pt3dadd(-140.028117232915, 1070.67237541736, 150.178509538774, 0.45)
    pt3dadd(-140.164069099798, 1071.6506098459, 150.335272074827, 0.45)
    pt3dadd(-140.300020966682, 1072.62884427444, 150.49203461088, 0.45)
    pt3dadd(-140.435972833565, 1073.60707870298, 150.648797146933, 0.45)
    pt3dadd(-140.571924700448, 1074.58531313152, 150.805559682986, 0.45)
    pt3dadd(-140.707876567332, 1075.56354756006, 150.962322219039, 0.45)
    pt3dadd(-140.843828434215, 1076.5417819886, 151.119084755092, 0.45)
    pt3dadd(-140.979780301098, 1077.52001641714, 151.275847291145, 0.45)
    pt3dadd(-141.115732167981, 1078.49825084568, 151.432609827198, 0.45)
    pt3dadd(-141.251684034865, 1079.47648527422, 151.589372363251, 0.45)
    pt3dadd(-141.387635901748, 1080.45471970276, 151.746134899304, 0.45)
    pt3dadd(-141.523587768631, 1081.4329541313, 151.902897435357, 0.45)
    pt3dadd(-141.659539635515, 1082.41118855984, 152.05965997141, 0.45)
    pt3dadd(-141.795491502398, 1083.38942298838, 152.216422507463, 0.45)
    pt3dadd(-141.931443369281, 1084.36765741692, 152.373185043516, 0.45)
    pt3dadd(-142.067395236165, 1085.34589184546, 152.529947579569, 0.45)
    pt3dadd(-142.203347103048, 1086.324126274, 152.686710115622, 0.45)
    pt3dadd(-142.339298969931, 1087.30236070254, 152.843472651675, 0.45)
    pt3dadd(-142.475250836815, 1088.28059513108, 153.000235187728, 0.45)
    pt3dadd(-142.611202703698, 1089.25882955962, 153.156997723781, 0.45)
    pt3dadd(-142.747154570581, 1090.23706398816, 153.313760259834, 0.45)
    pt3dadd(-142.883106437465, 1091.2152984167, 153.470522795887, 0.45)
    pt3dadd(-143.019058304348, 1092.19353284524, 153.62728533194, 0.45)
    pt3dadd(-143.155010171231, 1093.17176727378, 153.784047867993, 0.45)
    pt3dadd(-143.290962038115, 1094.15000170232, 153.940810404046, 0.45)
    pt3dadd(-143.426913904998, 1095.12823613086, 154.097572940099, 0.45)
    pt3dadd(-143.562865771881, 1096.1064705594, 154.254335476152, 0.45)
    pt3dadd(-143.698817638764, 1097.08470498794, 154.411098012205, 0.45)
    pt3dadd(-143.834769505648, 1098.06293941648, 154.567860548258, 0.45)
    pt3dadd(-143.970721372531, 1099.04117384502, 154.724623084311, 0.45)
    pt3dadd(-144.106673239414, 1100.01940827356, 154.881385620364, 0.45)
    pt3dadd(-144.242625106298, 1100.9976427021, 155.038148156417, 0.45)
    pt3dadd(-144.378576973181, 1101.97587713064, 155.19491069247, 0.45)
    pt3dadd(-144.514528840064, 1102.95411155918, 155.351673228523, 0.45)
    pt3dadd(-144.650480706948, 1103.93234598772, 155.508435764576, 0.45)
    pt3dadd(-144.786432573831, 1104.91058041626, 155.665198300629, 0.45)
    pt3dadd(-144.922384440714, 1105.8888148448, 155.821960836682, 0.45)
    pt3dadd(-145.058336307598, 1106.86704927334, 155.978723372735, 0.45)
    pt3dadd(-145.194288174481, 1107.84528370188, 156.135485908788, 0.45)
    pt3dadd(-145.330240041364, 1108.82351813042, 156.292248444841, 0.45)
    pt3dadd(-145.466191908248, 1109.80175255896, 156.449010980894, 0.45)
    pt3dadd(-145.602143775131, 1110.7799869875, 156.605773516947, 0.45)
    pt3dadd(-145.738095642014, 1111.75822141604, 156.762536053, 0.45)
    pt3dadd(-145.874047508897, 1112.73645584458, 156.919298589053, 0.45)
    pt3dadd(-146.009999375781, 1113.71469027312, 157.076061125106, 0.45)
    pt3dadd(-146.145951242664, 1114.69292470166, 157.232823661159, 0.45)
    pt3dadd(-146.281903109547, 1115.6711591302, 157.389586197212, 0.45)
    pt3dadd(-146.417854976431, 1116.64939355875, 157.546348733265, 0.45)
    pt3dadd(-146.553806843314, 1117.62762798729, 157.703111269318, 0.45)
    pt3dadd(-146.689758710197, 1118.60586241583, 157.859873805371, 0.45)
    pt3dadd(-146.825710577081, 1119.58409684437, 158.016636341424, 0.45)
    pt3dadd(-146.961662443964, 1120.56233127291, 158.173398877477, 0.45)
    pt3dadd(-147.097614310847, 1121.54056570145, 158.33016141353, 0.45)
    pt3dadd(-147.233566177731, 1122.51880012999, 158.486923949583, 0.45)
    pt3dadd(-147.369518044614, 1123.49703455853, 158.643686485636, 0.45)
    pt3dadd(-147.505469911497, 1124.47526898707, 158.800449021689, 0.45)
    pt3dadd(-147.641421778381, 1125.45350341561, 158.957211557742, 0.45)
    pt3dadd(-147.777373645264, 1126.43173784415, 159.113974093795, 0.45)
    pt3dadd(-147.913325512147, 1127.40997227269, 159.270736629848, 0.45)
    pt3dadd(-148.04927737903, 1128.38820670123, 159.427499165901, 0.45)
    pt3dadd(-148.185229245914, 1129.36644112977, 159.584261701954, 0.45)
    pt3dadd(-148.321181112797, 1130.34467555831, 159.741024238007, 0.45)
    pt3dadd(-148.45713297968, 1131.32290998685, 159.89778677406, 0.45)
    pt3dadd(-148.593084846564, 1132.30114441539, 160.054549310113, 0.45)
    pt3dadd(-148.729036713447, 1133.27937884393, 160.211311846166, 0.45)
    pt3dadd(-148.86498858033, 1134.25761327247, 160.368074382219, 0.45)
    pt3dadd(-149.000940447214, 1135.23584770101, 160.524836918272, 0.45)
    pt3dadd(-149.136892314097, 1136.21408212955, 160.681599454325, 0.45)
    pt3dadd(-149.27284418098, 1137.19231655809, 160.838361990378, 0.45)
    pt3dadd(-149.408796047864, 1138.17055098663, 160.995124526431, 0.45)
    pt3dadd(-149.544747914747, 1139.14878541517, 161.151887062484, 0.45)
    pt3dadd(-149.68069978163, 1140.12701984371, 161.308649598537, 0.45)
    pt3dadd(-149.816651648514, 1141.10525427225, 161.46541213459, 0.45)
    pt3dadd(-149.952603515397, 1142.08348870079, 161.622174670643, 0.45)
    pt3dadd(-150.08855538228, 1143.06172312933, 161.778937206696, 0.45)
    pt3dadd(-150.224507249163, 1144.03995755787, 161.935699742749, 0.45)
    pt3dadd(-150.360459116047, 1145.01819198641, 162.092462278802, 0.45)
    pt3dadd(-150.49641098293, 1145.99642641495, 162.249224814855, 0.45)
    pt3dadd(-150.632362849813, 1146.97466084349, 162.405987350908, 0.45)
    pt3dadd(-150.768314716697, 1147.95289527203, 162.562749886961, 0.45)
    pt3dadd(-150.90426658358, 1148.93112970057, 162.719512423014, 0.45)
    pt3dadd(-151.040218450463, 1149.90936412911, 162.876274959067, 0.45)
    pt3dadd(-151.176170317347, 1150.88759855765, 163.03303749512, 0.45)
    pt3dadd(-151.31212218423, 1151.86583298619, 163.189800031173, 0.45)
    pt3dadd(-151.448074051113, 1152.84406741473, 163.346562567226, 0.45)
    pt3dadd(-151.584025917997, 1153.82230184327, 163.503325103279, 0.45)
    pt3dadd(-151.71997778488, 1154.80053627181, 163.660087639332, 0.45)
    pt3dadd(-151.855929651763, 1155.77877070035, 163.816850175385, 0.45)
    pt3dadd(-151.991881518647, 1156.75700512889, 163.973612711438, 0.45)
    pt3dadd(-152.12783338553, 1157.73523955743, 164.130375247491, 0.45)
    pt3dadd(-152.263785252413, 1158.71347398597, 164.287137783544, 0.45)
    pt3dadd(-152.399737119296, 1159.69170841451, 164.443900319597, 0.45)
    pt3dadd(-152.53568898618, 1160.66994284305, 164.60066285565, 0.45)
    pt3dadd(-152.671640853063, 1161.64817727159, 164.757425391703, 0.45)
    pt3dadd(-152.807592719946, 1162.62641170013, 164.914187927756, 0.45)
    pt3dadd(-152.94354458683, 1163.60464612867, 165.070950463809, 0.45)
    pt3dadd(-153.079496453713, 1164.58288055721, 165.227712999862, 0.45)
    pt3dadd(-153.215448320596, 1165.56111498575, 165.384475535915, 0.45)
    pt3dadd(-153.35140018748, 1166.53934941429, 165.541238071968, 0.45)
    pt3dadd(-153.487352054363, 1167.51758384283, 165.698000608021, 0.45)
    pt3dadd(-153.623303921246, 1168.49581827137, 165.854763144074, 0.45)
    pt3dadd(-153.75925578813, 1169.47405269991, 166.011525680127, 0.45)
    pt3dadd(-153.895207655013, 1170.45228712845, 166.16828821618, 0.45)
    pt3dadd(-154.031159521896, 1171.43052155699, 166.325050752233, 0.45)
    pt3dadd(-154.16711138878, 1172.40875598553, 166.481813288286, 0.45)
    pt3dadd(-154.303063255663, 1173.38699041407, 166.638575824339, 0.45)
    pt3dadd(-154.439015122546, 1174.36522484261, 166.795338360392, 0.45)
    pt3dadd(-154.57496698943, 1175.34345927115, 166.952100896445, 0.45)
    pt3dadd(-154.710918856313, 1176.32169369969, 167.108863432498, 0.45)
    pt3dadd(-154.846870723196, 1177.29992812823, 167.265625968551, 0.45)
    pt3dadd(-154.982822590079, 1178.27816255677, 167.422388504604, 0.45)
    pt3dadd(-155.118774456963, 1179.25639698531, 167.579151040657, 0.45)
    pt3dadd(-155.254726323846, 1180.23463141385, 167.73591357671, 0.45)
    pt3dadd(-155.390678190729, 1181.21286584239, 167.892676112763, 0.45)
    pt3dadd(-155.526630057613, 1182.19110027093, 168.049438648816, 0.45)
    pt3dadd(-155.662581924496, 1183.16933469947, 168.206201184869, 0.45)
    pt3dadd(-155.798533791379, 1184.14756912801, 168.362963720922, 0.45)
    pt3dadd(-155.934485658263, 1185.12580355655, 168.519726256975, 0.45)
    pt3dadd(-156.070437525146, 1186.10403798509, 168.676488793028, 0.45)
    pt3dadd(-156.206389392029, 1187.08227241363, 168.833251329081, 0.45)
    pt3dadd(-156.342341258913, 1188.06050684217, 168.990013865134, 0.45)
    pt3dadd(-156.478293125796, 1189.03874127071, 169.146776401187, 0.45)
    pt3dadd(-156.614244992679, 1190.01697569925, 169.30353893724, 0.45)
    pt3dadd(-156.750196859562, 1190.99521012779, 169.460301473293, 0.45)
    pt3dadd(-156.886148726446, 1191.97344455633, 169.617064009346, 0.45)
    pt3dadd(-157.022100593329, 1192.95167898487, 169.773826545399, 0.45)
    pt3dadd(-157.158052460212, 1193.92991341341, 169.930589081452, 0.45)
    pt3dadd(-157.294004327096, 1194.90814784195, 170.087351617505, 0.45)
    pt3dadd(-157.429956193979, 1195.88638227049, 170.244114153558, 0.45)
    pt3dadd(-157.565908060862, 1196.86461669903, 170.400876689611, 0.45)
    pt3dadd(-157.701859927746, 1197.84285112757, 170.557639225664, 0.45)
    pt3dadd(-157.837811794629, 1198.82108555611, 170.714401761717, 0.45)
    pt3dadd(-157.973763661512, 1199.79931998465, 170.87116429777, 0.45)
    pt3dadd(-158.109715528396, 1200.77755441319, 171.027926833823, 0.45)
    pt3dadd(-158.245667395279, 1201.75578884173, 171.184689369876, 0.45)
    pt3dadd(-158.381619262162, 1202.73402327027, 171.341451905929, 0.45)
    pt3dadd(-158.517571129046, 1203.71225769881, 171.498214441982, 0.45)
    pt3dadd(-158.653522995929, 1204.69049212735, 171.654976978035, 0.45)
    pt3dadd(-158.789474862812, 1205.66872655589, 171.811739514088, 0.45)
    pt3dadd(-158.925426729696, 1206.64696098443, 171.968502050141, 0.45)
    pt3dadd(-159.061378596579, 1207.62519541297, 172.125264586194, 0.45)
    pt3dadd(-159.197330463462, 1208.60342984151, 172.282027122247, 0.45)
    pt3dadd(-159.333282330345, 1209.58166427005, 172.4387896583, 0.45)
    pt3dadd(-159.469234197229, 1210.55989869859, 172.595552194353, 0.45)
    pt3dadd(-159.605186064112, 1211.53813312713, 172.752314730406, 0.45)
    pt3dadd(-159.741137930995, 1212.51636755567, 172.909077266459, 0.45)
    pt3dadd(-159.877089797879, 1213.49460198421, 173.065839802512, 0.45)
    pt3dadd(-160.013041664762, 1214.47283641276, 173.222602338565, 0.45)
    pt3dadd(-160.148993531645, 1215.45107084129, 173.379364874618, 0.45)
    pt3dadd(-160.284945398529, 1216.42930526983, 173.536127410671, 0.45)
    pt3dadd(-160.420897265412, 1217.40753969838, 173.692889946724, 0.45)
    pt3dadd(-160.556849132295, 1218.38577412692, 173.849652482777, 0.45)
    pt3dadd(-160.692800999179, 1219.36400855546, 174.00641501883, 0.45)
    pt3dadd(-160.828752866062, 1220.342242984, 174.163177554883, 0.45)
    pt3dadd(-160.964704732945, 1221.32047741254, 174.319940090936, 0.45)
    pt3dadd(-161.100656599829, 1222.29871184108, 174.476702626989, 0.45)
    pt3dadd(-161.236608466712, 1223.27694626962, 174.633465163042, 0.45)
    pt3dadd(-161.372560333595, 1224.25518069816, 174.790227699095, 0.45)
    pt3dadd(-161.508512200478, 1225.2334151267, 174.946990235148, 0.45)
    pt3dadd(-161.644464067362, 1226.21164955524, 175.103752771201, 0.45)
    pt3dadd(-161.780415934245, 1227.18988398378, 175.260515307254, 0.45)
    pt3dadd(-161.916367801128, 1228.16811841232, 175.417277843307, 0.45)
    pt3dadd(-162.052319668012, 1229.14635284086, 175.57404037936, 0.45)
    pt3dadd(-162.188271534895, 1230.1245872694, 175.730802915413, 0.45)
    pt3dadd(-162.324223401778, 1231.10282169794, 175.887565451466, 0.45)
    pt3dadd(-162.460175268662, 1232.08105612648, 176.044327987519, 0.45)
    pt3dadd(-162.596127135545, 1233.05929055502, 176.201090523572, 0.45)
    pt3dadd(-162.732079002428, 1234.03752498356, 176.357853059625, 0.45)
    pt3dadd(-162.868030869312, 1235.0157594121, 176.514615595678, 0.45)
    pt3dadd(-163.003982736195, 1235.99399384064, 176.671378131731, 0.45)
    pt3dadd(-163.139934603078, 1236.97222826918, 176.828140667784, 0.45)
    pt3dadd(-163.275886469962, 1237.95046269772, 176.984903203837, 0.45)
    pt3dadd(-163.411838336845, 1238.92869712626, 177.14166573989, 0.45)
    pt3dadd(-163.547790203728, 1239.9069315548, 177.298428275943, 0.45)
    pt3dadd(-163.683742070611, 1240.88516598334, 177.455190811996, 0.45)
    pt3dadd(-163.819693937495, 1241.86340041188, 177.611953348049, 0.45)
    pt3dadd(-163.955645804378, 1242.84163484042, 177.768715884102, 0.45)
    pt3dadd(-164.091597671261, 1243.81986926896, 177.925478420155, 0.45)
    pt3dadd(-164.227549538145, 1244.7981036975, 178.082240956208, 0.45)
    pt3dadd(-164.363501405028, 1245.77633812604, 178.239003492261, 0.45)
    pt3dadd(-164.499453271911, 1246.75457255458, 178.395766028314, 0.45)
    pt3dadd(-164.635405138795, 1247.73280698312, 178.552528564367, 0.45)
  }
}
proc shape3d_26() {
  axon[0] {
    pt3dadd(-164.771357005678, 1248.71104141166, 178.70929110042, 0.45)
    pt3dadd(-164.907308872561, 1249.6892758402, 178.866053636473, 0.45)
    pt3dadd(-165.043260739445, 1250.66751026874, 179.022816172526, 0.45)
    pt3dadd(-165.179212606328, 1251.64574469728, 179.179578708579, 0.45)
    pt3dadd(-165.315164473211, 1252.62397912582, 179.336341244632, 0.45)
    pt3dadd(-165.451116340095, 1253.60221355436, 179.493103780685, 0.45)
    pt3dadd(-165.587068206978, 1254.5804479829, 179.649866316738, 0.45)
    pt3dadd(-165.723020073861, 1255.55868241144, 179.806628852791, 0.45)
    pt3dadd(-165.858971940744, 1256.53691683998, 179.963391388844, 0.45)
    pt3dadd(-165.994923807628, 1257.51515126852, 180.120153924897, 0.45)
    pt3dadd(-166.130875674511, 1258.49338569706, 180.27691646095, 0.45)
    pt3dadd(-166.266827541394, 1259.4716201256, 180.433678997003, 0.45)
    pt3dadd(-166.402779408278, 1260.44985455414, 180.590441533056, 0.45)
    pt3dadd(-166.538731275161, 1261.42808898268, 180.747204069109, 0.45)
    pt3dadd(-166.674683142044, 1262.40632341122, 180.903966605162, 0.45)
    pt3dadd(-166.810635008928, 1263.38455783976, 181.060729141215, 0.45)
    pt3dadd(-166.946586875811, 1264.3627922683, 181.217491677268, 0.45)
    pt3dadd(-167.082538742694, 1265.34102669684, 181.374254213321, 0.45)
    pt3dadd(-167.218490609578, 1266.31926112538, 181.531016749374, 0.45)
    pt3dadd(-167.354442476461, 1267.29749555392, 181.687779285427, 0.45)
    pt3dadd(-167.490394343344, 1268.27572998246, 181.84454182148, 0.45)
    pt3dadd(-167.626346210228, 1269.253964411, 182.001304357533, 0.45)
    pt3dadd(-167.762298077111, 1270.23219883954, 182.158066893586, 0.45)
    pt3dadd(-167.898249943994, 1271.21043326808, 182.314829429639, 0.45)
    pt3dadd(-168.034201810877, 1272.18866769662, 182.471591965692, 0.45)
    pt3dadd(-168.170153677761, 1273.16690212516, 182.628354501745, 0.45)
    pt3dadd(-168.306105544644, 1274.1451365537, 182.785117037798, 0.45)
    pt3dadd(-168.442057411527, 1275.12337098224, 182.941879573851, 0.45)
    pt3dadd(-168.578009278411, 1276.10160541078, 183.098642109904, 0.45)
    pt3dadd(-168.713961145294, 1277.07983983932, 183.255404645957, 0.45)
    pt3dadd(-168.849913012177, 1278.05807426786, 183.41216718201, 0.45)
    pt3dadd(-168.985864879061, 1279.0363086964, 183.568929718063, 0.45)
    pt3dadd(-169.121816745944, 1280.01454312494, 183.725692254116, 0.45)
    pt3dadd(-169.257768612827, 1280.99277755348, 183.882454790169, 0.45)
    pt3dadd(-169.393720479711, 1281.97101198202, 184.039217326222, 0.45)
    pt3dadd(-169.529672346594, 1282.94924641056, 184.195979862275, 0.45)
    pt3dadd(-169.665624213477, 1283.9274808391, 184.352742398328, 0.45)
    pt3dadd(-169.801576080361, 1284.90571526764, 184.509504934381, 0.45)
    pt3dadd(-169.937527947244, 1285.88394969618, 184.666267470434, 0.45)
    pt3dadd(-170.073479814127, 1286.86218412472, 184.823030006487, 0.45)
    pt3dadd(-170.209431681011, 1287.84041855326, 184.97979254254, 0.45)
    pt3dadd(-170.345383547894, 1288.8186529818, 185.136555078593, 0.45)
    pt3dadd(-170.481335414777, 1289.79688741034, 185.293317614646, 0.45)
    pt3dadd(-170.61728728166, 1290.77512183888, 185.450080150699, 0.45)
    pt3dadd(-170.753239148544, 1291.75335626742, 185.606842686752, 0.45)
    pt3dadd(-170.889191015427, 1292.73159069596, 185.763605222805, 0.45)
    pt3dadd(-171.02514288231, 1293.7098251245, 185.920367758858, 0.45)
    pt3dadd(-171.161094749194, 1294.68805955304, 186.077130294911, 0.45)
    pt3dadd(-171.297046616077, 1295.66629398158, 186.233892830964, 0.45)
    pt3dadd(-171.43299848296, 1296.64452841012, 186.390655367017, 0.45)
    pt3dadd(-171.568950349844, 1297.62276283866, 186.54741790307, 0.45)
    pt3dadd(-171.704902216727, 1298.6009972672, 186.704180439123, 0.45)
    pt3dadd(-171.84085408361, 1299.57923169574, 186.860942975176, 0.45)
    pt3dadd(-171.976805950494, 1300.55746612428, 187.017705511229, 0.45)
    pt3dadd(-172.112757817377, 1301.53570055282, 187.174468047282, 0.45)
    pt3dadd(-172.24870968426, 1302.51393498136, 187.331230583335, 0.45)
    pt3dadd(-172.384661551143, 1303.4921694099, 187.487993119388, 0.45)
    pt3dadd(-172.520613418027, 1304.47040383844, 187.644755655441, 0.45)
    pt3dadd(-172.65656528491, 1305.44863826698, 187.801518191494, 0.45)
    pt3dadd(-172.792517151793, 1306.42687269552, 187.958280727547, 0.45)
    pt3dadd(-172.928469018677, 1307.40510712406, 188.1150432636, 0.45)
    pt3dadd(-173.06442088556, 1308.3833415526, 188.271805799653, 0.45)
    pt3dadd(-173.200372752443, 1309.36157598114, 188.428568335706, 0.45)
    pt3dadd(-173.336324619327, 1310.33981040968, 188.585330871759, 0.45)
    pt3dadd(-173.47227648621, 1311.31804483822, 188.742093407812, 0.45)
    pt3dadd(-173.608228353093, 1312.29627926676, 188.898855943865, 0.45)
    pt3dadd(-173.744180219977, 1313.2745136953, 189.055618479918, 0.45)
    pt3dadd(-173.88013208686, 1314.25274812384, 189.212381015971, 0.45)
    pt3dadd(-174.016083953743, 1315.23098255238, 189.369143552024, 0.45)
    pt3dadd(-174.152035820627, 1316.20921698093, 189.525906088077, 0.45)
    pt3dadd(-174.28798768751, 1317.18745140947, 189.68266862413, 0.45)
    pt3dadd(-174.423939554393, 1318.16568583801, 189.839431160183, 0.45)
    pt3dadd(-174.559891421277, 1319.14392026655, 189.996193696236, 0.45)
    pt3dadd(-174.69584328816, 1320.12215469509, 190.152956232289, 0.45)
    pt3dadd(-174.831795155043, 1321.10038912363, 190.309718768342, 0.45)
    pt3dadd(-174.967747021926, 1322.07862355217, 190.466481304395, 0.45)
    pt3dadd(-175.10369888881, 1323.05685798071, 190.623243840448, 0.45)
    pt3dadd(-175.239650755693, 1324.03509240925, 190.780006376501, 0.45)
    pt3dadd(-175.375602622576, 1325.01332683779, 190.936768912554, 0.45)
    pt3dadd(-175.51155448946, 1325.99156126633, 191.093531448607, 0.45)
    pt3dadd(-175.647506356343, 1326.96979569487, 191.25029398466, 0.45)
    pt3dadd(-175.783458223226, 1327.94803012341, 191.407056520713, 0.45)
    pt3dadd(-175.91941009011, 1328.92626455195, 191.563819056766, 0.45)
    pt3dadd(-176.055361956993, 1329.90449898049, 191.720581592819, 0.45)
    pt3dadd(-176.191313823876, 1330.88273340903, 191.877344128872, 0.45)
    pt3dadd(-176.32726569076, 1331.86096783757, 192.034106664925, 0.45)
    pt3dadd(-176.463217557643, 1332.83920226611, 192.190869200978, 0.45)
    pt3dadd(-176.599169424526, 1333.81743669465, 192.347631737031, 0.45)
    pt3dadd(-176.73512129141, 1334.79567112319, 192.504394273084, 0.45)
    pt3dadd(-176.871073158293, 1335.77390555173, 192.661156809137, 0.45)
    pt3dadd(-177.007025025176, 1336.75213998027, 192.81791934519, 0.45)
    pt3dadd(-177.142976892059, 1337.73037440881, 192.974681881243, 0.45)
    pt3dadd(-177.278928758943, 1338.70860883735, 193.131444417296, 0.45)
    pt3dadd(-177.414880625826, 1339.68684326589, 193.288206953349, 0.45)
    pt3dadd(-177.550832492709, 1340.66507769443, 193.444969489402, 0.45)
    pt3dadd(-177.686784359593, 1341.64331212297, 193.601732025455, 0.45)
    pt3dadd(-177.822736226476, 1342.62154655151, 193.758494561508, 0.45)
    pt3dadd(-177.958688093359, 1343.59978098005, 193.915257097561, 0.45)
    pt3dadd(-178.094639960243, 1344.57801540859, 194.072019633614, 0.45)
    pt3dadd(-178.230591827126, 1345.55624983713, 194.228782169667, 0.45)
    pt3dadd(-178.366543694009, 1346.53448426567, 194.38554470572, 0.45)
    pt3dadd(-178.502495560893, 1347.51271869421, 194.542307241773, 0.45)
    pt3dadd(-178.638447427776, 1348.49095312275, 194.699069777826, 0.45)
    pt3dadd(-178.774399294659, 1349.46918755129, 194.855832313879, 0.45)
    pt3dadd(-178.910351161543, 1350.44742197983, 195.012594849932, 0.45)
    pt3dadd(-179.046303028426, 1351.42565640837, 195.169357385985, 0.45)
    pt3dadd(-179.182254895309, 1352.40389083691, 195.326119922038, 0.45)
    pt3dadd(-179.318206762192, 1353.38212526545, 195.482882458091, 0.45)
    pt3dadd(-179.454158629076, 1354.36035969399, 195.639644994144, 0.45)
    pt3dadd(-179.590110495959, 1355.33859412253, 195.796407530197, 0.45)
    pt3dadd(-179.726062362842, 1356.31682855107, 195.95317006625, 0.45)
    pt3dadd(-179.862014229726, 1357.29506297961, 196.109932602303, 0.45)
    pt3dadd(-179.997966096609, 1358.27329740815, 196.266695138356, 0.45)
    pt3dadd(-180.133917963492, 1359.25153183669, 196.423457674409, 0.45)
    pt3dadd(-180.269869830376, 1360.22976626523, 196.580220210462, 0.45)
    pt3dadd(-180.405821697259, 1361.20800069377, 196.736982746515, 0.45)
    pt3dadd(-180.541773564142, 1362.18623512231, 196.893745282568, 0.45)
    pt3dadd(-180.677725431026, 1363.16446955085, 197.050507818621, 0.45)
    pt3dadd(-180.813677297909, 1364.14270397939, 197.207270354674, 0.45)
    pt3dadd(-180.949629164792, 1365.12093840793, 197.364032890727, 0.45)
    pt3dadd(-181.085581031676, 1366.09917283647, 197.52079542678, 0.45)
    pt3dadd(-181.221532898559, 1367.07740726501, 197.677557962833, 0.45)
    pt3dadd(-181.357484765442, 1368.05564169355, 197.834320498886, 0.45)
    pt3dadd(-181.493436632325, 1369.03387612209, 197.991083034939, 0.45)
    pt3dadd(-181.629388499209, 1370.01211055063, 198.147845570992, 0.45)
    pt3dadd(-181.765340366092, 1370.99034497917, 198.304608107045, 0.45)
    pt3dadd(-181.901292232975, 1371.96857940771, 198.461370643098, 0.45)
    pt3dadd(-182.037244099859, 1372.94681383625, 198.618133179151, 0.45)
    pt3dadd(-182.173195966742, 1373.92504826479, 198.774895715204, 0.45)
    pt3dadd(-182.309147833625, 1374.90328269333, 198.931658251257, 0.45)
    pt3dadd(-182.445099700509, 1375.88151712187, 199.08842078731, 0.45)
    pt3dadd(-182.581051567392, 1376.85975155041, 199.245183323363, 0.45)
    pt3dadd(-182.717003434275, 1377.83798597895, 199.401945859416, 0.45)
    pt3dadd(-182.852955301159, 1378.81622040749, 199.558708395469, 0.45)
    pt3dadd(-182.988907168042, 1379.79445483603, 199.715470931522, 0.45)
    pt3dadd(-183.124859034925, 1380.77268926457, 199.872233467575, 0.45)
    pt3dadd(-183.260810901809, 1381.75092369311, 200.028996003628, 0.45)
    pt3dadd(-183.396762768692, 1382.72915812165, 200.185758539681, 0.45)
    pt3dadd(-183.532714635575, 1383.70739255019, 200.342521075734, 0.45)
    pt3dadd(-183.668666502458, 1384.68562697873, 200.499283611787, 0.45)
    pt3dadd(-183.804618369342, 1385.66386140727, 200.65604614784, 0.45)
    pt3dadd(-183.940570236225, 1386.64209583581, 200.812808683893, 0.45)
    pt3dadd(-184.076522103108, 1387.62033026435, 200.969571219946, 0.45)
    pt3dadd(-184.212473969992, 1388.59856469289, 201.126333755999, 0.45)
    pt3dadd(-184.348425836875, 1389.57679912143, 201.283096292052, 0.45)
    pt3dadd(-184.484377703758, 1390.55503354997, 201.439858828105, 0.45)
    pt3dadd(-184.620329570642, 1391.53326797851, 201.596621364158, 0.45)
    pt3dadd(-184.756281437525, 1392.51150240705, 201.753383900211, 0.45)
    pt3dadd(-184.892233304408, 1393.48973683559, 201.910146436264, 0.45)
    pt3dadd(-185.028185171292, 1394.46797126413, 202.066908972317, 0.45)
    pt3dadd(-185.164137038175, 1395.44620569267, 202.22367150837, 0.45)
    pt3dadd(-185.300088905058, 1396.42444012121, 202.380434044423, 0.45)
    pt3dadd(-185.436040771942, 1397.40267454975, 202.537196580476, 0.45)
    pt3dadd(-185.571992638825, 1398.38090897829, 202.693959116529, 0.45)
    pt3dadd(-185.707944505708, 1399.35914340683, 202.850721652582, 0.45)
    pt3dadd(-185.843896372592, 1400.33737783537, 203.007484188635, 0.45)
    pt3dadd(-185.979848239475, 1401.31561226391, 203.164246724688, 0.45)
    pt3dadd(-186.115800106358, 1402.29384669245, 203.321009260741, 0.45)
    pt3dadd(-186.251751973241, 1403.27208112099, 203.477771796794, 0.45)
    pt3dadd(-186.387703840125, 1404.25031554953, 203.634534332847, 0.45)
    pt3dadd(-186.523655707008, 1405.22854997807, 203.7912968689, 0.45)
    pt3dadd(-186.659607573891, 1406.20678440661, 203.948059404953, 0.45)
    pt3dadd(-186.795559440775, 1407.18501883515, 204.104821941006, 0.45)
    pt3dadd(-186.931511307658, 1408.16325326369, 204.261584477059, 0.45)
    pt3dadd(-187.067463174541, 1409.14148769223, 204.418347013112, 0.45)
    pt3dadd(-187.203415041425, 1410.11972212077, 204.575109549165, 0.45)
    pt3dadd(-187.339366908308, 1411.09795654931, 204.731872085218, 0.45)
    pt3dadd(-187.475318775191, 1412.07619097785, 204.888634621271, 0.45)
    pt3dadd(-187.611270642075, 1413.05442540639, 205.045397157324, 0.45)
    pt3dadd(-187.747222508958, 1414.03265983494, 205.202159693377, 0.45)
    pt3dadd(-187.883174375841, 1415.01089426348, 205.35892222943, 0.45)
    pt3dadd(-188.019126242725, 1415.98912869202, 205.515684765483, 0.45)
    pt3dadd(-188.155078109608, 1416.96736312056, 205.672447301536, 0.45)
    pt3dadd(-188.291029976491, 1417.9455975491, 205.829209837589, 0.45)
    pt3dadd(-188.426981843374, 1418.92383197764, 205.985972373642, 0.45)
    pt3dadd(-188.562933710258, 1419.90206640618, 206.142734909695, 0.45)
    pt3dadd(-188.698885577141, 1420.88030083472, 206.299497445748, 0.45)
    pt3dadd(-188.834837444024, 1421.85853526326, 206.456259981801, 0.45)
    pt3dadd(-188.970789310908, 1422.8367696918, 206.613022517854, 0.45)
    pt3dadd(-189.106741177791, 1423.81500412034, 206.769785053907, 0.45)
    pt3dadd(-189.242693044674, 1424.79323854888, 206.92654758996, 0.45)
    pt3dadd(-189.378644911558, 1425.77147297742, 207.083310126013, 0.45)
    pt3dadd(-189.514596778441, 1426.74970740596, 207.240072662066, 0.45)
    pt3dadd(-189.650548645324, 1427.7279418345, 207.396835198119, 0.45)
    pt3dadd(-189.786500512208, 1428.70617626304, 207.553597734172, 0.45)
    pt3dadd(-189.922452379091, 1429.68441069158, 207.710360270225, 0.45)
    pt3dadd(-190.058404245974, 1430.66264512012, 207.867122806278, 0.45)
    pt3dadd(-190.194356112858, 1431.64087954866, 208.023885342331, 0.45)
    pt3dadd(-190.330307979741, 1432.6191139772, 208.180647878384, 0.45)
    pt3dadd(-190.466259846624, 1433.59734840574, 208.337410414437, 0.45)
    pt3dadd(-190.602211713507, 1434.57558283428, 208.49417295049, 0.45)
    pt3dadd(-190.738163580391, 1435.55381726282, 208.650935486543, 0.45)
    pt3dadd(-190.874115447274, 1436.53205169136, 208.807698022596, 0.45)
    pt3dadd(-191.010067314157, 1437.5102861199, 208.964460558649, 0.45)
    pt3dadd(-191.146019181041, 1438.48852054844, 209.121223094702, 0.45)
    pt3dadd(-191.281971047924, 1439.46675497698, 209.277985630755, 0.45)
    pt3dadd(-191.417922914807, 1440.44498940552, 209.434748166808, 0.45)
    pt3dadd(-191.553874781691, 1441.42322383406, 209.591510702861, 0.45)
    pt3dadd(-191.689826648574, 1442.4014582626, 209.748273238914, 0.45)
    pt3dadd(-191.825778515457, 1443.37969269114, 209.905035774967, 0.45)
    pt3dadd(-191.961730382341, 1444.35792711968, 210.06179831102, 0.45)
    pt3dadd(-192.097682249224, 1445.33616154822, 210.218560847073, 0.45)
    pt3dadd(-192.233634116107, 1446.31439597676, 210.375323383126, 0.45)
    pt3dadd(-192.369585982991, 1447.2926304053, 210.532085919179, 0.45)
    pt3dadd(-192.505537849874, 1448.27086483384, 210.688848455232, 0.45)
    pt3dadd(-192.641489716757, 1449.24909926238, 210.845610991285, 0.45)
    pt3dadd(-192.77744158364, 1450.22733369092, 211.002373527338, 0.45)
    pt3dadd(-192.913393450524, 1451.20556811946, 211.159136063391, 0.45)
    pt3dadd(-193.049345317407, 1452.183802548, 211.315898599444, 0.45)
    pt3dadd(-193.18529718429, 1453.16203697654, 211.472661135497, 0.45)
    pt3dadd(-193.321249051174, 1454.14027140508, 211.62942367155, 0.45)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
  shape3d_20()
  shape3d_21()
  shape3d_22()
  shape3d_23()
  shape3d_24()
  shape3d_25()
  shape3d_26()
}

objref allreg, allregobj, alladendreg, allaxonreg, sec
objref regaxon
objref regGCL
objref regadendIML
objref regadendMML
objref regadendOML
objref regsoma
objref regaxonh
proc subsets() { local ward
  allregobj = new List()
  allreg = new SectionList()
  alladendreg = new SectionList()
  allaxonreg = new SectionList()
  regaxon = new SectionList()
  for ward = 0, 0 axon[ward] {
    regaxon.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.append()
  }
  regGCL = new SectionList()
  for ward = 0, 16 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 22 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 19 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 14 adendOML[ward] {
    regadendOML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regsoma = new SectionList()
  for ward = 0, 2 soma[ward] {
    regsoma.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regaxonh = new SectionList()
  for ward = 0, 0 axonh[ward] {
    regaxonh.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.append()
  }
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access axon
proc init() {
  celldef()
}

endtemplate cell_rat_mGC_Claiborne_06