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_10

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-7.13374648251983, 37.7756227553272, 0, 10.5)
    pt3dadd(-7.13364648251983, 37.7756227553272, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-7.13364648251983, 37.7756227553272, 0, 10.4043260233424)
    pt3dadd(-7.28747593126869, 38.751702363846, -0.153639508367595, 10.4043260233424)
    pt3dadd(-7.44130538001754, 39.7277819723647, -0.307279016735189, 10.1118742080783)
    pt3dadd(-7.5951348287664, 40.7038615808835, -0.460918525102784, 9.60468635614927)
    pt3dadd(-7.74896427751526, 41.6799411894023, -0.614558033470379, 8.84590300647707)
    pt3dadd(-7.90279372626412, 42.6560207979211, -0.768197541837973, 7.76208734813001)
    pt3dadd(-8.05662317501298, 43.6321004064399, -0.921837050205568, 6.18465843842649)
    pt3dadd(-8.21045262376184, 44.6081800149587, -1.07547655857316, 3.5)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-8.21045262376184, 44.6081800149587, -1.07547655857316, 2.47906000584629)
    pt3dadd(-8.36428207251069, 45.5842596234775, -1.22911606694076, 2.47906000584629)
    pt3dadd(-8.51811152125955, 46.5603392319962, -1.38275557530835, 2.11125382662694)
    pt3dadd(-8.67194097000841, 47.536418840515, -1.53639508367595, 1.81011959652796)
    pt3dadd(-8.82577041875727, 48.5124984490338, -1.69003459204354, 1.56357174154146)
    pt3dadd(-8.97959986750613, 49.4885780575526, -1.84367410041114, 1.3617154305586)
    pt3dadd(-9.13342931625498, 50.4646576660714, -1.99731360877873, 1.19644946105406)
    pt3dadd(-9.28725876500384, 51.4407372745902, -2.15095311714633, 1.06114112938344)
    pt3dadd(-9.4410882137527, 52.416816883109, -2.30459262551392, 0.950360037097033)
    pt3dadd(-9.59491766250156, 53.3928964916277, -2.45823213388151, 0.85966014998258)
    pt3dadd(-9.74874711125042, 54.3689761001465, -2.61187164224911, 0.785401363101277)
    pt3dadd(-9.90257655999928, 55.3450557086653, -2.7655111506167, 0.72460341059529)
    pt3dadd(-10.0564060087481, 56.3211353171841, -2.9191506589843, 0.674826257154464)
    pt3dadd(-10.210235457497, 57.2972149257029, -3.07279016735189, 0.634072170831778)
    pt3dadd(-10.3640649062459, 58.2732945342217, -3.22642967571949, 0.600705547045801)
    pt3dadd(-10.5178943549947, 59.2493741427405, -3.38006918408708, 0.573387266025838)
    pt3dadd(-10.6717238037436, 60.2254537512592, -3.53370869245468, 0.551020949233567)
    pt3dadd(-10.8255532524924, 61.201533359778, -3.68734820082227, 0.532708957842651)
    pt3dadd(-10.9793827012413, 62.1776129682968, -3.84098770918987, 0.517716367340809)
    pt3dadd(-11.1332121499901, 63.1536925768156, -3.99462721755746, 0.505441472428646)
    pt3dadd(-11.287041598739, 64.1297721853344, -4.14826672592506, 0.495391638473257)
    pt3dadd(-11.4408710474879, 65.1058517938532, -4.30190623429265, 0.487163530350653)
    pt3dadd(-11.5947004962367, 66.081931402372, -4.45554574266025, 0.480426925191027)
    pt3dadd(-11.7485299449856, 67.0580110108907, -4.60918525102784, 0.474911459375497)
    pt3dadd(-11.9023593937344, 68.0340906194095, -4.76282475939543, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-11.9023593937344, 68.0340906194095, -4.76282475939543, 0.466698650595398)
    pt3dadd(-12.0561888424833, 69.0101702279283, -4.91646426776303, 0.466698650595398)
    pt3dadd(-12.2100182912321, 69.9862498364471, -5.07010377613062, 0.463671698777356)
    pt3dadd(-12.363847739981, 70.9623294449659, -5.22374328449822, 0.46119344023584)
    pt3dadd(-12.5176771887299, 71.9384090534847, -5.37738279286581, 0.459164413753823)
    pt3dadd(-12.6715066374787, 72.9144886620035, -5.53102230123341, 0.457503187374186)
    pt3dadd(-12.8253360862276, 73.8905682705222, -5.684661809601, 0.456143090249352)
    pt3dadd(-12.9791655349764, 74.866647879041, -5.8383013179686, 0.455029536906078)
    pt3dadd(-13.1329949837253, 75.8427274875598, -5.99194082633619, 0.454117836538747)
    pt3dadd(-13.2868244324742, 76.8188070960786, -6.14558033470379, 0.45337139941042)
    pt3dadd(-13.440653881223, 77.7948867045974, -6.29921984307138, 0.45276026837822)
    pt3dadd(-13.5944833299719, 78.7709663131162, -6.45285935143898, 0.452259916607997)
    pt3dadd(-13.7483127787207, 79.747045921635, -6.60649885980657, 0.451850263226359)
    pt3dadd(-13.9021422274696, 80.7231255301537, -6.76013836817416, 0.45151486740471)
    pt3dadd(-14.0559716762184, 81.6992051386725, -6.91377787654176, 0.451240268531071)
    pt3dadd(-14.2098011249673, 82.6752847471913, -7.06741738490935, 0.451015445988463)
    pt3dadd(-14.3636305737162, 83.6513643557101, -7.22105689327695, 0.450831376858844)
    pt3dadd(-14.517460022465, 84.6274439642289, -7.37469640164454, 0.450680673801733)
    pt3dadd(-14.6712894712139, 85.6035235727477, -7.52833591001214, 0.450557288574293)
    pt3dadd(-14.8251189199627, 86.5796031812665, -7.68197541837973, 0.450456269294113)
    pt3dadd(-14.9789483687116, 87.5556827897852, -7.83561492674733, 0.450373561702775)
    pt3dadd(-15.1327778174605, 88.531762398304, -7.98925443511492, 0.450305846454234)
    pt3dadd(-15.2866072662093, 89.5078420068228, -8.14289394348252, 0.450250405897802)
    pt3dadd(-15.4404367149582, 90.4839216153416, -8.29653345185011, 0.450205015009282)
    pt3dadd(-15.594266163707, 91.4600012238604, -8.45017296021771, 0.450167852092942)
    pt3dadd(-15.7480956124559, 92.4360808323792, -8.6038124685853, 0.45013742567046)
    pt3dadd(-15.9019250612047, 93.412160440898, -8.7574519769529, 0.450112514622668)
    pt3dadd(-16.0557545099536, 94.3882400494168, -8.91109148532049, 0.450092119181749)
    pt3dadd(-16.2095839587025, 95.3643196579355, -9.06473099368809, 0.450075420807047)
    pt3dadd(-16.3634134074513, 96.3403992664543, -9.21837050205568, 0.450061749334151)
    pt3dadd(-16.5172428562002, 97.3164788749731, -9.37201001042327, 0.450050556078851)
    pt3dadd(-16.671072304949, 98.2925584834919, -9.52564951879087, 0.450041391816511)
    pt3dadd(-16.8249017536979, 99.2686380920107, -9.67928902715846, 0.450033888753103)
    pt3dadd(-16.9787312024468, 100.244717700529, -9.83292853552606, 0.450027745764349)
    pt3dadd(-17.1325606511956, 101.220797309048, -9.98656804389365, 0.45002271631054)
    pt3dadd(-17.2863900999445, 102.196876917567, -10.1402075522612, 0.450018598542036)
    pt3dadd(-17.4402195486933, 103.172956526086, -10.2938470606288, 0.450015227198327)
    pt3dadd(-17.5940489974422, 104.149036134605, -10.4474865689964, 0.450012466975554)
    pt3dadd(-17.747878446191, 105.125115743123, -10.601126077364, 0.450010207096284)
    pt3dadd(-17.9017078949399, 106.101195351642, -10.7547655857316, 0.450008356863627)
    pt3dadd(-18.0555373436888, 107.077274960161, -10.9084050940992, 0.450006842021251)
    pt3dadd(-18.2093667924376, 108.05335456868, -11.0620446024668, 0.450005601773211)
    pt3dadd(-18.3631962411865, 109.029434177199, -11.2156841108344, 0.450004586344)
    pt3dadd(-18.5170256899353, 110.005513785717, -11.369323619202, 0.450003754980877)
    pt3dadd(-18.6708551386842, 110.981593394236, -11.5229631275696, 0.450003074318321)
    pt3dadd(-18.8246845874331, 111.957673002755, -11.6766026359372, 0.450002517038954)
    pt3dadd(-18.9785140361819, 112.933752611274, -11.8302421443048, 0.450002060777199)
    pt3dadd(-19.1323434849308, 113.909832219792, -11.9838816526724, 0.450001687221668)
    pt3dadd(-19.2861729336796, 114.885911828311, -12.13752116104, 0.450001381380267)
    pt3dadd(-19.4400023824285, 115.86199143683, -12.2911606694076, 0.450001130978506)
    pt3dadd(-19.5938318311773, 116.838071045349, -12.4448001777752, 0.450000925966884)
    pt3dadd(-19.7476612799262, 117.814150653868, -12.5984396861428, 0.450000758117564)
    pt3dadd(-19.9014907286751, 118.790230262386, -12.7520791945104, 0.450000620694164)
    pt3dadd(-20.0553201774239, 119.766309870905, -12.905718702878, 0.450000508181401)
    pt3dadd(-20.2091496261728, 120.742389479424, -13.0593582112455, 0.450000416063741)
    pt3dadd(-20.3629790749216, 121.718469087943, -13.2129977196131, 0.45000034064418)
    pt3dadd(-20.5168085236705, 122.694548696462, -13.3666372279807, 0.450000278895866)
    pt3dadd(-20.6706379724194, 123.67062830498, -13.5202767363483, 0.450000228340622)
    pt3dadd(-20.8244674211682, 124.646707913499, -13.6739162447159, 0.45000018694949)
    pt3dadd(-20.9782968699171, 125.622787522018, -13.8275557530835, 0.450000153061296)
    pt3dadd(-21.1321263186659, 126.598867130537, -13.9811952614511, 0.45000012531599)
    pt3dadd(-21.2859557674148, 127.574946739055, -14.1348347698187, 0.450000102600055)
    pt3dadd(-21.4397852161636, 128.551026347574, -14.2884742781863, 0.450000084001821)
    pt3dadd(-21.5936146649125, 129.527105956093, -14.4421137865539, 0.450000068774874)
    pt3dadd(-21.7474441136614, 130.503185564612, -14.5957532949215, 0.450000056308104)
    pt3dadd(-21.9012735624102, 131.479265173131, -14.7493928032891, 0.450000046101177)
    pt3dadd(-22.0551030111591, 132.455344781649, -14.9030323116567, 0.450000037744451)
    pt3dadd(-22.2089324599079, 133.431424390168, -15.0566718200243, 0.450000030902543)
    pt3dadd(-22.3627619086568, 134.407503998687, -15.2103113283919, 0.450000025300862)
    pt3dadd(-22.5165913574057, 135.383583607206, -15.3639508367595, 0.450000020714594)
    pt3dadd(-22.6704208061545, 136.359663215725, -15.5175903451271, 0.450000016959675)
    pt3dadd(-22.8242502549034, 137.335742824243, -15.6712298534947, 0.450000013885408)
    pt3dadd(-22.9780797036522, 138.311822432762, -15.8248693618623, 0.45000001136841)
    pt3dadd(-23.1319091524011, 139.287902041281, -15.9785088702298, 0.450000009307667)
    pt3dadd(-23.2857386011499, 140.2639816498, -16.1321483785974, 0.450000007620473)
    pt3dadd(-23.4395680498988, 141.240061258318, -16.285787886965, 0.450000006239116)
    pt3dadd(-23.5933974986477, 142.216140866837, -16.4394273953326, 0.450000005108156)
    pt3dadd(-23.7472269473965, 143.192220475356, -16.5930669037002, 0.450000004182204)
    pt3dadd(-23.9010563961454, 144.168300083875, -16.7467064120678, 0.450000003424099)
    pt3dadd(-24.0548858448942, 145.144379692394, -16.9003459204354, 0.450000002803415)
    pt3dadd(-24.2087152936431, 146.120459300912, -17.053985428803, 0.450000002295242)
    pt3dadd(-24.3625447423919, 147.096538909431, -17.2076249371706, 0.450000001879186)
    pt3dadd(-24.5163741911408, 148.07261851795, -17.3612644455382, 0.450000001538547)
    pt3dadd(-24.6702036398897, 149.048698126469, -17.5149039539058, 0.450000001259656)
    pt3dadd(-24.8240330886385, 150.024777734988, -17.6685434622734, 0.450000001031319)
    pt3dadd(-24.9778625373874, 151.000857343506, -17.822182970641, 0.450000000844373)
    pt3dadd(-25.1316919861362, 151.976936952025, -17.9758224790086, 0.450000000691314)
    pt3dadd(-25.2855214348851, 152.953016560544, -18.1294619873762, 0.450000000566)
    pt3dadd(-25.439350883634, 153.929096169063, -18.2831014957438, 0.450000000463401)
    pt3dadd(-25.5931803323828, 154.905175777581, -18.4367410041114, 0.450000000379401)
    pt3dadd(-25.7470097811317, 155.8812553861, -18.590380512479, 0.450000000310627)
    pt3dadd(-25.9008392298805, 156.857334994619, -18.7440200208465, 0.45000000025432)
    pt3dadd(-26.0546686786294, 157.833414603138, -18.8976595292141, 0.45000000020822)
    pt3dadd(-26.2084981273782, 158.809494211657, -19.0512990375817, 0.450000000170476)
    pt3dadd(-26.3623275761271, 159.785573820175, -19.2049385459493, 0.450000000139574)
    pt3dadd(-26.516157024876, 160.761653428694, -19.3585780543169, 0.450000000114273)
    pt3dadd(-26.6699864736248, 161.737733037213, -19.5122175626845, 0.450000000093559)
    pt3dadd(-26.8238159223737, 162.713812645732, -19.6658570710521, 0.4500000000766)
    pt3dadd(-26.9776453711225, 163.689892254251, -19.8194965794197, 0.450000000062715)
    pt3dadd(-27.1314748198714, 164.665971862769, -19.9731360877873, 0.450000000051346)
    pt3dadd(-27.2853042686203, 165.642051471288, -20.1267755961549, 0.450000000042039)
    pt3dadd(-27.4391337173691, 166.618131079807, -20.2804151045225, 0.450000000034418)
    pt3dadd(-27.592963166118, 167.594210688326, -20.4340546128901, 0.450000000028179)
    pt3dadd(-27.7467926148668, 168.570290296844, -20.5876941212577, 0.450000000023071)
    pt3dadd(-27.9006220636157, 169.546369905363, -20.7413336296253, 0.450000000018889)
    pt3dadd(-28.0544515123645, 170.522449513882, -20.8949731379929, 0.450000000015465)
    pt3dadd(-28.2082809611134, 171.498529122401, -21.0486126463605, 0.450000000012662)
    pt3dadd(-28.3621104098623, 172.47460873092, -21.2022521547281, 0.450000000010367)
    pt3dadd(-28.5159398586111, 173.450688339438, -21.3558916630957, 0.450000000008488)
    pt3dadd(-28.66976930736, 174.426767947957, -21.5095311714633, 0.450000000006949)
    pt3dadd(-28.8235987561088, 175.402847556476, -21.6631706798308, 0.450000000005689)
    pt3dadd(-28.9774282048577, 176.378927164995, -21.8168101881984, 0.450000000004658)
    pt3dadd(-29.1312576536066, 177.355006773514, -21.970449696566, 0.450000000003814)
    pt3dadd(-29.2850871023554, 178.331086382032, -22.1240892049336, 0.450000000003122)
    pt3dadd(-29.4389165511043, 179.307165990551, -22.2777287133012, 0.450000000002556)
    pt3dadd(-29.5927459998531, 180.28324559907, -22.4313682216688, 0.450000000002093)
    pt3dadd(-29.746575448602, 181.259325207589, -22.5850077300364, 0.450000000001714)
    pt3dadd(-29.9004048973508, 182.235404816107, -22.738647238404, 0.450000000001403)
    pt3dadd(-30.0542343460997, 183.211484424626, -22.8922867467716, 0.450000000001149)
    pt3dadd(-30.2080637948486, 184.187564033145, -23.0459262551392, 0.45000000000094)
    pt3dadd(-30.3618932435974, 185.163643641664, -23.1995657635068, 0.45000000000077)
    pt3dadd(-30.5157226923463, 186.139723250183, -23.3532052718744, 0.45000000000063)
    pt3dadd(-30.6695521410951, 187.115802858701, -23.506844780242, 0.450000000000516)
    pt3dadd(-30.823381589844, 188.09188246722, -23.6604842886096, 0.450000000000423)
    pt3dadd(-30.9772110385929, 189.067962075739, -23.8141237969772, 0.450000000000346)
    pt3dadd(-31.1310404873417, 190.044041684258, -23.9677633053448, 0.450000000000283)
    pt3dadd(-31.2848699360906, 191.020121292777, -24.1214028137124, 0.450000000000232)
    pt3dadd(-31.4386993848394, 191.996200901295, -24.27504232208, 0.45000000000019)
    pt3dadd(-31.5925288335883, 192.972280509814, -24.4286818304476, 0.450000000000155)
    pt3dadd(-31.7463582823371, 193.948360118333, -24.5823213388151, 0.450000000000127)
    pt3dadd(-31.900187731086, 194.924439726852, -24.7359608471827, 0.450000000000104)
    pt3dadd(-32.0540171798349, 195.90051933537, -24.8896003555503, 0.450000000000085)
    pt3dadd(-32.2078466285837, 196.876598943889, -25.0432398639179, 0.45000000000007)
    pt3dadd(-32.3616760773326, 197.852678552408, -25.1968793722855, 0.450000000000057)
    pt3dadd(-32.5155055260814, 198.828758160927, -25.3505188806531, 0.450000000000047)
    pt3dadd(-32.6693349748303, 199.804837769446, -25.5041583890207, 0.450000000000038)
    pt3dadd(-32.8231644235792, 200.780917377964, -25.6577978973883, 0.450000000000031)
    pt3dadd(-32.976993872328, 201.756996986483, -25.8114374057559, 0.450000000000026)
    pt3dadd(-33.1308233210769, 202.733076595002, -25.9650769141235, 0.450000000000021)
    pt3dadd(-33.2846527698257, 203.709156203521, -26.1187164224911, 0.450000000000017)
    pt3dadd(-33.4384822185746, 204.68523581204, -26.2723559308587, 0.450000000000014)
    pt3dadd(-33.5923116673234, 205.661315420558, -26.4259954392263, 0.450000000000012)
    pt3dadd(-33.7461411160723, 206.637395029077, -26.5796349475939, 0.450000000000009)
    pt3dadd(-33.8999705648212, 207.613474637596, -26.7332744559615, 0.450000000000008)
    pt3dadd(-34.05380001357, 208.589554246115, -26.8869139643291, 0.450000000000006)
    pt3dadd(-34.2076294623189, 209.565633854633, -27.0405534726967, 0.450000000000005)
    pt3dadd(-34.3614589110677, 210.541713463152, -27.1941929810643, 0.450000000000004)
    pt3dadd(-34.5152883598166, 211.517793071671, -27.3478324894318, 0.450000000000004)
    pt3dadd(-34.6691178085655, 212.49387268019, -27.5014719977994, 0.450000000000003)
    pt3dadd(-34.8229472573143, 213.469952288709, -27.655111506167, 0.450000000000002)
    pt3dadd(-34.9767767060632, 214.446031897227, -27.8087510145346, 0.450000000000002)
    pt3dadd(-35.130606154812, 215.422111505746, -27.9623905229022, 0.450000000000002)
    pt3dadd(-35.2844356035609, 216.398191114265, -28.1160300312698, 0.450000000000001)
    pt3dadd(-35.4382650523097, 217.374270722784, -28.2696695396374, 0.450000000000001)
    pt3dadd(-35.5920945010586, 218.350350331303, -28.423309048005, 0.450000000000001)
    pt3dadd(-35.7459239498075, 219.326429939821, -28.5769485563726, 0.450000000000001)
    pt3dadd(-35.8997533985563, 220.30250954834, -28.7305880647402, 0.450000000000001)
    pt3dadd(-36.0535828473052, 221.278589156859, -28.8842275731078, 0.45)
    pt3dadd(-36.207412296054, 222.254668765378, -29.0378670814754, 0.45)
    pt3dadd(-36.3612417448029, 223.230748373896, -29.191506589843, 0.45)
    pt3dadd(-36.5150711935517, 224.206827982415, -29.3451460982106, 0.45)
    pt3dadd(-36.6689006423006, 225.182907590934, -29.4987856065782, 0.45)
    pt3dadd(-36.8227300910495, 226.158987199453, -29.6524251149458, 0.45)
    pt3dadd(-36.9765595397983, 227.135066807972, -29.8060646233134, 0.45)
    pt3dadd(-37.1303889885472, 228.11114641649, -29.959704131681, 0.45)
    pt3dadd(-37.284218437296, 229.087226025009, -30.1133436400486, 0.45)
    pt3dadd(-37.4380478860449, 230.063305633528, -30.2669831484161, 0.45)
    pt3dadd(-37.5918773347938, 231.039385242047, -30.4206226567837, 0.45)
    pt3dadd(-37.7457067835426, 232.015464850566, -30.5742621651513, 0.45)
    pt3dadd(-37.8995362322915, 232.991544459084, -30.7279016735189, 0.45)
    pt3dadd(-38.0533656810403, 233.967624067603, -30.8815411818865, 0.45)
    pt3dadd(-38.2071951297892, 234.943703676122, -31.0351806902541, 0.45)
    pt3dadd(-38.3610245785381, 235.919783284641, -31.1888201986217, 0.45)
    pt3dadd(-38.5148540272869, 236.895862893159, -31.3424597069893, 0.45)
    pt3dadd(-38.6686834760358, 237.871942501678, -31.4960992153569, 0.45)
    pt3dadd(-38.8225129247846, 238.848022110197, -31.6497387237245, 0.45)
    pt3dadd(-38.9763423735335, 239.824101718716, -31.8033782320921, 0.45)
    pt3dadd(-39.1301718222823, 240.800181327235, -31.9570177404597, 0.45)
    pt3dadd(-39.2840012710312, 241.776260935753, -32.1106572488273, 0.45)
    pt3dadd(-39.4378307197801, 242.752340544272, -32.2642967571949, 0.45)
    pt3dadd(-39.5916601685289, 243.728420152791, -32.4179362655625, 0.45)
    pt3dadd(-39.7454896172778, 244.70449976131, -32.5715757739301, 0.45)
    pt3dadd(-39.8993190660266, 245.680579369829, -32.7252152822977, 0.45)
    pt3dadd(-40.0531485147755, 246.656658978347, -32.8788547906653, 0.45)
    pt3dadd(-40.2069779635244, 247.632738586866, -33.0324942990328, 0.45)
    pt3dadd(-40.3608074122732, 248.608818195385, -33.1861338074004, 0.45)
    pt3dadd(-40.5146368610221, 249.584897803904, -33.339773315768, 0.45)
    pt3dadd(-40.6684663097709, 250.560977412422, -33.4934128241356, 0.45)
    pt3dadd(-40.8222957585198, 251.537057020941, -33.6470523325032, 0.45)
    pt3dadd(-40.9761252072686, 252.51313662946, -33.8006918408708, 0.45)
    pt3dadd(-41.1299546560175, 253.489216237979, -33.9543313492384, 0.45)
    pt3dadd(-41.2837841047664, 254.465295846498, -34.107970857606, 0.45)
    pt3dadd(-41.4376135535152, 255.441375455016, -34.2616103659736, 0.45)
    pt3dadd(-41.5914430022641, 256.417455063535, -34.4152498743412, 0.45)
    pt3dadd(-41.7452724510129, 257.393534672054, -34.5688893827088, 0.45)
    pt3dadd(-41.8991018997618, 258.369614280573, -34.7225288910764, 0.45)
    pt3dadd(-42.0529313485106, 259.345693889092, -34.876168399444, 0.45)
    pt3dadd(-42.2067607972595, 260.32177349761, -35.0298079078116, 0.45)
    pt3dadd(-42.3605902460084, 261.297853106129, -35.1834474161792, 0.45)
    pt3dadd(-42.5144196947572, 262.273932714648, -35.3370869245468, 0.45)
    pt3dadd(-42.6682491435061, 263.250012323167, -35.4907264329144, 0.45)
    pt3dadd(-42.8220785922549, 264.226091931686, -35.644365941282, 0.45)
    pt3dadd(-42.9759080410038, 265.202171540204, -35.7980054496496, 0.45)
    pt3dadd(-43.1297374897527, 266.178251148723, -35.9516449580171, 0.45)
    pt3dadd(-43.2835669385015, 267.154330757242, -36.1052844663847, 0.45)
    pt3dadd(-43.4373963872504, 268.130410365761, -36.2589239747523, 0.45)
    pt3dadd(-43.5912258359992, 269.106489974279, -36.4125634831199, 0.45)
    pt3dadd(-43.7450552847481, 270.082569582798, -36.5662029914875, 0.45)
    pt3dadd(-43.8988847334969, 271.058649191317, -36.7198424998551, 0.45)
    pt3dadd(-44.0527141822458, 272.034728799836, -36.8734820082227, 0.45)
    pt3dadd(-44.2065436309947, 273.010808408355, -37.0271215165903, 0.45)
    pt3dadd(-44.3603730797435, 273.986888016873, -37.1807610249579, 0.45)
    pt3dadd(-44.5142025284924, 274.962967625392, -37.3344005333255, 0.45)
    pt3dadd(-44.6680319772412, 275.939047233911, -37.4880400416931, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-44.8218614259901, 276.91512684243, -37.6416795500607, 0.45)
    pt3dadd(-44.975690874739, 277.891206450949, -37.7953190584283, 0.45)
    pt3dadd(-45.1295203234878, 278.867286059467, -37.9489585667959, 0.45)
    pt3dadd(-45.2833497722367, 279.843365667986, -38.1025980751635, 0.45)
    pt3dadd(-45.4371792209855, 280.819445276505, -38.2562375835311, 0.45)
    pt3dadd(-45.5910086697344, 281.795524885024, -38.4098770918987, 0.45)
    pt3dadd(-45.7448381184832, 282.771604493542, -38.5635166002663, 0.45)
    pt3dadd(-45.8986675672321, 283.747684102061, -38.7171561086339, 0.45)
    pt3dadd(-46.052497015981, 284.72376371058, -38.8707956170014, 0.45)
    pt3dadd(-46.2063264647298, 285.699843319099, -39.024435125369, 0.45)
    pt3dadd(-46.3601559134787, 286.675922927618, -39.1780746337366, 0.45)
    pt3dadd(-46.5139853622275, 287.652002536136, -39.3317141421042, 0.45)
    pt3dadd(-46.6678148109764, 288.628082144655, -39.4853536504718, 0.45)
    pt3dadd(-46.8216442597253, 289.604161753174, -39.6389931588394, 0.45)
    pt3dadd(-46.9754737084741, 290.580241361693, -39.792632667207, 0.45)
    pt3dadd(-47.129303157223, 291.556320970212, -39.9462721755746, 0.45)
    pt3dadd(-47.2831326059718, 292.53240057873, -40.0999116839422, 0.45)
    pt3dadd(-47.4369620547207, 293.508480187249, -40.2535511923098, 0.45)
    pt3dadd(-47.5907915034695, 294.484559795768, -40.4071907006774, 0.45)
    pt3dadd(-47.7446209522184, 295.460639404287, -40.560830209045, 0.45)
    pt3dadd(-47.8984504009673, 296.436719012805, -40.7144697174126, 0.45)
    pt3dadd(-48.0522798497161, 297.412798621324, -40.8681092257802, 0.45)
    pt3dadd(-48.206109298465, 298.388878229843, -41.0217487341478, 0.45)
    pt3dadd(-48.3599387472138, 299.364957838362, -41.1753882425154, 0.45)
    pt3dadd(-48.5137681959627, 300.341037446881, -41.329027750883, 0.45)
    pt3dadd(-48.6675976447115, 301.317117055399, -41.4826672592506, 0.45)
    pt3dadd(-48.8214270934604, 302.293196663918, -41.6363067676182, 0.45)
    pt3dadd(-48.9752565422093, 303.269276272437, -41.7899462759857, 0.45)
    pt3dadd(-49.1290859909581, 304.245355880956, -41.9435857843533, 0.45)
    pt3dadd(-49.282915439707, 305.221435489475, -42.0972252927209, 0.45)
    pt3dadd(-49.4367448884558, 306.197515097993, -42.2508648010885, 0.45)
    pt3dadd(-49.5905743372047, 307.173594706512, -42.4045043094561, 0.45)
    pt3dadd(-49.7444037859536, 308.149674315031, -42.5581438178237, 0.45)
    pt3dadd(-49.8982332347024, 309.12575392355, -42.7117833261913, 0.45)
    pt3dadd(-50.0520626834513, 310.101833532068, -42.8654228345589, 0.45)
    pt3dadd(-50.2058921322001, 311.077913140587, -43.0190623429265, 0.45)
    pt3dadd(-50.359721580949, 312.053992749106, -43.1727018512941, 0.45)
    pt3dadd(-50.5135510296979, 313.030072357625, -43.3263413596617, 0.45)
    pt3dadd(-50.6673804784467, 314.006151966144, -43.4799808680293, 0.45)
    pt3dadd(-50.8212099271956, 314.982231574662, -43.6336203763969, 0.45)
    pt3dadd(-50.9750393759444, 315.958311183181, -43.7872598847645, 0.45)
    pt3dadd(-51.1288688246933, 316.9343907917, -43.9408993931321, 0.45)
    pt3dadd(-51.2826982734421, 317.910470400219, -44.0945389014997, 0.45)
    pt3dadd(-51.436527722191, 318.886550008738, -44.2481784098673, 0.45)
    pt3dadd(-51.5903571709399, 319.862629617256, -44.4018179182349, 0.45)
    pt3dadd(-51.7441866196887, 320.838709225775, -44.5554574266025, 0.45)
    pt3dadd(-51.8980160684376, 321.814788834294, -44.70909693497, 0.45)
    pt3dadd(-52.0518455171864, 322.790868442813, -44.8627364433376, 0.45)
    pt3dadd(-52.2056749659353, 323.766948051331, -45.0163759517052, 0.45)
    pt3dadd(-52.3595044146842, 324.74302765985, -45.1700154600728, 0.45)
    pt3dadd(-52.513333863433, 325.719107268369, -45.3236549684404, 0.45)
    pt3dadd(-52.6671633121819, 326.695186876888, -45.477294476808, 0.45)
    pt3dadd(-52.8209927609307, 327.671266485407, -45.6309339851756, 0.45)
    pt3dadd(-52.9748222096796, 328.647346093925, -45.7845734935432, 0.45)
    pt3dadd(-53.1286516584284, 329.623425702444, -45.9382130019108, 0.45)
    pt3dadd(-53.2824811071773, 330.599505310963, -46.0918525102784, 0.45)
    pt3dadd(-53.4363105559262, 331.575584919482, -46.245492018646, 0.45)
    pt3dadd(-53.590140004675, 332.551664528001, -46.3991315270136, 0.45)
    pt3dadd(-53.7439694534239, 333.527744136519, -46.5527710353812, 0.45)
    pt3dadd(-53.8977989021727, 334.503823745038, -46.7064105437488, 0.45)
    pt3dadd(-54.0516283509216, 335.479903353557, -46.8600500521164, 0.45)
    pt3dadd(-54.2054577996704, 336.455982962076, -47.013689560484, 0.45)
    pt3dadd(-54.3592872484193, 337.432062570594, -47.1673290688516, 0.45)
    pt3dadd(-54.5131166971682, 338.408142179113, -47.3209685772192, 0.45)
    pt3dadd(-54.666946145917, 339.384221787632, -47.4746080855868, 0.45)
    pt3dadd(-54.8207755946659, 340.360301396151, -47.6282475939543, 0.45)
    pt3dadd(-54.9746050434147, 341.33638100467, -47.7818871023219, 0.45)
    pt3dadd(-55.1284344921636, 342.312460613188, -47.9355266106895, 0.45)
    pt3dadd(-55.2822639409125, 343.288540221707, -48.0891661190571, 0.45)
    pt3dadd(-55.4360933896613, 344.264619830226, -48.2428056274247, 0.45)
    pt3dadd(-55.5899228384102, 345.240699438745, -48.3964451357923, 0.45)
    pt3dadd(-55.743752287159, 346.216779047264, -48.5500846441599, 0.45)
    pt3dadd(-55.8975817359079, 347.192858655782, -48.7037241525275, 0.45)
    pt3dadd(-56.0514111846568, 348.168938264301, -48.8573636608951, 0.45)
    pt3dadd(-56.2052406334056, 349.14501787282, -49.0110031692627, 0.45)
    pt3dadd(-56.3590700821545, 350.121097481339, -49.1646426776303, 0.45)
    pt3dadd(-56.5128995309033, 351.097177089857, -49.3182821859979, 0.45)
    pt3dadd(-56.6667289796522, 352.073256698376, -49.4719216943655, 0.45)
    pt3dadd(-56.820558428401, 353.049336306895, -49.6255612027331, 0.45)
    pt3dadd(-56.9743878771499, 354.025415915414, -49.7792007111007, 0.45)
    pt3dadd(-57.1282173258988, 355.001495523933, -49.9328402194683, 0.45)
    pt3dadd(-57.2820467746476, 355.977575132451, -50.0864797278359, 0.45)
    pt3dadd(-57.4358762233965, 356.95365474097, -50.2401192362035, 0.45)
    pt3dadd(-57.5897056721453, 357.929734349489, -50.393758744571, 0.45)
    pt3dadd(-57.7435351208942, 358.905813958008, -50.5473982529386, 0.45)
    pt3dadd(-57.897364569643, 359.881893566527, -50.7010377613062, 0.45)
    pt3dadd(-58.0511940183919, 360.857973175045, -50.8546772696738, 0.45)
    pt3dadd(-58.2050234671408, 361.834052783564, -51.0083167780414, 0.45)
    pt3dadd(-58.3588529158896, 362.810132392083, -51.161956286409, 0.45)
    pt3dadd(-58.5126823646385, 363.786212000602, -51.3155957947766, 0.45)
    pt3dadd(-58.6665118133873, 364.76229160912, -51.4692353031442, 0.45)
    pt3dadd(-58.8203412621362, 365.738371217639, -51.6228748115118, 0.45)
    pt3dadd(-58.9741707108851, 366.714450826158, -51.7765143198794, 0.45)
    pt3dadd(-59.1280001596339, 367.690530434677, -51.930153828247, 0.45)
    pt3dadd(-59.2818296083828, 368.666610043196, -52.0837933366146, 0.45)
    pt3dadd(-59.4356590571316, 369.642689651714, -52.2374328449822, 0.45)
    pt3dadd(-59.5894885058805, 370.618769260233, -52.3910723533498, 0.45)
    pt3dadd(-59.7433179546293, 371.594848868752, -52.5447118617174, 0.45)
    pt3dadd(-59.8971474033782, 372.570928477271, -52.698351370085, 0.45)
    pt3dadd(-60.0509768521271, 373.54700808579, -52.8519908784526, 0.45)
    pt3dadd(-60.2048063008759, 374.523087694308, -53.0056303868202, 0.45)
    pt3dadd(-60.3586357496248, 375.499167302827, -53.1592698951877, 0.45)
    pt3dadd(-60.5124651983736, 376.475246911346, -53.3129094035553, 0.45)
    pt3dadd(-60.6662946471225, 377.451326519865, -53.4665489119229, 0.45)
    pt3dadd(-60.8201240958714, 378.427406128383, -53.6201884202905, 0.45)
    pt3dadd(-60.9739535446202, 379.403485736902, -53.7738279286581, 0.45)
    pt3dadd(-61.1277829933691, 380.379565345421, -53.9274674370257, 0.45)
    pt3dadd(-61.2816124421179, 381.35564495394, -54.0811069453933, 0.45)
    pt3dadd(-61.4354418908668, 382.331724562459, -54.2347464537609, 0.45)
    pt3dadd(-61.5892713396156, 383.307804170977, -54.3883859621285, 0.45)
    pt3dadd(-61.7431007883645, 384.283883779496, -54.5420254704961, 0.45)
    pt3dadd(-61.8969302371134, 385.259963388015, -54.6956649788637, 0.45)
    pt3dadd(-62.0507596858622, 386.236042996534, -54.8493044872313, 0.45)
    pt3dadd(-62.2045891346111, 387.212122605053, -55.0029439955989, 0.45)
    pt3dadd(-62.3584185833599, 388.188202213571, -55.1565835039665, 0.45)
    pt3dadd(-62.5122480321088, 389.16428182209, -55.3102230123341, 0.45)
    pt3dadd(-62.6660774808577, 390.140361430609, -55.4638625207017, 0.45)
    pt3dadd(-62.8199069296065, 391.116441039128, -55.6175020290693, 0.45)
    pt3dadd(-62.9737363783554, 392.092520647646, -55.7711415374369, 0.45)
    pt3dadd(-63.1275658271042, 393.068600256165, -55.9247810458045, 0.45)
    pt3dadd(-63.2813952758531, 394.044679864684, -56.078420554172, 0.45)
    pt3dadd(-63.4352247246019, 395.020759473203, -56.2320600625396, 0.45)
    pt3dadd(-63.5890541733508, 395.996839081722, -56.3856995709072, 0.45)
    pt3dadd(-63.7428836220997, 396.97291869024, -56.5393390792748, 0.45)
    pt3dadd(-63.8967130708485, 397.948998298759, -56.6929785876424, 0.45)
    pt3dadd(-64.0505425195974, 398.925077907278, -56.84661809601, 0.45)
    pt3dadd(-64.2043719683462, 399.901157515797, -57.0002576043776, 0.45)
    pt3dadd(-64.3582014170951, 400.877237124316, -57.1538971127452, 0.45)
    pt3dadd(-64.5120308658439, 401.853316732834, -57.3075366211128, 0.45)
    pt3dadd(-64.6658603145928, 402.829396341353, -57.4611761294804, 0.45)
    pt3dadd(-64.8196897633417, 403.805475949872, -57.614815637848, 0.45)
    pt3dadd(-64.9735192120905, 404.781555558391, -57.7684551462156, 0.45)
    pt3dadd(-65.1273486608394, 405.757635166909, -57.9220946545832, 0.45)
    pt3dadd(-65.2811781095882, 406.733714775428, -58.0757341629508, 0.45)
    pt3dadd(-65.4350075583371, 407.709794383947, -58.2293736713184, 0.45)
    pt3dadd(-65.588837007086, 408.685873992466, -58.383013179686, 0.45)
    pt3dadd(-65.7426664558348, 409.661953600985, -58.5366526880536, 0.45)
    pt3dadd(-65.8964959045837, 410.638033209503, -58.6902921964212, 0.45)
    pt3dadd(-66.0503253533325, 411.614112818022, -58.8439317047888, 0.45)
    pt3dadd(-66.2041548020814, 412.590192426541, -58.9975712131563, 0.45)
    pt3dadd(-66.3579842508302, 413.56627203506, -59.1512107215239, 0.45)
    pt3dadd(-66.5118136995791, 414.542351643579, -59.3048502298915, 0.45)
    pt3dadd(-66.665643148328, 415.518431252097, -59.4584897382591, 0.45)
    pt3dadd(-66.8194725970768, 416.494510860616, -59.6121292466267, 0.45)
    pt3dadd(-66.9733020458257, 417.470590469135, -59.7657687549943, 0.45)
    pt3dadd(-67.1271314945745, 418.446670077654, -59.9194082633619, 0.45)
    pt3dadd(-67.2809609433234, 419.422749686172, -60.0730477717295, 0.45)
    pt3dadd(-67.4347903920723, 420.398829294691, -60.2266872800971, 0.45)
    pt3dadd(-67.5886198408211, 421.37490890321, -60.3803267884647, 0.45)
    pt3dadd(-67.74244928957, 422.350988511729, -60.5339662968323, 0.45)
    pt3dadd(-67.8962787383188, 423.327068120248, -60.6876058051999, 0.45)
    pt3dadd(-68.0501081870677, 424.303147728766, -60.8412453135675, 0.45)
    pt3dadd(-68.2039376358165, 425.279227337285, -60.9948848219351, 0.45)
    pt3dadd(-68.3577670845654, 426.255306945804, -61.1485243303027, 0.45)
    pt3dadd(-68.5115965333143, 427.231386554323, -61.3021638386703, 0.45)
    pt3dadd(-68.6654259820631, 428.207466162842, -61.4558033470379, 0.45)
    pt3dadd(-68.819255430812, 429.18354577136, -61.6094428554055, 0.45)
    pt3dadd(-68.9730848795608, 430.159625379879, -61.7630823637731, 0.45)
    pt3dadd(-69.1269143283097, 431.135704988398, -61.9167218721406, 0.45)
    pt3dadd(-69.2807437770585, 432.111784596917, -62.0703613805082, 0.45)
    pt3dadd(-69.4345732258074, 433.087864205435, -62.2240008888758, 0.45)
    pt3dadd(-69.5884026745563, 434.063943813954, -62.3776403972434, 0.45)
    pt3dadd(-69.7422321233051, 435.040023422473, -62.531279905611, 0.45)
    pt3dadd(-69.896061572054, 436.016103030992, -62.6849194139786, 0.45)
    pt3dadd(-70.0498910208028, 436.992182639511, -62.8385589223462, 0.45)
    pt3dadd(-70.2037204695517, 437.968262248029, -62.9921984307138, 0.45)
    pt3dadd(-70.3575499183006, 438.944341856548, -63.1458379390814, 0.45)
    pt3dadd(-70.5113793670494, 439.920421465067, -63.299477447449, 0.45)
    pt3dadd(-70.6652088157983, 440.896501073586, -63.4531169558166, 0.45)
    pt3dadd(-70.8190382645471, 441.872580682105, -63.6067564641842, 0.45)
    pt3dadd(-70.972867713296, 442.848660290623, -63.7603959725518, 0.45)
    pt3dadd(-71.1266971620448, 443.824739899142, -63.9140354809194, 0.45)
    pt3dadd(-71.2805266107937, 444.800819507661, -64.067674989287, 0.45)
    pt3dadd(-71.4343560595426, 445.77689911618, -64.2213144976546, 0.45)
    pt3dadd(-71.5881855082914, 446.752978724698, -64.3749540060222, 0.45)
    pt3dadd(-71.7420149570403, 447.729058333217, -64.5285935143898, 0.45)
    pt3dadd(-71.8958444057891, 448.705137941736, -64.6822330227573, 0.45)
    pt3dadd(-72.049673854538, 449.681217550255, -64.8358725311249, 0.45)
    pt3dadd(-72.2035033032869, 450.657297158774, -64.9895120394925, 0.45)
    pt3dadd(-72.3573327520357, 451.633376767292, -65.1431515478601, 0.45)
    pt3dadd(-72.5111622007846, 452.609456375811, -65.2967910562277, 0.45)
    pt3dadd(-72.6649916495334, 453.58553598433, -65.4504305645953, 0.45)
    pt3dadd(-72.8188210982823, 454.561615592849, -65.6040700729629, 0.45)
    pt3dadd(-72.9726505470312, 455.537695201368, -65.7577095813305, 0.45)
    pt3dadd(-73.12647999578, 456.513774809886, -65.9113490896981, 0.45)
    pt3dadd(-73.2803094445289, 457.489854418405, -66.0649885980657, 0.45)
    pt3dadd(-73.4341388932777, 458.465934026924, -66.2186281064333, 0.45)
    pt3dadd(-73.5879683420266, 459.442013635443, -66.3722676148009, 0.45)
    pt3dadd(-73.7417977907754, 460.418093243961, -66.5259071231685, 0.45)
    pt3dadd(-73.8956272395243, 461.39417285248, -66.6795466315361, 0.45)
    pt3dadd(-74.0494566882732, 462.370252460999, -66.8331861399037, 0.45)
    pt3dadd(-74.203286137022, 463.346332069518, -66.9868256482713, 0.45)
    pt3dadd(-74.3571155857709, 464.322411678037, -67.1404651566389, 0.45)
    pt3dadd(-74.5109450345197, 465.298491286555, -67.2941046650065, 0.45)
    pt3dadd(-74.6647744832686, 466.274570895074, -67.447744173374, 0.45)
    pt3dadd(-74.8186039320174, 467.250650503593, -67.6013836817417, 0.45)
    pt3dadd(-74.9724333807663, 468.226730112112, -67.7550231901092, 0.45)
    pt3dadd(-75.1262628295152, 469.202809720631, -67.9086626984768, 0.45)
    pt3dadd(-75.280092278264, 470.178889329149, -68.0623022068444, 0.45)
    pt3dadd(-75.4339217270129, 471.154968937668, -68.215941715212, 0.45)
    pt3dadd(-75.5877511757617, 472.131048546187, -68.3695812235796, 0.45)
    pt3dadd(-75.7415806245106, 473.107128154706, -68.5232207319472, 0.45)
    pt3dadd(-75.8954100732595, 474.083207763224, -68.6768602403148, 0.45)
    pt3dadd(-76.0492395220083, 475.059287371743, -68.8304997486824, 0.45)
    pt3dadd(-76.2030689707572, 476.035366980262, -68.98413925705, 0.45)
    pt3dadd(-76.356898419506, 477.011446588781, -69.1377787654176, 0.45)
    pt3dadd(-76.5107278682549, 477.9875261973, -69.2914182737852, 0.45)
    pt3dadd(-76.6645573170037, 478.963605805818, -69.4450577821528, 0.45)
    pt3dadd(-76.8183867657526, 479.939685414337, -69.5986972905204, 0.45)
    pt3dadd(-76.9722162145015, 480.915765022856, -69.752336798888, 0.45)
    pt3dadd(-77.1260456632503, 481.891844631375, -69.9059763072556, 0.45)
    pt3dadd(-77.2798751119992, 482.867924239894, -70.0596158156232, 0.45)
    pt3dadd(-77.433704560748, 483.844003848412, -70.2132553239908, 0.45)
    pt3dadd(-77.5875340094969, 484.820083456931, -70.3668948323584, 0.45)
    pt3dadd(-77.7413634582458, 485.79616306545, -70.5205343407259, 0.45)
    pt3dadd(-77.8951929069946, 486.772242673969, -70.6741738490935, 0.45)
    pt3dadd(-78.0490223557435, 487.748322282487, -70.8278133574611, 0.45)
    pt3dadd(-78.2028518044923, 488.724401891006, -70.9814528658287, 0.45)
    pt3dadd(-78.3566812532412, 489.700481499525, -71.1350923741963, 0.45)
    pt3dadd(-78.51051070199, 490.676561108044, -71.2887318825639, 0.45)
    pt3dadd(-78.6643401507389, 491.652640716563, -71.4423713909315, 0.45)
    pt3dadd(-78.8181695994878, 492.628720325081, -71.5960108992991, 0.45)
    pt3dadd(-78.9719990482366, 493.6047999336, -71.7496504076667, 0.45)
    pt3dadd(-79.1258284969855, 494.580879542119, -71.9032899160343, 0.45)
    pt3dadd(-79.2796579457343, 495.556959150638, -72.0569294244019, 0.45)
    pt3dadd(-79.4334873944832, 496.533038759157, -72.2105689327695, 0.45)
    pt3dadd(-79.587316843232, 497.509118367675, -72.3642084411371, 0.45)
    pt3dadd(-79.7411462919809, 498.485197976194, -72.5178479495047, 0.45)
    pt3dadd(-79.8949757407298, 499.461277584713, -72.6714874578723, 0.45)
    pt3dadd(-80.0488051894786, 500.437357193232, -72.8251269662399, 0.45)
    pt3dadd(-80.2026346382275, 501.41343680175, -72.9787664746075, 0.45)
    pt3dadd(-80.3564640869763, 502.389516410269, -73.1324059829751, 0.45)
    pt3dadd(-80.5102935357252, 503.365596018788, -73.2860454913426, 0.45)
    pt3dadd(-80.6641229844741, 504.341675627307, -73.4396849997103, 0.45)
    pt3dadd(-80.8179524332229, 505.317755235826, -73.5933245080778, 0.45)
    pt3dadd(-80.9717818819718, 506.293834844344, -73.7469640164454, 0.45)
    pt3dadd(-81.1256113307206, 507.269914452863, -73.900603524813, 0.45)
    pt3dadd(-81.2794407794695, 508.245994061382, -74.0542430331806, 0.45)
    pt3dadd(-81.4332702282183, 509.222073669901, -74.2078825415482, 0.45)
    pt3dadd(-81.5870996769672, 510.19815327842, -74.3615220499158, 0.45)
    pt3dadd(-81.7409291257161, 511.174232886938, -74.5151615582834, 0.45)
    pt3dadd(-81.8947585744649, 512.150312495457, -74.668801066651, 0.45)
    pt3dadd(-82.0485880232138, 513.126392103976, -74.8224405750186, 0.45)
    pt3dadd(-82.2024174719626, 514.102471712495, -74.9760800833862, 0.45)
    pt3dadd(-82.3562469207115, 515.078551321013, -75.1297195917538, 0.45)
    pt3dadd(-82.5100763694604, 516.054630929532, -75.2833591001214, 0.45)
    pt3dadd(-82.6639058182092, 517.030710538051, -75.436998608489, 0.45)
    pt3dadd(-82.8177352669581, 518.00679014657, -75.5906381168566, 0.45)
    pt3dadd(-82.9715647157069, 518.982869755089, -75.7442776252242, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-83.1253941644558, 519.958949363607, -75.8979171335918, 0.45)
    pt3dadd(-83.2792236132047, 520.935028972126, -76.0515566419594, 0.45)
    pt3dadd(-83.4330530619535, 521.911108580645, -76.205196150327, 0.45)
    pt3dadd(-83.5868825107024, 522.887188189164, -76.3588356586945, 0.45)
    pt3dadd(-83.7407119594512, 523.863267797683, -76.5124751670621, 0.45)
    pt3dadd(-83.8945414082001, 524.839347406201, -76.6661146754297, 0.45)
    pt3dadd(-84.0483708569489, 525.81542701472, -76.8197541837973, 0.45)
    pt3dadd(-84.2022003056978, 526.791506623239, -76.9733936921649, 0.45)
    pt3dadd(-84.3560297544467, 527.767586231758, -77.1270332005325, 0.45)
    pt3dadd(-84.5098592031955, 528.743665840276, -77.2806727089001, 0.45)
    pt3dadd(-84.6636886519444, 529.719745448795, -77.4343122172677, 0.45)
    pt3dadd(-84.8175181006932, 530.695825057314, -77.5879517256353, 0.45)
    pt3dadd(-84.9713475494421, 531.671904665833, -77.7415912340029, 0.45)
    pt3dadd(-85.125176998191, 532.647984274352, -77.8952307423705, 0.45)
    pt3dadd(-85.2790064469398, 533.62406388287, -78.0488702507381, 0.45)
    pt3dadd(-85.4328358956887, 534.600143491389, -78.2025097591057, 0.45)
    pt3dadd(-85.5866653444375, 535.576223099908, -78.3561492674733, 0.45)
    pt3dadd(-85.7404947931864, 536.552302708427, -78.5097887758409, 0.45)
    pt3dadd(-85.8943242419352, 537.528382316946, -78.6634282842085, 0.45)
    pt3dadd(-86.0481536906841, 538.504461925464, -78.8170677925761, 0.45)
    pt3dadd(-86.201983139433, 539.480541533983, -78.9707073009437, 0.45)
    pt3dadd(-86.3558125881818, 540.456621142502, -79.1243468093112, 0.45)
    pt3dadd(-86.5096420369307, 541.432700751021, -79.2779863176788, 0.45)
    pt3dadd(-86.6634714856795, 542.408780359539, -79.4316258260464, 0.45)
    pt3dadd(-86.8173009344284, 543.384859968058, -79.585265334414, 0.45)
    pt3dadd(-86.9711303831772, 544.360939576577, -79.7389048427816, 0.45)
    pt3dadd(-87.1249598319261, 545.337019185096, -79.8925443511492, 0.45)
    pt3dadd(-87.278789280675, 546.313098793615, -80.0461838595168, 0.45)
    pt3dadd(-87.4326187294238, 547.289178402133, -80.1998233678844, 0.45)
    pt3dadd(-87.5864481781727, 548.265258010652, -80.353462876252, 0.45)
    pt3dadd(-87.7402776269215, 549.241337619171, -80.5071023846196, 0.45)
    pt3dadd(-87.8941070756704, 550.21741722769, -80.6607418929872, 0.45)
    pt3dadd(-88.0479365244193, 551.193496836209, -80.8143814013548, 0.45)
    pt3dadd(-88.2017659731681, 552.169576444727, -80.9680209097224, 0.45)
    pt3dadd(-88.355595421917, 553.145656053246, -81.12166041809, 0.45)
    pt3dadd(-88.5094248706658, 554.121735661765, -81.2752999264576, 0.45)
    pt3dadd(-88.6632543194147, 555.097815270284, -81.4289394348252, 0.45)
    pt3dadd(-88.8170837681635, 556.073894878803, -81.5825789431928, 0.45)
    pt3dadd(-88.9709132169124, 557.049974487321, -81.7362184515604, 0.45)
    pt3dadd(-89.1247426656613, 558.02605409584, -81.889857959928, 0.45)
    pt3dadd(-89.2785721144101, 559.002133704359, -82.0434974682955, 0.45)
    pt3dadd(-89.432401563159, 559.978213312878, -82.1971369766631, 0.45)
    pt3dadd(-89.5862310119078, 560.954292921396, -82.3507764850307, 0.45)
    pt3dadd(-89.7400604606567, 561.930372529915, -82.5044159933983, 0.45)
    pt3dadd(-89.8938899094055, 562.906452138434, -82.6580555017659, 0.45)
    pt3dadd(-90.0477193581544, 563.882531746953, -82.8116950101335, 0.45)
    pt3dadd(-90.2015488069033, 564.858611355472, -82.9653345185011, 0.45)
    pt3dadd(-90.3553782556521, 565.83469096399, -83.1189740268687, 0.45)
    pt3dadd(-90.509207704401, 566.810770572509, -83.2726135352363, 0.45)
    pt3dadd(-90.6630371531498, 567.786850181028, -83.4262530436039, 0.45)
    pt3dadd(-90.8168666018987, 568.762929789547, -83.5798925519715, 0.45)
    pt3dadd(-90.9706960506476, 569.739009398065, -83.7335320603391, 0.45)
    pt3dadd(-91.1245254993964, 570.715089006584, -83.8871715687067, 0.45)
    pt3dadd(-91.2783549481453, 571.691168615103, -84.0408110770743, 0.45)
    pt3dadd(-91.4321843968941, 572.667248223622, -84.1944505854419, 0.45)
    pt3dadd(-91.586013845643, 573.643327832141, -84.3480900938095, 0.45)
    pt3dadd(-91.7398432943918, 574.619407440659, -84.5017296021771, 0.45)
    pt3dadd(-91.8936727431407, 575.595487049178, -84.6553691105447, 0.45)
    pt3dadd(-92.0475021918896, 576.571566657697, -84.8090086189122, 0.45)
    pt3dadd(-92.2013316406384, 577.547646266216, -84.9626481272798, 0.45)
    pt3dadd(-92.3551610893873, 578.523725874735, -85.1162876356474, 0.45)
    pt3dadd(-92.5089905381361, 579.499805483253, -85.269927144015, 0.45)
    pt3dadd(-92.662819986885, 580.475885091772, -85.4235666523826, 0.45)
    pt3dadd(-92.8166494356339, 581.451964700291, -85.5772061607502, 0.45)
    pt3dadd(-92.9704788843827, 582.42804430881, -85.7308456691178, 0.45)
    pt3dadd(-93.1243083331316, 583.404123917329, -85.8844851774854, 0.45)
    pt3dadd(-93.2781377818804, 584.380203525847, -86.038124685853, 0.45)
    pt3dadd(-93.4319672306293, 585.356283134366, -86.1917641942206, 0.45)
    pt3dadd(-93.5857966793781, 586.332362742885, -86.3454037025882, 0.45)
    pt3dadd(-93.739626128127, 587.308442351404, -86.4990432109558, 0.45)
    pt3dadd(-93.8934555768759, 588.284521959922, -86.6526827193234, 0.45)
    pt3dadd(-94.0472850256247, 589.260601568441, -86.806322227691, 0.45)
    pt3dadd(-94.2011144743736, 590.23668117696, -86.9599617360586, 0.45)
    pt3dadd(-94.3549439231224, 591.212760785479, -87.1136012444262, 0.45)
    pt3dadd(-94.5087733718713, 592.188840393998, -87.2672407527938, 0.45)
    pt3dadd(-94.6626028206202, 593.164920002516, -87.4208802611614, 0.45)
    pt3dadd(-94.816432269369, 594.140999611035, -87.5745197695289, 0.45)
    pt3dadd(-94.9702617181179, 595.117079219554, -87.7281592778966, 0.45)
    pt3dadd(-95.1240911668667, 596.093158828073, -87.8817987862641, 0.45)
    pt3dadd(-95.2779206156156, 597.069238436591, -88.0354382946317, 0.45)
    pt3dadd(-95.4317500643645, 598.04531804511, -88.1890778029993, 0.45)
    pt3dadd(-95.5855795131133, 599.021397653629, -88.3427173113669, 0.45)
    pt3dadd(-95.7394089618622, 599.997477262148, -88.4963568197345, 0.45)
    pt3dadd(-95.893238410611, 600.973556870667, -88.6499963281021, 0.45)
    pt3dadd(-96.0470678593599, 601.949636479185, -88.8036358364697, 0.45)
    pt3dadd(-96.2008973081087, 602.925716087704, -88.9572753448373, 0.45)
    pt3dadd(-96.3547267568576, 603.901795696223, -89.1109148532049, 0.45)
    pt3dadd(-96.5085562056065, 604.877875304742, -89.2645543615725, 0.45)
    pt3dadd(-96.6623856543553, 605.853954913261, -89.4181938699401, 0.45)
    pt3dadd(-96.8162151031042, 606.830034521779, -89.5718333783077, 0.45)
    pt3dadd(-96.970044551853, 607.806114130298, -89.7254728866753, 0.45)
    pt3dadd(-97.1238740006019, 608.782193738817, -89.8791123950429, 0.45)
    pt3dadd(-97.2777034493508, 609.758273347336, -90.0327519034105, 0.45)
    pt3dadd(-97.4315328980996, 610.734352955855, -90.1863914117781, 0.45)
    pt3dadd(-97.5853623468485, 611.710432564373, -90.3400309201457, 0.45)
    pt3dadd(-97.7391917955973, 612.686512172892, -90.4936704285133, 0.45)
    pt3dadd(-97.8930212443462, 613.662591781411, -90.6473099368808, 0.45)
    pt3dadd(-98.046850693095, 614.63867138993, -90.8009494452484, 0.45)
    pt3dadd(-98.2006801418439, 615.614750998448, -90.954588953616, 0.45)
    pt3dadd(-98.3545095905928, 616.590830606967, -91.1082284619836, 0.45)
    pt3dadd(-98.5083390393416, 617.566910215486, -91.2618679703512, 0.45)
    pt3dadd(-98.6621684880905, 618.542989824005, -91.4155074787188, 0.45)
    pt3dadd(-98.8159979368393, 619.519069432524, -91.5691469870864, 0.45)
    pt3dadd(-98.9698273855882, 620.495149041042, -91.722786495454, 0.45)
    pt3dadd(-99.123656834337, 621.471228649561, -91.8764260038216, 0.45)
    pt3dadd(-99.2774862830859, 622.44730825808, -92.0300655121892, 0.45)
    pt3dadd(-99.4313157318348, 623.423387866599, -92.1837050205568, 0.45)
    pt3dadd(-99.5851451805836, 624.399467475117, -92.3373445289244, 0.45)
    pt3dadd(-99.7389746293325, 625.375547083636, -92.490984037292, 0.45)
    pt3dadd(-99.8928040780813, 626.351626692155, -92.6446235456596, 0.45)
    pt3dadd(-100.04663352683, 627.327706300674, -92.7982630540272, 0.45)
    pt3dadd(-100.200462975579, 628.303785909193, -92.9519025623948, 0.45)
    pt3dadd(-100.354292424328, 629.279865517711, -93.1055420707624, 0.45)
    pt3dadd(-100.508121873077, 630.25594512623, -93.25918157913, 0.45)
    pt3dadd(-100.661951321826, 631.232024734749, -93.4128210874975, 0.45)
    pt3dadd(-100.815780770574, 632.208104343268, -93.5664605958652, 0.45)
    pt3dadd(-100.969610219323, 633.184183951787, -93.7201001042327, 0.45)
    pt3dadd(-101.123439668072, 634.160263560305, -93.8737396126003, 0.45)
    pt3dadd(-101.277269116821, 635.136343168824, -94.0273791209679, 0.45)
    pt3dadd(-101.43109856557, 636.112422777343, -94.1810186293355, 0.45)
    pt3dadd(-101.584928014319, 637.088502385862, -94.3346581377031, 0.45)
    pt3dadd(-101.738757463068, 638.064581994381, -94.4882976460707, 0.45)
    pt3dadd(-101.892586911816, 639.040661602899, -94.6419371544383, 0.45)
    pt3dadd(-102.046416360565, 640.016741211418, -94.7955766628059, 0.45)
    pt3dadd(-102.200245809314, 640.992820819937, -94.9492161711735, 0.45)
    pt3dadd(-102.354075258063, 641.968900428456, -95.1028556795411, 0.45)
    pt3dadd(-102.507904706812, 642.944980036974, -95.2564951879087, 0.45)
    pt3dadd(-102.661734155561, 643.921059645493, -95.4101346962763, 0.45)
    pt3dadd(-102.81556360431, 644.897139254012, -95.5637742046439, 0.45)
    pt3dadd(-102.969393053059, 645.873218862531, -95.7174137130115, 0.45)
    pt3dadd(-103.123222501807, 646.84929847105, -95.8710532213791, 0.45)
    pt3dadd(-103.277051950556, 647.825378079568, -96.0246927297467, 0.45)
    pt3dadd(-103.430881399305, 648.801457688087, -96.1783322381143, 0.45)
    pt3dadd(-103.584710848054, 649.777537296606, -96.3319717464819, 0.45)
    pt3dadd(-103.738540296803, 650.753616905125, -96.4856112548494, 0.45)
    pt3dadd(-103.892369745552, 651.729696513643, -96.639250763217, 0.45)
    pt3dadd(-104.046199194301, 652.705776122162, -96.7928902715846, 0.45)
    pt3dadd(-104.200028643049, 653.681855730681, -96.9465297799522, 0.45)
    pt3dadd(-104.353858091798, 654.6579353392, -97.1001692883198, 0.45)
    pt3dadd(-104.507687540547, 655.634014947719, -97.2538087966874, 0.45)
    pt3dadd(-104.661516989296, 656.610094556237, -97.407448305055, 0.45)
    pt3dadd(-104.815346438045, 657.586174164756, -97.5610878134226, 0.45)
    pt3dadd(-104.969175886794, 658.562253773275, -97.7147273217902, 0.45)
    pt3dadd(-105.123005335543, 659.538333381794, -97.8683668301578, 0.45)
    pt3dadd(-105.276834784291, 660.514412990313, -98.0220063385254, 0.45)
    pt3dadd(-105.43066423304, 661.490492598831, -98.175645846893, 0.45)
    pt3dadd(-105.584493681789, 662.46657220735, -98.3292853552606, 0.45)
    pt3dadd(-105.738323130538, 663.442651815869, -98.4829248636282, 0.45)
    pt3dadd(-105.892152579287, 664.418731424388, -98.6365643719958, 0.45)
    pt3dadd(-106.045982028036, 665.394811032907, -98.7902038803634, 0.45)
    pt3dadd(-106.199811476785, 666.370890641425, -98.943843388731, 0.45)
    pt3dadd(-106.353640925533, 667.346970249944, -99.0974828970986, 0.45)
    pt3dadd(-106.507470374282, 668.323049858463, -99.2511224054661, 0.45)
    pt3dadd(-106.661299823031, 669.299129466982, -99.4047619138337, 0.45)
    pt3dadd(-106.81512927178, 670.2752090755, -99.5584014222013, 0.45)
    pt3dadd(-106.968958720529, 671.251288684019, -99.7120409305689, 0.45)
    pt3dadd(-107.122788169278, 672.227368292538, -99.8656804389365, 0.45)
    pt3dadd(-107.276617618027, 673.203447901057, -100.019319947304, 0.45)
    pt3dadd(-107.430447066775, 674.179527509576, -100.172959455672, 0.45)
    pt3dadd(-107.584276515524, 675.155607118094, -100.326598964039, 0.45)
    pt3dadd(-107.738105964273, 676.131686726613, -100.480238472407, 0.45)
    pt3dadd(-107.891935413022, 677.107766335132, -100.633877980775, 0.45)
    pt3dadd(-108.045764861771, 678.083845943651, -100.787517489142, 0.45)
    pt3dadd(-108.19959431052, 679.059925552169, -100.94115699751, 0.45)
    pt3dadd(-108.353423759269, 680.036005160688, -101.094796505877, 0.45)
    pt3dadd(-108.507253208017, 681.012084769207, -101.248436014245, 0.45)
    pt3dadd(-108.661082656766, 681.988164377726, -101.402075522612, 0.45)
    pt3dadd(-108.814912105515, 682.964243986245, -101.55571503098, 0.45)
    pt3dadd(-108.968741554264, 683.940323594763, -101.709354539348, 0.45)
    pt3dadd(-109.122571003013, 684.916403203282, -101.862994047715, 0.45)
    pt3dadd(-109.276400451762, 685.892482811801, -102.016633556083, 0.45)
    pt3dadd(-109.430229900511, 686.86856242032, -102.17027306445, 0.45)
    pt3dadd(-109.584059349259, 687.844642028839, -102.323912572818, 0.45)
    pt3dadd(-109.737888798008, 688.820721637357, -102.477552081186, 0.45)
    pt3dadd(-109.891718246757, 689.796801245876, -102.631191589553, 0.45)
    pt3dadd(-110.045547695506, 690.772880854395, -102.784831097921, 0.45)
    pt3dadd(-110.199377144255, 691.748960462914, -102.938470606288, 0.45)
    pt3dadd(-110.353206593004, 692.725040071433, -103.092110114656, 0.45)
    pt3dadd(-110.507036041753, 693.701119679951, -103.245749623024, 0.45)
    pt3dadd(-110.660865490501, 694.67719928847, -103.399389131391, 0.45)
    pt3dadd(-110.81469493925, 695.653278896989, -103.553028639759, 0.45)
    pt3dadd(-110.968524387999, 696.629358505508, -103.706668148126, 0.45)
    pt3dadd(-111.122353836748, 697.605438114026, -103.860307656494, 0.45)
    pt3dadd(-111.276183285497, 698.581517722545, -104.013947164862, 0.45)
    pt3dadd(-111.430012734246, 699.557597331064, -104.167586673229, 0.45)
    pt3dadd(-111.583842182995, 700.533676939583, -104.321226181597, 0.45)
    pt3dadd(-111.737671631743, 701.509756548102, -104.474865689964, 0.45)
    pt3dadd(-111.891501080492, 702.48583615662, -104.628505198332, 0.45)
    pt3dadd(-112.045330529241, 703.461915765139, -104.7821447067, 0.45)
    pt3dadd(-112.19915997799, 704.437995373658, -104.935784215067, 0.45)
    pt3dadd(-112.352989426739, 705.414074982177, -105.089423723435, 0.45)
    pt3dadd(-112.506818875488, 706.390154590695, -105.243063231802, 0.45)
    pt3dadd(-112.660648324237, 707.366234199214, -105.39670274017, 0.45)
    pt3dadd(-112.814477772985, 708.342313807733, -105.550342248538, 0.45)
    pt3dadd(-112.968307221734, 709.318393416252, -105.703981756905, 0.45)
    pt3dadd(-113.122136670483, 710.294473024771, -105.857621265273, 0.45)
    pt3dadd(-113.275966119232, 711.270552633289, -106.01126077364, 0.45)
    pt3dadd(-113.429795567981, 712.246632241808, -106.164900282008, 0.45)
    pt3dadd(-113.58362501673, 713.222711850327, -106.318539790376, 0.45)
    pt3dadd(-113.737454465479, 714.198791458846, -106.472179298743, 0.45)
    pt3dadd(-113.891283914227, 715.174871067365, -106.625818807111, 0.45)
    pt3dadd(-114.045113362976, 716.150950675883, -106.779458315478, 0.45)
    pt3dadd(-114.198942811725, 717.127030284402, -106.933097823846, 0.45)
    pt3dadd(-114.352772260474, 718.103109892921, -107.086737332213, 0.45)
    pt3dadd(-114.506601709223, 719.07918950144, -107.240376840581, 0.45)
    pt3dadd(-114.660431157972, 720.055269109959, -107.394016348949, 0.45)
    pt3dadd(-114.814260606721, 721.031348718477, -107.547655857316, 0.45)
    pt3dadd(-114.968090055469, 722.007428326996, -107.701295365684, 0.45)
    pt3dadd(-115.121919504218, 722.983507935515, -107.854934874051, 0.45)
    pt3dadd(-115.275748952967, 723.959587544034, -108.008574382419, 0.45)
    pt3dadd(-115.429578401716, 724.935667152552, -108.162213890787, 0.45)
    pt3dadd(-115.583407850465, 725.911746761071, -108.315853399154, 0.45)
    pt3dadd(-115.737237299214, 726.88782636959, -108.469492907522, 0.45)
    pt3dadd(-115.891066747963, 727.863905978109, -108.623132415889, 0.45)
    pt3dadd(-116.044896196711, 728.839985586628, -108.776771924257, 0.45)
    pt3dadd(-116.19872564546, 729.816065195146, -108.930411432625, 0.45)
    pt3dadd(-116.352555094209, 730.792144803665, -109.084050940992, 0.45)
    pt3dadd(-116.506384542958, 731.768224412184, -109.23769044936, 0.45)
    pt3dadd(-116.660213991707, 732.744304020703, -109.391329957727, 0.45)
    pt3dadd(-116.814043440456, 733.720383629221, -109.544969466095, 0.45)
    pt3dadd(-116.967872889205, 734.69646323774, -109.698608974463, 0.45)
    pt3dadd(-117.121702337953, 735.672542846259, -109.85224848283, 0.45)
    pt3dadd(-117.275531786702, 736.648622454778, -110.005887991198, 0.45)
    pt3dadd(-117.429361235451, 737.624702063297, -110.159527499565, 0.45)
    pt3dadd(-117.5831906842, 738.600781671816, -110.313167007933, 0.45)
    pt3dadd(-117.737020132949, 739.576861280334, -110.466806516301, 0.45)
    pt3dadd(-117.890849581698, 740.552940888853, -110.620446024668, 0.45)
    pt3dadd(-118.044679030447, 741.529020497372, -110.774085533036, 0.45)
    pt3dadd(-118.198508479195, 742.505100105891, -110.927725041403, 0.45)
    pt3dadd(-118.352337927944, 743.481179714409, -111.081364549771, 0.45)
    pt3dadd(-118.506167376693, 744.457259322928, -111.235004058139, 0.45)
    pt3dadd(-118.659996825442, 745.433338931447, -111.388643566506, 0.45)
    pt3dadd(-118.813826274191, 746.409418539966, -111.542283074874, 0.45)
    pt3dadd(-118.96765572294, 747.385498148485, -111.695922583241, 0.45)
    pt3dadd(-119.121485171689, 748.361577757003, -111.849562091609, 0.45)
    pt3dadd(-119.275314620437, 749.337657365522, -112.003201599977, 0.45)
    pt3dadd(-119.429144069186, 750.313736974041, -112.156841108344, 0.45)
    pt3dadd(-119.582973517935, 751.28981658256, -112.310480616712, 0.45)
    pt3dadd(-119.736802966684, 752.265896191078, -112.464120125079, 0.45)
    pt3dadd(-119.890632415433, 753.241975799597, -112.617759633447, 0.45)
    pt3dadd(-120.044461864182, 754.218055408116, -112.771399141814, 0.45)
    pt3dadd(-120.198291312931, 755.194135016635, -112.925038650182, 0.45)
    pt3dadd(-120.352120761679, 756.170214625154, -113.07867815855, 0.45)
    pt3dadd(-120.505950210428, 757.146294233672, -113.232317666917, 0.45)
    pt3dadd(-120.659779659177, 758.122373842191, -113.385957175285, 0.45)
    pt3dadd(-120.813609107926, 759.09845345071, -113.539596683652, 0.45)
    pt3dadd(-120.967438556675, 760.074533059229, -113.69323619202, 0.45)
    pt3dadd(-121.121268005424, 761.050612667748, -113.846875700388, 0.45)
    pt3dadd(-121.275097454173, 762.026692276266, -114.000515208755, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-121.428926902921, 763.002771884785, -114.154154717123, 0.45)
    pt3dadd(-121.58275635167, 763.978851493304, -114.30779422549, 0.45)
    pt3dadd(-121.736585800419, 764.954931101823, -114.461433733858, 0.45)
    pt3dadd(-121.890415249168, 765.931010710342, -114.615073242226, 0.45)
    pt3dadd(-122.044244697917, 766.90709031886, -114.768712750593, 0.45)
    pt3dadd(-122.198074146666, 767.883169927379, -114.922352258961, 0.45)
    pt3dadd(-122.351903595415, 768.859249535898, -115.075991767328, 0.45)
    pt3dadd(-122.505733044163, 769.835329144417, -115.229631275696, 0.45)
    pt3dadd(-122.659562492912, 770.811408752935, -115.383270784064, 0.45)
    pt3dadd(-122.813391941661, 771.787488361454, -115.536910292431, 0.45)
    pt3dadd(-122.96722139041, 772.763567969973, -115.690549800799, 0.45)
    pt3dadd(-123.121050839159, 773.739647578492, -115.844189309166, 0.45)
    pt3dadd(-123.274880287908, 774.715727187011, -115.997828817534, 0.45)
    pt3dadd(-123.428709736657, 775.691806795529, -116.151468325902, 0.45)
    pt3dadd(-123.582539185406, 776.667886404048, -116.305107834269, 0.45)
    pt3dadd(-123.736368634154, 777.643966012567, -116.458747342637, 0.45)
    pt3dadd(-123.890198082903, 778.620045621086, -116.612386851004, 0.45)
    pt3dadd(-124.044027531652, 779.596125229604, -116.766026359372, 0.45)
    pt3dadd(-124.197856980401, 780.572204838123, -116.91966586774, 0.45)
    pt3dadd(-124.35168642915, 781.548284446642, -117.073305376107, 0.45)
    pt3dadd(-124.505515877899, 782.524364055161, -117.226944884475, 0.45)
    pt3dadd(-124.659345326648, 783.50044366368, -117.380584392842, 0.45)
    pt3dadd(-124.813174775396, 784.476523272198, -117.53422390121, 0.45)
    pt3dadd(-124.967004224145, 785.452602880717, -117.687863409578, 0.45)
    pt3dadd(-125.120833672894, 786.428682489236, -117.841502917945, 0.45)
    pt3dadd(-125.274663121643, 787.404762097755, -117.995142426313, 0.45)
    pt3dadd(-125.428492570392, 788.380841706274, -118.14878193468, 0.45)
    pt3dadd(-125.582322019141, 789.356921314792, -118.302421443048, 0.45)
    pt3dadd(-125.73615146789, 790.333000923311, -118.456060951415, 0.45)
    pt3dadd(-125.889980916638, 791.30908053183, -118.609700459783, 0.45)
    pt3dadd(-126.043810365387, 792.285160140349, -118.763339968151, 0.45)
    pt3dadd(-126.197639814136, 793.261239748868, -118.916979476518, 0.45)
    pt3dadd(-126.351469262885, 794.237319357386, -119.070618984886, 0.45)
    pt3dadd(-126.505298711634, 795.213398965905, -119.224258493253, 0.45)
    pt3dadd(-126.659128160383, 796.189478574424, -119.377898001621, 0.45)
    pt3dadd(-126.812957609132, 797.165558182943, -119.531537509989, 0.45)
    pt3dadd(-126.96678705788, 798.141637791461, -119.685177018356, 0.45)
    pt3dadd(-127.120616506629, 799.11771739998, -119.838816526724, 0.45)
    pt3dadd(-127.274445955378, 800.093797008499, -119.992456035091, 0.45)
    pt3dadd(-127.428275404127, 801.069876617018, -120.146095543459, 0.45)
    pt3dadd(-127.582104852876, 802.045956225537, -120.299735051827, 0.45)
    pt3dadd(-127.735934301625, 803.022035834055, -120.453374560194, 0.45)
    pt3dadd(-127.889763750374, 803.998115442574, -120.607014068562, 0.45)
    pt3dadd(-128.043593199122, 804.974195051093, -120.760653576929, 0.45)
    pt3dadd(-128.197422647871, 805.950274659612, -120.914293085297, 0.45)
    pt3dadd(-128.35125209662, 806.92635426813, -121.067932593665, 0.45)
    pt3dadd(-128.505081545369, 807.902433876649, -121.221572102032, 0.45)
    pt3dadd(-128.658910994118, 808.878513485168, -121.3752116104, 0.45)
    pt3dadd(-128.812740442867, 809.854593093687, -121.528851118767, 0.45)
    pt3dadd(-128.966569891616, 810.830672702206, -121.682490627135, 0.45)
    pt3dadd(-129.120399340364, 811.806752310724, -121.836130135503, 0.45)
    pt3dadd(-129.274228789113, 812.782831919243, -121.98976964387, 0.45)
    pt3dadd(-129.428058237862, 813.758911527762, -122.143409152238, 0.45)
    pt3dadd(-129.581887686611, 814.734991136281, -122.297048660605, 0.45)
    pt3dadd(-129.73571713536, 815.7110707448, -122.450688168973, 0.45)
    pt3dadd(-129.889546584109, 816.687150353318, -122.604327677341, 0.45)
    pt3dadd(-130.043376032858, 817.663229961837, -122.757967185708, 0.45)
    pt3dadd(-130.197205481606, 818.639309570356, -122.911606694076, 0.45)
    pt3dadd(-130.351034930355, 819.615389178875, -123.065246202443, 0.45)
    pt3dadd(-130.504864379104, 820.591468787394, -123.218885710811, 0.45)
    pt3dadd(-130.658693827853, 821.567548395912, -123.372525219179, 0.45)
    pt3dadd(-130.812523276602, 822.543628004431, -123.526164727546, 0.45)
    pt3dadd(-130.966352725351, 823.51970761295, -123.679804235914, 0.45)
    pt3dadd(-131.1201821741, 824.495787221469, -123.833443744281, 0.45)
    pt3dadd(-131.274011622848, 825.471866829987, -123.987083252649, 0.45)
    pt3dadd(-131.427841071597, 826.447946438506, -124.140722761016, 0.45)
    pt3dadd(-131.581670520346, 827.424026047025, -124.294362269384, 0.45)
    pt3dadd(-131.735499969095, 828.400105655544, -124.448001777752, 0.45)
    pt3dadd(-131.889329417844, 829.376185264063, -124.601641286119, 0.45)
    pt3dadd(-132.043158866593, 830.352264872581, -124.755280794487, 0.45)
    pt3dadd(-132.196988315342, 831.3283444811, -124.908920302854, 0.45)
    pt3dadd(-132.35081776409, 832.304424089619, -125.062559811222, 0.45)
    pt3dadd(-132.504647212839, 833.280503698138, -125.21619931959, 0.45)
    pt3dadd(-132.658476661588, 834.256583306656, -125.369838827957, 0.45)
    pt3dadd(-132.812306110337, 835.232662915175, -125.523478336325, 0.45)
    pt3dadd(-132.966135559086, 836.208742523694, -125.677117844692, 0.45)
    pt3dadd(-133.119965007835, 837.184822132213, -125.83075735306, 0.45)
    pt3dadd(-133.273794456584, 838.160901740732, -125.984396861428, 0.45)
    pt3dadd(-133.427623905332, 839.13698134925, -126.138036369795, 0.45)
    pt3dadd(-133.581453354081, 840.113060957769, -126.291675878163, 0.45)
    pt3dadd(-133.73528280283, 841.089140566288, -126.44531538653, 0.45)
    pt3dadd(-133.889112251579, 842.065220174807, -126.598954894898, 0.45)
    pt3dadd(-134.042941700328, 843.041299783326, -126.752594403266, 0.45)
    pt3dadd(-134.196771149077, 844.017379391844, -126.906233911633, 0.45)
    pt3dadd(-134.350600597826, 844.993459000363, -127.059873420001, 0.45)
    pt3dadd(-134.504430046574, 845.969538608882, -127.213512928368, 0.45)
    pt3dadd(-134.658259495323, 846.945618217401, -127.367152436736, 0.45)
    pt3dadd(-134.812088944072, 847.92169782592, -127.520791945104, 0.45)
    pt3dadd(-134.965918392821, 848.897777434438, -127.674431453471, 0.45)
    pt3dadd(-135.11974784157, 849.873857042957, -127.828070961839, 0.45)
    pt3dadd(-135.273577290319, 850.849936651476, -127.981710470206, 0.45)
    pt3dadd(-135.427406739068, 851.826016259995, -128.135349978574, 0.45)
    pt3dadd(-135.581236187816, 852.802095868513, -128.288989486942, 0.45)
    pt3dadd(-135.735065636565, 853.778175477032, -128.442628995309, 0.45)
    pt3dadd(-135.888895085314, 854.754255085551, -128.596268503677, 0.45)
    pt3dadd(-136.042724534063, 855.73033469407, -128.749908012044, 0.45)
    pt3dadd(-136.196553982812, 856.706414302589, -128.903547520412, 0.45)
    pt3dadd(-136.350383431561, 857.682493911107, -129.05718702878, 0.45)
    pt3dadd(-136.50421288031, 858.658573519626, -129.210826537147, 0.45)
    pt3dadd(-136.658042329058, 859.634653128145, -129.364466045515, 0.45)
    pt3dadd(-136.811871777807, 860.610732736664, -129.518105553882, 0.45)
    pt3dadd(-136.965701226556, 861.586812345182, -129.67174506225, 0.45)
    pt3dadd(-137.119530675305, 862.562891953701, -129.825384570617, 0.45)
    pt3dadd(-137.273360124054, 863.53897156222, -129.979024078985, 0.45)
    pt3dadd(-137.427189572803, 864.515051170739, -130.132663587353, 0.45)
    pt3dadd(-137.581019021552, 865.491130779258, -130.28630309572, 0.45)
    pt3dadd(-137.7348484703, 866.467210387776, -130.439942604088, 0.45)
    pt3dadd(-137.888677919049, 867.443289996295, -130.593582112455, 0.45)
    pt3dadd(-138.042507367798, 868.419369604814, -130.747221620823, 0.45)
    pt3dadd(-138.196336816547, 869.395449213333, -130.900861129191, 0.45)
    pt3dadd(-138.350166265296, 870.371528821852, -131.054500637558, 0.45)
    pt3dadd(-138.503995714045, 871.34760843037, -131.208140145926, 0.45)
    pt3dadd(-138.657825162794, 872.323688038889, -131.361779654293, 0.45)
    pt3dadd(-138.811654611542, 873.299767647408, -131.515419162661, 0.45)
    pt3dadd(-138.965484060291, 874.275847255927, -131.669058671029, 0.45)
    pt3dadd(-139.11931350904, 875.251926864446, -131.822698179396, 0.45)
    pt3dadd(-139.273142957789, 876.228006472964, -131.976337687764, 0.45)
    pt3dadd(-139.426972406538, 877.204086081483, -132.129977196131, 0.45)
    pt3dadd(-139.580801855287, 878.180165690002, -132.283616704499, 0.45)
    pt3dadd(-139.734631304036, 879.156245298521, -132.437256212867, 0.45)
    pt3dadd(-139.888460752784, 880.132324907039, -132.590895721234, 0.45)
    pt3dadd(-140.042290201533, 881.108404515558, -132.744535229602, 0.45)
    pt3dadd(-140.196119650282, 882.084484124077, -132.898174737969, 0.45)
    pt3dadd(-140.349949099031, 883.060563732596, -133.051814246337, 0.45)
    pt3dadd(-140.50377854778, 884.036643341115, -133.205453754705, 0.45)
    pt3dadd(-140.657607996529, 885.012722949633, -133.359093263072, 0.45)
    pt3dadd(-140.811437445278, 885.988802558152, -133.51273277144, 0.45)
    pt3dadd(-140.965266894026, 886.964882166671, -133.666372279807, 0.45)
    pt3dadd(-141.119096342775, 887.94096177519, -133.820011788175, 0.45)
    pt3dadd(-141.272925791524, 888.917041383708, -133.973651296543, 0.45)
    pt3dadd(-141.426755240273, 889.893120992227, -134.12729080491, 0.45)
    pt3dadd(-141.580584689022, 890.869200600746, -134.280930313278, 0.45)
    pt3dadd(-141.734414137771, 891.845280209265, -134.434569821645, 0.45)
    pt3dadd(-141.88824358652, 892.821359817784, -134.588209330013, 0.45)
    pt3dadd(-142.042073035268, 893.797439426302, -134.741848838381, 0.45)
    pt3dadd(-142.195902484017, 894.773519034821, -134.895488346748, 0.45)
    pt3dadd(-142.349731932766, 895.74959864334, -135.049127855116, 0.45)
    pt3dadd(-142.503561381515, 896.725678251859, -135.202767363483, 0.45)
    pt3dadd(-142.657390830264, 897.701757860378, -135.356406871851, 0.45)
    pt3dadd(-142.811220279013, 898.677837468896, -135.510046380218, 0.45)
    pt3dadd(-142.965049727762, 899.653917077415, -135.663685888586, 0.45)
    pt3dadd(-143.11887917651, 900.629996685934, -135.817325396954, 0.45)
    pt3dadd(-143.272708625259, 901.606076294453, -135.970964905321, 0.45)
    pt3dadd(-143.426538074008, 902.582155902972, -136.124604413689, 0.45)
    pt3dadd(-143.580367522757, 903.55823551149, -136.278243922056, 0.45)
    pt3dadd(-143.734196971506, 904.534315120009, -136.431883430424, 0.45)
    pt3dadd(-143.888026420255, 905.510394728528, -136.585522938792, 0.45)
    pt3dadd(-144.041855869004, 906.486474337047, -136.739162447159, 0.45)
    pt3dadd(-144.195685317753, 907.462553945565, -136.892801955527, 0.45)
    pt3dadd(-144.349514766501, 908.438633554084, -137.046441463894, 0.45)
    pt3dadd(-144.50334421525, 909.414713162603, -137.200080972262, 0.45)
    pt3dadd(-144.657173663999, 910.390792771122, -137.35372048063, 0.45)
    pt3dadd(-144.811003112748, 911.366872379641, -137.507359988997, 0.45)
    pt3dadd(-144.964832561497, 912.342951988159, -137.660999497365, 0.45)
    pt3dadd(-145.118662010246, 913.319031596678, -137.814639005732, 0.45)
    pt3dadd(-145.272491458995, 914.295111205197, -137.9682785141, 0.45)
    pt3dadd(-145.426320907743, 915.271190813716, -138.121918022468, 0.45)
    pt3dadd(-145.580150356492, 916.247270422234, -138.275557530835, 0.45)
    pt3dadd(-145.733979805241, 917.223350030753, -138.429197039203, 0.45)
    pt3dadd(-145.88780925399, 918.199429639272, -138.58283654757, 0.45)
    pt3dadd(-146.041638702739, 919.175509247791, -138.736476055938, 0.45)
    pt3dadd(-146.195468151488, 920.15158885631, -138.890115564306, 0.45)
    pt3dadd(-146.349297600237, 921.127668464828, -139.043755072673, 0.45)
    pt3dadd(-146.503127048985, 922.103748073347, -139.197394581041, 0.45)
    pt3dadd(-146.656956497734, 923.079827681866, -139.351034089408, 0.45)
    pt3dadd(-146.810785946483, 924.055907290385, -139.504673597776, 0.45)
    pt3dadd(-146.964615395232, 925.031986898904, -139.658313106144, 0.45)
    pt3dadd(-147.118444843981, 926.008066507422, -139.811952614511, 0.45)
    pt3dadd(-147.27227429273, 926.984146115941, -139.965592122879, 0.45)
    pt3dadd(-147.426103741479, 927.96022572446, -140.119231631246, 0.45)
    pt3dadd(-147.579933190227, 928.936305332979, -140.272871139614, 0.45)
    pt3dadd(-147.733762638976, 929.912384941498, -140.426510647982, 0.45)
    pt3dadd(-147.887592087725, 930.888464550016, -140.580150156349, 0.45)
    pt3dadd(-148.041421536474, 931.864544158535, -140.733789664717, 0.45)
    pt3dadd(-148.195250985223, 932.840623767054, -140.887429173084, 0.45)
    pt3dadd(-148.349080433972, 933.816703375573, -141.041068681452, 0.45)
    pt3dadd(-148.502909882721, 934.792782984091, -141.194708189819, 0.45)
    pt3dadd(-148.656739331469, 935.76886259261, -141.348347698187, 0.45)
    pt3dadd(-148.810568780218, 936.744942201129, -141.501987206555, 0.45)
    pt3dadd(-148.964398228967, 937.721021809648, -141.655626714922, 0.45)
    pt3dadd(-149.118227677716, 938.697101418167, -141.80926622329, 0.45)
    pt3dadd(-149.272057126465, 939.673181026685, -141.962905731657, 0.45)
    pt3dadd(-149.425886575214, 940.649260635204, -142.116545240025, 0.45)
    pt3dadd(-149.579716023963, 941.625340243723, -142.270184748393, 0.45)
    pt3dadd(-149.733545472711, 942.601419852242, -142.42382425676, 0.45)
    pt3dadd(-149.88737492146, 943.577499460761, -142.577463765128, 0.45)
    pt3dadd(-150.041204370209, 944.553579069279, -142.731103273495, 0.45)
    pt3dadd(-150.195033818958, 945.529658677798, -142.884742781863, 0.45)
    pt3dadd(-150.348863267707, 946.505738286317, -143.038382290231, 0.45)
    pt3dadd(-150.502692716456, 947.481817894836, -143.192021798598, 0.45)
    pt3dadd(-150.656522165205, 948.457897503355, -143.345661306966, 0.45)
    pt3dadd(-150.810351613953, 949.433977111873, -143.499300815333, 0.45)
    pt3dadd(-150.964181062702, 950.410056720392, -143.652940323701, 0.45)
    pt3dadd(-151.118010511451, 951.386136328911, -143.806579832069, 0.45)
    pt3dadd(-151.2718399602, 952.36221593743, -143.960219340436, 0.45)
    pt3dadd(-151.425669408949, 953.338295545948, -144.113858848804, 0.45)
    pt3dadd(-151.579498857698, 954.314375154467, -144.267498357171, 0.45)
    pt3dadd(-151.733328306447, 955.290454762986, -144.421137865539, 0.45)
    pt3dadd(-151.887157755195, 956.266534371505, -144.574777373907, 0.45)
    pt3dadd(-152.040987203944, 957.242613980024, -144.728416882274, 0.45)
    pt3dadd(-152.194816652693, 958.218693588542, -144.882056390642, 0.45)
    pt3dadd(-152.348646101442, 959.194773197061, -145.035695899009, 0.45)
    pt3dadd(-152.502475550191, 960.17085280558, -145.189335407377, 0.45)
    pt3dadd(-152.65630499894, 961.146932414099, -145.342974915745, 0.45)
    pt3dadd(-152.810134447689, 962.123012022617, -145.496614424112, 0.45)
    pt3dadd(-152.963963896437, 963.099091631136, -145.65025393248, 0.45)
    pt3dadd(-153.117793345186, 964.075171239655, -145.803893440847, 0.45)
    pt3dadd(-153.271622793935, 965.051250848174, -145.957532949215, 0.45)
    pt3dadd(-153.425452242684, 966.027330456693, -146.111172457583, 0.45)
    pt3dadd(-153.579281691433, 967.003410065211, -146.26481196595, 0.45)
    pt3dadd(-153.733111140182, 967.97948967373, -146.418451474318, 0.45)
    pt3dadd(-153.886940588931, 968.955569282249, -146.572090982685, 0.45)
    pt3dadd(-154.040770037679, 969.931648890768, -146.725730491053, 0.45)
    pt3dadd(-154.194599486428, 970.907728499287, -146.879369999421, 0.45)
    pt3dadd(-154.348428935177, 971.883808107805, -147.033009507788, 0.45)
    pt3dadd(-154.502258383926, 972.859887716324, -147.186649016156, 0.45)
    pt3dadd(-154.656087832675, 973.835967324843, -147.340288524523, 0.45)
    pt3dadd(-154.809917281424, 974.812046933362, -147.493928032891, 0.45)
    pt3dadd(-154.963746730173, 975.788126541881, -147.647567541258, 0.45)
    pt3dadd(-155.117576178921, 976.764206150399, -147.801207049626, 0.45)
    pt3dadd(-155.27140562767, 977.740285758918, -147.954846557994, 0.45)
    pt3dadd(-155.425235076419, 978.716365367437, -148.108486066361, 0.45)
    pt3dadd(-155.579064525168, 979.692444975956, -148.262125574729, 0.45)
    pt3dadd(-155.732893973917, 980.668524584474, -148.415765083096, 0.45)
    pt3dadd(-155.886723422666, 981.644604192993, -148.569404591464, 0.45)
    pt3dadd(-156.040552871415, 982.620683801512, -148.723044099832, 0.45)
    pt3dadd(-156.194382320163, 983.596763410031, -148.876683608199, 0.45)
    pt3dadd(-156.348211768912, 984.57284301855, -149.030323116567, 0.45)
    pt3dadd(-156.502041217661, 985.548922627068, -149.183962624934, 0.45)
    pt3dadd(-156.65587066641, 986.525002235587, -149.337602133302, 0.45)
    pt3dadd(-156.809700115159, 987.501081844106, -149.49124164167, 0.45)
    pt3dadd(-156.963529563908, 988.477161452625, -149.644881150037, 0.45)
    pt3dadd(-157.117359012657, 989.453241061143, -149.798520658405, 0.45)
    pt3dadd(-157.271188461405, 990.429320669662, -149.952160166772, 0.45)
    pt3dadd(-157.425017910154, 991.405400278181, -150.10579967514, 0.45)
    pt3dadd(-157.578847358903, 992.3814798867, -150.259439183508, 0.45)
    pt3dadd(-157.732676807652, 993.357559495219, -150.413078691875, 0.45)
    pt3dadd(-157.886506256401, 994.333639103737, -150.566718200243, 0.45)
    pt3dadd(-158.04033570515, 995.309718712256, -150.72035770861, 0.45)
    pt3dadd(-158.194165153899, 996.285798320775, -150.873997216978, 0.45)
    pt3dadd(-158.347994602647, 997.261877929294, -151.027636725346, 0.45)
    pt3dadd(-158.501824051396, 998.237957537813, -151.181276233713, 0.45)
    pt3dadd(-158.655653500145, 999.214037146331, -151.334915742081, 0.45)
    pt3dadd(-158.809482948894, 1000.19011675485, -151.488555250448, 0.45)
    pt3dadd(-158.963312397643, 1001.16619636337, -151.642194758816, 0.45)
    pt3dadd(-159.117141846392, 1002.14227597189, -151.795834267184, 0.45)
    pt3dadd(-159.270971295141, 1003.11835558041, -151.949473775551, 0.45)
    pt3dadd(-159.424800743889, 1004.09443518893, -152.103113283919, 0.45)
    pt3dadd(-159.578630192638, 1005.07051479744, -152.256752792286, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-159.732459641387, 1006.04659440596, -152.410392300654, 0.45)
    pt3dadd(-159.886289090136, 1007.02267401448, -152.564031809021, 0.45)
    pt3dadd(-160.040118538885, 1007.998753623, -152.717671317389, 0.45)
    pt3dadd(-160.193947987634, 1008.97483323152, -152.871310825757, 0.45)
    pt3dadd(-160.347777436383, 1009.95091284004, -153.024950334124, 0.45)
    pt3dadd(-160.501606885131, 1010.92699244856, -153.178589842492, 0.45)
    pt3dadd(-160.65543633388, 1011.90307205708, -153.332229350859, 0.45)
    pt3dadd(-160.809265782629, 1012.87915166559, -153.485868859227, 0.45)
    pt3dadd(-160.963095231378, 1013.85523127411, -153.639508367595, 0.45)
    pt3dadd(-161.116924680127, 1014.83131088263, -153.793147875962, 0.45)
    pt3dadd(-161.270754128876, 1015.80739049115, -153.94678738433, 0.45)
    pt3dadd(-161.424583577625, 1016.78347009967, -154.100426892697, 0.45)
    pt3dadd(-161.578413026373, 1017.75954970819, -154.254066401065, 0.45)
    pt3dadd(-161.732242475122, 1018.73562931671, -154.407705909433, 0.45)
    pt3dadd(-161.886071923871, 1019.71170892523, -154.5613454178, 0.45)
    pt3dadd(-162.03990137262, 1020.68778853374, -154.714984926168, 0.45)
    pt3dadd(-162.193730821369, 1021.66386814226, -154.868624434535, 0.45)
    pt3dadd(-162.347560270118, 1022.63994775078, -155.022263942903, 0.45)
    pt3dadd(-162.501389718867, 1023.6160273593, -155.175903451271, 0.45)
    pt3dadd(-162.655219167615, 1024.59210696782, -155.329542959638, 0.45)
    pt3dadd(-162.809048616364, 1025.56818657634, -155.483182468006, 0.45)
    pt3dadd(-162.962878065113, 1026.54426618486, -155.636821976373, 0.45)
    pt3dadd(-163.116707513862, 1027.52034579338, -155.790461484741, 0.45)
    pt3dadd(-163.270536962611, 1028.4964254019, -155.944100993109, 0.45)
    pt3dadd(-163.42436641136, 1029.47250501041, -156.097740501476, 0.45)
    pt3dadd(-163.578195860109, 1030.44858461893, -156.251380009844, 0.45)
    pt3dadd(-163.732025308858, 1031.42466422745, -156.405019518211, 0.45)
    pt3dadd(-163.885854757606, 1032.40074383597, -156.558659026579, 0.45)
    pt3dadd(-164.039684206355, 1033.37682344449, -156.712298534947, 0.45)
    pt3dadd(-164.193513655104, 1034.35290305301, -156.865938043314, 0.45)
    pt3dadd(-164.347343103853, 1035.32898266153, -157.019577551682, 0.45)
    pt3dadd(-164.501172552602, 1036.30506227005, -157.173217060049, 0.45)
    pt3dadd(-164.655002001351, 1037.28114187856, -157.326856568417, 0.45)
    pt3dadd(-164.8088314501, 1038.25722148708, -157.480496076785, 0.45)
    pt3dadd(-164.962660898848, 1039.2333010956, -157.634135585152, 0.45)
    pt3dadd(-165.116490347597, 1040.20938070412, -157.78777509352, 0.45)
    pt3dadd(-165.270319796346, 1041.18546031264, -157.941414601887, 0.45)
    pt3dadd(-165.424149245095, 1042.16153992116, -158.095054110255, 0.45)
    pt3dadd(-165.577978693844, 1043.13761952968, -158.248693618623, 0.45)
    pt3dadd(-165.731808142593, 1044.1136991382, -158.40233312699, 0.45)
    pt3dadd(-165.885637591342, 1045.08977874671, -158.555972635358, 0.45)
    pt3dadd(-166.03946704009, 1046.06585835523, -158.709612143725, 0.45)
    pt3dadd(-166.193296488839, 1047.04193796375, -158.863251652093, 0.45)
    pt3dadd(-166.347125937588, 1048.01801757227, -159.01689116046, 0.45)
    pt3dadd(-166.500955386337, 1048.99409718079, -159.170530668828, 0.45)
    pt3dadd(-166.654784835086, 1049.97017678931, -159.324170177196, 0.45)
    pt3dadd(-166.808614283835, 1050.94625639783, -159.477809685563, 0.45)
    pt3dadd(-166.962443732584, 1051.92233600635, -159.631449193931, 0.45)
    pt3dadd(-167.116273181332, 1052.89841561486, -159.785088702298, 0.45)
    pt3dadd(-167.270102630081, 1053.87449522338, -159.938728210666, 0.45)
    pt3dadd(-167.42393207883, 1054.8505748319, -160.092367719034, 0.45)
    pt3dadd(-167.577761527579, 1055.82665444042, -160.246007227401, 0.45)
    pt3dadd(-167.731590976328, 1056.80273404894, -160.399646735769, 0.45)
    pt3dadd(-167.885420425077, 1057.77881365746, -160.553286244136, 0.45)
    pt3dadd(-168.039249873826, 1058.75489326598, -160.706925752504, 0.45)
    pt3dadd(-168.193079322574, 1059.7309728745, -160.860565260872, 0.45)
    pt3dadd(-168.346908771323, 1060.70705248301, -161.014204769239, 0.45)
    pt3dadd(-168.500738220072, 1061.68313209153, -161.167844277607, 0.45)
    pt3dadd(-168.654567668821, 1062.65921170005, -161.321483785974, 0.45)
    pt3dadd(-168.80839711757, 1063.63529130857, -161.475123294342, 0.45)
    pt3dadd(-168.962226566319, 1064.61137091709, -161.62876280271, 0.45)
    pt3dadd(-169.116056015068, 1065.58745052561, -161.782402311077, 0.45)
    pt3dadd(-169.269885463816, 1066.56353013413, -161.936041819445, 0.45)
    pt3dadd(-169.423714912565, 1067.53960974265, -162.089681327812, 0.45)
    pt3dadd(-169.577544361314, 1068.51568935117, -162.24332083618, 0.45)
    pt3dadd(-169.731373810063, 1069.49176895968, -162.396960344548, 0.45)
    pt3dadd(-169.885203258812, 1070.4678485682, -162.550599852915, 0.45)
    pt3dadd(-170.039032707561, 1071.44392817672, -162.704239361283, 0.45)
    pt3dadd(-170.19286215631, 1072.42000778524, -162.85787886965, 0.45)
    pt3dadd(-170.346691605058, 1073.39608739376, -163.011518378018, 0.45)
    pt3dadd(-170.500521053807, 1074.37216700228, -163.165157886386, 0.45)
    pt3dadd(-170.654350502556, 1075.3482466108, -163.318797394753, 0.45)
    pt3dadd(-170.808179951305, 1076.32432621932, -163.472436903121, 0.45)
    pt3dadd(-170.962009400054, 1077.30040582783, -163.626076411488, 0.45)
    pt3dadd(-171.115838848803, 1078.27648543635, -163.779715919856, 0.45)
    pt3dadd(-171.269668297552, 1079.25256504487, -163.933355428224, 0.45)
    pt3dadd(-171.4234977463, 1080.22864465339, -164.086994936591, 0.45)
    pt3dadd(-171.577327195049, 1081.20472426191, -164.240634444959, 0.45)
    pt3dadd(-171.731156643798, 1082.18080387043, -164.394273953326, 0.45)
    pt3dadd(-171.884986092547, 1083.15688347895, -164.547913461694, 0.45)
    pt3dadd(-172.038815541296, 1084.13296308747, -164.701552970061, 0.45)
    pt3dadd(-172.192644990045, 1085.10904269598, -164.855192478429, 0.45)
    pt3dadd(-172.346474438794, 1086.0851223045, -165.008831986797, 0.45)
    pt3dadd(-172.500303887542, 1087.06120191302, -165.162471495164, 0.45)
    pt3dadd(-172.654133336291, 1088.03728152154, -165.316111003532, 0.45)
    pt3dadd(-172.80796278504, 1089.01336113006, -165.469750511899, 0.45)
    pt3dadd(-172.961792233789, 1089.98944073858, -165.623390020267, 0.45)
    pt3dadd(-173.115621682538, 1090.9655203471, -165.777029528635, 0.45)
    pt3dadd(-173.269451131287, 1091.94159995562, -165.930669037002, 0.45)
    pt3dadd(-173.423280580036, 1092.91767956413, -166.08430854537, 0.45)
    pt3dadd(-173.577110028784, 1093.89375917265, -166.237948053737, 0.45)
    pt3dadd(-173.730939477533, 1094.86983878117, -166.391587562105, 0.45)
    pt3dadd(-173.884768926282, 1095.84591838969, -166.545227070473, 0.45)
    pt3dadd(-174.038598375031, 1096.82199799821, -166.69886657884, 0.45)
    pt3dadd(-174.19242782378, 1097.79807760673, -166.852506087208, 0.45)
    pt3dadd(-174.346257272529, 1098.77415721525, -167.006145595575, 0.45)
    pt3dadd(-174.500086721278, 1099.75023682377, -167.159785103943, 0.45)
    pt3dadd(-174.653916170026, 1100.72631643228, -167.313424612311, 0.45)
    pt3dadd(-174.807745618775, 1101.7023960408, -167.467064120678, 0.45)
    pt3dadd(-174.961575067524, 1102.67847564932, -167.620703629046, 0.45)
    pt3dadd(-175.115404516273, 1103.65455525784, -167.774343137413, 0.45)
    pt3dadd(-175.269233965022, 1104.63063486636, -167.927982645781, 0.45)
    pt3dadd(-175.423063413771, 1105.60671447488, -168.081622154149, 0.45)
    pt3dadd(-175.57689286252, 1106.5827940834, -168.235261662516, 0.45)
    pt3dadd(-175.730722311268, 1107.55887369192, -168.388901170884, 0.45)
    pt3dadd(-175.884551760017, 1108.53495330044, -168.542540679251, 0.45)
    pt3dadd(-176.038381208766, 1109.51103290895, -168.696180187619, 0.45)
    pt3dadd(-176.192210657515, 1110.48711251747, -168.849819695987, 0.45)
    pt3dadd(-176.346040106264, 1111.46319212599, -169.003459204354, 0.45)
    pt3dadd(-176.499869555013, 1112.43927173451, -169.157098712722, 0.45)
    pt3dadd(-176.653699003762, 1113.41535134303, -169.310738221089, 0.45)
    pt3dadd(-176.80752845251, 1114.39143095155, -169.464377729457, 0.45)
    pt3dadd(-176.961357901259, 1115.36751056007, -169.618017237824, 0.45)
    pt3dadd(-177.115187350008, 1116.34359016859, -169.771656746192, 0.45)
    pt3dadd(-177.269016798757, 1117.3196697771, -169.92529625456, 0.45)
    pt3dadd(-177.422846247506, 1118.29574938562, -170.078935762927, 0.45)
    pt3dadd(-177.576675696255, 1119.27182899414, -170.232575271295, 0.45)
    pt3dadd(-177.730505145004, 1120.24790860266, -170.386214779662, 0.45)
    pt3dadd(-177.884334593752, 1121.22398821118, -170.53985428803, 0.45)
    pt3dadd(-178.038164042501, 1122.2000678197, -170.693493796398, 0.45)
    pt3dadd(-178.19199349125, 1123.17614742822, -170.847133304765, 0.45)
    pt3dadd(-178.345822939999, 1124.15222703674, -171.000772813133, 0.45)
    pt3dadd(-178.499652388748, 1125.12830664525, -171.1544123215, 0.45)
    pt3dadd(-178.653481837497, 1126.10438625377, -171.308051829868, 0.45)
    pt3dadd(-178.807311286246, 1127.08046586229, -171.461691338236, 0.45)
    pt3dadd(-178.961140734994, 1128.05654547081, -171.615330846603, 0.45)
    pt3dadd(-179.114970183743, 1129.03262507933, -171.768970354971, 0.45)
    pt3dadd(-179.268799632492, 1130.00870468785, -171.922609863338, 0.45)
    pt3dadd(-179.422629081241, 1130.98478429637, -172.076249371706, 0.45)
    pt3dadd(-179.57645852999, 1131.96086390489, -172.229888880074, 0.45)
    pt3dadd(-179.730287978739, 1132.9369435134, -172.383528388441, 0.45)
    pt3dadd(-179.884117427488, 1133.91302312192, -172.537167896809, 0.45)
    pt3dadd(-180.037946876236, 1134.88910273044, -172.690807405176, 0.45)
    pt3dadd(-180.191776324985, 1135.86518233896, -172.844446913544, 0.45)
    pt3dadd(-180.345605773734, 1136.84126194748, -172.998086421912, 0.45)
    pt3dadd(-180.499435222483, 1137.817341556, -173.151725930279, 0.45)
    pt3dadd(-180.653264671232, 1138.79342116452, -173.305365438647, 0.45)
    pt3dadd(-180.807094119981, 1139.76950077304, -173.459004947014, 0.45)
    pt3dadd(-180.96092356873, 1140.74558038156, -173.612644455382, 0.45)
    pt3dadd(-181.114753017478, 1141.72165999007, -173.76628396375, 0.45)
    pt3dadd(-181.268582466227, 1142.69773959859, -173.919923472117, 0.45)
    pt3dadd(-181.422411914976, 1143.67381920711, -174.073562980485, 0.45)
    pt3dadd(-181.576241363725, 1144.64989881563, -174.227202488852, 0.45)
    pt3dadd(-181.730070812474, 1145.62597842415, -174.38084199722, 0.45)
    pt3dadd(-181.883900261223, 1146.60205803267, -174.534481505588, 0.45)
    pt3dadd(-182.037729709972, 1147.57813764119, -174.688121013955, 0.45)
    pt3dadd(-182.19155915872, 1148.55421724971, -174.841760522323, 0.45)
    pt3dadd(-182.345388607469, 1149.53029685822, -174.99540003069, 0.45)
    pt3dadd(-182.499218056218, 1150.50637646674, -175.149039539058, 0.45)
    pt3dadd(-182.653047504967, 1151.48245607526, -175.302679047426, 0.45)
    pt3dadd(-182.806876953716, 1152.45853568378, -175.456318555793, 0.45)
    pt3dadd(-182.960706402465, 1153.4346152923, -175.609958064161, 0.45)
    pt3dadd(-183.114535851214, 1154.41069490082, -175.763597572528, 0.45)
    pt3dadd(-183.268365299963, 1155.38677450934, -175.917237080896, 0.45)
    pt3dadd(-183.422194748711, 1156.36285411786, -176.070876589263, 0.45)
    pt3dadd(-183.57602419746, 1157.33893372637, -176.224516097631, 0.45)
    pt3dadd(-183.729853646209, 1158.31501333489, -176.378155605999, 0.45)
    pt3dadd(-183.883683094958, 1159.29109294341, -176.531795114366, 0.45)
    pt3dadd(-184.037512543707, 1160.26717255193, -176.685434622734, 0.45)
    pt3dadd(-184.191341992456, 1161.24325216045, -176.839074131101, 0.45)
    pt3dadd(-184.345171441205, 1162.21933176897, -176.992713639469, 0.45)
    pt3dadd(-184.499000889953, 1163.19541137749, -177.146353147837, 0.45)
    pt3dadd(-184.652830338702, 1164.17149098601, -177.299992656204, 0.45)
    pt3dadd(-184.806659787451, 1165.14757059453, -177.453632164572, 0.45)
    pt3dadd(-184.9604892362, 1166.12365020304, -177.607271672939, 0.45)
    pt3dadd(-185.114318684949, 1167.09972981156, -177.760911181307, 0.45)
    pt3dadd(-185.268148133698, 1168.07580942008, -177.914550689675, 0.45)
    pt3dadd(-185.421977582447, 1169.0518890286, -178.068190198042, 0.45)
    pt3dadd(-185.575807031195, 1170.02796863712, -178.22182970641, 0.45)
    pt3dadd(-185.729636479944, 1171.00404824564, -178.375469214777, 0.45)
    pt3dadd(-185.883465928693, 1171.98012785416, -178.529108723145, 0.45)
    pt3dadd(-186.037295377442, 1172.95620746268, -178.682748231513, 0.45)
    pt3dadd(-186.191124826191, 1173.93228707119, -178.83638773988, 0.45)
    pt3dadd(-186.34495427494, 1174.90836667971, -178.990027248248, 0.45)
    pt3dadd(-186.498783723689, 1175.88444628823, -179.143666756615, 0.45)
    pt3dadd(-186.652613172437, 1176.86052589675, -179.297306264983, 0.45)
    pt3dadd(-186.806442621186, 1177.83660550527, -179.450945773351, 0.45)
    pt3dadd(-186.960272069935, 1178.81268511379, -179.604585281718, 0.45)
    pt3dadd(-187.114101518684, 1179.78876472231, -179.758224790086, 0.45)
    pt3dadd(-187.267930967433, 1180.76484433083, -179.911864298453, 0.45)
    pt3dadd(-187.421760416182, 1181.74092393934, -180.065503806821, 0.45)
    pt3dadd(-187.575589864931, 1182.71700354786, -180.219143315189, 0.45)
    pt3dadd(-187.729419313679, 1183.69308315638, -180.372782823556, 0.45)
    pt3dadd(-187.883248762428, 1184.6691627649, -180.526422331924, 0.45)
    pt3dadd(-188.037078211177, 1185.64524237342, -180.680061840291, 0.45)
    pt3dadd(-188.190907659926, 1186.62132198194, -180.833701348659, 0.45)
    pt3dadd(-188.344737108675, 1187.59740159046, -180.987340857027, 0.45)
    pt3dadd(-188.498566557424, 1188.57348119898, -181.140980365394, 0.45)
    pt3dadd(-188.652396006173, 1189.54956080749, -181.294619873762, 0.45)
    pt3dadd(-188.806225454921, 1190.52564041601, -181.448259382129, 0.45)
    pt3dadd(-188.96005490367, 1191.50172002453, -181.601898890497, 0.45)
    pt3dadd(-189.113884352419, 1192.47779963305, -181.755538398864, 0.45)
    pt3dadd(-189.267713801168, 1193.45387924157, -181.909177907232, 0.45)
    pt3dadd(-189.421543249917, 1194.42995885009, -182.0628174156, 0.45)
    pt3dadd(-189.575372698666, 1195.40603845861, -182.216456923967, 0.45)
    pt3dadd(-189.729202147415, 1196.38211806713, -182.370096432335, 0.45)
    pt3dadd(-189.883031596163, 1197.35819767565, -182.523735940702, 0.45)
    pt3dadd(-190.036861044912, 1198.33427728416, -182.67737544907, 0.45)
    pt3dadd(-190.190690493661, 1199.31035689268, -182.831014957438, 0.45)
    pt3dadd(-190.34451994241, 1200.2864365012, -182.984654465805, 0.45)
    pt3dadd(-190.498349391159, 1201.26251610972, -183.138293974173, 0.45)
    pt3dadd(-190.652178839908, 1202.23859571824, -183.29193348254, 0.45)
    pt3dadd(-190.806008288657, 1203.21467532676, -183.445572990908, 0.45)
    pt3dadd(-190.959837737405, 1204.19075493528, -183.599212499276, 0.45)
    pt3dadd(-191.113667186154, 1205.1668345438, -183.752852007643, 0.45)
    pt3dadd(-191.267496634903, 1206.14291415231, -183.906491516011, 0.45)
    pt3dadd(-191.421326083652, 1207.11899376083, -184.060131024378, 0.45)
    pt3dadd(-191.575155532401, 1208.09507336935, -184.213770532746, 0.45)
    pt3dadd(-191.72898498115, 1209.07115297787, -184.367410041114, 0.45)
    pt3dadd(-191.882814429899, 1210.04723258639, -184.521049549481, 0.45)
    pt3dadd(-192.036643878647, 1211.02331219491, -184.674689057849, 0.45)
    pt3dadd(-192.190473327396, 1211.99939180343, -184.828328566216, 0.45)
    pt3dadd(-192.344302776145, 1212.97547141195, -184.981968074584, 0.45)
    pt3dadd(-192.498132224894, 1213.95155102046, -185.135607582952, 0.45)
    pt3dadd(-192.651961673643, 1214.92763062898, -185.289247091319, 0.45)
    pt3dadd(-192.805791122392, 1215.9037102375, -185.442886599687, 0.45)
    pt3dadd(-192.959620571141, 1216.87978984602, -185.596526108054, 0.45)
    pt3dadd(-193.113450019889, 1217.85586945454, -185.750165616422, 0.45)
    pt3dadd(-193.267279468638, 1218.83194906306, -185.90380512479, 0.45)
    pt3dadd(-193.421108917387, 1219.80802867158, -186.057444633157, 0.45)
    pt3dadd(-193.574938366136, 1220.7841082801, -186.211084141525, 0.45)
    pt3dadd(-193.728767814885, 1221.76018788861, -186.364723649892, 0.45)
    pt3dadd(-193.882597263634, 1222.73626749713, -186.51836315826, 0.45)
    pt3dadd(-194.036426712383, 1223.71234710565, -186.672002666628, 0.45)
    pt3dadd(-194.190256161131, 1224.68842671417, -186.825642174995, 0.45)
    pt3dadd(-194.34408560988, 1225.66450632269, -186.979281683363, 0.45)
    pt3dadd(-194.497915058629, 1226.64058593121, -187.13292119173, 0.45)
    pt3dadd(-194.651744507378, 1227.61666553973, -187.286560700098, 0.45)
    pt3dadd(-194.805573956127, 1228.59274514825, -187.440200208465, 0.45)
    pt3dadd(-194.959403404876, 1229.56882475677, -187.593839716833, 0.45)
    pt3dadd(-195.113232853625, 1230.54490436528, -187.747479225201, 0.45)
    pt3dadd(-195.267062302373, 1231.5209839738, -187.901118733568, 0.45)
    pt3dadd(-195.420891751122, 1232.49706358232, -188.054758241936, 0.45)
    pt3dadd(-195.574721199871, 1233.47314319084, -188.208397750303, 0.45)
    pt3dadd(-195.72855064862, 1234.44922279936, -188.362037258671, 0.45)
    pt3dadd(-195.882380097369, 1235.42530240788, -188.515676767039, 0.45)
    pt3dadd(-196.036209546118, 1236.4013820164, -188.669316275406, 0.45)
    pt3dadd(-196.190038994867, 1237.37746162492, -188.822955783774, 0.45)
    pt3dadd(-196.343868443615, 1238.35354123343, -188.976595292141, 0.45)
    pt3dadd(-196.497697892364, 1239.32962084195, -189.130234800509, 0.45)
    pt3dadd(-196.651527341113, 1240.30570045047, -189.283874308877, 0.45)
    pt3dadd(-196.805356789862, 1241.28178005899, -189.437513817244, 0.45)
    pt3dadd(-196.959186238611, 1242.25785966751, -189.591153325612, 0.45)
    pt3dadd(-197.11301568736, 1243.23393927603, -189.744792833979, 0.45)
    pt3dadd(-197.266845136109, 1244.21001888455, -189.898432342347, 0.45)
    pt3dadd(-197.420674584857, 1245.18609849307, -190.052071850715, 0.45)
    pt3dadd(-197.574504033606, 1246.16217810158, -190.205711359082, 0.45)
    pt3dadd(-197.728333482355, 1247.1382577101, -190.35935086745, 0.45)
    pt3dadd(-197.882162931104, 1248.11433731862, -190.512990375817, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-198.035992379853, 1249.09041692714, -190.666629884185, 0.45)
    pt3dadd(-198.189821828602, 1250.06649653566, -190.820269392553, 0.45)
    pt3dadd(-198.343651277351, 1251.04257614418, -190.97390890092, 0.45)
    pt3dadd(-198.497480726099, 1252.0186557527, -191.127548409288, 0.45)
    pt3dadd(-198.651310174848, 1252.99473536122, -191.281187917655, 0.45)
    pt3dadd(-198.805139623597, 1253.97081496973, -191.434827426023, 0.45)
    pt3dadd(-198.958969072346, 1254.94689457825, -191.588466934391, 0.45)
    pt3dadd(-199.112798521095, 1255.92297418677, -191.742106442758, 0.45)
    pt3dadd(-199.266627969844, 1256.89905379529, -191.895745951126, 0.45)
    pt3dadd(-199.420457418593, 1257.87513340381, -192.049385459493, 0.45)
    pt3dadd(-199.574286867341, 1258.85121301233, -192.203024967861, 0.45)
    pt3dadd(-199.72811631609, 1259.82729262085, -192.356664476229, 0.45)
    pt3dadd(-199.881945764839, 1260.80337222937, -192.510303984596, 0.45)
    pt3dadd(-200.035775213588, 1261.77945183788, -192.663943492964, 0.45)
    pt3dadd(-200.189604662337, 1262.7555314464, -192.817583001331, 0.45)
    pt3dadd(-200.343434111086, 1263.73161105492, -192.971222509699, 0.45)
    pt3dadd(-200.497263559835, 1264.70769066344, -193.124862018066, 0.45)
    pt3dadd(-200.651093008583, 1265.68377027196, -193.278501526434, 0.45)
    pt3dadd(-200.804922457332, 1266.65984988048, -193.432141034802, 0.45)
    pt3dadd(-200.958751906081, 1267.635929489, -193.585780543169, 0.45)
    pt3dadd(-201.11258135483, 1268.61200909752, -193.739420051537, 0.45)
    pt3dadd(-201.266410803579, 1269.58808870604, -193.893059559904, 0.45)
    pt3dadd(-201.420240252328, 1270.56416831455, -194.046699068272, 0.45)
    pt3dadd(-201.574069701077, 1271.54024792307, -194.20033857664, 0.45)
    pt3dadd(-201.727899149825, 1272.51632753159, -194.353978085007, 0.45)
    pt3dadd(-201.881728598574, 1273.49240714011, -194.507617593375, 0.45)
    pt3dadd(-202.035558047323, 1274.46848674863, -194.661257101742, 0.45)
    pt3dadd(-202.189387496072, 1275.44456635715, -194.81489661011, 0.45)
    pt3dadd(-202.343216944821, 1276.42064596567, -194.968536118478, 0.45)
    pt3dadd(-202.49704639357, 1277.39672557419, -195.122175626845, 0.45)
    pt3dadd(-202.650875842319, 1278.3728051827, -195.275815135213, 0.45)
    pt3dadd(-202.804705291068, 1279.34888479122, -195.42945464358, 0.45)
    pt3dadd(-202.958534739816, 1280.32496439974, -195.583094151948, 0.45)
    pt3dadd(-203.112364188565, 1281.30104400826, -195.736733660316, 0.45)
    pt3dadd(-203.266193637314, 1282.27712361678, -195.890373168683, 0.45)
    pt3dadd(-203.420023086063, 1283.2532032253, -196.044012677051, 0.45)
    pt3dadd(-203.573852534812, 1284.22928283382, -196.197652185418, 0.45)
    pt3dadd(-203.727681983561, 1285.20536244234, -196.351291693786, 0.45)
    pt3dadd(-203.88151143231, 1286.18144205085, -196.504931202154, 0.45)
    pt3dadd(-204.035340881058, 1287.15752165937, -196.658570710521, 0.45)
    pt3dadd(-204.189170329807, 1288.13360126789, -196.812210218889, 0.45)
    pt3dadd(-204.342999778556, 1289.10968087641, -196.965849727256, 0.45)
    pt3dadd(-204.496829227305, 1290.08576048493, -197.119489235624, 0.45)
    pt3dadd(-204.650658676054, 1291.06184009345, -197.273128743992, 0.45)
    pt3dadd(-204.804488124803, 1292.03791970197, -197.426768252359, 0.45)
    pt3dadd(-204.958317573552, 1293.01399931049, -197.580407760727, 0.45)
    pt3dadd(-205.1121470223, 1293.990078919, -197.734047269094, 0.45)
    pt3dadd(-205.265976471049, 1294.96615852752, -197.887686777462, 0.45)
    pt3dadd(-205.419805919798, 1295.94223813604, -198.04132628583, 0.45)
    pt3dadd(-205.573635368547, 1296.91831774456, -198.194965794197, 0.45)
    pt3dadd(-205.727464817296, 1297.89439735308, -198.348605302565, 0.45)
    pt3dadd(-205.881294266045, 1298.8704769616, -198.502244810932, 0.45)
    pt3dadd(-206.035123714794, 1299.84655657012, -198.6558843193, 0.45)
    pt3dadd(-206.188953163542, 1300.82263617864, -198.809523827667, 0.45)
    pt3dadd(-206.342782612291, 1301.79871578715, -198.963163336035, 0.45)
    pt3dadd(-206.49661206104, 1302.77479539567, -199.116802844403, 0.45)
    pt3dadd(-206.650441509789, 1303.75087500419, -199.27044235277, 0.45)
    pt3dadd(-206.804270958538, 1304.72695461271, -199.424081861138, 0.45)
    pt3dadd(-206.958100407287, 1305.70303422123, -199.577721369505, 0.45)
    pt3dadd(-207.111929856036, 1306.67911382975, -199.731360877873, 0.45)
    pt3dadd(-207.265759304784, 1307.65519343827, -199.885000386241, 0.45)
    pt3dadd(-207.419588753533, 1308.63127304679, -200.038639894608, 0.45)
    pt3dadd(-207.573418202282, 1309.60735265531, -200.192279402976, 0.45)
    pt3dadd(-207.727247651031, 1310.58343226382, -200.345918911343, 0.45)
    pt3dadd(-207.88107709978, 1311.55951187234, -200.499558419711, 0.45)
    pt3dadd(-208.034906548529, 1312.53559148086, -200.653197928079, 0.45)
    pt3dadd(-208.188735997278, 1313.51167108938, -200.806837436446, 0.45)
    pt3dadd(-208.342565446026, 1314.4877506979, -200.960476944814, 0.45)
    pt3dadd(-208.496394894775, 1315.46383030642, -201.114116453181, 0.45)
    pt3dadd(-208.650224343524, 1316.43990991494, -201.267755961549, 0.45)
    pt3dadd(-208.804053792273, 1317.41598952346, -201.421395469917, 0.45)
    pt3dadd(-208.957883241022, 1318.39206913197, -201.575034978284, 0.45)
    pt3dadd(-209.111712689771, 1319.36814874049, -201.728674486652, 0.45)
    pt3dadd(-209.26554213852, 1320.34422834901, -201.882313995019, 0.45)
    pt3dadd(-209.419371587268, 1321.32030795753, -202.035953503387, 0.45)
    pt3dadd(-209.573201036017, 1322.29638756605, -202.189593011755, 0.45)
    pt3dadd(-209.727030484766, 1323.27246717457, -202.343232520122, 0.45)
    pt3dadd(-209.880859933515, 1324.24854678309, -202.49687202849, 0.45)
    pt3dadd(-210.034689382264, 1325.22462639161, -202.650511536857, 0.45)
    pt3dadd(-210.188518831013, 1326.20070600012, -202.804151045225, 0.45)
    pt3dadd(-210.342348279762, 1327.17678560864, -202.957790553593, 0.45)
    pt3dadd(-210.49617772851, 1328.15286521716, -203.11143006196, 0.45)
    pt3dadd(-210.650007177259, 1329.12894482568, -203.265069570328, 0.45)
    pt3dadd(-210.803836626008, 1330.1050244342, -203.418709078695, 0.45)
    pt3dadd(-210.957666074757, 1331.08110404272, -203.572348587063, 0.45)
    pt3dadd(-211.111495523506, 1332.05718365124, -203.725988095431, 0.45)
    pt3dadd(-211.265324972255, 1333.03326325976, -203.879627603798, 0.45)
    pt3dadd(-211.419154421004, 1334.00934286827, -204.033267112166, 0.45)
    pt3dadd(-211.572983869752, 1334.98542247679, -204.186906620533, 0.45)
    pt3dadd(-211.726813318501, 1335.96150208531, -204.340546128901, 0.45)
    pt3dadd(-211.88064276725, 1336.93758169383, -204.494185637268, 0.45)
    pt3dadd(-212.034472215999, 1337.91366130235, -204.647825145636, 0.45)
    pt3dadd(-212.188301664748, 1338.88974091087, -204.801464654004, 0.45)
    pt3dadd(-212.342131113497, 1339.86582051939, -204.955104162371, 0.45)
    pt3dadd(-212.495960562246, 1340.84190012791, -205.108743670739, 0.45)
    pt3dadd(-212.649790010994, 1341.81797973643, -205.262383179106, 0.45)
    pt3dadd(-212.803619459743, 1342.79405934494, -205.416022687474, 0.45)
    pt3dadd(-212.957448908492, 1343.77013895346, -205.569662195842, 0.45)
    pt3dadd(-213.111278357241, 1344.74621856198, -205.723301704209, 0.45)
    pt3dadd(-213.26510780599, 1345.7222981705, -205.876941212577, 0.45)
    pt3dadd(-213.418937254739, 1346.69837777902, -206.030580720944, 0.45)
    pt3dadd(-213.572766703488, 1347.67445738754, -206.184220229312, 0.45)
    pt3dadd(-213.726596152236, 1348.65053699606, -206.33785973768, 0.45)
    pt3dadd(-213.880425600985, 1349.62661660458, -206.491499246047, 0.45)
    pt3dadd(-214.034255049734, 1350.60269621309, -206.645138754415, 0.45)
    pt3dadd(-214.188084498483, 1351.57877582161, -206.798778262782, 0.45)
    pt3dadd(-214.341913947232, 1352.55485543013, -206.95241777115, 0.45)
    pt3dadd(-214.495743395981, 1353.53093503865, -207.106057279518, 0.45)
    pt3dadd(-214.64957284473, 1354.50701464717, -207.259696787885, 0.45)
    pt3dadd(-214.803402293478, 1355.48309425569, -207.413336296253, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-7.13364648251983, 37.7756227553272, 0, 10.2667572303772)
    pt3dadd(-6.97981703377097, 36.7995431468084, 0.153639508367595, 10.2667572303772)
    pt3dadd(-6.82598758502211, 35.8234635382896, 0.30727901673519, 9.58775356515898)
    pt3dadd(-6.67215813627325, 34.8473839297708, 0.460918525102785, 8.52332145975835)
    pt3dadd(-6.51832868752439, 33.871304321252, 0.61455803347038, 7.16804037792357)
    pt3dadd(-6.36449923877553, 32.8952247127332, 0.768197541837975, 5.64233299132872)
    pt3dadd(-6.21066979002668, 31.9191451042145, 0.92183705020557, 5.45898639729796)
    pt3dadd(-6.05684034127782, 30.9430654956957, 1.07547655857316, 5.30402746351429)
    pt3dadd(-5.90301089252896, 29.9669858871769, 1.22911606694076, 5.14906852973061)
    pt3dadd(-5.7491814437801, 28.9909062786581, 1.38275557530835, 4.99410959594694)
    pt3dadd(-5.59535199503124, 28.0148266701393, 1.53639508367595, 4.83915066216327)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-5.59535199503124, 28.0148266701393, 1.53639508367595, 4.68419172837959)
    pt3dadd(-5.44152254628238, 27.0387470616205, 1.69003459204354, 4.68419172837959)
    pt3dadd(-5.28769309753352, 26.0626674531017, 1.84367410041114, 4.52923279459592)
    pt3dadd(-5.13386364878467, 25.086587844583, 1.99731360877873, 4.37427386081225)
    pt3dadd(-4.98003420003581, 24.1105082360642, 2.15095311714633, 4.21931492702857)
    pt3dadd(-4.82620475128695, 23.1344286275454, 2.30459262551392, 4.0643559932449)
    pt3dadd(-4.67237530253809, 22.1583490190266, 2.45823213388152, 3.90939705946123)
    pt3dadd(-4.51854585378923, 21.1822694105078, 2.61187164224911, 3.75443812567755)
    pt3dadd(-4.36471640504037, 20.206189801989, 2.76551115061671, 3.59947919189388)
    pt3dadd(-4.21088695629151, 19.2301101934702, 2.9191506589843, 3.44452025811021)
    pt3dadd(-4.05705750754266, 18.2540305849514, 3.0727901673519, 3.28956132432653)
    pt3dadd(-3.9032280587938, 17.2779509764327, 3.2264296757195, 3.13460239054286)
    pt3dadd(-3.74939861004494, 16.3018713679139, 3.38006918408709, 2.97964345675919)
    pt3dadd(-3.59556916129608, 15.3257917593951, 3.53370869245468, 2.82468452297551)
    pt3dadd(-3.44554306244599, 14.3486009660346, 3.681833586819, 2.68)
    pt3dadd(-3.34907583680886, 13.3557624385354, 3.75230154188473, 2.68)
    pt3dadd(-3.25260861117174, 12.3629239110363, 3.82276949695046, 2.68)
    pt3dadd(-3.15614138553462, 11.3700853835371, 3.89323745201618, 2.68)
    pt3dadd(-3.05967415989749, 10.3772468560379, 3.96370540708191, 2.68)
    pt3dadd(-2.97129597680605, 9.40017923306638, 4.08837322572442, 2.68)
    pt3dadd(-2.93760983121011, 8.52974263557062, 4.57949986248411, 2.68)
    pt3dadd(-2.58852455951654, 7.73384022568231, 4.52997252827277, 2.68)
    pt3dadd(-2.04716545820022, 6.9833753979028, 4.15085135280527, 2.68)
    pt3dadd(-1.71119934350718, 6.0793037892435, 4.08514828387129, 2.68)
    pt3dadd(-1.45721448779935, 5.11392104483307, 4.14454398965598, 2.68)
    pt3dadd(-1.20322963209153, 4.14853830042264, 4.20393969544067, 2.68)
    pt3dadd(-0.949244776383698, 3.18315555601221, 4.26333540122536, 2.68)
    pt3dadd(-0.695259920675871, 2.21777281160178, 4.32273110701005, 2.68)
    pt3dadd(-0.460284781342311, 1.25045631061797, 4.253531471003, 2.68)
    pt3dadd(-0.230142390671154, 0.282648200011522, 4.15163966043639, 2.68)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-0.230142390671154, 0.282648200011522, 4.15163966043639, 2.68)
    pt3dadd(0, -0.685159910594919, 4.04974784986977, 2.68)
    pt3dadd(0.219161767674695, -1.65380791394399, 3.95409634485553, 2.68)
    pt3dadd(0.137142937326185, -2.63942846286287, 4.02220502595704, 2.6716845511303)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(0.137142937326185, -2.63942846286287, 4.02220502595704, 2.59175484257754)
    pt3dadd(0.524298291298259, -3.55753504855725, 3.82825406190055, 2.59175484257754)
    pt3dadd(0.875327226739729, -4.4764637470384, 3.6483965249705, 2.51182513402477)
    pt3dadd(1.2263561621812, -5.39539244551957, 3.46853898804044, 2.43189542547201)
    pt3dadd(1.57738509762267, -6.31432114400073, 3.28868145111038, 2.35196571691925)
    pt3dadd(1.92841403306414, -7.2332498424819, 3.10882391418032, 2.27203600836648)
    pt3dadd(2.25691070619842, -7.93224594804764, 3.29439505877213, 2.23)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(2.25691070619842, -7.93224594804764, 3.29439505877213, 2.23)
    pt3dadd(2.02485198981381, -8.00081895989249, 4.4579582292987, 2.23)
    pt3dadd(1.96503707216635, -8.19367945878965, 5.43735957889546, 2.23)
    pt3dadd(1.90522215451888, -8.38653995768681, 6.41676092849223, 2.23)
    pt3dadd(1.84540723687141, -8.57940045658395, 7.396162278089, 2.23)
    pt3dadd(1.78559231922394, -8.77226095548111, 8.37556362768576, 2.23)
    pt3dadd(1.72577740157648, -8.96512145437826, 9.35496497728253, 2.23)
    pt3dadd(1.66596248392901, -9.15798195327541, 10.3343663268793, 2.23)
    pt3dadd(1.7775571585536, -9.49345366014491, 11.1376229788223, 2.23)
    pt3dadd(2.37694223062367, -10.2347625018848, 11.4396142643551, 2.23)
    pt3dadd(2.97632730269374, -10.9760713436248, 11.7416055498879, 2.23)
    pt3dadd(3.57571237476381, -11.7173801853647, 12.0435968354207, 2.23)
    pt3dadd(4.17509744683388, -12.4586890271046, 12.3455881209535, 2.23)
    pt3dadd(4.39310833226339, -12.9960173776498, 13.1228671271766, 2.23)
    pt3dadd(4.55608898637083, -13.5039124471581, 13.9687275794712, 2.23)
    pt3dadd(4.71906964047827, -14.0118075166663, 14.8145880317657, 2.23)
    pt3dadd(4.88205029458572, -14.5197025861746, 15.6604484840603, 2.23)
    pt3dadd(5.04503094869316, -15.0275976556828, 16.5063089363548, 2.23)
    pt3dadd(5.29970894562878, -15.7601119539961, 16.9391039916821, 2.23)
    pt3dadd(5.63879802800891, -16.6993972702075, 16.991655765774, 2.23)
    pt3dadd(5.63858963026952, -17.6726411418754, 17.0661308005322, 2.23)
    pt3dadd(5.50107219516807, -18.6596275752573, 17.1494778782449, 2.23)
    pt3dadd(5.50675642627869, -19.563775713385, 17.272674787905, 2.23)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(5.50675642627869, -19.563775713385, 17.272674787905, 2.23)
    pt3dadd(5.08709586612179, -20.4981067479923, 17.7364392645683, 2.23)
    pt3dadd(4.8463610125939, -21.3844370530512, 18.1319962397704, 2.23)
    pt3dadd(4.60562615906602, -22.2707673581102, 18.5275532149724, 2.23)
    pt3dadd(4.36489130553813, -23.1570976631691, 18.9231101901745, 2.23)
    pt3dadd(4.12415645201024, -24.0434279682281, 19.3186671653766, 2.23)
    pt3dadd(3.88342159848235, -24.929758273287, 19.7142241405786, 2.23)
    pt3dadd(3.64268674495446, -25.816088578346, 20.1097811157807, 2.23)
    pt3dadd(3.40195189142657, -26.7024188834049, 20.5053380909828, 2.23)
    pt3dadd(3.14335961969111, -27.6039021378613, 20.6773040540056, 2.23)
    pt3dadd(2.85265540747241, -28.5326340462684, 20.4471995053659, 2.23)
    pt3dadd(2.5619511952537, -29.4613659546756, 20.2170949567262, 2.23)
    pt3dadd(2.27124698303499, -30.3900978630827, 19.9869904080865, 2.23)
    pt3dadd(1.98054277081628, -31.3188297714899, 19.7568858594468, 2.23)
    pt3dadd(1.68983855859757, -32.2475616798971, 19.5267813108071, 2.23)
    pt3dadd(1.55935195725986, -33.1994081295268, 19.4106013988854, 2.23)
    pt3dadd(1.68836757141253, -34.1886928771334, 19.4789436219818, 2.23)
    pt3dadd(1.8173831855652, -35.17797762474, 19.5472858450782, 2.23)
    pt3dadd(1.94639879971788, -36.1672623723466, 19.6156280681747, 2.23)
    pt3dadd(1.66608213114018, -37.1028462898208, 19.6796141792615, 2.23)
    pt3dadd(1.2848800564532, -38.0251949207444, 19.7425266683847, 2.23)
    pt3dadd(0.903677981766221, -38.947543551668, 19.805439157508, 2.23)
    pt3dadd(0.540834709454368, -39.8727481322113, 19.8686921239525, 2.23)
    pt3dadd(0.621403112034381, -40.8669311449215, 19.9401684818911, 2.23)
    pt3dadd(0.701971514614397, -41.8611141576317, 20.0116448398297, 2.23)
    pt3dadd(0.782539917194412, -42.8552971703419, 20.0831211977683, 2.23)
    pt3dadd(0.863108319774428, -43.8494801830522, 20.1545975557069, 2.23)
    pt3dadd(0.943676722354444, -44.8436631957623, 20.2260739136456, 2.23)
    pt3dadd(1.02424512493446, -45.8378462084725, 20.2975502715842, 2.23)
    pt3dadd(1.03725341522013, -46.8334831283339, 20.3001879988932, 2.23)
    pt3dadd(0.988323270913704, -47.8304529757161, 20.2397151588, 2.23)
    pt3dadd(0.939393126607279, -48.8274228230982, 20.1792423187068, 2.23)
    pt3dadd(0.890462982300849, -49.8243926704804, 20.1187694786136, 2.23)
    pt3dadd(0.841532837994423, -50.8213625178626, 20.0582966385204, 2.23)
    pt3dadd(0.792602693687997, -51.8183323652447, 19.9978237984271, 2.23)
    pt3dadd(0.743672549381568, -52.8153022126269, 19.9373509583339, 2.23)
    pt3dadd(0.694742405075139, -53.8122720600091, 19.8768781182407, 2.23)
    pt3dadd(0.645812260768711, -54.8092419073912, 19.8164052781475, 2.23)
    pt3dadd(0.596882116462284, -55.8062117547734, 19.7559324380543, 2.23)
    pt3dadd(0.547951972155859, -56.8031816021555, 19.695459597961, 2.23)
    pt3dadd(0.428123811822912, -57.7239727174475, 20.050291663746, 2.23)
    pt3dadd(0.303701155419127, -58.6398271235777, 20.4320372719006, 2.23)
    pt3dadd(0.179278499015333, -59.5556815297079, 20.8137828800552, 2.23)
    pt3dadd(0.0548558426115529, -60.4715359358381, 21.1955284882098, 2.23)
    pt3dadd(0.0289091806410315, -61.1603038755698, 21.9134866766005, 2.23)
    pt3dadd(0.00830795237847948, -61.8367452004845, 22.6496950189479, 2.23)
    pt3dadd(-0.0122932758840717, -62.5131865253991, 23.3859033612952, 2.23)
    pt3dadd(-0.0453720548327228, -63.2280819542366, 24.0295784109205, 2.23)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(-0.0453720548327228, -63.2280819542366, 24.0295784109205, 2.23)
    pt3dadd(-0.474823693482949, -64.1395824285645, 24.1237774879793, 2.23)
    pt3dadd(-0.864761038393278, -65.0557854882128, 24.2160857786976, 2.23)
    pt3dadd(-1.2546983833036, -65.9719885478611, 24.3083940694159, 2.23)
    pt3dadd(-1.64463572821393, -66.8881916075094, 24.4007023601341, 2.23)
    pt3dadd(-2.03457307312425, -67.8043946671578, 24.4930106508524, 2.23)
    pt3dadd(-2.42451041803458, -68.7205977268061, 24.5853189415707, 2.23)
    pt3dadd(-2.8144477629449, -69.6368007864544, 24.677627232289, 2.23)
    pt3dadd(-3.20733149908376, -70.5517228746624, 24.7700053306518, 2.23)
    pt3dadd(-3.60769872508862, -71.4633914449058, 24.8625607322849, 2.23)
    pt3dadd(-3.90381780492091, -72.3850232837917, 25.0303738684825, 2.23)
    pt3dadd(-3.9821278603375, -73.327471702182, 25.3554254242306, 2.23)
    pt3dadd(-4.06043791575408, -74.2699201205723, 25.6804769799787, 2.23)
    pt3dadd(-4.13874797117067, -75.2123685389626, 26.0055285357267, 2.23)
    pt3dadd(-4.21705802658725, -76.1548169573529, 26.3305800914748, 2.23)
    pt3dadd(-4.29536808200384, -77.0972653757432, 26.6556316472229, 2.23)
  }
}
proc shape3d_7() {
  adendIML[4] {
    pt3dadd(-4.37367813742043, -78.0397137941335, 26.980683202971, 2.23)
    pt3dadd(-4.45198819283701, -78.9821622125238, 27.3057347587191, 2.23)
    pt3dadd(-4.5302982482536, -79.9246106309142, 27.6307863144672, 2.23)
    pt3dadd(-4.60860830367018, -80.8670590493045, 27.9558378702153, 2.23)
    pt3dadd(-4.68691835908677, -81.8095074676948, 28.2808894259634, 2.23)
    pt3dadd(-4.84094205860971, -82.7459862376343, 28.5484718759643, 2.23)
    pt3dadd(-5.22603952138514, -83.6642459778456, 28.6406618627905, 2.23)
    pt3dadd(-5.61113698416058, -84.5825057180569, 28.7328518496166, 2.23)
    pt3dadd(-5.99623444693602, -85.5007654582682, 28.8250418364427, 2.23)
    pt3dadd(-6.38133190971146, -86.4190251984795, 28.9172318232688, 2.23)
    pt3dadd(-6.74888326191132, -87.3419171974788, 29.0178131139232, 2.23)
    pt3dadd(-6.98212911004259, -88.300266504741, 29.1826250661584, 2.23)
    pt3dadd(-7.21537495817386, -89.2586158120032, 29.3474370183937, 2.23)
    pt3dadd(-7.44862080630513, -90.2169651192654, 29.5122489706289, 2.23)
    pt3dadd(-7.6818666544364, -91.1753144265276, 29.6770609228642, 2.23)
    pt3dadd(-7.91511250256768, -92.1336637337898, 29.8418728750994, 2.23)
    pt3dadd(-8.14835835069894, -93.092013041052, 30.0066848273346, 2.23)
    pt3dadd(-8.38160419883022, -94.0503623483142, 30.1714967795699, 2.23)
    pt3dadd(-8.61485004696149, -95.0087116555763, 30.3363087318051, 2.23)
    pt3dadd(-8.84809589509276, -95.9670609628386, 30.5011206840404, 2.23)
    pt3dadd(-9.08134174322402, -96.9254102701008, 30.6659326362756, 2.23)
    pt3dadd(-9.19054301340136, -97.8796055310779, 30.9259997678586, 2.23)
    pt3dadd(-9.24931346102136, -98.8321119478142, 31.2247932760926, 2.23)
    pt3dadd(-9.30808390864136, -99.7846183645505, 31.5235867843265, 2.23)
    pt3dadd(-9.36685435626136, -100.737124781287, 31.8223802925605, 2.23)
    pt3dadd(-9.42562480388137, -101.689631198023, 32.1211738007944, 2.23)
    pt3dadd(-9.48439525150136, -102.642137614759, 32.4199673090284, 2.23)
    pt3dadd(-9.54316569912137, -103.594644031496, 32.7187608172623, 2.23)
    pt3dadd(-9.60193614674137, -104.547150448232, 33.0175543254963, 2.23)
    pt3dadd(-9.66070659436136, -105.499656864968, 33.3163478337302, 2.23)
    pt3dadd(-9.71947704198137, -106.452163281704, 33.6151413419642, 2.23)
    pt3dadd(-9.77824748960137, -107.404669698441, 33.9139348501982, 2.23)
    pt3dadd(-9.83701793722137, -108.357176115177, 34.2127283584321, 2.23)
    pt3dadd(-9.81279013084675, -109.335520729788, 34.3718618609655, 2.23)
    pt3dadd(-9.73663295746138, -110.33003148279, 34.4436145410877, 2.23)
    pt3dadd(-9.66047578407601, -111.324542235793, 34.5153672212098, 2.23)
    pt3dadd(-9.58431861069064, -112.319052988795, 34.587119901332, 2.23)
    pt3dadd(-9.50816143730528, -113.313563741797, 34.6588725814541, 2.23)
    pt3dadd(-9.43200426391991, -114.308074494799, 34.7306252615763, 2.23)
    pt3dadd(-9.46780580938337, -115.291141245284, 34.8078790966402, 2.23)
    pt3dadd(-9.73579554391276, -116.250474585385, 34.8965416296317, 2.23)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-9.73579554391276, -116.250474585385, 34.8965416296317, 2.23)
    pt3dadd(-10.0037852784421, -117.209807925487, 34.9852041626232, 2.23)
    pt3dadd(-10.2717750129715, -118.169141265588, 35.0738666956147, 2.23)
    pt3dadd(-10.5397647475009, -119.12847460569, 35.1625292286061, 2.23)
    pt3dadd(-10.8077544820303, -120.087807945791, 35.2511917615976, 2.23)
    pt3dadd(-11.0376320561042, -120.994909820421, 35.4944060087505, 2.23)
    pt3dadd(-11.1790159236444, -121.780733973662, 36.096478265364, 2.23)
    pt3dadd(-11.3203997911846, -122.566558126902, 36.6985505219775, 2.23)
    pt3dadd(-11.4617836587248, -123.352382280142, 37.300622778591, 2.23)
    pt3dadd(-11.603167526265, -124.138206433382, 37.9026950352045, 2.23)
    pt3dadd(-11.7445513938052, -124.924030586622, 38.504767291818, 2.23)
    pt3dadd(-11.8859352613454, -125.709854739863, 39.1068395484315, 2.23)
    pt3dadd(-12.0273191288856, -126.495678893103, 39.708911805045, 2.23)
    pt3dadd(-12.1687029964258, -127.281503046343, 40.3109840616585, 2.23)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(-12.1687029964258, -127.281503046343, 40.3109840616585, 2.23)
    pt3dadd(-12.484707836401, -128.085919029508, 40.1854574853278, 2.23)
    pt3dadd(-12.8746765234184, -128.898209915931, 39.7517433640679, 2.23)
    pt3dadd(-13.2646452104358, -129.710500802354, 39.318029242808, 2.23)
    pt3dadd(-13.6546138974532, -130.522791688776, 38.8843151215481, 2.23)
    pt3dadd(-14.0445825844705, -131.335082575199, 38.4506010002882, 2.23)
    pt3dadd(-14.4345512714879, -132.147373461622, 38.0168868790283, 2.23)
    pt3dadd(-14.8245199585053, -132.959664348045, 37.5831727577684, 2.23)
    pt3dadd(-15.2144886455227, -133.771955234468, 37.1494586365085, 2.23)
    pt3dadd(-15.6044573325401, -134.584246120891, 36.7157445152487, 2.23)
    pt3dadd(-15.6596340557333, -135.572553697096, 36.7725508113732, 2.23)
    pt3dadd(-15.6999971372314, -136.568649537228, 36.8510613133702, 2.23)
    pt3dadd(-15.7403602187294, -137.56474537736, 36.9295718153673, 2.23)
    pt3dadd(-15.7807233002275, -138.560841217492, 37.0080823173644, 2.23)
    pt3dadd(-15.8210863817256, -139.556937057624, 37.0865928193614, 2.23)
    pt3dadd(-15.8614494632236, -140.553032897756, 37.1651033213585, 2.23)
    pt3dadd(-15.9018125447217, -141.549128737888, 37.2436138233555, 2.23)
    pt3dadd(-15.9421756262197, -142.54522457802, 37.3221243253526, 2.23)
    pt3dadd(-16.0376573040685, -143.508077208463, 37.239690241836, 2.23)
    pt3dadd(-16.2377077546933, -144.407862165371, 36.851918597017, 2.23)
    pt3dadd(-16.4377582053181, -145.30764712228, 36.464146952198, 2.23)
    pt3dadd(-16.6378086559429, -146.207432079189, 36.076375307379, 2.23)
    pt3dadd(-16.8378591065677, -147.107217036098, 35.68860366256, 2.23)
    pt3dadd(-17.0379095571925, -148.007001993006, 35.3008320177411, 2.23)
    pt3dadd(-17.2379600078174, -148.906786949915, 34.913060372922, 2.23)
    pt3dadd(-17.4388989256322, -149.74937270609, 34.426669452198, 2.23)
    pt3dadd(-17.6407330343097, -150.534326393887, 33.8409129323124, 2.23)
    pt3dadd(-17.8425671429872, -151.319280081684, 33.2551564124268, 2.23)
    pt3dadd(-18.0444012516647, -152.104233769481, 32.6693998925412, 2.23)
    pt3dadd(-18.2462353603422, -152.889187457278, 32.0836433726556, 2.23)
    pt3dadd(-18.4480694690197, -153.674141145075, 31.4978868527701, 2.23)
    pt3dadd(-18.6499035776971, -154.459094832872, 30.9121303328845, 2.23)
    pt3dadd(-18.8517376863746, -155.244048520668, 30.3263738129989, 2.23)
    pt3dadd(-19.0535717950521, -156.029002208465, 29.7406172931133, 2.23)
    pt3dadd(-19.2554059037296, -156.813955896262, 29.1548607732277, 2.23)
    pt3dadd(-19.4572400124071, -157.598909584059, 28.5691042533421, 2.23)
    pt3dadd(-19.5901158644624, -158.4876960433, 28.3125038160837, 2.23)
    pt3dadd(-19.6525423870545, -159.482560432623, 28.3921767483347, 2.23)
    pt3dadd(-19.7149689096466, -160.477424821947, 28.4718496805857, 2.23)
    pt3dadd(-19.7773954322387, -161.47228921127, 28.5515226128367, 2.23)
    pt3dadd(-19.8398219548308, -162.467153600593, 28.6311955450877, 2.23)
    pt3dadd(-19.9022484774229, -163.462017989916, 28.7108684773387, 2.23)
    pt3dadd(-19.9646750000149, -164.45688237924, 28.7905414095897, 2.23)
    pt3dadd(-20.027101522607, -165.451746768563, 28.8702143418407, 2.23)
    pt3dadd(-20.0895280451991, -166.446611157886, 28.9498872740917, 2.23)
    pt3dadd(-20.1336208338611, -167.426071825596, 28.8120695906782, 2.23)
    pt3dadd(-20.1701623535072, -168.399188033077, 28.5846722202472, 2.23)
    pt3dadd(-20.2067038731533, -169.372304240559, 28.3572748498162, 2.23)
    pt3dadd(-20.2432453927994, -170.34542044804, 28.1298774793851, 2.23)
    pt3dadd(-20.2797869124455, -171.318536655522, 27.9024801089541, 2.23)
    pt3dadd(-20.3163284320916, -172.291652863003, 27.6750827385231, 2.23)
    pt3dadd(-20.3528699517377, -173.264769070484, 27.4476853680921, 2.23)
    pt3dadd(-20.3894114713838, -174.237885277966, 27.2202879976611, 2.23)
    pt3dadd(-20.4259529910299, -175.211001485447, 26.99289062723, 2.23)
    pt3dadd(-20.462494510676, -176.184117692929, 26.765493256799, 2.23)
    pt3dadd(-20.4990360303221, -177.15723390041, 26.538095886368, 2.23)
    pt3dadd(-20.5355775499682, -178.130350107891, 26.310698515937, 2.23)
    pt3dadd(-20.5721190696143, -179.103466315373, 26.083301145506, 2.23)
    pt3dadd(-20.6075097767668, -180.076567685278, 25.8557734055833, 2.23)
    pt3dadd(-20.5979952430143, -181.049090086008, 25.6231585872162, 2.23)
    pt3dadd(-20.5884807092618, -182.021612486739, 25.390543768849, 2.23)
    pt3dadd(-20.5789661755094, -182.99413488747, 25.1579289504819, 2.23)
    pt3dadd(-20.5694516417569, -183.966657288201, 24.9253141321148, 2.23)
    pt3dadd(-20.5599371080044, -184.939179688932, 24.6926993137477, 2.23)
    pt3dadd(-20.550422574252, -185.911702089663, 24.4600844953806, 2.23)
    pt3dadd(-20.5409080404995, -186.884224490394, 24.2274696770135, 2.23)
    pt3dadd(-20.531393506747, -187.856746891125, 23.9948548586464, 2.23)
    pt3dadd(-20.5218789729946, -188.829269291856, 23.7622400402793, 2.23)
    pt3dadd(-20.6823330297321, -189.612666324159, 23.2101988508904, 2.23)
    pt3dadd(-20.8996782812372, -190.332760082958, 22.5512405667885, 2.23)
    pt3dadd(-21.1170235327422, -191.052853841757, 21.8922822826867, 2.23)
    pt3dadd(-21.3343687842473, -191.772947600557, 21.2333239985848, 2.23)
    pt3dadd(-21.5517140357523, -192.493041359356, 20.5743657144829, 2.23)
    pt3dadd(-21.7690592872574, -193.213135118155, 19.915407430381, 2.23)
    pt3dadd(-21.9864045387625, -193.933228876954, 19.2564491462792, 2.23)
    pt3dadd(-22.2037497902675, -194.653322635754, 18.5974908621773, 2.23)
    pt3dadd(-22.4210950417725, -195.373416394553, 17.9385325780754, 2.23)
    pt3dadd(-22.6127627475927, -196.192597072274, 17.5570689242032, 2.23)
    pt3dadd(-22.7613731286129, -197.177931388811, 17.6409214096013, 2.23)
    pt3dadd(-22.9099835096331, -198.163265705348, 17.7247738949995, 2.23)
    pt3dadd(-23.0585938906534, -199.148600021885, 17.8086263803976, 2.23)
    pt3dadd(-23.2072042716736, -200.133934338422, 17.8924788657958, 2.23)
    pt3dadd(-23.3558146526938, -201.119268654959, 17.9763313511939, 2.23)
    pt3dadd(-23.504425033714, -202.104602971496, 18.0601838365921, 2.23)
    pt3dadd(-23.6530354147342, -203.089937288033, 18.1440363219902, 2.23)
    pt3dadd(-23.5877629915476, -204.077476139688, 18.2258198399265, 2.23)
    pt3dadd(-23.4578980779466, -205.065680759749, 18.3069785308157, 2.23)
    pt3dadd(-23.3280331643456, -206.053885379809, 18.3881372217049, 2.23)
    pt3dadd(-23.1981682507446, -207.042089999869, 18.4692959125941, 2.23)
    pt3dadd(-23.0683033371436, -208.03029461993, 18.5504546034833, 2.23)
    pt3dadd(-22.9384384235426, -209.01849923999, 18.6316132943726, 2.23)
    pt3dadd(-22.98429722355, -210.003707052233, 18.6560875776174, 2.23)
    pt3dadd(-23.1675545612756, -210.986571657614, 18.6362402689619, 2.23)
    pt3dadd(-23.3508118990012, -211.969436262994, 18.6163929603064, 2.23)
    pt3dadd(-23.5340692367268, -212.952300868374, 18.5965456516509, 2.23)
    pt3dadd(-23.7173265744524, -213.935165473754, 18.5766983429954, 2.23)
    pt3dadd(-23.900583912178, -214.918030079134, 18.5568510343399, 2.23)
    pt3dadd(-24.0838412499036, -215.900894684514, 18.5370037256844, 2.23)
    pt3dadd(-24.2670985876292, -216.883759289894, 18.5171564170289, 2.23)
    pt3dadd(-24.4503559253548, -217.866623895274, 18.4973091083734, 2.23)
    pt3dadd(-24.6336132630805, -218.849488500654, 18.4774617997179, 2.23)
    pt3dadd(-24.7764114193413, -219.707050682507, 18.0776670278226, 2.23)
    pt3dadd(-24.8981014621636, -220.499240860424, 17.4796484198439, 2.23)
    pt3dadd(-25.0197915049859, -221.291431038342, 16.8816298118652, 2.23)
    pt3dadd(-25.1414815478082, -222.083621216259, 16.2836112038864, 2.23)
    pt3dadd(-25.2631715906306, -222.875811394177, 15.6855925959077, 2.23)
    pt3dadd(-25.382373597526, -223.668970219068, 15.0889659097861, 2.23)
    pt3dadd(-25.3021831662148, -224.539756894824, 14.6038885344599, 2.23)
    pt3dadd(-25.2219927349037, -225.410543570579, 14.1188111591337, 2.23)
    pt3dadd(-25.1418023035925, -226.281330246334, 13.6337337838075, 2.23)
    pt3dadd(-25.0616118722814, -227.152116922089, 13.1486564084814, 2.23)
    pt3dadd(-24.9814214409702, -228.022903597845, 12.6635790331552, 2.23)
    pt3dadd(-24.9012310096591, -228.8936902736, 12.178501657829, 2.23)
    pt3dadd(-24.821040578348, -229.764476949355, 11.6934242825028, 2.23)
    pt3dadd(-24.7408501470368, -230.63526362511, 11.2083469071766, 2.23)
    pt3dadd(-24.6606597157257, -231.506050300865, 10.7232695318505, 2.23)
    pt3dadd(-24.5804692844145, -232.37683697662, 10.2381921565243, 2.23)
    pt3dadd(-24.5536652453796, -233.287648061376, 9.93802194957346, 2.23)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(-24.5536652453796, -233.287648061376, 9.93802194957346, 2.23)
    pt3dadd(-24.6368351749961, -234.280907929669, 10.0187535842966, 2.23)
    pt3dadd(-24.7200051046127, -235.274167797963, 10.0994852190198, 2.23)
    pt3dadd(-24.8031750342293, -236.267427666256, 10.180216853743, 2.23)
    pt3dadd(-24.8863449638458, -237.26068753455, 10.2609484884661, 2.23)
    pt3dadd(-25.0011612583872, -238.132014889547, 9.90235979614449, 2.23)
    pt3dadd(-25.1309801987199, -238.945537491556, 9.33550177269336, 2.23)
    pt3dadd(-25.2607991390526, -239.759060093565, 8.76864374924223, 2.23)
    pt3dadd(-25.3906180793853, -240.572582695575, 8.20178572579111, 2.23)
    pt3dadd(-25.520437019718, -241.386105297584, 7.63492770233998, 2.23)
    pt3dadd(-25.6502559600507, -242.199627899593, 7.06806967888885, 2.23)
    pt3dadd(-25.7800749003834, -243.013150501602, 6.50121165543773, 2.23)
    pt3dadd(-25.909893840716, -243.826673103612, 5.9343536319866, 2.23)
    pt3dadd(-26.0290201305894, -244.664190614159, 5.41757326360608, 2.23)
    pt3dadd(-26.0902624840483, -245.631602930991, 5.17188487685553, 2.23)
    pt3dadd(-26.1515048375073, -246.599015247824, 4.92619649010497, 2.23)
    pt3dadd(-26.2127471909662, -247.566427564656, 4.68050810335441, 2.23)
    pt3dadd(-26.2739895444251, -248.533839881488, 4.43481971660385, 2.23)
    pt3dadd(-26.335231897884, -249.50125219832, 4.1891313298533, 2.23)
    pt3dadd(-26.3964742513429, -250.468664515153, 3.94344294310274, 2.23)
    pt3dadd(-26.4577166048018, -251.436076831985, 3.69775455635218, 2.23)
    pt3dadd(-26.5189589582607, -252.403489148817, 3.45206616960162, 2.23)
    pt3dadd(-26.5802013117197, -253.370901465649, 3.20637778285107, 2.23)
    pt3dadd(-26.6414436651786, -254.338313782482, 2.9606893961005, 2.23)
    pt3dadd(-26.7026860186375, -255.305726099314, 2.71500100934995, 2.23)
    pt3dadd(-26.6817623179607, -256.276343015634, 2.56630113486527, 2.23)
    pt3dadd(-26.4811756449002, -257.25396705765, 2.62967478130192, 2.23)
    pt3dadd(-26.252319139019, -258.218924967469, 2.61472151681673, 2.23)
    pt3dadd(-25.9586831777426, -259.154858823596, 2.42028453679327, 2.23)
    pt3dadd(-25.6650472164662, -260.090792679723, 2.2258475567698, 2.23)
    pt3dadd(-25.3714112551898, -261.02672653585, 2.03141057674634, 2.23)
    pt3dadd(-25.0777752939134, -261.962660391977, 1.83697359672288, 2.23)
    pt3dadd(-24.784139332637, -262.898594248104, 1.64253661669941, 2.23)
    pt3dadd(-24.4905033713605, -263.834528104231, 1.44809963667596, 2.23)
    pt3dadd(-24.4213823850376, -264.768231292246, 1.16465037918946, 2.23)
    pt3dadd(-24.5180528795055, -265.700287259315, 0.815470640730725, 2.23)
    pt3dadd(-24.6147233739734, -266.632343226384, 0.466290902271988, 2.23)
    pt3dadd(-24.7113938684414, -267.564399193453, 0.117111163813247, 2.23)
    pt3dadd(-24.8080643629093, -268.496455160523, -0.232068574645492, 2.23)
    pt3dadd(-24.9047348573772, -269.428511127592, -0.581248313104229, 2.23)
    pt3dadd(-25.0014053518451, -270.360567094661, -0.93042805156297, 2.23)
    pt3dadd(-25.098075846313, -271.29262306173, -1.27960779002171, 2.23)
    pt3dadd(-25.194746340781, -272.224679028799, -1.62878752848044, 2.23)
    pt3dadd(-25.2914168352489, -273.156734995868, -1.97796726693918, 2.23)
    pt3dadd(-25.3880873297168, -274.088790962938, -2.32714700539792, 2.23)
    pt3dadd(-25.4847578241847, -275.020846930007, -2.67632674385666, 2.23)
    pt3dadd(-25.6951962082745, -275.957860150707, -2.80486860576379, 2.23)
    pt3dadd(-26.0185722659764, -276.899794449707, -2.71438268600682, 2.23)
    pt3dadd(-26.3419483236783, -277.841728748706, -2.62389676624984, 2.23)
    pt3dadd(-26.6653243813802, -278.783663047705, -2.53341084649287, 2.23)
    pt3dadd(-26.9887004390822, -279.725597346704, -2.4429249267359, 2.23)
    pt3dadd(-27.3120764967841, -280.667531645703, -2.35243900697892, 2.23)
    pt3dadd(-27.622699908937, -281.602255223204, -2.3715340543648, 2.23)
    pt3dadd(-27.9026063355959, -282.519610512156, -2.65457409772815, 2.23)
    pt3dadd(-28.1825127622547, -283.436965801107, -2.9376141410915, 2.23)
    pt3dadd(-28.4624191889136, -284.354321090059, -3.22065418445486, 2.23)
    pt3dadd(-28.7423256155725, -285.271676379011, -3.50369422781821, 2.23)
    pt3dadd(-29.0222320422313, -286.189031667963, -3.78673427118156, 2.23)
    pt3dadd(-29.3021384688902, -287.106386956915, -4.06977431454492, 2.23)
    pt3dadd(-29.5820448955491, -288.023742245867, -4.35281435790827, 2.23)
    pt3dadd(-30.1638169084744, -288.609347031346, -4.56346585339831, 2.23)
    pt3dadd(-31.1466225733787, -288.754215535492, -4.67794791111261, 2.23)
    pt3dadd(-32.129428238283, -288.899084039638, -4.79242996882692, 2.23)
    pt3dadd(-33.1122339031873, -289.043952543784, -4.90691202654122, 2.23)
    pt3dadd(-34.0950395680915, -289.18882104793, -5.02139408425552, 2.23)
    pt3dadd(-35.0778452329958, -289.333689552076, -5.13587614196982, 2.23)
    pt3dadd(-36.0606508979001, -289.478558056223, -5.25035819968413, 2.23)
    pt3dadd(-37.0434565628044, -289.623426560369, -5.36484025739843, 2.23)
    pt3dadd(-38.0262622277087, -289.768295064515, -5.47932231511274, 2.23)
    pt3dadd(-38.9975353199852, -289.812722853008, -5.56787503516078, 2.23)
    pt3dadd(-39.9192496917136, -289.425528529127, -5.54500207068284, 2.23)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(-12.1687029964258, -127.281503046343, 40.3109840616585, 2.23)
    pt3dadd(-12.0061743786445, -127.837463188067, 41.0798809959277, 2.23)
    pt3dadd(-11.7149181729622, -128.296060302021, 41.919439516654, 2.23)
    pt3dadd(-11.4236619672798, -128.754657415975, 42.7589980373804, 2.23)
    pt3dadd(-11.1324057615975, -129.21325452993, 43.5985565581067, 2.23)
  }
}
proc shape3d_8() {
  adendMML[2] {
    pt3dadd(-10.8411495559151, -129.671851643884, 44.4381150788331, 2.23)
    pt3dadd(-11.1405344114604, -130.29924579308, 44.8210477446688, 2.23)
    pt3dadd(-11.8130497365825, -131.033275462828, 44.9155124545143, 2.23)
    pt3dadd(-12.0661818201294, -131.795826113311, 44.9882728532333, 2.23)
    pt3dadd(-11.4928260877911, -132.61458369039, 45.0182600866949, 2.23)
    pt3dadd(-10.9194703554528, -133.433341267469, 45.0482473201564, 2.23)
    pt3dadd(-10.3461146231145, -134.252098844548, 45.078234553618, 2.23)
    pt3dadd(-9.77275889077613, -135.070856421626, 45.1082217870795, 2.23)
    pt3dadd(-9.83412382802694, -135.968282455131, 45.2562471042575, 2.23)
    pt3dadd(-10.149005717358, -136.897129849643, 45.4514186018687, 2.23)
    pt3dadd(-10.4638876066891, -137.825977244155, 45.64659009948, 2.23)
    pt3dadd(-10.7787694960202, -138.754824638667, 45.8417615970912, 2.23)
    pt3dadd(-11.0936513853513, -139.683672033178, 46.0369330947024, 2.23)
    pt3dadd(-11.4085332746824, -140.61251942769, 46.2321045923137, 2.23)
    pt3dadd(-11.7234151640135, -141.541366822202, 46.4272760899249, 2.23)
    pt3dadd(-12.0382970533446, -142.470214216714, 46.6224475875362, 2.23)
    pt3dadd(-12.3531789426757, -143.399061611226, 46.8176190851474, 2.23)
    pt3dadd(-12.6511389310352, -144.338682058044, 46.9757404660463, 2.23)
    pt3dadd(-12.9173461497726, -145.298517387845, 47.0643398811557, 2.23)
    pt3dadd(-13.18355336851, -146.258352717646, 47.1529392962652, 2.23)
    pt3dadd(-13.4497605872474, -147.218188047447, 47.2415387113746, 2.23)
    pt3dadd(-13.7159678059848, -148.178023377248, 47.3301381264841, 2.23)
    pt3dadd(-13.9821750247222, -149.137858707049, 47.4187375415936, 2.23)
    pt3dadd(-14.2483822434596, -150.09769403685, 47.507336956703, 2.23)
    pt3dadd(-14.514589462197, -151.057529366651, 47.5959363718125, 2.23)
    pt3dadd(-14.7807966809344, -152.017364696452, 47.684535786922, 2.23)
    pt3dadd(-15.0470038996718, -152.977200026253, 47.7731352020314, 2.23)
    pt3dadd(-15.3132111184093, -153.937035356055, 47.8617346171409, 2.23)
    pt3dadd(-15.5794183371467, -154.896870685856, 47.9503340322503, 2.23)
    pt3dadd(-15.9389199995271, -155.823698020085, 48.0487264372889, 2.23)
    pt3dadd(-16.3179364422201, -156.743620936892, 48.1491672820803, 2.23)
    pt3dadd(-16.696952884913, -157.663543853698, 48.2496081268716, 2.23)
    pt3dadd(-17.075969327606, -158.583466770505, 48.3500489716629, 2.23)
    pt3dadd(-17.454985770299, -159.503389687311, 48.4504898164543, 2.23)
    pt3dadd(-17.8340022129919, -160.423312604118, 48.5509306612456, 2.23)
    pt3dadd(-18.089137030036, -161.153585792194, 49.1562762039748, 2.23)
    pt3dadd(-18.3300472273204, -161.862082584743, 49.819597070368, 2.23)
    pt3dadd(-18.5709574246048, -162.570579377292, 50.4829179367611, 2.23)
    pt3dadd(-18.8118676218892, -163.27907616984, 51.1462388031542, 2.23)
    pt3dadd(-19.0527778191736, -163.987572962389, 51.8095596695473, 2.23)
    pt3dadd(-19.293688016458, -164.696069754938, 52.4728805359404, 2.23)
    pt3dadd(-19.5345982137424, -165.404566547487, 53.1362014023336, 2.23)
    pt3dadd(-19.7088221502955, -166.233449751169, 53.5532268999105, 2.23)
    pt3dadd(-19.791992079912, -167.226709619463, 53.6339585346336, 2.23)
    pt3dadd(-19.8751620095286, -168.219969487756, 53.7146901693568, 2.23)
    pt3dadd(-19.9583319391451, -169.21322935605, 53.79542180408, 2.23)
    pt3dadd(-20.0415018687617, -170.206489224343, 53.8761534388031, 2.23)
    pt3dadd(-19.9818538872218, -170.944264819726, 54.4685107075334, 2.23)
    pt3dadd(-19.8805883284434, -171.607591514582, 55.2099572548287, 2.23)
    pt3dadd(-19.779322769665, -172.270918209439, 55.9514038021241, 2.23)
    pt3dadd(-19.6780572108866, -172.934244904295, 56.6928503494194, 2.23)
    pt3dadd(-19.5767916521083, -173.597571599152, 57.4342968967147, 2.23)
    pt3dadd(-19.4755260933299, -174.260898294008, 58.17574344401, 2.23)
    pt3dadd(-19.5091666556739, -175.099349091069, 58.5597945819598, 2.23)
    pt3dadd(-19.6561510022028, -176.08493352655, 58.643573591347, 2.23)
    pt3dadd(-19.8031353487318, -177.07051796203, 58.7273526007342, 2.23)
    pt3dadd(-19.7173819733566, -178.02390516354, 58.9910407543832, 2.23)
    pt3dadd(-19.5939748150698, -178.972083292587, 59.2838357490137, 2.23)
    pt3dadd(-19.4705676567831, -179.920261421634, 59.5766307436442, 2.23)
    pt3dadd(-19.3471604984963, -180.868439550681, 59.8694257382746, 2.23)
    pt3dadd(-19.2237533402096, -181.816617679728, 60.1622207329051, 2.23)
    pt3dadd(-19.1003461819228, -182.764795808775, 60.4550157275355, 2.23)
    pt3dadd(-18.9769390236361, -183.712973937822, 60.747810722166, 2.23)
    pt3dadd(-18.8535318653494, -184.661152066869, 61.0406057167965, 2.23)
    pt3dadd(-18.7301247070626, -185.609330195916, 61.3334007114269, 2.23)
    pt3dadd(-18.6260338967391, -186.587438638465, 61.4778920445372, 2.23)
    pt3dadd(-18.531567857096, -187.580460479985, 61.5484880048826, 2.23)
    pt3dadd(-18.4371018174529, -188.573482321506, 61.6190839652281, 2.23)
    pt3dadd(-18.3426357778098, -189.566504163026, 61.6896799255735, 2.23)
    pt3dadd(-18.2481697381667, -190.559526004547, 61.760275885919, 2.23)
    pt3dadd(-18.3122618130565, -191.54731830611, 61.6964292213918, 2.23)
    pt3dadd(-18.4353222556279, -192.533165721813, 61.5825828317864, 2.23)
    pt3dadd(-18.5583826981993, -193.519013137516, 61.468736442181, 2.23)
    pt3dadd(-18.6814431407707, -194.504860553219, 61.3548900525756, 2.23)
    pt3dadd(-18.8045035833421, -195.490707968922, 61.2410436629703, 2.23)
    pt3dadd(-18.9275640259135, -196.476555384625, 61.1271972733649, 2.23)
    pt3dadd(-18.844600130109, -197.372109786622, 61.4527281543469, 2.23)
    pt3dadd(-18.6896536925384, -198.236116844836, 61.9317724162258, 2.23)
    pt3dadd(-18.5347072549678, -199.100123903051, 62.4108166781048, 2.23)
    pt3dadd(-18.3797608173972, -199.964130961266, 62.8898609399838, 2.23)
    pt3dadd(-18.2248143798266, -200.828138019481, 63.3689052018628, 2.23)
    pt3dadd(-18.069867942256, -201.692145077696, 63.8479494637417, 2.23)
    pt3dadd(-17.9149215046853, -202.556152135911, 64.3269937256207, 2.23)
    pt3dadd(-17.7599750671147, -203.420159194125, 64.8060379874997, 2.23)
    pt3dadd(-17.6050286295441, -204.28416625234, 65.2850822493786, 2.23)
    pt3dadd(-17.4500821919735, -205.148173310555, 65.7641265112576, 2.23)
    pt3dadd(-17.2961701807016, -206.073114272572, 66.0372085563603, 2.23)
    pt3dadd(-17.1432945478053, -207.059104127409, 66.1039397112031, 2.23)
    pt3dadd(-16.990418914909, -208.045093982245, 66.1706708660459, 2.23)
    pt3dadd(-16.8375432820126, -209.031083837081, 66.2374020208887, 2.23)
    pt3dadd(-16.6846676491163, -210.017073691917, 66.3041331757315, 2.23)
    pt3dadd(-16.5466162853097, -211.001302584797, 66.3931653301156, 2.23)
    pt3dadd(-16.4972515051341, -211.974996475995, 66.6156138066737, 2.23)
    pt3dadd(-16.4478867249586, -212.948690367192, 66.8380622832318, 2.23)
    pt3dadd(-16.398521944783, -213.922384258389, 67.0605107597898, 2.23)
    pt3dadd(-16.3491571646074, -214.896078149587, 67.2829592363479, 2.23)
    pt3dadd(-16.2997923844318, -215.869772040784, 67.5054077129059, 2.23)
    pt3dadd(-16.2504276042562, -216.843465931982, 67.727856189464, 2.23)
    pt3dadd(-16.2010628240807, -217.817159823179, 67.950304666022, 2.23)
    pt3dadd(-16.1516980439051, -218.790853714377, 68.1727531425801, 2.23)
    pt3dadd(-16.1023332637295, -219.764547605574, 68.3952016191381, 2.23)
    pt3dadd(-16.0529684835539, -220.738241496772, 68.6176500956962, 2.23)
    pt3dadd(-16.0036037033784, -221.711935387969, 68.8400985722542, 2.23)
    pt3dadd(-15.9542389232028, -222.685629279166, 69.0625470488123, 2.23)
    pt3dadd(-15.9048741430272, -223.659323170364, 69.2849955253704, 2.23)
    pt3dadd(-15.6910795816329, -224.585213660517, 69.5887892752283, 2.23)
    pt3dadd(-15.4556532806576, -225.504815321999, 69.9032844914212, 2.23)
    pt3dadd(-15.2202269796822, -226.424416983481, 70.2177797076141, 2.23)
    pt3dadd(-14.9848006787068, -227.344018644964, 70.5322749238069, 2.23)
    pt3dadd(-14.7493743777315, -228.263620306446, 70.8467701399998, 2.23)
    pt3dadd(-14.5139480767561, -229.183221967928, 71.1612653561927, 2.23)
    pt3dadd(-14.2785217757807, -230.10282362941, 71.4757605723856, 2.23)
    pt3dadd(-14.0430954748054, -231.022425290892, 71.7902557885785, 2.23)
    pt3dadd(-13.80766917383, -231.942026952375, 72.1047510047713, 2.23)
    pt3dadd(-13.5722428728547, -232.861628613857, 72.4192462209642, 2.23)
    pt3dadd(-13.3368165718793, -233.781230275339, 72.7337414371571, 2.23)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(-13.3368165718793, -233.781230275339, 72.7337414371571, 2.23)
    pt3dadd(-13.1013902709039, -234.700831936821, 73.04823665335, 2.23)
    pt3dadd(-12.8583729055192, -235.581050455021, 73.4313954314398, 2.23)
    pt3dadd(-12.5921294667749, -236.340769959423, 74.024641338259, 2.23)
    pt3dadd(-12.3258860280306, -237.100489463824, 74.6178872450783, 2.23)
    pt3dadd(-12.0596425892863, -237.860208968225, 75.2111331518975, 2.23)
    pt3dadd(-11.6405539856998, -238.649214610098, 75.5471505039456, 2.23)
    pt3dadd(-11.0710868768788, -239.467033761259, 75.6300905302561, 2.23)
    pt3dadd(-10.5016197680577, -240.284852912421, 75.7130305565667, 2.23)
    pt3dadd(-9.93215265923659, -241.102672063582, 75.7959705828773, 2.23)
    pt3dadd(-9.3626855504155, -241.920491214744, 75.8789106091878, 2.23)
    pt3dadd(-8.79321844159442, -242.738310365905, 75.9618506354984, 2.23)
    pt3dadd(-8.22375133277334, -243.556129517067, 76.044790661809, 2.23)
    pt3dadd(-7.65428422395225, -244.373948668228, 76.1277306881195, 2.23)
    pt3dadd(-7.08481711513116, -245.19176781939, 76.2106707144301, 2.23)
    pt3dadd(-6.51535000631008, -246.009586970551, 76.2936107407406, 2.23)
    pt3dadd(-5.94588289748899, -246.827406121713, 76.3765507670512, 2.23)
    pt3dadd(-5.37880782736732, -247.647142575406, 76.455046349048, 2.23)
    pt3dadd(-4.83605892424709, -248.486377301255, 76.4883435424774, 2.23)
    pt3dadd(-4.29331002112688, -249.325612027105, 76.5216407359067, 2.23)
    pt3dadd(-3.75056111800665, -250.164846752954, 76.554937929336, 2.23)
    pt3dadd(-3.20781221488644, -251.004081478804, 76.5882351227653, 2.23)
    pt3dadd(-2.66506331176622, -251.843316204653, 76.6215323161946, 2.23)
    pt3dadd(-2.122314408646, -252.682550930502, 76.6548295096239, 2.23)
    pt3dadd(-1.57956550552579, -253.521785656352, 76.6881267030532, 2.23)
    pt3dadd(-1.03681660240556, -254.361020382201, 76.7214238964825, 2.23)
    pt3dadd(-0.494067699285332, -255.200255108051, 76.7547210899118, 2.23)
    pt3dadd(-0.112053230558069, -256.033745859483, 77.1236900264722, 2.23)
    pt3dadd(0.243022088317573, -256.866273918707, 77.5489176696584, 2.23)
    pt3dadd(0.598097407193207, -257.698801977932, 77.9741453128445, 2.23)
    pt3dadd(0.953172726068835, -258.531330037156, 78.3993729560307, 2.23)
    pt3dadd(1.30824804494447, -259.36385809638, 78.8246005992168, 2.23)
    pt3dadd(1.5236605146077, -260.306602581933, 78.9893374313279, 2.23)
    pt3dadd(1.6861713181785, -261.29109498124, 79.0554052330895, 2.23)
    pt3dadd(1.8486821217493, -262.275587380547, 79.121473034851, 2.23)
    pt3dadd(2.0111929253201, -263.260079779854, 79.1875408366125, 2.23)
    pt3dadd(2.17370372889089, -264.244572179161, 79.2536086383741, 2.23)
    pt3dadd(2.3362145324617, -265.229064578468, 79.3196764401356, 2.23)
    pt3dadd(2.50012488037162, -266.213247997169, 79.3827223552768, 2.23)
    pt3dadd(2.7317990441099, -267.182471043218, 79.2994531000639, 2.23)
    pt3dadd(2.96347320784819, -268.151694089267, 79.216183844851, 2.23)
    pt3dadd(3.19514737158646, -269.120917135316, 79.1329145896381, 2.23)
    pt3dadd(3.42682153532475, -270.090140181365, 79.0496453344252, 2.23)
    pt3dadd(3.65849569906303, -271.059363227414, 78.9663760792123, 2.23)
    pt3dadd(3.89016986280131, -272.028586273463, 78.8831068239994, 2.23)
    pt3dadd(4.12184402653959, -272.997809319512, 78.7998375687865, 2.23)
    pt3dadd(4.35351819027788, -273.967032365561, 78.7165683135736, 2.23)
    pt3dadd(4.58519235401617, -274.93625541161, 78.6332990583607, 2.23)
    pt3dadd(4.74668395661072, -275.75742271701, 79.110807059874, 2.23)
    pt3dadd(4.89345486175765, -276.547535530697, 79.7059373338896, 2.23)
    pt3dadd(5.0402257669046, -277.337648344384, 80.3010676079052, 2.23)
    pt3dadd(5.18699667205154, -278.127761158072, 80.8961978819208, 2.23)
    pt3dadd(5.33376757719849, -278.917873971759, 81.4913281559365, 2.23)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-0.0453720548327228, -63.2280819542366, 24.0295784109205, 2.23)
    pt3dadd(0.165602781034605, -64.2157994086202, 24.0931326373317, 2.23)
    pt3dadd(0.337063323162032, -65.1988142776834, 24.1585776500833, 2.23)
    pt3dadd(0.508523865289455, -66.1818291467466, 24.224022662835, 2.23)
    pt3dadd(0.679984407416876, -67.1648440158097, 24.2894676755867, 2.23)
    pt3dadd(0.851444949544298, -68.1478588848729, 24.3549126883384, 2.23)
    pt3dadd(1.02290549167172, -69.1308737539361, 24.42035770109, 2.23)
    pt3dadd(1.17612204711707, -70.1144846304291, 24.4868874219841, 2.23)
    pt3dadd(1.07791238498291, -71.1063092760037, 24.5683658528372, 2.23)
    pt3dadd(0.97970272284875, -72.0981339215783, 24.6498442836904, 2.23)
    pt3dadd(0.881493060714592, -73.089958567153, 24.7313227145436, 2.23)
    pt3dadd(0.78328339858043, -74.0817832127276, 24.8128011453967, 2.23)
    pt3dadd(0.685073736446272, -75.0736078583022, 24.8942795762499, 2.23)
    pt3dadd(0.586864074312114, -76.0654325038768, 24.975758007103, 2.23)
    pt3dadd(0.488654412177953, -77.0572571494514, 25.0572364379562, 2.23)
    pt3dadd(0.390444750043795, -78.049081795026, 25.1387148688094, 2.23)
    pt3dadd(0.292235087909635, -79.0409064406006, 25.2201932996625, 2.23)
    pt3dadd(0.194025425775474, -80.0327310861752, 25.3016717305157, 2.23)
    pt3dadd(0.0958157636413182, -81.0245557317498, 25.3831501613689, 2.23)
    pt3dadd(-0.00239389849284333, -82.0163803773244, 25.464628592222, 2.23)
    pt3dadd(-0.0794526450809139, -83.0100524172699, 25.5450436927904, 2.23)
    pt3dadd(-0.146624615109951, -84.0045880025934, 25.6249617506226, 2.23)
    pt3dadd(-0.213796585138982, -84.9991235879169, 25.7048798084548, 2.23)
    pt3dadd(-0.280968555168012, -85.9936591732404, 25.784797866287, 2.23)
    pt3dadd(-0.178495684555615, -86.9377320647265, 25.8511926901992, 2.23)
    pt3dadd(0.429095562466309, -87.7315520284843, 25.8773220162886, 2.23)
    pt3dadd(1.03668680948823, -88.5253719922421, 25.903451342378, 2.23)
    pt3dadd(1.64427805651016, -89.319191956, 25.9295806684674, 2.23)
    pt3dadd(2.22510493720915, -90.1206419369152, 25.957818164898, 2.23)
    pt3dadd(2.13524614767612, -91.1132917807133, 26.0388840982566, 2.23)
    pt3dadd(2.04538735814309, -92.1059416245114, 26.1199500316151, 2.23)
    pt3dadd(1.95552856861005, -93.0985914683095, 26.2010159649738, 2.23)
    pt3dadd(1.86566977907703, -94.0912413121075, 26.2820818983324, 2.23)
    pt3dadd(1.77581098954399, -95.0838911559056, 26.363147831691, 2.23)
    pt3dadd(1.68595220001096, -96.0765409997037, 26.4442137650496, 2.23)
    pt3dadd(1.59609341047792, -97.0691908435018, 26.5252796984082, 2.23)
    pt3dadd(1.50623462094489, -98.0618406872998, 26.6063456317668, 2.23)
    pt3dadd(1.41637583141186, -99.0544905310979, 26.6874115651254, 2.23)
    pt3dadd(1.32089883569303, -100.045231087696, 26.7686514098342, 2.23)
    pt3dadd(0.792196451715355, -100.888744636017, 26.8633017293017, 2.23)
    pt3dadd(0.263494067737689, -101.732258184338, 26.9579520487692, 2.23)
    pt3dadd(-0.265208316239988, -102.575771732659, 27.0526023682367, 2.23)
    pt3dadd(-0.793910700217664, -103.41928528098, 27.1472526877042, 2.23)
    pt3dadd(-0.629954030469079, -104.329926977462, 27.207587800217, 2.23)
    pt3dadd(-0.26594507761004, -105.259956479863, 27.258012069206, 2.23)
    pt3dadd(0.0980638752490002, -106.189985982264, 27.3084363381951, 2.23)
    pt3dadd(0.46207282810804, -107.120015484664, 27.3588606071842, 2.23)
    pt3dadd(0.826081780967085, -108.050044987065, 27.4092848761733, 2.23)
    pt3dadd(1.19009073382613, -108.980074489465, 27.4597091451624, 2.23)
    pt3dadd(1.55409968668517, -109.910103991866, 27.5101334141515, 2.23)
    pt3dadd(1.9031613855155, -110.844162529133, 27.5617172839517, 2.23)
    pt3dadd(2.06431523795424, -111.828871658365, 27.6278789545087, 2.23)
    pt3dadd(2.22546909039299, -112.813580787597, 27.6940406250657, 2.23)
    pt3dadd(2.38662294283173, -113.798289916829, 27.7602022956227, 2.23)
    pt3dadd(2.54777679527047, -114.782999046062, 27.8263639661797, 2.23)
    pt3dadd(2.70893064770921, -115.767708175294, 27.8925256367367, 2.23)
    pt3dadd(2.87008450014796, -116.752417304526, 27.9586873072937, 2.23)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(2.87008450014796, -116.752417304526, 27.9586873072937, 2.23)
    pt3dadd(3.17441752861682, -117.695482308319, 28.0135078377622, 2.23)
    pt3dadd(3.57481645262259, -118.610606236355, 28.0607190439615, 2.23)
    pt3dadd(3.97521537662835, -119.525730164391, 28.1079302501608, 2.23)
    pt3dadd(4.37561430063412, -120.440854092427, 28.1551414563601, 2.23)
    pt3dadd(4.7760132246399, -121.355978020463, 28.2023526625593, 2.23)
    pt3dadd(5.17641214864566, -122.271101948499, 28.2495638687586, 2.23)
    pt3dadd(5.57681107265143, -123.186225876535, 28.2967750749579, 2.23)
    pt3dadd(5.9772099966572, -124.101349804571, 28.3439862811572, 2.23)
    pt3dadd(6.37760892066296, -125.016473732607, 28.3911974873565, 2.23)
    pt3dadd(6.77800784466873, -125.931597660644, 28.4384086935558, 2.23)
    pt3dadd(7.17840676867451, -126.84672158868, 28.485619899755, 2.23)
    pt3dadd(7.57880569268027, -127.761845516716, 28.5328311059543, 2.23)
    pt3dadd(7.97245356767943, -128.679350701558, 28.5806090166234, 2.23)
    pt3dadd(8.24266728296602, -129.640394073232, 28.6387483822262, 2.23)
    pt3dadd(8.51288099825261, -130.601437444906, 28.696887747829, 2.23)
    pt3dadd(8.78309471353919, -131.56248081658, 28.7550271134317, 2.23)
    pt3dadd(9.05330842882578, -132.523524188254, 28.8131664790345, 2.23)
    pt3dadd(9.32352214411237, -133.484567559928, 28.8713058446372, 2.23)
    pt3dadd(9.59373585939895, -134.445610931602, 28.92944521024, 2.23)
    pt3dadd(9.86394957468555, -135.406654303276, 28.9875845758428, 2.23)
    pt3dadd(10.1034875367713, -136.372857502348, 28.9567398521553, 2.23)
    pt3dadd(10.3149881010212, -137.343776743195, 28.8445643687581, 2.23)
  }
}
proc shape3d_9() {
  adendMML[3] {
    pt3dadd(10.5264886652712, -138.314695984042, 28.7323888853609, 2.23)
    pt3dadd(10.7379892295211, -139.285615224889, 28.6202134019637, 2.23)
    pt3dadd(10.949489793771, -140.256534465736, 28.5080379185665, 2.23)
    pt3dadd(11.1609903580209, -141.227453706582, 28.3958624351693, 2.23)
    pt3dadd(11.3724909222708, -142.198372947429, 28.2836869517721, 2.23)
    pt3dadd(11.5839914865208, -143.169292188276, 28.1715114683748, 2.23)
    pt3dadd(11.7954920507707, -144.140211429123, 28.0593359849776, 2.23)
    pt3dadd(12.0069926150206, -145.11113066997, 27.9471605015804, 2.23)
    pt3dadd(12.2184931792705, -146.082049910816, 27.8349850181832, 2.23)
    pt3dadd(12.4105466913731, -147.010715820704, 27.5275198282703, 2.23)
    pt3dadd(12.5996276571177, -147.932923168948, 27.1902039596303, 2.23)
    pt3dadd(12.7887086228623, -148.855130517193, 26.8528880909902, 2.23)
    pt3dadd(12.9777895886069, -149.777337865438, 26.5155722223502, 2.23)
    pt3dadd(13.1668705543516, -150.699545213683, 26.1782563537101, 2.23)
    pt3dadd(13.3559515200962, -151.621752561927, 25.8409404850701, 2.23)
    pt3dadd(13.5450324858408, -152.543959910172, 25.50362461643, 2.23)
    pt3dadd(13.7341134515854, -153.466167258417, 25.16630874779, 2.23)
    pt3dadd(13.9231944173301, -154.388374606662, 24.82899287915, 2.23)
    pt3dadd(14.1122753830747, -155.310581954907, 24.4916770105099, 2.23)
    pt3dadd(14.3013563488193, -156.232789303151, 24.1543611418699, 2.23)
    pt3dadd(14.490437314564, -157.154996651396, 23.8170452732298, 2.23)
    pt3dadd(14.6795182803086, -158.077203999641, 23.4797294045898, 2.23)
    pt3dadd(14.8685992460532, -158.999411347886, 23.1424135359497, 2.23)
    pt3dadd(15.0576802117978, -159.921618696131, 22.8050976673097, 2.23)
    pt3dadd(15.2467611775425, -160.843826044375, 22.4677817986696, 2.23)
    pt3dadd(15.4358421432871, -161.76603339262, 22.1304659300296, 2.23)
    pt3dadd(15.5469555979099, -162.738201158686, 22.0758331583153, 2.23)
    pt3dadd(15.6232120855838, -163.732704749094, 22.1475796338647, 2.23)
    pt3dadd(15.6994685732576, -164.727208339502, 22.2193261094141, 2.23)
    pt3dadd(15.7757250609314, -165.72171192991, 22.2910725849635, 2.23)
    pt3dadd(15.8519815486052, -166.716215520317, 22.3628190605129, 2.23)
    pt3dadd(15.9282380362791, -167.710719110725, 22.4345655360623, 2.23)
    pt3dadd(16.0044945239529, -168.705222701133, 22.5063120116117, 2.23)
    pt3dadd(16.0807510116267, -169.699726291541, 22.578058487161, 2.23)
    pt3dadd(16.1570074993005, -170.694229881948, 22.6498049627104, 2.23)
    pt3dadd(16.2332639869743, -171.688733472356, 22.7215514382598, 2.23)
    pt3dadd(16.3095204746482, -172.683237062764, 22.7932979138092, 2.23)
    pt3dadd(16.385776962322, -173.677740653172, 22.8650443893586, 2.23)
    pt3dadd(16.4481600917191, -174.659274300614, 22.8792496088486, 2.23)
    pt3dadd(16.3877494988367, -175.526010395605, 22.3841545655417, 2.23)
    pt3dadd(16.3273389059543, -176.392746490597, 21.8890595222349, 2.23)
    pt3dadd(16.2669283130719, -177.259482585588, 21.393964478928, 2.23)
    pt3dadd(16.2065177201894, -178.126218680579, 20.8988694356211, 2.23)
    pt3dadd(16.146107127307, -178.99295477557, 20.4037743923142, 2.23)
    pt3dadd(16.0856965344246, -179.859690870561, 19.9086793490073, 2.23)
    pt3dadd(16.0252859415421, -180.726426965552, 19.4135843057004, 2.23)
    pt3dadd(15.9648753486597, -181.593163060544, 18.9184892623935, 2.23)
    pt3dadd(15.9044647557773, -182.459899155535, 18.4233942190867, 2.23)
    pt3dadd(15.8440541628949, -183.326635250526, 17.9282991757798, 2.23)
    pt3dadd(15.7836435700124, -184.193371345517, 17.4332041324729, 2.23)
    pt3dadd(15.72323297713, -185.060107440508, 16.938109089166, 2.23)
    pt3dadd(15.7650170476322, -185.983318080328, 16.7096795548966, 2.23)
    pt3dadd(15.9198642479055, -186.96900936815, 16.7762755733832, 2.23)
    pt3dadd(16.0747114481788, -187.954700655973, 16.8428715918698, 2.23)
    pt3dadd(16.229558648452, -188.940391943796, 16.9094676103564, 2.23)
    pt3dadd(16.3844058487253, -189.926083231618, 16.976063628843, 2.23)
    pt3dadd(16.5392530489986, -190.911774519441, 17.0426596473296, 2.23)
    pt3dadd(16.8389579512499, -191.862711872941, 17.098346093814, 2.23)
    pt3dadd(17.1568045746589, -192.80929670547, 17.1526662448891, 2.23)
    pt3dadd(17.474651198068, -193.755881537999, 17.2069863959642, 2.23)
    pt3dadd(17.792497821477, -194.702466370529, 17.2613065470393, 2.23)
    pt3dadd(18.1103444448861, -195.649051203058, 17.3156266981144, 2.23)
    pt3dadd(18.4281910682951, -196.595636035587, 17.3699468491895, 2.23)
    pt3dadd(18.7460376917042, -197.542220868117, 17.4242670002646, 2.23)
    pt3dadd(19.0638843151132, -198.488805700646, 17.4785871513397, 2.23)
    pt3dadd(19.3817309385223, -199.435390533176, 17.5329073024148, 2.23)
    pt3dadd(19.6995775619313, -200.381975365705, 17.5872274534899, 2.23)
    pt3dadd(20.0070005143465, -201.331112608375, 17.626632399886, 2.23)
    pt3dadd(20.2194312751827, -202.303510277556, 17.5301132576243, 2.23)
    pt3dadd(20.431862036019, -203.275907946736, 17.4335941153626, 2.23)
    pt3dadd(20.6442927968552, -204.248305615917, 17.3370749731009, 2.23)
    pt3dadd(20.8567235576914, -205.220703285097, 17.2405558308392, 2.23)
    pt3dadd(21.0691543185277, -206.193100954278, 17.1440366885775, 2.23)
    pt3dadd(21.2815850793639, -207.165498623458, 17.0475175463158, 2.23)
    pt3dadd(21.4940158402001, -208.137896292639, 16.9509984040541, 2.23)
    pt3dadd(21.6832428657182, -209.09778654709, 16.7616804669012, 2.23)
    pt3dadd(21.8551102185179, -210.048319488019, 16.5029359186494, 2.23)
    pt3dadd(22.0269775713176, -210.998852428948, 16.2441913703976, 2.23)
    pt3dadd(22.1988449241173, -211.949385369878, 15.9854468221457, 2.23)
    pt3dadd(22.3707122769169, -212.899918310807, 15.7267022738939, 2.23)
    pt3dadd(22.5425796297166, -213.850451251736, 15.4679577256421, 2.23)
    pt3dadd(22.7144469825163, -214.800984192665, 15.2092131773903, 2.23)
    pt3dadd(22.8863143353159, -215.751517133595, 14.9504686291385, 2.23)
    pt3dadd(23.0444778253074, -216.700760678888, 14.6798343320166, 2.23)
    pt3dadd(23.1745529905023, -217.647361395373, 14.384830035524, 2.23)
    pt3dadd(23.3046281556972, -218.593962111859, 14.0898257390313, 2.23)
    pt3dadd(23.434703320892, -219.540562828344, 13.7948214425387, 2.23)
    pt3dadd(23.5647784860869, -220.487163544829, 13.4998171460461, 2.23)
    pt3dadd(23.6948536512818, -221.433764261314, 13.2048128495535, 2.23)
    pt3dadd(23.8249288164767, -222.3803649778, 12.9098085530609, 2.23)
    pt3dadd(23.9550039816716, -223.326965694285, 12.6148042565683, 2.23)
    pt3dadd(24.0850791468665, -224.27356641077, 12.3197999600756, 2.23)
    pt3dadd(24.2151543120614, -225.220167127255, 12.024795663583, 2.23)
    pt3dadd(24.3452294772562, -226.166767843741, 11.7297913670904, 2.23)
    pt3dadd(24.4753046424511, -227.113368560226, 11.4347870705978, 2.23)
    pt3dadd(24.605379807646, -228.059969276711, 11.1397827741052, 2.23)
    pt3dadd(24.7354549728409, -229.006569993196, 10.8447784776126, 2.23)
    pt3dadd(24.8142499476184, -229.84473693503, 10.4239238722518, 2.23)
    pt3dadd(24.6993835193673, -230.273399997025, 9.52779124649725, 2.23)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(24.6993835193673, -230.273399997025, 9.52779124649725, 2.23)
    pt3dadd(25.0819662850352, -230.959628541695, 9.158239461003, 2.23)
    pt3dadd(25.6717081903433, -231.753118379466, 9.00797847978161, 2.23)
    pt3dadd(26.2614500956514, -232.546608217237, 8.85771749856021, 2.23)
    pt3dadd(26.8511920009595, -233.340098055008, 8.70745651733882, 2.23)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(26.8511920009595, -233.340098055008, 8.70745651733882, 2.23)
    pt3dadd(27.4409339062676, -234.133587892779, 8.55719553611743, 2.23)
    pt3dadd(28.0306758115758, -234.92707773055, 8.40693455489604, 2.23)
    pt3dadd(28.513834189112, -235.785250732151, 8.35222107486762, 2.23)
    pt3dadd(28.8799109371881, -236.714477961155, 8.40246618801365, 2.23)
    pt3dadd(29.2459876852642, -237.643705190159, 8.45271130115967, 2.23)
    pt3dadd(29.6120644333404, -238.572932419164, 8.5029564143057, 2.23)
    pt3dadd(29.9781411814165, -239.502159648168, 8.55320152745172, 2.23)
    pt3dadd(30.7493660746721, -240.127664658008, 8.55713308426513, 2.23)
    pt3dadd(31.5424363464627, -240.73679312281, 8.55856743806423, 2.23)
    pt3dadd(32.3355066182533, -241.345921587611, 8.56000179186332, 2.23)
    pt3dadd(33.1285768900439, -241.955050052412, 8.56143614566241, 2.23)
    pt3dadd(33.9216471618345, -242.564178517214, 8.5628704994615, 2.23)
    pt3dadd(34.7147174336251, -243.173306982015, 8.56430485326058, 2.23)
    pt3dadd(35.4649845561912, -243.815223492339, 8.60181717984228, 2.23)
    pt3dadd(35.9748821715086, -244.641267724311, 8.84193246198679, 2.23)
    pt3dadd(36.484779786826, -245.467311956283, 9.08204774413129, 2.23)
    pt3dadd(36.9946774021435, -246.293356188255, 9.32216302627579, 2.23)
    pt3dadd(37.4968019948172, -247.114412089001, 9.51832953946899, 2.23)
    pt3dadd(37.8630419033869, -247.848264099576, 8.94620231939848, 2.23)
    pt3dadd(38.2292818119566, -248.582116110151, 8.37407509932796, 2.23)
    pt3dadd(38.5955217205263, -249.315968120727, 7.80194787925745, 2.23)
    pt3dadd(38.9617616290961, -250.049820131302, 7.22982065918695, 2.23)
    pt3dadd(39.3280015376658, -250.783672141877, 6.65769343911644, 2.23)
    pt3dadd(39.6942414462355, -251.517524152452, 6.08556621904593, 2.23)
    pt3dadd(40.0604813548052, -252.251376163027, 5.51343899897543, 2.23)
    pt3dadd(40.426721263375, -252.985228173603, 4.94131177890492, 2.23)
    pt3dadd(40.7929611719447, -253.719080184178, 4.36918455883441, 2.23)
    pt3dadd(41.1592010805144, -254.452932194753, 3.7970573387639, 2.23)
    pt3dadd(41.4773640344272, -255.317063497598, 3.46332377489621, 2.23)
    pt3dadd(41.7698377299073, -256.250807745593, 3.25697257720771, 2.23)
    pt3dadd(42.0623114253875, -257.184551993589, 3.05062137951921, 2.23)
    pt3dadd(42.3547851208676, -258.118296241585, 2.84427018183072, 2.23)
    pt3dadd(42.7623238049749, -258.976774024332, 2.68511698795983, 2.23)
    pt3dadd(43.5597080099157, -259.580245530227, 2.68587282115378, 2.23)
    pt3dadd(44.3570922148566, -260.183717036122, 2.68662865434772, 2.23)
    pt3dadd(45.3088297083244, -260.104018045368, 2.62632354791482, 2.23)
    pt3dadd(46.2868635674568, -259.907930856069, 2.55561580729402, 2.23)
    pt3dadd(47.014377126244, -260.233046149244, 2.62068171149524, 2.23)
    pt3dadd(47.4857304766705, -261.091097640901, 2.82457790250189, 2.23)
    pt3dadd(47.957083827097, -261.949149132558, 3.02847409350855, 2.23)
    pt3dadd(48.4284371775234, -262.807200624215, 3.2323702845152, 2.23)
    pt3dadd(48.8997905279499, -263.665252115872, 3.43626647552185, 2.23)
    pt3dadd(49.3711438783764, -264.523303607529, 3.6401626665285, 2.23)
    pt3dadd(49.8424972288029, -265.381355099186, 3.84405885753517, 2.23)
    pt3dadd(50.3138505792293, -266.239406590843, 4.04795504854182, 2.23)
    pt3dadd(51.2306357760668, -266.550026560713, 3.87758986893309, 2.23)
    pt3dadd(52.1711497786381, -266.831484053008, 3.6872872388961, 2.23)
    pt3dadd(53.1116637812093, -267.112941545301, 3.49698460885911, 2.23)
    pt3dadd(54.0521777837806, -267.394399037595, 3.30668197882212, 2.23)
    pt3dadd(54.9926917863518, -267.675856529889, 3.11637934878514, 2.23)
    pt3dadd(55.9332057889231, -267.957314022183, 2.92607671874814, 2.23)
    pt3dadd(56.8737197914943, -268.238771514477, 2.73577408871116, 2.23)
    pt3dadd(57.8142337940656, -268.520229006772, 2.54547145867418, 2.23)
    pt3dadd(58.7547477966368, -268.801686499066, 2.35516882863718, 2.23)
    pt3dadd(59.6952617992081, -269.083143991359, 2.1648661986002, 2.23)
    pt3dadd(60.6357758017793, -269.364601483653, 1.97456356856321, 2.23)
    pt3dadd(61.5762898043506, -269.646058975947, 1.78426093852623, 2.23)
    pt3dadd(62.5168038069218, -269.927516468241, 1.59395830848923, 2.23)
    pt3dadd(63.2773323051949, -270.234518053502, 1.90821191974467, 2.23)
    pt3dadd(63.8948162608726, -270.561820957519, 2.62346458384487, 2.23)
    pt3dadd(64.5123002165503, -270.889123861537, 3.33871724794507, 2.23)
    pt3dadd(65.129784172228, -271.216426765554, 4.05396991204528, 2.23)
    pt3dadd(65.7472681279056, -271.543729669571, 4.76922257614547, 2.23)
    pt3dadd(66.3647520835833, -271.871032573589, 5.48447524024568, 2.23)
    pt3dadd(66.9331870516814, -272.274847354153, 6.12303273943608, 2.23)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(24.6993835193673, -230.273399997025, 9.52779124649725, 2.23)
    pt3dadd(24.5586473117419, -231.094749949542, 9.32361426374568, 2.23)
    pt3dadd(24.4071378205261, -232.079631533797, 9.4075972326556, 2.23)
    pt3dadd(24.2556283293104, -233.064513118052, 9.49158020156552, 2.23)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(24.2556283293104, -233.064513118052, 9.49158020156552, 2.23)
    pt3dadd(24.1041188380946, -234.049394702307, 9.57556317047544, 2.23)
    pt3dadd(24.0124913020069, -235.024277960505, 9.70355286991482, 2.23)
    pt3dadd(24.1852717341538, -235.955013744349, 10.025853696689, 2.23)
    pt3dadd(24.3580521663007, -236.885749528194, 10.3481545234632, 2.23)
    pt3dadd(24.5308325984476, -237.816485312038, 10.6704553502374, 2.23)
    pt3dadd(24.7036130305945, -238.747221095882, 10.9927561770116, 2.23)
    pt3dadd(24.8763934627414, -239.677956879726, 11.3150570037858, 2.23)
    pt3dadd(25.0491738948883, -240.60869266357, 11.6373578305601, 2.23)
    pt3dadd(25.211804473167, -241.538814735681, 11.9436949491406, 2.23)
    pt3dadd(24.9612911125735, -242.44395602622, 11.6002385467732, 2.23)
    pt3dadd(24.7107777519801, -243.349097316758, 11.2567821444058, 2.23)
    pt3dadd(24.4602643913867, -244.254238607296, 10.9133257420383, 2.23)
    pt3dadd(24.2097510307933, -245.159379897834, 10.5698693396709, 2.23)
    pt3dadd(23.9592376701999, -246.064521188372, 10.2264129373035, 2.23)
    pt3dadd(23.7087243096065, -246.96966247891, 9.88295653493609, 2.23)
    pt3dadd(23.4582109490131, -247.874803769448, 9.53950013256867, 2.23)
    pt3dadd(23.2076975884197, -248.779945059986, 9.19604373020125, 2.23)
    pt3dadd(22.9571842278263, -249.685086350525, 8.85258732783384, 2.23)
    pt3dadd(22.7066708672329, -250.590227641063, 8.50913092546642, 2.23)
    pt3dadd(22.4561575066394, -251.495368931601, 8.16567452309901, 2.23)
    pt3dadd(22.5556335112818, -252.291977403274, 7.72429684288128, 2.23)
    pt3dadd(23.046079328144, -252.967344888716, 7.17353222861294, 2.23)
    pt3dadd(23.5365251450062, -253.642712374158, 6.6227676143446, 2.23)
    pt3dadd(24.0269709618683, -254.3180798596, 6.07200300007626, 2.23)
    pt3dadd(24.5174167787305, -254.993447345042, 5.52123838580793, 2.23)
    pt3dadd(25.0078625955927, -255.668814830484, 4.97047377153959, 2.23)
    pt3dadd(25.4983084124549, -256.344182315926, 4.41970915727124, 2.23)
    pt3dadd(25.5465717338481, -256.972761361619, 3.71142821008778, 2.23)
    pt3dadd(25.3943417894267, -257.580125711607, 2.93172660666195, 2.23)
    pt3dadd(25.2421118450053, -258.187490061596, 2.15202500323612, 2.23)
    pt3dadd(25.089881900584, -258.794854411584, 1.37232339981028, 2.23)
    pt3dadd(24.9376519561626, -259.402218761572, 0.592621796384449, 2.23)
    pt3dadd(24.7854220117413, -260.00958311156, -0.187079807041384, 2.23)
    pt3dadd(24.6331920673199, -260.616947461548, -0.966781410467217, 2.23)
    pt3dadd(24.4611825483275, -261.320857151796, -1.6080838539954, 2.23)
    pt3dadd(24.2455561343059, -262.23766363396, -1.94419562683017, 2.23)
    pt3dadd(24.0299297202844, -263.154470116124, -2.28030739966492, 2.23)
    pt3dadd(23.8143033062628, -264.071276598289, -2.61641917249968, 2.23)
    pt3dadd(23.5986768922413, -264.988083080453, -2.95253094533444, 2.23)
    pt3dadd(23.3830504782198, -265.904889562617, -3.2886427181692, 2.23)
    pt3dadd(23.1674240641982, -266.821696044781, -3.62475449100396, 2.23)
    pt3dadd(22.8415605218786, -267.729519223859, -3.8839615353963, 2.23)
    pt3dadd(22.5006214602923, -268.636113887999, -4.13265144519682, 2.23)
    pt3dadd(22.1596823987061, -269.54270855214, -4.38134135499734, 2.23)
    pt3dadd(21.8187433371198, -270.44930321628, -4.63003126479785, 2.23)
    pt3dadd(21.5525864119141, -271.383935360489, -4.85038618278138, 2.23)
    pt3dadd(21.3600205006016, -272.346158406551, -5.04285742590084, 2.23)
    pt3dadd(21.1674545892892, -273.308381452613, -5.23532866902031, 2.23)
    pt3dadd(20.9748886779767, -274.270604498674, -5.42779991213977, 2.23)
    pt3dadd(20.7823227666643, -275.232827544736, -5.62027115525923, 2.23)
    pt3dadd(20.5897568553518, -276.195050590798, -5.81274239837869, 2.23)
    pt3dadd(20.3971909440394, -277.15727363686, -6.00521364149815, 2.23)
    pt3dadd(20.2046250327269, -278.119496682922, -6.19768488461762, 2.23)
    pt3dadd(20.0120591214145, -279.081719728983, -6.39015612773708, 2.23)
    pt3dadd(19.819493210102, -280.043942775045, -6.58262737085654, 2.23)
    pt3dadd(19.6269272987896, -281.006165821107, -6.775098613976, 2.23)
    pt3dadd(19.4343613874771, -281.968388867169, -6.96756985709547, 2.23)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(5.50675642627869, -19.563775713385, 17.272674787905, 2.23)
    pt3dadd(6.4788868513222, -20.1247284116589, 17.2058805905502, 2.23)
    pt3dadd(7.27209156973669, -20.7336818394812, 17.2072938946567, 2.23)
    pt3dadd(8.06529628815118, -21.3426352673034, 17.2087071987632, 2.23)
    pt3dadd(8.85850100656567, -21.9515886951257, 17.2101205028697, 2.23)
    pt3dadd(9.65170572498017, -22.560542122948, 17.2115338069763, 2.23)
    pt3dadd(10.4449104433947, -23.1694955507702, 17.2129471110828, 2.23)
    pt3dadd(11.2381151618092, -23.7784489785925, 17.2143604151893, 2.23)
    pt3dadd(12.0313198802236, -24.3874024064148, 17.2157737192958, 2.23)
    pt3dadd(12.8245245986381, -24.996355834237, 17.2171870234023, 2.23)
    pt3dadd(13.6177293170526, -25.6053092620593, 17.2186003275088, 2.23)
    pt3dadd(13.9296133244922, -26.3509455761919, 17.7333342507139, 2.23)
    pt3dadd(14.1648720697259, -27.1183415232756, 18.3297877553482, 2.23)
    pt3dadd(14.4001308149597, -27.8857374703594, 18.9262412599825, 2.23)
    pt3dadd(14.6353895601934, -28.6531334174431, 19.5226947646167, 2.23)
    pt3dadd(14.8706483054271, -29.4205293645268, 20.119148269251, 2.23)
    pt3dadd(15.1059070506609, -30.1879253116106, 20.7156017738853, 2.23)
  }
}
proc shape3d_10() {
  adendIML[6] {
    pt3dadd(15.3411657958946, -30.9553212586943, 21.3120552785196, 2.23)
    pt3dadd(15.5189982616047, -31.920529970536, 21.4207827994138, 2.23)
    pt3dadd(15.6917240907355, -32.9033291985791, 21.4861392475193, 2.23)
    pt3dadd(15.8644499198663, -33.8861284266221, 21.5514956956249, 2.23)
    pt3dadd(16.0371757489971, -34.8689276546652, 21.6168521437304, 2.23)
    pt3dadd(16.2099015781279, -35.8517268827083, 21.6822085918359, 2.23)
    pt3dadd(16.3826274072587, -36.8345261107514, 21.7475650399415, 2.23)
    pt3dadd(16.5553532363895, -37.8173253387945, 21.812921488047, 2.23)
    pt3dadd(16.7280790655203, -38.8001245668376, 21.8782779361526, 2.23)
    pt3dadd(16.9008048946511, -39.7829237948807, 21.9436343842581, 2.23)
    pt3dadd(17.0013256953845, -40.4311506034313, 22.5971969385996, 2.23)
    pt3dadd(17.0796218708466, -40.9763964033963, 23.4318086606168, 2.23)
    pt3dadd(17.1579180463087, -41.5216422033614, 24.266420382634, 2.23)
    pt3dadd(17.2362142217708, -42.0668880033264, 25.1010321046512, 2.23)
    pt3dadd(17.3145103972328, -42.6121338032914, 25.9356438266683, 2.23)
    pt3dadd(17.3928065726949, -43.1573796032565, 26.7702555486855, 2.23)
    pt3dadd(17.4589206811854, -43.7243481488427, 27.567596564007, 2.23)
    pt3dadd(17.3533220676647, -44.682244930961, 27.5943501547855, 2.23)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(17.3533220676647, -44.682244930961, 27.5943501547855, 2.23)
    pt3dadd(17.8822525574208, -45.598698373034, 27.6868922738214, 2.23)
    pt3dadd(18.2841528944557, -46.5131708894442, 27.7339681256097, 2.23)
    pt3dadd(18.6860532314905, -47.4276434058544, 27.781043977398, 2.23)
    pt3dadd(19.0879535685254, -48.3421159222647, 27.8281198291863, 2.23)
    pt3dadd(19.4898539055602, -49.2565884386749, 27.8751956809746, 2.23)
    pt3dadd(19.8917542425951, -50.1710609550852, 27.9222715327629, 2.23)
    pt3dadd(20.2936545796299, -51.0855334714954, 27.9693473845512, 2.23)
    pt3dadd(20.6955549166648, -52.0000059879056, 28.0164232363395, 2.23)
    pt3dadd(21.0974552536996, -52.9144785043159, 28.0634990881278, 2.23)
    pt3dadd(21.4993555907345, -53.8289510207261, 28.1105749399161, 2.23)
    pt3dadd(21.9012559277693, -54.7434235371364, 28.1576507917044, 2.23)
    pt3dadd(22.3031562648042, -55.6578960535466, 28.2047266434927, 2.23)
    pt3dadd(22.705056601839, -56.5723685699569, 28.251802495281, 2.23)
    pt3dadd(23.0757529058135, -57.4251279463639, 28.560182350956, 2.23)
    pt3dadd(23.4292428012123, -58.2438576991215, 29.0126494611423, 2.23)
    pt3dadd(23.7827326966111, -59.0625874518792, 29.4651165713286, 2.23)
    pt3dadd(24.1362225920099, -59.8813172046368, 29.9175836815149, 2.23)
    pt3dadd(24.4897124874086, -60.7000469573945, 30.3700507917013, 2.23)
    pt3dadd(24.8432023828074, -61.5187767101522, 30.8225179018876, 2.23)
    pt3dadd(25.1966922782062, -62.3375064629098, 31.2749850120739, 2.23)
    pt3dadd(25.5501821736049, -63.1562362156675, 31.7274521222602, 2.23)
    pt3dadd(25.9528177273065, -63.9843583994307, 32.0593926129996, 2.23)
    pt3dadd(26.4764079563974, -64.8355967338904, 32.0946994104596, 2.23)
    pt3dadd(26.9999981854883, -65.68683506835, 32.1300062079196, 2.23)
    pt3dadd(27.5235884145793, -66.5380734028096, 32.1653130053795, 2.23)
    pt3dadd(28.0471786436702, -67.3893117372693, 32.2006198028395, 2.23)
    pt3dadd(28.5707688727612, -68.2405500717289, 32.2359266002995, 2.23)
    pt3dadd(29.0943591018521, -69.0917884061885, 32.2712333977595, 2.23)
    pt3dadd(29.6441012004575, -69.9061242721909, 32.4037061060573, 2.23)
    pt3dadd(30.232755361696, -70.6655519732863, 32.6807545589774, 2.23)
    pt3dadd(30.8214095229346, -71.4249796743818, 32.9578030118976, 2.23)
    pt3dadd(31.4100636841731, -72.1844073754773, 33.2348514648177, 2.23)
    pt3dadd(31.9987178454116, -72.9438350765727, 33.5118999177378, 2.23)
    pt3dadd(32.5873720066501, -73.7032627776682, 33.788948370658, 2.23)
    pt3dadd(33.1760261678886, -74.4626904787637, 34.0659968235781, 2.23)
    pt3dadd(33.7646803291272, -75.2221181798591, 34.3430452764982, 2.23)
    pt3dadd(34.3533344903657, -75.9815458809546, 34.6200937294183, 2.23)
    pt3dadd(34.9419886516042, -76.7409735820501, 34.8971421823385, 2.23)
    pt3dadd(35.5306428128427, -77.5004012831455, 35.1741906352586, 2.23)
    pt3dadd(36.1192969740812, -78.259828984241, 35.4512390881787, 2.23)
    pt3dadd(36.7079511353197, -79.0192566853365, 35.7282875410989, 2.23)
    pt3dadd(37.2528928884846, -79.8484409995447, 35.8038912017122, 2.23)
    pt3dadd(37.7888110076262, -80.692025301655, 35.8379102376901, 2.23)
    pt3dadd(38.3247291267678, -81.5356096037653, 35.871929273668, 2.23)
    pt3dadd(38.8606472459094, -82.3791939058755, 35.905948309646, 2.23)
    pt3dadd(39.396565365051, -83.2227782079858, 35.9399673456239, 2.23)
    pt3dadd(39.9324834841926, -84.066362510096, 35.9739863816018, 2.23)
    pt3dadd(40.4684016033342, -84.9099468122063, 36.0080054175797, 2.23)
    pt3dadd(41.0043197224758, -85.7535311143165, 36.0420244535576, 2.23)
    pt3dadd(41.5402378416175, -86.5971154164268, 36.0760434895355, 2.23)
    pt3dadd(42.1193150841445, -87.4118403543152, 36.1053963093704, 2.23)
    pt3dadd(42.6988884223853, -88.2262335661217, 36.1346954930412, 2.23)
    pt3dadd(43.2784617606262, -89.0406267779282, 36.163994676712, 2.23)
    pt3dadd(43.8580350988671, -89.8550199897347, 36.1932938603828, 2.23)
    pt3dadd(44.437608437108, -90.6694132015413, 36.2225930440535, 2.23)
    pt3dadd(45.0171817753488, -91.4838064133478, 36.2518922277243, 2.23)
    pt3dadd(45.5967551135897, -92.2981996251543, 36.281191411395, 2.23)
    pt3dadd(46.1763284518306, -93.1125928369609, 36.3104905950658, 2.23)
    pt3dadd(46.7559017900715, -93.9269860487674, 36.3397897787366, 2.23)
    pt3dadd(47.3354751283123, -94.7413792605739, 36.3690889624073, 2.23)
    pt3dadd(47.9150484665532, -95.5557724723805, 36.3983881460781, 2.23)
    pt3dadd(48.4946218047941, -96.370165684187, 36.4276873297489, 2.23)
    pt3dadd(49.074195143035, -97.1845588959935, 36.4569865134196, 2.23)
    pt3dadd(49.6537684812759, -97.9989521078, 36.4862856970904, 2.23)
    pt3dadd(50.2286256953948, -98.8152883333025, 36.4977694229772, 2.23)
    pt3dadd(50.7622489967663, -99.6486126734379, 36.3534894300078, 2.23)
    pt3dadd(51.2958722981377, -100.481937013573, 36.2092094370384, 2.23)
    pt3dadd(51.8294955995092, -101.315261353709, 36.064929444069, 2.23)
    pt3dadd(52.3631189008807, -102.148585693844, 35.9206494510995, 2.23)
    pt3dadd(52.8967422022521, -102.98191003398, 35.7763694581301, 2.23)
    pt3dadd(53.4303655036236, -103.815234374115, 35.6320894651607, 2.23)
    pt3dadd(53.9639888049951, -104.648558714251, 35.4878094721913, 2.23)
    pt3dadd(54.4976121063666, -105.481883054386, 35.3435294792218, 2.23)
    pt3dadd(55.031235407738, -106.315207394521, 35.1992494862524, 2.23)
    pt3dadd(55.5648587091095, -107.148531734657, 35.054969493283, 2.23)
    pt3dadd(56.098482010481, -107.981856074792, 34.9106895003136, 2.23)
    pt3dadd(56.6151293377594, -108.825276203598, 34.7884965775881, 2.23)
    pt3dadd(57.0005449909243, -109.746741176335, 34.8370463285073, 2.23)
    pt3dadd(57.3859606440893, -110.668206149072, 34.8855960794266, 2.23)
    pt3dadd(57.7713762972543, -111.589671121809, 34.9341458303459, 2.23)
    pt3dadd(58.1603227424461, -112.509172265136, 34.9823442277594, 2.23)
    pt3dadd(58.7457520091054, -113.319389502655, 35.0109903752482, 2.23)
    pt3dadd(59.3311812757647, -114.129606740174, 35.039636522737, 2.23)
    pt3dadd(59.916610542424, -114.939823977693, 35.0682826702258, 2.23)
    pt3dadd(60.6020389062088, -115.665433392839, 35.0847598844935, 2.23)
    pt3dadd(61.3071559873357, -116.374384462585, 35.0988411702635, 2.23)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(61.3071559873357, -116.374384462585, 35.0988411702635, 2.23)
    pt3dadd(62.0122730684626, -117.083335532331, 35.1129224560335, 2.23)
    pt3dadd(62.7173901495895, -117.792286602077, 35.1270037418034, 2.23)
    pt3dadd(63.4225072307165, -118.501237671823, 35.1410850275734, 2.23)
    pt3dadd(64.1276243118434, -119.210188741569, 35.1551663133434, 2.23)
    pt3dadd(64.8327413929703, -119.919139811316, 35.1692475991134, 2.23)
    pt3dadd(65.5378584740972, -120.628090881062, 35.1833288848834, 2.23)
    pt3dadd(66.1315454117447, -121.425408459038, 35.2105177505154, 2.23)
    pt3dadd(66.6646950439366, -122.270733426521, 35.2448276476843, 2.23)
    pt3dadd(67.1978446761285, -123.116058394004, 35.2791375448533, 2.23)
    pt3dadd(67.7309943083204, -123.961383361487, 35.3134474420223, 2.23)
    pt3dadd(68.2641439405123, -124.806708328969, 35.3477573391912, 2.23)
    pt3dadd(68.7972935727042, -125.652033296452, 35.3820672363602, 2.23)
    pt3dadd(69.3304432048961, -126.497358263935, 35.4163771335292, 2.23)
    pt3dadd(69.4031565325667, -127.488132998766, 35.4880401180706, 2.23)
    pt3dadd(69.512086912118, -128.460260945408, 35.4869044554401, 2.23)
    pt3dadd(69.8769385838163, -129.315948869001, 35.1199147620225, 2.23)
    pt3dadd(70.2417902555147, -130.171636792595, 34.7529250686049, 2.23)
    pt3dadd(70.6066419272131, -131.027324716189, 34.3859353751873, 2.23)
    pt3dadd(70.9714935989114, -131.883012639782, 34.0189456817696, 2.23)
    pt3dadd(71.3363452706098, -132.738700563376, 33.651955988352, 2.23)
    pt3dadd(71.7011969423082, -133.59438848697, 33.2849662949344, 2.23)
    pt3dadd(72.0660486140066, -134.450076410564, 32.9179766015168, 2.23)
    pt3dadd(72.430900285705, -135.305764334157, 32.5509869080992, 2.23)
    pt3dadd(72.7957519574033, -136.161452257751, 32.1839972146816, 2.23)
    pt3dadd(73.1606036291017, -137.017140181345, 31.8170075212639, 2.23)
    pt3dadd(73.5254553008001, -137.872828104939, 31.4500178278463, 2.23)
    pt3dadd(73.8903069724985, -138.728516028532, 31.0830281344287, 2.23)
    pt3dadd(74.2551586441968, -139.584203952126, 30.7160384410111, 2.23)
    pt3dadd(74.6200103158952, -140.43989187572, 30.3490487475935, 2.23)
    pt3dadd(74.9848619875936, -141.295579799313, 29.9820590541758, 2.23)
    pt3dadd(75.3570456587641, -142.171086889556, 29.7428254312377, 2.23)
    pt3dadd(75.7457287504809, -143.09119365096, 29.7910851642653, 2.23)
    pt3dadd(76.1344118421978, -144.011300412364, 29.839344897293, 2.23)
    pt3dadd(76.5230949339146, -144.931407173768, 29.8876046303206, 2.23)
    pt3dadd(76.9117780256314, -145.851513935172, 29.9358643633483, 2.23)
    pt3dadd(77.3004611173483, -146.771620696576, 29.9841240963759, 2.23)
    pt3dadd(77.6891442090651, -147.691727457981, 30.0323838294036, 2.23)
    pt3dadd(78.077827300782, -148.611834219385, 30.0806435624312, 2.23)
    pt3dadd(78.4665103924988, -149.531940980789, 30.1289032954589, 2.23)
    pt3dadd(78.8551934842156, -150.452047742193, 30.1771630284865, 2.23)
    pt3dadd(79.1395522678018, -151.402264584886, 30.2336684044912, 2.23)
    pt3dadd(79.3092318132497, -152.385580148716, 30.2992378622188, 2.23)
    pt3dadd(79.4789113586977, -153.368895712546, 30.3648073199463, 2.23)
    pt3dadd(79.6485909041456, -154.352211276376, 30.4303767776738, 2.23)
    pt3dadd(79.8182704495935, -155.335526840206, 30.4959462354013, 2.23)
    pt3dadd(79.9879499950415, -156.318842404035, 30.5615156931288, 2.23)
    pt3dadd(80.1576295404894, -157.302157967865, 30.6270851508563, 2.23)
    pt3dadd(80.3273090859373, -158.285473531695, 30.6926546085838, 2.23)
    pt3dadd(80.5427381676471, -159.25593834502, 30.7546351337806, 2.23)
    pt3dadd(80.9182528210846, -160.181436150812, 30.8040573608385, 2.23)
    pt3dadd(81.2937674745222, -161.106933956604, 30.8534795878965, 2.23)
    pt3dadd(81.6692821279598, -162.032431762397, 30.9029018149545, 2.23)
    pt3dadd(82.0447967813974, -162.957929568189, 30.9523240420125, 2.23)
    pt3dadd(82.4203114348349, -163.883427373981, 31.0017462690704, 2.23)
    pt3dadd(82.7958260882725, -164.808925179773, 31.0511684961284, 2.23)
    pt3dadd(83.1713407417101, -165.734422985566, 31.1005907231864, 2.23)
    pt3dadd(83.5468553951477, -166.659920791358, 31.1500129502443, 2.23)
    pt3dadd(83.8663128607215, -167.478097747158, 30.8724647024424, 2.23)
    pt3dadd(84.115911858049, -168.162531458298, 30.1874458446088, 2.23)
    pt3dadd(84.3655108553765, -168.846965169439, 29.5024269867753, 2.23)
    pt3dadd(84.615109852704, -169.531398880579, 28.8174081289418, 2.23)
    pt3dadd(84.8647088500315, -170.21583259172, 28.1323892711083, 2.23)
    pt3dadd(85.114307847359, -170.90026630286, 27.4473704132747, 2.23)
    pt3dadd(85.3639068446866, -171.584700014001, 26.7623515554412, 2.23)
    pt3dadd(85.6135058420141, -172.269133725141, 26.0773326976077, 2.23)
    pt3dadd(85.8631048393416, -172.953567436282, 25.3923138397742, 2.23)
    pt3dadd(86.1127038366691, -173.638001147422, 24.7072949819406, 2.23)
    pt3dadd(86.3623028339966, -174.322434858563, 24.0222761241071, 2.23)
    pt3dadd(86.6119018313241, -175.006868569703, 23.3372572662736, 2.23)
    pt3dadd(86.9631695336672, -175.90938063279, 23.3053503409975, 2.23)
    pt3dadd(87.3272525798047, -176.839381479705, 23.3557681974786, 2.23)
    pt3dadd(87.6913356259421, -177.76938232662, 23.4061860539596, 2.23)
    pt3dadd(88.0554186720796, -178.699383173536, 23.4566039104407, 2.23)
    pt3dadd(88.4195017182171, -179.629384020451, 23.5070217669218, 2.23)
    pt3dadd(88.7835847643545, -180.559384867366, 23.5574396234028, 2.23)
    pt3dadd(89.147667810492, -181.489385714281, 23.6078574798839, 2.23)
    pt3dadd(89.5117508566295, -182.419386561197, 23.6582753363649, 2.23)
    pt3dadd(89.8758339027669, -183.349387408112, 23.708693192846, 2.23)
    pt3dadd(90.2506104354482, -184.259902055198, 23.8613130618667, 2.23)
    pt3dadd(90.6324376861107, -185.157568535414, 24.0813195184694, 2.23)
    pt3dadd(91.0142649367733, -186.055235015631, 24.301325975072, 2.23)
    pt3dadd(91.3960921874358, -186.952901495848, 24.5213324316747, 2.23)
    pt3dadd(91.7779194380984, -187.850567976064, 24.7413388882774, 2.23)
    pt3dadd(92.1597466887609, -188.748234456281, 24.96134534488, 2.23)
    pt3dadd(92.5415739394235, -189.645900936498, 25.1813518014827, 2.23)
    pt3dadd(92.870941771889, -190.566710838723, 25.3560214676128, 2.23)
    pt3dadd(93.0715284449496, -191.544334880739, 25.4193951140495, 2.23)
    pt3dadd(93.2721151180101, -192.521958922755, 25.4827687604861, 2.23)
    pt3dadd(93.4727017910706, -193.499582964771, 25.5461424069228, 2.23)
    pt3dadd(93.6732884641312, -194.477207006787, 25.6095160533594, 2.23)
    pt3dadd(93.9863002673654, -195.403827711258, 25.7267125683643, 2.23)
    pt3dadd(94.4831742524597, -196.247036593935, 25.9319320194655, 2.23)
    pt3dadd(94.9800482375539, -197.090245476613, 26.1371514705668, 2.23)
    pt3dadd(95.4769222226482, -197.933454359291, 26.3423709216681, 2.23)
    pt3dadd(95.9544371502541, -198.770950127063, 26.4732679249828, 2.23)
    pt3dadd(96.2575078965317, -199.556965100738, 25.9344464481385, 2.23)
    pt3dadd(96.5605786428093, -200.342980074414, 25.3956249712942, 2.23)
    pt3dadd(96.863649389087, -201.128995048089, 24.85680349445, 2.23)
    pt3dadd(97.1667201353646, -201.915010021765, 24.3179820176057, 2.23)
    pt3dadd(97.4697908816422, -202.70102499544, 23.7791605407614, 2.23)
    pt3dadd(97.7728616279199, -203.487039969116, 23.2403390639171, 2.23)
    pt3dadd(98.0759323741975, -204.273054942791, 22.7015175870728, 2.23)
    pt3dadd(98.3790031204751, -205.059069916467, 22.1626961102285, 2.23)
    pt3dadd(98.7272469476019, -205.893154472357, 21.8163133185777, 2.23)
    pt3dadd(99.144311658063, -206.800472711834, 21.7631095630642, 2.23)
    pt3dadd(99.5613763685242, -207.70779095131, 21.7099058075508, 2.23)
    pt3dadd(99.9784410789853, -208.615109190787, 21.6567020520374, 2.23)
    pt3dadd(100.395505789446, -209.522427430264, 21.6034982965239, 2.23)
    pt3dadd(100.812570499908, -210.429745669741, 21.5502945410105, 2.23)
    pt3dadd(101.229635210369, -211.337063909218, 21.497090785497, 2.23)
    pt3dadd(101.727689218666, -212.153215646263, 21.2178281676824, 2.23)
    pt3dadd(102.235381107624, -212.958518395921, 20.9116641147977, 2.23)
    pt3dadd(102.743072996582, -213.76382114558, 20.6055000619131, 2.23)
    pt3dadd(103.25076488554, -214.569123895238, 20.2993360090284, 2.23)
    pt3dadd(103.758456774498, -215.374426644897, 19.9931719561437, 2.23)
    pt3dadd(104.266148663456, -216.179729394555, 19.6870079032591, 2.23)
    pt3dadd(104.773840552414, -216.985032144214, 19.3808438503744, 2.23)
    pt3dadd(105.281532441372, -217.790334893872, 19.0746797974898, 2.23)
    pt3dadd(105.775667478898, -218.612683386076, 18.830968107794, 2.23)
    pt3dadd(106.207271252612, -219.513655726107, 18.8753192635262, 2.23)
    pt3dadd(106.638875026326, -220.414628066138, 18.9196704192583, 2.23)
    pt3dadd(107.07047880004, -221.315600406169, 18.9640215749904, 2.23)
    pt3dadd(107.502082573753, -222.2165727462, 19.0083727307225, 2.23)
    pt3dadd(107.933686347467, -223.117545086232, 19.0527238864546, 2.23)
    pt3dadd(108.365290121181, -224.018517426263, 19.0970750421867, 2.23)
    pt3dadd(108.796893894894, -224.919489766294, 19.1414261979188, 2.23)
    pt3dadd(109.228497668608, -225.820462106325, 19.1857773536509, 2.23)
    pt3dadd(109.660101442322, -226.721434446356, 19.230128509383, 2.23)
    pt3dadd(110.091705216036, -227.622406786388, 19.2744796651151, 2.23)
    pt3dadd(110.367387247417, -228.34753062498, 18.9705850497242, 2.23)
    pt3dadd(110.372899208114, -228.767956726409, 18.0632750081581, 2.23)
    pt3dadd(110.378411168812, -229.188382827837, 17.1559649665919, 2.23)
    pt3dadd(110.38392312951, -229.608808929266, 16.2486549250257, 2.23)
    pt3dadd(110.389435090207, -230.029235030694, 15.3413448834595, 2.23)
    pt3dadd(110.394947050905, -230.449661132123, 14.4340348418934, 2.23)
    pt3dadd(110.400459011602, -230.870087233552, 13.5267248003272, 2.23)
    pt3dadd(110.4059709723, -231.29051333498, 12.619414758761, 2.23)
    pt3dadd(110.411482932998, -231.710939436409, 11.7121047171948, 2.23)
    pt3dadd(110.416994893695, -232.131365537837, 10.8047946756287, 2.23)
    pt3dadd(110.422506854393, -232.551791639266, 9.89748463406249, 2.23)
    pt3dadd(110.743837858984, -233.155302362686, 9.46459316983177, 2.23)
    pt3dadd(111.369346599983, -233.935149082826, 9.48863288740734, 2.23)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(111.369346599983, -233.935149082826, 9.48863288740734, 2.23)
  }
}
proc shape3d_11() {
  adendOML[4] {
    pt3dadd(111.994855340981, -234.714995802966, 9.5126726049829, 2.23)
    pt3dadd(112.62036408198, -235.494842523106, 9.53671232255847, 2.23)
    pt3dadd(113.245872822978, -236.274689243246, 9.56075204013404, 2.23)
    pt3dadd(113.871381563977, -237.054535963387, 9.58479175770959, 2.23)
    pt3dadd(114.496890304975, -237.834382683527, 9.60883147528516, 2.23)
    pt3dadd(115.122399045974, -238.614229403667, 9.63287119286073, 2.23)
    pt3dadd(115.664402935269, -239.352887102628, 9.37574299590455, 2.23)
    pt3dadd(116.116451289152, -240.047173961122, 8.81572688553312, 2.23)
    pt3dadd(116.568499643034, -240.741460819615, 8.25571077516169, 2.23)
    pt3dadd(117.020547996917, -241.435747678108, 7.69569466479027, 2.23)
    pt3dadd(117.472596350799, -242.130034536601, 7.13567855441882, 2.23)
    pt3dadd(117.924644704682, -242.824321395095, 6.57566244404741, 2.23)
    pt3dadd(118.376693058564, -243.518608253588, 6.01564633367597, 2.23)
    pt3dadd(118.828741412447, -244.212895112081, 5.45563022330454, 2.23)
    pt3dadd(119.28078976633, -244.907181970575, 4.8956141129331, 2.23)
    pt3dadd(119.865965590105, -245.559104596816, 4.53985941250591, 2.23)
    pt3dadd(120.681579952782, -246.137696363621, 4.53767336999032, 2.23)
    pt3dadd(121.497194315458, -246.716288130425, 4.53548732747473, 2.23)
    pt3dadd(122.312808678134, -247.29487989723, 4.53330128495914, 2.23)
    pt3dadd(123.128423040811, -247.873471664035, 4.53111524244356, 2.23)
    pt3dadd(123.944037403487, -248.45206343084, 4.52892919992797, 2.23)
    pt3dadd(124.778760173334, -249.001811470561, 4.52344797413858, 2.23)
    pt3dadd(125.629063685511, -249.528040716932, 4.51527989951554, 2.23)
    pt3dadd(126.479367197689, -250.054269963302, 4.5071118248925, 2.23)
    pt3dadd(127.329670709866, -250.580499209673, 4.49894375026945, 2.23)
    pt3dadd(128.319076625858, -250.536764744153, 4.43924485114199, 2.23)
    pt3dadd(129.314738305027, -250.467397666232, 4.3772284892996, 2.23)
    pt3dadd(130.310399984195, -250.398030588312, 4.31521212745719, 2.23)
    pt3dadd(131.025396827642, -249.905197155086, 4.23678182601614, 2.23)
    pt3dadd(131.479958610428, -249.019419997193, 4.14312066979392, 2.23)
    pt3dadd(131.934520393214, -248.133642839299, 4.04945951357175, 2.23)
    pt3dadd(132.389082176, -247.247865681406, 3.95579835734954, 2.23)
    pt3dadd(132.843643958786, -246.362088523513, 3.86213720112734, 2.23)
    pt3dadd(133.298205741572, -245.47631136562, 3.76847604490513, 2.23)
    pt3dadd(133.689559407623, -244.589715289139, 3.59974762209258, 2.23)
    pt3dadd(133.868795270816, -243.700371033779, 3.17910370997376, 2.23)
    pt3dadd(134.04803113401, -242.811026778418, 2.75845979785494, 2.23)
    pt3dadd(134.227266997204, -241.921682523058, 2.33781588573612, 2.23)
    pt3dadd(134.406502860397, -241.032338267698, 1.91717197361731, 2.23)
    pt3dadd(134.585738723591, -240.142994012337, 1.49652806149849, 2.23)
    pt3dadd(134.762466777311, -239.255574402466, 1.08696213081441, 2.23)
    pt3dadd(134.683918944596, -238.564069031097, 1.80505025865374, 2.23)
    pt3dadd(134.605371111881, -237.872563659728, 2.52313838649307, 2.23)
    pt3dadd(134.526823279165, -237.181058288359, 3.24122651433241, 2.23)
    pt3dadd(134.44827544645, -236.48955291699, 3.95931464217178, 2.23)
    pt3dadd(134.369727613735, -235.798047545622, 4.67740277001114, 2.23)
    pt3dadd(134.291179781019, -235.106542174253, 5.39549089785046, 2.23)
    pt3dadd(134.212631948304, -234.415036802884, 6.1135790256898, 2.23)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(134.212631948304, -234.415036802884, 6.1135790256898, 2.23)
    pt3dadd(134.134084115589, -233.723531431515, 6.83166715352915, 2.23)
    pt3dadd(134.055536282873, -233.032026060147, 7.5497552813685, 2.23)
    pt3dadd(133.976988450158, -232.340520688778, 8.26784340920783, 2.23)
    pt3dadd(133.898440617442, -231.649015317409, 8.98593153704716, 2.23)
    pt3dadd(133.819892784727, -230.95750994604, 9.70401966488652, 2.23)
    pt3dadd(133.679421399385, -230.12082551111, 10.0255873966893, 2.23)
    pt3dadd(133.478834726324, -229.143201469094, 9.96221375025263, 2.23)
    pt3dadd(133.278248053264, -228.165577427078, 9.89884010381596, 2.23)
    pt3dadd(133.077661380203, -227.187953385062, 9.83546645737932, 2.23)
    pt3dadd(132.877074707142, -226.210329343046, 9.77209281094265, 2.23)
    pt3dadd(132.676488034082, -225.232705301029, 9.70871916450601, 2.23)
    pt3dadd(132.475901361021, -224.255081259013, 9.64534551806933, 2.23)
    pt3dadd(132.275314687961, -223.277457216997, 9.58197187163267, 2.23)
    pt3dadd(132.039847894599, -222.323273257445, 9.61673703794175, 2.23)
    pt3dadd(131.703756326615, -221.436710997435, 9.93462037669403, 2.23)
    pt3dadd(131.367664758631, -220.550148737425, 10.2525037154463, 2.23)
    pt3dadd(130.981865783683, -219.668498899788, 10.4543756466949, 2.23)
    pt3dadd(130.492934196359, -218.797041324902, 10.4155478462195, 2.23)
    pt3dadd(130.004002609035, -217.925583750015, 10.3767200457442, 2.23)
    pt3dadd(129.515071021711, -217.054126175128, 10.3378922452688, 2.23)
    pt3dadd(129.026139434387, -216.182668600242, 10.2990644447935, 2.23)
    pt3dadd(128.537207847064, -215.311211025355, 10.2602366443181, 2.23)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(17.3533220676647, -44.682244930961, 27.5943501547855, 2.23)
    pt3dadd(16.8606807047871, -45.5827678411421, 27.3212542117589, 2.23)
    pt3dadd(16.4950694946307, -46.4852716769859, 27.09362453598, 2.23)
    pt3dadd(16.1294582844743, -47.3877755128297, 26.865994860201, 2.23)
    pt3dadd(15.7638470743179, -48.2902793486735, 26.6383651844221, 2.23)
    pt3dadd(15.3982358641615, -49.1927831845173, 26.4107355086432, 2.23)
    pt3dadd(15.032624654005, -50.0952870203611, 26.1831058328642, 2.23)
    pt3dadd(14.6670134438486, -50.9977908562049, 25.9554761570853, 2.23)
    pt3dadd(14.5620563021517, -51.8996057324593, 25.8165994249315, 2.23)
    pt3dadd(14.9948781261534, -52.7999991539193, 25.8608369119708, 2.23)
    pt3dadd(15.427699950155, -53.7003925753792, 25.90507439901, 2.23)
    pt3dadd(15.8605217741567, -54.6007859968392, 25.9493118860493, 2.23)
    pt3dadd(16.2933435981584, -55.5011794182991, 25.9935493730886, 2.23)
    pt3dadd(16.72616542216, -56.401572839759, 26.0377868601278, 2.23)
    pt3dadd(17.1589872461617, -57.301966261219, 26.0820243471671, 2.23)
    pt3dadd(17.114776963217, -57.7102090078276, 26.9106454462649, 2.23)
    pt3dadd(17.0069185330665, -58.0527864079234, 27.8439231562682, 2.23)
    pt3dadd(16.899060102916, -58.3953638080193, 28.7772008662715, 2.23)
    pt3dadd(16.7912016727655, -58.7379412081151, 29.7104785762749, 2.23)
    pt3dadd(16.683343242615, -59.0805186082109, 30.6437562862782, 2.23)
    pt3dadd(16.5754848124646, -59.4230960083068, 31.5770339962815, 2.23)
    pt3dadd(16.5359910218652, -59.9625235790455, 32.2478456421366, 2.23)
    pt3dadd(16.6532196807237, -60.9532201262883, 32.316967222149, 2.23)
    pt3dadd(16.7704483395822, -61.9439166735311, 32.3860888021614, 2.23)
    pt3dadd(16.8876769984407, -62.9346132207739, 32.4552103821738, 2.23)
    pt3dadd(17.0049056572992, -63.9253097680167, 32.5243319621862, 2.23)
    pt3dadd(17.1221343161577, -64.9160063152595, 32.5934535421986, 2.23)
    pt3dadd(17.2397295229578, -65.9066589725353, 32.6625508870136, 2.23)
    pt3dadd(17.3686713974663, -66.8959529947853, 32.7308980196427, 2.23)
    pt3dadd(17.4976132719747, -67.8852470170353, 32.7992451522717, 2.23)
    pt3dadd(17.6265551464831, -68.8745410392853, 32.8675922849008, 2.23)
    pt3dadd(17.7554970209915, -69.8638350615354, 32.9359394175299, 2.23)
    pt3dadd(17.8844388954999, -70.8531290837854, 33.004286550159, 2.23)
    pt3dadd(18.0133807700083, -71.8424231060354, 33.0726336827881, 2.23)
    pt3dadd(18.1423226445167, -72.8317171282854, 33.1409808154172, 2.23)
    pt3dadd(18.2712645190252, -73.8210111505354, 33.2093279480462, 2.23)
    pt3dadd(18.4029474128224, -74.7841600008144, 33.4291392514162, 2.23)
    pt3dadd(18.5354058883367, -75.7399109763482, 33.6918079115769, 2.23)
    pt3dadd(18.6678643638511, -76.695661951882, 33.9544765717376, 2.23)
    pt3dadd(18.8003228393654, -77.6514129274158, 34.2171452318983, 2.23)
    pt3dadd(18.9327813148797, -78.6071639029496, 34.4798138920589, 2.23)
    pt3dadd(19.0652397903941, -79.5629148784834, 34.7424825522196, 2.23)
    pt3dadd(19.1976982659084, -80.5186658540172, 35.0051512123803, 2.23)
    pt3dadd(19.3301567414228, -81.474416829551, 35.267819872541, 2.23)
    pt3dadd(19.4626152169371, -82.4301678050848, 35.5304885327017, 2.23)
    pt3dadd(19.5950736924515, -83.3859187806186, 35.7931571928624, 2.23)
    pt3dadd(19.7275321679658, -84.3416697561524, 36.0558258530231, 2.23)
    pt3dadd(19.8599906434801, -85.2974207316862, 36.3184945131837, 2.23)
    pt3dadd(19.9924491189945, -86.25317170722, 36.5811631733444, 2.23)
    pt3dadd(20.1249075945088, -87.2089226827538, 36.8438318335051, 2.23)
    pt3dadd(20.2573660700232, -88.1646736582876, 37.1065004936658, 2.23)
    pt3dadd(20.3898245455375, -89.1204246338214, 37.3691691538265, 2.23)
    pt3dadd(20.5222830210519, -90.0761756093552, 37.6318378139872, 2.23)
    pt3dadd(20.6547414965662, -91.031926584889, 37.8945064741479, 2.23)
    pt3dadd(20.7871999720805, -91.9876775604228, 38.1571751343085, 2.23)
    pt3dadd(20.9196584475949, -92.9434285359566, 38.4198437944692, 2.23)
    pt3dadd(21.0350699156237, -93.9086729213905, 38.6371155299041, 2.23)
    pt3dadd(21.0961870342723, -94.904153611605, 38.7097990439785, 2.23)
    pt3dadd(21.1573041529209, -95.8996343018195, 38.7824825580529, 2.23)
    pt3dadd(21.2184212715696, -96.895114992034, 38.8551660721273, 2.23)
    pt3dadd(21.2795383902182, -97.8905956822484, 38.9278495862017, 2.23)
    pt3dadd(21.3406555088668, -98.8860763724629, 39.0005331002761, 2.23)
    pt3dadd(21.4017726275154, -99.8815570626774, 39.0732166143505, 2.23)
    pt3dadd(21.4628897461641, -100.877037752892, 39.1459001284249, 2.23)
    pt3dadd(21.5340228555378, -101.871057763494, 39.2179014131057, 2.23)
    pt3dadd(21.7686631303263, -102.841232745735, 39.278765567436, 2.23)
    pt3dadd(22.0033034051149, -103.811407727975, 39.3396297217662, 2.23)
    pt3dadd(22.2379436799034, -104.781582710215, 39.4004938760964, 2.23)
    pt3dadd(22.4725839546919, -105.751757692455, 39.4613580304266, 2.23)
    pt3dadd(22.7072242294804, -106.721932674696, 39.5222221847568, 2.23)
    pt3dadd(23.0151560499229, -107.609219218875, 39.7371877017744, 2.23)
    pt3dadd(23.4690837665331, -108.331392970186, 40.2591213192118, 2.23)
    pt3dadd(23.9230114831434, -109.053566721496, 40.7810549366492, 2.23)
    pt3dadd(24.3769391997536, -109.775740472806, 41.3029885540866, 2.23)
    pt3dadd(24.8308669163638, -110.497914224117, 41.824922171524, 2.23)
    pt3dadd(25.2847946329741, -111.220087975427, 42.3468557889614, 2.23)
    pt3dadd(25.7387223495843, -111.942261726737, 42.8687894063989, 2.23)
    pt3dadd(26.1926500661945, -112.664435478048, 43.3907230238363, 2.23)
    pt3dadd(26.6465777828048, -113.386609229358, 43.9126566412737, 2.23)
    pt3dadd(27.100505499415, -114.108782980669, 44.4345902587111, 2.23)
    pt3dadd(27.5544332160252, -114.830956731979, 44.9565238761485, 2.23)
    pt3dadd(28.0083609326355, -115.553130483289, 45.4784574935859, 2.23)
    pt3dadd(28.4995822146899, -116.339173157081, 45.7544534764884, 2.23)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(28.4995822146899, -116.339173157081, 45.7544534764884, 2.23)
    pt3dadd(29.0273673185283, -117.187834995099, 45.7893242215115, 2.23)
    pt3dadd(29.5551524223668, -118.036496833117, 45.8241949665345, 2.23)
    pt3dadd(30.0829375262052, -118.885158671134, 45.8590657115576, 2.23)
    pt3dadd(30.6107226300436, -119.733820509152, 45.8939364565806, 2.23)
    pt3dadd(31.1399262090809, -120.581556888107, 45.9286556035658, 2.23)
    pt3dadd(31.7089558854842, -121.403309434022, 45.9591183784829, 2.23)
    pt3dadd(32.2779855618875, -122.225061979936, 45.9895811534, 2.23)
    pt3dadd(32.8470152382909, -123.04681452585, 46.0200439283171, 2.23)
    pt3dadd(33.4160449146942, -123.868567071765, 46.0505067032342, 2.23)
    pt3dadd(33.9850745910975, -124.690319617679, 46.0809694781513, 2.23)
    pt3dadd(34.5927106147943, -125.483460663978, 46.1070443097655, 2.23)
    pt3dadd(35.2173563938256, -126.26399563272, 46.131185836438, 2.23)
    pt3dadd(35.8420021728571, -127.044530601461, 46.1553273631104, 2.23)
    pt3dadd(36.4666479518885, -127.825065570203, 46.1794688897829, 2.23)
    pt3dadd(36.7149953700294, -128.751768249609, 46.2362262596033, 2.23)
    pt3dadd(36.7882477307958, -129.746484097143, 46.3081600785418, 2.23)
    pt3dadd(36.8615000915622, -130.741199944677, 46.3800938974804, 2.23)
    pt3dadd(36.9347524523286, -131.735915792211, 46.4520277164189, 2.23)
    pt3dadd(37.008004813095, -132.730631639745, 46.5239615353574, 2.23)
    pt3dadd(37.0812571738614, -133.725347487279, 46.595895354296, 2.23)
    pt3dadd(37.2382219743907, -134.623514062855, 46.9331159853053, 2.23)
    pt3dadd(37.4482306271622, -135.460502809541, 47.4384339086788, 2.23)
    pt3dadd(37.6582392799338, -136.297491556227, 47.9437518320523, 2.23)
    pt3dadd(37.8682479327054, -137.134480302912, 48.4490697554259, 2.23)
    pt3dadd(38.078256585477, -137.971469049598, 48.9543876787994, 2.23)
    pt3dadd(38.2882652382486, -138.808457796284, 49.4597056021729, 2.23)
    pt3dadd(38.4982738910201, -139.645446542969, 49.9650235255464, 2.23)
    pt3dadd(38.7082825437917, -140.482435289655, 50.4703414489199, 2.23)
    pt3dadd(38.9182911965633, -141.319424036341, 50.9756593722934, 2.23)
    pt3dadd(39.15306230462, -142.23269344993, 51.2172649056698, 2.23)
    pt3dadd(39.4049275675535, -143.198621354736, 51.2768230456989, 2.23)
    pt3dadd(39.6567928304869, -144.164549259543, 51.3363811857279, 2.23)
    pt3dadd(39.9086580934204, -145.130477164349, 51.3959393257569, 2.23)
    pt3dadd(40.1605233563539, -146.096405069156, 51.455497465786, 2.23)
    pt3dadd(40.4123886192873, -147.062332973962, 51.515055605815, 2.23)
    pt3dadd(40.6642538822208, -148.028260878769, 51.5746137458441, 2.23)
    pt3dadd(40.9161191451543, -148.994188783575, 51.6341718858731, 2.23)
    pt3dadd(41.1679844080878, -149.960116688381, 51.6937300259021, 2.23)
    pt3dadd(41.4198496710212, -150.926044593188, 51.7532881659312, 2.23)
    pt3dadd(41.6823052039433, -151.889145291777, 51.8120268144855, 2.23)
    pt3dadd(41.9538687975988, -152.849814478614, 51.8700606672102, 2.23)
    pt3dadd(42.2254323912544, -153.810483665452, 51.928094519935, 2.23)
    pt3dadd(42.4969959849099, -154.771152852289, 51.9861283726597, 2.23)
    pt3dadd(42.7685595785655, -155.731822039127, 52.0441622253844, 2.23)
    pt3dadd(43.0401231722211, -156.692491225964, 52.1021960781092, 2.23)
    pt3dadd(43.3116867658766, -157.653160412801, 52.1602299308339, 2.23)
    pt3dadd(43.5832503595321, -158.613829599639, 52.2182637835586, 2.23)
    pt3dadd(43.8548139531877, -159.574498786476, 52.2762976362834, 2.23)
    pt3dadd(44.1263775468432, -160.535167973314, 52.3343314890081, 2.23)
    pt3dadd(44.3979411404988, -161.495837160151, 52.3923653417328, 2.23)
    pt3dadd(44.6695047341543, -162.456506346988, 52.4503991944576, 2.23)
    pt3dadd(44.9359092497271, -163.368186721218, 52.7369422274465, 2.23)
    pt3dadd(45.2008257372153, -164.265737297871, 53.0893939503914, 2.23)
    pt3dadd(45.4657422247035, -165.163287874524, 53.4418456733363, 2.23)
    pt3dadd(45.7306587121917, -166.060838451177, 53.7942973962811, 2.23)
    pt3dadd(45.9955751996799, -166.95838902783, 54.146749119226, 2.23)
    pt3dadd(46.260491687168, -167.855939604483, 54.4992008421709, 2.23)
    pt3dadd(46.5254081746562, -168.753490181136, 54.8516525651157, 2.23)
    pt3dadd(46.7903246621444, -169.651040757789, 55.2041042880606, 2.23)
    pt3dadd(47.0552411496326, -170.548591334442, 55.5565560110054, 2.23)
    pt3dadd(47.3201576371208, -171.446141911095, 55.9090077339503, 2.23)
    pt3dadd(47.585074124609, -172.343692487748, 56.2614594568952, 2.23)
    pt3dadd(47.8499906120972, -173.241243064401, 56.61391117984, 2.23)
    pt3dadd(48.1149070995854, -174.138793641054, 56.9663629027849, 2.23)
    pt3dadd(48.3796655027532, -175.049189263072, 57.2608884311411, 2.23)
    pt3dadd(48.6437800885741, -176.011897872271, 57.3195025875406, 2.23)
    pt3dadd(48.907894674395, -176.97460648147, 57.37811674394, 2.23)
    pt3dadd(49.1720092602159, -177.937315090669, 57.4367309003395, 2.23)
    pt3dadd(49.4361238460368, -178.900023699869, 57.495345056739, 2.23)
    pt3dadd(49.7002384318578, -179.862732309068, 57.5539592131385, 2.23)
    pt3dadd(49.9643530176787, -180.825440918267, 57.612573369538, 2.23)
    pt3dadd(50.2284676034996, -181.788149527466, 57.6711875259375, 2.23)
    pt3dadd(50.4925821893205, -182.750858136665, 57.7298016823369, 2.23)
    pt3dadd(50.7566967751414, -183.713566745865, 57.7884158387364, 2.23)
    pt3dadd(51.0208113609623, -184.676275355064, 57.8470299951359, 2.23)
    pt3dadd(51.2849259467833, -185.638983964263, 57.9056441515354, 2.23)
    pt3dadd(51.5490405326042, -186.601692573462, 57.9642583079349, 2.23)
    pt3dadd(51.8520919621652, -187.552844815613, 58.0197705902625, 2.23)
    pt3dadd(52.1642397242814, -188.50129728686, 58.0745582201685, 2.23)
    pt3dadd(52.4763874863977, -189.449749758107, 58.1293458500746, 2.23)
    pt3dadd(52.788535248514, -190.398202229355, 58.1841334799806, 2.23)
    pt3dadd(53.1006830106302, -191.346654700602, 58.2389211098867, 2.23)
    pt3dadd(53.4128307727465, -192.295107171849, 58.2937087397928, 2.23)
    pt3dadd(53.7249785348628, -193.243559643097, 58.3484963696988, 2.23)
    pt3dadd(54.037126296979, -194.192012114344, 58.4032839996049, 2.23)
    pt3dadd(54.3492740590953, -195.140464585591, 58.4580716295109, 2.23)
    pt3dadd(54.6614218212116, -196.088917056838, 58.512859259417, 2.23)
    pt3dadd(54.9735695833278, -197.037369528086, 58.5676468893231, 2.23)
    pt3dadd(55.2857173454441, -197.985821999333, 58.6224345192291, 2.23)
    pt3dadd(55.5978651075604, -198.93427447058, 58.6772221491352, 2.23)
    pt3dadd(55.9100128696766, -199.882726941828, 58.7320097790412, 2.23)
    pt3dadd(56.2221606317929, -200.831179413075, 58.7867974089473, 2.23)
    pt3dadd(56.5343083939092, -201.779631884322, 58.8415850388534, 2.23)
    pt3dadd(56.8464561560254, -202.728084355569, 58.8963726687594, 2.23)
  }
}
proc shape3d_12() {
  adendMML[8] {
    pt3dadd(57.1586039181417, -203.676536826817, 58.9511602986655, 2.23)
    pt3dadd(57.4961485122777, -204.616133634026, 59.0038238731434, 2.23)
    pt3dadd(57.8493245676725, -205.550279880741, 59.055180115663, 2.23)
    pt3dadd(58.2025006230672, -206.484426127455, 59.1065363581826, 2.23)
    pt3dadd(58.5556766784619, -207.418572374169, 59.1578926007023, 2.23)
    pt3dadd(58.9088527338567, -208.352718620883, 59.2092488432219, 2.23)
    pt3dadd(59.2620287892514, -209.286864867597, 59.2606050857416, 2.23)
    pt3dadd(59.6152048446462, -210.221011114311, 59.3119613282612, 2.23)
    pt3dadd(59.9683809000409, -211.155157361025, 59.3633175707808, 2.23)
    pt3dadd(60.3215569554357, -212.089303607739, 59.4146738133005, 2.23)
    pt3dadd(60.6747330108304, -213.023449854453, 59.4660300558201, 2.23)
    pt3dadd(61.0279090662251, -213.957596101168, 59.5173862983397, 2.23)
    pt3dadd(61.3872903831887, -214.889401003253, 59.5682099760388, 2.23)
    pt3dadd(61.7469025889895, -215.82111878728, 59.6190138377688, 2.23)
    pt3dadd(62.1065147947903, -216.752836571307, 59.6698176994986, 2.23)
    pt3dadd(62.4661270005911, -217.684554355334, 59.7206215612286, 2.23)
    pt3dadd(62.8257392063919, -218.616272139362, 59.7714254229585, 2.23)
    pt3dadd(63.1853514121927, -219.547989923389, 59.8222292846884, 2.23)
    pt3dadd(63.5449636179934, -220.479707707416, 59.8730331464183, 2.23)
    pt3dadd(63.9074714846068, -221.410203414087, 59.9235785809386, 2.23)
    pt3dadd(64.3313991684414, -222.314777656638, 59.9686425198679, 2.23)
    pt3dadd(64.7553268522759, -223.219351899189, 60.0137064587973, 2.23)
    pt3dadd(65.1792545361104, -224.12392614174, 60.0587703977266, 2.23)
    pt3dadd(65.603182219945, -225.028500384291, 60.1038343366559, 2.23)
    pt3dadd(66.0271099037796, -225.933074626842, 60.1488982755853, 2.23)
    pt3dadd(66.4510375876141, -226.837648869393, 60.1939622145146, 2.23)
    pt3dadd(66.8749652714487, -227.742223111944, 60.2390261534439, 2.23)
    pt3dadd(67.3647522414588, -228.612527396841, 60.2777169960603, 2.23)
    pt3dadd(67.868561470304, -229.475535182727, 60.3150509274305, 2.23)
    pt3dadd(68.3723706991493, -230.338542968612, 60.3523848588006, 2.23)
    pt3dadd(68.8761799279945, -231.201550754497, 60.3897187901708, 2.23)
    pt3dadd(69.3799891568398, -232.064558540383, 60.4270527215409, 2.23)
    pt3dadd(69.883798385685, -232.927566326268, 60.4643866529111, 2.23)
    pt3dadd(70.3876076145303, -233.790574112154, 60.5017205842813, 2.23)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(70.3876076145303, -233.790574112154, 60.5017205842813, 2.23)
    pt3dadd(70.8914168433755, -234.653581898039, 60.5390545156514, 2.23)
    pt3dadd(71.3952260722208, -235.516589683924, 60.5763884470215, 2.23)
    pt3dadd(71.899035301066, -236.37959746981, 60.6137223783917, 2.23)
    pt3dadd(72.4028445299113, -237.242605255695, 60.6510563097619, 2.23)
    pt3dadd(72.9066537587565, -238.105613041581, 60.688390241132, 2.23)
    pt3dadd(73.448259197274, -238.944702920101, 60.7217414796051, 2.23)
    pt3dadd(74.0175943479451, -239.766245094968, 60.752170760332, 2.23)
    pt3dadd(74.5869294986162, -240.587787269834, 60.7826000410588, 2.23)
    pt3dadd(75.1562646492873, -241.409329444701, 60.8130293217856, 2.23)
    pt3dadd(75.7255997999584, -242.230871619568, 60.8434586025125, 2.23)
    pt3dadd(76.2949349506295, -243.052413794434, 60.8738878832393, 2.23)
    pt3dadd(76.8642701013005, -243.873955969301, 60.9043171639662, 2.23)
    pt3dadd(77.4336052519716, -244.695498144168, 60.934746444693, 2.23)
    pt3dadd(78.0029404026427, -245.517040319035, 60.9651757254198, 2.23)
    pt3dadd(78.5722755533138, -246.338582493901, 60.9956050061467, 2.23)
    pt3dadd(79.1416107039849, -247.160124668768, 61.0260342868735, 2.23)
    pt3dadd(79.710945854656, -247.981666843635, 61.0564635676003, 2.23)
    pt3dadd(80.2802810053271, -248.803209018502, 61.0868928483272, 2.23)
    pt3dadd(80.8496161559982, -249.624751193368, 61.117322129054, 2.23)
    pt3dadd(81.3925739504079, -250.370642818466, 60.9872294315225, 2.23)
    pt3dadd(81.8274210571049, -250.806471794357, 60.1992185828848, 2.23)
    pt3dadd(82.2622681638019, -251.242300770248, 59.411207734247, 2.23)
    pt3dadd(82.6971152704988, -251.678129746139, 58.6231968856092, 2.23)
    pt3dadd(83.1319623771958, -252.113958722031, 57.8351860369714, 2.23)
    pt3dadd(83.5668094838927, -252.549787697922, 57.0471751883336, 2.23)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(2.25691070619842, -7.93224594804764, 3.29439505877213, 2.23)
    pt3dadd(3.09597206526736, -8.77371658224788, 3.31272440969959, 2.23)
    pt3dadd(3.76278962559916, -9.49089972939581, 3.51521558155686, 2.23)
    pt3dadd(4.42960718593096, -10.2080828765438, 3.71770675341412, 2.23)
    pt3dadd(4.44247418178292, -11.1154114603928, 3.56527247321954, 2.23)
    pt3dadd(4.28530226817557, -12.072181277955, 3.32055119140083, 2.23)
    pt3dadd(4.12813035456822, -13.0289510955172, 3.07582990958212, 2.23)
    pt3dadd(3.97095844096087, -13.9857209130794, 2.83110862776341, 2.23)
    pt3dadd(3.81378652735352, -14.9424907306416, 2.5863873459447, 2.23)
    pt3dadd(3.65661461374616, -15.8992605482038, 2.34166606412599, 2.23)
    pt3dadd(3.49944270013881, -16.856030365766, 2.09694478230729, 2.23)
    pt3dadd(3.50093878201865, -17.7877814052817, 1.77792015046765, 2.23)
    pt3dadd(3.65471300523763, -18.6955212192961, 1.38758450217687, 2.23)
    pt3dadd(3.74962123352953, -19.5938143542057, 1.04837054997439, 2.23)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(3.74962123352953, -19.5938143542057, 1.04837054997439, 2.23)
    pt3dadd(3.13324546224279, -20.449746962963, 0.985767535554281, 2.23)
    pt3dadd(2.62948068022563, -21.3089028911375, 0.895922471795007, 2.23)
    pt3dadd(2.12571589820846, -22.1680588193119, 0.806077408035735, 2.23)
    pt3dadd(1.62195111619129, -23.0272147474864, 0.716232344276463, 2.23)
    pt3dadd(1.11818633417412, -23.8863706756608, 0.626387280517187, 2.23)
    pt3dadd(0.61442155215695, -24.7455266038352, 0.536542216757915, 2.23)
    pt3dadd(0.110656770139781, -25.6046825320097, 0.446697152998643, 2.23)
    pt3dadd(-0.393108011877387, -26.4638384601841, 0.35685208923937, 2.23)
    pt3dadd(-0.896872793894556, -27.3229943883586, 0.267007025480096, 2.23)
    pt3dadd(-1.40063757591172, -28.182150316533, 0.177161961720823, 2.23)
    pt3dadd(-1.90440235792889, -29.0413062447075, 0.08731689796155, 2.23)
    pt3dadd(-2.40816713994606, -29.9004621728819, -0.00252816579772253, 2.23)
    pt3dadd(-2.91193192196323, -30.7596181010563, -0.0923732295569957, 2.23)
    pt3dadd(-3.4156967039804, -31.6187740292308, -0.182218293316268, 2.23)
    pt3dadd(-3.91946148599757, -32.4779299574052, -0.272063357075542, 2.23)
    pt3dadd(-4.42322626801474, -33.3370858855797, -0.361908420834815, 2.23)
    pt3dadd(-4.92699105003191, -34.1962418137541, -0.451753484594088, 2.23)
    pt3dadd(-5.37724781991052, -35.032239665603, -0.730352337642893, 2.23)
    pt3dadd(-5.79904307544293, -35.8559194758125, -1.10935145725089, 2.23)
    pt3dadd(-6.22083833097535, -36.679599286022, -1.48835057685889, 2.23)
    pt3dadd(-6.64263358650777, -37.5032790962315, -1.86734969646689, 2.23)
    pt3dadd(-7.06442884204018, -38.3269589064409, -2.24634881607489, 2.23)
    pt3dadd(-7.4862240975726, -39.1506387166504, -2.62534793568289, 2.23)
    pt3dadd(-7.90801935310501, -39.9743185268598, -3.00434705529089, 2.23)
    pt3dadd(-8.18519734794249, -40.9013594220572, -3.06181082393679, 2.23)
    pt3dadd(-8.39759406659019, -41.8747008968789, -2.97524288934505, 2.23)
    pt3dadd(-8.60999078523789, -42.8480423717007, -2.88867495475332, 2.23)
    pt3dadd(-8.82238750388558, -43.8213838465225, -2.80210702016158, 2.23)
    pt3dadd(-9.09795590607798, -44.6055611543476, -3.26677269796035, 2.23)
    pt3dadd(-9.39066028347031, -45.3384257174034, -3.88096621768547, 2.23)
    pt3dadd(-9.68336466086264, -46.0712902804593, -4.49515973741058, 2.23)
    pt3dadd(-9.97606903825497, -46.8041548435151, -5.10935325713569, 2.23)
    pt3dadd(-10.2687734156473, -47.537019406571, -5.7235467768608, 2.23)
    pt3dadd(-10.5614777930396, -48.2698839696268, -6.33774029658592, 2.23)
    pt3dadd(-10.854182170432, -49.0027485326827, -6.95193381631103, 2.23)
    pt3dadd(-11.1468865478243, -49.7356130957385, -7.56612733603614, 2.23)
    pt3dadd(-11.4395909252166, -50.4684776587944, -8.18032085576126, 2.23)
    pt3dadd(-11.732295302609, -51.2013422218502, -8.79451437548637, 2.23)
    pt3dadd(-12.0249996800013, -51.9342067849061, -9.40870789521148, 2.23)
    pt3dadd(-12.2507086993347, -52.6698258814848, -10.0362438259662, 2.23)
    pt3dadd(-12.2740458254578, -53.4137655569824, -10.7040829815755, 2.23)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(-12.2740458254578, -53.4137655569824, -10.7040829815755, 2.23)
    pt3dadd(-12.8141202576144, -53.9714836568546, -10.8578452852331, 2.23)
    pt3dadd(-13.6953202597965, -54.4062670655511, -10.6722383250282, 2.23)
    pt3dadd(-14.5765202619786, -54.8410504742476, -10.4866313648232, 2.23)
    pt3dadd(-15.4577202641607, -55.2758338829441, -10.3010244046183, 2.23)
    pt3dadd(-16.3389202663428, -55.7106172916406, -10.1154174444134, 2.23)
    pt3dadd(-17.2201202685249, -56.1454007003371, -9.92981048420845, 2.23)
    pt3dadd(-17.6455168076793, -56.7200049967194, -10.2999284678916, 2.23)
    pt3dadd(-17.7717578666091, -57.3863773207581, -11.0347829574305, 2.23)
    pt3dadd(-17.8979989255388, -58.0527496447969, -11.7696374469694, 2.23)
    pt3dadd(-18.0242399844685, -58.7191219688357, -12.5044919365083, 2.23)
    pt3dadd(-18.1504810433983, -59.3854942928745, -13.2393464260471, 2.23)
    pt3dadd(-18.276722102328, -60.0518666169133, -13.974200915586, 2.23)
    pt3dadd(-18.4029631612577, -60.718238940952, -14.7090554051249, 2.23)
    pt3dadd(-18.5292042201874, -61.3846112649908, -15.4439098946638, 2.23)
    pt3dadd(-18.6554452791172, -62.0509835890296, -16.1787643842027, 2.23)
    pt3dadd(-18.7816863380469, -62.7173559130684, -16.9136188737416, 2.23)
    pt3dadd(-18.996506077348, -63.421257327585, -17.4686950957485, 2.23)
    pt3dadd(-19.5314794039669, -64.2608016856956, -17.3739912913327, 2.23)
    pt3dadd(-20.0664527305859, -65.1003460438063, -17.279287486917, 2.23)
    pt3dadd(-20.6014260572048, -65.939890401917, -17.1845836825012, 2.23)
    pt3dadd(-21.1363993838237, -66.7794347600276, -17.0898798780855, 2.23)
    pt3dadd(-21.6713727104427, -67.6189791181383, -16.9951760736697, 2.23)
    pt3dadd(-22.2063460370616, -68.4585234762489, -16.900472269254, 2.23)
    pt3dadd(-22.6735187050894, -69.3326116243752, -16.8069871748798, 2.23)
    pt3dadd(-23.0355649013565, -70.2602607089443, -16.715391718297, 2.23)
    pt3dadd(-23.3976110976236, -71.1879097935135, -16.6237962617143, 2.23)
    pt3dadd(-23.7596572938906, -72.1155588780826, -16.5322008051316, 2.23)
    pt3dadd(-24.1217034901577, -73.0432079626517, -16.4406053485488, 2.23)
    pt3dadd(-24.4837496864248, -73.9708570472209, -16.3490098919661, 2.23)
    pt3dadd(-24.8457958826919, -74.89850613179, -16.2574144353834, 2.23)
    pt3dadd(-25.207842078959, -75.8261552163591, -16.1658189788007, 2.23)
    pt3dadd(-25.5698882752261, -76.7538043009282, -16.0742235222179, 2.23)
    pt3dadd(-25.9319344714931, -77.6814533854974, -15.9826280656352, 2.23)
    pt3dadd(-26.2939806677602, -78.6091024700665, -15.8910326090525, 2.23)
    pt3dadd(-26.6993385388135, -79.4860469996183, -16.0919502117201, 2.23)
    pt3dadd(-27.1173445104566, -80.3481845212354, -16.3782889996805, 2.23)
    pt3dadd(-27.5353504820997, -81.2103220428524, -16.664627787641, 2.23)
    pt3dadd(-27.9533564537428, -82.0724595644695, -16.9509665756015, 2.23)
    pt3dadd(-28.3713624253859, -82.9345970860866, -17.2373053635619, 2.23)
    pt3dadd(-28.789368397029, -83.7967346077037, -17.5236441515224, 2.23)
    pt3dadd(-29.2073743686721, -84.6588721293208, -17.8099829394829, 2.23)
    pt3dadd(-29.6383998284332, -85.5023798548193, -18.1241125309272, 2.23)
    pt3dadd(-30.1101772635592, -86.2875749196661, -18.5252294239222, 2.23)
    pt3dadd(-30.5819546986853, -87.072769984513, -18.9263463169172, 2.23)
    pt3dadd(-31.0537321338114, -87.8579650493599, -19.3274632099122, 2.23)
    pt3dadd(-31.5255095689375, -88.6431601142068, -19.7285801029072, 2.23)
    pt3dadd(-31.9972870040636, -89.4283551790537, -20.1296969959022, 2.23)
    pt3dadd(-32.4690644391897, -90.2135502439005, -20.5308138888971, 2.23)
    pt3dadd(-32.9408418743158, -90.9987453087474, -20.9319307818921, 2.23)
    pt3dadd(-33.4126193094419, -91.7839403735943, -21.3330476748871, 2.23)
    pt3dadd(-33.884396744568, -92.5691354384412, -21.7341645678821, 2.23)
    pt3dadd(-34.3561741796941, -93.3543305032881, -22.1352814608771, 2.23)
    pt3dadd(-34.8279516148202, -94.1395255681349, -22.5363983538721, 2.23)
    pt3dadd(-35.2997290499463, -94.9247206329818, -22.9375152468671, 2.23)
    pt3dadd(-35.7715064850723, -95.7099156978286, -23.3386321398621, 2.23)
    pt3dadd(-36.1974779397439, -96.5127646307766, -23.7442946530502, 2.23)
    pt3dadd(-36.4459208496141, -97.3840340075834, -24.1675744583491, 2.23)
    pt3dadd(-36.6943637594843, -98.2553033843902, -24.5908542636481, 2.23)
    pt3dadd(-36.9428066693544, -99.126572761197, -25.014134068947, 2.23)
    pt3dadd(-37.1912495792246, -99.9978421380038, -25.437413874246, 2.23)
    pt3dadd(-37.4396924890948, -100.869111514811, -25.860693679545, 2.23)
    pt3dadd(-37.688135398965, -101.740380891617, -26.2839734848439, 2.23)
    pt3dadd(-37.9365783088352, -102.611650268424, -26.7072532901429, 2.23)
    pt3dadd(-38.1850212187054, -103.482919645231, -27.1305330954419, 2.23)
    pt3dadd(-38.4334641285756, -104.354189022038, -27.5538129007408, 2.23)
    pt3dadd(-38.6819070384458, -105.225458398845, -27.9770927060398, 2.23)
    pt3dadd(-38.9093786891357, -106.120188612648, -28.3475030128867, 2.23)
    pt3dadd(-39.0786205020018, -107.080061349453, -28.5711132494944, 2.23)
    pt3dadd(-39.247862314868, -108.039934086259, -28.794723486102, 2.23)
    pt3dadd(-39.4171041277342, -108.999806823064, -29.0183337227097, 2.23)
    pt3dadd(-39.5863459406004, -109.959679559869, -29.2419439593174, 2.23)
    pt3dadd(-40.1564930320746, -110.772069767388, -29.1552941739939, 2.23)
    pt3dadd(-40.7373500050738, -111.580520090599, -29.0603560266705, 2.23)
    pt3dadd(-41.3182069780729, -112.388970413811, -28.965417879347, 2.23)
    pt3dadd(-41.8760577876727, -113.205690062274, -28.8817085818402, 2.23)
    pt3dadd(-41.9645925477931, -114.191100465111, -29.0270630940899, 2.23)
    pt3dadd(-42.0531273079135, -115.176510867948, -29.1724176063397, 2.23)
    pt3dadd(-42.141662068034, -116.161921270785, -29.3177721185895, 2.23)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(-42.141662068034, -116.161921270785, -29.3177721185895, 2.23)
    pt3dadd(-42.2301968281544, -117.147331673622, -29.4631266308392, 2.23)
    pt3dadd(-42.3187315882748, -118.132742076459, -29.608481143089, 2.23)
    pt3dadd(-42.4072663483952, -119.118152479296, -29.7538356553388, 2.23)
    pt3dadd(-42.4958011085157, -120.103562882132, -29.8991901675885, 2.23)
    pt3dadd(-42.5843358686361, -121.088973284969, -30.0445446798383, 2.23)
    pt3dadd(-42.6728706287565, -122.074383687806, -30.1898991920881, 2.23)
    pt3dadd(-42.7614053888769, -123.059794090643, -30.3352537043378, 2.23)
    pt3dadd(-42.9120236604663, -123.971498432263, -30.6245608760294, 2.23)
    pt3dadd(-43.191757672423, -124.729915492957, -31.2132479275294, 2.23)
    pt3dadd(-43.4714916843797, -125.48833255365, -31.8019349790294, 2.23)
    pt3dadd(-43.7512256963363, -126.246749614344, -32.3906220305294, 2.23)
    pt3dadd(-44.1586620402131, -127.133099328803, -32.5163617676432, 2.23)
    pt3dadd(-44.5829375159991, -128.036318545956, -32.5810561755392, 2.23)
    pt3dadd(-45.007212991785, -128.939537763108, -32.6457505834353, 2.23)
    pt3dadd(-45.4314884675709, -129.842756980261, -32.7104449913313, 2.23)
    pt3dadd(-45.8557639433569, -130.745976197413, -32.7751393992274, 2.23)
    pt3dadd(-46.2800394191428, -131.649195414566, -32.8398338071234, 2.23)
    pt3dadd(-46.7043148949288, -132.552414631718, -32.9045282150194, 2.23)
    pt3dadd(-47.1285903707147, -133.455633848871, -32.9692226229155, 2.23)
    pt3dadd(-47.3952574037969, -134.151428854212, -33.6144751922425, 2.23)
    pt3dadd(-47.6508672398603, -134.832671781395, -34.3004574703442, 2.23)
    pt3dadd(-47.9064770759238, -135.513914708579, -34.9864397484458, 2.23)
    pt3dadd(-48.1620869119873, -136.195157635763, -35.6724220265474, 2.23)
    pt3dadd(-48.4176967480507, -136.876400562947, -36.3584043046491, 2.23)
    pt3dadd(-48.6733065841142, -137.557643490131, -37.0443865827507, 2.23)
    pt3dadd(-48.9289164201776, -138.238886417315, -37.7303688608523, 2.23)
    pt3dadd(-49.1845262562411, -138.920129344499, -38.416351138954, 2.23)
    pt3dadd(-49.4306753424094, -139.699291190245, -38.8399850804062, 2.23)
    pt3dadd(-49.6584038767023, -140.669106053878, -38.752813726477, 2.23)
    pt3dadd(-49.8861324109952, -141.638920917511, -38.6656423725479, 2.23)
    pt3dadd(-50.113860945288, -142.608735781143, -38.5784710186187, 2.23)
    pt3dadd(-50.3415894795809, -143.578550644776, -38.4912996646895, 2.23)
    pt3dadd(-50.5693180138738, -144.548365508409, -38.4041283107604, 2.23)
    pt3dadd(-50.7970465481666, -145.518180372042, -38.3169569568312, 2.23)
    pt3dadd(-50.9765499143912, -146.431183244392, -38.5108695370452, 2.23)
    pt3dadd(-51.1009612988519, -147.279284628307, -39.0258897793835, 2.23)
    pt3dadd(-51.2253726833125, -148.127386012222, -39.5409100217218, 2.23)
    pt3dadd(-51.3497840677732, -148.975487396137, -40.0559302640601, 2.23)
    pt3dadd(-51.4741954522338, -149.823588780052, -40.5709505063984, 2.23)
    pt3dadd(-51.5986068366945, -150.671690163967, -41.0859707487367, 2.23)
    pt3dadd(-51.7230182211551, -151.519791547882, -41.600990991075, 2.23)
    pt3dadd(-51.8474296056158, -152.367892931797, -42.1160112334134, 2.23)
    pt3dadd(-51.9718409900764, -153.215994315712, -42.6310314757517, 2.23)
    pt3dadd(-52.0962523745371, -154.064095699626, -43.14605171809, 2.23)
    pt3dadd(-52.2610570557026, -154.892122399727, -43.6782576510162, 2.23)
    pt3dadd(-52.4946536923648, -155.685960834245, -44.2397317387737, 2.23)
    pt3dadd(-52.728250329027, -156.479799268762, -44.8012058265312, 2.23)
    pt3dadd(-52.9618469656892, -157.273637703279, -45.3626799142887, 2.23)
    pt3dadd(-53.1954436023513, -158.067476137797, -45.9241540020462, 2.23)
    pt3dadd(-53.4290402390135, -158.861314572314, -46.4856280898037, 2.23)
    pt3dadd(-53.6626368756757, -159.655153006832, -47.0471021775612, 2.23)
    pt3dadd(-53.8962335123379, -160.448991441349, -47.6085762653187, 2.23)
    pt3dadd(-54.1305673661535, -161.244048145613, -48.1646888908068, 2.23)
  }
}
proc shape3d_13() {
  adendMML[9] {
    pt3dadd(-54.4538099011245, -162.186028664628, -48.0742070396854, 2.23)
    pt3dadd(-54.7770524360955, -163.128009183642, -47.9837251885641, 2.23)
    pt3dadd(-55.1002949710665, -164.069989702657, -47.8932433374428, 2.23)
    pt3dadd(-55.4235375060375, -165.011970221672, -47.8027614863215, 2.23)
    pt3dadd(-55.7467800410085, -165.953950740687, -47.7122796352001, 2.23)
    pt3dadd(-56.085943669814, -166.887405724616, -47.6974424419288, 2.23)
    pt3dadd(-56.4604060648754, -167.801958686277, -47.8503175380085, 2.23)
    pt3dadd(-56.8348684599368, -168.716511647938, -48.0031926340882, 2.23)
    pt3dadd(-57.2093308549982, -169.6310646096, -48.1560677301679, 2.23)
    pt3dadd(-57.5837932500596, -170.545617571261, -48.3089428262476, 2.23)
    pt3dadd(-57.958255645121, -171.460170532922, -48.4618179223273, 2.23)
    pt3dadd(-58.3327180401824, -172.374723494584, -48.614693018407, 2.23)
    pt3dadd(-58.5788976580946, -173.257587845094, -48.90274194384, 2.23)
    pt3dadd(-58.5487349073714, -174.072189673863, -49.4819777067514, 2.23)
    pt3dadd(-58.5185721566481, -174.886791502631, -50.0612134696628, 2.23)
    pt3dadd(-58.4884094059249, -175.7013933314, -50.6404492325742, 2.23)
    pt3dadd(-58.4582466552017, -176.515995160169, -51.2196849954856, 2.23)
    pt3dadd(-58.4280839044785, -177.330596988937, -51.798920758397, 2.23)
    pt3dadd(-58.7656411718368, -178.0844218637, -52.0467850051841, 2.23)
    pt3dadd(-59.4822249990934, -178.7756010334, -51.9530888265688, 2.23)
    pt3dadd(-60.1975876355547, -179.466950629008, -51.8602255757571, 2.23)
    pt3dadd(-59.9927213851492, -180.286724746711, -52.3950154554189, 2.23)
    pt3dadd(-59.7878551347437, -181.106498864415, -52.9298053350808, 2.23)
    pt3dadd(-59.5829888843381, -181.926272982118, -53.4645952147426, 2.23)
    pt3dadd(-59.3781226339326, -182.746047099821, -53.9993850944044, 2.23)
    pt3dadd(-59.1732563835271, -183.565821217524, -54.5341749740663, 2.23)
    pt3dadd(-58.9683901331216, -184.385595335228, -55.0689648537281, 2.23)
    pt3dadd(-58.7635238827161, -185.205369452931, -55.6037547333899, 2.23)
    pt3dadd(-58.5586576323105, -186.025143570634, -56.1385446130518, 2.23)
    pt3dadd(-58.353791381905, -186.844917688337, -56.6733344927136, 2.23)
    pt3dadd(-58.1489251314995, -187.66469180604, -57.2081243723754, 2.23)
    pt3dadd(-57.9005937526637, -188.600332154446, -57.2805285538374, 2.23)
    pt3dadd(-57.6413225575597, -189.565135082634, -57.2365540481537, 2.23)
    pt3dadd(-57.3820513624557, -190.529938010821, -57.19257954247, 2.23)
    pt3dadd(-57.1227801673517, -191.494740939009, -57.1486050367863, 2.23)
    pt3dadd(-56.8635089722477, -192.459543867196, -57.1046305311026, 2.23)
    pt3dadd(-56.6042377771438, -193.424346795384, -57.0606560254189, 2.23)
    pt3dadd(-56.3449665820398, -194.389149723571, -57.0166815197351, 2.23)
    pt3dadd(-56.0856953869358, -195.353952651759, -56.9727070140514, 2.23)
    pt3dadd(-56.1505338801259, -196.335762641735, -56.8968655968824, 2.23)
    pt3dadd(-56.294891988296, -197.321745277744, -56.8132057015146, 2.23)
    pt3dadd(-56.4392500964661, -198.307727913754, -56.7295458061468, 2.23)
    pt3dadd(-56.5836082046361, -199.293710549764, -56.645885910779, 2.23)
    pt3dadd(-56.7279663128062, -200.279693185774, -56.5622260154112, 2.23)
    pt3dadd(-56.8723244209763, -201.265675821783, -56.4785661200435, 2.23)
    pt3dadd(-56.9881337271668, -202.157038105889, -56.7895655837267, 2.23)
    pt3dadd(-57.0874991025995, -202.993899661169, -57.3278863611999, 2.23)
    pt3dadd(-57.2677931109247, -203.833350568587, -57.7034073523521, 2.23)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(-57.2677931109247, -203.833350568587, -57.7034073523521, 2.23)
    pt3dadd(-57.1797393405952, -204.873399692359, -57.8360987963773, 2.23)
    pt3dadd(-57.1974996336559, -205.867950811767, -57.9388248538009, 2.23)
    pt3dadd(-57.2152599267166, -206.862501931175, -58.0415509112245, 2.23)
    pt3dadd(-57.2330202197773, -207.857053050584, -58.1442769686481, 2.23)
    pt3dadd(-57.250780512838, -208.851604169992, -58.2470030260717, 2.23)
    pt3dadd(-57.2685408058987, -209.846155289401, -58.3497290834954, 2.23)
    pt3dadd(-57.2863010989594, -210.840706408809, -58.452455140919, 2.23)
    pt3dadd(-57.3040613920201, -211.835257528218, -58.5551811983426, 2.23)
    pt3dadd(-57.3218216850808, -212.829808647626, -58.6579072557662, 2.23)
    pt3dadd(-57.3395819781415, -213.824359767035, -58.7606333131898, 2.23)
    pt3dadd(-57.4889759210714, -214.781128920305, -58.9639703030275, 2.23)
    pt3dadd(-57.7337684827449, -215.710516417088, -59.2402228732838, 2.23)
    pt3dadd(-57.9785610444184, -216.639903913871, -59.5164754435401, 2.23)
    pt3dadd(-58.2233536060919, -217.569291410653, -59.7927280137964, 2.23)
    pt3dadd(-58.4681461677655, -218.498678907436, -60.0689805840527, 2.23)
    pt3dadd(-58.712938729439, -219.428066404219, -60.345233154309, 2.23)
    pt3dadd(-58.9577312911125, -220.357453901002, -60.6214857245653, 2.23)
    pt3dadd(-59.2025238527861, -221.286841397784, -60.8977382948216, 2.23)
    pt3dadd(-59.409388413232, -222.188718131671, -61.2207303630963, 2.23)
    pt3dadd(-59.2741914932679, -222.842483391745, -61.9652522080092, 2.23)
    pt3dadd(-59.1389945733039, -223.49624865182, -62.709774052922, 2.23)
    pt3dadd(-59.0037976533399, -224.150013911894, -63.4542958978349, 2.23)
    pt3dadd(-58.8686007333758, -224.803779171968, -64.1988177427478, 2.23)
    pt3dadd(-58.7334038134118, -225.457544432042, -64.9433395876607, 2.23)
    pt3dadd(-58.5982068934478, -226.111309692116, -65.6878614325736, 2.23)
    pt3dadd(-58.583946359034, -226.819676769214, -66.2493543219278, 2.23)
    pt3dadd(-59.0021102664108, -227.72328004541, -66.1564023675834, 2.23)
    pt3dadd(-59.4143319887805, -228.627262836877, -66.0654190679906, 2.23)
    pt3dadd(-59.1299752526206, -229.575734677905, -66.2052132501889, 2.23)
    pt3dadd(-58.8456185164607, -230.524206518934, -66.3450074323872, 2.23)
    pt3dadd(-58.5612617803008, -231.472678359963, -66.4848016145855, 2.23)
    pt3dadd(-58.2769050441409, -232.421150200991, -66.6245957967838, 2.23)
    pt3dadd(-57.992548307981, -233.36962204202, -66.7643899789821, 2.23)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(-57.992548307981, -233.36962204202, -66.7643899789821, 2.23)
    pt3dadd(-57.7081915718211, -234.318093883048, -66.9041841611804, 2.23)
    pt3dadd(-57.4238348356612, -235.266565724077, -67.0439783433787, 2.23)
    pt3dadd(-57.1394780995013, -236.215037565105, -67.183772525577, 2.23)
    pt3dadd(-56.8551213633414, -237.163509406134, -67.3235667077753, 2.23)
    pt3dadd(-56.5707646271815, -238.111981247162, -67.4633608899736, 2.23)
    pt3dadd(-56.2384854404235, -239.050694093882, -67.466266775214, 2.23)
    pt3dadd(-55.8871547372932, -239.985527263382, -67.4147528718559, 2.23)
    pt3dadd(-55.5358240341629, -240.920360432883, -67.3632389684977, 2.23)
    pt3dadd(-55.1844933310326, -241.855193602384, -67.3117250651396, 2.23)
    pt3dadd(-54.8331626279023, -242.790026771885, -67.2602111617815, 2.23)
    pt3dadd(-54.481831924772, -243.724859941385, -67.2086972584234, 2.23)
    pt3dadd(-54.1305012216416, -244.659693110886, -67.1571833550653, 2.23)
    pt3dadd(-53.7791705185113, -245.594526280387, -67.1056694517071, 2.23)
    pt3dadd(-53.427839815381, -246.529359449887, -67.054155548349, 2.23)
    pt3dadd(-53.0765091122507, -247.464192619388, -67.0026416449909, 2.23)
    pt3dadd(-52.7251784091204, -248.399025788889, -66.9511277416328, 2.23)
    pt3dadd(-52.3738477059901, -249.33385895839, -66.8996138382747, 2.23)
    pt3dadd(-52.3157210804777, -250.328046497486, -66.8255994293361, 2.23)
    pt3dadd(-52.2665025332055, -251.324037331313, -66.7509014137241, 2.23)
    pt3dadd(-52.2172839859333, -252.320028165141, -66.676203398112, 2.23)
    pt3dadd(-52.168065438661, -253.316018998968, -66.6015053825, 2.23)
    pt3dadd(-52.1188468913888, -254.312009832795, -66.526807366888, 2.23)
    pt3dadd(-52.0696283441166, -255.308000666623, -66.452109351276, 2.23)
    pt3dadd(-52.0204097968444, -256.30399150045, -66.3774113356639, 2.23)
    pt3dadd(-52.0161914794071, -257.261688231538, -66.4438731713365, 2.23)
    pt3dadd(-52.1625955021417, -258.091209009071, -66.9828176413601, 2.23)
    pt3dadd(-52.3089995248764, -258.920729786603, -67.5217621113837, 2.23)
    pt3dadd(-52.4554035476111, -259.750250564136, -68.0607065814073, 2.23)
    pt3dadd(-52.6018075703457, -260.579771341668, -68.5996510514309, 2.23)
    pt3dadd(-52.7482115930804, -261.409292119201, -69.1385955214546, 2.23)
    pt3dadd(-52.8946156158151, -262.238812896733, -69.6775399914782, 2.23)
    pt3dadd(-53.0410196385497, -263.068333674265, -70.2164844615018, 2.23)
    pt3dadd(-53.1874236612844, -263.897854451798, -70.7554289315254, 2.23)
    pt3dadd(-53.333827684019, -264.72737522933, -71.294373401549, 2.23)
    pt3dadd(-53.4802317067537, -265.556896006863, -71.8333178715726, 2.23)
    pt3dadd(-53.631194675836, -266.45960455163, -72.0773416713398, 2.23)
    pt3dadd(-53.7872311722441, -267.443761770865, -71.9931562829664, 2.23)
    pt3dadd(-53.9432676686524, -268.4279189901, -71.908970894593, 2.23)
    pt3dadd(-54.0993041650605, -269.412076209336, -71.8247855062196, 2.23)
    pt3dadd(-54.2553406614687, -270.396233428571, -71.7406001178462, 2.23)
    pt3dadd(-54.4023762192074, -271.3364634444, -71.8170852705093, 2.23)
    pt3dadd(-54.5207847317123, -272.136985138124, -72.4045752210993, 2.23)
    pt3dadd(-54.6391932442171, -272.937506831848, -72.9920651716892, 2.23)
    pt3dadd(-54.757601756722, -273.738028525571, -73.5795551222792, 2.23)
    pt3dadd(-54.8760102692269, -274.538550219295, -74.1670450728691, 2.23)
    pt3dadd(-54.9944187817318, -275.339071913019, -74.7545350234591, 2.23)
    pt3dadd(-55.1128272942367, -276.139593606742, -75.3420249740491, 2.23)
    pt3dadd(-55.2312358067416, -276.940115300466, -75.929514924639, 2.23)
    pt3dadd(-55.3031083542878, -277.612659200011, -75.5386847054471, 2.23)
    pt3dadd(-55.3563899316744, -278.234076377358, -74.7570186864792, 2.23)
    pt3dadd(-55.409671509061, -278.855493554706, -73.9753526675113, 2.23)
    pt3dadd(-55.4629530864476, -279.476910732053, -73.1936866485434, 2.23)
    pt3dadd(-55.5162346638342, -280.0983279094, -72.4120206295756, 2.23)
    pt3dadd(-55.5695162412208, -280.719745086747, -71.6303546106077, 2.23)
    pt3dadd(-55.6227978186073, -281.341162264094, -70.8486885916398, 2.23)
    pt3dadd(-55.6760793959939, -281.962579441441, -70.067022572672, 2.23)
    pt3dadd(-56.1368498565344, -282.670712088416, -70.0637040926861, 2.23)
    pt3dadd(-56.7472685911548, -283.410690562118, -70.3462298913011, 2.23)
    pt3dadd(-57.3576873257752, -284.150669035819, -70.6287556899161, 2.23)
    pt3dadd(-57.9681060603956, -284.89064750952, -70.9112814885311, 2.23)
    pt3dadd(-58.578524795016, -285.630625983222, -71.1938072871462, 2.23)
    pt3dadd(-59.1889435296364, -286.370604456923, -71.4763330857612, 2.23)
    pt3dadd(-59.7993622642568, -287.110582930625, -71.7588588843762, 2.23)
    pt3dadd(-60.4097809988772, -287.850561404326, -72.0413846829912, 2.23)
    pt3dadd(-61.0201997334976, -288.590539878027, -72.3239104816062, 2.23)
    pt3dadd(-61.630618468118, -289.330518351729, -72.6064362802212, 2.23)
    pt3dadd(-62.2410372027384, -290.07049682543, -72.8889620788363, 2.23)
    pt3dadd(-62.8514559373588, -290.810475299131, -73.1714878774513, 2.23)
    pt3dadd(-63.4618746719792, -291.550453772833, -73.4540136760663, 2.23)
    pt3dadd(-64.0722934065996, -292.290432246534, -73.7365394746813, 2.23)
    pt3dadd(-64.68271214122, -293.030410720235, -74.0190652732963, 2.23)
    pt3dadd(-65.2931308758404, -293.770389193937, -74.3015910719113, 2.23)
    pt3dadd(-65.9035496104608, -294.510367667638, -74.5841168705263, 2.23)
    pt3dadd(-66.5139683450812, -295.250346141339, -74.8666426691414, 2.23)
    pt3dadd(-67.1243870797016, -295.990324615041, -75.1491684677564, 2.23)
    pt3dadd(-67.734805814322, -296.730303088742, -75.4316942663714, 2.23)
    pt3dadd(-68.3452245489424, -297.470281562443, -75.7142200649864, 2.23)
    pt3dadd(-68.9556432835628, -298.210260036145, -75.9967458636014, 2.23)
    pt3dadd(-69.5660620181832, -298.950238509846, -76.2792716622164, 2.23)
    pt3dadd(-70.1764807528036, -299.690216983547, -76.5617974608314, 2.23)
    pt3dadd(-70.786899487424, -300.430195457249, -76.8443232594465, 2.23)
    pt3dadd(-71.3973182220444, -301.17017393095, -77.1268490580615, 2.23)
    pt3dadd(-72.0077369566648, -301.910152404651, -77.4093748566765, 2.23)
    pt3dadd(-72.6181556912852, -302.650130878353, -77.6919006552915, 2.23)
    pt3dadd(-73.1746367575428, -303.337830705382, -77.9670463208222, 2.23)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(-57.2677931109247, -203.833350568587, -57.7034073523521, 2.23)
    pt3dadd(-58.0853450427188, -204.484006724483, -57.5796411564067, 2.23)
    pt3dadd(-58.7970829111229, -205.180160884742, -57.4858403470629, 2.23)
    pt3dadd(-59.5088207795269, -205.876315045001, -57.3920395377191, 2.23)
    pt3dadd(-60.2205586479309, -206.57246920526, -57.2982387283753, 2.23)
    pt3dadd(-60.932296516335, -207.26862336552, -57.2044379190315, 2.23)
    pt3dadd(-61.644034384739, -207.964777525779, -57.1106371096877, 2.23)
    pt3dadd(-62.3462798089829, -208.670436203661, -57.016649760178, 2.23)
    pt3dadd(-63.0451815453357, -209.37944282228, -56.9225967023974, 2.23)
    pt3dadd(-63.7440832816885, -210.088449440899, -56.8285436446167, 2.23)
    pt3dadd(-64.4429850180412, -210.797456059518, -56.734490586836, 2.23)
    pt3dadd(-65.141886754394, -211.506462678136, -56.6404375290553, 2.23)
    pt3dadd(-65.8407884907467, -212.215469296755, -56.5463844712747, 2.23)
    pt3dadd(-66.5396902270995, -212.924475915374, -56.452331413494, 2.23)
    pt3dadd(-67.2468311586359, -213.624039368935, -56.3585315820275, 2.23)
    pt3dadd(-68.0464872864594, -214.217568646904, -56.2675751450475, 2.23)
    pt3dadd(-68.8461434142829, -214.811097924873, -56.1766187080675, 2.23)
    pt3dadd(-69.7237197013232, -215.069263253737, -56.2422515329533, 2.23)
    pt3dadd(-70.6878447996156, -214.954927404169, -56.4818138595953, 2.23)
    pt3dadd(-71.6519698979081, -214.840591554601, -56.7213761862372, 2.23)
    pt3dadd(-72.6160949962005, -214.726255705033, -56.9609385128792, 2.23)
    pt3dadd(-73.580220094493, -214.611919855465, -57.2005008395212, 2.23)
    pt3dadd(-74.5443451927855, -214.497584005897, -57.4400631661631, 2.23)
    pt3dadd(-75.5084702910779, -214.383248156329, -57.6796254928051, 2.23)
    pt3dadd(-76.4873986775074, -214.378356645497, -57.7634977571564, 2.23)
    pt3dadd(-77.4804007363306, -214.477515245321, -57.6993535192711, 2.23)
    pt3dadd(-78.4734027951538, -214.576673845144, -57.6352092813858, 2.23)
    pt3dadd(-79.466404853977, -214.675832444968, -57.5710650435005, 2.23)
    pt3dadd(-80.4595381462191, -214.770300614105, -57.5072721972483, 2.23)
    pt3dadd(-81.4567760416763, -214.718065626071, -57.4544698688033, 2.23)
    pt3dadd(-82.4540139371334, -214.665830638037, -57.4016675403583, 2.23)
    pt3dadd(-83.4512518325906, -214.613595650002, -57.3488652119132, 2.23)
    pt3dadd(-84.4484897280478, -214.561360661968, -57.2960628834682, 2.23)
    pt3dadd(-85.4457276235049, -214.509125673934, -57.2432605550232, 2.23)
    pt3dadd(-86.4031314266923, -214.266377855748, -57.2073032143344, 2.23)
    pt3dadd(-87.3363643102862, -213.908028801617, -57.1815672398526, 2.23)
    pt3dadd(-88.2138097789133, -214.12345531177, -57.17589692392, 2.23)
    pt3dadd(-89.060463955502, -214.655571365165, -57.1813016426115, 2.23)
    pt3dadd(-89.9071181320906, -215.18768741856, -57.1867063613029, 2.23)
    pt3dadd(-90.7537723086793, -215.719803471955, -57.1921110799943, 2.23)
    pt3dadd(-91.600426485268, -216.25191952535, -57.1975157986858, 2.23)
    pt3dadd(-92.4470806618566, -216.784035578746, -57.2029205173772, 2.23)
    pt3dadd(-93.2937348384453, -217.316151632141, -57.2083252360686, 2.23)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(-12.2740458254578, -53.4137655569824, -10.7040829815755, 2.23)
    pt3dadd(-12.2540773456738, -54.1959344239081, -11.3238275265614, 2.23)
    pt3dadd(-12.2055205496836, -55.0033403979002, -11.9118222805559, 2.23)
    pt3dadd(-12.1569637536934, -55.8107463718923, -12.4998170345503, 2.23)
    pt3dadd(-12.1084069577032, -56.6181523458844, -13.0878117885448, 2.23)
    pt3dadd(-12.059850161713, -57.4255583198765, -13.6758065425393, 2.23)
    pt3dadd(-12.0112933657228, -58.2329642938686, -14.2638012965338, 2.23)
    pt3dadd(-12.1579393345441, -59.1818256190317, -14.2949892918782, 2.23)
    pt3dadd(-12.3455107987294, -60.1603439540438, -14.2094392254344, 2.23)
    pt3dadd(-12.5330822629146, -61.1388622890559, -14.1238891589907, 2.23)
    pt3dadd(-12.7206537270999, -62.117380624068, -14.0383390925469, 2.23)
    pt3dadd(-12.9082061180563, -63.0958460869852, -13.9534656209984, 2.23)
    pt3dadd(-13.0864096557647, -64.0483959873821, -14.2002290429275, 2.23)
    pt3dadd(-13.2646131934732, -65.0009458877789, -14.4469924648565, 2.23)
    pt3dadd(-13.4428167311816, -65.9534957881758, -14.6937558867855, 2.23)
    pt3dadd(-13.6210202688901, -66.9060456885727, -14.9405193087145, 2.23)
    pt3dadd(-13.7706361945347, -67.7931609082574, -15.3348204845926, 2.23)
    pt3dadd(-13.882830714384, -68.5946216236575, -15.9222497240642, 2.23)
    pt3dadd(-13.9950252342333, -69.3960823390576, -16.5096789635358, 2.23)
    pt3dadd(-14.1072197540826, -70.1975430544577, -17.0971082030074, 2.23)
    pt3dadd(-14.2194142739319, -70.9990037698578, -17.684537442479, 2.23)
    pt3dadd(-14.3316087937811, -71.8004644852578, -18.2719666819506, 2.23)
    pt3dadd(-14.4438033136304, -72.6019252006579, -18.8593959214222, 2.23)
    pt3dadd(-14.5559978334797, -73.403385916058, -19.4468251608938, 2.23)
    pt3dadd(-14.668192353329, -74.2048466314581, -20.0342544003654, 2.23)
    pt3dadd(-14.7803868731783, -75.0063073468581, -20.621683639837, 2.23)
    pt3dadd(-14.8925813930276, -75.8077680622582, -21.2091128793086, 2.23)
    pt3dadd(-14.6900034634291, -76.7764827765618, -21.1918748463964, 2.23)
    pt3dadd(-14.4744834252071, -77.7520742662162, -21.1497754587693, 2.23)
    pt3dadd(-14.2589633869852, -78.7276657558707, -21.1076760711422, 2.23)
    pt3dadd(-14.0434433487633, -79.7032572455252, -21.0655766835151, 2.23)
    pt3dadd(-13.8279233105413, -80.6788487351796, -21.023477295888, 2.23)
    pt3dadd(-13.8708076591464, -81.6138451703837, -21.1730355419359, 2.23)
    pt3dadd(-14.1633025666553, -82.5096280521551, -21.5077290701176, 2.23)
    pt3dadd(-14.4557974741642, -83.4054109339265, -21.8424225982993, 2.23)
    pt3dadd(-14.7482923816731, -84.3011938156979, -22.177116126481, 2.23)
    pt3dadd(-15.0407872891821, -85.1969766974693, -22.5118096546627, 2.23)
    pt3dadd(-15.333282196691, -86.0927595792406, -22.8465031828444, 2.23)
  }
}
proc shape3d_14() {
  adendIML[12] {
    pt3dadd(-15.6257771041999, -86.988542461012, -23.1811967110261, 2.23)
    pt3dadd(-15.9182720117088, -87.8843253427834, -23.5158902392078, 2.23)
    pt3dadd(-16.2107669192177, -88.7801082245548, -23.8505837673895, 2.23)
    pt3dadd(-16.4362928698143, -89.6337527729023, -24.3015664332337, 2.23)
    pt3dadd(-16.6041248724482, -90.4510950264572, -24.8527325238504, 2.23)
    pt3dadd(-16.7719568750822, -91.2684372800121, -25.4038986144672, 2.23)
    pt3dadd(-16.9397888777161, -92.0857795335669, -25.9550647050839, 2.23)
    pt3dadd(-17.1076208803501, -92.9031217871217, -26.5062307957007, 2.23)
    pt3dadd(-17.275452882984, -93.7204640406766, -27.0573968863174, 2.23)
    pt3dadd(-17.443284885618, -94.5378062942314, -27.6085629769342, 2.23)
    pt3dadd(-17.6111168882519, -95.3551485477863, -28.1597290675509, 2.23)
    pt3dadd(-17.7789488908859, -96.1724908013412, -28.7108951581677, 2.23)
    pt3dadd(-17.9467808935198, -96.989833054896, -29.2620612487844, 2.23)
    pt3dadd(-18.046887478928, -97.8065378366105, -29.8252086336072, 2.23)
    pt3dadd(-18.0634305959853, -98.6224560693431, -30.4031392200729, 2.23)
    pt3dadd(-18.0799737130427, -99.4383743020757, -30.9810698065385, 2.23)
    pt3dadd(-18.0965168301, -100.254292534808, -31.5590003930042, 2.23)
    pt3dadd(-18.1130599471573, -101.070210767541, -32.1369309794698, 2.23)
    pt3dadd(-18.1296030642146, -101.886129000273, -32.7148615659355, 2.23)
    pt3dadd(-18.1461461812719, -102.702047233006, -33.2927921524011, 2.23)
    pt3dadd(-18.1626892983293, -103.517965465739, -33.8707227388668, 2.23)
    pt3dadd(-18.1080863267519, -104.377009393844, -34.1926332385198, 2.23)
    pt3dadd(-17.9008827701466, -105.328553225595, -33.9654086307299, 2.23)
    pt3dadd(-17.6936792135412, -106.280097057347, -33.7381840229399, 2.23)
    pt3dadd(-17.4864756569358, -107.231640889099, -33.5109594151499, 2.23)
    pt3dadd(-17.2792721003304, -108.183184720851, -33.2837348073599, 2.23)
    pt3dadd(-17.2759031663367, -108.910749330175, -33.8192112712912, 2.23)
    pt3dadd(-17.3281984751064, -109.577148502287, -34.5629702000374, 2.23)
    pt3dadd(-17.3804937838761, -110.243547674398, -35.3067291287835, 2.23)
    pt3dadd(-17.4327890926457, -110.90994684651, -36.0504880575296, 2.23)
    pt3dadd(-17.4850844014154, -111.576346018622, -36.7942469862757, 2.23)
    pt3dadd(-17.5373797101851, -112.242745190733, -37.5380059150218, 2.23)
    pt3dadd(-17.5896750189547, -112.909144362845, -38.2817648437679, 2.23)
    pt3dadd(-17.6419703277244, -113.575543534957, -39.025523772514, 2.23)
    pt3dadd(-17.6942656364941, -114.241942707068, -39.7692827012601, 2.23)
    pt3dadd(-17.7465609452637, -114.90834187918, -40.5130416300062, 2.23)
    pt3dadd(-17.7715262748469, -115.78610255228, -40.6946037485044, 2.23)
    pt3dadd(-17.7816770325922, -116.778434484978, -40.5714197500874, 2.23)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(-17.7816770325922, -116.778434484978, -40.5714197500874, 2.23)
    pt3dadd(-17.7918277903376, -117.770766417675, -40.4482357516704, 2.23)
    pt3dadd(-17.8019785480829, -118.763098350373, -40.3250517532533, 2.23)
    pt3dadd(-17.6491144201802, -119.748912544695, -40.2578811708175, 2.23)
    pt3dadd(-17.4946557162855, -120.734662983925, -40.1912584993776, 2.23)
    pt3dadd(-17.3401970123908, -121.720413423154, -40.1246358279377, 2.23)
    pt3dadd(-17.1857383084962, -122.706163862384, -40.0580131564978, 2.23)
    pt3dadd(-17.0312796046015, -123.691914301614, -39.9913904850579, 2.23)
    pt3dadd(-16.8768209007068, -124.677664740843, -39.924767813618, 2.23)
    pt3dadd(-16.7755809676185, -125.642101039293, -39.9530121264725, 2.23)
    pt3dadd(-16.9291034623563, -126.504504874953, -40.4353921300465, 2.23)
    pt3dadd(-17.0826259570941, -127.366908710614, -40.9177721336206, 2.23)
    pt3dadd(-17.2361484518319, -128.229312546274, -41.4001521371947, 2.23)
    pt3dadd(-17.3896709465697, -129.091716381934, -41.8825321407687, 2.23)
    pt3dadd(-17.5431934413075, -129.954120217594, -42.3649121443428, 2.23)
    pt3dadd(-17.6967159360453, -130.816524053254, -42.8472921479168, 2.23)
    pt3dadd(-17.8502384307831, -131.678927888914, -43.3296721514909, 2.23)
    pt3dadd(-18.0037609255209, -132.541331724575, -43.812052155065, 2.23)
    pt3dadd(-18.0185078990105, -133.322194730857, -44.4324082207632, 2.23)
    pt3dadd(-18.0172179547436, -134.093634868015, -45.0687088186149, 2.23)
    pt3dadd(-18.0159280104767, -134.865075005172, -45.7050094164666, 2.23)
    pt3dadd(-18.0146380662098, -135.636515142329, -46.3413100143183, 2.23)
    pt3dadd(-18.0133481219429, -136.407955279487, -46.9776106121699, 2.23)
    pt3dadd(-18.0120581776761, -137.179395416644, -47.6139112100216, 2.23)
    pt3dadd(-18.0107682334092, -137.950835553802, -48.2502118078733, 2.23)
    pt3dadd(-18.0094782891423, -138.722275690959, -48.8865124057249, 2.23)
    pt3dadd(-18.0081883448754, -139.493715828116, -49.5228130035766, 2.23)
    pt3dadd(-18.0068984006085, -140.265155965274, -50.1591136014283, 2.23)
    pt3dadd(-17.9199893331877, -141.220456996092, -50.3984243370852, 2.23)
    pt3dadd(-17.8233536448229, -142.196645244079, -50.5926356864607, 2.23)
    pt3dadd(-17.726717956458, -143.172833492067, -50.7868470358361, 2.23)
    pt3dadd(-17.6300822680932, -144.149021740054, -50.9810583852116, 2.23)
    pt3dadd(-17.5334465797283, -145.125209988041, -51.1752697345871, 2.23)
    pt3dadd(-17.4368108913635, -146.101398236028, -51.3694810839625, 2.23)
    pt3dadd(-17.3401752029987, -147.077586484015, -51.563692433338, 2.23)
    pt3dadd(-17.2985844479521, -147.767319066738, -52.2323321753038, 2.23)
    pt3dadd(-17.2703854026537, -148.387360746162, -53.0163941177679, 2.23)
    pt3dadd(-17.2421863573553, -149.007402425587, -53.800456060232, 2.23)
    pt3dadd(-17.2139873120569, -149.627444105011, -54.5845180026961, 2.23)
    pt3dadd(-17.1857882667585, -150.247485784436, -55.3685799451603, 2.23)
    pt3dadd(-17.1575892214601, -150.86752746386, -56.1526418876244, 2.23)
    pt3dadd(-17.1293901761617, -151.487569143285, -56.9367038300885, 2.23)
    pt3dadd(-17.1011911308633, -152.10761082271, -57.7207657725526, 2.23)
    pt3dadd(-17.0729920855649, -152.727652502134, -58.5048277150168, 2.23)
    pt3dadd(-17.0447930402665, -153.347694181559, -59.2888896574809, 2.23)
    pt3dadd(-17.0165939949681, -153.967735860983, -60.072951599945, 2.23)
    pt3dadd(-16.9883949496697, -154.587777540408, -60.8570135424091, 2.23)
    pt3dadd(-16.9601959043713, -155.207819219832, -61.6410754848733, 2.23)
    pt3dadd(-16.8969520200292, -155.841880948511, -62.4094611431073, 2.23)
    pt3dadd(-16.7592438808489, -156.50573287024, -63.1445373938598, 2.23)
    pt3dadd(-16.6215357416685, -157.169584791969, -63.8796136446124, 2.23)
    pt3dadd(-16.4838276024882, -157.833436713698, -64.6146898953649, 2.23)
    pt3dadd(-16.3461194633079, -158.497288635427, -65.3497661461175, 2.23)
    pt3dadd(-16.2084113241276, -159.161140557155, -66.08484239687, 2.23)
    pt3dadd(-16.0707031849473, -159.824992478884, -66.8199186476226, 2.23)
    pt3dadd(-15.9329950457669, -160.488844400613, -67.5549948983752, 2.23)
    pt3dadd(-15.7952869065866, -161.152696322342, -68.2900711491277, 2.23)
    pt3dadd(-15.6886380717802, -161.829169631893, -69.011812994431, 2.23)
    pt3dadd(-15.8229315494204, -162.603553259443, -69.6301132930283, 2.23)
    pt3dadd(-15.9572250270607, -163.377936886993, -70.2484135916256, 2.23)
    pt3dadd(-16.0915185047009, -164.152320514543, -70.8667138902229, 2.23)
    pt3dadd(-16.2258119823411, -164.926704142093, -71.4850141888201, 2.23)
    pt3dadd(-16.3601054599814, -165.701087769644, -72.1033144874174, 2.23)
    pt3dadd(-16.4943989376216, -166.475471397194, -72.7216147860147, 2.23)
    pt3dadd(-16.6286924152618, -167.249855024744, -73.339915084612, 2.23)
    pt3dadd(-16.762985892902, -168.024238652294, -73.9582153832093, 2.23)
    pt3dadd(-16.8972793705423, -168.798622279845, -74.5765156818066, 2.23)
    pt3dadd(-17.0315728481825, -169.573005907395, -75.1948159804039, 2.23)
    pt3dadd(-17.0781635261908, -170.442674909434, -75.683473458805, 2.23)
    pt3dadd(-17.1176524752933, -171.32005963892, -76.161633117667, 2.23)
    pt3dadd(-17.1571414243958, -172.197444368407, -76.6397927765289, 2.23)
    pt3dadd(-17.1966303734983, -173.074829097893, -77.1179524353908, 2.23)
    pt3dadd(-17.2361193226008, -173.952213827379, -77.5961120942528, 2.23)
    pt3dadd(-17.2756082717033, -174.829598556866, -78.0742717531147, 2.23)
    pt3dadd(-17.3150972208058, -175.706983286352, -78.5524314119766, 2.23)
    pt3dadd(-17.3545861699082, -176.584368015838, -79.0305910708386, 2.23)
    pt3dadd(-17.3940751190107, -177.461752745325, -79.5087507297005, 2.23)
    pt3dadd(-17.4335640681132, -178.339137474811, -79.9869103885624, 2.23)
    pt3dadd(-17.5694578532307, -179.272715216348, -80.1389779597794, 2.23)
    pt3dadd(-17.7758294170598, -180.247373455837, -80.0526524488373, 2.23)
    pt3dadd(-17.982200980889, -181.222031695325, -79.9663269378951, 2.23)
    pt3dadd(-18.1885725447181, -182.196689934814, -79.8800014269529, 2.23)
    pt3dadd(-18.3949441085472, -183.171348174303, -79.7936759160108, 2.23)
    pt3dadd(-18.6013156723764, -184.146006413792, -79.7073504050686, 2.23)
    pt3dadd(-18.8064692474033, -185.120386216224, -79.625600230621, 2.23)
    pt3dadd(-18.9134613082582, -186.07232590832, -79.9125906860825, 2.23)
    pt3dadd(-19.0204533691131, -187.024265600416, -80.199581141544, 2.23)
    pt3dadd(-19.1274454299681, -187.976205292512, -80.4865715970056, 2.23)
    pt3dadd(-19.234437490823, -188.928144984608, -80.7735620524671, 2.23)
    pt3dadd(-19.3414295516779, -189.880084676704, -81.0605525079287, 2.23)
    pt3dadd(-19.4484216125328, -190.8320243688, -81.3475429633902, 2.23)
    pt3dadd(-19.5554136733878, -191.783964060896, -81.6345334188517, 2.23)
    pt3dadd(-19.6624057342427, -192.735903752992, -81.9215238743133, 2.23)
    pt3dadd(-19.7693977950976, -193.687843445088, -82.2085143297748, 2.23)
    pt3dadd(-19.8763898559526, -194.639783137184, -82.4955047852363, 2.23)
    pt3dadd(-19.9833819168075, -195.59172282928, -82.7824952406979, 2.23)
    pt3dadd(-20.0903739776624, -196.543662521377, -83.0694856961594, 2.23)
    pt3dadd(-20.1973660385173, -197.495602213473, -83.3564761516209, 2.23)
    pt3dadd(-20.3442632074227, -198.412976778141, -83.7039626728997, 2.23)
    pt3dadd(-20.59080491086, -199.244040937906, -84.2025101137922, 2.23)
    pt3dadd(-20.8373466142973, -200.075105097671, -84.7010575546846, 2.23)
    pt3dadd(-21.0838883177346, -200.906169257436, -85.199604995577, 2.23)
    pt3dadd(-21.3304300211719, -201.737233417201, -85.6981524364694, 2.23)
    pt3dadd(-21.5769717246092, -202.568297576966, -86.1966998773618, 2.23)
    pt3dadd(-21.8235134280466, -203.399361736731, -86.6952473182542, 2.23)
    pt3dadd(-21.6927983844846, -204.347644487154, -86.9298665709272, 2.23)
    pt3dadd(-21.5142375020521, -205.310793563615, -87.1310129548779, 2.23)
    pt3dadd(-21.3356766196197, -206.273942640077, -87.3321593388286, 2.23)
    pt3dadd(-21.1571157371872, -207.237091716538, -87.5333057227793, 2.23)
    pt3dadd(-20.9785548547548, -208.200240792999, -87.73445210673, 2.23)
    pt3dadd(-20.7999939723224, -209.163389869461, -87.9355984906807, 2.23)
    pt3dadd(-20.6214330898899, -210.126538945922, -88.1367448746314, 2.23)
    pt3dadd(-20.4157749949547, -211.090868756016, -88.3008432025247, 2.23)
    pt3dadd(-20.1992623402092, -212.055671542577, -88.4501008769638, 2.23)
    pt3dadd(-19.9827496854637, -213.020474329139, -88.5993585514029, 2.23)
    pt3dadd(-19.7662370307182, -213.9852771157, -88.748616225842, 2.23)
    pt3dadd(-19.5497243759727, -214.950079902261, -88.897873900281, 2.23)
    pt3dadd(-19.3332117212272, -215.914882688822, -89.0471315747201, 2.23)
    pt3dadd(-19.1166990664817, -216.879685475383, -89.1963892491592, 2.23)
    pt3dadd(-18.9001864117362, -217.844488261944, -89.3456469235983, 2.23)
    pt3dadd(-18.6836737569907, -218.809291048505, -89.4949045980374, 2.23)
    pt3dadd(-18.4671611022452, -219.774093835066, -89.6441622724764, 2.23)
    pt3dadd(-18.2506484474997, -220.738896621627, -89.7934199469155, 2.23)
    pt3dadd(-17.9546315517062, -221.56893931225, -90.2434087077843, 2.23)
    pt3dadd(-17.6441464527406, -222.374458324365, -90.748124592657, 2.23)
    pt3dadd(-17.3336613537749, -223.179977336479, -91.2528404775298, 2.23)
    pt3dadd(-17.0231762548093, -223.985496348593, -91.7575563624025, 2.23)
    pt3dadd(-16.7126911558436, -224.791015360707, -92.2622722472752, 2.23)
    pt3dadd(-16.4022060568779, -225.596534372821, -92.7669881321479, 2.23)
    pt3dadd(-16.0917209579123, -226.402053384936, -93.2717040170206, 2.23)
    pt3dadd(-15.7812358589466, -227.20757239705, -93.7764199018933, 2.23)
    pt3dadd(-15.470750759981, -228.013091409164, -94.2811357867661, 2.23)
    pt3dadd(-15.1602656610153, -228.818610421278, -94.7858516716388, 2.23)
    pt3dadd(-14.8451873429632, -229.73136198037, -94.866820120013, 2.23)
    pt3dadd(-14.5286414020402, -230.678376424705, -94.8123930173353, 2.23)
    pt3dadd(-14.2120954611172, -231.62539086904, -94.7579659146576, 2.23)
    pt3dadd(-13.8955495201942, -232.572405313376, -94.70353881198, 2.23)
    pt3dadd(-13.5790035792712, -233.519419757711, -94.6491117093023, 2.23)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(-13.5790035792712, -233.519419757711, -94.6491117093023, 2.23)
    pt3dadd(-13.3580792900719, -234.487987815732, -94.587589291316, 2.23)
    pt3dadd(-13.2290636759192, -235.477272563339, -94.5192470682195, 2.23)
    pt3dadd(-13.1000480617665, -236.466557310945, -94.4509048451231, 2.23)
    pt3dadd(-12.9710324476139, -237.455842058552, -94.3825626220267, 2.23)
    pt3dadd(-12.836825903393, -238.444458851814, -94.3145671597562, 2.23)
    pt3dadd(-12.7022313099428, -239.433025711989, -94.2465976196749, 2.23)
    pt3dadd(-12.5676367164925, -240.421592572163, -94.1786280795935, 2.23)
    pt3dadd(-12.4330421230422, -241.410159432338, -94.1106585395122, 2.23)
    pt3dadd(-12.5728946087316, -242.392636112074, -94.0275235088152, 2.23)
    pt3dadd(-12.7427718397161, -243.374446520859, -93.942729360468, 2.23)
    pt3dadd(-12.9126490707006, -244.356256929645, -93.8579352121209, 2.23)
    pt3dadd(-13.0825263016852, -245.33806733843, -93.7731410637738, 2.23)
    pt3dadd(-13.2524035326697, -246.319877747215, -93.6883469154266, 2.23)
    pt3dadd(-13.4222807636542, -247.301688156, -93.6035527670795, 2.23)
    pt3dadd(-13.5921579946387, -248.283498564786, -93.5187586187324, 2.23)
    pt3dadd(-13.8204380098725, -249.251142569924, -93.5708650313545, 2.23)
    pt3dadd(-14.0718097720894, -250.213185352229, -93.6771002523267, 2.23)
    pt3dadd(-14.3231815343063, -251.175228134534, -93.783335473299, 2.23)
    pt3dadd(-14.5745532965232, -252.137270916839, -93.8895706942712, 2.23)
    pt3dadd(-14.82592505874, -253.099313699144, -93.9958059152435, 2.23)
    pt3dadd(-15.0772968209569, -254.061356481448, -94.1020411362157, 2.23)
    pt3dadd(-15.3286685831738, -255.023399263753, -94.208276357188, 2.23)
    pt3dadd(-15.5800403453907, -255.985442046058, -94.3145115781603, 2.23)
    pt3dadd(-15.8314121076076, -256.947484828363, -94.4207467991325, 2.23)
    pt3dadd(-16.0827838698245, -257.909527610668, -94.5269820201047, 2.23)
    pt3dadd(-16.3341556320413, -258.871570392973, -94.633217241077, 2.23)
    pt3dadd(-16.5855273942582, -259.833613175278, -94.7394524620492, 2.23)
    pt3dadd(-16.8368991564751, -260.795655957583, -94.8456876830215, 2.23)
    pt3dadd(-17.0545254112141, -261.643975339168, -94.8312427600212, 2.23)
    pt3dadd(-16.997826584232, -261.567810736725, -93.8357608684966, 2.23)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(3.74962123352953, -19.5938143542057, 1.04837054997439, 2.23)
    pt3dadd(4.22209492070144, -20.4809136335033, 0.722360821319282, 2.23)
    pt3dadd(4.58195761860378, -21.3647895933838, 0.423593142003333, 2.23)
    pt3dadd(4.94182031650611, -22.2486655532643, 0.124825462687386, 2.23)
    pt3dadd(5.30168301440845, -23.1325415131447, -0.173942216628563, 2.23)
    pt3dadd(5.66154571231079, -24.0164174730252, -0.472709895944512, 2.23)
    pt3dadd(6.02140841021313, -24.9002934329056, -0.771477575260459, 2.23)
    pt3dadd(6.38127110811546, -25.7841693927861, -1.07024525457641, 2.23)
    pt3dadd(6.54993525577707, -26.5863354194249, -1.59682256257353, 2.23)
    pt3dadd(6.61650207972476, -27.3448694964786, -2.24504699276549, 2.23)
    pt3dadd(6.68306890367246, -28.1034035735324, -2.89327142295745, 2.23)
    pt3dadd(6.74963572762015, -28.8619376505862, -3.54149585314941, 2.23)
    pt3dadd(6.81620255156785, -29.62047172764, -4.18972028334136, 2.23)
    pt3dadd(6.88276937551554, -30.3790058046938, -4.83794471353332, 2.23)
    pt3dadd(6.94933619946324, -31.1375398817475, -5.48616914372528, 2.23)
    pt3dadd(7.08124303276983, -32.0722326199071, -5.5812501185464, 2.23)
    pt3dadd(7.23227876998625, -33.0584974673184, -5.51439313054876, 2.23)
    pt3dadd(7.38331450720267, -34.0447623147298, -5.44753614255113, 2.23)
    pt3dadd(7.53435024441909, -35.0310271621412, -5.3806791545535, 2.23)
    pt3dadd(7.68538598163552, -36.0172920095525, -5.31382216655587, 2.23)
    pt3dadd(7.76256246651977, -36.6495273373253, -5.68749905270223, 2.23)
    pt3dadd(7.73636309725468, -36.7862512317826, -6.67776172984126, 2.23)
    pt3dadd(7.71016372798958, -36.9229751262398, -7.66802440698028, 2.23)
    pt3dadd(7.68396435872449, -37.0596990206971, -8.65828708411931, 2.23)
    pt3dadd(7.6577649894594, -37.1964229151544, -9.64854976125833, 2.23)
    pt3dadd(7.6315656201943, -37.3331468096116, -10.6388124383974, 2.23)
    pt3dadd(7.60536625092921, -37.4698707040689, -11.6290751155364, 2.23)
    pt3dadd(7.57916688166412, -37.6065945985262, -12.6193377926754, 2.23)
    pt3dadd(7.55296751239902, -37.7433184929834, -13.6096004698144, 2.23)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(7.55296751239902, -37.7433184929834, -13.6096004698144, 2.23)
    pt3dadd(8.09239854274866, -38.4602460439697, -13.6987165408583, 2.23)
    pt3dadd(8.70388423740381, -39.2510847208934, -13.6730371266586, 2.23)
    pt3dadd(9.31536993205896, -40.0419233978171, -13.647357712459, 2.23)
    pt3dadd(9.92685562671411, -40.8327620747409, -13.6216782982593, 2.23)
    pt3dadd(10.5383413213693, -41.6236007516646, -13.5959988840597, 2.23)
    pt3dadd(11.1498270160244, -42.4144394285883, -13.57031946986, 2.23)
    pt3dadd(11.5378666893836, -43.3319156486142, -13.5222243536612, 2.23)
    pt3dadd(11.9079229547162, -44.2595839257458, -13.472325174392, 2.23)
    pt3dadd(12.2779792200487, -45.1872522028775, -13.4224259951227, 2.23)
    pt3dadd(12.956207163012, -45.9199625473046, -13.4049953784094, 2.23)
    pt3dadd(13.640961657845, -46.64854401438, -13.3882523906154, 2.23)
    pt3dadd(14.325716152678, -47.3771254814553, -13.3715094028213, 2.23)
  }
}
proc shape3d_15() {
  adendIML[14] {
    pt3dadd(15.0104706475111, -48.1057069485307, -13.3547664150273, 2.23)
    pt3dadd(15.6952251423441, -48.8342884156061, -13.3380234272333, 2.23)
    pt3dadd(15.7437964234894, -49.5962334049012, -13.9806194689288, 2.23)
    pt3dadd(15.7892260384193, -50.3583431534171, -14.6264715273016, 2.23)
    pt3dadd(15.8346556533491, -51.120452901933, -15.2723235856743, 2.23)
    pt3dadd(15.8800852682789, -51.882562650449, -15.9181756440471, 2.23)
    pt3dadd(15.9255148832087, -52.6446723989649, -16.5640277024198, 2.23)
    pt3dadd(15.9709444981385, -53.4067821474808, -17.2098797607926, 2.23)
    pt3dadd(16.0163741130683, -54.1688918959968, -17.8557318191653, 2.23)
    pt3dadd(16.0618037279982, -54.9310016445127, -18.5015838775381, 2.23)
    pt3dadd(16.1118608866313, -55.741995415538, -19.0492640983054, 2.23)
    pt3dadd(16.1772153687205, -56.7145856515762, -19.2724165673349, 2.23)
    pt3dadd(16.2425698508097, -57.6871758876144, -19.4955690363643, 2.23)
    pt3dadd(16.3079243328989, -58.6597661236527, -19.7187215053938, 2.23)
    pt3dadd(16.3732788149881, -59.6323563596909, -19.9418739744233, 2.23)
    pt3dadd(16.4386332970773, -60.6049465957291, -20.1650264434528, 2.23)
    pt3dadd(16.5294414155255, -61.4171703902788, -20.6651876653406, 2.23)
    pt3dadd(16.6404657536939, -62.1020252238215, -21.3853594874132, 2.23)
    pt3dadd(16.7514900918623, -62.7868800573642, -22.1055313094859, 2.23)
    pt3dadd(16.8625144300307, -63.471734890907, -22.8257031315586, 2.23)
    pt3dadd(16.9735387681991, -64.1565897244497, -23.5458749536312, 2.23)
    pt3dadd(17.0845631063675, -64.8414445579924, -24.2660467757039, 2.23)
    pt3dadd(17.0957002537134, -65.5780020139744, -24.8140001412891, 2.23)
    pt3dadd(16.7359329669875, -66.5065433645677, -24.7224662151182, 2.23)
    pt3dadd(16.3761656802615, -67.435084715161, -24.6309322889473, 2.23)
    pt3dadd(16.2617400505816, -68.326376467055, -24.6657880440968, 2.23)
    pt3dadd(16.7524588090686, -69.1257906883018, -25.0123886830711, 2.23)
    pt3dadd(17.2431775675556, -69.9252049095485, -25.3589893220453, 2.23)
    pt3dadd(17.7338963260426, -70.7246191307953, -25.7055899610196, 2.23)
    pt3dadd(18.2246150845297, -71.5240333520421, -26.0521905999939, 2.23)
    pt3dadd(18.7153338430167, -72.3234475732888, -26.3987912389682, 2.23)
    pt3dadd(19.2060526015037, -73.1228617945356, -26.7453918779425, 2.23)
    pt3dadd(19.6967713599907, -73.9222760157824, -27.0919925169168, 2.23)
    pt3dadd(19.9688028541951, -74.5606950240115, -27.7630267245474, 2.23)
    pt3dadd(20.1575953114624, -75.1378343480896, -28.5575502350124, 2.23)
    pt3dadd(20.3463877687297, -75.7149736721677, -29.3520737454774, 2.23)
    pt3dadd(20.5351802259969, -76.2921129962458, -30.1465972559424, 2.23)
    pt3dadd(20.7239726832642, -76.869252320324, -30.9411207664074, 2.23)
    pt3dadd(20.9127651405314, -77.4463916444021, -31.7356442768724, 2.23)
    pt3dadd(21.1015575977987, -78.0235309684802, -32.5301677873374, 2.23)
    pt3dadd(21.290350055066, -78.6006702925584, -33.3246912978024, 2.23)
    pt3dadd(21.4791425123332, -79.1778096166365, -34.1192148082674, 2.23)
    pt3dadd(21.6679349696005, -79.7549489407146, -34.9137383187324, 2.23)
    pt3dadd(21.8567274268677, -80.3320882647928, -35.7082618291974, 2.23)
    pt3dadd(22.0536203218743, -80.9280396008498, -36.4585904051058, 2.23)
    pt3dadd(22.3975965751452, -81.8655692548484, -36.4064513117214, 2.23)
    pt3dadd(22.7415728284161, -82.803098908847, -36.354312218337, 2.23)
    pt3dadd(23.0855490816871, -83.7406285628456, -36.3021731249526, 2.23)
    pt3dadd(23.429525334958, -84.6781582168442, -36.2500340315683, 2.23)
    pt3dadd(23.7735015882289, -85.6156878708428, -36.1978949381839, 2.23)
    pt3dadd(24.1174778414999, -86.5532175248414, -36.1457558447995, 2.23)
    pt3dadd(24.4614540947708, -87.49074717884, -36.0936167514151, 2.23)
    pt3dadd(24.8054303480417, -88.4282768328386, -36.0414776580308, 2.23)
    pt3dadd(25.0941542302353, -89.204653563956, -36.242591369115, 2.23)
    pt3dadd(25.2207087528292, -89.5080358191495, -37.1870187935605, 2.23)
    pt3dadd(25.3472632754231, -89.8114180743431, -38.1314462180059, 2.23)
    pt3dadd(25.473817798017, -90.1148003295366, -39.0758736424514, 2.23)
    pt3dadd(25.6003723206108, -90.4181825847302, -40.0203010668969, 2.23)
    pt3dadd(25.7269268432047, -90.7215648399237, -40.9647284913424, 2.23)
    pt3dadd(26.0058931033775, -91.1561266860783, -41.6977792507446, 2.23)
    pt3dadd(26.6357646987376, -91.8927100108089, -41.944166707989, 2.23)
    pt3dadd(27.2656362940976, -92.6292933355395, -42.1905541652334, 2.23)
    pt3dadd(27.8955078894576, -93.3658766602702, -42.4369416224778, 2.23)
    pt3dadd(28.5253794848177, -94.1024599850008, -42.6833290797222, 2.23)
    pt3dadd(29.1552510801777, -94.8390433097314, -42.9297165369667, 2.23)
    pt3dadd(29.611026307658, -95.3629552134884, -43.4576688815417, 2.23)
    pt3dadd(29.797981656523, -95.5584840138677, -44.4203818116267, 2.23)
    pt3dadd(29.9849370053879, -95.754012814247, -45.3830947417118, 2.23)
    pt3dadd(30.1718923542529, -95.9495416146264, -46.3458076717969, 2.23)
    pt3dadd(30.3588477031178, -96.1450704150057, -47.308520601882, 2.23)
    pt3dadd(30.5458030519827, -96.3405992153851, -48.2712335319671, 2.23)
    pt3dadd(30.7327584008477, -96.5361280157644, -49.2339464620521, 2.23)
    pt3dadd(30.9197137497126, -96.7316568161437, -50.1966593921372, 2.23)
    pt3dadd(31.1066690985776, -96.9271856165231, -51.1593723222223, 2.23)
    pt3dadd(31.2936244474425, -97.1227144169024, -52.1220852523074, 2.23)
    pt3dadd(31.4805797963075, -97.3182432172817, -53.0847981823925, 2.23)
    pt3dadd(31.6675351451724, -97.5137720176611, -54.0475111124776, 2.23)
    pt3dadd(31.8249096117505, -98.3584395933154, -54.1650311802388, 2.23)
    pt3dadd(31.9758307968214, -99.3447214458355, -54.098166366725, 2.23)
    pt3dadd(32.1267519818923, -100.331003298356, -54.0313015532112, 2.23)
    pt3dadd(32.2776731669633, -101.317285150876, -53.9644367396974, 2.23)
    pt3dadd(32.4285943520342, -102.303567003396, -53.8975719261836, 2.23)
    pt3dadd(32.9298265053482, -103.122393551471, -53.8236838088783, 2.23)
    pt3dadd(33.6002344918072, -103.860350834201, -53.7464039243201, 2.23)
    pt3dadd(34.2706424782662, -104.598308116932, -53.669124039762, 2.23)
    pt3dadd(34.9410504647252, -105.336265399662, -53.5918441552039, 2.23)
    pt3dadd(35.6114584511842, -106.074222682392, -53.5145642706457, 2.23)
    pt3dadd(36.2818664376432, -106.812179965123, -53.4372843860876, 2.23)
    pt3dadd(36.9522744241022, -107.550137247853, -53.3600045015295, 2.23)
    pt3dadd(37.6226824105612, -108.288094530583, -53.2827246169714, 2.23)
    pt3dadd(38.2930903970201, -109.026051813313, -53.2054447324132, 2.23)
    pt3dadd(38.9634983834791, -109.764009096044, -53.1281648478551, 2.23)
    pt3dadd(39.6548941622019, -110.47454312961, -53.0196497982954, 2.23)
    pt3dadd(40.3979594116133, -111.117564356156, -52.8342374542409, 2.23)
    pt3dadd(41.1410246610247, -111.760585582703, -52.6488251101865, 2.23)
    pt3dadd(41.8840899104361, -112.40360680925, -52.4634127661321, 2.23)
    pt3dadd(42.6271551598474, -113.046628035796, -52.2780004220777, 2.23)
    pt3dadd(43.3702204092588, -113.689649262343, -52.0925880780232, 2.23)
    pt3dadd(44.1132856586702, -114.332670488889, -51.9071757339688, 2.23)
    pt3dadd(44.8563509080816, -114.975691715436, -51.7217633899144, 2.23)
    pt3dadd(45.599416157493, -115.618712941982, -51.5363510458599, 2.23)
    pt3dadd(46.3424814069043, -116.261734168529, -51.3509387018055, 2.23)
    pt3dadd(47.0855466563157, -116.904755395076, -51.1655263577511, 2.23)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(47.0855466563157, -116.904755395076, -51.1655263577511, 2.23)
    pt3dadd(47.8286119057271, -117.547776621622, -50.9801140136967, 2.23)
    pt3dadd(48.5394757423103, -118.214429666625, -50.7587578302861, 2.23)
    pt3dadd(49.2364238084697, -118.891295150508, -50.5218685949779, 2.23)
    pt3dadd(49.9333718746291, -119.568160634391, -50.2849793596698, 2.23)
    pt3dadd(50.6303199407885, -120.245026118274, -50.0480901243617, 2.23)
    pt3dadd(51.3272680069478, -120.921891602156, -49.8112008890536, 2.23)
    pt3dadd(52.0242160731072, -121.598757086039, -49.5743116537455, 2.23)
    pt3dadd(52.7211641392666, -122.275622569922, -49.3374224184374, 2.23)
    pt3dadd(53.418112205426, -122.952488053805, -49.1005331831293, 2.23)
    pt3dadd(54.1150602715854, -123.629353537687, -48.8636439478211, 2.23)
    pt3dadd(54.8120083377448, -124.30621902157, -48.626754712513, 2.23)
    pt3dadd(55.5089564039041, -124.983084505453, -48.3898654772049, 2.23)
    pt3dadd(56.2059044700635, -125.659949989336, -48.1529762418968, 2.23)
    pt3dadd(56.9028525362229, -126.336815473218, -47.9160870065887, 2.23)
    pt3dadd(57.5998006023823, -127.013680957101, -47.6791977712806, 2.23)
    pt3dadd(58.2967486685417, -127.690546440984, -47.4423085359725, 2.23)
    pt3dadd(58.9936967347011, -128.367411924867, -47.2054193006643, 2.23)
    pt3dadd(59.6906448008605, -129.044277408749, -46.9685300653562, 2.23)
    pt3dadd(60.3875928670198, -129.721142892632, -46.7316408300481, 2.23)
    pt3dadd(61.0978235262005, -130.399572209397, -46.5801013984959, 2.23)
    pt3dadd(61.8300188027906, -131.080587541626, -46.5696997540059, 2.23)
    pt3dadd(62.5622140793807, -131.761602873855, -46.5592981095159, 2.23)
    pt3dadd(63.2944093559708, -132.442618206084, -46.5488964650258, 2.23)
    pt3dadd(64.0266046325609, -133.123633538314, -46.5384948205358, 2.23)
    pt3dadd(64.758799909151, -133.804648870543, -46.5280931760457, 2.23)
    pt3dadd(65.4999928667992, -134.473584811449, -46.5191282025907, 2.23)
    pt3dadd(66.3621328556609, -134.98014930243, -46.5294749935102, 2.23)
    pt3dadd(67.2242728445225, -135.486713793412, -46.5398217844297, 2.23)
    pt3dadd(68.0864128333842, -135.993278284393, -46.5501685753493, 2.23)
    pt3dadd(68.9485528222458, -136.499842775375, -46.5605153662688, 2.23)
    pt3dadd(69.8106928111074, -137.006407266356, -46.5708621571883, 2.23)
    pt3dadd(70.6728327999691, -137.512971757338, -46.5812089481079, 2.23)
    pt3dadd(71.5349727888307, -138.019536248319, -46.5915557390274, 2.23)
    pt3dadd(72.3971127776923, -138.526100739301, -46.6019025299469, 2.23)
    pt3dadd(73.259252766554, -139.032665230282, -46.6122493208665, 2.23)
    pt3dadd(74.1213927554156, -139.539229721263, -46.622596111786, 2.23)
    pt3dadd(74.9455677772092, -140.104607854381, -46.6262807154502, 2.23)
    pt3dadd(75.7615312036673, -140.682707026571, -46.6285243278528, 2.23)
    pt3dadd(76.5774946301254, -141.26080619876, -46.6307679402554, 2.23)
    pt3dadd(77.3934580565835, -141.83890537095, -46.633011552658, 2.23)
    pt3dadd(78.2094214830416, -142.417004543139, -46.6352551650606, 2.23)
    pt3dadd(79.0253849094997, -142.995103715329, -46.6374987774632, 2.23)
    pt3dadd(79.8413483359578, -143.573202887518, -46.6397423898657, 2.23)
    pt3dadd(80.6573117624159, -144.151302059707, -46.6419860022684, 2.23)
    pt3dadd(81.473275188874, -144.729401231897, -46.6442296146709, 2.23)
    pt3dadd(82.2892386153322, -145.307500404086, -46.6464732270735, 2.23)
    pt3dadd(83.1017230132533, -145.890231540785, -46.6481642944453, 2.23)
    pt3dadd(83.8843458113821, -146.512720290547, -46.6451126934539, 2.23)
    pt3dadd(84.6669686095108, -147.135209040309, -46.6420610924624, 2.23)
    pt3dadd(85.4495914076395, -147.757697790071, -46.639009491471, 2.23)
    pt3dadd(86.2322142057682, -148.380186539833, -46.6359578904795, 2.23)
    pt3dadd(87.0148370038969, -149.002675289596, -46.632906289488, 2.23)
    pt3dadd(87.7974598020257, -149.625164039358, -46.6298546884966, 2.23)
    pt3dadd(88.5800826001544, -150.24765278912, -46.6268030875051, 2.23)
    pt3dadd(89.3627053982831, -150.870141538882, -46.6237514865137, 2.23)
    pt3dadd(90.1453281964119, -151.492630288645, -46.6206998855222, 2.23)
    pt3dadd(90.9279509945406, -152.115119038407, -46.6176482845307, 2.23)
    pt3dadd(91.7105737926693, -152.737607788169, -46.6145966835392, 2.23)
    pt3dadd(92.493196590798, -153.360096537931, -46.6115450825478, 2.23)
    pt3dadd(93.2525212691364, -154.010618775277, -46.60502165999, 2.23)
    pt3dadd(94.0082958538887, -154.665412666531, -46.5979692122755, 2.23)
    pt3dadd(94.764070438641, -155.320206557785, -46.5909167645609, 2.23)
    pt3dadd(95.5198450233932, -155.975000449039, -46.5838643168464, 2.23)
    pt3dadd(96.2756196081455, -156.629794340294, -46.5768118691319, 2.23)
    pt3dadd(97.0313941928978, -157.284588231548, -46.5697594214173, 2.23)
    pt3dadd(97.78716877765, -157.939382122802, -46.5627069737028, 2.23)
    pt3dadd(98.5429433624023, -158.594176014056, -46.5556545259882, 2.23)
    pt3dadd(99.2987179471546, -159.24896990531, -46.5486020782737, 2.23)
    pt3dadd(100.054492531907, -159.903763796564, -46.5415496305592, 2.23)
    pt3dadd(100.810267116659, -160.558557687819, -46.5344971828446, 2.23)
    pt3dadd(101.566041701411, -161.213351579073, -46.5274447351301, 2.23)
    pt3dadd(102.321816286164, -161.868145470327, -46.5203922874155, 2.23)
    pt3dadd(103.077590870916, -162.522939361581, -46.513339839701, 2.23)
    pt3dadd(103.833365455668, -163.177733252835, -46.5062873919864, 2.23)
    pt3dadd(104.632121590716, -163.775599809876, -46.5060385348944, 2.23)
    pt3dadd(105.468917985141, -164.323083573738, -46.5118111067689, 2.23)
    pt3dadd(106.305714379565, -164.870567337599, -46.5175836786434, 2.23)
    pt3dadd(107.14251077399, -165.418051101461, -46.5233562505178, 2.23)
    pt3dadd(107.979307168415, -165.965534865322, -46.5291288223923, 2.23)
    pt3dadd(108.816103562839, -166.513018629184, -46.5349013942668, 2.23)
    pt3dadd(109.652899957264, -167.060502393045, -46.5406739661412, 2.23)
    pt3dadd(110.489696351688, -167.607986156907, -46.5464465380157, 2.23)
    pt3dadd(111.326492746113, -168.155469920768, -46.5522191098902, 2.23)
    pt3dadd(112.163289140538, -168.70295368463, -46.5579916817647, 2.23)
    pt3dadd(113.000085534962, -169.250437448491, -46.5637642536391, 2.23)
    pt3dadd(113.833179853409, -169.797846675515, -46.5941570365704, 2.23)
    pt3dadd(114.634182920125, -170.34460978387, -46.8379688296683, 2.23)
    pt3dadd(115.435185986841, -170.891372892225, -47.0817806227662, 2.23)
    pt3dadd(116.236189053557, -171.43813600058, -47.3255924158641, 2.23)
    pt3dadd(117.037192120273, -171.984899108935, -47.569404208962, 2.23)
    pt3dadd(117.838195186989, -172.53166221729, -47.8132160020599, 2.23)
    pt3dadd(118.639198253705, -173.078425325645, -48.0570277951578, 2.23)
    pt3dadd(119.440201320421, -173.625188434, -48.3008395882557, 2.23)
    pt3dadd(120.241204387137, -174.171951542355, -48.5446513813535, 2.23)
    pt3dadd(121.042207453853, -174.71871465071, -48.7884631744514, 2.23)
    pt3dadd(121.843210520569, -175.265477759065, -49.0322749675494, 2.23)
    pt3dadd(122.644213587285, -175.81224086742, -49.2760867606472, 2.23)
    pt3dadd(123.445216654001, -176.359003975775, -49.5198985537451, 2.23)
    pt3dadd(124.246219720717, -176.90576708413, -49.763710346843, 2.23)
    pt3dadd(125.047222787433, -177.452530192485, -50.0075221399409, 2.23)
    pt3dadd(125.848225854149, -177.99929330084, -50.2513339330388, 2.23)
    pt3dadd(126.649228920865, -178.546056409194, -50.4951457261367, 2.23)
    pt3dadd(127.450231987581, -179.092819517549, -50.7389575192346, 2.23)
    pt3dadd(128.301812875602, -179.587756628479, -50.8533974671674, 2.23)
    pt3dadd(129.19193666114, -180.043199667582, -50.8692494245308, 2.23)
    pt3dadd(130.082060446678, -180.498642706684, -50.8851013818942, 2.23)
    pt3dadd(130.972184232216, -180.954085745787, -50.9009533392576, 2.23)
    pt3dadd(131.862308017754, -181.40952878489, -50.916805296621, 2.23)
    pt3dadd(132.752431803293, -181.864971823992, -50.9326572539844, 2.23)
    pt3dadd(133.642555588831, -182.320414863095, -50.9485092113478, 2.23)
    pt3dadd(134.532679374369, -182.775857902197, -50.9643611687113, 2.23)
    pt3dadd(135.422803159907, -183.2313009413, -50.9802131260747, 2.23)
    pt3dadd(136.312926945445, -183.686743980403, -50.9960650834381, 2.23)
    pt3dadd(137.203050730983, -184.142187019505, -51.0119170408015, 2.23)
    pt3dadd(138.093174516521, -184.597630058608, -51.0277689981649, 2.23)
    pt3dadd(138.98329830206, -185.05307309771, -51.0436209555283, 2.23)
    pt3dadd(139.873422087598, -185.508516136813, -51.0594729128917, 2.23)
    pt3dadd(140.763545873136, -185.963959175916, -51.0753248702551, 2.23)
    pt3dadd(141.644988444535, -186.423821089562, -51.1295067917059, 2.23)
    pt3dadd(142.478418393661, -186.908122183137, -51.3956777342616, 2.23)
    pt3dadd(143.311848342788, -187.392423276712, -51.6618486768174, 2.23)
    pt3dadd(144.145278291914, -187.876724370287, -51.9280196193732, 2.23)
    pt3dadd(144.978708241041, -188.361025463862, -52.194190561929, 2.23)
    pt3dadd(145.812138190168, -188.845326557436, -52.4603615044848, 2.23)
    pt3dadd(146.645568139294, -189.329627651011, -52.7265324470405, 2.23)
    pt3dadd(147.478998088421, -189.813928744586, -52.9927033895963, 2.23)
    pt3dadd(148.312428037548, -190.298229838161, -53.2588743321521, 2.23)
    pt3dadd(149.145857986674, -190.782530931736, -53.5250452747079, 2.23)
    pt3dadd(149.979287935801, -191.266832025311, -53.7912162172636, 2.23)
    pt3dadd(150.812717884927, -191.751133118885, -54.0573871598194, 2.23)
    pt3dadd(151.646147834054, -192.23543421246, -54.3235581023752, 2.23)
    pt3dadd(152.479577783181, -192.719735306035, -54.589729044931, 2.23)
    pt3dadd(153.313007732307, -193.20403639961, -54.8558999874868, 2.23)
    pt3dadd(154.146437681434, -193.688337493185, -55.1220709300425, 2.23)
    pt3dadd(154.945975923961, -194.200844127507, -55.4280521750604, 2.23)
    pt3dadd(155.702768264307, -194.74892498947, -55.7842441490619, 2.23)
    pt3dadd(156.459560604652, -195.297005851434, -56.1404361230633, 2.23)
    pt3dadd(157.216352944998, -195.845086713398, -56.4966280970648, 2.23)
    pt3dadd(157.973145285344, -196.393167575362, -56.8528200710662, 2.23)
    pt3dadd(158.72993762569, -196.941248437326, -57.2090120450677, 2.23)
    pt3dadd(159.486729966035, -197.489329299289, -57.5652040190692, 2.23)
    pt3dadd(160.243522306381, -198.037410161253, -57.9213959930706, 2.23)
    pt3dadd(161.015080097214, -198.56093569291, -58.2609737300629, 2.23)
    pt3dadd(161.992658796536, -198.74184306589, -58.3687346182977, 2.23)
    pt3dadd(162.970237495858, -198.922750438871, -58.4764955065326, 2.23)
  }
}
proc shape3d_16() {
  adendMML[13] {
    pt3dadd(163.947816195181, -199.103657811851, -58.5842563947674, 2.23)
    pt3dadd(164.925394894503, -199.284565184831, -58.6920172830023, 2.23)
    pt3dadd(165.902973593825, -199.465472557811, -58.7997781712372, 2.23)
    pt3dadd(166.880552293147, -199.646379930791, -58.9075390594721, 2.23)
    pt3dadd(167.858130992469, -199.827287303772, -59.0152999477069, 2.23)
    pt3dadd(168.835709691791, -200.008194676752, -59.1230608359418, 2.23)
    pt3dadd(169.813288391113, -200.189102049732, -59.2308217241766, 2.23)
    pt3dadd(170.790867090435, -200.370009422712, -59.3385826124115, 2.23)
    pt3dadd(171.768445789757, -200.550916795692, -59.4463435006464, 2.23)
    pt3dadd(172.695174480132, -200.786849067724, -59.6908608920606, 2.23)
    pt3dadd(173.568114271151, -201.08098641815, -60.0800386667856, 2.23)
    pt3dadd(174.44105406217, -201.375123768575, -60.4692164415107, 2.23)
    pt3dadd(175.313993853189, -201.669261119001, -60.8583942162357, 2.23)
    pt3dadd(176.186933644209, -201.963398469426, -61.2475719909608, 2.23)
    pt3dadd(177.059873435228, -202.257535819851, -61.6367497656858, 2.23)
    pt3dadd(177.932813226247, -202.551673170277, -62.0259275404108, 2.23)
    pt3dadd(178.805753017266, -202.845810520702, -62.4151053151359, 2.23)
    pt3dadd(179.678692808286, -203.139947871128, -62.8042830898609, 2.23)
    pt3dadd(180.551632599305, -203.434085221553, -63.193460864586, 2.23)
    pt3dadd(181.424572390324, -203.728222571979, -63.582638639311, 2.23)
    pt3dadd(182.298904416493, -204.097858806274, -63.7835985729144, 2.23)
    pt3dadd(183.17521767988, -204.57493464853, -63.7167128109932, 2.23)
    pt3dadd(184.051530943267, -205.052010490785, -63.649827049072, 2.23)
    pt3dadd(184.927844206655, -205.529086333041, -63.5829412871508, 2.23)
    pt3dadd(185.804157470042, -206.006162175296, -63.5160555252297, 2.23)
    pt3dadd(186.680470733429, -206.483238017552, -63.4491697633085, 2.23)
    pt3dadd(187.556783996816, -206.960313859808, -63.3822840013873, 2.23)
    pt3dadd(188.433097260203, -207.437389702063, -63.3153982394662, 2.23)
    pt3dadd(189.309410523591, -207.914465544319, -63.2485124775449, 2.23)
    pt3dadd(190.208070742936, -208.350119360287, -63.2057461728838, 2.23)
    pt3dadd(191.113015824223, -208.774123638079, -63.1697632287518, 2.23)
    pt3dadd(192.01796090551, -209.198127915871, -63.1337802846199, 2.23)
    pt3dadd(192.922905986798, -209.622132193662, -63.097797340488, 2.23)
    pt3dadd(193.827851068085, -210.046136471454, -63.0618143963561, 2.23)
    pt3dadd(194.732796149372, -210.470140749246, -63.0258314522241, 2.23)
    pt3dadd(195.637741230659, -210.894145027037, -62.9898485080922, 2.23)
    pt3dadd(196.542686311947, -211.318149304829, -62.9538655639602, 2.23)
    pt3dadd(197.141901165099, -211.574627525621, -62.4111421448187, 2.23)
    pt3dadd(197.514347464867, -211.706847043465, -61.492555321002, 2.23)
    pt3dadd(197.886793764636, -211.83906656131, -60.5739684971853, 2.23)
    pt3dadd(198.259240064405, -211.971286079154, -59.6553816733686, 2.23)
    pt3dadd(198.631686364173, -212.103505596998, -58.7367948495519, 2.23)
  }
  adendIML[15] {pt3dclear()
    pt3dadd(7.55296751239902, -37.7433184929834, -13.6096004698144, 2.23)
    pt3dadd(7.66576333201847, -38.3111791733788, -13.0372273802798, 2.23)
    pt3dadd(7.79626550490671, -38.9339616125794, -12.2657928618047, 2.23)
    pt3dadd(7.92676767779496, -39.5567440517799, -11.4943583433297, 2.23)
    pt3dadd(8.05726985068321, -40.1795264909805, -10.7229238248546, 2.23)
    pt3dadd(8.18777202357146, -40.802308930181, -9.95148930637954, 2.23)
    pt3dadd(8.31827419645971, -41.4250913693816, -9.18005478790448, 2.23)
    pt3dadd(8.44877636934795, -42.0478738085822, -8.40862026942941, 2.23)
    pt3dadd(8.5792785422362, -42.6706562477827, -7.63718575095435, 2.23)
    pt3dadd(8.70978071512445, -43.2934386869833, -6.86575123247929, 2.23)
    pt3dadd(8.8402828880127, -43.9162211261838, -6.09431671400423, 2.23)
    pt3dadd(8.97078506090095, -44.5390035653844, -5.32288219552917, 2.23)
    pt3dadd(9.10128723378919, -45.161786004585, -4.5514476770541, 2.23)
    pt3dadd(9.23178940667744, -45.7845684437855, -3.78001315857904, 2.23)
    pt3dadd(9.36229157956569, -46.4073508829861, -3.00857864010398, 2.23)
    pt3dadd(9.49279375245394, -47.0301333221866, -2.23714412162892, 2.23)
    pt3dadd(9.62329592534219, -47.6529157613872, -1.46570960315386, 2.23)
    pt3dadd(9.50779947818761, -48.6342785502925, -1.36835707090159, 2.23)
    pt3dadd(9.38690882500892, -49.6235042137219, -1.28578566673124, 2.23)
    pt3dadd(9.26601817183024, -50.6127298771513, -1.2032142625609, 2.23)
    pt3dadd(9.14512751865155, -51.6019555405807, -1.12064285839056, 2.23)
    pt3dadd(9.02423686547286, -52.5911812040101, -1.03807145422021, 2.23)
    pt3dadd(8.90334621229417, -53.5804068674396, -0.955500050049868, 2.23)
    pt3dadd(8.78245555911548, -54.569632530869, -0.872928645879525, 2.23)
    pt3dadd(8.66156490593679, -55.5588581942984, -0.790357241709179, 2.23)
    pt3dadd(8.96914420289881, -56.4045955275129, -1.06324943205553, 2.23)
    pt3dadd(9.42664620691385, -57.2001259351559, -1.46051922305097, 2.23)
    pt3dadd(9.8841482109289, -57.9956563427989, -1.85778901404641, 2.23)
    pt3dadd(10.3416502149439, -58.7911867504419, -2.25505880504186, 2.23)
    pt3dadd(10.799152218959, -59.5867171580849, -2.6523285960373, 2.23)
    pt3dadd(11.256654222974, -60.382247565728, -3.04959838703274, 2.23)
    pt3dadd(11.7141562269891, -61.177777973371, -3.44686817802818, 2.23)
    pt3dadd(12.1716582310041, -61.973308381014, -3.84413796902362, 2.23)
    pt3dadd(12.6291602350192, -62.768838788657, -4.24140776001906, 2.23)
    pt3dadd(13.0866622390342, -63.5643691963, -4.6386775510145, 2.23)
    pt3dadd(13.5653233529224, -64.3496211035191, -5.00790496944383, 2.23)
    pt3dadd(14.3272276683483, -64.9972814303499, -5.00174743869844, 2.23)
    pt3dadd(15.0891319837742, -65.6449417571807, -4.99558990795305, 2.23)
    pt3dadd(15.8510362992, -66.2926020840115, -4.98943237720767, 2.23)
    pt3dadd(16.6129406146259, -66.9402624108423, -4.98327484646227, 2.23)
    pt3dadd(17.3748449300517, -67.5879227376731, -4.97711731571689, 2.23)
    pt3dadd(18.046039930818, -68.3286214324852, -4.95867493865651, 2.23)
    pt3dadd(18.7144522245248, -69.0721742831726, -4.93985569700737, 2.23)
    pt3dadd(19.3828645182317, -69.8157271338599, -4.92103645535823, 2.23)
    pt3dadd(20.0512768119385, -70.5592799845473, -4.90221721370909, 2.23)
    pt3dadd(20.7196891056453, -71.3028328352347, -4.88339797205996, 2.23)
    pt3dadd(21.3881013993521, -72.0463856859221, -4.86457873041081, 2.23)
    pt3dadd(22.056513693059, -72.7899385366095, -4.84575948876168, 2.23)
    pt3dadd(22.7249259867658, -73.5334913872968, -4.82694024711255, 2.23)
    pt3dadd(23.3933382804726, -74.2770442379842, -4.80812100546341, 2.23)
    pt3dadd(24.0617505741794, -75.0205970886716, -4.78930176381427, 2.23)
    pt3dadd(24.7301628678863, -75.764149939359, -4.77048252216513, 2.23)
    pt3dadd(25.3775656120498, -76.4809992021007, -4.56682473782559, 2.23)
    pt3dadd(26.0097878891326, -77.178553765691, -4.22961171438998, 2.23)
    pt3dadd(26.6420101662155, -77.8761083292813, -3.89239869095436, 2.23)
    pt3dadd(27.2742324432983, -78.5736628928715, -3.55518566751875, 2.23)
    pt3dadd(27.9064547203811, -79.2712174564618, -3.21797264408313, 2.23)
    pt3dadd(28.5386769974639, -79.9687720200521, -2.88075962064752, 2.23)
    pt3dadd(29.1708992745468, -80.6663265836423, -2.5435465972119, 2.23)
    pt3dadd(29.4869809356588, -81.4665510178564, -2.64183867645204, 2.23)
    pt3dadd(29.539668608404, -82.3523153205421, -3.10297380765364, 2.23)
    pt3dadd(29.5923562811492, -83.2380796232279, -3.56410893885524, 2.23)
    pt3dadd(30.0671133085814, -84.0071857404677, -3.72050991697758, 2.23)
    pt3dadd(30.7770963732359, -84.7112763753768, -3.70707765220003, 2.23)
    pt3dadd(31.4870794378905, -85.4153670102859, -3.69364538742249, 2.23)
    pt3dadd(32.197062502545, -86.1194576451951, -3.68021312264495, 2.23)
    pt3dadd(32.9070455671995, -86.8235482801042, -3.66678085786739, 2.23)
    pt3dadd(33.6170286318541, -87.5276389150133, -3.65334859308986, 2.23)
    pt3dadd(34.3270116965086, -88.2317295499224, -3.63991632831231, 2.23)
    pt3dadd(35.0369947611631, -88.9358201848315, -3.62648406353476, 2.23)
    pt3dadd(35.7469778258177, -89.6399108197406, -3.61305179875722, 2.23)
    pt3dadd(36.4569608904722, -90.3440014546497, -3.59961953397967, 2.23)
    pt3dadd(37.1669439551267, -91.0480920895588, -3.58618726920212, 2.23)
    pt3dadd(37.8769270197812, -91.752182724468, -3.57275500442458, 2.23)
    pt3dadd(38.5869100844358, -92.4562733593771, -3.55932273964703, 2.23)
    pt3dadd(39.2968931490903, -93.1603639942861, -3.54589047486949, 2.23)
    pt3dadd(39.905619368619, -93.9363117446533, -3.70513316252037, 2.23)
    pt3dadd(40.5098701593114, -94.7154354917267, -3.87200787208964, 2.23)
    pt3dadd(41.1141209500039, -95.4945592388001, -4.03888258165892, 2.23)
    pt3dadd(41.7183717406963, -96.2736829858735, -4.20575729122819, 2.23)
    pt3dadd(42.3226225313888, -97.0528067329469, -4.37263200079746, 2.23)
    pt3dadd(42.9268733220813, -97.8319304800203, -4.53950671036673, 2.23)
    pt3dadd(43.5311241127737, -98.6110542270937, -4.70638141993601, 2.23)
    pt3dadd(44.1353749034662, -99.3901779741671, -4.87325612950528, 2.23)
    pt3dadd(44.7396256941587, -100.169301721241, -5.04013083907456, 2.23)
    pt3dadd(45.3438764848511, -100.948425468314, -5.20700554864382, 2.23)
    pt3dadd(45.9481272755436, -101.727549215387, -5.3738802582131, 2.23)
    pt3dadd(46.552378066236, -102.506672962461, -5.54075496778237, 2.23)
    pt3dadd(47.1566288569285, -103.285796709534, -5.70762967735165, 2.23)
    pt3dadd(47.7608796476209, -104.064920456608, -5.87450438692092, 2.23)
    pt3dadd(48.3651304383134, -104.844044203681, -6.0413790964902, 2.23)
    pt3dadd(48.8715810265508, -105.685577227049, -6.11640000073575, 2.23)
    pt3dadd(49.2453715998184, -106.611764630671, -6.06682681536392, 2.23)
    pt3dadd(49.6191621730859, -107.537952034294, -6.01725362999208, 2.23)
    pt3dadd(49.9929527463535, -108.464139437916, -5.96768044462025, 2.23)
    pt3dadd(50.3667433196211, -109.390326841538, -5.91810725924841, 2.23)
    pt3dadd(50.7405338928886, -110.31651424516, -5.86853407387658, 2.23)
    pt3dadd(51.1143244661562, -111.242701648782, -5.81896088850474, 2.23)
    pt3dadd(51.5003521964757, -112.158249704424, -5.81692728461143, 2.23)
    pt3dadd(51.9482226206422, -113.020029884315, -6.05514358275907, 2.23)
    pt3dadd(52.3960930448086, -113.881810064207, -6.2933598809067, 2.23)
    pt3dadd(52.8439634689751, -114.743590244098, -6.53157617905434, 2.23)
    pt3dadd(53.2918338931416, -115.60537042399, -6.76979247720196, 2.23)
    pt3dadd(53.739704317308, -116.467150603881, -7.00800877534959, 2.23)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(53.739704317308, -116.467150603881, -7.00800877534959, 2.23)
    pt3dadd(54.1875747414745, -117.328930783773, -7.24622507349722, 2.23)
    pt3dadd(54.635445165641, -118.190710963664, -7.48444137164486, 2.23)
    pt3dadd(55.0833155898074, -119.052491143556, -7.72265766979249, 2.23)
    pt3dadd(55.5311860139739, -119.914271323447, -7.96087396794012, 2.23)
    pt3dadd(55.9790564381403, -120.776051503339, -8.19909026608775, 2.23)
    pt3dadd(56.4269268623068, -121.63783168323, -8.43730656423538, 2.23)
    pt3dadd(56.9593760525648, -122.449047127068, -8.64540752235249, 2.23)
    pt3dadd(57.6122839522801, -123.188247298864, -8.81061763253484, 2.23)
    pt3dadd(58.2651918519954, -123.92744747066, -8.97582774271718, 2.23)
    pt3dadd(58.9180997517106, -124.666647642455, -9.14103785289953, 2.23)
    pt3dadd(59.5710076514259, -125.405847814251, -9.30624796308187, 2.23)
    pt3dadd(60.2239155511412, -126.145047986047, -9.47145807326422, 2.23)
    pt3dadd(60.8768234508564, -126.884248157843, -9.63666818344657, 2.23)
    pt3dadd(61.5297313505717, -127.623448329639, -9.80187829362891, 2.23)
    pt3dadd(62.182639250287, -128.362648501434, -9.96708840381126, 2.23)
    pt3dadd(62.8355471500022, -129.10184867323, -10.1322985139936, 2.23)
    pt3dadd(63.4884550497175, -129.841048845026, -10.2975086241759, 2.23)
    pt3dadd(64.1413629494327, -130.580249016822, -10.4627187343583, 2.23)
    pt3dadd(64.794270849148, -131.319449188618, -10.6279288445406, 2.23)
    pt3dadd(65.4471787488633, -132.058649360413, -10.793138954723, 2.23)
    pt3dadd(66.1321927419403, -132.785352772112, -10.7921383001615, 2.23)
    pt3dadd(66.8201673868994, -133.510903799562, -10.7758105795539, 2.23)
    pt3dadd(67.5081420318585, -134.236454827012, -10.7594828589462, 2.23)
    pt3dadd(68.1961166768175, -134.962005854461, -10.7431551383386, 2.23)
    pt3dadd(68.8840913217765, -135.687556881911, -10.7268274177309, 2.23)
    pt3dadd(69.5720659667356, -136.413107909361, -10.7104996971233, 2.23)
    pt3dadd(70.2600406116946, -137.13865893681, -10.6941719765157, 2.23)
    pt3dadd(70.9480152566537, -137.86420996426, -10.677844255908, 2.23)
    pt3dadd(71.6359899016127, -138.58976099171, -10.6615165353004, 2.23)
    pt3dadd(72.3256742832342, -139.313683731626, -10.6454107754714, 2.23)
    pt3dadd(73.0189840520548, -140.034153792012, -10.629775669272, 2.23)
    pt3dadd(73.7122938208753, -140.754623852398, -10.6141405630726, 2.23)
    pt3dadd(74.4056035896959, -141.475093912783, -10.5985054568732, 2.23)
    pt3dadd(75.0989133585165, -142.195563973169, -10.5828703506738, 2.23)
    pt3dadd(75.7922231273371, -142.916034033554, -10.5672352444743, 2.23)
    pt3dadd(76.4855328961577, -143.63650409394, -10.5516001382749, 2.23)
    pt3dadd(77.1788426649783, -144.356974154326, -10.5359650320755, 2.23)
    pt3dadd(77.8721524337989, -145.077444214711, -10.5203299258761, 2.23)
    pt3dadd(78.5654622026195, -145.797914275097, -10.5046948196767, 2.23)
    pt3dadd(79.2587719714401, -146.518384335483, -10.4890597134773, 2.23)
    pt3dadd(79.9520817402607, -147.238854395868, -10.4734246072779, 2.23)
    pt3dadd(80.6453915090813, -147.959324456254, -10.4577895010785, 2.23)
    pt3dadd(81.3338856487433, -148.684132960909, -10.4415481795248, 2.23)
    pt3dadd(81.9809422270133, -149.446272942899, -10.4200904916084, 2.23)
    pt3dadd(82.6279988052832, -150.208412924888, -10.3986328036921, 2.23)
    pt3dadd(83.2750553835531, -150.970552906878, -10.3771751157757, 2.23)
    pt3dadd(83.922111961823, -151.732692888867, -10.3557174278593, 2.23)
    pt3dadd(84.5691685400929, -152.494832870857, -10.3342597399429, 2.23)
    pt3dadd(85.2162251183629, -153.256972852846, -10.3128020520265, 2.23)
    pt3dadd(85.8632816966328, -154.019112834836, -10.2913443641101, 2.23)
    pt3dadd(86.5103382749027, -154.781252816825, -10.2698866761937, 2.23)
    pt3dadd(87.1573948531726, -155.543392798815, -10.2484289882774, 2.23)
    pt3dadd(87.7182216263627, -156.313364360302, -10.3245463427874, 2.23)
    pt3dadd(87.8391117960507, -157.123291926344, -10.8984826673382, 2.23)
    pt3dadd(87.9600019657388, -157.933219492385, -11.4724189918889, 2.23)
    pt3dadd(88.0808921354269, -158.743147058427, -12.0463553164397, 2.23)
    pt3dadd(88.201782305115, -159.553074624468, -12.6202916409904, 2.23)
    pt3dadd(88.322672474803, -160.36300219051, -13.1942279655411, 2.23)
    pt3dadd(88.4435626444911, -161.172929756551, -13.7681642900919, 2.23)
    pt3dadd(88.4882150399039, -162.093858213006, -14.0122755978971, 2.23)
    pt3dadd(88.4786215567379, -163.09376773732, -14.021704715926, 2.23)
    pt3dadd(88.4690280735719, -164.093677261634, -14.0311338339549, 2.23)
    pt3dadd(88.4594345904059, -165.093586785948, -14.0405629519838, 2.23)
    pt3dadd(88.4498411072399, -166.093496310262, -14.0499920700126, 2.23)
    pt3dadd(88.4402476240739, -167.093405834576, -14.0594211880415, 2.23)
    pt3dadd(88.4306541409079, -168.09331535889, -14.0688503060704, 2.23)
    pt3dadd(88.4210606577419, -169.093224883205, -14.0782794240993, 2.23)
    pt3dadd(88.4114671745759, -170.093134407519, -14.0877085421282, 2.23)
    pt3dadd(88.4018736914099, -171.093043931833, -14.097137660157, 2.23)
    pt3dadd(88.3922802082439, -172.092953456147, -14.1065667781859, 2.23)
    pt3dadd(88.3826867250779, -173.092862980461, -14.1159958962148, 2.23)
    pt3dadd(88.3730932419119, -174.092772504775, -14.1254250142437, 2.23)
    pt3dadd(88.3634997587459, -175.092682029089, -14.1348541322725, 2.23)
    pt3dadd(88.3539062755799, -176.092591553403, -14.1442832503014, 2.23)
    pt3dadd(88.3679869756108, -177.087498082919, -14.1965880041605, 2.23)
    pt3dadd(88.4526555110974, -178.067487494888, -14.3767323671782, 2.23)
    pt3dadd(88.537324046584, -179.047476906857, -14.5568767301959, 2.23)
    pt3dadd(88.6219925820706, -180.027466318826, -14.7370210932136, 2.23)
    pt3dadd(88.7066611175573, -181.007455730795, -14.9171654562313, 2.23)
    pt3dadd(88.7913296530439, -181.987445142764, -15.097309819249, 2.23)
    pt3dadd(88.8759981885304, -182.967434554733, -15.2774541822667, 2.23)
    pt3dadd(88.9606667240171, -183.947423966702, -15.4575985452844, 2.23)
    pt3dadd(89.1293483633559, -184.916960456604, -15.5609813286788, 2.23)
    pt3dadd(89.4322053002661, -185.869802837316, -15.5417700485789, 2.23)
    pt3dadd(89.7350622371763, -186.822645218029, -15.5225587684791, 2.23)
    pt3dadd(90.0379191740865, -187.775487598742, -15.5033474883793, 2.23)
    pt3dadd(90.3407761109966, -188.728329979454, -15.4841362082795, 2.23)
    pt3dadd(90.6436330479068, -189.681172360167, -15.4649249281797, 2.23)
    pt3dadd(90.946489984817, -190.63401474088, -15.4457136480799, 2.23)
    pt3dadd(91.2493469217272, -191.586857121593, -15.4265023679801, 2.23)
    pt3dadd(91.5522038586373, -192.539699502305, -15.4072910878803, 2.23)
    pt3dadd(91.8550607955475, -193.492541883018, -15.3880798077804, 2.23)
    pt3dadd(92.1579177324577, -194.445384263731, -15.3688685276806, 2.23)
    pt3dadd(92.4607746693679, -195.398226644444, -15.3496572475808, 2.23)
    pt3dadd(92.7013898764238, -196.333632128274, -15.4537245498088, 2.23)
    pt3dadd(92.7611783115978, -197.218379351442, -15.915944945415, 2.23)
    pt3dadd(92.8209667467717, -198.103126574611, -16.3781653410211, 2.23)
    pt3dadd(92.8807551819457, -198.98787379778, -16.8403857366273, 2.23)
    pt3dadd(92.9405436171196, -199.872621020949, -17.3026061322335, 2.23)
    pt3dadd(93.0003320522936, -200.757368244118, -17.7648265278397, 2.23)
    pt3dadd(93.0601204874676, -201.642115467287, -18.2270469234458, 2.23)
    pt3dadd(93.1199089226415, -202.526862690456, -18.689267319052, 2.23)
  }
}
proc shape3d_17() {
  adendMML[14] {
    pt3dadd(93.1796973578155, -203.411609913625, -19.1514877146582, 2.23)
    pt3dadd(93.4898887553307, -204.269689476405, -19.5028301014194, 2.23)
    pt3dadd(93.9457417957695, -205.112256222609, -19.789673758687, 2.23)
    pt3dadd(94.4015948362082, -205.954822968813, -20.0765174159545, 2.23)
    pt3dadd(94.857447876647, -206.797389715016, -20.3633610732221, 2.23)
    pt3dadd(95.3133009170857, -207.63995646122, -20.6502047304897, 2.23)
    pt3dadd(95.7691539575244, -208.482523207423, -20.9370483877573, 2.23)
    pt3dadd(96.2250069979631, -209.325089953627, -21.2238920450249, 2.23)
    pt3dadd(96.6808600384019, -210.167656699831, -21.5107357022925, 2.23)
    pt3dadd(97.1367130788406, -211.010223446034, -21.7975793595601, 2.23)
    pt3dadd(97.5935577169521, -211.886822439297, -21.9430317406886, 2.23)
    pt3dadd(98.0504825611218, -212.766174154218, -22.0770475914186, 2.23)
    pt3dadd(98.5074074052915, -213.645525869138, -22.2110634421485, 2.23)
    pt3dadd(98.9643322494612, -214.524877584059, -22.3450792928785, 2.23)
    pt3dadd(99.4212570936309, -215.404229298979, -22.4790951436084, 2.23)
    pt3dadd(99.8781819378006, -216.2835810139, -22.6131109943384, 2.23)
    pt3dadd(100.33510678197, -217.16293272882, -22.7471268450684, 2.23)
    pt3dadd(100.79203162614, -218.042284443741, -22.8811426957984, 2.23)
    pt3dadd(101.24895647031, -218.921636158661, -23.0151585465283, 2.23)
    pt3dadd(101.81855983652, -219.705076454611, -23.2364790665882, 2.23)
    pt3dadd(102.436989015592, -220.446956452209, -23.4956304116306, 2.23)
    pt3dadd(103.055418194664, -221.188836449806, -23.7547817566729, 2.23)
    pt3dadd(103.673847373735, -221.930716447404, -24.0139331017153, 2.23)
    pt3dadd(104.292276552807, -222.672596445001, -24.2730844467577, 2.23)
    pt3dadd(104.910705731879, -223.414476442599, -24.5322357918001, 2.23)
    pt3dadd(105.529134910951, -224.156356440196, -24.7913871368424, 2.23)
    pt3dadd(106.147564090022, -224.898236437794, -25.0505384818848, 2.23)
    pt3dadd(106.765993269094, -225.640116435392, -25.3096898269272, 2.23)
    pt3dadd(107.384422448166, -226.381996432989, -25.5688411719696, 2.23)
    pt3dadd(108.002851627238, -227.123876430587, -25.827992517012, 2.23)
    pt3dadd(108.621280806309, -227.865756428184, -26.0871438620543, 2.23)
    pt3dadd(109.239709985381, -228.607636425782, -26.3462952070967, 2.23)
    pt3dadd(109.956476979227, -229.279530082949, -26.4060377315403, 2.23)
    pt3dadd(110.729776910303, -229.911189640957, -26.3511431109132, 2.23)
    pt3dadd(111.503076841379, -230.542849198966, -26.2962484902861, 2.23)
    pt3dadd(112.276376772455, -231.174508756975, -26.241353869659, 2.23)
    pt3dadd(113.049676703531, -231.806168314984, -26.1864592490319, 2.23)
    pt3dadd(113.822976634608, -232.437827872992, -26.1315646284049, 2.23)
    pt3dadd(114.596276565684, -233.069487431001, -26.0766700077777, 2.23)
    pt3dadd(115.36957649676, -233.70114698901, -26.0217753871506, 2.23)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(115.36957649676, -233.70114698901, -26.0217753871506, 2.23)
    pt3dadd(116.155201073147, -234.306059876791, -26.0449117931152, 2.23)
    pt3dadd(116.969774821236, -234.848147918154, -26.2513340892367, 2.23)
    pt3dadd(117.784348569324, -235.390235959518, -26.4577563853582, 2.23)
    pt3dadd(118.598922317412, -235.932324000881, -26.6641786814798, 2.23)
    pt3dadd(119.413496065501, -236.474412042245, -26.8706009776013, 2.23)
    pt3dadd(120.228069813589, -237.016500083608, -27.0770232737228, 2.23)
    pt3dadd(121.042643561677, -237.558588124971, -27.2834455698444, 2.23)
    pt3dadd(121.880730844447, -237.752728758414, -27.2364584434356, 2.23)
    pt3dadd(122.751425824787, -237.464348835029, -26.8380525310803, 2.23)
    pt3dadd(123.622120805127, -237.175968911643, -26.439646618725, 2.23)
    pt3dadd(124.492815785466, -236.887588988258, -26.0412407063697, 2.23)
    pt3dadd(125.363510765806, -236.599209064872, -25.6428347940144, 2.23)
    pt3dadd(126.236499518632, -236.349184157268, -25.267485133315, 2.23)
    pt3dadd(127.148888512446, -236.757985211678, -25.2881738229725, 2.23)
    pt3dadd(128.061277506259, -237.166786266089, -25.30886251263, 2.23)
    pt3dadd(128.973666500073, -237.5755873205, -25.3295512022875, 2.23)
    pt3dadd(129.886055493887, -237.984388374911, -25.350239891945, 2.23)
    pt3dadd(130.798444487701, -238.393189429322, -25.3709285816025, 2.23)
    pt3dadd(131.710833481515, -238.801990483733, -25.39161727126, 2.23)
    pt3dadd(132.623222475329, -239.210791538144, -25.4123059609175, 2.23)
    pt3dadd(133.531230296586, -239.617551484298, -25.4377587336519, 2.23)
    pt3dadd(133.543137592531, -239.606834566288, -26.437630407404, 2.23)
    pt3dadd(133.555044888476, -239.596117648278, -27.437502081156, 2.23)
    pt3dadd(133.566952184421, -239.585400730267, -28.437373754908, 2.23)
  }
  adendIML[16] {pt3dclear()
    pt3dadd(0.137142937326185, -2.63942846286287, 4.02220502595704, 2.58032140959264)
    pt3dadd(-0.242462839771947, -3.57498388948588, 4.12737843026174, 2.58032140959264)
    pt3dadd(-0.585942198339473, -4.5097172033221, 4.21845840744001, 2.49003565439739)
    pt3dadd(-0.929421556907002, -5.44445051715832, 4.30953838461828, 2.39974989920213)
    pt3dadd(-1.27290091547453, -6.37918383099455, 4.40061836179655, 2.30946414400688)
    pt3dadd(-1.5885334284932, -7.32059004805543, 4.49062283527591, 2.23)
    pt3dadd(-1.69968384487086, -8.31099604283504, 4.57272978043696, 2.23)
    pt3dadd(-1.81083426124852, -9.30140203761465, 4.65483672559801, 2.23)
    pt3dadd(-1.92198467762619, -10.2918080323943, 4.73694367075905, 2.23)
    pt3dadd(-2.03313509400385, -11.2822140271739, 4.8190506159201, 2.23)
    pt3dadd(-2.14428551038151, -12.2726200219535, 4.90115756108115, 2.23)
    pt3dadd(-2.25543592675917, -13.2630260167331, 4.9832645062422, 2.23)
    pt3dadd(-2.439539407551, -14.2360577005473, 5.06819726442265, 2.23)
    pt3dadd(-2.78039967153393, -15.1717565989745, 5.15920194517931, 2.23)
    pt3dadd(-3.12125993551685, -16.1074554974017, 5.25020662593597, 2.23)
    pt3dadd(-3.46212019949978, -17.0431543958289, 5.34121130669263, 2.23)
    pt3dadd(-3.80298046348271, -17.9788532942561, 5.43221598744929, 2.23)
    pt3dadd(-4.14384072746564, -18.9145521926833, 5.52322066820595, 2.23)
    pt3dadd(-4.77253400739306, -19.6692429542874, 5.61677022859566, 2.23)
    pt3dadd(-5.46703775991314, -20.3825478068139, 5.71090165319853, 2.23)
    pt3dadd(-6.16154151243321, -21.0958526593403, 5.80503307780139, 2.23)
    pt3dadd(-6.85604526495329, -21.8091575118668, 5.89916450240425, 2.23)
    pt3dadd(-7.47888082904324, -22.5822026636193, 5.99378472939375, 2.23)
    pt3dadd(-8.05623926881306, -23.3931560850567, 6.08871512645162, 2.23)
    pt3dadd(-8.63359770858288, -24.2041095064941, 6.18364552350948, 2.23)
    pt3dadd(-9.20606519013737, -25.0023159186776, 6.25453864985581, 2.23)
    pt3dadd(-9.58575041677364, -25.2980855732261, 5.3779775053129, 2.23)
    pt3dadd(-9.96543564340991, -25.5938552277747, 4.50141636076999, 2.23)
    pt3dadd(-10.3729584092117, -25.9788958236723, 3.78661106751107, 2.23)
    pt3dadd(-10.9198095391718, -26.8107422292022, 3.88140241346763, 2.23)
    pt3dadd(-11.4666606691318, -27.6425886347322, 3.97619375942419, 2.23)
    pt3dadd(-12.0135117990919, -28.4744350402622, 4.07098510538075, 2.23)
    pt3dadd(-12.5407880791872, -29.3156325933472, 4.16537700199207, 2.23)
    pt3dadd(-12.8411814184349, -30.2652149295725, 4.25513906783612, 2.23)
    pt3dadd(-13.1415747576826, -31.2147972657978, 4.34490113368018, 2.23)
    pt3dadd(-13.4419680969302, -32.164379602023, 4.43466319952423, 2.23)
    pt3dadd(-13.7423614361779, -33.1139619382483, 4.52442526536828, 2.23)
    pt3dadd(-14.0920038152385, -34.0410567477095, 4.61527184039395, 2.23)
    pt3dadd(-14.609468954044, -34.8915222702707, 4.70981402704006, 2.23)
    pt3dadd(-15.1269340928495, -35.7419877928318, 4.80435621368616, 2.23)
    pt3dadd(-15.644399231655, -36.5924533153929, 4.89889840033226, 2.23)
    pt3dadd(-16.1618643704605, -37.442918837954, 4.99344058697837, 2.23)
    pt3dadd(-16.4241596763495, -38.4063429406848, 5.0221767047849, 2.23)
    pt3dadd(-16.6796586472803, -39.3727756449357, 5.04916010722928, 2.23)
    pt3dadd(-16.9351576182111, -40.3392083491867, 5.07614350967367, 2.23)
    pt3dadd(-17.1906565891419, -41.3056410534377, 5.10312691211805, 2.23)
    pt3dadd(-17.514453359554, -42.1917859219156, 4.99115794484972, 2.23)
    pt3dadd(-18.0568630716542, -42.820939202181, 4.43441935794328, 2.23)
    pt3dadd(-18.5992727837544, -43.4500924824465, 3.87768077103684, 2.23)
  }
  adendIML[17] {pt3dclear()
    pt3dadd(-18.5992727837544, -43.4500924824465, 3.87768077103684, 2.23)
    pt3dadd(-19.2441973307831, -44.0988280243567, 3.6591213281206, 2.23)
    pt3dadd(-19.983606607817, -44.7656119268353, 3.75225106790209, 2.23)
    pt3dadd(-20.7230158848508, -45.4323958293138, 3.84538080768358, 2.23)
    pt3dadd(-21.4624251618846, -46.0991797317924, 3.93851054746507, 2.23)
    pt3dadd(-22.2018344389185, -46.7659636342709, 4.03164028724655, 2.23)
    pt3dadd(-22.9412437159523, -47.4327475367495, 4.12477002702804, 2.23)
    pt3dadd(-23.6806529929862, -48.099531439228, 4.21789976680953, 2.23)
    pt3dadd(-24.4429134105028, -48.7392469909919, 4.31026001262342, 2.23)
    pt3dadd(-25.2268817649097, -49.3532483754703, 4.40188926094077, 2.23)
    pt3dadd(-26.0108501193165, -49.9672497599487, 4.49351850925812, 2.23)
    pt3dadd(-26.7948184737234, -50.5812511444271, 4.58514775757548, 2.23)
    pt3dadd(-27.5787868281302, -51.1952525289055, 4.67677700589282, 2.23)
    pt3dadd(-28.3622410125505, -51.8099062599322, 4.7684268802814, 2.23)
    pt3dadd(-29.1452242088551, -52.4251575510646, 4.86009564848849, 2.23)
    pt3dadd(-29.9282074051596, -53.040408842197, 4.95176441669559, 2.23)
    pt3dadd(-30.7111906014642, -53.6556601333293, 5.04343318490269, 2.23)
    pt3dadd(-31.4941737977688, -54.2709114244617, 5.13510195310979, 2.23)
    pt3dadd(-32.2771569940734, -54.8861627155941, 5.22677072131689, 2.23)
    pt3dadd(-33.060140190378, -55.5014140067265, 5.31843948952399, 2.23)
    pt3dadd(-33.8431233866826, -56.1166652978588, 5.41010825773109, 2.23)
    pt3dadd(-34.5843782754763, -56.7793591574052, 5.50303018612613, 2.23)
    pt3dadd(-35.296966474395, -57.4746453140449, 5.5968130158281, 2.23)
    pt3dadd(-36.0095546733137, -58.1699314706847, 5.69059584553007, 2.23)
    pt3dadd(-36.7221428722325, -58.8652176273244, 5.78437867523204, 2.23)
    pt3dadd(-37.4347310711512, -59.5605037839642, 5.87816150493402, 2.23)
    pt3dadd(-38.1473192700699, -60.2557899406039, 5.97194433463598, 2.23)
    pt3dadd(-38.8599074689886, -60.9510760972436, 6.06572716433796, 2.23)
    pt3dadd(-39.5724956679073, -61.6463622538834, 6.15950999403992, 2.23)
    pt3dadd(-40.2850838668261, -62.3416484105231, 6.25329282374189, 2.23)
    pt3dadd(-40.9976720657448, -63.0369345671628, 6.34707565344387, 2.23)
    pt3dadd(-41.7022492126072, -63.7397335778238, 6.44097701497073, 2.23)
    pt3dadd(-42.3518984382622, -64.494044605985, 6.53569109206757, 2.23)
    pt3dadd(-43.0015476639171, -65.2483556341462, 6.63040516916442, 2.23)
    pt3dadd(-43.651196889572, -66.0026666623075, 6.72511924626128, 2.23)
    pt3dadd(-44.3008461152269, -66.7569776904687, 6.81983332335813, 2.23)
    pt3dadd(-44.9504953408818, -67.5112887186299, 6.91454740045498, 2.23)
    pt3dadd(-45.6001445665367, -68.2655997467912, 7.00926147755183, 2.23)
    pt3dadd(-46.2497937921917, -69.0199107749524, 7.10397555464868, 2.23)
    pt3dadd(-46.9325249647079, -69.7430193347804, 7.19818654272024, 2.23)
    pt3dadd(-47.6491087919644, -70.4341985044805, 7.29188272133553, 2.23)
    pt3dadd(-48.365692619221, -71.1253776741806, 7.3855788999508, 2.23)
    pt3dadd(-49.0822764464775, -71.8165568438806, 7.47927507856607, 2.23)
    pt3dadd(-49.798860273734, -72.5077360135807, 7.57297125718135, 2.23)
    pt3dadd(-50.5333940461399, -73.1793745810816, 7.6661947387364, 2.23)
    pt3dadd(-51.2850339989716, -73.8323910823829, 7.7589677430821, 2.23)
    pt3dadd(-52.0366739518034, -74.4854075836842, 7.8517407474278, 2.23)
    pt3dadd(-52.7883139046351, -75.1384240849854, 7.9445137517735, 2.23)
    pt3dadd(-53.5399538574669, -75.7914405862867, 8.03728675611919, 2.23)
    pt3dadd(-54.3417535167506, -76.3820506218092, 8.1281419283531, 2.23)
    pt3dadd(-55.1438849808142, -76.9722478406487, 8.21898441419176, 2.23)
    pt3dadd(-55.9460164448778, -77.5624450594883, 8.30982690003041, 2.23)
    pt3dadd(-56.546282060062, -78.3456107424124, 8.40393595409034, 2.23)
    pt3dadd(-57.1013173262678, -79.1720132136334, 8.49877692006817, 2.23)
    pt3dadd(-57.7549496235531, -79.9154369254531, 8.59288486596693, 2.23)
    pt3dadd(-58.4752519538823, -80.6027514768788, 8.68649715319972, 2.23)
    pt3dadd(-59.1955542842114, -81.2900660283044, 8.78010944043252, 2.23)
    pt3dadd(-59.9158566145406, -81.9773805797301, 8.87372172766531, 2.23)
    pt3dadd(-60.6361589448697, -82.6646951311558, 8.9673340148981, 2.23)
    pt3dadd(-61.3564612751988, -83.3520096825814, 9.06094630213089, 2.23)
    pt3dadd(-62.076763605528, -84.0393242340071, 9.15455858936369, 2.23)
    pt3dadd(-62.7970659358571, -84.7266387854328, 9.24817087659648, 2.23)
    pt3dadd(-63.5173682661863, -85.4139533368584, 9.34178316382928, 2.23)
    pt3dadd(-64.2376705965154, -86.1012678882841, 9.43539545106208, 2.23)
    pt3dadd(-64.9579729268445, -86.7885824397098, 9.52900773829486, 2.23)
    pt3dadd(-65.6696594465868, -87.480337878194, 9.51124841173236, 2.23)
    pt3dadd(-66.3712384870303, -88.177303061433, 9.36283553034054, 2.23)
    pt3dadd(-67.0728175274738, -88.874268244672, 9.21442264894871, 2.23)
    pt3dadd(-67.7743965679174, -89.571233427911, 9.06600976755689, 2.23)
    pt3dadd(-68.4759756083608, -90.26819861115, 8.91759688616508, 2.23)
    pt3dadd(-69.1775546488043, -90.9651637943889, 8.76918400477325, 2.23)
    pt3dadd(-69.8791336892478, -91.6621289776279, 8.62077112338143, 2.23)
    pt3dadd(-70.5807127296913, -92.3590941608669, 8.4723582419896, 2.23)
    pt3dadd(-71.2802654956736, -92.9630123211537, 8.33234063623884, 2.23)
  }
  adendIML[18] {pt3dclear()
    pt3dadd(-71.2802654956736, -92.9630123211537, 8.33234063623884, 2.23)
    pt3dadd(-71.8217261322898, -93.0862203406557, 8.12084108927118, 2.23)
    pt3dadd(-72.2593360324863, -93.9070513535012, 7.75377975434052, 2.23)
    pt3dadd(-72.6969459326828, -94.7278823663467, 7.38671841940986, 2.23)
    pt3dadd(-73.1345558328793, -95.5487133791922, 7.0196570844792, 2.23)
    pt3dadd(-73.5721657330757, -96.3695443920377, 6.65259574954854, 2.23)
    pt3dadd(-74.0097756332722, -97.1903754048831, 6.28553441461787, 2.23)
    pt3dadd(-74.4473855334687, -98.0112064177286, 5.91847307968721, 2.23)
    pt3dadd(-74.8849954336652, -98.8320374305741, 5.55141174475655, 2.23)
    pt3dadd(-75.0599342946795, -99.7945032499327, 5.56445560940514, 2.23)
    pt3dadd(-75.1866371860257, -100.78297837832, 5.64730063269948, 2.23)
    pt3dadd(-75.3133400773719, -101.771453506707, 5.73014565599383, 2.23)
    pt3dadd(-75.440042968718, -102.759928635094, 5.81299067928817, 2.23)
    pt3dadd(-75.5667458600642, -103.748403763481, 5.89583570258252, 2.23)
    pt3dadd(-75.7799760831858, -104.693152372812, 5.93347326374484, 2.23)
    pt3dadd(-76.4511964422119, -105.406456027187, 5.73182722166969, 2.23)
    pt3dadd(-77.122416801238, -106.119759681561, 5.53018117959454, 2.23)
    pt3dadd(-77.7936371602641, -106.833063335936, 5.3285351375194, 2.23)
    pt3dadd(-78.4648575192902, -107.546366990311, 5.12688909544424, 2.23)
    pt3dadd(-79.1360778783163, -108.259670644685, 4.92524305336909, 2.23)
    pt3dadd(-79.8072982373424, -108.97297429906, 4.72359701129395, 2.23)
    pt3dadd(-80.4785185963685, -109.686277953435, 4.52195096921879, 2.23)
    pt3dadd(-81.098530392405, -110.449709081231, 4.45336641936265, 2.23)
    pt3dadd(-81.6556437610179, -111.274710756313, 4.54821857076519, 2.23)
    pt3dadd(-82.2127571296307, -112.099712431394, 4.64307072216774, 2.23)
    pt3dadd(-82.7698704982435, -112.924714106475, 4.73792287357028, 2.23)
    pt3dadd(-83.3269838668564, -113.749715781557, 4.83277502497283, 2.23)
    pt3dadd(-83.7962035154517, -114.624916126562, 4.92646180200134, 2.23)
    pt3dadd(-84.2218470394905, -115.525004068688, 5.01957080738853, 2.23)
    pt3dadd(-84.6474905635292, -116.425092010813, 5.1126798127757, 2.23)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(-84.6474905635292, -116.425092010813, 5.1126798127757, 2.23)
    pt3dadd(-85.0731340875679, -117.325179952939, 5.20578881816289, 2.23)
    pt3dadd(-85.4987776116067, -118.225267895064, 5.29889782355008, 2.23)
    pt3dadd(-85.9244211356454, -119.12535583719, 5.39200682893725, 2.23)
    pt3dadd(-86.3500646596841, -120.025443779315, 5.48511583432443, 2.23)
    pt3dadd(-86.7739506922078, -120.925648352193, 5.58062290300813, 2.23)
    pt3dadd(-87.0329167834148, -121.836797351658, 5.90116005277255, 2.23)
    pt3dadd(-87.2918828746217, -122.747946351123, 6.22169720253699, 2.23)
    pt3dadd(-87.5508489658287, -123.659095350588, 6.54223435230143, 2.23)
    pt3dadd(-87.8098150570357, -124.570244350053, 6.86277150206585, 2.23)
    pt3dadd(-88.0687811482427, -125.481393349518, 7.18330865183029, 2.23)
    pt3dadd(-88.479308252863, -126.376162118956, 7.31782175011075, 2.23)
    pt3dadd(-88.9232754434216, -127.267316790762, 7.41129091414907, 2.23)
    pt3dadd(-89.5063644534524, -127.989904151903, 7.49978679010247, 2.23)
    pt3dadd(-90.467987093841, -128.253840265471, 7.57475095118363, 2.23)
    pt3dadd(-91.4296097342297, -128.517776379039, 7.64971511226481, 2.23)
    pt3dadd(-92.3494119971741, -128.84441289475, 7.72709457077896, 2.23)
    pt3dadd(-92.9655719457102, -129.626293872242, 7.82201061187204, 2.23)
    pt3dadd(-93.5658893689495, -130.4009053842, 7.87699688195855, 2.23)
    pt3dadd(-93.860972585242, -131.035457814326, 7.16266565004734, 2.23)
    pt3dadd(-94.1560558015344, -131.670010244452, 6.44833441813614, 2.23)
    pt3dadd(-94.9555605383266, -132.190831164244, 6.45398671370684, 2.23)
    pt3dadd(-95.8125244203674, -132.698696817248, 6.5416530320759, 2.23)
    pt3dadd(-96.6694883024083, -133.206562470251, 6.62931935044496, 2.23)
    pt3dadd(-97.5264521844491, -133.714428123255, 6.71698566881403, 2.23)
    pt3dadd(-98.3222261522923, -134.282772471718, 6.77122617270669, 2.23)
    pt3dadd(-98.8250464587304, -135.140665441124, 6.66543679480109, 2.23)
    pt3dadd(-99.3278667651685, -135.998558410529, 6.55964741689547, 2.23)
    pt3dadd(-99.8306870716066, -136.856451379935, 6.45385803898987, 2.23)
    pt3dadd(-100.333507378045, -137.714344349341, 6.34806866108426, 2.23)
    pt3dadd(-100.836327684483, -138.572237318747, 6.24227928317866, 2.23)
  }
}
proc shape3d_18() {
  adendMML[15] {
    pt3dadd(-101.339147990921, -139.430130288152, 6.13648990527304, 2.23)
    pt3dadd(-101.841968297359, -140.288023257558, 6.03070052736743, 2.23)
    pt3dadd(-102.418347794118, -141.052394420175, 5.79267795222319, 2.23)
    pt3dadd(-103.05718795161, -141.737354243167, 5.44237337894197, 2.23)
    pt3dadd(-103.696028109103, -142.422314066158, 5.09206880566072, 2.23)
    pt3dadd(-104.334868266596, -143.10727388915, 4.7417642323795, 2.23)
    pt3dadd(-104.973708424089, -143.792233712142, 4.39145965909826, 2.23)
    pt3dadd(-105.612548581582, -144.477193535133, 4.04115508581702, 2.23)
    pt3dadd(-106.189654769842, -145.27260836989, 3.89323291028742, 2.23)
    pt3dadd(-106.753342773625, -146.092031149425, 3.78929955293376, 2.23)
    pt3dadd(-107.317030777408, -146.911453928959, 3.68536619558008, 2.23)
    pt3dadd(-107.880718781191, -147.730876708494, 3.5814328382264, 2.23)
    pt3dadd(-108.444406784975, -148.550299488028, 3.47749948087273, 2.23)
    pt3dadd(-109.008094788758, -149.369722267563, 3.37356612351903, 2.23)
    pt3dadd(-109.571782792541, -150.189145047098, 3.26963276616536, 2.23)
    pt3dadd(-110.135470796324, -151.008567826632, 3.16569940881168, 2.23)
    pt3dadd(-110.747045071149, -151.792067582679, 3.06561357489142, 2.23)
    pt3dadd(-111.38640422279, -152.554723853511, 2.96776017549402, 2.23)
    pt3dadd(-112.025763374432, -153.317380124342, 2.86990677609663, 2.23)
    pt3dadd(-112.665122526073, -154.080036395174, 2.77205337669925, 2.23)
    pt3dadd(-113.304481677714, -154.842692666006, 2.67419997730185, 2.23)
    pt3dadd(-113.943840829356, -155.605348936837, 2.57634657790446, 2.23)
    pt3dadd(-114.583199980997, -156.368005207669, 2.47849317850705, 2.23)
    pt3dadd(-115.222559132638, -157.130661478501, 2.38063977910969, 2.23)
    pt3dadd(-115.861918284279, -157.893317749333, 2.28278637971228, 2.23)
    pt3dadd(-116.501277435921, -158.655974020164, 2.1849329803149, 2.23)
    pt3dadd(-117.135307994552, -159.422499576805, 2.09595149988868, 2.23)
    pt3dadd(-117.659074213233, -160.269092093882, 2.19055624710504, 2.23)
    pt3dadd(-118.182840431915, -161.11568461096, 2.28516099432137, 2.23)
    pt3dadd(-118.706606650597, -161.962277128038, 2.37976574153773, 2.23)
    pt3dadd(-119.230372869278, -162.808869645115, 2.47437048875409, 2.23)
    pt3dadd(-119.744510075174, -163.593536423286, 2.29929921958525, 2.23)
    pt3dadd(-120.247428140539, -164.306051093779, 1.81001784464711, 2.23)
    pt3dadd(-120.750346205903, -165.018565764273, 1.32073646970899, 2.23)
    pt3dadd(-121.253264271268, -165.731080434767, 0.831455094770888, 2.23)
    pt3dadd(-121.756182336632, -166.44359510526, 0.342173719832751, 2.23)
    pt3dadd(-122.259100401997, -167.156109775754, -0.147107655105366, 2.23)
    pt3dadd(-122.762018467361, -167.868624446248, -0.636389030043475, 2.23)
    pt3dadd(-123.264936532726, -168.581139116741, -1.1256704049816, 2.23)
    pt3dadd(-123.823620743513, -169.363440380757, -1.19253896515902, 2.23)
    pt3dadd(-124.403666154584, -170.172473372239, -1.09760246117253, 2.23)
    pt3dadd(-124.983711565654, -170.981506363722, -1.00266595718607, 2.23)
    pt3dadd(-125.563756976725, -171.790539355204, -0.9077294531996, 2.23)
    pt3dadd(-126.143802387795, -172.599572346686, -0.812792949213119, 2.23)
    pt3dadd(-126.723847798866, -173.408605338168, -0.717856445226651, 2.23)
    pt3dadd(-127.303893209937, -174.217638329651, -0.622919941240177, 2.23)
    pt3dadd(-127.883938621007, -175.026671321133, -0.527983437253702, 2.23)
  }
  adendMML[16] {pt3dclear()
    pt3dadd(-127.883938621007, -175.026671321133, -0.527983437253702, 2.23)
    pt3dadd(-127.705952229835, -175.561977602842, -0.902688096570095, 2.23)
    pt3dadd(-127.775224921374, -176.062063920007, -1.76588851917838, 2.23)
    pt3dadd(-127.844497612914, -176.562150237172, -2.62908894178668, 2.23)
    pt3dadd(-127.913770304453, -177.062236554337, -3.49228936439495, 2.23)
    pt3dadd(-127.983042995993, -177.562322871502, -4.35548978700323, 2.23)
    pt3dadd(-128.052315687532, -178.062409188667, -5.21869020961149, 2.23)
    pt3dadd(-128.121588379072, -178.562495505832, -6.0818906322198, 2.23)
    pt3dadd(-128.190861070611, -179.062581822997, -6.94509105482808, 2.23)
    pt3dadd(-128.276573614444, -179.611805190096, -7.70894094037402, 2.23)
    pt3dadd(-128.50309965944, -180.581905820219, -7.6218162115436, 2.23)
    pt3dadd(-128.729625704436, -181.552006450342, -7.53469148271319, 2.23)
    pt3dadd(-128.956151749432, -182.522107080465, -7.44756675388278, 2.23)
    pt3dadd(-129.182677794427, -183.492207710588, -7.36044202505236, 2.23)
    pt3dadd(-129.409203839423, -184.462308340711, -7.27331729622194, 2.23)
    pt3dadd(-129.775538032471, -185.299730096413, -7.45689301782258, 2.23)
    pt3dadd(-130.307501790419, -185.979968279142, -7.96116534007284, 2.23)
    pt3dadd(-130.839465548368, -186.66020646187, -8.4654376623231, 2.23)
    pt3dadd(-131.371429306316, -187.340444644598, -8.96970998457338, 2.23)
    pt3dadd(-131.491401663314, -188.220264939673, -9.18099401752492, 2.23)
    pt3dadd(-131.378634973486, -189.212831642765, -9.22676533582968, 2.23)
    pt3dadd(-131.265868283659, -190.205398345856, -9.27253665413443, 2.23)
    pt3dadd(-131.153101593831, -191.197965048948, -9.31830797243921, 2.23)
    pt3dadd(-131.040334904003, -192.190531752039, -9.36407929074396, 2.23)
    pt3dadd(-130.927568214175, -193.183098455131, -9.40985060904871, 2.23)
    pt3dadd(-130.844977820243, -194.166886861342, -9.49033940256489, 2.23)
    pt3dadd(-131.02192018239, -195.075177082133, -9.86941759409535, 2.23)
    pt3dadd(-131.198862544537, -195.983467302924, -10.2484957856258, 2.23)
    pt3dadd(-131.375804906684, -196.891757523714, -10.6275739771563, 2.23)
    pt3dadd(-131.552747268831, -197.800047744505, -11.0066521686868, 2.23)
    pt3dadd(-131.689074133765, -198.714435283604, -11.3815580015053, 2.23)
    pt3dadd(-131.712052773193, -199.645838992838, -11.744819770146, 2.23)
    pt3dadd(-131.735031412622, -200.577242702071, -12.1080815387867, 2.23)
    pt3dadd(-131.758010052051, -201.508646411305, -12.4713433074274, 2.23)
    pt3dadd(-131.78098869148, -202.440050120539, -12.834605076068, 2.23)
    pt3dadd(-131.803967330908, -203.371453829772, -13.1978668447087, 2.23)
    pt3dadd(-131.826945970337, -204.302857539006, -13.5611286133494, 2.23)
    pt3dadd(-131.849924609766, -205.234261248239, -13.9243903819901, 2.23)
    pt3dadd(-131.872903249194, -206.165664957473, -14.2876521506307, 2.23)
    pt3dadd(-131.895881888623, -207.097068666706, -14.6509139192714, 2.23)
    pt3dadd(-131.930444287242, -208.042591181382, -14.9690731111579, 2.23)
    pt3dadd(-131.982459102012, -209.009385483921, -15.2192794972125, 2.23)
    pt3dadd(-132.034473916781, -209.97617978646, -15.469485883267, 2.23)
    pt3dadd(-132.086488731551, -210.942974089, -15.7196922693215, 2.23)
    pt3dadd(-132.138503546321, -211.909768391539, -15.9698986553761, 2.23)
    pt3dadd(-132.190518361091, -212.876562694078, -16.2201050414306, 2.23)
    pt3dadd(-132.242533175861, -213.843356996617, -16.4703114274852, 2.23)
    pt3dadd(-132.294547990631, -214.810151299156, -16.7205178135397, 2.23)
    pt3dadd(-132.353260965217, -215.766538520469, -16.9972272449215, 2.23)
    pt3dadd(-132.453530234379, -216.658358794291, -17.4383651744411, 2.23)
    pt3dadd(-132.553799503541, -217.550179068114, -17.8795031039606, 2.23)
    pt3dadd(-132.654068772704, -218.441999341936, -18.3206410334802, 2.23)
    pt3dadd(-132.754338041866, -219.333819615759, -18.7617789629997, 2.23)
    pt3dadd(-132.854607311028, -220.225639889581, -19.2029168925193, 2.23)
    pt3dadd(-132.954876580191, -221.117460163404, -19.6440548220388, 2.23)
    pt3dadd(-132.96595886492, -222.077083788978, -19.8440508702001, 2.23)
    pt3dadd(-132.927842356358, -223.074110216188, -19.9110242620835, 2.23)
    pt3dadd(-132.889725847797, -224.071136643397, -19.9779976539669, 2.23)
    pt3dadd(-132.851609339235, -225.068163070607, -20.0449710458503, 2.23)
    pt3dadd(-132.813492830674, -226.065189497817, -20.1119444377337, 2.23)
    pt3dadd(-132.775376322112, -227.062215925027, -20.1789178296171, 2.23)
    pt3dadd(-132.73725981355, -228.059242352237, -20.2458912215005, 2.23)
    pt3dadd(-132.699143304989, -229.056268779446, -20.312864613384, 2.23)
    pt3dadd(-132.661026796427, -230.053295206656, -20.3798380052674, 2.23)
    pt3dadd(-132.622910287866, -231.050321633866, -20.4468113971508, 2.23)
    pt3dadd(-132.48565566244, -231.971944104615, -20.7567980584796, 2.23)
    pt3dadd(-132.300963556036, -232.857485864297, -21.1830663046477, 2.23)
    pt3dadd(-132.116271449632, -233.743027623979, -21.6093345508157, 2.23)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(-132.116271449632, -233.743027623979, -21.6093345508157, 2.23)
    pt3dadd(-131.931579343227, -234.628569383661, -22.0356027969838, 2.23)
    pt3dadd(-131.746887236823, -235.514111143343, -22.4618710431518, 2.23)
    pt3dadd(-131.562195130419, -236.399652903025, -22.8881392893198, 2.23)
    pt3dadd(-131.377503024014, -237.285194662707, -23.3144075354879, 2.23)
    pt3dadd(-131.19281091761, -238.17073642239, -23.7406757816559, 2.23)
    pt3dadd(-131.008118811206, -239.056278182071, -24.1669440278239, 2.23)
    pt3dadd(-130.823426704802, -239.941819941754, -24.593212273992, 2.23)
    pt3dadd(-130.638734598397, -240.827361701436, -25.01948052016, 2.23)
    pt3dadd(-130.454042491993, -241.712903461118, -25.4457487663281, 2.23)
    pt3dadd(-130.269350385589, -242.5984452208, -25.8720170124961, 2.23)
    pt3dadd(-130.084658279184, -243.483986980482, -26.2982852586641, 2.23)
    pt3dadd(-129.924948838931, -244.398174704607, -26.6592533974388, 2.23)
    pt3dadd(-129.802242783597, -245.354791753218, -26.9235014746136, 2.23)
    pt3dadd(-129.679536728262, -246.31140880183, -27.1877495517884, 2.23)
    pt3dadd(-129.556830672927, -247.268025850441, -27.4519976289632, 2.23)
    pt3dadd(-129.434124617593, -248.224642899052, -27.716245706138, 2.23)
    pt3dadd(-129.311418562258, -249.181259947663, -27.9804937833129, 2.23)
    pt3dadd(-129.188712506924, -250.137876996274, -28.2447418604877, 2.23)
    pt3dadd(-129.066006451589, -251.094494044886, -28.5089899376625, 2.23)
    pt3dadd(-128.943300396254, -252.051111093497, -28.7732380148373, 2.23)
    pt3dadd(-128.82059434092, -253.007728142108, -29.0374860920121, 2.23)
    pt3dadd(-128.737107963219, -253.987222239303, -29.1047235788408, 2.23)
    pt3dadd(-128.681543752144, -254.983003486238, -29.031700796788, 2.23)
    pt3dadd(-128.625979541068, -255.978784733174, -28.9586780147352, 2.23)
    pt3dadd(-128.570415329992, -256.97456598011, -28.8856552326823, 2.23)
    pt3dadd(-128.514851118916, -257.970347227045, -28.8126324506295, 2.23)
    pt3dadd(-128.471102334087, -258.959523074534, -28.8027721648928, 2.23)
    pt3dadd(-128.482625829515, -259.917799022026, -29.0883845202159, 2.23)
    pt3dadd(-128.494149324944, -260.876074969517, -29.373996875539, 2.23)
    pt3dadd(-128.505672820372, -261.834350917008, -29.659609230862, 2.23)
    pt3dadd(-128.517196315801, -262.792626864499, -29.9452215861851, 2.23)
    pt3dadd(-128.528719811229, -263.75090281199, -30.2308339415082, 2.23)
    pt3dadd(-128.540243306658, -264.709178759481, -30.5164462968313, 2.23)
    pt3dadd(-128.551766802086, -265.667454706972, -30.8020586521543, 2.23)
    pt3dadd(-128.563290297515, -266.625730654463, -31.0876710074774, 2.23)
    pt3dadd(-128.574813792943, -267.584006601954, -31.3732833628005, 2.23)
    pt3dadd(-128.586337288371, -268.542282549445, -31.6588957181236, 2.23)
    pt3dadd(-128.687237265872, -269.524438405913, -31.813423924693, 2.23)
    pt3dadd(-128.792686024466, -270.507809621008, -31.9612806547861, 2.23)
    pt3dadd(-128.898134783061, -271.491180836103, -32.1091373848793, 2.23)
    pt3dadd(-129.003583541656, -272.474552051198, -32.2569941149724, 2.23)
    pt3dadd(-129.109032300251, -273.457923266292, -32.4048508450656, 2.23)
    pt3dadd(-129.226440627036, -274.436826118665, -32.5400957063962, 2.23)
    pt3dadd(-129.703067314408, -275.281516940467, -32.296529665151, 2.23)
    pt3dadd(-130.17969400178, -276.12620776227, -32.0529636239058, 2.23)
    pt3dadd(-130.656320689152, -276.970898584072, -31.8093975826606, 2.23)
    pt3dadd(-131.132947376523, -277.815589405874, -31.5658315414154, 2.23)
    pt3dadd(-131.609574063895, -278.660280227677, -31.3222655001702, 2.23)
    pt3dadd(-132.086200751267, -279.504971049479, -31.078699458925, 2.23)
    pt3dadd(-132.562827438639, -280.349661871281, -30.8351334176798, 2.23)
    pt3dadd(-133.03945412601, -281.194352693084, -30.5915673764346, 2.23)
    pt3dadd(-133.514949730704, -281.718181935102, -31.2685232714199, 2.23)
    pt3dadd(-133.990396253621, -282.228087830361, -31.9854239492167, 2.23)
    pt3dadd(-134.465842776538, -282.737993725621, -32.7023246270135, 2.23)
    pt3dadd(-134.941289299456, -283.24789962088, -33.4192253048103, 2.23)
    pt3dadd(-135.416735822373, -283.75780551614, -34.1361259826071, 2.23)
    pt3dadd(-135.89218234529, -284.267711411399, -34.8530266604039, 2.23)
  }
  adendMML[17] {pt3dclear()
    pt3dadd(-127.883938621007, -175.026671321133, -0.527983437253702, 2.23)
    pt3dadd(-127.944891582913, -175.72785365736, -0.531536701050115, 2.23)
    pt3dadd(-128.48884828417, -176.557474267057, -0.657396746831964, 2.23)
    pt3dadd(-129.032804985427, -177.387094876753, -0.783256792613805, 2.23)
    pt3dadd(-129.576761686683, -178.21671548645, -0.909116838395647, 2.23)
    pt3dadd(-130.12071838794, -179.046336096147, -1.03497688417748, 2.23)
    pt3dadd(-130.664675089197, -179.875956705844, -1.16083692995934, 2.23)
    pt3dadd(-131.116357555891, -180.751548666666, -1.27342464360493, 2.23)
    pt3dadd(-131.425874239173, -181.697968125307, -1.3655638376305, 2.23)
    pt3dadd(-131.735390922455, -182.644387583948, -1.45770303165607, 2.23)
    pt3dadd(-132.044907605737, -183.590807042589, -1.54984222568162, 2.23)
    pt3dadd(-132.354424289019, -184.53722650123, -1.6419814197072, 2.23)
    pt3dadd(-132.663940972301, -185.483645959871, -1.73412061373275, 2.23)
    pt3dadd(-132.943513993153, -186.415346689391, -1.96300654066278, 2.23)
    pt3dadd(-133.220995485885, -187.346019333722, -2.20144405928313, 2.23)
    pt3dadd(-133.498476978617, -188.276691978052, -2.4398815779035, 2.23)
    pt3dadd(-133.775958471349, -189.207364622383, -2.67831909652385, 2.23)
    pt3dadd(-134.05343996408, -190.138037266714, -2.9167566151442, 2.23)
    pt3dadd(-134.330921456812, -191.068709911044, -3.15519413376457, 2.23)
    pt3dadd(-134.608402949544, -191.999382555375, -3.39363165238493, 2.23)
    pt3dadd(-134.885884442276, -192.930055199706, -3.63206917100528, 2.23)
    pt3dadd(-135.159884598454, -193.870904509355, -3.75476123816264, 2.23)
    pt3dadd(-135.427528099756, -194.830335633263, -3.66611094381979, 2.23)
    pt3dadd(-135.695171601058, -195.789766757171, -3.57746064947695, 2.23)
    pt3dadd(-135.96281510236, -196.749197881079, -3.4888103551341, 2.23)
    pt3dadd(-136.208585488468, -197.714033404855, -3.40099237729412, 2.23)
    pt3dadd(-136.412302182817, -198.68925953665, -3.31477462792395, 2.23)
    pt3dadd(-136.616018877167, -199.664485668446, -3.22855687855375, 2.23)
    pt3dadd(-136.819735571516, -200.639711800241, -3.14233912918357, 2.23)
    pt3dadd(-137.023452265866, -201.614937932037, -3.05612137981338, 2.23)
    pt3dadd(-137.227168960215, -202.590164063832, -2.96990363044323, 2.23)
    pt3dadd(-137.430885654565, -203.565390195628, -2.88368588107304, 2.23)
    pt3dadd(-137.644503474717, -204.537728180072, -2.80395277124858, 2.23)
    pt3dadd(-138.029488340501, -205.460078588472, -2.83645472873214, 2.23)
    pt3dadd(-138.414473206285, -206.382428996873, -2.86895668621571, 2.23)
    pt3dadd(-138.799458072069, -207.304779405274, -2.90145864369927, 2.23)
    pt3dadd(-139.184442937854, -208.227129813674, -2.93396060118283, 2.23)
    pt3dadd(-139.569427803638, -209.149480222075, -2.96646255866641, 2.23)
    pt3dadd(-139.954412669422, -210.071830630476, -2.99896451614998, 2.23)
    pt3dadd(-140.339397535206, -210.994181038876, -3.03146647363356, 2.23)
    pt3dadd(-140.72438240099, -211.916531447277, -3.06396843111711, 2.23)
    pt3dadd(-141.109367266774, -212.838881855678, -3.09647038860068, 2.23)
    pt3dadd(-141.494352132558, -213.761232264079, -3.12897234608425, 2.23)
    pt3dadd(-141.772591467366, -214.718142799846, -3.08966427833795, 2.23)
    pt3dadd(-142.018588981671, -215.685492006094, -3.02866644126257, 2.23)
    pt3dadd(-142.264586495976, -216.652841212341, -2.96766860418715, 2.23)
    pt3dadd(-142.510584010281, -217.620190418589, -2.90667076711175, 2.23)
    pt3dadd(-142.756581524586, -218.587539624836, -2.84567293003636, 2.23)
    pt3dadd(-143.002579038891, -219.554888831084, -2.78467509296095, 2.23)
    pt3dadd(-143.248576553195, -220.522238037332, -2.72367725588553, 2.23)
    pt3dadd(-143.4945740675, -221.489587243579, -2.66267941881015, 2.23)
    pt3dadd(-143.740571581805, -222.456936449827, -2.60168158173476, 2.23)
    pt3dadd(-143.99587410829, -223.421646311016, -2.5481771577487, 2.23)
    pt3dadd(-144.331532583979, -224.363563394146, -2.55938412907518, 2.23)
    pt3dadd(-144.667191059669, -225.305480477276, -2.57059110040166, 2.23)
    pt3dadd(-145.002849535358, -226.247397560405, -2.58179807172814, 2.23)
    pt3dadd(-145.338508011047, -227.189314643535, -2.59300504305465, 2.23)
    pt3dadd(-145.674166486736, -228.131231726665, -2.60421201438112, 2.23)
    pt3dadd(-146.009824962425, -229.073148809795, -2.61541898570762, 2.23)
    pt3dadd(-146.345483438115, -230.015065892924, -2.62662595703411, 2.23)
    pt3dadd(-146.681141913804, -230.956982976054, -2.63783292836058, 2.23)
    pt3dadd(-147.016800389493, -231.898900059184, -2.64903989968707, 2.23)
    pt3dadd(-147.352458865182, -232.840817142314, -2.66024687101358, 2.23)
    pt3dadd(-147.688117340871, -233.782734225443, -2.67145384234004, 2.23)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(-147.688117340871, -233.782734225443, -2.67145384234004, 2.23)
    pt3dadd(-147.96758697517, -234.735025210398, -2.73151365034191, 2.23)
    pt3dadd(-148.133400165828, -235.708300091067, -2.89039093777345, 2.23)
    pt3dadd(-148.299213356486, -236.681574971737, -3.04926822520497, 2.23)
    pt3dadd(-148.465026547144, -237.654849852407, -3.20814551263648, 2.23)
    pt3dadd(-148.630839737802, -238.628124733076, -3.36702280006799, 2.23)
    pt3dadd(-148.79665292846, -239.601399613745, -3.52590008749948, 2.23)
    pt3dadd(-148.962466119118, -240.574674494415, -3.684777374931, 2.23)
    pt3dadd(-149.128279309776, -241.547949375084, -3.84365466236254, 2.23)
    pt3dadd(-149.294092500434, -242.521224255754, -4.00253194979405, 2.23)
    pt3dadd(-149.459905691092, -243.494499136423, -4.16140923722556, 2.23)
    pt3dadd(-149.62571888175, -244.467774017093, -4.32028652465705, 2.23)
  }
}
proc shape3d_19() {
  adendOML[10] {
    pt3dadd(-149.791532072408, -245.441048897762, -4.47916381208857, 2.23)
    pt3dadd(-149.961380409346, -246.413710386675, -4.63605709517806, 2.23)
    pt3dadd(-150.222466699281, -247.372502587, -4.74809041970491, 2.23)
    pt3dadd(-150.483552989215, -248.331294787325, -4.86012374423176, 2.23)
    pt3dadd(-150.74463927915, -249.29008698765, -4.97215706875859, 2.23)
    pt3dadd(-151.005725569085, -250.248879187975, -5.08419039328545, 2.23)
    pt3dadd(-151.266811859019, -251.207671388299, -5.19622371781232, 2.23)
    pt3dadd(-151.527898148954, -252.166463588624, -5.30825704233916, 2.23)
    pt3dadd(-151.788984438888, -253.125255788949, -5.42029036686603, 2.23)
    pt3dadd(-152.050070728823, -254.084047989274, -5.53232369139288, 2.23)
    pt3dadd(-152.311157018758, -255.042840189598, -5.64435701591971, 2.23)
    pt3dadd(-152.572243308692, -256.001632389923, -5.75639034044656, 2.23)
    pt3dadd(-152.833329598627, -256.960424590248, -5.86842366497341, 2.23)
    pt3dadd(-153.178261438175, -257.886730147573, -5.82470392855259, 2.23)
    pt3dadd(-153.577808803373, -258.791874473417, -5.67952937032636, 2.23)
    pt3dadd(-153.977356168571, -259.69701879926, -5.53435481210013, 2.23)
    pt3dadd(-154.376903533769, -260.602163125104, -5.3891802538739, 2.23)
    pt3dadd(-154.776450898967, -261.507307450948, -5.24400569564767, 2.23)
    pt3dadd(-155.1969641512, -262.401595546275, -5.10517079028017, 2.23)
    pt3dadd(-155.762798645882, -263.220635649265, -5.01027803859135, 2.23)
    pt3dadd(-156.328633140564, -264.039675752254, -4.91538528690255, 2.23)
    pt3dadd(-156.894467635245, -264.858715855244, -4.82049253521375, 2.23)
    pt3dadd(-157.460302129927, -265.677755958233, -4.72559978352493, 2.23)
    pt3dadd(-158.026136624609, -266.496796061223, -4.63070703183615, 2.23)
    pt3dadd(-158.591971119291, -267.315836164212, -4.53581428014731, 2.23)
    pt3dadd(-159.157805613973, -268.134876267202, -4.4409215284585, 2.23)
    pt3dadd(-159.723640108655, -268.953916370192, -4.34602877676971, 2.23)
    pt3dadd(-160.225209039529, -269.492226732649, -3.75161099089979, 2.23)
    pt3dadd(-160.715089995244, -269.953750152054, -3.0277064654766, 2.23)
    pt3dadd(-161.394801169022, -270.681134340435, -2.93334035538388, 2.23)
    pt3dadd(-162.0745123428, -271.408518528816, -2.83897424529118, 2.23)
  }
  adendIML[19] {pt3dclear()
    pt3dadd(-71.2802654956736, -92.9630123211537, 8.33234063623884, 2.23)
    pt3dadd(-72.0570838756683, -92.8940126443751, 8.22606495364804, 2.23)
    pt3dadd(-72.9198423992984, -93.3676409847527, 8.04907929011873, 2.23)
    pt3dadd(-73.7826009229284, -93.8412693251302, 7.87209362658943, 2.23)
    pt3dadd(-74.6453594465585, -94.3148976655077, 7.69510796306013, 2.23)
    pt3dadd(-75.3476626704298, -94.9825089552101, 7.60997195886014, 2.23)
    pt3dadd(-75.9297172080103, -95.7954952799172, 7.59367008408574, 2.23)
    pt3dadd(-76.5117717455908, -96.6084816046243, 7.57736820931132, 2.23)
    pt3dadd(-77.0938262831714, -97.4214679293314, 7.56106633453691, 2.23)
    pt3dadd(-77.4572148502047, -98.0433428126626, 8.06691436059407, 2.23)
    pt3dadd(-77.6825734529611, -98.5445811590877, 8.90236251591946, 2.23)
    pt3dadd(-77.9079320557176, -99.045819505513, 9.73781067124485, 2.23)
    pt3dadd(-78.1332906584741, -99.5470578519381, 10.5732588265702, 2.23)
    pt3dadd(-78.3586492612305, -100.048296198363, 11.4087069818956, 2.23)
    pt3dadd(-78.584007863987, -100.549534544788, 12.244155137221, 2.23)
    pt3dadd(-78.8093664667435, -101.050772891214, 13.0796032925464, 2.23)
    pt3dadd(-79.3094105799598, -101.839053746876, 13.2759597179122, 2.23)
    pt3dadd(-79.8531171804594, -102.672961289902, 13.3707296617579, 2.23)
    pt3dadd(-80.3968237809589, -103.506868832929, 13.4654996056036, 2.23)
    pt3dadd(-80.9405303814585, -104.340776375956, 13.5602695494492, 2.23)
    pt3dadd(-81.484236981958, -105.174683918982, 13.6550394932949, 2.23)
    pt3dadd(-82.0279435824575, -106.008591462009, 13.7498094371406, 2.23)
    pt3dadd(-82.5716501829571, -106.842499005036, 13.8445793809863, 2.23)
    pt3dadd(-83.1165106239669, -107.67542279969, 13.9406373690139, 2.23)
    pt3dadd(-83.701574522013, -108.474069685983, 14.0815748949528, 2.23)
    pt3dadd(-84.2866384200591, -109.272716572275, 14.2225124208916, 2.23)
    pt3dadd(-84.8717023181051, -110.071363458568, 14.3634499468305, 2.23)
    pt3dadd(-85.4567662161512, -110.870010344861, 14.5043874727694, 2.23)
    pt3dadd(-86.0512093441748, -111.660624547312, 14.642441749015, 2.23)
    pt3dadd(-86.7919087679605, -112.325980003931, 14.7355356798041, 2.23)
    pt3dadd(-87.5326081917463, -112.991335460551, 14.8286296105932, 2.23)
    pt3dadd(-88.273307615532, -113.656690917171, 14.9217235413823, 2.23)
    pt3dadd(-89.0333650537568, -114.2906284796, 15.0135162383466, 2.23)
    pt3dadd(-89.9639301855933, -114.647833493171, 15.0938475130142, 2.23)
    pt3dadd(-90.8944953174298, -115.005038506742, 15.1741787876819, 2.23)
    pt3dadd(-91.8250604492663, -115.362243520314, 15.2545100623496, 2.23)
    pt3dadd(-92.7218857065123, -115.746337342384, 15.3793268067537, 2.23)
    pt3dadd(-93.3323239848086, -116.358665700801, 15.8817400727691, 2.23)
    pt3dadd(-93.942762263105, -116.970994059219, 16.3841533387845, 2.23)
  }
  adendMML[18] {pt3dclear()
    pt3dadd(-93.942762263105, -116.970994059219, 16.3841533387845, 2.23)
    pt3dadd(-94.5532005414013, -117.583322417636, 16.8865666047999, 2.23)
    pt3dadd(-95.1636388196976, -118.195650776054, 17.3889798708153, 2.23)
    pt3dadd(-95.774077097994, -118.807979134472, 17.8913931368307, 2.23)
    pt3dadd(-96.3845153762903, -119.420307492889, 18.3938064028461, 2.23)
    pt3dadd(-96.9949536545866, -120.032635851307, 18.8962196688615, 2.23)
    pt3dadd(-97.6053919328829, -120.644964209724, 19.3986329348769, 2.23)
    pt3dadd(-98.2158302111793, -121.257292568142, 19.9010462008923, 2.23)
    pt3dadd(-98.827306839387, -121.869926603142, 20.400434157, 2.23)
    pt3dadd(-99.5783358243951, -122.523643019921, 20.4932259136961, 2.23)
    pt3dadd(-100.329364809403, -123.177359436701, 20.5860176703922, 2.23)
    pt3dadd(-101.080393794411, -123.83107585348, 20.6788094270882, 2.23)
    pt3dadd(-101.831422779419, -124.48479227026, 20.7716011837843, 2.23)
    pt3dadd(-102.582451764428, -125.138508687039, 20.8643929404804, 2.23)
    pt3dadd(-103.333480749436, -125.792225103819, 20.9571846971764, 2.23)
    pt3dadd(-104.084509734444, -126.445941520598, 21.0499764538725, 2.23)
    pt3dadd(-104.835538719452, -127.099657937377, 21.1427682105686, 2.23)
    pt3dadd(-105.58656770446, -127.753374354157, 21.2355599672646, 2.23)
    pt3dadd(-106.337596689468, -128.407090770936, 21.3283517239607, 2.23)
    pt3dadd(-107.088625674476, -129.060807187716, 21.4211434806568, 2.23)
    pt3dadd(-107.839654659484, -129.714523604495, 21.5139352373528, 2.23)
    pt3dadd(-108.590683644492, -130.368240021275, 21.6067269940489, 2.23)
    pt3dadd(-109.3417126295, -131.021956438054, 21.699518750745, 2.23)
    pt3dadd(-110.006350595558, -131.760123479153, 21.7938513479165, 2.23)
    pt3dadd(-110.644551362869, -132.524133923496, 21.8886554698643, 2.23)
    pt3dadd(-111.28275213018, -133.28814436784, 21.9834595918121, 2.23)
    pt3dadd(-111.92095289749, -134.052154812183, 22.0782637137599, 2.23)
    pt3dadd(-112.559153664801, -134.816165256526, 22.1730678357078, 2.23)
    pt3dadd(-113.189148240317, -135.585808321698, 22.2678355178941, 2.23)
    pt3dadd(-113.672075343622, -136.456396542414, 22.3619501439812, 2.23)
    pt3dadd(-114.155002446928, -137.32698476313, 22.4560647700682, 2.23)
    pt3dadd(-114.637929550233, -138.197572983846, 22.5501793961552, 2.23)
    pt3dadd(-115.120856653539, -139.068161204562, 22.6442940222423, 2.23)
    pt3dadd(-115.603783756844, -139.938749425278, 22.7384086483293, 2.23)
    pt3dadd(-116.08671086015, -140.809337645994, 22.8325232744163, 2.23)
    pt3dadd(-116.569637963455, -141.67992586671, 22.9266379005034, 2.23)
    pt3dadd(-117.052565066761, -142.550514087426, 23.0207525265904, 2.23)
    pt3dadd(-117.535492170066, -143.421102308142, 23.1148671526775, 2.23)
    pt3dadd(-118.082876204639, -144.246298669785, 23.2091800540872, 2.23)
    pt3dadd(-118.739432499807, -144.994613743876, 23.3038287791979, 2.23)
    pt3dadd(-119.395988794974, -145.742928817966, 23.3984775043086, 2.23)
    pt3dadd(-120.052545090141, -146.491243892057, 23.4931262294192, 2.23)
    pt3dadd(-120.944031137169, -146.898171818331, 23.5750360236194, 2.23)
    pt3dadd(-121.880553150905, -147.239655925326, 23.6545037683821, 2.23)
    pt3dadd(-122.81707516464, -147.581140032321, 23.7339715131447, 2.23)
    pt3dadd(-123.184877360031, -148.478859433885, 23.8236048807879, 2.23)
    pt3dadd(-123.507045556112, -149.421211078302, 23.9140539366004, 2.23)
    pt3dadd(-123.829213752194, -150.36356272272, 24.0045029924129, 2.23)
    pt3dadd(-124.151381948275, -151.305914367137, 24.0949520482254, 2.23)
    pt3dadd(-124.40604376631, -152.262061914958, 24.1826117283851, 2.23)
    pt3dadd(-124.472675878604, -153.256636049013, 24.2625019873676, 2.23)
    pt3dadd(-124.539307990897, -154.251210183068, 24.34239224635, 2.23)
    pt3dadd(-124.605940103191, -155.245784317123, 24.4222825053325, 2.23)
    pt3dadd(-124.672572215484, -156.240358451178, 24.5021727643149, 2.23)
    pt3dadd(-124.739204327778, -157.234932585233, 24.5820630232974, 2.23)
    pt3dadd(-124.805836440071, -158.229506719287, 24.6619532822798, 2.23)
    pt3dadd(-124.872468552365, -159.224080853342, 24.7418435412623, 2.23)
    pt3dadd(-124.939100664658, -160.218654987397, 24.8217338002448, 2.23)
    pt3dadd(-125.005732776952, -161.213229121452, 24.9016240592272, 2.23)
    pt3dadd(-125.072364889245, -162.207803255507, 24.9815143182097, 2.23)
    pt3dadd(-125.185166385205, -163.145286344998, 25.2244470672024, 2.23)
    pt3dadd(-125.369278433609, -163.994589918017, 25.7192057907123, 2.23)
    pt3dadd(-125.553390482013, -164.843893491037, 26.2139645142221, 2.23)
    pt3dadd(-125.737502530418, -165.693197064056, 26.708723237732, 2.23)
    pt3dadd(-125.921614578822, -166.542500637075, 27.2034819612418, 2.23)
    pt3dadd(-126.105726627226, -167.391804210094, 27.6982406847516, 2.23)
    pt3dadd(-126.28983867563, -168.241107783114, 28.1929994082615, 2.23)
    pt3dadd(-126.473950724034, -169.090411356133, 28.6877581317713, 2.23)
    pt3dadd(-126.658062772439, -169.939714929152, 29.1825168552812, 2.23)
    pt3dadd(-127.157180167214, -170.619627568446, 29.4907774937267, 2.23)
    pt3dadd(-128.031074949768, -171.098007464293, 29.5771521675327, 2.23)
    pt3dadd(-128.904969732322, -171.576387360139, 29.6635268413387, 2.23)
    pt3dadd(-129.778864514876, -172.054767255986, 29.7499015151447, 2.23)
    pt3dadd(-130.466934709186, -172.695683109073, 29.8381280060494, 2.23)
    pt3dadd(-130.82573847751, -173.624599781864, 29.9296357699189, 2.23)
    pt3dadd(-131.184542245834, -174.553516454654, 30.0211435337884, 2.23)
    pt3dadd(-131.307748093352, -175.507403049906, 30.1011430003907, 2.23)
    pt3dadd(-131.144023879073, -176.491700021322, 30.167126738693, 2.23)
    pt3dadd(-130.980299664793, -177.475996992738, 30.2331104769952, 2.23)
    pt3dadd(-130.816575450513, -178.460293964153, 30.2990942152974, 2.23)
    pt3dadd(-130.652851236234, -179.444590935569, 30.3650779535997, 2.23)
    pt3dadd(-130.489127021954, -180.428887906985, 30.4310616919019, 2.23)
    pt3dadd(-130.325402807674, -181.4131848784, 30.4970454302041, 2.23)
    pt3dadd(-130.419582616767, -182.365581918655, 30.4228474236094, 2.23)
    pt3dadd(-130.74617182418, -183.289232436422, 30.2223250791426, 2.23)
    pt3dadd(-131.072761031593, -184.212882954188, 30.0218027346758, 2.23)
    pt3dadd(-131.399350239007, -185.136533471955, 29.821280390209, 2.23)
    pt3dadd(-131.72593944642, -186.060183989722, 29.6207580457421, 2.23)
    pt3dadd(-132.031132469748, -186.990200053332, 29.462083333613, 2.23)
    pt3dadd(-132.177013387981, -187.967612816484, 29.6149985000403, 2.23)
    pt3dadd(-132.322894306215, -188.945025579636, 29.7679136664675, 2.23)
    pt3dadd(-132.468775224448, -189.922438342787, 29.9208288328948, 2.23)
    pt3dadd(-132.614656142682, -190.899851105939, 30.0737439993221, 2.23)
    pt3dadd(-132.760537060915, -191.877263869091, 30.2266591657494, 2.23)
    pt3dadd(-132.906417979148, -192.854676632243, 30.3795743321767, 2.23)
    pt3dadd(-133.052298897382, -193.832089395394, 30.532489498604, 2.23)
    pt3dadd(-133.198179815615, -194.809502158546, 30.6854046650312, 2.23)
    pt3dadd(-133.582031838682, -195.491432708784, 30.2066471817481, 2.23)
    pt3dadd(-134.035318008513, -196.087148777847, 29.5435830722534, 2.23)
    pt3dadd(-134.488604178345, -196.68286484691, 28.8805189627588, 2.23)
    pt3dadd(-134.941890348176, -197.278580915972, 28.2174548532641, 2.23)
    pt3dadd(-135.395176518008, -197.874296985035, 27.5543907437694, 2.23)
    pt3dadd(-135.848462687839, -198.470013054098, 26.8913266342747, 2.23)
    pt3dadd(-136.301748857671, -199.06572912316, 26.22826252478, 2.23)
    pt3dadd(-136.755035027502, -199.661445192223, 25.5651984152853, 2.23)
    pt3dadd(-137.208321197334, -200.257161261286, 24.9021343057906, 2.23)
    pt3dadd(-137.661607367165, -200.852877330348, 24.2390701962959, 2.23)
    pt3dadd(-138.114893536997, -201.448593399411, 23.5760060868013, 2.23)
    pt3dadd(-138.837153757425, -202.055473919822, 23.5203419598833, 2.23)
    pt3dadd(-139.624577211232, -202.665059205792, 23.6118301204468, 2.23)
    pt3dadd(-140.412000665038, -203.274644491763, 23.7033182810102, 2.23)
    pt3dadd(-141.081898046298, -203.974082797509, 23.7949872877325, 2.23)
    pt3dadd(-141.463858117663, -204.893659803028, 23.8870993651311, 2.23)
    pt3dadd(-141.845818189028, -205.813236808548, 23.9792114425297, 2.23)
    pt3dadd(-142.227778260394, -206.732813814067, 24.0713235199284, 2.23)
    pt3dadd(-142.609738331759, -207.652390819587, 24.163435597327, 2.23)
    pt3dadd(-142.991698403124, -208.571967825106, 24.2555476747256, 2.23)
    pt3dadd(-143.373658474489, -209.491544830625, 24.3476597521243, 2.23)
    pt3dadd(-143.755618545854, -210.411121836145, 24.4397718295229, 2.23)
    pt3dadd(-144.137578617219, -211.330698841664, 24.5318839069215, 2.23)
    pt3dadd(-144.455636880091, -212.266045824881, 24.5158525699017, 2.23)
    pt3dadd(-144.679169092464, -213.224720374927, 24.3398512712552, 2.23)
    pt3dadd(-144.902701304838, -214.183394924973, 24.1638499726086, 2.23)
    pt3dadd(-145.126233517211, -215.142069475019, 23.987848673962, 2.23)
    pt3dadd(-145.349765729584, -216.100744025065, 23.8118473753154, 2.23)
    pt3dadd(-145.573297941957, -217.059418575112, 23.6358460766688, 2.23)
    pt3dadd(-145.79683015433, -218.018093125158, 23.4598447780223, 2.23)
    pt3dadd(-146.020362366703, -218.976767675204, 23.2838434793757, 2.23)
    pt3dadd(-146.243894579077, -219.93544222525, 23.1078421807291, 2.23)
    pt3dadd(-146.46742679145, -220.894116775296, 22.9318408820825, 2.23)
    pt3dadd(-146.690959003823, -221.852791325343, 22.7558395834359, 2.23)
    pt3dadd(-147.073044920719, -222.764083080799, 22.7812309280605, 2.23)
    pt3dadd(-147.508600870213, -223.659395647507, 22.8745391418184, 2.23)
    pt3dadd(-147.944156819707, -224.554708214215, 22.9678473555763, 2.23)
    pt3dadd(-148.379712769202, -225.450020780923, 23.0611555693342, 2.23)
    pt3dadd(-148.815268718696, -226.345333347632, 23.1544637830921, 2.23)
    pt3dadd(-149.25082466819, -227.24064591434, 23.24777199685, 2.23)
    pt3dadd(-149.541904787874, -228.191277900788, 23.3384871890764, 2.23)
    pt3dadd(-149.812816755047, -229.149632220415, 23.4288404075818, 2.23)
    pt3dadd(-150.083728722219, -230.107986540042, 23.5191936260871, 2.23)
    pt3dadd(-150.354640689391, -231.06634085967, 23.6095468445925, 2.23)
    pt3dadd(-150.625552656563, -232.024695179297, 23.6999000630979, 2.23)
    pt3dadd(-150.896464623735, -232.983049498925, 23.7902532816032, 2.23)
    pt3dadd(-151.167376590907, -233.941403818552, 23.8806065001086, 2.23)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(-151.167376590907, -233.941403818552, 23.8806065001086, 2.23)
    pt3dadd(-151.438288558079, -234.89975813818, 23.970959718614, 2.23)
    pt3dadd(-151.709200525251, -235.858112457807, 24.0613129371193, 2.23)
    pt3dadd(-151.980112492424, -236.816466777435, 24.1516661556247, 2.23)
    pt3dadd(-152.251024459596, -237.774821097062, 24.2420193741301, 2.23)
    pt3dadd(-152.521936426768, -238.73317541669, 24.3323725926354, 2.23)
    pt3dadd(-152.867970731077, -239.643849897964, 24.3004863644793, 2.23)
    pt3dadd(-153.378042618753, -240.450410399869, 24.0016773516153, 2.23)
    pt3dadd(-153.888114506429, -241.256970901775, 23.7028683387514, 2.23)
    pt3dadd(-154.398186394104, -242.063531403681, 23.4040593258874, 2.23)
    pt3dadd(-154.90825828178, -242.870091905586, 23.1052503130234, 2.23)
    pt3dadd(-155.418330169456, -243.676652407492, 22.8064413001595, 2.23)
    pt3dadd(-155.928402057132, -244.483212909397, 22.5076322872955, 2.23)
    pt3dadd(-156.523298696918, -245.22864323116, 22.3259967272515, 2.23)
    pt3dadd(-157.315762221046, -245.831694130298, 22.4172720030783, 2.23)
    pt3dadd(-158.11446262806, -246.416360341912, 22.5264958991103, 2.23)
    pt3dadd(-158.987333274623, -246.782392228937, 22.8491683213118, 2.23)
    pt3dadd(-159.860203921186, -247.148424115962, 23.1718407435133, 2.23)
    pt3dadd(-160.570709145316, -247.078645189075, 22.5985903652044, 2.23)
    pt3dadd(-161.255449129209, -246.939708863097, 21.883168914742, 2.23)
    pt3dadd(-161.940189113102, -246.800772537119, 21.1677474642796, 2.23)
    pt3dadd(-162.624929096995, -246.661836211141, 20.4523260138173, 2.23)
    pt3dadd(-163.309669080888, -246.522899885163, 19.7369045633549, 2.23)
    pt3dadd(-163.994409064782, -246.383963559185, 19.0214831128926, 2.23)
    pt3dadd(-164.679149048675, -246.245027233207, 18.3060616624302, 2.23)
    pt3dadd(-165.363889032568, -246.106090907228, 17.5906402119678, 2.23)
    pt3dadd(-166.134139507977, -245.81237450885, 17.2022300546203, 2.23)
    pt3dadd(-167.009314158074, -245.328737890546, 17.2150734678598, 2.23)
    pt3dadd(-167.884488808171, -244.845101272243, 17.2279168810994, 2.23)
    pt3dadd(-168.759663458268, -244.361464653939, 17.2407602943389, 2.23)
    pt3dadd(-169.634838108365, -243.877828035636, 17.2536037075784, 2.23)
    pt3dadd(-170.510012758462, -243.394191417332, 17.2664471208179, 2.23)
    pt3dadd(-171.339137334024, -242.86809185943, 17.1312673775429, 2.23)
    pt3dadd(-172.137071518195, -242.313231529281, 16.8958293777275, 2.23)
    pt3dadd(-172.935005702367, -241.758371199131, 16.6603913779121, 2.23)
  }
}
proc shape3d_20() {
  adendOML[11] {
    pt3dadd(-173.732939886538, -241.203510868982, 16.4249533780966, 2.23)
    pt3dadd(-174.53087407071, -240.648650538833, 16.1895153782812, 2.23)
    pt3dadd(-175.328808254882, -240.093790208684, 15.9540773784658, 2.23)
    pt3dadd(-175.939748118473, -240.093006242162, 16.4412961240105, 2.23)
    pt3dadd(-176.14407568711, -239.88414865739, 17.3976583744043, 2.23)
  }
  adendIML[20] {pt3dclear()
    pt3dadd(-18.5992727837544, -43.4500924824465, 3.87768077103684, 2.23)
    pt3dadd(-18.8289542735567, -44.2547441631271, 3.74089606027759, 2.23)
    pt3dadd(-18.770403902386, -45.2211472526756, 3.99116975555316, 2.23)
    pt3dadd(-18.7118535312153, -46.1875503422241, 4.24144345082872, 2.23)
    pt3dadd(-18.6533031600446, -47.1539534317726, 4.49171714610429, 2.23)
    pt3dadd(-18.5947527888739, -48.1203565213211, 4.74199084137986, 2.23)
    pt3dadd(-18.5362024177032, -49.0867596108696, 4.99226453665542, 2.23)
    pt3dadd(-18.4776520465325, -50.0531627004181, 5.24253823193099, 2.23)
    pt3dadd(-18.4191016753618, -51.0195657899666, 5.49281192720655, 2.23)
    pt3dadd(-18.3605513041911, -51.9859688795151, 5.74308562248212, 2.23)
    pt3dadd(-18.3020009330204, -52.9523719690636, 5.99335931775769, 2.23)
    pt3dadd(-18.2434505618496, -53.9187750586121, 6.24363301303325, 2.23)
    pt3dadd(-18.1849001906789, -54.8851781481606, 6.49390670830882, 2.23)
    pt3dadd(-18.1263498195082, -55.8515812377091, 6.74418040358438, 2.23)
    pt3dadd(-18.0677994483375, -56.8179843272576, 6.99445409885995, 2.23)
    pt3dadd(-18.0092490771668, -57.7843874168061, 7.24472779413551, 2.23)
    pt3dadd(-17.9506987059961, -58.7507905063546, 7.49500148941108, 2.23)
    pt3dadd(-17.8921483348254, -59.7171935959031, 7.74527518468665, 2.23)
    pt3dadd(-17.8335979636547, -60.6835966854516, 7.99554887996221, 2.23)
    pt3dadd(-17.775047592484, -61.6499997750001, 8.24582257523777, 2.23)
    pt3dadd(-17.7164972213133, -62.6164028645486, 8.49609627051334, 2.23)
    pt3dadd(-17.6579468501426, -63.5828059540971, 8.7463699657889, 2.23)
    pt3dadd(-17.8332074327736, -64.5491013401824, 8.87025124319493, 2.23)
    pt3dadd(-18.0753597782852, -65.5153659130214, 8.95797248828184, 2.23)
    pt3dadd(-18.3175121237968, -66.4816304858603, 9.04569373336875, 2.23)
    pt3dadd(-18.5596644693084, -67.4478950586993, 9.13341497845567, 2.23)
    pt3dadd(-18.8403138589624, -68.4023344419973, 9.22242411877793, 2.23)
    pt3dadd(-19.1768944175863, -69.3395933718593, 9.31330440239516, 2.23)
    pt3dadd(-19.5134749762103, -70.2768523017213, 9.4041846860124, 2.23)
    pt3dadd(-19.8500555348342, -71.2141112315833, 9.49506496962963, 2.23)
    pt3dadd(-20.1866360934582, -72.1513701614453, 9.58594525324687, 2.23)
    pt3dadd(-20.5232166520822, -73.0886290913072, 9.67682553686411, 2.23)
    pt3dadd(-20.8597972107061, -74.0258880211692, 9.76770582048134, 2.23)
    pt3dadd(-21.1963777693301, -74.9631469510312, 9.85858610409858, 2.23)
    pt3dadd(-21.4964790094025, -75.9091504367329, 9.96575515660093, 2.23)
    pt3dadd(-21.7195564855055, -76.8736174966395, 10.1073169099479, 2.23)
    pt3dadd(-21.9426339616086, -77.8380845565461, 10.2488786632948, 2.23)
    pt3dadd(-22.1657114377116, -78.8025516164527, 10.3904404166418, 2.23)
    pt3dadd(-22.3887889138146, -79.7670186763592, 10.5320021699888, 2.23)
    pt3dadd(-22.6118663899176, -80.7314857362658, 10.6735639233357, 2.23)
    pt3dadd(-22.8349438660207, -81.6959527961724, 10.8151256766827, 2.23)
    pt3dadd(-23.0580213421237, -82.660419856079, 10.9566874300296, 2.23)
    pt3dadd(-23.2810988182267, -83.6248869159856, 11.0982491833766, 2.23)
    pt3dadd(-23.5041762943298, -84.5893539758921, 11.2398109367236, 2.23)
    pt3dadd(-23.7272537704328, -85.5538210357987, 11.3813726900705, 2.23)
    pt3dadd(-23.948806880481, -86.5185488249476, 11.5200556421083, 2.23)
    pt3dadd(-24.0302514095414, -87.5072409394935, 11.3941402287513, 2.23)
    pt3dadd(-24.1116959386018, -88.4959330540394, 11.2682248153942, 2.23)
    pt3dadd(-24.1931404676621, -89.4846251685853, 11.1423094020371, 2.23)
    pt3dadd(-24.2745849967225, -90.4733172831312, 11.01639398868, 2.23)
    pt3dadd(-24.3560295257829, -91.4620093976771, 10.8904785753229, 2.23)
    pt3dadd(-24.4374740548433, -92.450701512223, 10.7645631619659, 2.23)
    pt3dadd(-24.5189185839037, -93.4393936267689, 10.6386477486088, 2.23)
    pt3dadd(-24.6003631129641, -94.4280857413148, 10.5127323352517, 2.23)
    pt3dadd(-24.5404071401274, -95.4224449911169, 10.5696757283502, 2.23)
    pt3dadd(-24.4687812095513, -96.4172719565782, 10.6417106841729, 2.23)
    pt3dadd(-24.3971552789752, -97.4120989220393, 10.7137456399955, 2.23)
    pt3dadd(-24.3255293483992, -98.4069258875005, 10.7857805958182, 2.23)
    pt3dadd(-24.2539034178231, -99.4017528529617, 10.8578155516408, 2.23)
    pt3dadd(-24.182277487247, -100.396579818423, 10.9298505074635, 2.23)
    pt3dadd(-24.2752442010396, -101.386565317081, 11.010889606453, 2.23)
    pt3dadd(-24.3967688922923, -102.375710787314, 11.0934909873938, 2.23)
    pt3dadd(-24.5182935835449, -103.364856257547, 11.1760923683346, 2.23)
    pt3dadd(-24.6398182747976, -104.35400172778, 11.2586937492754, 2.23)
    pt3dadd(-24.7613429660503, -105.343147198013, 11.3412951302162, 2.23)
    pt3dadd(-24.8828676573029, -106.332292668247, 11.4238965111569, 2.23)
    pt3dadd(-25.0043923485556, -107.32143813848, 11.5064978920977, 2.23)
    pt3dadd(-25.1259170398083, -108.310583608713, 11.5890992730385, 2.23)
    pt3dadd(-25.2474417310609, -109.299729078946, 11.6717006539793, 2.23)
    pt3dadd(-25.3689664223136, -110.288874549179, 11.7543020349201, 2.23)
    pt3dadd(-25.5346348668226, -111.271385087854, 11.8389100340836, 2.23)
    pt3dadd(-25.7018175940545, -112.253668025533, 11.9235868671608, 2.23)
    pt3dadd(-25.8690003212865, -113.235950963212, 12.0082637002381, 2.23)
    pt3dadd(-26.0361830485184, -114.218233900891, 12.0929405333154, 2.23)
    pt3dadd(-26.2033657757503, -115.20051683857, 12.1776173663927, 2.23)
    pt3dadd(-26.3705485029822, -116.182799776249, 12.2622941994699, 2.23)
  }
  adendMML[19] {pt3dclear()
    pt3dadd(-26.3705485029822, -116.182799776249, 12.2622941994699, 2.23)
    pt3dadd(-26.5377312302142, -117.165082713928, 12.3469710325472, 2.23)
    pt3dadd(-26.7049139574461, -118.147365651607, 12.4316478656245, 2.23)
    pt3dadd(-26.872096684678, -119.129648589286, 12.5163246987018, 2.23)
    pt3dadd(-27.0392794119099, -120.111931526965, 12.601001531779, 2.23)
    pt3dadd(-27.2064621391419, -121.094214464644, 12.6856783648563, 2.23)
    pt3dadd(-27.3736448663738, -122.076497402323, 12.7703551979336, 2.23)
    pt3dadd(-27.5408275936057, -123.058780340002, 12.8550320310109, 2.23)
    pt3dadd(-27.7080103208377, -124.041063277681, 12.9397088640881, 2.23)
    pt3dadd(-27.8751930480696, -125.02334621536, 13.0243856971654, 2.23)
    pt3dadd(-28.053494691238, -126.00379467885, 13.0987599988147, 2.23)
    pt3dadd(-28.2984607684265, -126.973244391718, 13.1113645712433, 2.23)
    pt3dadd(-28.5434268456151, -127.942694104587, 13.123969143672, 2.23)
    pt3dadd(-28.7883929228036, -128.912143817455, 13.1365737161006, 2.23)
    pt3dadd(-29.0333589999921, -129.881593530324, 13.1491782885293, 2.23)
    pt3dadd(-29.2783250771807, -130.851043243192, 13.161782860958, 2.23)
    pt3dadd(-29.5232911543692, -131.820492956061, 13.1743874333866, 2.23)
    pt3dadd(-29.7682572315577, -132.789942668929, 13.1869920058153, 2.23)
    pt3dadd(-30.0132233087463, -133.759392381798, 13.1995965782439, 2.23)
    pt3dadd(-30.2581893859348, -134.728842094666, 13.2122011506726, 2.23)
    pt3dadd(-30.5031554631233, -135.698291807535, 13.2248057231013, 2.23)
    pt3dadd(-30.7481215403119, -136.667741520403, 13.2374102955299, 2.23)
    pt3dadd(-30.9930876175004, -137.637191233272, 13.2500148679586, 2.23)
    pt3dadd(-31.2380536946889, -138.60664094614, 13.2626194403872, 2.23)
    pt3dadd(-31.4830197718775, -139.576090659008, 13.2752240128159, 2.23)
    pt3dadd(-31.534299353571, -140.555364014679, 13.3161609656184, 2.23)
    pt3dadd(-31.4004409594252, -141.544027438247, 13.3841798248786, 2.23)
    pt3dadd(-31.2665825652794, -142.532690861815, 13.4521986841388, 2.23)
    pt3dadd(-31.1327241711336, -143.521354285383, 13.520217543399, 2.23)
    pt3dadd(-30.9988657769878, -144.510017708951, 13.5882364026593, 2.23)
    pt3dadd(-30.865007382842, -145.49868113252, 13.6562552619195, 2.23)
    pt3dadd(-31.0080673142308, -146.45927472077, 13.7378986948616, 2.23)
    pt3dadd(-31.3298793604523, -147.401749094929, 13.8283368558327, 2.23)
    pt3dadd(-31.6516914066737, -148.344223469088, 13.9187750168038, 2.23)
    pt3dadd(-31.9735034528951, -149.286697843248, 14.009213177775, 2.23)
    pt3dadd(-32.2953154991165, -150.229172217407, 14.0996513387461, 2.23)
    pt3dadd(-32.6171275453379, -151.171646591566, 14.1900894997172, 2.23)
    pt3dadd(-32.6783710192423, -152.163332320145, 14.2694518498196, 2.23)
    pt3dadd(-32.7155321273488, -153.15956627888, 14.3477905471979, 2.23)
    pt3dadd(-32.7526932354552, -154.155800237615, 14.4261292445763, 2.23)
    pt3dadd(-32.7898543435616, -155.152034196351, 14.5044679419546, 2.23)
    pt3dadd(-32.8270154516681, -156.148268155086, 14.582806639333, 2.23)
    pt3dadd(-32.8641765597745, -157.144502113821, 14.6611453367113, 2.23)
    pt3dadd(-32.9206145063327, -158.139202788218, 14.7404646567854, 2.23)
    pt3dadd(-33.033291331229, -159.129430208786, 14.8226448775523, 2.23)
    pt3dadd(-33.1459681561254, -160.119657629355, 14.9048250983192, 2.23)
    pt3dadd(-33.2586449810217, -161.109885049923, 14.9870053190861, 2.23)
    pt3dadd(-33.3713218059181, -162.100112470492, 15.069185539853, 2.23)
    pt3dadd(-33.4839986308144, -163.090339891061, 15.1513657606199, 2.23)
    pt3dadd(-33.5966754557108, -164.080567311629, 15.2335459813868, 2.23)
    pt3dadd(-33.7093522806071, -165.070794732198, 15.3157262021537, 2.23)
    pt3dadd(-33.8220291055035, -166.061022152767, 15.3979064229206, 2.23)
    pt3dadd(-34.11670043278, -167.008077752425, 15.4871492635962, 2.23)
    pt3dadd(-34.4544356705836, -167.944917947725, 15.5780632758065, 2.23)
    pt3dadd(-34.7921709083872, -168.881758143025, 15.6689772880167, 2.23)
    pt3dadd(-35.1299061461909, -169.818598338325, 15.759891300227, 2.23)
    pt3dadd(-35.4676413839945, -170.755438533625, 15.8508053124373, 2.23)
    pt3dadd(-35.8053766217982, -171.692278728925, 15.9417193246475, 2.23)
    pt3dadd(-36.1431118596018, -172.629118924225, 16.0326333368578, 2.23)
    pt3dadd(-36.4808470974054, -173.565959119525, 16.123547349068, 2.23)
    pt3dadd(-36.8185823352091, -174.502799314825, 16.2144613612783, 2.23)
    pt3dadd(-37.1563175730127, -175.439639510125, 16.3053753734885, 2.23)
    pt3dadd(-37.4940528108163, -176.376479705425, 16.3962893856988, 2.23)
    pt3dadd(-37.83178804862, -177.313319900724, 16.4872033979091, 2.23)
    pt3dadd(-38.1695232864236, -178.250160096024, 16.5781174101193, 2.23)
    pt3dadd(-38.4462795766932, -179.20481596283, 16.6669213776606, 2.23)
    pt3dadd(-38.6603709899956, -180.177780064005, 16.7535569625891, 2.23)
    pt3dadd(-38.8744624032981, -181.150744165179, 16.8401925475176, 2.23)
    pt3dadd(-39.0885538166006, -182.123708266354, 16.9268281324461, 2.23)
    pt3dadd(-39.302645229903, -183.096672367528, 17.0134637173746, 2.23)
    pt3dadd(-39.5167366432055, -184.069636468703, 17.1000993023031, 2.23)
    pt3dadd(-39.730828056508, -185.042600569877, 17.1867348872316, 2.23)
    pt3dadd(-39.9449194698104, -186.015564671051, 17.27337047216, 2.23)
    pt3dadd(-40.1590108831129, -186.988528772226, 17.3600060570885, 2.23)
    pt3dadd(-40.3731022964153, -187.9614928734, 17.446641642017, 2.23)
    pt3dadd(-40.5871937097178, -188.934456974575, 17.5332772269455, 2.23)
    pt3dadd(-40.7985425280685, -189.907519526112, 17.622337254121, 2.23)
    pt3dadd(-40.8975528809683, -190.884614668275, 17.8107040059111, 2.23)
    pt3dadd(-40.9965632338681, -191.861709810438, 17.9990707577012, 2.23)
    pt3dadd(-41.0955735867679, -192.838804952602, 18.1874375094913, 2.23)
    pt3dadd(-41.1945839396677, -193.815900094765, 18.3758042612814, 2.23)
    pt3dadd(-41.2935942925675, -194.792995236928, 18.5641710130715, 2.23)
    pt3dadd(-41.3926046454673, -195.770090379091, 18.7525377648616, 2.23)
    pt3dadd(-41.4916149983671, -196.747185521254, 18.9409045166517, 2.23)
    pt3dadd(-41.590625351267, -197.724280663417, 19.1292712684418, 2.23)
    pt3dadd(-41.6896357041668, -198.70137580558, 19.3176380202319, 2.23)
    pt3dadd(-41.7886460570666, -199.678470947743, 19.506004772022, 2.23)
    pt3dadd(-41.8876564099664, -200.655566089906, 19.6943715238121, 2.23)
    pt3dadd(-41.9866667628662, -201.632661232069, 19.8827382756022, 2.23)
    pt3dadd(-42.085677115766, -202.609756374232, 20.0711050273923, 2.23)
    pt3dadd(-42.1846874686658, -203.586851516396, 20.2594717791824, 2.23)
    pt3dadd(-42.2861282766342, -204.564279155871, 20.4431913242396, 2.23)
    pt3dadd(-42.439682658097, -205.548836169317, 20.5272659292431, 2.23)
    pt3dadd(-42.5932370395597, -206.533393182764, 20.6113405342465, 2.23)
    pt3dadd(-42.7467914210224, -207.517950196211, 20.69541513925, 2.23)
    pt3dadd(-42.9003458024851, -208.502507209657, 20.7794897442535, 2.23)
    pt3dadd(-43.0172785866155, -209.491590952127, 20.8618248649837, 2.23)
    pt3dadd(-43.1003714625128, -210.484857584089, 20.9425526285131, 2.23)
    pt3dadd(-43.1834643384101, -211.478124216052, 21.0232803920424, 2.23)
    pt3dadd(-43.2665572143074, -212.471390848015, 21.1040081555718, 2.23)
    pt3dadd(-43.3496500902048, -213.464657479978, 21.1847359191012, 2.23)
    pt3dadd(-43.4327429661021, -214.457924111941, 21.2654636826306, 2.23)
    pt3dadd(-43.4857469107762, -215.443673942894, 21.2936739044383, 2.23)
    pt3dadd(-43.3390279246581, -216.379529096079, 20.9732855910297, 2.23)
    pt3dadd(-43.1923089385401, -217.315384249265, 20.652897277621, 2.23)
    pt3dadd(-43.045589952422, -218.25123940245, 20.3325089642124, 2.23)
    pt3dadd(-42.8988709663039, -219.187094555636, 20.0121206508037, 2.23)
    pt3dadd(-42.7521519801859, -220.122949708821, 19.6917323373951, 2.23)
    pt3dadd(-42.6054329940678, -221.058804862006, 19.3713440239864, 2.23)
    pt3dadd(-42.4587140079497, -221.994660015192, 19.0509557105778, 2.23)
    pt3dadd(-42.3119950218317, -222.930515168377, 18.7305673971691, 2.23)
    pt3dadd(-42.1652760357136, -223.866370321562, 18.4101790837605, 2.23)
    pt3dadd(-42.0185570495955, -224.802225474748, 18.0897907703518, 2.23)
    pt3dadd(-41.8718380634774, -225.738080627933, 17.7694024569432, 2.23)
    pt3dadd(-41.7251190773594, -226.673935781119, 17.4490141435345, 2.23)
    pt3dadd(-41.5784000912413, -227.609790934304, 17.1286258301259, 2.23)
    pt3dadd(-41.4316811051232, -228.545646087489, 16.8082375167172, 2.23)
    pt3dadd(-41.2597444083876, -229.482513706701, 16.5556172524154, 2.23)
    pt3dadd(-40.948445930949, -230.424976562942, 16.6775066389498, 2.23)
    pt3dadd(-40.6371474535104, -231.367439419183, 16.7993960254842, 2.23)
    pt3dadd(-40.3258489760717, -232.309902275425, 16.9212854120186, 2.23)
    pt3dadd(-40.0145504986331, -233.252365131666, 17.043174798553, 2.23)
  }
  adendOML[12] {pt3dclear()
    pt3dadd(-40.0145504986331, -233.252365131666, 17.043174798553, 2.23)
    pt3dadd(-39.7032520211945, -234.194827987908, 17.1650641850874, 2.23)
    pt3dadd(-39.3919535437559, -235.137290844149, 17.2869535716218, 2.23)
    pt3dadd(-39.0806550663173, -236.07975370039, 17.4088429581562, 2.23)
    pt3dadd(-38.7693565888787, -237.022216556632, 17.5307323446906, 2.23)
    pt3dadd(-38.4580581114401, -237.964679412873, 17.652621731225, 2.23)
    pt3dadd(-38.1467596340015, -238.907142269114, 17.7745111177594, 2.23)
    pt3dadd(-37.875603885326, -239.806505121608, 17.4684123893249, 2.23)
    pt3dadd(-37.609593783076, -240.700343253012, 17.107452529576, 2.23)
    pt3dadd(-37.343583680826, -241.594181384416, 16.7464926698271, 2.23)
    pt3dadd(-37.0775735785761, -242.488019515819, 16.3855328100782, 2.23)
    pt3dadd(-36.8115634763261, -243.381857647223, 16.0245729503293, 2.23)
    pt3dadd(-36.5455533740761, -244.275695778626, 15.6636130905804, 2.23)
    pt3dadd(-36.2795432718262, -245.16953391003, 15.3026532308315, 2.23)
    pt3dadd(-36.0072869968224, -246.016741261115, 14.8506902008661, 2.23)
    pt3dadd(-35.7327419641941, -246.846861900352, 14.3653812792794, 2.23)
    pt3dadd(-35.4581969315657, -247.676982539589, 13.8800723576927, 2.23)
    pt3dadd(-35.1836518989374, -248.507103178826, 13.394763436106, 2.23)
    pt3dadd(-34.909106866309, -249.337223818063, 12.9094545145193, 2.23)
    pt3dadd(-34.6345618336807, -250.1673444573, 12.4241455929326, 2.23)
    pt3dadd(-34.3600168010523, -250.997465096538, 11.9388366713459, 2.23)
    pt3dadd(-34.085471768424, -251.827585735775, 11.4535277497592, 2.23)
    pt3dadd(-33.8109267357956, -252.657706375012, 10.9682188281725, 2.23)
    pt3dadd(-33.5363817031673, -253.487827014249, 10.4829099065858, 2.23)
    pt3dadd(-33.2618366705389, -254.317947653486, 9.99760098499911, 2.23)
    pt3dadd(-33.0596244843389, -255.215028416556, 9.63464794616995, 2.23)
    pt3dadd(-32.9236939340326, -256.173467563354, 9.38381475981248, 2.23)
    pt3dadd(-32.7877633837264, -257.131906710152, 9.13298157345501, 2.23)
    pt3dadd(-32.6518328334201, -258.090345856951, 8.88214838709756, 2.23)
    pt3dadd(-32.5159022831139, -259.048785003749, 8.63131520074009, 2.23)
    pt3dadd(-32.3799717328076, -260.007224150547, 8.38048201438262, 2.23)
    pt3dadd(-32.2440411825014, -260.965663297345, 8.12964882802516, 2.23)
    pt3dadd(-32.1081106321951, -261.924102444143, 7.8788156416677, 2.23)
    pt3dadd(-31.9721800818889, -262.882541590941, 7.62798245531023, 2.23)
    pt3dadd(-31.7784794561481, -263.850582805722, 7.5848422938204, 2.23)
    pt3dadd(-31.5556057068765, -264.823472937755, 7.64658436115579, 2.23)
    pt3dadd(-31.3327319576049, -265.796363069788, 7.70832642849117, 2.23)
    pt3dadd(-31.1098582083332, -266.769253201821, 7.77006849582655, 2.23)
    pt3dadd(-30.8869844590616, -267.742143333853, 7.83181056316194, 2.23)
    pt3dadd(-30.66411070979, -268.715033465886, 7.89355263049732, 2.23)
    pt3dadd(-30.4412369605183, -269.687923597919, 7.9552946978327, 2.23)
    pt3dadd(-30.2183632112467, -270.660813729952, 8.01703676516809, 2.23)
    pt3dadd(-29.995489461975, -271.633703861985, 8.07877883250347, 2.23)
    pt3dadd(-29.7726157127034, -272.606593994017, 8.14052089983885, 2.23)
    pt3dadd(-29.5497419634317, -273.57948412605, 8.20226296717424, 2.23)
    pt3dadd(-29.3605181780329, -274.557803828085, 8.26633702521681, 2.23)
  }
}
proc shape3d_21() {
  adendOML[12] {
    pt3dadd(-29.2571876123732, -275.549982779747, 8.33636360644781, 2.23)
    pt3dadd(-29.1538570467135, -276.542161731409, 8.40639018767881, 2.23)
    pt3dadd(-29.0505264810538, -277.534340683071, 8.47641676890981, 2.23)
    pt3dadd(-28.9471959153941, -278.526519634734, 8.54644335014081, 2.23)
    pt3dadd(-28.9131731928376, -279.503166705381, 8.72958147668217, 2.23)
    pt3dadd(-28.9236877464082, -280.469832976706, 8.98540517387604, 2.23)
    pt3dadd(-28.9342022999789, -281.436499248031, 9.2412288710699, 2.23)
    pt3dadd(-28.9447168535495, -282.403165519356, 9.49705256826377, 2.23)
    pt3dadd(-28.9552314071201, -283.369831790681, 9.75287626545763, 2.23)
    pt3dadd(-28.9657459606907, -284.336498062006, 10.0086999626515, 2.23)
    pt3dadd(-28.9762605142613, -285.303164333331, 10.2645236598454, 2.23)
    pt3dadd(-28.9785980183736, -286.244284265525, 10.5901735114014, 2.23)
    pt3dadd(-28.9688932189538, -287.147782220315, 11.0186560227815, 2.23)
    pt3dadd(-28.9591884195341, -288.051280175105, 11.4471385341616, 2.23)
    pt3dadd(-28.9494836201143, -288.954778129895, 11.8756210455416, 2.23)
    pt3dadd(-28.9397788206945, -289.858276084685, 12.3041035569217, 2.23)
    pt3dadd(-28.9300740212747, -290.761774039475, 12.7325860683018, 2.23)
    pt3dadd(-28.9203692218549, -291.665271994265, 13.1610685796819, 2.23)
    pt3dadd(-28.9106644224351, -292.568769949055, 13.5895510910619, 2.23)
    pt3dadd(-28.9009596230153, -293.472267903845, 14.018033602442, 2.23)
    pt3dadd(-28.9929552861226, -294.309117688643, 14.4295626080091, 2.23)
    pt3dadd(-29.9072186793889, -294.60710424611, 14.7040192699833, 2.23)
    pt3dadd(-30.8214820726552, -294.905090803577, 14.9784759319575, 2.23)
    pt3dadd(-31.7357454659215, -295.203077361045, 15.2529325939317, 2.23)
    pt3dadd(-32.4433896096439, -294.627288916401, 15.2814114392678, 2.23)
    pt3dadd(-33.111245097625, -293.883237675182, 15.2625223521009, 2.23)
    pt3dadd(-33.7791005856061, -293.139186433963, 15.2436332649339, 2.23)
    pt3dadd(-34.4469560735872, -292.395135192744, 15.2247441777669, 2.23)
    pt3dadd(-35.1148115615683, -291.651083951525, 15.2058550906, 2.23)
    pt3dadd(-35.7826670495494, -290.907032710306, 15.186966003433, 2.23)
    pt3dadd(-36.4505225375305, -290.162981469087, 15.168076916266, 2.23)
    pt3dadd(-37.1408298258437, -289.483319353118, 15.1553930277283, 2.23)
    pt3dadd(-38.1250373622284, -289.64652861513, 15.2239368977445, 2.23)
    pt3dadd(-39.1092448986132, -289.809737877142, 15.2924807677607, 2.23)
    pt3dadd(-40.093452434998, -289.972947139155, 15.3610246377769, 2.23)
    pt3dadd(-41.0776599713827, -290.136156401167, 15.429568507793, 2.23)
    pt3dadd(-42.0618675077675, -290.29936566318, 15.4981123778092, 2.23)
    pt3dadd(-43.0460750441522, -290.462574925192, 15.5666562478254, 2.23)
    pt3dadd(-43.9676194644092, -290.797437976029, 15.6447643474727, 2.23)
    pt3dadd(-44.8283000488391, -291.299026026639, 15.7321620537984, 2.23)
    pt3dadd(-45.6889806332689, -291.800614077249, 15.8195597601242, 2.23)
    pt3dadd(-46.5496612176988, -292.302202127859, 15.9069574664499, 2.23)
    pt3dadd(-47.4103418021286, -292.803790178468, 15.9943551727757, 2.23)
    pt3dadd(-48.2710223865585, -293.305378229078, 16.0817528791015, 2.23)
    pt3dadd(-49.2455335538387, -293.510635894426, 16.1529616164465, 2.23)
    pt3dadd(-50.2235674129711, -293.706723083724, 16.2236693570673, 2.23)
    pt3dadd(-51.2016012721035, -293.902810273023, 16.2943770976881, 2.23)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
  shape3d_20()
  shape3d_21()
}

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, 20 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 19 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 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_10