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_04

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[1]
create adendIML[15]
create adendMML[14]
create adendOML[13]
create soma[3]
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 adendIML[4](0),adendIML[3](1)
  connect adendIML[5](0),adendIML[4](1)
  connect adendMML[0](0),adendIML[5](1)
  connect adendMML[1](0),adendMML[0](1)
  connect adendOML[0](0),adendMML[1](1)
  connect adendMML[2](0),adendMML[0](1)
  connect adendOML[1](0),adendMML[2](1)
  connect adendIML[6](0),adendIML[4](1)
  connect adendMML[3](0),adendIML[6](1)
  connect adendOML[2](0),adendMML[3](1)
  connect adendIML[7](0),adendIML[3](1)
  connect adendMML[4](0),adendIML[7](1)
  connect adendOML[3](0),adendMML[4](1)
  connect adendOML[4](0),adendOML[3](1)
  connect adendOML[5](0),adendOML[3](1)
  connect adendIML[8](0),adendIML[2](1)
  connect adendMML[5](0),adendIML[8](1)
  connect adendOML[6](0),adendMML[5](1)
  connect adendIML[9](0),adendIML[1](1)
  connect adendIML[10](0),adendIML[9](1)
  connect adendMML[6](0),adendIML[10](1)
  connect adendMML[7](0),adendMML[6](1)
  connect adendOML[7](0),adendMML[7](1)
  connect adendMML[8](0),adendMML[6](1)
  connect adendOML[8](0),adendMML[8](1)
  connect adendIML[11](0),adendIML[9](1)
  connect adendMML[9](0),adendIML[11](1)
  connect adendOML[9](0),adendMML[9](1)
  connect adendIML[12](0),adendIML[0](1)
  connect adendIML[13](0),adendIML[12](1)
  connect adendMML[10](0),adendIML[13](1)
  connect adendMML[11](0),adendMML[10](1)
  connect adendOML[10](0),adendMML[11](1)
  connect adendMML[12](0),adendMML[10](1)
  connect adendOML[11](0),adendMML[12](1)
  connect adendIML[14](0),adendIML[12](1)
  connect adendMML[13](0),adendIML[14](1)
  connect adendOML[12](0),adendMML[13](1)
}
proc topol() {
  topol_1()
  basic_shape()
}

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-1.35059720404942, 16.7243497295236, 0, 10.5)
    pt3dadd(-1.35049720404942, 16.7243497295236, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-1.35049720404942, 16.7243497295236, 0, 10.4043260233424)
    pt3dadd(-1.42993821605233, 17.7208466413026, -0.0261348508102649, 10.4043260233424)
    pt3dadd(-1.50937922805524, 18.7173435530816, -0.0522697016205298, 10.1118742080783)
    pt3dadd(-1.58882024005814, 19.7138404648606, -0.0784045524307947, 9.60468635614927)
    pt3dadd(-1.66826125206105, 20.7103373766396, -0.10453940324106, 8.84590300647707)
    pt3dadd(-1.74770226406396, 21.7068342884186, -0.130674254051324, 7.76208734813001)
    pt3dadd(-1.82714327606687, 22.7033312001976, -0.156809104861589, 6.18465843842649)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-1.82714327606687, 22.7033312001976, -0.156809104861589, 3.5)
    pt3dadd(-1.90658428806977, 23.6998281119766, -0.182943955671854, 3.5)
    pt3dadd(-1.98602530007268, 24.6963250237555, -0.209078806482119, 2.47906000584629)
    pt3dadd(-2.06546631207559, 25.6928219355345, -0.235213657292384, 2.11125382662694)
    pt3dadd(-2.14490732407849, 26.6893188473135, -0.261348508102649, 1.81011959652796)
    pt3dadd(-2.2243483360814, 27.6858157590925, -0.287483358912914, 1.56357174154146)
    pt3dadd(-2.30378934808431, 28.6823126708715, -0.313618209723179, 1.3617154305586)
    pt3dadd(-2.38323036008722, 29.6788095826505, -0.339753060533444, 1.19644946105406)
    pt3dadd(-2.46267137209012, 30.6753064944295, -0.365887911343708, 1.06114112938344)
    pt3dadd(-2.54211238409303, 31.6718034062085, -0.392022762153973, 0.950360037097033)
    pt3dadd(-2.62155339609594, 32.6683003179875, -0.418157612964238, 0.85966014998258)
    pt3dadd(-2.70099440809885, 33.6647972297665, -0.444292463774503, 0.785401363101277)
    pt3dadd(-2.78043542010175, 34.6612941415455, -0.470427314584768, 0.72460341059529)
    pt3dadd(-2.85987643210466, 35.6577910533245, -0.496562165395033, 0.674826257154464)
    pt3dadd(-2.93931744410757, 36.6542879651035, -0.522697016205298, 0.634072170831778)
    pt3dadd(-3.01875845611047, 37.6507848768825, -0.548831867015563, 0.600705547045801)
    pt3dadd(-3.09819946811338, 38.6472817886615, -0.574966717825827, 0.573387266025838)
    pt3dadd(-3.17764048011629, 39.6437787004405, -0.601101568636092, 0.551020949233567)
    pt3dadd(-3.2570814921192, 40.6402756122195, -0.627236419446357, 0.532708957842651)
    pt3dadd(-3.3365225041221, 41.6367725239985, -0.653371270256622, 0.517716367340809)
    pt3dadd(-3.41596351612501, 42.6332694357775, -0.679506121066887, 0.505441472428646)
    pt3dadd(-3.49540452812792, 43.6297663475565, -0.705640971877152, 0.495391638473257)
    pt3dadd(-3.57484554013082, 44.6262632593355, -0.731775822687417, 0.487163530350653)
    pt3dadd(-3.65428655213373, 45.6227601711145, -0.757910673497682, 0.480426925191027)
    pt3dadd(-3.73372756413664, 46.6192570828935, -0.784045524307947, 0.474911459375497)
    pt3dadd(-3.81316857613955, 47.6157539946725, -0.810180375118211, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-3.81316857613955, 47.6157539946725, -0.810180375118211, 0.466698650595398)
    pt3dadd(-3.89260958814245, 48.6122509064515, -0.836315225928476, 0.466698650595398)
    pt3dadd(-3.97205060014536, 49.6087478182305, -0.862450076738741, 0.463671698777356)
    pt3dadd(-4.05149161214827, 50.6052447300095, -0.888584927549006, 0.46119344023584)
    pt3dadd(-4.13093262415117, 51.6017416417885, -0.914719778359271, 0.459164413753823)
    pt3dadd(-4.21037363615408, 52.5982385535675, -0.940854629169536, 0.457503187374186)
    pt3dadd(-4.28981464815699, 53.5947354653465, -0.966989479979801, 0.456143090249352)
    pt3dadd(-4.3692556601599, 54.5912323771255, -0.993124330790066, 0.455029536906078)
    pt3dadd(-4.4486966721628, 55.5877292889045, -1.01925918160033, 0.454117836538747)
    pt3dadd(-4.52813768416571, 56.5842262006835, -1.0453940324106, 0.45337139941042)
    pt3dadd(-4.60757869616862, 57.5807231124625, -1.07152888322086, 0.45276026837822)
    pt3dadd(-4.68701970817153, 58.5772200242415, -1.09766373403113, 0.452259916607997)
    pt3dadd(-4.76646072017443, 59.5737169360205, -1.12379858484139, 0.451850263226359)
    pt3dadd(-4.84590173217734, 60.5702138477995, -1.14993343565165, 0.45151486740471)
    pt3dadd(-4.92534274418025, 61.5667107595785, -1.17606828646192, 0.451240268531071)
    pt3dadd(-5.00478375618315, 62.5632076713575, -1.20220313727218, 0.451015445988463)
    pt3dadd(-5.08422476818606, 63.5597045831365, -1.22833798808245, 0.450831376858844)
    pt3dadd(-5.16366578018897, 64.5562014949155, -1.25447283889271, 0.450680673801733)
    pt3dadd(-5.24310679219188, 65.5526984066944, -1.28060768970298, 0.450557288574293)
    pt3dadd(-5.32254780419478, 66.5491953184735, -1.30674254051324, 0.450456269294113)
    pt3dadd(-5.40198881619769, 67.5456922302525, -1.33287739132351, 0.450373561702775)
    pt3dadd(-5.4814298282006, 68.5421891420314, -1.35901224213377, 0.450305846454234)
    pt3dadd(-5.5608708402035, 69.5386860538104, -1.38514709294404, 0.450250405897802)
    pt3dadd(-5.64031185220641, 70.5351829655894, -1.4112819437543, 0.450205015009282)
    pt3dadd(-5.71975286420932, 71.5316798773684, -1.43741679456457, 0.450167852092942)
    pt3dadd(-5.79919387621223, 72.5281767891474, -1.46355164537483, 0.45013742567046)
    pt3dadd(-5.87863488821513, 73.5246737009264, -1.4896864961851, 0.450112514622668)
    pt3dadd(-5.95807590021804, 74.5211706127054, -1.51582134699536, 0.450092119181749)
    pt3dadd(-6.03751691222095, 75.5176675244844, -1.54195619780563, 0.450075420807047)
    pt3dadd(-6.11695792422386, 76.5141644362634, -1.56809104861589, 0.450061749334151)
    pt3dadd(-6.19639893622676, 77.5106613480424, -1.59422589942616, 0.450050556078851)
    pt3dadd(-6.27583994822967, 78.5071582598214, -1.62036075023642, 0.450041391816511)
    pt3dadd(-6.35528096023258, 79.5036551716004, -1.64649560104669, 0.450033888753103)
    pt3dadd(-6.43472197223548, 80.5001520833794, -1.67263045185695, 0.450027745764349)
    pt3dadd(-6.51416298423839, 81.4966489951584, -1.69876530266722, 0.45002271631054)
    pt3dadd(-6.5936039962413, 82.4931459069374, -1.72490015347748, 0.450018598542036)
    pt3dadd(-6.67304500824421, 83.4896428187164, -1.75103500428775, 0.450015227198327)
    pt3dadd(-6.75248602024711, 84.4861397304954, -1.77716985509801, 0.450012466975554)
    pt3dadd(-6.83192703225002, 85.4826366422744, -1.80330470590828, 0.450010207096284)
    pt3dadd(-6.91136804425293, 86.4791335540534, -1.82943955671854, 0.450008356863627)
    pt3dadd(-6.99080905625583, 87.4756304658324, -1.85557440752881, 0.450006842021251)
    pt3dadd(-7.07025006825874, 88.4721273776114, -1.88170925833907, 0.450005601773211)
    pt3dadd(-7.14969108026165, 89.4686242893904, -1.90784410914934, 0.450004586344)
    pt3dadd(-7.22913209226456, 90.4651212011694, -1.9339789599596, 0.450003754980877)
    pt3dadd(-7.30857310426746, 91.4616181129484, -1.96011381076987, 0.450003074318321)
    pt3dadd(-7.38801411627037, 92.4581150247274, -1.98624866158013, 0.450002517038954)
    pt3dadd(-7.46745512827328, 93.4546119365064, -2.0123835123904, 0.450002060777199)
    pt3dadd(-7.54689614027618, 94.4511088482854, -2.03851836320066, 0.450001687221668)
    pt3dadd(-7.62633715227909, 95.4476057600644, -2.06465321401093, 0.450001381380267)
    pt3dadd(-7.705778164282, 96.4441026718434, -2.09078806482119, 0.450001130978506)
    pt3dadd(-7.78521917628491, 97.4405995836224, -2.11692291563146, 0.450000925966884)
    pt3dadd(-7.86466018828781, 98.4370964954014, -2.14305776644172, 0.450000758117564)
    pt3dadd(-7.94410120029072, 99.4335934071804, -2.16919261725199, 0.450000620694164)
    pt3dadd(-8.02354221229363, 100.430090318959, -2.19532746806225, 0.450000508181401)
    pt3dadd(-8.10298322429654, 101.426587230738, -2.22146231887252, 0.450000416063741)
    pt3dadd(-8.18242423629944, 102.423084142517, -2.24759716968278, 0.45000034064418)
    pt3dadd(-8.26186524830235, 103.419581054296, -2.27373202049304, 0.450000278895866)
    pt3dadd(-8.34130626030526, 104.416077966075, -2.29986687130331, 0.450000228340622)
    pt3dadd(-8.42074727230816, 105.412574877854, -2.32600172211357, 0.45000018694949)
    pt3dadd(-8.50018828431107, 106.409071789633, -2.35213657292384, 0.450000153061296)
    pt3dadd(-8.57962929631398, 107.405568701412, -2.3782714237341, 0.45000012531599)
    pt3dadd(-8.65907030831688, 108.402065613191, -2.40440627454437, 0.450000102600055)
    pt3dadd(-8.73851132031979, 109.39856252497, -2.43054112535463, 0.450000084001821)
    pt3dadd(-8.8179523323227, 110.395059436749, -2.4566759761649, 0.450000068774874)
    pt3dadd(-8.89739334432561, 111.391556348528, -2.48281082697516, 0.450000056308104)
    pt3dadd(-8.97683435632851, 112.388053260307, -2.50894567778543, 0.450000046101177)
    pt3dadd(-9.05627536833142, 113.384550172086, -2.53508052859569, 0.450000037744451)
    pt3dadd(-9.13571638033433, 114.381047083865, -2.56121537940596, 0.450000030902543)
    pt3dadd(-9.21515739233724, 115.377543995644, -2.58735023021622, 0.450000025300862)
    pt3dadd(-9.29459840434014, 116.374040907423, -2.61348508102649, 0.450000020714594)
    pt3dadd(-9.37403941634305, 117.370537819202, -2.63961993183675, 0.450000016959675)
    pt3dadd(-9.45348042834596, 118.367034730981, -2.66575478264702, 0.450000013885408)
    pt3dadd(-9.53292144034886, 119.36353164276, -2.69188963345728, 0.45000001136841)
    pt3dadd(-9.61236245235177, 120.360028554539, -2.71802448426755, 0.450000009307667)
    pt3dadd(-9.69180346435468, 121.356525466318, -2.74415933507781, 0.450000007620473)
    pt3dadd(-9.77124447635759, 122.353022378097, -2.77029418588808, 0.450000006239116)
    pt3dadd(-9.85068548836049, 123.349519289876, -2.79642903669834, 0.450000005108156)
    pt3dadd(-9.9301265003634, 124.346016201655, -2.82256388750861, 0.450000004182204)
    pt3dadd(-10.0095675123663, 125.342513113434, -2.84869873831887, 0.450000003424099)
    pt3dadd(-10.0890085243692, 126.339010025213, -2.87483358912914, 0.450000002803415)
    pt3dadd(-10.1684495363721, 127.335506936992, -2.9009684399394, 0.450000002295242)
    pt3dadd(-10.247890548375, 128.332003848771, -2.92710329074967, 0.450000001879186)
    pt3dadd(-10.3273315603779, 129.32850076055, -2.95323814155993, 0.450000001538547)
    pt3dadd(-10.4067725723808, 130.324997672329, -2.9793729923702, 0.450000001259656)
    pt3dadd(-10.4862135843838, 131.321494584108, -3.00550784318046, 0.450000001031319)
    pt3dadd(-10.5656545963867, 132.317991495887, -3.03164269399073, 0.450000000844373)
    pt3dadd(-10.6450956083896, 133.314488407666, -3.05777754480099, 0.450000000691314)
    pt3dadd(-10.7245366203925, 134.310985319445, -3.08391239561126, 0.450000000566)
    pt3dadd(-10.8039776323954, 135.307482231224, -3.11004724642152, 0.450000000463401)
    pt3dadd(-10.8834186443983, 136.303979143003, -3.13618209723179, 0.450000000379401)
    pt3dadd(-10.9628596564012, 137.300476054782, -3.16231694804205, 0.450000000310627)
    pt3dadd(-11.0423006684041, 138.296972966561, -3.18845179885232, 0.45000000025432)
    pt3dadd(-11.121741680407, 139.29346987834, -3.21458664966258, 0.45000000020822)
    pt3dadd(-11.2011826924099, 140.289966790119, -3.24072150047285, 0.450000000170476)
    pt3dadd(-11.2806237044128, 141.286463701898, -3.26685635128311, 0.450000000139574)
    pt3dadd(-11.3600647164157, 142.282960613677, -3.29299120209338, 0.450000000114273)
    pt3dadd(-11.4395057284186, 143.279457525456, -3.31912605290364, 0.450000000093559)
    pt3dadd(-11.5189467404215, 144.275954437235, -3.34526090371391, 0.4500000000766)
    pt3dadd(-11.5983877524245, 145.272451349014, -3.37139575452417, 0.450000000062715)
    pt3dadd(-11.6778287644274, 146.268948260793, -3.39753060533443, 0.450000000051346)
    pt3dadd(-11.7572697764303, 147.265445172572, -3.4236654561447, 0.450000000042039)
    pt3dadd(-11.8367107884332, 148.261942084351, -3.44980030695496, 0.450000000034418)
    pt3dadd(-11.9161518004361, 149.25843899613, -3.47593515776523, 0.450000000028179)
    pt3dadd(-11.995592812439, 150.254935907909, -3.50207000857549, 0.450000000023071)
    pt3dadd(-12.0750338244419, 151.251432819688, -3.52820485938576, 0.450000000018889)
    pt3dadd(-12.1544748364448, 152.247929731467, -3.55433971019602, 0.450000000015465)
    pt3dadd(-12.2339158484477, 153.244426643246, -3.58047456100629, 0.450000000012662)
    pt3dadd(-12.3133568604506, 154.240923555025, -3.60660941181655, 0.450000000010367)
    pt3dadd(-12.3927978724535, 155.237420466804, -3.63274426262682, 0.450000000008488)
    pt3dadd(-12.4722388844564, 156.233917378583, -3.65887911343708, 0.450000000006949)
    pt3dadd(-12.5516798964593, 157.230414290362, -3.68501396424735, 0.450000000005689)
    pt3dadd(-12.6311209084622, 158.226911202141, -3.71114881505761, 0.450000000004658)
    pt3dadd(-12.7105619204652, 159.22340811392, -3.73728366586788, 0.450000000003814)
    pt3dadd(-12.7900029324681, 160.219905025699, -3.76341851667814, 0.450000000003122)
    pt3dadd(-12.869443944471, 161.216401937478, -3.78955336748841, 0.450000000002556)
    pt3dadd(-12.9488849564739, 162.212898849257, -3.81568821829867, 0.450000000002093)
    pt3dadd(-13.0283259684768, 163.209395761036, -3.84182306910894, 0.450000000001714)
    pt3dadd(-13.1077669804797, 164.205892672815, -3.8679579199192, 0.450000000001403)
    pt3dadd(-13.1872079924826, 165.202389584594, -3.89409277072947, 0.450000000001149)
    pt3dadd(-13.2666490044855, 166.198886496373, -3.92022762153973, 0.45000000000094)
    pt3dadd(-13.3460900164884, 167.195383408152, -3.94636247235, 0.45000000000077)
    pt3dadd(-13.4255310284913, 168.191880319931, -3.97249732316026, 0.45000000000063)
    pt3dadd(-13.5049720404942, 169.18837723171, -3.99863217397053, 0.450000000000516)
    pt3dadd(-13.5844130524971, 170.184874143489, -4.02476702478079, 0.450000000000423)
    pt3dadd(-13.6638540645, 171.181371055268, -4.05090187559106, 0.450000000000346)
    pt3dadd(-13.7432950765029, 172.177867967047, -4.07703672640132, 0.450000000000283)
    pt3dadd(-13.8227360885059, 173.174364878826, -4.10317157721159, 0.450000000000232)
    pt3dadd(-13.9021771005088, 174.170861790605, -4.12930642802185, 0.45000000000019)
    pt3dadd(-13.9816181125117, 175.167358702384, -4.15544127883212, 0.450000000000155)
    pt3dadd(-14.0610591245146, 176.163855614163, -4.18157612964238, 0.450000000000127)
    pt3dadd(-14.1405001365175, 177.160352525942, -4.20771098045265, 0.450000000000104)
    pt3dadd(-14.2199411485204, 178.156849437721, -4.23384583126291, 0.450000000000085)
    pt3dadd(-14.2993821605233, 179.1533463495, -4.25998068207318, 0.45000000000007)
    pt3dadd(-14.3788231725262, 180.149843261279, -4.28611553288344, 0.450000000000057)
    pt3dadd(-14.4582641845291, 181.146340173058, -4.31225038369371, 0.450000000000047)
    pt3dadd(-14.537705196532, 182.142837084837, -4.33838523450397, 0.450000000000038)
    pt3dadd(-14.6171462085349, 183.139333996616, -4.36452008531424, 0.450000000000031)
    pt3dadd(-14.6965872205378, 184.135830908395, -4.3906549361245, 0.450000000000026)
    pt3dadd(-14.7760282325407, 185.132327820174, -4.41678978693477, 0.450000000000021)
    pt3dadd(-14.8554692445436, 186.128824731953, -4.44292463774503, 0.450000000000017)
    pt3dadd(-14.9349102565466, 187.125321643732, -4.4690594885553, 0.450000000000014)
    pt3dadd(-15.0143512685495, 188.121818555511, -4.49519433936556, 0.450000000000012)
    pt3dadd(-15.0937922805524, 189.11831546729, -4.52132919017583, 0.450000000000009)
    pt3dadd(-15.1732332925553, 190.114812379069, -4.54746404098609, 0.450000000000008)
    pt3dadd(-15.2526743045582, 191.111309290848, -4.57359889179635, 0.450000000000006)
    pt3dadd(-15.3321153165611, 192.107806202627, -4.59973374260662, 0.450000000000005)
    pt3dadd(-15.411556328564, 193.104303114406, -4.62586859341688, 0.450000000000004)
    pt3dadd(-15.4909973405669, 194.100800026185, -4.65200344422715, 0.450000000000004)
    pt3dadd(-15.5704383525698, 195.097296937964, -4.67813829503741, 0.450000000000003)
    pt3dadd(-15.6498793645727, 196.093793849743, -4.70427314584768, 0.450000000000002)
    pt3dadd(-15.7293203765756, 197.090290761522, -4.73040799665794, 0.450000000000002)
    pt3dadd(-15.8087613885785, 198.086787673301, -4.75654284746821, 0.450000000000002)
    pt3dadd(-15.8882024005814, 199.08328458508, -4.78267769827847, 0.450000000000001)
    pt3dadd(-15.9676434125843, 200.079781496859, -4.80881254908874, 0.450000000000001)
    pt3dadd(-16.0470844245873, 201.076278408638, -4.834947399899, 0.450000000000001)
    pt3dadd(-16.1265254365902, 202.072775320417, -4.86108225070927, 0.450000000000001)
    pt3dadd(-16.2059664485931, 203.069272232196, -4.88721710151953, 0.450000000000001)
    pt3dadd(-16.285407460596, 204.065769143975, -4.9133519523298, 0.45)
    pt3dadd(-16.3648484725989, 205.062266055754, -4.93948680314006, 0.45)
    pt3dadd(-16.4442894846018, 206.058762967533, -4.96562165395033, 0.45)
    pt3dadd(-16.5237304966047, 207.055259879312, -4.99175650476059, 0.45)
    pt3dadd(-16.6031715086076, 208.051756791091, -5.01789135557086, 0.45)
    pt3dadd(-16.6826125206105, 209.04825370287, -5.04402620638112, 0.45)
    pt3dadd(-16.7620535326134, 210.044750614649, -5.07016105719139, 0.45)
    pt3dadd(-16.8414945446163, 211.041247526428, -5.09629590800165, 0.45)
    pt3dadd(-16.9209355566192, 212.037744438207, -5.12243075881192, 0.45)
    pt3dadd(-17.0003765686221, 213.034241349986, -5.14856560962218, 0.45)
    pt3dadd(-17.0798175806251, 214.030738261765, -5.17470046043245, 0.45)
    pt3dadd(-17.159258592628, 215.027235173544, -5.20083531124271, 0.45)
    pt3dadd(-17.2386996046309, 216.023732085323, -5.22697016205298, 0.45)
    pt3dadd(-17.3181406166338, 217.020228997102, -5.25310501286324, 0.45)
    pt3dadd(-17.3975816286367, 218.016725908881, -5.27923986367351, 0.45)
    pt3dadd(-17.4770226406396, 219.01322282066, -5.30537471448377, 0.45)
    pt3dadd(-17.5564636526425, 220.009719732439, -5.33150956529404, 0.45)
    pt3dadd(-17.6359046646454, 221.006216644218, -5.3576444161043, 0.45)
    pt3dadd(-17.7153456766483, 222.002713555997, -5.38377926691457, 0.45)
    pt3dadd(-17.7947866886512, 222.999210467776, -5.40991411772483, 0.45)
    pt3dadd(-17.8742277006541, 223.995707379555, -5.4360489685351, 0.45)
    pt3dadd(-17.953668712657, 224.992204291334, -5.46218381934536, 0.45)
    pt3dadd(-18.0331097246599, 225.988701203113, -5.48831867015563, 0.45)
    pt3dadd(-18.1125507366628, 226.985198114892, -5.51445352096589, 0.45)
    pt3dadd(-18.1919917486658, 227.981695026671, -5.54058837177616, 0.45)
    pt3dadd(-18.2714327606687, 228.97819193845, -5.56672322258642, 0.45)
    pt3dadd(-18.3508737726716, 229.974688850229, -5.59285807339668, 0.45)
    pt3dadd(-18.4303147846745, 230.971185762008, -5.61899292420695, 0.45)
    pt3dadd(-18.5097557966774, 231.967682673787, -5.64512777501722, 0.45)
    pt3dadd(-18.5891968086803, 232.964179585566, -5.67126262582748, 0.45)
    pt3dadd(-18.6686378206832, 233.960676497345, -5.69739747663774, 0.45)
    pt3dadd(-18.7480788326861, 234.957173409124, -5.72353232744801, 0.45)
    pt3dadd(-18.827519844689, 235.953670320903, -5.74966717825827, 0.45)
    pt3dadd(-18.9069608566919, 236.950167232682, -5.77580202906854, 0.45)
    pt3dadd(-18.9864018686948, 237.946664144461, -5.8019368798788, 0.45)
    pt3dadd(-19.0658428806977, 238.94316105624, -5.82807173068907, 0.45)
    pt3dadd(-19.1452838927006, 239.939657968019, -5.85420658149933, 0.45)
    pt3dadd(-19.2247249047035, 240.936154879798, -5.8803414323096, 0.45)
    pt3dadd(-19.3041659167064, 241.932651791577, -5.90647628311986, 0.45)
    pt3dadd(-19.3836069287094, 242.929148703356, -5.93261113393013, 0.45)
    pt3dadd(-19.4630479407123, 243.925645615135, -5.95874598474039, 0.45)
    pt3dadd(-19.5424889527152, 244.922142526914, -5.98488083555066, 0.45)
    pt3dadd(-19.6219299647181, 245.918639438693, -6.01101568636092, 0.45)
    pt3dadd(-19.701370976721, 246.915136350472, -6.03715053717119, 0.45)
    pt3dadd(-19.7808119887239, 247.911633262251, -6.06328538798145, 0.45)
    pt3dadd(-19.8602530007268, 248.90813017403, -6.08942023879172, 0.45)
    pt3dadd(-19.9396940127297, 249.904627085809, -6.11555508960198, 0.45)
    pt3dadd(-20.0191350247326, 250.901123997588, -6.14168994041225, 0.45)
    pt3dadd(-20.0985760367355, 251.897620909367, -6.16782479122251, 0.45)
    pt3dadd(-20.1780170487384, 252.894117821146, -6.19395964203278, 0.45)
    pt3dadd(-20.2574580607413, 253.890614732925, -6.22009449284304, 0.45)
    pt3dadd(-20.3368990727442, 254.887111644704, -6.24622934365331, 0.45)
    pt3dadd(-20.4163400847472, 255.883608556483, -6.27236419446357, 0.45)
    pt3dadd(-20.4957810967501, 256.880105468262, -6.29849904527384, 0.45)
    pt3dadd(-20.575222108753, 257.876602380041, -6.3246338960841, 0.45)
    pt3dadd(-20.6546631207559, 258.87309929182, -6.35076874689437, 0.45)
    pt3dadd(-20.7341041327588, 259.869596203599, -6.37690359770463, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-20.8135451447617, 260.866093115378, -6.4030384485149, 0.45)
    pt3dadd(-20.8929861567646, 261.862590027157, -6.42917329932516, 0.45)
    pt3dadd(-20.9724271687675, 262.859086938936, -6.45530815013543, 0.45)
    pt3dadd(-21.0518681807704, 263.855583850715, -6.48144300094569, 0.45)
    pt3dadd(-21.1313091927733, 264.852080762494, -6.50757785175596, 0.45)
    pt3dadd(-21.2107502047762, 265.848577674273, -6.53371270256622, 0.45)
    pt3dadd(-21.2901912167791, 266.845074586052, -6.55984755337649, 0.45)
    pt3dadd(-21.369632228782, 267.841571497831, -6.58598240418675, 0.45)
    pt3dadd(-21.4490732407849, 268.83806840961, -6.61211725499702, 0.45)
    pt3dadd(-21.5285142527879, 269.834565321389, -6.63825210580728, 0.45)
    pt3dadd(-21.6079552647908, 270.831062233168, -6.66438695661755, 0.45)
    pt3dadd(-21.6873962767937, 271.827559144947, -6.69052180742781, 0.45)
    pt3dadd(-21.7668372887966, 272.824056056726, -6.71665665823808, 0.45)
    pt3dadd(-21.8462783007995, 273.820552968505, -6.74279150904834, 0.45)
    pt3dadd(-21.9257193128024, 274.817049880284, -6.7689263598586, 0.45)
    pt3dadd(-22.0051603248053, 275.813546792063, -6.79506121066887, 0.45)
    pt3dadd(-22.0846013368082, 276.810043703842, -6.82119606147914, 0.45)
    pt3dadd(-22.1640423488111, 277.806540615621, -6.8473309122894, 0.45)
    pt3dadd(-22.243483360814, 278.8030375274, -6.87346576309966, 0.45)
    pt3dadd(-22.3229243728169, 279.799534439179, -6.89960061390993, 0.45)
    pt3dadd(-22.4023653848198, 280.796031350958, -6.92573546472019, 0.45)
    pt3dadd(-22.4818063968227, 281.792528262737, -6.95187031553046, 0.45)
    pt3dadd(-22.5612474088256, 282.789025174516, -6.97800516634072, 0.45)
    pt3dadd(-22.6406884208286, 283.785522086295, -7.00414001715099, 0.45)
    pt3dadd(-22.7201294328315, 284.782018998074, -7.03027486796125, 0.45)
    pt3dadd(-22.7995704448344, 285.778515909853, -7.05640971877152, 0.45)
    pt3dadd(-22.8790114568373, 286.775012821632, -7.08254456958178, 0.45)
    pt3dadd(-22.9584524688402, 287.771509733411, -7.10867942039205, 0.45)
    pt3dadd(-23.0378934808431, 288.76800664519, -7.13481427120231, 0.45)
    pt3dadd(-23.117334492846, 289.764503556969, -7.16094912201258, 0.45)
    pt3dadd(-23.1967755048489, 290.761000468748, -7.18708397282284, 0.45)
    pt3dadd(-23.2762165168518, 291.757497380527, -7.21321882363311, 0.45)
    pt3dadd(-23.3556575288547, 292.753994292306, -7.23935367444337, 0.45)
    pt3dadd(-23.4350985408576, 293.750491204085, -7.26548852525364, 0.45)
    pt3dadd(-23.5145395528605, 294.746988115864, -7.2916233760639, 0.45)
    pt3dadd(-23.5939805648634, 295.743485027643, -7.31775822687417, 0.45)
    pt3dadd(-23.6734215768663, 296.739981939422, -7.34389307768443, 0.45)
    pt3dadd(-23.7528625888693, 297.736478851201, -7.3700279284947, 0.45)
    pt3dadd(-23.8323036008722, 298.73297576298, -7.39616277930496, 0.45)
    pt3dadd(-23.9117446128751, 299.729472674759, -7.42229763011523, 0.45)
    pt3dadd(-23.991185624878, 300.725969586538, -7.44843248092549, 0.45)
    pt3dadd(-24.0706266368809, 301.722466498317, -7.47456733173576, 0.45)
    pt3dadd(-24.1500676488838, 302.718963410096, -7.50070218254602, 0.45)
    pt3dadd(-24.2295086608867, 303.715460321875, -7.52683703335629, 0.45)
    pt3dadd(-24.3089496728896, 304.711957233654, -7.55297188416655, 0.45)
    pt3dadd(-24.3883906848925, 305.708454145433, -7.57910673497682, 0.45)
    pt3dadd(-24.4678316968954, 306.704951057212, -7.60524158578708, 0.45)
    pt3dadd(-24.5472727088983, 307.701447968991, -7.63137643659735, 0.45)
    pt3dadd(-24.6267137209012, 308.69794488077, -7.65751128740761, 0.45)
    pt3dadd(-24.7061547329041, 309.694441792549, -7.68364613821788, 0.45)
    pt3dadd(-24.785595744907, 310.690938704328, -7.70978098902814, 0.45)
    pt3dadd(-24.86503675691, 311.687435616107, -7.73591583983841, 0.45)
    pt3dadd(-24.9444777689129, 312.683932527886, -7.76205069064867, 0.45)
    pt3dadd(-25.0239187809158, 313.680429439665, -7.78818554145894, 0.45)
    pt3dadd(-25.1033597929187, 314.676926351444, -7.8143203922692, 0.45)
    pt3dadd(-25.1828008049216, 315.673423263223, -7.84045524307947, 0.45)
    pt3dadd(-25.2622418169245, 316.669920175002, -7.86659009388973, 0.45)
    pt3dadd(-25.3416828289274, 317.666417086781, -7.8927249447, 0.45)
    pt3dadd(-25.4211238409303, 318.66291399856, -7.91885979551026, 0.45)
    pt3dadd(-25.5005648529332, 319.659410910339, -7.94499464632052, 0.45)
    pt3dadd(-25.5800058649361, 320.655907822118, -7.97112949713079, 0.45)
    pt3dadd(-25.659446876939, 321.652404733897, -7.99726434794105, 0.45)
    pt3dadd(-25.7388878889419, 322.648901645676, -8.02339919875132, 0.45)
    pt3dadd(-25.8183289009448, 323.645398557455, -8.04953404956158, 0.45)
    pt3dadd(-25.8977699129477, 324.641895469234, -8.07566890037185, 0.45)
    pt3dadd(-25.9772109249507, 325.638392381013, -8.10180375118211, 0.45)
    pt3dadd(-26.0566519369536, 326.634889292792, -8.12793860199238, 0.45)
    pt3dadd(-26.1360929489565, 327.631386204571, -8.15407345280264, 0.45)
    pt3dadd(-26.2155339609594, 328.62788311635, -8.18020830361291, 0.45)
    pt3dadd(-26.2949749729623, 329.624380028129, -8.20634315442317, 0.45)
    pt3dadd(-26.3744159849652, 330.620876939908, -8.23247800523344, 0.45)
    pt3dadd(-26.4538569969681, 331.617373851687, -8.2586128560437, 0.45)
    pt3dadd(-26.533298008971, 332.613870763466, -8.28474770685397, 0.45)
    pt3dadd(-26.6127390209739, 333.610367675245, -8.31088255766423, 0.45)
    pt3dadd(-26.6921800329768, 334.606864587024, -8.3370174084745, 0.45)
    pt3dadd(-26.7716210449797, 335.603361498803, -8.36315225928476, 0.45)
    pt3dadd(-26.8510620569826, 336.599858410582, -8.38928711009503, 0.45)
    pt3dadd(-26.9305030689855, 337.596355322361, -8.41542196090529, 0.45)
    pt3dadd(-27.0099440809885, 338.59285223414, -8.44155681171556, 0.45)
    pt3dadd(-27.0893850929914, 339.589349145919, -8.46769166252582, 0.45)
    pt3dadd(-27.1688261049943, 340.585846057698, -8.49382651333609, 0.45)
    pt3dadd(-27.2482671169972, 341.582342969477, -8.51996136414635, 0.45)
    pt3dadd(-27.3277081290001, 342.578839881256, -8.54609621495662, 0.45)
    pt3dadd(-27.407149141003, 343.575336793035, -8.57223106576688, 0.45)
    pt3dadd(-27.4865901530059, 344.571833704814, -8.59836591657715, 0.45)
    pt3dadd(-27.5660311650088, 345.568330616593, -8.62450076738741, 0.45)
    pt3dadd(-27.6454721770117, 346.564827528372, -8.65063561819768, 0.45)
    pt3dadd(-27.7249131890146, 347.561324440151, -8.67677046900794, 0.45)
    pt3dadd(-27.8043542010175, 348.55782135193, -8.70290531981821, 0.45)
    pt3dadd(-27.8837952130204, 349.554318263709, -8.72904017062847, 0.45)
    pt3dadd(-27.9632362250233, 350.550815175488, -8.75517502143874, 0.45)
    pt3dadd(-28.0426772370262, 351.547312087267, -8.781309872249, 0.45)
    pt3dadd(-28.1221182490292, 352.543808999046, -8.80744472305927, 0.45)
    pt3dadd(-28.2015592610321, 353.540305910825, -8.83357957386953, 0.45)
    pt3dadd(-28.281000273035, 354.536802822604, -8.8597144246798, 0.45)
    pt3dadd(-28.3604412850379, 355.533299734383, -8.88584927549006, 0.45)
    pt3dadd(-28.4398822970408, 356.529796646162, -8.91198412630033, 0.45)
    pt3dadd(-28.5193233090437, 357.526293557941, -8.93811897711059, 0.45)
    pt3dadd(-28.5987643210466, 358.52279046972, -8.96425382792085, 0.45)
    pt3dadd(-28.6782053330495, 359.519287381499, -8.99038867873112, 0.45)
    pt3dadd(-28.7576463450524, 360.515784293278, -9.01652352954138, 0.45)
    pt3dadd(-28.8370873570553, 361.512281205057, -9.04265838035165, 0.45)
    pt3dadd(-28.9165283690582, 362.508778116836, -9.06879323116191, 0.45)
    pt3dadd(-28.9959693810611, 363.505275028615, -9.09492808197218, 0.45)
    pt3dadd(-29.075410393064, 364.501771940394, -9.12106293278245, 0.45)
    pt3dadd(-29.1548514050669, 365.498268852173, -9.14719778359271, 0.45)
    pt3dadd(-29.2342924170699, 366.494765763952, -9.17333263440297, 0.45)
    pt3dadd(-29.3137334290728, 367.491262675731, -9.19946748521324, 0.45)
    pt3dadd(-29.3931744410757, 368.48775958751, -9.2256023360235, 0.45)
    pt3dadd(-29.4726154530786, 369.484256499289, -9.25173718683377, 0.45)
    pt3dadd(-29.5520564650815, 370.480753411068, -9.27787203764403, 0.45)
    pt3dadd(-29.6314974770844, 371.477250322847, -9.3040068884543, 0.45)
    pt3dadd(-29.7109384890873, 372.473747234626, -9.33014173926456, 0.45)
    pt3dadd(-29.7903795010902, 373.470244146405, -9.35627659007483, 0.45)
    pt3dadd(-29.8698205130931, 374.466741058184, -9.38241144088509, 0.45)
    pt3dadd(-29.949261525096, 375.463237969963, -9.40854629169536, 0.45)
    pt3dadd(-30.0287025370989, 376.459734881742, -9.43468114250562, 0.45)
    pt3dadd(-30.1081435491018, 377.456231793521, -9.46081599331589, 0.45)
    pt3dadd(-30.1875845611047, 378.4527287053, -9.48695084412615, 0.45)
    pt3dadd(-30.2670255731076, 379.449225617079, -9.51308569493642, 0.45)
    pt3dadd(-30.3464665851106, 380.445722528858, -9.53922054574668, 0.45)
    pt3dadd(-30.4259075971135, 381.442219440637, -9.56535539655695, 0.45)
    pt3dadd(-30.5053486091164, 382.438716352416, -9.59149024736721, 0.45)
    pt3dadd(-30.5847896211193, 383.435213264195, -9.61762509817748, 0.45)
    pt3dadd(-30.6642306331222, 384.431710175974, -9.64375994898774, 0.45)
    pt3dadd(-30.7436716451251, 385.428207087753, -9.66989479979801, 0.45)
    pt3dadd(-30.823112657128, 386.424703999532, -9.69602965060827, 0.45)
    pt3dadd(-30.9025536691309, 387.421200911311, -9.72216450141854, 0.45)
    pt3dadd(-30.9819946811338, 388.41769782309, -9.7482993522288, 0.45)
    pt3dadd(-31.0614356931367, 389.414194734869, -9.77443420303907, 0.45)
    pt3dadd(-31.1408767051396, 390.410691646648, -9.80056905384933, 0.45)
    pt3dadd(-31.2203177171425, 391.407188558427, -9.8267039046596, 0.45)
    pt3dadd(-31.2997587291454, 392.403685470206, -9.85283875546986, 0.45)
    pt3dadd(-31.3791997411483, 393.400182381985, -9.87897360628013, 0.45)
    pt3dadd(-31.4586407531513, 394.396679293764, -9.90510845709039, 0.45)
    pt3dadd(-31.5380817651542, 395.393176205543, -9.93124330790066, 0.45)
    pt3dadd(-31.6175227771571, 396.389673117322, -9.95737815871092, 0.45)
    pt3dadd(-31.69696378916, 397.386170029101, -9.98351300952119, 0.45)
    pt3dadd(-31.7764048011629, 398.38266694088, -10.0096478603315, 0.45)
    pt3dadd(-31.8558458131658, 399.379163852659, -10.0357827111417, 0.45)
    pt3dadd(-31.9352868251687, 400.375660764438, -10.061917561952, 0.45)
    pt3dadd(-32.0147278371716, 401.372157676217, -10.0880524127622, 0.45)
    pt3dadd(-32.0941688491745, 402.368654587996, -10.1141872635725, 0.45)
    pt3dadd(-32.1736098611774, 403.365151499775, -10.1403221143828, 0.45)
    pt3dadd(-32.2530508731803, 404.361648411554, -10.166456965193, 0.45)
    pt3dadd(-32.3324918851832, 405.358145323333, -10.1925918160033, 0.45)
    pt3dadd(-32.4119328971861, 406.354642235112, -10.2187266668136, 0.45)
    pt3dadd(-32.4913739091891, 407.351139146891, -10.2448615176238, 0.45)
    pt3dadd(-32.570814921192, 408.34763605867, -10.2709963684341, 0.45)
    pt3dadd(-32.6502559331949, 409.344132970449, -10.2971312192444, 0.45)
    pt3dadd(-32.7296969451978, 410.340629882228, -10.3232660700546, 0.45)
    pt3dadd(-32.8091379572007, 411.337126794007, -10.3494009208649, 0.45)
    pt3dadd(-32.8885789692036, 412.333623705786, -10.3755357716752, 0.45)
    pt3dadd(-32.9680199812065, 413.330120617565, -10.4016706224854, 0.45)
    pt3dadd(-33.0474609932094, 414.326617529344, -10.4278054732957, 0.45)
    pt3dadd(-33.1269020052123, 415.323114441123, -10.453940324106, 0.45)
    pt3dadd(-33.2063430172152, 416.319611352902, -10.4800751749162, 0.45)
    pt3dadd(-33.2857840292181, 417.316108264681, -10.5062100257265, 0.45)
    pt3dadd(-33.365225041221, 418.31260517646, -10.5323448765367, 0.45)
    pt3dadd(-33.4446660532239, 419.309102088239, -10.558479727347, 0.45)
    pt3dadd(-33.5241070652268, 420.305599000018, -10.5846145781573, 0.45)
    pt3dadd(-33.6035480772298, 421.302095911797, -10.6107494289675, 0.45)
    pt3dadd(-33.6829890892327, 422.298592823576, -10.6368842797778, 0.45)
    pt3dadd(-33.7624301012356, 423.295089735355, -10.6630191305881, 0.45)
    pt3dadd(-33.8418711132385, 424.291586647134, -10.6891539813983, 0.45)
    pt3dadd(-33.9213121252414, 425.288083558913, -10.7152888322086, 0.45)
    pt3dadd(-34.0007531372443, 426.284580470692, -10.7414236830189, 0.45)
    pt3dadd(-34.0801941492472, 427.281077382471, -10.7675585338291, 0.45)
    pt3dadd(-34.1596351612501, 428.27757429425, -10.7936933846394, 0.45)
    pt3dadd(-34.239076173253, 429.274071206029, -10.8198282354497, 0.45)
    pt3dadd(-34.3185171852559, 430.270568117808, -10.8459630862599, 0.45)
    pt3dadd(-34.3979581972588, 431.267065029587, -10.8720979370702, 0.45)
    pt3dadd(-34.4773992092617, 432.263561941366, -10.8982327878805, 0.45)
    pt3dadd(-34.5568402212646, 433.260058853145, -10.9243676386907, 0.45)
    pt3dadd(-34.6362812332675, 434.256555764924, -10.950502489501, 0.45)
    pt3dadd(-34.7157222452704, 435.253052676703, -10.9766373403113, 0.45)
    pt3dadd(-34.7951632572734, 436.249549588482, -11.0027721911215, 0.45)
    pt3dadd(-34.8746042692763, 437.246046500261, -11.0289070419318, 0.45)
    pt3dadd(-34.9540452812792, 438.24254341204, -11.055041892742, 0.45)
    pt3dadd(-35.0334862932821, 439.239040323819, -11.0811767435523, 0.45)
    pt3dadd(-35.112927305285, 440.235537235598, -11.1073115943626, 0.45)
    pt3dadd(-35.1923683172879, 441.232034147377, -11.1334464451728, 0.45)
    pt3dadd(-35.2718093292908, 442.228531059156, -11.1595812959831, 0.45)
    pt3dadd(-35.3512503412937, 443.225027970935, -11.1857161467934, 0.45)
    pt3dadd(-35.4306913532966, 444.221524882714, -11.2118509976036, 0.45)
    pt3dadd(-35.5101323652995, 445.218021794493, -11.2379858484139, 0.45)
    pt3dadd(-35.5895733773024, 446.214518706272, -11.2641206992242, 0.45)
    pt3dadd(-35.6690143893053, 447.211015618051, -11.2902555500344, 0.45)
    pt3dadd(-35.7484554013082, 448.20751252983, -11.3163904008447, 0.45)
    pt3dadd(-35.8278964133112, 449.204009441609, -11.342525251655, 0.45)
    pt3dadd(-35.9073374253141, 450.200506353388, -11.3686601024652, 0.45)
    pt3dadd(-35.986778437317, 451.197003265167, -11.3947949532755, 0.45)
    pt3dadd(-36.0662194493199, 452.193500176946, -11.4209298040858, 0.45)
    pt3dadd(-36.1456604613228, 453.189997088725, -11.447064654896, 0.45)
    pt3dadd(-36.2251014733257, 454.186494000504, -11.4731995057063, 0.45)
    pt3dadd(-36.3045424853286, 455.182990912283, -11.4993343565165, 0.45)
    pt3dadd(-36.3839834973315, 456.179487824062, -11.5254692073268, 0.45)
    pt3dadd(-36.4634245093344, 457.175984735841, -11.5516040581371, 0.45)
    pt3dadd(-36.5428655213373, 458.17248164762, -11.5777389089473, 0.45)
    pt3dadd(-36.6223065333402, 459.168978559399, -11.6038737597576, 0.45)
    pt3dadd(-36.7017475453431, 460.165475471178, -11.6300086105679, 0.45)
    pt3dadd(-36.781188557346, 461.161972382957, -11.6561434613781, 0.45)
    pt3dadd(-36.8606295693489, 462.158469294736, -11.6822783121884, 0.45)
    pt3dadd(-36.9400705813519, 463.154966206515, -11.7084131629987, 0.45)
    pt3dadd(-37.0195115933548, 464.151463118294, -11.7345480138089, 0.45)
    pt3dadd(-37.0989526053577, 465.147960030073, -11.7606828646192, 0.45)
    pt3dadd(-37.1783936173606, 466.144456941852, -11.7868177154295, 0.45)
    pt3dadd(-37.2578346293635, 467.14095385363, -11.8129525662397, 0.45)
    pt3dadd(-37.3372756413664, 468.13745076541, -11.83908741705, 0.45)
    pt3dadd(-37.4167166533693, 469.133947677189, -11.8652222678603, 0.45)
    pt3dadd(-37.4961576653722, 470.130444588968, -11.8913571186705, 0.45)
    pt3dadd(-37.5755986773751, 471.126941500747, -11.9174919694808, 0.45)
    pt3dadd(-37.655039689378, 472.123438412526, -11.9436268202911, 0.45)
    pt3dadd(-37.7344807013809, 473.119935324304, -11.9697616711013, 0.45)
    pt3dadd(-37.8139217133838, 474.116432236083, -11.9958965219116, 0.45)
    pt3dadd(-37.8933627253867, 475.112929147863, -12.0220313727218, 0.45)
    pt3dadd(-37.9728037373896, 476.109426059642, -12.0481662235321, 0.45)
    pt3dadd(-38.0522447493926, 477.105922971421, -12.0743010743424, 0.45)
    pt3dadd(-38.1316857613955, 478.1024198832, -12.1004359251526, 0.45)
    pt3dadd(-38.2111267733984, 479.098916794978, -12.1265707759629, 0.45)
    pt3dadd(-38.2905677854013, 480.095413706757, -12.1527056267732, 0.45)
    pt3dadd(-38.3700087974042, 481.091910618536, -12.1788404775834, 0.45)
    pt3dadd(-38.4494498094071, 482.088407530315, -12.2049753283937, 0.45)
    pt3dadd(-38.52889082141, 483.084904442094, -12.231110179204, 0.45)
    pt3dadd(-38.6083318334129, 484.081401353874, -12.2572450300142, 0.45)
    pt3dadd(-38.6877728454158, 485.077898265652, -12.2833798808245, 0.45)
    pt3dadd(-38.7672138574187, 486.074395177431, -12.3095147316348, 0.45)
    pt3dadd(-38.8466548694216, 487.07089208921, -12.335649582445, 0.45)
    pt3dadd(-38.9260958814245, 488.067389000989, -12.3617844332553, 0.45)
    pt3dadd(-39.0055368934274, 489.063885912768, -12.3879192840656, 0.45)
    pt3dadd(-39.0849779054304, 490.060382824547, -12.4140541348758, 0.45)
    pt3dadd(-39.1644189174333, 491.056879736326, -12.4401889856861, 0.45)
    pt3dadd(-39.2438599294362, 492.053376648105, -12.4663238364964, 0.45)
    pt3dadd(-39.3233009414391, 493.049873559884, -12.4924586873066, 0.45)
    pt3dadd(-39.402741953442, 494.046370471663, -12.5185935381169, 0.45)
    pt3dadd(-39.4821829654449, 495.042867383442, -12.5447283889271, 0.45)
    pt3dadd(-39.5616239774478, 496.039364295221, -12.5708632397374, 0.45)
    pt3dadd(-39.6410649894507, 497.035861207, -12.5969980905477, 0.45)
    pt3dadd(-39.7205060014536, 498.032358118779, -12.6231329413579, 0.45)
    pt3dadd(-39.7999470134565, 499.028855030558, -12.6492677921682, 0.45)
    pt3dadd(-39.8793880254594, 500.025351942337, -12.6754026429785, 0.45)
    pt3dadd(-39.9588290374623, 501.021848854116, -12.7015374937887, 0.45)
    pt3dadd(-40.0382700494652, 502.018345765895, -12.727672344599, 0.45)
    pt3dadd(-40.1177110614681, 503.014842677674, -12.7538071954093, 0.45)
    pt3dadd(-40.1971520734711, 504.011339589453, -12.7799420462195, 0.45)
    pt3dadd(-40.276593085474, 505.007836501232, -12.8060768970298, 0.45)
    pt3dadd(-40.3560340974769, 506.004333413011, -12.8322117478401, 0.45)
    pt3dadd(-40.4354751094798, 507.00083032479, -12.8583465986503, 0.45)
    pt3dadd(-40.5149161214827, 507.997327236569, -12.8844814494606, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-40.5943571334856, 508.993824148348, -12.9106163002709, 0.45)
    pt3dadd(-40.6737981454885, 509.990321060127, -12.9367511510811, 0.45)
    pt3dadd(-40.7532391574914, 510.986817971906, -12.9628860018914, 0.45)
    pt3dadd(-40.8326801694943, 511.983314883685, -12.9890208527016, 0.45)
    pt3dadd(-40.9121211814972, 512.979811795464, -13.0151557035119, 0.45)
    pt3dadd(-40.9915621935001, 513.976308707243, -13.0412905543222, 0.45)
    pt3dadd(-41.071003205503, 514.972805619022, -13.0674254051324, 0.45)
    pt3dadd(-41.1504442175059, 515.969302530801, -13.0935602559427, 0.45)
    pt3dadd(-41.2298852295088, 516.96579944258, -13.119695106753, 0.45)
    pt3dadd(-41.3093262415117, 517.962296354359, -13.1458299575632, 0.45)
    pt3dadd(-41.3887672535147, 518.958793266138, -13.1719648083735, 0.45)
    pt3dadd(-41.4682082655176, 519.955290177917, -13.1980996591838, 0.45)
    pt3dadd(-41.5476492775205, 520.951787089696, -13.224234509994, 0.45)
    pt3dadd(-41.6270902895234, 521.948284001475, -13.2503693608043, 0.45)
    pt3dadd(-41.7065313015263, 522.944780913254, -13.2765042116146, 0.45)
    pt3dadd(-41.7859723135292, 523.941277825033, -13.3026390624248, 0.45)
    pt3dadd(-41.8654133255321, 524.937774736812, -13.3287739132351, 0.45)
    pt3dadd(-41.944854337535, 525.934271648591, -13.3549087640454, 0.45)
    pt3dadd(-42.0242953495379, 526.93076856037, -13.3810436148556, 0.45)
    pt3dadd(-42.1037363615408, 527.927265472149, -13.4071784656659, 0.45)
    pt3dadd(-42.1831773735437, 528.923762383928, -13.4333133164762, 0.45)
    pt3dadd(-42.2626183855466, 529.920259295707, -13.4594481672864, 0.45)
    pt3dadd(-42.3420593975495, 530.916756207486, -13.4855830180967, 0.45)
    pt3dadd(-42.4215004095525, 531.913253119265, -13.5117178689069, 0.45)
    pt3dadd(-42.5009414215554, 532.909750031044, -13.5378527197172, 0.45)
    pt3dadd(-42.5803824335583, 533.906246942823, -13.5639875705275, 0.45)
    pt3dadd(-42.6598234455612, 534.902743854602, -13.5901224213377, 0.45)
    pt3dadd(-42.7392644575641, 535.899240766381, -13.616257272148, 0.45)
    pt3dadd(-42.818705469567, 536.89573767816, -13.6423921229583, 0.45)
    pt3dadd(-42.8981464815699, 537.892234589939, -13.6685269737685, 0.45)
    pt3dadd(-42.9775874935728, 538.888731501718, -13.6946618245788, 0.45)
    pt3dadd(-43.0570285055757, 539.885228413497, -13.7207966753891, 0.45)
    pt3dadd(-43.1364695175786, 540.881725325276, -13.7469315261993, 0.45)
    pt3dadd(-43.2159105295815, 541.878222237055, -13.7730663770096, 0.45)
    pt3dadd(-43.2953515415844, 542.874719148834, -13.7992012278199, 0.45)
    pt3dadd(-43.3747925535873, 543.871216060613, -13.8253360786301, 0.45)
    pt3dadd(-43.4542335655902, 544.867712972392, -13.8514709294404, 0.45)
    pt3dadd(-43.5336745775932, 545.864209884171, -13.8776057802507, 0.45)
    pt3dadd(-43.6131155895961, 546.86070679595, -13.9037406310609, 0.45)
    pt3dadd(-43.692556601599, 547.857203707729, -13.9298754818712, 0.45)
    pt3dadd(-43.7719976136019, 548.853700619508, -13.9560103326814, 0.45)
    pt3dadd(-43.8514386256048, 549.850197531287, -13.9821451834917, 0.45)
    pt3dadd(-43.9308796376077, 550.846694443066, -14.008280034302, 0.45)
    pt3dadd(-44.0103206496106, 551.843191354845, -14.0344148851122, 0.45)
    pt3dadd(-44.0897616616135, 552.839688266624, -14.0605497359225, 0.45)
    pt3dadd(-44.1692026736164, 553.836185178403, -14.0866845867328, 0.45)
    pt3dadd(-44.2486436856193, 554.832682090182, -14.112819437543, 0.45)
    pt3dadd(-44.3280846976222, 555.829179001961, -14.1389542883533, 0.45)
    pt3dadd(-44.4075257096251, 556.82567591374, -14.1650891391636, 0.45)
    pt3dadd(-44.486966721628, 557.822172825519, -14.1912239899738, 0.45)
    pt3dadd(-44.5664077336309, 558.818669737298, -14.2173588407841, 0.45)
    pt3dadd(-44.6458487456339, 559.815166649077, -14.2434936915944, 0.45)
    pt3dadd(-44.7252897576368, 560.811663560856, -14.2696285424046, 0.45)
    pt3dadd(-44.8047307696397, 561.808160472635, -14.2957633932149, 0.45)
    pt3dadd(-44.8841717816426, 562.804657384414, -14.3218982440252, 0.45)
    pt3dadd(-44.9636127936455, 563.801154296193, -14.3480330948354, 0.45)
    pt3dadd(-45.0430538056484, 564.797651207972, -14.3741679456457, 0.45)
    pt3dadd(-45.1224948176513, 565.794148119751, -14.400302796456, 0.45)
    pt3dadd(-45.2019358296542, 566.79064503153, -14.4264376472662, 0.45)
    pt3dadd(-45.2813768416571, 567.787141943309, -14.4525724980765, 0.45)
    pt3dadd(-45.36081785366, 568.783638855088, -14.4787073488867, 0.45)
    pt3dadd(-45.4402588656629, 569.780135766867, -14.504842199697, 0.45)
    pt3dadd(-45.5196998776658, 570.776632678646, -14.5309770505073, 0.45)
    pt3dadd(-45.5991408896687, 571.773129590425, -14.5571119013175, 0.45)
    pt3dadd(-45.6785819016716, 572.769626502204, -14.5832467521278, 0.45)
    pt3dadd(-45.7580229136746, 573.766123413983, -14.6093816029381, 0.45)
    pt3dadd(-45.8374639256775, 574.762620325762, -14.6355164537483, 0.45)
    pt3dadd(-45.9169049376804, 575.759117237541, -14.6616513045586, 0.45)
    pt3dadd(-45.9963459496833, 576.75561414932, -14.6877861553689, 0.45)
    pt3dadd(-46.0757869616862, 577.752111061099, -14.7139210061791, 0.45)
    pt3dadd(-46.1552279736891, 578.748607972878, -14.7400558569894, 0.45)
    pt3dadd(-46.234668985692, 579.745104884657, -14.7661907077997, 0.45)
    pt3dadd(-46.3141099976949, 580.741601796436, -14.7923255586099, 0.45)
    pt3dadd(-46.3935510096978, 581.738098708215, -14.8184604094202, 0.45)
    pt3dadd(-46.4729920217007, 582.734595619994, -14.8445952602305, 0.45)
    pt3dadd(-46.5524330337036, 583.731092531773, -14.8707301110407, 0.45)
    pt3dadd(-46.6318740457065, 584.727589443552, -14.896864961851, 0.45)
    pt3dadd(-46.7113150577094, 585.724086355331, -14.9229998126612, 0.45)
    pt3dadd(-46.7907560697124, 586.72058326711, -14.9491346634715, 0.45)
    pt3dadd(-46.8701970817153, 587.717080178889, -14.9752695142818, 0.45)
    pt3dadd(-46.9496380937182, 588.713577090668, -15.001404365092, 0.45)
    pt3dadd(-47.0290791057211, 589.710074002447, -15.0275392159023, 0.45)
    pt3dadd(-47.108520117724, 590.706570914226, -15.0536740667126, 0.45)
    pt3dadd(-47.1879611297269, 591.703067826005, -15.0798089175228, 0.45)
    pt3dadd(-47.2674021417298, 592.699564737784, -15.1059437683331, 0.45)
    pt3dadd(-47.3468431537327, 593.696061649563, -15.1320786191434, 0.45)
    pt3dadd(-47.4262841657356, 594.692558561342, -15.1582134699536, 0.45)
    pt3dadd(-47.5057251777385, 595.689055473121, -15.1843483207639, 0.45)
    pt3dadd(-47.5851661897414, 596.6855523849, -15.2104831715742, 0.45)
    pt3dadd(-47.6646072017443, 597.682049296679, -15.2366180223844, 0.45)
    pt3dadd(-47.7440482137472, 598.678546208458, -15.2627528731947, 0.45)
    pt3dadd(-47.8234892257501, 599.675043120237, -15.288887724005, 0.45)
    pt3dadd(-47.902930237753, 600.671540032016, -15.3150225748152, 0.45)
    pt3dadd(-47.982371249756, 601.668036943795, -15.3411574256255, 0.45)
    pt3dadd(-48.0618122617589, 602.664533855574, -15.3672922764358, 0.45)
    pt3dadd(-48.1412532737618, 603.661030767353, -15.393427127246, 0.45)
    pt3dadd(-48.2206942857647, 604.657527679132, -15.4195619780563, 0.45)
    pt3dadd(-48.3001352977676, 605.654024590911, -15.4456968288665, 0.45)
    pt3dadd(-48.3795763097705, 606.65052150269, -15.4718316796768, 0.45)
    pt3dadd(-48.4590173217734, 607.647018414469, -15.4979665304871, 0.45)
    pt3dadd(-48.5384583337763, 608.643515326248, -15.5241013812973, 0.45)
    pt3dadd(-48.6178993457792, 609.640012238027, -15.5502362321076, 0.45)
    pt3dadd(-48.6973403577821, 610.636509149806, -15.5763710829179, 0.45)
    pt3dadd(-48.776781369785, 611.633006061585, -15.6025059337281, 0.45)
    pt3dadd(-48.8562223817879, 612.629502973364, -15.6286407845384, 0.45)
    pt3dadd(-48.9356633937908, 613.625999885143, -15.6547756353487, 0.45)
    pt3dadd(-49.0151044057938, 614.622496796922, -15.6809104861589, 0.45)
    pt3dadd(-49.0945454177967, 615.618993708701, -15.7070453369692, 0.45)
    pt3dadd(-49.1739864297996, 616.61549062048, -15.7331801877795, 0.45)
    pt3dadd(-49.2534274418025, 617.611987532259, -15.7593150385897, 0.45)
    pt3dadd(-49.3328684538054, 618.608484444038, -15.7854498894, 0.45)
    pt3dadd(-49.4123094658083, 619.604981355817, -15.8115847402103, 0.45)
    pt3dadd(-49.4917504778112, 620.601478267596, -15.8377195910205, 0.45)
    pt3dadd(-49.5711914898141, 621.597975179375, -15.8638544418308, 0.45)
    pt3dadd(-49.650632501817, 622.594472091154, -15.889989292641, 0.45)
    pt3dadd(-49.7300735138199, 623.590969002933, -15.9161241434513, 0.45)
    pt3dadd(-49.8095145258228, 624.587465914712, -15.9422589942616, 0.45)
    pt3dadd(-49.8889555378257, 625.583962826491, -15.9683938450718, 0.45)
    pt3dadd(-49.9683965498286, 626.58045973827, -15.9945286958821, 0.45)
    pt3dadd(-50.0478375618315, 627.576956650049, -16.0206635466924, 0.45)
    pt3dadd(-50.1272785738345, 628.573453561828, -16.0467983975026, 0.45)
    pt3dadd(-50.2067195858374, 629.569950473607, -16.0729332483129, 0.45)
    pt3dadd(-50.2861605978403, 630.566447385386, -16.0990680991232, 0.45)
    pt3dadd(-50.3656016098432, 631.562944297165, -16.1252029499334, 0.45)
    pt3dadd(-50.4450426218461, 632.559441208944, -16.1513378007437, 0.45)
    pt3dadd(-50.524483633849, 633.555938120723, -16.177472651554, 0.45)
    pt3dadd(-50.6039246458519, 634.552435032502, -16.2036075023642, 0.45)
    pt3dadd(-50.6833656578548, 635.548931944281, -16.2297423531745, 0.45)
    pt3dadd(-50.7628066698577, 636.54542885606, -16.2558772039848, 0.45)
    pt3dadd(-50.8422476818606, 637.541925767839, -16.282012054795, 0.45)
    pt3dadd(-50.9216886938635, 638.538422679618, -16.3081469056053, 0.45)
    pt3dadd(-51.0011297058664, 639.534919591397, -16.3342817564156, 0.45)
    pt3dadd(-51.0805707178693, 640.531416503176, -16.3604166072258, 0.45)
    pt3dadd(-51.1600117298722, 641.527913414955, -16.3865514580361, 0.45)
    pt3dadd(-51.2394527418751, 642.524410326734, -16.4126863088463, 0.45)
    pt3dadd(-51.3188937538781, 643.520907238513, -16.4388211596566, 0.45)
    pt3dadd(-51.398334765881, 644.517404150292, -16.4649560104669, 0.45)
    pt3dadd(-51.4777757778839, 645.513901062071, -16.4910908612771, 0.45)
    pt3dadd(-51.5572167898868, 646.51039797385, -16.5172257120874, 0.45)
    pt3dadd(-51.6366578018897, 647.506894885629, -16.5433605628977, 0.45)
    pt3dadd(-51.7160988138926, 648.503391797408, -16.5694954137079, 0.45)
    pt3dadd(-51.7955398258955, 649.499888709187, -16.5956302645182, 0.45)
    pt3dadd(-51.8749808378984, 650.496385620966, -16.6217651153285, 0.45)
    pt3dadd(-51.9544218499013, 651.492882532745, -16.6478999661387, 0.45)
    pt3dadd(-52.0338628619042, 652.489379444524, -16.674034816949, 0.45)
    pt3dadd(-52.1133038739071, 653.485876356303, -16.7001696677593, 0.45)
    pt3dadd(-52.19274488591, 654.482373268082, -16.7263045185695, 0.45)
    pt3dadd(-52.2721858979129, 655.478870179861, -16.7524393693798, 0.45)
    pt3dadd(-52.3516269099159, 656.47536709164, -16.7785742201901, 0.45)
    pt3dadd(-52.4310679219188, 657.471864003419, -16.8047090710003, 0.45)
    pt3dadd(-52.5105089339217, 658.468360915198, -16.8308439218106, 0.45)
    pt3dadd(-52.5899499459246, 659.464857826977, -16.8569787726208, 0.45)
    pt3dadd(-52.6693909579275, 660.461354738756, -16.8831136234311, 0.45)
    pt3dadd(-52.7488319699304, 661.457851650535, -16.9092484742414, 0.45)
    pt3dadd(-52.8282729819333, 662.454348562314, -16.9353833250516, 0.45)
    pt3dadd(-52.9077139939362, 663.450845474093, -16.9615181758619, 0.45)
    pt3dadd(-52.9871550059391, 664.447342385872, -16.9876530266722, 0.45)
    pt3dadd(-53.066596017942, 665.443839297651, -17.0137878774824, 0.45)
    pt3dadd(-53.1460370299449, 666.44033620943, -17.0399227282927, 0.45)
    pt3dadd(-53.2254780419478, 667.436833121209, -17.066057579103, 0.45)
    pt3dadd(-53.3049190539507, 668.433330032988, -17.0921924299132, 0.45)
    pt3dadd(-53.3843600659536, 669.429826944767, -17.1183272807235, 0.45)
    pt3dadd(-53.4638010779566, 670.426323856546, -17.1444621315338, 0.45)
    pt3dadd(-53.5432420899595, 671.422820768325, -17.170596982344, 0.45)
    pt3dadd(-53.6226831019624, 672.419317680104, -17.1967318331543, 0.45)
    pt3dadd(-53.7021241139653, 673.415814591883, -17.2228666839646, 0.45)
    pt3dadd(-53.7815651259682, 674.412311503662, -17.2490015347748, 0.45)
    pt3dadd(-53.8610061379711, 675.408808415441, -17.2751363855851, 0.45)
    pt3dadd(-53.940447149974, 676.40530532722, -17.3012712363954, 0.45)
    pt3dadd(-54.0198881619769, 677.401802238999, -17.3274060872056, 0.45)
    pt3dadd(-54.0993291739798, 678.398299150778, -17.3535409380159, 0.45)
    pt3dadd(-54.1787701859827, 679.394796062557, -17.3796757888261, 0.45)
    pt3dadd(-54.2582111979856, 680.391292974336, -17.4058106396364, 0.45)
    pt3dadd(-54.3376522099885, 681.387789886115, -17.4319454904467, 0.45)
    pt3dadd(-54.4170932219914, 682.384286797894, -17.4580803412569, 0.45)
    pt3dadd(-54.4965342339943, 683.380783709673, -17.4842151920672, 0.45)
    pt3dadd(-54.5759752459973, 684.377280621452, -17.5103500428775, 0.45)
    pt3dadd(-54.6554162580002, 685.373777533231, -17.5364848936877, 0.45)
    pt3dadd(-54.7348572700031, 686.37027444501, -17.562619744498, 0.45)
    pt3dadd(-54.814298282006, 687.366771356789, -17.5887545953083, 0.45)
    pt3dadd(-54.8937392940089, 688.363268268568, -17.6148894461185, 0.45)
    pt3dadd(-54.9731803060118, 689.359765180347, -17.6410242969288, 0.45)
    pt3dadd(-55.0526213180147, 690.356262092126, -17.6671591477391, 0.45)
    pt3dadd(-55.1320623300176, 691.352759003905, -17.6932939985493, 0.45)
    pt3dadd(-55.2115033420205, 692.349255915684, -17.7194288493596, 0.45)
    pt3dadd(-55.2909443540234, 693.345752827463, -17.7455637001699, 0.45)
    pt3dadd(-55.3703853660263, 694.342249739242, -17.7716985509801, 0.45)
    pt3dadd(-55.4498263780292, 695.338746651021, -17.7978334017904, 0.45)
    pt3dadd(-55.5292673900321, 696.3352435628, -17.8239682526007, 0.45)
    pt3dadd(-55.608708402035, 697.331740474579, -17.8501031034109, 0.45)
    pt3dadd(-55.688149414038, 698.328237386358, -17.8762379542212, 0.45)
    pt3dadd(-55.7675904260409, 699.324734298137, -17.9023728050314, 0.45)
    pt3dadd(-55.8470314380438, 700.321231209916, -17.9285076558417, 0.45)
    pt3dadd(-55.9264724500467, 701.317728121695, -17.954642506652, 0.45)
    pt3dadd(-56.0059134620496, 702.314225033474, -17.9807773574622, 0.45)
    pt3dadd(-56.0853544740525, 703.310721945253, -18.0069122082725, 0.45)
    pt3dadd(-56.1647954860554, 704.307218857032, -18.0330470590828, 0.45)
    pt3dadd(-56.2442364980583, 705.303715768811, -18.059181909893, 0.45)
    pt3dadd(-56.3236775100612, 706.30021268059, -18.0853167607033, 0.45)
    pt3dadd(-56.4031185220641, 707.296709592369, -18.1114516115136, 0.45)
    pt3dadd(-56.482559534067, 708.293206504148, -18.1375864623238, 0.45)
    pt3dadd(-56.5620005460699, 709.289703415927, -18.1637213131341, 0.45)
    pt3dadd(-56.6414415580728, 710.286200327706, -18.1898561639444, 0.45)
    pt3dadd(-56.7208825700758, 711.282697239485, -18.2159910147546, 0.45)
    pt3dadd(-56.8003235820787, 712.279194151264, -18.2421258655649, 0.45)
    pt3dadd(-56.8797645940816, 713.275691063043, -18.2682607163752, 0.45)
    pt3dadd(-56.9592056060845, 714.272187974822, -18.2943955671854, 0.45)
    pt3dadd(-57.0386466180874, 715.268684886601, -18.3205304179957, 0.45)
    pt3dadd(-57.1180876300903, 716.26518179838, -18.346665268806, 0.45)
    pt3dadd(-57.1975286420932, 717.261678710159, -18.3728001196162, 0.45)
    pt3dadd(-57.2769696540961, 718.258175621938, -18.3989349704265, 0.45)
    pt3dadd(-57.356410666099, 719.254672533717, -18.4250698212367, 0.45)
    pt3dadd(-57.4358516781019, 720.251169445496, -18.451204672047, 0.45)
    pt3dadd(-57.5152926901048, 721.247666357275, -18.4773395228573, 0.45)
    pt3dadd(-57.5947337021077, 722.244163269054, -18.5034743736675, 0.45)
    pt3dadd(-57.6741747141106, 723.240660180833, -18.5296092244778, 0.45)
    pt3dadd(-57.7536157261135, 724.237157092612, -18.5557440752881, 0.45)
    pt3dadd(-57.8330567381164, 725.233654004391, -18.5818789260983, 0.45)
    pt3dadd(-57.9124977501194, 726.23015091617, -18.6080137769086, 0.45)
    pt3dadd(-57.9919387621223, 727.226647827949, -18.6341486277189, 0.45)
    pt3dadd(-58.0713797741252, 728.223144739728, -18.6602834785291, 0.45)
    pt3dadd(-58.1508207861281, 729.219641651507, -18.6864183293394, 0.45)
    pt3dadd(-58.230261798131, 730.216138563286, -18.7125531801497, 0.45)
    pt3dadd(-58.3097028101339, 731.212635475065, -18.7386880309599, 0.45)
    pt3dadd(-58.3891438221368, 732.209132386844, -18.7648228817702, 0.45)
    pt3dadd(-58.4685848341397, 733.205629298623, -18.7909577325805, 0.45)
    pt3dadd(-58.5480258461426, 734.202126210402, -18.8170925833907, 0.45)
    pt3dadd(-58.6274668581455, 735.198623122181, -18.843227434201, 0.45)
    pt3dadd(-58.7069078701484, 736.19512003396, -18.8693622850112, 0.45)
    pt3dadd(-58.7863488821513, 737.191616945739, -18.8954971358215, 0.45)
    pt3dadd(-58.8657898941542, 738.188113857518, -18.9216319866318, 0.45)
    pt3dadd(-58.9452309061572, 739.184610769297, -18.947766837442, 0.45)
    pt3dadd(-59.0246719181601, 740.181107681076, -18.9739016882523, 0.45)
    pt3dadd(-59.104112930163, 741.177604592855, -19.0000365390626, 0.45)
    pt3dadd(-59.1835539421659, 742.174101504634, -19.0261713898728, 0.45)
    pt3dadd(-59.2629949541688, 743.170598416413, -19.0523062406831, 0.45)
    pt3dadd(-59.3424359661717, 744.167095328192, -19.0784410914934, 0.45)
    pt3dadd(-59.4218769781746, 745.163592239971, -19.1045759423036, 0.45)
    pt3dadd(-59.5013179901775, 746.16008915175, -19.1307107931139, 0.45)
    pt3dadd(-59.5807590021804, 747.156586063529, -19.1568456439242, 0.45)
    pt3dadd(-59.6602000141833, 748.153082975308, -19.1829804947344, 0.45)
    pt3dadd(-59.7396410261862, 749.149579887087, -19.2091153455447, 0.45)
    pt3dadd(-59.8190820381891, 750.146076798866, -19.235250196355, 0.45)
    pt3dadd(-59.898523050192, 751.142573710645, -19.2613850471652, 0.45)
    pt3dadd(-59.9779640621949, 752.139070622424, -19.2875198979755, 0.45)
    pt3dadd(-60.0574050741979, 753.135567534203, -19.3136547487857, 0.45)
    pt3dadd(-60.1368460862008, 754.132064445982, -19.339789599596, 0.45)
    pt3dadd(-60.2162870982037, 755.128561357761, -19.3659244504063, 0.45)
    pt3dadd(-60.2957281102066, 756.12505826954, -19.3920593012165, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-60.3751691222095, 757.121555181319, -19.4181941520268, 0.45)
    pt3dadd(-60.4546101342124, 758.118052093098, -19.4443290028371, 0.45)
    pt3dadd(-60.5340511462153, 759.114549004877, -19.4704638536473, 0.45)
    pt3dadd(-60.6134921582182, 760.111045916656, -19.4965987044576, 0.45)
    pt3dadd(-60.6929331702211, 761.107542828435, -19.5227335552679, 0.45)
    pt3dadd(-60.772374182224, 762.104039740214, -19.5488684060781, 0.45)
    pt3dadd(-60.8518151942269, 763.100536651993, -19.5750032568884, 0.45)
    pt3dadd(-60.9312562062298, 764.097033563772, -19.6011381076987, 0.45)
    pt3dadd(-61.0106972182327, 765.093530475551, -19.6272729585089, 0.45)
    pt3dadd(-61.0901382302356, 766.09002738733, -19.6534078093192, 0.45)
    pt3dadd(-61.1695792422386, 767.086524299109, -19.6795426601295, 0.45)
    pt3dadd(-61.2490202542415, 768.083021210888, -19.7056775109397, 0.45)
    pt3dadd(-61.3284612662444, 769.079518122667, -19.73181236175, 0.45)
    pt3dadd(-61.4079022782473, 770.076015034446, -19.7579472125603, 0.45)
    pt3dadd(-61.4873432902502, 771.072511946225, -19.7840820633705, 0.45)
    pt3dadd(-61.5667843022531, 772.069008858004, -19.8102169141808, 0.45)
    pt3dadd(-61.646225314256, 773.065505769783, -19.836351764991, 0.45)
    pt3dadd(-61.7256663262589, 774.062002681562, -19.8624866158013, 0.45)
    pt3dadd(-61.8051073382618, 775.058499593341, -19.8886214666116, 0.45)
    pt3dadd(-61.8845483502647, 776.05499650512, -19.9147563174218, 0.45)
    pt3dadd(-61.9639893622676, 777.051493416899, -19.9408911682321, 0.45)
    pt3dadd(-62.0434303742705, 778.047990328678, -19.9670260190424, 0.45)
    pt3dadd(-62.1228713862734, 779.044487240457, -19.9931608698526, 0.45)
    pt3dadd(-62.2023123982763, 780.040984152236, -20.0192957206629, 0.45)
    pt3dadd(-62.2817534102793, 781.037481064015, -20.0454305714732, 0.45)
    pt3dadd(-62.3611944222822, 782.033977975794, -20.0715654222834, 0.45)
    pt3dadd(-62.4406354342851, 783.030474887573, -20.0977002730937, 0.45)
    pt3dadd(-62.520076446288, 784.026971799352, -20.123835123904, 0.45)
    pt3dadd(-62.5995174582909, 785.023468711131, -20.1499699747142, 0.45)
    pt3dadd(-62.6789584702938, 786.01996562291, -20.1761048255245, 0.45)
    pt3dadd(-62.7583994822967, 787.016462534689, -20.2022396763348, 0.45)
    pt3dadd(-62.8378404942996, 788.012959446468, -20.228374527145, 0.45)
    pt3dadd(-62.9172815063025, 789.009456358247, -20.2545093779553, 0.45)
    pt3dadd(-62.9967225183054, 790.005953270026, -20.2806442287655, 0.45)
    pt3dadd(-63.0761635303083, 791.002450181805, -20.3067790795758, 0.45)
    pt3dadd(-63.1556045423112, 791.998947093584, -20.3329139303861, 0.45)
    pt3dadd(-63.2350455543141, 792.995444005363, -20.3590487811963, 0.45)
    pt3dadd(-63.3144865663171, 793.991940917142, -20.3851836320066, 0.45)
    pt3dadd(-63.39392757832, 794.988437828921, -20.4113184828169, 0.45)
    pt3dadd(-63.4733685903229, 795.9849347407, -20.4374533336271, 0.45)
    pt3dadd(-63.5528096023258, 796.981431652479, -20.4635881844374, 0.45)
    pt3dadd(-63.6322506143287, 797.977928564258, -20.4897230352477, 0.45)
    pt3dadd(-63.7116916263316, 798.974425476037, -20.5158578860579, 0.45)
    pt3dadd(-63.7911326383345, 799.970922387816, -20.5419927368682, 0.45)
    pt3dadd(-63.8705736503374, 800.967419299595, -20.5681275876785, 0.45)
    pt3dadd(-63.9500146623403, 801.963916211374, -20.5942624384887, 0.45)
    pt3dadd(-64.0294556743432, 802.960413123153, -20.620397289299, 0.45)
    pt3dadd(-64.1088966863461, 803.956910034932, -20.6465321401093, 0.45)
    pt3dadd(-64.188337698349, 804.953406946711, -20.6726669909195, 0.45)
    pt3dadd(-64.2677787103519, 805.94990385849, -20.6988018417298, 0.45)
    pt3dadd(-64.3472197223548, 806.946400770269, -20.7249366925401, 0.45)
    pt3dadd(-64.4266607343577, 807.942897682048, -20.7510715433503, 0.45)
    pt3dadd(-64.5061017463607, 808.939394593827, -20.7772063941606, 0.45)
    pt3dadd(-64.5855427583636, 809.935891505606, -20.8033412449708, 0.45)
    pt3dadd(-64.6649837703665, 810.932388417385, -20.8294760957811, 0.45)
    pt3dadd(-64.7444247823694, 811.928885329164, -20.8556109465914, 0.45)
    pt3dadd(-64.8238657943723, 812.925382240943, -20.8817457974016, 0.45)
    pt3dadd(-64.9033068063752, 813.921879152722, -20.9078806482119, 0.45)
    pt3dadd(-64.9827478183781, 814.918376064501, -20.9340154990222, 0.45)
    pt3dadd(-65.062188830381, 815.91487297628, -20.9601503498324, 0.45)
    pt3dadd(-65.1416298423839, 816.911369888059, -20.9862852006427, 0.45)
    pt3dadd(-65.2210708543868, 817.907866799838, -21.012420051453, 0.45)
    pt3dadd(-65.3005118663897, 818.904363711617, -21.0385549022632, 0.45)
    pt3dadd(-65.3799528783926, 819.900860623396, -21.0646897530735, 0.45)
    pt3dadd(-65.4593938903955, 820.897357535175, -21.0908246038838, 0.45)
    pt3dadd(-65.5388349023984, 821.893854446954, -21.116959454694, 0.45)
    pt3dadd(-65.6182759144014, 822.890351358733, -21.1430943055043, 0.45)
    pt3dadd(-65.6977169264043, 823.886848270512, -21.1692291563146, 0.45)
    pt3dadd(-65.7771579384072, 824.883345182291, -21.1953640071248, 0.45)
    pt3dadd(-65.8565989504101, 825.87984209407, -21.2214988579351, 0.45)
    pt3dadd(-65.936039962413, 826.876339005849, -21.2476337087454, 0.45)
    pt3dadd(-66.0154809744159, 827.872835917628, -21.2737685595556, 0.45)
    pt3dadd(-66.0949219864188, 828.869332829407, -21.2999034103659, 0.45)
    pt3dadd(-66.1743629984217, 829.865829741186, -21.3260382611761, 0.45)
    pt3dadd(-66.2538040104246, 830.862326652965, -21.3521731119864, 0.45)
    pt3dadd(-66.3332450224275, 831.858823564744, -21.3783079627967, 0.45)
    pt3dadd(-66.4126860344304, 832.855320476523, -21.4044428136069, 0.45)
    pt3dadd(-66.4921270464333, 833.851817388302, -21.4305776644172, 0.45)
    pt3dadd(-66.5715680584362, 834.848314300081, -21.4567125152275, 0.45)
    pt3dadd(-66.6510090704391, 835.84481121186, -21.4828473660377, 0.45)
    pt3dadd(-66.730450082442, 836.841308123639, -21.508982216848, 0.45)
    pt3dadd(-66.809891094445, 837.837805035418, -21.5351170676583, 0.45)
    pt3dadd(-66.8893321064479, 838.834301947197, -21.5612519184685, 0.45)
    pt3dadd(-66.9687731184508, 839.830798858976, -21.5873867692788, 0.45)
    pt3dadd(-67.0482141304537, 840.827295770755, -21.6135216200891, 0.45)
    pt3dadd(-67.1276551424566, 841.823792682534, -21.6396564708993, 0.45)
    pt3dadd(-67.2070961544595, 842.820289594313, -21.6657913217096, 0.45)
    pt3dadd(-67.2865371664624, 843.816786506092, -21.6919261725199, 0.45)
    pt3dadd(-67.3659781784653, 844.813283417871, -21.7180610233301, 0.45)
    pt3dadd(-67.4454191904682, 845.80978032965, -21.7441958741404, 0.45)
    pt3dadd(-67.5248602024711, 846.806277241429, -21.7703307249507, 0.45)
    pt3dadd(-67.604301214474, 847.802774153208, -21.7964655757609, 0.45)
    pt3dadd(-67.6837422264769, 848.799271064987, -21.8226004265712, 0.45)
    pt3dadd(-67.7631832384798, 849.795767976766, -21.8487352773814, 0.45)
    pt3dadd(-67.8426242504828, 850.792264888545, -21.8748701281917, 0.45)
    pt3dadd(-67.9220652624857, 851.788761800324, -21.901004979002, 0.45)
    pt3dadd(-68.0015062744886, 852.785258712103, -21.9271398298122, 0.45)
    pt3dadd(-68.0809472864915, 853.781755623882, -21.9532746806225, 0.45)
    pt3dadd(-68.1603882984944, 854.778252535661, -21.9794095314328, 0.45)
    pt3dadd(-68.2398293104973, 855.77474944744, -22.005544382243, 0.45)
    pt3dadd(-68.3192703225002, 856.771246359219, -22.0316792330533, 0.45)
    pt3dadd(-68.3987113345031, 857.767743270998, -22.0578140838636, 0.45)
    pt3dadd(-68.478152346506, 858.764240182777, -22.0839489346738, 0.45)
    pt3dadd(-68.5575933585089, 859.760737094556, -22.1100837854841, 0.45)
    pt3dadd(-68.6370343705118, 860.757234006335, -22.1362186362944, 0.45)
    pt3dadd(-68.7164753825147, 861.753730918114, -22.1623534871046, 0.45)
    pt3dadd(-68.7959163945176, 862.750227829893, -22.1884883379149, 0.45)
    pt3dadd(-68.8753574065206, 863.746724741672, -22.2146231887252, 0.45)
    pt3dadd(-68.9547984185235, 864.743221653451, -22.2407580395354, 0.45)
    pt3dadd(-69.0342394305264, 865.73971856523, -22.2668928903457, 0.45)
    pt3dadd(-69.1136804425293, 866.736215477009, -22.2930277411559, 0.45)
    pt3dadd(-69.1931214545322, 867.732712388788, -22.3191625919662, 0.45)
    pt3dadd(-69.2725624665351, 868.729209300566, -22.3452974427765, 0.45)
    pt3dadd(-69.352003478538, 869.725706212346, -22.3714322935867, 0.45)
    pt3dadd(-69.4314444905409, 870.722203124125, -22.397567144397, 0.45)
    pt3dadd(-69.5108855025438, 871.718700035904, -22.4237019952073, 0.45)
    pt3dadd(-69.5903265145467, 872.715196947683, -22.4498368460175, 0.45)
    pt3dadd(-69.6697675265496, 873.711693859462, -22.4759716968278, 0.45)
    pt3dadd(-69.7492085385525, 874.708190771241, -22.5021065476381, 0.45)
    pt3dadd(-69.8286495505554, 875.70468768302, -22.5282413984483, 0.45)
    pt3dadd(-69.9080905625583, 876.701184594799, -22.5543762492586, 0.45)
    pt3dadd(-69.9875315745612, 877.697681506578, -22.5805111000689, 0.45)
    pt3dadd(-70.0669725865641, 878.694178418357, -22.6066459508791, 0.45)
    pt3dadd(-70.1464135985671, 879.690675330135, -22.6327808016894, 0.45)
    pt3dadd(-70.22585461057, 880.687172241915, -22.6589156524997, 0.45)
    pt3dadd(-70.3052956225729, 881.683669153693, -22.6850505033099, 0.45)
    pt3dadd(-70.3847366345758, 882.680166065473, -22.7111853541202, 0.45)
    pt3dadd(-70.4641776465787, 883.676662977251, -22.7373202049304, 0.45)
    pt3dadd(-70.5436186585816, 884.673159889031, -22.7634550557407, 0.45)
    pt3dadd(-70.6230596705845, 885.669656800809, -22.789589906551, 0.45)
    pt3dadd(-70.7025006825874, 886.666153712589, -22.8157247573612, 0.45)
    pt3dadd(-70.7819416945903, 887.662650624368, -22.8418596081715, 0.45)
    pt3dadd(-70.8613827065932, 888.659147536147, -22.8679944589818, 0.45)
    pt3dadd(-70.9408237185961, 889.655644447926, -22.894129309792, 0.45)
    pt3dadd(-71.020264730599, 890.652141359705, -22.9202641606023, 0.45)
    pt3dadd(-71.0997057426019, 891.648638271484, -22.9463990114126, 0.45)
    pt3dadd(-71.1791467546049, 892.645135183262, -22.9725338622228, 0.45)
    pt3dadd(-71.2585877666078, 893.641632095042, -22.9986687130331, 0.45)
    pt3dadd(-71.3380287786107, 894.63812900682, -23.0248035638434, 0.45)
    pt3dadd(-71.4174697906136, 895.6346259186, -23.0509384146536, 0.45)
    pt3dadd(-71.4969108026165, 896.631122830378, -23.0770732654639, 0.45)
    pt3dadd(-71.5763518146194, 897.627619742158, -23.1032081162742, 0.45)
    pt3dadd(-71.6557928266223, 898.624116653936, -23.1293429670844, 0.45)
    pt3dadd(-71.7352338386252, 899.620613565716, -23.1554778178947, 0.45)
    pt3dadd(-71.8146748506281, 900.617110477494, -23.181612668705, 0.45)
    pt3dadd(-71.894115862631, 901.613607389274, -23.2077475195152, 0.45)
    pt3dadd(-71.9735568746339, 902.610104301053, -23.2338823703255, 0.45)
    pt3dadd(-72.0529978866368, 903.606601212831, -23.2600172211357, 0.45)
    pt3dadd(-72.1324388986397, 904.603098124611, -23.286152071946, 0.45)
    pt3dadd(-72.2118799106427, 905.599595036389, -23.3122869227563, 0.45)
    pt3dadd(-72.2913209226456, 906.596091948169, -23.3384217735665, 0.45)
    pt3dadd(-72.3707619346485, 907.592588859947, -23.3645566243768, 0.45)
    pt3dadd(-72.4502029466514, 908.589085771727, -23.3906914751871, 0.45)
    pt3dadd(-72.5296439586543, 909.585582683505, -23.4168263259973, 0.45)
    pt3dadd(-72.6090849706572, 910.582079595285, -23.4429611768076, 0.45)
    pt3dadd(-72.6885259826601, 911.578576507063, -23.4690960276179, 0.45)
    pt3dadd(-72.767966994663, 912.575073418843, -23.4952308784281, 0.45)
    pt3dadd(-72.8474080066659, 913.571570330621, -23.5213657292384, 0.45)
    pt3dadd(-72.9268490186688, 914.568067242401, -23.5475005800487, 0.45)
    pt3dadd(-73.0062900306717, 915.564564154179, -23.5736354308589, 0.45)
    pt3dadd(-73.0857310426746, 916.561061065958, -23.5997702816692, 0.45)
    pt3dadd(-73.1651720546775, 917.557557977737, -23.6259051324795, 0.45)
    pt3dadd(-73.2446130666804, 918.554054889516, -23.6520399832897, 0.45)
    pt3dadd(-73.3240540786833, 919.550551801296, -23.6781748341, 0.45)
    pt3dadd(-73.4034950906862, 920.547048713074, -23.7043096849103, 0.45)
    pt3dadd(-73.4829361026892, 921.543545624854, -23.7304445357205, 0.45)
    pt3dadd(-73.5623771146921, 922.540042536632, -23.7565793865308, 0.45)
    pt3dadd(-73.641818126695, 923.536539448412, -23.782714237341, 0.45)
    pt3dadd(-73.7212591386979, 924.53303636019, -23.8088490881513, 0.45)
    pt3dadd(-73.8007001507008, 925.52953327197, -23.8349839389616, 0.45)
    pt3dadd(-73.8801411627037, 926.526030183748, -23.8611187897718, 0.45)
    pt3dadd(-73.9595821747066, 927.522527095527, -23.8872536405821, 0.45)
    pt3dadd(-74.0390231867095, 928.519024007306, -23.9133884913924, 0.45)
    pt3dadd(-74.1184641987124, 929.515520919085, -23.9395233422026, 0.45)
    pt3dadd(-74.1979052107153, 930.512017830864, -23.9656581930129, 0.45)
    pt3dadd(-74.2773462227182, 931.508514742643, -23.9917930438232, 0.45)
    pt3dadd(-74.3567872347211, 932.505011654422, -24.0179278946334, 0.45)
    pt3dadd(-74.4362282467241, 933.501508566201, -24.0440627454437, 0.45)
    pt3dadd(-74.515669258727, 934.498005477981, -24.070197596254, 0.45)
    pt3dadd(-74.5951102707299, 935.494502389759, -24.0963324470642, 0.45)
    pt3dadd(-74.6745512827328, 936.490999301539, -24.1224672978745, 0.45)
    pt3dadd(-74.7539922947357, 937.487496213317, -24.1486021486848, 0.45)
    pt3dadd(-74.8334333067386, 938.483993125097, -24.174736999495, 0.45)
    pt3dadd(-74.9128743187415, 939.480490036875, -24.2008718503053, 0.45)
    pt3dadd(-74.9923153307444, 940.476986948654, -24.2270067011155, 0.45)
    pt3dadd(-75.0717563427473, 941.473483860433, -24.2531415519258, 0.45)
    pt3dadd(-75.1511973547502, 942.469980772212, -24.2792764027361, 0.45)
    pt3dadd(-75.2306383667531, 943.466477683991, -24.3054112535463, 0.45)
    pt3dadd(-75.310079378756, 944.46297459577, -24.3315461043566, 0.45)
    pt3dadd(-75.3895203907589, 945.459471507549, -24.3576809551669, 0.45)
    pt3dadd(-75.4689614027618, 946.455968419328, -24.3838158059771, 0.45)
    pt3dadd(-75.5484024147648, 947.452465331107, -24.4099506567874, 0.45)
    pt3dadd(-75.6278434267677, 948.448962242886, -24.4360855075977, 0.45)
    pt3dadd(-75.7072844387706, 949.445459154665, -24.4622203584079, 0.45)
    pt3dadd(-75.7867254507735, 950.441956066444, -24.4883552092182, 0.45)
    pt3dadd(-75.8661664627764, 951.438452978223, -24.5144900600285, 0.45)
    pt3dadd(-75.9456074747793, 952.434949890002, -24.5406249108387, 0.45)
    pt3dadd(-76.0250484867822, 953.431446801781, -24.566759761649, 0.45)
    pt3dadd(-76.1044894987851, 954.42794371356, -24.5928946124593, 0.45)
    pt3dadd(-76.183930510788, 955.424440625339, -24.6190294632695, 0.45)
    pt3dadd(-76.2633715227909, 956.420937537118, -24.6451643140798, 0.45)
    pt3dadd(-76.3428125347938, 957.417434448897, -24.6712991648901, 0.45)
    pt3dadd(-76.4222535467967, 958.413931360676, -24.6974340157003, 0.45)
    pt3dadd(-76.5016945587996, 959.410428272455, -24.7235688665106, 0.45)
    pt3dadd(-76.5811355708025, 960.406925184234, -24.7497037173208, 0.45)
    pt3dadd(-76.6605765828054, 961.403422096013, -24.7758385681311, 0.45)
    pt3dadd(-76.7400175948084, 962.399919007792, -24.8019734189414, 0.45)
    pt3dadd(-76.8194586068113, 963.396415919571, -24.8281082697516, 0.45)
    pt3dadd(-76.8988996188142, 964.39291283135, -24.8542431205619, 0.45)
    pt3dadd(-76.9783406308171, 965.389409743129, -24.8803779713722, 0.45)
    pt3dadd(-77.05778164282, 966.385906654908, -24.9065128221824, 0.45)
    pt3dadd(-77.1372226548229, 967.382403566687, -24.9326476729927, 0.45)
    pt3dadd(-77.2166636668258, 968.378900478466, -24.958782523803, 0.45)
    pt3dadd(-77.2961046788287, 969.375397390245, -24.9849173746132, 0.45)
    pt3dadd(-77.3755456908316, 970.371894302024, -25.0110522254235, 0.45)
    pt3dadd(-77.4549867028345, 971.368391213803, -25.0371870762338, 0.45)
    pt3dadd(-77.5344277148374, 972.364888125582, -25.063321927044, 0.45)
    pt3dadd(-77.6138687268403, 973.361385037361, -25.0894567778543, 0.45)
    pt3dadd(-77.6933097388432, 974.35788194914, -25.1155916286646, 0.45)
    pt3dadd(-77.7727507508462, 975.354378860919, -25.1417264794748, 0.45)
    pt3dadd(-77.8521917628491, 976.350875772698, -25.1678613302851, 0.45)
    pt3dadd(-77.931632774852, 977.347372684477, -25.1939961810953, 0.45)
    pt3dadd(-78.0110737868549, 978.343869596256, -25.2201310319056, 0.45)
    pt3dadd(-78.0905147988578, 979.340366508035, -25.2462658827159, 0.45)
    pt3dadd(-78.1699558108607, 980.336863419814, -25.2724007335261, 0.45)
    pt3dadd(-78.2493968228636, 981.333360331593, -25.2985355843364, 0.45)
    pt3dadd(-78.3288378348665, 982.329857243372, -25.3246704351467, 0.45)
    pt3dadd(-78.4082788468694, 983.326354155151, -25.3508052859569, 0.45)
    pt3dadd(-78.4877198588723, 984.32285106693, -25.3769401367672, 0.45)
    pt3dadd(-78.5671608708752, 985.319347978709, -25.4030749875775, 0.45)
    pt3dadd(-78.6466018828781, 986.315844890488, -25.4292098383877, 0.45)
    pt3dadd(-78.726042894881, 987.312341802267, -25.455344689198, 0.45)
    pt3dadd(-78.805483906884, 988.308838714046, -25.4814795400083, 0.45)
    pt3dadd(-78.8849249188869, 989.305335625825, -25.5076143908185, 0.45)
    pt3dadd(-78.9643659308898, 990.301832537604, -25.5337492416288, 0.45)
    pt3dadd(-79.0438069428927, 991.298329449383, -25.5598840924391, 0.45)
    pt3dadd(-79.1232479548956, 992.294826361162, -25.5860189432493, 0.45)
    pt3dadd(-79.2026889668985, 993.291323272941, -25.6121537940596, 0.45)
    pt3dadd(-79.2821299789014, 994.28782018472, -25.6382886448699, 0.45)
    pt3dadd(-79.3615709909043, 995.284317096499, -25.6644234956801, 0.45)
    pt3dadd(-79.4410120029072, 996.280814008278, -25.6905583464904, 0.45)
    pt3dadd(-79.5204530149101, 997.277310920057, -25.7166931973006, 0.45)
    pt3dadd(-79.599894026913, 998.273807831836, -25.7428280481109, 0.45)
    pt3dadd(-79.6793350389159, 999.270304743615, -25.7689628989212, 0.45)
    pt3dadd(-79.7587760509188, 1000.26680165539, -25.7950977497314, 0.45)
    pt3dadd(-79.8382170629217, 1001.26329856717, -25.8212326005417, 0.45)
    pt3dadd(-79.9176580749246, 1002.25979547895, -25.847367451352, 0.45)
    pt3dadd(-79.9970990869275, 1003.25629239073, -25.8735023021622, 0.45)
    pt3dadd(-80.0765400989305, 1004.25278930251, -25.8996371529725, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-80.1559811109334, 1005.24928621429, -25.9257720037828, 0.45)
    pt3dadd(-80.2354221229363, 1006.24578312607, -25.951906854593, 0.45)
    pt3dadd(-80.3148631349392, 1007.24228003785, -25.9780417054033, 0.45)
    pt3dadd(-80.3943041469421, 1008.23877694963, -26.0041765562136, 0.45)
    pt3dadd(-80.473745158945, 1009.23527386141, -26.0303114070238, 0.45)
    pt3dadd(-80.5531861709479, 1010.23177077318, -26.0564462578341, 0.45)
    pt3dadd(-80.6326271829508, 1011.22826768496, -26.0825811086444, 0.45)
    pt3dadd(-80.7120681949537, 1012.22476459674, -26.1087159594546, 0.45)
    pt3dadd(-80.7915092069566, 1013.22126150852, -26.1348508102649, 0.45)
    pt3dadd(-80.8709502189595, 1014.2177584203, -26.1609856610751, 0.45)
    pt3dadd(-80.9503912309624, 1015.21425533208, -26.1871205118854, 0.45)
    pt3dadd(-81.0298322429653, 1016.21075224386, -26.2132553626957, 0.45)
    pt3dadd(-81.1092732549683, 1017.20724915564, -26.2393902135059, 0.45)
    pt3dadd(-81.1887142669712, 1018.20374606742, -26.2655250643162, 0.45)
    pt3dadd(-81.2681552789741, 1019.2002429792, -26.2916599151265, 0.45)
    pt3dadd(-81.347596290977, 1020.19673989097, -26.3177947659367, 0.45)
    pt3dadd(-81.4270373029799, 1021.19323680275, -26.343929616747, 0.45)
    pt3dadd(-81.5064783149828, 1022.18973371453, -26.3700644675573, 0.45)
    pt3dadd(-81.5859193269857, 1023.18623062631, -26.3961993183675, 0.45)
    pt3dadd(-81.6653603389886, 1024.18272753809, -26.4223341691778, 0.45)
    pt3dadd(-81.7448013509915, 1025.17922444987, -26.4484690199881, 0.45)
    pt3dadd(-81.8242423629944, 1026.17572136165, -26.4746038707983, 0.45)
    pt3dadd(-81.9036833749973, 1027.17221827343, -26.5007387216086, 0.45)
    pt3dadd(-81.9831243870002, 1028.16871518521, -26.5268735724189, 0.45)
    pt3dadd(-82.0625653990031, 1029.16521209699, -26.5530084232291, 0.45)
    pt3dadd(-82.1420064110061, 1030.16170900876, -26.5791432740394, 0.45)
    pt3dadd(-82.221447423009, 1031.15820592054, -26.6052781248497, 0.45)
    pt3dadd(-82.3008884350119, 1032.15470283232, -26.6314129756599, 0.45)
    pt3dadd(-82.3803294470148, 1033.1511997441, -26.6575478264702, 0.45)
    pt3dadd(-82.4597704590177, 1034.14769665588, -26.6836826772804, 0.45)
    pt3dadd(-82.5392114710206, 1035.14419356766, -26.7098175280907, 0.45)
    pt3dadd(-82.6186524830235, 1036.14069047944, -26.735952378901, 0.45)
    pt3dadd(-82.6980934950264, 1037.13718739122, -26.7620872297112, 0.45)
    pt3dadd(-82.7775345070293, 1038.133684303, -26.7882220805215, 0.45)
    pt3dadd(-82.8569755190322, 1039.13018121478, -26.8143569313318, 0.45)
    pt3dadd(-82.9364165310351, 1040.12667812655, -26.840491782142, 0.45)
    pt3dadd(-83.015857543038, 1041.12317503833, -26.8666266329523, 0.45)
    pt3dadd(-83.0952985550409, 1042.11967195011, -26.8927614837626, 0.45)
    pt3dadd(-83.1747395670438, 1043.11616886189, -26.9188963345728, 0.45)
    pt3dadd(-83.2541805790467, 1044.11266577367, -26.9450311853831, 0.45)
    pt3dadd(-83.3336215910496, 1045.10916268545, -26.9711660361934, 0.45)
    pt3dadd(-83.4130626030526, 1046.10565959723, -26.9973008870036, 0.45)
    pt3dadd(-83.4925036150555, 1047.10215650901, -27.0234357378139, 0.45)
    pt3dadd(-83.5719446270584, 1048.09865342079, -27.0495705886242, 0.45)
    pt3dadd(-83.6513856390613, 1049.09515033257, -27.0757054394344, 0.45)
    pt3dadd(-83.7308266510642, 1050.09164724434, -27.1018402902447, 0.45)
    pt3dadd(-83.8102676630671, 1051.08814415612, -27.127975141055, 0.45)
    pt3dadd(-83.88970867507, 1052.0846410679, -27.1541099918652, 0.45)
    pt3dadd(-83.9691496870729, 1053.08113797968, -27.1802448426755, 0.45)
    pt3dadd(-84.0485906990758, 1054.07763489146, -27.2063796934857, 0.45)
    pt3dadd(-84.1280317110787, 1055.07413180324, -27.232514544296, 0.45)
    pt3dadd(-84.2074727230816, 1056.07062871502, -27.2586493951063, 0.45)
    pt3dadd(-84.2869137350845, 1057.0671256268, -27.2847842459165, 0.45)
    pt3dadd(-84.3663547470875, 1058.06362253858, -27.3109190967268, 0.45)
    pt3dadd(-84.4457957590904, 1059.06011945036, -27.3370539475371, 0.45)
    pt3dadd(-84.5252367710933, 1060.05661636213, -27.3631887983473, 0.45)
    pt3dadd(-84.6046777830962, 1061.05311327391, -27.3893236491576, 0.45)
    pt3dadd(-84.6841187950991, 1062.04961018569, -27.4154584999679, 0.45)
    pt3dadd(-84.763559807102, 1063.04610709747, -27.4415933507781, 0.45)
    pt3dadd(-84.8430008191049, 1064.04260400925, -27.4677282015884, 0.45)
    pt3dadd(-84.9224418311078, 1065.03910092103, -27.4938630523987, 0.45)
    pt3dadd(-85.0018828431107, 1066.03559783281, -27.5199979032089, 0.45)
    pt3dadd(-85.0813238551136, 1067.03209474459, -27.5461327540192, 0.45)
    pt3dadd(-85.1607648671165, 1068.02859165637, -27.5722676048295, 0.45)
    pt3dadd(-85.2402058791194, 1069.02508856815, -27.5984024556397, 0.45)
    pt3dadd(-85.3196468911223, 1070.02158547992, -27.62453730645, 0.45)
    pt3dadd(-85.3990879031252, 1071.0180823917, -27.6506721572602, 0.45)
    pt3dadd(-85.4785289151282, 1072.01457930348, -27.6768070080705, 0.45)
    pt3dadd(-85.5579699271311, 1073.01107621526, -27.7029418588808, 0.45)
    pt3dadd(-85.637410939134, 1074.00757312704, -27.729076709691, 0.45)
    pt3dadd(-85.7168519511369, 1075.00407003882, -27.7552115605013, 0.45)
    pt3dadd(-85.7962929631398, 1076.0005669506, -27.7813464113116, 0.45)
    pt3dadd(-85.8757339751427, 1076.99706386238, -27.8074812621218, 0.45)
    pt3dadd(-85.9551749871456, 1077.99356077416, -27.8336161129321, 0.45)
    pt3dadd(-86.0346159991485, 1078.99005768594, -27.8597509637424, 0.45)
    pt3dadd(-86.1140570111514, 1079.98655459771, -27.8858858145526, 0.45)
    pt3dadd(-86.1934980231543, 1080.98305150949, -27.9120206653629, 0.45)
    pt3dadd(-86.2729390351572, 1081.97954842127, -27.9381555161732, 0.45)
    pt3dadd(-86.3523800471601, 1082.97604533305, -27.9642903669834, 0.45)
    pt3dadd(-86.431821059163, 1083.97254224483, -27.9904252177937, 0.45)
    pt3dadd(-86.5112620711659, 1084.96903915661, -28.016560068604, 0.45)
    pt3dadd(-86.5907030831688, 1085.96553606839, -28.0426949194142, 0.45)
    pt3dadd(-86.6701440951718, 1086.96203298017, -28.0688297702245, 0.45)
    pt3dadd(-86.7495851071747, 1087.95852989195, -28.0949646210348, 0.45)
    pt3dadd(-86.8290261191776, 1088.95502680373, -28.121099471845, 0.45)
    pt3dadd(-86.9084671311805, 1089.9515237155, -28.1472343226553, 0.45)
    pt3dadd(-86.9879081431834, 1090.94802062728, -28.1733691734655, 0.45)
    pt3dadd(-87.0673491551863, 1091.94451753906, -28.1995040242758, 0.45)
    pt3dadd(-87.1467901671892, 1092.94101445084, -28.2256388750861, 0.45)
    pt3dadd(-87.2262311791921, 1093.93751136262, -28.2517737258963, 0.45)
    pt3dadd(-87.305672191195, 1094.9340082744, -28.2779085767066, 0.45)
    pt3dadd(-87.3851132031979, 1095.93050518618, -28.3040434275169, 0.45)
    pt3dadd(-87.4645542152008, 1096.92700209796, -28.3301782783271, 0.45)
    pt3dadd(-87.5439952272037, 1097.92349900974, -28.3563131291374, 0.45)
    pt3dadd(-87.6234362392066, 1098.91999592152, -28.3824479799477, 0.45)
    pt3dadd(-87.7028772512096, 1099.91649283329, -28.4085828307579, 0.45)
    pt3dadd(-87.7823182632125, 1100.91298974507, -28.4347176815682, 0.45)
    pt3dadd(-87.8617592752154, 1101.90948665685, -28.4608525323785, 0.45)
    pt3dadd(-87.9412002872183, 1102.90598356863, -28.4869873831887, 0.45)
    pt3dadd(-88.0206412992212, 1103.90248048041, -28.513122233999, 0.45)
    pt3dadd(-88.1000823112241, 1104.89897739219, -28.5392570848093, 0.45)
    pt3dadd(-88.179523323227, 1105.89547430397, -28.5653919356195, 0.45)
    pt3dadd(-88.2589643352299, 1106.89197121575, -28.5915267864298, 0.45)
    pt3dadd(-88.3384053472328, 1107.88846812753, -28.61766163724, 0.45)
    pt3dadd(-88.4178463592357, 1108.8849650393, -28.6437964880503, 0.45)
    pt3dadd(-88.4972873712386, 1109.88146195108, -28.6699313388606, 0.45)
    pt3dadd(-88.5767283832415, 1110.87795886286, -28.6960661896708, 0.45)
    pt3dadd(-88.6561693952444, 1111.87445577464, -28.7222010404811, 0.45)
    pt3dadd(-88.7356104072474, 1112.87095268642, -28.7483358912914, 0.45)
    pt3dadd(-88.8150514192503, 1113.8674495982, -28.7744707421016, 0.45)
    pt3dadd(-88.8944924312532, 1114.86394650998, -28.8006055929119, 0.45)
    pt3dadd(-88.9739334432561, 1115.86044342176, -28.8267404437222, 0.45)
    pt3dadd(-89.053374455259, 1116.85694033354, -28.8528752945324, 0.45)
    pt3dadd(-89.1328154672619, 1117.85343724532, -28.8790101453427, 0.45)
    pt3dadd(-89.2122564792648, 1118.8499341571, -28.905144996153, 0.45)
    pt3dadd(-89.2916974912677, 1119.84643106887, -28.9312798469632, 0.45)
    pt3dadd(-89.3711385032706, 1120.84292798065, -28.9574146977735, 0.45)
    pt3dadd(-89.4505795152735, 1121.83942489243, -28.9835495485838, 0.45)
    pt3dadd(-89.5300205272764, 1122.83592180421, -29.009684399394, 0.45)
    pt3dadd(-89.6094615392793, 1123.83241871599, -29.0358192502043, 0.45)
    pt3dadd(-89.6889025512822, 1124.82891562777, -29.0619541010146, 0.45)
    pt3dadd(-89.7683435632851, 1125.82541253955, -29.0880889518248, 0.45)
    pt3dadd(-89.847784575288, 1126.82190945133, -29.1142238026351, 0.45)
    pt3dadd(-89.9272255872909, 1127.81840636311, -29.1403586534453, 0.45)
    pt3dadd(-90.0066665992939, 1128.81490327489, -29.1664935042556, 0.45)
    pt3dadd(-90.0861076112968, 1129.81140018666, -29.1926283550659, 0.45)
    pt3dadd(-90.1655486232997, 1130.80789709844, -29.2187632058761, 0.45)
    pt3dadd(-90.2449896353026, 1131.80439401022, -29.2448980566864, 0.45)
    pt3dadd(-90.3244306473055, 1132.800890922, -29.2710329074967, 0.45)
    pt3dadd(-90.4038716593084, 1133.79738783378, -29.2971677583069, 0.45)
    pt3dadd(-90.4833126713113, 1134.79388474556, -29.3233026091172, 0.45)
    pt3dadd(-90.5627536833142, 1135.79038165734, -29.3494374599275, 0.45)
    pt3dadd(-90.6421946953171, 1136.78687856912, -29.3755723107377, 0.45)
    pt3dadd(-90.72163570732, 1137.7833754809, -29.401707161548, 0.45)
    pt3dadd(-90.8010767193229, 1138.77987239267, -29.4278420123583, 0.45)
    pt3dadd(-90.8805177313258, 1139.77636930445, -29.4539768631685, 0.45)
    pt3dadd(-90.9599587433287, 1140.77286621623, -29.4801117139788, 0.45)
    pt3dadd(-91.0393997553317, 1141.76936312801, -29.5062465647891, 0.45)
    pt3dadd(-91.1188407673346, 1142.76586003979, -29.5323814155993, 0.45)
    pt3dadd(-91.1982817793375, 1143.76235695157, -29.5585162664096, 0.45)
    pt3dadd(-91.2777227913404, 1144.75885386335, -29.5846511172198, 0.45)
    pt3dadd(-91.3571638033433, 1145.75535077513, -29.6107859680301, 0.45)
    pt3dadd(-91.4366048153462, 1146.75184768691, -29.6369208188404, 0.45)
    pt3dadd(-91.5160458273491, 1147.74834459869, -29.6630556696506, 0.45)
    pt3dadd(-91.595486839352, 1148.74484151047, -29.6891905204609, 0.45)
    pt3dadd(-91.6749278513549, 1149.74133842224, -29.7153253712712, 0.45)
    pt3dadd(-91.7543688633578, 1150.73783533402, -29.7414602220814, 0.45)
    pt3dadd(-91.8338098753607, 1151.7343322458, -29.7675950728917, 0.45)
    pt3dadd(-91.9132508873636, 1152.73082915758, -29.793729923702, 0.45)
    pt3dadd(-91.9926918993665, 1153.72732606936, -29.8198647745122, 0.45)
    pt3dadd(-92.0721329113695, 1154.72382298114, -29.8459996253225, 0.45)
    pt3dadd(-92.1515739233724, 1155.72031989292, -29.8721344761328, 0.45)
    pt3dadd(-92.2310149353753, 1156.7168168047, -29.898269326943, 0.45)
    pt3dadd(-92.3104559473782, 1157.71331371648, -29.9244041777533, 0.45)
    pt3dadd(-92.3898969593811, 1158.70981062825, -29.9505390285636, 0.45)
    pt3dadd(-92.469337971384, 1159.70630754003, -29.9766738793738, 0.45)
    pt3dadd(-92.5487789833869, 1160.70280445181, -30.0028087301841, 0.45)
    pt3dadd(-92.6282199953898, 1161.69930136359, -30.0289435809944, 0.45)
    pt3dadd(-92.7076610073927, 1162.69579827537, -30.0550784318046, 0.45)
    pt3dadd(-92.7871020193956, 1163.69229518715, -30.0812132826149, 0.45)
    pt3dadd(-92.8665430313985, 1164.68879209893, -30.1073481334251, 0.45)
    pt3dadd(-92.9459840434014, 1165.68528901071, -30.1334829842354, 0.45)
    pt3dadd(-93.0254250554043, 1166.68178592249, -30.1596178350457, 0.45)
    pt3dadd(-93.1048660674072, 1167.67828283427, -30.1857526858559, 0.45)
    pt3dadd(-93.1843070794101, 1168.67477974604, -30.2118875366662, 0.45)
    pt3dadd(-93.2637480914131, 1169.67127665782, -30.2380223874765, 0.45)
    pt3dadd(-93.343189103416, 1170.6677735696, -30.2641572382867, 0.45)
    pt3dadd(-93.4226301154189, 1171.66427048138, -30.290292089097, 0.45)
    pt3dadd(-93.5020711274218, 1172.66076739316, -30.3164269399073, 0.45)
    pt3dadd(-93.5815121394247, 1173.65726430494, -30.3425617907175, 0.45)
    pt3dadd(-93.6609531514276, 1174.65376121672, -30.3686966415278, 0.45)
    pt3dadd(-93.7403941634305, 1175.6502581285, -30.3948314923381, 0.45)
    pt3dadd(-93.8198351754334, 1176.64675504028, -30.4209663431483, 0.45)
    pt3dadd(-93.8992761874363, 1177.64325195206, -30.4471011939586, 0.45)
    pt3dadd(-93.9787171994392, 1178.63974886383, -30.4732360447689, 0.45)
    pt3dadd(-94.0581582114421, 1179.63624577561, -30.4993708955791, 0.45)
    pt3dadd(-94.137599223445, 1180.63274268739, -30.5255057463894, 0.45)
    pt3dadd(-94.2170402354479, 1181.62923959917, -30.5516405971997, 0.45)
    pt3dadd(-94.2964812474509, 1182.62573651095, -30.5777754480099, 0.45)
    pt3dadd(-94.3759222594538, 1183.62223342273, -30.6039102988202, 0.45)
    pt3dadd(-94.4553632714567, 1184.61873033451, -30.6300451496304, 0.45)
    pt3dadd(-94.5348042834596, 1185.61522724629, -30.6561800004407, 0.45)
    pt3dadd(-94.6142452954625, 1186.61172415807, -30.682314851251, 0.45)
    pt3dadd(-94.6936863074654, 1187.60822106985, -30.7084497020612, 0.45)
    pt3dadd(-94.7731273194683, 1188.60471798162, -30.7345845528715, 0.45)
    pt3dadd(-94.8525683314712, 1189.6012148934, -30.7607194036818, 0.45)
    pt3dadd(-94.9320093434741, 1190.59771180518, -30.786854254492, 0.45)
    pt3dadd(-95.011450355477, 1191.59420871696, -30.8129891053023, 0.45)
    pt3dadd(-95.0908913674799, 1192.59070562874, -30.8391239561126, 0.45)
    pt3dadd(-95.1703323794828, 1193.58720254052, -30.8652588069228, 0.45)
    pt3dadd(-95.2497733914857, 1194.5836994523, -30.8913936577331, 0.45)
    pt3dadd(-95.3292144034886, 1195.58019636408, -30.9175285085434, 0.45)
    pt3dadd(-95.4086554154916, 1196.57669327586, -30.9436633593536, 0.45)
    pt3dadd(-95.4880964274945, 1197.57319018764, -30.9697982101639, 0.45)
    pt3dadd(-95.5675374394974, 1198.56968709941, -30.9959330609742, 0.45)
    pt3dadd(-95.6469784515003, 1199.56618401119, -31.0220679117844, 0.45)
    pt3dadd(-95.7264194635032, 1200.56268092297, -31.0482027625947, 0.45)
    pt3dadd(-95.8058604755061, 1201.55917783475, -31.0743376134049, 0.45)
    pt3dadd(-95.885301487509, 1202.55567474653, -31.1004724642152, 0.45)
    pt3dadd(-95.9647424995119, 1203.55217165831, -31.1266073150255, 0.45)
    pt3dadd(-96.0441835115148, 1204.54866857009, -31.1527421658357, 0.45)
    pt3dadd(-96.1236245235177, 1205.54516548187, -31.178877016646, 0.45)
    pt3dadd(-96.2030655355206, 1206.54166239365, -31.2050118674563, 0.45)
    pt3dadd(-96.2825065475235, 1207.53815930543, -31.2311467182665, 0.45)
    pt3dadd(-96.3619475595264, 1208.5346562172, -31.2572815690768, 0.45)
    pt3dadd(-96.4413885715293, 1209.53115312898, -31.2834164198871, 0.45)
    pt3dadd(-96.5208295835322, 1210.52765004076, -31.3095512706973, 0.45)
    pt3dadd(-96.6002705955352, 1211.52414695254, -31.3356861215076, 0.45)
    pt3dadd(-96.6797116075381, 1212.52064386432, -31.3618209723179, 0.45)
    pt3dadd(-96.759152619541, 1213.5171407761, -31.3879558231281, 0.45)
    pt3dadd(-96.8385936315439, 1214.51363768788, -31.4140906739384, 0.45)
    pt3dadd(-96.9180346435468, 1215.51013459966, -31.4402255247487, 0.45)
    pt3dadd(-96.9974756555497, 1216.50663151144, -31.4663603755589, 0.45)
    pt3dadd(-97.0769166675526, 1217.50312842322, -31.4924952263692, 0.45)
    pt3dadd(-97.1563576795555, 1218.49962533499, -31.5186300771794, 0.45)
    pt3dadd(-97.2357986915584, 1219.49612224677, -31.5447649279897, 0.45)
    pt3dadd(-97.3152397035613, 1220.49261915855, -31.5708997788, 0.45)
    pt3dadd(-97.3946807155642, 1221.48911607033, -31.5970346296102, 0.45)
    pt3dadd(-97.4741217275671, 1222.48561298211, -31.6231694804205, 0.45)
    pt3dadd(-97.55356273957, 1223.48210989389, -31.6493043312308, 0.45)
    pt3dadd(-97.633003751573, 1224.47860680567, -31.675439182041, 0.45)
    pt3dadd(-97.7124447635759, 1225.47510371745, -31.7015740328513, 0.45)
    pt3dadd(-97.7918857755788, 1226.47160062923, -31.7277088836616, 0.45)
    pt3dadd(-97.8713267875817, 1227.46809754101, -31.7538437344718, 0.45)
    pt3dadd(-97.9507677995846, 1228.46459445278, -31.7799785852821, 0.45)
    pt3dadd(-98.0302088115875, 1229.46109136456, -31.8061134360924, 0.45)
    pt3dadd(-98.1096498235904, 1230.45758827634, -31.8322482869026, 0.45)
    pt3dadd(-98.1890908355933, 1231.45408518812, -31.8583831377129, 0.45)
    pt3dadd(-98.2685318475962, 1232.4505820999, -31.8845179885232, 0.45)
    pt3dadd(-98.3479728595991, 1233.44707901168, -31.9106528393334, 0.45)
    pt3dadd(-98.427413871602, 1234.44357592346, -31.9367876901437, 0.45)
    pt3dadd(-98.5068548836049, 1235.44007283524, -31.962922540954, 0.45)
    pt3dadd(-98.5862958956078, 1236.43656974702, -31.9890573917642, 0.45)
    pt3dadd(-98.6657369076108, 1237.4330666588, -32.0151922425745, 0.45)
    pt3dadd(-98.7451779196137, 1238.42956357057, -32.0413270933848, 0.45)
    pt3dadd(-98.8246189316166, 1239.42606048235, -32.067461944195, 0.45)
    pt3dadd(-98.9040599436195, 1240.42255739413, -32.0935967950053, 0.45)
    pt3dadd(-98.9835009556224, 1241.41905430591, -32.1197316458155, 0.45)
    pt3dadd(-99.0629419676253, 1242.41555121769, -32.1458664966258, 0.45)
    pt3dadd(-99.1423829796282, 1243.41204812947, -32.1720013474361, 0.45)
    pt3dadd(-99.2218239916311, 1244.40854504125, -32.1981361982463, 0.45)
    pt3dadd(-99.301265003634, 1245.40504195303, -32.2242710490566, 0.45)
    pt3dadd(-99.3807060156369, 1246.40153886481, -32.2504058998669, 0.45)
    pt3dadd(-99.4601470276398, 1247.39803577659, -32.2765407506771, 0.45)
    pt3dadd(-99.5395880396427, 1248.39453268836, -32.3026756014874, 0.45)
    pt3dadd(-99.6190290516456, 1249.39102960014, -32.3288104522977, 0.45)
    pt3dadd(-99.6984700636485, 1250.38752651192, -32.3549453031079, 0.45)
    pt3dadd(-99.7779110756514, 1251.3840234237, -32.3810801539182, 0.45)
    pt3dadd(-99.8573520876544, 1252.38052033548, -32.4072150047285, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-99.9367930996573, 1253.37701724726, -32.4333498555387, 0.45)
    pt3dadd(-100.01623411166, 1254.37351415904, -32.459484706349, 0.45)
    pt3dadd(-100.095675123663, 1255.37001107082, -32.4856195571593, 0.45)
    pt3dadd(-100.175116135666, 1256.3665079826, -32.5117544079695, 0.45)
    pt3dadd(-100.254557147669, 1257.36300489438, -32.5378892587798, 0.45)
    pt3dadd(-100.333998159672, 1258.35950180615, -32.56402410959, 0.45)
    pt3dadd(-100.413439171675, 1259.35599871793, -32.5901589604003, 0.45)
    pt3dadd(-100.492880183678, 1260.35249562971, -32.6162938112106, 0.45)
    pt3dadd(-100.572321195681, 1261.34899254149, -32.6424286620208, 0.45)
    pt3dadd(-100.651762207683, 1262.34548945327, -32.6685635128311, 0.45)
    pt3dadd(-100.731203219686, 1263.34198636505, -32.6946983636414, 0.45)
    pt3dadd(-100.810644231689, 1264.33848327683, -32.7208332144516, 0.45)
    pt3dadd(-100.890085243692, 1265.33498018861, -32.7469680652619, 0.45)
    pt3dadd(-100.969526255695, 1266.33147710039, -32.7731029160722, 0.45)
    pt3dadd(-101.048967267698, 1267.32797401217, -32.7992377668824, 0.45)
    pt3dadd(-101.128408279701, 1268.32447092394, -32.8253726176927, 0.45)
    pt3dadd(-101.207849291704, 1269.32096783572, -32.851507468503, 0.45)
    pt3dadd(-101.287290303707, 1270.3174647475, -32.8776423193132, 0.45)
    pt3dadd(-101.36673131571, 1271.31396165928, -32.9037771701235, 0.45)
    pt3dadd(-101.446172327713, 1272.31045857106, -32.9299120209338, 0.45)
    pt3dadd(-101.525613339715, 1273.30695548284, -32.956046871744, 0.45)
    pt3dadd(-101.605054351718, 1274.30345239462, -32.9821817225543, 0.45)
    pt3dadd(-101.684495363721, 1275.2999493064, -33.0083165733645, 0.45)
    pt3dadd(-101.763936375724, 1276.29644621818, -33.0344514241748, 0.45)
    pt3dadd(-101.843377387727, 1277.29294312996, -33.0605862749851, 0.45)
    pt3dadd(-101.92281839973, 1278.28944004173, -33.0867211257953, 0.45)
    pt3dadd(-102.002259411733, 1279.28593695351, -33.1128559766056, 0.45)
    pt3dadd(-102.081700423736, 1280.28243386529, -33.1389908274159, 0.45)
    pt3dadd(-102.161141435739, 1281.27893077707, -33.1651256782261, 0.45)
    pt3dadd(-102.240582447742, 1282.27542768885, -33.1912605290364, 0.45)
    pt3dadd(-102.320023459744, 1283.27192460063, -33.2173953798467, 0.45)
    pt3dadd(-102.399464471747, 1284.26842151241, -33.2435302306569, 0.45)
    pt3dadd(-102.47890548375, 1285.26491842419, -33.2696650814672, 0.45)
    pt3dadd(-102.558346495753, 1286.26141533597, -33.2957999322775, 0.45)
    pt3dadd(-102.637787507756, 1287.25791224775, -33.3219347830877, 0.45)
    pt3dadd(-102.717228519759, 1288.25440915952, -33.348069633898, 0.45)
    pt3dadd(-102.796669531762, 1289.2509060713, -33.3742044847083, 0.45)
    pt3dadd(-102.876110543765, 1290.24740298308, -33.4003393355185, 0.45)
    pt3dadd(-102.955551555768, 1291.24389989486, -33.4264741863288, 0.45)
    pt3dadd(-103.034992567771, 1292.24039680664, -33.4526090371391, 0.45)
    pt3dadd(-103.114433579774, 1293.23689371842, -33.4787438879493, 0.45)
    pt3dadd(-103.193874591776, 1294.2333906302, -33.5048787387596, 0.45)
    pt3dadd(-103.273315603779, 1295.22988754198, -33.5310135895698, 0.45)
    pt3dadd(-103.352756615782, 1296.22638445376, -33.5571484403801, 0.45)
    pt3dadd(-103.432197627785, 1297.22288136554, -33.5832832911904, 0.45)
    pt3dadd(-103.511638639788, 1298.21937827731, -33.6094181420006, 0.45)
    pt3dadd(-103.591079651791, 1299.21587518909, -33.6355529928109, 0.45)
    pt3dadd(-103.670520663794, 1300.21237210087, -33.6616878436212, 0.45)
    pt3dadd(-103.749961675797, 1301.20886901265, -33.6878226944314, 0.45)
    pt3dadd(-103.8294026878, 1302.20536592443, -33.7139575452417, 0.45)
    pt3dadd(-103.908843699803, 1303.20186283621, -33.740092396052, 0.45)
    pt3dadd(-103.988284711806, 1304.19835974799, -33.7662272468622, 0.45)
    pt3dadd(-104.067725723808, 1305.19485665977, -33.7923620976725, 0.45)
    pt3dadd(-104.147166735811, 1306.19135357155, -33.8184969484828, 0.45)
    pt3dadd(-104.226607747814, 1307.18785048333, -33.844631799293, 0.45)
    pt3dadd(-104.306048759817, 1308.1843473951, -33.8707666501033, 0.45)
    pt3dadd(-104.38548977182, 1309.18084430688, -33.8969015009136, 0.45)
    pt3dadd(-104.464930783823, 1310.17734121866, -33.9230363517238, 0.45)
    pt3dadd(-104.544371795826, 1311.17383813044, -33.9491712025341, 0.45)
    pt3dadd(-104.623812807829, 1312.17033504222, -33.9753060533443, 0.45)
    pt3dadd(-104.703253819832, 1313.166831954, -34.0014409041546, 0.45)
    pt3dadd(-104.782694831835, 1314.16332886578, -34.0275757549649, 0.45)
    pt3dadd(-104.862135843838, 1315.15982577756, -34.0537106057751, 0.45)
    pt3dadd(-104.94157685584, 1316.15632268934, -34.0798454565854, 0.45)
    pt3dadd(-105.021017867843, 1317.15281960112, -34.1059803073957, 0.45)
    pt3dadd(-105.100458879846, 1318.14931651289, -34.1321151582059, 0.45)
    pt3dadd(-105.179899891849, 1319.14581342467, -34.1582500090162, 0.45)
    pt3dadd(-105.259340903852, 1320.14231033645, -34.1843848598265, 0.45)
    pt3dadd(-105.338781915855, 1321.13880724823, -34.2105197106367, 0.45)
    pt3dadd(-105.418222927858, 1322.13530416001, -34.236654561447, 0.45)
    pt3dadd(-105.497663939861, 1323.13180107179, -34.2627894122573, 0.45)
    pt3dadd(-105.577104951864, 1324.12829798357, -34.2889242630675, 0.45)
    pt3dadd(-105.656545963867, 1325.12479489535, -34.3150591138778, 0.45)
    pt3dadd(-105.735986975869, 1326.12129180713, -34.3411939646881, 0.45)
    pt3dadd(-105.815427987872, 1327.11778871891, -34.3673288154983, 0.45)
    pt3dadd(-105.894868999875, 1328.11428563068, -34.3934636663086, 0.45)
    pt3dadd(-105.974310011878, 1329.11078254246, -34.4195985171189, 0.45)
    pt3dadd(-106.053751023881, 1330.10727945424, -34.4457333679291, 0.45)
    pt3dadd(-106.133192035884, 1331.10377636602, -34.4718682187394, 0.45)
    pt3dadd(-106.212633047887, 1332.1002732778, -34.4980030695496, 0.45)
    pt3dadd(-106.29207405989, 1333.09677018958, -34.5241379203599, 0.45)
    pt3dadd(-106.371515071893, 1334.09326710136, -34.5502727711702, 0.45)
    pt3dadd(-106.450956083896, 1335.08976401314, -34.5764076219804, 0.45)
    pt3dadd(-106.530397095899, 1336.08626092492, -34.6025424727907, 0.45)
    pt3dadd(-106.609838107901, 1337.0827578367, -34.628677323601, 0.45)
    pt3dadd(-106.689279119904, 1338.07925474847, -34.6548121744112, 0.45)
    pt3dadd(-106.768720131907, 1339.07575166025, -34.6809470252215, 0.45)
    pt3dadd(-106.84816114391, 1340.07224857203, -34.7070818760318, 0.45)
    pt3dadd(-106.927602155913, 1341.06874548381, -34.733216726842, 0.45)
    pt3dadd(-107.007043167916, 1342.06524239559, -34.7593515776523, 0.45)
    pt3dadd(-107.086484179919, 1343.06173930737, -34.7854864284626, 0.45)
    pt3dadd(-107.165925191922, 1344.05823621915, -34.8116212792728, 0.45)
    pt3dadd(-107.245366203925, 1345.05473313093, -34.8377561300831, 0.45)
    pt3dadd(-107.324807215928, 1346.05123004271, -34.8638909808934, 0.45)
    pt3dadd(-107.404248227931, 1347.04772695449, -34.8900258317036, 0.45)
    pt3dadd(-107.483689239933, 1348.04422386626, -34.9161606825139, 0.45)
    pt3dadd(-107.563130251936, 1349.04072077804, -34.9422955333241, 0.45)
    pt3dadd(-107.642571263939, 1350.03721768982, -34.9684303841344, 0.45)
    pt3dadd(-107.722012275942, 1351.0337146016, -34.9945652349447, 0.45)
    pt3dadd(-107.801453287945, 1352.03021151338, -35.0207000857549, 0.45)
    pt3dadd(-107.880894299948, 1353.02670842516, -35.0468349365652, 0.45)
    pt3dadd(-107.960335311951, 1354.02320533694, -35.0729697873755, 0.45)
    pt3dadd(-108.039776323954, 1355.01970224872, -35.0991046381857, 0.45)
    pt3dadd(-108.119217335957, 1356.0161991605, -35.125239488996, 0.45)
    pt3dadd(-108.19865834796, 1357.01269607228, -35.1513743398063, 0.45)
    pt3dadd(-108.278099359963, 1358.00919298405, -35.1775091906165, 0.45)
    pt3dadd(-108.357540371965, 1359.00568989583, -35.2036440414268, 0.45)
    pt3dadd(-108.436981383968, 1360.00218680761, -35.2297788922371, 0.45)
    pt3dadd(-108.516422395971, 1360.99868371939, -35.2559137430473, 0.45)
    pt3dadd(-108.595863407974, 1361.99518063117, -35.2820485938576, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-1.35049720404942, 16.7243497295236, 0, 10.2667572303772)
    pt3dadd(-1.27105619204652, 15.7278528177446, 0.0261348508102649, 10.2667572303772)
    pt3dadd(-1.19161518004361, 14.7313559059656, 0.0522697016205298, 9.58775356515897)
    pt3dadd(-1.1121741680407, 13.7348589941866, 0.0784045524307947, 8.52332145975835)
    pt3dadd(-1.03273315603779, 12.7383620824076, 0.10453940324106, 7.16804037792357)
    pt3dadd(-0.953292144034886, 11.7418651706286, 0.130674254051324, 5.64233299132873)
    pt3dadd(-0.873851132031979, 10.7453682588496, 0.156809104861589, 5.22434606075437)
    pt3dadd(-0.794410120029072, 9.74887134707059, 0.182943955671854, 5.28877040421344)
    pt3dadd(-0.714969108026165, 8.75237443529159, 0.209078806482119, 5.3531947476725)
    pt3dadd(-0.635528096023257, 7.75587752351259, 0.235213657292384, 5.41761909113156)
    pt3dadd(-0.55608708402035, 6.75938061173359, 0.261348508102649, 5.48204343459062)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-0.55608708402035, 6.75938061173359, 0.261348508102649, 5.54646777804968)
    pt3dadd(-0.476646072017443, 5.7628836999546, 0.287483358912914, 5.54646777804968)
    pt3dadd(-0.397205060014536, 4.7663867881756, 0.313618209723179, 5.61089212150875)
    pt3dadd(-0.317764048011629, 3.7698898763966, 0.339753060533444, 5.67531646496781)
    pt3dadd(-0.238323036008722, 2.7733929646176, 0.365887911343708, 5.73974080842687)
    pt3dadd(-0.158882024005814, 1.7768960528386, 0.392022762153973, 5.80416515188593)
    pt3dadd(-0.0794410120029072, 0.780399141059608, 0.418157612964238, 5.868589495345)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-0.0794410120029072, 0.780399141059608, 0.418157612964238, 5.93301383880406)
    pt3dadd(0, -0.21609777071939, 0.444292463774503, 5.93301383880406)
    pt3dadd(0.0794410120029072, -1.21259468249839, 0.470427314584768, 5.99743818226312)
    pt3dadd(0.158882024005815, -2.20909159427739, 0.496562165395033, 6.06186252572218)
    pt3dadd(0.238323036008721, -3.20558850605638, 0.522697016205298, 6.12628686918125)
    pt3dadd(0.317764048011629, -4.20208541783538, 0.548831867015563, 6.19071121264031)
    pt3dadd(0.397205060014536, -5.19858232961437, 0.574966717825828, 6.25513555609937)
    pt3dadd(0.482463536885155, -6.19365641553877, 0.581012220197401, 6.32180208557455)
    pt3dadd(0.601108554370304, -7.1805648770439, 0.471764572920505, 6.40133656289212)
    pt3dadd(0.719753571855454, -8.16747333854902, 0.362516925643608, 6.48087104020968)
    pt3dadd(0.838398589340603, -9.15438180005415, 0.253269278366711, 6.56040551752725)
    pt3dadd(0.957043606825752, -10.1412902615593, 0.144021631089815, 6.63993999484481)
    pt3dadd(1.0756886243109, -11.1281987230644, 0.0347739838129181, 6.71947447216237)
    pt3dadd(1.18963171931778, -12.0137494762639, 0.0702451140770506, 6.58972337198069)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(1.18963171931778, -12.0137494762639, 0.0702451140770506, 6.24255015174625)
    pt3dadd(0.474031691156746, -12.9658032569028, 0.0186629379864024, 6.24255015174625)
    pt3dadd(0.0298010569964062, -13.8613225838972, 0.0452011868547911, 5.8953769315118)
    pt3dadd(-0.414429577163933, -14.7568419108916, 0.0717394357231798, 5.54820371127736)
    pt3dadd(-0.858660211324273, -15.652361237886, 0.0982776845915685, 5.20103049104291)
    pt3dadd(-1.30289084548461, -16.5478805648804, 0.124815933459957, 4.85385727080847)
    pt3dadd(-1.74712147964495, -17.4433998918748, 0.151354182328346, 4.50668405057402)
    pt3dadd(-2.19135211380529, -18.3389192188692, 0.177892431196734, 4.15951083033958)
    pt3dadd(-2.62529266148356, -19.2392370020136, 0.210271023672642, 4.05)
    pt3dadd(-3.0544917104526, -20.1417658330128, 0.245340748212865, 4.05)
    pt3dadd(-3.48369075942165, -21.044294664012, 0.280410472753087, 4.05)
    pt3dadd(-3.91288980839069, -21.9468234950111, 0.31548019729331, 4.05)
    pt3dadd(-4.34208885735973, -22.8493523260103, 0.350549921833533, 4.05)
    pt3dadd(-4.77128790632878, -23.7518811570095, 0.385619646373756, 4.05)
    pt3dadd(-5.20048695529782, -24.6544099880087, 0.420689370913979, 4.05)
    pt3dadd(-5.62968600426687, -25.5569388190078, 0.455759095454201, 4.05)
    pt3dadd(-5.91175516904602, -26.5097219539763, 0.439198559363918, 3.99892060237841)
    pt3dadd(-6.12602739654966, -27.4856620968686, 0.39884697932116, 3.92430399655681)
    pt3dadd(-6.34029962405331, -28.4616022397609, 0.358495399278401, 3.8496873907352)
    pt3dadd(-6.55457185155696, -29.4375423826532, 0.318143819235642, 3.7750707849136)
    pt3dadd(-6.76884407906061, -30.4134825255455, 0.277792239192883, 3.700454179092)
    pt3dadd(-6.98311630656426, -31.3894226684379, 0.237440659150125, 3.6258375732704)
    pt3dadd(-7.33029964507474, -32.3199372642136, 0.182300956393317, 3.6)
    pt3dadd(-7.7478841455083, -33.2263905811861, 0.119328191269912, 3.6)
    pt3dadd(-8.16546864594186, -34.1328438981586, 0.0563554261465062, 3.6)
    pt3dadd(-8.58305314637542, -35.039297215131, -0.00661733897689842, 3.6)
    pt3dadd(-9.00063764680898, -35.9457505321035, -0.0695901041003042, 3.6)
    pt3dadd(-9.41822214724254, -36.8522038490759, -0.132562869223709, 3.6)
    pt3dadd(-9.84628692830335, -37.7464575417144, -0.176625396433878, 3.6)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(-9.84628692830335, -37.7464575417144, -0.176625396433878, 3.6)
    pt3dadd(-10.2385146202859, -38.6386861801481, 0.0670198676521241, 3.6)
    pt3dadd(-10.641996448152, -39.5200897479014, 0.312641864496062, 3.6)
    pt3dadd(-11.0454782760181, -40.4014933156546, 0.55826386134, 3.6)
    pt3dadd(-11.4489601038842, -41.2828968834079, 0.803885858183936, 3.6)
    pt3dadd(-11.8524419317503, -42.1643004511612, 1.04950785502787, 3.6)
    pt3dadd(-12.2559237596165, -43.0457040189145, 1.29512985187181, 3.6)
    pt3dadd(-12.6594055874826, -43.9271075866678, 1.54075184871575, 3.6)
    pt3dadd(-13.0628874153487, -44.808511154421, 1.78637384555969, 3.6)
    pt3dadd(-13.4663692432148, -45.6899147221743, 2.03199584240362, 3.6)
    pt3dadd(-13.8698510710809, -46.5713182899276, 2.27761783924756, 3.6)
    pt3dadd(-14.2726026731947, -47.4622701928636, 2.4408725249218, 3.6)
    pt3dadd(-14.673512402467, -48.3773061810282, 2.39636938639837, 3.6)
    pt3dadd(-15.0744221317393, -49.2923421691928, 2.35186624787494, 3.6)
    pt3dadd(-15.4753318610116, -50.2073781573574, 2.30736310935151, 3.6)
    pt3dadd(-15.8762415902839, -51.122414145522, 2.26285997082808, 3.6)
    pt3dadd(-16.2771513195562, -52.0374501336866, 2.21835683230465, 3.6)
    pt3dadd(-16.6780610488284, -52.9524861218513, 2.17385369378122, 3.6)
    pt3dadd(-17.0789707781007, -53.8675221100159, 2.12935055525779, 3.6)
    pt3dadd(-17.3429668501227, -54.8304299184754, 2.08778425404318, 3.6)
    pt3dadd(-17.5979405835551, -55.7964923849893, 2.04641148458511, 3.6)
    pt3dadd(-17.8529143169875, -56.7625548515032, 2.00503871512705, 3.6)
    pt3dadd(-18.1078880504198, -57.7286173180171, 1.96366594566899, 3.6)
    pt3dadd(-18.3628617838522, -58.694679784531, 1.92229317621092, 3.6)
    pt3dadd(-18.4880087340951, -59.6846103509512, 1.88443764085166, 3.46652613683448)
    pt3dadd(-18.5912461441943, -60.678568892803, 1.8471756731661, 3.31052725308916)
    pt3dadd(-18.6944835542935, -61.6725274346549, 1.80991370548054, 3.15452836934384)
    pt3dadd(-18.7977209643927, -62.6664859765067, 1.77265173779498, 2.99852948559852)
    pt3dadd(-18.9009583744919, -63.6604445183585, 1.73538977010942, 2.84253060185321)
    pt3dadd(-19.0106723836761, -64.6456739818945, 1.66563895473512, 2.7)
    pt3dadd(-19.1889262090696, -65.5385263481922, 1.25206885701377, 2.7)
    pt3dadd(-19.3671800344632, -66.4313787144898, 0.838498759292414, 2.7)
    pt3dadd(-19.5454338598567, -67.3242310807875, 0.424928661571063, 2.7)
    pt3dadd(-19.7236876852503, -68.2170834470851, 0.0113585638497113, 2.7)
    pt3dadd(-19.9019415106438, -69.1099358133828, -0.40221153387164, 2.7)
    pt3dadd(-20.0374214372649, -70.0522739719619, -0.358694007086239, 2.7)
    pt3dadd(-20.1544943505046, -71.0159074921249, -0.11847666424046, 2.7)
    pt3dadd(-20.2715672637443, -71.9795410122878, 0.12174067860532, 2.7)
    pt3dadd(-20.388640176984, -72.9431745324508, 0.361958021451099, 2.7)
    pt3dadd(-20.5057130902238, -73.9068080526138, 0.602175364296879, 2.7)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(-20.5057130902238, -73.9068080526138, 0.602175364296879, 2.59823875125952)
    pt3dadd(-20.7102096919534, -74.6932829354626, 1.16938112061905, 2.59823875125952)
    pt3dadd(-20.9254379866691, -75.4580107136267, 1.77672633255198, 2.48398580263497)
    pt3dadd(-21.1406662813849, -76.2227384917909, 2.3840715444849, 2.36973285401043)
    pt3dadd(-21.3558945761007, -76.9874662699551, 2.99141675641783, 2.25547990538589)
    pt3dadd(-21.47506418638, -77.9692619233673, 2.98475961351067, 2.25)
    pt3dadd(-21.5893944312565, -78.9619932956237, 2.9471694865566, 2.25)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(-21.5893944312565, -78.9619932956237, 2.9471694865566, 2.25)
    pt3dadd(-21.6687800400258, -79.9546023366801, 3.00170982662018, 2.25)
    pt3dadd(-21.7285482968711, -80.947142702985, 3.107970716552, 2.25)
    pt3dadd(-21.7883165537164, -81.9396830692898, 3.21423160648381, 2.25)
    pt3dadd(-21.8480848105618, -82.9322234355947, 3.32049249641563, 2.25)
    pt3dadd(-21.9078530674071, -83.9247638018995, 3.42675338634744, 2.25)
    pt3dadd(-21.9676213242524, -84.9173041682044, 3.53301427627926, 2.25)
    pt3dadd(-22.0273895810977, -85.9098445345092, 3.63927516621108, 2.25)
    pt3dadd(-22.087157837943, -86.9023849008141, 3.74553605614289, 2.25)
    pt3dadd(-22.1469260947883, -87.8949252671189, 3.8517969460747, 2.25)
    pt3dadd(-22.2066943516337, -88.8874656334238, 3.95805783600652, 2.25)
    pt3dadd(-22.266462608479, -89.8800059997286, 4.06431872593834, 2.25)
    pt3dadd(-22.3262308653243, -90.8725463660335, 4.17057961587015, 2.25)
    pt3dadd(-22.3859991221696, -91.8650867323383, 4.27684050580197, 2.25)
    pt3dadd(-22.4243568863515, -92.8627237324712, 4.31502279687983, 2.25)
    pt3dadd(-22.4552229339665, -93.8621440888623, 4.32938379739248, 2.25)
    pt3dadd(-22.4860889815815, -94.8615644452534, 4.34374479790513, 2.25)
    pt3dadd(-22.5169550291965, -95.8609848016444, 4.35810579841778, 2.25)
    pt3dadd(-22.5478210768116, -96.8604051580355, 4.37246679893044, 2.25)
    pt3dadd(-22.5786871244266, -97.8598255144266, 4.38682779944309, 2.25)
    pt3dadd(-22.6095531720416, -98.8592458708177, 4.40118879995574, 2.25)
    pt3dadd(-22.4637491113023, -99.769643291564, 4.62089403636737, 2.25)
    pt3dadd(-22.0970688679581, -100.568742619086, 5.09732437114308, 2.25)
    pt3dadd(-21.7303886246139, -101.367841946609, 5.5737547059188, 2.25)
    pt3dadd(-21.3637083812697, -102.166941274131, 6.05018504069451, 2.25)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-21.3637083812697, -102.166941274131, 6.05018504069451, 2.25)
    pt3dadd(-20.9583809750481, -103.0566692319, 6.15918446419904, 2.25)
    pt3dadd(-20.5444507237299, -103.966571091432, 6.18639389387148, 2.25)
    pt3dadd(-20.1305204724116, -104.876472950964, 6.21360332354392, 2.25)
    pt3dadd(-19.7165902210934, -105.786374810497, 6.24081275321636, 2.25)
    pt3dadd(-19.3026599697752, -106.696276670029, 6.26802218288879, 2.25)
  }
}
proc shape3d_7() {
  adendIML[5] {
    pt3dadd(-18.8887297184569, -107.606178529562, 6.29523161256123, 2.25)
    pt3dadd(-18.4747994671387, -108.516080389094, 6.32244104223367, 2.25)
    pt3dadd(-18.0608692158204, -109.425982248626, 6.34965047190611, 2.25)
    pt3dadd(-17.6469389645022, -110.335884108159, 6.37685990157854, 2.25)
    pt3dadd(-17.2268693838976, -111.231872425121, 6.47691953986975, 2.25)
    pt3dadd(-16.7949005937554, -112.100893601091, 6.71817699583425, 2.25)
    pt3dadd(-16.3629318036132, -112.969914777061, 6.95943445179875, 2.25)
    pt3dadd(-15.9309630134709, -113.838935953031, 7.20069190776325, 2.25)
    pt3dadd(-15.4989942233287, -114.707957129001, 7.44194936372775, 2.25)
    pt3dadd(-15.0670254331865, -115.576978304972, 7.68320681969225, 2.25)
    pt3dadd(-14.6350566430443, -116.445999480942, 7.92446427565676, 2.25)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-14.6350566430443, -116.445999480942, 7.92446427565676, 2.25)
    pt3dadd(-14.2030878529021, -117.315020656912, 8.16572173162126, 2.25)
    pt3dadd(-13.7711190627598, -118.184041832882, 8.40697918758576, 2.25)
    pt3dadd(-13.3391502726176, -119.053063008852, 8.64823664355026, 2.25)
    pt3dadd(-12.8943664484116, -119.911673658312, 8.89903219527501, 2.25)
    pt3dadd(-12.3770906287228, -120.711394113877, 9.20378278069862, 2.25)
    pt3dadd(-11.8598148090341, -121.511114569442, 9.50853336612222, 2.25)
    pt3dadd(-11.3425389893454, -122.310835025007, 9.81328395154583, 2.25)
    pt3dadd(-10.8252631696566, -123.110555480572, 10.1180345369694, 2.25)
    pt3dadd(-10.3079873499679, -123.910275936137, 10.422785122393, 2.25)
    pt3dadd(-9.79071153027914, -124.709996391703, 10.7275357078166, 2.25)
    pt3dadd(-9.2734357105904, -125.509716847268, 11.0322862932403, 2.25)
    pt3dadd(-8.75615989090167, -126.309437302833, 11.3370368786639, 2.25)
    pt3dadd(-8.23888407121293, -127.109157758398, 11.6417874640875, 2.25)
    pt3dadd(-7.72160825152419, -127.908878213963, 11.9465380495111, 2.25)
    pt3dadd(-7.12133808753052, -128.620539993849, 12.303418384577, 2.25)
    pt3dadd(-6.49310179063396, -129.302529141846, 12.6778645853523, 2.25)
    pt3dadd(-5.8648654937374, -129.984518289844, 13.0523107861276, 2.25)
    pt3dadd(-5.23662919684083, -130.666507437842, 13.4267569869029, 2.25)
    pt3dadd(-4.60839289994427, -131.348496585839, 13.8012031876782, 2.25)
    pt3dadd(-3.98015660304771, -132.030485733837, 14.1756493884535, 2.25)
    pt3dadd(-3.35192030615115, -132.712474881835, 14.5500955892287, 2.25)
    pt3dadd(-2.72368400925459, -133.394464029833, 14.924541790004, 2.25)
    pt3dadd(-2.09544771235802, -134.07645317783, 15.2989879907793, 2.25)
    pt3dadd(-1.46721141546146, -134.758442325828, 15.6734341915546, 2.25)
    pt3dadd(-0.8389751185649, -135.440431473826, 16.0478803923299, 2.25)
    pt3dadd(-0.210738821668338, -136.122420621823, 16.4223265931052, 2.25)
    pt3dadd(0.410344373913059, -136.901073204393, 16.4954585552589, 2.25)
    pt3dadd(1.03124139470862, -137.682241659929, 16.5607481688461, 2.25)
    pt3dadd(1.65213841550417, -138.463410115465, 16.6260377824332, 2.25)
    pt3dadd(2.27303543629973, -139.244578571001, 16.6913273960204, 2.25)
    pt3dadd(2.89393245709529, -140.025747026537, 16.7566170096076, 2.25)
    pt3dadd(3.51482947789085, -140.806915482074, 16.8219066231948, 2.25)
    pt3dadd(4.13572649868641, -141.58808393761, 16.887196236782, 2.25)
    pt3dadd(4.75662351948197, -142.369252393146, 16.9524858503692, 2.25)
    pt3dadd(5.37752054027753, -143.150420848682, 17.0177754639564, 2.25)
    pt3dadd(5.99841756107309, -143.931589304218, 17.0830650775435, 2.25)
    pt3dadd(6.61931458186865, -144.712757759755, 17.1483546911307, 2.25)
    pt3dadd(7.2402116026642, -145.493926215291, 17.2136443047179, 2.25)
    pt3dadd(7.94689322919652, -146.101219072247, 17.4449025558324, 2.25)
    pt3dadd(8.75671565856988, -146.499457301302, 17.87570871387, 2.25)
    pt3dadd(9.56653808794324, -146.897695530357, 18.3065148719077, 2.25)
    pt3dadd(10.3763605173166, -147.295933759412, 18.7373210299453, 2.25)
    pt3dadd(11.18618294669, -147.694171988466, 19.168127187983, 2.25)
    pt3dadd(11.8354570456539, -148.232304858852, 19.5762167089786, 2.25)
    pt3dadd(12.0565337417673, -149.143549812917, 19.9237188357729, 2.25)
    pt3dadd(12.2776104378807, -150.054794766982, 20.2712209625671, 2.25)
    pt3dadd(12.4986871339941, -150.966039721047, 20.6187230893614, 2.25)
    pt3dadd(12.7197638301075, -151.877284675112, 20.9662252161557, 2.25)
    pt3dadd(12.940840526221, -152.788529629177, 21.3137273429499, 2.25)
    pt3dadd(13.1619172223344, -153.699774583242, 21.6612294697442, 2.25)
    pt3dadd(13.3829939184478, -154.611019537307, 22.0087315965385, 2.25)
    pt3dadd(13.6040706145612, -155.522264491372, 22.3562337233327, 2.25)
    pt3dadd(13.8251473106746, -156.433509445437, 22.703735850127, 2.25)
    pt3dadd(14.046224006788, -157.344754399502, 23.0512379769213, 2.25)
    pt3dadd(14.2673007029014, -158.255999353567, 23.3987401037155, 2.25)
    pt3dadd(14.4883773990149, -159.167244307632, 23.7462422305098, 2.25)
    pt3dadd(14.7826505105855, -160.105071041098, 23.752775978868, 2.25)
    pt3dadd(15.0971738897356, -161.050251797876, 23.6649785928897, 2.25)
    pt3dadd(15.4116972688856, -161.995432554654, 23.5771812069113, 2.25)
    pt3dadd(15.7262206480357, -162.940613311432, 23.4893838209329, 2.25)
    pt3dadd(16.0407440271858, -163.88579406821, 23.4015864349545, 2.25)
    pt3dadd(16.4712249105262, -164.775571923268, 23.3826005937909, 2.25)
    pt3dadd(17.0251414409021, -165.606373922739, 23.4368639797216, 2.25)
    pt3dadd(17.579057971278, -166.437175922209, 23.4911273656523, 2.25)
    pt3dadd(18.132974501654, -167.267977921679, 23.545390751583, 2.25)
    pt3dadd(18.6868910320299, -168.098779921149, 23.5996541375137, 2.25)
    pt3dadd(19.2408075624059, -168.929581920619, 23.6539175234444, 2.25)
    pt3dadd(19.7947240927818, -169.760383920089, 23.708180909375, 2.25)
    pt3dadd(20.3486406231577, -170.59118591956, 23.7624442953057, 2.25)
    pt3dadd(20.9025571535337, -171.42198791903, 23.8167076812364, 2.25)
    pt3dadd(21.4564736839096, -172.2527899185, 23.8709710671671, 2.25)
    pt3dadd(22.0103902142856, -173.08359191797, 23.9252344530978, 2.25)
    pt3dadd(22.5643067446615, -173.91439391744, 23.9794978390285, 2.25)
    pt3dadd(23.1269462519518, -174.698672188756, 24.1516919421548, 2.25)
    pt3dadd(23.7104873503038, -175.371472469232, 24.6064661379111, 2.25)
    pt3dadd(24.2940284486559, -176.044272749708, 25.0612403336674, 2.25)
    pt3dadd(24.877569547008, -176.717073030183, 25.5160145294237, 2.25)
    pt3dadd(25.4611106453601, -177.389873310659, 25.97078872518, 2.25)
    pt3dadd(26.0446517437122, -178.062673591135, 26.4255629209363, 2.25)
    pt3dadd(26.6281928420642, -178.735473871611, 26.8803371166925, 2.25)
    pt3dadd(27.2117339404163, -179.408274152086, 27.3351113124489, 2.25)
    pt3dadd(27.7952750387684, -180.081074432562, 27.7898855082051, 2.25)
    pt3dadd(28.1234981943673, -180.976990978373, 27.8908104074159, 2.25)
    pt3dadd(28.3672977127647, -181.946683328717, 27.8747312123845, 2.25)
    pt3dadd(28.611097231162, -182.916375679062, 27.8586520173531, 2.25)
    pt3dadd(28.8548967495594, -183.886068029406, 27.8425728223217, 2.25)
    pt3dadd(29.0986962679568, -184.855760379751, 27.8264936272903, 2.25)
    pt3dadd(29.3424957863541, -185.825452730095, 27.8104144322589, 2.25)
    pt3dadd(29.5862953047515, -186.795145080439, 27.7943352372275, 2.25)
    pt3dadd(29.8300948231488, -187.764837430784, 27.7782560421961, 2.25)
    pt3dadd(30.0738943415462, -188.734529781128, 27.7621768471647, 2.25)
    pt3dadd(30.3176938599435, -189.704222131472, 27.7460976521333, 2.25)
    pt3dadd(30.7116471083192, -190.566473944245, 27.9191022826482, 2.25)
    pt3dadd(31.2590858726385, -191.318901203578, 28.2853863510084, 2.25)
    pt3dadd(31.8065246369579, -192.07132846291, 28.6516704193686, 2.25)
    pt3dadd(32.3539634012773, -192.823755722242, 29.0179544877289, 2.25)
    pt3dadd(32.9014021655966, -193.576182981574, 29.3842385560891, 2.25)
    pt3dadd(33.448840929916, -194.328610240906, 29.7505226244494, 2.25)
    pt3dadd(33.9962796942354, -195.081037500238, 30.1168066928096, 2.25)
    pt3dadd(34.6130155177869, -195.634445365771, 30.4250958499114, 2.25)
    pt3dadd(35.5464480525516, -195.278308321578, 30.4683406044637, 2.25)
    pt3dadd(36.2818167720425, -195.218737944294, 30.5094647632453, 2.25)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(36.2818167720425, -195.218737944294, 30.5094647632453, 2.25)
    pt3dadd(35.7204835614101, -196.156518532621, 30.7513989568559, 2.25)
    pt3dadd(35.3217763271509, -197.051982616209, 30.9493297941529, 2.25)
    pt3dadd(34.9230690928918, -197.947446699797, 31.1472606314498, 2.25)
    pt3dadd(34.5243618586327, -198.842910783385, 31.3451914687467, 2.25)
    pt3dadd(34.1256546243735, -199.738374866974, 31.5431223060437, 2.25)
    pt3dadd(33.7269473901144, -200.633838950562, 31.7410531433406, 2.25)
    pt3dadd(33.3282401558553, -201.52930303415, 31.9389839806375, 2.25)
    pt3dadd(32.9295329215962, -202.424767117738, 32.1369148179345, 2.25)
    pt3dadd(32.530825687337, -203.320231201326, 32.3348456552314, 2.25)
    pt3dadd(32.1461296819476, -204.218296658727, 32.5357376988367, 2.25)
    pt3dadd(32.1007054305145, -205.179352497949, 32.8083332073848, 2.25)
    pt3dadd(32.0552811790814, -206.14040833717, 33.0809287159328, 2.25)
    pt3dadd(32.0098569276483, -207.101464176391, 33.3535242244809, 2.25)
    pt3dadd(31.9644326762153, -208.062520015612, 33.6261197330289, 2.25)
    pt3dadd(31.9190084247822, -209.023575854834, 33.898715241577, 2.25)
    pt3dadd(31.8735841733491, -209.984631694055, 34.171310750125, 2.25)
    pt3dadd(31.828159921916, -210.945687533276, 34.4439062586731, 2.25)
    pt3dadd(31.7827356704829, -211.906743372497, 34.7165017672211, 2.25)
    pt3dadd(31.7373114190498, -212.867799211718, 34.9890972757692, 2.25)
    pt3dadd(31.6918871676168, -213.82885505094, 35.2616927843173, 2.25)
    pt3dadd(31.6464629161837, -214.789910890161, 35.5342882928653, 2.25)
    pt3dadd(31.6010386647506, -215.750966729382, 35.8068838014134, 2.25)
    pt3dadd(31.4546121146384, -216.70511500773, 35.9755913605499, 2.25)
    pt3dadd(31.1176323812476, -217.646231328089, 35.9483016035506, 2.25)
    pt3dadd(30.7806526478567, -218.587347648448, 35.9210118465513, 2.25)
    pt3dadd(30.4436729144659, -219.528463968808, 35.893722089552, 2.25)
    pt3dadd(30.106693181075, -220.469580289167, 35.8664323325527, 2.25)
    pt3dadd(29.7697134476842, -221.410696609527, 35.8391425755534, 2.25)
    pt3dadd(29.4327337142934, -222.351812929886, 35.8118528185541, 2.25)
    pt3dadd(29.0957539809025, -223.292929250245, 35.7845630615547, 2.25)
    pt3dadd(28.7587742475117, -224.234045570605, 35.7572733045554, 2.25)
    pt3dadd(28.4217945141208, -225.175161890964, 35.7299835475561, 2.25)
    pt3dadd(28.08481478073, -226.116278211323, 35.7026937905568, 2.25)
    pt3dadd(27.751591533126, -227.057277520068, 35.6896804309472, 2.25)
    pt3dadd(27.4754759460407, -227.996497969543, 35.8937028068191, 2.25)
    pt3dadd(27.1993603589555, -228.935718419018, 36.097725182691, 2.25)
    pt3dadd(26.9232447718702, -229.874938868493, 36.301747558563, 2.25)
    pt3dadd(26.647129184785, -230.814159317968, 36.5057699344349, 2.25)
    pt3dadd(26.3710135976997, -231.753379767443, 36.7097923103068, 2.25)
    pt3dadd(26.0948980106145, -232.692600216919, 36.9138146861787, 2.25)
    pt3dadd(25.8187824235292, -233.631820666394, 37.1178370620506, 2.25)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(25.8187824235292, -233.631820666394, 37.1178370620506, 2.25)
    pt3dadd(25.542666836444, -234.571041115869, 37.3218594379225, 2.25)
    pt3dadd(25.2665512493588, -235.510261565344, 37.5258818137944, 2.25)
    pt3dadd(24.9904356622735, -236.449482014819, 37.7299041896663, 2.25)
    pt3dadd(24.7143200751883, -237.388702464294, 37.9339265655382, 2.25)
    pt3dadd(24.438204488103, -238.327922913769, 38.1379489414101, 2.25)
    pt3dadd(24.1620889010178, -239.267143363244, 38.341971317282, 2.25)
    pt3dadd(23.8859733139325, -240.206363812719, 38.5459936931539, 2.25)
    pt3dadd(23.6335302246446, -241.154940542639, 38.7196601080698, 2.25)
    pt3dadd(23.4763352897519, -242.141163001879, 38.7711869295763, 2.25)
    pt3dadd(23.3191403548593, -243.127385461119, 38.8227137510828, 2.25)
    pt3dadd(23.1619454199666, -244.11360792036, 38.8742405725892, 2.25)
    pt3dadd(23.0047504850739, -245.0998303796, 38.9257673940957, 2.25)
    pt3dadd(22.8475555501812, -246.08605283884, 38.9772942156021, 2.25)
    pt3dadd(22.6903606152886, -247.07227529808, 39.0288210371086, 2.25)
    pt3dadd(22.5331656803959, -248.05849775732, 39.0803478586151, 2.25)
    pt3dadd(22.3759707455032, -249.04472021656, 39.1318746801215, 2.25)
    pt3dadd(22.2187758106105, -250.0309426758, 39.183401501628, 2.25)
    pt3dadd(22.0615808757178, -251.01716513504, 39.2349283231344, 2.25)
    pt3dadd(21.9043859408252, -252.00338759428, 39.2864551446409, 2.25)
    pt3dadd(21.7471910059325, -252.98961005352, 39.3379819661474, 2.25)
    pt3dadd(21.5899960710398, -253.97583251276, 39.3895087876538, 2.25)
    pt3dadd(21.4309661720133, -254.960895857118, 39.4532720220328, 2.25)
    pt3dadd(21.2684437587858, -255.943753041086, 39.5403250008484, 2.25)
    pt3dadd(21.1059213455584, -256.926610225054, 39.627377979664, 2.25)
    pt3dadd(20.9433989323309, -257.909467409023, 39.7144309584796, 2.25)
    pt3dadd(20.7808765191034, -258.892324592991, 39.8014839372953, 2.25)
    pt3dadd(20.6183541058759, -259.875181776959, 39.8885369161109, 2.25)
    pt3dadd(20.4558316926484, -260.858038960927, 39.9755898949265, 2.25)
    pt3dadd(20.2933092794209, -261.840896144896, 40.0626428737422, 2.25)
    pt3dadd(20.1307868661934, -262.823753328864, 40.1496958525578, 2.25)
    pt3dadd(19.9682644529659, -263.806610512832, 40.2367488313734, 2.25)
    pt3dadd(19.8057420397384, -264.789467696801, 40.3238018101891, 2.25)
    pt3dadd(19.6432196265109, -265.772324880769, 40.4108547890047, 2.25)
    pt3dadd(19.4806972132835, -266.755182064737, 40.4979077678203, 2.25)
    pt3dadd(19.318174800056, -267.738039248705, 40.584960746636, 2.25)
    pt3dadd(19.1556523868285, -268.720896432674, 40.6720137254516, 2.25)
    pt3dadd(19.1234774275555, -269.7154680066, 40.6730195834297, 2.25)
    pt3dadd(19.143326826386, -270.71471503524, 40.6396822602223, 2.25)
    pt3dadd(19.1631762252166, -271.713962063881, 40.6063449370149, 2.25)
    pt3dadd(19.1830256240471, -272.713209092522, 40.5730076138075, 2.25)
    pt3dadd(19.2028750228776, -273.712456121163, 40.5396702906001, 2.25)
    pt3dadd(19.2227244217082, -274.711703149804, 40.5063329673927, 2.25)
    pt3dadd(19.2425738205387, -275.710950178444, 40.4729956441853, 2.25)
    pt3dadd(19.2624232193692, -276.710197207085, 40.4396583209779, 2.25)
    pt3dadd(19.3319586134345, -277.67032907064, 40.6418103373547, 2.25)
    pt3dadd(19.4286094851929, -278.609114347872, 40.9724775601653, 2.25)
    pt3dadd(19.5252603569512, -279.547899625104, 41.3031447829759, 2.25)
    pt3dadd(19.6219112287096, -280.486684902336, 41.6338120057865, 2.25)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(36.2818167720425, -195.218737944294, 30.5094647632453, 2.25)
    pt3dadd(37.2469923038982, -195.759309452773, 30.3383560370865, 2.25)
    pt3dadd(38.0495418593805, -196.342197465989, 30.2112506672413, 2.25)
    pt3dadd(38.8520914148628, -196.925085479206, 30.0841452973962, 2.25)
    pt3dadd(39.6546409703452, -197.507973492423, 29.957039927551, 2.25)
    pt3dadd(40.4571905258275, -198.090861505639, 29.8299345577058, 2.25)
    pt3dadd(41.2597400813098, -198.673749518856, 29.7028291878606, 2.25)
    pt3dadd(42.0622896367921, -199.256637532073, 29.5757238180155, 2.25)
    pt3dadd(42.6483983710841, -199.965372873135, 29.7182333877399, 2.25)
    pt3dadd(43.0204878450157, -200.798547549974, 30.1273414190272, 2.25)
    pt3dadd(43.3925773189472, -201.631722226813, 30.5364494503145, 2.25)
    pt3dadd(43.7646667928788, -202.464896903651, 30.9455574816018, 2.25)
    pt3dadd(44.1367562668104, -203.29807158049, 31.3546655128892, 2.25)
    pt3dadd(44.508845740742, -204.131246257329, 31.7637735441765, 2.25)
    pt3dadd(44.5913810379155, -205.122892248984, 31.8530804048123, 2.25)
    pt3dadd(44.6713797265777, -206.115926511706, 31.9395856813698, 2.25)
    pt3dadd(44.7513784152399, -207.108960774428, 32.0260909579274, 2.25)
    pt3dadd(44.8313771039022, -208.10199503715, 32.1125962344849, 2.25)
    pt3dadd(44.9113757925644, -209.095029299873, 32.1991015110424, 2.25)
    pt3dadd(44.9913744812266, -210.088063562595, 32.2856067875999, 2.25)
    pt3dadd(45.0713731698888, -211.081097825317, 32.3721120641574, 2.25)
    pt3dadd(45.151371858551, -212.074132088039, 32.4586173407149, 2.25)
    pt3dadd(45.4353510340816, -213.000985464832, 32.6744508749153, 2.25)
    pt3dadd(45.7639376029015, -213.913366100374, 32.9185665087451, 2.25)
    pt3dadd(46.0925241717214, -214.825746735915, 33.162682142575, 2.25)
    pt3dadd(46.4211107405413, -215.738127371456, 33.4067977764048, 2.25)
    pt3dadd(46.7496973093611, -216.650508006998, 33.6509134102346, 2.25)
    pt3dadd(47.078283878181, -217.562888642539, 33.8950290440644, 2.25)
    pt3dadd(47.4068704470009, -218.475269278081, 34.1391446778943, 2.25)
    pt3dadd(47.7354570158207, -219.387649913622, 34.3832603117241, 2.25)
    pt3dadd(48.0640435846406, -220.300030549164, 34.627375945554, 2.25)
    pt3dadd(48.3926301534605, -221.212411184705, 34.8714915793838, 2.25)
    pt3dadd(48.7748223260151, -222.037425364117, 35.2486115347513, 2.25)
    pt3dadd(49.2160662471331, -222.766196956171, 35.772248592923, 2.25)
    pt3dadd(49.6573101682511, -223.494968548226, 36.2958856510947, 2.25)
    pt3dadd(50.098554089369, -224.22374014028, 36.8195227092664, 2.25)
    pt3dadd(50.539798010487, -224.952511732335, 37.343159767438, 2.25)
    pt3dadd(50.981041931605, -225.681283324389, 37.8667968256097, 2.25)
    pt3dadd(51.422285852723, -226.410054916444, 38.3904338837814, 2.25)
    pt3dadd(51.8635297738409, -227.138826508499, 38.9140709419531, 2.25)
    pt3dadd(52.3047736949589, -227.867598100553, 39.4377080001248, 2.25)
    pt3dadd(52.711372825543, -228.710407126186, 39.6402518114669, 2.25)
    pt3dadd(53.0933626155754, -229.634220712544, 39.6147124698057, 2.25)
    pt3dadd(53.4753524056078, -230.558034298901, 39.5891731281446, 2.25)
  }
}
proc shape3d_8() {
  adendMML[2] {
    pt3dadd(53.8573421956401, -231.481847885259, 39.5636337864834, 2.25)
    pt3dadd(54.2393319856725, -232.405661471616, 39.5380944448223, 2.25)
    pt3dadd(54.6213217757048, -233.329475057973, 39.5125551031612, 2.25)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(54.6213217757048, -233.329475057973, 39.5125551031612, 2.25)
    pt3dadd(54.7839594014043, -234.215399898622, 39.8597004832344, 2.25)
    pt3dadd(54.8672389937167, -235.087617209389, 40.3416771136861, 2.25)
    pt3dadd(54.950518586029, -235.959834520157, 40.8236537441379, 2.25)
    pt3dadd(55.0337981783414, -236.832051830924, 41.3056303745896, 2.25)
    pt3dadd(55.1170777706538, -237.704269141692, 41.7876070050414, 2.25)
    pt3dadd(55.2003573629661, -238.57648645246, 42.2695836354932, 2.25)
    pt3dadd(55.2836369552785, -239.448703763227, 42.7515602659449, 2.25)
    pt3dadd(55.3669165475909, -240.320921073995, 43.2335368963967, 2.25)
    pt3dadd(55.8256734025223, -241.18359737726, 43.2781883021023, 2.25)
    pt3dadd(56.3333952970733, -242.045029461882, 43.2658092319624, 2.25)
    pt3dadd(56.8411171916242, -242.906461546504, 43.2534301618226, 2.25)
    pt3dadd(57.3488390861752, -243.767893631126, 43.2410510916827, 2.25)
    pt3dadd(57.8565609807261, -244.629325715748, 43.2286720215429, 2.25)
    pt3dadd(58.3642828752771, -245.49075780037, 43.2162929514031, 2.25)
    pt3dadd(58.633015364605, -246.349570560682, 43.6367512572732, 2.25)
    pt3dadd(58.8886108658082, -247.208239339581, 44.0810021637536, 2.25)
    pt3dadd(59.1442063670114, -248.06690811848, 44.525253070234, 2.25)
    pt3dadd(59.3998018682146, -248.925576897379, 44.9695039767144, 2.25)
    pt3dadd(59.6553973694178, -249.784245676279, 45.4137548831948, 2.25)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(-21.3637083812697, -102.166941274131, 6.05018504069451, 2.25)
    pt3dadd(-21.4357974085181, -103.117854584625, 6.10489448158755, 2.25)
    pt3dadd(-21.6055563237227, -104.102561635249, 6.06572899728662, 2.25)
    pt3dadd(-21.7753152389273, -105.087268685873, 6.0265635129857, 2.25)
    pt3dadd(-21.9450741541318, -106.071975736496, 5.98739802868478, 2.25)
    pt3dadd(-22.0767417328323, -107.05703915906, 5.96354216684231, 2.25)
    pt3dadd(-21.9429819933215, -108.044585845719, 6.04636652168224, 2.25)
    pt3dadd(-21.8092222538107, -109.032132532378, 6.12919087652217, 2.25)
    pt3dadd(-21.6754625143, -110.019679219037, 6.2120152313621, 2.25)
    pt3dadd(-21.5417027747892, -111.007225905696, 6.29483958620203, 2.25)
    pt3dadd(-21.4079430352784, -111.994772592356, 6.37766394104196, 2.25)
    pt3dadd(-21.2741832957676, -112.982319279015, 6.46048829588189, 2.25)
    pt3dadd(-21.1404235562568, -113.969865965674, 6.54331265072182, 2.25)
    pt3dadd(-21.006663816746, -114.957412652333, 6.62613700556175, 2.25)
    pt3dadd(-20.8729040772352, -115.944959338992, 6.70896136040168, 2.25)
    pt3dadd(-20.7391443377244, -116.932506025651, 6.79178571524161, 2.25)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(-20.7391443377244, -116.932506025651, 6.79178571524161, 2.25)
    pt3dadd(-20.6053845982136, -117.92005271231, 6.87461007008154, 2.25)
    pt3dadd(-20.4716248587028, -118.907599398969, 6.95743442492147, 2.25)
    pt3dadd(-20.2221737797866, -119.874272805578, 6.94678432841396, 2.25)
    pt3dadd(-19.956294156706, -120.837982138948, 6.9228605576618, 2.25)
    pt3dadd(-19.6904145336254, -121.801691472317, 6.89893678690965, 2.25)
    pt3dadd(-19.4245349105448, -122.765400805687, 6.87501301615749, 2.25)
    pt3dadd(-19.1586552874643, -123.729110139056, 6.85108924540534, 2.25)
    pt3dadd(-18.8927756643837, -124.692819472426, 6.82716547465319, 2.25)
    pt3dadd(-18.6268960413031, -125.656528805795, 6.80324170390103, 2.25)
    pt3dadd(-18.3610164182226, -126.620238139165, 6.77931793314888, 2.25)
    pt3dadd(-18.095136795142, -127.583947472534, 6.75539416239672, 2.25)
    pt3dadd(-17.8292571720614, -128.547656805904, 6.73147039164457, 2.25)
    pt3dadd(-17.6276374947564, -129.524922729128, 6.70494247883856, 2.25)
    pt3dadd(-17.4795256965509, -130.513476934067, 6.6762461527777, 2.25)
    pt3dadd(-17.3314138983454, -131.502031139006, 6.64754982671684, 2.25)
    pt3dadd(-17.1833021001399, -132.490585343945, 6.61885350065598, 2.25)
    pt3dadd(-17.0351903019344, -133.479139548884, 6.59015717459513, 2.25)
    pt3dadd(-16.8870785037288, -134.467693753824, 6.56146084853427, 2.25)
    pt3dadd(-16.7389667055233, -135.456247958763, 6.53276452247341, 2.25)
    pt3dadd(-16.5908549073178, -136.444802163702, 6.50406819641255, 2.25)
    pt3dadd(-16.3575045157814, -137.411448134827, 6.47352084225791, 2.25)
    pt3dadd(-16.0118446499314, -138.349228047439, 6.44053459294993, 2.25)
    pt3dadd(-15.6661847840813, -139.28700796005, 6.40754834364194, 2.25)
    pt3dadd(-15.3205249182313, -140.224787872661, 6.37456209433396, 2.25)
    pt3dadd(-14.9748650523813, -141.162567785272, 6.34157584502597, 2.25)
    pt3dadd(-14.6292051865313, -142.100347697883, 6.30858959571799, 2.25)
    pt3dadd(-14.2835453206812, -143.038127610495, 6.27560334641, 2.25)
    pt3dadd(-13.9378854548312, -143.975907523106, 6.24261709710202, 2.25)
    pt3dadd(-13.5922255889812, -144.913687435717, 6.20963084779403, 2.25)
    pt3dadd(-13.2465657231311, -145.851467348328, 6.17664459848605, 2.25)
    pt3dadd(-12.9009058572811, -146.78924726094, 6.14365834917806, 2.25)
    pt3dadd(-12.5845745561897, -147.736395120284, 6.11920356701427, 2.25)
    pt3dadd(-12.3328190870001, -148.704169387995, 6.11353342681004, 2.25)
    pt3dadd(-12.0810636178104, -149.671943655706, 6.10786328660581, 2.25)
    pt3dadd(-11.8293081486207, -150.639717923417, 6.10219314640158, 2.25)
    pt3dadd(-11.5775526794311, -151.607492191127, 6.09652300619735, 2.25)
    pt3dadd(-11.3257972102414, -152.575266458838, 6.09085286599312, 2.25)
    pt3dadd(-11.0740417410517, -153.543040726549, 6.08518272578889, 2.25)
    pt3dadd(-10.8222862718621, -154.51081499426, 6.07951258558467, 2.25)
    pt3dadd(-10.5705308026724, -155.47858926197, 6.07384244538044, 2.25)
    pt3dadd(-10.3187753334827, -156.446363529681, 6.06817230517621, 2.25)
    pt3dadd(-10.0360102918484, -157.398572283289, 5.96765644265906, 2.25)
    pt3dadd(-9.74339784913957, -158.345838051611, 5.8370213687441, 2.25)
    pt3dadd(-9.45078540643073, -159.293103819934, 5.70638629482913, 2.25)
    pt3dadd(-9.1581729637219, -160.240369588256, 5.57575122091417, 2.25)
    pt3dadd(-8.86556052101306, -161.187635356578, 5.44511614699921, 2.25)
    pt3dadd(-8.57294807830422, -162.1349011249, 5.31448107308424, 2.25)
    pt3dadd(-8.28033563559538, -163.082166893223, 5.18384599916928, 2.25)
    pt3dadd(-7.98772319288654, -164.029432661545, 5.05321092525432, 2.25)
    pt3dadd(-7.6951107501777, -164.976698429867, 4.92257585133935, 2.25)
    pt3dadd(-7.40249830746886, -165.92396419819, 4.79194077742439, 2.25)
    pt3dadd(-7.10988586476002, -166.871229966512, 4.66130570350943, 2.25)
    pt3dadd(-6.81727342205118, -167.818495734834, 4.53067062959446, 2.25)
    pt3dadd(-6.52466097934234, -168.765761503156, 4.4000355556795, 2.25)
    pt3dadd(-6.23204853663351, -169.713027271479, 4.26940048176454, 2.25)
    pt3dadd(-5.93943609392467, -170.660293039801, 4.13876540784957, 2.25)
    pt3dadd(-5.64682365121583, -171.607558808123, 4.00813033393461, 2.25)
    pt3dadd(-5.38106688925988, -172.557883996534, 3.87007342858382, 2.25)
    pt3dadd(-5.36127132314589, -173.536229276136, 3.66404272833696, 2.25)
    pt3dadd(-5.3414757570319, -174.514574555737, 3.4580120280901, 2.25)
    pt3dadd(-5.32168019091791, -175.492919835338, 3.25198132784324, 2.25)
    pt3dadd(-5.30188462480392, -176.471265114939, 3.04595062759638, 2.25)
    pt3dadd(-5.28208905868993, -177.449610394541, 2.83991992734952, 2.25)
    pt3dadd(-5.26229349257594, -178.427955674142, 2.63388922710265, 2.25)
    pt3dadd(-5.24249792646195, -179.406300953743, 2.42785852685579, 2.25)
    pt3dadd(-5.22270236034796, -180.384646233344, 2.22182782660893, 2.25)
    pt3dadd(-5.20290679423397, -181.362991512946, 2.01579712636207, 2.25)
    pt3dadd(-5.18311122811999, -182.341336792547, 1.80976642611521, 2.25)
    pt3dadd(-5.163315662006, -183.319682072148, 1.60373572586835, 2.25)
    pt3dadd(-5.14352009589201, -184.298027351749, 1.39770502562148, 2.25)
    pt3dadd(-5.12372452977801, -185.276372631351, 1.19167432537462, 2.25)
    pt3dadd(-4.94718046481284, -186.256836319808, 1.27371117841155, 2.25)
    pt3dadd(-4.76948057355041, -187.23731562891, 1.35787217334403, 2.25)
    pt3dadd(-4.59178068228798, -188.217794938012, 1.4420331682765, 2.25)
    pt3dadd(-4.41408079102555, -189.198274247114, 1.52619416320898, 2.25)
    pt3dadd(-4.23638089976312, -190.178753556216, 1.61035515814145, 2.25)
    pt3dadd(-4.05868100850068, -191.159232865318, 1.69451615307393, 2.25)
    pt3dadd(-3.88098111723825, -192.13971217442, 1.7786771480064, 2.25)
    pt3dadd(-3.70328122597582, -193.120191483522, 1.86283814293888, 2.25)
    pt3dadd(-3.52558133471339, -194.100670792624, 1.94699913787135, 2.25)
    pt3dadd(-3.34788144345095, -195.081150101726, 2.03116013280383, 2.25)
    pt3dadd(-3.17018155218852, -196.061629410828, 2.1153211277363, 2.25)
    pt3dadd(-3.15576013436606, -197.050031164433, 2.25099842134781, 2.25)
    pt3dadd(-3.16604828296708, -198.039631852377, 2.39447187680039, 2.25)
    pt3dadd(-3.1763364315681, -199.02923254032, 2.53794533225297, 2.25)
    pt3dadd(-3.18662458016912, -200.018833228264, 2.68141878770555, 2.25)
    pt3dadd(-3.19691272877014, -201.008433916208, 2.82489224315813, 2.25)
    pt3dadd(-3.20720087737116, -201.998034604152, 2.96836569861071, 2.25)
    pt3dadd(-3.21748902597218, -202.987635292096, 3.11183915406329, 2.25)
    pt3dadd(-3.2277771745732, -203.97723598004, 3.25531260951587, 2.25)
    pt3dadd(-3.23806532317422, -204.966836667983, 3.39878606496845, 2.25)
    pt3dadd(-3.24835347177525, -205.956437355927, 3.54225952042104, 2.25)
    pt3dadd(-3.25864162037627, -206.946038043871, 3.68573297587362, 2.25)
    pt3dadd(-3.26892976897729, -207.935638731815, 3.8292064313262, 2.25)
    pt3dadd(-3.27921791757831, -208.925239419759, 3.97267988677878, 2.25)
    pt3dadd(-3.24125373436605, -209.918085951267, 4.05422308948096, 2.25)
    pt3dadd(-3.15510745807519, -210.914173601512, 4.07392618849764, 2.25)
    pt3dadd(-3.06896118178432, -211.910261251756, 4.09362928751431, 2.25)
    pt3dadd(-2.98281490549346, -212.906348902001, 4.11333238653099, 2.25)
    pt3dadd(-2.8966686292026, -213.902436552246, 4.13303548554766, 2.25)
    pt3dadd(-2.81052235291174, -214.898524202491, 4.15273858456434, 2.25)
    pt3dadd(-2.72437607662088, -215.894611852736, 4.17244168358102, 2.25)
    pt3dadd(-2.63822980033002, -216.890699502981, 4.19214478259769, 2.25)
    pt3dadd(-2.55208352403916, -217.886787153226, 4.21184788161437, 2.25)
    pt3dadd(-2.4659372477483, -218.882874803471, 4.23155098063104, 2.25)
    pt3dadd(-2.37979097145744, -219.878962453715, 4.25125407964772, 2.25)
    pt3dadd(-2.29364469516658, -220.87505010396, 4.27095717866439, 2.25)
    pt3dadd(-2.20749841887572, -221.871137754205, 4.29066027768107, 2.25)
    pt3dadd(-2.12135214258485, -222.86722540445, 4.31036337669774, 2.25)
    pt3dadd(-2.0868216713611, -223.853632100233, 4.42558462720409, 2.25)
    pt3dadd(-2.10673901680173, -224.829826675272, 4.64156483698013, 2.25)
    pt3dadd(-2.12665636224235, -225.806021250311, 4.85754504675618, 2.25)
    pt3dadd(-2.14657370768298, -226.782215825351, 5.07352525653222, 2.25)
    pt3dadd(-2.1664910531236, -227.75841040039, 5.28950546630827, 2.25)
    pt3dadd(-2.18640839856423, -228.734604975429, 5.50548567608431, 2.25)
    pt3dadd(-2.20632574400485, -229.710799550468, 5.72146588586036, 2.25)
    pt3dadd(-2.22624308944547, -230.686994125507, 5.9374460956364, 2.25)
    pt3dadd(-2.24616043488609, -231.663188700546, 6.15342630541245, 2.25)
    pt3dadd(-2.26607778032672, -232.639383275585, 6.36940651518849, 2.25)
    pt3dadd(-2.28599512576734, -233.615577850624, 6.58538672496453, 2.25)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(-2.28599512576734, -233.615577850624, 6.58538672496453, 2.25)
    pt3dadd(-2.30591247120797, -234.591772425663, 6.80136693474058, 2.25)
    pt3dadd(-2.32582981664859, -235.567967000702, 7.01734714451662, 2.25)
    pt3dadd(-2.34574716208921, -236.544161575741, 7.23332735429267, 2.25)
    pt3dadd(-2.36566450752984, -237.52035615078, 7.44930756406871, 2.25)
    pt3dadd(-2.38558185297046, -238.496550725819, 7.66528777384476, 2.25)
    pt3dadd(-2.40549919841109, -239.472745300858, 7.8812679836208, 2.25)
    pt3dadd(-2.42541654385171, -240.448939875897, 8.09724819339685, 2.25)
    pt3dadd(-2.44533388929233, -241.425134450936, 8.31322840317289, 2.25)
    pt3dadd(-2.48539073304214, -242.40528530253, 8.4949125747442, 2.25)
    pt3dadd(-2.58458279175449, -243.397052891588, 8.57589396015538, 2.25)
    pt3dadd(-2.68377485046684, -244.388820480646, 8.65687534556657, 2.25)
    pt3dadd(-2.78296690917919, -245.380588069703, 8.73785673097775, 2.25)
    pt3dadd(-2.88215896789154, -246.372355658761, 8.81883811638893, 2.25)
    pt3dadd(-2.98135102660389, -247.364123247819, 8.89981950180012, 2.25)
    pt3dadd(-3.08054308531624, -248.355890836876, 8.9808008872113, 2.25)
    pt3dadd(-3.17973514402859, -249.347658425934, 9.06178227262249, 2.25)
    pt3dadd(-3.27892720274094, -250.339426014992, 9.14276365803367, 2.25)
    pt3dadd(-3.37811926145329, -251.331193604049, 9.22374504344485, 2.25)
    pt3dadd(-3.47731132016565, -252.322961193107, 9.30472642885604, 2.25)
    pt3dadd(-3.57650337887799, -253.314728782165, 9.38570781426722, 2.25)
    pt3dadd(-3.67569543759034, -254.306496371222, 9.46668919967841, 2.25)
    pt3dadd(-3.7748874963027, -255.29826396028, 9.54767058508959, 2.25)
    pt3dadd(-3.87407955501505, -256.290031549338, 9.62865197050077, 2.25)
    pt3dadd(-3.97190551029043, -257.279243440048, 9.57543894615965, 2.25)
    pt3dadd(-4.06904462084934, -258.267170385666, 9.45475612500381, 2.25)
    pt3dadd(-4.16618373140825, -259.255097331284, 9.33407330384797, 2.25)
    pt3dadd(-4.26332284196716, -260.243024276901, 9.21339048269213, 2.25)
    pt3dadd(-4.36046195252606, -261.230951222519, 9.09270766153628, 2.25)
    pt3dadd(-4.45760106308496, -262.218878168137, 8.97202484038044, 2.25)
    pt3dadd(-4.55474017364387, -263.206805113755, 8.8513420192246, 2.25)
    pt3dadd(-4.65187928420277, -264.194732059372, 8.73065919806875, 2.25)
    pt3dadd(-4.74901839476168, -265.18265900499, 8.60997637691291, 2.25)
    pt3dadd(-4.84615750532059, -266.170585950608, 8.48929355575707, 2.25)
    pt3dadd(-4.94329661587949, -267.158512896226, 8.36861073460123, 2.25)
    pt3dadd(-5.0404357264384, -268.146439841844, 8.24792791344538, 2.25)
    pt3dadd(-5.1375748369973, -269.134366787461, 8.12724509228954, 2.25)
    pt3dadd(-5.23471394755621, -270.122293733079, 8.00656227113369, 2.25)
    pt3dadd(-5.33185305811513, -271.110220678697, 7.88587944997786, 2.25)
    pt3dadd(-5.34934663279359, -272.108208646196, 7.84689363464486, 2.25)
    pt3dadd(-5.35351986221397, -273.107879272787, 7.82157126337162, 2.25)
    pt3dadd(-5.35769309163437, -274.107549899378, 7.79624889209838, 2.25)
    pt3dadd(-5.36186632105476, -275.10722052597, 7.77092652082513, 2.25)
    pt3dadd(-5.36603955047515, -276.106891152561, 7.74560414955189, 2.25)
    pt3dadd(-5.37021277989555, -277.106561779152, 7.72028177827865, 2.25)
    pt3dadd(-5.37438600931594, -278.106232405743, 7.6949594070054, 2.25)
    pt3dadd(-5.37855923873633, -279.105903032335, 7.66963703573216, 2.25)
    pt3dadd(-5.38273246815672, -280.105573658926, 7.64431466445892, 2.25)
    pt3dadd(-5.38690569757712, -281.105244285517, 7.61899229318567, 2.25)
    pt3dadd(-5.39107892699752, -282.104914912108, 7.59366992191243, 2.25)
    pt3dadd(-5.3952521564179, -283.1045855387, 7.56834755063918, 2.25)
    pt3dadd(-5.38568489998933, -284.102632094554, 7.58744074302083, 2.25)
    pt3dadd(-5.35423254247662, -285.098091918569, 7.67727663773342, 2.25)
    pt3dadd(-5.32278018496391, -286.093551742584, 7.76711253244602, 2.25)
    pt3dadd(-5.29132782745121, -287.089011566599, 7.85694842715862, 2.25)
    pt3dadd(-5.25987546993849, -288.084471390614, 7.94678432187122, 2.25)
    pt3dadd(-5.22842311242578, -289.079931214629, 8.03662021658382, 2.25)
    pt3dadd(-5.19697075491307, -290.075391038645, 8.12645611129641, 2.25)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-21.5893944312565, -78.9619932956237, 2.9471694865566, 2.22134732521306)
    pt3dadd(-21.8280235551471, -79.916356567544, 2.81430982319504, 2.22134732521306)
    pt3dadd(-22.1364320536433, -80.8491806102493, 2.62796738732412, 2.17660950353446)
    pt3dadd(-22.4448405521395, -81.7820046529546, 2.4416249514532, 2.13187168185586)
    pt3dadd(-22.7532490506358, -82.7148286956598, 2.25528251558227, 2.08713386017726)
    pt3dadd(-23.061657549132, -83.6476527383651, 2.06894007971135, 2.04239603849866)
    pt3dadd(-23.3700660476282, -84.5804767810704, 1.88259764384043, 1.99765821682006)
    pt3dadd(-23.6784745461244, -85.5133008237756, 1.6962552079695, 1.95292039514146)
    pt3dadd(-23.9868830446206, -86.4461248664809, 1.50991277209858, 1.90818257346287)
    pt3dadd(-24.2952915431168, -87.3789489091862, 1.32357033622766, 1.86344475178427)
    pt3dadd(-24.6037000416131, -88.3117729518914, 1.13722790035673, 1.81870693010567)
    pt3dadd(-24.931492322779, -89.2367239642039, 1.1729218255226, 1.8)
    pt3dadd(-25.2732146326791, -90.1560170746784, 1.36818073044316, 1.8)
    pt3dadd(-25.6149369425792, -91.0753101851528, 1.56343963536372, 1.8)
    pt3dadd(-25.9566592524793, -91.9946032956273, 1.75869854028429, 1.8)
    pt3dadd(-26.2983815623794, -92.9138964061017, 1.95395744520485, 1.8)
    pt3dadd(-26.6401038722795, -93.8331895165761, 2.14921635012542, 1.8)
    pt3dadd(-26.9818261821796, -94.7524826270506, 2.34447525504598, 1.8)
    pt3dadd(-27.3235484920797, -95.671775737525, 2.53973415996655, 1.8)
    pt3dadd(-27.6652708019798, -96.5910688479995, 2.73499306488711, 1.8)
    pt3dadd(-27.9348345887215, -97.5404913881705, 2.82100297913702, 1.8)
    pt3dadd(-28.1303028720804, -98.520852134423, 2.7948312881727, 1.8)
    pt3dadd(-28.3257711554394, -99.5012128806755, 2.76865959720837, 1.8)
    pt3dadd(-28.5212394387984, -100.481573626928, 2.74248790624404, 1.8)
    pt3dadd(-28.7167077221573, -101.461934373181, 2.71631621527971, 1.8)
    pt3dadd(-28.9121760055163, -102.442295119433, 2.69014452431538, 1.8)
    pt3dadd(-29.1076442888753, -103.422655865686, 2.66397283335105, 1.8)
    pt3dadd(-29.3031125722343, -104.403016611938, 2.63780114238672, 1.8)
    pt3dadd(-29.4985808555932, -105.383377358191, 2.61162945142239, 1.8)
    pt3dadd(-29.6835716757513, -106.342373812556, 2.42226339527827, 1.8)
    pt3dadd(-29.8646160296107, -107.293323141742, 2.17142816000366, 1.8)
  }
}
proc shape3d_9() {
  adendIML[7] {
    pt3dadd(-30.0456603834701, -108.244272470929, 1.92059292472905, 1.8)
    pt3dadd(-30.2267047373294, -109.195221800115, 1.66975768945443, 1.8)
    pt3dadd(-30.4077490911888, -110.146171129302, 1.41892245417983, 1.8)
    pt3dadd(-30.5887934450481, -111.097120458488, 1.16808721890521, 1.8)
    pt3dadd(-30.7698377989075, -112.048069787675, 0.917251983630607, 1.8)
    pt3dadd(-30.9508821527669, -112.999019116862, 0.666416748355998, 1.8)
    pt3dadd(-31.1319265066262, -113.949968446048, 0.415581513081385, 1.8)
    pt3dadd(-31.3129708604856, -114.900917775235, 0.164746277806776, 1.8)
    pt3dadd(-31.4885390858919, -115.855093154355, -0.0698425593927787, 1.8)
    pt3dadd(-31.5976536723695, -116.84841713258, -0.107278922754208, 1.8)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(-31.5976536723695, -116.84841713258, -0.107278922754208, 1.8)
    pt3dadd(-31.7067682588472, -117.841741110804, -0.144715286115636, 1.8)
    pt3dadd(-31.8158828453248, -118.835065089029, -0.182151649477067, 1.8)
    pt3dadd(-31.9249974318025, -119.828389067254, -0.219588012838496, 1.8)
    pt3dadd(-32.0341120182801, -120.821713045478, -0.257024376199926, 1.8)
    pt3dadd(-32.0994454471084, -121.809368416703, -0.138034194327249, 1.8)
    pt3dadd(-32.1546535855731, -122.795712806335, 0.0171328333876009, 1.8)
    pt3dadd(-32.2098617240379, -123.782057195966, 0.172299861102449, 1.8)
    pt3dadd(-32.2650698625026, -124.768401585598, 0.327466888817296, 1.8)
    pt3dadd(-32.3202780009673, -125.754745975229, 0.482633916532141, 1.8)
    pt3dadd(-32.375486139432, -126.74109036486, 0.637800944246987, 1.8)
    pt3dadd(-32.4306942778967, -127.727434754492, 0.792967971961835, 1.8)
    pt3dadd(-32.4859024163614, -128.713779144123, 0.948134999676682, 1.8)
    pt3dadd(-32.5411105548262, -129.700123533755, 1.10330202739153, 1.8)
    pt3dadd(-32.6028471466945, -130.685202992666, 1.26040129933168, 1.8)
    pt3dadd(-32.8179949142642, -131.640558028802, 1.46290609690275, 1.8)
    pt3dadd(-33.033142681834, -132.595913064938, 1.6654108944738, 1.8)
    pt3dadd(-33.2482904494037, -133.551268101074, 1.86791569204487, 1.8)
    pt3dadd(-33.4634382169734, -134.50662313721, 2.07042048961593, 1.8)
    pt3dadd(-33.9136292203821, -135.387700334495, 2.17028390465406, 1.8)
    pt3dadd(-34.400275583113, -136.257256990484, 2.2542275742538, 1.8)
    pt3dadd(-34.8869219458439, -137.126813646473, 2.33817124385354, 1.8)
    pt3dadd(-35.3735683085749, -137.996370302463, 2.42211491345328, 1.8)
    pt3dadd(-35.8602146713058, -138.865926958452, 2.50605858305303, 1.8)
    pt3dadd(-36.3468610340367, -139.735483614441, 2.59000225265277, 1.8)
    pt3dadd(-36.8335073967677, -140.60504027043, 2.67394592225252, 1.8)
    pt3dadd(-37.3201537594986, -141.474596926419, 2.75788959185226, 1.8)
    pt3dadd(-37.8068001222295, -142.344153582408, 2.841833261452, 1.8)
    pt3dadd(-38.2934464849604, -143.213710238397, 2.92577693105174, 1.8)
    pt3dadd(-38.7800928476914, -144.083266894386, 3.00972060065148, 1.8)
    pt3dadd(-39.2196523396314, -144.969777533548, 2.96023587274618, 1.8)
    pt3dadd(-39.616461205257, -145.871680858336, 2.78961020967883, 1.8)
    pt3dadd(-40.0132700708825, -146.773584183124, 2.61898454661147, 1.8)
    pt3dadd(-40.4100789365081, -147.675487507913, 2.44835888354411, 1.8)
    pt3dadd(-40.8068878021337, -148.577390832701, 2.27773322047676, 1.8)
    pt3dadd(-40.8808615274347, -149.552801767864, 2.31204804559952, 1.8)
    pt3dadd(-40.8655731228574, -150.54853715054, 2.40302778166032, 1.8)
    pt3dadd(-40.85028471828, -151.544272533215, 2.49400751772112, 1.8)
    pt3dadd(-40.8349963137026, -152.540007915891, 2.58498725378193, 1.8)
    pt3dadd(-40.8197079091253, -153.535743298566, 2.67596698984273, 1.8)
    pt3dadd(-40.8044195045479, -154.531478681242, 2.76694672590353, 1.8)
    pt3dadd(-40.7891310999706, -155.527214063917, 2.85792646196433, 1.8)
    pt3dadd(-40.7738426953932, -156.522949446592, 2.94890619802513, 1.8)
    pt3dadd(-40.8926422001502, -157.465471137777, 3.19953325132964, 1.8)
    pt3dadd(-41.1120126233587, -158.368080581438, 3.56990172951905, 1.8)
    pt3dadd(-41.3313830465672, -159.270690025098, 3.94027020770847, 1.8)
    pt3dadd(-41.5507534697757, -160.173299468759, 4.31063868589788, 1.8)
    pt3dadd(-41.7701238929843, -161.075908912419, 4.6810071640873, 1.8)
    pt3dadd(-41.9894943161928, -161.978518356079, 5.05137564227671, 1.8)
    pt3dadd(-42.2088647394013, -162.88112779974, 5.42174412046613, 1.8)
    pt3dadd(-42.4250027087837, -163.809577308028, 5.53289618691189, 1.8)
    pt3dadd(-42.6373824403321, -164.768069970445, 5.34266825594339, 1.8)
    pt3dadd(-42.8497621718806, -165.726562632862, 5.15244032497488, 1.8)
    pt3dadd(-43.062141903429, -166.685055295278, 4.96221239400638, 1.8)
    pt3dadd(-43.2745216349775, -167.643547957695, 4.77198446303787, 1.8)
    pt3dadd(-43.486901366526, -168.602040620112, 4.58175653206937, 1.8)
    pt3dadd(-43.6992810980744, -169.560533282529, 4.39152860110086, 1.8)
    pt3dadd(-43.8841933031705, -170.516402038204, 4.3085366107176, 1.8)
    pt3dadd(-43.9677682162706, -171.462590286095, 4.62117543340915, 1.8)
    pt3dadd(-44.0513431293708, -172.408778533985, 4.93381425610071, 1.8)
    pt3dadd(-44.134918042471, -173.354966781876, 5.24645307879227, 1.8)
    pt3dadd(-44.2184929555712, -174.301155029767, 5.55909190148383, 1.8)
    pt3dadd(-44.3020678686714, -175.247343277657, 5.87173072417539, 1.8)
    pt3dadd(-44.3856427817716, -176.193531525548, 6.18436954686694, 1.8)
    pt3dadd(-44.4692176948718, -177.139719773438, 6.4970083695585, 1.8)
    pt3dadd(-44.552792607972, -178.085908021329, 6.80964719225006, 1.8)
    pt3dadd(-44.6275899365336, -179.028648277127, 7.13415049966945, 1.8)
    pt3dadd(-44.6892506083854, -179.966228219373, 7.47641036212126, 1.8)
    pt3dadd(-44.7509112802371, -180.903808161619, 7.81867022457307, 1.8)
    pt3dadd(-44.8125719520888, -181.841388103864, 8.16093008702489, 1.8)
    pt3dadd(-44.8742326239406, -182.77896804611, 8.5031899494767, 1.8)
    pt3dadd(-44.9358932957923, -183.716547988355, 8.84544981192851, 1.8)
    pt3dadd(-45.1604698673859, -184.661816465638, 8.93647172202907, 1.8)
    pt3dadd(-45.4717471065296, -185.611176631462, 8.89378968906894, 1.8)
    pt3dadd(-45.7830243456732, -186.560536797286, 8.8511076561088, 1.8)
    pt3dadd(-46.0943015848169, -187.50989696311, 8.80842562314866, 1.8)
    pt3dadd(-46.4055788239605, -188.459257128934, 8.76574359018852, 1.8)
    pt3dadd(-46.7168560631042, -189.408617294758, 8.72306155722838, 1.8)
    pt3dadd(-47.0281333022479, -190.357977460582, 8.68037952426824, 1.8)
    pt3dadd(-47.3586514755115, -191.301086088415, 8.64739603678683, 1.8)
    pt3dadd(-47.6974241098813, -192.241512773839, 8.61857327590739, 1.8)
    pt3dadd(-48.0361967442511, -193.181939459263, 8.58975051502796, 1.8)
    pt3dadd(-48.3749693786208, -194.122366144687, 8.56092775414852, 1.8)
    pt3dadd(-48.7137420129906, -195.062792830111, 8.53210499326909, 1.8)
    pt3dadd(-49.0525146473604, -196.003219515535, 8.50328223238965, 1.8)
    pt3dadd(-49.3912872817301, -196.943646200959, 8.47445947151021, 1.8)
    pt3dadd(-49.7300599160999, -197.884072886383, 8.44563671063077, 1.8)
    pt3dadd(-50.1633921212049, -198.775044013727, 8.4451835952508, 1.8)
    pt3dadd(-50.7393791428671, -199.591405310352, 8.48752960155727, 1.8)
    pt3dadd(-51.3153661645294, -200.407766606977, 8.52987560786375, 1.8)
    pt3dadd(-51.8913531861916, -201.224127903601, 8.57222161417023, 1.8)
    pt3dadd(-52.4673402078538, -202.040489200226, 8.61456762047671, 1.8)
    pt3dadd(-53.043327229516, -202.85685049685, 8.65691362678318, 1.8)
    pt3dadd(-53.6193142511782, -203.673211793475, 8.69925963308966, 1.8)
    pt3dadd(-54.2311901311331, -204.412254957637, 8.87440873285261, 1.8)
    pt3dadd(-54.9133166333733, -204.999951793777, 9.30951316138872, 1.8)
    pt3dadd(-55.5954431356136, -205.587648629918, 9.74461758992483, 1.8)
    pt3dadd(-56.2775696378539, -206.175345466059, 10.1797220184609, 1.8)
    pt3dadd(-56.9596961400942, -206.763042302199, 10.6148264469971, 1.8)
    pt3dadd(-57.5562490374312, -207.434753893525, 10.9021901698178, 1.8)
    pt3dadd(-57.8920058614371, -208.362510772169, 10.7392959425937, 1.8)
    pt3dadd(-58.2277626854431, -209.290267650813, 10.5764017153695, 1.8)
    pt3dadd(-58.563519509449, -210.218024529456, 10.4135074881454, 1.8)
    pt3dadd(-58.899276333455, -211.1457814081, 10.2506132609213, 1.8)
    pt3dadd(-59.235033157461, -212.073538286743, 10.0877190336971, 1.8)
    pt3dadd(-59.5707899814669, -213.001295165387, 9.92482480647297, 1.8)
    pt3dadd(-59.9065468054729, -213.92905204403, 9.76193057924884, 1.8)
    pt3dadd(-60.2423036294788, -214.856808922674, 9.5990363520247, 1.8)
    pt3dadd(-60.5780604534848, -215.784565801318, 9.43614212480056, 1.8)
    pt3dadd(-60.9138172774908, -216.712322679961, 9.27324789757642, 1.8)
    pt3dadd(-61.1544388846602, -217.665414787484, 9.29978280562567, 1.8)
    pt3dadd(-61.326150103559, -218.636858253389, 9.46352910284831, 1.8)
    pt3dadd(-61.4978613224578, -219.608301719295, 9.62727540007095, 1.8)
    pt3dadd(-61.6695725413566, -220.5797451852, 9.79102169729359, 1.8)
    pt3dadd(-61.8412837602554, -221.551188651105, 9.95476799451622, 1.8)
    pt3dadd(-62.0129949791542, -222.522632117011, 10.1185142917389, 1.8)
    pt3dadd(-62.184706198053, -223.494075582916, 10.2822605889615, 1.8)
    pt3dadd(-62.3564174169518, -224.465519048821, 10.4460068861841, 1.8)
    pt3dadd(-62.5281286358506, -225.436962514727, 10.6097531834068, 1.8)
    pt3dadd(-62.6998398547494, -226.408405980632, 10.7734994806294, 1.8)
    pt3dadd(-62.9145746258896, -227.379077593744, 10.8813675032013, 1.8)
    pt3dadd(-63.1297426360199, -228.349741434445, 10.9886728421727, 1.8)
    pt3dadd(-63.3449106461503, -229.320405275146, 11.0959781811441, 1.8)
    pt3dadd(-63.5600786562806, -230.291069115847, 11.2032835201155, 1.8)
    pt3dadd(-63.7752466664109, -231.261732956549, 11.310588859087, 1.8)
    pt3dadd(-63.9904146765412, -232.23239679725, 11.4178941980584, 1.8)
    pt3dadd(-64.2055826866716, -233.203060637951, 11.5251995370298, 1.8)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-64.2055826866716, -233.203060637951, 11.5251995370298, 1.8)
    pt3dadd(-64.4207506968019, -234.173724478652, 11.6325048760012, 1.8)
    pt3dadd(-64.6353280135922, -235.144681733027, 11.7374248666574, 1.8)
    pt3dadd(-64.8315447427143, -236.124759197681, 11.7682008067556, 1.8)
    pt3dadd(-65.0277614718363, -237.104836662336, 11.7989767468538, 1.8)
    pt3dadd(-65.2239782009583, -238.08491412699, 11.829752686952, 1.8)
    pt3dadd(-65.4201949300803, -239.064991591645, 11.8605286270502, 1.8)
    pt3dadd(-65.6164116592023, -240.0450690563, 11.8913045671484, 1.8)
    pt3dadd(-65.8126283883243, -241.025146520954, 11.9220805072466, 1.8)
    pt3dadd(-66.0088451174463, -242.005223985609, 11.9528564473448, 1.8)
    pt3dadd(-66.2050618465683, -242.985301450263, 11.983632387443, 1.8)
    pt3dadd(-66.4012785756903, -243.965378914918, 12.0144083275412, 1.8)
    pt3dadd(-66.6706174899999, -244.888606868689, 11.8380353896595, 1.8)
    pt3dadd(-67.0024415943806, -245.763255140606, 11.4846472684876, 1.8)
    pt3dadd(-67.3342656987612, -246.637903412523, 11.1312591473156, 1.8)
    pt3dadd(-67.6660898031418, -247.512551684439, 10.7778710261436, 1.8)
    pt3dadd(-67.9979139075225, -248.387199956356, 10.4244829049717, 1.8)
    pt3dadd(-68.3297380119031, -249.261848228272, 10.0710947837997, 1.8)
    pt3dadd(-68.6615621162838, -250.136496500189, 9.71770666262771, 1.8)
    pt3dadd(-68.9933862206644, -251.011144772105, 9.36431854145575, 1.8)
    pt3dadd(-69.2001752347076, -251.969858419444, 9.29321743381694, 1.8)
    pt3dadd(-69.3666021331536, -252.955708900062, 9.31324035416933, 1.8)
    pt3dadd(-69.5330290315997, -253.941559380679, 9.3332632745217, 1.8)
    pt3dadd(-69.6994559300457, -254.927409861297, 9.35328619487409, 1.8)
    pt3dadd(-69.8658828284918, -255.913260341915, 9.37330911522647, 1.8)
    pt3dadd(-70.0323097269378, -256.899110822532, 9.39333203557885, 1.8)
    pt3dadd(-70.1987366253839, -257.88496130315, 9.41335495593123, 1.8)
    pt3dadd(-70.3651635238299, -258.870811783768, 9.43337787628361, 1.8)
    pt3dadd(-70.531590422276, -259.856662264386, 9.45340079663599, 1.8)
    pt3dadd(-70.8263457187453, -260.799627771399, 9.44868467806517, 1.8)
    pt3dadd(-71.2833020539391, -261.688388695707, 9.4126995818386, 1.8)
    pt3dadd(-71.7402583891329, -262.577149620014, 9.37671448561203, 1.8)
    pt3dadd(-72.1972147243266, -263.465910544322, 9.34072938938545, 1.8)
    pt3dadd(-72.6541710595204, -264.354671468629, 9.30474429315887, 1.8)
    pt3dadd(-73.1111273947142, -265.243432392937, 9.26875919693231, 1.8)
    pt3dadd(-73.5680837299079, -266.132193317244, 9.23277410070573, 1.8)
    pt3dadd(-74.0250400651017, -267.020954241551, 9.19678900447916, 1.8)
    pt3dadd(-74.4819964002955, -267.909715165859, 9.16080390825259, 1.8)
    pt3dadd(-74.9389527354893, -268.798476090166, 9.12481881202601, 1.8)
    pt3dadd(-75.2107744422873, -269.755254790406, 9.21337572997953, 1.8)
    pt3dadd(-75.4729156319298, -270.71559007675, 9.30844483376943, 1.8)
    pt3dadd(-75.7350568215722, -271.675925363094, 9.40351393755933, 1.8)
    pt3dadd(-75.9971980112147, -272.636260649438, 9.49858304134924, 1.8)
    pt3dadd(-76.2593392008571, -273.596595935782, 9.59365214513914, 1.8)
    pt3dadd(-76.5214803904995, -274.556931222126, 9.68872124892904, 1.8)
    pt3dadd(-76.783621580142, -275.51726650847, 9.78379035271894, 1.8)
    pt3dadd(-77.0457627697844, -276.477601794814, 9.87885945650884, 1.8)
    pt3dadd(-77.3079039594269, -277.437937081158, 9.97392856029874, 1.8)
    pt3dadd(-77.5700451490693, -278.398272367502, 10.0689976640886, 1.8)
    pt3dadd(-77.8321863387117, -279.358607653846, 10.1640667678785, 1.8)
    pt3dadd(-78.0943275283542, -280.31894294019, 10.2591358716684, 1.8)
    pt3dadd(-78.192284173966, -281.306373942704, 10.2631160937385, 1.8)
    pt3dadd(-78.2201256978748, -282.30537618932, 10.2281967466361, 1.8)
    pt3dadd(-78.2479672217836, -283.304378435936, 10.1932773995338, 1.8)
    pt3dadd(-78.2758087456925, -284.303380682553, 10.1583580524314, 1.8)
    pt3dadd(-78.3036502696013, -285.302382929169, 10.123438705329, 1.8)
    pt3dadd(-78.5688158464942, -286.117892604705, 10.6029157858053, 1.8)
    pt3dadd(-78.8572274786276, -286.915429055909, 11.132778352374, 1.8)
    pt3dadd(-79.1456391107609, -287.712965507113, 11.6626409189427, 1.8)
    pt3dadd(-79.4340507428943, -288.510501958317, 12.1925034855114, 1.8)
    pt3dadd(-79.7224623750276, -289.308038409521, 12.7223660520801, 1.8)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(-79.7224623750276, -289.308038409521, 12.7223660520801, 1.8)
    pt3dadd(-80.3502769229193, -290.010406397459, 12.8183117623298, 1.8)
    pt3dadd(-81.0902963176343, -290.681312184138, 12.7708068063156, 1.8)
    pt3dadd(-81.8303157123495, -291.352217970817, 12.7233018503015, 1.8)
    pt3dadd(-82.5703351070645, -292.023123757497, 12.6757968942873, 1.8)
    pt3dadd(-83.3103545017796, -292.694029544176, 12.6282919382732, 1.8)
    pt3dadd(-84.0503738964947, -293.364935330855, 12.580786982259, 1.8)
    pt3dadd(-84.7903932912098, -294.035841117534, 12.5332820262449, 1.8)
    pt3dadd(-85.5304126859249, -294.706746904213, 12.4857770702307, 1.8)
    pt3dadd(-86.1253671596061, -295.49364790824, 12.5194518505139, 1.8)
    pt3dadd(-86.6296509430201, -296.353050012806, 12.6038668281744, 1.8)
    pt3dadd(-87.1339347264342, -297.212452117372, 12.6882818058348, 1.8)
    pt3dadd(-87.6382185098483, -298.071854221937, 12.7726967834953, 1.8)
    pt3dadd(-88.0252073125528, -298.720831186808, 13.2991949554896, 1.8)
    pt3dadd(-88.3419192661579, -299.243732716057, 14.0905656203188, 1.8)
    pt3dadd(-88.658631219763, -299.766634245307, 14.881936285148, 1.8)
    pt3dadd(-88.9753431733681, -300.289535774556, 15.6733069499772, 1.8)
    pt3dadd(-89.2920551269732, -300.812437303806, 16.4646776148064, 1.8)
    pt3dadd(-89.7317643416527, -301.343021092911, 17.0554676692808, 1.8)
    pt3dadd(-90.5623127788692, -301.898016226163, 17.0088876789082, 1.8)
    pt3dadd(-91.3928612160856, -302.453011359416, 16.9623076885357, 1.8)
    pt3dadd(-92.223409653302, -303.008006492669, 16.9157276981631, 1.8)
    pt3dadd(-93.0740890316649, -303.29898308829, 17.1302852461592, 1.8)
    pt3dadd(-93.9459675010989, -303.311932293988, 17.6198363186832, 1.8)
    pt3dadd(-94.8178459705328, -303.324881499685, 18.1093873912071, 1.8)
    pt3dadd(-95.6897244399668, -303.337830705382, 18.598938463731, 1.8)
    pt3dadd(-96.5630423763737, -303.302989381739, 18.9871732355657, 1.8)
    pt3dadd(-97.4461519945951, -302.943062685628, 18.6862244431913, 1.8)
    pt3dadd(-98.3292616128165, -302.583135989517, 18.385275650817, 1.8)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(-79.7224623750276, -289.308038409521, 12.7223660520801, 1.8)
    pt3dadd(-80.0782836765314, -290.201357660953, 12.8255047293224, 1.8)
    pt3dadd(-80.4563902657418, -291.126342210262, 12.7875706979497, 1.8)
    pt3dadd(-80.8344968549521, -292.05132675957, 12.7496366665771, 1.8)
    pt3dadd(-81.2126034441624, -292.976311308879, 12.7117026352045, 1.8)
    pt3dadd(-81.5907100333728, -293.901295858187, 12.6737686038318, 1.8)
    pt3dadd(-81.9688166225831, -294.826280407496, 12.6358345724592, 1.8)
    pt3dadd(-82.3469232117934, -295.751264956804, 12.5979005410866, 1.8)
    pt3dadd(-82.7250298010038, -296.676249506113, 12.5599665097139, 1.8)
    pt3dadd(-83.1031363902141, -297.601234055421, 12.5220324783413, 1.8)
    pt3dadd(-83.4812429794244, -298.52621860473, 12.4840984469687, 1.8)
    pt3dadd(-83.8593495686348, -299.451203154039, 12.446164415596, 1.8)
    pt3dadd(-84.2374561578451, -300.376187703347, 12.4082303842234, 1.8)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(-20.5057130902238, -73.9068080526138, 0.602175364296879, 2.65546231448972)
    pt3dadd(-20.3667185711566, -74.6966292055691, 0.0791173315227871, 2.65546231448972)
    pt3dadd(-20.1962904999853, -75.4651140251542, -0.537636553446036, 2.60545740635971)
    pt3dadd(-20.0258624288141, -76.2335988447392, -1.15439043841486, 2.55545249822971)
    pt3dadd(-19.8554343576429, -77.0020836643243, -1.77114432338368, 2.5054475900997)
    pt3dadd(-19.6850062864716, -77.7705684839094, -2.3878982083525, 2.4554426819697)
    pt3dadd(-19.5145782153004, -78.5390533034945, -3.00465209332133, 2.40543777383969)
    pt3dadd(-19.3441501441291, -79.3075381230796, -3.62140597829015, 2.35543286570969)
    pt3dadd(-19.1737220729579, -80.0760229426646, -4.23815986325898, 2.30542795757968)
  }
}
proc shape3d_10() {
  adendIML[8] {
    pt3dadd(-19.0032940017866, -80.8445077622497, -4.8549137482278, 2.25542304944968)
    pt3dadd(-18.6312140773659, -81.7376920972339, -5.04006377205032, 2.25)
    pt3dadd(-18.2346047141966, -82.6460451949925, -5.17271241636662, 2.25)
    pt3dadd(-17.8379953510274, -83.554398292751, -5.30536106068291, 2.25)
    pt3dadd(-17.4413859878582, -84.4627513905096, -5.43800970499921, 2.25)
    pt3dadd(-17.044776624689, -85.3711044882681, -5.57065834931551, 2.25)
    pt3dadd(-16.6481672615198, -86.2794575860267, -5.70330699363181, 2.25)
    pt3dadd(-16.2515578983505, -87.1878106837852, -5.83595563794811, 2.25)
    pt3dadd(-15.8549485351813, -88.0961637815438, -5.9686042822644, 2.25)
    pt3dadd(-15.4583391720121, -89.0045168793023, -6.1012529265807, 2.25)
    pt3dadd(-15.0617298088429, -89.9128699770609, -6.233901570897, 2.25)
    pt3dadd(-14.6651204456736, -90.8212230748194, -6.3665502152133, 2.25)
    pt3dadd(-14.2685110825044, -91.729576172578, -6.4991988595296, 2.25)
    pt3dadd(-13.8719017193352, -92.6379292703365, -6.63184750384589, 2.25)
    pt3dadd(-13.475292356166, -93.5462823680951, -6.76449614816219, 2.25)
    pt3dadd(-13.0786829929967, -94.4546354658536, -6.89714479247849, 2.25)
    pt3dadd(-12.7831816190265, -95.4068058319879, -6.93960140952297, 2.25)
    pt3dadd(-12.5088616524676, -96.3681556054122, -6.96316343584277, 2.25)
    pt3dadd(-12.2345416859088, -97.3295053788365, -6.98672546216256, 2.25)
    pt3dadd(-11.96022171935, -98.2908551522607, -7.01028748848236, 2.25)
    pt3dadd(-11.6859017527912, -99.252204925685, -7.03384951480215, 2.25)
    pt3dadd(-11.4115817862324, -100.213554699109, -7.05741154112195, 2.25)
    pt3dadd(-11.1372618196735, -101.174904472533, -7.08097356744175, 2.25)
    pt3dadd(-10.8629418531147, -102.136254245958, -7.10453559376155, 2.25)
    pt3dadd(-10.5825710686049, -103.058427652656, -7.32003173082323, 2.25)
    pt3dadd(-10.29833289927, -103.955561455222, -7.65820269851207, 2.25)
    pt3dadd(-10.0140947299351, -104.852695257787, -7.9963736662009, 2.25)
    pt3dadd(-9.72985656060024, -105.749829060353, -8.33454463388974, 2.25)
    pt3dadd(-9.44561839126535, -106.646962862918, -8.67271560157857, 2.25)
    pt3dadd(-9.16138022193046, -107.544096665484, -9.01088656926741, 2.25)
    pt3dadd(-8.87714205259558, -108.441230468049, -9.34905753695624, 2.25)
    pt3dadd(-8.59290388326069, -109.338364270615, -9.68722850464508, 2.25)
    pt3dadd(-8.3086657139258, -110.23549807318, -10.0253994723339, 2.25)
    pt3dadd(-8.02442754459092, -111.132631875746, -10.3635704400227, 2.25)
    pt3dadd(-7.74018937525603, -112.029765678311, -10.7017414077116, 2.25)
    pt3dadd(-7.45595120592114, -112.926899480876, -11.0399123754004, 2.25)
    pt3dadd(-7.17171303658625, -113.824033283442, -11.3780833430892, 2.25)
    pt3dadd(-6.90177915409162, -114.734897505382, -11.6833328749368, 2.25)
    pt3dadd(-6.67334332962161, -115.685594942794, -11.8930742790424, 2.25)
    pt3dadd(-6.4449075051516, -116.636292380206, -12.102815683148, 2.25)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(-6.4449075051516, -116.636292380206, -12.102815683148, 2.25)
    pt3dadd(-6.21647168068158, -117.586989817619, -12.3125570872537, 2.25)
    pt3dadd(-5.98803585621157, -118.537687255031, -12.5222984913593, 2.25)
    pt3dadd(-5.75960003174156, -119.488384692444, -12.7320398954649, 2.25)
    pt3dadd(-5.53116420727154, -120.439082129856, -12.9417812995705, 2.25)
    pt3dadd(-5.30272838280153, -121.389779567268, -13.1515227036762, 2.25)
    pt3dadd(-5.07429255833151, -122.340477004681, -13.3612641077818, 2.25)
    pt3dadd(-4.8458567338615, -123.291174442093, -13.5710055118874, 2.25)
    pt3dadd(-4.56471528960778, -124.212774604098, -13.8299590821672, 2.25)
    pt3dadd(-4.24386244871817, -125.112451232153, -14.1259918834337, 2.25)
    pt3dadd(-3.92300960782856, -126.012127860207, -14.4220246847002, 2.25)
    pt3dadd(-3.60215676693896, -126.911804488262, -14.7180574859667, 2.25)
    pt3dadd(-3.28130392604935, -127.811481116316, -15.0140902872332, 2.25)
    pt3dadd(-3.02949763329859, -128.756475932867, -15.1574557503123, 2.25)
    pt3dadd(-2.83045796638589, -129.736103731957, -15.1841500614082, 2.25)
    pt3dadd(-2.63141829947319, -130.715731531048, -15.210844372504, 2.25)
    pt3dadd(-2.43237863256049, -131.695359330138, -15.2375386835999, 2.25)
    pt3dadd(-2.23333896564779, -132.674987129228, -15.2642329946957, 2.25)
    pt3dadd(-2.03429929873509, -133.654614928318, -15.2909273057916, 2.25)
    pt3dadd(-1.83525963182239, -134.634242727409, -15.3176216168874, 2.25)
    pt3dadd(-1.63621996490969, -135.613870526499, -15.3443159279833, 2.25)
    pt3dadd(-1.43718029799699, -136.593498325589, -15.3710102390791, 2.25)
    pt3dadd(-1.23814063108429, -137.573126124679, -15.397704550175, 2.25)
    pt3dadd(-1.03910096417159, -138.55275392377, -15.4243988612708, 2.25)
    pt3dadd(-0.840061297258887, -139.53238172286, -15.4510931723667, 2.25)
    pt3dadd(-0.641021630346188, -140.51200952195, -15.4777874834625, 2.25)
    pt3dadd(-0.429715388387277, -141.480216814547, -15.353568809814, 2.25)
    pt3dadd(-0.217082215276289, -142.447188699071, -15.2130251929799, 2.25)
    pt3dadd(-0.00444904216530206, -143.414160583595, -15.0724815761458, 2.25)
    pt3dadd(0.208184130945688, -144.381132468119, -14.9319379593118, 2.25)
    pt3dadd(0.420817304056675, -145.348104352643, -14.7913943424777, 2.25)
    pt3dadd(0.633450477167662, -146.315076237167, -14.6508507256436, 2.25)
    pt3dadd(0.846083650278652, -147.282048121691, -14.5103071088096, 2.25)
    pt3dadd(1.05871682338964, -148.249020006215, -14.3697634919755, 2.25)
    pt3dadd(1.27134999650063, -149.215991890739, -14.2292198751414, 2.25)
    pt3dadd(1.48398316961161, -150.182963775263, -14.0886762583073, 2.25)
    pt3dadd(1.6966163427226, -151.149935659787, -13.9481326414733, 2.25)
    pt3dadd(1.90924951583359, -152.116907544311, -13.8075890246392, 2.25)
    pt3dadd(2.12188268894458, -153.083879428835, -13.6670454078051, 2.25)
    pt3dadd(2.33451586205557, -154.050851313359, -13.5265017909711, 2.25)
    pt3dadd(2.54714903516655, -155.017823197883, -13.385958174137, 2.25)
    pt3dadd(2.89520458165674, -155.948629458327, -13.3622353410135, 2.25)
    pt3dadd(3.29163933317287, -156.866515666503, -13.3802463551518, 2.25)
    pt3dadd(3.68807408468901, -157.78440187468, -13.3982573692901, 2.25)
    pt3dadd(4.08450883620514, -158.702288082856, -13.4162683834284, 2.25)
    pt3dadd(4.48094358772127, -159.620174291032, -13.4342793975667, 2.25)
    pt3dadd(4.8773783392374, -160.538060499208, -13.452290411705, 2.25)
    pt3dadd(5.27381309075354, -161.455946707384, -13.4703014258433, 2.25)
    pt3dadd(5.44993352121909, -162.437190991568, -13.4437049731903, 2.21881802834287)
    pt3dadd(5.60410479949116, -163.424747421265, -13.4126644332311, 2.18452950492672)
    pt3dadd(5.75827607776322, -164.412303850961, -13.3816238932718, 2.15024098151058)
    pt3dadd(5.91244735603529, -165.399860280658, -13.3505833533126, 2.11595245809443)
    pt3dadd(6.06661863430736, -166.387416710355, -13.3195428133534, 2.08166393467828)
    pt3dadd(6.22078991257942, -167.374973140051, -13.2885022733941, 2.04737541126214)
    pt3dadd(6.37496119085149, -168.362529569748, -13.2574617334349, 2.01308688784599)
    pt3dadd(6.52913246912356, -169.350085999444, -13.2264211934757, 1.97879836442985)
    pt3dadd(6.68330374739562, -170.337642429141, -13.1953806535164, 1.9445098410137)
    pt3dadd(6.83747502566769, -171.325198858837, -13.1643401135572, 1.91022131759755)
    pt3dadd(6.99164630393975, -172.312755288534, -13.133299573598, 1.87593279418141)
    pt3dadd(7.14581758221182, -173.30031171823, -13.1022590336387, 1.84164427076526)
    pt3dadd(7.29998886048389, -174.287868147927, -13.0712184936795, 1.80735574734912)
    pt3dadd(7.52553594545434, -175.255302335927, -12.9695550939945, 1.8)
    pt3dadd(7.77057683973751, -176.217240836233, -12.848603526171, 1.8)
    pt3dadd(8.01561773402068, -177.179179336538, -12.7276519583476, 1.8)
    pt3dadd(8.26065862830385, -178.141117836844, -12.6067003905241, 1.8)
    pt3dadd(8.50569952258702, -179.103056337149, -12.4857488227007, 1.8)
    pt3dadd(8.75074041687019, -180.064994837454, -12.3647972548773, 1.8)
    pt3dadd(8.99578131115336, -181.02693333776, -12.2438456870538, 1.8)
    pt3dadd(9.24082220543652, -181.988871838065, -12.1228941192304, 1.8)
    pt3dadd(9.48613240568636, -182.951693548302, -12.1218860930682, 1.8)
    pt3dadd(9.73168212992141, -183.915300796139, -12.2275573041193, 1.8)
    pt3dadd(9.97723185415646, -184.878908043975, -12.3332285151704, 1.8)
    pt3dadd(10.2227815783915, -185.842515291812, -12.4388997262215, 1.8)
    pt3dadd(10.4683313026266, -186.806122539649, -12.5445709372727, 1.8)
    pt3dadd(10.7138810268616, -187.769729787485, -12.6502421483238, 1.8)
    pt3dadd(10.9594307510967, -188.733337035322, -12.7559133593749, 1.8)
    pt3dadd(11.2049804753317, -189.696944283158, -12.861584570426, 1.8)
    pt3dadd(11.4505301995668, -190.660551530995, -12.9672557814771, 1.8)
    pt3dadd(11.6960799238018, -191.624158778831, -13.0729269925283, 1.8)
    pt3dadd(12.0561373440726, -192.529431683376, -13.1394807287976, 1.8)
    pt3dadd(12.7106975441064, -193.284674268126, -13.1054280826197, 1.8)
    pt3dadd(13.3652577441401, -194.039916852876, -13.0713754364418, 1.8)
    pt3dadd(13.6237014949543, -194.981489676773, -12.9142636611347, 1.8)
    pt3dadd(13.8400694766369, -195.942854630334, -12.7440804581781, 1.8)
    pt3dadd(14.0564374583195, -196.904219583894, -12.5738972552215, 1.8)
    pt3dadd(14.272805440002, -197.865584537454, -12.4037140522649, 1.8)
    pt3dadd(14.4891734216846, -198.826949491014, -12.2335308493083, 1.8)
    pt3dadd(14.7055414033672, -199.788314444575, -12.0633476463517, 1.8)
    pt3dadd(14.9219093850497, -200.749679398135, -11.893164443395, 1.8)
    pt3dadd(15.0878473747152, -201.71329306017, -12.0114191611258, 1.8)
    pt3dadd(15.2361828127816, -202.677691632243, -12.2303529227929, 1.8)
    pt3dadd(15.3845182508481, -203.642090204315, -12.44928668446, 1.8)
    pt3dadd(15.5328536889145, -204.606488776388, -12.6682204461272, 1.8)
    pt3dadd(15.681189126981, -205.570887348461, -12.8871542077943, 1.8)
    pt3dadd(15.8295245650474, -206.535285920533, -13.1060879694614, 1.8)
    pt3dadd(15.9778600031139, -207.499684492606, -13.3250217311286, 1.8)
    pt3dadd(16.1261954411803, -208.464083064679, -13.5439554927957, 1.8)
    pt3dadd(16.2745308792468, -209.428481636752, -13.7628892544628, 1.8)
    pt3dadd(16.437404477043, -210.392009717953, -13.9621637859164, 1.8)
    pt3dadd(16.7308319741954, -211.347720717778, -13.9848967735687, 1.8)
    pt3dadd(17.0242594713479, -212.303431717603, -14.0076297612209, 1.8)
    pt3dadd(17.3176869685003, -213.259142717429, -14.0303627488732, 1.8)
    pt3dadd(17.6111144656527, -214.214853717254, -14.0530957365254, 1.8)
    pt3dadd(17.9045419628052, -215.17056471708, -14.0758287241776, 1.8)
    pt3dadd(18.1979694599576, -216.126275716905, -14.0985617118299, 1.8)
    pt3dadd(18.4913969571101, -217.08198671673, -14.1212946994821, 1.8)
    pt3dadd(18.7848244542625, -218.037697716556, -14.1440276871344, 1.8)
    pt3dadd(19.078251951415, -218.993408716381, -14.1667606747866, 1.8)
    pt3dadd(19.3311837300304, -219.95403938614, -14.1910114671175, 1.8)
    pt3dadd(19.2772857334425, -220.951945631545, -14.2267624299649, 1.8)
    pt3dadd(19.2233877368546, -221.949851876951, -14.2625133928122, 1.8)
    pt3dadd(19.1694897402667, -222.947758122356, -14.2982643556595, 1.8)
    pt3dadd(19.1155917436788, -223.945664367762, -14.3340153185068, 1.8)
    pt3dadd(19.0616937470909, -224.943570613167, -14.3697662813541, 1.8)
    pt3dadd(19.007795750503, -225.941476858573, -14.4055172442015, 1.8)
    pt3dadd(18.9538977539151, -226.939383103978, -14.4412682070488, 1.8)
    pt3dadd(19.0101210311148, -227.925476596724, -14.4729450207175, 1.8)
    pt3dadd(19.2766305021001, -228.889012606163, -14.4968418905643, 1.8)
    pt3dadd(19.5431399730854, -229.852548615603, -14.520738760411, 1.8)
    pt3dadd(19.8096494440707, -230.816084625042, -14.5446356302577, 1.8)
    pt3dadd(20.0761589150561, -231.779620634482, -14.5685325001045, 1.8)
    pt3dadd(20.3499153720991, -232.694969510234, -14.6720464011608, 1.8)
    pt3dadd(20.6872796931401, -233.187372816389, -15.4743707115092, 1.8)
    pt3dadd(21.0246440141811, -233.679776122544, -16.2766950218575, 1.8)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(21.0246440141811, -233.679776122544, -16.2766950218575, 1.8)
    pt3dadd(21.2509410491743, -234.619657564789, -16.3882891215844, 1.8)
    pt3dadd(21.4687094380667, -235.593900003834, -16.4468433593765, 1.8)
    pt3dadd(21.6864778269592, -236.568142442878, -16.5053975971687, 1.8)
    pt3dadd(21.9042462158516, -237.542384881923, -16.5639518349608, 1.8)
    pt3dadd(22.1220146047441, -238.516627320968, -16.6225060727529, 1.8)
    pt3dadd(22.3397829936365, -239.490869760012, -16.681060310545, 1.8)
    pt3dadd(22.5575513825289, -240.465112199057, -16.7396145483372, 1.8)
    pt3dadd(22.7753197714214, -241.439354638102, -16.7981687861293, 1.8)
    pt3dadd(22.9930881603138, -242.413597077146, -16.8567230239214, 1.8)
    pt3dadd(23.2108565492063, -243.387839516191, -16.9152772617136, 1.8)
    pt3dadd(23.4414173848476, -244.35655828769, -17.0017902655599, 1.8)
    pt3dadd(23.6843156894012, -245.319949847125, -17.115267650325, 1.8)
    pt3dadd(23.9272139939548, -246.283341406561, -17.2287450350901, 1.8)
    pt3dadd(24.1701122985083, -247.246732965997, -17.3422224198552, 1.8)
    pt3dadd(24.4130106030619, -248.210124525432, -17.4556998046203, 1.8)
    pt3dadd(24.6559089076155, -249.173516084868, -17.5691771893854, 1.8)
    pt3dadd(24.8988072121691, -250.136907644304, -17.6826545741504, 1.8)
    pt3dadd(25.1417055167226, -251.100299203739, -17.7961319589155, 1.8)
    pt3dadd(25.3846038212762, -252.063690763175, -17.9096093436806, 1.8)
    pt3dadd(25.6275021258298, -253.027082322611, -18.0230867284457, 1.8)
    pt3dadd(25.8698272653486, -253.990665747086, -18.1316420101393, 1.8)
    pt3dadd(26.0888164355357, -254.962060807653, -18.039797687253, 1.8)
    pt3dadd(26.3078056057228, -255.93345586822, -17.9479533643667, 1.8)
    pt3dadd(26.52679477591, -256.904850928787, -17.8561090414804, 1.8)
    pt3dadd(26.7457839460971, -257.876245989354, -17.7642647185941, 1.8)
    pt3dadd(26.9647731162842, -258.847641049921, -17.6724203957078, 1.8)
    pt3dadd(27.1837622864713, -259.819036110489, -17.5805760728214, 1.8)
    pt3dadd(27.4027514566584, -260.790431171056, -17.4887317499351, 1.8)
    pt3dadd(27.6217406268456, -261.761826231623, -17.3968874270488, 1.8)
    pt3dadd(27.8407297970327, -262.73322129219, -17.3050431041625, 1.8)
    pt3dadd(27.8920270634942, -263.626927506095, -17.6523652220938, 1.8)
    pt3dadd(27.8856906658705, -264.493933009993, -18.1506234947546, 1.8)
    pt3dadd(27.8793542682467, -265.360938513891, -18.6488817674155, 1.8)
    pt3dadd(27.8730178706229, -266.22794401779, -19.1471400400764, 1.8)
    pt3dadd(27.8666814729991, -267.094949521688, -19.6453983127373, 1.8)
    pt3dadd(27.8603450753753, -267.961955025587, -20.1436565853982, 1.8)
    pt3dadd(27.8540086777516, -268.828960529485, -20.641914858059, 1.8)
    pt3dadd(27.8476722801278, -269.695966033383, -21.1401731307199, 1.8)
    pt3dadd(27.8816640249319, -270.572865908812, -21.6114943339136, 1.8)
    pt3dadd(28.0431902322996, -271.481055927536, -21.9976292510374, 1.8)
    pt3dadd(28.2047164396674, -272.389245946261, -22.3837641681611, 1.8)
    pt3dadd(28.3662426470351, -273.297435964986, -22.7698990852848, 1.8)
    pt3dadd(28.5277688544029, -274.205625983711, -23.1560340024086, 1.8)
    pt3dadd(28.6892950617706, -275.113816002435, -23.5421689195323, 1.8)
    pt3dadd(28.8508212691384, -276.02200602116, -23.928303836656, 1.8)
    pt3dadd(29.0659446499338, -276.943205283705, -24.2479236838465, 1.8)
    pt3dadd(29.3022954319188, -277.869556915677, -24.5411999389344, 1.8)
    pt3dadd(29.5386462139038, -278.795908547648, -24.8344761940224, 1.8)
    pt3dadd(29.7749969958888, -279.72226017962, -25.1277524491103, 1.8)
    pt3dadd(30.016870121557, -280.635128982752, -25.4497101799226, 1.8)
    pt3dadd(30.2828150697847, -281.489226314556, -25.8966900813913, 1.8)
    pt3dadd(30.5487600180123, -282.34332364636, -26.34366998286, 1.8)
    pt3dadd(30.81470496624, -283.197420978165, -26.7906498843286, 1.8)
    pt3dadd(31.0806499144676, -284.051518309969, -27.2376297857973, 1.8)
    pt3dadd(31.3465948626953, -284.905615641773, -27.6846096872659, 1.8)
    pt3dadd(31.6648406447894, -285.699737069316, -28.2009867939783, 1.8)
    pt3dadd(31.9898675420972, -286.486082262967, -28.7263616624753, 1.8)
    pt3dadd(32.314894439405, -287.272427456618, -29.2517365309724, 1.8)
    pt3dadd(32.6399213367128, -288.058772650269, -29.7771113994694, 1.8)
    pt3dadd(32.9649482340206, -288.84511784392, -30.3024862679664, 1.8)
    pt3dadd(33.2899751313284, -289.631463037571, -30.8278611364635, 1.8)
    pt3dadd(33.5788441694257, -290.479797640377, -31.2644665435017, 1.8)
    pt3dadd(33.8503453543712, -291.357907870908, -31.6584329502051, 1.8)
    pt3dadd(34.1218465393167, -292.236018101438, -32.0523993569086, 1.8)
    pt3dadd(34.3933477242622, -293.114128331969, -32.446365763612, 1.8)
    pt3dadd(34.6648489092077, -293.992238562499, -32.8403321703154, 1.8)
    pt3dadd(34.9363500941532, -294.87034879303, -33.2342985770188, 1.8)
    pt3dadd(35.2078512790987, -295.74845902356, -33.6282649837222, 1.8)
    pt3dadd(35.6037726551512, -296.546860230675, -34.0742372872293, 1.8)
    pt3dadd(36.0347329481312, -297.322813973074, -34.5348553671304, 1.8)
    pt3dadd(36.4656932411112, -298.098767715473, -34.9954734470314, 1.8)
    pt3dadd(36.8966535340912, -298.874721457872, -35.4560915269325, 1.8)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(-9.84628692830335, -37.7464575417144, -0.176625396433878, 3.46717474303637)
    pt3dadd(-10.6712117280075, -38.2224856985883, 0.1430209534703, 3.46717474303637)
    pt3dadd(-11.484882391828, -38.7093389261425, 0.460690570616544, 3.34125886200322)
    pt3dadd(-12.2985530556486, -39.1961921536967, 0.778360187762789, 3.21534298097008)
    pt3dadd(-13.1122237194691, -39.683045381251, 1.09602980490903, 3.08942709993693)
    pt3dadd(-13.9258943832897, -40.1698986088052, 1.41369942205528, 2.96351121890378)
    pt3dadd(-14.7395650471102, -40.6567518363594, 1.73136903920152, 2.83759533787063)
    pt3dadd(-15.5532357109308, -41.1436050639137, 2.04903865634776, 2.71167945683748)
    pt3dadd(-16.3344590422084, -41.7570724733127, 2.12359279063351, 2.7)
    pt3dadd(-17.1123649795585, -42.3834848333462, 2.17329095793163, 2.7)
    pt3dadd(-17.8902709169086, -43.0098971933796, 2.22298912522975, 2.7)
    pt3dadd(-18.6681768542586, -43.6363095534131, 2.27268729252787, 2.7)
  }
}
proc shape3d_11() {
  adendIML[9] {
    pt3dadd(-19.4460827916087, -44.2627219134466, 2.32238545982598, 2.7)
    pt3dadd(-20.2239887289588, -44.88913427348, 2.3720836271241, 2.7)
    pt3dadd(-21.0018946663089, -45.5155466335135, 2.42178179442222, 2.7)
    pt3dadd(-21.869858069803, -45.9296070795907, 2.62061075754501, 2.7)
    pt3dadd(-22.7803896017686, -46.2432935762163, 2.88993047670993, 2.7)
    pt3dadd(-23.6909211337342, -46.5569800728419, 3.15925019587485, 2.7)
    pt3dadd(-24.6014526656998, -46.8706665694675, 3.42856991503976, 2.7)
    pt3dadd(-25.5119841976655, -47.1843530660931, 3.69788963420468, 2.7)
    pt3dadd(-26.4225157296311, -47.4980395627187, 3.96720935336959, 2.7)
    pt3dadd(-27.3330472615967, -47.8117260593444, 4.23652907253451, 2.7)
    pt3dadd(-27.953370957467, -48.4011094348967, 4.71515815485432, 2.7)
    pt3dadd(-28.5185944275624, -49.0428379175926, 5.23352769808591, 2.7)
    pt3dadd(-29.0838178976578, -49.6845664002885, 5.7518972413175, 2.7)
    pt3dadd(-29.6506513753673, -50.3258467621703, 6.26378116958823, 2.7)
    pt3dadd(-30.4125311323967, -50.9128389972562, 5.98995759175482, 2.7)
    pt3dadd(-31.1744108894262, -51.4998312323422, 5.7161340139214, 2.7)
    pt3dadd(-31.9362906464557, -52.0868234674281, 5.44231043608799, 2.7)
    pt3dadd(-32.6981704034852, -52.6738157025141, 5.16848685825458, 2.7)
    pt3dadd(-33.4600501605147, -53.2608079376001, 4.89466328042117, 2.7)
    pt3dadd(-34.2219299175441, -53.8478001726861, 4.62083970258776, 2.7)
    pt3dadd(-34.9838096745736, -54.434792407772, 4.34701612475435, 2.7)
    pt3dadd(-35.7728765624183, -54.9846059677024, 4.27659700101555, 2.7)
    pt3dadd(-36.6057729056569, -55.4744823060327, 4.53409429141642, 2.7)
    pt3dadd(-37.4386692488956, -55.964358644363, 4.7915915818173, 2.7)
    pt3dadd(-38.2715655921342, -56.4542349826933, 5.04908887221818, 2.7)
    pt3dadd(-39.1044619353728, -56.9441113210236, 5.30658616261906, 2.7)
    pt3dadd(-39.9373582786115, -57.4339876593539, 5.56408345301993, 2.7)
    pt3dadd(-40.7702546218501, -57.9238639976843, 5.82158074342081, 2.7)
    pt3dadd(-41.6031509650887, -58.4137403360146, 6.07907803382169, 2.7)
    pt3dadd(-42.4360473083273, -58.9036166743449, 6.33657532422257, 2.7)
    pt3dadd(-43.268943651566, -59.3934930126752, 6.59407261462344, 2.7)
    pt3dadd(-44.1018399948046, -59.8833693510055, 6.85156990502432, 2.7)
    pt3dadd(-44.816021157947, -60.5606060882585, 6.87335044835958, 2.7)
    pt3dadd(-45.4952751794507, -61.2929660472036, 6.82578086979202, 2.7)
    pt3dadd(-46.1745292009543, -62.0253260061486, 6.77821129122445, 2.7)
    pt3dadd(-46.853783222458, -62.7576859650937, 6.73064171265689, 2.7)
    pt3dadd(-47.5330372439616, -63.4900459240388, 6.68307213408933, 2.7)
    pt3dadd(-48.1701854301755, -64.2591192126373, 6.63565749580116, 2.7)
    pt3dadd(-48.8030118821713, -65.0319607497916, 6.58825876055119, 2.7)
    pt3dadd(-49.4358383341671, -65.804802286946, 6.54086002530123, 2.7)
    pt3dadd(-50.068664786163, -66.5776438241003, 6.49346129005127, 2.7)
    pt3dadd(-50.7014912381588, -67.3504853612546, 6.4460625548013, 2.7)
    pt3dadd(-51.3056610641789, -68.1287612718542, 6.27992376116634, 2.62931721415121)
    pt3dadd(-51.906642554631, -68.9076418107223, 6.10057395127946, 2.55077026312278)
    pt3dadd(-52.5076240450832, -69.6865223495904, 5.92122414139259, 2.47222331209435)
    pt3dadd(-53.1086055355354, -70.4654028884585, 5.74187433150571, 2.39367636106592)
    pt3dadd(-53.7095870259875, -71.2442834273266, 5.56252452161883, 2.31512941003749)
    pt3dadd(-54.3237048165907, -72.0018209063966, 5.47119404358856, 2.25)
    pt3dadd(-55.0015868602336, -72.6557581137039, 5.80711377180594, 2.25)
    pt3dadd(-55.6794689038765, -73.3096953210113, 6.14303350002332, 2.25)
    pt3dadd(-56.3573509475193, -73.9636325283186, 6.47895322824069, 2.25)
    pt3dadd(-57.0352329911622, -74.617569735626, 6.81487295645807, 2.25)
    pt3dadd(-57.7131150348051, -75.2715069429333, 7.15079268467544, 2.25)
    pt3dadd(-58.3909970784479, -75.9254441502407, 7.48671241289282, 2.25)
    pt3dadd(-59.0957419095044, -76.5782037433006, 7.694253995117, 2.25)
    pt3dadd(-59.8538348227297, -77.2286246564363, 7.64684333520502, 2.25)
    pt3dadd(-60.611927735955, -77.879045569572, 7.59943267529304, 2.25)
    pt3dadd(-61.3700206491804, -78.5294664827077, 7.55202201538105, 2.25)
    pt3dadd(-62.1281135624057, -79.1798873958434, 7.50461135546907, 2.25)
    pt3dadd(-62.886206475631, -79.8303083089791, 7.45720069555708, 2.25)
    pt3dadd(-63.6442993888563, -80.4807292221147, 7.4097900356451, 2.25)
    pt3dadd(-64.4023923020817, -81.1311501352504, 7.36237937573311, 2.25)
    pt3dadd(-65.1381996405225, -81.7908501716799, 7.22396813485151, 2.25)
    pt3dadd(-65.8633825617462, -82.4549739341399, 7.04217330846382, 2.25)
    pt3dadd(-66.58856548297, -83.1190976965999, 6.86037848207614, 2.25)
    pt3dadd(-67.3137484041937, -83.7832214590599, 6.67858365568844, 2.25)
    pt3dadd(-68.0389313254175, -84.4473452215199, 6.49678882930076, 2.25)
    pt3dadd(-68.7641142466413, -85.1114689839799, 6.31499400291307, 2.25)
    pt3dadd(-69.487975240456, -85.778728548678, 6.14364741465826, 2.25)
    pt3dadd(-70.1961775639111, -86.4831327351015, 6.09606368632988, 2.25)
    pt3dadd(-70.9043798873663, -87.1875369215251, 6.04847995800151, 2.25)
    pt3dadd(-71.6125822108216, -87.8919411079487, 6.00089622967314, 2.25)
    pt3dadd(-72.3207845342767, -88.5963452943722, 5.95331250134477, 2.25)
    pt3dadd(-73.0289868577319, -89.3007494807958, 5.9057287730164, 2.25)
    pt3dadd(-73.7371891811871, -90.0051536672193, 5.85814504468802, 2.25)
    pt3dadd(-74.4453915046423, -90.7095578536429, 5.81056131635966, 2.25)
    pt3dadd(-75.1523427269052, -91.4151321355447, 5.76297949625365, 2.25)
    pt3dadd(-75.8077588351933, -92.1689047599961, 5.71547627926763, 2.25)
    pt3dadd(-76.4631749434815, -92.9226773844476, 5.66797306228162, 2.25)
    pt3dadd(-77.1185910517696, -93.676450008899, 5.62046984529559, 2.25)
    pt3dadd(-77.7740071600578, -94.4302226333505, 5.57296662830958, 2.25)
    pt3dadd(-78.428837451778, -95.1844324007951, 5.5254680728599, 2.25)
    pt3dadd(-78.9643734050868, -96.0276609618799, 5.47891878194856, 2.25)
    pt3dadd(-79.4999093583957, -96.8708895229648, 5.43236949103723, 2.25)
    pt3dadd(-80.0354453117046, -97.7141180840496, 5.3858202001259, 2.25)
    pt3dadd(-80.5886349519334, -98.5449245592598, 5.33910487023058, 2.25)
    pt3dadd(-81.2009053188216, -99.3341586499915, 5.29183386582531, 2.25)
    pt3dadd(-81.8131756857099, -100.123392740723, 5.24456286142005, 2.25)
    pt3dadd(-82.4254460525981, -100.912626831455, 5.19729185701479, 2.25)
    pt3dadd(-83.1229177070681, -101.552572137837, 5.24679994922242, 2.25)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(-83.1229177070681, -101.552572137837, 5.24679994922242, 2.25)
    pt3dadd(-83.7140176559757, -102.43617082358, 5.26888217389295, 2.25)
    pt3dadd(-84.3705425982071, -103.187444369806, 5.33643259187206, 2.25)
    pt3dadd(-85.0270675404384, -103.938717916032, 5.40398300985118, 2.25)
    pt3dadd(-85.6835924826698, -104.689991462258, 5.47153342783029, 2.25)
    pt3dadd(-86.3401174249012, -105.441265008484, 5.5390838458094, 2.25)
    pt3dadd(-86.9966423671325, -106.19253855471, 5.60663426378852, 2.25)
    pt3dadd(-87.6531673093639, -106.943812100936, 5.67418468176763, 2.25)
    pt3dadd(-88.3096922515953, -107.695085647162, 5.74173509974674, 2.25)
    pt3dadd(-88.9662171938266, -108.446359193388, 5.80928551772586, 2.25)
    pt3dadd(-89.622742136058, -109.197632739614, 5.87683593570497, 2.25)
    pt3dadd(-90.1985040208335, -110.013162507219, 5.8398110722908, 2.25)
    pt3dadd(-90.7666390763865, -110.834760287136, 5.79291068116381, 2.25)
    pt3dadd(-91.3347741319396, -111.656358067052, 5.74601029003682, 2.25)
    pt3dadd(-91.9029091874926, -112.477955846969, 5.69910989890983, 2.25)
    pt3dadd(-92.4710442430456, -113.299553626885, 5.65220950778283, 2.25)
    pt3dadd(-93.0786614486215, -114.081438158291, 5.73512472521299, 2.25)
    pt3dadd(-93.7111336253662, -114.838322236423, 5.89976201720294, 2.25)
    pt3dadd(-94.3436058021109, -115.595206314555, 6.06439930919289, 2.25)
    pt3dadd(-94.9760779788557, -116.352090392687, 6.22903660118283, 2.25)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(-94.9760779788557, -116.352090392687, 6.22903660118283, 2.25)
    pt3dadd(-95.6085501556004, -117.108974470819, 6.39367389317279, 2.25)
    pt3dadd(-96.2410223323451, -117.865858548952, 6.55831118516273, 2.25)
    pt3dadd(-96.8734945090898, -118.622742627084, 6.72294847715268, 2.25)
    pt3dadd(-97.5059666858345, -119.379626705216, 6.88758576914262, 2.25)
    pt3dadd(-98.1384388625792, -120.136510783348, 7.05222306113257, 2.25)
    pt3dadd(-98.7709110393239, -120.89339486148, 7.21686035312252, 2.25)
    pt3dadd(-99.3336489680035, -121.717927088672, 7.22401780766346, 2.25)
    pt3dadd(-99.8894185694422, -122.549219185697, 7.21543879021775, 2.25)
    pt3dadd(-100.445188170881, -123.380511282722, 7.20685977277203, 2.25)
    pt3dadd(-101.00095777232, -124.211803379747, 7.19828075532632, 2.25)
    pt3dadd(-101.556727373758, -125.043095476772, 7.1897017378806, 2.25)
    pt3dadd(-102.112496975197, -125.874387573797, 7.18112272043488, 2.25)
    pt3dadd(-102.673060105478, -126.70194842582, 7.15859622384529, 2.25)
    pt3dadd(-103.24200287286, -127.522986634486, 7.11168793722958, 2.25)
    pt3dadd(-103.810945640242, -128.344024843153, 7.06477965061387, 2.25)
    pt3dadd(-104.379888407625, -129.165063051819, 7.01787136399815, 2.25)
    pt3dadd(-104.948831175007, -129.986101260486, 6.97096307738245, 2.25)
    pt3dadd(-105.517773942389, -130.807139469152, 6.92405479076674, 2.25)
    pt3dadd(-106.086716709771, -131.628177677818, 6.87714650415103, 2.25)
    pt3dadd(-106.655659477154, -132.449215886485, 6.83023821753532, 2.25)
    pt3dadd(-107.224602244536, -133.270254095151, 6.78332993091962, 2.25)
    pt3dadd(-107.62491336613, -134.184570725974, 6.73887123024317, 2.25)
    pt3dadd(-108.017054620181, -135.103406510662, 6.6945312071291, 2.25)
    pt3dadd(-108.409195874231, -136.022242295349, 6.65019118401504, 2.25)
    pt3dadd(-108.801337128282, -136.941078080036, 6.60585116090097, 2.25)
    pt3dadd(-109.193478382333, -137.859913864723, 6.56151113778689, 2.25)
    pt3dadd(-109.585619636384, -138.77874964941, 6.51717111467281, 2.25)
    pt3dadd(-110.01458774209, -139.678373013804, 6.47225672388915, 2.25)
    pt3dadd(-110.542723108994, -140.526261217144, 6.42579567716956, 2.25)
    pt3dadd(-111.070858475898, -141.374149420484, 6.37933463044998, 2.25)
    pt3dadd(-111.598993842802, -142.222037623824, 6.33287358373039, 2.25)
    pt3dadd(-112.127129209706, -143.069925827164, 6.2864125370108, 2.25)
    pt3dadd(-112.65526457661, -143.917814030503, 6.23995149029122, 2.25)
    pt3dadd(-113.183399943514, -144.765702233843, 6.19349044357163, 2.25)
    pt3dadd(-113.709802604361, -145.612847321728, 6.13638893329326, 2.25)
    pt3dadd(-114.206753728452, -146.447361362326, 5.89842696929536, 2.25)
    pt3dadd(-114.703704852542, -147.281875402924, 5.66046500529747, 2.25)
    pt3dadd(-115.200655976633, -148.116389443522, 5.42250304129958, 2.25)
    pt3dadd(-115.697607100724, -148.95090348412, 5.18454107730168, 2.25)
    pt3dadd(-116.194558224815, -149.785417524718, 4.9465791133038, 2.25)
    pt3dadd(-116.691509348906, -150.619931565316, 4.70861714930591, 2.25)
    pt3dadd(-117.188460472996, -151.454445605914, 4.47065518530802, 2.25)
    pt3dadd(-117.666293780131, -152.297779128446, 4.49385775734807, 2.25)
    pt3dadd(-118.127438924572, -153.148811278376, 4.74503386199389, 2.25)
    pt3dadd(-118.588584069013, -153.999843428305, 4.99620996663972, 2.25)
    pt3dadd(-119.049729213454, -154.850875578234, 5.24738607128554, 2.25)
    pt3dadd(-119.510874357895, -155.701907728164, 5.49856217593136, 2.25)
    pt3dadd(-119.972019502336, -156.552939878093, 5.74973828057718, 2.25)
    pt3dadd(-120.433164646777, -157.403972028023, 6.00091438522301, 2.25)
    pt3dadd(-120.894309791217, -158.255004177952, 6.25209048986884, 2.25)
    pt3dadd(-121.322173294841, -159.149634008997, 6.27362763768307, 2.25)
    pt3dadd(-121.740420277011, -160.056861116664, 6.22881204864585, 2.25)
    pt3dadd(-122.15866725918, -160.964088224331, 6.18399645960861, 2.25)
    pt3dadd(-122.57691424135, -161.871315331997, 6.1391808705714, 2.25)
    pt3dadd(-122.995161223519, -162.778542439664, 6.09436528153417, 2.25)
    pt3dadd(-123.406490505921, -163.689073224471, 6.05866986213035, 2.25)
    pt3dadd(-123.795024253198, -164.610490444195, 6.05302766188973, 2.25)
    pt3dadd(-124.183558000475, -165.531907663918, 6.0473854616491, 2.25)
    pt3dadd(-124.572091747753, -166.453324883642, 6.04174326140847, 2.25)
    pt3dadd(-124.96062549503, -167.374742103365, 6.03610106116784, 2.25)
    pt3dadd(-125.349159242307, -168.296159323089, 6.0304588609272, 2.25)
    pt3dadd(-125.737692989584, -169.217576542813, 6.02481666068656, 2.25)
    pt3dadd(-126.110674228531, -170.144698046931, 6.01014585765665, 2.25)
    pt3dadd(-126.434914819348, -171.089696443483, 5.96717994349115, 2.25)
    pt3dadd(-126.759155410166, -172.034694840035, 5.92421402932564, 2.25)
    pt3dadd(-127.083396000983, -172.979693236588, 5.88124811516014, 2.25)
    pt3dadd(-127.4076365918, -173.92469163314, 5.83828220099463, 2.25)
    pt3dadd(-127.731877182617, -174.869690029692, 5.79531628682913, 2.25)
    pt3dadd(-128.056117773435, -175.814688426244, 5.75235037266362, 2.25)
    pt3dadd(-128.388670570798, -176.755658789113, 5.69241755424364, 2.25)
    pt3dadd(-128.72994265639, -177.692403849531, 5.61468689505207, 2.25)
    pt3dadd(-129.071214741983, -178.629148909948, 5.53695623586049, 2.25)
    pt3dadd(-129.412486827576, -179.565893970366, 5.45922557666891, 2.25)
    pt3dadd(-129.753758913168, -180.502639030783, 5.38149491747733, 2.25)
    pt3dadd(-130.095030998761, -181.439384091201, 5.30376425828575, 2.25)
    pt3dadd(-130.436303084354, -182.376129151619, 5.22603359909417, 2.25)
    pt3dadd(-130.777575169946, -183.312874212036, 5.1483029399026, 2.25)
    pt3dadd(-131.118847255539, -184.249619272454, 5.07057228071101, 2.25)
    pt3dadd(-131.460119341132, -185.186364332872, 4.99284162151943, 2.25)
    pt3dadd(-131.801391426724, -186.123109393289, 4.91511096232784, 2.25)
    pt3dadd(-132.142663512317, -187.059854453707, 4.83738030313629, 2.25)
    pt3dadd(-132.48393559791, -187.996599514125, 4.7596496439447, 2.25)
    pt3dadd(-132.825207683502, -188.933344574542, 4.68191898475311, 2.25)
    pt3dadd(-133.166479769095, -189.87008963496, 4.60418832556154, 2.25)
    pt3dadd(-133.507751854688, -190.806834695378, 4.52645766636996, 2.25)
    pt3dadd(-133.84902394028, -191.743579755795, 4.44872700717838, 2.25)
    pt3dadd(-134.190296025873, -192.680324816213, 4.37099634798679, 2.25)
    pt3dadd(-134.531568111466, -193.617069876631, 4.29326568879523, 2.25)
    pt3dadd(-134.872840197058, -194.553814937048, 4.21553502960366, 2.25)
    pt3dadd(-135.214112282651, -195.490559997466, 4.13780437041206, 2.25)
    pt3dadd(-135.606408991922, -196.403503856548, 4.06921069126843, 2.25)
    pt3dadd(-136.123098892844, -197.258422644873, 4.02289210262578, 2.25)
    pt3dadd(-136.639788793766, -198.113341433198, 3.9765735139831, 2.25)
    pt3dadd(-137.156478694689, -198.968260221523, 3.93025492534046, 2.25)
    pt3dadd(-137.673168595611, -199.823179009848, 3.88393633669778, 2.25)
    pt3dadd(-138.189858496533, -200.678097798173, 3.83761774805514, 2.25)
    pt3dadd(-138.703875432333, -201.526450472035, 3.73578385728961, 2.25)
    pt3dadd(-139.213015989752, -202.362824366844, 3.53267157092262, 2.25)
    pt3dadd(-139.722156547171, -203.199198261653, 3.32955928455567, 2.25)
    pt3dadd(-140.23129710459, -204.035572156461, 3.12644699818867, 2.25)
    pt3dadd(-140.740437662009, -204.87194605127, 2.9233347118217, 2.25)
    pt3dadd(-141.249578219428, -205.708319946079, 2.72022242545473, 2.25)
    pt3dadd(-141.758718776847, -206.544693840888, 2.51711013908774, 2.25)
    pt3dadd(-142.267859334266, -207.381067735697, 2.31399785272077, 2.25)
    pt3dadd(-142.776999891685, -208.217441630506, 2.11088556635377, 2.25)
    pt3dadd(-143.326006434415, -209.043301574755, 2.01016347779454, 2.25)
    pt3dadd(-143.895961739366, -209.863636652414, 1.96324534995269, 2.25)
    pt3dadd(-144.427834274451, -210.694008505688, 1.95232698120544, 2.2423474710848)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(-144.427834274451, -210.694008505688, 1.95232698120544, 2.21220096482625)
    pt3dadd(-145.10893798037, -211.407628805613, 2.21672571113366, 2.21220096482625)
    pt3dadd(-145.737166558572, -212.150858634882, 2.44680890133816, 2.1820544585677)
    pt3dadd(-146.365395136774, -212.894088464151, 2.67689209154267, 2.15190795230915)
    pt3dadd(-146.993623714976, -213.63731829342, 2.90697528174717, 2.1217614460506)
    pt3dadd(-147.621852293178, -214.380548122689, 3.13705847195168, 2.09161493979205)
    pt3dadd(-148.25008087138, -215.123777951959, 3.36714166215619, 2.06146843353351)
    pt3dadd(-148.878309449582, -215.867007781228, 3.5972248523607, 2.03132192727496)
    pt3dadd(-149.506538027784, -216.610237610497, 3.82730804256521, 2.00117542101641)
    pt3dadd(-150.134766605986, -217.353467439766, 4.05739123276971, 1.97102891475786)
    pt3dadd(-150.762995184188, -218.096697269036, 4.28747442297422, 1.94088240849931)
    pt3dadd(-151.39122376239, -218.839927098305, 4.51755761317873, 1.91073590224076)
    pt3dadd(-152.019452340592, -219.583156927574, 4.74764080338323, 1.88058939598221)
    pt3dadd(-152.647680918794, -220.326386756843, 4.97772399358775, 1.85044288972366)
    pt3dadd(-153.275909496996, -221.069616586112, 5.20780718379227, 1.82029638346511)
    pt3dadd(-153.904247689939, -221.823656276947, 5.34723328075994, 1.8)
    pt3dadd(-154.532811746339, -222.599969913005, 5.29985854623006, 1.8)
    pt3dadd(-155.16137580274, -223.376283549063, 5.25248381170018, 1.8)
    pt3dadd(-155.789939859141, -224.152597185121, 5.20510907717029, 1.8)
    pt3dadd(-156.418503915541, -224.928910821178, 5.15773434264041, 1.8)
    pt3dadd(-157.047067971942, -225.705224457236, 5.11035960811054, 1.8)
    pt3dadd(-157.675632028343, -226.481538093294, 5.06298487358063, 1.8)
    pt3dadd(-158.304196084744, -227.257851729352, 5.01561013905078, 1.8)
    pt3dadd(-158.99250122155, -227.977971286174, 4.93238164195145, 1.8)
    pt3dadd(-159.686300685299, -228.692922730176, 4.84585571045157, 1.8)
    pt3dadd(-160.380100149047, -229.407874174178, 4.75932977895171, 1.8)
    pt3dadd(-161.073899612795, -230.12282561818, 4.67280384745185, 1.8)
    pt3dadd(-161.767699076544, -230.837777062181, 4.58627791595198, 1.8)
    pt3dadd(-162.461498540292, -231.552728506183, 4.49975198445211, 1.8)
    pt3dadd(-163.155298004041, -232.267679950185, 4.41322605295223, 1.8)
  }
}
proc shape3d_12() {
  adendMML[7] {
    pt3dadd(-163.849097467789, -232.982631394187, 4.32670012145238, 1.8)
    pt3dadd(-164.396979010918, -233.808896272887, 4.3351070218034, 1.8)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(-164.396979010918, -233.808896272887, 4.3351070218034, 1.8)
    pt3dadd(-164.886618118283, -234.679591373335, 4.38140590510985, 1.8)
    pt3dadd(-165.376257225647, -235.550286473783, 4.42770478841631, 1.8)
    pt3dadd(-165.865896333012, -236.420981574231, 4.47400367172276, 1.8)
    pt3dadd(-166.355535440376, -237.291676674679, 4.52030255502923, 1.8)
    pt3dadd(-166.845174547741, -238.162371775126, 4.56660143833568, 1.8)
    pt3dadd(-167.334813655105, -239.033066875574, 4.61290032164214, 1.8)
    pt3dadd(-167.82445276247, -239.903761976022, 4.65919920494859, 1.8)
    pt3dadd(-168.314091869834, -240.77445707647, 4.70549808825504, 1.8)
    pt3dadd(-168.819872129041, -241.635224266309, 4.72478460201961, 1.8)
    pt3dadd(-169.368559402729, -242.469600712261, 4.67226582317048, 1.8)
    pt3dadd(-169.917246676417, -243.303977158214, 4.61974704432134, 1.8)
    pt3dadd(-170.465933950105, -244.138353604167, 4.56722826547221, 1.8)
    pt3dadd(-171.014621223793, -244.97273005012, 4.51470948662308, 1.8)
    pt3dadd(-171.563308497481, -245.807106496073, 4.46219070777396, 1.8)
    pt3dadd(-172.111995771169, -246.641482942026, 4.40967192892481, 1.8)
    pt3dadd(-172.660683044857, -247.475859387979, 4.35715315007567, 1.8)
    pt3dadd(-173.209370318545, -248.310235833932, 4.30463437122654, 1.8)
    pt3dadd(-173.758057592233, -249.144612279885, 4.25211559237741, 1.8)
    pt3dadd(-174.306744865921, -249.978988725837, 4.19959681352829, 1.8)
    pt3dadd(-174.843897925957, -250.748927424213, 4.53789018453472, 1.8)
    pt3dadd(-175.380741100256, -251.517134895863, 4.88668337069174, 1.8)
    pt3dadd(-175.917584274555, -252.285342367513, 5.23547655684875, 1.8)
    pt3dadd(-176.454427448854, -253.053549839164, 5.58426974300578, 1.8)
    pt3dadd(-176.991270623152, -253.821757310814, 5.93306292916281, 1.8)
    pt3dadd(-177.528113797451, -254.589964782464, 6.28185611531983, 1.8)
    pt3dadd(-177.7762240857, -255.459702295847, 6.46017032342905, 1.8)
    pt3dadd(-177.670994628203, -256.453688209273, 6.42985918379012, 1.8)
    pt3dadd(-177.565765170706, -257.447674122698, 6.3995480441512, 1.8)
    pt3dadd(-177.460535713209, -258.441660036124, 6.36923690451227, 1.8)
    pt3dadd(-177.355306255712, -259.43564594955, 6.33892576487333, 1.8)
    pt3dadd(-177.848116913988, -260.302262421982, 6.2930054669316, 1.8)
    pt3dadd(-178.347329482072, -261.167515427898, 6.24691807581169, 1.8)
    pt3dadd(-178.846542050157, -262.032768433814, 6.20083068469174, 1.8)
    pt3dadd(-179.345754618241, -262.89802143973, 6.1547432935718, 1.8)
    pt3dadd(-179.844967186326, -263.763274445646, 6.10865590245189, 1.8)
    pt3dadd(-180.34417975441, -264.628527451561, 6.06256851133195, 1.8)
    pt3dadd(-180.843392322494, -265.493780457477, 6.01648112021201, 1.8)
    pt3dadd(-181.342604890579, -266.359033463393, 5.97039372909208, 1.8)
    pt3dadd(-181.881945592195, -267.199519187912, 5.94527390164221, 1.8)
    pt3dadd(-182.452389704327, -268.020807734472, 5.93640608202156, 1.8)
    pt3dadd(-183.022833816458, -268.842096281031, 5.92753826240094, 1.8)
    pt3dadd(-183.59327792859, -269.663384827591, 5.9186704427803, 1.8)
    pt3dadd(-184.163722040721, -270.48467337415, 5.90980262315965, 1.8)
    pt3dadd(-184.734166152853, -271.305961920709, 5.90093480353902, 1.8)
    pt3dadd(-185.304610264984, -272.127250467269, 5.89206698391838, 1.8)
    pt3dadd(-185.875054377116, -272.948539013828, 5.88319916429772, 1.8)
    pt3dadd(-186.45484261646, -273.762739056227, 5.87166248672221, 1.8)
    pt3dadd(-187.085703240036, -274.53819531872, 5.84553857849063, 1.8)
    pt3dadd(-187.716563863611, -275.313651581214, 5.81941467025905, 1.8)
    pt3dadd(-188.347424487187, -276.089107843707, 5.7932907620275, 1.8)
    pt3dadd(-188.978285110763, -276.864564106201, 5.76716685379591, 1.8)
    pt3dadd(-189.609145734338, -277.640020368694, 5.74104294556435, 1.8)
    pt3dadd(-190.240006357914, -278.415476631188, 5.71491903733278, 1.8)
    pt3dadd(-190.87086698149, -279.190932893681, 5.6887951291012, 1.8)
    pt3dadd(-191.501727605065, -279.966389156175, 5.66267122086964, 1.8)
    pt3dadd(-192.132588228641, -280.741845418668, 5.63654731263806, 1.8)
    pt3dadd(-192.763448852217, -281.517301681162, 5.6104234044065, 1.8)
    pt3dadd(-193.458762403628, -282.234062118489, 5.63295830018877, 1.8)
    pt3dadd(-194.168856773847, -282.937361998078, 5.66665199029823, 1.8)
    pt3dadd(-194.878951144067, -283.640661877667, 5.70034568040769, 1.8)
    pt3dadd(-195.589045514286, -284.343961757256, 5.73403937051712, 1.8)
    pt3dadd(-196.299139884505, -285.047261636845, 5.76773306062659, 1.8)
    pt3dadd(-197.009234254724, -285.750561516434, 5.80142675073604, 1.8)
    pt3dadd(-197.719328624943, -286.453861396024, 5.83512044084549, 1.8)
    pt3dadd(-198.429422995162, -287.157161275613, 5.86881413095496, 1.8)
    pt3dadd(-199.139517365381, -287.860461155202, 5.9025078210644, 1.8)
    pt3dadd(-199.817282613064, -288.591360767948, 5.97360599448624, 1.8)
    pt3dadd(-200.48128257814, -289.33401195627, 6.06063046726686, 1.8)
    pt3dadd(-201.145282543217, -290.076663144591, 6.14765494004749, 1.8)
    pt3dadd(-201.809282508294, -290.819314332913, 6.23467941282811, 1.8)
    pt3dadd(-202.473282473371, -291.561965521234, 6.32170388560873, 1.8)
    pt3dadd(-203.137282438447, -292.304616709556, 6.40872835838935, 1.8)
    pt3dadd(-203.801282403524, -293.047267897877, 6.49575283116997, 1.8)
    pt3dadd(-204.465282368601, -293.789919086199, 6.58277730395059, 1.8)
    pt3dadd(-205.052390937722, -294.566445884598, 6.64374660950994, 1.8)
    pt3dadd(-205.156688408457, -295.555682054536, 6.5411121236626, 1.8)
    pt3dadd(-205.260985879191, -296.544918224474, 6.43847763781525, 1.8)
    pt3dadd(-205.365283349925, -297.534154394412, 6.33584315196791, 1.8)
    pt3dadd(-205.469580820659, -298.52339056435, 6.23320866612056, 1.8)
    pt3dadd(-205.573878291393, -299.512626734287, 6.13057418027321, 1.8)
    pt3dadd(-205.678175762127, -300.501862904225, 6.02793969442586, 1.8)
    pt3dadd(-205.782473232861, -301.491099074163, 5.92530520857851, 1.8)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-144.427834274451, -210.694008505688, 1.95232698120544, 2.25)
    pt3dadd(-144.586593319015, -211.7001364599, 1.87772815688837, 2.25)
    pt3dadd(-144.798227491294, -212.676654884768, 1.83744487229499, 2.25)
    pt3dadd(-145.009861663573, -213.653173309636, 1.7971615877016, 2.25)
    pt3dadd(-145.221495835852, -214.629691734503, 1.75687830310821, 2.25)
    pt3dadd(-145.433130008132, -215.606210159371, 1.71659501851482, 2.25)
    pt3dadd(-145.579154930068, -216.59288500731, 1.67815403933145, 2.20297972471712)
    pt3dadd(-145.670567592167, -217.588013925566, 1.64124657045688, 2.11682040306479)
    pt3dadd(-145.761980254265, -218.583142843822, 1.60433910158231, 2.03066108141246)
    pt3dadd(-145.853392916363, -219.578271762078, 1.56743163270774, 1.94450175976012)
    pt3dadd(-145.944805578462, -220.573400680334, 1.53052416383317, 1.85834243810779)
    pt3dadd(-146.108149100349, -221.544059980817, 1.4290689942565, 1.8)
    pt3dadd(-146.422358614414, -222.463397314978, 1.19223308631712, 1.8)
    pt3dadd(-146.73656812848, -223.382734649138, 0.955397178377737, 1.8)
    pt3dadd(-147.050777642545, -224.302071983299, 0.71856127043835, 1.8)
    pt3dadd(-147.36498715661, -225.221409317459, 0.48172536249897, 1.8)
    pt3dadd(-147.679196670676, -226.14074665162, 0.244889454559583, 1.8)
    pt3dadd(-147.993406184741, -227.06008398578, 0.00805354662019653, 1.8)
    pt3dadd(-148.307615698807, -227.979421319941, -0.228782361319169, 1.8)
    pt3dadd(-148.621825212872, -228.898758654101, -0.465618269258563, 1.8)
    pt3dadd(-148.946300382571, -229.827084954047, -0.641111665588127, 1.8)
    pt3dadd(-149.276307841209, -230.760255518966, -0.783546822811005, 1.8)
    pt3dadd(-149.606315299848, -231.693426083884, -0.925981980033875, 1.8)
    pt3dadd(-149.936322758487, -232.626596648802, -1.06841713725676, 1.8)
    pt3dadd(-150.266330217125, -233.55976721372, -1.21085229447964, 1.8)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(-150.266330217125, -233.55976721372, -1.21085229447964, 1.8)
    pt3dadd(-150.596337675764, -234.492937778638, -1.35328745170252, 1.8)
    pt3dadd(-150.926345134403, -235.426108343557, -1.4957226089254, 1.8)
    pt3dadd(-151.256352593041, -236.359278908475, -1.63815776614826, 1.8)
    pt3dadd(-151.412029921206, -237.339880127598, -1.61424393813946, 1.8)
    pt3dadd(-151.528356941086, -238.331187533082, -1.55278132935447, 1.8)
    pt3dadd(-151.644683960966, -239.322494938566, -1.49131872056949, 1.8)
    pt3dadd(-151.761010980846, -240.31380234405, -1.4298561117845, 1.8)
    pt3dadd(-151.877338000726, -241.305109749534, -1.36839350299952, 1.8)
    pt3dadd(-152.001279967678, -242.287842270823, -1.33740142650361, 1.8)
    pt3dadd(-152.253923080863, -243.125649631857, -1.82139552063762, 1.8)
    pt3dadd(-152.506566194048, -243.963456992892, -2.30538961477163, 1.8)
    pt3dadd(-152.759209307234, -244.801264353926, -2.78938370890562, 1.8)
    pt3dadd(-153.011852420419, -245.63907171496, -3.27337780303964, 1.8)
    pt3dadd(-153.264495533604, -246.476879075995, -3.75737189717364, 1.8)
    pt3dadd(-153.517138646789, -247.314686437029, -4.24136599130765, 1.8)
    pt3dadd(-153.769781759974, -248.152493798064, -4.72536008544164, 1.8)
    pt3dadd(-153.999785595622, -248.999807567395, -5.18149456401046, 1.8)
    pt3dadd(-153.88342118618, -249.992564050317, -5.2113925544167, 1.8)
    pt3dadd(-153.599816421012, -250.923583113196, -5.05214665369615, 1.8)
    pt3dadd(-153.248349837692, -251.829550725102, -4.81615104571422, 1.8)
    pt3dadd(-152.896883254372, -252.735518337008, -4.58015543773229, 1.8)
    pt3dadd(-152.545416671052, -253.641485948914, -4.34415982975035, 1.8)
    pt3dadd(-152.193950087732, -254.54745356082, -4.1081642217684, 1.8)
    pt3dadd(-151.842483504412, -255.453421172726, -3.87216861378649, 1.8)
    pt3dadd(-151.760224816534, -256.375851159644, -3.81913896101678, 1.8)
    pt3dadd(-152.031630850095, -257.319908154429, -4.00647597162689, 1.8)
    pt3dadd(-152.303036883655, -258.263965149214, -4.19381298223698, 1.8)
    pt3dadd(-152.574442917216, -259.208022143999, -4.38114999284709, 1.8)
    pt3dadd(-152.845848950777, -260.152079138784, -4.56848700345718, 1.8)
    pt3dadd(-153.117254984338, -261.096136133569, -4.75582401406729, 1.8)
    pt3dadd(-153.388661017899, -262.040193128354, -4.94316102467739, 1.8)
    pt3dadd(-153.66006705146, -262.984250123139, -5.13049803528749, 1.8)
    pt3dadd(-154.021260679878, -263.884188662274, -5.34967341287212, 1.8)
    pt3dadd(-154.477048285917, -264.737647058879, -5.60239148394191, 1.8)
    pt3dadd(-154.932835891956, -265.591105455485, -5.85510955501169, 1.8)
    pt3dadd(-155.388623497994, -266.44456385209, -6.10782762608149, 1.8)
    pt3dadd(-155.844411104033, -267.298022248695, -6.36054569715128, 1.8)
    pt3dadd(-156.300198710072, -268.151480645301, -6.61326376822107, 1.8)
    pt3dadd(-156.755986316111, -269.004939041906, -6.86598183929087, 1.8)
    pt3dadd(-157.21177392215, -269.858397438511, -7.11869991036065, 1.8)
    pt3dadd(-157.667561528188, -270.711855835117, -7.37141798143044, 1.8)
    pt3dadd(-157.997576304108, -271.620859836426, -7.40891225592755, 1.8)
    pt3dadd(-158.205345553872, -272.583851663773, -7.2372186936858, 1.8)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(-83.1229177070681, -101.552572137837, 5.24679994922242, 2.25)
    pt3dadd(-84.1376783440203, -101.579297069294, 5.56331225454931, 2.25)
    pt3dadd(-85.0870139876486, -101.738347140268, 5.83435636656759, 2.25)
    pt3dadd(-86.036349631277, -101.897397211243, 6.10540047858587, 2.25)
    pt3dadd(-86.9856852749053, -102.056447282217, 6.37644459060414, 2.25)
    pt3dadd(-87.9350209185337, -102.215497353191, 6.64748870262243, 2.25)
    pt3dadd(-88.7137835435551, -102.39613068534, 6.32467333911855, 2.25)
    pt3dadd(-89.3779960676502, -102.59125848306, 5.60304541186524, 2.25)
    pt3dadd(-90.0422085917453, -102.786386280781, 4.88141748461192, 2.25)
    pt3dadd(-90.7064211158404, -102.981514078502, 4.15978955735861, 2.25)
    pt3dadd(-91.3706336399355, -103.176641876222, 3.4381616301053, 2.25)
    pt3dadd(-91.7869858037647, -103.860062718349, 2.95148240342553, 2.25)
    pt3dadd(-92.11766385923, -104.712264365744, 2.5460143087368, 2.25)
    pt3dadd(-92.4483419146954, -105.56446601314, 2.14054621404808, 2.25)
    pt3dadd(-92.7790199701607, -106.416667660535, 1.73507811935935, 2.25)
    pt3dadd(-93.109698025626, -107.26886930793, 1.32961002467062, 2.25)
    pt3dadd(-93.4403760810913, -108.121070955325, 0.924141929981882, 2.25)
    pt3dadd(-93.7710541365567, -108.97327260272, 0.518673835293161, 2.25)
    pt3dadd(-94.0861767999734, -109.838318739385, 0.134307711495278, 2.25)
    pt3dadd(-94.3163247244249, -110.773530714326, -0.134784270545065, 2.25)
    pt3dadd(-94.5464726488764, -111.708742689266, -0.403876252585409, 2.25)
    pt3dadd(-94.7766205733279, -112.643954664207, -0.672968234625753, 2.25)
    pt3dadd(-95.0067684977794, -113.579166639147, -0.9420602166661, 2.25)
    pt3dadd(-95.236916422231, -114.514378614088, -1.21115219870645, 2.25)
    pt3dadd(-95.4670643466824, -115.449590589029, -1.4802441807468, 2.25)
    pt3dadd(-95.6972122711339, -116.384802563969, -1.74933616278715, 2.25)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(-95.6972122711339, -116.384802563969, -1.74933616278715, 2.25)
    pt3dadd(-95.9273601955854, -117.32001453891, -2.0184281448275, 2.25)
    pt3dadd(-96.157508120037, -118.25522651385, -2.28752012686784, 2.25)
    pt3dadd(-96.355353273356, -119.165632523836, -2.6508325340107, 2.25)
    pt3dadd(-96.5531300975916, -120.075986062508, -3.01434424279453, 2.25)
    pt3dadd(-96.7509069218272, -120.98633960118, -3.37785595157834, 2.25)
    pt3dadd(-96.9486837460627, -121.896693139852, -3.74136766036216, 2.25)
    pt3dadd(-97.1464605702983, -122.807046678524, -4.10487936914597, 2.25)
    pt3dadd(-97.3442373945338, -123.717400217195, -4.4683910779298, 2.25)
    pt3dadd(-97.5420142187694, -124.627753755867, -4.83190278671361, 2.25)
    pt3dadd(-97.739791043005, -125.538107294539, -5.19541449549744, 2.25)
    pt3dadd(-97.9375678672405, -126.448460833211, -5.55892620428126, 2.25)
    pt3dadd(-98.1353446914761, -127.358814371883, -5.92243791306507, 2.25)
    pt3dadd(-98.2071394474687, -128.347180382342, -5.9934628723802, 2.25)
    pt3dadd(-98.2637778169288, -129.344931753696, -6.02929994906702, 2.25)
    pt3dadd(-98.3204161863888, -130.342683125051, -6.06513702575384, 2.25)
    pt3dadd(-98.3770545558489, -131.340434496405, -6.10097410244065, 2.25)
    pt3dadd(-98.4336929253089, -132.338185867759, -6.13681117912748, 2.25)
    pt3dadd(-98.7538165809982, -133.278786922012, -6.20944844808049, 2.25)
    pt3dadd(-99.1006796188607, -134.213588167887, -6.28582032559225, 2.25)
    pt3dadd(-99.4475426567233, -135.148389413763, -6.36219220310401, 2.25)
    pt3dadd(-99.7944056945858, -136.083190659638, -6.43856408061578, 2.25)
    pt3dadd(-100.141268732448, -137.017991905513, -6.51493595812754, 2.25)
    pt3dadd(-100.488131770311, -137.952793151389, -6.59130783563929, 2.25)
    pt3dadd(-100.834994808173, -138.887594397264, -6.66767971315107, 2.25)
    pt3dadd(-101.115577624371, -139.808880581253, -6.85742526403707, 2.25)
    pt3dadd(-101.257351814383, -140.701862587524, -7.28460580610622, 2.25)
    pt3dadd(-101.399126004396, -141.594844593795, -7.71178634817538, 2.25)
    pt3dadd(-101.540900194408, -142.487826600066, -8.13896689024454, 2.25)
    pt3dadd(-101.682674384421, -143.380808606337, -8.5661474323137, 2.25)
    pt3dadd(-101.824448574433, -144.273790612608, -8.99332797438286, 2.25)
    pt3dadd(-101.960252853554, -145.150000423398, -9.45031169910725, 2.25)
    pt3dadd(-102.071391179514, -145.956912350919, -10.030433594684, 2.25)
    pt3dadd(-102.182529505475, -146.76382427844, -10.6105554902607, 2.25)
    pt3dadd(-102.293667831436, -147.57073620596, -11.1906773858374, 2.25)
    pt3dadd(-102.404806157396, -148.377648133481, -11.7707992814141, 2.25)
    pt3dadd(-102.515944483357, -149.184560061002, -12.3509211769908, 2.25)
    pt3dadd(-102.748758136755, -150.012454350334, -12.7552098072949, 2.25)
    pt3dadd(-103.237085601569, -150.884410844812, -12.7902549045839, 2.25)
    pt3dadd(-103.725413066384, -151.756367339291, -12.825300001873, 2.25)
    pt3dadd(-104.213740531198, -152.62832383377, -12.860345099162, 2.25)
    pt3dadd(-104.702067996013, -153.500280328249, -12.895390196451, 2.25)
    pt3dadd(-105.190395460827, -154.372236822728, -12.9304352937401, 2.25)
    pt3dadd(-105.834275056142, -155.126669206657, -13.0147129505787, 2.25)
    pt3dadd(-106.513349590814, -155.85451080118, -13.1101298759197, 2.25)
    pt3dadd(-107.192424125487, -156.582352395704, -13.2055468012607, 2.25)
    pt3dadd(-107.871498660159, -157.310193990227, -13.3009637266017, 2.25)
    pt3dadd(-108.550573194831, -158.038035584751, -13.3963806519427, 2.25)
    pt3dadd(-109.053040527609, -158.878817724168, -13.5034784367995, 2.25)
    pt3dadd(-109.438755430691, -159.794263200563, -13.6182982664811, 2.25)
    pt3dadd(-109.824470333774, -160.709708676958, -13.7331180961627, 2.25)
    pt3dadd(-110.210185236856, -161.625154153353, -13.8479379258443, 2.25)
    pt3dadd(-110.595900139939, -162.540599629748, -13.9627577555259, 2.25)
    pt3dadd(-110.981615043021, -163.456045106143, -14.0775775852075, 2.25)
    pt3dadd(-111.367329946103, -164.371490582538, -14.1923974148891, 2.25)
    pt3dadd(-111.753044849186, -165.286936058933, -14.3072172445707, 2.25)
    pt3dadd(-112.144950644299, -166.131626031017, -14.6177627604138, 2.25)
    pt3dadd(-112.542064426113, -166.916794091953, -15.0929593096227, 2.25)
    pt3dadd(-112.939178207926, -167.701962152889, -15.5681558588316, 2.25)
    pt3dadd(-113.336291989739, -168.487130213825, -16.0433524080405, 2.25)
    pt3dadd(-113.733405771553, -169.272298274761, -16.5185489572495, 2.25)
    pt3dadd(-114.130519553366, -170.057466335697, -16.9937455064584, 2.25)
    pt3dadd(-114.527633335179, -170.842634396633, -17.4689420556673, 2.25)
    pt3dadd(-114.924747116993, -171.627802457569, -17.9441386048762, 2.25)
    pt3dadd(-115.326967097335, -172.407091807218, -18.4239328479196, 2.25)
    pt3dadd(-115.7744397097, -173.13428228976, -18.9444732049371, 2.25)
    pt3dadd(-116.221912322066, -173.861472772302, -19.4650135619546, 2.25)
    pt3dadd(-116.669384934431, -174.588663254843, -19.9855539189721, 2.25)
    pt3dadd(-117.116857546796, -175.315853737385, -20.5060942759896, 2.25)
  }
}
proc shape3d_13() {
  adendMML[9] {
    pt3dadd(-117.564330159161, -176.043044219927, -21.0266346330072, 2.25)
    pt3dadd(-118.011802771527, -176.770234702468, -21.5471749900247, 2.25)
    pt3dadd(-118.459275383892, -177.49742518501, -22.0677153470422, 2.25)
    pt3dadd(-118.906747996257, -178.224615667551, -22.5882557040597, 2.25)
    pt3dadd(-119.354220608622, -178.951806150093, -23.1087960610772, 2.25)
    pt3dadd(-119.678007019673, -179.854729876709, -23.3431990628756, 2.20816500219147)
    pt3dadd(-119.977698184424, -180.791888107691, -23.5218597912753, 2.15818014962633)
    pt3dadd(-120.277389349176, -181.729046338674, -23.700520519675, 2.1081952970612)
    pt3dadd(-120.577080513928, -182.666204569656, -23.8791812480747, 2.05821044449606)
    pt3dadd(-120.876771678679, -183.603362800638, -24.0578419764744, 2.00822559193093)
    pt3dadd(-121.176462843431, -184.54052103162, -24.236502704874, 1.95824073936579)
    pt3dadd(-121.476154008182, -185.477679262602, -24.4151634332737, 1.90825588680065)
    pt3dadd(-121.775845172934, -186.414837493584, -24.5938241616734, 1.85827103423552)
    pt3dadd(-122.075536337686, -187.351995724566, -24.7724848900731, 1.80828618167038)
    pt3dadd(-122.425810556142, -188.285295584276, -24.7825874916378, 1.83873084149185)
    pt3dadd(-122.786136422852, -189.217828724937, -24.7591949426136, 1.8851581102789)
    pt3dadd(-123.146462289561, -190.150361865597, -24.7358023935895, 1.93158537906596)
    pt3dadd(-123.50678815627, -191.082895006258, -24.7124098445653, 1.97801264785301)
    pt3dadd(-123.86711402298, -192.015428146919, -24.6890172955411, 2.02443991664006)
    pt3dadd(-124.227439889689, -192.947961287579, -24.665624746517, 2.07086718542711)
    pt3dadd(-124.587765756398, -193.88049442824, -24.6422321974928, 2.11729445421417)
    pt3dadd(-124.948091623107, -194.813027568901, -24.6188396484687, 2.16372172300122)
    pt3dadd(-125.308417489817, -195.745560709561, -24.5954470994445, 2.21014899178827)
    pt3dadd(-125.667515778343, -196.678459527022, -24.5815358734062, 2.25)
    pt3dadd(-126.019175154177, -197.613574283009, -24.6250798342238, 2.25)
    pt3dadd(-126.370834530011, -198.548689038996, -24.6686237950413, 2.25)
    pt3dadd(-126.722493905844, -199.483803794983, -24.7121677558589, 2.25)
    pt3dadd(-127.074153281678, -200.41891855097, -24.7557117166765, 2.25)
    pt3dadd(-127.425812657512, -201.354033306956, -24.799255677494, 2.25)
    pt3dadd(-127.777472033346, -202.289148062943, -24.8427996383116, 2.25)
    pt3dadd(-128.12913140918, -203.22426281893, -24.8863435991292, 2.25)
    pt3dadd(-128.480790785014, -204.159377574917, -24.9298875599467, 2.25)
    pt3dadd(-128.832450160848, -205.094492330904, -24.9734315207643, 2.25)
    pt3dadd(-129.184109536681, -206.029607086891, -25.0169754815819, 2.25)
    pt3dadd(-129.535768912515, -206.964721842878, -25.0605194423994, 2.25)
    pt3dadd(-129.887428288349, -207.899836598865, -25.104063403217, 2.25)
    pt3dadd(-130.239087664183, -208.834951354852, -25.1476073640346, 2.25)
    pt3dadd(-130.590747040017, -209.770066110839, -25.1911513248521, 2.25)
    pt3dadd(-130.962198197895, -210.675633646677, -25.3920352149676, 2.25)
    pt3dadd(-131.334879382597, -211.579364871199, -25.6026975238711, 2.25)
    pt3dadd(-131.707560567299, -212.483096095722, -25.8133598327745, 2.25)
    pt3dadd(-132.080241752001, -213.386827320244, -26.024022141678, 2.25)
    pt3dadd(-132.452922936702, -214.290558544767, -26.2346844505814, 2.25)
    pt3dadd(-132.825604121404, -215.194289769289, -26.4453467594848, 2.25)
    pt3dadd(-133.198285306106, -216.098020993812, -26.6560090683883, 2.25)
    pt3dadd(-133.570966490808, -217.001752218334, -26.8666713772917, 2.25)
    pt3dadd(-133.94364767551, -217.905483442856, -27.0773336861951, 2.25)
    pt3dadd(-134.316328860211, -218.809214667379, -27.2879959950986, 2.25)
    pt3dadd(-134.689010044913, -219.712945891901, -27.498658304002, 2.25)
    pt3dadd(-135.136438981171, -220.589400471144, -27.6752415609637, 2.25)
    pt3dadd(-135.588387833562, -221.464205660986, -27.8497640943116, 2.25)
    pt3dadd(-136.040336685954, -222.339010850829, -28.0242866276594, 2.25)
    pt3dadd(-136.492285538346, -223.213816040672, -28.1988091610072, 2.25)
    pt3dadd(-136.944234390738, -224.088621230514, -28.3733316943551, 2.25)
    pt3dadd(-137.39618324313, -224.963426420357, -28.5478542277029, 2.25)
    pt3dadd(-137.848132095522, -225.838231610199, -28.7223767610507, 2.25)
    pt3dadd(-138.300080947914, -226.713036800042, -28.8968992943986, 2.25)
    pt3dadd(-138.752029800306, -227.587841989884, -29.0714218277464, 2.25)
    pt3dadd(-139.203659553965, -228.462463574377, -29.2476297071484, 2.25)
    pt3dadd(-139.653312820967, -229.335947913602, -29.4342765624768, 2.25)
    pt3dadd(-140.102966087969, -230.209432252826, -29.6209234178051, 2.25)
    pt3dadd(-140.552619354971, -231.082916592051, -29.8075702731335, 2.25)
    pt3dadd(-141.002272621973, -231.956400931275, -29.9942171284618, 2.25)
    pt3dadd(-141.451925888975, -232.8298852705, -30.1808639837902, 2.25)
    pt3dadd(-141.901579155976, -233.703369609724, -30.3675108391186, 2.25)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(-141.901579155976, -233.703369609724, -30.3675108391186, 2.25)
    pt3dadd(-142.351232422978, -234.576853948949, -30.5541576944469, 2.25)
    pt3dadd(-142.80088568998, -235.450338288174, -30.7408045497753, 2.25)
    pt3dadd(-143.250538956982, -236.323822627398, -30.9274514051036, 2.25)
    pt3dadd(-143.700192223984, -237.197306966623, -31.114098260432, 2.25)
    pt3dadd(-144.149845490986, -238.070791305847, -31.3007451157604, 2.25)
    pt3dadd(-144.599498757988, -238.944275645072, -31.4873919710887, 2.25)
    pt3dadd(-145.058739006258, -239.817172559135, -31.6342893117475, 2.25)
    pt3dadd(-145.549914527348, -240.688112696369, -31.6487767143796, 2.25)
    pt3dadd(-146.041090048438, -241.559052833604, -31.6632641170116, 2.25)
    pt3dadd(-146.532265569529, -242.429992970839, -31.6777515196437, 2.25)
    pt3dadd(-147.023441090619, -243.300933108074, -31.6922389222757, 2.25)
    pt3dadd(-147.51461661171, -244.171873245308, -31.7067263249078, 2.25)
    pt3dadd(-148.0057921328, -245.042813382543, -31.7212137275398, 2.25)
    pt3dadd(-148.496967653891, -245.913753519778, -31.7357011301719, 2.25)
    pt3dadd(-148.988143174981, -246.784693657013, -31.7501885328039, 2.25)
    pt3dadd(-149.479318696071, -247.655633794248, -31.764675935436, 2.25)
    pt3dadd(-149.979011979358, -248.520691929786, -31.7829800361529, 2.25)
    pt3dadd(-150.59389237857, -249.306206777351, -31.8528979803465, 2.25)
    pt3dadd(-151.208772777782, -250.091721624915, -31.9228159245402, 2.25)
    pt3dadd(-151.823653176995, -250.87723647248, -31.9927338687339, 2.25)
    pt3dadd(-152.438533576207, -251.662751320044, -32.0626518129275, 2.25)
    pt3dadd(-153.053413975419, -252.448266167609, -32.1325697571212, 2.25)
    pt3dadd(-153.668294374631, -253.233781015173, -32.2024877013148, 2.25)
    pt3dadd(-154.283174773844, -254.019295862738, -32.2724056455085, 2.25)
    pt3dadd(-154.898055173056, -254.804810710302, -32.3423235897021, 2.25)
    pt3dadd(-155.512935572268, -255.590325557867, -32.4122415338958, 2.25)
    pt3dadd(-156.127815971481, -256.375840405431, -32.4821594780894, 2.25)
    pt3dadd(-156.682637824869, -257.17731495416, -32.7001997419055, 2.25)
    pt3dadd(-157.232176552713, -257.98019341808, -32.931269771922, 2.25)
    pt3dadd(-157.781715280557, -258.783071882001, -33.1623398019384, 2.25)
    pt3dadd(-158.331254008402, -259.585950345922, -33.3934098319549, 2.25)
    pt3dadd(-158.880792736246, -260.388828809842, -33.6244798619714, 2.25)
    pt3dadd(-159.43033146409, -261.191707273763, -33.8555498919879, 2.25)
    pt3dadd(-159.979870191935, -261.994585737683, -34.0866199220044, 2.25)
    pt3dadd(-160.529408919779, -262.797464201604, -34.3176899520208, 2.25)
    pt3dadd(-161.078947647623, -263.600342665524, -34.5487599820373, 2.25)
    pt3dadd(-161.628486375467, -264.403221129445, -34.7798300120538, 2.25)
    pt3dadd(-162.178025103312, -265.206099593365, -35.0109000420703, 2.25)
    pt3dadd(-162.729641459683, -266.00757818412, -35.2415539665028, 2.25)
    pt3dadd(-163.329654230176, -266.776448038231, -35.4625151003818, 2.25)
    pt3dadd(-163.929667000669, -267.545317892341, -35.6834762342607, 2.25)
    pt3dadd(-164.529679771161, -268.314187746452, -35.9044373681397, 2.25)
    pt3dadd(-165.129692541654, -269.083057600563, -36.1253985020187, 2.25)
    pt3dadd(-165.729705312147, -269.851927454674, -36.3463596358976, 2.25)
    pt3dadd(-166.32971808264, -270.620797308785, -36.5673207697766, 2.25)
    pt3dadd(-166.929730853132, -271.389667162896, -36.7882819036556, 2.25)
    pt3dadd(-167.529743623625, -272.158537017007, -37.0092430375346, 2.25)
    pt3dadd(-168.129756394118, -272.927406871118, -37.2302041714135, 2.25)
    pt3dadd(-168.729769164611, -273.696276725229, -37.4511653052925, 2.25)
    pt3dadd(-169.329781935104, -274.46514657934, -37.6721264391715, 2.25)
    pt3dadd(-169.936794566033, -275.239226972256, -37.8311159549057, 2.25)
    pt3dadd(-170.556420550911, -276.0226964624, -37.8784361078827, 2.25)
    pt3dadd(-171.176046535789, -276.806165952544, -37.9257562608597, 2.25)
    pt3dadd(-171.795672520667, -277.589635442688, -37.9730764138367, 2.25)
    pt3dadd(-172.415298505545, -278.373104932832, -38.0203965668137, 2.25)
    pt3dadd(-173.034924490423, -279.156574422976, -38.0677167197907, 2.25)
    pt3dadd(-173.654550475301, -279.94004391312, -38.1150368727678, 2.25)
    pt3dadd(-174.269288402711, -280.700991252634, -38.3211880413149, 2.25)
    pt3dadd(-174.883920417761, -281.461450591723, -38.5307806930633, 2.25)
    pt3dadd(-175.498552432812, -282.221909930812, -38.7403733448118, 2.25)
    pt3dadd(-176.113184447862, -282.982369269902, -38.9499659965603, 2.25)
    pt3dadd(-176.727816462912, -283.742828608991, -39.1595586483087, 2.25)
    pt3dadd(-177.342448477963, -284.50328794808, -39.3691513000572, 2.25)
    pt3dadd(-177.957080493013, -285.26374728717, -39.5787439518056, 2.25)
    pt3dadd(-178.571712508063, -286.024206626259, -39.7883366035541, 2.25)
    pt3dadd(-179.186344523114, -286.784665965348, -39.9979292553025, 2.25)
    pt3dadd(-179.800976538164, -287.545125304438, -40.207521907051, 2.25)
    pt3dadd(-180.462386880944, -288.251279316057, -40.4580395268296, 2.25)
    pt3dadd(-181.131514209058, -288.948474618892, -40.7153085076205, 2.25)
    pt3dadd(-181.800641537172, -289.645669921726, -40.9725774884115, 2.25)
    pt3dadd(-182.469768865285, -290.34286522456, -41.2298464692025, 2.25)
    pt3dadd(-183.138896193399, -291.040060527395, -41.4871154499935, 2.25)
    pt3dadd(-183.808023521513, -291.737255830229, -41.7443844307844, 2.25)
    pt3dadd(-184.477150849627, -292.434451133063, -42.0016534115754, 2.25)
    pt3dadd(-185.14627817774, -293.131646435898, -42.2589223923664, 2.25)
    pt3dadd(-185.815405505854, -293.828841738732, -42.5161913731574, 2.25)
    pt3dadd(-186.484532833968, -294.526037041566, -42.7734603539483, 2.25)
    pt3dadd(-187.153660162081, -295.223232344401, -43.0307293347393, 2.25)
    pt3dadd(-187.847730453372, -295.922443296601, -43.2010472080619, 2.25)
    pt3dadd(-188.542904578059, -296.621743449954, -43.3675171209167, 2.25)
    pt3dadd(-189.238078702745, -297.321043603308, -43.5339870337714, 2.25)
    pt3dadd(-189.933252827432, -298.020343756661, -43.7004569466262, 2.25)
    pt3dadd(-190.628426952119, -298.719643910015, -43.866926859481, 2.25)
    pt3dadd(-191.092438467448, -299.33567127229, -44.4671794612237, 2.25)
    pt3dadd(-191.514688560517, -299.936654721535, -45.1457984652579, 2.25)
    pt3dadd(-191.936938653586, -300.537638170781, -45.8244174692921, 2.25)
    pt3dadd(-192.359188746655, -301.138621620026, -46.5030364733262, 2.25)
    pt3dadd(-192.781438839724, -301.739605069271, -47.1816554773604, 2.25)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(1.18963171931778, -12.0137494762639, 0.0702451140770506, 6.24400016676519)
    pt3dadd(2.12334849264346, -12.6222006756241, 0.49345977312209, 6.24400016676519)
    pt3dadd(2.78569587196844, -13.2871863286286, 0.838554007208093, 5.89779980677066)
    pt3dadd(3.44804325129341, -13.9521719816332, 1.1836482412941, 5.55159944677613)
    pt3dadd(4.11039063061839, -14.6171576346378, 1.5287424753801, 5.2053990867816)
    pt3dadd(4.77273800994337, -15.2821432876424, 1.8738367094661, 4.85919872678707)
    pt3dadd(5.43508538926834, -15.947128940647, 2.2189309435521, 4.51299836679254)
    pt3dadd(6.09743276859332, -16.6121145936515, 2.56402517763811, 4.16679800679801)
    pt3dadd(6.7597801479183, -17.2771002466561, 2.90911941172411, 3.82059764680348)
    pt3dadd(7.42212752724328, -17.9420858996607, 3.25421364581011, 3.47439728680895)
    pt3dadd(8.09296945375201, -18.6028407415125, 3.57228487496824, 3.14518037273712)
    pt3dadd(8.8901976027728, -19.2006474087066, 3.48829400006373, 3.06865186323544)
    pt3dadd(9.68742575179359, -19.7984540759006, 3.40430312515923, 2.99212335373377)
    pt3dadd(10.4846539008144, -20.3962607430947, 3.32031225025472, 2.91559484423209)
    pt3dadd(11.2818820498352, -20.9940674102887, 3.23632137535021, 2.83906633473041)
    pt3dadd(12.079110198856, -21.5918740774828, 3.15233050044571, 2.76253782522874)
    pt3dadd(12.8437121529739, -22.2077022269049, 3.01722844661209, 2.7)
    pt3dadd(13.462476259928, -22.9040857147192, 2.65366137185844, 2.7)
    pt3dadd(14.0812403668821, -23.6004692025335, 2.29009429710478, 2.7)
    pt3dadd(14.7000044738362, -24.2968526903477, 1.92652722235112, 2.7)
    pt3dadd(15.3187685807903, -24.993236178162, 1.56296014759747, 2.7)
    pt3dadd(15.9375326877444, -25.6896196659763, 1.19939307284381, 2.7)
    pt3dadd(16.5691331925216, -26.3784739799292, 0.872197779940238, 2.7)
    pt3dadd(17.3628441688903, -26.9722425897632, 1.00434059649673, 2.7)
    pt3dadd(18.1565551452591, -27.5660111995973, 1.13648341305321, 2.7)
    pt3dadd(18.9502661216279, -28.1597798094313, 1.2686262296097, 2.7)
    pt3dadd(19.7439770979966, -28.7535484192654, 1.40076904616619, 2.7)
    pt3dadd(20.5376880743654, -29.3473170290994, 1.53291186272268, 2.7)
    pt3dadd(21.3313990507342, -29.9410856389335, 1.66505467927917, 2.7)
    pt3dadd(22.1251100271029, -30.5348542487675, 1.79719749583566, 2.7)
    pt3dadd(22.8882626839423, -31.1711350788622, 1.90524872948973, 2.7)
    pt3dadd(23.6415743273369, -31.8211065613748, 2.00554150014914, 2.7)
    pt3dadd(24.3948859707315, -32.4710780438873, 2.10583427080856, 2.7)
    pt3dadd(25.1481976141261, -33.1210495263999, 2.20612704146797, 2.7)
    pt3dadd(25.9015092575207, -33.7710210089125, 2.30641981212739, 2.7)
    pt3dadd(26.6548209009153, -34.420992491425, 2.4067125827868, 2.7)
    pt3dadd(27.4081325443099, -35.0709639739376, 2.50700535344622, 2.7)
    pt3dadd(28.1614441877045, -35.7209354564501, 2.60729812410563, 2.7)
    pt3dadd(28.9147558310992, -36.3709069389627, 2.70759089476505, 2.7)
    pt3dadd(29.6680674744938, -37.0208784214752, 2.80788366542446, 2.7)
    pt3dadd(30.4213791178884, -37.6708499039878, 2.90817643608388, 2.7)
    pt3dadd(31.174690761283, -38.3208213865003, 3.0084692067433, 2.7)
    pt3dadd(31.9280024046776, -38.9707928690129, 3.10876197740271, 2.7)
    pt3dadd(32.6824876339454, -39.6194589733463, 3.20845466009081, 2.7)
    pt3dadd(33.4525549618051, -40.2507931278404, 3.30017977078755, 2.7)
    pt3dadd(34.2226222896648, -40.8821272823344, 3.3919048814843, 2.7)
    pt3dadd(34.9926896175245, -41.5134614368284, 3.48362999218104, 2.7)
    pt3dadd(35.7627569453843, -42.1447955913224, 3.57535510287778, 2.7)
    pt3dadd(36.532824273244, -42.7761297458164, 3.66708021357452, 2.7)
    pt3dadd(37.3028916011037, -43.4074639003104, 3.75880532427126, 2.7)
    pt3dadd(38.0729589289634, -44.0387980548045, 3.850530434968, 2.7)
    pt3dadd(38.8430262568231, -44.6701322092985, 3.94225554566475, 2.7)
    pt3dadd(39.6130935846828, -45.3014663637925, 4.03398065636149, 2.7)
    pt3dadd(40.3116553235132, -46.0158078280646, 4.04000707680289, 2.65274988156692)
    pt3dadd(41.0039657081637, -46.7374061809236, 4.03854131554489, 2.60136893602828)
    pt3dadd(41.6962760928143, -47.4590045337827, 4.03707555428689, 2.54998799048963)
    pt3dadd(42.3885864774648, -48.1806028866418, 4.03560979302889, 2.49860704495098)
    pt3dadd(43.0808968621154, -48.9022012395009, 4.03414403177089, 2.44722609941234)
    pt3dadd(43.7732072467659, -49.62379959236, 4.03267827051288, 2.39584515387369)
    pt3dadd(44.4655176314165, -50.345397945219, 4.03121250925489, 2.34446420833504)
    pt3dadd(45.1578280160671, -51.0669962980781, 4.02974674799688, 2.2930832627964)
    pt3dadd(45.8588303058155, -51.7795825899198, 4.02887747044701, 2.25)
    pt3dadd(46.6049627413123, -52.4453764211182, 4.03110525808373, 2.25)
    pt3dadd(47.3510951768092, -53.1111702523165, 4.03333304572045, 2.25)
    pt3dadd(48.0972276123061, -53.7769640835148, 4.03556083335718, 2.25)
    pt3dadd(48.843360047803, -54.4427579147131, 4.0377886209939, 2.25)
    pt3dadd(49.5894924832999, -55.1085517459114, 4.04001640863063, 2.25)
    pt3dadd(50.3356249187968, -55.7743455771097, 4.04224419626735, 2.25)
    pt3dadd(51.044188692705, -56.4740130120166, 4.04206663439168, 2.25)
    pt3dadd(51.6296605173341, -57.2846657131871, 4.03400805819026, 2.25)
    pt3dadd(52.2151323419633, -58.0953184143576, 4.02594948198884, 2.25)
    pt3dadd(52.8006041665925, -58.905971115528, 4.01789090578742, 2.25)
    pt3dadd(53.3860759912216, -59.7166238166985, 4.00983232958601, 2.25)
    pt3dadd(53.9715478158508, -60.527276517869, 4.0017737533846, 2.25)
    pt3dadd(54.55701964048, -61.3379292190395, 3.99371517718318, 2.25)
    pt3dadd(55.1424914651091, -62.14858192021, 3.98565660098177, 2.25)
    pt3dadd(55.7279632897383, -62.9592346213805, 3.97759802478035, 2.25)
    pt3dadd(56.3134351143674, -63.769887322551, 3.96953944857894, 2.25)
    pt3dadd(56.8989069389966, -64.5805400237215, 3.96148087237752, 2.25)
    pt3dadd(57.6287054882719, -65.2616309097911, 3.96264349257156, 2.25)
    pt3dadd(58.3719328978737, -65.9306667345205, 3.96466409772119, 2.25)
    pt3dadd(59.1151603074756, -66.59970255925, 3.96668470287083, 2.25)
    pt3dadd(59.8583877170774, -67.2687383839794, 3.96870530802046, 2.25)
    pt3dadd(60.6016151266792, -67.9377742087089, 3.97072591317011, 2.25)
    pt3dadd(61.344842536281, -68.6068100334383, 3.97274651831974, 2.25)
    pt3dadd(61.7280167471399, -69.5195142285202, 3.99710763227466, 2.25)
    pt3dadd(62.0740382038259, -70.4573617943456, 4.02377399288378, 2.25)
    pt3dadd(62.4200596605119, -71.3952093601711, 4.0504403534929, 2.25)
    pt3dadd(62.7660811171979, -72.3330569259966, 4.07710671410203, 2.25)
    pt3dadd(63.1121025738839, -73.2709044918221, 4.10377307471114, 2.25)
    pt3dadd(63.4581240305699, -74.2087520576475, 4.13043943532026, 2.25)
    pt3dadd(63.8234952129713, -75.1362403525837, 4.14441615148415, 2.25)
    pt3dadd(64.3717210952016, -75.9658336490706, 4.03847586416713, 2.25)
    pt3dadd(64.9199469774319, -76.7954269455575, 3.93253557685012, 2.25)
    pt3dadd(65.4681728596623, -77.6250202420444, 3.82659528953311, 2.25)
  }
}
proc shape3d_14() {
  adendIML[12] {
    pt3dadd(66.0163987418926, -78.4546135385312, 3.72065500221609, 2.25)
    pt3dadd(66.5646246241229, -79.2842068350182, 3.61471471489908, 2.25)
    pt3dadd(67.1128505063532, -80.113800131505, 3.50877442758206, 2.25)
    pt3dadd(67.6610763885835, -80.9433934279919, 3.40283414026506, 2.25)
    pt3dadd(68.2093022708138, -81.7729867244788, 3.29689385294805, 2.25)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(68.2093022708138, -81.7729867244788, 3.29689385294805, 2.25)
    pt3dadd(68.9115050940298, -82.4594460307444, 3.15310001138656, 2.25)
    pt3dadd(69.6643533846763, -83.0988262887217, 2.99685553314957, 2.25)
    pt3dadd(70.4172016753229, -83.7382065466989, 2.84061105491258, 2.25)
    pt3dadd(71.1700499659694, -84.3775868046762, 2.68436657667559, 2.25)
    pt3dadd(71.9228982566159, -85.0169670626535, 2.5281220984386, 2.25)
    pt3dadd(72.6757465472624, -85.6563473206307, 2.37187762020162, 2.25)
    pt3dadd(73.4285948379089, -86.295727578608, 2.21563314196463, 2.25)
    pt3dadd(74.1814431285554, -86.9351078365853, 2.05938866372765, 2.25)
    pt3dadd(74.837837149842, -87.6652176687926, 1.93569597259627, 2.25)
    pt3dadd(75.3864080528061, -88.4967511671836, 1.8483918748987, 2.25)
    pt3dadd(75.9349789557702, -89.3282846655745, 1.76108777720114, 2.25)
    pt3dadd(76.4835498587343, -90.1598181639655, 1.67378367950357, 2.25)
    pt3dadd(77.0321207616985, -90.9913516623565, 1.58647958180601, 2.25)
    pt3dadd(77.5806916646626, -91.8228851607475, 1.49917548410845, 2.25)
    pt3dadd(78.1292625676267, -92.6544186591385, 1.41187138641088, 2.25)
    pt3dadd(78.6778334705909, -93.4859521575294, 1.32456728871331, 2.25)
    pt3dadd(79.226404373555, -94.3174856559204, 1.23726319101575, 2.25)
    pt3dadd(79.7749752765191, -95.1490191543114, 1.14995909331819, 2.25)
    pt3dadd(80.4066865155314, -95.8432807127454, 0.933424725531147, 2.25)
    pt3dadd(81.179499080025, -96.3045716867437, 0.497567664708974, 2.25)
    pt3dadd(81.9523116445186, -96.765862660742, 0.0617106038868016, 2.25)
    pt3dadd(82.7251242090122, -97.2271536347403, -0.37414645693536, 2.25)
    pt3dadd(83.4979367735058, -97.6884446087386, -0.810003517757533, 2.25)
    pt3dadd(84.2707493379993, -98.1497355827369, -1.2458605785797, 2.25)
    pt3dadd(84.9951990036261, -98.7118560923431, -1.54889207955565, 2.25)
    pt3dadd(85.6115834027503, -99.4992767988381, -1.55512934653276, 2.25)
    pt3dadd(86.2279678018744, -100.286697505333, -1.56136661350986, 2.25)
    pt3dadd(86.8443522009986, -101.074118211828, -1.56760388048696, 2.25)
    pt3dadd(87.4607366001227, -101.861538918323, -1.57384114746406, 2.25)
    pt3dadd(88.0771209992469, -102.648959624818, -1.58007841444117, 2.25)
    pt3dadd(88.693505398371, -103.436380331313, -1.58631568141827, 2.25)
    pt3dadd(89.3232612225593, -104.182560051491, -1.67604617963874, 2.25)
    pt3dadd(90.0112902726131, -104.74900984019, -2.12964364784707, 2.25)
    pt3dadd(90.6993193226669, -105.315459628889, -2.5832411160554, 2.25)
    pt3dadd(91.3873483727207, -105.881909417588, -3.03683858426373, 2.25)
    pt3dadd(92.0753774227746, -106.448359206287, -3.49043605247207, 2.25)
    pt3dadd(92.7634064728284, -107.014808994986, -3.94403352068039, 2.25)
    pt3dadd(93.4519483647013, -107.58260035735, -4.39350457816279, 2.25)
    pt3dadd(94.1807544702367, -108.255721290503, -4.5190030637518, 2.25)
    pt3dadd(94.9095605757722, -108.928842223656, -4.64450154934082, 2.25)
    pt3dadd(95.6383666813076, -109.601963156809, -4.77000003492984, 2.25)
    pt3dadd(96.3671727868431, -110.275084089963, -4.89549852051886, 2.25)
    pt3dadd(97.0959788923785, -110.948205023116, -5.02099700610788, 2.25)
    pt3dadd(97.6819073623615, -111.740773282889, -5.11692214645815, 2.25)
    pt3dadd(98.1901942183402, -112.598250814092, -5.19677673631981, 2.25)
    pt3dadd(98.698481074319, -113.455728345294, -5.27663132618145, 2.25)
    pt3dadd(99.2067679302977, -114.313205876497, -5.35648591604311, 2.25)
    pt3dadd(99.7150547862765, -115.1706834077, -5.43634050590475, 2.25)
    pt3dadd(100.223341642255, -116.028160938902, -5.5161950957664, 2.25)
    pt3dadd(100.731628498234, -116.885638470105, -5.59604968562806, 2.25)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(100.731628498234, -116.885638470105, -5.59604968562806, 2.25)
    pt3dadd(101.239915354213, -117.743116001307, -5.67590427548971, 2.25)
    pt3dadd(101.748202210191, -118.60059353251, -5.75575886535135, 2.25)
    pt3dadd(102.25648906617, -119.458071063712, -5.83561345521301, 2.25)
    pt3dadd(102.764775922149, -120.315548594915, -5.91546804507466, 2.25)
    pt3dadd(103.273062778128, -121.173026126118, -5.99532263493631, 2.25)
    pt3dadd(103.890073980082, -121.899540964087, -6.26974790683532, 2.25)
    pt3dadd(104.533382297972, -122.594379905583, -6.59123391510643, 2.25)
    pt3dadd(105.176690615862, -123.289218847079, -6.91271992337755, 2.25)
    pt3dadd(105.819998933751, -123.984057788576, -7.23420593164866, 2.25)
    pt3dadd(106.463307251641, -124.678896730072, -7.55569193991979, 2.25)
    pt3dadd(107.106615569531, -125.373735671568, -7.87717794819089, 2.25)
    pt3dadd(107.749923887421, -126.068574613064, -8.19866395646201, 2.25)
    pt3dadd(108.393232205311, -126.763413554561, -8.52014996473313, 2.25)
    pt3dadd(109.0365405232, -127.458252496057, -8.84163597300425, 2.25)
    pt3dadd(109.67984884109, -128.153091437553, -9.16312198127537, 2.25)
    pt3dadd(110.26634374525, -128.920459179194, -9.40339369266173, 2.25)
    pt3dadd(110.817283144668, -129.733217576459, -9.59283910919356, 2.25)
    pt3dadd(111.368222544086, -130.545975973723, -9.78228452572541, 2.25)
    pt3dadd(111.919161943504, -131.358734370988, -9.97172994225725, 2.25)
    pt3dadd(112.470101342922, -132.171492768252, -10.1611753587891, 2.25)
    pt3dadd(113.02104074234, -132.984251165517, -10.3506207753209, 2.25)
    pt3dadd(113.571980141758, -133.797009562781, -10.5400661918528, 2.25)
    pt3dadd(114.122919541177, -134.609767960045, -10.7295116083846, 2.25)
    pt3dadd(114.673858940595, -135.42252635731, -10.9189570249164, 2.25)
    pt3dadd(115.219710266379, -136.238131418064, -11.1101230851052, 2.25)
    pt3dadd(115.725596183253, -137.076096231955, -11.3148043245711, 2.25)
    pt3dadd(116.231482100127, -137.914061045846, -11.519485564037, 2.25)
    pt3dadd(116.737368017, -138.752025859737, -11.7241668035029, 2.25)
    pt3dadd(117.243253933874, -139.589990673628, -11.9288480429688, 2.25)
    pt3dadd(117.749139850748, -140.427955487519, -12.1335292824347, 2.25)
    pt3dadd(118.255025767622, -141.26592030141, -12.3382105219006, 2.25)
    pt3dadd(118.760911684496, -142.103885115301, -12.5428917613665, 2.25)
    pt3dadd(119.266797601369, -142.941849929192, -12.7475730008324, 2.25)
    pt3dadd(119.772683518243, -143.779814743084, -12.9522542402983, 2.25)
    pt3dadd(120.278569435117, -144.617779556975, -13.1569354797642, 2.25)
    pt3dadd(120.784455351991, -145.455744370866, -13.3616167192301, 2.25)
    pt3dadd(121.46548768486, -146.175060976284, -13.4006192256723, 2.25)
    pt3dadd(122.188382060126, -146.866019271854, -13.4000225767058, 2.25)
    pt3dadd(122.911276435393, -147.556977567424, -13.3994259277392, 2.25)
    pt3dadd(123.63417081066, -148.247935862995, -13.3988292787727, 2.25)
    pt3dadd(124.357065185927, -148.938894158565, -13.3982326298062, 2.25)
    pt3dadd(125.079959561194, -149.629852454135, -13.3976359808397, 2.25)
    pt3dadd(125.802853936461, -150.320810749706, -13.3970393318731, 2.25)
    pt3dadd(126.525748311728, -151.011769045276, -13.3964426829066, 2.25)
    pt3dadd(127.195521734243, -151.728150847803, -13.4968620935405, 2.25)
    pt3dadd(127.756054809357, -152.496814708314, -13.8050155313694, 2.25)
    pt3dadd(128.316587884472, -153.265478568826, -14.1131689691984, 2.25)
    pt3dadd(128.877120959587, -154.034142429337, -14.4213224070273, 2.25)
    pt3dadd(129.437654034702, -154.802806289849, -14.7294758448562, 2.25)
    pt3dadd(129.998187109817, -155.57147015036, -15.0376292826851, 2.25)
    pt3dadd(130.558720184931, -156.340134010872, -15.345782720514, 2.25)
    pt3dadd(131.119253260046, -157.108797871384, -15.6539361583429, 2.25)
    pt3dadd(131.679786335161, -157.877461731895, -15.9620895961719, 2.25)
    pt3dadd(132.240319410276, -158.646125592407, -16.2702430340008, 2.25)
    pt3dadd(132.80085248539, -159.414789452918, -16.5783964718297, 2.25)
    pt3dadd(133.367090813196, -160.196613310527, -16.768330302219, 2.25)
    pt3dadd(133.94622313719, -161.008179050149, -16.6910852274489, 2.25)
    pt3dadd(134.525355461184, -161.819744789772, -16.6138401526789, 2.25)
    pt3dadd(135.104487785178, -162.631310529394, -16.5365950779088, 2.25)
    pt3dadd(135.683620109172, -163.442876269017, -16.4593500031388, 2.25)
    pt3dadd(136.41277291065, -164.04282188178, -16.4033970371359, 2.25)
    pt3dadd(137.375054781111, -164.313913700846, -16.3805316174255, 2.25)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(137.375054781111, -164.313913700846, -16.3805316174255, 2.25)
    pt3dadd(138.19656813587, -164.870224501145, -16.3720649519029, 2.25)
    pt3dadd(138.996471209118, -165.470321104302, -16.3658087318756, 2.25)
    pt3dadd(139.796374282365, -166.070417707458, -16.3595525118483, 2.25)
    pt3dadd(140.596277355613, -166.670514310615, -16.3532962918209, 2.25)
    pt3dadd(141.396180428861, -167.270610913771, -16.3470400717936, 2.25)
    pt3dadd(141.711775985711, -168.205316422162, -16.3683191106404, 2.25)
    pt3dadd(141.990732424152, -169.165335961172, -16.3916812631621, 2.25)
    pt3dadd(142.269688862593, -170.125355500182, -16.4150434156837, 2.25)
    pt3dadd(142.313015267019, -171.113162609648, -16.4472086078529, 2.25)
    pt3dadd(142.267202288471, -172.111481820829, -16.4827040101361, 2.25)
    pt3dadd(142.221389309922, -173.10980103201, -16.5181994124193, 2.25)
    pt3dadd(142.175576331374, -174.108120243192, -16.5536948147025, 2.25)
    pt3dadd(142.129763352826, -175.106439454373, -16.5891902169858, 2.25)
    pt3dadd(142.083950374278, -176.104758665554, -16.624685619269, 2.25)
    pt3dadd(142.03813739573, -177.103077876735, -16.6601810215522, 2.25)
    pt3dadd(141.992324417182, -178.101397087916, -16.6956764238354, 2.25)
    pt3dadd(141.978250120123, -179.100213782999, -16.7301303608861, 2.25)
    pt3dadd(141.995013766771, -180.099513843485, -16.7635723892908, 2.25)
    pt3dadd(142.011777413419, -181.098813903971, -16.7970144176954, 2.25)
    pt3dadd(142.028541060067, -182.098113964457, -16.8304564461, 2.25)
    pt3dadd(142.045304706715, -183.097414024943, -16.8638984745047, 2.25)
    pt3dadd(142.062068353363, -184.096714085429, -16.8973405029093, 2.25)
    pt3dadd(142.078832000011, -185.096014145915, -16.9307825313139, 2.25)
    pt3dadd(142.095595646659, -186.095314206401, -16.9642245597186, 2.25)
    pt3dadd(142.149168973113, -187.091316319417, -17.0245833836149, 2.22238908584426)
    pt3dadd(142.228566516107, -188.085004722831, -17.1038259674081, 2.17540744557043)
    pt3dadd(142.307964059102, -189.078693126246, -17.1830685512012, 2.12842580529659)
    pt3dadd(142.387361602096, -190.07238152966, -17.2623111349943, 2.08144416502276)
    pt3dadd(142.46675914509, -191.066069933075, -17.3415537187874, 2.03446252474892)
    pt3dadd(142.546156688085, -192.059758336489, -17.4207963025805, 1.98748088447509)
    pt3dadd(142.625554231079, -193.053446739903, -17.5000388863736, 1.94049924420126)
    pt3dadd(142.704951774073, -194.047135143318, -17.5792814701668, 1.89351760392742)
    pt3dadd(142.784349317068, -195.040823546732, -17.6585240539599, 1.84653596365359)
    pt3dadd(142.86280631557, -196.03455339553, -17.7364544188343, 1.8)
    pt3dadd(142.843055011634, -197.032610823458, -17.6773675628577, 1.8)
    pt3dadd(142.823303707698, -198.030668251387, -17.618280706881, 1.8)
    pt3dadd(142.803552403763, -199.028725679316, -17.5591938509044, 1.8)
    pt3dadd(142.783801099827, -200.026783107244, -17.5001069949278, 1.8)
    pt3dadd(142.764049795891, -201.024840535173, -17.4410201389511, 1.8)
    pt3dadd(142.744298491956, -202.022897963102, -17.3819332829745, 1.8)
    pt3dadd(142.72454718802, -203.020955391031, -17.3228464269979, 1.8)
    pt3dadd(142.704795884084, -204.019012818959, -17.2637595710212, 1.8)
    pt3dadd(142.685044580149, -205.017070246888, -17.2046727150446, 1.8)
    pt3dadd(142.665293276213, -206.015127674817, -17.145585859068, 1.8)
    pt3dadd(142.952182230015, -206.971041126809, -17.1654092157762, 1.8)
    pt3dadd(143.249683810002, -207.925496002338, -17.1879636052443, 1.8)
    pt3dadd(143.547185389988, -208.879950877867, -17.2105179947123, 1.8)
    pt3dadd(143.844686969974, -209.834405753396, -17.2330723841803, 1.8)
    pt3dadd(144.142188549961, -210.788860628925, -17.2556267736483, 1.8)
    pt3dadd(144.4383503068, -211.743495554273, -17.2783797921368, 1.8)
    pt3dadd(144.416834156457, -212.740821076326, -17.3482286170062, 1.8)
    pt3dadd(144.395318006114, -213.73814659838, -17.4180774418757, 1.8)
    pt3dadd(144.373801855771, -214.735472120433, -17.4879262667451, 1.8)
    pt3dadd(144.352285705429, -215.732797642486, -17.5577750916145, 1.8)
    pt3dadd(144.330769555086, -216.730123164539, -17.627623916484, 1.8)
    pt3dadd(144.309253404743, -217.727448686593, -17.6974727413534, 1.8)
    pt3dadd(144.2877372544, -218.724774208646, -17.7673215662228, 1.8)
    pt3dadd(144.266221104058, -219.722099730699, -17.8371703910923, 1.8)
    pt3dadd(144.244704953715, -220.719425252752, -17.9070192159617, 1.8)
    pt3dadd(144.223188803372, -221.716750774806, -17.9768680408311, 1.8)
    pt3dadd(144.201672653029, -222.714076296859, -18.0467168657005, 1.8)
    pt3dadd(144.353625151353, -223.692127334905, -18.0880615411151, 1.8)
    pt3dadd(144.608837982264, -224.658704889735, -18.1124386089794, 1.8)
    pt3dadd(144.864050813176, -225.625282444564, -18.1368156768437, 1.8)
    pt3dadd(145.119263644088, -226.591859999394, -18.1611927447079, 1.8)
    pt3dadd(145.374476474999, -227.558437554223, -18.1855698125722, 1.8)
    pt3dadd(145.629689305911, -228.525015109053, -18.2099468804364, 1.8)
    pt3dadd(145.884902136823, -229.491592663883, -18.2343239483007, 1.8)
    pt3dadd(146.159420250187, -230.449211387719, -18.2756869367105, 1.8)
    pt3dadd(146.587429771312, -231.335600716991, -18.452100674216, 1.8)
    pt3dadd(147.015439292436, -232.221990046262, -18.6285144117215, 1.8)
    pt3dadd(147.443448813561, -233.108379375533, -18.8049281492269, 1.8)
    pt3dadd(147.871458334686, -233.994768704804, -18.9813418867324, 1.8)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(147.871458334686, -233.994768704804, -18.9813418867324, 1.8)
    pt3dadd(148.299467855811, -234.881158034076, -19.1577556242379, 1.8)
    pt3dadd(148.727477376935, -235.767547363347, -19.3341693617434, 1.8)
    pt3dadd(149.15548689806, -236.653936692618, -19.5105830992488, 1.8)
    pt3dadd(149.583496419185, -237.540326021889, -19.6869968367543, 1.8)
    pt3dadd(150.01150594031, -238.42671535116, -19.8634105742598, 1.8)
    pt3dadd(150.439515461434, -239.313104680432, -20.0398243117652, 1.8)
    pt3dadd(150.868924525684, -240.198863373635, -20.2137647621817, 1.8)
    pt3dadd(151.427842079219, -241.026265362472, -20.1588364705567, 1.8)
    pt3dadd(151.986759632753, -241.853667351308, -20.1039081789317, 1.8)
    pt3dadd(152.545677186288, -242.681069340144, -20.0489798873066, 1.8)
    pt3dadd(153.104594739822, -243.50847132898, -19.9940515956816, 1.8)
    pt3dadd(153.663512293357, -244.335873317817, -19.9391233040566, 1.8)
    pt3dadd(154.222429846891, -245.163275306653, -19.8841950124315, 1.8)
    pt3dadd(154.781347400426, -245.990677295489, -19.8292667208065, 1.8)
    pt3dadd(155.34026495396, -246.818079284325, -19.7743384291814, 1.8)
    pt3dadd(155.899182507495, -247.645481273161, -19.7194101375564, 1.8)
    pt3dadd(156.594095182258, -248.337165074125, -19.5479583811189, 1.8)
    pt3dadd(157.313987042634, -249.003920555785, -19.3551039358981, 1.8)
    pt3dadd(158.03387890301, -249.670676037445, -19.1622494906772, 1.8)
    pt3dadd(158.753770763386, -250.337431519105, -18.9693950454563, 1.8)
    pt3dadd(159.473662623761, -251.004187000764, -18.7765406002355, 1.8)
    pt3dadd(160.193554484137, -251.670942482424, -18.5836861550146, 1.8)
    pt3dadd(160.913446344513, -252.337697964084, -18.3908317097937, 1.8)
    pt3dadd(161.633338204889, -253.004453445743, -18.1979772645728, 1.8)
    pt3dadd(162.528372675008, -253.437498042809, -18.1175569654282, 1.8)
    pt3dadd(163.432202531834, -253.858806046416, -18.0427829324622, 1.8)
    pt3dadd(164.33603238866, -254.280114050023, -17.9680088994963, 1.8)
    pt3dadd(165.239862245486, -254.70142205363, -17.8932348665304, 1.8)
    pt3dadd(166.143692102313, -255.122730057237, -17.8184608335645, 1.8)
    pt3dadd(166.993688191315, -255.628052293968, -17.7689599670139, 1.8)
    pt3dadd(167.743560178697, -256.289630537938, -17.7664640415015, 1.8)
    pt3dadd(168.49343216608, -256.951208781909, -17.7639681159891, 1.8)
    pt3dadd(169.243304153462, -257.612787025879, -17.7614721904767, 1.8)
    pt3dadd(169.993176140844, -258.27436526985, -17.7589762649643, 1.8)
    pt3dadd(170.723498219091, -258.906749641217, -17.868628490708, 1.8)
    pt3dadd(171.376400151901, -259.423522535972, -18.4224017668596, 1.8)
    pt3dadd(172.029302084711, -259.940295430727, -18.976175043011, 1.8)
    pt3dadd(172.68220401752, -260.457068325483, -19.5299483191625, 1.8)
    pt3dadd(173.480872749987, -260.728177153681, -19.9496152576766, 1.8)
    pt3dadd(174.444226915272, -260.721737917272, -20.2177706015792, 1.8)
    pt3dadd(175.407581080556, -260.715298680864, -20.4859259454817, 1.8)
    pt3dadd(176.370935245841, -260.708859444455, -20.7540812893843, 1.8)
    pt3dadd(177.334289411125, -260.702420208047, -21.0222366332868, 1.8)
    pt3dadd(178.287659173955, -260.74553411185, -21.2433579167615, 1.8)
    pt3dadd(179.156560013062, -261.207871944158, -21.06656690846, 1.8)
    pt3dadd(180.025460852168, -261.670209776467, -20.8897759001586, 1.8)
    pt3dadd(180.894361691275, -262.132547608776, -20.7129848918571, 1.8)
    pt3dadd(181.763262530381, -262.594885441084, -20.5361938835556, 1.8)
    pt3dadd(182.632163369488, -263.057223273393, -20.3594028752541, 1.8)
    pt3dadd(183.501064208594, -263.519561105701, -20.1826118669526, 1.8)
    pt3dadd(184.3699650477, -263.98189893801, -20.0058208586511, 1.8)
    pt3dadd(185.238865886807, -264.444236770319, -19.8290298503497, 1.8)
    pt3dadd(186.107766725913, -264.906574602627, -19.6522388420482, 1.8)
    pt3dadd(186.941385294225, -265.43247451317, -19.5397386716006, 1.8)
    pt3dadd(187.715615936976, -266.065363568278, -19.5354543105875, 1.8)
  }
}
proc shape3d_15() {
  adendOML[10] {
    pt3dadd(188.489846579727, -266.698252623387, -19.5311699495744, 1.8)
    pt3dadd(189.264077222478, -267.331141678495, -19.5268855885613, 1.8)
    pt3dadd(190.038307865229, -267.964030733604, -19.5226012275482, 1.8)
    pt3dadd(190.803266766505, -268.604990631085, -19.5225312547915, 1.8)
    pt3dadd(191.348145547207, -269.437525322506, -19.622496758449, 1.8)
    pt3dadd(191.89302432791, -270.270060013926, -19.7224622621064, 1.8)
    pt3dadd(192.437903108612, -271.102594705347, -19.8224277657638, 1.8)
    pt3dadd(192.982781889315, -271.935129396767, -19.9223932694213, 1.8)
    pt3dadd(193.527660670017, -272.767664088188, -20.0223587730787, 1.8)
    pt3dadd(194.07253945072, -273.600198779609, -20.1223242767362, 1.8)
    pt3dadd(194.617418231422, -274.432733471029, -20.2222897803936, 1.8)
    pt3dadd(195.162297012125, -275.26526816245, -20.3222552840511, 1.8)
    pt3dadd(195.707175792827, -276.09780285387, -20.4222207877085, 1.8)
    pt3dadd(196.34651088754, -276.850929497597, -20.4875414728361, 1.8)
    pt3dadd(197.099599647736, -277.50842509126, -20.5111394299592, 1.8)
    pt3dadd(197.852688407932, -278.165920684923, -20.5347373870823, 1.8)
    pt3dadd(198.605777168127, -278.823416278587, -20.5583353442055, 1.8)
    pt3dadd(199.358865928323, -279.48091187225, -20.5819333013286, 1.8)
    pt3dadd(199.689792347497, -280.335791859244, -20.9296848410302, 1.8)
    pt3dadd(199.969972933048, -281.214398348132, -21.3164011157903, 1.8)
    pt3dadd(200.250153518599, -282.09300483702, -21.7031173905505, 1.8)
    pt3dadd(200.53033410415, -282.971611325908, -22.0898336653106, 1.8)
    pt3dadd(200.810514689702, -283.850217814795, -22.4765499400707, 1.8)
    pt3dadd(201.451359705887, -284.611492483839, -22.5223068347462, 1.8)
    pt3dadd(202.102860869518, -285.36930048119, -22.5579897850055, 1.8)
    pt3dadd(202.754362033148, -286.12710847854, -22.5936727352648, 1.8)
    pt3dadd(203.382121841743, -286.902161290984, -22.6252806301684, 1.8)
    pt3dadd(203.895949612241, -287.759969991929, -22.6373328021011, 1.8)
    pt3dadd(204.409777382739, -288.617778692874, -22.6493849740339, 1.8)
    pt3dadd(204.923605153237, -289.475587393819, -22.6614371459667, 1.8)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(137.375054781111, -164.313913700846, -16.3805316174255, 2.19185988976969)
    pt3dadd(137.773379841044, -165.068839218336, -16.7796817702115, 2.19185988976969)
    pt3dadd(138.085128258643, -165.898041163162, -17.2436182516623, 2.12479431674728)
    pt3dadd(138.396876676241, -166.727243107988, -17.7075547331132, 2.05772874372488)
    pt3dadd(138.70862509384, -167.556445052815, -18.1714912145641, 1.99066317070248)
    pt3dadd(139.020373511438, -168.385646997641, -18.635427696015, 1.92359759768008)
    pt3dadd(139.332121929037, -169.214848942467, -19.0993641774659, 1.85653202465768)
    pt3dadd(139.683253774702, -170.043456080401, -19.4979450290471, 1.8)
    pt3dadd(140.245750760536, -170.868870976106, -19.5457717044113, 1.8)
    pt3dadd(140.80824774637, -171.694285871811, -19.5935983797756, 1.8)
    pt3dadd(141.370744732204, -172.519700767516, -19.6414250551398, 1.8)
    pt3dadd(141.933241718038, -173.345115663221, -19.689251730504, 1.8)
    pt3dadd(142.495738703872, -174.170530558925, -19.7370784058682, 1.8)
    pt3dadd(143.058235689706, -174.99594545463, -19.7849050812324, 1.8)
    pt3dadd(143.620732675539, -175.821360350335, -19.8327317565967, 1.8)
    pt3dadd(144.183229661373, -176.64677524604, -19.8805584319609, 1.8)
    pt3dadd(144.745726647207, -177.472190141745, -19.9283851073251, 1.8)
    pt3dadd(145.308223633041, -178.297605037449, -19.9762117826893, 1.8)
    pt3dadd(145.858865874448, -179.120033494266, -20.0781915011342, 1.8)
    pt3dadd(146.371025686807, -179.932767484589, -20.3559608075342, 1.8)
    pt3dadd(146.883185499167, -180.745501474912, -20.6337301139341, 1.8)
    pt3dadd(147.395345311526, -181.558235465235, -20.911499420334, 1.8)
    pt3dadd(147.907505123885, -182.370969455557, -21.1892687267339, 1.8)
    pt3dadd(148.419664936245, -183.18370344588, -21.4670380331339, 1.8)
    pt3dadd(148.931824748604, -183.996437436203, -21.7448073395338, 1.8)
    pt3dadd(149.443984560963, -184.809171426526, -22.0225766459337, 1.8)
    pt3dadd(149.956144373323, -185.621905416849, -22.3003459523336, 1.8)
    pt3dadd(150.489292373116, -186.455293176759, -22.383009943571, 1.8)
    pt3dadd(151.03019492142, -187.296311927136, -22.3935879752202, 1.8)
    pt3dadd(151.571097469724, -188.137330677512, -22.4041660068693, 1.8)
    pt3dadd(152.112000018028, -188.978349427888, -22.4147440385185, 1.8)
    pt3dadd(152.652902566332, -189.819368178265, -22.4253220701676, 1.8)
    pt3dadd(153.193805114637, -190.660386928641, -22.4359001018168, 1.8)
    pt3dadd(153.734707662941, -191.501405679017, -22.446478133466, 1.8)
    pt3dadd(154.275610211245, -192.342424429394, -22.4570561651151, 1.8)
    pt3dadd(154.816512759549, -193.18344317977, -22.4676341967643, 1.8)
    pt3dadd(155.357415307853, -194.024461930146, -22.4782122284135, 1.8)
    pt3dadd(155.855651305002, -194.87326585709, -22.5496042740121, 1.8)
    pt3dadd(156.153562226865, -195.758622213039, -22.9065261220625, 1.8)
    pt3dadd(156.451473148729, -196.643978568987, -23.263447970113, 1.8)
    pt3dadd(156.749384070592, -197.529334924936, -23.6203698181635, 1.8)
    pt3dadd(157.047294992456, -198.414691280885, -23.9772916662139, 1.8)
    pt3dadd(157.345205914319, -199.300047636833, -24.3342135142644, 1.8)
    pt3dadd(157.643116836183, -200.185403992782, -24.6911353623149, 1.8)
    pt3dadd(157.941027758047, -201.07076034873, -25.0480572103653, 1.8)
    pt3dadd(158.191847247423, -202.028751902863, -25.1188272613631, 1.8)
    pt3dadd(158.43511463928, -202.998392032354, -25.1437068783084, 1.8)
    pt3dadd(158.678382031136, -203.968032161845, -25.1685864952537, 1.8)
    pt3dadd(158.921649422992, -204.937672291337, -25.1934661121991, 1.8)
    pt3dadd(159.482953873904, -205.701545286968, -25.3984404563891, 1.8)
    pt3dadd(160.15168129265, -206.395916582804, -25.6642451646543, 1.8)
    pt3dadd(160.820408711396, -207.090287878641, -25.9300498729196, 1.8)
    pt3dadd(161.489136130141, -207.784659174477, -26.1958545811848, 1.8)
    pt3dadd(162.157863548887, -208.479030470314, -26.46165928945, 1.8)
    pt3dadd(162.826590967633, -209.173401766151, -26.7274639977153, 1.8)
    pt3dadd(163.495318386378, -209.867773061987, -26.9932687059805, 1.8)
    pt3dadd(164.134964275334, -210.596381794289, -27.2196796691056, 1.8)
    pt3dadd(164.703568099982, -211.408627741713, -27.3498572842686, 1.8)
    pt3dadd(165.272171924629, -212.220873689137, -27.4800348994317, 1.8)
    pt3dadd(165.840775749277, -213.033119636561, -27.6102125145947, 1.8)
    pt3dadd(166.409379573925, -213.845365583985, -27.7403901297577, 1.8)
    pt3dadd(166.977983398572, -214.657611531409, -27.8705677449207, 1.8)
    pt3dadd(167.54658722322, -215.469857478832, -28.0007453600837, 1.8)
    pt3dadd(168.115191047868, -216.282103426256, -28.1309229752467, 1.8)
    pt3dadd(168.683794872516, -217.09434937368, -28.2611005904097, 1.8)
    pt3dadd(169.252398697163, -217.906595321104, -28.3912782055727, 1.8)
    pt3dadd(169.821002521811, -218.718841268528, -28.5214558207357, 1.8)
    pt3dadd(170.291653885681, -219.571055725856, -28.7137117176487, 1.8)
    pt3dadd(170.662988219932, -220.46379549159, -28.9689107044887, 1.8)
    pt3dadd(171.034322554183, -221.356535257324, -29.2241096913287, 1.8)
    pt3dadd(171.405656888434, -222.249275023057, -29.4793086781687, 1.8)
    pt3dadd(171.776991222685, -223.142014788791, -29.7345076650087, 1.8)
    pt3dadd(172.148325556936, -224.034754554525, -29.9897066518487, 1.8)
    pt3dadd(172.519659891187, -224.927494320258, -30.2449056386887, 1.8)
    pt3dadd(172.890994225438, -225.820234085992, -30.5001046255287, 1.8)
    pt3dadd(173.262328559689, -226.712973851726, -30.7553036123687, 1.8)
    pt3dadd(173.63366289394, -227.605713617459, -31.0105025992087, 1.8)
    pt3dadd(174.002125320111, -228.505123955264, -31.2289547712481, 1.8)
    pt3dadd(174.355082430591, -229.440548442167, -31.2490123748714, 1.8)
    pt3dadd(174.708039541072, -230.375972929071, -31.2690699784946, 1.8)
    pt3dadd(175.060996651552, -231.311397415974, -31.2891275821179, 1.8)
    pt3dadd(175.413953762033, -232.246821902877, -31.3091851857412, 1.8)
    pt3dadd(175.766910872513, -233.18224638978, -31.3292427893645, 1.8)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(175.766910872513, -233.18224638978, -31.3292427893645, 1.8)
    pt3dadd(176.119867982994, -234.117670876684, -31.3493003929878, 1.8)
    pt3dadd(176.472825093474, -235.053095363587, -31.3693579966111, 1.8)
    pt3dadd(176.825782203954, -235.98851985049, -31.3894156002344, 1.8)
    pt3dadd(177.178739314435, -236.923944337393, -31.4094732038577, 1.8)
    pt3dadd(177.576787656478, -237.836494607487, -31.4272488549204, 1.8)
    pt3dadd(178.124342609846, -238.673202046869, -31.4374583565852, 1.8)
    pt3dadd(178.671897563214, -239.509909486252, -31.4476678582501, 1.8)
    pt3dadd(179.219452516582, -240.346616925634, -31.4578773599149, 1.8)
    pt3dadd(179.767007469949, -241.183324365017, -31.4680868615797, 1.8)
    pt3dadd(180.314562423317, -242.020031804399, -31.4782963632445, 1.8)
    pt3dadd(180.862117376685, -242.856739243782, -31.4885058649094, 1.8)
    pt3dadd(181.409672330053, -243.693446683164, -31.4987153665742, 1.8)
    pt3dadd(181.957227283421, -244.530154122547, -31.508924868239, 1.8)
    pt3dadd(182.480688439656, -245.26836540831, -31.9183897274518, 1.8)
    pt3dadd(183.002251044255, -245.998815358965, -32.3593152529906, 1.8)
    pt3dadd(183.523813648853, -246.72926530962, -32.8002407785294, 1.8)
    pt3dadd(184.045376253452, -247.459715260276, -33.2411663040682, 1.8)
    pt3dadd(184.566938858051, -248.190165210931, -33.682091829607, 1.8)
    pt3dadd(185.393630456281, -248.456247659274, -33.3827494270773, 1.8)
    pt3dadd(186.275944226024, -248.63768024019, -32.9484630810982, 1.8)
    pt3dadd(187.158257995767, -248.819112821105, -32.5141767351192, 1.8)
    pt3dadd(187.787570959146, -248.636379483332, -32.5716080939332, 1.8)
    pt3dadd(188.089518449948, -247.982440738026, -33.2652880130508, 1.8)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(68.2093022708138, -81.7729867244788, 3.29689385294805, 2.25)
    pt3dadd(68.735354070132, -82.6084676130006, 3.40018438705832, 2.25)
    pt3dadd(69.2541124605361, -83.4458850242817, 3.57229426959976, 2.25)
    pt3dadd(69.7728708509403, -84.2833024355629, 3.74440415214119, 2.25)
    pt3dadd(70.2916292413445, -85.1207198468441, 3.91651403468261, 2.25)
    pt3dadd(70.8103876317487, -85.9581372581252, 4.08862391722405, 2.25)
    pt3dadd(71.3291460221528, -86.7955546694064, 4.26073379976547, 2.25)
    pt3dadd(71.847904412557, -87.6329720806876, 4.43284368230691, 2.25)
    pt3dadd(72.3666628029612, -88.4703894919687, 4.60495356484834, 2.25)
    pt3dadd(72.8854211933653, -89.3078069032499, 4.77706344738976, 2.25)
    pt3dadd(73.4041795837695, -90.1452243145311, 4.9491733299312, 2.25)
    pt3dadd(73.9229379741737, -90.9826417258122, 5.12128321247263, 2.25)
    pt3dadd(74.4416963645778, -91.8200591370934, 5.29339309501406, 2.25)
    pt3dadd(74.9797253437313, -92.6454992181723, 5.36726791417864, 2.23368184674955)
    pt3dadd(75.5627148755046, -93.4429947775864, 5.21194876353188, 2.17929152054075)
    pt3dadd(76.1457044072778, -94.2404903370005, 5.05662961288511, 2.12490119433194)
    pt3dadd(76.7286939390511, -95.0379858964146, 4.90131046223835, 2.07051086812313)
    pt3dadd(77.3116834708243, -95.8354814558287, 4.74599131159159, 2.01612054191432)
    pt3dadd(77.8946730025976, -96.6329770152428, 4.59067216094484, 1.96173021570551)
    pt3dadd(78.4776625343708, -97.4304725746568, 4.43535301029808, 1.9073398894967)
    pt3dadd(79.060652066144, -98.2279681340709, 4.28003385965132, 1.8529495632879)
    pt3dadd(79.6386054666185, -99.0284761324726, 4.12554880590922, 1.8)
    pt3dadd(80.0314757079838, -99.9396944542114, 4.00171769682432, 1.8)
    pt3dadd(80.4243459493491, -100.85091277595, 3.87788658773942, 1.8)
    pt3dadd(80.8172161907143, -101.762131097689, 3.75405547865451, 1.8)
    pt3dadd(81.2100864320796, -102.673349419428, 3.63022436956962, 1.8)
    pt3dadd(81.6029566734449, -103.584567741166, 3.50639326048472, 1.8)
    pt3dadd(82.0237308121736, -104.454774826669, 3.29144112395542, 1.8)
    pt3dadd(82.4950167926919, -105.250743068424, 2.91154102829273, 1.8)
    pt3dadd(82.9663027732102, -106.046711310179, 2.53164093263004, 1.8)
    pt3dadd(83.4375887537285, -106.842679551934, 2.15174083696735, 1.8)
    pt3dadd(83.9088747342468, -107.638647793689, 1.77184074130466, 1.8)
    pt3dadd(84.3801607147651, -108.434616035444, 1.39194064564197, 1.8)
    pt3dadd(84.8514466952834, -109.230584277199, 1.01204054997929, 1.8)
    pt3dadd(85.4865241492854, -109.976916333482, 0.927421225074845, 1.8)
    pt3dadd(86.1673080643586, -110.709397275718, 0.925200811216982, 1.8)
    pt3dadd(86.8480919794319, -111.441878217955, 0.922980397359122, 1.8)
    pt3dadd(87.5288758945051, -112.174359160191, 0.920759983501252, 1.8)
    pt3dadd(88.2096598095784, -112.906840102428, 0.918539569643386, 1.8)
    pt3dadd(88.8630485297701, -113.654525364913, 0.914888281384314, 1.8)
    pt3dadd(89.1255363056413, -114.619160467267, 0.890819903301452, 1.8)
    pt3dadd(89.3880240815124, -115.583795569622, 0.8667515252186, 1.8)
    pt3dadd(89.6505118573836, -116.548430671977, 0.84268314713573, 1.8)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(89.6505118573836, -116.548430671977, 0.84268314713573, 1.8)
    pt3dadd(89.9129996332548, -117.513065774331, 0.818614769052868, 1.8)
    pt3dadd(90.1754874091259, -118.477700876686, 0.794546390970009, 1.8)
    pt3dadd(90.4379751849971, -119.44233597904, 0.770478012887146, 1.8)
    pt3dadd(90.7004629608682, -120.406971081395, 0.746409634804277, 1.8)
    pt3dadd(90.9629507367394, -121.37160618375, 0.722341256721425, 1.8)
    pt3dadd(91.2546812786097, -122.324102491692, 0.72357907487514, 1.8)
    pt3dadd(91.6824456552192, -123.220130586157, 0.842538278099934, 1.8)
    pt3dadd(92.1102100318287, -124.116158680623, 0.961497481324731, 1.8)
    pt3dadd(92.5379744084382, -125.012186775089, 1.08045668454952, 1.8)
    pt3dadd(92.9657387850477, -125.908214869555, 1.19941588777432, 1.8)
    pt3dadd(93.3935031616572, -126.804242964021, 1.31837509099912, 1.8)
    pt3dadd(93.8212675382667, -127.700271058486, 1.43733429422392, 1.8)
    pt3dadd(94.2490319148762, -128.596299152952, 1.55629349744871, 1.8)
    pt3dadd(94.6767962914857, -129.492327247418, 1.67525270067351, 1.8)
    pt3dadd(95.1045606680952, -130.388355341884, 1.79421190389831, 1.8)
    pt3dadd(95.5323250447048, -131.284383436349, 1.9131711071231, 1.8)
    pt3dadd(96.0169531016031, -132.153747434156, 1.98278002243715, 1.8)
    pt3dadd(96.5416580474231, -133.004318873434, 2.01760740414638, 1.8)
    pt3dadd(97.0663629932432, -133.854890312712, 2.0524347858556, 1.8)
    pt3dadd(97.5910679390633, -134.70546175199, 2.08726216756482, 1.8)
    pt3dadd(98.1157728848833, -135.556033191268, 2.12208954927404, 1.8)
    pt3dadd(98.6404778307034, -136.406604630546, 2.15691693098326, 1.8)
    pt3dadd(99.1651827765235, -137.257176069824, 2.19174431269249, 1.8)
    pt3dadd(99.6898877223436, -138.107747509101, 2.22657169440171, 1.8)
    pt3dadd(100.214592668164, -138.958318948379, 2.26139907611092, 1.8)
    pt3dadd(100.739297613984, -139.808890387657, 2.29622645782015, 1.8)
    pt3dadd(101.264002559804, -140.659461826935, 2.33105383952937, 1.8)
    pt3dadd(101.770390498902, -141.492696471183, 2.50982000010333, 1.8)
    pt3dadd(102.26191006377, -142.311858403643, 2.80542488125422, 1.8)
    pt3dadd(102.753429628639, -143.131020336103, 3.1010297624051, 1.8)
    pt3dadd(103.244949193508, -143.950182268562, 3.39663464355598, 1.8)
    pt3dadd(103.736468758376, -144.769344201022, 3.69223952470687, 1.8)
    pt3dadd(104.227988323245, -145.588506133482, 3.98784440585776, 1.8)
    pt3dadd(104.719507888114, -146.407668065941, 4.28344928700865, 1.8)
    pt3dadd(105.211027452982, -147.226829998401, 4.57905416815954, 1.8)
    pt3dadd(105.702547017851, -148.045991930861, 4.87465904931042, 1.8)
    pt3dadd(106.19406658272, -148.865153863321, 5.1702639304613, 1.8)
    pt3dadd(106.685586147588, -149.68431579578, 5.46586881161219, 1.8)
    pt3dadd(107.177105712457, -150.50347772824, 5.76147369276308, 1.8)
    pt3dadd(107.695871174021, -151.346950453061, 5.81672307528362, 1.8)
    pt3dadd(108.222189199187, -152.197162130451, 5.80534590443566, 1.8)
    pt3dadd(108.748507224352, -153.04737380784, 5.79396873358769, 1.8)
    pt3dadd(109.274825249517, -153.89758548523, 5.78259156273973, 1.8)
    pt3dadd(109.760310411036, -154.761027324852, 5.77452046866014, 1.8)
    pt3dadd(109.833626558021, -155.758015098862, 5.7998210826095, 1.8)
    pt3dadd(109.906942705005, -156.755002872872, 5.82512169655887, 1.8)
    pt3dadd(109.980258851989, -157.751990646881, 5.85042231050825, 1.8)
    pt3dadd(110.053574998973, -158.748978420891, 5.87572292445763, 1.8)
    pt3dadd(110.126891145957, -159.745966194901, 5.90102353840701, 1.8)
    pt3dadd(110.200207292942, -160.742953968911, 5.92632415235638, 1.8)
    pt3dadd(110.273523439926, -161.739941742921, 5.95162476630576, 1.8)
    pt3dadd(110.34683958691, -162.736929516931, 5.97692538025514, 1.8)
    pt3dadd(110.420155733894, -163.733917290941, 6.0022259942045, 1.8)
    pt3dadd(110.493471880878, -164.730905064951, 6.02752660815388, 1.8)
    pt3dadd(110.566788027863, -165.72789283896, 6.05282722210325, 1.8)
    pt3dadd(110.640104174847, -166.72488061297, 6.07812783605264, 1.8)
    pt3dadd(110.782816806257, -167.705098952151, 6.09390789751174, 1.8)
    pt3dadd(111.17375534983, -168.625334306729, 6.07563367155615, 1.8)
    pt3dadd(111.564693893403, -169.545569661307, 6.05735944560058, 1.8)
    pt3dadd(111.955632436976, -170.465805015884, 6.039085219645, 1.8)
    pt3dadd(112.346570980549, -171.386040370462, 6.02081099368942, 1.8)
    pt3dadd(112.737509524122, -172.30627572504, 6.00253676773385, 1.8)
    pt3dadd(113.128448067695, -173.226511079617, 5.98426254177828, 1.8)
    pt3dadd(113.815429597306, -173.89224413701, 5.98451988779813, 1.8)
    pt3dadd(114.666862404973, -174.416601684717, 5.9950714844487, 1.8)
    pt3dadd(115.51829521264, -174.940959232423, 6.00562308109927, 1.8)
    pt3dadd(116.369728020306, -175.46531678013, 6.01617467774984, 1.8)
    pt3dadd(117.221160827973, -175.989674327837, 6.02672627440041, 1.8)
  }
}
proc shape3d_16() {
  adendMML[13] {
    pt3dadd(117.695218820268, -176.734252890496, 6.29800670222195, 1.8)
    pt3dadd(117.954592644493, -177.604112641674, 6.7176127467297, 1.8)
    pt3dadd(118.213966468718, -178.473972392852, 7.13721879123743, 1.8)
    pt3dadd(118.473340292943, -179.34383214403, 7.55682483574518, 1.8)
    pt3dadd(118.732714117168, -180.213691895208, 7.97643088025292, 1.8)
    pt3dadd(118.992087941393, -181.083551646386, 8.39603692476067, 1.8)
    pt3dadd(119.251461765618, -181.953411397564, 8.8156429692684, 1.8)
    pt3dadd(119.510835589843, -182.823271148742, 9.23524901377615, 1.8)
    pt3dadd(119.770209414068, -183.69313089992, 9.65485505828389, 1.8)
    pt3dadd(120.183964426069, -184.527648002458, 9.88961729168962, 1.8)
    pt3dadd(120.799065949313, -185.316070635169, 9.88330315415839, 1.8)
    pt3dadd(121.414167472556, -186.10449326788, 9.87698901662717, 1.8)
    pt3dadd(122.029268995799, -186.892915900591, 9.87067487909594, 1.8)
    pt3dadd(122.644370519042, -187.681338533302, 9.86436074156471, 1.8)
    pt3dadd(123.259472042285, -188.469761166014, 9.85804660403348, 1.8)
    pt3dadd(123.874573565529, -189.258183798725, 9.85173246650226, 1.8)
    pt3dadd(124.489675088772, -190.046606431436, 9.84541832897102, 1.8)
    pt3dadd(124.683506588918, -190.900675335789, 10.2270747165554, 1.8)
    pt3dadd(124.766620869567, -191.771997242417, 10.7106966260908, 1.8)
    pt3dadd(124.849735150216, -192.643319149045, 11.1943185356263, 1.8)
    pt3dadd(124.932849430865, -193.514641055673, 11.6779404451617, 1.8)
    pt3dadd(125.015963711514, -194.3859629623, 12.1615623546971, 1.8)
    pt3dadd(125.099077992164, -195.257284868928, 12.6451842642325, 1.8)
    pt3dadd(125.182192272813, -196.128606775556, 13.128806173768, 1.8)
    pt3dadd(125.248308019329, -197.088494548454, 13.216781642534, 1.8)
    pt3dadd(125.307558605862, -198.084151219793, 13.144968267646, 1.8)
    pt3dadd(125.366809192394, -199.079807891133, 13.0731548927581, 1.8)
    pt3dadd(125.426059778927, -200.075464562472, 13.0013415178702, 1.8)
    pt3dadd(125.48531036546, -201.071121233812, 12.9295281429822, 1.8)
    pt3dadd(125.544560951992, -202.066777905151, 12.8577147680943, 1.8)
    pt3dadd(125.603811538525, -203.062434576491, 12.7859013932064, 1.8)
    pt3dadd(125.663062125058, -204.05809124783, 12.7140880183184, 1.8)
    pt3dadd(125.72231271159, -205.05374791917, 12.6422746434305, 1.8)
    pt3dadd(125.781563298123, -206.049404590509, 12.5704612685425, 1.8)
    pt3dadd(125.840813884655, -207.045061261849, 12.4986478936546, 1.8)
    pt3dadd(125.900064471188, -208.040717933188, 12.4268345187667, 1.8)
    pt3dadd(126.18835850256, -208.947995452036, 12.4433568353177, 1.8)
    pt3dadd(126.791109455283, -209.733936006958, 12.5811564475137, 1.8)
    pt3dadd(127.393860408006, -210.519876561879, 12.7189560597098, 1.8)
    pt3dadd(127.996611360728, -211.305817116801, 12.8567556719058, 1.8)
    pt3dadd(128.599362313451, -212.091757671722, 12.9945552841018, 1.8)
    pt3dadd(129.202113266174, -212.877698226644, 13.1323548962978, 1.8)
    pt3dadd(129.804864218897, -213.663638781565, 13.2701545084938, 1.8)
    pt3dadd(130.40761517162, -214.449579336487, 13.4079541206898, 1.8)
    pt3dadd(131.003794641105, -215.24231741612, 13.5202530088906, 1.8)
    pt3dadd(131.568654126049, -216.067452804119, 13.5110143001171, 1.8)
    pt3dadd(132.133513610993, -216.892588192118, 13.5017755913436, 1.8)
    pt3dadd(132.698373095938, -217.717723580117, 13.4925368825701, 1.8)
    pt3dadd(133.263232580882, -218.542858968117, 13.4832981737966, 1.8)
    pt3dadd(133.828092065827, -219.367994356116, 13.4740594650231, 1.8)
    pt3dadd(134.390935811851, -220.193269155782, 13.4673825042632, 1.8)
    pt3dadd(134.559190241852, -221.045834371779, 13.9621784210385, 1.8)
    pt3dadd(134.727444671854, -221.898399587775, 14.4569743378137, 1.8)
    pt3dadd(134.895699101855, -222.750964803772, 14.951770254589, 1.8)
    pt3dadd(135.063953531856, -223.603530019769, 15.4465661713642, 1.8)
    pt3dadd(135.232207961857, -224.456095235765, 15.9413620881395, 1.8)
    pt3dadd(135.400462391858, -225.308660451762, 16.4361580049148, 1.8)
    pt3dadd(135.928481119136, -226.118491115318, 16.2989302393363, 1.8)
    pt3dadd(136.488048292332, -226.924574301075, 16.1062790615043, 1.8)
    pt3dadd(137.047615465528, -227.730657486833, 15.9136278836724, 1.8)
    pt3dadd(137.607182638724, -228.536740672591, 15.7209767058404, 1.8)
    pt3dadd(138.16674981192, -229.342823858349, 15.5283255280084, 1.8)
    pt3dadd(138.726316985116, -230.148907044106, 15.3356743501764, 1.8)
    pt3dadd(139.285884158312, -230.954990229864, 15.1430231723444, 1.8)
    pt3dadd(139.845451331508, -231.761073415622, 14.9503719945125, 1.8)
    pt3dadd(140.405018504705, -232.567156601379, 14.7577208166805, 1.8)
    pt3dadd(140.911149422552, -233.391219001099, 14.8539316738828, 1.8)
  }
  adendOML[12] {pt3dclear()
    pt3dadd(140.911149422552, -233.391219001099, 14.8539316738828, 1.8)
    pt3dadd(141.383044522819, -234.226800416989, 15.1352121598098, 1.8)
    pt3dadd(141.854939623085, -235.06238183288, 15.4164926457368, 1.8)
    pt3dadd(142.326834723351, -235.89796324877, 15.6977731316638, 1.8)
    pt3dadd(142.798729823617, -236.733544664661, 15.9790536175907, 1.8)
    pt3dadd(143.270624923884, -237.569126080551, 16.2603341035177, 1.8)
    pt3dadd(143.74252002415, -238.404707496441, 16.5416145894447, 1.8)
    pt3dadd(144.214415124416, -239.240288912332, 16.8228950753717, 1.8)
    pt3dadd(144.686310224682, -240.075870328222, 17.1041755612987, 1.8)
    pt3dadd(145.158205324949, -240.911451744112, 17.3854560472257, 1.8)
    pt3dadd(145.630100425215, -241.747033160003, 17.6667365331527, 1.8)
    pt3dadd(146.101995525481, -242.582614575893, 17.9480170190797, 1.8)
    pt3dadd(146.531190675793, -243.453523507321, 18.1238802284117, 1.8)
    pt3dadd(146.880967465079, -244.39013868398, 18.103676057338, 1.8)
    pt3dadd(147.230744254365, -245.326753860639, 18.0834718862642, 1.8)
    pt3dadd(147.580521043651, -246.263369037298, 18.0632677151904, 1.8)
    pt3dadd(147.930297832937, -247.199984213957, 18.0430635441166, 1.8)
    pt3dadd(148.280074622223, -248.136599390616, 18.0228593730429, 1.8)
    pt3dadd(148.629851411509, -249.073214567275, 18.0026552019691, 1.8)
    pt3dadd(148.979628200795, -250.009829743934, 17.9824510308954, 1.8)
    pt3dadd(149.329404990081, -250.946444920593, 17.9622468598216, 1.8)
    pt3dadd(149.679181779367, -251.883060097252, 17.9420426887478, 1.8)
    pt3dadd(150.06256954051, -252.805208058331, 17.9222193966716, 1.8)
    pt3dadd(150.502781132953, -253.702897261689, 17.9030400313462, 1.8)
    pt3dadd(150.942992725395, -254.600586465047, 17.8838606660208, 1.8)
    pt3dadd(151.383204317837, -255.498275668405, 17.8646813006954, 1.8)
    pt3dadd(151.82341591028, -256.395964871762, 17.84550193537, 1.8)
    pt3dadd(152.263627502722, -257.29365407512, 17.8263225700446, 1.8)
    pt3dadd(152.703839095165, -258.191343278478, 17.8071432047192, 1.8)
    pt3dadd(153.144050687607, -259.089032481836, 17.7879638393938, 1.8)
    pt3dadd(153.584262280049, -259.986721685193, 17.7687844740684, 1.8)
    pt3dadd(154.024473872492, -260.884410888551, 17.749605108743, 1.8)
    pt3dadd(154.464685464934, -261.782100091909, 17.7304257434176, 1.8)
    pt3dadd(154.904897057377, -262.679789295267, 17.7112463780922, 1.8)
    pt3dadd(155.347465000195, -263.576141005671, 17.7086393759655, 1.8)
    pt3dadd(155.795718834805, -264.469265335173, 17.74602161519, 1.8)
    pt3dadd(156.243972669415, -265.362389664675, 17.7834038544146, 1.8)
    pt3dadd(156.692226504025, -266.255513994177, 17.8207860936392, 1.8)
    pt3dadd(157.140480338634, -267.148638323678, 17.8581683328637, 1.8)
    pt3dadd(157.588734173244, -268.04176265318, 17.8955505720883, 1.8)
    pt3dadd(158.036988007854, -268.934886982682, 17.9329328113128, 1.8)
    pt3dadd(158.485241842464, -269.828011312184, 17.9703150505374, 1.8)
    pt3dadd(158.933495677074, -270.721135641686, 18.007697289762, 1.8)
    pt3dadd(159.381749511684, -271.614259971188, 18.0450795289866, 1.8)
    pt3dadd(159.830003346294, -272.507384300689, 18.0824617682111, 1.8)
    pt3dadd(160.414546988754, -273.299637996063, 18.1019406921639, 1.8)
    pt3dadd(161.140973830673, -273.986881283634, 18.1027815411809, 1.8)
    pt3dadd(161.867400672593, -274.674124571206, 18.1036223901979, 1.8)
    pt3dadd(162.593827514512, -275.361367858777, 18.1044632392148, 1.8)
    pt3dadd(163.320254356431, -276.048611146349, 18.1053040882318, 1.8)
    pt3dadd(164.046681198351, -276.73585443392, 18.1061449372488, 1.8)
    pt3dadd(164.77310804027, -277.423097721492, 18.1069857862658, 1.8)
    pt3dadd(165.499534882189, -278.110341009063, 18.1078266352828, 1.8)
    pt3dadd(166.225961724109, -278.797584296634, 18.1086674842998, 1.8)
    pt3dadd(166.845398603987, -279.562701603894, 18.1702789411289, 1.8)
    pt3dadd(167.328110313, -280.427336084959, 18.3095506903653, 1.8)
    pt3dadd(167.810822022013, -281.291970566024, 18.4488224396017, 1.8)
    pt3dadd(168.293533731026, -282.156605047089, 18.5880941888382, 1.8)
    pt3dadd(168.776245440039, -283.021239528154, 18.7273659380745, 1.8)
    pt3dadd(169.258957149052, -283.885874009219, 18.866637687311, 1.8)
    pt3dadd(169.741668858065, -284.750508490283, 19.0059094365474, 1.8)
    pt3dadd(170.224380567078, -285.615142971348, 19.1451811857838, 1.8)
    pt3dadd(170.707092276091, -286.479777452413, 19.2844529350202, 1.8)
    pt3dadd(171.189803985104, -287.344411933478, 19.4237246842566, 1.8)
    pt3dadd(171.662369134606, -288.223306755953, 19.4409141353611, 1.8)
    pt3dadd(172.132312262002, -289.105886663051, 19.4265557022573, 1.8)
    pt3dadd(172.602255389398, -289.988466570148, 19.4121972691535, 1.8)
    pt3dadd(173.072198516793, -290.871046477246, 19.3978388360496, 1.8)
    pt3dadd(173.542141644189, -291.753626384344, 19.3834804029458, 1.8)
    pt3dadd(173.921904686104, -292.629184080197, 19.1314865903177, 1.8)
    pt3dadd(174.265851036567, -293.501952774774, 18.7851114847333, 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()
}

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, 0 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 14 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 13 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 12 adendOML[ward] {
    regadendOML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regsoma = new SectionList()
  for ward = 0, 2 soma[ward] {
    regsoma.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regaxonh = new SectionList()
  for ward = 0, 0 axonh[ward] {
    regaxonh.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.append()
  }
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access axon
proc init() {
  celldef()
}

endtemplate cell_rat_mGC_Claiborne_04