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_07

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[2]
create adendIML[18]
create adendMML[16]
create adendOML[12]
create soma[4]
create axonh[1]

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-6.48049029161352, 21.2018450102206, 0, 10.5)
    pt3dadd(-6.48039029161352, 21.2018450102206, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-6.48039029161352, 21.2018450102206, 0, 10.4043260233424)
    pt3dadd(-6.70863104724699, 22.1749415522341, 0.0314527803086418, 10.4043260233424)
    pt3dadd(-6.93687180288046, 23.1480380942476, 0.0629055606172837, 10.1118742080783)
    pt3dadd(-7.16511255851393, 24.1211346362612, 0.0943583409259255, 9.60468635614927)
    pt3dadd(-7.39335331414741, 25.0942311782747, 0.125811121234567, 8.84590300647707)
    pt3dadd(-7.62159406978088, 26.0673277202883, 0.157263901543209, 7.76208734813001)
    pt3dadd(-7.84983482541435, 27.0404242623018, 0.188716681851851, 6.18465843842649)
    pt3dadd(-8.07807558104782, 28.0135208043154, 0.220169462160493, 3.5)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-8.07807558104782, 28.0135208043154, 0.220169462160493, 2.47906000584629)
    pt3dadd(-8.3063163366813, 28.9866173463289, 0.251622242469135, 2.47906000584629)
    pt3dadd(-8.53455709231477, 29.9597138883425, 0.283075022777777, 2.11125382662694)
    pt3dadd(-8.76279784794824, 30.932810430356, 0.314527803086418, 1.81011959652796)
    pt3dadd(-8.99103860358171, 31.9059069723695, 0.34598058339506, 1.56357174154146)
    pt3dadd(-9.21927935921518, 32.8790035143831, 0.377433363703702, 1.3617154305586)
    pt3dadd(-9.44752011484865, 33.8521000563966, 0.408886144012344, 1.19644946105406)
    pt3dadd(-9.67576087048213, 34.8251965984102, 0.440338924320986, 1.06114112938344)
    pt3dadd(-9.9040016261156, 35.7982931404237, 0.471791704629628, 0.950360037097033)
    pt3dadd(-10.1322423817491, 36.7713896824373, 0.50324448493827, 0.85966014998258)
    pt3dadd(-10.3604831373825, 37.7444862244508, 0.534697265246911, 0.785401363101277)
    pt3dadd(-10.588723893016, 38.7175827664644, 0.566150045555553, 0.72460341059529)
    pt3dadd(-10.8169646486495, 39.6906793084779, 0.597602825864195, 0.674826257154464)
    pt3dadd(-11.045205404283, 40.6637758504914, 0.629055606172837, 0.634072170831778)
    pt3dadd(-11.2734461599164, 41.636872392505, 0.660508386481479, 0.600705547045801)
    pt3dadd(-11.5016869155499, 42.6099689345185, 0.691961166790121, 0.573387266025838)
    pt3dadd(-11.7299276711834, 43.5830654765321, 0.723413947098763, 0.551020949233567)
    pt3dadd(-11.9581684268168, 44.5561620185456, 0.754866727407404, 0.532708957842651)
    pt3dadd(-12.1864091824503, 45.5292585605592, 0.786319507716046, 0.517716367340809)
    pt3dadd(-12.4146499380838, 46.5023551025727, 0.817772288024688, 0.505441472428646)
    pt3dadd(-12.6428906937173, 47.4754516445863, 0.84922506833333, 0.495391638473257)
    pt3dadd(-12.8711314493507, 48.4485481865998, 0.880677848641972, 0.487163530350653)
    pt3dadd(-13.0993722049842, 49.4216447286133, 0.912130628950614, 0.480426925191027)
    pt3dadd(-13.3276129606177, 50.3947412706269, 0.943583409259255, 0.474911459375497)
    pt3dadd(-13.5558537162512, 51.3678378126404, 0.975036189567897, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-13.5558537162512, 51.3678378126404, 0.975036189567897, 0.466698650595398)
    pt3dadd(-13.7840944718846, 52.340934354654, 1.00648896987654, 0.466698650595398)
    pt3dadd(-14.0123352275181, 53.3140308966675, 1.03794175018518, 0.463671698777356)
    pt3dadd(-14.2405759831516, 54.2871274386811, 1.06939453049382, 0.46119344023584)
    pt3dadd(-14.468816738785, 55.2602239806946, 1.10084731080246, 0.459164413753823)
    pt3dadd(-14.6970574944185, 56.2333205227082, 1.13230009111111, 0.457503187374186)
    pt3dadd(-14.925298250052, 57.2064170647217, 1.16375287141975, 0.456143090249352)
    pt3dadd(-15.1535390056855, 58.1795136067352, 1.19520565172839, 0.455029536906078)
    pt3dadd(-15.3817797613189, 59.1526101487488, 1.22665843203703, 0.454117836538747)
    pt3dadd(-15.6100205169524, 60.1257066907623, 1.25811121234567, 0.45337139941042)
    pt3dadd(-15.8382612725859, 61.0988032327759, 1.28956399265432, 0.45276026837822)
    pt3dadd(-16.0665020282193, 62.0718997747894, 1.32101677296296, 0.452259916607997)
    pt3dadd(-16.2947427838528, 63.044996316803, 1.3524695532716, 0.451850263226359)
    pt3dadd(-16.5229835394863, 64.0180928588165, 1.38392233358024, 0.45151486740471)
    pt3dadd(-16.7512242951198, 64.9911894008301, 1.41537511388888, 0.451240268531071)
    pt3dadd(-16.9794650507532, 65.9642859428436, 1.44682789419753, 0.451015445988463)
    pt3dadd(-17.2077058063867, 66.9373824848572, 1.47828067450617, 0.450831376858844)
    pt3dadd(-17.4359465620202, 67.9104790268707, 1.50973345481481, 0.450680673801733)
    pt3dadd(-17.6641873176536, 68.8835755688842, 1.54118623512345, 0.450557288574293)
    pt3dadd(-17.8924280732871, 69.8566721108978, 1.57263901543209, 0.450456269294113)
    pt3dadd(-18.1206688289206, 70.8297686529113, 1.60409179574073, 0.450373561702775)
    pt3dadd(-18.3489095845541, 71.8028651949249, 1.63554457604938, 0.450305846454234)
    pt3dadd(-18.5771503401875, 72.7759617369384, 1.66699735635802, 0.450250405897802)
    pt3dadd(-18.805391095821, 73.749058278952, 1.69845013666666, 0.450205015009282)
    pt3dadd(-19.0336318514545, 74.7221548209655, 1.7299029169753, 0.450167852092942)
    pt3dadd(-19.261872607088, 75.6952513629791, 1.76135569728394, 0.45013742567046)
    pt3dadd(-19.4901133627214, 76.6683479049926, 1.79280847759259, 0.450112514622668)
    pt3dadd(-19.7183541183549, 77.6414444470061, 1.82426125790123, 0.450092119181749)
    pt3dadd(-19.9465948739884, 78.6145409890197, 1.85571403820987, 0.450075420807047)
    pt3dadd(-20.1748356296218, 79.5876375310332, 1.88716681851851, 0.450061749334151)
    pt3dadd(-20.4030763852553, 80.5607340730468, 1.91861959882715, 0.450050556078851)
    pt3dadd(-20.6313171408888, 81.5338306150603, 1.95007237913579, 0.450041391816511)
    pt3dadd(-20.8595578965223, 82.5069271570739, 1.98152515944444, 0.450033888753103)
    pt3dadd(-21.0877986521557, 83.4800236990874, 2.01297793975308, 0.450027745764349)
    pt3dadd(-21.3160394077892, 84.4531202411009, 2.04443072006172, 0.45002271631054)
    pt3dadd(-21.5442801634227, 85.4262167831145, 2.07588350037036, 0.450018598542036)
    pt3dadd(-21.7725209190561, 86.399313325128, 2.107336280679, 0.450015227198327)
    pt3dadd(-22.0007616746896, 87.3724098671416, 2.13878906098765, 0.450012466975554)
    pt3dadd(-22.2290024303231, 88.3455064091551, 2.17024184129629, 0.450010207096284)
    pt3dadd(-22.4572431859566, 89.3186029511687, 2.20169462160493, 0.450008356863627)
    pt3dadd(-22.68548394159, 90.2916994931822, 2.23314740191357, 0.450006842021251)
    pt3dadd(-22.9137246972235, 91.2647960351958, 2.26460018222221, 0.450005601773211)
    pt3dadd(-23.141965452857, 92.2378925772093, 2.29605296253086, 0.450004586344)
    pt3dadd(-23.3702062084905, 93.2109891192228, 2.3275057428395, 0.450003754980877)
    pt3dadd(-23.5984469641239, 94.1840856612364, 2.35895852314814, 0.450003074318321)
    pt3dadd(-23.8266877197574, 95.1571822032499, 2.39041130345678, 0.450002517038954)
    pt3dadd(-24.0549284753909, 96.1302787452635, 2.42186408376542, 0.450002060777199)
    pt3dadd(-24.2831692310243, 97.103375287277, 2.45331686407406, 0.450001687221668)
    pt3dadd(-24.5114099866578, 98.0764718292906, 2.48476964438271, 0.450001381380267)
    pt3dadd(-24.7396507422913, 99.0495683713041, 2.51622242469135, 0.450001130978506)
    pt3dadd(-24.9678914979248, 100.022664913318, 2.54767520499999, 0.450000925966884)
    pt3dadd(-25.1961322535582, 100.995761455331, 2.57912798530863, 0.450000758117564)
    pt3dadd(-25.4243730091917, 101.968857997345, 2.61058076561727, 0.450000620694164)
    pt3dadd(-25.6526137648252, 102.941954539358, 2.64203354592592, 0.450000508181401)
    pt3dadd(-25.8808545204586, 103.915051081372, 2.67348632623456, 0.450000416063741)
    pt3dadd(-26.1090952760921, 104.888147623385, 2.7049391065432, 0.45000034064418)
    pt3dadd(-26.3373360317256, 105.861244165399, 2.73639188685184, 0.450000278895866)
    pt3dadd(-26.5655767873591, 106.834340707412, 2.76784466716048, 0.450000228340622)
    pt3dadd(-26.7938175429925, 107.807437249426, 2.79929744746912, 0.45000018694949)
    pt3dadd(-27.022058298626, 108.78053379144, 2.83075022777777, 0.450000153061296)
    pt3dadd(-27.2502990542595, 109.753630333453, 2.86220300808641, 0.45000012531599)
    pt3dadd(-27.4785398098929, 110.726726875467, 2.89365578839505, 0.450000102600055)
    pt3dadd(-27.7067805655264, 111.69982341748, 2.92510856870369, 0.450000084001821)
    pt3dadd(-27.9350213211599, 112.672919959494, 2.95656134901233, 0.450000068774874)
    pt3dadd(-28.1632620767934, 113.646016501507, 2.98801412932098, 0.450000056308104)
    pt3dadd(-28.3915028324268, 114.619113043521, 3.01946690962962, 0.450000046101177)
    pt3dadd(-28.6197435880603, 115.592209585534, 3.05091968993826, 0.450000037744451)
    pt3dadd(-28.8479843436938, 116.565306127548, 3.0823724702469, 0.450000030902543)
    pt3dadd(-29.0762250993273, 117.538402669561, 3.11382525055554, 0.450000025300862)
    pt3dadd(-29.3044658549607, 118.511499211575, 3.14527803086418, 0.450000020714594)
    pt3dadd(-29.5327066105942, 119.484595753589, 3.17673081117283, 0.450000016959675)
    pt3dadd(-29.7609473662277, 120.457692295602, 3.20818359148147, 0.450000013885408)
    pt3dadd(-29.9891881218611, 121.430788837616, 3.23963637179011, 0.45000001136841)
    pt3dadd(-30.2174288774946, 122.403885379629, 3.27108915209875, 0.450000009307667)
    pt3dadd(-30.4456696331281, 123.376981921643, 3.30254193240739, 0.450000007620473)
    pt3dadd(-30.6739103887616, 124.350078463656, 3.33399471271604, 0.450000006239116)
    pt3dadd(-30.902151144395, 125.32317500567, 3.36544749302468, 0.450000005108156)
    pt3dadd(-31.1303919000285, 126.296271547683, 3.39690027333332, 0.450000004182204)
    pt3dadd(-31.358632655662, 127.269368089697, 3.42835305364196, 0.450000003424099)
    pt3dadd(-31.5868734112954, 128.24246463171, 3.4598058339506, 0.450000002803415)
    pt3dadd(-31.8151141669289, 129.215561173724, 3.49125861425925, 0.450000002295242)
    pt3dadd(-32.0433549225624, 130.188657715738, 3.52271139456789, 0.450000001879186)
    pt3dadd(-32.2715956781959, 131.161754257751, 3.55416417487653, 0.450000001538547)
    pt3dadd(-32.4998364338293, 132.134850799765, 3.58561695518517, 0.450000001259656)
    pt3dadd(-32.7280771894628, 133.107947341778, 3.61706973549381, 0.450000001031319)
    pt3dadd(-32.9563179450963, 134.081043883792, 3.64852251580245, 0.450000000844373)
    pt3dadd(-33.1845587007298, 135.054140425805, 3.6799752961111, 0.450000000691314)
    pt3dadd(-33.4127994563632, 136.027236967819, 3.71142807641974, 0.450000000566)
    pt3dadd(-33.6410402119967, 137.000333509832, 3.74288085672838, 0.450000000463401)
    pt3dadd(-33.8692809676302, 137.973430051846, 3.77433363703702, 0.450000000379401)
    pt3dadd(-34.0975217232636, 138.946526593859, 3.80578641734566, 0.450000000310627)
    pt3dadd(-34.3257624788971, 139.919623135873, 3.83723919765431, 0.45000000025432)
    pt3dadd(-34.5540032345306, 140.892719677887, 3.86869197796295, 0.45000000020822)
    pt3dadd(-34.7822439901641, 141.8658162199, 3.90014475827159, 0.450000000170476)
    pt3dadd(-35.0104847457975, 142.838912761914, 3.93159753858023, 0.450000000139574)
    pt3dadd(-35.238725501431, 143.812009303927, 3.96305031888887, 0.450000000114273)
    pt3dadd(-35.4669662570645, 144.785105845941, 3.99450309919751, 0.450000000093559)
    pt3dadd(-35.6952070126979, 145.758202387954, 4.02595587950616, 0.4500000000766)
    pt3dadd(-35.9234477683314, 146.731298929968, 4.0574086598148, 0.450000000062715)
    pt3dadd(-36.1516885239649, 147.704395471981, 4.08886144012344, 0.450000000051346)
    pt3dadd(-36.3799292795984, 148.677492013995, 4.12031422043208, 0.450000000042039)
    pt3dadd(-36.6081700352318, 149.650588556008, 4.15176700074072, 0.450000000034418)
    pt3dadd(-36.8364107908653, 150.623685098022, 4.18321978104937, 0.450000000028179)
    pt3dadd(-37.0646515464988, 151.596781640036, 4.21467256135801, 0.450000000023071)
    pt3dadd(-37.2928923021323, 152.569878182049, 4.24612534166665, 0.450000000018889)
    pt3dadd(-37.5211330577657, 153.542974724063, 4.27757812197529, 0.450000000015465)
    pt3dadd(-37.7493738133992, 154.516071266076, 4.30903090228393, 0.450000000012662)
    pt3dadd(-37.9776145690327, 155.48916780809, 4.34048368259258, 0.450000000010367)
    pt3dadd(-38.2058553246661, 156.462264350103, 4.37193646290122, 0.450000000008488)
    pt3dadd(-38.4340960802996, 157.435360892117, 4.40338924320986, 0.450000000006949)
    pt3dadd(-38.6623368359331, 158.40845743413, 4.4348420235185, 0.450000000005689)
    pt3dadd(-38.8905775915666, 159.381553976144, 4.46629480382714, 0.450000000004658)
    pt3dadd(-39.1188183472, 160.354650518157, 4.49774758413578, 0.450000000003814)
    pt3dadd(-39.3470591028335, 161.327747060171, 4.52920036444443, 0.450000000003122)
    pt3dadd(-39.575299858467, 162.300843602185, 4.56065314475307, 0.450000000002556)
    pt3dadd(-39.8035406141004, 163.273940144198, 4.59210592506171, 0.450000000002093)
    pt3dadd(-40.0317813697339, 164.247036686212, 4.62355870537035, 0.450000000001714)
    pt3dadd(-40.2600221253674, 165.220133228225, 4.65501148567899, 0.450000000001403)
    pt3dadd(-40.4882628810009, 166.193229770239, 4.68646426598764, 0.450000000001149)
    pt3dadd(-40.7165036366343, 167.166326312252, 4.71791704629628, 0.45000000000094)
    pt3dadd(-40.9447443922678, 168.139422854266, 4.74936982660492, 0.45000000000077)
    pt3dadd(-41.1729851479013, 169.112519396279, 4.78082260691356, 0.45000000000063)
    pt3dadd(-41.4012259035347, 170.085615938293, 4.8122753872222, 0.450000000000516)
    pt3dadd(-41.6294666591682, 171.058712480306, 4.84372816753084, 0.450000000000423)
    pt3dadd(-41.8577074148017, 172.03180902232, 4.87518094783949, 0.450000000000346)
    pt3dadd(-42.0859481704352, 173.004905564334, 4.90663372814813, 0.450000000000283)
    pt3dadd(-42.3141889260686, 173.978002106347, 4.93808650845677, 0.450000000000232)
    pt3dadd(-42.5424296817021, 174.951098648361, 4.96953928876541, 0.45000000000019)
    pt3dadd(-42.7706704373356, 175.924195190374, 5.00099206907405, 0.450000000000155)
    pt3dadd(-42.998911192969, 176.897291732388, 5.0324448493827, 0.450000000000127)
    pt3dadd(-43.2271519486025, 177.870388274401, 5.06389762969134, 0.450000000000104)
    pt3dadd(-43.455392704236, 178.843484816415, 5.09535040999998, 0.450000000000085)
    pt3dadd(-43.6836334598695, 179.816581358428, 5.12680319030862, 0.45000000000007)
    pt3dadd(-43.9118742155029, 180.789677900442, 5.15825597061726, 0.450000000000057)
    pt3dadd(-44.1401149711364, 181.762774442455, 5.18970875092591, 0.450000000000047)
    pt3dadd(-44.3683557267699, 182.735870984469, 5.22116153123455, 0.450000000000038)
    pt3dadd(-44.5965964824034, 183.708967526483, 5.25261431154319, 0.450000000000031)
    pt3dadd(-44.8248372380368, 184.682064068496, 5.28406709185183, 0.450000000000026)
    pt3dadd(-45.0530779936703, 185.65516061051, 5.31551987216047, 0.450000000000021)
    pt3dadd(-45.2813187493038, 186.628257152523, 5.34697265246911, 0.450000000000017)
    pt3dadd(-45.5095595049372, 187.601353694537, 5.37842543277776, 0.450000000000014)
    pt3dadd(-45.7378002605707, 188.57445023655, 5.4098782130864, 0.450000000000012)
    pt3dadd(-45.9660410162042, 189.547546778564, 5.44133099339504, 0.450000000000009)
    pt3dadd(-46.1942817718377, 190.520643320577, 5.47278377370368, 0.450000000000008)
    pt3dadd(-46.4225225274711, 191.493739862591, 5.50423655401232, 0.450000000000006)
    pt3dadd(-46.6507632831046, 192.466836404604, 5.53568933432097, 0.450000000000005)
    pt3dadd(-46.8790040387381, 193.439932946618, 5.56714211462961, 0.450000000000004)
    pt3dadd(-47.1072447943715, 194.413029488631, 5.59859489493825, 0.450000000000004)
    pt3dadd(-47.335485550005, 195.386126030645, 5.63004767524689, 0.450000000000003)
    pt3dadd(-47.5637263056385, 196.359222572659, 5.66150045555553, 0.450000000000002)
    pt3dadd(-47.791967061272, 197.332319114672, 5.69295323586417, 0.450000000000002)
    pt3dadd(-48.0202078169054, 198.305415656686, 5.72440601617282, 0.450000000000002)
    pt3dadd(-48.2484485725389, 199.278512198699, 5.75585879648146, 0.450000000000001)
    pt3dadd(-48.4766893281724, 200.251608740713, 5.7873115767901, 0.450000000000001)
    pt3dadd(-48.7049300838058, 201.224705282726, 5.81876435709874, 0.450000000000001)
    pt3dadd(-48.9331708394393, 202.19780182474, 5.85021713740738, 0.450000000000001)
    pt3dadd(-49.1614115950728, 203.170898366753, 5.88166991771603, 0.450000000000001)
    pt3dadd(-49.3896523507063, 204.143994908767, 5.91312269802467, 0.45)
    pt3dadd(-49.6178931063397, 205.11709145078, 5.94457547833331, 0.45)
    pt3dadd(-49.8461338619732, 206.090187992794, 5.97602825864195, 0.45)
    pt3dadd(-50.0743746176067, 207.063284534808, 6.00748103895059, 0.45)
    pt3dadd(-50.3026153732402, 208.036381076821, 6.03893381925923, 0.45)
    pt3dadd(-50.5308561288736, 209.009477618835, 6.07038659956788, 0.45)
    pt3dadd(-50.7590968845071, 209.982574160848, 6.10183937987652, 0.45)
    pt3dadd(-50.9873376401406, 210.955670702862, 6.13329216018516, 0.45)
    pt3dadd(-51.215578395774, 211.928767244875, 6.1647449404938, 0.45)
    pt3dadd(-51.4438191514075, 212.901863786889, 6.19619772080244, 0.45)
    pt3dadd(-51.672059907041, 213.874960328902, 6.22765050111109, 0.45)
    pt3dadd(-51.9003006626745, 214.848056870916, 6.25910328141973, 0.45)
    pt3dadd(-52.1285414183079, 215.821153412929, 6.29055606172837, 0.45)
    pt3dadd(-52.3567821739414, 216.794249954943, 6.32200884203701, 0.45)
    pt3dadd(-52.5850229295749, 217.767346496957, 6.35346162234565, 0.45)
    pt3dadd(-52.8132636852083, 218.74044303897, 6.3849144026543, 0.45)
    pt3dadd(-53.0415044408418, 219.713539580984, 6.41636718296294, 0.45)
    pt3dadd(-53.2697451964753, 220.686636122997, 6.44781996327158, 0.45)
    pt3dadd(-53.4979859521088, 221.659732665011, 6.47927274358022, 0.45)
    pt3dadd(-53.7262267077422, 222.632829207024, 6.51072552388886, 0.45)
    pt3dadd(-53.9544674633757, 223.605925749038, 6.5421783041975, 0.45)
    pt3dadd(-54.1827082190092, 224.579022291051, 6.57363108450615, 0.45)
    pt3dadd(-54.4109489746427, 225.552118833065, 6.60508386481479, 0.45)
    pt3dadd(-54.6391897302761, 226.525215375078, 6.63653664512343, 0.45)
    pt3dadd(-54.8674304859096, 227.498311917092, 6.66798942543207, 0.45)
    pt3dadd(-55.0956712415431, 228.471408459106, 6.69944220574071, 0.45)
    pt3dadd(-55.3239119971765, 229.444505001119, 6.73089498604936, 0.45)
    pt3dadd(-55.55215275281, 230.417601543133, 6.762347766358, 0.45)
    pt3dadd(-55.7803935084435, 231.390698085146, 6.79380054666664, 0.45)
    pt3dadd(-56.008634264077, 232.36379462716, 6.82525332697528, 0.45)
    pt3dadd(-56.2368750197104, 233.336891169173, 6.85670610728392, 0.45)
    pt3dadd(-56.4651157753439, 234.309987711187, 6.88815888759256, 0.45)
    pt3dadd(-56.6933565309774, 235.2830842532, 6.91961166790121, 0.45)
    pt3dadd(-56.9215972866108, 236.256180795214, 6.95106444820985, 0.45)
    pt3dadd(-57.1498380422443, 237.229277337227, 6.98251722851849, 0.45)
    pt3dadd(-57.3780787978778, 238.202373879241, 7.01397000882713, 0.45)
    pt3dadd(-57.6063195535113, 239.175470421255, 7.04542278913577, 0.45)
    pt3dadd(-57.8345603091447, 240.148566963268, 7.07687556944442, 0.45)
    pt3dadd(-58.0628010647782, 241.121663505282, 7.10832834975306, 0.45)
    pt3dadd(-58.2910418204117, 242.094760047295, 7.1397811300617, 0.45)
    pt3dadd(-58.5192825760452, 243.067856589309, 7.17123391037034, 0.45)
    pt3dadd(-58.7475233316786, 244.040953131322, 7.20268669067898, 0.45)
    pt3dadd(-58.9757640873121, 245.014049673336, 7.23413947098762, 0.45)
    pt3dadd(-59.2040048429456, 245.987146215349, 7.26559225129627, 0.45)
    pt3dadd(-59.432245598579, 246.960242757363, 7.29704503160491, 0.45)
    pt3dadd(-59.6604863542125, 247.933339299376, 7.32849781191355, 0.45)
    pt3dadd(-59.888727109846, 248.90643584139, 7.35995059222219, 0.45)
    pt3dadd(-60.1169678654795, 249.879532383404, 7.39140337253083, 0.45)
    pt3dadd(-60.3452086211129, 250.852628925417, 7.42285615283948, 0.45)
    pt3dadd(-60.5734493767464, 251.825725467431, 7.45430893314812, 0.45)
    pt3dadd(-60.8016901323799, 252.798822009444, 7.48576171345676, 0.45)
    pt3dadd(-61.0299308880133, 253.771918551458, 7.5172144937654, 0.45)
    pt3dadd(-61.2581716436468, 254.745015093471, 7.54866727407404, 0.45)
    pt3dadd(-61.4864123992803, 255.718111635485, 7.58012005438269, 0.45)
    pt3dadd(-61.7146531549138, 256.691208177498, 7.61157283469133, 0.45)
    pt3dadd(-61.9428939105472, 257.664304719512, 7.64302561499997, 0.45)
    pt3dadd(-62.1711346661807, 258.637401261525, 7.67447839530861, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-62.3993754218142, 259.610497803539, 7.70593117561725, 0.45)
    pt3dadd(-62.6276161774476, 260.583594345553, 7.73738395592589, 0.45)
    pt3dadd(-62.8558569330811, 261.556690887566, 7.76883673623454, 0.45)
    pt3dadd(-63.0840976887146, 262.52978742958, 7.80028951654318, 0.45)
    pt3dadd(-63.3123384443481, 263.502883971593, 7.83174229685182, 0.45)
    pt3dadd(-63.5405791999815, 264.475980513607, 7.86319507716046, 0.45)
    pt3dadd(-63.768819955615, 265.44907705562, 7.8946478574691, 0.45)
    pt3dadd(-63.9970607112485, 266.422173597634, 7.92610063777775, 0.45)
    pt3dadd(-64.225301466882, 267.395270139647, 7.95755341808639, 0.45)
    pt3dadd(-64.4535422225154, 268.368366681661, 7.98900619839503, 0.45)
    pt3dadd(-64.6817829781489, 269.341463223674, 8.02045897870367, 0.45)
    pt3dadd(-64.9100237337824, 270.314559765688, 8.05191175901231, 0.45)
    pt3dadd(-65.1382644894158, 271.287656307701, 8.08336453932096, 0.45)
    pt3dadd(-65.3665052450493, 272.260752849715, 8.1148173196296, 0.45)
    pt3dadd(-65.5947460006828, 273.233849391729, 8.14627009993824, 0.45)
    pt3dadd(-65.8229867563163, 274.206945933742, 8.17772288024688, 0.45)
    pt3dadd(-66.0512275119497, 275.180042475756, 8.20917566055552, 0.45)
    pt3dadd(-66.2794682675832, 276.153139017769, 8.24062844086416, 0.45)
    pt3dadd(-66.5077090232167, 277.126235559783, 8.27208122117281, 0.45)
    pt3dadd(-66.7359497788501, 278.099332101796, 8.30353400148145, 0.45)
    pt3dadd(-66.9641905344836, 279.07242864381, 8.33498678179009, 0.45)
    pt3dadd(-67.1924312901171, 280.045525185823, 8.36643956209873, 0.45)
    pt3dadd(-67.4206720457506, 281.018621727837, 8.39789234240737, 0.45)
    pt3dadd(-67.648912801384, 281.99171826985, 8.42934512271601, 0.45)
    pt3dadd(-67.8771535570175, 282.964814811864, 8.46079790302466, 0.45)
    pt3dadd(-68.105394312651, 283.937911353878, 8.4922506833333, 0.45)
    pt3dadd(-68.3336350682845, 284.911007895891, 8.52370346364194, 0.45)
    pt3dadd(-68.5618758239179, 285.884104437905, 8.55515624395058, 0.45)
    pt3dadd(-68.7901165795514, 286.857200979918, 8.58660902425923, 0.45)
    pt3dadd(-69.0183573351849, 287.830297521932, 8.61806180456787, 0.45)
    pt3dadd(-69.2465980908183, 288.803394063945, 8.64951458487651, 0.45)
    pt3dadd(-69.4748388464518, 289.776490605959, 8.68096736518515, 0.45)
    pt3dadd(-69.7030796020853, 290.749587147972, 8.71242014549379, 0.45)
    pt3dadd(-69.9313203577188, 291.722683689986, 8.74387292580243, 0.45)
    pt3dadd(-70.1595611133522, 292.695780231999, 8.77532570611108, 0.45)
    pt3dadd(-70.3878018689857, 293.668876774013, 8.80677848641972, 0.45)
    pt3dadd(-70.6160426246192, 294.641973316027, 8.83823126672836, 0.45)
    pt3dadd(-70.8442833802526, 295.61506985804, 8.869684047037, 0.45)
    pt3dadd(-71.0725241358861, 296.588166400054, 8.90113682734564, 0.45)
    pt3dadd(-71.3007648915196, 297.561262942067, 8.93258960765428, 0.45)
    pt3dadd(-71.5290056471531, 298.534359484081, 8.96404238796293, 0.45)
    pt3dadd(-71.7572464027865, 299.507456026094, 8.99549516827157, 0.45)
    pt3dadd(-71.98548715842, 300.480552568108, 9.02694794858021, 0.45)
    pt3dadd(-72.2137279140535, 301.453649110121, 9.05840072888885, 0.45)
    pt3dadd(-72.4419686696869, 302.426745652135, 9.08985350919749, 0.45)
    pt3dadd(-72.6702094253204, 303.399842194148, 9.12130628950614, 0.45)
    pt3dadd(-72.8984501809539, 304.372938736162, 9.15275906981478, 0.45)
    pt3dadd(-73.1266909365874, 305.346035278176, 9.18421185012342, 0.45)
    pt3dadd(-73.3549316922208, 306.319131820189, 9.21566463043206, 0.45)
    pt3dadd(-73.5831724478543, 307.292228362203, 9.2471174107407, 0.45)
    pt3dadd(-73.8114132034878, 308.265324904216, 9.27857019104935, 0.45)
    pt3dadd(-74.0396539591213, 309.23842144623, 9.31002297135799, 0.45)
    pt3dadd(-74.2678947147547, 310.211517988243, 9.34147575166663, 0.45)
    pt3dadd(-74.4961354703882, 311.184614530257, 9.37292853197527, 0.45)
    pt3dadd(-74.7243762260217, 312.15771107227, 9.40438131228391, 0.45)
    pt3dadd(-74.9526169816551, 313.130807614284, 9.43583409259255, 0.45)
    pt3dadd(-75.1808577372886, 314.103904156297, 9.4672868729012, 0.45)
    pt3dadd(-75.4090984929221, 315.077000698311, 9.49873965320984, 0.45)
    pt3dadd(-75.6373392485555, 316.050097240325, 9.53019243351848, 0.45)
    pt3dadd(-75.865580004189, 317.023193782338, 9.56164521382712, 0.45)
    pt3dadd(-76.0938207598225, 317.996290324352, 9.59309799413576, 0.45)
    pt3dadd(-76.322061515456, 318.969386866365, 9.6245507744444, 0.45)
    pt3dadd(-76.5503022710894, 319.942483408379, 9.65600355475305, 0.45)
    pt3dadd(-76.7785430267229, 320.915579950392, 9.68745633506169, 0.45)
    pt3dadd(-77.0067837823564, 321.888676492406, 9.71890911537033, 0.45)
    pt3dadd(-77.2350245379899, 322.861773034419, 9.75036189567897, 0.45)
    pt3dadd(-77.4632652936233, 323.834869576433, 9.78181467598762, 0.45)
    pt3dadd(-77.6915060492568, 324.807966118446, 9.81326745629626, 0.45)
    pt3dadd(-77.9197468048903, 325.78106266046, 9.8447202366049, 0.45)
    pt3dadd(-78.1479875605237, 326.754159202474, 9.87617301691354, 0.45)
    pt3dadd(-78.3762283161572, 327.727255744487, 9.90762579722218, 0.45)
    pt3dadd(-78.6044690717907, 328.700352286501, 9.93907857753082, 0.45)
    pt3dadd(-78.8327098274242, 329.673448828514, 9.97053135783947, 0.45)
    pt3dadd(-79.0609505830576, 330.646545370528, 10.0019841381481, 0.45)
    pt3dadd(-79.2891913386911, 331.619641912541, 10.0334369184567, 0.45)
    pt3dadd(-79.5174320943246, 332.592738454555, 10.0648896987654, 0.45)
    pt3dadd(-79.7456728499581, 333.565834996568, 10.096342479074, 0.45)
    pt3dadd(-79.9739136055915, 334.538931538582, 10.1277952593827, 0.45)
    pt3dadd(-80.202154361225, 335.512028080595, 10.1592480396913, 0.45)
    pt3dadd(-80.4303951168585, 336.485124622609, 10.19070082, 0.45)
    pt3dadd(-80.6586358724919, 337.458221164623, 10.2221536003086, 0.45)
    pt3dadd(-80.8868766281254, 338.431317706636, 10.2536063806172, 0.45)
    pt3dadd(-81.1151173837589, 339.40441424865, 10.2850591609259, 0.45)
    pt3dadd(-81.3433581393924, 340.377510790663, 10.3165119412345, 0.45)
    pt3dadd(-81.5715988950258, 341.350607332677, 10.3479647215432, 0.45)
    pt3dadd(-81.7998396506593, 342.32370387469, 10.3794175018518, 0.45)
    pt3dadd(-82.0280804062928, 343.296800416704, 10.4108702821605, 0.45)
    pt3dadd(-82.2563211619262, 344.269896958717, 10.4423230624691, 0.45)
    pt3dadd(-82.4845619175597, 345.242993500731, 10.4737758427777, 0.45)
    pt3dadd(-82.7128026731932, 346.216090042744, 10.5052286230864, 0.45)
    pt3dadd(-82.9410434288267, 347.189186584758, 10.536681403395, 0.45)
    pt3dadd(-83.1692841844601, 348.162283126772, 10.5681341837037, 0.45)
    pt3dadd(-83.3975249400936, 349.135379668785, 10.5995869640123, 0.45)
    pt3dadd(-83.6257656957271, 350.108476210799, 10.6310397443209, 0.45)
    pt3dadd(-83.8540064513605, 351.081572752812, 10.6624925246296, 0.45)
    pt3dadd(-84.082247206994, 352.054669294826, 10.6939453049382, 0.45)
    pt3dadd(-84.3104879626275, 353.027765836839, 10.7253980852469, 0.45)
    pt3dadd(-84.538728718261, 354.000862378853, 10.7568508655555, 0.45)
    pt3dadd(-84.7669694738944, 354.973958920866, 10.7883036458642, 0.45)
    pt3dadd(-84.9952102295279, 355.94705546288, 10.8197564261728, 0.45)
    pt3dadd(-85.2234509851614, 356.920152004893, 10.8512092064814, 0.45)
    pt3dadd(-85.4516917407949, 357.893248546907, 10.8826619867901, 0.45)
    pt3dadd(-85.6799324964283, 358.866345088921, 10.9141147670987, 0.45)
    pt3dadd(-85.9081732520618, 359.839441630934, 10.9455675474074, 0.45)
    pt3dadd(-86.1364140076953, 360.812538172948, 10.977020327716, 0.45)
    pt3dadd(-86.3646547633287, 361.785634714961, 11.0084731080246, 0.45)
    pt3dadd(-86.5928955189622, 362.758731256975, 11.0399258883333, 0.45)
    pt3dadd(-86.8211362745957, 363.731827798988, 11.0713786686419, 0.45)
    pt3dadd(-87.0493770302292, 364.704924341002, 11.1028314489506, 0.45)
    pt3dadd(-87.2776177858626, 365.678020883015, 11.1342842292592, 0.45)
    pt3dadd(-87.5058585414961, 366.651117425029, 11.1657370095679, 0.45)
    pt3dadd(-87.7340992971296, 367.624213967042, 11.1971897898765, 0.45)
    pt3dadd(-87.962340052763, 368.597310509056, 11.2286425701851, 0.45)
    pt3dadd(-88.1905808083965, 369.570407051069, 11.2600953504938, 0.45)
    pt3dadd(-88.41882156403, 370.543503593083, 11.2915481308024, 0.45)
    pt3dadd(-88.6470623196635, 371.516600135097, 11.3230009111111, 0.45)
    pt3dadd(-88.8753030752969, 372.48969667711, 11.3544536914197, 0.45)
    pt3dadd(-89.1035438309304, 373.462793219124, 11.3859064717283, 0.45)
    pt3dadd(-89.3317845865639, 374.435889761137, 11.417359252037, 0.45)
    pt3dadd(-89.5600253421973, 375.408986303151, 11.4488120323456, 0.45)
    pt3dadd(-89.7882660978308, 376.382082845164, 11.4802648126543, 0.45)
    pt3dadd(-90.0165068534643, 377.355179387178, 11.5117175929629, 0.45)
    pt3dadd(-90.2447476090978, 378.328275929191, 11.5431703732716, 0.45)
    pt3dadd(-90.4729883647312, 379.301372471205, 11.5746231535802, 0.45)
    pt3dadd(-90.7012291203647, 380.274469013218, 11.6060759338888, 0.45)
    pt3dadd(-90.9294698759982, 381.247565555232, 11.6375287141975, 0.45)
    pt3dadd(-91.1577106316317, 382.220662097246, 11.6689814945061, 0.45)
    pt3dadd(-91.3859513872651, 383.193758639259, 11.7004342748148, 0.45)
    pt3dadd(-91.6141921428986, 384.166855181273, 11.7318870551234, 0.45)
    pt3dadd(-91.8424328985321, 385.139951723286, 11.7633398354321, 0.45)
    pt3dadd(-92.0706736541655, 386.1130482653, 11.7947926157407, 0.45)
    pt3dadd(-92.298914409799, 387.086144807313, 11.8262453960493, 0.45)
    pt3dadd(-92.5271551654325, 388.059241349327, 11.857698176358, 0.45)
    pt3dadd(-92.755395921066, 389.03233789134, 11.8891509566666, 0.45)
    pt3dadd(-92.9836366766994, 390.005434433354, 11.9206037369753, 0.45)
    pt3dadd(-93.2118774323329, 390.978530975368, 11.9520565172839, 0.45)
    pt3dadd(-93.4401181879664, 391.951627517381, 11.9835092975925, 0.45)
    pt3dadd(-93.6683589435998, 392.924724059395, 12.0149620779012, 0.45)
    pt3dadd(-93.8965996992333, 393.897820601408, 12.0464148582098, 0.45)
    pt3dadd(-94.1248404548668, 394.870917143422, 12.0778676385185, 0.45)
    pt3dadd(-94.3530812105003, 395.844013685435, 12.1093204188271, 0.45)
    pt3dadd(-94.5813219661337, 396.817110227449, 12.1407731991358, 0.45)
    pt3dadd(-94.8095627217672, 397.790206769462, 12.1722259794444, 0.45)
    pt3dadd(-95.0378034774007, 398.763303311476, 12.203678759753, 0.45)
    pt3dadd(-95.2660442330342, 399.736399853489, 12.2351315400617, 0.45)
    pt3dadd(-95.4942849886676, 400.709496395503, 12.2665843203703, 0.45)
    pt3dadd(-95.7225257443011, 401.682592937516, 12.298037100679, 0.45)
    pt3dadd(-95.9507664999346, 402.65568947953, 12.3294898809876, 0.45)
    pt3dadd(-96.179007255568, 403.628786021544, 12.3609426612962, 0.45)
    pt3dadd(-96.4072480112015, 404.601882563557, 12.3923954416049, 0.45)
    pt3dadd(-96.635488766835, 405.574979105571, 12.4238482219135, 0.45)
    pt3dadd(-96.8637295224685, 406.548075647584, 12.4553010022222, 0.45)
    pt3dadd(-97.0919702781019, 407.521172189598, 12.4867537825308, 0.45)
    pt3dadd(-97.3202110337354, 408.494268731611, 12.5182065628395, 0.45)
    pt3dadd(-97.5484517893689, 409.467365273625, 12.5496593431481, 0.45)
    pt3dadd(-97.7766925450023, 410.440461815638, 12.5811121234567, 0.45)
    pt3dadd(-98.0049333006358, 411.413558357652, 12.6125649037654, 0.45)
    pt3dadd(-98.2331740562693, 412.386654899665, 12.644017684074, 0.45)
    pt3dadd(-98.4614148119028, 413.359751441679, 12.6754704643827, 0.45)
    pt3dadd(-98.6896555675362, 414.332847983693, 12.7069232446913, 0.45)
    pt3dadd(-98.9178963231697, 415.305944525706, 12.7383760249999, 0.45)
    pt3dadd(-99.1461370788032, 416.27904106772, 12.7698288053086, 0.45)
    pt3dadd(-99.3743778344366, 417.252137609733, 12.8012815856172, 0.45)
    pt3dadd(-99.6026185900701, 418.225234151747, 12.8327343659259, 0.45)
    pt3dadd(-99.8308593457036, 419.19833069376, 12.8641871462345, 0.45)
    pt3dadd(-100.059100101337, 420.171427235774, 12.8956399265432, 0.45)
    pt3dadd(-100.287340856971, 421.144523777787, 12.9270927068518, 0.45)
    pt3dadd(-100.515581612604, 422.117620319801, 12.9585454871604, 0.45)
    pt3dadd(-100.743822368237, 423.090716861814, 12.9899982674691, 0.45)
    pt3dadd(-100.972063123871, 424.063813403828, 13.0214510477777, 0.45)
    pt3dadd(-101.200303879504, 425.036909945842, 13.0529038280864, 0.45)
    pt3dadd(-101.428544635138, 426.010006487855, 13.084356608395, 0.45)
    pt3dadd(-101.656785390771, 426.983103029869, 13.1158093887037, 0.45)
    pt3dadd(-101.885026146405, 427.956199571882, 13.1472621690123, 0.45)
    pt3dadd(-102.113266902038, 428.929296113896, 13.1787149493209, 0.45)
    pt3dadd(-102.341507657672, 429.902392655909, 13.2101677296296, 0.45)
    pt3dadd(-102.569748413305, 430.875489197923, 13.2416205099382, 0.45)
    pt3dadd(-102.797989168939, 431.848585739936, 13.2730732902469, 0.45)
    pt3dadd(-103.026229924572, 432.82168228195, 13.3045260705555, 0.45)
    pt3dadd(-103.254470680206, 433.794778823963, 13.3359788508641, 0.45)
    pt3dadd(-103.482711435839, 434.767875365977, 13.3674316311728, 0.45)
    pt3dadd(-103.710952191473, 435.740971907991, 13.3988844114814, 0.45)
    pt3dadd(-103.939192947106, 436.714068450004, 13.4303371917901, 0.45)
    pt3dadd(-104.16743370274, 437.687164992018, 13.4617899720987, 0.45)
    pt3dadd(-104.395674458373, 438.660261534031, 13.4932427524074, 0.45)
    pt3dadd(-104.623915214007, 439.633358076045, 13.524695532716, 0.45)
    pt3dadd(-104.85215596964, 440.606454618058, 13.5561483130246, 0.45)
    pt3dadd(-105.080396725273, 441.579551160072, 13.5876010933333, 0.45)
    pt3dadd(-105.308637480907, 442.552647702085, 13.6190538736419, 0.45)
    pt3dadd(-105.53687823654, 443.525744244099, 13.6505066539506, 0.45)
    pt3dadd(-105.765118992174, 444.498840786112, 13.6819594342592, 0.45)
    pt3dadd(-105.993359747807, 445.471937328126, 13.7134122145678, 0.45)
    pt3dadd(-106.221600503441, 446.44503387014, 13.7448649948765, 0.45)
    pt3dadd(-106.449841259074, 447.418130412153, 13.7763177751851, 0.45)
    pt3dadd(-106.678082014708, 448.391226954167, 13.8077705554938, 0.45)
    pt3dadd(-106.906322770341, 449.36432349618, 13.8392233358024, 0.45)
    pt3dadd(-107.134563525975, 450.337420038194, 13.8706761161111, 0.45)
    pt3dadd(-107.362804281608, 451.310516580207, 13.9021288964197, 0.45)
    pt3dadd(-107.591045037242, 452.283613122221, 13.9335816767283, 0.45)
    pt3dadd(-107.819285792875, 453.256709664234, 13.965034457037, 0.45)
    pt3dadd(-108.047526548509, 454.229806206248, 13.9964872373456, 0.45)
    pt3dadd(-108.275767304142, 455.202902748261, 14.0279400176543, 0.45)
    pt3dadd(-108.504008059776, 456.175999290275, 14.0593927979629, 0.45)
    pt3dadd(-108.732248815409, 457.149095832289, 14.0908455782715, 0.45)
    pt3dadd(-108.960489571042, 458.122192374302, 14.1222983585802, 0.45)
    pt3dadd(-109.188730326676, 459.095288916316, 14.1537511388888, 0.45)
    pt3dadd(-109.416971082309, 460.068385458329, 14.1852039191975, 0.45)
    pt3dadd(-109.645211837943, 461.041482000343, 14.2166566995061, 0.45)
    pt3dadd(-109.873452593576, 462.014578542356, 14.2481094798148, 0.45)
    pt3dadd(-110.10169334921, 462.98767508437, 14.2795622601234, 0.45)
    pt3dadd(-110.329934104843, 463.960771626383, 14.311015040432, 0.45)
    pt3dadd(-110.558174860477, 464.933868168397, 14.3424678207407, 0.45)
    pt3dadd(-110.78641561611, 465.90696471041, 14.3739206010493, 0.45)
    pt3dadd(-111.014656371744, 466.880061252424, 14.405373381358, 0.45)
    pt3dadd(-111.242897127377, 467.853157794437, 14.4368261616666, 0.45)
    pt3dadd(-111.471137883011, 468.826254336451, 14.4682789419753, 0.45)
    pt3dadd(-111.699378638644, 469.799350878465, 14.4997317222839, 0.45)
    pt3dadd(-111.927619394278, 470.772447420478, 14.5311845025925, 0.45)
    pt3dadd(-112.155860149911, 471.745543962492, 14.5626372829012, 0.45)
    pt3dadd(-112.384100905545, 472.718640504505, 14.5940900632098, 0.45)
    pt3dadd(-112.612341661178, 473.691737046519, 14.6255428435185, 0.45)
    pt3dadd(-112.840582416812, 474.664833588532, 14.6569956238271, 0.45)
    pt3dadd(-113.068823172445, 475.637930130546, 14.6884484041357, 0.45)
    pt3dadd(-113.297063928078, 476.611026672559, 14.7199011844444, 0.45)
    pt3dadd(-113.525304683712, 477.584123214573, 14.751353964753, 0.45)
    pt3dadd(-113.753545439345, 478.557219756587, 14.7828067450617, 0.45)
    pt3dadd(-113.981786194979, 479.5303162986, 14.8142595253703, 0.45)
    pt3dadd(-114.210026950612, 480.503412840614, 14.845712305679, 0.45)
    pt3dadd(-114.438267706246, 481.476509382627, 14.8771650859876, 0.45)
    pt3dadd(-114.666508461879, 482.449605924641, 14.9086178662962, 0.45)
    pt3dadd(-114.894749217513, 483.422702466654, 14.9400706466049, 0.45)
    pt3dadd(-115.122989973146, 484.395799008668, 14.9715234269135, 0.45)
    pt3dadd(-115.35123072878, 485.368895550681, 15.0029762072222, 0.45)
    pt3dadd(-115.579471484413, 486.341992092695, 15.0344289875308, 0.45)
    pt3dadd(-115.807712240047, 487.315088634708, 15.0658817678394, 0.45)
    pt3dadd(-116.03595299568, 488.288185176722, 15.0973345481481, 0.45)
    pt3dadd(-116.264193751314, 489.261281718735, 15.1287873284567, 0.45)
    pt3dadd(-116.492434506947, 490.234378260749, 15.1602401087654, 0.45)
    pt3dadd(-116.720675262581, 491.207474802763, 15.191692889074, 0.45)
    pt3dadd(-116.948916018214, 492.180571344776, 15.2231456693827, 0.45)
    pt3dadd(-117.177156773847, 493.15366788679, 15.2545984496913, 0.45)
    pt3dadd(-117.405397529481, 494.126764428803, 15.2860512299999, 0.45)
    pt3dadd(-117.633638285114, 495.099860970817, 15.3175040103086, 0.45)
    pt3dadd(-117.861879040748, 496.07295751283, 15.3489567906172, 0.45)
    pt3dadd(-118.090119796381, 497.046054054844, 15.3804095709259, 0.45)
    pt3dadd(-118.318360552015, 498.019150596857, 15.4118623512345, 0.45)
    pt3dadd(-118.546601307648, 498.992247138871, 15.4433151315431, 0.45)
    pt3dadd(-118.774842063282, 499.965343680884, 15.4747679118518, 0.45)
    pt3dadd(-119.003082818915, 500.938440222898, 15.5062206921604, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-119.231323574549, 501.911536764912, 15.5376734724691, 0.45)
    pt3dadd(-119.459564330182, 502.884633306925, 15.5691262527777, 0.45)
    pt3dadd(-119.687805085816, 503.857729848939, 15.6005790330864, 0.45)
    pt3dadd(-119.916045841449, 504.830826390952, 15.632031813395, 0.45)
    pt3dadd(-120.144286597083, 505.803922932966, 15.6634845937036, 0.45)
    pt3dadd(-120.372527352716, 506.777019474979, 15.6949373740123, 0.45)
    pt3dadd(-120.60076810835, 507.750116016993, 15.7263901543209, 0.45)
    pt3dadd(-120.829008863983, 508.723212559006, 15.7578429346296, 0.45)
    pt3dadd(-121.057249619617, 509.69630910102, 15.7892957149382, 0.45)
    pt3dadd(-121.28549037525, 510.669405643033, 15.8207484952469, 0.45)
    pt3dadd(-121.513731130883, 511.642502185047, 15.8522012755555, 0.45)
    pt3dadd(-121.741971886517, 512.615598727061, 15.8836540558641, 0.45)
    pt3dadd(-121.97021264215, 513.588695269074, 15.9151068361728, 0.45)
    pt3dadd(-122.198453397784, 514.561791811088, 15.9465596164814, 0.45)
    pt3dadd(-122.426694153417, 515.534888353101, 15.9780123967901, 0.45)
    pt3dadd(-122.654934909051, 516.507984895115, 16.0094651770987, 0.45)
    pt3dadd(-122.883175664684, 517.481081437128, 16.0409179574073, 0.45)
    pt3dadd(-123.111416420318, 518.454177979142, 16.072370737716, 0.45)
    pt3dadd(-123.339657175951, 519.427274521155, 16.1038235180246, 0.45)
    pt3dadd(-123.567897931585, 520.400371063169, 16.1352762983333, 0.45)
    pt3dadd(-123.796138687218, 521.373467605182, 16.1667290786419, 0.45)
    pt3dadd(-124.024379442852, 522.346564147196, 16.1981818589506, 0.45)
    pt3dadd(-124.252620198485, 523.31966068921, 16.2296346392592, 0.45)
    pt3dadd(-124.480860954119, 524.292757231223, 16.2610874195678, 0.45)
    pt3dadd(-124.709101709752, 525.265853773237, 16.2925401998765, 0.45)
    pt3dadd(-124.937342465386, 526.23895031525, 16.3239929801851, 0.45)
    pt3dadd(-125.165583221019, 527.212046857264, 16.3554457604938, 0.45)
    pt3dadd(-125.393823976652, 528.185143399277, 16.3868985408024, 0.45)
    pt3dadd(-125.622064732286, 529.158239941291, 16.418351321111, 0.45)
    pt3dadd(-125.850305487919, 530.131336483304, 16.4498041014197, 0.45)
    pt3dadd(-126.078546243553, 531.104433025318, 16.4812568817283, 0.45)
    pt3dadd(-126.306786999186, 532.077529567331, 16.512709662037, 0.45)
    pt3dadd(-126.53502775482, 533.050626109345, 16.5441624423456, 0.45)
    pt3dadd(-126.763268510453, 534.023722651359, 16.5756152226543, 0.45)
    pt3dadd(-126.991509266087, 534.996819193372, 16.6070680029629, 0.45)
    pt3dadd(-127.21975002172, 535.969915735386, 16.6385207832715, 0.45)
    pt3dadd(-127.447990777354, 536.943012277399, 16.6699735635802, 0.45)
    pt3dadd(-127.676231532987, 537.916108819413, 16.7014263438888, 0.45)
    pt3dadd(-127.904472288621, 538.889205361426, 16.7328791241975, 0.45)
    pt3dadd(-128.132713044254, 539.86230190344, 16.7643319045061, 0.45)
    pt3dadd(-128.360953799888, 540.835398445453, 16.7957846848147, 0.45)
    pt3dadd(-128.589194555521, 541.808494987467, 16.8272374651234, 0.45)
    pt3dadd(-128.817435311155, 542.78159152948, 16.858690245432, 0.45)
    pt3dadd(-129.045676066788, 543.754688071494, 16.8901430257407, 0.45)
    pt3dadd(-129.273916822422, 544.727784613508, 16.9215958060493, 0.45)
    pt3dadd(-129.502157578055, 545.700881155521, 16.953048586358, 0.45)
    pt3dadd(-129.730398333688, 546.673977697535, 16.9845013666666, 0.45)
    pt3dadd(-129.958639089322, 547.647074239548, 17.0159541469752, 0.45)
    pt3dadd(-130.186879844955, 548.620170781562, 17.0474069272839, 0.45)
    pt3dadd(-130.415120600589, 549.593267323575, 17.0788597075925, 0.45)
    pt3dadd(-130.643361356222, 550.566363865589, 17.1103124879012, 0.45)
    pt3dadd(-130.871602111856, 551.539460407602, 17.1417652682098, 0.45)
    pt3dadd(-131.099842867489, 552.512556949616, 17.1732180485185, 0.45)
    pt3dadd(-131.328083623123, 553.485653491629, 17.2046708288271, 0.45)
    pt3dadd(-131.556324378756, 554.458750033643, 17.2361236091357, 0.45)
    pt3dadd(-131.78456513439, 555.431846575656, 17.2675763894444, 0.45)
    pt3dadd(-132.012805890023, 556.40494311767, 17.299029169753, 0.45)
    pt3dadd(-132.241046645657, 557.378039659684, 17.3304819500617, 0.45)
    pt3dadd(-132.46928740129, 558.351136201697, 17.3619347303703, 0.45)
    pt3dadd(-132.697528156924, 559.324232743711, 17.3933875106789, 0.45)
    pt3dadd(-132.925768912557, 560.297329285724, 17.4248402909876, 0.45)
    pt3dadd(-133.154009668191, 561.270425827738, 17.4562930712962, 0.45)
    pt3dadd(-133.382250423824, 562.243522369751, 17.4877458516049, 0.45)
    pt3dadd(-133.610491179457, 563.216618911765, 17.5191986319135, 0.45)
    pt3dadd(-133.838731935091, 564.189715453778, 17.5506514122222, 0.45)
    pt3dadd(-134.066972690724, 565.162811995792, 17.5821041925308, 0.45)
    pt3dadd(-134.295213446358, 566.135908537806, 17.6135569728394, 0.45)
    pt3dadd(-134.523454201991, 567.109005079819, 17.6450097531481, 0.45)
    pt3dadd(-134.751694957625, 568.082101621833, 17.6764625334567, 0.45)
    pt3dadd(-134.979935713258, 569.055198163846, 17.7079153137654, 0.45)
    pt3dadd(-135.208176468892, 570.02829470586, 17.739368094074, 0.45)
    pt3dadd(-135.436417224525, 571.001391247873, 17.7708208743826, 0.45)
    pt3dadd(-135.664657980159, 571.974487789887, 17.8022736546913, 0.45)
    pt3dadd(-135.892898735792, 572.9475843319, 17.8337264349999, 0.45)
    pt3dadd(-136.121139491426, 573.920680873914, 17.8651792153086, 0.45)
    pt3dadd(-136.349380247059, 574.893777415927, 17.8966319956172, 0.45)
    pt3dadd(-136.577621002693, 575.866873957941, 17.9280847759259, 0.45)
    pt3dadd(-136.805861758326, 576.839970499954, 17.9595375562345, 0.45)
    pt3dadd(-137.03410251396, 577.813067041968, 17.9909903365431, 0.45)
    pt3dadd(-137.262343269593, 578.786163583982, 18.0224431168518, 0.45)
    pt3dadd(-137.490584025227, 579.759260125995, 18.0538958971604, 0.45)
    pt3dadd(-137.71882478086, 580.732356668009, 18.0853486774691, 0.45)
    pt3dadd(-137.947065536493, 581.705453210022, 18.1168014577777, 0.45)
    pt3dadd(-138.175306292127, 582.678549752036, 18.1482542380863, 0.45)
    pt3dadd(-138.40354704776, 583.651646294049, 18.179707018395, 0.45)
    pt3dadd(-138.631787803394, 584.624742836063, 18.2111597987036, 0.45)
    pt3dadd(-138.860028559027, 585.597839378076, 18.2426125790123, 0.45)
    pt3dadd(-139.088269314661, 586.57093592009, 18.2740653593209, 0.45)
    pt3dadd(-139.316510070294, 587.544032462104, 18.3055181396296, 0.45)
    pt3dadd(-139.544750825928, 588.517129004117, 18.3369709199382, 0.45)
    pt3dadd(-139.772991581561, 589.490225546131, 18.3684237002468, 0.45)
    pt3dadd(-140.001232337195, 590.463322088144, 18.3998764805555, 0.45)
    pt3dadd(-140.229473092828, 591.436418630158, 18.4313292608641, 0.45)
    pt3dadd(-140.457713848462, 592.409515172171, 18.4627820411728, 0.45)
    pt3dadd(-140.685954604095, 593.382611714185, 18.4942348214814, 0.45)
    pt3dadd(-140.914195359729, 594.355708256198, 18.52568760179, 0.45)
    pt3dadd(-141.142436115362, 595.328804798212, 18.5571403820987, 0.45)
    pt3dadd(-141.370676870996, 596.301901340225, 18.5885931624073, 0.45)
    pt3dadd(-141.598917626629, 597.274997882239, 18.620045942716, 0.45)
    pt3dadd(-141.827158382262, 598.248094424252, 18.6514987230246, 0.45)
    pt3dadd(-142.055399137896, 599.221190966266, 18.6829515033333, 0.45)
    pt3dadd(-142.283639893529, 600.19428750828, 18.7144042836419, 0.45)
    pt3dadd(-142.511880649163, 601.167384050293, 18.7458570639505, 0.45)
    pt3dadd(-142.740121404796, 602.140480592307, 18.7773098442592, 0.45)
    pt3dadd(-142.96836216043, 603.11357713432, 18.8087626245678, 0.45)
    pt3dadd(-143.196602916063, 604.086673676334, 18.8402154048765, 0.45)
    pt3dadd(-143.424843671697, 605.059770218347, 18.8716681851851, 0.45)
    pt3dadd(-143.65308442733, 606.032866760361, 18.9031209654938, 0.45)
    pt3dadd(-143.881325182964, 607.005963302374, 18.9345737458024, 0.45)
    pt3dadd(-144.109565938597, 607.979059844388, 18.966026526111, 0.45)
    pt3dadd(-144.337806694231, 608.952156386401, 18.9974793064197, 0.45)
    pt3dadd(-144.566047449864, 609.925252928415, 19.0289320867283, 0.45)
    pt3dadd(-144.794288205498, 610.898349470428, 19.060384867037, 0.45)
    pt3dadd(-145.022528961131, 611.871446012442, 19.0918376473456, 0.45)
    pt3dadd(-145.250769716765, 612.844542554456, 19.1232904276542, 0.45)
    pt3dadd(-145.479010472398, 613.817639096469, 19.1547432079629, 0.45)
    pt3dadd(-145.707251228031, 614.790735638483, 19.1861959882715, 0.45)
    pt3dadd(-145.935491983665, 615.763832180496, 19.2176487685802, 0.45)
    pt3dadd(-146.163732739298, 616.73692872251, 19.2491015488888, 0.45)
    pt3dadd(-146.391973494932, 617.710025264523, 19.2805543291975, 0.45)
    pt3dadd(-146.620214250565, 618.683121806537, 19.3120071095061, 0.45)
    pt3dadd(-146.848455006199, 619.656218348551, 19.3434598898147, 0.45)
    pt3dadd(-147.076695761832, 620.629314890564, 19.3749126701234, 0.45)
    pt3dadd(-147.304936517466, 621.602411432578, 19.406365450432, 0.45)
    pt3dadd(-147.533177273099, 622.575507974591, 19.4378182307407, 0.45)
    pt3dadd(-147.761418028733, 623.548604516605, 19.4692710110493, 0.45)
    pt3dadd(-147.989658784366, 624.521701058618, 19.5007237913579, 0.45)
    pt3dadd(-148.21789954, 625.494797600632, 19.5321765716666, 0.45)
    pt3dadd(-148.446140295633, 626.467894142645, 19.5636293519752, 0.45)
    pt3dadd(-148.674381051267, 627.440990684659, 19.5950821322839, 0.45)
    pt3dadd(-148.9026218069, 628.414087226672, 19.6265349125925, 0.45)
    pt3dadd(-149.130862562534, 629.387183768686, 19.6579876929012, 0.45)
    pt3dadd(-149.359103318167, 630.360280310699, 19.6894404732098, 0.45)
    pt3dadd(-149.587344073801, 631.333376852713, 19.7208932535184, 0.45)
    pt3dadd(-149.815584829434, 632.306473394726, 19.7523460338271, 0.45)
    pt3dadd(-150.043825585067, 633.27956993674, 19.7837988141357, 0.45)
    pt3dadd(-150.272066340701, 634.252666478754, 19.8152515944444, 0.45)
    pt3dadd(-150.500307096334, 635.225763020767, 19.846704374753, 0.45)
    pt3dadd(-150.728547851968, 636.198859562781, 19.8781571550616, 0.45)
    pt3dadd(-150.956788607601, 637.171956104794, 19.9096099353703, 0.45)
    pt3dadd(-151.185029363235, 638.145052646808, 19.9410627156789, 0.45)
    pt3dadd(-151.413270118868, 639.118149188821, 19.9725154959876, 0.45)
    pt3dadd(-151.641510874502, 640.091245730835, 20.0039682762962, 0.45)
    pt3dadd(-151.869751630135, 641.064342272849, 20.0354210566049, 0.45)
    pt3dadd(-152.097992385769, 642.037438814862, 20.0668738369135, 0.45)
    pt3dadd(-152.326233141402, 643.010535356876, 20.0983266172221, 0.45)
    pt3dadd(-152.554473897036, 643.983631898889, 20.1297793975308, 0.45)
    pt3dadd(-152.782714652669, 644.956728440903, 20.1612321778394, 0.45)
    pt3dadd(-153.010955408303, 645.929824982916, 20.1926849581481, 0.45)
    pt3dadd(-153.239196163936, 646.90292152493, 20.2241377384567, 0.45)
    pt3dadd(-153.46743691957, 647.876018066943, 20.2555905187653, 0.45)
    pt3dadd(-153.695677675203, 648.849114608957, 20.287043299074, 0.45)
    pt3dadd(-153.923918430836, 649.82221115097, 20.3184960793826, 0.45)
    pt3dadd(-154.15215918647, 650.795307692984, 20.3499488596913, 0.45)
    pt3dadd(-154.380399942103, 651.768404234997, 20.3814016399999, 0.45)
    pt3dadd(-154.608640697737, 652.741500777011, 20.4128544203086, 0.45)
    pt3dadd(-154.83688145337, 653.714597319025, 20.4443072006172, 0.45)
    pt3dadd(-155.065122209004, 654.687693861038, 20.4757599809258, 0.45)
    pt3dadd(-155.293362964637, 655.660790403052, 20.5072127612345, 0.45)
    pt3dadd(-155.521603720271, 656.633886945065, 20.5386655415431, 0.45)
    pt3dadd(-155.749844475904, 657.606983487079, 20.5701183218518, 0.45)
    pt3dadd(-155.978085231538, 658.580080029092, 20.6015711021604, 0.45)
    pt3dadd(-156.206325987171, 659.553176571106, 20.6330238824691, 0.45)
    pt3dadd(-156.434566742805, 660.526273113119, 20.6644766627777, 0.45)
    pt3dadd(-156.662807498438, 661.499369655133, 20.6959294430863, 0.45)
    pt3dadd(-156.891048254072, 662.472466197146, 20.727382223395, 0.45)
    pt3dadd(-157.119289009705, 663.44556273916, 20.7588350037036, 0.45)
    pt3dadd(-157.347529765339, 664.418659281173, 20.7902877840123, 0.45)
    pt3dadd(-157.575770520972, 665.391755823187, 20.8217405643209, 0.45)
    pt3dadd(-157.804011276606, 666.364852365201, 20.8531933446295, 0.45)
    pt3dadd(-158.032252032239, 667.337948907214, 20.8846461249382, 0.45)
    pt3dadd(-158.260492787872, 668.311045449228, 20.9160989052468, 0.45)
    pt3dadd(-158.488733543506, 669.284141991241, 20.9475516855555, 0.45)
    pt3dadd(-158.716974299139, 670.257238533255, 20.9790044658641, 0.45)
    pt3dadd(-158.945215054773, 671.230335075268, 21.0104572461728, 0.45)
    pt3dadd(-159.173455810406, 672.203431617282, 21.0419100264814, 0.45)
    pt3dadd(-159.40169656604, 673.176528159295, 21.07336280679, 0.45)
    pt3dadd(-159.629937321673, 674.149624701309, 21.1048155870987, 0.45)
    pt3dadd(-159.858178077307, 675.122721243323, 21.1362683674073, 0.45)
    pt3dadd(-160.08641883294, 676.095817785336, 21.167721147716, 0.45)
    pt3dadd(-160.314659588574, 677.06891432735, 21.1991739280246, 0.45)
    pt3dadd(-160.542900344207, 678.042010869363, 21.2306267083332, 0.45)
    pt3dadd(-160.771141099841, 679.015107411377, 21.2620794886419, 0.45)
    pt3dadd(-160.999381855474, 679.98820395339, 21.2935322689505, 0.45)
    pt3dadd(-161.227622611108, 680.961300495404, 21.3249850492592, 0.45)
    pt3dadd(-161.455863366741, 681.934397037417, 21.3564378295678, 0.45)
    pt3dadd(-161.684104122375, 682.907493579431, 21.3878906098765, 0.45)
    pt3dadd(-161.912344878008, 683.880590121444, 21.4193433901851, 0.45)
    pt3dadd(-162.140585633641, 684.853686663458, 21.4507961704937, 0.45)
    pt3dadd(-162.368826389275, 685.826783205471, 21.4822489508024, 0.45)
    pt3dadd(-162.597067144908, 686.799879747485, 21.513701731111, 0.45)
    pt3dadd(-162.825307900542, 687.772976289499, 21.5451545114197, 0.45)
    pt3dadd(-163.053548656175, 688.746072831512, 21.5766072917283, 0.45)
    pt3dadd(-163.281789411809, 689.719169373526, 21.6080600720369, 0.45)
    pt3dadd(-163.510030167442, 690.692265915539, 21.6395128523456, 0.45)
    pt3dadd(-163.738270923076, 691.665362457553, 21.6709656326542, 0.45)
    pt3dadd(-163.966511678709, 692.638458999566, 21.7024184129629, 0.45)
    pt3dadd(-164.194752434343, 693.61155554158, 21.7338711932715, 0.45)
    pt3dadd(-164.422993189976, 694.584652083593, 21.7653239735802, 0.45)
    pt3dadd(-164.65123394561, 695.557748625607, 21.7967767538888, 0.45)
    pt3dadd(-164.879474701243, 696.530845167621, 21.8282295341974, 0.45)
    pt3dadd(-165.107715456877, 697.503941709634, 21.8596823145061, 0.45)
    pt3dadd(-165.33595621251, 698.477038251648, 21.8911350948147, 0.45)
    pt3dadd(-165.564196968144, 699.450134793661, 21.9225878751234, 0.45)
    pt3dadd(-165.792437723777, 700.423231335675, 21.954040655432, 0.45)
    pt3dadd(-166.020678479411, 701.396327877688, 21.9854934357407, 0.45)
    pt3dadd(-166.248919235044, 702.369424419702, 22.0169462160493, 0.45)
    pt3dadd(-166.477159990677, 703.342520961715, 22.0483989963579, 0.45)
    pt3dadd(-166.705400746311, 704.315617503729, 22.0798517766666, 0.45)
    pt3dadd(-166.933641501944, 705.288714045742, 22.1113045569752, 0.45)
    pt3dadd(-167.161882257578, 706.261810587756, 22.1427573372839, 0.45)
    pt3dadd(-167.390123013211, 707.234907129769, 22.1742101175925, 0.45)
    pt3dadd(-167.618363768845, 708.208003671783, 22.2056628979011, 0.45)
    pt3dadd(-167.846604524478, 709.181100213797, 22.2371156782098, 0.45)
    pt3dadd(-168.074845280112, 710.15419675581, 22.2685684585184, 0.45)
    pt3dadd(-168.303086035745, 711.127293297824, 22.3000212388271, 0.45)
    pt3dadd(-168.531326791379, 712.100389839837, 22.3314740191357, 0.45)
    pt3dadd(-168.759567547012, 713.073486381851, 22.3629267994444, 0.45)
    pt3dadd(-168.987808302646, 714.046582923864, 22.394379579753, 0.45)
    pt3dadd(-169.216049058279, 715.019679465878, 22.4258323600616, 0.45)
    pt3dadd(-169.444289813913, 715.992776007891, 22.4572851403703, 0.45)
    pt3dadd(-169.672530569546, 716.965872549905, 22.4887379206789, 0.45)
    pt3dadd(-169.90077132518, 717.938969091918, 22.5201907009876, 0.45)
    pt3dadd(-170.129012080813, 718.912065633932, 22.5516434812962, 0.45)
    pt3dadd(-170.357252836446, 719.885162175946, 22.5830962616048, 0.45)
    pt3dadd(-170.58549359208, 720.858258717959, 22.6145490419135, 0.45)
    pt3dadd(-170.813734347713, 721.831355259973, 22.6460018222221, 0.45)
    pt3dadd(-171.041975103347, 722.804451801986, 22.6774546025308, 0.45)
    pt3dadd(-171.27021585898, 723.777548344, 22.7089073828394, 0.45)
    pt3dadd(-171.498456614614, 724.750644886013, 22.7403601631481, 0.45)
    pt3dadd(-171.726697370247, 725.723741428027, 22.7718129434567, 0.45)
    pt3dadd(-171.954938125881, 726.69683797004, 22.8032657237653, 0.45)
    pt3dadd(-172.183178881514, 727.669934512054, 22.834718504074, 0.45)
    pt3dadd(-172.411419637148, 728.643031054067, 22.8661712843826, 0.45)
    pt3dadd(-172.639660392781, 729.616127596081, 22.8976240646913, 0.45)
    pt3dadd(-172.867901148415, 730.589224138095, 22.9290768449999, 0.45)
    pt3dadd(-173.096141904048, 731.562320680108, 22.9605296253085, 0.45)
    pt3dadd(-173.324382659682, 732.535417222122, 22.9919824056172, 0.45)
    pt3dadd(-173.552623415315, 733.508513764135, 23.0234351859258, 0.45)
    pt3dadd(-173.780864170949, 734.481610306149, 23.0548879662345, 0.45)
    pt3dadd(-174.009104926582, 735.454706848162, 23.0863407465431, 0.45)
    pt3dadd(-174.237345682216, 736.427803390176, 23.1177935268518, 0.45)
    pt3dadd(-174.465586437849, 737.400899932189, 23.1492463071604, 0.45)
    pt3dadd(-174.693827193482, 738.373996474203, 23.180699087469, 0.45)
    pt3dadd(-174.922067949116, 739.347093016216, 23.2121518677777, 0.45)
    pt3dadd(-175.150308704749, 740.32018955823, 23.2436046480863, 0.45)
    pt3dadd(-175.378549460383, 741.293286100243, 23.275057428395, 0.45)
    pt3dadd(-175.606790216016, 742.266382642257, 23.3065102087036, 0.45)
    pt3dadd(-175.83503097165, 743.239479184271, 23.3379629890123, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-176.063271727283, 744.212575726284, 23.3694157693209, 0.45)
    pt3dadd(-176.291512482917, 745.185672268298, 23.4008685496295, 0.45)
    pt3dadd(-176.51975323855, 746.158768810311, 23.4323213299382, 0.45)
    pt3dadd(-176.747993994184, 747.131865352325, 23.4637741102468, 0.45)
    pt3dadd(-176.976234749817, 748.104961894338, 23.4952268905555, 0.45)
    pt3dadd(-177.204475505451, 749.078058436352, 23.5266796708641, 0.45)
    pt3dadd(-177.432716261084, 750.051154978366, 23.5581324511727, 0.45)
    pt3dadd(-177.660957016718, 751.024251520379, 23.5895852314814, 0.45)
    pt3dadd(-177.889197772351, 751.997348062393, 23.62103801179, 0.45)
    pt3dadd(-178.117438527985, 752.970444604406, 23.6524907920987, 0.45)
    pt3dadd(-178.345679283618, 753.94354114642, 23.6839435724073, 0.45)
    pt3dadd(-178.573920039251, 754.916637688433, 23.715396352716, 0.45)
    pt3dadd(-178.802160794885, 755.889734230447, 23.7468491330246, 0.45)
    pt3dadd(-179.030401550518, 756.86283077246, 23.7783019133332, 0.45)
    pt3dadd(-179.258642306152, 757.835927314474, 23.8097546936419, 0.45)
    pt3dadd(-179.486883061785, 758.809023856487, 23.8412074739505, 0.45)
    pt3dadd(-179.715123817419, 759.782120398501, 23.8726602542592, 0.45)
    pt3dadd(-179.943364573052, 760.755216940514, 23.9041130345678, 0.45)
    pt3dadd(-180.171605328686, 761.728313482528, 23.9355658148764, 0.45)
    pt3dadd(-180.399846084319, 762.701410024541, 23.9670185951851, 0.45)
    pt3dadd(-180.628086839953, 763.674506566555, 23.9984713754937, 0.45)
    pt3dadd(-180.856327595586, 764.647603108569, 24.0299241558024, 0.45)
    pt3dadd(-181.08456835122, 765.620699650582, 24.061376936111, 0.45)
    pt3dadd(-181.312809106853, 766.593796192596, 24.0928297164197, 0.45)
    pt3dadd(-181.541049862487, 767.566892734609, 24.1242824967283, 0.45)
    pt3dadd(-181.76929061812, 768.539989276623, 24.1557352770369, 0.45)
    pt3dadd(-181.997531373754, 769.513085818636, 24.1871880573456, 0.45)
    pt3dadd(-182.225772129387, 770.48618236065, 24.2186408376542, 0.45)
    pt3dadd(-182.45401288502, 771.459278902663, 24.2500936179629, 0.45)
    pt3dadd(-182.682253640654, 772.432375444677, 24.2815463982715, 0.45)
    pt3dadd(-182.910494396287, 773.405471986691, 24.3129991785801, 0.45)
    pt3dadd(-183.138735151921, 774.378568528704, 24.3444519588888, 0.45)
    pt3dadd(-183.366975907554, 775.351665070718, 24.3759047391974, 0.45)
    pt3dadd(-183.595216663188, 776.324761612731, 24.4073575195061, 0.45)
    pt3dadd(-183.823457418821, 777.297858154745, 24.4388102998147, 0.45)
    pt3dadd(-184.051698174455, 778.270954696758, 24.4702630801234, 0.45)
    pt3dadd(-184.279938930088, 779.244051238772, 24.501715860432, 0.45)
    pt3dadd(-184.508179685722, 780.217147780785, 24.5331686407406, 0.45)
    pt3dadd(-184.736420441355, 781.190244322799, 24.5646214210493, 0.45)
    pt3dadd(-184.964661196989, 782.163340864812, 24.5960742013579, 0.45)
    pt3dadd(-185.192901952622, 783.136437406826, 24.6275269816666, 0.45)
    pt3dadd(-185.421142708256, 784.10953394884, 24.6589797619752, 0.45)
    pt3dadd(-185.649383463889, 785.082630490853, 24.6904325422839, 0.45)
    pt3dadd(-185.877624219523, 786.055727032867, 24.7218853225925, 0.45)
    pt3dadd(-186.105864975156, 787.02882357488, 24.7533381029011, 0.45)
    pt3dadd(-186.33410573079, 788.001920116894, 24.7847908832098, 0.45)
    pt3dadd(-186.562346486423, 788.975016658907, 24.8162436635184, 0.45)
    pt3dadd(-186.790587242056, 789.948113200921, 24.8476964438271, 0.45)
    pt3dadd(-187.01882799769, 790.921209742934, 24.8791492241357, 0.45)
    pt3dadd(-187.247068753323, 791.894306284948, 24.9106020044443, 0.45)
    pt3dadd(-187.475309508957, 792.867402826961, 24.942054784753, 0.45)
    pt3dadd(-187.70355026459, 793.840499368975, 24.9735075650616, 0.45)
    pt3dadd(-187.931791020224, 794.813595910988, 25.0049603453703, 0.45)
    pt3dadd(-188.160031775857, 795.786692453002, 25.0364131256789, 0.45)
    pt3dadd(-188.388272531491, 796.759788995015, 25.0678659059876, 0.45)
    pt3dadd(-188.616513287124, 797.732885537029, 25.0993186862962, 0.45)
    pt3dadd(-188.844754042758, 798.705982079043, 25.1307714666048, 0.45)
    pt3dadd(-189.072994798391, 799.679078621056, 25.1622242469135, 0.45)
    pt3dadd(-189.301235554025, 800.65217516307, 25.1936770272221, 0.45)
    pt3dadd(-189.529476309658, 801.625271705083, 25.2251298075308, 0.45)
    pt3dadd(-189.757717065292, 802.598368247097, 25.2565825878394, 0.45)
    pt3dadd(-189.985957820925, 803.57146478911, 25.288035368148, 0.45)
    pt3dadd(-190.214198576559, 804.544561331124, 25.3194881484567, 0.45)
    pt3dadd(-190.442439332192, 805.517657873138, 25.3509409287653, 0.45)
    pt3dadd(-190.670680087826, 806.490754415151, 25.382393709074, 0.45)
    pt3dadd(-190.898920843459, 807.463850957165, 25.4138464893826, 0.45)
    pt3dadd(-191.127161599092, 808.436947499178, 25.4452992696913, 0.45)
    pt3dadd(-191.355402354726, 809.410044041192, 25.4767520499999, 0.45)
    pt3dadd(-191.583643110359, 810.383140583205, 25.5082048303085, 0.45)
    pt3dadd(-191.811883865993, 811.356237125219, 25.5396576106172, 0.45)
    pt3dadd(-192.040124621626, 812.329333667232, 25.5711103909258, 0.45)
    pt3dadd(-192.26836537726, 813.302430209246, 25.6025631712345, 0.45)
    pt3dadd(-192.496606132893, 814.275526751259, 25.6340159515431, 0.45)
    pt3dadd(-192.724846888527, 815.248623293273, 25.6654687318517, 0.45)
    pt3dadd(-192.95308764416, 816.221719835286, 25.6969215121604, 0.45)
    pt3dadd(-193.181328399794, 817.1948163773, 25.728374292469, 0.45)
    pt3dadd(-193.409569155427, 818.167912919313, 25.7598270727777, 0.45)
    pt3dadd(-193.637809911061, 819.141009461327, 25.7912798530863, 0.45)
    pt3dadd(-193.866050666694, 820.114106003341, 25.822732633395, 0.45)
    pt3dadd(-194.094291422328, 821.087202545354, 25.8541854137036, 0.45)
    pt3dadd(-194.322532177961, 822.060299087368, 25.8856381940122, 0.45)
    pt3dadd(-194.550772933595, 823.033395629381, 25.9170909743209, 0.45)
    pt3dadd(-194.779013689228, 824.006492171395, 25.9485437546295, 0.45)
    pt3dadd(-195.007254444861, 824.979588713408, 25.9799965349382, 0.45)
    pt3dadd(-195.235495200495, 825.952685255422, 26.0114493152468, 0.45)
    pt3dadd(-195.463735956128, 826.925781797436, 26.0429020955555, 0.45)
    pt3dadd(-195.691976711762, 827.898878339449, 26.0743548758641, 0.45)
    pt3dadd(-195.920217467395, 828.871974881463, 26.1058076561727, 0.45)
    pt3dadd(-196.148458223029, 829.845071423476, 26.1372604364814, 0.45)
    pt3dadd(-196.376698978662, 830.81816796549, 26.16871321679, 0.45)
    pt3dadd(-196.604939734296, 831.791264507503, 26.2001659970987, 0.45)
    pt3dadd(-196.833180489929, 832.764361049517, 26.2316187774073, 0.45)
    pt3dadd(-197.061421245563, 833.73745759153, 26.2630715577159, 0.45)
    pt3dadd(-197.289662001196, 834.710554133544, 26.2945243380246, 0.45)
    pt3dadd(-197.51790275683, 835.683650675557, 26.3259771183332, 0.45)
    pt3dadd(-197.746143512463, 836.656747217571, 26.3574298986419, 0.45)
    pt3dadd(-197.974384268097, 837.629843759584, 26.3888826789505, 0.45)
    pt3dadd(-198.20262502373, 838.602940301598, 26.4203354592592, 0.45)
    pt3dadd(-198.430865779364, 839.576036843612, 26.4517882395678, 0.45)
    pt3dadd(-198.659106534997, 840.549133385625, 26.4832410198764, 0.45)
    pt3dadd(-198.88734729063, 841.522229927639, 26.5146938001851, 0.45)
    pt3dadd(-199.115588046264, 842.495326469652, 26.5461465804937, 0.45)
    pt3dadd(-199.343828801897, 843.468423011666, 26.5775993608024, 0.45)
    pt3dadd(-199.572069557531, 844.441519553679, 26.609052141111, 0.45)
    pt3dadd(-199.800310313164, 845.414616095693, 26.6405049214196, 0.45)
    pt3dadd(-200.028551068798, 846.387712637706, 26.6719577017283, 0.45)
    pt3dadd(-200.256791824431, 847.36080917972, 26.7034104820369, 0.45)
    pt3dadd(-200.485032580065, 848.333905721733, 26.7348632623456, 0.45)
    pt3dadd(-200.713273335698, 849.307002263747, 26.7663160426542, 0.45)
    pt3dadd(-200.941514091332, 850.28009880576, 26.7977688229629, 0.45)
    pt3dadd(-201.169754846965, 851.253195347774, 26.8292216032715, 0.45)
    pt3dadd(-201.397995602599, 852.226291889788, 26.8606743835801, 0.45)
    pt3dadd(-201.626236358232, 853.199388431801, 26.8921271638888, 0.45)
    pt3dadd(-201.854477113866, 854.172484973815, 26.9235799441974, 0.45)
    pt3dadd(-202.082717869499, 855.145581515828, 26.9550327245061, 0.45)
    pt3dadd(-202.310958625133, 856.118678057842, 26.9864855048147, 0.45)
    pt3dadd(-202.539199380766, 857.091774599855, 27.0179382851233, 0.45)
    pt3dadd(-202.7674401364, 858.064871141869, 27.049391065432, 0.45)
    pt3dadd(-202.995680892033, 859.037967683882, 27.0808438457406, 0.45)
    pt3dadd(-203.223921647666, 860.011064225896, 27.1122966260493, 0.45)
    pt3dadd(-203.4521624033, 860.98416076791, 27.1437494063579, 0.45)
    pt3dadd(-203.680403158933, 861.957257309923, 27.1752021866666, 0.45)
    pt3dadd(-203.908643914567, 862.930353851937, 27.2066549669752, 0.45)
    pt3dadd(-204.1368846702, 863.90345039395, 27.2381077472838, 0.45)
    pt3dadd(-204.365125425834, 864.876546935964, 27.2695605275925, 0.45)
    pt3dadd(-204.593366181467, 865.849643477977, 27.3010133079011, 0.45)
    pt3dadd(-204.821606937101, 866.822740019991, 27.3324660882098, 0.45)
    pt3dadd(-205.049847692734, 867.795836562004, 27.3639188685184, 0.45)
    pt3dadd(-205.278088448368, 868.768933104018, 27.395371648827, 0.45)
    pt3dadd(-205.506329204001, 869.742029646031, 27.4268244291357, 0.45)
    pt3dadd(-205.734569959635, 870.715126188045, 27.4582772094443, 0.45)
    pt3dadd(-205.962810715268, 871.688222730058, 27.489729989753, 0.45)
    pt3dadd(-206.191051470902, 872.661319272072, 27.5211827700616, 0.45)
    pt3dadd(-206.419292226535, 873.634415814086, 27.5526355503703, 0.45)
    pt3dadd(-206.647532982169, 874.607512356099, 27.5840883306789, 0.45)
    pt3dadd(-206.875773737802, 875.580608898113, 27.6155411109875, 0.45)
    pt3dadd(-207.104014493435, 876.553705440126, 27.6469938912962, 0.45)
    pt3dadd(-207.332255249069, 877.52680198214, 27.6784466716048, 0.45)
    pt3dadd(-207.560496004702, 878.499898524153, 27.7098994519135, 0.45)
    pt3dadd(-207.788736760336, 879.472995066167, 27.7413522322221, 0.45)
    pt3dadd(-208.016977515969, 880.446091608181, 27.7728050125308, 0.45)
    pt3dadd(-208.245218271603, 881.419188150194, 27.8042577928394, 0.45)
    pt3dadd(-208.473459027236, 882.392284692208, 27.835710573148, 0.45)
    pt3dadd(-208.70169978287, 883.365381234221, 27.8671633534567, 0.45)
    pt3dadd(-208.929940538503, 884.338477776235, 27.8986161337653, 0.45)
    pt3dadd(-209.158181294137, 885.311574318248, 27.930068914074, 0.45)
    pt3dadd(-209.38642204977, 886.284670860262, 27.9615216943826, 0.45)
    pt3dadd(-209.614662805404, 887.257767402275, 27.9929744746912, 0.45)
    pt3dadd(-209.842903561037, 888.230863944289, 28.0244272549999, 0.45)
    pt3dadd(-210.071144316671, 889.203960486302, 28.0558800353085, 0.45)
    pt3dadd(-210.299385072304, 890.177057028316, 28.0873328156172, 0.45)
    pt3dadd(-210.527625827938, 891.150153570329, 28.1187855959258, 0.45)
    pt3dadd(-210.755866583571, 892.123250112343, 28.1502383762345, 0.45)
    pt3dadd(-210.984107339205, 893.096346654356, 28.1816911565431, 0.45)
    pt3dadd(-211.212348094838, 894.06944319637, 28.2131439368517, 0.45)
    pt3dadd(-211.440588850471, 895.042539738384, 28.2445967171604, 0.45)
    pt3dadd(-211.668829606105, 896.015636280397, 28.276049497469, 0.45)
    pt3dadd(-211.897070361738, 896.988732822411, 28.3075022777777, 0.45)
    pt3dadd(-212.125311117372, 897.961829364424, 28.3389550580863, 0.45)
    pt3dadd(-212.353551873005, 898.934925906438, 28.3704078383949, 0.45)
    pt3dadd(-212.581792628639, 899.908022448451, 28.4018606187036, 0.45)
    pt3dadd(-212.810033384272, 900.881118990465, 28.4333133990122, 0.45)
    pt3dadd(-213.038274139906, 901.854215532478, 28.4647661793209, 0.45)
    pt3dadd(-213.266514895539, 902.827312074492, 28.4962189596295, 0.45)
    pt3dadd(-213.494755651173, 903.800408616505, 28.5276717399382, 0.45)
    pt3dadd(-213.722996406806, 904.773505158519, 28.5591245202468, 0.45)
    pt3dadd(-213.95123716244, 905.746601700533, 28.5905773005554, 0.45)
    pt3dadd(-214.179477918073, 906.719698242546, 28.6220300808641, 0.45)
    pt3dadd(-214.407718673707, 907.69279478456, 28.6534828611727, 0.45)
    pt3dadd(-214.63595942934, 908.665891326573, 28.6849356414814, 0.45)
    pt3dadd(-214.864200184974, 909.638987868587, 28.71638842179, 0.45)
    pt3dadd(-215.092440940607, 910.6120844106, 28.7478412020986, 0.45)
    pt3dadd(-215.32068169624, 911.585180952614, 28.7792939824073, 0.45)
    pt3dadd(-215.548922451874, 912.558277494627, 28.8107467627159, 0.45)
    pt3dadd(-215.777163207507, 913.531374036641, 28.8421995430246, 0.45)
    pt3dadd(-216.005403963141, 914.504470578654, 28.8736523233332, 0.45)
    pt3dadd(-216.233644718774, 915.477567120668, 28.9051051036419, 0.45)
    pt3dadd(-216.461885474408, 916.450663662682, 28.9365578839505, 0.45)
    pt3dadd(-216.690126230041, 917.423760204695, 28.9680106642591, 0.45)
    pt3dadd(-216.918366985675, 918.396856746709, 28.9994634445678, 0.45)
    pt3dadd(-217.146607741308, 919.369953288722, 29.0309162248764, 0.45)
    pt3dadd(-217.374848496942, 920.343049830736, 29.0623690051851, 0.45)
    pt3dadd(-217.603089252575, 921.316146372749, 29.0938217854937, 0.45)
    pt3dadd(-217.831330008209, 922.289242914763, 29.1252745658024, 0.45)
    pt3dadd(-218.059570763842, 923.262339456776, 29.156727346111, 0.45)
    pt3dadd(-218.287811519476, 924.23543599879, 29.1881801264196, 0.45)
    pt3dadd(-218.516052275109, 925.208532540803, 29.2196329067283, 0.45)
    pt3dadd(-218.744293030743, 926.181629082817, 29.2510856870369, 0.45)
    pt3dadd(-218.972533786376, 927.15472562483, 29.2825384673456, 0.45)
    pt3dadd(-219.20077454201, 928.127822166844, 29.3139912476542, 0.45)
    pt3dadd(-219.429015297643, 929.100918708858, 29.3454440279628, 0.45)
    pt3dadd(-219.657256053276, 930.074015250871, 29.3768968082715, 0.45)
    pt3dadd(-219.88549680891, 931.047111792885, 29.4083495885801, 0.45)
    pt3dadd(-220.113737564543, 932.020208334898, 29.4398023688888, 0.45)
    pt3dadd(-220.341978320177, 932.993304876912, 29.4712551491974, 0.45)
    pt3dadd(-220.57021907581, 933.966401418925, 29.5027079295061, 0.45)
    pt3dadd(-220.798459831444, 934.939497960939, 29.5341607098147, 0.45)
    pt3dadd(-221.026700587077, 935.912594502953, 29.5656134901233, 0.45)
    pt3dadd(-221.254941342711, 936.885691044966, 29.597066270432, 0.45)
    pt3dadd(-221.483182098344, 937.85878758698, 29.6285190507406, 0.45)
    pt3dadd(-221.711422853978, 938.831884128993, 29.6599718310493, 0.45)
    pt3dadd(-221.939663609611, 939.804980671007, 29.6914246113579, 0.45)
    pt3dadd(-222.167904365245, 940.77807721302, 29.7228773916665, 0.45)
    pt3dadd(-222.396145120878, 941.751173755034, 29.7543301719752, 0.45)
    pt3dadd(-222.624385876512, 942.724270297047, 29.7857829522838, 0.45)
    pt3dadd(-222.852626632145, 943.697366839061, 29.8172357325925, 0.45)
    pt3dadd(-223.080867387779, 944.670463381074, 29.8486885129011, 0.45)
    pt3dadd(-223.309108143412, 945.643559923088, 29.8801412932098, 0.45)
    pt3dadd(-223.537348899045, 946.616656465101, 29.9115940735184, 0.45)
    pt3dadd(-223.765589654679, 947.589753007115, 29.943046853827, 0.45)
    pt3dadd(-223.993830410312, 948.562849549128, 29.9744996341357, 0.45)
    pt3dadd(-224.222071165946, 949.535946091142, 30.0059524144443, 0.45)
    pt3dadd(-224.450311921579, 950.509042633156, 30.037405194753, 0.45)
    pt3dadd(-224.678552677213, 951.482139175169, 30.0688579750616, 0.45)
    pt3dadd(-224.906793432846, 952.455235717183, 30.1003107553702, 0.45)
    pt3dadd(-225.13503418848, 953.428332259196, 30.1317635356789, 0.45)
    pt3dadd(-225.363274944113, 954.40142880121, 30.1632163159875, 0.45)
    pt3dadd(-225.591515699747, 955.374525343223, 30.1946690962962, 0.45)
    pt3dadd(-225.81975645538, 956.347621885237, 30.2261218766048, 0.45)
    pt3dadd(-226.047997211014, 957.32071842725, 30.2575746569135, 0.45)
    pt3dadd(-226.276237966647, 958.293814969264, 30.2890274372221, 0.45)
    pt3dadd(-226.504478722281, 959.266911511278, 30.3204802175307, 0.45)
    pt3dadd(-226.732719477914, 960.240008053291, 30.3519329978394, 0.45)
    pt3dadd(-226.960960233548, 961.213104595305, 30.383385778148, 0.45)
    pt3dadd(-227.189200989181, 962.186201137318, 30.4148385584567, 0.45)
    pt3dadd(-227.417441744814, 963.159297679332, 30.4462913387653, 0.45)
    pt3dadd(-227.645682500448, 964.132394221345, 30.477744119074, 0.45)
    pt3dadd(-227.873923256081, 965.105490763359, 30.5091968993826, 0.45)
    pt3dadd(-228.102164011715, 966.078587305372, 30.5406496796912, 0.45)
    pt3dadd(-228.330404767348, 967.051683847386, 30.5721024599999, 0.45)
    pt3dadd(-228.558645522982, 968.024780389399, 30.6035552403085, 0.45)
    pt3dadd(-228.786886278615, 968.997876931413, 30.6350080206172, 0.45)
    pt3dadd(-229.015127034249, 969.970973473427, 30.6664608009258, 0.45)
    pt3dadd(-229.243367789882, 970.94407001544, 30.6979135812344, 0.45)
    pt3dadd(-229.471608545516, 971.917166557454, 30.7293663615431, 0.45)
    pt3dadd(-229.699849301149, 972.890263099467, 30.7608191418517, 0.45)
    pt3dadd(-229.928090056783, 973.863359641481, 30.7922719221604, 0.45)
    pt3dadd(-230.156330812416, 974.836456183494, 30.823724702469, 0.45)
    pt3dadd(-230.38457156805, 975.809552725508, 30.8551774827777, 0.45)
    pt3dadd(-230.612812323683, 976.782649267521, 30.8866302630863, 0.45)
    pt3dadd(-230.841053079317, 977.755745809535, 30.9180830433949, 0.45)
    pt3dadd(-231.06929383495, 978.728842351548, 30.9495358237036, 0.45)
    pt3dadd(-231.297534590584, 979.701938893562, 30.9809886040122, 0.45)
    pt3dadd(-231.525775346217, 980.675035435575, 31.0124413843209, 0.45)
    pt3dadd(-231.75401610185, 981.648131977589, 31.0438941646295, 0.45)
    pt3dadd(-231.982256857484, 982.621228519602, 31.0753469449381, 0.45)
    pt3dadd(-232.210497613117, 983.594325061616, 31.1067997252468, 0.45)
    pt3dadd(-232.438738368751, 984.56742160363, 31.1382525055554, 0.45)
    pt3dadd(-232.666979124384, 985.540518145643, 31.1697052858641, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-232.895219880018, 986.513614687657, 31.2011580661727, 0.45)
    pt3dadd(-233.123460635651, 987.48671122967, 31.2326108464814, 0.45)
    pt3dadd(-233.351701391285, 988.459807771684, 31.26406362679, 0.45)
    pt3dadd(-233.579942146918, 989.432904313697, 31.2955164070986, 0.45)
    pt3dadd(-233.808182902552, 990.406000855711, 31.3269691874073, 0.45)
    pt3dadd(-234.036423658185, 991.379097397725, 31.3584219677159, 0.45)
    pt3dadd(-234.264664413819, 992.352193939738, 31.3898747480246, 0.45)
    pt3dadd(-234.492905169452, 993.325290481752, 31.4213275283332, 0.45)
    pt3dadd(-234.721145925086, 994.298387023765, 31.4527803086418, 0.45)
    pt3dadd(-234.949386680719, 995.271483565779, 31.4842330889505, 0.45)
    pt3dadd(-235.177627436353, 996.244580107792, 31.5156858692591, 0.45)
    pt3dadd(-235.405868191986, 997.217676649806, 31.5471386495678, 0.45)
    pt3dadd(-235.63410894762, 998.190773191819, 31.5785914298764, 0.45)
    pt3dadd(-235.862349703253, 999.163869733833, 31.6100442101851, 0.45)
    pt3dadd(-236.090590458886, 1000.13696627585, 31.6414969904937, 0.45)
    pt3dadd(-236.31883121452, 1001.11006281786, 31.6729497708023, 0.45)
    pt3dadd(-236.547071970153, 1002.08315935987, 31.704402551111, 0.45)
    pt3dadd(-236.775312725787, 1003.05625590189, 31.7358553314196, 0.45)
    pt3dadd(-237.00355348142, 1004.0293524439, 31.7673081117283, 0.45)
    pt3dadd(-237.231794237054, 1005.00244898591, 31.7987608920369, 0.45)
    pt3dadd(-237.460034992687, 1005.97554552793, 31.8302136723456, 0.45)
    pt3dadd(-237.688275748321, 1006.94864206994, 31.8616664526542, 0.45)
    pt3dadd(-237.916516503954, 1007.92173861195, 31.8931192329628, 0.45)
    pt3dadd(-238.144757259588, 1008.89483515397, 31.9245720132715, 0.45)
    pt3dadd(-238.372998015221, 1009.86793169598, 31.9560247935801, 0.45)
    pt3dadd(-238.601238770855, 1010.841028238, 31.9874775738888, 0.45)
    pt3dadd(-238.829479526488, 1011.81412478001, 32.0189303541974, 0.45)
    pt3dadd(-239.057720282122, 1012.78722132202, 32.050383134506, 0.45)
    pt3dadd(-239.285961037755, 1013.76031786404, 32.0818359148147, 0.45)
    pt3dadd(-239.514201793389, 1014.73341440605, 32.1132886951233, 0.45)
    pt3dadd(-239.742442549022, 1015.70651094806, 32.144741475432, 0.45)
    pt3dadd(-239.970683304655, 1016.67960749008, 32.1761942557406, 0.45)
    pt3dadd(-240.198924060289, 1017.65270403209, 32.2076470360493, 0.45)
    pt3dadd(-240.427164815922, 1018.6258005741, 32.2390998163579, 0.45)
    pt3dadd(-240.655405571556, 1019.59889711612, 32.2705525966665, 0.45)
    pt3dadd(-240.883646327189, 1020.57199365813, 32.3020053769752, 0.45)
    pt3dadd(-241.111887082823, 1021.54509020014, 32.3334581572838, 0.45)
    pt3dadd(-241.340127838456, 1022.51818674216, 32.3649109375925, 0.45)
    pt3dadd(-241.56836859409, 1023.49128328417, 32.3963637179011, 0.45)
    pt3dadd(-241.796609349723, 1024.46437982619, 32.4278164982097, 0.45)
    pt3dadd(-242.024850105357, 1025.4374763682, 32.4592692785184, 0.45)
    pt3dadd(-242.25309086099, 1026.41057291021, 32.490722058827, 0.45)
    pt3dadd(-242.481331616624, 1027.38366945223, 32.5221748391357, 0.45)
    pt3dadd(-242.709572372257, 1028.35676599424, 32.5536276194443, 0.45)
    pt3dadd(-242.937813127891, 1029.32986253625, 32.585080399753, 0.45)
    pt3dadd(-243.166053883524, 1030.30295907827, 32.6165331800616, 0.45)
    pt3dadd(-243.394294639158, 1031.27605562028, 32.6479859603702, 0.45)
    pt3dadd(-243.622535394791, 1032.24915216229, 32.6794387406789, 0.45)
    pt3dadd(-243.850776150424, 1033.22224870431, 32.7108915209875, 0.45)
    pt3dadd(-244.079016906058, 1034.19534524632, 32.7423443012962, 0.45)
    pt3dadd(-244.307257661691, 1035.16844178833, 32.7737970816048, 0.45)
    pt3dadd(-244.535498417325, 1036.14153833035, 32.8052498619134, 0.45)
    pt3dadd(-244.763739172958, 1037.11463487236, 32.8367026422221, 0.45)
    pt3dadd(-244.991979928592, 1038.08773141437, 32.8681554225307, 0.45)
    pt3dadd(-245.220220684225, 1039.06082795639, 32.8996082028394, 0.45)
    pt3dadd(-245.448461439859, 1040.0339244984, 32.931060983148, 0.45)
    pt3dadd(-245.676702195492, 1041.00702104042, 32.9625137634567, 0.45)
    pt3dadd(-245.904942951126, 1041.98011758243, 32.9939665437653, 0.45)
    pt3dadd(-246.133183706759, 1042.95321412444, 33.0254193240739, 0.45)
    pt3dadd(-246.361424462393, 1043.92631066646, 33.0568721043826, 0.45)
    pt3dadd(-246.589665218026, 1044.89940720847, 33.0883248846912, 0.45)
    pt3dadd(-246.81790597366, 1045.87250375048, 33.1197776649999, 0.45)
    pt3dadd(-247.046146729293, 1046.8456002925, 33.1512304453085, 0.45)
    pt3dadd(-247.274387484927, 1047.81869683451, 33.1826832256171, 0.45)
    pt3dadd(-247.50262824056, 1048.79179337652, 33.2141360059258, 0.45)
    pt3dadd(-247.730868996194, 1049.76488991854, 33.2455887862344, 0.45)
    pt3dadd(-247.959109751827, 1050.73798646055, 33.2770415665431, 0.45)
    pt3dadd(-248.18735050746, 1051.71108300256, 33.3084943468517, 0.45)
    pt3dadd(-248.415591263094, 1052.68417954458, 33.3399471271604, 0.45)
    pt3dadd(-248.643832018727, 1053.65727608659, 33.371399907469, 0.45)
    pt3dadd(-248.872072774361, 1054.6303726286, 33.4028526877776, 0.45)
    pt3dadd(-249.100313529994, 1055.60346917062, 33.4343054680863, 0.45)
    pt3dadd(-249.328554285628, 1056.57656571263, 33.4657582483949, 0.45)
    pt3dadd(-249.556795041261, 1057.54966225465, 33.4972110287036, 0.45)
    pt3dadd(-249.785035796895, 1058.52275879666, 33.5286638090122, 0.45)
    pt3dadd(-250.013276552528, 1059.49585533867, 33.5601165893208, 0.45)
    pt3dadd(-250.241517308162, 1060.46895188069, 33.5915693696295, 0.45)
    pt3dadd(-250.469758063795, 1061.4420484227, 33.6230221499381, 0.45)
    pt3dadd(-250.697998819429, 1062.41514496471, 33.6544749302468, 0.45)
    pt3dadd(-250.926239575062, 1063.38824150673, 33.6859277105554, 0.45)
    pt3dadd(-251.154480330696, 1064.36133804874, 33.7173804908641, 0.45)
    pt3dadd(-251.382721086329, 1065.33443459075, 33.7488332711727, 0.45)
    pt3dadd(-251.610961841963, 1066.30753113277, 33.7802860514813, 0.45)
    pt3dadd(-251.839202597596, 1067.28062767478, 33.81173883179, 0.45)
    pt3dadd(-252.067443353229, 1068.25372421679, 33.8431916120986, 0.45)
    pt3dadd(-252.295684108863, 1069.22682075881, 33.8746443924073, 0.45)
    pt3dadd(-252.523924864496, 1070.19991730082, 33.9060971727159, 0.45)
    pt3dadd(-252.75216562013, 1071.17301384284, 33.9375499530246, 0.45)
    pt3dadd(-252.980406375763, 1072.14611038485, 33.9690027333332, 0.45)
    pt3dadd(-253.208647131397, 1073.11920692686, 34.0004555136418, 0.45)
    pt3dadd(-253.43688788703, 1074.09230346888, 34.0319082939505, 0.45)
    pt3dadd(-253.665128642664, 1075.06540001089, 34.0633610742591, 0.45)
    pt3dadd(-253.893369398297, 1076.0384965529, 34.0948138545678, 0.45)
    pt3dadd(-254.121610153931, 1077.01159309492, 34.1262666348764, 0.45)
    pt3dadd(-254.349850909564, 1077.98468963693, 34.157719415185, 0.45)
    pt3dadd(-254.578091665198, 1078.95778617894, 34.1891721954937, 0.45)
    pt3dadd(-254.806332420831, 1079.93088272096, 34.2206249758023, 0.45)
    pt3dadd(-255.034573176465, 1080.90397926297, 34.252077756111, 0.45)
    pt3dadd(-255.262813932098, 1081.87707580498, 34.2835305364196, 0.45)
    pt3dadd(-255.491054687732, 1082.850172347, 34.3149833167283, 0.45)
    pt3dadd(-255.719295443365, 1083.82326888901, 34.3464360970369, 0.45)
    pt3dadd(-255.947536198999, 1084.79636543102, 34.3778888773455, 0.45)
    pt3dadd(-256.175776954632, 1085.76946197304, 34.4093416576542, 0.45)
    pt3dadd(-256.404017710265, 1086.74255851505, 34.4407944379628, 0.45)
    pt3dadd(-256.632258465899, 1087.71565505707, 34.4722472182715, 0.45)
    pt3dadd(-256.860499221532, 1088.68875159908, 34.5036999985801, 0.45)
    pt3dadd(-257.088739977166, 1089.66184814109, 34.5351527788888, 0.45)
    pt3dadd(-257.316980732799, 1090.63494468311, 34.5666055591974, 0.45)
    pt3dadd(-257.545221488433, 1091.60804122512, 34.598058339506, 0.45)
    pt3dadd(-257.773462244066, 1092.58113776713, 34.6295111198147, 0.45)
    pt3dadd(-258.0017029997, 1093.55423430915, 34.6609639001233, 0.45)
    pt3dadd(-258.229943755333, 1094.52733085116, 34.692416680432, 0.45)
    pt3dadd(-258.458184510967, 1095.50042739317, 34.7238694607406, 0.45)
    pt3dadd(-258.6864252666, 1096.47352393519, 34.7553222410492, 0.45)
    pt3dadd(-258.914666022234, 1097.4466204772, 34.7867750213579, 0.45)
    pt3dadd(-259.142906777867, 1098.41971701921, 34.8182278016665, 0.45)
    pt3dadd(-259.371147533501, 1099.39281356123, 34.8496805819752, 0.45)
    pt3dadd(-259.599388289134, 1100.36591010324, 34.8811333622838, 0.45)
    pt3dadd(-259.827629044767, 1101.33900664526, 34.9125861425925, 0.45)
    pt3dadd(-260.055869800401, 1102.31210318727, 34.9440389229011, 0.45)
    pt3dadd(-260.284110556034, 1103.28519972928, 34.9754917032097, 0.45)
    pt3dadd(-260.512351311668, 1104.2582962713, 35.0069444835184, 0.45)
    pt3dadd(-260.740592067301, 1105.23139281331, 35.038397263827, 0.45)
    pt3dadd(-260.968832822935, 1106.20448935532, 35.0698500441357, 0.45)
    pt3dadd(-261.197073578568, 1107.17758589734, 35.1013028244443, 0.45)
    pt3dadd(-261.425314334202, 1108.15068243935, 35.1327556047529, 0.45)
    pt3dadd(-261.653555089835, 1109.12377898136, 35.1642083850616, 0.45)
    pt3dadd(-261.881795845469, 1110.09687552338, 35.1956611653702, 0.45)
    pt3dadd(-262.110036601102, 1111.06997206539, 35.2271139456789, 0.45)
    pt3dadd(-262.338277356736, 1112.0430686074, 35.2585667259875, 0.45)
    pt3dadd(-262.566518112369, 1113.01616514942, 35.2900195062962, 0.45)
    pt3dadd(-262.794758868003, 1113.98926169143, 35.3214722866048, 0.45)
    pt3dadd(-263.022999623636, 1114.96235823344, 35.3529250669134, 0.45)
    pt3dadd(-263.25124037927, 1115.93545477546, 35.3843778472221, 0.45)
    pt3dadd(-263.479481134903, 1116.90855131747, 35.4158306275307, 0.45)
    pt3dadd(-263.707721890537, 1117.88164785949, 35.4472834078394, 0.45)
    pt3dadd(-263.93596264617, 1118.8547444015, 35.478736188148, 0.45)
    pt3dadd(-264.164203401803, 1119.82784094351, 35.5101889684566, 0.45)
    pt3dadd(-264.392444157437, 1120.80093748553, 35.5416417487653, 0.45)
    pt3dadd(-264.62068491307, 1121.77403402754, 35.5730945290739, 0.45)
    pt3dadd(-264.848925668704, 1122.74713056955, 35.6045473093826, 0.45)
    pt3dadd(-265.077166424337, 1123.72022711157, 35.6360000896912, 0.45)
    pt3dadd(-265.305407179971, 1124.69332365358, 35.6674528699999, 0.45)
    pt3dadd(-265.533647935604, 1125.66642019559, 35.6989056503085, 0.45)
    pt3dadd(-265.761888691238, 1126.63951673761, 35.7303584306171, 0.45)
    pt3dadd(-265.990129446871, 1127.61261327962, 35.7618112109258, 0.45)
    pt3dadd(-266.218370202505, 1128.58570982163, 35.7932639912344, 0.45)
    pt3dadd(-266.446610958138, 1129.55880636365, 35.8247167715431, 0.45)
    pt3dadd(-266.674851713772, 1130.53190290566, 35.8561695518517, 0.45)
    pt3dadd(-266.903092469405, 1131.50499944767, 35.8876223321603, 0.45)
    pt3dadd(-267.131333225039, 1132.47809598969, 35.919075112469, 0.45)
    pt3dadd(-267.359573980672, 1133.4511925317, 35.9505278927776, 0.45)
    pt3dadd(-267.587814736306, 1134.42428907372, 35.9819806730863, 0.45)
    pt3dadd(-267.816055491939, 1135.39738561573, 36.0134334533949, 0.45)
    pt3dadd(-268.044296247573, 1136.37048215774, 36.0448862337036, 0.45)
    pt3dadd(-268.272537003206, 1137.34357869976, 36.0763390140122, 0.45)
    pt3dadd(-268.500777758839, 1138.31667524177, 36.1077917943208, 0.45)
    pt3dadd(-268.729018514473, 1139.28977178378, 36.1392445746295, 0.45)
    pt3dadd(-268.957259270106, 1140.2628683258, 36.1706973549381, 0.45)
    pt3dadd(-269.18550002574, 1141.23596486781, 36.2021501352468, 0.45)
    pt3dadd(-269.413740781373, 1142.20906140982, 36.2336029155554, 0.45)
    pt3dadd(-269.641981537007, 1143.18215795184, 36.265055695864, 0.45)
    pt3dadd(-269.87022229264, 1144.15525449385, 36.2965084761727, 0.45)
    pt3dadd(-270.098463048274, 1145.12835103586, 36.3279612564813, 0.45)
    pt3dadd(-270.326703803907, 1146.10144757788, 36.35941403679, 0.45)
    pt3dadd(-270.554944559541, 1147.07454411989, 36.3908668170986, 0.45)
    pt3dadd(-270.783185315174, 1148.04764066191, 36.4223195974073, 0.45)
    pt3dadd(-271.011426070808, 1149.02073720392, 36.4537723777159, 0.45)
    pt3dadd(-271.239666826441, 1149.99383374593, 36.4852251580245, 0.45)
    pt3dadd(-271.467907582075, 1150.96693028795, 36.5166779383332, 0.45)
    pt3dadd(-271.696148337708, 1151.94002682996, 36.5481307186418, 0.45)
    pt3dadd(-271.924389093342, 1152.91312337197, 36.5795834989505, 0.45)
    pt3dadd(-272.152629848975, 1153.88621991399, 36.6110362792591, 0.45)
    pt3dadd(-272.380870604608, 1154.859316456, 36.6424890595678, 0.45)
    pt3dadd(-272.609111360242, 1155.83241299801, 36.6739418398764, 0.45)
    pt3dadd(-272.837352115875, 1156.80550954003, 36.705394620185, 0.45)
    pt3dadd(-273.065592871509, 1157.77860608204, 36.7368474004937, 0.45)
    pt3dadd(-273.293833627142, 1158.75170262405, 36.7683001808023, 0.45)
    pt3dadd(-273.522074382776, 1159.72479916607, 36.799752961111, 0.45)
    pt3dadd(-273.750315138409, 1160.69789570808, 36.8312057414196, 0.45)
    pt3dadd(-273.978555894043, 1161.67099225009, 36.8626585217282, 0.45)
    pt3dadd(-274.206796649676, 1162.64408879211, 36.8941113020369, 0.45)
    pt3dadd(-274.43503740531, 1163.61718533412, 36.9255640823455, 0.45)
    pt3dadd(-274.663278160943, 1164.59028187614, 36.9570168626542, 0.45)
    pt3dadd(-274.891518916577, 1165.56337841815, 36.9884696429628, 0.45)
    pt3dadd(-275.11975967221, 1166.53647496016, 37.0199224232715, 0.45)
    pt3dadd(-275.348000427844, 1167.50957150218, 37.0513752035801, 0.45)
    pt3dadd(-275.576241183477, 1168.48266804419, 37.0828279838887, 0.45)
    pt3dadd(-275.804481939111, 1169.4557645862, 37.1142807641974, 0.45)
    pt3dadd(-276.032722694744, 1170.42886112822, 37.145733544506, 0.45)
    pt3dadd(-276.260963450378, 1171.40195767023, 37.1771863248147, 0.45)
    pt3dadd(-276.489204206011, 1172.37505421224, 37.2086391051233, 0.45)
    pt3dadd(-276.717444961644, 1173.34815075426, 37.240091885432, 0.45)
    pt3dadd(-276.945685717278, 1174.32124729627, 37.2715446657406, 0.45)
    pt3dadd(-277.173926472911, 1175.29434383828, 37.3029974460492, 0.45)
    pt3dadd(-277.402167228545, 1176.2674403803, 37.3344502263579, 0.45)
    pt3dadd(-277.630407984178, 1177.24053692231, 37.3659030066665, 0.45)
    pt3dadd(-277.858648739812, 1178.21363346433, 37.3973557869752, 0.45)
    pt3dadd(-278.086889495445, 1179.18673000634, 37.4288085672838, 0.45)
    pt3dadd(-278.315130251079, 1180.15982654835, 37.4602613475924, 0.45)
    pt3dadd(-278.543371006712, 1181.13292309037, 37.4917141279011, 0.45)
    pt3dadd(-278.771611762346, 1182.10601963238, 37.5231669082097, 0.45)
    pt3dadd(-278.999852517979, 1183.07911617439, 37.5546196885184, 0.45)
    pt3dadd(-279.228093273613, 1184.05221271641, 37.586072468827, 0.45)
    pt3dadd(-279.456334029246, 1185.02530925842, 37.6175252491357, 0.45)
    pt3dadd(-279.68457478488, 1185.99840580043, 37.6489780294443, 0.45)
    pt3dadd(-279.912815540513, 1186.97150234245, 37.6804308097529, 0.45)
    pt3dadd(-280.141056296147, 1187.94459888446, 37.7118835900616, 0.45)
    pt3dadd(-280.36929705178, 1188.91769542647, 37.7433363703702, 0.45)
    pt3dadd(-280.597537807413, 1189.89079196849, 37.7747891506789, 0.45)
    pt3dadd(-280.825778563047, 1190.8638885105, 37.8062419309875, 0.45)
    pt3dadd(-281.05401931868, 1191.83698505251, 37.8376947112961, 0.45)
    pt3dadd(-281.282260074314, 1192.81008159453, 37.8691474916048, 0.45)
    pt3dadd(-281.510500829947, 1193.78317813654, 37.9006002719134, 0.45)
    pt3dadd(-281.738741585581, 1194.75627467856, 37.9320530522221, 0.45)
    pt3dadd(-281.966982341214, 1195.72937122057, 37.9635058325307, 0.45)
    pt3dadd(-282.195223096848, 1196.70246776258, 37.9949586128394, 0.45)
    pt3dadd(-282.423463852481, 1197.6755643046, 38.026411393148, 0.45)
    pt3dadd(-282.651704608115, 1198.64866084661, 38.0578641734566, 0.45)
    pt3dadd(-282.879945363748, 1199.62175738862, 38.0893169537653, 0.45)
    pt3dadd(-283.108186119382, 1200.59485393064, 38.1207697340739, 0.45)
    pt3dadd(-283.336426875015, 1201.56795047265, 38.1522225143826, 0.45)
    pt3dadd(-283.564667630649, 1202.54104701466, 38.1836752946912, 0.45)
    pt3dadd(-283.792908386282, 1203.51414355668, 38.2151280749998, 0.45)
    pt3dadd(-284.021149141916, 1204.48724009869, 38.2465808553085, 0.45)
    pt3dadd(-284.249389897549, 1205.4603366407, 38.2780336356171, 0.45)
    pt3dadd(-284.477630653182, 1206.43343318272, 38.3094864159258, 0.45)
    pt3dadd(-284.705871408816, 1207.40652972473, 38.3409391962344, 0.45)
    pt3dadd(-284.934112164449, 1208.37962626674, 38.3723919765431, 0.45)
    pt3dadd(-285.162352920083, 1209.35272280876, 38.4038447568517, 0.45)
    pt3dadd(-285.390593675716, 1210.32581935077, 38.4352975371603, 0.45)
    pt3dadd(-285.61883443135, 1211.29891589279, 38.466750317469, 0.45)
    pt3dadd(-285.847075186983, 1212.2720124348, 38.4982030977776, 0.45)
    pt3dadd(-286.075315942617, 1213.24510897681, 38.5296558780863, 0.45)
    pt3dadd(-286.30355669825, 1214.21820551883, 38.5611086583949, 0.45)
    pt3dadd(-286.531797453884, 1215.19130206084, 38.5925614387035, 0.45)
    pt3dadd(-286.760038209517, 1216.16439860285, 38.6240142190122, 0.45)
    pt3dadd(-286.988278965151, 1217.13749514487, 38.6554669993208, 0.45)
    pt3dadd(-287.216519720784, 1218.11059168688, 38.6869197796295, 0.45)
    pt3dadd(-287.444760476418, 1219.08368822889, 38.7183725599381, 0.45)
    pt3dadd(-287.673001232051, 1220.05678477091, 38.7498253402468, 0.45)
    pt3dadd(-287.901241987685, 1221.02988131292, 38.7812781205554, 0.45)
    pt3dadd(-288.129482743318, 1222.00297785493, 38.812730900864, 0.45)
    pt3dadd(-288.357723498951, 1222.97607439695, 38.8441836811727, 0.45)
    pt3dadd(-288.585964254585, 1223.94917093896, 38.8756364614813, 0.45)
    pt3dadd(-288.814205010218, 1224.92226748098, 38.90708924179, 0.45)
    pt3dadd(-289.042445765852, 1225.89536402299, 38.9385420220986, 0.45)
    pt3dadd(-289.270686521485, 1226.868460565, 38.9699948024073, 0.45)
    pt3dadd(-289.498927277119, 1227.84155710702, 39.0014475827159, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-289.727168032752, 1228.81465364903, 39.0329003630245, 0.45)
    pt3dadd(-289.955408788386, 1229.78775019104, 39.0643531433332, 0.45)
    pt3dadd(-290.183649544019, 1230.76084673306, 39.0958059236418, 0.45)
    pt3dadd(-290.411890299653, 1231.73394327507, 39.1272587039505, 0.45)
    pt3dadd(-290.640131055286, 1232.70703981708, 39.1587114842591, 0.45)
    pt3dadd(-290.86837181092, 1233.6801363591, 39.1901642645677, 0.45)
    pt3dadd(-291.096612566553, 1234.65323290111, 39.2216170448764, 0.45)
    pt3dadd(-291.324853322187, 1235.62632944312, 39.253069825185, 0.45)
    pt3dadd(-291.55309407782, 1236.59942598514, 39.2845226054937, 0.45)
    pt3dadd(-291.781334833454, 1237.57252252715, 39.3159753858023, 0.45)
    pt3dadd(-292.009575589087, 1238.54561906916, 39.347428166111, 0.45)
    pt3dadd(-292.237816344721, 1239.51871561118, 39.3788809464196, 0.45)
    pt3dadd(-292.466057100354, 1240.49181215319, 39.4103337267282, 0.45)
    pt3dadd(-292.694297855987, 1241.46490869521, 39.4417865070369, 0.45)
    pt3dadd(-292.922538611621, 1242.43800523722, 39.4732392873455, 0.45)
    pt3dadd(-293.150779367254, 1243.41110177923, 39.5046920676542, 0.45)
    pt3dadd(-293.379020122888, 1244.38419832125, 39.5361448479628, 0.45)
    pt3dadd(-293.607260878521, 1245.35729486326, 39.5675976282714, 0.45)
    pt3dadd(-293.835501634155, 1246.33039140527, 39.5990504085801, 0.45)
    pt3dadd(-294.063742389788, 1247.30348794729, 39.6305031888887, 0.45)
    pt3dadd(-294.291983145422, 1248.2765844893, 39.6619559691974, 0.45)
    pt3dadd(-294.520223901055, 1249.24968103131, 39.693408749506, 0.45)
    pt3dadd(-294.748464656689, 1250.22277757333, 39.7248615298147, 0.45)
    pt3dadd(-294.976705412322, 1251.19587411534, 39.7563143101233, 0.45)
    pt3dadd(-295.204946167956, 1252.16897065735, 39.7877670904319, 0.45)
    pt3dadd(-295.433186923589, 1253.14206719937, 39.8192198707406, 0.45)
    pt3dadd(-295.661427679223, 1254.11516374138, 39.8506726510492, 0.45)
    pt3dadd(-295.889668434856, 1255.08826028339, 39.8821254313579, 0.45)
    pt3dadd(-296.11790919049, 1256.06135682541, 39.9135782116665, 0.45)
    pt3dadd(-296.346149946123, 1257.03445336742, 39.9450309919751, 0.45)
    pt3dadd(-296.574390701757, 1258.00754990944, 39.9764837722838, 0.45)
    pt3dadd(-296.80263145739, 1258.98064645145, 40.0079365525924, 0.45)
    pt3dadd(-297.030872213023, 1259.95374299346, 40.0393893329011, 0.45)
    pt3dadd(-297.259112968657, 1260.92683953548, 40.0708421132097, 0.45)
    pt3dadd(-297.48735372429, 1261.89993607749, 40.1022948935184, 0.45)
    pt3dadd(-297.715594479924, 1262.8730326195, 40.133747673827, 0.45)
    pt3dadd(-297.943835235557, 1263.84612916152, 40.1652004541356, 0.45)
    pt3dadd(-298.172075991191, 1264.81922570353, 40.1966532344443, 0.45)
    pt3dadd(-298.400316746824, 1265.79232224554, 40.2281060147529, 0.45)
    pt3dadd(-298.628557502458, 1266.76541878756, 40.2595587950616, 0.45)
    pt3dadd(-298.856798258091, 1267.73851532957, 40.2910115753702, 0.45)
    pt3dadd(-299.085039013725, 1268.71161187158, 40.3224643556788, 0.45)
    pt3dadd(-299.313279769358, 1269.6847084136, 40.3539171359875, 0.45)
    pt3dadd(-299.541520524992, 1270.65780495561, 40.3853699162961, 0.45)
    pt3dadd(-299.769761280625, 1271.63090149763, 40.4168226966048, 0.45)
    pt3dadd(-299.998002036259, 1272.60399803964, 40.4482754769134, 0.45)
    pt3dadd(-300.226242791892, 1273.57709458165, 40.4797282572221, 0.45)
    pt3dadd(-300.454483547526, 1274.55019112367, 40.5111810375307, 0.45)
    pt3dadd(-300.682724303159, 1275.52328766568, 40.5426338178393, 0.45)
    pt3dadd(-300.910965058793, 1276.49638420769, 40.574086598148, 0.45)
    pt3dadd(-301.139205814426, 1277.46948074971, 40.6055393784566, 0.45)
    pt3dadd(-301.367446570059, 1278.44257729172, 40.6369921587653, 0.45)
    pt3dadd(-301.595687325693, 1279.41567383373, 40.6684449390739, 0.45)
    pt3dadd(-301.823928081326, 1280.38877037575, 40.6998977193825, 0.45)
    pt3dadd(-302.05216883696, 1281.36186691776, 40.7313504996912, 0.45)
    pt3dadd(-302.280409592593, 1282.33496345977, 40.7628032799998, 0.45)
    pt3dadd(-302.508650348227, 1283.30806000179, 40.7942560603085, 0.45)
    pt3dadd(-302.73689110386, 1284.2811565438, 40.8257088406171, 0.45)
    pt3dadd(-302.965131859494, 1285.25425308582, 40.8571616209258, 0.45)
    pt3dadd(-303.193372615127, 1286.22734962783, 40.8886144012344, 0.45)
    pt3dadd(-303.421613370761, 1287.20044616984, 40.920067181543, 0.45)
    pt3dadd(-303.649854126394, 1288.17354271186, 40.9515199618517, 0.45)
    pt3dadd(-303.878094882028, 1289.14663925387, 40.9829727421603, 0.45)
    pt3dadd(-304.106335637661, 1290.11973579588, 41.014425522469, 0.45)
    pt3dadd(-304.334576393295, 1291.0928323379, 41.0458783027776, 0.45)
    pt3dadd(-304.562817148928, 1292.06592887991, 41.0773310830863, 0.45)
    pt3dadd(-304.791057904562, 1293.03902542192, 41.1087838633949, 0.45)
    pt3dadd(-305.019298660195, 1294.01212196394, 41.1402366437035, 0.45)
    pt3dadd(-305.247539415828, 1294.98521850595, 41.1716894240122, 0.45)
    pt3dadd(-305.475780171462, 1295.95831504796, 41.2031422043208, 0.45)
    pt3dadd(-305.704020927095, 1296.93141158998, 41.2345949846295, 0.45)
    pt3dadd(-305.932261682729, 1297.90450813199, 41.2660477649381, 0.45)
    pt3dadd(-306.160502438362, 1298.877604674, 41.2975005452467, 0.45)
    pt3dadd(-306.388743193996, 1299.85070121602, 41.3289533255554, 0.45)
    pt3dadd(-306.616983949629, 1300.82379775803, 41.360406105864, 0.45)
    pt3dadd(-306.845224705263, 1301.79689430005, 41.3918588861727, 0.45)
    pt3dadd(-307.073465460896, 1302.76999084206, 41.4233116664813, 0.45)
    pt3dadd(-307.30170621653, 1303.74308738407, 41.45476444679, 0.45)
    pt3dadd(-307.529946972163, 1304.71618392609, 41.4862172270986, 0.45)
    pt3dadd(-307.758187727797, 1305.6892804681, 41.5176700074072, 0.45)
    pt3dadd(-307.98642848343, 1306.66237701011, 41.5491227877159, 0.45)
    pt3dadd(-308.214669239064, 1307.63547355213, 41.5805755680245, 0.45)
    pt3dadd(-308.442909994697, 1308.60857009414, 41.6120283483332, 0.45)
    pt3dadd(-308.671150750331, 1309.58166663615, 41.6434811286418, 0.45)
    pt3dadd(-308.899391505964, 1310.55476317817, 41.6749339089505, 0.45)
    pt3dadd(-309.127632261597, 1311.52785972018, 41.7063866892591, 0.45)
    pt3dadd(-309.355873017231, 1312.50095626219, 41.7378394695677, 0.45)
    pt3dadd(-309.584113772864, 1313.47405280421, 41.7692922498764, 0.45)
    pt3dadd(-309.812354528498, 1314.44714934622, 41.800745030185, 0.45)
    pt3dadd(-310.040595284131, 1315.42024588823, 41.8321978104937, 0.45)
    pt3dadd(-310.268836039765, 1316.39334243025, 41.8636505908023, 0.45)
    pt3dadd(-310.497076795398, 1317.36643897226, 41.8951033711109, 0.45)
    pt3dadd(-310.725317551032, 1318.33953551428, 41.9265561514196, 0.45)
    pt3dadd(-310.953558306665, 1319.31263205629, 41.9580089317282, 0.45)
    pt3dadd(-311.181799062299, 1320.2857285983, 41.9894617120369, 0.45)
    pt3dadd(-311.410039817932, 1321.25882514032, 42.0209144923455, 0.45)
    pt3dadd(-311.638280573566, 1322.23192168233, 42.0523672726542, 0.45)
    pt3dadd(-311.866521329199, 1323.20501822434, 42.0838200529628, 0.45)
    pt3dadd(-312.094762084833, 1324.17811476636, 42.1152728332714, 0.45)
    pt3dadd(-312.323002840466, 1325.15121130837, 42.1467256135801, 0.45)
    pt3dadd(-312.5512435961, 1326.12430785038, 42.1781783938887, 0.45)
    pt3dadd(-312.779484351733, 1327.0974043924, 42.2096311741974, 0.45)
    pt3dadd(-313.007725107366, 1328.07050093441, 42.241083954506, 0.45)
    pt3dadd(-313.235965863, 1329.04359747642, 42.2725367348146, 0.45)
    pt3dadd(-313.464206618633, 1330.01669401844, 42.3039895151233, 0.45)
    pt3dadd(-313.692447374267, 1330.98979056045, 42.3354422954319, 0.45)
    pt3dadd(-313.9206881299, 1331.96288710246, 42.3668950757406, 0.45)
    pt3dadd(-314.148928885534, 1332.93598364448, 42.3983478560492, 0.45)
    pt3dadd(-314.377169641167, 1333.90908018649, 42.4298006363579, 0.45)
    pt3dadd(-314.605410396801, 1334.88217672851, 42.4612534166665, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-6.48039029161352, 21.2018450102206, 0, 10.2667572303772)
    pt3dadd(-6.13267887384649, 20.2725044159011, -0.124188685894976, 10.2667572303772)
    pt3dadd(-5.78496745607947, 19.3431638215815, -0.248377371789953, 9.58775356515897)
    pt3dadd(-5.43725603831245, 18.413823227262, -0.372566057684929, 8.52332145975835)
    pt3dadd(-5.08954462054542, 17.4844826329425, -0.496754743579905, 7.16804037792357)
    pt3dadd(-4.7418332027784, 16.555142038623, -0.620943429474881, 5.64233299132873)
    pt3dadd(-4.39412178501138, 15.6258014443035, -0.745132115369858, 4.08176509672935)
    pt3dadd(-4.04641036724435, 14.696460849984, -0.869320801264834, 3.85174675281122)
    pt3dadd(-3.69869894947733, 13.7671202556645, -0.99350948715981, 3.98430771749854)
    pt3dadd(-3.3509875317103, 12.837779661345, -1.11769817305479, 4.11686868218585)
    pt3dadd(-3.00327611394328, 11.9084390670255, -1.24188685894976, 4.24942964687317)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-3.00327611394328, 11.9084390670255, -1.24188685894976, 4.38199061156049)
    pt3dadd(-2.65556469617626, 10.979098472706, -1.36607554484474, 4.38199061156049)
    pt3dadd(-2.30785327840923, 10.0497578783865, -1.49026423073972, 4.5145515762478)
    pt3dadd(-1.96014186064221, 9.12041728406703, -1.61445291663469, 4.64711254093512)
    pt3dadd(-1.61243044287518, 8.19107668974752, -1.73864160252967, 4.77967350562244)
    pt3dadd(-1.26471902510816, 7.26173609542802, -1.86283028842464, 4.91223447030975)
    pt3dadd(-0.856449538619865, 6.35948326871724, -1.99229484604421, 4.78985980179847)
    pt3dadd(-0.414067505511699, 5.47248906492646, -2.12473131845508, 4.52387910594539)
    pt3dadd(0.0283145275964651, 4.58549486113567, -2.25716779086595, 4.2578984100923)
    pt3dadd(0.430260134271347, 3.68268060850404, -2.38588517510795, 4.05)
    pt3dadd(0.687468517622791, 2.72324043355346, -2.50129053990763, 4.05)
    pt3dadd(0.944676900974237, 1.76380025860288, -2.61669590470731, 4.05)
    pt3dadd(1.20188528432568, 0.804360083652309, -2.73210126950699, 4.05)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(1.20188528432568, 0.804360083652309, -2.73210126950699, 4.05)
    pt3dadd(1.45909366767713, -0.155080091298266, -2.84750663430667, 4.05)
    pt3dadd(1.76984282518727, -0.975503122505219, -2.3937013648255, 4.05)
    pt3dadd(2.08436586073883, -1.78612738344038, -1.89977468232014, 4.05)
    pt3dadd(2.3988888962904, -2.59675164437554, -1.40584799981477, 4.05)
    pt3dadd(2.71341193184196, -3.4073759053107, -0.911921317309408, 4.05)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(2.71341193184196, -3.4073759053107, -0.911921317309408, 3.72222478179642)
    pt3dadd(3.15159435867612, -3.74445718697127, -1.74055353865784, 3.72222478179642)
    pt3dadd(3.59025813033699, -4.07969520011065, -2.57433382745017, 3.39317369684328)
    pt3dadd(4.02892190199786, -4.41493321325003, -3.4081141162425, 3.06412261189014)
    pt3dadd(4.46758567365873, -4.75017122638941, -4.24189440503482, 2.73507152693701)
    pt3dadd(5.2466939710416, -5.27951960334367, -4.46564018139878, 2.7)
    pt3dadd(5.9558220236852, -5.88307856917503, -4.60711128603606, 2.67867698324954)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(5.9558220236852, -5.88307856917503, -4.60711128603606, 2.55820487842203)
    pt3dadd(6.71419977432822, -6.58661778708906, -4.76343301514939, 2.55820487842203)
    pt3dadd(7.38783874184774, -7.31082072862277, -4.9108800934967, 2.43773277359453)
    pt3dadd(8.06147770936727, -8.03502367015647, -5.058327171844, 2.31726066876703)
    pt3dadd(8.74584261506706, -8.74880854709486, -5.20622226381872, 2.20100098715243)
    pt3dadd(9.44376539156626, -9.44942471362403, -5.35468365692017, 2.09006592038393)
    pt3dadd(10.1416881680655, -10.1500408801532, -5.50314505002163, 1.97913085361543)
    pt3dadd(10.8396109445647, -10.8506570466824, -5.65160644312308, 1.86819578684693)
    pt3dadd(11.4880542648042, -11.5932930056149, -5.79747840777364, 1.84907438584369)
    pt3dadd(12.0575470164199, -12.4029767204139, -5.93921862029788, 1.97645300055558)
    pt3dadd(12.6270397680356, -13.212660435213, -6.08095883282212, 2.10383161526746)
    pt3dadd(13.1965325196513, -14.022344150012, -6.22269904534635, 2.23121022997935)
    pt3dadd(13.6458337194778, -14.8552412747798, -5.9533105211526, 2.25)
    pt3dadd(14.0743374642529, -15.6921551531649, -5.61278196011825, 2.25)
    pt3dadd(14.5028412090281, -16.52906903155, -5.27225339908389, 2.25)
    pt3dadd(14.9313449538032, -17.365982909935, -4.93172483804955, 2.25)
    pt3dadd(15.3598486985784, -18.2028967883201, -4.59119627701519, 2.25)
    pt3dadd(15.7883524433535, -19.0398106667052, -4.25066771598084, 2.25)
    pt3dadd(16.1497350966704, -19.9419622372926, -4.06315153077457, 2.25)
    pt3dadd(16.4686370468875, -20.885402514204, -3.9724763409532, 2.25)
    pt3dadd(16.7875389971046, -21.8288427911154, -3.88180115113184, 2.25)
    pt3dadd(17.1064409473217, -22.7722830680267, -3.79112596131048, 2.25)
    pt3dadd(17.4253428975388, -23.7157233449381, -3.70045077148911, 2.25)
    pt3dadd(17.7442448477559, -24.6591636218494, -3.60977558166774, 2.25)
    pt3dadd(18.0631467979731, -25.6026038987608, -3.51910039184638, 2.25)
    pt3dadd(18.3114312474376, -26.5010591969203, -3.19407281474829, 2.18682500307309)
    pt3dadd(18.5306507087534, -27.3809994264301, -2.77258969495509, 2.09764822871966)
    pt3dadd(18.7498701700691, -28.26093965594, -2.3511065751619, 2.00847145436622)
    pt3dadd(18.9690896313848, -29.1408798854498, -1.92962345536871, 1.91929468001278)
    pt3dadd(19.1883090927006, -30.0208201149597, -1.50814033557552, 1.83011790565934)
    pt3dadd(19.5985144649413, -30.8812970477983, -1.45684635440076, 1.88508582700003)
    pt3dadd(20.1061158045396, -31.7318483971314, -1.59433556192497, 2.01356237527864)
    pt3dadd(20.6137171441378, -32.5823997464646, -1.73182476944917, 2.14203892355725)
    pt3dadd(21.134177782957, -33.3291433334013, -1.72224359343314, 2.25)
    pt3dadd(21.7223094847326, -33.5296066367993, -0.938715951701672, 2.25)
    pt3dadd(22.3104411865082, -33.7300699401973, -0.155188309970205, 2.25)
    pt3dadd(22.8985728882839, -33.9305332435953, 0.628339331761264, 2.25)
    pt3dadd(23.4867045900595, -34.1309965469933, 1.41186697349273, 2.25)
    pt3dadd(24.0748362918351, -34.3314598503913, 2.1953946152242, 2.25)
    pt3dadd(24.6629679936107, -34.5319231537894, 2.97892225695567, 2.25)
    pt3dadd(25.2591302717211, -34.8677135076784, 3.69499543651097, 2.25)
    pt3dadd(25.8619734561091, -35.3160869818172, 4.35495098253326, 2.25)
    pt3dadd(26.4648166404972, -35.7644604559559, 5.01490652855554, 2.25)
    pt3dadd(27.0676598248853, -36.2128339300947, 5.67486207457783, 2.25)
    pt3dadd(27.6626815129015, -36.7010669074629, 6.3076223262232, 2.25)
    pt3dadd(28.2341614800441, -37.3092719789895, 6.85852816039455, 2.25)
    pt3dadd(28.8056414471866, -37.9174770505161, 7.4094339945659, 2.25)
    pt3dadd(29.3771214143292, -38.5256821220427, 7.96033982873726, 2.25)
    pt3dadd(29.9486013814718, -39.1338871935694, 8.51124566290861, 2.25)
    pt3dadd(30.5200813486143, -39.742092265096, 9.06215149707996, 2.25)
    pt3dadd(31.1134184332854, -40.1907304171624, 9.72934418173887, 2.25)
    pt3dadd(31.7076023055606, -40.6331866337901, 10.4010420470738, 2.25)
    pt3dadd(32.3017861778359, -41.0756428504178, 11.0727399124087, 2.25)
    pt3dadd(32.8959700501111, -41.5180990670455, 11.7444377777437, 2.25)
    pt3dadd(33.602872444147, -42.0630952086862, 12.0881207566788, 2.25)
    pt3dadd(34.3831464303239, -42.6748374133404, 12.2182898065351, 2.25)
    pt3dadd(35.1634204165008, -43.2865796179946, 12.3484588563914, 2.25)
    pt3dadd(35.9436944026776, -43.8983218226488, 12.4786279062477, 2.25)
    pt3dadd(36.7239683888545, -44.510064027303, 12.608796956104, 2.25)
    pt3dadd(37.5042423750314, -45.1218062319572, 12.7389660059603, 2.25)
    pt3dadd(38.0705702833532, -45.8118473551306, 13.1218859590407, 2.25)
    pt3dadd(38.5325213933736, -46.540087778368, 13.6281142256497, 2.25)
    pt3dadd(38.994472503394, -47.2683282016055, 14.1343424922586, 2.25)
    pt3dadd(39.4564236134144, -47.9965686248429, 14.6405707588675, 2.25)
    pt3dadd(39.9183747234348, -48.7248090480804, 15.1467990254764, 2.25)
    pt3dadd(40.3803258334552, -49.4530494713178, 15.6530272920853, 2.25)
    pt3dadd(40.8457157323221, -50.1851162518064, 16.1500839084166, 2.25)
    pt3dadd(41.3243274650178, -50.9318950317816, 16.6118763543323, 2.25)
    pt3dadd(41.8029391977134, -51.6786738117569, 17.073668800248, 2.25)
    pt3dadd(42.281550930409, -52.4254525917321, 17.5354612461636, 2.25)
    pt3dadd(42.7601626631047, -53.1722313717074, 17.9972536920793, 2.25)
    pt3dadd(43.2387743958003, -53.9190101516826, 18.459046137995, 2.25)
    pt3dadd(43.8431273846724, -54.6406449180122, 18.6679922266348, 2.25)
    pt3dadd(44.5575269563601, -55.3402740764442, 18.6556515360451, 2.25)
    pt3dadd(45.2719265280477, -56.0399032348762, 18.6433108454554, 2.25)
    pt3dadd(45.9863260997354, -56.7395323933082, 18.6309701548656, 2.25)
    pt3dadd(46.7007256714231, -57.4391615517401, 18.6186294642759, 2.25)
    pt3dadd(47.5839802485064, -57.8471026399069, 18.8172863938476, 2.25)
    pt3dadd(48.482165423556, -58.2292519116069, 19.0346002807955, 2.25)
    pt3dadd(49.3803505986055, -58.6114011833069, 19.2519141677435, 2.25)
    pt3dadd(50.278535773655, -58.9935504550069, 19.4692280546915, 2.25)
    pt3dadd(51.1767209487045, -59.3756997267069, 19.6865419416394, 2.25)
    pt3dadd(52.074906123754, -59.7578489984069, 19.9038558285874, 2.25)
    pt3dadd(52.9730912988035, -60.1399982701069, 20.1211697155354, 2.25)
    pt3dadd(53.8419096206369, -60.5574192411538, 20.3463214605632, 2.25)
    pt3dadd(54.4368124497928, -61.3038323869187, 20.6445798044391, 2.25)
    pt3dadd(55.0317152789488, -62.0502455326837, 20.942838148315, 2.25)
    pt3dadd(55.6266181081047, -62.7966586784486, 21.2410964921909, 2.25)
    pt3dadd(56.2215209372606, -63.5430718242135, 21.5393548360668, 2.25)
    pt3dadd(56.8164237664165, -64.2894849699785, 21.8376131799427, 2.25)
    pt3dadd(57.4113265955724, -65.0358981157434, 22.1358715238186, 2.25)
    pt3dadd(58.0943899583886, -65.5410002168919, 22.6629182529703, 2.25)
    pt3dadd(58.7778392359182, -66.0450460009021, 23.1909664824587, 2.25)
    pt3dadd(59.4612885134478, -66.5490917849123, 23.7190147119471, 2.25)
    pt3dadd(60.1447377909774, -67.0531375689224, 24.2470629414355, 2.25)
    pt3dadd(60.8281870685071, -67.5571833529326, 24.7751111709239, 2.25)
    pt3dadd(61.5116363460367, -68.0612291369428, 25.3031594004122, 2.25)
    pt3dadd(61.8941638983115, -68.9751050130255, 25.319764617975, 2.25)
    pt3dadd(62.2661448857834, -69.9033444237471, 25.3184450184984, 2.25)
    pt3dadd(62.6381258732552, -70.8315838344686, 25.3171254190219, 2.25)
    pt3dadd(63.010106860727, -71.7598232451902, 25.3158058195454, 2.25)
    pt3dadd(63.687537741663, -72.4788759503072, 25.3652136713745, 2.25)
  }
}
proc shape3d_7() {
  adendIML[2] {
    pt3dadd(64.4122401056337, -73.1655548814708, 25.4224721131206, 2.25)
    pt3dadd(65.1369424696044, -73.8522338126345, 25.4797305548667, 2.25)
    pt3dadd(65.8616448335751, -74.5389127437982, 25.5369889966128, 2.25)
    pt3dadd(66.5863471975458, -75.2255916749619, 25.5942474383589, 2.25)
    pt3dadd(67.3110495615165, -75.9122706061256, 25.651505880105, 2.25)
    pt3dadd(68.0215703766119, -76.6092641037258, 25.6991785420179, 2.25)
    pt3dadd(68.480428591614, -77.4892975944255, 25.5767440951816, 2.25)
    pt3dadd(68.9392868066161, -78.3693310851251, 25.4543096483453, 2.25)
    pt3dadd(69.3981450216182, -79.2493645758248, 25.3318752015091, 2.25)
    pt3dadd(69.8570032366203, -80.1293980665244, 25.2094407546728, 2.25)
    pt3dadd(70.3158614516224, -81.009431557224, 25.0870063078365, 2.25)
    pt3dadd(70.7747196666244, -81.8894650479237, 24.9645718610002, 2.25)
    pt3dadd(70.6691459886203, -82.1334987743392, 24.0947571183312, 2.25)
    pt3dadd(70.4875059279207, -82.2918211827665, 23.1242207185301, 2.25)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(70.4875059279207, -82.2918211827665, 23.1242207185301, 2.25)
    pt3dadd(70.7064734229697, -83.0310668690928, 22.7918298809587, 2.25)
    pt3dadd(71.0560363636742, -83.9596897483356, 22.6674703271126, 2.25)
    pt3dadd(71.4055993043786, -84.8883126275785, 22.5431107732665, 2.25)
    pt3dadd(71.755162245083, -85.8169355068213, 22.4187512194204, 2.25)
    pt3dadd(72.1047251857874, -86.7455583860642, 22.2943916655743, 2.25)
    pt3dadd(72.4542881264918, -87.674181265307, 22.1700321117282, 2.25)
    pt3dadd(72.8038510671963, -88.6028041445499, 22.0456725578821, 2.25)
    pt3dadd(73.0932078123665, -89.5233791560635, 22.1370310682808, 2.20747445434213)
    pt3dadd(73.3100781627176, -90.4342647840759, 22.4881074471772, 2.11374946874111)
    pt3dadd(73.5269485130688, -91.3451504120884, 22.8391838260735, 2.02002448314008)
    pt3dadd(73.7438188634199, -92.2560360401008, 23.1902602049698, 1.92629949753906)
    pt3dadd(73.960689213771, -93.1669216681132, 23.5413365838661, 1.83257451193804)
    pt3dadd(74.3299333497794, -94.027756432271, 23.4557130143147, 1.8)
    pt3dadd(74.7803461407895, -94.8619293839443, 23.1374618487375, 1.8)
    pt3dadd(75.2307589317997, -95.6961023356175, 22.8192106831603, 1.8)
    pt3dadd(75.6811717228098, -96.5302752872907, 22.5009595175831, 1.8)
    pt3dadd(76.1315845138199, -97.364448238964, 22.1827083520059, 1.8)
    pt3dadd(76.58199730483, -98.1986211906372, 21.8644571864288, 1.8)
    pt3dadd(77.0324100958401, -99.0327941423105, 21.5462060208516, 1.8)
    pt3dadd(77.4938013238707, -99.9034018338654, 21.387881983021, 1.8)
    pt3dadd(77.9568556383415, -100.779528901424, 21.2537847670105, 1.8)
    pt3dadd(78.4199099528122, -101.655655968982, 21.119687551, 1.8)
    pt3dadd(78.8829642672829, -102.53178303654, 20.9855903349895, 1.8)
    pt3dadd(79.3460185817536, -103.407910104098, 20.851493118979, 1.8)
    pt3dadd(79.8090728962243, -104.284037171657, 20.7173959029685, 1.8)
    pt3dadd(80.2047458900387, -105.193103632585, 20.5889267035657, 1.8)
    pt3dadd(80.5940258899231, -106.105295311894, 20.460991478203, 1.8)
    pt3dadd(80.9833058898075, -107.017486991204, 20.3330562528403, 1.8)
    pt3dadd(81.3725858896919, -107.929678670513, 20.2051210274775, 1.8)
    pt3dadd(81.7618658895764, -108.841870349823, 20.0771858021148, 1.8)
    pt3dadd(82.1511458894608, -109.754062029132, 19.949250576752, 1.8)
    pt3dadd(82.5404258893452, -110.666253708442, 19.8213153513893, 1.8)
    pt3dadd(82.9297058892296, -111.578445387751, 19.6933801260266, 1.8)
    pt3dadd(83.3189858891141, -112.49063706706, 19.5654449006638, 1.8)
    pt3dadd(83.7854320621058, -113.364407555425, 19.4311248324556, 1.8)
    pt3dadd(84.2612892942243, -114.233492258748, 19.2960260793508, 1.8)
    pt3dadd(84.7371465263427, -115.102576962072, 19.160927326246, 1.8)
    pt3dadd(85.2130037584612, -115.971661665395, 19.0258285731411, 1.8)
    pt3dadd(85.6888609905796, -116.840746368718, 18.8907298200363, 1.8)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(85.6888609905796, -116.840746368718, 18.8907298200363, 1.8)
    pt3dadd(86.1647182226981, -117.709831072041, 18.7556310669314, 1.8)
    pt3dadd(86.6405754548165, -118.578915775364, 18.6205323138266, 1.8)
    pt3dadd(87.116432686935, -119.448000478687, 18.4854335607217, 1.8)
    pt3dadd(87.6430968593144, -120.291586978256, 18.3974394901084, 1.8)
    pt3dadd(88.1999981503755, -121.119998538947, 18.3374791855049, 1.8)
    pt3dadd(88.7568994414365, -121.948410099638, 18.2775188809015, 1.8)
    pt3dadd(89.3138007324975, -122.776821660329, 18.217558576298, 1.8)
    pt3dadd(89.8707020235586, -123.60523322102, 18.1575982716946, 1.8)
    pt3dadd(90.4276033146196, -124.433644781711, 18.0976379670911, 1.8)
    pt3dadd(90.9845046056807, -125.262056342402, 18.0376776624876, 1.8)
    pt3dadd(91.5414058967417, -126.090467903093, 17.9777173578842, 1.8)
    pt3dadd(92.0983071878027, -126.918879463784, 17.9177570532807, 1.8)
    pt3dadd(92.6552084788638, -127.747291024475, 17.8577967486772, 1.8)
    pt3dadd(92.9049269440271, -128.676268720421, 17.5893675534063, 1.8)
    pt3dadd(93.1492737615535, -129.607004997243, 17.3172929023042, 1.8)
    pt3dadd(93.39362057908, -130.537741274065, 17.0452182512021, 1.8)
    pt3dadd(93.6379673966064, -131.468477550887, 16.7731436001, 1.8)
    pt3dadd(93.8823142141329, -132.399213827709, 16.5010689489979, 1.8)
    pt3dadd(94.1266610316594, -133.329950104531, 16.2289942978958, 1.8)
    pt3dadd(94.3710078491858, -134.260686381353, 15.9569196467937, 1.8)
    pt3dadd(94.6153546667123, -135.191422658175, 15.6848449956916, 1.8)
    pt3dadd(94.9288816921582, -136.098844469366, 15.44415058599, 1.8)
    pt3dadd(95.4653989190369, -136.931116211722, 15.3046048510516, 1.8)
    pt3dadd(96.0019161459155, -137.763387954077, 15.1650591161133, 1.8)
    pt3dadd(96.5384333727942, -138.595659696432, 15.0255133811749, 1.8)
    pt3dadd(97.0749505996728, -139.427931438787, 14.8859676462366, 1.8)
    pt3dadd(97.6114678265515, -140.260203181142, 14.7464219112982, 1.8)
    pt3dadd(98.1479850534302, -141.092474923498, 14.6068761763598, 1.8)
    pt3dadd(98.6845022803088, -141.924746665853, 14.4673304414215, 1.8)
    pt3dadd(99.2210195071875, -142.757018408208, 14.3277847064831, 1.8)
    pt3dadd(99.763837126902, -143.586224195575, 14.1977502710782, 1.8)
    pt3dadd(100.345381687806, -144.396584323375, 14.1261794183846, 1.8)
    pt3dadd(100.92692624871, -145.206944451174, 14.054608565691, 1.8)
    pt3dadd(101.508470809614, -146.017304578974, 13.9830377129974, 1.8)
    pt3dadd(102.090015370518, -146.827664706774, 13.9114668603038, 1.8)
    pt3dadd(102.671559931422, -147.638024834573, 13.8398960076102, 1.8)
    pt3dadd(103.253104492326, -148.448384962373, 13.7683251549167, 1.8)
    pt3dadd(103.83464905323, -149.258745090173, 13.6967543022231, 1.8)
    pt3dadd(104.416193614134, -150.069105217973, 13.6251834495295, 1.8)
    pt3dadd(104.997738175039, -150.879465345772, 13.5536125968359, 1.8)
    pt3dadd(105.579282735943, -151.689825473572, 13.4820417441423, 1.8)
    pt3dadd(106.160304349885, -152.502058109992, 13.4320828763221, 1.8)
    pt3dadd(106.741108125565, -153.315070756728, 13.3911266752943, 1.8)
    pt3dadd(107.321911901245, -154.128083403465, 13.3501704742666, 1.8)
    pt3dadd(107.902715676925, -154.941096050201, 13.3092142732388, 1.8)
    pt3dadd(108.483519452604, -155.754108696938, 13.268258072211, 1.8)
    pt3dadd(109.064323228284, -156.567121343674, 13.2273018711832, 1.8)
    pt3dadd(109.645127003964, -157.380133990411, 13.1863456701555, 1.8)
    pt3dadd(110.225930779644, -158.193146637147, 13.1453894691277, 1.8)
    pt3dadd(110.765616241235, -159.027501186743, 13.085413473377, 1.8)
    pt3dadd(111.157827217722, -159.938400366269, 12.9572212947471, 1.8)
    pt3dadd(111.55003819421, -160.849299545795, 12.8290291161171, 1.8)
    pt3dadd(111.942249170697, -161.760198725321, 12.7008369374871, 1.8)
    pt3dadd(112.334460147184, -162.671097904847, 12.5726447588571, 1.8)
    pt3dadd(112.726671123671, -163.581997084372, 12.4444525802272, 1.8)
    pt3dadd(113.118882100158, -164.492896263898, 12.3162604015972, 1.8)
    pt3dadd(113.511093076646, -165.403795443424, 12.1880682229672, 1.8)
    pt3dadd(113.90543683487, -166.315885456016, 12.080941678105, 1.8)
    pt3dadd(114.305038534227, -167.23091122619, 12.0257481840401, 1.8)
    pt3dadd(114.704640233585, -168.145936996365, 11.9705546899752, 1.8)
    pt3dadd(115.104241932942, -169.060962766539, 11.9153611959104, 1.8)
    pt3dadd(115.5038436323, -169.975988536714, 11.8601677018455, 1.8)
    pt3dadd(115.941089726873, -170.848697010789, 11.9833527893563, 1.8)
    pt3dadd(116.412750038385, -171.682719337834, 12.2696102059163, 1.8)
    pt3dadd(116.884410349897, -172.516741664878, 12.5558676224762, 1.8)
    pt3dadd(117.356070661409, -173.350763991923, 12.8421250390362, 1.8)
    pt3dadd(117.827730972921, -174.184786318968, 13.1283824555962, 1.8)
    pt3dadd(118.169761851219, -175.079926578153, 13.2529004571441, 1.8)
    pt3dadd(118.327936219172, -176.061751855117, 13.1480195969382, 1.8)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(118.327936219172, -176.061751855117, 13.1480195969382, 1.8)
    pt3dadd(118.869763862917, -176.785800166281, 13.0199397088776, 1.8)
    pt3dadd(119.708538059658, -177.310329833227, 12.8739038387126, 1.8)
    pt3dadd(120.5473122564, -177.834859500172, 12.7278679685476, 1.8)
    pt3dadd(121.386086453141, -178.359389167117, 12.5818320983827, 1.8)
    pt3dadd(122.224860649883, -178.883918834063, 12.4357962282177, 1.8)
    pt3dadd(123.063634846624, -179.408448501008, 12.2897603580528, 1.8)
    pt3dadd(123.777565223615, -179.947686234687, 11.9517007079342, 1.8)
    pt3dadd(124.289467734436, -180.510725221352, 11.3028995682075, 1.8)
    pt3dadd(124.801370245257, -181.073764208016, 10.6540984284809, 1.8)
    pt3dadd(125.313272756077, -181.636803194681, 10.0052972887542, 1.8)
    pt3dadd(125.825175266898, -182.199842181346, 9.35649614902755, 1.8)
    pt3dadd(126.337077777719, -182.762881168011, 8.70769500930088, 1.8)
    pt3dadd(126.84898028854, -183.325920154676, 8.05889386957421, 1.8)
    pt3dadd(127.360882799361, -183.888959141341, 7.41009272984756, 1.8)
    pt3dadd(127.872785310182, -184.451998128005, 6.76129159012088, 1.8)
    pt3dadd(128.384687821003, -185.01503711467, 6.11249045039424, 1.8)
    pt3dadd(128.962962161645, -185.626218486092, 5.64073337986645, 1.8)
    pt3dadd(129.662414217759, -186.325295342962, 5.49221277730415, 1.8)
    pt3dadd(130.361866273874, -187.024372199832, 5.34369217474189, 1.8)
    pt3dadd(131.061318329989, -187.723449056702, 5.1951715721796, 1.8)
    pt3dadd(131.760770386103, -188.422525913572, 5.04665096961734, 1.8)
    pt3dadd(132.460222442218, -189.121602770443, 4.89813036705507, 1.8)
    pt3dadd(133.285023594084, -189.55773114087, 4.75659467163433, 1.8)
    pt3dadd(134.271433194974, -189.654848712597, 4.62406438628815, 1.8)
    pt3dadd(135.257842795864, -189.751966284324, 4.49153410094195, 1.8)
    pt3dadd(136.244252396754, -189.849083856051, 4.35900381559578, 1.8)
    pt3dadd(137.230661997644, -189.946201427778, 4.22647353024959, 1.8)
    pt3dadd(138.217071598534, -190.043318999506, 4.09394324490339, 1.8)
    pt3dadd(139.203481199424, -190.140436571233, 3.96141295955721, 1.8)
    pt3dadd(140.189890800314, -190.23755414296, 3.82888267421103, 1.8)
    pt3dadd(141.118560379894, -190.551998438419, 3.81039521219788, 1.8)
    pt3dadd(142.012392062529, -190.997568525538, 3.86071638649009, 1.8)
    pt3dadd(142.906223745165, -191.443138612657, 3.91103756078229, 1.8)
    pt3dadd(143.8000554278, -191.888708699776, 3.9613587350745, 1.8)
    pt3dadd(144.693887110435, -192.334278786895, 4.01167990936672, 1.8)
    pt3dadd(145.58771879307, -192.779848874014, 4.06200108365893, 1.8)
    pt3dadd(146.481550475706, -193.225418961133, 4.11232225795112, 1.8)
    pt3dadd(147.375382158341, -193.670989048252, 4.16264343224333, 1.8)
    pt3dadd(148.269213840976, -194.116559135371, 4.21296460653554, 1.8)
    pt3dadd(149.163045523612, -194.56212922249, 4.26328578082776, 1.8)
    pt3dadd(150.050474140801, -195.016943409413, 4.29877127255361, 1.8)
    pt3dadd(150.857431933807, -195.587933252568, 4.14780863041523, 1.8)
    pt3dadd(151.664389726813, -196.158923095722, 3.9968459882768, 1.8)
    pt3dadd(152.471347519819, -196.729912938876, 3.84588334613842, 1.8)
    pt3dadd(153.278305312825, -197.30090278203, 3.69492070400003, 1.8)
    pt3dadd(154.085263105831, -197.871892625185, 3.54395806186162, 1.8)
    pt3dadd(154.892220898837, -198.442882468339, 3.39299541972326, 1.8)
    pt3dadd(155.555663083826, -199.15261078738, 3.58360231932251, 1.8)
    pt3dadd(156.20095048746, -199.879889578667, 3.81741790147177, 1.8)
    pt3dadd(156.846237891094, -200.607168369954, 4.05123348362109, 1.8)
    pt3dadd(157.491525294728, -201.33444716124, 4.28504906577042, 1.8)
    pt3dadd(158.190962863414, -201.997657253571, 4.38914555129989, 1.8)
    pt3dadd(159.026781459032, -202.499505788655, 4.16653530208912, 1.8)
    pt3dadd(159.86260005465, -203.001354323739, 3.94392505287836, 1.8)
    pt3dadd(160.698418650267, -203.503202858823, 3.72131480366761, 1.8)
    pt3dadd(161.534237245885, -204.005051393907, 3.49870455445688, 1.8)
    pt3dadd(162.370055841502, -204.506899928991, 3.27609430524613, 1.8)
    pt3dadd(163.20587443712, -205.008748464075, 3.05348405603537, 1.8)
    pt3dadd(164.041693032738, -205.51059699916, 2.83087380682461, 1.8)
    pt3dadd(164.877511628355, -206.012445534244, 2.6082635576139, 1.8)
    pt3dadd(165.713330223973, -206.514294069328, 2.38565330840315, 1.8)
    pt3dadd(166.532644291408, -207.020209686404, 2.65023472515875, 1.8)
    pt3dadd(167.351765944903, -207.526172718545, 2.92049594487537, 1.8)
    pt3dadd(168.170887598397, -208.032135750686, 3.19075716459197, 1.8)
    pt3dadd(168.990009251892, -208.538098782827, 3.46101838430862, 1.8)
    pt3dadd(169.809130905387, -209.044061814968, 3.73127960402525, 1.8)
    pt3dadd(170.628252558882, -209.550024847109, 4.00154082374185, 1.8)
    pt3dadd(171.447374212376, -210.05598787925, 4.27180204345849, 1.8)
    pt3dadd(171.932400359572, -210.889620470865, 4.20774637350726, 1.8)
    pt3dadd(172.351059704152, -211.788343375181, 4.07727992397481, 1.8)
    pt3dadd(172.769719048732, -212.687066279497, 3.94681347444238, 1.8)
    pt3dadd(173.188378393312, -213.585789183814, 3.81634702490993, 1.8)
    pt3dadd(173.607037737892, -214.48451208813, 3.6858805753775, 1.8)
    pt3dadd(174.025697082472, -215.383234992446, 3.55541412584505, 1.8)
    pt3dadd(174.468386072143, -216.239729071264, 3.30446305326761, 1.8)
    pt3dadd(174.921707796752, -217.077537567896, 3.0001994554313, 1.8)
    pt3dadd(175.37502952136, -217.915346064529, 2.69593585759503, 1.8)
    pt3dadd(175.828351245969, -218.753154561161, 2.39167225975878, 1.8)
    pt3dadd(176.281672970578, -219.590963057793, 2.0874086619225, 1.8)
    pt3dadd(176.734994695187, -220.428771554426, 1.7831450640862, 1.8)
    pt3dadd(177.188316419795, -221.266580051058, 1.47888146624993, 1.8)
    pt3dadd(177.805360869726, -221.995181478079, 1.38917176335481, 1.8)
    pt3dadd(178.577597759092, -222.620265745198, 1.50283726253144, 1.8)
    pt3dadd(179.349834648457, -223.245350012317, 1.61650276170806, 1.8)
    pt3dadd(180.122071537823, -223.870434279436, 1.73016826088465, 1.8)
    pt3dadd(180.894308427188, -224.495518546556, 1.84383376006127, 1.8)
    pt3dadd(181.666545316554, -225.120602813675, 1.95749925923788, 1.8)
    pt3dadd(182.438782205919, -225.745687080794, 2.07116475841451, 1.8)
    pt3dadd(183.211019095285, -226.370771347913, 2.18483025759112, 1.8)
    pt3dadd(183.983255984651, -226.995855615033, 2.29849575676772, 1.8)
    pt3dadd(184.755492874016, -227.620939882152, 2.41216125594431, 1.8)
    pt3dadd(185.527729763382, -228.246024149271, 2.52582675512093, 1.8)
    pt3dadd(186.332621999656, -228.826140749795, 2.41606364286672, 1.8)
    pt3dadd(187.139710575796, -229.403232905991, 2.29127312430531, 1.8)
    pt3dadd(187.946799151935, -229.980325062187, 2.16648260574391, 1.8)
    pt3dadd(188.753887728074, -230.557417218383, 2.04169208718251, 1.8)
    pt3dadd(189.560976304213, -231.134509374579, 1.9169015686211, 1.8)
    pt3dadd(190.368064880352, -231.711601530775, 1.79211105005969, 1.8)
    pt3dadd(191.175153456491, -232.288693686971, 1.66732053149831, 1.8)
    pt3dadd(192.022502975723, -232.69034425745, 1.44745295406742, 1.8)
    pt3dadd(192.940127723636, -232.785762618515, 1.06162895482709, 1.8)
    pt3dadd(193.857752471549, -232.88118097958, 0.67580495558677, 1.8)
    pt3dadd(194.775377219461, -232.976599340645, 0.289980956346483, 1.8)
    pt3dadd(195.693001967374, -233.07201770171, -0.0958430428938328, 1.8)
    pt3dadd(196.590532715255, -233.133718285394, -0.0484543771268875, 1.8)
    pt3dadd(197.468057390374, -233.161848633854, 0.43025130286081, 1.8)
    pt3dadd(198.345582065493, -233.189978982315, 0.908956982848508, 1.8)
    pt3dadd(199.223106740613, -233.218109330776, 1.38766266283619, 1.8)
    pt3dadd(200.100631415732, -233.246239679236, 1.86636834282389, 1.8)
    pt3dadd(200.978156090851, -233.274370027697, 2.3450740228116, 1.8)
    pt3dadd(201.85568076597, -233.302500376158, 2.82377970279929, 1.8)
    pt3dadd(202.671153066808, -232.91977674388, 2.79691330184507, 1.8)
    pt3dadd(203.459413069621, -232.356878201322, 2.54833454420283, 1.8)
    pt3dadd(204.247673072434, -231.793979658763, 2.2997557865606, 1.8)
    pt3dadd(205.035933075247, -231.231081116205, 2.05117702891833, 1.8)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(118.327936219172, -176.061751855117, 13.1480195969382, 1.8)
    pt3dadd(118.384244501026, -177.019680620518, 12.909479997542, 1.8)
    pt3dadd(118.361708719649, -177.959113553392, 12.5674889111259, 1.8)
    pt3dadd(118.339172938272, -178.898546486267, 12.2254978247099, 1.8)
    pt3dadd(118.316637156895, -179.837979419142, 11.8835067382938, 1.8)
    pt3dadd(118.294101375518, -180.777412352017, 11.5415156518778, 1.8)
    pt3dadd(118.342565435602, -181.73544664297, 11.2995824090141, 1.8)
    pt3dadd(118.489192904014, -182.719198916822, 11.1959877701656, 1.8)
    pt3dadd(118.635820372425, -183.702951190674, 11.0923931313171, 1.8)
  }
}
proc shape3d_8() {
  adendMML[2] {
    pt3dadd(118.782447840837, -184.686703464526, 10.9887984924686, 1.8)
    pt3dadd(118.929075309248, -185.670455738378, 10.8852038536201, 1.8)
    pt3dadd(118.987976185699, -186.657885129295, 10.7838275568845, 1.8)
    pt3dadd(118.91909518774, -187.650670580448, 10.6856824800898, 1.8)
    pt3dadd(118.850214189781, -188.643456031601, 10.587537403295, 1.8)
    pt3dadd(118.781333191822, -189.636241482754, 10.4893923265003, 1.8)
    pt3dadd(118.712452193863, -190.629026933907, 10.3912472497055, 1.8)
    pt3dadd(118.643571195904, -191.62181238506, 10.2931021729108, 1.8)
    pt3dadd(118.739317354561, -192.602203607906, 10.1877476121879, 1.8)
    pt3dadd(118.946991337561, -193.574168159009, 10.0774914187859, 1.8)
    pt3dadd(119.154665320561, -194.546132710113, 9.96723522538402, 1.8)
    pt3dadd(119.362339303561, -195.518097261216, 9.85697903198211, 1.8)
    pt3dadd(119.57001328656, -196.490061812319, 9.74672283858017, 1.8)
    pt3dadd(119.77768726956, -197.462026363423, 9.63646664517825, 1.8)
    pt3dadd(119.98536125256, -198.433990914526, 9.52621045177632, 1.8)
    pt3dadd(120.19303523556, -199.405955465629, 9.41595425837441, 1.8)
    pt3dadd(120.40070921856, -200.377920016732, 9.30569806497247, 1.8)
    pt3dadd(120.60838320156, -201.349884567836, 9.19544187157055, 1.8)
    pt3dadd(120.81605718456, -202.321849118939, 9.08518567816863, 1.8)
    pt3dadd(120.956739234356, -203.294311622179, 8.92030245727491, 1.8)
    pt3dadd(121.03162636633, -204.26726318012, 8.70176828748679, 1.8)
    pt3dadd(121.106513498304, -205.240214738061, 8.48323411769866, 1.8)
    pt3dadd(121.181400630278, -206.213166296002, 8.26469994791056, 1.8)
    pt3dadd(121.256287762252, -207.186117853942, 8.04616577812244, 1.8)
    pt3dadd(121.331174894227, -208.159069411883, 7.82763160833431, 1.8)
    pt3dadd(121.406062026201, -209.132020969824, 7.60909743854619, 1.8)
    pt3dadd(121.480949158175, -210.104972527765, 7.39056326875807, 1.8)
    pt3dadd(121.555836290149, -211.077924085706, 7.17202909896995, 1.8)
    pt3dadd(121.630723422123, -212.050875643647, 6.95349492918183, 1.8)
    pt3dadd(121.864450317383, -213.000869579725, 6.79484528979788, 1.8)
    pt3dadd(122.194063439094, -213.937004771096, 6.67234592868456, 1.8)
    pt3dadd(122.523676560805, -214.873139962467, 6.54984656757124, 1.8)
    pt3dadd(122.853289682516, -215.809275153838, 6.42734720645794, 1.8)
    pt3dadd(123.182902804227, -216.745410345208, 6.30484784534463, 1.8)
    pt3dadd(123.512515925938, -217.681545536579, 6.18234848423131, 1.8)
    pt3dadd(123.842129047649, -218.61768072795, 6.059849123118, 1.8)
    pt3dadd(124.171742169359, -219.553815919321, 5.93734976200469, 1.8)
    pt3dadd(124.412865227079, -220.512395035225, 5.93946237636762, 1.8)
    pt3dadd(124.568765572931, -221.492589370142, 6.06158587107267, 1.8)
    pt3dadd(124.724665918784, -222.47278370506, 6.18370936577772, 1.8)
    pt3dadd(124.880566264636, -223.452978039977, 6.30583286048276, 1.8)
    pt3dadd(125.036466610489, -224.433172374894, 6.4279563551878, 1.8)
    pt3dadd(124.987754147439, -225.423787957848, 6.38879594699812, 1.8)
    pt3dadd(124.894577391435, -226.416668176276, 6.31458702573823, 1.8)
    pt3dadd(124.8277789979, -227.404795061565, 6.23747018689273, 1.8)
    pt3dadd(125.239877408209, -228.306625610197, 6.10756036519271, 1.8)
    pt3dadd(125.651975818517, -229.20845615883, 5.9776505434927, 1.8)
    pt3dadd(126.064074228825, -230.110286707463, 5.8477407217927, 1.8)
    pt3dadd(126.476172639134, -231.012117256096, 5.71783090009269, 1.8)
    pt3dadd(126.888271049442, -231.913947804728, 5.58792107839267, 1.8)
    pt3dadd(127.30036945975, -232.815778353361, 5.45801125669267, 1.8)
    pt3dadd(127.644432485178, -233.746235061425, 5.4036612558461, 1.8)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(127.644432485178, -233.746235061425, 5.4036612558461, 1.8)
    pt3dadd(127.90973141826, -234.70983207536, 5.43678633458983, 1.8)
    pt3dadd(128.175030351342, -235.673429089294, 5.46991141333358, 1.8)
    pt3dadd(128.440329284424, -236.637026103229, 5.50303649207734, 1.8)
    pt3dadd(128.705628217506, -237.600623117164, 5.53616157082108, 1.8)
    pt3dadd(128.970927150588, -238.564220131099, 5.56928664956484, 1.8)
    pt3dadd(129.23622608367, -239.527817145033, 5.60241172830857, 1.8)
    pt3dadd(129.501525016751, -240.491414158968, 5.63553680705233, 1.8)
    pt3dadd(129.766823949833, -241.455011172903, 5.66866188579608, 1.8)
    pt3dadd(130.032122882915, -242.418608186837, 5.70178696453983, 1.8)
    pt3dadd(130.269273749441, -243.386919069915, 5.70711202692825, 1.8)
    pt3dadd(130.398165392794, -244.373359788327, 5.605516488966, 1.8)
    pt3dadd(130.527057036147, -245.359800506738, 5.50392095100375, 1.8)
    pt3dadd(130.6559486795, -246.346241225149, 5.40232541304149, 1.8)
    pt3dadd(130.784840322853, -247.332681943561, 5.30072987507923, 1.8)
    pt3dadd(130.913731966206, -248.319122661972, 5.19913433711698, 1.8)
    pt3dadd(131.042623609559, -249.305563380383, 5.09753879915472, 1.8)
    pt3dadd(131.171515252912, -250.292004098795, 4.99594326119247, 1.8)
    pt3dadd(131.300406896265, -251.278444817206, 4.8943477232302, 1.8)
    pt3dadd(131.429298539618, -252.264885535618, 4.79275218526796, 1.8)
    pt3dadd(131.558190182971, -253.251326254029, 4.69115664730571, 1.8)
    pt3dadd(131.67587525031, -254.241634415394, 4.62341212955235, 1.8)
    pt3dadd(131.786150013259, -255.234499908227, 4.57805146600258, 1.8)
    pt3dadd(131.896424776209, -256.22736540106, 4.53269080245282, 1.8)
    pt3dadd(132.006699539159, -257.220230893893, 4.48733013890305, 1.8)
    pt3dadd(132.116974302108, -258.213096386726, 4.44196947535328, 1.8)
    pt3dadd(132.227249065058, -259.205961879559, 4.39660881180351, 1.8)
    pt3dadd(132.337523828008, -260.198827372393, 4.35124814825376, 1.8)
    pt3dadd(132.447798590957, -261.191692865226, 4.30588748470398, 1.8)
    pt3dadd(132.558073353907, -262.184558358059, 4.26052682115421, 1.8)
    pt3dadd(132.668348116857, -263.177423850892, 4.21516615760444, 1.8)
    pt3dadd(132.779294380031, -264.170139910374, 4.16908490527164, 1.8)
    pt3dadd(132.945903009752, -265.150469058233, 4.06327221056411, 1.8)
    pt3dadd(133.112511639474, -266.130798206091, 3.95745951585658, 1.8)
    pt3dadd(133.279120269195, -267.11112735395, 3.85164682114905, 1.8)
    pt3dadd(133.445728898916, -268.091456501809, 3.74583412644154, 1.8)
    pt3dadd(133.612337528638, -269.071785649667, 3.64002143173401, 1.8)
    pt3dadd(133.791583847451, -270.047996145991, 3.54362536931926, 1.8)
    pt3dadd(134.237142122032, -270.937414971989, 3.64566445944011, 1.8)
    pt3dadd(134.682700396614, -271.826833797986, 3.74770354956097, 1.8)
    pt3dadd(135.128258671196, -272.716252623984, 3.84974263968183, 1.8)
    pt3dadd(135.573816945777, -273.605671449982, 3.95178172980269, 1.8)
    pt3dadd(136.019375220359, -274.49509027598, 4.05382081992354, 1.8)
    pt3dadd(136.46493349494, -275.384509101977, 4.15585991004438, 1.8)
    pt3dadd(136.910491769522, -276.273927927975, 4.25789900016526, 1.8)
    pt3dadd(137.212153837969, -277.195304579949, 4.30481990230652, 1.8)
    pt3dadd(137.177607936422, -278.191349467351, 4.22295927095073, 1.8)
    pt3dadd(137.143062034874, -279.187394354754, 4.14109863959496, 1.8)
    pt3dadd(137.108516133327, -280.183439242156, 4.05923800823916, 1.8)
    pt3dadd(137.07397023178, -281.179484129558, 3.97737737688336, 1.8)
    pt3dadd(137.039424330232, -282.175529016961, 3.89551674552758, 1.8)
    pt3dadd(137.004878428685, -283.171573904363, 3.8136561141718, 1.8)
    pt3dadd(136.970332527137, -284.167618791765, 3.73179548281601, 1.8)
    pt3dadd(136.93578662559, -285.163663679168, 3.64993485146023, 1.8)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(70.4875059279207, -82.2918211827665, 23.1242207185301, 2.18786934599575)
    pt3dadd(70.942209136254, -82.8304122530452, 23.1496558254572, 2.18786934599575)
    pt3dadd(71.6043560925062, -83.4929684224605, 23.4997711360272, 2.10548450473986)
    pt3dadd(72.2665030487585, -84.1555245918759, 23.8498864465972, 2.02309966348397)
    pt3dadd(72.9286500050107, -84.8180807612913, 24.2000017571671, 1.94071482222808)
    pt3dadd(73.590796961263, -85.4806369307067, 24.5501170677371, 1.8583299809722)
    pt3dadd(74.129873264638, -86.2095685239104, 24.9111633476909, 1.8)
    pt3dadd(74.3705188660302, -87.0994520894365, 25.2987158400545, 1.8)
    pt3dadd(74.6111644674223, -87.9893356549626, 25.6862683324181, 1.8)
    pt3dadd(74.8518100688144, -88.8792192204887, 26.0738208247817, 1.8)
    pt3dadd(75.0924556702065, -89.7691027860147, 26.4613733171452, 1.8)
    pt3dadd(75.3331012715987, -90.6589863515408, 26.8489258095088, 1.8)
    pt3dadd(75.5717200203146, -91.5458692569469, 27.2427706138433, 1.8)
    pt3dadd(75.7570353886826, -92.3538390131371, 27.8020943906743, 1.8)
    pt3dadd(75.9423507570507, -93.1618087693273, 28.3614181675053, 1.8)
    pt3dadd(76.1276661254187, -93.9697785255176, 28.9207419443363, 1.8)
    pt3dadd(76.3129814937867, -94.7777482817078, 29.4800657211673, 1.8)
    pt3dadd(76.4982968621548, -95.5857180378981, 30.0393894979983, 1.8)
    pt3dadd(76.6836122305228, -96.3936877940883, 30.5987132748293, 1.8)
    pt3dadd(77.2616626952674, -97.1271494669966, 30.7007405234891, 1.8)
    pt3dadd(77.9647816883564, -97.8368836543509, 30.6571393210044, 1.8)
    pt3dadd(78.6679006814453, -98.5466178417052, 30.6135381185197, 1.8)
    pt3dadd(79.3710196745343, -99.2563520290595, 30.569936916035, 1.8)
    pt3dadd(80.0741386676232, -99.9660862164138, 30.5263357135504, 1.8)
    pt3dadd(80.6769091570289, -100.745778988168, 30.4436571762322, 1.8)
    pt3dadd(81.1463496214908, -101.618423617308, 30.3090577647918, 1.8)
    pt3dadd(81.6157900859527, -102.491068246447, 30.1744583533515, 1.8)
    pt3dadd(82.0852305504145, -103.363712875586, 30.0398589419112, 1.8)
    pt3dadd(82.5546710148764, -104.236357504726, 29.9052595304708, 1.8)
    pt3dadd(83.0241114793383, -105.109002133865, 29.7706601190305, 1.8)
    pt3dadd(83.4935519438001, -105.981646763004, 29.6360607075901, 1.8)
    pt3dadd(84.0324117086429, -106.806207302528, 29.6756161471353, 1.8)
    pt3dadd(84.6234650443621, -107.59461535527, 29.8461115919605, 1.8)
    pt3dadd(85.2145183800814, -108.383023408013, 30.0166070367858, 1.8)
    pt3dadd(85.8055717158006, -109.171431460755, 30.187102481611, 1.8)
    pt3dadd(86.3966250515199, -109.959839513498, 30.3575979264362, 1.8)
    pt3dadd(86.9876783872391, -110.74824756624, 30.5280933712615, 1.8)
    pt3dadd(87.5636592127793, -111.545351650411, 30.5755201638919, 1.8)
    pt3dadd(88.1097638312432, -112.359692706568, 30.3790045412321, 1.8)
    pt3dadd(88.6558684497071, -113.174033762725, 30.1824889185723, 1.8)
    pt3dadd(89.2019730681709, -113.988374818882, 29.9859732959125, 1.8)
    pt3dadd(89.7480776866348, -114.80271587504, 29.7894576732527, 1.8)
    pt3dadd(90.2941823050987, -115.617056931197, 29.5929420505929, 1.8)
    pt3dadd(90.8989632202677, -116.398201086727, 29.6140866478297, 1.8)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(90.8989632202677, -116.398201086727, 29.6140866478297, 1.8)
    pt3dadd(91.5304223485633, -117.164251685918, 29.7341943027518, 1.8)
    pt3dadd(92.1618814768588, -117.930302285109, 29.8543019576739, 1.8)
    pt3dadd(92.7933406051544, -118.696352884301, 29.9744096125959, 1.8)
    pt3dadd(93.42479973345, -119.462403483492, 30.094517267518, 1.8)
    pt3dadd(94.0562588617456, -120.228454082683, 30.21462492244, 1.8)
    pt3dadd(94.6877179900411, -120.994504681874, 30.3347325773621, 1.8)
    pt3dadd(95.3191771183367, -121.760555281066, 30.4548402322842, 1.8)
    pt3dadd(95.9506362466323, -122.526605880257, 30.5749478872062, 1.8)
    pt3dadd(96.5820953749279, -123.292656479448, 30.6950555421283, 1.8)
    pt3dadd(97.2135545032234, -124.05870707864, 30.8151631970503, 1.8)
    pt3dadd(97.8274712815659, -124.836304302303, 30.9431937291566, 1.8)
    pt3dadd(98.3697699677391, -125.661041573789, 31.103570061566, 1.8)
    pt3dadd(98.9120686539124, -126.485778845275, 31.2639463939753, 1.8)
    pt3dadd(99.4543673400856, -127.31051611676, 31.4243227263847, 1.8)
    pt3dadd(99.9966660262588, -128.135253388246, 31.5846990587941, 1.8)
    pt3dadd(100.316611630369, -129.068742618214, 31.5373794284118, 1.8)
    pt3dadd(100.585458072869, -130.027224233492, 31.4423290021702, 1.8)
    pt3dadd(100.854304515368, -130.98570584877, 31.3472785759285, 1.8)
    pt3dadd(101.123150957868, -131.944187464049, 31.2522281496869, 1.8)
    pt3dadd(101.391997400367, -132.902669079327, 31.1571777234452, 1.8)
    pt3dadd(101.660843842867, -133.861150694605, 31.0621272972036, 1.8)
    pt3dadd(101.929690285366, -134.819632309884, 30.9670768709619, 1.8)
    pt3dadd(102.264379595566, -135.752968344338, 30.9376283039064, 1.8)
    pt3dadd(102.712696827667, -136.642909548131, 31.0213917397965, 1.8)
    pt3dadd(103.161014059767, -137.532850751925, 31.1051551756866, 1.8)
    pt3dadd(103.609331291868, -138.422791955719, 31.1889186115767, 1.8)
    pt3dadd(104.057648523968, -139.312733159512, 31.2726820474668, 1.8)
    pt3dadd(104.505965756069, -140.202674363306, 31.3564454833569, 1.8)
    pt3dadd(104.954282988169, -141.0926155671, 31.440208919247, 1.8)
    pt3dadd(105.402600220269, -141.982556770893, 31.5239723551371, 1.8)
    pt3dadd(105.85091745237, -142.872497974687, 31.6077357910272, 1.8)
    pt3dadd(106.29923468447, -143.762439178481, 31.6914992269173, 1.8)
    pt3dadd(106.747551916571, -144.652380382274, 31.7752626628074, 1.8)
    pt3dadd(107.195869148671, -145.542321586068, 31.8590260986975, 1.8)
    pt3dadd(107.694467510981, -146.406658663622, 31.9150629994405, 1.8)
    pt3dadd(108.208089124752, -147.263345610296, 31.9628156251899, 1.8)
    pt3dadd(108.721710738522, -148.120032556971, 32.0105682509393, 1.8)
    pt3dadd(109.235332352293, -148.976719503645, 32.0583208766887, 1.8)
    pt3dadd(109.748953966063, -149.833406450319, 32.1060735024381, 1.8)
    pt3dadd(110.262575579834, -150.690093396993, 32.1538261281875, 1.8)
    pt3dadd(110.776197193604, -151.546780343667, 32.201578753937, 1.8)
    pt3dadd(111.289818807375, -152.403467290341, 32.2493313796864, 1.8)
    pt3dadd(111.803440421145, -153.260154237015, 32.2970840054358, 1.8)
    pt3dadd(112.317062034916, -154.116841183689, 32.3448366311852, 1.8)
    pt3dadd(112.830683648686, -154.973528130364, 32.3925892569346, 1.8)
    pt3dadd(113.33477678983, -155.831813934748, 32.4842251257942, 1.8)
    pt3dadd(113.834913116447, -156.690763684307, 32.5940840468273, 1.8)
    pt3dadd(114.335049443065, -157.549713433866, 32.7039429678604, 1.8)
    pt3dadd(114.835185769682, -158.408663183425, 32.8138018888935, 1.8)
    pt3dadd(115.335322096299, -159.267612932984, 32.9236608099267, 1.8)
    pt3dadd(115.835458422917, -160.126562682542, 33.0335197309598, 1.8)
    pt3dadd(116.335594749534, -160.985512432101, 33.1433786519929, 1.8)
    pt3dadd(116.835731076152, -161.84446218166, 33.253237573026, 1.8)
    pt3dadd(117.335867402769, -162.703411931219, 33.3630964940591, 1.8)
    pt3dadd(117.836003729386, -163.562361680778, 33.4729554150922, 1.8)
    pt3dadd(118.336140056004, -164.421311430336, 33.5828143361253, 1.8)
    pt3dadd(118.836276382621, -165.280261179895, 33.6926732571584, 1.8)
    pt3dadd(119.460463683625, -166.042821260647, 33.6189897711015, 1.8)
    pt3dadd(120.134518146835, -166.76663372758, 33.4715242044811, 1.8)
    pt3dadd(120.808572610046, -167.490446194513, 33.3240586378607, 1.8)
    pt3dadd(121.482627073256, -168.214258661446, 33.1765930712404, 1.8)
    pt3dadd(122.156681536467, -168.938071128378, 33.02912750462, 1.8)
    pt3dadd(122.682864798767, -169.762638302533, 33.1298361426251, 1.8)
    pt3dadd(123.156795260319, -170.622808864017, 33.3182413516013, 1.8)
    pt3dadd(123.630725721871, -171.482979425501, 33.5066465605775, 1.8)
    pt3dadd(124.104656183423, -172.343149986985, 33.6950517695537, 1.8)
    pt3dadd(124.578586644975, -173.203320548469, 33.8834569785298, 1.8)
    pt3dadd(125.1206743422, -173.950764675138, 34.2604430755363, 1.8)
    pt3dadd(125.669652659723, -174.686812285322, 34.6564944894108, 1.8)
    pt3dadd(126.218630977246, -175.422859895506, 35.0525459032853, 1.8)
    pt3dadd(126.767609294769, -176.158907505689, 35.4485973171597, 1.8)
    pt3dadd(127.366740903602, -176.939052678548, 35.5923626352794, 1.8)
    pt3dadd(127.974522253871, -177.726803185077, 35.69261716, 1.8)
    pt3dadd(128.58230360414, -178.514553691607, 35.7928716847206, 1.8)
    pt3dadd(129.190084954409, -179.302304198137, 35.8931262094412, 1.8)
    pt3dadd(129.797866304679, -180.090054704667, 35.9933807341618, 1.8)
    pt3dadd(130.405647654948, -180.877805211197, 36.0936352588824, 1.8)
    pt3dadd(131.013429005217, -181.665555717726, 36.193889783603, 1.8)
    pt3dadd(131.621210355486, -182.453306224256, 36.2941443083236, 1.8)
    pt3dadd(132.228991705756, -183.241056730786, 36.3943988330442, 1.8)
    pt3dadd(132.836773056025, -184.028807237316, 36.4946533577648, 1.8)
    pt3dadd(133.444554406294, -184.816557743845, 36.5949078824854, 1.8)
    pt3dadd(134.05447529351, -185.604181277658, 36.6780125631745, 1.8)
    pt3dadd(134.669691412299, -186.391490561258, 36.7186723607458, 1.8)
    pt3dadd(135.284907531089, -187.178799844859, 36.7593321583171, 1.8)
    pt3dadd(135.900123649878, -187.966109128459, 36.7999919558884, 1.8)
    pt3dadd(136.515339768668, -188.753418412059, 36.8406517534597, 1.8)
    pt3dadd(137.130555887457, -189.540727695659, 36.881311551031, 1.8)
    pt3dadd(137.745772006247, -190.328036979259, 36.9219713486023, 1.8)
    pt3dadd(138.360988125036, -191.11534626286, 36.9626311461736, 1.8)
    pt3dadd(138.976204243826, -191.90265554646, 37.0032909437449, 1.8)
    pt3dadd(139.591420362615, -192.68996483006, 37.0439507413162, 1.8)
    pt3dadd(140.095262699097, -193.523329179039, 37.2448999504309, 1.8)
    pt3dadd(140.567906060325, -194.369594866334, 37.4907507986996, 1.8)
    pt3dadd(141.040549421552, -195.215860553629, 37.7366016469684, 1.8)
    pt3dadd(141.513192782779, -196.062126240925, 37.9824524952371, 1.8)
    pt3dadd(141.985836144007, -196.90839192822, 38.2283033435058, 1.8)
    pt3dadd(142.458479505234, -197.754657615515, 38.4741541917746, 1.8)
  }
}
proc shape3d_9() {
  adendMML[3] {
    pt3dadd(142.931122866461, -198.60092330281, 38.7200050400433, 1.8)
    pt3dadd(143.403766227689, -199.447188990105, 38.965855888312, 1.8)
    pt3dadd(143.876409588916, -200.293454677401, 39.2117067365808, 1.8)
    pt3dadd(144.349052950143, -201.139720364696, 39.4575575848495, 1.8)
    pt3dadd(144.821696311371, -201.985986051991, 39.7034084331182, 1.8)
    pt3dadd(145.294339672598, -202.832251739286, 39.949259281387, 1.8)
    pt3dadd(145.980214589074, -203.547764980489, 39.8637783043638, 1.8)
    pt3dadd(146.678844701213, -204.25545680412, 39.7584775485285, 1.8)
    pt3dadd(147.377474813352, -204.96314862775, 39.6531767926932, 1.8)
    pt3dadd(148.076104925491, -205.67084045138, 39.5478760368579, 1.8)
    pt3dadd(148.77473503763, -206.378532275011, 39.4425752810226, 1.8)
    pt3dadd(149.279516789478, -207.170563998881, 39.6425612676327, 1.8)
    pt3dadd(149.674804217616, -208.010234713994, 40.0149870177328, 1.8)
    pt3dadd(150.070091645754, -208.849905429107, 40.3874127678328, 1.8)
    pt3dadd(150.465379073892, -209.68957614422, 40.7598385179329, 1.8)
    pt3dadd(150.86066650203, -210.529246859333, 41.1322642680329, 1.8)
    pt3dadd(151.255953930168, -211.368917574446, 41.504690018133, 1.8)
    pt3dadd(151.651241358306, -212.208588289559, 41.8771157682331, 1.8)
    pt3dadd(152.387596945264, -212.851059913636, 42.0184970470513, 1.8)
    pt3dadd(153.164865036975, -213.469876709373, 42.132163607316, 1.8)
    pt3dadd(153.942133128685, -214.08869350511, 42.2458301675807, 1.8)
    pt3dadd(154.719401220396, -214.707510300847, 42.3594967278454, 1.8)
    pt3dadd(155.496669312106, -215.326327096584, 42.4731632881102, 1.8)
    pt3dadd(156.273937403817, -215.945143892322, 42.5868298483749, 1.8)
    pt3dadd(157.051205495527, -216.563960688059, 42.7004964086396, 1.8)
    pt3dadd(157.828473587237, -217.182777483796, 42.8141629689044, 1.8)
    pt3dadd(158.605741678948, -217.801594279533, 42.9278295291691, 1.8)
    pt3dadd(159.242540683772, -218.529744087733, 42.9466422540275, 1.8)
    pt3dadd(159.658598104463, -219.429706377269, 42.8163959485126, 1.8)
    pt3dadd(160.074655525154, -220.329668666806, 42.6861496429978, 1.8)
    pt3dadd(160.490712945845, -221.229630956342, 42.5559033374829, 1.8)
    pt3dadd(160.906770366536, -222.129593245879, 42.4256570319681, 1.8)
    pt3dadd(161.322827787227, -223.029555535415, 42.2954107264532, 1.8)
    pt3dadd(161.746870517769, -223.923644360827, 42.1740385152596, 1.8)
    pt3dadd(162.44436724916, -224.616598566071, 42.3565564024207, 1.8)
    pt3dadd(163.141863980551, -225.309552771315, 42.5390742895818, 1.8)
    pt3dadd(163.839360711942, -226.002506976559, 42.7215921767429, 1.8)
    pt3dadd(164.536857443332, -226.695461181803, 42.904110063904, 1.8)
    pt3dadd(165.234354174723, -227.388415387047, 43.0866279510652, 1.8)
    pt3dadd(165.931850906114, -228.081369592291, 43.2691458382263, 1.8)
    pt3dadd(166.629347637505, -228.774323797535, 43.4516637253874, 1.8)
    pt3dadd(167.326844368896, -229.467278002779, 43.6341816125485, 1.8)
    pt3dadd(168.024341100286, -230.160232208023, 43.8166994997096, 1.8)
    pt3dadd(168.677120992861, -230.883752676169, 43.99388461949, 1.8)
    pt3dadd(169.04306308806, -231.803341555166, 44.1368625079476, 1.8)
    pt3dadd(169.409005183258, -232.722930434162, 44.279840396405, 1.8)
    pt3dadd(169.774947278456, -233.642519313159, 44.4228182848625, 1.8)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(169.774947278456, -233.642519313159, 44.4228182848625, 1.8)
    pt3dadd(170.140889373655, -234.562108192155, 44.56579617332, 1.8)
    pt3dadd(170.506831468853, -235.481697071152, 44.7087740617775, 1.8)
    pt3dadd(170.872773564051, -236.401285950148, 44.851751950235, 1.8)
    pt3dadd(171.23871565925, -237.320874829145, 44.9947298386925, 1.8)
    pt3dadd(171.604657754448, -238.240463708141, 45.13770772715, 1.8)
    pt3dadd(171.970599849646, -239.160052587138, 45.2806856156075, 1.8)
    pt3dadd(172.286994978783, -240.084412235307, 45.3537561453919, 1.8)
    pt3dadd(172.333517639262, -241.034757314198, 45.0460551978956, 1.8)
    pt3dadd(172.380040299743, -241.985102393089, 44.7383542503993, 1.8)
    pt3dadd(172.426562960223, -242.935447471979, 44.430653302903, 1.8)
    pt3dadd(172.473085620703, -243.88579255087, 44.1229523554066, 1.8)
    pt3dadd(172.519608281183, -244.836137629761, 43.8152514079103, 1.8)
    pt3dadd(172.566130941662, -245.786482708651, 43.507550460414, 1.8)
    pt3dadd(172.612653602143, -246.736827787542, 43.1998495129177, 1.8)
    pt3dadd(172.659176262623, -247.687172866433, 42.8921485654213, 1.8)
    pt3dadd(172.635356485954, -248.678228825051, 42.9028793626931, 1.8)
    pt3dadd(172.600382947024, -249.675740054375, 42.9641018989668, 1.8)
    pt3dadd(172.565409408095, -250.673251283698, 43.0253244352405, 1.8)
    pt3dadd(172.530435869166, -251.670762513022, 43.0865469715143, 1.8)
    pt3dadd(172.495462330237, -252.668273742346, 43.147769507788, 1.8)
    pt3dadd(172.460488791308, -253.66578497167, 43.2089920440618, 1.8)
    pt3dadd(172.425515252378, -254.663296200993, 43.2702145803355, 1.8)
    pt3dadd(172.390541713449, -255.660807430317, 43.3314371166092, 1.8)
    pt3dadd(172.35556817452, -256.658318659641, 43.392659652883, 1.8)
    pt3dadd(172.320594635591, -257.655829888965, 43.4538821891567, 1.8)
    pt3dadd(172.285621096662, -258.653341118288, 43.5151047254304, 1.8)
    pt3dadd(172.250647557732, -259.650852347612, 43.5763272617041, 1.8)
    pt3dadd(172.112824864444, -260.638172083387, 43.6168809437923, 1.8)
    pt3dadd(171.932784517997, -261.621308401783, 43.6489504480319, 1.8)
    pt3dadd(171.75274417155, -262.604444720179, 43.6810199522714, 1.8)
    pt3dadd(171.572703825104, -263.587581038575, 43.7130894565109, 1.8)
    pt3dadd(171.392663478657, -264.570717356971, 43.7451589607505, 1.8)
    pt3dadd(171.212623132211, -265.553853675367, 43.77722846499, 1.8)
    pt3dadd(171.032582785764, -266.536989993763, 43.8092979692296, 1.8)
    pt3dadd(170.852542439318, -267.520126312159, 43.8413674734691, 1.8)
    pt3dadd(170.672502092871, -268.503262630555, 43.8734369777086, 1.8)
    pt3dadd(170.492461746425, -269.486398948951, 43.9055064819482, 1.8)
    pt3dadd(170.312421399978, -270.469535267347, 43.9375759861877, 1.8)
    pt3dadd(170.132381053532, -271.452671585743, 43.9696454904273, 1.8)
    pt3dadd(169.952340707085, -272.435807904139, 44.0017149946668, 1.8)
    pt3dadd(169.772300360639, -273.418944222535, 44.0337844989063, 1.8)
    pt3dadd(169.592260014192, -274.402080540931, 44.0658540031458, 1.8)
    pt3dadd(169.412219667746, -275.385216859327, 44.0979235073854, 1.8)
    pt3dadd(169.232179321299, -276.368353177723, 44.1299930116249, 1.8)
    pt3dadd(169.052138974853, -277.351489496119, 44.1620625158645, 1.8)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(5.9558220236852, -5.88307856917503, -4.60711128603606, 2.63045885109213)
    pt3dadd(5.58719732472375, -6.86143961339946, -4.64540260706432, 2.63045885109213)
    pt3dadd(5.30331140888579, -7.81913693400422, -4.69256857885862, 2.57137523461913)
    pt3dadd(5.01942549304782, -8.77683425460899, -4.73973455065291, 2.51229161814614)
    pt3dadd(4.73553957720986, -9.73453157521375, -4.7869005224472, 2.45320800167314)
    pt3dadd(4.4516536613719, -10.6922288958185, -4.8340664942415, 2.39412438520015)
    pt3dadd(4.16776774553394, -11.6499262164233, -4.88123246603579, 2.33504076872715)
    pt3dadd(3.88388182969598, -12.607623537028, -4.92839843783008, 2.27595715225416)
    pt3dadd(3.63558813971289, -13.5743313421783, -4.98082301160716, 2.20612618502334)
    pt3dadd(3.41518371734001, -14.5480995603471, -5.03736810761713, 2.12787383547698)
    pt3dadd(3.19477929496713, -15.5218677785159, -5.09391320362711, 2.04962148593061)
    pt3dadd(2.97437487259424, -16.4956359966848, -5.15045829963708, 1.97136913638424)
    pt3dadd(2.75397045022136, -17.4694042148536, -5.20700339564706, 1.89311678683787)
    pt3dadd(2.53356602784848, -18.4431724330224, -5.26354849165703, 1.8148644372915)
    pt3dadd(2.3048707211967, -19.3461287311112, -5.59950758393403, 1.8)
    pt3dadd(2.0742312058611, -20.2324796653684, -6.0009891343286, 1.8)
    pt3dadd(1.8435916905255, -21.1188305996255, -6.40247068472316, 1.8)
    pt3dadd(1.6129521751899, -22.0051815338827, -6.80395223511773, 1.8)
    pt3dadd(1.38231265985431, -22.8915324681399, -7.2054337855123, 1.8)
    pt3dadd(1.24620617865795, -23.8404728877698, -7.41990983886183, 1.8)
    pt3dadd(1.17925682865927, -24.8352016319886, -7.49757907318153, 1.8)
    pt3dadd(1.11230747866059, -25.8299303762073, -7.57524830750123, 1.8)
    pt3dadd(1.04535812866191, -26.824659120426, -7.65291754182093, 1.8)
    pt3dadd(0.968117189117626, -27.7836070027144, -7.83439820376805, 1.8)
    pt3dadd(0.855746613329296, -28.6204193627355, -8.37023206590526, 1.8)
    pt3dadd(0.743376037540962, -29.4572317227566, -8.90606592804247, 1.8)
    pt3dadd(0.631005461752633, -30.2940440827777, -9.44189979017967, 1.8)
    pt3dadd(0.530296620996936, -31.1336224113183, -9.96997490411433, 1.8)
    pt3dadd(0.778712654603759, -32.0560073213114, -10.26577137479, 1.8)
    pt3dadd(1.02712868821058, -32.9783922313044, -10.5615678454657, 1.8)
    pt3dadd(1.2755447218174, -33.9007771412975, -10.8573643161413, 1.8)
    pt3dadd(1.52396075542422, -34.8231620512905, -11.153160786817, 1.8)
    pt3dadd(1.77237678903105, -35.7455469612836, -11.4489572574927, 1.8)
    pt3dadd(2.02079282263787, -36.6679318712766, -11.7447537281684, 1.8)
    pt3dadd(2.26920885624469, -37.5903167812696, -12.040550198844, 1.8)
    pt3dadd(2.51762488985151, -38.5127016912627, -12.3363466695197, 1.8)
    pt3dadd(2.76604092345833, -39.4350866012557, -12.6321431401954, 1.8)
    pt3dadd(3.01445695706516, -40.3574715112488, -12.927939610871, 1.8)
    pt3dadd(3.26123880789436, -41.281180593656, -13.2192307892633, 1.8)
    pt3dadd(3.44127623097579, -42.2589724452823, -13.3265136918307, 1.8)
    pt3dadd(3.62131365405723, -43.2367642969087, -13.4337965943982, 1.8)
    pt3dadd(3.80135107713866, -44.214556148535, -13.5410794969656, 1.8)
    pt3dadd(3.98138850022009, -45.1923480001614, -13.648362399533, 1.8)
    pt3dadd(4.16142592330152, -46.1701398517878, -13.7556453021004, 1.8)
    pt3dadd(4.34146334638295, -47.1479317034141, -13.8629282046679, 1.8)
    pt3dadd(4.52150076946438, -48.1257235550405, -13.9702111072353, 1.8)
    pt3dadd(4.70153819254581, -49.1035154066668, -14.0774940098027, 1.8)
    pt3dadd(4.88157561562725, -50.0813072582932, -14.1847769123701, 1.8)
    pt3dadd(5.06161303870868, -51.0590991099196, -14.2920598149376, 1.8)
    pt3dadd(5.12144738802317, -52.0399120117894, -14.3844784472979, 1.8)
    pt3dadd(4.96931555056553, -53.0260522358323, -14.4506854148794, 1.8)
    pt3dadd(4.81718371310788, -54.0121924598752, -14.516892382461, 1.8)
    pt3dadd(4.66505187565023, -54.9983326839181, -14.5830993500425, 1.8)
    pt3dadd(4.51292003819258, -55.984472907961, -14.6493063176241, 1.8)
    pt3dadd(4.36078820073493, -56.970613132004, -14.7155132852057, 1.8)
    pt3dadd(4.20865636327728, -57.9567533560469, -14.7817202527872, 1.8)
    pt3dadd(4.05652452581964, -58.9428935800898, -14.8479272203688, 1.8)
    pt3dadd(3.90439268836199, -59.9290338041327, -14.9141341879503, 1.8)
    pt3dadd(3.78519509655139, -60.9192517958386, -14.9848383640542, 1.8)
    pt3dadd(3.67366733373914, -61.9104194306911, -15.0565898639894, 1.8)
    pt3dadd(3.5621395709269, -62.9015870655436, -15.1283413639246, 1.8)
    pt3dadd(3.45061180811465, -63.8927547003961, -15.2000928638598, 1.8)
    pt3dadd(3.33908404530241, -64.8839223352487, -15.271844363795, 1.8)
    pt3dadd(3.22755628249016, -65.8750899701012, -15.3435958637302, 1.8)
    pt3dadd(3.11602851967791, -66.8662576049537, -15.4153473636655, 1.8)
    pt3dadd(2.96174765800025, -67.8235724753215, -15.6329808021397, 1.8)
    pt3dadd(2.78564315285876, -68.7636069453911, -15.9250807821975, 1.8)
    pt3dadd(2.60953864771727, -69.7036414154608, -16.2171807622553, 1.8)
    pt3dadd(2.43343414257577, -70.6436758855304, -16.5092807423131, 1.8)
    pt3dadd(2.25732963743428, -71.5837103556, -16.8013807223709, 1.8)
    pt3dadd(2.08122513229279, -72.5237448256697, -17.0934807024286, 1.8)
    pt3dadd(1.9051206271513, -73.4637792957393, -17.3855806824864, 1.8)
    pt3dadd(1.72901612200981, -74.403813765809, -17.6776806625442, 1.8)
    pt3dadd(1.55291161686832, -75.3438482358786, -17.969780642602, 1.8)
    pt3dadd(1.37680711172683, -76.2838827059482, -18.2618806226598, 1.8)
    pt3dadd(1.35186635694673, -77.2714588839868, -18.3801303258454, 1.8)
    pt3dadd(1.35448482789362, -78.2677025676822, -18.4666847382516, 1.8)
    pt3dadd(1.35710329884049, -79.2639462513775, -18.5532391506578, 1.8)
    pt3dadd(1.35972176978738, -80.2601899350729, -18.639793563064, 1.8)
    pt3dadd(1.36234024073426, -81.2564336187683, -18.7263479754702, 1.8)
    pt3dadd(1.36495871168114, -82.2526773024637, -18.8129023878763, 1.8)
    pt3dadd(1.48768757343133, -83.1855248934338, -19.0975069226235, 1.8)
    pt3dadd(1.68067402773464, -84.0812894575122, -19.4979592596087, 1.8)
    pt3dadd(1.87366048203795, -84.9770540215906, -19.8984115965939, 1.8)
    pt3dadd(2.06664693634126, -85.8728185856689, -20.2988639335792, 1.8)
    pt3dadd(2.25963339064457, -86.7685831497473, -20.6993162705644, 1.8)
    pt3dadd(2.45261984494788, -87.6643477138257, -21.0997686075496, 1.8)
    pt3dadd(2.64560629925119, -88.560112277904, -21.5002209445348, 1.8)
    pt3dadd(2.8385927535545, -89.4558768419824, -21.9006732815201, 1.8)
    pt3dadd(3.0315792078578, -90.3516414060608, -22.3011256185053, 1.8)
    pt3dadd(3.19797357197275, -91.2945552599983, -22.5706142320487, 1.8)
    pt3dadd(3.3503284597232, -92.2623619048331, -22.7709596497455, 1.8)
    pt3dadd(3.50268334747366, -93.230168549668, -22.9713050674422, 1.8)
    pt3dadd(3.65503823522411, -94.1979751945028, -23.171650485139, 1.8)
    pt3dadd(3.80739312297456, -95.1657818393376, -23.3719959028357, 1.8)
    pt3dadd(3.95974801072502, -96.1335884841725, -23.5723413205325, 1.8)
    pt3dadd(3.53888802390749, -96.8794296860712, -24.0608299708741, 1.8)
    pt3dadd(3.08323168796927, -97.6117967312657, -24.5668100244657, 1.8)
    pt3dadd(2.62757535203107, -98.3441637764601, -25.0727900780572, 1.8)
    pt3dadd(2.17191901609286, -99.0765308216546, -25.5787701316487, 1.8)
    pt3dadd(1.71626268015465, -99.8088978668491, -26.0847501852403, 1.8)
    pt3dadd(1.29819591124071, -100.582852947419, -26.5111308872743, 1.8)
    pt3dadd(1.05625997875102, -101.551674211233, -26.5645384087557, 1.8)
    pt3dadd(0.814324046261318, -102.520495475048, -26.617945930237, 1.8)
    pt3dadd(0.572388113771624, -103.489316738863, -26.6713534517184, 1.8)
    pt3dadd(0.330452181281925, -104.458138002678, -26.7247609731998, 1.8)
    pt3dadd(0.0885162487922324, -105.426959266492, -26.7781684946811, 1.8)
    pt3dadd(-0.153419683697465, -106.395780530307, -26.8315760161625, 1.8)
    pt3dadd(-0.395355616187163, -107.364601794122, -26.8849835376439, 1.8)
    pt3dadd(-0.637291548676859, -108.333423057936, -26.9383910591252, 1.8)
    pt3dadd(-0.879227481166556, -109.302244321751, -26.9917985806066, 1.8)
    pt3dadd(-1.12116341365625, -110.271065585566, -27.045206102088, 1.8)
    pt3dadd(-1.31642184865753, -111.250339677009, -27.0587026191187, 1.8)
    pt3dadd(-1.47903508921215, -112.236924241565, -27.0442862751146, 1.8)
    pt3dadd(-1.64164832976677, -113.223508806122, -27.0298699311105, 1.8)
    pt3dadd(-1.80426157032139, -114.210093370679, -27.0154535871064, 1.8)
    pt3dadd(-1.966874810876, -115.196677935236, -27.0010372431022, 1.8)
    pt3dadd(-2.12948805143063, -116.183262499793, -26.9866208990981, 1.8)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(-2.12948805143063, -116.183262499793, -26.9866208990981, 1.8)
    pt3dadd(-2.29210129198524, -117.16984706435, -26.972204555094, 1.8)
    pt3dadd(-2.45471453253986, -118.156431628907, -26.9577882110898, 1.8)
    pt3dadd(-2.61732777309448, -119.143016193464, -26.9433718670857, 1.8)
    pt3dadd(-2.84242499831018, -120.113823265517, -26.9521535408427, 1.8)
    pt3dadd(-3.15792858535744, -121.061802316857, -26.9944997895681, 1.8)
    pt3dadd(-3.4734321724047, -122.009781368196, -27.0368460382935, 1.8)
    pt3dadd(-3.78893575945196, -122.957760419536, -27.0791922870189, 1.8)
    pt3dadd(-4.10443934649922, -123.905739470876, -27.1215385357443, 1.8)
    pt3dadd(-4.41994293354648, -124.853718522216, -27.1638847844697, 1.8)
    pt3dadd(-4.73544652059374, -125.801697573556, -27.2062310331951, 1.8)
    pt3dadd(-5.05095010764099, -126.749676624896, -27.2485772819206, 1.8)
    pt3dadd(-5.36645369468825, -127.697655676235, -27.290923530646, 1.8)
    pt3dadd(-5.68195728173551, -128.645634727575, -27.3332697793714, 1.8)
    pt3dadd(-5.99746086878277, -129.593613778915, -27.3756160280968, 1.8)
    pt3dadd(-6.31296445583003, -130.541592830255, -27.4179622768222, 1.8)
    pt3dadd(-6.60217012887996, -131.494511258587, -27.4640452242276, 1.8)
    pt3dadd(-6.66862121768556, -132.489268323563, -27.5417796083588, 1.8)
    pt3dadd(-6.73507230649117, -133.484025388539, -27.6195139924899, 1.8)
    pt3dadd(-6.80152339529678, -134.478782453516, -27.6972483766211, 1.8)
    pt3dadd(-6.86797448410238, -135.473539518492, -27.7749827607523, 1.8)
    pt3dadd(-6.93442557290799, -136.468296583468, -27.8527171448834, 1.8)
    pt3dadd(-7.0008766617136, -137.463053648445, -27.9304515290146, 1.8)
    pt3dadd(-7.0673277505192, -138.457810713421, -28.0081859131457, 1.8)
    pt3dadd(-7.36532259663254, -139.405838060526, -28.0527395525965, 1.8)
    pt3dadd(-7.70587721899839, -140.345276075056, -28.0911942797469, 1.8)
    pt3dadd(-8.04643184136422, -141.284714089587, -28.1296490068974, 1.8)
    pt3dadd(-8.38698646373007, -142.224152104117, -28.1681037340479, 1.8)
    pt3dadd(-8.72754108609591, -143.163590118648, -28.2065584611983, 1.8)
    pt3dadd(-9.06809570846175, -144.103028133178, -28.2450131883488, 1.8)
    pt3dadd(-9.40865033082759, -145.042466147709, -28.2834679154992, 1.8)
    pt3dadd(-9.74920495319343, -145.981904162239, -28.3219226426497, 1.8)
    pt3dadd(-10.0897595755593, -146.92134217677, -28.3603773698002, 1.8)
    pt3dadd(-10.4303141979251, -147.8607801913, -28.3988320969506, 1.8)
    pt3dadd(-10.770868820291, -148.800218205831, -28.4372868241011, 1.8)
    pt3dadd(-11.1114234426568, -149.739656220361, -28.4757415512516, 1.8)
    pt3dadd(-11.4072667683043, -150.694573191818, -28.4956634349712, 1.8)
    pt3dadd(-11.6994145849031, -151.650769540737, -28.5140535292858, 1.8)
  }
}
proc shape3d_10() {
  adendMML[4] {
    pt3dadd(-11.9915624015018, -152.606965889657, -28.5324436236005, 1.8)
    pt3dadd(-12.2837102181006, -153.563162238577, -28.5508337179151, 1.8)
    pt3dadd(-12.5758580346994, -154.519358587497, -28.5692238122298, 1.8)
    pt3dadd(-12.8680058512982, -155.475554936417, -28.5876139065444, 1.8)
    pt3dadd(-13.1601536678969, -156.431751285337, -28.606004000859, 1.8)
    pt3dadd(-13.4523014844957, -157.387947634257, -28.6243940951737, 1.8)
    pt3dadd(-13.7293933420403, -158.333464862724, -28.6990591090633, 1.8)
    pt3dadd(-13.9050027208552, -159.207001049649, -29.1530369457532, 1.8)
    pt3dadd(-14.08061209967, -160.080537236573, -29.6070147824431, 1.8)
    pt3dadd(-14.2562214784849, -160.954073423498, -30.060992619133, 1.8)
    pt3dadd(-14.4318308572998, -161.827609610422, -30.514970455823, 1.8)
    pt3dadd(-14.6074402361146, -162.701145797347, -30.9689482925129, 1.8)
    pt3dadd(-14.7830496149295, -163.574681984271, -31.4229261292028, 1.8)
    pt3dadd(-14.9586589937443, -164.448218171196, -31.8769039658927, 1.8)
    pt3dadd(-15.1342683725592, -165.32175435812, -32.3308818025827, 1.8)
    pt3dadd(-15.3205006109518, -166.231285891898, -32.6808788596299, 1.8)
    pt3dadd(-15.5202690405304, -167.186684538314, -32.8983782871465, 1.8)
    pt3dadd(-15.7200374701089, -168.14208318473, -33.1158777146632, 1.8)
    pt3dadd(-15.9198058996874, -169.097481831146, -33.3333771421798, 1.8)
    pt3dadd(-16.1195743292659, -170.052880477562, -33.5508765696965, 1.8)
    pt3dadd(-16.3193427588444, -171.008279123978, -33.7683759972131, 1.8)
    pt3dadd(-16.519111188423, -171.963677770394, -33.9858754247297, 1.8)
    pt3dadd(-16.7188796180015, -172.91907641681, -34.2033748522464, 1.8)
    pt3dadd(-16.91864804758, -173.874475063226, -34.420874279763, 1.8)
    pt3dadd(-17.1184164771585, -174.829873709642, -34.6383737072796, 1.8)
    pt3dadd(-17.3181849067371, -175.785272356058, -34.8558731347963, 1.8)
    pt3dadd(-17.3247131851132, -176.766304874694, -34.9854630082471, 1.8)
    pt3dadd(-17.2435991276347, -177.758963405958, -35.0751822926183, 1.8)
    pt3dadd(-17.1624850701562, -178.751621937222, -35.1649015769894, 1.8)
    pt3dadd(-17.0813710126776, -179.744280468486, -35.2546208613606, 1.8)
    pt3dadd(-17.0002569551991, -180.73693899975, -35.3443401457318, 1.8)
    pt3dadd(-16.9191428977206, -181.729597531014, -35.4340594301029, 1.8)
    pt3dadd(-16.838028840242, -182.722256062278, -35.5237787144741, 1.8)
    pt3dadd(-16.7569147827635, -183.714914593542, -35.6134979988453, 1.8)
    pt3dadd(-16.675800725285, -184.707573124806, -35.7032172832165, 1.8)
    pt3dadd(-16.6031353297669, -185.699937153266, -35.8004150851862, 1.8)
    pt3dadd(-16.5626983476506, -186.69117776619, -35.926140570939, 1.8)
    pt3dadd(-16.5222613655343, -187.682418379114, -36.0518660566918, 1.8)
    pt3dadd(-16.481824383418, -188.673658992038, -36.1775915424446, 1.8)
    pt3dadd(-16.4413874013017, -189.664899604961, -36.3033170281974, 1.8)
    pt3dadd(-16.4009504191854, -190.656140217885, -36.4290425139502, 1.8)
    pt3dadd(-16.3605134370691, -191.647380830809, -36.554767999703, 1.8)
    pt3dadd(-16.3200764549528, -192.638621443733, -36.6804934854559, 1.8)
    pt3dadd(-16.2796394728365, -193.629862056657, -36.8062189712087, 1.8)
    pt3dadd(-16.2392024907202, -194.62110266958, -36.9319444569615, 1.8)
    pt3dadd(-16.1987655086039, -195.612343282504, -37.0576699427143, 1.8)
    pt3dadd(-16.0665300345185, -196.547051313338, -37.3650352835651, 1.8)
    pt3dadd(-15.9047459531324, -197.463562323371, -37.7308678675407, 1.8)
    pt3dadd(-15.7429618717464, -198.380073333404, -38.0967004515163, 1.8)
    pt3dadd(-15.5811777903604, -199.296584343437, -38.4625330354919, 1.8)
    pt3dadd(-15.4193937089743, -200.21309535347, -38.8283656194675, 1.8)
    pt3dadd(-15.2576096275883, -201.129606363504, -39.1941982034431, 1.8)
    pt3dadd(-15.0958255462022, -202.046117373537, -39.5600307874187, 1.8)
    pt3dadd(-14.9340414648162, -202.96262838357, -39.9258633713943, 1.8)
    pt3dadd(-14.7722573834301, -203.879139393603, -40.2916959553699, 1.8)
    pt3dadd(-14.6104733020441, -204.795650403636, -40.6575285393455, 1.8)
    pt3dadd(-14.4486892206581, -205.712161413669, -41.0233611233211, 1.8)
    pt3dadd(-14.4681808084413, -206.70847749178, -41.0557834885826, 1.8)
    pt3dadd(-14.4948118760506, -207.707936665024, -41.0750746071567, 1.8)
    pt3dadd(-14.52144294366, -208.707395838268, -41.0943657257307, 1.8)
    pt3dadd(-14.5480740112693, -209.706855011513, -41.1136568443048, 1.8)
    pt3dadd(-14.5747050788786, -210.706314184757, -41.1329479628788, 1.8)
    pt3dadd(-14.6013361464879, -211.705773358001, -41.1522390814529, 1.8)
    pt3dadd(-14.6279672140972, -212.705232531245, -41.171530200027, 1.8)
    pt3dadd(-14.6545982817066, -213.70469170449, -41.190821318601, 1.8)
    pt3dadd(-14.6812293493159, -214.704150877734, -41.2101124371751, 1.8)
    pt3dadd(-14.6625846541667, -215.593200796413, -41.6129550901171, 1.8)
    pt3dadd(-14.6307627427858, -216.450116819763, -42.1274279221328, 1.8)
    pt3dadd(-14.5989408314048, -217.307032843112, -42.6419007541484, 1.8)
    pt3dadd(-14.5671189200238, -218.163948866462, -43.1563735861641, 1.8)
    pt3dadd(-14.5352970086429, -219.020864889812, -43.6708464181798, 1.8)
    pt3dadd(-14.4308295533611, -219.879781474433, -44.1232370399823, 1.8)
    pt3dadd(-13.9550736098366, -220.748922848213, -44.2583279522763, 1.8)
    pt3dadd(-13.4793176663121, -221.618064221993, -44.3934188645703, 1.8)
    pt3dadd(-13.0035617227876, -222.487205595774, -44.5285097768643, 1.8)
    pt3dadd(-12.527805779263, -223.356346969554, -44.6636006891583, 1.8)
    pt3dadd(-12.0520498357385, -224.225488343334, -44.7986916014522, 1.8)
    pt3dadd(-11.8857344405212, -225.034400813071, -45.255859038882, 1.8)
    pt3dadd(-11.8854749394107, -225.810992487854, -45.8858632478494, 1.8)
    pt3dadd(-11.8852154383002, -226.587584162637, -46.5158674568168, 1.8)
    pt3dadd(-11.8849559371896, -227.36417583742, -47.1458716657843, 1.8)
    pt3dadd(-11.8846964360791, -228.140767512203, -47.7758758747517, 1.8)
    pt3dadd(-11.8844369349686, -228.917359186987, -48.4058800837191, 1.8)
    pt3dadd(-11.8841774338581, -229.69395086177, -49.0358842926865, 1.8)
    pt3dadd(-11.8095512547626, -230.526914018752, -49.5352426318206, 1.8)
    pt3dadd(-11.5870815252598, -231.471945649085, -49.7748724236325, 1.8)
    pt3dadd(-11.364611795757, -232.416977279419, -50.0145022154444, 1.8)
    pt3dadd(-11.1421420662542, -233.362008909753, -50.2541320072563, 1.8)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(-11.1421420662542, -233.362008909753, -50.2541320072563, 1.8)
    pt3dadd(-10.9196723367514, -234.307040540086, -50.4937617990683, 1.8)
    pt3dadd(-10.6972026072486, -235.25207217042, -50.7333915908802, 1.8)
    pt3dadd(-10.4747328777458, -236.197103800754, -50.9730213826921, 1.8)
    pt3dadd(-10.2522631482431, -237.142135431087, -51.2126511745041, 1.8)
    pt3dadd(-10.0297934187403, -238.087167061421, -51.452280966316, 1.8)
    pt3dadd(-9.86968786890979, -238.953571272106, -51.8989959447173, 1.8)
    pt3dadd(-9.73802959815156, -239.784109763699, -52.4401723611682, 1.8)
    pt3dadd(-9.60637132739333, -240.614648255293, -52.9813487776191, 1.8)
    pt3dadd(-9.47471305663511, -241.445186746886, -53.52252519407, 1.8)
    pt3dadd(-9.34305478587688, -242.27572523848, -54.063701610521, 1.8)
    pt3dadd(-9.21139651511865, -243.106263730073, -54.6048780269719, 1.8)
    pt3dadd(-9.07665355903792, -243.982856040869, -55.0412897814782, 1.8)
    pt3dadd(-8.93650314093423, -244.94018082591, -55.2940487897285, 1.8)
    pt3dadd(-8.79635272283054, -245.897505610951, -55.5468077979788, 1.8)
    pt3dadd(-8.65620230472684, -246.854830395992, -55.799566806229, 1.8)
    pt3dadd(-8.51605188662316, -247.812155181033, -56.0523258144793, 1.8)
    pt3dadd(-8.37590146851946, -248.769479966074, -56.3050848227296, 1.8)
    pt3dadd(-8.36348849214825, -249.700326951948, -56.6508255747499, 1.8)
    pt3dadd(-8.41992846196928, -250.616901893097, -57.0466852810394, 1.8)
    pt3dadd(-8.47636843179029, -251.533476834246, -57.442544987329, 1.8)
    pt3dadd(-8.53280840161131, -252.450051775396, -57.8384046936185, 1.8)
    pt3dadd(-8.58924837143232, -253.366626716545, -58.234264399908, 1.8)
    pt3dadd(-8.64568834125335, -254.283201657694, -58.6301241061975, 1.8)
    pt3dadd(-8.70212831107436, -255.199776598844, -59.0259838124871, 1.8)
    pt3dadd(-8.75856828089538, -256.116351539993, -59.4218435187766, 1.8)
    pt3dadd(-8.8150082507164, -257.032926481143, -59.8177032250662, 1.8)
    pt3dadd(-8.87144822053742, -257.949501422292, -60.2135629313557, 1.8)
    pt3dadd(-8.92791785110905, -258.873340980234, -60.5860971006622, 1.8)
    pt3dadd(-8.98461359103889, -259.852560048361, -60.7808164106742, 1.8)
    pt3dadd(-9.04130933096872, -260.831779116487, -60.9755357206862, 1.8)
    pt3dadd(-9.09800507089857, -261.810998184613, -61.1702550306983, 1.8)
    pt3dadd(-9.15470081082841, -262.79021725274, -61.3649743407103, 1.8)
    pt3dadd(-9.21139655075824, -263.769436320866, -61.5596936507223, 1.8)
    pt3dadd(-9.26809229068809, -264.748655388993, -61.7544129607343, 1.8)
    pt3dadd(-9.31817052785503, -265.72805980495, -61.9491790530298, 1.8)
    pt3dadd(-9.31912778710691, -266.708840036989, -62.1442924049483, 1.8)
    pt3dadd(-9.32008504635876, -267.689620269027, -62.3394057568668, 1.8)
    pt3dadd(-9.32104230561063, -268.670400501066, -62.5345191087852, 1.8)
    pt3dadd(-9.32199956486249, -269.651180733105, -62.7296324607037, 1.8)
    pt3dadd(-9.32295682411435, -270.631960965143, -62.9247458126222, 1.8)
    pt3dadd(-9.32391408336621, -271.612741197182, -63.1198591645407, 1.8)
    pt3dadd(-9.39056420630725, -272.552617910221, -63.427750051313, 1.8)
    pt3dadd(-9.51829051734495, -273.454465667297, -63.8404928435283, 1.8)
    pt3dadd(-9.64601682838266, -274.356313424373, -64.2532356357436, 1.8)
    pt3dadd(-9.77374313942036, -275.258161181449, -64.6659784279589, 1.8)
    pt3dadd(-9.90146945045807, -276.160008938525, -65.0787212201742, 1.8)
    pt3dadd(-10.0291957614958, -277.061856695601, -65.4914640123895, 1.8)
    pt3dadd(-10.1569220725335, -277.963704452677, -65.9042068046048, 1.8)
    pt3dadd(-10.2697405765842, -278.882820970634, -66.2677668319806, 1.8)
    pt3dadd(-10.3302142475061, -279.862572188752, -66.4586345498453, 1.8)
    pt3dadd(-10.3906879184279, -280.842323406869, -66.64950226771, 1.8)
    pt3dadd(-10.4511615893498, -281.822074624986, -66.8403699855747, 1.8)
    pt3dadd(-10.5116352602717, -282.801825843104, -67.0312377034394, 1.8)
    pt3dadd(-10.5721089311936, -283.781577061221, -67.2221054213041, 1.8)
    pt3dadd(-10.6325826021155, -284.761328279338, -67.4129731391688, 1.8)
    pt3dadd(-10.6930562730374, -285.741079497455, -67.6038408570335, 1.8)
    pt3dadd(-10.7535299439593, -286.720830715573, -67.7947085748982, 1.8)
    pt3dadd(-10.9243704369533, -287.698591827314, -67.884213131797, 1.8)
    pt3dadd(-11.1285562762447, -288.675751664279, -67.9430926363409, 1.8)
    pt3dadd(-11.3327421155361, -289.652911501244, -68.0019721408847, 1.8)
    pt3dadd(-11.5229066165643, -290.626901555457, -68.0687923876065, 1.8)
    pt3dadd(-11.1559681382715, -291.474948181031, -68.4511182617004, 1.8)
    pt3dadd(-10.7890296599786, -292.322994806604, -68.8334441357943, 1.8)
    pt3dadd(-10.4220911816857, -293.171041432177, -69.2157700098882, 1.8)
    pt3dadd(-10.0551527033928, -294.019088057751, -69.5980958839821, 1.8)
    pt3dadd(-9.44315940263894, -294.713407532685, -69.8511843735443, 1.8)
    pt3dadd(-8.6375098563371, -295.286243077889, -70.0021421381466, 1.8)
    pt3dadd(-7.83186031003527, -295.859078623094, -70.1530999027488, 1.8)
    pt3dadd(-7.02621076373344, -296.431914168299, -70.3040576673511, 1.8)
    pt3dadd(-6.22056121743162, -297.004749713503, -70.4550154319533, 1.8)
    pt3dadd(-5.41491167112978, -297.577585258708, -70.6059731965556, 1.8)
    pt3dadd(-4.60926212482795, -298.150420803913, -70.7569309611578, 1.8)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(2.71341193184196, -3.4073759053107, -0.911921317309408, 3.84572184590952)
    pt3dadd(2.62501458238591, -4.39406464105012, -1.03987938343238, 3.84572184590952)
    pt3dadd(2.53504886322587, -5.38143870867769, -1.17025813918887, 3.64064853803685)
    pt3dadd(2.44508314406584, -6.36881277630526, -1.30063689494536, 3.43557523016418)
    pt3dadd(2.3551174249058, -7.35618684393282, -1.43101565070185, 3.23050192229151)
    pt3dadd(2.26515170574576, -8.34356091156039, -1.56139440645833, 3.02542861441884)
    pt3dadd(2.17518598658573, -9.33093497918796, -1.69177316221482, 2.82035530654617)
    pt3dadd(2.08522026742569, -10.3183090468155, -1.82215191797131, 2.6152819986735)
    pt3dadd(1.99525454826565, -11.3056831144431, -1.9525306737278, 2.41020869080082)
    pt3dadd(1.90528882910562, -12.2930571820707, -2.08290942948429, 2.20513538292815)
    pt3dadd(1.81532310994558, -13.2804312496982, -2.21328818524077, 2.00006207505548)
    pt3dadd(1.72614698285468, -14.2679969324005, -2.34240852905941, 1.80114018283055)
    pt3dadd(1.6684935236504, -15.2632124112424, -2.42128963779464, 1.84779957247999)
    pt3dadd(1.61084006444611, -16.2584278900843, -2.50017074652988, 1.89445896212943)
    pt3dadd(1.55318660524183, -17.2536433689262, -2.57905185526511, 1.94111835177887)
    pt3dadd(1.49553314603754, -18.248858847768, -2.65793296400034, 1.9877777414283)
    pt3dadd(1.43787968683326, -19.2440743266099, -2.73681407273557, 2.03443713107774)
    pt3dadd(1.38022622762898, -20.2392898054518, -2.8156951814708, 2.08109652072718)
    pt3dadd(1.32257276842469, -21.2345052842937, -2.89457629020603, 2.12775591037662)
    pt3dadd(1.26491930922041, -22.2297207631356, -2.97345739894126, 2.17441530002605)
    pt3dadd(1.20726585001612, -23.2249362419775, -3.0523385076765, 2.22107468967549)
    pt3dadd(1.08168145091139, -24.1994274220841, -3.19373672508481, 2.25)
    pt3dadd(0.845297755082292, -25.1401160708505, -3.43710396698137, 2.25)
    pt3dadd(0.608914059253196, -26.0808047196168, -3.68047120887792, 2.25)
    pt3dadd(0.372530363424102, -27.0214933683832, -3.92383845077448, 2.25)
    pt3dadd(0.136146667595004, -27.9621820171495, -4.16720569267103, 2.25)
    pt3dadd(-0.100237028234091, -28.9028706659158, -4.41057293456759, 2.25)
    pt3dadd(-0.327003883463282, -29.8443822529383, -4.6578756472372, 2.25)
    pt3dadd(-0.467550729932168, -30.7932719120951, -4.94046191493765, 2.25)
    pt3dadd(-0.608097576401054, -31.742161571252, -5.22304818263811, 2.25)
    pt3dadd(-0.748644422869939, -32.6910512304088, -5.50563445033855, 2.25)
    pt3dadd(-0.889191269338827, -33.6399408895657, -5.788220718039, 2.25)
    pt3dadd(-1.02973811580771, -34.5888305487225, -6.07080698573945, 2.25)
    pt3dadd(-1.1702849622766, -35.5377202078793, -6.3533932534399, 2.25)
    pt3dadd(-1.31083180874548, -36.4866098670362, -6.63597952114035, 2.25)
    pt3dadd(-1.45137865521437, -37.435499526193, -6.9185657888408, 2.25)
    pt3dadd(-1.59192550168325, -38.3843891853499, -7.20115205654125, 2.25)
    pt3dadd(-1.73803342464127, -39.3331632491332, -7.4810581544939, 2.25)
    pt3dadd(-1.903517476068, -40.2815345508235, -7.7516258962033, 2.25)
    pt3dadd(-2.06900152749474, -41.2299058525137, -8.0221936379127, 2.25)
    pt3dadd(-2.23448557892147, -42.178277154204, -8.2927613796221, 2.25)
    pt3dadd(-2.39996963034821, -43.1266484558943, -8.5633291213315, 2.25)
    pt3dadd(-2.56545368177495, -44.0750197575845, -8.83389686304091, 2.25)
    pt3dadd(-2.73093773320168, -45.0233910592748, -9.10446460475031, 2.25)
    pt3dadd(-2.89642178462841, -45.971762360965, -9.3750323464597, 2.25)
    pt3dadd(-3.06190583605515, -46.9201336626552, -9.64560008816911, 2.25)
    pt3dadd(-3.33659750498672, -47.8572173082238, -9.79185512573929, 2.25)
    pt3dadd(-3.71065417706317, -48.7840306263952, -9.82500145789158, 2.25)
    pt3dadd(-4.08471084913962, -49.7108439445666, -9.85814779004389, 2.25)
    pt3dadd(-4.45876752121607, -50.6376572627381, -9.89129412219618, 2.25)
    pt3dadd(-4.83282419329252, -51.5644705809095, -9.92444045434848, 2.25)
    pt3dadd(-5.20688086536897, -52.491283899081, -9.95758678650078, 2.25)
    pt3dadd(-5.58093753744542, -53.4180972172524, -9.99073311865308, 2.25)
    pt3dadd(-5.95499420952188, -54.3449105354238, -10.0238794508054, 2.25)
    pt3dadd(-6.18840197683707, -55.2564106986516, -10.2879228138368, 2.25)
    pt3dadd(-6.33555734356515, -56.1585201284308, -10.6935628941378, 2.25)
    pt3dadd(-6.48271271029322, -57.06062955821, -11.0992029744388, 2.25)
    pt3dadd(-6.6298680770213, -57.9627389879892, -11.5048430547397, 2.25)
    pt3dadd(-6.77702344374938, -58.8648484177684, -11.9104831350407, 2.25)
    pt3dadd(-6.92417881047746, -59.7669578475475, -12.3161232153417, 2.25)
    pt3dadd(-7.07133417720553, -60.6690672773267, -12.7217632956427, 2.25)
    pt3dadd(-7.21848954393361, -61.5711767071059, -13.1274033759437, 2.25)
    pt3dadd(-7.36564491066169, -62.4732861368851, -13.5330434562447, 2.25)
    pt3dadd(-7.51280027738976, -63.3753955666643, -13.9386835365457, 2.25)
    pt3dadd(-7.80915330502602, -64.2104941701558, -14.3991587933275, 2.25)
    pt3dadd(-8.11928302026314, -65.0394050947385, -14.8646974478283, 2.25)
    pt3dadd(-8.42941273550027, -65.8683160193211, -15.3302361023292, 2.25)
    pt3dadd(-8.73954245073739, -66.6972269439038, -15.79577475683, 2.25)
    pt3dadd(-9.04967216597451, -67.5261378684865, -16.2613134113308, 2.25)
    pt3dadd(-9.39950838033831, -68.3598348284476, -16.6403370904078, 2.25)
    pt3dadd(-9.91939340425525, -69.2140286752279, -16.648847908797, 2.25)
    pt3dadd(-10.3583768331361, -70.103563520571, -16.6705977359567, 2.25)
    pt3dadd(-10.6395202467365, -71.0620490924195, -16.7181770334215, 2.25)
    pt3dadd(-10.9679199089491, -71.951129057745, -16.8365262725686, 2.25)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-10.9679199089491, -71.951129057745, -16.8365262725686, 2.25)
    pt3dadd(-10.8275467157205, -72.9833130886026, -17.1405060596315, 2.25)
    pt3dadd(-10.8496027064219, -73.9447704528493, -17.41457406216, 2.25)
    pt3dadd(-10.8716586971233, -74.906227817096, -17.6886420646885, 2.25)
    pt3dadd(-10.8937146878247, -75.8676851813427, -17.962710067217, 2.25)
    pt3dadd(-10.915770678526, -76.8291425455894, -18.2367780697456, 2.25)
    pt3dadd(-10.9378266692274, -77.7905999098361, -18.5108460722741, 2.25)
    pt3dadd(-10.9598826599288, -78.7520572740828, -18.7849140748026, 2.25)
    pt3dadd(-10.9819386506302, -79.7135146383295, -19.0589820773311, 2.25)
    pt3dadd(-11.0039946413316, -80.6749720025762, -19.3330500798596, 2.25)
    pt3dadd(-11.026050632033, -81.6364293668229, -19.6071180823881, 2.25)
    pt3dadd(-11.0481066227344, -82.5978867310696, -19.8811860849166, 2.25)
    pt3dadd(-11.0701626134358, -83.5593440953163, -20.1552540874451, 2.25)
    pt3dadd(-11.0922186041372, -84.520801459563, -20.4293220899736, 2.25)
  }
}
proc shape3d_11() {
  adendIML[7] {
    pt3dadd(-10.8687729829633, -85.4867447183773, -20.5477030581039, 2.25)
    pt3dadd(-10.6365806294708, -86.4528478006594, -20.6605372080078, 2.25)
    pt3dadd(-10.4043882759783, -87.4189508829416, -20.7733713579116, 2.25)
    pt3dadd(-10.2280441005771, -88.3862801218289, -20.8792839816023, 2.25)
    pt3dadd(-10.4387660799215, -89.3621074664471, -20.9372256843454, 2.25)
    pt3dadd(-10.6494880592659, -90.3379348110652, -20.9951673870884, 2.25)
    pt3dadd(-10.7012956995392, -91.3220702439929, -21.0738251256155, 2.25)
    pt3dadd(-10.6136001850865, -92.3134989428129, -21.1706684625109, 2.25)
    pt3dadd(-10.5259046706338, -93.3049276416328, -21.2675117994062, 2.25)
    pt3dadd(-10.4382091561811, -94.2963563404528, -21.3643551363016, 2.25)
    pt3dadd(-10.2277746427532, -95.2661084169961, -21.4747672110513, 2.25)
    pt3dadd(-9.99307632360829, -96.2315753245555, -21.587861637962, 2.25)
    pt3dadd(-9.75837800446333, -97.1970422321149, -21.7009560648727, 2.25)
    pt3dadd(-9.52367968531838, -98.1625091396742, -21.8140504917833, 2.25)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(-9.52367968531838, -98.1625091396742, -21.8140504917833, 2.20679932516888)
    pt3dadd(-9.74224941946136, -99.1362610544511, -21.8708250445506, 2.20679932516888)
    pt3dadd(-9.96258088099917, -100.110045170757, -21.9273806975644, 2.16343074127871)
    pt3dadd(-10.182912342537, -101.083829287062, -21.9839363505782, 2.12006215738854)
    pt3dadd(-10.4032438040748, -102.057613403367, -22.0404920035919, 2.07669357349837)
    pt3dadd(-10.6235752656126, -103.031397519673, -22.0970476566057, 2.0333249896082)
    pt3dadd(-10.8439067271504, -104.005181635978, -22.1536033096194, 1.98995640571802)
    pt3dadd(-11.0642381886882, -104.978965752284, -22.2101589626332, 1.94658782182785)
    pt3dadd(-11.284569650226, -105.952749868589, -22.266714615647, 1.90321923793768)
    pt3dadd(-11.5049011117639, -106.926533984895, -22.3232702686607, 1.85985065404751)
    pt3dadd(-11.7252325733017, -107.9003181012, -22.3798259216745, 1.81648207015734)
    pt3dadd(-11.9872186078689, -108.860914893969, -22.3391659182539, 1.8)
    pt3dadd(-12.274739882961, -109.813427544857, -22.2389104133242, 1.8)
    pt3dadd(-12.5622611580532, -110.765940195744, -22.1386549083944, 1.8)
    pt3dadd(-12.8497824331453, -111.718452846632, -22.0383994034646, 1.8)
    pt3dadd(-13.1373037082374, -112.670965497519, -21.9381438985349, 1.8)
    pt3dadd(-13.527652566215, -113.584445259663, -21.906515263144, 1.8)
    pt3dadd(-13.9925345765414, -114.469632571845, -21.9246298656961, 1.8)
    pt3dadd(-14.4574165868679, -115.354819884028, -21.9427444682482, 1.8)
    pt3dadd(-14.9222985971943, -116.240007196211, -21.9608590708004, 1.8)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(-14.9222985971943, -116.240007196211, -21.9608590708004, 1.8)
    pt3dadd(-15.3871806075208, -117.125194508393, -21.9789736733525, 1.8)
    pt3dadd(-15.7257907993145, -118.054574877794, -21.8740917075012, 1.8)
    pt3dadd(-16.0238915455265, -118.998132886095, -21.7297510338214, 1.8)
    pt3dadd(-16.3219922917385, -119.941690894397, -21.5854103601415, 1.8)
    pt3dadd(-16.6200930379506, -120.885248902698, -21.4410696864616, 1.8)
    pt3dadd(-16.9181937841626, -121.828806910999, -21.2967290127817, 1.8)
    pt3dadd(-17.2162945303746, -122.7723649193, -21.1523883391019, 1.8)
    pt3dadd(-17.5143952765866, -123.715922927602, -21.008047665422, 1.8)
    pt3dadd(-17.8124960227986, -124.659480935903, -20.8637069917421, 1.8)
    pt3dadd(-18.1105967690107, -125.603038944204, -20.7193663180622, 1.8)
    pt3dadd(-18.4621623233116, -126.527625519688, -20.625406329704, 1.8)
    pt3dadd(-18.9317989910801, -127.41031578474, -20.6427065109001, 1.8)
    pt3dadd(-19.4014356588486, -128.293006049792, -20.6600066920962, 1.8)
    pt3dadd(-19.8710723266171, -129.175696314845, -20.6773068732924, 1.8)
    pt3dadd(-20.3407089943856, -130.058386579897, -20.6946070544885, 1.8)
    pt3dadd(-20.8103456621541, -130.941076844949, -20.7119072356846, 1.8)
    pt3dadd(-21.0013990798777, -131.912620741979, -20.7719531974781, 1.8)
    pt3dadd(-21.1414271211461, -132.900439092051, -20.8398284869374, 1.8)
    pt3dadd(-21.2814551624145, -133.888257442124, -20.9077037763968, 1.8)
    pt3dadd(-21.4214832036829, -134.876075792196, -20.9755790658562, 1.8)
    pt3dadd(-21.5615112449513, -135.863894142268, -21.0434543553156, 1.8)
    pt3dadd(-21.692192388919, -136.843767416193, -21.0044212740722, 1.8)
    pt3dadd(-21.8057234866127, -137.809062759155, -20.7692286068539, 1.8)
    pt3dadd(-21.9192545843064, -138.774358102116, -20.5340359396356, 1.8)
    pt3dadd(-22.032785682, -139.739653445078, -20.2988432724173, 1.8)
    pt3dadd(-22.1463167796937, -140.704948788039, -20.063650605199, 1.8)
    pt3dadd(-22.2598478773874, -141.670244131001, -19.8284579379807, 1.8)
    pt3dadd(-22.373378975081, -142.635539473962, -19.5932652707624, 1.8)
    pt3dadd(-22.4869100727747, -143.600834816924, -19.358072603544, 1.8)
    pt3dadd(-22.6782725501071, -144.55893901148, -19.1459005711237, 1.8)
    pt3dadd(-22.8743215581614, -145.516610198962, -18.9351147008492, 1.8)
    pt3dadd(-23.0703705662158, -146.474281386444, -18.7243288305748, 1.8)
    pt3dadd(-23.2664195742701, -147.431952573926, -18.5135429603004, 1.8)
    pt3dadd(-23.4624685823245, -148.389623761408, -18.3027570900259, 1.8)
    pt3dadd(-23.6585175903788, -149.347294948891, -18.0919712197515, 1.8)
    pt3dadd(-23.8540929120448, -150.307143275407, -17.9080696361661, 1.8)
    pt3dadd(-24.0453581070105, -151.286801639348, -17.9687912563181, 1.8)
    pt3dadd(-24.2366233019762, -152.26646000329, -18.0295128764701, 1.8)
    pt3dadd(-24.4278884969418, -153.246118367232, -18.0902344966221, 1.8)
    pt3dadd(-24.6191536919075, -154.225776731173, -18.1509561167741, 1.8)
    pt3dadd(-24.8104188868732, -155.205435095115, -18.2116777369261, 1.8)
    pt3dadd(-24.9646654788485, -156.185309375997, -18.2321818991592, 1.8)
    pt3dadd(-24.925212910623, -157.166313438306, -18.0422489515342, 1.8)
    pt3dadd(-24.8857603423976, -158.147317500616, -17.8523160039091, 1.8)
    pt3dadd(-24.8463077741721, -159.128321562925, -17.6623830562841, 1.8)
    pt3dadd(-24.8068552059466, -160.109325625234, -17.472450108659, 1.8)
    pt3dadd(-24.8588409583969, -161.087271489635, -17.4610372963295, 1.8)
    pt3dadd(-25.0035133579669, -162.062117405259, -17.630581796663, 1.8)
    pt3dadd(-25.1481857575369, -163.036963320883, -17.8001262969964, 1.8)
    pt3dadd(-25.2928581571069, -164.011809236508, -17.9696707973298, 1.8)
    pt3dadd(-25.4375305566768, -164.986655152132, -18.1392152976633, 1.8)
    pt3dadd(-25.6923157363803, -165.946882697418, -18.0269209585049, 1.8)
    pt3dadd(-25.9476259189782, -166.907040544285, -17.9132828497468, 1.8)
    pt3dadd(-26.2029361015761, -167.867198391151, -17.7996447409887, 1.8)
    pt3dadd(-26.458246284174, -168.827356238018, -17.6860066322307, 1.8)
    pt3dadd(-26.7135564667719, -169.787514084885, -17.5723685234726, 1.8)
    pt3dadd(-27.055328243306, -170.703719217635, -17.4800427633161, 1.8)
    pt3dadd(-27.7060311019278, -171.462879367583, -17.4638669631081, 1.8)
    pt3dadd(-28.3469897611616, -172.225555897057, -17.4492216660312, 1.8)
    pt3dadd(-28.3408613201326, -173.221746103781, -17.5362131267506, 1.8)
    pt3dadd(-28.3347328791036, -174.217936310505, -17.62320458747, 1.8)
    pt3dadd(-28.3286044380745, -175.214126517228, -17.7101960481894, 1.8)
    pt3dadd(-28.3224759970455, -176.210316723952, -17.7971875089088, 1.8)
    pt3dadd(-28.3163475560165, -177.206506930676, -17.8841789696282, 1.8)
    pt3dadd(-28.3102191149875, -178.2026971374, -17.9711704303476, 1.8)
    pt3dadd(-28.3040906739584, -179.198887344124, -18.058161891067, 1.8)
    pt3dadd(-28.2979622329294, -180.195077550848, -18.1451533517864, 1.8)
    pt3dadd(-28.2918337919004, -181.191267757571, -18.2321448125058, 1.8)
    pt3dadd(-28.2857053508713, -182.187457964295, -18.3191362732252, 1.8)
    pt3dadd(-28.2795769098423, -183.183648171019, -18.4061277339446, 1.8)
    pt3dadd(-28.2734484688133, -184.179838377743, -18.493119194664, 1.8)
    pt3dadd(-28.2930572626718, -185.174558606399, -18.5844384365732, 1.8)
    pt3dadd(-28.3807651722997, -186.165389364912, -18.6872087171645, 1.8)
    pt3dadd(-28.4684730819276, -187.156220123425, -18.7899789977558, 1.8)
    pt3dadd(-28.5561809915555, -188.147050881938, -18.8927492783471, 1.8)
    pt3dadd(-28.6438889011834, -189.137881640451, -18.9955195589384, 1.8)
    pt3dadd(-28.7315968108113, -190.128712398965, -19.0982898395297, 1.8)
    pt3dadd(-28.8193047204392, -191.119543157478, -19.201060120121, 1.8)
    pt3dadd(-28.9070126300671, -192.110373915991, -19.3038304007123, 1.8)
    pt3dadd(-28.994720539695, -193.101204674504, -19.4066006813036, 1.8)
    pt3dadd(-29.10962702076, -194.076405454631, -19.5633924282704, 1.8)
    pt3dadd(-29.3025687579552, -195.006762358692, -19.8751768363374, 1.8)
    pt3dadd(-29.4955104951505, -195.937119262754, -20.1869612444044, 1.8)
    pt3dadd(-29.6884522323458, -196.867476166815, -20.4987456524714, 1.8)
    pt3dadd(-29.8813939695411, -197.797833070876, -20.8105300605384, 1.8)
    pt3dadd(-30.0743357067364, -198.728189974937, -21.1223144686054, 1.8)
    pt3dadd(-30.2672774439317, -199.658546878999, -21.4340988766724, 1.8)
    pt3dadd(-30.4602191811269, -200.58890378306, -21.7458832847394, 1.8)
    pt3dadd(-30.5134627317531, -201.548708800933, -21.975554226685, 1.8)
    pt3dadd(-30.4472720745829, -202.533690324176, -22.1350227056173, 1.8)
    pt3dadd(-30.3810814174127, -203.51867184742, -22.2944911845497, 1.8)
    pt3dadd(-30.3148907602425, -204.503653370663, -22.4539596634821, 1.8)
    pt3dadd(-30.2487001030722, -205.488634893906, -22.6134281424144, 1.8)
    pt3dadd(-30.182509445902, -206.473616417149, -22.7728966213468, 1.8)
    pt3dadd(-30.1163187887318, -207.458597940392, -22.9323651002791, 1.8)
    pt3dadd(-30.0501281315616, -208.443579463635, -23.0918335792115, 1.8)
    pt3dadd(-29.9839374743914, -209.428560986878, -23.2513020581438, 1.8)
    pt3dadd(-29.9177468172211, -210.413542510122, -23.4107705370762, 1.8)
    pt3dadd(-29.8476846024091, -211.399033496566, -23.5452656304304, 1.8)
    pt3dadd(-29.7424171890185, -212.389157179937, -23.4526704723126, 1.8)
    pt3dadd(-29.6371497756279, -213.379280863307, -23.3600753141948, 1.8)
    pt3dadd(-29.5318823622373, -214.369404546678, -23.267480156077, 1.8)
    pt3dadd(-29.4266149488467, -215.359528230048, -23.1748849979592, 1.8)
    pt3dadd(-29.3213475354562, -216.349651913419, -23.0822898398414, 1.8)
    pt3dadd(-29.2160801220656, -217.33977559679, -22.9896946817236, 1.8)
    pt3dadd(-29.110812708675, -218.32989928016, -22.8970995236058, 1.8)
    pt3dadd(-29.4088808829183, -219.085123287977, -23.3629851345219, 1.8)
    pt3dadd(-29.8011615033713, -219.785478661023, -23.9593225107294, 1.8)
    pt3dadd(-30.1934421238243, -220.485834034069, -24.555659886937, 1.8)
    pt3dadd(-30.5857227442773, -221.186189407116, -25.1519972631446, 1.8)
    pt3dadd(-30.9780033647303, -221.886544780162, -25.7483346393521, 1.8)
    pt3dadd(-31.0053135808928, -222.842944942299, -25.7562500435034, 1.8)
    pt3dadd(-30.9760434716334, -223.839039001034, -25.6729440601863, 1.8)
    pt3dadd(-30.9467733623741, -224.835133059769, -25.5896380768691, 1.8)
    pt3dadd(-30.9175032531147, -225.831227118505, -25.506332093552, 1.8)
    pt3dadd(-30.8882331438553, -226.82732117724, -25.4230261102348, 1.8)
    pt3dadd(-30.858963034596, -227.823415235975, -25.3397201269177, 1.8)
    pt3dadd(-30.8296929253366, -228.81950929471, -25.2564141436005, 1.8)
    pt3dadd(-30.8004228160773, -229.815603353445, -25.1731081602833, 1.8)
    pt3dadd(-30.7711527068179, -230.81169741218, -25.0898021769662, 1.8)
    pt3dadd(-30.7418825975585, -231.807791470916, -25.006496193649, 1.8)
    pt3dadd(-30.7188225216554, -232.806466986169, -25.0179960785404, 1.8)
    pt3dadd(-30.6971258049297, -233.805709237901, -25.050309772809, 1.8)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-30.6971258049297, -233.805709237901, -25.050309772809, 1.8)
    pt3dadd(-30.675429088204, -234.804951489633, -25.0826234670776, 1.8)
    pt3dadd(-30.6537323714783, -235.804193741364, -25.1149371613462, 1.8)
    pt3dadd(-30.6320356547526, -236.803435993096, -25.1472508556148, 1.8)
    pt3dadd(-30.610338938027, -237.802678244828, -25.1795645498834, 1.8)
    pt3dadd(-30.5886422213013, -238.80192049656, -25.211878244152, 1.8)
    pt3dadd(-30.5669455045756, -239.801162748292, -25.2441919384206, 1.8)
    pt3dadd(-30.5452487878499, -240.800405000023, -25.2765056326892, 1.8)
    pt3dadd(-30.5235520711243, -241.799647251755, -25.3088193269577, 1.8)
    pt3dadd(-30.5605125652875, -242.788412954458, -25.4332344115478, 1.8)
    pt3dadd(-30.6242699989447, -243.772392554204, -25.599725062745, 1.8)
    pt3dadd(-30.6880274326018, -244.756372153951, -25.7662157139423, 1.8)
    pt3dadd(-30.751784866259, -245.740351753698, -25.9327063651395, 1.8)
    pt3dadd(-30.8155422999162, -246.724331353444, -26.0991970163368, 1.8)
    pt3dadd(-30.8792997335733, -247.708310953191, -26.265687667534, 1.8)
    pt3dadd(-30.9430571672305, -248.692290552937, -26.4321783187313, 1.8)
    pt3dadd(-31.0068146008876, -249.676270152684, -26.5986689699285, 1.8)
    pt3dadd(-31.0705720345448, -250.66024975243, -26.7651596211258, 1.8)
    pt3dadd(-31.134329468202, -251.644229352177, -26.931650272323, 1.8)
    pt3dadd(-31.1980869018591, -252.628208951923, -27.0981409235202, 1.8)
    pt3dadd(-31.2618443355163, -253.61218855167, -27.2646315747175, 1.8)
    pt3dadd(-31.3226651975668, -254.577387892654, -27.4914978632843, 1.8)
    pt3dadd(-31.3737945210563, -255.480606929268, -27.9176212775416, 1.8)
    pt3dadd(-31.4249238445458, -256.383825965881, -28.3437446917989, 1.8)
    pt3dadd(-31.4760531680352, -257.287045002495, -28.7698681060562, 1.8)
    pt3dadd(-31.5271824915247, -258.190264039108, -29.1959915203134, 1.8)
    pt3dadd(-31.5783118150141, -259.093483075722, -29.6221149345707, 1.8)
    pt3dadd(-31.6294411385036, -259.996702112336, -30.048238348828, 1.8)
    pt3dadd(-31.6805704619931, -260.899921148949, -30.4743617630853, 1.8)
    pt3dadd(-31.7316997854825, -261.803140185563, -30.9004851773426, 1.8)
    pt3dadd(-31.8062606223041, -262.714839607883, -31.2795215524704, 1.8)
    pt3dadd(-32.0424418641434, -263.685033048624, -31.3337719768439, 1.8)
    pt3dadd(-32.2786231059826, -264.655226489366, -31.3880224012175, 1.8)
    pt3dadd(-32.4164752810716, -265.627040067563, -31.441820292738, 1.8)
    pt3dadd(-32.211894838843, -266.604495801506, -31.4940422310394, 1.8)
    pt3dadd(-32.0073143966144, -267.581951535448, -31.5462641693407, 1.8)
    pt3dadd(-31.8027339543858, -268.559407269391, -31.5984861076421, 1.8)
    pt3dadd(-31.5981535121572, -269.536863003334, -31.6507080459435, 1.8)
    pt3dadd(-31.3935730699286, -270.514318737277, -31.7029299842449, 1.8)
    pt3dadd(-31.1889926277, -271.491774471219, -31.7551519225462, 1.8)
    pt3dadd(-30.9844121854714, -272.469230205162, -31.8073738608476, 1.8)
    pt3dadd(-31.0020627468248, -273.437120249962, -32.0026956015049, 1.8)
    pt3dadd(-31.0982637257224, -274.401629178428, -32.2485978149333, 1.8)
    pt3dadd(-31.19446470462, -275.366138106894, -32.4945000283618, 1.8)
    pt3dadd(-31.2906656835176, -276.33064703536, -32.7404022417902, 1.8)
    pt3dadd(-31.3868666624152, -277.295155963825, -32.9863044552186, 1.8)
    pt3dadd(-31.4830676413128, -278.259664892291, -33.232206668647, 1.8)
    pt3dadd(-31.5792686202104, -279.224173820757, -33.4781088820754, 1.8)
    pt3dadd(-31.675469599108, -280.188682749223, -33.7240110955038, 1.8)
    pt3dadd(-31.7590983646633, -281.15463823237, -33.9656187528249, 1.8)
    pt3dadd(-31.732772593693, -282.133245047878, -34.1696669197432, 1.8)
    pt3dadd(-31.7064468227226, -283.111851863387, -34.3737150866616, 1.8)
    pt3dadd(-31.6801210517523, -284.090458678896, -34.5777632535799, 1.8)
    pt3dadd(-31.6537952807819, -285.069065494404, -34.7818114204983, 1.8)
    pt3dadd(-31.6274695098116, -286.047672309913, -34.9858595874166, 1.8)
    pt3dadd(-31.6011688817183, -287.026278549267, -35.189892910735, 1.8)
    pt3dadd(-31.8257058874293, -287.99913678306, -35.2458392243475, 1.8)
    pt3dadd(-32.0502428931403, -288.971995016853, -35.3017855379601, 1.8)
    pt3dadd(-32.2747798988513, -289.944853250647, -35.3577318515726, 1.8)
    pt3dadd(-31.9457149507117, -290.874213266532, -35.333143459967, 1.8)
    pt3dadd(-31.568470076881, -291.799787636627, -35.3015461405823, 1.8)
    pt3dadd(-31.1912252030503, -292.725362006722, -35.2699488211976, 1.8)
    pt3dadd(-30.8139803292197, -293.650936376816, -35.2383515018128, 1.8)
    pt3dadd(-30.436735455389, -294.576510746911, -35.2067541824281, 1.8)
    pt3dadd(-30.0594905815583, -295.502085117006, -35.1751568630433, 1.8)
    pt3dadd(-29.6822457077277, -296.4276594871, -35.1435595436586, 1.8)
    pt3dadd(-29.305000833897, -297.353233857195, -35.1119622242738, 1.8)
    pt3dadd(-29.3021375034837, -298.345343520764, -35.1490552773494, 1.8)
    pt3dadd(-29.3352169685802, -299.343840957688, -35.1927430038382, 1.8)
    pt3dadd(-29.3682964336766, -300.342338394611, -35.2364307303271, 1.8)
    pt3dadd(-29.401375898773, -301.340835831535, -35.280118456816, 1.8)
    pt3dadd(-29.4344553638694, -302.339333268459, -35.3238061833049, 1.8)
    pt3dadd(-29.4675348289659, -303.337830705382, -35.3674939097938, 1.8)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(-9.52367968531838, -98.1625091396742, -21.8140504917833, 2.17975681609656)
    pt3dadd(-9.12405940249459, -99.0502351248813, -22.042229196964, 2.17975681609656)
    pt3dadd(-8.72379811367156, -99.9376589526527, -22.2708552028627, 2.10924061639048)
    pt3dadd(-8.32353682484852, -100.825082780424, -22.4994812087615, 2.0387244166844)
    pt3dadd(-7.92327553602549, -101.712506608196, -22.7281072146602, 1.96820821697831)
    pt3dadd(-7.52301424720245, -102.599930435967, -22.956733220559, 1.89769201727223)
    pt3dadd(-7.12275295837942, -103.487354263738, -23.1853592264578, 1.82717581756614)
    pt3dadd(-6.86588203922737, -104.431839816082, -23.3385260194221, 1.8)
    pt3dadd(-6.69892150698282, -105.412104910286, -23.4443774519041, 1.8)
    pt3dadd(-6.53196097473826, -106.39237000449, -23.5502288843862, 1.8)
    pt3dadd(-6.3650004424937, -107.372635098693, -23.6560803168682, 1.8)
    pt3dadd(-6.19803991024914, -108.352900192897, -23.7619317493502, 1.8)
    pt3dadd(-6.03107937800459, -109.333165287101, -23.8677831818323, 1.8)
    pt3dadd(-5.86411884576003, -110.313430381304, -23.9736346143143, 1.8)
    pt3dadd(-5.69715831351547, -111.293695475508, -24.0794860467963, 1.8)
    pt3dadd(-5.66859072979772, -112.18126452252, -24.5185438441303, 1.8)
    pt3dadd(-5.65860562753094, -113.056386962997, -25.0023423682147, 1.8)
    pt3dadd(-5.64862052526417, -113.931509403474, -25.486140892299, 1.8)
  }
}
proc shape3d_12() {
  adendIML[9] {
    pt3dadd(-5.63863542299739, -114.806631843951, -25.9699394163833, 1.8)
    pt3dadd(-5.62865032073062, -115.681754284428, -26.4537379404677, 1.8)
    pt3dadd(-5.61866521846384, -116.556876724905, -26.937536464552, 1.8)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(-5.61866521846384, -116.556876724905, -26.937536464552, 1.8)
    pt3dadd(-5.60868011619706, -117.431999165382, -27.4213349886364, 1.8)
    pt3dadd(-5.37699233462907, -118.374047452014, -27.5711809031496, 1.8)
    pt3dadd(-5.09642553778641, -119.33085094804, -27.647399946054, 1.8)
    pt3dadd(-4.81585874094375, -120.287654444067, -27.7236189889584, 1.8)
    pt3dadd(-4.53529194410109, -121.244457940093, -27.7998380318628, 1.8)
    pt3dadd(-4.25472514725843, -122.201261436119, -27.8760570747672, 1.8)
    pt3dadd(-3.97415835041576, -123.158064932146, -27.9522761176716, 1.8)
    pt3dadd(-3.6935915535731, -124.114868428172, -28.0284951605761, 1.8)
    pt3dadd(-3.41302475673044, -125.071671924198, -28.1047142034805, 1.8)
    pt3dadd(-3.13245795988778, -126.028475420225, -28.1809332463849, 1.8)
    pt3dadd(-2.85189116304511, -126.985278916251, -28.2571522892893, 1.8)
    pt3dadd(-2.60698199558883, -127.94096488408, -28.3976204865473, 1.8)
    pt3dadd(-2.40797644363149, -128.89521220931, -28.6207994115889, 1.8)
    pt3dadd(-2.20897089167415, -129.849459534539, -28.8439783366304, 1.8)
    pt3dadd(-2.00996533971681, -130.803706859769, -29.067157261672, 1.8)
    pt3dadd(-1.81095978775947, -131.757954184998, -29.2903361867135, 1.8)
    pt3dadd(-1.61195423580213, -132.712201510227, -29.513515111755, 1.8)
    pt3dadd(-1.41294868384479, -133.666448835457, -29.7366940367966, 1.8)
    pt3dadd(-1.21394313188744, -134.620696160686, -29.9598729618381, 1.8)
    pt3dadd(-1.0149375799301, -135.574943485916, -30.1830518868797, 1.8)
    pt3dadd(-0.799824693984418, -136.520517341902, -30.4244556381155, 1.8)
    pt3dadd(-0.552325178984078, -137.448651661884, -30.7025036090568, 1.8)
    pt3dadd(-0.30482566398374, -138.376785981867, -30.9805515799982, 1.8)
    pt3dadd(-0.0573261489833996, -139.30492030185, -31.2585995509395, 1.8)
    pt3dadd(0.190173366016937, -140.233054621833, -31.5366475218808, 1.8)
    pt3dadd(0.437672881017278, -141.161188941816, -31.8146954928222, 1.8)
    pt3dadd(0.68517239601762, -142.089323261799, -32.0927434637635, 1.8)
    pt3dadd(0.932671911017957, -143.017457581781, -32.3707914347048, 1.8)
    pt3dadd(1.1801714260183, -143.945591901764, -32.6488394056462, 1.8)
    pt3dadd(1.42767094101864, -144.873726221747, -32.9268873765875, 1.8)
    pt3dadd(1.73091826561295, -145.763518916371, -33.2608019616153, 1.8)
    pt3dadd(2.06900225051267, -146.62935202966, -33.629627447565, 1.8)
    pt3dadd(2.40708623541239, -147.49518514295, -33.9984529335146, 1.8)
    pt3dadd(2.74517022031211, -148.361018256239, -34.3672784194642, 1.8)
    pt3dadd(3.08325420521183, -149.226851369528, -34.7361039054139, 1.8)
    pt3dadd(3.42133819011155, -150.092684482818, -35.1049293913635, 1.8)
    pt3dadd(3.75942217501127, -150.958517596107, -35.4737548773131, 1.8)
    pt3dadd(4.09750615991099, -151.824350709396, -35.8425803632628, 1.8)
    pt3dadd(4.43559014481071, -152.690183822686, -36.2114058492124, 1.8)
    pt3dadd(4.74050450401955, -153.586514933115, -36.4838535353125, 1.8)
    pt3dadd(4.95929344586208, -154.562034538372, -36.5060548570358, 1.8)
    pt3dadd(5.17808238770461, -155.537554143629, -36.528256178759, 1.8)
    pt3dadd(5.39687132954715, -156.513073748886, -36.5504575004822, 1.8)
    pt3dadd(5.61566027138969, -157.488593354143, -36.5726588222055, 1.8)
    pt3dadd(5.83444921323223, -158.464112959401, -36.5948601439287, 1.8)
    pt3dadd(6.05323815507476, -159.439632564658, -36.6170614656519, 1.8)
    pt3dadd(6.2720270969173, -160.415152169915, -36.6392627873752, 1.8)
    pt3dadd(6.49081603875983, -161.390671775172, -36.6614641090984, 1.8)
    pt3dadd(6.67708273843909, -162.370171129605, -36.7034498312235, 1.8)
    pt3dadd(6.7718198382421, -163.360870967936, -36.801116162437, 1.8)
    pt3dadd(6.86655693804511, -164.351570806266, -36.8987824936505, 1.8)
    pt3dadd(6.96129403784811, -165.342270644597, -36.996448824864, 1.8)
    pt3dadd(7.05603113765112, -166.332970482927, -37.0941151560776, 1.8)
    pt3dadd(7.19170040231181, -167.314849515333, -37.1961687413176, 1.8)
    pt3dadd(7.49115594674358, -168.261432906959, -37.3157775186151, 1.8)
    pt3dadd(7.79061149117535, -169.208016298585, -37.4353862959126, 1.8)
    pt3dadd(8.09006703560712, -170.154599690211, -37.5549950732101, 1.8)
    pt3dadd(8.38952258003889, -171.101183081837, -37.6746038505076, 1.8)
    pt3dadd(8.81058342106788, -171.997920852907, -37.8052006787786, 1.8)
    pt3dadd(9.24222672392096, -172.89032090686, -37.9367537205798, 1.8)
    pt3dadd(9.67387002677402, -173.782720960813, -38.068306762381, 1.8)
    pt3dadd(10.0883382290383, -174.683073970787, -38.1983869056128, 1.8)
    pt3dadd(10.4713671546233, -175.597984984859, -38.3257708861405, 1.8)
    pt3dadd(10.8543960802083, -176.512895998931, -38.4531548666682, 1.8)
    pt3dadd(11.2374250057933, -177.427807013002, -38.580538847196, 1.8)
    pt3dadd(11.6204539313784, -178.342718027074, -38.7079228277237, 1.8)
    pt3dadd(12.0034828569634, -179.257629041146, -38.8353068082515, 1.8)
    pt3dadd(12.2951150340627, -180.200598133081, -38.9536183151412, 1.8)
    pt3dadd(12.4701854874132, -181.179350750962, -39.0603593538969, 1.8)
    pt3dadd(12.6452559407638, -182.158103368844, -39.1671003926525, 1.8)
    pt3dadd(12.8203263941143, -183.136855986725, -39.2738414314082, 1.8)
    pt3dadd(12.9953968474649, -184.115608604606, -39.3805824701638, 1.8)
    pt3dadd(13.1704673008154, -185.094361222487, -39.4873235089195, 1.8)
    pt3dadd(13.4142225373997, -186.051419980611, -39.6008298866044, 1.8)
    pt3dadd(13.8120164114664, -186.959826148723, -39.7295088184082, 1.8)
    pt3dadd(14.2098102855331, -187.868232316836, -39.858187750212, 1.8)
    pt3dadd(14.6076041595998, -188.776638484948, -39.9868666820158, 1.8)
    pt3dadd(15.0053980336665, -189.685044653061, -40.1155456138196, 1.8)
    pt3dadd(15.4031919077332, -190.593450821173, -40.2442245456234, 1.8)
    pt3dadd(15.8009857818, -191.501856989286, -40.3729034774272, 1.8)
    pt3dadd(16.1987796558667, -192.410263157398, -40.501582409231, 1.8)
    pt3dadd(16.6000302881371, -193.271656995233, -40.802820578055, 1.8)
    pt3dadd(17.0019565423605, -194.12386229267, -41.1377853779746, 1.8)
    pt3dadd(17.4038827965839, -194.976067590108, -41.4727501778942, 1.8)
    pt3dadd(17.8058090508073, -195.828272887546, -41.8077149778138, 1.8)
    pt3dadd(18.2077353050307, -196.680478184983, -42.1426797777334, 1.8)
    pt3dadd(18.609661559254, -197.532683482421, -42.477644577653, 1.8)
    pt3dadd(19.0115878134774, -198.384888779859, -42.8126093775726, 1.8)
    pt3dadd(19.4135140677008, -199.237094077296, -43.1475741774922, 1.8)
    pt3dadd(19.8154403219242, -200.089299374734, -43.4825389774118, 1.8)
    pt3dadd(20.2173665761476, -200.941504672172, -43.8175037773313, 1.8)
    pt3dadd(20.619292830371, -201.793709969609, -44.1524685772509, 1.8)
    pt3dadd(21.11129549078, -202.630498678596, -44.387783922675, 1.8)
    pt3dadd(21.6148510991281, -203.465310099064, -44.6103185077569, 1.8)
    pt3dadd(22.1184067074761, -204.300121519532, -44.8328530928389, 1.8)
    pt3dadd(22.6219623158241, -205.13493294, -45.0553876779208, 1.8)
    pt3dadd(23.1255179241721, -205.969744360468, -45.2779222630028, 1.8)
    pt3dadd(23.6290735325201, -206.804555780935, -45.5004568480848, 1.8)
    pt3dadd(24.1326291408681, -207.639367201403, -45.7229914331667, 1.8)
    pt3dadd(24.6361847492161, -208.474178621871, -45.9455260182487, 1.8)
    pt3dadd(25.1397403575641, -209.308990042339, -46.1680606033307, 1.8)
    pt3dadd(25.6060262380958, -210.15428507025, -46.4021902655161, 1.8)
    pt3dadd(25.7702748876875, -211.084540197091, -46.7302874768644, 1.8)
    pt3dadd(25.9345235372792, -212.014795323931, -47.0583846882128, 1.8)
    pt3dadd(26.0987721868709, -212.945050450771, -47.3864818995611, 1.8)
    pt3dadd(26.2630208364626, -213.875305577612, -47.7145791109094, 1.8)
    pt3dadd(26.4272694860544, -214.805560704452, -48.0426763222577, 1.8)
    pt3dadd(26.5915181356461, -215.735815831292, -48.3707735336061, 1.8)
    pt3dadd(26.7557667852378, -216.666070958133, -48.6988707449544, 1.8)
    pt3dadd(26.9200154348295, -217.596326084973, -49.0269679563027, 1.8)
    pt3dadd(27.1503435468493, -218.523898143728, -49.2888279773804, 1.8)
    pt3dadd(27.5163472062452, -219.445961278565, -49.4146886014232, 1.8)
    pt3dadd(27.882350865641, -220.368024413401, -49.5405492254659, 1.8)
    pt3dadd(28.2483545250369, -221.290087548237, -49.6664098495086, 1.8)
    pt3dadd(28.6143581844327, -222.212150683074, -49.7922704735513, 1.8)
    pt3dadd(28.9803618438286, -223.13421381791, -49.9181310975941, 1.8)
    pt3dadd(29.3463655032244, -224.056276952747, -50.0439917216368, 1.8)
    pt3dadd(29.7123691626202, -224.978340087583, -50.1698523456795, 1.8)
    pt3dadd(30.3552227822693, -225.720341346444, -50.3149659975876, 1.8)
    pt3dadd(31.0363141301982, -226.437472971656, -50.4627388228884, 1.8)
    pt3dadd(31.7174054781271, -227.154604596867, -50.6105116481892, 1.8)
    pt3dadd(32.398496826056, -227.871736222079, -50.75828447349, 1.8)
    pt3dadd(32.9708373547828, -228.658075309311, -50.963597224109, 1.8)
    pt3dadd(33.4779957206317, -229.485895390386, -51.2033977773175, 1.8)
    pt3dadd(33.9851540864806, -230.31371547146, -51.4431983305259, 1.8)
    pt3dadd(34.4923124523294, -231.141535552535, -51.6829988837343, 1.8)
    pt3dadd(34.9994708181783, -231.96935563361, -51.9227994369427, 1.8)
    pt3dadd(35.5066291840272, -232.797175714684, -52.1625999901511, 1.8)
    pt3dadd(36.013787549876, -233.624995795759, -52.4024005433596, 1.8)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(36.013787549876, -233.624995795759, -52.4024005433596, 1.8)
    pt3dadd(36.5209459157249, -234.452815876834, -52.642201096568, 1.8)
    pt3dadd(37.0281042815738, -235.280635957908, -52.8820016497764, 1.8)
    pt3dadd(37.5352626474227, -236.108456038983, -53.1218022029848, 1.8)
    pt3dadd(38.0424210132716, -236.936276120057, -53.3616027561933, 1.8)
    pt3dadd(38.5495793791204, -237.764096201132, -53.6014033094017, 1.8)
    pt3dadd(39.0567377449693, -238.591916282207, -53.8412038626101, 1.8)
    pt3dadd(39.4233960929328, -239.492073314046, -54.0136563208629, 1.8)
    pt3dadd(39.6684546163764, -240.454836462609, -54.1278204126684, 1.8)
    pt3dadd(39.9135131398199, -241.417599611171, -54.2419845044738, 1.8)
    pt3dadd(40.1585716632634, -242.380362759734, -54.3561485962792, 1.8)
    pt3dadd(40.4036301867069, -243.343125908296, -54.4703126880847, 1.8)
    pt3dadd(41.0233794971477, -244.083088438197, -54.6123425594277, 1.8)
    pt3dadd(41.7377662862849, -244.766777129686, -54.7614106265547, 1.8)
    pt3dadd(42.452153075422, -245.450465821174, -54.9104786936816, 1.8)
    pt3dadd(43.0476969189953, -246.218140483477, -55.0859965751264, 1.8)
    pt3dadd(43.5063638451551, -247.082545673085, -55.2919779311409, 1.8)
    pt3dadd(43.965030771315, -247.946950862693, -55.4979592871555, 1.8)
    pt3dadd(44.4236976974749, -248.811356052301, -55.70394064317, 1.8)
    pt3dadd(44.8823646236348, -249.675761241909, -55.9099219991845, 1.8)
    pt3dadd(45.3410315497946, -250.540166431517, -56.115903355199, 1.8)
    pt3dadd(45.7996984759545, -251.404571621125, -56.3218847112135, 1.8)
    pt3dadd(46.2583654021144, -252.268976810734, -56.5278660672281, 1.8)
    pt3dadd(46.8655972105306, -253.039972670384, -56.6892094757169, 1.8)
    pt3dadd(47.5217771659596, -253.780192659278, -56.8358458768387, 1.8)
    pt3dadd(48.1779571213887, -254.520412648173, -56.9824822779605, 1.8)
    pt3dadd(48.8341370768178, -255.260632637068, -57.1291186790823, 1.8)
    pt3dadd(49.4903170322468, -256.000852625962, -57.275755080204, 1.8)
    pt3dadd(50.1464969876759, -256.741072614857, -57.4223914813258, 1.8)
    pt3dadd(50.6385797132022, -257.596391613342, -57.5583405457072, 1.8)
    pt3dadd(51.0988861732458, -258.473998719236, -57.6922200830784, 1.8)
    pt3dadd(51.5591926332894, -259.35160582513, -57.8260996204497, 1.8)
    pt3dadd(52.019499093333, -260.229212931024, -57.9599791578209, 1.8)
    pt3dadd(52.4798055533766, -261.106820036918, -58.0938586951922, 1.8)
    pt3dadd(52.9401120134202, -261.984427142811, -58.2277382325634, 1.8)
    pt3dadd(53.4004184734638, -262.862034248705, -58.3616177699347, 1.8)
    pt3dadd(53.8506983380636, -263.744775626952, -58.4946799830449, 1.8)
    pt3dadd(54.2765997467133, -264.64000036838, -58.6257549709194, 1.8)
    pt3dadd(54.7025011553631, -265.535225109807, -58.7568299587939, 1.8)
    pt3dadd(55.1284025640128, -266.430449851234, -58.8879049466684, 1.8)
    pt3dadd(55.5543039726625, -267.325674592662, -59.0189799345429, 1.8)
    pt3dadd(55.9802053813122, -268.220899334089, -59.1500549224174, 1.8)
    pt3dadd(56.6485867847202, -268.925779650233, -59.2951680419498, 1.8)
    pt3dadd(57.4069890972352, -269.559994432815, -59.4454928300789, 1.8)
    pt3dadd(58.1653914097502, -270.194209215397, -59.595817618208, 1.8)
    pt3dadd(58.9237937222652, -270.82842399798, -59.7461424063371, 1.8)
    pt3dadd(59.6821960347802, -271.462638780562, -59.8964671944662, 1.8)
    pt3dadd(60.4405983472952, -272.096853563144, -60.0467919825953, 1.8)
    pt3dadd(61.1990006598101, -272.731068345726, -60.1971167707244, 1.8)
    pt3dadd(61.8443870528732, -273.447223580804, -60.3369228218237, 1.8)
    pt3dadd(62.1953616901428, -274.37683752689, -60.4493270710113, 1.8)
    pt3dadd(62.5463363274124, -275.306451472977, -60.5617313201989, 1.8)
    pt3dadd(62.8973109646821, -276.236065419063, -60.6741355693864, 1.8)
    pt3dadd(63.2482856019517, -277.165679365149, -60.786539818574, 1.8)
    pt3dadd(63.5992602392213, -278.095293311235, -60.8989440677616, 1.8)
    pt3dadd(63.9502348764909, -279.024907257321, -61.0113483169492, 1.8)
    pt3dadd(64.3012095137605, -279.954521203408, -61.1237525661367, 1.8)
    pt3dadd(64.6521841510301, -280.884135149494, -61.2361568153243, 1.8)
    pt3dadd(65.0031587882998, -281.81374909558, -61.3485610645119, 1.8)
    pt3dadd(65.234900914127, -282.712030704128, -61.609291208003, 1.8)
    pt3dadd(65.2377676807366, -283.550167643052, -62.1547435462153, 1.8)
    pt3dadd(65.2406344473461, -284.388304581975, -62.7001958844276, 1.8)
    pt3dadd(65.2435012139557, -285.226441520898, -63.2456482226399, 1.8)
    pt3dadd(65.2463679805652, -286.064578459822, -63.7911005608522, 1.8)
    pt3dadd(65.2492347471748, -286.902715398745, -64.3365528990645, 1.8)
    pt3dadd(65.2521015137844, -287.740852337669, -64.8820052372768, 1.8)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(-10.9679199089491, -71.951129057745, -16.8365262725686, 2.19808342436135)
    pt3dadd(-11.8831906375285, -72.5236532300037, -16.9461063047955, 2.19808342436135)
    pt3dadd(-12.6360321821779, -73.1669040688734, -17.0855981215568, 2.16214338558181)
    pt3dadd(-13.3888737268273, -73.810154907743, -17.2250899383182, 2.12620334680226)
    pt3dadd(-14.1417152714766, -74.4534057466127, -17.3645817550795, 2.09026330802271)
    pt3dadd(-14.894556816126, -75.0966565854824, -17.5040735718409, 2.05432326924317)
    pt3dadd(-15.6473983607754, -75.739907424352, -17.6435653886023, 2.01838323046362)
    pt3dadd(-16.4002399054248, -76.3831582632217, -17.7830572053636, 1.98244319168407)
    pt3dadd(-17.1530814500742, -77.0264091020914, -17.922549022125, 1.94650315290453)
    pt3dadd(-17.9059229947236, -77.6696599409611, -18.0620408388863, 1.91056311412498)
    pt3dadd(-18.658764539373, -78.3129107798307, -18.2015326556477, 1.87462307534543)
    pt3dadd(-19.4116060840224, -78.9561616187004, -18.341024472409, 1.83868303656589)
    pt3dadd(-20.1644476286718, -79.5994124575701, -18.4805162891704, 1.80274299778634)
    pt3dadd(-20.7086878712765, -80.2352107301473, -19.0127015418502, 1.8)
    pt3dadd(-21.2356918514729, -80.8703932137196, -19.5773341812009, 1.8)
    pt3dadd(-21.7626958316693, -81.5055756972918, -20.1419668205516, 1.8)
    pt3dadd(-22.2896998118658, -82.140758180864, -20.7065994599023, 1.8)
    pt3dadd(-22.8167037920622, -82.7759406644363, -21.2712320992529, 1.8)
    pt3dadd(-23.3437077722586, -83.4111231480085, -21.8358647386036, 1.8)
    pt3dadd(-23.9244999005106, -84.1715846745589, -22.0071965911055, 1.8)
    pt3dadd(-24.5223728161526, -84.9718294019612, -22.0536331392814, 1.8)
    pt3dadd(-25.1202457317946, -85.7720741293635, -22.1000696874573, 1.8)
    pt3dadd(-25.7181186474367, -86.5723188567659, -22.1465062356332, 1.8)
    pt3dadd(-26.3825867187895, -87.3135078512362, -22.1525908732326, 1.8)
    pt3dadd(-27.1103955030091, -87.9985271110938, -22.1202955603061, 1.8)
    pt3dadd(-27.8382042872286, -88.6835463709514, -22.0880002473795, 1.8)
    pt3dadd(-28.5660130714482, -89.368565630809, -22.055704934453, 1.8)
    pt3dadd(-29.2938218556677, -90.0535848906666, -22.0234096215265, 1.8)
    pt3dadd(-30.0332685000157, -90.5986538994636, -22.1472266885884, 1.8)
    pt3dadd(-30.8098748679252, -90.6968613216483, -22.7695110701619, 1.8)
    pt3dadd(-31.5864812358346, -90.795068743833, -23.3917954517354, 1.8)
    pt3dadd(-32.3630876037441, -90.8932761660177, -24.0140798333088, 1.8)
    pt3dadd(-33.1396939716536, -90.9914835882024, -24.6363642148823, 1.8)
    pt3dadd(-33.870112939721, -91.5608091725091, -24.7823540769463, 1.8)
    pt3dadd(-34.5881341219978, -92.2565939659501, -24.8004952736545, 1.8)
    pt3dadd(-35.3061553042747, -92.9523787593911, -24.8186364703627, 1.8)
    pt3dadd(-36.0241764865516, -93.648163552832, -24.8367776670709, 1.8)
    pt3dadd(-36.7421976688285, -94.343948346273, -24.8549188637791, 1.8)
    pt3dadd(-37.4602188511054, -95.039733139714, -24.8730600604873, 1.8)
    pt3dadd(-38.1782400333822, -95.735517933155, -24.8912012571955, 1.8)
    pt3dadd(-38.8962612156591, -96.431302726596, -24.9093424539037, 1.8)
    pt3dadd(-39.5965384617096, -97.1433124169856, -24.9216322283437, 1.8)
    pt3dadd(-40.224286588488, -97.9216420868291, -24.9100040570595, 1.8)
    pt3dadd(-40.8520347152665, -98.6999717566727, -24.8983758857752, 1.8)
    pt3dadd(-41.4797828420449, -99.4783014265162, -24.8867477144909, 1.8)
    pt3dadd(-42.1075309688233, -100.25663109636, -24.8751195432067, 1.8)
    pt3dadd(-42.7352790956017, -101.034960766203, -24.8634913719224, 1.8)
    pt3dadd(-43.3630272223802, -101.813290436047, -24.8518632006382, 1.8)
    pt3dadd(-43.9907753491586, -102.59162010589, -24.8402350293539, 1.8)
    pt3dadd(-44.618523475937, -103.369949775734, -24.8286068580697, 1.8)
  }
}
proc shape3d_13() {
  adendIML[10] {
    pt3dadd(-45.1969459050799, -104.103930946723, -25.1797417622836, 1.8)
    pt3dadd(-45.774133925398, -104.836802266641, -25.5399550569343, 1.8)
    pt3dadd(-46.3513219457162, -105.569673586559, -25.900168351585, 1.8)
    pt3dadd(-46.9285099660343, -106.302544906476, -26.2603816462356, 1.8)
    pt3dadd(-47.5056979863525, -107.035416226394, -26.6205949408863, 1.8)
    pt3dadd(-48.0828860066706, -107.768287546312, -26.980808235537, 1.8)
    pt3dadd(-48.7158196481529, -108.436075118551, -27.3274490412883, 1.8)
    pt3dadd(-49.595316044728, -108.815997423451, -27.6140587596356, 1.8)
    pt3dadd(-50.474812441303, -109.195919728351, -27.9006684779829, 1.8)
    pt3dadd(-51.354308837878, -109.575842033251, -28.1872781963302, 1.8)
    pt3dadd(-52.2338052344531, -109.955764338151, -28.4738879146775, 1.8)
    pt3dadd(-53.1133016310281, -110.335686643051, -28.7604976330248, 1.8)
    pt3dadd(-53.9283449149942, -110.787064182108, -29.0130925660728, 1.8)
    pt3dadd(-54.321673093015, -111.705971533508, -29.0431296084999, 1.8)
    pt3dadd(-54.7150012710359, -112.624878884908, -29.0731666509269, 1.8)
    pt3dadd(-55.1083294490567, -113.543786236308, -29.1032036933539, 1.8)
    pt3dadd(-55.5016576270776, -114.462693587708, -29.133240735781, 1.8)
    pt3dadd(-55.8949858050985, -115.381600939108, -29.163277778208, 1.8)
    pt3dadd(-56.378916337323, -116.244354453888, -29.1176671885876, 1.8)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(-56.378916337323, -116.244354453888, -29.1176671885876, 1.8)
    pt3dadd(-56.9656607134659, -117.043385653232, -28.9862130918918, 1.8)
    pt3dadd(-57.5524050896088, -117.842416852577, -28.854758995196, 1.8)
    pt3dadd(-58.1391494657518, -118.641448051922, -28.7233048985003, 1.8)
    pt3dadd(-58.7258938418947, -119.440479251267, -28.5918508018045, 1.8)
    pt3dadd(-59.3443506890016, -120.205932949297, -28.5597038499492, 1.8)
    pt3dadd(-60.0435976402973, -120.88584522633, -28.7805499426108, 1.8)
    pt3dadd(-60.742844591593, -121.565757503363, -29.0013960352725, 1.8)
    pt3dadd(-61.4420915428887, -122.245669780395, -29.2222421279341, 1.8)
    pt3dadd(-62.1413384941844, -122.925582057428, -29.4430882205958, 1.8)
    pt3dadd(-62.8405854454801, -123.605494334461, -29.6639343132574, 1.8)
    pt3dadd(-63.5398323967758, -124.285406611493, -29.884780405919, 1.8)
    pt3dadd(-64.2696932792127, -124.765746536235, -30.2725436883796, 1.8)
    pt3dadd(-65.0380141423726, -124.995365676814, -30.8700033953999, 1.8)
    pt3dadd(-65.8063350055326, -125.224984817393, -31.4674631024202, 1.8)
    pt3dadd(-66.5746558686926, -125.454603957972, -32.0649228094405, 1.8)
    pt3dadd(-67.1933509399111, -126.014209365275, -32.4440557308086, 1.8)
    pt3dadd(-67.6779968981147, -126.869448070737, -32.6275906099919, 1.8)
    pt3dadd(-68.1626428563182, -127.724686776199, -32.8111254891752, 1.8)
    pt3dadd(-68.6472888145217, -128.579925481661, -32.9946603683585, 1.8)
    pt3dadd(-69.1319347727252, -129.435164187122, -33.1781952475418, 1.8)
    pt3dadd(-69.6165807309287, -130.290402892584, -33.3617301267251, 1.8)
    pt3dadd(-70.1012266891322, -131.145641598046, -33.5452650059084, 1.8)
    pt3dadd(-70.5858726473357, -132.000880303508, -33.7287998850917, 1.8)
    pt3dadd(-71.0705186055392, -132.85611900897, -33.912334764275, 1.8)
    pt3dadd(-71.5810759186427, -133.664356127709, -34.1868029080988, 1.8)
    pt3dadd(-72.1166192158459, -134.42727022482, -34.5489568218563, 1.8)
    pt3dadd(-72.652162513049, -135.190184321931, -34.9111107356138, 1.8)
    pt3dadd(-73.1877058102521, -135.953098419042, -35.2732646493713, 1.8)
    pt3dadd(-73.7232491074552, -136.716012516153, -35.6354185631288, 1.8)
    pt3dadd(-74.2587924046584, -137.478926613264, -35.9975724768863, 1.8)
    pt3dadd(-74.7943357018615, -138.241840710376, -36.3597263906438, 1.8)
    pt3dadd(-75.3298789990646, -139.004754807487, -36.7218803044014, 1.8)
    pt3dadd(-75.8654222962678, -139.767668904598, -37.0840342181589, 1.8)
    pt3dadd(-76.4009655934709, -140.530583001709, -37.4461881319164, 1.8)
    pt3dadd(-76.9640598292094, -141.338967051742, -37.5791941386197, 1.8)
    pt3dadd(-77.5330040353963, -142.157005868364, -37.6635445075899, 1.8)
    pt3dadd(-78.1019482415832, -142.975044684987, -37.74789487656, 1.8)
    pt3dadd(-78.6708924477701, -143.793083501609, -37.8322452455302, 1.8)
    pt3dadd(-79.2398366539571, -144.611122318231, -37.9165956145004, 1.8)
    pt3dadd(-79.808780860144, -145.429161134854, -38.0009459834706, 1.8)
    pt3dadd(-80.3777250663309, -146.247199951476, -38.0852963524408, 1.8)
    pt3dadd(-80.9466692725178, -147.065238768098, -38.169646721411, 1.8)
    pt3dadd(-81.5047383760392, -147.876598457122, -38.3210862375203, 1.8)
    pt3dadd(-82.0457377958661, -148.677474512199, -38.5778296350023, 1.8)
    pt3dadd(-82.5867372156929, -149.478350567277, -38.8345730324843, 1.8)
    pt3dadd(-83.1277366355198, -150.279226622354, -39.0913164299662, 1.8)
    pt3dadd(-83.6687360553466, -151.080102677432, -39.3480598274482, 1.8)
    pt3dadd(-84.2097354751735, -151.880978732509, -39.6048032249302, 1.8)
    pt3dadd(-84.7507348950003, -152.681854787587, -39.8615466224121, 1.8)
    pt3dadd(-85.2917343148272, -153.482730842664, -40.1182900198941, 1.8)
    pt3dadd(-85.832733734654, -154.283606897741, -40.3750334173761, 1.8)
    pt3dadd(-86.3737331544808, -155.084482952819, -40.6317768148581, 1.8)
    pt3dadd(-86.9596592396199, -155.874232651304, -40.6224825594314, 1.8)
    pt3dadd(-87.5658555868814, -156.658962298488, -40.4931559597073, 1.8)
    pt3dadd(-88.1720519341429, -157.443691945673, -40.3638293599831, 1.8)
    pt3dadd(-88.7782482814044, -158.228421592858, -40.234502760259, 1.8)
    pt3dadd(-89.3844446286659, -159.013151240042, -40.1051761605349, 1.8)
    pt3dadd(-89.9906409759273, -159.797880887227, -39.9758495608108, 1.8)
    pt3dadd(-90.5968373231888, -160.582610534412, -39.8465229610866, 1.8)
    pt3dadd(-91.2030336704503, -161.367340181596, -39.7171963613625, 1.8)
    pt3dadd(-91.8092300177118, -162.152069828781, -39.5878697616384, 1.8)
    pt3dadd(-92.4154263649733, -162.936799475966, -39.4585431619143, 1.8)
    pt3dadd(-92.9853262352083, -163.738827168611, -39.4444671924159, 1.8)
    pt3dadd(-93.4778368023162, -164.577736779099, -39.676122122685, 1.8)
    pt3dadd(-93.9703473694242, -165.416646389587, -39.9077770529542, 1.8)
    pt3dadd(-94.4628579365321, -166.255556000075, -40.1394319832233, 1.8)
    pt3dadd(-94.9553685036401, -167.094465610563, -40.3710869134925, 1.8)
    pt3dadd(-95.4478790707481, -167.933375221051, -40.6027418437616, 1.8)
    pt3dadd(-95.940389637856, -168.772284831539, -40.8343967740308, 1.8)
    pt3dadd(-96.432900204964, -169.611194442027, -41.0660517042999, 1.8)
    pt3dadd(-96.9254107720719, -170.450104052515, -41.2977066345691, 1.8)
    pt3dadd(-97.4683642502055, -171.253005395382, -41.5250008307443, 1.8)
    pt3dadd(-98.1274680917876, -171.972993732512, -41.7422539559423, 1.8)
    pt3dadd(-98.7865719333697, -172.692982069642, -41.9595070811404, 1.8)
    pt3dadd(-99.4456757749517, -173.412970406773, -42.1767602063384, 1.8)
    pt3dadd(-100.104779616534, -174.132958743903, -42.3940133315364, 1.8)
    pt3dadd(-100.763883458116, -174.852947081033, -42.6112664567344, 1.8)
    pt3dadd(-101.422987299698, -175.572935418163, -42.8285195819324, 1.8)
    pt3dadd(-102.08209114128, -176.292923755293, -43.0457727071304, 1.8)
    pt3dadd(-102.741194982862, -177.012912092423, -43.2630258323285, 1.8)
    pt3dadd(-103.400298824444, -177.732900429554, -43.4802789575265, 1.8)
    pt3dadd(-104.059402666026, -178.452888766684, -43.6975320827245, 1.8)
    pt3dadd(-104.718506507608, -179.172877103814, -43.9147852079225, 1.8)
    pt3dadd(-105.37761034919, -179.892865440944, -44.1320383331205, 1.8)
    pt3dadd(-106.080377888724, -180.585198412954, -44.2218859674365, 1.8)
    pt3dadd(-106.82638584456, -181.250144114603, -44.1855631965082, 1.8)
    pt3dadd(-107.572393800397, -181.915089816251, -44.1492404255799, 1.8)
    pt3dadd(-108.318401756233, -182.5800355179, -44.1129176546516, 1.8)
    pt3dadd(-109.06440971207, -183.244981219548, -44.0765948837233, 1.8)
    pt3dadd(-109.810417667906, -183.909926921197, -44.0402721127951, 1.8)
    pt3dadd(-110.333323938544, -184.708613588435, -44.0734920943369, 1.8)
    pt3dadd(-110.586758910384, -185.668838039074, -44.1907086436922, 1.8)
    pt3dadd(-110.840193882224, -186.629062489714, -44.3079251930475, 1.8)
    pt3dadd(-111.093628854064, -187.589286940353, -44.4251417424029, 1.8)
    pt3dadd(-111.347063825904, -188.549511390993, -44.5423582917582, 1.8)
    pt3dadd(-111.600498797744, -189.509735841632, -44.6595748411135, 1.8)
    pt3dadd(-111.853933769584, -190.469960292271, -44.7767913904688, 1.8)
    pt3dadd(-112.107368741425, -191.430184742911, -44.8940079398241, 1.8)
    pt3dadd(-112.360803713265, -192.39040919355, -45.0112244891795, 1.8)
    pt3dadd(-112.644474709078, -193.324679852586, -45.2023330031049, 1.8)
    pt3dadd(-112.971675925489, -194.221585338384, -45.4998223533753, 1.8)
    pt3dadd(-113.2988771419, -195.118490824183, -45.7973117036458, 1.8)
    pt3dadd(-113.626078358311, -196.015396309981, -46.0948010539163, 1.8)
    pt3dadd(-113.953279574722, -196.912301795779, -46.3922904041867, 1.8)
    pt3dadd(-114.280480791132, -197.809207281577, -46.6897797544572, 1.8)
    pt3dadd(-114.607682007543, -198.706112767376, -46.9872691047277, 1.8)
    pt3dadd(-114.934883223954, -199.603018253174, -47.2847584549981, 1.8)
    pt3dadd(-115.403744337336, -200.409920290461, -47.3580788301225, 1.8)
    pt3dadd(-116.096065133439, -201.074847481811, -47.0777865799845, 1.8)
    pt3dadd(-116.788385929542, -201.73977467316, -46.7974943298465, 1.8)
    pt3dadd(-117.480706725645, -202.404701864509, -46.5172020797085, 1.8)
    pt3dadd(-118.173027521748, -203.069629055859, -46.2369098295705, 1.8)
    pt3dadd(-118.865348317851, -203.734556247208, -45.9566175794325, 1.8)
    pt3dadd(-119.506200970496, -204.437878476996, -45.712227539683, 1.8)
    pt3dadd(-119.814978829908, -205.388927234189, -45.6994801878246, 1.8)
    pt3dadd(-120.12375668932, -206.339975991382, -45.6867328359661, 1.8)
    pt3dadd(-120.432534548731, -207.291024748574, -45.6739854841076, 1.8)
    pt3dadd(-120.741312408143, -208.242073505767, -45.6612381322492, 1.8)
    pt3dadd(-121.050090267555, -209.19312226296, -45.6484907803907, 1.8)
    pt3dadd(-121.358868126967, -210.144171020152, -45.6357434285323, 1.8)
    pt3dadd(-121.667645986378, -211.095219777345, -45.6229960766738, 1.8)
    pt3dadd(-121.977503698051, -212.042263826123, -45.6257459380679, 1.8)
    pt3dadd(-122.317101835633, -212.879013403884, -46.0553076322032, 1.8)
    pt3dadd(-122.656699973214, -213.715762981645, -46.4848693263384, 1.8)
    pt3dadd(-122.996298110796, -214.552512559405, -46.9144310204737, 1.8)
    pt3dadd(-123.335896248377, -215.389262137166, -47.343992714609, 1.8)
    pt3dadd(-123.675494385959, -216.226011714927, -47.7735544087443, 1.8)
    pt3dadd(-124.015092523541, -217.062761292687, -48.2031161028796, 1.8)
    pt3dadd(-124.354690661122, -217.899510870448, -48.6326777970148, 1.8)
    pt3dadd(-124.694288798704, -218.736260448209, -49.0622394911501, 1.8)
    pt3dadd(-125.048224787058, -219.569401212629, -49.4862406226227, 1.8)
    pt3dadd(-125.449786901644, -220.390554559795, -49.8917711992339, 1.8)
    pt3dadd(-125.851349016229, -221.211707906962, -50.2973017758452, 1.8)
    pt3dadd(-126.252911130815, -222.032861254129, -50.7028323524564, 1.8)
    pt3dadd(-126.6544732454, -222.854014601295, -51.1083629290676, 1.8)
    pt3dadd(-127.056035359985, -223.675167948462, -51.5138935056789, 1.8)
    pt3dadd(-127.703041840831, -224.291867463086, -51.68721262882, 1.8)
    pt3dadd(-128.619189988997, -224.684373421268, -51.605900616155, 1.8)
    pt3dadd(-129.535338137163, -225.076879379449, -51.52458860349, 1.8)
    pt3dadd(-130.451486285329, -225.469385337631, -51.443276590825, 1.8)
    pt3dadd(-131.215628630707, -226.033863568071, -51.3959764184291, 1.8)
    pt3dadd(-131.710941072663, -226.902483406888, -51.4088278952929, 1.8)
    pt3dadd(-132.206253514619, -227.771103245705, -51.4216793721566, 1.8)
    pt3dadd(-132.701565956576, -228.639723084521, -51.4345308490203, 1.8)
    pt3dadd(-133.196878398532, -229.508342923338, -51.4473823258841, 1.8)
    pt3dadd(-133.830749078858, -230.272337095898, -51.4337429859932, 1.8)
    pt3dadd(-134.529009486955, -230.987710426802, -51.407793035782, 1.8)
    pt3dadd(-135.227269895052, -231.703083757705, -51.3818430855708, 1.8)
    pt3dadd(-135.92553030315, -232.418457088609, -51.3558931353596, 1.8)
    pt3dadd(-136.623790711247, -233.133830419512, -51.3299431851484, 1.8)
    pt3dadd(-137.322051119344, -233.849203750416, -51.3039932349371, 1.8)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(-137.322051119344, -233.849203750416, -51.3039932349371, 1.8)
    pt3dadd(-138.008388749776, -234.573860290741, -51.3236613776017, 1.8)
    pt3dadd(-138.677034745222, -235.312291737989, -51.411020009056, 1.8)
    pt3dadd(-139.345680740669, -236.050723185236, -51.4983786405102, 1.8)
    pt3dadd(-139.993982839748, -236.788264964023, -51.6534635723239, 1.8)
    pt3dadd(-140.594754957973, -237.523728186957, -51.9667792432951, 1.8)
    pt3dadd(-141.195527076199, -238.25919140989, -52.2800949142662, 1.8)
    pt3dadd(-141.796299194424, -238.994654632823, -52.5934105852373, 1.8)
    pt3dadd(-142.397071312649, -239.730117855756, -52.9067262562085, 1.8)
    pt3dadd(-142.900610649075, -240.350025674693, -53.4908675914183, 1.8)
    pt3dadd(-143.382973662143, -240.944766687171, -54.1339920363745, 1.8)
    pt3dadd(-143.865336675211, -241.539507699649, -54.7771164813306, 1.8)
    pt3dadd(-144.347699688279, -242.134248712128, -55.4202409262868, 1.8)
    pt3dadd(-144.830062701347, -242.728989724606, -56.0633653712429, 1.8)
    pt3dadd(-145.312425714415, -243.323730737085, -56.7064898161991, 1.8)
    pt3dadd(-145.968999052876, -243.878745234671, -57.0220276796256, 1.8)
    pt3dadd(-146.827390311309, -244.387737646108, -56.9580654052387, 1.8)
    pt3dadd(-147.685781569742, -244.896730057546, -56.8941031308518, 1.8)
    pt3dadd(-148.544172828175, -245.405722468983, -56.8301408564649, 1.8)
    pt3dadd(-149.402564086609, -245.91471488042, -56.766178582078, 1.8)
    pt3dadd(-150.260955345042, -246.423707291857, -56.7022163076911, 1.8)
    pt3dadd(-150.987981958179, -246.870336860543, -56.9368867250687, 1.8)
    pt3dadd(-151.456768662044, -247.194371991297, -57.7586167660903, 1.8)
    pt3dadd(-151.925555365908, -247.518407122051, -58.5803468071119, 1.8)
    pt3dadd(-152.394342069772, -247.842442252805, -59.4020768481336, 1.8)
    pt3dadd(-152.863128773637, -248.166477383558, -60.2238068891552, 1.8)
    pt3dadd(-153.177169913491, -248.644273018849, -60.8773051348736, 1.8)
    pt3dadd(-152.989540622439, -249.620545615729, -60.9854118678756, 1.8)
    pt3dadd(-152.801911331387, -250.596818212609, -61.0935186008776, 1.8)
    pt3dadd(-152.614282040336, -251.573090809489, -61.2016253338796, 1.8)
    pt3dadd(-152.426652749284, -252.54936340637, -61.3097320668815, 1.8)
    pt3dadd(-152.239023458232, -253.52563600325, -61.4178387998835, 1.8)
    pt3dadd(-152.051394167181, -254.50190860013, -61.5259455328855, 1.8)
    pt3dadd(-151.66400166072, -255.378158885211, -61.6505325170674, 1.8)
    pt3dadd(-151.011523986803, -256.121679872668, -61.796988743466, 1.8)
    pt3dadd(-150.359046312886, -256.865200860125, -61.9434449698645, 1.8)
    pt3dadd(-149.706568638968, -257.608721847582, -62.0899011962631, 1.8)
    pt3dadd(-149.054090965051, -258.352242835039, -62.2363574226617, 1.8)
    pt3dadd(-148.401613291134, -259.095763822495, -62.3828136490602, 1.8)
    pt3dadd(-147.749135617217, -259.839284809952, -62.5292698754588, 1.8)
    pt3dadd(-147.104165816795, -260.60051392773, -62.5498949643451, 1.8)
    pt3dadd(-146.461104463525, -261.366244324183, -62.5385346880005, 1.8)
    pt3dadd(-145.818043110255, -262.131974720635, -62.5271744116559, 1.8)
    pt3dadd(-145.174981756984, -262.897705117088, -62.5158141353113, 1.8)
    pt3dadd(-144.531920403714, -263.66343551354, -62.5044538589667, 1.8)
    pt3dadd(-143.888859050443, -264.429165909993, -62.4930935826221, 1.8)
    pt3dadd(-143.245797697173, -265.194896306445, -62.4817333062774, 1.8)
    pt3dadd(-142.602736343902, -265.960626702898, -62.4703730299328, 1.8)
    pt3dadd(-141.995771609049, -266.749801786779, -62.4705332923963, 1.8)
    pt3dadd(-141.548740469528, -267.642853447368, -62.5217377044918, 1.8)
    pt3dadd(-141.101709330007, -268.535905107956, -62.5729421165873, 1.8)
    pt3dadd(-140.654678190485, -269.428956768545, -62.6241465286828, 1.8)
    pt3dadd(-140.207647050964, -270.322008429134, -62.6753509407783, 1.8)
    pt3dadd(-139.760615911442, -271.215060089722, -62.7265553528738, 1.8)
    pt3dadd(-139.313584771921, -272.108111750311, -62.7777597649693, 1.8)
    pt3dadd(-138.866553632399, -273.001163410899, -62.8289641770648, 1.8)
  }
  soma[3] {pt3dclear()
    pt3dadd(-6.48039029161352, 21.2018450102206, 0, 10.2667572303772)
    pt3dadd(-6.25214953598005, 20.228748468207, -0.0314527803086418, 10.2667572303772)
    pt3dadd(-6.02390878034657, 19.2556519261935, -0.0629055606172836, 9.58775356515897)
    pt3dadd(-5.7956680247131, 18.2825553841799, -0.0943583409259254, 8.52332145975835)
    pt3dadd(-5.56742726907963, 17.3094588421664, -0.125811121234567, 7.16804037792358)
    pt3dadd(-5.33918651344616, 16.3363623001528, -0.157263901543209, 5.64233299132872)
    pt3dadd(-5.11094575781268, 15.3632657581393, -0.188716681851851, 4.08176509672935)
    pt3dadd(-4.88270500217921, 14.3901692161257, -0.220169462160493, 2.96953327329422)
    pt3dadd(-4.65446424654574, 13.4170726741122, -0.251622242469134, 2.97606374090768)
    pt3dadd(-4.42622349091227, 12.4439761320987, -0.283075022777776, 2.98259420852114)
    pt3dadd(-4.1979827352788, 11.4708795900851, -0.314527803086418, 2.9891246761346)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-4.1979827352788, 11.4708795900851, -0.314527803086418, 2.99565514374806)
    pt3dadd(-3.96974197964532, 10.4977830480716, -0.34598058339506, 2.99565514374806)
    pt3dadd(-3.74150122401185, 9.52468650605802, -0.377433363703702, 3.00218561136151)
    pt3dadd(-3.51326046837838, 8.55158996404447, -0.408886144012343, 3.00871607897497)
    pt3dadd(-3.28501971274491, 7.57849342203093, -0.440338924320985, 3.01524654658843)
    pt3dadd(-3.05677895711143, 6.60539688001739, -0.471791704629627, 3.02177701420189)
    pt3dadd(-2.82853820147796, 5.63230033800384, -0.503244484938269, 3.02830748181535)
    pt3dadd(-2.60029744584449, 4.6592037959903, -0.534697265246911, 3.03483794942881)
    pt3dadd(-2.37205669021102, 3.68610725397675, -0.566150045555552, 3.04136841704227)
    pt3dadd(-2.14381593457754, 2.71301071196321, -0.597602825864195, 3.04789888465573)
    pt3dadd(-1.91557517894407, 1.73991416994966, -0.629055606172836, 3.05442935226919)
  }
}
proc shape3d_14() {
  GCL[1] {
    pt3dadd(-1.6873344233106, 0.766817627936121, -0.660508386481478, 3.06095981988265)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(-1.6873344233106, 0.766817627936121, -0.660508386481478, 3.06749028749611)
    pt3dadd(-1.45909366767713, -0.206278914077419, -0.69196116679012, 3.06749028749611)
    pt3dadd(-1.23085291204365, -1.17937545609097, -0.723413947098762, 3.07402075510957)
    pt3dadd(-1.00261215641018, -2.15247199810451, -0.754866727407403, 3.08055122272303)
    pt3dadd(-0.77437140077671, -3.12556854011806, -0.786319507716045, 3.08708169033649)
    pt3dadd(-0.546130645143237, -4.0986650821316, -0.817772288024686, 3.09361215794995)
    pt3dadd(-0.317889889509766, -5.07176162414514, -0.849225068333329, 3.10014262556341)
    pt3dadd(-0.0896491338762946, -6.04485816615869, -0.88067784864197, 3.10667309317687)
    pt3dadd(0.138591621757179, -7.01795470817223, -0.912130628950613, 3.11320356079033)
    pt3dadd(0.366832377390653, -7.99105125018578, -0.943583409259255, 3.11973402840379)
    pt3dadd(0.595073133024123, -8.96414779219932, -0.975036189567896, 3.12626449601725)
    pt3dadd(0.823313888657597, -9.93724433421287, -1.00648896987654, 3.13279496363071)
    pt3dadd(1.05155464429107, -10.9103408762264, -1.03794175018518, 3.13932543124416)
    pt3dadd(1.27979539992454, -11.88343741824, -1.06939453049382, 3.14585589885762)
    pt3dadd(1.36577767848592, -12.2997012273947, -1.38863522476558, 3.09255957495259)
    pt3dadd(1.20471763371149, -11.7489839830046, -2.20764082835363, 2.93536962109562)
    pt3dadd(1.04365758893707, -11.1982667386145, -3.02664643194168, 2.77817966723865)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(1.04365758893707, -11.1982667386145, -3.02664643194168, 2.63227003241808)
    pt3dadd(0.938336767227613, -11.404724937603, -3.28815747917163, 2.63227003241808)
    pt3dadd(0.888169193251725, -12.3603985456, -2.99803479908726, 2.49752212889044)
    pt3dadd(0.838001619275837, -13.3160721535971, -2.70791211900289, 2.3627742253628)
    pt3dadd(0.787834045299948, -14.2717457615941, -2.41778943891851, 2.22802632183516)
    pt3dadd(0.73766647132406, -15.2274193695911, -2.12766675883414, 2.09327841830752)
    pt3dadd(0.687498897348171, -16.1830929775881, -1.83754407874977, 1.95853051477987)
    pt3dadd(0.637331323372284, -17.1387665855851, -1.54742139866539, 1.82378261125223)
    pt3dadd(0.477629253827205, -18.1154045471948, -1.54716303227981, 1.8)
    pt3dadd(0.29445122821141, -19.0965356891666, -1.60902976958416, 1.8)
    pt3dadd(0.109956731400037, -20.0759465218063, -1.67508894879065, 1.8)
    pt3dadd(-0.21360242454613, -20.8736334916931, -2.1840142583167, 1.8)
    pt3dadd(-0.476685391935228, -21.7158660459946, -2.33407203599221, 1.8)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(-0.476685391935228, -21.7158660459946, -2.33407203599221, 1.8)
    pt3dadd(-0.939016103989232, -22.4689214331401, -1.7800727187029, 1.8)
    pt3dadd(-1.31650572929192, -23.2665491666984, -1.30965632714368, 1.8)
    pt3dadd(-1.6939953545946, -24.0641769002566, -0.839239935584453, 1.8)
    pt3dadd(-2.07148497989729, -24.8618046338148, -0.368823544025228, 1.8)
    pt3dadd(-2.44897460519997, -25.659432367373, 0.101592847533998, 1.8)
    pt3dadd(-2.82646423050266, -26.4570601009313, 0.572009239093223, 1.8)
    pt3dadd(-3.17680050816309, -27.2888027810814, 1.00227989229136, 1.8)
    pt3dadd(-3.52454133907943, -28.1238063308754, 1.4287132239448, 1.8)
    pt3dadd(-3.87228216999577, -28.9588098806693, 1.85514655559825, 1.8)
    pt3dadd(-4.22002300091212, -29.7938134304633, 2.28157988725169, 1.8)
    pt3dadd(-4.56776383182846, -30.6288169802573, 2.70801321890513, 1.8)
    pt3dadd(-4.9155046627448, -31.4638205300513, 3.13444655055857, 1.8)
    pt3dadd(-5.3022782923063, -32.2852907956101, 3.5416731967009, 1.8)
    pt3dadd(-5.87257891150806, -33.0431293718758, 3.85859258086938, 1.8)
    pt3dadd(-6.44287953070982, -33.8009679481414, 4.17551196503786, 1.8)
    pt3dadd(-7.01318014991157, -34.5588065244071, 4.49243134920634, 1.8)
    pt3dadd(-7.58348076911333, -35.3166451006727, 4.80935073337482, 1.8)
    pt3dadd(-8.15378138831509, -36.0744836769384, 5.1262701175433, 1.8)
    pt3dadd(-8.71024379195637, -36.8371246910436, 5.45262839086503, 1.80915984019608)
    pt3dadd(-9.16560095467947, -37.6348534397371, 5.84794939696609, 1.88524361619516)
    pt3dadd(-9.62095811740256, -38.4325821884305, 6.24327040306714, 1.96132739219425)
    pt3dadd(-10.0763152801257, -39.230310937124, 6.6385914091682, 2.03741116819333)
    pt3dadd(-10.5316724428487, -40.0280396858174, 7.03391241526925, 2.11349494419241)
    pt3dadd(-10.9870296055718, -40.8257684345109, 7.42923342137031, 2.18957872019149)
    pt3dadd(-11.4841866189238, -41.5826857708078, 7.83686207895101, 2.25)
    pt3dadd(-12.1425950982021, -42.1821647436543, 8.29197001727909, 2.25)
    pt3dadd(-12.8010035774804, -42.7816437165009, 8.74707795560718, 2.25)
    pt3dadd(-13.4594120567588, -43.3811226893474, 9.20218589393526, 2.25)
    pt3dadd(-14.1178205360371, -43.9806016621939, 9.65729383226335, 2.25)
    pt3dadd(-14.7762290153154, -44.5800806350405, 10.1124017705914, 2.25)
    pt3dadd(-15.4346374945938, -45.179559607887, 10.5675097089195, 2.25)
    pt3dadd(-16.0820496914215, -45.7902411086358, 11.0179660330864, 2.25)
    pt3dadd(-16.523746379238, -46.6104965031042, 11.3814012044957, 2.25)
    pt3dadd(-16.9654430670546, -47.4307518975727, 11.744836375905, 2.25)
    pt3dadd(-17.4071397548711, -48.2510072920411, 12.1082715473144, 2.25)
    pt3dadd(-17.8488364426876, -49.0712626865096, 12.4717067187237, 2.25)
    pt3dadd(-18.2905331305041, -49.891518080978, 12.835141890133, 2.25)
    pt3dadd(-18.7322298183206, -50.7117734754465, 13.1985770615424, 2.25)
    pt3dadd(-19.1739265061372, -51.5320288699149, 13.5620122329517, 2.25)
    pt3dadd(-19.6156231939537, -52.3522842643834, 13.925447404361, 2.25)
    pt3dadd(-20.0573198817702, -53.1725396588518, 14.2888825757704, 2.25)
    pt3dadd(-20.5952856617149, -53.8836194219205, 14.7273395267782, 2.25)
    pt3dadd(-21.1788953006177, -54.5429359761429, 15.2013663938523, 2.25)
    pt3dadd(-21.7625049395204, -55.2022525303653, 15.6753932609263, 2.25)
    pt3dadd(-22.3461145784232, -55.8615690845877, 16.1494201280004, 2.25)
    pt3dadd(-22.9297242173259, -56.5208856388102, 16.6234469950745, 2.25)
    pt3dadd(-23.5133338562287, -57.1802021930326, 17.0974738621486, 2.25)
    pt3dadd(-24.0969434951314, -57.839518747255, 17.5715007292226, 2.25)
    pt3dadd(-24.6805531340342, -58.4988353014774, 18.0455275962967, 2.25)
    pt3dadd(-25.2641627729369, -59.1581518556999, 18.5195544633708, 2.25)
    pt3dadd(-25.8477724118397, -59.8174684099223, 18.9935813304449, 2.25)
    pt3dadd(-26.2074719678238, -60.7215568729269, 19.2143048273262, 2.25)
    pt3dadd(-26.5613602511156, -61.6319980481042, 19.4284541898994, 2.25)
    pt3dadd(-26.9152485344074, -62.5424392232816, 19.6426035524725, 2.25)
    pt3dadd(-27.2691368176992, -63.4528803984589, 19.8567529150456, 2.25)
    pt3dadd(-27.623025100991, -64.3633215736363, 20.0709022776187, 2.25)
    pt3dadd(-27.9769133842828, -65.2737627488136, 20.2850516401919, 2.25)
    pt3dadd(-28.3308016675747, -66.1842039239909, 20.499201002765, 2.25)
    pt3dadd(-28.6846899508665, -67.0946450991683, 20.7133503653381, 2.25)
    pt3dadd(-29.0385782341583, -68.0050862743456, 20.9274997279112, 2.25)
    pt3dadd(-29.3924665174501, -68.915527449523, 21.1416490904844, 2.25)
    pt3dadd(-29.7831787674203, -69.8024333695765, 21.368607125358, 2.25)
    pt3dadd(-30.3378054140304, -70.5845768891786, 21.6525803593335, 2.25)
    pt3dadd(-30.8924320606405, -71.3667204087807, 21.936553593309, 2.25)
    pt3dadd(-31.4470587072506, -72.1488639283828, 22.2205268272845, 2.25)
    pt3dadd(-32.0016853538607, -72.9310074479849, 22.50450006126, 2.25)
    pt3dadd(-32.5563120004708, -73.713150967587, 22.7884732952355, 2.25)
    pt3dadd(-33.1109386470808, -74.4952944871891, 23.072446529211, 2.25)
    pt3dadd(-33.6655652936909, -75.2774380067912, 23.3564197631865, 2.25)
    pt3dadd(-34.220191940301, -76.0595815263933, 23.640392997162, 2.25)
    pt3dadd(-34.7748185869111, -76.8417250459954, 23.9243662311375, 2.25)
    pt3dadd(-35.3198065323721, -77.6353599355595, 24.1895546667292, 2.25)
    pt3dadd(-35.8179726343836, -78.4848163634262, 24.3634923336171, 2.25)
    pt3dadd(-36.3161387363952, -79.334272791293, 24.537430000505, 2.25)
    pt3dadd(-36.8143048384067, -80.1837292191599, 24.7113676673929, 2.25)
    pt3dadd(-37.3124709404182, -81.0331856470267, 24.8853053342808, 2.25)
    pt3dadd(-37.8106370424297, -81.8826420748935, 25.0592430011687, 2.25)
    pt3dadd(-38.3088031444413, -82.7320985027603, 25.2331806680566, 2.25)
    pt3dadd(-38.8069692464528, -83.5815549306271, 25.4071183349445, 2.25)
    pt3dadd(-39.3051353484643, -84.4310113584939, 25.5810560018325, 2.25)
    pt3dadd(-39.8033014504758, -85.2804677863607, 25.7549936687204, 2.25)
    pt3dadd(-40.2381469109065, -86.1230710724247, 26.0470234810308, 2.25)
    pt3dadd(-40.6179534243534, -86.9597175377911, 26.4417001896585, 2.25)
    pt3dadd(-40.9977599378004, -87.7963640031575, 26.8363768982862, 2.25)
    pt3dadd(-41.3775664512473, -88.6330104685239, 27.2310536069139, 2.25)
    pt3dadd(-41.7573729646943, -89.4696569338902, 27.6257303155416, 2.25)
    pt3dadd(-42.1371794781412, -90.3063033992566, 28.0204070241694, 2.25)
    pt3dadd(-42.502548618953, -91.1510566670699, 28.4048589517713, 2.25)
    pt3dadd(-42.6737178513282, -92.1048561119595, 28.6517753603315, 2.25)
    pt3dadd(-42.8448870837035, -93.0586555568492, 28.8986917688917, 2.25)
    pt3dadd(-43.0160563160787, -94.0124550017388, 29.1456081774519, 2.25)
    pt3dadd(-43.187225548454, -94.9662544466285, 29.3925245860121, 2.25)
    pt3dadd(-43.3583947808292, -95.9200538915182, 29.6394409945723, 2.25)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(-43.3583947808292, -95.9200538915182, 29.6394409945723, 2.21625672137797)
    pt3dadd(-43.3521143196119, -96.8925180745113, 29.6828965293416, 2.21625672137797)
    pt3dadd(-43.2188993592883, -97.8783336425317, 29.5808110739886, 2.15837597549197)
    pt3dadd(-43.0856843989646, -98.8641492105521, 29.4787256186356, 2.10049522960598)
    pt3dadd(-42.952469438641, -99.8499647785725, 29.3766401632826, 2.04261448371998)
    pt3dadd(-42.8192544783174, -100.835780346593, 29.2745547079296, 1.98473373783399)
    pt3dadd(-42.6860395179938, -101.821595914613, 29.1724692525766, 1.92685299194799)
    pt3dadd(-42.5528245576702, -102.807411482634, 29.0703837972236, 1.868972246062)
    pt3dadd(-42.4196095973466, -103.793227050654, 28.9682983418706, 1.811091500176)
    pt3dadd(-42.5969539605363, -104.763504967123, 28.9066368731743, 1.8)
    pt3dadd(-42.8479171380314, -105.730099646935, 28.8545580051017, 1.8)
    pt3dadd(-43.0988803155264, -106.696694326748, 28.802479137029, 1.8)
    pt3dadd(-43.1841997066327, -107.664768942071, 28.7294284106252, 1.8)
    pt3dadd(-42.9711703934506, -108.635509137866, 28.6186042977513, 1.8)
    pt3dadd(-42.7581410802684, -109.60624933366, 28.5077801848773, 1.8)
    pt3dadd(-42.5451117670863, -110.576989529454, 28.3969560720034, 1.8)
    pt3dadd(-42.3320824539042, -111.547729725249, 28.2861319591295, 1.8)
    pt3dadd(-42.1190531407221, -112.518469921043, 28.1753078462556, 1.8)
    pt3dadd(-41.9931248935439, -113.495725546771, 28.1987134973703, 1.8)
    pt3dadd(-41.9642112612669, -114.480238166644, 28.3716264904624, 1.8)
    pt3dadd(-41.93529762899, -115.464750786517, 28.5445394835544, 1.8)
    pt3dadd(-41.906383996713, -116.449263406389, 28.7174524766465, 1.8)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-41.906383996713, -116.449263406389, 28.7174524766465, 1.8)
    pt3dadd(-41.877470364436, -117.433776026262, 28.8903654697385, 1.8)
    pt3dadd(-41.8485567321591, -118.418288646135, 29.0632784628306, 1.8)
    pt3dadd(-41.8196430998821, -119.402801266007, 29.2361914559226, 1.8)
    pt3dadd(-41.7907294676051, -120.38731388588, 29.4091044490147, 1.8)
    pt3dadd(-41.7606530108534, -121.36263758495, 29.6219025244147, 1.8)
    pt3dadd(-41.7288037736347, -122.323952343149, 29.8955072790481, 1.8)
    pt3dadd(-41.696954536416, -123.285267101348, 30.1691120336814, 1.8)
    pt3dadd(-41.6651052991973, -124.246581859546, 30.4427167883147, 1.8)
    pt3dadd(-41.6332560619786, -125.207896617745, 30.716321542948, 1.8)
    pt3dadd(-41.6014068247598, -126.169211375944, 30.9899262975813, 1.8)
    pt3dadd(-41.5695575875411, -127.130526134143, 31.2635310522146, 1.8)
    pt3dadd(-41.5377083503224, -128.091840892341, 31.537135806848, 1.8)
    pt3dadd(-41.4612475430832, -129.057264250643, 31.758561876462, 1.8)
    pt3dadd(-41.2613943114486, -130.034051704121, 31.8356654207011, 1.8)
    pt3dadd(-41.061541079814, -131.010839157598, 31.9127689649402, 1.8)
    pt3dadd(-40.8616878481794, -131.987626611076, 31.9898725091794, 1.8)
    pt3dadd(-40.6618346165449, -132.964414064553, 32.0669760534185, 1.8)
    pt3dadd(-40.4619813849103, -133.941201518031, 32.1440795976576, 1.8)
    pt3dadd(-40.2621281532757, -134.917988971508, 32.2211831418967, 1.8)
    pt3dadd(-40.0622749216411, -135.894776424986, 32.2982866861358, 1.8)
    pt3dadd(-40.0983691062296, -136.884935559422, 32.4228321483875, 1.8)
    pt3dadd(-40.1457144161474, -137.875732320923, 32.5496398730278, 1.8)
    pt3dadd(-40.1930597260652, -138.866529082423, 32.6764475976681, 1.8)
    pt3dadd(-40.240405035983, -139.857325843924, 32.8032553223084, 1.8)
    pt3dadd(-40.2877503459008, -140.848122605425, 32.9300630469486, 1.8)
    pt3dadd(-40.3350956558186, -141.838919366926, 33.0568707715889, 1.8)
    pt3dadd(-40.3824409657364, -142.829716128426, 33.1836784962292, 1.8)
    pt3dadd(-40.4297862756541, -143.820512889927, 33.3104862208695, 1.8)
    pt3dadd(-40.4771315855719, -144.811309651428, 33.4372939455098, 1.8)
    pt3dadd(-40.5244768954897, -145.802106412929, 33.5641016701501, 1.8)
    pt3dadd(-40.5740430882311, -146.792875489049, 33.6895467623928, 1.8)
    pt3dadd(-40.6835839480913, -147.782896924892, 33.7781941345647, 1.8)
    pt3dadd(-40.7931248079514, -148.772918360735, 33.8668415067367, 1.8)
    pt3dadd(-40.9026656678116, -149.762939796578, 33.9554888789086, 1.8)
    pt3dadd(-41.0122065276718, -150.75296123242, 34.0441362510806, 1.8)
    pt3dadd(-41.1217473875319, -151.742982668263, 34.1327836232525, 1.8)
    pt3dadd(-41.2312882473921, -152.733004104106, 34.2214309954244, 1.8)
    pt3dadd(-41.3408291072523, -153.723025539948, 34.3100783675964, 1.8)
    pt3dadd(-41.4503699671125, -154.713046975791, 34.3987257397683, 1.8)
    pt3dadd(-41.5599108269726, -155.703068411634, 34.4873731119403, 1.8)
    pt3dadd(-41.6694516868328, -156.693089847477, 34.5760204841122, 1.8)
    pt3dadd(-41.8272519008408, -157.651002395131, 34.8132687383844, 1.8)
    pt3dadd(-41.9873584827501, -158.607380423513, 35.0576187931392, 1.8)
    pt3dadd(-42.1474650646595, -159.563758451894, 35.3019688478941, 1.8)
    pt3dadd(-42.3075716465688, -160.520136480276, 35.546318902649, 1.8)
    pt3dadd(-42.4676782284781, -161.476514508657, 35.7906689574039, 1.8)
    pt3dadd(-42.6277848103874, -162.432892537038, 36.0350190121587, 1.8)
    pt3dadd(-42.7878913922967, -163.38927056542, 36.2793690669136, 1.8)
    pt3dadd(-42.9479979742061, -164.345648593801, 36.5237191216685, 1.8)
    pt3dadd(-43.1081045561154, -165.302026622182, 36.7680691764234, 1.8)
    pt3dadd(-43.087081855244, -166.291462312777, 36.6522216462377, 1.8)
    pt3dadd(-43.0581402471711, -167.282343272493, 36.5206264069817, 1.8)
    pt3dadd(-43.0291986390982, -168.273224232208, 36.3890311677257, 1.8)
    pt3dadd(-43.0002570310252, -169.264105191924, 36.2574359284696, 1.8)
    pt3dadd(-42.9713154229523, -170.25498615164, 36.1258406892136, 1.8)
    pt3dadd(-42.9423738148794, -171.245867111356, 35.9942454499576, 1.8)
    pt3dadd(-42.9134322068065, -172.236748071072, 35.8626502107015, 1.8)
    pt3dadd(-42.8844905987335, -173.227629030787, 35.7310549714455, 1.8)
    pt3dadd(-42.8555489906606, -174.218509990503, 35.5994597321895, 1.8)
    pt3dadd(-42.8419431582375, -175.206981414049, 35.5124424866624, 1.8)
    pt3dadd(-42.9327268485082, -176.179051298053, 35.7288644407071, 1.8)
    pt3dadd(-43.0235105387788, -177.151121182058, 35.9452863947518, 1.8)
    pt3dadd(-43.1142942290494, -178.123191066062, 36.1617083487966, 1.8)
    pt3dadd(-43.2050779193201, -179.095260950066, 36.3781303028413, 1.8)
    pt3dadd(-43.2958616095907, -180.067330834071, 36.594552256886, 1.8)
    pt3dadd(-43.3866452998613, -181.039400718075, 36.8109742109308, 1.8)
    pt3dadd(-43.4774289901319, -182.01147060208, 37.0273961649755, 1.8)
    pt3dadd(-43.5682126804026, -182.983540486084, 37.2438181190202, 1.8)
    pt3dadd(-43.6589963706732, -183.955610370088, 37.460240073065, 1.8)
    pt3dadd(-43.7497800609438, -184.927680254093, 37.6766620271097, 1.8)
    pt3dadd(-43.9800018203919, -185.804923573124, 38.0715197902674, 1.8)
    pt3dadd(-44.2600295517027, -186.648295731613, 38.5301131526083, 1.8)
    pt3dadd(-44.5400572830136, -187.491667890101, 38.9887065149492, 1.8)
    pt3dadd(-44.8200850143244, -188.33504004859, 39.4472998772902, 1.8)
    pt3dadd(-45.0315238386605, -189.22362472021, 39.71215758784, 1.8)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(-45.0315238386605, -189.22362472021, 39.71215758784, 1.8)
    pt3dadd(-44.7721662554002, -190.219964283924, 39.5679434704939, 1.8)
    pt3dadd(-44.6228670753053, -191.203283119813, 39.4640501511308, 1.8)
    pt3dadd(-44.4735678952104, -192.186601955702, 39.3601568317677, 1.8)
    pt3dadd(-44.5934786997835, -193.179114078912, 39.3699087193049, 1.8)
    pt3dadd(-44.714794187915, -194.171674170846, 39.3802535846762, 1.8)
    pt3dadd(-44.8361096760465, -195.16423426278, 39.3905984500475, 1.8)
    pt3dadd(-44.8315222475839, -196.137105429904, 39.3667624335834, 1.8)
    pt3dadd(-44.4440916012949, -197.050106885241, 39.2389898353151, 1.8)
    pt3dadd(-44.0566609550058, -197.963108340578, 39.1112172370468, 1.8)
    pt3dadd(-43.6692303087168, -198.876109795916, 38.9834446387784, 1.8)
    pt3dadd(-43.2817996624277, -199.789111251253, 38.8556720405101, 1.8)
    pt3dadd(-42.8943690161387, -200.70211270659, 38.7278994422418, 1.8)
    pt3dadd(-42.5069383698496, -201.615114161927, 38.6001268439734, 1.8)
    pt3dadd(-42.1195077235606, -202.528115617264, 38.4723542457051, 1.8)
    pt3dadd(-41.7320770772715, -203.441117072601, 38.3445816474368, 1.8)
    pt3dadd(-41.351457126382, -204.348751766695, 38.4900090932586, 1.8)
    pt3dadd(-40.9717650293003, -205.255655321079, 38.6726558957462, 1.8)
    pt3dadd(-40.5920729322186, -206.162558875464, 38.8553026982339, 1.8)
    pt3dadd(-40.2123808351369, -207.069462429848, 39.0379495007215, 1.8)
    pt3dadd(-39.8326887380552, -207.976365984232, 39.2205963032091, 1.8)
    pt3dadd(-39.4529966409735, -208.883269538616, 39.4032431056968, 1.8)
    pt3dadd(-39.0733045438918, -209.790173093, 39.5858899081844, 1.8)
    pt3dadd(-38.6936124468101, -210.697076647385, 39.7685367106721, 1.8)
    pt3dadd(-38.3715620287793, -211.609027254972, 39.9569861749805, 1.8)
    pt3dadd(-38.5458051288691, -212.564432873437, 40.1953964228213, 1.8)
  }
}
proc shape3d_15() {
  adendMML[9] {
    pt3dadd(-38.720048228959, -213.519838491903, 40.4338066706622, 1.8)
    pt3dadd(-38.8942913290489, -214.475244110368, 40.6722169185031, 1.8)
    pt3dadd(-39.0685344291387, -215.430649728834, 40.9106271663439, 1.8)
    pt3dadd(-39.2427775292286, -216.3860553473, 41.1490374141848, 1.8)
    pt3dadd(-39.4170206293184, -217.341460965765, 41.3874476620257, 1.8)
    pt3dadd(-39.5912637294083, -218.296866584231, 41.6258579098665, 1.8)
    pt3dadd(-39.6454982858154, -219.23430619119, 41.614629704046, 1.8)
    pt3dadd(-39.5157117891931, -220.14419672327, 41.2206059929247, 1.8)
    pt3dadd(-39.3859252925707, -221.05408725535, 40.8265822818035, 1.8)
    pt3dadd(-39.2561387959483, -221.96397778743, 40.4325585706823, 1.8)
    pt3dadd(-39.126352299326, -222.87386831951, 40.0385348595611, 1.8)
    pt3dadd(-38.9965658027036, -223.78375885159, 39.6445111484399, 1.8)
    pt3dadd(-38.8667793060812, -224.69364938367, 39.2504874373186, 1.8)
    pt3dadd(-38.7369928094589, -225.60353991575, 38.8564637261974, 1.8)
    pt3dadd(-38.6072063128365, -226.51343044783, 38.4624400150762, 1.8)
    pt3dadd(-38.5583166631168, -227.494566539509, 38.3215620339816, 1.8)
    pt3dadd(-38.525600578259, -228.489946631089, 38.2312950351544, 1.8)
    pt3dadd(-38.4928844934011, -229.485326722669, 38.1410280363271, 1.8)
    pt3dadd(-38.4601684085433, -230.48070681425, 38.0507610374999, 1.8)
    pt3dadd(-38.4274523236854, -231.47608690583, 37.9604940386726, 1.8)
    pt3dadd(-38.3947362388275, -232.47146699741, 37.8702270398453, 1.8)
    pt3dadd(-38.6777538679947, -233.428647785445, 37.8229965131893, 1.8)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(-38.6777538679947, -233.428647785445, 37.8229965131893, 1.8)
    pt3dadd(-38.9652936953507, -234.385281451606, 37.7763823903187, 1.8)
    pt3dadd(-38.9334557838192, -235.284613618582, 37.5107317823246, 1.8)
    pt3dadd(-38.6523512392171, -236.139223345536, 37.0741284731294, 1.8)
    pt3dadd(-38.371246694615, -236.99383307249, 36.6375251639342, 1.8)
    pt3dadd(-38.0901421500129, -237.848442799443, 36.200921854739, 1.8)
    pt3dadd(-37.8090376054108, -238.703052526397, 35.7643185455438, 1.8)
    pt3dadd(-37.5279330608086, -239.557662253351, 35.3277152363486, 1.8)
    pt3dadd(-37.2468285162065, -240.412271980304, 34.8911119271534, 1.8)
    pt3dadd(-36.9657239716044, -241.266881707258, 34.4545086179582, 1.8)
    pt3dadd(-36.6846194270023, -242.121491434212, 34.017905308763, 1.8)
    pt3dadd(-36.4035148824001, -242.976101161165, 33.5813019995678, 1.8)
    pt3dadd(-36.122410337798, -243.830710888119, 33.1446986903726, 1.8)
    pt3dadd(-35.8413057931959, -244.685320615073, 32.7080953811773, 1.8)
    pt3dadd(-35.5602012485938, -245.539930342026, 32.2714920719821, 1.8)
    pt3dadd(-35.2973731533222, -246.437770549319, 31.9422664840004, 1.8)
    pt3dadd(-35.0563908415043, -247.38728401628, 31.7413891546422, 1.8)
    pt3dadd(-34.8154085296865, -248.336797483241, 31.540511825284, 1.8)
    pt3dadd(-34.5744262178687, -249.286310950203, 31.3396344959259, 1.8)
    pt3dadd(-34.3334439060509, -250.235824417164, 31.1387571665677, 1.8)
    pt3dadd(-34.092461594233, -251.185337884125, 30.9378798372095, 1.8)
    pt3dadd(-33.8514792824152, -252.134851351086, 30.7370025078513, 1.8)
    pt3dadd(-33.6104969705974, -253.084364818048, 30.5361251784931, 1.8)
    pt3dadd(-33.3695146587796, -254.033878285009, 30.3352478491349, 1.8)
    pt3dadd(-33.1285323469617, -254.98339175197, 30.1343705197767, 1.8)
    pt3dadd(-32.8875500351439, -255.932905218932, 29.9334931904185, 1.8)
    pt3dadd(-32.5679431669706, -256.864141027164, 29.921802937999, 1.8)
    pt3dadd(-32.1916278371989, -257.782193957729, 30.0465650687125, 1.8)
    pt3dadd(-31.8153125074272, -258.700246888294, 30.1713271994261, 1.8)
    pt3dadd(-31.4389971776556, -259.618299818859, 30.2960893301396, 1.8)
    pt3dadd(-31.0626818478839, -260.536352749424, 30.4208514608531, 1.8)
    pt3dadd(-30.6863665181122, -261.454405679988, 30.5456135915666, 1.8)
    pt3dadd(-30.3231612339333, -262.378220299539, 30.6467539253733, 1.8)
    pt3dadd(-30.0358800847572, -263.335402556854, 30.6110934765543, 1.8)
    pt3dadd(-29.748598935581, -264.292584814169, 30.5754330277354, 1.8)
    pt3dadd(-29.4613177864049, -265.249767071483, 30.5397725789165, 1.8)
    pt3dadd(-29.1740366372287, -266.206949328798, 30.5041121300975, 1.8)
    pt3dadd(-28.8867554880525, -267.164131586113, 30.4684516812786, 1.8)
    pt3dadd(-28.5994743388764, -268.121313843427, 30.4327912324596, 1.8)
    pt3dadd(-28.3121931897002, -269.078496100742, 30.3971307836407, 1.8)
    pt3dadd(-28.024912040524, -270.035678358057, 30.3614703348217, 1.8)
    pt3dadd(-27.7376308913479, -270.992860615371, 30.3258098860028, 1.8)
    pt3dadd(-27.4503497421717, -271.950042872686, 30.2901494371838, 1.8)
    pt3dadd(-27.1630685929955, -272.907225130001, 30.2544889883649, 1.8)
    pt3dadd(-27.187869763387, -273.859859561608, 30.1039567691283, 1.8)
    pt3dadd(-27.4079490985638, -274.809648298339, 29.8815462437323, 1.8)
    pt3dadd(-27.6280284337407, -275.75943703507, 29.6591357183362, 1.8)
    pt3dadd(-27.8481077689176, -276.709225771801, 29.4367251929402, 1.8)
    pt3dadd(-28.0681871040945, -277.659014508532, 29.2143146675442, 1.8)
    pt3dadd(-28.2882664392713, -278.608803245264, 28.9919041421482, 1.8)
    pt3dadd(-28.5265918852302, -279.51800263959, 29.137398982963, 1.8)
    pt3dadd(-28.7775905430699, -280.399009870525, 29.53843007004, 1.8)
    pt3dadd(-29.0285892009097, -281.28001710146, 29.939461157117, 1.8)
    pt3dadd(-29.2795878587494, -282.161024332396, 30.340492244194, 1.8)
    pt3dadd(-29.5305865165892, -283.042031563331, 30.741523331271, 1.8)
    pt3dadd(-29.5125470609913, -283.858751817018, 30.6639859893284, 1.8)
    pt3dadd(-29.2069004906263, -284.606748008498, 30.0748494418672, 1.8)
    pt3dadd(-28.9012539202614, -285.354744199979, 29.485712894406, 1.8)
    pt3dadd(-28.5956073498965, -286.10274039146, 28.8965763469449, 1.8)
    pt3dadd(-28.2899607795316, -286.850736582941, 28.3074397994837, 1.8)
    pt3dadd(-27.9843142091667, -287.598732774421, 27.7183032520225, 1.8)
    pt3dadd(-27.6786676388017, -288.346728965902, 27.1291667045614, 1.8)
    pt3dadd(-27.3730210684368, -289.094725157383, 26.5400301571002, 1.8)
    pt3dadd(-27.0673744980719, -289.842721348864, 25.9508936096391, 1.8)
    pt3dadd(-26.761727927707, -290.590717540344, 25.3617570621779, 1.8)
    pt3dadd(-26.456081357342, -291.338713731825, 24.7726205147167, 1.8)
    pt3dadd(-26.1504347869771, -292.086709923306, 24.1834839672556, 1.8)
    pt3dadd(-25.7131242062762, -292.742510052488, 23.5838452859964, 1.8)
    pt3dadd(-25.1787923269121, -293.330372241202, 22.9764677347361, 1.8)
    pt3dadd(-24.6444604475479, -293.918234429917, 22.3690901834759, 1.8)
    pt3dadd(-24.1101285681838, -294.506096618631, 21.7617126322156, 1.8)
    pt3dadd(-23.5757966888196, -295.093958807346, 21.1543350809553, 1.8)
    pt3dadd(-23.0414648094554, -295.68182099606, 20.5469575296951, 1.8)
    pt3dadd(-22.4635652938604, -296.116541151438, 19.9049844358619, 1.8)
    pt3dadd(-21.7791223739365, -296.176756858349, 19.1784089353066, 1.8)
    pt3dadd(-21.0946794540126, -296.23697256526, 18.4518334347513, 1.8)
    pt3dadd(-20.4102365340887, -296.297188272172, 17.7252579341959, 1.8)
    pt3dadd(-19.7257936141648, -296.357403979083, 16.9986824336406, 1.8)
    pt3dadd(-18.9426197867116, -296.446493998043, 16.4220184225942, 1.8)
    pt3dadd(-18.0215710141578, -296.57590618448, 16.0547016048757, 1.8)
    pt3dadd(-17.100522241604, -296.705318370917, 15.6873847871572, 1.8)
    pt3dadd(-16.1794734690503, -296.834730557353, 15.3200679694388, 1.8)
    pt3dadd(-15.2584246964965, -296.96414274379, 14.9527511517203, 1.8)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(-45.0315238386605, -189.22362472021, 39.71215758784, 1.8)
    pt3dadd(-45.5212698600006, -190.131339754878, 39.8423837153154, 1.8)
    pt3dadd(-45.9009574781752, -191.052075517371, 39.9322890448079, 1.8)
    pt3dadd(-46.2806450963499, -191.972811279864, 40.0221943743004, 1.8)
    pt3dadd(-46.6603327145245, -192.893547042357, 40.1120997037928, 1.8)
    pt3dadd(-47.0400203326991, -193.81428280485, 40.2020050332853, 1.8)
    pt3dadd(-47.4197079508738, -194.735018567343, 40.2919103627778, 1.8)
    pt3dadd(-47.7993955690484, -195.655754329836, 40.3818156922703, 1.8)
    pt3dadd(-48.1508287182879, -196.572042737832, 40.536435847443, 1.8)
    pt3dadd(-48.4288734186473, -197.476779541409, 40.8591469579655, 1.8)
    pt3dadd(-48.7069181190068, -198.381516344987, 41.1818580684879, 1.8)
    pt3dadd(-48.9849628193663, -199.286253148564, 41.5045691790103, 1.8)
    pt3dadd(-49.2988814258474, -200.135103540786, 41.9197216533146, 1.8)
    pt3dadd(-49.636492939313, -200.947043774927, 42.3959269894444, 1.8)
    pt3dadd(-49.9741044527786, -201.758984009068, 42.8721323255743, 1.8)
    pt3dadd(-50.3117159662442, -202.570924243209, 43.3483376617041, 1.8)
    pt3dadd(-50.6493274797098, -203.38286447735, 43.824542997834, 1.8)
    pt3dadd(-50.9869389931753, -204.194804711491, 44.3007483339639, 1.8)
    pt3dadd(-51.3245505066409, -205.006744945632, 44.7769536700937, 1.8)
    pt3dadd(-51.6621620201065, -205.818685179773, 45.2531590062236, 1.8)
    pt3dadd(-51.8988762836036, -206.723715996299, 45.5977360308554, 1.8)
    pt3dadd(-52.1184296698966, -207.64457991089, 45.9199253562098, 1.8)
    pt3dadd(-52.3379830561895, -208.56544382548, 46.2421146815642, 1.8)
    pt3dadd(-52.5575364424824, -209.486307740071, 46.5643040069186, 1.8)
    pt3dadd(-52.7770898287753, -210.407171654661, 46.886493332273, 1.8)
    pt3dadd(-52.9966432150682, -211.328035569252, 47.2086826576274, 1.8)
    pt3dadd(-53.2161966013612, -212.248899483842, 47.5308719829818, 1.8)
    pt3dadd(-53.4357499876541, -213.169763398433, 47.8530613083362, 1.8)
    pt3dadd(-53.655303373947, -214.090627313023, 48.1752506336906, 1.8)
    pt3dadd(-53.9310420118815, -214.989792537413, 48.5131120748489, 1.8)
    pt3dadd(-54.2259249903742, -215.881564235872, 48.8563135707984, 1.8)
    pt3dadd(-54.5208079688669, -216.773335934332, 49.1995150667479, 1.8)
    pt3dadd(-54.8156909473596, -217.665107632791, 49.5427165626973, 1.8)
    pt3dadd(-55.1105739258523, -218.556879331251, 49.8859180586468, 1.8)
    pt3dadd(-55.405456904345, -219.44865102971, 50.2291195545962, 1.8)
    pt3dadd(-55.7003398828377, -220.34042272817, 50.5723210505457, 1.8)
    pt3dadd(-55.9952228613303, -221.232194426629, 50.9155225464952, 1.8)
    pt3dadd(-56.290105839823, -222.123966125089, 51.2587240424446, 1.8)
    pt3dadd(-56.5849888183157, -223.015737823548, 51.6019255383941, 1.8)
    pt3dadd(-56.9750724837976, -223.844927215838, 51.9955075000967, 1.8)
    pt3dadd(-57.3981184650716, -224.652448090766, 52.4065332101002, 1.8)
    pt3dadd(-57.8211644463457, -225.459968965694, 52.8175589201038, 1.8)
    pt3dadd(-58.2442104276198, -226.267489840621, 53.2285846301073, 1.8)
    pt3dadd(-58.6672564088938, -227.075010715549, 53.6396103401108, 1.8)
    pt3dadd(-58.9127390026509, -227.820419825823, 54.1830792288996, 1.8)
    pt3dadd(-58.8604975764299, -228.461684920154, 54.948618197326, 1.8)
    pt3dadd(-58.8082561502089, -229.102950014485, 55.7141571657523, 1.8)
    pt3dadd(-58.7560147239879, -229.744215108816, 56.4796961341787, 1.8)
    pt3dadd(-58.703773297767, -230.385480203147, 57.245235102605, 1.8)
    pt3dadd(-58.651531871546, -231.026745297477, 58.0107740710314, 1.8)
    pt3dadd(-58.599290445325, -231.668010391808, 58.7763130394577, 1.8)
    pt3dadd(-58.6255000868609, -232.340535103864, 59.4733495934493, 1.8)
    pt3dadd(-59.057513414435, -233.174756379901, 59.8160438411483, 1.8)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(-59.057513414435, -233.174756379901, 59.8160438411483, 1.8)
    pt3dadd(-59.489526742009, -234.008977655938, 60.1587380888473, 1.8)
    pt3dadd(-59.9215400695831, -234.843198931974, 60.5014323365463, 1.8)
    pt3dadd(-60.3535533971571, -235.677420208011, 60.8441265842452, 1.8)
    pt3dadd(-60.7855667247311, -236.511641484048, 61.1868208319442, 1.8)
    pt3dadd(-61.2175800523052, -237.345862760085, 61.5295150796432, 1.8)
    pt3dadd(-61.6495933798792, -238.180084036121, 61.8722093273422, 1.8)
    pt3dadd(-62.0816067074533, -239.014305312158, 62.2149035750411, 1.8)
    pt3dadd(-62.473796636789, -239.854068091223, 62.5609213537737, 1.8)
    pt3dadd(-62.345892287952, -240.766202996852, 62.9503445059901, 1.8)
    pt3dadd(-62.2179879391149, -241.678337902481, 63.3397676582065, 1.8)
    pt3dadd(-62.0900835902778, -242.59047280811, 63.7291908104228, 1.8)
    pt3dadd(-61.9621792414408, -243.502607713738, 64.1186139626392, 1.8)
    pt3dadd(-61.8342748926037, -244.414742619367, 64.5080371148556, 1.8)
    pt3dadd(-61.7063705437667, -245.326877524996, 64.8974602670719, 1.8)
    pt3dadd(-61.5784661949296, -246.239012430625, 65.2868834192883, 1.8)
    pt3dadd(-61.4505618460925, -247.151147336254, 65.6763065715047, 1.8)
    pt3dadd(-61.3226574972554, -248.063282241882, 66.065729723721, 1.8)
    pt3dadd(-61.1947531484184, -248.975417147511, 66.4551528759374, 1.8)
    pt3dadd(-61.0668487995813, -249.88755205314, 66.8445760281537, 1.8)
    pt3dadd(-60.7943819481747, -250.795595806504, 67.0574005954526, 1.8)
    pt3dadd(-60.3667482259516, -251.699248301529, 67.0806722058974, 1.8)
    pt3dadd(-59.9391145037284, -252.602900796554, 67.1039438163421, 1.8)
    pt3dadd(-59.5114807815053, -253.506553291579, 67.1272154267869, 1.8)
    pt3dadd(-59.0838470592821, -254.410205786604, 67.1504870372317, 1.8)
    pt3dadd(-58.656213337059, -255.313858281629, 67.1737586476764, 1.8)
    pt3dadd(-58.2285796148358, -256.217510776654, 67.1970302581212, 1.8)
    pt3dadd(-57.8009458926127, -257.121163271679, 67.2203018685659, 1.8)
    pt3dadd(-57.3733121703895, -258.024815766704, 67.2435734790107, 1.8)
    pt3dadd(-56.6917377978746, -258.725019287725, 67.3378063333612, 1.8)
    pt3dadd(-55.9270720005526, -259.358652666841, 67.4552582779024, 1.8)
    pt3dadd(-55.1624062032306, -259.992286045956, 67.5727102224436, 1.8)
    pt3dadd(-54.3977404059087, -260.625919425072, 67.6901621669848, 1.8)
    pt3dadd(-53.6330746085867, -261.259552804187, 67.807614111526, 1.8)
    pt3dadd(-52.8684088112647, -261.893186183303, 67.9250660560672, 1.8)
    pt3dadd(-52.1890766085827, -262.591088986345, 67.9843507071855, 1.8)
    pt3dadd(-51.7861463810527, -263.497165320456, 67.8552270900342, 1.8)
    pt3dadd(-51.3832161535227, -264.403241654567, 67.726103472883, 1.8)
    pt3dadd(-50.9802859259927, -265.309317988678, 67.5969798557318, 1.8)
    pt3dadd(-50.5773556984627, -266.215394322789, 67.4678562385805, 1.8)
    pt3dadd(-50.387079692224, -267.118863097211, 67.1942541246625, 1.8)
    pt3dadd(-50.4306209628747, -268.01946481119, 66.7617952127089, 1.8)
    pt3dadd(-50.4741622335255, -268.92006652517, 66.3293363007552, 1.8)
    pt3dadd(-50.5177035041762, -269.820668239149, 65.8968773888016, 1.8)
    pt3dadd(-50.5612447748269, -270.721269953128, 65.464418476848, 1.8)
    pt3dadd(-50.6047860454777, -271.621871667107, 65.0319595648944, 1.8)
    pt3dadd(-50.6483273161284, -272.522473381086, 64.5995006529407, 1.8)
  }
  adendIML[15] {pt3dclear()
    pt3dadd(-43.3583947808292, -95.9200538915182, 29.6394409945723, 2.21084536945542)
    pt3dadd(-43.7251115623661, -96.8204028355083, 29.7360741772412, 2.21084536945542)
    pt3dadd(-44.2317087218386, -97.6825172104705, 29.725205759787, 2.14368238727469)
    pt3dadd(-44.7383058813111, -98.5446315854327, 29.7143373423327, 2.07651940509396)
    pt3dadd(-45.2449030407836, -99.4067459603949, 29.7034689248785, 2.00935642291323)
    pt3dadd(-45.7515002002561, -100.268860335357, 29.6926005074242, 1.9421934407325)
    pt3dadd(-46.2580973597286, -101.130974710319, 29.6817320899699, 1.87503045855177)
    pt3dadd(-46.7646945192011, -101.993089085281, 29.6708636725157, 1.80786747637104)
    pt3dadd(-46.925198219021, -102.883970363229, 30.0507426958903, 1.8)
    pt3dadd(-47.0397813709207, -103.778668505986, 30.48246706936, 1.8)
    pt3dadd(-47.1543645228204, -104.673366648743, 30.9141914428297, 1.8)
    pt3dadd(-47.2689476747201, -105.5680647915, 31.3459158162994, 1.8)
    pt3dadd(-47.3835308266199, -106.462762934257, 31.7776401897691, 1.8)
    pt3dadd(-47.4981139785196, -107.357461077014, 32.2093645632387, 1.8)
    pt3dadd(-47.9209388103239, -108.105488706418, 32.6602671705116, 1.8)
    pt3dadd(-48.5004181935584, -108.779346752794, 33.1156423126319, 1.8)
    pt3dadd(-49.2998369451706, -109.378138209493, 33.1644116775547, 1.8)
    pt3dadd(-50.0992556967829, -109.976929666192, 33.2131810424775, 1.8)
    pt3dadd(-50.8052019973064, -110.618267761027, 33.3545451878958, 1.8)
    pt3dadd(-51.1672881418422, -111.416123561943, 33.836540773851, 1.8)
    pt3dadd(-51.5293742863781, -112.213979362859, 34.3185363598062, 1.8)
    pt3dadd(-51.8914604309139, -113.011835163774, 34.8005319457614, 1.8)
    pt3dadd(-52.2535465754498, -113.80969096469, 35.2825275317165, 1.8)
    pt3dadd(-52.7968650343064, -114.563980767563, 35.5975008410867, 1.8)
    pt3dadd(-53.4462032411124, -115.292784739452, 35.8147671839493, 1.8)
    pt3dadd(-54.0955414479184, -116.021588711341, 36.0320335268118, 1.8)
    pt3dadd(-54.7448796547243, -116.75039268323, 36.2492998696744, 1.8)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(-54.7448796547243, -116.75039268323, 36.2492998696744, 1.8)
    pt3dadd(-55.3942178615302, -117.479196655119, 36.4665662125369, 1.8)
    pt3dadd(-56.0435560683362, -118.208000627008, 36.6838325553994, 1.8)
    pt3dadd(-56.6928942751421, -118.936804598897, 36.901098898262, 1.8)
    pt3dadd(-57.3422324819481, -119.665608570786, 37.1183652411245, 1.8)
    pt3dadd(-58.0556215813352, -120.23036527296, 37.5280611710227, 1.8)
    pt3dadd(-58.7730349539758, -120.78481499871, 37.9498473187003, 1.8)
    pt3dadd(-59.4904483266164, -121.33926472446, 38.3716334663779, 1.8)
    pt3dadd(-60.2078616992569, -121.893714450209, 38.7934196140555, 1.8)
    pt3dadd(-60.9252750718975, -122.448164175959, 39.2152057617332, 1.8)
    pt3dadd(-61.6426884445381, -123.002613901708, 39.6369919094108, 1.8)
    pt3dadd(-62.3601018171786, -123.557063627458, 40.0587780570884, 1.8)
    pt3dadd(-63.0775151898192, -124.111513353207, 40.480564204766, 1.8)
    pt3dadd(-63.7949285624598, -124.665963078957, 40.9023503524436, 1.8)
    pt3dadd(-64.4995669762363, -125.209537205448, 41.3579693857288, 1.8)
    pt3dadd(-65.2004147470615, -125.749884275468, 41.823627464205, 1.8)
    pt3dadd(-65.9012625178867, -126.290231345488, 42.2892855426812, 1.8)
  }
}
proc shape3d_16() {
  adendMML[11] {
    pt3dadd(-66.6021102887119, -126.830578415508, 42.7549436211573, 1.8)
    pt3dadd(-67.2388814478791, -127.448881894847, 43.1544592869445, 1.8)
    pt3dadd(-67.6440862300176, -128.34891193252, 43.3149429802538, 1.8)
    pt3dadd(-68.049291012156, -129.248941970193, 43.4754266735631, 1.8)
    pt3dadd(-68.4544957942945, -130.148972007866, 43.6359103668724, 1.8)
    pt3dadd(-68.859700576433, -131.049002045539, 43.7963940601817, 1.8)
    pt3dadd(-69.277080141562, -131.926638911964, 43.9988855037722, 1.8)
    pt3dadd(-69.7678062340848, -132.669368950917, 44.4544510768291, 1.8)
    pt3dadd(-70.2585323266075, -133.41209898987, 44.910016649886, 1.8)
    pt3dadd(-70.7492584191303, -134.154829028822, 45.3655822229429, 1.8)
    pt3dadd(-71.2399845116531, -134.897559067775, 45.8211477959998, 1.8)
    pt3dadd(-71.7307106041759, -135.640289106728, 46.2767133690567, 1.8)
    pt3dadd(-72.2214366966986, -136.38301914568, 46.7322789421135, 1.8)
    pt3dadd(-72.7121627892214, -137.125749184633, 47.1878445151704, 1.8)
    pt3dadd(-73.2986057102006, -137.928460503339, 47.2667192634238, 1.8)
    pt3dadd(-73.8884637501529, -138.733311918095, 47.332153909205, 1.8)
    pt3dadd(-74.4783217901052, -139.538163332852, 47.3975885549862, 1.8)
    pt3dadd(-75.0681798300574, -140.343014747608, 47.4630232007675, 1.8)
    pt3dadd(-75.6580378700097, -141.147866162364, 47.5284578465487, 1.8)
    pt3dadd(-76.247895909962, -141.95271757712, 47.5938924923299, 1.8)
    pt3dadd(-76.8377539499143, -142.757568991877, 47.6593271381111, 1.8)
    pt3dadd(-77.4366098699246, -143.547561827845, 47.757743477289, 1.8)
    pt3dadd(-78.0846608440104, -144.256316796421, 48.0364840905932, 1.8)
    pt3dadd(-78.7327118180962, -144.965071764997, 48.3152247038974, 1.8)
    pt3dadd(-79.3807627921821, -145.673826733573, 48.5939653172016, 1.8)
    pt3dadd(-80.0288137662679, -146.382581702149, 48.8727059305057, 1.8)
    pt3dadd(-80.6768647403537, -147.091336670725, 49.1514465438099, 1.8)
    pt3dadd(-81.3249157144395, -147.800091639301, 49.4301871571141, 1.8)
    pt3dadd(-81.9729666885253, -148.508846607877, 49.7089277704183, 1.8)
    pt3dadd(-82.6210176626111, -149.217601576453, 49.9876683837225, 1.8)
    pt3dadd(-83.2690686366969, -149.926356545029, 50.2664089970267, 1.8)
    pt3dadd(-83.9905211819149, -150.574791663603, 50.5052575817327, 1.8)
    pt3dadd(-84.7257273024237, -151.211924386523, 50.7366314215475, 1.8)
    pt3dadd(-85.4609334229325, -151.849057109444, 50.9680052613623, 1.8)
    pt3dadd(-86.1961395434413, -152.486189832364, 51.1993791011771, 1.8)
    pt3dadd(-86.9313456639501, -153.123322555284, 51.4307529409918, 1.8)
    pt3dadd(-87.666551784459, -153.760455278204, 51.6621267808066, 1.8)
    pt3dadd(-88.1829749543009, -154.508983271012, 51.9785070847803, 1.8)
    pt3dadd(-88.4630626442361, -155.377843558855, 52.3867137556666, 1.8)
    pt3dadd(-88.7431503341712, -156.246703846698, 52.7949204265529, 1.8)
    pt3dadd(-89.0232380241063, -157.115564134541, 53.2031270974393, 1.8)
    pt3dadd(-89.3033257140415, -157.984424422384, 53.6113337683256, 1.8)
    pt3dadd(-89.5834134039767, -158.853284710227, 54.019540439212, 1.8)
    pt3dadd(-90.1286970349943, -159.680977136077, 54.0487966487923, 1.8)
    pt3dadd(-90.6945628457324, -160.505474474058, 54.0486420519028, 1.8)
    pt3dadd(-91.2604286564706, -161.329971812039, 54.0484874550133, 1.8)
    pt3dadd(-91.8262944672087, -162.15446915002, 54.0483328581237, 1.8)
    pt3dadd(-92.3921602779469, -162.978966488001, 54.0481782612342, 1.8)
    pt3dadd(-92.958026088685, -163.803463825981, 54.0480236643447, 1.8)
    pt3dadd(-93.5238918994231, -164.627961163962, 54.0478690674552, 1.8)
    pt3dadd(-94.2798395442108, -165.225720532199, 54.0912575771302, 1.8)
    pt3dadd(-95.1831654183674, -165.647680668075, 54.1684068403185, 1.8)
    pt3dadd(-96.0864912925239, -166.069640803952, 54.2455561035067, 1.8)
    pt3dadd(-96.9898171666805, -166.491600939828, 54.322705366695, 1.8)
    pt3dadd(-97.8931430408371, -166.913561075704, 54.3998546298833, 1.8)
    pt3dadd(-98.593166614152, -167.539573482218, 54.5377716228965, 1.8)
    pt3dadd(-99.0608160155536, -168.3988172748, 54.7451460241076, 1.8)
    pt3dadd(-99.5284654169552, -169.258061067382, 54.9525204253186, 1.8)
    pt3dadd(-99.9961148183568, -170.117304859964, 55.1598948265297, 1.8)
    pt3dadd(-100.463764219758, -170.976548652546, 55.3672692277407, 1.8)
    pt3dadd(-100.93141362116, -171.835792445129, 55.5746436289518, 1.8)
    pt3dadd(-101.399063022562, -172.695036237711, 55.7820180301628, 1.8)
    pt3dadd(-101.866712423963, -173.554280030293, 55.9893924313738, 1.8)
    pt3dadd(-102.468558464794, -174.272116669178, 56.265186361838, 1.8)
    pt3dadd(-103.216370503789, -174.836144416687, 56.6154003740849, 1.8)
    pt3dadd(-103.964182542784, -175.400172164196, 56.9656143863319, 1.8)
    pt3dadd(-104.711994581779, -175.964199911705, 57.3158283985788, 1.8)
    pt3dadd(-105.459806620774, -176.528227659215, 57.6660424108257, 1.8)
    pt3dadd(-106.207618659768, -177.092255406724, 58.0162564230726, 1.8)
    pt3dadd(-106.955430698763, -177.656283154233, 58.3664704353196, 1.8)
    pt3dadd(-107.703242737758, -178.220310901742, 58.7166844475665, 1.8)
    pt3dadd(-108.443946026629, -178.793809773679, 59.0643856084254, 1.8)
    pt3dadd(-109.108901502243, -179.46822891317, 59.3853108952747, 1.8)
    pt3dadd(-109.773856977856, -180.142648052662, 59.706236182124, 1.8)
    pt3dadd(-110.43881245347, -180.817067192153, 60.0271614689732, 1.8)
    pt3dadd(-111.103767929084, -181.491486331644, 60.3480867558225, 1.8)
    pt3dadd(-111.768723404697, -182.165905471135, 60.6690120426718, 1.8)
    pt3dadd(-112.433678880311, -182.840324610627, 60.989937329521, 1.8)
    pt3dadd(-113.098634355925, -183.514743750118, 61.3108626163703, 1.8)
    pt3dadd(-113.763589831538, -184.189162889609, 61.6317879032196, 1.8)
    pt3dadd(-114.428545307152, -184.863582029101, 61.9527131900689, 1.8)
    pt3dadd(-115.093500782765, -185.538001168592, 62.2736384769181, 1.8)
    pt3dadd(-115.747136915707, -186.246871703832, 62.4076361736132, 1.8)
    pt3dadd(-116.384442918548, -187.005444398553, 62.2719581519397, 1.8)
    pt3dadd(-117.02174892139, -187.764017093275, 62.1362801302662, 1.8)
    pt3dadd(-117.659054924231, -188.522589787997, 62.0006021085926, 1.8)
    pt3dadd(-118.296360927072, -189.281162482718, 61.8649240869191, 1.8)
    pt3dadd(-118.933666929914, -190.03973517744, 61.7292460652456, 1.8)
    pt3dadd(-119.558851495413, -190.807516083384, 61.6031570031141, 1.8)
    pt3dadd(-120.043287591968, -191.682218437238, 61.5884104605382, 1.8)
    pt3dadd(-120.527723688524, -192.556920791091, 61.5736639179622, 1.8)
    pt3dadd(-121.012159785079, -193.431623144944, 61.5589173753863, 1.8)
    pt3dadd(-121.547788956232, -194.145349945347, 61.8013055733973, 1.8)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(-121.547788956232, -194.145349945347, 61.8013055733973, 1.8)
    pt3dadd(-122.267853483071, -194.343465681337, 62.523951704266, 1.8)
    pt3dadd(-122.949128463077, -194.643368726852, 63.1917260410805, 1.8)
    pt3dadd(-123.630403443084, -194.943271772367, 63.8595003778951, 1.8)
    pt3dadd(-124.31167842309, -195.243174817882, 64.5272747147096, 1.8)
    pt3dadd(-125.029494170301, -195.858487332305, 64.676744371779, 1.8)
    pt3dadd(-125.755597045715, -196.545331971124, 64.7086670352379, 1.8)
    pt3dadd(-126.49790187602, -197.173242460067, 64.8164568561123, 1.8)
    pt3dadd(-127.313766339264, -197.533581877405, 65.2686964849899, 1.8)
    pt3dadd(-128.129630802508, -197.893921294744, 65.7209361138674, 1.8)
    pt3dadd(-128.945495265753, -198.254260712083, 66.173175742745, 1.8)
    pt3dadd(-129.761359728997, -198.614600129421, 66.6254153716226, 1.8)
    pt3dadd(-130.578755350084, -198.977260596235, 67.0706817802341, 1.8)
    pt3dadd(-131.452651170038, -199.425568507893, 67.2586342003083, 1.8)
    pt3dadd(-132.326546989992, -199.873876419552, 67.4465866203826, 1.8)
    pt3dadd(-133.200442809946, -200.32218433121, 67.6345390404567, 1.8)
    pt3dadd(-134.0743386299, -200.770492242868, 67.822491460531, 1.8)
    pt3dadd(-134.942936965197, -201.230112774252, 68.0053343004239, 1.8)
    pt3dadd(-135.786686381225, -201.742797428051, 68.1642096248521, 1.8)
    pt3dadd(-136.630435797253, -202.255482081849, 68.3230849492802, 1.8)
    pt3dadd(-137.474185213281, -202.768166735648, 68.4819602737084, 1.8)
    pt3dadd(-138.317934629309, -203.280851389446, 68.6408355981366, 1.8)
    pt3dadd(-139.161684045337, -203.793536043245, 68.7997109225648, 1.8)
    pt3dadd(-140.005433461365, -204.306220697043, 68.9585862469929, 1.8)
    pt3dadd(-140.849182877392, -204.818905350842, 69.1174615714211, 1.8)
    pt3dadd(-141.69293229342, -205.33159000464, 69.2763368958493, 1.8)
    pt3dadd(-142.528291061469, -205.865988535883, 69.3912830565921, 1.8)
    pt3dadd(-143.35217115726, -206.430092339379, 69.4461327297077, 1.8)
    pt3dadd(-144.176051253051, -206.994196142874, 69.5009824028233, 1.8)
    pt3dadd(-144.999931348842, -207.55829994637, 69.5558320759389, 1.8)
    pt3dadd(-145.823811444633, -208.122403749866, 69.6106817490545, 1.8)
    pt3dadd(-146.647691540424, -208.686507553362, 69.6655314221701, 1.8)
    pt3dadd(-147.471571636215, -209.250611356858, 69.7203810952857, 1.8)
    pt3dadd(-148.295451732006, -209.814715160354, 69.7752307684013, 1.8)
    pt3dadd(-149.119331827797, -210.378818963849, 69.8300804415169, 1.8)
    pt3dadd(-149.993173471978, -210.852034580832, 69.8990833962166, 1.8)
    pt3dadd(-150.902153987537, -211.261326872805, 69.9780406128873, 1.8)
    pt3dadd(-151.811134503097, -211.670619164779, 70.056997829558, 1.8)
    pt3dadd(-152.720115018656, -212.079911456753, 70.1359550462288, 1.8)
    pt3dadd(-153.594609326882, -212.549123848708, 70.210032729303, 1.8)
    pt3dadd(-154.400096188549, -213.138237308859, 70.2743463884403, 1.8)
    pt3dadd(-155.205583050216, -213.727350769009, 70.3386600475775, 1.8)
    pt3dadd(-156.011069911882, -214.31646422916, 70.4029737067148, 1.8)
    pt3dadd(-156.733203959922, -215.002387459782, 70.4198441859383, 1.8)
    pt3dadd(-157.420565735676, -215.728696797992, 70.4169228057355, 1.8)
    pt3dadd(-158.107927511429, -216.455006136202, 70.4140014255327, 1.8)
    pt3dadd(-158.795289287182, -217.181315474412, 70.4110800453299, 1.8)
    pt3dadd(-159.172633400128, -217.996320889903, 70.6313788371154, 1.8)
    pt3dadd(-159.258018384618, -218.894855834601, 71.0618952219144, 1.8)
    pt3dadd(-159.343403369109, -219.793390779298, 71.4924116067134, 1.8)
    pt3dadd(-159.4287883536, -220.691925723996, 71.9229279915124, 1.8)
    pt3dadd(-159.514173338091, -221.590460668694, 72.3534443763114, 1.8)
    pt3dadd(-159.599558322582, -222.488995613392, 72.7839607611104, 1.8)
    pt3dadd(-159.684943307073, -223.38753055809, 73.2144771459094, 1.8)
    pt3dadd(-159.886128069403, -224.232395623546, 73.6535705676901, 1.8)
    pt3dadd(-160.461843030944, -224.903676672358, 74.1204046244646, 1.8)
    pt3dadd(-161.037557992484, -225.574957721169, 74.587238681239, 1.8)
    pt3dadd(-161.613272954025, -226.246238769981, 75.0540727380135, 1.8)
    pt3dadd(-162.188987915566, -226.917519818793, 75.5209067947879, 1.8)
    pt3dadd(-162.694790734832, -227.635541750795, 75.975940472072, 1.8)
    pt3dadd(-162.991658212239, -228.493250754177, 76.3957082249734, 1.8)
    pt3dadd(-163.288525689646, -229.350959757559, 76.8154759778746, 1.8)
    pt3dadd(-163.585393167053, -230.20866876094, 77.235243730776, 1.8)
    pt3dadd(-163.882260644461, -231.066377764322, 77.6550114836773, 1.8)
    pt3dadd(-164.179128121868, -231.924086767704, 78.0747792365786, 1.8)
    pt3dadd(-164.475995599275, -232.781795771085, 78.4945469894799, 1.8)
    pt3dadd(-164.772863076682, -233.639504774467, 78.9143147423812, 1.8)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(-164.772863076682, -233.639504774467, 78.9143147423812, 1.8)
    pt3dadd(-165.069730554089, -234.497213777849, 79.3340824952825, 1.8)
    pt3dadd(-165.366598031497, -235.354922781231, 79.7538502481838, 1.8)
    pt3dadd(-165.663465508904, -236.212631784612, 80.1736180010851, 1.8)
    pt3dadd(-165.914530611655, -237.085847992475, 80.5908487823277, 1.8)
    pt3dadd(-166.158207151624, -237.961565729019, 81.0076703146062, 1.8)
    pt3dadd(-166.401883691593, -238.837283465563, 81.4244918468847, 1.8)
    pt3dadd(-166.645560231562, -239.713001202107, 81.8413133791633, 1.8)
    pt3dadd(-166.889236771532, -240.588718938651, 82.2581349114418, 1.8)
    pt3dadd(-167.132913311501, -241.464436675195, 82.6749564437203, 1.8)
    pt3dadd(-167.37658985147, -242.340154411738, 83.0917779759989, 1.8)
    pt3dadd(-167.983123092752, -242.585574248281, 83.3662093558521, 1.8)
    pt3dadd(-168.917733788325, -242.261109252249, 83.511898456578, 1.8)
    pt3dadd(-169.852344483898, -241.936644256216, 83.6575875573039, 1.8)
    pt3dadd(-170.786955179471, -241.612179260184, 83.8032766580298, 1.8)
    pt3dadd(-171.721565875044, -241.287714264151, 83.9489657587557, 1.8)
    pt3dadd(-172.509902598516, -240.704858438693, 84.098612221491, 1.8)
    pt3dadd(-173.271017088648, -240.073914936729, 84.2489951668041, 1.8)
    pt3dadd(-174.032131578779, -239.442971434765, 84.3993781121171, 1.8)
    pt3dadd(-174.79324606891, -238.8120279328, 84.5497610574302, 1.8)
    pt3dadd(-175.554360559042, -238.181084430836, 84.7001440027433, 1.8)
    pt3dadd(-176.315475049173, -237.550140928872, 84.8505269480564, 1.8)
    pt3dadd(-177.076589539305, -236.919197426907, 85.0009098933694, 1.8)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(-121.547788956232, -194.145349945347, 61.8013055733973, 1.8)
    pt3dadd(-122.020568484717, -194.992364075975, 62.1741417010448, 1.8)
    pt3dadd(-122.532137560034, -195.737590897079, 62.6018496227465, 1.8)
    pt3dadd(-123.043706635352, -196.482817718183, 63.0295575444481, 1.8)
    pt3dadd(-123.555275710669, -197.228044539287, 63.4572654661497, 1.8)
    pt3dadd(-124.066844785986, -197.973271360391, 63.8849733878513, 1.8)
    pt3dadd(-124.578413861303, -198.718498181495, 64.3126813095529, 1.8)
    pt3dadd(-125.08998293662, -199.463725002599, 64.7403892312545, 1.8)
    pt3dadd(-125.601552011937, -200.208951823703, 65.1680971529561, 1.8)
    pt3dadd(-126.113121087254, -200.954178644807, 65.5958050746578, 1.8)
    pt3dadd(-126.652216446961, -201.674853669136, 66.0260720266894, 1.8)
    pt3dadd(-127.289454491797, -202.307991297345, 66.4654629892258, 1.8)
    pt3dadd(-127.926692536634, -202.941128925554, 66.9048539517621, 1.8)
    pt3dadd(-128.563930581471, -203.574266553763, 67.3442449142985, 1.8)
    pt3dadd(-129.201168626308, -204.207404181972, 67.7836358768348, 1.8)
    pt3dadd(-129.838406671144, -204.840541810181, 68.2230268393712, 1.8)
    pt3dadd(-130.475644715981, -205.47367943839, 68.6624178019075, 1.8)
    pt3dadd(-131.053138157665, -206.168517224014, 69.0635851035608, 1.8)
    pt3dadd(-131.476719402612, -207.022305044714, 69.3662817935884, 1.8)
    pt3dadd(-131.900300647559, -207.876092865414, 69.6689784836159, 1.8)
    pt3dadd(-132.323881892506, -208.729880686114, 69.9716751736434, 1.8)
    pt3dadd(-132.747463137453, -209.583668506813, 70.274371863671, 1.8)
    pt3dadd(-133.171044382401, -210.437456327513, 70.5770685536985, 1.8)
    pt3dadd(-133.594625627348, -211.291244148213, 70.8797652437261, 1.8)
    pt3dadd(-134.018206872295, -212.145031968913, 71.1824619337536, 1.8)
    pt3dadd(-134.441788117242, -212.998819789613, 71.4851586237812, 1.8)
    pt3dadd(-135.118642925442, -213.721150965809, 71.5421612100421, 1.8)
    pt3dadd(-135.825605969768, -214.427855056247, 71.5699565786366, 1.8)
    pt3dadd(-136.532569014094, -215.134559146684, 71.597751947231, 1.8)
    pt3dadd(-137.23953205842, -215.841263237122, 71.6255473158255, 1.8)
    pt3dadd(-137.946495102747, -216.54796732756, 71.6533426844199, 1.8)
    pt3dadd(-138.653458147073, -217.254671417998, 71.6811380530143, 1.8)
    pt3dadd(-139.498068255629, -217.783834328849, 71.7416204204749, 1.8)
    pt3dadd(-140.350590239541, -218.30279227317, 71.8039816181323, 1.8)
    pt3dadd(-141.203112223453, -218.82175021749, 71.8663428157897, 1.8)
    pt3dadd(-142.055634207365, -219.340708161811, 71.9287040134471, 1.8)
    pt3dadd(-142.908156191277, -219.859666106132, 71.9910652111046, 1.8)
    pt3dadd(-143.760678175189, -220.378624050452, 72.053426408762, 1.8)
    pt3dadd(-144.613200159101, -220.897581994773, 72.1157876064194, 1.8)
    pt3dadd(-144.548953891048, -221.831369759826, 72.0268838275348, 1.8)
    pt3dadd(-144.381993358803, -222.81163485403, 71.9210323950528, 1.8)
    pt3dadd(-144.215032826559, -223.791899948233, 71.8151809625708, 1.8)
    pt3dadd(-144.065770290195, -224.76621426768, 71.7282572950742, 1.8)
    pt3dadd(-144.439181773466, -225.564784656409, 72.200326356131, 1.8)
    pt3dadd(-144.812593256738, -226.363355045137, 72.6723954171879, 1.8)
    pt3dadd(-145.186004740009, -227.161925433866, 73.1444644782447, 1.8)
    pt3dadd(-145.55941622328, -227.960495822595, 73.6165335393016, 1.8)
    pt3dadd(-145.932827706552, -228.759066211323, 74.0886026003584, 1.8)
    pt3dadd(-146.28945681373, -229.550504500385, 74.5828948681, 1.8)
    pt3dadd(-146.603108403124, -230.323678394787, 75.1340979245914, 1.8)
    pt3dadd(-146.916759992519, -231.096852289189, 75.6853009810827, 1.8)
    pt3dadd(-147.230411581913, -231.870026183592, 76.236504037574, 1.8)
    pt3dadd(-147.544063171307, -232.643200077994, 76.7877070940653, 1.8)
    pt3dadd(-147.857714760701, -233.416373972396, 77.3389101505566, 1.8)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(-147.857714760701, -233.416373972396, 77.3389101505566, 1.8)
    pt3dadd(-148.171366350095, -234.189547866798, 77.890113207048, 1.8)
    pt3dadd(-148.689539251461, -234.917706583332, 78.336856926102, 1.8)
    pt3dadd(-149.214067242188, -235.644466543545, 78.780354780861, 1.8)
    pt3dadd(-149.738595232914, -236.371226503757, 79.2238526356199, 1.8)
    pt3dadd(-150.263123223641, -237.09798646397, 79.6673504903789, 1.8)
    pt3dadd(-150.787651214368, -237.824746424182, 80.1108483451379, 1.8)
    pt3dadd(-151.312179205095, -238.551506384395, 80.5543461998969, 1.8)
    pt3dadd(-151.664423928945, -239.336172269703, 81.0077431425048, 1.8)
    pt3dadd(-151.732476631898, -240.216357599084, 81.4774692494696, 1.8)
    pt3dadd(-151.800529334851, -241.096542928464, 81.9471953564345, 1.8)
    pt3dadd(-151.868582037804, -241.976728257845, 82.4169214633993, 1.8)
  }
}
proc shape3d_17() {
  adendOML[9] {
    pt3dadd(-151.936634740758, -242.856913587225, 82.8866475703642, 1.8)
    pt3dadd(-152.004687443711, -243.737098916605, 83.356373677329, 1.8)
    pt3dadd(-152.072740146664, -244.617284245986, 83.8260997842939, 1.8)
    pt3dadd(-152.140792849617, -245.497469575366, 84.2958258912587, 1.8)
    pt3dadd(-152.20176064403, -246.381688001693, 84.7441327371962, 1.8)
    pt3dadd(-152.08114755282, -247.369271674199, 84.6434800073365, 1.8)
    pt3dadd(-151.96053446161, -248.356855346705, 84.5428272774768, 1.8)
    pt3dadd(-151.8399213704, -249.344439019211, 84.4421745476171, 1.8)
    pt3dadd(-151.71930827919, -250.332022691717, 84.3415218177574, 1.8)
    pt3dadd(-151.59869518798, -251.319606364223, 84.2408690878977, 1.8)
    pt3dadd(-151.451117979897, -252.285593180242, 84.0871315848946, 1.8)
    pt3dadd(-151.159324448009, -253.136070214762, 83.6494726440472, 1.8)
    pt3dadd(-150.867530916122, -253.986547249281, 83.2118137031997, 1.8)
    pt3dadd(-150.575737384234, -254.8370242838, 82.7741547623522, 1.8)
    pt3dadd(-150.283943852346, -255.68750131832, 82.3364958215048, 1.8)
    pt3dadd(-149.992150320459, -256.537978352839, 81.8988368806573, 1.8)
  }
  adendIML[16] {pt3dclear()
    pt3dadd(-0.476685391935228, -21.7158660459946, -2.33407203599221, 1.8)
    pt3dadd(-0.393751024887184, -22.7553833930597, -2.31725172424036, 1.8)
    pt3dadd(-0.395657744590459, -23.750328393712, -2.21684848675844, 1.8)
    pt3dadd(-0.397564464293733, -24.7452733943644, -2.11644524927652, 1.8)
    pt3dadd(-0.399471183997006, -25.7402183950167, -2.0160420117946, 1.8)
    pt3dadd(-0.401377903700281, -26.7351633956691, -1.91563877431268, 1.8)
    pt3dadd(-0.403284623403555, -27.7301083963215, -1.81523553683076, 1.8)
    pt3dadd(-0.405191343106829, -28.7250533969738, -1.71483229934883, 1.8)
    pt3dadd(-0.407098062810104, -29.7199983976262, -1.61442906186691, 1.8)
    pt3dadd(-0.392985055744532, -30.7125444718705, -1.52641267722061, 1.8)
    pt3dadd(-0.112805609936901, -31.6652475565678, -1.64412550810651, 1.8)
    pt3dadd(0.16737383587073, -32.6179506412651, -1.76183833899242, 1.8)
    pt3dadd(0.447553281678363, -33.5706537259624, -1.87955116987832, 1.8)
    pt3dadd(0.727732727485994, -34.5233568106597, -1.99726400076423, 1.8)
    pt3dadd(1.00791217329363, -35.476059895357, -2.11497683165013, 1.8)
    pt3dadd(1.28809161910126, -36.4287629800543, -2.23268966253604, 1.8)
    pt3dadd(1.56827106490889, -37.3814660647516, -2.35040249342195, 1.8)
    pt3dadd(1.84845051071652, -38.3341691494489, -2.46811532430785, 1.8)
    pt3dadd(2.12862995652415, -39.2868722341462, -2.58582815519376, 1.8)
    pt3dadd(2.40880940233179, -40.2395753188435, -2.70354098607966, 1.8)
    pt3dadd(2.68898884813942, -41.1922784035408, -2.82125381696557, 1.8)
    pt3dadd(2.96916829394705, -42.1449814882381, -2.93896664785147, 1.8)
    pt3dadd(3.24934773975468, -43.0976845729354, -3.05667947873738, 1.8)
    pt3dadd(3.36898964279198, -44.0433875350963, -3.33182265151847, 1.8)
    pt3dadd(3.4390545631166, -44.9869287290627, -3.65558324552019, 1.8)
    pt3dadd(3.50911948344122, -45.9304699230291, -3.9793438395219, 1.8)
    pt3dadd(3.57918440376585, -46.8740111169955, -4.30310443352361, 1.8)
    pt3dadd(3.64924932409047, -47.8175523109619, -4.62686502752532, 1.8)
    pt3dadd(3.71931424441509, -48.7610935049283, -4.95062562152704, 1.8)
    pt3dadd(3.78937916473971, -49.7046346988948, -5.27438621552875, 1.8)
    pt3dadd(3.85944408506433, -50.6481758928612, -5.59814680953046, 1.8)
    pt3dadd(3.92950900538895, -51.5917170868276, -5.92190740353217, 1.8)
    pt3dadd(3.99957392571358, -52.535258280794, -6.24566799753389, 1.8)
    pt3dadd(4.14887030851932, -53.4766543840876, -6.22833745391759, 1.8)
    pt3dadd(4.35708280549986, -54.4164554088223, -5.95737326807611, 1.8)
    pt3dadd(4.5652953024804, -55.356256433557, -5.68640908223463, 1.8)
    pt3dadd(4.77350779946095, -56.2960574582917, -5.41544489639315, 1.8)
    pt3dadd(4.98172029644149, -57.2358584830264, -5.14448071055167, 1.8)
    pt3dadd(5.18993279342203, -58.1756595077611, -4.87351652471019, 1.8)
    pt3dadd(5.39814529040257, -59.1154605324958, -4.60255233886871, 1.8)
    pt3dadd(5.60635778738312, -60.0552615572305, -4.33158815302723, 1.8)
    pt3dadd(5.81457028436366, -60.9950625819652, -4.06062396718575, 1.8)
    pt3dadd(5.75304545214934, -61.9700761530703, -4.04412236678624, 1.8)
    pt3dadd(5.60347225511417, -62.9565838957027, -4.11068310938214, 1.8)
    pt3dadd(5.45389905807901, -63.9430916383352, -4.17724385197803, 1.8)
    pt3dadd(5.30432586104385, -64.9295993809676, -4.24380459457393, 1.8)
    pt3dadd(5.15475266400869, -65.9161071236001, -4.31036533716982, 1.8)
    pt3dadd(5.00517946697353, -66.9026148662325, -4.37692607976571, 1.8)
    pt3dadd(4.85560626993837, -67.889122608865, -4.4434868223616, 1.8)
    pt3dadd(4.7060330729032, -68.8756303514974, -4.5100475649575, 1.8)
    pt3dadd(4.44166498525673, -69.835849894991, -4.59768094431109, 1.8)
    pt3dadd(4.17402193028399, -70.7953194661401, -4.68591550196183, 1.8)
    pt3dadd(3.90637887531125, -71.7547890372892, -4.77415005961258, 1.8)
    pt3dadd(3.63873582033851, -72.7142586084383, -4.86238461726332, 1.8)
    pt3dadd(3.37109276536576, -73.6737281795874, -4.95061917491406, 1.8)
    pt3dadd(3.10344971039302, -74.6331977507365, -5.03885373256481, 1.8)
    pt3dadd(2.83580665542028, -75.5926673218856, -5.12708829021555, 1.8)
    pt3dadd(2.56816360044754, -76.5521368930347, -5.21532284786629, 1.8)
    pt3dadd(2.30052054547479, -77.5116064641838, -5.30355740551704, 1.8)
    pt3dadd(2.03287749050205, -78.4710760353329, -5.39179196316778, 1.8)
    pt3dadd(1.76523443552931, -79.430545606482, -5.48002652081852, 1.8)
    pt3dadd(1.49759138055657, -80.3900151776311, -5.56826107846927, 1.8)
    pt3dadd(1.22994832558382, -81.3494847487802, -5.65649563612001, 1.8)
    pt3dadd(0.962305270611081, -82.3089543199293, -5.74473019377076, 1.8)
    pt3dadd(0.709081634847767, -83.2718789539752, -5.8296966662451, 1.8)
    pt3dadd(0.54559024429434, -84.2563044922233, -5.89432579945798, 1.8)
    pt3dadd(0.382098853740912, -85.2407300304714, -5.95895493267086, 1.8)
    pt3dadd(0.218607463187483, -86.2251555687195, -6.02358406588374, 1.8)
    pt3dadd(0.0551160726340552, -87.2095811069676, -6.08821319909662, 1.8)
    pt3dadd(-0.108375317919371, -88.1940066452157, -6.1528423323095, 1.8)
    pt3dadd(-0.271866708472797, -89.1784321834638, -6.21747146552238, 1.8)
    pt3dadd(-0.435358099026226, -90.1628577217119, -6.28210059873526, 1.8)
    pt3dadd(-0.598849489579653, -91.1472832599599, -6.34672973194814, 1.8)
    pt3dadd(-0.762340880133081, -92.1317087982081, -6.41135886516102, 1.8)
    pt3dadd(-0.925832270686509, -93.1161343364562, -6.4759879983739, 1.8)
    pt3dadd(-1.08932366123994, -94.1005598747043, -6.54061713158678, 1.8)
    pt3dadd(-1.22019557663932, -95.0890062965896, -6.60969894089337, 1.8)
    pt3dadd(-1.31922219490489, -96.0813781720136, -6.68312774819963, 1.8)
    pt3dadd(-1.41824881317046, -97.0737500474376, -6.75655655550589, 1.8)
    pt3dadd(-1.51727543143603, -98.0661219228615, -6.82998536281215, 1.8)
    pt3dadd(-1.6163020497016, -99.0584937982855, -6.90341417011841, 1.8)
    pt3dadd(-1.71532866796716, -100.050865673709, -6.97684297742467, 1.8)
    pt3dadd(-1.81435528623273, -101.043237549133, -7.05027178473093, 1.8)
    pt3dadd(-1.9133819044983, -102.035609424557, -7.12370059203719, 1.8)
    pt3dadd(-2.01240852276387, -103.027981299981, -7.19712939934344, 1.8)
    pt3dadd(-2.11143514102944, -104.020353175405, -7.2705582066497, 1.8)
    pt3dadd(-2.210461759295, -105.012725050829, -7.34398701395596, 1.8)
    pt3dadd(-2.30948837756057, -106.005096926253, -7.41741582126222, 1.8)
    pt3dadd(-2.40851499582614, -106.997468801677, -7.49084462856848, 1.8)
    pt3dadd(-2.50801901950381, -107.98979347454, -7.56420927622785, 1.8)
    pt3dadd(-2.62448138362803, -108.980441423422, -7.63529485224866, 1.8)
    pt3dadd(-2.74094374775225, -109.971089372304, -7.70638042826946, 1.8)
    pt3dadd(-2.85740611187647, -110.961737321186, -7.77746600429026, 1.8)
    pt3dadd(-2.97386847600069, -111.952385270068, -7.84855158031107, 1.8)
    pt3dadd(-3.09033084012491, -112.943033218951, -7.91963715633187, 1.8)
    pt3dadd(-3.20679320424913, -113.933681167833, -7.99072273235267, 1.8)
    pt3dadd(-3.32325556837334, -114.924329116715, -8.06180830837348, 1.8)
    pt3dadd(-3.43971793249756, -115.914977065597, -8.13289388439428, 1.8)
    pt3dadd(-3.55618029662178, -116.905625014479, -8.20397946041508, 1.8)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(-3.55618029662178, -116.905625014479, -8.20397946041508, 1.8)
    pt3dadd(-3.67349860644653, -117.896179649027, -8.2749492522332, 1.8)
    pt3dadd(-3.79219912342182, -118.886583596752, -8.34573207219927, 1.8)
    pt3dadd(-3.91089964039712, -119.876987544476, -8.41651489216534, 1.8)
    pt3dadd(-4.02960015737241, -120.8673914922, -8.48729771213141, 1.8)
    pt3dadd(-4.1483006743477, -121.857795439924, -8.55808053209748, 1.8)
    pt3dadd(-4.267001191323, -122.848199387648, -8.62886335206355, 1.8)
    pt3dadd(-4.38570170829829, -123.838603335372, -8.69964617202962, 1.8)
    pt3dadd(-4.50440222527358, -124.829007283096, -8.77042899199569, 1.8)
    pt3dadd(-4.62310274224888, -125.81941123082, -8.84121181196176, 1.8)
    pt3dadd(-4.74180325922417, -126.809815178544, -8.91199463192783, 1.8)
    pt3dadd(-4.86050377619946, -127.800219126268, -8.9827774518939, 1.8)
    pt3dadd(-4.97920429317476, -128.790623073992, -9.05356027185997, 1.8)
    pt3dadd(-5.09790481015005, -129.781027021717, -9.12434309182604, 1.8)
    pt3dadd(-5.05743595694288, -130.771515877425, -9.2151623229153, 1.8)
    pt3dadd(-4.96102131088632, -131.762034577096, -9.31302407044385, 1.8)
    pt3dadd(-4.86460666482976, -132.752553276766, -9.41088581797241, 1.8)
    pt3dadd(-4.76819201877321, -133.743071976436, -9.50874756550097, 1.8)
    pt3dadd(-4.67177737271665, -134.733590676106, -9.60660931302953, 1.8)
    pt3dadd(-4.57536272666009, -135.724109375777, -9.70447106055808, 1.8)
    pt3dadd(-4.47894808060353, -136.714628075447, -9.80233280808664, 1.8)
    pt3dadd(-4.39851398771567, -137.704608392927, -9.90881022820959, 1.8)
    pt3dadd(-4.42135046568937, -138.691109541971, -10.0709644085665, 1.8)
    pt3dadd(-4.44418694366307, -139.677610691016, -10.2331185889234, 1.8)
    pt3dadd(-4.46702342163677, -140.664111840061, -10.3952727692803, 1.8)
    pt3dadd(-4.48985989961047, -141.650612989106, -10.5574269496372, 1.8)
    pt3dadd(-4.51269637758416, -142.63711413815, -10.7195811299941, 1.8)
    pt3dadd(-4.53553285555786, -143.623615287195, -10.881735310351, 1.8)
    pt3dadd(-4.55836933353156, -144.61011643624, -11.0438894907079, 1.8)
    pt3dadd(-4.58120581150526, -145.596617585284, -11.2060436710648, 1.8)
    pt3dadd(-4.60404228947895, -146.583118734329, -11.3681978514217, 1.8)
    pt3dadd(-4.62687876745265, -147.569619883374, -11.5303520317786, 1.8)
    pt3dadd(-4.64971524542635, -148.556121032418, -11.6925062121355, 1.8)
    pt3dadd(-4.67255172340005, -149.542622181463, -11.8546603924924, 1.8)
    pt3dadd(-4.69538820137374, -150.529123330508, -12.0168145728493, 1.8)
    pt3dadd(-4.71822467934744, -151.515624479553, -12.1789687532062, 1.8)
    pt3dadd(-4.74106115732114, -152.502125628597, -12.3411229335631, 1.8)
    pt3dadd(-4.76389763529484, -153.488626777642, -12.50327711392, 1.8)
    pt3dadd(-4.78673411326854, -154.475127926687, -12.6654312942769, 1.8)
    pt3dadd(-4.80957059124223, -155.461629075732, -12.8275854746339, 1.8)
    pt3dadd(-4.83240706921593, -156.448130224776, -12.9897396549908, 1.8)
    pt3dadd(-4.95308155090176, -157.439958597774, -12.9877306839475, 1.8)
    pt3dadd(-5.07833368116895, -158.432036221148, -12.978040840558, 1.8)
    pt3dadd(-5.20358581143613, -159.424113844521, -12.9683509971685, 1.8)
    pt3dadd(-5.32883794170332, -160.416191467895, -12.9586611537791, 1.8)
    pt3dadd(-5.4540900719705, -161.408269091269, -12.9489713103896, 1.8)
    pt3dadd(-5.57934220223769, -162.400346714642, -12.9392814670001, 1.8)
    pt3dadd(-5.70459433250487, -163.392424338016, -12.9295916236107, 1.8)
    pt3dadd(-5.82984646277206, -164.384501961389, -12.9199017802212, 1.8)
    pt3dadd(-5.95509859303925, -165.376579584763, -12.9102119368317, 1.8)
    pt3dadd(-6.08035072330643, -166.368657208137, -12.9005220934422, 1.8)
    pt3dadd(-6.20560285357362, -167.36073483151, -12.8908322500528, 1.8)
    pt3dadd(-6.3308549838408, -168.352812454884, -12.8811424066633, 1.8)
    pt3dadd(-6.45610711410799, -169.344890078257, -12.8714525632738, 1.8)
    pt3dadd(-6.58135924437517, -170.336967701631, -12.8617627198844, 1.8)
    pt3dadd(-6.70661137464236, -171.329045325005, -12.8520728764949, 1.8)
    pt3dadd(-6.82104412939748, -172.28938800351, -12.598345200598, 1.8)
    pt3dadd(-6.93542885720692, -173.249589811364, -12.3435342466771, 1.8)
    pt3dadd(-7.04981358501636, -174.209791619218, -12.0887232927562, 1.8)
    pt3dadd(-7.1641983128258, -175.169993427071, -11.8339123388354, 1.8)
    pt3dadd(-7.27858304063524, -176.130195234925, -11.5791013849145, 1.8)
    pt3dadd(-7.39296776844468, -177.090397042779, -11.3242904309936, 1.8)
    pt3dadd(-7.52254561951334, -178.074480862317, -11.3400218479941, 1.8)
    pt3dadd(-7.65510917559559, -179.063257900018, -11.4089194046662, 1.8)
    pt3dadd(-7.78767273167783, -180.052034937718, -11.4778169613383, 1.8)
    pt3dadd(-7.92023628776008, -181.040811975418, -11.5467145180105, 1.8)
    pt3dadd(-8.05279984384233, -182.029589013119, -11.6156120746826, 1.8)
    pt3dadd(-8.18536339992458, -183.018366050819, -11.6845096313547, 1.8)
    pt3dadd(-8.31792695600683, -184.007143088519, -11.7534071880268, 1.8)
    pt3dadd(-8.45049051208907, -184.99592012622, -11.8223047446989, 1.8)
    pt3dadd(-8.58305406817132, -185.98469716392, -11.8912023013711, 1.8)
    pt3dadd(-8.71561762425357, -186.97347420162, -11.9600998580432, 1.8)
    pt3dadd(-8.6770504620044, -187.963698882539, -12.0506569256992, 1.8)
    pt3dadd(-8.58231336220144, -188.95439872087, -12.1483232569127, 1.8)
    pt3dadd(-8.48757626239848, -189.9450985592, -12.2459895881262, 1.8)
    pt3dadd(-8.39283916259551, -190.935798397531, -12.3436559193397, 1.8)
    pt3dadd(-8.29810206279255, -191.926498235861, -12.4413222505532, 1.8)
    pt3dadd(-8.39290984656886, -192.911011614915, -12.5146017814201, 1.8)
    pt3dadd(-8.57261304401837, -193.89275413564, -12.5769586882387, 1.8)
    pt3dadd(-8.75231624146788, -194.874496656364, -12.6393155950573, 1.8)
    pt3dadd(-8.9320194389174, -195.856239177089, -12.7016725018759, 1.8)
    pt3dadd(-9.11172263636691, -196.837981697813, -12.7640294086946, 1.8)
    pt3dadd(-9.29142583381642, -197.819724218538, -12.8263863155132, 1.8)
    pt3dadd(-9.47112903126594, -198.801466739262, -12.8887432223318, 1.8)
    pt3dadd(-9.65083222871545, -199.783209259987, -12.9511001291504, 1.8)
    pt3dadd(-9.83053542616496, -200.764951780711, -13.013457035969, 1.8)
    pt3dadd(-10.0102386236145, -201.746694301436, -13.0758139427877, 1.8)
    pt3dadd(-10.189941821064, -202.72843682216, -13.1381708496063, 1.8)
    pt3dadd(-10.7027850036799, -203.585051989557, -13.1477773427798, 1.8)
    pt3dadd(-11.2236336343976, -204.438660311249, -13.1561162285883, 1.8)
    pt3dadd(-11.7444822651152, -205.292268632942, -13.1644551143968, 1.8)
    pt3dadd(-12.2653308958328, -206.145876954635, -13.1727940002053, 1.8)
    pt3dadd(-12.1974239085117, -207.129126510682, -13.266439344674, 1.8)
    pt3dadd(-12.0980087605154, -208.119314016393, -13.3646499952286, 1.8)
    pt3dadd(-11.998593612519, -209.109501522104, -13.4628606457832, 1.8)
    pt3dadd(-11.8991784645226, -210.099689027816, -13.5610712963377, 1.8)
    pt3dadd(-11.7997633165263, -211.089876533527, -13.6592819468923, 1.8)
    pt3dadd(-11.7003481685299, -212.080064039238, -13.7574925974469, 1.8)
    pt3dadd(-11.6839151081405, -213.072569879109, -13.8454618568996, 1.8)
    pt3dadd(-11.7496010683118, -214.067369940973, -13.9232962423005, 1.8)
    pt3dadd(-11.8152870284831, -215.062170002838, -14.0011306277013, 1.8)
    pt3dadd(-11.8809729886543, -216.056970064702, -14.0789650131022, 1.8)
    pt3dadd(-11.9466589488256, -217.051770126567, -14.156799398503, 1.8)
    pt3dadd(-12.1825233144928, -217.999650062509, -14.1992118657758, 1.8)
    pt3dadd(-12.6498608983616, -218.88371019409, -14.193444157896, 1.8)
    pt3dadd(-13.1171984822304, -219.76777032567, -14.1876764500161, 1.8)
    pt3dadd(-13.5845360660992, -220.65183045725, -14.1819087421363, 1.8)
    pt3dadd(-14.051873649968, -221.53589058883, -14.1761410342565, 1.8)
    pt3dadd(-14.3501213269827, -222.442510851715, -14.1995372429534, 1.8)
    pt3dadd(-14.1485064487039, -223.415823237693, -14.3091476446419, 1.8)
    pt3dadd(-13.9468915704252, -224.389135623671, -14.4187580463303, 1.8)
    pt3dadd(-13.7452766921465, -225.362448009649, -14.5283684480188, 1.8)
    pt3dadd(-13.5436618138678, -226.335760395627, -14.6379788497072, 1.8)
    pt3dadd(-13.3430491212432, -227.30934691903, -14.7468337384179, 1.8)
    pt3dadd(-13.1633519705092, -228.288654670594, -14.8399211260975, 1.8)
    pt3dadd(-12.9836548197751, -229.267962422158, -14.9330085137771, 1.8)
    pt3dadd(-12.803957669041, -230.247270173721, -15.0260959014567, 1.8)
    pt3dadd(-12.624260518307, -231.226577925285, -15.1191832891363, 1.8)
    pt3dadd(-12.4445633675729, -232.205885676849, -15.2122706768159, 1.8)
    pt3dadd(-12.2648662168389, -233.185193428413, -15.3053580644956, 1.8)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(-12.2648662168389, -233.185193428413, -15.3053580644956, 1.8)
    pt3dadd(-12.0851690661048, -234.164501179977, -15.3984454521752, 1.8)
    pt3dadd(-11.9054719153708, -235.143808931541, -15.4915328398548, 1.8)
    pt3dadd(-11.85338342146, -236.133497395288, -15.5468849849819, 1.8)
    pt3dadd(-11.9068710414052, -237.131774267367, -15.571017145797, 1.8)
    pt3dadd(-11.9603586613504, -238.130051139445, -15.5951493066121, 1.8)
    pt3dadd(-12.0138462812957, -239.128328011524, -15.6192814674271, 1.8)
    pt3dadd(-12.0673339012409, -240.126604883602, -15.6434136282422, 1.8)
    pt3dadd(-12.1208215211861, -241.124881755681, -15.6675457890573, 1.8)
    pt3dadd(-12.1743091411313, -242.123158627759, -15.6916779498723, 1.8)
    pt3dadd(-12.2277967610765, -243.121435499838, -15.7158101106874, 1.8)
    pt3dadd(-12.2812843810217, -244.119712371917, -15.7399422715025, 1.8)
    pt3dadd(-12.334772000967, -245.117989243995, -15.7640744323176, 1.8)
    pt3dadd(-12.3882596209122, -246.116266116074, -15.7882065931326, 1.8)
  }
}
proc shape3d_18() {
  adendOML[10] {
    pt3dadd(-12.4417472408574, -247.114542988152, -15.8123387539477, 1.8)
    pt3dadd(-12.4952348608026, -248.112819860231, -15.8364709147628, 1.8)
    pt3dadd(-12.5336475507545, -249.110571368231, -15.8763782712629, 1.8)
    pt3dadd(-12.5270051444345, -250.106752697851, -15.9634336384415, 1.8)
    pt3dadd(-12.5203627381144, -251.102934027471, -16.0504890056202, 1.8)
    pt3dadd(-12.5137203317943, -252.099115357091, -16.1375443727988, 1.8)
    pt3dadd(-12.5070779254742, -253.095296686711, -16.2245997399774, 1.8)
    pt3dadd(-12.5004355191541, -254.091478016331, -16.311655107156, 1.8)
    pt3dadd(-12.493793112834, -255.087659345951, -16.3987104743347, 1.8)
    pt3dadd(-12.4871507065139, -256.083840675571, -16.4857658415133, 1.8)
    pt3dadd(-12.4805083001938, -257.080022005192, -16.5728212086919, 1.8)
    pt3dadd(-12.4738658938737, -258.076203334812, -16.6598765758706, 1.8)
    pt3dadd(-12.3023649976038, -259.029630941421, -16.8678999873755, 1.8)
    pt3dadd(-12.0617711533962, -259.96514026697, -17.1266216601061, 1.8)
    pt3dadd(-11.8211773091887, -260.900649592519, -17.3853433328368, 1.8)
    pt3dadd(-11.5805834649812, -261.836158918068, -17.6440650055674, 1.8)
    pt3dadd(-11.3399896207736, -262.771668243616, -17.902786678298, 1.8)
    pt3dadd(-11.0993957765661, -263.707177569165, -18.1615083510287, 1.8)
    pt3dadd(-10.8588019323585, -264.642686894714, -18.4202300237593, 1.8)
    pt3dadd(-10.618208088151, -265.578196220263, -18.6789516964899, 1.8)
    pt3dadd(-10.3776142439434, -266.513705545812, -18.9376733692206, 1.8)
    pt3dadd(-10.1370203997359, -267.449214871361, -19.1963950419512, 1.8)
    pt3dadd(-9.89642655552834, -268.38472419691, -19.4551167146819, 1.8)
    pt3dadd(-9.6558327113208, -269.320233522459, -19.7138383874125, 1.8)
    pt3dadd(-9.41523886711326, -270.255742848007, -19.9725600601431, 1.8)
    pt3dadd(-9.16380867832397, -271.197438956808, -20.167397242859, 1.8)
    pt3dadd(-8.88161123057651, -272.156700985649, -20.1808493992066, 1.8)
    pt3dadd(-8.59941378282905, -273.115963014489, -20.1943015555541, 1.8)
    pt3dadd(-8.31721633508159, -274.075225043329, -20.2077537119017, 1.8)
    pt3dadd(-8.03501888733413, -275.034487072169, -20.2212058682493, 1.8)
    pt3dadd(-7.75282143958666, -275.993749101009, -20.2346580245969, 1.8)
    pt3dadd(-7.4706239918392, -276.953011129849, -20.2481101809445, 1.8)
    pt3dadd(-7.18842654409174, -277.912273158689, -20.261562337292, 1.8)
    pt3dadd(-6.90622909634428, -278.871535187529, -20.2750144936396, 1.8)
    pt3dadd(-6.62403164859682, -279.830797216369, -20.2884666499872, 1.8)
    pt3dadd(-6.34183420084936, -280.790059245209, -20.3019188063348, 1.8)
    pt3dadd(-6.05963675310189, -281.74932127405, -20.3153709626823, 1.8)
    pt3dadd(-5.65195422613694, -282.655931969698, -20.3260778748889, 1.8)
    pt3dadd(-5.16477002438398, -283.529185160258, -20.3350455244813, 1.8)
    pt3dadd(-4.67758582263102, -284.402438350818, -20.3440131740738, 1.8)
    pt3dadd(-4.19040162087806, -285.275691541378, -20.3529808236662, 1.8)
    pt3dadd(-3.7032174191251, -286.148944731938, -20.3619484732586, 1.8)
    pt3dadd(-3.21603321737214, -287.022197922498, -20.3709161228511, 1.8)
    pt3dadd(-2.72884901561918, -287.895451113058, -20.3798837724435, 1.8)
    pt3dadd(-2.24166481386623, -288.768704303618, -20.388851422036, 1.8)
    pt3dadd(-1.75448061211327, -289.641957494178, -20.3978190716284, 1.8)
    pt3dadd(-1.26729641036031, -290.515210684738, -20.4067867212208, 1.8)
    pt3dadd(-1.26733444772786, -291.498814953805, -20.3980903797896, 1.8)
    pt3dadd(-1.33063977462845, -292.496748646027, -20.3871003154026, 1.8)
    pt3dadd(-1.39394510152904, -293.494682338248, -20.3761102510156, 1.8)
    pt3dadd(-1.45725042842962, -294.49261603047, -20.3651201866286, 1.8)
    pt3dadd(-1.52055575533021, -295.490549722691, -20.3541301222416, 1.8)
    pt3dadd(-1.41003910491219, -296.417166990412, -20.3006334656395, 1.8)
    pt3dadd(-0.707866862471565, -297.10103727061, -20.1024527859358, 1.8)
    pt3dadd(-0.00569462003093868, -297.784907550808, -19.904272106232, 1.8)
    pt3dadd(0.696477622409684, -298.468777831005, -19.7060914265283, 1.8)
    pt3dadd(1.39864986485031, -299.152648111203, -19.5079107468246, 1.8)
    pt3dadd(2.10082210729094, -299.836518391401, -19.3097300671209, 1.8)
    pt3dadd(2.80299434973156, -300.520388671599, -19.1115493874172, 1.8)
    pt3dadd(3.50516659217219, -301.204258951797, -18.9133687077134, 1.8)
  }
  adendIML[17] {pt3dclear()
    pt3dadd(1.04365758893707, -11.1982667386145, -3.02664643194168, 2.54180173878493)
    pt3dadd(0.649007299495691, -11.3163513825342, -3.42655295892522, 2.54180173878493)
    pt3dadd(0.0232224530253324, -12.0962069339462, -3.41176631428102, 2.22706832311239)
    pt3dadd(-0.602562393445023, -12.8760624853583, -3.39697966963682, 1.91233490743985)
    pt3dadd(-1.00951180624598, -13.6981435664907, -3.68186931116318, 1.8)
    pt3dadd(-1.29500351463765, -14.5436605959122, -4.13308482219735, 1.8)
    pt3dadd(-1.58049522302931, -15.3891776253338, -4.58430033323152, 1.8)
    pt3dadd(-1.86598693142097, -16.2346946547553, -5.03551584426569, 1.8)
    pt3dadd(-2.15147863981263, -17.0802116841768, -5.48673135529986, 1.8)
    pt3dadd(-2.4369703482043, -17.9257287135983, -5.93794686633404, 1.8)
    pt3dadd(-2.77728076790829, -18.7664783877661, -6.30248916365031, 1.8)
    pt3dadd(-3.348711056395, -19.5871285285025, -6.30161057999537, 1.8)
    pt3dadd(-3.92014134488172, -20.407778669239, -6.30073199634045, 1.8)
    pt3dadd(-4.49157163336843, -21.2284288099754, -6.29985341268552, 1.8)
    pt3dadd(-5.06300192185514, -22.0490789507119, -6.29897482903058, 1.8)
    pt3dadd(-5.63443221034185, -22.8697290914483, -6.29809624537566, 1.8)
    pt3dadd(-6.18384930034598, -23.6983427503247, -6.34028799373073, 1.8)
    pt3dadd(-6.64385862962891, -24.5593006559907, -6.5574121555458, 1.8)
    pt3dadd(-7.10386795891183, -25.4202585616567, -6.77453631736087, 1.8)
    pt3dadd(-7.56387728819476, -26.2812164673226, -6.99166047917595, 1.8)
    pt3dadd(-8.02388661747769, -27.1421743729886, -7.20878464099102, 1.8)
    pt3dadd(-8.48389594676062, -28.0031322786546, -7.42590880280609, 1.8)
    pt3dadd(-8.94390527604355, -28.8640901843206, -7.64303296462117, 1.8)
    pt3dadd(-9.40391460532647, -29.7250480899866, -7.86015712643624, 1.8)
    pt3dadd(-9.77858977662294, -30.646121230143, -7.92659286416914, 1.8)
    pt3dadd(-10.135922512102, -31.5794115717155, -7.96240423781701, 1.8)
    pt3dadd(-10.4932552475811, -32.5127019132879, -7.99821561146487, 1.8)
    pt3dadd(-10.8505879830602, -33.4459922548604, -8.03402698511274, 1.8)
    pt3dadd(-11.2079207185393, -34.3792825964329, -8.06983835876061, 1.8)
    pt3dadd(-11.5652534540184, -35.3125729380054, -8.10564973240847, 1.8)
    pt3dadd(-12.0315561333807, -36.1873140119442, -8.12268144301126, 1.8)
    pt3dadd(-12.6168844197825, -36.9981029365702, -8.11920051761294, 1.8)
    pt3dadd(-13.2022127061844, -37.8088918611963, -8.11571959221462, 1.8)
    pt3dadd(-13.7875409925862, -38.6196807858223, -8.11223866681631, 1.8)
    pt3dadd(-14.372869278988, -39.4304697104484, -8.10875774141799, 1.8)
    pt3dadd(-14.9581975653898, -40.2412586350745, -8.10527681601967, 1.8)
    pt3dadd(-15.5435258517916, -41.0520475597005, -8.10179589062135, 1.8)
    pt3dadd(-16.1806155089263, -41.8118709568757, -8.08739051037378, 1.8)
    pt3dadd(-16.9767250886967, -42.4151194002275, -8.03942330708388, 1.8)
    pt3dadd(-17.772834668467, -43.0183678435794, -7.99145610379399, 1.8)
    pt3dadd(-18.5689442482373, -43.6216162869312, -7.94348890050409, 1.8)
    pt3dadd(-19.3650538280077, -44.2248647302831, -7.8955216972142, 1.8)
    pt3dadd(-20.161163407778, -44.828113173635, -7.8475544939243, 1.8)
    pt3dadd(-20.9383541165735, -45.4483433739305, -7.80343771645352, 1.8)
    pt3dadd(-21.4481911164165, -46.3085527838452, -7.81373357413184, 1.8)
    pt3dadd(-21.9580281162594, -47.1687621937599, -7.82402943181017, 1.8)
    pt3dadd(-22.4678651161023, -48.0289716036747, -7.83432528948849, 1.8)
    pt3dadd(-22.9777021159452, -48.8891810135894, -7.84462114716682, 1.8)
    pt3dadd(-23.4875391157882, -49.7493904235041, -7.85491700484514, 1.8)
    pt3dadd(-23.9973761156311, -50.6095998334188, -7.86521286252346, 1.8)
    pt3dadd(-24.507213115474, -51.4698092433335, -7.87550872020179, 1.8)
    pt3dadd(-25.017050115317, -52.3300186532483, -7.88580457788011, 1.8)
    pt3dadd(-25.4894677907807, -53.2069354027975, -7.87270880131693, 1.8)
    pt3dadd(-25.8330308607215, -54.1413843952097, -7.77906320583711, 1.8)
    pt3dadd(-26.1765939306624, -55.0758333876218, -7.68541761035729, 1.8)
    pt3dadd(-26.5201570006032, -56.0102823800339, -7.59177201487747, 1.8)
    pt3dadd(-26.8637200705441, -56.9447313724461, -7.49812641939765, 1.8)
    pt3dadd(-27.2072831404849, -57.8791803648582, -7.40448082391783, 1.8)
    pt3dadd(-27.5508462104258, -58.8136293572703, -7.31083522843801, 1.8)
    pt3dadd(-27.8944092803666, -59.7480783496825, -7.2171896329582, 1.8)
    pt3dadd(-28.2379723503074, -60.6825273420946, -7.12354403747838, 1.8)
    pt3dadd(-28.7091779879294, -61.556892591525, -7.15881266234853, 1.8)
    pt3dadd(-29.2230462356748, -62.4111757527607, -7.23716892813704, 1.8)
    pt3dadd(-29.7369144834202, -63.2654589139964, -7.31552519392555, 1.8)
    pt3dadd(-30.2507827311655, -64.119742075232, -7.39388145971406, 1.8)
    pt3dadd(-30.7646509789109, -64.9740252364677, -7.47223772550258, 1.8)
    pt3dadd(-31.2785192266563, -65.8283083977033, -7.55059399129109, 1.8)
    pt3dadd(-31.7923874744016, -66.682591558939, -7.6289502570796, 1.8)
    pt3dadd(-32.3282973491301, -67.5232239568472, -7.68392550329775, 1.8)
    pt3dadd(-32.9205478411596, -68.3289636295911, -7.67913650993743, 1.8)
    pt3dadd(-33.5127983331891, -69.134703302335, -7.67434751657711, 1.8)
    pt3dadd(-34.1050488252186, -69.9404429750788, -7.66955852321679, 1.8)
    pt3dadd(-34.6972993172481, -70.7461826478227, -7.66476952985647, 1.8)
    pt3dadd(-35.2895498092776, -71.5519223205666, -7.65998053649615, 1.8)
    pt3dadd(-35.8818003013071, -72.3576619933105, -7.65519154313582, 1.8)
    pt3dadd(-36.4740507933366, -73.1634016660543, -7.65040254977551, 1.8)
    pt3dadd(-37.0663012853661, -73.9691413387982, -7.64561355641518, 1.8)
    pt3dadd(-37.6585517773956, -74.7748810115421, -7.64082456305487, 1.8)
    pt3dadd(-38.2508022694251, -75.580620684286, -7.63603556969455, 1.8)
    pt3dadd(-38.8333211724872, -76.3917853745975, -7.62434062550489, 1.8)
    pt3dadd(-39.2715993546036, -77.2833591787473, -7.51028631022199, 1.8)
    pt3dadd(-39.70987753672, -78.1749329828971, -7.39623199493908, 1.8)
    pt3dadd(-40.1481557188364, -79.0665067870469, -7.28217767965617, 1.8)
    pt3dadd(-40.5864339009527, -79.9580805911966, -7.16812336437326, 1.8)
    pt3dadd(-41.0247120830691, -80.8496543953464, -7.05406904909035, 1.8)
    pt3dadd(-41.4629902651855, -81.7412281994962, -6.94001473380743, 1.8)
    pt3dadd(-41.9012684473019, -82.632802003646, -6.82596041852452, 1.8)
    pt3dadd(-42.3395466294182, -83.5243758077958, -6.71190610324162, 1.8)
    pt3dadd(-42.7778248115346, -84.4159496119456, -6.59785178795871, 1.8)
    pt3dadd(-43.216102993651, -85.3075234160953, -6.4837974726758, 1.8)
    pt3dadd(-43.6543811757674, -86.1990972202451, -6.36974315739289, 1.8)
    pt3dadd(-44.0926593578838, -87.0906710243949, -6.25568884210997, 1.8)
    pt3dadd(-44.5309375400001, -87.9822448285447, -6.14163452682707, 1.8)
    pt3dadd(-44.9692157221165, -88.8738186326945, -6.02758021154416, 1.8)
    pt3dadd(-45.4074939042329, -89.7653924368442, -5.91352589626124, 1.8)
    pt3dadd(-45.7894851184608, -90.6852306760329, -5.87646219252256, 1.8)
    pt3dadd(-46.1338938286, -91.6239409256578, -5.89080470378717, 1.8)
    pt3dadd(-46.4783025387391, -92.5626511752828, -5.90514721505178, 1.8)
    pt3dadd(-46.8227112488783, -93.5013614249077, -5.91948972631639, 1.8)
    pt3dadd(-47.1671199590175, -94.4400716745326, -5.933832237581, 1.8)
    pt3dadd(-47.5115286691566, -95.3787819241576, -5.94817474884562, 1.8)
    pt3dadd(-47.8559373792958, -96.3174921737825, -5.96251726011023, 1.8)
    pt3dadd(-48.200346089435, -97.2562024234074, -5.97685977137483, 1.8)
    pt3dadd(-48.5447547995741, -98.1949126730324, -5.99120228263944, 1.8)
    pt3dadd(-48.8891635097133, -99.1336229226573, -6.00554479390405, 1.8)
    pt3dadd(-49.3025186553025, -100.036186203787, -6.01507233621383, 1.8)
    pt3dadd(-49.8793745404286, -100.853029954352, -6.01318157995863, 1.8)
    pt3dadd(-50.4562304255547, -101.669873704916, -6.01129082370342, 1.8)
    pt3dadd(-51.0330863106809, -102.48671745548, -6.00940006744821, 1.8)
    pt3dadd(-51.609942195807, -103.303561206045, -6.00750931119299, 1.8)
    pt3dadd(-52.1867980809331, -104.120404956609, -6.00561855493778, 1.8)
    pt3dadd(-52.7636539660593, -104.937248707174, -6.00372779868257, 1.8)
    pt3dadd(-53.0909142793692, -105.863627639969, -5.99214365203406, 1.8)
    pt3dadd(-53.3021217800596, -106.840936426553, -5.97605243336187, 1.8)
    pt3dadd(-53.51332928075, -107.818245213137, -5.95996121468969, 1.8)
    pt3dadd(-53.7245367814403, -108.795553999721, -5.94386999601751, 1.8)
    pt3dadd(-53.9357442821307, -109.772862786304, -5.92777877734532, 1.8)
    pt3dadd(-54.1469517828211, -110.750171572888, -5.91168755867313, 1.8)
    pt3dadd(-54.3581592835115, -111.727480359472, -5.89559634000095, 1.8)
    pt3dadd(-54.5693667842018, -112.704789146056, -5.87950512132877, 1.8)
    pt3dadd(-54.7805742848922, -113.682097932639, -5.86341390265658, 1.8)
    pt3dadd(-54.9917817855826, -114.659406719223, -5.8473226839844, 1.8)
    pt3dadd(-55.2029892862729, -115.636715505807, -5.83123146531222, 1.8)
    pt3dadd(-55.4141967869633, -116.61402429239, -5.81514024664003, 1.8)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(-55.4141967869633, -116.61402429239, -5.81514024664003, 1.8)
    pt3dadd(-55.6254042876537, -117.591333078974, -5.79904902796785, 1.8)
    pt3dadd(-55.895530878377, -118.552127262435, -5.81686485098167, 1.8)
    pt3dadd(-56.2088637668468, -119.500811027027, -5.85954524230379, 1.8)
    pt3dadd(-56.5221966553167, -120.449494791618, -5.90222563362591, 1.8)
    pt3dadd(-56.8355295437865, -121.39817855621, -5.94490602494803, 1.8)
    pt3dadd(-57.1488624322563, -122.346862320802, -5.98758641627015, 1.8)
    pt3dadd(-57.4621953207261, -123.295546085393, -6.03026680759228, 1.8)
    pt3dadd(-57.7755282091959, -124.244229849985, -6.0729471989144, 1.8)
    pt3dadd(-58.0888610976657, -125.192913614577, -6.11562759023652, 1.8)
    pt3dadd(-58.4021939861355, -126.141597379168, -6.15830798155863, 1.8)
    pt3dadd(-58.7123447919442, -127.090178542006, -6.21225737542679, 1.8)
    pt3dadd(-58.997208213116, -128.037944348899, -6.35575931465705, 1.8)
    pt3dadd(-59.2820716342879, -128.985710155792, -6.49926125388731, 1.8)
    pt3dadd(-59.5669350554597, -129.933475962685, -6.64276319311758, 1.8)
    pt3dadd(-59.8517984766316, -130.881241769578, -6.78626513234783, 1.8)
    pt3dadd(-60.1366618978034, -131.829007576471, -6.9297670715781, 1.8)
    pt3dadd(-60.4215253189752, -132.776773383364, -7.07326901080836, 1.8)
    pt3dadd(-60.706388740147, -133.724539190257, -7.21677095003862, 1.8)
    pt3dadd(-60.9912521613189, -134.672304997149, -7.36027288926888, 1.8)
    pt3dadd(-61.2761155824907, -135.620070804042, -7.50377482849915, 1.8)
    pt3dadd(-61.5609790036625, -136.567836610935, -7.64727676772941, 1.8)
    pt3dadd(-61.8458424248344, -137.515602417828, -7.79077870695966, 1.8)
    pt3dadd(-62.1307058460062, -138.463368224721, -7.93428064618992, 1.8)
    pt3dadd(-62.415569267178, -139.411134031614, -8.07778258542019, 1.8)
    pt3dadd(-62.5051707973722, -140.397652495492, -8.17071440121563, 1.8)
    pt3dadd(-62.5479472012287, -141.393464109457, -8.25151915828551, 1.8)
    pt3dadd(-62.5907236050851, -142.389275723422, -8.33232391535541, 1.8)
    pt3dadd(-62.6335000089416, -143.385087337387, -8.41312867242529, 1.8)
    pt3dadd(-62.676276412798, -144.380898951353, -8.49393342949518, 1.8)
    pt3dadd(-62.7190528166544, -145.376710565318, -8.57473818656507, 1.8)
    pt3dadd(-62.7618292205109, -146.372522179283, -8.65554294363496, 1.8)
    pt3dadd(-62.8046056243673, -147.368333793248, -8.73634770070485, 1.8)
    pt3dadd(-62.8473820282238, -148.364145407214, -8.81715245777474, 1.8)
    pt3dadd(-62.8901584320802, -149.359957021179, -8.89795721484463, 1.8)
    pt3dadd(-62.833177435255, -150.254734436934, -9.29068675119929, 1.8)
    pt3dadd(-62.7406186519248, -151.113478705183, -9.79466210116962, 1.8)
    pt3dadd(-62.6480598685946, -151.972222973432, -10.29863745114, 1.8)
    pt3dadd(-62.5555010852643, -152.830967241681, -10.8026128011103, 1.8)
    pt3dadd(-62.4629423019341, -153.689711509931, -11.3065881510806, 1.8)
    pt3dadd(-62.3703835186039, -154.54845577818, -11.810563501051, 1.8)
    pt3dadd(-62.2778247352736, -155.407200046429, -12.3145388510213, 1.8)
    pt3dadd(-62.1852659519434, -156.265944314678, -12.8185142009917, 1.8)
    pt3dadd(-62.0927071686132, -157.124688582927, -13.322489550962, 1.8)
    pt3dadd(-62.0001483852829, -157.983432851176, -13.8264649009323, 1.8)
    pt3dadd(-61.9075896019527, -158.842177119425, -14.3304402509027, 1.8)
    pt3dadd(-61.8150308186225, -159.700921387674, -14.834415600873, 1.8)
    pt3dadd(-61.7976720406889, -160.565450447599, -15.3351145537821, 1.8)
    pt3dadd(-61.8012762267599, -161.431592092245, -15.8349001690751, 1.8)
    pt3dadd(-61.8048804128309, -162.29773373689, -16.3346857843682, 1.8)
    pt3dadd(-61.8084845989019, -163.163875381535, -16.8344713996612, 1.8)
    pt3dadd(-61.8120887849729, -164.030017026181, -17.3342570149542, 1.8)
    pt3dadd(-61.8156929710438, -164.896158670826, -17.8340426302472, 1.8)
    pt3dadd(-61.8192971571148, -165.762300315471, -18.3338282455402, 1.8)
    pt3dadd(-61.8229013431858, -166.628441960117, -18.8336138608332, 1.8)
    pt3dadd(-61.8249706559008, -167.567395739052, -19.1153857751607, 1.8)
    pt3dadd(-61.8259079681682, -168.560049954117, -19.2363681323875, 1.8)
    pt3dadd(-61.8268452804356, -169.552704169181, -19.3573504896144, 1.8)
    pt3dadd(-61.827782592703, -170.545358384246, -19.4783328468412, 1.8)
    pt3dadd(-61.8287199049703, -171.53801259931, -19.5993152040681, 1.8)
    pt3dadd(-61.8296572172377, -172.530666814375, -19.7202975612949, 1.8)
    pt3dadd(-61.8305945295051, -173.52332102944, -19.8412799185218, 1.8)
    pt3dadd(-61.8315318417724, -174.515975244504, -19.9622622757486, 1.8)
    pt3dadd(-61.8324691540398, -175.508629459569, -20.0832446329755, 1.8)
    pt3dadd(-61.8334064663071, -176.501283674634, -20.2042269902023, 1.8)
  }
}
proc shape3d_19() {
  adendMML[15] {
    pt3dadd(-61.8343437785745, -177.493937889698, -20.3252093474292, 1.8)
    pt3dadd(-61.8352810908419, -178.486592104763, -20.4461917046561, 1.8)
    pt3dadd(-61.8362184031093, -179.479246319827, -20.5671740618829, 1.8)
    pt3dadd(-61.8414453833663, -180.450819447408, -20.7903939712157, 1.8)
    pt3dadd(-61.8491054762851, -181.410435318389, -21.0716033294127, 1.8)
    pt3dadd(-61.8567655692039, -182.37005118937, -21.3528126876096, 1.8)
    pt3dadd(-61.8644256621226, -183.329667060352, -21.6340220458066, 1.8)
    pt3dadd(-61.8720857550414, -184.289282931333, -21.9152314040036, 1.8)
    pt3dadd(-61.8797458479602, -185.248898802314, -22.1964407622006, 1.8)
    pt3dadd(-61.887405940879, -186.208514673295, -22.4776501203976, 1.8)
    pt3dadd(-61.8950660337978, -187.168130544276, -22.7588594785946, 1.8)
    pt3dadd(-61.9027261267166, -188.127746415257, -23.0400688367916, 1.8)
    pt3dadd(-61.9103862196353, -189.087362286239, -23.3212781949886, 1.8)
    pt3dadd(-61.9180463125541, -190.04697815722, -23.6024875531856, 1.8)
    pt3dadd(-61.9257064054729, -191.006594028201, -23.8836969113826, 1.8)
    pt3dadd(-61.9333664983917, -191.966209899182, -24.1649062695796, 1.8)
    pt3dadd(-61.9410265913105, -192.925825770163, -24.4461156277766, 1.8)
    pt3dadd(-61.9486866842293, -193.885441641144, -24.7273249859735, 1.8)
    pt3dadd(-61.9563467771481, -194.845057512125, -25.0085343441705, 1.8)
    pt3dadd(-61.9640068700668, -195.804673383107, -25.2897437023675, 1.8)
    pt3dadd(-61.9716669629856, -196.764289254088, -25.5709530605645, 1.8)
    pt3dadd(-62.0809138867477, -197.732116677734, -25.558488726534, 1.8)
    pt3dadd(-62.2440071985592, -198.704296658179, -25.3903618183261, 1.8)
    pt3dadd(-62.4071005103707, -199.676476638625, -25.2222349101181, 1.8)
    pt3dadd(-62.5701938221823, -200.64865661907, -25.0541080019101, 1.8)
    pt3dadd(-62.7332871339938, -201.620836599515, -24.8859810937022, 1.8)
    pt3dadd(-62.8963804458053, -202.593016579961, -24.7178541854942, 1.8)
    pt3dadd(-63.0594737576169, -203.565196560406, -24.5497272772862, 1.8)
    pt3dadd(-63.2225670694284, -204.537376540852, -24.3816003690783, 1.8)
    pt3dadd(-63.3856603812399, -205.509556521297, -24.2134734608703, 1.8)
    pt3dadd(-63.5487536930514, -206.481736501742, -24.0453465526623, 1.8)
    pt3dadd(-63.7118470048629, -207.453916482188, -23.8772196444544, 1.8)
    pt3dadd(-63.8749403166745, -208.426096462633, -23.7090927362464, 1.8)
    pt3dadd(-64.038033628486, -209.398276443079, -23.5409658280384, 1.8)
    pt3dadd(-64.2011269402975, -210.370456423524, -23.3728389198305, 1.8)
    pt3dadd(-64.3494328933508, -211.346493731955, -23.2593559100788, 1.8)
    pt3dadd(-64.4404260797573, -212.337481251734, -23.3576614321453, 1.8)
    pt3dadd(-64.5314192661638, -213.328468771514, -23.4559669542119, 1.8)
    pt3dadd(-64.6224124525703, -214.319456291294, -23.5542724762785, 1.8)
    pt3dadd(-64.7134056389768, -215.310443811073, -23.652577998345, 1.8)
    pt3dadd(-64.8043988253833, -216.301431330853, -23.7508835204116, 1.8)
    pt3dadd(-64.8953920117898, -217.292418850632, -23.8491890424781, 1.8)
    pt3dadd(-64.9863851981963, -218.283406370412, -23.9474945645447, 1.8)
    pt3dadd(-65.0773783846028, -219.274393890191, -24.0458000866112, 1.8)
    pt3dadd(-65.1683715710093, -220.265381409971, -24.1441056086778, 1.8)
    pt3dadd(-65.2593647574158, -221.25636892975, -24.2424111307444, 1.8)
    pt3dadd(-65.3503579438223, -222.24735644953, -24.3407166528109, 1.8)
    pt3dadd(-65.4413511302288, -223.238343969309, -24.4390221748775, 1.8)
    pt3dadd(-65.5323443166353, -224.229331489089, -24.537327696944, 1.8)
    pt3dadd(-65.6687170744979, -225.210293756827, -24.6518206460339, 1.8)
    pt3dadd(-65.9176441309638, -226.166390536072, -24.8064630376227, 1.8)
    pt3dadd(-66.1665711874298, -227.122487315317, -24.9611054292115, 1.8)
    pt3dadd(-66.4154982438958, -228.078584094562, -25.1157478208003, 1.8)
    pt3dadd(-66.6644253003617, -229.034680873807, -25.2703902123892, 1.8)
    pt3dadd(-66.9133523568277, -229.990777653053, -25.425032603978, 1.8)
    pt3dadd(-67.1622794132936, -230.946874432298, -25.5796749955668, 1.8)
    pt3dadd(-67.4112064697596, -231.902971211543, -25.7343173871556, 1.8)
    pt3dadd(-67.6601335262256, -232.859067990788, -25.8889597787445, 1.8)
    pt3dadd(-67.9090605826915, -233.815164770033, -26.0436021703333, 1.8)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(-67.9090605826915, -233.815164770033, -26.0436021703333, 1.8)
    pt3dadd(-68.1579876391575, -234.771261549278, -26.1982445619221, 1.8)
    pt3dadd(-68.4069146956235, -235.727358328523, -26.3528869535109, 1.8)
    pt3dadd(-68.6558417520894, -236.683455107768, -26.5075293450998, 1.8)
    pt3dadd(-68.9047688085554, -237.639551887014, -26.6621717366886, 1.8)
    pt3dadd(-69.1536958650213, -238.595648666259, -26.8168141282774, 1.8)
    pt3dadd(-69.4026229214873, -239.551745445504, -26.9714565198662, 1.8)
    pt3dadd(-69.6515499779533, -240.507842224749, -27.1260989114551, 1.8)
    pt3dadd(-69.9004770344192, -241.463939003994, -27.2807413030439, 1.8)
    pt3dadd(-70.216429035002, -242.380749680277, -27.4742714101725, 1.8)
    pt3dadd(-70.7293234463834, -243.182124231546, -27.7820670426185, 1.8)
    pt3dadd(-71.2422178577649, -243.983498782814, -28.0898626750643, 1.8)
    pt3dadd(-71.7551122691463, -244.784873334083, -28.3976583075103, 1.8)
    pt3dadd(-72.2455556024544, -245.595388437707, -28.6948438421567, 1.8)
    pt3dadd(-72.2803121580996, -246.591428211248, -28.7766775232696, 1.8)
    pt3dadd(-72.3150687137448, -247.587467984789, -28.8585112043824, 1.8)
    pt3dadd(-72.6723656419812, -248.488291803701, -28.89151710543, 1.8)
    pt3dadd(-73.1965877081477, -249.339838267869, -28.8992530414907, 1.8)
    pt3dadd(-73.5972378801133, -250.247727464365, -28.9274150999158, 1.8)
    pt3dadd(-73.9033928199147, -251.19870185921, -28.9711969818254, 1.8)
    pt3dadd(-74.209547759716, -252.149676254056, -29.0149788637349, 1.8)
    pt3dadd(-74.5157026995173, -253.100650648901, -29.0587607456445, 1.8)
    pt3dadd(-74.8218576393187, -254.051625043747, -29.102542627554, 1.8)
    pt3dadd(-75.12801257912, -255.002599438592, -29.1463245094636, 1.8)
    pt3dadd(-75.4341675189214, -255.953573833438, -29.1901063913731, 1.8)
    pt3dadd(-75.7403224587227, -256.904548228283, -29.2338882732827, 1.8)
    pt3dadd(-75.8141666857352, -257.89235941758, -29.1674087673593, 1.8)
    pt3dadd(-75.8385881990939, -258.88800741441, -29.0774718111423, 1.8)
    pt3dadd(-75.8630097124526, -259.88365541124, -28.9875348549253, 1.8)
    pt3dadd(-75.8874312258113, -260.87930340807, -28.8975978987083, 1.8)
    pt3dadd(-75.91185273917, -261.8749514049, -28.8076609424913, 1.8)
    pt3dadd(-75.9362742525288, -262.87059940173, -28.7177239862743, 1.8)
    pt3dadd(-75.9606957658875, -263.86624739856, -28.6277870300573, 1.8)
    pt3dadd(-75.9851172792462, -264.86189539539, -28.5378500738403, 1.8)
    pt3dadd(-76.0271347571721, -265.85674586433, -28.4979534987102, 1.8)
    pt3dadd(-76.112389393533, -266.84963663168, -28.5810171555667, 1.8)
    pt3dadd(-76.1976440298939, -267.84252739903, -28.6640808124232, 1.8)
    pt3dadd(-76.2828986662549, -268.83541816638, -28.7471444692796, 1.8)
    pt3dadd(-76.3681533026158, -269.82830893373, -28.8302081261361, 1.8)
    pt3dadd(-76.4534079389768, -270.82119970108, -28.9132717829926, 1.8)
    pt3dadd(-76.5386625753377, -271.814090468429, -28.9963354398491, 1.8)
    pt3dadd(-76.6239172116986, -272.806981235779, -29.0793990967055, 1.8)
    pt3dadd(-76.7091718480596, -273.799872003129, -29.162462753562, 1.8)
    pt3dadd(-76.8441557245905, -274.782354071702, -29.2588630672979, 1.8)
    pt3dadd(-77.1091815116749, -275.737617403959, -29.3901387246961, 1.8)
    pt3dadd(-77.3742072987592, -276.692880736216, -29.5214143820942, 1.8)
    pt3dadd(-77.6392330858436, -277.648144068473, -29.6526900394924, 1.8)
    pt3dadd(-77.904258872928, -278.60340740073, -29.7839656968906, 1.8)
    pt3dadd(-78.1692846600124, -279.558670732987, -29.9152413542888, 1.8)
    pt3dadd(-78.4343104470967, -280.513934065245, -30.046517011687, 1.8)
    pt3dadd(-78.6993362341811, -281.469197397502, -30.1777926690851, 1.8)
    pt3dadd(-78.9643620212655, -282.424460729759, -30.3090683264833, 1.8)
    pt3dadd(-79.2293878083499, -283.379724062016, -30.4403439838815, 1.8)
    pt3dadd(-79.4944135954343, -284.334987394273, -30.5716196412797, 1.8)
    pt3dadd(-79.4030631886656, -285.257732149784, -30.8815687983185, 1.8)
    pt3dadd(-79.2134137760951, -286.171507328148, -31.2408013465623, 1.8)
    pt3dadd(-79.0237643635245, -287.085282506512, -31.6000338948061, 1.8)
    pt3dadd(-78.834114950954, -287.999057684876, -31.9592664430499, 1.8)
    pt3dadd(-78.6444655383835, -288.91283286324, -32.3184989912937, 1.8)
    pt3dadd(-78.4548161258129, -289.826608041603, -32.6777315395375, 1.8)
    pt3dadd(-78.2651667132424, -290.740383219967, -33.0369640877813, 1.8)
    pt3dadd(-78.0755173006719, -291.654158398331, -33.3961966360251, 1.8)
    pt3dadd(-77.8858678881014, -292.567933576695, -33.7554291842689, 1.8)
    pt3dadd(-77.6962184755308, -293.481708755059, -34.1146617325127, 1.8)
    pt3dadd(-77.5065690629603, -294.395483933423, -34.4738942807565, 1.8)
    pt3dadd(-77.0082044918275, -295.236644497407, -34.6377302856227, 1.8)
    pt3dadd(-76.4714847897118, -296.068783337097, -34.7772899962838, 1.8)
    pt3dadd(-75.9347650875961, -296.900922176787, -34.9168497069449, 1.8)
    pt3dadd(-75.3980453854805, -297.733061016477, -35.056409417606, 1.8)
    pt3dadd(-74.8613256833648, -298.565199856168, -35.1959691282671, 1.8)
    pt3dadd(-74.3246059812491, -299.397338695858, -35.3355288389282, 1.8)
  }
}
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()
}

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, 1 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 17 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 15 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 11 adendOML[ward] {
    regadendOML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regsoma = new SectionList()
  for ward = 0, 3 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_07