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_12

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[13]
create adendIML[17]
create adendMML[20]
create adendOML[12]
create soma[3]
create axonh[1]

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-2.56655071427499, 80.5633837522018, 0, 10.5)
    pt3dadd(-2.56645071427499, 80.5633837522018, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-2.56645071427499, 80.5633837522018, 0, 10.2667572303772)
    pt3dadd(-2.89965908087085, 79.811370783433, -0.568725486710531, 10.2667572303772)
    pt3dadd(-3.2328674474667, 79.0593578146643, -1.13745097342106, 9.58775356515897)
    pt3dadd(-3.56607581406255, 78.3073448458955, -1.70617646013159, 8.52332145975835)
    pt3dadd(-3.8992841806584, 77.5553318771268, -2.27490194684212, 7.16804037792358)
    pt3dadd(-4.23249254725425, 76.803318908358, -2.84362743355265, 5.64233299132873)
    pt3dadd(-4.56570091385011, 76.0513059395893, -3.41235292026319, 5.01707880407221)
    pt3dadd(-4.89890928044596, 75.2992929708205, -3.98107840697372, 5.01635860475092)
    pt3dadd(-5.23211764704181, 74.5472800020518, -4.54980389368425, 5.01563840542962)
    pt3dadd(-5.56532601363766, 73.795267033283, -5.11852938039478, 5.01491820610832)
    pt3dadd(-5.89853438023351, 73.0432540645143, -5.68725486710531, 5.01419800678702)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-5.89853438023351, 73.0432540645143, -5.68725486710531, 5.01347780746572)
    pt3dadd(-6.23174274682937, 72.2912410957455, -6.25598035381584, 5.01347780746572)
    pt3dadd(-6.56495111342522, 71.5392281269767, -6.82470584052637, 5.01275760814443)
    pt3dadd(-6.89815948002107, 70.787215158208, -7.3934313272369, 5.01203740882313)
    pt3dadd(-7.23136784661692, 70.0352021894392, -7.96215681394743, 5.01131720950183)
    pt3dadd(-7.56457621321277, 69.2831892206705, -8.53088230065796, 5.01059701018053)
    pt3dadd(-7.89116300457097, 68.5431348398932, -8.91780907397126, 4.91406124645788)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-7.89116300457097, 68.5431348398932, -8.91780907397126, 4.35317556482299)
    pt3dadd(-8.55121335084409, 67.7533548986187, -8.79020135376834, 4.35317556482299)
    pt3dadd(-9.15786927845996, 66.979303234934, -8.60905884789105, 3.7922898831881)
    pt3dadd(-9.76452520607585, 66.2052515712493, -8.42791634201376, 3.23140420155321)
    pt3dadd(-10.2488913858591, 65.3664671543551, -8.27846891284814, 2.84199277509646)
    pt3dadd(-10.4935564289807, 64.4007995375316, -8.19114726322674, 2.78868944112407)
    pt3dadd(-10.7382214721022, 63.435131920708, -8.10382561360534, 2.73538610715168)
    pt3dadd(-10.9828865152238, 62.4694643038844, -8.01650396398393, 2.68208277317929)
    pt3dadd(-11.2275515583453, 61.5037966870609, -7.92918231436253, 2.6287794392069)
    pt3dadd(-11.4449368777173, 60.5966482933284, -8.24145955346853, 2.62)
    pt3dadd(-11.6569430478144, 59.7010390060525, -8.63253165473121, 2.62)
    pt3dadd(-11.8689492179115, 58.8054297187767, -9.02360375599389, 2.62)
    pt3dadd(-12.6161221338495, 58.1571118947817, -9.14264213263719, 2.62)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-12.6161221338495, 58.1571118947817, -9.14264213263719, 2.54361612729634)
    pt3dadd(-12.6633628289323, 57.3572694925143, -9.18219863161088, 2.54361612729634)
    pt3dadd(-12.2361150361828, 56.4531958566565, -9.17170174933336, 2.41612288691763)
    pt3dadd(-11.8088672434334, 55.5491222207986, -9.16120486705583, 2.28862964653892)
    pt3dadd(-11.3816194506839, 54.6450485849408, -9.15070798477831, 2.16113640616021)
    pt3dadd(-10.9543716579344, 53.740974949083, -9.14021110250079, 2.03364316578149)
    pt3dadd(-10.5321575702257, 52.8420700382278, -9.11105319020784, 1.91)
    pt3dadd(-10.2715983313081, 52.1091560728038, -8.48260589543991, 1.91)
    pt3dadd(-10.0110390923905, 51.3762421073798, -7.85415860067199, 1.91)
    pt3dadd(-9.75047985347293, 50.6433281419557, -7.22571130590406, 1.91)
    pt3dadd(-9.48992061455533, 49.9104141765317, -6.59726401113613, 1.91)
    pt3dadd(-8.76028215644136, 49.2292506545976, -6.54186544375227, 1.91)
    pt3dadd(-8.03015429543346, 48.5481411252851, -6.48706475343069, 1.91)
    pt3dadd(-7.45083863485013, 47.7384667851041, -6.45507279560553, 1.91)
    pt3dadd(-6.90107391511292, 46.9036007753488, -6.42755010155928, 1.91)
    pt3dadd(-6.35130919537572, 46.0687347655935, -6.40002740751303, 1.91)
    pt3dadd(-5.80154447563851, 45.2338687558382, -6.37250471346678, 1.91)
    pt3dadd(-5.2517797559013, 44.3990027460829, -6.34498201942053, 1.91)
    pt3dadd(-4.70201503616409, 43.5641367363277, -6.31745932537428, 1.91)
    pt3dadd(-4.16186598657267, 42.7234553401519, -6.29128926383344, 1.91)
    pt3dadd(-3.68243321941943, 41.8460538153697, -6.27366013766043, 1.91)
    pt3dadd(-3.20300045226618, 40.9686522905875, -6.25603101148741, 1.91)
    pt3dadd(-2.72356768511294, 40.0912507658053, -6.2384018853144, 1.91)
    pt3dadd(-2.2441349179597, 39.2138492410231, -6.22077275914139, 1.91)
    pt3dadd(-1.76470215080646, 38.3364477162408, -6.20314363296838, 1.91)
    pt3dadd(-1.24261644880919, 37.5167303031872, -6.17815381748996, 1.91)
    pt3dadd(-0.270576744605426, 37.3055336643993, -6.07551467672897, 1.91)
    pt3dadd(0.491905743771599, 36.9036522596239, -5.90990864277987, 1.88615690679212)
  }
  GCL[3] {pt3dclear()
    pt3dadd(0.491905743771599, 36.9036522596239, -5.90990864277987, 1.81283745531855)
    pt3dadd(0.311566016113255, 35.925774354299, -5.53729086084883, 1.81283745531855)
    pt3dadd(0.255879982197599, 34.9921434421575, -5.18340898010251, 1.73951800384498)
    pt3dadd(0.200695651522316, 34.0573327112622, -4.83291915950375, 1.66545923496797)
    pt3dadd(0.154686090882258, 33.1009463458529, -4.54446077361621, 1.5778803876588)
    pt3dadd(0.108676530242201, 32.1445599804436, -4.25600238772867, 1.49030154034962)
    pt3dadd(0.062666969602144, 31.1881736150342, -3.96754400184113, 1.40272269304044)
    pt3dadd(0.0166574089620863, 30.2317872496249, -3.67908561595359, 1.31514384573126)
    pt3dadd(-0.0293521516779709, 29.2754008842156, -3.39062723006605, 1.22756499842208)
    pt3dadd(0.0162498457047744, 28.2981035534676, -3.283592548583, 1.19)
    pt3dadd(0.130660545259979, 27.305100165349, -3.31282374787764, 1.19)
    pt3dadd(0.245071244815184, 26.3120967772304, -3.34205494717227, 1.19)
    pt3dadd(0.359481944370391, 25.3190933891117, -3.37128614646691, 1.19)
    pt3dadd(0.298571751388419, 24.3303356780581, -3.36714219256834, 1.19)
    pt3dadd(0.135168152949317, 23.3440600094728, -3.34348696959669, 1.19)
    pt3dadd(-0.0282354454897846, 22.3577843408876, -3.31983174662503, 1.19)
    pt3dadd(-0.0967315341046464, 21.4192782335221, -3.50703103503922, 1.19)
    pt3dadd(-0.0299355859634254, 20.5488683310232, -3.99480649869419, 1.19)
    pt3dadd(0.0368603621777948, 19.6784584285244, -4.48258196234916, 1.19)
    pt3dadd(-0.0410022609802461, 18.766703625712, -4.78496326494757, 1.19)
    pt3dadd(-0.299556186763661, 17.8033053991643, -4.85577092376134, 1.19)
    pt3dadd(-0.558110112547077, 16.8399071726166, -4.92657858257512, 1.19)
    pt3dadd(-0.816664038330492, 15.8765089460688, -4.99738624138889, 1.19)
    pt3dadd(-1.0654623096507, 14.9105778834437, -5.06718141807986, 1.19)
    pt3dadd(-1.29474837748608, 13.9395809164116, -5.13495153768425, 1.19)
    pt3dadd(-1.52403444532145, 12.9685839493796, -5.20272165728864, 1.19)
    pt3dadd(-1.75332051315682, 11.9975869823476, -5.27049177689303, 1.19)
    pt3dadd(-1.86172649389901, 11.0331313437897, -5.47071729312356, 1.19)
    pt3dadd(-1.90262115318347, 10.0723290259729, -5.74491892134635, 1.19)
    pt3dadd(-1.94351581246793, 9.11152670815621, -6.01912054956914, 1.19)
    pt3dadd(-1.98441047175239, 8.15072439033951, -6.29332217779193, 1.19)
    pt3dadd(-2.02530513103684, 7.18992207252278, -6.56752380601472, 1.19)
    pt3dadd(-2.0354777679122, 6.20386150292042, -6.68857831428745, 1.19)
    pt3dadd(-2.02978756823946, 5.2047592294149, -6.73055769855864, 1.19)
    pt3dadd(-2.02409736856672, 4.20565695590938, -6.77253708282982, 1.19)
    pt3dadd(-2.01840716889398, 3.20655468240386, -6.814516467101, 1.19)
    pt3dadd(-2.01879947567304, 2.21591422261974, -6.89095809049159, 1.19)
    pt3dadd(-2.07919826982157, 1.30875311829861, -7.30738421415852, 1.19)
    pt3dadd(-2.13959706397011, 0.401592013977478, -7.72381033782545, 1.19)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-2.13959706397011, 0.401592013977478, -7.72381033782545, 1.19)
    pt3dadd(-2.19999585811864, -0.50556909034367, -8.14023646149237, 1.19)
    pt3dadd(-2.26039465226718, -1.4127301946648, -8.55666258515931, 1.19)
    pt3dadd(-2.30799606225081, -2.36056223842905, -8.80812486831563, 1.19)
    pt3dadd(-2.33967720905762, -3.35898993918386, -8.85436804405528, 1.19)
    pt3dadd(-2.37135835586442, -4.35741763993866, -8.90061121979494, 1.19)
    pt3dadd(-2.40303950267122, -5.35584534069346, -8.94685439553459, 1.19)
    pt3dadd(-2.43472064947802, -6.35427304144825, -8.99309757127425, 1.19)
    pt3dadd(-2.46640179628483, -7.35270074220306, -9.0393407470139, 1.19)
    pt3dadd(-2.49808294309163, -8.35112844295786, -9.08558392275356, 1.19)
    pt3dadd(-2.52976408989843, -9.34955614371266, -9.13182709849321, 1.19)
    pt3dadd(-2.60766347938696, -10.3444950266787, -9.18323015725201, 1.19)
    pt3dadd(-2.71501673305273, -11.3372105632055, -9.23792149537406, 1.19)
    pt3dadd(-2.8223699867185, -12.3299260997324, -9.29261283349612, 1.19)
    pt3dadd(-2.92972324038428, -13.3226416362592, -9.34730417161817, 1.19)
    pt3dadd(-3.03707649405005, -14.3153571727861, -9.40199550974023, 1.19)
    pt3dadd(-3.14442974771583, -15.3080727093129, -9.45668684786228, 1.19)
    pt3dadd(-3.2517830013816, -16.3007882458398, -9.51137818598434, 1.19)
    pt3dadd(-3.35913625504738, -17.2935037823666, -9.56606952410639, 1.19)
    pt3dadd(-3.42327662529631, -18.2858937057181, -9.61578341643248, 1.19)
    pt3dadd(-3.29154935002195, -19.2768077477819, -9.64293643080531, 1.19)
    pt3dadd(-3.15982207474759, -20.2677217898457, -9.67008944517814, 1.19)
    pt3dadd(-3.02809479947322, -21.2586358319095, -9.69724245955097, 1.19)
    pt3dadd(-2.89636752419886, -22.2495498739733, -9.7243954739238, 1.19)
    pt3dadd(-2.7646402489245, -23.2404639160372, -9.75154848829663, 1.19)
    pt3dadd(-2.63291297365014, -24.231377958101, -9.77870150266946, 1.19)
    pt3dadd(-2.50118569837578, -25.2222920001648, -9.80585451704229, 1.19)
    pt3dadd(-2.46204947655692, -26.2195638469695, -9.84391409192703, 1.19)
    pt3dadd(-2.44908892541142, -27.2186330575247, -9.88505697265488, 1.19)
    pt3dadd(-2.43612837426592, -28.2177022680799, -9.92619985338272, 1.19)
    pt3dadd(-2.42316782312043, -29.2167714786351, -9.96734273411057, 1.19)
    pt3dadd(-2.41020727197493, -30.2158406891904, -10.0084856148384, 1.19)
    pt3dadd(-2.39724672082943, -31.2149098997456, -10.0496284955663, 1.19)
    pt3dadd(-2.38428616968393, -32.2139791103008, -10.0907713762941, 1.19)
    pt3dadd(-2.37681052184839, -33.2121139232916, -10.1214165691674, 1.19)
    pt3dadd(-2.47548565937429, -34.1921650929251, -9.94889723073227, 1.19)
    pt3dadd(-2.5741607969002, -35.1722162625587, -9.77637789229712, 1.19)
    pt3dadd(-2.6728359344261, -36.1522674321923, -9.60385855386196, 1.19)
    pt3dadd(-2.771511071952, -37.1323186018259, -9.43133921542681, 1.19)
    pt3dadd(-2.66946882873389, -38.1245701851742, -9.4488599099264, 1.16377386019653)
    pt3dadd(-2.55505812917868, -39.1175735732928, -9.47809110922103, 1.13593163281834)
    pt3dadd(-2.44064742962348, -40.1105769614115, -9.50732230851567, 1.10808940544015)
    pt3dadd(-2.32623673006827, -41.1035803495301, -9.53655350781031, 1.08024717806196)
    pt3dadd(-2.21182603051307, -42.0965837376487, -9.56578470710494, 1.05240495068377)
    pt3dadd(-2.09741533095786, -43.0895871257674, -9.59501590639958, 1.02456272330558)
    pt3dadd(-1.98300463140266, -44.082590513886, -9.62424710569421, 0.996720495927391)
    pt3dadd(-1.86859393184745, -45.0755939020046, -9.65347830498885, 0.968878268549202)
    pt3dadd(-1.79155624159995, -46.070613996887, -9.68560883873683, 0.95)
    pt3dadd(-1.79322682296132, -47.0698813147426, -9.72384542623497, 0.95)
    pt3dadd(-1.79489740432269, -48.0691486325983, -9.76208201373311, 0.95)
    pt3dadd(-1.79656798568407, -49.0684159504539, -9.80031860123125, 0.95)
    pt3dadd(-1.79823856704544, -50.0676832683095, -9.8385551887294, 0.95)
    pt3dadd(-1.79990914840681, -51.0669505861652, -9.87679177622754, 0.95)
    pt3dadd(-1.80157972976819, -52.0662179040208, -9.91502836372568, 0.95)
    pt3dadd(-1.80325031112956, -53.0654852218765, -9.95326495122382, 0.95)
    pt3dadd(-1.80492089249093, -54.0647525397321, -9.99150153872197, 0.95)
    pt3dadd(-1.80850264555505, -55.0639011476585, -10.0324907765281, 0.95)
    pt3dadd(-1.81363334310936, -56.0629535449249, -10.0757109507392, 0.95)
    pt3dadd(-1.81876404066367, -57.0620059421913, -10.1189311249504, 0.95)
    pt3dadd(-1.82389473821798, -58.0610583394577, -10.1621512991615, 0.95)
    pt3dadd(-1.82902543577229, -59.0601107367242, -10.2053714733726, 0.95)
    pt3dadd(-1.8341561333266, -60.0591631339906, -10.2485916475838, 0.95)
    pt3dadd(-1.83928683088091, -61.058215531257, -10.2918118217949, 0.95)
    pt3dadd(-1.83495222141448, -62.0572216015939, -10.3339428077987, 0.95)
    pt3dadd(-1.81048777584683, -63.0561291486079, -10.3737574209633, 0.95)
    pt3dadd(-1.78602333027919, -64.0550366956219, -10.4135720341279, 0.95)
    pt3dadd(-1.76155888471154, -65.053944242636, -10.4533866472926, 0.95)
    pt3dadd(-1.73709443914389, -66.05285178965, -10.4932012604572, 0.95)
    pt3dadd(-1.71262999357624, -67.0517593366641, -10.5330158736218, 0.95)
    pt3dadd(-1.68816554800859, -68.0506668836781, -10.5728304867864, 0.95)
    pt3dadd(-1.70610777367298, -69.048044244396, -10.5798994529924, 0.95)
    pt3dadd(-1.79588303870515, -70.042829608872, -10.5315002751831, 0.95)
    pt3dadd(-1.88565830373733, -71.0376149733481, -10.4831010973739, 0.95)
    pt3dadd(-1.97543356876951, -72.0324003378242, -10.4347019195646, 0.95)
    pt3dadd(-2.06520883380169, -73.0271857023002, -10.3863027417554, 0.95)
    pt3dadd(-2.15498409883386, -74.0219710667763, -10.3379035639462, 0.95)
    pt3dadd(-2.24475936386604, -75.0167564312524, -10.2895043861369, 0.95)
    pt3dadd(-2.33453462889822, -76.0115417957284, -10.2411052083277, 0.95)
    pt3dadd(-2.4243098939304, -77.0063271602045, -10.1927060305184, 0.95)
    pt3dadd(-2.51408515896257, -78.0011125246806, -10.1443068527092, 0.95)
    pt3dadd(-2.57689311562354, -78.9978105954844, -10.164786066645, 0.95)
    pt3dadd(-2.62872369654737, -79.9952872570079, -10.2133030801249, 0.95)
    pt3dadd(-2.68055427747121, -80.9927639185314, -10.2618200936048, 0.95)
    pt3dadd(-2.73238485839504, -81.9902405800549, -10.3103371070847, 0.95)
    pt3dadd(-2.78421543931887, -82.9877172415784, -10.3588541205646, 0.95)
    pt3dadd(-2.83604602024271, -83.9851939031019, -10.4073711340445, 0.95)
    pt3dadd(-2.88787660116654, -84.9826705646254, -10.4558881475244, 0.95)
    pt3dadd(-2.93970718209037, -85.9801472261489, -10.5044051610043, 0.95)
    pt3dadd(-2.9915377630142, -86.9776238876725, -10.5529221744842, 0.95)
    pt3dadd(-3.04336834393804, -87.975100549196, -10.6014391879641, 0.95)
    pt3dadd(-3.06216415258576, -88.9617782161999, -10.4839332526009, 0.95)
    pt3dadd(-3.06683022091712, -89.9438369021205, -10.2954154412028, 0.95)
    pt3dadd(-3.07149628924848, -90.925895588041, -10.1068976298048, 0.95)
    pt3dadd(-3.07616235757984, -91.9079542739616, -9.91837981840669, 0.95)
    pt3dadd(-3.0808284259112, -92.8900129598822, -9.72986200700864, 0.95)
    pt3dadd(-3.08549449424256, -93.8720716458027, -9.54134419561057, 0.95)
    pt3dadd(-3.09016056257391, -94.8541303317233, -9.3528263842125, 0.95)
    pt3dadd(-3.06487397974155, -95.8424484369181, -9.25712898963848, 0.95)
    pt3dadd(-2.99747444435575, -96.8395671863521, -9.29193562919264, 0.95)
    pt3dadd(-2.93007490896994, -97.836685935786, -9.32674226874681, 0.95)
    pt3dadd(-2.86267537358414, -98.83380468522, -9.36154890830097, 0.95)
    pt3dadd(-2.79527583819833, -99.8309234346539, -9.39635554785514, 0.95)
    pt3dadd(-2.72787630281253, -100.828042184088, -9.43116218740931, 0.95)
    pt3dadd(-2.66047676742673, -101.825160933522, -9.46596882696348, 0.95)
    pt3dadd(-2.59307723204092, -102.822279682956, -9.50077546651764, 0.95)
    pt3dadd(-2.54102799988953, -103.770204397803, -9.71929090925514, 0.95)
    pt3dadd(-2.51047516328334, -104.649238328554, -10.1950701361705, 0.95)
    pt3dadd(-2.47992232667715, -105.528272259305, -10.6708493630858, 0.95)
    pt3dadd(-2.45440276775809, -106.444359376766, -10.9008069025889, 0.95)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(-2.45440276775809, -106.444359376766, -10.9008069025889, 0.95)
    pt3dadd(-2.56597335575905, -107.450758209707, -11.0250378746878, 0.95)
    pt3dadd(-2.6400590811961, -108.446704738582, -11.0760458829762, 0.95)
    pt3dadd(-2.71414480663314, -109.442651267456, -11.1270538912647, 0.95)
    pt3dadd(-2.78823053207019, -110.438597796331, -11.1780618995531, 0.95)
    pt3dadd(-2.85885236020685, -111.434720167086, -11.2286795384034, 0.95)
    pt3dadd(-2.87526764188472, -112.433594288334, -11.2731882839322, 0.95)
    pt3dadd(-2.8916829235626, -113.432468409582, -11.317697029461, 0.95)
    pt3dadd(-2.90809820524048, -114.43134253083, -11.3622057749898, 0.95)
    pt3dadd(-2.92451348691835, -115.430216652078, -11.4067145205186, 0.95)
    pt3dadd(-2.94092876859623, -116.429090773326, -11.4512232660474, 0.95)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-2.94092876859623, -116.429090773326, -11.4512232660474, 0.95)
    pt3dadd(-2.95734405027411, -117.427964894574, -11.4957320115762, 0.95)
    pt3dadd(-2.97375933195199, -118.426839015822, -11.540240757105, 0.95)
    pt3dadd(-2.99017461362986, -119.42571313707, -11.5847495026338, 0.95)
    pt3dadd(-3.02847884617652, -120.413292373795, -11.7029329121901, 0.95)
    pt3dadd(-3.10034460742248, -121.383553576717, -11.9340789925473, 0.95)
    pt3dadd(-3.17221036866843, -122.35381477964, -12.1652250729046, 0.95)
    pt3dadd(-3.24407612991439, -123.324075982562, -12.3963711532619, 0.95)
    pt3dadd(-3.31594189116034, -124.294337185484, -12.6275172336191, 0.95)
    pt3dadd(-3.3878076524063, -125.264598388406, -12.8586633139764, 0.95)
    pt3dadd(-3.45967341365225, -126.234859591328, -13.0898093943337, 0.95)
    pt3dadd(-3.5315391748982, -127.20512079425, -13.3209554746909, 0.95)
    pt3dadd(-3.58917377871014, -128.178809493823, -13.3785816915493, 0.95)
    pt3dadd(-3.62555425908858, -129.157617133103, -13.177057335865, 0.95)
    pt3dadd(-3.66193473946702, -130.136424772384, -12.9755329801807, 0.95)
    pt3dadd(-3.69831521984545, -131.115232411664, -12.7740086244964, 0.95)
    pt3dadd(-3.73469570022389, -132.094040050944, -12.572484268812, 0.95)
    pt3dadd(-3.77270557202764, -133.074079142355, -12.3879987640238, 0.95)
    pt3dadd(-3.83308879834115, -134.071027439655, -12.4374756120595, 0.95)
    pt3dadd(-3.89347202465467, -135.067975736954, -12.4869524600951, 0.95)
    pt3dadd(-3.95385525096818, -136.064924034254, -12.5364293081307, 0.95)
    pt3dadd(-4.01423847728169, -137.061872331553, -12.5859061561663, 0.95)
    pt3dadd(-4.0746217035952, -138.058820628853, -12.635383004202, 0.95)
    pt3dadd(-4.13500492990871, -139.055768926152, -12.6848598522376, 0.95)
    pt3dadd(-4.19538815622223, -140.052717223452, -12.7343367002732, 0.95)
    pt3dadd(-4.25577138253574, -141.049665520752, -12.7838135483088, 0.95)
    pt3dadd(-4.29327388642819, -142.047834988909, -12.8307143621287, 0.95)
    pt3dadd(-4.32855617693867, -143.046122952445, -12.8773652124408, 0.95)
    pt3dadd(-4.36383846744915, -144.044410915981, -12.9240160627529, 0.95)
  }
}
proc shape3d_2() {
  adendMML[0] {
    pt3dadd(-4.39912075795963, -145.042698879518, -12.9706669130649, 0.95)
    pt3dadd(-4.43440304847011, -146.040986843054, -13.017317763377, 0.95)
    pt3dadd(-4.46968533898059, -147.03927480659, -13.0639686136891, 0.95)
    pt3dadd(-4.50496762949107, -148.037562770127, -13.1106194640011, 0.95)
    pt3dadd(-4.54024992000155, -149.035850733663, -13.1572703143132, 0.95)
    pt3dadd(-4.62617499359073, -150.017695590056, -13.2882983681059, 0.95)
    pt3dadd(-4.77024485677178, -150.980661527342, -13.5162029054659, 0.95)
    pt3dadd(-4.94819780909844, -151.868386188513, -13.4205371166122, 0.95)
    pt3dadd(-5.17814987127829, -152.640640876879, -12.828300048035, 0.95)
    pt3dadd(-5.40810193345814, -153.412895565244, -12.2360629794577, 0.95)
    pt3dadd(-5.57754513243313, -154.243185702092, -11.806055562717, 0.95)
    pt3dadd(-5.58704242315897, -155.237876424313, -11.8513225090733, 0.95)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(-5.58704242315897, -155.237876424313, -11.8513225090733, 0.95)
    pt3dadd(-6.09786154912397, -156.082399865355, -12.03494333989, 0.95)
    pt3dadd(-6.59513681408652, -156.931335999103, -12.2138979477475, 0.95)
    pt3dadd(-7.09241207904907, -157.780272132851, -12.3928525556051, 0.95)
    pt3dadd(-7.5442832475521, -158.654786138598, -12.5426025392635, 0.95)
    pt3dadd(-7.886575965546, -159.591029895614, -12.6218699515905, 0.95)
    pt3dadd(-8.2288686835399, -160.52727365263, -12.7011373639176, 0.95)
    pt3dadd(-8.57116140153379, -161.463517409646, -12.7804047762446, 0.95)
    pt3dadd(-8.91345411952769, -162.399761166662, -12.8596721885717, 0.95)
    pt3dadd(-9.26798905275209, -163.330975102007, -12.9401311466974, 0.95)
    pt3dadd(-9.66910673140826, -164.243050107182, -13.0251240452553, 0.95)
    pt3dadd(-10.0702244100644, -165.155125112357, -13.1101169438132, 0.95)
    pt3dadd(-10.4713420887206, -166.067200117531, -13.195109842371, 0.95)
    pt3dadd(-10.8724597673767, -166.979275122706, -13.2801027409289, 0.95)
    pt3dadd(-11.2690986887706, -167.893221513903, -13.3646610514676, 0.95)
    pt3dadd(-11.6224680898683, -168.825247468411, -13.4450207832453, 0.95)
    pt3dadd(-11.975837490966, -169.757273422919, -13.5253805150231, 0.95)
    pt3dadd(-12.3292068920638, -170.689299377427, -13.6057402468008, 0.95)
    pt3dadd(-12.6825762931615, -171.621325331934, -13.6860999785785, 0.95)
    pt3dadd(-13.0359456942592, -172.553351286442, -13.7664597103563, 0.95)
    pt3dadd(-13.4038987334623, -173.481576672351, -13.7903835436374, 0.95)
    pt3dadd(-13.7822626864106, -174.407088922375, -13.7740191259935, 0.95)
    pt3dadd(-14.160626639359, -175.332601172399, -13.7576547083496, 0.95)
    pt3dadd(-14.5389905923073, -176.258113422423, -13.7412902907057, 0.95)
    pt3dadd(-14.9173545452557, -177.183625672447, -13.7249258730617, 0.95)
    pt3dadd(-15.295718498204, -178.109137922471, -13.7085614554178, 0.95)
    pt3dadd(-15.6740824511524, -179.034650172495, -13.6921970377739, 0.95)
    pt3dadd(-15.8908983726098, -180.007136455462, -13.7475138041686, 0.95)
    pt3dadd(-16.087419220591, -180.985524026369, -13.8118357864331, 0.95)
    pt3dadd(-16.2839400685722, -181.963911597277, -13.8761577686977, 0.95)
    pt3dadd(-16.4804609165533, -182.942299168184, -13.9404797509622, 0.95)
    pt3dadd(-16.6769817645345, -183.920686739092, -14.0048017332268, 0.95)
    pt3dadd(-16.8735026125156, -184.899074309999, -14.0691237154914, 0.95)
    pt3dadd(-17.0072079226218, -185.887722153595, -14.1266683501178, 0.95)
    pt3dadd(-17.1196484437456, -186.879843381978, -14.1819186659775, 0.95)
    pt3dadd(-17.2320889648694, -187.87196461036, -14.2371689818372, 0.95)
    pt3dadd(-17.3445294859932, -188.864085838742, -14.292419297697, 0.95)
    pt3dadd(-17.4569700071169, -189.856207067124, -14.3476696135567, 0.95)
    pt3dadd(-17.5694105282407, -190.848328295507, -14.4029199294164, 0.95)
    pt3dadd(-17.6810761537673, -191.840539783614, -14.4580850901202, 0.95)
    pt3dadd(-17.7877642343927, -192.833331055418, -14.5127032563462, 0.95)
    pt3dadd(-17.8944523150181, -193.826122327222, -14.5673214225721, 0.95)
    pt3dadd(-18.0011403956435, -194.818913599027, -14.6219395887981, 0.95)
    pt3dadd(-18.1078284762688, -195.811704870831, -14.6765577550241, 0.95)
    pt3dadd(-18.2145165568942, -196.804496142635, -14.7311759212501, 0.95)
    pt3dadd(-18.335843079817, -197.795343307905, -14.7873925419772, 0.95)
    pt3dadd(-18.4798261873501, -198.783181490846, -14.8460831636203, 0.95)
    pt3dadd(-18.6238092948833, -199.771019673787, -14.9047737852634, 0.95)
    pt3dadd(-18.7677924024165, -200.758857856728, -14.9634644069064, 0.95)
    pt3dadd(-18.9117755099496, -201.746696039669, -15.0221550285495, 0.95)
    pt3dadd(-19.0557586174828, -202.73453422261, -15.0808456501925, 0.95)
    pt3dadd(-19.1997417250159, -203.722372405551, -15.1395362718356, 0.95)
    pt3dadd(-19.3437248325491, -204.710210588492, -15.1982268934787, 0.95)
    pt3dadd(-19.4877079400823, -205.698048771433, -15.2569175151217, 0.95)
    pt3dadd(-19.6316910476154, -206.685886954374, -15.3156081367648, 0.95)
    pt3dadd(-19.8150031231905, -207.665083159947, -15.3784474283292, 0.95)
    pt3dadd(-20.0852622724317, -208.625173991537, -15.4504584507381, 0.95)
    pt3dadd(-20.355521421673, -209.585264823127, -15.522469473147, 0.95)
    pt3dadd(-20.6257805709142, -210.545355654717, -15.5944804955559, 0.95)
    pt3dadd(-20.8960397201554, -211.505446486307, -15.6664915179648, 0.95)
    pt3dadd(-21.1662988693967, -212.465537317897, -15.7385025403737, 0.95)
    pt3dadd(-21.4365580186379, -213.425628149487, -15.8105135627826, 0.95)
    pt3dadd(-21.7068171678791, -214.385718981077, -15.8825245851915, 0.95)
    pt3dadd(-21.9770763171204, -215.345809812667, -15.9545356076004, 0.95)
    pt3dadd(-22.2473354663616, -216.305900644257, -16.0265466300093, 0.95)
    pt3dadd(-22.5175946156029, -217.265991475846, -16.0985576524182, 0.95)
    pt3dadd(-22.7163882730917, -218.243821608925, -16.1631169092895, 0.95)
    pt3dadd(-22.9130759445141, -219.222174493906, -16.2274565732635, 0.95)
    pt3dadd(-23.1097636159364, -220.200527378886, -16.2917962372375, 0.95)
    pt3dadd(-23.3064512873587, -221.178880263867, -16.3561359012115, 0.95)
    pt3dadd(-23.503138958781, -222.157233148848, -16.4204755651855, 0.95)
    pt3dadd(-23.6998266302034, -223.135586033829, -16.4848152291595, 0.95)
    pt3dadd(-23.8965143016257, -224.113938918809, -16.5491548931335, 0.95)
    pt3dadd(-24.093201973048, -225.09229180379, -16.6134945571075, 0.95)
    pt3dadd(-24.2898896444703, -226.070644688771, -16.6778342210815, 0.95)
    pt3dadd(-24.4801220185456, -227.050083102999, -16.7414787326511, 0.95)
    pt3dadd(-24.6016171133257, -228.041080446752, -16.7977211243172, 0.95)
    pt3dadd(-24.7231122081057, -229.032077790504, -16.8539635159834, 0.95)
    pt3dadd(-24.8446073028858, -230.023075134256, -16.9102059076495, 0.95)
    pt3dadd(-24.9661023976659, -231.014072478009, -16.9664482993156, 0.95)
    pt3dadd(-25.0875974924459, -232.005069821761, -17.0226906909818, 0.95)
    pt3dadd(-25.209092587226, -232.996067165513, -17.0789330826479, 0.95)
    pt3dadd(-25.3305876820061, -233.987064509265, -17.135175474314, 0.95)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(-25.3305876820061, -233.987064509265, -17.135175474314, 0.95)
    pt3dadd(-25.4520827767861, -234.978061853018, -17.1914178659801, 0.95)
    pt3dadd(-25.5735778715662, -235.96905919677, -17.2476602576463, 0.95)
    pt3dadd(-25.7170707149059, -236.956458639285, -17.3062758445692, 0.95)
    pt3dadd(-25.9050582191013, -237.936580637253, -17.3696916735629, 0.95)
    pt3dadd(-26.0930457232967, -238.91670263522, -17.4331075025566, 0.95)
    pt3dadd(-26.2810332274922, -239.896824633187, -17.4965233315504, 0.95)
    pt3dadd(-26.4690207316876, -240.876946631155, -17.5599391605441, 0.95)
    pt3dadd(-26.657008235883, -241.857068629122, -17.6233549895378, 0.95)
    pt3dadd(-26.8449957400784, -242.837190627089, -17.6867708185315, 0.95)
    pt3dadd(-27.0329832442738, -243.817312625056, -17.7501866475252, 0.95)
    pt3dadd(-27.2209707484692, -244.797434623024, -17.8136024765189, 0.95)
    pt3dadd(-27.4089582526646, -245.777556620991, -17.8770183055126, 0.95)
    pt3dadd(-27.59694575686, -246.757678618958, -17.9404341345063, 0.95)
    pt3dadd(-27.8459055972943, -247.720965261004, -18.0101350286529, 0.95)
    pt3dadd(-28.1739318598382, -248.662420504749, -18.0879861372249, 0.95)
    pt3dadd(-28.5019581223822, -249.603875748494, -18.1658372457968, 0.95)
    pt3dadd(-28.8299843849262, -250.545330992239, -18.2436883543688, 0.95)
    pt3dadd(-29.1580106474701, -251.486786235985, -18.3215394629408, 0.95)
    pt3dadd(-29.4860369100141, -252.42824147973, -18.3993905715128, 0.95)
    pt3dadd(-29.814063172558, -253.369696723475, -18.4772416800848, 0.95)
    pt3dadd(-30.142089435102, -254.311151967221, -18.5550927886568, 0.95)
    pt3dadd(-30.4701156976459, -255.252607210966, -18.6329438972287, 0.95)
    pt3dadd(-30.7981419601899, -256.194062454711, -18.7107950058007, 0.95)
    pt3dadd(-31.1702936449485, -257.117242798484, -18.6301637820854, 0.95)
    pt3dadd(-31.5468578956269, -258.038595642446, -18.5336842400261, 0.95)
    pt3dadd(-31.9234221463052, -258.959948486407, -18.4372046979668, 0.95)
    pt3dadd(-32.2999863969836, -259.881301330368, -18.3407251559075, 0.95)
    pt3dadd(-32.6765506476619, -260.802654174329, -18.2442456138481, 0.95)
    pt3dadd(-33.0531148983402, -261.72400701829, -18.1477660717888, 0.95)
    pt3dadd(-33.4296791490186, -262.645359862251, -18.0512865297295, 0.95)
    pt3dadd(-33.9204679598477, -263.508321432067, -18.1020442794665, 0.95)
    pt3dadd(-34.4467421142028, -264.353142993998, -18.1985432066905, 0.95)
    pt3dadd(-34.9730162685579, -265.197964555928, -18.2950421339144, 0.95)
    pt3dadd(-35.499290422913, -266.042786117858, -18.3915410611384, 0.95)
    pt3dadd(-36.0255645772681, -266.887607679789, -18.4880399883624, 0.95)
    pt3dadd(-36.5518387316232, -267.732429241719, -18.5845389155863, 0.95)
    pt3dadd(-37.0781128859783, -268.577250803649, -18.6810378428103, 0.95)
    pt3dadd(-37.5729710240634, -269.42632114977, -18.8338057516571, 0.95)
    pt3dadd(-37.9860588460472, -270.286450327262, -19.1330318356732, 0.95)
    pt3dadd(-38.399146668031, -271.146579504754, -19.4322579196892, 0.95)
    pt3dadd(-38.8122344900149, -272.006708682246, -19.7314840037052, 0.95)
    pt3dadd(-39.2253223119987, -272.866837859738, -20.0307100877212, 0.95)
    pt3dadd(-39.6384101339826, -273.72696703723, -20.3299361717372, 0.95)
    pt3dadd(-40.0514979559664, -274.587096214722, -20.6291622557532, 0.95)
    pt3dadd(-40.4645857779502, -275.447225392214, -20.9283883397692, 0.95)
    pt3dadd(-41.2540942585916, -276.033758985341, -21.0876273370519, 0.95)
    pt3dadd(-42.0552354328375, -276.611837533476, -21.2425402516633, 0.95)
    pt3dadd(-42.8563766070833, -277.189916081612, -21.3974531662747, 0.95)
    pt3dadd(-43.7268585556981, -277.324000480263, -21.0553539726947, 0.95)
    pt3dadd(-44.6139051122361, -277.35202045905, -20.5945250594058, 0.95)
    pt3dadd(-45.500951668774, -277.380040437838, -20.133696146117, 0.95)
    pt3dadd(-46.3879982253119, -277.408060416625, -19.6728672328281, 0.95)
    pt3dadd(-47.2750447818498, -277.436080395412, -19.2120383195393, 0.95)
    pt3dadd(-48.1620913383877, -277.4641003742, -18.7512094062504, 0.95)
    pt3dadd(-49.0491378949256, -277.492120352987, -18.2903804929616, 0.95)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(-5.58704242315897, -155.237876424313, -11.8513225090733, 0.95)
    pt3dadd(-5.60975370420606, -156.241429105755, -11.8667771107729, 0.95)
    pt3dadd(-5.6460088462556, -157.24056909449, -11.8868979354315, 0.95)
    pt3dadd(-5.68226398830514, -158.239709083226, -11.9070187600902, 0.95)
    pt3dadd(-5.71851913035467, -159.238849071961, -11.9271395847488, 0.95)
    pt3dadd(-5.75477427240421, -160.237989060696, -11.9472604094075, 0.95)
    pt3dadd(-5.81100723003811, -161.235431224648, -11.9801178801284, 0.95)
    pt3dadd(-5.89795203120785, -162.230263327011, -12.0325553634581, 0.95)
    pt3dadd(-5.98489683237759, -163.225095429374, -12.0849928467877, 0.95)
    pt3dadd(-6.07184163354732, -164.219927531737, -12.1374303301174, 0.95)
    pt3dadd(-6.15878643471706, -165.2147596341, -12.189867813447, 0.95)
    pt3dadd(-6.2457312358868, -166.209591736463, -12.2423052967767, 0.95)
    pt3dadd(-6.33267603705654, -167.204423838825, -12.2947427801063, 0.95)
    pt3dadd(-6.4504850791212, -168.191656113619, -12.2606228773051, 0.95)
    pt3dadd(-6.60578949676881, -169.169655749578, -12.1213488670853, 0.95)
    pt3dadd(-6.76109391441643, -170.147655385537, -11.9820748568655, 0.95)
    pt3dadd(-6.91639833206404, -171.125655021497, -11.8428008466457, 0.95)
    pt3dadd(-7.07170274971166, -172.103654657456, -11.7035268364259, 0.95)
    pt3dadd(-7.22700716735927, -173.081654293415, -11.5642528262061, 0.95)
    pt3dadd(-7.38231158500689, -174.059653929374, -11.4249788159863, 0.95)
    pt3dadd(-7.51834774522217, -175.042130656297, -11.3347568929202, 0.95)
    pt3dadd(-7.59863587467796, -176.037560760326, -11.3864552900003, 0.95)
    pt3dadd(-7.67892400413376, -177.032990864355, -11.4381536870804, 0.95)
    pt3dadd(-7.75921213358956, -178.028420968385, -11.4898520841605, 0.95)
    pt3dadd(-7.83950026304536, -179.023851072414, -11.5415504812407, 0.95)
    pt3dadd(-7.91978839250116, -180.019281176443, -11.5932488783208, 0.95)
    pt3dadd(-8.00007652195696, -181.014711280473, -11.6449472754009, 0.95)
    pt3dadd(-8.08036465141276, -182.010141384502, -11.696645672481, 0.95)
    pt3dadd(-8.16065278086856, -183.005571488531, -11.7483440695611, 0.95)
    pt3dadd(-8.22314175433937, -183.994326822888, -11.8357759147804, 0.95)
    pt3dadd(-8.16814224572645, -184.939023407621, -12.1590767295749, 0.95)
    pt3dadd(-8.11314273711353, -185.883719992354, -12.4823775443693, 0.95)
    pt3dadd(-8.05814322850061, -186.828416577086, -12.8056783591638, 0.95)
    pt3dadd(-8.00314371988769, -187.773113161819, -13.1289791739582, 0.95)
    pt3dadd(-7.94814421127477, -188.717809746552, -13.4522799887527, 0.95)
    pt3dadd(-7.89314470266185, -189.662506331284, -13.7755808035471, 0.95)
    pt3dadd(-7.82002749176578, -190.615244683297, -14.0534623463678, 0.95)
    pt3dadd(-7.67516224844823, -191.599829291008, -14.1514787303951, 0.95)
    pt3dadd(-7.53029700513068, -192.584413898719, -14.2494951144224, 0.95)
    pt3dadd(-7.38543176181314, -193.568998506429, -14.3475114984496, 0.95)
    pt3dadd(-7.24056651849559, -194.55358311414, -14.4455278824769, 0.95)
    pt3dadd(-7.09570127517804, -195.538167721851, -14.5435442665041, 0.95)
    pt3dadd(-6.9508360318605, -196.522752329561, -14.6415606505314, 0.95)
    pt3dadd(-6.80597078854295, -197.507336937272, -14.7395770345587, 0.95)
    pt3dadd(-6.6611055452254, -198.491921544983, -14.8375934185859, 0.95)
    pt3dadd(-6.51624030190786, -199.476506152693, -14.9356098026132, 0.95)
    pt3dadd(-6.37137505859031, -200.461090760404, -15.0336261866405, 0.95)
    pt3dadd(-6.22650981527276, -201.445675368115, -15.1316425706677, 0.95)
    pt3dadd(-6.04104073570726, -202.406079560436, -15.3330385432392, 0.95)
    pt3dadd(-5.84719782178005, -203.361496963036, -15.5557547562324, 0.95)
    pt3dadd(-5.65335490785284, -204.316914365635, -15.7784709692256, 0.95)
    pt3dadd(-5.45951199392562, -205.272331768235, -16.0011871822189, 0.95)
    pt3dadd(-5.26566907999841, -206.227749170834, -16.2239033952121, 0.95)
    pt3dadd(-5.07182616607119, -207.183166573434, -16.4466196082053, 0.95)
    pt3dadd(-4.87798325214398, -208.138583976034, -16.6693358211985, 0.95)
    pt3dadd(-4.68414033821676, -209.094001378633, -16.8920520341917, 0.95)
    pt3dadd(-4.56301185343133, -210.08008377218, -16.9636208093085, 0.95)
    pt3dadd(-4.46151008365747, -211.074443106703, -16.9943926240015, 0.95)
    pt3dadd(-4.36000831388362, -212.068802441226, -17.0251644386945, 0.95)
    pt3dadd(-4.25850654410977, -213.063161775749, -17.0559362533875, 0.95)
    pt3dadd(-4.15700477433591, -214.057521110272, -17.0867080680805, 0.95)
    pt3dadd(-4.05550300456206, -215.051880444795, -17.1174798827735, 0.95)
    pt3dadd(-3.95400123478821, -216.046239779319, -17.1482516974665, 0.95)
    pt3dadd(-3.85249946501435, -217.040599113842, -17.1790235121595, 0.95)
    pt3dadd(-3.7509976952405, -218.034958448365, -17.2097953268525, 0.95)
    pt3dadd(-3.64040286378177, -219.028352900922, -17.239481514546, 0.95)
    pt3dadd(-3.52391261312866, -220.021121779404, -17.2684638440152, 0.95)
    pt3dadd(-3.40742236247554, -221.013890657885, -17.2974461734843, 0.95)
    pt3dadd(-3.29093211182243, -222.006659536367, -17.3264285029535, 0.95)
    pt3dadd(-3.17444186116931, -222.999428414848, -17.3554108324227, 0.95)
    pt3dadd(-3.0579516105162, -223.992197293329, -17.3843931618918, 0.95)
    pt3dadd(-2.94146135986308, -224.984966171811, -17.413375491361, 0.95)
    pt3dadd(-2.82497110920997, -225.977735050292, -17.4423578208302, 0.95)
    pt3dadd(-2.70848085855685, -226.970503928774, -17.4713401502993, 0.95)
    pt3dadd(-2.58922479057798, -227.955726154188, -17.4566981130247, 0.95)
    pt3dadd(-2.4490239284736, -228.883799596364, -17.1117004257957, 0.95)
    pt3dadd(-2.30882306636922, -229.81187303854, -16.7667027385667, 0.95)
    pt3dadd(-2.16862220426485, -230.739946480715, -16.4217050513378, 0.95)
    pt3dadd(-2.02842134216047, -231.668019922891, -16.0767073641088, 0.95)
    pt3dadd(-1.9319711124241, -232.606095236659, -15.7726868931153, 0.95)
    pt3dadd(-2.05210829630833, -233.59368479473, -15.6715240450045, 0.95)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(-2.05210829630833, -233.59368479473, -15.6715240450045, 0.95)
    pt3dadd(-2.17224548019256, -234.5812743528, -15.5703611968937, 0.95)
    pt3dadd(-2.29238266407679, -235.568863910871, -15.4691983487829, 0.95)
    pt3dadd(-2.41251984796102, -236.556453468942, -15.3680355006722, 0.95)
    pt3dadd(-2.53265703184525, -237.544043027013, -15.2668726525614, 0.95)
    pt3dadd(-2.65279421572948, -238.531632585084, -15.1657098044506, 0.95)
    pt3dadd(-2.77482080819521, -239.519373319059, -15.0826720958999, 0.95)
    pt3dadd(-2.91153931841758, -240.508289586996, -15.1405742890477, 0.95)
    pt3dadd(-3.04825782863995, -241.497205854934, -15.1984764821954, 0.95)
    pt3dadd(-3.18497633886232, -242.486122122871, -15.2563786753432, 0.95)
    pt3dadd(-3.32169484908469, -243.475038390808, -15.3142808684909, 0.95)
    pt3dadd(-3.45841335930707, -244.463954658746, -15.3721830616387, 0.95)
    pt3dadd(-3.59513186952944, -245.452870926683, -15.4300852547864, 0.95)
    pt3dadd(-3.73185037975181, -246.441787194621, -15.4879874479342, 0.95)
    pt3dadd(-3.86856888997418, -247.430703462558, -15.5458896410819, 0.95)
    pt3dadd(-4.05874589443891, -248.405947436019, -15.6093488105736, 0.95)
    pt3dadd(-4.40022472683312, -249.342495161566, -15.688535708474, 0.95)
  }
}
proc shape3d_3() {
  adendOML[1] {
    pt3dadd(-4.74170355922734, -250.279042887113, -15.7677226063744, 0.95)
    pt3dadd(-5.08318239162156, -251.21559061266, -15.8469095042749, 0.95)
    pt3dadd(-5.42466122401578, -252.152138338208, -15.9260964021753, 0.95)
    pt3dadd(-5.77863444015661, -253.081472701529, -15.9592557032179, 0.95)
    pt3dadd(-6.18599160657963, -253.979986995749, -15.7957558498674, 0.95)
    pt3dadd(-6.59334877300264, -254.878501289969, -15.632255996517, 0.95)
    pt3dadd(-7.00070593942566, -255.77701558419, -15.4687561431666, 0.95)
    pt3dadd(-7.40806310584868, -256.67552987841, -15.3052562898162, 0.95)
    pt3dadd(-7.81542027227169, -257.57404417263, -15.1417564364658, 0.95)
    pt3dadd(-8.22277743869471, -258.472558466851, -14.9782565831153, 0.95)
    pt3dadd(-8.60289857017284, -259.386920298786, -14.9173847504008, 0.95)
    pt3dadd(-8.9458124141159, -260.32293153357, -14.9967135849524, 0.95)
    pt3dadd(-9.28872625805895, -261.258942768353, -15.0760424195041, 0.95)
    pt3dadd(-9.631640102002, -262.194954003137, -15.1553712540557, 0.95)
    pt3dadd(-9.97455394594506, -263.13096523792, -15.2347000886073, 0.95)
    pt3dadd(-10.3150397156829, -264.037698150966, -15.3678306962458, 0.95)
    pt3dadd(-10.6269777891156, -264.600195852616, -16.1335270942925, 0.95)
    pt3dadd(-10.9389158625482, -265.162693554265, -16.8992234923392, 0.95)
    pt3dadd(-11.2508539359809, -265.725191255915, -17.6649198903859, 0.95)
    pt3dadd(-11.5627920094135, -266.287688957565, -18.4306162884325, 0.95)
    pt3dadd(-11.8747300828462, -266.850186659215, -19.1963126864792, 0.95)
    pt3dadd(-12.1866681562788, -267.412684360865, -19.9620090845259, 0.95)
    pt3dadd(-12.4818177414221, -268.078611817838, -20.5495642528699, 0.95)
    pt3dadd(-12.7281486240461, -269.045299317626, -20.6191082966066, 0.95)
    pt3dadd(-12.9744795066702, -270.011986817414, -20.6886523403433, 0.95)
    pt3dadd(-13.2208103892943, -270.978674317202, -20.75819638408, 0.95)
    pt3dadd(-13.4671412719184, -271.94536181699, -20.8277404278168, 0.95)
    pt3dadd(-13.7134721545424, -272.912049316778, -20.8972844715535, 0.95)
    pt3dadd(-13.8904916180276, -273.840799569417, -21.0935054945012, 0.95)
    pt3dadd(-13.8573588511069, -274.654524084556, -21.6738111322637, 0.95)
    pt3dadd(-13.8242260841863, -275.468248599694, -22.2541167700263, 0.95)
    pt3dadd(-13.7910933172657, -276.281973114833, -22.8344224077887, 0.95)
    pt3dadd(-13.7579605503451, -277.095697629971, -23.4147280455513, 0.95)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(-2.45440276775809, -106.444359376766, -10.9008069025889, 0.95)
    pt3dadd(-2.30650063525483, -107.378406663344, -10.5181836321018, 0.95)
    pt3dadd(-2.19608336531548, -108.322906253989, -10.208783325425, 0.95)
    pt3dadd(-2.08566609537613, -109.267405844633, -9.89938301874822, 0.95)
    pt3dadd(-1.97524882543678, -110.211905435277, -9.58998271207145, 0.95)
    pt3dadd(-1.86483155549742, -111.156405025922, -9.28058240539468, 0.95)
    pt3dadd(-1.75199045708127, -112.130344195289, -9.17671587952061, 0.95)
    pt3dadd(-1.63757975752606, -113.123347583408, -9.20594707881525, 0.95)
    pt3dadd(-1.52316905797086, -114.116350971527, -9.23517827810988, 0.95)
    pt3dadd(-1.40875835841565, -115.109354359645, -9.26440947740452, 0.95)
    pt3dadd(-1.29434765886045, -116.102357747764, -9.29364067669916, 0.95)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(-1.29434765886045, -116.102357747764, -9.29364067669916, 0.95)
    pt3dadd(-1.17993695930524, -117.095361135882, -9.32287187599379, 0.95)
    pt3dadd(-1.06552625975004, -118.088364524001, -9.35210307528843, 0.95)
    pt3dadd(-0.97149721203574, -119.043827368382, -9.21347946137425, 0.95)
    pt3dadd(-0.917574430167754, -119.92541930971, -8.74455731156693, 0.95)
    pt3dadd(-0.863651648299767, -120.807011251039, -8.2756351617596, 0.95)
    pt3dadd(-0.809728866431781, -121.688603192368, -7.80671301195227, 0.95)
    pt3dadd(-0.755806084563795, -122.570195133696, -7.33779086214494, 0.95)
    pt3dadd(-0.701883302695809, -123.451787075025, -6.86886871233761, 0.95)
    pt3dadd(-0.647960520827823, -124.333379016354, -6.39994656253028, 0.95)
    pt3dadd(-0.594037738959836, -125.214970957682, -5.93102441272295, 0.95)
    pt3dadd(-0.540114957091851, -126.096562899011, -5.46210226291563, 0.95)
    pt3dadd(-0.486192175223864, -126.97815484034, -4.99318011310829, 0.95)
    pt3dadd(-0.432269393355878, -127.859746781669, -4.52425796330097, 0.95)
    pt3dadd(-0.378346611487892, -128.741338722997, -4.05533581349364, 0.95)
    pt3dadd(-0.313212111467312, -129.627474216163, -3.61245582362643, 0.95)
    pt3dadd(-0.0525627674103419, -130.592842153167, -3.62371040704815, 0.95)
    pt3dadd(0.20808657664663, -131.558210090171, -3.63496499046987, 0.95)
    pt3dadd(0.468735920703599, -132.523578027174, -3.64621957389159, 0.95)
    pt3dadd(0.729385264760571, -133.488945964178, -3.65747415731331, 0.95)
    pt3dadd(0.990034608817542, -134.454313901181, -3.66872874073503, 0.95)
    pt3dadd(1.25068395287451, -135.419681838185, -3.67998332415676, 0.95)
    pt3dadd(1.51133329693148, -136.385049775189, -3.69123790757847, 0.95)
    pt3dadd(1.77198264098845, -137.350417712192, -3.7024924910002, 0.95)
    pt3dadd(2.03263198504543, -138.315785649196, -3.71374707442192, 0.95)
    pt3dadd(2.2932813291024, -139.2811535862, -3.72500165784364, 0.95)
    pt3dadd(2.50943037513297, -140.257129047637, -3.74182030541906, 0.95)
    pt3dadd(2.71576011306725, -141.235445134985, -3.75986670342799, 0.95)
    pt3dadd(2.92208985100152, -142.213761222332, -3.77791310143692, 0.95)
    pt3dadd(3.1284195889358, -143.19207730968, -3.79595949944585, 0.95)
    pt3dadd(3.33474932687008, -144.170393397027, -3.81400589745478, 0.95)
    pt3dadd(3.54107906480436, -145.148709484375, -3.83205229546371, 0.95)
    pt3dadd(3.74740880273864, -146.127025571722, -3.85009869347264, 0.95)
    pt3dadd(3.95373854067292, -147.10534165907, -3.86814509148157, 0.95)
    pt3dadd(4.16006827860719, -148.083657746417, -3.8861914894905, 0.95)
    pt3dadd(4.31903059311306, -149.070443978531, -3.91004007288334, 0.95)
    pt3dadd(4.46962153036574, -150.058727163026, -3.93491409273074, 0.95)
    pt3dadd(4.62021246761842, -151.04701034752, -3.95978811257814, 0.95)
    pt3dadd(4.77080340487109, -152.035293532014, -3.98466213242554, 0.95)
    pt3dadd(4.92139434212377, -153.023576716508, -4.00953615227293, 0.95)
    pt3dadd(5.07198527937645, -154.011859901002, -4.03441017212033, 0.95)
    pt3dadd(5.22923304997457, -154.998620147527, -4.05845458393625, 0.95)
    pt3dadd(5.52704512478905, -155.953222353593, -4.064981165627, 0.95)
    pt3dadd(5.82485719960353, -156.907824559659, -4.07150774731775, 0.95)
    pt3dadd(6.12266927441802, -157.862426765725, -4.0780343290085, 0.95)
    pt3dadd(6.4204813492325, -158.817028971791, -4.08456091069925, 0.95)
    pt3dadd(6.71829342404699, -159.771631177857, -4.09108749239, 0.95)
    pt3dadd(7.01610549886147, -160.726233383923, -4.09761407408075, 0.95)
    pt3dadd(7.31391757367595, -161.680835589989, -4.10414065577149, 0.95)
    pt3dadd(7.61172964849043, -162.635437796055, -4.11066723746224, 0.95)
    pt3dadd(7.88833250029436, -163.59594332999, -4.11988187182231, 0.95)
    pt3dadd(8.12893003779179, -164.566470502871, -4.13365981249413, 0.95)
    pt3dadd(8.36952757528922, -165.536997675752, -4.14743775316594, 0.95)
    pt3dadd(8.61012511278665, -166.507524848634, -4.16121569383776, 0.95)
    pt3dadd(8.85072265028409, -167.478052021515, -4.17499363450958, 0.95)
    pt3dadd(9.09132018778152, -168.448579194396, -4.18877157518139, 0.95)
    pt3dadd(9.3431309658953, -169.388848677564, -4.04064748977973, 0.95)
    pt3dadd(9.60750877439865, -170.295207419034, -3.71107472674679, 0.95)
    pt3dadd(9.87188658290199, -171.201566160503, -3.38150196371385, 0.95)
    pt3dadd(10.1362643914053, -172.107924901972, -3.05192920068091, 0.95)
    pt3dadd(10.4006421999087, -173.014283643442, -2.72235643764796, 0.95)
    pt3dadd(10.665020008412, -173.920642384911, -2.39278367461502, 0.95)
    pt3dadd(10.9293978169154, -174.82700112638, -2.06321091158208, 0.95)
    pt3dadd(11.1937756254187, -175.733359867849, -1.73363814854914, 0.95)
    pt3dadd(11.4745731627505, -176.671872099226, -1.54044871303354, 0.95)
    pt3dadd(11.7578664897016, -177.615271643125, -1.36798946719566, 0.95)
    pt3dadd(12.0411598166527, -178.558671187025, -1.19553022135778, 0.95)
    pt3dadd(12.3244531436039, -179.502070730924, -1.02307097551991, 0.95)
    pt3dadd(12.607746470555, -180.445470274824, -0.850611729682029, 0.95)
    pt3dadd(12.8910397975061, -181.388869818724, -0.678152483844154, 0.95)
    pt3dadd(13.1283861230538, -182.349924378339, -0.590578284144939, 0.95)
    pt3dadd(13.3066941196258, -183.33366426222, -0.61207477733027, 0.95)
    pt3dadd(13.4850021161978, -184.317404146102, -0.6335712705156, 0.95)
    pt3dadd(13.6633101127698, -185.301144029983, -0.655067763700929, 0.95)
    pt3dadd(13.8416181093418, -186.284883913865, -0.676564256886258, 0.95)
    pt3dadd(14.0199261059138, -187.268623797747, -0.698060750071589, 0.95)
    pt3dadd(14.1982341024858, -188.252363681628, -0.719557243256918, 0.95)
    pt3dadd(14.3765420990578, -189.236103565509, -0.741053736442251, 0.95)
    pt3dadd(14.5548500956297, -190.219843449391, -0.762550229627578, 0.95)
    pt3dadd(14.7331580922017, -191.203583333273, -0.78404672281291, 0.95)
    pt3dadd(14.8497828374331, -192.193800512035, -0.812904719560241, 0.95)
    pt3dadd(14.886779712361, -193.19237933169, -0.851265795962641, 0.95)
    pt3dadd(14.9237765872888, -194.190958151345, -0.889626872365043, 0.95)
    pt3dadd(14.9607734622167, -195.189536970999, -0.92798794876744, 0.95)
    pt3dadd(14.9977703371446, -196.188115790654, -0.96634902516984, 0.95)
    pt3dadd(15.0347672120724, -197.186694610309, -1.00471010157224, 0.95)
    pt3dadd(15.0717640870003, -198.185273429963, -1.04307117797464, 0.95)
    pt3dadd(15.1087609619282, -199.183852249618, -1.08143225437704, 0.95)
    pt3dadd(15.1759732662964, -200.132164790572, -0.82386822396579, 0.95)
    pt3dadd(15.2530945322301, -201.063992819046, -0.469257401104759, 0.95)
    pt3dadd(15.3302157981638, -201.995820847521, -0.114646578243727, 0.95)
    pt3dadd(15.4073370640975, -202.927648875995, 0.239964244617304, 0.95)
    pt3dadd(15.4844583300312, -203.85947690447, 0.594575067478339, 0.95)
    pt3dadd(15.5615795959649, -204.791304932944, 0.94918589033937, 0.95)
    pt3dadd(15.6387008618987, -205.723132961419, 1.3037967132004, 0.95)
    pt3dadd(15.7158221278324, -206.654960989893, 1.65840753606144, 0.95)
    pt3dadd(15.8130156024467, -207.599521512286, 1.92473509550216, 0.95)
    pt3dadd(15.9760726741212, -208.585861584818, 1.90137588545981, 0.95)
    pt3dadd(16.1391297457958, -209.57220165735, 1.87801667541747, 0.95)
    pt3dadd(16.3021868174703, -210.558541729883, 1.85465746537513, 0.95)
    pt3dadd(16.4652438891448, -211.544881802415, 1.83129825533278, 0.95)
    pt3dadd(16.6283009608194, -212.531221874947, 1.80793904529044, 0.95)
    pt3dadd(16.7913580324939, -213.51756194748, 1.78457983524809, 0.95)
    pt3dadd(16.9544151041684, -214.503902020012, 1.76122062520575, 0.95)
    pt3dadd(17.1174721758429, -215.490242092544, 1.7378614151634, 0.95)
    pt3dadd(17.2805292475175, -216.476582165077, 1.71450220512106, 0.95)
    pt3dadd(17.443586319192, -217.462922237609, 1.69114299507871, 0.95)
    pt3dadd(17.6345693217667, -218.442934401959, 1.69175949089564, 0.95)
    pt3dadd(17.8876471975275, -219.408876107654, 1.7456873130278, 0.95)
    pt3dadd(18.1407250732883, -220.374817813348, 1.79961513515996, 0.95)
    pt3dadd(18.3938029490491, -221.340759519043, 1.85354295729212, 0.95)
    pt3dadd(18.6468808248099, -222.306701224738, 1.90747077942428, 0.95)
    pt3dadd(18.8999587005707, -223.272642930432, 1.96139860155643, 0.95)
    pt3dadd(19.1530365763314, -224.238584636127, 2.0153264236886, 0.95)
    pt3dadd(19.4061144520922, -225.204526341822, 2.06925424582075, 0.95)
    pt3dadd(19.659192327853, -226.170468047517, 2.12318206795291, 0.95)
    pt3dadd(19.9122702036138, -227.136409753212, 2.17710989008508, 0.95)
    pt3dadd(20.1653480793746, -228.102351458906, 2.23103771221723, 0.95)
    pt3dadd(20.484306828402, -229.046618347899, 2.261427609454, 0.95)
    pt3dadd(20.8732939027908, -229.967845907859, 2.26679777970205, 0.95)
    pt3dadd(21.2622809771796, -230.889073467819, 2.2721679499501, 0.95)
    pt3dadd(21.6512680515685, -231.810301027779, 2.27753812019815, 0.95)
    pt3dadd(22.0402551259573, -232.731528587739, 2.2829082904462, 0.95)
    pt3dadd(22.4292422003461, -233.652756147699, 2.28827846069425, 0.95)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(22.4292422003461, -233.652756147699, 2.28827846069425, 0.95)
    pt3dadd(22.6970505587512, -234.60410389867, 2.27844444081988, 0.95)
    pt3dadd(22.7877976323945, -235.599462016266, 2.24639469258941, 0.95)
    pt3dadd(22.8785447060378, -236.594820133861, 2.21434494435893, 0.95)
    pt3dadd(22.969291779681, -237.590178251457, 2.18229519612846, 0.95)
    pt3dadd(23.0600388533243, -238.585536369053, 2.15024544789798, 0.95)
    pt3dadd(23.1557391225229, -239.580429934053, 2.11878446048195, 0.95)
    pt3dadd(23.2590298747809, -240.574611599319, 2.08822571464677, 0.95)
    pt3dadd(23.362320627039, -241.568793264585, 2.05766696881158, 0.95)
    pt3dadd(23.465611379297, -242.562974929851, 2.0271082229764, 0.95)
    pt3dadd(23.5689021315551, -243.557156595117, 1.99654947714122, 0.95)
    pt3dadd(23.8483031675256, -244.516480004999, 1.98770669271443, 0.95)
    pt3dadd(24.136080964801, -245.474145366989, 1.9798968373216, 0.95)
    pt3dadd(24.4238587620763, -246.431810728978, 1.97208698192876, 0.95)
    pt3dadd(24.7116365593516, -247.389476090967, 1.96427712653592, 0.95)
    pt3dadd(24.999414356627, -248.347141452956, 1.95646727114308, 0.95)
    pt3dadd(25.2871921539023, -249.304806814946, 1.94865741575024, 0.95)
    pt3dadd(25.5497284978145, -250.190040200183, 2.22025186002791, 0.95)
    pt3dadd(25.7901134805785, -251.011708827377, 2.73704555885474, 0.95)
    pt3dadd(26.0304984633425, -251.833377454571, 3.25383925768156, 0.95)
    pt3dadd(26.2708834461065, -252.655046081765, 3.77063295650839, 0.95)
    pt3dadd(26.5112684288705, -253.476714708958, 4.28742665533521, 0.95)
    pt3dadd(26.7516534116344, -254.298383336152, 4.80422035416204, 0.95)
    pt3dadd(26.9920383943984, -255.120051963346, 5.32101405298887, 0.95)
    pt3dadd(27.2324233771624, -255.94172059054, 5.83780775181569, 0.95)
    pt3dadd(27.4790244130418, -256.755542147861, 6.28803229292514, 0.95)
    pt3dadd(27.8273779173881, -257.440912626187, 5.6485659971371, 0.95)
    pt3dadd(28.1757314217345, -258.126283104513, 5.00909970134907, 0.95)
    pt3dadd(28.5240849260808, -258.811653582839, 4.36963340556105, 0.95)
    pt3dadd(28.8724384304272, -259.497024061165, 3.73016710977301, 0.95)
    pt3dadd(29.2207919347735, -260.182394539491, 3.09070081398499, 0.95)
    pt3dadd(29.6363322454457, -260.906744610314, 2.84916510803502, 0.95)
    pt3dadd(30.1517251208243, -261.689025880654, 3.19903107963698, 0.95)
    pt3dadd(30.6671179962029, -262.471307150993, 3.54889705123895, 0.95)
    pt3dadd(31.1825108715815, -263.253588421333, 3.89876302284091, 0.95)
    pt3dadd(31.7783556250621, -264.028488359399, 4.04063122837363, 0.95)
    pt3dadd(32.4135820477551, -264.799775091748, 4.08068329967197, 0.95)
    pt3dadd(33.0488084704481, -265.571061824097, 4.1207353709703, 0.95)
    pt3dadd(33.6840348931411, -266.342348556446, 4.16078744226864, 0.95)
  }
  GCL[4] {pt3dclear()
    pt3dadd(0.491905743771599, 36.9036522596239, -5.90990864277987, 1.71290777223165)
    pt3dadd(1.3275139036114, 36.2863945485599, -5.68999150418697, 1.71290777223165)
    pt3dadd(2.03846836970852, 35.6248898443124, -5.45133846440936, 1.56418076969114)
    pt3dadd(2.74942283580564, 34.963385140065, -5.21268542463174, 1.41545376715063)
    pt3dadd(3.46037730190275, 34.3018804358176, -4.97403238485412, 1.26672676461012)
    pt3dadd(4.13444372741247, 33.6803683904622, -4.6031337508227, 1.19)
    pt3dadd(4.7692005605037, 33.1014743615626, -4.09130812998261, 1.19)
    pt3dadd(5.40395739359494, 32.5225803326629, -3.57948250914251, 1.19)
    pt3dadd(6.03871422668617, 31.9436863037633, -3.06765688830241, 1.19)
    pt3dadd(6.6734710597774, 31.3647922748637, -2.55583126746232, 1.19)
    pt3dadd(7.33282531530445, 30.7709467593239, -2.13617519836487, 1.19)
    pt3dadd(8.08844036120681, 30.1185893438066, -2.07722008980246, 1.19)
    pt3dadd(8.84405540710918, 29.4662319282894, -2.01826498124006, 1.19)
    pt3dadd(9.59967045301155, 28.8138745127721, -1.95930987267765, 1.19)
    pt3dadd(10.3552854989139, 28.1615170972549, -1.90035476411525, 1.19)
    pt3dadd(11.1109005448163, 27.5091596817376, -1.84139965555284, 1.19)
    pt3dadd(11.925455567889, 27.0115164398734, -1.54493878594229, 1.19)
    pt3dadd(12.7406872391185, 26.5156493619215, -1.2457512808092, 1.19)
    pt3dadd(13.555918910348, 26.0197822839696, -0.946563775676109, 1.19)
    pt3dadd(14.3711505815775, 25.5239152060176, -0.647376270543016, 1.19)
    pt3dadd(15.140725607364, 24.9042825109465, -0.542645813465642, 1.22204128561069)
    pt3dadd(15.8996826400888, 24.2558666573429, -0.483138643535574, 1.26153415127069)
    pt3dadd(16.6586396728136, 23.6074508037393, -0.423631473605507, 1.30102701693069)
    pt3dadd(17.4175967055384, 22.9590349501357, -0.364124303675439, 1.34051988259069)
    pt3dadd(18.1765537382632, 22.3106190965321, -0.304617133745372, 1.38001274825069)
    pt3dadd(18.935510770988, 21.6622032429285, -0.245109963815305, 1.41950561391069)
    pt3dadd(18.5996330552194, 21.6807413492966, -0.691649372246727, 1.43)
    pt3dadd(18.2087793642209, 21.709865225507, -1.06297396120324, 1.43)
    pt3dadd(18.8404257802536, 21.0474678484905, -0.660168151867526, 1.43)
    pt3dadd(19.4720721962864, 20.385070471474, -0.257362342531812, 1.43)
    pt3dadd(20.1037186123192, 19.7226730944575, 0.145443466803903, 1.43)
    pt3dadd(20.735365028352, 19.060275717441, 0.548249276139616, 1.43)
    pt3dadd(21.3670114443848, 18.3978783404245, 0.951055085475331, 1.43)
    pt3dadd(21.9986578604175, 17.735480963408, 1.35386089481105, 1.43)
    pt3dadd(22.6303042764503, 17.0730835863915, 1.75666670414676, 1.43)
    pt3dadd(23.4646108337308, 16.6673136470829, 1.97618710066641, 1.46374170385037)
    pt3dadd(24.4302925893815, 16.4279034089398, 2.07689203935196, 1.51935659405795)
    pt3dadd(25.3959743450322, 16.1884931707967, 2.17759697803752, 1.57497148426554)
    pt3dadd(26.3616561006829, 15.9490829326535, 2.27830191672308, 1.63058637447312)
    pt3dadd(27.0846448305442, 15.6758445556024, 2.6191956321371, 1.67)
    pt3dadd(27.2172221187703, 15.3203107759721, 3.54440857745748, 1.67)
    pt3dadd(27.3497994069963, 14.9647769963418, 4.46962152277786, 1.67)
  }
}
proc shape3d_4() {
  GCL[4] {
    pt3dadd(27.5486711620348, 14.5504403739704, 5.23890270549454, 1.65407273813433)
  }
  GCL[5] {pt3dclear()
    pt3dadd(27.5486711620348, 14.5504403739704, 5.23890270549454, 1.5513426974875)
    pt3dadd(27.8241228012589, 13.574721206506, 5.37601468767386, 1.5513426974875)
    pt3dadd(28.1377923669994, 12.6313391693413, 5.48391156197134, 1.44861265684067)
    pt3dadd(28.4514619327399, 11.6879571321766, 5.59180843626882, 1.34588261619384)
    pt3dadd(28.7651314984805, 10.7445750950119, 5.69970531056629, 1.24315257554702)
    pt3dadd(29.0316878670658, 9.92427457216299, 6.08971439764767, 1.19)
    pt3dadd(29.2477336303588, 9.23593116884278, 6.78217926121023, 1.19)
    pt3dadd(29.4637793936517, 8.54758776552258, 7.47464412477278, 1.19)
    pt3dadd(29.6798251569447, 7.85924436220235, 8.16710898833534, 1.19)
    pt3dadd(29.8958709202376, 7.17090095888214, 8.85957385189789, 1.19)
    pt3dadd(30.1649483141705, 6.4196158710582, 9.36087824908458, 1.19)
    pt3dadd(30.5709768864505, 5.50578745284943, 9.36852158385083, 1.19)
    pt3dadd(30.9770054587305, 4.59195903464067, 9.37616491861708, 1.19)
    pt3dadd(31.3830340310105, 3.6781306164319, 9.38380825338333, 1.19)
    pt3dadd(31.7890626032904, 2.76430219822317, 9.39145158814957, 1.19)
    pt3dadd(32.1950911755704, 1.8504737800144, 9.39909492291582, 1.19)
    pt3dadd(32.7040506556302, 0.992039550458175, 9.42092492793705, 1.19)
    pt3dadd(33.2395464007618, 0.147886307101575, 9.44641234986534, 1.19)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(33.2395464007618, 0.147886307101575, 9.44641234986534, 1.19)
    pt3dadd(33.7750421458933, -0.696266936255041, 9.47189977179362, 1.19)
    pt3dadd(34.551268850992, -1.23751973289404, 9.5379633693046, 1.19)
    pt3dadd(35.4867985785053, -1.5783290275446, 9.63087813464724, 1.19)
    pt3dadd(36.4223283060186, -1.91913832219512, 9.72379289998988, 1.19)
    pt3dadd(37.2215747119169, -2.30919056204169, 10.1660631495658, 1.19)
    pt3dadd(38.0079961794126, -2.70387680795312, 10.6412094878136, 1.19)
    pt3dadd(38.7944176469083, -3.09856305386455, 11.1163558260614, 1.19)
    pt3dadd(39.580839114404, -3.49324929977598, 11.5915021643092, 1.19)
    pt3dadd(40.3184692786143, -4.00339765889021, 11.9361381087334, 1.19)
    pt3dadd(40.9415507655592, -4.78461957929639, 11.974371231851, 1.19)
    pt3dadd(41.5646322525042, -5.56584149970255, 12.0126043549687, 1.19)
    pt3dadd(42.1877137394492, -6.34706342010872, 12.0508374780863, 1.19)
    pt3dadd(42.7545276682363, -7.16737167861876, 12.080939689431, 1.19)
    pt3dadd(43.2632973577034, -8.0280004492909, 12.102654250693, 1.19)
    pt3dadd(43.7720670471706, -8.88862921996303, 12.1243688119551, 1.19)
    pt3dadd(44.2808367366378, -9.74925799063518, 12.1460833732171, 1.19)
    pt3dadd(44.7929853542832, -10.6050242214182, 12.1352031749332, 1.19)
    pt3dadd(45.3212963924788, -11.4375314746541, 11.9684125270231, 1.19)
    pt3dadd(45.8496074306744, -12.2700387278901, 11.801621879113, 1.19)
    pt3dadd(46.37791846887, -13.102545981126, 11.6348312312029, 1.19)
    pt3dadd(46.9062295070657, -13.9350532343619, 11.4680405832928, 1.19)
    pt3dadd(47.4345405452613, -14.7675604875978, 11.3012499353828, 1.19)
    pt3dadd(47.9628515834569, -15.6000677408337, 11.1344592874727, 1.19)
    pt3dadd(48.4320438223056, -16.4417078103409, 11.106716307438, 1.19)
    pt3dadd(48.7187376824456, -17.311540674373, 11.5082102914624, 1.19)
    pt3dadd(49.0054315425856, -18.181373538405, 11.9097042754867, 1.19)
    pt3dadd(49.2921254027257, -19.0512064024371, 12.3111982595111, 1.19)
    pt3dadd(49.5788192628657, -19.9210392664692, 12.7126922435355, 1.19)
    pt3dadd(49.8655131230057, -20.7908721305013, 13.1141862275599, 1.19)
    pt3dadd(50.1522069831458, -21.6607049945334, 13.5156802115842, 1.19)
    pt3dadd(50.4389008432858, -22.5305378585654, 13.9171741956086, 1.19)
    pt3dadd(50.9016079515429, -23.380541269204, 14.0577633235946, 1.19)
    pt3dadd(51.4415398866199, -24.2218446182242, 14.0838819072348, 1.19)
    pt3dadd(51.9814718216969, -25.0631479672444, 14.1100004908751, 1.19)
    pt3dadd(52.5214037567738, -25.9044513162647, 14.1361190745154, 1.19)
    pt3dadd(53.0613356918508, -26.7457546652849, 14.1622376581556, 1.19)
    pt3dadd(53.6012676269277, -27.5870580143052, 14.1883562417959, 1.19)
    pt3dadd(54.1411995620047, -28.4283613633254, 14.2144748254362, 1.19)
    pt3dadd(54.6811314970816, -29.2696647123457, 14.2405934090764, 1.19)
    pt3dadd(55.2210634321586, -30.1109680613659, 14.2667119927167, 1.19)
    pt3dadd(55.5168075337368, -31.0083998575228, 14.5233222060656, 1.19)
    pt3dadd(55.7255348156113, -31.9258331373522, 14.8620685696812, 1.19)
    pt3dadd(55.9342620974857, -32.8432664171815, 15.2008149332969, 1.19)
    pt3dadd(56.1429893793601, -33.7606996970109, 15.5395612969126, 1.19)
    pt3dadd(56.3517166612346, -34.6781329768403, 15.8783076605283, 1.19)
    pt3dadd(56.560443943109, -35.5955662566696, 16.2170540241439, 1.19)
    pt3dadd(56.7691712249834, -36.512999536499, 16.5558003877596, 1.19)
    pt3dadd(56.9778985068579, -37.4304328163284, 16.8945467513753, 1.19)
    pt3dadd(57.1866257887323, -38.3478660961577, 17.233293114991, 1.19)
    pt3dadd(57.5796109596616, -39.2649115707504, 17.2500466432869, 1.19)
    pt3dadd(57.9783657285377, -40.1819449021435, 17.2567177310908, 1.19)
    pt3dadd(58.3771204974138, -41.0989782335367, 17.2633888188948, 1.19)
    pt3dadd(58.7758752662899, -42.0160115649299, 17.2700599066988, 1.19)
    pt3dadd(59.174630035166, -42.933044896323, 17.2767309945027, 1.19)
    pt3dadd(59.5733848040421, -43.8500782277162, 17.2834020823067, 1.19)
    pt3dadd(59.9721395729182, -44.7671115591094, 17.2900731701107, 1.19)
    pt3dadd(60.274571630138, -45.6656811700187, 17.5393550576729, 1.19)
    pt3dadd(60.5221939411691, -46.553744516974, 17.9266878382042, 1.19)
    pt3dadd(60.7698162522003, -47.4418078639293, 18.3140206187355, 1.19)
    pt3dadd(61.0174385632315, -48.3298712108846, 18.7013533992669, 1.19)
    pt3dadd(61.2650608742626, -49.2179345578399, 19.0886861797982, 1.19)
    pt3dadd(61.6304701120457, -50.0756526929934, 19.3596628268765, 1.19)
    pt3dadd(62.2343659875501, -50.8719299897355, 19.3950498052991, 1.19)
    pt3dadd(62.8382618630546, -51.6682072864775, 19.4304367837218, 1.19)
    pt3dadd(63.442157738559, -52.4644845832196, 19.4658237621444, 1.19)
    pt3dadd(64.0323270170383, -53.270238812764, 19.4992296727317, 1.19)
    pt3dadd(64.5570932232931, -54.1211477532249, 19.5231963958436, 1.19)
    pt3dadd(65.0818594295479, -54.9720566936857, 19.5471631189555, 1.19)
    pt3dadd(65.6066256358027, -55.8229656341466, 19.5711298420673, 1.19)
    pt3dadd(66.1313918420574, -56.6738745746075, 19.5950965651792, 1.19)
    pt3dadd(66.6808666060736, -57.5081833988733, 19.6226097299284, 1.19)
    pt3dadd(67.2646908367292, -58.3194149904265, 19.6550531046833, 1.19)
    pt3dadd(67.8485150673848, -59.1306465819797, 19.6874964794383, 1.19)
    pt3dadd(68.4323392980403, -59.9418781735329, 19.7199398541933, 1.19)
    pt3dadd(69.0161635286959, -60.7531097650861, 19.7523832289483, 1.19)
    pt3dadd(69.4991007764872, -61.6261586610267, 19.7706006217321, 1.19)
    pt3dadd(69.9520220928539, -62.5175994636006, 19.7845854952436, 1.19)
    pt3dadd(70.4049434092206, -63.4090402661745, 19.7985703687551, 1.19)
    pt3dadd(70.8578647255873, -64.3004810687483, 19.8125552422666, 1.19)
    pt3dadd(71.310786041954, -65.1919218713222, 19.826540115778, 1.19)
    pt3dadd(71.7637073583207, -66.0833626738961, 19.8405249892895, 1.19)
    pt3dadd(72.2166286746874, -66.9748034764699, 19.854509862801, 1.19)
    pt3dadd(72.6695499910541, -67.8662442790438, 19.8684947363125, 1.19)
    pt3dadd(73.1031679211511, -68.7263506377267, 19.9681505327943, 1.19)
    pt3dadd(73.3985460676438, -69.3620576769164, 20.6813323545615, 1.19)
    pt3dadd(73.6939242141366, -69.997764716106, 21.3945141763288, 1.19)
    pt3dadd(73.9893023606294, -70.6334717552957, 22.107695998096, 1.19)
    pt3dadd(74.2736230710452, -71.5234499350352, 22.2541866299171, 1.19)
    pt3dadd(74.5549168988488, -72.4830327580883, 22.2455501873092, 1.19)
    pt3dadd(74.8362107266524, -73.4426155811415, 22.2369137447013, 1.19)
    pt3dadd(75.1175045544561, -74.4021984041947, 22.2282773020935, 1.19)
    pt3dadd(75.3987983822597, -75.3617812272478, 22.2196408594856, 1.19)
    pt3dadd(75.6800922100633, -76.321364050301, 22.2110044168778, 1.19)
    pt3dadd(75.9393586815143, -77.2867848360112, 22.1995887377566, 1.19)
    pt3dadd(76.1729917688443, -78.2589992984967, 22.184938842238, 1.19)
    pt3dadd(76.4066248561743, -79.2312137609821, 22.1702889467195, 1.19)
    pt3dadd(76.6402579435044, -80.2034282234677, 22.1556390512009, 1.19)
    pt3dadd(76.8738910308344, -81.1756426859531, 22.1409891556823, 1.19)
    pt3dadd(77.1075241181645, -82.1478571484386, 22.1263392601637, 1.19)
    pt3dadd(77.366028624431, -83.0994730050951, 22.1862746681229, 1.19)
    pt3dadd(77.7149337216956, -83.9762187409344, 22.5173066118842, 1.19)
    pt3dadd(78.0638388189602, -84.8529644767737, 22.8483385556455, 1.19)
    pt3dadd(78.4127439162249, -85.729710212613, 23.1793704994068, 1.19)
    pt3dadd(78.7616490134895, -86.6064559484523, 23.5104024431681, 1.19)
    pt3dadd(79.1105541107541, -87.4832016842916, 23.8414343869294, 1.19)
    pt3dadd(79.4594592080188, -88.3599474201308, 24.1724663306907, 1.19)
    pt3dadd(79.8098677535475, -89.2401592270084, 24.4815267862335, 1.19)
    pt3dadd(80.1812168175644, -90.1686476034159, 24.4845611774061, 1.19)
    pt3dadd(80.5525658815813, -91.0971359798235, 24.4875955685787, 1.19)
    pt3dadd(80.9239149455982, -92.0256243562311, 24.4906299597512, 1.19)
    pt3dadd(81.2952640096152, -92.9541127326387, 24.4936643509238, 1.19)
    pt3dadd(81.6666130736321, -93.8826011090463, 24.4966987420964, 1.19)
    pt3dadd(82.037962137649, -94.8110894854538, 24.4997331332689, 1.19)
    pt3dadd(82.4093112016659, -95.7395778618614, 24.5027675244415, 1.19)
    pt3dadd(82.7806602656828, -96.668066238269, 24.5058019156141, 1.19)
    pt3dadd(83.2093711672995, -97.5681045549695, 24.5166390468759, 1.19)
    pt3dadd(83.7210854717825, -98.42697522666, 24.5387668551136, 1.19)
    pt3dadd(84.2327997762655, -99.2858458983505, 24.5608946633513, 1.19)
    pt3dadd(84.7445140807485, -100.144716570041, 24.583022471589, 1.19)
    pt3dadd(85.2562283852315, -101.003587241731, 24.6051502798267, 1.19)
    pt3dadd(85.7679426897145, -101.862457913422, 24.6272780880644, 1.19)
    pt3dadd(86.2796569941975, -102.721328585113, 24.6494058963021, 1.19)
    pt3dadd(86.7548693239012, -103.599861594411, 24.6665019694449, 1.19)
    pt3dadd(87.1869586839772, -104.501623439756, 24.6776536146223, 1.19)
    pt3dadd(87.6190480440531, -105.4033852851, 24.6888052597996, 1.19)
    pt3dadd(88.0511374041291, -106.305147130445, 24.699956904977, 1.19)
    pt3dadd(88.483226764205, -107.206908975789, 24.7111085501544, 1.19)
    pt3dadd(88.9153161242809, -108.108670821133, 24.7222601953317, 1.19)
    pt3dadd(89.3655589945328, -109.000843024141, 24.7359062053095, 1.19)
    pt3dadd(89.8635017342993, -109.867817638156, 24.7561063678642, 1.19)
    pt3dadd(90.3614444740657, -110.734792252171, 24.7763065304188, 1.19)
    pt3dadd(90.8593872138322, -111.601766866186, 24.7965066929735, 1.19)
    pt3dadd(91.3573299535987, -112.468741480201, 24.8167068555282, 1.19)
    pt3dadd(91.8552726933652, -113.335716094216, 24.8369070180829, 1.19)
    pt3dadd(92.3532154331316, -114.202690708231, 24.8571071806376, 1.19)
    pt3dadd(92.8511581728981, -115.069665322246, 24.8773073431922, 1.19)
    pt3dadd(93.2353663245462, -115.922752066503, 25.2291602439375, 1.15169315848511)
    pt3dadd(93.6188108637192, -116.775745567792, 25.5832398566486, 1.11312912535818)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(93.6188108637192, -116.775745567792, 25.5832398566486, 1.07456509223125)
    pt3dadd(94.0022554028922, -117.628739069081, 25.9373194693597, 1.07456509223125)
    pt3dadd(94.3856999420652, -118.481732570369, 26.2913990820708, 1.03600105910432)
    pt3dadd(94.7691444812383, -119.334726071658, 26.6454786947819, 0.997437025977384)
    pt3dadd(95.1525890204112, -120.187719572947, 26.999558307493, 0.958872992850452)
    pt3dadd(95.6786377579442, -121.016860699274, 27.1043104598678, 0.95)
    pt3dadd(96.2473029218707, -121.838873683557, 27.1345525663707, 0.95)
    pt3dadd(96.8159680857972, -122.660886667841, 27.1647946728736, 0.95)
    pt3dadd(97.3846332497237, -123.482899652124, 27.1950367793765, 0.95)
    pt3dadd(97.9532984136502, -124.304912636408, 27.2252788858794, 0.95)
    pt3dadd(98.5219635775767, -125.126925620691, 27.2555209923823, 0.95)
    pt3dadd(99.0906287415033, -125.948938604975, 27.2857630988852, 0.95)
    pt3dadd(99.6592939054298, -126.770951589258, 27.3160052053881, 0.95)
    pt3dadd(100.227959069356, -127.592964573542, 27.346247311891, 0.95)
    pt3dadd(100.796624233283, -128.414977557825, 27.3764894183939, 0.95)
    pt3dadd(101.183090722313, -129.32966047446, 27.3818493355579, 0.95)
    pt3dadd(101.509530341289, -130.274874271686, 27.3790116083265, 0.95)
    pt3dadd(101.835969960265, -131.220088068913, 27.376173881095, 0.95)
    pt3dadd(102.16240957924, -132.165301866139, 27.3733361538635, 0.95)
    pt3dadd(102.488849198216, -133.110515663366, 27.3704984266321, 0.95)
    pt3dadd(102.815288817191, -134.055729460592, 27.3676606994006, 0.95)
    pt3dadd(103.141728436167, -135.000943257819, 27.3648229721692, 0.95)
    pt3dadd(103.458806111871, -135.949083668657, 27.3607850238472, 0.95)
    pt3dadd(103.730325571676, -136.911465919136, 27.3509064151004, 0.95)
    pt3dadd(104.001845031482, -137.873848169614, 27.3410278063536, 0.95)
    pt3dadd(104.273364491287, -138.836230420093, 27.3311491976069, 0.95)
    pt3dadd(104.544883951092, -139.798612670572, 27.3212705888601, 0.95)
    pt3dadd(104.816403410898, -140.76099492105, 27.3113919801133, 0.95)
    pt3dadd(105.087922870703, -141.723377171529, 27.3015133713665, 0.95)
    pt3dadd(105.359442330508, -142.685759422007, 27.2916347626197, 0.95)
    pt3dadd(105.703089954812, -143.623533564815, 27.2910910541393, 0.95)
    pt3dadd(106.077150086087, -144.550931812835, 27.2944833631827, 0.95)
    pt3dadd(106.451210217363, -145.478330060854, 27.2978756722262, 0.95)
    pt3dadd(106.825270348638, -146.405728308874, 27.3012679812697, 0.95)
    pt3dadd(107.199330479913, -147.333126556893, 27.3046602903131, 0.95)
    pt3dadd(107.573390611189, -148.260524804913, 27.3080525993566, 0.95)
    pt3dadd(107.947450742464, -149.187923052932, 27.3114449084, 0.95)
    pt3dadd(108.321510873739, -150.115321300952, 27.3148372174435, 0.95)
    pt3dadd(108.648354201965, -151.05970125236, 27.3120814426458, 0.95)
    pt3dadd(108.950950789285, -152.012801636656, 27.3061685079742, 0.95)
    pt3dadd(109.253547376605, -152.965902020952, 27.3002555733027, 0.95)
    pt3dadd(109.556143963925, -153.919002405249, 27.2943426386312, 0.95)
    pt3dadd(109.858740551245, -154.872102789545, 27.2884297039596, 0.95)
    pt3dadd(110.161337138565, -155.825203173841, 27.2825167692881, 0.95)
    pt3dadd(110.463933725885, -156.778303558138, 27.2766038346166, 0.95)
    pt3dadd(110.723578590873, -157.743113516053, 27.265257683631, 0.95)
    pt3dadd(110.949110490411, -158.717223410236, 27.2495963827439, 0.95)
    pt3dadd(111.17464238995, -159.691333304418, 27.2339350818567, 0.95)
    pt3dadd(111.400174289489, -160.665443198601, 27.2182737809695, 0.95)
    pt3dadd(111.625706189028, -161.639553092784, 27.2026124800823, 0.95)
    pt3dadd(111.851238088567, -162.613662986967, 27.1869511791951, 0.95)
    pt3dadd(112.306855781643, -163.500337434404, 27.2014491524942, 0.95)
    pt3dadd(112.784963280309, -164.378465477612, 27.2188950531848, 0.95)
    pt3dadd(113.263070778975, -165.25659352082, 27.2363409538754, 0.95)
    pt3dadd(113.741178277641, -166.134721564029, 27.2537868545661, 0.95)
    pt3dadd(114.219285776307, -167.012849607237, 27.2712327552567, 0.95)
    pt3dadd(114.697393274973, -167.890977650445, 27.2886786559473, 0.95)
    pt3dadd(115.175500773639, -168.769105693653, 27.3061245566379, 0.95)
    pt3dadd(115.646544095299, -169.650527663619, 27.3226184903114, 0.95)
    pt3dadd(116.009726555202, -170.582243642123, 27.3245771167947, 0.95)
    pt3dadd(116.372909015106, -171.513959620628, 27.3265357432779, 0.95)
    pt3dadd(116.73609147501, -172.445675599132, 27.3284943697612, 0.95)
    pt3dadd(117.099273934914, -173.377391577637, 27.3304529962445, 0.95)
    pt3dadd(117.462456394818, -174.309107556141, 27.3324116227278, 0.95)
    pt3dadd(117.807689843431, -175.247508092758, 27.3320233373915, 0.95)
    pt3dadd(118.142407769803, -176.189824812743, 27.330260101478, 0.95)
    pt3dadd(118.477125696176, -177.132141532729, 27.3284968655645, 0.95)
    pt3dadd(118.811843622548, -178.074458252714, 27.326733629651, 0.95)
    pt3dadd(119.14656154892, -179.0167749727, 27.3249703937375, 0.95)
    pt3dadd(119.481279475292, -179.959091692685, 27.323207157824, 0.95)
    pt3dadd(119.815997401664, -180.901408412671, 27.3214439219105, 0.95)
    pt3dadd(120.125123593954, -181.85127087099, 27.3164191622063, 0.95)
    pt3dadd(120.35713732333, -182.823869985825, 27.301566849139, 0.95)
    pt3dadd(120.589151052707, -183.79646910066, 27.2867145360718, 0.95)
    pt3dadd(120.821164782083, -184.769068215495, 27.2718622230045, 0.95)
    pt3dadd(121.053178511459, -185.74166733033, 27.2570099099372, 0.95)
    pt3dadd(121.285192240836, -186.714266445164, 27.2421575968699, 0.95)
    pt3dadd(121.517205970212, -187.686865559999, 27.2273052838027, 0.95)
    pt3dadd(121.749219699588, -188.659464674834, 27.2124529707354, 0.95)
    pt3dadd(122.142205780674, -189.577530118151, 27.2184174095434, 0.95)
    pt3dadd(122.549918011077, -190.490606686166, 27.2262862163571, 0.95)
    pt3dadd(122.95763024148, -191.403683254182, 27.2341550231708, 0.95)
    pt3dadd(123.365342471882, -192.316759822198, 27.2420238299845, 0.95)
    pt3dadd(123.773054702285, -193.229836390214, 27.2498926367982, 0.95)
    pt3dadd(124.180766932688, -194.142912958229, 27.257761443612, 0.95)
    pt3dadd(124.58847916309, -195.055989526245, 27.2656302504257, 0.95)
    pt3dadd(124.996191393493, -195.969066094261, 27.2734990572394, 0.95)
    pt3dadd(125.403903623896, -196.882142662276, 27.2813678640531, 0.95)
    pt3dadd(125.811615854298, -197.795219230292, 27.2892366708668, 0.95)
    pt3dadd(126.219328084701, -198.708295798308, 27.2971054776805, 0.95)
    pt3dadd(126.611448402628, -199.627513529659, 27.302921302925, 0.95)
  }
}
proc shape3d_5() {
  adendMML[4] {
    pt3dadd(126.935378130492, -200.573589387119, 27.2997584974329, 0.95)
    pt3dadd(127.259307858356, -201.519665244578, 27.2965956919408, 0.95)
    pt3dadd(127.58323758622, -202.465741102038, 27.2934328864487, 0.95)
    pt3dadd(127.907167314083, -203.411816959497, 27.2902700809566, 0.95)
    pt3dadd(128.231097041947, -204.357892816956, 27.2871072754645, 0.95)
    pt3dadd(128.552197263201, -205.294592979161, 27.3259078880788, 0.95)
    pt3dadd(128.845896016573, -206.140497166048, 27.7710900405463, 0.95)
    pt3dadd(129.139594769945, -206.986401352934, 28.2162721930138, 0.95)
    pt3dadd(129.433293523317, -207.83230553982, 28.6614543454814, 0.95)
    pt3dadd(129.72699227669, -208.678209726707, 29.1066364979489, 0.95)
    pt3dadd(130.020691030062, -209.524113913593, 29.5518186504165, 0.95)
    pt3dadd(130.314389783434, -210.37001810048, 29.997000802884, 0.95)
    pt3dadd(130.749905323262, -211.25255775406, 29.8277479983005, 0.95)
    pt3dadd(131.186417338083, -212.135354826578, 29.6541778693323, 0.95)
    pt3dadd(131.622929352905, -213.018151899096, 29.4806077403641, 0.95)
    pt3dadd(132.059441367727, -213.900948971614, 29.307037611396, 0.95)
    pt3dadd(132.495953382549, -214.783746044132, 29.1334674824278, 0.95)
    pt3dadd(132.93246539737, -215.66654311665, 28.9598973534596, 0.95)
    pt3dadd(133.368977412192, -216.549340189168, 28.7863272244915, 0.95)
    pt3dadd(133.805489427014, -217.432137261686, 28.6127570955233, 0.95)
    pt3dadd(134.242001441836, -218.314934334204, 28.4391869665551, 0.95)
    pt3dadd(134.656122445784, -219.192078954277, 28.4648957312312, 0.95)
    pt3dadd(135.037718421628, -220.061012860879, 28.7800756436253, 0.95)
    pt3dadd(135.419314397473, -220.929946767481, 29.0952555560194, 0.95)
    pt3dadd(135.800910373317, -221.798880674083, 29.4104354684135, 0.95)
    pt3dadd(136.182506349161, -222.667814580685, 29.7256153808076, 0.95)
    pt3dadd(136.564102325006, -223.536748487287, 30.0407952932017, 0.95)
    pt3dadd(136.94569830085, -224.405682393889, 30.3559752055958, 0.95)
    pt3dadd(137.327294276695, -225.274616300491, 30.6711551179899, 0.95)
    pt3dadd(137.950628731879, -225.960106872685, 31.0209745591957, 0.95)
    pt3dadd(138.623672403092, -226.607875587921, 31.377917003018, 0.95)
    pt3dadd(139.296716074306, -227.255644303156, 31.7348594468402, 0.95)
    pt3dadd(139.995664653277, -227.895130223088, 32.0266631783816, 0.981028609001744)
    pt3dadd(140.784966921584, -228.505726593568, 32.0912696919957, 1.12028185730783)
  }
  GCL[6] {pt3dclear()
    pt3dadd(27.5486711620348, 14.5504403739704, 5.23890270549454, 1.54800635333196)
    pt3dadd(28.3935660748503, 14.0565412060426, 4.94071250916901, 1.54800635333196)
    pt3dadd(29.2002430611493, 13.530304907815, 4.67173742072534, 1.4423878029731)
    pt3dadd(30.0069200474483, 13.0040686095874, 4.40276233228167, 1.33676925261424)
    pt3dadd(30.8135970337472, 12.4778323113598, 4.133787243838, 1.23115070225538)
    pt3dadd(31.497212441652, 11.7873134120795, 4.05069498384406, 1.19)
    pt3dadd(32.1022759741561, 10.9919306992777, 4.08625425562835, 1.19)
    pt3dadd(32.7073395066602, 10.196547986476, 4.12181352741264, 1.19)
    pt3dadd(33.3124030391642, 9.40116527367425, 4.15737279919693, 1.19)
    pt3dadd(33.9174665716683, 8.60578256087249, 4.19293207098123, 1.19)
    pt3dadd(34.5225301041724, 7.81039984807076, 4.22849134276552, 1.19)
    pt3dadd(35.1275936366764, 7.01501713526899, 4.26405061454981, 1.19)
    pt3dadd(35.7326571691805, 6.21963442246724, 4.2996098863341, 1.19)
    pt3dadd(36.3377207016845, 5.42425170966549, 4.33516915811839, 1.19)
    pt3dadd(36.8380579110185, 4.55879955853627, 4.35570932152431, 1.19)
    pt3dadd(37.3368774948625, 3.69233200686157, 4.37603183781896, 1.19)
    pt3dadd(37.8356970787065, 2.82586445518685, 4.39635435411361, 1.19)
    pt3dadd(38.3345166625504, 1.95939690351215, 4.41667687040826, 1.19)
    pt3dadd(38.8333362463944, 1.09292935183741, 4.43699938670291, 1.19)
    pt3dadd(39.258877575294, 0.188358568206214, 4.44727904588314, 1.19)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(39.258877575294, 0.188358568206214, 4.44727904588314, 1.19)
    pt3dadd(39.6784845558414, -0.719297958282096, 4.45674539676866, 1.19)
    pt3dadd(40.0980915363888, -1.62695448477041, 4.46621174765418, 1.19)
    pt3dadd(40.5176985169362, -2.53461101125872, 4.47567809853969, 1.19)
    pt3dadd(40.9373054974836, -3.442267537747, 4.48514444942521, 1.19)
    pt3dadd(41.411301639907, -4.30313852378587, 4.41614424380034, 1.19)
    pt3dadd(42.0270810323097, -5.04204760145624, 4.14259513517724, 1.19)
    pt3dadd(42.6428604247124, -5.7809566791266, 3.86904602655413, 1.19)
    pt3dadd(43.2586398171151, -6.51986575679696, 3.59549691793103, 1.19)
    pt3dadd(43.8744192095178, -7.25877483446731, 3.32194780930793, 1.19)
    pt3dadd(44.4625756180456, -8.02253508094949, 3.09272895043118, 1.19)
    pt3dadd(44.900463062055, -8.92148562480606, 3.10466654142929, 1.19)
    pt3dadd(45.3383505060644, -9.82043616866266, 3.11660413242739, 1.19)
    pt3dadd(45.7762379500738, -10.7193867125192, 3.12854172342549, 1.19)
    pt3dadd(46.2141253940832, -11.6183372563758, 3.1404793144236, 1.19)
    pt3dadd(46.6520128380926, -12.5172878002324, 3.1524169054217, 1.19)
    pt3dadd(47.0840481834933, -13.4175689930446, 3.17744966577237, 1.19)
    pt3dadd(47.4536823083524, -14.3320389623101, 3.34211687274229, 1.19)
    pt3dadd(47.8233164332115, -15.2465089315755, 3.50678407971221, 1.19)
    pt3dadd(48.1929505580707, -16.160978900841, 3.67145128668213, 1.19)
    pt3dadd(48.5625846829298, -17.0754488701064, 3.83611849365205, 1.19)
    pt3dadd(48.932218807789, -17.9899188393719, 4.00078570062196, 1.19)
    pt3dadd(49.3018529326481, -18.9043888086373, 4.16545290759188, 1.19)
    pt3dadd(49.6714870575072, -19.8188587779028, 4.3301201145618, 1.19)
    pt3dadd(50.0411211823664, -20.7333287471682, 4.49478732153172, 1.19)
    pt3dadd(50.448222866657, -21.645105954135, 4.51876210962911, 1.19)
    pt3dadd(50.8594868968598, -22.5565840167668, 4.52710709628071, 1.19)
    pt3dadd(51.2707509270626, -23.4680620793987, 4.53545208293231, 1.19)
    pt3dadd(51.6820149572654, -24.3795401420305, 4.54379706958392, 1.19)
    pt3dadd(52.0932789874683, -25.2910182046624, 4.55214205623552, 1.19)
    pt3dadd(52.5045430176711, -26.2024962672942, 4.56048704288712, 1.19)
    pt3dadd(52.9158070478739, -27.1139743299261, 4.56883202953872, 1.19)
    pt3dadd(53.3400822689098, -27.9423121530464, 4.22734041132252, 1.19)
    pt3dadd(53.7660891158918, -28.7595850553808, 3.8392899385301, 1.19)
    pt3dadd(54.1920959628737, -29.5768579577151, 3.45123946573768, 1.19)
    pt3dadd(54.6181028098556, -30.3941308600496, 3.06318899294526, 1.19)
    pt3dadd(55.0441096568376, -31.211403762384, 2.67513852015284, 1.19)
    pt3dadd(55.4701165038195, -32.0286766647184, 2.28708804736042, 1.19)
    pt3dadd(55.8961233508014, -32.8459495670528, 1.89903757456801, 1.19)
    pt3dadd(56.3221301977834, -33.6632224693872, 1.51098710177559, 1.19)
    pt3dadd(56.7481370447653, -34.4804953717216, 1.12293662898317, 1.19)
    pt3dadd(57.1741438917472, -35.297768274056, 0.734886156190752, 1.19)
    pt3dadd(57.5154425185232, -36.2317967505867, 0.708397375629227, 1.19)
    pt3dadd(57.8509250462257, -37.1738417098774, 0.70673356031968, 1.19)
    pt3dadd(58.1864075739283, -38.115886669168, 0.705069745010133, 1.19)
    pt3dadd(58.5218901016308, -39.0579316284587, 0.703405929700586, 1.19)
    pt3dadd(58.8573726293333, -39.9999765877494, 0.70174211439104, 1.19)
    pt3dadd(59.1937160149987, -40.9416878740183, 0.708540394267929, 1.19)
    pt3dadd(59.5301397561967, -41.883368014065, 0.716128556094318, 1.19)
    pt3dadd(59.8665634973947, -42.8250481541117, 0.723716717920706, 1.19)
    pt3dadd(60.2029872385927, -43.7667282941585, 0.731304879747097, 1.19)
    pt3dadd(60.5394109797908, -44.7084084342052, 0.738893041573486, 1.19)
    pt3dadd(60.8758347209888, -45.6500885742519, 0.746481203399874, 1.19)
    pt3dadd(61.2122584621868, -46.5917687142987, 0.754069365226263, 1.19)
    pt3dadd(61.5292423125767, -47.5392216738932, 0.757454743708688, 1.19)
    pt3dadd(61.762706928359, -48.5114762887503, 0.742783783728323, 1.19)
    pt3dadd(61.9961715441412, -49.4837309036074, 0.728112823747963, 1.19)
    pt3dadd(62.2296361599235, -50.4559855184645, 0.713441863767599, 1.19)
    pt3dadd(62.4631007757057, -51.4282401333216, 0.698770903787236, 1.19)
    pt3dadd(62.6965653914879, -52.4004947481787, 0.684099943806873, 1.19)
    pt3dadd(62.9300300072702, -53.3727493630358, 0.669428983826512, 1.19)
    pt3dadd(63.1634946230524, -54.3450039778929, 0.654758023846148, 1.19)
    pt3dadd(63.3969592388346, -55.3172585927499, 0.640087063865785, 1.19)
    pt3dadd(63.6304238546169, -56.2895132076071, 0.625416103885423, 1.19)
    pt3dadd(63.8638884703991, -57.2617678224641, 0.610745143905062, 1.19)
    pt3dadd(64.0973530861813, -58.2340224373212, 0.596074183924698, 1.19)
    pt3dadd(64.3308177019636, -59.2062770521783, 0.581403223944336, 1.19)
    pt3dadd(64.5642823177458, -60.1785316670354, 0.566732263963972, 1.19)
    pt3dadd(64.8488035593864, -61.1362045537615, 0.558548030481984, 1.19)
    pt3dadd(65.1662146900858, -62.0844841166545, 0.554542445927518, 1.19)
    pt3dadd(65.4836258207851, -63.0327636795475, 0.550536861373053, 1.19)
    pt3dadd(65.8010369514845, -63.9810432424405, 0.546531276818587, 1.19)
    pt3dadd(66.1184480821839, -64.9293228053335, 0.542525692264123, 1.19)
    pt3dadd(66.4358592128832, -65.8776023682265, 0.538520107709656, 1.19)
    pt3dadd(66.7532703435826, -66.8258819311195, 0.534514523155191, 1.19)
    pt3dadd(67.0706814742819, -67.7741614940124, 0.530508938600726, 1.19)
    pt3dadd(67.3880926049813, -68.7224410569055, 0.52650335404626, 1.19)
    pt3dadd(67.7073376557407, -69.6701043130259, 0.522734717229791, 1.19)
    pt3dadd(68.0279091568791, -70.6173218025234, 0.51913746161132, 1.19)
    pt3dadd(68.3484806580176, -71.5645392920208, 0.515540205992846, 1.19)
    pt3dadd(68.6690521591561, -72.5117567815182, 0.511942950374374, 1.19)
    pt3dadd(68.9896236602946, -73.4589742710157, 0.508345694755904, 1.19)
    pt3dadd(69.3101951614331, -74.4061917605131, 0.504748439137429, 1.19)
    pt3dadd(69.6307666625716, -75.3534092500106, 0.501151183518958, 1.19)
    pt3dadd(69.9513381637101, -76.300626739508, 0.497553927900484, 1.19)
    pt3dadd(70.2719096648486, -77.2478442290054, 0.493956672282012, 1.19)
    pt3dadd(70.5924811659871, -78.1950617185029, 0.49035941666354, 1.19)
    pt3dadd(70.9130526671256, -79.1422792080003, 0.486762161045067, 1.19)
    pt3dadd(71.233624168264, -80.0894966974977, 0.483164905426594, 1.19)
    pt3dadd(71.6293968464884, -80.9997677271832, 0.562290521597491, 1.19)
    pt3dadd(72.0713305225938, -81.8873597840231, 0.692194203449776, 1.19)
    pt3dadd(72.5132641986992, -82.7749518408629, 0.822097885302061, 1.19)
    pt3dadd(72.9551978748046, -83.6625438977028, 0.952001567154348, 1.19)
    pt3dadd(73.39713155091, -84.5501359545426, 1.08190524900663, 1.19)
    pt3dadd(73.8390652270154, -85.4377280113825, 1.21180893085892, 1.19)
    pt3dadd(74.2809989031208, -86.3253200682223, 1.3417126127112, 1.19)
    pt3dadd(74.7229325792262, -87.2129121250621, 1.47161629456349, 1.19)
    pt3dadd(75.1648662553316, -88.100504181902, 1.60151997641577, 1.19)
    pt3dadd(75.606799931437, -88.9880962387418, 1.73142365826806, 1.19)
    pt3dadd(76.023804142358, -89.8967273022182, 1.74326780515826, 1.19)
    pt3dadd(76.4402154589795, -90.8058587337133, 1.75230415714543, 1.19)
    pt3dadd(76.856626775601, -91.7149901652084, 1.7613405091326, 1.19)
    pt3dadd(77.2730380922225, -92.6241215967034, 1.77037686111976, 1.19)
    pt3dadd(77.689449408844, -93.5332530281986, 1.77941321310693, 1.19)
    pt3dadd(78.1058607254656, -94.4423844596936, 1.7884495650941, 1.19)
    pt3dadd(78.5222720420871, -95.3515158911887, 1.79748591708127, 1.19)
    pt3dadd(78.9386833587086, -96.2606473226838, 1.80652226906843, 1.19)
    pt3dadd(79.3550946753301, -97.1697787541789, 1.8155586210556, 1.19)
    pt3dadd(79.7715059919516, -98.078910185674, 1.82459497304277, 1.19)
    pt3dadd(80.2531983576647, -98.8367857978262, 2.21570989244862, 1.19)
    pt3dadd(80.750209902547, -99.5591669589984, 2.69648528932038, 1.19)
    pt3dadd(81.2472214474293, -100.281548120171, 3.17726068619213, 1.19)
    pt3dadd(81.7442329923116, -101.003929281343, 3.65803608306389, 1.19)
    pt3dadd(82.241244537194, -101.726310442515, 4.13881147993564, 1.19)
    pt3dadd(82.6623281557403, -102.626638924349, 4.16896479032037, 1.19)
    pt3dadd(83.0798794910197, -103.535245787716, 4.1781544720031, 1.19)
    pt3dadd(83.4974308262991, -104.443852651082, 4.18734415368583, 1.19)
    pt3dadd(83.9149821615785, -105.352459514449, 4.19653383536855, 1.19)
    pt3dadd(84.3325334968579, -106.261066377816, 4.20572351705128, 1.19)
    pt3dadd(84.7500848321373, -107.169673241182, 4.21491319873401, 1.19)
    pt3dadd(85.1676361674167, -108.078280104549, 4.22410288041674, 1.19)
    pt3dadd(85.5851875026961, -108.986886967916, 4.23329256209947, 1.19)
    pt3dadd(86.0027388379755, -109.895493831282, 4.2424822437822, 1.19)
    pt3dadd(86.4035449158375, -110.811533918166, 4.24943133363526, 1.19)
    pt3dadd(86.7956628540471, -111.731430672188, 4.25521791076992, 1.19)
    pt3dadd(87.1877807922567, -112.65132742621, 4.26100448790459, 1.19)
    pt3dadd(87.5798987304663, -113.571224180231, 4.26679106503926, 1.19)
    pt3dadd(87.9720166686758, -114.491120934253, 4.27257764217392, 1.19)
    pt3dadd(88.3641346068854, -115.411017688274, 4.27836421930859, 1.19)
    pt3dadd(88.756252545095, -116.330914442296, 4.28415079644326, 1.19)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(88.756252545095, -116.330914442296, 4.28415079644326, 1.19)
    pt3dadd(89.1415933565135, -117.250652512976, 4.26507818078448, 1.19)
    pt3dadd(89.4735429123761, -118.169140451694, 4.0501609902385, 1.19)
    pt3dadd(89.8054924682387, -119.087628390412, 3.83524379969251, 1.19)
    pt3dadd(90.1374420241012, -120.00611632913, 3.62032660914653, 1.19)
    pt3dadd(90.4693915799638, -120.924604267848, 3.40540941860054, 1.19)
    pt3dadd(90.8013411358264, -121.843092206566, 3.19049222805456, 1.19)
    pt3dadd(91.133290691689, -122.761580145284, 2.97557503750857, 1.19)
    pt3dadd(91.4652402475516, -123.680068084002, 2.76065784696259, 1.19)
    pt3dadd(91.7971898034141, -124.59855602272, 2.54574065641661, 1.19)
    pt3dadd(92.1369895118976, -125.520481731164, 2.38628012128568, 1.19)
    pt3dadd(92.499628757243, -126.452409419465, 2.38816731871166, 1.19)
    pt3dadd(92.8622680025885, -127.384337107765, 2.39005451613764, 1.19)
    pt3dadd(93.2249072479339, -128.316264796066, 2.39194171356362, 1.19)
    pt3dadd(93.5875464932794, -129.248192484366, 2.3938289109896, 1.19)
    pt3dadd(93.9501857386249, -130.180120172667, 2.39571610841558, 1.19)
    pt3dadd(94.3128249839704, -131.112047860967, 2.39760330584156, 1.19)
    pt3dadd(94.6754642293158, -132.043975549268, 2.39949050326753, 1.19)
    pt3dadd(95.0381034746613, -132.975903237568, 2.40137770069351, 1.19)
    pt3dadd(95.4007427200068, -133.907830925869, 2.40326489811949, 1.19)
    pt3dadd(95.7633819653522, -134.839758614169, 2.40515209554547, 1.19)
    pt3dadd(96.1262691904009, -135.771589337306, 2.40707191423493, 1.19)
    pt3dadd(96.4914983994449, -136.702504296533, 2.40929981651343, 1.19)
    pt3dadd(96.8567276084889, -137.63341925576, 2.41152771879193, 1.19)
    pt3dadd(97.2219568175329, -138.564334214987, 2.41375562107043, 1.19)
    pt3dadd(97.5871860265769, -139.495249174214, 2.41598352334892, 1.19)
    pt3dadd(97.9524152356208, -140.426164133441, 2.41821142562743, 1.19)
    pt3dadd(98.3176444446648, -141.357079092668, 2.42043932790592, 1.19)
    pt3dadd(98.6828736537088, -142.287994051895, 2.42266723018442, 1.19)
    pt3dadd(99.0481028627528, -143.218909011122, 2.42489513246292, 1.19)
    pt3dadd(99.4133320717967, -144.149823970349, 2.42712303474142, 1.19)
    pt3dadd(99.7785612808407, -145.080738929576, 2.42935093701992, 1.19)
    pt3dadd(100.143790489885, -146.011653888803, 2.43157883929842, 1.19)
    pt3dadd(100.509019698929, -146.942568848029, 2.43380674157691, 1.19)
    pt3dadd(100.874248907973, -147.873483807256, 2.43603464385541, 1.19)
    pt3dadd(101.239478117017, -148.804398766483, 2.43826254613391, 1.19)
    pt3dadd(101.601710900222, -149.736314647609, 2.44911729893958, 1.19)
    pt3dadd(101.9567590596, -150.670630470433, 2.48065692071689, 1.19)
    pt3dadd(102.311807218978, -151.604946293258, 2.5121965424942, 1.19)
    pt3dadd(102.666855378356, -152.539262116082, 2.54373616427152, 1.19)
    pt3dadd(103.021903537734, -153.473577938907, 2.57527578604883, 1.19)
    pt3dadd(103.376951697113, -154.407893761732, 2.60681540782614, 1.19)
    pt3dadd(103.731999856491, -155.342209584556, 2.63835502960345, 1.19)
    pt3dadd(104.087048015869, -156.276525407381, 2.66989465138076, 1.19)
    pt3dadd(104.442096175247, -157.210841230205, 2.70143427315807, 1.19)
    pt3dadd(104.797144334625, -158.14515705303, 2.73297389493538, 1.19)
    pt3dadd(105.152192494003, -159.079472875854, 2.76451351671269, 1.19)
    pt3dadd(105.507240653381, -160.013788698679, 2.79605313849, 1.19)
    pt3dadd(105.862288812759, -160.948104521504, 2.82759276026732, 1.19)
    pt3dadd(106.217336972137, -161.882420344328, 2.85913238204463, 1.19)
    pt3dadd(106.572385131515, -162.816736167153, 2.89067200382194, 1.19)
    pt3dadd(106.963217557494, -163.732037066545, 2.92216604563517, 1.19)
    pt3dadd(107.538898479052, -164.549113793028, 2.95342463794535, 1.19)
    pt3dadd(108.114579400611, -165.366190519511, 2.98468323025552, 1.19)
    pt3dadd(108.69026032217, -166.183267245994, 3.0159418225657, 1.19)
    pt3dadd(109.265941243729, -167.000343972477, 3.04720041487587, 1.19)
    pt3dadd(109.841622165287, -167.81742069896, 3.07845900718605, 1.19)
    pt3dadd(110.417303086846, -168.634497425443, 3.10971759949622, 1.19)
    pt3dadd(110.992984008405, -169.451574151926, 3.14097619180639, 1.19)
    pt3dadd(111.568664929964, -170.268650878409, 3.17223478411657, 1.19)
    pt3dadd(112.091698363169, -171.112974448649, 3.1962834823169, 1.19)
    pt3dadd(112.423173487749, -172.05643587843, 3.19409892297268, 1.19)
    pt3dadd(112.75464861233, -172.999897308212, 3.19191436362845, 1.19)
    pt3dadd(113.08612373691, -173.943358737993, 3.18972980428423, 1.19)
    pt3dadd(113.41759886149, -174.886820167774, 3.18754524494, 1.19)
  }
}
proc shape3d_6() {
  adendMML[5] {
    pt3dadd(113.749073986071, -175.830281597555, 3.18536068559577, 1.19)
    pt3dadd(114.080549110651, -176.773743027337, 3.18317612625155, 1.19)
    pt3dadd(114.61180473875, -177.61994476552, 3.20808910469132, 1.19)
    pt3dadd(115.147404055688, -178.464031853728, 3.23359124608922, 1.19)
    pt3dadd(115.683003372626, -179.308118941936, 3.25909338748712, 1.19)
    pt3dadd(116.218602689564, -180.152206030145, 3.28459552888502, 1.19)
    pt3dadd(116.754202006502, -180.996293118353, 3.31009767028292, 1.19)
    pt3dadd(117.28980132344, -181.840380206561, 3.33559981168082, 1.19)
    pt3dadd(117.825400640378, -182.684467294769, 3.36110195307872, 1.19)
    pt3dadd(118.360999957316, -183.528554382977, 3.38660409447662, 1.19)
    pt3dadd(118.896599274254, -184.372641471185, 3.41210623587452, 1.19)
    pt3dadd(119.432198591192, -185.216728559393, 3.43760837727242, 1.19)
    pt3dadd(119.905993359314, -186.091502587502, 3.47397885954009, 1.19)
    pt3dadd(120.266224554193, -187.022662733036, 3.53031951630188, 1.19)
    pt3dadd(120.626455749073, -187.953822878571, 3.58666017306366, 1.19)
    pt3dadd(120.986686943952, -188.884983024105, 3.64300082982545, 1.19)
    pt3dadd(121.346918138832, -189.816143169639, 3.69934148658723, 1.19)
    pt3dadd(121.707149333711, -190.747303315173, 3.75568214334901, 1.19)
    pt3dadd(122.067380528591, -191.678463460708, 3.8120228001108, 1.19)
    pt3dadd(122.42761172347, -192.609623606242, 3.86836345687259, 1.19)
    pt3dadd(122.78784291835, -193.540783751776, 3.92470411363437, 1.19)
    pt3dadd(123.143681958935, -194.473800589256, 3.97264807955614, 1.19)
    pt3dadd(123.473164406315, -195.417959128745, 3.97020488922419, 1.19)
    pt3dadd(123.802646853695, -196.362117668234, 3.96776169889224, 1.19)
    pt3dadd(124.132129301075, -197.306276207722, 3.96531850856029, 1.19)
    pt3dadd(124.461611748455, -198.250434747211, 3.96287531822834, 1.19)
    pt3dadd(124.791094195836, -199.1945932867, 3.9604321278964, 1.19)
    pt3dadd(125.203711358562, -200.097981323545, 3.96927775088094, 1.19)
    pt3dadd(125.745877705496, -200.937836510904, 3.995714780172, 1.19)
    pt3dadd(126.288044052431, -201.777691698263, 4.02215180946305, 1.19)
    pt3dadd(126.830210399365, -202.617546885622, 4.04858883875411, 1.19)
    pt3dadd(127.3723767463, -203.457402072981, 4.07502586804516, 1.19)
    pt3dadd(127.700705310629, -204.32044245726, 4.29293649486494, 1.19)
    pt3dadd(127.771487172579, -205.211407144428, 4.74145834967071, 1.19)
    pt3dadd(127.842269034529, -206.102371831596, 5.18998020447648, 1.19)
    pt3dadd(127.913050896479, -206.993336518764, 5.63850205928225, 1.19)
    pt3dadd(127.983832758429, -207.884301205932, 6.08702391408802, 1.19)
    pt3dadd(128.112403276888, -208.778419312563, 6.4617454665655, 1.19)
    pt3dadd(128.527462584107, -209.688170579351, 6.47060007384092, 1.19)
    pt3dadd(128.942521891326, -210.597921846138, 6.47945468111634, 1.19)
    pt3dadd(129.357581198544, -211.507673112925, 6.48830928839176, 1.19)
    pt3dadd(129.772640505763, -212.417424379712, 6.49716389566717, 1.19)
    pt3dadd(130.187699812982, -213.3271756465, 6.50601850294259, 1.19)
    pt3dadd(130.602759120201, -214.236926913287, 6.51487311021801, 1.19)
    pt3dadd(131.067097713985, -215.120654723971, 6.53049852709649, 1.19)
    pt3dadd(131.581015210585, -215.978200856896, 6.55293591985148, 1.19)
    pt3dadd(132.094932707185, -216.835746989821, 6.57537331260646, 1.19)
    pt3dadd(132.608850203785, -217.693293122747, 6.59781070536144, 1.19)
    pt3dadd(133.135205516927, -218.543208158456, 6.62200236888279, 1.19)
    pt3dadd(133.662095159378, -219.392795361793, 6.6462693959764, 1.19)
    pt3dadd(134.188984801829, -220.24238256513, 6.67053642307001, 1.19)
    pt3dadd(134.71587444428, -221.091969768467, 6.69480345016362, 1.19)
    pt3dadd(135.188655919771, -221.967515511105, 6.71174777916204, 1.19)
    pt3dadd(135.519175191089, -222.911311930596, 6.70943913342408, 1.19)
    pt3dadd(135.849694462407, -223.855108350086, 6.70713048768612, 1.19)
    pt3dadd(136.180213733724, -224.798904769576, 6.70482184194816, 1.19)
    pt3dadd(136.510733005042, -225.742701189066, 6.7025131962102, 1.19)
    pt3dadd(136.84125227636, -226.686497608556, 6.70020455047223, 1.19)
    pt3dadd(137.171771547678, -227.630294028046, 6.69789590473427, 1.19)
    pt3dadd(137.502290818995, -228.574090447536, 6.69558725899631, 1.19)
    pt3dadd(137.832810090313, -229.517886867027, 6.69327861325834, 1.19)
  }
  GCL[7] {pt3dclear()
    pt3dadd(-12.6161221338495, 58.1571118947817, -9.14264213263719, 2.52106734996784)
    pt3dadd(-13.2340405737191, 57.4517002405874, -9.43323707190527, 2.52106734996784)
    pt3dadd(-13.7593178666923, 56.7052421017855, -9.84175146884007, 2.35593767422087)
    pt3dadd(-14.2845951596655, 55.9587839629835, -10.2502658657749, 2.1908079984739)
    pt3dadd(-14.8098724526387, 55.2123258241815, -10.6587802627097, 2.02567832272693)
    pt3dadd(-15.3522994059873, 54.4803998129197, -11.0697081014804, 1.91)
    pt3dadd(-15.9348434405965, 53.7824678591878, -11.4862815472271, 1.91)
    pt3dadd(-16.5173874752058, 53.084535905456, -11.9028549929737, 1.91)
    pt3dadd(-17.099931509815, 52.3866039517242, -12.3194284387204, 1.91)
    pt3dadd(-17.6824755444243, 51.6886719979923, -12.7360018844671, 1.91)
    pt3dadd(-18.2650195790335, 50.9907400442605, -13.1525753302137, 1.91)
    pt3dadd(-18.7842997572296, 50.2537627993201, -13.5823313269936, 1.91)
    pt3dadd(-19.2755868835793, 49.4995087564869, -14.0179203515947, 1.91)
    pt3dadd(-19.7668740099289, 48.7452547136538, -14.4535093761958, 1.91)
    pt3dadd(-20.2581611362785, 47.9910006708206, -14.889098400797, 1.91)
    pt3dadd(-20.7494482626282, 47.2367466279875, -15.3246874253981, 1.91)
    pt3dadd(-21.2407353889778, 46.4824925851543, -15.7602764499992, 1.91)
    pt3dadd(-21.7320225153275, 45.7282385423212, -16.1958654746004, 1.91)
    pt3dadd(-22.2233096416771, 44.973984499488, -16.6314544992015, 1.91)
    pt3dadd(-22.7688346869376, 44.1466767089081, -16.6514193064605, 1.88894987014627)
    pt3dadd(-23.3196227603196, 43.312280078334, -16.6310536219202, 1.86585712089256)
    pt3dadd(-23.8704108337017, 42.47788344776, -16.6106879373799, 1.84276437163886)
    pt3dadd(-24.4211989070837, 41.6434868171859, -16.5903222528396, 1.81967162238516)
    pt3dadd(-24.9719869804657, 40.8090901866119, -16.5699565682993, 1.79657887313145)
    pt3dadd(-25.5227750538477, 39.9746935560378, -16.549590883759, 1.77348612387775)
    pt3dadd(-26.0735631272297, 39.1402969254638, -16.5292251992187, 1.75039337462405)
    pt3dadd(-26.6243512006117, 38.3059002948897, -16.5088595146784, 1.72730062537035)
    pt3dadd(-27.1751392739938, 37.4715036643157, -16.4884938301381, 1.70420787611664)
    pt3dadd(-27.7259273473758, 36.6371070337416, -16.4681281455978, 1.68111512686294)
    pt3dadd(-28.2112653914401, 35.774787692135, -16.3673591691992, 1.67)
    pt3dadd(-28.6358663914305, 34.8865563234699, -16.1919766543165, 1.67)
    pt3dadd(-29.0604673914208, 33.9983249548049, -16.0165941394338, 1.67)
    pt3dadd(-29.4850683914112, 33.1100935861398, -15.841211624551, 1.67)
    pt3dadd(-29.9096693914016, 32.2218622174748, -15.6658291096683, 1.67)
    pt3dadd(-30.3342703913919, 31.3336308488097, -15.4904465947856, 1.67)
    pt3dadd(-30.7588713913823, 30.4453994801446, -15.3150640799028, 1.67)
    pt3dadd(-31.1834723913726, 29.5571681114796, -15.1396815650201, 1.67)
    pt3dadd(-31.6058882091363, 28.6700676823996, -14.9538314029559, 1.67)
    pt3dadd(-32.0268408301605, 27.7837245298035, -14.7609721104681, 1.67)
    pt3dadd(-32.4477934511847, 26.8973813772074, -14.5681128179803, 1.67)
    pt3dadd(-32.8687460722089, 26.0110382246113, -14.3752535254924, 1.67)
    pt3dadd(-33.2896986932331, 25.1246950720153, -14.1823942330046, 1.67)
    pt3dadd(-33.7106513142573, 24.2383519194192, -13.9895349405168, 1.67)
    pt3dadd(-34.1316039352815, 23.3520087668231, -13.796675648029, 1.67)
    pt3dadd(-34.5525565563058, 22.465665614227, -13.6038163555411, 1.67)
    pt3dadd(-34.97350917733, 21.579322461631, -13.4109570630533, 1.67)
    pt3dadd(-35.3322289162071, 20.6535432245305, -13.4328008135362, 1.67)
    pt3dadd(-35.674310147631, 19.7172204039848, -13.5120473076724, 1.67)
    pt3dadd(-36.0163913790548, 18.7808975834391, -13.5912938018086, 1.67)
    pt3dadd(-36.3584726104787, 17.8445747628934, -13.6705402959449, 1.67)
    pt3dadd(-36.7005538419026, 16.9082519423477, -13.7497867900811, 1.67)
    pt3dadd(-37.0426350733265, 15.971929121802, -13.8290332842173, 1.67)
    pt3dadd(-37.3847163047504, 15.0356063012563, -13.9082797783535, 1.67)
    pt3dadd(-37.7267975361743, 14.0992834807106, -13.9875262724897, 1.67)
    pt3dadd(-38.0404693601398, 13.1531064430026, -14.0639300755019, 1.67)
    pt3dadd(-38.337902389377, 12.201296742595, -14.1387089985266, 1.67)
    pt3dadd(-38.6353354186142, 11.2494870421873, -14.2134879215513, 1.67)
    pt3dadd(-38.9327684478514, 10.2976773417797, -14.2882668445759, 1.67)
    pt3dadd(-39.2302014770886, 9.34586764137208, -14.3630457676006, 1.67)
    pt3dadd(-39.5276345063258, 8.39405794096446, -14.4378246906253, 1.67)
    pt3dadd(-39.825067535563, 7.44224824055683, -14.5126036136499, 1.67)
    pt3dadd(-40.1225005648002, 6.49043854014921, -14.5873825366746, 1.67)
    pt3dadd(-40.4199335940374, 5.53862883974159, -14.6621614596993, 1.67)
    pt3dadd(-40.7173666232746, 4.58681913933397, -14.7369403827239, 1.67)
    pt3dadd(-41.0148992105013, 3.63505094149842, -14.8109312232905, 1.67)
    pt3dadd(-41.3339910291857, 2.69227010431281, -14.7142632126339, 1.67)
    pt3dadd(-41.6530828478701, 1.7494892671272, -14.6175952019773, 1.67)
    pt3dadd(-41.9721746665545, 0.806708429941591, -14.5209271913207, 1.67)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-41.9721746665545, 0.806708429941591, -14.5209271913207, 1.67)
    pt3dadd(-42.2912664852389, -0.136072407243989, -14.4242591806641, 1.67)
    pt3dadd(-42.6103583039233, -1.07885324442961, -14.3275911700075, 1.67)
    pt3dadd(-42.9294501226077, -2.02163408161521, -14.2309231593509, 1.67)
    pt3dadd(-43.248541941292, -2.96441491880083, -14.1342551486943, 1.67)
    pt3dadd(-43.5676337599764, -3.90719575598641, -14.0375871380377, 1.67)
    pt3dadd(-43.8867255786608, -4.84997659317202, -13.9409191273811, 1.67)
    pt3dadd(-44.2058173973452, -5.79275743035763, -13.8442511167244, 1.67)
    pt3dadd(-44.5195949351006, -6.7365789910451, -13.75603063077, 1.67)
    pt3dadd(-44.6770526696363, -7.71101347852256, -13.9162944490493, 1.67)
    pt3dadd(-44.8345104041721, -8.685447966, -14.0765582673285, 1.67)
    pt3dadd(-44.9919681387078, -9.65988245347747, -14.2368220856077, 1.67)
    pt3dadd(-45.1494258732435, -10.6343169409549, -14.3970859038869, 1.67)
    pt3dadd(-45.3068836077792, -11.6087514284324, -14.5573497221662, 1.67)
    pt3dadd(-45.4643413423149, -12.5831859159098, -14.7176135404454, 1.67)
    pt3dadd(-45.6217990768507, -13.5576204033873, -14.8778773587246, 1.67)
    pt3dadd(-45.7792568113864, -14.5320548908647, -15.0381411770039, 1.67)
    pt3dadd(-45.9367145459221, -15.5064893783422, -15.1984049952831, 1.67)
    pt3dadd(-46.0941722804578, -16.4809238658196, -15.3586688135623, 1.67)
    pt3dadd(-46.2516300149936, -17.4553583532971, -15.5189326318416, 1.67)
    pt3dadd(-46.4090877495293, -18.4297928407745, -15.6791964501208, 1.67)
    pt3dadd(-46.566545484065, -19.404227328252, -15.8394602684, 1.67)
    pt3dadd(-46.7216726129319, -20.3782975840771, -16.0017259912115, 1.67)
    pt3dadd(-46.6838296240118, -21.3222100891576, -16.3297459463092, 1.67)
    pt3dadd(-46.6459866350917, -22.2661225942381, -16.6577659014069, 1.67)
    pt3dadd(-46.6081436461715, -23.2100350993185, -16.9857858565046, 1.67)
    pt3dadd(-46.5703006572514, -24.153947604399, -17.3138058116023, 1.67)
    pt3dadd(-46.5954927182934, -24.6993624916886, -18.1067928481165, 1.67)
    pt3dadd(-46.6328370155283, -25.1679528634648, -18.9894187410874, 1.67)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(-46.6328370155283, -25.1679528634648, -18.9894187410874, 1.61277060281397)
    pt3dadd(-46.8766888298533, -26.0399058009041, -19.3037828733436, 1.61277060281397)
    pt3dadd(-47.1523647969566, -26.9740195356627, -19.5305741688046, 1.54672178294964)
    pt3dadd(-47.4280407640599, -27.9081332704214, -19.7573654642656, 1.4806729630853)
    pt3dadd(-47.7037167311633, -28.84224700518, -19.9841567597266, 1.41462414322097)
    pt3dadd(-47.9793926982666, -29.7763607399387, -20.2109480551875, 1.34857532335664)
    pt3dadd(-48.2550686653699, -30.7104744746974, -20.4377393506485, 1.2825265034923)
    pt3dadd(-48.5307446324733, -31.644588209456, -20.6645306461095, 1.21647768362797)
    pt3dadd(-48.8678914985615, -32.571433705046, -20.8050492906145, 1.19)
    pt3dadd(-49.2461695317188, -33.4934159049223, -20.8878415169517, 1.19)
    pt3dadd(-49.6244475648761, -34.4153981047986, -20.9706337432889, 1.19)
    pt3dadd(-50.0027255980334, -35.337380304675, -21.0534259696261, 1.19)
    pt3dadd(-50.3810036311907, -36.2593625045513, -21.1362181959632, 1.19)
    pt3dadd(-50.7501141367012, -37.1847188714909, -21.2181013947255, 1.19)
    pt3dadd(-51.0460623843822, -38.1370030743919, -21.2927300192591, 1.19)
    pt3dadd(-51.3420106320633, -39.0892872772928, -21.3673586437927, 1.19)
    pt3dadd(-51.6379588797444, -40.0415714801938, -21.4419872683263, 1.19)
    pt3dadd(-51.5768014283429, -41.0378679195348, -21.4774758019067, 1.19)
    pt3dadd(-51.5091183370228, -42.0349686249734, -21.5122491014805, 1.19)
    pt3dadd(-51.4766784569596, -43.0315650881905, -21.5510490172397, 1.19)
    pt3dadd(-51.562907122838, -44.0264637012662, -21.603407081384, 1.19)
    pt3dadd(-51.6491357887164, -45.0213623143419, -21.6557651455283, 1.19)
    pt3dadd(-51.7306026895336, -46.0164394559663, -21.7075838781927, 1.19)
    pt3dadd(-51.7086550326515, -47.0153938260289, -21.7476895746754, 1.19)
    pt3dadd(-51.6867073757695, -48.0143481960914, -21.787795271158, 1.19)
    pt3dadd(-51.6647597188875, -49.013302566154, -21.8279009676407, 1.19)
    pt3dadd(-51.6428120620055, -50.0122569362165, -21.8680066641233, 1.19)
    pt3dadd(-51.7387661482857, -51.0059602817188, -21.9214308133873, 1.19)
    pt3dadd(-51.8388353662726, -51.9994803503919, -21.975319817418, 1.19)
    pt3dadd(-51.9389045842595, -52.9930004190649, -22.0292088214487, 1.19)
    pt3dadd(-52.0389738022464, -53.986520487738, -22.0830978254795, 1.19)
    pt3dadd(-51.9270422763617, -54.974742598973, -22.1124097663063, 1.19)
    pt3dadd(-51.7684594648408, -55.9617988816302, -22.1363134638663, 1.19)
    pt3dadd(-51.60987665332, -56.9488551642875, -22.1602171614263, 1.19)
    pt3dadd(-51.4512938417991, -57.9359114469447, -22.1841208589863, 1.19)
    pt3dadd(-51.2927110302782, -58.9229677296019, -22.2080245565463, 1.19)
    pt3dadd(-51.1776914879019, -59.9154703039965, -22.2371644521039, 1.19)
    pt3dadd(-51.0818371617935, -60.9103689189329, -22.2686079596039, 1.19)
    pt3dadd(-50.9859828356851, -61.9052675338693, -22.3000514671039, 1.19)
    pt3dadd(-50.8901285095767, -62.9001661488057, -22.3314949746038, 1.19)
    pt3dadd(-50.7942741834683, -63.8950647637422, -22.3629384821038, 1.19)
    pt3dadd(-50.6984198573599, -64.8899633786786, -22.3943819896037, 1.19)
    pt3dadd(-50.6025655312515, -65.884861993615, -22.4258254971037, 1.19)
    pt3dadd(-50.4040576687817, -66.859022875113, -22.5124126523412, 1.19)
    pt3dadd(-50.175447821495, -67.8271026515733, -22.6151700566102, 1.19)
    pt3dadd(-49.9468379742083, -68.7951824280336, -22.7179274608793, 1.19)
    pt3dadd(-49.7182281269216, -69.7632622044939, -22.8206848651484, 1.19)
    pt3dadd(-49.4896182796349, -70.7313419809542, -22.9234422694174, 1.19)
    pt3dadd(-49.2610084323482, -71.6994217574145, -23.0261996736865, 1.19)
    pt3dadd(-49.2126219481653, -72.688224394761, -23.0904448980012, 1.19)
    pt3dadd(-49.2470324882994, -73.686547391661, -23.1369971115694, 1.19)
    pt3dadd(-49.2814430284335, -74.6848703885611, -23.1835493251376, 1.19)
    pt3dadd(-49.3158535685676, -75.6831933854613, -23.2301015387058, 1.19)
    pt3dadd(-49.3502641087016, -76.6815163823614, -23.276653752274, 1.19)
    pt3dadd(-49.3846746488357, -77.6798393792614, -23.3232059658422, 1.19)
    pt3dadd(-49.4190851889698, -78.6781623761615, -23.3697581794104, 1.19)
    pt3dadd(-49.4018032936709, -79.6770836348241, -23.410398385284, 1.19)
    pt3dadd(-49.3805877134078, -80.6760504199409, -23.4505886998808, 1.19)
    pt3dadd(-49.3593721331447, -81.6750172050578, -23.4907790144777, 1.19)
    pt3dadd(-49.3381565528816, -82.6739839901746, -23.5309693290745, 1.19)
    pt3dadd(-49.3169409726185, -83.6729507752915, -23.5711596436714, 1.19)
    pt3dadd(-49.2957253923554, -84.6719175604084, -23.6113499582682, 1.19)
    pt3dadd(-49.3169801538422, -85.666388764286, -23.6967543408149, 1.19)
    pt3dadd(-49.3742615503973, -86.657046467776, -23.8205127996148, 1.19)
    pt3dadd(-49.4315429469523, -87.6477041712661, -23.9442712584147, 1.19)
    pt3dadd(-49.4888243435073, -88.6383618747562, -24.0680297172146, 1.19)
    pt3dadd(-49.5461057400624, -89.6290195782462, -24.1917881760145, 1.19)
    pt3dadd(-49.6033871366174, -90.6196772817362, -24.3155466348144, 1.19)
    pt3dadd(-49.6572467595712, -91.6119488299485, -24.4225305592438, 1.19)
    pt3dadd(-49.6989471959194, -92.6099551348742, -24.4699065968269, 1.19)
    pt3dadd(-49.7406476322676, -93.6079614397998, -24.51728263441, 1.19)
    pt3dadd(-49.7823480686158, -94.6059677447254, -24.564658671993, 1.19)
    pt3dadd(-49.8240485049639, -95.6039740496511, -24.6120347095762, 1.19)
    pt3dadd(-49.8657489413121, -96.6019803545767, -24.6594107471592, 1.19)
    pt3dadd(-49.9074493776603, -97.5999866595023, -24.7067867847423, 1.19)
    pt3dadd(-49.9491498140085, -98.5979929644279, -24.7541628223254, 1.19)
    pt3dadd(-49.9908502503566, -99.5959992693536, -24.8015388599085, 1.19)
    pt3dadd(-50.0325506867048, -100.594005574279, -24.8489148974916, 1.19)
    pt3dadd(-50.074251123053, -101.592011879205, -24.8962909350747, 1.19)
    pt3dadd(-50.1159515594012, -102.59001818413, -24.9436669726578, 1.19)
    pt3dadd(-50.1576519957493, -103.588024489056, -24.9910430102409, 1.19)
    pt3dadd(-50.2667315163345, -104.572085134441, -25.1268556392403, 1.19)
    pt3dadd(-50.3826868052501, -105.554722680577, -25.2716928716669, 1.19)
    pt3dadd(-50.4986420941658, -106.537360226713, -25.4165301040935, 1.19)
    pt3dadd(-50.6145973830815, -107.519997772848, -25.56136733652, 1.19)
    pt3dadd(-50.7305526719971, -108.502635318984, -25.7062045689466, 1.19)
    pt3dadd(-50.8465079609128, -109.48527286512, -25.8510418013731, 1.19)
    pt3dadd(-50.9624632498285, -110.467910411255, -25.9958790337997, 1.19)
    pt3dadd(-51.0784185387442, -111.450547957391, -26.1407162662263, 1.19)
    pt3dadd(-51.1943738276598, -112.433185503527, -26.2855534986528, 1.19)
    pt3dadd(-51.3103291165755, -113.415823049662, -26.4303907310794, 1.19)
  }
}
proc shape3d_7() {
  adendIML[6] {
    pt3dadd(-51.4262844054912, -114.398460595798, -26.5752279635059, 1.19)
    pt3dadd(-51.5422396944068, -115.381098141934, -26.7200651959325, 1.19)
    pt3dadd(-51.6365129935288, -116.371915254097, -26.8045664112663, 1.19)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(-51.6365129935288, -116.371915254097, -26.8045664112663, 1.19)
    pt3dadd(-51.71908986492, -117.367144862707, -26.8565191441867, 1.19)
    pt3dadd(-51.8016667363111, -118.362374471316, -26.9084718771071, 1.19)
    pt3dadd(-51.8842436077023, -119.357604079926, -26.9604246100275, 1.19)
    pt3dadd(-51.9668204790935, -120.352833688536, -27.0123773429479, 1.19)
    pt3dadd(-52.0493973504847, -121.348063297145, -27.0643300758683, 1.19)
    pt3dadd(-52.1319742218758, -122.343292905755, -27.1162828087887, 1.19)
    pt3dadd(-52.214551093267, -123.338522514365, -27.1682355417091, 1.19)
    pt3dadd(-52.2971279646582, -124.333752122974, -27.2201882746295, 1.19)
    pt3dadd(-52.3797048360494, -125.328981731584, -27.2721410075499, 1.19)
    pt3dadd(-52.4622817074405, -126.324211340194, -27.3240937404703, 1.19)
    pt3dadd(-52.5604303913206, -127.317833127119, -27.3777664870832, 1.19)
    pt3dadd(-52.6712497852428, -128.310146637157, -27.432838800688, 1.19)
    pt3dadd(-52.7820691791649, -129.302460147196, -27.4879111142928, 1.19)
    pt3dadd(-52.8928885730871, -130.294773657234, -27.5429834278977, 1.19)
    pt3dadd(-53.0037079670093, -131.287087167273, -27.5980557415025, 1.19)
    pt3dadd(-53.1145273609314, -132.279400677311, -27.6531280551073, 1.19)
    pt3dadd(-53.2253467548536, -133.27171418735, -27.7082003687122, 1.19)
    pt3dadd(-53.3361661487757, -134.264027697388, -27.763272682317, 1.19)
    pt3dadd(-53.4469855426979, -135.256341207427, -27.8183449959218, 1.19)
    pt3dadd(-53.5661915655272, -136.245115608117, -27.8921288556834, 1.19)
    pt3dadd(-53.7371343110839, -137.212057408235, -28.0813433713163, 1.19)
    pt3dadd(-53.9080770566405, -138.178999208353, -28.2705578869491, 1.19)
    pt3dadd(-54.079019802197, -139.145941008471, -28.459772402582, 1.19)
    pt3dadd(-54.2499625477536, -140.112882808589, -28.6489869182148, 1.19)
    pt3dadd(-54.4209052933102, -141.079824608706, -28.8382014338477, 1.19)
    pt3dadd(-54.5918480388668, -142.046766408824, -29.0274159494806, 1.19)
    pt3dadd(-54.7627907844234, -143.013708208942, -29.2166304651135, 1.19)
    pt3dadd(-54.9519270712804, -143.983370900764, -29.3621731436994, 1.19)
    pt3dadd(-55.1637405589234, -144.956425027297, -29.4532813940969, 1.19)
    pt3dadd(-55.3755540465664, -145.929479153829, -29.5443896444943, 1.19)
    pt3dadd(-55.5873675342094, -146.902533280362, -29.6354978948917, 1.19)
    pt3dadd(-55.7991810218524, -147.875587406894, -29.7266061452891, 1.19)
    pt3dadd(-56.0109945094954, -148.848641533427, -29.8177143956865, 1.19)
    pt3dadd(-56.2228079971384, -149.821695659959, -29.9088226460839, 1.19)
    pt3dadd(-56.4346214847814, -150.794749786492, -29.9999308964814, 1.19)
    pt3dadd(-56.6464349724244, -151.767803913024, -30.0910391468788, 1.19)
    pt3dadd(-56.8620502142027, -152.741352182332, -30.1656916559284, 1.19)
    pt3dadd(-57.0795409417681, -153.715144222729, -30.2322261994511, 1.19)
    pt3dadd(-57.2970316693335, -154.688936263126, -30.2987607429739, 1.19)
    pt3dadd(-57.5145223968989, -155.662728303524, -30.3652952864966, 1.19)
    pt3dadd(-57.7320131244643, -156.636520343921, -30.4318298300193, 1.19)
    pt3dadd(-57.9495038520297, -157.610312384319, -30.498364373542, 1.19)
    pt3dadd(-58.166994579595, -158.584104424716, -30.5648989170648, 1.19)
    pt3dadd(-58.3844853071604, -159.557896465113, -30.6314334605875, 1.19)
    pt3dadd(-58.8300231561865, -160.412315940965, -30.8923968485527, 1.19)
    pt3dadd(-59.2829278590185, -161.262879195234, -31.1596410826144, 1.19)
    pt3dadd(-59.7358325618505, -162.113442449503, -31.4268853166762, 1.19)
    pt3dadd(-60.0287078472264, -163.025301438248, -31.6029639179002, 1.19)
    pt3dadd(-60.1018541558987, -164.021322759309, -31.653867213656, 1.19)
    pt3dadd(-60.175000464571, -165.01734408037, -31.7047705094118, 1.19)
    pt3dadd(-60.2481467732432, -166.013365401432, -31.7556738051677, 1.19)
    pt3dadd(-60.3212930819155, -167.009386722493, -31.8065771009235, 1.19)
    pt3dadd(-60.6256036916435, -167.945079332973, -31.8814582649767, 1.19)
    pt3dadd(-61.0352376218065, -168.85328491329, -31.9672642504425, 1.19)
    pt3dadd(-61.4448715519695, -169.761490493606, -32.0530702359084, 1.19)
    pt3dadd(-61.7789926684719, -170.640573109284, -32.184904939284, 1.19)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(-61.7789926684719, -170.640573109284, -32.184904939284, 1.19)
    pt3dadd(-62.5698613805234, -171.271712504784, -32.6280985040779, 1.19)
    pt3dadd(-63.1860686119319, -171.973029114135, -32.9864888797977, 1.19)
    pt3dadd(-63.7689640460355, -172.711394175646, -33.2921806220692, 1.19)
    pt3dadd(-64.2150345500631, -173.601932109421, -33.3814179121629, 1.19)
    pt3dadd(-64.6611050540906, -174.492470043197, -33.4706552022566, 1.19)
    pt3dadd(-65.1071755581181, -175.383007976973, -33.5598924923503, 1.19)
    pt3dadd(-65.5532460621456, -176.273545910748, -33.6491297824439, 1.19)
    pt3dadd(-65.9993165661731, -177.164083844524, -33.7383670725376, 1.19)
    pt3dadd(-66.442341938628, -178.053056921695, -33.7718060831132, 1.18043989601004)
    pt3dadd(-66.8733460568954, -178.935852420471, -33.5849704404275, 1.13313940630003)
    pt3dadd(-67.3043501751628, -179.818647919246, -33.3981347977419, 1.08583891659003)
    pt3dadd(-67.7353542934302, -180.701443418022, -33.2112991550562, 1.03853842688002)
    pt3dadd(-68.1663584116977, -181.584238916798, -33.0244635123706, 0.991237937170016)
    pt3dadd(-68.6084539667003, -182.462867766391, -32.8738444653939, 0.95)
    pt3dadd(-69.1259943064198, -183.313154755678, -32.9695734192815, 0.95)
    pt3dadd(-69.6435346461393, -184.163441744965, -33.065302373169, 0.95)
    pt3dadd(-70.1610749858588, -185.013728734252, -33.1610313270566, 0.95)
    pt3dadd(-70.6786153255782, -185.864015723539, -33.2567602809441, 0.95)
    pt3dadd(-71.1961556652977, -186.714302712826, -33.3524892348317, 0.95)
    pt3dadd(-71.7136960050172, -187.564589702113, -33.4482181887192, 0.95)
    pt3dadd(-72.2312363447367, -188.4148766914, -33.5439471426068, 0.95)
    pt3dadd(-72.7283840339515, -189.277206497094, -33.6378476226147, 0.95)
    pt3dadd(-73.2105622817233, -190.148376459931, -33.7304058919734, 0.95)
    pt3dadd(-73.6927405294952, -191.019546422768, -33.8229641613322, 0.95)
    pt3dadd(-74.1749187772671, -191.890716385604, -33.915522430691, 0.95)
    pt3dadd(-74.6570970250389, -192.761886348441, -34.0080807000497, 0.95)
    pt3dadd(-75.1625505755195, -193.616548237681, -34.1026080144481, 0.95)
    pt3dadd(-75.8140726804766, -194.367610595796, -34.209492442575, 0.95)
    pt3dadd(-76.4655947854338, -195.11867295391, -34.3163768707019, 0.95)
    pt3dadd(-77.1171168903909, -195.869735312024, -34.4232612988287, 0.95)
    pt3dadd(-77.7686389953481, -196.620797670138, -34.5301457269556, 0.95)
    pt3dadd(-78.4201611003052, -197.371860028253, -34.6370301550825, 0.95)
    pt3dadd(-79.0716832052623, -198.122922386367, -34.7439145832094, 0.95)
    pt3dadd(-79.7232053102195, -198.873984744481, -34.8507990113363, 0.95)
    pt3dadd(-80.3048406493755, -199.671868945911, -34.9516540001478, 0.95)
    pt3dadd(-80.7399837230273, -200.567898165552, -35.0398704555419, 0.95)
    pt3dadd(-81.1751267966791, -201.463927385193, -35.128086910936, 0.95)
    pt3dadd(-81.6102698703309, -202.359956604834, -35.21630336633, 0.95)
    pt3dadd(-82.0454129439827, -203.255985824475, -35.3045198217241, 0.95)
    pt3dadd(-82.4805560176345, -204.152015044116, -35.3927362771182, 0.95)
    pt3dadd(-82.9156990912863, -205.048044263757, -35.4809527325123, 0.95)
    pt3dadd(-83.3868442821632, -205.922286489717, -35.5723748118117, 0.95)
    pt3dadd(-83.9664291633912, -206.730905495976, -35.6734523472473, 0.95)
    pt3dadd(-84.5460140446191, -207.539524502234, -35.7745298826829, 0.95)
    pt3dadd(-85.125598925847, -208.348143508492, -35.8756074181185, 0.95)
    pt3dadd(-85.705183807075, -209.156762514751, -35.9766849535541, 0.95)
    pt3dadd(-86.2847686883029, -209.965381521009, -36.0777624889898, 0.95)
    pt3dadd(-86.8452474602569, -210.787493163082, -36.1772211918894, 0.95)
    pt3dadd(-87.4021129395226, -211.612156493813, -36.2763737458144, 0.95)
    pt3dadd(-87.9589784187883, -212.436819824544, -36.3755262997393, 0.95)
    pt3dadd(-88.515843898054, -213.261483155275, -36.4746788536642, 0.95)
    pt3dadd(-89.0727093773198, -214.086146486006, -36.5738314075891, 0.95)
    pt3dadd(-89.6295748565855, -214.910809816737, -36.672983961514, 0.95)
    pt3dadd(-90.1772219093787, -215.741476785612, -36.7713338443899, 0.95)
    pt3dadd(-90.6943806680534, -216.591999712123, -36.8670290365661, 0.95)
    pt3dadd(-91.2115394267281, -217.442522638633, -36.9627242287423, 0.95)
    pt3dadd(-91.7286981854028, -218.293045565144, -37.0584194209184, 0.95)
    pt3dadd(-92.2458569440775, -219.143568491655, -37.1541146130946, 0.95)
    pt3dadd(-92.7674960828589, -219.991112860855, -37.2501973352744, 0.95)
    pt3dadd(-93.3398373090519, -220.804950475383, -37.350665529145, 0.95)
    pt3dadd(-93.912178535245, -221.618788089911, -37.4511337230155, 0.95)
    pt3dadd(-94.4845197614381, -222.432625704439, -37.5516019168861, 0.95)
    pt3dadd(-95.0568609876311, -223.246463318966, -37.6520701107566, 0.95)
    pt3dadd(-95.6292022138241, -224.060300933494, -37.7525383046272, 0.95)
    pt3dadd(-96.2015434400172, -224.874138548022, -37.8530064984977, 0.95)
    pt3dadd(-96.7738846662102, -225.68797616255, -37.9534746923683, 0.95)
    pt3dadd(-97.3462258924033, -226.501813777078, -38.0539428862389, 0.95)
    pt3dadd(-97.9185671185963, -227.315651391605, -38.1544110801094, 0.95)
    pt3dadd(-98.4909083447893, -228.129489006133, -38.25487927398, 0.95)
    pt3dadd(-99.0627318204535, -228.932767263373, -38.3868902401581, 0.95)
    pt3dadd(-99.6297202805312, -229.637436916228, -38.8134635239961, 0.95)
    pt3dadd(-100.196708740609, -230.342106569083, -39.240036807834, 0.95)
    pt3dadd(-100.763697200686, -231.046776221937, -39.666610091672, 0.95)
    pt3dadd(-101.330685660764, -231.751445874792, -40.09318337551, 0.95)
    pt3dadd(-101.897674120842, -232.456115527647, -40.519756659348, 0.95)
    pt3dadd(-102.540013278199, -233.13747708032, -40.7962643474441, 0.95)
    pt3dadd(-103.304762548833, -233.780973725482, -40.8289846886842, 0.95)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-103.304762548833, -233.780973725482, -40.8289846886842, 0.95)
    pt3dadd(-104.069511819467, -234.424470370643, -40.8617050299243, 0.95)
    pt3dadd(-104.834261090101, -235.067967015804, -40.8944253711643, 0.95)
    pt3dadd(-105.599010360735, -235.711463660966, -40.9271457124044, 0.95)
    pt3dadd(-106.363759631369, -236.354960306127, -40.9598660536444, 0.95)
    pt3dadd(-107.149158530141, -236.967173431711, -41.0168264719827, 0.95)
    pt3dadd(-107.987399677497, -237.499332257673, -41.1358170717418, 0.95)
    pt3dadd(-108.825640824852, -238.031491083635, -41.2548076715009, 0.95)
    pt3dadd(-109.663881972207, -238.563649909597, -41.37379827126, 0.95)
    pt3dadd(-110.502123119563, -239.095808735559, -41.4927888710191, 0.95)
    pt3dadd(-111.245723535064, -239.634505675553, -41.2351255307476, 0.95)
    pt3dadd(-111.932569027201, -240.177123444915, -40.7515872940961, 0.95)
    pt3dadd(-112.619414519338, -240.719741214276, -40.2680490574447, 0.95)
    pt3dadd(-113.306260011475, -241.262358983637, -39.7845108207932, 0.95)
    pt3dadd(-113.993105503613, -241.804976752999, -39.3009725841417, 0.95)
    pt3dadd(-114.67995099575, -242.34759452236, -38.8174343474902, 0.95)
    pt3dadd(-115.267501754883, -242.986242665869, -38.3415878007508, 0.95)
    pt3dadd(-115.748794447028, -243.727655594782, -37.8739723462072, 0.95)
    pt3dadd(-116.230087139173, -244.469068523695, -37.4063568916636, 0.95)
    pt3dadd(-116.711379831318, -245.210481452609, -36.93874143712, 0.95)
    pt3dadd(-117.192672523463, -245.951894381522, -36.4711259825764, 0.95)
    pt3dadd(-117.673965215608, -246.693307310435, -36.0035105280328, 0.95)
    pt3dadd(-117.972635497329, -247.607003127177, -35.9437961239706, 0.95)
    pt3dadd(-118.213680779549, -248.57506139211, -36.0127915413149, 0.95)
    pt3dadd(-118.454726061769, -249.543119657043, -36.0817869586593, 0.95)
    pt3dadd(-118.695771343989, -250.511177921976, -36.1507823760036, 0.95)
    pt3dadd(-118.936816626208, -251.479236186909, -36.219777793348, 0.95)
    pt3dadd(-119.177861908428, -252.447294451842, -36.2887732106924, 0.95)
    pt3dadd(-119.360253280713, -253.42420029818, -36.2396511138176, 0.95)
    pt3dadd(-119.509153846443, -254.406158026611, -36.1230850763124, 0.95)
    pt3dadd(-119.658054412174, -255.388115755042, -36.0065190388073, 0.95)
    pt3dadd(-119.806954977904, -256.370073483473, -35.8899530013022, 0.95)
    pt3dadd(-119.955855543635, -257.352031211904, -35.7733869637971, 0.95)
    pt3dadd(-120.104756109365, -258.333988940335, -35.656820926292, 0.95)
    pt3dadd(-120.253656675096, -259.315946668766, -35.5402548887869, 0.95)
    pt3dadd(-120.402557240826, -260.297904397197, -35.4236888512818, 0.95)
    pt3dadd(-120.551457806556, -261.279862125628, -35.3071228137767, 0.95)
    pt3dadd(-120.700358372287, -262.261819854059, -35.1905567762716, 0.95)
    pt3dadd(-120.849258938017, -263.24377758249, -35.0739907387665, 0.95)
    pt3dadd(-120.998159503748, -264.225735310922, -34.9574247012614, 0.95)
    pt3dadd(-121.163774508803, -265.209364331013, -34.9961222186987, 0.95)
    pt3dadd(-121.331821144537, -266.19323649202, -35.0574076085866, 0.95)
    pt3dadd(-121.499867780272, -267.177108653027, -35.1186929984745, 0.95)
    pt3dadd(-121.667914416006, -268.160980814034, -35.1799783883624, 0.95)
    pt3dadd(-121.835961051741, -269.144852975041, -35.2412637782503, 0.95)
    pt3dadd(-122.004007687475, -270.128725136048, -35.3025491681382, 0.95)
    pt3dadd(-122.172054323209, -271.112597297055, -35.3638345580261, 0.95)
    pt3dadd(-122.340100958944, -272.096469458062, -35.4251199479141, 0.95)
    pt3dadd(-122.508147594678, -273.080341619069, -35.486405337802, 0.95)
    pt3dadd(-122.664634837812, -274.066141148424, -35.5464452271242, 0.95)
    pt3dadd(-122.812279571468, -275.053415043559, -35.6055323543993, 0.95)
    pt3dadd(-122.959924305125, -276.040688938693, -35.6646194816745, 0.95)
    pt3dadd(-123.107569038781, -277.027962833828, -35.7237066089497, 0.95)
    pt3dadd(-123.255213772437, -278.015236728962, -35.7827937362249, 0.95)
    pt3dadd(-123.402858506094, -279.002510624097, -35.8418808635001, 0.95)
    pt3dadd(-123.598261784239, -279.978191601151, -35.8771736662812, 0.95)
    pt3dadd(-123.931723045348, -280.920360357429, -35.843683040238, 0.95)
    pt3dadd(-124.265184306456, -281.862529113707, -35.8101924141947, 0.95)
    pt3dadd(-124.598645567565, -282.804697869985, -35.7767017881515, 0.95)
    pt3dadd(-124.932106828674, -283.746866626264, -35.7432111621082, 0.95)
    pt3dadd(-125.265568089783, -284.689035382542, -35.709720536065, 0.95)
    pt3dadd(-125.599029350891, -285.63120413882, -35.6762299100217, 0.95)
    pt3dadd(-125.905622990553, -286.580739705146, -35.6668943260883, 0.95)
    pt3dadd(-126.12733385067, -287.553549207888, -35.7338716795804, 0.95)
    pt3dadd(-126.349044710787, -288.526358710631, -35.8008490330725, 0.95)
    pt3dadd(-126.570755570905, -289.499168213373, -35.8678263865646, 0.95)
    pt3dadd(-126.792466431022, -290.471977716115, -35.9348037400567, 0.95)
    pt3dadd(-127.014177291139, -291.444787218857, -36.0017810935488, 0.95)
    pt3dadd(-127.257728052976, -292.409699870162, -36.0357022194754, 0.95)
    pt3dadd(-127.614702704254, -293.333600816568, -35.8979483100049, 0.95)
    pt3dadd(-127.971677355533, -294.257501762974, -35.7601944005345, 0.95)
    pt3dadd(-128.328652006811, -295.18140270938, -35.6224404910641, 0.95)
    pt3dadd(-128.685626658089, -296.105303655787, -35.4846865815936, 0.95)
    pt3dadd(-129.042601309367, -297.029204602193, -35.3469326721232, 0.95)
    pt3dadd(-129.399575960646, -297.953105548599, -35.2091787626528, 0.95)
    pt3dadd(-129.675060937173, -298.909799333033, -35.2457127325842, 0.95)
    pt3dadd(-129.934479321751, -299.872958588695, -35.3166094883348, 0.95)
    pt3dadd(-130.193897706329, -300.836117844357, -35.3875062440854, 0.95)
    pt3dadd(-130.453316090907, -301.799277100019, -35.4584029998359, 0.95)
    pt3dadd(-131.009793009309, -302.598386560882, -35.5564205061581, 1.03949046190957)
    pt3dadd(-131.674310851631, -303.337830705382, -35.6643018965824, 1.16152882628903)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-61.7789926684719, -170.640573109284, -32.184904939284, 1.09377050793954)
    pt3dadd(-61.4927344102685, -171.704491211669, -32.1051222772701, 1.09377050793954)
    pt3dadd(-61.3811376327083, -172.698232100203, -32.1101428043303, 1.02874919472698)
    pt3dadd(-61.269540855148, -173.691972988738, -32.1151633313905, 0.963727881514432)
    pt3dadd(-61.2648379283211, -174.689613817883, -32.152007296804, 0.95)
    pt3dadd(-61.2887434620496, -175.688298404889, -32.1973683057576, 0.95)
    pt3dadd(-61.3126489957781, -176.686982991895, -32.2427293147112, 0.95)
    pt3dadd(-61.3365545295067, -177.685667578902, -32.2880903236648, 0.95)
    pt3dadd(-61.3604600632352, -178.684352165908, -32.3334513326185, 0.95)
    pt3dadd(-61.3843655969637, -179.683036752914, -32.3788123415721, 0.95)
    pt3dadd(-61.4082711306922, -180.68172133992, -32.4241733505257, 0.95)
    pt3dadd(-61.4321766644208, -181.680405926927, -32.4695343594793, 0.95)
    pt3dadd(-61.4153678570972, -182.619775725313, -32.2303017355348, 0.95)
    pt3dadd(-61.3701766656222, -183.517796577039, -31.7926759752346, 0.95)
    pt3dadd(-61.3249854741472, -184.415817428765, -31.3550502149344, 0.95)
    pt3dadd(-61.2797942826722, -185.313838280491, -30.9174244546342, 0.95)
    pt3dadd(-61.2346030911972, -186.211859132217, -30.4797986943339, 0.95)
    pt3dadd(-61.1894118997222, -187.109879983943, -30.0421729340337, 0.95)
    pt3dadd(-61.1442207082472, -188.007900835669, -29.6045471737335, 0.95)
    pt3dadd(-61.1169122415371, -188.93092200499, -29.2870574611355, 0.95)
    pt3dadd(-61.1436636425212, -189.929519680648, -29.3327416456647, 0.95)
    pt3dadd(-61.1704150435053, -190.928117356306, -29.3784258301939, 0.95)
    pt3dadd(-61.1971664444894, -191.926715031964, -29.4241100147231, 0.95)
    pt3dadd(-61.2239178454736, -192.925312707622, -29.4697941992523, 0.95)
    pt3dadd(-61.2506692464577, -193.923910383279, -29.5154783837815, 0.95)
    pt3dadd(-61.2774206474418, -194.922508058937, -29.5611625683108, 0.95)
    pt3dadd(-61.3523228518522, -195.886584423642, -29.3109183206386, 0.95)
    pt3dadd(-61.4284537480682, -196.849779888156, -29.0531226965861, 0.95)
    pt3dadd(-61.5045846442842, -197.81297535267, -28.7953270725337, 0.95)
    pt3dadd(-61.5807155405002, -198.776170817184, -28.5375314484812, 0.95)
  }
}
proc shape3d_8() {
  adendMML[8] {
    pt3dadd(-61.6568464367162, -199.739366281698, -28.2797358244287, 0.95)
    pt3dadd(-61.7329773329322, -200.702561746213, -28.0219402003763, 0.95)
    pt3dadd(-61.8091082291482, -201.665757210727, -27.7641445763238, 0.95)
    pt3dadd(-61.8852391253641, -202.628952675241, -27.5063489522713, 0.95)
    pt3dadd(-61.944548122893, -203.615796709584, -27.4598221418024, 0.95)
    pt3dadd(-61.9962902191645, -204.613278448749, -27.5083292083595, 0.95)
    pt3dadd(-62.0480323154359, -205.610760187914, -27.5568362749167, 0.95)
    pt3dadd(-62.0997744117073, -206.608241927079, -27.6053433414738, 0.95)
    pt3dadd(-62.1515165079787, -207.605723666244, -27.653850408031, 0.95)
    pt3dadd(-62.2032586042501, -208.603205405409, -27.7023574745881, 0.95)
    pt3dadd(-62.2550007005215, -209.600687144574, -27.7508645411453, 0.95)
    pt3dadd(-62.2986280988838, -210.598177710225, -27.7984399076651, 0.95)
    pt3dadd(-62.2393804337616, -211.595780174729, -27.8342035343566, 0.95)
    pt3dadd(-62.1801327686395, -212.593382639232, -27.869967161048, 0.95)
    pt3dadd(-62.1208851035174, -213.590985103736, -27.9057307877395, 0.95)
    pt3dadd(-62.0616374383953, -214.588587568239, -27.941494414431, 0.95)
    pt3dadd(-62.0023897732731, -215.586190032743, -27.9772580411225, 0.95)
    pt3dadd(-61.943142108151, -216.583792497246, -28.0130216678139, 0.95)
    pt3dadd(-61.8838944430289, -217.58139496175, -28.0487852945054, 0.95)
    pt3dadd(-61.8246467779067, -218.578997426253, -28.0845489211969, 0.95)
    pt3dadd(-61.7678955048624, -219.576705729265, -28.1206038066609, 0.95)
    pt3dadd(-61.7338201668507, -220.575375414572, -28.1593043362385, 0.95)
    pt3dadd(-61.6997448288391, -221.574045099878, -28.198004865816, 0.95)
    pt3dadd(-61.6656694908275, -222.572714785184, -28.2367053953936, 0.95)
    pt3dadd(-61.6315941528159, -223.57138447049, -28.2754059249711, 0.95)
    pt3dadd(-61.5975188148043, -224.570054155797, -28.3141064545486, 0.95)
    pt3dadd(-61.5634434767926, -225.568723841103, -28.3528069841262, 0.95)
    pt3dadd(-61.529368138781, -226.567393526409, -28.3915075137037, 0.95)
    pt3dadd(-61.5524446263798, -227.542632882515, -28.3047848874551, 0.95)
    pt3dadd(-61.6949775987381, -228.468899091512, -27.9559077430892, 0.95)
    pt3dadd(-61.8375105710963, -229.395165300509, -27.6070305987233, 0.95)
    pt3dadd(-61.9800435434545, -230.321431509506, -27.2581534543574, 0.95)
    pt3dadd(-62.1225765158128, -231.247697718503, -26.9092763099915, 0.95)
    pt3dadd(-62.265109488171, -232.1739639275, -26.5603991656256, 0.95)
    pt3dadd(-62.4076424605293, -233.100230136497, -26.2115220212597, 0.95)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(-62.4076424605293, -233.100230136497, -26.2115220212597, 0.95)
    pt3dadd(-62.5515792647834, -234.031254819884, -25.8956496477007, 0.95)
    pt3dadd(-62.7115211282635, -235.016530774133, -25.9560640026613, 0.95)
    pt3dadd(-62.8714629917436, -236.001806728382, -26.016478357622, 0.95)
    pt3dadd(-63.0314048552238, -236.987082682631, -26.0768927125827, 0.95)
    pt3dadd(-63.1913467187039, -237.97235863688, -26.1373070675434, 0.95)
    pt3dadd(-63.351288582184, -238.957634591128, -26.1977214225041, 0.95)
    pt3dadd(-63.5112304456641, -239.942910545377, -26.2581357774648, 0.95)
    pt3dadd(-63.6677271409851, -240.926646551025, -26.3351364281546, 0.95)
    pt3dadd(-63.8022778484908, -241.900572964894, -26.5177930663509, 0.95)
    pt3dadd(-63.9368285559965, -242.874499378764, -26.7004497045471, 0.95)
    pt3dadd(-64.0713792635021, -243.848425792633, -26.8831063427434, 0.95)
    pt3dadd(-64.2059299710078, -244.822352206503, -27.0657629809396, 0.95)
    pt3dadd(-64.3404806785135, -245.796278620372, -27.2484196191358, 0.95)
    pt3dadd(-64.4750313860191, -246.770205034241, -27.4310762573321, 0.95)
    pt3dadd(-64.6095820935248, -247.744131448111, -27.6137328955283, 0.95)
    pt3dadd(-64.7441328010305, -248.71805786198, -27.7963895337246, 0.95)
    pt3dadd(-64.8786835085361, -249.69198427585, -27.9790461719208, 0.95)
    pt3dadd(-65.0132342160418, -250.665910689719, -28.1617028101171, 0.95)
    pt3dadd(-65.1517906702436, -251.647684894712, -28.2759053279378, 0.95)
    pt3dadd(-65.29360926004, -252.635850057672, -28.3343612797362, 0.95)
    pt3dadd(-65.4354278498363, -253.624015220632, -28.3928172315346, 0.95)
    pt3dadd(-65.5772464396326, -254.612180383592, -28.4512731833331, 0.95)
    pt3dadd(-65.719065029429, -255.600345546552, -28.5097291351315, 0.95)
    pt3dadd(-66.0004343066506, -256.549313150997, -28.5825416552299, 0.95)
    pt3dadd(-66.3803986074788, -257.470586988551, -28.6654973442122, 0.95)
    pt3dadd(-66.7603629083071, -258.391860826105, -28.7484530331946, 0.95)
    pt3dadd(-67.1403272091353, -259.313134663659, -28.831408722177, 0.95)
    pt3dadd(-67.5202915099636, -260.234408501213, -28.9143644111594, 0.95)
    pt3dadd(-67.9002558107918, -261.155682338767, -28.9973201001418, 0.95)
    pt3dadd(-68.2981971221189, -262.068707205076, -29.0819886841453, 0.95)
    pt3dadd(-68.7353413058215, -262.963743353685, -29.1703926169661, 0.95)
    pt3dadd(-69.1724854895241, -263.858779502294, -29.258796549787, 0.95)
    pt3dadd(-69.6096296732267, -264.753815650903, -29.3472004826079, 0.95)
    pt3dadd(-70.0467738569292, -265.648851799512, -29.4356044154287, 0.95)
    pt3dadd(-70.4839180406319, -266.543887948121, -29.5240083482496, 0.95)
    pt3dadd(-70.926080094702, -267.436385815563, -29.6128803358422, 0.95)
    pt3dadd(-71.3748679900439, -268.3255320125, -29.7023703658307, 0.95)
    pt3dadd(-71.8236558853858, -269.214678209437, -29.7918603958191, 0.95)
    pt3dadd(-72.2724437807278, -270.103824406374, -29.8813504258076, 0.95)
    pt3dadd(-72.7212316760697, -270.992970603311, -29.970840455796, 0.95)
    pt3dadd(-73.1700195714116, -271.882116800248, -30.0603304857844, 0.95)
    pt3dadd(-73.6188074667536, -272.771262997184, -30.1498205157729, 0.95)
    pt3dadd(-74.2955055857183, -273.407052810756, -29.7813718153424, 0.95)
    pt3dadd(-74.973670125726, -274.041212477483, -29.4099766433584, 0.95)
    pt3dadd(-75.6518346657337, -274.67537214421, -29.0385814713744, 0.95)
    pt3dadd(-76.3299992057414, -275.309531810937, -28.6671862993904, 0.95)
    pt3dadd(-76.9365301875894, -275.981186340313, -28.5673745417108, 0.95)
    pt3dadd(-77.3904726907768, -276.732709637853, -29.0460695772551, 0.95)
    pt3dadd(-77.8444151939641, -277.484232935393, -29.5247646127994, 0.95)
    pt3dadd(-78.2983576971514, -278.235756232933, -30.0034596483437, 0.95)
    pt3dadd(-78.7523002003388, -278.987279530473, -30.4821546838879, 0.95)
    pt3dadd(-79.0976196849719, -279.80901283672, -30.2514031409327, 0.95)
    pt3dadd(-79.4111356019806, -280.651302824134, -29.8129338183063, 0.95)
    pt3dadd(-79.7246515189893, -281.493592811548, -29.3744644956799, 0.95)
    pt3dadd(-80.1133454979722, -282.317311549259, -29.6913505439823, 0.95)
    pt3dadd(-80.5111652433042, -283.138775947324, -30.0999281901342, 0.95)
    pt3dadd(-80.9089849886361, -283.96024034539, -30.5085058362861, 0.95)
    pt3dadd(-81.565971113281, -284.589595440823, -30.7609738130576, 0.967236270001812)
    pt3dadd(-82.4419661905504, -285.056608270758, -30.8815210704973, 0.999038076823103)
    pt3dadd(-83.3179612678199, -285.523621100692, -31.0020683279371, 1.03083988364439)
    pt3dadd(-84.1939563450894, -285.990633930627, -31.1226155853768, 1.06264169046568)
    pt3dadd(-85.0699514223589, -286.457646760561, -31.2431628428166, 1.09444349728697)
    pt3dadd(-85.9459464996283, -286.924659590496, -31.3637101002563, 1.12624530410826)
    pt3dadd(-86.8219415768978, -287.39167242043, -31.484257357696, 1.15804711092956)
    pt3dadd(-87.6979366541673, -287.858685250365, -31.6048046151358, 1.18984891775085)
    pt3dadd(-88.1389552509229, -288.53474592994, -32.1932667506542, 1.19)
    pt3dadd(-88.5778975215945, -289.211804483015, -32.7839624411118, 1.19)
    pt3dadd(-89.0168397922662, -289.888863036091, -33.3746581315693, 1.19)
    pt3dadd(-89.4557820629378, -290.565921589166, -33.9653538220268, 1.19)
    pt3dadd(-89.8947243336095, -291.242980142242, -34.5560495124844, 1.19)
    pt3dadd(-90.3336666042811, -291.920038695317, -35.1467452029419, 1.19)
    pt3dadd(-91.1464650027539, -292.413172555463, -35.3385929862577, 1.19)
    pt3dadd(-92.0259848742167, -292.87348168567, -35.4592590558485, 1.19)
    pt3dadd(-92.9055047456795, -293.333790815877, -35.5799251254393, 1.19)
    pt3dadd(-93.7850246171423, -293.794099946083, -35.7005911950301, 1.19)
    pt3dadd(-94.6645444886051, -294.25440907629, -35.8212572646209, 1.19)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-46.6328370155283, -25.1679528634648, -18.9894187410874, 1.62276659531402)
    pt3dadd(-46.4641848919021, -26.0284517010252, -19.3969849138397, 1.62276659531402)
    pt3dadd(-46.2637873787537, -26.9493461845457, -19.7313412909964, 1.5682542154694)
    pt3dadd(-46.0633898656052, -27.8702406680663, -20.0656976681531, 1.51374183562478)
    pt3dadd(-45.8629923524568, -28.7911351515868, -20.4000540453098, 1.45922945578016)
    pt3dadd(-45.6938879015067, -29.7444323489341, -20.5918620490498, 1.43)
    pt3dadd(-45.5609611954813, -30.735190153628, -20.6188706266357, 1.43)
    pt3dadd(-45.4280344894558, -31.725947958322, -20.6458792042217, 1.43)
    pt3dadd(-45.2951077834304, -32.716705763016, -20.6728877818076, 1.43)
    pt3dadd(-45.162181077405, -33.7074635677099, -20.6998963593935, 1.43)
    pt3dadd(-45.0292543713795, -34.6982213724039, -20.7269049369795, 1.43)
    pt3dadd(-44.8963276653541, -35.6889791770978, -20.7539135145654, 1.43)
    pt3dadd(-44.7861197288183, -36.6822184010839, -20.7836375182788, 1.43)
    pt3dadd(-44.6950647242111, -37.6775495717666, -20.8156507468466, 1.43)
    pt3dadd(-44.604009719604, -38.6728807424494, -20.8476639754144, 1.43)
    pt3dadd(-44.5129547149969, -39.6682119131321, -20.8796772039822, 1.43)
    pt3dadd(-44.4218997103897, -40.6635430838148, -20.9116904325501, 1.43)
    pt3dadd(-44.3308447057826, -41.6588742544975, -20.9437036611179, 1.43)
    pt3dadd(-44.2397897011754, -42.6542054251803, -20.9757168896857, 1.43)
    pt3dadd(-44.1487346965683, -43.649536595863, -21.0077301182535, 1.43)
    pt3dadd(-44.0561537388107, -44.6432739279722, -21.0218800691689, 1.42650216268613)
    pt3dadd(-43.9460758677688, -45.618735957657, -20.8312057632171, 1.38289735606929)
    pt3dadd(-43.835997996727, -46.5941979873417, -20.6405314572653, 1.33929254945245)
    pt3dadd(-43.7259201256851, -47.5696600170265, -20.4498571513134, 1.29568774283561)
    pt3dadd(-43.6158422546433, -48.5451220467112, -20.2591828453616, 1.25208293621876)
    pt3dadd(-43.5057643836014, -49.5205840763959, -20.0685085394098, 1.20847812960192)
    pt3dadd(-43.4168829912577, -50.5082996565466, -20.0073648139616, 1.19)
    pt3dadd(-43.3435894651589, -51.5050264837259, -20.0414777295939, 1.19)
    pt3dadd(-43.2702959390601, -52.5017533109053, -20.0755906452262, 1.19)
    pt3dadd(-43.1970024129613, -53.4984801380847, -20.1097035608585, 1.19)
    pt3dadd(-43.1237088868625, -54.4952069652641, -20.1438164764908, 1.19)
    pt3dadd(-43.0504153607637, -55.4919337924434, -20.1779293921231, 1.19)
    pt3dadd(-42.9570344516941, -56.4866190711135, -20.2096478998217, 1.19)
    pt3dadd(-42.8211303952306, -57.4769825788339, -20.2362976655329, 1.19)
    pt3dadd(-42.685226338767, -58.4673460865543, -20.262947431244, 1.19)
    pt3dadd(-42.5493222823035, -59.4577095942747, -20.2895971969552, 1.19)
    pt3dadd(-42.41341822584, -60.4480731019952, -20.3162469626663, 1.19)
    pt3dadd(-42.2775141693765, -61.4384366097156, -20.3428967283774, 1.19)
    pt3dadd(-42.0987682403693, -62.4203453989417, -20.3642647842713, 1.19)
    pt3dadd(-41.8436646627627, -63.3871852290988, -20.3762191773561, 1.19)
    pt3dadd(-41.588561085156, -64.3540250592559, -20.3881735704409, 1.19)
    pt3dadd(-41.3334575075494, -65.3208648894131, -20.4001279635257, 1.19)
    pt3dadd(-41.0783539299427, -66.2877047195702, -20.4120823566105, 1.19)
    pt3dadd(-40.823250352336, -67.2545445497273, -20.4240367496953, 1.19)
    pt3dadd(-40.5681467747294, -68.2213843798844, -20.4359911427801, 1.19)
    pt3dadd(-40.3130431971227, -69.1882242100415, -20.4479455358649, 1.19)
    pt3dadd(-40.0600173589145, -70.1554253980156, -20.4601540034529, 1.19)
    pt3dadd(-39.9684998671538, -71.150715914001, -20.4921123746774, 1.19)
    pt3dadd(-39.8769823753932, -72.1460064299864, -20.5240707459018, 1.19)
    pt3dadd(-39.7854648836326, -73.1412969459718, -20.5560291171262, 1.19)
    pt3dadd(-39.693947391872, -74.1365874619572, -20.5879874883506, 1.19)
    pt3dadd(-39.6024299001113, -75.1318779779427, -20.6199458595751, 1.19)
    pt3dadd(-39.4510057852509, -76.0978283525197, -20.7605199557704, 1.19)
    pt3dadd(-39.2101678909555, -77.0199870260001, -21.0632087226515, 1.19)
    pt3dadd(-38.96932999666, -77.9421456994806, -21.3658974895327, 1.19)
    pt3dadd(-38.7284921023646, -78.8643043729611, -21.6685862564139, 1.19)
    pt3dadd(-38.4876542080691, -79.7864630464416, -21.9712750232951, 1.19)
    pt3dadd(-38.2468163137737, -80.7086217199221, -22.2739637901763, 1.19)
    pt3dadd(-38.0059784194783, -81.6307803934025, -22.5766525570575, 1.19)
    pt3dadd(-37.7651405251828, -82.552939066883, -22.8793413239387, 1.19)
    pt3dadd(-37.7155854899438, -83.5457346157548, -22.9384027717508, 1.19)
    pt3dadd(-37.6819744095224, -84.5444179433603, -22.9771572093753, 1.19)
    pt3dadd(-37.648363329101, -85.5431012709659, -23.0159116469998, 1.19)
    pt3dadd(-37.6147522486796, -86.5417845985715, -23.0546660846243, 1.19)
    pt3dadd(-37.5702272398103, -87.5384369022628, -23.107098841069, 1.19)
    pt3dadd(-37.4570358203173, -88.5223107529207, -23.2455905323168, 1.19)
    pt3dadd(-37.3438444008244, -89.5061846035786, -23.3840822235646, 1.19)
    pt3dadd(-37.2306529813314, -90.4900584542366, -23.5225739148125, 1.19)
    pt3dadd(-37.1174615618384, -91.4739323048945, -23.6610656060603, 1.19)
    pt3dadd(-37.0042701423455, -92.4578061555525, -23.7995572973081, 1.19)
    pt3dadd(-36.8910787228525, -93.4416800062104, -23.938048988556, 1.19)
    pt3dadd(-36.7778873033596, -94.4255538568684, -24.0765406798038, 1.19)
    pt3dadd(-36.654704477753, -95.4128652289492, -24.1591404532576, 1.19)
    pt3dadd(-36.5215797398853, -96.4035970942013, -24.1861251774884, 1.19)
    pt3dadd(-36.3884550020176, -97.3943289594534, -24.2131099017192, 1.19)
    pt3dadd(-36.2553302641498, -98.3850608247054, -24.24009462595, 1.19)
    pt3dadd(-36.1222055262821, -99.3757926899575, -24.2670793501808, 1.19)
    pt3dadd(-35.9890807884144, -100.36652455521, -24.2940640744116, 1.19)
    pt3dadd(-35.8707387949747, -101.35856919805, -24.3228028035117, 1.19)
    pt3dadd(-35.819693744676, -102.356590127574, -24.3595264616978, 1.19)
    pt3dadd(-35.7686486943773, -103.354611057099, -24.396250119884, 1.19)
    pt3dadd(-35.7176036440785, -104.352631986624, -24.4329737780701, 1.19)
    pt3dadd(-35.6665585937798, -105.350652916148, -24.4696974362562, 1.19)
    pt3dadd(-35.6155135434811, -106.348673845673, -24.5064210944423, 1.19)
    pt3dadd(-35.5644684931823, -107.346694775198, -24.5431447526285, 1.19)
    pt3dadd(-35.5134234428836, -108.344715704723, -24.5798684108146, 1.19)
    pt3dadd(-35.467283031646, -109.342932847424, -24.6171638020943, 1.19)
    pt3dadd(-35.4297088177313, -110.341492686247, -24.6554577538054, 1.19)
    pt3dadd(-35.3921346038166, -111.340052525071, -24.6937517055164, 1.19)
    pt3dadd(-35.3545603899019, -112.338612363894, -24.7320456572275, 1.19)
    pt3dadd(-35.3169861759872, -113.337172202718, -24.7703396089385, 1.19)
    pt3dadd(-35.2794119620726, -114.335732041541, -24.8086335606496, 1.19)
    pt3dadd(-35.2418377481579, -115.334291880364, -24.8469275123606, 1.19)
    pt3dadd(-35.1020367961414, -116.322639023408, -24.8730436289876, 1.19)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(-35.1020367961414, -116.322639023408, -24.8730436289876, 1.19)
    pt3dadd(-34.9341209286802, -117.308177419115, -24.8958105357108, 1.19)
    pt3dadd(-34.766205061219, -118.293715814822, -24.9185774424339, 1.19)
    pt3dadd(-34.5982891937578, -119.279254210529, -24.9413443491571, 1.19)
    pt3dadd(-34.4303733262967, -120.264792606236, -24.9641112558803, 1.19)
    pt3dadd(-34.2624574588355, -121.250331001943, -24.9868781626034, 1.19)
    pt3dadd(-34.0945415913743, -122.235869397651, -25.0096450693266, 1.19)
    pt3dadd(-33.9478978073905, -123.224584624107, -25.0349909059148, 1.19)
    pt3dadd(-33.8146448290513, -124.215299669864, -25.0619601823805, 1.19)
    pt3dadd(-33.6813918507121, -125.206014715622, -25.0889294588462, 1.19)
    pt3dadd(-33.548138872373, -126.19672976138, -25.1158987353119, 1.19)
    pt3dadd(-33.4148858940338, -127.187444807137, -25.1428680117776, 1.19)
    pt3dadd(-33.2816329156946, -128.178159852895, -25.1698372882433, 1.19)
    pt3dadd(-33.1483799373554, -129.168874898653, -25.196806564709, 1.19)
    pt3dadd(-33.0813960856831, -130.165501020318, -25.2316399297865, 1.19)
    pt3dadd(-33.0297109189467, -131.163491754624, -25.2682887739571, 1.19)
    pt3dadd(-32.9780257522104, -132.16148248893, -25.3049376181277, 1.19)
    pt3dadd(-32.926340585474, -133.159473223236, -25.3415864622983, 1.19)
    pt3dadd(-32.8746554187375, -134.157463957541, -25.3782353064689, 1.19)
    pt3dadd(-32.8229702520011, -135.155454691847, -25.4148841506395, 1.19)
    pt3dadd(-32.7712850852648, -136.153445426153, -25.4515329948101, 1.19)
    pt3dadd(-32.7195999185284, -137.151436160459, -25.4881818389807, 1.19)
    pt3dadd(-32.650017491441, -138.148003872446, -25.5227142320735, 1.19)
    pt3dadd(-32.5356067918858, -139.141007260565, -25.5519454313682, 1.19)
    pt3dadd(-32.4211960923306, -140.134010648683, -25.5811766306628, 1.19)
    pt3dadd(-32.3067853927754, -141.127014036802, -25.6104078299575, 1.19)
    pt3dadd(-32.1923746932202, -142.12001742492, -25.6396390292521, 1.19)
    pt3dadd(-32.1147202887559, -143.110387386679, -25.7218750363779, 1.19)
    pt3dadd(-32.0932866340946, -144.096729379783, -25.8851847761, 1.19)
    pt3dadd(-32.0718529794333, -145.083071372887, -26.0484945158222, 1.19)
    pt3dadd(-32.050419324772, -146.06941336599, -26.2118042555444, 1.19)
    pt3dadd(-32.0289856701107, -147.055755359094, -26.3751139952665, 1.19)
    pt3dadd(-31.8222582857461, -148.033886488315, -26.3935175732582, 1.19)
    pt3dadd(-31.6149134976017, -149.011990258714, -26.4114383199521, 1.19)
    pt3dadd(-31.4075687094573, -149.990094029112, -26.4293590666461, 1.19)
    pt3dadd(-31.2002239213129, -150.96819779951, -26.4472798133401, 1.19)
    pt3dadd(-30.9928791331685, -151.946301569908, -26.465200560034, 1.19)
    pt3dadd(-30.7855343450241, -152.924405340307, -26.483121306728, 1.19)
    pt3dadd(-30.5781895568797, -153.902509110705, -26.5010420534219, 1.19)
    pt3dadd(-30.3708447687353, -154.880612881103, -26.5189628001159, 1.19)
    pt3dadd(-30.3081174283983, -155.797213951688, -26.1314280895086, 1.19)
    pt3dadd(-30.2497682885729, -156.711953067468, -25.7316184748872, 1.19)
    pt3dadd(-30.1914191487475, -157.626692183248, -25.3318088602659, 1.19)
  }
}
proc shape3d_9() {
  adendMML[9] {
    pt3dadd(-30.1330700089222, -158.541431299028, -24.9319992456445, 1.19)
    pt3dadd(-30.0747208690968, -159.456170414808, -24.5321896310231, 1.19)
    pt3dadd(-29.7926646434729, -160.229797305123, -25.0206474517081, 1.19)
    pt3dadd(-29.4888999883742, -160.989730732026, -25.5953023229038, 1.19)
    pt3dadd(-29.1851353332754, -161.749664158928, -26.1699571940995, 1.19)
    pt3dadd(-28.8813706781767, -162.509597585831, -26.7446120652951, 1.19)
    pt3dadd(-28.5776060230779, -163.269531012733, -27.3192669364908, 1.19)
    pt3dadd(-28.2738413679792, -164.029464439636, -27.8939218076865, 1.19)
    pt3dadd(-27.9700767128804, -164.789397866538, -28.4685766788822, 1.19)
    pt3dadd(-27.6663120577817, -165.549331293441, -29.0432315500779, 1.19)
    pt3dadd(-27.2832000034899, -166.331595691732, -29.3635300599035, 1.19)
    pt3dadd(-26.746151487722, -167.157182880083, -29.1903691920876, 1.19)
    pt3dadd(-26.2091029719541, -167.982770068434, -29.0172083242717, 1.19)
    pt3dadd(-25.6720544561861, -168.808357256784, -28.8440474564558, 1.19)
    pt3dadd(-25.2857182346903, -169.67577402527, -28.8444650473569, 1.19)
    pt3dadd(-25.1708413643946, -170.618533225104, -29.1575279736186, 1.19)
    pt3dadd(-25.0559644940989, -171.561292424938, -29.4705908998802, 1.19)
    pt3dadd(-24.9410876238032, -172.504051624772, -29.7836538261418, 1.19)
    pt3dadd(-24.8262107535075, -173.446810824606, -30.0967167524035, 1.19)
    pt3dadd(-24.7113338832118, -174.38957002444, -30.4097796786651, 1.19)
    pt3dadd(-24.5964570129161, -175.332329224274, -30.7228426049267, 1.19)
    pt3dadd(-24.4815801426204, -176.275088424108, -31.0359055311884, 1.19)
    pt3dadd(-24.3667032723247, -177.217847623942, -31.34896845745, 1.19)
    pt3dadd(-24.2813132146281, -178.172550412616, -31.6208196245385, 1.19)
    pt3dadd(-24.2758599264279, -179.15963146886, -31.7809484790678, 1.19)
    pt3dadd(-24.2704066382278, -180.146712525103, -31.9410773335971, 1.19)
    pt3dadd(-24.2649533500277, -181.133793581347, -32.1012061881264, 1.19)
    pt3dadd(-24.2595000618276, -182.120874637591, -32.2613350426557, 1.19)
    pt3dadd(-24.2540467736274, -183.107955693834, -32.421463897185, 1.19)
    pt3dadd(-24.2485934854273, -184.095036750078, -32.5815927517143, 1.19)
    pt3dadd(-24.2431401972272, -185.082117806321, -32.7417216062436, 1.19)
    pt3dadd(-24.2376869090271, -186.069198862565, -32.9018504607729, 1.19)
    pt3dadd(-24.281622738095, -187.056178847405, -32.9079928040225, 1.19)
    pt3dadd(-24.370700751797, -188.043066451895, -32.7733898189926, 1.19)
    pt3dadd(-24.4597787654989, -189.029954056385, -32.6387868339627, 1.19)
    pt3dadd(-24.5488567792009, -190.016841660875, -32.5041838489328, 1.19)
    pt3dadd(-24.6073645044522, -190.999256843492, -32.4862742480554, 1.19)
    pt3dadd(-24.600593096145, -191.972121713056, -32.7175491788132, 1.19)
    pt3dadd(-24.5938216878378, -192.94498658262, -32.9488241095709, 1.19)
    pt3dadd(-24.5870502795306, -193.917851452185, -33.1800990403287, 1.19)
    pt3dadd(-24.5802788712233, -194.890716321749, -33.4113739710864, 1.19)
    pt3dadd(-24.5735074629161, -195.863581191314, -33.6426489018442, 1.19)
    pt3dadd(-24.5667360546089, -196.836446060878, -33.8739238326019, 1.19)
    pt3dadd(-24.5599646463017, -197.809310930442, -34.1051987633597, 1.19)
    pt3dadd(-24.5791722292055, -198.803074051759, -34.1858845769438, 1.19)
    pt3dadd(-24.6044470632496, -199.801717845337, -34.2314011268159, 1.19)
    pt3dadd(-24.6297218972937, -200.800361638915, -34.2769176766879, 1.19)
    pt3dadd(-24.6549967313377, -201.799005432493, -34.32243422656, 1.19)
    pt3dadd(-24.6802715653818, -202.797649226071, -34.3679507764321, 1.19)
    pt3dadd(-24.7055463994259, -203.796293019649, -34.4134673263042, 1.19)
    pt3dadd(-24.73082123347, -204.794936813227, -34.4589838761763, 1.19)
    pt3dadd(-24.756096067514, -205.793580606805, -34.5045004260484, 1.19)
    pt3dadd(-24.8390896358263, -206.787728037747, -34.5564548440211, 1.19)
    pt3dadd(-24.9575279261649, -207.77911427987, -34.6123627174561, 1.19)
    pt3dadd(-25.0759662165035, -208.770500521992, -34.6682705908911, 1.19)
    pt3dadd(-25.1944045068421, -209.761886764114, -34.7241784643261, 1.19)
    pt3dadd(-25.3128427971807, -210.753273006237, -34.7800863377611, 1.19)
    pt3dadd(-25.4312810875192, -211.744659248359, -34.8359942111961, 1.19)
    pt3dadd(-25.5497193778578, -212.736045490482, -34.8919020846311, 1.19)
    pt3dadd(-25.6681576681964, -213.727431732604, -34.9478099580662, 1.19)
    pt3dadd(-25.786595958535, -214.718817974727, -35.0037178315012, 1.19)
    pt3dadd(-25.9050342488736, -215.710204216849, -35.0596257049362, 1.19)
    pt3dadd(-26.0234725392122, -216.701590458972, -35.1155335783712, 1.19)
    pt3dadd(-26.1419108295508, -217.692976701094, -35.1714414518062, 1.19)
    pt3dadd(-26.2603491198893, -218.684362943216, -35.2273493252412, 1.19)
    pt3dadd(-26.3103936006952, -219.680366003771, -35.2755983018704, 1.19)
    pt3dadd(-26.3152203068517, -220.679421420335, -35.318783687625, 1.19)
    pt3dadd(-26.3200470130081, -221.678476836898, -35.3619690733796, 1.19)
    pt3dadd(-26.3248737191646, -222.677532253462, -35.4051544591342, 1.19)
    pt3dadd(-26.329700425321, -223.676587670025, -35.4483398448888, 1.19)
    pt3dadd(-26.3345271314775, -224.675643086589, -35.4915252306434, 1.19)
    pt3dadd(-26.3393538376339, -225.674698503152, -35.5347106163979, 1.19)
    pt3dadd(-26.3441805437904, -226.673753919716, -35.5778960021525, 1.19)
    pt3dadd(-26.3490072499469, -227.67280933628, -35.6210813879071, 1.19)
    pt3dadd(-26.3538339561033, -228.671864752843, -35.6642667736617, 1.19)
    pt3dadd(-26.3586606622598, -229.670920169406, -35.7074521594163, 1.19)
    pt3dadd(-26.3757597216346, -230.66963811964, -35.7520327815274, 1.19)
    pt3dadd(-26.4155790667429, -231.667731305307, -35.7991964590739, 1.19)
    pt3dadd(-26.4553984118512, -232.665824490975, -35.8463601366204, 1.19)
    pt3dadd(-26.4952177569596, -233.663917676642, -35.8935238141669, 1.19)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(-26.4952177569596, -233.663917676642, -35.8935238141669, 1.19)
    pt3dadd(-26.5350371020679, -234.662010862309, -35.9406874917135, 1.19)
    pt3dadd(-26.5748564471762, -235.660104047977, -35.98785116926, 1.19)
    pt3dadd(-26.6146757922845, -236.658197233644, -36.0350148468065, 1.19)
    pt3dadd(-26.6544951373929, -237.656290419311, -36.082178524353, 1.19)
    pt3dadd(-26.6943144825012, -238.654383604978, -36.1293422018995, 1.19)
    pt3dadd(-26.7552956604981, -239.646070160078, -36.2182652222432, 1.19)
    pt3dadd(-26.863020585023, -240.623605298476, -36.3994292193093, 1.19)
    pt3dadd(-26.9707455095479, -241.601140436874, -36.5805932163754, 1.19)
    pt3dadd(-27.0784704340728, -242.578675575272, -36.7617572134415, 1.19)
    pt3dadd(-27.1861953585976, -243.55621071367, -36.9429212105076, 1.19)
    pt3dadd(-27.2939202831225, -244.533745852069, -37.1240852075737, 1.19)
    pt3dadd(-27.3088301133753, -245.488634854559, -37.3759717845585, 1.19)
    pt3dadd(-27.1626812662112, -246.404226836167, -37.7505806975444, 1.19)
    pt3dadd(-27.0165324190471, -247.319818817774, -38.1251896105302, 1.19)
    pt3dadd(-26.870383571883, -248.235410799382, -38.4997985235161, 1.19)
    pt3dadd(-26.7242347247189, -249.15100278099, -38.8744074365019, 1.19)
    pt3dadd(-26.5780858775548, -250.066594762597, -39.2490163494878, 1.19)
    pt3dadd(-26.4319370303907, -250.982186744205, -39.6236252624736, 1.19)
    pt3dadd(-26.2857881832266, -251.897778725813, -39.9982341754595, 1.19)
    pt3dadd(-26.1396393360625, -252.81337070742, -40.3728430884454, 1.19)
    pt3dadd(-25.9934904888984, -253.728962689028, -40.7474520014312, 1.19)
    pt3dadd(-25.8473416417343, -254.644554670635, -41.122060914417, 1.19)
    pt3dadd(-25.8164397122765, -255.586351156066, -41.1916654849723, 1.20399831761427)
    pt3dadd(-25.901025411017, -256.554406877361, -40.9556286657313, 1.23202419043099)
    pt3dadd(-25.9856111097574, -257.522462598655, -40.7195918464902, 1.26005006324772)
    pt3dadd(-26.0701968084979, -258.49051831995, -40.4835550272492, 1.28807593606444)
    pt3dadd(-26.1547825072383, -259.458574041244, -40.2475182080082, 1.31610180888117)
    pt3dadd(-26.2393682059788, -260.426629762539, -40.0114813887671, 1.34412768169789)
    pt3dadd(-26.3239539047192, -261.394685483834, -39.7754445695261, 1.37215355451462)
    pt3dadd(-26.4085396034597, -262.362741205128, -39.539407750285, 1.40017942733134)
    pt3dadd(-26.4931253022001, -263.330796926423, -39.303370931044, 1.42820530014807)
    pt3dadd(-26.3167402371016, -264.310742777321, -39.3065438201011, 1.38195538393231)
    pt3dadd(-26.1224999204727, -265.291502134115, -39.3260830999651, 1.33062362300615)
    pt3dadd(-25.9282596038438, -266.272261490909, -39.345622379829, 1.27929186208)
    pt3dadd(-25.734019287215, -267.253020847702, -39.365161659693, 1.22796010115384)
    pt3dadd(-25.4813728100136, -268.187133501088, -39.2684218946694, 1.19)
    pt3dadd(-25.0629201575809, -268.988823283268, -38.8415836690839, 1.19)
    pt3dadd(-24.6444675051483, -269.790513065447, -38.4147454434985, 1.19)
    pt3dadd(-24.2260148527157, -270.592202847627, -37.987907217913, 1.19)
    pt3dadd(-23.807562200283, -271.393892629807, -37.5610689923275, 1.19)
    pt3dadd(-23.2696150770942, -272.232570254423, -37.5214137782216, 1.19)
    pt3dadd(-22.7275825964555, -273.072512444309, -37.4949958376935, 1.19)
    pt3dadd(-22.2323709638314, -273.94031316087, -37.4751446285247, 1.19)
    pt3dadd(-21.7572670756658, -274.820078037825, -37.4581135766513, 1.19)
    pt3dadd(-21.6272766830279, -275.774707097702, -37.483917767412, 1.19)
    pt3dadd(-21.5769560554727, -276.628629999823, -37.3744086012962, 1.17560758970376)
    pt3dadd(-21.0289259321275, -276.860779435433, -36.5708106772995, 1.09854028832341)
    pt3dadd(-20.4808958087822, -277.092928871044, -35.7672127533027, 1.02147298694306)
    pt3dadd(-19.9196784433145, -277.331091121475, -34.9778931233741, 0.95)
    pt3dadd(-19.1899808119264, -277.646073121667, -34.3709930440351, 0.95)
    pt3dadd(-18.4602831805384, -277.961055121859, -33.764092964696, 0.95)
    pt3dadd(-17.7305855491503, -278.27603712205, -33.1571928853569, 0.95)
    pt3dadd(-17.0831822105106, -278.737622771708, -32.6957926901623, 0.95)
    pt3dadd(-16.6936684729482, -279.65862736057, -32.6903525114607, 0.95)
    pt3dadd(-16.3041547353858, -280.579631949433, -32.684912332759, 0.95)
    pt3dadd(-15.9146409978235, -281.500636538295, -32.6794721540574, 0.95)
    pt3dadd(-15.5618573132307, -281.923755938242, -33.2776123563099, 0.95)
    pt3dadd(-15.2293524150382, -282.071991242426, -34.2089913271223, 0.95)
    pt3dadd(-14.8968475168456, -282.22022654661, -35.1403702979346, 0.95)
    pt3dadd(-14.5643426186531, -282.368461850794, -36.071749268747, 0.95)
    pt3dadd(-14.2318377204605, -282.516697154978, -37.0031282395593, 0.95)
    pt3dadd(-13.899332822268, -282.664932459162, -37.9345072103716, 0.95)
    pt3dadd(-13.7350684326768, -283.108869905033, -37.0607493268749, 0.95)
    pt3dadd(-13.5714264900803, -283.553901373451, -36.1803128971755, 0.95)
    pt3dadd(-13.4077845474837, -283.998932841867, -35.2998764674761, 0.95)
    pt3dadd(-13.2441426048872, -284.443964310284, -34.4194400377767, 0.95)
    pt3dadd(-12.9680372879551, -284.77236878531, -34.1102446600292, 0.978335316943279)
    pt3dadd(-12.4621623385616, -284.862497096516, -34.968130097075, 1.06456143965513)
    pt3dadd(-11.9562873891682, -284.952625407723, -35.8260155341207, 1.15078756236697)
    pt3dadd(-11.393022934753, -285.003706313909, -36.6476031776979, 1.19)
    pt3dadd(-10.781891941421, -285.022219172481, -37.4389161265724, 1.19)
    pt3dadd(-10.1707609480891, -285.040732031053, -38.230229075447, 1.19)
    pt3dadd(-9.55962995475706, -285.059244889626, -39.0215420243215, 1.19)
  }
  GCL[8] {pt3dclear()
    pt3dadd(-7.89116300457097, 68.5431348398932, -8.91780907397126, 4.62515425768944)
    pt3dadd(-7.82010610624666, 67.9687155670202, -8.05717212283405, 4.62515425768944)
    pt3dadd(-7.80244362657959, 67.3785680165574, -7.25006995737121, 4.29652082851142)
    pt3dadd(-7.78478114691253, 66.7884204660947, -6.44296779190836, 3.96788739933339)
    pt3dadd(-7.76711866724546, 66.1982729156319, -5.63586562644551, 3.63925397015536)
    pt3dadd(-7.74945618757839, 65.6081253651691, -4.82876346098267, 3.31062054097733)
    pt3dadd(-7.73179370791132, 65.0179778147064, -4.02166129551983, 2.98198711179931)
    pt3dadd(-7.71413122824425, 64.4278302642436, -3.21455913005698, 2.65335368262128)
    pt3dadd(-7.64930850058677, 63.7628552314624, -2.57015500181885, 2.39)
    pt3dadd(-7.3942303623815, 62.7960087290558, -2.58211260165719, 2.39)
    pt3dadd(-7.24697374959139, 61.9745347637312, -2.29870528875004, 2.3761715605419)
  }
  GCL[9] {pt3dclear()
    pt3dadd(-7.24697374959139, 61.9745347637312, -2.29870528875004, 2.34070091612521)
    pt3dadd(-6.89934175364986, 61.2210347514723, -1.66948119396258, 2.34070091612521)
    pt3dadd(-6.65524868796006, 60.5122862513061, -1.00759439186248, 2.30523027170852)
    pt3dadd(-6.41115562227025, 59.8035377511399, -0.345707589762386, 2.26975962729183)
    pt3dadd(-6.16706255658045, 59.0947892509737, 0.316179212337711, 2.23428898287514)
    pt3dadd(-5.92296949089064, 58.3860407508074, 0.978066014437808, 2.19881833845845)
    pt3dadd(-5.67887642520084, 57.6772922506412, 1.63995281653791, 2.16334769404176)
    pt3dadd(-5.47847534091315, 56.7965629846066, 1.87528940956789, 2.15)
    pt3dadd(-5.30443544217939, 55.8120705854918, 1.85327056005384, 2.15)
    pt3dadd(-5.03322603236772, 54.9229061105353, 1.92295077692007, 2.08114961130447)
  }
  GCL[10] {pt3dclear()
    pt3dadd(-5.03322603236772, 54.9229061105353, 1.92295077692007, 1.93763729858118)
    pt3dadd(-5.18227365319786, 53.9715076319608, 2.49301859244837, 1.93763729858118)
    pt3dadd(-5.160906590452, 53.0738012636026, 2.93309440959667, 1.79412498585789)
    pt3dadd(-5.13953952770614, 52.1760948952444, 3.37317022674498, 1.65061267313461)
    pt3dadd(-5.11817246496028, 51.2783885268862, 3.81324604389328, 1.50710036041132)
    pt3dadd(-5.10477229288082, 50.3350796584405, 4.00968280580973, 1.43)
    pt3dadd(-5.1006212110683, 49.338828976511, 3.92326899166709, 1.43)
    pt3dadd(-5.09647012925578, 48.3425782945814, 3.83685517752446, 1.43)
    pt3dadd(-5.09231904744326, 47.3463276126519, 3.75044136338182, 1.43)
    pt3dadd(-5.11429683114455, 46.3519970287966, 3.66774153494827, 1.43)
    pt3dadd(-5.28495824620117, 45.3685925662493, 3.60617576155955, 1.43)
    pt3dadd(-5.4556196612578, 44.385188103702, 3.54460998817083, 1.43)
    pt3dadd(-5.62628107631443, 43.4017836411547, 3.48304421478212, 1.43)
    pt3dadd(-5.79694249137106, 42.4183791786074, 3.4214784413934, 1.43)
    pt3dadd(-5.96760390642769, 41.4349747160602, 3.35991266800468, 1.43)
    pt3dadd(-6.15914943226504, 40.4556250025598, 3.29612110916097, 1.43)
    pt3dadd(-6.35594802440565, 39.4772951967688, 3.23176968934473, 1.43)
    pt3dadd(-6.55274661654625, 38.4989653909778, 3.16741826952849, 1.43)
    pt3dadd(-6.6377505290462, 37.5082097386536, 3.11537766940188, 1.43)
    pt3dadd(-6.64880665565814, 36.5092348773127, 3.07148019255665, 1.43)
    pt3dadd(-6.65986278227007, 35.5102600159719, 3.02758271571141, 1.43)
    pt3dadd(-6.670918908882, 34.511285154631, 2.98368523886617, 1.43)
    pt3dadd(-6.58120964570004, 33.5187548259502, 2.95163695023446, 1.43)
    pt3dadd(-6.43486930451945, 32.5298463840349, 2.92624801461386, 1.43)
    pt3dadd(-6.28852896333885, 31.5409379421197, 2.90085907899326, 1.43)
    pt3dadd(-6.14218862215825, 30.5520295002045, 2.87547014337267, 1.43)
    pt3dadd(-5.89806657900901, 29.5827189661196, 2.86214895271986, 1.43)
    pt3dadd(-5.64750975728546, 28.6146981232025, 2.84962191133215, 1.43)
    pt3dadd(-5.39695293556192, 27.6466772802854, 2.83709486994444, 1.43)
    pt3dadd(-5.14158369488049, 26.6799320440044, 2.82517502809825, 1.43)
    pt3dadd(-4.87700936072698, 25.7156267611898, 2.81441662472713, 1.43)
    pt3dadd(-4.61243502657347, 24.7513214783752, 2.80365822135601, 1.43)
    pt3dadd(-4.32261856267367, 23.8418948225372, 3.06744994538664, 1.37908385755801)
    pt3dadd(-4.02661714329411, 22.945914808011, 3.3985133430838, 1.31569198199169)
    pt3dadd(-3.73061572391455, 22.0499347934847, 3.72957674078096, 1.25230010642537)
    pt3dadd(-3.43092416065429, 21.1545789517567, 4.05531597582523, 1.19)
    pt3dadd(-2.92066028144387, 20.2948405590848, 4.07724015743128, 1.19)
    pt3dadd(-2.41039640223346, 19.4351021664129, 4.09916433903734, 1.19)
    pt3dadd(-1.90013252302305, 18.575363773741, 4.1210885206434, 1.19)
    pt3dadd(-1.38986864381263, 17.7156253810691, 4.14301270224945, 1.19)
    pt3dadd(-0.87960476460222, 16.8558869883972, 4.1649368838555, 1.19)
    pt3dadd(-0.477432303985752, 15.9435033233407, 4.17219894442824, 1.19)
    pt3dadd(-0.117704485419253, 15.0104472518059, 4.17370357775054, 1.19)
    pt3dadd(0.242023333147245, 14.0773911802711, 4.17520821107283, 1.19)
    pt3dadd(0.601751151713743, 13.1443351087363, 4.17671284439512, 1.19)
    pt3dadd(0.917281410579886, 12.2011906061036, 4.17271033730516, 1.19)
    pt3dadd(1.00174819339498, 11.2053040975049, 4.13991667035511, 1.19)
    pt3dadd(1.08621497621007, 10.2094175889062, 4.10712300340506, 1.19)
    pt3dadd(1.17068175902516, 9.21353108030758, 4.07432933645502, 1.19)
    pt3dadd(1.25514854184025, 8.2176445717089, 4.04153566950497, 1.19)
    pt3dadd(1.69288601090947, 7.33036906973976, 4.05395422298842, 1.19)
    pt3dadd(2.18406705990613, 6.45952448389149, 4.07321258235007, 1.19)
    pt3dadd(2.67524810890279, 5.58867989804324, 4.09247094171172, 1.19)
    pt3dadd(3.01577925393125, 4.66029279850333, 4.09196982297547, 1.19)
    pt3dadd(3.22998006177989, 3.68365233161725, 4.07489901873096, 1.19)
    pt3dadd(3.44418086962854, 2.7070118647312, 4.05782821448644, 1.19)
    pt3dadd(3.65838167747718, 1.73037139784513, 4.04075741024192, 1.19)
    pt3dadd(3.87258248532583, 0.75373093095908, 4.02368660599741, 1.19)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(3.87258248532583, 0.75373093095908, 4.02368660599741, 1.19)
    pt3dadd(4.18471467794879, -0.192978705461058, 4.0191416587735, 1.19)
    pt3dadd(4.55475658915672, -1.12198935831944, 4.02200362054787, 1.19)
    pt3dadd(4.92479850036464, -2.05100001117785, 4.02486558232225, 1.19)
    pt3dadd(5.29484041157257, -2.98001066403624, 4.02772754409662, 1.19)
    pt3dadd(5.65242464126039, -3.91366200245046, 4.02896055806204, 1.19)
    pt3dadd(5.9803426112685, -4.85836449693805, 4.02631445626846, 1.19)
    pt3dadd(6.30826058127661, -5.80306699142564, 4.02366835447489, 1.19)
    pt3dadd(6.63617855128471, -6.74776948591321, 4.02102225268131, 1.19)
    pt3dadd(6.96409652129282, -7.6924719804008, 4.01837615088774, 1.19)
    pt3dadd(7.29201449130093, -8.6371744748884, 4.01573004909416, 1.19)
    pt3dadd(7.61993246130903, -9.58187696937597, 4.01308394730059, 1.19)
    pt3dadd(7.94785043131714, -10.5265794638635, 4.01043784550701, 1.19)
    pt3dadd(8.19884878455305, -11.4931925344164, 3.99802159110527, 1.19)
    pt3dadd(8.42016964099812, -12.4682592488918, 3.98183576939622, 1.19)
    pt3dadd(8.64149049744319, -13.4433259633673, 3.96564994768717, 1.19)
  }
}
proc shape3d_10() {
  adendIML[8] {
    pt3dadd(8.86281135388826, -14.4183926778428, 3.94946412597811, 1.19)
    pt3dadd(9.08488790908727, -15.3932822574332, 3.93337266449369, 1.19)
    pt3dadd(9.32349856045534, -16.3642962646355, 3.9193457307332, 1.19)
    pt3dadd(9.56210921182341, -17.3353102718378, 3.90531879697272, 1.19)
    pt3dadd(9.80071986319148, -18.30632427904, 3.89129186321223, 1.19)
    pt3dadd(10.0393305145596, -19.2773382862423, 3.87726492945175, 1.19)
    pt3dadd(10.2779411659276, -20.2483522934445, 3.86323799569126, 1.19)
    pt3dadd(10.4541444439119, -21.2314875915822, 3.84152554714978, 1.19)
    pt3dadd(10.6010368990184, -22.2203158870758, 3.81620344881443, 1.19)
    pt3dadd(10.7479293541249, -23.2091441825693, 3.79088135047908, 1.19)
    pt3dadd(10.8948218092314, -24.1979724780629, 3.76555925214373, 1.19)
    pt3dadd(11.1868669557913, -25.1477326776006, 3.81648959702923, 1.19)
    pt3dadd(11.530368379947, -26.0836433317354, 3.89445124837165, 1.19)
    pt3dadd(11.8738698041026, -27.0195539858702, 3.97241289971407, 1.19)
    pt3dadd(12.2173712282582, -27.955464640005, 4.05037455105649, 1.19)
    pt3dadd(12.5608726524138, -28.8913752941398, 4.12833620239891, 1.19)
    pt3dadd(12.9043740765694, -29.8272859482746, 4.20629785374133, 1.19)
    pt3dadd(13.247875500725, -30.7631966024094, 4.28425950508375, 1.19)
    pt3dadd(13.5913769248807, -31.6991072565442, 4.36222115642617, 1.19)
    pt3dadd(13.9348783490363, -32.635017910679, 4.44018280776859, 1.19)
    pt3dadd(14.2783797731919, -33.5709285648138, 4.51814445911101, 1.19)
    pt3dadd(14.6218811973475, -34.5068392189485, 4.59610611045343, 1.19)
    pt3dadd(14.9653826215031, -35.4427498730833, 4.67406776179585, 1.19)
    pt3dadd(15.3088840456588, -36.3786605272181, 4.75202941313827, 1.19)
    pt3dadd(15.6352413487491, -37.3226285222197, 4.77763981131008, 1.19)
    pt3dadd(15.9518667134734, -38.2711703034429, 4.7735327823069, 1.19)
    pt3dadd(16.2684920781977, -39.219712084666, 4.76942575330372, 1.19)
    pt3dadd(16.5851174429221, -40.1682538658891, 4.76531872430055, 1.19)
    pt3dadd(16.9017428076464, -41.1167956471122, 4.76121169529737, 1.19)
    pt3dadd(17.2183681723708, -42.0653374283354, 4.75710466629419, 1.19)
    pt3dadd(17.5349935370951, -43.0138792095585, 4.75299763729101, 1.19)
    pt3dadd(17.8437404245138, -43.9648269446606, 4.74788299942563, 1.19)
    pt3dadd(18.1127250339762, -44.9279174077514, 4.73768301040723, 1.19)
    pt3dadd(18.3817096434386, -45.8910078708422, 4.72748302138883, 1.19)
    pt3dadd(18.650694252901, -46.854098333933, 4.71728303237043, 1.19)
    pt3dadd(18.9196788623634, -47.8171887970237, 4.70708304335204, 1.19)
    pt3dadd(19.1886634718257, -48.7802792601145, 4.69688305433364, 1.19)
    pt3dadd(19.4576480812881, -49.7433697232053, 4.68668306531524, 1.19)
    pt3dadd(19.7266326907505, -50.706460186296, 4.67648307629684, 1.19)
    pt3dadd(19.970775790454, -51.6691207077427, 4.71470871942896, 1.19)
    pt3dadd(20.112463868944, -52.6300080004002, 4.95265850241509, 1.19)
    pt3dadd(20.254151947434, -53.5908952930577, 5.19060828540122, 1.19)
    pt3dadd(20.395840025924, -54.5517825857152, 5.42855806838734, 1.19)
    pt3dadd(20.537528104414, -55.5126698783727, 5.66650785137347, 1.19)
    pt3dadd(20.6792161829039, -56.4735571710302, 5.90445763435959, 1.19)
    pt3dadd(20.8209042613939, -57.4344444636877, 6.14240741734572, 1.19)
    pt3dadd(21.1681873081163, -58.3669103694475, 6.16744864239507, 1.19)
    pt3dadd(21.5370392441629, -59.2963945984002, 6.1701537122271, 1.19)
    pt3dadd(21.9058911802096, -60.2258788273529, 6.17285878205913, 1.19)
    pt3dadd(22.2747431162563, -61.1553630563057, 6.17556385189116, 1.19)
    pt3dadd(22.643595052303, -62.0848472852584, 6.17826892172319, 1.19)
    pt3dadd(23.0124469883496, -63.0143315142111, 6.18097399155522, 1.19)
    pt3dadd(23.3827080177915, -63.9432443179571, 6.183865297204, 1.19)
    pt3dadd(23.7646257341273, -64.8674300221793, 6.18829723359559, 1.19)
    pt3dadd(24.146543450463, -65.7916157264015, 6.19272916998719, 1.19)
    pt3dadd(24.5284611667988, -66.7158014306237, 6.19716110637878, 1.19)
    pt3dadd(24.9103788831346, -67.6399871348459, 6.20159304277038, 1.19)
    pt3dadd(25.1831378625259, -68.5346924557818, 6.39418173440571, 1.19)
    pt3dadd(25.2565190597494, -69.3755520324223, 6.93043761760512, 1.19)
    pt3dadd(25.3299002569729, -70.2164116090628, 7.46669350080452, 1.19)
    pt3dadd(25.5095779396367, -71.0684206593628, 7.82320957100336, 1.17882760364352)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(25.5095779396367, -71.0684206593628, 7.82320957100336, 1.14531357416203)
    pt3dadd(25.5552321330329, -72.098107672798, 7.78806875847418, 1.14531357416203)
    pt3dadd(25.6875390526373, -73.0889463973991, 7.76098553754719, 1.11179954468055)
    pt3dadd(25.8198459722418, -74.0797851220001, 7.7339023166202, 1.07828551519906)
    pt3dadd(25.9521528918462, -75.0706238466011, 7.7068190956932, 1.04477148571757)
    pt3dadd(26.0844598114506, -76.0614625712021, 7.67973587476621, 1.01125745623608)
    pt3dadd(26.2167667310551, -77.0523012958032, 7.65265265383922, 0.977743426754593)
    pt3dadd(26.3762006656596, -78.0373206474239, 7.62893363709548, 0.95)
    pt3dadd(26.6660536204849, -78.9943620986974, 7.62138876311685, 0.95)
    pt3dadd(26.9559065753103, -79.9514035499709, 7.61384388913822, 0.95)
    pt3dadd(27.2457595301356, -80.9084450012444, 7.60629901515959, 0.95)
    pt3dadd(27.535612484961, -81.8654864525179, 7.59875414118097, 0.95)
    pt3dadd(27.8254654397863, -82.8225279037914, 7.59120926720234, 0.95)
    pt3dadd(28.1153183946116, -83.7795693550648, 7.58366439322371, 0.95)
    pt3dadd(28.3507455658925, -84.7481785064794, 7.60144496591212, 0.95)
    pt3dadd(28.498007430165, -85.7355263836946, 7.66025068578468, 0.95)
    pt3dadd(28.6452692944376, -86.7228742609097, 7.71905640565723, 0.95)
    pt3dadd(28.7925311587101, -87.7102221381249, 7.77786212552979, 0.95)
    pt3dadd(28.9397930229827, -88.69757001534, 7.83666784540234, 0.95)
    pt3dadd(29.0870548872552, -89.6849178925552, 7.8954735652749, 0.95)
    pt3dadd(29.267449816174, -90.6674014949854, 7.90567876652682, 0.95)
    pt3dadd(29.4676238714026, -91.6469813181726, 7.88687138452436, 0.95)
    pt3dadd(29.6677979266312, -92.6265611413599, 7.86806400252189, 0.95)
    pt3dadd(29.8679719818598, -93.6061409645471, 7.84925662051943, 0.95)
    pt3dadd(30.0681460370884, -94.5857207877344, 7.83044923851696, 0.95)
    pt3dadd(30.268320092317, -95.5653006109216, 7.8116418565145, 0.95)
    pt3dadd(30.4684941475456, -96.5448804341088, 7.79283447451204, 0.95)
    pt3dadd(30.6686682027742, -97.5244602572961, 7.77402709250957, 0.95)
    pt3dadd(30.8688422580028, -98.5040400804833, 7.75521971050711, 0.95)
    pt3dadd(31.0675765216187, -99.4822173637734, 7.74181947459284, 0.95)
    pt3dadd(31.1151237021308, -100.313119226008, 8.29620324145582, 0.95)
    pt3dadd(31.1626708826428, -101.144021088242, 8.8505870083188, 0.95)
    pt3dadd(31.2102180631549, -101.974922950476, 9.40497077518178, 0.95)
    pt3dadd(31.2577652436669, -102.80582481271, 9.95935454204476, 0.95)
    pt3dadd(31.305312424179, -103.636726674944, 10.5137383089077, 0.95)
    pt3dadd(31.3604781712364, -104.587143624425, 10.6450776137876, 0.95)
    pt3dadd(31.4186555176805, -105.584804574638, 10.6091885516683, 0.95)
    pt3dadd(31.4768328641246, -106.582465524852, 10.573299489549, 0.95)
    pt3dadd(31.5350102105687, -107.580126475065, 10.5374104274297, 0.95)
    pt3dadd(31.5931875570127, -108.577787425279, 10.5015213653103, 0.95)
    pt3dadd(31.6513649034568, -109.575448375492, 10.465632303191, 0.95)
    pt3dadd(31.7070490202635, -110.572377219545, 10.4369532878995, 0.95)
    pt3dadd(31.6689383007047, -111.541764365676, 10.67951489651, 0.95)
    pt3dadd(31.6308275811459, -112.511151511806, 10.9220765051204, 0.95)
    pt3dadd(31.5927168615872, -113.480538657937, 11.1646381137309, 0.95)
    pt3dadd(31.5546061420284, -114.449925804067, 11.4071997223414, 0.95)
    pt3dadd(31.5164954224696, -115.419312950198, 11.6497613309518, 0.95)
    pt3dadd(31.4783847029108, -116.388700096328, 11.8923229395623, 0.95)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(31.4783847029108, -116.388700096328, 11.8923229395623, 0.95)
    pt3dadd(31.4402739833521, -117.358087242459, 12.1348845481727, 0.95)
    pt3dadd(31.466666781906, -118.347000179077, 12.1858302655824, 0.95)
    pt3dadd(31.5223875601279, -119.34479095683, 12.1496534953261, 0.95)
    pt3dadd(31.5781083383498, -120.342581734582, 12.1134767250698, 0.95)
    pt3dadd(31.6338291165717, -121.340372512335, 12.0772999548135, 0.95)
    pt3dadd(31.6895498947936, -122.338163290087, 12.0411231845572, 0.95)
    pt3dadd(31.7452706730155, -123.33595406784, 12.0049464143009, 0.95)
    pt3dadd(31.8009914512374, -124.333744845593, 11.9687696440446, 0.95)
    pt3dadd(31.8567122294593, -125.331535623345, 11.9325928737883, 0.95)
    pt3dadd(31.8803953696576, -126.321695246845, 11.9211109436599, 0.95)
    pt3dadd(31.5469015130684, -127.226777663461, 12.1849435927937, 0.95)
    pt3dadd(31.2134076564792, -128.131860080078, 12.4487762419275, 0.95)
    pt3dadd(30.87991379989, -129.036942496694, 12.7126088910613, 0.95)
    pt3dadd(30.5464199433008, -129.94202491331, 12.9764415401951, 0.95)
    pt3dadd(30.2129260867116, -130.847107329927, 13.240274189329, 0.95)
    pt3dadd(29.8794322301224, -131.752189746543, 13.5041068384628, 0.95)
    pt3dadd(29.5459383735332, -132.65727216316, 13.7679394875966, 0.95)
    pt3dadd(29.212444516944, -133.562354579776, 14.0317721367304, 0.95)
    pt3dadd(28.8789506603548, -134.467436996393, 14.2956047858642, 0.95)
    pt3dadd(28.5836853932179, -135.376140325525, 14.5869344383414, 0.95)
    pt3dadd(28.3261875977473, -136.288420891297, 14.905429422042, 0.95)
    pt3dadd(28.0686898022766, -137.200701457069, 15.2239244057427, 0.95)
    pt3dadd(27.811192006806, -138.112982022841, 15.5424193894433, 0.95)
    pt3dadd(27.5536942113353, -139.025262588613, 15.860914373144, 0.95)
    pt3dadd(27.2961964158647, -139.937543154385, 16.1794093568446, 0.95)
    pt3dadd(27.038698620394, -140.849823720157, 16.4979043405453, 0.95)
    pt3dadd(26.7812008249233, -141.762104285929, 16.8163993242459, 0.95)
    pt3dadd(26.5237030294527, -142.674384851701, 17.1348943079465, 0.95)
    pt3dadd(26.3009155248894, -143.616235787255, 17.3801514164382, 0.95)
    pt3dadd(26.0927316877, -144.570527870179, 17.5945951395976, 0.95)
    pt3dadd(25.8845478505106, -145.524819953103, 17.8090388627571, 0.95)
    pt3dadd(25.6763640133213, -146.479112036026, 18.0234825859165, 0.95)
    pt3dadd(25.4681801761319, -147.43340411895, 18.2379263090759, 0.95)
    pt3dadd(25.2599963389425, -148.387696201873, 18.4523700322354, 0.95)
    pt3dadd(25.0518125017531, -149.341988284797, 18.6668137553948, 0.95)
    pt3dadd(24.8436286645637, -150.296280367721, 18.8812574785542, 0.95)
    pt3dadd(24.6354448273744, -151.250572450644, 19.0957012017137, 0.95)
    pt3dadd(24.427260990185, -152.204864533568, 19.3101449248731, 0.95)
    pt3dadd(24.2190771529956, -153.159156616491, 19.5245886480325, 0.95)
    pt3dadd(24.0108933158062, -154.113448699415, 19.7390323711919, 0.95)
    pt3dadd(23.8124094136511, -155.085894797547, 19.8173194091384, 0.95)
    pt3dadd(23.6184392536111, -156.066788637104, 19.8322476552844, 0.95)
    pt3dadd(23.4244690935711, -157.047682476661, 19.8471759014305, 0.95)
    pt3dadd(23.2304989335311, -158.028576316218, 19.8621041475765, 0.95)
    pt3dadd(23.0365287734912, -159.009470155775, 19.8770323937225, 0.95)
    pt3dadd(22.8425586134512, -159.990363995333, 19.8919606398686, 0.95)
    pt3dadd(22.6485884534112, -160.97125783489, 19.9068888860146, 0.95)
    pt3dadd(22.4546182933712, -161.952151674447, 19.9218171321606, 0.95)
    pt3dadd(22.2606481333313, -162.933045514004, 19.9367453783067, 0.95)
    pt3dadd(22.1005426502724, -163.915861957335, 19.9954345889955, 0.95)
    pt3dadd(21.9956015486515, -164.90181025537, 20.1254088894986, 0.95)
    pt3dadd(21.8906604470306, -165.887758553406, 20.2553831900017, 0.95)
    pt3dadd(21.7857193454097, -166.873706851442, 20.3853574905048, 0.95)
    pt3dadd(21.6807782437887, -167.859655149477, 20.5153317910079, 0.95)
    pt3dadd(21.5758371421678, -168.845603447513, 20.645306091511, 0.95)
    pt3dadd(21.4708960405469, -169.831551745548, 20.775280392014, 0.95)
    pt3dadd(21.3446026431635, -170.805580788543, 20.9486683708717, 0.95)
    pt3dadd(21.1731231504008, -171.754386099106, 21.2139291222276, 0.95)
    pt3dadd(21.0016436576382, -172.703191409669, 21.4791898735835, 0.95)
    pt3dadd(20.8301641648755, -173.651996720231, 21.7444506249393, 0.95)
    pt3dadd(20.6586846721128, -174.600802030794, 22.0097113762952, 0.95)
    pt3dadd(20.4872051793502, -175.549607341357, 22.274972127651, 0.95)
    pt3dadd(20.3157256865875, -176.498412651919, 22.5402328790069, 0.95)
    pt3dadd(20.1442461938248, -177.447217962482, 22.8054936303627, 0.95)
    pt3dadd(19.9727667010621, -178.396023273045, 23.0707543817186, 0.95)
    pt3dadd(19.8012872082995, -179.344828583607, 23.3360151330745, 0.95)
    pt3dadd(19.6298077155368, -180.29363389417, 23.6012758844303, 0.95)
    pt3dadd(19.466788398873, -181.253106857066, 23.7794331166368, 0.95)
    pt3dadd(19.3267322343299, -182.241534645537, 23.7211683953161, 0.95)
    pt3dadd(19.1866760697868, -183.229962434009, 23.6629036739955, 0.95)
    pt3dadd(19.0466199052436, -184.21839022248, 23.6046389526749, 0.95)
    pt3dadd(18.9065637407005, -185.206818010952, 23.5463742313543, 0.95)
    pt3dadd(18.7665075761574, -186.195245799424, 23.4881095100336, 0.95)
    pt3dadd(18.6264514116143, -187.183673587895, 23.429844788713, 0.95)
    pt3dadd(18.4863952470712, -188.172101376367, 23.3715800673924, 0.95)
    pt3dadd(18.2492969301072, -189.097797242329, 23.5366942169207, 0.95)
    pt3dadd(17.9207437716054, -189.964373046655, 23.9123259480027, 0.95)
    pt3dadd(17.5921906131035, -190.830948850981, 24.2879576790847, 0.95)
    pt3dadd(17.2636374546017, -191.697524655306, 24.6635894101667, 0.95)
    pt3dadd(16.9350842960999, -192.564100459632, 25.0392211412487, 0.95)
    pt3dadd(16.606531137598, -193.430676263958, 25.4148528723307, 0.95)
    pt3dadd(16.1819114877297, -194.276748764096, 25.7315966702752, 0.95)
    pt3dadd(15.7314178312116, -195.11729901999, 26.0324799246325, 0.95)
    pt3dadd(15.2809241746935, -195.957849275885, 26.3333631789899, 0.95)
    pt3dadd(14.8304305181754, -196.798399531779, 26.6342464333472, 0.95)
    pt3dadd(14.3799368616574, -197.638949787674, 26.9351296877045, 0.95)
    pt3dadd(13.9294432051393, -198.479500043568, 27.2360129420618, 0.95)
    pt3dadd(13.4789495486212, -199.320050299463, 27.5368961964192, 0.95)
    pt3dadd(13.0284558921031, -200.160600555357, 27.8377794507765, 0.95)
    pt3dadd(12.5779622355851, -201.001150811252, 28.1386627051338, 0.95)
    pt3dadd(12.1450999406235, -201.856307628945, 28.4042423660554, 0.95)
    pt3dadd(11.8198295484804, -202.800598106143, 28.4543888182653, 0.95)
    pt3dadd(11.4945591563373, -203.74488858334, 28.5045352704753, 0.95)
    pt3dadd(11.1692887641942, -204.689179060537, 28.5546817226853, 0.95)
    pt3dadd(10.844018372051, -205.633469537735, 28.6048281748952, 0.95)
    pt3dadd(10.5187479799079, -206.577760014932, 28.6549746271052, 0.95)
    pt3dadd(10.1512773775027, -207.49508764144, 28.7931991101082, 0.977527192140467)
    pt3dadd(9.76584497568163, -208.400938990632, 28.9689125040012, 1.01677086390602)
    pt3dadd(9.38041257386053, -209.306790339824, 29.1446258978942, 1.05601453567157)
    pt3dadd(8.99498017203944, -210.212641689017, 29.3203392917872, 1.09525820743712)
    pt3dadd(8.60954777021834, -211.118493038209, 29.4960526856801, 1.13450187920267)
    pt3dadd(8.22411536839725, -212.024344387401, 29.6717660795731, 1.17374555096823)
    pt3dadd(7.84044288702898, -212.94021746641, 29.770050306365, 1.19)
    pt3dadd(7.45801475122349, -213.863176374219, 29.8135885130416, 1.19)
    pt3dadd(7.07558661541799, -214.786135282028, 29.8571267197183, 1.19)
    pt3dadd(6.6931584796125, -215.709094189836, 29.9006649263949, 1.19)
    pt3dadd(6.30001875970699, -216.576974881098, 30.1386713204392, 1.19)
    pt3dadd(5.89757653696697, -217.397022753163, 30.5455641132941, 1.19)
    pt3dadd(5.49513431422696, -218.217070625228, 30.9524569061491, 1.19)
    pt3dadd(5.09269209148694, -219.037118497293, 31.359349699004, 1.19)
    pt3dadd(4.69024986874692, -219.857166369359, 31.766242491859, 1.19)
    pt3dadd(4.38863374867702, -220.597528804876, 32.3453040693726, 1.19)
    pt3dadd(4.14289160545969, -221.293732613618, 33.0197750144408, 1.19)
    pt3dadd(3.89714946224237, -221.989936422359, 33.694245959509, 1.19)
    pt3dadd(3.65140731902504, -222.6861402311, 34.3687169045772, 1.19)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(3.65140731902504, -222.6861402311, 34.3687169045772, 1.19)
    pt3dadd(3.16975678508866, -223.501848694624, 34.6624954504326, 1.19)
    pt3dadd(2.67018027863634, -224.326637959177, 34.927346320318, 1.19)
    pt3dadd(2.17060377218403, -225.15142722373, 35.1921971902034, 1.19)
    pt3dadd(1.67102726573172, -225.976216488283, 35.4570480600888, 1.19)
    pt3dadd(1.1714507592794, -226.801005752836, 35.7218989299742, 1.19)
    pt3dadd(0.670049810670892, -227.587903322076, 36.060636477759, 1.16751068776121)
    pt3dadd(0.164775312120869, -228.294351437951, 36.5562459416434, 1.09727337002321)
    pt3dadd(-0.340499186429154, -229.000799553826, 37.0518554055279, 1.02703605228521)
    pt3dadd(-0.845773684979177, -229.707247669701, 37.5474648694123, 0.956798734547209)
    pt3dadd(-1.42041419756604, -230.504336294638, 37.5039563378435, 0.95)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(-1.42041419756604, -230.504336294638, 37.5039563378435, 0.95)
    pt3dadd(-1.84631083369713, -231.12053696924, 36.9103780928586, 0.95)
    pt3dadd(-2.2275947220535, -231.682291541084, 36.17617485295, 0.95)
    pt3dadd(-2.60887861040986, -232.244046112928, 35.4419716130415, 0.95)
    pt3dadd(-2.99016249876622, -232.805800684772, 34.707768373133, 0.95)
    pt3dadd(-3.37144638712259, -233.367555256616, 33.9735651332245, 0.95)
    pt3dadd(-3.80887256075475, -233.952849896711, 33.4760409806659, 0.95)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(-3.80887256075475, -233.952849896711, 33.4760409806659, 0.95)
    pt3dadd(-4.45175295787802, -234.624290058309, 33.8446504004973, 0.95)
    pt3dadd(-5.09463335500129, -235.295730219906, 34.2132598203287, 0.95)
    pt3dadd(-5.73751375212456, -235.967170381504, 34.5818692401601, 0.95)
    pt3dadd(-6.38039414924783, -236.638610543102, 34.9504786599915, 0.95)
    pt3dadd(-7.0232745463711, -237.310050704699, 35.3190880798228, 0.95)
  }
}
proc shape3d_11() {
  adendOML[6] {
    pt3dadd(-7.66615494349437, -237.981490866297, 35.6876974996542, 0.95)
    pt3dadd(-8.30903534061764, -238.652931027894, 36.0563069194856, 0.95)
    pt3dadd(-8.95191573774091, -239.324371189492, 36.424916339317, 0.95)
    pt3dadd(-9.52391736749689, -240.124784553218, 36.3943688576077, 0.95)
    pt3dadd(-10.0836925376978, -240.947445561734, 36.2949675301827, 0.95)
    pt3dadd(-10.6434677078987, -241.77010657025, 36.1955662027577, 0.95)
    pt3dadd(-11.2032428780995, -242.592767578767, 36.0961648753327, 0.95)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(-1.42041419756604, -230.504336294638, 37.5039563378435, 0.95)
    pt3dadd(-1.12177647192263, -231.084797530787, 36.9706900617765, 0.95)
    pt3dadd(-0.571560237745555, -231.600603569263, 36.3140271145047, 0.95)
    pt3dadd(-0.0213440035684829, -232.116409607739, 35.6573641672329, 0.95)
    pt3dadd(0.528872230608589, -232.632215646215, 35.0007012199611, 0.95)
    pt3dadd(1.04887644117989, -233.226822753803, 34.5023815668047, 0.95)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(1.04887644117989, -233.226822753803, 34.5023815668047, 0.95)
    pt3dadd(1.44903136393767, -234.134028982037, 34.6322002759577, 0.95)
    pt3dadd(1.84918628669545, -235.041235210271, 34.7620189851108, 0.95)
    pt3dadd(2.24934120945323, -235.948441438505, 34.8918376942638, 0.95)
    pt3dadd(2.41674476995003, -236.930407483829, 34.8797770147706, 0.95)
    pt3dadd(2.56208491912893, -237.919460304406, 34.8542670335039, 0.95)
    pt3dadd(2.70742506830783, -238.908513124984, 34.8287570522372, 0.95)
    pt3dadd(2.85276521748672, -239.897565945561, 34.8032470709705, 0.95)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(3.65140731902504, -222.6861402311, 34.3687169045772, 1.03367169619291)
    pt3dadd(3.96797232854933, -223.502585482179, 34.8207329878508, 1.03367169619291)
    pt3dadd(4.3272653755751, -224.328167520569, 35.2558453920037, 0.865464472484038)
    pt3dadd(4.71288374486692, -225.153929619175, 35.6451669822433, 0.72)
    pt3dadd(5.26688100018474, -225.980843397462, 35.7416068307508, 0.72)
    pt3dadd(5.82087825550257, -226.807757175748, 35.8380466792582, 0.72)
    pt3dadd(6.3748755108204, -227.634670954035, 35.9344865277657, 0.72)
    pt3dadd(6.87318629840985, -228.245767649165, 36.5169774295456, 0.72)
    pt3dadd(7.3639108868661, -228.827463460456, 37.1656833424304, 0.72)
    pt3dadd(7.85463547532235, -229.409159271746, 37.8143892553153, 0.72)
    pt3dadd(8.3453600637786, -229.990855083036, 38.4630951682002, 0.72)
    pt3dadd(8.97680313442429, -230.548501573139, 38.887745969561, 0.72)
    pt3dadd(9.82751933941607, -231.068673454691, 38.9632651870266, 0.72)
    pt3dadd(10.6782355444078, -231.588845336243, 39.0387844044922, 0.72)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(25.5095779396367, -71.0684206593628, 7.82320957100336, 1.15016949696705)
    pt3dadd(26.2484049313851, -71.7873433349553, 7.85252493386845, 1.15016949696705)
    pt3dadd(26.9005791969254, -72.5451142993818, 7.87378270513134, 1.12029732375388)
    pt3dadd(27.5527534624656, -73.3028852638084, 7.89504047639424, 1.09042515054072)
    pt3dadd(28.2049277280059, -74.0606562282349, 7.91629824765714, 1.06055297732755)
    pt3dadd(28.8571019935461, -74.8184271926615, 7.93755601892004, 1.03068080411439)
    pt3dadd(29.5092762590864, -75.576198157088, 7.95881379018293, 1.00080863090123)
    pt3dadd(30.1614505246267, -76.3339691215146, 7.98007156144583, 0.970936457688062)
    pt3dadd(30.7672939804096, -77.1245190486765, 8.00098573153928, 0.95)
    pt3dadd(31.2645839537753, -77.9918703650991, 8.02109484116217, 0.95)
    pt3dadd(31.7618739271411, -78.8592216815217, 8.04120395078505, 0.95)
    pt3dadd(32.2591639005069, -79.7265729979443, 8.06131306040793, 0.95)
    pt3dadd(32.7564538738727, -80.5939243143669, 8.08142217003081, 0.95)
    pt3dadd(33.2537438472384, -81.4612756307896, 8.10153127965369, 0.95)
    pt3dadd(33.7510338206042, -82.3286269472122, 8.12164038927658, 0.95)
    pt3dadd(34.2838573408338, -83.1617124248699, 8.20214298326088, 0.95)
    pt3dadd(34.9077143857629, -83.90701212388, 8.43736786746273, 0.95)
    pt3dadd(35.5315714306921, -84.6523118228901, 8.67259275166457, 0.95)
    pt3dadd(36.1554284756212, -85.3976115219002, 8.90781763586642, 0.95)
    pt3dadd(36.7792855205504, -86.1429112209102, 9.14304252006826, 0.95)
    pt3dadd(37.4031425654795, -86.8882109199203, 9.3782674042701, 0.95)
    pt3dadd(38.0269996104087, -87.6335106189304, 9.61349228847195, 0.95)
    pt3dadd(38.6508566553378, -88.3788103179405, 9.84871717267379, 0.95)
    pt3dadd(39.274713700267, -89.1241100169505, 10.0839420568756, 0.95)
    pt3dadd(39.7175436165244, -89.9116841069381, 10.5106171649115, 0.95)
    pt3dadd(40.1563644336307, -90.700194422486, 10.9415322061304, 0.95)
    pt3dadd(40.5951852507369, -91.488704738034, 11.3724472473493, 0.95)
    pt3dadd(41.0340060678431, -92.277215053582, 11.8033622885682, 0.95)
    pt3dadd(41.4728268849494, -93.0657253691299, 12.234277329787, 0.95)
    pt3dadd(41.9116477020556, -93.8542356846779, 12.6651923710059, 0.95)
    pt3dadd(42.3145874464682, -94.721680377989, 12.8129595813973, 0.95)
    pt3dadd(42.6916082189799, -95.6461439329357, 12.756192754201, 0.95)
    pt3dadd(43.0686289914917, -96.5706074878824, 12.6994259270047, 0.95)
    pt3dadd(43.4456497640034, -97.4950710428291, 12.6426590998084, 0.95)
    pt3dadd(43.8226705365151, -98.4195345977759, 12.5858922726121, 0.95)
    pt3dadd(44.1996913090268, -99.3439981527226, 12.5291254454158, 0.95)
    pt3dadd(44.6179914098407, -100.153319560407, 12.7500997814874, 0.95)
    pt3dadd(45.0906098143907, -100.811128664355, 13.3365458799861, 0.95)
    pt3dadd(45.5632282189406, -101.468937768302, 13.9229919784849, 0.95)
    pt3dadd(46.0358466234906, -102.12674687225, 14.5094380769837, 0.95)
    pt3dadd(46.5084650280406, -102.784555976197, 15.0958841754825, 0.95)
    pt3dadd(46.9810834325905, -103.442365080145, 15.6823302739813, 0.95)
    pt3dadd(47.4537018371405, -104.100174184092, 16.2687763724801, 0.95)
    pt3dadd(48.0859053805969, -104.254597846398, 16.997434962659, 0.95)
    pt3dadd(48.7424017141466, -104.332393841781, 17.7477417979859, 0.95)
    pt3dadd(49.3988980476962, -104.410189837164, 18.4980486333127, 0.95)
    pt3dadd(50.0553943812458, -104.487985832548, 19.2483554686396, 0.95)
    pt3dadd(50.7279731281872, -104.625524958695, 19.9203981869137, 0.95)
    pt3dadd(51.5250975575122, -105.225727791306, 19.9863466812063, 0.95)
    pt3dadd(52.3222219868371, -105.825930623917, 20.0522951754988, 0.95)
    pt3dadd(53.119346416162, -106.426133456527, 20.1182436697914, 0.95)
    pt3dadd(53.7055191715928, -107.206401491323, 20.1522780573148, 0.95)
    pt3dadd(54.1660427633771, -108.093921777967, 20.1673034426814, 0.95)
    pt3dadd(54.6265663551614, -108.981442064611, 20.182328828048, 0.95)
    pt3dadd(55.0870899469457, -109.868962351255, 20.1973542134145, 0.95)
    pt3dadd(55.54761353873, -110.756482637899, 20.2123795987811, 0.95)
    pt3dadd(56.0081371305143, -111.644002924543, 20.2274049841477, 0.95)
    pt3dadd(56.4414027369996, -112.482853812408, 19.9741176343938, 0.95)
    pt3dadd(56.8585336526784, -113.292896052369, 19.5620091915497, 0.95)
    pt3dadd(57.2756645683571, -114.102938292331, 19.1499007487055, 0.95)
    pt3dadd(57.6927954840359, -114.912980532292, 18.7377923058614, 0.95)
    pt3dadd(58.1099263997147, -115.723022772253, 18.3256838630172, 0.95)
    pt3dadd(58.5347685675745, -116.552783158181, 18.2819439218831, 0.95)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(58.5347685675745, -116.552783158181, 18.2819439218831, 0.95)
    pt3dadd(58.9669226733132, -117.401240618853, 18.587497135454, 0.95)
    pt3dadd(59.3990767790519, -118.249698079525, 18.8930503490249, 0.95)
    pt3dadd(59.8312308847906, -119.098155540197, 19.1986035625959, 0.95)
    pt3dadd(60.2633849905293, -119.946613000869, 19.5041567761668, 0.95)
    pt3dadd(60.695539096268, -120.79507046154, 19.8097099897378, 0.95)
    pt3dadd(61.1042449467214, -121.677583885142, 19.9816205922007, 0.95)
    pt3dadd(61.4835040553807, -122.602865401069, 19.9857003938598, 0.95)
    pt3dadd(61.8627631640401, -123.528146916997, 19.9897801955189, 0.95)
    pt3dadd(62.2420222726994, -124.453428432925, 19.9938599971781, 0.95)
    pt3dadd(62.6212813813588, -125.378709948852, 19.9979397988372, 0.95)
    pt3dadd(63.0005404900182, -126.30399146478, 20.0020196004963, 0.95)
    pt3dadd(63.3797995986775, -127.229272980707, 20.0060994021555, 0.95)
    pt3dadd(63.7590218488213, -128.15448350457, 20.0105832913247, 0.95)
    pt3dadd(64.104387278771, -129.014483437319, 20.3862464855136, 0.95)
    pt3dadd(64.4497527087207, -129.874483370067, 20.7619096797025, 0.95)
    pt3dadd(64.7951181386704, -130.734483302816, 21.1375728738914, 0.95)
    pt3dadd(65.14048356862, -131.594483235564, 21.5132360680802, 0.95)
    pt3dadd(65.4858489985697, -132.454483168313, 21.8888992622691, 0.95)
    pt3dadd(65.8312144285194, -133.314483101061, 22.264562456458, 0.95)
    pt3dadd(66.176579858469, -134.17448303381, 22.6402256506469, 0.95)
    pt3dadd(66.5266741850973, -135.02505269629, 23.0286146925633, 0.95)
    pt3dadd(66.9307511710761, -135.767971229541, 23.5622754859097, 0.95)
    pt3dadd(67.3348281570549, -136.510889762791, 24.0959362792561, 0.95)
    pt3dadd(67.7389051430337, -137.253808296042, 24.6295970726026, 0.95)
    pt3dadd(68.1429821290125, -137.996726829293, 25.163257865949, 0.95)
    pt3dadd(68.6241244644159, -138.767435101659, 25.4859929120545, 0.95)
    pt3dadd(69.2111586783481, -139.576327949854, 25.5189047915594, 0.95)
    pt3dadd(69.7981928922803, -140.385220798048, 25.5518166710642, 0.95)
    pt3dadd(70.3852271062125, -141.194113646243, 25.584728550569, 0.95)
    pt3dadd(70.9722613201447, -142.003006494438, 25.6176404300739, 0.95)
    pt3dadd(71.5592955340769, -142.811899342632, 25.6505523095787, 0.95)
    pt3dadd(72.1463297480091, -143.620792190827, 25.6834641890835, 0.95)
    pt3dadd(72.7333639619413, -144.429685039022, 25.7163760685884, 0.95)
    pt3dadd(73.3203981758735, -145.238577887217, 25.7492879480932, 0.95)
    pt3dadd(73.9569216425767, -145.991194639219, 25.6321711825349, 0.95)
    pt3dadd(74.6192933316495, -146.714418402501, 25.436694499171, 0.95)
    pt3dadd(75.2816650207223, -147.437642165783, 25.2412178158071, 0.95)
    pt3dadd(75.9440367097951, -148.160865929065, 25.0457411324432, 0.95)
    pt3dadd(76.6064083988679, -148.884089692347, 24.8502644490794, 0.95)
    pt3dadd(77.1592655078484, -149.570110821191, 25.1138048817835, 0.95)
    pt3dadd(77.6367240830556, -150.230518702129, 25.6933691489326, 0.95)
    pt3dadd(78.1141826582627, -150.890926583067, 26.2729334160816, 0.95)
    pt3dadd(78.5916412334699, -151.551334464005, 26.8524976832307, 0.95)
    pt3dadd(79.0690998086771, -152.211742344943, 27.4320619503798, 0.95)
    pt3dadd(79.5465583838843, -152.872150225881, 28.0116262175289, 0.95)
    pt3dadd(80.0240169590915, -153.532558106819, 28.591190484678, 0.95)
    pt3dadd(80.5014755342986, -154.192965987757, 29.170754751827, 0.95)
    pt3dadd(80.9789341095058, -154.853373868695, 29.7503190189761, 0.95)
    pt3dadd(81.456392684713, -155.513781749633, 30.3298832861252, 0.95)
    pt3dadd(81.8889321692797, -156.230134214463, 30.8486756494162, 0.95)
    pt3dadd(82.1659792231355, -157.140145081779, 31.1570993049907, 0.95)
    pt3dadd(82.4430262769912, -158.050155949094, 31.4655229605653, 0.95)
    pt3dadd(82.720073330847, -158.960166816409, 31.7739466161398, 0.95)
    pt3dadd(82.9971203847027, -159.870177683724, 32.0823702717143, 0.95)
    pt3dadd(83.2741674385585, -160.78018855104, 32.3907939272889, 0.95)
    pt3dadd(83.5512144924142, -161.690199418355, 32.6992175828634, 0.95)
    pt3dadd(83.82826154627, -162.60021028567, 33.0076412384379, 0.95)
    pt3dadd(84.1053086001257, -163.510221152985, 33.3160648940125, 0.95)
    pt3dadd(84.4094632135484, -164.448858803246, 33.3966826567783, 0.95)
    pt3dadd(84.7237357018762, -165.398181377322, 33.3922720524429, 0.95)
    pt3dadd(85.0380081902039, -166.347503951398, 33.3878614481076, 0.95)
    pt3dadd(85.3522806785317, -167.296826525473, 33.3834508437722, 0.95)
    pt3dadd(85.6665531668594, -168.246149099549, 33.3790402394368, 0.95)
    pt3dadd(85.9808256551871, -169.195471673625, 33.3746296351015, 0.95)
    pt3dadd(86.2950981435149, -170.1447942477, 33.3702190307661, 0.95)
    pt3dadd(86.6093706318426, -171.094116821776, 33.3658084264307, 0.95)
    pt3dadd(86.9236431201704, -172.043439395852, 33.3613978220954, 0.95)
    pt3dadd(87.2635094070041, -172.926093507712, 33.158189768711, 0.95)
    pt3dadd(87.6401539560928, -173.712945107613, 32.6693099845348, 0.95)
    pt3dadd(88.0167985051815, -174.499796707513, 32.1804302003585, 0.95)
    pt3dadd(88.3934430542701, -175.286648307413, 31.6915504161823, 0.95)
    pt3dadd(88.7700876033588, -176.073499907314, 31.2026706320061, 0.95)
    pt3dadd(89.1467321524475, -176.860351507214, 30.7137908478298, 0.95)
    pt3dadd(89.5233767015361, -177.647203107114, 30.2249110636536, 0.95)
    pt3dadd(89.865070062486, -178.534067305468, 30.2254426541715, 0.95)
    pt3dadd(90.1932822052747, -179.459507922263, 30.4147478419314, 0.95)
    pt3dadd(90.5214943480634, -180.384948539058, 30.6040530296913, 0.95)
    pt3dadd(90.8497064908521, -181.310389155852, 30.7933582174512, 0.95)
    pt3dadd(91.1779186336408, -182.235829772647, 30.9826634052111, 0.95)
    pt3dadd(91.5061307764295, -183.161270389441, 31.171968592971, 0.95)
    pt3dadd(91.8343429192182, -184.086711006236, 31.3612737807309, 0.95)
    pt3dadd(92.1660817821767, -185.008443839769, 31.5562552653188, 0.95)
    pt3dadd(92.6391249916478, -185.781617710418, 31.9786677269241, 0.95)
    pt3dadd(93.1121682011189, -186.554791581066, 32.4010801885294, 0.95)
    pt3dadd(93.58521141059, -187.327965451715, 32.8234926501348, 0.95)
    pt3dadd(94.0582546200611, -188.101139322364, 33.2459051117401, 0.95)
    pt3dadd(94.5312978295322, -188.874313193012, 33.6683175733454, 0.95)
    pt3dadd(95.0043410390032, -189.647487063661, 34.0907300349508, 0.95)
    pt3dadd(95.4773842484743, -190.42066093431, 34.5131424965561, 0.95)
    pt3dadd(95.9504274579454, -191.193834804958, 34.9355549581615, 0.95)
    pt3dadd(96.4234706674165, -191.967008675607, 35.3579674197668, 0.95)
    pt3dadd(96.8965138768876, -192.740182546255, 35.7803798813721, 0.95)
    pt3dadd(97.3695570863587, -193.513356416904, 36.2027923429774, 0.95)
    pt3dadd(97.8414888903895, -194.29165439583, 36.6079311335396, 0.95)
    pt3dadd(98.2881989274831, -195.186236729728, 36.6210685091383, 0.95)
    pt3dadd(98.7349089645767, -196.080819063626, 36.6342058847371, 0.95)
    pt3dadd(99.1816190016704, -196.975401397524, 36.6473432603359, 0.95)
    pt3dadd(99.6283290387641, -197.869983731422, 36.6604806359347, 0.95)
    pt3dadd(100.075039075858, -198.76456606532, 36.6736180115335, 0.95)
    pt3dadd(100.521749112951, -199.659148399218, 36.6867553871322, 0.95)
    pt3dadd(100.968459150045, -200.553730733115, 36.699892762731, 0.95)
    pt3dadd(101.415169187139, -201.448313067013, 36.7130301383298, 0.95)
    pt3dadd(101.861879224232, -202.342895400911, 36.7261675139286, 0.95)
    pt3dadd(102.233905977393, -203.268694847389, 36.7463373750007, 0.95)
    pt3dadd(102.559723090907, -204.213809613804, 36.7708585259792, 0.95)
    pt3dadd(102.885540204421, -205.15892438022, 36.7953796769577, 0.95)
    pt3dadd(103.211357317935, -206.104039146635, 36.8199008279362, 0.95)
    pt3dadd(103.806105802501, -206.854761468558, 36.8616942524969, 0.95)
    pt3dadd(104.598011190422, -207.462972293063, 36.9161501937438, 0.95)
    pt3dadd(105.389916578343, -208.071183117568, 36.9706061349907, 0.95)
    pt3dadd(106.181821966263, -208.679393942073, 37.0250620762375, 0.95)
    pt3dadd(106.973727354184, -209.287604766578, 37.0795180174844, 0.95)
    pt3dadd(107.765632742105, -209.895815591083, 37.1339739587313, 0.95)
    pt3dadd(108.211661315747, -210.505741385126, 37.7298456235596, 0.984081282600486)
    pt3dadd(108.595693209783, -211.115974578833, 38.4227633341581, 1.0242714637185)
    pt3dadd(108.979725103818, -211.726207772541, 39.1156810447566, 1.06446164483651)
    pt3dadd(109.363756997854, -212.336440966248, 39.8085987553551, 1.10465182595453)
    pt3dadd(109.747788891889, -212.946674159956, 40.5015164659536, 1.14484200707254)
    pt3dadd(110.131820785924, -213.556907353663, 41.1944341765521, 1.18503218819056)
    pt3dadd(110.400864193552, -214.480189065213, 41.2693557477529, 1.19)
    pt3dadd(110.653689465605, -215.447623573817, 41.2571142864899, 1.19)
    pt3dadd(110.906514737657, -216.415058082421, 41.244872825227, 1.19)
    pt3dadd(111.15934000971, -217.382492591024, 41.2326313639641, 1.19)
    pt3dadd(111.320312173809, -218.363085152292, 41.2092779293464, 1.19)
    pt3dadd(111.35527971172, -219.361728006512, 41.1706810252369, 1.19)
    pt3dadd(111.39024724963, -220.360370860733, 41.1320841211275, 1.19)
    pt3dadd(111.42521478754, -221.359013714953, 41.0934872170181, 1.19)
  }
  GCL[11] {pt3dclear()
    pt3dadd(-5.03322603236772, 54.9229061105353, 1.92295077692007, 1.93695483882533)
    pt3dadd(-4.131016768486, 54.3027243988214, 1.69112182870219, 1.93695483882533)
    pt3dadd(-3.39922218818029, 53.6288505768911, 1.5892848788643, 1.79298132751468)
    pt3dadd(-2.66742760787457, 52.9549767549609, 1.48744792902642, 1.64900781620403)
    pt3dadd(-1.93563302756886, 52.2811029330306, 1.38561097918853, 1.50503430489338)
    pt3dadd(-1.31264605018989, 51.6202701006398, 1.05860530644264, 1.4108047952593)
    pt3dadd(-0.808086645117261, 50.9736312463361, 0.486523145509928, 1.37071728670694)
    pt3dadd(-0.303527240044633, 50.3269923920323, -0.0855590154227822, 1.33062977815458)
    pt3dadd(0.201032165027997, 49.6803535377285, -0.657641176355493, 1.29054226960221)
    pt3dadd(0.705591570100626, 49.0337146834247, -1.2297233372882, 1.25045476104985)
    pt3dadd(1.21015097517326, 48.3870758291209, -1.80180549822091, 1.21036725249749)
    pt3dadd(1.72577235470827, 47.6851387672523, -2.28047192766381, 1.19)
    pt3dadd(2.25281863797522, 46.9260892341764, -2.66265777464385, 1.19)
    pt3dadd(2.77986492124218, 46.1670397011006, -3.04484362162388, 1.19)
    pt3dadd(3.30691120450914, 45.4079901680248, -3.42702946860392, 1.19)
    pt3dadd(3.83395748777609, 44.6489406349489, -3.80921531558395, 1.19)
    pt3dadd(4.36100377104305, 43.8898911018731, -4.19140116256399, 1.19)
    pt3dadd(4.88805005431, 43.1308415687973, -4.57358700954402, 1.19)
    pt3dadd(5.41509633757696, 42.3717920357214, -4.95577285652406, 1.19)
    pt3dadd(5.94214262084392, 41.6127425026456, -5.33795870350409, 1.19)
    pt3dadd(6.46634690685204, 40.8549725073949, -5.72595979813411, 1.19)
    pt3dadd(6.9611950998764, 40.1104193550719, -6.17402884328938, 1.19)
    pt3dadd(7.45604329290076, 39.3658662027488, -6.62209788844465, 1.19)
  }
}
proc shape3d_12() {
  GCL[11] {
    pt3dadd(7.95089148592513, 38.6213130504258, -7.07016693359992, 1.19)
    pt3dadd(8.44573967894949, 37.8767598981027, -7.51823597875519, 1.19)
    pt3dadd(8.94058787197385, 37.1322067457797, -7.96630502391046, 1.19)
    pt3dadd(9.43543606499821, 36.3876535934567, -8.41437406906573, 1.19)
    pt3dadd(9.83481292613245, 35.5278902925901, -8.67662105254894, 1.19)
    pt3dadd(10.1796227608666, 34.6022781647232, -8.83266068410536, 1.19)
    pt3dadd(10.5244325956008, 33.6766660368563, -8.98870031566179, 1.19)
    pt3dadd(10.869242430335, 32.7510539089894, -9.1447399472182, 1.19)
    pt3dadd(11.2140522650692, 31.8254417811225, -9.30077957877462, 1.19)
    pt3dadd(11.5588620998033, 30.8998296532555, -9.45681921033104, 1.19)
    pt3dadd(11.8263458413612, 29.9525733915204, -9.57374436788293, 1.19)
    pt3dadd(11.9243372384157, 28.9578749942345, -9.60493386195145, 1.19)
    pt3dadd(12.0223286354702, 27.9631765969487, -9.63612335601997, 1.19)
    pt3dadd(12.1203200325247, 26.9684781996628, -9.66731285008849, 1.19)
    pt3dadd(12.2183114295792, 25.9737798023769, -9.69850234415701, 1.19)
    pt3dadd(12.3163028266336, 24.9790814050911, -9.72969183822553, 1.19)
    pt3dadd(12.4142942236881, 23.9843830078052, -9.76088133229405, 1.19)
    pt3dadd(12.5122856207426, 22.9896846105193, -9.79207082636257, 1.19)
    pt3dadd(12.6183587776079, 21.9958205152366, -9.82229642638013, 1.19)
    pt3dadd(12.7327694771631, 21.002817127118, -9.85152762567477, 1.19)
    pt3dadd(12.8471801767183, 20.0098137389994, -9.8807588249694, 1.19)
    pt3dadd(12.9615908762735, 19.0168103508807, -9.90999002426404, 1.19)
    pt3dadd(13.0760015758287, 18.0238069627621, -9.93922122355867, 1.19)
    pt3dadd(13.1946004428657, 17.1156349182225, -10.2259510919103, 1.19)
    pt3dadd(13.3176964861215, 16.2985531900596, -10.7891782340448, 1.19)
    pt3dadd(13.4407925293773, 15.4814714618967, -11.3524053761793, 1.19)
    pt3dadd(13.563888572633, 14.6643897337337, -11.9156325183139, 1.19)
    pt3dadd(13.6869846158888, 13.8473080055708, -12.4788596604484, 1.19)
    pt3dadd(13.8100806591446, 13.0302262774079, -13.042086802583, 1.19)
    pt3dadd(13.9810124582386, 12.0838586929004, -13.181695460544, 1.19)
    pt3dadd(14.1653653951759, 11.1012177545226, -13.2024507217229, 1.19)
    pt3dadd(14.3497183321131, 10.1185768161448, -13.2232059829017, 1.19)
    pt3dadd(14.5340712690503, 9.135935877767, -13.2439612440806, 1.19)
    pt3dadd(14.7184242059875, 8.15329493938919, -13.2647165052595, 1.19)
    pt3dadd(14.9027771429248, 7.17065400101137, -13.2854717664383, 1.19)
    pt3dadd(15.087130079862, 6.18801306263356, -13.3062270276172, 1.19)
    pt3dadd(15.2714830167992, 5.20537212425576, -13.3269822887961, 1.19)
    pt3dadd(15.4558359537364, 4.22273118587796, -13.3477375499749, 1.19)
    pt3dadd(15.5870945386948, 3.26591202675785, -13.5985771562722, 1.19)
    pt3dadd(15.7142619604858, 2.31108255407855, -13.867145815907, 1.19)
    pt3dadd(15.8414293822768, 1.35625308139926, -14.1357144755418, 1.19)
    pt3dadd(15.9685968040678, 0.401423608719967, -14.4042831351766, 1.19)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(15.9685968040678, 0.401423608719967, -14.4042831351766, 1.19)
    pt3dadd(16.0957642258587, -0.553405863959326, -14.6728517948114, 1.19)
    pt3dadd(16.2229316476497, -1.50823533663862, -14.9414204544462, 1.19)
    pt3dadd(16.3500990694407, -2.46306480931791, -15.209989114081, 1.19)
    pt3dadd(16.4772664912317, -3.41789428199721, -15.4785577737157, 1.19)
    pt3dadd(16.5863865442968, -4.38153265951458, -15.7007406340177, 1.19)
    pt3dadd(16.6239607582115, -5.38009249833797, -15.7390345857287, 1.19)
    pt3dadd(16.6615349721262, -6.3786523371614, -15.7773285374398, 1.19)
    pt3dadd(16.6991091860408, -7.37721217598481, -15.8156224891508, 1.19)
    pt3dadd(16.7366833999555, -8.37577201480822, -15.8539164408619, 1.19)
    pt3dadd(16.7742576138702, -9.37433185363164, -15.8922103925729, 1.19)
    pt3dadd(16.8118318277849, -10.3728916924551, -15.930504344284, 1.19)
    pt3dadd(16.8915191563467, -11.3166533598811, -16.1936989519428, 1.19)
    pt3dadd(16.9968383375165, -12.2270625036524, -16.5937777704465, 1.19)
    pt3dadd(17.1021575186863, -13.1374716474237, -16.9938565889503, 1.19)
    pt3dadd(17.2074766998561, -14.047880791195, -17.393935407454, 1.19)
    pt3dadd(17.3127958810259, -14.9582899349662, -17.7940142259578, 1.19)
    pt3dadd(17.4181150621958, -15.8686990787375, -18.1940930444615, 1.19)
    pt3dadd(17.5234342433656, -16.7791082225088, -18.5941718629653, 1.19)
    pt3dadd(17.6287534245354, -17.6895173662801, -18.994250681469, 1.19)
    pt3dadd(17.7340726057052, -18.5999265100514, -19.3943294999728, 1.19)
    pt3dadd(17.839391786875, -19.5103356538227, -19.7944083184766, 1.19)
    pt3dadd(17.9447109680448, -20.4207447975939, -20.1944871369803, 1.19)
    pt3dadd(17.9053921879807, -21.3806028911424, -20.459053115723, 1.19)
    pt3dadd(17.8413554079883, -22.3489115956275, -20.7004605381991, 1.19)
    pt3dadd(17.7773186279958, -23.3172203001126, -20.9418679606753, 1.19)
    pt3dadd(17.7132818480033, -24.2855290045977, -21.1832753831515, 1.19)
    pt3dadd(17.6492450680108, -25.2538377090828, -21.4246828056276, 1.19)
    pt3dadd(17.5852082880184, -26.2221464135679, -21.6660902281038, 1.19)
    pt3dadd(17.5211715080259, -27.190455118053, -21.9074976505799, 1.19)
    pt3dadd(17.4571347280334, -28.1587638225381, -22.1489050730561, 1.19)
    pt3dadd(17.406703219611, -29.1294872613216, -22.3830860504544, 1.19)
    pt3dadd(17.3737255515487, -30.1033084983913, -22.6079964140241, 1.19)
    pt3dadd(17.3407478834864, -31.0771297354611, -22.8329067775938, 1.19)
    pt3dadd(17.307770215424, -32.0509509725309, -23.0578171411635, 1.19)
    pt3dadd(17.2747925473617, -33.0247722096007, -23.2827275047333, 1.19)
    pt3dadd(17.2418148792994, -33.9985934466704, -23.507637868303, 1.19)
    pt3dadd(17.2088372112371, -34.9724146837402, -23.7325482318727, 1.19)
    pt3dadd(17.1758595431748, -35.94623592081, -23.9574585954424, 1.19)
    pt3dadd(17.221913824745, -36.9009979697334, -24.2468454168812, 1.17467293508234)
    pt3dadd(17.2867870328951, -37.8512216836662, -24.5515852409018, 1.15569622074174)
    pt3dadd(17.3516602410451, -38.8014453975989, -24.8563250649225, 1.13671950640115)
    pt3dadd(17.4165334491952, -39.7516691115317, -25.1610648889431, 1.11774279206056)
    pt3dadd(17.4814066573452, -40.7018928254645, -25.4658047129638, 1.09876607771996)
    pt3dadd(17.5462798654953, -41.6521165393972, -25.7705445369844, 1.07978936337937)
    pt3dadd(17.6111530736453, -42.60234025333, -26.0752843610051, 1.06081264903877)
    pt3dadd(17.6760262817954, -43.5525639672627, -26.3800241850257, 1.04183593469818)
    pt3dadd(17.7408994899454, -44.5027876811955, -26.6847640090464, 1.02285922035759)
    pt3dadd(17.8057726980955, -45.4530113951283, -26.9895038330671, 1.00388250601699)
    pt3dadd(17.8706459062456, -46.4032351090611, -27.2942436570877, 0.984905791676397)
    pt3dadd(17.9355191143956, -47.3534588229938, -27.5989834811084, 0.965929077335803)
    pt3dadd(18.0104400658395, -48.3087459211279, -27.8774507652256, 0.95)
    pt3dadd(18.1378775340881, -49.2904977978421, -28.018599425349, 0.95)
    pt3dadd(18.2653150023367, -50.2722496745562, -28.1597480854724, 0.95)
    pt3dadd(18.3927524705854, -51.2540015512703, -28.3008967455959, 0.95)
    pt3dadd(18.520189938834, -52.2357534279845, -28.4420454057193, 0.95)
    pt3dadd(18.6476274070827, -53.2175053046986, -28.5831940658427, 0.95)
    pt3dadd(18.7750648753313, -54.1992571814127, -28.7243427259662, 0.95)
    pt3dadd(18.90250234358, -55.1810090581269, -28.8654913860896, 0.95)
    pt3dadd(19.0299398118286, -56.162760934841, -29.006640046213, 0.95)
    pt3dadd(19.1573772800772, -57.1445128115552, -29.1477887063365, 0.95)
    pt3dadd(19.2848147483259, -58.1262646882693, -29.2889373664599, 0.95)
    pt3dadd(19.4122522165745, -59.1080165649835, -29.4300860265833, 0.95)
    pt3dadd(19.5905362821704, -60.0899242054533, -29.4699566691482, 0.95)
    pt3dadd(19.7786491041562, -61.0718619553913, -29.4902500535644, 0.95)
    pt3dadd(19.966761926142, -62.0537997053294, -29.5105434379806, 0.95)
    pt3dadd(20.1548747481279, -63.0357374552675, -29.5308368223968, 0.95)
    pt3dadd(20.3429875701137, -64.0176752052056, -29.551130206813, 0.95)
    pt3dadd(20.5311003920996, -64.9996129551437, -29.5714235912292, 0.95)
    pt3dadd(20.7196504680174, -65.9780131819833, -29.6067862383797, 0.95)
    pt3dadd(20.9190163727575, -66.8689099206065, -30.0148992584341, 0.95)
    pt3dadd(21.1183822774975, -67.7598066592296, -30.4230122784884, 0.95)
    pt3dadd(21.3177481822375, -68.6507033978527, -30.8311252985428, 0.95)
    pt3dadd(21.5171140869776, -69.5416001364758, -31.2392383185971, 0.95)
    pt3dadd(21.7164799917176, -70.4324968750989, -31.6473513386515, 0.95)
    pt3dadd(21.9158458964577, -71.323393613722, -32.0554643587058, 0.95)
    pt3dadd(22.1152118011977, -72.2142903523452, -32.4635773787601, 0.95)
    pt3dadd(22.3145777059377, -73.1051870909683, -32.8716903988145, 0.95)
    pt3dadd(22.5139436106778, -73.9960838295914, -33.2798034188688, 0.95)
    pt3dadd(22.7133095154178, -74.8869805682145, -33.6879164389232, 0.95)
    pt3dadd(22.8110515445112, -75.873434631253, -33.7530847686138, 0.95)
    pt3dadd(22.8990752875303, -76.8690268363793, -33.7854573149572, 0.95)
    pt3dadd(22.9870990305494, -77.8646190415056, -33.8178298613006, 0.95)
    pt3dadd(23.0751227735685, -78.8602112466318, -33.850202407644, 0.95)
    pt3dadd(23.1631465165876, -79.8558034517581, -33.8825749539874, 0.95)
    pt3dadd(23.2511702596068, -80.8513956568843, -33.9149475003307, 0.95)
    pt3dadd(23.3391940026259, -81.8469878620106, -33.9473200466742, 0.95)
    pt3dadd(23.427217745645, -82.8425800671368, -33.9796925930175, 0.95)
    pt3dadd(23.5152414886641, -83.8381722722631, -34.0120651393609, 0.95)
    pt3dadd(23.6032652316832, -84.8337644773893, -34.0444376857043, 0.95)
    pt3dadd(23.7780307300971, -85.8050988689446, -34.1886079696997, 0.95)
    pt3dadd(23.9746021243199, -86.7703351206495, -34.3608829399308, 0.95)
    pt3dadd(24.1711735185427, -87.7355713723543, -34.5331579101619, 0.95)
    pt3dadd(24.3677449127655, -88.7008076240591, -34.705432880393, 0.95)
    pt3dadd(24.5643163069882, -89.666043875764, -34.8777078506241, 0.95)
    pt3dadd(24.760887701211, -90.6312801274688, -35.0499828208551, 0.95)
    pt3dadd(24.9574590954338, -91.5965163791736, -35.2222577910862, 0.95)
    pt3dadd(25.1540304896566, -92.5617526308784, -35.3945327613173, 0.95)
    pt3dadd(25.3892197637959, -93.5227403404303, -35.5280565695411, 0.95)
    pt3dadd(25.6675026893558, -94.4789871062799, -35.6183379970001, 0.95)
    pt3dadd(25.9457856149156, -95.4352338721295, -35.7086194244591, 0.95)
    pt3dadd(26.2240685404754, -96.3914806379791, -35.7989008519181, 0.95)
    pt3dadd(26.5023514660353, -97.3477274038287, -35.8891822793771, 0.95)
    pt3dadd(26.7806343915951, -98.3039741696783, -35.9794637068362, 0.95)
    pt3dadd(27.062775020584, -99.2586051447394, -36.0603868560934, 0.95)
    pt3dadd(27.4377256057146, -100.174362869179, -35.9161653291336, 0.95)
    pt3dadd(27.8126761908453, -101.090120593619, -35.7719438021737, 0.95)
    pt3dadd(28.187626775976, -102.005878318059, -35.6277222752138, 0.95)
    pt3dadd(28.5625773611067, -102.921636042499, -35.483500748254, 0.95)
    pt3dadd(28.9375279462374, -103.837393766939, -35.3392792212941, 0.95)
    pt3dadd(29.3124785313681, -104.753151491379, -35.1950576943343, 0.95)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(29.3124785313681, -104.753151491379, -35.1950576943343, 0.95)
    pt3dadd(29.6008120798614, -105.702595205527, -35.1426991059164, 0.95)
    pt3dadd(29.8248324542539, -106.67705077652, -35.1585487752411, 0.95)
    pt3dadd(30.0488528286464, -107.651506347513, -35.1743984445658, 0.95)
    pt3dadd(30.2728732030389, -108.625961918506, -35.1902481138905, 0.95)
    pt3dadd(30.4968935774313, -109.600417489499, -35.2060977832153, 0.95)
    pt3dadd(30.7209139518238, -110.574873060492, -35.22194745254, 0.95)
    pt3dadd(30.95807994132, -111.546232068076, -35.236155045773, 0.95)
    pt3dadd(31.1961064401909, -112.517388375229, -35.2502551490286, 0.95)
    pt3dadd(31.4341329390618, -113.488544682382, -35.2643552522843, 0.95)
    pt3dadd(31.6721594379327, -114.459700989535, -35.2784553555399, 0.95)
    pt3dadd(31.9101859368035, -115.430857296688, -35.2925554587955, 0.95)
    pt3dadd(32.1482124356744, -116.402013603842, -35.3066555620511, 0.95)
  }
  adendMML[16] {pt3dclear()
    pt3dadd(32.1482124356744, -116.402013603842, -35.3066555620511, 0.95)
    pt3dadd(32.3862389345453, -117.373169910995, -35.3207556653068, 0.95)
    pt3dadd(32.6242654334162, -118.344326218148, -35.3348557685624, 0.95)
    pt3dadd(32.7467628731519, -119.335900406533, -35.3630971166973, 0.95)
    pt3dadd(32.8611735727071, -120.328903794651, -35.3923283159919, 0.95)
    pt3dadd(32.9755842722623, -121.32190718277, -35.4215595152866, 0.95)
    pt3dadd(33.0899949718176, -122.314910570889, -35.4507907145812, 0.95)
    pt3dadd(33.2044056713728, -123.307913959007, -35.4800219138758, 0.95)
    pt3dadd(33.318816370928, -124.300917347126, -35.5092531131705, 0.95)
    pt3dadd(33.4472785410557, -125.292070228157, -35.5367913581281, 0.95)
    pt3dadd(33.6002305937539, -126.279997916418, -35.561379004236, 0.95)
    pt3dadd(33.7531826464521, -127.26792560468, -35.5859666503439, 0.95)
    pt3dadd(33.9061346991503, -128.255853292942, -35.6105542964518, 0.95)
    pt3dadd(34.0590867518485, -129.243780981204, -35.6351419425597, 0.95)
    pt3dadd(34.2120388045467, -130.231708669466, -35.6597295886676, 0.95)
    pt3dadd(34.3649908572449, -131.219636357727, -35.6843172347755, 0.95)
    pt3dadd(34.5179429099431, -132.207564045989, -35.7089048808834, 0.95)
    pt3dadd(34.6708949626413, -133.195491734251, -35.7334925269912, 0.95)
    pt3dadd(34.8243904250187, -134.18333600703, -35.7580141961127, 0.95)
    pt3dadd(34.9805860712706, -135.170765791165, -35.782208027874, 0.95)
    pt3dadd(35.1367817175225, -136.1581955753, -35.8064018596353, 0.95)
    pt3dadd(35.2929773637743, -137.145625359435, -35.8305956913966, 0.95)
    pt3dadd(35.4491730100262, -138.13305514357, -35.8547895231579, 0.95)
    pt3dadd(35.605368656278, -139.120484927704, -35.8789833549192, 0.95)
    pt3dadd(35.7615643025299, -140.107914711839, -35.9031771866805, 0.95)
    pt3dadd(35.9177599487817, -141.095344495974, -35.9273710184418, 0.95)
    pt3dadd(36.0739555950336, -142.082774280109, -35.951564850203, 0.95)
    pt3dadd(36.2301512412855, -143.070204064244, -35.9757586819643, 0.95)
    pt3dadd(36.4535622318177, -144.044746668203, -35.9916820606152, 0.95)
    pt3dadd(36.678397309129, -145.019016232381, -36.0074302137569, 0.95)
    pt3dadd(36.9032323864404, -145.993285796559, -36.0231783668985, 0.95)
    pt3dadd(37.1280674637517, -146.967555360736, -36.0389265200402, 0.95)
    pt3dadd(37.3529025410631, -147.941824924914, -36.0546746731818, 0.95)
    pt3dadd(37.5777376183744, -148.916094489092, -36.0704228263235, 0.95)
    pt3dadd(37.8025726956857, -149.890364053269, -36.0861709794651, 0.95)
    pt3dadd(38.0274077729971, -150.864633617447, -36.1019191326068, 0.95)
    pt3dadd(38.2522428503084, -151.838903181625, -36.1176672857484, 0.95)
    pt3dadd(38.4770779276197, -152.813172745803, -36.1334154388901, 0.95)
    pt3dadd(38.6285328516014, -153.779752162873, -36.0043774727716, 0.95)
    pt3dadd(38.7073633703105, -154.738720634276, -35.7320445511938, 0.95)
    pt3dadd(38.7861938890196, -155.697689105679, -35.459711629616, 0.95)
    pt3dadd(38.8650244077287, -156.656657577082, -35.1873787080381, 0.95)
    pt3dadd(38.9438549264379, -157.615626048485, -34.9150457864603, 0.95)
    pt3dadd(39.022685445147, -158.574594519888, -34.6427128648825, 0.95)
    pt3dadd(39.1015159638561, -159.533562991291, -34.3703799433046, 0.95)
    pt3dadd(39.1803464825652, -160.492531462694, -34.0980470217268, 0.95)
    pt3dadd(39.2591770012744, -161.451499934097, -33.825714100149, 0.95)
    pt3dadd(39.3380075199835, -162.4104684055, -33.5533811785711, 0.95)
    pt3dadd(39.4168380386926, -163.369436876903, -33.2810482569933, 0.95)
    pt3dadd(39.4956685574017, -164.328405348306, -33.0087153354155, 0.95)
    pt3dadd(39.6891911235165, -165.295732339715, -32.9402097257594, 0.95)
    pt3dadd(39.9290650436307, -166.266437322263, -32.9540783704945, 0.95)
    pt3dadd(40.1689389637449, -167.23714230481, -32.9679470152296, 0.95)
    pt3dadd(40.4088128838592, -168.207847287357, -32.9818156599647, 0.95)
    pt3dadd(40.6486868039734, -169.178552269905, -32.9956843046998, 0.95)
    pt3dadd(40.8885607240876, -170.149257252452, -33.0095529494349, 0.95)
    pt3dadd(41.1284346442018, -171.119962234999, -33.0234215941701, 0.95)
    pt3dadd(41.368308564316, -172.090667217547, -33.0372902389052, 0.95)
    pt3dadd(41.6081824844302, -173.061372200094, -33.0511588836403, 0.95)
    pt3dadd(41.8480564045445, -174.032077182641, -33.0650275283754, 0.95)
    pt3dadd(42.0879303246587, -175.002782165189, -33.0788961731106, 0.95)
    pt3dadd(42.2746970160095, -175.984550315449, -33.0993369407836, 0.95)
    pt3dadd(42.4466718125276, -176.969399876982, -33.121608234236, 0.95)
    pt3dadd(42.6186466090457, -177.954249438514, -33.1438795276885, 0.95)
    pt3dadd(42.7906214055638, -178.939099000046, -33.1661508211409, 0.95)
    pt3dadd(42.9625962020819, -179.923948561579, -33.1884221145934, 0.95)
    pt3dadd(43.1345709986, -180.908798123111, -33.2106934080458, 0.95)
    pt3dadd(43.306545795118, -181.893647684644, -33.2329647014983, 0.95)
    pt3dadd(43.4785205916361, -182.878497246176, -33.2552359949507, 0.95)
    pt3dadd(43.6504953881542, -183.863346807708, -33.2775072884032, 0.95)
    pt3dadd(43.8224701846723, -184.848196369241, -33.2997785818556, 0.95)
    pt3dadd(43.9944449811904, -185.833045930773, -33.3220498753081, 0.95)
    pt3dadd(44.1664197777085, -186.817895492305, -33.3443211687605, 0.95)
    pt3dadd(44.2810005242565, -187.809965880418, -33.3734930236789, 0.95)
    pt3dadd(44.3648602563276, -188.805901322801, -33.4063585062259, 0.95)
    pt3dadd(44.4487199883988, -189.801836765183, -33.439223988773, 0.95)
    pt3dadd(44.5325797204699, -190.797772207566, -33.47208947132, 0.95)
    pt3dadd(44.6164394525411, -191.793707649949, -33.5049549538671, 0.95)
    pt3dadd(44.7002991846122, -192.789643092331, -33.5378204364141, 0.95)
    pt3dadd(44.7841589166834, -193.785578534714, -33.5706859189611, 0.95)
    pt3dadd(44.8680186487545, -194.781513977097, -33.6035514015082, 0.95)
    pt3dadd(44.9518783808256, -195.777449419479, -33.6364168840552, 0.95)
    pt3dadd(45.0553588387659, -196.771065650123, -33.6669297119493, 0.95)
  }
}
proc shape3d_13() {
  adendMML[16] {
    pt3dadd(45.2127398016844, -197.758310725862, -33.6909795132113, 0.95)
    pt3dadd(45.3701207646028, -198.7455558016, -33.7150293144733, 0.95)
    pt3dadd(45.5275017275212, -199.732800877339, -33.7390791157353, 0.95)
    pt3dadd(45.6848826904396, -200.720045953078, -33.7631289169972, 0.95)
    pt3dadd(45.842263653358, -201.707291028816, -33.7871787182592, 0.95)
    pt3dadd(45.9996446162764, -202.694536104555, -33.8112285195212, 0.95)
    pt3dadd(46.1570255791949, -203.681781180293, -33.8352783207832, 0.95)
    pt3dadd(46.3144065421133, -204.669026256032, -33.8593281220452, 0.95)
    pt3dadd(46.4717875050317, -205.656271331771, -33.8833779233072, 0.95)
    pt3dadd(46.6227055565844, -206.643735186961, -33.9196129367903, 0.95)
    pt3dadd(46.7455741156025, -207.632148560451, -34.0087326333343, 0.95)
    pt3dadd(46.8684426746207, -208.62056193394, -34.0978523298784, 0.95)
    pt3dadd(46.9913112336389, -209.608975307429, -34.1869720264225, 0.95)
    pt3dadd(47.1141797926571, -210.597388680919, -34.2760917229666, 0.95)
    pt3dadd(47.2370483516752, -211.585802054408, -34.3652114195107, 0.95)
    pt3dadd(47.3599169106934, -212.574215427898, -34.4543311160547, 0.95)
    pt3dadd(47.4827854697116, -213.562628801387, -34.5434508125988, 0.95)
    pt3dadd(47.6056540287297, -214.551042174876, -34.6325705091429, 0.95)
    pt3dadd(47.7285225877479, -215.539455548366, -34.721690205687, 0.95)
    pt3dadd(47.8513911467661, -216.527868921855, -34.810809902231, 0.95)
    pt3dadd(47.9742597057843, -217.516282295345, -34.8999295987751, 0.95)
    pt3dadd(48.0959563709664, -218.508323975799, -34.9303208124519, 0.95)
    pt3dadd(48.2176125696757, -219.500490944723, -34.9586840825673, 0.95)
    pt3dadd(48.339268768385, -220.492657913647, -34.9870473526827, 0.95)
    pt3dadd(48.4609249670944, -221.484824882571, -35.0154106227981, 0.95)
    pt3dadd(48.5825811658037, -222.476991851495, -35.0437738929135, 0.95)
    pt3dadd(48.7042373645129, -223.469158820419, -35.0721371630288, 0.95)
    pt3dadd(48.8258935632223, -224.461325789343, -35.1005004331442, 0.95)
    pt3dadd(48.9475497619316, -225.453492758267, -35.1288637032596, 0.95)
    pt3dadd(49.0692059606409, -226.445659727191, -35.157226973375, 0.95)
    pt3dadd(49.1807663808353, -227.43890939195, -35.186796072591, 0.95)
    pt3dadd(49.2792864749582, -228.433557532982, -35.2179226945512, 0.95)
    pt3dadd(49.3778065690811, -229.428205674015, -35.2490493165114, 0.95)
    pt3dadd(49.476326663204, -230.422853815047, -35.2801759384716, 0.95)
    pt3dadd(49.574846757327, -231.41750195608, -35.3113025604318, 0.95)
    pt3dadd(49.6733668514499, -232.412150097112, -35.3424291823921, 0.95)
    pt3dadd(49.7718869455728, -233.406798238145, -35.3735558043523, 0.95)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(49.7718869455728, -233.406798238145, -35.3735558043523, 0.95)
    pt3dadd(49.8704070396957, -234.401446379177, -35.4046824263125, 0.95)
    pt3dadd(49.8403559336319, -235.38451824768, -35.4500831179867, 0.95)
    pt3dadd(49.5770287246916, -236.346586440885, -35.5213822950932, 0.95)
    pt3dadd(49.3137015157512, -237.308654634089, -35.5926814721997, 0.95)
    pt3dadd(49.0503743068108, -238.270722827294, -35.6639806493063, 0.95)
    pt3dadd(48.7870470978704, -239.232791020498, -35.7352798264128, 0.95)
    pt3dadd(48.52371988893, -240.194859213702, -35.8065790035194, 0.95)
    pt3dadd(48.2603926799896, -241.156927406907, -35.8778781806259, 0.95)
    pt3dadd(48.0201650791013, -242.125168134028, -35.9467874627238, 0.95)
    pt3dadd(47.7820219888393, -243.093965871142, -36.0154810804896, 0.95)
    pt3dadd(47.5438788985773, -244.062763608257, -36.0841746982554, 0.95)
    pt3dadd(47.3057358083152, -245.031561345372, -36.1528683160213, 0.95)
    pt3dadd(47.0675927180532, -246.000359082487, -36.2215619337871, 0.95)
    pt3dadd(46.8294496277912, -246.969156819602, -36.2902555515529, 0.95)
    pt3dadd(46.5913065375292, -247.937954556716, -36.3589491693188, 0.95)
    pt3dadd(46.6028649213116, -248.920477416993, -36.3995470528694, 0.95)
    pt3dadd(46.7440164538573, -249.910123510862, -36.4255634659754, 0.95)
    pt3dadd(46.885167986403, -250.89976960473, -36.4515798790814, 0.95)
    pt3dadd(47.0263195189486, -251.889415698599, -36.4775962921874, 0.95)
    pt3dadd(47.1077356950749, -252.864619844182, -36.5812326504155, 0.95)
    pt3dadd(46.9965225382952, -253.793252862869, -36.9351709930172, 0.95)
    pt3dadd(46.8853093815156, -254.721885881556, -37.289109335619, 0.95)
    pt3dadd(46.7740962247359, -255.650518900243, -37.6430476782207, 0.95)
    pt3dadd(46.6628830679563, -256.579151918929, -37.9969860208224, 0.95)
    pt3dadd(46.5516699111766, -257.507784937616, -38.3509243634242, 0.95)
    pt3dadd(46.431389553603, -258.453620426563, -38.619347573511, 0.95)
    pt3dadd(46.2888545289975, -259.441677904024, -38.6778812219173, 0.95)
    pt3dadd(46.1463195043919, -260.429735381484, -38.7364148703235, 0.95)
    pt3dadd(46.0037844797864, -261.417792858944, -38.7949485187298, 0.95)
    pt3dadd(45.8612494551809, -262.405850336404, -38.853482167136, 0.95)
    pt3dadd(45.7187144305753, -263.393907813864, -38.9120158155422, 0.95)
    pt3dadd(45.5761794059698, -264.381965291324, -38.9705494639485, 0.95)
    pt3dadd(45.4336443813643, -265.370022768785, -39.0290831123547, 0.95)
    pt3dadd(45.2835806230283, -266.27661051685, -38.6671979139798, 0.95)
    pt3dadd(45.1325065015352, -267.172264950503, -38.2488921104181, 0.95)
    pt3dadd(45.0055608241374, -268.084505398798, -37.9045110852345, 0.95)
    pt3dadd(45.0049558349406, -269.083593075874, -37.9472129294849, 0.95)
    pt3dadd(45.0043508457439, -270.08268075295, -37.9899147737353, 0.95)
    pt3dadd(45.0037458565471, -271.081768430027, -38.0326166179856, 0.95)
    pt3dadd(45.0031408673503, -272.080856107103, -38.075318462236, 0.95)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(29.3124785313681, -104.753151491379, -35.1950576943343, 0.95)
    pt3dadd(29.7397690725612, -105.599114446201, -34.9098291172175, 0.95)
    pt3dadd(30.2059220458733, -106.393254764923, -34.5199027656417, 0.95)
    pt3dadd(30.6720750191854, -107.187395083644, -34.1299764140659, 0.95)
    pt3dadd(31.1382279924975, -107.981535402366, -33.7400500624901, 0.95)
    pt3dadd(31.6043809658096, -108.775675721087, -33.3501237109142, 0.95)
    pt3dadd(32.0705339391217, -109.569816039809, -32.9601973593384, 0.95)
    pt3dadd(32.5366869124338, -110.36395635853, -32.5702710077626, 0.95)
    pt3dadd(33.0028398857459, -111.158096677252, -32.1803446561868, 0.95)
    pt3dadd(33.3964319279295, -112.07058181187, -32.1474373699832, 0.95)
    pt3dadd(33.7843997704479, -112.992239856257, -32.1422026408535, 0.95)
    pt3dadd(34.1723676129662, -113.913897900643, -32.1369679117238, 0.95)
    pt3dadd(34.5603354554846, -114.83555594503, -32.1317331825941, 0.95)
    pt3dadd(34.948303298003, -115.757213989416, -32.1264984534644, 0.95)
    pt3dadd(35.3362711405213, -116.678872033803, -32.1212637243347, 0.95)
  }
  adendMML[17] {pt3dclear()
    pt3dadd(35.3362711405213, -116.678872033803, -32.1212637243347, 0.95)
    pt3dadd(35.7242389830397, -117.60053007819, -32.1160289952049, 0.95)
    pt3dadd(36.112206825558, -118.522188122576, -32.1107942660752, 0.95)
    pt3dadd(36.6458089115358, -119.36439272432, -32.085441204043, 0.95)
    pt3dadd(37.2071405786269, -120.191468942586, -32.0562574979889, 0.95)
    pt3dadd(37.768472245718, -121.018545160853, -32.0270737919347, 0.95)
    pt3dadd(38.3298039128091, -121.845621379119, -31.9978900858806, 0.95)
    pt3dadd(38.8911355799002, -122.672697597385, -31.9687063798265, 0.95)
    pt3dadd(39.4524672469912, -123.499773815652, -31.9395226737724, 0.95)
    pt3dadd(40.0137989140823, -124.326850033918, -31.9103389677182, 0.95)
    pt3dadd(40.5751305811734, -125.153926252184, -31.8811552616641, 0.95)
    pt3dadd(41.051049213093, -126.027214210589, -31.8637542476391, 0.95)
    pt3dadd(41.4326557389287, -126.95152864908, -31.8593635487066, 0.95)
    pt3dadd(41.8142622647644, -127.875843087571, -31.8549728497741, 0.95)
    pt3dadd(42.1958687906001, -128.800157526061, -31.8505821508417, 0.95)
    pt3dadd(42.5774753164359, -129.724471964552, -31.8461914519092, 0.95)
    pt3dadd(42.9590818422716, -130.648786403043, -31.8418007529767, 0.95)
    pt3dadd(43.3406883681073, -131.573100841534, -31.8374100540442, 0.95)
    pt3dadd(43.722294893943, -132.497415280024, -31.8330193551118, 0.95)
    pt3dadd(44.1516984120435, -133.399673260958, -31.8221973839243, 0.95)
    pt3dadd(44.6053375900014, -134.290747425136, -31.8081144099115, 0.95)
    pt3dadd(45.0589767679592, -135.181821589313, -31.7940314358986, 0.95)
    pt3dadd(45.512615945917, -136.072895753491, -31.7799484618857, 0.95)
    pt3dadd(45.9662551238748, -136.963969917668, -31.7658654878729, 0.95)
    pt3dadd(46.4198943018326, -137.855044081846, -31.75178251386, 0.95)
    pt3dadd(46.8735334797905, -138.746118246024, -31.7376995398472, 0.95)
    pt3dadd(47.3271726577483, -139.637192410201, -31.7236165658343, 0.95)
    pt3dadd(47.7808118357061, -140.528266574379, -31.7095335918214, 0.95)
    pt3dadd(48.2495634100398, -141.411133857541, -31.6933645679618, 0.95)
    pt3dadd(48.746309169345, -142.278798724125, -31.6733313478609, 0.95)
    pt3dadd(49.2430549286501, -143.146463590709, -31.65329812776, 0.95)
    pt3dadd(49.7398006879553, -144.014128457293, -31.6332649076591, 0.95)
    pt3dadd(50.2365464472604, -144.881793323878, -31.6132316875583, 0.95)
    pt3dadd(50.7332922065656, -145.749458190462, -31.5931984674574, 0.95)
    pt3dadd(51.2300379658707, -146.617123057046, -31.5731652473565, 0.95)
    pt3dadd(51.6709083424254, -147.514555437806, -31.5608202464973, 0.95)
    pt3dadd(52.1104594228569, -148.412690671309, -31.5486567752732, 0.95)
    pt3dadd(52.5500105032885, -149.310825904812, -31.5364933040491, 0.95)
    pt3dadd(52.98956158372, -150.208961138314, -31.524329832825, 0.95)
    pt3dadd(53.4291126641516, -151.107096371817, -31.5121663616009, 0.95)
    pt3dadd(53.8686637445831, -152.00523160532, -31.5000028903768, 0.95)
    pt3dadd(54.3082148250147, -152.903366838823, -31.4878394191527, 0.95)
    pt3dadd(54.7477659054462, -153.801502072326, -31.4756759479286, 0.95)
    pt3dadd(55.1873169858778, -154.699637305829, -31.4635124767045, 0.95)
    pt3dadd(55.6268680663093, -155.597772539332, -31.4513490054804, 0.95)
    pt3dadd(56.0497964558251, -156.50311989856, -31.4218805687797, 0.95)
    pt3dadd(56.4565904824609, -157.415467511488, -31.375615537951, 0.95)
    pt3dadd(56.8633845090966, -158.327815124416, -31.3293505071225, 0.95)
    pt3dadd(57.2701785357324, -159.240162737345, -31.2830854762939, 0.95)
    pt3dadd(57.6769725623681, -160.152510350273, -31.2368204454653, 0.95)
    pt3dadd(58.0837665890039, -161.064857963201, -31.1905554146367, 0.95)
    pt3dadd(58.4905606156396, -161.977205576129, -31.1442903838081, 0.95)
    pt3dadd(58.8973546422754, -162.889553189058, -31.0980253529795, 0.95)
    pt3dadd(59.3041486689112, -163.801900801986, -31.0517603221509, 0.95)
    pt3dadd(59.7109426955469, -164.714248414914, -31.0054952913223, 0.95)
    pt3dadd(60.1177367221827, -165.626596027842, -30.9592302604937, 0.95)
    pt3dadd(60.5245307488184, -166.538943640771, -30.9129652296651, 0.95)
    pt3dadd(61.0290195328225, -167.401974874537, -30.8912525532729, 0.95)
    pt3dadd(61.5350360882946, -168.264234888239, -30.8699238318399, 0.95)
    pt3dadd(62.0410526437666, -169.126494901942, -30.848595110407, 0.95)
    pt3dadd(62.5470691992387, -169.988754915644, -30.827266388974, 0.95)
    pt3dadd(63.0530857547108, -170.851014929347, -30.8059376675411, 0.95)
    pt3dadd(63.5591023101829, -171.713274943049, -30.7846089461081, 0.95)
    pt3dadd(64.0651188656549, -172.575534956752, -30.7632802246751, 0.95)
    pt3dadd(64.571135421127, -173.437794970454, -30.7419515032422, 0.95)
    pt3dadd(65.0771519765991, -174.300054984157, -30.7206227818092, 0.95)
    pt3dadd(65.5831685320711, -175.162314997859, -30.6992940603763, 0.95)
    pt3dadd(66.0891850875432, -176.024575011562, -30.6779653389433, 0.95)
    pt3dadd(66.5862179054323, -176.89175651977, -30.6578785209762, 0.95)
    pt3dadd(67.0367478812618, -177.784413335956, -30.644220212323, 0.95)
    pt3dadd(67.4872778570914, -178.677070152143, -30.6305619036699, 0.95)
    pt3dadd(67.937807832921, -179.569726968329, -30.6169035950167, 0.95)
    pt3dadd(68.3883378087505, -180.462383784515, -30.6032452863636, 0.95)
    pt3dadd(68.8388677845801, -181.355040600701, -30.5895869777104, 0.95)
    pt3dadd(69.2893977604096, -182.247697416888, -30.5759286690572, 0.95)
    pt3dadd(69.7399277362392, -183.140354233074, -30.5622703604041, 0.95)
    pt3dadd(70.1904577120687, -184.03301104926, -30.5486120517509, 0.95)
    pt3dadd(70.6409876878983, -184.925667865446, -30.5349537430977, 0.95)
    pt3dadd(71.0915176637279, -185.818324681633, -30.5212954344446, 0.95)
    pt3dadd(71.5420476395574, -186.710981497819, -30.5076371257914, 0.95)
    pt3dadd(71.9594431049232, -187.609544351431, -30.4492312955234, 0.955813177583419)
    pt3dadd(72.218786205917, -188.536279137151, -30.1773787750221, 0.989355343726267)
    pt3dadd(72.4781293069108, -189.463013922871, -29.9055262545208, 1.02289750986911)
    pt3dadd(72.7374724079046, -190.389748708592, -29.6336737340195, 1.05643967601196)
    pt3dadd(72.9968155088984, -191.316483494312, -29.3618212135182, 1.08998184215481)
    pt3dadd(73.2561586098923, -192.243218280032, -29.0899686930169, 1.12352400829766)
    pt3dadd(73.5155017108861, -193.169953065753, -28.8181161725156, 1.15706617444051)
    pt3dadd(73.7752997271619, -194.097266914251, -28.551343529128, 1.19)
    pt3dadd(74.0597255604061, -195.055929571382, -28.5595809562562, 1.19)
    pt3dadd(74.3441513936503, -196.014592228513, -28.5678183833844, 1.19)
    pt3dadd(74.6285772268945, -196.973254885644, -28.5760558105125, 1.19)
    pt3dadd(74.9130030601387, -197.931917542776, -28.5842932376407, 1.19)
    pt3dadd(75.197428893383, -198.890580199907, -28.5925306647689, 1.19)
    pt3dadd(75.4818547266272, -199.849242857038, -28.6007680918971, 1.19)
    pt3dadd(75.9457268211115, -200.707594327335, -28.6071663421911, 1.19)
    pt3dadd(76.6134479587428, -201.451993356876, -28.6114753071736, 1.19)
    pt3dadd(77.2811690963741, -202.196392386417, -28.6157842721561, 1.19)
    pt3dadd(77.9488902340054, -202.940791415957, -28.6200932371386, 1.19)
    pt3dadd(78.6166113716368, -203.685190445498, -28.6244022021211, 1.19)
    pt3dadd(79.2843325092681, -204.429589475039, -28.6287111671036, 1.19)
    pt3dadd(79.9040839766285, -205.212287341312, -28.6291465776962, 1.19)
    pt3dadd(80.482090913236, -206.028313912135, -28.6262111143714, 1.19)
    pt3dadd(81.0600978498434, -206.844340482957, -28.6232756510466, 1.19)
    pt3dadd(81.6381047864509, -207.66036705378, -28.6203401877217, 1.19)
    pt3dadd(82.2161117230584, -208.476393624603, -28.6174047243969, 1.19)
    pt3dadd(82.7941186596658, -209.292420195426, -28.614469261072, 1.19)
    pt3dadd(83.3721255962733, -210.108446766248, -28.6115337977472, 1.19)
    pt3dadd(83.9501325328808, -210.924473337071, -28.6085983344223, 1.19)
    pt3dadd(84.5370284025567, -211.720209039211, -28.5661709031161, 1.19)
    pt3dadd(85.2130492860944, -212.312498057847, -28.1277766930456, 1.19)
    pt3dadd(85.8890701696321, -212.904787076484, -27.6893824829753, 1.19)
    pt3dadd(86.5650910531697, -213.497076095121, -27.2509882729048, 1.19)
    pt3dadd(87.2411119367074, -214.089365113758, -26.8125940628344, 1.19)
    pt3dadd(87.9171328202451, -214.681654132394, -26.374199852764, 1.19)
    pt3dadd(88.5931537037827, -215.273943151031, -25.9358056426936, 1.19)
    pt3dadd(89.2691745873204, -215.866232169668, -25.4974114326232, 1.19)
    pt3dadd(89.9451954708581, -216.458521188305, -25.0590172225528, 1.19)
    pt3dadd(90.6212163543957, -217.050810206941, -24.6206230124824, 1.19)
    pt3dadd(91.2972372379334, -217.643099225578, -24.182228802412, 1.19)
    pt3dadd(91.8623446894022, -218.373686319949, -23.9331703469941, 1.19)
    pt3dadd(92.2875396987889, -219.278730386303, -23.9229506626135, 1.19)
    pt3dadd(92.7127347081756, -220.183774452658, -23.9127309782329, 1.19)
    pt3dadd(93.1379297175623, -221.088818519013, -23.9025112938523, 1.19)
    pt3dadd(93.563124726949, -221.993862585367, -23.8922916094717, 1.19)
    pt3dadd(93.9883197363357, -222.898906651722, -23.8820719250911, 1.19)
    pt3dadd(94.4135147457224, -223.803950718077, -23.8718522407105, 1.19)
    pt3dadd(94.8387097551091, -224.708994784431, -23.8616325563299, 1.19)
    pt3dadd(95.2639047644958, -225.614038850786, -23.8514128719493, 1.19)
    pt3dadd(95.8096516320645, -226.447620894616, -23.8242968910562, 1.19)
    pt3dadd(96.3951248768308, -227.257653510797, -23.7916129441556, 1.19)
    pt3dadd(96.980598121597, -228.067686126979, -23.7589289972551, 1.19)
    pt3dadd(97.5660713663633, -228.87771874316, -23.7262450503545, 1.19)
    pt3dadd(98.1515446111296, -229.687751359342, -23.6935611034539, 1.19)
    pt3dadd(98.7370178558958, -230.497783975523, -23.6608771565534, 1.19)
    pt3dadd(99.3224911006621, -231.307816591705, -23.6281932096528, 1.19)
    pt3dadd(99.9079643454283, -232.117849207886, -23.5955092627523, 1.19)
    pt3dadd(100.493437590195, -232.927881824068, -23.5628253158517, 1.19)
    pt3dadd(100.889172382831, -233.828357120711, -23.7216515103695, 1.19)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(100.889172382831, -233.828357120711, -23.7216515103695, 1.19)
    pt3dadd(101.267747758645, -234.737011801318, -23.8977973483521, 1.19)
    pt3dadd(101.646323134458, -235.645666481925, -24.0739431863347, 1.19)
    pt3dadd(102.024898510272, -236.554321162532, -24.2500890243172, 1.19)
    pt3dadd(102.403473886085, -237.462975843139, -24.4262348622998, 1.19)
    pt3dadd(102.782049261899, -238.371630523746, -24.6023807002824, 1.19)
    pt3dadd(103.303321605049, -239.2196149629, -24.6757844713313, 1.19)
    pt3dadd(103.840305073365, -240.060919528088, -24.7378762046869, 1.19)
    pt3dadd(104.37728854168, -240.902224093275, -24.7999679380425, 1.19)
    pt3dadd(104.914272009995, -241.743528658462, -24.8620596713981, 1.19)
    pt3dadd(105.45125547831, -242.58483322365, -24.9241514047538, 1.19)
    pt3dadd(105.988238946626, -243.426137788837, -24.9862431381094, 1.19)
    pt3dadd(106.451288112501, -244.307023211457, -25.016318525296, 1.19)
    pt3dadd(106.834312031437, -245.230750289245, -25.0117399572316, 1.19)
    pt3dadd(107.217335950372, -246.154477367032, -25.0071613891672, 1.19)
    pt3dadd(107.600359869308, -247.078204444819, -25.0025828211028, 1.19)
    pt3dadd(107.983383788244, -248.001931522607, -24.9980042530385, 1.19)
    pt3dadd(108.36640770718, -248.925658600394, -24.9934256849741, 1.19)
  }
}
proc shape3d_14() {
  adendOML[9] {
  }
  GCL[12] {pt3dclear()
    pt3dadd(-7.24697374959139, 61.9745347637312, -2.29870528875004, 2.22272743499379)
    pt3dadd(-7.63758476686191, 61.5401175452849, -1.436592797226, 2.22272743499379)
    pt3dadd(-7.92465685388072, 61.0609488147459, -0.60714301301459, 2.1023749820137)
    pt3dadd(-8.21172894089953, 60.581780084207, 0.222306771196817, 1.98202252903361)
    pt3dadd(-8.49880102791833, 60.102611353668, 1.05175655540823, 1.86167007605352)
    pt3dadd(-8.78587311493714, 59.6234426231291, 1.88120633961963, 1.74131762307343)
    pt3dadd(-9.07294520195595, 59.1442738925901, 2.71065612383104, 1.62096517009334)
    pt3dadd(-9.36001728897476, 58.6651051620511, 3.54010590804245, 1.50061271711325)
    pt3dadd(-9.79682782872622, 58.1628138313017, 4.25006373323025, 1.43)
    pt3dadd(-10.4462136630489, 57.6276966401184, 4.79038551687515, 1.43)
    pt3dadd(-11.0955994973715, 57.0925794489352, 5.33070730052004, 1.43)
    pt3dadd(-11.772317512657, 56.5669531376837, 5.82813618070033, 1.43)
    pt3dadd(-12.6362331361754, 56.1063296897486, 6.03179234842714, 1.43)
    pt3dadd(-13.5001487596939, 55.6457062418135, 6.23544851615394, 1.43)
    pt3dadd(-14.3640643832123, 55.1850827938785, 6.43910468388074, 1.43)
    pt3dadd(-15.2279800067307, 54.7244593459434, 6.64276085160754, 1.43)
    pt3dadd(-16.0918956302491, 54.2638358980083, 6.84641701933434, 1.43)
    pt3dadd(-16.9558112537676, 53.8032124500732, 7.05007318706115, 1.43)
    pt3dadd(-17.8182626288051, 53.3427337268278, 7.25997839161875, 1.43)
    pt3dadd(-18.6779863971389, 52.8825245971925, 7.48152432176013, 1.43)
    pt3dadd(-19.5377101654727, 52.4223154675571, 7.7030702519015, 1.43)
    pt3dadd(-20.3974339338065, 51.9621063379217, 7.92461618204288, 1.43)
    pt3dadd(-21.2571577021402, 51.5018972082863, 8.14616211218426, 1.43)
    pt3dadd(-22.116881470474, 51.0416880786509, 8.36770804232563, 1.43)
    pt3dadd(-22.9795896803038, 50.5809758437771, 8.49586107359391, 1.43)
    pt3dadd(-23.8515456466034, 50.1187046590195, 8.33462167215235, 1.43)
    pt3dadd(-24.723501612903, 49.6564334742618, 8.17338227071079, 1.43)
    pt3dadd(-25.5954575792027, 49.1941622895042, 8.01214286926923, 1.43)
    pt3dadd(-26.4674135455023, 48.7318911047466, 7.85090346782767, 1.43)
    pt3dadd(-27.339369511802, 48.269619919989, 7.68966406638611, 1.43)
    pt3dadd(-28.2113254781016, 47.8073487352314, 7.52842466494455, 1.43)
    pt3dadd(-29.0832814444013, 47.3450775504737, 7.36718526350299, 1.43)
    pt3dadd(-29.693332300672, 46.6079018069001, 7.61810663103685, 1.43)
    pt3dadd(-30.2854957171214, 45.8519507948641, 7.89717751024291, 1.43)
    pt3dadd(-30.8776591335707, 45.0959997828282, 8.17624838944897, 1.43)
    pt3dadd(-31.4698225500201, 44.3400487707923, 8.45531926865504, 1.43)
    pt3dadd(-32.0619859664695, 43.5840977587563, 8.7343901478611, 1.43)
    pt3dadd(-32.6541493829189, 42.8281467467204, 9.01346102706716, 1.43)
    pt3dadd(-33.3490632849287, 42.154837680932, 9.26337795173261, 1.43)
    pt3dadd(-34.0512513589062, 41.4873792125931, 9.51123093599227, 1.43)
    pt3dadd(-34.7534394328837, 40.8199207442541, 9.75908392025192, 1.43)
    pt3dadd(-35.4556275068612, 40.1524622759151, 10.0069369045116, 1.43)
    pt3dadd(-36.1578155808386, 39.4850038075762, 10.2547898887712, 1.43)
    pt3dadd(-36.8600036548161, 38.8175453392372, 10.5026428730309, 1.43)
    pt3dadd(-37.4995317475847, 38.0755038828419, 10.5006185849634, 1.43)
    pt3dadd(-38.1038876900946, 37.2915976826011, 10.3583337861367, 1.43)
    pt3dadd(-38.7082436326045, 36.5076914823604, 10.21604898731, 1.43)
    pt3dadd(-39.3125995751144, 35.7237852821197, 10.0737641884833, 1.43)
    pt3dadd(-39.8685768729376, 34.9153363857257, 10.0422608899509, 1.43)
    pt3dadd(-40.30911230665, 34.0483233312698, 10.2751061068802, 1.43)
    pt3dadd(-40.7496477403625, 33.1813102768139, 10.5079513238095, 1.43)
    pt3dadd(-41.1901831740749, 32.314297222358, 10.7407965407388, 1.43)
    pt3dadd(-41.6307186077873, 31.4472841679021, 10.9736417576681, 1.43)
    pt3dadd(-42.0712540414997, 30.5802711134462, 11.2064869745974, 1.43)
    pt3dadd(-42.5117894752122, 29.7132580589903, 11.4393321915267, 1.43)
    pt3dadd(-42.9523249089246, 28.8462450045344, 11.672177408456, 1.43)
    pt3dadd(-43.2870861396683, 27.9153222696308, 11.7318556106211, 1.43)
    pt3dadd(-43.5803497849424, 26.9593263377448, 11.7235965200059, 1.43)
    pt3dadd(-43.8736134302166, 26.0033304058587, 11.7153374293907, 1.43)
    pt3dadd(-44.1668770754907, 25.0473344739726, 11.7070783387754, 1.43)
    pt3dadd(-44.4601407207649, 24.0913385420866, 11.6988192481602, 1.43)
    pt3dadd(-44.753404366039, 23.1353426102005, 11.690560157545, 1.43)
    pt3dadd(-45.0466680113132, 22.1793466783144, 11.6823010669298, 1.43)
    pt3dadd(-45.2654411106033, 21.2219010092864, 11.8117484328627, 1.43)
    pt3dadd(-45.4274529465733, 20.2633506509239, 12.0461271338764, 1.43)
    pt3dadd(-45.5894647825434, 19.3048002925615, 12.2805058348901, 1.43)
    pt3dadd(-45.7514766185134, 18.346249934199, 12.5148845359038, 1.43)
    pt3dadd(-45.9134884544834, 17.3876995758366, 12.7492632369175, 1.43)
    pt3dadd(-46.0755002904534, 16.4291492174742, 12.9836419379311, 1.43)
    pt3dadd(-46.2375121264235, 15.4705988591117, 13.2180206389448, 1.43)
    pt3dadd(-46.3995239623935, 14.5120485007493, 13.4523993399585, 1.43)
    pt3dadd(-46.6568816182348, 13.6499352997987, 13.8498523232363, 1.40926087527481)
    pt3dadd(-46.9832494084023, 12.8576221298933, 14.3653364707477, 1.37351102658681)
    pt3dadd(-47.3096171985698, 12.0653089599878, 14.8808206182591, 1.33776117789881)
    pt3dadd(-47.6359849887373, 11.2729957900823, 15.3963047657705, 1.30201132921081)
    pt3dadd(-47.9623527789048, 10.4806826201769, 15.9117889132819, 1.26626148052281)
    pt3dadd(-48.2887205690724, 9.68836945027143, 16.4272730607933, 1.23051163183481)
    pt3dadd(-48.6150883592399, 8.89605628036599, 16.9427572083047, 1.19476178314681)
    pt3dadd(-48.6274903942271, 7.92491949765646, 16.9780506220754, 1.19)
    pt3dadd(-48.5916468606194, 6.92630377262409, 16.939555494895, 1.19)
    pt3dadd(-48.5558033270116, 5.92768804759176, 16.9010603677147, 1.19)
    pt3dadd(-48.5199597934039, 4.92907232255942, 16.8625652405343, 1.19)
    pt3dadd(-48.4973788155473, 3.93244884966685, 16.8402968951371, 1.19)
    pt3dadd(-48.6464517048748, 2.9616105867005, 17.0280476363554, 1.19)
    pt3dadd(-48.7955245942023, 1.99077232373415, 17.2157983775738, 1.19)
    pt3dadd(-48.9445974835298, 1.01993406076779, 17.4035491187921, 1.19)
    pt3dadd(-49.0936703728573, 0.0490957978014393, 17.5912998600104, 1.19)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(-49.0936703728573, 0.0490957978014393, 17.5912998600104, 1.19)
    pt3dadd(-49.2427432621847, -0.9217424651649, 17.7790506012288, 1.19)
    pt3dadd(-49.3918161515122, -1.89258072813125, 17.9668013424471, 1.19)
    pt3dadd(-49.5408890408397, -2.86341899109761, 18.1545520836654, 1.19)
    pt3dadd(-49.6899619301672, -3.83425725406395, 18.3423028248838, 1.19)
    pt3dadd(-49.7862801159207, -4.81274653875612, 18.4674964996639, 1.19)
    pt3dadd(-49.7450837460365, -5.81117957787243, 18.429624009525, 1.19)
    pt3dadd(-49.7038873761523, -6.80961261698875, 18.3917515193861, 1.19)
    pt3dadd(-49.6626910062681, -7.80804565610507, 18.3538790292473, 1.19)
    pt3dadd(-49.6214946363839, -8.80647869522138, 18.3160065391084, 1.19)
    pt3dadd(-49.5755703543142, -9.79507833633253, 18.3328800238924, 1.19)
    pt3dadd(-49.498881436795, -10.7196918260548, 18.7059868511596, 1.19)
    pt3dadd(-49.4221925192759, -11.644305315777, 19.0790936784268, 1.19)
    pt3dadd(-49.3455036017568, -12.5689188054992, 19.452200505694, 1.19)
    pt3dadd(-49.2688146842377, -13.4935322952215, 19.8253073329612, 1.19)
    pt3dadd(-49.1921257667186, -14.4181457849438, 20.1984141602284, 1.19)
    pt3dadd(-49.1154368491995, -15.342759274666, 20.5715209874956, 1.19)
    pt3dadd(-49.0387479316804, -16.2673727643882, 20.9446278147628, 1.19)
    pt3dadd(-49.0127119501359, -17.2051701545825, 21.1601471731072, 1.19)
    pt3dadd(-49.1215312475302, -18.1780675551007, 20.9561152918254, 1.19)
    pt3dadd(-49.2303505449245, -19.150964955619, 20.7520834105437, 1.19)
    pt3dadd(-49.3391698423189, -20.1238623561373, 20.5480515292619, 1.19)
    pt3dadd(-49.4498130222396, -21.0971226555976, 20.3575144802483, 1.19)
    pt3dadd(-49.6019143464167, -22.0786319055639, 20.4737245461381, 1.19)
    pt3dadd(-49.7540156705938, -23.0601411555302, 20.589934612028, 1.19)
    pt3dadd(-49.9061169947709, -24.0416504054965, 20.7061446779179, 1.19)
    pt3dadd(-50.2027054077187, -24.8008495236969, 21.2230150835993, 1.19)
    pt3dadd(-50.5421697867306, -25.4940789988905, 21.8587798436363, 1.19)
    pt3dadd(-50.8816341657426, -26.187308474084, 22.4945446036733, 1.19)
    pt3dadd(-51.2210985447545, -26.8805379492776, 23.1303093637104, 1.19)
    pt3dadd(-51.4884294729774, -27.6129466942309, 23.6765892829039, 1.19)
  }
  adendIML[15] {pt3dclear()
    pt3dadd(-51.4884294729774, -27.6129466942309, 23.6765892829039, 1.19)
    pt3dadd(-51.8297410655497, -28.5860571635427, 23.5025849180974, 1.19)
    pt3dadd(-52.1117121962832, -29.5402738773507, 23.4027713693062, 1.19)
    pt3dadd(-52.3936833270168, -30.4944905911587, 23.302957820515, 1.19)
    pt3dadd(-52.6785569116629, -31.4479381575865, 23.204795501058, 1.19)
    pt3dadd(-53.0002445975821, -32.3916300240433, 23.1275770193895, 1.19)
    pt3dadd(-53.3219322835013, -33.3353218905001, 23.050358537721, 1.19)
    pt3dadd(-53.6436199694204, -34.279013756957, 22.9731400560525, 1.19)
    pt3dadd(-53.9653076553396, -35.2227056234138, 22.895921574384, 1.19)
    pt3dadd(-54.2869953412587, -36.1663974898706, 22.8187030927155, 1.19)
    pt3dadd(-54.6086830271779, -37.1100893563275, 22.741484611047, 1.19)
    pt3dadd(-54.9303707130971, -38.0537812227843, 22.6642661293785, 1.19)
    pt3dadd(-55.2520583990162, -38.9974730892411, 22.58704764771, 1.19)
    pt3dadd(-55.5482167463308, -39.9381315478538, 22.6285214187031, 1.19)
    pt3dadd(-55.7998347605083, -40.8734977034415, 22.8770742901861, 1.19)
    pt3dadd(-56.0514527746857, -41.8088638590292, 23.1256271616691, 1.19)
    pt3dadd(-56.3030707888632, -42.7442300146169, 23.374180033152, 1.19)
    pt3dadd(-56.5546888030406, -43.6795961702047, 23.622732904635, 1.19)
    pt3dadd(-56.8063068172181, -44.6149623257924, 23.871285776118, 1.19)
    pt3dadd(-57.0579248313956, -45.5503284813801, 24.119838647601, 1.19)
    pt3dadd(-57.288012673895, -46.4991109919686, 24.2797663506659, 1.19)
    pt3dadd(-57.4641495647776, -47.4815126083563, 24.2176144416927, 1.19)
    pt3dadd(-57.6402864556602, -48.463914224744, 24.1554625327195, 1.19)
    pt3dadd(-57.8164233465429, -49.4463158411317, 24.0933106237463, 1.19)
    pt3dadd(-57.9925602374255, -50.4287174575194, 24.0311587147732, 1.19)
    pt3dadd(-58.1686971283081, -51.4111190739071, 23.9690068058, 1.19)
    pt3dadd(-58.3448340191907, -52.3935206902948, 23.9068548968268, 1.19)
    pt3dadd(-58.4682509624148, -53.3795508371497, 23.8965771609237, 1.19)
    pt3dadd(-58.4723815054562, -54.3737910516659, 24.0036721395779, 1.19)
    pt3dadd(-58.4765120484976, -55.3680312661821, 24.1107671182321, 1.19)
    pt3dadd(-58.4806425915391, -56.3622714806983, 24.2178620968863, 1.19)
    pt3dadd(-58.4847731345805, -57.3565116952145, 24.3249570755405, 1.19)
    pt3dadd(-58.4889036776219, -58.3507519097307, 24.4320520541947, 1.19)
    pt3dadd(-58.4930342206633, -59.3449921242469, 24.5391470328488, 1.19)
    pt3dadd(-58.4971647637048, -60.3392323387632, 24.646242011503, 1.19)
    pt3dadd(-58.7701472138737, -61.2621072708251, 24.8672626525259, 1.19)
    pt3dadd(-59.1173172499301, -62.1652895100658, 25.1197201911036, 1.19)
    pt3dadd(-59.4644872859866, -63.0684717493065, 25.3721777296813, 1.19)
    pt3dadd(-59.811657322043, -63.9716539885472, 25.624635268259, 1.19)
    pt3dadd(-60.1588273580994, -64.874836227788, 25.8770928068367, 1.19)
    pt3dadd(-60.5059973941559, -65.7780184670287, 26.1295503454144, 1.19)
    pt3dadd(-60.8531674302123, -66.6812007062694, 26.3820078839921, 1.19)
    pt3dadd(-61.1594691197596, -67.6299166070312, 26.3084567910179, 1.19)
    pt3dadd(-61.4655079554349, -68.5789253676774, 26.2328089009273, 1.19)
    pt3dadd(-61.7715467911102, -69.5279341283237, 26.1571610108367, 1.19)
    pt3dadd(-62.0775856267854, -70.4769428889699, 26.0815131207461, 1.19)
    pt3dadd(-62.4136110620342, -71.3821887781837, 26.1515411963252, 1.19)
    pt3dadd(-62.8278756094027, -72.1732513904209, 26.6016576571597, 1.19)
    pt3dadd(-63.2421401567712, -72.964314002658, 27.0517741179942, 1.19)
    pt3dadd(-63.6564047041397, -73.7553766148951, 27.5018905788287, 1.19)
    pt3dadd(-63.8644188856992, -74.6095928412586, 27.960144089041, 1.19)
    pt3dadd(-63.9969670039158, -75.486916685518, 28.4213749083184, 1.19)
    pt3dadd(-64.1295151221325, -76.3642405297773, 28.8826057275957, 1.19)
    pt3dadd(-64.2620632403491, -77.2415643740366, 29.343836546873, 1.19)
    pt3dadd(-64.4723225903114, -78.084730877759, 29.8236726123114, 1.19)
    pt3dadd(-64.8330112955759, -78.8617773805446, 30.3395237443285, 1.19)
    pt3dadd(-65.1937000008404, -79.6388238833301, 30.8553748763456, 1.19)
    pt3dadd(-65.5543887061049, -80.4158703861157, 31.3712260083627, 1.19)
    pt3dadd(-65.9141015474028, -81.1942168178226, 31.8832569770877, 1.19)
    pt3dadd(-66.1261651159393, -82.1692439001665, 31.817293111256, 1.19)
    pt3dadd(-66.3382286844758, -83.1442709825104, 31.7513292454244, 1.19)
    pt3dadd(-66.5502922530123, -84.1192980648544, 31.6853653795928, 1.19)
    pt3dadd(-66.7623558215488, -85.0943251471983, 31.6194015137611, 1.19)
    pt3dadd(-66.9664751812422, -86.0690035003501, 31.6159668530407, 1.19)
    pt3dadd(-67.1539476579901, -87.0429511005526, 31.7435605148027, 1.19)
    pt3dadd(-67.3490148490045, -88.0128827938374, 31.8795724442595, 1.19)
    pt3dadd(-67.6848771536086, -88.9083653306689, 32.1716469871008, 1.19)
    pt3dadd(-68.0207394582126, -89.8038478675003, 32.463721529942, 1.19)
    pt3dadd(-68.3566017628166, -90.6993304043318, 32.7557960727833, 1.19)
    pt3dadd(-68.6924640674207, -91.5948129411633, 33.0478706156245, 1.19)
    pt3dadd(-69.0283263720247, -92.4902954779947, 33.3399451584658, 1.19)
    pt3dadd(-69.3641886766287, -93.3857780148262, 33.632019701307, 1.19)
    pt3dadd(-69.9590179701583, -94.1851585772587, 33.6187888007496, 1.19)
    pt3dadd(-70.5645318617206, -94.9805741132187, 33.592961445511, 1.19)
    pt3dadd(-71.1700457532829, -95.7759896491786, 33.5671340902725, 1.19)
    pt3dadd(-71.7624030279578, -96.5790565118121, 33.5170027998693, 1.19)
    pt3dadd(-72.3278281212002, -97.3977859813252, 33.4171202704522, 1.19)
    pt3dadd(-72.8932532144424, -98.2165154508383, 33.3172377410351, 1.19)
    pt3dadd(-73.4586783076847, -99.0352449203514, 33.217355211618, 1.19)
    pt3dadd(-74.024103400927, -99.8539743898644, 33.1174726822009, 1.19)
    pt3dadd(-74.5195379296244, -100.666460502928, 33.3443672022112, 1.19)
    pt3dadd(-74.9880779164886, -101.476547546741, 33.6968289195012, 1.19)
    pt3dadd(-75.4566179033528, -102.286634590555, 34.0492906367912, 1.19)
    pt3dadd(-75.925157890217, -103.096721634368, 34.4017523540812, 1.19)
    pt3dadd(-76.3936978770812, -103.906808678182, 34.7542140713713, 1.19)
    pt3dadd(-76.8622378639454, -104.716895721995, 35.1066757886613, 1.19)
    pt3dadd(-77.3307778508096, -105.526982765808, 35.4591375059513, 1.19)
    pt3dadd(-77.7993178376738, -106.337069809622, 35.8115992232413, 1.19)
    pt3dadd(-78.5261315684395, -107.014350820081, 35.7000944280746, 1.19)
    pt3dadd(-79.2534615871402, -107.691366351937, 35.5876621661473, 1.19)
    pt3dadd(-79.980791605841, -108.368381883794, 35.4752299042199, 1.19)
    pt3dadd(-80.7081216245417, -109.04539741565, 35.3627976422925, 1.19)
    pt3dadd(-81.3648612082974, -109.761528179724, 35.3173448799022, 1.19)
    pt3dadd(-81.6764296605059, -110.668923510677, 35.5994065982438, 1.19)
    pt3dadd(-81.9879981127145, -111.57631884163, 35.8814683165854, 1.19)
    pt3dadd(-82.299566564923, -112.483714172582, 36.163530034927, 1.19)
    pt3dadd(-82.6111350171315, -113.391109503535, 36.4455917532687, 1.19)
    pt3dadd(-82.9227034693401, -114.298504834487, 36.7276534716103, 1.19)
    pt3dadd(-83.2217232644022, -115.220774857615, 36.9713137288877, 1.17087608716107)
    pt3dadd(-83.5164447585404, -116.148139920186, 37.201820304967, 1.14520164614508)
  }
  adendMML[18] {pt3dclear()
    pt3dadd(-83.5164447585404, -116.148139920186, 37.201820304967, 1.11952720512909)
    pt3dadd(-83.8111662526786, -117.075504982757, 37.4323268810463, 1.11952720512909)
    pt3dadd(-84.1058877468169, -118.002870045328, 37.6628334571256, 1.0938527641131)
    pt3dadd(-84.4006092409551, -118.930235107899, 37.893340033205, 1.06817832309711)
    pt3dadd(-84.6953307350934, -119.85760017047, 38.1238466092843, 1.04250388208112)
    pt3dadd(-84.9900522292316, -120.784965233041, 38.3543531853636, 1.01682944106513)
    pt3dadd(-85.2847737233699, -121.712330295611, 38.5848597614429, 0.991155000049143)
    pt3dadd(-85.5794952175081, -122.639695358182, 38.8153663375223, 0.965480559033153)
    pt3dadd(-86.0194379492212, -123.493899028978, 38.9116403354294, 0.95)
    pt3dadd(-86.6799155022056, -124.236998878264, 38.8040670302124, 0.95)
    pt3dadd(-87.2545712204533, -125.012966655527, 38.7705030846874, 0.95)
    pt3dadd(-87.4192082360169, -125.945962830403, 39.090523069645, 0.95)
    pt3dadd(-87.5838452515805, -126.87895900528, 39.4105430546026, 0.95)
    pt3dadd(-87.7484822671441, -127.811955180156, 39.7305630395602, 0.95)
    pt3dadd(-87.9131192827077, -128.744951355032, 40.0505830245178, 0.95)
    pt3dadd(-88.1164809061827, -129.67005276189, 40.3214342052124, 0.95)
    pt3dadd(-88.6066266899315, -130.536687613789, 40.2281542816104, 0.95)
    pt3dadd(-89.0967724736803, -131.403322465688, 40.1348743580084, 0.95)
    pt3dadd(-89.586918257429, -132.269957317588, 40.0415944344064, 0.95)
    pt3dadd(-90.0770640411778, -133.136592169487, 39.9483145108045, 0.95)
    pt3dadd(-90.5828438805909, -133.84934802765, 40.3702287781697, 0.95)
    pt3dadd(-91.0917659057798, -134.531176761354, 40.8956885294093, 0.95)
    pt3dadd(-91.6006879309688, -135.213005495058, 41.4211482806489, 0.95)
    pt3dadd(-92.1096099561577, -135.894834228762, 41.9466080318886, 0.95)
    pt3dadd(-92.6185319813467, -136.576662962467, 42.4720677831282, 0.95)
    pt3dadd(-93.1274540065356, -137.258491696171, 42.9975275343678, 0.95)
    pt3dadd(-93.4528427079892, -138.164351513761, 43.0333960715276, 0.95)
    pt3dadd(-93.7372486646246, -139.120237171647, 42.9599395478023, 0.95)
    pt3dadd(-94.02165462126, -140.076122829533, 42.886483024077, 0.95)
    pt3dadd(-94.3060605778954, -141.03200848742, 42.8130265003517, 0.95)
    pt3dadd(-94.5904665345308, -141.987894145306, 42.7395699766263, 0.95)
  }
}
proc shape3d_15() {
  adendMML[18] {
    pt3dadd(-94.8748724911662, -142.943779803192, 42.666113452901, 0.95)
    pt3dadd(-95.3214534405302, -143.826813114492, 42.5771377635156, 0.95)
    pt3dadd(-95.8337259217385, -144.680336436829, 42.4818757919605, 0.95)
    pt3dadd(-96.3459984029468, -145.533859759165, 42.3866138204054, 0.95)
    pt3dadd(-96.858270884155, -146.387383081502, 42.2913518488502, 0.95)
    pt3dadd(-97.3705433653634, -147.240906403838, 42.1960898772951, 0.95)
    pt3dadd(-97.913397549803, -148.074716389466, 42.0981563999929, 0.95)
    pt3dadd(-98.4672638767893, -148.901427814485, 41.9992609421926, 0.95)
    pt3dadd(-99.0211302037757, -149.728139239504, 41.9003654843924, 0.95)
    pt3dadd(-99.5749965307621, -150.554850664523, 41.8014700265922, 0.95)
    pt3dadd(-100.128862857748, -151.381562089542, 41.702574568792, 0.95)
    pt3dadd(-100.682729184735, -152.208273514561, 41.6036791109918, 0.95)
    pt3dadd(-101.236595511721, -153.03498493958, 41.5047836531916, 0.95)
    pt3dadd(-101.790461838708, -153.8616963646, 41.4058881953913, 0.95)
    pt3dadd(-102.344328165694, -154.688407789619, 41.3069927375911, 0.95)
    pt3dadd(-102.848889047133, -155.541860833376, 41.2126195406192, 0.95)
    pt3dadd(-103.226862964573, -156.463970397545, 41.1298568110578, 0.95)
    pt3dadd(-103.604836882013, -157.386079961713, 41.0470940814963, 0.95)
    pt3dadd(-103.982810799453, -158.308189525881, 40.9643313519348, 0.95)
    pt3dadd(-104.360784716893, -159.23029909005, 40.8815686223733, 0.95)
    pt3dadd(-104.738758634333, -160.152408654218, 40.7988058928119, 0.95)
    pt3dadd(-105.117360364101, -161.074134376378, 40.717306600447, 0.95)
    pt3dadd(-105.625265242713, -161.916804657776, 40.8960226633261, 0.95)
    pt3dadd(-106.133170121325, -162.759474939173, 41.0747387262052, 0.95)
    pt3dadd(-106.641074999938, -163.602145220571, 41.2534547890842, 0.95)
    pt3dadd(-107.14897987855, -164.444815501969, 41.4321708519633, 0.95)
    pt3dadd(-107.656884757163, -165.287485783366, 41.6108869148423, 0.95)
    pt3dadd(-108.164789635775, -166.130156064764, 41.7896029777214, 0.95)
    pt3dadd(-108.672694514387, -166.972826346162, 41.9683190406004, 0.95)
    pt3dadd(-108.91785848151, -167.9350688439, 41.921046833187, 0.95)
    pt3dadd(-109.14005362295, -168.907764351708, 41.8540187181111, 0.95)
    pt3dadd(-109.36224876439, -169.880459859516, 41.7869906030352, 0.95)
    pt3dadd(-109.58444390583, -170.853155367324, 41.7199624879593, 0.95)
    pt3dadd(-109.80663904727, -171.825850875131, 41.6529343728835, 0.95)
    pt3dadd(-110.070725144939, -172.787690863916, 41.5815577654914, 0.95)
    pt3dadd(-110.335425762587, -173.74937160751, 41.5101173678293, 0.95)
    pt3dadd(-110.600126380235, -174.711052351103, 41.4386769701673, 0.95)
    pt3dadd(-110.864826997882, -175.672733094697, 41.3672365725053, 0.95)
    pt3dadd(-111.12952761553, -176.634413838291, 41.2957961748433, 0.95)
    pt3dadd(-111.400848120486, -177.594149122594, 41.2236784138367, 0.95)
    pt3dadd(-111.684893743956, -178.550144735984, 41.1502585870341, 0.95)
    pt3dadd(-111.968939367427, -179.506140349373, 41.0768387602316, 0.95)
    pt3dadd(-112.252984990897, -180.462135962762, 41.0034189334291, 0.95)
    pt3dadd(-112.537030614368, -181.418131576152, 40.9299991066266, 0.95)
    pt3dadd(-112.821076237838, -182.374127189541, 40.856579279824, 0.95)
    pt3dadd(-113.200238791527, -183.295048098161, 40.7737307416691, 0.95)
    pt3dadd(-113.591114441969, -184.211649760884, 40.6897211125488, 0.95)
    pt3dadd(-113.981990092411, -185.128251423607, 40.6057114834284, 0.95)
    pt3dadd(-114.372865742853, -186.04485308633, 40.5217018543081, 0.95)
    pt3dadd(-114.763741393295, -186.961454749053, 40.4376922251878, 0.95)
    pt3dadd(-115.154617043737, -187.878056411776, 40.3536825960675, 0.95)
    pt3dadd(-115.54549269418, -188.794658074499, 40.2696729669471, 0.95)
    pt3dadd(-115.936368344622, -189.711259737222, 40.1856633378268, 0.95)
    pt3dadd(-116.327243995064, -190.627861399945, 40.1016537087065, 0.95)
    pt3dadd(-116.686385180038, -191.556390551069, 40.040800228032, 0.95)
    pt3dadd(-116.948601520989, -192.521349178343, 40.050671306387, 0.95)
    pt3dadd(-117.21081786194, -193.486307805617, 40.0605423847419, 0.95)
    pt3dadd(-117.473034202891, -194.451266432891, 40.0704134630969, 0.95)
    pt3dadd(-117.735250543842, -195.416225060165, 40.0802845414518, 0.95)
    pt3dadd(-117.997466884793, -196.381183687439, 40.0901556198068, 0.95)
    pt3dadd(-118.259683225744, -197.346142314712, 40.1000266981617, 0.95)
    pt3dadd(-118.516045182608, -198.31115329492, 40.1361682463784, 0.95)
    pt3dadd(-118.758457235246, -199.276289022393, 40.2349074194068, 0.95)
    pt3dadd(-119.000869287884, -200.241424749867, 40.3336465924352, 0.95)
    pt3dadd(-119.243281340522, -201.20656047734, 40.4323857654636, 0.95)
    pt3dadd(-119.48569339316, -202.171696204813, 40.5311249384919, 0.95)
    pt3dadd(-119.728105445798, -203.136831932287, 40.6298641115203, 0.95)
    pt3dadd(-119.970517498436, -204.10196765976, 40.7286032845487, 0.95)
    pt3dadd(-120.212929551074, -205.067103387233, 40.8273424575771, 0.95)
    pt3dadd(-120.455341603712, -206.032239114707, 40.9260816306055, 0.95)
    pt3dadd(-120.69775365635, -206.99737484218, 41.0248208036339, 0.95)
    pt3dadd(-120.940165708988, -207.962510569653, 41.1235599766622, 0.95)
    pt3dadd(-121.233167054906, -208.911490728574, 41.1557603126919, 0.95)
    pt3dadd(-121.61376810592, -209.832496133371, 41.0727429391901, 0.95)
    pt3dadd(-121.994369156933, -210.753501538167, 40.9897255656883, 0.95)
    pt3dadd(-122.374970207947, -211.674506942964, 40.9067081921865, 0.95)
    pt3dadd(-122.755571258961, -212.59551234776, 40.8236908186847, 0.95)
    pt3dadd(-123.136172309975, -213.516517752556, 40.7406734451829, 0.95)
    pt3dadd(-123.516773360988, -214.437523157353, 40.6576560716811, 0.95)
    pt3dadd(-123.897374412002, -215.358528562149, 40.5746386981793, 0.95)
    pt3dadd(-124.277975463016, -216.279533966945, 40.4916213246775, 0.95)
    pt3dadd(-124.653257770843, -217.198387544129, 40.3876669542804, 0.95)
    pt3dadd(-124.982665739323, -218.098681535588, 40.1031302795883, 0.95)
    pt3dadd(-125.312073707803, -218.998975527047, 39.8185936048963, 0.95)
    pt3dadd(-125.641481676283, -219.899269518506, 39.5340569302042, 0.95)
    pt3dadd(-125.970889644763, -220.799563509965, 39.2495202555122, 0.95)
    pt3dadd(-126.300297613243, -221.699857501424, 38.9649835808201, 0.95)
    pt3dadd(-126.629705581723, -222.600151492883, 38.6804469061281, 0.95)
    pt3dadd(-126.959113550203, -223.500445484342, 38.3959102314361, 0.95)
    pt3dadd(-127.288521518683, -224.400739475801, 38.111373556744, 0.95)
    pt3dadd(-127.617929487163, -225.30103346726, 37.826836882052, 0.95)
    pt3dadd(-127.947337455643, -226.201327458719, 37.5423002073599, 0.95)
    pt3dadd(-128.463805169532, -227.033513054701, 37.3959338007408, 0.95)
    pt3dadd(-129.041770493538, -227.84330738985, 37.2949921393405, 0.95)
    pt3dadd(-129.619735817545, -228.653101724999, 37.1940504779403, 0.95)
    pt3dadd(-130.197701141551, -229.462896060148, 37.09310881654, 0.95)
    pt3dadd(-130.775666465558, -230.272690395298, 36.9921671551398, 0.95)
    pt3dadd(-131.353631789565, -231.082484730447, 36.8912254937395, 0.95)
    pt3dadd(-131.931597113571, -231.892279065596, 36.7902838323392, 0.95)
    pt3dadd(-132.509562437578, -232.702073400745, 36.689342170939, 0.95)
    pt3dadd(-133.087527761585, -233.511867735894, 36.5884005095388, 0.95)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(-133.087527761585, -233.511867735894, 36.5884005095388, 0.95)
    pt3dadd(-133.610742104417, -234.354765442181, 36.4923351341298, 0.95)
    pt3dadd(-134.046966554686, -235.250258711816, 36.4040173384973, 0.95)
    pt3dadd(-134.483191004955, -236.145751981452, 36.3156995428648, 0.95)
    pt3dadd(-134.919415455224, -237.041245251087, 36.2273817472323, 0.95)
    pt3dadd(-135.355639905493, -237.936738520722, 36.1390639515998, 0.95)
    pt3dadd(-135.791864355763, -238.832231790357, 36.0507461559673, 0.95)
    pt3dadd(-135.944025452815, -239.784577689855, 35.7877621491919, 0.95)
    pt3dadd(-136.094390060409, -240.737283139957, 35.5236735085256, 0.95)
    pt3dadd(-136.244754668003, -241.689988590059, 35.2595848678592, 0.95)
    pt3dadd(-136.395119275597, -242.642694040161, 34.9954962271929, 0.95)
    pt3dadd(-136.545483883191, -243.595399490263, 34.7314075865265, 0.95)
    pt3dadd(-136.695848490785, -244.548104940365, 34.4673189458602, 0.95)
    pt3dadd(-136.846213098379, -245.500810390467, 34.2032303051938, 0.95)
    pt3dadd(-136.996577705973, -246.453515840569, 33.9391416645274, 0.95)
    pt3dadd(-137.146942313567, -247.406221290671, 33.6750530238611, 0.95)
    pt3dadd(-137.297306921161, -248.358926740773, 33.4109643831947, 0.95)
    pt3dadd(-137.609399366004, -249.271862987864, 33.230426355809, 0.95)
    pt3dadd(-138.091760867654, -250.142929728741, 33.1378514420158, 0.95)
    pt3dadd(-138.574122369304, -251.013996469618, 33.0452765282225, 0.95)
    pt3dadd(-139.056483870954, -251.885063210495, 32.9527016144293, 0.95)
    pt3dadd(-139.538845372605, -252.756129951372, 32.8601267006361, 0.95)
    pt3dadd(-140.021206874255, -253.627196692249, 32.7675517868428, 0.95)
    pt3dadd(-140.503568375905, -254.498263433126, 32.6749768730496, 0.95)
    pt3dadd(-140.863170745035, -255.427343805476, 32.5940268970733, 0.95)
    pt3dadd(-141.216540146133, -256.359369759984, 32.5136671652955, 0.95)
    pt3dadd(-141.569909547231, -257.291395714492, 32.4333074335178, 0.95)
    pt3dadd(-141.923278948329, -258.223421669, 32.35294770174, 0.95)
    pt3dadd(-142.276648349426, -259.155447623508, 32.2725879699623, 0.95)
    pt3dadd(-142.726116994581, -260.035698860881, 32.1833993065065, 0.95)
    pt3dadd(-143.297224328158, -260.850415673424, 32.0830353244512, 0.95)
    pt3dadd(-143.868331661735, -261.665132485967, 31.9826713423959, 0.95)
    pt3dadd(-144.439438995312, -262.47984929851, 31.8823073603405, 0.95)
    pt3dadd(-145.010546328889, -263.294566111053, 31.7819433782852, 0.95)
    pt3dadd(-145.581653662467, -264.109282923596, 31.6815793962299, 0.95)
    pt3dadd(-146.152760996044, -264.923999736139, 31.5812154141746, 0.95)
    pt3dadd(-146.723868329621, -265.738716548682, 31.4808514321193, 0.95)
    pt3dadd(-147.294975663198, -266.553433361225, 31.380487450064, 0.95)
    pt3dadd(-147.803841695801, -267.405506258213, 31.2856786441409, 0.95)
    pt3dadd(-148.24179881258, -268.300137382711, 31.1971986184742, 0.95)
    pt3dadd(-148.679755929358, -269.194768507209, 31.1087185928075, 0.95)
    pt3dadd(-149.117713046137, -270.089399631708, 31.0202385671408, 0.95)
    pt3dadd(-149.503481121602, -270.750673190062, 30.5582293638777, 0.989992073774029)
    pt3dadd(-149.83606673157, -271.174147195144, 29.715580813732, 1.0707374748779)
    pt3dadd(-150.168652341538, -271.597621200225, 28.8729322635862, 1.15148287598177)
    pt3dadd(-150.843415851748, -271.857273994027, 28.4092304024656, 1.19)
    pt3dadd(-151.830285598099, -271.967502696981, 28.2911722101096, 1.19)
    pt3dadd(-152.81715534445, -272.077731399934, 28.1731140177535, 1.19)
    pt3dadd(-153.804025090801, -272.187960102888, 28.0550558253975, 1.19)
    pt3dadd(-154.790894837152, -272.298188805841, 27.9369976330414, 1.19)
    pt3dadd(-155.763611060879, -272.508673389447, 27.8747871188796, 1.19)
    pt3dadd(-156.730347217583, -272.761517525639, 27.8361730525852, 1.19)
    pt3dadd(-157.697083374286, -273.01436166183, 27.7975589862908, 1.19)
    pt3dadd(-158.66381953099, -273.267205798021, 27.7589449199964, 1.19)
    pt3dadd(-159.633145721511, -273.495651740631, 27.6823237181862, 1.19)
    pt3dadd(-160.605443968962, -273.696100820865, 27.5620894292514, 1.19)
    pt3dadd(-161.527966469284, -273.96511971735, 27.3930661333888, 1.19)
    pt3dadd(-162.200500485311, -274.578516456878, 26.9790100535861, 1.19)
    pt3dadd(-162.873034501339, -275.191913196406, 26.5649539737835, 1.19)
    pt3dadd(-163.545568517367, -275.805309935935, 26.1508978939809, 1.19)
    pt3dadd(-164.100319619276, -276.548722943655, 25.8803322311692, 1.19)
    pt3dadd(-164.502856303981, -277.460159901521, 25.7952035679443, 1.19)
    pt3dadd(-164.905392988686, -278.371596859387, 25.7100749047195, 1.19)
    pt3dadd(-165.30792967339, -279.283033817254, 25.6249462414947, 1.19)
    pt3dadd(-165.710466358095, -280.19447077512, 25.5398175782698, 1.19)
    pt3dadd(-166.106700544956, -281.103667319723, 25.4272428566562, 1.19)
    pt3dadd(-166.473815931962, -282.002512707205, 25.1878618590307, 1.19)
    pt3dadd(-166.840931318968, -282.901358094688, 24.9484808614051, 1.19)
    pt3dadd(-167.208046705974, -283.800203482171, 24.7090998637795, 1.19)
    pt3dadd(-167.907969365633, -284.3388101714, 24.5362988841966, 1.19)
    pt3dadd(-168.866228857854, -284.597786780641, 24.4151796807837, 1.19)
    pt3dadd(-169.824488350075, -284.856763389881, 24.2940604773707, 1.19)
    pt3dadd(-170.745494588897, -285.129731610426, 24.4243272619325, 1.19)
    pt3dadd(-171.631842401488, -285.415716874692, 24.7884700687246, 1.19)
    pt3dadd(-172.518190214078, -285.701702138958, 25.1526128755167, 1.19)
    pt3dadd(-173.404538026669, -285.987687403225, 25.5167556823088, 1.19)
    pt3dadd(-174.290885839259, -286.273672667491, 25.8808984891009, 1.19)
    pt3dadd(-175.17723365185, -286.559657931757, 26.245041295893, 1.19)
    pt3dadd(-176.019638469432, -287.074074425652, 26.1576726917383, 1.19)
    pt3dadd(-176.858960750774, -287.604515033147, 26.0386312285228, 1.19)
    pt3dadd(-177.698283032115, -288.134955640642, 25.9195897653073, 1.19)
    pt3dadd(-178.537605313456, -288.665396248137, 25.8005483020918, 1.19)
    pt3dadd(-179.375581859613, -289.197316403484, 25.6815982795406, 1.19)
    pt3dadd(-179.9761498573, -289.990251736286, 25.5787798077139, 1.19)
    pt3dadd(-180.576717854987, -290.783187069087, 25.4759613358873, 1.19)
    pt3dadd(-181.177285852674, -291.576122401889, 25.3731428640606, 1.19)
    pt3dadd(-181.777853850361, -292.369057734691, 25.2703243922339, 1.19)
    pt3dadd(-182.378421848048, -293.161993067493, 25.1675059204072, 1.19)
    pt3dadd(-182.978989845735, -293.954928400294, 25.0646874485806, 1.19)
    pt3dadd(-183.579557843422, -294.747863733096, 24.9618689767539, 1.19)
  }
  adendIML[16] {pt3dclear()
    pt3dadd(-51.4884294729774, -27.6129466942309, 23.6765892829039, 1.19)
    pt3dadd(-51.1776936364048, -28.3784479821949, 24.3178116512561, 1.19)
    pt3dadd(-50.926298261671, -29.1628430256626, 24.8848432035931, 1.19)
    pt3dadd(-50.6749028869371, -29.9472380691304, 25.4518747559301, 1.19)
    pt3dadd(-50.4235075122033, -30.7316331125981, 26.018906308267, 1.19)
    pt3dadd(-50.1721121374694, -31.5160281560658, 26.585937860604, 1.19)
    pt3dadd(-49.9290937819428, -32.3033349387386, 27.1513229696133, 1.19)
    pt3dadd(-49.8332834886779, -33.1418092638951, 27.6877753847982, 1.19)
    pt3dadd(-49.7374731954129, -33.9802835890517, 28.2242277999831, 1.19)
    pt3dadd(-49.641662902148, -34.8187579142082, 28.7606802151681, 1.19)
    pt3dadd(-49.545852608883, -35.6572322393648, 29.297132630353, 1.19)
    pt3dadd(-49.4500423156181, -36.4957065645214, 29.8335850455379, 1.19)
    pt3dadd(-49.3542320223531, -37.3341808896779, 30.3700374607228, 1.19)
    pt3dadd(-49.2584217290882, -38.1726552148345, 30.9064898759077, 1.19)
    pt3dadd(-49.0292803435268, -38.9540910676382, 31.4334100066724, 1.19)
    pt3dadd(-48.4263864322659, -39.5756371847713, 31.9336093229866, 1.19)
    pt3dadd(-47.8234925210049, -40.1971833019045, 32.4338086393008, 1.19)
    pt3dadd(-47.220598609744, -40.8187294190376, 32.934007955615, 1.19)
    pt3dadd(-46.6650980879335, -41.4642756325717, 33.424398401643, 1.19)
    pt3dadd(-46.6651030185841, -42.3911307916125, 33.7998175196099, 1.19)
    pt3dadd(-46.6651079492348, -43.3179859506534, 34.1752366375768, 1.19)
    pt3dadd(-46.6651128798855, -44.2448411096942, 34.5506557555437, 1.19)
    pt3dadd(-46.6651178105361, -45.1716962687351, 34.9260748735106, 1.19)
    pt3dadd(-46.5137378902393, -46.0494437092943, 35.3699355111053, 1.19)
    pt3dadd(-46.3137782969743, -46.9114323940129, 35.83575915636, 1.19)
    pt3dadd(-46.1138187037093, -47.7734210787316, 36.3015828016146, 1.19)
    pt3dadd(-45.9138591104443, -48.6354097634502, 36.7674064468693, 1.19)
    pt3dadd(-45.7138995171793, -49.4973984481688, 37.233230092124, 1.19)
    pt3dadd(-45.5943447265323, -50.4583138240655, 37.4717994206887, 1.19)
    pt3dadd(-45.481223850257, -51.4271452179038, 37.6921840791025, 1.19)
    pt3dadd(-45.3681029739816, -52.395976611742, 37.9125687375162, 1.19)
    pt3dadd(-45.2549820977063, -53.3648080055802, 38.1329533959299, 1.19)
    pt3dadd(-45.3062815360603, -53.6517102944773, 38.904557524265, 1.27431077055853)
    pt3dadd(-45.4236219580645, -53.664709270566, 39.8975641969438, 1.39248576423657)
    pt3dadd(-45.3850382485175, -54.2756283052877, 40.5159926756048, 1.43)
    pt3dadd(-45.2739363184201, -55.1646319331519, 40.9602098643459, 1.43)
    pt3dadd(-45.1628343883228, -56.053635561016, 41.4044270530871, 1.43)
    pt3dadd(-45.0517324582254, -56.9426391888802, 41.8486442418282, 1.43)
    pt3dadd(-44.9077490437003, -57.8493484998588, 42.2420535692042, 1.43)
    pt3dadd(-44.744115882764, -58.766638603928, 42.605100471985, 1.43)
    pt3dadd(-44.5804827218278, -59.6839287079972, 42.9681473747659, 1.43)
    pt3dadd(-44.4168495608915, -60.6012188120664, 43.3311942775467, 1.43)
    pt3dadd(-44.2532163999553, -61.5185089161356, 43.6942411803276, 1.43)
    pt3dadd(-44.0711898550675, -62.4798212007636, 43.7946337679399, 1.43)
    pt3dadd(-43.8807320045224, -63.4613127227179, 43.7746287811192, 1.43)
    pt3dadd(-43.6902741539774, -64.4428042446721, 43.7546237942985, 1.43)
    pt3dadd(-43.4225775529719, -65.3260126923485, 43.9866742167006, 1.41391759251054)
    pt3dadd(-43.0627358149264, -66.091970313282, 44.5194244832365, 1.37864901702616)
    pt3dadd(-42.7028940768808, -66.8579279342156, 45.0521747497724, 1.34338044154178)
    pt3dadd(-42.3430523388353, -67.6238855551492, 45.5849250163084, 1.30811186605741)
    pt3dadd(-41.9832106007897, -68.3898431760828, 46.1176752828443, 1.27284329057303)
    pt3dadd(-41.6233688627442, -69.1558007970164, 46.6504255493802, 1.23757471508865)
    pt3dadd(-41.2635271246986, -69.92175841795, 47.1831758159162, 1.20230613960427)
    pt3dadd(-40.9072346436322, -70.7371017322903, 47.634144454978, 1.19)
    pt3dadd(-40.5528442975179, -71.5789120661007, 48.0412842890291, 1.19)
    pt3dadd(-40.1984539514037, -72.420722399911, 48.4484241230802, 1.19)
    pt3dadd(-39.8440636052895, -73.2625327337214, 48.8555639571313, 1.19)
    pt3dadd(-39.484005164378, -74.1068559842227, 49.2499400275876, 1.19)
  }
}
proc shape3d_16() {
  adendIML[16] {
    pt3dadd(-39.0692327120941, -74.9754363717916, 49.5211077306001, 1.19)
    pt3dadd(-38.6544602598103, -75.8440167593605, 49.7922754336126, 1.19)
    pt3dadd(-38.2396878075264, -76.7125971469294, 50.063443136625, 1.19)
    pt3dadd(-37.8249153552425, -77.5811775344983, 50.3346108396375, 1.19)
    pt3dadd(-37.5007507853686, -78.4617509133807, 50.6626343346639, 1.19)
    pt3dadd(-37.2697141315799, -79.3546508389049, 51.0490949246404, 1.19)
    pt3dadd(-37.0386774777911, -80.247550764429, 51.4355555146169, 1.19)
    pt3dadd(-36.8076408240024, -81.1404506899533, 51.8220161045933, 1.19)
    pt3dadd(-36.5766041702136, -82.0333506154774, 52.2084766945698, 1.19)
    pt3dadd(-36.3455675164249, -82.9262505410017, 52.5949372845463, 1.19)
    pt3dadd(-36.2723200676596, -83.8904265662148, 52.6930062643547, 1.19)
    pt3dadd(-36.2763051476468, -84.8894898539487, 52.6499172142398, 1.19)
    pt3dadd(-36.2802902276339, -85.8885531416827, 52.6068281641249, 1.19)
    pt3dadd(-36.2842753076211, -86.8876164294166, 52.56373911401, 1.19)
    pt3dadd(-36.2882603876083, -87.8866797171505, 52.520650063895, 1.19)
    pt3dadd(-36.1707450724934, -88.6434727554005, 53.1144555761573, 1.19)
    pt3dadd(-36.0377979924684, -89.3694950498056, 53.7891530653624, 1.19)
    pt3dadd(-35.9048509124435, -90.0955173442106, 54.4638505545675, 1.19)
    pt3dadd(-35.7719038324185, -90.8215396386157, 55.1385480437726, 1.19)
    pt3dadd(-35.6376873166576, -91.5331720285201, 55.8249181292562, 1.19)
    pt3dadd(-35.4870517516444, -92.0586834955217, 56.6622631146732, 1.19)
    pt3dadd(-35.3364161866312, -92.5841949625234, 57.4996081000901, 1.19)
    pt3dadd(-35.2033014916573, -93.1655765123574, 58.2331690030787, 1.19)
    pt3dadd(-35.2011830526338, -94.1646754274941, 58.1907794997936, 1.19)
    pt3dadd(-35.1990646136102, -95.1637743426308, 58.1483899965084, 1.19)
    pt3dadd(-35.1969461745866, -96.1628732577675, 58.1060004932233, 1.19)
    pt3dadd(-35.2160414856286, -96.9620331511246, 58.6083894053921, 1.19)
    pt3dadd(-35.2419678044998, -97.6968109800691, 59.2862015977296, 1.19)
    pt3dadd(-35.267894123371, -98.4315888090136, 59.9640137900671, 1.19)
    pt3dadd(-35.2938204422422, -99.166366637958, 60.6418259824047, 1.19)
    pt3dadd(-35.3197467611134, -99.9011444669026, 61.3196381747422, 1.19)
    pt3dadd(-35.3532427382878, -100.810663909233, 61.7115520700277, 1.19)
    pt3dadd(-35.3879554633758, -101.748271342457, 62.0575106338468, 1.19)
    pt3dadd(-35.4226681884637, -102.685878775681, 62.403469197666, 1.19)
    pt3dadd(-35.4573809135516, -103.623486208905, 62.7494277614852, 1.19)
    pt3dadd(-35.4920936386395, -104.56109364213, 63.0953863253044, 1.19)
    pt3dadd(-35.5268063637274, -105.498701075354, 63.4413448891235, 1.19)
    pt3dadd(-35.532750000365, -106.457566880761, 63.6528668304489, 1.19)
    pt3dadd(-35.4854754944764, -107.455757223083, 63.6157028480281, 1.19)
    pt3dadd(-35.4382009885877, -108.453947565404, 63.5785388656074, 1.19)
    pt3dadd(-35.3909264826991, -109.452137907725, 63.5413748831866, 1.19)
    pt3dadd(-35.3436519768105, -110.450328250047, 63.5042109007658, 1.19)
    pt3dadd(-35.2963774709219, -111.448518592368, 63.4670469183451, 1.19)
    pt3dadd(-35.2491029650333, -112.44670893469, 63.4298829359243, 1.19)
    pt3dadd(-35.2295333820382, -113.415773538669, 63.5625322963683, 1.19)
    pt3dadd(-35.2490250360659, -114.343773694528, 63.9346018948965, 1.19)
    pt3dadd(-35.2685166900936, -115.271773850387, 64.3066714934246, 1.19)
    pt3dadd(-35.2880083441213, -116.199774006246, 64.6787410919527, 1.19)
  }
  adendMML[19] {pt3dclear()
    pt3dadd(-35.2880083441213, -116.199774006246, 64.6787410919527, 1.19)
    pt3dadd(-35.307499998149, -117.127774162105, 65.0508106904809, 1.19)
    pt3dadd(-35.3269916521767, -118.055774317964, 65.422880289009, 1.19)
    pt3dadd(-35.3464833062044, -118.983774473823, 65.7949498875372, 1.19)
    pt3dadd(-35.370190768365, -119.924464623057, 66.1330199270168, 1.19)
    pt3dadd(-35.3946835675247, -120.867518713202, 66.4647563975029, 1.19)
    pt3dadd(-35.4191763666844, -121.810572803347, 66.7964928679891, 1.19)
    pt3dadd(-35.4436691658441, -122.753626893492, 67.1282293384752, 1.19)
    pt3dadd(-35.4681619650038, -123.696680983636, 67.4599658089613, 1.19)
    pt3dadd(-35.5364291404671, -124.672455680691, 67.6622860121816, 1.19)
    pt3dadd(-35.6097310284343, -125.651993740302, 67.8497213956959, 1.19)
    pt3dadd(-35.6830329164015, -126.631531799913, 68.0371567792102, 1.19)
    pt3dadd(-35.7563348043688, -127.611069859525, 68.2245921627245, 1.19)
    pt3dadd(-35.829636692336, -128.590607919136, 68.4120275462388, 1.19)
    pt3dadd(-35.9029385803032, -129.570145978748, 68.5994629297531, 1.19)
    pt3dadd(-35.9762404682705, -130.549684038359, 68.7868983132674, 1.19)
    pt3dadd(-36.1293141425198, -131.472757278155, 69.119657828366, 1.19)
    pt3dadd(-36.3182160322658, -132.370470251789, 69.5176873411162, 1.19)
    pt3dadd(-36.5071179220119, -133.268183225422, 69.9157168538663, 1.19)
    pt3dadd(-36.696019811758, -134.165896199056, 70.3137463666165, 1.19)
    pt3dadd(-36.8849217015041, -135.06360917269, 70.7117758793666, 1.19)
    pt3dadd(-37.0738235912501, -135.961322146323, 71.1098053921167, 1.19)
    pt3dadd(-37.1109901159127, -136.922325112507, 71.3635568708622, 1.19)
    pt3dadd(-37.1142162284879, -137.897484886677, 71.5850360054078, 1.19)
    pt3dadd(-37.1174423410632, -138.872644660846, 71.8065151399534, 1.19)
    pt3dadd(-37.1206684536384, -139.847804435016, 72.0279942744991, 1.19)
    pt3dadd(-37.1238945662137, -140.822964209186, 72.2494734090447, 1.19)
    pt3dadd(-37.1271206787889, -141.798123983355, 72.4709525435903, 1.19)
    pt3dadd(-37.1303467913642, -142.773283757525, 72.692431678136, 1.19)
    pt3dadd(-37.1357878507819, -143.754288940078, 72.8486867117611, 1.18233596412847)
    pt3dadd(-37.1480304936806, -144.753244004019, 72.8046537931496, 1.15113746739182)
    pt3dadd(-37.1602731365794, -145.75219906796, 72.7606208745382, 1.11993897065517)
    pt3dadd(-37.1725157794782, -146.751154131901, 72.7165879559267, 1.08874047391852)
    pt3dadd(-37.1847584223769, -147.750109195842, 72.6725550373153, 1.05754197718187)
    pt3dadd(-37.1970010652757, -148.749064259783, 72.6285221187039, 1.02634348044521)
    pt3dadd(-37.2092437081745, -149.748019323724, 72.5844892000924, 0.995144983708563)
    pt3dadd(-37.2214863510732, -150.746974387665, 72.540456281481, 0.963946486971913)
    pt3dadd(-37.3358286122796, -151.719610478251, 72.6518089156762, 0.95)
    pt3dadd(-37.5327079816826, -152.670970368324, 72.8887748910062, 0.95)
    pt3dadd(-37.7295873510857, -153.622330258397, 73.1257408663363, 0.95)
    pt3dadd(-37.9264667204888, -154.57369014847, 73.3627068416664, 0.95)
    pt3dadd(-38.1233460898919, -155.525050038543, 73.5996728169965, 0.95)
    pt3dadd(-38.3202254592949, -156.476409928615, 73.8366387923265, 0.95)
    pt3dadd(-38.5716877447569, -157.362091195216, 74.2248138588577, 0.95)
    pt3dadd(-38.82614645551, -158.244166918128, 74.621289814712, 0.95)
    pt3dadd(-39.0806051662632, -159.12624264104, 75.0177657705663, 0.95)
    pt3dadd(-39.3350638770163, -160.008318363953, 75.4142417264206, 0.95)
    pt3dadd(-39.5722945001345, -160.896470474694, 75.8069592568906, 0.95)
    pt3dadd(-39.7758271806982, -161.796507930597, 76.1923253502552, 0.95)
    pt3dadd(-39.979359861262, -162.696545386499, 76.5776914436198, 0.95)
    pt3dadd(-40.1828925418257, -163.596582842402, 76.9630575369843, 0.95)
    pt3dadd(-40.3864252223895, -164.496620298304, 77.3484236303489, 0.95)
    pt3dadd(-40.5899579029532, -165.396657754207, 77.7337897237134, 0.95)
    pt3dadd(-40.7970186975133, -166.275795702351, 78.1589329310134, 0.95)
    pt3dadd(-41.0101503573736, -167.118971633232, 78.6525210641242, 0.95)
    pt3dadd(-41.2232820172339, -167.962147564113, 79.1461091972351, 0.95)
    pt3dadd(-41.4364136770942, -168.805323494994, 79.639697330346, 0.95)
    pt3dadd(-41.6495453369546, -169.648499425875, 80.1332854634569, 0.95)
    pt3dadd(-41.8626769968149, -170.491675356756, 80.6268735965678, 0.95)
    pt3dadd(-42.2219201973106, -171.334932850828, 81.0074340751617, 0.95)
    pt3dadd(-42.6455396286864, -172.178226281354, 81.3381949667321, 0.95)
    pt3dadd(-43.0691590600622, -173.02151971188, 81.6689558583024, 0.95)
    pt3dadd(-43.492778491438, -173.864813142406, 81.9997167498728, 0.95)
    pt3dadd(-43.9163979228138, -174.708106572932, 82.3304776414432, 0.95)
    pt3dadd(-44.3400173541896, -175.551400003458, 82.6612385330136, 0.95)
    pt3dadd(-44.7636367855654, -176.394693433984, 82.9919994245839, 0.95)
    pt3dadd(-45.1872562169412, -177.23798686451, 83.3227603161543, 0.95)
    pt3dadd(-45.5033668541932, -178.120408823457, 83.6708348320662, 0.95)
    pt3dadd(-45.8174726214693, -179.003560467938, 84.0192322198502, 0.95)
    pt3dadd(-46.1315783887454, -179.886712112419, 84.3676296076342, 0.95)
    pt3dadd(-46.4456841560215, -180.7698637569, 84.7160269954182, 0.95)
    pt3dadd(-46.7597899232976, -181.65301540138, 85.0644243832022, 0.95)
    pt3dadd(-47.0738956905737, -182.536167045861, 85.4128217709862, 0.95)
    pt3dadd(-47.3880014578498, -183.419318690342, 85.7612191587702, 0.95)
    pt3dadd(-47.7021072251259, -184.302470334823, 86.1096165465542, 0.95)
    pt3dadd(-48.0563874543052, -185.186727868849, 86.0506277555375, 0.95)
    pt3dadd(-48.4320267321307, -186.071573357199, 85.7750491012455, 0.95)
    pt3dadd(-48.8076660099562, -186.956418845549, 85.4994704469535, 0.95)
    pt3dadd(-49.1833052877817, -187.841264333899, 85.2238917926614, 0.95)
    pt3dadd(-49.5589445656072, -188.726109822249, 84.9483131383694, 0.95)
    pt3dadd(-49.9345838434327, -189.610955310599, 84.6727344840773, 0.95)
    pt3dadd(-50.3102231212583, -190.495800798949, 84.3971558297853, 0.95)
    pt3dadd(-50.6858623990838, -191.380646287299, 84.1215771754932, 0.95)
    pt3dadd(-51.0615016769093, -192.265491775649, 83.8459985212012, 0.95)
    pt3dadd(-51.4371409547348, -193.150337263999, 83.5704198669091, 0.95)
    pt3dadd(-52.0165986288373, -193.939443973679, 83.4250724262569, 0.95)
    pt3dadd(-52.657542542336, -194.69966900451, 83.3190120554913, 0.95)
    pt3dadd(-53.1574696791316, -195.54496578523, 83.2255191414744, 0.95)
    pt3dadd(-53.5188383949781, -196.473851253819, 83.1443745948162, 0.95)
    pt3dadd(-53.8802071108246, -197.402736722407, 83.063230048158, 0.95)
    pt3dadd(-54.241575826671, -198.331622190996, 82.9820855014998, 0.95)
    pt3dadd(-54.6029445425175, -199.260507659585, 82.9009409548415, 0.95)
    pt3dadd(-54.9643132583639, -200.189393128173, 82.8197964081833, 0.95)
    pt3dadd(-55.3256819742104, -201.118278596762, 82.7386518615251, 0.95)
    pt3dadd(-55.3789461437652, -202.091321661337, 82.9611517353546, 0.95)
    pt3dadd(-55.43083512428, -203.064561818239, 83.1850068909679, 0.95)
    pt3dadd(-55.4827241047948, -204.037801975141, 83.4088620465812, 0.95)
    pt3dadd(-55.5346130853096, -205.011042132042, 83.6327172021945, 0.95)
    pt3dadd(-55.5865020658245, -205.984282288944, 83.8565723578077, 0.95)
    pt3dadd(-55.6585265573316, -206.956756349371, 84.0750523608623, 0.95)
    pt3dadd(-55.7941247205238, -207.926811620138, 84.2765614420387, 0.95)
    pt3dadd(-55.9297228837159, -208.896866890905, 84.478070523215, 0.95)
    pt3dadd(-56.0653210469081, -209.866922161671, 84.6795796043914, 0.95)
    pt3dadd(-56.2009192101002, -210.836977432438, 84.8810886855678, 0.95)
    pt3dadd(-56.3365173732924, -211.807032703205, 85.0825977667442, 0.95)
    pt3dadd(-56.5056216599257, -212.703031750164, 85.440322730292, 0.95)
    pt3dadd(-56.718617555251, -213.502020267023, 86.0026839118302, 0.95)
    pt3dadd(-56.9316134505762, -214.301008783883, 86.5650450933685, 0.95)
    pt3dadd(-57.1446093459015, -215.099997300742, 87.1274062749067, 0.95)
    pt3dadd(-57.3576052412268, -215.898985817602, 87.689767456445, 0.95)
    pt3dadd(-57.3225758661514, -216.783004379751, 87.9562477547875, 0.968984843496926)
    pt3dadd(-57.0554219240219, -217.746601778434, 87.945815858657, 1.00573742723337)
    pt3dadd(-56.7882679818923, -218.710199177116, 87.9353839625265, 1.04249001096981)
    pt3dadd(-56.5211140397628, -219.673796575799, 87.924952066396, 1.07924259470625)
    pt3dadd(-56.2539600976332, -220.637393974481, 87.9145201702655, 1.1159951784427)
    pt3dadd(-55.9868061555037, -221.600991373164, 87.904088274135, 1.15274776217914)
    pt3dadd(-55.7196522133741, -222.564588771846, 87.8936563780045, 1.18950034591558)
    pt3dadd(-55.6180004832473, -223.558734424172, 87.8629109062666, 1.19)
    pt3dadd(-55.518629778599, -224.553301106187, 87.8318854637479, 1.19)
    pt3dadd(-55.4192590739507, -225.547867788202, 87.8008600212291, 1.19)
    pt3dadd(-55.3198883693024, -226.542434470217, 87.7698345787104, 1.19)
    pt3dadd(-55.2205176646541, -227.537001152232, 87.7388091361916, 1.19)
    pt3dadd(-55.1211469600059, -228.531567834247, 87.7077836936729, 1.19)
    pt3dadd(-55.0217762553576, -229.526134516262, 87.6767582511541, 1.19)
    pt3dadd(-54.917795662612, -230.516523122708, 87.6215818712778, 1.19)
    pt3dadd(-54.7747257216558, -231.471483916738, 87.3616186549188, 1.19)
    pt3dadd(-54.6316557806996, -232.426444710768, 87.1016554385598, 1.19)
    pt3dadd(-54.4885858397434, -233.381405504799, 86.8416922222007, 1.19)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(-54.4885858397434, -233.381405504799, 86.8416922222007, 1.19)
    pt3dadd(-54.3455158987872, -234.336366298829, 86.5817290058417, 1.19)
    pt3dadd(-54.202445957831, -235.291327092859, 86.3217657894827, 1.19)
    pt3dadd(-54.0593760168748, -236.24628788689, 86.0618025731237, 1.19)
  }
  soma[2] {pt3dclear()
    pt3dadd(-2.56645071427499, 80.5633837522018, 0, 10.4043260233424)
    pt3dadd(-2.23324234767914, 81.3153967209705, 0.568725486710531, 10.4043260233424)
    pt3dadd(-1.90003398108329, 82.0674096897393, 1.13745097342106, 10.1118742080783)
    pt3dadd(-1.56682561448744, 82.819422658508, 1.70617646013159, 9.60468635614927)
    pt3dadd(-1.23361724789159, 83.5714356272768, 2.27490194684212, 8.84590300647707)
    pt3dadd(-0.900408881295735, 84.3234485960456, 2.84362743355266, 7.76208734813001)
    pt3dadd(-0.567200514699883, 85.0754615648143, 3.41235292026319, 6.18465843842649)
    pt3dadd(-0.233992148104031, 85.8274745335831, 3.98107840697372, 3.5)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-0.233992148104031, 85.8274745335831, 3.98107840697372, 2.47906000584629)
    pt3dadd(0.0992162184918208, 86.5794875023518, 4.54980389368425, 2.47906000584629)
    pt3dadd(0.432424585087673, 87.3315004711206, 5.11852938039478, 2.11125382662694)
    pt3dadd(0.765632951683525, 88.0835134398893, 5.68725486710531, 1.81011959652796)
    pt3dadd(1.09884131827938, 88.8355264086581, 6.25598035381584, 1.56357174154146)
    pt3dadd(1.43204968487523, 89.5875393774268, 6.82470584052637, 1.3617154305586)
    pt3dadd(1.76525805147108, 90.3395523461956, 7.3934313272369, 1.19644946105406)
    pt3dadd(2.09846641806693, 91.0915653149643, 7.96215681394744, 1.06114112938344)
    pt3dadd(2.43167478466278, 91.8435782837331, 8.53088230065797, 0.950360037097033)
    pt3dadd(2.76488315125864, 92.5955912525018, 9.0996077873685, 0.85966014998258)
    pt3dadd(3.09809151785449, 93.3476042212706, 9.66833327407903, 0.785401363101277)
    pt3dadd(3.43129988445034, 94.0996171900393, 10.2370587607896, 0.72460341059529)
    pt3dadd(3.76450825104619, 94.8516301588081, 10.8057842475001, 0.674826257154464)
    pt3dadd(4.09771661764204, 95.6036431275768, 11.3745097342106, 0.634072170831778)
    pt3dadd(4.4309249842379, 96.3556560963456, 11.9432352209212, 0.600705547045801)
    pt3dadd(4.76413335083375, 97.1076690651144, 12.5119607076317, 0.573387266025838)
    pt3dadd(5.0973417174296, 97.8596820338831, 13.0806861943422, 0.551020949233567)
    pt3dadd(5.43055008402545, 98.6116950026519, 13.6494116810527, 0.532708957842651)
    pt3dadd(5.7637584506213, 99.3637079714206, 14.2181371677633, 0.517716367340809)
    pt3dadd(6.09696681721715, 100.115720940189, 14.7868626544738, 0.505441472428646)
    pt3dadd(6.43017518381301, 100.867733908958, 15.3555881411843, 0.495391638473257)
    pt3dadd(6.76338355040886, 101.619746877727, 15.9243136278949, 0.487163530350653)
    pt3dadd(7.09659191700471, 102.371759846496, 16.4930391146054, 0.480426925191027)
    pt3dadd(7.42980028360056, 103.123772815264, 17.0617646013159, 0.474911459375497)
    pt3dadd(7.76300865019642, 103.875785784033, 17.6304900880265, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(7.76300865019642, 103.875785784033, 17.6304900880265, 0.466698650595398)
    pt3dadd(8.09621701679227, 104.627798752802, 18.199215574737, 0.466698650595398)
    pt3dadd(8.42942538338812, 105.379811721571, 18.7679410614475, 0.463671698777356)
    pt3dadd(8.76263374998397, 106.131824690339, 19.3366665481581, 0.46119344023584)
    pt3dadd(9.09584211657982, 106.883837659108, 19.9053920348686, 0.459164413753823)
    pt3dadd(9.42905048317567, 107.635850627877, 20.4741175215791, 0.457503187374186)
    pt3dadd(9.76225884977153, 108.387863596646, 21.0428430082897, 0.456143090249352)
    pt3dadd(10.0954672163674, 109.139876565414, 21.6115684950002, 0.455029536906078)
    pt3dadd(10.4286755829632, 109.891889534183, 22.1802939817107, 0.454117836538747)
    pt3dadd(10.7618839495591, 110.643902502952, 22.7490194684212, 0.45337139941042)
    pt3dadd(11.0950923161549, 111.395915471721, 23.3177449551318, 0.45276026837822)
    pt3dadd(11.4283006827508, 112.147928440489, 23.8864704418423, 0.452259916607997)
    pt3dadd(11.7615090493466, 112.899941409258, 24.4551959285528, 0.451850263226359)
    pt3dadd(12.0947174159425, 113.651954378027, 25.0239214152634, 0.45151486740471)
    pt3dadd(12.4279257825383, 114.403967346796, 25.5926469019739, 0.451240268531071)
    pt3dadd(12.7611341491342, 115.155980315564, 26.1613723886844, 0.451015445988463)
    pt3dadd(13.09434251573, 115.907993284333, 26.730097875395, 0.450831376858844)
    pt3dadd(13.4275508823259, 116.660006253102, 27.2988233621055, 0.450680673801733)
    pt3dadd(13.7607592489217, 117.412019221871, 27.867548848816, 0.450557288574293)
    pt3dadd(14.0939676155176, 118.164032190639, 28.4362743355266, 0.450456269294113)
    pt3dadd(14.4271759821135, 118.916045159408, 29.0049998222371, 0.450373561702775)
    pt3dadd(14.7603843487093, 119.668058128177, 29.5737253089476, 0.450305846454234)
    pt3dadd(15.0935927153052, 120.420071096946, 30.1424507956581, 0.450250405897802)
    pt3dadd(15.426801081901, 121.172084065714, 30.7111762823687, 0.450205015009282)
    pt3dadd(15.7600094484969, 121.924097034483, 31.2799017690792, 0.450167852092942)
    pt3dadd(16.0932178150927, 122.676110003252, 31.8486272557897, 0.45013742567046)
    pt3dadd(16.4264261816886, 123.428122972021, 32.4173527425003, 0.450112514622668)
    pt3dadd(16.7596345482844, 124.180135940789, 32.9860782292108, 0.450092119181749)
    pt3dadd(17.0928429148803, 124.932148909558, 33.5548037159213, 0.450075420807047)
    pt3dadd(17.4260512814761, 125.684161878327, 34.1235292026319, 0.450061749334151)
    pt3dadd(17.759259648072, 126.436174847096, 34.6922546893424, 0.450050556078851)
    pt3dadd(18.0924680146678, 127.188187815864, 35.2609801760529, 0.450041391816511)
    pt3dadd(18.4256763812637, 127.940200784633, 35.8297056627635, 0.450033888753103)
    pt3dadd(18.7588847478595, 128.692213753402, 36.398431149474, 0.450027745764349)
    pt3dadd(19.0920931144554, 129.444226722171, 36.9671566361845, 0.45002271631054)
    pt3dadd(19.4253014810512, 130.196239690939, 37.5358821228951, 0.450018598542036)
  }
}
proc shape3d_17() {
  axon[0] {
    pt3dadd(19.7585098476471, 130.948252659708, 38.1046076096056, 0.450015227198327)
    pt3dadd(20.0917182142429, 131.700265628477, 38.6733330963161, 0.450012466975554)
    pt3dadd(20.4249265808388, 132.452278597246, 39.2420585830266, 0.450010207096284)
    pt3dadd(20.7581349474346, 133.204291566014, 39.8107840697372, 0.450008356863627)
    pt3dadd(21.0913433140305, 133.956304534783, 40.3795095564477, 0.450006842021251)
    pt3dadd(21.4245516806263, 134.708317503552, 40.9482350431582, 0.450005601773211)
    pt3dadd(21.7577600472222, 135.460330472321, 41.5169605298688, 0.450004586344)
    pt3dadd(22.090968413818, 136.21234344109, 42.0856860165793, 0.450003754980877)
    pt3dadd(22.4241767804139, 136.964356409858, 42.6544115032898, 0.450003074318321)
    pt3dadd(22.7573851470097, 137.716369378627, 43.2231369900004, 0.450002517038954)
    pt3dadd(23.0905935136056, 138.468382347396, 43.7918624767109, 0.450002060777199)
    pt3dadd(23.4238018802015, 139.220395316165, 44.3605879634214, 0.450001687221668)
    pt3dadd(23.7570102467973, 139.972408284933, 44.929313450132, 0.450001381380267)
    pt3dadd(24.0902186133932, 140.724421253702, 45.4980389368425, 0.450001130978506)
    pt3dadd(24.423426979989, 141.476434222471, 46.066764423553, 0.450000925966884)
    pt3dadd(24.7566353465849, 142.22844719124, 46.6354899102636, 0.450000758117564)
    pt3dadd(25.0898437131807, 142.980460160008, 47.2042153969741, 0.450000620694164)
    pt3dadd(25.4230520797766, 143.732473128777, 47.7729408836846, 0.450000508181401)
    pt3dadd(25.7562604463724, 144.484486097546, 48.3416663703951, 0.450000416063741)
    pt3dadd(26.0894688129683, 145.236499066315, 48.9103918571057, 0.45000034064418)
    pt3dadd(26.4226771795641, 145.988512035083, 49.4791173438162, 0.450000278895866)
    pt3dadd(26.75588554616, 146.740525003852, 50.0478428305267, 0.450000228340622)
    pt3dadd(27.0890939127558, 147.492537972621, 50.6165683172373, 0.45000018694949)
    pt3dadd(27.4223022793517, 148.24455094139, 51.1852938039478, 0.450000153061296)
    pt3dadd(27.7555106459475, 148.996563910158, 51.7540192906583, 0.45000012531599)
    pt3dadd(28.0887190125434, 149.748576878927, 52.3227447773689, 0.450000102600055)
    pt3dadd(28.4219273791392, 150.500589847696, 52.8914702640794, 0.450000084001821)
    pt3dadd(28.7551357457351, 151.252602816465, 53.4601957507899, 0.450000068774874)
    pt3dadd(29.0883441123309, 152.004615785233, 54.0289212375005, 0.450000056308104)
    pt3dadd(29.4215524789268, 152.756628754002, 54.597646724211, 0.450000046101177)
    pt3dadd(29.7547608455226, 153.508641722771, 55.1663722109215, 0.450000037744451)
    pt3dadd(30.0879692121185, 154.26065469154, 55.7350976976321, 0.450000030902543)
    pt3dadd(30.4211775787143, 155.012667660308, 56.3038231843426, 0.450000025300862)
    pt3dadd(30.7543859453102, 155.764680629077, 56.8725486710531, 0.450000020714594)
    pt3dadd(31.0875943119061, 156.516693597846, 57.4412741577636, 0.450000016959675)
    pt3dadd(31.4208026785019, 157.268706566615, 58.0099996444742, 0.450000013885408)
    pt3dadd(31.7540110450978, 158.020719535383, 58.5787251311847, 0.45000001136841)
    pt3dadd(32.0872194116936, 158.772732504152, 59.1474506178952, 0.450000009307667)
    pt3dadd(32.4204277782895, 159.524745472921, 59.7161761046058, 0.450000007620473)
    pt3dadd(32.7536361448853, 160.27675844169, 60.2849015913163, 0.450000006239116)
    pt3dadd(33.0868445114812, 161.028771410458, 60.8536270780268, 0.450000005108156)
    pt3dadd(33.420052878077, 161.780784379227, 61.4223525647374, 0.450000004182204)
    pt3dadd(33.7532612446729, 162.532797347996, 61.9910780514479, 0.450000003424099)
    pt3dadd(34.0864696112687, 163.284810316765, 62.5598035381584, 0.450000002803415)
    pt3dadd(34.4196779778646, 164.036823285533, 63.128529024869, 0.450000002295242)
    pt3dadd(34.7528863444604, 164.788836254302, 63.6972545115795, 0.450000001879186)
    pt3dadd(35.0860947110563, 165.540849223071, 64.26597999829, 0.450000001538547)
    pt3dadd(35.4193030776521, 166.29286219184, 64.8347054850006, 0.450000001259656)
    pt3dadd(35.752511444248, 167.044875160608, 65.4034309717111, 0.450000001031319)
    pt3dadd(36.0857198108438, 167.796888129377, 65.9721564584216, 0.450000000844373)
    pt3dadd(36.4189281774397, 168.548901098146, 66.5408819451321, 0.450000000691314)
    pt3dadd(36.7521365440355, 169.300914066915, 67.1096074318427, 0.450000000566)
    pt3dadd(37.0853449106314, 170.052927035683, 67.6783329185532, 0.450000000463401)
    pt3dadd(37.4185532772272, 170.804940004452, 68.2470584052637, 0.450000000379401)
    pt3dadd(37.7517616438231, 171.556952973221, 68.8157838919743, 0.450000000310627)
    pt3dadd(38.0849700104189, 172.30896594199, 69.3845093786848, 0.45000000025432)
    pt3dadd(38.4181783770148, 173.060978910758, 69.9532348653953, 0.45000000020822)
    pt3dadd(38.7513867436106, 173.812991879527, 70.5219603521059, 0.450000000170476)
    pt3dadd(39.0845951102065, 174.565004848296, 71.0906858388164, 0.450000000139574)
    pt3dadd(39.4178034768023, 175.317017817065, 71.6594113255269, 0.450000000114273)
    pt3dadd(39.7510118433982, 176.069030785833, 72.2281368122375, 0.450000000093559)
    pt3dadd(40.0842202099941, 176.821043754602, 72.796862298948, 0.4500000000766)
    pt3dadd(40.4174285765899, 177.573056723371, 73.3655877856585, 0.450000000062715)
    pt3dadd(40.7506369431858, 178.32506969214, 73.9343132723691, 0.450000000051346)
    pt3dadd(41.0838453097816, 179.077082660908, 74.5030387590796, 0.450000000042039)
    pt3dadd(41.4170536763775, 179.829095629677, 75.0717642457901, 0.450000000034418)
    pt3dadd(41.7502620429733, 180.581108598446, 75.6404897325006, 0.450000000028179)
    pt3dadd(42.0834704095692, 181.333121567215, 76.2092152192112, 0.450000000023071)
    pt3dadd(42.416678776165, 182.085134535983, 76.7779407059217, 0.450000000018889)
    pt3dadd(42.7498871427609, 182.837147504752, 77.3466661926322, 0.450000000015465)
    pt3dadd(43.0830955093567, 183.589160473521, 77.9153916793428, 0.450000000012662)
    pt3dadd(43.4163038759526, 184.34117344229, 78.4841171660533, 0.450000000010367)
    pt3dadd(43.7495122425484, 185.093186411058, 79.0528426527638, 0.450000000008488)
    pt3dadd(44.0827206091443, 185.845199379827, 79.6215681394744, 0.450000000006949)
    pt3dadd(44.4159289757401, 186.597212348596, 80.1902936261849, 0.450000000005689)
    pt3dadd(44.749137342336, 187.349225317365, 80.7590191128954, 0.450000000004658)
    pt3dadd(45.0823457089318, 188.101238286133, 81.327744599606, 0.450000000003814)
    pt3dadd(45.4155540755277, 188.853251254902, 81.8964700863165, 0.450000000003122)
    pt3dadd(45.7487624421235, 189.605264223671, 82.465195573027, 0.450000000002556)
    pt3dadd(46.0819708087194, 190.35727719244, 83.0339210597376, 0.450000000002093)
    pt3dadd(46.4151791753152, 191.109290161208, 83.6026465464481, 0.450000000001714)
    pt3dadd(46.7483875419111, 191.861303129977, 84.1713720331586, 0.450000000001403)
    pt3dadd(47.0815959085069, 192.613316098746, 84.7400975198691, 0.450000000001149)
    pt3dadd(47.4148042751028, 193.365329067515, 85.3088230065797, 0.45000000000094)
    pt3dadd(47.7480126416986, 194.117342036284, 85.8775484932902, 0.45000000000077)
    pt3dadd(48.0812210082945, 194.869355005052, 86.4462739800007, 0.45000000000063)
    pt3dadd(48.4144293748903, 195.621367973821, 87.0149994667113, 0.450000000000516)
    pt3dadd(48.7476377414862, 196.37338094259, 87.5837249534218, 0.450000000000423)
    pt3dadd(49.080846108082, 197.125393911359, 88.1524504401323, 0.450000000000346)
    pt3dadd(49.4140544746779, 197.877406880127, 88.7211759268429, 0.450000000000283)
    pt3dadd(49.7472628412738, 198.629419848896, 89.2899014135534, 0.450000000000232)
    pt3dadd(50.0804712078696, 199.381432817665, 89.8586269002639, 0.45000000000019)
    pt3dadd(50.4136795744655, 200.133445786434, 90.4273523869744, 0.450000000000155)
    pt3dadd(50.7468879410613, 200.885458755202, 90.996077873685, 0.450000000000127)
    pt3dadd(51.0800963076572, 201.637471723971, 91.5648033603955, 0.450000000000104)
    pt3dadd(51.413304674253, 202.38948469274, 92.133528847106, 0.450000000000085)
    pt3dadd(51.7465130408489, 203.141497661509, 92.7022543338166, 0.45000000000007)
    pt3dadd(52.0797214074447, 203.893510630277, 93.2709798205271, 0.450000000000057)
    pt3dadd(52.4129297740406, 204.645523599046, 93.8397053072376, 0.450000000000047)
    pt3dadd(52.7461381406364, 205.397536567815, 94.4084307939482, 0.450000000000038)
    pt3dadd(53.0793465072323, 206.149549536584, 94.9771562806587, 0.450000000000031)
    pt3dadd(53.4125548738281, 206.901562505352, 95.5458817673692, 0.450000000000026)
    pt3dadd(53.745763240424, 207.653575474121, 96.1146072540798, 0.450000000000021)
    pt3dadd(54.0789716070198, 208.40558844289, 96.6833327407903, 0.450000000000017)
    pt3dadd(54.4121799736157, 209.157601411659, 97.2520582275008, 0.450000000000014)
    pt3dadd(54.7453883402115, 209.909614380427, 97.8207837142114, 0.450000000000012)
    pt3dadd(55.0785967068074, 210.661627349196, 98.3895092009219, 0.450000000000009)
    pt3dadd(55.4118050734032, 211.413640317965, 98.9582346876324, 0.450000000000008)
    pt3dadd(55.7450134399991, 212.165653286734, 99.5269601743429, 0.450000000000006)
    pt3dadd(56.0782218065949, 212.917666255502, 100.095685661053, 0.450000000000005)
    pt3dadd(56.4114301731908, 213.669679224271, 100.664411147764, 0.450000000000004)
    pt3dadd(56.7446385397866, 214.42169219304, 101.233136634475, 0.450000000000004)
    pt3dadd(57.0778469063825, 215.173705161809, 101.801862121185, 0.450000000000003)
    pt3dadd(57.4110552729784, 215.925718130577, 102.370587607896, 0.450000000000002)
    pt3dadd(57.7442636395742, 216.677731099346, 102.939313094606, 0.450000000000002)
    pt3dadd(58.0774720061701, 217.429744068115, 103.508038581317, 0.450000000000002)
    pt3dadd(58.4106803727659, 218.181757036884, 104.076764068027, 0.450000000000001)
    pt3dadd(58.7438887393618, 218.933770005652, 104.645489554738, 0.450000000000001)
    pt3dadd(59.0770971059576, 219.685782974421, 105.214215041448, 0.450000000000001)
    pt3dadd(59.4103054725535, 220.43779594319, 105.782940528159, 0.450000000000001)
    pt3dadd(59.7435138391493, 221.189808911959, 106.351666014869, 0.450000000000001)
    pt3dadd(60.0767222057452, 221.941821880727, 106.92039150158, 0.45)
    pt3dadd(60.409930572341, 222.693834849496, 107.48911698829, 0.45)
    pt3dadd(60.7431389389369, 223.445847818265, 108.057842475001, 0.45)
    pt3dadd(61.0763473055327, 224.197860787034, 108.626567961711, 0.45)
    pt3dadd(61.4095556721286, 224.949873755802, 109.195293448422, 0.45)
    pt3dadd(61.7427640387244, 225.701886724571, 109.764018935133, 0.45)
    pt3dadd(62.0759724053203, 226.45389969334, 110.332744421843, 0.45)
    pt3dadd(62.4091807719161, 227.205912662109, 110.901469908554, 0.45)
    pt3dadd(62.742389138512, 227.957925630877, 111.470195395264, 0.45)
    pt3dadd(63.0755975051078, 228.709938599646, 112.038920881975, 0.45)
    pt3dadd(63.4088058717037, 229.461951568415, 112.607646368685, 0.45)
    pt3dadd(63.7420142382995, 230.213964537184, 113.176371855396, 0.45)
    pt3dadd(64.0752226048954, 230.965977505952, 113.745097342106, 0.45)
    pt3dadd(64.4084309714912, 231.717990474721, 114.313822828817, 0.45)
    pt3dadd(64.7416393380871, 232.47000344349, 114.882548315527, 0.45)
    pt3dadd(65.0748477046829, 233.222016412259, 115.451273802238, 0.45)
    pt3dadd(65.4080560712788, 233.974029381027, 116.019999288948, 0.45)
    pt3dadd(65.7412644378746, 234.726042349796, 116.588724775659, 0.45)
    pt3dadd(66.0744728044705, 235.478055318565, 117.157450262369, 0.45)
    pt3dadd(66.4076811710664, 236.230068287334, 117.72617574908, 0.45)
    pt3dadd(66.7408895376622, 236.982081256102, 118.29490123579, 0.45)
    pt3dadd(67.0740979042581, 237.734094224871, 118.863626722501, 0.45)
    pt3dadd(67.4073062708539, 238.48610719364, 119.432352209212, 0.45)
    pt3dadd(67.7405146374498, 239.238120162409, 120.001077695922, 0.45)
    pt3dadd(68.0737230040456, 239.990133131177, 120.569803182633, 0.45)
    pt3dadd(68.4069313706415, 240.742146099946, 121.138528669343, 0.45)
    pt3dadd(68.7401397372373, 241.494159068715, 121.707254156054, 0.45)
    pt3dadd(69.0733481038332, 242.246172037484, 122.275979642764, 0.45)
    pt3dadd(69.406556470429, 242.998185006252, 122.844705129475, 0.45)
    pt3dadd(69.7397648370249, 243.750197975021, 123.413430616185, 0.45)
    pt3dadd(70.0729732036207, 244.50221094379, 123.982156102896, 0.45)
    pt3dadd(70.4061815702166, 245.254223912559, 124.550881589606, 0.45)
    pt3dadd(70.7393899368124, 246.006236881327, 125.119607076317, 0.45)
    pt3dadd(71.0725983034083, 246.758249850096, 125.688332563027, 0.45)
    pt3dadd(71.4058066700041, 247.510262818865, 126.257058049738, 0.45)
    pt3dadd(71.7390150366, 248.262275787634, 126.825783536448, 0.45)
    pt3dadd(72.0722234031958, 249.014288756402, 127.394509023159, 0.45)
    pt3dadd(72.4054317697917, 249.766301725171, 127.96323450987, 0.45)
    pt3dadd(72.7386401363875, 250.51831469394, 128.53195999658, 0.45)
    pt3dadd(73.0718485029834, 251.270327662709, 129.100685483291, 0.45)
    pt3dadd(73.4050568695792, 252.022340631478, 129.669410970001, 0.45)
    pt3dadd(73.7382652361751, 252.774353600246, 130.238136456712, 0.45)
    pt3dadd(74.071473602771, 253.526366569015, 130.806861943422, 0.45)
    pt3dadd(74.4046819693668, 254.278379537784, 131.375587430133, 0.45)
    pt3dadd(74.7378903359626, 255.030392506553, 131.944312916843, 0.45)
    pt3dadd(75.0710987025585, 255.782405475321, 132.513038403554, 0.45)
    pt3dadd(75.4043070691544, 256.53441844409, 133.081763890264, 0.45)
    pt3dadd(75.7375154357502, 257.286431412859, 133.650489376975, 0.45)
    pt3dadd(76.0707238023461, 258.038444381628, 134.219214863685, 0.45)
    pt3dadd(76.4039321689419, 258.790457350396, 134.787940350396, 0.45)
    pt3dadd(76.7371405355378, 259.542470319165, 135.356665837106, 0.45)
    pt3dadd(77.0703489021336, 260.294483287934, 135.925391323817, 0.45)
    pt3dadd(77.4035572687295, 261.046496256703, 136.494116810527, 0.45)
    pt3dadd(77.7367656353253, 261.798509225471, 137.062842297238, 0.45)
    pt3dadd(78.0699740019212, 262.55052219424, 137.631567783949, 0.45)
    pt3dadd(78.403182368517, 263.302535163009, 138.200293270659, 0.45)
    pt3dadd(78.7363907351129, 264.054548131778, 138.76901875737, 0.45)
    pt3dadd(79.0695991017087, 264.806561100546, 139.33774424408, 0.45)
    pt3dadd(79.4028074683046, 265.558574069315, 139.906469730791, 0.45)
    pt3dadd(79.7360158349004, 266.310587038084, 140.475195217501, 0.45)
    pt3dadd(80.0692242014963, 267.062600006853, 141.043920704212, 0.45)
    pt3dadd(80.4024325680921, 267.814612975621, 141.612646190922, 0.45)
    pt3dadd(80.735640934688, 268.56662594439, 142.181371677633, 0.45)
    pt3dadd(81.0688493012838, 269.318638913159, 142.750097164343, 0.45)
    pt3dadd(81.4020576678797, 270.070651881928, 143.318822651054, 0.45)
    pt3dadd(81.7352660344755, 270.822664850696, 143.887548137764, 0.45)
    pt3dadd(82.0684744010714, 271.574677819465, 144.456273624475, 0.45)
    pt3dadd(82.4016827676672, 272.326690788234, 145.024999111185, 0.45)
    pt3dadd(82.7348911342631, 273.078703757003, 145.593724597896, 0.45)
    pt3dadd(83.0680995008589, 273.830716725771, 146.162450084606, 0.45)
    pt3dadd(83.4013078674548, 274.58272969454, 146.731175571317, 0.45)
    pt3dadd(83.7345162340506, 275.334742663309, 147.299901058028, 0.45)
    pt3dadd(84.0677246006465, 276.086755632078, 147.868626544738, 0.45)
    pt3dadd(84.4009329672424, 276.838768600846, 148.437352031449, 0.45)
    pt3dadd(84.7341413338382, 277.590781569615, 149.006077518159, 0.45)
    pt3dadd(85.0673497004341, 278.342794538384, 149.57480300487, 0.45)
    pt3dadd(85.4005580670299, 279.094807507153, 150.14352849158, 0.45)
    pt3dadd(85.7337664336258, 279.846820475921, 150.712253978291, 0.45)
    pt3dadd(86.0669748002216, 280.59883344469, 151.280979465001, 0.45)
    pt3dadd(86.4001831668175, 281.350846413459, 151.849704951712, 0.45)
    pt3dadd(86.7333915334133, 282.102859382228, 152.418430438422, 0.45)
    pt3dadd(87.0665999000092, 282.854872350996, 152.987155925133, 0.45)
    pt3dadd(87.399808266605, 283.606885319765, 153.555881411843, 0.45)
    pt3dadd(87.7330166332009, 284.358898288534, 154.124606898554, 0.45)
    pt3dadd(88.0662249997967, 285.110911257303, 154.693332385264, 0.45)
    pt3dadd(88.3994333663926, 285.862924226071, 155.262057871975, 0.45)
    pt3dadd(88.7326417329884, 286.61493719484, 155.830783358686, 0.45)
    pt3dadd(89.0658500995843, 287.366950163609, 156.399508845396, 0.45)
    pt3dadd(89.3990584661801, 288.118963132378, 156.968234332107, 0.45)
    pt3dadd(89.732266832776, 288.870976101146, 157.536959818817, 0.45)
    pt3dadd(90.0654751993718, 289.622989069915, 158.105685305528, 0.45)
    pt3dadd(90.3986835659677, 290.375002038684, 158.674410792238, 0.45)
    pt3dadd(90.7318919325635, 291.127015007453, 159.243136278949, 0.45)
    pt3dadd(91.0651002991594, 291.879027976221, 159.811861765659, 0.45)
    pt3dadd(91.3983086657552, 292.63104094499, 160.38058725237, 0.45)
    pt3dadd(91.7315170323511, 293.383053913759, 160.94931273908, 0.45)
    pt3dadd(92.0647253989469, 294.135066882528, 161.518038225791, 0.45)
    pt3dadd(92.3979337655428, 294.887079851296, 162.086763712501, 0.45)
    pt3dadd(92.7311421321387, 295.639092820065, 162.655489199212, 0.45)
    pt3dadd(93.0643504987345, 296.391105788834, 163.224214685922, 0.45)
    pt3dadd(93.3975588653304, 297.143118757603, 163.792940172633, 0.45)
    pt3dadd(93.7307672319262, 297.895131726371, 164.361665659343, 0.45)
    pt3dadd(94.0639755985221, 298.64714469514, 164.930391146054, 0.45)
    pt3dadd(94.3971839651179, 299.399157663909, 165.499116632765, 0.45)
    pt3dadd(94.7303923317138, 300.151170632678, 166.067842119475, 0.45)
    pt3dadd(95.0636006983096, 300.903183601446, 166.636567606186, 0.45)
    pt3dadd(95.3968090649055, 301.655196570215, 167.205293092896, 0.45)
    pt3dadd(95.7300174315013, 302.407209538984, 167.774018579607, 0.45)
    pt3dadd(96.0632257980972, 303.159222507753, 168.342744066317, 0.45)
    pt3dadd(96.396434164693, 303.911235476521, 168.911469553028, 0.45)
    pt3dadd(96.7296425312889, 304.66324844529, 169.480195039738, 0.45)
    pt3dadd(97.0628508978847, 305.415261414059, 170.048920526449, 0.45)
    pt3dadd(97.3960592644806, 306.167274382828, 170.617646013159, 0.45)
    pt3dadd(97.7292676310764, 306.919287351596, 171.18637149987, 0.45)
    pt3dadd(98.0624759976723, 307.671300320365, 171.75509698658, 0.45)
    pt3dadd(98.3956843642681, 308.423313289134, 172.323822473291, 0.45)
    pt3dadd(98.728892730864, 309.175326257903, 172.892547960001, 0.45)
    pt3dadd(99.0621010974598, 309.927339226672, 173.461273446712, 0.45)
    pt3dadd(99.3953094640557, 310.67935219544, 174.029998933423, 0.45)
    pt3dadd(99.7285178306515, 311.431365164209, 174.598724420133, 0.45)
    pt3dadd(100.061726197247, 312.183378132978, 175.167449906844, 0.45)
    pt3dadd(100.394934563843, 312.935391101747, 175.736175393554, 0.45)
    pt3dadd(100.728142930439, 313.687404070515, 176.304900880265, 0.45)
    pt3dadd(101.061351297035, 314.439417039284, 176.873626366975, 0.45)
    pt3dadd(101.394559663631, 315.191430008053, 177.442351853686, 0.45)
    pt3dadd(101.727768030227, 315.943442976822, 178.011077340396, 0.45)
    pt3dadd(102.060976396823, 316.69545594559, 178.579802827107, 0.45)
    pt3dadd(102.394184763418, 317.447468914359, 179.148528313817, 0.45)
  }
}
proc shape3d_18() {
  axon[0] {
    pt3dadd(102.727393130014, 318.199481883128, 179.717253800528, 0.45)
    pt3dadd(103.06060149661, 318.951494851897, 180.285979287238, 0.45)
    pt3dadd(103.393809863206, 319.703507820665, 180.854704773949, 0.45)
    pt3dadd(103.727018229802, 320.455520789434, 181.423430260659, 0.45)
    pt3dadd(104.060226596398, 321.207533758203, 181.99215574737, 0.45)
    pt3dadd(104.393434962993, 321.959546726972, 182.56088123408, 0.45)
    pt3dadd(104.726643329589, 322.71155969574, 183.129606720791, 0.45)
    pt3dadd(105.059851696185, 323.463572664509, 183.698332207502, 0.45)
    pt3dadd(105.393060062781, 324.215585633278, 184.267057694212, 0.45)
    pt3dadd(105.726268429377, 324.967598602047, 184.835783180923, 0.45)
    pt3dadd(106.059476795973, 325.719611570815, 185.404508667633, 0.45)
    pt3dadd(106.392685162569, 326.471624539584, 185.973234154344, 0.45)
    pt3dadd(106.725893529164, 327.223637508353, 186.541959641054, 0.45)
    pt3dadd(107.05910189576, 327.975650477122, 187.110685127765, 0.45)
    pt3dadd(107.392310262356, 328.72766344589, 187.679410614475, 0.45)
    pt3dadd(107.725518628952, 329.479676414659, 188.248136101186, 0.45)
    pt3dadd(108.058726995548, 330.231689383428, 188.816861587896, 0.45)
    pt3dadd(108.391935362144, 330.983702352197, 189.385587074607, 0.45)
    pt3dadd(108.72514372874, 331.735715320965, 189.954312561317, 0.45)
    pt3dadd(109.058352095335, 332.487728289734, 190.523038048028, 0.45)
    pt3dadd(109.391560461931, 333.239741258503, 191.091763534738, 0.45)
    pt3dadd(109.724768828527, 333.991754227272, 191.660489021449, 0.45)
    pt3dadd(110.057977195123, 334.74376719604, 192.22921450816, 0.45)
    pt3dadd(110.391185561719, 335.495780164809, 192.79793999487, 0.45)
    pt3dadd(110.724393928315, 336.247793133578, 193.366665481581, 0.45)
    pt3dadd(111.057602294911, 336.999806102347, 193.935390968291, 0.45)
    pt3dadd(111.390810661506, 337.751819071115, 194.504116455002, 0.45)
    pt3dadd(111.724019028102, 338.503832039884, 195.072841941712, 0.45)
    pt3dadd(112.057227394698, 339.255845008653, 195.641567428423, 0.45)
    pt3dadd(112.390435761294, 340.007857977422, 196.210292915133, 0.45)
    pt3dadd(112.72364412789, 340.75987094619, 196.779018401844, 0.45)
    pt3dadd(113.056852494486, 341.511883914959, 197.347743888554, 0.45)
    pt3dadd(113.390060861081, 342.263896883728, 197.916469375265, 0.45)
    pt3dadd(113.723269227677, 343.015909852497, 198.485194861975, 0.45)
    pt3dadd(114.056477594273, 343.767922821265, 199.053920348686, 0.45)
    pt3dadd(114.389685960869, 344.519935790034, 199.622645835396, 0.45)
    pt3dadd(114.722894327465, 345.271948758803, 200.191371322107, 0.45)
    pt3dadd(115.056102694061, 346.023961727572, 200.760096808817, 0.45)
    pt3dadd(115.389311060657, 346.77597469634, 201.328822295528, 0.45)
    pt3dadd(115.722519427252, 347.527987665109, 201.897547782239, 0.45)
    pt3dadd(116.055727793848, 348.280000633878, 202.466273268949, 0.45)
    pt3dadd(116.388936160444, 349.032013602647, 203.03499875566, 0.45)
    pt3dadd(116.72214452704, 349.784026571415, 203.60372424237, 0.45)
    pt3dadd(117.055352893636, 350.536039540184, 204.172449729081, 0.45)
    pt3dadd(117.388561260232, 351.288052508953, 204.741175215791, 0.45)
    pt3dadd(117.721769626828, 352.040065477722, 205.309900702502, 0.45)
    pt3dadd(118.054977993423, 352.79207844649, 205.878626189212, 0.45)
    pt3dadd(118.388186360019, 353.544091415259, 206.447351675923, 0.45)
    pt3dadd(118.721394726615, 354.296104384028, 207.016077162633, 0.45)
    pt3dadd(119.054603093211, 355.048117352797, 207.584802649344, 0.45)
    pt3dadd(119.387811459807, 355.800130321565, 208.153528136054, 0.45)
    pt3dadd(119.721019826403, 356.552143290334, 208.722253622765, 0.45)
    pt3dadd(120.054228192999, 357.304156259103, 209.290979109475, 0.45)
    pt3dadd(120.387436559594, 358.056169227872, 209.859704596186, 0.45)
    pt3dadd(120.72064492619, 358.80818219664, 210.428430082897, 0.45)
    pt3dadd(121.053853292786, 359.560195165409, 210.997155569607, 0.45)
    pt3dadd(121.387061659382, 360.312208134178, 211.565881056318, 0.45)
    pt3dadd(121.720270025978, 361.064221102947, 212.134606543028, 0.45)
    pt3dadd(122.053478392574, 361.816234071715, 212.703332029739, 0.45)
    pt3dadd(122.386686759169, 362.568247040484, 213.272057516449, 0.45)
    pt3dadd(122.719895125765, 363.320260009253, 213.84078300316, 0.45)
    pt3dadd(123.053103492361, 364.072272978022, 214.40950848987, 0.45)
    pt3dadd(123.386311858957, 364.82428594679, 214.978233976581, 0.45)
    pt3dadd(123.719520225553, 365.576298915559, 215.546959463291, 0.45)
    pt3dadd(124.052728592149, 366.328311884328, 216.115684950002, 0.45)
    pt3dadd(124.385936958745, 367.080324853097, 216.684410436712, 0.45)
    pt3dadd(124.71914532534, 367.832337821865, 217.253135923423, 0.45)
    pt3dadd(125.052353691936, 368.584350790634, 217.821861410133, 0.45)
    pt3dadd(125.385562058532, 369.336363759403, 218.390586896844, 0.45)
    pt3dadd(125.718770425128, 370.088376728172, 218.959312383554, 0.45)
    pt3dadd(126.051978791724, 370.840389696941, 219.528037870265, 0.45)
    pt3dadd(126.38518715832, 371.592402665709, 220.096763356976, 0.45)
    pt3dadd(126.718395524916, 372.344415634478, 220.665488843686, 0.45)
    pt3dadd(127.051603891511, 373.096428603247, 221.234214330397, 0.45)
    pt3dadd(127.384812258107, 373.848441572016, 221.802939817107, 0.45)
    pt3dadd(127.718020624703, 374.600454540784, 222.371665303818, 0.45)
    pt3dadd(128.051228991299, 375.352467509553, 222.940390790528, 0.45)
    pt3dadd(128.384437357895, 376.104480478322, 223.509116277239, 0.45)
    pt3dadd(128.717645724491, 376.856493447091, 224.077841763949, 0.45)
    pt3dadd(129.050854091087, 377.608506415859, 224.64656725066, 0.45)
    pt3dadd(129.384062457682, 378.360519384628, 225.21529273737, 0.45)
    pt3dadd(129.717270824278, 379.112532353397, 225.784018224081, 0.45)
    pt3dadd(130.050479190874, 379.864545322166, 226.352743710791, 0.45)
    pt3dadd(130.38368755747, 380.616558290934, 226.921469197502, 0.45)
    pt3dadd(130.716895924066, 381.368571259703, 227.490194684212, 0.45)
    pt3dadd(131.050104290662, 382.120584228472, 228.058920170923, 0.45)
    pt3dadd(131.383312657257, 382.872597197241, 228.627645657634, 0.45)
    pt3dadd(131.716521023853, 383.624610166009, 229.196371144344, 0.45)
    pt3dadd(132.049729390449, 384.376623134778, 229.765096631055, 0.45)
    pt3dadd(132.382937757045, 385.128636103547, 230.333822117765, 0.45)
    pt3dadd(132.716146123641, 385.880649072316, 230.902547604476, 0.45)
    pt3dadd(133.049354490237, 386.632662041084, 231.471273091186, 0.45)
    pt3dadd(133.382562856833, 387.384675009853, 232.039998577897, 0.45)
    pt3dadd(133.715771223428, 388.136687978622, 232.608724064607, 0.45)
    pt3dadd(134.048979590024, 388.888700947391, 233.177449551318, 0.45)
    pt3dadd(134.38218795662, 389.640713916159, 233.746175038028, 0.45)
    pt3dadd(134.715396323216, 390.392726884928, 234.314900524739, 0.45)
    pt3dadd(135.048604689812, 391.144739853697, 234.883626011449, 0.45)
    pt3dadd(135.381813056408, 391.896752822466, 235.45235149816, 0.45)
    pt3dadd(135.715021423004, 392.648765791234, 236.02107698487, 0.45)
    pt3dadd(136.048229789599, 393.400778760003, 236.589802471581, 0.45)
    pt3dadd(136.381438156195, 394.152791728772, 237.158527958291, 0.45)
    pt3dadd(136.714646522791, 394.904804697541, 237.727253445002, 0.45)
    pt3dadd(137.047854889387, 395.656817666309, 238.295978931713, 0.45)
    pt3dadd(137.381063255983, 396.408830635078, 238.864704418423, 0.45)
    pt3dadd(137.714271622579, 397.160843603847, 239.433429905134, 0.45)
    pt3dadd(138.047479989175, 397.912856572616, 240.002155391844, 0.45)
    pt3dadd(138.38068835577, 398.664869541384, 240.570880878555, 0.45)
    pt3dadd(138.713896722366, 399.416882510153, 241.139606365265, 0.45)
    pt3dadd(139.047105088962, 400.168895478922, 241.708331851976, 0.45)
    pt3dadd(139.380313455558, 400.920908447691, 242.277057338686, 0.45)
    pt3dadd(139.713521822154, 401.672921416459, 242.845782825397, 0.45)
    pt3dadd(140.04673018875, 402.424934385228, 243.414508312107, 0.45)
    pt3dadd(140.379938555345, 403.176947353997, 243.983233798818, 0.45)
    pt3dadd(140.713146921941, 403.928960322766, 244.551959285528, 0.45)
    pt3dadd(141.046355288537, 404.680973291534, 245.120684772239, 0.45)
    pt3dadd(141.379563655133, 405.432986260303, 245.689410258949, 0.45)
    pt3dadd(141.712772021729, 406.184999229072, 246.25813574566, 0.45)
    pt3dadd(142.045980388325, 406.937012197841, 246.826861232371, 0.45)
    pt3dadd(142.379188754921, 407.689025166609, 247.395586719081, 0.45)
    pt3dadd(142.712397121516, 408.441038135378, 247.964312205792, 0.45)
    pt3dadd(143.045605488112, 409.193051104147, 248.533037692502, 0.45)
    pt3dadd(143.378813854708, 409.945064072916, 249.101763179213, 0.45)
    pt3dadd(143.712022221304, 410.697077041684, 249.670488665923, 0.45)
    pt3dadd(144.0452305879, 411.449090010453, 250.239214152634, 0.45)
    pt3dadd(144.378438954496, 412.201102979222, 250.807939639344, 0.45)
    pt3dadd(144.711647321092, 412.953115947991, 251.376665126055, 0.45)
    pt3dadd(145.044855687687, 413.705128916759, 251.945390612765, 0.45)
    pt3dadd(145.378064054283, 414.457141885528, 252.514116099476, 0.45)
    pt3dadd(145.711272420879, 415.209154854297, 253.082841586186, 0.45)
    pt3dadd(146.044480787475, 415.961167823066, 253.651567072897, 0.45)
    pt3dadd(146.377689154071, 416.713180791834, 254.220292559607, 0.45)
    pt3dadd(146.710897520667, 417.465193760603, 254.789018046318, 0.45)
    pt3dadd(147.044105887263, 418.217206729372, 255.357743533028, 0.45)
    pt3dadd(147.377314253858, 418.969219698141, 255.926469019739, 0.45)
    pt3dadd(147.710522620454, 419.721232666909, 256.49519450645, 0.45)
    pt3dadd(148.04373098705, 420.473245635678, 257.06391999316, 0.45)
    pt3dadd(148.376939353646, 421.225258604447, 257.632645479871, 0.45)
    pt3dadd(148.710147720242, 421.977271573216, 258.201370966581, 0.45)
    pt3dadd(149.043356086838, 422.729284541984, 258.770096453292, 0.45)
    pt3dadd(149.376564453433, 423.481297510753, 259.338821940002, 0.45)
    pt3dadd(149.709772820029, 424.233310479522, 259.907547426713, 0.45)
    pt3dadd(150.042981186625, 424.985323448291, 260.476272913423, 0.45)
    pt3dadd(150.376189553221, 425.737336417059, 261.044998400134, 0.45)
    pt3dadd(150.709397919817, 426.489349385828, 261.613723886844, 0.45)
    pt3dadd(151.042606286413, 427.241362354597, 262.182449373555, 0.45)
    pt3dadd(151.375814653009, 427.993375323366, 262.751174860265, 0.45)
    pt3dadd(151.709023019604, 428.745388292134, 263.319900346976, 0.45)
    pt3dadd(152.0422313862, 429.497401260903, 263.888625833686, 0.45)
    pt3dadd(152.375439752796, 430.249414229672, 264.457351320397, 0.45)
    pt3dadd(152.708648119392, 431.001427198441, 265.026076807108, 0.45)
    pt3dadd(153.041856485988, 431.753440167209, 265.594802293818, 0.45)
    pt3dadd(153.375064852584, 432.505453135978, 266.163527780529, 0.45)
    pt3dadd(153.70827321918, 433.257466104747, 266.732253267239, 0.45)
    pt3dadd(154.041481585775, 434.009479073516, 267.30097875395, 0.45)
    pt3dadd(154.374689952371, 434.761492042284, 267.86970424066, 0.45)
    pt3dadd(154.707898318967, 435.513505011053, 268.438429727371, 0.45)
    pt3dadd(155.041106685563, 436.265517979822, 269.007155214081, 0.45)
    pt3dadd(155.374315052159, 437.017530948591, 269.575880700792, 0.45)
    pt3dadd(155.707523418755, 437.76954391736, 270.144606187502, 0.45)
    pt3dadd(156.040731785351, 438.521556886128, 270.713331674213, 0.45)
    pt3dadd(156.373940151946, 439.273569854897, 271.282057160923, 0.45)
    pt3dadd(156.707148518542, 440.025582823666, 271.850782647634, 0.45)
    pt3dadd(157.040356885138, 440.777595792435, 272.419508134344, 0.45)
    pt3dadd(157.373565251734, 441.529608761203, 272.988233621055, 0.45)
    pt3dadd(157.70677361833, 442.281621729972, 273.556959107765, 0.45)
    pt3dadd(158.039981984926, 443.033634698741, 274.125684594476, 0.45)
    pt3dadd(158.373190351521, 443.78564766751, 274.694410081187, 0.45)
    pt3dadd(158.706398718117, 444.537660636278, 275.263135567897, 0.45)
    pt3dadd(159.039607084713, 445.289673605047, 275.831861054608, 0.45)
    pt3dadd(159.372815451309, 446.041686573816, 276.400586541318, 0.45)
    pt3dadd(159.706023817905, 446.793699542585, 276.969312028029, 0.45)
    pt3dadd(160.039232184501, 447.545712511353, 277.538037514739, 0.45)
    pt3dadd(160.372440551097, 448.297725480122, 278.10676300145, 0.45)
    pt3dadd(160.705648917692, 449.049738448891, 278.67548848816, 0.45)
    pt3dadd(161.038857284288, 449.80175141766, 279.244213974871, 0.45)
    pt3dadd(161.372065650884, 450.553764386428, 279.812939461581, 0.45)
    pt3dadd(161.70527401748, 451.305777355197, 280.381664948292, 0.45)
    pt3dadd(162.038482384076, 452.057790323966, 280.950390435002, 0.45)
    pt3dadd(162.371690750672, 452.809803292735, 281.519115921713, 0.45)
    pt3dadd(162.704899117268, 453.561816261503, 282.087841408423, 0.45)
    pt3dadd(163.038107483863, 454.313829230272, 282.656566895134, 0.45)
    pt3dadd(163.371315850459, 455.065842199041, 283.225292381845, 0.45)
    pt3dadd(163.704524217055, 455.81785516781, 283.794017868555, 0.45)
    pt3dadd(164.037732583651, 456.569868136578, 284.362743355266, 0.45)
    pt3dadd(164.370940950247, 457.321881105347, 284.931468841976, 0.45)
    pt3dadd(164.704149316843, 458.073894074116, 285.500194328687, 0.45)
    pt3dadd(165.037357683439, 458.825907042885, 286.068919815397, 0.45)
    pt3dadd(165.370566050034, 459.577920011653, 286.637645302108, 0.45)
    pt3dadd(165.70377441663, 460.329932980422, 287.206370788818, 0.45)
    pt3dadd(166.036982783226, 461.081945949191, 287.775096275529, 0.45)
    pt3dadd(166.370191149822, 461.83395891796, 288.343821762239, 0.45)
    pt3dadd(166.703399516418, 462.585971886728, 288.91254724895, 0.45)
    pt3dadd(167.036607883014, 463.337984855497, 289.48127273566, 0.45)
    pt3dadd(167.369816249609, 464.089997824266, 290.049998222371, 0.45)
    pt3dadd(167.703024616205, 464.842010793035, 290.618723709081, 0.45)
    pt3dadd(168.036232982801, 465.594023761803, 291.187449195792, 0.45)
    pt3dadd(168.369441349397, 466.346036730572, 291.756174682502, 0.45)
    pt3dadd(168.702649715993, 467.098049699341, 292.324900169213, 0.45)
    pt3dadd(169.035858082589, 467.85006266811, 292.893625655924, 0.45)
    pt3dadd(169.369066449185, 468.602075636878, 293.462351142634, 0.45)
    pt3dadd(169.70227481578, 469.354088605647, 294.031076629345, 0.45)
    pt3dadd(170.035483182376, 470.106101574416, 294.599802116055, 0.45)
    pt3dadd(170.368691548972, 470.858114543185, 295.168527602766, 0.45)
    pt3dadd(170.701899915568, 471.610127511953, 295.737253089476, 0.45)
    pt3dadd(171.035108282164, 472.362140480722, 296.305978576187, 0.45)
    pt3dadd(171.36831664876, 473.114153449491, 296.874704062897, 0.45)
    pt3dadd(171.701525015356, 473.86616641826, 297.443429549608, 0.45)
    pt3dadd(172.034733381951, 474.618179387028, 298.012155036318, 0.45)
    pt3dadd(172.367941748547, 475.370192355797, 298.580880523029, 0.45)
    pt3dadd(172.701150115143, 476.122205324566, 299.149606009739, 0.45)
    pt3dadd(173.034358481739, 476.874218293335, 299.71833149645, 0.45)
    pt3dadd(173.367566848335, 477.626231262103, 300.28705698316, 0.45)
    pt3dadd(173.700775214931, 478.378244230872, 300.855782469871, 0.45)
    pt3dadd(174.033983581527, 479.130257199641, 301.424507956582, 0.45)
    pt3dadd(174.367191948122, 479.88227016841, 301.993233443292, 0.45)
    pt3dadd(174.700400314718, 480.634283137178, 302.561958930003, 0.45)
    pt3dadd(175.033608681314, 481.386296105947, 303.130684416713, 0.45)
    pt3dadd(175.36681704791, 482.138309074716, 303.699409903424, 0.45)
    pt3dadd(175.700025414506, 482.890322043485, 304.268135390134, 0.45)
    pt3dadd(176.033233781102, 483.642335012253, 304.836860876845, 0.45)
    pt3dadd(176.366442147697, 484.394347981022, 305.405586363555, 0.45)
    pt3dadd(176.699650514293, 485.146360949791, 305.974311850266, 0.45)
    pt3dadd(177.032858880889, 485.89837391856, 306.543037336976, 0.45)
    pt3dadd(177.366067247485, 486.650386887328, 307.111762823687, 0.45)
    pt3dadd(177.699275614081, 487.402399856097, 307.680488310397, 0.45)
    pt3dadd(178.032483980677, 488.154412824866, 308.249213797108, 0.45)
    pt3dadd(178.365692347273, 488.906425793635, 308.817939283818, 0.45)
    pt3dadd(178.698900713868, 489.658438762403, 309.386664770529, 0.45)
    pt3dadd(179.032109080464, 490.410451731172, 309.955390257239, 0.45)
    pt3dadd(179.36531744706, 491.162464699941, 310.52411574395, 0.45)
    pt3dadd(179.698525813656, 491.91447766871, 311.092841230661, 0.45)
    pt3dadd(180.031734180252, 492.666490637478, 311.661566717371, 0.45)
    pt3dadd(180.364942546848, 493.418503606247, 312.230292204082, 0.45)
    pt3dadd(180.698150913444, 494.170516575016, 312.799017690792, 0.45)
    pt3dadd(181.031359280039, 494.922529543785, 313.367743177503, 0.45)
    pt3dadd(181.364567646635, 495.674542512554, 313.936468664213, 0.45)
    pt3dadd(181.697776013231, 496.426555481322, 314.505194150924, 0.45)
    pt3dadd(182.030984379827, 497.178568450091, 315.073919637634, 0.45)
    pt3dadd(182.364192746423, 497.93058141886, 315.642645124345, 0.45)
    pt3dadd(182.697401113019, 498.682594387629, 316.211370611055, 0.45)
    pt3dadd(183.030609479615, 499.434607356397, 316.780096097766, 0.45)
    pt3dadd(183.36381784621, 500.186620325166, 317.348821584476, 0.45)
    pt3dadd(183.697026212806, 500.938633293935, 317.917547071187, 0.45)
    pt3dadd(184.030234579402, 501.690646262704, 318.486272557897, 0.45)
    pt3dadd(184.363442945998, 502.442659231472, 319.054998044608, 0.45)
    pt3dadd(184.696651312594, 503.194672200241, 319.623723531318, 0.45)
    pt3dadd(185.02985967919, 503.94668516901, 320.192449018029, 0.45)
    pt3dadd(185.363068045785, 504.698698137779, 320.76117450474, 0.45)
  }
}
proc shape3d_19() {
  axon[0] {
    pt3dadd(185.696276412381, 505.450711106547, 321.32989999145, 0.45)
    pt3dadd(186.029484778977, 506.202724075316, 321.898625478161, 0.45)
    pt3dadd(186.362693145573, 506.954737044085, 322.467350964871, 0.45)
    pt3dadd(186.695901512169, 507.706750012854, 323.036076451582, 0.45)
    pt3dadd(187.029109878765, 508.458762981622, 323.604801938292, 0.45)
    pt3dadd(187.362318245361, 509.210775950391, 324.173527425003, 0.45)
    pt3dadd(187.695526611956, 509.96278891916, 324.742252911713, 0.45)
    pt3dadd(188.028734978552, 510.714801887929, 325.310978398424, 0.45)
    pt3dadd(188.361943345148, 511.466814856697, 325.879703885134, 0.45)
    pt3dadd(188.695151711744, 512.218827825466, 326.448429371845, 0.45)
    pt3dadd(189.02836007834, 512.970840794235, 327.017154858555, 0.45)
    pt3dadd(189.361568444936, 513.722853763004, 327.585880345266, 0.45)
    pt3dadd(189.694776811532, 514.474866731772, 328.154605831976, 0.45)
    pt3dadd(190.027985178127, 515.226879700541, 328.723331318687, 0.45)
    pt3dadd(190.361193544723, 515.97889266931, 329.292056805398, 0.45)
    pt3dadd(190.694401911319, 516.730905638079, 329.860782292108, 0.45)
    pt3dadd(191.027610277915, 517.482918606847, 330.429507778819, 0.45)
    pt3dadd(191.360818644511, 518.234931575616, 330.998233265529, 0.45)
    pt3dadd(191.694027011107, 518.986944544385, 331.56695875224, 0.45)
    pt3dadd(192.027235377703, 519.738957513154, 332.13568423895, 0.45)
    pt3dadd(192.360443744298, 520.490970481922, 332.704409725661, 0.45)
    pt3dadd(192.693652110894, 521.242983450691, 333.273135212371, 0.45)
    pt3dadd(193.02686047749, 521.99499641946, 333.841860699082, 0.45)
    pt3dadd(193.360068844086, 522.747009388229, 334.410586185792, 0.45)
    pt3dadd(193.693277210682, 523.499022356997, 334.979311672503, 0.45)
    pt3dadd(194.026485577278, 524.251035325766, 335.548037159213, 0.45)
    pt3dadd(194.359693943873, 525.003048294535, 336.116762645924, 0.45)
    pt3dadd(194.692902310469, 525.755061263304, 336.685488132634, 0.45)
    pt3dadd(195.026110677065, 526.507074232072, 337.254213619345, 0.45)
    pt3dadd(195.359319043661, 527.259087200841, 337.822939106056, 0.45)
    pt3dadd(195.692527410257, 528.01110016961, 338.391664592766, 0.45)
    pt3dadd(196.025735776853, 528.763113138379, 338.960390079477, 0.45)
    pt3dadd(196.358944143449, 529.515126107147, 339.529115566187, 0.45)
    pt3dadd(196.692152510044, 530.267139075916, 340.097841052898, 0.45)
    pt3dadd(197.02536087664, 531.019152044685, 340.666566539608, 0.45)
    pt3dadd(197.358569243236, 531.771165013454, 341.235292026319, 0.45)
    pt3dadd(197.691777609832, 532.523177982222, 341.804017513029, 0.45)
    pt3dadd(198.024985976428, 533.275190950991, 342.37274299974, 0.45)
    pt3dadd(198.358194343024, 534.02720391976, 342.94146848645, 0.45)
    pt3dadd(198.69140270962, 534.779216888529, 343.510193973161, 0.45)
    pt3dadd(199.024611076215, 535.531229857297, 344.078919459871, 0.45)
    pt3dadd(199.357819442811, 536.283242826066, 344.647644946582, 0.45)
    pt3dadd(199.691027809407, 537.035255794835, 345.216370433292, 0.45)
    pt3dadd(200.024236176003, 537.787268763604, 345.785095920003, 0.45)
    pt3dadd(200.357444542599, 538.539281732373, 346.353821406713, 0.45)
    pt3dadd(200.690652909195, 539.291294701141, 346.922546893424, 0.45)
    pt3dadd(201.023861275791, 540.04330766991, 347.491272380135, 0.45)
    pt3dadd(201.357069642386, 540.795320638679, 348.059997866845, 0.45)
    pt3dadd(201.690278008982, 541.547333607447, 348.628723353556, 0.45)
    pt3dadd(202.023486375578, 542.299346576216, 349.197448840266, 0.45)
    pt3dadd(202.356694742174, 543.051359544985, 349.766174326977, 0.45)
    pt3dadd(202.68990310877, 543.803372513754, 350.334899813687, 0.45)
    pt3dadd(203.023111475366, 544.555385482523, 350.903625300398, 0.45)
    pt3dadd(203.356319841961, 545.307398451291, 351.472350787108, 0.45)
    pt3dadd(203.689528208557, 546.05941142006, 352.041076273819, 0.45)
    pt3dadd(204.022736575153, 546.811424388829, 352.609801760529, 0.45)
    pt3dadd(204.355944941749, 547.563437357597, 353.17852724724, 0.45)
    pt3dadd(204.689153308345, 548.315450326366, 353.74725273395, 0.45)
    pt3dadd(205.022361674941, 549.067463295135, 354.315978220661, 0.45)
    pt3dadd(205.355570041537, 549.819476263904, 354.884703707371, 0.45)
    pt3dadd(205.688778408132, 550.571489232673, 355.453429194082, 0.45)
    pt3dadd(206.021986774728, 551.323502201441, 356.022154680792, 0.45)
    pt3dadd(206.355195141324, 552.07551517021, 356.590880167503, 0.45)
    pt3dadd(206.68840350792, 552.827528138979, 357.159605654214, 0.45)
    pt3dadd(207.021611874516, 553.579541107747, 357.728331140924, 0.45)
    pt3dadd(207.354820241112, 554.331554076516, 358.297056627635, 0.45)
    pt3dadd(207.688028607708, 555.083567045285, 358.865782114345, 0.45)
    pt3dadd(208.021236974303, 555.835580014054, 359.434507601056, 0.45)
    pt3dadd(208.354445340899, 556.587592982823, 360.003233087766, 0.45)
    pt3dadd(208.687653707495, 557.339605951591, 360.571958574477, 0.45)
    pt3dadd(209.020862074091, 558.09161892036, 361.140684061187, 0.45)
    pt3dadd(209.354070440687, 558.843631889129, 361.709409547898, 0.45)
    pt3dadd(209.687278807283, 559.595644857897, 362.278135034608, 0.45)
    pt3dadd(210.020487173879, 560.347657826666, 362.846860521319, 0.45)
    pt3dadd(210.353695540474, 561.099670795435, 363.415586008029, 0.45)
    pt3dadd(210.68690390707, 561.851683764204, 363.98431149474, 0.45)
    pt3dadd(211.020112273666, 562.603696732973, 364.55303698145, 0.45)
    pt3dadd(211.353320640262, 563.355709701741, 365.121762468161, 0.45)
    pt3dadd(211.686529006858, 564.10772267051, 365.690487954872, 0.45)
    pt3dadd(212.019737373454, 564.859735639279, 366.259213441582, 0.45)
    pt3dadd(212.352945740049, 565.611748608047, 366.827938928293, 0.45)
    pt3dadd(212.686154106645, 566.363761576816, 367.396664415003, 0.45)
    pt3dadd(213.019362473241, 567.115774545585, 367.965389901714, 0.45)
    pt3dadd(213.352570839837, 567.867787514354, 368.534115388424, 0.45)
    pt3dadd(213.685779206433, 568.619800483123, 369.102840875135, 0.45)
    pt3dadd(214.018987573029, 569.371813451891, 369.671566361845, 0.45)
    pt3dadd(214.352195939625, 570.12382642066, 370.240291848556, 0.45)
    pt3dadd(214.68540430622, 570.875839389429, 370.809017335266, 0.45)
    pt3dadd(215.018612672816, 571.627852358198, 371.377742821977, 0.45)
    pt3dadd(215.351821039412, 572.379865326966, 371.946468308687, 0.45)
    pt3dadd(215.685029406008, 573.131878295735, 372.515193795398, 0.45)
    pt3dadd(216.018237772604, 573.883891264504, 373.083919282108, 0.45)
    pt3dadd(216.3514461392, 574.635904233273, 373.652644768819, 0.45)
    pt3dadd(216.684654505796, 575.387917202041, 374.22137025553, 0.45)
    pt3dadd(217.017862872391, 576.13993017081, 374.79009574224, 0.45)
    pt3dadd(217.351071238987, 576.891943139579, 375.358821228951, 0.45)
    pt3dadd(217.684279605583, 577.643956108348, 375.927546715661, 0.45)
    pt3dadd(218.017487972179, 578.395969077116, 376.496272202372, 0.45)
    pt3dadd(218.350696338775, 579.147982045885, 377.064997689082, 0.45)
    pt3dadd(218.683904705371, 579.899995014654, 377.633723175793, 0.45)
    pt3dadd(219.017113071967, 580.652007983423, 378.202448662503, 0.45)
    pt3dadd(219.350321438562, 581.404020952191, 378.771174149214, 0.45)
    pt3dadd(219.683529805158, 582.15603392096, 379.339899635924, 0.45)
    pt3dadd(220.016738171754, 582.908046889729, 379.908625122635, 0.45)
    pt3dadd(220.34994653835, 583.660059858498, 380.477350609345, 0.45)
    pt3dadd(220.683154904946, 584.412072827266, 381.046076096056, 0.45)
    pt3dadd(221.016363271542, 585.164085796035, 381.614801582766, 0.45)
    pt3dadd(221.349571638137, 585.916098764804, 382.183527069477, 0.45)
    pt3dadd(221.682780004733, 586.668111733573, 382.752252556187, 0.45)
    pt3dadd(222.015988371329, 587.420124702341, 383.320978042898, 0.45)
    pt3dadd(222.349196737925, 588.17213767111, 383.889703529609, 0.45)
    pt3dadd(222.682405104521, 588.924150639879, 384.458429016319, 0.45)
    pt3dadd(223.015613471117, 589.676163608648, 385.02715450303, 0.45)
    pt3dadd(223.348821837713, 590.428176577416, 385.59587998974, 0.45)
    pt3dadd(223.682030204308, 591.180189546185, 386.164605476451, 0.45)
    pt3dadd(224.015238570904, 591.932202514954, 386.733330963161, 0.45)
    pt3dadd(224.3484469375, 592.684215483723, 387.302056449872, 0.45)
    pt3dadd(224.681655304096, 593.436228452491, 387.870781936582, 0.45)
    pt3dadd(225.014863670692, 594.18824142126, 388.439507423293, 0.45)
    pt3dadd(225.348072037288, 594.940254390029, 389.008232910003, 0.45)
    pt3dadd(225.681280403884, 595.692267358798, 389.576958396714, 0.45)
    pt3dadd(226.014488770479, 596.444280327567, 390.145683883424, 0.45)
    pt3dadd(226.347697137075, 597.196293296335, 390.714409370135, 0.45)
    pt3dadd(226.680905503671, 597.948306265104, 391.283134856845, 0.45)
    pt3dadd(227.014113870267, 598.700319233873, 391.851860343556, 0.45)
    pt3dadd(227.347322236863, 599.452332202641, 392.420585830266, 0.45)
    pt3dadd(227.680530603459, 600.20434517141, 392.989311316977, 0.45)
    pt3dadd(228.013738970055, 600.956358140179, 393.558036803688, 0.45)
    pt3dadd(228.34694733665, 601.708371108948, 394.126762290398, 0.45)
    pt3dadd(228.680155703246, 602.460384077717, 394.695487777109, 0.45)
    pt3dadd(229.013364069842, 603.212397046485, 395.264213263819, 0.45)
    pt3dadd(229.346572436438, 603.964410015254, 395.83293875053, 0.45)
    pt3dadd(229.679780803034, 604.716422984023, 396.40166423724, 0.45)
    pt3dadd(230.01298916963, 605.468435952791, 396.970389723951, 0.45)
    pt3dadd(230.346197536225, 606.22044892156, 397.539115210661, 0.45)
    pt3dadd(230.679405902821, 606.972461890329, 398.107840697372, 0.45)
    pt3dadd(231.012614269417, 607.724474859098, 398.676566184082, 0.45)
    pt3dadd(231.345822636013, 608.476487827867, 399.245291670793, 0.45)
    pt3dadd(231.679031002609, 609.228500796635, 399.814017157503, 0.45)
    pt3dadd(232.012239369205, 609.980513765404, 400.382742644214, 0.45)
    pt3dadd(232.345447735801, 610.732526734173, 400.951468130924, 0.45)
    pt3dadd(232.678656102396, 611.484539702941, 401.520193617635, 0.45)
    pt3dadd(233.011864468992, 612.23655267171, 402.088919104346, 0.45)
    pt3dadd(233.345072835588, 612.988565640479, 402.657644591056, 0.45)
    pt3dadd(233.678281202184, 613.740578609248, 403.226370077767, 0.45)
    pt3dadd(234.01148956878, 614.492591578017, 403.795095564477, 0.45)
    pt3dadd(234.344697935376, 615.244604546785, 404.363821051188, 0.45)
    pt3dadd(234.677906301972, 615.996617515554, 404.932546537898, 0.45)
    pt3dadd(235.011114668567, 616.748630484323, 405.501272024609, 0.45)
    pt3dadd(235.344323035163, 617.500643453091, 406.069997511319, 0.45)
    pt3dadd(235.677531401759, 618.25265642186, 406.63872299803, 0.45)
    pt3dadd(236.010739768355, 619.004669390629, 407.20744848474, 0.45)
    pt3dadd(236.343948134951, 619.756682359398, 407.776173971451, 0.45)
    pt3dadd(236.677156501547, 620.508695328167, 408.344899458161, 0.45)
    pt3dadd(237.010364868143, 621.260708296935, 408.913624944872, 0.45)
    pt3dadd(237.343573234738, 622.012721265704, 409.482350431582, 0.45)
    pt3dadd(237.676781601334, 622.764734234473, 410.051075918293, 0.45)
    pt3dadd(238.00998996793, 623.516747203241, 410.619801405004, 0.45)
    pt3dadd(238.343198334526, 624.26876017201, 411.188526891714, 0.45)
    pt3dadd(238.676406701122, 625.020773140779, 411.757252378425, 0.45)
    pt3dadd(239.009615067718, 625.772786109548, 412.325977865135, 0.45)
    pt3dadd(239.342823434313, 626.524799078317, 412.894703351846, 0.45)
    pt3dadd(239.676031800909, 627.276812047085, 413.463428838556, 0.45)
    pt3dadd(240.009240167505, 628.028825015854, 414.032154325267, 0.45)
    pt3dadd(240.342448534101, 628.780837984623, 414.600879811977, 0.45)
    pt3dadd(240.675656900697, 629.532850953392, 415.169605298688, 0.45)
    pt3dadd(241.008865267293, 630.28486392216, 415.738330785398, 0.45)
    pt3dadd(241.342073633889, 631.036876890929, 416.307056272109, 0.45)
    pt3dadd(241.675282000484, 631.788889859698, 416.875781758819, 0.45)
    pt3dadd(242.00849036708, 632.540902828467, 417.44450724553, 0.45)
    pt3dadd(242.341698733676, 633.292915797235, 418.01323273224, 0.45)
    pt3dadd(242.674907100272, 634.044928766004, 418.581958218951, 0.45)
    pt3dadd(243.008115466868, 634.796941734773, 419.150683705661, 0.45)
    pt3dadd(243.341323833464, 635.548954703542, 419.719409192372, 0.45)
    pt3dadd(243.67453220006, 636.30096767231, 420.288134679083, 0.45)
    pt3dadd(244.007740566655, 637.052980641079, 420.856860165793, 0.45)
    pt3dadd(244.340948933251, 637.804993609848, 421.425585652504, 0.45)
    pt3dadd(244.674157299847, 638.557006578617, 421.994311139214, 0.45)
    pt3dadd(245.007365666443, 639.309019547385, 422.563036625925, 0.45)
    pt3dadd(245.340574033039, 640.061032516154, 423.131762112635, 0.45)
    pt3dadd(245.673782399635, 640.813045484923, 423.700487599346, 0.45)
    pt3dadd(246.006990766231, 641.565058453692, 424.269213086056, 0.45)
    pt3dadd(246.340199132826, 642.31707142246, 424.837938572767, 0.45)
    pt3dadd(246.673407499422, 643.069084391229, 425.406664059477, 0.45)
    pt3dadd(247.006615866018, 643.821097359998, 425.975389546188, 0.45)
    pt3dadd(247.339824232614, 644.573110328767, 426.544115032898, 0.45)
    pt3dadd(247.67303259921, 645.325123297535, 427.112840519609, 0.45)
    pt3dadd(248.006240965806, 646.077136266304, 427.681566006319, 0.45)
    pt3dadd(248.339449332402, 646.829149235073, 428.25029149303, 0.45)
    pt3dadd(248.672657698997, 647.581162203842, 428.81901697974, 0.45)
    pt3dadd(249.005866065593, 648.33317517261, 429.387742466451, 0.45)
    pt3dadd(249.339074432189, 649.085188141379, 429.956467953162, 0.45)
    pt3dadd(249.672282798785, 649.837201110148, 430.525193439872, 0.45)
    pt3dadd(250.005491165381, 650.589214078917, 431.093918926583, 0.45)
    pt3dadd(250.338699531977, 651.341227047685, 431.662644413293, 0.45)
    pt3dadd(250.671907898572, 652.093240016454, 432.231369900004, 0.45)
    pt3dadd(251.005116265168, 652.845252985223, 432.800095386714, 0.45)
    pt3dadd(251.338324631764, 653.597265953992, 433.368820873425, 0.45)
    pt3dadd(251.67153299836, 654.349278922761, 433.937546360135, 0.45)
    pt3dadd(252.004741364956, 655.101291891529, 434.506271846846, 0.45)
    pt3dadd(252.337949731552, 655.853304860298, 435.074997333556, 0.45)
    pt3dadd(252.671158098148, 656.605317829067, 435.643722820267, 0.45)
    pt3dadd(253.004366464743, 657.357330797835, 436.212448306977, 0.45)
    pt3dadd(253.337574831339, 658.109343766604, 436.781173793688, 0.45)
    pt3dadd(253.670783197935, 658.861356735373, 437.349899280398, 0.45)
    pt3dadd(254.003991564531, 659.613369704142, 437.918624767109, 0.45)
    pt3dadd(254.337199931127, 660.365382672911, 438.48735025382, 0.45)
    pt3dadd(254.670408297723, 661.117395641679, 439.05607574053, 0.45)
    pt3dadd(255.003616664319, 661.869408610448, 439.624801227241, 0.45)
    pt3dadd(255.336825030914, 662.621421579217, 440.193526713951, 0.45)
    pt3dadd(255.67003339751, 663.373434547985, 440.762252200662, 0.45)
    pt3dadd(256.003241764106, 664.125447516754, 441.330977687372, 0.45)
    pt3dadd(256.336450130702, 664.877460485523, 441.899703174083, 0.45)
    pt3dadd(256.669658497298, 665.629473454292, 442.468428660793, 0.45)
    pt3dadd(257.002866863894, 666.381486423061, 443.037154147504, 0.45)
    pt3dadd(257.336075230489, 667.133499391829, 443.605879634214, 0.45)
    pt3dadd(257.669283597085, 667.885512360598, 444.174605120925, 0.45)
    pt3dadd(258.002491963681, 668.637525329367, 444.743330607635, 0.45)
    pt3dadd(258.335700330277, 669.389538298135, 445.312056094346, 0.45)
    pt3dadd(258.668908696873, 670.141551266904, 445.880781581056, 0.45)
    pt3dadd(259.002117063469, 670.893564235673, 446.449507067767, 0.45)
    pt3dadd(259.335325430065, 671.645577204442, 447.018232554477, 0.45)
    pt3dadd(259.66853379666, 672.397590173211, 447.586958041188, 0.45)
    pt3dadd(260.001742163256, 673.149603141979, 448.155683527899, 0.45)
    pt3dadd(260.334950529852, 673.901616110748, 448.724409014609, 0.45)
    pt3dadd(260.668158896448, 674.653629079517, 449.29313450132, 0.45)
    pt3dadd(261.001367263044, 675.405642048285, 449.86185998803, 0.45)
    pt3dadd(261.33457562964, 676.157655017054, 450.430585474741, 0.45)
    pt3dadd(261.667783996236, 676.909667985823, 450.999310961451, 0.45)
    pt3dadd(262.000992362831, 677.661680954592, 451.568036448162, 0.45)
    pt3dadd(262.334200729427, 678.413693923361, 452.136761934872, 0.45)
    pt3dadd(262.667409096023, 679.165706892129, 452.705487421583, 0.45)
    pt3dadd(263.000617462619, 679.917719860898, 453.274212908293, 0.45)
    pt3dadd(263.333825829215, 680.669732829667, 453.842938395004, 0.45)
    pt3dadd(263.667034195811, 681.421745798436, 454.411663881714, 0.45)
    pt3dadd(264.000242562407, 682.173758767204, 454.980389368425, 0.45)
    pt3dadd(264.333450929002, 682.925771735973, 455.549114855135, 0.45)
    pt3dadd(264.666659295598, 683.677784704742, 456.117840341846, 0.45)
    pt3dadd(264.999867662194, 684.429797673511, 456.686565828557, 0.45)
    pt3dadd(265.33307602879, 685.181810642279, 457.255291315267, 0.45)
    pt3dadd(265.666284395386, 685.933823611048, 457.824016801978, 0.45)
    pt3dadd(265.999492761982, 686.685836579817, 458.392742288688, 0.45)
    pt3dadd(266.332701128577, 687.437849548586, 458.961467775399, 0.45)
    pt3dadd(266.665909495173, 688.189862517354, 459.530193262109, 0.45)
    pt3dadd(266.999117861769, 688.941875486123, 460.09891874882, 0.45)
    pt3dadd(267.332326228365, 689.693888454892, 460.66764423553, 0.45)
    pt3dadd(267.665534594961, 690.445901423661, 461.236369722241, 0.45)
    pt3dadd(267.998742961557, 691.197914392429, 461.805095208951, 0.45)
    pt3dadd(268.331951328153, 691.949927361198, 462.373820695662, 0.45)
  }
}
proc shape3d_20() {
  axon[0] {
    pt3dadd(268.665159694748, 692.701940329967, 462.942546182372, 0.45)
    pt3dadd(268.998368061344, 693.453953298736, 463.511271669083, 0.45)
    pt3dadd(269.33157642794, 694.205966267504, 464.079997155793, 0.45)
    pt3dadd(269.664784794536, 694.957979236273, 464.648722642504, 0.45)
    pt3dadd(269.997993161132, 695.709992205042, 465.217448129214, 0.45)
    pt3dadd(270.331201527728, 696.462005173811, 465.786173615925, 0.45)
    pt3dadd(270.664409894324, 697.214018142579, 466.354899102636, 0.45)
    pt3dadd(270.997618260919, 697.966031111348, 466.923624589346, 0.45)
    pt3dadd(271.330826627515, 698.718044080117, 467.492350076057, 0.45)
    pt3dadd(271.664034994111, 699.470057048886, 468.061075562767, 0.45)
    pt3dadd(271.997243360707, 700.222070017654, 468.629801049478, 0.45)
    pt3dadd(272.330451727303, 700.974082986423, 469.198526536188, 0.45)
    pt3dadd(272.663660093899, 701.726095955192, 469.767252022899, 0.45)
    pt3dadd(272.996868460495, 702.478108923961, 470.335977509609, 0.45)
    pt3dadd(273.33007682709, 703.230121892729, 470.90470299632, 0.45)
    pt3dadd(273.663285193686, 703.982134861498, 471.47342848303, 0.45)
    pt3dadd(273.996493560282, 704.734147830267, 472.042153969741, 0.45)
    pt3dadd(274.329701926878, 705.486160799036, 472.610879456451, 0.45)
    pt3dadd(274.662910293474, 706.238173767804, 473.179604943162, 0.45)
    pt3dadd(274.99611866007, 706.990186736573, 473.748330429872, 0.45)
    pt3dadd(275.329327026666, 707.742199705342, 474.317055916583, 0.45)
    pt3dadd(275.662535393261, 708.494212674111, 474.885781403293, 0.45)
    pt3dadd(275.995743759857, 709.246225642879, 475.454506890004, 0.45)
    pt3dadd(276.328952126453, 709.998238611648, 476.023232376715, 0.45)
    pt3dadd(276.662160493049, 710.750251580417, 476.591957863425, 0.45)
    pt3dadd(276.995368859645, 711.502264549186, 477.160683350136, 0.45)
    pt3dadd(277.328577226241, 712.254277517955, 477.729408836846, 0.45)
    pt3dadd(277.661785592836, 713.006290486723, 478.298134323557, 0.45)
    pt3dadd(277.994993959432, 713.758303455492, 478.866859810267, 0.45)
    pt3dadd(278.328202326028, 714.510316424261, 479.435585296978, 0.45)
    pt3dadd(278.661410692624, 715.262329393029, 480.004310783688, 0.45)
    pt3dadd(278.99461905922, 716.014342361798, 480.573036270399, 0.45)
    pt3dadd(279.327827425816, 716.766355330567, 481.141761757109, 0.45)
    pt3dadd(279.661035792412, 717.518368299336, 481.71048724382, 0.45)
    pt3dadd(279.994244159007, 718.270381268105, 482.27921273053, 0.45)
    pt3dadd(280.327452525603, 719.022394236873, 482.847938217241, 0.45)
    pt3dadd(280.660660892199, 719.774407205642, 483.416663703951, 0.45)
    pt3dadd(280.993869258795, 720.526420174411, 483.985389190662, 0.45)
    pt3dadd(281.327077625391, 721.278433143179, 484.554114677373, 0.45)
    pt3dadd(281.660285991987, 722.030446111948, 485.122840164083, 0.45)
    pt3dadd(281.993494358583, 722.782459080717, 485.691565650794, 0.45)
    pt3dadd(282.326702725178, 723.534472049486, 486.260291137504, 0.45)
    pt3dadd(282.659911091774, 724.286485018255, 486.829016624215, 0.45)
    pt3dadd(282.99311945837, 725.038497987023, 487.397742110925, 0.45)
    pt3dadd(283.326327824966, 725.790510955792, 487.966467597636, 0.45)
    pt3dadd(283.659536191562, 726.542523924561, 488.535193084346, 0.45)
    pt3dadd(283.992744558158, 727.294536893329, 489.103918571057, 0.45)
    pt3dadd(284.325952924753, 728.046549862098, 489.672644057767, 0.45)
    pt3dadd(284.659161291349, 728.798562830867, 490.241369544478, 0.45)
    pt3dadd(284.992369657945, 729.550575799636, 490.810095031188, 0.45)
    pt3dadd(285.325578024541, 730.302588768405, 491.378820517899, 0.45)
    pt3dadd(285.658786391137, 731.054601737173, 491.947546004609, 0.45)
    pt3dadd(285.991994757733, 731.806614705942, 492.51627149132, 0.45)
    pt3dadd(286.325203124329, 732.558627674711, 493.084996978031, 0.45)
    pt3dadd(286.658411490924, 733.310640643479, 493.653722464741, 0.45)
    pt3dadd(286.99161985752, 734.062653612248, 494.222447951452, 0.45)
    pt3dadd(287.324828224116, 734.814666581017, 494.791173438162, 0.45)
    pt3dadd(287.658036590712, 735.566679549786, 495.359898924873, 0.45)
    pt3dadd(287.991244957308, 736.318692518555, 495.928624411583, 0.45)
    pt3dadd(288.324453323904, 737.070705487323, 496.497349898294, 0.45)
    pt3dadd(288.6576616905, 737.822718456092, 497.066075385004, 0.45)
    pt3dadd(288.990870057095, 738.574731424861, 497.634800871715, 0.45)
    pt3dadd(289.324078423691, 739.32674439363, 498.203526358425, 0.45)
    pt3dadd(289.657286790287, 740.078757362398, 498.772251845136, 0.45)
    pt3dadd(289.990495156883, 740.830770331167, 499.340977331846, 0.45)
    pt3dadd(290.323703523479, 741.582783299936, 499.909702818557, 0.45)
    pt3dadd(290.656911890075, 742.334796268705, 500.478428305267, 0.45)
    pt3dadd(290.990120256671, 743.086809237473, 501.047153791978, 0.45)
    pt3dadd(291.323328623266, 743.838822206242, 501.615879278688, 0.45)
    pt3dadd(291.656536989862, 744.590835175011, 502.184604765399, 0.45)
    pt3dadd(291.989745356458, 745.34284814378, 502.75333025211, 0.45)
    pt3dadd(292.322953723054, 746.094861112548, 503.32205573882, 0.45)
    pt3dadd(292.65616208965, 746.846874081317, 503.890781225531, 0.45)
    pt3dadd(292.989370456246, 747.598887050086, 504.459506712241, 0.45)
    pt3dadd(293.322578822841, 748.350900018855, 505.028232198952, 0.45)
    pt3dadd(293.655787189437, 749.102912987623, 505.596957685662, 0.45)
    pt3dadd(293.988995556033, 749.854925956392, 506.165683172373, 0.45)
    pt3dadd(294.322203922629, 750.606938925161, 506.734408659083, 0.45)
    pt3dadd(294.655412289225, 751.35895189393, 507.303134145794, 0.45)
    pt3dadd(294.988620655821, 752.110964862698, 507.871859632504, 0.45)
    pt3dadd(295.321829022417, 752.862977831467, 508.440585119215, 0.45)
    pt3dadd(295.655037389012, 753.614990800236, 509.009310605925, 0.45)
    pt3dadd(295.988245755608, 754.367003769005, 509.578036092636, 0.45)
    pt3dadd(296.321454122204, 755.119016737773, 510.146761579346, 0.45)
    pt3dadd(296.6546624888, 755.871029706542, 510.715487066057, 0.45)
    pt3dadd(296.987870855396, 756.623042675311, 511.284212552767, 0.45)
    pt3dadd(297.321079221992, 757.37505564408, 511.852938039478, 0.45)
    pt3dadd(297.654287588588, 758.127068612848, 512.421663526189, 0.45)
    pt3dadd(297.987495955183, 758.879081581617, 512.990389012899, 0.45)
    pt3dadd(298.320704321779, 759.631094550386, 513.55911449961, 0.45)
    pt3dadd(298.653912688375, 760.383107519155, 514.12783998632, 0.45)
    pt3dadd(298.987121054971, 761.135120487923, 514.696565473031, 0.45)
    pt3dadd(299.320329421567, 761.887133456692, 515.265290959741, 0.45)
    pt3dadd(299.653537788163, 762.639146425461, 515.834016446452, 0.45)
    pt3dadd(299.986746154759, 763.39115939423, 516.402741933162, 0.45)
    pt3dadd(300.319954521354, 764.143172362998, 516.971467419873, 0.45)
    pt3dadd(300.65316288795, 764.895185331767, 517.540192906583, 0.45)
    pt3dadd(300.986371254546, 765.647198300536, 518.108918393294, 0.45)
    pt3dadd(301.319579621142, 766.399211269305, 518.677643880004, 0.45)
    pt3dadd(301.652787987738, 767.151224238073, 519.246369366715, 0.45)
    pt3dadd(301.985996354334, 767.903237206842, 519.815094853425, 0.45)
    pt3dadd(302.31920472093, 768.655250175611, 520.383820340136, 0.45)
    pt3dadd(302.652413087525, 769.40726314438, 520.952545826847, 0.45)
    pt3dadd(302.985621454121, 770.159276113149, 521.521271313557, 0.45)
    pt3dadd(303.318829820717, 770.911289081917, 522.089996800268, 0.45)
    pt3dadd(303.652038187313, 771.663302050686, 522.658722286978, 0.45)
    pt3dadd(303.985246553909, 772.415315019455, 523.227447773689, 0.45)
    pt3dadd(304.318454920505, 773.167327988223, 523.796173260399, 0.45)
    pt3dadd(304.6516632871, 773.919340956992, 524.36489874711, 0.45)
    pt3dadd(304.984871653696, 774.671353925761, 524.93362423382, 0.45)
    pt3dadd(305.318080020292, 775.42336689453, 525.502349720531, 0.45)
    pt3dadd(305.651288386888, 776.175379863299, 526.071075207241, 0.45)
    pt3dadd(305.984496753484, 776.927392832067, 526.639800693952, 0.45)
    pt3dadd(306.31770512008, 777.679405800836, 527.208526180662, 0.45)
    pt3dadd(306.650913486676, 778.431418769605, 527.777251667373, 0.45)
    pt3dadd(306.984121853271, 779.183431738373, 528.345977154083, 0.45)
    pt3dadd(307.317330219867, 779.935444707142, 528.914702640794, 0.45)
    pt3dadd(307.650538586463, 780.687457675911, 529.483428127504, 0.45)
    pt3dadd(307.983746953059, 781.43947064468, 530.052153614215, 0.45)
    pt3dadd(308.316955319655, 782.191483613449, 530.620879100926, 0.45)
    pt3dadd(308.650163686251, 782.943496582217, 531.189604587636, 0.45)
    pt3dadd(308.983372052847, 783.695509550986, 531.758330074347, 0.45)
    pt3dadd(309.316580419442, 784.447522519755, 532.327055561057, 0.45)
    pt3dadd(309.649788786038, 785.199535488523, 532.895781047768, 0.45)
    pt3dadd(309.982997152634, 785.951548457292, 533.464506534478, 0.45)
    pt3dadd(310.31620551923, 786.703561426061, 534.033232021189, 0.45)
    pt3dadd(310.649413885826, 787.45557439483, 534.601957507899, 0.45)
    pt3dadd(310.982622252422, 788.207587363599, 535.17068299461, 0.45)
    pt3dadd(311.315830619018, 788.959600332367, 535.73940848132, 0.45)
    pt3dadd(311.649038985613, 789.711613301136, 536.308133968031, 0.45)
    pt3dadd(311.982247352209, 790.463626269905, 536.876859454741, 0.45)
    pt3dadd(312.315455718805, 791.215639238673, 537.445584941452, 0.45)
    pt3dadd(312.648664085401, 791.967652207442, 538.014310428163, 0.45)
    pt3dadd(312.981872451997, 792.719665176211, 538.583035914873, 0.45)
    pt3dadd(313.315080818593, 793.47167814498, 539.151761401583, 0.45)
    pt3dadd(313.648289185188, 794.223691113749, 539.720486888294, 0.45)
    pt3dadd(313.981497551784, 794.975704082517, 540.289212375005, 0.45)
    pt3dadd(314.31470591838, 795.727717051286, 540.857937861715, 0.45)
    pt3dadd(314.647914284976, 796.479730020055, 541.426663348426, 0.45)
    pt3dadd(314.981122651572, 797.231742988824, 541.995388835136, 0.45)
    pt3dadd(315.314331018168, 797.983755957592, 542.564114321847, 0.45)
    pt3dadd(315.647539384764, 798.735768926361, 543.132839808557, 0.45)
    pt3dadd(315.980747751359, 799.48778189513, 543.701565295268, 0.45)
    pt3dadd(316.313956117955, 800.239794863899, 544.270290781978, 0.45)
    pt3dadd(316.647164484551, 800.991807832667, 544.839016268689, 0.45)
    pt3dadd(316.980372851147, 801.743820801436, 545.407741755399, 0.45)
    pt3dadd(317.313581217743, 802.495833770205, 545.97646724211, 0.45)
    pt3dadd(317.646789584339, 803.247846738974, 546.54519272882, 0.45)
    pt3dadd(317.979997950935, 803.999859707742, 547.113918215531, 0.45)
    pt3dadd(318.31320631753, 804.751872676511, 547.682643702242, 0.45)
    pt3dadd(318.646414684126, 805.50388564528, 548.251369188952, 0.45)
    pt3dadd(318.979623050722, 806.255898614049, 548.820094675663, 0.45)
    pt3dadd(319.312831417318, 807.007911582817, 549.388820162373, 0.45)
    pt3dadd(319.646039783914, 807.759924551586, 549.957545649084, 0.45)
    pt3dadd(319.97924815051, 808.511937520355, 550.526271135794, 0.45)
    pt3dadd(320.312456517105, 809.263950489124, 551.094996622505, 0.45)
    pt3dadd(320.645664883701, 810.015963457892, 551.663722109215, 0.45)
    pt3dadd(320.978873250297, 810.767976426661, 552.232447595926, 0.45)
    pt3dadd(321.312081616893, 811.51998939543, 552.801173082636, 0.45)
    pt3dadd(321.645289983489, 812.272002364199, 553.369898569347, 0.45)
    pt3dadd(321.978498350085, 813.024015332967, 553.938624056057, 0.45)
    pt3dadd(322.311706716681, 813.776028301736, 554.507349542768, 0.45)
    pt3dadd(322.644915083276, 814.528041270505, 555.076075029478, 0.45)
    pt3dadd(322.978123449872, 815.280054239274, 555.644800516189, 0.45)
    pt3dadd(323.311331816468, 816.032067208042, 556.213526002899, 0.45)
    pt3dadd(323.644540183064, 816.784080176811, 556.78225148961, 0.45)
    pt3dadd(323.97774854966, 817.53609314558, 557.350976976321, 0.45)
    pt3dadd(324.310956916256, 818.288106114349, 557.919702463031, 0.45)
    pt3dadd(324.644165282852, 819.040119083117, 558.488427949742, 0.45)
    pt3dadd(324.977373649447, 819.792132051886, 559.057153436452, 0.45)
    pt3dadd(325.310582016043, 820.544145020655, 559.625878923163, 0.45)
    pt3dadd(325.643790382639, 821.296157989424, 560.194604409873, 0.45)
    pt3dadd(325.976998749235, 822.048170958192, 560.763329896584, 0.45)
    pt3dadd(326.310207115831, 822.800183926961, 561.332055383294, 0.45)
    pt3dadd(326.643415482427, 823.55219689573, 561.900780870005, 0.45)
    pt3dadd(326.976623849023, 824.304209864499, 562.469506356715, 0.45)
    pt3dadd(327.309832215618, 825.056222833267, 563.038231843426, 0.45)
    pt3dadd(327.643040582214, 825.808235802036, 563.606957330136, 0.45)
    pt3dadd(327.97624894881, 826.560248770805, 564.175682816847, 0.45)
    pt3dadd(328.309457315406, 827.312261739574, 564.744408303557, 0.45)
    pt3dadd(328.642665682002, 828.064274708342, 565.313133790268, 0.45)
    pt3dadd(328.975874048598, 828.816287677111, 565.881859276979, 0.45)
    pt3dadd(329.309082415194, 829.56830064588, 566.450584763689, 0.45)
    pt3dadd(329.642290781789, 830.320313614649, 567.0193102504, 0.45)
    pt3dadd(329.975499148385, 831.072326583417, 567.58803573711, 0.45)
    pt3dadd(330.308707514981, 831.824339552186, 568.156761223821, 0.45)
    pt3dadd(330.641915881577, 832.576352520955, 568.725486710531, 0.45)
    pt3dadd(330.975124248173, 833.328365489724, 569.294212197242, 0.45)
    pt3dadd(331.308332614769, 834.080378458492, 569.862937683952, 0.45)
    pt3dadd(331.641540981364, 834.832391427261, 570.431663170663, 0.45)
    pt3dadd(331.97474934796, 835.58440439603, 571.000388657373, 0.45)
    pt3dadd(332.307957714556, 836.336417364799, 571.569114144084, 0.45)
    pt3dadd(332.641166081152, 837.088430333567, 572.137839630794, 0.45)
    pt3dadd(332.974374447748, 837.840443302336, 572.706565117505, 0.45)
    pt3dadd(333.307582814344, 838.592456271105, 573.275290604215, 0.45)
    pt3dadd(333.64079118094, 839.344469239874, 573.844016090926, 0.45)
    pt3dadd(333.973999547535, 840.096482208642, 574.412741577636, 0.45)
    pt3dadd(334.307207914131, 840.848495177411, 574.981467064347, 0.45)
    pt3dadd(334.640416280727, 841.60050814618, 575.550192551058, 0.45)
    pt3dadd(334.973624647323, 842.352521114949, 576.118918037768, 0.45)
    pt3dadd(335.306833013919, 843.104534083717, 576.687643524479, 0.45)
    pt3dadd(335.640041380515, 843.856547052486, 577.256369011189, 0.45)
    pt3dadd(335.973249747111, 844.608560021255, 577.8250944979, 0.45)
    pt3dadd(336.306458113706, 845.360572990024, 578.39381998461, 0.45)
    pt3dadd(336.639666480302, 846.112585958792, 578.962545471321, 0.45)
    pt3dadd(336.972874846898, 846.864598927561, 579.531270958031, 0.45)
    pt3dadd(337.306083213494, 847.61661189633, 580.099996444742, 0.45)
    pt3dadd(337.63929158009, 848.368624865099, 580.668721931452, 0.45)
    pt3dadd(337.972499946686, 849.120637833867, 581.237447418163, 0.45)
    pt3dadd(338.305708313282, 849.872650802636, 581.806172904873, 0.45)
    pt3dadd(338.638916679877, 850.624663771405, 582.374898391584, 0.45)
    pt3dadd(338.972125046473, 851.376676740174, 582.943623878294, 0.45)
    pt3dadd(339.305333413069, 852.128689708943, 583.512349365005, 0.45)
    pt3dadd(339.638541779665, 852.880702677711, 584.081074851715, 0.45)
    pt3dadd(339.971750146261, 853.63271564648, 584.649800338426, 0.45)
    pt3dadd(340.304958512857, 854.384728615249, 585.218525825137, 0.45)
    pt3dadd(340.638166879452, 855.136741584018, 585.787251311847, 0.45)
    pt3dadd(340.971375246048, 855.888754552786, 586.355976798558, 0.45)
    pt3dadd(341.304583612644, 856.640767521555, 586.924702285268, 0.45)
    pt3dadd(341.63779197924, 857.392780490324, 587.493427771979, 0.45)
    pt3dadd(341.971000345836, 858.144793459093, 588.062153258689, 0.45)
    pt3dadd(342.304208712432, 858.896806427861, 588.6308787454, 0.45)
    pt3dadd(342.637417079028, 859.64881939663, 589.19960423211, 0.45)
    pt3dadd(342.970625445623, 860.400832365399, 589.768329718821, 0.45)
    pt3dadd(343.303833812219, 861.152845334168, 590.337055205531, 0.45)
    pt3dadd(343.637042178815, 861.904858302936, 590.905780692242, 0.45)
    pt3dadd(343.970250545411, 862.656871271705, 591.474506178952, 0.45)
    pt3dadd(344.303458912007, 863.408884240474, 592.043231665663, 0.45)
    pt3dadd(344.636667278603, 864.160897209243, 592.611957152373, 0.45)
    pt3dadd(344.969875645199, 864.912910178011, 593.180682639084, 0.45)
    pt3dadd(345.303084011794, 865.66492314678, 593.749408125795, 0.45)
    pt3dadd(345.63629237839, 866.416936115549, 594.318133612505, 0.45)
    pt3dadd(345.969500744986, 867.168949084318, 594.886859099216, 0.45)
    pt3dadd(346.302709111582, 867.920962053086, 595.455584585926, 0.45)
    pt3dadd(346.635917478178, 868.672975021855, 596.024310072637, 0.45)
    pt3dadd(346.969125844774, 869.424987990624, 596.593035559347, 0.45)
    pt3dadd(347.30233421137, 870.177000959393, 597.161761046058, 0.45)
    pt3dadd(347.635542577965, 870.929013928161, 597.730486532768, 0.45)
    pt3dadd(347.968750944561, 871.68102689693, 598.299212019479, 0.45)
    pt3dadd(348.301959311157, 872.433039865699, 598.867937506189, 0.45)
    pt3dadd(348.635167677753, 873.185052834468, 599.4366629929, 0.45)
    pt3dadd(348.968376044349, 873.937065803236, 600.00538847961, 0.45)
    pt3dadd(349.301584410945, 874.689078772005, 600.574113966321, 0.45)
    pt3dadd(349.63479277754, 875.441091740774, 601.142839453031, 0.45)
    pt3dadd(349.968001144136, 876.193104709543, 601.711564939742, 0.45)
    pt3dadd(350.301209510732, 876.945117678311, 602.280290426452, 0.45)
    pt3dadd(350.634417877328, 877.69713064708, 602.849015913163, 0.45)
    pt3dadd(350.967626243924, 878.449143615849, 603.417741399874, 0.45)
    pt3dadd(351.30083461052, 879.201156584618, 603.986466886584, 0.45)
  }
}
proc shape3d_21() {
  axon[0] {
    pt3dadd(351.634042977116, 879.953169553386, 604.555192373295, 0.45)
    pt3dadd(351.967251343711, 880.705182522155, 605.123917860005, 0.45)
    pt3dadd(352.300459710307, 881.457195490924, 605.692643346716, 0.45)
    pt3dadd(352.633668076903, 882.209208459693, 606.261368833426, 0.45)
    pt3dadd(352.966876443499, 882.961221428461, 606.830094320137, 0.45)
    pt3dadd(353.300084810095, 883.71323439723, 607.398819806847, 0.45)
    pt3dadd(353.633293176691, 884.465247365999, 607.967545293558, 0.45)
    pt3dadd(353.966501543287, 885.217260334768, 608.536270780268, 0.45)
    pt3dadd(354.299709909882, 885.969273303536, 609.104996266979, 0.45)
    pt3dadd(354.632918276478, 886.721286272305, 609.673721753689, 0.45)
    pt3dadd(354.966126643074, 887.473299241074, 610.2424472404, 0.45)
    pt3dadd(355.29933500967, 888.225312209843, 610.81117272711, 0.45)
    pt3dadd(355.632543376266, 888.977325178611, 611.379898213821, 0.45)
    pt3dadd(355.965751742862, 889.72933814738, 611.948623700531, 0.45)
    pt3dadd(356.298960109457, 890.481351116149, 612.517349187242, 0.45)
    pt3dadd(356.632168476053, 891.233364084918, 613.086074673953, 0.45)
    pt3dadd(356.965376842649, 891.985377053686, 613.654800160663, 0.45)
    pt3dadd(357.298585209245, 892.737390022455, 614.223525647374, 0.45)
    pt3dadd(357.631793575841, 893.489402991224, 614.792251134084, 0.45)
    pt3dadd(357.965001942437, 894.241415959993, 615.360976620795, 0.45)
    pt3dadd(358.298210309033, 894.993428928761, 615.929702107505, 0.45)
    pt3dadd(358.631418675628, 895.74544189753, 616.498427594216, 0.45)
    pt3dadd(358.964627042224, 896.497454866299, 617.067153080926, 0.45)
    pt3dadd(359.29783540882, 897.249467835068, 617.635878567637, 0.45)
    pt3dadd(359.631043775416, 898.001480803836, 618.204604054347, 0.45)
    pt3dadd(359.964252142012, 898.753493772605, 618.773329541058, 0.45)
    pt3dadd(360.297460508608, 899.505506741374, 619.342055027768, 0.45)
    pt3dadd(360.630668875204, 900.257519710143, 619.910780514479, 0.45)
    pt3dadd(360.963877241799, 901.009532678911, 620.47950600119, 0.45)
    pt3dadd(361.297085608395, 901.76154564768, 621.0482314879, 0.45)
    pt3dadd(361.630293974991, 902.513558616449, 621.616956974611, 0.45)
    pt3dadd(361.963502341587, 903.265571585218, 622.185682461321, 0.45)
    pt3dadd(362.296710708183, 904.017584553986, 622.754407948032, 0.45)
    pt3dadd(362.629919074779, 904.769597522755, 623.323133434742, 0.45)
    pt3dadd(362.963127441375, 905.521610491524, 623.891858921453, 0.45)
    pt3dadd(363.29633580797, 906.273623460293, 624.460584408163, 0.45)
    pt3dadd(363.629544174566, 907.025636429061, 625.029309894874, 0.45)
    pt3dadd(363.962752541162, 907.77764939783, 625.598035381584, 0.45)
    pt3dadd(364.295960907758, 908.529662366599, 626.166760868295, 0.45)
    pt3dadd(364.629169274354, 909.281675335368, 626.735486355005, 0.45)
    pt3dadd(364.96237764095, 910.033688304136, 627.304211841716, 0.45)
    pt3dadd(365.295586007546, 910.785701272905, 627.872937328426, 0.45)
    pt3dadd(365.628794374141, 911.537714241674, 628.441662815137, 0.45)
    pt3dadd(365.962002740737, 912.289727210443, 629.010388301847, 0.45)
    pt3dadd(366.295211107333, 913.041740179212, 629.579113788558, 0.45)
    pt3dadd(366.628419473929, 913.79375314798, 630.147839275269, 0.45)
    pt3dadd(366.961627840525, 914.545766116749, 630.716564761979, 0.45)
    pt3dadd(367.294836207121, 915.297779085518, 631.28529024869, 0.45)
    pt3dadd(367.628044573716, 916.049792054286, 631.8540157354, 0.45)
    pt3dadd(367.961252940312, 916.801805023055, 632.422741222111, 0.45)
    pt3dadd(368.294461306908, 917.553817991824, 632.991466708821, 0.45)
    pt3dadd(368.627669673504, 918.305830960593, 633.560192195532, 0.45)
    pt3dadd(368.9608780401, 919.057843929362, 634.128917682242, 0.45)
    pt3dadd(369.294086406696, 919.80985689813, 634.697643168953, 0.45)
    pt3dadd(369.627294773292, 920.561869866899, 635.266368655663, 0.45)
    pt3dadd(369.960503139887, 921.313882835668, 635.835094142374, 0.45)
    pt3dadd(370.293711506483, 922.065895804436, 636.403819629084, 0.45)
    pt3dadd(370.626919873079, 922.817908773205, 636.972545115795, 0.45)
    pt3dadd(370.960128239675, 923.569921741974, 637.541270602505, 0.45)
    pt3dadd(371.293336606271, 924.321934710743, 638.109996089216, 0.45)
    pt3dadd(371.626544972867, 925.073947679512, 638.678721575926, 0.45)
    pt3dadd(371.959753339463, 925.82596064828, 639.247447062637, 0.45)
    pt3dadd(372.292961706058, 926.577973617049, 639.816172549348, 0.45)
    pt3dadd(372.626170072654, 927.329986585818, 640.384898036058, 0.45)
    pt3dadd(372.95937843925, 928.081999554586, 640.953623522769, 0.45)
    pt3dadd(373.292586805846, 928.834012523355, 641.522349009479, 0.45)
    pt3dadd(373.625795172442, 929.586025492124, 642.09107449619, 0.45)
    pt3dadd(373.959003539038, 930.338038460893, 642.6597999829, 0.45)
    pt3dadd(374.292211905634, 931.090051429662, 643.228525469611, 0.45)
    pt3dadd(374.625420272229, 931.84206439843, 643.797250956321, 0.45)
    pt3dadd(374.958628638825, 932.594077367199, 644.365976443032, 0.45)
    pt3dadd(375.291837005421, 933.346090335968, 644.934701929742, 0.45)
    pt3dadd(375.625045372017, 934.098103304736, 645.503427416453, 0.45)
    pt3dadd(375.958253738613, 934.850116273505, 646.072152903163, 0.45)
    pt3dadd(376.291462105209, 935.602129242274, 646.640878389874, 0.45)
    pt3dadd(376.624670471804, 936.354142211043, 647.209603876584, 0.45)
    pt3dadd(376.9578788384, 937.106155179812, 647.778329363295, 0.45)
    pt3dadd(377.291087204996, 937.85816814858, 648.347054850006, 0.45)
    pt3dadd(377.624295571592, 938.610181117349, 648.915780336716, 0.45)
    pt3dadd(377.957503938188, 939.362194086118, 649.484505823427, 0.45)
    pt3dadd(378.290712304784, 940.114207054886, 650.053231310137, 0.45)
    pt3dadd(378.62392067138, 940.866220023655, 650.621956796848, 0.45)
    pt3dadd(378.957129037975, 941.618232992424, 651.190682283558, 0.45)
    pt3dadd(379.290337404571, 942.370245961193, 651.759407770269, 0.45)
    pt3dadd(379.623545771167, 943.122258929962, 652.328133256979, 0.45)
    pt3dadd(379.956754137763, 943.87427189873, 652.89685874369, 0.45)
    pt3dadd(380.289962504359, 944.626284867499, 653.4655842304, 0.45)
    pt3dadd(380.623170870955, 945.378297836268, 654.034309717111, 0.45)
    pt3dadd(380.956379237551, 946.130310805037, 654.603035203821, 0.45)
    pt3dadd(381.289587604146, 946.882323773805, 655.171760690532, 0.45)
    pt3dadd(381.622795970742, 947.634336742574, 655.740486177242, 0.45)
    pt3dadd(381.956004337338, 948.386349711343, 656.309211663953, 0.45)
    pt3dadd(382.289212703934, 949.138362680112, 656.877937150663, 0.45)
    pt3dadd(382.62242107053, 949.89037564888, 657.446662637374, 0.45)
    pt3dadd(382.955629437126, 950.642388617649, 658.015388124085, 0.45)
    pt3dadd(383.288837803721, 951.394401586418, 658.584113610795, 0.45)
    pt3dadd(383.622046170317, 952.146414555187, 659.152839097506, 0.45)
    pt3dadd(383.955254536913, 952.898427523955, 659.721564584216, 0.45)
    pt3dadd(384.288462903509, 953.650440492724, 660.290290070927, 0.45)
    pt3dadd(384.621671270105, 954.402453461493, 660.859015557637, 0.45)
    pt3dadd(384.954879636701, 955.154466430262, 661.427741044348, 0.45)
    pt3dadd(385.288088003297, 955.90647939903, 661.996466531058, 0.45)
    pt3dadd(385.621296369892, 956.658492367799, 662.565192017769, 0.45)
    pt3dadd(385.954504736488, 957.410505336568, 663.133917504479, 0.45)
    pt3dadd(386.287713103084, 958.162518305337, 663.70264299119, 0.45)
    pt3dadd(386.62092146968, 958.914531274105, 664.2713684779, 0.45)
    pt3dadd(386.954129836276, 959.666544242874, 664.840093964611, 0.45)
    pt3dadd(387.287338202872, 960.418557211643, 665.408819451321, 0.45)
    pt3dadd(387.620546569468, 961.170570180412, 665.977544938032, 0.45)
    pt3dadd(387.953754936063, 961.92258314918, 666.546270424742, 0.45)
    pt3dadd(388.286963302659, 962.674596117949, 667.114995911453, 0.45)
    pt3dadd(388.620171669255, 963.426609086718, 667.683721398164, 0.45)
    pt3dadd(388.953380035851, 964.178622055487, 668.252446884874, 0.45)
    pt3dadd(389.286588402447, 964.930635024255, 668.821172371585, 0.45)
    pt3dadd(389.619796769043, 965.682647993024, 669.389897858295, 0.45)
    pt3dadd(389.953005135639, 966.434660961793, 669.958623345006, 0.45)
    pt3dadd(390.286213502234, 967.186673930562, 670.527348831716, 0.45)
    pt3dadd(390.61942186883, 967.93868689933, 671.096074318427, 0.45)
    pt3dadd(390.952630235426, 968.690699868099, 671.664799805137, 0.45)
    pt3dadd(391.285838602022, 969.442712836868, 672.233525291848, 0.45)
    pt3dadd(391.619046968618, 970.194725805637, 672.802250778558, 0.45)
    pt3dadd(391.952255335214, 970.946738774406, 673.370976265269, 0.45)
    pt3dadd(392.28546370181, 971.698751743174, 673.939701751979, 0.45)
    pt3dadd(392.618672068405, 972.450764711943, 674.50842723869, 0.45)
    pt3dadd(392.951880435001, 973.202777680712, 675.0771527254, 0.45)
    pt3dadd(393.285088801597, 973.95479064948, 675.645878212111, 0.45)
    pt3dadd(393.618297168193, 974.706803618249, 676.214603698822, 0.45)
    pt3dadd(393.951505534789, 975.458816587018, 676.783329185532, 0.45)
    pt3dadd(394.284713901385, 976.210829555787, 677.352054672243, 0.45)
    pt3dadd(394.61792226798, 976.962842524556, 677.920780158953, 0.45)
    pt3dadd(394.951130634576, 977.714855493324, 678.489505645664, 0.45)
    pt3dadd(395.284339001172, 978.466868462093, 679.058231132374, 0.45)
    pt3dadd(395.617547367768, 979.218881430862, 679.626956619085, 0.45)
    pt3dadd(395.950755734364, 979.97089439963, 680.195682105795, 0.45)
    pt3dadd(396.28396410096, 980.722907368399, 680.764407592506, 0.45)
    pt3dadd(396.617172467556, 981.474920337168, 681.333133079216, 0.45)
    pt3dadd(396.950380834151, 982.226933305937, 681.901858565927, 0.45)
    pt3dadd(397.283589200747, 982.978946274706, 682.470584052637, 0.45)
    pt3dadd(397.616797567343, 983.730959243474, 683.039309539348, 0.45)
    pt3dadd(397.950005933939, 984.482972212243, 683.608035026058, 0.45)
    pt3dadd(398.283214300535, 985.234985181012, 684.176760512769, 0.45)
    pt3dadd(398.616422667131, 985.98699814978, 684.745485999479, 0.45)
    pt3dadd(398.949631033727, 986.739011118549, 685.31421148619, 0.45)
    pt3dadd(399.282839400322, 987.491024087318, 685.882936972901, 0.45)
    pt3dadd(399.616047766918, 988.243037056087, 686.451662459611, 0.45)
    pt3dadd(399.949256133514, 988.995050024856, 687.020387946322, 0.45)
    pt3dadd(400.28246450011, 989.747062993624, 687.589113433032, 0.45)
    pt3dadd(400.615672866706, 990.499075962393, 688.157838919743, 0.45)
    pt3dadd(400.948881233302, 991.251088931162, 688.726564406453, 0.45)
    pt3dadd(401.282089599898, 992.00310189993, 689.295289893164, 0.45)
    pt3dadd(401.615297966493, 992.755114868699, 689.864015379874, 0.45)
    pt3dadd(401.948506333089, 993.507127837468, 690.432740866585, 0.45)
    pt3dadd(402.281714699685, 994.259140806237, 691.001466353295, 0.45)
    pt3dadd(402.614923066281, 995.011153775006, 691.570191840006, 0.45)
    pt3dadd(402.948131432877, 995.763166743774, 692.138917326716, 0.45)
    pt3dadd(403.281339799473, 996.515179712543, 692.707642813427, 0.45)
    pt3dadd(403.614548166068, 997.267192681312, 693.276368300138, 0.45)
    pt3dadd(403.947756532664, 998.01920565008, 693.845093786848, 0.45)
    pt3dadd(404.28096489926, 998.771218618849, 694.413819273558, 0.45)
    pt3dadd(404.614173265856, 999.523231587618, 694.982544760269, 0.45)
    pt3dadd(404.947381632452, 1000.27524455639, 695.55127024698, 0.45)
    pt3dadd(405.280589999048, 1001.02725752516, 696.11999573369, 0.45)
    pt3dadd(405.613798365644, 1001.77927049392, 696.688721220401, 0.45)
    pt3dadd(405.947006732239, 1002.53128346269, 697.257446707111, 0.45)
    pt3dadd(406.280215098835, 1003.28329643146, 697.826172193822, 0.45)
    pt3dadd(406.613423465431, 1004.03530940023, 698.394897680532, 0.45)
    pt3dadd(406.946631832027, 1004.787322369, 698.963623167243, 0.45)
    pt3dadd(407.279840198623, 1005.53933533777, 699.532348653953, 0.45)
    pt3dadd(407.613048565219, 1006.29134830654, 700.101074140664, 0.45)
    pt3dadd(407.946256931815, 1007.04336127531, 700.669799627374, 0.45)
    pt3dadd(408.27946529841, 1007.79537424407, 701.238525114085, 0.45)
    pt3dadd(408.612673665006, 1008.54738721284, 701.807250600795, 0.45)
    pt3dadd(408.945882031602, 1009.29940018161, 702.375976087506, 0.45)
    pt3dadd(409.279090398198, 1010.05141315038, 702.944701574217, 0.45)
    pt3dadd(409.612298764794, 1010.80342611915, 703.513427060927, 0.45)
    pt3dadd(409.94550713139, 1011.55543908792, 704.082152547638, 0.45)
    pt3dadd(410.278715497986, 1012.30745205669, 704.650878034348, 0.45)
    pt3dadd(410.611923864581, 1013.05946502546, 705.219603521059, 0.45)
    pt3dadd(410.945132231177, 1013.81147799422, 705.788329007769, 0.45)
    pt3dadd(411.278340597773, 1014.56349096299, 706.35705449448, 0.45)
    pt3dadd(411.611548964369, 1015.31550393176, 706.92577998119, 0.45)
    pt3dadd(411.944757330965, 1016.06751690053, 707.494505467901, 0.45)
    pt3dadd(412.277965697561, 1016.8195298693, 708.063230954611, 0.45)
    pt3dadd(412.611174064157, 1017.57154283807, 708.631956441322, 0.45)
    pt3dadd(412.944382430752, 1018.32355580684, 709.200681928032, 0.45)
    pt3dadd(413.277590797348, 1019.07556877561, 709.769407414743, 0.45)
    pt3dadd(413.610799163944, 1019.82758174437, 710.338132901453, 0.45)
    pt3dadd(413.94400753054, 1020.57959471314, 710.906858388164, 0.45)
    pt3dadd(414.277215897136, 1021.33160768191, 711.475583874874, 0.45)
    pt3dadd(414.610424263732, 1022.08362065068, 712.044309361585, 0.45)
    pt3dadd(414.943632630327, 1022.83563361945, 712.613034848296, 0.45)
    pt3dadd(415.276840996923, 1023.58764658822, 713.181760335006, 0.45)
    pt3dadd(415.610049363519, 1024.33965955699, 713.750485821717, 0.45)
    pt3dadd(415.943257730115, 1025.09167252576, 714.319211308427, 0.45)
    pt3dadd(416.276466096711, 1025.84368549452, 714.887936795138, 0.45)
    pt3dadd(416.609674463307, 1026.59569846329, 715.456662281848, 0.45)
    pt3dadd(416.942882829903, 1027.34771143206, 716.025387768559, 0.45)
    pt3dadd(417.276091196498, 1028.09972440083, 716.594113255269, 0.45)
    pt3dadd(417.609299563094, 1028.8517373696, 717.16283874198, 0.45)
    pt3dadd(417.94250792969, 1029.60375033837, 717.73156422869, 0.45)
    pt3dadd(418.275716296286, 1030.35576330714, 718.300289715401, 0.45)
    pt3dadd(418.608924662882, 1031.10777627591, 718.869015202111, 0.45)
    pt3dadd(418.942133029478, 1031.85978924467, 719.437740688822, 0.45)
    pt3dadd(419.275341396074, 1032.61180221344, 720.006466175532, 0.45)
    pt3dadd(419.608549762669, 1033.36381518221, 720.575191662243, 0.45)
    pt3dadd(419.941758129265, 1034.11582815098, 721.143917148954, 0.45)
    pt3dadd(420.274966495861, 1034.86784111975, 721.712642635664, 0.45)
    pt3dadd(420.608174862457, 1035.61985408852, 722.281368122374, 0.45)
    pt3dadd(420.941383229053, 1036.37186705729, 722.850093609085, 0.45)
    pt3dadd(421.274591595649, 1037.12388002606, 723.418819095796, 0.45)
    pt3dadd(421.607799962244, 1037.87589299482, 723.987544582506, 0.45)
    pt3dadd(421.94100832884, 1038.62790596359, 724.556270069217, 0.45)
    pt3dadd(422.274216695436, 1039.37991893236, 725.124995555927, 0.45)
    pt3dadd(422.607425062032, 1040.13193190113, 725.693721042638, 0.45)
    pt3dadd(422.940633428628, 1040.8839448699, 726.262446529348, 0.45)
    pt3dadd(423.273841795224, 1041.63595783867, 726.831172016059, 0.45)
    pt3dadd(423.60705016182, 1042.38797080744, 727.399897502769, 0.45)
    pt3dadd(423.940258528415, 1043.13998377621, 727.96862298948, 0.45)
    pt3dadd(424.273466895011, 1043.89199674497, 728.53734847619, 0.45)
    pt3dadd(424.606675261607, 1044.64400971374, 729.106073962901, 0.45)
    pt3dadd(424.939883628203, 1045.39602268251, 729.674799449611, 0.45)
    pt3dadd(425.273091994799, 1046.14803565128, 730.243524936322, 0.45)
    pt3dadd(425.606300361395, 1046.90004862005, 730.812250423033, 0.45)
    pt3dadd(425.939508727991, 1047.65206158882, 731.380975909743, 0.45)
    pt3dadd(426.272717094586, 1048.40407455759, 731.949701396454, 0.45)
    pt3dadd(426.605925461182, 1049.15608752636, 732.518426883164, 0.45)
    pt3dadd(426.939133827778, 1049.90810049512, 733.087152369875, 0.45)
    pt3dadd(427.272342194374, 1050.66011346389, 733.655877856585, 0.45)
    pt3dadd(427.60555056097, 1051.41212643266, 734.224603343296, 0.45)
    pt3dadd(427.938758927566, 1052.16413940143, 734.793328830006, 0.45)
    pt3dadd(428.271967294162, 1052.9161523702, 735.362054316717, 0.45)
    pt3dadd(428.605175660757, 1053.66816533897, 735.930779803427, 0.45)
    pt3dadd(428.938384027353, 1054.42017830774, 736.499505290138, 0.45)
    pt3dadd(429.271592393949, 1055.17219127651, 737.068230776848, 0.45)
    pt3dadd(429.604800760545, 1055.92420424527, 737.636956263559, 0.45)
    pt3dadd(429.938009127141, 1056.67621721404, 738.205681750269, 0.45)
    pt3dadd(430.271217493737, 1057.42823018281, 738.77440723698, 0.45)
    pt3dadd(430.604425860332, 1058.18024315158, 739.34313272369, 0.45)
    pt3dadd(430.937634226928, 1058.93225612035, 739.911858210401, 0.45)
    pt3dadd(431.270842593524, 1059.68426908912, 740.480583697112, 0.45)
    pt3dadd(431.60405096012, 1060.43628205789, 741.049309183822, 0.45)
    pt3dadd(431.937259326716, 1061.18829502666, 741.618034670533, 0.45)
    pt3dadd(432.270467693312, 1061.94030799542, 742.186760157243, 0.45)
    pt3dadd(432.603676059908, 1062.69232096419, 742.755485643954, 0.45)
    pt3dadd(432.936884426503, 1063.44433393296, 743.324211130664, 0.45)
    pt3dadd(433.270092793099, 1064.19634690173, 743.892936617375, 0.45)
    pt3dadd(433.603301159695, 1064.9483598705, 744.461662104085, 0.45)
    pt3dadd(433.936509526291, 1065.70037283927, 745.030387590796, 0.45)
    pt3dadd(434.269717892887, 1066.45238580804, 745.599113077506, 0.45)
  }
}
proc shape3d_22() {
  axon[0] {
    pt3dadd(434.602926259483, 1067.20439877681, 746.167838564217, 0.45)
    pt3dadd(434.936134626079, 1067.95641174557, 746.736564050927, 0.45)
    pt3dadd(435.269342992674, 1068.70842471434, 747.305289537638, 0.45)
    pt3dadd(435.60255135927, 1069.46043768311, 747.874015024348, 0.45)
    pt3dadd(435.935759725866, 1070.21245065188, 748.442740511059, 0.45)
    pt3dadd(436.268968092462, 1070.96446362065, 749.01146599777, 0.45)
    pt3dadd(436.602176459058, 1071.71647658942, 749.58019148448, 0.45)
    pt3dadd(436.935384825654, 1072.46848955819, 750.148916971191, 0.45)
    pt3dadd(437.26859319225, 1073.22050252696, 750.717642457901, 0.45)
    pt3dadd(437.601801558845, 1073.97251549572, 751.286367944612, 0.45)
    pt3dadd(437.935009925441, 1074.72452846449, 751.855093431322, 0.45)
    pt3dadd(438.268218292037, 1075.47654143326, 752.423818918033, 0.45)
    pt3dadd(438.601426658633, 1076.22855440203, 752.992544404743, 0.45)
    pt3dadd(438.934635025229, 1076.9805673708, 753.561269891454, 0.45)
    pt3dadd(439.267843391825, 1077.73258033957, 754.129995378164, 0.45)
    pt3dadd(439.60105175842, 1078.48459330834, 754.698720864875, 0.45)
    pt3dadd(439.934260125016, 1079.23660627711, 755.267446351585, 0.45)
    pt3dadd(440.267468491612, 1079.98861924587, 755.836171838296, 0.45)
    pt3dadd(440.600676858208, 1080.74063221464, 756.404897325006, 0.45)
    pt3dadd(440.933885224804, 1081.49264518341, 756.973622811717, 0.45)
    pt3dadd(441.2670935914, 1082.24465815218, 757.542348298427, 0.45)
    pt3dadd(441.600301957996, 1082.99667112095, 758.111073785138, 0.45)
    pt3dadd(441.933510324591, 1083.74868408972, 758.679799271849, 0.45)
    pt3dadd(442.266718691187, 1084.50069705849, 759.248524758559, 0.45)
    pt3dadd(442.599927057783, 1085.25271002726, 759.81725024527, 0.45)
    pt3dadd(442.933135424379, 1086.00472299602, 760.38597573198, 0.45)
    pt3dadd(443.266343790975, 1086.75673596479, 760.954701218691, 0.45)
    pt3dadd(443.599552157571, 1087.50874893356, 761.523426705401, 0.45)
    pt3dadd(443.932760524167, 1088.26076190233, 762.092152192112, 0.45)
    pt3dadd(444.265968890762, 1089.0127748711, 762.660877678822, 0.45)
    pt3dadd(444.599177257358, 1089.76478783987, 763.229603165533, 0.45)
    pt3dadd(444.932385623954, 1090.51680080864, 763.798328652243, 0.45)
    pt3dadd(445.26559399055, 1091.26881377741, 764.367054138954, 0.45)
    pt3dadd(445.598802357146, 1092.02082674617, 764.935779625664, 0.45)
    pt3dadd(445.932010723742, 1092.77283971494, 765.504505112375, 0.45)
    pt3dadd(446.265219090338, 1093.52485268371, 766.073230599085, 0.45)
    pt3dadd(446.598427456933, 1094.27686565248, 766.641956085796, 0.45)
    pt3dadd(446.931635823529, 1095.02887862125, 767.210681572506, 0.45)
    pt3dadd(447.264844190125, 1095.78089159002, 767.779407059217, 0.45)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
  shape3d_20()
  shape3d_21()
  shape3d_22()
}

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, 12 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 16 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, 11 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_12