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_13

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[9]
create adendIML[15]
create adendMML[14]
create adendOML[14]
create soma[3]
create axonh[1]

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-8.28448334958522, 66.2676755062798, 0, 10.5)
    pt3dadd(-8.28438334958522, 66.2676755062798, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-8.28438334958522, 66.2676755062798, 0, 10.4043260233424)
    pt3dadd(-8.28825555217193, 67.2602839220475, -0.121299377551017, 10.4043260233424)
    pt3dadd(-8.29212775475864, 68.2528923378152, -0.242598755102035, 10.1118742080783)
    pt3dadd(-8.29599995734535, 69.2455007535829, -0.363898132653052, 9.60468635614927)
    pt3dadd(-8.29987215993206, 70.2381091693506, -0.485197510204069, 8.84590300647707)
    pt3dadd(-8.30374436251877, 71.2307175851183, -0.606496887755087, 7.76208734813001)
    pt3dadd(-8.30761656510548, 72.223326000886, -0.727796265306104, 6.18465843842649)
    pt3dadd(-8.31148876769219, 73.2159344166537, -0.849095642857121, 3.5)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-8.31148876769219, 73.2159344166537, -0.849095642857121, 2.47906000584629)
    pt3dadd(-8.3153609702789, 74.2085428324214, -0.970395020408139, 2.47906000584629)
    pt3dadd(-8.31923317286561, 75.2011512481891, -1.09169439795916, 2.11125382662694)
    pt3dadd(-8.32310537545232, 76.1937596639568, -1.21299377551017, 1.81011959652796)
    pt3dadd(-8.32697757803903, 77.1863680797245, -1.33429315306119, 1.56357174154146)
    pt3dadd(-8.33084978062574, 78.1789764954922, -1.45559253061221, 1.3617154305586)
    pt3dadd(-8.33472198321244, 79.1715849112599, -1.57689190816323, 1.19644946105406)
    pt3dadd(-8.33859418579915, 80.1641933270276, -1.69819128571424, 1.06114112938344)
    pt3dadd(-8.34246638838586, 81.1568017427953, -1.81949066326526, 0.950360037097033)
    pt3dadd(-8.34633859097257, 82.149410158563, -1.94079004081628, 0.85966014998258)
    pt3dadd(-8.35021079355928, 83.1420185743307, -2.06208941836729, 0.785401363101277)
    pt3dadd(-8.35408299614599, 84.1346269900984, -2.18338879591831, 0.72460341059529)
    pt3dadd(-8.3579551987327, 85.1272354058661, -2.30468817346933, 0.674826257154464)
    pt3dadd(-8.36182740131941, 86.1198438216338, -2.42598755102035, 0.634072170831778)
    pt3dadd(-8.36569960390612, 87.1124522374015, -2.54728692857136, 0.600705547045801)
    pt3dadd(-8.36957180649283, 88.1050606531692, -2.66858630612238, 0.573387266025838)
    pt3dadd(-8.37344400907954, 89.0976690689369, -2.7898856836734, 0.551020949233567)
    pt3dadd(-8.37731621166625, 90.0902774847046, -2.91118506122442, 0.532708957842651)
    pt3dadd(-8.38118841425296, 91.0828859004723, -3.03248443877543, 0.517716367340809)
    pt3dadd(-8.38506061683967, 92.07549431624, -3.15378381632645, 0.505441472428646)
    pt3dadd(-8.38893281942638, 93.0681027320077, -3.27508319387747, 0.495391638473257)
    pt3dadd(-8.39280502201309, 94.0607111477754, -3.39638257142849, 0.487163530350653)
    pt3dadd(-8.3966772245998, 95.0533195635431, -3.5176819489795, 0.480426925191027)
    pt3dadd(-8.40054942718651, 96.0459279793108, -3.63898132653052, 0.474911459375497)
    pt3dadd(-8.40442162977322, 97.0385363950785, -3.76028070408154, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-8.40442162977322, 97.0385363950785, -3.76028070408154, 0.466698650595398)
    pt3dadd(-8.40829383235993, 98.0311448108462, -3.88158008163256, 0.466698650595398)
    pt3dadd(-8.41216603494664, 99.0237532266139, -4.00287945918357, 0.463671698777356)
    pt3dadd(-8.41603823753334, 100.016361642382, -4.12417883673459, 0.46119344023584)
    pt3dadd(-8.41991044012005, 101.008970058149, -4.24547821428561, 0.459164413753823)
    pt3dadd(-8.42378264270676, 102.001578473917, -4.36677759183662, 0.457503187374186)
    pt3dadd(-8.42765484529347, 102.994186889685, -4.48807696938764, 0.456143090249352)
    pt3dadd(-8.43152704788018, 103.986795305452, -4.60937634693866, 0.455029536906078)
    pt3dadd(-8.43539925046689, 104.97940372122, -4.73067572448968, 0.454117836538747)
    pt3dadd(-8.4392714530536, 105.972012136988, -4.85197510204069, 0.45337139941042)
    pt3dadd(-8.44314365564031, 106.964620552756, -4.97327447959171, 0.45276026837822)
    pt3dadd(-8.44701585822702, 107.957228968523, -5.09457385714273, 0.452259916607997)
    pt3dadd(-8.45088806081373, 108.949837384291, -5.21587323469375, 0.451850263226359)
    pt3dadd(-8.45476026340044, 109.942445800059, -5.33717261224476, 0.45151486740471)
    pt3dadd(-8.45863246598715, 110.935054215826, -5.45847198979578, 0.451240268531071)
    pt3dadd(-8.46250466857386, 111.927662631594, -5.5797713673468, 0.451015445988463)
    pt3dadd(-8.46637687116057, 112.920271047362, -5.70107074489782, 0.450831376858844)
    pt3dadd(-8.47024907374728, 113.912879463129, -5.82237012244883, 0.450680673801733)
    pt3dadd(-8.47412127633399, 114.905487878897, -5.94366949999985, 0.450557288574293)
    pt3dadd(-8.47799347892069, 115.898096294665, -6.06496887755087, 0.450456269294113)
    pt3dadd(-8.4818656815074, 116.890704710433, -6.18626825510189, 0.450373561702775)
    pt3dadd(-8.48573788409411, 117.8833131262, -6.3075676326529, 0.450305846454234)
    pt3dadd(-8.48961008668082, 118.875921541968, -6.42886701020392, 0.450250405897802)
    pt3dadd(-8.49348228926753, 119.868529957736, -6.55016638775494, 0.450205015009282)
    pt3dadd(-8.49735449185424, 120.861138373503, -6.67146576530596, 0.450167852092942)
    pt3dadd(-8.50122669444095, 121.853746789271, -6.79276514285697, 0.45013742567046)
    pt3dadd(-8.50509889702766, 122.846355205039, -6.91406452040799, 0.450112514622668)
    pt3dadd(-8.50897109961437, 123.838963620806, -7.03536389795901, 0.450092119181749)
    pt3dadd(-8.51284330220108, 124.831572036574, -7.15666327551002, 0.450075420807047)
    pt3dadd(-8.51671550478779, 125.824180452342, -7.27796265306104, 0.450061749334151)
    pt3dadd(-8.5205877073745, 126.81678886811, -7.39926203061206, 0.450050556078851)
    pt3dadd(-8.52445990996121, 127.809397283877, -7.52056140816308, 0.450041391816511)
    pt3dadd(-8.52833211254792, 128.802005699645, -7.64186078571409, 0.450033888753103)
    pt3dadd(-8.53220431513463, 129.794614115413, -7.76316016326511, 0.450027745764349)
    pt3dadd(-8.53607651772134, 130.78722253118, -7.88445954081613, 0.45002271631054)
    pt3dadd(-8.53994872030805, 131.779830946948, -8.00575891836715, 0.450018598542036)
    pt3dadd(-8.54382092289476, 132.772439362716, -8.12705829591816, 0.450015227198327)
    pt3dadd(-8.54769312548147, 133.765047778483, -8.24835767346918, 0.450012466975554)
    pt3dadd(-8.55156532806818, 134.757656194251, -8.3696570510202, 0.450010207096284)
    pt3dadd(-8.55543753065488, 135.750264610019, -8.49095642857121, 0.450008356863627)
    pt3dadd(-8.55930973324159, 136.742873025787, -8.61225580612223, 0.450006842021251)
    pt3dadd(-8.5631819358283, 137.735481441554, -8.73355518367325, 0.450005601773211)
    pt3dadd(-8.56705413841501, 138.728089857322, -8.85485456122427, 0.450004586344)
    pt3dadd(-8.57092634100172, 139.72069827309, -8.97615393877529, 0.450003754980877)
    pt3dadd(-8.57479854358843, 140.713306688857, -9.0974533163263, 0.450003074318321)
    pt3dadd(-8.57867074617514, 141.705915104625, -9.21875269387732, 0.450002517038954)
    pt3dadd(-8.58254294876185, 142.698523520393, -9.34005207142834, 0.450002060777199)
    pt3dadd(-8.58641515134856, 143.69113193616, -9.46135144897935, 0.450001687221668)
    pt3dadd(-8.59028735393527, 144.683740351928, -9.58265082653037, 0.450001381380267)
    pt3dadd(-8.59415955652198, 145.676348767696, -9.70395020408139, 0.450001130978506)
    pt3dadd(-8.59803175910869, 146.668957183464, -9.82524958163241, 0.450000925966884)
    pt3dadd(-8.6019039616954, 147.661565599231, -9.94654895918342, 0.450000758117564)
    pt3dadd(-8.60577616428211, 148.654174014999, -10.0678483367344, 0.450000620694164)
    pt3dadd(-8.60964836686882, 149.646782430767, -10.1891477142855, 0.450000508181401)
    pt3dadd(-8.61352056945553, 150.639390846534, -10.3104470918365, 0.450000416063741)
    pt3dadd(-8.61739277204224, 151.631999262302, -10.4317464693875, 0.45000034064418)
    pt3dadd(-8.62126497462895, 152.62460767807, -10.5530458469385, 0.450000278895866)
    pt3dadd(-8.62513717721566, 153.617216093837, -10.6743452244895, 0.450000228340622)
    pt3dadd(-8.62900937980237, 154.609824509605, -10.7956446020405, 0.45000018694949)
    pt3dadd(-8.63288158238908, 155.602432925373, -10.9169439795916, 0.450000153061296)
    pt3dadd(-8.63675378497578, 156.595041341141, -11.0382433571426, 0.45000012531599)
    pt3dadd(-8.64062598756249, 157.587649756908, -11.1595427346936, 0.450000102600055)
    pt3dadd(-8.6444981901492, 158.580258172676, -11.2808421122446, 0.450000084001821)
    pt3dadd(-8.64837039273591, 159.572866588444, -11.4021414897956, 0.450000068774874)
    pt3dadd(-8.65224259532262, 160.565475004211, -11.5234408673466, 0.450000056308104)
    pt3dadd(-8.65611479790933, 161.558083419979, -11.6447402448977, 0.450000046101177)
    pt3dadd(-8.65998700049604, 162.550691835747, -11.7660396224487, 0.450000037744451)
    pt3dadd(-8.66385920308275, 163.543300251514, -11.8873389999997, 0.450000030902543)
    pt3dadd(-8.66773140566946, 164.535908667282, -12.0086383775507, 0.450000025300862)
    pt3dadd(-8.67160360825617, 165.52851708305, -12.1299377551017, 0.450000020714594)
    pt3dadd(-8.67547581084288, 166.521125498818, -12.2512371326528, 0.450000016959675)
    pt3dadd(-8.67934801342959, 167.513733914585, -12.3725365102038, 0.450000013885408)
    pt3dadd(-8.6832202160163, 168.506342330353, -12.4938358877548, 0.45000001136841)
    pt3dadd(-8.68709241860301, 169.498950746121, -12.6151352653058, 0.450000009307667)
    pt3dadd(-8.69096462118972, 170.491559161888, -12.7364346428568, 0.450000007620473)
    pt3dadd(-8.69483682377643, 171.484167577656, -12.8577340204078, 0.450000006239116)
    pt3dadd(-8.69870902636314, 172.476775993424, -12.9790333979589, 0.450000005108156)
    pt3dadd(-8.70258122894985, 173.469384409191, -13.1003327755099, 0.450000004182204)
    pt3dadd(-8.70645343153656, 174.461992824959, -13.2216321530609, 0.450000003424099)
    pt3dadd(-8.71032563412327, 175.454601240727, -13.3429315306119, 0.450000002803415)
    pt3dadd(-8.71419783670997, 176.447209656495, -13.4642309081629, 0.450000002295242)
    pt3dadd(-8.71807003929668, 177.439818072262, -13.5855302857139, 0.450000001879186)
    pt3dadd(-8.72194224188339, 178.43242648803, -13.706829663265, 0.450000001538547)
    pt3dadd(-8.7258144444701, 179.425034903798, -13.828129040816, 0.450000001259656)
    pt3dadd(-8.72968664705681, 180.417643319565, -13.949428418367, 0.450000001031319)
    pt3dadd(-8.73355884964352, 181.410251735333, -14.070727795918, 0.450000000844373)
    pt3dadd(-8.73743105223023, 182.402860151101, -14.192027173469, 0.450000000691314)
    pt3dadd(-8.74130325481694, 183.395468566868, -14.31332655102, 0.450000000566)
    pt3dadd(-8.74517545740365, 184.388076982636, -14.4346259285711, 0.450000000463401)
    pt3dadd(-8.74904765999036, 185.380685398404, -14.5559253061221, 0.450000000379401)
    pt3dadd(-8.75291986257707, 186.373293814172, -14.6772246836731, 0.450000000310627)
    pt3dadd(-8.75679206516378, 187.365902229939, -14.7985240612241, 0.45000000025432)
    pt3dadd(-8.76066426775049, 188.358510645707, -14.9198234387751, 0.45000000020822)
    pt3dadd(-8.7645364703372, 189.351119061475, -15.0411228163262, 0.450000000170476)
    pt3dadd(-8.76840867292391, 190.343727477242, -15.1624221938772, 0.450000000139574)
    pt3dadd(-8.77228087551062, 191.33633589301, -15.2837215714282, 0.450000000114273)
    pt3dadd(-8.77615307809733, 192.328944308778, -15.4050209489792, 0.450000000093559)
    pt3dadd(-8.78002528068404, 193.321552724545, -15.5263203265302, 0.4500000000766)
    pt3dadd(-8.78389748327075, 194.314161140313, -15.6476197040812, 0.450000000062715)
    pt3dadd(-8.78776968585746, 195.306769556081, -15.7689190816323, 0.450000000051346)
    pt3dadd(-8.79164188844416, 196.299377971849, -15.8902184591833, 0.450000000042039)
    pt3dadd(-8.79551409103087, 197.291986387616, -16.0115178367343, 0.450000000034418)
    pt3dadd(-8.79938629361758, 198.284594803384, -16.1328172142853, 0.450000000028179)
    pt3dadd(-8.80325849620429, 199.277203219152, -16.2541165918363, 0.450000000023071)
    pt3dadd(-8.807130698791, 200.269811634919, -16.3754159693873, 0.450000000018889)
    pt3dadd(-8.81100290137771, 201.262420050687, -16.4967153469384, 0.450000000015465)
    pt3dadd(-8.81487510396442, 202.255028466455, -16.6180147244894, 0.450000000012662)
    pt3dadd(-8.81874730655113, 203.247636882222, -16.7393141020404, 0.450000000010367)
    pt3dadd(-8.82261950913784, 204.24024529799, -16.8606134795914, 0.450000000008488)
    pt3dadd(-8.82649171172455, 205.232853713758, -16.9819128571424, 0.450000000006949)
    pt3dadd(-8.83036391431126, 206.225462129526, -17.1032122346934, 0.450000000005689)
    pt3dadd(-8.83423611689797, 207.218070545293, -17.2245116122445, 0.450000000004658)
    pt3dadd(-8.83810831948468, 208.210678961061, -17.3458109897955, 0.450000000003814)
    pt3dadd(-8.84198052207139, 209.203287376829, -17.4671103673465, 0.450000000003122)
    pt3dadd(-8.8458527246581, 210.195895792596, -17.5884097448975, 0.450000000002556)
    pt3dadd(-8.84972492724481, 211.188504208364, -17.7097091224485, 0.450000000002093)
    pt3dadd(-8.85359712983152, 212.181112624132, -17.8310084999996, 0.450000000001714)
    pt3dadd(-8.85746933241822, 213.173721039899, -17.9523078775506, 0.450000000001403)
    pt3dadd(-8.86134153500493, 214.166329455667, -18.0736072551016, 0.450000000001149)
    pt3dadd(-8.86521373759164, 215.158937871435, -18.1949066326526, 0.45000000000094)
    pt3dadd(-8.86908594017835, 216.151546287203, -18.3162060102036, 0.45000000000077)
    pt3dadd(-8.87295814276506, 217.14415470297, -18.4375053877546, 0.45000000000063)
    pt3dadd(-8.87683034535177, 218.136763118738, -18.5588047653057, 0.450000000000516)
    pt3dadd(-8.88070254793848, 219.129371534506, -18.6801041428567, 0.450000000000423)
    pt3dadd(-8.88457475052519, 220.121979950273, -18.8014035204077, 0.450000000000346)
    pt3dadd(-8.8884469531119, 221.114588366041, -18.9227028979587, 0.450000000000283)
    pt3dadd(-8.89231915569861, 222.107196781809, -19.0440022755097, 0.450000000000232)
    pt3dadd(-8.89619135828532, 223.099805197576, -19.1653016530607, 0.45000000000019)
    pt3dadd(-8.90006356087203, 224.092413613344, -19.2866010306118, 0.450000000000155)
    pt3dadd(-8.90393576345874, 225.085022029112, -19.4079004081628, 0.450000000000127)
    pt3dadd(-8.90780796604545, 226.07763044488, -19.5291997857138, 0.450000000000104)
    pt3dadd(-8.91168016863216, 227.070238860647, -19.6504991632648, 0.450000000000085)
    pt3dadd(-8.91555237121887, 228.062847276415, -19.7717985408158, 0.45000000000007)
    pt3dadd(-8.91942457380558, 229.055455692183, -19.8930979183668, 0.450000000000057)
    pt3dadd(-8.92329677639229, 230.04806410795, -20.0143972959179, 0.450000000000047)
    pt3dadd(-8.927168978979, 231.040672523718, -20.1356966734689, 0.450000000000038)
    pt3dadd(-8.93104118156571, 232.033280939486, -20.2569960510199, 0.450000000000031)
    pt3dadd(-8.93491338415241, 233.025889355253, -20.3782954285709, 0.450000000000026)
    pt3dadd(-8.93878558673912, 234.018497771021, -20.4995948061219, 0.450000000000021)
    pt3dadd(-8.94265778932583, 235.011106186789, -20.620894183673, 0.450000000000017)
    pt3dadd(-8.94652999191254, 236.003714602557, -20.742193561224, 0.450000000000014)
    pt3dadd(-8.95040219449925, 236.996323018324, -20.863492938775, 0.450000000000012)
    pt3dadd(-8.95427439708596, 237.988931434092, -20.984792316326, 0.450000000000009)
    pt3dadd(-8.95814659967267, 238.98153984986, -21.106091693877, 0.450000000000008)
    pt3dadd(-8.96201880225938, 239.974148265627, -21.227391071428, 0.450000000000006)
    pt3dadd(-8.96589100484609, 240.966756681395, -21.3486904489791, 0.450000000000005)
    pt3dadd(-8.9697632074328, 241.959365097163, -21.4699898265301, 0.450000000000004)
    pt3dadd(-8.97363541001951, 242.95197351293, -21.5912892040811, 0.450000000000004)
    pt3dadd(-8.97750761260622, 243.944581928698, -21.7125885816321, 0.450000000000003)
    pt3dadd(-8.98137981519293, 244.937190344466, -21.8338879591831, 0.450000000000002)
    pt3dadd(-8.98525201777964, 245.929798760234, -21.9551873367341, 0.450000000000002)
    pt3dadd(-8.98912422036635, 246.922407176001, -22.0764867142852, 0.450000000000002)
    pt3dadd(-8.99299642295306, 247.915015591769, -22.1977860918362, 0.450000000000001)
    pt3dadd(-8.99686862553977, 248.907624007537, -22.3190854693872, 0.450000000000001)
    pt3dadd(-9.00074082812648, 249.900232423304, -22.4403848469382, 0.450000000000001)
    pt3dadd(-9.00461303071319, 250.892840839072, -22.5616842244892, 0.450000000000001)
    pt3dadd(-9.0084852332999, 251.88544925484, -22.6829836020402, 0.450000000000001)
    pt3dadd(-9.0123574358866, 252.878057670607, -22.8042829795913, 0.45)
    pt3dadd(-9.01622963847331, 253.870666086375, -22.9255823571423, 0.45)
    pt3dadd(-9.02010184106002, 254.863274502143, -23.0468817346933, 0.45)
    pt3dadd(-9.02397404364673, 255.855882917911, -23.1681811122443, 0.45)
    pt3dadd(-9.02784624623344, 256.848491333678, -23.2894804897953, 0.45)
    pt3dadd(-9.03171844882015, 257.841099749446, -23.4107798673463, 0.45)
    pt3dadd(-9.03559065140686, 258.833708165214, -23.5320792448974, 0.45)
    pt3dadd(-9.03946285399357, 259.826316580981, -23.6533786224484, 0.45)
    pt3dadd(-9.04333505658028, 260.818924996749, -23.7746779999994, 0.45)
    pt3dadd(-9.04720725916699, 261.811533412517, -23.8959773775504, 0.45)
    pt3dadd(-9.0510794617537, 262.804141828284, -24.0172767551014, 0.45)
    pt3dadd(-9.05495166434041, 263.796750244052, -24.1385761326525, 0.45)
    pt3dadd(-9.05882386692712, 264.78935865982, -24.2598755102035, 0.45)
    pt3dadd(-9.06269606951383, 265.781967075588, -24.3811748877545, 0.45)
    pt3dadd(-9.06656827210054, 266.774575491355, -24.5024742653055, 0.45)
    pt3dadd(-9.07044047468725, 267.767183907123, -24.6237736428565, 0.45)
    pt3dadd(-9.07431267727396, 268.759792322891, -24.7450730204075, 0.45)
    pt3dadd(-9.07818487986067, 269.752400738658, -24.8663723979586, 0.45)
    pt3dadd(-9.08205708244738, 270.745009154426, -24.9876717755096, 0.45)
    pt3dadd(-9.08592928503409, 271.737617570194, -25.1089711530606, 0.45)
    pt3dadd(-9.08980148762079, 272.730225985961, -25.2302705306116, 0.45)
    pt3dadd(-9.0936736902075, 273.722834401729, -25.3515699081626, 0.45)
    pt3dadd(-9.09754589279421, 274.715442817497, -25.4728692857136, 0.45)
    pt3dadd(-9.10141809538092, 275.708051233265, -25.5941686632647, 0.45)
    pt3dadd(-9.10529029796763, 276.700659649032, -25.7154680408157, 0.45)
    pt3dadd(-9.10916250055434, 277.6932680648, -25.8367674183667, 0.45)
    pt3dadd(-9.11303470314105, 278.685876480568, -25.9580667959177, 0.45)
    pt3dadd(-9.11690690572776, 279.678484896335, -26.0793661734687, 0.45)
    pt3dadd(-9.12077910831447, 280.671093312103, -26.2006655510198, 0.45)
    pt3dadd(-9.12465131090118, 281.663701727871, -26.3219649285708, 0.45)
    pt3dadd(-9.12852351348789, 282.656310143638, -26.4432643061218, 0.45)
    pt3dadd(-9.1323957160746, 283.648918559406, -26.5645636836728, 0.45)
    pt3dadd(-9.13626791866131, 284.641526975174, -26.6858630612238, 0.45)
    pt3dadd(-9.14014012124802, 285.634135390942, -26.8071624387748, 0.45)
    pt3dadd(-9.14401232383473, 286.626743806709, -26.9284618163259, 0.45)
    pt3dadd(-9.14788452642144, 287.619352222477, -27.0497611938769, 0.45)
    pt3dadd(-9.15175672900815, 288.611960638245, -27.1710605714279, 0.45)
    pt3dadd(-9.15562893159485, 289.604569054012, -27.2923599489789, 0.45)
    pt3dadd(-9.15950113418156, 290.59717746978, -27.4136593265299, 0.45)
    pt3dadd(-9.16337333676827, 291.589785885548, -27.5349587040809, 0.45)
    pt3dadd(-9.16724553935498, 292.582394301315, -27.656258081632, 0.45)
    pt3dadd(-9.17111774194169, 293.575002717083, -27.777557459183, 0.45)
    pt3dadd(-9.1749899445284, 294.567611132851, -27.898856836734, 0.45)
    pt3dadd(-9.17886214711511, 295.560219548619, -28.020156214285, 0.45)
    pt3dadd(-9.18273434970182, 296.552827964386, -28.141455591836, 0.45)
    pt3dadd(-9.18660655228853, 297.545436380154, -28.262754969387, 0.45)
    pt3dadd(-9.19047875487524, 298.538044795922, -28.3840543469381, 0.45)
    pt3dadd(-9.19435095746195, 299.530653211689, -28.5053537244891, 0.45)
    pt3dadd(-9.19822316004866, 300.523261627457, -28.6266531020401, 0.45)
    pt3dadd(-9.20209536263537, 301.515870043225, -28.7479524795911, 0.45)
    pt3dadd(-9.20596756522208, 302.508478458992, -28.8692518571421, 0.45)
    pt3dadd(-9.20983976780879, 303.50108687476, -28.9905512346931, 0.45)
    pt3dadd(-9.2137119703955, 304.493695290528, -29.1118506122442, 0.45)
    pt3dadd(-9.21758417298221, 305.486303706296, -29.2331499897952, 0.45)
    pt3dadd(-9.22145637556892, 306.478912122063, -29.3544493673462, 0.45)
    pt3dadd(-9.22532857815563, 307.471520537831, -29.4757487448972, 0.45)
    pt3dadd(-9.22920078074234, 308.464128953599, -29.5970481224482, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-9.23307298332904, 309.456737369366, -29.7183474999993, 0.45)
    pt3dadd(-9.23694518591575, 310.449345785134, -29.8396468775503, 0.45)
    pt3dadd(-9.24081738850246, 311.441954200902, -29.9609462551013, 0.45)
    pt3dadd(-9.24468959108917, 312.434562616669, -30.0822456326523, 0.45)
    pt3dadd(-9.24856179367588, 313.427171032437, -30.2035450102033, 0.45)
    pt3dadd(-9.25243399626259, 314.419779448205, -30.3248443877543, 0.45)
    pt3dadd(-9.2563061988493, 315.412387863973, -30.4461437653054, 0.45)
    pt3dadd(-9.26017840143601, 316.40499627974, -30.5674431428564, 0.45)
    pt3dadd(-9.26405060402272, 317.397604695508, -30.6887425204074, 0.45)
    pt3dadd(-9.26792280660943, 318.390213111276, -30.8100418979584, 0.45)
    pt3dadd(-9.27179500919614, 319.382821527043, -30.9313412755094, 0.45)
    pt3dadd(-9.27566721178285, 320.375429942811, -31.0526406530604, 0.45)
    pt3dadd(-9.27953941436956, 321.368038358579, -31.1739400306115, 0.45)
    pt3dadd(-9.28341161695627, 322.360646774346, -31.2952394081625, 0.45)
    pt3dadd(-9.28728381954298, 323.353255190114, -31.4165387857135, 0.45)
    pt3dadd(-9.29115602212969, 324.345863605882, -31.5378381632645, 0.45)
    pt3dadd(-9.2950282247164, 325.33847202165, -31.6591375408155, 0.45)
    pt3dadd(-9.29890042730311, 326.331080437417, -31.7804369183665, 0.45)
    pt3dadd(-9.30277262988982, 327.323688853185, -31.9017362959176, 0.45)
    pt3dadd(-9.30664483247653, 328.316297268953, -32.0230356734686, 0.45)
    pt3dadd(-9.31051703506323, 329.30890568472, -32.1443350510196, 0.45)
    pt3dadd(-9.31438923764994, 330.301514100488, -32.2656344285706, 0.45)
    pt3dadd(-9.31826144023665, 331.294122516256, -32.3869338061216, 0.45)
    pt3dadd(-9.32213364282336, 332.286730932023, -32.5082331836727, 0.45)
    pt3dadd(-9.32600584541007, 333.279339347791, -32.6295325612237, 0.45)
    pt3dadd(-9.32987804799678, 334.271947763559, -32.7508319387747, 0.45)
    pt3dadd(-9.33375025058349, 335.264556179327, -32.8721313163257, 0.45)
    pt3dadd(-9.3376224531702, 336.257164595094, -32.9934306938767, 0.45)
    pt3dadd(-9.34149465575691, 337.249773010862, -33.1147300714277, 0.45)
    pt3dadd(-9.34536685834362, 338.24238142663, -33.2360294489788, 0.45)
    pt3dadd(-9.34923906093033, 339.234989842397, -33.3573288265298, 0.45)
    pt3dadd(-9.35311126351704, 340.227598258165, -33.4786282040808, 0.45)
    pt3dadd(-9.35698346610375, 341.220206673933, -33.5999275816318, 0.45)
    pt3dadd(-9.36085566869046, 342.2128150897, -33.7212269591828, 0.45)
    pt3dadd(-9.36472787127717, 343.205423505468, -33.8425263367338, 0.45)
    pt3dadd(-9.36860007386388, 344.198031921236, -33.9638257142849, 0.45)
    pt3dadd(-9.37247227645059, 345.190640337004, -34.0851250918359, 0.45)
    pt3dadd(-9.3763444790373, 346.183248752771, -34.2064244693869, 0.45)
    pt3dadd(-9.38021668162401, 347.175857168539, -34.3277238469379, 0.45)
    pt3dadd(-9.38408888421072, 348.168465584307, -34.4490232244889, 0.45)
    pt3dadd(-9.38796108679743, 349.161074000074, -34.5703226020399, 0.45)
    pt3dadd(-9.39183328938413, 350.153682415842, -34.691621979591, 0.45)
    pt3dadd(-9.39570549197084, 351.14629083161, -34.812921357142, 0.45)
    pt3dadd(-9.39957769455755, 352.138899247377, -34.934220734693, 0.45)
    pt3dadd(-9.40344989714426, 353.131507663145, -35.055520112244, 0.45)
    pt3dadd(-9.40732209973097, 354.124116078913, -35.176819489795, 0.45)
    pt3dadd(-9.41119430231768, 355.116724494681, -35.298118867346, 0.45)
    pt3dadd(-9.41506650490439, 356.109332910448, -35.4194182448971, 0.45)
    pt3dadd(-9.4189387074911, 357.101941326216, -35.5407176224481, 0.45)
    pt3dadd(-9.42281091007781, 358.094549741984, -35.6620169999991, 0.45)
    pt3dadd(-9.42668311266452, 359.087158157751, -35.7833163775501, 0.45)
    pt3dadd(-9.43055531525123, 360.079766573519, -35.9046157551011, 0.45)
    pt3dadd(-9.43442751783794, 361.072374989287, -36.0259151326522, 0.45)
    pt3dadd(-9.43829972042465, 362.064983405054, -36.1472145102032, 0.45)
    pt3dadd(-9.44217192301136, 363.057591820822, -36.2685138877542, 0.45)
    pt3dadd(-9.44604412559807, 364.05020023659, -36.3898132653052, 0.45)
    pt3dadd(-9.44991632818478, 365.042808652358, -36.5111126428562, 0.45)
    pt3dadd(-9.45378853077149, 366.035417068125, -36.6324120204072, 0.45)
    pt3dadd(-9.4576607333582, 367.028025483893, -36.7537113979583, 0.45)
    pt3dadd(-9.46153293594491, 368.020633899661, -36.8750107755093, 0.45)
    pt3dadd(-9.46540513853161, 369.013242315428, -36.9963101530603, 0.45)
    pt3dadd(-9.46927734111832, 370.005850731196, -37.1176095306113, 0.45)
    pt3dadd(-9.47314954370503, 370.998459146964, -37.2389089081623, 0.45)
    pt3dadd(-9.47702174629174, 371.991067562731, -37.3602082857133, 0.45)
    pt3dadd(-9.48089394887845, 372.983675978499, -37.4815076632644, 0.45)
    pt3dadd(-9.48476615146516, 373.976284394267, -37.6028070408154, 0.45)
    pt3dadd(-9.48863835405187, 374.968892810035, -37.7241064183664, 0.45)
    pt3dadd(-9.49251055663858, 375.961501225802, -37.8454057959174, 0.45)
    pt3dadd(-9.49638275922529, 376.95410964157, -37.9667051734684, 0.45)
    pt3dadd(-9.500254961812, 377.946718057338, -38.0880045510195, 0.45)
    pt3dadd(-9.50412716439871, 378.939326473105, -38.2093039285705, 0.45)
    pt3dadd(-9.50799936698542, 379.931934888873, -38.3306033061215, 0.45)
    pt3dadd(-9.51187156957213, 380.924543304641, -38.4519026836725, 0.45)
    pt3dadd(-9.51574377215884, 381.917151720408, -38.5732020612235, 0.45)
    pt3dadd(-9.51961597474555, 382.909760136176, -38.6945014387745, 0.45)
    pt3dadd(-9.52348817733226, 383.902368551944, -38.8158008163256, 0.45)
    pt3dadd(-9.52736037991897, 384.894976967712, -38.9371001938766, 0.45)
    pt3dadd(-9.53123258250568, 385.887585383479, -39.0583995714276, 0.45)
    pt3dadd(-9.53510478509238, 386.880193799247, -39.1796989489786, 0.45)
    pt3dadd(-9.53897698767909, 387.872802215015, -39.3009983265296, 0.45)
    pt3dadd(-9.5428491902658, 388.865410630782, -39.4222977040806, 0.45)
    pt3dadd(-9.54672139285251, 389.85801904655, -39.5435970816317, 0.45)
    pt3dadd(-9.55059359543922, 390.850627462318, -39.6648964591827, 0.45)
    pt3dadd(-9.55446579802593, 391.843235878085, -39.7861958367337, 0.45)
    pt3dadd(-9.55833800061264, 392.835844293853, -39.9074952142847, 0.45)
    pt3dadd(-9.56221020319935, 393.828452709621, -40.0287945918357, 0.45)
    pt3dadd(-9.56608240578606, 394.821061125389, -40.1500939693867, 0.45)
    pt3dadd(-9.56995460837277, 395.813669541156, -40.2713933469378, 0.45)
    pt3dadd(-9.57382681095948, 396.806277956924, -40.3926927244888, 0.45)
    pt3dadd(-9.57769901354619, 397.798886372692, -40.5139921020398, 0.45)
    pt3dadd(-9.5815712161329, 398.791494788459, -40.6352914795908, 0.45)
    pt3dadd(-9.58544341871961, 399.784103204227, -40.7565908571418, 0.45)
    pt3dadd(-9.58931562130632, 400.776711619995, -40.8778902346928, 0.45)
    pt3dadd(-9.59318782389303, 401.769320035762, -40.9991896122439, 0.45)
    pt3dadd(-9.59706002647974, 402.76192845153, -41.1204889897949, 0.45)
    pt3dadd(-9.60093222906645, 403.754536867298, -41.2417883673459, 0.45)
    pt3dadd(-9.60480443165316, 404.747145283066, -41.3630877448969, 0.45)
    pt3dadd(-9.60867663423987, 405.739753698833, -41.4843871224479, 0.45)
    pt3dadd(-9.61254883682657, 406.732362114601, -41.605686499999, 0.45)
    pt3dadd(-9.61642103941328, 407.724970530369, -41.72698587755, 0.45)
    pt3dadd(-9.62029324199999, 408.717578946136, -41.848285255101, 0.45)
    pt3dadd(-9.6241654445867, 409.710187361904, -41.969584632652, 0.45)
    pt3dadd(-9.62803764717341, 410.702795777672, -42.090884010203, 0.45)
    pt3dadd(-9.63190984976012, 411.695404193439, -42.212183387754, 0.45)
    pt3dadd(-9.63578205234683, 412.688012609207, -42.3334827653051, 0.45)
    pt3dadd(-9.63965425493354, 413.680621024975, -42.4547821428561, 0.45)
    pt3dadd(-9.64352645752025, 414.673229440743, -42.5760815204071, 0.45)
    pt3dadd(-9.64739866010696, 415.66583785651, -42.6973808979581, 0.45)
    pt3dadd(-9.65127086269367, 416.658446272278, -42.8186802755091, 0.45)
    pt3dadd(-9.65514306528038, 417.651054688046, -42.9399796530601, 0.45)
    pt3dadd(-9.65901526786709, 418.643663103813, -43.0612790306112, 0.45)
    pt3dadd(-9.6628874704538, 419.636271519581, -43.1825784081622, 0.45)
    pt3dadd(-9.66675967304051, 420.628879935349, -43.3038777857132, 0.45)
    pt3dadd(-9.67063187562722, 421.621488351116, -43.4251771632642, 0.45)
    pt3dadd(-9.67450407821393, 422.614096766884, -43.5464765408152, 0.45)
    pt3dadd(-9.67837628080064, 423.606705182652, -43.6677759183662, 0.45)
    pt3dadd(-9.68224848338735, 424.59931359842, -43.7890752959173, 0.45)
    pt3dadd(-9.68612068597406, 425.591922014187, -43.9103746734683, 0.45)
    pt3dadd(-9.68999288856076, 426.584530429955, -44.0316740510193, 0.45)
    pt3dadd(-9.69386509114747, 427.577138845723, -44.1529734285703, 0.45)
    pt3dadd(-9.69773729373418, 428.56974726149, -44.2742728061213, 0.45)
    pt3dadd(-9.70160949632089, 429.562355677258, -44.3955721836724, 0.45)
    pt3dadd(-9.7054816989076, 430.554964093026, -44.5168715612234, 0.45)
    pt3dadd(-9.70935390149431, 431.547572508793, -44.6381709387744, 0.45)
    pt3dadd(-9.71322610408102, 432.540180924561, -44.7594703163254, 0.45)
    pt3dadd(-9.71709830666773, 433.532789340329, -44.8807696938764, 0.45)
    pt3dadd(-9.72097050925444, 434.525397756097, -45.0020690714274, 0.45)
    pt3dadd(-9.72484271184115, 435.518006171864, -45.1233684489785, 0.45)
    pt3dadd(-9.72871491442786, 436.510614587632, -45.2446678265295, 0.45)
    pt3dadd(-9.73258711701457, 437.5032230034, -45.3659672040805, 0.45)
    pt3dadd(-9.73645931960128, 438.495831419167, -45.4872665816315, 0.45)
    pt3dadd(-9.74033152218799, 439.488439834935, -45.6085659591825, 0.45)
    pt3dadd(-9.7442037247747, 440.481048250703, -45.7298653367335, 0.45)
    pt3dadd(-9.74807592736141, 441.47365666647, -45.8511647142846, 0.45)
    pt3dadd(-9.75194812994812, 442.466265082238, -45.9724640918356, 0.45)
    pt3dadd(-9.75582033253482, 443.458873498006, -46.0937634693866, 0.45)
    pt3dadd(-9.75969253512153, 444.451481913774, -46.2150628469376, 0.45)
    pt3dadd(-9.76356473770824, 445.444090329541, -46.3363622244886, 0.45)
    pt3dadd(-9.76743694029495, 446.436698745309, -46.4576616020397, 0.45)
    pt3dadd(-9.77130914288166, 447.429307161077, -46.5789609795907, 0.45)
    pt3dadd(-9.77518134546837, 448.421915576844, -46.7002603571417, 0.45)
    pt3dadd(-9.77905354805508, 449.414523992612, -46.8215597346927, 0.45)
    pt3dadd(-9.78292575064179, 450.40713240838, -46.9428591122437, 0.45)
    pt3dadd(-9.7867979532285, 451.399740824147, -47.0641584897947, 0.45)
    pt3dadd(-9.79067015581521, 452.392349239915, -47.1854578673458, 0.45)
    pt3dadd(-9.79454235840192, 453.384957655683, -47.3067572448968, 0.45)
    pt3dadd(-9.79841456098863, 454.377566071451, -47.4280566224478, 0.45)
    pt3dadd(-9.80228676357534, 455.370174487218, -47.5493559999988, 0.45)
    pt3dadd(-9.80615896616205, 456.362782902986, -47.6706553775498, 0.45)
    pt3dadd(-9.81003116874876, 457.355391318754, -47.7919547551008, 0.45)
    pt3dadd(-9.81390337133547, 458.347999734521, -47.9132541326519, 0.45)
    pt3dadd(-9.81777557392218, 459.340608150289, -48.0345535102029, 0.45)
    pt3dadd(-9.82164777650889, 460.333216566057, -48.1558528877539, 0.45)
    pt3dadd(-9.8255199790956, 461.325824981824, -48.2771522653049, 0.45)
    pt3dadd(-9.82939218168231, 462.318433397592, -48.3984516428559, 0.45)
    pt3dadd(-9.83326438426901, 463.31104181336, -48.5197510204069, 0.45)
    pt3dadd(-9.83713658685572, 464.303650229128, -48.641050397958, 0.45)
    pt3dadd(-9.84100878944243, 465.296258644895, -48.762349775509, 0.45)
    pt3dadd(-9.84488099202914, 466.288867060663, -48.88364915306, 0.45)
    pt3dadd(-9.84875319461585, 467.281475476431, -49.004948530611, 0.45)
    pt3dadd(-9.85262539720256, 468.274083892198, -49.126247908162, 0.45)
    pt3dadd(-9.85649759978927, 469.266692307966, -49.247547285713, 0.45)
    pt3dadd(-9.86036980237598, 470.259300723734, -49.3688466632641, 0.45)
    pt3dadd(-9.86424200496269, 471.251909139501, -49.4901460408151, 0.45)
    pt3dadd(-9.8681142075494, 472.244517555269, -49.6114454183661, 0.45)
    pt3dadd(-9.87198641013611, 473.237125971037, -49.7327447959171, 0.45)
    pt3dadd(-9.87585861272282, 474.229734386805, -49.8540441734681, 0.45)
    pt3dadd(-9.87973081530953, 475.222342802572, -49.9753435510192, 0.45)
    pt3dadd(-9.88360301789624, 476.21495121834, -50.0966429285702, 0.45)
    pt3dadd(-9.88747522048295, 477.207559634108, -50.2179423061212, 0.45)
    pt3dadd(-9.89134742306966, 478.200168049875, -50.3392416836722, 0.45)
    pt3dadd(-9.89521962565637, 479.192776465643, -50.4605410612232, 0.45)
    pt3dadd(-9.89909182824308, 480.185384881411, -50.5818404387742, 0.45)
    pt3dadd(-9.90296403082979, 481.177993297178, -50.7031398163253, 0.45)
    pt3dadd(-9.9068362334165, 482.170601712946, -50.8244391938763, 0.45)
    pt3dadd(-9.9107084360032, 483.163210128714, -50.9457385714273, 0.45)
    pt3dadd(-9.91458063858991, 484.155818544482, -51.0670379489783, 0.45)
    pt3dadd(-9.91845284117662, 485.148426960249, -51.1883373265293, 0.45)
    pt3dadd(-9.92232504376333, 486.141035376017, -51.3096367040803, 0.45)
    pt3dadd(-9.92619724635004, 487.133643791785, -51.4309360816314, 0.45)
    pt3dadd(-9.93006944893675, 488.126252207552, -51.5522354591824, 0.45)
    pt3dadd(-9.93394165152346, 489.11886062332, -51.6735348367334, 0.45)
    pt3dadd(-9.93781385411017, 490.111469039088, -51.7948342142844, 0.45)
    pt3dadd(-9.94168605669688, 491.104077454855, -51.9161335918354, 0.45)
    pt3dadd(-9.94555825928359, 492.096685870623, -52.0374329693864, 0.45)
    pt3dadd(-9.9494304618703, 493.089294286391, -52.1587323469375, 0.45)
    pt3dadd(-9.95330266445701, 494.081902702159, -52.2800317244885, 0.45)
    pt3dadd(-9.95717486704372, 495.074511117926, -52.4013311020395, 0.45)
    pt3dadd(-9.96104706963043, 496.067119533694, -52.5226304795905, 0.45)
    pt3dadd(-9.96491927221714, 497.059727949462, -52.6439298571415, 0.45)
    pt3dadd(-9.96879147480385, 498.052336365229, -52.7652292346925, 0.45)
    pt3dadd(-9.97266367739056, 499.044944780997, -52.8865286122436, 0.45)
    pt3dadd(-9.97653587997727, 500.037553196765, -53.0078279897946, 0.45)
    pt3dadd(-9.98040808256398, 501.030161612532, -53.1291273673456, 0.45)
    pt3dadd(-9.98428028515069, 502.0227700283, -53.2504267448966, 0.45)
    pt3dadd(-9.98815248773739, 503.015378444068, -53.3717261224476, 0.45)
    pt3dadd(-9.9920246903241, 504.007986859836, -53.4930254999987, 0.45)
    pt3dadd(-9.99589689291081, 505.000595275603, -53.6143248775497, 0.45)
    pt3dadd(-9.99976909549752, 505.993203691371, -53.7356242551007, 0.45)
    pt3dadd(-10.0036412980842, 506.985812107139, -53.8569236326517, 0.45)
    pt3dadd(-10.0075135006709, 507.978420522906, -53.9782230102027, 0.45)
    pt3dadd(-10.0113857032577, 508.971028938674, -54.0995223877537, 0.45)
    pt3dadd(-10.0152579058444, 509.963637354442, -54.2208217653048, 0.45)
    pt3dadd(-10.0191301084311, 510.956245770209, -54.3421211428558, 0.45)
    pt3dadd(-10.0230023110178, 511.948854185977, -54.4634205204068, 0.45)
    pt3dadd(-10.0268745136045, 512.941462601745, -54.5847198979578, 0.45)
    pt3dadd(-10.0307467161912, 513.934071017512, -54.7060192755088, 0.45)
    pt3dadd(-10.0346189187779, 514.92667943328, -54.8273186530598, 0.45)
    pt3dadd(-10.0384911213646, 515.919287849048, -54.9486180306109, 0.45)
    pt3dadd(-10.0423633239513, 516.911896264816, -55.0699174081619, 0.45)
    pt3dadd(-10.046235526538, 517.904504680583, -55.1912167857129, 0.45)
    pt3dadd(-10.0501077291247, 518.897113096351, -55.3125161632639, 0.45)
    pt3dadd(-10.0539799317115, 519.889721512119, -55.4338155408149, 0.45)
    pt3dadd(-10.0578521342982, 520.882329927886, -55.555114918366, 0.45)
    pt3dadd(-10.0617243368849, 521.874938343654, -55.676414295917, 0.45)
    pt3dadd(-10.0655965394716, 522.867546759422, -55.797713673468, 0.45)
    pt3dadd(-10.0694687420583, 523.860155175189, -55.919013051019, 0.45)
    pt3dadd(-10.073340944645, 524.852763590957, -56.04031242857, 0.45)
    pt3dadd(-10.0772131472317, 525.845372006725, -56.161611806121, 0.45)
    pt3dadd(-10.0810853498184, 526.837980422493, -56.2829111836721, 0.45)
    pt3dadd(-10.0849575524051, 527.83058883826, -56.4042105612231, 0.45)
    pt3dadd(-10.0888297549918, 528.823197254028, -56.5255099387741, 0.45)
    pt3dadd(-10.0927019575786, 529.815805669796, -56.6468093163251, 0.45)
    pt3dadd(-10.0965741601653, 530.808414085563, -56.7681086938761, 0.45)
    pt3dadd(-10.100446362752, 531.801022501331, -56.8894080714271, 0.45)
    pt3dadd(-10.1043185653387, 532.793630917099, -57.0107074489782, 0.45)
    pt3dadd(-10.1081907679254, 533.786239332866, -57.1320068265292, 0.45)
    pt3dadd(-10.1120629705121, 534.778847748634, -57.2533062040802, 0.45)
    pt3dadd(-10.1159351730988, 535.771456164402, -57.3746055816312, 0.45)
    pt3dadd(-10.1198073756855, 536.76406458017, -57.4959049591822, 0.45)
    pt3dadd(-10.1236795782722, 537.756672995937, -57.6172043367332, 0.45)
    pt3dadd(-10.1275517808589, 538.749281411705, -57.7385037142843, 0.45)
    pt3dadd(-10.1314239834456, 539.741889827473, -57.8598030918353, 0.45)
    pt3dadd(-10.1352961860324, 540.73449824324, -57.9811024693863, 0.45)
    pt3dadd(-10.1391683886191, 541.727106659008, -58.1024018469373, 0.45)
    pt3dadd(-10.1430405912058, 542.719715074776, -58.2237012244883, 0.45)
    pt3dadd(-10.1469127937925, 543.712323490543, -58.3450006020393, 0.45)
    pt3dadd(-10.1507849963792, 544.704931906311, -58.4662999795904, 0.45)
    pt3dadd(-10.1546571989659, 545.697540322079, -58.5875993571414, 0.45)
    pt3dadd(-10.1585294015526, 546.690148737847, -58.7088987346924, 0.45)
    pt3dadd(-10.1624016041393, 547.682757153614, -58.8301981122434, 0.45)
    pt3dadd(-10.166273806726, 548.675365569382, -58.9514974897944, 0.45)
    pt3dadd(-10.1701460093127, 549.66797398515, -59.0727968673455, 0.45)
    pt3dadd(-10.1740182118994, 550.660582400917, -59.1940962448965, 0.45)
    pt3dadd(-10.1778904144862, 551.653190816685, -59.3153956224475, 0.45)
    pt3dadd(-10.1817626170729, 552.645799232453, -59.4366949999985, 0.45)
    pt3dadd(-10.1856348196596, 553.63840764822, -59.5579943775495, 0.45)
    pt3dadd(-10.1895070222463, 554.631016063988, -59.6792937551005, 0.45)
    pt3dadd(-10.193379224833, 555.623624479756, -59.8005931326516, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-10.1972514274197, 556.616232895524, -59.9218925102026, 0.45)
    pt3dadd(-10.2011236300064, 557.608841311291, -60.0431918877536, 0.45)
    pt3dadd(-10.2049958325931, 558.601449727059, -60.1644912653046, 0.45)
    pt3dadd(-10.2088680351798, 559.594058142827, -60.2857906428556, 0.45)
    pt3dadd(-10.2127402377665, 560.586666558594, -60.4070900204066, 0.45)
    pt3dadd(-10.2166124403533, 561.579274974362, -60.5283893979577, 0.45)
    pt3dadd(-10.22048464294, 562.57188339013, -60.6496887755087, 0.45)
    pt3dadd(-10.2243568455267, 563.564491805898, -60.7709881530597, 0.45)
    pt3dadd(-10.2282290481134, 564.557100221665, -60.8922875306107, 0.45)
    pt3dadd(-10.2321012507001, 565.549708637433, -61.0135869081617, 0.45)
    pt3dadd(-10.2359734532868, 566.542317053201, -61.1348862857127, 0.45)
    pt3dadd(-10.2398456558735, 567.534925468968, -61.2561856632638, 0.45)
    pt3dadd(-10.2437178584602, 568.527533884736, -61.3774850408148, 0.45)
    pt3dadd(-10.2475900610469, 569.520142300504, -61.4987844183658, 0.45)
    pt3dadd(-10.2514622636336, 570.512750716271, -61.6200837959168, 0.45)
    pt3dadd(-10.2553344662203, 571.505359132039, -61.7413831734678, 0.45)
    pt3dadd(-10.2592066688071, 572.497967547807, -61.8626825510189, 0.45)
    pt3dadd(-10.2630788713938, 573.490575963575, -61.9839819285699, 0.45)
    pt3dadd(-10.2669510739805, 574.483184379342, -62.1052813061209, 0.45)
    pt3dadd(-10.2708232765672, 575.47579279511, -62.2265806836719, 0.45)
    pt3dadd(-10.2746954791539, 576.468401210878, -62.3478800612229, 0.45)
    pt3dadd(-10.2785676817406, 577.461009626645, -62.4691794387739, 0.45)
    pt3dadd(-10.2824398843273, 578.453618042413, -62.590478816325, 0.45)
    pt3dadd(-10.286312086914, 579.446226458181, -62.711778193876, 0.45)
    pt3dadd(-10.2901842895007, 580.438834873948, -62.833077571427, 0.45)
    pt3dadd(-10.2940564920874, 581.431443289716, -62.954376948978, 0.45)
    pt3dadd(-10.2979286946742, 582.424051705484, -63.075676326529, 0.45)
    pt3dadd(-10.3018008972609, 583.416660121252, -63.19697570408, 0.45)
    pt3dadd(-10.3056730998476, 584.409268537019, -63.3182750816311, 0.45)
    pt3dadd(-10.3095453024343, 585.401876952787, -63.4395744591821, 0.45)
    pt3dadd(-10.313417505021, 586.394485368555, -63.5608738367331, 0.45)
    pt3dadd(-10.3172897076077, 587.387093784322, -63.6821732142841, 0.45)
    pt3dadd(-10.3211619101944, 588.37970220009, -63.8034725918351, 0.45)
    pt3dadd(-10.3250341127811, 589.372310615858, -63.9247719693862, 0.45)
    pt3dadd(-10.3289063153678, 590.364919031625, -64.0460713469372, 0.45)
    pt3dadd(-10.3327785179545, 591.357527447393, -64.1673707244882, 0.45)
    pt3dadd(-10.3366507205412, 592.350135863161, -64.2886701020392, 0.45)
    pt3dadd(-10.340522923128, 593.342744278929, -64.4099694795902, 0.45)
    pt3dadd(-10.3443951257147, 594.335352694696, -64.5312688571412, 0.45)
    pt3dadd(-10.3482673283014, 595.327961110464, -64.6525682346923, 0.45)
    pt3dadd(-10.3521395308881, 596.320569526232, -64.7738676122433, 0.45)
    pt3dadd(-10.3560117334748, 597.313177941999, -64.8951669897943, 0.45)
    pt3dadd(-10.3598839360615, 598.305786357767, -65.0164663673453, 0.45)
    pt3dadd(-10.3637561386482, 599.298394773535, -65.1377657448963, 0.45)
    pt3dadd(-10.3676283412349, 600.291003189302, -65.2590651224473, 0.45)
    pt3dadd(-10.3715005438216, 601.28361160507, -65.3803644999984, 0.45)
    pt3dadd(-10.3753727464083, 602.276220020838, -65.5016638775494, 0.45)
    pt3dadd(-10.3792449489951, 603.268828436606, -65.6229632551004, 0.45)
    pt3dadd(-10.3831171515818, 604.261436852373, -65.7442626326514, 0.45)
    pt3dadd(-10.3869893541685, 605.254045268141, -65.8655620102024, 0.45)
    pt3dadd(-10.3908615567552, 606.246653683909, -65.9868613877534, 0.45)
    pt3dadd(-10.3947337593419, 607.239262099676, -66.1081607653045, 0.45)
    pt3dadd(-10.3986059619286, 608.231870515444, -66.2294601428555, 0.45)
    pt3dadd(-10.4024781645153, 609.224478931212, -66.3507595204065, 0.45)
    pt3dadd(-10.406350367102, 610.217087346979, -66.4720588979575, 0.45)
    pt3dadd(-10.4102225696887, 611.209695762747, -66.5933582755085, 0.45)
    pt3dadd(-10.4140947722754, 612.202304178515, -66.7146576530595, 0.45)
    pt3dadd(-10.4179669748621, 613.194912594283, -66.8359570306106, 0.45)
    pt3dadd(-10.4218391774489, 614.18752101005, -66.9572564081616, 0.45)
    pt3dadd(-10.4257113800356, 615.180129425818, -67.0785557857126, 0.45)
    pt3dadd(-10.4295835826223, 616.172737841586, -67.1998551632636, 0.45)
    pt3dadd(-10.433455785209, 617.165346257353, -67.3211545408146, 0.45)
    pt3dadd(-10.4373279877957, 618.157954673121, -67.4424539183656, 0.45)
    pt3dadd(-10.4412001903824, 619.150563088889, -67.5637532959167, 0.45)
    pt3dadd(-10.4450723929691, 620.143171504656, -67.6850526734677, 0.45)
    pt3dadd(-10.4489445955558, 621.135779920424, -67.8063520510187, 0.45)
    pt3dadd(-10.4528167981425, 622.128388336192, -67.9276514285697, 0.45)
    pt3dadd(-10.4566890007292, 623.12099675196, -68.0489508061207, 0.45)
    pt3dadd(-10.460561203316, 624.113605167727, -68.1702501836718, 0.45)
    pt3dadd(-10.4644334059027, 625.106213583495, -68.2915495612228, 0.45)
    pt3dadd(-10.4683056084894, 626.098821999263, -68.4128489387738, 0.45)
    pt3dadd(-10.4721778110761, 627.09143041503, -68.5341483163248, 0.45)
    pt3dadd(-10.4760500136628, 628.084038830798, -68.6554476938758, 0.45)
    pt3dadd(-10.4799222162495, 629.076647246566, -68.7767470714268, 0.45)
    pt3dadd(-10.4837944188362, 630.069255662333, -68.8980464489779, 0.45)
    pt3dadd(-10.4876666214229, 631.061864078101, -69.0193458265289, 0.45)
    pt3dadd(-10.4915388240096, 632.054472493869, -69.1406452040799, 0.45)
    pt3dadd(-10.4954110265963, 633.047080909637, -69.2619445816309, 0.45)
    pt3dadd(-10.499283229183, 634.039689325404, -69.3832439591819, 0.45)
    pt3dadd(-10.5031554317698, 635.032297741172, -69.504543336733, 0.45)
    pt3dadd(-10.5070276343565, 636.02490615694, -69.625842714284, 0.45)
    pt3dadd(-10.5108998369432, 637.017514572707, -69.747142091835, 0.45)
    pt3dadd(-10.5147720395299, 638.010122988475, -69.868441469386, 0.45)
    pt3dadd(-10.5186442421166, 639.002731404243, -69.989740846937, 0.45)
    pt3dadd(-10.5225164447033, 639.99533982001, -70.111040224488, 0.45)
    pt3dadd(-10.52638864729, 640.987948235778, -70.232339602039, 0.45)
    pt3dadd(-10.5302608498767, 641.980556651546, -70.3536389795901, 0.45)
    pt3dadd(-10.5341330524634, 642.973165067314, -70.4749383571411, 0.45)
    pt3dadd(-10.5380052550501, 643.965773483081, -70.5962377346921, 0.45)
    pt3dadd(-10.5418774576369, 644.958381898849, -70.7175371122431, 0.45)
    pt3dadd(-10.5457496602236, 645.950990314617, -70.8388364897941, 0.45)
    pt3dadd(-10.5496218628103, 646.943598730384, -70.9601358673452, 0.45)
    pt3dadd(-10.553494065397, 647.936207146152, -71.0814352448962, 0.45)
    pt3dadd(-10.5573662679837, 648.92881556192, -71.2027346224472, 0.45)
    pt3dadd(-10.5612384705704, 649.921423977687, -71.3240339999982, 0.45)
    pt3dadd(-10.5651106731571, 650.914032393455, -71.4453333775492, 0.45)
    pt3dadd(-10.5689828757438, 651.906640809223, -71.5666327551002, 0.45)
    pt3dadd(-10.5728550783305, 652.899249224991, -71.6879321326513, 0.45)
    pt3dadd(-10.5767272809172, 653.891857640758, -71.8092315102023, 0.45)
    pt3dadd(-10.5805994835039, 654.884466056526, -71.9305308877533, 0.45)
    pt3dadd(-10.5844716860907, 655.877074472294, -72.0518302653043, 0.45)
    pt3dadd(-10.5883438886774, 656.869682888061, -72.1731296428553, 0.45)
    pt3dadd(-10.5922160912641, 657.862291303829, -72.2944290204063, 0.45)
    pt3dadd(-10.5960882938508, 658.854899719597, -72.4157283979574, 0.45)
    pt3dadd(-10.5999604964375, 659.847508135364, -72.5370277755084, 0.45)
    pt3dadd(-10.6038326990242, 660.840116551132, -72.6583271530594, 0.45)
    pt3dadd(-10.6077049016109, 661.8327249669, -72.7796265306104, 0.45)
    pt3dadd(-10.6115771041976, 662.825333382668, -72.9009259081614, 0.45)
    pt3dadd(-10.6154493067843, 663.817941798435, -73.0222252857125, 0.45)
    pt3dadd(-10.619321509371, 664.810550214203, -73.1435246632635, 0.45)
    pt3dadd(-10.6231937119578, 665.803158629971, -73.2648240408145, 0.45)
    pt3dadd(-10.6270659145445, 666.795767045738, -73.3861234183655, 0.45)
    pt3dadd(-10.6309381171312, 667.788375461506, -73.5074227959165, 0.45)
    pt3dadd(-10.6348103197179, 668.780983877274, -73.6287221734675, 0.45)
    pt3dadd(-10.6386825223046, 669.773592293041, -73.7500215510185, 0.45)
    pt3dadd(-10.6425547248913, 670.766200708809, -73.8713209285696, 0.45)
    pt3dadd(-10.646426927478, 671.758809124577, -73.9926203061206, 0.45)
    pt3dadd(-10.6502991300647, 672.751417540345, -74.1139196836716, 0.45)
    pt3dadd(-10.6541713326514, 673.744025956112, -74.2352190612226, 0.45)
    pt3dadd(-10.6580435352381, 674.73663437188, -74.3565184387736, 0.45)
    pt3dadd(-10.6619157378248, 675.729242787648, -74.4778178163247, 0.45)
    pt3dadd(-10.6657879404116, 676.721851203415, -74.5991171938757, 0.45)
    pt3dadd(-10.6696601429983, 677.714459619183, -74.7204165714267, 0.45)
    pt3dadd(-10.673532345585, 678.707068034951, -74.8417159489777, 0.45)
    pt3dadd(-10.6774045481717, 679.699676450718, -74.9630153265287, 0.45)
    pt3dadd(-10.6812767507584, 680.692284866486, -75.0843147040797, 0.45)
    pt3dadd(-10.6851489533451, 681.684893282254, -75.2056140816308, 0.45)
    pt3dadd(-10.6890211559318, 682.677501698022, -75.3269134591818, 0.45)
    pt3dadd(-10.6928933585185, 683.670110113789, -75.4482128367328, 0.45)
    pt3dadd(-10.6967655611052, 684.662718529557, -75.5695122142838, 0.45)
    pt3dadd(-10.7006377636919, 685.655326945325, -75.6908115918348, 0.45)
    pt3dadd(-10.7045099662787, 686.647935361092, -75.8121109693858, 0.45)
    pt3dadd(-10.7083821688654, 687.64054377686, -75.9334103469369, 0.45)
    pt3dadd(-10.7122543714521, 688.633152192628, -76.0547097244879, 0.45)
    pt3dadd(-10.7161265740388, 689.625760608395, -76.1760091020389, 0.45)
    pt3dadd(-10.7199987766255, 690.618369024163, -76.2973084795899, 0.45)
    pt3dadd(-10.7238709792122, 691.610977439931, -76.4186078571409, 0.45)
    pt3dadd(-10.7277431817989, 692.603585855699, -76.539907234692, 0.45)
    pt3dadd(-10.7316153843856, 693.596194271466, -76.661206612243, 0.45)
    pt3dadd(-10.7354875869723, 694.588802687234, -76.782505989794, 0.45)
    pt3dadd(-10.739359789559, 695.581411103002, -76.903805367345, 0.45)
    pt3dadd(-10.7432319921457, 696.574019518769, -77.025104744896, 0.45)
    pt3dadd(-10.7471041947325, 697.566627934537, -77.146404122447, 0.45)
    pt3dadd(-10.7509763973192, 698.559236350305, -77.267703499998, 0.45)
    pt3dadd(-10.7548485999059, 699.551844766072, -77.3890028775491, 0.45)
    pt3dadd(-10.7587208024926, 700.54445318184, -77.5103022551001, 0.45)
    pt3dadd(-10.7625930050793, 701.537061597608, -77.6316016326511, 0.45)
    pt3dadd(-10.766465207666, 702.529670013375, -77.7529010102021, 0.45)
    pt3dadd(-10.7703374102527, 703.522278429143, -77.8742003877531, 0.45)
    pt3dadd(-10.7742096128394, 704.514886844911, -77.9954997653042, 0.45)
    pt3dadd(-10.7780818154261, 705.507495260679, -78.1167991428552, 0.45)
    pt3dadd(-10.7819540180128, 706.500103676446, -78.2380985204062, 0.45)
    pt3dadd(-10.7858262205995, 707.492712092214, -78.3593978979572, 0.45)
    pt3dadd(-10.7896984231863, 708.485320507982, -78.4806972755082, 0.45)
    pt3dadd(-10.793570625773, 709.477928923749, -78.6019966530592, 0.45)
    pt3dadd(-10.7974428283597, 710.470537339517, -78.7232960306103, 0.45)
    pt3dadd(-10.8013150309464, 711.463145755285, -78.8445954081613, 0.45)
    pt3dadd(-10.8051872335331, 712.455754171052, -78.9658947857123, 0.45)
    pt3dadd(-10.8090594361198, 713.44836258682, -79.0871941632633, 0.45)
    pt3dadd(-10.8129316387065, 714.440971002588, -79.2084935408143, 0.45)
    pt3dadd(-10.8168038412932, 715.433579418356, -79.3297929183654, 0.45)
    pt3dadd(-10.8206760438799, 716.426187834123, -79.4510922959164, 0.45)
    pt3dadd(-10.8245482464666, 717.418796249891, -79.5723916734674, 0.45)
    pt3dadd(-10.8284204490534, 718.411404665659, -79.6936910510184, 0.45)
    pt3dadd(-10.8322926516401, 719.404013081426, -79.8149904285694, 0.45)
    pt3dadd(-10.8361648542268, 720.396621497194, -79.9362898061204, 0.45)
    pt3dadd(-10.8400370568135, 721.389229912962, -80.0575891836715, 0.45)
    pt3dadd(-10.8439092594002, 722.381838328729, -80.1788885612225, 0.45)
    pt3dadd(-10.8477814619869, 723.374446744497, -80.3001879387735, 0.45)
    pt3dadd(-10.8516536645736, 724.367055160265, -80.4214873163245, 0.45)
    pt3dadd(-10.8555258671603, 725.359663576033, -80.5427866938755, 0.45)
    pt3dadd(-10.859398069747, 726.3522719918, -80.6640860714265, 0.45)
    pt3dadd(-10.8632702723337, 727.344880407568, -80.7853854489776, 0.45)
    pt3dadd(-10.8671424749204, 728.337488823336, -80.9066848265286, 0.45)
    pt3dadd(-10.8710146775072, 729.330097239103, -81.0279842040796, 0.45)
    pt3dadd(-10.8748868800939, 730.322705654871, -81.1492835816306, 0.45)
    pt3dadd(-10.8787590826806, 731.315314070639, -81.2705829591816, 0.45)
    pt3dadd(-10.8826312852673, 732.307922486406, -81.3918823367327, 0.45)
    pt3dadd(-10.886503487854, 733.300530902174, -81.5131817142837, 0.45)
    pt3dadd(-10.8903756904407, 734.293139317942, -81.6344810918347, 0.45)
    pt3dadd(-10.8942478930274, 735.28574773371, -81.7557804693857, 0.45)
    pt3dadd(-10.8981200956141, 736.278356149477, -81.8770798469367, 0.45)
    pt3dadd(-10.9019922982008, 737.270964565245, -81.9983792244877, 0.45)
    pt3dadd(-10.9058645007875, 738.263572981013, -82.1196786020387, 0.45)
    pt3dadd(-10.9097367033743, 739.25618139678, -82.2409779795898, 0.45)
    pt3dadd(-10.913608905961, 740.248789812548, -82.3622773571408, 0.45)
    pt3dadd(-10.9174811085477, 741.241398228316, -82.4835767346918, 0.45)
    pt3dadd(-10.9213533111344, 742.234006644083, -82.6048761122428, 0.45)
    pt3dadd(-10.9252255137211, 743.226615059851, -82.7261754897938, 0.45)
    pt3dadd(-10.9290977163078, 744.219223475619, -82.8474748673449, 0.45)
    pt3dadd(-10.9329699188945, 745.211831891387, -82.9687742448959, 0.45)
    pt3dadd(-10.9368421214812, 746.204440307154, -83.0900736224469, 0.45)
    pt3dadd(-10.9407143240679, 747.197048722922, -83.2113729999979, 0.45)
    pt3dadd(-10.9445865266546, 748.18965713869, -83.3326723775489, 0.45)
    pt3dadd(-10.9484587292413, 749.182265554457, -83.4539717550999, 0.45)
    pt3dadd(-10.9523309318281, 750.174873970225, -83.575271132651, 0.45)
    pt3dadd(-10.9562031344148, 751.167482385993, -83.696570510202, 0.45)
    pt3dadd(-10.9600753370015, 752.16009080176, -83.817869887753, 0.45)
    pt3dadd(-10.9639475395882, 753.152699217528, -83.939169265304, 0.45)
    pt3dadd(-10.9678197421749, 754.145307633296, -84.060468642855, 0.45)
    pt3dadd(-10.9716919447616, 755.137916049064, -84.181768020406, 0.45)
    pt3dadd(-10.9755641473483, 756.130524464831, -84.3030673979571, 0.45)
    pt3dadd(-10.979436349935, 757.123132880599, -84.4243667755081, 0.45)
    pt3dadd(-10.9833085525217, 758.115741296367, -84.5456661530591, 0.45)
    pt3dadd(-10.9871807551084, 759.108349712134, -84.6669655306101, 0.45)
    pt3dadd(-10.9910529576952, 760.100958127902, -84.7882649081611, 0.45)
    pt3dadd(-10.9949251602819, 761.09356654367, -84.9095642857122, 0.45)
    pt3dadd(-10.9987973628686, 762.086174959437, -85.0308636632632, 0.45)
    pt3dadd(-11.0026695654553, 763.078783375205, -85.1521630408142, 0.45)
    pt3dadd(-11.006541768042, 764.071391790973, -85.2734624183652, 0.45)
    pt3dadd(-11.0104139706287, 765.064000206741, -85.3947617959162, 0.45)
    pt3dadd(-11.0142861732154, 766.056608622508, -85.5160611734672, 0.45)
    pt3dadd(-11.0181583758021, 767.049217038276, -85.6373605510182, 0.45)
    pt3dadd(-11.0220305783888, 768.041825454044, -85.7586599285693, 0.45)
    pt3dadd(-11.0259027809755, 769.034433869811, -85.8799593061203, 0.45)
    pt3dadd(-11.0297749835622, 770.027042285579, -86.0012586836713, 0.45)
    pt3dadd(-11.033647186149, 771.019650701347, -86.1225580612223, 0.45)
    pt3dadd(-11.0375193887357, 772.012259117114, -86.2438574387733, 0.45)
    pt3dadd(-11.0413915913224, 773.004867532882, -86.3651568163244, 0.45)
    pt3dadd(-11.0452637939091, 773.99747594865, -86.4864561938754, 0.45)
    pt3dadd(-11.0491359964958, 774.990084364418, -86.6077555714264, 0.45)
    pt3dadd(-11.0530081990825, 775.982692780185, -86.7290549489774, 0.45)
    pt3dadd(-11.0568804016692, 776.975301195953, -86.8503543265284, 0.45)
    pt3dadd(-11.0607526042559, 777.967909611721, -86.9716537040794, 0.45)
    pt3dadd(-11.0646248068426, 778.960518027488, -87.0929530816305, 0.45)
    pt3dadd(-11.0684970094293, 779.953126443256, -87.2142524591815, 0.45)
    pt3dadd(-11.072369212016, 780.945734859024, -87.3355518367325, 0.45)
    pt3dadd(-11.0762414146028, 781.938343274791, -87.4568512142835, 0.45)
    pt3dadd(-11.0801136171895, 782.930951690559, -87.5781505918345, 0.45)
    pt3dadd(-11.0839858197762, 783.923560106327, -87.6994499693856, 0.45)
    pt3dadd(-11.0878580223629, 784.916168522095, -87.8207493469366, 0.45)
    pt3dadd(-11.0917302249496, 785.908776937862, -87.9420487244876, 0.45)
    pt3dadd(-11.0956024275363, 786.90138535363, -88.0633481020386, 0.45)
    pt3dadd(-11.099474630123, 787.893993769398, -88.1846474795896, 0.45)
    pt3dadd(-11.1033468327097, 788.886602185165, -88.3059468571406, 0.45)
    pt3dadd(-11.1072190352964, 789.879210600933, -88.4272462346917, 0.45)
    pt3dadd(-11.1110912378831, 790.871819016701, -88.5485456122427, 0.45)
    pt3dadd(-11.1149634404699, 791.864427432468, -88.6698449897937, 0.45)
    pt3dadd(-11.1188356430566, 792.857035848236, -88.7911443673447, 0.45)
    pt3dadd(-11.1227078456433, 793.849644264004, -88.9124437448957, 0.45)
    pt3dadd(-11.12658004823, 794.842252679772, -89.0337431224467, 0.45)
    pt3dadd(-11.1304522508167, 795.834861095539, -89.1550424999978, 0.45)
    pt3dadd(-11.1343244534034, 796.827469511307, -89.2763418775488, 0.45)
    pt3dadd(-11.1381966559901, 797.820077927075, -89.3976412550998, 0.45)
    pt3dadd(-11.1420688585768, 798.812686342842, -89.5189406326508, 0.45)
    pt3dadd(-11.1459410611635, 799.80529475861, -89.6402400102018, 0.45)
    pt3dadd(-11.1498132637502, 800.797903174378, -89.7615393877528, 0.45)
    pt3dadd(-11.1536854663369, 801.790511590146, -89.8828387653039, 0.45)
    pt3dadd(-11.1575576689237, 802.783120005913, -90.0041381428549, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-11.1614298715104, 803.775728421681, -90.1254375204059, 0.45)
    pt3dadd(-11.1653020740971, 804.768336837449, -90.2467368979569, 0.45)
    pt3dadd(-11.1691742766838, 805.760945253216, -90.3680362755079, 0.45)
    pt3dadd(-11.1730464792705, 806.753553668984, -90.4893356530589, 0.45)
    pt3dadd(-11.1769186818572, 807.746162084752, -90.61063503061, 0.45)
    pt3dadd(-11.1807908844439, 808.738770500519, -90.731934408161, 0.45)
    pt3dadd(-11.1846630870306, 809.731378916287, -90.853233785712, 0.45)
    pt3dadd(-11.1885352896173, 810.723987332055, -90.974533163263, 0.45)
    pt3dadd(-11.192407492204, 811.716595747823, -91.095832540814, 0.45)
    pt3dadd(-11.1962796947908, 812.70920416359, -91.2171319183651, 0.45)
    pt3dadd(-11.2001518973775, 813.701812579358, -91.3384312959161, 0.45)
    pt3dadd(-11.2040240999642, 814.694420995126, -91.4597306734671, 0.45)
    pt3dadd(-11.2078963025509, 815.687029410893, -91.5810300510181, 0.45)
    pt3dadd(-11.2117685051376, 816.679637826661, -91.7023294285691, 0.45)
    pt3dadd(-11.2156407077243, 817.672246242429, -91.8236288061201, 0.45)
    pt3dadd(-11.219512910311, 818.664854658196, -91.9449281836712, 0.45)
    pt3dadd(-11.2233851128977, 819.657463073964, -92.0662275612222, 0.45)
    pt3dadd(-11.2272573154844, 820.650071489732, -92.1875269387732, 0.45)
    pt3dadd(-11.2311295180711, 821.6426799055, -92.3088263163242, 0.45)
    pt3dadd(-11.2350017206578, 822.635288321267, -92.4301256938752, 0.45)
    pt3dadd(-11.2388739232446, 823.627896737035, -92.5514250714262, 0.45)
    pt3dadd(-11.2427461258313, 824.620505152803, -92.6727244489773, 0.45)
    pt3dadd(-11.246618328418, 825.61311356857, -92.7940238265283, 0.45)
    pt3dadd(-11.2504905310047, 826.605721984338, -92.9153232040793, 0.45)
    pt3dadd(-11.2543627335914, 827.598330400106, -93.0366225816303, 0.45)
    pt3dadd(-11.2582349361781, 828.590938815873, -93.1579219591813, 0.45)
    pt3dadd(-11.2621071387648, 829.583547231641, -93.2792213367323, 0.45)
    pt3dadd(-11.2659793413515, 830.576155647409, -93.4005207142834, 0.45)
    pt3dadd(-11.2698515439382, 831.568764063177, -93.5218200918344, 0.45)
    pt3dadd(-11.2737237465249, 832.561372478944, -93.6431194693854, 0.45)
    pt3dadd(-11.2775959491117, 833.553980894712, -93.7644188469364, 0.45)
    pt3dadd(-11.2814681516984, 834.54658931048, -93.8857182244874, 0.45)
    pt3dadd(-11.2853403542851, 835.539197726247, -94.0070176020384, 0.45)
    pt3dadd(-11.2892125568718, 836.531806142015, -94.1283169795895, 0.45)
    pt3dadd(-11.2930847594585, 837.524414557783, -94.2496163571405, 0.45)
    pt3dadd(-11.2969569620452, 838.51702297355, -94.3709157346915, 0.45)
    pt3dadd(-11.3008291646319, 839.509631389318, -94.4922151122425, 0.45)
    pt3dadd(-11.3047013672186, 840.502239805086, -94.6135144897935, 0.45)
    pt3dadd(-11.3085735698053, 841.494848220854, -94.7348138673446, 0.45)
    pt3dadd(-11.312445772392, 842.487456636621, -94.8561132448956, 0.45)
    pt3dadd(-11.3163179749787, 843.480065052389, -94.9774126224466, 0.45)
    pt3dadd(-11.3201901775655, 844.472673468157, -95.0987119999976, 0.45)
    pt3dadd(-11.3240623801522, 845.465281883924, -95.2200113775486, 0.45)
    pt3dadd(-11.3279345827389, 846.457890299692, -95.3413107550996, 0.45)
    pt3dadd(-11.3318067853256, 847.45049871546, -95.4626101326507, 0.45)
    pt3dadd(-11.3356789879123, 848.443107131227, -95.5839095102017, 0.45)
    pt3dadd(-11.339551190499, 849.435715546995, -95.7052088877527, 0.45)
    pt3dadd(-11.3434233930857, 850.428323962763, -95.8265082653037, 0.45)
    pt3dadd(-11.3472955956724, 851.420932378531, -95.9478076428547, 0.45)
    pt3dadd(-11.3511677982591, 852.413540794298, -96.0691070204058, 0.45)
    pt3dadd(-11.3550400008458, 853.406149210066, -96.1904063979568, 0.45)
    pt3dadd(-11.3589122034326, 854.398757625834, -96.3117057755078, 0.45)
    pt3dadd(-11.3627844060193, 855.391366041601, -96.4330051530588, 0.45)
    pt3dadd(-11.366656608606, 856.383974457369, -96.5543045306098, 0.45)
    pt3dadd(-11.3705288111927, 857.376582873137, -96.6756039081608, 0.45)
    pt3dadd(-11.3744010137794, 858.369191288904, -96.7969032857118, 0.45)
    pt3dadd(-11.3782732163661, 859.361799704672, -96.9182026632629, 0.45)
    pt3dadd(-11.3821454189528, 860.35440812044, -97.0395020408139, 0.45)
    pt3dadd(-11.3860176215395, 861.347016536208, -97.1608014183649, 0.45)
    pt3dadd(-11.3898898241262, 862.339624951975, -97.2821007959159, 0.45)
    pt3dadd(-11.3937620267129, 863.332233367743, -97.4034001734669, 0.45)
    pt3dadd(-11.3976342292996, 864.324841783511, -97.524699551018, 0.45)
    pt3dadd(-11.4015064318864, 865.317450199278, -97.645998928569, 0.45)
    pt3dadd(-11.4053786344731, 866.310058615046, -97.76729830612, 0.45)
    pt3dadd(-11.4092508370598, 867.302667030814, -97.888597683671, 0.45)
    pt3dadd(-11.4131230396465, 868.295275446581, -98.009897061222, 0.45)
    pt3dadd(-11.4169952422332, 869.287883862349, -98.131196438773, 0.45)
    pt3dadd(-11.4208674448199, 870.280492278117, -98.2524958163241, 0.45)
    pt3dadd(-11.4247396474066, 871.273100693885, -98.3737951938751, 0.45)
    pt3dadd(-11.4286118499933, 872.265709109652, -98.4950945714261, 0.45)
    pt3dadd(-11.43248405258, 873.25831752542, -98.6163939489771, 0.45)
    pt3dadd(-11.4363562551667, 874.250925941188, -98.7376933265281, 0.45)
    pt3dadd(-11.4402284577535, 875.243534356955, -98.8589927040791, 0.45)
    pt3dadd(-11.4441006603402, 876.236142772723, -98.9802920816302, 0.45)
    pt3dadd(-11.4479728629269, 877.228751188491, -99.1015914591812, 0.45)
    pt3dadd(-11.4518450655136, 878.221359604258, -99.2228908367322, 0.45)
    pt3dadd(-11.4557172681003, 879.213968020026, -99.3441902142832, 0.45)
    pt3dadd(-11.459589470687, 880.206576435794, -99.4654895918342, 0.45)
    pt3dadd(-11.4634616732737, 881.199184851562, -99.5867889693853, 0.45)
    pt3dadd(-11.4673338758604, 882.191793267329, -99.7080883469363, 0.45)
    pt3dadd(-11.4712060784471, 883.184401683097, -99.8293877244873, 0.45)
    pt3dadd(-11.4750782810338, 884.177010098865, -99.9506871020383, 0.45)
    pt3dadd(-11.4789504836205, 885.169618514632, -100.071986479589, 0.45)
    pt3dadd(-11.4828226862073, 886.1622269304, -100.19328585714, 0.45)
    pt3dadd(-11.486694888794, 887.154835346168, -100.314585234691, 0.45)
    pt3dadd(-11.4905670913807, 888.147443761935, -100.435884612242, 0.45)
    pt3dadd(-11.4944392939674, 889.140052177703, -100.557183989793, 0.45)
    pt3dadd(-11.4983114965541, 890.132660593471, -100.678483367344, 0.45)
    pt3dadd(-11.5021836991408, 891.125269009239, -100.799782744895, 0.45)
    pt3dadd(-11.5060559017275, 892.117877425006, -100.921082122446, 0.45)
    pt3dadd(-11.5099281043142, 893.110485840774, -101.042381499997, 0.45)
    pt3dadd(-11.5138003069009, 894.103094256542, -101.163680877548, 0.45)
    pt3dadd(-11.5176725094876, 895.095702672309, -101.2849802551, 0.45)
    pt3dadd(-11.5215447120744, 896.088311088077, -101.406279632651, 0.45)
    pt3dadd(-11.5254169146611, 897.080919503845, -101.527579010202, 0.45)
    pt3dadd(-11.5292891172478, 898.073527919612, -101.648878387753, 0.45)
    pt3dadd(-11.5331613198345, 899.06613633538, -101.770177765304, 0.45)
    pt3dadd(-11.5370335224212, 900.058744751148, -101.891477142855, 0.45)
    pt3dadd(-11.5409057250079, 901.051353166916, -102.012776520406, 0.45)
    pt3dadd(-11.5447779275946, 902.043961582683, -102.134075897957, 0.45)
    pt3dadd(-11.5486501301813, 903.036569998451, -102.255375275508, 0.45)
    pt3dadd(-11.552522332768, 904.029178414219, -102.376674653059, 0.45)
    pt3dadd(-11.5563945353547, 905.021786829986, -102.49797403061, 0.45)
    pt3dadd(-11.5602667379414, 906.014395245754, -102.619273408161, 0.45)
    pt3dadd(-11.5641389405282, 907.007003661522, -102.740572785712, 0.45)
    pt3dadd(-11.5680111431149, 907.999612077289, -102.861872163263, 0.45)
    pt3dadd(-11.5718833457016, 908.992220493057, -102.983171540814, 0.45)
    pt3dadd(-11.5757555482883, 909.984828908825, -103.104470918365, 0.45)
    pt3dadd(-11.579627750875, 910.977437324593, -103.225770295916, 0.45)
    pt3dadd(-11.5834999534617, 911.97004574036, -103.347069673467, 0.45)
    pt3dadd(-11.5873721560484, 912.962654156128, -103.468369051018, 0.45)
    pt3dadd(-11.5912443586351, 913.955262571896, -103.589668428569, 0.45)
    pt3dadd(-11.5951165612218, 914.947870987663, -103.71096780612, 0.45)
    pt3dadd(-11.5989887638085, 915.940479403431, -103.832267183671, 0.45)
    pt3dadd(-11.6028609663953, 916.933087819199, -103.953566561222, 0.45)
    pt3dadd(-11.606733168982, 917.925696234966, -104.074865938773, 0.45)
    pt3dadd(-11.6106053715687, 918.918304650734, -104.196165316324, 0.45)
    pt3dadd(-11.6144775741554, 919.910913066502, -104.317464693875, 0.45)
    pt3dadd(-11.6183497767421, 920.90352148227, -104.438764071426, 0.45)
    pt3dadd(-11.6222219793288, 921.896129898037, -104.560063448977, 0.45)
    pt3dadd(-11.6260941819155, 922.888738313805, -104.681362826528, 0.45)
    pt3dadd(-11.6299663845022, 923.881346729573, -104.802662204079, 0.45)
    pt3dadd(-11.6338385870889, 924.87395514534, -104.92396158163, 0.45)
    pt3dadd(-11.6377107896756, 925.866563561108, -105.045260959181, 0.45)
    pt3dadd(-11.6415829922623, 926.859171976876, -105.166560336732, 0.45)
    pt3dadd(-11.6454551948491, 927.851780392643, -105.287859714283, 0.45)
    pt3dadd(-11.6493273974358, 928.844388808411, -105.409159091834, 0.45)
    pt3dadd(-11.6531996000225, 929.836997224179, -105.530458469385, 0.45)
    pt3dadd(-11.6570718026092, 930.829605639947, -105.651757846936, 0.45)
    pt3dadd(-11.6609440051959, 931.822214055714, -105.773057224487, 0.45)
    pt3dadd(-11.6648162077826, 932.814822471482, -105.894356602038, 0.45)
    pt3dadd(-11.6686884103693, 933.80743088725, -106.015655979589, 0.45)
    pt3dadd(-11.672560612956, 934.800039303017, -106.13695535714, 0.45)
    pt3dadd(-11.6764328155427, 935.792647718785, -106.258254734691, 0.45)
    pt3dadd(-11.6803050181294, 936.785256134553, -106.379554112242, 0.45)
    pt3dadd(-11.6841772207161, 937.77786455032, -106.500853489793, 0.45)
    pt3dadd(-11.6880494233029, 938.770472966088, -106.622152867344, 0.45)
    pt3dadd(-11.6919216258896, 939.763081381856, -106.743452244895, 0.45)
    pt3dadd(-11.6957938284763, 940.755689797624, -106.864751622446, 0.45)
    pt3dadd(-11.699666031063, 941.748298213391, -106.986050999997, 0.45)
    pt3dadd(-11.7035382336497, 942.740906629159, -107.107350377548, 0.45)
    pt3dadd(-11.7074104362364, 943.733515044927, -107.228649755099, 0.45)
    pt3dadd(-11.7112826388231, 944.726123460694, -107.34994913265, 0.45)
    pt3dadd(-11.7151548414098, 945.718731876462, -107.471248510201, 0.45)
    pt3dadd(-11.7190270439965, 946.71134029223, -107.592547887752, 0.45)
    pt3dadd(-11.7228992465832, 947.703948707997, -107.713847265303, 0.45)
    pt3dadd(-11.72677144917, 948.696557123765, -107.835146642854, 0.45)
    pt3dadd(-11.7306436517567, 949.689165539533, -107.956446020405, 0.45)
    pt3dadd(-11.7345158543434, 950.681773955301, -108.077745397956, 0.45)
    pt3dadd(-11.7383880569301, 951.674382371068, -108.199044775507, 0.45)
    pt3dadd(-11.7422602595168, 952.666990786836, -108.320344153059, 0.45)
    pt3dadd(-11.7461324621035, 953.659599202604, -108.44164353061, 0.45)
    pt3dadd(-11.7500046646902, 954.652207618371, -108.562942908161, 0.45)
    pt3dadd(-11.7538768672769, 955.644816034139, -108.684242285712, 0.45)
    pt3dadd(-11.7577490698636, 956.637424449907, -108.805541663263, 0.45)
    pt3dadd(-11.7616212724503, 957.630032865674, -108.926841040814, 0.45)
    pt3dadd(-11.765493475037, 958.622641281442, -109.048140418365, 0.45)
    pt3dadd(-11.7693656776238, 959.61524969721, -109.169439795916, 0.45)
    pt3dadd(-11.7732378802105, 960.607858112978, -109.290739173467, 0.45)
    pt3dadd(-11.7771100827972, 961.600466528745, -109.412038551018, 0.45)
    pt3dadd(-11.7809822853839, 962.593074944513, -109.533337928569, 0.45)
    pt3dadd(-11.7848544879706, 963.585683360281, -109.65463730612, 0.45)
    pt3dadd(-11.7887266905573, 964.578291776048, -109.775936683671, 0.45)
    pt3dadd(-11.792598893144, 965.570900191816, -109.897236061222, 0.45)
    pt3dadd(-11.7964710957307, 966.563508607584, -110.018535438773, 0.45)
    pt3dadd(-11.8003432983174, 967.556117023351, -110.139834816324, 0.45)
    pt3dadd(-11.8042155009041, 968.548725439119, -110.261134193875, 0.45)
    pt3dadd(-11.8080877034909, 969.541333854887, -110.382433571426, 0.45)
    pt3dadd(-11.8119599060776, 970.533942270655, -110.503732948977, 0.45)
    pt3dadd(-11.8158321086643, 971.526550686422, -110.625032326528, 0.45)
    pt3dadd(-11.819704311251, 972.51915910219, -110.746331704079, 0.45)
    pt3dadd(-11.8235765138377, 973.511767517958, -110.86763108163, 0.45)
    pt3dadd(-11.8274487164244, 974.504375933725, -110.988930459181, 0.45)
    pt3dadd(-11.8313209190111, 975.496984349493, -111.110229836732, 0.45)
    pt3dadd(-11.8351931215978, 976.489592765261, -111.231529214283, 0.45)
    pt3dadd(-11.8390653241845, 977.482201181028, -111.352828591834, 0.45)
    pt3dadd(-11.8429375267712, 978.474809596796, -111.474127969385, 0.45)
    pt3dadd(-11.8468097293579, 979.467418012564, -111.595427346936, 0.45)
    pt3dadd(-11.8506819319447, 980.460026428332, -111.716726724487, 0.45)
    pt3dadd(-11.8545541345314, 981.452634844099, -111.838026102038, 0.45)
    pt3dadd(-11.8584263371181, 982.445243259867, -111.959325479589, 0.45)
    pt3dadd(-11.8622985397048, 983.437851675635, -112.08062485714, 0.45)
    pt3dadd(-11.8661707422915, 984.430460091402, -112.201924234691, 0.45)
    pt3dadd(-11.8700429448782, 985.42306850717, -112.323223612242, 0.45)
    pt3dadd(-11.8739151474649, 986.415676922938, -112.444522989793, 0.45)
    pt3dadd(-11.8777873500516, 987.408285338705, -112.565822367344, 0.45)
    pt3dadd(-11.8816595526383, 988.400893754473, -112.687121744895, 0.45)
    pt3dadd(-11.885531755225, 989.393502170241, -112.808421122446, 0.45)
    pt3dadd(-11.8894039578118, 990.386110586009, -112.929720499997, 0.45)
    pt3dadd(-11.8932761603985, 991.378719001776, -113.051019877548, 0.45)
    pt3dadd(-11.8971483629852, 992.371327417544, -113.172319255099, 0.45)
    pt3dadd(-11.9010205655719, 993.363935833312, -113.29361863265, 0.45)
    pt3dadd(-11.9048927681586, 994.356544249079, -113.414918010201, 0.45)
    pt3dadd(-11.9087649707453, 995.349152664847, -113.536217387752, 0.45)
    pt3dadd(-11.912637173332, 996.341761080615, -113.657516765303, 0.45)
    pt3dadd(-11.9165093759187, 997.334369496382, -113.778816142854, 0.45)
    pt3dadd(-11.9203815785054, 998.32697791215, -113.900115520405, 0.45)
    pt3dadd(-11.9242537810921, 999.319586327918, -114.021414897956, 0.45)
    pt3dadd(-11.9281259836788, 1000.31219474369, -114.142714275507, 0.45)
    pt3dadd(-11.9319981862656, 1001.30480315945, -114.264013653058, 0.45)
    pt3dadd(-11.9358703888523, 1002.29741157522, -114.385313030609, 0.45)
    pt3dadd(-11.939742591439, 1003.29001999099, -114.50661240816, 0.45)
    pt3dadd(-11.9436147940257, 1004.28262840676, -114.627911785711, 0.45)
    pt3dadd(-11.9474869966124, 1005.27523682252, -114.749211163262, 0.45)
    pt3dadd(-11.9513591991991, 1006.26784523829, -114.870510540813, 0.45)
    pt3dadd(-11.9552314017858, 1007.26045365406, -114.991809918364, 0.45)
    pt3dadd(-11.9591036043725, 1008.25306206983, -115.113109295915, 0.45)
    pt3dadd(-11.9629758069592, 1009.24567048559, -115.234408673466, 0.45)
    pt3dadd(-11.9668480095459, 1010.23827890136, -115.355708051018, 0.45)
    pt3dadd(-11.9707202121327, 1011.23088731713, -115.477007428569, 0.45)
    pt3dadd(-11.9745924147194, 1012.2234957329, -115.59830680612, 0.45)
    pt3dadd(-11.9784646173061, 1013.21610414867, -115.719606183671, 0.45)
    pt3dadd(-11.9823368198928, 1014.20871256443, -115.840905561222, 0.45)
    pt3dadd(-11.9862090224795, 1015.2013209802, -115.962204938773, 0.45)
    pt3dadd(-11.9900812250662, 1016.19392939597, -116.083504316324, 0.45)
    pt3dadd(-11.9939534276529, 1017.18653781174, -116.204803693875, 0.45)
    pt3dadd(-11.9978256302396, 1018.1791462275, -116.326103071426, 0.45)
    pt3dadd(-12.0016978328263, 1019.17175464327, -116.447402448977, 0.45)
    pt3dadd(-12.005570035413, 1020.16436305904, -116.568701826528, 0.45)
    pt3dadd(-12.0094422379997, 1021.15697147481, -116.690001204079, 0.45)
    pt3dadd(-12.0133144405865, 1022.14957989058, -116.81130058163, 0.45)
    pt3dadd(-12.0171866431732, 1023.14218830634, -116.932599959181, 0.45)
    pt3dadd(-12.0210588457599, 1024.13479672211, -117.053899336732, 0.45)
    pt3dadd(-12.0249310483466, 1025.12740513788, -117.175198714283, 0.45)
    pt3dadd(-12.0288032509333, 1026.12001355365, -117.296498091834, 0.45)
    pt3dadd(-12.03267545352, 1027.11262196941, -117.417797469385, 0.45)
    pt3dadd(-12.0365476561067, 1028.10523038518, -117.539096846936, 0.45)
    pt3dadd(-12.0404198586934, 1029.09783880095, -117.660396224487, 0.45)
    pt3dadd(-12.0442920612801, 1030.09044721672, -117.781695602038, 0.45)
    pt3dadd(-12.0481642638668, 1031.08305563248, -117.902994979589, 0.45)
    pt3dadd(-12.0520364664536, 1032.07566404825, -118.02429435714, 0.45)
    pt3dadd(-12.0559086690403, 1033.06827246402, -118.145593734691, 0.45)
    pt3dadd(-12.059780871627, 1034.06088087979, -118.266893112242, 0.45)
    pt3dadd(-12.0636530742137, 1035.05348929556, -118.388192489793, 0.45)
    pt3dadd(-12.0675252768004, 1036.04609771132, -118.509491867344, 0.45)
    pt3dadd(-12.0713974793871, 1037.03870612709, -118.630791244895, 0.45)
    pt3dadd(-12.0752696819738, 1038.03131454286, -118.752090622446, 0.45)
    pt3dadd(-12.0791418845605, 1039.02392295863, -118.873389999997, 0.45)
    pt3dadd(-12.0830140871472, 1040.01653137439, -118.994689377548, 0.45)
    pt3dadd(-12.0868862897339, 1041.00913979016, -119.115988755099, 0.45)
    pt3dadd(-12.0907584923206, 1042.00174820593, -119.23728813265, 0.45)
    pt3dadd(-12.0946306949074, 1042.9943566217, -119.358587510201, 0.45)
    pt3dadd(-12.0985028974941, 1043.98696503746, -119.479886887752, 0.45)
    pt3dadd(-12.1023751000808, 1044.97957345323, -119.601186265303, 0.45)
    pt3dadd(-12.1062473026675, 1045.972181869, -119.722485642854, 0.45)
    pt3dadd(-12.1101195052542, 1046.96479028477, -119.843785020405, 0.45)
    pt3dadd(-12.1139917078409, 1047.95739870054, -119.965084397956, 0.45)
    pt3dadd(-12.1178639104276, 1048.9500071163, -120.086383775507, 0.45)
    pt3dadd(-12.1217361130143, 1049.94261553207, -120.207683153058, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-12.125608315601, 1050.93522394784, -120.328982530609, 0.45)
    pt3dadd(-12.1294805181877, 1051.92783236361, -120.45028190816, 0.45)
    pt3dadd(-12.1333527207744, 1052.92044077937, -120.571581285711, 0.45)
    pt3dadd(-12.1372249233612, 1053.91304919514, -120.692880663262, 0.45)
    pt3dadd(-12.1410971259479, 1054.90565761091, -120.814180040813, 0.45)
    pt3dadd(-12.1449693285346, 1055.89826602668, -120.935479418364, 0.45)
    pt3dadd(-12.1488415311213, 1056.89087444244, -121.056778795915, 0.45)
    pt3dadd(-12.152713733708, 1057.88348285821, -121.178078173466, 0.45)
    pt3dadd(-12.1565859362947, 1058.87609127398, -121.299377551017, 0.45)
    pt3dadd(-12.1604581388814, 1059.86869968975, -121.420676928568, 0.45)
    pt3dadd(-12.1643303414681, 1060.86130810552, -121.541976306119, 0.45)
    pt3dadd(-12.1682025440548, 1061.85391652128, -121.66327568367, 0.45)
    pt3dadd(-12.1720747466415, 1062.84652493705, -121.784575061221, 0.45)
    pt3dadd(-12.1759469492283, 1063.83913335282, -121.905874438772, 0.45)
    pt3dadd(-12.179819151815, 1064.83174176859, -122.027173816323, 0.45)
    pt3dadd(-12.1836913544017, 1065.82435018435, -122.148473193874, 0.45)
    pt3dadd(-12.1875635569884, 1066.81695860012, -122.269772571425, 0.45)
    pt3dadd(-12.1914357595751, 1067.80956701589, -122.391071948977, 0.45)
    pt3dadd(-12.1953079621618, 1068.80217543166, -122.512371326528, 0.45)
    pt3dadd(-12.1991801647485, 1069.79478384742, -122.633670704079, 0.45)
    pt3dadd(-12.2030523673352, 1070.78739226319, -122.75497008163, 0.45)
    pt3dadd(-12.2069245699219, 1071.78000067896, -122.876269459181, 0.45)
    pt3dadd(-12.2107967725086, 1072.77260909473, -122.997568836732, 0.45)
    pt3dadd(-12.2146689750953, 1073.7652175105, -123.118868214283, 0.45)
    pt3dadd(-12.2185411776821, 1074.75782592626, -123.240167591834, 0.45)
    pt3dadd(-12.2224133802688, 1075.75043434203, -123.361466969385, 0.45)
    pt3dadd(-12.2262855828555, 1076.7430427578, -123.482766346936, 0.45)
    pt3dadd(-12.2301577854422, 1077.73565117357, -123.604065724487, 0.45)
    pt3dadd(-12.2340299880289, 1078.72825958933, -123.725365102038, 0.45)
    pt3dadd(-12.2379021906156, 1079.7208680051, -123.846664479589, 0.45)
    pt3dadd(-12.2417743932023, 1080.71347642087, -123.96796385714, 0.45)
    pt3dadd(-12.245646595789, 1081.70608483664, -124.089263234691, 0.45)
    pt3dadd(-12.2495187983757, 1082.6986932524, -124.210562612242, 0.45)
    pt3dadd(-12.2533910009624, 1083.69130166817, -124.331861989793, 0.45)
    pt3dadd(-12.2572632035492, 1084.68391008394, -124.453161367344, 0.45)
    pt3dadd(-12.2611354061359, 1085.67651849971, -124.574460744895, 0.45)
    pt3dadd(-12.2650076087226, 1086.66912691548, -124.695760122446, 0.45)
    pt3dadd(-12.2688798113093, 1087.66173533124, -124.817059499997, 0.45)
    pt3dadd(-12.272752013896, 1088.65434374701, -124.938358877548, 0.45)
    pt3dadd(-12.2766242164827, 1089.64695216278, -125.059658255099, 0.45)
    pt3dadd(-12.2804964190694, 1090.63956057855, -125.18095763265, 0.45)
    pt3dadd(-12.2843686216561, 1091.63216899431, -125.302257010201, 0.45)
    pt3dadd(-12.2882408242428, 1092.62477741008, -125.423556387752, 0.45)
    pt3dadd(-12.2921130268295, 1093.61738582585, -125.544855765303, 0.45)
    pt3dadd(-12.2959852294162, 1094.60999424162, -125.666155142854, 0.45)
    pt3dadd(-12.299857432003, 1095.60260265738, -125.787454520405, 0.45)
    pt3dadd(-12.3037296345897, 1096.59521107315, -125.908753897956, 0.45)
    pt3dadd(-12.3076018371764, 1097.58781948892, -126.030053275507, 0.45)
    pt3dadd(-12.3114740397631, 1098.58042790469, -126.151352653058, 0.45)
    pt3dadd(-12.3153462423498, 1099.57303632046, -126.272652030609, 0.45)
    pt3dadd(-12.3192184449365, 1100.56564473622, -126.39395140816, 0.45)
    pt3dadd(-12.3230906475232, 1101.55825315199, -126.515250785711, 0.45)
    pt3dadd(-12.3269628501099, 1102.55086156776, -126.636550163262, 0.45)
    pt3dadd(-12.3308350526966, 1103.54346998353, -126.757849540813, 0.45)
    pt3dadd(-12.3347072552833, 1104.53607839929, -126.879148918364, 0.45)
    pt3dadd(-12.3385794578701, 1105.52868681506, -127.000448295915, 0.45)
    pt3dadd(-12.3424516604568, 1106.52129523083, -127.121747673466, 0.45)
    pt3dadd(-12.3463238630435, 1107.5139036466, -127.243047051017, 0.45)
    pt3dadd(-12.3501960656302, 1108.50651206236, -127.364346428568, 0.45)
    pt3dadd(-12.3540682682169, 1109.49912047813, -127.485645806119, 0.45)
    pt3dadd(-12.3579404708036, 1110.4917288939, -127.60694518367, 0.45)
    pt3dadd(-12.3618126733903, 1111.48433730967, -127.728244561221, 0.45)
    pt3dadd(-12.365684875977, 1112.47694572544, -127.849543938772, 0.45)
    pt3dadd(-12.3695570785637, 1113.4695541412, -127.970843316323, 0.45)
    pt3dadd(-12.3734292811504, 1114.46216255697, -128.092142693874, 0.45)
    pt3dadd(-12.3773014837371, 1115.45477097274, -128.213442071425, 0.45)
    pt3dadd(-12.3811736863239, 1116.44737938851, -128.334741448976, 0.45)
    pt3dadd(-12.3850458889106, 1117.43998780427, -128.456040826527, 0.45)
    pt3dadd(-12.3889180914973, 1118.43259622004, -128.577340204078, 0.45)
    pt3dadd(-12.392790294084, 1119.42520463581, -128.698639581629, 0.45)
    pt3dadd(-12.3966624966707, 1120.41781305158, -128.81993895918, 0.45)
    pt3dadd(-12.4005346992574, 1121.41042146734, -128.941238336731, 0.45)
    pt3dadd(-12.4044069018441, 1122.40302988311, -129.062537714282, 0.45)
    pt3dadd(-12.4082791044308, 1123.39563829888, -129.183837091833, 0.45)
    pt3dadd(-12.4121513070175, 1124.38824671465, -129.305136469385, 0.45)
    pt3dadd(-12.4160235096042, 1125.38085513042, -129.426435846936, 0.45)
    pt3dadd(-12.419895712191, 1126.37346354618, -129.547735224487, 0.45)
    pt3dadd(-12.4237679147777, 1127.36607196195, -129.669034602038, 0.45)
    pt3dadd(-12.4276401173644, 1128.35868037772, -129.790333979589, 0.45)
    pt3dadd(-12.4315123199511, 1129.35128879349, -129.91163335714, 0.45)
    pt3dadd(-12.4353845225378, 1130.34389720925, -130.032932734691, 0.45)
    pt3dadd(-12.4392567251245, 1131.33650562502, -130.154232112242, 0.45)
    pt3dadd(-12.4431289277112, 1132.32911404079, -130.275531489793, 0.45)
    pt3dadd(-12.4470011302979, 1133.32172245656, -130.396830867344, 0.45)
    pt3dadd(-12.4508733328846, 1134.31433087232, -130.518130244895, 0.45)
    pt3dadd(-12.4547455354713, 1135.30693928809, -130.639429622446, 0.45)
    pt3dadd(-12.458617738058, 1136.29954770386, -130.760728999997, 0.45)
    pt3dadd(-12.4624899406448, 1137.29215611963, -130.882028377548, 0.45)
    pt3dadd(-12.4663621432315, 1138.2847645354, -131.003327755099, 0.45)
    pt3dadd(-12.4702343458182, 1139.27737295116, -131.12462713265, 0.45)
    pt3dadd(-12.4741065484049, 1140.26998136693, -131.245926510201, 0.45)
    pt3dadd(-12.4779787509916, 1141.2625897827, -131.367225887752, 0.45)
    pt3dadd(-12.4818509535783, 1142.25519819847, -131.488525265303, 0.45)
    pt3dadd(-12.485723156165, 1143.24780661423, -131.609824642854, 0.45)
    pt3dadd(-12.4895953587517, 1144.24041503, -131.731124020405, 0.45)
    pt3dadd(-12.4934675613384, 1145.23302344577, -131.852423397956, 0.45)
    pt3dadd(-12.4973397639251, 1146.22563186154, -131.973722775507, 0.45)
    pt3dadd(-12.5012119665119, 1147.21824027731, -132.095022153058, 0.45)
    pt3dadd(-12.5050841690986, 1148.21084869307, -132.216321530609, 0.45)
    pt3dadd(-12.5089563716853, 1149.20345710884, -132.33762090816, 0.45)
    pt3dadd(-12.512828574272, 1150.19606552461, -132.458920285711, 0.45)
    pt3dadd(-12.5167007768587, 1151.18867394038, -132.580219663262, 0.45)
    pt3dadd(-12.5205729794454, 1152.18128235614, -132.701519040813, 0.45)
    pt3dadd(-12.5244451820321, 1153.17389077191, -132.822818418364, 0.45)
    pt3dadd(-12.5283173846188, 1154.16649918768, -132.944117795915, 0.45)
    pt3dadd(-12.5321895872055, 1155.15910760345, -133.065417173466, 0.45)
    pt3dadd(-12.5360617897922, 1156.15171601921, -133.186716551017, 0.45)
    pt3dadd(-12.5399339923789, 1157.14432443498, -133.308015928568, 0.45)
    pt3dadd(-12.5438061949657, 1158.13693285075, -133.429315306119, 0.45)
    pt3dadd(-12.5476783975524, 1159.12954126652, -133.55061468367, 0.45)
    pt3dadd(-12.5515506001391, 1160.12214968229, -133.671914061221, 0.45)
    pt3dadd(-12.5554228027258, 1161.11475809805, -133.793213438772, 0.45)
    pt3dadd(-12.5592950053125, 1162.10736651382, -133.914512816323, 0.45)
    pt3dadd(-12.5631672078992, 1163.09997492959, -134.035812193874, 0.45)
    pt3dadd(-12.5670394104859, 1164.09258334536, -134.157111571425, 0.45)
    pt3dadd(-12.5709116130726, 1165.08519176112, -134.278410948976, 0.45)
    pt3dadd(-12.5747838156593, 1166.07780017689, -134.399710326527, 0.45)
    pt3dadd(-12.578656018246, 1167.07040859266, -134.521009704078, 0.45)
    pt3dadd(-12.5825282208327, 1168.06301700843, -134.642309081629, 0.45)
    pt3dadd(-12.5864004234195, 1169.05562542419, -134.76360845918, 0.45)
    pt3dadd(-12.5902726260062, 1170.04823383996, -134.884907836731, 0.45)
    pt3dadd(-12.5941448285929, 1171.04084225573, -135.006207214282, 0.45)
    pt3dadd(-12.5980170311796, 1172.0334506715, -135.127506591833, 0.45)
    pt3dadd(-12.6018892337663, 1173.02605908727, -135.248805969384, 0.45)
    pt3dadd(-12.605761436353, 1174.01866750303, -135.370105346935, 0.45)
    pt3dadd(-12.6096336389397, 1175.0112759188, -135.491404724486, 0.45)
    pt3dadd(-12.6135058415264, 1176.00388433457, -135.612704102037, 0.45)
    pt3dadd(-12.6173780441131, 1176.99649275034, -135.734003479588, 0.45)
    pt3dadd(-12.6212502466998, 1177.9891011661, -135.855302857139, 0.45)
    pt3dadd(-12.6251224492866, 1178.98170958187, -135.97660223469, 0.45)
    pt3dadd(-12.6289946518733, 1179.97431799764, -136.097901612241, 0.45)
    pt3dadd(-12.63286685446, 1180.96692641341, -136.219200989792, 0.45)
    pt3dadd(-12.6367390570467, 1181.95953482917, -136.340500367344, 0.45)
    pt3dadd(-12.6406112596334, 1182.95214324494, -136.461799744895, 0.45)
    pt3dadd(-12.6444834622201, 1183.94475166071, -136.583099122446, 0.45)
    pt3dadd(-12.6483556648068, 1184.93736007648, -136.704398499997, 0.45)
    pt3dadd(-12.6522278673935, 1185.92996849225, -136.825697877548, 0.45)
    pt3dadd(-12.6561000699802, 1186.92257690801, -136.946997255099, 0.45)
    pt3dadd(-12.6599722725669, 1187.91518532378, -137.06829663265, 0.45)
    pt3dadd(-12.6638444751536, 1188.90779373955, -137.189596010201, 0.45)
    pt3dadd(-12.6677166777404, 1189.90040215532, -137.310895387752, 0.45)
    pt3dadd(-12.6715888803271, 1190.89301057108, -137.432194765303, 0.45)
    pt3dadd(-12.6754610829138, 1191.88561898685, -137.553494142854, 0.45)
    pt3dadd(-12.6793332855005, 1192.87822740262, -137.674793520405, 0.45)
    pt3dadd(-12.6832054880872, 1193.87083581839, -137.796092897956, 0.45)
    pt3dadd(-12.6870776906739, 1194.86344423415, -137.917392275507, 0.45)
    pt3dadd(-12.6909498932606, 1195.85605264992, -138.038691653058, 0.45)
    pt3dadd(-12.6948220958473, 1196.84866106569, -138.159991030609, 0.45)
    pt3dadd(-12.698694298434, 1197.84126948146, -138.28129040816, 0.45)
    pt3dadd(-12.7025665010207, 1198.83387789723, -138.402589785711, 0.45)
    pt3dadd(-12.7064387036075, 1199.82648631299, -138.523889163262, 0.45)
    pt3dadd(-12.7103109061942, 1200.81909472876, -138.645188540813, 0.45)
    pt3dadd(-12.7141831087809, 1201.81170314453, -138.766487918364, 0.45)
    pt3dadd(-12.7180553113676, 1202.8043115603, -138.887787295915, 0.45)
    pt3dadd(-12.7219275139543, 1203.79691997606, -139.009086673466, 0.45)
    pt3dadd(-12.725799716541, 1204.78952839183, -139.130386051017, 0.45)
    pt3dadd(-12.7296719191277, 1205.7821368076, -139.251685428568, 0.45)
    pt3dadd(-12.7335441217144, 1206.77474522337, -139.372984806119, 0.45)
    pt3dadd(-12.7374163243011, 1207.76735363913, -139.49428418367, 0.45)
    pt3dadd(-12.7412885268878, 1208.7599620549, -139.615583561221, 0.45)
    pt3dadd(-12.7451607294745, 1209.75257047067, -139.736882938772, 0.45)
    pt3dadd(-12.7490329320613, 1210.74517888644, -139.858182316323, 0.45)
    pt3dadd(-12.752905134648, 1211.73778730221, -139.979481693874, 0.45)
    pt3dadd(-12.7567773372347, 1212.73039571797, -140.100781071425, 0.45)
    pt3dadd(-12.7606495398214, 1213.72300413374, -140.222080448976, 0.45)
    pt3dadd(-12.7645217424081, 1214.71561254951, -140.343379826527, 0.45)
    pt3dadd(-12.7683939449948, 1215.70822096528, -140.464679204078, 0.45)
    pt3dadd(-12.7722661475815, 1216.70082938104, -140.585978581629, 0.45)
    pt3dadd(-12.7761383501682, 1217.69343779681, -140.70727795918, 0.45)
    pt3dadd(-12.7800105527549, 1218.68604621258, -140.828577336731, 0.45)
    pt3dadd(-12.7838827553416, 1219.67865462835, -140.949876714282, 0.45)
    pt3dadd(-12.7877549579284, 1220.67126304412, -141.071176091833, 0.45)
    pt3dadd(-12.7916271605151, 1221.66387145988, -141.192475469384, 0.45)
    pt3dadd(-12.7954993631018, 1222.65647987565, -141.313774846935, 0.45)
    pt3dadd(-12.7993715656885, 1223.64908829142, -141.435074224486, 0.45)
    pt3dadd(-12.8032437682752, 1224.64169670719, -141.556373602037, 0.45)
    pt3dadd(-12.8071159708619, 1225.63430512295, -141.677672979588, 0.45)
    pt3dadd(-12.8109881734486, 1226.62691353872, -141.798972357139, 0.45)
    pt3dadd(-12.8148603760353, 1227.61952195449, -141.92027173469, 0.45)
    pt3dadd(-12.818732578622, 1228.61213037026, -142.041571112241, 0.45)
    pt3dadd(-12.8226047812087, 1229.60473878602, -142.162870489792, 0.45)
    pt3dadd(-12.8264769837954, 1230.59734720179, -142.284169867343, 0.45)
    pt3dadd(-12.8303491863822, 1231.58995561756, -142.405469244894, 0.45)
    pt3dadd(-12.8342213889689, 1232.58256403333, -142.526768622445, 0.45)
    pt3dadd(-12.8380935915556, 1233.57517244909, -142.648067999996, 0.45)
    pt3dadd(-12.8419657941423, 1234.56778086486, -142.769367377547, 0.45)
    pt3dadd(-12.845837996729, 1235.56038928063, -142.890666755098, 0.45)
    pt3dadd(-12.8497101993157, 1236.5529976964, -143.011966132649, 0.45)
    pt3dadd(-12.8535824019024, 1237.54560611217, -143.1332655102, 0.45)
    pt3dadd(-12.8574546044891, 1238.53821452793, -143.254564887751, 0.45)
    pt3dadd(-12.8613268070758, 1239.5308229437, -143.375864265303, 0.45)
    pt3dadd(-12.8651990096625, 1240.52343135947, -143.497163642854, 0.45)
    pt3dadd(-12.8690712122493, 1241.51603977524, -143.618463020405, 0.45)
    pt3dadd(-12.872943414836, 1242.508648191, -143.739762397956, 0.45)
    pt3dadd(-12.8768156174227, 1243.50125660677, -143.861061775507, 0.45)
    pt3dadd(-12.8806878200094, 1244.49386502254, -143.982361153058, 0.45)
    pt3dadd(-12.8845600225961, 1245.48647343831, -144.103660530609, 0.45)
    pt3dadd(-12.8884322251828, 1246.47908185408, -144.22495990816, 0.45)
    pt3dadd(-12.8923044277695, 1247.47169026984, -144.346259285711, 0.45)
    pt3dadd(-12.8961766303562, 1248.46429868561, -144.467558663262, 0.45)
    pt3dadd(-12.9000488329429, 1249.45690710138, -144.588858040813, 0.45)
    pt3dadd(-12.9039210355296, 1250.44951551715, -144.710157418364, 0.45)
    pt3dadd(-12.9077932381163, 1251.44212393291, -144.831456795915, 0.45)
    pt3dadd(-12.9116654407031, 1252.43473234868, -144.952756173466, 0.45)
    pt3dadd(-12.9155376432898, 1253.42734076445, -145.074055551017, 0.45)
    pt3dadd(-12.9194098458765, 1254.41994918022, -145.195354928568, 0.45)
    pt3dadd(-12.9232820484632, 1255.41255759598, -145.316654306119, 0.45)
    pt3dadd(-12.9271542510499, 1256.40516601175, -145.43795368367, 0.45)
    pt3dadd(-12.9310264536366, 1257.39777442752, -145.559253061221, 0.45)
    pt3dadd(-12.9348986562233, 1258.39038284329, -145.680552438772, 0.45)
    pt3dadd(-12.93877085881, 1259.38299125906, -145.801851816323, 0.45)
    pt3dadd(-12.9426430613967, 1260.37559967482, -145.923151193874, 0.45)
    pt3dadd(-12.9465152639834, 1261.36820809059, -146.044450571425, 0.45)
    pt3dadd(-12.9503874665702, 1262.36081650636, -146.165749948976, 0.45)
    pt3dadd(-12.9542596691569, 1263.35342492213, -146.287049326527, 0.45)
    pt3dadd(-12.9581318717436, 1264.34603333789, -146.408348704078, 0.45)
    pt3dadd(-12.9620040743303, 1265.33864175366, -146.529648081629, 0.45)
    pt3dadd(-12.965876276917, 1266.33125016943, -146.65094745918, 0.45)
    pt3dadd(-12.9697484795037, 1267.3238585852, -146.772246836731, 0.45)
    pt3dadd(-12.9736206820904, 1268.31646700096, -146.893546214282, 0.45)
    pt3dadd(-12.9774928846771, 1269.30907541673, -147.014845591833, 0.45)
    pt3dadd(-12.9813650872638, 1270.3016838325, -147.136144969384, 0.45)
    pt3dadd(-12.9852372898505, 1271.29429224827, -147.257444346935, 0.45)
    pt3dadd(-12.9891094924372, 1272.28690066404, -147.378743724486, 0.45)
    pt3dadd(-12.992981695024, 1273.2795090798, -147.500043102037, 0.45)
    pt3dadd(-12.9968538976107, 1274.27211749557, -147.621342479588, 0.45)
    pt3dadd(-13.0007261001974, 1275.26472591134, -147.742641857139, 0.45)
    pt3dadd(-13.0045983027841, 1276.25733432711, -147.86394123469, 0.45)
    pt3dadd(-13.0084705053708, 1277.24994274287, -147.985240612241, 0.45)
    pt3dadd(-13.0123427079575, 1278.24255115864, -148.106539989792, 0.45)
    pt3dadd(-13.0162149105442, 1279.23515957441, -148.227839367343, 0.45)
    pt3dadd(-13.0200871131309, 1280.22776799018, -148.349138744894, 0.45)
    pt3dadd(-13.0239593157176, 1281.22037640594, -148.470438122445, 0.45)
    pt3dadd(-13.0278315183043, 1282.21298482171, -148.591737499996, 0.45)
    pt3dadd(-13.031703720891, 1283.20559323748, -148.713036877547, 0.45)
    pt3dadd(-13.0355759234778, 1284.19820165325, -148.834336255098, 0.45)
    pt3dadd(-13.0394481260645, 1285.19081006902, -148.955635632649, 0.45)
    pt3dadd(-13.0433203286512, 1286.18341848478, -149.0769350102, 0.45)
    pt3dadd(-13.0471925312379, 1287.17602690055, -149.198234387751, 0.45)
    pt3dadd(-13.0510647338246, 1288.16863531632, -149.319533765302, 0.45)
    pt3dadd(-13.0549369364113, 1289.16124373209, -149.440833142853, 0.45)
    pt3dadd(-13.058809138998, 1290.15385214785, -149.562132520404, 0.45)
    pt3dadd(-13.0626813415847, 1291.14646056362, -149.683431897955, 0.45)
    pt3dadd(-13.0665535441714, 1292.13906897939, -149.804731275506, 0.45)
    pt3dadd(-13.0704257467581, 1293.13167739516, -149.926030653057, 0.45)
    pt3dadd(-13.0742979493449, 1294.12428581092, -150.047330030608, 0.45)
    pt3dadd(-13.0781701519316, 1295.11689422669, -150.168629408159, 0.45)
    pt3dadd(-13.0820423545183, 1296.10950264246, -150.289928785711, 0.45)
    pt3dadd(-13.085914557105, 1297.10211105823, -150.411228163262, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-13.0897867596917, 1298.094719474, -150.532527540813, 0.45)
    pt3dadd(-13.0936589622784, 1299.08732788976, -150.653826918364, 0.45)
    pt3dadd(-13.0975311648651, 1300.07993630553, -150.775126295915, 0.45)
    pt3dadd(-13.1014033674518, 1301.0725447213, -150.896425673466, 0.45)
    pt3dadd(-13.1052755700385, 1302.06515313707, -151.017725051017, 0.45)
    pt3dadd(-13.1091477726252, 1303.05776155283, -151.139024428568, 0.45)
    pt3dadd(-13.1130199752119, 1304.0503699686, -151.260323806119, 0.45)
    pt3dadd(-13.1168921777987, 1305.04297838437, -151.38162318367, 0.45)
    pt3dadd(-13.1207643803854, 1306.03558680014, -151.502922561221, 0.45)
    pt3dadd(-13.1246365829721, 1307.0281952159, -151.624221938772, 0.45)
    pt3dadd(-13.1285087855588, 1308.02080363167, -151.745521316323, 0.45)
    pt3dadd(-13.1323809881455, 1309.01341204744, -151.866820693874, 0.45)
    pt3dadd(-13.1362531907322, 1310.00602046321, -151.988120071425, 0.45)
    pt3dadd(-13.1401253933189, 1310.99862887898, -152.109419448976, 0.45)
    pt3dadd(-13.1439975959056, 1311.99123729474, -152.230718826527, 0.45)
    pt3dadd(-13.1478697984923, 1312.98384571051, -152.352018204078, 0.45)
    pt3dadd(-13.151742001079, 1313.97645412628, -152.473317581629, 0.45)
    pt3dadd(-13.1556142036658, 1314.96906254205, -152.59461695918, 0.45)
    pt3dadd(-13.1594864062525, 1315.96167095781, -152.715916336731, 0.45)
    pt3dadd(-13.1633586088392, 1316.95427937358, -152.837215714282, 0.45)
    pt3dadd(-13.1672308114259, 1317.94688778935, -152.958515091833, 0.45)
    pt3dadd(-13.1711030140126, 1318.93949620512, -153.079814469384, 0.45)
    pt3dadd(-13.1749752165993, 1319.93210462089, -153.201113846935, 0.45)
    pt3dadd(-13.178847419186, 1320.92471303665, -153.322413224486, 0.45)
    pt3dadd(-13.1827196217727, 1321.91732145242, -153.443712602037, 0.45)
    pt3dadd(-13.1865918243594, 1322.90992986819, -153.565011979588, 0.45)
    pt3dadd(-13.1904640269461, 1323.90253828396, -153.686311357139, 0.45)
    pt3dadd(-13.1943362295328, 1324.89514669972, -153.80761073469, 0.45)
    pt3dadd(-13.1982084321196, 1325.88775511549, -153.928910112241, 0.45)
    pt3dadd(-13.2020806347063, 1326.88036353126, -154.050209489792, 0.45)
    pt3dadd(-13.205952837293, 1327.87297194703, -154.171508867343, 0.45)
    pt3dadd(-13.2098250398797, 1328.86558036279, -154.292808244894, 0.45)
    pt3dadd(-13.2136972424664, 1329.85818877856, -154.414107622445, 0.45)
    pt3dadd(-13.2175694450531, 1330.85079719433, -154.535406999996, 0.45)
    pt3dadd(-13.2214416476398, 1331.8434056101, -154.656706377547, 0.45)
    pt3dadd(-13.2253138502265, 1332.83601402587, -154.778005755098, 0.45)
    pt3dadd(-13.2291860528132, 1333.82862244163, -154.899305132649, 0.45)
    pt3dadd(-13.2330582553999, 1334.8212308574, -155.0206045102, 0.45)
    pt3dadd(-13.2369304579867, 1335.81383927317, -155.141903887751, 0.45)
    pt3dadd(-13.2408026605734, 1336.80644768894, -155.263203265302, 0.45)
    pt3dadd(-13.2446748631601, 1337.7990561047, -155.384502642853, 0.45)
    pt3dadd(-13.2485470657468, 1338.79166452047, -155.505802020404, 0.45)
    pt3dadd(-13.2524192683335, 1339.78427293624, -155.627101397955, 0.45)
    pt3dadd(-13.2562914709202, 1340.77688135201, -155.748400775506, 0.45)
    pt3dadd(-13.2601636735069, 1341.76948976777, -155.869700153057, 0.45)
    pt3dadd(-13.2640358760936, 1342.76209818354, -155.990999530608, 0.45)
    pt3dadd(-13.2679080786803, 1343.75470659931, -156.112298908159, 0.45)
    pt3dadd(-13.271780281267, 1344.74731501508, -156.23359828571, 0.45)
    pt3dadd(-13.2756524838537, 1345.73992343085, -156.354897663261, 0.45)
    pt3dadd(-13.2795246864405, 1346.73253184661, -156.476197040812, 0.45)
    pt3dadd(-13.2833968890272, 1347.72514026238, -156.597496418363, 0.45)
    pt3dadd(-13.2872690916139, 1348.71774867815, -156.718795795914, 0.45)
    pt3dadd(-13.2911412942006, 1349.71035709392, -156.840095173465, 0.45)
    pt3dadd(-13.2950134967873, 1350.70296550968, -156.961394551016, 0.45)
    pt3dadd(-13.298885699374, 1351.69557392545, -157.082693928567, 0.45)
    pt3dadd(-13.3027579019607, 1352.68818234122, -157.203993306118, 0.45)
    pt3dadd(-13.3066301045474, 1353.68079075699, -157.32529268367, 0.45)
    pt3dadd(-13.3105023071341, 1354.67339917275, -157.446592061221, 0.45)
    pt3dadd(-13.3143745097208, 1355.66600758852, -157.567891438772, 0.45)
    pt3dadd(-13.3182467123076, 1356.65861600429, -157.689190816323, 0.45)
    pt3dadd(-13.3221189148943, 1357.65122442006, -157.810490193874, 0.45)
    pt3dadd(-13.325991117481, 1358.64383283583, -157.931789571425, 0.45)
    pt3dadd(-13.3298633200677, 1359.63644125159, -158.053088948976, 0.45)
    pt3dadd(-13.3337355226544, 1360.62904966736, -158.174388326527, 0.45)
    pt3dadd(-13.3376077252411, 1361.62165808313, -158.295687704078, 0.45)
    pt3dadd(-13.3414799278278, 1362.6142664989, -158.416987081629, 0.45)
    pt3dadd(-13.3453521304145, 1363.60687491466, -158.53828645918, 0.45)
    pt3dadd(-13.3492243330012, 1364.59948333043, -158.659585836731, 0.45)
    pt3dadd(-13.3530965355879, 1365.5920917462, -158.780885214282, 0.45)
    pt3dadd(-13.3569687381746, 1366.58470016197, -158.902184591833, 0.45)
    pt3dadd(-13.3608409407614, 1367.57730857773, -159.023483969384, 0.45)
    pt3dadd(-13.3647131433481, 1368.5699169935, -159.144783346935, 0.45)
    pt3dadd(-13.3685853459348, 1369.56252540927, -159.266082724486, 0.45)
    pt3dadd(-13.3724575485215, 1370.55513382504, -159.387382102037, 0.45)
    pt3dadd(-13.3763297511082, 1371.54774224081, -159.508681479588, 0.45)
    pt3dadd(-13.3802019536949, 1372.54035065657, -159.629980857139, 0.45)
    pt3dadd(-13.3840741562816, 1373.53295907234, -159.75128023469, 0.45)
    pt3dadd(-13.3879463588683, 1374.52556748811, -159.872579612241, 0.45)
    pt3dadd(-13.391818561455, 1375.51817590388, -159.993878989792, 0.45)
    pt3dadd(-13.3956907640417, 1376.51078431964, -160.115178367343, 0.45)
    pt3dadd(-13.3995629666285, 1377.50339273541, -160.236477744894, 0.45)
    pt3dadd(-13.4034351692152, 1378.49600115118, -160.357777122445, 0.45)
    pt3dadd(-13.4073073718019, 1379.48860956695, -160.479076499996, 0.45)
    pt3dadd(-13.4111795743886, 1380.48121798271, -160.600375877547, 0.45)
    pt3dadd(-13.4150517769753, 1381.47382639848, -160.721675255098, 0.45)
    pt3dadd(-13.418923979562, 1382.46643481425, -160.842974632649, 0.45)
    pt3dadd(-13.4227961821487, 1383.45904323002, -160.9642740102, 0.45)
    pt3dadd(-13.4266683847354, 1384.45165164579, -161.085573387751, 0.45)
    pt3dadd(-13.4305405873221, 1385.44426006155, -161.206872765302, 0.45)
    pt3dadd(-13.4344127899088, 1386.43686847732, -161.328172142853, 0.45)
    pt3dadd(-13.4382849924955, 1387.42947689309, -161.449471520404, 0.45)
    pt3dadd(-13.4421571950823, 1388.42208530886, -161.570770897955, 0.45)
    pt3dadd(-13.446029397669, 1389.41469372462, -161.692070275506, 0.45)
    pt3dadd(-13.4499016002557, 1390.40730214039, -161.813369653057, 0.45)
    pt3dadd(-13.4537738028424, 1391.39991055616, -161.934669030608, 0.45)
    pt3dadd(-13.4576460054291, 1392.39251897193, -162.055968408159, 0.45)
    pt3dadd(-13.4615182080158, 1393.38512738769, -162.17726778571, 0.45)
    pt3dadd(-13.4653904106025, 1394.37773580346, -162.298567163261, 0.45)
    pt3dadd(-13.4692626131892, 1395.37034421923, -162.419866540812, 0.45)
    pt3dadd(-13.4731348157759, 1396.362952635, -162.541165918363, 0.45)
    pt3dadd(-13.4770070183626, 1397.35556105077, -162.662465295914, 0.45)
    pt3dadd(-13.4808792209494, 1398.34816946653, -162.783764673465, 0.45)
    pt3dadd(-13.4847514235361, 1399.3407778823, -162.905064051016, 0.45)
    pt3dadd(-13.4886236261228, 1400.33338629807, -163.026363428567, 0.45)
    pt3dadd(-13.4924958287095, 1401.32599471384, -163.147662806118, 0.45)
    pt3dadd(-13.4963680312962, 1402.3186031296, -163.268962183669, 0.45)
    pt3dadd(-13.5002402338829, 1403.31121154537, -163.39026156122, 0.45)
    pt3dadd(-13.5041124364696, 1404.30381996114, -163.511560938771, 0.45)
    pt3dadd(-13.5079846390563, 1405.29642837691, -163.632860316322, 0.45)
    pt3dadd(-13.511856841643, 1406.28903679267, -163.754159693873, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-8.28438334958522, 66.2676755062798, 0, 10.2667572303772)
    pt3dadd(-8.28051114699851, 65.2750670905121, 0.121299377551018, 10.2667572303772)
    pt3dadd(-8.2766389444118, 64.2824586747444, 0.242598755102036, 9.58775356515898)
    pt3dadd(-8.27276674182509, 63.2898502589767, 0.363898132653054, 8.52332145975835)
    pt3dadd(-8.26889453923839, 62.297241843209, 0.485197510204072, 7.16804037792357)
    pt3dadd(-8.26502233665168, 61.3046334274413, 0.60649688775509, 5.64233299132873)
    pt3dadd(-8.26115013406497, 60.3120250116736, 0.727796265306108, 4.92202896591851)
    pt3dadd(-8.25727793147826, 59.3194165959059, 0.849095642857126, 4.75930379357159)
    pt3dadd(-8.25340572889155, 58.3268081801382, 0.970395020408144, 4.59657862122467)
    pt3dadd(-8.24953352630484, 57.3341997643705, 1.09169439795916, 4.43385344887776)
    pt3dadd(-8.24566132371813, 56.3415913486028, 1.21299377551018, 4.27112827653084)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-8.24566132371813, 56.3415913486028, 1.21299377551018, 4.10840310418393)
    pt3dadd(-8.24178912113142, 55.3489829328351, 1.3342931530612, 4.10840310418393)
    pt3dadd(-8.23791691854471, 54.3563745170674, 1.45559253061222, 3.94567793183701)
    pt3dadd(-8.234044715958, 53.3637661012997, 1.57689190816323, 3.78295275949009)
    pt3dadd(-8.23017251337129, 52.371157685532, 1.69819128571425, 3.62022758714318)
    pt3dadd(-8.22630031078458, 51.3785492697643, 1.81949066326527, 3.45750241479626)
    pt3dadd(-8.22242810819787, 50.3859408539966, 1.94079004081629, 3.29477724244935)
    pt3dadd(-8.21855590561116, 49.3933324382289, 2.06208941836731, 3.13205207010243)
    pt3dadd(-8.21468370302445, 48.4007240224612, 2.18338879591832, 2.96932689775552)
    pt3dadd(-8.21081150043774, 47.4081156066935, 2.30468817346934, 2.8066017254086)
    pt3dadd(-8.20693929785103, 46.4155071909258, 2.42598755102036, 2.64387655306168)
    pt3dadd(-8.20306709526433, 45.4228987751581, 2.54728692857138, 2.48115138071477)
    pt3dadd(-8.15081031491343, 44.4380929062439, 2.69945249013668, 2.35378100933161)
    pt3dadd(-8.03693431657876, 43.4632238158985, 2.89092706728072, 2.27143604248906)
    pt3dadd(-7.92305831824409, 42.4883547255532, 3.08240164442476, 2.18909107564651)
    pt3dadd(-7.80918231990942, 41.5134856352078, 3.2738762215688, 2.10674610880396)
    pt3dadd(-7.67395585226038, 40.5356768808126, 3.42940139408515, 2.07)
    pt3dadd(-7.52152398293709, 39.5554991807974, 3.5559565267648, 2.07)
    pt3dadd(-7.36909211361379, 38.5753214807822, 3.68251165944444, 2.07)
    pt3dadd(-7.21666024429049, 37.595143780767, 3.80906679212409, 2.07)
    pt3dadd(-7.06422837496719, 36.6149660807518, 3.93562192480373, 2.07)
    pt3dadd(-6.92486435158516, 35.6325719787486, 4.02213096713863, 2.07)
    pt3dadd(-6.84422129685526, 34.6402183721531, 3.9286910548912, 2.07)
    pt3dadd(-6.76357824212536, 33.6478647655577, 3.83525114264376, 2.07)
    pt3dadd(-6.68293518739546, 32.6555111589622, 3.74181123039633, 2.07)
    pt3dadd(-6.60229213266555, 31.6631575523667, 3.6483713181489, 2.07)
    pt3dadd(-6.12162424767627, 31.2536361464187, 4.04771294376144, 2.09362487600743)
    pt3dadd(-5.40296234390167, 31.1908696597082, 4.74023401651596, 2.13130532746669)
    pt3dadd(-4.68430044012706, 31.1281031729977, 5.43275508927048, 2.16898577892595)
    pt3dadd(-3.96563853635245, 31.0653366862871, 6.125276162025, 2.20666623038521)
    pt3dadd(-3.55759753367334, 30.7808137386175, 6.28696109917176, 2.16880849467494)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-3.55759753367334, 30.7808137386175, 6.28696109917176, 2.00809373351158)
    pt3dadd(-4.02385210328818, 30.0608126329998, 5.70517597729891, 2.00809373351158)
    pt3dadd(-4.24531573848444, 29.244342108971, 5.33529573455103, 1.8192208740884)
    pt3dadd(-4.24242044111319, 28.2444966168218, 5.34762246482684, 1.59)
    pt3dadd(-4.19143585737378, 27.2938337631978, 5.39160575214741, 1.53295904201194)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-4.19143585737378, 27.2938337631978, 5.39160575214741, 1.34530077031987)
    pt3dadd(-4.49260376658864, 26.5154043114693, 6.03789353908437, 1.34530077031987)
    pt3dadd(-4.74978321675159, 25.6537101292094, 6.08617937264578, 1.27)
    pt3dadd(-5.0423747172023, 24.7467314416512, 5.78322743886854, 1.27)
    pt3dadd(-5.33496621765302, 23.8397527540931, 5.4802755050913, 1.27)
    pt3dadd(-5.62755771810373, 22.932774066535, 5.17732357131406, 1.27)
    pt3dadd(-5.92014921855444, 22.0257953789769, 4.87437163753682, 1.27)
    pt3dadd(-6.14646987192467, 21.0759855161908, 4.72006140573643, 1.27)
    pt3dadd(-6.31937139653902, 20.0916506070976, 4.68556721019025, 1.27)
    pt3dadd(-6.49227292115337, 19.1073156980043, 4.65107301464407, 1.27)
    pt3dadd(-6.66517444576772, 18.122980788911, 4.61657881909789, 1.27)
    pt3dadd(-6.84555321339134, 17.1584463868717, 4.50730690098521, 1.27)
    pt3dadd(-7.05712580429058, 16.2765164310223, 4.08607467078947, 1.27)
    pt3dadd(-7.26869839518982, 15.3945864751729, 3.66484244059373, 1.27)
    pt3dadd(-7.48027098608906, 14.5126565193235, 3.24361021039799, 1.27)
    pt3dadd(-7.60099593834167, 13.5705296787471, 3.01147718586291, 1.27)
    pt3dadd(-7.63792721404036, 12.5728800049576, 2.95376055686421, 1.27)
    pt3dadd(-7.67485848973905, 11.5752303311681, 2.8960439278655, 1.27)
    pt3dadd(-7.71178976543774, 10.5775806573786, 2.8383272988668, 1.27)
    pt3dadd(-7.74872104113643, 9.57993098358906, 2.78061066986809, 1.27)
    pt3dadd(-7.73733471276736, 8.58304293175711, 2.70292668482513, 1.27)
    pt3dadd(-7.72506890249945, 7.58616874304477, 2.62487925195507, 1.27)
    pt3dadd(-7.70292660681164, 6.5999425947189, 2.50366561938097, 1.25147390502811)
  }
  GCL[3] {pt3dclear()
    pt3dadd(-7.70292660681164, 6.5999425947189, 2.50366561938097, 1.18335255424204)
    pt3dadd(-7.74898017502037, 5.67955477012302, 2.09646732786432, 1.18335255424204)
    pt3dadd(-7.7747996802761, 4.75118477426663, 1.72570796663126, 1.11523120345597)
    pt3dadd(-7.80061918553184, 3.82281477841023, 1.35494860539819, 1.0471098526699)
    pt3dadd(-7.82643869078757, 2.89444478255384, 0.984189244165128, 0.978988501883831)
    pt3dadd(-7.93586552511269, 2.0447289453692, 0.48936942442895, 0.95)
    pt3dadd(-8.10722629177902, 1.2532778727184, -0.0973508558132004, 0.95)
    pt3dadd(-8.27858705844535, 0.461826800067584, -0.68407113605535, 0.95)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-8.27858705844535, 0.461826800067584, -0.68407113605535, 0.95)
    pt3dadd(-8.44994782511168, -0.329624272583203, -1.2707914162975, 0.95)
    pt3dadd(-8.62130859177801, -1.121075345234, -1.85751169653965, 0.95)
    pt3dadd(-8.79266935844434, -1.91252641788481, -2.4442319767818, 0.95)
    pt3dadd(-8.95355600158478, -2.87967081120451, -2.63074435869733, 0.95)
    pt3dadd(-9.11422562999043, -3.85045541740647, -2.80896478084153, 0.95)
    pt3dadd(-9.27489525839608, -4.82124002360847, -2.98718520298574, 0.95)
    pt3dadd(-9.43556488680172, -5.79202462981043, -3.16540562512994, 0.95)
    pt3dadd(-9.59623451520737, -6.76280923601242, -3.34362604727415, 0.95)
    pt3dadd(-9.7935578962633, -7.71097957835322, -3.58044119964404, 0.95)
    pt3dadd(-10.0080259513055, -8.59370224401754, -3.8163694809065, 0.940637474857046)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(-10.0080259513055, -8.59370224401754, -3.8163694809065, 0.889902700812054)
    pt3dadd(-9.51137791441338, -9.34472578730625, -3.19559867567402, 0.889902700812054)
    pt3dadd(-9.1089020053854, -10.0887423110296, -2.66225773867532, 0.839167926767062)
    pt3dadd(-8.72782228148937, -10.8706806921603, -2.31336769051403, 0.8)
    pt3dadd(-8.41919481638142, -11.7810309471671, -2.58906952400465, 0.8)
    pt3dadd(-8.11056735127346, -12.6913812021739, -2.86477135749527, 0.8)
    pt3dadd(-7.8019398861655, -13.6017314571807, -3.14047319098589, 0.8)
    pt3dadd(-7.52262011630557, -14.5054347289809, -3.43585007862561, 0.8)
    pt3dadd(-7.6533836767874, -15.3161311305026, -4.00652707641843, 0.8)
    pt3dadd(-7.78414723726923, -16.1268275320243, -4.57720407421125, 0.8)
    pt3dadd(-7.91491079775106, -16.9375239335461, -5.14788107200408, 0.8)
    pt3dadd(-8.04567435823288, -17.7482203350678, -5.7185580697969, 0.8)
    pt3dadd(-8.17643791871471, -18.5589167365895, -6.28923506758973, 0.8)
    pt3dadd(-8.30720147919654, -19.3696131381113, -6.85991206538255, 0.8)
    pt3dadd(-8.36855932648742, -20.3385354382208, -6.99960190157024, 0.8)
    pt3dadd(-8.41771287535475, -21.3352801753593, -7.0635069688229, 0.8)
    pt3dadd(-8.46686642422209, -22.3320249124977, -7.12741203607556, 0.8)
    pt3dadd(-8.51601997308942, -23.3287696496361, -7.19131710332822, 0.8)
    pt3dadd(-8.63465600058852, -24.3020094178298, -7.38344559702781, 0.8)
    pt3dadd(-8.75907595036026, -25.2732925644971, -7.58624777921269, 0.8)
    pt3dadd(-8.883495900132, -26.2445757111643, -7.78904996139756, 0.8)
    pt3dadd(-9.00791584990374, -27.2158588578316, -7.99185214358244, 0.8)
    pt3dadd(-9.15222057616494, -28.1849911414434, -8.1727702468582, 0.8)
    pt3dadd(-9.46003444170166, -29.1364372435139, -8.17373928668021, 0.8)
    pt3dadd(-9.76784830723838, -30.0878833455844, -8.17470832650223, 0.8)
    pt3dadd(-10.0756621727751, -31.0393294476549, -8.17567736632424, 0.8)
    pt3dadd(-10.3834760383118, -31.9907755497254, -8.17664640614625, 0.8)
    pt3dadd(-10.6912899038485, -32.9422216517959, -8.17761544596827, 0.8)
    pt3dadd(-10.9995003554628, -33.8083531208089, -8.35583937691783, 0.8)
    pt3dadd(-11.3089719411509, -34.4031861332096, -9.09772954736761, 0.8)
    pt3dadd(-11.6184435268389, -34.9980191456103, -9.83961971781738, 0.8)
    pt3dadd(-11.7617827659053, -35.7682901798493, -10.2949590533426, 0.8)
    pt3dadd(-11.6936841018828, -36.761842520913, -10.3856029584062, 0.8)
    pt3dadd(-11.6751941770105, -37.7494753120756, -10.4599702351245, 0.8)
    pt3dadd(-11.9928636157183, -38.6969959745783, -10.4240436176722, 0.8)
    pt3dadd(-12.3105330544261, -39.6445166370809, -10.3881170002199, 0.8)
    pt3dadd(-12.6291140377322, -40.5800674951135, -10.4097239348587, 0.8)
    pt3dadd(-12.9537075364357, -41.4366659532118, -10.810820110586, 0.8)
    pt3dadd(-13.2783010351393, -42.2932644113101, -11.2119162863132, 0.8)
    pt3dadd(-13.6028945338428, -43.1498628694084, -11.6130124620405, 0.8)
    pt3dadd(-13.9235185690472, -44.0090242807215, -11.9960418447885, 0.8)
    pt3dadd(-14.103792144536, -44.9588054097935, -11.7402738936313, 0.8)
    pt3dadd(-14.2840657200247, -45.9085865388656, -11.4845059424741, 0.8)
    pt3dadd(-14.4643392955135, -46.8583676679376, -11.2287379913169, 0.8)
    pt3dadd(-14.6446128710022, -47.8081487970096, -10.9729700401597, 0.8)
    pt3dadd(-14.8199951624647, -48.7773508758804, -10.8360766809648, 0.8)
    pt3dadd(-14.9916250508378, -49.7614519529761, -10.7903792907101, 0.8)
    pt3dadd(-15.2051157358755, -50.6399211551688, -10.9526699973305, 0.8)
    pt3dadd(-15.535146518549, -51.2243121267612, -11.6939977755833, 0.8)
    pt3dadd(-15.8651773012225, -51.8087030983537, -12.435325553836, 0.8)
  }
}
proc shape3d_7() {
  adendIML[1] {
    pt3dadd(-16.195208083896, -52.3930940699461, -13.1766533320887, 0.8)
    pt3dadd(-16.5252388665695, -52.9774850415386, -13.9179811103415, 0.8)
    pt3dadd(-16.8552696492429, -53.561876013131, -14.6593088885942, 0.8)
    pt3dadd(-17.3491992196969, -54.4025659592506, -14.6648217592623, 0.8)
    pt3dadd(-17.8558595123959, -55.2631637466704, -14.6131807281892, 0.8)
    pt3dadd(-18.362519805095, -56.1237615340902, -14.5615396971161, 0.8)
    pt3dadd(-18.8061412085559, -57.0062040056069, -14.5710322743569, 0.8)
    pt3dadd(-19.0618777409424, -57.953753678485, -14.762731109595, 0.8)
    pt3dadd(-19.3176142733288, -58.9013033513631, -14.954429944833, 0.8)
    pt3dadd(-19.5733508057153, -59.8488530242411, -15.146128780071, 0.8)
    pt3dadd(-19.8290873381018, -60.7964026971192, -15.337827615309, 0.8)
    pt3dadd(-20.0248576245393, -61.7300438591892, -15.2578408789111, 0.8)
    pt3dadd(-20.1560346343672, -62.6487033216108, -14.8852051530396, 0.8)
    pt3dadd(-20.2872116441952, -63.5673627840325, -14.512569427168, 0.8)
    pt3dadd(-20.4183886540232, -64.4860222464541, -14.1399337012965, 0.8)
    pt3dadd(-20.5495656638511, -65.4046817088757, -13.7672979754249, 0.8)
    pt3dadd(-20.6807426736791, -66.3233411712973, -13.3946622495534, 0.8)
    pt3dadd(-20.8272928502839, -67.2752333939195, -13.3947247460371, 0.8)
    pt3dadd(-20.9817819348919, -68.2442874563732, -13.587253566682, 0.8)
    pt3dadd(-21.1362710195, -69.2133415188269, -13.779782387327, 0.8)
    pt3dadd(-21.2907601041081, -70.1823955812806, -13.972311207972, 0.8)
    pt3dadd(-21.4452491887162, -71.1514496437343, -14.164840028617, 0.8)
    pt3dadd(-21.6100223333522, -72.1261031641665, -14.2977892943804, 0.8)
    pt3dadd(-21.7893695741163, -73.1086919785021, -14.346305159547, 0.8)
    pt3dadd(-21.9687168148804, -74.0912807928377, -14.3948210247136, 0.8)
    pt3dadd(-22.1480640556445, -75.0738696071733, -14.4433368898802, 0.8)
    pt3dadd(-22.3274112964085, -76.0564584215089, -14.4918527550468, 0.8)
    pt3dadd(-22.5067585371726, -77.0390472358445, -14.5403686202134, 0.8)
    pt3dadd(-22.6861057779367, -78.0216360501801, -14.58888448538, 0.8)
    pt3dadd(-22.8654530187008, -79.0042248645157, -14.6374003505466, 0.8)
    pt3dadd(-23.0448002594649, -79.9868136788513, -14.6859162157132, 0.8)
    pt3dadd(-23.2241475002289, -80.9694024931869, -14.7344320808798, 0.8)
    pt3dadd(-23.403494740993, -81.9519913075225, -14.7829479460464, 0.8)
    pt3dadd(-23.6069084498151, -82.8721496283408, -14.9673868621681, 0.8)
    pt3dadd(-23.8920197717108, -83.5803772956429, -15.6132390940252, 0.8)
    pt3dadd(-24.1771310936064, -84.2886049629449, -16.2590913258823, 0.8)
    pt3dadd(-24.462242415502, -84.996832630247, -16.9049435577394, 0.8)
    pt3dadd(-24.7438782378475, -85.7091549754076, -17.5370230278912, 0.8)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(-24.7438782378475, -85.7091549754076, -17.5370230278912, 0.8)
    pt3dadd(-24.8112501531292, -86.6168395956826, -17.1138211069958, 0.8)
    pt3dadd(-24.8797659053017, -87.5243683960436, -16.6994576575705, 0.8)
    pt3dadd(-24.9482816574741, -88.4318971964045, -16.2850942081452, 0.8)
    pt3dadd(-25.0167974096466, -89.3394259967655, -15.87073075872, 0.8)
    pt3dadd(-25.1155889471163, -90.2602079090428, -15.5424706473037, 0.8)
    pt3dadd(-25.3376974870802, -91.2349713785015, -15.5649200366909, 0.8)
    pt3dadd(-25.5598060270442, -92.2097348479602, -15.5873694260782, 0.8)
    pt3dadd(-25.7819145670082, -93.184498317419, -15.6098188154654, 0.8)
    pt3dadd(-26.0040231069721, -94.1592617868777, -15.6322682048526, 0.8)
    pt3dadd(-26.2261316469361, -95.1340252563364, -15.6547175942399, 0.8)
    pt3dadd(-26.4461194506079, -96.1094825363274, -15.6628525431526, 0.8)
    pt3dadd(-26.6658820899308, -97.0850134800725, -15.6694676889286, 0.8)
    pt3dadd(-26.8856447292537, -98.0605444238176, -15.6760828347045, 0.8)
    pt3dadd(-27.1479270558524, -99.025202801625, -15.6847992457906, 0.8)
    pt3dadd(-27.4226801558987, -99.9866723199818, -15.6941319455964, 0.8)
    pt3dadd(-27.697433255945, -100.948141838339, -15.7034646454022, 0.8)
    pt3dadd(-27.9721863559913, -101.909611356695, -15.7127973452081, 0.8)
    pt3dadd(-28.2659976851907, -102.841121702431, -15.8068401053693, 0.8)
    pt3dadd(-28.6436617508268, -103.640817146294, -16.2735916994665, 0.8)
    pt3dadd(-29.0213258164628, -104.440512590157, -16.7403432935637, 0.8)
    pt3dadd(-29.3989898820988, -105.240208034019, -17.2070948876609, 0.8)
    pt3dadd(-29.7766539477348, -106.039903477882, -17.6738464817581, 0.8)
    pt3dadd(-30.1141700066903, -106.885453499005, -18.0236185073882, 0.8)
    pt3dadd(-30.3391074105494, -107.859583917134, -18.0453692044238, 0.8)
    pt3dadd(-30.5640448144084, -108.833714335263, -18.0671199014594, 0.8)
    pt3dadd(-30.7889822182675, -109.807844753391, -18.088870598495, 0.8)
    pt3dadd(-31.0139196221265, -110.78197517152, -18.1106212955306, 0.8)
    pt3dadd(-31.2789886374661, -111.655001517291, -18.4251531245137, 0.8)
    pt3dadd(-31.5722920305033, -112.456896641055, -18.9456695316679, 0.8)
    pt3dadd(-31.8655954235405, -113.258791764819, -19.466185938822, 0.8)
    pt3dadd(-32.1588988165777, -114.060686888582, -19.9867023459762, 0.8)
    pt3dadd(-32.4325388708238, -114.842779860569, -20.2681577288333, 0.8)
    pt3dadd(-32.6266705946926, -115.544803214553, -19.5829744801696, 0.8)
    pt3dadd(-32.8208023185614, -116.246826568536, -18.8977912315059, 0.8)
    pt3dadd(-33.0185874607876, -116.962747644808, -18.2495114081528, 0.8)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-33.0185874607876, -116.962747644808, -18.2495114081528, 0.8)
    pt3dadd(-33.2817635067552, -117.927417846258, -18.2617495151557, 0.8)
    pt3dadd(-33.5449395527229, -118.892088047708, -18.2739876221586, 0.8)
    pt3dadd(-33.8081155986905, -119.856758249158, -18.2862257291614, 0.8)
    pt3dadd(-34.0712916446581, -120.821428450608, -18.2984638361643, 0.8)
    pt3dadd(-34.3344676906257, -121.786098652058, -18.3107019431672, 0.8)
    pt3dadd(-34.5976437365933, -122.750768853508, -18.3229400501701, 0.8)
    pt3dadd(-34.8608197825609, -123.715439054959, -18.335178157173, 0.8)
    pt3dadd(-35.289778442649, -124.477012733743, -18.7871352763449, 0.8)
    pt3dadd(-35.7388110260426, -125.213994304114, -19.2923361314364, 0.8)
    pt3dadd(-36.1878436094363, -125.950975874484, -19.7975369865279, 0.8)
    pt3dadd(-36.6368761928299, -126.687957444854, -20.3027378416194, 0.8)
    pt3dadd(-37.0859087762235, -127.424939015225, -20.8079386967109, 0.8)
    pt3dadd(-37.5349413596172, -128.161920585595, -21.3131395518024, 0.8)
    pt3dadd(-37.9839739430108, -128.898902155966, -21.8183404068939, 0.8)
    pt3dadd(-38.4330065264044, -129.635883726336, -22.3235412619854, 0.8)
    pt3dadd(-38.8467770737048, -130.421399654771, -22.7187330663596, 0.8)
    pt3dadd(-39.1357186512031, -131.378729085444, -22.7244885819829, 0.8)
    pt3dadd(-39.4246602287013, -132.336058516117, -22.7302440976062, 0.8)
    pt3dadd(-39.7136018061996, -133.29338794679, -22.7359996132296, 0.8)
    pt3dadd(-40.0025433836978, -134.250717377463, -22.7417551288529, 0.8)
    pt3dadd(-40.2914849611961, -135.208046808136, -22.7475106444762, 0.8)
    pt3dadd(-40.5804265386943, -136.165376238809, -22.7532661600996, 0.8)
    pt3dadd(-40.8693681161926, -137.122705669482, -22.7590216757229, 0.8)
    pt3dadd(-41.1583096936908, -138.080035100155, -22.7647771913462, 0.8)
    pt3dadd(-41.4350246683807, -139.040572220632, -22.7735881040892, 0.8)
    pt3dadd(-41.6597119481245, -140.014758979458, -22.7954006062164, 0.8)
    pt3dadd(-41.8843992278682, -140.988945738284, -22.8172131083436, 0.8)
    pt3dadd(-42.1090865076119, -141.963132497111, -22.8390256104708, 0.8)
    pt3dadd(-42.3337737873556, -142.937319255937, -22.8608381125981, 0.8)
    pt3dadd(-42.5584610670993, -143.911506014763, -22.8826506147253, 0.8)
    pt3dadd(-42.783148346843, -144.885692773589, -22.9044631168525, 0.8)
    pt3dadd(-43.0078356265867, -145.859879532415, -22.9262756189797, 0.8)
    pt3dadd(-43.2325229063304, -146.834066291242, -22.9480881211069, 0.8)
    pt3dadd(-43.4572101860741, -147.808253050068, -22.9699006232342, 0.8)
    pt3dadd(-43.7025851891538, -148.759224307852, -23.0695984456061, 0.8)
    pt3dadd(-44.0229833695085, -149.626005506542, -23.4517441764775, 0.8)
    pt3dadd(-44.3433815498633, -150.492786705232, -23.8338899073488, 0.8)
    pt3dadd(-44.663779730218, -151.359567903922, -24.2160356382202, 0.8)
    pt3dadd(-44.9841779105728, -152.226349102611, -24.5981813690916, 0.8)
    pt3dadd(-45.3045760909275, -153.093130301301, -24.9803270999629, 0.8)
    pt3dadd(-45.6249742712823, -153.959911499991, -25.3624728308343, 0.8)
    pt3dadd(-45.945372451637, -154.826692698681, -25.7446185617056, 0.8)
    pt3dadd(-46.2657706319918, -155.693473897371, -26.126764292577, 0.8)
    pt3dadd(-46.5861688123465, -156.560255096061, -26.5089100234483, 0.8)
    pt3dadd(-46.8306647702561, -157.494953724404, -26.410849182685, 0.8)
    pt3dadd(-47.0572242381689, -158.445701952593, -26.1993105004171, 0.8)
    pt3dadd(-47.2837837060817, -159.396450180781, -25.9877718181493, 0.8)
    pt3dadd(-47.5103431739945, -160.347198408969, -25.7762331358814, 0.8)
    pt3dadd(-47.7369026419073, -161.297946637158, -25.5646944536136, 0.8)
    pt3dadd(-48.0011025933379, -162.222130229605, -25.4985082175304, 0.8)
    pt3dadd(-48.3813858153352, -163.064388471737, -25.8805890003874, 0.8)
    pt3dadd(-48.7616690373325, -163.906646713868, -26.2626697832445, 0.8)
    pt3dadd(-49.1419522593298, -164.748904956, -26.6447505661016, 0.8)
    pt3dadd(-49.5222354813271, -165.591163198132, -27.0268313489587, 0.8)
    pt3dadd(-49.9025187033244, -166.433421440263, -27.4089121318157, 0.8)
    pt3dadd(-50.2828019253217, -167.275679682395, -27.7909929146728, 0.8)
    pt3dadd(-50.4025083093875, -168.192482485533, -27.7866088417846, 0.8)
    pt3dadd(-50.3524938022913, -169.157838220027, -27.5305095349541, 0.8)
    pt3dadd(-50.3024792951951, -170.123193954521, -27.2744102281236, 0.8)
    pt3dadd(-50.2524647880988, -171.088549689015, -27.018310921293, 0.8)
    pt3dadd(-50.487404631864, -172.054006689293, -27.0093774510189, 0.8)
    pt3dadd(-50.7476101648904, -173.019472668376, -27.0223591233056, 0.8)
    pt3dadd(-51.0078156979167, -173.984938647459, -27.0353407955923, 0.8)
    pt3dadd(-51.2680212309431, -174.950404626542, -27.048322467879, 0.8)
    pt3dadd(-51.5301514339144, -175.912741170979, -27.0754533007993, 0.8)
    pt3dadd(-51.8324513419992, -176.809763417122, -27.3978906675807, 0.8)
    pt3dadd(-52.134751250084, -177.706785663265, -27.7203280343621, 0.8)
    pt3dadd(-52.4370511581688, -178.603807909408, -28.0427654011435, 0.8)
    pt3dadd(-52.7393510662537, -179.50083015555, -28.365202767925, 0.8)
    pt3dadd(-53.0416509743385, -180.397852401693, -28.6876401347064, 0.8)
    pt3dadd(-53.3439508824233, -181.294874647836, -29.0100775014878, 0.8)
    pt3dadd(-53.6462507905081, -182.191896893979, -29.3325148682692, 0.8)
    pt3dadd(-53.9551293897049, -183.121730728112, -29.4542666507131, 0.8)
    pt3dadd(-54.2680096843863, -184.071523241149, -29.4539451235863, 0.8)
    pt3dadd(-54.5808899790677, -185.021315754185, -29.4536235964595, 0.8)
    pt3dadd(-54.8937702737491, -185.971108267222, -29.4533020693327, 0.8)
    pt3dadd(-55.2066505684305, -186.920900780258, -29.4529805422058, 0.8)
    pt3dadd(-55.519530863112, -187.870693293295, -29.452659015079, 0.8)
    pt3dadd(-55.8324111577934, -188.820485806332, -29.4523374879522, 0.8)
    pt3dadd(-56.1452914524748, -189.770278319368, -29.4520159608253, 0.8)
    pt3dadd(-56.4798221873073, -190.679926682801, -29.6092115837684, 0.8)
    pt3dadd(-56.8432706140224, -191.53595599087, -29.9767970362083, 0.8)
    pt3dadd(-57.2067190407374, -192.391985298939, -30.3443824886482, 0.8)
    pt3dadd(-57.5701674674524, -193.248014607008, -30.7119679410881, 0.8)
    pt3dadd(-57.9336158941675, -194.104043915077, -31.079553393528, 0.8)
    pt3dadd(-58.2355308391668, -194.945865598765, -31.3351612299001, 0.8)
    pt3dadd(-58.7971057491005, -195.70053489004, -31.6744367541287, 0.8)
    pt3dadd(-59.3586806590343, -196.455204181314, -32.0137122783572, 0.8)
    pt3dadd(-59.9202555689681, -197.209873472588, -32.3529878025857, 0.8)
    pt3dadd(-60.4818304789018, -197.964542763862, -32.6922633268142, 0.8)
    pt3dadd(-61.0434053888356, -198.719212055137, -33.0315388510427, 0.8)
    pt3dadd(-61.6049802987694, -199.473881346411, -33.3708143752712, 0.8)
    pt3dadd(-62.0275062767981, -200.344313129897, -33.4956389949841, 0.8)
    pt3dadd(-62.3648290828131, -201.285679162223, -33.489057374781, 0.8)
    pt3dadd(-62.702151888828, -202.227045194549, -33.482475754578, 0.8)
    pt3dadd(-63.039474694843, -203.168411226876, -33.475894134375, 0.8)
    pt3dadd(-63.2576769323124, -204.133360152867, -33.5591880213436, 0.8)
    pt3dadd(-63.4011218529555, -205.113109158096, -33.6988857002568, 0.8)
    pt3dadd(-63.5445667735987, -206.092858163326, -33.83858337917, 0.8)
    pt3dadd(-63.6880116942418, -207.072607168555, -33.9782810580832, 0.8)
    pt3dadd(-63.8314566148849, -208.052356173784, -34.1179787369964, 0.8)
    pt3dadd(-63.9571654551967, -209.035430253607, -34.2424935662696, 0.8)
    pt3dadd(-64.0108417198923, -210.032008652457, -34.3053454043783, 0.8)
    pt3dadd(-64.0645179845879, -211.028587051308, -34.3681972424871, 0.8)
    pt3dadd(-64.1181942492835, -212.025165450158, -34.4310490805959, 0.8)
    pt3dadd(-64.1718705139791, -213.021743849008, -34.4939009187047, 0.8)
    pt3dadd(-64.2255467786747, -214.018322247858, -34.5567527568134, 0.8)
    pt3dadd(-64.2792230433704, -215.014900646708, -34.6196045949222, 0.8)
    pt3dadd(-64.332899308066, -216.011479045558, -34.682456433031, 0.8)
    pt3dadd(-64.4537299911082, -216.975749341382, -34.8960616643244, 0.8)
    pt3dadd(-64.5982012789267, -217.928646102693, -35.1627371399099, 0.8)
    pt3dadd(-64.7426725667451, -218.881542864004, -35.4294126154953, 0.8)
    pt3dadd(-64.8871438545635, -219.834439625315, -35.6960880910808, 0.8)
    pt3dadd(-65.0316151423819, -220.787336386626, -35.9627635666662, 0.8)
    pt3dadd(-65.1760864302003, -221.740233147938, -36.2294390422517, 0.8)
    pt3dadd(-65.3205577180188, -222.693129909249, -36.4961145178371, 0.8)
    pt3dadd(-65.5575249188873, -223.659544622429, -36.5417321149022, 0.8)
    pt3dadd(-65.807029700043, -224.627791658803, -36.5573858918515, 0.8)
    pt3dadd(-66.0565344811988, -225.596038695177, -36.5730396688009, 0.8)
    pt3dadd(-66.3060392623545, -226.564285731552, -36.5886934457503, 0.8)
    pt3dadd(-66.5555440435102, -227.532532767926, -36.6043472226996, 0.8)
    pt3dadd(-66.805048824666, -228.5007798043, -36.620000999649, 0.8)
    pt3dadd(-67.0545536058217, -229.469026840675, -36.6356547765984, 0.8)
    pt3dadd(-66.8349484489063, -230.393067132513, -36.7897264322337, 0.8)
    pt3dadd(-66.4710475582421, -231.303509663738, -36.9863746946471, 0.8)
    pt3dadd(-66.1071466675779, -232.213952194964, -37.1830229570606, 0.8)
    pt3dadd(-65.9961936470089, -233.158178958878, -37.3631597000371, 0.8)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(-65.9961936470089, -233.158178958878, -37.3631597000371, 0.8)
    pt3dadd(-66.1315332642188, -234.135301069099, -37.5272193530015, 0.8)
    pt3dadd(-66.2668728814287, -235.11242317932, -37.691279005966, 0.8)
    pt3dadd(-66.4022124986387, -236.089545289541, -37.8553386589305, 0.8)
    pt3dadd(-66.5375521158486, -237.066667399762, -38.0193983118949, 0.8)
    pt3dadd(-66.6728917330585, -238.043789509983, -38.1834579648594, 0.8)
    pt3dadd(-66.8373323688378, -238.964343130058, -38.5140705732356, 0.8)
    pt3dadd(-67.0166368353729, -239.856003450002, -38.9297528823588, 0.8)
    pt3dadd(-67.195941301908, -240.747663769945, -39.345435191482, 0.8)
    pt3dadd(-67.3752457684431, -241.639324089889, -39.7611175006053, 0.8)
    pt3dadd(-67.5545502349782, -242.530984409833, -40.1767998097285, 0.8)
    pt3dadd(-67.7338547015133, -243.422644729777, -40.5924821188518, 0.8)
    pt3dadd(-67.9131591680484, -244.314305049721, -41.008164427975, 0.8)
    pt3dadd(-68.0924636345834, -245.205965369665, -41.4238467370982, 0.8)
    pt3dadd(-68.2537861964738, -246.11935797011, -41.7626381793567, 0.8)
    pt3dadd(-68.3483335992981, -247.113452616084, -41.8158981405484, 0.8)
    pt3dadd(-68.4428810021225, -248.107547262057, -41.8691581017402, 0.8)
    pt3dadd(-68.5374284049469, -249.101641908031, -41.922418062932, 0.8)
    pt3dadd(-68.6319758077712, -250.095736554004, -41.9756780241237, 0.8)
    pt3dadd(-68.7265232105956, -251.089831199977, -42.0289379853155, 0.8)
    pt3dadd(-68.8210706134199, -252.083925845951, -42.0821979465072, 0.8)
    pt3dadd(-68.9156180162443, -253.078020491924, -42.135457907699, 0.8)
    pt3dadd(-68.7846204284794, -254.061099409461, -42.2081738091259, 0.8)
    pt3dadd(-68.6048530494645, -255.04179638637, -42.2850966855841, 0.8)
    pt3dadd(-68.4250856704497, -256.02249336328, -42.3620195620424, 0.8)
    pt3dadd(-68.2453182914348, -257.00319034019, -42.4389424385006, 0.8)
    pt3dadd(-68.2861591232195, -257.957439346304, -42.699646592426, 0.8)
    pt3dadd(-68.3794679930707, -258.905398137139, -43.004060103438, 0.8)
    pt3dadd(-68.4727768629218, -259.853356927973, -43.30847361445, 0.8)
    pt3dadd(-68.566085732773, -260.801315718808, -43.612887125462, 0.8)
    pt3dadd(-68.6593946026242, -261.749274509642, -43.9173006364739, 0.8)
    pt3dadd(-68.7527034724754, -262.697233300477, -44.2217141474859, 0.8)
    pt3dadd(-68.9321486788611, -263.636246949027, -44.3671757720274, 0.8)
    pt3dadd(-69.2821928151685, -264.557544128975, -44.1978222693892, 0.8)
    pt3dadd(-69.632236951476, -265.478841308924, -44.0284687667511, 0.8)
    pt3dadd(-69.9822810877834, -266.400138488872, -43.8591152641129, 0.8)
    pt3dadd(-70.3323252240908, -267.321435668821, -43.6897617614748, 0.8)
    pt3dadd(-70.7594139461026, -268.172926869642, -43.856546575296, 0.8)
    pt3dadd(-71.2267936143595, -268.98791259864, -44.1991170165638, 0.8)
    pt3dadd(-71.6941732826164, -269.802898327637, -44.5416874578315, 0.8)
    pt3dadd(-72.1615529508734, -270.617884056635, -44.8842578990992, 0.8)
    pt3dadd(-72.6289326191302, -271.432869785633, -45.2268283403669, 0.8)
    pt3dadd(-73.0963122873871, -272.24785551463, -45.5693987816346, 0.8)
    pt3dadd(-73.563691955644, -273.062841243628, -45.9119692229023, 0.8)
    pt3dadd(-73.6814901234354, -274.008619505635, -46.0650967646153, 0.8)
    pt3dadd(-73.6632507166561, -275.005294908763, -46.1445037217416, 0.8)
    pt3dadd(-73.6450113098769, -276.00197031189, -46.2239106788679, 0.8)
  }
}
proc shape3d_8() {
  adendOML[0] {
    pt3dadd(-73.6267719030976, -276.998645715018, -46.3033176359942, 0.8)
    pt3dadd(-73.6085324963183, -277.995321118146, -46.3827245931205, 0.8)
    pt3dadd(-73.4859989043155, -278.978620216705, -46.4851202579854, 0.8)
    pt3dadd(-73.2948324657855, -279.9531167741, -46.6026440955926, 0.8)
    pt3dadd(-73.1036660272555, -280.927613331494, -46.7201679331998, 0.8)
    pt3dadd(-72.9124995887255, -281.902109888889, -46.8376917708069, 0.8)
    pt3dadd(-72.7213331501954, -282.876606446283, -46.9552156084141, 0.8)
    pt3dadd(-72.590890665247, -283.859071500905, -47.0593681721286, 0.8)
    pt3dadd(-72.5670622691846, -284.855526983054, -47.1400445604751, 0.8)
    pt3dadd(-72.5432338731222, -285.851982465203, -47.2207209488217, 0.8)
    pt3dadd(-72.5194054770599, -286.848437947352, -47.3013973371682, 0.8)
    pt3dadd(-72.4955770809975, -287.844893429501, -47.3820737255147, 0.8)
    pt3dadd(-72.4717486849351, -288.84134891165, -47.4627501138612, 0.8)
    pt3dadd(-72.3116106795513, -289.806018339597, -47.5441327443369, 0.789536701759808)
    pt3dadd(-71.8930245127722, -290.710420209687, -47.6268544365318, 0.759234595340424)
    pt3dadd(-71.4744383459932, -291.614822079776, -47.7095761287267, 0.728932488921039)
    pt3dadd(-71.055852179214, -292.519223949866, -47.7922978209216, 0.698630382501655)
    pt3dadd(-70.6372660124349, -293.423625819956, -47.8750195131165, 0.668328276082271)
    pt3dadd(-70.2066046803608, -294.306516078239, -47.9163452806196, 0.64)
    pt3dadd(-69.6026414135741, -294.880673176045, -47.3635596084, 0.64)
    pt3dadd(-69.04918276504, -295.514986155269, -46.9224351789769, 0.64)
    pt3dadd(-68.7578708580906, -296.461541239203, -47.0608940029897, 0.64)
    pt3dadd(-68.4665589511413, -297.408096323138, -47.1993528270026, 0.64)
    pt3dadd(-68.3581090163408, -298.397480698644, -47.1966465256843, 0.64)
    pt3dadd(-68.2806322233944, -299.394119495108, -47.1700296900961, 0.64)
    pt3dadd(-68.2031554304479, -300.390758291572, -47.1434128545079, 0.64)
    pt3dadd(-68.3435132116973, -301.373783774106, -47.2400372443776, 0.64)
    pt3dadd(-68.499904849574, -302.355807239744, -47.3457328854335, 0.64)
    pt3dadd(-68.6562964874508, -303.337830705382, -47.4514285264894, 0.64)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(-24.7438782378475, -85.7091549754076, -17.5370230278912, 0.8)
    pt3dadd(-24.9208043168857, -86.6019155094641, -17.960350326904, 0.8)
    pt3dadd(-25.0965865590333, -87.4948318634346, -18.3748391544466, 0.8)
    pt3dadd(-25.2723688011808, -88.3877482174051, -18.7893279819892, 0.8)
    pt3dadd(-25.4450439955347, -89.2767646525884, -19.2125144545993, 0.8)
    pt3dadd(-25.594650535538, -90.1368256662689, -19.7002776511762, 0.8)
    pt3dadd(-25.7442570755414, -90.9968866799495, -20.1880408477532, 0.8)
    pt3dadd(-25.8938636155447, -91.85694769363, -20.6758040443302, 0.8)
    pt3dadd(-26.0434701555481, -92.7170087073106, -21.1635672409072, 0.8)
    pt3dadd(-26.1930766955515, -93.5770697209912, -21.6513304374842, 0.8)
    pt3dadd(-26.0738565021891, -94.4997004667366, -21.3982398140658, 0.8)
    pt3dadd(-25.9243217417774, -95.4293869629062, -21.0616059264835, 0.8)
    pt3dadd(-25.7747869813658, -96.3590734590757, -20.7249720389013, 0.8)
    pt3dadd(-25.6457315073433, -97.2952446632961, -20.427081287704, 0.8)
    pt3dadd(-25.7064881487388, -98.2915193364382, -20.4882810114118, 0.8)
    pt3dadd(-25.7672447901344, -99.2877940095804, -20.5494807351196, 0.8)
    pt3dadd(-25.8280014315299, -100.284068682722, -20.6106804588274, 0.8)
    pt3dadd(-25.8887580729254, -101.280343355865, -20.6718801825352, 0.8)
    pt3dadd(-25.9495147143209, -102.276618029007, -20.733079906243, 0.8)
    pt3dadd(-26.0102713557164, -103.272892702149, -20.7942796299508, 0.8)
    pt3dadd(-26.1321973950309, -104.262216078772, -20.8408797212537, 0.8)
    pt3dadd(-26.3183269395028, -105.244243362624, -20.8721560132992, 0.8)
    pt3dadd(-26.5044564839747, -106.226270646476, -20.9034323053447, 0.8)
    pt3dadd(-26.6905860284466, -107.208297930329, -20.9347085973903, 0.8)
    pt3dadd(-26.7582849473877, -108.122103714907, -21.245075446037, 0.8)
    pt3dadd(-26.7474381878824, -108.990663568198, -21.7405410140227, 0.8)
    pt3dadd(-26.7365914283771, -109.859223421489, -22.2360065820085, 0.8)
    pt3dadd(-26.8393891829859, -110.751754973105, -22.567169025391, 0.8)
    pt3dadd(-27.17559821529, -111.693521323058, -22.5608738929119, 0.8)
    pt3dadd(-27.5118072475941, -112.635287673012, -22.5545787604327, 0.8)
    pt3dadd(-27.8480162798982, -113.577054022965, -22.5482836279535, 0.8)
    pt3dadd(-28.1380885964878, -114.530616265547, -22.5338537618305, 0.8)
    pt3dadd(-28.3022611367182, -115.516367627377, -22.4972254983868, 0.8)
    pt3dadd(-28.4664336769486, -116.502118989208, -22.4605972349432, 0.8)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(-28.4664336769486, -116.502118989208, -22.4605972349432, 0.8)
    pt3dadd(-28.6306062171789, -117.487870351039, -22.4239689714995, 0.8)
    pt3dadd(-28.7947787574093, -118.47362171287, -22.3873407080559, 0.8)
    pt3dadd(-28.9717425205366, -119.438664305035, -22.4431712436899, 0.8)
    pt3dadd(-29.1966460206523, -120.326093288313, -22.8455245899845, 0.8)
    pt3dadd(-29.4215495207679, -121.213522271591, -23.247877936279, 0.8)
    pt3dadd(-29.6464530208836, -122.100951254869, -23.6502312825736, 0.8)
    pt3dadd(-29.8713565209993, -122.988380238146, -24.0525846288682, 0.8)
    pt3dadd(-30.096260021115, -123.875809221424, -24.4549379751627, 0.8)
    pt3dadd(-30.2285386670167, -124.836334914795, -24.6198736407941, 0.8)
    pt3dadd(-30.3177410995991, -125.83085504199, -24.6743955870752, 0.8)
    pt3dadd(-30.4069435321815, -126.825375169185, -24.7289175333564, 0.8)
    pt3dadd(-30.4961459647639, -127.819895296379, -24.7834394796376, 0.8)
    pt3dadd(-30.5853483973463, -128.814415423574, -24.8379614259187, 0.8)
    pt3dadd(-30.6745508299286, -129.808935550768, -24.8924833721999, 0.8)
    pt3dadd(-30.763753262511, -130.803455677963, -24.947005318481, 0.8)
    pt3dadd(-30.8529556950934, -131.797975805157, -25.0015272647622, 0.8)
    pt3dadd(-30.8933249043764, -132.794512550391, -25.0674379136508, 0.8)
    pt3dadd(-30.9154551663212, -133.791802491661, -25.1376021819625, 0.8)
    pt3dadd(-30.937585428266, -134.789092432932, -25.2077664502741, 0.8)
    pt3dadd(-30.9597156902108, -135.786382374202, -25.2779307185857, 0.8)
    pt3dadd(-30.9818459521555, -136.783672315472, -25.3480949868973, 0.8)
    pt3dadd(-31.3046769825061, -137.616944551112, -25.7785473979727, 0.8)
    pt3dadd(-31.6471566951215, -138.439499382202, -26.2325421075213, 0.8)
    pt3dadd(-31.9896364077368, -139.262054213291, -26.6865368170698, 0.8)
    pt3dadd(-32.3321161203522, -140.084609044381, -27.1405315266184, 0.8)
    pt3dadd(-32.6745958329676, -140.90716387547, -27.594526236167, 0.8)
    pt3dadd(-33.0170755455829, -141.72971870656, -28.0485209457156, 0.8)
    pt3dadd(-33.3011809144598, -142.596990533797, -28.4436775498533, 0.8)
    pt3dadd(-33.5130515313797, -143.519596963842, -28.7660255247581, 0.8)
    pt3dadd(-33.7249221482996, -144.442203393887, -29.0883734996629, 0.8)
    pt3dadd(-33.9367927652195, -145.364809823933, -29.4107214745677, 0.8)
    pt3dadd(-34.1486633821394, -146.287416253978, -29.7330694494726, 0.8)
    pt3dadd(-34.3605339990594, -147.210022684023, -30.0554174243774, 0.8)
    pt3dadd(-34.5724046159793, -148.132629114068, -30.3777653992822, 0.8)
    pt3dadd(-34.7842752328992, -149.055235544113, -30.700113374187, 0.8)
    pt3dadd(-34.9961458498191, -149.977841974158, -31.0224613490918, 0.8)
    pt3dadd(-35.208016466739, -150.900448404204, -31.3448093239966, 0.8)
    pt3dadd(-35.4198870836589, -151.823054834249, -31.6671572989014, 0.8)
    pt3dadd(-35.6290498873311, -152.789660763321, -31.7526165111649, 0.8)
    pt3dadd(-35.8375308066474, -153.767346692124, -31.7784221481742, 0.8)
    pt3dadd(-36.0460117259637, -154.745032620927, -31.8042277851836, 0.8)
    pt3dadd(-36.25449264528, -155.72271854973, -31.830033422193, 0.8)
    pt3dadd(-36.4629735645962, -156.700404478533, -31.8558390592024, 0.8)
    pt3dadd(-36.6714544839125, -157.678090407336, -31.8816446962117, 0.8)
    pt3dadd(-36.8799354032288, -158.65577633614, -31.9074503332211, 0.8)
    pt3dadd(-37.0884163225451, -159.633462264943, -31.9332559702305, 0.8)
    pt3dadd(-37.3363098750848, -160.582481091787, -32.1059832281945, 0.8)
    pt3dadd(-37.597489514018, -161.521836174748, -32.3282380916351, 0.8)
    pt3dadd(-37.8586691529513, -162.461191257708, -32.5504929550758, 0.8)
    pt3dadd(-38.1198487918845, -163.400546340669, -32.7727478185164, 0.8)
    pt3dadd(-38.3810284308178, -164.339901423629, -32.995002681957, 0.8)
    pt3dadd(-38.642208069751, -165.27925650659, -33.2172575453977, 0.8)
    pt3dadd(-38.9033877086843, -166.21861158955, -33.4395124088383, 0.8)
    pt3dadd(-39.2352168425884, -167.097867486077, -33.768104036249, 0.8)
    pt3dadd(-39.5983634500812, -167.950482644626, -34.1438325724021, 0.8)
    pt3dadd(-39.961510057574, -168.803097803174, -34.5195611085553, 0.8)
    pt3dadd(-40.3246566650668, -169.655712961723, -34.8952896447084, 0.8)
    pt3dadd(-40.6878032725596, -170.508328120271, -35.2710181808616, 0.8)
    pt3dadd(-41.0509498800524, -171.36094327882, -35.6467467170148, 0.8)
    pt3dadd(-41.4140964875452, -172.213558437368, -36.0224752531679, 0.8)
    pt3dadd(-41.777243095038, -173.066173595917, -36.3982037893211, 0.8)
    pt3dadd(-42.0752297020232, -173.970282976613, -36.6314787002177, 0.8)
    pt3dadd(-42.2788618515992, -174.948958185312, -36.6584746913419, 0.8)
    pt3dadd(-42.4824940011752, -175.927633394011, -36.6854706824661, 0.8)
    pt3dadd(-42.6861261507511, -176.906308602711, -36.7124666735903, 0.8)
    pt3dadd(-42.8897583003271, -177.88498381141, -36.7394626647145, 0.8)
    pt3dadd(-43.0933904499031, -178.863659020109, -36.7664586558387, 0.8)
    pt3dadd(-43.297022599479, -179.842334228808, -36.7934546469629, 0.8)
    pt3dadd(-43.500654749055, -180.821009437507, -36.8204506380871, 0.8)
    pt3dadd(-43.6523751064271, -181.806535342412, -36.8786291191029, 0.8)
    pt3dadd(-43.7714609678411, -182.79636795699, -36.9564105611634, 0.8)
    pt3dadd(-43.8905468292551, -183.786200571568, -37.0341920032238, 0.8)
    pt3dadd(-44.0096326906691, -184.776033186146, -37.1119734452843, 0.8)
    pt3dadd(-44.1287185520831, -185.765865800724, -37.1897548873447, 0.8)
    pt3dadd(-44.2478044134972, -186.755698415302, -37.2675363294051, 0.8)
    pt3dadd(-44.3864348962853, -187.713652067112, -37.481976340962, 0.8)
    pt3dadd(-44.5417358689866, -188.6444147124, -37.812978615901, 0.8)
    pt3dadd(-44.6970368416878, -189.575177357688, -38.14398089084, 0.8)
    pt3dadd(-44.852337814389, -190.505940002975, -38.4749831657791, 0.8)
    pt3dadd(-45.0076387870902, -191.436702648263, -38.8059854407182, 0.8)
    pt3dadd(-45.1629397597915, -192.367465293551, -39.1369877156572, 0.8)
    pt3dadd(-45.0185064939856, -193.33589578085, -39.2037753129683, 0.8)
    pt3dadd(-44.8055530604679, -194.312937252549, -39.2101626233012, 0.8)
    pt3dadd(-44.5925996269501, -195.289978724248, -39.2165499336341, 0.8)
    pt3dadd(-44.3796461934323, -196.267020195947, -39.222937243967, 0.8)
    pt3dadd(-44.1666927599145, -197.244061667646, -39.2293245542998, 0.8)
    pt3dadd(-43.9537393263968, -198.221103139345, -39.2357118646327, 0.8)
    pt3dadd(-43.740785892879, -199.198144611044, -39.2420991749656, 0.8)
    pt3dadd(-43.8670999710338, -200.180176435497, -39.3337555588604, 0.8)
    pt3dadd(-44.0246175844898, -201.162667238906, -39.4332544164829, 0.8)
    pt3dadd(-44.1821351979459, -202.145158042314, -39.5327532741054, 0.8)
    pt3dadd(-44.388703451288, -203.063832048637, -39.8422908655842, 0.8)
    pt3dadd(-44.6122900509693, -203.960364522096, -40.2247023670817, 0.8)
    pt3dadd(-44.8358766506506, -204.856896995554, -40.6071138685792, 0.8)
    pt3dadd(-45.0594632503318, -205.753429469012, -40.9895253700766, 0.8)
    pt3dadd(-45.2830498500132, -206.649961942471, -41.3719368715741, 0.8)
    pt3dadd(-45.5335827528502, -207.546450084794, -41.7030450019156, 0.8)
    pt3dadd(-45.9759710599642, -208.442622593172, -41.6688774594864, 0.8)
    pt3dadd(-46.4183593670782, -209.33879510155, -41.6347099170573, 0.8)
    pt3dadd(-46.8768491305701, -210.214477828339, -41.7269689740374, 0.8)
    pt3dadd(-47.3493071099427, -211.072385411942, -41.9289046957982, 0.8)
    pt3dadd(-47.8217650893154, -211.930292995545, -42.130840417559, 0.8)
    pt3dadd(-48.294223068688, -212.788200579149, -42.3327761393197, 0.8)
    pt3dadd(-48.7666810480607, -213.646108162752, -42.5347118610805, 0.8)
    pt3dadd(-49.2391390274333, -214.504015746355, -42.7366475828413, 0.8)
    pt3dadd(-49.711597006806, -215.361923329958, -42.938583304602, 0.8)
    pt3dadd(-50.1840549861786, -216.219830913562, -43.1405190263628, 0.8)
    pt3dadd(-50.5718407321348, -217.119978597553, -43.1069353440364, 0.8)
    pt3dadd(-50.9093821211945, -218.045191484075, -42.9335948545779, 0.8)
    pt3dadd(-51.2469235102541, -218.970404370597, -42.7602543651195, 0.8)
    pt3dadd(-51.5844648993137, -219.895617257119, -42.5869138756611, 0.8)
    pt3dadd(-51.9220062883734, -220.820830143641, -42.4135733862027, 0.8)
    pt3dadd(-52.259547677433, -221.746043030162, -42.2402328967443, 0.8)
    pt3dadd(-52.5970890664926, -222.671255916684, -42.0668924072859, 0.8)
    pt3dadd(-52.9523515720454, -223.567833738825, -42.1835196064618, 0.8)
    pt3dadd(-53.3193293092154, -224.445481240649, -42.491841196631, 0.8)
    pt3dadd(-53.6863070463855, -225.323128742472, -42.8001627868003, 0.8)
    pt3dadd(-54.0532847835555, -226.200776244296, -43.1084843769695, 0.8)
    pt3dadd(-54.4202625207256, -227.078423746119, -43.4168059671387, 0.8)
    pt3dadd(-54.7872402578957, -227.956071247943, -43.725127557308, 0.8)
    pt3dadd(-55.1542179950657, -228.833718749766, -44.0334491474773, 0.8)
    pt3dadd(-55.5211957322358, -229.71136625159, -44.3417707376465, 0.8)
    pt3dadd(-55.8881734694058, -230.589013753413, -44.6500923278158, 0.8)
    pt3dadd(-56.248638929243, -231.469299405199, -44.9584187756318, 0.8)
    pt3dadd(-56.5963587061981, -232.35474838482, -45.2667547307249, 0.8)
    pt3dadd(-56.9440784831531, -233.240197364441, -45.575090685818, 0.8)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(-56.9440784831531, -233.240197364441, -45.575090685818, 0.8)
    pt3dadd(-57.2917982601081, -234.125646344061, -45.8834266409111, 0.8)
    pt3dadd(-57.6395180370632, -235.011095323682, -46.1917625960042, 0.8)
    pt3dadd(-57.9872378140182, -235.896544303302, -46.5000985510973, 0.8)
    pt3dadd(-58.293847034342, -236.823745260674, -46.458821071051, 0.8)
    pt3dadd(-58.5858701775692, -237.76575987216, -46.2935003053666, 0.8)
    pt3dadd(-58.8778933207964, -238.707774483646, -46.1281795396822, 0.8)
    pt3dadd(-59.1699164640236, -239.649789095132, -45.9628587739978, 0.8)
    pt3dadd(-59.4619396072508, -240.591803706618, -45.7975380083134, 0.8)
    pt3dadd(-59.753962750478, -241.533818318104, -45.6322172426289, 0.8)
    pt3dadd(-59.9822647737661, -242.480370933189, -45.8039535936459, 0.8)
    pt3dadd(-60.1984261345857, -243.427788165376, -46.0399087890641, 0.8)
    pt3dadd(-60.4145874954053, -244.375205397562, -46.2758639844824, 0.8)
    pt3dadd(-60.6307488562249, -245.322622629749, -46.5118191799007, 0.8)
    pt3dadd(-60.8469102170445, -246.270039861935, -46.7477743753189, 0.8)
    pt3dadd(-61.0630715778642, -247.217457094121, -46.9837295707372, 0.8)
    pt3dadd(-61.2792329386838, -248.164874326308, -47.2196847661555, 0.8)
    pt3dadd(-61.4953942995034, -249.112291558494, -47.4556399615737, 0.8)
    pt3dadd(-61.7031653912077, -250.063914389547, -47.6729172882089, 0.8)
    pt3dadd(-61.8334422925925, -251.054380966191, -47.7176821127589, 0.8)
    pt3dadd(-61.9637191939773, -252.044847542835, -47.762446937309, 0.8)
    pt3dadd(-62.0939960953621, -253.035314119479, -47.807211761859, 0.8)
    pt3dadd(-62.2242729967469, -254.025780696122, -47.8519765864091, 0.8)
    pt3dadd(-62.3545498981316, -255.016247272766, -47.8967414109591, 0.8)
    pt3dadd(-62.4848267995164, -256.00671384941, -47.9415062355092, 0.8)
    pt3dadd(-62.6151037009012, -256.997180426054, -47.9862710600592, 0.8)
    pt3dadd(-62.745380602286, -257.987647002698, -48.0310358846093, 0.8)
    pt3dadd(-62.8756575036707, -258.978113579342, -48.0758007091593, 0.8)
    pt3dadd(-63.0059344050555, -259.968580155986, -48.1205655337094, 0.8)
    pt3dadd(-63.101451938916, -260.943270592185, -48.2802349274135, 0.8)
    pt3dadd(-63.1605492639913, -261.901431086393, -48.5602991584527, 0.8)
    pt3dadd(-63.2196465890666, -262.859591580601, -48.8403633894919, 0.8)
    pt3dadd(-63.2787439141419, -263.817752074809, -49.1204276205311, 0.8)
    pt3dadd(-63.3378412392172, -264.775912569018, -49.4004918515703, 0.8)
    pt3dadd(-63.5550931299395, -265.702025491905, -49.6550952164825, 0.8)
    pt3dadd(-63.9518654135527, -266.591761389753, -49.8807980898294, 0.8)
    pt3dadd(-64.3486376971659, -267.481497287601, -50.1065009631764, 0.8)
    pt3dadd(-64.7454099807791, -268.371233185449, -50.3322038365234, 0.8)
    pt3dadd(-65.0895926481018, -269.290312227933, -50.4785049840297, 0.8)
    pt3dadd(-65.3520790898603, -270.254974872887, -50.5014581826055, 0.8)
    pt3dadd(-65.6145655316187, -271.21963751784, -50.5244113811813, 0.8)
    pt3dadd(-65.8770519733772, -272.184300162793, -50.547364579757, 0.8)
    pt3dadd(-66.1395384151356, -273.148962807746, -50.5703177783328, 0.8)
    pt3dadd(-66.5299942501776, -273.992062535977, -50.817518975485, 0.8)
    pt3dadd(-67.0392709341418, -274.722289892215, -51.2729366600038, 0.8)
    pt3dadd(-67.5485476181059, -275.452517248453, -51.7283543445225, 0.8)
    pt3dadd(-68.0578243020701, -276.182744604691, -52.1837720290412, 0.8)
    pt3dadd(-68.5671009860342, -276.912971960928, -52.63918971356, 0.8)
    pt3dadd(-68.8138502738717, -277.753731078994, -53.0947629436498, 0.8)
    pt3dadd(-68.980707120879, -278.628127266454, -53.5503835094292, 0.8)
    pt3dadd(-69.3144097700105, -279.466010044304, -53.3137965014331, 0.8)
    pt3dadd(-69.6909861469472, -280.294510110901, -52.8993355599911, 0.8)
    pt3dadd(-70.0675625238838, -281.123010177499, -52.4848746185491, 0.8)
    pt3dadd(-70.4375735834531, -281.961078397054, -52.0945519163033, 0.8)
    pt3dadd(-70.7308695984397, -282.910949479992, -51.9862820063998, 0.8)
    pt3dadd(-71.0241656134263, -283.860820562931, -51.8780120964962, 0.8)
    pt3dadd(-71.3174616284129, -284.810691645869, -51.7697421865926, 0.8)
    pt3dadd(-71.6107576433995, -285.760562728807, -51.661472276689, 0.8)
    pt3dadd(-71.7085596635067, -286.745682079763, -51.5259101291135, 0.8)
  }
}
proc shape3d_9() {
  adendOML[1] {
    pt3dadd(-71.7985938298268, -287.7322020026, -51.3892635384488, 0.8)
    pt3dadd(-71.8886279961468, -288.718721925438, -51.252616947784, 0.8)
    pt3dadd(-71.9904831125661, -289.622224799239, -50.8694593929967, 0.8)
    pt3dadd(-72.0969582825832, -290.493281616433, -50.3899564635071, 0.8)
    pt3dadd(-72.2034334526002, -291.364338433627, -49.9104535340175, 0.8)
    pt3dadd(-72.3099086226172, -292.235395250822, -49.4309506045279, 0.8)
    pt3dadd(-72.3689428307507, -293.112137776882, -48.9610075791057, 0.8)
    pt3dadd(-72.2882922501249, -294.005621258658, -48.5192126587642, 0.8)
    pt3dadd(-72.2076416694991, -294.899104740433, -48.0774177384227, 0.8)
    pt3dadd(-72.3004094454615, -295.792865463826, -47.7695176672764, 0.8)
    pt3dadd(-72.7464438517012, -296.687190949879, -47.7343717792354, 0.8)
    pt3dadd(-73.1452834384741, -297.596225905175, -47.6947503257075, 0.8)
    pt3dadd(-73.2948582601338, -298.582950582291, -47.6314906679772, 0.8)
    pt3dadd(-73.4444330817934, -299.569675259407, -47.5682310102468, 0.8)
    pt3dadd(-73.5940079034531, -300.556399936523, -47.5049713525164, 0.8)
    pt3dadd(-73.7435827251127, -301.543124613639, -47.4417116947861, 0.8)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(-10.0080259513055, -8.59370224401754, -3.8163694809065, 1.01904609261592)
    pt3dadd(-10.7203446102578, -9.25477079230167, -4.31800932215681, 1.01904609261592)
    pt3dadd(-11.338491141346, -9.92284636015111, -4.73221929517336, 1.07733553248913)
    pt3dadd(-11.8309744078452, -10.711853166815, -4.96201023903873, 1.07153202392877)
    pt3dadd(-12.1632731650529, -11.6550125113021, -4.9567199777065, 0.984028445523233)
    pt3dadd(-12.3914730534786, -12.5231265493736, -4.61950401529069, 0.95)
    pt3dadd(-12.5534305130509, -13.3434861456421, -4.07106995900042, 0.95)
    pt3dadd(-12.7153879726233, -14.1638457419107, -3.52263590271015, 0.95)
    pt3dadd(-12.9230395120685, -14.9660009508557, -3.11103550461777, 0.945325011356086)
    pt3dadd(-13.4419336789731, -15.6441580104207, -3.63146979068513, 0.908806603325704)
    pt3dadd(-13.9608278458777, -16.3223150699858, -4.15190407675248, 0.872288195295321)
    pt3dadd(-14.4797220127823, -17.0004721295509, -4.67233836281984, 0.835769787264938)
    pt3dadd(-14.9899544587708, -17.6851253838119, -5.18160422279925, 0.8)
    pt3dadd(-15.0863219295653, -18.6801727829209, -5.1572324337982, 0.8)
    pt3dadd(-15.1826894003599, -19.6752201820299, -5.13286064479714, 0.8)
    pt3dadd(-15.2790568711545, -20.6702675811388, -5.10848885579609, 0.8)
    pt3dadd(-15.3754243419491, -21.6653149802478, -5.08411706679504, 0.8)
    pt3dadd(-15.4856536052693, -22.6390076497235, -5.18602656957005, 0.8)
    pt3dadd(-15.6204292280891, -23.5748855221863, -5.51155404817667, 0.8)
    pt3dadd(-15.7552048509089, -24.5107633946491, -5.83708152678329, 0.8)
    pt3dadd(-15.8899804737287, -25.446641267112, -6.16260900538992, 0.8)
    pt3dadd(-16.0247560965485, -26.3825191395748, -6.48813648399653, 0.8)
    pt3dadd(-16.0999789235724, -27.3400134266116, -6.72639747371346, 0.8)
    pt3dadd(-16.068799049877, -28.3361296601046, -6.80873983734308, 0.8)
    pt3dadd(-16.0376191761816, -29.3322458935976, -6.89108220097269, 0.8)
    pt3dadd(-16.0064393024863, -30.3283621270906, -6.9734245646023, 0.8)
    pt3dadd(-15.9752594287909, -31.3244783605836, -7.05576692823192, 0.8)
    pt3dadd(-15.9440795550955, -32.3205945940765, -7.13810929186153, 0.8)
    pt3dadd(-15.9586149589505, -33.2864670344733, -7.30087420953619, 0.8)
    pt3dadd(-16.1680638294667, -34.123390841651, -7.80653191156265, 0.8)
    pt3dadd(-16.3775126999829, -34.9603146488287, -8.31218961358912, 0.8)
    pt3dadd(-16.5869615704992, -35.7972384560064, -8.81784731561558, 0.8)
    pt3dadd(-16.8174265800483, -36.6756754977044, -9.15897125645358, 0.8)
    pt3dadd(-17.0902084756807, -37.637701195406, -9.16879950029619, 0.8)
    pt3dadd(-17.3629903713131, -38.5997268931075, -9.1786277441388, 0.8)
    pt3dadd(-17.6357722669455, -39.5617525908091, -9.18845598798141, 0.8)
    pt3dadd(-17.9085541625779, -40.5237782885107, -9.19828423182402, 0.8)
    pt3dadd(-18.172187666536, -41.4874967014971, -9.20405621828126, 0.8)
    pt3dadd(-18.2838790043453, -42.4793287803847, -9.14245936488857, 0.8)
    pt3dadd(-18.3955703421547, -43.4711608592723, -9.08086251149588, 0.8)
    pt3dadd(-18.507261679964, -44.4629929381599, -9.01926565810319, 0.8)
    pt3dadd(-18.6189530177734, -45.4548250170475, -8.95766880471049, 0.8)
    pt3dadd(-18.7421281258323, -46.4456125678804, -8.93889478869888, 0.8)
    pt3dadd(-18.8817424632898, -47.4349048574942, -8.98142245601182, 0.8)
    pt3dadd(-19.0213568007474, -48.4241971471079, -9.02395012332475, 0.8)
    pt3dadd(-19.160971138205, -49.4134894367216, -9.06647779063769, 0.8)
    pt3dadd(-19.3005854756626, -50.4027817263354, -9.10900545795063, 0.8)
    pt3dadd(-19.4401998131202, -51.3920740159491, -9.15153312526356, 0.8)
    pt3dadd(-19.596074117151, -52.3789973263955, -9.19014060818576, 0.8)
    pt3dadd(-19.763061820831, -53.3643014814685, -9.22606871439234, 0.8)
    pt3dadd(-19.9300495245109, -54.3496056365415, -9.26199682059892, 0.8)
    pt3dadd(-20.0970372281909, -55.3349097916145, -9.29792492680551, 0.8)
    pt3dadd(-20.2640249318709, -56.3202139466874, -9.33385303301209, 0.8)
    pt3dadd(-20.4849248698894, -57.255520255367, -9.54182050648222, 0.8)
    pt3dadd(-20.7568892478887, -58.1434697431385, -9.91273974872473, 0.8)
    pt3dadd(-21.0288536258879, -59.03141923091, -10.2836589909672, 0.8)
    pt3dadd(-21.236483328661, -59.9658668832589, -10.5066984757176, 0.8)
    pt3dadd(-21.3665744697273, -60.9563558662068, -10.5515077345255, 0.8)
    pt3dadd(-21.4966656107936, -61.9468448491547, -10.5963169933334, 0.8)
    pt3dadd(-21.6267567518599, -62.9373338321026, -10.6411262521413, 0.8)
    pt3dadd(-21.7655866291621, -63.9267041929979, -10.6838403151013, 0.8)
    pt3dadd(-21.9095381588295, -64.9154189449899, -10.7253264127719, 0.8)
    pt3dadd(-22.053489688497, -65.9041336969818, -10.7668125104424, 0.8)
    pt3dadd(-22.2047791918669, -66.89139191149, -10.8065002283638, 0.8)
    pt3dadd(-22.4623660555201, -67.8575508285687, -10.8201367463384, 0.8)
    pt3dadd(-22.7199529191733, -68.8237097456475, -10.833773264313, 0.8)
    pt3dadd(-22.9775397828264, -69.7898686627263, -10.8474097822876, 0.8)
    pt3dadd(-23.2737805851143, -70.7444834707781, -10.8512808979934, 0.8)
    pt3dadd(-23.591044423393, -71.6928196891666, -10.8498408239315, 0.8)
    pt3dadd(-23.9083082616716, -72.6411559075551, -10.8484007498695, 0.8)
    pt3dadd(-24.2209286213505, -73.5651534300858, -10.8556445698334, 0.8)
    pt3dadd(-24.5449130600083, -73.9928261248888, -10.9994077505051, 0.8)
    pt3dadd(-24.9977223496005, -74.8836668134195, -10.9624399954063, 0.8)
    pt3dadd(-25.4505316391927, -75.7745075019503, -10.9254722403075, 0.8)
    pt3dadd(-25.903340928785, -76.665348190481, -10.8885044852087, 0.8)
    pt3dadd(-26.3561502183772, -77.5561888790118, -10.8515367301099, 0.8)
    pt3dadd(-26.8089595079695, -78.4470295675425, -10.8145689750111, 0.8)
    pt3dadd(-27.2617687975617, -79.3378702560732, -10.7776012199123, 0.8)
    pt3dadd(-27.6757917204492, -80.2477009938941, -10.7509912164835, 0.8)
    pt3dadd(-28.0881439346524, -81.1583497212035, -10.7248273694528, 0.8)
    pt3dadd(-28.5004961488555, -82.068998448513, -10.6986635224221, 0.8)
    pt3dadd(-28.9128483630587, -82.9796471758224, -10.6724996753914, 0.8)
    pt3dadd(-29.3252005772619, -83.8902959031319, -10.6463358283607, 0.8)
    pt3dadd(-29.7375527914651, -84.8009446304413, -10.62017198133, 0.8)
    pt3dadd(-30.1499050056682, -85.7115933577507, -10.5940081342993, 0.8)
    pt3dadd(-30.5622572198714, -86.6222420850602, -10.5678442872686, 0.8)
    pt3dadd(-30.9834320815734, -87.5286777385511, -10.539332426147, 0.8)
    pt3dadd(-31.4197225414995, -88.4278952490596, -10.5067977773498, 0.8)
    pt3dadd(-31.8560130014257, -89.327112759568, -10.4742631285526, 0.8)
    pt3dadd(-32.2923034613518, -90.2263302700765, -10.4417284797554, 0.8)
    pt3dadd(-32.728593921278, -91.125547780585, -10.4091938309582, 0.8)
    pt3dadd(-33.1648843812042, -92.0247652910934, -10.376659182161, 0.8)
    pt3dadd(-33.5561665484232, -92.7771420977895, -10.8880325420838, 0.8)
    pt3dadd(-33.9447257774035, -93.5206352489772, -11.432311569524, 0.8)
    pt3dadd(-34.3332850063837, -94.2641284001649, -11.9765905969642, 0.8)
    pt3dadd(-34.7186905898621, -95.0828452721176, -12.2871208956784, 0.8)
    pt3dadd(-35.0996650510454, -96.0072574436855, -12.2692156734415, 0.8)
    pt3dadd(-35.4806395122287, -96.9316696152533, -12.2513104512047, 0.8)
    pt3dadd(-35.861613973412, -97.8560817868212, -12.2334052289679, 0.8)
    pt3dadd(-36.2425884345953, -98.780493958389, -12.2155000067311, 0.8)
    pt3dadd(-36.6235628957786, -99.7049061299568, -12.1975947844943, 0.8)
    pt3dadd(-37.0045373569619, -100.629318301525, -12.1796895622575, 0.8)
    pt3dadd(-37.3855118181452, -101.553730473092, -12.1617843400206, 0.8)
    pt3dadd(-37.7664862793285, -102.47814264466, -12.1438791177838, 0.8)
    pt3dadd(-38.1169194043855, -103.414632761993, -12.1339128714681, 0.8)
    pt3dadd(-38.4651172205246, -104.35200685964, -12.1245276758177, 0.8)
    pt3dadd(-38.8133150366637, -105.289380957286, -12.1151424801673, 0.8)
    pt3dadd(-39.1615128528029, -106.226755054933, -12.1057572845169, 0.8)
    pt3dadd(-39.509710668942, -107.164129152579, -12.0963720888665, 0.8)
    pt3dadd(-39.8819959309241, -108.092063508407, -12.0807320390821, 0.8)
    pt3dadd(-40.257576003631, -109.018706645448, -12.0642364166223, 0.8)
    pt3dadd(-40.633156076338, -109.945349782488, -12.0477407941624, 0.8)
    pt3dadd(-41.008736149045, -110.871992919529, -12.0312451717026, 0.8)
    pt3dadd(-41.384316221752, -111.79863605657, -12.0147495492428, 0.8)
    pt3dadd(-41.8138425755299, -112.640374726181, -12.2995953494273, 0.8)
    pt3dadd(-42.2571840061609, -113.460370252066, -12.6616115278135, 0.8)
    pt3dadd(-42.7005254367918, -114.280365777952, -13.0236277061996, 0.8)
    pt3dadd(-43.1438668674227, -115.100361303838, -13.3856438845858, 0.8)
    pt3dadd(-43.5872082980536, -115.920356829724, -13.7476600629719, 0.8)
    pt3dadd(-44.0305497286845, -116.74035235561, -14.1096762413581, 0.8)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(-44.0305497286845, -116.74035235561, -14.1096762413581, 0.8)
    pt3dadd(-44.4738911593154, -117.560347881496, -14.4716924197442, 0.8)
    pt3dadd(-44.9686225344801, -118.371135026878, -14.7776986855204, 0.8)
    pt3dadd(-45.5003897164152, -119.175285858404, -15.0433396168042, 0.8)
    pt3dadd(-46.0321568983502, -119.979436689929, -15.308980548088, 0.8)
    pt3dadd(-46.5639240802853, -120.783587521455, -15.5746214793719, 0.8)
    pt3dadd(-47.0956912622204, -121.587738352981, -15.8402624106557, 0.8)
    pt3dadd(-47.6274584441554, -122.391889184507, -16.1059033419395, 0.8)
    pt3dadd(-48.1592256260905, -123.196040016032, -16.3715442732233, 0.8)
    pt3dadd(-48.6909928080256, -124.000190847558, -16.6371852045071, 0.8)
    pt3dadd(-49.1633448244823, -124.83971193767, -16.8472724469242, 0.8)
    pt3dadd(-49.4246077050481, -125.804895849069, -16.8599895384039, 0.8)
    pt3dadd(-49.685870585614, -126.770079760467, -16.8727066298837, 0.8)
    pt3dadd(-49.9471334661798, -127.735263671866, -16.8854237213634, 0.8)
    pt3dadd(-50.2083963467457, -128.700447583264, -16.8981408128432, 0.8)
    pt3dadd(-50.4696592273116, -129.665631494663, -16.9108579043229, 0.8)
    pt3dadd(-50.7309221078774, -130.630815406062, -16.9235749958027, 0.8)
    pt3dadd(-50.9921849884433, -131.59599931746, -16.9362920872824, 0.8)
    pt3dadd(-51.2534478690091, -132.561183228859, -16.9490091787621, 0.8)
    pt3dadd(-51.514710749575, -133.526367140257, -16.9617262702419, 0.8)
    pt3dadd(-51.7414618070792, -134.479019502779, -17.1479956409019, 0.8)
    pt3dadd(-51.9612584547064, -135.429146657428, -17.3692371914539, 0.8)
    pt3dadd(-52.1810551023336, -136.379273812077, -17.5904787420059, 0.8)
    pt3dadd(-52.4008517499608, -137.329400966725, -17.8117202925578, 0.8)
    pt3dadd(-52.620648397588, -138.279528121374, -18.0329618431098, 0.8)
    pt3dadd(-52.8557726450996, -139.226219062258, -18.2356349069654, 0.8)
    pt3dadd(-53.283070631988, -140.129827586227, -18.2055007766165, 0.8)
    pt3dadd(-53.7103686188763, -141.033436110196, -18.1753666462675, 0.8)
    pt3dadd(-54.1376666057647, -141.937044634165, -18.1452325159186, 0.8)
    pt3dadd(-54.564964592653, -142.840653158134, -18.1150983855697, 0.8)
    pt3dadd(-54.9922625795413, -143.744261682103, -18.0849642552207, 0.8)
    pt3dadd(-55.4195605664297, -144.647870206072, -18.0548301248718, 0.8)
    pt3dadd(-55.846858553318, -145.551478730041, -18.0246959945228, 0.8)
    pt3dadd(-56.2741565402063, -146.45508725401, -17.9945618641739, 0.8)
    pt3dadd(-56.6553291661499, -147.37834592065, -17.9765239996444, 0.8)
    pt3dadd(-57.0022458804004, -148.316198154437, -17.9674696661971, 0.8)
    pt3dadd(-57.3491625946509, -149.254050388224, -17.9584153327499, 0.8)
    pt3dadd(-57.6960793089014, -150.191902622011, -17.9493609993026, 0.8)
    pt3dadd(-58.0429960231518, -151.129754855798, -17.9403066658553, 0.8)
    pt3dadd(-58.3899127374023, -152.067607089586, -17.9312523324081, 0.8)
    pt3dadd(-58.7368294516528, -153.005459323373, -17.9221979989608, 0.8)
    pt3dadd(-59.0837461659033, -153.94331155716, -17.9131436655135, 0.8)
    pt3dadd(-59.4306628801538, -154.881163790947, -17.9040893320663, 0.8)
    pt3dadd(-59.7775795944042, -155.819016024734, -17.895034998619, 0.8)
    pt3dadd(-60.1244963086547, -156.756868258521, -17.8859806651718, 0.8)
    pt3dadd(-60.4714130229052, -157.694720492308, -17.8769263317245, 0.8)
    pt3dadd(-60.8534078208274, -158.617018449861, -17.858626789372, 0.8)
    pt3dadd(-61.3054645747241, -159.508249630022, -17.8218616596358, 0.8)
    pt3dadd(-61.757521328621, -160.399480810184, -17.7850965298995, 0.8)
    pt3dadd(-62.2095780825178, -161.290711990345, -17.7483314001633, 0.8)
    pt3dadd(-62.6616348364146, -162.181943170506, -17.7115662704271, 0.8)
    pt3dadd(-63.1136915903114, -163.073174350668, -17.6748011406908, 0.8)
    pt3dadd(-63.5657483442082, -163.964405530829, -17.6380360109546, 0.8)
    pt3dadd(-64.017805098105, -164.85563671099, -17.6012708812183, 0.8)
    pt3dadd(-64.4698618520018, -165.746867891152, -17.5645057514821, 0.8)
    pt3dadd(-64.9219186058987, -166.638099071313, -17.5277406217458, 0.8)
    pt3dadd(-65.3739753597955, -167.529330251474, -17.4909754920096, 0.8)
    pt3dadd(-65.8260321136923, -168.420561431636, -17.4542103622734, 0.8)
    pt3dadd(-66.2384635325435, -169.32511198721, -17.3884595459967, 0.8)
    pt3dadd(-66.5381100567175, -170.267573246919, -17.2402072795783, 0.8)
    pt3dadd(-66.8556408705495, -171.204578986114, -17.1084221639585, 0.8)
    pt3dadd(-67.283428806272, -172.107951296093, -17.0781574714314, 0.8)
    pt3dadd(-67.7112167419945, -173.011323606072, -17.0478927789043, 0.8)
    pt3dadd(-68.139004677717, -173.914695916051, -17.0176280863771, 0.8)
    pt3dadd(-68.5667926134395, -174.818068226029, -16.98736339385, 0.8)
    pt3dadd(-68.9945805491619, -175.721440536008, -16.9570987013229, 0.8)
    pt3dadd(-69.4223684848844, -176.624812845987, -16.9268340087957, 0.8)
    pt3dadd(-69.8501564206069, -177.528185155966, -16.8965693162686, 0.8)
    pt3dadd(-70.2699797581637, -178.43531364805, -16.8684207231645, 0.8)
    pt3dadd(-70.6826251155977, -179.345827345506, -16.8421792343837, 0.8)
    pt3dadd(-71.0952704730316, -180.256341042962, -16.815937745603, 0.8)
    pt3dadd(-71.5079158304656, -181.166854740418, -16.7896962568222, 0.8)
    pt3dadd(-71.9205611878996, -182.077368437874, -16.7634547680415, 0.8)
    pt3dadd(-72.3142931392929, -182.963972069889, -16.5789152767636, 0.8)
    pt3dadd(-72.6899365109022, -183.827708370369, -16.2429812644955, 0.8)
    pt3dadd(-73.0655798825115, -184.691444670849, -15.9070472522274, 0.8)
    pt3dadd(-73.4412232541209, -185.55518097133, -15.5711132399593, 0.8)
    pt3dadd(-73.8168666257302, -186.41891727181, -15.2351792276912, 0.8)
    pt3dadd(-74.2080777445282, -187.293256961501, -14.9844489739181, 0.8)
    pt3dadd(-74.6393984135847, -188.194915772405, -14.9532420970433, 0.8)
    pt3dadd(-75.0707190826412, -189.096574583308, -14.9220352201684, 0.8)
    pt3dadd(-75.5020397516977, -189.998233394212, -14.8908283432936, 0.8)
    pt3dadd(-75.9333604207542, -190.899892205116, -14.8596214664187, 0.8)
    pt3dadd(-76.3646810898108, -191.80155101602, -14.8284145895439, 0.8)
    pt3dadd(-76.7960017588673, -192.703209826923, -14.797207712669, 0.8)
    pt3dadd(-77.2273224279238, -193.604868637827, -14.7660008357941, 0.8)
    pt3dadd(-77.6091580824409, -194.525724097629, -14.7476290601008, 0.8)
    pt3dadd(-77.8932650189509, -195.48449131525, -14.7546055235789, 0.8)
    pt3dadd(-78.1773719554609, -196.443258532871, -14.7615819870571, 0.8)
    pt3dadd(-78.4614788919708, -197.402025750492, -14.7685584505353, 0.8)
    pt3dadd(-78.7455858284808, -198.360792968112, -14.7755349140135, 0.8)
    pt3dadd(-79.0296927649908, -199.319560185733, -14.7825113774917, 0.8)
    pt3dadd(-79.3137997015008, -200.278327403354, -14.7894878409699, 0.8)
    pt3dadd(-79.6272673127608, -201.226934006935, -14.7889416824245, 0.8)
    pt3dadd(-79.9948452245509, -202.156815091299, -14.7745316960913, 0.8)
    pt3dadd(-80.3624231363409, -203.086696175663, -14.7601217097581, 0.8)
    pt3dadd(-80.7300010481309, -204.016577260027, -14.7457117234249, 0.8)
    pt3dadd(-81.097578959921, -204.946458344391, -14.7313017370916, 0.8)
    pt3dadd(-81.465156871711, -205.876339428755, -14.7168917507584, 0.8)
    pt3dadd(-81.8327347835011, -206.806220513119, -14.7024817644252, 0.8)
    pt3dadd(-82.2003126952911, -207.736101597483, -14.688071778092, 0.8)
    pt3dadd(-82.5356972451151, -208.677705005686, -14.6819540633269, 0.8)
    pt3dadd(-82.8487281126847, -209.627447890053, -14.681594144346, 0.8)
    pt3dadd(-83.1617589802542, -210.577190774421, -14.681234225365, 0.8)
    pt3dadd(-83.4747898478238, -211.526933658789, -14.6808743063841, 0.8)
    pt3dadd(-83.7878207153933, -212.476676543156, -14.6805143874032, 0.8)
    pt3dadd(-84.1008515829629, -213.426419427524, -14.6801544684222, 0.8)
    pt3dadd(-84.4138824505324, -214.376162311892, -14.6797945494413, 0.8)
    pt3dadd(-84.726913318102, -215.325905196259, -14.6794346304603, 0.8)
    pt3dadd(-85.0399441856716, -216.275648080627, -14.6790747114794, 0.8)
    pt3dadd(-85.3529750532411, -217.225390964995, -14.6787147924985, 0.8)
    pt3dadd(-85.621432597809, -218.188146779991, -14.6895931650418, 0.8)
    pt3dadd(-85.8720514042338, -219.156110514126, -14.7049692264757, 0.8)
  }
}
proc shape3d_10() {
  adendMML[2] {
    pt3dadd(-86.1226702106585, -220.124074248261, -14.7203452879095, 0.8)
    pt3dadd(-86.3732890170833, -221.092037982396, -14.7357213493434, 0.8)
    pt3dadd(-86.623907823508, -222.060001716532, -14.7510974107772, 0.8)
    pt3dadd(-86.8852708070617, -223.025093530246, -14.763784518777, 0.8)
    pt3dadd(-87.1569925271207, -223.987416451886, -14.7738791378625, 0.8)
    pt3dadd(-87.4287142471796, -224.949739373526, -14.783973756948, 0.8)
    pt3dadd(-87.7004359672386, -225.912062295166, -14.7940683760336, 0.8)
    pt3dadd(-87.9721576872975, -226.874385216806, -14.8041629951191, 0.8)
    pt3dadd(-88.2438794073565, -227.836708138446, -14.8142576142046, 0.8)
    pt3dadd(-88.5156011274155, -228.799031060086, -14.8243522332901, 0.8)
    pt3dadd(-89.000050529028, -229.65931762141, -14.8734410731042, 0.8)
    pt3dadd(-89.5693383477987, -230.478910826615, -14.9380812879943, 0.8)
    pt3dadd(-90.1386261665694, -231.29850403182, -15.0027215028845, 0.8)
    pt3dadd(-90.7079139853401, -232.118097237025, -15.0673617177746, 0.8)
    pt3dadd(-91.2772018041108, -232.93769044223, -15.1320019326648, 0.8)
    pt3dadd(-91.8464896228815, -233.757283647435, -15.196642147555, 0.8)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(-91.8464896228815, -233.757283647435, -15.196642147555, 0.8)
    pt3dadd(-92.4172241300234, -234.575778812591, -15.2473636317586, 0.8)
    pt3dadd(-93.000845573994, -235.384492760841, -15.1740986330016, 0.8)
    pt3dadd(-93.5844670179645, -236.193206709092, -15.1008336342447, 0.8)
    pt3dadd(-94.1680884619351, -237.001920657342, -15.0275686354878, 0.8)
    pt3dadd(-94.7517099059056, -237.810634605593, -14.9543036367308, 0.8)
    pt3dadd(-95.3353313498762, -238.619348553843, -14.8810386379739, 0.8)
    pt3dadd(-95.7853778540214, -239.238553143231, -15.0445749310159, 0.8)
    pt3dadd(-95.7643954584423, -239.189485787975, -16.0431499826389, 0.8)
    pt3dadd(-96.2923472380201, -239.963180115398, -16.038075160962, 0.8)
    pt3dadd(-96.8542036580168, -240.787691900111, -15.9710104148081, 0.8)
    pt3dadd(-97.4160600780136, -241.612203684825, -15.9039456686542, 0.8)
    pt3dadd(-97.9779164980103, -242.436715469539, -15.8368809225003, 0.8)
    pt3dadd(-98.5397729180071, -243.261227254252, -15.7698161763464, 0.8)
    pt3dadd(-99.1016293380038, -244.085739038966, -15.7027514301925, 0.8)
    pt3dadd(-99.7155023545775, -244.845772845892, -15.7821461203405, 0.8)
    pt3dadd(-100.40140148153, -245.51652557234, -16.0643396135483, 0.8)
    pt3dadd(-101.087300608482, -246.187278298788, -16.3465331067561, 0.8)
    pt3dadd(-101.773199735434, -246.858031025236, -16.6287265999639, 0.8)
    pt3dadd(-102.459098862386, -247.528783751684, -16.9109200931718, 0.8)
    pt3dadd(-103.144997989338, -248.199536478132, -17.1931135863796, 0.8)
    pt3dadd(-103.712534186839, -248.991136078412, -17.2755334661343, 0.8)
    pt3dadd(-104.203238827955, -249.861179609099, -17.2282766158744, 0.8)
    pt3dadd(-104.693943469071, -250.731223139786, -17.1810197656145, 0.8)
    pt3dadd(-105.184648110187, -251.601266670474, -17.1337629153545, 0.8)
    pt3dadd(-105.675352751303, -252.471310201161, -17.0865060650946, 0.8)
    pt3dadd(-106.257252582801, -253.2801834541, -17.0136492307215, 0.8)
    pt3dadd(-106.852124938113, -254.080355229675, -16.9371507963674, 0.8)
    pt3dadd(-107.446997293425, -254.88052700525, -16.8606523620132, 0.8)
    pt3dadd(-108.041869648737, -255.680698780824, -16.784153927659, 0.8)
    pt3dadd(-108.638045245741, -256.472701965136, -16.7325751240836, 0.8)
    pt3dadd(-109.261905709358, -257.09117911736, -17.2103660136083, 0.8)
    pt3dadd(-109.885766172974, -257.709656269584, -17.688156903133, 0.8)
    pt3dadd(-110.509626636591, -258.328133421809, -18.1659477926577, 0.8)
    pt3dadd(-111.133487100207, -258.946610574033, -18.6437386821823, 0.8)
    pt3dadd(-111.622494701681, -259.689226880568, -18.9674089255027, 0.8)
    pt3dadd(-111.865470511905, -260.658328394863, -19.0098943422519, 0.8)
    pt3dadd(-112.108446322129, -261.627429909159, -19.0523797590012, 0.8)
    pt3dadd(-112.351422132353, -262.596531423454, -19.0948651757504, 0.8)
    pt3dadd(-112.594397942577, -263.56563293775, -19.1373505924996, 0.8)
    pt3dadd(-112.837373752801, -264.534734452045, -19.1798360092488, 0.8)
    pt3dadd(-113.080349563025, -265.50383596634, -19.2223214259981, 0.8)
    pt3dadd(-113.32332537325, -266.472937480636, -19.2648068427473, 0.8)
    pt3dadd(-113.566301183474, -267.442038994931, -19.3072922594965, 0.8)
    pt3dadd(-113.809276993698, -268.411140509227, -19.3497776762458, 0.8)
    pt3dadd(-114.043669178679, -269.383078480025, -19.3695063083489, 0.8)
    pt3dadd(-114.277951625049, -270.355052713917, -19.3889440030134, 0.8)
    pt3dadd(-114.51223407142, -271.327026947808, -19.4083816976779, 0.8)
    pt3dadd(-114.74651651779, -272.2990011817, -19.4278193923424, 0.8)
    pt3dadd(-114.98079896416, -273.270975415591, -19.4472570870068, 0.8)
    pt3dadd(-115.21508141053, -274.242949649483, -19.4666947816713, 0.8)
    pt3dadd(-115.449363856901, -275.214923883374, -19.4861324763358, 0.8)
    pt3dadd(-115.683646303271, -276.186898117266, -19.5055701710003, 0.8)
    pt3dadd(-115.864642396357, -277.169581589654, -19.5380771870299, 0.8)
    pt3dadd(-116.036824281994, -278.154036499642, -19.5727460269156, 0.8)
    pt3dadd(-116.209006167631, -279.13849140963, -19.6074148668013, 0.8)
    pt3dadd(-116.381188053268, -280.122946319618, -19.6420837066871, 0.8)
    pt3dadd(-116.553369938905, -281.107401229606, -19.6767525465728, 0.8)
    pt3dadd(-116.725551824542, -282.091856139594, -19.7114213864585, 0.8)
    pt3dadd(-117.017836826505, -283.047201282778, -19.7162578437628, 0.8)
    pt3dadd(-117.323956732856, -283.999193217046, -19.7176578526776, 0.8)
    pt3dadd(-117.630076639207, -284.951185151313, -19.7190578615923, 0.8)
    pt3dadd(-117.936196545558, -285.903177085581, -19.7204578705071, 0.8)
    pt3dadd(-118.452158285374, -286.725263728226, -19.8703429803972, 0.8)
    pt3dadd(-119.057896856504, -287.491772866327, -20.083754612349, 0.8)
    pt3dadd(-119.663635427634, -288.258282004429, -20.2971662443007, 0.8)
    pt3dadd(-120.269373998764, -289.02479114253, -20.5105778762524, 0.8)
    pt3dadd(-120.834050287224, -289.82122626021, -20.6766055453132, 0.8)
    pt3dadd(-121.234826700187, -290.737110760828, -20.6535003870346, 0.8)
    pt3dadd(-121.63560311315, -291.652995261447, -20.6303952287559, 0.8)
    pt3dadd(-121.979439417367, -292.509784317156, -20.2940118710845, 0.8)
    pt3dadd(-122.30452581758, -293.347113734597, -19.8544686091808, 0.8)
    pt3dadd(-122.629612217793, -294.184443152037, -19.4149253472772, 0.8)
    pt3dadd(-122.954698618006, -295.021772569478, -18.9753820853736, 0.8)
    pt3dadd(-123.27978501822, -295.859101986919, -18.53583882347, 0.8)
    pt3dadd(-123.774054395278, -296.706630951299, -18.420728501936, 0.8)
    pt3dadd(-124.298808270375, -297.555997736922, -18.3640766347832, 0.8)
  }
  GCL[4] {pt3dclear()
    pt3dadd(-7.70292660681164, 6.5999425947189, 2.50366561938097, 1.3142042998894)
    pt3dadd(-7.55970878514111, 5.6048887649691, 2.43732062047843, 1.3142042998894)
    pt3dadd(-7.43672502642358, 4.61781710647983, 2.33453669129229, 1.34895727607557)
    pt3dadd(-7.31374126770604, 3.63074544799056, 2.23175276210616, 1.38371025226173)
    pt3dadd(-7.1907575089885, 2.64367378950128, 2.12896883292002, 1.4184632284479)
    pt3dadd(-7.07163626317937, 1.76911472620017, 2.47042314453226, 1.38352371640488)
    pt3dadd(-6.95443440642385, 0.950466270506141, 3.03263167413921, 1.313952087344)
    pt3dadd(-6.83723254966834, 0.131817814812095, 3.59484020374616, 1.24438045828311)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-6.83723254966834, 0.131817814812095, 3.59484020374616, 1.17480882922223)
    pt3dadd(-6.72003069291283, -0.686830640881965, 4.15704873335311, 1.17480882922223)
    pt3dadd(-6.61567177355771, -1.51706528906837, 4.67130423724621, 1.11)
    pt3dadd(-6.68607051039002, -2.50495669294689, 4.53304870572811, 1.11)
    pt3dadd(-6.75646924722233, -3.49284809682541, 4.39479317421001, 1.11)
    pt3dadd(-6.82686798405464, -4.48073950070392, 4.25653764269192, 1.11)
    pt3dadd(-6.89726672088696, -5.46863090458244, 4.11828211117382, 1.11)
    pt3dadd(-7.00106363103945, -6.45817218411717, 4.03668828208298, 1.11)
    pt3dadd(-7.13091352278216, -7.44900048554035, 3.99929466346639, 1.11)
    pt3dadd(-7.26076341452487, -8.43982878696355, 3.9619010448498, 1.11)
    pt3dadd(-7.39061330626757, -9.43065708838674, 3.92450742623321, 1.11)
    pt3dadd(-7.52046319801028, -10.4214853898099, 3.88711380761662, 1.11)
    pt3dadd(-7.65031308975299, -11.4123136912331, 3.84972018900003, 1.11)
    pt3dadd(-7.7801629814957, -12.4031419926563, 3.81232657038345, 1.11)
    pt3dadd(-7.84141212248857, -13.3882435341948, 3.67324349060791, 1.08818514553342)
    pt3dadd(-7.87318494883639, -14.3708844062155, 3.49046656607932, 1.0569969021875)
    pt3dadd(-7.90495777518421, -15.3535252782363, 3.30768964155072, 1.02580865884158)
    pt3dadd(-7.93673060153203, -16.3361661502571, 3.12491271702213, 0.994620415495662)
    pt3dadd(-7.96850342787984, -17.3188070222778, 2.94213579249354, 0.963432172149742)
    pt3dadd(-8.00027625422766, -18.3014478942986, 2.75935886796494, 0.932243928803823)
    pt3dadd(-8.03204908057548, -19.2840887663194, 2.57658194343635, 0.901055685457903)
    pt3dadd(-8.0638219069233, -20.2667296383401, 2.39380501890775, 0.869867442111983)
    pt3dadd(-8.09559473327112, -21.2493705103609, 2.21102809437916, 0.838679198766064)
    pt3dadd(-8.12736755961893, -22.2320113823817, 2.02825116985056, 0.807490955420144)
    pt3dadd(-7.80036240506777, -23.1158090748251, 2.1981627694129, 0.8)
    pt3dadd(-7.35994385616271, -23.9683614258557, 2.47956282366409, 0.8)
    pt3dadd(-6.91952530725766, -24.8209137768863, 2.76096287791529, 0.8)
    pt3dadd(-6.4791067583526, -25.6734661279169, 3.04236293216648, 0.8)
    pt3dadd(-6.03868820944755, -26.5260184789475, 3.32376298641768, 0.8)
    pt3dadd(-5.98247842529753, -27.5089265172397, 3.27964906993269, 0.8)
    pt3dadd(-5.96714524591023, -28.5057033123005, 3.20090318471839, 0.8)
    pt3dadd(-5.95181206652293, -29.5024801073613, 3.1221572995041, 0.8)
    pt3dadd(-5.93647888713563, -30.4992569024221, 3.0434114142898, 0.8)
    pt3dadd(-5.96116065330519, -31.4410941755477, 3.29044819887625, 0.8)
    pt3dadd(-6.00437914307277, -32.3574809896372, 3.68840217750312, 0.8)
    pt3dadd(-6.04759763284035, -33.2738678037268, 4.08635615613, 0.8)
    pt3dadd(-6.55500395891994, -34.1073701669093, 4.18930153577637, 0.8)
    pt3dadd(-7.11824853798245, -34.9309021634083, 4.25675963313443, 0.8)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(-7.11824853798245, -34.9309021634083, 4.25675963313443, 0.8)
    pt3dadd(-7.63851354659891, -35.7565782913701, 4.12657156211933, 0.8)
    pt3dadd(-8.12659909660329, -36.5838597631953, 3.8484027963463, 0.8)
    pt3dadd(-8.61468464660767, -37.4111412350204, 3.57023403057328, 0.8)
    pt3dadd(-9.10277019661205, -38.2384227068456, 3.29206526480026, 0.8)
    pt3dadd(-9.59085574661643, -39.0657041786708, 3.01389649902724, 0.8)
    pt3dadd(-10.0789412966208, -39.892985650496, 2.73572773325422, 0.8)
    pt3dadd(-10.5613969492921, -40.7251348444766, 2.47167271583034, 0.8)
    pt3dadd(-10.9324168902537, -41.6536335899165, 2.48697902582146, 0.8)
    pt3dadd(-11.3034368312154, -42.5821323353563, 2.50228533581258, 0.8)
    pt3dadd(-11.674456772177, -43.5106310807961, 2.51759164580369, 0.8)
    pt3dadd(-12.0454767131386, -44.4391298262359, 2.53289795579481, 0.8)
    pt3dadd(-12.4164966541002, -45.3676285716757, 2.54820426578593, 0.8)
    pt3dadd(-12.7875165950618, -46.2961273171155, 2.56351057577705, 0.8)
    pt3dadd(-13.1585365360235, -47.2246260625553, 2.57881688576816, 0.8)
    pt3dadd(-13.5295564769851, -48.1531248079951, 2.59412319575928, 0.8)
    pt3dadd(-13.9005764179467, -49.0816235534349, 2.6094295057504, 0.8)
    pt3dadd(-14.2715963589083, -50.0101222988747, 2.62473581574152, 0.8)
    pt3dadd(-14.6426162998699, -50.9386210443145, 2.64004212573263, 0.8)
    pt3dadd(-15.0967740971135, -51.8228797591288, 2.67781685446164, 0.8)
    pt3dadd(-15.6431727564977, -52.6580544736027, 2.74052013449093, 0.8)
    pt3dadd(-16.1895714158819, -53.4932291880767, 2.80322341452023, 0.8)
    pt3dadd(-16.7359700752661, -54.3284039025507, 2.86592669454953, 0.8)
    pt3dadd(-17.2823687346504, -55.1635786170247, 2.92862997457883, 0.8)
    pt3dadd(-17.8287673940346, -55.9987533314987, 2.99133325460813, 0.8)
    pt3dadd(-18.3751660534188, -56.8339280459726, 3.05403653463742, 0.8)
    pt3dadd(-18.921564712803, -57.6691027604466, 3.11673981466672, 0.8)
    pt3dadd(-19.4692825554834, -58.5042084947947, 3.15037176354558, 0.8)
    pt3dadd(-20.0192940408808, -59.3391942945105, 3.13345785790859, 0.8)
    pt3dadd(-20.5693055262782, -60.1741800942263, 3.11654395227161, 0.8)
    pt3dadd(-21.1193170116756, -61.0091658939421, 3.09963004663463, 0.8)
    pt3dadd(-21.669328497073, -61.8441516936579, 3.08271614099764, 0.8)
    pt3dadd(-22.2193399824704, -62.6791374933737, 3.06580223536065, 0.8)
    pt3dadd(-22.7693514678678, -63.5141232930895, 3.04888832972367, 0.8)
    pt3dadd(-23.3193629532652, -64.3491090928053, 3.03197442408669, 0.8)
    pt3dadd(-23.8693744386626, -65.1840948925211, 3.0150605184497, 0.8)
    pt3dadd(-24.41938592406, -66.0190806922369, 2.99814661281271, 0.8)
    pt3dadd(-24.914554174818, -66.8482578995153, 2.78632886929373, 0.8)
    pt3dadd(-25.379771392641, -67.6742629134586, 2.46807007965606, 0.8)
    pt3dadd(-25.8449886104639, -68.5002679274018, 2.14981129001838, 0.8)
    pt3dadd(-26.3102058282869, -69.3262729413451, 1.8315525003807, 0.8)
    pt3dadd(-26.7754230461099, -70.1522779552884, 1.51329371074302, 0.8)
    pt3dadd(-27.2406402639329, -70.9782829692316, 1.19503492110535, 0.8)
    pt3dadd(-27.7059025673946, -71.8313744392253, 0.963053398156523, 0.8)
    pt3dadd(-28.1711756248022, -72.6909266424573, 0.751650957372121, 0.8)
    pt3dadd(-28.6364486822098, -73.5504788456892, 0.540248516587718, 0.8)
    pt3dadd(-29.1017217396174, -74.4100310489212, 0.328846075803311, 0.8)
    pt3dadd(-29.566994797025, -75.2695832521533, 0.11744363501891, 0.8)
    pt3dadd(-30.036817280742, -76.1264072560071, -0.0935908921898605, 0.8)
    pt3dadd(-30.6005846272609, -76.9268944167424, -0.297028067988617, 0.8)
    pt3dadd(-31.1643519737798, -77.7273815774778, -0.500465243787376, 0.8)
    pt3dadd(-31.7281193202987, -78.527868738213, -0.703902419586132, 0.8)
    pt3dadd(-32.2918866668176, -79.3283558989483, -0.907339595384894, 0.8)
    pt3dadd(-32.8556540133365, -80.1288430596837, -1.11077677118365, 0.8)
    pt3dadd(-33.4194213598554, -80.9293302204189, -1.31421394698241, 0.8)
    pt3dadd(-33.9831887063743, -81.7298173811542, -1.51765112278117, 0.8)
    pt3dadd(-34.5469560528932, -82.5303045418896, -1.72108829857993, 0.8)
    pt3dadd(-35.1107233994121, -83.3307917026249, -1.92452547437869, 0.8)
    pt3dadd(-35.6684205251444, -84.14775856281, -1.98329338301001, 0.8)
    pt3dadd(-36.2209484118229, -84.9787590980435, -1.91886478001196, 0.8)
    pt3dadd(-36.7734762985013, -85.809759633277, -1.85443617701392, 0.8)
    pt3dadd(-37.3260041851797, -86.6407601685105, -1.79000757401587, 0.8)
    pt3dadd(-37.8785320718582, -87.471760703744, -1.72557897101782, 0.8)
    pt3dadd(-38.4310599585366, -88.3027612389775, -1.66115036801977, 0.8)
    pt3dadd(-38.983587845215, -89.133761774211, -1.59672176502172, 0.8)
    pt3dadd(-39.5361157318935, -89.9647623094445, -1.53229316202368, 0.8)
    pt3dadd(-40.0903697264518, -90.7945562635656, -1.46737633177874, 0.8)
    pt3dadd(-40.6558174332636, -91.6165256072204, -1.39929337537235, 0.8)
    pt3dadd(-41.2212651400753, -92.4384949508752, -1.33121041896596, 0.8)
    pt3dadd(-41.7867128468871, -93.26046429453, -1.26312746255957, 0.8)
    pt3dadd(-42.3521605536989, -94.0824336381848, -1.19504450615317, 0.8)
    pt3dadd(-42.9176082605107, -94.9044029818396, -1.12696154974678, 0.8)
    pt3dadd(-43.4830559673224, -95.7263723254943, -1.0588785933404, 0.8)
    pt3dadd(-44.0688398542395, -96.5251399642894, -1.05240853325561, 0.8)
    pt3dadd(-44.7350841003193, -97.2321097582315, -1.28971069299898, 0.8)
    pt3dadd(-45.4013283463992, -97.9390795521737, -1.52701285274236, 0.8)
    pt3dadd(-46.0675725924791, -98.6460493461158, -1.76431501248574, 0.8)
    pt3dadd(-46.7338168385589, -99.353019140058, -2.00161717222911, 0.8)
    pt3dadd(-47.4000610846388, -100.059988934, -2.23891933197249, 0.8)
    pt3dadd(-48.0663053307186, -100.766958727942, -2.47622149171587, 0.8)
    pt3dadd(-48.7325495767985, -101.473928521884, -2.71352365145924, 0.8)
    pt3dadd(-49.3992884708096, -102.182388168093, -2.94483104247028, 0.8)
    pt3dadd(-50.0665563556426, -102.892441105459, -3.16972745419955, 0.8)
    pt3dadd(-50.7338242404757, -103.602494042824, -3.39462386592881, 0.8)
    pt3dadd(-51.4010921253087, -104.31254698019, -3.61952027765809, 0.8)
    pt3dadd(-52.0683600101418, -105.022599917556, -3.84441668938736, 0.8)
    pt3dadd(-52.7356278949748, -105.732652854922, -4.06931310111662, 0.8)
    pt3dadd(-53.4028957798079, -106.442705792287, -4.29420951284589, 0.8)
    pt3dadd(-54.0697942576811, -107.153222774333, -4.51856796628092, 0.8)
    pt3dadd(-54.6932977700549, -107.918252001884, -4.67973139591387, 0.8)
    pt3dadd(-55.3168012824287, -108.683281229434, -4.8408948255468, 0.8)
    pt3dadd(-55.9403047948025, -109.448310456985, -5.00205825517974, 0.8)
    pt3dadd(-56.5638083071764, -110.213339684535, -5.16322168481268, 0.8)
    pt3dadd(-57.1873118195502, -110.978368912086, -5.32438511444561, 0.8)
    pt3dadd(-57.810815331924, -111.743398139636, -5.48554854407855, 0.8)
    pt3dadd(-58.4343188442978, -112.508427367186, -5.64671197371149, 0.8)
    pt3dadd(-59.0578223566717, -113.273456594737, -5.80787540334443, 0.8)
    pt3dadd(-59.6813258690455, -114.038485822287, -5.96903883297736, 0.8)
    pt3dadd(-60.3048293814193, -114.803515049838, -6.1302022626103, 0.8)
    pt3dadd(-60.9283328937931, -115.568544277388, -6.29136569224325, 0.8)
    pt3dadd(-61.5497274159683, -116.336374269331, -6.43098147491412, 0.8)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(-61.5497274159683, -116.336374269331, -6.43098147491412, 0.8)
    pt3dadd(-62.1498220527543, -117.132490765688, -6.35297537817022, 0.8)
    pt3dadd(-62.7499166895403, -117.928607262045, -6.27496928142634, 0.8)
    pt3dadd(-63.3500113263263, -118.724723758402, -6.19696318468246, 0.8)
    pt3dadd(-63.9501059631123, -119.520840254759, -6.11895708793857, 0.8)
    pt3dadd(-64.5502005998983, -120.316956751115, -6.04095099119468, 0.8)
    pt3dadd(-65.1502952366843, -121.113073247472, -5.96294489445078, 0.8)
    pt3dadd(-65.7503898734703, -121.909189743829, -5.88493879770689, 0.8)
    pt3dadd(-66.3504845102563, -122.705306240186, -5.80693270096301, 0.8)
  }
}
proc shape3d_11() {
  adendMML[3] {
    pt3dadd(-66.9505791470423, -123.501422736543, -5.72892660421913, 0.8)
    pt3dadd(-67.5506737838283, -124.297539232899, -5.65092050747523, 0.8)
    pt3dadd(-68.1507684206143, -125.093655729256, -5.57291441073134, 0.8)
    pt3dadd(-68.7508630574003, -125.889772225613, -5.49490831398745, 0.8)
    pt3dadd(-69.3509576941863, -126.68588872197, -5.41690221724356, 0.8)
    pt3dadd(-69.9708931367164, -127.465519585315, -5.33308672881271, 0.8)
    pt3dadd(-70.6144022619936, -128.225563185547, -5.24236886160001, 0.8)
    pt3dadd(-71.2579113872709, -128.985606785779, -5.15165099438731, 0.8)
    pt3dadd(-71.9014205125482, -129.745650386011, -5.06093312717461, 0.8)
    pt3dadd(-72.5449296378254, -130.505693986242, -4.97021525996192, 0.8)
    pt3dadd(-73.1884387631027, -131.265737586474, -4.87949739274923, 0.8)
    pt3dadd(-73.8319478883799, -132.025781186706, -4.78877952553653, 0.8)
    pt3dadd(-74.4754570136572, -132.785824786938, -4.69806165832383, 0.8)
    pt3dadd(-75.1505990197846, -133.498693674233, -4.73534475117943, 0.8)
    pt3dadd(-75.881571358301, -134.128301731883, -4.99854265023159, 0.8)
    pt3dadd(-76.6125436968173, -134.757909789534, -5.26174054928377, 0.8)
    pt3dadd(-77.3435160353336, -135.387517847184, -5.52493844833594, 0.8)
    pt3dadd(-78.07448837385, -136.017125904835, -5.78813634738812, 0.8)
    pt3dadd(-78.8054607123663, -136.646733962485, -6.05133424644028, 0.8)
    pt3dadd(-79.5364330508826, -137.276342020136, -6.31453214549245, 0.8)
    pt3dadd(-80.267405389399, -137.905950077786, -6.57773004454463, 0.8)
    pt3dadd(-80.9720210165106, -138.592435394257, -6.59432455776433, 0.8)
    pt3dadd(-81.6636179166818, -139.307014864446, -6.4891109252917, 0.8)
    pt3dadd(-82.3552148168529, -140.021594334635, -6.38389729281907, 0.8)
    pt3dadd(-83.0468117170241, -140.736173804824, -6.27868366034645, 0.8)
    pt3dadd(-83.7384086171953, -141.450753275013, -6.17347002787383, 0.8)
    pt3dadd(-84.4300055173664, -142.165332745202, -6.06825639540119, 0.8)
    pt3dadd(-85.1216024175376, -142.879912215391, -5.96304276292857, 0.8)
    pt3dadd(-85.8131993177088, -143.59449168558, -5.85782913045595, 0.8)
    pt3dadd(-86.4467483279587, -144.358675614695, -5.76971551925791, 0.8)
    pt3dadd(-87.0151198083129, -145.178556591694, -5.70080221231479, 0.8)
    pt3dadd(-87.5834912886671, -145.998437568694, -5.63188890537171, 0.8)
    pt3dadd(-88.1518627690214, -146.818318545694, -5.5629755984286, 0.8)
    pt3dadd(-88.7202342493756, -147.638199522694, -5.49406229148548, 0.8)
    pt3dadd(-89.2886057297298, -148.458080499693, -5.42514898454237, 0.8)
    pt3dadd(-89.856977210084, -149.277961476693, -5.35623567759927, 0.8)
    pt3dadd(-90.4253486904383, -150.097842453693, -5.28732237065615, 0.8)
    pt3dadd(-90.9937201707925, -150.917723430693, -5.21840906371305, 0.8)
    pt3dadd(-91.5620916511467, -151.737604407693, -5.14949575676994, 0.8)
    pt3dadd(-92.1315555167954, -152.556694620034, -5.08027142007612, 0.8)
    pt3dadd(-92.7067916865081, -153.371606330457, -5.00940356227019, 0.8)
    pt3dadd(-93.2820278562208, -154.18651804088, -4.93853570446428, 0.8)
    pt3dadd(-93.8572640259334, -155.001429751303, -4.86766784665839, 0.8)
    pt3dadd(-94.4325001956461, -155.816341461726, -4.79679998885246, 0.8)
    pt3dadd(-95.0077363653587, -156.631253172149, -4.72593213104657, 0.8)
    pt3dadd(-95.5829725350714, -157.446164882571, -4.65506427324063, 0.8)
    pt3dadd(-96.158208704784, -158.261076592994, -4.58419641543473, 0.8)
    pt3dadd(-96.7334448744967, -159.075988303417, -4.51332855762882, 0.8)
    pt3dadd(-97.3086810442094, -159.89090001384, -4.44246069982291, 0.8)
    pt3dadd(-97.883917213922, -160.705811724263, -4.37159284201701, 0.8)
    pt3dadd(-98.4591533836347, -161.520723434686, -4.30072498421109, 0.8)
    pt3dadd(-99.035586217307, -162.334562347901, -4.22950081968631, 0.8)
    pt3dadd(-99.7526810584993, -163.022299185738, -4.11639453949627, 0.8)
    pt3dadd(-100.469775899692, -163.710036023574, -4.00328825930625, 0.8)
    pt3dadd(-101.186870740884, -164.39777286141, -3.89018197911621, 0.8)
    pt3dadd(-101.903965582076, -165.085509699246, -3.77707569892618, 0.8)
    pt3dadd(-102.621060423269, -165.773246537082, -3.66396941873615, 0.8)
    pt3dadd(-103.338155264461, -166.460983374918, -3.55086313854613, 0.8)
    pt3dadd(-104.055250105654, -167.148720212754, -3.4377568583561, 0.8)
    pt3dadd(-104.772344946846, -167.836457050591, -3.32465057816606, 0.8)
    pt3dadd(-105.489439788038, -168.524193888427, -3.21154429797604, 0.8)
    pt3dadd(-106.206534629231, -169.211930726263, -3.09843801778602, 0.8)
    pt3dadd(-106.923629470423, -169.899667564099, -2.98533173759598, 0.8)
    pt3dadd(-107.640724311615, -170.587404401935, -2.87222545740596, 0.8)
    pt3dadd(-108.357819152808, -171.275141239771, -2.75911917721591, 0.8)
    pt3dadd(-109.006818835516, -172.024285355463, -2.66335181589405, 0.8)
    pt3dadd(-109.590048269116, -172.832740177695, -2.58433138693309, 0.8)
    pt3dadd(-110.173277702716, -173.641194999927, -2.50531095797212, 0.8)
    pt3dadd(-110.756507136315, -174.449649822158, -2.42629052901118, 0.8)
    pt3dadd(-111.339736569915, -175.25810464439, -2.34727010005021, 0.8)
    pt3dadd(-111.922966003514, -176.066559466622, -2.26824967108925, 0.8)
    pt3dadd(-112.506195437114, -176.875014288854, -2.18922924212831, 0.8)
    pt3dadd(-113.089424870714, -177.683469111085, -2.11020881316734, 0.8)
    pt3dadd(-113.672654304313, -178.491923933317, -2.03118838420639, 0.8)
    pt3dadd(-114.322316823824, -179.219245737452, -2.17404748443646, 0.8)
    pt3dadd(-115.003452682031, -179.908129963034, -2.42202423013578, 0.8)
    pt3dadd(-115.684588540238, -180.597014188617, -2.67000097583513, 0.8)
    pt3dadd(-116.365724398445, -181.2858984142, -2.91797772153447, 0.8)
    pt3dadd(-117.046860256652, -181.974782639783, -3.16595446723382, 0.8)
    pt3dadd(-117.727996114859, -182.663666865365, -3.41393121293316, 0.8)
    pt3dadd(-118.409131973066, -183.352551090948, -3.66190795863251, 0.8)
    pt3dadd(-119.090267831273, -184.041435316531, -3.90988470433185, 0.8)
    pt3dadd(-119.771403689481, -184.730319542114, -4.15786145003121, 0.8)
    pt3dadd(-120.442475799551, -185.43191592771, -4.37007791465498, 0.8)
    pt3dadd(-121.032675625102, -186.235667236852, -4.29492474458198, 0.8)
    pt3dadd(-121.622875450652, -187.039418545995, -4.21977157450896, 0.8)
    pt3dadd(-122.213075276203, -187.843169855137, -4.14461840443595, 0.8)
    pt3dadd(-122.803275101754, -188.646921164279, -4.06946523436297, 0.8)
    pt3dadd(-123.393474927304, -189.450672473422, -3.99431206428996, 0.8)
    pt3dadd(-123.983674752855, -190.254423782564, -3.91915889421695, 0.8)
    pt3dadd(-124.573874578405, -191.058175091706, -3.84400572414393, 0.8)
    pt3dadd(-125.164074403956, -191.861926400849, -3.76885255407093, 0.8)
    pt3dadd(-125.752284881518, -192.660232751515, -3.87046696100069, 0.8)
    pt3dadd(-126.340088977581, -193.457426812926, -4.00819122575561, 0.8)
    pt3dadd(-126.927893073644, -194.254620874337, -4.14591549051055, 0.8)
    pt3dadd(-127.515697169707, -195.051814935749, -4.28363975526547, 0.8)
    pt3dadd(-128.103501265769, -195.84900899716, -4.4213640200204, 0.8)
    pt3dadd(-128.691305361832, -196.646203058571, -4.55908828477529, 0.8)
    pt3dadd(-129.289193212802, -197.435641968945, -4.6704348900004, 0.8)
    pt3dadd(-129.968426187492, -198.16252048129, -4.56899429464985, 0.8)
    pt3dadd(-130.647659162182, -198.889398993635, -4.46755369929932, 0.8)
    pt3dadd(-131.326892136872, -199.61627750598, -4.36611310394879, 0.8)
    pt3dadd(-132.006125111562, -200.343156018325, -4.26467250859827, 0.8)
    pt3dadd(-132.685358086252, -201.070034530669, -4.16323191324774, 0.8)
    pt3dadd(-133.364591060942, -201.796913043014, -4.06179131789722, 0.8)
    pt3dadd(-134.043824035632, -202.523791555359, -3.9603507225467, 0.8)
    pt3dadd(-134.723057010323, -203.250670067704, -3.85891012719618, 0.8)
    pt3dadd(-135.402289985013, -203.977548580049, -3.75746953184564, 0.8)
    pt3dadd(-136.081522959703, -204.704427092393, -3.65602893649511, 0.8)
    pt3dadd(-136.760755934393, -205.431305604738, -3.55458834114457, 0.8)
    pt3dadd(-137.141973058442, -206.250208229786, -3.18970680966584, 0.8)
    pt3dadd(-137.43212523725, -207.097230737606, -2.74432541762142, 0.8)
    pt3dadd(-137.722277416058, -207.944253245426, -2.29894402557701, 0.8)
    pt3dadd(-138.012429594865, -208.791275753246, -1.85356263353261, 0.8)
    pt3dadd(-138.302581773673, -209.638298261066, -1.40818124148819, 0.8)
    pt3dadd(-138.838764073383, -210.379664494512, -1.13481576917457, 0.8)
    pt3dadd(-139.589088002653, -211.029068789784, -1.01117086451433, 0.8)
    pt3dadd(-140.339411931923, -211.678473085055, -0.887525959854102, 0.8)
    pt3dadd(-141.089735861193, -212.327877380326, -0.763881055193863, 0.8)
    pt3dadd(-141.840059790462, -212.977281675597, -0.640236150533624, 0.8)
    pt3dadd(-142.642078923141, -213.553407125405, -0.499166486421871, 0.8)
    pt3dadd(-143.474722737797, -214.086121558522, -0.347774245328864, 0.8)
    pt3dadd(-144.307366552454, -214.618835991639, -0.196382004235858, 0.8)
    pt3dadd(-145.140010367111, -215.151550424756, -0.0449897631428655, 0.8)
    pt3dadd(-145.972654181767, -215.684264857873, 0.106402477950141, 0.8)
    pt3dadd(-146.7932634614, -216.232170174068, 0.25387925362709, 0.8)
    pt3dadd(-147.470699279202, -216.960799657367, 0.354774193178486, 0.8)
    pt3dadd(-148.148135097004, -217.689429140665, 0.455669132729881, 0.8)
    pt3dadd(-148.825570914806, -218.418058623964, 0.556564072281262, 0.8)
    pt3dadd(-149.503006732608, -219.146688107263, 0.657459011832643, 0.8)
    pt3dadd(-150.180442550409, -219.875317590561, 0.758353951384009, 0.8)
    pt3dadd(-150.857878368211, -220.60394707386, 0.85924889093539, 0.8)
    pt3dadd(-151.527745476751, -221.334674262814, 0.977739742633247, 0.8)
    pt3dadd(-152.130838877337, -222.083908119151, 1.25146767085516, 0.8)
    pt3dadd(-152.733932277922, -222.833141975488, 1.52519559907708, 0.8)
    pt3dadd(-153.289765285666, -223.613243885967, 1.75763816950077, 0.8)
    pt3dadd(-153.570578465145, -224.572974581534, 1.74983110743601, 0.8)
    pt3dadd(-153.851391644623, -225.532705277101, 1.74202404537125, 0.8)
    pt3dadd(-154.132204824102, -226.492435972667, 1.73421698330652, 0.8)
    pt3dadd(-154.413018003581, -227.452166668234, 1.72640992124175, 0.8)
    pt3dadd(-154.69383118306, -228.411897363801, 1.71860285917701, 0.8)
    pt3dadd(-154.974644362538, -229.371628059367, 1.71079579711227, 0.8)
    pt3dadd(-155.38624021265, -230.21151978033, 2.0482677072194, 0.8)
    pt3dadd(-155.807629343345, -231.042437707612, 2.4115948306943, 0.8)
    pt3dadd(-156.22901847404, -231.873355634895, 2.77492195416919, 0.8)
    pt3dadd(-156.661790495372, -232.65547559418, 2.63522071591818, 0.8)
    pt3dadd(-157.102646194706, -233.402941169707, 2.13828866244693, 0.8)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-157.102646194706, -233.402941169707, 2.13828866244693, 0.8)
    pt3dadd(-157.543501894041, -234.150406745233, 1.64135660897567, 0.8)
    pt3dadd(-157.984357593375, -234.89787232076, 1.1444245555044, 0.8)
    pt3dadd(-158.42521329271, -235.645337896286, 0.647492502033145, 0.8)
    pt3dadd(-158.942412208768, -236.462478686767, 0.576210350115915, 0.8)
    pt3dadd(-159.483368336362, -237.301301676288, 0.637386001068279, 0.8)
    pt3dadd(-160.024324463956, -238.140124665809, 0.698561652020658, 0.8)
    pt3dadd(-160.56528059155, -238.97894765533, 0.759737302973036, 0.8)
    pt3dadd(-160.852166111654, -239.579710607538, 1.34926261087323, 0.8)
    pt3dadd(-161.006272403894, -240.056061577374, 2.21490745965853, 0.8)
    pt3dadd(-161.210897034967, -240.586431051197, 2.91345557525239, 0.8)
    pt3dadd(-161.70126192737, -241.42233831194, 2.66687633092006, 0.8)
    pt3dadd(-162.191626819772, -242.258245572684, 2.42029708658777, 0.8)
    pt3dadd(-162.681991712175, -243.094152833427, 2.17371784225544, 0.8)
    pt3dadd(-163.172356604577, -243.930060094171, 1.92713859792313, 0.8)
    pt3dadd(-163.66272149698, -244.765967354914, 1.68055935359081, 0.8)
    pt3dadd(-164.153086389383, -245.601874615657, 1.43398010925851, 0.8)
    pt3dadd(-164.643451281785, -246.437781876401, 1.1874008649262, 0.8)
    pt3dadd(-165.133816174188, -247.273689137144, 0.940821620593894, 0.8)
    pt3dadd(-165.62418106659, -248.109596397888, 0.694242376261585, 0.8)
    pt3dadd(-166.114545958993, -248.945503658631, 0.447663131929275, 0.8)
    pt3dadd(-166.612535860526, -249.776918808738, 0.215042221653221, 0.8)
    pt3dadd(-167.29594618679, -250.499097491351, 0.321851754637535, 0.8)
    pt3dadd(-167.979356513053, -251.221276173964, 0.428661287621836, 0.8)
    pt3dadd(-168.662766839316, -251.943454856577, 0.535470820606136, 0.8)
    pt3dadd(-169.34617716558, -252.665633539189, 0.642280353590451, 0.8)
    pt3dadd(-170.029587491843, -253.387812221802, 0.749089886574751, 0.8)
    pt3dadd(-170.779869148986, -254.041604005783, 0.660843099996271, 0.8)
    pt3dadd(-171.532766748037, -254.692720560308, 0.564965898500134, 0.8)
    pt3dadd(-172.285664347087, -255.343837114833, 0.469088697003926, 0.8)
    pt3dadd(-173.038561946138, -255.994953669359, 0.373211495507732, 0.8)
    pt3dadd(-173.819420022971, -256.601514118242, 0.339582567544838, 0.8)
    pt3dadd(-174.689583901333, -257.065762309149, 0.50477470426236, 0.8)
    pt3dadd(-175.559747779696, -257.530010500056, 0.669966840979924, 0.8)
    pt3dadd(-176.429911658058, -257.994258690962, 0.835158977697503, 0.8)
    pt3dadd(-177.300075536421, -258.458506881869, 1.000351114415, 0.8)
    pt3dadd(-178.170239414783, -258.922755072775, 1.16554325113256, 0.8)
    pt3dadd(-179.037588104923, -259.391783582631, 1.32972688553308, 0.8)
    pt3dadd(-179.837444053427, -259.975417868815, 1.46973217697968, 0.8)
    pt3dadd(-180.637300001931, -260.559052155, 1.60973746842629, 0.8)
    pt3dadd(-181.437155950434, -261.142686441184, 1.74974275987289, 0.8)
    pt3dadd(-182.237011898938, -261.726320727368, 1.8897480513195, 0.8)
    pt3dadd(-183.036867847442, -262.309955013553, 2.0297533427661, 0.8)
    pt3dadd(-183.836723795946, -262.893589299737, 2.16975863421268, 0.8)
    pt3dadd(-184.63657974445, -263.477223585921, 2.3097639256593, 0.8)
    pt3dadd(-185.438542691043, -264.059385608827, 2.44266352663328, 0.8)
    pt3dadd(-186.250856793941, -264.634314769303, 2.54065464188344, 0.8)
    pt3dadd(-187.063170896838, -265.209243929779, 2.63864575713359, 0.8)
    pt3dadd(-187.875484999736, -265.784173090255, 2.73663687238376, 0.8)
    pt3dadd(-188.687799102633, -266.359102250732, 2.83462798763392, 0.8)
    pt3dadd(-189.500113205531, -266.934031411208, 2.93261910288409, 0.8)
    pt3dadd(-190.312427308428, -267.508960571684, 3.03061021813424, 0.8)
    pt3dadd(-190.995505022993, -268.148140727763, 3.32651989433055, 0.8)
    pt3dadd(-191.598262774743, -268.827252652629, 3.7454352631233, 0.8)
    pt3dadd(-192.201020526493, -269.506364577494, 4.16435063191609, 0.8)
    pt3dadd(-192.803778278243, -270.185476502359, 4.58326600070886, 0.8)
    pt3dadd(-193.406536029993, -270.864588427225, 5.00218136950166, 0.8)
    pt3dadd(-194.009293781743, -271.54370035209, 5.42109673829442, 0.8)
    pt3dadd(-194.613600216187, -272.221254307198, 5.83882454409125, 0.8)
    pt3dadd(-195.525321833786, -272.589549586947, 6.02081981578385, 0.8)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-7.11824853798245, -34.9309021634083, 4.25675963313443, 0.8)
    pt3dadd(-7.20427810193711, -35.7881672591666, 4.50531584586523, 0.8)
    pt3dadd(-6.93300952008993, -36.6706888398132, 4.88946297418422, 0.8)
    pt3dadd(-6.66174093824274, -37.5532104204597, 5.2736101025032, 0.8)
    pt3dadd(-6.39047235639556, -38.4357320011063, 5.65775723082218, 0.8)
    pt3dadd(-6.40565485950685, -39.3679274512461, 5.81577470026193, 0.8)
    pt3dadd(-6.64426850885576, -40.3388683981975, 5.79741158839219, 0.8)
    pt3dadd(-6.88288215820467, -41.3098093451488, 5.77904847652246, 0.8)
    pt3dadd(-7.12149580755358, -42.2807502921002, 5.76068536465272, 0.8)
    pt3dadd(-7.3601094569025, -43.2516912390516, 5.74232225278299, 0.8)
    pt3dadd(-7.59872310625141, -44.222632186003, 5.72395914091326, 0.8)
    pt3dadd(-7.86423519258898, -45.1865552285889, 5.71231493821097, 0.8)
    pt3dadd(-8.13698597985744, -46.1485896666107, 5.7024788767797, 0.8)
    pt3dadd(-8.40973676712589, -47.1106241046325, 5.69264281534843, 0.8)
    pt3dadd(-8.68248755439434, -48.0726585426544, 5.68280675391715, 0.8)
    pt3dadd(-8.95523834166279, -49.0346929806762, 5.67297069248588, 0.8)
    pt3dadd(-9.22798912893124, -49.996727418698, 5.66313463105461, 0.8)
    pt3dadd(-9.50073991619969, -50.9587618567198, 5.65329856962333, 0.8)
    pt3dadd(-9.77349070346814, -51.9207962947416, 5.64346250819206, 0.8)
    pt3dadd(-9.99094230340763, -52.8830899537936, 5.69843731506026, 0.8)
    pt3dadd(-10.0279606663546, -53.8462294135131, 5.96488059595868, 0.8)
    pt3dadd(-10.0649790293017, -54.8093688732326, 6.23132387685709, 0.8)
    pt3dadd(-10.1019973922487, -55.7725083329521, 6.4977671577555, 0.8)
    pt3dadd(-10.1390157551957, -56.7356477926717, 6.76421043865391, 0.8)
    pt3dadd(-10.1760341181427, -57.6987872523912, 7.03065371955233, 0.8)
    pt3dadd(-10.2765282430317, -58.6609599671678, 7.22608516628758, 0.8)
    pt3dadd(-10.558443935839, -59.6203696054887, 7.21855601986889, 0.8)
    pt3dadd(-10.8403596286464, -60.5797792438097, 7.21102687345019, 0.8)
    pt3dadd(-11.1222753214537, -61.5391888821306, 7.2034977270315, 0.8)
    pt3dadd(-11.3474185539518, -62.5087016762906, 7.23464057785415, 0.8)
    pt3dadd(-11.4738064956873, -63.4957888381469, 7.33305309272036, 0.8)
    pt3dadd(-11.6001944374228, -64.4828760000033, 7.43146560758658, 0.8)
    pt3dadd(-11.7265823791583, -65.4699631618596, 7.52987812245279, 0.8)
    pt3dadd(-11.8529703208938, -66.4570503237159, 7.62829063731901, 0.8)
    pt3dadd(-11.9793582626293, -67.4441374855722, 7.72670315218523, 0.8)
    pt3dadd(-12.1057462043649, -68.4312246474286, 7.82511566705145, 0.8)
    pt3dadd(-12.2321341461004, -69.4183118092849, 7.92352818191766, 0.8)
    pt3dadd(-12.3585220878359, -70.4053989711412, 8.02194069678388, 0.8)
    pt3dadd(-12.5624540466686, -71.3786005662965, 8.06823071401998, 0.8)
    pt3dadd(-12.8458854950822, -72.3375664343565, 8.06108383035274, 0.8)
    pt3dadd(-13.1293169434957, -73.2965323024165, 8.05393694668551, 0.8)
    pt3dadd(-13.4127483919093, -74.2554981704765, 8.04679006301828, 0.8)
  }
}
proc shape3d_12() {
  adendIML[7] {
    pt3dadd(-13.6961798403228, -75.2144640385364, 8.03964317935105, 0.8)
    pt3dadd(-13.9796112887363, -76.1734299065965, 8.03249629568381, 0.8)
    pt3dadd(-14.2630427371499, -77.1323957746564, 8.02534941201658, 0.8)
    pt3dadd(-14.5547225357884, -78.0884248658314, 8.02032208603972, 0.8)
    pt3dadd(-14.9384881127294, -79.0116673538942, 8.03895780955184, 0.8)
    pt3dadd(-15.3222536896704, -79.9349098419569, 8.05759353306395, 0.8)
    pt3dadd(-15.7060192666114, -80.8581523300197, 8.07622925657606, 0.8)
    pt3dadd(-16.0897848435524, -81.7813948180825, 8.09486498008817, 0.8)
    pt3dadd(-16.4735504204934, -82.7046373061452, 8.11350070360029, 0.8)
    pt3dadd(-16.8573159974344, -83.627879794208, 8.1321364271124, 0.8)
    pt3dadd(-17.2410815743754, -84.5511222822707, 8.15077215062451, 0.8)
    pt3dadd(-17.5206275792837, -85.5049554259433, 8.14311854648422, 0.8)
    pt3dadd(-17.7000502188544, -86.4881769016516, 8.11020888049606, 0.8)
    pt3dadd(-17.8794728584251, -87.4713983773599, 8.0772992145079, 0.8)
    pt3dadd(-18.0588954979959, -88.4546198530682, 8.04438954851973, 0.8)
    pt3dadd(-18.2383181375666, -89.4378413287765, 8.01147988253157, 0.8)
    pt3dadd(-18.4177407771373, -90.4210628044848, 7.97857021654341, 0.8)
    pt3dadd(-18.5971634167081, -91.4042842801931, 7.94566055055525, 0.8)
    pt3dadd(-18.7765860562788, -92.3875057559014, 7.91275088456709, 0.8)
    pt3dadd(-18.9741436011675, -93.3672710974726, 7.884274864195, 0.8)
    pt3dadd(-19.1827693388336, -94.3449270727018, 7.85850481021896, 0.8)
    pt3dadd(-19.3913950764998, -95.322583047931, 7.83273475624292, 0.8)
    pt3dadd(-19.6000208141659, -96.3002390231602, 7.80696470226688, 0.8)
    pt3dadd(-19.8086465518321, -97.2778949983894, 7.78119464829084, 0.8)
    pt3dadd(-20.0172722894982, -98.2555509736185, 7.7554245943148, 0.8)
    pt3dadd(-20.2258980271644, -99.2332069488478, 7.72965454033876, 0.8)
    pt3dadd(-20.4386453042702, -100.209996018361, 7.70489827028386, 0.8)
    pt3dadd(-20.6533333642537, -101.186376872499, 7.68061937876789, 0.8)
    pt3dadd(-20.8680214242372, -102.162757726637, 7.65634048725191, 0.8)
    pt3dadd(-21.0827094842207, -103.139138580775, 7.63206159573594, 0.8)
    pt3dadd(-21.2973975442042, -104.115519434913, 7.60778270421997, 0.8)
    pt3dadd(-21.5120856041877, -105.091900289051, 7.583503812704, 0.8)
    pt3dadd(-21.7267736641712, -106.068281143189, 7.55922492118803, 0.8)
    pt3dadd(-21.9414617241547, -107.044661997327, 7.53494602967205, 0.8)
    pt3dadd(-22.1561497841382, -108.021042851465, 7.51066713815608, 0.8)
    pt3dadd(-22.3649570758459, -108.998647092496, 7.48494276368407, 0.8)
    pt3dadd(-22.5694936469451, -109.977139779282, 7.45816865326603, 0.8)
    pt3dadd(-22.7740302180444, -110.955632466069, 7.43139454284799, 0.8)
    pt3dadd(-22.9785667891437, -111.934125152855, 7.40462043242995, 0.8)
    pt3dadd(-23.1831033602429, -112.912617839641, 7.37784632201191, 0.8)
    pt3dadd(-23.3876399313422, -113.891110526427, 7.35107221159388, 0.8)
    pt3dadd(-23.5921765024415, -114.869603213214, 7.32429810117583, 0.8)
    pt3dadd(-23.7967130735408, -115.8480959, 7.2975239907578, 0.8)
    pt3dadd(-24.00124964464, -116.826588586786, 7.27074988033976, 0.8)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(-24.00124964464, -116.826588586786, 7.27074988033976, 0.8)
    pt3dadd(-24.2143288049659, -117.802991747698, 7.24609909765574, 0.8)
    pt3dadd(-24.4927923394148, -118.763401825258, 7.2377001153644, 0.8)
    pt3dadd(-24.7712558738638, -119.723811902818, 7.22930113307307, 0.8)
    pt3dadd(-25.0497194083127, -120.684221980378, 7.22090215078174, 0.8)
    pt3dadd(-25.3281829427617, -121.644632057938, 7.21250316849041, 0.8)
    pt3dadd(-25.6346276898022, -122.580445689342, 7.32120357392779, 0.8)
    pt3dadd(-25.97540675726, -123.486078274779, 7.57359067220557, 0.8)
    pt3dadd(-26.3161858247178, -124.391710860216, 7.82597777048334, 0.8)
    pt3dadd(-26.6569648921755, -125.297343445653, 8.07836486876112, 0.8)
    pt3dadd(-26.9977439596333, -126.20297603109, 8.3307519670389, 0.8)
    pt3dadd(-27.3385230270911, -127.108608616527, 8.58313906531668, 0.8)
    pt3dadd(-27.6793020945489, -128.014241201964, 8.83552616359446, 0.8)
    pt3dadd(-28.0437584995828, -128.945183358152, 8.85038252973665, 0.8)
    pt3dadd(-28.4083371574736, -129.876256194882, 8.86401245686245, 0.8)
    pt3dadd(-28.7729158153644, -130.807329031612, 8.87764238398824, 0.8)
    pt3dadd(-29.1374944732552, -131.738401868343, 8.89127231111404, 0.8)
    pt3dadd(-29.5020731311459, -132.669474705073, 8.90490223823983, 0.8)
    pt3dadd(-29.8666517890368, -133.600547541804, 8.91853216536562, 0.8)
    pt3dadd(-30.2312304469275, -134.531620378534, 8.93216209249141, 0.8)
    pt3dadd(-30.5958091048183, -135.462693215264, 8.94579201961721, 0.8)
    pt3dadd(-30.9603877627091, -136.393766051995, 8.959421946743, 0.8)
    pt3dadd(-31.3249664205999, -137.324838888725, 8.97305187386879, 0.8)
    pt3dadd(-31.7107220518222, -138.235604341223, 8.90285425507021, 0.8)
    pt3dadd(-32.1415038962881, -139.103192489837, 8.65442356682332, 0.8)
    pt3dadd(-32.572285740754, -139.970780638451, 8.40599287857644, 0.8)
    pt3dadd(-33.0030675852199, -140.838368787065, 8.15756219032956, 0.8)
    pt3dadd(-33.4338494296859, -141.705956935679, 7.90913150208267, 0.8)
    pt3dadd(-33.8646312741518, -142.573545084294, 7.66070081383579, 0.8)
    pt3dadd(-34.2954131186177, -143.441133232908, 7.4122701255889, 0.8)
    pt3dadd(-34.7261949630836, -144.308721381522, 7.16383943734202, 0.8)
    pt3dadd(-35.1569768075496, -145.176309530136, 6.91540874909514, 0.8)
    pt3dadd(-35.5877586520155, -146.04389767875, 6.66697806084825, 0.8)
    pt3dadd(-36.0185404964814, -146.911485827364, 6.41854737260137, 0.8)
    pt3dadd(-36.4263740425333, -147.795090440575, 6.21863822297289, 0.8)
    pt3dadd(-36.739481004473, -148.744808233659, 6.21901754468359, 0.8)
    pt3dadd(-37.0525879664128, -149.694526026743, 6.21939686639428, 0.8)
    pt3dadd(-37.3656949283525, -150.644243819827, 6.21977618810497, 0.8)
    pt3dadd(-37.6788018902923, -151.59396161291, 6.22015550981567, 0.8)
    pt3dadd(-37.9919088522321, -152.543679405994, 6.22053483152636, 0.8)
    pt3dadd(-38.3050158141718, -153.493397199078, 6.22091415323705, 0.8)
    pt3dadd(-38.6181227761116, -154.443114992162, 6.22129347494775, 0.8)
    pt3dadd(-38.9312297380513, -155.392832785245, 6.22167279665844, 0.8)
    pt3dadd(-39.2443366999911, -156.342550578329, 6.22205211836914, 0.8)
    pt3dadd(-39.5574436619308, -157.292268371413, 6.22243144007983, 0.8)
    pt3dadd(-39.8628123894832, -158.244465884681, 6.22084307170657, 0.8)
    pt3dadd(-40.1607293857251, -159.199051308111, 6.21735986569024, 0.8)
    pt3dadd(-40.4586463819669, -160.153636731542, 6.21387665967392, 0.8)
    pt3dadd(-40.7565633782088, -161.108222154972, 6.21039345365759, 0.8)
    pt3dadd(-41.0544803744506, -162.062807578403, 6.20691024764127, 0.8)
    pt3dadd(-41.3523973706925, -163.017393001833, 6.20342704162494, 0.8)
    pt3dadd(-41.6503143669343, -163.971978425264, 6.19994383560862, 0.8)
    pt3dadd(-41.9482313631762, -164.926563848694, 6.19646062959229, 0.8)
    pt3dadd(-42.246148359418, -165.881149272125, 6.19297742357597, 0.8)
    pt3dadd(-42.5440653556598, -166.835734695556, 6.18949421755964, 0.8)
    pt3dadd(-42.8419823519017, -167.790320118986, 6.18601101154332, 0.8)
    pt3dadd(-43.1398993481435, -168.744905542417, 6.18252780552699, 0.8)
    pt3dadd(-43.4378163443854, -169.699490965847, 6.17904459951067, 0.8)
    pt3dadd(-43.6273563396046, -170.642606152898, 6.45200907117473, 0.8)
    pt3dadd(-43.8167751552692, -171.585708514737, 6.72528264722547, 0.8)
    pt3dadd(-44.0061939709339, -172.528810876575, 6.99855622327621, 0.8)
    pt3dadd(-44.1956127865986, -173.471913238413, 7.27182979932694, 0.8)
    pt3dadd(-44.3850316022632, -174.415015600251, 7.54510337537769, 0.8)
    pt3dadd(-44.5744504179279, -175.358117962089, 7.81837695142842, 0.8)
    pt3dadd(-44.7638692335926, -176.301220323927, 8.09165052747916, 0.8)
    pt3dadd(-44.9532880492572, -177.244322685765, 8.36492410352991, 0.8)
    pt3dadd(-45.1427068649219, -178.187425047603, 8.63819767958065, 0.8)
    pt3dadd(-45.3321256805866, -179.130527409442, 8.91147125563138, 0.8)
    pt3dadd(-45.5215444962512, -180.07362977128, 9.18474483168212, 0.8)
    pt3dadd(-45.7347495278109, -181.016715374552, 9.41356325765387, 0.8)
    pt3dadd(-46.0674944483478, -181.959716756058, 9.41896810122259, 0.8)
    pt3dadd(-46.4002393688847, -182.902718137565, 9.4243729447913, 0.8)
    pt3dadd(-46.7329842894216, -183.845719519071, 9.42977778836002, 0.8)
    pt3dadd(-47.0657292099585, -184.788720900577, 9.43518263192874, 0.8)
    pt3dadd(-47.3984741304954, -185.731722282084, 9.44058747549745, 0.8)
    pt3dadd(-47.7312190510323, -186.67472366359, 9.44599231906617, 0.8)
    pt3dadd(-48.0639639715692, -187.617725045096, 9.45139716263488, 0.8)
    pt3dadd(-48.3967088921061, -188.560726426603, 9.4568020062036, 0.8)
    pt3dadd(-48.729453812643, -189.503727808109, 9.46220684977231, 0.8)
    pt3dadd(-49.0621987331799, -190.446729189615, 9.46761169334103, 0.8)
    pt3dadd(-49.3780537656625, -191.395254134589, 9.4687133596443, 0.8)
    pt3dadd(-49.6668879632755, -192.352615804583, 9.46293070309532, 0.8)
    pt3dadd(-49.9557221608886, -193.309977474576, 9.45714804654635, 0.8)
    pt3dadd(-50.2445563585016, -194.267339144569, 9.45136538999739, 0.8)
    pt3dadd(-50.5333905561147, -195.224700814563, 9.44558273344842, 0.8)
    pt3dadd(-50.8222247537277, -196.182062484556, 9.43980007689944, 0.8)
    pt3dadd(-51.1110589513408, -197.139424154549, 9.43401742035047, 0.8)
    pt3dadd(-51.3998931489539, -198.096785824543, 9.4282347638015, 0.8)
    pt3dadd(-51.6885125577398, -199.054211844213, 9.42239782844698, 0.8)
    pt3dadd(-51.9763897275203, -200.011860235044, 9.41637332352851, 0.8)
    pt3dadd(-52.2642668973007, -200.969508625874, 9.41034881861002, 0.8)
    pt3dadd(-52.5521440670812, -201.927157016704, 9.40432431369154, 0.8)
    pt3dadd(-52.8400212368617, -202.884805407534, 9.39829980877307, 0.8)
    pt3dadd(-53.0781800323911, -203.854799433945, 9.37990349054054, 0.8)
    pt3dadd(-53.2795779970061, -204.83392159113, 9.35235968620869, 0.8)
    pt3dadd(-53.480975961621, -205.813043748316, 9.32481588187682, 0.8)
    pt3dadd(-53.6823739262359, -206.792165905502, 9.29727207754494, 0.8)
    pt3dadd(-53.8837718908509, -207.771288062687, 9.26972827321308, 0.8)
    pt3dadd(-54.0851698554658, -208.750410219873, 9.24218446888122, 0.8)
    pt3dadd(-54.2865678200807, -209.729532377059, 9.21464066454935, 0.8)
    pt3dadd(-54.520782697574, -210.701386853912, 9.19519645926283, 0.8)
    pt3dadd(-54.7622504573091, -211.671635097121, 9.17754235039093, 0.8)
    pt3dadd(-55.0037182170443, -212.641883340329, 9.15988824151904, 0.8)
    pt3dadd(-55.2451859767794, -213.612131583537, 9.14223413264715, 0.8)
    pt3dadd(-55.4866537365146, -214.582379826745, 9.12458002377524, 0.8)
    pt3dadd(-55.7281214962497, -215.552628069953, 9.10692591490336, 0.8)
    pt3dadd(-56.0262209803923, -216.50502800874, 9.1036496180994, 0.8)
    pt3dadd(-56.3859271326687, -217.438011717866, 9.11601418524284, 0.8)
    pt3dadd(-56.7456332849451, -218.370995426991, 9.12837875238626, 0.8)
    pt3dadd(-57.1053394372215, -219.303979136117, 9.1407433195297, 0.8)
    pt3dadd(-57.4650455894978, -220.236962845243, 9.15310788667313, 0.8)
    pt3dadd(-57.8247517417743, -221.169946554368, 9.16547245381656, 0.8)
    pt3dadd(-58.1844578940507, -222.102930263494, 9.17783702095999, 0.8)
    pt3dadd(-58.5441640463271, -223.03591397262, 9.19020158810342, 0.8)
    pt3dadd(-58.8989333703106, -223.95844061634, 9.28335393640818, 0.8)
    pt3dadd(-59.2430246764119, -224.858349351402, 9.55124466342993, 0.8)
    pt3dadd(-59.5871159825131, -225.758258086465, 9.81913539045171, 0.8)
    pt3dadd(-59.9312072886144, -226.658166821527, 10.0870261174735, 0.8)
    pt3dadd(-60.2752985947157, -227.558075556589, 10.3549168444952, 0.8)
    pt3dadd(-60.619389900817, -228.457984291651, 10.622807571517, 0.8)
    pt3dadd(-60.9634812069183, -229.357893026713, 10.8906982985387, 0.8)
    pt3dadd(-61.3075725130196, -230.257801761776, 11.1585890255605, 0.8)
    pt3dadd(-61.6516638191209, -231.157710496838, 11.4264797525823, 0.8)
    pt3dadd(-62.0022382524713, -232.058239073753, 11.682334020468, 0.8)
    pt3dadd(-62.3765047789707, -232.961032815359, 11.8942019681604, 0.8)
    pt3dadd(-62.7507713054701, -233.863826556965, 12.1060699158528, 0.8)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(-62.7507713054701, -233.863826556965, 12.1060699158528, 0.8)
    pt3dadd(-63.1250378319695, -234.766620298571, 12.3179378635452, 0.8)
    pt3dadd(-63.4993043584689, -235.669414040177, 12.5298058112376, 0.8)
    pt3dadd(-63.8735708849684, -236.572207781783, 12.7416737589299, 0.8)
    pt3dadd(-64.2478374114678, -237.475001523388, 12.9535417066223, 0.8)
    pt3dadd(-64.6221039379672, -238.377795264994, 13.1654096543147, 0.8)
    pt3dadd(-64.9963704644666, -239.2805890066, 13.3772776020071, 0.8)
    pt3dadd(-65.3763829344928, -240.182890115436, 13.5736894257067, 0.8)
    pt3dadd(-65.8168977455776, -241.08000401076, 13.6073548386723, 0.8)
    pt3dadd(-66.2574125566624, -241.977117906085, 13.641020251638, 0.8)
    pt3dadd(-66.6979273677473, -242.87423180141, 13.6746856646036, 0.8)
    pt3dadd(-67.1384421788321, -243.771345696735, 13.7083510775693, 0.8)
    pt3dadd(-67.578956989917, -244.668459592059, 13.7420164905349, 0.8)
    pt3dadd(-68.0194718010018, -245.565573487384, 13.7756819035005, 0.8)
    pt3dadd(-68.4599866120866, -246.462687382709, 13.8093473164662, 0.8)
    pt3dadd(-68.7314521706886, -247.296001459023, 14.0812304284996, 0.8)
    pt3dadd(-68.7041861356913, -248.016573116637, 14.7740746025956, 0.8)
    pt3dadd(-68.676920100694, -248.737144774251, 15.4669187766915, 0.8)
    pt3dadd(-68.6496540656967, -249.457716431866, 16.1597629507875, 0.8)
    pt3dadd(-68.6223880306994, -250.17828808948, 16.8526071248835, 0.8)
    pt3dadd(-68.595121995702, -250.898859747094, 17.5454512989795, 0.8)
    pt3dadd(-68.5678559607047, -251.619431404708, 18.2382954730754, 0.8)
    pt3dadd(-68.5405899257074, -252.340003062322, 18.9311396471714, 0.8)
    pt3dadd(-68.5133238907101, -253.060574719936, 19.6239838212674, 0.8)
    pt3dadd(-68.6743549999688, -253.879132531931, 19.9971768902681, 0.8)
    pt3dadd(-69.0460960564893, -254.807339683024, 20.0126711329644, 0.8)
    pt3dadd(-69.4178371130099, -255.735546834117, 20.0281653756608, 0.8)
    pt3dadd(-69.7895781695304, -256.66375398521, 20.0436596183572, 0.8)
    pt3dadd(-70.161319226051, -257.591961136303, 20.0591538610535, 0.8)
    pt3dadd(-70.5330602825716, -258.520168287396, 20.0746481037499, 0.8)
    pt3dadd(-70.9048013390921, -259.448375438489, 20.0901423464463, 0.8)
    pt3dadd(-71.3483181999154, -260.342031628623, 20.124759452886, 0.8)
    pt3dadd(-71.8289791267189, -261.21780765446, 20.1692726645593, 0.8)
    pt3dadd(-72.3096400535223, -262.093583680297, 20.2137858762327, 0.8)
    pt3dadd(-72.7903009803257, -262.969359706135, 20.258299087906, 0.8)
    pt3dadd(-73.2709619071292, -263.845135731972, 20.3028122995794, 0.8)
    pt3dadd(-73.6610180190006, -264.718243734583, 20.5200152283407, 0.8)
    pt3dadd(-73.9596988888883, -265.588661027346, 20.9113762821295, 0.8)
    pt3dadd(-74.258379758776, -266.459078320109, 21.3027373359182, 0.8)
    pt3dadd(-74.5570606286636, -267.329495612871, 21.694098389707, 0.8)
    pt3dadd(-74.8557414985513, -268.199912905634, 22.0854594434958, 0.8)
    pt3dadd(-75.154422368439, -269.070330198397, 22.4768204972846, 0.8)
    pt3dadd(-75.4531032383266, -269.94074749116, 22.8681815510733, 0.8)
    pt3dadd(-75.7610923858444, -270.823863836089, 23.2177823789972, 0.8)
    pt3dadd(-76.0832296073013, -271.726282047178, 23.5039099429377, 0.8)
    pt3dadd(-76.4053668287582, -272.628700258267, 23.7900375068781, 0.8)
    pt3dadd(-76.7275040502151, -273.531118469356, 24.0761650708185, 0.8)
    pt3dadd(-77.049641271672, -274.433536680446, 24.3622926347589, 0.8)
    pt3dadd(-77.3717784931288, -275.335954891535, 24.6484201986994, 0.8)
    pt3dadd(-77.6939157145857, -276.238373102624, 24.9345477626398, 0.8)
    pt3dadd(-78.0160529360426, -277.140791313714, 25.2206753265802, 0.8)
    pt3dadd(-78.3381901574995, -278.043209524803, 25.5068028905206, 0.8)
    pt3dadd(-78.6603273789564, -278.945627735892, 25.7929304544611, 0.8)
    pt3dadd(-78.9848699837472, -279.850487800734, 26.0584785769598, 0.8)
    pt3dadd(-79.3391691991777, -280.785555645904, 26.0694417368335, 0.8)
    pt3dadd(-79.6934684146083, -281.720623491074, 26.0804048967072, 0.8)
    pt3dadd(-80.0477676300389, -282.655691336244, 26.0913680565809, 0.8)
    pt3dadd(-80.4020668454694, -283.590759181414, 26.1023312164547, 0.8)
    pt3dadd(-80.7563660609, -284.525827026584, 26.1132943763284, 0.8)
    pt3dadd(-81.1106652763306, -285.460894871754, 26.1242575362021, 0.8)
    pt3dadd(-81.4649644917612, -286.395962716924, 26.1352206960758, 0.8)
    pt3dadd(-81.821265194926, -287.31850036008, 26.2450369287417, 0.8)
    pt3dadd(-82.179563669966, -288.22853106415, 26.4535227086745, 0.8)
    pt3dadd(-82.5378621450059, -289.13856176822, 26.6620084886073, 0.8)
    pt3dadd(-82.8961606200459, -290.048592472289, 26.8704942685401, 0.8)
    pt3dadd(-83.2544590950859, -290.958623176359, 27.0789800484729, 0.8)
    pt3dadd(-83.6127575701259, -291.868653880429, 27.2874658284057, 0.8)
    pt3dadd(-83.9710560451658, -292.778684584499, 27.4959516083385, 0.8)
    pt3dadd(-84.3774173590045, -293.673533599784, 27.5694517075563, 0.8)
    pt3dadd(-84.8502497876878, -294.547386273532, 27.4562660239647, 0.8)
    pt3dadd(-85.3230822163709, -295.421238947279, 27.3430803403732, 0.8)
    pt3dadd(-85.7959146450542, -296.295091621027, 27.2298946567817, 0.8)
    pt3dadd(-86.2687470737374, -297.168944294774, 27.1167089731902, 0.8)
  }
  GCL[5] {pt3dclear()
    pt3dadd(-4.19143585737378, 27.2938337631978, 5.39160575214741, 1.22951871182782)
    pt3dadd(-3.66184706965916, 26.3807449036186, 5.40372494528952, 1.22951871182782)
    pt3dadd(-3.22908563589617, 25.4833510293402, 5.48975851928867, 0.953067921181074)
    pt3dadd(-3.13024634091606, 24.4936212168044, 5.39514098497488, 0.908338184809465)
    pt3dadd(-3.03515434292059, 23.5028552040806, 5.29849617161957, 0.866208837891303)
    pt3dadd(-2.94006234492513, 22.5120891913567, 5.20185135826426, 0.824079490973141)
  }
}
proc shape3d_13() {
  GCL[5] {
    pt3dadd(-2.67190019319291, 21.6111953886051, 5.30748703926051, 0.8)
    pt3dadd(-2.17285302956266, 20.8301960091306, 5.68297591756855, 0.8)
    pt3dadd(-1.6738058659324, 20.0491966296561, 6.05846479587658, 0.8)
    pt3dadd(-1.17475870230214, 19.2681972501816, 6.43395367418461, 0.8)
    pt3dadd(-0.675711538671884, 18.4871978707071, 6.80944255249265, 0.8)
    pt3dadd(-0.176664375041627, 17.7061984912325, 7.18493143080068, 0.8)
    pt3dadd(0.202185176170321, 16.9788642769847, 7.72812477256581, 0.8)
    pt3dadd(0.495356225818586, 16.2897833262608, 8.39086014886439, 0.8)
    pt3dadd(0.788527275466851, 15.600702375537, 9.05359552516296, 0.8)
    pt3dadd(1.08169832511511, 14.9116214248131, 9.71633090146153, 0.8)
    pt3dadd(1.37168973058214, 14.2207598562901, 10.3748020639812, 0.8)
    pt3dadd(1.15326901855348, 13.2451847745277, 10.3514428602011, 0.8)
    pt3dadd(0.934848306524819, 12.2696096927654, 10.328083656421, 0.8)
    pt3dadd(0.71642759449616, 11.294034611003, 10.3047244526409, 0.8)
    pt3dadd(0.4980068824675, 10.3184595292406, 10.2813652488608, 0.8)
    pt3dadd(0.335843919157874, 9.44988409078616, 10.5901949751506, 0.8)
    pt3dadd(0.22946183115161, 8.68740130439765, 11.2283978048315, 0.8)
    pt3dadd(0.123079743145343, 7.92491851800917, 11.8666006345124, 0.8)
    pt3dadd(0.0166976551390814, 7.16243573162068, 12.5048034641932, 0.8)
    pt3dadd(-0.0896844328671857, 6.39995294523219, 13.1430062938741, 0.8)
    pt3dadd(-0.196066520873451, 5.63747015884369, 13.781209123555, 0.8)
    pt3dadd(-0.302448608879713, 4.8749873724552, 14.4194119532358, 0.8)
    pt3dadd(-0.40883069688598, 4.11250458606672, 15.0576147829167, 0.8)
    pt3dadd(-0.694822415362623, 3.27268961065825, 14.8187790302082, 0.8)
    pt3dadd(-1.01548808420377, 2.41794552216916, 14.4106294595608, 0.8)
    pt3dadd(-1.33615375304492, 1.56320143368009, 14.0024798889134, 0.8)
    pt3dadd(-1.65681942188606, 0.708457345191022, 13.594330318266, 0.8)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(-1.65681942188606, 0.708457345191022, 13.594330318266, 0.8)
    pt3dadd(-1.97748509072721, -0.146286743298048, 13.1861807476186, 0.8)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(-1.97748509072721, -0.146286743298048, 13.1861807476186, 0.8)
    pt3dadd(-1.51052986116377, -0.713673160551863, 13.8399383110529, 0.8)
    pt3dadd(-1.02953673345795, -1.27593795428423, 14.5126224217831, 0.8)
    pt3dadd(-0.548543605752122, -1.83820274801661, 15.1853065325132, 0.8)
    pt3dadd(-0.0675504780462965, -2.40046754174898, 15.8579906432434, 0.8)
    pt3dadd(0.412466121241348, -2.96654491452296, 16.5214448260149, 0.8)
    pt3dadd(0.805490058373813, -3.87226053471556, 16.3626638442191, 0.8)
    pt3dadd(1.19851399550628, -4.77797615490817, 16.2038828624233, 0.8)
    pt3dadd(1.59153793263874, -5.68369177510077, 16.0451018806276, 0.8)
    pt3dadd(1.98456186977121, -6.58940739529338, 15.8863208988318, 0.8)
    pt3dadd(2.47797659264607, -7.42090177729237, 16.0016669148897, 0.8)
    pt3dadd(3.02876526370184, -8.2099782676238, 16.2736781871614, 0.8)
    pt3dadd(3.57955393475761, -8.99905475795521, 16.5456894594331, 0.8)
    pt3dadd(3.72861349854445, -9.93286854647455, 16.5805760985741, 0.8)
    pt3dadd(3.70160579754706, -10.9301168727038, 16.5115372695007, 0.8)
    pt3dadd(3.67459809654967, -11.927365198933, 16.4424984404273, 0.8)
    pt3dadd(3.64759039555227, -12.9246135251623, 16.373459611354, 0.8)
    pt3dadd(3.51461813660497, -13.9147490005666, 16.3293399739034, 0.8)
    pt3dadd(3.38161403242569, -14.9048823383657, 16.2852278253477, 0.8)
    pt3dadd(3.24735639084714, -15.8948507569718, 16.2414165607579, 0.8)
    pt3dadd(3.09974844639779, -16.8830627691258, 16.2008097415038, 0.8)
    pt3dadd(2.95214050194845, -17.8712747812799, 16.1602029222496, 0.8)
    pt3dadd(2.75025092963056, -18.5055368588255, 16.6732469617799, 0.8)
    pt3dadd(2.26674600110172, -19.3797061232454, 16.7185358261047, 0.8)
    pt3dadd(1.78324107257287, -20.2538753876654, 16.7638246904294, 0.8)
    pt3dadd(1.29973614404403, -21.1280446520853, 16.8091135547542, 0.8)
    pt3dadd(0.816231215515186, -22.0022139165052, 16.854402419079, 0.8)
    pt3dadd(0.623399130191752, -22.7435953475361, 17.4966862049078, 0.8)
    pt3dadd(0.430973329026603, -23.4847911761125, 18.1398044325664, 0.8)
    pt3dadd(0.238547527861456, -24.225987004689, 18.7829226602251, 0.8)
    pt3dadd(0.0461217266963097, -24.9671828332654, 19.4260408878838, 0.8)
    pt3dadd(-0.143384538589931, -25.709547731491, 20.0681994166513, 0.8)
    pt3dadd(-0.167042886480232, -26.5183231054387, 20.6558410396418, 0.8)
    pt3dadd(-0.190701234370533, -27.3270984793863, 21.2434826626324, 0.8)
    pt3dadd(-0.21435958226083, -28.1358738533339, 21.8311242856229, 0.8)
    pt3dadd(-0.23801793015113, -28.9446492272816, 22.4187659086135, 0.8)
    pt3dadd(-0.261676278041428, -29.7534246012292, 23.006407531604, 0.8)
    pt3dadd(-0.243252740290174, -30.7065818339298, 23.0777710986075, 0.8)
    pt3dadd(-0.212304894479235, -31.702709642917, 22.995481251106, 0.8)
    pt3dadd(-0.181357048668298, -32.6988374519044, 22.9131914036044, 0.8)
    pt3dadd(-0.150409202857359, -33.6949652608916, 22.8309015561029, 0.8)
    pt3dadd(-0.103135998997193, -34.6817039408983, 22.7863823422428, 0.8)
    pt3dadd(0.146956732672042, -35.5517959476339, 23.2111099318587, 0.8)
    pt3dadd(0.397049464341276, -36.4218879543695, 23.6358375214746, 0.8)
    pt3dadd(0.647142196010508, -37.2919799611052, 24.0605651110906, 0.8)
    pt3dadd(0.897234927679744, -38.1620719678408, 24.4852927007065, 0.8)
    pt3dadd(1.14732765934898, -39.0321639745764, 24.9100202903225, 0.8)
    pt3dadd(1.39742039101821, -39.9022559813121, 25.3347478799384, 0.8)
    pt3dadd(1.64751312268745, -40.7723479880477, 25.7594754695544, 0.8)
    pt3dadd(1.88519681444795, -41.716394060386, 25.7493456755518, 0.8)
    pt3dadd(2.11955521515561, -42.6802578458173, 25.6226857246918, 0.8)
    pt3dadd(2.35267288860384, -43.6443728294757, 25.4962923095697, 0.8)
    pt3dadd(2.4648326343038, -44.6329770123378, 25.3958833404878, 0.8)
    pt3dadd(2.57699238000375, -45.6215811951999, 25.2954743714059, 0.8)
    pt3dadd(2.6891521257037, -46.610185378062, 25.195065402324, 0.8)
    pt3dadd(2.80131187140366, -47.5987895609241, 25.0946564332422, 0.8)
    pt3dadd(2.91347161710361, -48.5873937437862, 24.9942474641603, 0.8)
    pt3dadd(3.13273103326558, -49.5263937057566, 25.2518259633728, 0.8)
    pt3dadd(3.3548982530918, -50.4640468910782, 25.5191239814929, 0.8)
    pt3dadd(3.57706547291801, -51.4017000763998, 25.7864219996131, 0.8)
    pt3dadd(3.79923269274422, -52.3393532617214, 26.0537200177332, 0.8)
    pt3dadd(4.02139991257043, -53.277006447043, 26.3210180358533, 0.8)
    pt3dadd(4.24356713239664, -54.2146596323646, 26.5883160539735, 0.8)
    pt3dadd(4.46573435222285, -55.1523128176862, 26.8556140720936, 0.8)
    pt3dadd(4.78013491932103, -56.0862287466786, 26.7690464188526, 0.8)
    pt3dadd(5.10933465748007, -57.0195450195018, 26.6256997506682, 0.8)
    pt3dadd(5.4385343956391, -57.9528612923249, 26.4823530824838, 0.8)
    pt3dadd(5.76773413379814, -58.886177565148, 26.3390064142994, 0.8)
    pt3dadd(6.09693387195717, -59.8194938379711, 26.195659746115, 0.8)
    pt3dadd(6.42613361011621, -60.7528101107943, 26.0523130779306, 0.8)
    pt3dadd(6.75533334827524, -61.6861263836174, 25.9089664097461, 0.8)
    pt3dadd(7.08453308643428, -62.6194426564405, 25.7656197415617, 0.8)
    pt3dadd(7.41373282459331, -63.5527589292636, 25.6222730733773, 0.8)
    pt3dadd(7.74293256275235, -64.4860752020868, 25.4789264051929, 0.8)
    pt3dadd(8.07213230091138, -65.4193914749099, 25.3355797370085, 0.8)
    pt3dadd(8.32742232785104, -66.3268056987848, 25.6549720621403, 0.8)
    pt3dadd(8.57955311192546, -67.2331127492994, 25.9941439918598, 0.8)
    pt3dadd(8.83168389599988, -68.1394197998139, 26.3333159215793, 0.8)
    pt3dadd(9.0838146800743, -69.0457268503285, 26.6724878512988, 0.8)
    pt3dadd(9.33594546414871, -69.952033900843, 27.0116597810183, 0.8)
    pt3dadd(9.58807624822313, -70.8583409513575, 27.3508317107378, 0.8)
    pt3dadd(9.84020703229755, -71.7646480018721, 27.6900036404572, 0.8)
    pt3dadd(10.092337816372, -72.6709550523866, 28.0291755701767, 0.8)
    pt3dadd(10.3099696937894, -73.6005945888085, 28.2367058432406, 0.8)
    pt3dadd(10.4455569428276, -74.5857229891082, 28.1311684905115, 0.8)
    pt3dadd(10.5811441918657, -75.570851389408, 28.0256311377825, 0.8)
    pt3dadd(10.7167314409039, -76.5559797897078, 27.9200937850534, 0.8)
    pt3dadd(10.852318689942, -77.5411081900076, 27.8145564323243, 0.8)
    pt3dadd(10.9879059389802, -78.5262365903073, 27.7090190795953, 0.8)
    pt3dadd(11.1234931880183, -79.5113649906071, 27.6034817268662, 0.8)
    pt3dadd(11.2590804370565, -80.4964933909069, 27.4979443741371, 0.8)
    pt3dadd(11.3946676860946, -81.4816217912067, 27.392407021408, 0.8)
    pt3dadd(11.5504125555676, -82.4614462111439, 27.2826316427588, 0.8)
    pt3dadd(11.8682037167768, -83.3986321484302, 27.138786945915, 0.8)
    pt3dadd(12.185994877986, -84.3358180857165, 26.9949422490712, 0.8)
    pt3dadd(12.5037860391952, -85.2730040230028, 26.8510975522274, 0.8)
    pt3dadd(12.8215772004044, -86.2101899602891, 26.7072528553836, 0.8)
    pt3dadd(13.1393683616137, -87.1473758975754, 26.5634081585398, 0.8)
    pt3dadd(13.2976216050007, -88.1096510173364, 26.6615740836572, 0.8)
    pt3dadd(13.3817212625134, -89.0835876459884, 26.8722270944976, 0.8)
    pt3dadd(13.465820920026, -90.0575242746405, 27.0828801053381, 0.8)
    pt3dadd(13.5499205775387, -91.0314609032925, 27.2935331161786, 0.8)
    pt3dadd(13.6340202350513, -92.0053975319446, 27.504186127019, 0.8)
    pt3dadd(13.718119892564, -92.9793341605966, 27.7148391378595, 0.8)
    pt3dadd(13.8059262324833, -93.9532076624587, 27.923083807734, 0.8)
    pt3dadd(13.9875408059043, -94.925483559779, 28.0703784994618, 0.8)
    pt3dadd(14.1691553793253, -95.8977594570992, 28.2176731911896, 0.8)
    pt3dadd(14.3507699527463, -96.8700353544195, 28.3649678829174, 0.8)
    pt3dadd(14.5323845261672, -97.8423112517398, 28.5122625746452, 0.8)
    pt3dadd(14.7139990995882, -98.8145871490601, 28.659557266373, 0.8)
    pt3dadd(14.8956136730092, -99.7868630463803, 28.8068519581008, 0.8)
    pt3dadd(15.0979352794205, -100.755212456419, 28.8722428603574, 0.8)
    pt3dadd(15.3497325424161, -101.71418024542, 28.7419396830859, 0.8)
    pt3dadd(15.6015298054116, -102.67314803442, 28.6116365058144, 0.8)
    pt3dadd(15.8533270684072, -103.632115823421, 28.4813333285429, 0.8)
    pt3dadd(16.1051243314027, -104.591083612422, 28.3510301512714, 0.8)
    pt3dadd(16.4169487658963, -105.471751014955, 28.5383522053906, 0.8)
    pt3dadd(16.7787511096204, -106.287226446754, 28.9901252504118, 0.8)
    pt3dadd(17.1405534533444, -107.102701878553, 29.4418982954331, 0.8)
    pt3dadd(17.5023557970684, -107.918177310353, 29.8936713404543, 0.8)
    pt3dadd(17.8641581407924, -108.733652742152, 30.3454443854755, 0.8)
    pt3dadd(18.2259604845164, -109.549128173951, 30.7972174304967, 0.8)
    pt3dadd(18.5877628282405, -110.36460360575, 31.248990475518, 0.8)
    pt3dadd(18.8624281354031, -111.298673330709, 31.2128441453583, 0.8)
    pt3dadd(19.1200613874573, -112.255923836383, 31.0813276945874, 0.8)
    pt3dadd(19.3776946395116, -113.213174342057, 30.9498112438165, 0.8)
    pt3dadd(19.6353278915658, -114.170424847731, 30.8182947930457, 0.8)
    pt3dadd(19.89296114362, -115.127675353404, 30.6867783422748, 0.8)
    pt3dadd(20.1505943956742, -116.084925859078, 30.5552618915039, 0.8)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(20.1505943956742, -116.084925859078, 30.5552618915039, 0.8)
    pt3dadd(20.4180625822288, -117.038635329411, 30.4217496317745, 0.8)
    pt3dadd(20.7787572365507, -117.958778921186, 30.2693188709056, 0.8)
    pt3dadd(21.1394518908727, -118.878922512961, 30.1168881100368, 0.8)
    pt3dadd(21.5001465451946, -119.799066104736, 29.964457349168, 0.8)
    pt3dadd(21.8608411995165, -120.719209696511, 29.8120265882992, 0.8)
    pt3dadd(21.9406944158484, -121.677005423796, 29.6205115260082, 0.8)
    pt3dadd(21.8847121117071, -122.653012485778, 29.4100924285293, 0.8)
    pt3dadd(21.9724762835774, -123.586943969571, 29.4360615547647, 0.790573096330043)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(21.9724762835774, -123.586943969571, 29.4360615547647, 0.767304054889251)
    pt3dadd(22.3967642386241, -124.448120980222, 29.7342967980053, 0.767304054889251)
    pt3dadd(22.7848819971029, -125.3124614859, 30.0541093928125, 0.744035013448458)
    pt3dadd(23.1729997555817, -126.176801991578, 30.3739219876197, 0.720765972007666)
    pt3dadd(23.5611175140604, -127.041142497256, 30.6937345824268, 0.697496930566874)
    pt3dadd(23.9492352725392, -127.905483002935, 31.013547177234, 0.674227889126081)
    pt3dadd(24.337353031018, -128.769823508613, 31.3333597720412, 0.650958847685289)
    pt3dadd(24.7597516899902, -129.632834382615, 31.6047584648797, 0.64)
    pt3dadd(25.2126680787792, -130.49466158467, 31.833057870407, 0.64)
    pt3dadd(25.6655844675682, -131.356488786726, 32.0613572759343, 0.64)
    pt3dadd(26.1185008563572, -132.218315988781, 32.2896566814616, 0.64)
    pt3dadd(26.5714172451462, -133.080143190836, 32.517956086989, 0.64)
    pt3dadd(27.0243336339353, -133.941970392891, 32.7462554925163, 0.64)
    pt3dadd(27.4772500227243, -134.803797594946, 32.9745548980436, 0.64)
    pt3dadd(27.9301664115133, -135.665624797001, 33.2028543035709, 0.64)
    pt3dadd(28.3587979611038, -136.538834265325, 33.4305899614713, 0.64)
    pt3dadd(28.7227481181974, -137.442359801464, 33.656824107205, 0.64)
    pt3dadd(29.0866982752909, -138.345885337604, 33.8830582529386, 0.64)
    pt3dadd(29.4506484323845, -139.249410873743, 34.1092923986723, 0.64)
    pt3dadd(29.814598589478, -140.152936409882, 34.3355265444059, 0.64)
    pt3dadd(30.1785487465716, -141.056461946021, 34.5617606901396, 0.64)
    pt3dadd(30.5424989036652, -141.959987482161, 34.7879948358732, 0.64)
    pt3dadd(30.9443557945169, -142.84551558879, 35.0111763373166, 0.64)
    pt3dadd(31.4434563726407, -143.68487415683, 35.2265267660909, 0.64)
    pt3dadd(31.9425569507644, -144.524232724871, 35.4418771948652, 0.64)
    pt3dadd(32.4416575288881, -145.363591292912, 35.6572276236394, 0.64)
    pt3dadd(32.9407581070119, -146.202949860952, 35.8725780524137, 0.64)
    pt3dadd(33.4398586851356, -147.042308428993, 36.087928481188, 0.64)
    pt3dadd(33.9389592632594, -147.881666997034, 36.3032789099622, 0.64)
    pt3dadd(34.4380598413831, -148.721025565074, 36.5186293387365, 0.64)
    pt3dadd(34.9079549579319, -149.580454990793, 36.7174602174077, 0.64)
    pt3dadd(35.3578678694857, -150.45361677926, 36.9049885170822, 0.64)
    pt3dadd(35.8077807810395, -151.326778567727, 37.0925168167568, 0.64)
    pt3dadd(36.2576936925933, -152.199940356193, 37.2800451164314, 0.64)
    pt3dadd(36.7076066041471, -153.07310214466, 37.4675734161059, 0.64)
    pt3dadd(37.1575195157009, -153.946263933127, 37.6551017157805, 0.64)
    pt3dadd(37.6074324272548, -154.819425721594, 37.842630015455, 0.64)
    pt3dadd(38.0573453388086, -155.69258751006, 38.0301583151296, 0.64)
    pt3dadd(38.5072582503624, -156.565749298527, 38.2176866148041, 0.64)
    pt3dadd(39.0230174658443, -157.373515482391, 38.4917409449046, 0.64)
    pt3dadd(39.5649549462433, -158.155282584156, 38.8001951002281, 0.64)
    pt3dadd(40.1068924266423, -158.937049685921, 39.1086492555516, 0.64)
    pt3dadd(40.6488299070413, -159.718816787686, 39.4171034108751, 0.64)
    pt3dadd(41.1907673874402, -160.500583889452, 39.7255575661986, 0.64)
    pt3dadd(41.7327048678392, -161.282350991217, 40.0340117215221, 0.64)
    pt3dadd(42.2746423482382, -162.064118092982, 40.3424658768456, 0.64)
    pt3dadd(42.8165798286372, -162.845885194748, 40.6509200321691, 0.64)
    pt3dadd(43.3585173090362, -163.627652296513, 40.9593741874926, 0.64)
    pt3dadd(43.8692999837263, -164.459148099944, 41.0546859500204, 0.64)
    pt3dadd(44.3554565976793, -165.329951547887, 40.9815210556978, 0.64)
    pt3dadd(44.8416132116323, -166.200754995829, 40.9083561613753, 0.64)
    pt3dadd(45.3277698255853, -167.071558443772, 40.8351912670528, 0.64)
    pt3dadd(45.8139264395383, -167.942361891714, 40.7620263727303, 0.64)
    pt3dadd(46.3000830534913, -168.813165339657, 40.6888614784077, 0.64)
    pt3dadd(46.7862396674443, -169.683968787599, 40.6156965840852, 0.64)
    pt3dadd(47.2723962813972, -170.554772235542, 40.5425316897627, 0.64)
    pt3dadd(47.7585528953502, -171.425575683484, 40.4693667954402, 0.64)
    pt3dadd(48.1228872181003, -172.316672638224, 40.7113772724195, 0.64)
    pt3dadd(48.4716597753933, -173.210361916502, 40.9936487324882, 0.64)
    pt3dadd(48.8204323326864, -174.104051194781, 41.275920192557, 0.64)
    pt3dadd(49.1692048899794, -174.997740473059, 41.5581916526258, 0.64)
    pt3dadd(49.5179774472724, -175.891429751338, 41.8404631126946, 0.64)
    pt3dadd(49.8667500045654, -176.785119029616, 42.1227345727634, 0.64)
    pt3dadd(50.2155225618584, -177.678808307895, 42.4050060328322, 0.64)
    pt3dadd(50.5642951191515, -178.572497586173, 42.687277492901, 0.64)
    pt3dadd(50.7859326296417, -179.521316895405, 42.7336838894057, 0.64)
    pt3dadd(50.9252339959707, -180.505839925131, 42.6273375999704, 0.64)
    pt3dadd(51.0645353622997, -181.490362954858, 42.5209913105352, 0.64)
    pt3dadd(51.2464851166746, -182.45508745575, 42.5419987119927, 0.64)
    pt3dadd(51.5111860370487, -183.381396639648, 42.8101119689943, 0.64)
    pt3dadd(51.7758869574228, -184.307705823546, 43.0782252259959, 0.64)
    pt3dadd(52.0405878777968, -185.234015007443, 43.3463384829975, 0.64)
    pt3dadd(52.3052887981709, -186.160324191341, 43.6144517399991, 0.64)
    pt3dadd(52.569989718545, -187.086633375239, 43.8825649970007, 0.64)
    pt3dadd(52.8346906389191, -188.012942559136, 44.1506782540023, 0.64)
    pt3dadd(53.0993915592932, -188.939251743034, 44.4187915110039, 0.64)
    pt3dadd(53.3640924796673, -189.865560926931, 44.6869047680056, 0.64)
    pt3dadd(53.6287934000414, -190.791870110829, 44.9550180250072, 0.64)
    pt3dadd(53.8934943204155, -191.718179294727, 45.2231312820088, 0.64)
    pt3dadd(54.1076046186747, -192.680887006422, 45.1845446989354, 0.64)
    pt3dadd(54.3083573569917, -193.653205106299, 45.0649794418158, 0.64)
    pt3dadd(54.5091100953088, -194.625523206176, 44.9454141846961, 0.64)
  }
}
proc shape3d_14() {
  adendMML[6] {
    pt3dadd(54.7098628336258, -195.597841306053, 44.8258489275765, 0.64)
    pt3dadd(54.9106155719429, -196.57015940593, 44.7062836704569, 0.64)
    pt3dadd(55.1113683102599, -197.542477505806, 44.5867184133372, 0.64)
    pt3dadd(55.312121048577, -198.514795605683, 44.4671531562176, 0.64)
    pt3dadd(55.512873786894, -199.48711370556, 44.3475878990979, 0.64)
    pt3dadd(55.7136265252111, -200.459431805437, 44.2280226419783, 0.64)
    pt3dadd(55.9143792635281, -201.431749905314, 44.1084573848587, 0.64)
    pt3dadd(56.1533621103169, -202.386673288266, 44.2169891670989, 0.64)
    pt3dadd(56.4060112324405, -203.335378509661, 44.4070597434352, 0.64)
    pt3dadd(56.6586603545642, -204.284083731056, 44.5971303197714, 0.64)
    pt3dadd(56.9113094766877, -205.23278895245, 44.7872008961077, 0.64)
    pt3dadd(57.1639585988114, -206.181494173845, 44.977271472444, 0.64)
    pt3dadd(57.416607720935, -207.130199395239, 45.1673420487803, 0.64)
    pt3dadd(57.6692568430586, -208.078904616634, 45.3574126251166, 0.64)
    pt3dadd(57.9219059651822, -209.027609838029, 45.5474832014529, 0.64)
    pt3dadd(58.1745550873058, -209.976315059423, 45.7375537777892, 0.64)
    pt3dadd(58.3735682393062, -210.944401113224, 45.736558354491, 0.64)
    pt3dadd(58.5412807630101, -211.923797342451, 45.624061529784, 0.64)
    pt3dadd(58.708993286714, -212.903193571678, 45.511564705077, 0.64)
    pt3dadd(58.8767058104179, -213.882589800905, 45.3990678803701, 0.64)
    pt3dadd(59.0444183341218, -214.861986030131, 45.2865710556631, 0.64)
    pt3dadd(59.2121308578257, -215.841382259358, 45.1740742309561, 0.64)
    pt3dadd(59.3798433815296, -216.820778488585, 45.0615774062492, 0.64)
    pt3dadd(59.6240115012122, -217.758735230451, 45.1390298897608, 0.64)
    pt3dadd(59.9638645721146, -218.644830034994, 45.4542058526134, 0.64)
    pt3dadd(60.303717643017, -219.530924839537, 45.769381815466, 0.64)
    pt3dadd(60.6435707139194, -220.417019644081, 46.0845577783186, 0.64)
    pt3dadd(60.9834237848218, -221.303114448624, 46.3997337411712, 0.64)
    pt3dadd(61.3232768557242, -222.189209253167, 46.7149097040237, 0.64)
    pt3dadd(61.6631299266265, -223.07530405771, 47.0300856668763, 0.64)
    pt3dadd(62.0029829975289, -223.961398862253, 47.3452616297289, 0.64)
    pt3dadd(61.9769390916921, -224.95894438955, 47.4097722204696, 0.64)
    pt3dadd(61.9507849284148, -225.956523500812, 47.474207277046, 0.64)
    pt3dadd(61.9246307651375, -226.954102612075, 47.5386423336224, 0.64)
    pt3dadd(61.8984766018602, -227.951681723337, 47.6030773901987, 0.64)
    pt3dadd(61.8723224385829, -228.9492608346, 47.6675124467751, 0.64)
    pt3dadd(61.8461682753057, -229.946839945862, 47.7319475033515, 0.64)
    pt3dadd(61.9792748194817, -230.905008456103, 47.964192597461, 0.64)
    pt3dadd(62.1420431171368, -231.855836878818, 48.2276917280759, 0.64)
    pt3dadd(62.3048114147919, -232.806665301534, 48.4911908586907, 0.64)
    pt3dadd(62.467579712447, -233.757493724249, 48.7546899893055, 0.64)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(62.467579712447, -233.757493724249, 48.7546899893055, 0.64)
    pt3dadd(62.6303480101021, -234.708322146965, 49.0181891199204, 0.64)
    pt3dadd(62.7931163077572, -235.65915056968, 49.2816882505352, 0.64)
    pt3dadd(62.9558846054123, -236.609978992396, 49.54518738115, 0.64)
    pt3dadd(63.1186529030674, -237.560807415111, 49.8086865117648, 0.64)
    pt3dadd(63.2814212007224, -238.511635837827, 50.0721856423797, 0.64)
    pt3dadd(63.6052506353557, -239.432005951764, 50.2810562937625, 0.64)
    pt3dadd(63.9529613944695, -240.347859862918, 50.4818269126802, 0.64)
    pt3dadd(64.3006721535833, -241.263713774072, 50.6825975315978, 0.64)
    pt3dadd(64.648382912697, -242.179567685226, 50.8833681505155, 0.64)
    pt3dadd(64.9960936718108, -243.095421596379, 51.0841387694331, 0.64)
    pt3dadd(65.3438044309245, -244.011275507533, 51.2849093883507, 0.64)
    pt3dadd(65.6915151900383, -244.927129418687, 51.4856800072684, 0.64)
    pt3dadd(66.039225949152, -245.842983329841, 51.686450626186, 0.64)
    pt3dadd(66.4775999845129, -246.647253509155, 52.084606044675, 0.64)
    pt3dadd(66.9196988986861, -247.446939297789, 52.4908709699923, 0.64)
    pt3dadd(67.3617978128593, -248.246625086423, 52.8971358953095, 0.64)
    pt3dadd(67.8038967270324, -249.046310875058, 53.3034008206266, 0.64)
    pt3dadd(68.2459956412056, -249.845996663692, 53.7096657459439, 0.64)
    pt3dadd(68.6880945553788, -250.645682452327, 54.1159306712611, 0.64)
    pt3dadd(69.130193469552, -251.445368240961, 54.5221955965783, 0.64)
    pt3dadd(69.5722923837251, -252.245054029596, 54.9284605218955, 0.64)
    pt3dadd(69.9485840580298, -253.034914911638, 55.4060496426714, 0.64)
    pt3dadd(70.2803806788052, -253.818132759484, 55.9318640635999, 0.64)
    pt3dadd(70.6121772995805, -254.601350607331, 56.4576784845285, 0.64)
    pt3dadd(70.9439739203558, -255.384568455178, 56.9834929054571, 0.64)
    pt3dadd(71.2757705411311, -256.167786303025, 57.5093073263856, 0.64)
    pt3dadd(71.6075671619064, -256.951004150871, 58.0351217473142, 0.64)
    pt3dadd(71.9393637826818, -257.734221998718, 58.5609361682427, 0.64)
    pt3dadd(72.2711604034571, -258.517439846565, 59.0867505891713, 0.64)
    pt3dadd(72.6029570242324, -259.300657694412, 59.6125650100999, 0.64)
    pt3dadd(72.9347536450077, -260.083875542258, 60.1383794310284, 0.64)
    pt3dadd(73.2665502657831, -260.867093390105, 60.664193851957, 0.64)
    pt3dadd(73.5983468865583, -261.650311237952, 61.1900082728856, 0.64)
    pt3dadd(73.9301435073337, -262.433529085798, 61.7158226938141, 0.64)
    pt3dadd(74.261940128109, -263.216746933645, 62.2416371147427, 0.64)
    pt3dadd(74.5937367488843, -263.999964781492, 62.7674515356712, 0.64)
    pt3dadd(74.9071844234328, -264.818471489642, 63.1461193977068, 0.64)
    pt3dadd(75.1508125931999, -265.771255704535, 62.9648804539157, 0.64)
    pt3dadd(75.394440762967, -266.724039919428, 62.7836415101246, 0.64)
    pt3dadd(75.6380689327342, -267.676824134322, 62.6024025663335, 0.64)
    pt3dadd(75.8816971025013, -268.629608349215, 62.4211636225424, 0.64)
    pt3dadd(76.1253252722685, -269.582392564108, 62.2399246787514, 0.64)
    pt3dadd(76.3689534420357, -270.535176779001, 62.0586857349603, 0.64)
    pt3dadd(76.6125816118028, -271.487960993894, 61.8774467911692, 0.64)
    pt3dadd(76.8562097815699, -272.440745208787, 61.6962078473781, 0.64)
    pt3dadd(77.0998379513371, -273.39352942368, 61.514968903587, 0.64)
    pt3dadd(77.3434661211042, -274.346313638573, 61.3337299597959, 0.64)
    pt3dadd(77.5986145127771, -275.284414087781, 61.2629706425738, 0.64)
    pt3dadd(77.8995167964567, -276.164196265437, 61.6309939238412, 0.64)
    pt3dadd(78.2004190801364, -277.043978443093, 61.9990172051087, 0.64)
    pt3dadd(78.501321363816, -277.923760620749, 62.3670404863761, 0.64)
    pt3dadd(78.8022236474956, -278.803542798405, 62.7350637676435, 0.64)
    pt3dadd(79.1031259311753, -279.683324976062, 63.103087048911, 0.64)
    pt3dadd(79.4040282148549, -280.563107153718, 63.4711103301784, 0.64)
    pt3dadd(79.7049304985345, -281.442889331374, 63.8391336114458, 0.64)
    pt3dadd(80.0058327822141, -282.32267150903, 64.2071568927133, 0.64)
    pt3dadd(80.3067350658937, -283.202453686687, 64.5751801739807, 0.64)
    pt3dadd(80.6076373495734, -284.082235864343, 64.9432034552482, 0.64)
    pt3dadd(80.908539633253, -284.962018041999, 65.3112267365156, 0.64)
    pt3dadd(81.1946774217121, -285.869643972104, 65.6069759716616, 0.64)
    pt3dadd(81.4644929380634, -286.808051401825, 65.8228256484743, 0.64)
    pt3dadd(81.7343084544146, -287.746458831546, 66.0386753252869, 0.64)
    pt3dadd(82.0041239707658, -288.684866261267, 66.2545250020996, 0.64)
    pt3dadd(82.273939487117, -289.623273690989, 66.4703746789122, 0.64)
    pt3dadd(82.5437550034683, -290.56168112071, 66.6862243557249, 0.64)
    pt3dadd(82.4231998230801, -290.737362770253, 65.8607240737853, 0.64)
    pt3dadd(82.2440097756591, -290.798480685693, 64.8788098579204, 0.64)
    pt3dadd(82.0648197282381, -290.859598601132, 63.8968956420555, 0.64)
    pt3dadd(81.885629680817, -290.920716516572, 62.9149814261906, 0.64)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(21.9724762835774, -123.586943969571, 29.4360615547647, 0.751556813897948)
    pt3dadd(22.1458613328483, -124.47006529267, 29.8839730707576, 0.751556813897948)
    pt3dadd(22.3554165786871, -125.350023120742, 30.3103072351838, 0.71708078021504)
    pt3dadd(22.5649718245259, -126.229980948813, 30.73664139961, 0.682604746532133)
    pt3dadd(22.7745270703647, -127.109938776885, 31.1629755640362, 0.648128712849226)
    pt3dadd(22.970472180968, -128.062046678789, 31.1735873324833, 0.64)
    pt3dadd(23.1622182733156, -129.03641442396, 31.0559398368009, 0.64)
    pt3dadd(23.3539643656632, -130.010782169131, 30.9382923411186, 0.64)
    pt3dadd(23.5457104580107, -130.985149914302, 30.8206448454363, 0.64)
    pt3dadd(23.7730139659273, -131.94180463573, 30.833128365683, 0.64)
    pt3dadd(24.0636814562905, -132.86689441613, 31.0775078006683, 0.64)
    pt3dadd(24.3543489466538, -133.791984196531, 31.3218872356536, 0.64)
    pt3dadd(24.645016437017, -134.717073976932, 31.5662666706389, 0.64)
    pt3dadd(24.9356839273803, -135.642163757333, 31.8106461056242, 0.64)
    pt3dadd(25.2263514177435, -136.567253537734, 32.0550255406095, 0.64)
    pt3dadd(25.5170189081068, -137.492343318135, 32.2994049755948, 0.64)
    pt3dadd(25.8054795386684, -138.418197448171, 32.5374588745229, 0.64)
    pt3dadd(25.9524557237617, -139.393054955819, 32.3699750221778, 0.64)
    pt3dadd(26.099431908855, -140.367912463468, 32.2024911698327, 0.64)
    pt3dadd(26.2464080939482, -141.342769971117, 32.0350073174875, 0.64)
    pt3dadd(26.3933842790415, -142.317627478765, 31.8675234651424, 0.64)
    pt3dadd(26.5403604641348, -143.292484986414, 31.7000396127973, 0.64)
    pt3dadd(26.6873366492282, -144.267342494063, 31.5325557604521, 0.64)
    pt3dadd(26.8343128343214, -145.242200001711, 31.365071908107, 0.64)
    pt3dadd(26.9812890194147, -146.21705750936, 31.1975880557619, 0.64)
    pt3dadd(27.128265204508, -147.191915017009, 31.0301042034168, 0.64)
    pt3dadd(27.3419399766338, -148.151045266838, 31.0726723108457, 0.64)
    pt3dadd(27.60015556734, -149.099672971284, 31.255511549179, 0.64)
    pt3dadd(27.8583711580462, -150.048300675729, 31.4383507875122, 0.64)
    pt3dadd(28.1165867487524, -150.996928380175, 31.6211900258455, 0.64)
    pt3dadd(28.3748023394586, -151.945556084621, 31.8040292641787, 0.64)
    pt3dadd(28.6330179301648, -152.894183789067, 31.986868502512, 0.64)
    pt3dadd(28.891233520871, -153.842811493512, 32.1697077408453, 0.64)
    pt3dadd(29.1494491115772, -154.791439197958, 32.3525469791785, 0.64)
    pt3dadd(29.4076647022834, -155.740066902404, 32.5353862175118, 0.64)
    pt3dadd(29.6658802929895, -156.688694606849, 32.718225455845, 0.64)
    pt3dadd(29.9240958836957, -157.637322311295, 32.9010646941783, 0.64)
    pt3dadd(30.1823114744019, -158.585950015741, 33.0839039325115, 0.64)
    pt3dadd(30.3981804666379, -159.536727155625, 33.3061715302147, 0.64)
    pt3dadd(30.6137902158183, -160.48751745421, 33.528680505708, 0.64)
    pt3dadd(30.8293999649986, -161.438307752795, 33.7511894812014, 0.64)
    pt3dadd(31.045009714179, -162.38909805138, 33.9736984566947, 0.64)
    pt3dadd(31.2606194633593, -163.339888349965, 34.1962074321881, 0.64)
    pt3dadd(31.4762292125397, -164.29067864855, 34.4187164076814, 0.64)
    pt3dadd(31.6918389617201, -165.241468947135, 34.6412253831747, 0.64)
    pt3dadd(31.9074487109004, -166.19225924572, 34.8637343586681, 0.64)
    pt3dadd(32.1230584600808, -167.143049544305, 35.0862433341614, 0.64)
    pt3dadd(32.3327028073997, -168.095221313425, 35.2996751717296, 0.64)
    pt3dadd(32.3500324566801, -169.091929409694, 35.2204750827861, 0.64)
    pt3dadd(32.3673621059606, -170.088637505962, 35.1412749938426, 0.64)
    pt3dadd(32.3846917552411, -171.085345602231, 35.0620749048991, 0.64)
    pt3dadd(32.4020214045215, -172.082053698499, 34.9828748159557, 0.64)
    pt3dadd(32.419351053802, -173.078761794768, 34.9036747270122, 0.64)
    pt3dadd(32.4366807030824, -174.075469891036, 34.8244746380687, 0.64)
    pt3dadd(32.4540103523629, -175.072177987305, 34.7452745491252, 0.64)
    pt3dadd(32.4713400016434, -176.068886083573, 34.6660744601817, 0.64)
    pt3dadd(32.4886696509238, -177.065594179842, 34.5868743712383, 0.64)
    pt3dadd(32.5059993002043, -178.06230227611, 34.5076742822948, 0.64)
    pt3dadd(32.5233289494847, -179.059010372379, 34.4284741933513, 0.64)
    pt3dadd(32.5479942126765, -180.048291702428, 34.4525385417238, 0.64)
    pt3dadd(32.5863705260166, -181.023691608879, 34.669615212676, 0.64)
    pt3dadd(32.6247468393567, -181.999091515329, 34.8866918836282, 0.64)
    pt3dadd(32.6631231526967, -182.974491421779, 35.1037685545805, 0.64)
    pt3dadd(32.7014994660368, -183.949891328229, 35.3208452255327, 0.64)
    pt3dadd(32.7398757793769, -184.925291234679, 35.5379218964849, 0.64)
    pt3dadd(32.778252092717, -185.900691141129, 35.7549985674372, 0.64)
    pt3dadd(32.816628406057, -186.876091047579, 35.9720752383894, 0.64)
    pt3dadd(32.8547779608478, -187.853925627737, 36.16327449549, 0.64)
    pt3dadd(32.8909718002375, -188.85275844096, 36.1312898551432, 0.64)
    pt3dadd(32.9271656396273, -189.851591254184, 36.0993052147964, 0.64)
    pt3dadd(32.963359479017, -190.850424067408, 36.0673205744496, 0.64)
    pt3dadd(32.9995533184067, -191.849256880631, 36.0353359341028, 0.64)
    pt3dadd(33.0357471577964, -192.848089693855, 36.0033512937561, 0.64)
    pt3dadd(33.0719409971861, -193.846922507078, 35.9713666534093, 0.64)
    pt3dadd(33.1081348365758, -194.845755320302, 35.9393820130625, 0.64)
    pt3dadd(33.1443286759656, -195.844588133525, 35.9073973727157, 0.64)
    pt3dadd(33.1805225153553, -196.843420946749, 35.8754127323689, 0.64)
    pt3dadd(33.216716354745, -197.842253759972, 35.8434280920221, 0.64)
    pt3dadd(33.3601311678335, -198.802031737265, 35.9924586929815, 0.64)
    pt3dadd(33.5879594307006, -199.731062433334, 36.2839998537135, 0.64)
    pt3dadd(33.8157876935677, -200.660093129403, 36.5755410144455, 0.64)
    pt3dadd(34.0436159564348, -201.589123825472, 36.8670821751774, 0.64)
    pt3dadd(34.2714442193019, -202.51815452154, 37.1586233359094, 0.64)
    pt3dadd(34.4992724821689, -203.447185217609, 37.4501644966414, 0.64)
    pt3dadd(34.727100745036, -204.376215913678, 37.7417056573733, 0.64)
    pt3dadd(34.9549290079031, -205.305246609747, 38.0332468181053, 0.64)
    pt3dadd(35.1827572707702, -206.234277305816, 38.3247879788373, 0.64)
    pt3dadd(35.1001216143162, -207.225864300208, 38.2847437133818, 0.64)
    pt3dadd(35.0051958151247, -208.219927672008, 38.2315731811886, 0.64)
    pt3dadd(34.9102700159333, -209.213991043808, 38.1784026489953, 0.64)
    pt3dadd(34.8153442167418, -210.208054415608, 38.125232116802, 0.64)
    pt3dadd(35.0863489881959, -210.670431284374, 38.7154078404705, 0.655162896387178)
    pt3dadd(35.5179406584685, -210.899480047988, 39.587913023285, 0.676979958081257)
    pt3dadd(35.9495323287411, -211.128528811601, 40.4604182060996, 0.698797019775335)
    pt3dadd(36.3811239990137, -211.357577575215, 41.3329233889142, 0.720614081469414)
    pt3dadd(36.8127156692863, -211.586626338829, 42.2054285717287, 0.742431143163493)
    pt3dadd(37.2443073395589, -211.815675102443, 43.0779337545433, 0.764248204857572)
    pt3dadd(37.6758990098315, -212.044723866057, 43.9504389373579, 0.78606526655165)
    pt3dadd(38.1712641387521, -212.355763547991, 44.7424942481278, 0.8)
    pt3dadd(38.77937084854, -212.811750453178, 45.392326666378, 0.8)
    pt3dadd(39.387477558328, -213.267737358365, 46.0421590846283, 0.8)
    pt3dadd(39.995584268116, -213.723724263552, 46.6919915028786, 0.8)
    pt3dadd(40.603690977904, -214.179711168738, 47.3418239211288, 0.8)
    pt3dadd(41.170151223729, -214.704432224262, 47.9339057370942, 0.8)
    pt3dadd(41.5102644502062, -215.602720890951, 48.2121151267153, 0.8)
    pt3dadd(41.8503776766835, -216.50100955764, 48.4903245163363, 0.8)
    pt3dadd(42.1904909031607, -217.399298224329, 48.7685339059574, 0.8)
    pt3dadd(42.5306041296379, -218.297586891018, 49.0467432955784, 0.8)
    pt3dadd(42.9642391711806, -219.166263211519, 49.2576050928129, 0.8)
    pt3dadd(43.4830767347947, -220.007961371065, 49.4071102459024, 0.8)
    pt3dadd(44.0019142984088, -220.849659530611, 49.5566153989918, 0.8)
    pt3dadd(44.5207518620228, -221.691357690156, 49.7061205520813, 0.8)
    pt3dadd(45.0395894256369, -222.533055849702, 49.8556257051708, 0.8)
    pt3dadd(45.4316603480862, -223.416359159546, 50.0345283225606, 0.8)
    pt3dadd(45.5924777894757, -224.375560479688, 50.2670591333878, 0.8)
    pt3dadd(45.7532952308652, -225.334761799829, 50.499589944215, 0.8)
    pt3dadd(45.9141126722548, -226.29396311997, 50.7321207550423, 0.8)
    pt3dadd(46.0749301136443, -227.253164440112, 50.9646515658695, 0.8)
    pt3dadd(46.2357475550338, -228.212365760253, 51.1971823766967, 0.8)
    pt3dadd(46.3965649964233, -229.171567080394, 51.4297131875239, 0.8)
    pt3dadd(46.6114057033613, -230.131915626209, 51.4296942780362, 0.8)
    pt3dadd(46.8561720608705, -231.092899666274, 51.3008567641953, 0.8)
    pt3dadd(47.1009384183797, -232.053883706338, 51.1720192503544, 0.8)
    pt3dadd(47.3457047758888, -233.014867746403, 51.0431817365135, 0.8)
    pt3dadd(47.590471133398, -233.975851786468, 50.9143442226726, 0.8)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(47.590471133398, -233.975851786468, 50.9143442226726, 0.8)
    pt3dadd(47.8352374909072, -234.936835826532, 50.7855067088317, 0.8)
    pt3dadd(48.0800038484163, -235.897819866597, 50.6566691949908, 0.8)
    pt3dadd(48.2142487159084, -236.863214731732, 50.7895737258339, 0.8)
    pt3dadd(48.3042437668512, -237.830375571975, 51.0272726949236, 0.8)
    pt3dadd(48.394238817794, -238.797536412218, 51.2649716640133, 0.8)
    pt3dadd(48.4842338687368, -239.764697252461, 51.5026706331029, 0.8)
    pt3dadd(48.5742289196796, -240.731858092704, 51.7403696021927, 0.8)
    pt3dadd(48.6642239706224, -241.699018932947, 51.9780685712823, 0.8)
    pt3dadd(48.7529465733933, -242.66629205555, 52.2125904377417, 0.8)
    pt3dadd(48.6777530670231, -243.648029333067, 52.0378396021716, 0.8)
    pt3dadd(48.6025595606529, -244.629766610585, 51.8630887666015, 0.8)
    pt3dadd(48.5273660542827, -245.611503888102, 51.6883379310314, 0.8)
  }
}
proc shape3d_15() {
  adendOML[6] {
    pt3dadd(48.4521725479125, -246.593241165619, 51.5135870954613, 0.8)
    pt3dadd(48.3769790415422, -247.574978443137, 51.3388362598911, 0.8)
    pt3dadd(48.301785535172, -248.556715720654, 51.164085424321, 0.8)
    pt3dadd(48.2265920288018, -249.538452998172, 50.9893345887509, 0.8)
    pt3dadd(48.1513985224316, -250.520190275689, 50.8145837531808, 0.8)
    pt3dadd(48.0661885660074, -251.458495675811, 50.480118455074, 0.8)
    pt3dadd(47.9808127806975, -252.396082032779, 50.1430089795184, 0.8)
    pt3dadd(47.8954369953876, -253.333668389748, 49.8058995039628, 0.8)
    pt3dadd(47.8100612100778, -254.271254746716, 49.4687900284072, 0.8)
    pt3dadd(47.7246854247679, -255.208841103685, 49.1316805528516, 0.8)
    pt3dadd(47.639309639458, -256.146427460653, 48.794571077296, 0.8)
    pt3dadd(47.5539338541481, -257.084013817621, 48.4574616017404, 0.8)
    pt3dadd(47.4887115816449, -258.02391734406, 48.1353229074736, 0.8)
    pt3dadd(47.6946961735348, -258.995003139923, 48.014646791457, 0.8)
    pt3dadd(47.9006807654248, -259.966088935786, 47.8939706754405, 0.8)
    pt3dadd(48.1066653573147, -260.937174731649, 47.7732945594239, 0.8)
    pt3dadd(48.3126499492047, -261.908260527512, 47.6526184434073, 0.8)
    pt3dadd(48.5186345410946, -262.879346323375, 47.5319423273908, 0.8)
    pt3dadd(48.7246191329846, -263.850432119238, 47.4112662113743, 0.8)
    pt3dadd(48.9306037248745, -264.821517915101, 47.2905900953577, 0.8)
    pt3dadd(49.1312474003112, -265.793755505032, 47.1710560089681, 0.8)
    pt3dadd(49.296271579071, -266.773674609043, 47.0591383159181, 0.8)
    pt3dadd(49.4612957578307, -267.753593713055, 46.9472206228681, 0.8)
    pt3dadd(49.6263199365905, -268.733512817067, 46.8353029298181, 0.8)
    pt3dadd(49.7913441153502, -269.713431921078, 46.7233852367681, 0.8)
    pt3dadd(49.95636829411, -270.69335102509, 46.6114675437181, 0.8)
    pt3dadd(50.1213924728697, -271.673270129102, 46.4995498506681, 0.8)
    pt3dadd(50.261497674445, -272.657564121588, 46.3930358820763, 0.8)
    pt3dadd(50.3945049074545, -273.643104265578, 46.2880611205738, 0.8)
    pt3dadd(50.5275121404641, -274.628644409567, 46.1830863590713, 0.8)
    pt3dadd(50.6605193734736, -275.614184553556, 46.0781115975688, 0.8)
    pt3dadd(50.7935266064831, -276.599724697546, 45.9731368360664, 0.8)
    pt3dadd(50.9265338394927, -277.585264841535, 45.8681620745639, 0.8)
    pt3dadd(51.0300389589725, -278.573770526117, 45.7697519681068, 0.8)
    pt3dadd(51.0548947268764, -279.570182011905, 45.6888425014641, 0.8)
    pt3dadd(51.0797504947804, -280.566593497693, 45.6079330348214, 0.8)
    pt3dadd(51.1046062626844, -281.56300498348, 45.5270235681786, 0.8)
    pt3dadd(51.1294620305883, -282.559416469268, 45.4461141015359, 0.8)
    pt3dadd(51.1173746194675, -283.550309453175, 45.3741216932887, 0.8)
    pt3dadd(50.7845925869701, -284.493297683953, 45.3795360686875, 0.8)
    pt3dadd(50.4518105544727, -285.436285914732, 45.3849504440862, 0.8)
    pt3dadd(50.1190285219753, -286.37927414551, 45.390364819485, 0.8)
    pt3dadd(49.7862464894779, -287.322262376288, 45.3957791948838, 0.8)
    pt3dadd(49.4534644569805, -288.265250607066, 45.4011935702826, 0.8)
    pt3dadd(49.1476587745544, -289.20009192234, 45.542895551891, 0.8)
    pt3dadd(48.8592284994825, -290.129685827376, 45.772380078913, 0.8)
    pt3dadd(48.5707982244106, -291.059279732411, 46.001864605935, 0.8)
    pt3dadd(48.2823679493387, -291.988873637447, 46.231349132957, 0.8)
    pt3dadd(47.9363226404453, -292.898427811945, 46.4367989930514, 0.8)
    pt3dadd(47.4461414714803, -293.757848477793, 46.5821211892469, 0.8)
    pt3dadd(46.9559603025153, -294.61726914364, 46.7274433854423, 0.8)
    pt3dadd(46.3661253091792, -295.405337025742, 46.8960132223568, 0.8)
    pt3dadd(45.7594627038334, -296.181356228647, 47.0685086715659, 0.8)
    pt3dadd(45.1528000984877, -296.957375431552, 47.2410041207749, 0.8)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(-1.97748509072721, -0.146286743298048, 13.1861807476186, 0.8)
    pt3dadd(-2.26986925660063, -0.958060425742474, 13.6771781129783, 0.8)
    pt3dadd(-2.56174935654744, -1.76906823950004, 14.1842011235796, 0.8)
    pt3dadd(-2.85362945649425, -2.58007605325761, 14.6912241341809, 0.8)
    pt3dadd(-3.14550955644106, -3.39108386701518, 15.1982471447822, 0.8)
    pt3dadd(-3.43738965638787, -4.20209168077275, 15.7052701553835, 0.8)
    pt3dadd(-3.72926975633468, -5.01309949453031, 16.2122931659848, 0.8)
    pt3dadd(-4.19647945448216, -5.86198183182964, 16.0600831640245, 0.8)
    pt3dadd(-4.67794275391667, -6.71394321774962, 15.8542801314935, 0.8)
    pt3dadd(-5.15940605335119, -7.56590460366957, 15.6484770989624, 0.8)
    pt3dadd(-5.6408693527857, -8.41786598958953, 15.4426740664314, 0.8)
    pt3dadd(-5.93635119410659, -9.33082817135676, 15.5587907727788, 0.8)
    pt3dadd(-6.14573926386612, -10.2720285906128, 15.8239292404416, 0.8)
    pt3dadd(-6.35512733362565, -11.2132290098689, 16.0890677081043, 0.8)
    pt3dadd(-6.56451540338518, -12.154429429125, 16.354206175767, 0.8)
    pt3dadd(-6.7739034731447, -13.0956298483811, 16.6193446434298, 0.8)
    pt3dadd(-6.98329154290423, -14.0368302676372, 16.8844831110925, 0.8)
    pt3dadd(-7.19267961266376, -14.9780306868933, 17.1496215787552, 0.8)
    pt3dadd(-7.3880809952838, -15.9362497609861, 17.3220197053034, 0.8)
    pt3dadd(-7.56206464162749, -16.920529406638, 17.3524050629691, 0.8)
    pt3dadd(-7.73604828797118, -17.9048090522898, 17.3827904206349, 0.8)
    pt3dadd(-7.91003193431487, -18.8890886979416, 17.4131757783006, 0.8)
    pt3dadd(-8.08401558065856, -19.8733683435934, 17.4435611359663, 0.8)
    pt3dadd(-8.25799922700224, -20.8576479892453, 17.4739464936321, 0.8)
    pt3dadd(-8.43314242860018, -21.8417011142575, 17.5028874799549, 0.8)
    pt3dadd(-8.65048590703607, -22.8175103598489, 17.4792627344564, 0.8)
    pt3dadd(-8.86782938547195, -23.7933196054402, 17.455637988958, 0.8)
    pt3dadd(-9.08517286390784, -24.7691288510315, 17.4320132434596, 0.8)
    pt3dadd(-9.30251634234372, -25.7449380966229, 17.4083884979611, 0.8)
    pt3dadd(-9.51985982077961, -26.7207473422142, 17.3847637524627, 0.8)
    pt3dadd(-9.73720329921549, -27.6965565878056, 17.3611390069642, 0.8)
    pt3dadd(-9.85732041587465, -28.6429140722777, 17.5945802211254, 0.8)
    pt3dadd(-9.932281911475, -29.5755930384929, 17.9474126461617, 0.8)
    pt3dadd(-10.0072434070753, -30.5082720047082, 18.300245071198, 0.8)
    pt3dadd(-10.0822049026757, -31.4409509709235, 18.6530774962343, 0.8)
    pt3dadd(-10.157166398276, -32.3736299371387, 19.0059099212706, 0.8)
    pt3dadd(-10.2321278938764, -33.306308903354, 19.3587423463069, 0.8)
    pt3dadd(-10.3070893894767, -34.2389878695692, 19.7115747713432, 0.8)
    pt3dadd(-10.3820508850771, -35.1716668357845, 20.0644071963796, 0.8)
    pt3dadd(-10.4570123806774, -36.1043458019997, 20.4172396214159, 0.8)
    pt3dadd(-10.6280929089721, -37.0724266757737, 20.4803575652057, 0.8)
    pt3dadd(-10.8292703601238, -38.0515926432167, 20.4527597147534, 0.8)
    pt3dadd(-11.0304478112756, -39.0307586106596, 20.425161864301, 0.8)
    pt3dadd(-11.2316252624273, -40.0099245781026, 20.3975640138487, 0.8)
    pt3dadd(-11.432802713579, -40.9890905455455, 20.3699661633964, 0.8)
    pt3dadd(-11.6339801647308, -41.9682565129885, 20.342368312944, 0.8)
    pt3dadd(-11.8301799906641, -42.9473107372712, 20.3322968830542, 0.8)
    pt3dadd(-11.9835403845191, -43.9254032552554, 20.4730648334546, 0.8)
    pt3dadd(-12.1369007783741, -44.9034957732396, 20.6138327838549, 0.8)
    pt3dadd(-12.2902611722291, -45.8815882912238, 20.7546007342553, 0.8)
    pt3dadd(-12.4436215660842, -46.8596808092081, 20.8953686846556, 0.8)
    pt3dadd(-12.5969819599392, -47.8377733271923, 21.036136635056, 0.8)
    pt3dadd(-12.7076577263064, -48.8245079813596, 21.0803668055971, 0.8)
    pt3dadd(-12.7720979086246, -49.8206037155542, 21.0200281677103, 0.8)
    pt3dadd(-12.8365380909428, -50.8166994497488, 20.9596895298236, 0.8)
    pt3dadd(-12.900978273261, -51.8127951839435, 20.8993508919368, 0.8)
    pt3dadd(-12.9654184555792, -52.8088909181381, 20.8390122540501, 0.8)
    pt3dadd(-13.0298586378974, -53.8049866523328, 20.7786736161633, 0.8)
    pt3dadd(-13.0942988202156, -54.8010823865274, 20.7183349782766, 0.8)
    pt3dadd(-12.9763967161105, -55.7547695724584, 20.8881718860791, 0.8)
    pt3dadd(-12.7596151574677, -56.6854597114492, 21.1828269743054, 0.8)
    pt3dadd(-12.5428335988249, -57.61614985044, 21.4774820625318, 0.8)
    pt3dadd(-12.3260520401821, -58.5468399894308, 21.7721371507582, 0.8)
    pt3dadd(-12.1092704815393, -59.4775301284216, 22.0667922389845, 0.8)
    pt3dadd(-11.8924889228965, -60.4082202674124, 22.3614473272109, 0.8)
    pt3dadd(-11.6757073642537, -61.3389104064032, 22.6561024154372, 0.8)
    pt3dadd(-11.4589258056109, -62.269600545394, 22.9507575036636, 0.8)
    pt3dadd(-11.2879239084338, -63.2339333648015, 22.9896922436011, 0.8)
    pt3dadd(-11.1431438181052, -64.217536135963, 22.8821547431288, 0.8)
    pt3dadd(-10.9989675120117, -65.1999525548629, 22.8152080800324, 0.8)
    pt3dadd(-10.8583015249942, -66.1754716837489, 22.9842510014278, 0.8)
    pt3dadd(-10.7176355379768, -67.1509908126349, 23.1532939228232, 0.8)
    pt3dadd(-10.5769695509593, -68.1265099415209, 23.3223368442186, 0.8)
    pt3dadd(-10.4363035639418, -69.1020290704069, 23.491379765614, 0.8)
    pt3dadd(-10.2956375769244, -70.0775481992929, 23.6604226870094, 0.8)
    pt3dadd(-10.1549715899069, -71.0530673281789, 23.8294656084049, 0.8)
    pt3dadd(-10.0143056028894, -72.0285864570649, 23.9985085298003, 0.8)
    pt3dadd(-9.87363961587198, -73.004105585951, 24.1675514511957, 0.8)
    pt3dadd(-9.73297362885452, -73.9796247148369, 24.3365943725911, 0.8)
    pt3dadd(-9.59230764183705, -74.955143843723, 24.5056372939865, 0.8)
    pt3dadd(-9.49073204927782, -75.8648170440005, 24.8863707920175, 0.8)
    pt3dadd(-9.40243871480299, -76.7521169060269, 25.3390331849056, 0.8)
    pt3dadd(-9.31414538032816, -77.6394167680533, 25.7916955777938, 0.8)
    pt3dadd(-9.22585204585333, -78.5267166300798, 26.2443579706819, 0.8)
    pt3dadd(-9.1375587113785, -79.4140164921062, 26.69702036357, 0.8)
    pt3dadd(-9.04926537690367, -80.3013163541326, 27.1496827564581, 0.8)
    pt3dadd(-8.96097204242885, -81.1886162161591, 27.6023451493463, 0.8)
    pt3dadd(-8.90943395601675, -82.0853654361738, 28.0415904737998, 0.8)
    pt3dadd(-8.86352640440041, -82.9835622029133, 28.478780438144, 0.8)
    pt3dadd(-8.81761885278406, -83.8817589696529, 28.9159704024882, 0.8)
    pt3dadd(-8.77171130116771, -84.7799557363923, 29.3531603668324, 0.8)
    pt3dadd(-8.72580374955136, -85.6781525031318, 29.7903503311766, 0.8)
    pt3dadd(-8.67989619793502, -86.5763492698713, 30.2275402955208, 0.8)
    pt3dadd(-8.63398864631867, -87.4745460366109, 30.664730259865, 0.8)
    pt3dadd(-8.58808109470232, -88.3727428033504, 31.1019202242092, 0.8)
    pt3dadd(-8.54217354308597, -89.2709395700899, 31.5391101885534, 0.8)
    pt3dadd(-8.58821215268049, -90.2520403531638, 31.5550029701399, 0.8)
    pt3dadd(-8.65097359277368, -91.248219414597, 31.4942717656455, 0.8)
    pt3dadd(-8.71373503286687, -92.2443984760303, 31.433540561151, 0.8)
    pt3dadd(-8.77649647296006, -93.2405775374636, 31.3728093566565, 0.8)
    pt3dadd(-8.83925791305325, -94.2367565988968, 31.3120781521621, 0.8)
    pt3dadd(-8.90201935314643, -95.2329356603301, 31.2513469476676, 0.8)
    pt3dadd(-8.96478079323962, -96.2291147217634, 31.1906157431731, 0.8)
    pt3dadd(-9.02754223333281, -97.2252937831967, 31.1298845386787, 0.8)
    pt3dadd(-9.090303673426, -98.2214728446299, 31.0691533341842, 0.8)
    pt3dadd(-9.08769080952477, -99.2066643455215, 31.1591055458997, 0.8)
    pt3dadd(-9.03369648080604, -100.183220084028, 31.3674886115671, 0.8)
    pt3dadd(-8.97970215208732, -101.159775822534, 31.5758716772345, 0.8)
    pt3dadd(-8.92570782336859, -102.13633156104, 31.784254742902, 0.8)
    pt3dadd(-8.87171349464986, -103.112887299546, 31.9926378085694, 0.8)
    pt3dadd(-8.81771916593113, -104.089443038052, 32.2010208742368, 0.8)
    pt3dadd(-8.7637248372124, -105.065998776558, 32.4094039399042, 0.8)
    pt3dadd(-8.77395469148004, -106.030242926265, 32.6570356707766, 0.8)
    pt3dadd(-8.881425400701, -106.975846287331, 32.964093206429, 0.8)
    pt3dadd(-8.98889610992196, -107.921449648396, 33.2711507420814, 0.8)
    pt3dadd(-9.09636681914292, -108.867053009462, 33.5782082777338, 0.8)
    pt3dadd(-9.20383752836388, -109.812656370527, 33.8852658133862, 0.8)
    pt3dadd(-9.31130823758484, -110.758259731593, 34.1923233490386, 0.8)
    pt3dadd(-9.4187789468058, -111.703863092659, 34.499380884691, 0.8)
    pt3dadd(-9.52624965602677, -112.649466453724, 34.8064384203434, 0.8)
    pt3dadd(-9.63372036524773, -113.59506981479, 35.1134959559959, 0.8)
    pt3dadd(-9.74119107446869, -114.540673175856, 35.4205534916483, 0.8)
    pt3dadd(-9.7362166353646, -115.471300974234, 35.7828078985226, 0.8)
    pt3dadd(-9.71231465846447, -116.399407983293, 36.1543534209483, 0.8)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-9.71231465846447, -116.399407983293, 36.1543534209483, 0.8)
    pt3dadd(-9.68841268156433, -117.327514992353, 36.525898943374, 0.8)
    pt3dadd(-9.6645107046642, -118.255622001413, 36.8974444657998, 0.8)
    pt3dadd(-9.64060872776407, -119.183729010472, 37.2689899882255, 0.8)
    pt3dadd(-9.61670675086394, -120.111836019532, 37.6405355106512, 0.8)
    pt3dadd(-9.61927768003746, -121.051493644963, 37.9748806622259, 0.8)
    pt3dadd(-9.68451017331549, -122.018491664614, 38.2211722613758, 0.8)
    pt3dadd(-9.74974266659354, -122.985489684265, 38.4674638605257, 0.8)
    pt3dadd(-9.81497515987157, -123.952487703916, 38.7137554596756, 0.8)
    pt3dadd(-9.88020765314961, -124.919485723567, 38.9600470588255, 0.8)
    pt3dadd(-9.94544014642764, -125.886483743218, 39.2063386579755, 0.8)
    pt3dadd(-10.0106726397057, -126.853481762869, 39.4526302571254, 0.8)
    pt3dadd(-10.0759051329837, -127.82047978252, 39.6989218562753, 0.8)
    pt3dadd(-10.1411376262618, -128.787477802171, 39.9452134554252, 0.8)
    pt3dadd(-10.2063701195398, -129.754475821822, 40.1915050545751, 0.8)
    pt3dadd(-10.2716026128178, -130.721473841473, 40.437796653725, 0.8)
    pt3dadd(-10.3647378450766, -131.688580021571, 40.6723614904991, 0.8)
    pt3dadd(-10.4886605610816, -132.655805544363, 40.8939871851233, 0.8)
    pt3dadd(-10.6125832770865, -133.623031067155, 41.1156128797474, 0.8)
    pt3dadd(-10.7365059930915, -134.590256589947, 41.3372385743716, 0.8)
    pt3dadd(-10.8604287090964, -135.557482112739, 41.5588642689958, 0.8)
    pt3dadd(-10.9843514251013, -136.524707635531, 41.78048996362, 0.8)
    pt3dadd(-11.1082741411063, -137.491933158323, 42.0021156582442, 0.8)
    pt3dadd(-11.2321968571112, -138.459158681115, 42.2237413528684, 0.8)
    pt3dadd(-11.3561195731162, -139.426384203907, 42.4453670474925, 0.8)
    pt3dadd(-11.4800422891211, -140.393609726699, 42.6669927421167, 0.8)
    pt3dadd(-11.7193770882555, -141.32916137188, 42.9228682413503, 0.8)
    pt3dadd(-11.9735306927531, -142.260646120297, 43.1831413840063, 0.8)
    pt3dadd(-12.2276842972507, -143.192130868714, 43.4434145266623, 0.8)
    pt3dadd(-12.4818379017483, -144.12361561713, 43.7036876693183, 0.8)
    pt3dadd(-12.7359915062458, -145.055100365547, 43.9639608119742, 0.8)
    pt3dadd(-12.9901451107434, -145.986585113964, 44.2242339546302, 0.8)
    pt3dadd(-13.244298715241, -146.91806986238, 44.4845070972862, 0.8)
    pt3dadd(-13.4984523197386, -147.849554610797, 44.7447802399422, 0.8)
    pt3dadd(-13.7526059242361, -148.781039359214, 45.0050533825981, 0.8)
    pt3dadd(-14.0067595287337, -149.71252410763, 45.2653265252541, 0.8)
    pt3dadd(-14.2609131332313, -150.644008856047, 45.5255996679101, 0.8)
    pt3dadd(-14.5150667377288, -151.575493604464, 45.785872810566, 0.8)
    pt3dadd(-14.8176890971033, -152.479477489602, 46.0802490476537, 0.8)
    pt3dadd(-15.172265425832, -153.353983022933, 46.4111806104867, 0.8)
    pt3dadd(-15.5268417545608, -154.228488556264, 46.7421121733197, 0.8)
    pt3dadd(-15.8814180832895, -155.102994089595, 47.0730437361526, 0.8)
    pt3dadd(-16.2359944120183, -155.977499622926, 47.4039752989856, 0.8)
    pt3dadd(-16.590570740747, -156.852005156256, 47.7349068618186, 0.8)
    pt3dadd(-16.9451470694758, -157.726510689587, 48.0658384246516, 0.8)
    pt3dadd(-17.2997233982045, -158.601016222918, 48.3967699874845, 0.8)
    pt3dadd(-17.6542997269333, -159.475521756249, 48.7277015503175, 0.8)
    pt3dadd(-18.008876055662, -160.35002728958, 49.0586331131505, 0.8)
    pt3dadd(-18.3634523843908, -161.22453282291, 49.3895646759834, 0.8)
    pt3dadd(-18.7180287131195, -162.099038356241, 49.7204962388164, 0.8)
    pt3dadd(-19.0726050418483, -162.973543889572, 50.0514278016494, 0.8)
    pt3dadd(-19.427181370577, -163.848049422903, 50.3823593644823, 0.8)
    pt3dadd(-19.787700407895, -164.727414293072, 50.6907387833158, 0.8)
    pt3dadd(-20.1654506957269, -165.620869110467, 50.9337268680391, 0.8)
    pt3dadd(-20.5432009835587, -166.514323927861, 51.1767149527623, 0.8)
    pt3dadd(-20.9209512713906, -167.407778745256, 51.4197030374855, 0.8)
    pt3dadd(-21.2987015592224, -168.30123356265, 51.6626911222088, 0.8)
    pt3dadd(-21.6764518470543, -169.194688380045, 51.905679206932, 0.8)
    pt3dadd(-22.0542021348861, -170.088143197439, 52.1486672916552, 0.8)
    pt3dadd(-22.431952422718, -170.981598014834, 52.3916553763784, 0.8)
    pt3dadd(-22.8097027105498, -171.875052832228, 52.6346434611017, 0.8)
    pt3dadd(-23.1874529983817, -172.768507649623, 52.8776315458249, 0.8)
    pt3dadd(-23.565301573755, -173.663074006338, 53.1108902918781, 0.8)
    pt3dadd(-23.9457858798725, -174.587447989921, 53.0832419415794, 0.8)
    pt3dadd(-24.3262701859899, -175.511821973503, 53.0555935912808, 0.8)
    pt3dadd(-24.7067544921074, -176.436195957086, 53.0279452409822, 0.8)
    pt3dadd(-25.0872387982248, -177.360569940668, 53.0002968906836, 0.8)
    pt3dadd(-25.4677231043423, -178.284943924251, 52.9726485403849, 0.8)
    pt3dadd(-25.8482074104597, -179.209317907833, 52.9450001900863, 0.8)
    pt3dadd(-26.2286917165772, -180.133691891416, 52.9173518397877, 0.8)
    pt3dadd(-26.6091760226946, -181.058065874998, 52.8897034894891, 0.8)
  }
}
proc shape3d_16() {
  adendMML[8] {
    pt3dadd(-26.9896603288121, -181.982439858581, 52.8620551391905, 0.8)
    pt3dadd(-27.3701446349296, -182.906813842163, 52.8344067888918, 0.8)
    pt3dadd(-27.750628941047, -183.831187825745, 52.8067584385932, 0.8)
    pt3dadd(-28.1311132471645, -184.755561809328, 52.7791100882946, 0.8)
    pt3dadd(-28.3981746358561, -185.652281495143, 53.0871354466481, 0.8)
    pt3dadd(-28.6385722957782, -186.542500142969, 53.474071777543, 0.8)
    pt3dadd(-28.8789699557003, -187.432718790795, 53.8610081084379, 0.8)
    pt3dadd(-29.1193676156224, -188.322937438621, 54.2479444393328, 0.8)
    pt3dadd(-29.3597652755445, -189.213156086448, 54.6348807702277, 0.8)
    pt3dadd(-29.6001629354666, -190.103374734274, 55.0218171011226, 0.8)
    pt3dadd(-29.8405605953887, -190.9935933821, 55.4087534320175, 0.8)
    pt3dadd(-30.0809582553108, -191.883812029926, 55.7956897629125, 0.8)
    pt3dadd(-30.3213559152329, -192.774030677753, 56.1826260938074, 0.8)
    pt3dadd(-30.5603159906924, -193.663852392267, 56.571306268556, 0.8)
    pt3dadd(-30.7875026552024, -194.550423334998, 56.9742680322164, 0.8)
    pt3dadd(-31.0146893197124, -195.43699427773, 57.3772297958767, 0.8)
    pt3dadd(-31.2418759842224, -196.323565220462, 57.7801915595371, 0.8)
    pt3dadd(-31.4690626487324, -197.210136163194, 58.1831533231975, 0.8)
    pt3dadd(-31.6962493132425, -198.096707105926, 58.5861150868579, 0.8)
    pt3dadd(-31.9234359777525, -198.983278048658, 58.9890768505183, 0.8)
    pt3dadd(-32.1506226422625, -199.86984899139, 59.3920386141786, 0.8)
    pt3dadd(-32.3778093067725, -200.756419934122, 59.795000377839, 0.8)
    pt3dadd(-32.6049959712825, -201.642990876854, 60.1979621414994, 0.8)
    pt3dadd(-32.8321826357925, -202.529561819586, 60.6009239051598, 0.8)
    pt3dadd(-33.0593693003025, -203.416132762317, 61.0038856688202, 0.8)
    pt3dadd(-33.2865559648125, -204.302703705049, 61.4068474324805, 0.8)
    pt3dadd(-33.5379471710523, -205.201878295612, 61.7549640319551, 0.8)
    pt3dadd(-33.8351477836089, -206.124906493113, 61.9992809214926, 0.8)
    pt3dadd(-34.1323483961656, -207.047934690615, 62.2435978110301, 0.8)
    pt3dadd(-34.4295490087223, -207.970962888116, 62.4879147005676, 0.8)
    pt3dadd(-34.726749621279, -208.893991085617, 62.7322315901051, 0.8)
    pt3dadd(-35.0239502338357, -209.817019283119, 62.9765484796426, 0.8)
    pt3dadd(-35.3211508463923, -210.74004748062, 63.2208653691801, 0.8)
    pt3dadd(-35.618351458949, -211.663075678122, 63.4651822587176, 0.8)
    pt3dadd(-35.9155520715057, -212.586103875623, 63.7094991482551, 0.8)
    pt3dadd(-36.2127526840624, -213.509132073124, 63.9538160377926, 0.8)
    pt3dadd(-36.509953296619, -214.432160270626, 64.1981329273301, 0.8)
    pt3dadd(-36.7860255267504, -215.351037036088, 64.4660570505502, 0.8)
    pt3dadd(-36.9034446041933, -216.238740673008, 64.9112480356914, 0.8)
    pt3dadd(-37.0208636816363, -217.126444309928, 65.3564390208326, 0.8)
    pt3dadd(-37.1382827590792, -218.014147946849, 65.8016300059737, 0.8)
    pt3dadd(-37.2557018365221, -218.901851583769, 66.2468209911149, 0.8)
    pt3dadd(-37.373120913965, -219.789555220689, 66.6920119762561, 0.8)
    pt3dadd(-37.490539991408, -220.677258857609, 67.1372029613973, 0.8)
    pt3dadd(-37.6079590688509, -221.56496249453, 67.5823939465385, 0.8)
    pt3dadd(-37.7568310249017, -222.468688949525, 67.9755573557104, 0.8)
    pt3dadd(-37.9577268423224, -223.398917553233, 68.282665830662, 0.8)
    pt3dadd(-38.158622659743, -224.32914615694, 68.5897743056136, 0.8)
    pt3dadd(-38.3595184771637, -225.259374760648, 68.8968827805652, 0.8)
    pt3dadd(-38.5604142945844, -226.189603364355, 69.2039912555169, 0.8)
    pt3dadd(-38.7613101120051, -227.119831968063, 69.5110997304685, 0.8)
    pt3dadd(-38.9622059294258, -228.050060571771, 69.8182082054201, 0.8)
    pt3dadd(-39.1631017468465, -228.980289175478, 70.1253166803717, 0.8)
    pt3dadd(-39.3639975642671, -229.910517779186, 70.4324251553233, 0.8)
    pt3dadd(-39.5648933816878, -230.840746382893, 70.739533630275, 0.8)
    pt3dadd(-39.7657891991085, -231.770974986601, 71.0466421052266, 0.8)
    pt3dadd(-39.9666850165292, -232.701203590309, 71.3537505801782, 0.8)
    pt3dadd(-40.1675808339499, -233.631432194016, 71.6608590551298, 0.8)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(-40.1675808339499, -233.631432194016, 71.6608590551298, 0.8)
    pt3dadd(-40.3684766513706, -234.561660797724, 71.9679675300815, 0.8)
    pt3dadd(-40.567978356293, -235.528117620193, 72.0290619636377, 0.8)
    pt3dadd(-40.7669744313009, -236.507714035903, 72.0009296964109, 0.8)
    pt3dadd(-40.9659705063087, -237.487310451614, 71.972797429184, 0.8)
    pt3dadd(-41.1649665813166, -238.466906867324, 71.9446651619572, 0.8)
    pt3dadd(-41.3639626563244, -239.446503283034, 71.9165328947304, 0.8)
    pt3dadd(-41.5629587313323, -240.426099698744, 71.8884006275036, 0.8)
    pt3dadd(-41.7619548063401, -241.405696114454, 71.8602683602768, 0.8)
    pt3dadd(-41.960950881348, -242.385292530164, 71.8321360930499, 0.8)
    pt3dadd(-42.1599469563558, -243.364888945874, 71.8040038258231, 0.8)
    pt3dadd(-42.3704743170968, -244.341885621937, 71.7787210867342, 0.8)
    pt3dadd(-42.6212860638304, -245.309800143772, 71.7633931344801, 0.8)
    pt3dadd(-42.872097810564, -246.277714665608, 71.748065182226, 0.8)
    pt3dadd(-43.1229095572975, -247.245629187443, 71.7327372299718, 0.8)
    pt3dadd(-43.3737213040311, -248.213543709279, 71.7174092777177, 0.8)
    pt3dadd(-43.6245330507647, -249.181458231114, 71.7020813254636, 0.8)
    pt3dadd(-43.8753447974983, -250.14937275295, 71.6867533732095, 0.8)
    pt3dadd(-44.1261565442319, -251.117287274786, 71.6714254209554, 0.8)
    pt3dadd(-44.3292696817627, -252.095668915446, 71.6653491394604, 0.8)
    pt3dadd(-44.5038542002225, -253.080310957631, 71.6648062979392, 0.8)
    pt3dadd(-44.6784387186823, -254.064952999815, 71.664263456418, 0.8)
    pt3dadd(-44.8530232371421, -255.049595042, 71.6637206148968, 0.8)
    pt3dadd(-45.027607755602, -256.034237084184, 71.6631777733756, 0.8)
    pt3dadd(-45.2021922740618, -257.018879126369, 71.6626349318544, 0.8)
    pt3dadd(-45.3767767925216, -258.003521168553, 71.6620920903332, 0.8)
    pt3dadd(-45.5513613109815, -258.988163210738, 71.661549248812, 0.8)
    pt3dadd(-45.7259458294413, -259.972805252922, 71.6610064072908, 0.8)
    pt3dadd(-45.9005303479011, -260.957447295107, 71.6604635657696, 0.8)
    pt3dadd(-46.0751148663609, -261.942089337291, 71.6599207242484, 0.8)
    pt3dadd(-46.2575884530974, -262.92378297748, 71.6881358123892, 0.8)
    pt3dadd(-46.4592577758751, -263.898302545336, 71.7863248958761, 0.8)
    pt3dadd(-46.6609270986527, -264.872822113192, 71.8845139793631, 0.8)
    pt3dadd(-46.8625964214303, -265.847341681048, 71.98270306285, 0.8)
    pt3dadd(-47.0642657442079, -266.821861248904, 72.080892146337, 0.8)
    pt3dadd(-47.2659350669855, -267.79638081676, 72.179081229824, 0.8)
    pt3dadd(-47.4676043897631, -268.770900384616, 72.2772703133109, 0.8)
    pt3dadd(-47.6692737125407, -269.745419952472, 72.3754593967979, 0.8)
    pt3dadd(-47.8709430353183, -270.719939520328, 72.4736484802848, 0.8)
    pt3dadd(-48.072612358096, -271.694459088185, 72.5718375637718, 0.8)
    pt3dadd(-48.3101538303838, -272.650501386796, 72.7356522549845, 0.8)
    pt3dadd(-48.5641472086181, -273.598069526487, 72.9295645662375, 0.8)
    pt3dadd(-48.8181405868525, -274.545637666178, 73.1234768774905, 0.8)
    pt3dadd(-49.0721339650869, -275.493205805869, 73.3173891887436, 0.8)
    pt3dadd(-49.3261273433212, -276.44077394556, 73.5113014999966, 0.8)
    pt3dadd(-49.5801207215556, -277.388342085251, 73.7052138112496, 0.8)
    pt3dadd(-49.83411409979, -278.335910224942, 73.8991261225027, 0.8)
    pt3dadd(-50.0881074780243, -279.283478364633, 74.0930384337557, 0.8)
    pt3dadd(-50.3421008562587, -280.231046504324, 74.2869507450087, 0.8)
    pt3dadd(-50.6569696465105, -281.120916145928, 74.2602369639048, 0.8)
    pt3dadd(-51.0901520838438, -281.898646591858, 73.8047280952112, 0.8)
    pt3dadd(-51.5233345211771, -282.676377037789, 73.3492192265175, 0.8)
    pt3dadd(-51.9565169585103, -283.45410748372, 72.8937103578239, 0.8)
    pt3dadd(-52.3896993958436, -284.23183792965, 72.4382014891303, 0.8)
    pt3dadd(-52.8228818331769, -285.009568375581, 71.9826926204366, 0.8)
    pt3dadd(-53.2560642705102, -285.787298821512, 71.527183751743, 0.8)
    pt3dadd(-53.6921629146036, -286.676830139514, 71.3916545352584, 0.8)
    pt3dadd(-54.1282662247934, -287.566540345261, 71.2566373043873, 0.8)
    pt3dadd(-54.5643695349831, -288.456250551007, 71.1216200735163, 0.8)
    pt3dadd(-55.0004728451729, -289.345960756753, 70.9866028426452, 0.8)
    pt3dadd(-55.4365761553627, -290.2356709625, 70.8515856117742, 0.8)
    pt3dadd(-55.8594273382695, -291.11935515102, 70.6889599954106, 0.8)
    pt3dadd(-56.0938392433667, -291.917352090242, 70.1337555792356, 0.8)
  }
  GCL[6] {pt3dclear()
    pt3dadd(-3.55759753367334, 30.7808137386175, 6.28696109917176, 2.02551125421017)
    pt3dadd(-3.28566275366279, 30.2104294466044, 5.46538816956938, 2.02551125421017)
    pt3dadd(-3.11550724792268, 29.6194164490769, 4.67687644446961, 1.87741106551216)
    pt3dadd(-2.91454698830968, 28.9826835072232, 3.9895531572247, 1.74102538001937)
    pt3dadd(-2.5238799693272, 28.0643906959921, 3.92538468271811, 1.67678182070151)
    pt3dadd(-2.13321295034471, 27.1460978847609, 3.86121620821152, 1.61253826138364)
    pt3dadd(-1.74254593136223, 26.2278050735297, 3.79704773370493, 1.54829470206578)
    pt3dadd(-1.35187891237975, 25.3095122622986, 3.73287925919834, 1.48405114274792)
    pt3dadd(-0.961764158538828, 24.3927850116479, 3.65388093274613, 1.42216178677857)
    pt3dadd(-0.57457810779757, 23.4843600451351, 3.49623879901399, 1.37275694617164)
    pt3dadd(-0.187392057056314, 22.5759350786223, 3.33859666528185, 1.32335210556472)
    pt3dadd(0.199793993684942, 21.6675101121095, 3.1809545315497, 1.2739472649578)
    pt3dadd(0.780318860612407, 20.8794042875244, 2.98790452449428, 1.27)
  }
  GCL[7] {pt3dclear()
    pt3dadd(0.780318860612407, 20.8794042875244, 2.98790452449428, 1.27)
    pt3dadd(1.26024106217844, 20.1125426803195, 2.58823486598823, 1.27)
    pt3dadd(1.69377759487209, 19.3499471491491, 2.10813682323143, 1.27)
    pt3dadd(2.12731412756575, 18.5873516179787, 1.62803878047462, 1.27)
    pt3dadd(2.50707879779704, 17.8842519253905, 1.05266095513085, 1.27)
    pt3dadd(2.7815492832701, 17.2976549078658, 0.290709584218428, 1.27)
    pt3dadd(3.05601976874317, 16.7110578903411, -0.471241786693999, 1.27)
    pt3dadd(3.33049025421624, 16.1244608728164, -1.23319315760642, 1.27)
    pt3dadd(3.60496073968931, 15.5378638552917, -1.99514452851885, 1.27)
    pt3dadd(3.87943122516238, 14.9512668377671, -2.75709589943128, 1.27)
    pt3dadd(4.13117948799284, 14.4785003613616, -3.59717338633309, 1.27)
    pt3dadd(4.37435704607223, 14.0486701757818, -4.46671963973826, 1.27)
    pt3dadd(4.61753460415162, 13.618839990202, -5.33626589314343, 1.27)
    pt3dadd(4.860712162231, 13.1890098046222, -6.20581214654861, 1.27)
    pt3dadd(5.10388972031039, 12.7591796190424, -7.07535839995379, 1.27)
    pt3dadd(5.34706727838978, 12.3293494334626, -7.94490465335896, 1.27)
    pt3dadd(5.60044139433775, 11.8857193404357, -8.79052125652021, 1.27)
    pt3dadd(6.13519677556067, 11.0612709881291, -8.97578214454604, 1.27)
    pt3dadd(6.6699521567836, 10.2368226358226, -9.16104303257188, 1.27)
    pt3dadd(7.20470753800653, 9.412374283516, -9.34630392059771, 1.27)
    pt3dadd(7.73946291922946, 8.58792593120944, -9.53156480862354, 1.27)
    pt3dadd(8.27421830045239, 7.76347757890288, -9.71682569664937, 1.27)
    pt3dadd(8.81219373355018, 6.94127503379305, -9.90095103448217, 1.27)
    pt3dadd(9.47804463210569, 6.20825851790629, -10.03998113313, 1.27)
    pt3dadd(10.1438955306612, 5.47524200201951, -10.1790112317779, 1.27)
    pt3dadd(10.8097464292167, 4.74222548613275, -10.3180413304258, 1.27)
    pt3dadd(11.4755973277722, 4.00920897024598, -10.4570714290737, 1.27)
    pt3dadd(12.1414482263277, 3.27619245435922, -10.5961015277215, 1.27)
    pt3dadd(12.8072991248833, 2.54317593847245, -10.7351316263694, 1.27)
    pt3dadd(13.4732507717646, 1.81133657670108, -10.8786932932061, 1.27)
    pt3dadd(14.1406246879973, 1.09611516075332, -11.0862273436699, 1.27)
    pt3dadd(14.80799860423, 0.380893744805549, -11.2937613941336, 1.27)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(14.80799860423, 0.380893744805549, -11.2937613941336, 1.27)
    pt3dadd(15.4753725204627, -0.334327671142218, -11.5012954445974, 1.27)
    pt3dadd(16.1427464366954, -1.04954908708998, -11.7088294950611, 1.27)
    pt3dadd(16.8101203529282, -1.76477050303775, -11.9163635455249, 1.27)
    pt3dadd(17.4774942691609, -2.47999191898552, -12.1238975959886, 1.27)
    pt3dadd(18.1448681853936, -3.19521333493327, -12.3314316464524, 1.27)
    pt3dadd(18.674034682707, -3.99948269912788, -12.5138838065251, 1.27)
    pt3dadd(19.0041099475594, -4.93202785273541, -12.6602048781986, 1.27)
    pt3dadd(19.3341852124119, -5.86457300634296, -12.8065259498722, 1.27)
    pt3dadd(19.6642604772643, -6.79711815995053, -12.9528470215457, 1.27)
    pt3dadd(19.3863847740959, -7.72163729694971, -12.958672899508, 1.27)
    pt3dadd(19.0023219039125, -8.64475457753134, -12.9399593205335, 1.27)
    pt3dadd(18.6182590337291, -9.56787185811299, -12.921245741559, 1.27)
    pt3dadd(18.7101775809636, -10.5333830417102, -13.0152545904635, 1.27)
    pt3dadd(18.9018122677708, -11.5077755727623, -13.1328783220924, 1.27)
    pt3dadd(19.093446954578, -12.4821681038143, -13.2505020537213, 1.27)
    pt3dadd(19.2850816413852, -13.4565606348663, -13.3681257853502, 1.27)
    pt3dadd(19.7279949908189, -14.2968895938933, -13.5334521836678, 1.27)
    pt3dadd(20.3828712345989, -15.0241309454974, -13.7390175548995, 1.27)
    pt3dadd(21.0377474783788, -15.7513722971016, -13.9445829261312, 1.27)
    pt3dadd(21.6926237221587, -16.4786136487058, -14.150148297363, 1.27)
    pt3dadd(22.3474999659387, -17.2058550003099, -14.3557136685947, 1.27)
    pt3dadd(23.0023762097186, -17.9330963519141, -14.5612790398264, 1.27)
    pt3dadd(23.4019732119212, -18.8115761140877, -14.719517240553, 1.27)
    pt3dadd(23.6784095231905, -19.7630215707152, -14.8549222215344, 1.27)
    pt3dadd(23.9548458344597, -20.7144670273428, -14.9903272025157, 1.27)
    pt3dadd(24.231282145729, -21.6659124839704, -15.1257321834971, 1.27)
    pt3dadd(24.5077184569982, -22.617357940598, -15.2611371644784, 1.27)
    pt3dadd(24.7497374244171, -23.5778983932009, -15.3893090302163, 1.27)
    pt3dadd(24.9301815776859, -24.5547103712681, -15.5045403933756, 1.27)
    pt3dadd(25.1106257309546, -25.5315223493353, -15.619771756535, 1.27)
    pt3dadd(25.2910698842234, -26.5083343274025, -15.7350031196943, 1.27)
    pt3dadd(25.4715140374921, -27.4851463054697, -15.8502344828537, 1.27)
    pt3dadd(25.6519581907608, -28.4619582835369, -15.965465846013, 1.27)
    pt3dadd(25.8360541569407, -29.4379933825172, -16.0814788674434, 1.27)
    pt3dadd(26.0214400685817, -30.4137540611818, -16.1977679973612, 1.27)
    pt3dadd(26.2068259802227, -31.3895147398464, -16.314057127279, 1.27)
    pt3dadd(26.3922118918636, -32.3652754185111, -16.4303462571968, 1.27)
    pt3dadd(26.5775978035046, -33.3410360971757, -16.5466353871146, 1.27)
    pt3dadd(26.7629837151456, -34.3167967758403, -16.6629245170323, 1.27)
    pt3dadd(26.9483696267865, -35.2925574545049, -16.7792136469501, 1.27)
    pt3dadd(27.1337555384275, -36.2683181331695, -16.8955027768679, 1.27)
    pt3dadd(27.3191414500685, -37.2440788118341, -17.0117919067857, 1.27)
    pt3dadd(27.6386006565995, -38.1768466146656, -17.1556870243211, 1.27)
    pt3dadd(28.0048493486917, -39.0946105754219, -17.3092162003027, 1.27)
    pt3dadd(28.3710980407839, -40.0123745361782, -17.4627453762844, 1.27)
    pt3dadd(28.7373467328762, -40.9301384969346, -17.616274552266, 1.27)
    pt3dadd(29.1035954249684, -41.8479024576909, -17.7698037282476, 1.27)
    pt3dadd(29.4698441170607, -42.7656664184472, -17.9233329042292, 1.27)
    pt3dadd(29.8143970802339, -43.6915830168777, -18.0724850978407, 1.27)
    pt3dadd(30.092055409778, -44.6426367154425, -18.2081417028436, 1.27)
    pt3dadd(30.3697137393222, -45.5936904140073, -18.3437983078465, 1.27)
    pt3dadd(30.6473720688664, -46.5447441125722, -18.4794549128494, 1.27)
    pt3dadd(30.9250303984105, -47.495797811137, -18.6151115178523, 1.27)
    pt3dadd(31.2026887279547, -48.4468515097018, -18.7507681228552, 1.27)
    pt3dadd(31.4803470574989, -49.3979052082666, -18.8864247278581, 1.27)
    pt3dadd(31.758005387043, -50.3489589068314, -19.0220813328611, 1.27)
    pt3dadd(32.0545903223745, -51.28294902783, -19.2083489314227, 1.27)
    pt3dadd(32.3806729304631, -52.1903450604444, -19.4734952546061, 1.27)
    pt3dadd(32.7067555385518, -53.0977410930589, -19.7386415777895, 1.27)
    pt3dadd(33.0328381466405, -54.0051371256733, -20.0037879009729, 1.27)
    pt3dadd(33.3589207547291, -54.9125331582878, -20.2689342241563, 1.27)
    pt3dadd(33.6850033628178, -55.8199291909022, -20.5340805473397, 1.27)
    pt3dadd(34.0110859709065, -56.7273252235166, -20.799226870523, 1.27)
    pt3dadd(34.3371685789951, -57.6347212561311, -21.0643731937064, 1.27)
    pt3dadd(34.6519757586839, -58.5509540589348, -21.3049497878513, 1.27)
    pt3dadd(34.9174825496101, -59.505824525008, -21.4380983402025, 1.27)
    pt3dadd(35.1829893405363, -60.4606949910812, -21.5712468925537, 1.27)
    pt3dadd(35.4484961314626, -61.4155654571544, -21.7043954449049, 1.27)
    pt3dadd(35.7140029223888, -62.3704359232275, -21.8375439972561, 1.27)
    pt3dadd(35.979509713315, -63.3253063893007, -21.9706925496073, 1.27)
    pt3dadd(36.2450165042413, -64.280176855374, -22.1038411019585, 1.27)
    pt3dadd(36.4702177415667, -65.2458566533827, -22.2285310271724, 1.27)
    pt3dadd(36.6687546027419, -66.2186874285377, -22.3476250978315, 1.27)
    pt3dadd(36.867291463917, -67.1915182036926, -22.4667191684906, 1.27)
    pt3dadd(37.0658283250922, -68.1643489788475, -22.5858132391497, 1.27)
    pt3dadd(37.2643651862673, -69.1371797540025, -22.7049073098088, 1.27)
    pt3dadd(37.4629020474424, -70.1100105291574, -22.8240013804679, 1.27)
    pt3dadd(37.6614389086176, -71.0828413043124, -22.943095451127, 1.27)
    pt3dadd(37.8624783624208, -72.0550092655768, -23.0626183111955, 1.27)
    pt3dadd(38.1314341273639, -73.0091895312375, -23.1937778214399, 1.27)
    pt3dadd(38.400389892307, -73.9633697968982, -23.3249373316843, 1.27)
    pt3dadd(38.66934565725, -74.9175500625589, -23.4560968419288, 1.27)
  }
}
proc shape3d_17() {
  adendIML[11] {
    pt3dadd(38.9225195964366, -75.875996607765, -23.584677178437, 1.27)
    pt3dadd(39.1324666197902, -76.8461286264819, -23.7061930771715, 1.27)
    pt3dadd(39.3424136431438, -77.8162606451988, -23.827708975906, 1.27)
    pt3dadd(39.5539262141577, -78.7737243202595, -23.9504820496675, 1.25626159073191)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(39.5539262141577, -78.7737243202595, -23.9504820496675, 1.1161879780262)
    pt3dadd(39.5294525293359, -79.7512822807805, -23.6507945499654, 1.1161879780262)
    pt3dadd(39.5273428931907, -80.7166401462338, -23.389873602085, 0.976114365320482)
    pt3dadd(39.4780429630516, -81.7071751113752, -23.3911415144275, 0.95)
    pt3dadd(39.4179291270188, -82.7034795423042, -23.4524913932266, 0.95)
    pt3dadd(39.3578152909859, -83.6997839732332, -23.5138412720257, 0.95)
    pt3dadd(39.3318965710246, -84.6713101828035, -23.3637953840025, 0.95)
    pt3dadd(39.330224415806, -85.6252670193929, -23.0638561271165, 0.95)
    pt3dadd(39.3285522605874, -86.5792238559822, -22.7639168702305, 0.95)
    pt3dadd(39.3132517465979, -87.5530952832028, -22.7893252997383, 0.95)
    pt3dadd(39.291459981086, -88.5364521238122, -22.9696983658615, 0.95)
    pt3dadd(39.2696682155741, -89.5198089644215, -23.1500714319846, 0.95)
    pt3dadd(39.2478764500622, -90.5031658050309, -23.3304444981078, 0.95)
    pt3dadd(39.2260846845503, -91.4865226456403, -23.5108175642309, 0.95)
    pt3dadd(39.2042929190384, -92.4698794862496, -23.6911906303541, 0.95)
    pt3dadd(39.1825011535265, -93.453236326859, -23.8715636964772, 0.95)
    pt3dadd(39.1607093880146, -94.4365931674683, -24.0519367626004, 0.95)
    pt3dadd(39.1447074282441, -95.4205338769976, -24.2113597631148, 0.95)
    pt3dadd(39.2044988161297, -96.4121179137824, -24.0965290706663, 0.95)
    pt3dadd(39.2642902040154, -97.4037019505672, -23.9816983782177, 0.95)
    pt3dadd(39.324081591901, -98.3952859873521, -23.8668676857692, 0.95)
    pt3dadd(39.3838729797866, -99.3868700241368, -23.7520369933207, 0.95)
    pt3dadd(39.4098034799123, -100.381389468643, -23.7351329252085, 0.95)
    pt3dadd(39.4043055245537, -101.378633452788, -23.8091208199859, 0.95)
    pt3dadd(39.398807569195, -102.375877436933, -23.8831087147632, 0.95)
    pt3dadd(39.3933096138364, -103.373121421078, -23.9570966095406, 0.95)
    pt3dadd(39.3878116584778, -104.370365405223, -24.031084504318, 0.95)
    pt3dadd(39.3823137031191, -105.367609389368, -24.1050723990953, 0.95)
    pt3dadd(39.3832360421555, -106.364880598918, -24.1701193622793, 0.95)
    pt3dadd(39.448709185725, -107.362425537628, -24.1452725772775, 0.95)
    pt3dadd(39.5141823292944, -108.359970476338, -24.1204257922758, 0.95)
    pt3dadd(39.5796554728639, -109.357515415048, -24.0955790072741, 0.95)
    pt3dadd(39.6451286164333, -110.355060353758, -24.0707322222724, 0.95)
    pt3dadd(39.7106017600028, -111.352605292468, -24.0458854372706, 0.95)
    pt3dadd(39.7760749035722, -112.350150231179, -24.0210386522689, 0.95)
    pt3dadd(39.8415480471417, -113.347695169889, -23.9961918672672, 0.95)
    pt3dadd(39.8987522048131, -114.343681258111, -24.0369696833506, 0.95)
    pt3dadd(39.9501446673186, -115.338571738726, -24.1238704680302, 0.95)
    pt3dadd(40.001537129824, -116.333462219342, -24.2107712527098, 0.95)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(40.001537129824, -116.333462219342, -24.2107712527098, 0.95)
    pt3dadd(40.0529295923295, -117.328352699958, -24.2976720373894, 0.95)
    pt3dadd(40.1043220548349, -118.323243180573, -24.3845728220691, 0.95)
    pt3dadd(40.1557145173404, -119.318133661189, -24.4714736067487, 0.95)
    pt3dadd(40.2071069798458, -120.313024141805, -24.5583743914283, 0.95)
    pt3dadd(40.3193548340931, -121.295382912499, -24.6583323495795, 0.95)
    pt3dadd(40.6185068068786, -122.239253257932, -24.7983925801585, 0.95)
    pt3dadd(40.9176587796641, -123.183123603365, -24.9384528107374, 0.95)
    pt3dadd(41.179347162265, -124.135228787829, -25.0705140764084, 0.95)
    pt3dadd(41.2562029254209, -125.127961868904, -25.1631111682111, 0.95)
    pt3dadd(41.3330586885768, -126.120694949978, -25.2557082600138, 0.95)
    pt3dadd(41.4099144517327, -127.113428031052, -25.3483053518165, 0.95)
    pt3dadd(41.4867702148887, -128.106161112127, -25.4409024436192, 0.95)
    pt3dadd(41.5636259780446, -129.098894193201, -25.5334995354219, 0.95)
    pt3dadd(41.6404817412005, -130.091627274275, -25.6260966272246, 0.95)
    pt3dadd(41.7173375043564, -131.08436035535, -25.7186937190273, 0.95)
    pt3dadd(41.7941932675123, -132.077093436424, -25.81129081083, 0.95)
    pt3dadd(41.8671377071607, -133.070162858833, -25.9030132875671, 0.95)
    pt3dadd(41.9209279601378, -134.064879382205, -25.9904526769552, 0.95)
    pt3dadd(41.9747182131149, -135.059595905576, -26.0778920663433, 0.95)
    pt3dadd(42.028508466092, -136.054312428948, -26.1653314557315, 0.95)
    pt3dadd(42.0822987190691, -137.049028952319, -26.2527708451196, 0.95)
    pt3dadd(42.1360889720461, -138.04374547569, -26.3402102345078, 0.95)
    pt3dadd(42.1898792250232, -139.038461999062, -26.4276496238959, 0.95)
    pt3dadd(42.2436694780003, -140.033178522433, -26.515089013284, 0.95)
    pt3dadd(42.2974597309774, -141.027895045805, -26.6025284026722, 0.95)
    pt3dadd(42.3512499839545, -142.022611569176, -26.6899677920603, 0.95)
    pt3dadd(42.389348681694, -143.018047772339, -26.7738508616568, 0.95)
    pt3dadd(42.3900085295204, -144.015201076408, -26.8492488243975, 0.95)
    pt3dadd(42.3906683773469, -145.012354380477, -26.9246467871383, 0.95)
    pt3dadd(42.3913282251734, -146.009507684546, -27.0000447498791, 0.95)
    pt3dadd(42.3919880729998, -147.006660988615, -27.0754427126199, 0.95)
    pt3dadd(42.3926479208262, -148.003814292683, -27.1508406753607, 0.95)
    pt3dadd(42.3933077686527, -149.000967596752, -27.2262386381015, 0.95)
    pt3dadd(42.3901781786431, -149.998134065547, -27.300765644462, 0.95)
    pt3dadd(42.3632459475593, -150.995383226091, -27.3698219021238, 0.95)
    pt3dadd(42.3363137164755, -151.992632386636, -27.4388781597857, 0.95)
    pt3dadd(42.3093814853917, -152.98988154718, -27.5079344174475, 0.95)
    pt3dadd(42.2824492543079, -153.987130707725, -27.5769906751094, 0.95)
    pt3dadd(42.2555170232241, -154.984379868269, -27.6460469327712, 0.95)
    pt3dadd(42.2285847921404, -155.981629028814, -27.715103190433, 0.95)
    pt3dadd(42.2016525610566, -156.978878189358, -27.7841594480949, 0.95)
    pt3dadd(42.2977011319013, -157.958424933999, -27.7549664131688, 0.939448490654455)
    pt3dadd(42.5428065268991, -158.916515761513, -27.6066919663575, 0.916108200878104)
    pt3dadd(42.7879119218969, -159.874606589026, -27.4584175195462, 0.892767911101753)
    pt3dadd(43.0330173168947, -160.83269741654, -27.3101430727349, 0.869427621325402)
    pt3dadd(43.2781227118926, -161.790788244053, -27.1618686259236, 0.84608733154905)
    pt3dadd(43.5232281068904, -162.748879071567, -27.0135941791123, 0.822747041772699)
    pt3dadd(43.7599230678329, -163.707902338859, -26.8704947355111, 0.8)
    pt3dadd(43.6741348621989, -164.702678354488, -26.9258216051378, 0.8)
    pt3dadd(43.588346656565, -165.697454370117, -26.9811484747645, 0.8)
    pt3dadd(43.5025584509311, -166.692230385747, -27.0364753443912, 0.8)
    pt3dadd(43.4167702452972, -167.687006401376, -27.0918022140179, 0.8)
    pt3dadd(43.3309820396632, -168.681782417005, -27.1471290836446, 0.8)
    pt3dadd(43.2451938340293, -169.676558432635, -27.2024559532712, 0.8)
    pt3dadd(43.3388021340921, -170.664211889386, -27.1502943946977, 0.8)
    pt3dadd(43.4859058380393, -171.649741424255, -27.0660801667751, 0.8)
    pt3dadd(43.6330095419865, -172.635270959125, -26.9818659388525, 0.8)
    pt3dadd(43.7801132459338, -173.620800493995, -26.8976517109299, 0.8)
    pt3dadd(43.927216949881, -174.606330028864, -26.8134374830073, 0.8)
    pt3dadd(44.0743206538283, -175.591859563734, -26.7292232550847, 0.8)
    pt3dadd(44.2214243577755, -176.577389098604, -26.6450090271621, 0.8)
    pt3dadd(44.3685280617227, -177.562918633473, -26.5607947992396, 0.8)
    pt3dadd(44.5013188092585, -178.549837907324, -26.5354104539932, 0.8)
    pt3dadd(44.6040120359823, -179.539679547225, -26.6337345563458, 0.8)
    pt3dadd(44.706705262706, -180.529521187125, -26.7320586586983, 0.8)
    pt3dadd(44.8093984894298, -181.519362827026, -26.8303827610508, 0.8)
    pt3dadd(44.9120917161536, -182.509204466927, -26.9287068634034, 0.8)
    pt3dadd(45.0147849428774, -183.499046106828, -27.0270309657559, 0.8)
    pt3dadd(45.1174781696011, -184.488887746729, -27.1253550681085, 0.8)
    pt3dadd(45.2201713963249, -185.47872938663, -27.223679170461, 0.8)
    pt3dadd(45.3228646230487, -186.468571026531, -27.3220032728135, 0.8)
    pt3dadd(45.540488568486, -187.431896376626, -27.2997866503827, 0.8)
    pt3dadd(45.8557009767503, -188.372706562883, -27.1752180704305, 0.8)
    pt3dadd(46.1709133850145, -189.31351674914, -27.0506494904783, 0.8)
    pt3dadd(46.4861257932788, -190.254326935397, -26.9260809105262, 0.8)
    pt3dadd(46.8013382015431, -191.195137121654, -26.801512330574, 0.8)
    pt3dadd(47.1165506098073, -192.135947307911, -26.6769437506219, 0.8)
    pt3dadd(47.4317630180716, -193.076757494168, -26.5523751706697, 0.8)
    pt3dadd(47.7469754263359, -194.017567680425, -26.4278065907175, 0.8)
    pt3dadd(48.0621878346001, -194.958377866682, -26.3032380107654, 0.8)
    pt3dadd(48.3774002428644, -195.899188052939, -26.1786694308132, 0.8)
    pt3dadd(48.73377705548, -196.821384275876, -26.2849640866873, 0.8)
    pt3dadd(49.0985231550195, -197.739796025253, -26.4381963988025, 0.8)
    pt3dadd(49.463269254559, -198.65820777463, -26.5914287109178, 0.8)
    pt3dadd(49.8280153540985, -199.576619524008, -26.7446610230331, 0.8)
    pt3dadd(50.192761453638, -200.495031273385, -26.8978933351483, 0.8)
    pt3dadd(50.5575075531775, -201.413443022763, -27.0511256472636, 0.8)
    pt3dadd(50.5243449445988, -202.388724001588, -27.1170905550294, 0.8)
    pt3dadd(50.8741905342788, -203.231498919615, -26.779452198636, 0.8)
    pt3dadd(51.2883558998266, -204.054768575783, -26.3912587890931, 0.8)
    pt3dadd(51.7025212653745, -204.878038231952, -26.0030653795503, 0.8)
    pt3dadd(52.1166866309223, -205.701307888121, -25.6148719700075, 0.8)
    pt3dadd(52.5308519964701, -206.524577544289, -25.2266785604647, 0.8)
    pt3dadd(52.945017362018, -207.347847200458, -24.8384851509219, 0.8)
    pt3dadd(53.3591827275658, -208.171116856627, -24.450291741379, 0.8)
    pt3dadd(53.5647376490114, -209.122701816049, -24.4664529513154, 0.8)
    pt3dadd(53.7217798070689, -210.104126748119, -24.5766476122813, 0.8)
    pt3dadd(53.8788219651263, -211.085551680188, -24.6868422732472, 0.8)
    pt3dadd(54.0358641231837, -212.066976612257, -24.7970369342132, 0.8)
    pt3dadd(54.1929062812411, -213.048401544327, -24.9072315951791, 0.8)
    pt3dadd(54.3499484392985, -214.029826476396, -25.017426256145, 0.8)
    pt3dadd(54.5311568261265, -214.996603115792, -25.0177525231176, 0.8)
    pt3dadd(54.7734046474383, -215.926380870941, -24.7405715008614, 0.8)
    pt3dadd(55.0156524687501, -216.856158626091, -24.4633904786052, 0.8)
    pt3dadd(55.2579002900619, -217.78593638124, -24.186209456349, 0.8)
    pt3dadd(55.5001481113737, -218.715714136389, -23.9090284340928, 0.8)
    pt3dadd(55.7423959326855, -219.645491891539, -23.6318474118366, 0.8)
    pt3dadd(55.9846437539973, -220.575269646688, -23.3546663895804, 0.8)
    pt3dadd(56.1340011017078, -221.528013941353, -23.1951423294881, 0.8)
    pt3dadd(56.1035378676079, -222.525217655136, -23.2633826737542, 0.8)
    pt3dadd(56.0730746335081, -223.522421368919, -23.3316230180203, 0.8)
    pt3dadd(56.0426113994083, -224.519625082702, -23.3998633622864, 0.8)
    pt3dadd(56.0121481653084, -225.516828796485, -23.4681037065524, 0.8)
    pt3dadd(55.9816849312086, -226.514032510268, -23.5363440508185, 0.8)
    pt3dadd(55.9512216971087, -227.511236224051, -23.6045843950846, 0.8)
    pt3dadd(55.9207584630089, -228.508439937835, -23.6728247393507, 0.8)
    pt3dadd(55.9335788547091, -229.502813103569, -23.7508110518712, 0.8)
    pt3dadd(56.0553662405025, -230.490060334108, -23.8533329444309, 0.8)
    pt3dadd(56.1771536262959, -231.477307564648, -23.9558548369907, 0.8)
    pt3dadd(56.2989410120894, -232.464554795187, -24.0583767295505, 0.8)
    pt3dadd(56.4207283978828, -233.451802025726, -24.1608986221103, 0.8)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(56.4207283978828, -233.451802025726, -24.1608986221103, 0.8)
    pt3dadd(56.5425157836762, -234.439049256266, -24.2634205146701, 0.8)
    pt3dadd(56.6805919846128, -235.423743134206, -24.3694977858656, 0.8)
    pt3dadd(56.8221346420438, -236.40789362789, -24.476331684554, 0.8)
    pt3dadd(56.9636772994748, -237.392044121574, -24.5831655832423, 0.8)
    pt3dadd(57.1052199569058, -238.376194615258, -24.6899994819307, 0.8)
    pt3dadd(57.2467626143368, -239.360345108942, -24.796833380619, 0.8)
    pt3dadd(57.3883052717678, -240.344495602626, -24.9036672793073, 0.8)
    pt3dadd(57.5298479291988, -241.32864609631, -25.0105011779957, 0.8)
    pt3dadd(57.6713905866298, -242.312796589994, -25.117335076684, 0.8)
    pt3dadd(57.8129332440608, -243.296947083678, -25.2241689753724, 0.8)
    pt3dadd(58.1221181615115, -244.229903309019, -25.365714197106, 0.8)
    pt3dadd(58.504610308437, -245.14047311475, -25.5224381149725, 0.8)
    pt3dadd(58.8871024553626, -246.051042920481, -25.679162032839, 0.8)
    pt3dadd(59.2678827432697, -246.962202419239, -25.8351221392752, 0.8)
    pt3dadd(59.4397855092255, -247.945315050218, -25.8978835435531, 0.8)
    pt3dadd(59.6116882751813, -248.928427681196, -25.9606449478309, 0.8)
    pt3dadd(59.8028190639375, -249.897828091617, -25.9594909757032, 0.8)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(59.8028190639375, -249.897828091617, -25.9594909757032, 0.8)
    pt3dadd(60.1813271183824, -250.745486316168, -25.5791831398861, 0.8)
    pt3dadd(60.5441957503037, -251.602462842899, -25.2132356182381, 0.8)
    pt3dadd(60.907064382225, -252.459439369629, -24.8472880965901, 0.8)
    pt3dadd(61.2699330141463, -253.31641589636, -24.4813405749421, 0.8)
    pt3dadd(61.6328016460676, -254.17339242309, -24.1153930532942, 0.8)
    pt3dadd(61.9930476428108, -255.048966192073, -23.8257316271031, 0.8)
    pt3dadd(62.3449274310692, -255.983865179911, -23.7794229113525, 0.8)
    pt3dadd(62.6968072193277, -256.918764167749, -23.7331141956018, 0.8)
    pt3dadd(63.0486870075861, -257.853663155587, -23.6868054798512, 0.8)
    pt3dadd(63.4005667958446, -258.788562143425, -23.6404967641005, 0.8)
    pt3dadd(63.7524465841031, -259.723461131263, -23.5941880483498, 0.8)
    pt3dadd(64.1043263723615, -260.658360119101, -23.5478793325992, 0.8)
    pt3dadd(64.3543138233195, -261.603751402562, -23.3780727587921, 0.8)
    pt3dadd(64.5452991617191, -262.555218389297, -23.1367531083904, 0.8)
    pt3dadd(64.7362845001187, -263.506685376032, -22.8954334579887, 0.8)
    pt3dadd(64.9272698385183, -264.458152362767, -22.6541138075871, 0.8)
    pt3dadd(65.1147527617538, -265.397237589672, -22.3736645192917, 0.8)
    pt3dadd(65.293323738267, -266.3048172472, -21.9936492938232, 0.8)
    pt3dadd(65.4718947147801, -267.212396904728, -21.6136340683546, 0.8)
    pt3dadd(65.6504656912933, -268.119976562257, -21.233618842886, 0.8)
    pt3dadd(65.8290366678065, -269.027556219785, -20.8536036174175, 0.8)
    pt3dadd(65.9708566749603, -269.967712985499, -20.6563300570044, 0.8)
    pt3dadd(66.054095581814, -270.95979771054, -20.7503469848765, 0.8)
    pt3dadd(66.1373344886677, -271.951882435581, -20.8443639127486, 0.8)
    pt3dadd(66.2205733955214, -272.943967160621, -20.9383808406206, 0.8)
    pt3dadd(66.3038123023751, -273.936051885662, -21.0323977684927, 0.8)
    pt3dadd(66.3870512092288, -274.928136610703, -21.1264146963647, 0.8)
    pt3dadd(66.6177784405354, -275.829044960035, -20.9395880666616, 0.8)
    pt3dadd(66.9841962617202, -276.646070220663, -20.4943828288059, 0.8)
    pt3dadd(67.350614082905, -277.463095481291, -20.0491775909503, 0.8)
    pt3dadd(67.7170319040899, -278.280120741919, -19.6039723530947, 0.8)
    pt3dadd(68.0834497252747, -279.097146002547, -19.158767115239, 0.8)
    pt3dadd(68.0140967186236, -280.04010172729, -18.9844115756193, 0.8)
    pt3dadd(67.8266734796945, -281.017177769868, -18.8834415972634, 0.8)
    pt3dadd(67.6392502407654, -281.994253812446, -18.7824716189075, 0.8)
    pt3dadd(67.4518270018363, -282.971329855024, -18.6815016405517, 0.8)
    pt3dadd(67.2644037629072, -283.948405897602, -18.5805316621958, 0.8)
    pt3dadd(67.1975050299123, -284.891678919536, -18.2904821043281, 0.8)
    pt3dadd(67.1813097205236, -285.820731357352, -17.9208887064671, 0.8)
    pt3dadd(67.165114411135, -286.749783795167, -17.5512953086062, 0.8)
    pt3dadd(66.8569037114864, -287.655925156931, -17.4105820516335, 0.8)
    pt3dadd(66.4132055014563, -288.551436378099, -17.3760631991306, 0.8)
    pt3dadd(65.9695072914262, -289.446947599267, -17.3415443466277, 0.8)
    pt3dadd(65.5258090813961, -290.342458820435, -17.3070254941249, 0.8)
    pt3dadd(65.082110871366, -291.237970041603, -17.272506641622, 0.8)
    pt3dadd(64.786561605569, -292.193189732067, -17.2823075027218, 0.8)
    pt3dadd(64.4916049774238, -293.148648273285, -17.2922856552032, 0.8)
    pt3dadd(64.1966483492785, -294.104106814503, -17.3022638076845, 0.8)
    pt3dadd(63.9016917211333, -295.059565355721, -17.3122419601659, 0.8)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(59.8028190639375, -249.897828091617, -25.9594909757032, 0.8)
    pt3dadd(59.9787368487281, -250.866193928514, -25.7652040697151, 0.8)
    pt3dadd(60.1702940560424, -251.825241463231, -25.5565568495579, 0.8)
    pt3dadd(60.3618512633567, -252.784288997947, -25.3479096294007, 0.8)
    pt3dadd(60.553408470671, -253.743336532664, -25.1392624092435, 0.8)
    pt3dadd(60.6814813773073, -254.728610752344, -25.2240904546544, 0.8)
    pt3dadd(60.8056155989716, -255.715512124703, -25.3271262554597, 0.8)
    pt3dadd(60.9297498206359, -256.702413497062, -25.430162056265, 0.8)
    pt3dadd(61.0538840423002, -257.689314869422, -25.5331978570703, 0.8)
    pt3dadd(61.1780182639645, -258.676216241781, -25.6362336578757, 0.8)
    pt3dadd(61.3021524856288, -259.66311761414, -25.7392694586809, 0.8)
    pt3dadd(61.4426954024346, -260.646798588667, -25.8458378866503, 0.8)
    pt3dadd(61.6541657699461, -261.616559223613, -25.9676762819679, 0.8)
    pt3dadd(61.8656361374575, -262.586319858559, -26.0895146772855, 0.8)
    pt3dadd(62.0771065049689, -263.556080493505, -26.211353072603, 0.8)
    pt3dadd(62.2885768724804, -264.525841128451, -26.3331914679206, 0.8)
  }
}
proc shape3d_18() {
  adendOML[10] {
    pt3dadd(62.5000472399918, -265.495601763397, -26.4550298632382, 0.8)
    pt3dadd(62.7115176075033, -266.465362398343, -26.5768682585558, 0.8)
    pt3dadd(62.9229879750147, -267.43512303329, -26.6987066538734, 0.8)
    pt3dadd(62.9831892396414, -268.427279003299, -26.7874279955282, 0.8)
    pt3dadd(63.0178653518692, -269.423213962735, -26.870561164677, 0.8)
    pt3dadd(63.052541464097, -270.419148922172, -26.9536943338259, 0.8)
    pt3dadd(63.0872175763248, -271.415083881609, -27.0368275029747, 0.8)
    pt3dadd(63.1218936885526, -272.411018841045, -27.1199606721235, 0.8)
    pt3dadd(63.1090710058245, -273.405977117305, -27.1920906651505, 0.8)
    pt3dadd(63.0025579054906, -274.399008905644, -27.2425171146074, 0.8)
    pt3dadd(62.8960448051567, -275.392040693984, -27.2929435640643, 0.8)
    pt3dadd(62.7895317048228, -276.385072482323, -27.3433700135212, 0.8)
    pt3dadd(62.6830186044889, -277.378104270662, -27.3937964629781, 0.8)
    pt3dadd(62.576505504155, -278.371136059002, -27.4442229124351, 0.8)
    pt3dadd(62.4699924038211, -279.364167847341, -27.494649361892, 0.8)
    pt3dadd(62.3634793034872, -280.35719963568, -27.5450758113489, 0.8)
    pt3dadd(62.2569662031533, -281.35023142402, -27.5955022608058, 0.8)
    pt3dadd(62.1860025225175, -282.346975493696, -27.6029182402923, 0.8)
    pt3dadd(62.1310709724812, -283.345393733576, -27.5909372935402, 0.8)
    pt3dadd(62.0761394224449, -284.343811973457, -27.578956346788, 0.8)
    pt3dadd(62.0212078724085, -285.342230213337, -27.5669754000358, 0.8)
    pt3dadd(61.9662763223722, -286.340648453217, -27.5549944532837, 0.8)
    pt3dadd(61.9113447723359, -287.339066693097, -27.5430135065315, 0.8)
    pt3dadd(61.8564132222996, -288.337484932978, -27.5310325597793, 0.8)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(39.5539262141577, -78.7737243202595, -23.9504820496675, 1.2234100848195)
    pt3dadd(40.0302178624041, -79.478103449956, -24.518837072838, 1.2234100848195)
    pt3dadd(40.4841454619738, -80.19468267472, -25.0484255441867, 1.18098155646885)
    pt3dadd(40.9380730615435, -80.9112618994841, -25.5780140155354, 1.1385530281182)
    pt3dadd(41.4309562667014, -81.5981930638285, -26.1074099234674, 1.11)
    pt3dadd(42.0040023836885, -82.2241143987161, -26.6364095740707, 1.11)
    pt3dadd(42.5770485006757, -82.8500357336036, -27.1654092246741, 1.11)
    pt3dadd(43.1500946176629, -83.4759570684912, -27.6944088752775, 1.11)
    pt3dadd(43.72314073465, -84.1018784033788, -28.2234085258809, 1.11)
    pt3dadd(44.2859728253553, -84.7409633432399, -28.7422283845458, 1.10852008394578)
    pt3dadd(44.6983298002807, -85.5739771929953, -29.1110774747523, 1.08523774312226)
    pt3dadd(45.1106867752061, -86.4069910427506, -29.4799265649587, 1.06195540229873)
    pt3dadd(45.5230437501315, -87.240004892506, -29.8487756551652, 1.03867306147521)
    pt3dadd(45.935400725057, -88.0730187422613, -30.2176247453717, 1.01539072065168)
    pt3dadd(46.3477576999824, -88.9060325920167, -30.5864738355781, 0.992108379828157)
    pt3dadd(46.7601146749078, -89.739046441772, -30.9553229257846, 0.968826039004632)
    pt3dadd(47.1605353667685, -90.5614963712438, -31.3534878905183, 0.95)
    pt3dadd(47.5105301809216, -91.3393180902885, -31.8755003457799, 0.95)
    pt3dadd(47.8605249950746, -92.1171398093332, -32.3975128010416, 0.95)
    pt3dadd(48.2105198092277, -92.8949615283779, -32.9195252563033, 0.95)
    pt3dadd(48.5605146233808, -93.6727832474226, -33.4415377115649, 0.95)
    pt3dadd(48.9105094375339, -94.4506049664673, -33.9635501668266, 0.95)
    pt3dadd(49.2605042516869, -95.228426685512, -34.4855626220882, 0.95)
    pt3dadd(49.5480549532049, -96.1074613066295, -34.8650222010552, 0.95)
    pt3dadd(49.8344765996703, -96.9883259631761, -35.2419042744987, 0.95)
    pt3dadd(50.1208982461357, -97.8691906197227, -35.6187863479422, 0.95)
    pt3dadd(50.4073198926011, -98.7500552762693, -35.9956684213857, 0.95)
    pt3dadd(50.6937415390666, -99.6309199328159, -36.3725504948292, 0.95)
    pt3dadd(50.980163185532, -100.511784589363, -36.7494325682727, 0.95)
    pt3dadd(51.2157171150496, -101.351155715495, -37.2360724565844, 0.95)
    pt3dadd(51.4414679839903, -102.182530343719, -37.7438645131573, 0.95)
    pt3dadd(51.667218852931, -103.013904971942, -38.2516565697301, 0.95)
    pt3dadd(51.8929697218718, -103.845279600166, -38.7594486263029, 0.95)
    pt3dadd(52.1187205908125, -104.67665422839, -39.2672406828757, 0.95)
    pt3dadd(52.35863612626, -105.548906064188, -39.6337166559545, 0.95)
    pt3dadd(52.6292344378558, -106.509704016406, -39.694080956449, 0.95)
    pt3dadd(52.8998327494516, -107.470501968625, -39.7544452569435, 0.95)
    pt3dadd(53.1704310610473, -108.431299920843, -39.814809557438, 0.95)
    pt3dadd(53.4410293726431, -109.392097873062, -39.8751738579325, 0.95)
    pt3dadd(53.7116276842389, -110.35289582528, -39.9355381584269, 0.95)
    pt3dadd(53.9822259958346, -111.313693777499, -39.9959024589214, 0.95)
    pt3dadd(54.2528243074304, -112.274491729717, -40.0562667594159, 0.95)
    pt3dadd(54.6000447878625, -113.175807327073, -40.210195908823, 0.95)
    pt3dadd(55.1302370625724, -113.935080570859, -40.5875555424737, 0.95)
    pt3dadd(55.6604293372822, -114.694353814645, -40.9649151761244, 0.95)
    pt3dadd(56.1906216119921, -115.45362705843, -41.3422748097751, 0.95)
    pt3dadd(56.720813886702, -116.212900302216, -41.7196344434258, 0.95)
    pt3dadd(57.2510061614119, -116.972173546002, -42.0969940770765, 0.95)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(57.2510061614119, -116.972173546002, -42.0969940770765, 0.95)
    pt3dadd(57.7811984361218, -117.731446789788, -42.4743537107272, 0.95)
    pt3dadd(58.3113907108317, -118.490720033573, -42.8517133443779, 0.95)
    pt3dadd(58.8457981335504, -119.263679076235, -43.1828776478603, 0.95)
    pt3dadd(59.3933123225527, -120.079193342794, -43.3704001635212, 0.95)
    pt3dadd(59.9408265115549, -120.894707609353, -43.5579226791821, 0.95)
    pt3dadd(60.4883407005572, -121.710221875912, -43.7454451948431, 0.95)
    pt3dadd(61.0358548895595, -122.525736142471, -43.932967710504, 0.95)
    pt3dadd(61.5833690785618, -123.341250409031, -44.1204902261649, 0.95)
    pt3dadd(62.1308832675641, -124.15676467559, -44.3080127418259, 0.95)
    pt3dadd(62.6783974565664, -124.972278942149, -44.4955352574868, 0.95)
    pt3dadd(63.0397593940189, -125.763113692791, -44.9542443006433, 0.95)
    pt3dadd(63.3436626229205, -126.546330737493, -45.4966591680196, 0.95)
    pt3dadd(63.6475658518221, -127.329547782195, -46.0390740353958, 0.95)
    pt3dadd(63.9514690807237, -128.112764826898, -46.5814889027721, 0.95)
    pt3dadd(64.2553723096253, -128.8959818716, -47.1239037701483, 0.95)
    pt3dadd(64.5592755385269, -129.679198916303, -47.6663186375246, 0.95)
    pt3dadd(64.8631787674285, -130.462415961005, -48.2087335049009, 0.95)
    pt3dadd(65.1670819963301, -131.245633005707, -48.7511483722771, 0.95)
    pt3dadd(65.4225246528446, -132.102230056562, -49.1743691568473, 0.95)
    pt3dadd(65.6296515702611, -133.031987803992, -49.4787520919405, 0.95)
    pt3dadd(65.8367784876776, -133.961745551421, -49.7831350270337, 0.95)
    pt3dadd(66.0439054050941, -134.891503298851, -50.0875179621269, 0.95)
    pt3dadd(66.2510323225105, -135.821261046281, -50.3919008972201, 0.95)
    pt3dadd(66.458159239927, -136.751018793711, -50.6962838323133, 0.95)
    pt3dadd(66.6652861573435, -137.68077654114, -51.0006667674065, 0.95)
    pt3dadd(66.8724130747599, -138.61053428857, -51.3050497024997, 0.95)
    pt3dadd(67.0831001638397, -139.538592152906, -51.6087115270849, 0.95)
    pt3dadd(67.7606096666779, -140.243755279555, -51.8178187684195, 0.95)
    pt3dadd(68.4381191695161, -140.948918406204, -52.0269260097541, 0.95)
    pt3dadd(69.1156286723543, -141.654081532853, -52.2360332510887, 0.95)
    pt3dadd(69.7931381751926, -142.359244659502, -52.4451404924233, 0.95)
    pt3dadd(70.4706476780308, -143.064407786151, -52.6542477337579, 0.95)
    pt3dadd(70.9206726453367, -143.673181920764, -53.3062804853703, 0.95)
    pt3dadd(71.3691721589951, -144.281309695223, -53.9612833832112, 0.95)
    pt3dadd(71.8176716726534, -144.889437469681, -54.6162862810522, 0.95)
    pt3dadd(72.2661711863118, -145.49756524414, -55.2712891788932, 0.95)
    pt3dadd(72.7146706999702, -146.105693018599, -55.9262920767341, 0.95)
    pt3dadd(73.1631702136285, -146.713820793058, -56.5812949745751, 0.95)
    pt3dadd(73.6126942230922, -147.323461004563, -57.2337693270993, 0.95)
    pt3dadd(74.1195145277313, -148.017686276364, -57.7448314082586, 0.95)
    pt3dadd(74.6263348323704, -148.711911548164, -58.2558934894179, 0.95)
    pt3dadd(75.1331551370095, -149.406136819965, -58.7669555705772, 0.95)
    pt3dadd(75.6399754416486, -150.100362091766, -59.2780176517364, 0.95)
    pt3dadd(76.1467957462877, -150.794587363566, -59.7890797328957, 0.95)
    pt3dadd(76.6536160509268, -151.488812635367, -60.300141814055, 0.95)
    pt3dadd(77.1604363555659, -152.183037907168, -60.8112038952143, 0.95)
    pt3dadd(77.667256660205, -152.877263178968, -61.3222659763735, 0.95)
    pt3dadd(78.1512908126695, -153.642203517815, -61.7018603490298, 0.95)
    pt3dadd(78.5988675323479, -154.520286689382, -61.871108757631, 0.95)
    pt3dadd(79.0464442520264, -155.398369860948, -62.0403571662322, 0.95)
    pt3dadd(79.4940209717049, -156.276453032514, -62.2096055748334, 0.95)
    pt3dadd(79.9415976913834, -157.15453620408, -62.3788539834346, 0.95)
    pt3dadd(80.3891744110618, -158.032619375647, -62.5481023920358, 0.95)
    pt3dadd(80.8367511307403, -158.910702547213, -62.717350800637, 0.95)
    pt3dadd(81.2843278504188, -159.788785718779, -62.8865992092383, 0.95)
    pt3dadd(81.6655218530784, -160.699578220905, -63.0430412289361, 0.95)
    pt3dadd(82.0387831577506, -161.614279469952, -63.1979528922394, 0.95)
    pt3dadd(82.4120444624229, -162.528980718998, -63.3528645555426, 0.95)
    pt3dadd(82.7853057670951, -163.443681968044, -63.5077762188459, 0.95)
    pt3dadd(83.1585670717673, -164.358383217091, -63.6626878821492, 0.95)
    pt3dadd(83.5318283764395, -165.273084466137, -63.8175995454524, 0.95)
    pt3dadd(83.9107596769859, -166.187507388676, -63.9546804306871, 0.95)
    pt3dadd(84.3131800530674, -167.100777288794, -64.0178938031059, 0.95)
    pt3dadd(84.7156004291488, -168.014047188912, -64.0811071755247, 0.95)
    pt3dadd(85.1180208052302, -168.92731708903, -64.1443205479436, 0.95)
    pt3dadd(85.5204411813116, -169.840586989148, -64.2075339203624, 0.95)
    pt3dadd(85.922861557393, -170.753856889267, -64.2707472927813, 0.95)
    pt3dadd(86.3252819334744, -171.667126789385, -64.3339606652001, 0.95)
    pt3dadd(86.7456205026914, -172.56829705103, -64.4182322059363, 0.95)
    pt3dadd(87.2467259231993, -173.414927789976, -64.5974241404913, 0.95)
    pt3dadd(87.7478313437073, -174.261558528921, -64.7766160750463, 0.95)
    pt3dadd(88.2489367642152, -175.108189267867, -64.9558080096014, 0.95)
    pt3dadd(88.7500421847232, -175.954820006813, -65.1349999441564, 0.95)
    pt3dadd(89.2511476052311, -176.801450745759, -65.3141918787115, 0.95)
    pt3dadd(89.7522530257391, -177.648081484705, -65.4933838132665, 0.95)
    pt3dadd(90.2340681067556, -178.503439539654, -65.6821565173946, 0.95)
    pt3dadd(90.695106363522, -179.368197424549, -65.8812482708938, 0.95)
    pt3dadd(91.1561446202884, -180.232955309443, -66.0803400243931, 0.95)
    pt3dadd(91.6171828770548, -181.097713194337, -66.2794317778923, 0.95)
    pt3dadd(92.0782211338211, -181.962471079231, -66.4785235313916, 0.95)
    pt3dadd(92.5392593905876, -182.827228964125, -66.6776152848908, 0.95)
    pt3dadd(92.9602295425466, -183.709572918149, -66.8638586482766, 0.95)
    pt3dadd(93.1968943256609, -184.672809317005, -66.9910019546393, 0.95)
    pt3dadd(93.4335591087753, -185.636045715861, -67.118145261002, 0.95)
    pt3dadd(93.6702238918896, -186.599282114716, -67.2452885673646, 0.95)
    pt3dadd(93.906888675004, -187.562518513572, -67.3724318737273, 0.95)
    pt3dadd(94.1435534581183, -188.525754912428, -67.49957518009, 0.95)
    pt3dadd(94.3802182412327, -189.488991311284, -67.6267184864527, 0.95)
    pt3dadd(94.616883024347, -190.452227710139, -67.7538617928154, 0.95)
    pt3dadd(94.8535478074614, -191.415464108995, -67.8810050991781, 0.95)
    pt3dadd(95.0793426333921, -192.333710564829, -68.1614808313593, 0.95)
    pt3dadd(95.2936232547914, -193.204300585862, -68.6043767904409, 0.95)
    pt3dadd(95.5079038761906, -194.074890606895, -69.0472727495226, 0.95)
    pt3dadd(95.7221844975899, -194.945480627927, -69.4901687086042, 0.95)
    pt3dadd(95.9364651189892, -195.81607064896, -69.9330646676859, 0.95)
    pt3dadd(96.1507457403885, -196.686660669993, -70.3759606267676, 0.95)
    pt3dadd(96.2774687035891, -197.611506481696, -70.6619904279434, 0.95)
    pt3dadd(96.2878647313478, -198.608435192698, -70.7396117380842, 0.95)
    pt3dadd(96.2982607591064, -199.605363903699, -70.817233048225, 0.95)
    pt3dadd(96.3086567868651, -200.602292614701, -70.8948543583658, 0.95)
    pt3dadd(96.3190528146237, -201.599221325702, -70.9724756685066, 0.95)
    pt3dadd(96.5497819846212, -202.532461752497, -71.1623915655698, 0.95)
    pt3dadd(96.9148413889734, -203.426873421821, -71.4207699645734, 0.95)
    pt3dadd(97.2799007933255, -204.321285091145, -71.679148363577, 0.95)
    pt3dadd(97.6127677795522, -205.213805459066, -71.9503824019403, 0.95)
    pt3dadd(97.4370758231533, -206.076448039073, -72.4247030905222, 0.95)
    pt3dadd(97.2613838667544, -206.939090619079, -72.8990237791041, 0.95)
    pt3dadd(97.0856919103555, -207.801733199085, -73.373344467686, 0.95)
    pt3dadd(96.9279139259957, -208.67794695632, -73.8074372482004, 0.95)
    pt3dadd(96.9297475271642, -209.67507845922, -73.883103646497, 0.95)
    pt3dadd(96.9315811283328, -210.67220996212, -73.9587700447936, 0.95)
    pt3dadd(96.9334147295014, -211.66934146502, -74.0344364430901, 0.95)
    pt3dadd(96.9352483306699, -212.66647296792, -74.1101028413867, 0.95)
    pt3dadd(96.9370819318385, -213.66360447082, -74.1857692396832, 0.95)
    pt3dadd(96.7382714048089, -214.424911809564, -74.6676166589582, 0.95)
    pt3dadd(96.4250770150448, -215.051779735282, -75.3810210869838, 0.95)
    pt3dadd(96.1118826252807, -215.678647661, -76.0944255150093, 0.95)
    pt3dadd(95.7986882355166, -216.305515586718, -76.8078299430349, 0.95)
    pt3dadd(95.4883287415725, -216.935822796049, -77.5152921079666, 0.95)
    pt3dadd(95.4804441057554, -217.933091223342, -77.5887326719748, 0.95)
    pt3dadd(95.4725594699383, -218.930359650635, -77.662173235983, 0.95)
    pt3dadd(95.4646748341212, -219.927628077929, -77.7356137999912, 0.95)
    pt3dadd(95.3497446721881, -220.878553850139, -77.8921315049444, 0.95)
    pt3dadd(94.9319005053727, -221.698340659726, -78.2837382452914, 0.95)
    pt3dadd(94.5140563385573, -222.518127469313, -78.6753449856385, 0.95)
    pt3dadd(94.0962121717419, -223.3379142789, -79.0669517259856, 0.95)
    pt3dadd(93.6783680049265, -224.157701088487, -79.4585584663327, 0.95)
    pt3dadd(93.27920191342, -224.977544210558, -79.8628381053029, 0.95873401929611)
    pt3dadd(93.0663363047964, -225.797949009504, -80.3935208716824, 1.05458365331547)
    pt3dadd(93.0298878832513, -226.681981712741, -80.7511886292669, 1.11)
    pt3dadd(93.2352302396683, -227.653220434469, -80.871728506805, 1.11)
    pt3dadd(93.4405725960853, -228.624459156197, -80.9922683843431, 1.11)
    pt3dadd(93.6459149525024, -229.595697877925, -81.1128082618812, 1.11)
    pt3dadd(93.8947947529748, -230.553026212576, -81.242316416129, 1.10014825503437)
    pt3dadd(94.2401829942772, -231.479519715342, -81.3917043410195, 1.06845837586689)
    pt3dadd(94.5855712355797, -232.406013218107, -81.54109226591, 1.03676849669941)
    pt3dadd(94.9309594768821, -233.332506720873, -81.6904801908005, 1.00507861753193)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(94.9309594768821, -233.332506720873, -81.6904801908005, 0.973388738364446)
    pt3dadd(95.2763477181845, -234.259000223639, -81.839868115691, 0.973388738364446)
    pt3dadd(95.5787083223064, -235.18404243157, -82.0405012920568, 0.95)
    pt3dadd(95.7598371376496, -236.104995568377, -82.3855196568703, 0.95)
    pt3dadd(95.9409659529928, -237.025948705183, -82.7305380216837, 0.95)
    pt3dadd(96.1220947683361, -237.94690184199, -83.0755563864973, 0.95)
    pt3dadd(96.3032235836792, -238.867854978796, -83.4205747513107, 0.95)
    pt3dadd(96.4843523990224, -239.788808115603, -83.7655931161242, 0.95)
    pt3dadd(96.6654812143656, -240.709761252409, -84.1106114809377, 0.95)
    pt3dadd(96.9256951877071, -241.653827752686, -84.2898904139233, 0.95)
    pt3dadd(97.2064229403719, -242.603889593297, -84.4261784467737, 0.95)
    pt3dadd(97.4871506930367, -243.553951433908, -84.5624664796241, 0.95)
    pt3dadd(97.7678784457015, -244.504013274519, -84.6987545124746, 0.95)
    pt3dadd(98.0486061983662, -245.454075115131, -84.835042545325, 0.95)
    pt3dadd(98.2408882994656, -246.182811405033, -85.4472033855043, 0.95)
    pt3dadd(98.4153009188031, -246.866831275057, -86.1555091497252, 0.95)
    pt3dadd(98.5897135381406, -247.55085114508, -86.8638149139461, 0.95)
    pt3dadd(98.7641261574781, -248.234871015104, -87.5721206781671, 0.95)
    pt3dadd(98.9385387768156, -248.918890885128, -88.280426442388, 0.95)
    pt3dadd(99.1129513961531, -249.602910755152, -88.9887322066089, 0.95)
    pt3dadd(99.328608566878, -250.355435676128, -89.5430193286382, 0.95)
    pt3dadd(99.6537790233299, -251.289856458893, -89.6883533404465, 0.95)
    pt3dadd(99.9789494797818, -252.224277241657, -89.8336873522548, 0.95)
    pt3dadd(100.304119936234, -253.158698024422, -89.9790213640631, 0.95)
    pt3dadd(100.649694558372, -254.084878892102, -90.1132121000747, 0.95)
    pt3dadd(101.154908530305, -254.946591812073, -90.1602193986381, 0.95)
    pt3dadd(101.660122502238, -255.808304732044, -90.2072266972016, 0.95)
    pt3dadd(102.165336474171, -256.670017652015, -90.254233995765, 0.95)
    pt3dadd(102.670550446105, -257.531730571987, -90.3012412943284, 0.95)
    pt3dadd(103.175764418038, -258.393443491958, -90.3482485928918, 0.95)
    pt3dadd(103.680978389971, -259.255156411929, -90.3952558914553, 0.95)
    pt3dadd(104.159168121193, -260.119655443004, -90.4656675521674, 0.95)
    pt3dadd(104.237654886862, -261.025362546577, -90.8822422395294, 0.95)
    pt3dadd(104.316141652532, -261.931069650151, -91.2988169268914, 0.95)
    pt3dadd(104.394628418202, -262.836776753725, -91.7153916142534, 0.95)
    pt3dadd(104.473115183872, -263.742483857299, -92.1319663016154, 0.95)
    pt3dadd(104.551601949541, -264.648190960872, -92.5485409889774, 0.95)
    pt3dadd(104.579476559193, -265.526176683872, -93.0193956771651, 0.95)
    pt3dadd(104.553646060598, -266.374746948972, -93.5478474635468, 0.95)
  }
}
proc shape3d_19() {
  adendOML[11] {
    pt3dadd(104.527815562002, -267.223317214072, -94.0762992499285, 0.95)
    pt3dadd(104.501985063407, -268.071887479172, -94.6047510363102, 0.95)
    pt3dadd(104.501128931942, -269.008096965161, -94.8673556090749, 0.95)
    pt3dadd(104.517522293612, -270.004837800396, -94.9463427287136, 0.95)
    pt3dadd(104.533915655281, -271.00157863563, -95.0253298483524, 0.95)
    pt3dadd(104.550309016951, -271.998319470865, -95.1043169679912, 0.95)
    pt3dadd(104.776110115744, -272.932471993029, -94.9454917766261, 0.95)
    pt3dadd(105.104579071317, -273.835938886997, -94.6700726111214, 0.95)
    pt3dadd(105.433048026891, -274.739405780966, -94.3946534456166, 0.95)
    pt3dadd(105.756043246815, -275.646473561732, -94.1741465087405, 0.95)
    pt3dadd(106.035584042334, -276.582127754628, -94.3895720758317, 0.95)
    pt3dadd(106.315124837854, -277.517781947524, -94.6049976429228, 0.95)
    pt3dadd(106.594665633373, -278.45343614042, -94.820423210014, 0.95)
    pt3dadd(106.667658220801, -279.432707446437, -94.7610906377546, 0.920302166162643)
    pt3dadd(106.685288567936, -280.423669684656, -94.6281131461138, 0.882644260300028)
    pt3dadd(106.70291891507, -281.414631922875, -94.495135654473, 0.844986354437413)
    pt3dadd(106.720549262205, -282.405594161095, -94.3621581628322, 0.807328448574798)
    pt3dadd(106.631367743457, -283.397542194201, -94.3752707453111, 0.8)
    pt3dadd(106.516377478483, -284.389728423034, -94.4236827921132, 0.8)
    pt3dadd(106.40138721351, -285.381914651866, -94.4720948389153, 0.8)
    pt3dadd(106.286396948536, -286.374100880699, -94.5205068857174, 0.8)
    pt3dadd(106.171406683563, -287.366287109532, -94.5689189325196, 0.8)
    pt3dadd(106.422142189367, -288.215950921296, -94.2824711938585, 0.8)
    pt3dadd(106.84916776648, -289.008689167813, -93.8919296608671, 0.8)
    pt3dadd(107.219108008494, -289.924848992809, -94.0461872130365, 0.8)
    pt3dadd(107.589048250509, -290.841008817806, -94.2004447652059, 0.8)
    pt3dadd(107.958988492523, -291.757168642802, -94.3547023173752, 0.8)
    pt3dadd(108.328928734538, -292.673328467798, -94.5089598695446, 0.8)
  }
  GCL[8] {pt3dclear()
    pt3dadd(0.780318860612407, 20.8794042875244, 2.98790452449428, 1.21731333627363)
    pt3dadd(1.02305558601824, 19.9776258051586, 3.14182512040492, 1.21731333627363)
    pt3dadd(1.12568564420374, 19.0268026125231, 3.4340618865779, 1.14380816880075)
    pt3dadd(1.21396561957456, 18.0533035930085, 3.51856221666247, 1.11)
    pt3dadd(1.29002426743116, 17.060492579931, 3.42614266030044, 1.11)
    pt3dadd(1.36608291528775, 16.0676815668534, 3.33372310393842, 1.11)
    pt3dadd(1.44214156314435, 15.0748705537759, 3.24130354757639, 1.11)
    pt3dadd(1.50259593629369, 14.0818616511425, 3.15245960253725, 1.11)
    pt3dadd(1.41783386029857, 13.0870111493858, 3.09689099964456, 1.11)
    pt3dadd(1.33307178430345, 12.0921606476291, 3.04132239675187, 1.11)
    pt3dadd(1.24830970830834, 11.0973101458724, 2.98575379385918, 1.11)
    pt3dadd(1.15874482958827, 10.115519337518, 2.97508070015051, 1.10772819269634)
    pt3dadd(1.00841520010063, 9.29895892902449, 3.53242269729314, 1.07671362569491)
    pt3dadd(0.85808557061298, 8.48239852053093, 4.08976469443578, 1.04569905869349)
    pt3dadd(0.707755941125333, 7.66583811203737, 4.64710669157842, 1.01468449169206)
    pt3dadd(0.557426311637688, 6.84927770354383, 5.20444868872106, 0.983669924690634)
    pt3dadd(0.407096682150042, 6.03271729505026, 5.76179068586369, 0.952655357689207)
    pt3dadd(0.335440558099815, 5.15739530988906, 6.238407733705, 0.95)
    pt3dadd(0.271150869950542, 4.27657130234363, 6.70746626281335, 0.95)
    pt3dadd(0.206861181801269, 3.39574729479821, 7.1765247919217, 0.95)
    pt3dadd(0.142571493651994, 2.51492328725278, 7.64558332103005, 0.95)
    pt3dadd(0.078281805502721, 1.63409927970736, 8.1146418501384, 0.95)
    pt3dadd(0.0139921173534514, 0.753275272161944, 8.58370037924675, 0.95)
    pt3dadd(0.444601721026826, 0.34114288125781, 9.25968526199241, 0.95)
    pt3dadd(1.05834640465791, 0.102447547361749, 10.0122422371716, 0.95)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(1.05834640465791, 0.102447547361749, 10.0122422371716, 0.95)
    pt3dadd(1.672091088289, -0.136247786534298, 10.7647992123508, 0.95)
    pt3dadd(2.28583577192009, -0.37494312043033, 11.5173561875299, 0.95)
    pt3dadd(2.89958045555118, -0.613638454326377, 12.2699131627091, 0.95)
    pt3dadd(3.72382947607736, -0.943106667925334, 12.3007427211261, 0.95)
    pt3dadd(4.62557604277265, -1.30599307869515, 12.065867046924, 0.95)
    pt3dadd(5.23444895697497, -1.96425522636002, 11.859858433195, 0.95)
    pt3dadd(5.58469572243571, -2.88335302316787, 11.6793412783668, 0.95)
    pt3dadd(5.93494248789644, -3.80245081997572, 11.4988241235386, 0.95)
    pt3dadd(6.28518925335718, -4.72154861678356, 11.3183069687104, 0.95)
    pt3dadd(6.61324894016057, -5.64867200111956, 11.1470434440573, 0.95)
    pt3dadd(6.82082744795803, -6.61937625802299, 11.0260293592154, 0.95)
    pt3dadd(7.02840595575548, -7.59008051492643, 10.9050152743734, 0.95)
    pt3dadd(7.23598446355294, -8.56078477182986, 10.7840011895314, 0.95)
    pt3dadd(7.4435629713504, -9.53148902873329, 10.6629871046894, 0.95)
    pt3dadd(7.65264090748367, -10.4981414201035, 10.6334324351536, 0.95)
    pt3dadd(7.86547409755202, -11.4546460880885, 10.8329339472488, 0.95)
    pt3dadd(8.07830728762037, -12.4111507560735, 11.0324354593441, 0.95)
    pt3dadd(8.29114047768873, -13.3676554240585, 11.2319369714394, 0.95)
    pt3dadd(8.50397366775708, -14.3241600920434, 11.4314384835347, 0.95)
    pt3dadd(8.59827498759788, -15.2879774774817, 11.6753370965405, 0.95)
    pt3dadd(8.67283787178577, -16.2530126080094, 11.9266289052987, 0.95)
    pt3dadd(8.74740075597366, -17.2180477385371, 12.177920714057, 0.95)
    pt3dadd(8.82196364016155, -18.1830828690648, 12.4292125228152, 0.95)
    pt3dadd(8.89652652434944, -19.1481179995925, 12.6805043315735, 0.95)
    pt3dadd(8.97108940853733, -20.1131531301202, 12.9317961403318, 0.95)
    pt3dadd(9.04565229272522, -21.0781882606479, 13.18308794909, 0.95)
    pt3dadd(9.12021517691312, -22.0432233911756, 13.4343797578483, 0.95)
    pt3dadd(9.194778061101, -23.0082585217032, 13.6856715666065, 0.95)
    pt3dadd(9.25739135645438, -23.9795412489377, 13.8944813424973, 0.95)
    pt3dadd(9.26533854165772, -24.979405027326, 13.9089474032784, 0.95)
    pt3dadd(9.27328572686107, -25.9792688057142, 13.9234134640595, 0.95)
    pt3dadd(9.28123291206441, -26.9791325841025, 13.9378795248406, 0.95)
    pt3dadd(9.28918009726775, -27.9789963624907, 13.9523455856217, 0.95)
    pt3dadd(9.2971272824711, -28.978860140879, 13.9668116464028, 0.95)
    pt3dadd(9.30507446767445, -29.9787239192672, 13.9812777071839, 0.95)
    pt3dadd(9.31302165287779, -30.9785876976554, 13.995743767965, 0.95)
    pt3dadd(9.34641140853973, -31.9765880254266, 14.015993500501, 0.95)
    pt3dadd(9.47165940826823, -32.9678605226954, 14.0571246896698, 0.95)
    pt3dadd(9.59690740799673, -33.9591330199643, 14.0982558788387, 0.95)
    pt3dadd(9.72215540772524, -34.9504055172331, 14.1393870680075, 0.95)
    pt3dadd(9.84740340745375, -35.9416780145019, 14.1805182571764, 0.95)
    pt3dadd(9.97265140718225, -36.9329505117707, 14.2216494463452, 0.95)
    pt3dadd(10.0978994069108, -37.9242230090395, 14.262780635514, 0.95)
    pt3dadd(10.2231474066393, -38.9154955063084, 14.3039118246829, 0.95)
    pt3dadd(10.3483954063678, -39.9067680035772, 14.3450430138517, 0.95)
    pt3dadd(10.5005177582252, -40.8769985119009, 14.5117869939836, 0.95)
    pt3dadd(10.6648658336574, -41.8376565647075, 14.7356749473881, 0.95)
    pt3dadd(10.8292139090895, -42.798314617514, 14.9595629007926, 0.95)
    pt3dadd(10.9935619845217, -43.7589726703206, 15.1834508541971, 0.95)
    pt3dadd(11.1579100599539, -44.7196307231271, 15.4073388076016, 0.95)
    pt3dadd(11.3222581353861, -45.6802887759337, 15.6312267610061, 0.95)
    pt3dadd(11.4866062108183, -46.6409468287402, 15.8551147144106, 0.95)
    pt3dadd(11.6509542862505, -47.6016048815468, 16.0790026678151, 0.95)
    pt3dadd(11.8036861621252, -48.5660559729305, 16.2934408195812, 0.95)
    pt3dadd(11.9309414012711, -49.5388259525574, 16.4871536762703, 0.95)
    pt3dadd(12.058196640417, -50.5115959321842, 16.6808665329595, 0.95)
    pt3dadd(12.1854518795629, -51.4843659118111, 16.8745793896487, 0.95)
    pt3dadd(12.3127071187087, -52.4571358914379, 17.0682922463379, 0.95)
    pt3dadd(12.4399623578546, -53.4299058710648, 17.2620051030271, 0.95)
    pt3dadd(12.5672175970005, -54.4026758506917, 17.4557179597163, 0.95)
    pt3dadd(12.6944728361464, -55.3754458303185, 17.6494308164055, 0.95)
    pt3dadd(12.7908809124949, -56.3398886819604, 17.8898453662378, 0.95)
    pt3dadd(12.8607349236759, -57.2971633184693, 18.170461986235, 0.95)
    pt3dadd(12.9305889348568, -58.2544379549782, 18.4510786062322, 0.95)
    pt3dadd(13.0004429460378, -59.2117125914872, 18.7316952262293, 0.95)
    pt3dadd(13.0702969572187, -60.1689872279961, 19.0123118462265, 0.95)
    pt3dadd(13.2166424645121, -61.1245603021281, 19.136031766138, 0.95)
    pt3dadd(13.4888984082604, -62.0773324837111, 19.0014885719759, 0.95)
    pt3dadd(13.7611543520087, -63.0301046652941, 18.8669453778138, 0.95)
    pt3dadd(14.033410295757, -63.982876846877, 18.7324021836517, 0.95)
    pt3dadd(14.3056662395053, -64.93564902846, 18.5978589894897, 0.95)
    pt3dadd(14.3523350792192, -65.912187832057, 18.7472538615882, 0.95)
    pt3dadd(14.3616407158486, -66.8926630181381, 18.9436764025712, 0.95)
    pt3dadd(14.370946352478, -67.8731382042192, 19.1400989435542, 0.95)
    pt3dadd(14.3802519891074, -68.8536133903002, 19.3365214845373, 0.95)
    pt3dadd(14.3895576257367, -69.8340885763813, 19.5329440255203, 0.95)
    pt3dadd(14.3988632623661, -70.8145637624624, 19.7293665665033, 0.95)
    pt3dadd(14.4081688989955, -71.7950389485434, 19.9257891074864, 0.95)
    pt3dadd(14.3590247840623, -72.7736038709659, 20.1249469732408, 0.95)
    pt3dadd(14.3042242570831, -73.7519839296706, 20.3243695471176, 0.95)
    pt3dadd(14.2494237301038, -74.7303639883754, 20.5237921209944, 0.95)
    pt3dadd(14.1946232031245, -75.7087440470802, 20.7232146948712, 0.95)
    pt3dadd(14.1398226761452, -76.6871241057849, 20.922637268748, 0.95)
    pt3dadd(14.085022149166, -77.6655041644897, 21.1220598426248, 0.95)
    pt3dadd(14.0302216221867, -78.6438842231944, 21.3214824165016, 0.95)
    pt3dadd(13.9754210952074, -79.6222642818992, 21.5209049903784, 0.95)
    pt3dadd(13.9206205682282, -80.600644340604, 21.7203275642552, 0.95)
    pt3dadd(13.910389739499, -81.5405455394842, 22.0533626933595, 0.95)
    pt3dadd(13.9118006061543, -82.4703959823034, 22.4212976922983, 0.95)
    pt3dadd(13.9132114728096, -83.4002464251226, 22.7892326912371, 0.95)
    pt3dadd(13.9146223394649, -84.3300968679419, 23.157167690176, 0.95)
    pt3dadd(13.9160332061202, -85.2599473107611, 23.5251026891148, 0.95)
    pt3dadd(13.9174440727755, -86.1897977535804, 23.8930376880537, 0.95)
    pt3dadd(13.8111738779118, -87.1720890336878, 23.9067276956424, 0.95)
    pt3dadd(13.6867125181181, -88.1632394382012, 23.8605731124335, 0.95)
    pt3dadd(13.5622511583244, -89.1543898427146, 23.8144185292246, 0.95)
    pt3dadd(13.4377897985308, -90.1455402472281, 23.7682639460158, 0.95)
    pt3dadd(13.3133284387371, -91.1366906517415, 23.7221093628069, 0.95)
    pt3dadd(13.1888670789435, -92.1278410562549, 23.675954779598, 0.95)
    pt3dadd(13.0991778188655, -93.1167282971403, 23.673907678126, 0.95)
    pt3dadd(13.1641478840317, -94.0955494401343, 23.8680418087167, 0.95)
    pt3dadd(13.2291179491978, -95.0743705831283, 24.0621759393074, 0.95)
    pt3dadd(13.2940880143639, -96.0531917261224, 24.2563100698981, 0.95)
    pt3dadd(13.3590580795301, -97.0320128691164, 24.4504442004888, 0.95)
    pt3dadd(13.4240281446962, -98.0108340121104, 24.6445783310795, 0.95)
    pt3dadd(13.4889982098624, -98.9896551551044, 24.8387124616702, 0.95)
    pt3dadd(13.5430741307171, -99.9772274659342, 24.8850211982953, 0.95)
    pt3dadd(13.5874493953091, -100.972592226418, 24.7996992815385, 0.95)
    pt3dadd(13.6318246599011, -101.967956986902, 24.7143773647816, 0.95)
    pt3dadd(13.6761999244931, -102.963321747386, 24.6290554480248, 0.95)
    pt3dadd(13.7205751890851, -103.95868650787, 24.5437335312679, 0.95)
    pt3dadd(13.7649504536771, -104.954051268354, 24.4584116145111, 0.95)
    pt3dadd(14.0240537260879, -105.897657812138, 24.327586498268, 0.95)
    pt3dadd(14.3902178016258, -106.815458331339, 24.1740740338242, 0.95)
    pt3dadd(14.7563818771638, -107.73325885054, 24.0205615693804, 0.95)
    pt3dadd(15.1225459527017, -108.651059369741, 23.8670491049366, 0.95)
    pt3dadd(15.4887100282396, -109.568859888942, 23.7135366404928, 0.95)
    pt3dadd(15.766361432186, -110.513953511744, 23.6600818401151, 0.95)
    pt3dadd(15.9161767086547, -111.498465724092, 23.7511372445325, 0.95)
    pt3dadd(16.0659919851235, -112.482977936441, 23.84219264895, 0.95)
    pt3dadd(16.2158072615922, -113.467490148789, 23.9332480533674, 0.95)
    pt3dadd(16.3656225380609, -114.452002361137, 24.0243034577849, 0.95)
    pt3dadd(16.5154378145297, -115.436514573486, 24.1153588622023, 0.95)
    pt3dadd(16.6652530909984, -116.421026785834, 24.2064142666198, 0.95)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(16.6652530909984, -116.421026785834, 24.2064142666198, 0.95)
    pt3dadd(16.752922663341, -117.410699561762, 24.2301960390978, 0.95)
    pt3dadd(16.7497771128929, -118.407913602556, 24.1556691154067, 0.95)
    pt3dadd(16.7466315624448, -119.405127643351, 24.0811421917157, 0.95)
    pt3dadd(16.7434860119967, -120.402341684145, 24.0066152680246, 0.95)
    pt3dadd(16.7403404615486, -121.399555724939, 23.9320883443335, 0.95)
    pt3dadd(16.7371949111006, -122.396769765734, 23.8575614206424, 0.95)
    pt3dadd(16.7212102983794, -123.384809753164, 23.718972244951, 0.93878292824888)
    pt3dadd(16.6925000641087, -124.363756745428, 23.5168868452184, 0.916447894222703)
    pt3dadd(16.6637898298379, -125.342703737692, 23.3148014454858, 0.894112860196527)
    pt3dadd(16.6350795955672, -126.321650729957, 23.1127160457532, 0.87177782617035)
    pt3dadd(16.6063693612965, -127.300597722221, 22.9106306460206, 0.849442792144173)
    pt3dadd(16.5776591270257, -128.279544714485, 22.708545246288, 0.827107758117996)
    pt3dadd(16.548948892755, -129.258491706749, 22.5064598465554, 0.804772724091819)
    pt3dadd(16.6600716106133, -130.219890239127, 22.6600464818033, 0.8)
    pt3dadd(16.8091952578455, -131.176519811296, 22.9102903618261, 0.8)
    pt3dadd(16.9583189050776, -132.133149383464, 23.1605342418489, 0.8)
    pt3dadd(17.1074425523097, -133.089778955633, 23.4107781218717, 0.8)
    pt3dadd(17.2565661995419, -134.046408527802, 23.6610220018944, 0.8)
    pt3dadd(17.3524610255156, -135.025720677986, 23.8033408185354, 0.8)
    pt3dadd(17.4075449494034, -136.0224237162, 23.8629127493694, 0.8)
    pt3dadd(17.4626288732911, -137.019126754415, 23.9224846802034, 0.8)
    pt3dadd(17.5177127971788, -138.015829792629, 23.9820566110375, 0.8)
    pt3dadd(17.5727967210665, -139.012532830844, 24.0416285418715, 0.8)
    pt3dadd(17.6350069528124, -140.008074937661, 24.1043481711703, 0.8)
    pt3dadd(17.8226567636197, -140.983181954015, 24.2224746083554, 0.8)
    pt3dadd(18.010306574427, -141.958288970368, 24.3406010455404, 0.8)
    pt3dadd(18.1979563852343, -142.933395986722, 24.4587274827254, 0.8)
    pt3dadd(18.3856061960415, -143.908503003075, 24.5768539199105, 0.8)
    pt3dadd(18.5732560068488, -144.883610019429, 24.6949803570955, 0.8)
    pt3dadd(18.7609058176561, -145.858717035782, 24.8131067942806, 0.8)
    pt3dadd(18.9448722300183, -146.834469699578, 24.9214391674164, 0.8)
    pt3dadd(19.0508462403827, -147.823893323926, 24.8223917004614, 0.8)
    pt3dadd(19.1568202507472, -148.813316948273, 24.7233442335065, 0.8)
    pt3dadd(19.2627942611117, -149.802740572621, 24.6242967665516, 0.8)
    pt3dadd(19.3687682714761, -150.792164196968, 24.5252492995967, 0.8)
    pt3dadd(19.4747422818406, -151.781587821316, 24.4262018326418, 0.8)
    pt3dadd(19.580716292205, -152.771011445663, 24.3271543656869, 0.8)
    pt3dadd(19.6123799698182, -153.765761727246, 24.2448037547792, 0.8)
    pt3dadd(19.6097813325412, -154.762967974248, 24.1701515744718, 0.8)
    pt3dadd(19.6071826952643, -155.76017422125, 24.0954993941643, 0.8)
    pt3dadd(19.6045840579873, -156.757380468252, 24.0208472138569, 0.8)
    pt3dadd(19.6019854207104, -157.754586715254, 23.9461950335495, 0.8)
    pt3dadd(19.5993867834334, -158.751792962256, 23.871542853242, 0.8)
    pt3dadd(19.5808121126105, -159.745518551583, 23.8960773327927, 0.8)
    pt3dadd(19.5439577249431, -160.735261585631, 24.0341008114585, 0.8)
    pt3dadd(19.5071033372757, -161.725004619679, 24.1721242901243, 0.8)
    pt3dadd(19.4702489496083, -162.714747653727, 24.3101477687901, 0.8)
    pt3dadd(19.4333945619408, -163.704490687775, 24.4481712474559, 0.8)
    pt3dadd(19.3965401742734, -164.694233721823, 24.5861947261217, 0.8)
    pt3dadd(19.359685786606, -165.683976755871, 24.7242182047875, 0.8)
    pt3dadd(19.3396370245382, -166.673556313105, 24.8357251968283, 0.8)
    pt3dadd(19.4542361641418, -167.661826082144, 24.7347801582917, 0.8)
    pt3dadd(19.5688353037455, -168.650095851183, 24.633835119755, 0.8)
    pt3dadd(19.6834344433491, -169.638365620223, 24.5328900812184, 0.8)
    pt3dadd(19.7980335829528, -170.626635389262, 24.4319450426818, 0.8)
    pt3dadd(19.9194267546386, -171.61377515977, 24.3295219678402, 0.8)
    pt3dadd(20.0857688029181, -172.593438933117, 24.2173203004526, 0.8)
    pt3dadd(20.2521108511976, -173.573102706465, 24.105118633065, 0.8)
    pt3dadd(20.4184528994771, -174.552766479812, 23.9929169656775, 0.8)
    pt3dadd(20.5847949477566, -175.53243025316, 23.8807152982899, 0.8)
    pt3dadd(20.674637566763, -176.526650099187, 23.8428086879167, 0.8)
    pt3dadd(20.7511513901132, -177.523406106857, 23.8178467967738, 0.8)
    pt3dadd(20.8276652134634, -178.520162114527, 23.7928849056309, 0.8)
    pt3dadd(20.9041790368135, -179.516918122198, 23.7679230144879, 0.8)
    pt3dadd(20.9806928601637, -180.513674129868, 23.742961123345, 0.8)
    pt3dadd(21.0572066835139, -181.510430137538, 23.7179992322021, 0.8)
    pt3dadd(21.133720506864, -182.507186145209, 23.6930373410592, 0.8)
    pt3dadd(21.2102343302142, -183.503942152879, 23.6680754499162, 0.8)
    pt3dadd(21.3100615483032, -184.492573567569, 23.6554999024374, 0.8)
    pt3dadd(21.7913731999073, -185.348259704004, 23.8456060042391, 0.8)
  }
}
proc shape3d_20() {
  adendMML[11] {
    pt3dadd(22.2726848515114, -186.20394584044, 24.0357121060408, 0.8)
    pt3dadd(22.7539965031154, -187.059631976875, 24.2258182078426, 0.8)
    pt3dadd(23.2353081547195, -187.915318113311, 24.4159243096443, 0.8)
    pt3dadd(23.7166198063236, -188.771004249746, 24.606030411446, 0.8)
    pt3dadd(24.2664390412256, -189.584140145297, 24.4528685761395, 0.8)
    pt3dadd(24.8234487756867, -190.392810002585, 24.2636776206746, 0.8)
    pt3dadd(25.3804585101477, -191.201479859873, 24.0744866652097, 0.8)
    pt3dadd(25.9374682446088, -192.010149717161, 23.8852957097447, 0.8)
    pt3dadd(26.4944779790698, -192.818819574449, 23.6961047542798, 0.8)
    pt3dadd(27.1682265301618, -193.545396324622, 23.7604539300148, 0.8)
    pt3dadd(27.8612936358471, -194.258387874798, 23.8667602628255, 0.8)
    pt3dadd(28.5543607415324, -194.971379424973, 23.9730665956361, 0.8)
    pt3dadd(29.2474278472178, -195.684370975148, 24.0793729284467, 0.8)
    pt3dadd(29.9404949529031, -196.397362525323, 24.1856792612574, 0.8)
    pt3dadd(30.6335620585885, -197.110354075499, 24.291985594068, 0.8)
    pt3dadd(31.2325914595326, -197.885601408855, 24.3019035738209, 0.8)
    pt3dadd(31.6604742281848, -198.77415294994, 24.1363967910981, 0.8)
    pt3dadd(32.0883569968369, -199.662704491024, 23.9708900083752, 0.8)
    pt3dadd(32.5162397654891, -200.551256032108, 23.8053832256524, 0.8)
    pt3dadd(32.9441225341412, -201.439807573193, 23.6398764429295, 0.8)
    pt3dadd(33.3720053027933, -202.328359114277, 23.4743696602067, 0.8)
    pt3dadd(33.7905876534571, -203.220229006854, 23.3342506838647, 0.8)
    pt3dadd(34.0873003294605, -204.155581506052, 23.526805325832, 0.8)
    pt3dadd(34.3840130054638, -205.090934005249, 23.7193599677993, 0.8)
    pt3dadd(34.6807256814671, -206.026286504447, 23.9119146097665, 0.8)
    pt3dadd(34.9774383574705, -206.961639003645, 24.1044692517338, 0.8)
    pt3dadd(35.2741510334738, -207.896991502843, 24.2970238937011, 0.8)
    pt3dadd(35.5708637094771, -208.832344002041, 24.4895785356684, 0.8)
    pt3dadd(35.8675763854804, -209.767696501239, 24.6821331776357, 0.8)
    pt3dadd(36.1642890614838, -210.703049000437, 24.874687819603, 0.8)
    pt3dadd(36.4923769007582, -211.628592261346, 24.9560727238062, 0.8)
    pt3dadd(36.8884115419649, -212.532892401847, 24.796705792315, 0.8)
    pt3dadd(37.2844461831717, -213.437192542349, 24.6373388608237, 0.8)
    pt3dadd(37.6804808243785, -214.341492682851, 24.4779719293325, 0.8)
    pt3dadd(38.0765154655852, -215.245792823352, 24.3186049978413, 0.8)
    pt3dadd(38.472550106792, -216.150092963854, 24.1592380663501, 0.8)
    pt3dadd(38.8685847479987, -217.054393104356, 23.9998711348589, 0.8)
    pt3dadd(39.4723467418643, -217.816852534384, 23.8034095651304, 0.8)
    pt3dadd(40.1260115497609, -218.545237248174, 23.5980366661533, 0.8)
    pt3dadd(40.7796763576576, -219.273621961964, 23.3926637671762, 0.8)
    pt3dadd(41.4333411655542, -220.002006675755, 23.187290868199, 0.8)
    pt3dadd(42.0870059734508, -220.730391389545, 22.9819179692219, 0.8)
    pt3dadd(42.7406707813474, -221.458776103335, 22.7765450702448, 0.8)
    pt3dadd(43.394335589244, -222.187160817125, 22.5711721712676, 0.8)
    pt3dadd(43.9682988292599, -222.975577898717, 22.4339808162208, 0.8)
    pt3dadd(44.3777655427088, -223.887896131161, 22.4375097437324, 0.8)
    pt3dadd(44.7872322561577, -224.800214363604, 22.4410386712439, 0.8)
    pt3dadd(45.1966989696066, -225.712532596046, 22.4445675987555, 0.8)
    pt3dadd(45.6061656830555, -226.62485082849, 22.448096526267, 0.8)
    pt3dadd(46.0156323965044, -227.537169060933, 22.4516254537785, 0.8)
    pt3dadd(46.4857482993929, -228.406214675203, 22.3885777293874, 0.8)
    pt3dadd(47.0760031795861, -229.189542275093, 22.193649415233, 0.8)
    pt3dadd(47.5326056652012, -230.013888204671, 22.0726125678893, 0.8)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(47.5326056652012, -230.013888204671, 22.0726125678893, 0.8)
    pt3dadd(47.3352488530358, -231.01563736984, 22.3679230425995, 0.8)
    pt3dadd(47.2529703105066, -231.988359089209, 22.5848163299711, 0.8)
    pt3dadd(47.1668712300614, -232.968299363374, 22.7107140993516, 0.8)
    pt3dadd(47.0732409346432, -233.962469175149, 22.6572374396253, 0.8)
  }
  adendOML[12] {pt3dclear()
    pt3dadd(47.0732409346432, -233.962469175149, 22.6572374396253, 0.8)
    pt3dadd(46.9796106392251, -234.956638986924, 22.6037607798989, 0.8)
    pt3dadd(46.885980343807, -235.950808798699, 22.5502841201725, 0.8)
    pt3dadd(46.7923500483889, -236.944978610474, 22.4968074604461, 0.8)
    pt3dadd(46.7783843155845, -237.902786265902, 22.5593623599088, 0.8)
    pt3dadd(47.060338742702, -238.725523888081, 23.0529254319475, 0.8)
    pt3dadd(47.3422931698195, -239.54826151026, 23.5464885039862, 0.8)
    pt3dadd(47.624247596937, -240.370999132439, 24.0400515760249, 0.8)
    pt3dadd(47.8295173046224, -241.265773056638, 24.2780017271118, 0.8)
    pt3dadd(47.9337985527941, -242.25541379686, 24.1793273810382, 0.8)
    pt3dadd(48.0380798009658, -243.245054537082, 24.0806530349647, 0.8)
    pt3dadd(48.1423610491375, -244.234695277304, 23.9819786888911, 0.8)
    pt3dadd(48.2466422973092, -245.224336017525, 23.8833043428175, 0.8)
    pt3dadd(48.3509235454809, -246.213976757747, 23.7846299967439, 0.8)
    pt3dadd(48.3986873735561, -247.207862988429, 23.698639942647, 0.8)
    pt3dadd(48.4043205442316, -248.204914000939, 23.6221053371307, 0.8)
    pt3dadd(48.409953714907, -249.201965013448, 23.5455707316143, 0.8)
    pt3dadd(48.4155868855825, -250.199016025958, 23.469036126098, 0.8)
    pt3dadd(48.421220056258, -251.196067038468, 23.3925015205816, 0.8)
    pt3dadd(48.4026074148396, -252.193330540958, 23.3215298427366, 0.8)
    pt3dadd(48.3807783088214, -253.190622232503, 23.2512961463565, 0.8)
    pt3dadd(48.3589492028032, -254.187913924047, 23.1810624499764, 0.8)
    pt3dadd(48.4211425159388, -255.160345652512, 23.2494742347789, 0.8)
    pt3dadd(48.6264792636612, -256.090425107208, 23.5540871497833, 0.8)
    pt3dadd(48.8318160113835, -257.020504561904, 23.8587000647876, 0.8)
    pt3dadd(49.0371527591059, -257.9505840166, 24.1633129797919, 0.8)
    pt3dadd(49.2424895068283, -258.880663471296, 24.4679258947962, 0.8)
    pt3dadd(49.4478262545507, -259.810742925992, 24.7725388098005, 0.8)
    pt3dadd(49.6531630022731, -260.740822380688, 25.0771517248049, 0.8)
    pt3dadd(49.8584997499954, -261.670901835383, 25.3817646398092, 0.8)
    pt3dadd(50.0638364977178, -262.600981290079, 25.6863775548135, 0.8)
    pt3dadd(50.2691732454402, -263.531060744775, 25.9909904698178, 0.8)
    pt3dadd(50.2419164857997, -264.50524464838, 26.0436900182381, 0.8)
    pt3dadd(50.1223163085839, -265.49693873784, 25.9963758497365, 0.8)
    pt3dadd(50.002716131368, -266.488632827299, 25.9490616812349, 0.8)
    pt3dadd(49.8831159541522, -267.480326916759, 25.9017475127332, 0.8)
    pt3dadd(49.7635157769364, -268.472021006218, 25.8544333442316, 0.8)
    pt3dadd(49.6439155997206, -269.463715095678, 25.8071191757299, 0.8)
    pt3dadd(49.5243154225047, -270.455409185137, 25.7598050072283, 0.8)
    pt3dadd(49.5200745459998, -271.228759064337, 26.2873186687271, 0.8)
    pt3dadd(49.5522742620869, -271.93313667722, 26.9964134132811, 0.8)
    pt3dadd(49.5844739781739, -272.637514290102, 27.7055081578351, 0.8)
    pt3dadd(49.616673694261, -273.341891902984, 28.4146029023891, 0.8)
    pt3dadd(49.6488734103481, -274.046269515867, 29.1236976469431, 0.8)
    pt3dadd(49.6810731264351, -274.750647128749, 29.8327923914971, 0.8)
    pt3dadd(49.7132728425222, -275.455024741631, 30.541887136051, 0.8)
    pt3dadd(49.7454725586092, -276.159402354514, 31.250981880605, 0.8)
    pt3dadd(49.3396651118028, -277.064666886292, 31.29176484405, 0.8)
    pt3dadd(48.924725702985, -277.97411968682, 31.318614250435, 0.8)
    pt3dadd(48.5097862941673, -278.883572487347, 31.3454636568201, 0.8)
    pt3dadd(48.0948468853495, -279.793025287874, 31.3723130632051, 0.8)
    pt3dadd(47.6799074765317, -280.702478088401, 31.3991624695902, 0.8)
    pt3dadd(47.6803014468916, -281.413834688883, 31.9396464582286, 0.8)
    pt3dadd(47.8569796336971, -282.041111282419, 32.6981376536348, 0.8)
    pt3dadd(48.0336578205026, -282.668387875955, 33.456628849041, 0.8)
    pt3dadd(48.2103360073082, -283.295664469491, 34.2151200444471, 0.8)
    pt3dadd(48.3664641424002, -283.980368557798, 34.8419284389093, 0.8)
    pt3dadd(48.4114381539731, -284.975694874021, 34.7564716514876, 0.8)
    pt3dadd(48.4564121655459, -285.971021190244, 34.671014864066, 0.8)
    pt3dadd(48.5013861771188, -286.966347506468, 34.5855580766443, 0.8)
    pt3dadd(48.8299088255439, -287.874254498004, 34.441453481095, 0.8)
    pt3dadd(49.3041448552665, -288.737237396332, 34.2672102450541, 0.8)
    pt3dadd(49.778380884989, -289.60022029466, 34.0929670090132, 0.8)
    pt3dadd(50.3077703141067, -290.266982184431, 34.4836986610708, 0.8)
    pt3dadd(50.8558892990707, -290.867109335849, 35.0662902679904, 0.8)
    pt3dadd(51.4040082840347, -291.467236487267, 35.64888187491, 0.8)
    pt3dadd(51.978839989726, -292.024472070799, 36.2436060156554, 0.8)
    pt3dadd(52.6066945563635, -292.496570926291, 36.8624123777715, 0.8)
    pt3dadd(53.234549123001, -292.968669781784, 37.4812187398877, 0.8)
    pt3dadd(53.8624036896384, -293.440768637276, 38.1000251020038, 0.8)
    pt3dadd(54.5001247031415, -294.010529275319, 38.4046744760635, 0.8)
    pt3dadd(55.1538639003569, -294.738843888859, 38.1992897499323, 0.8)
    pt3dadd(55.8076030975723, -295.4671585024, 37.993905023801, 0.8)
    pt3dadd(56.4613422947876, -296.19547311594, 37.7885202976697, 0.8)
    pt3dadd(57.115081492003, -296.92378772948, 37.5831355715384, 0.8)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(47.5326056652012, -230.013888204671, 22.0726125678893, 0.8)
    pt3dadd(48.1877169420636, -230.800610055573, 21.7870301420648, 0.8)
    pt3dadd(48.7277499492898, -231.616359352274, 21.5798649035789, 0.8)
    pt3dadd(49.267782956516, -232.432108648976, 21.372699665093, 0.8)
    pt3dadd(49.6054254681005, -233.333984532906, 21.2165735070107, 0.8)
  }
  adendOML[13] {pt3dclear()
    pt3dadd(49.6054254681005, -233.333984532906, 21.2165735070107, 0.8)
    pt3dadd(49.7515647671226, -234.317353957769, 21.1087408610942, 0.8)
    pt3dadd(49.8977040661448, -235.300723382632, 21.0009082151776, 0.8)
    pt3dadd(50.0438433651669, -236.284092807496, 20.8930755692611, 0.8)
    pt3dadd(50.189982664189, -237.267462232359, 20.7852429233445, 0.8)
    pt3dadd(50.3155763130407, -238.253942853592, 20.681903058561, 0.8)
    pt3dadd(50.4228469683228, -239.243198097708, 20.5825699396885, 0.8)
    pt3dadd(50.5301176236048, -240.232453341824, 20.483236820816, 0.8)
    pt3dadd(50.6373882788869, -241.22170858594, 20.3839037019434, 0.8)
    pt3dadd(50.744658934169, -242.210963830055, 20.2845705830709, 0.8)
    pt3dadd(50.851929589451, -243.200219074171, 20.1852374641984, 0.8)
    pt3dadd(51.0424440015024, -244.16712900096, 20.0684361522342, 0.8)
    pt3dadd(51.3959904252334, -245.090275861583, 19.9174235700115, 0.8)
    pt3dadd(51.7495368489645, -246.013422722205, 19.7664109877889, 0.8)
    pt3dadd(52.1030832726956, -246.936569582828, 19.6153984055663, 0.8)
    pt3dadd(52.474906706816, -247.846304202175, 19.4611923829125, 0.8)
    pt3dadd(53.2076691856114, -248.491170473262, 19.2439214872907, 0.8)
    pt3dadd(53.9404316644067, -249.136036744348, 19.0266505916688, 0.8)
    pt3dadd(54.673194143202, -249.780903015435, 18.809379696047, 0.8)
    pt3dadd(55.2992789003765, -250.553685815984, 18.8931441437727, 0.8)
    pt3dadd(55.921931534622, -251.330584051763, 18.9865937468297, 0.8)
    pt3dadd(56.3545403564435, -252.175510780617, 18.9631556181789, 0.8)
    pt3dadd(56.4434425801037, -253.143471464827, 18.7283184225466, 0.8)
    pt3dadd(56.5323448037639, -254.111432149037, 18.4934812269144, 0.8)
    pt3dadd(56.6191547184197, -255.078701587231, 18.2636510090214, 0.8)
    pt3dadd(56.4240612755987, -255.952837280735, 18.7084266130172, 0.8)
    pt3dadd(56.2289678327776, -256.82697297424, 19.153202217013, 0.8)
    pt3dadd(56.0338743899566, -257.701108667744, 19.5979778210088, 0.8)
    pt3dadd(55.8387809471356, -258.575244361249, 20.0427534250046, 0.8)
    pt3dadd(55.4657947138236, -259.475143670997, 20.1590512313085, 0.8)
    pt3dadd(55.0451817140756, -260.381940605602, 20.1874065453566, 0.8)
    pt3dadd(54.6245687143276, -261.288737540206, 20.2157618594048, 0.8)
    pt3dadd(54.3120571916187, -262.192055074841, 20.1972377568566, 0.8)
    pt3dadd(54.6686654940417, -263.073836035106, 19.8885423458819, 0.8)
    pt3dadd(55.0252737964648, -263.955616995371, 19.5798469349074, 0.8)
    pt3dadd(55.3818820988878, -264.837397955636, 19.2711515239328, 0.8)
    pt3dadd(55.8108365186237, -265.72212496388, 19.0938027221041, 0.8)
    pt3dadd(56.2455916963931, -266.607088188137, 18.9269853755415, 0.8)
    pt3dadd(56.6803468741624, -267.492051412395, 18.760168028979, 0.8)
    pt3dadd(57.2719065260796, -268.266264709089, 18.565627260739, 0.8)
    pt3dadd(57.9168356932123, -269.002783482229, 18.3616506292491, 0.8)
    pt3dadd(58.5876399838986, -269.723029836742, 18.2818888903336, 0.8)
    pt3dadd(59.2978252279804, -270.418510189337, 18.3911774910362, 0.8)
    pt3dadd(60.0080104720622, -271.113990541931, 18.5004660917388, 0.8)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
  shape3d_20()
}

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, 8 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 14 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 13 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 13 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_13