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_SH07all2_05

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[23]
create GCL[13]
create adendIML[18]
create adendMML[21]
create adendOML[13]
create soma[3]
create axonh[1]

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-24.2285234431931, 0, 0, 12.03411)
    pt3dadd(-24.2284234431931, 0, 0, 12.03411)
  }
  soma[1] {pt3dclear()
    pt3dadd(-24.2284234431931, 0, 0, 9.082505)
    pt3dadd(-25.0887957705001, -0.450371663516715, -0.163493339247335, 9.082505)
    pt3dadd(-26.0675568227911, -0.545472592993754, -0.342306584503345, 7.506202)
    pt3dadd(-27.0254080035248, -0.585125377009641, -0.61589952548072, 6.203472)
    pt3dadd(-27.9164748433423, -0.377524402437316, -0.98692134881664, 5.126836)
    pt3dadd(-28.7212921030631, -0.00797946101886765, -1.44886031170029, 4.237055)
    pt3dadd(-29.4649528278005, 0.523390337586999, -1.83760642065532, 3.018396)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-29.4649528278005, 0.523390337586999, -1.83760642065532, 3.018396)
    pt3dadd(-30.1379790316033, 0.875351520029243, -2.48727137640447, 3.018396)
    pt3dadd(-30.7898714112741, 1.22983815915341, -3.15762616904019, 3.018396)
    pt3dadd(-31.186084967453, 0.968151356542743, -4.01929240774801, 3.018396)
    pt3dadd(-31.3928697108216, 0.356391236114006, -4.76326871462764, 3.018396)
    pt3dadd(-31.6284013570403, -0.248585311455235, -5.5220439310168, 3.018396)
    pt3dadd(-32.0776307661428, -0.594130513338733, -6.33119570704108, 3.018396)
    pt3dadd(-32.8096146180123, -0.472098605878596, -6.97665503387458, 3.018396)
    pt3dadd(-33.5558843381646, -0.484134322412164, -7.63685841710039, 3.018396)
    pt3dadd(-34.3444578645207, -0.656429386549577, -8.16847954596537, 3.018396)
    pt3dadd(-35.2648083484085, -0.461498179111517, -8.50577238897397, 2.887432)
    pt3dadd(-36.1821236128471, -0.217231978329801, -8.81915513186708, 2.625505)
    pt3dadd(-37.087348875157, -0.209780475633238, -9.24402181634983, 2.625505)
    pt3dadd(-37.8297878665555, -0.468969049181359, -9.85620169662983, 2.625505)
    pt3dadd(-38.5252869368421, -0.628577848366799, -10.5489024735128, 2.887433)
    pt3dadd(-39.2771798836281, -0.771235968050691, -11.1782128541757, 3.018396)
    pt3dadd(-40.0530794008253, -1.07443437293178, -11.7295493770679, 2.887432)
    pt3dadd(-40.8522923399383, -1.228469974876, -12.2974342560369, 2.625505)
    pt3dadd(-41.5079851521355, -1.34436524182839, -13.0329428035257, 2.625505)
    pt3dadd(-41.9291460775817, -1.55554514541586, -13.9104875083643, 2.887433)
    pt3dadd(-42.5049889727972, -1.65210756828525, -14.7177891003693, 3.018396)
    pt3dadd(-43.3037382308706, -1.75476465991488, -15.3045085006682, 3.018396)
    pt3dadd(-44.0028380755129, -2.18942919307725, -15.8303608828507, 3.018396)
    pt3dadd(-44.6024228027174, -2.88684472610302, -16.1994524205745, 3.018396)
    pt3dadd(-45.4511111545316, -3.18985316957782, -16.4546857596742, 2.887432)
    pt3dadd(-46.2876145794454, -3.25000659330664, -16.978653312255, 2.756469)
    pt3dadd(-46.9607742091266, -3.52602050408488, -17.6572168566598, 2.887433)
    pt3dadd(-47.6631137075116, -3.7438655380713, -18.3310938073867, 3.018396)
    pt3dadd(-48.3953649016462, -3.94311459295086, -18.9815924762476, 3.018396)
    pt3dadd(-49.1308279985009, -4.21039233092094, -19.6024258202505, 3.018396)
    pt3dadd(-49.8978601411401, -4.37563395515956, -20.2046511230988, 3.018396)
    pt3dadd(-50.5395674254754, -4.84856033810164, -20.8053010301062, 3.018396)
    pt3dadd(-51.3060565726517, -5.11611222175268, -21.3293179824223, 2.659099)
    pt3dadd(-51.5211237882158, -5.52022748117713, -21.680916594198, 1.810195)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-51.5211237882158, -5.52022748117713, -21.680916594198, 0.6041239)
    pt3dadd(-52.1398318610101, -5.61139309272668, -22.1776894074456, 0.6041239)
    pt3dadd(-52.6621916247297, -6.05952382047294, -22.89185009358, 0.6042578)
    pt3dadd(-53.1501059370322, -6.69519196938204, -23.4825683385178, 0.7357856)
    pt3dadd(-54.067505850946, -6.75609658532773, -23.5187152911093, 0.7007697)
    pt3dadd(-55.0156460419669, -6.50818289676635, -23.3285430536936, 0.5898863)
    pt3dadd(-55.9289468238865, -6.59039781508902, -23.6334930901999, 0.4911814)
    pt3dadd(-56.8790940496308, -6.47883190258327, -23.8326815754614, 0.4278964)
    pt3dadd(-57.451098454095, -6.96027892775862, -24.26015585612, 0.4438951)
    pt3dadd(-57.8893997260483, -7.7434122662738, -24.690378737956, 0.6007389)
    pt3dadd(-58.6596936773109, -8.29619882629877, -24.8737447119843, 0.4317748)
    pt3dadd(-59.4795588964113, -8.74293140782052, -25.2240452236063, 0.505214)
    pt3dadd(-60.0611409644556, -9.33881693510115, -25.7634549307007, 0.5647042)
    pt3dadd(-60.7031901788886, -9.93616409858505, -26.2141780912387, 0.5094095)
    pt3dadd(-61.6763466851439, -9.99790457672201, -26.3442535852876, 0.5315145)
    pt3dadd(-62.4049636526809, -10.4050222776425, -26.8274922609405, 0.4867864)
    pt3dadd(-63.1184173055384, -10.9275015088403, -27.2608949352034, 0.4748263)
    pt3dadd(-64.0416142901059, -11.2114264705375, -27.5130635298419, 0.5140523)
    pt3dadd(-64.8902267524039, -11.5026236966091, -27.9373613636616, 0.4678429)
    pt3dadd(-65.6846441713403, -11.8582192873818, -28.4049632759997, 0.4591842)
    pt3dadd(-66.6610287683366, -12.0366398310396, -28.4700049230162, 0.3948845)
    pt3dadd(-67.5885823386652, -12.3239310554531, -28.6043647982799, 0.3918042)
    pt3dadd(-68.5663530796425, -12.406724739976, -28.7327240659709, 0.3863733)
    pt3dadd(-69.4067325821231, -12.7941311879979, -29.0989878715758, 0.3749038)
    pt3dadd(-70.3684910171115, -12.9637409636216, -29.2086268044187, 0.3759096)
    pt3dadd(-71.3173912633875, -13.1328414346582, -29.1264177319685, 0.468814)
  }
  axon[0] {pt3dclear()
    pt3dadd(-71.3173912633875, -13.1328414346582, -29.1264177319685, 0.5178535)
    pt3dadd(-72.2624708195667, -12.9245883455598, -29.0641898785623, 0.5178535)
    pt3dadd(-73.1778137445566, -13.2795405278204, -29.2387377523027, 0.435033)
    pt3dadd(-74.1607921326216, -13.4057875061469, -29.3455172533009, 0.3753972)
    pt3dadd(-75.1066437623427, -13.7231641006965, -29.3794613081346, 0.374905)
    pt3dadd(-76.0780037830097, -13.9251316452462, -29.35763374887, 0.3749048)
    pt3dadd(-77.0641558693937, -14.0183084001755, -29.3597132644629, 0.375036)
    pt3dadd(-77.9449175193429, -14.2461458772136, -29.7663137757277, 0.3938787)
    pt3dadd(-78.8839980864505, -14.3468284961074, -30.0854819299663, 0.3947417)
    pt3dadd(-79.8360594903734, -14.4583463362482, -30.3136112566931, 0.4074428)
    pt3dadd(-80.7363674980403, -14.713999703578, -30.5638548336578, 0.3826658)
    pt3dadd(-81.6461450444071, -14.9754823420184, -30.7705935350183, 0.4392006)
    pt3dadd(-82.6076074974402, -14.7766330149731, -30.7829037193357, 0.4578723)
    pt3dadd(-83.540888858438, -15.0390480203452, -30.9889332856045, 0.4244021)
    pt3dadd(-84.3562065824779, -15.4568615952331, -31.38305478707, 0.3826853)
    pt3dadd(-85.2894634735416, -15.6397507477106, -31.6420979627647, 0.4453835)
    pt3dadd(-86.2608014783678, -15.5524786755097, -31.7961294069362, 0.3981926)
    pt3dadd(-86.9861913955537, -16.1601370277803, -32.087694518858, 0.3750371)
    pt3dadd(-87.7977088170178, -16.5732506802301, -32.4498666248195, 0.3749318)
    pt3dadd(-88.3432011799634, -17.228634633611, -32.9629532948551, 0.3903446)
    pt3dadd(-89.2509732052336, -17.291018268164, -33.2402298585218, 0.4140021)
    pt3dadd(-90.1274164105868, -17.6562816845062, -33.3573360353279, 0.3757577)
    pt3dadd(-90.9936175743243, -18.0304423213271, -33.6618972672005, 0.3749039)
    pt3dadd(-91.9520495617062, -18.2778965321682, -33.784100123174, 0.3750466)
    pt3dadd(-92.9283042646567, -18.4218671926409, -33.9127846705609, 0.4362851)
    pt3dadd(-93.8557405158791, -18.3686867908009, -34.2750984947069, 0.5269726)
    pt3dadd(-94.6439292800964, -18.5578512374669, -34.8362692268909, 0.585098)
  }
  axon[1] {pt3dclear()
    pt3dadd(-94.6439292800964, -18.5578512374669, -34.8362692268909, 0.4635382)
    pt3dadd(-94.6084991917625, -18.6511249583942, -35.7461452521479, 0.4635382)
    pt3dadd(-94.5743179716682, -18.136690187354, -36.5589978939396, 0.4173507)
    pt3dadd(-94.8055001127023, -17.2729873874739, -36.9948393753773, 0.379625)
    pt3dadd(-95.061960649191, -16.6994845657213, -37.7456539654475, 0.3751081)
    pt3dadd(-95.1887330802223, -16.2442429350872, -38.6215239388901, 0.3749027)
    pt3dadd(-95.3307835732885, -15.4973110091624, -39.2643358743051, 0.3749027)
    pt3dadd(-95.5358279852824, -14.7048420385448, -39.8364962306492, 0.3749027)
    pt3dadd(-95.8856597383979, -13.9839092541715, -40.4276789495927, 0.3749027)
    pt3dadd(-96.1723197881639, -13.5052652224213, -41.2515537091847, 0.3749027)
    pt3dadd(-96.3712910645083, -13.0469305929904, -42.115245286419, 0.3749027)
    pt3dadd(-96.6130628942491, -12.3355173386228, -42.7660618870853, 0.3749027)
    pt3dadd(-96.685098229651, -11.6788987009661, -43.512308655641, 0.3749027)
    pt3dadd(-96.7257743370478, -11.1290917967394, -44.3455971819683, 0.3750354)
    pt3dadd(-96.802855944804, -10.6056589982147, -45.1913736119821, 0.3843999)
    pt3dadd(-96.9816331890202, -9.80349085277499, -45.7445684841574, 0.4140365)
    pt3dadd(-97.2202285175076, -9.02876820548044, -46.3233406106953, 0.4842525)
    pt3dadd(-97.7832401025675, -8.35885952315313, -46.7896495852191, 0.7340287)
    pt3dadd(-98.0501299338971, -7.42267103433503, -46.9922587438986, 0.8432169)
    pt3dadd(-97.9731206872454, -6.74696353801546, -47.6428595854718, 0.4661853)
    pt3dadd(-98.2740457702977, -6.16230984415662, -48.3319811607549, 0.3750449)
    pt3dadd(-98.6799633629129, -5.3383989803046, -48.7264254575277, 0.3750354)
    pt3dadd(-99.0268601072056, -4.59573983845525, -49.2840965604039, 0.3938782)
    pt3dadd(-99.4404028334619, -3.88652611532741, -49.8387563130049, 0.3843904)
    pt3dadd(-99.8562191896422, -3.42436093846256, -50.5936856231658, 0.3749122)
    pt3dadd(-100.027064854752, -3.070219589172, -51.512646510948, 0.3749027)
    pt3dadd(-100.139360473986, -2.69472484157358, -52.4324350391897, 0.3749027)
    pt3dadd(-100.189220633108, -2.23963802000355, -53.3204352138248, 0.3749027)
    pt3dadd(-100.227788063159, -1.69509178547532, -54.158113616106, 0.3749027)
    pt3dadd(-100.283008538061, -1.25086549355588, -55.0502669607779, 0.3749027)
    pt3dadd(-100.417758386576, -0.81619576771195, -55.9369223909572, 0.3749027)
    pt3dadd(-100.577933436848, -0.255406705678389, -56.7484854532788, 0.3749027)
    pt3dadd(-100.906847129413, 0.158545293590763, -57.5936293538843, 0.3761085)
    pt3dadd(-101.124274660324, 0.755499699885583, -58.3616833947379, 0.4755313)
    pt3dadd(-101.339769301763, 1.28425566260876, -59.1694636079398, 0.4730434)
    pt3dadd(-101.457878758432, 1.50884615441857, -60.1327766970683, 0.3486331)
    pt3dadd(-101.664396405068, 1.87296446648303, -61.040841932612, 0.3415956)
    pt3dadd(-101.849643199533, 2.17191737432264, -61.9763124318001, 0.3474274)
    pt3dadd(-102.006005769435, 2.35745620533213, -62.9444204312241, 0.368296)
    pt3dadd(-102.070994320387, 2.46699428867009, -63.9336575254571, 0.3749027)
    pt3dadd(-102.315190403637, 2.85602097230442, -64.8160799732737, 0.3749027)
    pt3dadd(-102.673514510415, 3.29697788410487, -65.6381171893281, 0.3749027)
    pt3dadd(-103.070513445884, 3.63921788218249, -66.4889262944796, 0.3750701)
    pt3dadd(-103.431687863159, 3.9759196997706, -67.3575240861096, 0.3879474)
    pt3dadd(-103.947963406621, 4.43849333000365, -68.0654249694744, 0.4938473)
    pt3dadd(-104.632855270617, 4.93293869920526, -68.5987751966748, 0.6549054)
    pt3dadd(-104.939342688231, 5.48528702023485, -69.2786521797469, 0.4647182)
    pt3dadd(-104.905055977848, 6.47331571038798, -69.2424215921866, 0.3428686)
    pt3dadd(-104.909584904597, 7.46629468204643, -69.1730405972398, 0.352211)
    pt3dadd(-104.964017087124, 8.42069426448069, -69.4362550665838, 0.3721998)
    pt3dadd(-105.353903104104, 9.17115226279776, -69.9340327250807, 0.4300396)
    pt3dadd(-105.551240904666, 9.73906760667708, -70.7322910850591, 0.4621037)
    pt3dadd(-105.956983530343, 10.3882793810123, -71.3508629705752, 0.3761598)
    pt3dadd(-106.394720502428, 11.0296446412233, -71.9708109973832, 0.3862387)
    pt3dadd(-106.853261391825, 11.521489223396, -72.7105420037112, 0.4350326)
    pt3dadd(-107.293259765706, 12.0215918766444, -73.4553051855313, 0.5000817)
    pt3dadd(-107.5327480093, 12.5863667279455, -74.2385093975205, 0.5261943)
    pt3dadd(-107.58150814331, 13.1635851556031, -75.0523182861096, 0.4972762)
    pt3dadd(-107.525921424022, 13.8944159285329, -75.7133933661925, 0.3793575)
    pt3dadd(-107.238180507905, 14.543393912668, -76.4159349550012, 0.3749217)
    pt3dadd(-107.066725815461, 15.0444777900585, -77.2579877680293, 0.4078206)
    pt3dadd(-106.72118782434, 15.1532397200245, -78.1795366560277, 0.5163527)
    pt3dadd(-106.411854989821, 15.2864470954736, -79.116692399559, 0.5384821)
    pt3dadd(-106.393282296216, 15.896291289652, -79.8105168906516, 0.7705913)
    pt3dadd(-106.587256201341, 16.5133834436777, -79.9213115994178, 0.9736392)
  }
  axon[2] {pt3dclear()
    pt3dadd(-106.587256201341, 16.5133834436777, -79.9213115994178, 0.7474236)
    pt3dadd(-105.838158765927, 16.0865962962173, -80.9193921201593, 0.7474236)
    pt3dadd(-105.701301429643, 16.391877857247, -81.8585741837051, 0.4275444)
    pt3dadd(-105.601655569628, 16.5605049993107, -82.8259521007483, 0.3938876)
    pt3dadd(-105.348135869668, 16.4361685505723, -83.7821012602269, 0.3938782)
    pt3dadd(-105.449301283747, 16.6673810129757, -84.7317077313424, 0.3761179)
    pt3dadd(-105.744683702446, 17.031247846214, -85.6097979332895, 0.5540544)
    pt3dadd(-106.113765094235, 17.6147048116006, -86.3213029301307, 0.5540544)
    pt3dadd(-106.241555340479, 18.3236268738638, -86.9981828632861, 0.3805632)
    pt3dadd(-106.330085218516, 19.1738211203421, -87.5077803026316, 0.4688131)
    pt3dadd(-106.413688355082, 20.1276434978919, -87.7874695756049, 0.5281847)
    pt3dadd(-106.256103908171, 20.9393001262421, -88.3431193629312, 0.4723967)
    pt3dadd(-105.879297212829, 21.7595874608441, -88.7598025610214, 0.4308636)
    pt3dadd(-105.31904230241, 22.3836117541781, -89.2991482160697, 0.3973289)
    pt3dadd(-104.869154297433, 23.1019964224094, -89.8143200629974, 0.3749132)
    pt3dadd(-104.249764733314, 23.4141447089379, -90.5307275528423, 0.3793498)
    pt3dadd(-103.580330938365, 23.5619846091617, -91.256318419129, 0.4558762)
    pt3dadd(-102.997809923708, 23.6509702415223, -92.0613523049432, 0.4647375)
    pt3dadd(-102.474476620615, 23.7823607576889, -92.9022374697268, 0.5012289)
    pt3dadd(-101.911665764051, 23.8279621864951, -93.726837228803, 0.4283898)
    pt3dadd(-101.277908821656, 24.1548863309275, -94.408493864231, 0.4373408)
    pt3dadd(-100.863638992424, 24.7674226978185, -95.0614168083567, 0.5647071)
    pt3dadd(-100.403562076892, 24.6801667028131, -95.9277698294609, 0.7577003)
    pt3dadd(-99.9352697494314, 25.2683406107232, -96.3431637510157, 0.6678663)
    pt3dadd(-100.079456020722, 26.2276303357747, -96.1561344156211, 0.6112937)
    pt3dadd(-100.391720848562, 27.0980186992618, -95.7783380365395, 0.4236414)
    pt3dadd(-100.006421525542, 26.9844829349499, -96.3800617169122, 0.3750584)
    pt3dadd(-99.4232620940761, 26.8039780323082, -97.1475620021037, 0.3749032)
    pt3dadd(-98.7060899146402, 27.2057146024417, -97.6914410660043, 0.3749049)
    pt3dadd(-97.9234372937438, 27.4846073619599, -98.2401803244748, 0.3749048)
    pt3dadd(-97.1958513791711, 27.5088012750286, -98.9162903331003, 0.3772725)
    pt3dadd(-96.5869967510935, 27.9623172223235, -99.2140351394973, 0.4611641)
    pt3dadd(-96.1258431299362, 28.4516726522023, -99.7893124456737, 0.4971763)
    pt3dadd(-95.6804342399601, 29.022068160087, -100.429449309087, 0.4725508)
    pt3dadd(-95.2806174168154, 29.697073723769, -101.017690916011, 0.630962)
    pt3dadd(-94.6442496895054, 30.2609231044739, -101.495017512895, 0.4945772)
    pt3dadd(-94.4560000262632, 31.0912528475801, -101.998661000353, 0.7113191)
    pt3dadd(-93.9227467151293, 31.6273886060294, -102.61800900488, 0.6346981)
    pt3dadd(-93.3233482965739, 32.0496031726244, -103.284607721146, 0.8163041)
    pt3dadd(-92.9028104249253, 32.5756268685519, -104.008515812573, 0.3986175)
    pt3dadd(-92.4034270712623, 33.3035152821095, -104.463034904002, 0.4300009)
    pt3dadd(-91.7809275214829, 33.9149846331162, -104.945128025021, 0.4498388)
    pt3dadd(-91.2694657726954, 34.3934038561738, -105.647108779339, 0.5118064)
    pt3dadd(-90.8899714604567, 34.6649991796987, -106.526011882477, 0.4078206)
    pt3dadd(-90.7952748675265, 34.9207098187469, -107.482594727345, 0.376118)
    pt3dadd(-90.7231907101675, 35.503776811804, -108.283198602547, 0.5588583)
    pt3dadd(-90.3077386698643, 35.9216105837278, -109.049929928909, 0.7157212)
    pt3dadd(-89.7942593529155, 36.3277185092434, -109.738435888711, 0.5053954)
    pt3dadd(-89.8311605038031, 37.2245418687089, -110.152027074112, 0.4537999)
    pt3dadd(-89.8678992328984, 37.794305730766, -110.953004921663, 0.5574955)
    pt3dadd(-89.6368206986174, 38.4562065322178, -111.634695320811, 1.018657)
    pt3dadd(-89.0743981948469, 38.5936399081458, -112.438492743958, 2.052629)
  }
  axon[3] {pt3dclear()
    pt3dadd(-89.0743981948469, 38.5936399081458, -112.438492743958, 2.318136)
    pt3dadd(-88.7730156904693, 38.2851146205534, -113.204044632317, 2.318136)
    pt3dadd(-88.47394237759, 37.6389818532986, -113.902976873498, 2.595774)
    pt3dadd(-88.2583221356675, 37.8174911795904, -114.796584660005, 1.989976)
    pt3dadd(-87.8944500234694, 38.2090507817363, -115.624317087007, 1.126837)
    pt3dadd(-87.6851992818673, 39.0064294174285, -116.185387259239, 0.4248053)
    pt3dadd(-87.402235645888, 39.6191792560122, -116.910322519474, 0.5953577)
    pt3dadd(-86.8258617063948, 39.8899596874315, -117.668972951384, 0.9038768)
    pt3dadd(-86.1831672641787, 40.2253852311242, -118.311818383025, 0.471856)
    pt3dadd(-86.031616959546, 40.8410598701346, -119.012633302493, 0.5010815)
    pt3dadd(-86.1018071123921, 41.0585533739304, -119.962655893688, 0.9119243)
    pt3dadd(-86.0564919511796, 40.8903834198394, -120.933745000487, 0.7680511)
    pt3dadd(-86.3284691000869, 41.4285410740104, -121.707262642401, 0.7497361)
    pt3dadd(-86.2263774912872, 41.6920306867284, -122.60329503323, 0.6289767)
    pt3dadd(-86.019655783788, 41.9225146152473, -123.544804746076, 0.3958853)
    pt3dadd(-86.0240020221578, 42.1341978759311, -124.520671626693, 0.3209083)
    pt3dadd(-85.9237621854723, 42.3493320900113, -125.484251677817, 0.3180285)
    pt3dadd(-85.2505739547841, 42.5438977517859, -126.159646593649, 0.3283114)
    pt3dadd(-84.3442532772043, 42.8004867636199, -126.303858145627, 0.510986)
    pt3dadd(-84.0253673238578, 43.6186358076283, -125.893962170533, 0.6775209)
    pt3dadd(-84.1430687747888, 44.5393224494221, -125.536525134135, 0.6056492)
    pt3dadd(-84.4563828665152, 45.4383460544406, -125.231780353163, 0.4429443)
    pt3dadd(-84.4827027917613, 46.3762718636611, -125.316854691505, 0.3955314)
    pt3dadd(-84.4484736619997, 47.3190587097468, -125.582916853635, 0.3964847)
    pt3dadd(-84.7339015629551, 48.2362036301039, -125.412814961846, 0.3750449)
    pt3dadd(-84.553015734816, 47.8078871891233, -126.291735757126, 0.3749027)
    pt3dadd(-84.3859293974866, 47.9551138553077, -127.21055707638, 0.3749027)
    pt3dadd(-84.3432837632995, 48.8151785055663, -127.684864177905, 0.3749028)
    pt3dadd(-84.2380437432573, 49.7898557971982, -127.813564392032, 0.3749259)
    pt3dadd(-83.5878006961131, 50.5064623809226, -128.022814065462, 0.3832332)
    pt3dadd(-83.1785531508628, 51.367995610602, -127.853370660242, 0.4544316)
    pt3dadd(-82.997880886015, 52.2749858287104, -127.478821531423, 0.4262727)
    pt3dadd(-82.7578799669405, 53.2242330091302, -127.52486919689, 0.4362163)
    pt3dadd(-82.1495090854298, 53.900948228588, -127.872354803435, 0.3758988)
    pt3dadd(-81.2490905028746, 54.1097291658697, -128.067730555994, 0.3757748)
    pt3dadd(-80.7243548504659, 54.8866870060447, -128.141717557645, 0.3852629)
  }
}
proc shape3d_2() {
  axon[3] {
    pt3dadd(-80.6686925959182, 55.8620623313221, -127.935279969175, 0.4137273)
    pt3dadd(-80.7066716372247, 56.7955311977307, -127.688102520955, 0.3972561)
  }
  axon[4] {pt3dclear()
    pt3dadd(-80.7066716372247, 56.7955311977307, -127.688102520955, 0.3351806)
    pt3dadd(-80.1752965985697, 56.7809968908693, -127.848585848547, 0.3351806)
    pt3dadd(-79.324428859832, 56.4399777078392, -128.244710781415, 0.3250209)
    pt3dadd(-78.5403900297422, 56.5877637442834, -128.71146329537, 0.4876435)
    pt3dadd(-78.4503318192217, 57.5554751578429, -128.820711145748, 0.6174448)
    pt3dadd(-78.6384318863852, 58.5287254615229, -128.94030261733, 0.6161307)
    pt3dadd(-78.9095712167181, 59.4781606524689, -128.810979362458, 0.4870937)
    pt3dadd(-78.7417879475566, 59.9308052209783, -129.09666414535, 0.3522612)
    pt3dadd(-78.2299360165102, 60.1625367245312, -129.90165299516, 0.4090506)
    pt3dadd(-77.93440038946, 60.9080139797177, -130.462750510376, 0.5872554)
    pt3dadd(-77.8992130437989, 61.8741493825703, -130.645850208749, 0.490207)
    pt3dadd(-77.5233930941512, 62.4271677437057, -131.377618823712, 0.374749)
    pt3dadd(-77.4707396443512, 63.3274392713502, -131.75057537127, 0.3623287)
    pt3dadd(-77.6325149709242, 64.1030162568055, -132.344310380581, 0.3565054)
    pt3dadd(-77.6115366596362, 64.8668371978385, -132.981840561963, 0.3724231)
    pt3dadd(-77.3671682668397, 65.4829970175941, -133.689649000083, 0.3697776)
  }
  axon[5] {pt3dclear()
    pt3dadd(-77.3671682668397, 65.4829970175941, -133.689649000083, 0.3928438)
    pt3dadd(-76.9603801341794, 66.3544868937312, -133.988106320391, 0.3928438)
    pt3dadd(-76.2720378294371, 67.0565932053021, -133.855361396922, 0.3885456)
    pt3dadd(-75.4422248861123, 67.4173121606124, -133.759935133961, 0.3880027)
    pt3dadd(-74.4519738850411, 67.3827997377138, -133.772916357946, 0.3487943)
    pt3dadd(-73.4660780713833, 67.5476074120685, -133.785187096955, 0.3488622)
    pt3dadd(-72.4931442100848, 67.7580982420671, -133.873870838662, 0.4222656)
    pt3dadd(-71.8981287155734, 68.3336020502238, -133.660673296475, 0.74599)
    pt3dadd(-72.1490760544042, 69.1820645984504, -133.202246793443, 0.5837315)
    pt3dadd(-72.4446856471531, 70.0568723789762, -132.821334985645, 0.4628593)
    pt3dadd(-71.9676103025006, 69.7365919817572, -132.996338608238, 0.3706656)
    pt3dadd(-71.3008107477573, 69.0543338736345, -133.278651530276, 0.3541541)
    pt3dadd(-70.4387638770166, 69.1546168989802, -133.245587231185, 0.3541265)
    pt3dadd(-69.9615514915752, 70.0077524169099, -133.062344139505, 0.3764854)
    pt3dadd(-69.5523695818196, 70.9123559647994, -132.984894208809, 0.50631)
    pt3dadd(-69.0189067952803, 71.7127190409863, -132.751754549327, 0.8185588)
    pt3dadd(-68.4621254078384, 72.2538134248756, -132.808858975108, 0.4558226)
    pt3dadd(-67.541433384046, 72.0239862575605, -133.079828649691, 0.3657341)
    pt3dadd(-66.6187019264128, 72.1908247662769, -133.235181286549, 0.3748478)
    pt3dadd(-66.3290173028029, 73.0988106158136, -132.960085502845, 0.3790753)
    pt3dadd(-65.9439456706264, 73.9909673577301, -132.757063706508, 0.3899177)
    pt3dadd(-65.2998145389068, 74.6990807539396, -132.926986226515, 0.3760458)
    pt3dadd(-64.5095222055366, 75.2053795703917, -133.056510156265, 0.3617072)
    pt3dadd(-63.7134732329062, 75.7514742797653, -132.880705852796, 0.3439679)
    pt3dadd(-62.8551960571112, 76.2537088412945, -132.945801632138, 0.3540277)
    pt3dadd(-62.3680953345132, 77.081207286696, -132.745945508304, 0.3750989)
    pt3dadd(-61.7788612930063, 77.7486795939789, -132.326359460098, 0.3986741)
    pt3dadd(-61.105577031252, 78.0512772077678, -131.707373986677, 0.3796987)
    pt3dadd(-60.2157065973864, 77.9348577948942, -131.285664170988, 0.3749217)
    pt3dadd(-59.2784805219131, 78.2121043118671, -131.127716465419, 0.375246)
    pt3dadd(-58.5904376619923, 78.8044034169799, -130.755208760594, 0.4528107)
    pt3dadd(-58.1877613725897, 79.4793037784091, -130.173108440866, 0.596426)
    pt3dadd(-58.1556213695528, 80.4042035309169, -129.799987139297, 0.4282008)
    pt3dadd(-57.8221139020923, 81.2801000954937, -129.479143919644, 0.4319856)
    pt3dadd(-57.8472268269016, 82.2586479967588, -129.355263036492, 0.4548708)
    pt3dadd(-58.0112266375293, 83.143405347887, -128.991344779803, 0.3845367)
    pt3dadd(-57.3912817857761, 83.4505091673564, -128.308280520195, 0.4347322)
    pt3dadd(-56.6038712485388, 83.8909591728196, -127.887614710479, 0.4281534)
    pt3dadd(-55.9772304582822, 84.5307462003105, -127.454178287064, 0.3658993)
    pt3dadd(-55.3754453720403, 84.7277196718413, -126.722979700788, 0.3688275)
    pt3dadd(-55.0210848717082, 84.1131762501186, -126.083185573127, 0.3748989)
    pt3dadd(-55.4789846621557, 83.4010651900029, -125.710236385672, 0.3795452)
    pt3dadd(-55.6690998596575, 82.6522276271356, -125.496709405577, 0.524439)
    pt3dadd(-55.2574669073026, 81.762366111955, -125.376461474885, 0.4812222)
    pt3dadd(-54.6245074927573, 81.1667244960621, -124.899910460826, 0.4286487)
    pt3dadd(-53.7810686742818, 80.6749772440381, -124.851312623851, 0.3830544)
    pt3dadd(-52.7934536976567, 80.5335567000161, -124.905052711332, 0.3761218)
    pt3dadd(-51.8390257244815, 80.6561629457383, -124.964997706689, 0.4405372)
    pt3dadd(-51.139230003592, 81.328276991125, -125.176820974439, 0.5338812)
    pt3dadd(-50.5931565340813, 82.0402136992432, -125.606921600497, 0.4987491)
    pt3dadd(-50.0958845364087, 82.5958561021999, -126.270169264622, 0.3916624)
    pt3dadd(-49.343128917771, 82.9680039051214, -126.781026438245, 0.3898123)
    pt3dadd(-48.4016950152704, 82.7595694847009, -126.814101428071, 0.3947986)
    pt3dadd(-47.4634720488558, 82.4320450022131, -126.718190309052, 0.3830011)
    pt3dadd(-46.5044777725613, 82.3167945143665, -126.481730674875, 0.4682996)
    pt3dadd(-45.6460937877818, 82.5090407840848, -126.183687863458, 0.6485515)
  }
  axon[6] {pt3dclear()
    pt3dadd(-45.6460937877818, 82.5090407840848, -126.183687863458, 0.4353924)
    pt3dadd(-44.6442563420687, 82.463238650737, -126.296121889778, 0.4353924)
    pt3dadd(-43.9050819404336, 82.9734410077024, -126.734626945688, 0.3890065)
    pt3dadd(-43.1158382375732, 83.5130634268139, -126.943220923887, 0.3750934)
    pt3dadd(-42.2464411668737, 83.8369822717067, -126.648064044737, 0.3753956)
    pt3dadd(-41.4069385145763, 84.3015990192453, -126.374850422647, 0.4049681)
    pt3dadd(-40.5495959166425, 84.6554082763817, -126.016655035949, 0.4993992)
    pt3dadd(-39.6617167016147, 84.8455903275799, -125.601910990475, 0.6577136)
    pt3dadd(-38.952916498389, 85.4475031410504, -125.308042975153, 0.8440885)
    pt3dadd(-38.9487920103247, 86.3900641808484, -125.033072153955, 0.4993678)
    pt3dadd(-39.042854000916, 87.2823038302351, -124.740986426444, 0.3761183)
    pt3dadd(-38.2792427207148, 86.6516037701768, -124.697840271187, 0.3749027)
    pt3dadd(-37.5955762663013, 86.314019481445, -124.170381506601, 0.3749027)
    pt3dadd(-37.4224828218766, 86.8959407237377, -123.398612828876, 0.3749027)
    pt3dadd(-37.4691385355586, 87.5157859062792, -122.620548036273, 0.3749312)
    pt3dadd(-37.4862743361325, 87.8631406225142, -121.686812994144, 0.3831488)
    pt3dadd(-37.5901012701427, 88.1003545605882, -120.725525909236, 0.4283884)
    pt3dadd(-37.9210496278167, 88.7260624036328, -120.032352590007, 0.3796497)
    pt3dadd(-38.1755368689766, 88.4828701045473, -119.180627038591, 0.3921926)
    pt3dadd(-37.8348916266469, 87.6178943899436, -119.479654189348, 0.3534499)
    pt3dadd(-37.4022684347608, 86.8424488859553, -119.939326007632, 0.3292088)
    pt3dadd(-38.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-39.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-40.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-41.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-42.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-43.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-44.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-45.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-46.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-47.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-48.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-49.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-50.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-51.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-52.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-53.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-54.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-55.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-56.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-57.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-58.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-59.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-60.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-61.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-62.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-63.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-64.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-65.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-66.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-67.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-68.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-69.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-70.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-71.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-72.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-73.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-74.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-75.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-76.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-77.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-78.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-79.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-80.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-81.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-82.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-83.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-84.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-85.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-86.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-87.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-88.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-89.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-90.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-91.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-92.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-93.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-94.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-95.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-96.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-97.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-98.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-99.4022684347608, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-100.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-101.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-102.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-103.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-104.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-105.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-106.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-107.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-108.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-109.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-110.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-111.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-112.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-113.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-114.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-115.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-116.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-117.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-118.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-119.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-120.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-121.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-122.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-123.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-124.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-125.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-126.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-127.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-128.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-129.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-130.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-131.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-132.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-133.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-134.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-135.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-136.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-137.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-138.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-139.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-140.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-141.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-142.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-143.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-144.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-145.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-146.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-147.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-148.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-149.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-150.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-151.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-152.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-153.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-154.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-155.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-156.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-157.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-158.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-159.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-160.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-161.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-162.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-163.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-164.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-165.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-166.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-167.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-168.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-169.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-170.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-171.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-172.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-173.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-174.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-175.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-176.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-177.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-178.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-179.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-180.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-181.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-182.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-183.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-184.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-185.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-186.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-187.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-188.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-189.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-190.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-191.402268434761, 86.8424488859553, -119.939326007632, 0.4)
  }
}
proc shape3d_3() {
  axon[6] {
    pt3dadd(-192.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-193.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-194.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-195.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-196.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-197.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-198.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-199.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-200.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-201.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-202.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-203.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-204.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-205.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-206.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-207.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-208.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-209.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-210.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-211.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-212.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-213.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-214.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-215.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-216.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-217.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-218.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-219.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-220.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-221.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-222.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-223.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-224.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-225.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-226.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-227.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-228.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-229.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-230.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-231.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-232.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-233.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-234.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-235.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-236.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-237.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-238.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-239.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-240.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-241.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-242.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-243.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-244.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-245.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-246.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-247.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-248.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-249.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-250.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-251.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-252.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-253.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-254.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-255.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-256.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-257.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-258.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-259.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-260.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-261.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-262.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-263.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-264.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-265.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-266.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-267.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-268.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-269.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-270.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-271.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-272.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-273.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-274.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-275.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-276.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-277.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-278.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-279.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-280.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-281.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-282.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-283.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-284.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-285.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-286.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-287.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-288.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-289.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-290.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-291.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-292.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-293.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-294.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-295.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-296.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-297.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-298.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-299.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-300.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-301.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-302.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-303.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-304.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-305.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-306.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-307.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-308.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-309.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-310.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-311.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-312.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-313.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-314.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-315.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-316.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-317.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-318.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-319.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-320.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-321.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-322.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-323.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-324.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-325.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-326.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-327.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-328.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-329.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-330.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-331.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-332.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-333.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-334.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-335.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-336.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-337.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-338.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-339.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-340.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-341.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-342.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-343.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-344.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-345.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-346.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-347.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-348.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-349.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-350.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-351.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-352.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-353.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-354.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-355.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-356.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-357.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-358.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-359.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-360.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-361.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-362.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-363.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-364.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-365.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-366.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-367.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-368.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-369.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-370.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-371.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-372.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-373.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-374.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-375.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-376.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-377.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-378.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-379.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-380.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-381.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-382.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-383.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-384.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-385.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-386.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-387.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-388.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-389.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-390.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-391.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-392.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-393.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-394.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-395.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-396.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-397.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-398.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-399.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-400.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-401.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-402.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-403.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-404.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-405.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-406.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-407.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-408.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-409.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-410.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-411.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-412.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-413.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-414.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-415.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-416.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-417.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-418.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-419.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-420.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-421.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-422.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-423.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-424.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-425.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-426.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-427.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-428.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-429.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-430.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-431.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-432.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-433.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-434.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-435.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-436.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-437.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-438.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-439.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-440.402268434761, 86.8424488859553, -119.939326007632, 0.4)
  }
}
proc shape3d_4() {
  axon[6] {
    pt3dadd(-441.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-442.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-443.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-444.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-445.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-446.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-447.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-448.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-449.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-450.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-451.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-452.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-453.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-454.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-455.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-456.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-457.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-458.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-459.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-460.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-461.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-462.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-463.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-464.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-465.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-466.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-467.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-468.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-469.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-470.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-471.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-472.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-473.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-474.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-475.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-476.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-477.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-478.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-479.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-480.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-481.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-482.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-483.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-484.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-485.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-486.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-487.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-488.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-489.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-490.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-491.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-492.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-493.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-494.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-495.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-496.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-497.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-498.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-499.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-500.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-501.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-502.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-503.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-504.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-505.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-506.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-507.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-508.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-509.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-510.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-511.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-512.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-513.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-514.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-515.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-516.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-517.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-518.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-519.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-520.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-521.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-522.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-523.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-524.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-525.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-526.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-527.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-528.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-529.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-530.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-531.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-532.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-533.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-534.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-535.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-536.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-537.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-538.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-539.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-540.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-541.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-542.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-543.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-544.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-545.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-546.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-547.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-548.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-549.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-550.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-551.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-552.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-553.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-554.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-555.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-556.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-557.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-558.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-559.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-560.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-561.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-562.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-563.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-564.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-565.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-566.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-567.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-568.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-569.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-570.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-571.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-572.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-573.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-574.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-575.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-576.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-577.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-578.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-579.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-580.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-581.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-582.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-583.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-584.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-585.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-586.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-587.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-588.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-589.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-590.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-591.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-592.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-593.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-594.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-595.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-596.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-597.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-598.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-599.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-600.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-601.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-602.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-603.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-604.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-605.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-606.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-607.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-608.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-609.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-610.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-611.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-612.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-613.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-614.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-615.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-616.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-617.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-618.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-619.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-620.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-621.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-622.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-623.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-624.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-625.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-626.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-627.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-628.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-629.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-630.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-631.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-632.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-633.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-634.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-635.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-636.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-637.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-638.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-639.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-640.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-641.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-642.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-643.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-644.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-645.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-646.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-647.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-648.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-649.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-650.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-651.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-652.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-653.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-654.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-655.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-656.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-657.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-658.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-659.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-660.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-661.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-662.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-663.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-664.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-665.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-666.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-667.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-668.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-669.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-670.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-671.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-672.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-673.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-674.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-675.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-676.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-677.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-678.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-679.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-680.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-681.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-682.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-683.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-684.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-685.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-686.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-687.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-688.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-689.402268434761, 86.8424488859553, -119.939326007632, 0.4)
  }
}
proc shape3d_5() {
  axon[6] {
    pt3dadd(-690.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-691.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-692.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-693.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-694.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-695.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-696.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-697.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-698.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-699.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-700.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-701.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-702.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-703.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-704.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-705.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-706.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-707.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-708.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-709.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-710.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-711.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-712.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-713.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-714.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-715.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-716.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-717.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-718.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-719.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-720.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-721.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-722.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-723.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-724.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-725.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-726.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-727.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-728.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-729.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-730.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-731.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-732.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-733.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-734.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-735.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-736.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-737.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-738.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-739.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-740.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-741.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-742.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-743.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-744.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-745.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-746.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-747.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-748.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-749.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-750.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-751.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-752.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-753.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-754.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-755.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-756.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-757.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-758.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-759.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-760.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-761.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-762.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-763.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-764.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-765.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-766.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-767.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-768.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-769.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-770.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-771.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-772.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-773.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-774.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-775.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-776.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-777.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-778.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-779.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-780.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-781.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-782.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-783.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-784.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-785.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-786.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-787.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-788.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-789.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-790.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-791.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-792.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-793.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-794.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-795.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-796.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-797.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-798.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-799.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-800.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-801.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-802.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-803.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-804.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-805.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-806.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-807.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-808.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-809.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-810.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-811.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-812.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-813.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-814.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-815.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-816.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-817.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-818.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-819.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-820.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-821.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-822.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-823.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-824.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-825.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-826.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-827.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-828.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-829.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-830.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-831.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-832.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-833.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-834.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-835.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-836.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-837.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-838.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-839.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-840.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-841.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-842.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-843.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-844.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-845.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-846.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-847.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-848.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-849.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-850.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-851.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-852.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-853.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-854.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-855.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-856.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-857.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-858.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-859.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-860.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-861.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-862.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-863.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-864.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-865.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-866.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-867.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-868.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-869.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-870.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-871.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-872.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-873.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-874.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-875.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-876.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-877.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-878.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-879.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-880.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-881.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-882.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-883.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-884.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-885.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-886.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-887.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-888.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-889.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-890.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-891.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-892.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-893.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-894.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-895.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-896.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-897.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-898.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-899.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-900.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-901.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-902.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-903.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-904.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-905.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-906.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-907.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-908.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-909.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-910.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-911.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-912.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-913.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-914.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-915.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-916.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-917.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-918.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-919.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-920.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-921.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-922.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-923.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-924.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-925.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-926.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-927.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-928.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-929.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-930.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-931.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-932.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-933.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-934.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-935.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-936.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-937.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-938.402268434761, 86.8424488859553, -119.939326007632, 0.4)
  }
}
proc shape3d_6() {
  axon[6] {
    pt3dadd(-939.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-940.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-941.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-942.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-943.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-944.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-945.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-946.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-947.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-948.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-949.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-950.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-951.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-952.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-953.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-954.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-955.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-956.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-957.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-958.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-959.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-960.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-961.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-962.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-963.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-964.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-965.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-966.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-967.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-968.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-969.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-970.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-971.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-972.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-973.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-974.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-975.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-976.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-977.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-978.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-979.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-980.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-981.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-982.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-983.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-984.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-985.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-986.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-987.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-988.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-989.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-990.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-991.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-992.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-993.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-994.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-995.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-996.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-997.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-998.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-999.402268434761, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1000.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1001.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1002.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1003.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1004.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1005.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1006.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1007.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1008.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1009.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1010.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1011.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1012.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1013.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1014.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1015.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1016.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1017.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1018.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1019.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1020.40226843476, 86.8424488859553, -119.939326007632, 0.4)
    pt3dadd(-1021.40226843476, 86.8424488859553, -119.939326007632, 0.4)
  }
  axon[7] {pt3dclear()
    pt3dadd(-45.6460937877818, 82.5090407840848, -126.183687863458, 0.5503503)
    pt3dadd(-45.9885552699559, 83.5320640653795, -126.137535173451, 0.5503503)
    pt3dadd(-46.1794321563012, 84.4625133327404, -125.830349844593, 0.4360977)
    pt3dadd(-46.416351651853, 85.3522156456447, -125.440402509266, 0.3749027)
  }
  axon[8] {pt3dclear()
    pt3dadd(-77.3671682668397, 65.4829970175941, -133.689649000083, 0.5301941)
    pt3dadd(-77.9637507295567, 66.1877258483042, -133.257023878387, 0.5301941)
  }
  axon[9] {pt3dclear()
    pt3dadd(-80.7066716372247, 56.7955311977307, -127.688102520955, 0.7886361)
    pt3dadd(-80.4361634725357, 55.8735991441424, -128.066489951493, 0.7886361)
  }
  axon[10] {pt3dclear()
    pt3dadd(-89.0743981948469, 38.5936399081458, -112.438492743958, 1.887396)
    pt3dadd(-89.2002208389551, 39.3731782279939, -112.676706278234, 1.887396)
    pt3dadd(-89.3958263377295, 40.3374345585998, -112.510283788831, 1.433015)
    pt3dadd(-89.5060829778173, 41.2805980279538, -112.200230174152, 0.9108189)
    pt3dadd(-89.7858492570957, 42.1842019997468, -111.883229232259, 0.6312977)
    pt3dadd(-90.1638941363696, 43.0596041653062, -111.582607604246, 0.5325283)
    pt3dadd(-90.5268745641752, 43.9149454943324, -111.213173629744, 0.3749027)
  }
  axon[11] {pt3dclear()
    pt3dadd(-106.587256201341, 16.5133834436777, -79.9213115994178, 0.9007871)
    pt3dadd(-107.14389023303, 17.6577604289246, -79.3628260560173, 0.9007871)
    pt3dadd(-107.495874455195, 18.4746848590119, -78.9061425649379, 0.7412041)
    pt3dadd(-107.858866927251, 19.3118621921549, -78.4975968765631, 0.4983082)
    pt3dadd(-108.187649485154, 20.1710921579421, -78.105721426156, 0.3844376)
    pt3dadd(-108.527901943728, 21.0140663830467, -77.689348868349, 0.3749027)
  }
  axon[12] {pt3dclear()
    pt3dadd(-94.6439292800964, -18.5578512374669, -34.8362692268909, 0.4024205)
    pt3dadd(-95.513562771873, -18.8509330124824, -35.1631364027011, 0.4024205)
    pt3dadd(-96.4326732093581, -19.2417401298316, -35.1462954282623, 0.374905)
    pt3dadd(-97.3992636057396, -19.4822501315549, -35.1649115277643, 0.3757675)
    pt3dadd(-98.2789411481161, -19.927189896157, -35.293908038306, 0.4108838)
    pt3dadd(-99.2665740187319, -20.04740135428, -35.2605312471697, 0.4054359)
    pt3dadd(-100.231044804009, -20.2949395519008, -35.3104483423749, 0.5365484)
    pt3dadd(-101.213031456836, -20.1890517551372, -35.2158794501191, 0.6103352)
    pt3dadd(-102.195081930857, -20.292622739176, -35.3112340290776, 0.4354593)
    pt3dadd(-103.18239280294, -20.4033126447865, -35.3356969421845, 0.4130102)
    pt3dadd(-104.052495624705, -20.8461671523987, -35.3669820700457, 0.7722393)
    pt3dadd(-105.019687880285, -20.7818908637732, -35.1448045041689, 0.6331762)
    pt3dadd(-105.940237130583, -20.9494417728694, -34.8042728593863, 0.4263797)
    pt3dadd(-106.741480958942, -21.348783277592, -34.3626057253291, 0.4516681)
    pt3dadd(-107.588975503974, -21.6377620322199, -33.9303828415913, 0.3784972)
    pt3dadd(-108.343469337384, -22.1252099963473, -33.4981591208388, 0.374905)
    pt3dadd(-109.047878620151, -22.7274243574642, -33.1318814551743, 0.374905)
    pt3dadd(-109.934276799592, -22.9404535667148, -32.7808032238298, 0.3852645)
    pt3dadd(-110.736842668324, -23.2590946545286, -32.3096769981823, 0.4453841)
    pt3dadd(-111.396110652774, -23.7827374846919, -31.7701768003559, 0.3852645)
    pt3dadd(-112.025747759909, -24.4077390455354, -31.3133289746158, 0.3856691)
    pt3dadd(-112.703350925664, -24.7783886823511, -30.6941330332188, 0.646167)
    pt3dadd(-113.136100673724, -25.5836404039782, -30.3164259743213, 0.482495)
    pt3dadd(-113.930405394164, -26.0093861158715, -29.9549039470186, 0.37616)
    pt3dadd(-114.824919701602, -26.0513090410193, -29.5247901584957, 0.4683363)
    pt3dadd(-115.550329745406, -26.5990670248853, -29.1915037208147, 0.458892)
    pt3dadd(-116.375672989504, -27.0468316225098, -28.8710449841082, 0.4072902)
    pt3dadd(-117.170835417549, -27.5658615961638, -28.5760511170799, 0.5642229)
    pt3dadd(-118.080873607463, -27.8941154950896, -28.3570649838984, 0.4329812)
    pt3dadd(-118.744197077754, -28.5825500746526, -28.2526406345739, 0.3957473)
    pt3dadd(-119.665165057101, -28.7877096706822, -28.1737918526922, 0.4169442)
    pt3dadd(-120.532328388443, -29.196953437085, -28.1496329581897, 0.4552609)
    pt3dadd(-121.338684275513, -29.0594412516615, -27.6674080750751, 0.7498099)
  }
  axon[13] {pt3dclear()
    pt3dadd(-121.338684275513, -29.0594412516615, -27.6674080750751, 0.5456921)
    pt3dadd(-122.255829813837, -29.2189859936854, -27.5193232559011, 0.5456921)
    pt3dadd(-123.026682396129, -29.828613817678, -27.3526102358283, 0.545156)
    pt3dadd(-123.924039420363, -30.1757719725012, -27.2238932477375, 0.6031598)
    pt3dadd(-124.919854578665, -30.1707051070153, -27.1450129855958, 0.5025272)
    pt3dadd(-125.866674673215, -30.4344315603482, -27.0527137629693, 0.4768361)
    pt3dadd(-126.745647299657, -30.881935336845, -26.9989409109911, 0.5705611)
    pt3dadd(-127.6735185164, -31.1197662796489, -26.8026701362043, 0.5016061)
    pt3dadd(-128.572385304476, -31.3943613676365, -26.4793748269068, 0.375923)
    pt3dadd(-129.504631152763, -31.5015885169646, -26.1531697867355, 0.3750377)
    pt3dadd(-130.36222490167, -31.9535346899758, -25.928551356915, 0.4128553)
    pt3dadd(-130.998188244133, -32.5075166599656, -25.4020684687475, 0.39733)
    pt3dadd(-131.731535960016, -32.9345392642518, -24.8848323912185, 0.3793594)
    pt3dadd(-132.664393431841, -32.9890876407426, -24.5460401651613, 0.474842)
    pt3dadd(-133.488732246553, -33.2533385393641, -24.0866403462885, 0.4646151)
    pt3dadd(-134.274116323581, -33.5050632560507, -23.5423526727981, 0.4200207)
    pt3dadd(-135.078084500416, -33.6121237401053, -22.9660172234718, 0.4602931)
    pt3dadd(-135.771920589925, -34.1806139964678, -22.539975144939, 0.3794923)
    pt3dadd(-136.617863828925, -34.4069857925741, -22.0885477658938, 0.4489668)
    pt3dadd(-137.430435547128, -34.3086540138349, -21.521095462299, 0.471392)
    pt3dadd(-138.159575959184, -34.4413903163875, -20.8506448758786, 0.4497061)
    pt3dadd(-138.915665446646, -34.6042743139091, -20.2172445913843, 0.3976184)
    pt3dadd(-139.656484554219, -34.9977500680622, -19.6806527457961, 0.4825139)
    pt3dadd(-140.467700131611, -35.0641469198075, -19.1242105207318, 0.6304239)
    pt3dadd(-141.044198978284, -34.7419503690484, -18.5921705711472, 0.505748)
  }
  axon[14] {pt3dclear()
    pt3dadd(-141.044198978284, -34.7419503690484, -18.5921705711472, 0.4674025)
    pt3dadd(-141.714209485726, -35.3906545383598, -18.1148742893088, 0.4674025)
    pt3dadd(-142.596718542713, -35.3504485365278, -17.6529934341251, 0.4322854)
    pt3dadd(-143.441624428809, -35.6136652016095, -17.2710117010445, 0.4492011)
    pt3dadd(-144.271667538263, -35.9332300904722, -16.8213098871431, 0.4522477)
    pt3dadd(-145.215739362897, -35.9717238341004, -16.5414244018015, 0.5599071)
    pt3dadd(-146.172960133435, -36.2175588555353, -16.4316475847774, 0.4166485)
    pt3dadd(-147.057484250817, -36.3905727083227, -16.002942307179, 0.3792175)
    pt3dadd(-148.012356801058, -36.4627465667854, -15.7343320696794, 0.4075893)
    pt3dadd(-148.987109237042, -36.6422077613685, -15.6202267112818, 0.453633)
    pt3dadd(-149.978800064655, -36.6688943608222, -15.6253244623201, 0.4911031)
    pt3dadd(-150.925097009926, -36.5494014421582, -15.8972211616191, 0.5223027)
    pt3dadd(-151.807926526024, -36.2318369642341, -16.2376555428692, 0.4595813)
    pt3dadd(-152.626615911875, -35.9853121055768, -16.7523825173211, 0.4746873)
    pt3dadd(-153.394411344694, -35.8969055750018, -17.3853880703925, 0.542549)
    pt3dadd(-154.183874775915, -35.7033117797557, -17.965676087476, 0.4514365)
    pt3dadd(-155.028308251614, -35.4951727799924, -18.4496982197321, 0.5259499)
    pt3dadd(-155.916277245076, -35.1255399348648, -18.7186604833166, 0.5484812)
    pt3dadd(-156.819300303269, -34.8495973662804, -19.0283165461654, 0.6163076)
    pt3dadd(-157.71503663963, -34.6864475342448, -19.4375121458328, 0.5198951)
    pt3dadd(-158.572665263923, -34.4171007633623, -19.8747097155565, 0.4603435)
    pt3dadd(-159.389848142772, -34.1187798988127, -20.367228289043, 0.4792504)
    pt3dadd(-160.195336192323, -33.9861532551244, -20.9368278691015, 0.6489288)
    pt3dadd(-160.882044719367, -33.562694213413, -21.4651825090902, 0.9991616)
    pt3dadd(-161.55612462448, -32.8920169074214, -21.7603775717621, 0.7045106)
    pt3dadd(-162.334627022771, -32.4171324363342, -22.1454163052523, 0.5346845)
    pt3dadd(-162.965115594158, -31.9457743171017, -22.7432137093493, 0.6407376)
    pt3dadd(-163.615848392477, -31.5109378978359, -23.3492389148029, 0.4880507)
    pt3dadd(-164.419610458326, -31.1012388370033, -23.7798681927538, 0.4591927)
    pt3dadd(-165.164629295723, -30.74721392335, -24.3414664206605, 0.3853951)
    pt3dadd(-165.818409713241, -30.2511127918131, -24.9050813042338, 0.4035081)
    pt3dadd(-166.396049630192, -29.7446354866244, -25.5114837778291, 0.4362743)
    pt3dadd(-167.083468607416, -29.2267920047123, -25.9728361908683, 0.4928214)
    pt3dadd(-167.636784046449, -28.5823221684027, -26.4906118728881, 0.3889779)
    pt3dadd(-168.043919541454, -27.931298658982, -27.1249379926196, 0.4034986)
    pt3dadd(-168.420045284818, -27.6160910610636, -27.9774867103796, 0.4069486)
    pt3dadd(-169.094143734715, -27.1100929675672, -28.4888473692031, 0.4163036)
    pt3dadd(-169.811454552838, -26.6900781133627, -29.0347132964474, 0.4138488)
    pt3dadd(-170.567782263663, -26.3450448009737, -29.5840533627568, 0.4489656)
    pt3dadd(-171.345989840247, -25.9711582035051, -30.0798634301301, 0.4488329)
    pt3dadd(-171.955678285347, -25.5401473435386, -30.7424692232052, 0.3853857)
    pt3dadd(-172.593684544866, -25.3086435020131, -31.4717456203228, 0.3940108)
    pt3dadd(-172.969162661454, -24.8886055877953, -32.2728411700219, 0.4033754)
    pt3dadd(-173.028584229819, -24.7617604052246, -33.2576610150632, 0.3840179)
    pt3dadd(-173.246042312566, -24.5569551061714, -34.2062705539252, 0.5104935)
    pt3dadd(-173.277627766788, -24.4231283623204, -35.1920525627414, 0.4091731)
    pt3dadd(-173.278784976459, -24.0774969382865, -36.1278289135237, 0.4352791)
    pt3dadd(-173.267582511078, -24.0101712974131, -37.1105853329486, 0.4076785)
    pt3dadd(-173.279710630442, -24.0869571320787, -38.1064174130741, 0.4074415)
    pt3dadd(-173.21886085116, -23.8694125339721, -39.0701378099189, 0.3757653)
    pt3dadd(-173.1290993066, -23.6445043648547, -40.0320577615274, 0.3792153)
    pt3dadd(-173.135076054581, -23.5973368572043, -41.0299682661085, 0.4368998)
    pt3dadd(-173.060233031917, -23.2248589900042, -41.9371818119979, 0.4696756)
    pt3dadd(-172.790266812827, -23.1204107142997, -42.851106724301, 0.5057687)
    pt3dadd(-172.568367495533, -23.0737912650831, -43.7960357892919, 0.4173312)
    pt3dadd(-172.664201870402, -22.6641509720087, -44.6839093602297, 0.4396979)
    pt3dadd(-172.573630166943, -22.8976189426002, -45.6472658349583, 0.4491856)
    pt3dadd(-172.641321504866, -22.8923582951908, -46.6388116656932, 0.3750583)
    pt3dadd(-172.755209658851, -23.0009159177039, -47.6216777339046, 0.3749027)
    pt3dadd(-173.067324443129, -22.6668048440782, -48.4937528535105, 0.3749122)
    pt3dadd(-173.047596066219, -22.5810020283917, -49.4582830714543, 0.4141205)
    pt3dadd(-173.157709757288, -22.2954954973628, -50.3784183536229, 0.6924987)
    pt3dadd(-173.283826992725, -22.2352869749302, -51.3650650786374, 0.562923)
    pt3dadd(-173.196549943508, -22.0755492672089, -52.3463048368819, 0.4173217)
    pt3dadd(-173.12214857933, -22.0519444826956, -53.3428617117246, 0.3783528)
    pt3dadd(-173.058325266826, -21.9165259954775, -54.3292476818294, 0.3749027)
    pt3dadd(-173.108349376329, -21.8873391434265, -55.3263336707407, 0.3769945)
    pt3dadd(-173.039308289513, -21.8813596841887, -56.3228388786913, 0.47241)
    pt3dadd(-172.880034041387, -21.8114985369199, -57.3066701290931, 0.3864727)
    pt3dadd(-172.855529889553, -21.7069374887038, -58.2973401076394, 0.3749027)
    pt3dadd(-172.762908275167, -21.8532431650164, -59.2760980090203, 0.3749027)
    pt3dadd(-172.670299746728, -21.8483766719481, -60.24626091629, 0.3761179)
    pt3dadd(-172.903889615116, -21.4829438745258, -61.126246322622, 0.5744052)
    pt3dadd(-172.851757385657, -21.5715530738965, -62.1154113455498, 0.7330785)
    pt3dadd(-172.677196240431, -21.6504228262238, -63.0955788724478, 0.5422095)
    pt3dadd(-172.819891749641, -21.2250183426107, -63.9484584035816, 0.3761085)
    pt3dadd(-173.014573932054, -20.7782529775027, -64.813433487978, 0.3749027)
    pt3dadd(-173.290481349047, -20.4807885642542, -65.7271821488718, 0.3749027)
    pt3dadd(-173.440192646076, -20.127187829366, -66.6498412638711, 0.3749027)
    pt3dadd(-173.440001319618, -19.844076231246, -67.597982621679, 0.3759075)
    pt3dadd(-173.112310441575, -19.5004236055072, -68.4732133276912, 0.4401681)
    pt3dadd(-172.797377053822, -18.9891976580723, -69.2647012359893, 0.5232987)
    pt3dadd(-172.6802927974, -18.8055647931353, -70.2054213779793, 0.4245657)
    pt3dadd(-172.467357929329, -18.6411828963643, -71.1639674449117, 0.3768932)
    pt3dadd(-172.12243569131, -18.424582053595, -72.0763112268181, 0.4257914)
    pt3dadd(-171.787147951874, -18.2696617309039, -73.0046983829269, 0.4163131)
    pt3dadd(-171.555662998978, -18.0687335597437, -73.9513404323768, 0.3897172)
  }
}
proc shape3d_7() {
  axon[14] {
    pt3dadd(-171.333802267788, -17.6111916472619, -74.8091151731226, 0.5152469)
    pt3dadd(-170.899425777662, -17.2264601252144, -75.6191321783264, 0.468804)
    pt3dadd(-170.452773668026, -16.9555171548361, -76.4699129273048, 0.3888549)
    pt3dadd(-170.265748185168, -16.5137865678827, -77.341729167351, 0.4045487)
    pt3dadd(-170.372130034295, -15.8654225732554, -78.0853154497318, 0.5539016)
  }
  axon[15] {pt3dclear()
    pt3dadd(-170.372130034295, -15.8654225732554, -78.0853154497318, 0.4161001)
    pt3dadd(-171.058780051477, -15.5393184995919, -78.3593443421901, 0.4161001)
    pt3dadd(-172.051425108179, -15.4767802955192, -78.4566173490772, 0.3687975)
    pt3dadd(-173.028914307022, -15.3243346008602, -78.5996585097646, 0.3681832)
    pt3dadd(-174.017236725811, -15.3856279073473, -78.6946872410149, 0.3474274)
    pt3dadd(-174.989732463033, -15.6163528970487, -78.6822960034106, 0.341478)
    pt3dadd(-175.966247903447, -15.8300662490949, -78.6696423359649, 0.3408206)
    pt3dadd(-176.930866816882, -16.0856975680792, -78.7326754120522, 0.3408206)
    pt3dadd(-177.909294835695, -16.2876411204445, -78.7279390225388, 0.3408206)
    pt3dadd(-178.873777279183, -16.5423555676595, -78.7540087326186, 0.3408206)
    pt3dadd(-179.820397942821, -16.8053900867743, -78.9360534535749, 0.3408206)
    pt3dadd(-180.807133544208, -16.9184134075402, -78.9688147412151, 0.3408206)
    pt3dadd(-181.794532965075, -16.9427059186104, -78.8139878689169, 0.340829)
    pt3dadd(-182.78318312207, -16.9984024738549, -78.674748437041, 0.3433003)
    pt3dadd(-183.767914859542, -17.0855221460346, -78.5371176632191, 0.359218)
    pt3dadd(-184.482275233034, -17.7260821398675, -78.6882528363403, 0.3525364)
  }
  axon[16] {pt3dclear()
    pt3dadd(-184.482275233034, -17.7260821398675, -78.6882528363403, 0.3525364)
    pt3dadd(-185.021529094831, -17.3308580884703, -78.6336179244905, 0.3525364)
    pt3dadd(-185.423589537317, -16.4754410427617, -78.3089147634848, 0.3525364)
    pt3dadd(-185.796978240968, -15.6024133671978, -77.9969263433917, 0.3525364)
    pt3dadd(-186.176904276082, -14.7013483149119, -77.7894165455369, 0.3525364)
    pt3dadd(-186.5356628364, -13.7756845748991, -77.6941259561871, 0.3525364)
    pt3dadd(-186.857274796518, -12.8337256538603, -77.7741064340088, 0.3567864)
    pt3dadd(-187.269061375046, -11.9259649836381, -77.7478934361419, 0.4243845)
    pt3dadd(-187.770144954291, -11.0649704427505, -77.6620946515491, 0.4629862)
    pt3dadd(-188.294813955362, -10.2146713461919, -77.637363180204, 0.4428152)
    pt3dadd(-188.825939682791, -9.36855468771175, -77.6225758606315, 0.4011203)
    pt3dadd(-189.325378903755, -8.50634787136257, -77.5544382601027, 0.3617904)
    pt3dadd(-189.774429136864, -7.64144460541698, -77.7743721490218, 0.3779851)
    pt3dadd(-190.205898749176, -6.75084361174779, -77.681252418208, 0.4022771)
    pt3dadd(-190.638304265203, -5.99671154070058, -77.4562985959038, 0.3860824)
  }
  axon[17] {pt3dclear()
    pt3dadd(-190.638304265203, -5.99671154070058, -77.4562985959038, 0.3536931)
    pt3dadd(-190.761348364205, -5.29656382196107, -78.2937435699211, 0.3536931)
    pt3dadd(-190.458796415105, -4.79183152158225, -79.0955127129027, 0.3525364)
    pt3dadd(-190.111409337864, -4.24029181371993, -79.849269207119, 0.3525364)
    pt3dadd(-190.174611694404, -3.34996694858548, -80.1233910581017, 0.3525364)
    pt3dadd(-190.321586077712, -2.42743868961528, -79.7725418572758, 0.3525364)
    pt3dadd(-190.531810771969, -1.47696391961598, -79.6867905012385, 0.3525364)
    pt3dadd(-190.822879227552, -0.673267483227242, -80.190308498307, 0.3525364)
    pt3dadd(-190.995300351178, 0.292448607625037, -80.1503374693929, 0.3525364)
    pt3dadd(-191.121514278039, 1.267975066754, -79.9758312784179, 0.3525364)
    pt3dadd(-191.258288916536, 2.22593700229167, -80.1816336802885, 0.3525364)
    pt3dadd(-191.367924044638, 3.18271200448196, -80.3928637832203, 0.3525364)
    pt3dadd(-191.535268022413, 4.14682290098252, -80.5059600011731, 0.3525364)
    pt3dadd(-191.827962921116, 5.01828980036165, -80.8889022132629, 0.3525364)
    pt3dadd(-192.109456014019, 5.96197403118595, -81.0554420828316, 0.3525364)
    pt3dadd(-192.3957342003, 6.89088930223266, -81.2472689739113, 0.3525364)
  }
  axon[18] {pt3dclear()
    pt3dadd(-190.638304265203, -5.99671154070058, -77.4562985959038, 0.426569)
    pt3dadd(-191.070249546154, -6.85020817460388, -76.907408630279, 0.426569)
    pt3dadd(-191.527723569339, -7.59188238131003, -76.4237605440615, 0.4287752)
    pt3dadd(-192.06553512401, -8.1794583264248, -75.8237397448202, 0.5847535)
    pt3dadd(-192.738908521014, -8.70154812289164, -75.3019730174384, 1.381076)
    pt3dadd(-193.2213894052, -9.21953605959327, -74.6057081085757, 2.156081)
  }
  axon[19] {pt3dclear()
    pt3dadd(-184.482275233034, -17.7260821398675, -78.6882528363403, 0.343267)
    pt3dadd(-185.186887197393, -18.4072838743046, -78.8269965128685, 0.343267)
    pt3dadd(-185.968888949627, -19.0244638106098, -78.9132852094114, 0.3409288)
    pt3dadd(-186.774650273746, -19.6114847437251, -78.9807566335854, 0.3408206)
    pt3dadd(-187.628871301402, -20.1232306316383, -78.9082832575361, 0.3408206)
    pt3dadd(-188.509994683951, -20.5750342701488, -78.7693369347733, 0.3408206)
    pt3dadd(-189.398366495009, -21.0128633712501, -78.6311785108755, 0.3408206)
    pt3dadd(-190.290426244853, -21.4536244053775, -78.5396463536528, 0.3408384)
    pt3dadd(-191.139313074205, -21.9325397810875, -78.7069764366097, 0.3426703)
    pt3dadd(-191.62556293016, -22.2844642045042, -79.464061533282, 0.4454671)
    pt3dadd(-191.706945387937, -22.8992679760028, -80.207520507454, 0.4578988)
    pt3dadd(-192.081403858501, -23.6428206224461, -80.7533666511602, 0.3673711)
    pt3dadd(-192.686395521209, -24.179151117857, -81.3353075754779, 0.341478)
    pt3dadd(-193.446123421073, -24.5636354431743, -81.8550262523883, 0.3408206)
    pt3dadd(-194.198072419468, -25.1393458631594, -82.1412604280416, 0.3408206)
    pt3dadd(-194.770525474851, -25.9520652857154, -82.1986456790032, 0.3408206)
    pt3dadd(-195.367617868173, -26.7398570477994, -82.0716475982499, 0.3408206)
    pt3dadd(-196.162754642334, -27.3108593237598, -81.8864214333918, 0.3409288)
    pt3dadd(-197.041471516212, -27.7514775236919, -81.7065690577585, 0.3474274)
    pt3dadd(-197.949428428013, -28.1363808255916, -81.7630590745389, 0.368296)
    pt3dadd(-198.725024107156, -28.6448810955799, -82.1353434506892, 0.3747945)
    pt3dadd(-199.554186432607, -29.1440481802592, -82.3828931001795, 0.3749027)
    pt3dadd(-200.312820549451, -29.7523037702139, -82.5717595753174, 0.3749027)
    pt3dadd(-200.61868026863, -30.6193009898299, -82.9375144499461, 0.3749027)
    pt3dadd(-200.811964322006, -31.5132523386698, -83.341427267397, 0.3749027)
    pt3dadd(-201.037021089332, -32.3960270640398, -83.753626184223, 0.3749027)
    pt3dadd(-201.26282817485, -33.2517413399333, -84.217973490339, 0.3749027)
    pt3dadd(-201.587698406376, -34.0118228980053, -84.7777970406133, 0.3749027)
  }
  axon[20] {pt3dclear()
    pt3dadd(-170.372130034295, -15.8654225732554, -78.0853154497318, 0.3847447)
    pt3dadd(-170.044019089306, -15.452870931972, -78.8291589606219, 0.3847447)
    pt3dadd(-169.366061816778, -15.2246772848896, -79.5258832863775, 0.3749027)
    pt3dadd(-168.885725327432, -14.8912082713212, -80.3322831663766, 0.3750354)
    pt3dadd(-168.549657618342, -14.583080722099, -81.2206102671675, 0.3938782)
    pt3dadd(-168.238694420593, -13.9657154992387, -81.9362202632103, 0.3938782)
    pt3dadd(-168.0351937777, -13.4469480492327, -82.7555385723599, 0.3750354)
    pt3dadd(-168.12982595794, -13.0704261896428, -83.675957622248, 0.3749027)
    pt3dadd(-168.276299470608, -12.7706416467506, -84.612528402585, 0.3749027)
    pt3dadd(-168.516115459396, -12.7347064676111, -85.5787705053787, 0.3749027)
    pt3dadd(-168.786018306525, -12.3599869188406, -86.4552814327084, 0.3749122)
    pt3dadd(-169.191647676901, -11.6259428952109, -86.9735778571905, 0.3938782)
    pt3dadd(-169.864255125869, -11.0956187437446, -87.4818611303582, 0.3938782)
    pt3dadd(-170.283732255802, -10.3448838031768, -87.9625055948788, 0.3750354)
    pt3dadd(-170.366813819701, -9.50457105642062, -88.4957012211082, 0.3749027)
    pt3dadd(-170.602250764026, -8.63839939159444, -88.9317723042739, 0.3749027)
    pt3dadd(-170.961865200006, -7.86297046309261, -89.4421709646757, 0.3749027)
    pt3dadd(-171.367682903952, -7.1258168637576, -89.9515409589775, 0.3749027)
    pt3dadd(-171.437623133033, -6.8095824319151, -90.8759062335773, 0.3749027)
    pt3dadd(-171.536417240889, -6.6647140036678, -91.848988798822, 0.3749027)
    pt3dadd(-171.96819561152, -6.09878232413921, -92.531118899445, 0.3749027)
    pt3dadd(-172.554225193806, -5.41897555415737, -92.9676318120164, 0.3749027)
    pt3dadd(-173.230249919526, -4.90802123743827, -93.4924853774428, 0.3749027)
    pt3dadd(-173.97170483699, -4.52601635754168, -94.0365615657665, 0.3749027)
    pt3dadd(-174.801363872297, -4.13889897011297, -94.4217258705346, 0.3751397)
    pt3dadd(-175.722106392481, -4.15989227155439, -94.8058349142782, 0.3863715)
    pt3dadd(-176.654977390584, -4.02474639723573, -95.1154253823268, 0.391793)
    pt3dadd(-177.484974981751, -3.81695743820309, -95.6149420335806, 0.3757558)
    pt3dadd(-178.39318602437, -3.87434954316593, -96.0111839091619, 0.3749217)
    pt3dadd(-179.375962663124, -3.95917977744458, -96.171190974687, 0.3796988)
    pt3dadd(-180.34040306714, -3.81262755056435, -96.349432324388, 0.3999257)
    pt3dadd(-181.239733702914, -3.37728300317446, -96.3555174283, 0.3837651)
    pt3dadd(-182.096806070159, -2.86864931844475, -96.4043406985305, 0.3750354)
    pt3dadd(-182.970681180728, -2.39026464398293, -96.4759633875778, 0.3749027)
    pt3dadd(-183.907675638385, -2.05224732904605, -96.4574517457299, 0.3749027)
    pt3dadd(-184.898088805387, -2.05375214443197, -96.5187377443481, 0.3749027)
    pt3dadd(-185.858530437056, -2.24201825192869, -96.7146875915411, 0.3749027)
    pt3dadd(-186.765288712923, -2.26090517267454, -97.1211070719151, 0.3748868)
    pt3dadd(-187.58068085961, -2.19908695935061, -97.694936393308, 0.3736478)
    pt3dadd(-188.357818542037, -2.20595802656716, -98.323818214261, 0.3622899)
    pt3dadd(-189.182734543947, -2.30058680510418, -98.878194330809, 0.3224498)
    pt3dadd(-190.066733681606, -2.45979490471502, -99.3171282992803, 0.3110918)
    pt3dadd(-190.932921247469, -2.46108932936045, -99.8014619747056, 0.3098528)
    pt3dadd(-191.640969936136, -1.99071190655513, -100.291593469897, 0.3098369)
    pt3dadd(-191.9603230214, -1.19843848744917, -100.787427210697, 0.3098369)
    pt3dadd(-191.946312917966, -0.395586893943822, -101.380133672398, 0.3098369)
    pt3dadd(-191.95423789216, 0.489454851762314, -101.84375038863, 0.3098369)
  }
  axon[21] {pt3dclear()
    pt3dadd(-141.044198978284, -34.7419503690484, -18.5921705711472, 0.3749027)
    pt3dadd(-141.401554692206, -33.6663947063674, -18.1897950184057, 0.3749027)
  }
  axon[22] {pt3dclear()
    pt3dadd(-121.338684275513, -29.0594412516615, -27.6674080750751, 0.5070459)
    pt3dadd(-121.591215773678, -28.2381300333157, -27.1947595580113, 0.5070459)
    pt3dadd(-122.044675533277, -27.7426782276926, -26.4708187331693, 0.9075042)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-51.5211237882158, -5.52022748117713, -21.680916594198, 1.703222)
    pt3dadd(-51.7246351789781, -6.37746327917253, -21.9359255752112, 1.703222)
    pt3dadd(-52.0997304432346, -7.18358134520038, -22.3044646850363, 1.578344)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-52.0997304432346, -7.18358134520038, -22.3044646850363, 1.735804)
    pt3dadd(-51.916482652331, -7.86736799846271, -21.9740148167781, 1.735804)
    pt3dadd(-51.504032304053, -8.77549859231012, -22.0140277765912, 1.814533)
    pt3dadd(-51.1372669059375, -9.60406006488821, -21.6733265925387, 1.814533)
    pt3dadd(-50.6702976609039, -10.3497315680343, -21.2031728765615, 1.814533)
    pt3dadd(-50.0167429001221, -10.9624806247674, -20.7667957832815, 1.814533)
    pt3dadd(-49.3239326688816, -11.3905343947565, -20.1864825323389, 1.814533)
    pt3dadd(-48.6242907329924, -11.8160468815749, -19.612573432878, 1.735804)
    pt3dadd(-47.9154695496071, -12.2387061702396, -19.048105087845, 1.578344)
    pt3dadd(-47.1816408338352, -12.609365621195, -18.4799930830706, 1.499614)
    pt3dadd(-46.4408828763117, -12.9465587057309, -17.8990942564585, 1.499614)
    pt3dadd(-45.7822005169896, -13.2142318228752, -17.2182334411854, 1.499614)
    pt3dadd(-45.227427267872, -13.3515828630064, -16.3983613450277, 1.499614)
    pt3dadd(-44.5269363953135, -13.720112400157, -15.939809071287, 1.499614)
    pt3dadd(-43.781884969455, -14.3708180589159, -15.8251810503195, 1.499614)
    pt3dadd(-43.1869454356949, -14.526226584275, -15.3969864043472, 1.499614)
    pt3dadd(-42.5450703456066, -14.5235626213141, -14.6803166504146, 1.499614)
    pt3dadd(-41.858571075497, -15.038090285281, -14.1904497327973, 1.304417)
    pt3dadd(-41.2039233133735, -15.3743447568527, -13.514364292664, 1.239351)
    pt3dadd(-40.4734123786839, -15.7511041771023, -12.9501013906973, 1.239351)
    pt3dadd(-39.7135674993207, -16.1554901192148, -12.4417343280466, 1.239351)
    pt3dadd(-38.9985994168728, -16.5533085774319, -11.8673139341035, 1.239351)
    pt3dadd(-38.3035108959838, -16.8855563077009, -11.238411835181, 1.239351)
    pt3dadd(-37.702070580765, -16.9050041878182, -10.455070687831, 1.239351)
    pt3dadd(-37.2320025227945, -16.7609657055954, -9.60726703174753, 1.239351)
    pt3dadd(-36.7004967589347, -17.0746752728575, -8.8438326525033, 1.239351)
    pt3dadd(-36.1320663796228, -17.5561383055881, -8.17968426554934, 1.239351)
    pt3dadd(-35.3964666652043, -17.9956956671716, -7.69798936695414, 1.239351)
    pt3dadd(-34.4958666415053, -18.3371198108189, -7.47009079325128, 1.304417)
    pt3dadd(-33.5296524143753, -18.3577875154919, -7.42965658410596, 1.434548)
    pt3dadd(-32.5684805787127, -18.118574410212, -7.54720529790579, 1.499614)
    pt3dadd(-31.6132799208264, -18.1232891558314, -7.76182620627704, 1.499614)
    pt3dadd(-30.68557187203, -18.4341865337718, -7.93864012189255, 1.434548)
    pt3dadd(-29.7429325255428, -18.7330096768666, -7.88490394209305, 1.304417)
    pt3dadd(-28.7994548610609, -18.9172275045426, -7.62705463060451, 1.239351)
    pt3dadd(-27.8704399506323, -19.0970235479025, -7.30453000785134, 1.239351)
    pt3dadd(-26.9541862445436, -19.3195949621767, -6.97192152279657, 1.239351)
    pt3dadd(-26.0691225694814, -19.5763590897198, -6.58459947844511, 1.185577)
    pt3dadd(-25.3377422820571, -19.7764702201544, -5.93664578266594, 1.131804)
    pt3dadd(-24.6737478504507, -20.0250002255955, -5.23189686853698, 1.185577)
    pt3dadd(-23.9323969838769, -20.41612676892, -4.68969201893217, 1.239351)
    pt3dadd(-23.1625170143805, -20.8076685278193, -4.19095417407615, 1.239351)
    pt3dadd(-22.3737674386361, -21.2976904054278, -3.82190266195016, 1.239351)
    pt3dadd(-21.5298870185366, -21.6387582024021, -3.4554821266039, 1.239351)
    pt3dadd(-20.6496396800546, -21.6962430813198, -2.98467748146557, 1.239351)
    pt3dadd(-19.7715229816817, -21.714806485269, -2.59905474382514, 1.239351)
  }
  GCL[3] {pt3dclear()
    pt3dadd(-19.7715229816817, -21.714806485269, -2.59905474382514, 1.239351)
    pt3dadd(-18.9289744426183, -22.2921257013556, -2.24615410813272, 1.239351)
    pt3dadd(-18.1004394132227, -22.6646015890893, -1.84260533443038, 1.239351)
    pt3dadd(-17.251693246842, -22.9437776126019, -1.39577193739545, 1.405267)
    pt3dadd(-16.3965491428513, -23.2756813582665, -0.998969656457352, 1.903017)
    pt3dadd(-15.5580118191338, -23.6695696819719, -0.622529561380686, 1.903017)
  }
  GCL[4] {pt3dclear()
    pt3dadd(-15.5580118191338, -23.6695696819719, -0.622529561380686, 1.335487)
    pt3dadd(-14.9662519773767, -22.9346125124791, -0.37342746167303, 1.335487)
    pt3dadd(-14.3679284417568, -22.1462611287623, -0.231502988187955, 1.107444)
    pt3dadd(-13.6387551231207, -21.8148511506864, -0.135386745902424, 1.003831)
    pt3dadd(-12.8020242552194, -22.339468947778, -0.277800822478418, 0.9277806)
    pt3dadd(-12.0264278256277, -22.9098160693641, -0.544486276900815, 1.038311)
    pt3dadd(-11.2675642965109, -23.4541863254385, -0.900822138397302, 1.109853)
    pt3dadd(-10.452420048372, -23.8779961001344, -1.29076987629173, 1.052542)
    pt3dadd(-9.52373764785975, -23.93754487775, -1.61384210872027, 0.8472176)
    pt3dadd(-8.62003138956175, -23.5499906347744, -1.77772269544137, 0.8306538)
    pt3dadd(-7.66859192779427, -23.5810360667782, -2.00584325461766, 1.050218)
    pt3dadd(-6.78486654343069, -23.9641863797753, -2.27176981642118, 1.192084)
    pt3dadd(-5.91276108727336, -24.3680252470863, -2.54747967076295, 1.330564)
    pt3dadd(-4.99568367945491, -24.6786611149839, -2.7901596514559, 1.170231)
    pt3dadd(-4.03936390886404, -24.9218875176814, -2.94879357635798, 0.9516331)
    pt3dadd(-3.12375960877217, -25.27953717265, -3.1253749999281, 0.864567)
    pt3dadd(-2.21955167275583, -25.6481309923367, -3.33481756626876, 0.8467387)
    pt3dadd(-1.2584470122678, -25.6614541001307, -3.52227569803047, 0.8153771)
    pt3dadd(-0.357484649147388, -25.277130544781, -3.70294285911487, 0.7946768)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-0.357484649147388, -25.277130544781, -3.70294285911487, 0.815415)
    pt3dadd(0.552827798561786, -25.3105103635686, -4.07808988267814, 0.815415)
    pt3dadd(1.4192192966064, -25.6029219678149, -4.48148711961225, 0.7966861)
    pt3dadd(2.34891005446509, -25.7947550429716, -4.77475207225421, 0.8245519)
    pt3dadd(3.3367858473019, -25.9074612019252, -4.781255395049, 0.9657765)
    pt3dadd(4.22707805262483, -26.0389241008139, -4.72513620369583, 0.9707643)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(4.22707805262483, -26.0389241008139, -4.72513620369583, 0.7574222)
    pt3dadd(5.15627989145001, -26.4283458263584, -4.22845702434296, 0.7574222)
    pt3dadd(6.01319347799618, -26.8745332042284, -3.97251817585562, 0.6707864)
    pt3dadd(6.90085427970263, -27.2836358708528, -3.76629048656322, 0.6221948)
    pt3dadd(7.83239766582528, -27.5832218803142, -3.56731571441778, 0.6154049)
    pt3dadd(8.78551755034945, -27.7571339923956, -3.32357008513543, 0.6738487)
    pt3dadd(9.73246409597805, -27.8910249996963, -3.03384065687221, 0.6878775)
    pt3dadd(10.6496302736014, -28.170458354019, -2.76375767715654, 0.6790861)
    pt3dadd(11.5516811092844, -28.5541536839522, -2.56950957840888, 0.6594459)
    pt3dadd(12.5081513618101, -28.8159415834711, -2.44454553810433, 0.6574818)
    pt3dadd(13.4075600345616, -29.19147418811, -2.40578702082923, 0.6574818)
    pt3dadd(14.3571641891468, -29.4333937995853, -2.21840100975008, 0.6574818)
    pt3dadd(15.3235221487737, -29.5939938130798, -2.02404707256718, 0.6919997)
    pt3dadd(16.2685451022139, -29.8914706664808, -2.02160252836967, 0.7610353)
    pt3dadd(17.0978203960955, -30.3825789228248, -2.03439851776191, 0.7955531)
    pt3dadd(18.054548546386, -30.4662700294939, -1.76819623340694, 0.7955531)
    pt3dadd(18.9919508347937, -30.730864729344, -1.5763131039485, 0.7955531)
    pt3dadd(19.8814933010771, -31.1605366071472, -1.42415390064525, 0.7955531)
    pt3dadd(20.7700796693956, -31.5011179085315, -1.13688983279671, 0.7955531)
    pt3dadd(21.6059958636025, -31.9610892512149, -0.84551619437404, 0.7955531)
    pt3dadd(22.3692067858972, -32.5690500789028, -0.626869266142775, 0.7955531)
    pt3dadd(23.0694750242022, -33.2389290805762, -0.38039327446752, 0.7955531)
    pt3dadd(23.740747502463, -33.9380025791868, -0.137618830329027, 0.7955531)
    pt3dadd(24.5095552169819, -34.5503263624451, 0.0382256993453982, 0.7955531)
    pt3dadd(25.3564526125315, -35.0698429531788, 0.151356850239853, 0.7955531)
    pt3dadd(26.2099985296891, -35.5779259847012, 0.265591442881863, 0.7955531)
    pt3dadd(27.042036490792, -36.1201189000866, 0.381278792523039, 0.7955531)
    pt3dadd(27.8832378478545, -36.6558033995735, 0.433993017557528, 0.7955531)
    pt3dadd(28.7656624591059, -37.1231787852119, 0.394657554749685, 0.7955531)
    pt3dadd(29.6509361416795, -37.5711331397209, 0.2802576904548, 0.7610353)
    pt3dadd(30.4996603263186, -38.0659186963929, 0.0952668439141888, 0.6919997)
  }
}
proc shape3d_8() {
  adendIML[1] {
    pt3dadd(31.3224910386855, -38.587480985288, -0.130393071862477, 0.6919997)
    pt3dadd(32.1681953997098, -39.1026721150957, -0.266026903948539, 0.6574818)
    pt3dadd(33.0428894914681, -39.5831235503149, -0.276688511015589, 0.6574818)
    pt3dadd(33.926750426593, -40.0506490380902, -0.271714666854891, 0.6574818)
    pt3dadd(34.8108964809514, -40.5170416930434, -0.285373618610404, 0.6574818)
    pt3dadd(35.6800057516748, -41.0040937226141, -0.371567562908885, 0.6574818)
    pt3dadd(36.5338866394218, -41.5082348063975, -0.49939372770217, 0.6574818)
    pt3dadd(37.4152847125368, -41.9605986916875, -0.541779088023759, 0.6574818)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(37.4152847125368, -41.9605986916875, -0.541779088023759, 0.6574818)
    pt3dadd(38.3967474121443, -42.0503167500367, -0.404861157674937, 0.6574818)
    pt3dadd(39.3054843091052, -42.3033962467484, -0.47036018596083, 0.6574818)
    pt3dadd(40.1282323261806, -42.7363380992332, -0.82765164834939, 0.6574818)
    pt3dadd(40.992452115241, -43.0286384104017, -1.22188757191125, 0.6574818)
    pt3dadd(41.9001588869394, -43.280080004225, -1.55234129253939, 0.6574818)
    pt3dadd(42.8068231019245, -43.6187615641394, -1.79404595184766, 0.6574818)
    pt3dadd(43.7046395438446, -43.9978188466782, -2.01694841856247, 0.6574818)
    pt3dadd(44.5788020321737, -44.3339558093423, -2.35635791670487, 0.6574818)
    pt3dadd(45.3590266461322, -44.7624536381508, -2.7988478868879, 0.6574818)
    pt3dadd(46.0515981644967, -45.3650117875749, -3.17940956271421, 0.6574818)
    pt3dadd(46.7700398867358, -46.0037269309223, -3.43854977543077, 0.6574818)
    pt3dadd(47.5834219694715, -46.5616435737956, -3.58167529465321, 0.6574818)
    pt3dadd(48.4874138628873, -46.9756475045031, -3.61479920616365, 0.6574818)
    pt3dadd(49.4600096775098, -47.1664435153936, -3.53147118717905, 0.6574818)
    pt3dadd(50.3245346199434, -47.6569282827165, -3.52680803472356, 0.6574818)
    pt3dadd(50.9522349281685, -48.4283500772628, -3.62575876227472, 0.6574818)
    pt3dadd(51.8007537231166, -48.7225338538111, -3.55043942648371, 0.6574818)
    pt3dadd(52.7238859939525, -48.9432099476533, -3.31862276979459, 0.6574818)
    pt3dadd(53.5540605201872, -49.4869219959427, -3.22372987842895, 0.6574818)
    pt3dadd(54.4056774776107, -49.9997070467442, -3.11610877676138, 0.6574818)
    pt3dadd(55.2412088886123, -50.5372027970325, -3.00240796109095, 0.6574818)
    pt3dadd(56.0756172349631, -51.0846779352907, -2.94046445618656, 0.6574818)
    pt3dadd(56.9295007469659, -51.6042300281491, -2.93856459593868, 0.6574818)
    pt3dadd(57.7450263049871, -52.1776011515036, -3.01707331594693, 0.6574818)
    pt3dadd(58.5167489885774, -52.7921469507616, -3.18071061473794, 0.6574818)
    pt3dadd(59.324805884692, -53.3510005027729, -3.36344647915838, 0.6574818)
    pt3dadd(60.204641984547, -53.799457712962, -3.50108345763606, 0.6574818)
    pt3dadd(61.1200777897165, -54.1967603821718, -3.55032607409994, 0.6574818)
    pt3dadd(62.0152179577078, -54.6407870098915, -3.55225964723594, 0.6574818)
    pt3dadd(62.8231703891269, -55.2218162562982, -3.59036271520099, 0.6574818)
    pt3dadd(63.615843831885, -55.8286449601413, -3.6466987793301, 0.6574818)
    pt3dadd(64.5039441946968, -56.2559599865183, -3.62686370822398, 0.6574818)
    pt3dadd(65.4484938291738, -56.5775285007473, -3.56060791127264, 0.6574818)
    pt3dadd(66.3251722836274, -57.0502907104009, -3.57247127978035, 0.6574818)
    pt3dadd(67.2463236440786, -57.4281418922657, -3.51747721491891, 0.6574818)
    pt3dadd(68.2140660900035, -57.5998163028691, -3.34035075371567, 0.6574818)
    pt3dadd(69.1590235749248, -57.8984464722948, -3.21811059124585, 0.6574818)
    pt3dadd(70.0687872923989, -58.3074689629413, -3.15147345273153, 0.6574818)
    pt3dadd(70.9536359844947, -58.7727933718933, -3.15069395852082, 0.6574818)
    pt3dadd(71.836163198284, -59.2331959800354, -3.23638136209685, 0.6574818)
    pt3dadd(72.729099316003, -59.6256643014667, -3.44200648998418, 0.6574818)
    pt3dadd(73.5891049942407, -59.9828219476802, -3.80619091853982, 0.6574818)
    pt3dadd(74.4411287188082, -60.3684041626044, -4.15692274089822, 0.6574818)
    pt3dadd(75.3121080802691, -60.8058329069703, -4.38064365076478, 0.6574818)
    pt3dadd(76.1836421614133, -61.2694731205665, -4.53412524307025, 0.6574818)
    pt3dadd(77.0497685965476, -61.7592919616545, -4.62816647136334, 0.6574818)
    pt3dadd(77.9161130792383, -62.2478137817686, -4.72949578649122, 0.6574818)
    pt3dadd(78.7993088749741, -62.6587756544338, -4.94505987493272, 0.6574818)
    pt3dadd(79.7075455369331, -62.9618718111433, -5.23014507391207, 0.6574818)
    pt3dadd(80.6338427578293, -63.2596553458175, -5.4585478500282, 0.6574818)
    pt3dadd(81.5925814038575, -63.5194247973055, -5.54483656662987, 0.6574818)
    pt3dadd(82.5859619140828, -63.608292377761, -5.53858023766469, 0.6574818)
    pt3dadd(83.5454372548386, -63.8058831669045, -5.72234454754769, 0.6574818)
    pt3dadd(84.3963356708026, -64.1696487434924, -6.10026074944594, 0.6574818)
    pt3dadd(85.2513200499804, -64.5781555278246, -6.41922249785464, 0.6574818)
    pt3dadd(86.1391311350355, -65.0214435656286, -6.54286388571947, 0.6574818)
    pt3dadd(87.0481971931977, -65.3287401163036, -6.70644325812031, 0.6574818)
    pt3dadd(88.0180954729705, -65.2921472926103, -6.81531787889855, 0.6574818)
    pt3dadd(88.9873278257491, -65.3972667215852, -7.02594055364407, 0.6574818)
    pt3dadd(89.9027092863371, -65.2900642447153, -7.15203747785976, 0.6574818)
    pt3dadd(90.6899704913786, -65.720034814576, -7.56625610889539, 0.6574818)
    pt3dadd(91.4863912569161, -66.1226556490113, -7.99113362051098, 0.6574818)
    pt3dadd(92.3935117406672, -66.2412035888291, -8.35745223243794, 0.6574818)
    pt3dadd(93.2919752605614, -66.1528128699875, -8.7799131780948, 0.6574818)
    pt3dadd(94.1082544681738, -65.7698869871435, -9.16861753799476, 0.6574818)
    pt3dadd(94.8908728667556, -65.2214123722376, -9.34707824895938, 0.6919997)
    pt3dadd(95.84940588458, -65.2453730317126, -9.62726857349971, 0.7610353)
    pt3dadd(96.8138605019479, -65.2931058440493, -9.77684160110584, 0.7955531)
    pt3dadd(97.6178622853104, -65.8245563472658, -10.0429708634519, 0.7955531)
    pt3dadd(98.4534040253807, -66.304178933044, -10.2524749871425, 0.7955531)
    pt3dadd(99.4291155748264, -66.4801829704037, -10.3199559290721, 0.7955531)
    pt3dadd(100.402196773449, -66.5711914755141, -10.4880532397117, 0.7610353)
    pt3dadd(101.316780249918, -66.793082567314, -10.8161935356096, 0.6919997)
    pt3dadd(102.210675994182, -67.1270827162094, -11.1042255065784, 0.6574818)
    pt3dadd(103.138477723932, -67.4692012273027, -11.1833885693239, 0.6574818)
    pt3dadd(104.12162153153, -67.6175670056129, -11.1466130083382, 0.6574818)
    pt3dadd(105.115296494347, -67.6285348543295, -11.246681190112, 0.6574818)
    pt3dadd(106.106837770969, -67.6982782421856, -11.3062141785593, 0.6574818)
    pt3dadd(107.047945886606, -68.0062854202109, -11.4126710986408, 0.6574818)
    pt3dadd(107.964959438, -68.3555974745785, -11.5790077970492, 0.6574818)
    pt3dadd(108.94130098362, -68.4818048207289, -11.7170721850669, 0.6574818)
    pt3dadd(109.909047731768, -68.6573187975903, -11.849438277762, 0.6574818)
    pt3dadd(110.859207171092, -68.9323820675986, -11.9960781473799, 0.6574818)
    pt3dadd(111.809748778965, -68.7102295166485, -12.1811025531538, 0.6574818)
    pt3dadd(112.699944916768, -68.5327165620585, -12.5477119370675, 0.6574818)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(112.699944916768, -68.5327165620585, -12.5477119370675, 0.6574818)
    pt3dadd(113.543014884432, -68.7652358870917, -13.019931634052, 0.6574818)
    pt3dadd(114.36804338865, -69.135016487385, -13.4470270626265, 0.6574818)
    pt3dadd(115.153745690018, -69.511600311455, -13.9337255875222, 0.6574818)
    pt3dadd(115.873082649873, -69.971763678241, -14.4505905521095, 0.6574818)
    pt3dadd(116.511326370796, -70.5911782144284, -14.8968909671468, 0.6574818)
    pt3dadd(117.124308298242, -71.2544312088042, -15.3260410342032, 0.6574818)
    pt3dadd(117.740531672658, -71.895226305243, -15.7812457212132, 0.6574818)
    pt3dadd(118.368824467734, -72.4478252210154, -16.328861098958, 0.6574818)
    pt3dadd(118.875468673451, -73.0596284882833, -16.9357625663598, 0.6574818)
    pt3dadd(119.333192559332, -73.6995171629627, -17.551886563428, 0.6574818)
    pt3dadd(119.766857492653, -74.3523587951102, -18.1729514881678, 0.6574818)
    pt3dadd(120.196346644102, -75.0031471645357, -18.7990613563282, 0.6574818)
    pt3dadd(120.633742439171, -75.6516867700769, -19.4219978014385, 0.6574818)
    pt3dadd(121.082073814893, -76.296961734114, -20.0403592656592, 0.6574818)
    pt3dadd(121.555627363948, -76.9345593074252, -20.6479910379402, 0.6574818)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(4.22707805262483, -26.0389241008139, -4.72513620369583, 0.8352492)
    pt3dadd(4.77174368448317, -25.5879730399794, -5.57479514482713, 0.8352492)
    pt3dadd(5.47091394405962, -25.4557736463624, -6.27018743785139, 0.7761762)
    pt3dadd(6.23826214111031, -25.5994752674957, -6.87348410092508, 0.7761762)
    pt3dadd(7.08957727214782, -25.7281407871228, -7.37995892436394, 0.7761762)
    pt3dadd(7.96067541091801, -25.8433005697957, -7.85356034117155, 0.7761762)
    pt3dadd(8.851728649658, -25.78776406876, -8.29264071468603, 0.7761762)
    pt3dadd(9.74940616257218, -25.651585963342, -8.71164276400198, 0.7761762)
    pt3dadd(10.6735374615977, -25.5474628657564, -9.07695568485926, 0.7761762)
    pt3dadd(11.5579257681436, -25.6420430482255, -9.52132460860963, 0.7761762)
    pt3dadd(12.4331131706521, -25.7239696994618, -9.99651774876325, 0.6751449)
    pt3dadd(13.3659337462628, -25.6125615388161, -10.3329368374126, 0.6414679)
    pt3dadd(14.2497062756116, -25.8031081380627, -10.7602986395008, 0.6414679)
    pt3dadd(15.0571072195849, -26.2210735743045, -11.1731663402042, 0.6414679)
    pt3dadd(15.8789803565235, -26.68292682858, -11.4998151949638, 0.675145)
    pt3dadd(16.7307934558713, -27.1495257641309, -11.7226615752395, 0.7424991)
    pt3dadd(17.6277595618459, -27.5705780817554, -11.7950992879756, 0.7761762)
    pt3dadd(18.5677428114507, -27.8895699412992, -11.7117997288048, 0.7761762)
    pt3dadd(19.5002196571647, -28.2258624658275, -11.8169349765029, 0.7761762)
    pt3dadd(20.3874932397465, -28.5916891168279, -12.0978556967611, 0.7761762)
    pt3dadd(21.2822834443483, -28.9728038057037, -12.3282171226873, 0.7761762)
    pt3dadd(22.1672996817494, -29.3902459254429, -12.5318850348635, 0.7761762)
    pt3dadd(23.0173354429173, -29.8703033273707, -12.7412654757817, 0.7761762)
    pt3dadd(23.8291436443971, -30.4086409784449, -12.9671659149284, 0.7424991)
    pt3dadd(24.6386133492645, -30.9553580016775, -13.1777440727554, 0.6751449)
    pt3dadd(25.5097427764959, -31.3914938671285, -13.3897165416435, 0.6414679)
    pt3dadd(26.4264406896354, -31.7851628766981, -13.4377277944329, 0.6414679)
    pt3dadd(27.347215780092, -32.1719810459014, -13.3945307896049, 0.6414679)
    pt3dadd(28.2690706856035, -32.5575211260913, -13.4329115386649, 0.6414679)
    pt3dadd(29.19097718293, -32.9363399495535, -13.5092517865392, 0.6414679)
    pt3dadd(30.0797095641012, -33.3116761411354, -13.7633250983714, 0.6414679)
    pt3dadd(30.9669011750489, -33.521879664046, -14.1734897512871, 0.6414679)
    pt3dadd(31.9170090595363, -33.6356996808408, -14.463903269588, 0.6414679)
    pt3dadd(32.8638318650665, -33.8786943181725, -14.6507217198487, 0.6414679)
    pt3dadd(33.7642022664355, -34.2825852449107, -14.7838607496723, 0.6414679)
    pt3dadd(34.6672857124767, -34.6827350480382, -14.932743834121, 0.6414679)
    pt3dadd(35.5975332081227, -35.0182850492502, -15.0787707115591, 0.675145)
    pt3dadd(36.4798466041917, -35.4443233215651, -15.2598486114439, 0.7424991)
    pt3dadd(37.2829025097181, -35.9923332941702, -15.4795682888866, 0.7761762)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(37.2829025097181, -35.9923332941702, -15.4795682888866, 0.7761762)
    pt3dadd(38.0523276376208, -36.5905804178486, -15.7004815266578, 0.7761762)
    pt3dadd(38.8554309908332, -37.1662359146552, -15.8542532830219, 0.7761762)
    pt3dadd(39.6931960000376, -37.7040933951979, -15.9239648413025, 0.7761762)
    pt3dadd(40.5453642008127, -38.2266962667915, -15.9487174886892, 0.7424991)
    pt3dadd(41.3987349089549, -38.745948945483, -15.9906812694573, 0.6751449)
    pt3dadd(42.2859044901068, -39.2027146515205, -15.9722855588939, 0.6414679)
    pt3dadd(43.1851019593427, -39.6388748903116, -15.9388161786595, 0.6414679)
    pt3dadd(44.056734376151, -40.121466293521, -15.9560744487336, 0.6414679)
    pt3dadd(44.8867949284919, -40.6733538175735, -16.030201110239, 0.6414679)
    pt3dadd(45.7042090539176, -41.2490093920714, -16.0088749032654, 0.6414679)
    pt3dadd(46.3848699731233, -41.9739903302629, -16.0682846224362, 0.6414679)
    pt3dadd(47.1643086593719, -42.5863082705056, -16.1683219030617, 0.6414679)
    pt3dadd(48.0054875096434, -43.0814486655669, -16.370328531884, 0.6414679)
    pt3dadd(48.8776354389734, -43.5058539109666, -16.6124222573682, 0.6414679)
    pt3dadd(49.7772700680566, -43.9165456065347, -16.7436586506876, 0.6414679)
    pt3dadd(50.6766543567397, -44.3481379127041, -16.810310285697, 0.6414679)
    pt3dadd(51.5623007345487, -44.782908239497, -16.9619594548552, 0.6414679)
    pt3dadd(52.4431148998774, -45.2319180416533, -17.1102861106274, 0.6414679)
    pt3dadd(53.2395995735907, -45.8262108534315, -17.0636494218659, 0.675145)
    pt3dadd(53.9105471040869, -46.5588231189169, -17.0051509582301, 0.7424991)
    pt3dadd(54.5049979007404, -47.359300726772, -16.9700416022898, 0.7761762)
    pt3dadd(55.0226087189627, -48.214916685622, -16.9706513730177, 0.7761762)
    pt3dadd(55.483736789855, -49.1019732928421, -16.9518272855563, 0.7761762)
    pt3dadd(55.9270020546164, -49.9980895932574, -16.9313465220636, 0.7761762)
    pt3dadd(56.3446101872648, -50.8970571963373, -16.8175156633258, 0.7761762)
    pt3dadd(56.7096322013608, -51.789598328085, -16.5641619424568, 0.7761762)
    pt3dadd(57.0266585182476, -52.7198756266421, -16.4077582815996, 0.7761762)
    pt3dadd(57.4122435058723, -53.6349238018897, -16.4594583226042, 0.7761762)
    pt3dadd(58.0064075876144, -54.4111464683093, -16.5853563651117, 0.7761762)
    pt3dadd(58.751693159659, -55.0067256333255, -16.8560903512973, 0.7424991)
    pt3dadd(59.4162105054775, -55.5572342890473, -17.3435274297522, 0.6751449)
    pt3dadd(60.0036204858699, -56.1186786182922, -17.9251655318831, 0.6414679)
    pt3dadd(60.5449177865107, -56.6922840810006, -18.5399614374243, 0.6414679)
    pt3dadd(61.0534641614953, -57.2947896498055, -19.1546212164894, 0.6414679)
    pt3dadd(61.5698357863855, -57.8989829060875, -19.7605829576377, 0.6414679)
    pt3dadd(62.132146780628, -58.4852533191916, -20.3437581872838, 0.6414679)
    pt3dadd(62.9591589019496, -58.8003148507694, -20.8003052943321, 0.6414679)
    pt3dadd(63.914240406994, -58.7655740274643, -21.0835083930661, 0.6414679)
    pt3dadd(64.8317167633887, -59.004717005791, -21.3614138539779, 0.6414679)
    pt3dadd(65.6336054203805, -59.5205650551721, -21.6582086194048, 0.6414679)
    pt3dadd(66.3855693247389, -60.0415642936096, -22.0620775091321, 0.6414679)
    pt3dadd(67.1818402368248, -60.3949247556937, -22.5513476544766, 0.6414679)
    pt3dadd(68.0023260215569, -60.6717329768003, -23.0503657212346, 0.6414679)
    pt3dadd(68.8845979613336, -60.8213325496922, -23.4924201505582, 0.6414679)
    pt3dadd(69.8401726065911, -60.8191875671819, -23.7736483049291, 0.6414679)
    pt3dadd(70.7698596388288, -61.0746172083972, -24.0044212837079, 0.6414679)
    pt3dadd(71.6085830774603, -61.5610143662307, -24.248526804157, 0.6414679)
    pt3dadd(72.4385670766574, -62.0694017437795, -24.4588547669454, 0.6414679)
    pt3dadd(73.389689966553, -62.3764806963144, -24.4601591373756, 0.6414679)
    pt3dadd(74.3397525844533, -62.683706529802, -24.4316422590675, 0.6414679)
    pt3dadd(75.2903792832487, -62.9861964814711, -24.4811430025653, 0.6414679)
    pt3dadd(76.2623308277238, -63.2026542842566, -24.5731006819936, 0.6414679)
    pt3dadd(77.1863338994392, -63.5470623549181, -24.7364534021271, 0.6414679)
    pt3dadd(78.0398551167509, -64.0178366873592, -24.9385800446804, 0.6414679)
    pt3dadd(78.891496417683, -64.5124754602279, -25.0783180336759, 0.6414679)
    pt3dadd(79.7723092109627, -64.9736002933022, -25.0270874640941, 0.6414679)
    pt3dadd(80.5748809286959, -65.5466608172181, -24.8905538140364, 0.6414679)
    pt3dadd(81.2842579849823, -66.2107486177881, -24.7211815075731, 0.6414679)
    pt3dadd(81.9663146356415, -66.9269678531111, -24.6032630715074, 0.6414679)
    pt3dadd(82.6228391612602, -67.4662302488234, -24.1226355286694, 0.6414679)
    pt3dadd(83.2387379885877, -68.1437860361563, -23.743107885727, 0.6414679)
    pt3dadd(83.8408763658214, -68.928005487618, -23.7387254846539, 0.6414679)
    pt3dadd(84.4588352682205, -69.7027384246783, -23.8562863757183, 0.6414679)
    pt3dadd(85.1054305209286, -70.4416581629219, -24.0412417482523, 0.6414679)
    pt3dadd(85.8004379741718, -71.1224865236093, -24.2719709775101, 0.6414679)
    pt3dadd(86.522920180725, -71.7589504286449, -24.5420323757159, 0.6414679)
    pt3dadd(87.2299723701178, -72.4037689349235, -24.8321918723768, 0.6414679)
    pt3dadd(87.855643322485, -73.091534109622, -25.1940066946674, 0.6414679)
    pt3dadd(88.4725577493712, -73.7774597471496, -25.5788782298953, 0.6414679)
    pt3dadd(89.1384860773557, -74.4218805011599, -25.9447399704897, 0.6414679)
    pt3dadd(89.9475665087689, -74.9477206378805, -26.1969048051213, 0.6414679)
    pt3dadd(90.7815897180678, -75.4953895805473, -26.2381639042607, 0.6414679)
    pt3dadd(91.3550567109683, -76.2568518092086, -26.5126326810739, 0.6414679)
  }
  GCL[5] {pt3dclear()
    pt3dadd(-15.5580118191338, -23.6695696819719, -0.622529561380686, 1.071631)
    pt3dadd(-14.9007085299049, -24.0653218959596, 0.0149067446312845, 1.071631)
    pt3dadd(-14.2562858748134, -24.481799011553, 0.655190796012668, 0.8171759)
    pt3dadd(-13.5267958413925, -24.9466401936304, 1.07701600127599, 0.8171759)
    pt3dadd(-12.7650532157531, -25.5431459014114, 1.32489070090576, 0.8171759)
    pt3dadd(-12.0594347534298, -26.1491119692513, 1.68226336139094, 0.8171759)
    pt3dadd(-11.3887984161152, -26.6808909074542, 2.19120156532018, 0.8171759)
    pt3dadd(-10.6533470619828, -27.0919716841164, 2.72634960739817, 0.8171759)
    pt3dadd(-9.86954254281768, -27.4714706342864, 3.21763417968609, 0.7817199)
    pt3dadd(-9.15433650130329, -28.070401585419, 3.5667604597921, 0.7108079)
    pt3dadd(-8.48747920032481, -28.7583220094886, 3.83487025616152, 0.7817199)
    pt3dadd(-7.73390784108638, -29.2415092639044, 4.26785863600896, 0.8171759)
    pt3dadd(-6.98200297345219, -29.5904215022983, 4.82549468088117, 0.8600776)
    pt3dadd(-6.2962441116435, -29.9795040100253, 5.43922570349099, 0.9029794)
    pt3dadd(-5.6694923032208, -30.4080704727149, 6.08984396712469, 0.8600776)
    pt3dadd(-5.05213400245733, -30.8411170961778, 6.74560260620473, 0.7817199)
    pt3dadd(-4.37689098570382, -31.1900493724988, 7.38571647449841, 0.7108079)
    pt3dadd(-3.74931219890021, -31.1608543226901, 8.14006303263485, 0.6753519)
    pt3dadd(-3.20578014803395, -31.2148207845057, 8.80747118581231, 0.6753519)
    pt3dadd(-2.55707176607043, -31.9433604214923, 8.87644156031093, 0.7108079)
    pt3dadd(-1.82602880493729, -32.616884556263, 8.84434037869173, 0.7817199)
    pt3dadd(-0.950483952366206, -33.0643819021815, 8.87729248860822, 0.8171759)
    pt3dadd(-0.0306209532897626, -33.3209133917113, 9.1399528404161, 0.7817199)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(-0.0306209532897626, -33.3209133917113, 9.1399528404161, 0.7108079)
    pt3dadd(0.7722463213894, -33.8232969524879, 9.39327438154408, 0.7108079)
    pt3dadd(1.34954035615117, -34.5838556386483, 9.24684440431695, 0.6753519)
  }
}
proc shape3d_9() {
  adendIML[3] {
    pt3dadd(1.96714938080715, -35.2309514095404, 9.1373923547108, 0.6753519)
    pt3dadd(2.75223198966578, -35.421987486695, 9.7174186427457, 0.6753519)
    pt3dadd(3.51049888797087, -35.8460381520017, 10.2065798750772, 0.6753519)
    pt3dadd(4.22598740657975, -36.4372786504523, 10.5722555991636, 0.6753519)
    pt3dadd(4.93347356417924, -37.0927293483909, 10.8289495488528, 0.6753519)
    pt3dadd(5.72476968542707, -37.6661963056409, 11.021529498736, 0.6460495)
    pt3dadd(6.56946126290624, -38.0669039031822, 11.351677417637, 0.5874445)
    pt3dadd(7.35868043738024, -38.5186282015371, 11.7527405288442, 0.5581421)
    pt3dadd(8.12297825171153, -38.9859845573468, 12.1931799333426, 0.5874445)
    pt3dadd(8.93655906020624, -39.302860584394, 12.6069049916404, 0.6753519)
    pt3dadd(9.73755513708044, -39.8883174881319, 12.7312394951019, 0.6753519)
    pt3dadd(10.5645351123371, -40.2837306136005, 13.0048202212462, 0.6753519)
    pt3dadd(11.3740683004242, -40.322190367687, 13.5799737038435, 0.6753519)
    pt3dadd(12.0230909375615, -40.3836021230132, 14.3196511735009, 0.6753519)
    pt3dadd(12.6932449258573, -40.4059314428575, 14.9925847461795, 0.6753519)
    pt3dadd(13.5576129382741, -40.3680191830003, 15.4821563796101, 0.6753519)
    pt3dadd(14.4012665567735, -40.6582706549364, 15.8828853822537, 0.6753519)
    pt3dadd(15.2195019651336, -41.1108552567895, 16.2367686799165, 0.6753519)
    pt3dadd(16.076645124037, -41.4275621315873, 16.6287264072511, 0.6753519)
    pt3dadd(16.9797706553281, -41.7530092318848, 16.8761153651217, 0.6753519)
    pt3dadd(17.8617867071169, -42.2075519592814, 16.9842491357724, 0.6753519)
    pt3dadd(18.7234508030801, -42.6926406563981, 17.1293682733006, 0.6753519)
    pt3dadd(19.5741304542927, -43.1974897555247, 17.2745129563866, 0.6753519)
    pt3dadd(20.4370212882495, -43.6823924702223, 17.4148092267822, 0.6753519)
    pt3dadd(21.2921317984361, -44.156323355013, 17.6182529285011, 0.6753519)
    pt3dadd(22.118507340028, -44.6553868224614, 17.876860545716, 0.6753519)
    pt3dadd(22.9496669688906, -45.135621710463, 18.1468027121474, 0.6753519)
    pt3dadd(23.8389108059894, -45.4791727123531, 18.4402556150943, 0.6753519)
    pt3dadd(24.6676041538828, -45.9036338374771, 18.7673810913487, 0.6753519)
    pt3dadd(25.4417967706142, -46.4892074372147, 19.0021522673019, 0.6753519)
    pt3dadd(26.2898785022007, -46.9813751052822, 19.180881278525, 0.6753519)
    pt3dadd(27.1591028366758, -47.4584469763394, 19.3030896238622, 0.6753519)
    pt3dadd(27.9932904422902, -48.0016423836062, 19.3855406756254, 0.7108079)
    pt3dadd(28.8553713479622, -48.4649101427354, 19.5587360195173, 0.7817199)
    pt3dadd(29.7450214836081, -48.7472245657841, 19.9037751607544, 0.8171759)
    pt3dadd(30.5230441269035, -49.2203914083684, 20.3006335781767, 0.8171759)
    pt3dadd(31.067481227616, -49.9801301905751, 20.6377450357206, 0.8171759)
    pt3dadd(31.9073630541767, -50.4240443986314, 20.9226139007079, 0.7817199)
    pt3dadd(32.7661584660615, -50.8826469733218, 21.1476991969849, 0.7108079)
    pt3dadd(33.5756691866658, -51.4389809204532, 21.3105983706052, 0.6753519)
    pt3dadd(34.2633914670488, -52.1301375457422, 21.5111359531678, 0.6753519)
    pt3dadd(34.9491452118593, -52.7925366948764, 21.8063634484519, 0.6753519)
    pt3dadd(35.6855392437233, -53.3922441415666, 22.1176349473056, 0.6753519)
    pt3dadd(36.4239064979724, -54.0008415636264, 22.4067208583888, 0.6753519)
    pt3dadd(37.157015889585, -54.6315869129504, 22.6603307944873, 0.6753519)
    pt3dadd(37.8636168147289, -55.3048942162214, 22.8731727768896, 0.7108079)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(37.8636168147289, -55.3048942162214, 22.8731727768896, 0.7817199)
    pt3dadd(38.4931618495618, -56.0498696207672, 23.0786701521919, 0.7817199)
    pt3dadd(39.0462513857255, -56.8511633507345, 23.3047201704603, 0.8171759)
    pt3dadd(39.5517162362638, -57.6654754365747, 23.5900289711043, 0.8171759)
    pt3dadd(40.1502986377176, -58.3964317599627, 23.917414451301, 0.8171759)
    pt3dadd(40.8153532253601, -59.0565469913443, 24.2666282493586, 0.8171759)
    pt3dadd(41.5187831027852, -59.6901981420468, 24.5883728203613, 0.8171759)
    pt3dadd(42.2941637916456, -60.2672725413356, 24.8421725052446, 0.7817199)
    pt3dadd(43.0688814016352, -60.8552920652149, 25.0744507423466, 0.7108079)
    pt3dadd(43.792220646789, -61.5206475956328, 25.2537294779719, 0.6753519)
    pt3dadd(44.5242095883606, -62.1934532020174, 25.3487984664905, 0.6753519)
    pt3dadd(45.2729632252038, -62.8529277330753, 25.4082880675816, 0.6753519)
    pt3dadd(46.0605130228051, -63.4677889342876, 25.4496525395578, 0.6753519)
    pt3dadd(46.8881894488718, -64.0122055760835, 25.560224986814, 0.6753519)
    pt3dadd(47.7535716471103, -64.4759572328589, 25.7364341619343, 0.7108079)
    pt3dadd(48.6491308440776, -64.8616952431668, 25.9575244271796, 0.7817199)
    pt3dadd(49.5584401448233, -65.2404355950911, 26.1298971088947, 0.7817199)
    pt3dadd(50.4491752478219, -65.6779270048641, 26.250143552344, 0.7817199)
    pt3dadd(51.2809192391516, -66.2243224341603, 26.3308352315764, 0.7108079)
    pt3dadd(52.0540624094573, -66.8539982634004, 26.3786395154312, 0.6753519)
    pt3dadd(52.8115727349451, -67.5056857773639, 26.4129049004007, 0.7108079)
    pt3dadd(53.5860524415955, -68.137152690828, 26.4479555158569, 0.7462639)
    pt3dadd(54.3923088162231, -68.7268195042542, 26.4953233057169, 0.7462639)
    pt3dadd(55.1894482132913, -69.328641219832, 26.5414314628209, 0.7108079)
    pt3dadd(55.9766471920543, -69.9437156621014, 26.5861662177835, 0.7108079)
    pt3dadd(56.7658453631622, -70.5575154916285, 26.6051599801007, 0.6753519)
    pt3dadd(57.5382347268968, -71.1508725689438, 26.8119758814082, 0.6753519)
    pt3dadd(58.2729775286607, -71.8165856695291, 26.9227678811539, 0.7108079)
    pt3dadd(58.9852186232448, -72.5170155327952, 26.9480230533879, 0.7817199)
    pt3dadd(59.7036426332535, -73.2106192488524, 26.9147852578281, 0.8171759)
    pt3dadd(60.4315540007693, -73.8843727867328, 26.8047074271336, 0.8171759)
    pt3dadd(61.1628597382048, -74.5325875065154, 26.5961165314638, 0.7817199)
    pt3dadd(61.9689624827156, -75.0946173019354, 26.4221704000834, 0.7108079)
    pt3dadd(62.8383098787515, -75.5881514435919, 26.4442747097736, 0.6753519)
    pt3dadd(63.6906173497922, -76.1111717504, 26.4489366272744, 0.6753519)
    pt3dadd(64.5411196981832, -76.6283328892788, 26.356560016402, 0.6753519)
    pt3dadd(65.4032463369736, -77.1306552805074, 26.3061293958178, 0.6753519)
    pt3dadd(66.2682413167145, -77.6242125161297, 26.3528916493385, 0.6753519)
    pt3dadd(67.1180161586955, -78.1364651154184, 26.4715701449783, 0.6753519)
    pt3dadd(67.9504357674663, -78.6847832975391, 26.5299247711502, 0.6753519)
    pt3dadd(68.7614494220888, -79.2669615181244, 26.4722587370218, 0.6753519)
    pt3dadd(69.5962446191752, -79.8034607293196, 26.5764963097557, 0.6753519)
    pt3dadd(70.3871494758894, -80.1960044889869, 27.0250808205816, 0.6753519)
    pt3dadd(71.1855014096997, -80.7766305126227, 27.1774054118886, 0.6753519)
    pt3dadd(71.959599972946, -81.3965046884642, 27.0488463962389, 0.6753519)
    pt3dadd(72.7933900354719, -81.927605528005, 26.9081550770278, 0.6753519)
    pt3dadd(73.6793414567672, -82.3796704207705, 26.8235737270162, 0.6753519)
    pt3dadd(74.568650100016, -82.8225789867109, 26.8975800557345, 0.6753519)
    pt3dadd(75.4497329100587, -83.28489630375, 26.9934699880665, 0.6753519)
    pt3dadd(76.3182227191531, -83.7662822255971, 26.98435242179, 0.6753519)
    pt3dadd(77.1664675735264, -84.2689088929773, 26.8174779172441, 0.6753519)
    pt3dadd(77.994631491162, -84.7883419571255, 26.6082975415641, 0.6753519)
    pt3dadd(78.8225257950832, -85.3190605535295, 26.4492784890924, 0.6753519)
    pt3dadd(79.646199161959, -85.8791809959806, 26.4545526439035, 0.6753519)
    pt3dadd(80.4146787133471, -86.4976329204944, 26.5366453584035, 0.6753519)
    pt3dadd(81.1669672117654, -87.12827262411, 26.3463693330525, 0.6753519)
    pt3dadd(81.9257229472754, -87.7391682508511, 26.1219321404933, 0.6753519)
    pt3dadd(82.7083255640742, -88.3187993640799, 25.9028078424111, 0.6753519)
    pt3dadd(83.5558026414035, -88.8277969050731, 25.7814211580783, 0.6753519)
    pt3dadd(84.4444337591039, -89.2818098577463, 25.8271743509117, 0.6753519)
    pt3dadd(85.3263075393767, -89.7482340945519, 25.7582753887465, 0.6753519)
    pt3dadd(86.1701771262191, -90.2103029831336, 25.4893485164588, 0.6753519)
    pt3dadd(87.0312566162592, -90.5954918063966, 25.1644930943293, 0.6753519)
    pt3dadd(87.914870661304, -90.8806813414556, 24.7990438634676, 0.6753519)
    pt3dadd(88.819357171476, -91.1260434236221, 24.455749520664, 0.6753519)
    pt3dadd(89.7318679576178, -91.4445548424805, 24.2049689562127, 0.6753519)
    pt3dadd(90.5979126134247, -91.8681709428363, 23.9607748812627, 0.6753519)
    pt3dadd(91.4095728124765, -92.3580768233826, 23.6445303321901, 0.6753519)
    pt3dadd(92.281696092725, -92.6966051995284, 23.3561618450511, 0.6753519)
    pt3dadd(93.2576226725486, -92.7073124993498, 23.1394607946476, 0.6753519)
    pt3dadd(94.2175163841947, -92.6689173138221, 22.8617381415012, 0.6753519)
    pt3dadd(95.1256360315933, -92.8269244691392, 22.4889625067899, 0.6753519)
  }
  GCL[6] {pt3dclear()
    pt3dadd(-19.7715229816817, -21.714806485269, -2.59905474382514, 0.890934)
    pt3dadd(-18.9177638093106, -21.1693743689633, -2.28106770000531, 0.890934)
    pt3dadd(-18.1196347974504, -20.7806671658826, -1.82137429244585, 0.8464931)
    pt3dadd(-17.2265719003217, -20.6087479190975, -1.46900050652266, 0.8464931)
    pt3dadd(-16.3098949663734, -20.4056800534679, -1.14780978272115, 0.8464931)
    pt3dadd(-15.5943118306114, -19.9272849625485, -0.665041567798554, 0.8464931)
    pt3dadd(-14.6802806937091, -19.8598696663108, -0.31130254003418, 0.8464931)
    pt3dadd(-13.714234348913, -19.9114758637887, -0.0853547182593326, 0.8464931)
    pt3dadd(-12.7632189557499, -19.6923380910349, 0.0854336357527554, 0.8464931)
    pt3dadd(-11.9583406133527, -19.7632365651267, -0.00755279779036133, 0.9585193)
    pt3dadd(-11.3417947209073, -20.4487338341806, -0.348196720612676, 0.9958615)
    pt3dadd(-10.6828974347331, -20.7874697087949, -0.601445062917104, 0.983955)
    pt3dadd(-9.72719154875292, -20.5068979358025, -0.649180823021858, 0.9663877)
    pt3dadd(-8.78731455370381, -20.1688046913933, -0.611220426399039, 0.9263177)
    pt3dadd(-7.85581668411385, -19.8067963950092, -0.577073047261964, 0.8728909)
    pt3dadd(-6.9143851309935, -19.4750974975758, -0.621634598582959, 0.8167928)
    pt3dadd(-5.97243554968019, -19.2501547136778, -0.862321857831525, 0.8141215)
    pt3dadd(-5.02744156616318, -19.1588112446916, -1.17092887394254, 0.8141215)
    pt3dadd(-4.04465493076957, -19.1350048008378, -1.32944963751158, 0.8141215)
    pt3dadd(-3.05372382276023, -19.046490605559, -1.2606646766055, 0.8141215)
    pt3dadd(-2.07224529958631, -18.8990083071761, -1.14917317478166, 0.8141215)
    pt3dadd(-1.07983347106877, -18.7920332607261, -1.17091678204072, 0.812965)
    pt3dadd(-0.0828984943702515, -18.7245873197371, -1.187371833687, 0.7886802)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(-0.0828984943702515, -18.7245873197371, -1.187371833687, 0.7655517)
    pt3dadd(0.909622545804801, -18.7342998579312, -1.0720783261954, 0.7655517)
    pt3dadd(1.89690302546133, -18.8419730130522, -0.962273894706069, 0.7482054)
    pt3dadd(2.87888942285129, -19.0126918263637, -0.883437447374459, 0.7412668)
    pt3dadd(3.83007526795557, -19.2527639624745, -0.698269534842828, 0.7401104)
    pt3dadd(4.73934822114242, -19.5710324224329, -0.432628455311423, 0.7401104)
    pt3dadd(5.62844988294876, -19.9884370797725, -0.262952864526488, 0.7401104)
    pt3dadd(6.4745601104525, -20.5122899691016, -0.309383218733583, 0.7401104)
    pt3dadd(7.25009300543436, -21.1239543617979, -0.442960803355459, 0.7401104)
    pt3dadd(8.01120800321745, -21.6525620212087, -0.12729498143942, 0.7401104)
    pt3dadd(8.83610493123397, -22.0659484830749, 0.242710148470518, 0.7390591)
    pt3dadd(9.70506817611042, -22.3837431034527, 0.389653872117587, 0.7390591)
    pt3dadd(10.5616476152771, -22.8973674747665, 0.359323587979922, 0.7390591)
    pt3dadd(11.4408757250835, -23.2509540646045, 0.605799502048456, 0.7390591)
    pt3dadd(12.2729742672882, -23.2882716609898, 1.09155930930887, 0.7390591)
    pt3dadd(13.1585329854522, -23.7189973182424, 1.05659097185665, 0.7390591)
    pt3dadd(13.9491968706292, -24.2843675787763, 0.821629083073274, 0.7390591)
    pt3dadd(14.6097783506254, -24.9139167465863, 0.902948371231811, 0.7390591)
    pt3dadd(15.219994479974, -25.6960618654081, 1.01101990459389, 0.7390591)
    pt3dadd(15.9775285715165, -26.3027801993875, 1.21426511102136, 0.7390591)
    pt3dadd(16.8073855413092, -26.481323111734, 1.67888210450267, 0.7390591)
    pt3dadd(17.6596007243678, -26.8522457955091, 1.95152132338827, 0.7390591)
    pt3dadd(18.4933840092089, -27.4016656546317, 1.96760541580476, 0.7390591)
    pt3dadd(19.3865861980597, -27.8466571710143, 1.98098244791221, 0.7390591)
    pt3dadd(20.2436296280333, -28.0247465312201, 2.16303669220877, 0.7390591)
    pt3dadd(21.1438340547565, -28.0990486528497, 2.47542132002146, 0.7390591)
    pt3dadd(22.0104531949098, -28.4530564748336, 2.81274114362026, 0.7390591)
    pt3dadd(22.8405285453517, -28.8713947545781, 3.15569387985036, 0.7390591)
    pt3dadd(23.7331793934896, -29.3007298251651, 3.26382866898722, 0.7390591)
    pt3dadd(24.6353303684946, -29.6738666613607, 3.4435102463205, 0.7390591)
    pt3dadd(25.4492029588834, -29.935953725235, 3.91682867181401, 0.7390591)
    pt3dadd(26.1236332431477, -30.0691307894019, 4.63598347991087, 0.7390591)
    pt3dadd(26.8179860903165, -30.3882160093266, 4.96896911671429, 0.7390591)
    pt3dadd(27.6127998407776, -30.9585693566365, 5.00329585029016, 0.7390591)
    pt3dadd(28.4527171486379, -31.1095877305361, 5.49237171127638, 0.7390591)
    pt3dadd(29.260401956689, -31.0481774606266, 6.07684738665251, 0.7778597)
    pt3dadd(30.1467758238539, -31.1776781398803, 6.48905194184526, 0.8554609)
    pt3dadd(30.9748258528097, -31.6880973133678, 6.71102787317889, 0.8942615)
    pt3dadd(31.7812975740127, -32.2237777044481, 6.93519247838904, 0.8942615)
    pt3dadd(32.6226589703195, -32.5353173608857, 7.33743900560432, 0.8554609)
    pt3dadd(33.4572203780244, -32.6290202755046, 7.88008006380169, 0.7778597)
    pt3dadd(34.3047584050356, -32.769114966687, 8.37158397527184, 0.7390591)
    pt3dadd(35.1626490313969, -33.1524753838966, 8.69695231820956, 0.7390591)
    pt3dadd(35.9504483777929, -33.7485537465415, 8.84775442291435, 0.7390591)
    pt3dadd(36.7448954697946, -34.2173051530862, 9.0400388957552, 0.7390591)
    pt3dadd(37.5732101853937, -34.7335304631806, 9.19692486718525, 0.7390591)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(37.5732101853937, -34.7335304631806, 9.19692486718525, 0.7390591)
    pt3dadd(38.4311047178584, -35.1460540909717, 9.49672449058353, 0.7390591)
    pt3dadd(39.272908678284, -35.4486850935128, 9.93428868155561, 0.7390591)
    pt3dadd(40.062511485563, -35.9944969879557, 10.1994427616605, 0.7390591)
    pt3dadd(40.8043448327063, -36.642916596141, 10.3695214275202, 0.7069925)
    pt3dadd(41.5681153187813, -37.2709465405657, 10.5152764284939, 0.6749259)
    pt3dadd(42.3367598656205, -37.899860237615, 10.6315806835285, 0.7069925)
    pt3dadd(43.1247930845525, -38.49195120374, 10.792083614642, 0.7390591)
    pt3dadd(43.9458869868802, -39.0339887433029, 10.9695354051315, 0.7390591)
    pt3dadd(44.756795582856, -39.5837491738987, 11.1659141724627, 0.7390591)
    pt3dadd(45.5120059539574, -40.2060061251771, 11.3599057324289, 0.7390591)
    pt3dadd(46.2277597422513, -40.8901511675865, 11.4409416509954, 0.7390591)
    pt3dadd(46.9570305345395, -41.5657711288207, 11.3618763795316, 0.7390591)
    pt3dadd(47.7926055147763, -42.1035143246738, 11.2576938720318, 0.7069925)
    pt3dadd(48.6792886357648, -42.5607650114148, 11.293647325619, 0.6428592)
    pt3dadd(49.5554083108615, -42.953560932146, 11.5606166334782, 0.6107926)
    pt3dadd(50.4575327829951, -43.1790740479757, 11.9221798779839, 0.6816599)
    pt3dadd(51.4150570789944, -43.3194304796539, 12.16747445447, 0.8233944)
    pt3dadd(52.3847728084324, -43.4998257814728, 12.2832479937947, 0.8554609)
    pt3dadd(53.304353448349, -43.8810057697305, 12.3330071207667, 0.7778597)
    pt3dadd(54.1840934525187, -44.3370367420706, 12.4540071263226, 0.7390591)
    pt3dadd(55.0512330649333, -44.7999554203017, 12.637083741513, 0.7390591)
    pt3dadd(55.9136976852292, -45.2803600251391, 12.7916032967017, 0.7069925)
    pt3dadd(56.8075569736664, -45.7131374378116, 12.874899039637, 0.6428592)
    pt3dadd(57.7744608402853, -45.9391680233263, 12.930276916268, 0.6107926)
    pt3dadd(58.7702097677734, -46.0109833173989, 12.9843987712462, 0.6107926)
    pt3dadd(59.7612916873516, -46.0698212855821, 13.0973582201396, 0.6428592)
    pt3dadd(60.7534762821397, -46.1302735136226, 13.1609340704969, 0.7069925)
    pt3dadd(61.732112546396, -46.2548480416246, 13.0664310910777, 0.7390591)
    pt3dadd(62.626544367492, -46.3457748057476, 12.9114640226059, 0.7390591)
    pt3dadd(63.5532923317684, -46.2987446042416, 13.0692193052159, 0.7390591)
    pt3dadd(64.4941952198062, -46.6230936119288, 12.9820004897899, 0.7390591)
    pt3dadd(65.4694140184585, -46.8029981925277, 12.8932342555118, 0.7390591)
    pt3dadd(66.4642236443438, -46.772284892072, 12.8829418468368, 0.7390591)
    pt3dadd(67.4511526566839, -46.7469161496022, 12.9581783184256, 0.7390591)
    pt3dadd(68.4174660018533, -46.9208647515184, 12.8985990951796, 0.7069925)
    pt3dadd(69.373461888674, -47.1620976498527, 13.0308397622925, 0.6428592)
    pt3dadd(70.2958647041313, -47.5269351383565, 13.1502664049632, 0.6107926)
    pt3dadd(71.2479107438561, -47.7876995249619, 13.3032601277264, 0.6107926)
    pt3dadd(72.2184259654829, -47.9520074492048, 13.4794596428371, 0.6107926)
    pt3dadd(73.1936833228603, -48.1135214312482, 13.6292633326459, 0.6107926)
    pt3dadd(74.1778481042442, -48.2439348538832, 13.7478195141122, 0.6107926)
    pt3dadd(75.1534264137787, -48.3314380774045, 13.9453823856695, 0.6107926)
    pt3dadd(76.0981651049691, -48.4293826559205, 14.2541971030303, 0.6428592)
    pt3dadd(76.997728570162, -48.4994564178004, 14.6774554268685, 0.6749259)
    pt3dadd(77.7961568507984, -48.5123959946125, 15.268194768835, 0.6428592)
    pt3dadd(78.5030791072689, -48.5339236228907, 15.9735681213098, 0.6428592)
    pt3dadd(79.2144556672027, -48.6014251023087, 16.6704900531881, 0.7069925)
    pt3dadd(79.966754599686, -48.7139015520813, 17.3196397773898, 0.7069925)
    pt3dadd(80.7677200190768, -48.8124197598963, 17.9093696236808, 0.7390591)
    pt3dadd(81.5578017766461, -48.8106941136897, 18.5182577786826, 0.7390591)
    pt3dadd(82.3486701940048, -48.7534113805062, 19.1275019543551, 0.7390591)
    pt3dadd(83.159958167372, -48.6738423223093, 19.7064739619096, 0.7069925)
    pt3dadd(84.0333072409827, -48.6445585114075, 20.1844125066761, 0.6428592)
    pt3dadd(84.9614958522674, -48.6155895923586, 20.5492717063588, 0.6107926)
    pt3dadd(85.6093849813082, -48.2215696294101, 21.0159053772437, 0.6107926)
    pt3dadd(86.3854810284216, -47.8738126123323, 21.4874277522038, 0.6107926)
    pt3dadd(87.3351581382567, -47.779978076059, 21.7755024770626, 0.6107926)
    pt3dadd(88.2677625552236, -47.5924102612383, 22.068287416844, 0.6107926)
    pt3dadd(89.1764275132464, -47.3670417644431, 22.4155231494081, 0.6428592)
    pt3dadd(90.1414536984918, -47.2628282464654, 22.5280933819864, 0.7069925)
    pt3dadd(91.0985380170946, -47.4824885794746, 22.4176746604907, 0.7390591)
  }
}
proc shape3d_10() {
  adendMML[3] {
    pt3dadd(92.0504824414655, -47.7709557490789, 22.3500353309146, 0.7390591)
    pt3dadd(93.0347768876864, -47.9037697245413, 22.4069490692736, 0.7390591)
    pt3dadd(94.0325792474108, -47.8839887189229, 22.4271431811896, 0.7390591)
    pt3dadd(95.0172453900183, -47.7385076153439, 22.483313805493, 0.7069925)
    pt3dadd(95.9990808552038, -47.5730092159495, 22.5727134205048, 0.6428592)
    pt3dadd(96.9731485830103, -47.6784594198125, 22.5606911263187, 0.6107926)
    pt3dadd(97.9510629148488, -47.8830255583357, 22.5339510841092, 0.6107926)
    pt3dadd(98.9237440057072, -47.8746923506775, 22.6994528983441, 0.6107926)
    pt3dadd(99.8762238410376, -47.8467979906223, 22.9994713035123, 0.6107926)
    pt3dadd(100.845326893819, -48.0500309791387, 23.1214204735701, 0.6107926)
    pt3dadd(101.833906644223, -48.0756834177702, 23.2505311878806, 0.6107926)
    pt3dadd(102.530279498794, -47.5831678237652, 23.6001684491925, 0.6107926)
    pt3dadd(102.852118109973, -47.0208756788101, 24.0631232045292, 0.6107926)
    pt3dadd(103.349389660822, -47.8859846334464, 24.0848522987488, 0.6107926)
  }
  GCL[7] {pt3dclear()
    pt3dadd(-52.0997304432346, -7.18358134520038, -22.3044646850363, 1.053666)
    pt3dadd(-53.0789869981486, -7.16402137752957, -22.588614688314, 1.053666)
    pt3dadd(-53.9325132336078, -7.33048329943599, -23.0755295321794, 1.003979)
    pt3dadd(-54.729228953853, -7.32332469967144, -23.6763529207245, 0.849833)
    pt3dadd(-55.3390804930214, -7.30691364438357, -24.4624915411211, 0.8208901)
    pt3dadd(-55.8373031664508, -7.21761840098064, -25.3245144792749, 0.7690479)
    pt3dadd(-56.3867856463168, -7.17794862085646, -26.1564992820274, 0.7584323)
    pt3dadd(-57.1081274782424, -6.90792514198603, -26.7687626128615, 0.8091177)
    pt3dadd(-57.459654658858, -6.35492248768228, -27.4899499205405, 0.8804281)
    pt3dadd(-57.4254210675323, -6.08785104309415, -28.4444404474925, 1.083544)
    pt3dadd(-57.1912400875407, -5.44466429888153, -29.161882415412, 1.054649)
    pt3dadd(-56.7490187098476, -5.06155900691094, -29.9468518065363, 0.8550468)
    pt3dadd(-56.1025423729051, -4.94955915838293, -30.6960934585784, 0.8555723)
    pt3dadd(-55.4246936180492, -4.64306140347003, -31.3629216332279, 0.893989)
    pt3dadd(-54.803161633001, -4.42610103839528, -32.1128316985866, 0.8991072)
    pt3dadd(-54.2708519996176, -4.34547137076825, -32.9532313283493, 0.8468635)
    pt3dadd(-53.9184679798956, -4.40563805868214, -33.8801100706933, 0.7757015)
    pt3dadd(-54.0460911747768, -4.60660939117855, -34.8252294856624, 0.7517976)
    pt3dadd(-54.7778883011802, -4.78557097345336, -35.4634885625605, 0.7498072)
    pt3dadd(-55.7160026354974, -4.85207728555207, -35.7884512397034, 0.7498072)
    pt3dadd(-56.698574409223, -4.83051434096032, -35.9714255072664, 0.7498072)
    pt3dadd(-57.6310170379211, -4.93142867604943, -36.3011296894347, 0.7498072)
    pt3dadd(-58.4436102673495, -5.17426961168042, -36.8279850657567, 0.7498072)
    pt3dadd(-59.2539312807517, -5.35091874883522, -37.3829715620182, 0.7498072)
    pt3dadd(-60.1271280708419, -5.31417976965129, -37.8617887255787, 0.7498072)
    pt3dadd(-61.0056373428699, -5.12422242100526, -38.2989073828612, 0.7498072)
    pt3dadd(-61.8788920647485, -5.16030880237487, -38.7535236445464, 0.7498072)
    pt3dadd(-62.7075908754606, -5.49595983080147, -39.2012609801832, 0.7497754)
    pt3dadd(-63.5184500401445, -5.74122333879658, -39.7290402158366, 0.7472973)
    pt3dadd(-64.2512233430308, -5.8968323112542, -40.387773408675, 0.7403078)
    pt3dadd(-64.8499545919132, -6.0562015510127, -41.1679039308717, 0.7245814)
    pt3dadd(-65.2761442905415, -6.28257746243507, -42.0386766040612, 0.6993874)
    pt3dadd(-65.5154560808702, -6.58984406516249, -42.9555738224147, 0.6696503)
    pt3dadd(-65.5918135497464, -6.96427639257245, -43.8771059244821, 0.6423912)
    pt3dadd(-65.5689018748809, -7.37996029949671, -44.7854473919811, 0.6196753)
  }
  soma[2] {pt3dclear()
    pt3dadd(-24.2284234431931, 0, 0, 9.473022)
    pt3dadd(-23.3291752749284, 0.358197448405341, -0.170295003981245, 9.473022)
    pt3dadd(-22.4590191306696, 0.530685832858193, -0.613903263505571, 9.000496)
    pt3dadd(-21.6614333987812, 0.936985330635163, -1.04738456698603, 9.000496)
    pt3dadd(-20.8086183084685, 1.32401763589435, -1.3730454122302, 8.609979)
    pt3dadd(-19.8489740518879, 1.43404806523072, -1.58179617420011, 7.506202)
    pt3dadd(-18.8671194369452, 1.50182151463062, -1.48128168238769, 6.203472)
    pt3dadd(-17.9200856614566, 1.21703703275801, -1.37177416571567, 4.198797)
    pt3dadd(-17.2918380891116, 0.473406152083799, -1.6005056702146, 4.198797)
  }
  GCL[8] {pt3dclear()
    pt3dadd(-17.2918380891116, 0.473406152083799, -1.6005056702146, 4.198797)
    pt3dadd(-16.8371425775964, -0.00797307686885418, -1.75429358679792, 4.198797)
  }
  GCL[9] {pt3dclear()
    pt3dadd(-16.8371425775964, -0.00797307686885418, -1.75429358679792, 4.198797)
    pt3dadd(-16.3024343232235, -1.2230361096243, -1.82280214556649, 4.198797)
    pt3dadd(-15.872240242334, -2.113121653992, -1.67223059567071, 4.198797)
    pt3dadd(-15.4447669196626, -2.99892622844265, -1.49162933796034, 4.198797)
    pt3dadd(-14.943453070776, -3.86182452931142, -1.43409229210967, 4.198797)
    pt3dadd(-14.2697596137367, -4.59162242857321, -1.40158787840816, 4.198797)
    pt3dadd(-13.4448547483252, -5.14488902852664, -1.35094786599374, 4.016617)
    pt3dadd(-12.5233968312357, -5.51885065082243, -1.28241071467038, 3.652259)
    pt3dadd(-11.5458042884432, -5.42619004938343, -1.20173354295398, 3.168957)
    pt3dadd(-10.7088926327568, -4.90971359928655, -1.02168340324886, 3.319519)
    pt3dadd(-9.81838711916171, -4.53982071618173, -0.968145431022273, 3.47008)
    pt3dadd(-8.83882229818231, -4.48459611989772, -1.14862373956626, 3.47008)
    pt3dadd(-7.88751917259633, -4.59932481780831, -1.43061026622726, 3.47008)
    pt3dadd(-6.95081277712253, -4.68404724019203, -1.76462091632007, 3.47008)
    pt3dadd(-6.1807092065597, -4.13372064170317, -1.96241436102571, 3.47008)
    pt3dadd(-5.80097308465591, -3.21218051098093, -1.9563316472959, 3.164916)
    pt3dadd(-5.37825403329591, -2.49617394610502, -1.97281946680142, 3.032389)
  }
  GCL[10] {pt3dclear()
    pt3dadd(-5.37825403329591, -2.49617394610502, -1.97281946680142, 3.150484)
    pt3dadd(-4.53682399907299, -3.34747441353808, -2.05435922578889, 3.150484)
    pt3dadd(-3.70267840403902, -3.8867194227685, -2.06789777582281, 2.7466)
    pt3dadd(-2.74875744321246, -4.12216455006093, -1.94707802915424, 2.367516)
    pt3dadd(-1.76099359182045, -4.08420484070961, -1.80125900034803, 2.249422)
    pt3dadd(-0.848183619003894, -4.3855021288723, -2.01054320738371, 2.249422)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(-0.848183619003894, -4.3855021288723, -2.01054320738371, 2.249422)
    pt3dadd(0.114484551663388, -4.63056159552933, -2.10185811488542, 2.249422)
    pt3dadd(1.05300761165988, -4.50640556074517, -1.97472032973735, 1.956625)
    pt3dadd(2.0139963465644, -4.63648314351114, -2.21462496606881, 1.778366)
    pt3dadd(2.9781260702127, -4.51045459933831, -2.35108595939998, 1.617045)
    pt3dadd(3.91120457218091, -4.16485876815913, -2.42669916562718, 1.541424)
    pt3dadd(4.85912114197178, -3.86049899310455, -2.50128693741544, 1.55654)
    pt3dadd(5.79184036142093, -3.55868813090695, -2.6807419243222, 1.566397)
    pt3dadd(6.77286299598501, -3.40666664994079, -2.79371384484574, 1.51859)
    pt3dadd(7.74960496422551, -3.21287955471472, -2.87644396276666, 1.500964)
    pt3dadd(8.68339436735759, -2.89922596519543, -3.04503040991543, 1.473045)
    pt3dadd(9.62281919170776, -2.83552265950627, -3.31499111818524, 1.426868)
    pt3dadd(10.508565748502, -3.18792065294549, -3.61250582740638, 1.511495)
    pt3dadd(11.4648575880823, -3.38381119537277, -3.79596088848948, 1.603727)
    pt3dadd(12.4440658098971, -3.27476936651944, -3.94416885162053, 1.635372)
    pt3dadd(13.3998106330509, -2.99806681217891, -4.03926541043017, 1.594756)
    pt3dadd(14.368049424286, -2.90304892026448, -4.26471541495605, 1.57271)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(14.368049424286, -2.90304892026448, -4.26471541495605, 1.567554)
    pt3dadd(15.2314290967685, -3.12089967886516, -4.44094280458444, 1.567554)
    pt3dadd(16.1059298316481, -3.55228125825523, -4.60650577022966, 1.561463)
    pt3dadd(17.0758552145988, -3.75971546474138, -4.71520235603139, 1.42184)
    pt3dadd(18.0014811174825, -4.05148946547567, -4.95309241498316, 1.273405)
    pt3dadd(18.8949859613415, -4.39905654910418, -5.23445434475365, 1.139456)
    pt3dadd(19.8393952957675, -4.63378916345087, -5.44886735427315, 1.055003)
    pt3dadd(20.820449223471, -4.72306752903977, -5.61459551222678, 1.008458)
    pt3dadd(21.8062912404242, -4.75187704540966, -5.77940141147073, 0.9839731)
    pt3dadd(22.8016152056149, -4.79302405906643, -5.85701786155675, 0.9733273)
    pt3dadd(23.7945711614496, -4.90190581855301, -5.84633811426258, 0.9733273)
    pt3dadd(24.7643826351073, -5.1345890317498, -5.85074080443744, 0.9733273)
    pt3dadd(25.7040453694952, -5.46721508899953, -5.92193462859283, 0.9733273)
    pt3dadd(26.6632562644261, -5.7421253269247, -5.966700011961, 0.9733273)
    pt3dadd(27.6516938428437, -5.84760131015142, -5.8614566618697, 0.9636493)
    pt3dadd(28.6335712657097, -5.98677491494632, -5.74549845810463, 0.9429109)
    pt3dadd(29.6114865911003, -6.18976419429984, -5.71393324206561, 0.9152595)
    pt3dadd(30.5879471434846, -6.40310896637749, -5.7407540201957, 0.8945209)
    pt3dadd(31.5407939458173, -6.69263550252562, -5.82308328399032, 0.884843)
    pt3dadd(32.431137529924, -7.12429927595774, -5.96555784984518, 0.884843)
    pt3dadd(33.2989084784831, -7.60711767776484, -6.07705553456407, 0.884843)
    pt3dadd(34.2097943129368, -8.00798328555158, -6.09136232899203, 0.884843)
    pt3dadd(35.1877361065644, -8.17539493225453, -6.03954141691885, 0.8835861)
    pt3dadd(36.1867343481634, -8.2032348564478, -6.03058017295048, 0.8760448)
    pt3dadd(37.1784294687839, -8.31773592581144, -6.08496234154781, 0.8320541)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(37.1784294687839, -8.31773592581144, -6.08496234154781, 0.8132009)
    pt3dadd(38.1617667644207, -8.49365323540055, -6.12780334230101, 0.8132009)
    pt3dadd(39.1306156129895, -8.73154681116068, -6.17234758690312, 0.8056596)
    pt3dadd(40.0575414344432, -9.08934492998899, -6.26431790995809, 0.8044027)
    pt3dadd(40.9375071155931, -9.54356384560679, -6.39758120457154, 0.8044027)
    pt3dadd(41.7698373558827, -10.0648520527413, -6.57900669623096, 0.8044027)
    pt3dadd(42.5422744680352, -10.6459909367114, -6.82656027409444, 0.8044027)
    pt3dadd(43.2718596705544, -11.2571728434115, -7.13254217243249, 0.8044027)
    pt3dadd(44.0737626769031, -11.7517654232658, -7.42889173708121, 0.8044027)
    pt3dadd(44.9897551788934, -11.7678803016563, -7.39212106259631, 0.8044027)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(44.9897551788934, -11.7678803016563, -7.39212106259631, 0.8044027)
    pt3dadd(46.0128364454041, -11.5207413024388, -7.3377458254617, 0.8044027)
    pt3dadd(47.0025046447308, -11.386818002321, -7.32742210758277, 0.8044027)
    pt3dadd(47.9846066493696, -11.2075211556344, -7.36999521225708, 0.8044027)
    pt3dadd(48.9374039180484, -10.908203222862, -7.4056080499458, 0.8044027)
    pt3dadd(49.8894505225579, -10.6096763895977, -7.45542172702539, 0.8044027)
    pt3dadd(50.8732370899869, -10.4655345460833, -7.53156527578421, 0.8044027)
    pt3dadd(51.8690362571057, -10.4743141456712, -7.61210300742406, 0.8044027)
    pt3dadd(52.8632074817051, -10.5408065367645, -7.69624407802885, 0.8044027)
    pt3dadd(53.8452192275318, -10.6919708367218, -7.79739832385866, 0.7964044)
    pt3dadd(54.7937615718245, -10.9936096098486, -7.88357206421659, 0.7792651)
    pt3dadd(55.7396037591944, -11.3102948536917, -7.89882037214096, 0.7564127)
    pt3dadd(56.7202188805255, -11.4165084289226, -7.79648694072202, 0.7392735)
    pt3dadd(57.7017750610368, -11.2941275287621, -7.66386389093758, 0.7312751)
    pt3dadd(58.6914773538593, -11.160771805659, -7.66857591092431, 0.7312751)
    pt3dadd(59.6833274383699, -11.1079659817462, -7.78056434120127, 0.7312751)
    pt3dadd(60.6707050109313, -11.0902012204911, -7.93718451022237, 0.7312751)
    pt3dadd(61.650764726518, -11.1111991746635, -8.13186176960691, 0.7312751)
    pt3dadd(62.6190228340782, -11.2094017390225, -8.35886590434895, 0.7312751)
    pt3dadd(63.5989101759915, -11.3107004292387, -8.52235980719814, 0.7312751)
    pt3dadd(64.5984213151731, -11.3084235046603, -8.53467961823564, 0.7312751)
    pt3dadd(65.5942598374451, -11.2922676634383, -8.58831484567772, 0.7312751)
    pt3dadd(66.547012335447, -11.3928961077392, -8.85312639930929, 0.7312751)
    pt3dadd(67.3890313631416, -11.7144599992611, -9.2797101670749, 0.7312751)
    pt3dadd(68.1696544447646, -12.1488452474279, -9.72819432549125, 0.7312751)
    pt3dadd(69.0361817237325, -12.4820187840861, -10.0855346189332, 0.7312751)
    pt3dadd(70.0101737876669, -12.6109716787993, -10.2208574569789, 0.7350572)
    pt3dadd(71.0015593415625, -12.5859688000026, -10.1303136634767, 0.7577496)
    pt3dadd(71.9841302986044, -12.4581209620974, -10.0000160396273, 0.8144805)
    pt3dadd(72.9677938414979, -12.4299918774749, -10.1238553421075, 0.9283767)
    pt3dadd(73.9070078032571, -12.6224470695287, -10.402757366137, 0.9114773)
    pt3dadd(74.8654446116531, -12.7939258707683, -10.6087967730031, 0.8624704)
    pt3dadd(75.8515839489924, -12.7191407126095, -10.65474980955, 0.8228787)
    pt3dadd(76.8186121400063, -12.481049718848, -10.6073462495154, 0.8044026)
    pt3dadd(77.6890712239047, -12.363078266663, -10.6035842240016, 0.7633722)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(77.6890712239047, -12.363078266663, -10.6035842240016, 0.7331448)
    pt3dadd(78.7452350284117, -12.0631610973272, -10.3280640655597, 0.7331448)
    pt3dadd(79.73873319303, -11.9632827165335, -10.2930875182933, 0.708621)
    pt3dadd(80.719907909494, -11.7792018534028, -10.2963532850054, 0.6512918)
    pt3dadd(81.6563814131959, -11.4489114230809, -10.3945855666688, 0.6261732)
    pt3dadd(82.5740708883754, -11.1297556968064, -10.6231507511592, 0.6109698)
    pt3dadd(83.5256189711691, -10.9306655943628, -10.8497501103546, 0.6053039)
    pt3dadd(84.4923410380293, -10.7095054876176, -10.9691587839916, 0.6043596)
    pt3dadd(85.4310649994779, -10.3954784140818, -11.1039661572143, 0.6043596)
    pt3dadd(86.3687794813249, -10.1898408922901, -11.3592588391339, 0.6043596)
    pt3dadd(87.3078154599974, -10.1761760981133, -11.6965217981832, 0.6074852)
    pt3dadd(88.2641187456963, -10.1416662356647, -11.9790466790789, 0.6222551)
    pt3dadd(89.2169997726689, -9.89291476018406, -12.1288424593862, 0.6452354)
    pt3dadd(90.1383975753047, -9.51476877083885, -12.2170176161435, 0.6151891)
    pt3dadd(91.078751976265, -9.19669436917231, -12.3223906375028, 0.5741811)
    pt3dadd(92.0552033638907, -9.0396616715004, -12.4504775749297, 0.5526215)
    pt3dadd(93.0464828830906, -9.02025775482291, -12.5739666240288, 0.5439548)
    pt3dadd(94.0422566777432, -9.05532576104161, -12.6559949089006, 0.5322485)
    pt3dadd(95.040867838345, -9.09094926765463, -12.6902198361669, 0.5049337)
    pt3dadd(96.0399533012161, -9.06522540399606, -12.7009490678558, 0.5028343)
    pt3dadd(97.0327635785986, -8.96644300463314, -12.7522609338063, 0.5175531)
    pt3dadd(98.0096700752777, -8.83027016195832, -12.9095031830445, 0.5563011)
    pt3dadd(98.9688015404973, -8.66854785335454, -13.1407461766768, 0.6467131)
    pt3dadd(99.9319480545185, -8.58669547437556, -13.3914896635747, 0.6596291)
    pt3dadd(100.911542760186, -8.63282211582416, -13.5719495335931, 0.6467131)
    pt3dadd(101.902807576358, -8.67082511203975, -13.5401343789439, 0.6079651)
    pt3dadd(102.878970619644, -8.611973952811, -13.3383390236137, 0.5563011)
    pt3dadd(103.869344181497, -8.59872187197975, -13.2247779203018, 0.5020539)
    pt3dadd(104.841113829717, -8.80625461668778, -13.3277383854417, 0.4994707)
    pt3dadd(105.796187610352, -9.07201416270511, -13.4533953922473, 0.4994707)
    pt3dadd(106.772457995619, -9.27552839345139, -13.4893692393328, 0.4994707)
    pt3dadd(107.763364323156, -9.39939528129331, -13.4499870805396, 0.5030926)
    pt3dadd(108.761488683682, -9.43962366059198, -13.4406069108387, 0.5248243)
    pt3dadd(109.75735563082, -9.3797121574833, -13.4935446308677, 0.5755315)
    pt3dadd(110.7462458978, -9.25492311914929, -13.5720575562029, 0.6262387)
    pt3dadd(111.735108028894, -9.18017953679058, -13.6962076078083, 0.5755315)
    pt3dadd(112.718393427184, -9.2026080676358, -13.8766602901877, 0.5248243)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(112.718393427184, -9.2026080676358, -13.8766602901877, 0.5030926)
    pt3dadd(113.707504276325, -9.20017070797409, -14.0112697609483, 0.5030926)
    pt3dadd(114.701056766164, -9.10744730152786, -14.0670779339022, 0.4994707)
    pt3dadd(115.684436292623, -8.95039968752705, -14.1440457615101, 0.4994707)
    pt3dadd(116.643001705048, -8.72153062576317, -14.3022614714034, 0.4994707)
    pt3dadd(117.564312351014, -8.3896282773463, -14.497438038633, 0.4994707)
    pt3dadd(118.467541164894, -7.99463154364275, -14.6633411188612, 0.4994707)
    pt3dadd(119.400905652451, -7.66817870503217, -14.8007216761759, 0.4994707)
    pt3dadd(120.373035228968, -7.54225368700905, -14.9749131420985, 0.4994707)
    pt3dadd(121.344348635179, -7.58752779607731, -15.2004529128328, 0.4994707)
    pt3dadd(122.316018597276, -7.66690692668247, -15.4229646960083, 0.4994707)
    pt3dadd(123.296663271487, -7.70021820915162, -15.6139172435073, 0.5002511)
    pt3dadd(124.276594439484, -7.69143365318992, -15.8123668363796, 0.51664)
    pt3dadd(125.236599877434, -7.60283299376742, -16.0695618650256, 0.5322485)
    pt3dadd(126.149309698351, -7.28471552045849, -16.3090214057429, 0.5486374)
    pt3dadd(127.025307723276, -6.84209133976875, -16.4994062184934, 0.5494178)
    pt3dadd(127.919435692162, -6.41270120503837, -16.6167625143737, 0.5494178)
    pt3dadd(128.840273785539, -6.02642595610691, -16.6315520083939, 0.5494178)
    pt3dadd(129.788599261487, -5.7166640249064, -16.5792662396771, 0.5522593)
    pt3dadd(130.76932887984, -5.53039184118458, -16.5473848703597, 0.6119312)
    pt3dadd(131.758285087195, -5.39441089283963, -16.5957744014205, 0.6687616)
    pt3dadd(132.728673969269, -5.16033441489876, -16.6168933623321, 0.7085429)
    pt3dadd(133.687770071599, -4.88364702007268, -16.565215863523, 0.7085429)
    pt3dadd(134.664790202667, -4.69342951869797, -16.4881990104392, 0.6687616)
    pt3dadd(135.658679104032, -4.59411313175196, -16.4514754604991, 0.5693084)
    pt3dadd(136.635920001423, -4.38821153422856, -16.4580974827677, 0.5522593)
    pt3dadd(137.582240446819, -4.06869252413418, -16.4282479203615, 0.5494178)
    pt3dadd(138.516450222514, -3.74334577213392, -16.2963483893269, 0.5494178)
    pt3dadd(139.438317843815, -3.47891971061556, -16.0231790701472, 0.5494178)
    pt3dadd(140.334034061544, -3.28037226270455, -15.6286940172251, 0.5494178)
    pt3dadd(141.216070613296, -3.10734610636621, -15.1905133536033, 0.5494178)
    pt3dadd(142.109889505721, -2.91459094190851, -14.7859277975032, 0.5494178)
    pt3dadd(143.019735358462, -2.72343901243595, -14.4183277890411, 0.5494178)
    pt3dadd(143.952276978159, -2.6076485740439, -14.0801806283802, 0.5494178)
    pt3dadd(144.916960755755, -2.56747960613141, -13.8242471825247, 0.5502763)
    pt3dadd(145.895684911172, -2.4981554153638, -13.6358667593402, 0.5574101)
    pt3dadd(146.858376072012, -2.31363692436905, -13.4461585628609, 0.5821854)
    pt3dadd(147.803195603043, -2.0295146608598, -13.2871024936849, 0.626259)
    pt3dadd(148.756677052178, -1.73335473797969, -13.2507151139908, 0.6540218)
    pt3dadd(149.726250948524, -1.5188888970252, -13.3583645531086, 0.6084583)
    pt3dadd(150.671878958587, -1.32890513093488, -13.6109584848384, 0.5588791)
    pt3dadd(151.506228050858, -1.01234926714869, -14.0502408344612, 0.486842)
  }
}
proc shape3d_11() {
  adendOML[1] {
    pt3dadd(152.172775264206, -0.564330564479135, -14.6380739820443, 0.4644936)
    pt3dadd(152.62441213461, 0.15660056002008, -15.138131443394, 0.4540643)
    pt3dadd(153.068069155556, 0.993340168754279, -15.4530522126615, 0.4540643)
    pt3dadd(153.583322099878, 1.79445440756553, -15.757555379229, 0.4540643)
    pt3dadd(154.020814523541, 2.64489651918083, -16.0455112704423, 0.4540643)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(77.6890712239047, -12.363078266663, -10.6035842240016, 0.7564127)
    pt3dadd(78.0733026603133, -13.2072405200606, -11.2456678899056, 0.7564127)
    pt3dadd(78.7847002657769, -13.7490444764493, -11.6598994937046, 0.7118411)
    pt3dadd(79.7183904228988, -13.9892797040632, -11.8867404677989, 0.646202)
    pt3dadd(80.6794326179981, -14.1371414507341, -12.099114461366, 0.6251345)
    pt3dadd(81.5424173776016, -14.5180213794404, -12.4058598545576, 0.6109698)
    pt3dadd(82.34180695118, -15.0526645315219, -12.6741813791538, 0.6053039)
    pt3dadd(83.1974585762118, -15.5503585095785, -12.7900608676912, 0.6043596)
    pt3dadd(84.1157538966014, -15.9432433914186, -12.8218360044835, 0.618241)
    pt3dadd(85.0603576811673, -16.258556701266, -12.9068252188341, 0.6479868)
    pt3dadd(86.024798694524, -16.4846975933276, -13.0415617402876, 0.6856648)
    pt3dadd(86.9864791570071, -16.6996351604405, -13.2072751540449, 0.7035123)
    pt3dadd(87.9203033384536, -16.9898518881064, -13.4131678276358, 0.6900474)
    pt3dadd(88.8484505552576, -17.25511505375, -13.6713447128591, 0.6742821)
    pt3dadd(89.7718507089352, -17.4206517869145, -14.0153649146244, 0.6939937)
    pt3dadd(90.664319395942, -17.6368849214631, -14.4089555768229, 0.6700978)
    pt3dadd(91.5392003072717, -17.9375899337302, -14.7880361839114, 0.6306549)
    pt3dadd(92.4099648275592, -18.2565562025483, -15.1620551285474, 0.6087421)
    pt3dadd(93.287244860249, -18.5338527464942, -15.5522181067303, 0.6043596)
    pt3dadd(94.1890006345052, -18.7211526439801, -15.9379415925849, 0.6043596)
    pt3dadd(95.1117917395507, -18.8347287201543, -16.3055103126616, 0.6043596)
    pt3dadd(96.018322172337, -18.9889747939637, -16.6965984631323, 0.6043596)
    pt3dadd(96.9003967136072, -19.2165404375491, -17.1082429292631, 0.6043596)
    pt3dadd(97.8199489790692, -19.3889856664629, -17.4584929918619, 0.6043596)
    pt3dadd(98.7737507104976, -19.5081449996084, -17.7329329645788, 0.6043596)
    pt3dadd(99.7412168103706, -19.6392751505643, -17.9474305170223, 0.6043596)
    pt3dadd(100.712337476356, -19.7988473625883, -18.124051905275, 0.6043596)
    pt3dadd(101.65700402395, -20.0479214041339, -18.3323382094854, 0.6043596)
    pt3dadd(102.529003236041, -20.457197006674, -18.5976534848958, 0.6043596)
    pt3dadd(103.348818748056, -20.9645113610948, -18.8632153661102, 0.6043596)
    pt3dadd(104.162079815036, -21.4966754164541, -19.0986040980369, 0.6043596)
    pt3dadd(105.00628446943, -21.9961055217089, -19.2922487805935, 0.6043596)
    pt3dadd(105.898310857062, -22.4238115933949, -19.4315218509784, 0.6043596)
    pt3dadd(106.834659091553, -22.7627977934389, -19.5067934050015, 0.6027207)
    pt3dadd(107.797823780703, -23.0276779605551, -19.5061355773166, 0.5928873)
    pt3dadd(108.762182388998, -23.277525141129, -19.4250868963572, 0.568304)
    pt3dadd(109.701565621613, -23.5986454238337, -19.3089276178829, 0.5355263)
    pt3dadd(110.613860801932, -23.999067530385, -19.2261344717513, 0.5109429)
    pt3dadd(111.515190363723, -24.430572400215, -19.1912634464595, 0.5011096)
    pt3dadd(112.40773252572, -24.8813392060282, -19.1810112240156, 0.4994707)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(112.40773252572, -24.8813392060282, -19.1810112240156, 0.4994707)
    pt3dadd(113.283753563407, -25.3634779435758, -19.1852445614786, 0.4994707)
    pt3dadd(114.148109403876, -25.8640402479279, -19.2316218735376, 0.4994707)
    pt3dadd(115.019989612177, -26.3432682921646, -19.3315022098827, 0.4994707)
    pt3dadd(115.905334321049, -26.7907148146313, -19.4574417443277, 0.4994707)
    pt3dadd(116.791479956051, -27.2294591167136, -19.6058085482958, 0.5020539)
    pt3dadd(117.659993683745, -27.6935382658095, -19.7799189965224, 0.5020539)
    pt3dadd(118.48848730496, -28.219595212631, -19.9718464488615, 0.5175531)
    pt3dadd(119.288992106892, -28.7820890182792, -20.1772743277831, 0.5530084)
    pt3dadd(120.081737731329, -29.3487513814043, -20.4014673109394, 0.5849164)
    pt3dadd(120.889431455888, -29.8889548844061, -20.6356022276403, 0.5742742)
    pt3dadd(121.734021127823, -30.3772000928327, -20.8510585087806, 0.5239199)
    pt3dadd(122.617807851205, -30.8108419804167, -21.0242935328167, 0.477113)
    pt3dadd(123.521897756852, -31.2086209704141, -21.1800968657942, 0.457357)
    pt3dadd(124.429192018413, -31.599445525855, -21.3349819344257, 0.4540643)
    pt3dadd(125.324416443867, -32.0236837065921, -21.4664207238952, 0.4555542)
    pt3dadd(126.173837479096, -32.5328660770897, -21.589370589659, 0.4644936)
    pt3dadd(126.942830185092, -33.1408955009198, -21.7733292707158, 0.486842)
    pt3dadd(127.682732748767, -33.7677764234581, -22.0163771573584, 0.51664)
    pt3dadd(128.501869850057, -34.2891444969902, -22.2363926787349, 0.5389885)
    pt3dadd(129.425647068921, -34.632206119963, -22.3825154151744, 0.5479279)
    pt3dadd(130.371344068826, -34.9318494367547, -22.5067054653466, 0.5494178)
    pt3dadd(131.274323427324, -35.3315205956564, -22.6614949727634, 0.5494178)
    pt3dadd(132.137301269612, -35.7871823323228, -22.8758062711253, 0.5494178)
    pt3dadd(132.963617111711, -36.2573911172362, -23.1827552386521, 0.5494178)
    pt3dadd(133.758374475298, -36.7319757158627, -23.5606423392487, 0.5494178)
    pt3dadd(134.540725812535, -37.204272185469, -23.9666376931339, 0.5494178)
    pt3dadd(135.32883783327, -37.6662913497997, -24.3733463038808, 0.5494178)
    pt3dadd(136.11181682717, -38.1402491787564, -24.7756520648332, 0.5494178)
    pt3dadd(136.858954698766, -38.6710203524599, -25.175072505282, 0.5486374)
    pt3dadd(137.564005876822, -39.2592913585981, -25.571102882475, 0.5486374)
    pt3dadd(138.225618970926, -39.8873551901699, -25.9807189198622, 0.5439548)
    pt3dadd(138.851347682636, -40.5434123037107, -26.4021044381572, 0.5322485)
    pt3dadd(139.454196615545, -41.2296426453181, -26.8081800339952, 0.51664)
    pt3dadd(140.044520452836, -41.9445200915847, -27.1817154776329, 0.5049337)
    pt3dadd(140.62939112256, -42.6818397995894, -27.5196942868998, 0.5002511)
    pt3dadd(141.206255920602, -43.4299839403365, -27.8475774207239, 0.5002511)
    pt3dadd(141.776367477825, -44.1826366506684, -28.1769393693372, 0.4994707)
    pt3dadd(142.35120075081, -44.9402210118406, -28.4856547377952, 0.4994707)
    pt3dadd(142.933545626171, -45.7024463761588, -28.7676655984321, 0.4994707)
    pt3dadd(143.523687165166, -46.4679889900399, -29.0239413847491, 0.4994707)
    pt3dadd(144.114243477045, -47.2335987613588, -29.2790588489914, 0.4994707)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(44.9897551788934, -11.7678803016563, -7.39212106259631, 0.7719939)
    pt3dadd(45.4880603545338, -12.1391465169707, -6.56138644117551, 0.7719939)
    pt3dadd(46.2384050290228, -12.6921622991345, -6.22956241630912, 0.7335604)
    pt3dadd(46.9945261426631, -12.8629899128617, -5.89595527497312, 0.7335604)
    pt3dadd(47.8823536871519, -13.2603913472955, -5.77614571042703, 0.7335604)
    pt3dadd(48.6899241572744, -13.8456443192699, -5.79458180732251, 0.7335604)
    pt3dadd(49.4346345045817, -14.5069040215607, -5.87159621858986, 0.7335604)
    pt3dadd(50.1459884608465, -14.7094365204622, -5.5803526028509, 0.7335604)
    pt3dadd(50.8311826868843, -14.9303436879807, -5.389206040833, 0.8490961)
    pt3dadd(51.7347274613933, -14.9678395839851, -5.02277697055753, 0.8876081)
    pt3dadd(52.6442349672532, -15.3172408684598, -4.81837025570595, 0.8876081)
    pt3dadd(53.5084186875152, -15.8076970881169, -4.72303070770167, 0.8876081)
    pt3dadd(54.3522516690201, -16.3428355664488, -4.69167207068729, 0.8876081)
    pt3dadd(55.1922127135813, -16.8850712657257, -4.69792972597981, 0.8876081)
    pt3dadd(56.0474681131366, -17.3976516715887, -4.74071133368386, 0.8876081)
    pt3dadd(56.9363028830936, -17.8376575779257, -4.85465678625373, 0.8876081)
    pt3dadd(57.7886212802716, -18.2762600038583, -5.13958004223336, 0.8876081)
    pt3dadd(58.5715619794532, -18.8156734862405, -5.44920288803952, 0.8876081)
    pt3dadd(59.3600152094613, -19.3837469008201, -5.68054045455667, 0.8876081)
    pt3dadd(60.1339798010023, -19.9891166669726, -5.86211977511415, 0.8490961)
    pt3dadd(60.8937744120703, -20.6194888157362, -6.02131494795273, 0.8490961)
    pt3dadd(61.6631943997024, -21.2499471745836, -6.12251025642172, 0.7720723)
    pt3dadd(62.4347997200453, -21.8791410177281, -6.21373976183223, 0.7335604)
    pt3dadd(63.2247468277267, -22.4919192022189, -6.23579568343897, 0.7335604)
    pt3dadd(63.9709529335057, -23.1451376848742, -6.33279638134601, 0.7335604)
    pt3dadd(64.6880743938536, -23.8213669810169, -6.49887422912593, 0.7017323)
    pt3dadd(65.4240355232971, -24.4645298235883, -6.71030453415264, 0.7017323)
    pt3dadd(66.2815651302072, -24.9588033269932, -6.80959195999452, 0.6380762)
    pt3dadd(67.1939597418874, -25.3587051652653, -6.87968224861376, 0.6062482)
    pt3dadd(68.1038076987347, -25.7527645502906, -6.99887995746812, 0.6062482)
    pt3dadd(68.9977700525627, -26.1864907922995, -7.10430765861912, 0.6062482)
    pt3dadd(69.8995888620406, -26.6159119303977, -7.11703984356402, 0.6062482)
    pt3dadd(70.7969922901564, -27.0565719632274, -7.10134176149279, 0.6062482)
    pt3dadd(71.7163438820265, -27.4428513791872, -7.05430956187081, 0.6380762)
    pt3dadd(72.6702768153219, -27.7396808685485, -7.04272205742089, 0.7017323)
    pt3dadd(73.5420856253876, -28.1791828966692, -7.23552263968744, 0.7335604)
    pt3dadd(74.4066796798247, -28.6200799426231, -7.47594748474346, 0.7017323)
    pt3dadd(75.3138698869101, -28.9737389982437, -7.69182995967183, 0.6380762)
    pt3dadd(76.239527851187, -29.2840309414124, -7.90774137172294, 0.6062482)
    pt3dadd(77.1544051892249, -29.5984870291032, -8.16002032000151, 0.6062482)
    pt3dadd(78.057317046061, -29.8999818420003, -8.46458339978606, 0.6062482)
    pt3dadd(78.9786984847854, -29.9815027950265, -8.74740493016992, 0.6062482)
    pt3dadd(79.9162324006969, -29.9967729724387, -9.03436418897706, 0.6062482)
    pt3dadd(80.7762030298145, -30.3901549428725, -9.3494119981781, 0.7017323)
    pt3dadd(81.63385473952, -30.8794377985411, -9.49227233128608, 0.7335604)
    pt3dadd(82.4735222854675, -31.4213347683484, -9.4629938372705, 0.7335604)
    pt3dadd(83.3286135753002, -31.9346827217001, -9.43238098771575, 0.7017323)
    pt3dadd(84.2038192188157, -32.3878892696942, -9.57100811783483, 0.6380762)
    pt3dadd(85.0819147205341, -32.7647789371067, -9.86347808204033, 0.6062482)
    pt3dadd(85.9606489123327, -33.1254795424831, -10.1750550035791, 0.6380762)
    pt3dadd(86.8331981880232, -33.5332163751147, -10.4416380075126, 0.7017323)
    pt3dadd(87.7060970996762, -33.9691487560654, -10.6600506830623, 0.7335604)
    pt3dadd(88.6351984342293, -34.307156943358, -10.7693354227878, 0.7017323)
    pt3dadd(89.5861620046956, -34.6104762080786, -10.7320966430127, 0.6380762)
    pt3dadd(90.3909577715189, -35.1889385442443, -10.8135031849014, 0.6062482)
    pt3dadd(91.1430690327029, -35.8299039492125, -10.9574557603833, 0.6062482)
    pt3dadd(91.8776118203136, -36.4871330446308, -11.1255200760364, 0.6062482)
    pt3dadd(92.6469440322069, -37.1090919091921, -11.2714485466544, 0.6062482)
    pt3dadd(93.4635158541726, -37.6688321041524, -11.4000345287693, 0.6062482)
    pt3dadd(94.2965783497926, -38.1897398270052, -11.5783713540249, 0.6062482)
    pt3dadd(95.0794073600708, -38.7537177878688, -11.8312839370083, 0.6380762)
    pt3dadd(95.8080058682027, -39.3857419829835, -12.0917618025915, 0.7017323)
    pt3dadd(96.5176200330926, -40.0575416366482, -12.3040971130563, 0.7335604)
    pt3dadd(97.2295056169228, -40.7316308097869, -12.5011318871238, 0.7335604)
    pt3dadd(98.0315711859606, -41.2853202173905, -12.7249530792018, 0.7335604)
    pt3dadd(98.8284252770752, -41.819240334738, -13.0074478034571, 0.7335604)
    pt3dadd(99.4953500026839, -42.4862000142793, -13.335585344809, 0.7335604)
    pt3dadd(100.151533885568, -43.1756660060962, -13.6414891891351, 0.7335604)
    pt3dadd(100.815915279739, -43.8723132850298, -13.9099509425482, 0.7335604)
    pt3dadd(101.483314829297, -44.5818086962354, -14.1319311252639, 0.7335604)
    pt3dadd(102.080900277853, -45.3518710982284, -14.3553041959565, 0.7335604)
    pt3dadd(102.677284306562, -46.1261315413206, -14.5669288533829, 0.7335604)
    pt3dadd(103.273195231171, -46.9020451204638, -14.773927132684, 0.7335604)
    pt3dadd(103.8891713946, -47.6627213130664, -14.9785215243824, 0.7335604)
    pt3dadd(104.502649719036, -48.4212967381444, -15.196333516445, 0.7335604)
    pt3dadd(105.097209682512, -49.1796917737809, -15.4634204306758, 0.7335604)
    pt3dadd(105.689802334491, -49.9291385454919, -15.7581960642741, 0.7335604)
    pt3dadd(106.286224082628, -50.6737562061371, -16.0577538678305, 0.7335604)
    pt3dadd(106.8927454245, -51.4138851053876, -16.3481692158205, 0.7335604)
    pt3dadd(107.527369950941, -52.1467150614696, -16.5924420209358, 0.7335604)
    pt3dadd(108.196521010608, -52.8579239849331, -16.798846409582, 0.7335604)
    pt3dadd(108.918026215006, -53.5329979865793, -16.9528117703867, 0.7335604)
    pt3dadd(109.731319405034, -54.1094931522382, -17.0294054984959, 0.7017323)
    pt3dadd(110.562798267137, -54.6640218336388, -17.0569635618316, 0.6062482)
    pt3dadd(111.321624689406, -55.3144349135271, -17.090805641799, 0.6062482)
    pt3dadd(112.079114138262, -55.9650306209408, -17.1448249309684, 0.6062482)
    pt3dadd(112.901218276821, -56.5267881702971, -17.2067317959797, 0.6062482)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(112.901218276821, -56.5267881702971, -17.2067317959797, 0.6062482)
    pt3dadd(113.72566903698, -57.0661931591392, -17.3599060598693, 0.6062482)
    pt3dadd(114.467329460901, -57.6624888281959, -17.649759291869, 0.6062482)
    pt3dadd(115.19371515418, -58.2711276847527, -17.959486885335, 0.6062482)
    pt3dadd(115.987394435681, -58.8363767622033, -18.1576946303461, 0.6062482)
    pt3dadd(116.82302274616, -59.3854180185339, -18.1409905717545, 0.6062482)
    pt3dadd(117.602106433107, -59.9650565453699, -17.925074912382, 0.6062482)
    pt3dadd(118.341198464163, -60.5923039613108, -17.6971339032161, 0.6062482)
    pt3dadd(119.017213149964, -61.2481271672102, -17.3651067414174, 0.6062482)
    pt3dadd(119.678582718125, -61.958425375501, -17.1311531833463, 0.6062482)
    pt3dadd(120.279038161152, -62.7294731226065, -16.9222169193357, 0.6062482)
    pt3dadd(120.857287576332, -63.5162043126195, -16.7061575615995, 0.6062482)
    pt3dadd(121.419377357319, -64.2850819108998, -16.4036308156757, 0.6062482)
    pt3dadd(121.958276434224, -65.0945975455235, -16.1731173824085, 0.6062482)
    pt3dadd(122.446490071569, -65.9606345166667, -16.1553729460315, 0.6062482)
    pt3dadd(122.850778280308, -66.8727822819135, -16.1378909995794, 0.6062482)
    pt3dadd(123.141082714986, -67.8236131012547, -16.0488656073191, 0.6062482)
    pt3dadd(123.356194604183, -68.7936938681107, -16.0925026126365, 0.6062482)
    pt3dadd(123.525276454948, -69.7619541265044, -16.2588881568058, 0.6062482)
    pt3dadd(123.652481366279, -70.7209921190545, -16.5119988823367, 0.6062482)
    pt3dadd(123.690577518977, -71.6928550061835, -16.743227774487, 0.6062482)
    pt3dadd(123.718343416711, -72.6769367536223, -16.911730039699, 0.6062482)
    pt3dadd(123.830249984059, -73.6499106589675, -17.082966048607, 0.6062482)
    pt3dadd(124.068717594617, -74.5911744648174, -17.3155242516766, 0.6062482)
    pt3dadd(124.399261905351, -75.491128261027, -17.5998192100026, 0.6062482)
    pt3dadd(124.794835742546, -76.3826822712207, -17.8145953187596, 0.6062482)
    pt3dadd(125.267774295968, -77.2483158262349, -17.8513272416396, 0.6062482)
    pt3dadd(125.802205241379, -78.0875656715186, -17.7517020942448, 0.6062482)
    pt3dadd(126.321574112457, -78.9222117806441, -17.8256874089358, 0.6062482)
    pt3dadd(126.818626586097, -79.7574114052076, -18.0610178693043, 0.6062482)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(14.368049424286, -2.90304892026448, -4.26471541495605, 1.433808)
    pt3dadd(15.3009348064553, -2.5796458843472, -4.35870194545026, 1.433808)
    pt3dadd(16.2102417038899, -2.16871060231758, -4.42113321200878, 1.270897)
    pt3dadd(17.1278991896359, -1.77231855573966, -4.4436411808729, 1.092034)
    pt3dadd(18.047717685483, -1.38013561957612, -4.45483256628355, 0.9388237)
    pt3dadd(18.964046040747, -0.980918989944068, -4.48482205742598, 0.8102359)
    pt3dadd(19.8729292661005, -0.569375217742135, -4.54899283685379, 0.8044027)
    pt3dadd(20.7640548798851, -0.136029807950993, -4.67788737534012, 0.8022214)
    pt3dadd(21.625372719469, 0.323241563912987, -4.89183648534053, 0.7891332)
    pt3dadd(22.4608195299742, 0.798997821378241, -5.16630408916462, 0.7564127)
    pt3dadd(23.2869674675541, 1.27967039714253, -5.46029347604885, 0.7127855)
    pt3dadd(24.1144178202644, 1.75969994236172, -5.75164933102679, 0.6791208)
    pt3dadd(24.941770259338, 2.23978153756058, -6.04321136871025, 0.6603668)
    pt3dadd(25.7631314277119, 2.72273500541512, -6.3466975181043, 0.6251345)
    pt3dadd(26.5815289912848, 3.20703433814738, -6.65591678310036, 0.6093309)
    pt3dadd(27.417217185428, 3.68221192968556, -6.92888042776869, 0.5946121)
    pt3dadd(28.292096336528, 4.12721508250251, -7.11212481447946, 0.5737669)
    pt3dadd(29.2080625230203, 4.51041656943037, -7.22333922461927, 0.5526955)
    pt3dadd(30.1549072746413, 4.79792780140586, -7.35620790968098, 0.5437207)
    pt3dadd(31.1149109633493, 4.9847480467716, -7.55802134385499, 0.5455937)
    pt3dadd(32.0783509003016, 5.11141850498213, -7.793167626447, 0.5486374)
    pt3dadd(33.0441202983022, 5.23949607521091, -8.01848890643667, 0.5494178)
    pt3dadd(34.0042030019295, 5.41033777825841, -8.23931684892964, 0.5502763)
    pt3dadd(34.9479489722753, 5.57516775941302, -8.52324242316402, 0.5683041)
    pt3dadd(35.8738404040176, 5.6390425100261, -8.8909716351697, 0.5854733)
    pt3dadd(36.7644274399961, 5.5733713692371, -9.3351453376025, 0.5974919)
    pt3dadd(37.5949726746622, 5.3675455592764, -9.84753551758156, 0.5974919)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(37.5949726746622, 5.3675455592764, -9.84753551758156, 0.5854733)
    pt3dadd(38.3921834668997, 5.07605140485079, -10.3756896027744, 0.5854733)
    pt3dadd(39.2687110286445, 4.9537430997185, -10.8278663223756, 0.5554271)
    pt3dadd(40.1879071720807, 5.04144278725834, -11.2114564085542, 0.5502763)
    pt3dadd(41.1052311043515, 5.07326791503689, -11.6041770463798, 0.5494178)
    pt3dadd(42.0323954232809, 5.06056054703158, -11.9778482789489, 0.5494178)
    pt3dadd(42.9614088790826, 5.1780746486938, -12.3279565201321, 0.5494178)
    pt3dadd(43.8676051820902, 5.29690848501195, -12.7312989605104, 0.5494178)
    pt3dadd(44.764180539655, 5.36543789331781, -13.1688366053967, 0.5494178)
    pt3dadd(45.6679794963976, 5.47434740961874, -13.5801560037975, 0.5494178)
    pt3dadd(46.5801197771491, 5.60881315642623, -13.9671778897864, 0.5486374)
    pt3dadd(47.4863646443454, 5.63635957263164, -14.3856888440245, 0.5439548)
    pt3dadd(48.3768697541251, 5.69441535446111, -14.8296818536535, 0.51664)
    pt3dadd(49.2617152878043, 5.97201335233895, -15.1935420486435, 0.5049337)
    pt3dadd(50.1634607455455, 6.31009433331059, -15.4589191167477, 0.5002511)
    pt3dadd(51.1021382095746, 6.48589793890886, -15.7348751724326, 0.4994707)
    pt3dadd(52.026358404606, 6.46531145815064, -16.1060518424312, 0.4994707)
    pt3dadd(52.9221009628856, 6.40178645644318, -16.5454450504441, 0.4994707)
  }
}
proc shape3d_12() {
  adendMML[9] {
    pt3dadd(53.8152036226827, 6.47083778220471, -16.9851743940826, 0.4994707)
    pt3dadd(54.6988553382238, 6.76658152341447, -17.341280177238, 0.4994707)
    pt3dadd(55.6054843736814, 7.12054353728459, -17.5619870847374, 0.4994707)
    pt3dadd(56.5680443244205, 7.29740126313801, -17.7464245793489, 0.4994707)
    pt3dadd(57.4938361854731, 7.15961399390536, -18.0902176163616, 0.4994707)
    pt3dadd(58.3591218264855, 6.9200983749715, -18.5302795864733, 0.4994707)
    pt3dadd(59.2311173305358, 6.73300047095852, -18.9794567230809, 0.4994707)
    pt3dadd(60.1352513083359, 6.63830688194332, -19.3945282772, 0.4994707)
    pt3dadd(61.0505370169458, 6.55437145799039, -19.7879930602272, 0.4994707)
    pt3dadd(61.9678624166152, 6.45024850757171, -20.1694071510027, 0.4994707)
    pt3dadd(62.8972444458903, 6.60006966866825, -20.4930881122744, 0.4994707)
    pt3dadd(63.80659254988, 6.73142649611734, -20.8739623347115, 0.4994707)
    pt3dadd(64.6749016861473, 6.5395209021982, -21.3215359067428, 0.4994707)
    pt3dadd(65.4945010342875, 6.19046735019945, -21.7758336722261, 0.4994707)
    pt3dadd(66.3278068667572, 5.88675379376223, -22.2318764208224, 0.4994707)
    pt3dadd(67.2173323706952, 5.75439313226652, -22.6601503622611, 0.4994707)
    pt3dadd(68.1476207340205, 5.76199388956259, -23.0235716994421, 0.4987612)
    pt3dadd(69.0930846502188, 5.86013895919979, -23.3323072317721, 0.4838623)
    pt3dadd(70.0332780150716, 6.03856192373124, -23.6221565810441, 0.4696727)
    pt3dadd(70.9564440845892, 6.23834080573659, -23.9494802878529, 0.4590306)
    pt3dadd(71.8494788062124, 6.4996588328186, -24.3134430799272, 0.4547738)
    pt3dadd(72.7128827802764, 6.83937380700123, -24.6856946281483, 0.4540643)
    pt3dadd(73.5715898161053, 7.12180766727921, -25.1112075157692, 0.4547738)
    pt3dadd(74.4291456398082, 7.29189627280374, -25.5955757868756, 0.4590306)
    pt3dadd(75.2871126982848, 7.4013801356449, -26.0972917454047, 0.4704532)
    pt3dadd(76.158065261364, 7.48388177827459, -26.5813572287486, 0.4893252)
    pt3dadd(77.0490459959953, 7.5455917828124, -27.0308972978763, 0.5116737)
    pt3dadd(77.9489328936549, 7.63046923764246, -27.4574899932134, 0.5439548)
    pt3dadd(78.8425595297349, 7.83379342037623, -27.8508824443165, 0.5486374)
    pt3dadd(79.7043910289324, 8.19523367385466, -28.2000535371602, 0.5494178)
    pt3dadd(80.5048475616232, 8.66321710937322, -28.5715605334482, 0.5494178)
    pt3dadd(81.2664994935864, 9.16618871090219, -28.9796806772744, 0.5494178)
    pt3dadd(82.0861708431153, 9.64696154320659, -29.2857317671266, 0.5486374)
    pt3dadd(82.9736925555746, 10.0658834576712, -29.4721983459917, 0.5439548)
    pt3dadd(83.9055472096166, 10.3742912470589, -29.6505848074442, 0.5322485)
    pt3dadd(84.8647866400451, 10.5190313768221, -29.8813372456191, 0.51664)
    pt3dadd(85.8269823075163, 10.517142931779, -30.1501758136742, 0.5049337)
    pt3dadd(86.7756808634939, 10.4322296430767, -30.4546049249364, 0.4994707)
    pt3dadd(87.7322644522733, 10.420221782409, -30.7313756460428, 0.4994707)
    pt3dadd(88.6608896307448, 10.7059494243611, -30.9352041425325, 0.5109429)
    pt3dadd(89.5224846866817, 11.1596884004162, -31.1624807701636, 0.5338874)
    pt3dadd(90.3851076698825, 11.6152852562117, -31.3805145518548, 0.5568318)
    pt3dadd(91.2893270407331, 12.0091090519221, -31.5336897118545, 0.5568318)
    pt3dadd(92.2540539705113, 12.2493537800565, -31.5959740704244, 0.5338874)
    pt3dadd(93.2476177505335, 12.3095866505555, -31.5277427928152, 0.5011096)
    pt3dadd(94.2304195679157, 12.3019910404366, -31.3449688504246, 0.4994707)
    pt3dadd(95.2031876723792, 12.2242988834213, -31.1314249950923, 0.4994707)
    pt3dadd(96.1594114590509, 12.0424842751427, -30.9057041890514, 0.4994707)
    pt3dadd(97.0981300635128, 11.8055343954772, -30.6557147524302, 0.4994707)
    pt3dadd(98.0380076767281, 11.566264509396, -30.4124800898525, 0.4994707)
    pt3dadd(98.9885941846646, 11.322896708108, -30.2223324596501, 0.4994707)
    pt3dadd(99.9127785842121, 10.9633510045385, -30.1358639929997, 0.4994707)
    pt3dadd(100.74314619897, 10.4087530929075, -30.1145706802554, 0.4994707)
    pt3dadd(101.573094886322, 9.85230643275874, -30.1331906532718, 0.4994707)
    pt3dadd(102.460211161565, 9.39517473421214, -30.1477868035936, 0.4987612)
    pt3dadd(103.397818540858, 9.0527439597511, -30.1108887915213, 0.4945044)
    pt3dadd(104.354359222123, 8.76550829661309, -30.0623389248048, 0.4838623)
    pt3dadd(105.32635693772, 8.53275879245876, -30.0386335182885, 0.4590306)
    pt3dadd(106.319945381826, 8.43119567806988, -30.0040333576885, 0.4547738)
    pt3dadd(107.317028920369, 8.43610708868222, -29.931623155525, 0.4540643)
    pt3dadd(108.310973804058, 8.4590377134731, -29.8286697879547, 0.4540643)
    pt3dadd(109.301088516598, 8.38378934590898, -29.7274128161102, 0.4540643)
    pt3dadd(110.282991968055, 8.21772702485338, -29.6385098843468, 0.4540643)
    pt3dadd(111.267264361443, 8.05937918214093, -29.5647907147736, 0.4540643)
    pt3dadd(112.260391917404, 7.95105727786604, -29.5361201783408, 0.4540643)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(112.260391917404, 7.95105727786604, -29.5361201783408, 0.4540643)
    pt3dadd(113.252618992709, 7.83059256459499, -29.5584085019419, 0.4540643)
    pt3dadd(114.227896884652, 7.61435128291775, -29.5947917394523, 0.4540643)
    pt3dadd(115.180303089859, 7.31448820916857, -29.6475975361468, 0.4547738)
    pt3dadd(116.117245268535, 6.98125120005599, -29.7518094988568, 0.4590306)
    pt3dadd(117.04072332456, 6.6444978582113, -29.9338776093059, 0.4838623)
    pt3dadd(117.989310939673, 6.45772522446583, -30.1550260538764, 0.4945044)
    pt3dadd(118.959391445157, 6.62705706890611, -30.1095002094615, 0.4994707)
    pt3dadd(119.887682823503, 6.88639948637868, -29.8437080394355, 0.4994707)
    pt3dadd(120.812314072175, 7.1408999364496, -29.5605936422597, 0.4994707)
    pt3dadd(121.752652316812, 7.36217830894463, -29.3041425984392, 0.4994707)
    pt3dadd(122.722916351563, 7.46607924537711, -29.0947701942747, 0.4994707)
    pt3dadd(123.715179201115, 7.40271514742508, -29.0160797270952, 0.4994707)
    pt3dadd(124.698334170168, 7.22586065229925, -29.050343910798, 0.4994707)
    pt3dadd(125.678996142582, 7.03570862092089, -29.0612380234938, 0.4994707)
    pt3dadd(126.669669208658, 6.9938439851207, -28.9677505668542, 0.4994707)
    pt3dadd(127.654485767247, 7.13153262109769, -28.877934002516, 0.4994707)
    pt3dadd(128.647726462668, 7.22341302557444, -28.9105768640389, 0.4994707)
    pt3dadd(129.642634710559, 7.19413115997064, -28.99545017512, 0.4994707)
    pt3dadd(130.624844077285, 7.07359566177674, -29.1313113378663, 0.4994707)
    pt3dadd(131.581241143573, 6.87668506577565, -29.3408762360686, 0.4994707)
    pt3dadd(132.519924138225, 6.65222111369476, -29.6018092573181, 0.4994707)
    pt3dadd(133.466106623357, 6.48116705398043, -29.8739189635597, 0.4994707)
    pt3dadd(134.432474751899, 6.40106476545569, -30.1149007345658, 0.4994707)
    pt3dadd(135.404904804608, 6.29523662485553, -30.3110046092893, 0.4994707)
    pt3dadd(136.302397129938, 5.9422016435887, -30.5460770205097, 0.4994707)
    pt3dadd(137.118786798268, 5.42978058715109, -30.8106405654599, 0.5030926)
    pt3dadd(137.979580729966, 4.96667864274623, -31.0038779927093, 0.5248243)
    pt3dadd(138.944115481021, 4.73718951340695, -31.0613661265661, 0.6317017)
    pt3dadd(139.927781847841, 4.59893153984631, -31.1484541863541, 0.6434081)
    pt3dadd(140.878712720624, 4.34886001670468, -31.3261373960277, 0.6083093)
    pt3dadd(141.834826036975, 4.10983911124005, -31.4923360781699, 0.5693084)
    pt3dadd(142.820551907497, 3.98548907176314, -31.5945897300021, 0.5522593)
    pt3dadd(143.817532137105, 4.0266032925539, -31.6233647258483, 0.5494178)
    pt3dadd(144.794747116136, 4.20110579722941, -31.5297236169562, 0.5494178)
    pt3dadd(145.742681329011, 4.45185987662192, -31.3352505793371, 0.5494178)
    pt3dadd(146.695044862123, 4.7191591950915, -31.1981713694396, 0.5494178)
    pt3dadd(147.674393608404, 4.91362783690335, -31.1886412236813, 0.5522593)
    pt3dadd(148.667329586611, 5.01077935248762, -31.1418395617504, 0.5693084)
    pt3dadd(149.639276528678, 5.16827924055297, -30.9776215496203, 0.6119312)
    pt3dadd(150.585733753228, 5.41342845395573, -30.7691632070243, 0.6667786)
    pt3dadd(151.531759948831, 5.65273658123022, -30.5525290470295, 0.697503)
    pt3dadd(152.498456516201, 5.77667031253304, -30.3382389226426, 0.6848063)
    pt3dadd(153.485943525645, 5.76732289710239, -30.191061325286, 0.6479868)
    pt3dadd(154.483158631422, 5.71033432471252, -30.1951676716645, 0.6063426)
    pt3dadd(155.472903904665, 5.64276716290872, -30.3174496595487, 0.6043596)
    pt3dadd(156.452058318203, 5.53891835007491, -30.491080428643, 0.6043596)
    pt3dadd(157.418264302062, 5.60348096000276, -30.6672053541335, 0.6020112)
    pt3dadd(158.266970647452, 6.100328678475, -30.8306351273744, 0.5526956)
    pt3dadd(159.167265102261, 6.34377276754758, -31.1403310980515, 0.5057283)
    pt3dadd(160.067505947962, 6.14057017657846, -31.4808796868104, 0.4705028)
    pt3dadd(160.904932230285, 5.67064950030559, -31.7444652092914, 0.4564126)
    pt3dadd(161.700247032328, 5.09401479462857, -31.9269503442045, 0.4540643)
    pt3dadd(162.460014468883, 4.4617989607632, -32.0755291612366, 0.4540643)
    pt3dadd(163.181685326884, 3.78881866774229, -32.237667059083, 0.4540643)
  }
  GCL[11] {pt3dclear()
    pt3dadd(-5.37825403329591, -2.49617394610502, -1.97281946680142, 3.150484)
    pt3dadd(-5.11428561832446, -1.34827738423645, -2.02889961643594, 3.150484)
    pt3dadd(-4.58107480432465, -0.539296264351457, -2.20001915477768, 2.864695)
    pt3dadd(-3.88800703537308, 0.109866136918239, -2.51029427857346, 2.7218)
    pt3dadd(-3.27185123667387, 0.812377535880899, -2.85524393715406, 2.603706)
    pt3dadd(-2.69524320102079, 1.58435408823267, -3.09745066228964, 2.367516)
    pt3dadd(-2.09428697028711, 2.37324374341489, -3.09378921353987, 2.249422)
    pt3dadd(-1.54345636770683, 3.20220997310765, -3.03737618590468, 2.249422)
    pt3dadd(-0.900584376686638, 3.88224005086493, -3.24942196118298, 2.151823)
    pt3dadd(-0.193058952890699, 4.47624065813521, -3.61835594107511, 2.151823)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(-0.193058952890699, 4.47624065813521, -3.61835594107511, 2.151823)
    pt3dadd(0.571570857838648, 4.59637154525704, -4.15934848129369, 2.151823)
    pt3dadd(1.28165416108234, 5.15291864220471, -4.49244927290975, 2.151823)
    pt3dadd(1.86524827474772, 5.94684500979628, -4.66268063821338, 2.058459)
    pt3dadd(2.39554213312718, 6.78662076073766, -4.74639757419593, 1.87173)
    pt3dadd(2.94091701068607, 7.62331832896568, -4.72945996765933, 1.778366)
    pt3dadd(3.56462854461643, 8.40156695630111, -4.75385913577635, 1.778366)
    pt3dadd(4.15069205397305, 9.19825085341653, -4.88953333086547, 1.701205)
    pt3dadd(4.69842659619013, 10.0099121670873, -5.08957861114005, 1.469724)
    pt3dadd(5.34117906057271, 10.7570438044727, -5.2111185231311, 1.469724)
    pt3dadd(6.10982552120549, 11.3807910046747, -5.34991962674656, 1.546884)
    pt3dadd(6.78741847987157, 12.0915023811968, -5.50816120125026, 1.701205)
    pt3dadd(7.45141127129094, 12.8296141290391, -5.61244483973111, 1.778366)
    pt3dadd(8.1543604964028, 13.5359097668237, -5.69523593713145, 1.701205)
    pt3dadd(8.84112574102506, 14.2487464408875, -5.82497150755596, 1.546884)
    pt3dadd(9.51961501207217, 14.9471543107346, -6.04174122837957, 1.405955)
    pt3dadd(10.2745227749832, 15.4792843650879, -6.38175253136512, 1.342186)
    pt3dadd(11.1034896209468, 15.800134440656, -6.8398301344807, 1.405955)
    pt3dadd(11.9538843602276, 16.200145905612, -7.15213497868414, 1.469724)
    pt3dadd(12.8642334067742, 16.5548407457192, -7.34255333386927, 1.405955)
    pt3dadd(13.8204344841731, 16.7439549448242, -7.54562220202885, 1.278417)
    pt3dadd(14.789315732579, 16.8480151268638, -7.77020176305676, 1.194677)
    pt3dadd(15.729666625138, 16.8417080514673, -8.08409883498621, 1.034827)
    pt3dadd(16.4881186196973, 17.2941031799546, -8.49540993649389, 1.123474)
    pt3dadd(17.0271969588216, 18.0785748693431, -8.79100575647436, 1.142726)
    pt3dadd(17.8497804634377, 18.5427209310388, -9.07037980832437, 1.025023)
    pt3dadd(18.7733988219404, 18.6337717893535, -9.43716419336382, 1.096588)
    pt3dadd(19.5873937995052, 18.9951414935657, -9.84621295332558, 1.00164)
    pt3dadd(20.2978627685791, 19.5691724774153, -10.2084843349616, 1.022444)
    pt3dadd(21.1486352227674, 19.5261475426077, -10.7136923229505, 1.11115)
    pt3dadd(22.0744268479339, 19.7606381674274, -10.9529109892507, 1.094385)
    pt3dadd(22.9707016914181, 20.1363425720238, -11.1788715526751, 1.319451)
    pt3dadd(23.6663580350632, 20.7982552168115, -11.4293551596569, 1.334432)
    pt3dadd(24.3867097971084, 21.4126242939446, -11.7137208688124, 1.187232)
    pt3dadd(25.3375090643931, 21.6086549142192, -11.9220492576084, 1.309084)
    pt3dadd(26.2778338175527, 21.9000948821223, -11.8749137744774, 1.358009)
    pt3dadd(27.1185971663682, 22.3493116718209, -11.5853712949516, 1.342952)
    pt3dadd(28.0518746660441, 22.6007571692889, -11.3400289692728, 1.37757)
    pt3dadd(28.7109455831936, 23.3163579727838, -11.1716314701723, 1.326838)
    pt3dadd(29.5337445943119, 23.8522060465716, -11.0629005019756, 1.328493)
    pt3dadd(30.4709844402626, 24.1900420659331, -11.0037538054927, 1.339603)
    pt3dadd(31.4622552618842, 24.2739137824646, -11.0841055022493, 1.315537)
    pt3dadd(32.4517836877112, 24.3757767303887, -11.178688852126, 1.016489)
    pt3dadd(33.4425423350799, 24.4878389854059, -11.2537019176977, 0.9493003)
    pt3dadd(34.4277062505061, 24.6253958177769, -11.3552272385842, 1.209792)
    pt3dadd(35.3551866890844, 24.9092681043134, -11.56281202072, 1.286426)
    pt3dadd(36.1700350909565, 25.4464164300847, -11.7656805610645, 0.9890676)
    pt3dadd(37.1344059172343, 25.5959933882711, -11.9037637948252, 0.9156364)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(37.1344059172343, 25.5959933882711, -11.9037637948252, 1.241724)
    pt3dadd(38.1241149084858, 25.472670265662, -11.9675270563043, 1.241724)
    pt3dadd(39.1072759104529, 25.4072121445845, -12.1075970718817, 1.444256)
    pt3dadd(40.0188951992307, 25.758083123668, -12.2696661730316, 1.50973)
    pt3dadd(40.9037535613615, 26.1670966025267, -12.4824611922369, 1.404371)
    pt3dadd(41.8555939855431, 26.3947252541255, -12.6765905148333, 1.259606)
    pt3dadd(42.8168027001211, 26.6226928413095, -12.8207331004237, 1.097059)
    pt3dadd(43.757900561952, 26.8776213124961, -13.0337436484841, 1.224706)
    pt3dadd(44.7052129639617, 27.0710156023967, -13.2860231071044, 1.432981)
    pt3dadd(45.617026085088, 27.4090922096554, -13.5177578339092, 1.49826)
    pt3dadd(46.5083127059529, 27.7981132666876, -13.7442371082635, 1.439881)
    pt3dadd(47.3558873986346, 28.316587982517, -13.852685067058, 1.262282)
    pt3dadd(48.2425915854747, 28.7737238964417, -13.8456311668255, 1.122383)
    pt3dadd(49.1321337161825, 29.2141083465851, -13.7263488918396, 1.078839)
    pt3dadd(50.072666264573, 29.5441166280834, -13.7047114325073, 0.9398827)
    pt3dadd(51.0585104714722, 29.6925583429795, -13.7585322914012, 0.9223328)
    pt3dadd(52.0535400005327, 29.7399307278123, -13.8301789099172, 1.158404)
    pt3dadd(53.0363044235614, 29.8713644583598, -13.7177816273839, 1.450174)
    pt3dadd(54.0224007704132, 30.0123234259835, -13.6719805116976, 1.420897)
    pt3dadd(55.0181273944693, 30.0532525450488, -13.7507062032734, 1.447809)
    pt3dadd(56.0031186017375, 30.1680056978316, -13.8753072472419, 1.51397)
    pt3dadd(56.9136739521976, 30.5146822582369, -14.0325043438138, 1.243786)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(56.9136739521976, 30.5146822582369, -14.0325043438138, 0.9539875)
    pt3dadd(57.7815333728027, 30.9743960433357, -13.8511821020416, 0.9539875)
    pt3dadd(58.7557201421394, 31.1281775198964, -13.7133440332639, 0.6632653)
    pt3dadd(59.7478917104242, 31.1595348672326, -13.5992444938101, 0.6439223)
    pt3dadd(60.7397283943675, 31.2466290359687, -13.6275346605918, 0.6300645)
    pt3dadd(61.71593073271, 31.3824727072485, -13.792523115301, 0.6115875)
    pt3dadd(62.6961434610652, 31.528567026956, -13.9248376119303, 0.5921867)
    pt3dadd(63.6797967910549, 31.6744654394863, -14.0287552688465, 0.5912629)
    pt3dadd(64.6472791278209, 31.8734291303008, -14.1754776620896, 0.590423)
    pt3dadd(65.5795613009577, 32.1863629554355, -14.3482104882889, 0.5853838)
    pt3dadd(66.4922456193651, 32.551056961576, -14.5324567695547, 0.5727859)
    pt3dadd(67.4241468558851, 32.8396824423904, -14.7474053458791, 0.5559887)
    pt3dadd(68.3871384712805, 33.0304550038623, -14.9336104484392, 0.5383515)
    pt3dadd(69.3594573447847, 33.2476888219885, -15.0153665140151, 0.5375117)
    pt3dadd(70.3253875099883, 33.4843222088456, -15.1072631560091, 0.5375117)
    pt3dadd(71.2729510637201, 33.6900966479161, -15.3410627907552, 0.5375117)
    pt3dadd(72.1925502754441, 33.9000083622065, -15.6722207982249, 0.5375117)
    pt3dadd(73.119250137579, 34.1050380012897, -15.9861928666636, 0.5321671)
    pt3dadd(74.0726712432413, 34.2810570676688, -16.2293485539236, 0.5207145)
    pt3dadd(75.0362243324166, 34.4604345684205, -16.4277610125458, 0.5054442)
    pt3dadd(75.9912739532129, 34.6503861470748, -16.6539463195101, 0.4939916)
    pt3dadd(76.9320869735866, 34.8595921215293, -16.9200215323907, 0.4894105)
    pt3dadd(77.8711509798643, 35.0695067797663, -17.1922039208152, 0.488647)
    pt3dadd(78.8227644389864, 35.266420590239, -17.4267425887481, 0.488647)
    pt3dadd(79.7802431350057, 35.5093045323769, -17.5807600093831, 0.488647)
    pt3dadd(80.7454792158912, 35.7278123461668, -17.7098555570994, 0.488647)
    pt3dadd(81.7215907718381, 35.7550717291903, -17.890796373016, 0.488647)
    pt3dadd(82.679788613948, 35.568082400652, -18.0914069711379, 0.4902503)
    pt3dadd(83.6331464349121, 35.293349117143, -18.2038326955571, 0.5239212)
    pt3dadd(84.6059739542882, 35.2957936146476, -18.0279293778013, 0.5555524)
    pt3dadd(85.5057196226545, 35.587845894176, -17.7171802261893, 0.5770075)
    pt3dadd(86.1550998712776, 36.1937580308601, -17.2860737258049, 0.5633412)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(86.1550998712776, 36.1937580308601, -17.2860737258049, 0.6041306)
    pt3dadd(86.7375754414295, 35.9037042471306, -17.5262225247048, 0.6041306)
    pt3dadd(87.3961524266409, 35.3187817402666, -17.9990068060934, 0.5808224)
    pt3dadd(88.1264459755965, 34.8131980449886, -18.4510569688187, 0.5662547)
    pt3dadd(89.0027920027522, 34.5414304905732, -18.7957418498023, 0.5633412)
    pt3dadd(89.9724473003572, 34.6568616061619, -18.901260304637, 0.5633412)
    pt3dadd(90.9196829863249, 34.9708356402716, -18.8619609228438, 0.5633412)
    pt3dadd(91.8722730558117, 35.2707313510903, -18.8788207387514, 0.5633412)
    pt3dadd(92.8445500135018, 35.4659451308749, -19.0007614500041, 0.5633412)
    pt3dadd(93.8283965185599, 35.591325955203, -19.1264231731045, 0.5633412)
    pt3dadd(94.8207135021104, 35.6459724370167, -19.2312527990223, 0.5633412)
    pt3dadd(95.8089832130135, 35.5445852649057, -19.3368516135832, 0.5633412)
    pt3dadd(96.8015750010262, 35.4901136860797, -19.3820737207628, 0.5633412)
    pt3dadd(97.7802180572551, 35.6714439452903, -19.3723871700451, 0.5633412)
    pt3dadd(98.7433690253515, 35.9380955934721, -19.3382508799392, 0.5633412)
    pt3dadd(99.7348459230926, 36.0380134205759, -19.3291564684308, 0.5633412)
    pt3dadd(100.722067001286, 35.9255721149479, -19.4372810052108, 0.562541)
  }
}
proc shape3d_13() {
  adendMML[12] {
    pt3dadd(101.702698647018, 35.8120422924838, -19.593181641878, 0.5577398)
    pt3dadd(102.693756172658, 35.8006116667673, -19.7112601508762, 0.5457368)
    pt3dadd(103.67778565142, 35.94913594447, -19.7791728018266, 0.5297328)
    pt3dadd(104.626212407151, 36.2564636442977, -19.8429192521867, 0.5129285)
    pt3dadd(105.559019118279, 36.5896785736797, -19.9741226118576, 0.5121284)
    pt3dadd(106.505006957366, 36.8237257940552, -20.1917309142491, 0.5121284)
    pt3dadd(107.457148444847, 36.9439655368532, -20.468947661616, 0.5121284)
    pt3dadd(108.407928424704, 36.9759529858102, -20.7754566662487, 0.5158421)
    pt3dadd(109.358965181396, 36.971044646423, -21.0842524712312, 0.535211)
    pt3dadd(110.317883876336, 37.0173381814277, -21.3601580573891, 0.5726355)
    pt3dadd(111.287859996995, 37.0741814458788, -21.5952170796176, 0.598406)
    pt3dadd(112.239515186212, 36.9117087117021, -21.8394624942625, 0.5464137)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(112.239515186212, 36.9117087117021, -21.8394624942625, 0.5206432)
    pt3dadd(113.132281679203, 36.5689834041303, -22.13141787591, 0.5206432)
    pt3dadd(114.019659227332, 36.2356659678134, -22.4485739556666, 0.5129285)
    pt3dadd(114.93722181575, 35.9638954824512, -22.7347014118354, 0.5121284)
    pt3dadd(115.892420173941, 35.760359953231, -22.9426055008866, 0.5121284)
    pt3dadd(116.876268393336, 35.6362616651821, -23.0635922216108, 0.5121284)
    pt3dadd(117.872856457201, 35.5843198919395, -23.1217053863847, 0.5121284)
    pt3dadd(118.872422437552, 35.5658793073312, -23.1385447223749, 0.5121284)
    pt3dadd(119.872359468462, 35.5569392336198, -23.1410450955284, 0.5121284)
    pt3dadd(120.870356780412, 35.5399671010323, -23.1851078688044, 0.5121284)
    pt3dadd(121.855848868444, 35.4831599885614, -23.3293812448671, 0.5121284)
    pt3dadd(122.815893670408, 35.376826527055, -23.5826821622386, 0.5121284)
    pt3dadd(123.75350145092, 35.2526901260705, -23.906692577601, 0.5121284)
    pt3dadd(124.684545831943, 35.1664651215889, -24.258504627359, 0.5121284)
    pt3dadd(125.624456653357, 35.1932431738812, -24.5940219084358, 0.5121284)
    pt3dadd(126.575661971267, 35.319434578741, -24.8742766177935, 0.5121284)
    pt3dadd(127.543896972834, 35.3673952209026, -25.1034521368588, 0.5121284)
    pt3dadd(128.510813697314, 35.2400709428534, -25.3119974932061, 0.5121284)
    pt3dadd(129.455618175618, 35.0063254764561, -25.5392011959124, 0.5121284)
    pt3dadd(130.379321313785, 34.7485892758302, -25.8205661437352, 0.5121284)
    pt3dadd(131.289548842748, 34.522512145093, -26.1654223625787, 0.5121284)
    pt3dadd(132.227475022884, 34.5107010783342, -26.4744164883737, 0.5121284)
    pt3dadd(133.166435864789, 34.8439537127953, -26.5301267151558, 0.5121284)
    pt3dadd(134.090993758893, 35.2248640858741, -26.5248898289365, 0.5114009)
    pt3dadd(134.999337432022, 35.6363089903057, -26.5893440681385, 0.5070361)
    pt3dadd(135.882858733437, 36.0779147204844, -26.7435767901862, 0.4815753)
    pt3dadd(136.766831551783, 36.5210828224824, -26.8904676728083, 0.4706634)
    pt3dadd(137.642493323419, 36.9958403448512, -26.9571460951172, 0.4662987)
    pt3dadd(138.418003295737, 37.6194906131419, -26.9654630974964, 0.4655712)
    pt3dadd(139.258363507504, 37.5313275068721, -27.2548621531233, 0.4655712)
    pt3dadd(140.115425288478, 37.1237986611564, -27.5592426857852, 0.4655712)
    pt3dadd(141.052557775181, 36.8475708915873, -27.7615793122387, 0.4655712)
    pt3dadd(142.012197773293, 36.5895658894894, -27.8718343984054, 0.4655712)
    pt3dadd(142.984010760409, 36.3950399640405, -27.9899890234126, 0.4655712)
    pt3dadd(143.97129469231, 36.3663563079357, -28.1277840794505, 0.4655712)
    pt3dadd(144.959046451098, 36.5001335074883, -28.1745719572607, 0.4655712)
    pt3dadd(145.9441788424, 36.6507964702208, -28.1125036431013, 0.4655712)
    pt3dadd(146.936034660836, 36.6197026544085, -28.1265328566901, 0.4655712)
    pt3dadd(147.888697804408, 36.360378903963, -28.2503227994351, 0.4679791)
    pt3dadd(148.783091344683, 35.9550654345105, -28.4300458009434, 0.4824263)
    pt3dadd(149.621534887439, 35.4705729799565, -28.672875250426, 0.5185445)
    pt3dadd(150.411374271808, 34.938010079612, -28.9738305441781, 0.5667021)
    pt3dadd(151.174185016087, 34.3792397989684, -29.2991194856019, 0.60194)
    pt3dadd(151.938710043842, 33.8141586050974, -29.6092561107672, 0.60194)
    pt3dadd(152.771455345516, 33.3107117893444, -29.8394323179454, 0.6111059)
    pt3dadd(153.657505929708, 32.885866098866, -30.0189525109327, 0.6003104)
    pt3dadd(154.555359911793, 32.4883511235218, -30.2076709975543, 0.5827061)
    pt3dadd(155.438092759059, 32.0781103440035, -30.4336074888903, 0.5687026)
    pt3dadd(156.299060080681, 31.6433646522419, -30.6970943303261, 0.55862)
    pt3dadd(157.148901062712, 31.198642359995, -30.9798221662541, 0.5457368)
    pt3dadd(158.005650278058, 30.7731070599554, -31.2708075824009, 0.5323814)
    pt3dadd(158.866426912058, 30.3773162845353, -31.5901141906007, 0.5362704)
    pt3dadd(159.734554560668, 30.0240251561866, -31.9375648676068, 0.5711992)
    pt3dadd(160.622994247215, 29.7326852986496, -32.2904540504545, 0.6233723)
    pt3dadd(161.531871432627, 29.5038086431728, -32.6377805080555, 0.6631023)
    pt3dadd(162.457563682181, 29.3459634470162, -32.9787319520353, 0.6789942)
    pt3dadd(163.390827934302, 29.3708228867193, -33.3195524882776, 0.6816429)
    pt3dadd(164.224616835191, 29.7378971838535, -33.7220910154899, 0.6816429)
    pt3dadd(165.025017608893, 30.1017458544864, -34.195100427301, 0.6816429)
    pt3dadd(165.883099778547, 30.3541181024669, -34.6394947466976, 0.6816429)
    pt3dadd(166.64992948946, 30.8100124070615, -35.059048389129, 0.6816429)
    pt3dadd(167.108845794879, 31.557207237127, -35.5180919034413, 0.6816429)
    pt3dadd(167.356926158524, 32.4228883701605, -35.9493604443199, 0.6816429)
    pt3dadd(167.556085106788, 33.3154929620021, -36.3523498640808, 0.6816429)
    pt3dadd(167.875350814055, 34.128219549268, -36.8261031676308, 0.6816429)
    pt3dadd(168.365321397667, 34.7812401798133, -37.3953238633423, 0.6789942)
    pt3dadd(168.935593122617, 35.3322228751027, -38.003666588739, 0.6631023)
    pt3dadd(169.545666350106, 35.8585594671445, -38.5957713149867, 0.6233723)
    pt3dadd(170.240570968787, 36.3761384776383, -39.0934756497523, 0.5121284)
    pt3dadd(170.993585194152, 36.8828996089887, -39.5131930929811, 0.5121284)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(86.1550998712776, 36.1937580308601, -17.2860737258049, 0.5633412)
    pt3dadd(86.7395268198344, 36.8326375862378, -16.7924923686148, 0.5633412)
    pt3dadd(87.5324626538294, 37.3064653185615, -16.4202676905445, 0.562541)
    pt3dadd(88.42516155847, 37.6093976255022, -16.0915212584019, 0.5577398)
    pt3dadd(89.3282605388904, 37.8306330885819, -15.7237385771462, 0.5457368)
    pt3dadd(90.2442402218574, 38.0736826144032, -15.408787106403, 0.5297328)
    pt3dadd(91.1756768707155, 38.3801983052953, -15.2197687389936, 0.5170023)
    pt3dadd(92.1024438941009, 38.7385385048482, -15.1102865709937, 0.4961243)
    pt3dadd(92.9878254847742, 39.192305286512, -15.0247758568364, 0.4831029)
    pt3dadd(93.8039241612248, 39.7624895868938, -14.9382559177124, 0.4805568)
    pt3dadd(94.6093567174266, 40.3506868786696, -14.8718871953842, 0.4943057)
    pt3dadd(95.4464968433742, 40.8967251909907, -14.8528039456408, 0.5121284)
    pt3dadd(96.2352907693122, 41.5023737398555, -14.78234521207, 0.5279651)
    pt3dadd(96.8583306722393, 42.23788964578, -14.5358396412114, 0.5498978)
    pt3dadd(97.3679367741994, 43.0065327056773, -14.1521075722691, 0.5827061)
    pt3dadd(97.9704619818252, 43.6459057960712, -13.6853550656507, 0.6099457)
    pt3dadd(98.7277547608801, 44.0934927083966, -13.2127138428381, 0.650175)
    pt3dadd(99.420493486581, 44.6752109314702, -12.8025871352366, 0.6594613)
    pt3dadd(100.011054449304, 45.4042283499363, -12.4591136186717, 0.6440135)
    pt3dadd(100.636461107249, 46.0807798478549, -12.0755364542054, 0.5876529)
    pt3dadd(101.367922456751, 46.558787097952, -11.5953618365806, 0.5878642)
    pt3dadd(102.195223954974, 46.881711538745, -11.141089380867, 0.614086)
    pt3dadd(103.083700351367, 47.1396396889051, -10.7631702856282, 0.6409767)
    pt3dadd(103.975480626046, 47.4276461170816, -10.415247617728, 0.6440135)
    pt3dadd(104.821414424613, 47.8163292551649, -10.0528475903299, 0.6217086)
    pt3dadd(105.680668334943, 48.2154138834992, -9.75281835893743, 0.6196753)
    pt3dadd(106.661401316495, 48.2647412641817, -9.70804594272714, 0.6071849)
    pt3dadd(107.655633087362, 48.1749048387311, -9.71113837393979, 0.5776138)
    pt3dadd(108.642640059325, 48.2238532540051, -9.58015411053112, 0.5330936)
    pt3dadd(109.592286031914, 48.387435604383, -9.31529764476985, 0.489199)
    pt3dadd(110.543422895375, 48.5272900045634, -9.04479723980041, 0.519272)
    pt3dadd(111.525112738776, 48.5884943439733, -8.87020147754736, 0.5642942)
    pt3dadd(112.510409126952, 48.6481865443873, -8.71266376116215, 0.5859651)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(112.510409126952, 48.6481865443873, -8.71266376116215, 0.5185445)
    pt3dadd(113.476418894783, 48.7384495529094, -8.47270815491069, 0.5185445)
    pt3dadd(114.446514582572, 48.7617503136203, -8.23241203116212, 0.4824263)
    pt3dadd(115.422036426704, 48.7845307462102, -8.01630108961866, 0.4679791)
    pt3dadd(116.390197848068, 48.8810876062122, -7.78719015485798, 0.4655712)
    pt3dadd(117.362942814196, 48.9595288502415, -7.57005470019118, 0.4655712)
    pt3dadd(118.340783425187, 48.9811023576313, -7.36341777355079, 0.4655712)
    pt3dadd(119.301426959998, 49.0764865970942, -7.10717339716887, 0.4655712)
    pt3dadd(120.248542733599, 49.2515330486839, -6.839390795568, 0.4655712)
    pt3dadd(121.216558254557, 49.4113259045356, -6.65776163374377, 0.4655712)
    pt3dadd(122.208908857679, 49.4948138268597, -6.59390699271425, 0.4670989)
    pt3dadd(123.208081535407, 49.5134575089126, -6.60661383645822, 0.4762648)
    pt3dadd(124.207204525279, 49.5401583085334, -6.63625059278502, 0.4991797)
    pt3dadd(125.192403044972, 49.6904736174771, -6.58058034575013, 0.5526476)
    pt3dadd(126.143982353285, 49.9441351129422, -6.41010194267237, 0.5602859)
    pt3dadd(127.077917982372, 50.233617282979, -6.2006021284439, 0.5526476)
    pt3dadd(128.010473726995, 50.540230027025, -6.01075703446372, 0.5297328)
    pt3dadd(128.944036002394, 50.8637249868312, -5.85729979084102, 0.4762648)
    pt3dadd(129.873683460071, 51.223537697477, -5.78777909457297, 0.4670989)
    pt3dadd(130.797389236554, 51.6063176840736, -5.77456472179992, 0.4655712)
    pt3dadd(131.728695592668, 51.9319691047883, -5.63319633294283, 0.4655712)
    pt3dadd(132.646385740923, 52.1258746891016, -5.29573332266011, 0.4670989)
    pt3dadd(133.554611098699, 52.1679460175819, -4.88479057945455, 0.4762648)
    pt3dadd(134.465403965361, 52.0941274183969, -4.4801510201372, 0.4991797)
    pt3dadd(135.365234156716, 52.0332056771494, -4.04911872485404, 0.5289326)
    pt3dadd(136.245751840284, 52.0954269292643, -3.58079053953128, 0.5442091)
    pt3dadd(137.136398617236, 52.2360886183236, -3.14933486673914, 0.5297328)
    pt3dadd(138.061798178295, 52.3362752090937, -2.78787069736573, 0.5177298)
    pt3dadd(139.010186618969, 52.3148158533517, -2.47777361454018, 0.5129285)
    pt3dadd(139.959839557677, 52.1773022945021, -2.19937535656739, 0.5121284)
    pt3dadd(140.902795236265, 51.9734872853874, -1.93689684827153, 0.5121284)
    pt3dadd(141.828111490667, 51.7372413544985, -1.64114526074724, 0.5121284)
    pt3dadd(142.738400266298, 51.5638078804906, -1.26993721562135, 0.5238913)
    pt3dadd(143.664171725276, 51.5832282406032, -0.901606987361756, 0.5474172)
    pt3dadd(144.60334188553, 51.7350587945976, -0.595343483462282, 0.5709431)
    pt3dadd(145.565244718224, 51.8514157585811, -0.353778989989829, 0.5709431)
    pt3dadd(146.55088144508, 51.887274033436, -0.194322089510232, 0.5474172)
    pt3dadd(147.54756661851, 51.9140108869507, -0.123640667867591, 0.5138088)
    pt3dadd(148.5444586935, 51.8583872595513, -0.108998299609523, 0.5121284)
    pt3dadd(149.537763050966, 51.7441170982573, -0.118162128886114, 0.5121284)
    pt3dadd(150.532287416183, 51.7489573577598, -0.0688520809951623, 0.5138088)
    pt3dadd(151.498823820314, 51.9271690467043, 0.0978836399277565, 0.5238913)
    pt3dadd(152.435303803999, 52.1956682378421, 0.322041051471015, 0.5827061)
    pt3dadd(153.367860274473, 52.5198232882969, 0.473103035989158, 0.6079124)
    pt3dadd(154.292836786608, 52.8953208642694, 0.478157943818104, 0.6179949)
    pt3dadd(155.228548485185, 53.2415176819033, 0.427072738230109, 0.6196753)
    pt3dadd(156.097923085024, 53.6575809555231, 0.624275212159418, 0.6196753)
    pt3dadd(156.678732985479, 54.209894488766, 1.21778909405077, 0.6196753)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(56.9136739521976, 30.5146822582369, -14.0325043438138, 0.7876154)
    pt3dadd(57.4958762699664, 31.2181315476459, -14.4294532406001, 0.7876154)
    pt3dadd(58.1852837119915, 31.7264433730703, -14.9438893488662, 0.7120816)
    pt3dadd(58.8726050212533, 32.2098573787701, -15.4854476982793, 0.699581)
    pt3dadd(59.413688325234, 32.9406634933216, -15.8782895421551, 0.699581)
    pt3dadd(59.9332498531578, 33.7380725752292, -16.1771324778665, 0.699581)
    pt3dadd(60.6357953084736, 34.3620024934523, -16.5153286287153, 0.6985873)
    pt3dadd(61.3979623139375, 34.9613181987433, -16.7482853132049, 0.6926249)
    pt3dadd(62.148149890355, 35.6133594600687, -16.8477027773099, 0.6777191)
    pt3dadd(62.8881900324024, 36.2652959379381, -17.0035623976138, 0.6429389)
    pt3dadd(63.5664992469461, 36.9166901226449, -17.3408915898764, 0.6369765)
    pt3dadd(64.1791173973984, 37.6443842054662, -17.6399857116489, 0.6359828)
    pt3dadd(64.7928395707312, 38.4200601072951, -17.7652050689209, 0.6359828)
    pt3dadd(65.4388135133576, 39.1821733765539, -17.7503998640631, 0.6359828)
    pt3dadd(66.1203087902291, 39.9098178844744, -17.6776964375649, 0.6296591)
    pt3dadd(66.880265805461, 40.5524893581353, -17.6133006255535, 0.6161083)
    pt3dadd(67.7408656156724, 41.0537908369467, -17.560948556423, 0.5980406)
    pt3dadd(68.649853915765, 41.4682501600609, -17.5237229188125, 0.5844898)
    pt3dadd(69.5406343447012, 41.9214016204904, -17.5251500769752, 0.5809666)
    pt3dadd(70.3469362182698, 42.5103181151929, -17.5528062549216, 0.6199025)
    pt3dadd(71.1024146838196, 43.1591490950594, -17.6280933309024, 0.6578447)
    pt3dadd(71.8726567903984, 43.7535809012741, -17.8461980018536, 0.6863012)
    pt3dadd(72.6380965116509, 44.3204062071837, -18.150426939423, 0.6949655)
    pt3dadd(73.3675065320752, 44.9563798514273, -18.3985774794274, 0.6397769)
    pt3dadd(74.0622179234912, 45.6543755747816, -18.5722165473788, 0.5854096)
    pt3dadd(74.7714220916403, 46.330896570289, -18.7683060461571, 0.5446341)
    pt3dadd(75.5306991186363, 46.9274364726538, -19.021703127208, 0.5283239)
    pt3dadd(76.3809775506031, 47.3448482504025, -19.3371795217076, 0.5273302)
    pt3dadd(77.2530170469912, 47.7274852259592, -19.6408045465213, 0.5376781)
    pt3dadd(78.1292074825685, 48.1540985095673, -19.8603319595355, 0.5656345)
    pt3dadd(79.0407784761804, 48.5602720288279, -19.9113748807693, 0.6660088)
    pt3dadd(79.9576513210643, 48.9583487706315, -19.9383375885604, 0.6952242)
    pt3dadd(80.8539909292652, 49.3907104536805, -20.0322390985685, 0.6710792)
    pt3dadd(81.6709769062874, 49.9311724640696, -20.2251344097327, 0.5522857)
    pt3dadd(82.3892535631937, 50.591246768756, -20.4426018140741, 0.529417)
    pt3dadd(83.1122986850062, 51.2539364565444, -20.6315425077877, 0.5256055)
    pt3dadd(83.9242377046085, 51.8086551058101, -20.8005550959624, 0.529417)
    pt3dadd(84.7995193923908, 52.2703267324109, -20.9398597527319, 0.5522857)
    pt3dadd(85.6898160039039, 52.7110850806906, -21.054113614251, 0.6073709)
    pt3dadd(86.5108994258128, 53.2583947291762, -21.1934656458924, 0.6969488)
    pt3dadd(87.1437726420103, 54.0091728527778, -21.3476356569453, 0.6771778)
    pt3dadd(87.6674186990024, 54.8525226606543, -21.4663874208681, 0.6434454)
    pt3dadd(88.3522462548737, 55.5694163869945, -21.5321317866366, 0.6124462)
    pt3dadd(89.2308849207416, 56.0441456303623, -21.541823098668, 0.5499969)
    pt3dadd(90.1456533298667, 56.447423605556, -21.5584903663229, 0.5322577)
    pt3dadd(91.0559712551548, 56.8568173638732, -21.6165727787173, 0.5264267)
    pt3dadd(91.9567017286354, 57.2797885501194, -21.7135940918944, 0.5256054)
    pt3dadd(92.8380109077171, 57.7228156881867, -21.8730277044182, 0.5256054)
    pt3dadd(93.6773483822009, 58.2011778270246, -22.1266712655641, 0.5256054)
    pt3dadd(94.4523382937649, 58.7472167783902, -22.4425547885988, 0.5256054)
    pt3dadd(95.133521515948, 59.4111584898436, -22.7490956596847, 0.5283238)
    pt3dadd(95.7927275559999, 60.1059988985208, -23.0341017553209, 0.544634)
    pt3dadd(96.5342094025797, 60.7095706840033, -23.3189416928769, 0.5854095)
    pt3dadd(97.3502192702193, 61.2180869962535, -23.590914786035, 0.6378797)
    pt3dadd(98.1946029111437, 61.6908905983669, -23.8425597341521, 0.6672726)
    pt3dadd(99.0412095947518, 62.1604877697536, -24.0930263276562, 0.6551262)
    pt3dadd(99.8703529380161, 62.6507320906714, -24.3609640572997, 0.5914458)
    pt3dadd(100.652960353639, 63.2156079096101, -24.6177571039785, 0.5800631)
    pt3dadd(101.387018368679, 63.8686741421541, -24.7967227078182, 0.578166)
    pt3dadd(102.162463364273, 64.4922533531521, -24.8504566342558, 0.578166)
    pt3dadd(103.037466086762, 64.965411106907, -24.7873606351497, 0.578166)
    pt3dadd(103.959177626357, 65.3446651780259, -24.7375935021247, 0.578166)
    pt3dadd(104.847494652354, 65.7791143698639, -24.8715417016257, 0.578166)
    pt3dadd(105.726374073264, 66.2251746975991, -25.0399421532463, 0.578166)
    pt3dadd(106.612910934316, 66.664208564163, -25.1856828910083, 0.578166)
    pt3dadd(107.480651531254, 67.1182312089834, -25.382051479105, 0.578166)
    pt3dadd(108.30574054187, 67.5984592808523, -25.6760434376331, 0.578166)
    pt3dadd(109.116000209892, 68.0863455094969, -26.0007650349449, 0.578166)
    pt3dadd(109.959688943594, 68.557311181636, -26.2569723079962, 0.578166)
    pt3dadd(110.813698250633, 69.0218463548322, -26.4893594652087, 0.578166)
    pt3dadd(111.630061636563, 69.506440563859, -26.8011234297568, 0.578166)
    pt3dadd(112.419988757735, 70.0021387514705, -27.1620353359972, 0.578166)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(112.419988757735, 70.0021387514705, -27.1620353359972, 0.578166)
    pt3dadd(113.229481562514, 70.4898823967556, -27.4871552523779, 0.578166)
    pt3dadd(114.059982671731, 70.9683373301579, -27.772191168565, 0.578166)
    pt3dadd(114.893336386899, 71.4453641315833, -28.0514153696155, 0.5811562)
    pt3dadd(115.741686950142, 71.9137682679205, -28.2976216671065, 0.595286)
    pt3dadd(116.609039074561, 72.3773947642034, -28.4774128901061, 0.6199024)
    pt3dadd(117.447798399918, 72.9032038175331, -28.6107323036167, 0.5885262)
    pt3dadd(118.212586122493, 73.5350401973596, -28.7302869557373, 0.5492955)
    pt3dadd(118.956500613888, 74.1857008743495, -28.8784497965259, 0.5294169)
    pt3dadd(119.754233103739, 74.7501915559513, -29.0826723707702, 0.5256054)
    pt3dadd(120.58399955559, 75.244801969879, -29.3398383019599, 0.5256054)
    pt3dadd(121.411882474976, 75.7252583088133, -29.6291622004937, 0.5256054)
    pt3dadd(122.225178150758, 76.21155445913, -29.9475433879928, 0.5256054)
    pt3dadd(122.983755892451, 76.7153525553282, -30.3555331887507, 0.5256054)
  }
}
proc shape3d_14() {
  adendOML[7] {
    pt3dadd(123.637901589656, 77.2364577604429, -30.8989589350513, 0.5256054)
    pt3dadd(124.198024457162, 77.7614862410972, -31.5385451030097, 0.5256054)
    pt3dadd(124.727152447808, 78.2923080390637, -32.2005154439476, 0.5256054)
    pt3dadd(125.280018354749, 78.871078014076, -32.7980229866524, 0.5256054)
    pt3dadd(125.856615738195, 79.5955647024227, -33.1648365290099, 0.5256054)
    pt3dadd(126.48272677274, 80.3165772208775, -33.456284987508, 0.5256054)
    pt3dadd(127.197685828804, 80.886207014962, -33.8599471539612, 0.5256054)
    pt3dadd(127.915456721841, 81.4073096043147, -34.3208292391946, 0.5256054)
    pt3dadd(128.585430815682, 81.9278403456823, -34.8482568796281, 0.5256054)
    pt3dadd(129.190168465668, 82.4527068125513, -35.4459715977045, 0.5283238)
    pt3dadd(129.749651178335, 82.9780331947513, -36.0868120403369, 0.544634)
    pt3dadd(130.322046466372, 83.5111497788487, -36.709410231915, 0.5826911)
    pt3dadd(130.955393947606, 84.0888033416726, -37.2218716709799, 0.6207483)
    pt3dadd(131.544763231248, 84.7967545254109, -37.6041302501142, 0.5826911)
    pt3dadd(131.947852631607, 85.6096031089002, -38.0151639851385, 0.544634)
    pt3dadd(132.214415363827, 86.4433779400819, -38.4970082280936, 0.5300484)
    pt3dadd(132.489556763433, 87.2720351360868, -38.9841156331242, 0.5376779)
    pt3dadd(132.968926739497, 88.0436054510557, -39.3906771478154, 0.5955693)
    pt3dadd(133.663230552337, 88.6776768522024, -39.720215523793, 0.6066114)
    pt3dadd(134.458372729258, 89.2022625430321, -40.022252003192, 0.5823619)
    pt3dadd(135.287897685547, 89.6844813679887, -40.3031922998924, 0.5494892)
    pt3dadd(136.145718167601, 90.146309323325, -40.5260479160809, 0.5494892)
    pt3dadd(137.024982191402, 90.5919377439454, -40.6931356104612, 0.5840865)
    pt3dadd(137.896228801963, 91.0512274672873, -40.8657974422059, 0.632608)
    pt3dadd(138.723398555518, 91.5883543314017, -41.0229836122523, 0.6296589)
    pt3dadd(139.554246049305, 92.1388391766135, -41.0492444310086, 0.6161082)
    pt3dadd(140.505506061795, 92.4048602375315, -41.0834157476176, 0.5980405)
    pt3dadd(141.487171422385, 92.3975279890244, -41.2707832269185, 0.5790694)
    pt3dadd(142.458969827483, 92.4302417651816, -41.5011933270646, 0.578166)
    pt3dadd(143.421419634507, 92.5536694602932, -41.7419959489641, 0.578166)
    pt3dadd(144.387113422951, 92.7113188356964, -41.945190747782, 0.578166)
    pt3dadd(145.371249080699, 92.8473881674108, -42.0481141465178, 0.578166)
    pt3dadd(146.367727034403, 92.9057819892953, -42.0985556321034, 0.578166)
    pt3dadd(147.361998535522, 92.8841641388241, -42.1997875911367, 0.578166)
    pt3dadd(148.340948690457, 92.8281997211008, -42.395164085338, 0.578166)
    pt3dadd(149.305098433279, 92.8130757657282, -42.6579776333026, 0.5765982)
    pt3dadd(150.239313114979, 92.8724285753117, -43.0062328000754, 0.567191)
    pt3dadd(151.172103858375, 93.0047139861817, -43.3277325581914, 0.512316)
    pt3dadd(152.138790914623, 93.2252192940643, -43.4342404395706, 0.4887981)
    pt3dadd(153.120765632158, 93.4103546026639, -43.45627738384, 0.479391)
    pt3dadd(154.113991046691, 93.5174787884346, -43.4976520777958, 0.4778231)
    pt3dadd(155.105719766321, 93.6306868972582, -43.5579171290243, 0.4778231)
    pt3dadd(156.09940645558, 93.7301870230715, -43.6004838173734, 0.4778231)
    pt3dadd(157.096077055547, 93.7985482541574, -43.5715754629194, 0.4778231)
    pt3dadd(158.087610759956, 93.88556127916, -43.6149709233007, 0.4778231)
    pt3dadd(159.013661306242, 94.0520929990075, -43.9420815731217, 0.4771444)
    pt3dadd(159.905659348693, 94.2190954681371, -44.360744898451, 0.473072)
    pt3dadd(160.845180606382, 94.2454859878678, -44.6922766569084, 0.4628911)
    pt3dadd(161.814653289228, 94.159778419692, -44.9186667411767, 0.4493166)
    pt3dadd(162.781692028011, 94.0197449391043, -45.1278689929163, 0.4350633)
    pt3dadd(163.701871298335, 93.7804900261293, -45.430638395619, 0.4343846)
    pt3dadd(164.560216667859, 93.4557881508845, -45.8262060508159, 0.4343846)
    pt3dadd(165.394104383295, 93.1060634372874, -46.2532000820908, 0.4343846)
  }
  GCL[12] {pt3dclear()
    pt3dadd(-16.8371425775964, -0.00797307686885418, -1.75429358679792, 4.198797)
    pt3dadd(-17.1298359136789, 1.26787379752145, -1.5161186671646, 4.198797)
    pt3dadd(-17.3382743831623, 2.20123899030912, -1.22657408892815, 4.198797)
    pt3dadd(-17.4635140106623, 3.13468214036175, -0.905029262005859, 3.866056)
    pt3dadd(-17.246158790379, 3.9895056552447, -0.604425265749208, 3.076144)
    pt3dadd(-16.476697757485, 4.56715264752861, -0.366827478473912, 2.494542)
    pt3dadd(-15.8155879234982, 5.14500644841029, 0.0538973568564489, 2.267276)
    pt3dadd(-15.2516437350056, 5.67135761892624, 0.679788722107643, 2.061605)
    pt3dadd(-14.4634678076199, 5.80173192473353, 1.26191883317456, 1.958769)
    pt3dadd(-13.6098777544218, 5.93313223935761, 1.76565992407114, 1.958769)
    pt3dadd(-12.864525980795, 6.24510278493361, 2.32299112322303, 1.958769)
    pt3dadd(-12.246165479705, 6.75284447482408, 2.92012641241974, 1.958769)
    pt3dadd(-11.434163495665, 7.13005179064563, 3.30317433204266, 1.958769)
    pt3dadd(-10.7523023955009, 7.67388266109395, 3.78990892073723, 1.958769)
    pt3dadd(-9.91186659938708, 7.78045304114759, 4.1468721918189, 1.958769)
    pt3dadd(-8.97814873689717, 7.55158748928978, 4.42000913510522, 1.958769)
    pt3dadd(-8.14444054021862, 7.61450788595635, 4.95300459381425, 1.958769)
    pt3dadd(-7.34906842854842, 7.80447793002806, 5.51714069003701, 1.873782)
    pt3dadd(-6.60814513112252, 8.07416503144473, 6.13160490446044, 1.703806)
    pt3dadd(-5.84089062693486, 8.33880196980392, 6.7151077904795, 1.618818)
    pt3dadd(-5.12807927984603, 8.73534530066677, 7.28525171582832, 1.618818)
    pt3dadd(-4.36259054802643, 9.10516692330644, 7.80524825390963, 1.618818)
    pt3dadd(-3.56137613800673, 9.45287427792822, 8.29214848608702, 1.54858)
    pt3dadd(-2.61687114162636, 9.42040060609845, 8.50710689398074, 1.337866)
    pt3dadd(-1.67727881483884, 9.12805975503704, 8.53389362295298, 1.337866)
    pt3dadd(-0.784181041719339, 9.05680586821245, 8.59812272389248, 1.337866)
    pt3dadd(-0.487717762138388, 9.31446503298235, 8.81449194280846, 1.337866)
    pt3dadd(-0.405553890552707, 10.1295470618723, 9.34393226106136, 1.337866)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(-0.405553890552707, 10.1295470618723, 9.34393226106136, 1.337866)
    pt3dadd(0.271957273750864, 10.644542024164, 9.72361322247549, 1.337866)
    pt3dadd(1.22967001346883, 10.7690256586263, 9.96604553921338, 1.337866)
    pt3dadd(2.20564629186264, 10.8623263245377, 10.1318040094443, 1.337866)
    pt3dadd(2.8720368341632, 11.2826924548687, 10.7026368734628, 1.279818)
    pt3dadd(3.73234293036003, 11.0789134756323, 10.9978404477434, 1.105674)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(3.73234293036003, 11.0789134756323, 10.9978404477434, 1.105674)
    pt3dadd(4.42275940809255, 11.6517359954371, 11.5697908156359, 1.105674)
    pt3dadd(4.53614917865103, 12.4431711205489, 12.1704348055933, 1.105674)
    pt3dadd(4.83580354005039, 13.1337487910098, 12.7892907748155, 1.105674)
    pt3dadd(5.44739876306245, 12.6403668429554, 12.5918269413117, 1.105674)
    pt3dadd(6.24986305884822, 12.1093738811625, 12.3719435143619, 1.105674)
    pt3dadd(7.14073295489532, 12.2129302078724, 12.6684067154879, 1.105674)
    pt3dadd(7.86071788732667, 12.6428998268845, 13.1893609486241, 1.105674)
    pt3dadd(8.45256016699157, 13.1276752710335, 13.8081786579615, 1.105674)
    pt3dadd(9.24953769877149, 13.3546064204092, 14.3594354095203, 1.105674)
    pt3dadd(9.85598501517571, 13.8437304001276, 14.8952278339094, 1.105674)
    pt3dadd(10.6104376641959, 14.3048778396606, 15.3211493568854, 1.105674)
    pt3dadd(11.5496393793315, 14.4796025570976, 15.5219085155596, 1.105674)
    pt3dadd(12.2846468175551, 15.004202940391, 15.9447487134943, 1.105674)
    pt3dadd(13.1437457656989, 15.378648048334, 16.2267991219766, 1.105674)
    pt3dadd(14.112325441018, 15.1422200272251, 16.2581626994719, 1.105674)
    pt3dadd(15.0225745165947, 15.0412804053247, 16.5587218676288, 1.105674)
    pt3dadd(15.7174618947198, 15.3659669000872, 17.0796242781842, 1.105674)
    pt3dadd(16.6883496312492, 15.2658572374828, 17.1468293795479, 1.105674)
    pt3dadd(17.4249333197619, 15.6349397026775, 17.3433411224336, 1.105674)
    pt3dadd(18.2031347013587, 16.0893800381302, 17.55394372407, 1.105674)
    pt3dadd(19.1508056220548, 15.923174088196, 17.5754907244443, 1.105674)
    pt3dadd(20.1109269512481, 15.7081051979132, 17.7297788056756, 1.105674)
    pt3dadd(21.0496498239674, 15.595658776672, 17.7667951514272, 1.105674)
    pt3dadd(21.8027182818673, 16.1326905226175, 18.1123411000051, 1.105674)
    pt3dadd(22.4769261120231, 16.54150457139, 18.6568565103085, 0.9617537)
    pt3dadd(23.2097642911119, 16.8282935920432, 19.2145114204401, 0.9137803)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(23.2097642911119, 16.8282935920432, 19.2145114204401, 0.9137803)
    pt3dadd(24.1455308937699, 16.7817343091276, 19.5174790248035, 0.9137803)
    pt3dadd(24.9644472054851, 17.0105654525511, 19.9755337059537, 0.9137803)
    pt3dadd(25.6498485621019, 17.4892632487617, 20.478436896032, 0.9137803)
    pt3dadd(26.5860547406792, 17.3267859777255, 20.5616671643041, 0.9137803)
    pt3dadd(27.5762276305622, 17.364769179771, 20.6680893063063, 0.9137803)
    pt3dadd(28.4976337016944, 17.649242402712, 20.7608550737274, 0.9137803)
    pt3dadd(29.2917203023355, 18.0479987878431, 20.8764167891774, 0.9137803)
    pt3dadd(30.1836639567604, 17.7336583431941, 20.5538332654917, 0.9137803)
    pt3dadd(31.0322688075577, 18.041979131478, 20.6028662532652, 0.9137803)
    pt3dadd(31.886254978183, 18.5376141215437, 20.7607662495873, 0.9137803)
    pt3dadd(32.817491387513, 18.3851751084004, 20.5515308816864, 0.9137803)
  }
  adendIML[12] {pt3dclear()
    pt3dadd(32.817491387513, 18.3851751084004, 20.5515308816864, 0.9137803)
    pt3dadd(33.4790925140406, 18.7449581517944, 21.1899256674755, 0.9137803)
    pt3dadd(34.2912748440892, 19.0460220833994, 21.5041296134959, 0.9137803)
    pt3dadd(34.8037504821521, 19.6112688657747, 22.0759393070184, 0.9137803)
    pt3dadd(35.0948169312222, 20.3194125367253, 22.6939792618731, 0.9137803)
    pt3dadd(35.8058738166065, 20.7164571090457, 23.2483157494983, 0.9137803)
    pt3dadd(36.629523894878, 20.8408914964615, 23.7763669295597, 0.9137803)
  }
  adendIML[13] {pt3dclear()
    pt3dadd(36.629523894878, 20.8408914964615, 23.7763669295597, 0.9137803)
    pt3dadd(37.4290440868377, 21.390564157721, 24.117983886004, 0.9137803)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(37.4290440868377, 21.390564157721, 24.117983886004, 0.7948378)
    pt3dadd(38.4021569965715, 21.5803722593345, 24.2088951171736, 0.7948378)
    pt3dadd(39.3333256264055, 21.9168000847533, 24.3425601538214, 0.7551903)
    pt3dadd(40.031269238358, 22.5510157628672, 24.6751938685426, 0.7551903)
    pt3dadd(40.7843523216009, 23.1360234541895, 24.9725723499679, 0.7551903)
    pt3dadd(41.6873248739481, 23.4813786831791, 25.0467990519171, 0.7551903)
    pt3dadd(42.6578552038122, 23.7177064017243, 25.0007419835943, 0.7551903)
    pt3dadd(43.6316626686188, 23.9204070704236, 25.0430591649999, 0.7551903)
    pt3dadd(44.6101048382784, 23.9884641702722, 25.1978622383888, 0.7551903)
    pt3dadd(45.584652342522, 23.980997742189, 25.4101860571087, 0.7551903)
    pt3dadd(46.5649984116521, 24.0200200618117, 25.5636261400125, 0.7551903)
    pt3dadd(47.5185664107218, 23.8398168040329, 25.4715288862244, 0.8662786)
    pt3dadd(48.3752672763459, 23.4701214861535, 25.2175969994512, 1.199544)
    pt3dadd(49.3047514113797, 23.8333373743348, 25.2794417387779, 1.199544)
    pt3dadd(50.2372015226296, 24.179921359709, 25.3808172654979, 1.199544)
    pt3dadd(51.1705269752916, 24.5100250822175, 25.519443024846, 1.199544)
    pt3dadd(52.1019440307969, 24.8107219312828, 25.721307872406, 1.199544)
    pt3dadd(53.028421685157, 25.0840345547686, 25.979119698637, 1.199544)
    pt3dadd(53.9515841876263, 25.3448831248422, 26.2614032554046, 1.199544)
    pt3dadd(54.8733144887327, 25.6011421165082, 26.5525011423708, 1.196291)
    pt3dadd(55.7974962151382, 25.8656034206836, 26.827745778032, 1.12798)
    pt3dadd(56.7285431963217, 26.1615380647939, 27.0397949011412, 1.062922)
    pt3dadd(57.6621026985999, 26.4805897117279, 27.2030731581099, 1.014129)
    pt3dadd(58.5927144128105, 26.7787381577057, 27.4098228416737, 0.9946111)
    pt3dadd(59.5114017588644, 27.0284719093448, 27.7125157803608, 0.9913583)
    pt3dadd(60.4289972890991, 27.2563907301266, 28.0381235851013, 0.9899501)
    pt3dadd(61.376459106172, 27.4676724236294, 28.2758195762693, 0.9702356)
    pt3dadd(62.3557600893059, 27.5945642592407, 28.4321723853284, 0.9631947)
    pt3dadd(63.3364996882236, 27.6571288712941, 28.6156153061568, 0.9702356)
    pt3dadd(64.3000331917698, 27.7603117067511, 28.8577385032093, 0.9829091)
    pt3dadd(65.2450086154865, 28.0211965371958, 29.0336546886417, 0.9899501)
    pt3dadd(66.1763678769829, 28.3720770189516, 29.1244510801011, 0.9913582)
    pt3dadd(67.1095298007852, 28.6906281906033, 29.2884658839251, 0.9913582)
    pt3dadd(68.0423690935843, 28.9988307378094, 29.4750599639608, 0.9899501)
    pt3dadd(68.9750889841312, 29.3058173663208, 29.6642311822921, 0.981501)
    pt3dadd(69.905399552965, 29.5963126914903, 29.8876207219556, 0.9603783)
    pt3dadd(70.8355995839168, 29.8863291582545, 30.1119661024831, 0.9209492)
    pt3dadd(71.7689535323456, 30.2032795383757, 30.2796987261255, 0.9309345)
    pt3dadd(72.7025378650189, 30.5353743735354, 30.4141632745351, 0.9415599)
    pt3dadd(73.6343529256681, 30.8830730372443, 30.5124834874792, 0.9223574)
    pt3dadd(74.5574074498354, 31.2645701362863, 30.5279281811053, 0.8770396)
    pt3dadd(75.476820565947, 31.6575234426395, 30.5146564076133, 0.8369589)
    pt3dadd(76.4076603763724, 32.0039365458245, 30.6149113767358, 0.8138461)
    pt3dadd(77.3371107682357, 32.289736889186, 30.8461477937971, 0.7704253)
    pt3dadd(78.2691118465463, 32.5378119025134, 31.1093549075159, 0.7529685)
    pt3dadd(79.2174048714048, 32.7080660226976, 31.37332556555, 0.7459858)
    pt3dadd(80.1791708810546, 32.7844537602593, 31.6354425530853, 0.744822)
    pt3dadd(81.1477436728685, 32.8403469932192, 31.8751609655974, 0.744822)
    pt3dadd(82.1220901723405, 32.9709449056581, 32.0487539618845, 0.744822)
    pt3dadd(83.1005028067264, 33.1608236599569, 32.1205102804268, 0.744822)
    pt3dadd(84.0882935282632, 33.3106333737515, 32.1486063648179, 0.7459858)
    pt3dadd(85.0759313319497, 33.4400533132766, 32.2274358623988, 0.7529685)
    pt3dadd(85.9861707314304, 33.7736233271888, 32.3655094391967, 0.7949811)
    pt3dadd(86.4545186845661, 34.6406378225, 32.4071156996032, 0.8463041)
    pt3dadd(86.913638530604, 35.5234971331109, 32.4613524416659, 0.8730711)
    pt3dadd(87.5507508830376, 36.287123519928, 32.5246178833176, 0.8922735)
    pt3dadd(88.3320169933153, 36.9080163722405, 32.535182169859, 0.9012347)
    pt3dadd(89.1676456042074, 37.4566083931069, 32.5344720578422, 0.9012347)
    pt3dadd(89.9735011773727, 38.0419443443647, 32.6108296347532, 0.8999546)
    pt3dadd(90.7505280832746, 38.6606946693902, 32.7255590785176, 0.8922735)
    pt3dadd(91.4906669256567, 39.3301287323662, 32.7247640834715, 0.8474678)
    pt3dadd(92.1924820737766, 40.0353491180825, 32.6277395164297, 0.8282654)
    pt3dadd(92.9295168027128, 40.7091872244265, 32.6029491557826, 0.8205844)
    pt3dadd(93.6475041433658, 41.4032300564167, 32.645603949341, 0.8193042)
    pt3dadd(94.319125700209, 42.1433569114403, 32.6642616890708, 0.8181404)
    pt3dadd(95.04336937348, 42.8282663558945, 32.6202983609472, 0.8111578)
    pt3dadd(95.8641702621009, 43.3884150250359, 32.5309410462948, 0.793701)
    pt3dadd(96.7332018531986, 43.8660564111696, 32.4045667977581, 0.7704253)
    pt3dadd(97.580789231073, 44.3680997834661, 32.2373738974357, 0.7529685)
    pt3dadd(98.3288819756929, 44.9917293111946, 32.0205470843572, 0.744822)
    pt3dadd(98.9805957637566, 45.6950726823704, 31.7383926209219, 0.744822)
    pt3dadd(99.6956389131903, 46.3195139282401, 31.4303956448784, 0.744822)
    pt3dadd(100.480752663834, 46.8786143609514, 31.167051735417, 0.743764)
    pt3dadd(101.237454695392, 47.5083979282136, 31.0182800288135, 0.7374161)
    pt3dadd(101.850905971567, 48.2922749748102, 31.0073942833434, 0.7215464)
    pt3dadd(102.356067192761, 49.1541025851416, 31.0495792163439, 0.6845168)
    pt3dadd(102.848560888446, 50.0236132537139, 31.086044943808, 0.6781689)
    pt3dadd(103.39130759189, 50.8558571757968, 31.1765736232277, 0.6771109)
    pt3dadd(104.145584536486, 51.468748838628, 31.3696598204423, 0.6771109)
    pt3dadd(105.049092810665, 51.8393847586969, 31.582071778442, 0.6771109)
    pt3dadd(105.978077799038, 52.1800779194017, 31.7143853549498, 0.6771109)
    pt3dadd(106.89447703694, 52.5722274849097, 31.7000861893229, 0.6771109)
    pt3dadd(107.772038744114, 53.0175345587368, 31.5321249761859, 0.6771109)
    pt3dadd(108.629140421645, 53.4801926235313, 31.3067652599043, 0.6771109)
    pt3dadd(109.516660339473, 53.9170119686204, 31.1668352612747, 0.6781689)
    pt3dadd(110.436231073869, 54.3073737017939, 31.1594397840004, 0.6845168)
    pt3dadd(111.369591113796, 54.6399372209437, 31.2926594319509, 0.7215464)
    pt3dadd(112.302655492043, 54.9550006052789, 31.4642945208696, 0.7374161)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(112.302655492043, 54.9550006052789, 31.4642945208696, 0.743764)
    pt3dadd(113.23173728788, 55.3100828045568, 31.5437474315465, 0.743764)
    pt3dadd(114.14008538513, 55.7205849964437, 31.4813815251848, 0.744822)
    pt3dadd(115.03276102069, 56.1557835240858, 31.3644568886282, 0.744822)
    pt3dadd(115.919472891358, 56.611858999394, 31.3047248150972, 0.744822)
    pt3dadd(116.769259545697, 57.1301472918711, 31.3700046776218, 0.744822)
    pt3dadd(117.5814043612, 57.6574511257173, 31.6065946370793, 0.744822)
    pt3dadd(118.487495398744, 57.9453972924747, 31.8852350938868, 0.744822)
    pt3dadd(119.474703036635, 57.9958410200934, 31.9854987527334, 0.743764)
    pt3dadd(120.471818713861, 57.9574244746796, 31.9339972695974, 0.7215464)
    pt3dadd(121.468010080378, 57.8772970876987, 31.9119012150074, 0.7003866)
    pt3dadd(122.462970703535, 57.7797642453401, 31.9139927592338, 0.683555)
    pt3dadd(123.453840645907, 57.7228318028288, 31.8109359442616, 0.6714363)
    pt3dadd(124.423014630779, 57.7296466566896, 31.5694629285292, 0.6367151)
    pt3dadd(125.354301772579, 57.8067537753143, 31.2167358910967, 0.622288)
    pt3dadd(126.249217792642, 58.0107634823109, 30.826138405784, 0.6165172)
    pt3dadd(127.145714355318, 58.3519618132143, 30.5602695310281, 0.6155553)
    pt3dadd(128.066334819384, 58.7313765289883, 30.5086701046868, 0.6155553)
    pt3dadd(128.994402111657, 59.1006017837219, 30.5536415505817, 0.6155553)
    pt3dadd(129.916523911036, 59.4870252672997, 30.5573267574048, 0.6155553)
    pt3dadd(130.830630531083, 59.8903064832173, 30.5162837034472, 0.6155553)
    pt3dadd(131.741511677746, 60.2991179701357, 30.4600126857092, 0.6155553)
    pt3dadd(132.655878126026, 60.701570762656, 30.4210429349398, 0.6155553)
    pt3dadd(133.581870560389, 61.0733089141039, 30.4607970803953, 0.6155553)
    pt3dadd(134.513794424981, 61.3916100192368, 30.6242127571706, 0.6155553)
    pt3dadd(135.438737431786, 61.6408776227651, 30.9072835040572, 0.6155553)
  }
}
proc shape3d_15() {
  adendOML[8] {
    pt3dadd(136.352884513993, 61.799376788061, 31.2794011050388, 0.6155553)
    pt3dadd(137.223724904068, 62.0556423757408, 31.6734832638631, 0.6155553)
    pt3dadd(137.745207043497, 62.7641226030113, 32.0967665052666, 0.6155553)
    pt3dadd(138.068169162086, 63.5176477063532, 32.6630317452508, 0.6155553)
    pt3dadd(138.450217531413, 64.1597725898129, 33.325569545028, 0.6155553)
    pt3dadd(138.742734623955, 64.9094614174022, 33.907786968058, 0.6155553)
    pt3dadd(138.638958694459, 65.8574582612918, 34.2064892543003, 0.6155553)
    pt3dadd(138.360846073461, 66.8036008032974, 34.3722229571144, 0.6155553)
  }
  adendIML[14] {pt3dclear()
    pt3dadd(36.629523894878, 20.8408914964615, 23.7763669295597, 0.7948378)
    pt3dadd(37.4397408696127, 20.5157802105581, 24.321850545655, 0.7948378)
  }
  adendMML[16] {pt3dclear()
    pt3dadd(37.4397408696127, 20.5157802105581, 24.321850545655, 0.7551903)
    pt3dadd(38.2275113551799, 20.3793886311357, 24.8824524955921, 0.7551903)
    pt3dadd(38.7605128334049, 20.8246884373565, 25.5511200851501, 0.7551903)
    pt3dadd(39.177036452466, 21.5167380340421, 26.137359437984, 0.7551903)
    pt3dadd(39.7258014394988, 22.1000508797618, 26.7300654974619, 0.7551903)
    pt3dadd(40.4051920619104, 22.3863954629502, 27.3866435754222, 0.7551903)
    pt3dadd(41.2086425771495, 22.5023321345406, 27.9654722642319, 0.7551903)
    pt3dadd(42.1067244726034, 22.7067192104185, 28.3492478711237, 0.7551903)
    pt3dadd(42.9836465925931, 22.8715803453688, 28.8007214602246, 0.7551903)
    pt3dadd(43.7384645079926, 22.8927340755567, 29.4562978698906, 0.7551903)
    pt3dadd(44.424802791055, 22.8535820456933, 30.1814834895012, 0.7551903)
    pt3dadd(45.1304434166954, 22.8053835389303, 30.8880729957134, 1.02714)
    pt3dadd(45.9500476966555, 22.9000780578341, 31.397168330303, 0.9650125)
    pt3dadd(46.8452920082459, 23.1531853836033, 31.7626017250555, 0.91181)
    pt3dadd(47.7528482062244, 23.3789570669972, 32.1166336569388, 0.8678818)
    pt3dadd(48.6632319890171, 23.605511558253, 32.462846643928, 0.8218646)
    pt3dadd(49.5735452403881, 23.8319463841527, 32.8092585674114, 0.7531907)
    pt3dadd(50.4699163383378, 24.0307466049364, 33.2037941263479, 0.7385799)
    pt3dadd(51.3317943807266, 24.1741716437177, 33.6886619235129, 0.7215464)
    pt3dadd(52.1713387591047, 24.2871522194828, 34.2200574400916, 0.7003866)
    pt3dadd(53.0223362188218, 24.4151835495037, 34.7288345610217, 0.6845168)
    pt3dadd(53.8860401852725, 24.5604272482402, 35.2113805244943, 0.6781689)
    pt3dadd(54.7614545414479, 24.7231277073797, 35.6662281428145, 0.6771109)
    pt3dadd(55.658791763295, 24.9233203780379, 36.0585841350729, 0.6771109)
    pt3dadd(56.5644419785976, 25.1396110770221, 36.4230845476235, 0.6771109)
    pt3dadd(57.4593989996773, 25.3348469717995, 36.8241845999865, 0.6771109)
    pt3dadd(58.3542545261434, 25.5303097424658, 37.224688619993, 0.6771109)
    pt3dadd(59.2619942933111, 25.7511939403298, 37.580977687586, 0.6771109)
    pt3dadd(60.1606781187429, 25.9554741712942, 37.9655495999426, 0.6771109)
    pt3dadd(61.0008883458475, 26.0840151452295, 38.4860468896497, 0.6771109)
    pt3dadd(61.7777439011691, 26.2207023156246, 39.099233525839, 0.6771109)
    pt3dadd(62.5349343184564, 26.559111465346, 39.653227155863, 0.6771109)
    pt3dadd(63.3275472541578, 26.9830058601589, 40.0876802569801, 0.6771109)
    pt3dadd(64.1985173797063, 27.3351497914409, 40.4246275643465, 0.6771109)
    pt3dadd(65.1141766582962, 27.6234497174501, 40.7034570379919, 0.6771109)
    pt3dadd(66.033130867931, 27.8742197551183, 41.0068205318525, 0.6771109)
    pt3dadd(66.9298039997957, 28.0727500225162, 41.4022339601927, 0.6771109)
    pt3dadd(67.8234378162439, 28.2662704377129, 41.8058954991518, 0.6771109)
    pt3dadd(68.7330948605728, 28.5008111814585, 42.1470913517095, 0.6771109)
    pt3dadd(69.63403691523, 28.7748539123471, 42.4822133135992, 0.6771109)
    pt3dadd(70.4908205967477, 29.0680948666655, 42.9033698768296, 0.6771109)
    pt3dadd(71.3638411136943, 29.2709052091548, 43.3350456227739, 0.6761491)
    pt3dadd(72.3320923221483, 29.2553966796729, 43.5605721303884, 0.6703783)
    pt3dadd(73.3193583045766, 29.1335340455881, 43.6563953889859, 0.6550769)
    pt3dadd(74.3025606641642, 28.9590324516723, 43.7085308072316, 0.6030519)
    pt3dadd(75.2845953497655, 28.7821837929914, 43.7637497535112, 0.5797937)
    pt3dadd(76.2716416846678, 28.7080392080229, 43.8796117724806, 0.5657163)
    pt3dadd(77.243710414304, 28.7961763261959, 44.0844653617825, 0.5604701)
    pt3dadd(78.1885192865715, 28.9586349604214, 44.3669427021289, 0.5595958)
    pt3dadd(79.1256891795511, 29.0259778595593, 44.7005113607256, 0.5595958)
    pt3dadd(80.0693239495694, 28.9264290162325, 45.0080316260631, 0.5595958)
    pt3dadd(81.0290624964791, 28.720431434898, 45.1912375332606, 0.5595958)
    pt3dadd(81.9878627673513, 28.4408838013223, 45.229531065503, 0.5595958)
    pt3dadd(82.9330063875897, 28.1180298882408, 45.1818644341997, 0.5595958)
    pt3dadd(83.8966247063132, 27.8625187761256, 45.1493019185899, 0.5595958)
    pt3dadd(84.870396629687, 27.7089236347299, 45.3029345426274, 0.5595958)
    pt3dadd(85.828031728672, 27.5266136322624, 45.5257056122616, 0.5588009)
    pt3dadd(86.7874595137619, 27.3746774383055, 45.7618537747906, 0.5540316)
    pt3dadd(87.7527908361527, 27.3136150904193, 46.0141028727678, 0.5262108)
    pt3dadd(88.7289539310981, 27.2901775134762, 46.2293122633678, 0.5142876)
    pt3dadd(89.7054844992159, 27.2574930771341, 46.4409007340451, 0.5095183)
    pt3dadd(90.6665870513787, 27.1962715180543, 46.7088268719351, 0.5087234)
    pt3dadd(91.6298349663609, 27.1550616142432, 46.9716065789569, 0.5087234)
    pt3dadd(92.5877604417183, 27.2465370612093, 47.2379806538836, 0.5087234)
    pt3dadd(93.5155306737334, 27.4330591761071, 47.5594843648904, 0.5087234)
    pt3dadd(94.4281641804097, 27.654536782121, 47.9028400831204, 0.5087234)
    pt3dadd(95.3478985841013, 27.9066184645549, 48.2013163170169, 0.5087234)
    pt3dadd(96.2773013365268, 28.1942840954489, 48.4301172400853, 0.5087234)
    pt3dadd(97.2097053664315, 28.4985555478623, 48.6249974611168, 0.5103927)
    pt3dadd(98.1409519713355, 28.7943861489345, 48.8374623563175, 0.5204082)
    pt3dadd(99.0695789865954, 29.0760873574315, 49.0787280411543, 0.5788318)
    pt3dadd(100.000915156139, 29.3739308381608, 49.2868260564346, 0.6038705)
    pt3dadd(100.934586492752, 29.6967169946585, 49.441951852585, 0.613886)
    pt3dadd(101.867216644186, 30.0088406274503, 49.6196823140416, 0.6155553)
    pt3dadd(102.795043383521, 30.2886736983101, 49.8643335686387, 0.6155553)
    pt3dadd(103.718491452891, 30.5504742828809, 50.1447780586108, 0.6155553)
    pt3dadd(104.643074752676, 30.8161629771957, 50.4176827492803, 0.617575)
    pt3dadd(105.572093781334, 31.1000619142055, 50.6544543003021, 0.6296939)
    pt3dadd(106.504931475785, 31.4094778272324, 50.8383642972212, 0.6599907)
    pt3dadd(107.438545524823, 31.7412447500898, 50.9735814681336, 0.7165449)
    pt3dadd(108.372271381354, 32.0572133812838, 51.136167440499, 0.6983668)
    pt3dadd(109.309194205312, 32.2854165556727, 51.3934797872135, 0.6599907)
    pt3dadd(110.269629836774, 32.3776157479979, 51.6484201700767, 0.6296939)
    pt3dadd(111.254687007842, 32.4061615424834, 51.8144210249444, 0.6155553)
    pt3dadd(112.228818773848, 32.5418930287659, 51.9847205948167, 0.6155553)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(112.228818773848, 32.5418930287659, 51.9847205948167, 0.6155553)
    pt3dadd(113.177350739221, 32.8143645533626, 52.1361350612423, 0.6155553)
    pt3dadd(114.109543446533, 33.1653591960951, 52.213133458024, 0.6155553)
    pt3dadd(115.032157926846, 33.5499929806269, 52.2212338902261, 0.6155553)
    pt3dadd(115.950925603332, 33.9443996155114, 52.2041484240956, 0.6155553)
    pt3dadd(116.878678649834, 34.3132031229449, 52.2520289084424, 0.6155553)
    pt3dadd(117.818338765729, 34.6065639927415, 52.4248765998366, 0.6155553)
    pt3dadd(118.783570026365, 34.8258335711879, 52.5211935126757, 0.6155553)
    pt3dadd(119.746131821006, 35.0037451529272, 52.3479324652225, 0.6155553)
    pt3dadd(120.69803650798, 35.1711159226538, 52.0914443130372, 0.6146809)
    pt3dadd(121.689672214367, 35.2756739424632, 52.0232857139807, 0.5963192)
    pt3dadd(122.683104007163, 35.3685377628406, 51.9758097146452, 0.5788318)
    pt3dadd(123.662810850509, 35.4662420238828, 51.810787223682, 0.5657163)
    pt3dadd(124.629062058133, 35.444558441968, 51.5635165816768, 0.5604701)
    pt3dadd(125.582893020066, 35.3080062888433, 51.2986518993273, 0.5595957)
    pt3dadd(126.537632237567, 35.174581633527, 51.0329958612014, 0.5595957)
    pt3dadd(127.498483518486, 35.1088799094119, 50.7646731623404, 0.5595957)
    pt3dadd(128.453501549515, 35.0095948941199, 50.4895266524688, 0.5595957)
    pt3dadd(129.39298605757, 34.7943900183644, 50.2248910763095, 0.5595957)
    pt3dadd(130.335572485933, 34.5537664738469, 49.9991237129006, 0.5595957)
    pt3dadd(131.310956145927, 34.4240195790441, 49.8390593374261, 0.5595957)
    pt3dadd(132.305737411999, 34.4305285170775, 49.7372366169848, 0.5595957)
  }
  adendIML[15] {pt3dclear()
    pt3dadd(32.817491387513, 18.3851751084004, 20.5515308816864, 0.9137803)
    pt3dadd(33.7979657604995, 18.4737402968182, 20.4260869368827, 0.9137803)
    pt3dadd(34.6691928736002, 18.9338756956107, 20.544681017424, 0.9137803)
    pt3dadd(35.5882009976685, 18.8982842044904, 20.3676947572532, 0.8741328)
    pt3dadd(36.4820844105525, 18.5440359912698, 20.0978389713758, 0.7948378)
    pt3dadd(37.4276300558581, 18.271199512273, 19.9517744874274, 0.7551903)
  }
  adendMML[17] {pt3dclear()
    pt3dadd(37.4276300558581, 18.271199512273, 19.9517744874274, 0.7551903)
    pt3dadd(38.3930351578765, 18.0418692007815, 19.829547132408, 0.7551903)
    pt3dadd(39.3562590083344, 17.8236348627143, 19.6741699759899, 0.7551903)
    pt3dadd(40.322047606316, 17.6335159006729, 19.5084033503438, 0.7551903)
    pt3dadd(41.3148190161395, 17.5489609658454, 19.4271022467665, 0.7551903)
    pt3dadd(42.3141477864133, 17.5757879892072, 19.4095600507255, 0.7551903)
    pt3dadd(43.2972675733599, 17.4363534239086, 19.2910970332303, 0.7551903)
    pt3dadd(44.2203509057368, 17.121155215188, 19.0716244556163, 0.7551903)
    pt3dadd(45.1945722422206, 17.0789216633429, 18.9760434915935, 0.8508604)
    pt3dadd(46.0544486554412, 17.4835941226981, 19.1319945446452, 1.071068)
    pt3dadd(47.0319423608437, 17.5194988950368, 18.9300227621305, 0.9934052)
    pt3dadd(47.9970604193966, 17.4418471032802, 18.687650323665, 0.9758237)
    pt3dadd(48.9482885742594, 17.2482089776607, 18.4521546310197, 1.04752)
    pt3dadd(49.8992790568454, 17.0354306496771, 18.2285431746492, 1.139745)
    pt3dadd(50.8601207229731, 16.8984857101447, 17.9905716455078, 1.156223)
    pt3dadd(51.8151664147282, 16.7649634640022, 17.7261507528726, 1.091859)
    pt3dadd(52.7633215877963, 16.595814597979, 17.4572821811026, 1.025204)
    pt3dadd(53.7391559813736, 16.591104119621, 17.2726432681382, 0.9601668)
    pt3dadd(54.6942340808161, 16.8602715650541, 17.3170098399898, 0.929185)
    pt3dadd(55.5982514340852, 16.9832622255134, 17.5400713491771, 0.9074316)
  }
  adendMML[18] {pt3dclear()
    pt3dadd(55.5982514340852, 16.9832622255134, 17.5400713491771, 0.8120376)
    pt3dadd(56.3519043899592, 16.6906135578141, 18.2140475689342, 0.8120376)
    pt3dadd(57.2309131065333, 16.4029781627374, 18.579909974062, 0.758124)
    pt3dadd(58.1781158752039, 16.1406154667878, 18.7454689895009, 0.7213563)
    pt3dadd(59.1708300563046, 16.0628959875431, 18.8112076510488, 0.6891345)
    pt3dadd(60.1658993006006, 16.0083828218473, 18.7729541590274, 0.6732413)
    pt3dadd(61.137573915612, 15.8699394957939, 18.5898189648302, 0.6534981)
    pt3dadd(62.1034257876615, 15.7584921945689, 18.3575942417707, 0.6377933)
    pt3dadd(63.0917116091562, 15.6876420854698, 18.2299353389669, 0.6120375)
    pt3dadd(64.0892566737223, 15.6394197831404, 18.1894278690403, 0.5940892)
    pt3dadd(65.0849143485555, 15.6894940578236, 18.1321601953098, 0.5806279)
    pt3dadd(66.0738456369735, 15.7973871801858, 18.031635723543, 0.5752434)
    pt3dadd(67.0652889952545, 15.8428598255054, 17.9104812250059, 0.574346)
    pt3dadd(68.05767648189, 15.8764031954312, 17.7946033284286, 0.574346)
    pt3dadd(69.0438507934915, 15.9750162231909, 17.6663913385078, 0.574346)
    pt3dadd(70.018863071437, 16.083559540314, 17.4775940124139, 0.574346)
    pt3dadd(70.9811014297672, 16.0656198981324, 17.2146289881627, 0.574346)
    pt3dadd(71.9395972892276, 15.9442805357719, 16.9581532392424, 0.574346)
    pt3dadd(72.9104077745988, 15.7931551936363, 16.7750576991144, 0.574346)
    pt3dadd(73.8763098670968, 15.576245576872, 16.6355375244016, 0.574346)
    pt3dadd(74.8445526833069, 15.3712389589162, 16.5047280030709, 0.574346)
    pt3dadd(75.8277355473674, 15.3691594261999, 16.3741954687417, 0.574346)
    pt3dadd(76.7947731560121, 15.5796885443989, 16.2456857757398, 0.574346)
    pt3dadd(77.76997656881, 15.7483824070465, 16.1096121563712, 0.574346)
    pt3dadd(78.753518790146, 15.7138809742024, 15.9438854677568, 0.574346)
    pt3dadd(79.723665855925, 15.5742537930154, 15.747130040506, 0.574346)
    pt3dadd(80.6990474287978, 15.4529020626413, 15.5632303015836, 0.574346)
    pt3dadd(81.6864341373983, 15.3554104345661, 15.4402747490449, 0.574346)
    pt3dadd(82.6773215597351, 15.2368078837522, 15.3788440056695, 0.574346)
    pt3dadd(83.6726447205793, 15.1443284635816, 15.3678035924537, 0.574346)
    pt3dadd(84.6707550542814, 15.141616067107, 15.4241401456351, 0.5735302)
    pt3dadd(85.6619006643551, 15.1078680669287, 15.5403034600924, 0.5686352)
    pt3dadd(86.639196917753, 14.9360188703727, 15.6462625645581, 0.5563977)
    pt3dadd(87.5950993613356, 14.6488935199919, 15.6372822034378, 0.540081)
    pt3dadd(88.5247727649447, 14.303160058673, 15.5131696806744, 0.5229485)
    pt3dadd(89.4649293429764, 13.9896650868442, 15.3878420713113, 0.5221327)
    pt3dadd(90.4474707898965, 13.8220048523983, 15.3745464199278, 0.5221327)
    pt3dadd(91.4444377119423, 13.7912173016417, 15.4420938465794, 0.5221327)
    pt3dadd(92.4394778483663, 13.7609680519222, 15.4166159867427, 0.5221327)
    pt3dadd(93.4137885303913, 13.6846808869172, 15.221640189218, 0.5221327)
    pt3dadd(94.3586704159149, 13.6087916139752, 14.905854116722, 0.5221327)
    pt3dadd(95.2934155023347, 13.5682427593126, 14.5532613153953, 0.5221327)
    pt3dadd(96.2420842876213, 13.5136130140591, 14.2469924436159, 0.5221327)
    pt3dadd(97.2027854412543, 13.3662832617041, 14.0208723061426, 0.5221327)
    pt3dadd(98.1591659278921, 13.129029993511, 13.8529765302678, 0.5221327)
    pt3dadd(99.109452438457, 12.8522664940724, 13.71038994872, 0.5221327)
    pt3dadd(100.061646326399, 12.5753114670224, 13.5822747217663, 0.5221327)
    pt3dadd(101.023599478917, 12.3168085902392, 13.4960703457801, 0.5221327)
    pt3dadd(101.999763259992, 12.1012775287781, 13.4937656923956, 0.5221327)
    pt3dadd(102.985179152292, 11.9511733417302, 13.5695002289043, 0.5221327)
    pt3dadd(103.972816993846, 11.8417044583811, 13.6815823413992, 0.5221327)
    pt3dadd(104.942891015628, 11.6189100285402, 13.7436015988348, 0.5221327)
    pt3dadd(105.903477722585, 11.3427425738173, 13.7274368662504, 0.5221327)
    pt3dadd(106.875090367382, 11.1089779638554, 13.6935414221569, 0.5221327)
    pt3dadd(107.831008371453, 10.8236457762203, 13.6293683730369, 0.5221327)
    pt3dadd(108.77429875307, 10.5276803949009, 13.4890668871141, 0.5221327)
    pt3dadd(109.736436751091, 10.3791831799963, 13.2759097521192, 0.5221327)
    pt3dadd(110.709068505251, 10.3774879604695, 13.0465541823522, 0.5221327)
    pt3dadd(111.689315592577, 10.3888675582017, 12.8525058860493, 0.5221327)
    pt3dadd(112.675091802563, 10.3275770779481, 12.7022564228161, 0.5221327)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(112.675091802563, 10.3275770779481, 12.7022564228161, 0.5221327)
    pt3dadd(113.662007206024, 10.2643179604476, 12.5561331054985, 0.5221327)
    pt3dadd(114.630635689121, 10.3720115618866, 12.3500783422594, 0.5221327)
    pt3dadd(115.556572601533, 10.5688939686917, 12.0366318930835, 0.5221327)
    pt3dadd(116.473360228729, 10.5117249304895, 11.6564841668419, 0.521391)
    pt3dadd(117.364671940745, 10.2516567221927, 11.2853504767806, 0.5169411)
    pt3dadd(118.267483868831, 10.0125400678658, 10.936140891389, 0.505816)
    pt3dadd(119.213313039024, 9.95857178977046, 10.6283003814767, 0.4909827)
    pt3dadd(120.184046688169, 10.0234438882905, 10.4001450433977, 0.4814152)
    pt3dadd(121.154294665383, 9.93435300450451, 10.2051150907662, 0.4863102)
    pt3dadd(122.081284933037, 9.64330177710157, 9.9773769882283, 0.508931)
    pt3dadd(123.013886289662, 9.36810751686678, 9.74465093401337, 0.540081)
    pt3dadd(123.993057260882, 9.27098928450462, 9.57347912431691, 0.5727885)
    pt3dadd(124.978528952032, 9.41292691364845, 9.50200919305893, 0.574346)
    pt3dadd(125.93572998818, 9.68772528815304, 9.42255060851289, 0.574346)
    pt3dadd(126.899384861032, 9.75872598894593, 9.18539032618116, 0.574346)
    pt3dadd(127.868487315267, 9.69073843444968, 8.94993854193621, 0.574346)
    pt3dadd(128.847629862009, 9.6035640743582, 8.76833620837172, 0.574346)
    pt3dadd(129.824391936949, 9.45901652096513, 8.6168017676862, 0.574346)
    pt3dadd(130.769963498973, 9.18669866821512, 8.45428246972285, 0.574346)
    pt3dadd(131.668590651025, 8.79118993763799, 8.27167734849776, 0.574346)
    pt3dadd(132.5429769731, 8.34239640714754, 8.08766728690198, 0.574346)
    pt3dadd(133.426470351007, 7.91140212068665, 7.90444506320642, 0.574346)
    pt3dadd(134.327385497652, 7.52012649970283, 7.71697502940911, 0.574346)
    pt3dadd(135.23345223524, 7.13902766313495, 7.53311662707459, 0.574346)
    pt3dadd(136.129968004755, 6.73860256426352, 7.34373796901688, 0.574346)
    pt3dadd(137.017955483565, 6.33894320084162, 7.11749405392612, 0.574346)
    pt3dadd(137.934868422104, 6.03542954101261, 6.87144339387264, 0.574346)
    pt3dadd(138.913306883469, 5.96441402097642, 6.75452915114002, 0.574346)
    pt3dadd(139.886327067463, 6.10997120014628, 6.890988892147, 0.574346)
    pt3dadd(140.837653220438, 6.28603360163136, 7.14269873235073, 0.574346)
    pt3dadd(141.81059396668, 6.31863502932515, 7.36158534236046, 0.574346)
    pt3dadd(142.770777942587, 6.14576619053562, 7.56375267393391, 0.574346)
    pt3dadd(143.690127563191, 5.7895171796095, 7.70920303998992, 0.5727885)
    pt3dadd(144.586477300863, 5.35355383028101, 7.68694260434923, 0.5634435)
    pt3dadd(145.491505925115, 4.9887099231891, 7.47861632577029, 0.540081)
    pt3dadd(146.399315074985, 4.78032712189232, 7.12004938138326, 0.508931)
    pt3dadd(147.274157375778, 4.71431645483803, 6.64341008461403, 0.4855686)
    pt3dadd(148.113450553167, 4.69038374787569, 6.10070993971544, 0.4746661)
    pt3dadd(148.943384733241, 4.54120190524405, 5.56499930184548, 0.4746661)
    pt3dadd(149.750959192417, 4.26683998164141, 5.04395629539439, 0.4746661)
    pt3dadd(150.519645217572, 3.92990995500778, 4.50133408420738, 0.4746661)
    pt3dadd(151.222421893771, 3.57113869060167, 3.89138802612886, 0.4746661)
    pt3dadd(151.784353040183, 3.26824669264489, 3.13130016388401, 0.4746661)
  }
  adendMML[19] {pt3dclear()
    pt3dadd(55.5982514340852, 16.9832622255134, 17.5400713491771, 0.9249902)
    pt3dadd(56.5352250896202, 16.9189350600423, 17.0566697358235, 0.9249902)
  }
}
proc shape3d_16() {
  adendMML[19] {
    pt3dadd(57.4196830700954, 17.206204431784, 16.7018179302959, 0.9249902)
    pt3dadd(58.2153370676081, 17.66084127778, 16.3040598711339, 0.9236763)
    pt3dadd(59.004169307546, 18.152925160826, 15.9375450775573, 0.9157928)
    pt3dadd(59.8420014726113, 18.6265489342609, 15.6700116516607, 0.8960842)
    pt3dadd(60.7096210266306, 19.0818030304676, 15.4708078545464, 0.848903)
    pt3dadd(61.5752895886201, 19.5384657188034, 15.2666744780365, 0.8327669)
    pt3dadd(62.4103601678642, 20.0137700349127, 14.9928559819962, 0.8070208)
    pt3dadd(63.1962633728278, 20.5102123168618, 14.6265547966498, 0.7668436)
    pt3dadd(63.9388886140182, 21.0192292819578, 14.1921832307247, 0.7272092)
    pt3dadd(64.665280080079, 21.5319549923151, 13.7345068678877, 0.7027671)
    pt3dadd(65.4267415745717, 22.0358660356524, 13.3289506359949, 0.6891345)
    pt3dadd(66.2588964864489, 22.5121155195562, 13.0503295190307, 0.6732413)
    pt3dadd(67.1429416282725, 22.9530544822725, 12.8980583582902, 0.6386907)
    pt3dadd(68.0443914629278, 23.3753569467754, 12.8031848556647, 0.6327678)
    pt3dadd(68.950532800558, 23.7899829028373, 12.7197538159558, 0.6317806)
    pt3dadd(69.8692274449939, 24.1727623575029, 12.6275690098881, 0.6308832)
    pt3dadd(70.8174462638558, 24.4645464394727, 12.5154013622514, 0.6254987)
    pt3dadd(71.7868023034736, 24.6633665860453, 12.3754134735978, 0.6120375)
    pt3dadd(72.7574790867005, 24.8326880418883, 12.2052310273732, 0.5940892)
    pt3dadd(73.7239434502326, 24.94202845582, 11.9750058699206, 0.5752434)
    pt3dadd(74.669642762605, 24.8861259404026, 11.6561024206717, 0.574346)
    pt3dadd(75.5914028471733, 24.7335406659235, 11.2996259085057, 0.5752434)
    pt3dadd(76.5130886139337, 24.5797702247444, 10.9438951436178, 0.5806279)
    pt3dadd(77.4601849482008, 24.5581257410423, 10.6306886228625, 0.5940892)
    pt3dadd(78.4068850498148, 24.7569240822519, 10.3828432262915, 0.6120375)
    pt3dadd(79.3342446844904, 25.0173301137915, 10.1194050731425, 0.6254987)
    pt3dadd(80.260763408212, 25.1519526779268, 9.77838177761509, 0.6308832)
    pt3dadd(81.2013577043497, 25.1709681012897, 9.44209443000194, 0.6317806)
    pt3dadd(82.1792570881964, 25.190823448916, 9.2464254447063, 0.6317806)
    pt3dadd(83.1780753466538, 25.1957026585595, 9.20166795044161, 0.6308832)
    pt3dadd(84.1763341665272, 25.2188475709558, 9.15420503861713, 0.6120375)
    pt3dadd(85.1748399277598, 25.2340781857525, 9.15984810573595, 0.5940892)
    pt3dadd(86.1675318912258, 25.1410460137213, 9.22440898540276, 0.5806279)
    pt3dadd(87.1591779016452, 25.0194001055036, 9.25781747780612, 0.5752434)
    pt3dadd(88.1533122356983, 24.9819698943966, 9.16643876816036, 0.574346)
    pt3dadd(89.1455668695541, 25.0419955875246, 9.06554763301066, 0.574346)
    pt3dadd(90.14063032332, 25.1297535047472, 9.02758622679568, 0.574346)
    pt3dadd(91.1397852890306, 25.1522824474897, 9.01489554164816, 0.574346)
    pt3dadd(92.139283690751, 25.133162171989, 8.99949909103104, 0.574346)
    pt3dadd(93.1351114125137, 25.2026380615775, 8.99451735512703, 0.574346)
    pt3dadd(94.108092536212, 25.4247704825581, 8.99211432846757, 0.574346)
    pt3dadd(95.0612935310822, 25.7259505556081, 8.96889113968955, 0.574346)
    pt3dadd(96.0385376625824, 25.913979307968, 8.92850691479459, 0.574346)
    pt3dadd(97.0319180796101, 25.8647559453895, 8.88175664902825, 0.574346)
    pt3dadd(98.0124330332119, 25.6999705771751, 8.78125977158866, 0.5762306)
    pt3dadd(98.980205636276, 25.5787272360507, 8.56377911731295, 0.587538)
    pt3dadd(99.9383149583759, 25.5299340939458, 8.28524218366467, 0.6158066)
    pt3dadd(100.896066959062, 25.6190700441523, 8.02639521687281, 0.6534981)
    pt3dadd(101.836705852322, 25.8630234496847, 7.79639856006589, 0.6817666)
    pt3dadd(102.769255798306, 26.0998978401991, 7.52981755617739, 0.6920869)
    pt3dadd(103.703910793245, 26.1438766009072, 7.19327936896671, 0.6880486)
    pt3dadd(104.623407182628, 26.0125868769652, 6.8272419421223, 0.6732413)
    pt3dadd(105.556658831454, 25.936121454094, 6.48198162820028, 0.6386907)
    pt3dadd(106.471902099589, 26.1685053205601, 6.16619652587783, 0.6327678)
    pt3dadd(107.309514638729, 26.5713474106782, 5.80053461246111, 0.6317806)
    pt3dadd(108.124508386127, 26.944864517882, 5.36067687682427, 0.6317806)
    pt3dadd(108.974065004892, 27.2262044338479, 4.91626487393216, 0.6317806)
    pt3dadd(109.829306462086, 27.5372767775502, 4.50266398735733, 0.6317806)
    pt3dadd(110.612201330561, 27.9759661628771, 4.063386309212, 0.6317806)
    pt3dadd(111.313300200809, 28.4685457143713, 3.54851762886745, 0.6317806)
    pt3dadd(112.007176695369, 28.9010657084019, 2.97542657465854, 0.6317806)
    pt3dadd(112.791054760767, 29.2108411921599, 2.44454351556262, 0.6317806)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(112.791054760767, 29.2108411921599, 2.44454351556262, 0.6317806)
    pt3dadd(113.671511106172, 29.4865951714443, 2.06753819824766, 0.6317806)
    pt3dadd(114.556920400498, 29.8565839952297, 1.79150141617251, 0.6317806)
    pt3dadd(115.37786584899, 30.323122437245, 1.46574236392225, 0.6317806)
    pt3dadd(116.11519467893, 30.8327077478207, 1.02347928619431, 0.6254987)
    pt3dadd(116.842022426596, 31.3445708952051, 0.568115891471335, 0.6120375)
    pt3dadd(117.669929668547, 31.8194181840606, 0.288642466544665, 0.5940892)
    pt3dadd(118.556429856282, 32.2355946200943, 0.096283844442496, 0.5752434)
    pt3dadd(119.412688051434, 32.5867343234015, -0.271765222690169, 0.5735302)
    pt3dadd(120.243244046728, 32.8540145359582, -0.758681665041513, 0.5686352)
    pt3dadd(121.080748364267, 33.0909751277961, -1.25071784180949, 0.540081)
    pt3dadd(121.920075130884, 33.225000161265, -1.77160430933122, 0.5278435)
    pt3dadd(122.726350269472, 33.1479056770771, -2.35095910219568, 0.5229485)
    pt3dadd(123.494957250111, 32.9002008471506, -2.93879240086546, 0.521391)
    pt3dadd(124.272930777019, 32.587153998694, -3.48226837533601, 0.5169411)
    pt3dadd(125.100830992184, 32.27189877891, -3.9431229895506, 0.505816)
    pt3dadd(125.9761084955, 31.9640894230714, -4.313360345788, 0.4909827)
    pt3dadd(126.873325229759, 31.6331339251665, -4.60254133039885, 0.4798577)
    pt3dadd(127.764921973804, 31.2248630398713, -4.78290143180263, 0.4754077)
    pt3dadd(128.635361078453, 30.7401407660617, -4.79139889621942, 0.4746661)
    pt3dadd(129.518615510935, 30.3015339045165, -4.63653913858571, 0.4746661)
    pt3dadd(130.447832043184, 29.9995652871908, -4.42512119009205, 0.4746661)
    pt3dadd(131.373687429544, 29.6756742947953, -4.23965130530437, 0.4746661)
    pt3dadd(132.242652604395, 29.2184987504557, -4.0605639654838, 0.4746661)
    pt3dadd(133.067257538828, 28.699209322564, -3.83783591299094, 0.4746661)
    pt3dadd(133.901526599599, 28.2015134973547, -3.60160347484242, 0.4746661)
    pt3dadd(134.756410939887, 27.7124219809954, -3.43334363752228, 0.4746661)
    pt3dadd(135.609816847155, 27.1976443183392, -3.36532425322991, 0.4746661)
    pt3dadd(136.460036476564, 26.6729692336828, -3.39190619438829, 0.4746661)
    pt3dadd(137.3317644647, 26.187810598269, -3.42302819440444, 0.4746661)
    pt3dadd(138.180855925692, 25.7990877662542, -3.12551454032349, 0.4746661)
    pt3dadd(138.858892224574, 25.547657343967, -2.44811757925956, 0.4746661)
  }
  adendIML[16] {pt3dclear()
    pt3dadd(23.2097642911119, 16.8282935920432, 19.2145114204401, 0.9137803)
    pt3dadd(23.8682129973302, 16.325244796635, 19.2009168835738, 0.9137803)
    pt3dadd(24.4951881291759, 15.7182042877351, 19.3688339663917, 0.8741328)
    pt3dadd(24.9736966467079, 15.6929947947111, 20.2112460570447, 0.7948378)
    pt3dadd(25.4417877130651, 15.5626797021818, 21.0334435001853, 0.7551903)
    pt3dadd(26.0094596785523, 15.1922674888934, 21.76766319323, 0.7551903)
    pt3dadd(26.5258942108491, 14.5930779485275, 22.3747425557792, 0.7551903)
    pt3dadd(27.0014595588287, 13.9345645189487, 22.9482314501308, 0.7551903)
    pt3dadd(27.513407513457, 13.4366037964478, 23.6457500478514, 0.798575)
    pt3dadd(27.9586126385978, 13.1482175258965, 24.4656990592407, 0.9287292)
    pt3dadd(28.3739922311779, 12.7990286707106, 25.2692974662184, 0.8274369)
    pt3dadd(28.9295523108446, 12.1247905704639, 25.743194712395, 0.7976438)
    pt3dadd(29.5569068351903, 11.4048036009064, 26.0366539797215, 0.8839478)
    pt3dadd(30.2385299906227, 10.7152619753648, 26.2801875890066, 1.050974)
    pt3dadd(30.9857313254034, 10.1237610002467, 26.5779442930027, 1.110467)
    pt3dadd(31.7598984429097, 9.740645046472, 27.0682148921701, 1.053625)
    pt3dadd(32.5231476209693, 9.54926201699506, 27.6847675662668, 0.789703)
    pt3dadd(33.2832121513883, 9.3611658907177, 28.3065840143592, 0.760151)
    pt3dadd(34.0153859300347, 9.05393628736678, 28.9076266704941, 0.8069984)
    pt3dadd(34.7227658280279, 8.52985264150261, 29.3780377393968, 0.8789566)
    pt3dadd(35.4430519408321, 7.95455337568557, 29.7645954194062, 0.8898185)
    pt3dadd(36.2065368599716, 7.39652079635893, 30.0882077504576, 0.8875817)
    pt3dadd(37.026178718725, 6.96786775924703, 30.4578697543129, 0.9186511)
    pt3dadd(37.8659998748332, 6.72405740802035, 30.9404636621106, 0.9563363)
  }
  adendMML[20] {pt3dclear()
    pt3dadd(37.8659998748332, 6.72405740802035, 30.9404636621106, 0.9361478)
    pt3dadd(38.7010536929261, 6.47120569165529, 31.427886512841, 0.9361478)
    pt3dadd(39.506061785643, 6.12158656476993, 31.905752869421, 0.8777244)
    pt3dadd(40.2812764837286, 5.74603994892339, 32.4131031734024, 0.853574)
    pt3dadd(41.0774941408646, 5.46230481957669, 32.9465843701103, 0.8341249)
    pt3dadd(41.8945648801493, 5.19788033173877, 33.4586953969739, 0.7894827)
    pt3dadd(42.7273165074885, 4.94580507697524, 33.9513866759653, 0.7515322)
    pt3dadd(43.5526616577199, 4.67553383819041, 34.4446271023311, 0.7501105)
    pt3dadd(44.3172497085748, 4.166845797789, 34.8326883698951, 0.7587435)
    pt3dadd(45.0350761987844, 3.53726110676399, 35.1298162820345, 0.7781209)
    pt3dadd(45.7826456146863, 2.94369748754458, 35.4267990253673, 0.8851069)
    pt3dadd(46.558522615994, 2.40456878394299, 35.753059722995, 1.056261)
    pt3dadd(47.3703769801416, 1.99151330504046, 36.1556458968599, 1.088084)
    pt3dadd(48.2039906582253, 1.86850818340552, 36.6829236506634, 0.9146196)
    pt3dadd(49.0346791501549, 1.83222444375049, 37.2307681908512, 0.8371664)
    pt3dadd(49.9168577106668, 1.43450154632811, 37.430635296591, 0.9219332)
    pt3dadd(50.8237381598624, 1.01443158444623, 37.4352676670181, 0.9665104)
    pt3dadd(51.7621191208695, 0.67035417396542, 37.4601650553054, 1.013477)
    pt3dadd(52.7323453025167, 0.448297667448511, 37.5348993535581, 1.127739)
    pt3dadd(53.6842302664314, 0.621867571385792, 37.7362792238412, 0.9943062)
    pt3dadd(54.5253093552983, 1.03416721942861, 38.0845006090574, 0.8120721)
    pt3dadd(55.4392951036106, 1.30814341192635, 38.3529954860107, 0.7504876)
    pt3dadd(56.4203178497637, 1.15844102782664, 38.3430133293549, 0.7498072)
    pt3dadd(57.3498191475487, 0.801695906841985, 38.2524913587506, 0.7498072)
    pt3dadd(58.301732275731, 0.505685455965478, 38.208302821038, 0.7498261)
    pt3dadd(59.2853334030925, 0.587716667417048, 38.299104725048, 0.7567073)
    pt3dadd(60.2681994259741, 0.647166724843153, 38.3801264529139, 0.7877578)
    pt3dadd(61.2279540516022, 0.374651561784065, 38.4096135725739, 0.8069984)
    pt3dadd(62.211929269569, 0.448655393478841, 38.4537085320371, 0.7756826)
    pt3dadd(63.1997823266866, 0.548375792626016, 38.3797636637365, 0.8069984)
    pt3dadd(64.1962454457775, 0.471903849494952, 38.3871615382924, 0.806733)
    pt3dadd(65.1900007858774, 0.365332875915998, 38.3810792415343, 0.7687824)
    pt3dadd(66.1554832434585, 0.110335031097666, 38.3571307137164, 0.7515322)
    pt3dadd(67.0942872261751, -0.233063053962454, 38.3795599711478, 0.7498261)
    pt3dadd(68.0552933255798, -0.500313182996996, 38.4181264077036, 0.7498261)
    pt3dadd(69.0455170673961, -0.610154680642609, 38.3635685371311, 0.7515322)
    pt3dadd(70.0163431630758, -0.76738302885042, 38.1847406710797, 0.7877578)
    pt3dadd(70.9877033169691, -0.642184771329354, 38.0987014303497, 0.8151307)
    pt3dadd(71.9057746201615, -0.262155101058834, 38.0823130174675, 0.7865067)
    pt3dadd(72.8845007629957, -0.391507027685069, 38.0116091069153, 0.7990746)
    pt3dadd(73.8260037411688, -0.71925574826529, 37.9382072449497, 0.7892363)
    pt3dadd(74.7997824432838, -0.795975762722744, 37.96128811714, 0.7593991)
    pt3dadd(75.6672885222109, -0.366645256400842, 38.1926624315349, 0.7502811)
    pt3dadd(76.6309660684801, -0.388459883317093, 38.3754262455229, 0.7498072)
    pt3dadd(77.5678250006376, -0.736143684402228, 38.3955100248334, 0.7498072)
    pt3dadd(78.5060298699248, -1.07847730394132, 38.4276385278188, 0.7498072)
    pt3dadd(79.4743084348057, -1.26049813135322, 38.5613928389728, 0.7498072)
    pt3dadd(80.3640729006974, -0.892231183195959, 38.656803312215, 0.7498072)
    pt3dadd(81.0409028117229, -0.168043419471445, 38.7709057469302, 0.7498072)
    pt3dadd(81.9198532901126, 0.230368913813349, 38.9132449191974, 0.7498072)
    pt3dadd(82.8992897274288, 0.0819635230633526, 38.8046144180506, 0.7498072)
    pt3dadd(83.8583270891246, -0.162765091320685, 38.6620520052207, 0.7498072)
    pt3dadd(84.8166508889605, -0.404004995002941, 38.5100324094081, 0.7498072)
    pt3dadd(85.8005769677421, -0.508777459253302, 38.4993115376397, 0.7498072)
    pt3dadd(86.7553225542073, -0.587163320522379, 38.6532021912916, 0.7498072)
    pt3dadd(87.5531370118937, -1.12864999352376, 38.3927245274088, 0.7498072)
    pt3dadd(88.4410093867322, -1.5436782130672, 38.2094242660453, 0.7495908)
    pt3dadd(89.38576957429, -1.8597105759327, 38.1305383158739, 0.7448162)
    pt3dadd(90.3176401527742, -2.21780125633867, 38.1076850044164, 0.7222183)
    pt3dadd(91.2197304320737, -2.64834218577241, 38.103012965641, 0.6828441)
    pt3dadd(92.1663738029117, -2.96352954234869, 38.1130904601585, 0.6626562)
    pt3dadd(93.1512776054187, -3.12635251908864, 38.1056221523001, 0.6453973)
    pt3dadd(94.1479503324734, -3.17354970312604, 38.0495000640983, 0.6337149)
    pt3dadd(95.1429700111709, -3.13581421824592, 37.9598950594109, 0.6460962)
    pt3dadd(96.1355822511369, -3.03770914820393, 37.8939892776142, 0.67026)
    pt3dadd(97.128046232129, -2.91815570673092, 37.8752322170901, 0.6994343)
    pt3dadd(98.1251541514214, -2.85307847400615, 37.8772920153481, 0.7245814)
    pt3dadd(99.1221176753097, -2.90829373591389, 37.8634313861238, 0.7403078)
    pt3dadd(100.10569242008, -3.08248481805994, 37.8308781154115, 0.7472973)
    pt3dadd(101.078681402328, -3.31206338515876, 37.8099554427047, 0.7497754)
    pt3dadd(102.05571915149, -3.52226755206267, 37.8326131226587, 0.7498072)
    pt3dadd(103.035250425331, -3.70679922978822, 37.9106011838415, 0.7498072)
    pt3dadd(103.983094878511, -4.0040854335917, 37.9906343987418, 0.7498072)
    pt3dadd(104.868436170444, -4.46659418880338, 37.9854513889923, 0.7498072)
    pt3dadd(105.754539126281, -4.9222823376132, 37.9072637079606, 0.7498072)
    pt3dadd(106.674168158439, -5.30006335337568, 37.8026303888602, 0.7498072)
    pt3dadd(107.555861755269, -5.74618511720071, 37.6624572138781, 0.7498072)
    pt3dadd(108.376091355647, -6.29307154833243, 37.496029366442, 0.7498072)
    pt3dadd(109.194312630999, -6.84695783339864, 37.3424266353851, 0.7498072)
    pt3dadd(110.039540601739, -7.36720305747839, 37.2222141565101, 0.7498261)
    pt3dadd(110.909047799444, -7.83811504255999, 37.076540460629, 0.7515512)
    pt3dadd(111.747115357759, -8.3272281762023, 36.8359191518341, 0.7714533)
    pt3dadd(112.639876943858, -8.7341975466568, 36.6606196450815, 0.851453)
  }
  adendOML[12] {pt3dclear()
    pt3dadd(112.639876943858, -8.7341975466568, 36.6606196450815, 1.067508)
    pt3dadd(113.584474183741, -9.05959288697155, 36.6373853457214, 1.067508)
    pt3dadd(114.516012301676, -9.40743812367433, 36.55682355221, 1.022894)
    pt3dadd(115.502247776378, -9.53216054471117, 36.459767050844, 0.857482)
    pt3dadd(116.465235982395, -9.71786753535654, 36.2810303535912, 0.7870743)
    pt3dadd(117.372036692414, -10.0395603874293, 36.0150662514768, 0.7293562)
    pt3dadd(118.259610293709, -10.4088051883064, 35.7397957376315, 0.6862392)
    pt3dadd(119.186875561412, -10.7179376628682, 35.5347084865889, 0.6602883)
    pt3dadd(120.162210638893, -10.8964165663557, 35.4124555256766, 0.6453879)
    pt3dadd(121.126602925643, -11.0632976469425, 35.2264605888773, 0.6447627)
    pt3dadd(122.000374462659, -11.3836113740075, 34.8796671606074, 0.6447106)
    pt3dadd(122.76347512698, -11.8466612114474, 34.4331849769034, 0.6447106)
    pt3dadd(123.464713272568, -12.3789082611922, 33.9588915188841, 0.6447106)
    pt3dadd(124.166967985675, -12.9187160649379, 33.4947300675175, 0.6447106)
    pt3dadd(124.932628087517, -13.3874900553929, 33.0548995498568, 0.6447106)
    pt3dadd(125.753636523197, -13.7497035062884, 32.6164792753372, 0.6447106)
    pt3dadd(126.587304658118, -14.0251714402713, 32.1393328843471, 0.6447106)
    pt3dadd(127.40093983182, -14.2683378677065, 31.6118388993194, 0.6447106)
  }
  adendIML[17] {pt3dclear()
    pt3dadd(3.73234293036003, 11.0789134756323, 10.9978404477434, 1.930699)
    pt3dadd(3.69440228509455, 10.016810140586, 10.7951820817356, 1.930699)
    pt3dadd(3.72967102789216, 10.4327463252252, 11.2254131163558, 1.930699)
    pt3dadd(3.75768438991758, 11.2496960348378, 11.8014348176384, 1.930699)
    pt3dadd(3.79401876044045, 12.0694249350333, 12.3727139634328, 1.923197)
    pt3dadd(3.886081465021, 12.8830968877227, 12.9466713903737, 1.878184)
    pt3dadd(4.09162921099638, 13.684594164707, 13.5082337102557, 1.878184)
    pt3dadd(4.36704772550556, 14.481913640302, 14.0448874752217, 1.763592)
    pt3dadd(4.63537894308778, 15.2896816019236, 14.5697293973507, 1.601187)
    pt3dadd(4.8737054515577, 16.1016104111375, 15.1024692975217, 1.457748)
    pt3dadd(5.11093621018082, 16.8960723491965, 15.6613874668969, 1.371526)
    pt3dadd(5.38187723845738, 17.6645643957683, 16.240796580041, 1.320754)
    pt3dadd(5.75290566013829, 18.4284076297807, 16.7656523065603, 1.318693)
    pt3dadd(6.25613529005978, 19.1871383569536, 17.1760024739177, 1.318693)
    pt3dadd(6.8135319959886, 19.9326798895972, 17.5412442135285, 1.318693)
    pt3dadd(7.37077441437161, 20.6623287044964, 17.9372001326313, 1.318693)
    pt3dadd(7.92608816522982, 21.3875277065383, 18.3440141288739, 1.305581)
    pt3dadd(8.41082596500849, 22.1623740832453, 18.7487531175981, 1.277484)
    pt3dadd(8.84822211429093, 22.9640270946042, 19.156221835071, 1.23677)
    pt3dadd(9.29932982684836, 23.7527244808642, 19.57352082651, 1.189168)
    pt3dadd(9.80326946879021, 24.4952080990681, 20.0128447869816, 1.129165)
    pt3dadd(10.4612978504535, 25.1240458676151, 20.4178213368664, 1.062274)
    pt3dadd(11.2630070951171, 25.6329173880085, 20.7280299399629, 0.9940047)
    pt3dadd(11.9807522808531, 26.2090384969763, 21.1034250397454, 0.9907538)
    pt3dadd(12.5138698937592, 26.8924297593125, 21.5960922098867, 0.9907538)
    pt3dadd(12.9334264828381, 27.6407836397757, 22.1082119885992, 0.9907538)
    pt3dadd(13.305610617104, 28.4258791989534, 22.6029880564722, 0.9907538)
    pt3dadd(13.7265969302941, 29.1942642800221, 23.0844827291813, 0.9907538)
    pt3dadd(14.2441145278974, 29.9113062976976, 23.5506565644695, 0.9907538)
    pt3dadd(14.7938974107825, 30.6247003947553, 23.9845579283929, 0.9907538)
  }
}
proc shape3d_17() {
  adendIML[17] {
    pt3dadd(15.3542480181305, 31.3627121374294, 24.3595225161106, 0.9907538)
    pt3dadd(15.8827045260358, 32.1383161954902, 24.7027056377812, 0.9907538)
    pt3dadd(16.3148939921793, 32.9588134823119, 25.0736605669561, 0.9907538)
    pt3dadd(16.6761942628316, 33.7918598430988, 25.4917965086889, 0.9907538)
    pt3dadd(17.0247495172534, 34.6221424263829, 25.9266859858694, 0.9907538)
    pt3dadd(17.4316324837424, 35.4372715365064, 26.3376274598702, 0.9907538)
    pt3dadd(17.9356551577926, 36.191843984981, 26.7558457549088, 0.9907538)
    pt3dadd(18.4380482898233, 36.901390035531, 27.2472214894356, 0.9907538)
    pt3dadd(18.8684751428281, 37.6385243106415, 27.7671259962726, 0.9907538)
    pt3dadd(19.3920690862538, 38.3921679978858, 28.1534557393899, 0.9907538)
    pt3dadd(20.0925517202945, 39.0684782174018, 28.3801337720633, 0.9907538)
    pt3dadd(20.6970825274494, 39.75869190083, 28.7507716892807, 0.9907538)
    pt3dadd(21.074660096627, 40.4835784197738, 29.3185206783079, 0.9907538)
    pt3dadd(21.4078231060046, 41.2128322126928, 29.9153846543037, 0.9907538)
    pt3dadd(21.8736706975963, 41.9264491373253, 30.4370536762264, 0.9907538)
    pt3dadd(22.3768066272845, 42.6378977036595, 30.9267651986839, 0.9907538)
    pt3dadd(22.7762433041015, 43.421496012681, 31.3959873572276, 0.9907538)
    pt3dadd(23.2298808756306, 44.2766233341892, 31.620091457673, 0.9907538)
    pt3dadd(23.8647920742443, 45.0194263257348, 31.81379057206, 0.9907538)
    pt3dadd(24.5162325978521, 45.6512184890118, 32.2201518779249, 0.9907538)
    pt3dadd(25.0511756833687, 46.242785440521, 32.8162102908941, 0.9907538)
    pt3dadd(25.4432817028416, 46.8854561617555, 33.4709129120186, 0.9907538)
    pt3dadd(25.77418113287, 47.6117399599115, 34.0713204364159, 0.9907538)
    pt3dadd(26.1570391735454, 48.376510453391, 34.5876638469567, 0.9907538)
    pt3dadd(26.6707869027765, 49.1046667817549, 35.0385867382287, 0.9907538)
    pt3dadd(27.3323283680136, 49.7582080225796, 35.402021585264, 0.9907538)
    pt3dadd(28.0888505943742, 50.3632971102726, 35.6435408414958, 0.9907538)
    pt3dadd(28.8842016858688, 50.9430773613354, 35.8203148836716, 0.9907538)
    pt3dadd(29.6526111701429, 51.5332058434443, 36.0611344043087, 0.9907538)
    pt3dadd(30.3272663662331, 52.1889659677274, 36.3936774785288, 0.9893464)
    pt3dadd(30.8321499832887, 52.9953178211855, 36.6908671173571, 0.9809025)
    pt3dadd(31.1719717402309, 53.9209222136199, 36.8510620741481, 0.9597927)
    pt3dadd(31.5237737156169, 54.8557578760409, 36.894809412925, 0.9316463)
    pt3dadd(32.0658060011197, 55.6934792597049, 36.8745236111692, 0.9020925)
    pt3dadd(32.7696911586257, 56.3959188578741, 36.9433083027668, 0.9006852)
    pt3dadd(33.4883549522273, 57.0314272115884, 37.2138978038108, 0.9006852)
    pt3dadd(34.1802800309921, 57.6390233262271, 37.6032259370194, 0.9006852)
    pt3dadd(34.8643120493613, 58.2527918157811, 37.9972987349518, 0.9006852)
    pt3dadd(35.545640397096, 58.8775057769964, 38.3787536907597, 0.9006852)
    pt3dadd(36.2281977626486, 59.5102357262823, 38.7441325620042, 0.9006852)
    pt3dadd(36.8854106866405, 60.1888551370625, 39.0689303428245, 0.9006852)
    pt3dadd(37.4547344995251, 60.9606245314618, 39.3441603816754, 0.9006852)
    pt3dadd(37.927727669892, 61.8073611577902, 39.5838363806775, 0.9006852)
  }
}
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()
}

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

endtemplate cell_SH07all2_05