/*
This is a CellBuilder-like file written for the simulator NEURON
by an automatic procedure "neuron_template_tree" 
in MATLAB, based on a script of Hermann Cuntz
copyright 2014 Marcel Beining
*/

begintemplate cell_rat_mGC_Claiborne_09

proc celldef() {
  topol()
  subsets()
  geom()
  biophys()
  geom_nseg()
is_artificial = 0
}

public axon
public GCL
public adendIML
public adendMML
public adendOML
public soma
public axonh

public allregobj
public allreg
public alladendreg
public allaxonreg
public regaxon
public regGCL
public regadendIML
public regadendMML
public regadendOML
public regsoma
public regaxonh
public is_artificial

create axon[1]
create GCL[11]
create adendIML[12]
create adendMML[16]
create adendOML[12]
create soma[3]
create axonh[1]

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-9.6491214691172, 80.0960689610586, 0, 10.5)
    pt3dadd(-9.6490214691172, 80.0960689610586, 0, 10.5)
  }
  soma[1] {pt3dclear()
    pt3dadd(-9.6490214691172, 80.0960689610586, 0, 10.4043260233424)
    pt3dadd(-10.0187773756763, 81.0189498775565, 0.107570365475901, 10.4043260233424)
    pt3dadd(-10.3885332822354, 81.9418307940544, 0.215140730951802, 10.1118742080783)
    pt3dadd(-10.7582891887944, 82.8647117105524, 0.322711096427702, 9.60468635614927)
    pt3dadd(-11.1280450953535, 83.7875926270503, 0.430281461903603, 8.84590300647707)
    pt3dadd(-11.4978010019126, 84.7104735435482, 0.537851827379504, 7.76208734813001)
    pt3dadd(-11.8675569084716, 85.6333544600461, 0.645422192855404, 6.18465843842649)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-11.8675569084716, 85.6333544600461, 0.645422192855404, 3.5)
    pt3dadd(-12.2373128150307, 86.5562353765441, 0.752992558331305, 3.5)
    pt3dadd(-12.6070687215898, 87.479116293042, 0.860562923807206, 2.47906000584629)
    pt3dadd(-12.9768246281489, 88.4019972095399, 0.968133289283107, 2.11125382662694)
    pt3dadd(-13.3465805347079, 89.3248781260379, 1.07570365475901, 1.81011959652796)
    pt3dadd(-13.716336441267, 90.2477590425358, 1.18327402023491, 1.56357174154146)
    pt3dadd(-14.0860923478261, 91.1706399590337, 1.29084438571081, 1.3617154305586)
    pt3dadd(-14.4558482543851, 92.0935208755317, 1.39841475118671, 1.19644946105406)
    pt3dadd(-14.8256041609442, 93.0164017920296, 1.50598511666261, 1.06114112938344)
    pt3dadd(-15.1953600675033, 93.9392827085275, 1.61355548213851, 0.950360037097033)
    pt3dadd(-15.5651159740624, 94.8621636250254, 1.72112584761441, 0.85966014998258)
    pt3dadd(-15.9348718806214, 95.7850445415234, 1.82869621309031, 0.785401363101277)
    pt3dadd(-16.3046277871805, 96.7079254580213, 1.93626657856621, 0.72460341059529)
    pt3dadd(-16.6743836937396, 97.6308063745192, 2.04383694404211, 0.674826257154464)
    pt3dadd(-17.0441396002987, 98.5536872910172, 2.15140730951802, 0.634072170831778)
    pt3dadd(-17.4138955068577, 99.4765682075151, 2.25897767499392, 0.600705547045801)
    pt3dadd(-17.7836514134168, 100.399449124013, 2.36654804046982, 0.573387266025838)
    pt3dadd(-18.1534073199759, 101.322330040511, 2.47411840594572, 0.551020949233567)
    pt3dadd(-18.5231632265349, 102.245210957009, 2.58168877142162, 0.532708957842651)
    pt3dadd(-18.892919133094, 103.168091873507, 2.68925913689752, 0.517716367340809)
    pt3dadd(-19.2626750396531, 104.090972790005, 2.79682950237342, 0.505441472428646)
    pt3dadd(-19.6324309462122, 105.013853706503, 2.90439986784932, 0.495391638473257)
    pt3dadd(-20.0021868527712, 105.936734623001, 3.01197023332522, 0.487163530350653)
    pt3dadd(-20.3719427593303, 106.859615539499, 3.11954059880112, 0.480426925191027)
    pt3dadd(-20.7416986658894, 107.782496455996, 3.22711096427702, 0.474911459375497)
    pt3dadd(-21.1114545724485, 108.705377372494, 3.33468132975292, 0.470395777894772)
  }
  axon[0] {pt3dclear()
    pt3dadd(-21.1114545724485, 108.705377372494, 3.33468132975292, 0.466698650595398)
    pt3dadd(-21.4812104790075, 109.628258288992, 3.44225169522882, 0.466698650595398)
    pt3dadd(-21.8509663855666, 110.55113920549, 3.54982206070472, 0.463671698777356)
    pt3dadd(-22.2207222921257, 111.474020121988, 3.65739242618063, 0.46119344023584)
    pt3dadd(-22.5904781986847, 112.396901038486, 3.76496279165653, 0.459164413753823)
    pt3dadd(-22.9602341052438, 113.319781954984, 3.87253315713243, 0.457503187374186)
    pt3dadd(-23.3299900118029, 114.242662871482, 3.98010352260833, 0.456143090249352)
    pt3dadd(-23.699745918362, 115.16554378798, 4.08767388808423, 0.455029536906078)
    pt3dadd(-24.069501824921, 116.088424704478, 4.19524425356013, 0.454117836538747)
    pt3dadd(-24.4392577314801, 117.011305620976, 4.30281461903603, 0.45337139941042)
    pt3dadd(-24.8090136380392, 117.934186537474, 4.41038498451193, 0.45276026837822)
    pt3dadd(-25.1787695445983, 118.857067453972, 4.51795534998783, 0.452259916607997)
    pt3dadd(-25.5485254511573, 119.77994837047, 4.62552571546373, 0.451850263226359)
    pt3dadd(-25.9182813577164, 120.702829286968, 4.73309608093963, 0.45151486740471)
    pt3dadd(-26.2880372642755, 121.625710203465, 4.84066644641553, 0.451240268531071)
    pt3dadd(-26.6577931708345, 122.548591119963, 4.94823681189143, 0.451015445988463)
    pt3dadd(-27.0275490773936, 123.471472036461, 5.05580717736734, 0.450831376858844)
    pt3dadd(-27.3973049839527, 124.394352952959, 5.16337754284324, 0.450680673801733)
    pt3dadd(-27.7670608905118, 125.317233869457, 5.27094790831914, 0.450557288574293)
    pt3dadd(-28.1368167970708, 126.240114785955, 5.37851827379504, 0.450456269294113)
    pt3dadd(-28.5065727036299, 127.162995702453, 5.48608863927094, 0.450373561702775)
    pt3dadd(-28.876328610189, 128.085876618951, 5.59365900474684, 0.450305846454234)
    pt3dadd(-29.246084516748, 129.008757535449, 5.70122937022274, 0.450250405897802)
    pt3dadd(-29.6158404233071, 129.931638451947, 5.80879973569864, 0.450205015009282)
    pt3dadd(-29.9855963298662, 130.854519368445, 5.91637010117454, 0.450167852092942)
    pt3dadd(-30.3553522364253, 131.777400284943, 6.02394046665044, 0.45013742567046)
    pt3dadd(-30.7251081429843, 132.700281201441, 6.13151083212634, 0.450112514622668)
    pt3dadd(-31.0948640495434, 133.623162117939, 6.23908119760224, 0.450092119181749)
    pt3dadd(-31.4646199561025, 134.546043034436, 6.34665156307814, 0.450075420807047)
    pt3dadd(-31.8343758626616, 135.468923950934, 6.45422192855404, 0.450061749334151)
    pt3dadd(-32.2041317692206, 136.391804867432, 6.56179229402995, 0.450050556078851)
    pt3dadd(-32.5738876757797, 137.31468578393, 6.66936265950585, 0.450041391816511)
    pt3dadd(-32.9436435823388, 138.237566700428, 6.77693302498175, 0.450033888753103)
    pt3dadd(-33.3133994888978, 139.160447616926, 6.88450339045765, 0.450027745764349)
    pt3dadd(-33.6831553954569, 140.083328533424, 6.99207375593355, 0.45002271631054)
    pt3dadd(-34.052911302016, 141.006209449922, 7.09964412140945, 0.450018598542036)
    pt3dadd(-34.4226672085751, 141.92909036642, 7.20721448688535, 0.450015227198327)
    pt3dadd(-34.7924231151341, 142.851971282918, 7.31478485236125, 0.450012466975554)
    pt3dadd(-35.1621790216932, 143.774852199416, 7.42235521783715, 0.450010207096284)
    pt3dadd(-35.5319349282523, 144.697733115914, 7.52992558331305, 0.450008356863627)
    pt3dadd(-35.9016908348114, 145.620614032412, 7.63749594878895, 0.450006842021251)
    pt3dadd(-36.2714467413704, 146.54349494891, 7.74506631426485, 0.450005601773211)
    pt3dadd(-36.6412026479295, 147.466375865407, 7.85263667974075, 0.450004586344)
    pt3dadd(-37.0109585544886, 148.389256781905, 7.96020704521666, 0.450003754980877)
    pt3dadd(-37.3807144610476, 149.312137698403, 8.06777741069256, 0.450003074318321)
    pt3dadd(-37.7504703676067, 150.235018614901, 8.17534777616846, 0.450002517038954)
    pt3dadd(-38.1202262741658, 151.157899531399, 8.28291814164436, 0.450002060777199)
    pt3dadd(-38.4899821807249, 152.080780447897, 8.39048850712026, 0.450001687221668)
    pt3dadd(-38.8597380872839, 153.003661364395, 8.49805887259616, 0.450001381380267)
    pt3dadd(-39.229493993843, 153.926542280893, 8.60562923807206, 0.450001130978506)
    pt3dadd(-39.5992499004021, 154.849423197391, 8.71319960354796, 0.450000925966884)
    pt3dadd(-39.9690058069612, 155.772304113889, 8.82076996902386, 0.450000758117564)
    pt3dadd(-40.3387617135202, 156.695185030387, 8.92834033449976, 0.450000620694164)
    pt3dadd(-40.7085176200793, 157.618065946885, 9.03591069997566, 0.450000508181401)
    pt3dadd(-41.0782735266384, 158.540946863383, 9.14348106545156, 0.450000416063741)
    pt3dadd(-41.4480294331974, 159.463827779881, 9.25105143092746, 0.45000034064418)
    pt3dadd(-41.8177853397565, 160.386708696378, 9.35862179640337, 0.450000278895866)
    pt3dadd(-42.1875412463156, 161.309589612876, 9.46619216187927, 0.450000228340622)
    pt3dadd(-42.5572971528747, 162.232470529374, 9.57376252735517, 0.45000018694949)
    pt3dadd(-42.9270530594337, 163.155351445872, 9.68133289283107, 0.450000153061296)
    pt3dadd(-43.2968089659928, 164.07823236237, 9.78890325830697, 0.45000012531599)
    pt3dadd(-43.6665648725519, 165.001113278868, 9.89647362378287, 0.450000102600055)
    pt3dadd(-44.036320779111, 165.923994195366, 10.0040439892588, 0.450000084001821)
    pt3dadd(-44.40607668567, 166.846875111864, 10.1116143547347, 0.450000068774874)
    pt3dadd(-44.7758325922291, 167.769756028362, 10.2191847202106, 0.450000056308104)
    pt3dadd(-45.1455884987882, 168.69263694486, 10.3267550856865, 0.450000046101177)
    pt3dadd(-45.5153444053472, 169.615517861358, 10.4343254511624, 0.450000037744451)
    pt3dadd(-45.8851003119063, 170.538398777856, 10.5418958166383, 0.450000030902543)
    pt3dadd(-46.2548562184654, 171.461279694354, 10.6494661821142, 0.450000025300862)
    pt3dadd(-46.6246121250245, 172.384160610852, 10.7570365475901, 0.450000020714594)
    pt3dadd(-46.9943680315835, 173.30704152735, 10.864606913066, 0.450000016959675)
    pt3dadd(-47.3641239381426, 174.229922443847, 10.9721772785419, 0.450000013885408)
    pt3dadd(-47.7338798447017, 175.152803360345, 11.0797476440178, 0.45000001136841)
    pt3dadd(-48.1036357512608, 176.075684276843, 11.1873180094937, 0.450000009307667)
    pt3dadd(-48.4733916578198, 176.998565193341, 11.2948883749696, 0.450000007620473)
    pt3dadd(-48.8431475643789, 177.921446109839, 11.4024587404455, 0.450000006239116)
    pt3dadd(-49.212903470938, 178.844327026337, 11.5100291059214, 0.450000005108156)
    pt3dadd(-49.582659377497, 179.767207942835, 11.6175994713973, 0.450000004182204)
    pt3dadd(-49.9524152840561, 180.690088859333, 11.7251698368732, 0.450000003424099)
    pt3dadd(-50.3221711906152, 181.612969775831, 11.8327402023491, 0.450000002803415)
    pt3dadd(-50.6919270971743, 182.535850692329, 11.940310567825, 0.450000002295242)
    pt3dadd(-51.0616830037333, 183.458731608827, 12.0478809333009, 0.450000001879186)
    pt3dadd(-51.4314389102924, 184.381612525325, 12.1554512987768, 0.450000001538547)
    pt3dadd(-51.8011948168515, 185.304493441823, 12.2630216642527, 0.450000001259656)
    pt3dadd(-52.1709507234105, 186.227374358321, 12.3705920297286, 0.450000001031319)
    pt3dadd(-52.5407066299696, 187.150255274819, 12.4781623952045, 0.450000000844373)
    pt3dadd(-52.9104625365287, 188.073136191316, 12.5857327606804, 0.450000000691314)
    pt3dadd(-53.2802184430878, 188.996017107814, 12.6933031261563, 0.450000000566)
    pt3dadd(-53.6499743496468, 189.918898024312, 12.8008734916322, 0.450000000463401)
    pt3dadd(-54.0197302562059, 190.84177894081, 12.9084438571081, 0.450000000379401)
    pt3dadd(-54.389486162765, 191.764659857308, 13.016014222584, 0.450000000310627)
    pt3dadd(-54.7592420693241, 192.687540773806, 13.1235845880599, 0.45000000025432)
    pt3dadd(-55.1289979758831, 193.610421690304, 13.2311549535358, 0.45000000020822)
    pt3dadd(-55.4987538824422, 194.533302606802, 13.3387253190117, 0.450000000170476)
    pt3dadd(-55.8685097890013, 195.4561835233, 13.4462956844876, 0.450000000139574)
    pt3dadd(-56.2382656955603, 196.379064439798, 13.5538660499635, 0.450000000114273)
    pt3dadd(-56.6080216021194, 197.301945356296, 13.6614364154394, 0.450000000093559)
    pt3dadd(-56.9777775086785, 198.224826272794, 13.7690067809153, 0.4500000000766)
    pt3dadd(-57.3475334152376, 199.147707189292, 13.8765771463912, 0.450000000062715)
    pt3dadd(-57.7172893217966, 200.07058810579, 13.9841475118671, 0.450000000051346)
    pt3dadd(-58.0870452283557, 200.993469022287, 14.091717877343, 0.450000000042039)
    pt3dadd(-58.4568011349148, 201.916349938785, 14.1992882428189, 0.450000000034418)
    pt3dadd(-58.8265570414738, 202.839230855283, 14.3068586082948, 0.450000000028179)
    pt3dadd(-59.1963129480329, 203.762111771781, 14.4144289737707, 0.450000000023071)
    pt3dadd(-59.566068854592, 204.684992688279, 14.5219993392466, 0.450000000018889)
    pt3dadd(-59.9358247611511, 205.607873604777, 14.6295697047225, 0.450000000015465)
    pt3dadd(-60.3055806677101, 206.530754521275, 14.7371400701984, 0.450000000012662)
    pt3dadd(-60.6753365742692, 207.453635437773, 14.8447104356743, 0.450000000010367)
    pt3dadd(-61.0450924808283, 208.376516354271, 14.9522808011502, 0.450000000008488)
    pt3dadd(-61.4148483873874, 209.299397270769, 15.0598511666261, 0.450000000006949)
    pt3dadd(-61.7846042939464, 210.222278187267, 15.167421532102, 0.450000000005689)
    pt3dadd(-62.1543602005055, 211.145159103765, 15.2749918975779, 0.450000000004658)
    pt3dadd(-62.5241161070646, 212.068040020263, 15.3825622630538, 0.450000000003814)
    pt3dadd(-62.8938720136237, 212.990920936761, 15.4901326285297, 0.450000000003122)
    pt3dadd(-63.2636279201827, 213.913801853258, 15.5977029940056, 0.450000000002556)
    pt3dadd(-63.6333838267418, 214.836682769756, 15.7052733594815, 0.450000000002093)
    pt3dadd(-64.0031397333009, 215.759563686254, 15.8128437249574, 0.450000000001714)
    pt3dadd(-64.3728956398599, 216.682444602752, 15.9204140904333, 0.450000000001403)
    pt3dadd(-64.742651546419, 217.60532551925, 16.0279844559092, 0.450000000001149)
    pt3dadd(-65.1124074529781, 218.528206435748, 16.1355548213851, 0.45000000000094)
    pt3dadd(-65.4821633595372, 219.451087352246, 16.243125186861, 0.45000000000077)
    pt3dadd(-65.8519192660962, 220.373968268744, 16.3506955523369, 0.45000000000063)
    pt3dadd(-66.2216751726553, 221.296849185242, 16.4582659178128, 0.450000000000516)
    pt3dadd(-66.5914310792144, 222.21973010174, 16.5658362832887, 0.450000000000423)
    pt3dadd(-66.9611869857735, 223.142611018238, 16.6734066487646, 0.450000000000346)
    pt3dadd(-67.3309428923325, 224.065491934736, 16.7809770142405, 0.450000000000283)
    pt3dadd(-67.7006987988916, 224.988372851234, 16.8885473797164, 0.450000000000232)
    pt3dadd(-68.0704547054507, 225.911253767732, 16.9961177451923, 0.45000000000019)
    pt3dadd(-68.4402106120097, 226.83413468423, 17.1036881106682, 0.450000000000155)
    pt3dadd(-68.8099665185688, 227.757015600727, 17.2112584761441, 0.450000000000127)
    pt3dadd(-69.1797224251279, 228.679896517225, 17.31882884162, 0.450000000000104)
    pt3dadd(-69.549478331687, 229.602777433723, 17.4263992070959, 0.450000000000085)
    pt3dadd(-69.919234238246, 230.525658350221, 17.5339695725718, 0.45000000000007)
    pt3dadd(-70.2889901448051, 231.448539266719, 17.6415399380477, 0.450000000000057)
    pt3dadd(-70.6587460513642, 232.371420183217, 17.7491103035236, 0.450000000000047)
    pt3dadd(-71.0285019579232, 233.294301099715, 17.8566806689995, 0.450000000000038)
    pt3dadd(-71.3982578644823, 234.217182016213, 17.9642510344754, 0.450000000000031)
    pt3dadd(-71.7680137710414, 235.140062932711, 18.0718213999513, 0.450000000000026)
    pt3dadd(-72.1377696776005, 236.062943849209, 18.1793917654272, 0.450000000000021)
    pt3dadd(-72.5075255841595, 236.985824765707, 18.2869621309031, 0.450000000000017)
    pt3dadd(-72.8772814907186, 237.908705682205, 18.394532496379, 0.450000000000014)
    pt3dadd(-73.2470373972777, 238.831586598703, 18.5021028618549, 0.450000000000012)
    pt3dadd(-73.6167933038368, 239.754467515201, 18.6096732273308, 0.450000000000009)
    pt3dadd(-73.9865492103958, 240.677348431698, 18.7172435928067, 0.450000000000008)
    pt3dadd(-74.3563051169549, 241.600229348196, 18.8248139582826, 0.450000000000006)
    pt3dadd(-74.726061023514, 242.523110264694, 18.9323843237585, 0.450000000000005)
    pt3dadd(-75.095816930073, 243.445991181192, 19.0399546892344, 0.450000000000004)
    pt3dadd(-75.4655728366321, 244.36887209769, 19.1475250547103, 0.450000000000004)
    pt3dadd(-75.8353287431912, 245.291753014188, 19.2550954201862, 0.450000000000003)
    pt3dadd(-76.2050846497503, 246.214633930686, 19.3626657856621, 0.450000000000002)
    pt3dadd(-76.5748405563093, 247.137514847184, 19.470236151138, 0.450000000000002)
    pt3dadd(-76.9445964628684, 248.060395763682, 19.5778065166139, 0.450000000000002)
    pt3dadd(-77.3143523694275, 248.98327668018, 19.6853768820898, 0.450000000000001)
    pt3dadd(-77.6841082759865, 249.906157596678, 19.7929472475657, 0.450000000000001)
    pt3dadd(-78.0538641825456, 250.829038513176, 19.9005176130416, 0.450000000000001)
    pt3dadd(-78.4236200891047, 251.751919429674, 20.0080879785175, 0.450000000000001)
    pt3dadd(-78.7933759956638, 252.674800346172, 20.1156583439934, 0.450000000000001)
    pt3dadd(-79.1631319022228, 253.597681262669, 20.2232287094693, 0.45)
    pt3dadd(-79.5328878087819, 254.520562179167, 20.3307990749452, 0.45)
    pt3dadd(-79.902643715341, 255.443443095665, 20.4383694404211, 0.45)
    pt3dadd(-80.2723996219001, 256.366324012163, 20.545939805897, 0.45)
    pt3dadd(-80.6421555284591, 257.289204928661, 20.6535101713729, 0.45)
    pt3dadd(-81.0119114350182, 258.212085845159, 20.7610805368488, 0.45)
    pt3dadd(-81.3816673415773, 259.134966761657, 20.8686509023247, 0.45)
    pt3dadd(-81.7514232481363, 260.057847678155, 20.9762212678006, 0.45)
    pt3dadd(-82.1211791546954, 260.980728594653, 21.0837916332765, 0.45)
    pt3dadd(-82.4909350612545, 261.903609511151, 21.1913619987524, 0.45)
    pt3dadd(-82.8606909678136, 262.826490427649, 21.2989323642283, 0.45)
    pt3dadd(-83.2304468743726, 263.749371344147, 21.4065027297043, 0.45)
    pt3dadd(-83.6002027809317, 264.672252260645, 21.5140730951802, 0.45)
    pt3dadd(-83.9699586874908, 265.595133177143, 21.6216434606561, 0.45)
    pt3dadd(-84.3397145940499, 266.51801409364, 21.729213826132, 0.45)
    pt3dadd(-84.7094705006089, 267.440895010138, 21.8367841916079, 0.45)
    pt3dadd(-85.079226407168, 268.363775926636, 21.9443545570838, 0.45)
    pt3dadd(-85.4489823137271, 269.286656843134, 22.0519249225597, 0.45)
    pt3dadd(-85.8187382202862, 270.209537759632, 22.1594952880356, 0.45)
    pt3dadd(-86.1884941268452, 271.13241867613, 22.2670656535115, 0.45)
    pt3dadd(-86.5582500334043, 272.055299592628, 22.3746360189874, 0.45)
    pt3dadd(-86.9280059399634, 272.978180509126, 22.4822063844633, 0.45)
    pt3dadd(-87.2977618465224, 273.901061425624, 22.5897767499392, 0.45)
    pt3dadd(-87.6675177530815, 274.823942342122, 22.6973471154151, 0.45)
    pt3dadd(-88.0372736596406, 275.74682325862, 22.804917480891, 0.45)
    pt3dadd(-88.4070295661997, 276.669704175118, 22.9124878463669, 0.45)
    pt3dadd(-88.7767854727587, 277.592585091616, 23.0200582118428, 0.45)
    pt3dadd(-89.1465413793178, 278.515466008114, 23.1276285773187, 0.45)
    pt3dadd(-89.5162972858769, 279.438346924612, 23.2351989427946, 0.45)
    pt3dadd(-89.8860531924359, 280.361227841109, 23.3427693082705, 0.45)
    pt3dadd(-90.255809098995, 281.284108757607, 23.4503396737464, 0.45)
    pt3dadd(-90.6255650055541, 282.206989674105, 23.5579100392223, 0.45)
    pt3dadd(-90.9953209121132, 283.129870590603, 23.6654804046982, 0.45)
    pt3dadd(-91.3650768186722, 284.052751507101, 23.7730507701741, 0.45)
    pt3dadd(-91.7348327252313, 284.975632423599, 23.88062113565, 0.45)
    pt3dadd(-92.1045886317904, 285.898513340097, 23.9881915011259, 0.45)
    pt3dadd(-92.4743445383494, 286.821394256595, 24.0957618666018, 0.45)
    pt3dadd(-92.8441004449085, 287.744275173093, 24.2033322320777, 0.45)
    pt3dadd(-93.2138563514676, 288.667156089591, 24.3109025975536, 0.45)
    pt3dadd(-93.5836122580267, 289.590037006089, 24.4184729630295, 0.45)
    pt3dadd(-93.9533681645857, 290.512917922587, 24.5260433285054, 0.45)
    pt3dadd(-94.3231240711448, 291.435798839085, 24.6336136939813, 0.45)
    pt3dadd(-94.6928799777039, 292.358679755583, 24.7411840594572, 0.45)
    pt3dadd(-95.062635884263, 293.28156067208, 24.8487544249331, 0.45)
    pt3dadd(-95.432391790822, 294.204441588578, 24.956324790409, 0.45)
    pt3dadd(-95.8021476973811, 295.127322505076, 25.0638951558849, 0.45)
    pt3dadd(-96.1719036039402, 296.050203421574, 25.1714655213608, 0.45)
    pt3dadd(-96.5416595104992, 296.973084338072, 25.2790358868367, 0.45)
    pt3dadd(-96.9114154170583, 297.89596525457, 25.3866062523126, 0.45)
    pt3dadd(-97.2811713236174, 298.818846171068, 25.4941766177885, 0.45)
    pt3dadd(-97.6509272301765, 299.741727087566, 25.6017469832644, 0.45)
    pt3dadd(-98.0206831367355, 300.664608004064, 25.7093173487403, 0.45)
    pt3dadd(-98.3904390432946, 301.587488920562, 25.8168877142162, 0.45)
    pt3dadd(-98.7601949498537, 302.51036983706, 25.9244580796921, 0.45)
    pt3dadd(-99.1299508564127, 303.433250753558, 26.032028445168, 0.45)
    pt3dadd(-99.4997067629718, 304.356131670056, 26.1395988106439, 0.45)
    pt3dadd(-99.8694626695309, 305.279012586554, 26.2471691761198, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-100.23921857609, 306.201893503052, 26.3547395415957, 0.45)
    pt3dadd(-100.608974482649, 307.124774419549, 26.4623099070716, 0.45)
    pt3dadd(-100.978730389208, 308.047655336047, 26.5698802725475, 0.45)
    pt3dadd(-101.348486295767, 308.970536252545, 26.6774506380234, 0.45)
    pt3dadd(-101.718242202326, 309.893417169043, 26.7850210034993, 0.45)
    pt3dadd(-102.087998108885, 310.816298085541, 26.8925913689752, 0.45)
    pt3dadd(-102.457754015444, 311.739179002039, 27.0001617344511, 0.45)
    pt3dadd(-102.827509922003, 312.662059918537, 27.107732099927, 0.45)
    pt3dadd(-103.197265828563, 313.584940835035, 27.2153024654029, 0.45)
    pt3dadd(-103.567021735122, 314.507821751533, 27.3228728308788, 0.45)
    pt3dadd(-103.936777641681, 315.430702668031, 27.4304431963547, 0.45)
    pt3dadd(-104.30653354824, 316.353583584529, 27.5380135618306, 0.45)
    pt3dadd(-104.676289454799, 317.276464501027, 27.6455839273065, 0.45)
    pt3dadd(-105.046045361358, 318.199345417525, 27.7531542927824, 0.45)
    pt3dadd(-105.415801267917, 319.122226334023, 27.8607246582583, 0.45)
    pt3dadd(-105.785557174476, 320.04510725052, 27.9682950237342, 0.45)
    pt3dadd(-106.155313081035, 320.967988167018, 28.0758653892101, 0.45)
    pt3dadd(-106.525068987594, 321.890869083516, 28.183435754686, 0.45)
    pt3dadd(-106.894824894153, 322.813750000014, 28.2910061201619, 0.45)
    pt3dadd(-107.264580800712, 323.736630916512, 28.3985764856378, 0.45)
    pt3dadd(-107.634336707271, 324.65951183301, 28.5061468511137, 0.45)
    pt3dadd(-108.00409261383, 325.582392749508, 28.6137172165896, 0.45)
    pt3dadd(-108.37384852039, 326.505273666006, 28.7212875820655, 0.45)
    pt3dadd(-108.743604426949, 327.428154582504, 28.8288579475414, 0.45)
    pt3dadd(-109.113360333508, 328.351035499002, 28.9364283130173, 0.45)
    pt3dadd(-109.483116240067, 329.2739164155, 29.0439986784932, 0.45)
    pt3dadd(-109.852872146626, 330.196797331998, 29.1515690439691, 0.45)
    pt3dadd(-110.222628053185, 331.119678248496, 29.259139409445, 0.45)
    pt3dadd(-110.592383959744, 332.042559164994, 29.3667097749209, 0.45)
    pt3dadd(-110.962139866303, 332.965440081491, 29.4742801403968, 0.45)
    pt3dadd(-111.331895772862, 333.888320997989, 29.5818505058727, 0.45)
    pt3dadd(-111.701651679421, 334.811201914487, 29.6894208713486, 0.45)
    pt3dadd(-112.07140758598, 335.734082830985, 29.7969912368245, 0.45)
    pt3dadd(-112.441163492539, 336.656963747483, 29.9045616023004, 0.45)
    pt3dadd(-112.810919399098, 337.579844663981, 30.0121319677763, 0.45)
    pt3dadd(-113.180675305658, 338.502725580479, 30.1197023332522, 0.45)
    pt3dadd(-113.550431212217, 339.425606496977, 30.2272726987281, 0.45)
    pt3dadd(-113.920187118776, 340.348487413475, 30.334843064204, 0.45)
    pt3dadd(-114.289943025335, 341.271368329973, 30.4424134296799, 0.45)
    pt3dadd(-114.659698931894, 342.194249246471, 30.5499837951558, 0.45)
    pt3dadd(-115.029454838453, 343.117130162969, 30.6575541606317, 0.45)
    pt3dadd(-115.399210745012, 344.040011079467, 30.7651245261076, 0.45)
    pt3dadd(-115.768966651571, 344.962891995965, 30.8726948915835, 0.45)
    pt3dadd(-116.13872255813, 345.885772912463, 30.9802652570594, 0.45)
    pt3dadd(-116.508478464689, 346.80865382896, 31.0878356225353, 0.45)
    pt3dadd(-116.878234371248, 347.731534745458, 31.1954059880112, 0.45)
    pt3dadd(-117.247990277807, 348.654415661956, 31.3029763534871, 0.45)
    pt3dadd(-117.617746184366, 349.577296578454, 31.410546718963, 0.45)
    pt3dadd(-117.987502090925, 350.500177494952, 31.5181170844389, 0.45)
    pt3dadd(-118.357257997485, 351.42305841145, 31.6256874499148, 0.45)
    pt3dadd(-118.727013904044, 352.345939327948, 31.7332578153907, 0.45)
    pt3dadd(-119.096769810603, 353.268820244446, 31.8408281808666, 0.45)
    pt3dadd(-119.466525717162, 354.191701160944, 31.9483985463425, 0.45)
    pt3dadd(-119.836281623721, 355.114582077442, 32.0559689118184, 0.45)
    pt3dadd(-120.20603753028, 356.03746299394, 32.1635392772943, 0.45)
    pt3dadd(-120.575793436839, 356.960343910438, 32.2711096427702, 0.45)
    pt3dadd(-120.945549343398, 357.883224826936, 32.3786800082461, 0.45)
    pt3dadd(-121.315305249957, 358.806105743434, 32.486250373722, 0.45)
    pt3dadd(-121.685061156516, 359.728986659931, 32.5938207391979, 0.45)
    pt3dadd(-122.054817063075, 360.651867576429, 32.7013911046738, 0.45)
    pt3dadd(-122.424572969634, 361.574748492927, 32.8089614701497, 0.45)
    pt3dadd(-122.794328876193, 362.497629409425, 32.9165318356256, 0.45)
    pt3dadd(-123.164084782752, 363.420510325923, 33.0241022011015, 0.45)
    pt3dadd(-123.533840689312, 364.343391242421, 33.1316725665774, 0.45)
    pt3dadd(-123.903596595871, 365.266272158919, 33.2392429320533, 0.45)
    pt3dadd(-124.27335250243, 366.189153075417, 33.3468132975292, 0.45)
    pt3dadd(-124.643108408989, 367.112033991915, 33.4543836630051, 0.45)
    pt3dadd(-125.012864315548, 368.034914908413, 33.561954028481, 0.45)
    pt3dadd(-125.382620222107, 368.957795824911, 33.6695243939569, 0.45)
    pt3dadd(-125.752376128666, 369.880676741409, 33.7770947594328, 0.45)
    pt3dadd(-126.122132035225, 370.803557657907, 33.8846651249087, 0.45)
    pt3dadd(-126.491887941784, 371.726438574405, 33.9922354903846, 0.45)
    pt3dadd(-126.861643848343, 372.649319490902, 34.0998058558605, 0.45)
    pt3dadd(-127.231399754902, 373.5722004074, 34.2073762213364, 0.45)
    pt3dadd(-127.601155661461, 374.495081323898, 34.3149465868123, 0.45)
    pt3dadd(-127.97091156802, 375.417962240396, 34.4225169522882, 0.45)
    pt3dadd(-128.34066747458, 376.340843156894, 34.5300873177641, 0.45)
    pt3dadd(-128.710423381139, 377.263724073392, 34.63765768324, 0.45)
    pt3dadd(-129.080179287698, 378.18660498989, 34.7452280487159, 0.45)
    pt3dadd(-129.449935194257, 379.109485906388, 34.8527984141918, 0.45)
    pt3dadd(-129.819691100816, 380.032366822886, 34.9603687796677, 0.45)
    pt3dadd(-130.189447007375, 380.955247739384, 35.0679391451436, 0.45)
    pt3dadd(-130.559202913934, 381.878128655882, 35.1755095106195, 0.45)
    pt3dadd(-130.928958820493, 382.80100957238, 35.2830798760954, 0.45)
    pt3dadd(-131.298714727052, 383.723890488878, 35.3906502415714, 0.45)
    pt3dadd(-131.668470633611, 384.646771405376, 35.4982206070472, 0.45)
    pt3dadd(-132.03822654017, 385.569652321873, 35.6057909725231, 0.45)
    pt3dadd(-132.407982446729, 386.492533238371, 35.713361337999, 0.45)
    pt3dadd(-132.777738353288, 387.415414154869, 35.8209317034749, 0.45)
    pt3dadd(-133.147494259847, 388.338295071367, 35.9285020689508, 0.45)
    pt3dadd(-133.517250166407, 389.261175987865, 36.0360724344268, 0.45)
    pt3dadd(-133.887006072966, 390.184056904363, 36.1436427999027, 0.45)
    pt3dadd(-134.256761979525, 391.106937820861, 36.2512131653786, 0.45)
    pt3dadd(-134.626517886084, 392.029818737359, 36.3587835308545, 0.45)
    pt3dadd(-134.996273792643, 392.952699653857, 36.4663538963304, 0.45)
    pt3dadd(-135.366029699202, 393.875580570355, 36.5739242618063, 0.45)
    pt3dadd(-135.735785605761, 394.798461486853, 36.6814946272822, 0.45)
    pt3dadd(-136.10554151232, 395.721342403351, 36.7890649927581, 0.45)
    pt3dadd(-136.475297418879, 396.644223319849, 36.896635358234, 0.45)
    pt3dadd(-136.845053325438, 397.567104236347, 37.0042057237099, 0.45)
    pt3dadd(-137.214809231997, 398.489985152845, 37.1117760891858, 0.45)
    pt3dadd(-137.584565138556, 399.412866069342, 37.2193464546617, 0.45)
    pt3dadd(-137.954321045115, 400.33574698584, 37.3269168201376, 0.45)
    pt3dadd(-138.324076951674, 401.258627902338, 37.4344871856135, 0.45)
    pt3dadd(-138.693832858234, 402.181508818836, 37.5420575510894, 0.45)
    pt3dadd(-139.063588764793, 403.104389735334, 37.6496279165653, 0.45)
    pt3dadd(-139.433344671352, 404.027270651832, 37.7571982820412, 0.45)
    pt3dadd(-139.803100577911, 404.95015156833, 37.8647686475171, 0.45)
    pt3dadd(-140.17285648447, 405.873032484828, 37.972339012993, 0.45)
    pt3dadd(-140.542612391029, 406.795913401326, 38.0799093784689, 0.45)
    pt3dadd(-140.912368297588, 407.718794317824, 38.1874797439448, 0.45)
    pt3dadd(-141.282124204147, 408.641675234322, 38.2950501094207, 0.45)
    pt3dadd(-141.651880110706, 409.56455615082, 38.4026204748966, 0.45)
    pt3dadd(-142.021636017265, 410.487437067318, 38.5101908403725, 0.45)
    pt3dadd(-142.391391923824, 411.410317983816, 38.6177612058484, 0.45)
    pt3dadd(-142.761147830383, 412.333198900314, 38.7253315713243, 0.45)
    pt3dadd(-143.130903736942, 413.256079816811, 38.8329019368002, 0.45)
    pt3dadd(-143.500659643501, 414.178960733309, 38.9404723022761, 0.45)
    pt3dadd(-143.870415550061, 415.101841649807, 39.048042667752, 0.45)
    pt3dadd(-144.24017145662, 416.024722566305, 39.1556130332279, 0.45)
    pt3dadd(-144.609927363179, 416.947603482803, 39.2631833987038, 0.45)
    pt3dadd(-144.979683269738, 417.870484399301, 39.3707537641797, 0.45)
    pt3dadd(-145.349439176297, 418.793365315799, 39.4783241296556, 0.45)
    pt3dadd(-145.719195082856, 419.716246232297, 39.5858944951315, 0.45)
    pt3dadd(-146.088950989415, 420.639127148795, 39.6934648606074, 0.45)
    pt3dadd(-146.458706895974, 421.562008065293, 39.8010352260833, 0.45)
    pt3dadd(-146.828462802533, 422.484888981791, 39.9086055915592, 0.45)
    pt3dadd(-147.198218709092, 423.407769898289, 40.0161759570351, 0.45)
    pt3dadd(-147.567974615651, 424.330650814787, 40.123746322511, 0.45)
    pt3dadd(-147.93773052221, 425.253531731285, 40.2313166879869, 0.45)
    pt3dadd(-148.307486428769, 426.176412647782, 40.3388870534628, 0.45)
    pt3dadd(-148.677242335328, 427.09929356428, 40.4464574189387, 0.45)
    pt3dadd(-149.046998241888, 428.022174480778, 40.5540277844146, 0.45)
    pt3dadd(-149.416754148447, 428.945055397276, 40.6615981498905, 0.45)
    pt3dadd(-149.786510055006, 429.867936313774, 40.7691685153664, 0.45)
    pt3dadd(-150.156265961565, 430.790817230272, 40.8767388808423, 0.45)
    pt3dadd(-150.526021868124, 431.71369814677, 40.9843092463182, 0.45)
    pt3dadd(-150.895777774683, 432.636579063268, 41.0918796117941, 0.45)
    pt3dadd(-151.265533681242, 433.559459979766, 41.19944997727, 0.45)
    pt3dadd(-151.635289587801, 434.482340896264, 41.3070203427459, 0.45)
    pt3dadd(-152.00504549436, 435.405221812762, 41.4145907082218, 0.45)
    pt3dadd(-152.374801400919, 436.32810272926, 41.5221610736977, 0.45)
    pt3dadd(-152.744557307478, 437.250983645758, 41.6297314391736, 0.45)
    pt3dadd(-153.114313214037, 438.173864562256, 41.7373018046495, 0.45)
    pt3dadd(-153.484069120596, 439.096745478753, 41.8448721701254, 0.45)
    pt3dadd(-153.853825027155, 440.019626395251, 41.9524425356013, 0.45)
    pt3dadd(-154.223580933715, 440.942507311749, 42.0600129010772, 0.45)
    pt3dadd(-154.593336840274, 441.865388228247, 42.1675832665531, 0.45)
    pt3dadd(-154.963092746833, 442.788269144745, 42.275153632029, 0.45)
    pt3dadd(-155.332848653392, 443.711150061243, 42.3827239975049, 0.45)
    pt3dadd(-155.702604559951, 444.634030977741, 42.4902943629808, 0.45)
    pt3dadd(-156.07236046651, 445.556911894239, 42.5978647284567, 0.45)
    pt3dadd(-156.442116373069, 446.479792810737, 42.7054350939326, 0.45)
    pt3dadd(-156.811872279628, 447.402673727235, 42.8130054594085, 0.45)
    pt3dadd(-157.181628186187, 448.325554643733, 42.9205758248844, 0.45)
    pt3dadd(-157.551384092746, 449.248435560231, 43.0281461903603, 0.45)
    pt3dadd(-157.921139999305, 450.171316476729, 43.1357165558362, 0.45)
    pt3dadd(-158.290895905864, 451.094197393227, 43.2432869213121, 0.45)
    pt3dadd(-158.660651812423, 452.017078309725, 43.350857286788, 0.45)
    pt3dadd(-159.030407718983, 452.939959226222, 43.4584276522639, 0.45)
    pt3dadd(-159.400163625542, 453.86284014272, 43.5659980177398, 0.45)
    pt3dadd(-159.769919532101, 454.785721059218, 43.6735683832157, 0.45)
    pt3dadd(-160.13967543866, 455.708601975716, 43.7811387486916, 0.45)
    pt3dadd(-160.509431345219, 456.631482892214, 43.8887091141675, 0.45)
    pt3dadd(-160.879187251778, 457.554363808712, 43.9962794796434, 0.45)
    pt3dadd(-161.248943158337, 458.47724472521, 44.1038498451193, 0.45)
    pt3dadd(-161.618699064896, 459.400125641708, 44.2114202105952, 0.45)
    pt3dadd(-161.988454971455, 460.323006558206, 44.3189905760711, 0.45)
    pt3dadd(-162.358210878014, 461.245887474704, 44.426560941547, 0.45)
    pt3dadd(-162.727966784573, 462.168768391202, 44.5341313070229, 0.45)
    pt3dadd(-163.097722691132, 463.0916493077, 44.6417016724988, 0.45)
    pt3dadd(-163.467478597691, 464.014530224198, 44.7492720379747, 0.45)
    pt3dadd(-163.83723450425, 464.937411140696, 44.8568424034506, 0.45)
    pt3dadd(-164.20699041081, 465.860292057193, 44.9644127689265, 0.45)
    pt3dadd(-164.576746317369, 466.783172973691, 45.0719831344024, 0.45)
    pt3dadd(-164.946502223928, 467.706053890189, 45.1795534998783, 0.45)
    pt3dadd(-165.316258130487, 468.628934806687, 45.2871238653542, 0.45)
    pt3dadd(-165.686014037046, 469.551815723185, 45.3946942308301, 0.45)
    pt3dadd(-166.055769943605, 470.474696639683, 45.502264596306, 0.45)
    pt3dadd(-166.425525850164, 471.397577556181, 45.6098349617819, 0.45)
    pt3dadd(-166.795281756723, 472.320458472679, 45.7174053272578, 0.45)
    pt3dadd(-167.165037663282, 473.243339389177, 45.8249756927337, 0.45)
    pt3dadd(-167.534793569841, 474.166220305675, 45.9325460582096, 0.45)
    pt3dadd(-167.9045494764, 475.089101222173, 46.0401164236855, 0.45)
    pt3dadd(-168.274305382959, 476.011982138671, 46.1476867891614, 0.45)
    pt3dadd(-168.644061289518, 476.934863055169, 46.2552571546373, 0.45)
    pt3dadd(-169.013817196077, 477.857743971667, 46.3628275201132, 0.45)
    pt3dadd(-169.383573102637, 478.780624888164, 46.4703978855891, 0.45)
    pt3dadd(-169.753329009196, 479.703505804662, 46.577968251065, 0.45)
    pt3dadd(-170.123084915755, 480.62638672116, 46.6855386165409, 0.45)
    pt3dadd(-170.492840822314, 481.549267637658, 46.7931089820168, 0.45)
    pt3dadd(-170.862596728873, 482.472148554156, 46.9006793474927, 0.45)
    pt3dadd(-171.232352635432, 483.395029470654, 47.0082497129686, 0.45)
    pt3dadd(-171.602108541991, 484.317910387152, 47.1158200784445, 0.45)
    pt3dadd(-171.97186444855, 485.24079130365, 47.2233904439204, 0.45)
    pt3dadd(-172.341620355109, 486.163672220148, 47.3309608093963, 0.45)
    pt3dadd(-172.711376261668, 487.086553136646, 47.4385311748722, 0.45)
    pt3dadd(-173.081132168227, 488.009434053144, 47.5461015403481, 0.45)
    pt3dadd(-173.450888074786, 488.932314969642, 47.653671905824, 0.45)
    pt3dadd(-173.820643981345, 489.85519588614, 47.7612422712999, 0.45)
    pt3dadd(-174.190399887904, 490.778076802638, 47.8688126367758, 0.45)
    pt3dadd(-174.560155794464, 491.700957719135, 47.9763830022517, 0.45)
    pt3dadd(-174.929911701023, 492.623838635633, 48.0839533677276, 0.45)
    pt3dadd(-175.299667607582, 493.546719552131, 48.1915237332035, 0.45)
    pt3dadd(-175.669423514141, 494.469600468629, 48.2990940986794, 0.45)
    pt3dadd(-176.0391794207, 495.392481385127, 48.4066644641553, 0.45)
    pt3dadd(-176.408935327259, 496.315362301625, 48.5142348296312, 0.45)
    pt3dadd(-176.778691233818, 497.238243218123, 48.6218051951071, 0.45)
    pt3dadd(-177.148447140377, 498.161124134621, 48.729375560583, 0.45)
    pt3dadd(-177.518203046936, 499.084005051119, 48.8369459260589, 0.45)
    pt3dadd(-177.887958953495, 500.006885967617, 48.9445162915348, 0.45)
    pt3dadd(-178.257714860054, 500.929766884115, 49.0520866570107, 0.45)
    pt3dadd(-178.627470766613, 501.852647800613, 49.1596570224866, 0.45)
    pt3dadd(-178.997226673172, 502.775528717111, 49.2672273879625, 0.45)
    pt3dadd(-179.366982579731, 503.698409633609, 49.3747977534384, 0.45)
    pt3dadd(-179.736738486291, 504.621290550107, 49.4823681189143, 0.45)
    pt3dadd(-180.10649439285, 505.544171466604, 49.5899384843902, 0.45)
    pt3dadd(-180.476250299409, 506.467052383102, 49.6975088498661, 0.45)
    pt3dadd(-180.846006205968, 507.3899332996, 49.805079215342, 0.45)
    pt3dadd(-181.215762112527, 508.312814216098, 49.9126495808179, 0.45)
    pt3dadd(-181.585518019086, 509.235695132596, 50.0202199462938, 0.45)
    pt3dadd(-181.955273925645, 510.158576049094, 50.1277903117698, 0.45)
    pt3dadd(-182.325029832204, 511.081456965592, 50.2353606772457, 0.45)
    pt3dadd(-182.694785738763, 512.00433788209, 50.3429310427216, 0.45)
    pt3dadd(-183.064541645322, 512.927218798588, 50.4505014081975, 0.45)
    pt3dadd(-183.434297551881, 513.850099715086, 50.5580717736734, 0.45)
    pt3dadd(-183.80405345844, 514.772980631584, 50.6656421391493, 0.45)
    pt3dadd(-184.173809364999, 515.695861548082, 50.7732125046252, 0.45)
    pt3dadd(-184.543565271559, 516.61874246458, 50.8807828701011, 0.45)
    pt3dadd(-184.913321178118, 517.541623381078, 50.988353235577, 0.45)
    pt3dadd(-185.283077084677, 518.464504297576, 51.0959236010529, 0.45)
    pt3dadd(-185.652832991236, 519.387385214073, 51.2034939665288, 0.45)
    pt3dadd(-186.022588897795, 520.310266130571, 51.3110643320047, 0.45)
    pt3dadd(-186.392344804354, 521.233147047069, 51.4186346974806, 0.45)
    pt3dadd(-186.762100710913, 522.156027963567, 51.5262050629565, 0.45)
    pt3dadd(-187.131856617472, 523.078908880065, 51.6337754284324, 0.45)
    pt3dadd(-187.501612524031, 524.001789796563, 51.7413457939083, 0.45)
    pt3dadd(-187.87136843059, 524.924670713061, 51.8489161593842, 0.45)
    pt3dadd(-188.241124337149, 525.847551629559, 51.9564865248601, 0.45)
    pt3dadd(-188.610880243708, 526.770432546057, 52.064056890336, 0.45)
    pt3dadd(-188.980636150267, 527.693313462555, 52.1716272558119, 0.45)
    pt3dadd(-189.350392056826, 528.616194379053, 52.2791976212878, 0.45)
    pt3dadd(-189.720147963386, 529.539075295551, 52.3867679867637, 0.45)
    pt3dadd(-190.089903869945, 530.461956212049, 52.4943383522396, 0.45)
    pt3dadd(-190.459659776504, 531.384837128546, 52.6019087177155, 0.45)
    pt3dadd(-190.829415683063, 532.307718045044, 52.7094790831914, 0.45)
    pt3dadd(-191.199171589622, 533.230598961542, 52.8170494486673, 0.45)
    pt3dadd(-191.568927496181, 534.15347987804, 52.9246198141432, 0.45)
    pt3dadd(-191.93868340274, 535.076360794538, 53.0321901796191, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-192.308439309299, 535.999241711036, 53.139760545095, 0.45)
    pt3dadd(-192.678195215858, 536.922122627534, 53.2473309105709, 0.45)
    pt3dadd(-193.047951122417, 537.845003544032, 53.3549012760468, 0.45)
    pt3dadd(-193.417707028976, 538.76788446053, 53.4624716415227, 0.45)
    pt3dadd(-193.787462935535, 539.690765377028, 53.5700420069986, 0.45)
    pt3dadd(-194.157218842094, 540.613646293526, 53.6776123724745, 0.45)
    pt3dadd(-194.526974748653, 541.536527210024, 53.7851827379504, 0.45)
    pt3dadd(-194.896730655213, 542.459408126522, 53.8927531034263, 0.45)
    pt3dadd(-195.266486561772, 543.38228904302, 54.0003234689022, 0.45)
    pt3dadd(-195.636242468331, 544.305169959518, 54.1078938343781, 0.45)
    pt3dadd(-196.00599837489, 545.228050876015, 54.215464199854, 0.45)
    pt3dadd(-196.375754281449, 546.150931792513, 54.3230345653299, 0.45)
    pt3dadd(-196.745510188008, 547.073812709011, 54.4306049308058, 0.45)
    pt3dadd(-197.115266094567, 547.996693625509, 54.5381752962817, 0.45)
    pt3dadd(-197.485022001126, 548.919574542007, 54.6457456617576, 0.45)
    pt3dadd(-197.854777907685, 549.842455458505, 54.7533160272335, 0.45)
    pt3dadd(-198.224533814244, 550.765336375003, 54.8608863927094, 0.45)
    pt3dadd(-198.594289720803, 551.688217291501, 54.9684567581853, 0.45)
    pt3dadd(-198.964045627362, 552.611098207999, 55.0760271236612, 0.45)
    pt3dadd(-199.333801533921, 553.533979124497, 55.1835974891371, 0.45)
    pt3dadd(-199.70355744048, 554.456860040995, 55.291167854613, 0.45)
    pt3dadd(-200.07331334704, 555.379740957493, 55.3987382200889, 0.45)
    pt3dadd(-200.443069253599, 556.302621873991, 55.5063085855648, 0.45)
    pt3dadd(-200.812825160158, 557.225502790489, 55.6138789510407, 0.45)
    pt3dadd(-201.182581066717, 558.148383706986, 55.7214493165166, 0.45)
    pt3dadd(-201.552336973276, 559.071264623484, 55.8290196819925, 0.45)
    pt3dadd(-201.922092879835, 559.994145539982, 55.9365900474684, 0.45)
    pt3dadd(-202.291848786394, 560.91702645648, 56.0441604129443, 0.45)
    pt3dadd(-202.661604692953, 561.839907372978, 56.1517307784202, 0.45)
    pt3dadd(-203.031360599512, 562.762788289476, 56.2593011438961, 0.45)
    pt3dadd(-203.401116506071, 563.685669205974, 56.366871509372, 0.45)
    pt3dadd(-203.77087241263, 564.608550122472, 56.4744418748479, 0.45)
    pt3dadd(-204.140628319189, 565.53143103897, 56.5820122403238, 0.45)
    pt3dadd(-204.510384225748, 566.454311955468, 56.6895826057997, 0.45)
    pt3dadd(-204.880140132308, 567.377192871966, 56.7971529712756, 0.45)
    pt3dadd(-205.249896038867, 568.300073788464, 56.9047233367515, 0.45)
    pt3dadd(-205.619651945426, 569.222954704962, 57.0122937022274, 0.45)
    pt3dadd(-205.989407851985, 570.14583562146, 57.1198640677033, 0.45)
    pt3dadd(-206.359163758544, 571.068716537957, 57.2274344331792, 0.45)
    pt3dadd(-206.728919665103, 571.991597454455, 57.3350047986551, 0.45)
    pt3dadd(-207.098675571662, 572.914478370953, 57.442575164131, 0.45)
    pt3dadd(-207.468431478221, 573.837359287451, 57.5501455296069, 0.45)
    pt3dadd(-207.83818738478, 574.760240203949, 57.6577158950828, 0.45)
    pt3dadd(-208.207943291339, 575.683121120447, 57.7652862605587, 0.45)
    pt3dadd(-208.577699197898, 576.606002036945, 57.8728566260346, 0.45)
    pt3dadd(-208.947455104457, 577.528882953443, 57.9804269915105, 0.45)
    pt3dadd(-209.317211011016, 578.451763869941, 58.0879973569864, 0.45)
    pt3dadd(-209.686966917575, 579.374644786439, 58.1955677224623, 0.45)
    pt3dadd(-210.056722824135, 580.297525702937, 58.3031380879382, 0.45)
    pt3dadd(-210.426478730694, 581.220406619435, 58.4107084534141, 0.45)
    pt3dadd(-210.796234637253, 582.143287535933, 58.51827881889, 0.45)
    pt3dadd(-211.165990543812, 583.066168452431, 58.6258491843659, 0.45)
    pt3dadd(-211.535746450371, 583.989049368929, 58.7334195498418, 0.45)
    pt3dadd(-211.90550235693, 584.911930285426, 58.8409899153177, 0.45)
    pt3dadd(-212.275258263489, 585.834811201924, 58.9485602807936, 0.45)
    pt3dadd(-212.645014170048, 586.757692118422, 59.0561306462695, 0.45)
    pt3dadd(-213.014770076607, 587.68057303492, 59.1637010117454, 0.45)
    pt3dadd(-213.384525983166, 588.603453951418, 59.2712713772213, 0.45)
    pt3dadd(-213.754281889725, 589.526334867916, 59.3788417426972, 0.45)
    pt3dadd(-214.124037796284, 590.449215784414, 59.4864121081731, 0.45)
    pt3dadd(-214.493793702843, 591.372096700912, 59.593982473649, 0.45)
    pt3dadd(-214.863549609402, 592.29497761741, 59.7015528391249, 0.45)
    pt3dadd(-215.233305515962, 593.217858533908, 59.8091232046008, 0.45)
    pt3dadd(-215.603061422521, 594.140739450406, 59.9166935700767, 0.45)
    pt3dadd(-215.97281732908, 595.063620366904, 60.0242639355526, 0.45)
    pt3dadd(-216.342573235639, 595.986501283402, 60.1318343010285, 0.45)
    pt3dadd(-216.712329142198, 596.9093821999, 60.2394046665044, 0.45)
    pt3dadd(-217.082085048757, 597.832263116397, 60.3469750319803, 0.45)
    pt3dadd(-217.451840955316, 598.755144032895, 60.4545453974562, 0.45)
    pt3dadd(-217.821596861875, 599.678024949393, 60.5621157629321, 0.45)
    pt3dadd(-218.191352768434, 600.600905865891, 60.669686128408, 0.45)
    pt3dadd(-218.561108674993, 601.523786782389, 60.7772564938839, 0.45)
    pt3dadd(-218.930864581552, 602.446667698887, 60.8848268593598, 0.45)
    pt3dadd(-219.300620488111, 603.369548615385, 60.9923972248357, 0.45)
    pt3dadd(-219.67037639467, 604.292429531883, 61.0999675903116, 0.45)
    pt3dadd(-220.040132301229, 605.215310448381, 61.2075379557875, 0.45)
    pt3dadd(-220.409888207789, 606.138191364879, 61.3151083212634, 0.45)
    pt3dadd(-220.779644114348, 607.061072281377, 61.4226786867393, 0.45)
    pt3dadd(-221.149400020907, 607.983953197875, 61.5302490522152, 0.45)
    pt3dadd(-221.519155927466, 608.906834114373, 61.6378194176911, 0.45)
    pt3dadd(-221.888911834025, 609.829715030871, 61.745389783167, 0.45)
    pt3dadd(-222.258667740584, 610.752595947368, 61.8529601486429, 0.45)
    pt3dadd(-222.628423647143, 611.675476863866, 61.9605305141188, 0.45)
    pt3dadd(-222.998179553702, 612.598357780364, 62.0681008795947, 0.45)
    pt3dadd(-223.367935460261, 613.521238696862, 62.1756712450706, 0.45)
    pt3dadd(-223.73769136682, 614.44411961336, 62.2832416105465, 0.45)
    pt3dadd(-224.107447273379, 615.367000529858, 62.3908119760224, 0.45)
    pt3dadd(-224.477203179938, 616.289881446356, 62.4983823414983, 0.45)
    pt3dadd(-224.846959086497, 617.212762362854, 62.6059527069742, 0.45)
    pt3dadd(-225.216714993056, 618.135643279352, 62.7135230724501, 0.45)
    pt3dadd(-225.586470899616, 619.05852419585, 62.821093437926, 0.45)
    pt3dadd(-225.956226806175, 619.981405112348, 62.9286638034019, 0.45)
    pt3dadd(-226.325982712734, 620.904286028846, 63.0362341688778, 0.45)
    pt3dadd(-226.695738619293, 621.827166945344, 63.1438045343537, 0.45)
    pt3dadd(-227.065494525852, 622.750047861842, 63.2513748998296, 0.45)
    pt3dadd(-227.435250432411, 623.67292877834, 63.3589452653055, 0.45)
    pt3dadd(-227.80500633897, 624.595809694838, 63.4665156307814, 0.45)
    pt3dadd(-228.174762245529, 625.518690611335, 63.5740859962573, 0.45)
    pt3dadd(-228.544518152088, 626.441571527833, 63.6816563617332, 0.45)
    pt3dadd(-228.914274058647, 627.364452444331, 63.7892267272091, 0.45)
    pt3dadd(-229.284029965206, 628.287333360829, 63.896797092685, 0.45)
    pt3dadd(-229.653785871765, 629.210214277327, 64.0043674581609, 0.45)
    pt3dadd(-230.023541778324, 630.133095193825, 64.1119378236369, 0.45)
    pt3dadd(-230.393297684883, 631.055976110323, 64.2195081891127, 0.45)
    pt3dadd(-230.763053591443, 631.978857026821, 64.3270785545887, 0.45)
    pt3dadd(-231.132809498002, 632.901737943319, 64.4346489200645, 0.45)
    pt3dadd(-231.502565404561, 633.824618859817, 64.5422192855405, 0.45)
    pt3dadd(-231.87232131112, 634.747499776315, 64.6497896510163, 0.45)
    pt3dadd(-232.242077217679, 635.670380692813, 64.7573600164923, 0.45)
    pt3dadd(-232.611833124238, 636.593261609311, 64.8649303819682, 0.45)
    pt3dadd(-232.981589030797, 637.516142525809, 64.9725007474441, 0.45)
    pt3dadd(-233.351344937356, 638.439023442306, 65.08007111292, 0.45)
    pt3dadd(-233.721100843915, 639.361904358804, 65.1876414783959, 0.45)
    pt3dadd(-234.090856750474, 640.284785275302, 65.2952118438718, 0.45)
    pt3dadd(-234.460612657033, 641.2076661918, 65.4027822093477, 0.45)
    pt3dadd(-234.830368563592, 642.130547108298, 65.5103525748236, 0.45)
    pt3dadd(-235.200124470151, 643.053428024796, 65.6179229402995, 0.45)
    pt3dadd(-235.569880376711, 643.976308941294, 65.7254933057754, 0.45)
    pt3dadd(-235.93963628327, 644.899189857792, 65.8330636712513, 0.45)
    pt3dadd(-236.309392189829, 645.82207077429, 65.9406340367272, 0.45)
    pt3dadd(-236.679148096388, 646.744951690788, 66.0482044022031, 0.45)
    pt3dadd(-237.048904002947, 647.667832607286, 66.155774767679, 0.45)
    pt3dadd(-237.418659909506, 648.590713523784, 66.2633451331549, 0.45)
    pt3dadd(-237.788415816065, 649.513594440282, 66.3709154986308, 0.45)
    pt3dadd(-238.158171722624, 650.43647535678, 66.4784858641067, 0.45)
    pt3dadd(-238.527927629183, 651.359356273277, 66.5860562295826, 0.45)
    pt3dadd(-238.897683535742, 652.282237189775, 66.6936265950585, 0.45)
    pt3dadd(-239.267439442301, 653.205118106273, 66.8011969605344, 0.45)
    pt3dadd(-239.63719534886, 654.127999022771, 66.9087673260103, 0.45)
    pt3dadd(-240.006951255419, 655.050879939269, 67.0163376914862, 0.45)
    pt3dadd(-240.376707161978, 655.973760855767, 67.1239080569621, 0.45)
    pt3dadd(-240.746463068538, 656.896641772265, 67.231478422438, 0.45)
    pt3dadd(-241.116218975097, 657.819522688763, 67.3390487879139, 0.45)
    pt3dadd(-241.485974881656, 658.742403605261, 67.4466191533898, 0.45)
    pt3dadd(-241.855730788215, 659.665284521759, 67.5541895188657, 0.45)
    pt3dadd(-242.225486694774, 660.588165438257, 67.6617598843416, 0.45)
    pt3dadd(-242.595242601333, 661.511046354755, 67.7693302498175, 0.45)
    pt3dadd(-242.964998507892, 662.433927271253, 67.8769006152934, 0.45)
    pt3dadd(-243.334754414451, 663.356808187751, 67.9844709807693, 0.45)
    pt3dadd(-243.70451032101, 664.279689104249, 68.0920413462452, 0.45)
    pt3dadd(-244.074266227569, 665.202570020746, 68.1996117117211, 0.45)
    pt3dadd(-244.444022134128, 666.125450937244, 68.307182077197, 0.45)
    pt3dadd(-244.813778040687, 667.048331853742, 68.4147524426729, 0.45)
    pt3dadd(-245.183533947246, 667.97121277024, 68.5223228081488, 0.45)
    pt3dadd(-245.553289853805, 668.894093686738, 68.6298931736247, 0.45)
    pt3dadd(-245.923045760365, 669.816974603236, 68.7374635391006, 0.45)
    pt3dadd(-246.292801666924, 670.739855519734, 68.8450339045765, 0.45)
    pt3dadd(-246.662557573483, 671.662736436232, 68.9526042700524, 0.45)
    pt3dadd(-247.032313480042, 672.58561735273, 69.0601746355283, 0.45)
    pt3dadd(-247.402069386601, 673.508498269228, 69.1677450010042, 0.45)
    pt3dadd(-247.77182529316, 674.431379185726, 69.2753153664801, 0.45)
    pt3dadd(-248.141581199719, 675.354260102224, 69.382885731956, 0.45)
    pt3dadd(-248.511337106278, 676.277141018722, 69.4904560974319, 0.45)
    pt3dadd(-248.881093012837, 677.20002193522, 69.5980264629078, 0.45)
    pt3dadd(-249.250848919396, 678.122902851717, 69.7055968283837, 0.45)
    pt3dadd(-249.620604825955, 679.045783768215, 69.8131671938596, 0.45)
    pt3dadd(-249.990360732514, 679.968664684713, 69.9207375593355, 0.45)
    pt3dadd(-250.360116639073, 680.891545601211, 70.0283079248114, 0.45)
    pt3dadd(-250.729872545633, 681.814426517709, 70.1358782902873, 0.45)
    pt3dadd(-251.099628452192, 682.737307434207, 70.2434486557632, 0.45)
    pt3dadd(-251.469384358751, 683.660188350705, 70.3510190212391, 0.45)
    pt3dadd(-251.83914026531, 684.583069267203, 70.458589386715, 0.45)
    pt3dadd(-252.208896171869, 685.505950183701, 70.5661597521909, 0.45)
    pt3dadd(-252.578652078428, 686.428831100199, 70.6737301176668, 0.45)
    pt3dadd(-252.948407984987, 687.351712016697, 70.7813004831427, 0.45)
    pt3dadd(-253.318163891546, 688.274592933195, 70.8888708486186, 0.45)
    pt3dadd(-253.687919798105, 689.197473849693, 70.9964412140945, 0.45)
    pt3dadd(-254.057675704664, 690.120354766191, 71.1040115795704, 0.45)
    pt3dadd(-254.427431611223, 691.043235682688, 71.2115819450463, 0.45)
    pt3dadd(-254.797187517782, 691.966116599186, 71.3191523105222, 0.45)
    pt3dadd(-255.166943424341, 692.888997515684, 71.4267226759981, 0.45)
    pt3dadd(-255.5366993309, 693.811878432182, 71.534293041474, 0.45)
    pt3dadd(-255.90645523746, 694.73475934868, 71.6418634069499, 0.45)
    pt3dadd(-256.276211144019, 695.657640265178, 71.7494337724258, 0.45)
    pt3dadd(-256.645967050578, 696.580521181676, 71.8570041379017, 0.45)
    pt3dadd(-257.015722957137, 697.503402098174, 71.9645745033776, 0.45)
    pt3dadd(-257.385478863696, 698.426283014672, 72.0721448688535, 0.45)
    pt3dadd(-257.755234770255, 699.34916393117, 72.1797152343294, 0.45)
    pt3dadd(-258.124990676814, 700.272044847668, 72.2872855998053, 0.45)
    pt3dadd(-258.494746583373, 701.194925764166, 72.3948559652812, 0.45)
    pt3dadd(-258.864502489932, 702.117806680664, 72.5024263307571, 0.45)
    pt3dadd(-259.234258396491, 703.040687597162, 72.609996696233, 0.45)
    pt3dadd(-259.60401430305, 703.96356851366, 72.7175670617089, 0.45)
    pt3dadd(-259.973770209609, 704.886449430157, 72.8251374271848, 0.45)
    pt3dadd(-260.343526116168, 705.809330346655, 72.9327077926607, 0.45)
    pt3dadd(-260.713282022727, 706.732211263153, 73.0402781581366, 0.45)
    pt3dadd(-261.083037929287, 707.655092179651, 73.1478485236125, 0.45)
    pt3dadd(-261.452793835846, 708.577973096149, 73.2554188890884, 0.45)
    pt3dadd(-261.822549742405, 709.500854012647, 73.3629892545643, 0.45)
    pt3dadd(-262.192305648964, 710.423734929145, 73.4705596200402, 0.45)
    pt3dadd(-262.562061555523, 711.346615845643, 73.5781299855161, 0.45)
    pt3dadd(-262.931817462082, 712.269496762141, 73.685700350992, 0.45)
    pt3dadd(-263.301573368641, 713.192377678639, 73.7932707164679, 0.45)
    pt3dadd(-263.6713292752, 714.115258595137, 73.9008410819438, 0.45)
    pt3dadd(-264.041085181759, 715.038139511635, 74.0084114474197, 0.45)
    pt3dadd(-264.410841088318, 715.961020428133, 74.1159818128956, 0.45)
    pt3dadd(-264.780596994877, 716.883901344631, 74.2235521783715, 0.45)
    pt3dadd(-265.150352901436, 717.806782261128, 74.3311225438474, 0.45)
    pt3dadd(-265.520108807995, 718.729663177626, 74.4386929093233, 0.45)
    pt3dadd(-265.889864714554, 719.652544094124, 74.5462632747992, 0.45)
    pt3dadd(-266.259620621114, 720.575425010622, 74.6538336402751, 0.45)
    pt3dadd(-266.629376527673, 721.49830592712, 74.761404005751, 0.45)
    pt3dadd(-266.999132434232, 722.421186843618, 74.8689743712269, 0.45)
    pt3dadd(-267.368888340791, 723.344067760116, 74.9765447367028, 0.45)
    pt3dadd(-267.73864424735, 724.266948676614, 75.0841151021787, 0.45)
    pt3dadd(-268.108400153909, 725.189829593112, 75.1916854676546, 0.45)
    pt3dadd(-268.478156060468, 726.11271050961, 75.2992558331305, 0.45)
    pt3dadd(-268.847911967027, 727.035591426108, 75.4068261986064, 0.45)
    pt3dadd(-269.217667873586, 727.958472342606, 75.5143965640823, 0.45)
    pt3dadd(-269.587423780145, 728.881353259104, 75.6219669295582, 0.45)
    pt3dadd(-269.957179686704, 729.804234175602, 75.7295372950341, 0.45)
    pt3dadd(-270.326935593263, 730.727115092099, 75.83710766051, 0.45)
    pt3dadd(-270.696691499822, 731.649996008597, 75.9446780259859, 0.45)
    pt3dadd(-271.066447406381, 732.572876925095, 76.0522483914618, 0.45)
    pt3dadd(-271.436203312941, 733.495757841593, 76.1598187569377, 0.45)
    pt3dadd(-271.8059592195, 734.418638758091, 76.2673891224136, 0.45)
    pt3dadd(-272.175715126059, 735.341519674589, 76.3749594878895, 0.45)
    pt3dadd(-272.545471032618, 736.264400591087, 76.4825298533654, 0.45)
    pt3dadd(-272.915226939177, 737.187281507585, 76.5901002188413, 0.45)
    pt3dadd(-273.284982845736, 738.110162424083, 76.6976705843172, 0.45)
    pt3dadd(-273.654738752295, 739.033043340581, 76.8052409497931, 0.45)
    pt3dadd(-274.024494658854, 739.955924257079, 76.912811315269, 0.45)
    pt3dadd(-274.394250565413, 740.878805173577, 77.0203816807449, 0.45)
    pt3dadd(-274.764006471972, 741.801686090075, 77.1279520462208, 0.45)
    pt3dadd(-275.133762378531, 742.724567006573, 77.2355224116967, 0.45)
    pt3dadd(-275.50351828509, 743.64744792307, 77.3430927771726, 0.45)
    pt3dadd(-275.873274191649, 744.570328839568, 77.4506631426485, 0.45)
    pt3dadd(-276.243030098209, 745.493209756066, 77.5582335081244, 0.45)
    pt3dadd(-276.612786004768, 746.416090672564, 77.6658038736003, 0.45)
    pt3dadd(-276.982541911327, 747.338971589062, 77.7733742390762, 0.45)
    pt3dadd(-277.352297817886, 748.26185250556, 77.8809446045521, 0.45)
    pt3dadd(-277.722053724445, 749.184733422058, 77.988514970028, 0.45)
    pt3dadd(-278.091809631004, 750.107614338556, 78.0960853355039, 0.45)
    pt3dadd(-278.461565537563, 751.030495255054, 78.2036557009799, 0.45)
    pt3dadd(-278.831321444122, 751.953376171552, 78.3112260664557, 0.45)
    pt3dadd(-279.201077350681, 752.87625708805, 78.4187964319317, 0.45)
    pt3dadd(-279.57083325724, 753.799138004548, 78.5263667974075, 0.45)
    pt3dadd(-279.940589163799, 754.722018921046, 78.6339371628835, 0.45)
    pt3dadd(-280.310345070358, 755.644899837544, 78.7415075283594, 0.45)
    pt3dadd(-280.680100976917, 756.567780754042, 78.8490778938352, 0.45)
    pt3dadd(-281.049856883476, 757.490661670539, 78.9566482593112, 0.45)
    pt3dadd(-281.419612790036, 758.413542587037, 79.064218624787, 0.45)
    pt3dadd(-281.789368696595, 759.336423503535, 79.171788990263, 0.45)
    pt3dadd(-282.159124603154, 760.259304420033, 79.2793593557388, 0.45)
    pt3dadd(-282.528880509713, 761.182185336531, 79.3869297212148, 0.45)
    pt3dadd(-282.898636416272, 762.105066253029, 79.4945000866907, 0.45)
    pt3dadd(-283.268392322831, 763.027947169527, 79.6020704521666, 0.45)
    pt3dadd(-283.63814822939, 763.950828086025, 79.7096408176425, 0.45)
    pt3dadd(-284.007904135949, 764.873709002523, 79.8172111831184, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-284.377660042508, 765.796589919021, 79.9247815485943, 0.45)
    pt3dadd(-284.747415949067, 766.719470835519, 80.0323519140702, 0.45)
    pt3dadd(-285.117171855626, 767.642351752017, 80.1399222795461, 0.45)
    pt3dadd(-285.486927762185, 768.565232668515, 80.247492645022, 0.45)
    pt3dadd(-285.856683668744, 769.488113585013, 80.3550630104979, 0.45)
    pt3dadd(-286.226439575303, 770.41099450151, 80.4626333759738, 0.45)
    pt3dadd(-286.596195481863, 771.333875418008, 80.5702037414497, 0.45)
    pt3dadd(-286.965951388422, 772.256756334506, 80.6777741069256, 0.45)
    pt3dadd(-287.335707294981, 773.179637251004, 80.7853444724015, 0.45)
    pt3dadd(-287.70546320154, 774.102518167502, 80.8929148378774, 0.45)
    pt3dadd(-288.075219108099, 775.025399084, 81.0004852033533, 0.45)
    pt3dadd(-288.444975014658, 775.948280000498, 81.1080555688292, 0.45)
    pt3dadd(-288.814730921217, 776.871160916996, 81.2156259343051, 0.45)
    pt3dadd(-289.184486827776, 777.794041833494, 81.323196299781, 0.45)
    pt3dadd(-289.554242734335, 778.716922749992, 81.4307666652569, 0.45)
    pt3dadd(-289.923998640894, 779.63980366649, 81.5383370307328, 0.45)
    pt3dadd(-290.293754547453, 780.562684582988, 81.6459073962087, 0.45)
    pt3dadd(-290.663510454012, 781.485565499486, 81.7534777616846, 0.45)
    pt3dadd(-291.033266360571, 782.408446415984, 81.8610481271605, 0.45)
    pt3dadd(-291.403022267131, 783.331327332481, 81.9686184926364, 0.45)
    pt3dadd(-291.77277817369, 784.254208248979, 82.0761888581123, 0.45)
    pt3dadd(-292.142534080249, 785.177089165477, 82.1837592235882, 0.45)
    pt3dadd(-292.512289986808, 786.099970081975, 82.2913295890641, 0.45)
    pt3dadd(-292.882045893367, 787.022850998473, 82.39889995454, 0.45)
    pt3dadd(-293.251801799926, 787.945731914971, 82.5064703200159, 0.45)
    pt3dadd(-293.621557706485, 788.868612831469, 82.6140406854918, 0.45)
    pt3dadd(-293.991313613044, 789.791493747967, 82.7216110509677, 0.45)
    pt3dadd(-294.361069519603, 790.714374664465, 82.8291814164436, 0.45)
    pt3dadd(-294.730825426162, 791.637255580963, 82.9367517819195, 0.45)
    pt3dadd(-295.100581332721, 792.560136497461, 83.0443221473954, 0.45)
    pt3dadd(-295.47033723928, 793.483017413959, 83.1518925128713, 0.45)
    pt3dadd(-295.840093145839, 794.405898330457, 83.2594628783472, 0.45)
    pt3dadd(-296.209849052398, 795.328779246955, 83.3670332438231, 0.45)
    pt3dadd(-296.579604958957, 796.251660163452, 83.474603609299, 0.45)
    pt3dadd(-296.949360865517, 797.17454107995, 83.5821739747749, 0.45)
    pt3dadd(-297.319116772076, 798.097421996448, 83.6897443402508, 0.45)
    pt3dadd(-297.688872678635, 799.020302912946, 83.7973147057267, 0.45)
    pt3dadd(-298.058628585194, 799.943183829444, 83.9048850712026, 0.45)
    pt3dadd(-298.428384491753, 800.866064745942, 84.0124554366785, 0.45)
    pt3dadd(-298.798140398312, 801.78894566244, 84.1200258021544, 0.45)
    pt3dadd(-299.167896304871, 802.711826578938, 84.2275961676303, 0.45)
    pt3dadd(-299.53765221143, 803.634707495436, 84.3351665331062, 0.45)
    pt3dadd(-299.907408117989, 804.557588411934, 84.4427368985821, 0.45)
    pt3dadd(-300.277164024548, 805.480469328432, 84.550307264058, 0.45)
    pt3dadd(-300.646919931107, 806.40335024493, 84.6578776295339, 0.45)
    pt3dadd(-301.016675837666, 807.326231161428, 84.7654479950098, 0.45)
    pt3dadd(-301.386431744225, 808.249112077926, 84.8730183604857, 0.45)
    pt3dadd(-301.756187650785, 809.171992994424, 84.9805887259616, 0.45)
    pt3dadd(-302.125943557344, 810.094873910921, 85.0881590914375, 0.45)
    pt3dadd(-302.495699463903, 811.017754827419, 85.1957294569134, 0.45)
    pt3dadd(-302.865455370462, 811.940635743917, 85.3032998223893, 0.45)
    pt3dadd(-303.235211277021, 812.863516660415, 85.4108701878652, 0.45)
    pt3dadd(-303.60496718358, 813.786397576913, 85.5184405533411, 0.45)
    pt3dadd(-303.974723090139, 814.709278493411, 85.626010918817, 0.45)
    pt3dadd(-304.344478996698, 815.632159409909, 85.7335812842929, 0.45)
    pt3dadd(-304.714234903257, 816.555040326407, 85.8411516497688, 0.45)
    pt3dadd(-305.083990809816, 817.477921242905, 85.9487220152447, 0.45)
    pt3dadd(-305.453746716375, 818.400802159403, 86.0562923807206, 0.45)
    pt3dadd(-305.823502622934, 819.323683075901, 86.1638627461965, 0.45)
    pt3dadd(-306.193258529493, 820.246563992399, 86.2714331116724, 0.45)
    pt3dadd(-306.563014436052, 821.169444908897, 86.3790034771483, 0.45)
    pt3dadd(-306.932770342611, 822.092325825395, 86.4865738426242, 0.45)
    pt3dadd(-307.302526249171, 823.015206741892, 86.5941442081001, 0.45)
    pt3dadd(-307.67228215573, 823.93808765839, 86.701714573576, 0.45)
    pt3dadd(-308.042038062289, 824.860968574888, 86.8092849390519, 0.45)
    pt3dadd(-308.411793968848, 825.783849491386, 86.9168553045278, 0.45)
    pt3dadd(-308.781549875407, 826.706730407884, 87.0244256700037, 0.45)
    pt3dadd(-309.151305781966, 827.629611324382, 87.1319960354796, 0.45)
    pt3dadd(-309.521061688525, 828.55249224088, 87.2395664009555, 0.45)
    pt3dadd(-309.890817595084, 829.475373157378, 87.3471367664314, 0.45)
    pt3dadd(-310.260573501643, 830.398254073876, 87.4547071319073, 0.45)
    pt3dadd(-310.630329408202, 831.321134990374, 87.5622774973832, 0.45)
    pt3dadd(-311.000085314761, 832.244015906872, 87.6698478628591, 0.45)
    pt3dadd(-311.36984122132, 833.16689682337, 87.777418228335, 0.45)
    pt3dadd(-311.739597127879, 834.089777739868, 87.8849885938109, 0.45)
    pt3dadd(-312.109353034439, 835.012658656366, 87.9925589592868, 0.45)
    pt3dadd(-312.479108940998, 835.935539572863, 88.1001293247627, 0.45)
    pt3dadd(-312.848864847557, 836.858420489361, 88.2076996902386, 0.45)
    pt3dadd(-313.218620754116, 837.781301405859, 88.3152700557145, 0.45)
    pt3dadd(-313.588376660675, 838.704182322357, 88.4228404211904, 0.45)
    pt3dadd(-313.958132567234, 839.627063238855, 88.5304107866663, 0.45)
    pt3dadd(-314.327888473793, 840.549944155353, 88.6379811521422, 0.45)
    pt3dadd(-314.697644380352, 841.472825071851, 88.7455515176181, 0.45)
    pt3dadd(-315.067400286911, 842.395705988349, 88.853121883094, 0.45)
    pt3dadd(-315.43715619347, 843.318586904847, 88.9606922485699, 0.45)
    pt3dadd(-315.806912100029, 844.241467821345, 89.0682626140458, 0.45)
    pt3dadd(-316.176668006588, 845.164348737843, 89.1758329795217, 0.45)
    pt3dadd(-316.546423913147, 846.087229654341, 89.2834033449976, 0.45)
    pt3dadd(-316.916179819706, 847.010110570839, 89.3909737104735, 0.45)
    pt3dadd(-317.285935726266, 847.932991487337, 89.4985440759494, 0.45)
    pt3dadd(-317.655691632825, 848.855872403835, 89.6061144414253, 0.45)
    pt3dadd(-318.025447539384, 849.778753320333, 89.7136848069012, 0.45)
    pt3dadd(-318.395203445943, 850.70163423683, 89.8212551723771, 0.45)
    pt3dadd(-318.764959352502, 851.624515153328, 89.928825537853, 0.45)
    pt3dadd(-319.134715259061, 852.547396069826, 90.0363959033289, 0.45)
    pt3dadd(-319.50447116562, 853.470276986324, 90.1439662688048, 0.45)
    pt3dadd(-319.874227072179, 854.393157902822, 90.2515366342807, 0.45)
    pt3dadd(-320.243982978738, 855.31603881932, 90.3591069997566, 0.45)
    pt3dadd(-320.613738885297, 856.238919735818, 90.4666773652325, 0.45)
    pt3dadd(-320.983494791856, 857.161800652316, 90.5742477307084, 0.45)
    pt3dadd(-321.353250698415, 858.084681568814, 90.6818180961843, 0.45)
    pt3dadd(-321.723006604974, 859.007562485312, 90.7893884616602, 0.45)
    pt3dadd(-322.092762511533, 859.93044340181, 90.8969588271361, 0.45)
    pt3dadd(-322.462518418093, 860.853324318308, 91.004529192612, 0.45)
    pt3dadd(-322.832274324652, 861.776205234806, 91.1120995580879, 0.45)
    pt3dadd(-323.202030231211, 862.699086151304, 91.2196699235638, 0.45)
    pt3dadd(-323.57178613777, 863.621967067801, 91.3272402890397, 0.45)
    pt3dadd(-323.941542044329, 864.544847984299, 91.4348106545156, 0.45)
    pt3dadd(-324.311297950888, 865.467728900797, 91.5423810199915, 0.45)
    pt3dadd(-324.681053857447, 866.390609817295, 91.6499513854674, 0.45)
    pt3dadd(-325.050809764006, 867.313490733793, 91.7575217509433, 0.45)
    pt3dadd(-325.420565670565, 868.236371650291, 91.8650921164192, 0.45)
    pt3dadd(-325.790321577124, 869.159252566789, 91.9726624818951, 0.45)
    pt3dadd(-326.160077483683, 870.082133483287, 92.080232847371, 0.45)
    pt3dadd(-326.529833390242, 871.005014399785, 92.1878032128469, 0.45)
    pt3dadd(-326.899589296801, 871.927895316283, 92.2953735783228, 0.45)
    pt3dadd(-327.269345203361, 872.850776232781, 92.4029439437987, 0.45)
    pt3dadd(-327.63910110992, 873.773657149279, 92.5105143092746, 0.45)
    pt3dadd(-328.008857016479, 874.696538065777, 92.6180846747505, 0.45)
    pt3dadd(-328.378612923038, 875.619418982275, 92.7256550402264, 0.45)
    pt3dadd(-328.748368829597, 876.542299898773, 92.8332254057024, 0.45)
    pt3dadd(-329.118124736156, 877.46518081527, 92.9407957711782, 0.45)
    pt3dadd(-329.487880642715, 878.388061731768, 93.0483661366542, 0.45)
    pt3dadd(-329.857636549274, 879.310942648266, 93.15593650213, 0.45)
    pt3dadd(-330.227392455833, 880.233823564764, 93.263506867606, 0.45)
    pt3dadd(-330.597148362392, 881.156704481262, 93.3710772330818, 0.45)
    pt3dadd(-330.966904268951, 882.07958539776, 93.4786475985578, 0.45)
    pt3dadd(-331.33666017551, 883.002466314258, 93.5862179640337, 0.45)
    pt3dadd(-331.706416082069, 883.925347230756, 93.6937883295096, 0.45)
    pt3dadd(-332.076171988628, 884.848228147254, 93.8013586949855, 0.45)
    pt3dadd(-332.445927895188, 885.771109063752, 93.9089290604614, 0.45)
    pt3dadd(-332.815683801747, 886.69398998025, 94.0164994259373, 0.45)
    pt3dadd(-333.185439708306, 887.616870896748, 94.1240697914132, 0.45)
    pt3dadd(-333.555195614865, 888.539751813246, 94.2316401568891, 0.45)
    pt3dadd(-333.924951521424, 889.462632729744, 94.339210522365, 0.45)
    pt3dadd(-334.294707427983, 890.385513646241, 94.4467808878409, 0.45)
    pt3dadd(-334.664463334542, 891.308394562739, 94.5543512533168, 0.45)
    pt3dadd(-335.034219241101, 892.231275479237, 94.6619216187927, 0.45)
    pt3dadd(-335.40397514766, 893.154156395735, 94.7694919842686, 0.45)
    pt3dadd(-335.773731054219, 894.077037312233, 94.8770623497445, 0.45)
    pt3dadd(-336.143486960778, 894.999918228731, 94.9846327152204, 0.45)
    pt3dadd(-336.513242867337, 895.922799145229, 95.0922030806963, 0.45)
    pt3dadd(-336.882998773896, 896.845680061727, 95.1997734461722, 0.45)
    pt3dadd(-337.252754680455, 897.768560978225, 95.3073438116481, 0.45)
    pt3dadd(-337.622510587015, 898.691441894723, 95.414914177124, 0.45)
    pt3dadd(-337.992266493574, 899.614322811221, 95.5224845425999, 0.45)
    pt3dadd(-338.362022400133, 900.537203727719, 95.6300549080758, 0.45)
    pt3dadd(-338.731778306692, 901.460084644217, 95.7376252735517, 0.45)
    pt3dadd(-339.101534213251, 902.382965560715, 95.8451956390276, 0.45)
    pt3dadd(-339.47129011981, 903.305846477212, 95.9527660045035, 0.45)
    pt3dadd(-339.841046026369, 904.22872739371, 96.0603363699794, 0.45)
    pt3dadd(-340.210801932928, 905.151608310208, 96.1679067354553, 0.45)
    pt3dadd(-340.580557839487, 906.074489226706, 96.2754771009312, 0.45)
    pt3dadd(-340.950313746046, 906.997370143204, 96.3830474664071, 0.45)
    pt3dadd(-341.320069652605, 907.920251059702, 96.490617831883, 0.45)
    pt3dadd(-341.689825559164, 908.8431319762, 96.5981881973589, 0.45)
    pt3dadd(-342.059581465723, 909.766012892698, 96.7057585628348, 0.45)
    pt3dadd(-342.429337372282, 910.688893809196, 96.8133289283107, 0.45)
    pt3dadd(-342.799093278842, 911.611774725694, 96.9208992937866, 0.45)
    pt3dadd(-343.168849185401, 912.534655642192, 97.0284696592625, 0.45)
    pt3dadd(-343.53860509196, 913.45753655869, 97.1360400247384, 0.45)
    pt3dadd(-343.908360998519, 914.380417475188, 97.2436103902143, 0.45)
    pt3dadd(-344.278116905078, 915.303298391686, 97.3511807556902, 0.45)
    pt3dadd(-344.647872811637, 916.226179308183, 97.4587511211661, 0.45)
    pt3dadd(-345.017628718196, 917.149060224681, 97.566321486642, 0.45)
    pt3dadd(-345.387384624755, 918.071941141179, 97.6738918521179, 0.45)
    pt3dadd(-345.757140531314, 918.994822057677, 97.7814622175938, 0.45)
    pt3dadd(-346.126896437873, 919.917702974175, 97.8890325830697, 0.45)
    pt3dadd(-346.496652344432, 920.840583890673, 97.9966029485456, 0.45)
    pt3dadd(-346.866408250991, 921.763464807171, 98.1041733140215, 0.45)
    pt3dadd(-347.23616415755, 922.686345723669, 98.2117436794974, 0.45)
    pt3dadd(-347.60592006411, 923.609226640167, 98.3193140449733, 0.45)
    pt3dadd(-347.975675970669, 924.532107556665, 98.4268844104492, 0.45)
    pt3dadd(-348.345431877228, 925.454988473163, 98.5344547759251, 0.45)
    pt3dadd(-348.715187783787, 926.377869389661, 98.642025141401, 0.45)
    pt3dadd(-349.084943690346, 927.300750306159, 98.7495955068769, 0.45)
    pt3dadd(-349.454699596905, 928.223631222657, 98.8571658723528, 0.45)
    pt3dadd(-349.824455503464, 929.146512139155, 98.9647362378287, 0.45)
    pt3dadd(-350.194211410023, 930.069393055652, 99.0723066033046, 0.45)
    pt3dadd(-350.563967316582, 930.99227397215, 99.1798769687805, 0.45)
    pt3dadd(-350.933723223141, 931.915154888648, 99.2874473342564, 0.45)
    pt3dadd(-351.3034791297, 932.838035805146, 99.3950176997323, 0.45)
    pt3dadd(-351.673235036259, 933.760916721644, 99.5025880652082, 0.45)
    pt3dadd(-352.042990942818, 934.683797638142, 99.6101584306841, 0.45)
    pt3dadd(-352.412746849377, 935.60667855464, 99.71772879616, 0.45)
    pt3dadd(-352.782502755936, 936.529559471138, 99.8252991616359, 0.45)
    pt3dadd(-353.152258662496, 937.452440387636, 99.9328695271118, 0.45)
    pt3dadd(-353.522014569055, 938.375321304134, 100.040439892588, 0.45)
    pt3dadd(-353.891770475614, 939.298202220632, 100.148010258064, 0.45)
    pt3dadd(-354.261526382173, 940.22108313713, 100.25558062354, 0.45)
    pt3dadd(-354.631282288732, 941.143964053628, 100.363150989015, 0.45)
    pt3dadd(-355.001038195291, 942.066844970126, 100.470721354491, 0.45)
    pt3dadd(-355.37079410185, 942.989725886623, 100.578291719967, 0.45)
    pt3dadd(-355.740550008409, 943.912606803121, 100.685862085443, 0.45)
    pt3dadd(-356.110305914968, 944.835487719619, 100.793432450919, 0.45)
    pt3dadd(-356.480061821527, 945.758368636117, 100.901002816395, 0.45)
    pt3dadd(-356.849817728086, 946.681249552615, 101.008573181871, 0.45)
    pt3dadd(-357.219573634645, 947.604130469113, 101.116143547347, 0.45)
    pt3dadd(-357.589329541204, 948.527011385611, 101.223713912823, 0.45)
    pt3dadd(-357.959085447764, 949.449892302109, 101.331284278299, 0.45)
    pt3dadd(-358.328841354323, 950.372773218607, 101.438854643774, 0.45)
    pt3dadd(-358.698597260882, 951.295654135105, 101.54642500925, 0.45)
    pt3dadd(-359.068353167441, 952.218535051603, 101.653995374726, 0.45)
    pt3dadd(-359.438109074, 953.141415968101, 101.761565740202, 0.45)
    pt3dadd(-359.807864980559, 954.064296884599, 101.869136105678, 0.45)
    pt3dadd(-360.177620887118, 954.987177801097, 101.976706471154, 0.45)
    pt3dadd(-360.547376793677, 955.910058717594, 102.08427683663, 0.45)
    pt3dadd(-360.917132700236, 956.832939634092, 102.191847202106, 0.45)
    pt3dadd(-361.286888606795, 957.75582055059, 102.299417567582, 0.45)
    pt3dadd(-361.656644513354, 958.678701467088, 102.406987933058, 0.45)
    pt3dadd(-362.026400419913, 959.601582383586, 102.514558298533, 0.45)
    pt3dadd(-362.396156326472, 960.524463300084, 102.622128664009, 0.45)
    pt3dadd(-362.765912233031, 961.447344216582, 102.729699029485, 0.45)
    pt3dadd(-363.135668139591, 962.37022513308, 102.837269394961, 0.45)
    pt3dadd(-363.50542404615, 963.293106049578, 102.944839760437, 0.45)
    pt3dadd(-363.875179952709, 964.215986966076, 103.052410125913, 0.45)
    pt3dadd(-364.244935859268, 965.138867882574, 103.159980491389, 0.45)
    pt3dadd(-364.614691765827, 966.061748799072, 103.267550856865, 0.45)
    pt3dadd(-364.984447672386, 966.98462971557, 103.375121222341, 0.45)
    pt3dadd(-365.354203578945, 967.907510632068, 103.482691587817, 0.45)
    pt3dadd(-365.723959485504, 968.830391548565, 103.590261953292, 0.45)
    pt3dadd(-366.093715392063, 969.753272465063, 103.697832318768, 0.45)
    pt3dadd(-366.463471298622, 970.676153381561, 103.805402684244, 0.45)
    pt3dadd(-366.833227205181, 971.599034298059, 103.91297304972, 0.45)
    pt3dadd(-367.20298311174, 972.521915214557, 104.020543415196, 0.45)
    pt3dadd(-367.572739018299, 973.444796131055, 104.128113780672, 0.45)
    pt3dadd(-367.942494924858, 974.367677047553, 104.235684146148, 0.45)
    pt3dadd(-368.312250831418, 975.290557964051, 104.343254511624, 0.45)
    pt3dadd(-368.682006737977, 976.213438880549, 104.4508248771, 0.45)
    pt3dadd(-369.051762644536, 977.136319797047, 104.558395242576, 0.45)
    pt3dadd(-369.421518551095, 978.059200713545, 104.665965608051, 0.45)
    pt3dadd(-369.791274457654, 978.982081630043, 104.773535973527, 0.45)
    pt3dadd(-370.161030364213, 979.904962546541, 104.881106339003, 0.45)
    pt3dadd(-370.530786270772, 980.827843463039, 104.988676704479, 0.45)
    pt3dadd(-370.900542177331, 981.750724379537, 105.096247069955, 0.45)
    pt3dadd(-371.27029808389, 982.673605296034, 105.203817435431, 0.45)
    pt3dadd(-371.640053990449, 983.596486212532, 105.311387800907, 0.45)
    pt3dadd(-372.009809897008, 984.51936712903, 105.418958166383, 0.45)
    pt3dadd(-372.379565803567, 985.442248045528, 105.526528531859, 0.45)
    pt3dadd(-372.749321710126, 986.365128962026, 105.634098897335, 0.45)
    pt3dadd(-373.119077616686, 987.288009878524, 105.74166926281, 0.45)
    pt3dadd(-373.488833523245, 988.210890795022, 105.849239628286, 0.45)
    pt3dadd(-373.858589429804, 989.13377171152, 105.956809993762, 0.45)
    pt3dadd(-374.228345336363, 990.056652628018, 106.064380359238, 0.45)
    pt3dadd(-374.598101242922, 990.979533544516, 106.171950724714, 0.45)
    pt3dadd(-374.967857149481, 991.902414461014, 106.27952109019, 0.45)
    pt3dadd(-375.33761305604, 992.825295377512, 106.387091455666, 0.45)
    pt3dadd(-375.707368962599, 993.74817629401, 106.494661821142, 0.45)
    pt3dadd(-376.077124869158, 994.671057210508, 106.602232186618, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-376.446880775717, 995.593938127005, 106.709802552094, 0.45)
    pt3dadd(-376.816636682276, 996.516819043503, 106.817372917569, 0.45)
    pt3dadd(-377.186392588835, 997.439699960001, 106.924943283045, 0.45)
    pt3dadd(-377.556148495394, 998.362580876499, 107.032513648521, 0.45)
    pt3dadd(-377.925904401953, 999.285461792997, 107.140084013997, 0.45)
    pt3dadd(-378.295660308513, 1000.2083427095, 107.247654379473, 0.45)
    pt3dadd(-378.665416215072, 1001.13122362599, 107.355224744949, 0.45)
    pt3dadd(-379.035172121631, 1002.05410454249, 107.462795110425, 0.45)
    pt3dadd(-379.40492802819, 1002.97698545899, 107.570365475901, 0.45)
    pt3dadd(-379.774683934749, 1003.89986637549, 107.677935841377, 0.45)
    pt3dadd(-380.144439841308, 1004.82274729198, 107.785506206853, 0.45)
    pt3dadd(-380.514195747867, 1005.74562820848, 107.893076572328, 0.45)
    pt3dadd(-380.883951654426, 1006.66850912498, 108.000646937804, 0.45)
    pt3dadd(-381.253707560985, 1007.59139004148, 108.10821730328, 0.45)
    pt3dadd(-381.623463467544, 1008.51427095798, 108.215787668756, 0.45)
    pt3dadd(-381.993219374103, 1009.43715187447, 108.323358034232, 0.45)
    pt3dadd(-382.362975280662, 1010.36003279097, 108.430928399708, 0.45)
    pt3dadd(-382.732731187221, 1011.28291370747, 108.538498765184, 0.45)
    pt3dadd(-383.10248709378, 1012.20579462397, 108.64606913066, 0.45)
    pt3dadd(-383.47224300034, 1013.12867554047, 108.753639496136, 0.45)
    pt3dadd(-383.841998906899, 1014.05155645696, 108.861209861612, 0.45)
    pt3dadd(-384.211754813458, 1014.97443737346, 108.968780227087, 0.45)
    pt3dadd(-384.581510720017, 1015.89731828996, 109.076350592563, 0.45)
    pt3dadd(-384.951266626576, 1016.82019920646, 109.183920958039, 0.45)
    pt3dadd(-385.321022533135, 1017.74308012296, 109.291491323515, 0.45)
    pt3dadd(-385.690778439694, 1018.66596103945, 109.399061688991, 0.45)
    pt3dadd(-386.060534346253, 1019.58884195595, 109.506632054467, 0.45)
    pt3dadd(-386.430290252812, 1020.51172287245, 109.614202419943, 0.45)
    pt3dadd(-386.800046159371, 1021.43460378895, 109.721772785419, 0.45)
    pt3dadd(-387.16980206593, 1022.35748470545, 109.829343150895, 0.45)
    pt3dadd(-387.539557972489, 1023.28036562194, 109.936913516371, 0.45)
    pt3dadd(-387.909313879048, 1024.20324653844, 110.044483881846, 0.45)
    pt3dadd(-388.279069785607, 1025.12612745494, 110.152054247322, 0.45)
    pt3dadd(-388.648825692167, 1026.04900837144, 110.259624612798, 0.45)
    pt3dadd(-389.018581598726, 1026.97188928794, 110.367194978274, 0.45)
    pt3dadd(-389.388337505285, 1027.89477020443, 110.47476534375, 0.45)
    pt3dadd(-389.758093411844, 1028.81765112093, 110.582335709226, 0.45)
    pt3dadd(-390.127849318403, 1029.74053203743, 110.689906074702, 0.45)
    pt3dadd(-390.497605224962, 1030.66341295393, 110.797476440178, 0.45)
    pt3dadd(-390.867361131521, 1031.58629387042, 110.905046805654, 0.45)
    pt3dadd(-391.23711703808, 1032.50917478692, 111.01261717113, 0.45)
    pt3dadd(-391.606872944639, 1033.43205570342, 111.120187536605, 0.45)
    pt3dadd(-391.976628851198, 1034.35493661992, 111.227757902081, 0.45)
    pt3dadd(-392.346384757757, 1035.27781753642, 111.335328267557, 0.45)
    pt3dadd(-392.716140664316, 1036.20069845291, 111.442898633033, 0.45)
    pt3dadd(-393.085896570875, 1037.12357936941, 111.550468998509, 0.45)
    pt3dadd(-393.455652477435, 1038.04646028591, 111.658039363985, 0.45)
    pt3dadd(-393.825408383994, 1038.96934120241, 111.765609729461, 0.45)
    pt3dadd(-394.195164290553, 1039.89222211891, 111.873180094937, 0.45)
    pt3dadd(-394.564920197112, 1040.8151030354, 111.980750460413, 0.45)
    pt3dadd(-394.934676103671, 1041.7379839519, 112.088320825889, 0.45)
    pt3dadd(-395.30443201023, 1042.6608648684, 112.195891191364, 0.45)
    pt3dadd(-395.674187916789, 1043.5837457849, 112.30346155684, 0.45)
    pt3dadd(-396.043943823348, 1044.5066267014, 112.411031922316, 0.45)
    pt3dadd(-396.413699729907, 1045.42950761789, 112.518602287792, 0.45)
    pt3dadd(-396.783455636466, 1046.35238853439, 112.626172653268, 0.45)
    pt3dadd(-397.153211543025, 1047.27526945089, 112.733743018744, 0.45)
    pt3dadd(-397.522967449584, 1048.19815036739, 112.84131338422, 0.45)
    pt3dadd(-397.892723356143, 1049.12103128389, 112.948883749696, 0.45)
    pt3dadd(-398.262479262702, 1050.04391220038, 113.056454115172, 0.45)
    pt3dadd(-398.632235169261, 1050.96679311688, 113.164024480648, 0.45)
    pt3dadd(-399.001991075821, 1051.88967403338, 113.271594846123, 0.45)
    pt3dadd(-399.37174698238, 1052.81255494988, 113.379165211599, 0.45)
    pt3dadd(-399.741502888939, 1053.73543586638, 113.486735577075, 0.45)
    pt3dadd(-400.111258795498, 1054.65831678287, 113.594305942551, 0.45)
    pt3dadd(-400.481014702057, 1055.58119769937, 113.701876308027, 0.45)
    pt3dadd(-400.850770608616, 1056.50407861587, 113.809446673503, 0.45)
    pt3dadd(-401.220526515175, 1057.42695953237, 113.917017038979, 0.45)
    pt3dadd(-401.590282421734, 1058.34984044886, 114.024587404455, 0.45)
    pt3dadd(-401.960038328293, 1059.27272136536, 114.132157769931, 0.45)
    pt3dadd(-402.329794234852, 1060.19560228186, 114.239728135407, 0.45)
    pt3dadd(-402.699550141411, 1061.11848319836, 114.347298500883, 0.45)
    pt3dadd(-403.06930604797, 1062.04136411486, 114.454868866358, 0.45)
    pt3dadd(-403.439061954529, 1062.96424503135, 114.562439231834, 0.45)
    pt3dadd(-403.808817861089, 1063.88712594785, 114.67000959731, 0.45)
    pt3dadd(-404.178573767648, 1064.81000686435, 114.777579962786, 0.45)
    pt3dadd(-404.548329674207, 1065.73288778085, 114.885150328262, 0.45)
    pt3dadd(-404.918085580766, 1066.65576869735, 114.992720693738, 0.45)
    pt3dadd(-405.287841487325, 1067.57864961384, 115.100291059214, 0.45)
    pt3dadd(-405.657597393884, 1068.50153053034, 115.20786142469, 0.45)
    pt3dadd(-406.027353300443, 1069.42441144684, 115.315431790166, 0.45)
    pt3dadd(-406.397109207002, 1070.34729236334, 115.423002155642, 0.45)
    pt3dadd(-406.766865113561, 1071.27017327984, 115.530572521117, 0.45)
    pt3dadd(-407.13662102012, 1072.19305419633, 115.638142886593, 0.45)
    pt3dadd(-407.506376926679, 1073.11593511283, 115.745713252069, 0.45)
    pt3dadd(-407.876132833238, 1074.03881602933, 115.853283617545, 0.45)
    pt3dadd(-408.245888739797, 1074.96169694583, 115.960853983021, 0.45)
    pt3dadd(-408.615644646356, 1075.88457786233, 116.068424348497, 0.45)
    pt3dadd(-408.985400552916, 1076.80745877882, 116.175994713973, 0.45)
    pt3dadd(-409.355156459475, 1077.73033969532, 116.283565079449, 0.45)
    pt3dadd(-409.724912366034, 1078.65322061182, 116.391135444925, 0.45)
    pt3dadd(-410.094668272593, 1079.57610152832, 116.498705810401, 0.45)
    pt3dadd(-410.464424179152, 1080.49898244482, 116.606276175876, 0.45)
    pt3dadd(-410.834180085711, 1081.42186336131, 116.713846541352, 0.45)
    pt3dadd(-411.20393599227, 1082.34474427781, 116.821416906828, 0.45)
    pt3dadd(-411.573691898829, 1083.26762519431, 116.928987272304, 0.45)
    pt3dadd(-411.943447805388, 1084.19050611081, 117.03655763778, 0.45)
    pt3dadd(-412.313203711947, 1085.1133870273, 117.144128003256, 0.45)
    pt3dadd(-412.682959618506, 1086.0362679438, 117.251698368732, 0.45)
    pt3dadd(-413.052715525065, 1086.9591488603, 117.359268734208, 0.45)
    pt3dadd(-413.422471431624, 1087.8820297768, 117.466839099684, 0.45)
    pt3dadd(-413.792227338183, 1088.8049106933, 117.57440946516, 0.45)
    pt3dadd(-414.161983244743, 1089.72779160979, 117.681979830635, 0.45)
    pt3dadd(-414.531739151302, 1090.65067252629, 117.789550196111, 0.45)
    pt3dadd(-414.901495057861, 1091.57355344279, 117.897120561587, 0.45)
    pt3dadd(-415.27125096442, 1092.49643435929, 118.004690927063, 0.45)
    pt3dadd(-415.641006870979, 1093.41931527579, 118.112261292539, 0.45)
    pt3dadd(-416.010762777538, 1094.34219619228, 118.219831658015, 0.45)
    pt3dadd(-416.380518684097, 1095.26507710878, 118.327402023491, 0.45)
    pt3dadd(-416.750274590656, 1096.18795802528, 118.434972388967, 0.45)
    pt3dadd(-417.120030497215, 1097.11083894178, 118.542542754443, 0.45)
    pt3dadd(-417.489786403774, 1098.03371985828, 118.650113119919, 0.45)
    pt3dadd(-417.859542310333, 1098.95660077477, 118.757683485394, 0.45)
    pt3dadd(-418.229298216892, 1099.87948169127, 118.86525385087, 0.45)
    pt3dadd(-418.599054123451, 1100.80236260777, 118.972824216346, 0.45)
    pt3dadd(-418.968810030011, 1101.72524352427, 119.080394581822, 0.45)
    pt3dadd(-419.33856593657, 1102.64812444077, 119.187964947298, 0.45)
    pt3dadd(-419.708321843129, 1103.57100535726, 119.295535312774, 0.45)
    pt3dadd(-420.078077749688, 1104.49388627376, 119.40310567825, 0.45)
    pt3dadd(-420.447833656247, 1105.41676719026, 119.510676043726, 0.45)
    pt3dadd(-420.817589562806, 1106.33964810676, 119.618246409202, 0.45)
    pt3dadd(-421.187345469365, 1107.26252902326, 119.725816774678, 0.45)
    pt3dadd(-421.557101375924, 1108.18540993975, 119.833387140153, 0.45)
    pt3dadd(-421.926857282483, 1109.10829085625, 119.940957505629, 0.45)
    pt3dadd(-422.296613189042, 1110.03117177275, 120.048527871105, 0.45)
    pt3dadd(-422.666369095601, 1110.95405268925, 120.156098236581, 0.45)
    pt3dadd(-423.03612500216, 1111.87693360574, 120.263668602057, 0.45)
    pt3dadd(-423.405880908719, 1112.79981452224, 120.371238967533, 0.45)
    pt3dadd(-423.775636815278, 1113.72269543874, 120.478809333009, 0.45)
    pt3dadd(-424.145392721838, 1114.64557635524, 120.586379698485, 0.45)
    pt3dadd(-424.515148628397, 1115.56845727174, 120.693950063961, 0.45)
    pt3dadd(-424.884904534956, 1116.49133818823, 120.801520429437, 0.45)
    pt3dadd(-425.254660441515, 1117.41421910473, 120.909090794912, 0.45)
    pt3dadd(-425.624416348074, 1118.33710002123, 121.016661160388, 0.45)
    pt3dadd(-425.994172254633, 1119.25998093773, 121.124231525864, 0.45)
    pt3dadd(-426.363928161192, 1120.18286185423, 121.23180189134, 0.45)
    pt3dadd(-426.733684067751, 1121.10574277072, 121.339372256816, 0.45)
    pt3dadd(-427.10343997431, 1122.02862368722, 121.446942622292, 0.45)
    pt3dadd(-427.473195880869, 1122.95150460372, 121.554512987768, 0.45)
    pt3dadd(-427.842951787428, 1123.87438552022, 121.662083353244, 0.45)
    pt3dadd(-428.212707693987, 1124.79726643672, 121.76965371872, 0.45)
    pt3dadd(-428.582463600546, 1125.72014735321, 121.877224084196, 0.45)
    pt3dadd(-428.952219507105, 1126.64302826971, 121.984794449671, 0.45)
    pt3dadd(-429.321975413665, 1127.56590918621, 122.092364815147, 0.45)
    pt3dadd(-429.691731320224, 1128.48879010271, 122.199935180623, 0.45)
    pt3dadd(-430.061487226783, 1129.41167101921, 122.307505546099, 0.45)
    pt3dadd(-430.431243133342, 1130.3345519357, 122.415075911575, 0.45)
    pt3dadd(-430.800999039901, 1131.2574328522, 122.522646277051, 0.45)
    pt3dadd(-431.17075494646, 1132.1803137687, 122.630216642527, 0.45)
    pt3dadd(-431.540510853019, 1133.1031946852, 122.737787008003, 0.45)
    pt3dadd(-431.910266759578, 1134.0260756017, 122.845357373479, 0.45)
    pt3dadd(-432.280022666137, 1134.94895651819, 122.952927738955, 0.45)
    pt3dadd(-432.649778572696, 1135.87183743469, 123.06049810443, 0.45)
    pt3dadd(-433.019534479255, 1136.79471835119, 123.168068469906, 0.45)
    pt3dadd(-433.389290385814, 1137.71759926769, 123.275638835382, 0.45)
    pt3dadd(-433.759046292373, 1138.64048018418, 123.383209200858, 0.45)
    pt3dadd(-434.128802198932, 1139.56336110068, 123.490779566334, 0.45)
    pt3dadd(-434.498558105492, 1140.48624201718, 123.59834993181, 0.45)
    pt3dadd(-434.868314012051, 1141.40912293368, 123.705920297286, 0.45)
    pt3dadd(-435.23806991861, 1142.33200385018, 123.813490662762, 0.45)
    pt3dadd(-435.607825825169, 1143.25488476667, 123.921061028238, 0.45)
    pt3dadd(-435.977581731728, 1144.17776568317, 124.028631393714, 0.45)
    pt3dadd(-436.347337638287, 1145.10064659967, 124.136201759189, 0.45)
    pt3dadd(-436.717093544846, 1146.02352751617, 124.243772124665, 0.45)
    pt3dadd(-437.086849451405, 1146.94640843267, 124.351342490141, 0.45)
    pt3dadd(-437.456605357964, 1147.86928934916, 124.458912855617, 0.45)
    pt3dadd(-437.826361264523, 1148.79217026566, 124.566483221093, 0.45)
    pt3dadd(-438.196117171082, 1149.71505118216, 124.674053586569, 0.45)
    pt3dadd(-438.565873077641, 1150.63793209866, 124.781623952045, 0.45)
    pt3dadd(-438.9356289842, 1151.56081301516, 124.889194317521, 0.45)
    pt3dadd(-439.30538489076, 1152.48369393165, 124.996764682997, 0.45)
    pt3dadd(-439.675140797319, 1153.40657484815, 125.104335048473, 0.45)
    pt3dadd(-440.044896703878, 1154.32945576465, 125.211905413948, 0.45)
    pt3dadd(-440.414652610437, 1155.25233668115, 125.319475779424, 0.45)
    pt3dadd(-440.784408516996, 1156.17521759765, 125.4270461449, 0.45)
    pt3dadd(-441.154164423555, 1157.09809851414, 125.534616510376, 0.45)
    pt3dadd(-441.523920330114, 1158.02097943064, 125.642186875852, 0.45)
    pt3dadd(-441.893676236673, 1158.94386034714, 125.749757241328, 0.45)
    pt3dadd(-442.263432143232, 1159.86674126364, 125.857327606804, 0.45)
    pt3dadd(-442.633188049791, 1160.78962218014, 125.96489797228, 0.45)
    pt3dadd(-443.00294395635, 1161.71250309663, 126.072468337756, 0.45)
    pt3dadd(-443.372699862909, 1162.63538401313, 126.180038703232, 0.45)
    pt3dadd(-443.742455769468, 1163.55826492963, 126.287609068707, 0.45)
    pt3dadd(-444.112211676027, 1164.48114584613, 126.395179434183, 0.45)
    pt3dadd(-444.481967582586, 1165.40402676262, 126.502749799659, 0.45)
    pt3dadd(-444.851723489146, 1166.32690767912, 126.610320165135, 0.45)
    pt3dadd(-445.221479395705, 1167.24978859562, 126.717890530611, 0.45)
    pt3dadd(-445.591235302264, 1168.17266951212, 126.825460896087, 0.45)
    pt3dadd(-445.960991208823, 1169.09555042862, 126.933031261563, 0.45)
    pt3dadd(-446.330747115382, 1170.01843134511, 127.040601627039, 0.45)
    pt3dadd(-446.700503021941, 1170.94131226161, 127.148171992515, 0.45)
    pt3dadd(-447.0702589285, 1171.86419317811, 127.255742357991, 0.45)
    pt3dadd(-447.440014835059, 1172.78707409461, 127.363312723466, 0.45)
    pt3dadd(-447.809770741618, 1173.70995501111, 127.470883088942, 0.45)
    pt3dadd(-448.179526648177, 1174.6328359276, 127.578453454418, 0.45)
    pt3dadd(-448.549282554736, 1175.5557168441, 127.686023819894, 0.45)
    pt3dadd(-448.919038461295, 1176.4785977606, 127.79359418537, 0.45)
    pt3dadd(-449.288794367854, 1177.4014786771, 127.901164550846, 0.45)
    pt3dadd(-449.658550274414, 1178.3243595936, 128.008734916322, 0.45)
    pt3dadd(-450.028306180973, 1179.24724051009, 128.116305281798, 0.45)
    pt3dadd(-450.398062087532, 1180.17012142659, 128.223875647274, 0.45)
    pt3dadd(-450.767817994091, 1181.09300234309, 128.33144601275, 0.45)
    pt3dadd(-451.13757390065, 1182.01588325959, 128.439016378225, 0.45)
    pt3dadd(-451.507329807209, 1182.93876417609, 128.546586743701, 0.45)
    pt3dadd(-451.877085713768, 1183.86164509258, 128.654157109177, 0.45)
    pt3dadd(-452.246841620327, 1184.78452600908, 128.761727474653, 0.45)
    pt3dadd(-452.616597526886, 1185.70740692558, 128.869297840129, 0.45)
    pt3dadd(-452.986353433445, 1186.63028784208, 128.976868205605, 0.45)
    pt3dadd(-453.356109340004, 1187.55316875857, 129.084438571081, 0.45)
    pt3dadd(-453.725865246563, 1188.47604967507, 129.192008936557, 0.45)
    pt3dadd(-454.095621153122, 1189.39893059157, 129.299579302033, 0.45)
    pt3dadd(-454.465377059681, 1190.32181150807, 129.407149667509, 0.45)
    pt3dadd(-454.835132966241, 1191.24469242457, 129.514720032985, 0.45)
    pt3dadd(-455.2048888728, 1192.16757334106, 129.62229039846, 0.45)
    pt3dadd(-455.574644779359, 1193.09045425756, 129.729860763936, 0.45)
    pt3dadd(-455.944400685918, 1194.01333517406, 129.837431129412, 0.45)
    pt3dadd(-456.314156592477, 1194.93621609056, 129.945001494888, 0.45)
    pt3dadd(-456.683912499036, 1195.85909700706, 130.052571860364, 0.45)
    pt3dadd(-457.053668405595, 1196.78197792355, 130.16014222584, 0.45)
    pt3dadd(-457.423424312154, 1197.70485884005, 130.267712591316, 0.45)
    pt3dadd(-457.793180218713, 1198.62773975655, 130.375282956792, 0.45)
    pt3dadd(-458.162936125272, 1199.55062067305, 130.482853322268, 0.45)
    pt3dadd(-458.532692031831, 1200.47350158955, 130.590423687744, 0.45)
    pt3dadd(-458.90244793839, 1201.39638250604, 130.697994053219, 0.45)
    pt3dadd(-459.272203844949, 1202.31926342254, 130.805564418695, 0.45)
    pt3dadd(-459.641959751508, 1203.24214433904, 130.913134784171, 0.45)
    pt3dadd(-460.011715658068, 1204.16502525554, 131.020705149647, 0.45)
    pt3dadd(-460.381471564627, 1205.08790617204, 131.128275515123, 0.45)
    pt3dadd(-460.751227471186, 1206.01078708853, 131.235845880599, 0.45)
    pt3dadd(-461.120983377745, 1206.93366800503, 131.343416246075, 0.45)
    pt3dadd(-461.490739284304, 1207.85654892153, 131.450986611551, 0.45)
    pt3dadd(-461.860495190863, 1208.77942983803, 131.558556977027, 0.45)
    pt3dadd(-462.230251097422, 1209.70231075453, 131.666127342503, 0.45)
    pt3dadd(-462.600007003981, 1210.62519167102, 131.773697707978, 0.45)
    pt3dadd(-462.96976291054, 1211.54807258752, 131.881268073454, 0.45)
    pt3dadd(-463.339518817099, 1212.47095350402, 131.98883843893, 0.45)
    pt3dadd(-463.709274723658, 1213.39383442052, 132.096408804406, 0.45)
    pt3dadd(-464.079030630217, 1214.31671533702, 132.203979169882, 0.45)
    pt3dadd(-464.448786536776, 1215.23959625351, 132.311549535358, 0.45)
    pt3dadd(-464.818542443336, 1216.16247717001, 132.419119900834, 0.45)
    pt3dadd(-465.188298349895, 1217.08535808651, 132.52669026631, 0.45)
    pt3dadd(-465.558054256454, 1218.00823900301, 132.634260631786, 0.45)
    pt3dadd(-465.927810163013, 1218.9311199195, 132.741830997262, 0.45)
    pt3dadd(-466.297566069572, 1219.854000836, 132.849401362737, 0.45)
    pt3dadd(-466.667321976131, 1220.7768817525, 132.956971728213, 0.45)
    pt3dadd(-467.03707788269, 1221.699762669, 133.064542093689, 0.45)
    pt3dadd(-467.406833789249, 1222.6226435855, 133.172112459165, 0.45)
    pt3dadd(-467.776589695808, 1223.54552450199, 133.279682824641, 0.45)
    pt3dadd(-468.146345602367, 1224.46840541849, 133.387253190117, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-468.516101508926, 1225.39128633499, 133.494823555593, 0.45)
    pt3dadd(-468.885857415485, 1226.31416725149, 133.602393921069, 0.45)
    pt3dadd(-469.255613322044, 1227.23704816799, 133.709964286545, 0.45)
    pt3dadd(-469.625369228603, 1228.15992908448, 133.817534652021, 0.45)
    pt3dadd(-469.995125135162, 1229.08281000098, 133.925105017496, 0.45)
    pt3dadd(-470.364881041722, 1230.00569091748, 134.032675382972, 0.45)
    pt3dadd(-470.734636948281, 1230.92857183398, 134.140245748448, 0.45)
    pt3dadd(-471.10439285484, 1231.85145275048, 134.247816113924, 0.45)
    pt3dadd(-471.474148761399, 1232.77433366697, 134.3553864794, 0.45)
    pt3dadd(-471.843904667958, 1233.69721458347, 134.462956844876, 0.45)
    pt3dadd(-472.213660574517, 1234.62009549997, 134.570527210352, 0.45)
    pt3dadd(-472.583416481076, 1235.54297641647, 134.678097575828, 0.45)
    pt3dadd(-472.953172387635, 1236.46585733297, 134.785667941304, 0.45)
    pt3dadd(-473.322928294194, 1237.38873824946, 134.89323830678, 0.45)
    pt3dadd(-473.692684200753, 1238.31161916596, 135.000808672255, 0.45)
    pt3dadd(-474.062440107312, 1239.23450008246, 135.108379037731, 0.45)
    pt3dadd(-474.432196013871, 1240.15738099896, 135.215949403207, 0.45)
    pt3dadd(-474.80195192043, 1241.08026191545, 135.323519768683, 0.45)
    pt3dadd(-475.17170782699, 1242.00314283195, 135.431090134159, 0.45)
    pt3dadd(-475.541463733549, 1242.92602374845, 135.538660499635, 0.45)
    pt3dadd(-475.911219640108, 1243.84890466495, 135.646230865111, 0.45)
    pt3dadd(-476.280975546667, 1244.77178558145, 135.753801230587, 0.45)
    pt3dadd(-476.650731453226, 1245.69466649794, 135.861371596063, 0.45)
    pt3dadd(-477.020487359785, 1246.61754741444, 135.968941961539, 0.45)
    pt3dadd(-477.390243266344, 1247.54042833094, 136.076512327014, 0.45)
    pt3dadd(-477.759999172903, 1248.46330924744, 136.18408269249, 0.45)
    pt3dadd(-478.129755079462, 1249.38619016394, 136.291653057966, 0.45)
    pt3dadd(-478.499510986021, 1250.30907108043, 136.399223423442, 0.45)
    pt3dadd(-478.86926689258, 1251.23195199693, 136.506793788918, 0.45)
    pt3dadd(-479.239022799139, 1252.15483291343, 136.614364154394, 0.45)
    pt3dadd(-479.608778705698, 1253.07771382993, 136.72193451987, 0.45)
    pt3dadd(-479.978534612257, 1254.00059474643, 136.829504885346, 0.45)
    pt3dadd(-480.348290518817, 1254.92347566292, 136.937075250822, 0.45)
    pt3dadd(-480.718046425376, 1255.84635657942, 137.044645616298, 0.45)
    pt3dadd(-481.087802331935, 1256.76923749592, 137.152215981773, 0.45)
    pt3dadd(-481.457558238494, 1257.69211841242, 137.259786347249, 0.45)
    pt3dadd(-481.827314145053, 1258.61499932892, 137.367356712725, 0.45)
    pt3dadd(-482.197070051612, 1259.53788024541, 137.474927078201, 0.45)
    pt3dadd(-482.566825958171, 1260.46076116191, 137.582497443677, 0.45)
    pt3dadd(-482.93658186473, 1261.38364207841, 137.690067809153, 0.45)
    pt3dadd(-483.306337771289, 1262.30652299491, 137.797638174629, 0.45)
    pt3dadd(-483.676093677848, 1263.22940391141, 137.905208540105, 0.45)
    pt3dadd(-484.045849584407, 1264.1522848279, 138.012778905581, 0.45)
    pt3dadd(-484.415605490966, 1265.0751657444, 138.120349271057, 0.45)
    pt3dadd(-484.785361397525, 1265.9980466609, 138.227919636532, 0.45)
    pt3dadd(-485.155117304084, 1266.9209275774, 138.335490002008, 0.45)
    pt3dadd(-485.524873210644, 1267.8438084939, 138.443060367484, 0.45)
    pt3dadd(-485.894629117203, 1268.76668941039, 138.55063073296, 0.45)
    pt3dadd(-486.264385023762, 1269.68957032689, 138.658201098436, 0.45)
    pt3dadd(-486.634140930321, 1270.61245124339, 138.765771463912, 0.45)
    pt3dadd(-487.00389683688, 1271.53533215989, 138.873341829388, 0.45)
    pt3dadd(-487.373652743439, 1272.45821307638, 138.980912194864, 0.45)
    pt3dadd(-487.743408649998, 1273.38109399288, 139.08848256034, 0.45)
    pt3dadd(-488.113164556557, 1274.30397490938, 139.196052925816, 0.45)
    pt3dadd(-488.482920463116, 1275.22685582588, 139.303623291291, 0.45)
    pt3dadd(-488.852676369675, 1276.14973674238, 139.411193656767, 0.45)
    pt3dadd(-489.222432276234, 1277.07261765887, 139.518764022243, 0.45)
    pt3dadd(-489.592188182793, 1277.99549857537, 139.626334387719, 0.45)
    pt3dadd(-489.961944089352, 1278.91837949187, 139.733904753195, 0.45)
    pt3dadd(-490.331699995911, 1279.84126040837, 139.841475118671, 0.45)
    pt3dadd(-490.701455902471, 1280.76414132487, 139.949045484147, 0.45)
    pt3dadd(-491.07121180903, 1281.68702224136, 140.056615849623, 0.45)
    pt3dadd(-491.440967715589, 1282.60990315786, 140.164186215099, 0.45)
    pt3dadd(-491.810723622148, 1283.53278407436, 140.271756580575, 0.45)
    pt3dadd(-492.180479528707, 1284.45566499086, 140.37932694605, 0.45)
    pt3dadd(-492.550235435266, 1285.37854590736, 140.486897311526, 0.45)
    pt3dadd(-492.919991341825, 1286.30142682385, 140.594467677002, 0.45)
    pt3dadd(-493.289747248384, 1287.22430774035, 140.702038042478, 0.45)
    pt3dadd(-493.659503154943, 1288.14718865685, 140.809608407954, 0.45)
    pt3dadd(-494.029259061502, 1289.07006957335, 140.91717877343, 0.45)
    pt3dadd(-494.399014968061, 1289.99295048985, 141.024749138906, 0.45)
    pt3dadd(-494.76877087462, 1290.91583140634, 141.132319504382, 0.45)
    pt3dadd(-495.138526781179, 1291.83871232284, 141.239889869858, 0.45)
    pt3dadd(-495.508282687739, 1292.76159323934, 141.347460235334, 0.45)
    pt3dadd(-495.878038594298, 1293.68447415584, 141.455030600809, 0.45)
    pt3dadd(-496.247794500857, 1294.60735507233, 141.562600966285, 0.45)
    pt3dadd(-496.617550407416, 1295.53023598883, 141.670171331761, 0.45)
    pt3dadd(-496.987306313975, 1296.45311690533, 141.777741697237, 0.45)
    pt3dadd(-497.357062220534, 1297.37599782183, 141.885312062713, 0.45)
    pt3dadd(-497.726818127093, 1298.29887873833, 141.992882428189, 0.45)
    pt3dadd(-498.096574033652, 1299.22175965482, 142.100452793665, 0.45)
    pt3dadd(-498.466329940211, 1300.14464057132, 142.208023159141, 0.45)
    pt3dadd(-498.83608584677, 1301.06752148782, 142.315593524617, 0.45)
    pt3dadd(-499.205841753329, 1301.99040240432, 142.423163890093, 0.45)
    pt3dadd(-499.575597659888, 1302.91328332082, 142.530734255568, 0.45)
    pt3dadd(-499.945353566447, 1303.83616423731, 142.638304621044, 0.45)
    pt3dadd(-500.315109473006, 1304.75904515381, 142.74587498652, 0.45)
    pt3dadd(-500.684865379566, 1305.68192607031, 142.853445351996, 0.45)
    pt3dadd(-501.054621286125, 1306.60480698681, 142.961015717472, 0.45)
    pt3dadd(-501.424377192684, 1307.52768790331, 143.068586082948, 0.45)
    pt3dadd(-501.794133099243, 1308.4505688198, 143.176156448424, 0.45)
    pt3dadd(-502.163889005802, 1309.3734497363, 143.2837268139, 0.45)
    pt3dadd(-502.533644912361, 1310.2963306528, 143.391297179376, 0.45)
    pt3dadd(-502.90340081892, 1311.2192115693, 143.498867544852, 0.45)
    pt3dadd(-503.273156725479, 1312.1420924858, 143.606437910328, 0.45)
    pt3dadd(-503.642912632038, 1313.06497340229, 143.714008275803, 0.45)
    pt3dadd(-504.012668538597, 1313.98785431879, 143.821578641279, 0.45)
    pt3dadd(-504.382424445156, 1314.91073523529, 143.929149006755, 0.45)
    pt3dadd(-504.752180351715, 1315.83361615179, 144.036719372231, 0.45)
    pt3dadd(-505.121936258274, 1316.75649706829, 144.144289737707, 0.45)
    pt3dadd(-505.491692164833, 1317.67937798478, 144.251860103183, 0.45)
    pt3dadd(-505.861448071393, 1318.60225890128, 144.359430468659, 0.45)
    pt3dadd(-506.231203977952, 1319.52513981778, 144.467000834135, 0.45)
    pt3dadd(-506.600959884511, 1320.44802073428, 144.574571199611, 0.45)
    pt3dadd(-506.97071579107, 1321.37090165077, 144.682141565087, 0.45)
    pt3dadd(-507.340471697629, 1322.29378256727, 144.789711930562, 0.45)
    pt3dadd(-507.710227604188, 1323.21666348377, 144.897282296038, 0.45)
    pt3dadd(-508.079983510747, 1324.13954440027, 145.004852661514, 0.45)
    pt3dadd(-508.449739417306, 1325.06242531677, 145.11242302699, 0.45)
    pt3dadd(-508.819495323865, 1325.98530623326, 145.219993392466, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-9.6490214691172, 80.0960689610586, 0, 10.2667572303772)
    pt3dadd(-9.27926556255813, 79.1731880445606, -0.107570365475901, 10.2667572303772)
    pt3dadd(-8.90950965599906, 78.2503071280627, -0.215140730951802, 9.58775356515897)
    pt3dadd(-8.53975374943999, 77.3274262115648, -0.322711096427702, 8.52332145975835)
    pt3dadd(-8.16999784288092, 76.4045452950668, -0.430281461903603, 7.16804037792357)
    pt3dadd(-7.80024193632185, 75.4816643785689, -0.537851827379504, 5.64233299132872)
    pt3dadd(-7.43048602976278, 74.558783462071, -0.645422192855405, 5.12272671477005)
    pt3dadd(-7.0607301232037, 73.635902545573, -0.752992558331306, 5.05274450056505)
    pt3dadd(-6.69097421664463, 72.7130216290751, -0.860562923807207, 4.98276228636006)
    pt3dadd(-6.32121831008556, 71.7901407125772, -0.968133289283107, 4.91278007215507)
    pt3dadd(-5.95146240352649, 70.8672597960793, -1.07570365475901, 4.84279785795008)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-5.95146240352649, 70.8672597960793, -1.07570365475901, 4.77281564374509)
    pt3dadd(-5.58170649696742, 69.9443788795813, -1.18327402023491, 4.77281564374509)
    pt3dadd(-5.21195059040835, 69.0214979630834, -1.29084438571081, 4.70283342954009)
    pt3dadd(-4.84219468384928, 68.0986170465855, -1.39841475118671, 4.6328512153351)
    pt3dadd(-4.47243877729021, 67.1757361300875, -1.50598511666261, 4.56286900113011)
    pt3dadd(-4.1567652543151, 66.2367725684755, -1.59268402739681, 4.54309985798855)
    pt3dadd(-4.0081720795077, 65.2481238087073, -1.61490334803314, 4.67845733538183)
    pt3dadd(-3.85957890470029, 64.2594750489392, -1.63712266866947, 4.8138148127751)
    pt3dadd(-3.71098572989289, 63.270826289171, -1.6593419893058, 4.94917229016837)
    pt3dadd(-3.53087836066624, 62.3551765684275, -1.31720956695349, 4.85626885227665)
    pt3dadd(-3.34803087106972, 61.4458740241706, -0.943397209538432, 4.7435184090865)
    pt3dadd(-3.16518338147321, 60.5365714799138, -0.569584852123378, 4.63076796589635)
    pt3dadd(-2.9823358918767, 59.6272689356569, -0.195772494708327, 4.5180175227062)
    pt3dadd(-3.60792878465107, 59.381318338279, 0.480554296915684, 4.51)
    pt3dadd(-4.05074840202796, 58.9588852005003, 0.959020726591086, 4.40788386632817)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-4.05074840202796, 58.9588852005003, 0.959020726591086, 4.21502014596102)
    pt3dadd(-4.16726241813928, 57.9667615044839, 0.765191401189536, 4.21502014596102)
    pt3dadd(-4.22548017424395, 56.9814003162937, 0.604960250401923, 3.98744097134368)
    pt3dadd(-4.28369793034861, 55.9960391281036, 0.444729099614308, 3.75986179672635)
    pt3dadd(-4.34191568645328, 55.0106779399135, 0.284497948826694, 3.53228262210902)
    pt3dadd(-4.40013344255794, 54.0253167517234, 0.12426679803908, 3.30470344749168)
    pt3dadd(-4.45835119866261, 53.0399555635333, -0.0359643527485343, 3.07712427287435)
    pt3dadd(-4.51656895476727, 52.0545943753432, -0.196195503536148, 2.84954509825701)
    pt3dadd(-4.59791087721164, 51.0733998462664, -0.367506605094517, 2.7)
    pt3dadd(-4.72356812814679, 50.1001903344483, -0.56005140869665, 2.7)
    pt3dadd(-4.84922537908194, 49.1269808226302, -0.752596212298783, 2.7)
    pt3dadd(-4.97488263001709, 48.1537713108121, -0.945141015900917, 2.7)
    pt3dadd(-5.10053988095224, 47.180561798994, -1.13768581950305, 2.7)
    pt3dadd(-5.22619713188739, 46.2073522871759, -1.33023062310518, 2.7)
    pt3dadd(-5.35185438282254, 45.2341427753578, -1.52277542670732, 2.7)
    pt3dadd(-5.47751163375769, 44.2609332635397, -1.71532023030945, 2.7)
    pt3dadd(-5.60899969107523, 43.2798094821184, -1.8249009483139, 2.7)
    pt3dadd(-5.74725370706993, 42.2895021302638, -1.83821169300267, 2.7)
    pt3dadd(-5.88550772306462, 41.2991947784093, -1.85152243769144, 2.7)
    pt3dadd(-6.02376173905932, 40.3088874265547, -1.8648331823802, 2.7)
    pt3dadd(-6.16201575505402, 39.3185800747002, -1.87814392706897, 2.7)
    pt3dadd(-6.30026977104871, 38.3282727228456, -1.89145467175774, 2.7)
    pt3dadd(-6.46222363475813, 37.3435818938761, -1.92679214322361, 2.7)
    pt3dadd(-6.68804594068815, 36.3740269666929, -2.02148918287774, 2.7)
    pt3dadd(-6.91386824661818, 35.4044720395097, -2.11618622253187, 2.7)
    pt3dadd(-7.1396905525482, 34.4349171123265, -2.21088326218599, 2.7)
    pt3dadd(-7.36551285847823, 33.4653621851433, -2.30558030184012, 2.7)
    pt3dadd(-7.59133516440826, 32.4958072579602, -2.40027734149425, 2.7)
    pt3dadd(-7.81715747033828, 31.526252330777, -2.49497438114837, 2.7)
    pt3dadd(-8.04297977626831, 30.5566974035938, -2.5896714208025, 2.7)
    pt3dadd(-8.26880208219833, 29.5871424764106, -2.68436846045663, 2.7)
    pt3dadd(-8.49462438812836, 28.6175875492274, -2.77906550011075, 2.7)
    pt3dadd(-8.56103691096415, 27.7222240670153, -2.58459562058292, 2.67981451195175)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-8.56103691096415, 27.7222240670153, -2.58459562058292, 2.63893234035418)
    pt3dadd(-8.87715913210778, 26.8913231809365, -2.03134912571902, 2.63893234035418)
    pt3dadd(-9.05671535392443, 26.0642591521432, -1.49869102197595, 2.59805016875662)
    pt3dadd(-9.23627157574107, 25.2371951233499, -0.966032918232886, 2.55716799715906)
    pt3dadd(-9.41582779755772, 24.4101310945566, -0.433374814489817, 2.51628582556149)
    pt3dadd(-9.59538401937436, 23.5830670657633, 0.0992832892532506, 2.47540365396393)
    pt3dadd(-9.77494024119101, 22.7560030369701, 0.631941392996319, 2.43452148236637)
    pt3dadd(-9.95449646300765, 21.9289390081768, 1.16459949673939, 2.3936393107688)
    pt3dadd(-10.1340526848243, 21.1018749793835, 1.69725760048246, 2.35275713917124)
    pt3dadd(-10.3136089066409, 20.2748109505902, 2.22991570422552, 2.31187496757368)
    pt3dadd(-10.4931651284576, 19.4477469217969, 2.76257380796859, 2.27099279597611)
    pt3dadd(-10.7139422345942, 18.5542835966522, 3.0563383240167, 2.25)
    pt3dadd(-10.9782270722431, 17.5907372830924, 3.09795594305142, 2.25)
    pt3dadd(-11.242511909892, 16.6271909695325, 3.13957356208613, 2.25)
    pt3dadd(-11.5067967475409, 15.6636446559727, 3.18119118112084, 2.25)
    pt3dadd(-11.7710815851898, 14.7000983424128, 3.22280880015556, 2.25)
    pt3dadd(-12.0353664228387, 13.736552028853, 3.26442641919027, 2.25)
    pt3dadd(-12.2996512604876, 12.7730057152931, 3.30604403822499, 2.25)
    pt3dadd(-12.5639360981365, 11.8094594017333, 3.3476616572597, 2.25)
    pt3dadd(-12.7639037102015, 10.8330616893913, 3.42916165284111, 2.25)
    pt3dadd(-12.9636725334371, 9.85662425651573, 3.51078491510385, 2.25)
    pt3dadd(-13.1634413566727, 8.88018682364017, 3.59240817736658, 2.25)
    pt3dadd(-13.3632101799083, 7.90374939076457, 3.67403143962932, 2.25)
    pt3dadd(-13.5629790031439, 6.92731195788899, 3.75565470189205, 2.25)
    pt3dadd(-13.7627478263795, 5.9508745250134, 3.83727796415479, 2.25)
    pt3dadd(-14.0438900044362, 5.01859291463487, 3.76163483649819, 2.25)
    pt3dadd(-14.4376415426174, 4.14741679668802, 3.46835698581904, 2.25)
    pt3dadd(-14.8313930807986, 3.27624067874117, 3.17507913513989, 2.25)
    pt3dadd(-15.2251446189798, 2.40506456079431, 2.88180128446074, 2.25)
    pt3dadd(-15.618896157161, 1.53388844284748, 2.58852343378158, 2.25)
    pt3dadd(-16.0126476953423, 0.662712324900624, 2.29524558310243, 2.25)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(-16.0126476953423, 0.662712324900624, 2.29524558310243, 2.25)
    pt3dadd(-16.4063992335235, -0.208463793046207, 2.00196773242328, 2.25)
    pt3dadd(-16.6136567856426, -1.14831729579086, 2.12501795487439, 2.25)
    pt3dadd(-16.7695835489505, -2.10707362971846, 2.36265872712962, 2.25)
    pt3dadd(-16.9255103122585, -3.06582996364604, 2.60029949938486, 2.25)
    pt3dadd(-17.0814370755664, -4.02458629757362, 2.83794027164009, 2.25)
    pt3dadd(-17.2373638388743, -4.9833426315012, 3.07558104389532, 2.25)
    pt3dadd(-17.3932906021823, -5.94209896542878, 3.31322181615056, 2.25)
    pt3dadd(-17.5492173654902, -6.90085529935637, 3.55086258840579, 2.25)
    pt3dadd(-17.7414259881496, -7.85796323931609, 3.66603672828174, 2.25)
    pt3dadd(-18.0086460481729, -8.81166318412116, 3.52801551686884, 2.25)
    pt3dadd(-18.2758661081963, -9.76536312892624, 3.38999430545595, 2.25)
    pt3dadd(-18.5430861682197, -10.7190630737313, 3.25197309404306, 2.25)
    pt3dadd(-18.8103062282431, -11.6727630185364, 3.11395188263017, 2.25)
    pt3dadd(-19.0775262882665, -12.6264629633415, 2.97593067121727, 2.25)
    pt3dadd(-19.3447463482899, -13.5801629081465, 2.83790945980438, 2.25)
    pt3dadd(-19.633166976489, -14.5285250767776, 2.75941794128864, 2.25)
    pt3dadd(-19.9809541880537, -15.4619402151405, 2.84762358139699, 2.25)
    pt3dadd(-20.3287413996183, -16.3953553535035, 2.93582922150534, 2.25)
    pt3dadd(-20.676528611183, -17.3287704918665, 3.02403486161368, 2.25)
    pt3dadd(-21.0243158227476, -18.2621856302295, 3.11224050172203, 2.25)
    pt3dadd(-21.3721030343123, -19.1956007685924, 3.20044614183038, 2.25)
    pt3dadd(-21.6403281288515, -20.1528648510208, 3.21014040926352, 2.25)
    pt3dadd(-21.8378599941074, -21.1313194061769, 3.15007506398932, 2.25)
    pt3dadd(-22.0353918593633, -22.1097739613329, 3.09000971871511, 2.25)
    pt3dadd(-22.2329237246193, -23.088228516489, 3.02994437344091, 2.25)
    pt3dadd(-22.4304555898752, -24.066683071645, 2.9698790281667, 2.25)
    pt3dadd(-22.6279874551311, -25.045137626801, 2.9098136828925, 2.25)
    pt3dadd(-22.9095897702538, -25.992363644619, 2.76668347508839, 2.20799148609239)
    pt3dadd(-23.2079396980559, -26.9333686484099, 2.60700597692104, 2.15761448692897)
    pt3dadd(-23.506289625858, -27.8743736522008, 2.4473284787537, 2.10723748776555)
    pt3dadd(-23.8046395536601, -28.8153786559917, 2.28765098058635, 2.05686048860213)
    pt3dadd(-24.1029894814621, -29.7563836597826, 2.12797348241901, 2.00648348943871)
    pt3dadd(-24.4013394092642, -30.6973886635735, 1.96829598425166, 1.95610649027529)
    pt3dadd(-24.6996893370663, -31.6383936673644, 1.80861848608431, 1.90572949111187)
    pt3dadd(-24.9980392648684, -32.5793986711553, 1.64894098791697, 1.85535249194845)
    pt3dadd(-25.2963891926705, -33.5204036749462, 1.48926348974962, 1.80497549278503)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(-25.2963891926705, -33.5204036749462, 1.48926348974962, 1.8)
    pt3dadd(-25.7387615316364, -34.3835470446634, 1.25322593469754, 1.8)
    pt3dadd(-26.196917101706, -35.2381576578827, 1.00882017906356, 1.8)
    pt3dadd(-26.6550726717757, -36.0927682711021, 0.764414423429589, 1.8)
    pt3dadd(-27.1132282418454, -36.9473788843214, 0.52000866779561, 1.8)
    pt3dadd(-27.571383811915, -37.8019894975407, 0.275602912161631, 1.8)
    pt3dadd(-28.0295393819847, -38.6566001107601, 0.0311971565276519, 1.8)
    pt3dadd(-28.4876949520544, -39.5112107239794, -0.213208599106325, 1.8)
    pt3dadd(-28.945850522124, -40.3658213371987, -0.457614354740304, 1.8)
    pt3dadd(-29.4040060921937, -41.2204319504181, -0.702020110374283, 1.8)
    pt3dadd(-29.8621616622634, -42.0750425636374, -0.94642586600826, 1.8)
    pt3dadd(-30.217090332263, -42.9504410658223, -1.27250045358768, 1.8)
  }
}
proc shape3d_7() {
  adendIML[1] {
    pt3dadd(-30.5640058901216, -43.8274532528639, -1.60491468236868, 1.8)
    pt3dadd(-30.9109214479803, -44.7044654399055, -1.93732891114968, 1.8)
    pt3dadd(-31.257837005839, -45.5814776269471, -2.26974313993068, 1.8)
    pt3dadd(-31.6047525636977, -46.4584898139888, -2.60215736871168, 1.8)
    pt3dadd(-31.9516681215564, -47.3355020010304, -2.93457159749268, 1.8)
    pt3dadd(-32.2566753454739, -48.2130430252838, -3.2983314775264, 1.8)
    pt3dadd(-32.4917456305782, -49.0914665770023, -3.71440121308413, 1.8)
    pt3dadd(-32.7268159156826, -49.9698901287209, -4.13047094864187, 1.8)
    pt3dadd(-32.961886200787, -50.8483136804394, -4.54654068419961, 1.8)
    pt3dadd(-33.4460640122163, -51.699569696629, -4.69075341749586, 1.8)
    pt3dadd(-33.9669389825793, -52.5468235400064, -4.79491766343227, 1.8)
    pt3dadd(-34.4878139529424, -53.3940773833838, -4.8990819093687, 1.8)
    pt3dadd(-35.0086889233054, -54.2413312267612, -5.00324615530511, 1.8)
    pt3dadd(-35.5295638936685, -55.0885850701386, -5.10741040124153, 1.8)
    pt3dadd(-36.0165845072915, -55.9295943039619, -5.28277759780512, 1.8)
    pt3dadd(-36.3695903382161, -56.7458838244894, -5.74000653609564, 1.8)
    pt3dadd(-36.7225961691407, -57.5621733450169, -6.19723547438616, 1.8)
    pt3dadd(-37.0756020000652, -58.3784628655444, -6.65446441267668, 1.8)
    pt3dadd(-37.4259718134217, -59.2041532726663, -7.07776674295296, 1.8)
    pt3dadd(-37.741885029955, -60.1527269879612, -7.05759879136216, 1.8)
    pt3dadd(-38.0577982464883, -61.101300703256, -7.03743083977137, 1.8)
    pt3dadd(-38.3737114630216, -62.0498744185508, -7.01726288818057, 1.8)
    pt3dadd(-38.6896246795549, -62.9984481338456, -6.99709493658977, 1.8)
    pt3dadd(-38.9526738615325, -63.9558183339924, -6.92542361236144, 1.8)
    pt3dadd(-39.1285443770446, -64.9276949149976, -6.76881750434771, 1.8)
    pt3dadd(-39.3044148925568, -65.8995714960027, -6.61221139633397, 1.8)
    pt3dadd(-39.4802854080689, -66.8714480770079, -6.45560528832024, 1.8)
    pt3dadd(-39.6561559235811, -67.843324658013, -6.29899918030651, 1.8)
    pt3dadd(-39.926665123539, -68.7252626839444, -6.4973990083303, 1.8)
    pt3dadd(-40.269702233676, -69.5382748210362, -6.96786346608477, 1.8)
    pt3dadd(-40.612739343813, -70.3512869581281, -7.43832792383923, 1.8)
    pt3dadd(-40.95577645395, -71.1642990952199, -7.90879238159369, 1.8)
    pt3dadd(-41.298813564087, -71.9773112323118, -8.37925683934816, 1.8)
    pt3dadd(-41.641850674224, -72.7903233694036, -8.84972129710263, 1.8)
    pt3dadd(-41.984887784361, -73.6033355064955, -9.32018575485709, 1.8)
    pt3dadd(-42.3022913355394, -74.5151141080708, -9.53118974139586, 1.8)
    pt3dadd(-42.6119808790212, -75.4566148901837, -9.66411326805194, 1.8)
    pt3dadd(-42.9216704225031, -76.3981156722967, -9.79703679470801, 1.8)
    pt3dadd(-43.2313599659849, -77.3396164544097, -9.92996032136409, 1.8)
    pt3dadd(-43.4867479866563, -78.217157784858, -10.2920233717455, 1.8)
    pt3dadd(-43.7114867075246, -79.0585986100564, -10.7834191847436, 1.8)
    pt3dadd(-43.936225428393, -79.9000394352546, -11.2748149977417, 1.8)
    pt3dadd(-44.1609641492614, -80.7414802604529, -11.7662108107397, 1.8)
    pt3dadd(-44.3839444592014, -81.5911353923411, -12.2405256265162, 1.8)
    pt3dadd(-44.590465993576, -82.5176766650325, -12.5549618296465, 1.8)
    pt3dadd(-44.7969875279507, -83.4442179377239, -12.8693980327767, 1.8)
    pt3dadd(-45.0035090623254, -84.3707592104153, -13.1838342359069, 1.8)
    pt3dadd(-45.2100305967001, -85.2973004831067, -13.4982704390371, 1.8)
    pt3dadd(-45.4834377244222, -86.2456456128652, -13.6029554616874, 1.8)
    pt3dadd(-45.7772490381267, -87.2006422490612, -13.6436535795, 1.8)
    pt3dadd(-46.0710603518312, -88.1556388852573, -13.6843516973125, 1.8)
    pt3dadd(-46.3648716655357, -89.1106355214533, -13.725049815125, 1.8)
    pt3dadd(-46.6586829792402, -90.0656321576493, -13.7657479329375, 1.8)
    pt3dadd(-46.9524942929447, -91.0206287938454, -13.8064460507501, 1.8)
    pt3dadd(-47.23322655314, -91.9792040760452, -13.8340802666934, 1.8)
    pt3dadd(-47.4564394768631, -92.9535176028712, -13.804261780365, 1.8)
    pt3dadd(-47.6796524005862, -93.9278311296972, -13.7744432940366, 1.8)
    pt3dadd(-47.9028653243093, -94.9021446565231, -13.7446248077082, 1.8)
    pt3dadd(-48.1260782480324, -95.8764581833491, -13.7148063213799, 1.8)
    pt3dadd(-48.3492911717555, -96.8507717101751, -13.6849878350515, 1.8)
    pt3dadd(-48.5725040954785, -97.8250852370011, -13.6551693487231, 1.8)
    pt3dadd(-48.7957170192016, -98.7993987638271, -13.6253508623947, 1.8)
    pt3dadd(-49.04059254935, -99.7664481746046, -13.6334463443182, 1.8)
    pt3dadd(-49.3383766114686, -100.715755781435, -13.7341425208205, 1.8)
    pt3dadd(-49.6361606735871, -101.665063388265, -13.8348386973229, 1.8)
    pt3dadd(-49.9339447357057, -102.614370995096, -13.9355348738252, 1.8)
    pt3dadd(-50.2317287978243, -103.563678601926, -14.0362310503276, 1.8)
    pt3dadd(-50.5295128599428, -104.512986208756, -14.13692722683, 1.8)
    pt3dadd(-50.8272969220614, -105.462293815587, -14.2376234033323, 1.8)
    pt3dadd(-51.12508098418, -106.411601422417, -14.3383195798347, 1.8)
    pt3dadd(-51.4228650462985, -107.360909029247, -14.439015756337, 1.8)
    pt3dadd(-51.906998486507, -108.219305426275, -14.3525571957178, 1.8)
    pt3dadd(-52.441996913919, -109.052887157588, -14.2150138211521, 1.8)
    pt3dadd(-52.976995341331, -109.886468888902, -14.0774704465863, 1.8)
    pt3dadd(-53.5119937687431, -110.720050620216, -13.9399270720206, 1.8)
    pt3dadd(-54.0469921961551, -111.553632351529, -13.8023836974548, 1.8)
    pt3dadd(-54.5819906235671, -112.387214082843, -13.6648403228891, 1.8)
    pt3dadd(-55.10788585056, -113.223333806572, -13.5754311141713, 1.8)
    pt3dadd(-55.5719481705996, -114.076692681551, -13.8129701501517, 1.8)
    pt3dadd(-56.0360104906393, -114.930051556529, -14.050509186132, 1.8)
    pt3dadd(-56.5000728106789, -115.783410431508, -14.2880482221124, 1.8)
    pt3dadd(-56.9641351307185, -116.636769306487, -14.5255872580927, 1.8)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(-56.9641351307185, -116.636769306487, -14.5255872580927, 1.8)
    pt3dadd(-57.4281974507581, -117.490128181466, -14.763126294073, 1.8)
    pt3dadd(-57.8626699981593, -118.368678989096, -14.7730739665844, 1.8)
    pt3dadd(-58.2753375922278, -119.265793944635, -14.6153076414246, 1.8)
    pt3dadd(-58.6880051862963, -120.162908900174, -14.4575413162649, 1.8)
    pt3dadd(-59.1006727803647, -121.060023855712, -14.2997749911051, 1.8)
    pt3dadd(-59.5133403744332, -121.957138811251, -14.1420086659454, 1.8)
    pt3dadd(-59.9260079685016, -122.85425376679, -13.9842423407857, 1.8)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(-59.9260079685016, -122.85425376679, -13.9842423407857, 1.8)
    pt3dadd(-60.3990818865804, -123.702893415415, -13.7659049665674, 1.8)
    pt3dadd(-60.924270466514, -124.509711710573, -13.4953108163972, 1.8)
    pt3dadd(-61.4494590464477, -125.31653000573, -13.224716666227, 1.8)
    pt3dadd(-61.9746476263814, -126.123348300888, -12.9541225160568, 1.8)
    pt3dadd(-62.4998362063151, -126.930166596045, -12.6835283658866, 1.8)
    pt3dadd(-63.0250247862488, -127.736984891203, -12.4129342157164, 1.8)
    pt3dadd(-63.5502133661825, -128.54380318636, -12.1423400655462, 1.8)
    pt3dadd(-64.0754019461162, -129.350621481518, -11.871745915376, 1.8)
    pt3dadd(-64.6005905260499, -130.157439776675, -11.6011517652057, 1.8)
    pt3dadd(-65.1257791059836, -130.964258071833, -11.3305576150355, 1.8)
    pt3dadd(-65.6509676859173, -131.77107636699, -11.0599634648653, 1.8)
    pt3dadd(-66.1761562658509, -132.577894662148, -10.7893693146951, 1.8)
    pt3dadd(-66.6946386783613, -133.33569195337, -10.3996705136574, 1.8)
    pt3dadd(-67.2110834733882, -134.078594588917, -9.97378267890846, 1.8)
    pt3dadd(-67.7275282684152, -134.821497224464, -9.54789484415953, 1.8)
    pt3dadd(-68.2439730634422, -135.56439986001, -9.12200700941059, 1.8)
    pt3dadd(-68.8991478726332, -136.263871636238, -8.99034418365932, 1.8)
    pt3dadd(-69.636954940305, -136.937474533155, -9.03393166074653, 1.8)
    pt3dadd(-70.3747620079769, -137.611077430072, -9.07751913783373, 1.8)
    pt3dadd(-71.1125690756488, -138.284680326989, -9.12110661492093, 1.8)
    pt3dadd(-71.8098548801699, -138.984039950109, -9.11585834975441, 1.8)
    pt3dadd(-72.2940848717818, -139.818825268596, -8.85383776418436, 1.8)
    pt3dadd(-72.7783148633937, -140.653610587083, -8.59181717861432, 1.8)
    pt3dadd(-73.2625448550057, -141.48839590557, -8.32979659304427, 1.8)
    pt3dadd(-73.846609053898, -142.265680321541, -8.12034984919363, 1.8)
    pt3dadd(-74.4980917117579, -143.004134136835, -7.94640644119633, 1.8)
    pt3dadd(-75.1495743696178, -143.742587952129, -7.77246303319904, 1.8)
    pt3dadd(-75.8010570274777, -144.481041767423, -7.59851962520175, 1.8)
    pt3dadd(-76.4404359941114, -145.233264037671, -7.4901002189318, 1.8)
    pt3dadd(-77.0442541621264, -146.025938203527, -7.57419116232094, 1.8)
    pt3dadd(-77.6480723301414, -146.818612369383, -7.65828210571008, 1.8)
    pt3dadd(-78.2518904981564, -147.611286535238, -7.74237304909921, 1.8)
    pt3dadd(-78.8513759267295, -148.40679786846, -7.8275197340261, 1.8)
    pt3dadd(-79.3688210085363, -149.256030916937, -7.93265686680077, 1.8)
    pt3dadd(-79.8862660903432, -150.105263965415, -8.03779399957544, 1.8)
    pt3dadd(-80.40371117215, -150.954497013892, -8.1429311323501, 1.8)
    pt3dadd(-80.835235310786, -151.798016645171, -7.87232468560594, 1.8)
    pt3dadd(-81.2499718878945, -152.640419967212, -7.52830402543529, 1.8)
    pt3dadd(-81.664708465003, -153.482823289252, -7.18428336526463, 1.8)
    pt3dadd(-82.0794450421115, -154.325226611292, -6.84026270509398, 1.8)
    pt3dadd(-82.4985585861452, -155.167100413688, -6.50098798338141, 1.8)
    pt3dadd(-82.9682613830216, -156.002853995487, -6.21656711017401, 1.8)
    pt3dadd(-83.437964179898, -156.838607577287, -5.93214623696661, 1.8)
    pt3dadd(-83.9076669767744, -157.674361159086, -5.6477253637592, 1.8)
    pt3dadd(-84.3773697736509, -158.510114740885, -5.3633044905518, 1.8)
    pt3dadd(-84.8470725705273, -159.345868322685, -5.0788836173444, 1.8)
    pt3dadd(-85.4213837546942, -160.133833517957, -4.91060054018132, 1.8)
    pt3dadd(-86.0777629273168, -160.884307486613, -4.83343057117227, 1.8)
    pt3dadd(-86.7341420999394, -161.634781455269, -4.75626060216322, 1.8)
    pt3dadd(-87.390521272562, -162.385255423925, -4.67909063315415, 1.8)
    pt3dadd(-88.0469004451845, -163.135729392581, -4.6019206641451, 1.8)
    pt3dadd(-88.7032796178071, -163.886203361237, -4.52475069513605, 1.8)
    pt3dadd(-89.3596587904296, -164.636677329893, -4.44758072612699, 1.8)
    pt3dadd(-90.0160379630522, -165.38715129855, -4.37041075711794, 1.8)
    pt3dadd(-90.6724171356748, -166.137625267206, -4.29324078810888, 1.8)
    pt3dadd(-91.3127191008944, -166.899109389692, -4.21552072067003, 1.8)
    pt3dadd(-91.7789266358424, -167.779818599606, -4.13184383061084, 1.8)
    pt3dadd(-92.2451341707905, -168.66052780952, -4.04816694055165, 1.8)
    pt3dadd(-92.7113417057386, -169.541237019434, -3.96449005049246, 1.8)
    pt3dadd(-93.1775492406867, -170.421946229348, -3.88081316043328, 1.8)
    pt3dadd(-93.6437567756347, -171.302655439263, -3.79713627037411, 1.8)
    pt3dadd(-94.1099643105828, -172.183364649177, -3.71345938031491, 1.8)
    pt3dadd(-94.6013072484267, -173.048914205766, -3.68741539034507, 1.8)
    pt3dadd(-95.1450930457203, -173.882834447642, -3.78161749675096, 1.8)
    pt3dadd(-95.6888788430139, -174.716754689518, -3.87581960315684, 1.8)
    pt3dadd(-96.2326646403074, -175.550674931394, -3.97002170956274, 1.8)
    pt3dadd(-96.776450437601, -176.38459517327, -4.06422381596865, 1.8)
    pt3dadd(-97.3202362348945, -177.218515415146, -4.15842592237453, 1.8)
    pt3dadd(-97.8489117320463, -178.05173872782, -4.14794004500986, 1.8)
    pt3dadd(-98.3422961604432, -178.883334317936, -3.89294871120801, 1.8)
    pt3dadd(-98.8356805888401, -179.714929908053, -3.63795737740615, 1.8)
    pt3dadd(-99.329065017237, -180.54652549817, -3.38296604360429, 1.8)
    pt3dadd(-99.822449445634, -181.378121088286, -3.12797470980245, 1.8)
    pt3dadd(-100.315799178484, -182.209975228282, -2.87437333093838, 1.8)
    pt3dadd(-100.803752584893, -183.082042584752, -2.83695677106909, 1.8)
    pt3dadd(-101.291705991302, -183.954109941223, -2.79954021119975, 1.8)
    pt3dadd(-101.779659397712, -184.826177297693, -2.76212365133043, 1.8)
    pt3dadd(-102.267612804121, -185.698244654163, -2.72470709146111, 1.8)
    pt3dadd(-102.75556621053, -186.570312010633, -2.68729053159179, 1.8)
    pt3dadd(-103.265476812969, -187.422763781217, -2.5798020519886, 1.8)
    pt3dadd(-103.782089716324, -188.269228013179, -2.45092454387933, 1.8)
    pt3dadd(-104.298702619678, -189.115692245141, -2.3220470357701, 1.8)
    pt3dadd(-104.815315523033, -189.962156477103, -2.19316952766084, 1.8)
    pt3dadd(-105.331928426387, -190.808620709065, -2.06429201955157, 1.8)
    pt3dadd(-105.848541329742, -191.655084941027, -1.93541451144232, 1.8)
    pt3dadd(-106.365154233097, -192.501549172989, -1.80653700333306, 1.8)
    pt3dadd(-106.913959512214, -193.327893508812, -1.68251310074385, 1.8)
    pt3dadd(-107.475641503115, -194.146190035252, -1.56043060440102, 1.8)
    pt3dadd(-108.037323494016, -194.964486561692, -1.43834810805819, 1.8)
    pt3dadd(-108.599005484917, -195.782783088133, -1.31626561171534, 1.8)
    pt3dadd(-109.151092329908, -196.610053374832, -1.28069630189656, 1.8)
    pt3dadd(-109.691201026273, -197.448526100258, -1.35312616333358, 1.8)
    pt3dadd(-110.231309722638, -198.286998825684, -1.4255560247706, 1.8)
    pt3dadd(-110.771418419002, -199.125471551111, -1.49798588620761, 1.8)
    pt3dadd(-111.311527115367, -199.963944276537, -1.57041574764462, 1.8)
    pt3dadd(-111.8449554783, -200.805368506078, -1.64538575088758, 1.8)
    pt3dadd(-112.172920381748, -201.737570576646, -1.79848154356493, 1.8)
    pt3dadd(-112.500885285195, -202.669772647214, -1.95157733624232, 1.8)
    pt3dadd(-112.824565448231, -203.606642210133, -1.97594852899466, 1.8)
    pt3dadd(-113.143882850674, -204.548264255056, -1.86925119532443, 1.8)
    pt3dadd(-113.463200253118, -205.489886299979, -1.76255386165421, 1.8)
    pt3dadd(-113.782517655561, -206.431508344902, -1.65585652798398, 1.8)
    pt3dadd(-114.111544019847, -207.370285557474, -1.5583562783371, 1.8)
    pt3dadd(-114.489010348942, -208.294869328855, -1.50674213203219, 1.8)
    pt3dadd(-114.866476678038, -209.219453100235, -1.45512798572728, 1.8)
    pt3dadd(-115.243943007133, -210.144036871616, -1.40351383942236, 1.8)
    pt3dadd(-115.631886149919, -211.059271862, -1.45754683930494, 1.8)
    pt3dadd(-116.028061944734, -211.967160605414, -1.59459708259326, 1.8)
    pt3dadd(-116.424237739548, -212.875049348828, -1.73164732588157, 1.8)
    pt3dadd(-116.820413534362, -213.782938092242, -1.86869756916989, 1.8)
    pt3dadd(-117.216589329176, -214.690826835656, -2.00574781245822, 1.8)
    pt3dadd(-117.955936524314, -215.339497333661, -2.03202782656462, 1.8)
    pt3dadd(-118.750790991756, -215.946239810507, -2.0403909825979, 1.8)
    pt3dadd(-119.545645459198, -216.552982287353, -2.04875413863118, 1.8)
    pt3dadd(-120.047575158875, -217.391959259977, -1.91772769029931, 1.8)
    pt3dadd(-120.499785210639, -218.270354604258, -1.76304191775078, 1.8)
    pt3dadd(-120.951995262404, -219.148749948538, -1.60835614520225, 1.8)
    pt3dadd(-121.404205314168, -220.027145292819, -1.45367037265373, 1.8)
    pt3dadd(-121.877927162887, -220.902848717241, -1.46732410739433, 1.8)
    pt3dadd(-122.358029550834, -221.777753700681, -1.53090843752776, 1.8)
    pt3dadd(-122.838131938781, -222.652658684122, -1.5944927676612, 1.8)
    pt3dadd(-123.318234326728, -223.527563667563, -1.65807709779463, 1.8)
    pt3dadd(-123.798336714674, -224.402468651003, -1.72166142792805, 1.8)
    pt3dadd(-124.306136668445, -225.257677187354, -1.82379667628668, 1.8)
    pt3dadd(-124.817354749125, -226.110455006283, -1.93068945213901, 1.8)
    pt3dadd(-125.328572829804, -226.963232825212, -2.03758222799134, 1.8)
    pt3dadd(-125.839790910483, -227.816010644141, -2.14447500384365, 1.8)
    pt3dadd(-126.225231920465, -228.700434944952, -1.89470001408119, 1.8)
    pt3dadd(-126.604698730657, -229.586362400546, -1.62798390398094, 1.8)
    pt3dadd(-126.98416554085, -230.47228985614, -1.36126779388068, 1.8)
    pt3dadd(-127.33685360959, -231.390772928365, -1.43033388112842, 1.8)
    pt3dadd(-127.68317476693, -232.316996421364, -1.57923551643051, 1.8)
    pt3dadd(-128.029495924271, -233.243219914362, -1.72813715173255, 1.8)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(-128.029495924271, -233.243219914362, -1.72813715173255, 1.8)
    pt3dadd(-128.375817081611, -234.169443407361, -1.87703878703461, 1.8)
    pt3dadd(-128.722138238952, -235.09566690036, -2.0259404223367, 1.8)
    pt3dadd(-129.076689539291, -236.017187401159, -2.17160953083531, 1.8)
    pt3dadd(-129.749102560032, -236.757070572982, -2.19243311342851, 1.8)
    pt3dadd(-130.421515580772, -237.496953744805, -2.21325669602171, 1.8)
    pt3dadd(-131.093928601513, -238.236836916628, -2.23408027861491, 1.8)
    pt3dadd(-131.519836043995, -239.128302798174, -2.33006873114142, 1.8)
    pt3dadd(-131.905268730296, -240.044657663007, -2.43839881019623, 1.8)
    pt3dadd(-132.290701416596, -240.96101252784, -2.54672888925104, 1.8)
    pt3dadd(-132.676134102896, -241.877367392673, -2.65505896830584, 1.8)
    pt3dadd(-133.061566789197, -242.793722257506, -2.76338904736064, 1.8)
    pt3dadd(-133.446999475497, -243.710077122339, -2.87171912641544, 1.8)
    pt3dadd(-133.832432161797, -244.626431987172, -2.98004920547024, 1.8)
    pt3dadd(-134.217864848098, -245.542786852005, -3.08837928452507, 1.8)
    pt3dadd(-134.607554114103, -246.45624990894, -3.20407842785007, 1.8)
    pt3dadd(-135.015222942874, -247.357498125504, -3.35090410063481, 1.8)
    pt3dadd(-135.422891771645, -248.258746342068, -3.49772977341955, 1.8)
    pt3dadd(-135.830560600416, -249.159994558632, -3.64455544620428, 1.8)
    pt3dadd(-136.238229429187, -250.061242775196, -3.79138111898902, 1.8)
    pt3dadd(-136.645898257958, -250.96249099176, -3.93820679177376, 1.8)
    pt3dadd(-137.053567086729, -251.863739208324, -4.08503246455849, 1.8)
    pt3dadd(-137.629501780782, -252.668862184496, -4.19660590224586, 1.8)
    pt3dadd(-138.238518670679, -253.45508629474, -4.30124851445967, 1.8)
    pt3dadd(-138.847535560577, -254.241310404984, -4.40589112667345, 1.8)
  }
}
proc shape3d_8() {
  adendOML[0] {
    pt3dadd(-139.456552450474, -255.027534515228, -4.51053373888725, 1.8)
    pt3dadd(-140.065569340371, -255.813758625472, -4.61517635110104, 1.8)
    pt3dadd(-140.88305889291, -256.297223500231, -4.60393443755741, 1.8)
    pt3dadd(-141.837861184003, -256.581272781501, -4.51636394747075, 1.8)
    pt3dadd(-142.792663475095, -256.865322062772, -4.42879345738407, 1.8)
    pt3dadd(-143.747465766188, -257.149371344043, -4.3412229672974, 1.8)
    pt3dadd(-144.472820599749, -257.517405603279, -3.98306924588687, 1.8)
    pt3dadd(-144.835421404952, -258.018219233469, -3.19712626838677, 1.8)
    pt3dadd(-145.198022210154, -258.51903286366, -2.41118329088665, 1.8)
    pt3dadd(-145.560623015357, -259.01984649385, -1.62524031338654, 1.8)
    pt3dadd(-145.92322382056, -259.520660124041, -0.839297335886457, 1.8)
    pt3dadd(-146.312847776127, -260.0173778389, -0.11006007514267, 1.8)
    pt3dadd(-147.177646473163, -260.442073029281, -0.37793543584587, 1.8)
    pt3dadd(-148.0424451702, -260.866768219661, -0.6458107965491, 1.8)
    pt3dadd(-148.907243867236, -261.291463410041, -0.913686157252286, 1.8)
    pt3dadd(-149.41128315419, -262.039172146505, -0.552689212369771, 1.8)
    pt3dadd(-149.882934063954, -262.815880499544, -0.135233162420562, 1.8)
    pt3dadd(-150.354584973717, -263.592588852582, 0.282222887528675, 1.8)
    pt3dadd(-150.826235883481, -264.369297205621, 0.699678937477898, 1.8)
    pt3dadd(-151.549685117129, -265.045455528921, 0.702560692582296, 1.8)
    pt3dadd(-152.293064841243, -265.713655056554, 0.672627816899947, 1.8)
    pt3dadd(-152.854944974189, -266.507374715192, 0.586650683464839, 1.8)
    pt3dadd(-153.252588868925, -267.414675644195, 0.449959947827011, 1.8)
    pt3dadd(-153.320553634289, -268.277540260021, 0.747664333540087, 1.8)
    pt3dadd(-153.209872705333, -269.116325838645, 1.28075765094023, 1.8)
    pt3dadd(-153.099191776377, -269.95511141727, 1.81385096834036, 1.8)
    pt3dadd(-152.866824626657, -270.884655245903, 1.98053234011758, 1.8)
    pt3dadd(-152.523007417416, -271.802615870327, 1.9514634666138, 1.8)
    pt3dadd(-151.947842266146, -272.578069927745, 1.69097152125144, 1.8)
    pt3dadd(-151.310197947026, -273.301531235558, 1.43208067812132, 1.8)
    pt3dadd(-150.644298716661, -274.001479897859, 1.17391390035611, 1.8)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(-59.9260079685016, -122.85425376679, -13.9842423407857, 1.8)
    pt3dadd(-60.3892696732331, -123.697789349361, -14.0870547592026, 1.8)
    pt3dadd(-60.8961806980028, -124.495100121032, -14.4146776313362, 1.8)
    pt3dadd(-61.4030917227725, -125.292410892702, -14.7423005034698, 1.8)
    pt3dadd(-61.9100027475422, -126.089721664373, -15.0699233756034, 1.8)
    pt3dadd(-62.4169137723119, -126.887032436044, -15.397546247737, 1.8)
    pt3dadd(-62.9238247970815, -127.684343207714, -15.7251691198705, 1.8)
    pt3dadd(-63.4170784781515, -128.492283192741, -16.0321481398636, 1.8)
    pt3dadd(-63.7278193804813, -129.442268901158, -16.0632487093391, 1.8)
    pt3dadd(-64.0385602828111, -130.392254609576, -16.0943492788145, 1.8)
    pt3dadd(-64.3493011851409, -131.342240317993, -16.12544984829, 1.8)
    pt3dadd(-64.6600420874707, -132.292226026411, -16.1565504177654, 1.8)
    pt3dadd(-64.9707829898005, -133.242211734828, -16.1876509872409, 1.8)
    pt3dadd(-65.2815238921303, -134.192197443246, -16.2187515567163, 1.8)
    pt3dadd(-65.5775900625011, -135.089617025053, -15.9364824879971, 1.8)
    pt3dadd(-65.8696956884503, -135.972849602963, -15.5696384930774, 1.8)
    pt3dadd(-66.1618013143996, -136.856082180872, -15.2027944981578, 1.8)
    pt3dadd(-66.4539069403488, -137.739314758781, -14.8359505032382, 1.8)
    pt3dadd(-66.7460125662981, -138.62254733669, -14.4691065083185, 1.8)
    pt3dadd(-67.1150021072882, -139.523244277661, -14.6007944338386, 1.8)
    pt3dadd(-67.4946301486506, -140.426357779142, -14.8014646948493, 1.8)
    pt3dadd(-67.874258190013, -141.329471280623, -15.0021349558601, 1.8)
    pt3dadd(-68.2538862313753, -142.232584782104, -15.2028052168708, 1.8)
    pt3dadd(-68.6335142727377, -143.135698283585, -15.4034754778816, 1.8)
    pt3dadd(-69.0131423141001, -144.038811785066, -15.6041457388923, 1.8)
    pt3dadd(-69.3927703554625, -144.941925286547, -15.8048159999031, 1.8)
    pt3dadd(-69.7629896186366, -145.849285917625, -16.0027686620457, 1.8)
    pt3dadd(-70.0961243770688, -146.773386522217, -16.1900099644246, 1.8)
    pt3dadd(-70.429259135501, -147.69748712681, -16.3772512668036, 1.8)
    pt3dadd(-70.7623938939332, -148.621587731402, -16.5644925691825, 1.8)
    pt3dadd(-71.0955286523653, -149.545688335994, -16.7517338715614, 1.8)
    pt3dadd(-71.4308357048938, -150.467090951609, -16.8834595733182, 1.8)
    pt3dadd(-71.78105174244, -151.36997660982, -16.6341681469864, 1.8)
    pt3dadd(-72.1312677799862, -152.27286226803, -16.3848767206547, 1.8)
    pt3dadd(-72.4814838175324, -153.175747926241, -16.1355852943229, 1.8)
    pt3dadd(-72.8316998550786, -154.078633584452, -15.8862938679911, 1.8)
    pt3dadd(-73.2107388819782, -154.994346747567, -15.8584595411525, 1.8)
    pt3dadd(-73.5995840384008, -155.914424071976, -15.9059691342245, 1.8)
    pt3dadd(-73.9884291948235, -156.834501396386, -15.9534787272966, 1.8)
    pt3dadd(-74.3772743512461, -157.754578720796, -16.0009883203687, 1.8)
    pt3dadd(-74.7661195076687, -158.674656045205, -16.0484979134408, 1.8)
    pt3dadd(-75.1549646640913, -159.594733369615, -16.0960075065129, 1.8)
    pt3dadd(-75.5438098205139, -160.514810694025, -16.143517099585, 1.8)
    pt3dadd(-75.9382832572555, -161.41707491716, -16.0608139003514, 1.8)
    pt3dadd(-76.3403904161243, -162.295178960339, -15.8015011121226, 1.8)
    pt3dadd(-76.742497574993, -163.173283003518, -15.5421883238939, 1.8)
    pt3dadd(-77.1446047338618, -164.051387046697, -15.2828755356651, 1.8)
    pt3dadd(-77.5467118927306, -164.929491089877, -15.0235627474364, 1.8)
    pt3dadd(-77.9387364656496, -165.815110979711, -14.8122288104922, 1.8)
    pt3dadd(-78.2597268017641, -166.753681812267, -14.9389173908609, 1.8)
    pt3dadd(-78.5807171378786, -167.692252644824, -15.0656059712296, 1.8)
    pt3dadd(-78.901707473993, -168.63082347738, -15.1922945515982, 1.8)
    pt3dadd(-79.2226978101075, -169.569394309936, -15.3189831319669, 1.8)
    pt3dadd(-79.543688146222, -170.507965142492, -15.4456717123356, 1.8)
    pt3dadd(-79.8646784823364, -171.446535975049, -15.5723602927043, 1.8)
    pt3dadd(-80.1296891917568, -172.404141607855, -15.5511934250444, 1.8)
    pt3dadd(-80.3675178578536, -173.370989974057, -15.4582323452526, 1.8)
    pt3dadd(-80.6053465239504, -174.337838340258, -15.3652712654607, 1.8)
    pt3dadd(-80.8431751900472, -175.30468670646, -15.2723101856689, 1.8)
    pt3dadd(-81.0810038561441, -176.271535072661, -15.1793491058771, 1.8)
    pt3dadd(-81.3188325222409, -177.238383438863, -15.0863880260852, 1.8)
    pt3dadd(-81.5558945803726, -178.204734101327, -15.0094248161256, 1.8)
    pt3dadd(-81.7808808967928, -179.163244848138, -15.184462828203, 1.8)
    pt3dadd(-82.005867213213, -180.121755594948, -15.3595008402805, 1.8)
    pt3dadd(-82.2308535296332, -181.080266341759, -15.5345388523579, 1.8)
    pt3dadd(-82.4558398460534, -182.03877708857, -15.7095768644353, 1.8)
    pt3dadd(-82.6808261624737, -182.99728783538, -15.8846148765127, 1.8)
    pt3dadd(-82.9334758989643, -183.958276436776, -15.8277068748088, 1.8)
    pt3dadd(-83.1909062496432, -184.91969324505, -15.7307154560306, 1.8)
    pt3dadd(-83.4483366003222, -185.881110053324, -15.6337240372523, 1.8)
    pt3dadd(-83.7057669510011, -186.842526861599, -15.536732618474, 1.8)
    pt3dadd(-83.96319730168, -187.803943669873, -15.4397411996957, 1.8)
    pt3dadd(-84.2206276523589, -188.765360478148, -15.3427497809173, 1.8)
    pt3dadd(-84.4780580030378, -189.726777286422, -15.2457583621391, 1.8)
    pt3dadd(-84.7583483269066, -190.683139849762, -15.179510200024, 1.8)
    pt3dadd(-85.0756727689928, -191.631314323692, -15.163067406979, 1.8)
    pt3dadd(-85.3929972110791, -192.579488797622, -15.146624613934, 1.8)
    pt3dadd(-85.7103216531653, -193.527663271551, -15.130181820889, 1.8)
    pt3dadd(-86.0276460952515, -194.475837745481, -15.113739027844, 1.8)
    pt3dadd(-86.3449705373377, -195.42401221941, -15.097296234799, 1.8)
    pt3dadd(-86.6309948972434, -196.358057220569, -15.2403105846803, 1.8)
    pt3dadd(-86.8872591500132, -197.278667923983, -15.5349367300097, 1.8)
    pt3dadd(-87.1435234027831, -198.199278627397, -15.8295628753392, 1.8)
    pt3dadd(-87.3997876555529, -199.119889330811, -16.1241890206686, 1.8)
    pt3dadd(-87.6560519083227, -200.040500034225, -16.418815165998, 1.8)
    pt3dadd(-87.9123161610926, -200.961110737639, -16.7134413113275, 1.8)
    pt3dadd(-88.1685804138624, -201.881721441053, -17.0080674566569, 1.8)
    pt3dadd(-88.5295727611561, -202.761014545887, -17.3075485362501, 1.8)
    pt3dadd(-88.9469694377991, -203.618054868898, -17.6096443804147, 1.8)
    pt3dadd(-89.3643661144421, -204.475095191908, -17.9117402245793, 1.8)
    pt3dadd(-89.7817627910851, -205.332135514919, -18.2138360687438, 1.8)
    pt3dadd(-90.1991594677281, -206.189175837929, -18.5159319129084, 1.8)
    pt3dadd(-90.6165561443711, -207.04621616094, -18.818027757073, 1.8)
    pt3dadd(-91.0022003014948, -207.917660148966, -19.1047767009564, 1.8)
    pt3dadd(-91.1769435623689, -208.884773580146, -19.2895912134012, 1.8)
    pt3dadd(-91.351686823243, -209.851887011326, -19.474405725846, 1.8)
    pt3dadd(-91.5264300841171, -210.819000442506, -19.6592202382908, 1.8)
    pt3dadd(-91.7011733449913, -211.786113873686, -19.8440347507356, 1.8)
    pt3dadd(-91.8759166058654, -212.753227304866, -20.0288492631804, 1.8)
    pt3dadd(-92.0506598667395, -213.720340736046, -20.2136637756252, 1.8)
    pt3dadd(-92.2254031276136, -214.687454167227, -20.3984782880701, 1.8)
    pt3dadd(-92.4001463884877, -215.654567598407, -20.5832928005149, 1.8)
    pt3dadd(-92.5748896493619, -216.621681029587, -20.7681073129597, 1.8)
    pt3dadd(-92.749632910236, -217.588794460767, -20.9529218254045, 1.8)
    pt3dadd(-93.02556958017, -218.47502928571, -21.2795805164669, 1.8)
    pt3dadd(-93.3885485815618, -219.291695721592, -21.72824762809, 1.8)
    pt3dadd(-93.7515275829535, -220.108362157474, -22.1769147397132, 1.8)
    pt3dadd(-94.1145065843453, -220.925028593356, -22.6255818513364, 1.8)
    pt3dadd(-94.477485585737, -221.741695029238, -23.0742489629596, 1.8)
    pt3dadd(-94.8404645871288, -222.55836146512, -23.5229160745827, 1.8)
    pt3dadd(-95.2034435885205, -223.375027901003, -23.9715831862059, 1.8)
    pt3dadd(-95.5608939767153, -224.305252567351, -24.0032349591826, 1.8)
    pt3dadd(-95.9181694921787, -225.239069135903, -24.0216963336486, 1.8)
    pt3dadd(-96.2754450076422, -226.172885704456, -24.0401577081146, 1.8)
    pt3dadd(-96.6327205231057, -227.106702273008, -24.0586190825806, 1.8)
    pt3dadd(-96.9899960385691, -228.040518841561, -24.0770804570467, 1.8)
    pt3dadd(-97.2917958032578, -228.99244352538, -24.0878842953757, 1.8)
    pt3dadd(-97.551324154497, -229.958166231156, -24.0928532441985, 1.8)
    pt3dadd(-97.8108525057363, -230.923888936931, -24.0978221930213, 1.8)
    pt3dadd(-98.0703808569755, -231.889611642707, -24.102791141844, 1.8)
    pt3dadd(-98.3299092082148, -232.855334348483, -24.1077600906668, 1.8)
    pt3dadd(-98.6261669029998, -233.715647431536, -24.4528442389264, 1.8)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(-98.6261669029998, -233.715647431536, -24.4528442389264, 1.8)
    pt3dadd(-98.9376191765378, -234.532353560063, -24.938630797957, 1.8)
    pt3dadd(-99.2490714500758, -235.349059688589, -25.4244173569876, 1.8)
    pt3dadd(-99.5590516327499, -236.170983548663, -25.9003771214741, 1.8)
    pt3dadd(-99.8478107205679, -237.068124216884, -26.2346776010225, 1.8)
    pt3dadd(-100.136569808386, -237.965264885105, -26.568978080571, 1.8)
    pt3dadd(-100.425328896204, -238.862405553326, -26.9032785601194, 1.8)
    pt3dadd(-100.714087984022, -239.759546221548, -27.2375790396678, 1.8)
    pt3dadd(-101.00284707184, -240.656686889769, -27.5718795192163, 1.8)
    pt3dadd(-101.33067052062, -241.565294994622, -27.8092985974175, 1.8)
    pt3dadd(-101.695972722741, -242.484905077195, -27.9537686536731, 1.8)
    pt3dadd(-102.061274924862, -243.404515159769, -28.0982387099286, 1.8)
    pt3dadd(-102.426577126983, -244.324125242343, -28.2427087661842, 1.8)
    pt3dadd(-102.798878768944, -245.242832760516, -28.3730851636658, 1.8)
    pt3dadd(-103.181604105106, -246.16019616323, -28.4824730259796, 1.8)
    pt3dadd(-103.564329441268, -247.077559565943, -28.5918608882934, 1.8)
    pt3dadd(-103.94705477743, -247.994922968657, -28.7012487506072, 1.8)
    pt3dadd(-104.329780113592, -248.91228637137, -28.810636612921, 1.8)
    pt3dadd(-104.712505449755, -249.829649774084, -28.9200244752348, 1.8)
    pt3dadd(-105.096596907803, -250.698512936456, -29.1918842744972, 1.8)
    pt3dadd(-105.481811758156, -251.527493276248, -29.5973483484967, 1.8)
    pt3dadd(-105.867026608509, -252.356473616041, -30.0028124224963, 1.8)
    pt3dadd(-106.252241458862, -253.185453955834, -30.4082764964958, 1.8)
    pt3dadd(-106.637456309215, -254.014434295627, -30.8137405704954, 1.8)
    pt3dadd(-106.960291523648, -254.884268906971, -31.1863559267817, 1.8)
    pt3dadd(-107.280092286866, -255.756090870311, -31.5573733604461, 1.8)
    pt3dadd(-107.599893050084, -256.627912833652, -31.9283907941104, 1.8)
    pt3dadd(-107.919693813301, -257.499734796992, -32.2994082277748, 1.8)
    pt3dadd(-108.288154723253, -258.354060529763, -32.6549394142358, 1.8)
    pt3dadd(-108.789576958701, -259.160578720557, -32.9681552339474, 1.8)
    pt3dadd(-109.29099919415, -259.96709691135, -33.2813710536589, 1.8)
    pt3dadd(-109.792421429598, -260.773615102143, -33.5945868733705, 1.8)
    pt3dadd(-110.293843665046, -261.580133292936, -33.907802693082, 1.8)
    pt3dadd(-110.795265900495, -262.386651483729, -34.2210185127936, 1.8)
    pt3dadd(-111.297144465028, -263.200565170587, -34.5040008354101, 1.8)
    pt3dadd(-111.801652510831, -264.057093538453, -34.6127702555587, 1.8)
    pt3dadd(-112.306160556634, -264.91362190632, -34.7215396757074, 1.8)
    pt3dadd(-112.810668602437, -265.770150274187, -34.830309095856, 1.8)
    pt3dadd(-113.31517664824, -266.626678642053, -34.9390785160047, 1.8)
    pt3dadd(-113.788629282549, -267.498902385262, -35.0561684691931, 1.8)
    pt3dadd(-114.229127463185, -268.387781277917, -35.1820877570257, 1.8)
    pt3dadd(-114.669625643821, -269.276660170573, -35.3080070448583, 1.8)
    pt3dadd(-115.110123824456, -270.165539063228, -35.433926332691, 1.8)
    pt3dadd(-115.585607747572, -270.930362316456, -35.7664846420369, 1.8)
    pt3dadd(-116.107315080985, -271.53128238186, -36.3720558874388, 1.8)
    pt3dadd(-116.629022414397, -272.132202447265, -36.9776271328406, 1.8)
    pt3dadd(-117.15072974781, -272.73312251267, -37.5831983782424, 1.8)
    pt3dadd(-117.672437081222, -273.334042578075, -38.1887696236443, 1.8)
    pt3dadd(-118.219280350276, -273.954623766653, -38.7085768770406, 1.8)
    pt3dadd(-118.903127775916, -274.682368485414, -38.7609249692726, 1.8)
    pt3dadd(-119.586975201556, -275.410113204176, -38.8132730615046, 1.8)
    pt3dadd(-120.270822627196, -276.137857922938, -38.8656211537366, 1.8)
    pt3dadd(-120.954670052835, -276.865602641699, -38.9179692459685, 1.8)
    pt3dadd(-121.638517478475, -277.593347360461, -38.9703173382005, 1.8)
    pt3dadd(-122.322364904115, -278.321092079223, -39.0226654304324, 1.8)
    pt3dadd(-123.006212329755, -279.048836797984, -39.0750135226644, 1.8)
    pt3dadd(-123.844846506149, -279.53499722072, -39.109516061126, 1.8)
    pt3dadd(-124.794270214622, -279.848242255131, -39.1312455389591, 1.8)
    pt3dadd(-125.743693923094, -280.161487289543, -39.1529750167921, 1.8)
    pt3dadd(-126.693117631567, -280.474732323955, -39.1747044946252, 1.8)
    pt3dadd(-127.598516249547, -280.736505980049, -39.3356888630149, 1.8)
    pt3dadd(-128.34636829566, -280.814086052152, -39.9950056681525, 1.8)
    pt3dadd(-129.094220341773, -280.891666124255, -40.6543224732902, 1.8)
    pt3dadd(-129.881955155411, -280.912734172729, -41.1493302524908, 1.8)
    pt3dadd(-130.837842809858, -280.695537479235, -40.9515819568981, 1.8)
    pt3dadd(-131.793730464306, -280.478340785741, -40.7538336613054, 1.8)
    pt3dadd(-132.749618118754, -280.261144092247, -40.5560853657128, 1.8)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(-25.2963891926705, -33.5204036749462, 1.48926348974962, 1.8)
    pt3dadd(-25.5468349245236, -34.4847226509128, 1.53743455554112, 1.8)
    pt3dadd(-25.7920308970554, -35.4515965751533, 1.60838347856357, 1.8)
    pt3dadd(-26.0372268695872, -36.4184704993937, 1.67933240158602, 1.8)
    pt3dadd(-26.282422842119, -37.3853444236342, 1.75028132460847, 1.8)
    pt3dadd(-26.5276188146507, -38.3522183478747, 1.82123024763092, 1.8)
    pt3dadd(-26.759777864015, -39.321678038185, 1.89899755077212, 1.8)
    pt3dadd(-26.9801156266257, -40.2934823831194, 1.98294744972552, 1.8)
    pt3dadd(-27.2004533892364, -41.2652867280538, 2.06689734867891, 1.8)
    pt3dadd(-27.420791151847, -42.2370910729883, 2.15084724763231, 1.8)
    pt3dadd(-27.6411289144577, -43.2088954179227, 2.23479714658571, 1.8)
    pt3dadd(-27.8614666770683, -44.1806997628571, 2.3187470455391, 1.8)
    pt3dadd(-28.081804439679, -45.1525041077916, 2.4026969444925, 1.8)
    pt3dadd(-28.3021422022897, -46.124308452726, 2.48664684344589, 1.8)
    pt3dadd(-28.5224799649003, -47.0961127976604, 2.57059674239929, 1.8)
    pt3dadd(-28.7499556310734, -48.0658264337728, 2.63603008009808, 1.8)
    pt3dadd(-29.0424810711603, -49.0164868373776, 2.5327166544455, 1.8)
    pt3dadd(-29.3350065112472, -49.9671472409823, 2.42940322879293, 1.8)
    pt3dadd(-29.627531951334, -50.917807644587, 2.32608980314035, 1.8)
    pt3dadd(-29.9200573914209, -51.8684680481917, 2.22277637748777, 1.8)
    pt3dadd(-30.2536902775505, -52.7953896093415, 2.33431933420494, 1.8)
    pt3dadd(-30.6018108444988, -53.7139447842135, 2.52158508543479, 1.8)
    pt3dadd(-30.9499314114471, -54.6324999590853, 2.70885083666464, 1.8)
    pt3dadd(-31.2980519783954, -55.5510551339572, 2.89611658789449, 1.8)
    pt3dadd(-31.6461725453437, -56.4696103088291, 3.08338233912434, 1.8)
    pt3dadd(-31.994293112292, -57.388165483701, 3.27064809035419, 1.8)
    pt3dadd(-32.3424136792403, -58.3067206585729, 3.45791384158404, 1.8)
    pt3dadd(-32.5600249745079, -59.2635787943224, 3.60008629606559, 1.8)
    pt3dadd(-32.6705067516273, -60.2518782038575, 3.70524357844362, 1.8)
  }
}
proc shape3d_9() {
  adendIML[2] {
    pt3dadd(-32.7809885287466, -61.2401776133925, 3.81040086082164, 1.8)
    pt3dadd(-32.891470305866, -62.2284770229276, 3.91555814319967, 1.8)
    pt3dadd(-33.0019520829853, -63.2167764324628, 4.02071542557769, 1.8)
    pt3dadd(-33.1124338601047, -64.2050758419979, 4.12587270795572, 1.8)
    pt3dadd(-33.222915637224, -65.1933752515329, 4.23102999033374, 1.8)
    pt3dadd(-33.3403975164218, -66.1787571031347, 4.35086589407295, 1.8)
    pt3dadd(-33.4799322289367, -67.1549476003712, 4.51694472206899, 1.8)
    pt3dadd(-33.6194669414515, -68.1311380976077, 4.68302355006503, 1.8)
    pt3dadd(-33.7590016539664, -69.1073285948442, 4.84910237806107, 1.8)
    pt3dadd(-33.8985363664813, -70.0835190920807, 5.01518120605711, 1.8)
    pt3dadd(-34.0380710789962, -71.0597095893173, 5.18126003405315, 1.8)
    pt3dadd(-34.1776057915111, -72.0359000865538, 5.34733886204919, 1.8)
    pt3dadd(-34.3603265207612, -73.0054611273374, 5.47304340775194, 1.8)
    pt3dadd(-34.6743831951859, -73.9548608752989, 5.47596296593822, 1.8)
    pt3dadd(-34.9884398696106, -74.9042606232603, 5.4788825241245, 1.8)
    pt3dadd(-35.3024965440353, -75.8536603712218, 5.48180208231078, 1.8)
    pt3dadd(-35.61655321846, -76.8030601191833, 5.48472164049706, 1.8)
    pt3dadd(-35.9306098928847, -77.7524598671447, 5.48764119868334, 1.8)
    pt3dadd(-36.2446665673094, -78.7018596151062, 5.49056075686962, 1.8)
    pt3dadd(-36.5009808323384, -79.6411034513437, 5.60205587544924, 1.8)
    pt3dadd(-36.6067654884773, -80.5538716791727, 5.99659835578762, 1.8)
    pt3dadd(-36.7125501446162, -81.4666399070017, 6.39114083612599, 1.8)
    pt3dadd(-36.818334800755, -82.3794081348306, 6.78568331646437, 1.8)
    pt3dadd(-36.9241194568939, -83.2921763626596, 7.18022579680275, 1.8)
    pt3dadd(-37.0299041130327, -84.2049445904886, 7.57476827714112, 1.8)
    pt3dadd(-37.1646729551177, -85.1311344485564, 7.81088121253195, 1.8)
    pt3dadd(-37.3751868535335, -86.0923993692938, 7.6329664837057, 1.8)
    pt3dadd(-37.5857007519493, -87.0536642900314, 7.45505175487945, 1.8)
    pt3dadd(-37.7962146503652, -88.0149292107689, 7.2771370260532, 1.8)
    pt3dadd(-38.006728548781, -88.9761941315063, 7.09922229722694, 1.8)
    pt3dadd(-38.2172424471968, -89.9374590522438, 6.92130756840068, 1.8)
    pt3dadd(-38.4207908642231, -90.902901746221, 6.77247468087458, 1.8)
    pt3dadd(-38.5912034065984, -91.8882187550731, 6.76198862022991, 1.8)
    pt3dadd(-38.7616159489738, -92.8735357639253, 6.75150255958526, 1.8)
    pt3dadd(-38.9320284913491, -93.8588527727774, 6.74101649894059, 1.8)
    pt3dadd(-39.1024410337245, -94.8441697816296, 6.73053043829593, 1.8)
    pt3dadd(-39.2728535760998, -95.8294867904817, 6.72004437765128, 1.8)
    pt3dadd(-39.4432661184751, -96.8148037993338, 6.70955831700662, 1.8)
    pt3dadd(-39.6136593385547, -97.7999376066008, 6.70425893010258, 1.8)
    pt3dadd(-39.7837301448471, -98.7820144936404, 6.78550490717064, 1.8)
    pt3dadd(-39.9538009511396, -99.7640913806799, 6.86675088423869, 1.8)
    pt3dadd(-40.123871757432, -100.746168267719, 6.94799686130674, 1.8)
    pt3dadd(-40.2939425637245, -101.728245154759, 7.0292428383748, 1.8)
    pt3dadd(-40.464013370017, -102.710322041799, 7.11048881544284, 1.8)
    pt3dadd(-40.6340841763094, -103.692398928838, 7.1917347925109, 1.8)
    pt3dadd(-40.8041549826019, -104.674475815878, 7.27298076957895, 1.8)
    pt3dadd(-40.9742257888943, -105.656552702917, 7.35422674664701, 1.8)
    pt3dadd(-41.1442965951868, -106.638629589957, 7.43547272371506, 1.8)
    pt3dadd(-41.3143674014792, -107.620706476996, 7.51671870078311, 1.8)
    pt3dadd(-41.4868798546392, -108.602804112353, 7.51465399677482, 1.8)
    pt3dadd(-41.6614026082085, -109.584918830584, 7.44399645139411, 1.8)
    pt3dadd(-41.8359253617778, -110.567033548816, 7.37333890601339, 1.8)
    pt3dadd(-42.0104481153472, -111.549148267048, 7.30268136063267, 1.8)
    pt3dadd(-42.1849708689165, -112.531262985279, 7.23202381525195, 1.8)
    pt3dadd(-42.3594936224858, -113.513377703511, 7.16136626987123, 1.8)
    pt3dadd(-42.5340163760552, -114.495492421743, 7.09070872449051, 1.8)
    pt3dadd(-42.7085391296245, -115.477607139974, 7.0200511791098, 1.8)
    pt3dadd(-42.7298291859465, -116.433455788282, 7.25416448195425, 1.8)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(-42.7298291859465, -116.433455788282, 7.25416448195425, 1.8)
    pt3dadd(-42.7104191551109, -117.382327914252, 7.56922787122754, 1.8)
    pt3dadd(-42.6910091242752, -118.331200040222, 7.88429126050083, 1.8)
    pt3dadd(-42.6715990934396, -119.280072166192, 8.19935464977412, 1.8)
    pt3dadd(-42.652189062604, -120.228944292162, 8.51441803904741, 1.8)
    pt3dadd(-42.8101570503704, -121.176464191394, 8.72108511609867, 1.8)
    pt3dadd(-43.1099011722649, -122.122903271927, 8.84111231397157, 1.8)
    pt3dadd(-43.4096452941594, -123.06934235246, 8.96113951184447, 1.8)
    pt3dadd(-43.7093894160539, -124.015781432993, 9.08116670971738, 1.8)
    pt3dadd(-44.0091335379485, -124.962220513526, 9.20119390759029, 1.8)
    pt3dadd(-44.308877659843, -125.90865959406, 9.32122110546319, 1.8)
    pt3dadd(-44.6086217817375, -126.855098674593, 9.4412483033361, 1.8)
    pt3dadd(-44.908365903632, -127.801537755126, 9.56127550120901, 1.8)
    pt3dadd(-45.1422587475256, -128.742035619276, 9.8058103917276, 1.8)
    pt3dadd(-45.3729687041218, -129.682246317821, 10.0563632968599, 1.8)
    pt3dadd(-45.603678660718, -130.622457016365, 10.3069162019922, 1.8)
    pt3dadd(-45.8343886173142, -131.562667714909, 10.5574691071245, 1.8)
    pt3dadd(-46.0650985739104, -132.502878413453, 10.8080220122568, 1.8)
    pt3dadd(-46.2813336289725, -133.451357394414, 11.0151380896909, 1.8)
    pt3dadd(-46.4257978234302, -134.440832975134, 11.0068814754035, 1.8)
    pt3dadd(-46.5702620178879, -135.430308555853, 10.9986248611162, 1.8)
    pt3dadd(-46.7147262123456, -136.419784136573, 10.9903682468288, 1.8)
    pt3dadd(-46.8591904068033, -137.409259717292, 10.9821116325414, 1.8)
    pt3dadd(-47.003654601261, -138.398735298012, 10.9738550182541, 1.8)
    pt3dadd(-47.2654747565849, -139.302799211922, 10.7096672166535, 1.8)
    pt3dadd(-47.5873817842735, -140.163131900899, 10.3144412941704, 1.8)
    pt3dadd(-47.9092888119622, -141.023464589876, 9.91921537168733, 1.8)
    pt3dadd(-48.2311958396509, -141.883797278853, 9.52398944920426, 1.8)
    pt3dadd(-48.5531028673396, -142.74412996783, 9.12876352672119, 1.8)
    pt3dadd(-49.0456156213126, -143.52257038671, 9.47188178725212, 1.8)
    pt3dadd(-49.5480339625271, -144.296256035376, 9.85786925785169, 1.8)
    pt3dadd(-50.0504523037415, -145.069941684042, 10.2438567284513, 1.8)
    pt3dadd(-50.552870644956, -145.843627332708, 10.6298441990508, 1.8)
    pt3dadd(-51.0552889861704, -146.617312981374, 11.0158316696504, 1.8)
    pt3dadd(-51.427796669807, -147.495234097729, 11.2575825312448, 1.8)
    pt3dadd(-51.7145400574692, -148.441969287298, 11.4041114036991, 1.8)
    pt3dadd(-52.0012834451313, -149.388704476868, 11.5506402761533, 1.8)
    pt3dadd(-52.2880268327935, -150.335439666437, 11.6971691486076, 1.8)
    pt3dadd(-52.5747702204557, -151.282174856007, 11.8436980210618, 1.8)
    pt3dadd(-52.8615136081179, -152.228910045577, 11.9902268935161, 1.8)
    pt3dadd(-53.241629285216, -153.139528772559, 11.992069406022, 1.8)
    pt3dadd(-53.7010173755442, -154.019484878288, 11.8710742224204, 1.8)
    pt3dadd(-54.1604054658725, -154.899440984017, 11.7500790388188, 1.8)
    pt3dadd(-54.6197935562008, -155.779397089746, 11.6290838552172, 1.8)
    pt3dadd(-55.079181646529, -156.659353195475, 11.5080886716156, 1.8)
    pt3dadd(-55.5058366410317, -157.517311293429, 11.786909805786, 1.8)
    pt3dadd(-55.9316536406011, -158.374706223781, 12.0759665757877, 1.8)
    pt3dadd(-56.3574706401706, -159.232101154134, 12.3650233457893, 1.8)
    pt3dadd(-56.78328763974, -160.089496084486, 12.6540801157909, 1.8)
    pt3dadd(-57.3005655533068, -160.933216057016, 12.7856858118957, 1.8)
    pt3dadd(-57.8267312038641, -161.77560716213, 12.901991160863, 1.8)
    pt3dadd(-58.3528968544213, -162.617998267244, 13.0182965098304, 1.8)
    pt3dadd(-58.8790625049786, -163.460389372358, 13.1346018587978, 1.8)
    pt3dadd(-59.4052281555358, -164.302780477473, 13.2509072077652, 1.8)
    pt3dadd(-59.9293745596595, -165.144079633805, 13.3827406196393, 1.8)
    pt3dadd(-60.4526503913305, -165.984908010291, 13.5212687586088, 1.8)
    pt3dadd(-60.9759262230014, -166.825736386776, 13.6597968975783, 1.8)
    pt3dadd(-61.4992020546724, -167.666564763261, 13.7983250365479, 1.8)
    pt3dadd(-62.0224778863433, -168.507393139746, 13.9368531755174, 1.8)
    pt3dadd(-62.4701993030618, -169.37738954295, 14.0834455602877, 1.8)
    pt3dadd(-62.6765482697558, -170.34056856263, 14.2558006588289, 1.8)
    pt3dadd(-62.8828972364497, -171.30374758231, 14.4281557573701, 1.8)
    pt3dadd(-63.0892462031437, -172.26692660199, 14.6005108559113, 1.8)
    pt3dadd(-63.2955951698376, -173.230105621669, 14.7728659544526, 1.8)
    pt3dadd(-63.5019441365315, -174.193284641349, 14.9452210529938, 1.8)
    pt3dadd(-63.7154986992484, -175.158718942894, 15.093595504999, 1.8)
    pt3dadd(-63.9326565270951, -176.125281031575, 15.2299780791391, 1.8)
    pt3dadd(-64.1498143549418, -177.091843120257, 15.3663606532791, 1.8)
    pt3dadd(-64.3808675671519, -178.052919243942, 15.5075852819724, 1.8)
    pt3dadd(-64.7811008422006, -178.947202260041, 15.7077632344574, 1.8)
    pt3dadd(-65.1813341172493, -179.841485276139, 15.9079411869425, 1.8)
    pt3dadd(-65.5818243755738, -180.735639095409, 16.1080861327115, 1.8)
    pt3dadd(-66.1003527686509, -181.570449937067, 16.2930703596673, 1.8)
    pt3dadd(-66.6188811617279, -182.405260778726, 16.478054586623, 1.8)
    pt3dadd(-67.1374095548049, -183.240071620384, 16.6630388135788, 1.8)
    pt3dadd(-67.655937947882, -184.074882462042, 16.8480230405345, 1.8)
    pt3dadd(-68.1032743613428, -184.952082279174, 16.988095368039, 1.8)
    pt3dadd(-68.4641246884836, -185.880777455916, 17.0736074145443, 1.8)
    pt3dadd(-68.8249750156243, -186.809472632659, 17.1591194610497, 1.8)
    pt3dadd(-69.1858253427651, -187.738167809401, 17.2446315075551, 1.8)
    pt3dadd(-69.5466756699059, -188.666862986144, 17.3301435540604, 1.8)
    pt3dadd(-69.9075259970467, -189.595558162887, 17.4156556005658, 1.8)
    pt3dadd(-70.2683763241875, -190.524253339629, 17.5011676470712, 1.8)
    pt3dadd(-70.6110591280095, -191.421879429263, 17.235496540594, 1.8)
    pt3dadd(-70.9528301277562, -192.317946202322, 16.95220001405, 1.8)
    pt3dadd(-71.294601127503, -193.214012975381, 16.6689034875061, 1.8)
    pt3dadd(-71.6363721272497, -194.11007974844, 16.3856069609621, 1.8)
    pt3dadd(-71.9781431269964, -195.006146521499, 16.1023104344182, 1.8)
    pt3dadd(-72.3199141267432, -195.902213294558, 15.8190139078742, 1.8)
    pt3dadd(-72.5416690100055, -196.84258595685, 15.7033325499931, 1.8)
    pt3dadd(-72.6199773978314, -197.835914211473, 15.7879893569436, 1.8)
    pt3dadd(-72.6982857856573, -198.829242466097, 15.8726461638941, 1.8)
    pt3dadd(-72.7765941734831, -199.82257072072, 15.9573029708446, 1.8)
    pt3dadd(-72.854902561309, -200.815898975343, 16.041959777795, 1.8)
    pt3dadd(-72.9332109491349, -201.809227229967, 16.1266165847455, 1.8)
    pt3dadd(-73.0115193369607, -202.80255548459, 16.211273391696, 1.8)
    pt3dadd(-73.1636661890125, -203.756116187902, 16.4396492987483, 1.8)
    pt3dadd(-73.3569280736515, -204.687533362293, 16.7480514569699, 1.8)
    pt3dadd(-73.5501899582906, -205.618950536684, 17.0564536151915, 1.8)
    pt3dadd(-73.7434518429296, -206.550367711074, 17.3648557734131, 1.8)
    pt3dadd(-73.9367137275686, -207.481784885465, 17.6732579316347, 1.8)
    pt3dadd(-74.0765844061603, -208.189930697571, 17.0765346168749, 1.8)
    pt3dadd(-74.2089304983873, -208.866610192044, 16.3522491941087, 1.8)
    pt3dadd(-74.3412765906142, -209.543289686518, 15.6279637713425, 1.8)
    pt3dadd(-74.4736226828412, -210.219969180991, 14.9036783485763, 1.8)
    pt3dadd(-74.5513903715445, -210.991858338657, 14.6186003041629, 1.8)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(-74.5513903715445, -210.991858338657, 14.6186003041629, 1.8)
    pt3dadd(-74.7683706937853, -211.73732943332, 15.3651720108322, 1.8)
    pt3dadd(-74.9214586973368, -212.527188302956, 15.9590466013182, 1.8)
    pt3dadd(-75.0745467008882, -213.317047172593, 16.5529211918042, 1.8)
    pt3dadd(-75.2276347044397, -214.10690604223, 17.1467957822901, 1.8)
    pt3dadd(-75.3807227079911, -214.896764911867, 17.7406703727761, 1.8)
    pt3dadd(-75.5338107115426, -215.686623781503, 18.334544963262, 1.8)
    pt3dadd(-75.7108106153685, -216.486727474344, 18.8836846590693, 1.8)
    pt3dadd(-76.1284586235571, -217.389934528077, 18.9826147320634, 1.8)
    pt3dadd(-76.5461066317457, -218.293141581811, 19.0815448050575, 1.8)
    pt3dadd(-76.9637546399343, -219.196348635544, 19.1804748780516, 1.8)
    pt3dadd(-77.3814026481229, -220.099555689277, 19.2794049510458, 1.8)
    pt3dadd(-77.7990506563115, -221.00276274301, 19.3783350240399, 1.8)
    pt3dadd(-78.2166986645001, -221.905969796744, 19.477265097034, 1.8)
    pt3dadd(-78.6121521836464, -222.71686384968, 19.0738019255464, 1.8)
    pt3dadd(-79.0056287768679, -223.519535322491, 18.6255891665565, 1.8)
    pt3dadd(-79.3991053700894, -224.322206795303, 18.1773764075666, 1.8)
    pt3dadd(-79.7925819633109, -225.124878268114, 17.7291636485767, 1.8)
    pt3dadd(-80.1860585565324, -225.927549740926, 17.2809508895868, 1.8)
    pt3dadd(-80.584172792787, -226.748426763075, 17.0286331177827, 1.8)
    pt3dadd(-80.994741205762, -227.618193949284, 17.302382309672, 1.8)
    pt3dadd(-81.405309618737, -228.487961135494, 17.5761315015613, 1.8)
    pt3dadd(-81.815878031712, -229.357728321704, 17.8498806934506, 1.8)
    pt3dadd(-82.226446444687, -230.227495507913, 18.12362988534, 1.8)
    pt3dadd(-82.475592035503, -231.176934153102, 17.9491300536296, 1.8)
    pt3dadd(-82.7205572995656, -232.128436030286, 17.7630220282294, 1.8)
    pt3dadd(-82.9655225636281, -233.07993790747, 17.5769140028291, 1.8)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(-82.9655225636281, -233.07993790747, 17.5769140028291, 1.8)
    pt3dadd(-83.2104878276906, -234.031439784653, 17.3908059774289, 1.8)
    pt3dadd(-83.4554530917532, -234.982941661837, 17.2046979520286, 1.8)
    pt3dadd(-83.7004183558157, -235.934443539021, 17.0185899266284, 1.8)
    pt3dadd(-83.9211532844279, -236.890494670476, 16.9844068239955, 1.8)
    pt3dadd(-84.1049900010902, -237.853473454612, 17.1815766059397, 1.8)
    pt3dadd(-84.2888267177526, -238.816452238747, 17.3787463878839, 1.8)
    pt3dadd(-84.4726634344149, -239.779431022883, 17.5759161698282, 1.8)
    pt3dadd(-84.6565001510773, -240.742409807018, 17.7730859517724, 1.8)
    pt3dadd(-84.8403368677396, -241.705388591153, 17.9702557337166, 1.8)
    pt3dadd(-85.0263508879923, -242.668077869587, 18.1527910062173, 1.8)
    pt3dadd(-85.2651488459477, -243.6237487189, 17.9805447782451, 1.8)
    pt3dadd(-85.5039468039032, -244.579419568212, 17.808298550273, 1.8)
    pt3dadd(-85.7427447618586, -245.535090417525, 17.6360523223008, 1.8)
    pt3dadd(-85.981542719814, -246.490761266837, 17.4638060943287, 1.8)
    pt3dadd(-86.2203406777694, -247.44643211615, 17.2915598663565, 1.8)
    pt3dadd(-86.4591386357248, -248.402102965462, 17.1193136383843, 1.8)
    pt3dadd(-86.7288257138871, -249.351186390571, 16.976507233954, 1.8)
    pt3dadd(-87.0998485211542, -250.278658923878, 16.9302819546363, 1.8)
    pt3dadd(-87.4708713284213, -251.206131457186, 16.8840566753186, 1.8)
    pt3dadd(-87.8418941356883, -252.133603990493, 16.8378313960009, 1.8)
    pt3dadd(-88.2129169429554, -253.0610765238, 16.7916061166832, 1.8)
    pt3dadd(-88.5839397502225, -253.988549057108, 16.7453808373655, 1.8)
    pt3dadd(-88.9549625574895, -254.916021590415, 16.6991555580478, 1.8)
    pt3dadd(-89.4412326821735, -255.783971693717, 16.6694638466412, 1.8)
    pt3dadd(-89.9903385781576, -256.619468652921, 16.648786657354, 1.8)
    pt3dadd(-90.5394444741418, -257.454965612125, 16.6281094680668, 1.8)
    pt3dadd(-91.088550370126, -258.290462571328, 16.6074322787796, 1.8)
    pt3dadd(-91.538438995934, -259.139413880443, 16.8003754595502, 1.8)
    pt3dadd(-91.9176389360596, -259.997950923072, 17.1455153613915, 1.8)
    pt3dadd(-92.2968388761851, -260.8564879657, 17.4906552632328, 1.8)
    pt3dadd(-92.6760388163107, -261.715025008329, 17.8357951650742, 1.8)
    pt3dadd(-93.0552387564362, -262.573562050958, 18.1809350669155, 1.8)
    pt3dadd(-93.4241107576667, -263.455092627081, 18.4574273925572, 1.8)
    pt3dadd(-93.7729186739676, -264.381292736355, 18.6005580849551, 1.8)
    pt3dadd(-94.1217265902684, -265.307492845629, 18.7436887773531, 1.8)
    pt3dadd(-94.4705345065692, -266.233692954903, 18.886819469751, 1.8)
    pt3dadd(-94.8193424228701, -267.159893064177, 19.029950162149, 1.8)
    pt3dadd(-95.1681503391709, -268.086093173452, 19.173080854547, 1.8)
    pt3dadd(-95.5652266710531, -268.960945664363, 19.4348469135501, 1.8)
    pt3dadd(-95.9837035949846, -269.813032348276, 19.7492119040237, 1.8)
    pt3dadd(-96.4021805189162, -270.665119032189, 20.0635768944973, 1.8)
    pt3dadd(-96.8206574428477, -271.517205716102, 20.3779418849709, 1.8)
    pt3dadd(-97.2113428126475, -272.377245936704, 20.7026544572189, 1.8)
    pt3dadd(-97.5354752025965, -273.256332647637, 21.0521465865248, 1.8)
    pt3dadd(-97.8596075925454, -274.13541935857, 21.4016387158307, 1.8)
    pt3dadd(-98.1837399824943, -275.014506069503, 21.7511308451366, 1.8)
    pt3dadd(-98.5167861343922, -275.894229268249, 22.0903951767298, 1.8)
    pt3dadd(-98.853073088347, -276.774183876699, 22.4259409585059, 1.8)
    pt3dadd(-99.1893600423017, -277.654138485149, 22.7614867402821, 1.8)
    pt3dadd(-99.5256469962565, -278.534093093599, 23.0970325220582, 1.8)
    pt3dadd(-99.9508825634238, -279.385984413314, 23.2249200119598, 1.8)
    pt3dadd(-100.508457331546, -280.196122713243, 23.0438501002126, 1.8)
    pt3dadd(-101.066032099669, -281.006261013173, 22.8627801884654, 1.8)
    pt3dadd(-101.623606867792, -281.816399313103, 22.6817102767182, 1.8)
    pt3dadd(-102.181181635914, -282.626537613032, 22.500640364971, 1.8)
    pt3dadd(-102.570609074617, -283.461171089187, 22.7020045656895, 1.8)
    pt3dadd(-102.853283575586, -284.311355998904, 23.1461675377965, 1.8)
  }
}
proc shape3d_10() {
  adendOML[2] {
    pt3dadd(-103.135958076555, -285.161540908621, 23.5903305099034, 1.8)
    pt3dadd(-103.480066388104, -285.98398803676, 24.0412614186052, 1.8)
    pt3dadd(-103.848691812477, -286.7953655224, 24.4948932873078, 1.8)
    pt3dadd(-104.217317236849, -287.60674300804, 24.9485251560103, 1.8)
    pt3dadd(-104.611482049497, -288.409781717535, 25.3859589660737, 1.8)
    pt3dadd(-105.224006483834, -289.141524592349, 25.6849007371588, 1.8)
    pt3dadd(-105.836530918171, -289.873267467162, 25.983842508244, 1.8)
    pt3dadd(-106.449055352508, -290.605010341976, 26.2827842793291, 1.8)
    pt3dadd(-107.061579786845, -291.33675321679, 26.5817260504142, 1.8)
    pt3dadd(-107.674104221182, -292.068496091603, 26.8806678214993, 1.8)
    pt3dadd(-108.286628655519, -292.800238966417, 27.1796095925844, 1.8)
    pt3dadd(-108.899153089856, -293.531981841231, 27.4785513636695, 1.8)
    pt3dadd(-109.458178505939, -294.206950003257, 27.9592268371882, 1.8)
    pt3dadd(-110.016028071733, -294.880670318789, 28.4438966200132, 1.8)
    pt3dadd(-110.573877637527, -295.55439063432, 28.9285664028383, 1.8)
    pt3dadd(-111.131727203321, -296.228110949852, 29.4132361856633, 1.8)
    pt3dadd(-111.640367896836, -296.63048627116, 29.4252283905123, 1.8)
    pt3dadd(-112.053829959613, -296.50803255632, 28.5229788627393, 1.8)
    pt3dadd(-112.467292022389, -296.385578841481, 27.6207293349663, 1.8)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(-74.5513903715445, -210.991858338657, 14.6186003041629, 1.8)
    pt3dadd(-74.3560121076438, -212.023806438784, 14.3796706512185, 1.8)
    pt3dadd(-74.2245261624326, -213.011366763937, 14.2934381144574, 1.8)
    pt3dadd(-74.0930402172214, -213.998927089089, 14.2072055776964, 1.8)
    pt3dadd(-73.9615542720101, -214.986487414242, 14.1209730409353, 1.8)
    pt3dadd(-73.8300683267989, -215.974047739395, 14.0347405041742, 1.8)
    pt3dadd(-73.7134793365156, -216.965379382227, 13.9758607945824, 1.8)
    pt3dadd(-73.5999438529261, -217.957484051752, 13.9225877369046, 1.8)
    pt3dadd(-73.4864083693367, -218.949588721276, 13.8693146792267, 1.8)
    pt3dadd(-73.3728728857473, -219.9416933908, 13.8160416215488, 1.8)
    pt3dadd(-73.2593374021578, -220.933798060324, 13.7627685638709, 1.8)
    pt3dadd(-73.1458019185684, -221.925902729849, 13.7094955061931, 1.8)
    pt3dadd(-73.032266434979, -222.918007399373, 13.6562224485152, 1.8)
    pt3dadd(-72.9986179719835, -223.871994116545, 13.4676023474619, 1.8)
    pt3dadd(-73.1274685114822, -224.748444718483, 13.0036714465377, 1.8)
    pt3dadd(-73.2563190509809, -225.624895320422, 12.5397405456136, 1.8)
    pt3dadd(-73.3851695904795, -226.50134592236, 12.0758096446895, 1.8)
    pt3dadd(-73.5140201299782, -227.377796524299, 11.6118787437654, 1.8)
    pt3dadd(-73.6428706694769, -228.254247126238, 11.1479478428413, 1.8)
    pt3dadd(-73.7592123058387, -229.138889407493, 10.7043289454968, 1.8)
    pt3dadd(-73.7364372029339, -230.114634777743, 10.4866083283659, 1.8)
    pt3dadd(-73.713662100029, -231.090380147993, 10.2688877112351, 1.8)
    pt3dadd(-73.6908869971241, -232.066125518243, 10.0511670941042, 1.8)
    pt3dadd(-73.6681118942193, -233.041870888492, 9.83344647697338, 1.8)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(-73.6681118942193, -233.041870888492, 9.83344647697338, 1.8)
    pt3dadd(-73.6453367913144, -234.017616258742, 9.61572585984252, 1.8)
    pt3dadd(-73.6225616884095, -234.993361628992, 9.39800524271168, 1.8)
    pt3dadd(-73.6011881408989, -235.968113136029, 9.1770529604597, 1.8)
    pt3dadd(-73.6407868029423, -236.899628366913, 8.81551275440193, 1.8)
    pt3dadd(-73.6803854649857, -237.831143597796, 8.45397254834416, 1.8)
    pt3dadd(-73.719984127029, -238.76265882868, 8.09243234228639, 1.8)
    pt3dadd(-73.7595827890724, -239.694174059563, 7.73089213622861, 1.8)
    pt3dadd(-73.7703430552679, -240.61981255431, 7.35786594571486, 1.8)
    pt3dadd(-73.667581913331, -241.522317468219, 6.93962555063482, 1.8)
    pt3dadd(-73.5648207713942, -242.424822382129, 6.52138515555479, 1.8)
    pt3dadd(-73.4620596294573, -243.327327296039, 6.10314476047474, 1.8)
    pt3dadd(-73.3592984875205, -244.229832209948, 5.68490436539471, 1.8)
    pt3dadd(-73.2565373455836, -245.132337123858, 5.26666397031467, 1.8)
    pt3dadd(-73.1548691344011, -246.035079996052, 4.84885209160119, 1.8)
    pt3dadd(-73.1690761501925, -246.963051795207, 4.47647257998094, 1.8)
    pt3dadd(-73.183283165984, -247.891023594363, 4.10409306836066, 1.8)
    pt3dadd(-73.1974901817755, -248.818995393518, 3.73171355674042, 1.8)
    pt3dadd(-73.2116971975669, -249.746967192673, 3.35933404512015, 1.8)
    pt3dadd(-73.2259042133584, -250.674938991829, 2.98695453349989, 1.8)
    pt3dadd(-73.2387286098972, -251.608065151783, 2.64051308685078, 1.8)
    pt3dadd(-73.2336321527044, -252.607999687051, 2.63026851256115, 1.8)
    pt3dadd(-73.2285356955117, -253.607934222319, 2.6200239382715, 1.8)
    pt3dadd(-73.223439238319, -254.607868757587, 2.60977936398185, 1.8)
    pt3dadd(-73.2183427811263, -255.607803292855, 2.59953478969221, 1.8)
    pt3dadd(-73.2132463239336, -256.607737828123, 2.58929021540256, 1.8)
    pt3dadd(-73.2081498667409, -257.607672363391, 2.57904564111291, 1.8)
    pt3dadd(-73.2030534095482, -258.607606898659, 2.56880106682327, 1.8)
    pt3dadd(-73.1979569523555, -259.607541433927, 2.55855649253362, 1.8)
    pt3dadd(-73.2830465153652, -260.580016745884, 2.3436621516233, 1.8)
    pt3dadd(-73.3696850190811, -261.552020446956, 2.12525296048127, 1.8)
    pt3dadd(-73.4563235227969, -262.524024148029, 1.90684376933923, 1.8)
    pt3dadd(-73.5429620265128, -263.496027849101, 1.68843457819719, 1.8)
    pt3dadd(-73.6296005302286, -264.468031550174, 1.47002538705515, 1.8)
    pt3dadd(-73.7162390339444, -265.440035251246, 1.25161619591312, 1.8)
    pt3dadd(-73.7723667782686, -266.391076140639, 0.949460108793161, 1.8)
    pt3dadd(-73.8245910948819, -267.339435129559, 0.63658977001333, 1.8)
    pt3dadd(-73.8768154114952, -268.287794118479, 0.32371943123351, 1.8)
    pt3dadd(-73.9290397281085, -269.2361531074, 0.0108490924536895, 1.8)
    pt3dadd(-73.9812640447218, -270.18451209632, -0.302021246326142, 1.8)
    pt3dadd(-74.0334883613351, -271.13287108524, -0.614891585105969, 1.8)
    pt3dadd(-74.0857126779484, -272.081230074161, -0.927761923885789, 1.8)
    pt3dadd(-74.1379369945617, -273.029589063081, -1.24063226266562, 1.8)
    pt3dadd(-74.194535134788, -273.943073313519, -1.63945250615464, 1.8)
    pt3dadd(-74.2527998616361, -274.843269014224, -2.07102280406319, 1.8)
    pt3dadd(-74.3110645884843, -275.743464714929, -2.50259310197175, 1.8)
    pt3dadd(-74.3693293153325, -276.643660415635, -2.93416339988031, 1.8)
    pt3dadd(-74.4275940421807, -277.54385611634, -3.36573369778887, 1.8)
    pt3dadd(-74.4858587690289, -278.444051817045, -3.79730399569744, 1.8)
    pt3dadd(-74.5441234958771, -279.344247517751, -4.22887429360599, 1.8)
    pt3dadd(-74.6023882227253, -280.244443218456, -4.66044459151455, 1.8)
    pt3dadd(-74.6267147878553, -281.206280084636, -4.91610184800132, 1.8)
    pt3dadd(-74.6426104937317, -282.183429742201, -5.12805909193487, 1.8)
    pt3dadd(-74.658506199608, -283.160579399766, -5.34001633586843, 1.8)
    pt3dadd(-74.6744019054844, -284.13772905733, -5.55197357980198, 1.8)
    pt3dadd(-74.6927169562314, -285.104339141241, -5.78361229195307, 1.8)
    pt3dadd(-74.7670329249614, -285.826988222742, -6.47082073325522, 1.8)
    pt3dadd(-74.8413488936915, -286.549637304243, -7.15802917455737, 1.8)
    pt3dadd(-74.9156648624215, -287.272286385745, -7.84523761585952, 1.8)
    pt3dadd(-74.2853414224514, -287.975284388968, -8.12286670363155, 1.8)
    pt3dadd(-73.6217204176778, -288.677353785241, -8.38114121813114, 1.8)
    pt3dadd(-72.9542503396298, -289.375830123971, -8.6392315014794, 1.8)
    pt3dadd(-72.2862388295699, -290.073801043282, -8.8972958698513, 1.8)
    pt3dadd(-71.7989804397573, -290.876210538552, -9.14990173344471, 1.8)
    pt3dadd(-71.5393106776302, -291.810120016489, -9.39563472198043, 1.8)
    pt3dadd(-71.2796409155033, -292.744029494427, -9.64136771051615, 1.8)
    pt3dadd(-71.0199711533763, -293.677938972365, -9.88710069905188, 1.8)
    pt3dadd(-70.8434514070873, -294.631321225478, -10.058733047618, 1.8)
    pt3dadd(-70.8649550782841, -295.631078280196, -10.0538932474207, 1.8)
    pt3dadd(-70.8864587494808, -296.630835334914, -10.0490534472234, 1.8)
    pt3dadd(-70.9079624206776, -297.630592389633, -10.0442136470262, 1.8)
  }
  GCL[3] {pt3dclear()
    pt3dadd(-8.56103691096415, 27.7222240670153, -2.58459562058292, 2.5849578994354)
    pt3dadd(-8.05084609512253, 26.9145386607172, -2.15592227040756, 2.5849578994354)
    pt3dadd(-7.6772212786079, 26.1030163971336, -1.70666052911137, 2.50794216109691)
    pt3dadd(-7.30359646209326, 25.2914941335499, -1.25739878781517, 2.43092642275843)
    pt3dadd(-6.92997164557863, 24.4799718699663, -0.808137046518979, 2.35391068441994)
    pt3dadd(-6.556346829064, 23.6684496063827, -0.358875305222785, 2.27689494608145)
    pt3dadd(-6.20602256779568, 22.7769801257686, -0.128270427298808, 2.25)
    pt3dadd(-5.86820144442279, 21.8426107627989, -0.0149973848449545, 2.25)
    pt3dadd(-5.5303803210499, 20.9082413998293, 0.0982756576088981, 2.25)
    pt3dadd(-5.19255919767701, 19.9738720368596, 0.211548700062751, 2.25)
    pt3dadd(-4.85473807430412, 19.03950267389, 0.324821742516603, 2.25)
    pt3dadd(-4.51691695093123, 18.1051333109203, 0.438094784970457, 2.25)
    pt3dadd(-4.17909582755834, 17.1707639479506, 0.55136782742431, 2.25)
    pt3dadd(-4.00658686467636, 16.1862670488718, 0.534131803450702, 2.25)
    pt3dadd(-3.83657991028226, 15.2010114668235, 0.514920517699751, 2.25)
    pt3dadd(-3.66657295588817, 14.2157558847751, 0.495709231948802, 2.25)
    pt3dadd(-3.49656600149407, 13.2305003027268, 0.476497946197851, 2.25)
    pt3dadd(-3.32655904709998, 12.2452447206784, 0.457286660446901, 2.25)
    pt3dadd(-3.15655209270588, 11.25998913863, 0.43807537469595, 2.25)
    pt3dadd(-2.98654513831179, 10.2747335565817, 0.418864088945, 2.25)
    pt3dadd(-2.81653818391769, 9.28947797453336, 0.399652803194051, 2.25)
    pt3dadd(-2.62259723469949, 8.31680019129706, 0.322800003949617, 2.25)
    pt3dadd(-2.36737747927264, 7.37632566128286, 0.0983661944769114, 2.25)
    pt3dadd(-2.11215772384579, 6.43585113126866, -0.126067614995794, 2.25)
    pt3dadd(-1.85693796841894, 5.49537660125446, -0.350501424468501, 2.25)
    pt3dadd(-1.60171821299209, 4.55490207124026, -0.574935233941208, 2.25)
    pt3dadd(-1.34649845756524, 3.61442754122608, -0.799369043413913, 2.25)
    pt3dadd(-1.09127870213839, 2.67395301121188, -1.02380285288662, 2.25)
    pt3dadd(-0.864068004231557, 1.72333924756029, -1.22293539911747, 2.25)
    pt3dadd(-0.7295506011156, 0.739170660729415, -1.33833583652665, 2.25)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(-0.7295506011156, 0.739170660729415, -1.33833583652665, 2.25)
    pt3dadd(-0.595033197999639, -0.24499792610149, -1.45373627393584, 2.25)
    pt3dadd(-0.460515794883678, -1.22916651293238, -1.56913671134502, 2.25)
    pt3dadd(-0.325998391767717, -2.21333509976327, -1.6845371487542, 2.25)
    pt3dadd(-0.191480988651756, -3.19750368659415, -1.79993758616338, 2.25)
    pt3dadd(-0.0569635855357955, -4.18167227342505, -1.91533802357257, 2.25)
    pt3dadd(0.0801843340406396, -5.15809667459095, -2.07865079841865, 2.25)
    pt3dadd(0.218573503349553, -6.13086686240014, -2.26457174809258, 2.25)
    pt3dadd(0.356962672658467, -7.10363705020933, -2.45049269776651, 2.25)
    pt3dadd(0.495351841967382, -8.07640723801852, -2.63641364744044, 2.25)
    pt3dadd(0.633741011276298, -9.04917742582772, -2.82233459711436, 2.25)
    pt3dadd(0.77213018058521, -10.0219476136369, -3.00825554678829, 2.25)
    pt3dadd(0.825136275218906, -10.997177460451, -3.21022501536704, 2.20987441390901)
    pt3dadd(0.8179478427333, -11.9741413512923, -3.42350858817681, 2.1414605436432)
    pt3dadd(0.810759410247694, -12.9511052421337, -3.63679216098658, 2.07304667337739)
    pt3dadd(0.803570977762091, -13.9280691329751, -3.85007573379636, 2.00463280311157)
    pt3dadd(0.796382545276483, -14.9050330238164, -4.06335930660613, 1.93621893284576)
    pt3dadd(0.789194112790877, -15.8819969146578, -4.2766428794159, 1.86780506257995)
    pt3dadd(0.782819651696348, -16.8591130775647, -4.48863927027344, 1.8)
    pt3dadd(0.86710005977017, -17.8531883183031, -4.5572776601557, 1.8)
    pt3dadd(0.951380467843993, -18.8472635590416, -4.62591605003795, 1.8)
    pt3dadd(1.03566087591781, -19.8413387997801, -4.69455443992021, 1.8)
    pt3dadd(1.11994128399164, -20.8354140405186, -4.76319282980247, 1.8)
    pt3dadd(1.20422169206546, -21.8294892812571, -4.83183121968472, 1.8)
    pt3dadd(1.28850210013929, -22.8235645219956, -4.90046960956698, 1.8)
    pt3dadd(1.37278250821311, -23.8176397627341, -4.96910799944924, 1.8)
    pt3dadd(1.45706291628693, -24.8117150034726, -5.0377463893315, 1.8)
    pt3dadd(1.54134332436076, -25.805790244211, -5.10638477921375, 1.8)
    pt3dadd(1.62596544501132, -26.7998580522815, -5.17300723515013, 1.8)
    pt3dadd(1.72936486611538, -27.7935174310168, -5.12885297412454, 1.8)
    pt3dadd(1.83276428721944, -28.7871768097521, -5.08469871309896, 1.8)
    pt3dadd(1.93616370832349, -29.7808361884874, -5.04054445207338, 1.8)
    pt3dadd(2.03956312942755, -30.7744955672227, -4.99639019104779, 1.8)
    pt3dadd(2.14296255053161, -31.768154945958, -4.95223593002221, 1.8)
    pt3dadd(2.24636197163566, -32.7618143246933, -4.90808166899663, 1.8)
    pt3dadd(2.34976139273972, -33.7554737034286, -4.86392740797105, 1.8)
    pt3dadd(2.45316081384378, -34.749133082164, -4.81977314694546, 1.8)
    pt3dadd(2.55656023494784, -35.7427924608993, -4.77561888591988, 1.8)
    pt3dadd(2.72387589366247, -36.7262556552438, -4.77812509805857, 1.8)
    pt3dadd(2.93937469038756, -37.7020324747633, -4.81580622195921, 1.8)
    pt3dadd(3.15487348711265, -38.6778092942828, -4.85348734585984, 1.8)
    pt3dadd(3.37037228383774, -39.6535861138023, -4.89116846976047, 1.8)
    pt3dadd(3.58587108056283, -40.6293629333218, -4.9288495936611, 1.8)
    pt3dadd(3.80136987728791, -41.6051397528414, -4.96653071756174, 1.8)
    pt3dadd(4.016868674013, -42.5809165723609, -5.00421184146237, 1.8)
    pt3dadd(4.23236747073809, -43.5566933918804, -5.041892965363, 1.8)
    pt3dadd(4.44786626746318, -44.5324702113999, -5.07957408926363, 1.8)
    pt3dadd(4.66785939115001, -45.5071885100104, -5.11639662238497, 1.8)
    pt3dadd(4.92277037999293, -46.4736828207627, -5.14654848883902, 1.8)
    pt3dadd(5.17768136883585, -47.440177131515, -5.17670035529306, 1.8)
    pt3dadd(5.43259235767878, -48.4066714422672, -5.20685222174711, 1.8)
    pt3dadd(5.6875033465217, -49.3731657530194, -5.23700408820115, 1.8)
    pt3dadd(5.94241433536462, -50.3396600637717, -5.2671559546552, 1.8)
    pt3dadd(6.19732532420755, -51.306154374524, -5.29730782110924, 1.8)
    pt3dadd(6.43475848007635, -52.2773645951486, -5.31614199480257, 1.8)
    pt3dadd(6.6713680714077, -53.2487970318877, -5.33444287295422, 1.8)
    pt3dadd(6.90797766273907, -54.2202294686268, -5.35274375110586, 1.8)
    pt3dadd(7.14458725407043, -55.1916619053659, -5.37104462925751, 1.8)
    pt3dadd(7.38119684540178, -56.163094342105, -5.38934550740916, 1.8)
    pt3dadd(7.61780643673315, -57.1345267788442, -5.40764638556081, 1.8)
    pt3dadd(7.8544160280645, -58.1059592155833, -5.42594726371245, 1.8)
    pt3dadd(8.09102561939587, -59.0773916523224, -5.4442481418641, 1.8)
    pt3dadd(8.32763521072722, -60.0488240890615, -5.46254902001575, 1.8)
    pt3dadd(8.56424480205858, -61.0202565258006, -5.4808498981674, 1.8)
    pt3dadd(8.78775243751012, -61.9947107524494, -5.49557867044001, 1.8)
    pt3dadd(8.99322960046357, -62.9733234650802, -5.50539163034056, 1.8)
    pt3dadd(9.19870676341702, -63.951936177711, -5.51520459024111, 1.8)
    pt3dadd(9.40418392637047, -64.9305488903418, -5.52501755014167, 1.8)
    pt3dadd(9.60966108932393, -65.9091616029726, -5.53483051004222, 1.8)
    pt3dadd(9.81513825227738, -66.8877743156034, -5.54464346994278, 1.8)
    pt3dadd(10.0206154152308, -67.8663870282342, -5.55445642984333, 1.8)
    pt3dadd(10.2260925781843, -68.8449997408649, -5.56426938974388, 1.8)
    pt3dadd(10.4315697411377, -69.8236124534957, -5.57408234964443, 1.8)
    pt3dadd(10.6370469040912, -70.8022251661265, -5.58389530954499, 1.8)
    pt3dadd(10.8560512552838, -71.7747056960911, -5.64206759305604, 1.8)
    pt3dadd(11.0905674936323, -72.7401543341462, -5.75569444388112, 1.8)
    pt3dadd(11.3250837319808, -73.7056029722013, -5.8693212947062, 1.8)
    pt3dadd(11.5595999703293, -74.6710516102564, -5.98294814553129, 1.8)
    pt3dadd(11.7941162086777, -75.6365002483115, -6.09657499635637, 1.8)
    pt3dadd(12.0286324470262, -76.6019488863666, -6.21020184718145, 1.8)
    pt3dadd(12.2631486853747, -77.5673975244217, -6.32382869800654, 1.8)
    pt3dadd(12.4976649237232, -78.5328461624768, -6.43745554883162, 1.8)
    pt3dadd(12.7321811620717, -79.4982948005319, -6.5510823996567, 1.8)
    pt3dadd(12.9666974004202, -80.463743438587, -6.66470925048179, 1.8)
    pt3dadd(13.1251251982629, -81.4235548962247, -6.89450946491192, 1.8)
    pt3dadd(13.2801874152778, -82.3831170073623, -7.12944831594258, 1.8)
    pt3dadd(13.4352496322926, -83.3426791184999, -7.36438716697324, 1.8)
    pt3dadd(13.5903118493075, -84.3022412296375, -7.59932601800391, 1.8)
    pt3dadd(13.7453740663223, -85.2618033407751, -7.83426486903457, 1.8)
    pt3dadd(13.9004362833372, -86.2213654519126, -8.06920372006524, 1.8)
    pt3dadd(14.0629925133113, -86.8152393115146, -7.8382276974758, 1.8)
    pt3dadd(14.2376707826048, -86.8175893256389, -6.85360493739443, 1.8)
    pt3dadd(14.4345000139688, -87.0087771936246, -6.22204316977928, 1.8)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(14.4345000139688, -87.0087771936246, -6.22204316977928, 1.8)
    pt3dadd(14.296714390784, -87.9010645045663, -6.719678650857, 1.8)
    pt3dadd(14.2380481266041, -88.7705005417081, -7.21022859404971, 1.8)
    pt3dadd(14.1793818624242, -89.6399365788498, -7.70077853724242, 1.8)
    pt3dadd(14.1207155982443, -90.5093726159916, -8.19132848043514, 1.8)
    pt3dadd(14.0620493340644, -91.3788086531334, -8.68187842362785, 1.8)
    pt3dadd(14.0033830698845, -92.2482446902752, -9.17242836682057, 1.8)
    pt3dadd(13.9447168057047, -93.1176807274169, -9.66297831001328, 1.8)
    pt3dadd(13.8860505415248, -93.9871167645587, -10.153528253206, 1.8)
    pt3dadd(13.8273842773449, -94.8565528017005, -10.6440781963987, 1.8)
    pt3dadd(13.7745444086165, -95.7425339529715, -11.091618216675, 1.8)
    pt3dadd(13.7539841212505, -96.7201788716825, -11.3008732942766, 1.8)
  }
}
proc shape3d_11() {
  adendIML[4] {
    pt3dadd(13.7334238338845, -97.6978237903934, -11.5101283718781, 1.8)
    pt3dadd(13.7128635465184, -98.6754687091044, -11.7193834494797, 1.8)
    pt3dadd(13.6923032591524, -99.6531136278153, -11.9286385270813, 1.8)
    pt3dadd(13.6717429717864, -100.630758546526, -12.1378936046829, 1.8)
    pt3dadd(13.6511826844203, -101.608403465237, -12.3471486822845, 1.8)
    pt3dadd(13.6306223970543, -102.586048383948, -12.5564037598861, 1.8)
    pt3dadd(13.6100621096882, -103.563693302659, -12.7656588374877, 1.8)
    pt3dadd(13.5895018223222, -104.54133822137, -12.9749139150893, 1.8)
    pt3dadd(13.5280752304585, -105.512656956767, -13.1876292964361, 1.8)
    pt3dadd(13.2882171437973, -106.456354150187, -13.4154531437255, 1.8)
    pt3dadd(13.048359057136, -107.400051343608, -13.643276991015, 1.8)
    pt3dadd(12.8085009704747, -108.343748537028, -13.8711008383044, 1.8)
    pt3dadd(12.5686428838134, -109.287445730448, -14.0989246855939, 1.8)
    pt3dadd(12.3287847971522, -110.231142923869, -14.3267485328833, 1.8)
    pt3dadd(12.0889267104909, -111.174840117289, -14.5545723801728, 1.8)
    pt3dadd(11.8490686238296, -112.118537310709, -14.7823962274622, 1.8)
    pt3dadd(11.6092105371684, -113.06223450413, -15.0102200747517, 1.8)
    pt3dadd(11.3693524505071, -114.00593169755, -15.2380439220411, 1.8)
    pt3dadd(11.2096559032991, -114.932103310025, -15.5636753288863, 1.8)
    pt3dadd(11.1024222695266, -115.846805045022, -15.9533183498459, 1.8)
    pt3dadd(10.995188635754, -116.761506780018, -16.3429613708054, 1.8)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(10.995188635754, -116.761506780018, -16.3429613708054, 1.8)
    pt3dadd(10.8879550019815, -117.676208515014, -16.732604391765, 1.8)
    pt3dadd(10.7807213682089, -118.590910250011, -17.1222474127246, 1.8)
    pt3dadd(10.6734877344364, -119.505611985007, -17.5118904336842, 1.8)
    pt3dadd(10.5662541006638, -120.420313720004, -17.9015334546437, 1.8)
    pt3dadd(10.4590204668913, -121.335015455, -18.2911764756033, 1.8)
    pt3dadd(10.3517868331187, -122.249717189996, -18.6808194965629, 1.8)
    pt3dadd(10.2445531993462, -123.164418924993, -19.0704625175225, 1.8)
    pt3dadd(10.1373195655736, -124.079120659989, -19.4601055384821, 1.8)
    pt3dadd(10.0007275409911, -124.98476607, -19.8588964142806, 1.8)
    pt3dadd(9.80371551753444, -125.871773430366, -20.2765137095056, 1.8)
    pt3dadd(9.6067034940778, -126.758780790731, -20.6941310047306, 1.8)
    pt3dadd(9.40969147062117, -127.645788151097, -21.1117482999555, 1.8)
    pt3dadd(9.21267944716453, -128.532795511462, -21.5293655951805, 1.8)
    pt3dadd(9.01566742370789, -129.419802871827, -21.9469828904055, 1.8)
    pt3dadd(8.81865540025125, -130.306810232193, -22.3646001856304, 1.8)
    pt3dadd(8.62164337679462, -131.193817592558, -22.7822174808554, 1.8)
    pt3dadd(8.42463135333798, -132.080824952924, -23.1998347760804, 1.8)
    pt3dadd(8.26915993126108, -133.01947363139, -23.5002400093107, 1.8)
    pt3dadd(8.12405352625732, -133.971007610647, -23.7713990356157, 1.8)
    pt3dadd(7.97894712125356, -134.922541589904, -24.0425580619208, 1.8)
    pt3dadd(7.8338407162498, -135.87407556916, -24.3137170882258, 1.8)
    pt3dadd(7.68873431124604, -136.825609548417, -24.5848761145309, 1.8)
    pt3dadd(7.54362790624228, -137.777143527674, -24.8560351408359, 1.8)
    pt3dadd(7.39852150123852, -138.728677506931, -25.1271941671409, 1.8)
    pt3dadd(7.25341509623476, -139.680211486187, -25.398353193446, 1.8)
    pt3dadd(7.108308691231, -140.631745465444, -25.669512219751, 1.8)
    pt3dadd(6.94538896215089, -141.583406226243, -25.7865334652747, 1.8)
    pt3dadd(6.74243774028799, -142.535351900425, -25.5571642542808, 1.8)
    pt3dadd(6.5394865184251, -143.487297574606, -25.3277950432869, 1.8)
    pt3dadd(6.33653529656221, -144.439243248787, -25.098425832293, 1.8)
    pt3dadd(6.13358407469931, -145.391188922968, -24.8690566212992, 1.8)
    pt3dadd(5.89997834311422, -146.332254157092, -24.6580880900448, 1.8)
    pt3dadd(5.33019319332718, -147.153996653994, -24.6489146573062, 1.8)
    pt3dadd(4.76040804354013, -147.975739150895, -24.6397412245676, 1.8)
    pt3dadd(4.19062289375308, -148.797481647797, -24.6305677918291, 1.8)
    pt3dadd(3.62083774396605, -149.619224144698, -24.6213943590905, 1.8)
    pt3dadd(3.051052594179, -150.4409666416, -24.6122209263519, 1.8)
    pt3dadd(2.48126744439196, -151.262709138501, -24.6030474936133, 1.8)
    pt3dadd(1.95005818313266, -152.076223242895, -24.7344832329905, 1.8)
    pt3dadd(1.48891503598427, -152.87479196274, -25.1213100644332, 1.8)
    pt3dadd(1.02777188883588, -153.673360682584, -25.508136895876, 1.8)
    pt3dadd(0.566628741687495, -154.471929402429, -25.8949637273187, 1.8)
    pt3dadd(0.105485594539106, -155.270498122273, -26.2817905587614, 1.8)
    pt3dadd(-0.355657552609282, -156.069066842118, -26.6686173902042, 1.8)
    pt3dadd(-0.750220377782281, -156.9259589103, -26.9623565502222, 1.8)
    pt3dadd(-1.04885242590261, -157.866884878595, -27.1219724079061, 1.8)
    pt3dadd(-1.34748447402293, -158.807810846889, -27.2815882655901, 1.8)
    pt3dadd(-1.64611652214325, -159.748736815184, -27.441204123274, 1.8)
    pt3dadd(-1.94474857026358, -160.689662783479, -27.600819980958, 1.8)
    pt3dadd(-2.24338061838391, -161.630588751773, -27.7604358386419, 1.8)
    pt3dadd(-2.52822003474251, -162.541404570139, -28.0317721336331, 1.8)
    pt3dadd(-2.79715464618894, -163.417499236751, -28.4319374868325, 1.8)
    pt3dadd(-3.06608925763538, -164.293593903362, -28.8321028400319, 1.8)
    pt3dadd(-3.33502386908181, -165.169688569973, -29.2322681932313, 1.8)
    pt3dadd(-3.60395848052824, -166.045783236585, -29.6324335464307, 1.8)
    pt3dadd(-3.82501806031293, -166.981935980136, -29.8927736296741, 1.8)
    pt3dadd(-4.03295909642293, -167.934545621532, -30.1147992962566, 1.8)
    pt3dadd(-4.24090013253292, -168.887155262928, -30.3368249628391, 1.8)
    pt3dadd(-4.44884116864291, -169.839764904323, -30.5588506294216, 1.8)
    pt3dadd(-4.6567822047529, -170.792374545719, -30.7808762960041, 1.8)
    pt3dadd(-4.8647232408629, -171.744984187115, -31.0029019625866, 1.8)
    pt3dadd(-5.08101849129747, -172.697715006396, -31.2145788627292, 1.8)
    pt3dadd(-5.33099611296289, -173.650934388496, -31.3845317922544, 1.8)
    pt3dadd(-5.61098346835828, -174.573043107132, -31.6048580321019, 1.8)
    pt3dadd(-6.04612314054309, -175.334307629117, -32.0856176323774, 1.8)
    pt3dadd(-6.4812628127279, -176.095572151103, -32.566377232653, 1.8)
    pt3dadd(-6.91640248491271, -176.856836673088, -33.0471368329285, 1.8)
    pt3dadd(-7.35154215709752, -177.618101195074, -33.527896433204, 1.8)
    pt3dadd(-7.78668182928234, -178.379365717059, -34.0086560334796, 1.8)
    pt3dadd(-8.19250083028575, -179.195418431247, -34.3789962263129, 1.8)
    pt3dadd(-8.5394789356168, -180.121420412335, -34.5277461017446, 1.8)
    pt3dadd(-8.88645704094787, -181.047422393424, -34.6764959771764, 1.8)
    pt3dadd(-9.23343514627892, -181.973424374512, -34.8252458526081, 1.8)
    pt3dadd(-9.58041325160998, -182.899426355601, -34.9739957280399, 1.8)
    pt3dadd(-9.92739135694104, -183.825428336689, -35.1227456034716, 1.8)
    pt3dadd(-10.2743694622721, -184.751430317778, -35.2714954789034, 1.8)
    pt3dadd(-10.637058111818, -185.671734792547, -35.4165282767474, 1.8)
    pt3dadd(-11.0245162293261, -186.583056497634, -35.5557006770796, 1.8)
    pt3dadd(-11.4119743468343, -187.494378202721, -35.6948730774118, 1.8)
    pt3dadd(-11.7994324643424, -188.405699907808, -35.8340454777441, 1.8)
    pt3dadd(-12.1868905818505, -189.317021612895, -35.9732178780763, 1.8)
    pt3dadd(-12.5743486993586, -190.228343317982, -36.1123902784085, 1.8)
    pt3dadd(-12.9618068168668, -191.139665023069, -36.2515626787408, 1.8)
    pt3dadd(-13.2996056128957, -192.067027647282, -36.4020523830714, 1.8)
    pt3dadd(-13.5809191643337, -193.012636095508, -36.5654150116671, 1.8)
    pt3dadd(-13.8622327157717, -193.958244543733, -36.7287776402628, 1.8)
    pt3dadd(-14.1435462672097, -194.903852991959, -36.8921402688585, 1.8)
    pt3dadd(-14.4248598186477, -195.849461440185, -37.0555028974542, 1.8)
    pt3dadd(-14.7061733700857, -196.79506988841, -37.2188655260499, 1.8)
    pt3dadd(-14.9874869215237, -197.740678336636, -37.3822281546456, 1.8)
    pt3dadd(-15.2034377778121, -198.700531494907, -37.5589794090993, 1.8)
    pt3dadd(-15.4080680159825, -199.662851793224, -37.7380495324446, 1.8)
    pt3dadd(-15.612698254153, -200.62517209154, -37.91711965579, 1.8)
    pt3dadd(-15.8173284923234, -201.587492389856, -38.0961897791354, 1.8)
    pt3dadd(-16.0219587304938, -202.549812688172, -38.2752599024808, 1.8)
    pt3dadd(-16.2265889686642, -203.512132986488, -38.4543300258262, 1.8)
    pt3dadd(-16.4678672616451, -204.466079399356, -38.6216292526035, 1.8)
    pt3dadd(-16.7984655161568, -205.399616676457, -38.7602400255439, 1.8)
    pt3dadd(-17.1290637706685, -206.333153953559, -38.8988507984842, 1.8)
    pt3dadd(-17.4596620251802, -207.266691230661, -39.0374615714246, 1.8)
    pt3dadd(-17.790260279692, -208.200228507763, -39.176072344365, 1.8)
    pt3dadd(-18.0428879601197, -209.114603336632, -39.2941647826701, 1.8)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(-18.0428879601197, -209.114603336632, -39.2941647826701, 1.8)
    pt3dadd(-18.5080822216356, -209.992641863087, -38.8965858836826, 1.8)
    pt3dadd(-18.8842162951407, -210.866139708035, -38.5875152224736, 1.8)
    pt3dadd(-19.2603503686459, -211.739637552982, -38.2784445612646, 1.8)
    pt3dadd(-19.636484442151, -212.61313539793, -37.9693739000557, 1.8)
    pt3dadd(-20.0126185156562, -213.486633242878, -37.6603032388467, 1.8)
    pt3dadd(-20.3887525891613, -214.360131087826, -37.3512325776377, 1.8)
    pt3dadd(-20.598159863299, -215.291533397759, -37.5412112346774, 1.8)
    pt3dadd(-20.7763006515009, -216.233794604684, -37.8247772367, 1.8)
    pt3dadd(-20.9544414397029, -217.176055811609, -38.1083432387226, 1.8)
    pt3dadd(-21.1325822279048, -218.118317018534, -38.3919092407451, 1.8)
    pt3dadd(-21.3107230161067, -219.060578225459, -38.6754752427677, 1.8)
    pt3dadd(-21.4888638043086, -220.002839432384, -38.9590412447902, 1.8)
    pt3dadd(-21.6670045925106, -220.945100639309, -39.2426072468128, 1.8)
    pt3dadd(-21.8233220964091, -221.923322571667, -39.3496697300724, 1.8)
    pt3dadd(-21.9748774068966, -222.909391715624, -39.418216292338, 1.8)
    pt3dadd(-22.1264327173842, -223.895460859582, -39.4867628546035, 1.8)
    pt3dadd(-22.2779880278717, -224.881530003539, -39.555309416869, 1.8)
    pt3dadd(-22.4295433383593, -225.867599147496, -39.6238559791345, 1.8)
    pt3dadd(-22.5879131142362, -226.848645489202, -39.716513230922, 1.8)
    pt3dadd(-22.7867916801525, -227.799833635113, -39.9524971860896, 1.8)
    pt3dadd(-22.9856702460689, -228.751021781025, -40.1884811412573, 1.8)
    pt3dadd(-23.1845488119852, -229.702209926936, -40.424465096425, 1.8)
    pt3dadd(-23.3770312270852, -230.656194255371, -40.6490338672923, 1.8)
    pt3dadd(-23.4825831144466, -231.648181693716, -40.7184580795086, 1.8)
    pt3dadd(-23.588135001808, -232.64016913206, -40.787882291725, 1.8)
    pt3dadd(-23.6936868891694, -233.632156570404, -40.8573065039414, 1.8)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(-23.6936868891694, -233.632156570404, -40.8573065039414, 1.8)
    pt3dadd(-23.7992387765308, -234.624144008748, -40.9267307161578, 1.8)
    pt3dadd(-23.9047906638922, -235.616131447092, -40.9961549283742, 1.8)
    pt3dadd(-24.0050441419091, -236.605462931436, -41.0883054652752, 1.8)
    pt3dadd(-24.0795483756278, -237.581886993199, -41.2909015431415, 1.8)
    pt3dadd(-24.1540526093465, -238.558311054963, -41.4934976210079, 1.8)
    pt3dadd(-24.2285568430651, -239.534735116727, -41.6960936988743, 1.8)
    pt3dadd(-24.3030610767838, -240.511159178491, -41.8986897767406, 1.8)
    pt3dadd(-24.3775653105025, -241.487583240254, -42.101285854607, 1.8)
    pt3dadd(-24.4520695442212, -242.464007302018, -42.3038819324733, 1.8)
    pt3dadd(-24.5265737779399, -243.440431363782, -42.5064780103397, 1.8)
    pt3dadd(-24.6010780116586, -244.416855425545, -42.7090740882061, 1.8)
    pt3dadd(-24.6755822453773, -245.393279487309, -42.9116701660724, 1.8)
    pt3dadd(-24.7515754628441, -246.369851350127, -43.1099769116984, 1.8)
    pt3dadd(-24.9146439909985, -247.355066573063, -43.0574448298705, 1.8)
    pt3dadd(-25.077712519153, -248.340281795999, -43.0049127480426, 1.8)
    pt3dadd(-25.2407810473075, -249.325497018935, -42.9523806662148, 1.8)
    pt3dadd(-25.403849575462, -250.31071224187, -42.8998485843869, 1.8)
    pt3dadd(-25.5669181036164, -251.295927464806, -42.847316502559, 1.8)
    pt3dadd(-25.7299866317709, -252.281142687742, -42.7947844207311, 1.8)
    pt3dadd(-25.8930551599254, -253.266357910678, -42.7422523389032, 1.8)
    pt3dadd(-26.0992848742478, -254.144737399221, -43.1700495945517, 1.8)
    pt3dadd(-26.3060290504729, -255.021843453921, -43.6035721596003, 1.8)
    pt3dadd(-26.512773226698, -255.89894950862, -44.0370947246489, 1.8)
    pt3dadd(-26.7195174029231, -256.77605556332, -44.4706172896975, 1.8)
    pt3dadd(-26.9262615791482, -257.653161618019, -44.904139854746, 1.8)
    pt3dadd(-27.1733494243522, -258.558185764943, -45.1759921958271, 1.8)
    pt3dadd(-27.4854172659274, -259.508176509535, -45.1874485235406, 1.8)
    pt3dadd(-27.7974851075025, -260.458167254127, -45.198904851254, 1.8)
    pt3dadd(-28.1095529490777, -261.408157998718, -45.2103611789675, 1.8)
    pt3dadd(-28.4216207906528, -262.35814874331, -45.221817506681, 1.8)
    pt3dadd(-28.7401346733972, -263.299902112689, -45.3023186718034, 1.8)
    pt3dadd(-29.0654811867318, -264.232924085482, -45.4560055110156, 1.8)
    pt3dadd(-29.3908277000665, -265.165946058275, -45.6096923502277, 1.8)
    pt3dadd(-29.7161742134012, -266.098968031067, -45.7633791894398, 1.8)
    pt3dadd(-30.0415207267358, -267.03199000386, -45.917066028652, 1.8)
    pt3dadd(-30.3668672400705, -267.965011976653, -46.0707528678641, 1.8)
    pt3dadd(-30.6901390327691, -268.898978342022, -46.2153754236784, 1.8)
    pt3dadd(-30.9591071933576, -269.857663190529, -46.1227498881395, 1.8)
    pt3dadd(-31.2280753539461, -270.816348039035, -46.0301243526005, 1.8)
    pt3dadd(-31.4970435145345, -271.775032887541, -45.9374988170616, 1.8)
    pt3dadd(-31.766011675123, -272.733717736048, -45.8448732815227, 1.8)
    pt3dadd(-32.0349798357115, -273.692402584554, -45.7522477459838, 1.8)
    pt3dadd(-32.3002967889774, -274.608610981489, -45.8771421220994, 1.8)
    pt3dadd(-32.5600721489008, -275.460351053168, -46.3321757611564, 1.8)
    pt3dadd(-32.8198475088242, -276.312091124846, -46.7872094002135, 1.8)
    pt3dadd(-33.0796228687476, -277.163831196525, -47.2422430392705, 1.8)
    pt3dadd(-33.339398228671, -278.015571268204, -47.6972766783275, 1.8)
    pt3dadd(-33.5991735885944, -278.867311339882, -48.1523103173845, 1.8)
    pt3dadd(-33.8411174401796, -279.824899983491, -48.277320822837, 1.8)
    pt3dadd(-34.081749579514, -280.79027500534, -48.3780543361712, 1.8)
    pt3dadd(-34.3223817188484, -281.75565002719, -48.4787878495054, 1.8)
    pt3dadd(-34.5630138581828, -282.721025049039, -48.5795213628396, 1.8)
    pt3dadd(-34.9137845982314, -283.653213519962, -48.6519432098511, 1.8)
    pt3dadd(-35.2860567260319, -284.578923273205, -48.718838019915, 1.8)
    pt3dadd(-35.6583288538324, -285.504633026448, -48.785732829979, 1.8)
    pt3dadd(-36.0306009816329, -286.430342779691, -48.8526276400429, 1.8)
    pt3dadd(-36.4028731094334, -287.356052532934, -48.9195224501068, 1.8)
    pt3dadd(-36.9085647494787, -288.214808414546, -48.987818043251, 1.8)
    pt3dadd(-37.4271281241776, -289.067104877628, -49.0562487778585, 1.8)
    pt3dadd(-37.9456914988765, -289.91940134071, -49.124679512466, 1.8)
    pt3dadd(-38.4489021060288, -290.759176103246, -49.321111499098, 1.8)
    pt3dadd(-38.9493930675514, -291.596732725759, -49.540218097627, 1.8)
    pt3dadd(-39.4498840290741, -292.434289348272, -49.7593246961559, 1.8)
    pt3dadd(-39.9503749905968, -293.271845970785, -49.9784312946849, 1.8)
    pt3dadd(-40.4508659521194, -294.109402593298, -50.1975378932139, 1.8)
    pt3dadd(-40.9513569136421, -294.946959215811, -50.4166444917429, 1.8)
    pt3dadd(-41.4518478751647, -295.784515838323, -50.6357510902718, 1.8)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(-18.0428879601197, -209.114603336632, -39.2941647826701, 1.8)
    pt3dadd(-17.5985696388973, -209.94627089692, -39.8004617650793, 1.8)
    pt3dadd(-17.2433115056856, -210.782479138716, -40.21825050971, 1.8)
    pt3dadd(-16.8880533724739, -211.618687380512, -40.6360392543407, 1.8)
    pt3dadd(-16.5353761033818, -212.454255680044, -41.0556304853272, 1.8)
    pt3dadd(-16.5297270091736, -213.203776057121, -41.7175876531868, 1.8)
    pt3dadd(-16.5240779149655, -213.953296434198, -42.3795448210463, 1.8)
    pt3dadd(-16.5184288207574, -214.702816811276, -43.0415019889059, 1.8)
    pt3dadd(-16.5127797265492, -215.452337188353, -43.7034591567654, 1.8)
    pt3dadd(-16.521522181576, -216.382546869903, -44.008526801392, 1.8)
    pt3dadd(-16.5339982229041, -217.359632610517, -44.2210069272427, 1.8)
    pt3dadd(-16.8287760009214, -218.261874205544, -44.3525377207413, 1.8)
    pt3dadd(-17.3748652195796, -219.097487836212, -44.4120055734626, 1.8)
    pt3dadd(-17.9209544382379, -219.93310146688, -44.4714734261839, 1.8)
    pt3dadd(-18.4668574354234, -220.768810911689, -44.5310906373404, 1.8)
    pt3dadd(-18.9411905083161, -221.64134430987, -44.6481103152528, 1.8)
    pt3dadd(-19.4155235812088, -222.513877708051, -44.7651299931653, 1.8)
    pt3dadd(-19.8976047297754, -223.344336412513, -44.9377127604558, 1.8)
    pt3dadd(-20.4555526009926, -223.762812935413, -45.6543518417134, 1.8)
    pt3dadd(-21.0135004722098, -224.181289458313, -46.370990922971, 1.8)
    pt3dadd(-21.5714483434271, -224.599765981213, -47.0876300042286, 1.8)
    pt3dadd(-22.1293962146443, -225.018242504113, -47.8042690854863, 1.8)
    pt3dadd(-22.6749049761062, -225.464246190395, -48.4987545434372, 1.8)
    pt3dadd(-23.0325686625238, -226.325942170829, -48.8586944338658, 1.8)
    pt3dadd(-23.3902323489414, -227.187638151264, -49.2186343242943, 1.8)
    pt3dadd(-23.7478960353589, -228.049334131698, -49.5785742147229, 1.8)
    pt3dadd(-24.1296203425162, -228.917887795595, -49.873909195815, 1.8)
    pt3dadd(-24.5748999452305, -229.804555792618, -49.9985925486, 1.8)
    pt3dadd(-25.0201795479448, -230.691223789641, -50.123275901385, 1.8)
    pt3dadd(-25.4654591506591, -231.577891786664, -50.24795925417, 1.8)
  }
}
proc shape3d_12() {
  adendMML[8] {
    pt3dadd(-25.9107387533734, -232.464559783687, -50.372642606955, 1.8)
    pt3dadd(-25.9384640292608, -233.351023309515, -50.5628398372785, 1.8)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(-25.9384640292608, -233.351023309515, -50.5628398372785, 1.8)
    pt3dadd(-25.551918932957, -234.23728397226, -50.8180356957754, 1.8)
    pt3dadd(-25.0953641833573, -235.08836823013, -51.0765034350582, 1.8)
    pt3dadd(-24.6341670337788, -235.937119910511, -51.3351881355538, 1.8)
    pt3dadd(-24.27543057262, -236.807547141797, -51.5825429271868, 1.8)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(14.4345000139688, -87.0087771936246, -6.22204316977928, 1.8)
    pt3dadd(15.1031043964977, -87.6681627338513, -6.64746235629355, 1.8)
    pt3dadd(15.6925894200217, -88.3503995478779, -7.07996708069283, 1.8)
    pt3dadd(16.2820744435457, -89.0326363619046, -7.5124718050921, 1.8)
    pt3dadd(16.8715594670697, -89.7148731759312, -7.94497652949137, 1.8)
    pt3dadd(17.4610444905937, -90.3971099899578, -8.37748125389064, 1.8)
    pt3dadd(18.0505295141177, -91.0793468039845, -8.80998597828992, 1.8)
    pt3dadd(18.6330079164052, -91.7694991515477, -9.05574146624845, 1.8)
    pt3dadd(19.1906510742611, -92.487708418923, -8.63955694376759, 1.8)
    pt3dadd(19.748294232117, -93.2059176862984, -8.22337242128673, 1.8)
    pt3dadd(20.305937389973, -93.9241269536737, -7.80718789880587, 1.8)
    pt3dadd(20.8635805478289, -94.6423362210491, -7.39100337632501, 1.8)
    pt3dadd(21.4212237056848, -95.3605454884245, -6.97481885384415, 1.8)
    pt3dadd(21.9788668635407, -96.0787547557998, -6.55863433136329, 1.8)
    pt3dadd(22.5033556575834, -96.8841830741511, -6.37944862696192, 1.8)
    pt3dadd(23.0053125986171, -97.7488858472092, -6.36132837271866, 1.8)
    pt3dadd(23.5072695396507, -98.6135886202673, -6.34320811847541, 1.8)
    pt3dadd(24.0092264806844, -99.4782913933253, -6.32508786423216, 1.8)
    pt3dadd(24.511183421718, -100.342994166383, -6.3069676099889, 1.8)
    pt3dadd(24.5207862328316, -101.328942917372, -6.20942815076012, 1.8)
    pt3dadd(24.4961869366921, -102.323314199399, -6.10637171908854, 1.8)
    pt3dadd(24.4715876405527, -103.317685481427, -6.00331528741697, 1.8)
    pt3dadd(24.4469883444132, -104.312056763454, -5.9002588557454, 1.8)
    pt3dadd(24.4223890482737, -105.306428045481, -5.79720242407382, 1.8)
    pt3dadd(24.4622880645165, -106.259086057613, -5.94029620395706, 1.8)
    pt3dadd(24.570454016564, -107.167593501877, -6.34392270275825, 1.8)
    pt3dadd(24.6786199686115, -108.076100946141, -6.74754920155945, 1.8)
    pt3dadd(24.7867859206591, -108.984608390405, -7.15117570036065, 1.8)
    pt3dadd(24.936241141068, -109.923906860667, -7.40521212557856, 1.8)
    pt3dadd(25.1365811627642, -110.901152121985, -7.47489408119879, 1.8)
    pt3dadd(25.3369211844604, -111.878397383302, -7.54457603681901, 1.8)
    pt3dadd(25.5372612061567, -112.85564264462, -7.61425799243923, 1.8)
    pt3dadd(25.7376012278529, -113.832887905937, -7.68393994805945, 1.8)
    pt3dadd(25.9379412495491, -114.810133167255, -7.75362190367967, 1.8)
    pt3dadd(26.1279108176625, -115.788400632664, -7.83246335587014, 1.8)
    pt3dadd(26.2807946135352, -116.77032360145, -7.94406007772459, 1.8)
  }
  adendMML[9] {pt3dclear()
    pt3dadd(26.2807946135352, -116.77032360145, -7.94406007772459, 1.8)
    pt3dadd(26.4336784094079, -117.752246570237, -8.05565679957903, 1.8)
    pt3dadd(26.5865622052806, -118.734169539024, -8.16725352143348, 1.8)
    pt3dadd(26.7394460011532, -119.71609250781, -8.27885024328792, 1.8)
    pt3dadd(26.8923297970259, -120.698015476597, -8.39044696514237, 1.8)
    pt3dadd(27.0452135928986, -121.679938445384, -8.50204368699682, 1.8)
    pt3dadd(27.1980973887713, -122.661861414171, -8.61364040885126, 1.8)
    pt3dadd(27.350981184644, -123.643784382957, -8.72523713070571, 1.8)
    pt3dadd(27.5038649805166, -124.625707351744, -8.83683385256015, 1.8)
    pt3dadd(27.6567487763893, -125.607630320531, -8.94843057441459, 1.8)
    pt3dadd(27.8465233605948, -126.571954690282, -9.10565450325769, 1.8)
    pt3dadd(28.1281665338283, -127.492453527011, -9.37650319635151, 1.8)
    pt3dadd(28.4098097070617, -128.412952363741, -9.64735188944532, 1.8)
    pt3dadd(28.6914528802952, -129.33345120047, -9.91820058253914, 1.8)
    pt3dadd(28.9730960535287, -130.2539500372, -10.189049275633, 1.8)
    pt3dadd(29.2547392267622, -131.174448873929, -10.4598979687268, 1.8)
    pt3dadd(29.5363823999957, -132.094947710659, -10.7307466618206, 1.8)
    pt3dadd(29.8178413750674, -133.016361169208, -10.9985345948601, 1.8)
    pt3dadd(30.0980822826549, -133.943822848266, -11.2460823025737, 1.8)
    pt3dadd(30.3783231902424, -134.871284527324, -11.4936300102874, 1.8)
    pt3dadd(30.65856409783, -135.798746206381, -11.741177718001, 1.8)
    pt3dadd(30.9388050054175, -136.726207885439, -11.9887254257146, 1.8)
    pt3dadd(31.2190459130051, -137.653669564496, -12.2362731334283, 1.8)
    pt3dadd(31.471296438184, -138.588211025927, -12.4816244261162, 1.8)
    pt3dadd(31.6299126485196, -139.54643599986, -12.7196282016088, 1.8)
    pt3dadd(31.7885288588551, -140.504660973794, -12.9576319771014, 1.8)
    pt3dadd(31.9471450691906, -141.462885947728, -13.195635752594, 1.8)
    pt3dadd(32.1057612795261, -142.421110921661, -13.4336395280866, 1.8)
    pt3dadd(32.2643774898617, -143.379335895595, -13.6716433035792, 1.8)
    pt3dadd(32.4229937001972, -144.337560869528, -13.9096470790719, 1.8)
    pt3dadd(32.5816099105327, -145.295785843462, -14.1476508545645, 1.8)
    pt3dadd(32.9027093510525, -146.20588847602, -14.3982720892392, 1.8)
    pt3dadd(33.2564303127017, -147.10632965629, -14.6514265127903, 1.8)
    pt3dadd(33.6101512743509, -148.00677083656, -14.9045809363415, 1.8)
    pt3dadd(33.9638722360001, -148.907212016831, -15.1577353598926, 1.8)
    pt3dadd(34.3175931976492, -149.807653197101, -15.4108897834438, 1.8)
    pt3dadd(34.6713141592984, -150.708094377371, -15.6640442069949, 1.8)
    pt3dadd(35.0250351209476, -151.608535557641, -15.9171986305461, 1.8)
    pt3dadd(35.3787560825968, -152.508976737912, -16.1703530540972, 1.8)
    pt3dadd(35.7324770442459, -153.409417918182, -16.4235074776484, 1.8)
    pt3dadd(36.1523140000908, -154.312269828646, -16.4762012405897, 1.8)
    pt3dadd(36.5807841899193, -155.215436525239, -16.5027194342364, 1.8)
    pt3dadd(37.0092543797477, -156.118603221832, -16.5292376278832, 1.8)
    pt3dadd(37.4377245695761, -157.021769918424, -16.5557558215299, 1.8)
    pt3dadd(37.8661947594046, -157.924936615017, -16.5822740151767, 1.8)
    pt3dadd(38.294664949233, -158.828103311609, -16.6087922088235, 1.8)
    pt3dadd(38.7043187304528, -159.716642597891, -16.7828320867681, 1.8)
    pt3dadd(39.1035308224571, -160.597064773429, -17.0387353857305, 1.8)
    pt3dadd(39.5027429144615, -161.477486948966, -17.2946386846929, 1.8)
    pt3dadd(39.9019550064658, -162.357909124503, -17.5505419836552, 1.8)
    pt3dadd(40.3011670984701, -163.23833130004, -17.8064452826176, 1.8)
    pt3dadd(40.7003791904744, -164.118753475577, -18.06234858158, 1.8)
    pt3dadd(41.1432292765987, -164.982327144357, -18.1608553497182, 1.8)
    pt3dadd(41.6644488583011, -165.815642571379, -17.9766936090209, 1.8)
    pt3dadd(42.1856684400036, -166.648957998401, -17.7925318683235, 1.8)
    pt3dadd(42.7068880217061, -167.482273425423, -17.6083701276262, 1.8)
    pt3dadd(43.2281076034085, -168.315588852446, -17.4242083869289, 1.8)
    pt3dadd(43.749327185111, -169.148904279468, -17.2400466462316, 1.8)
    pt3dadd(44.0183656198911, -170.065821104565, -17.3197776147228, 1.8)
    pt3dadd(44.1425867609874, -171.030746785063, -17.5510513469532, 1.8)
    pt3dadd(44.2668079020838, -171.995672465562, -17.7823250791837, 1.8)
    pt3dadd(44.3910290431802, -172.96059814606, -18.0135988114142, 1.8)
    pt3dadd(44.3565616032815, -173.922412532844, -18.2192745724717, 1.8)
    pt3dadd(44.1291742334096, -174.880444476293, -18.3938305215353, 1.8)
    pt3dadd(43.9017868635378, -175.838476419742, -18.5683864705989, 1.8)
    pt3dadd(44.0556111652771, -176.819947797696, -18.5043451000811, 1.8)
    pt3dadd(44.226260478146, -177.80245368948, -18.429773090403, 1.8)
    pt3dadd(44.3969097910149, -178.784959581264, -18.355201080725, 1.8)
    pt3dadd(44.5675591038838, -179.767465473048, -18.2806290710469, 1.8)
    pt3dadd(44.7382084167527, -180.749971364831, -18.2060570613688, 1.8)
    pt3dadd(45.1303879841489, -181.590436496943, -17.9550989150306, 1.8)
    pt3dadd(45.692160993376, -182.322161712855, -17.569107601005, 1.8)
    pt3dadd(46.2539340026031, -183.053886928766, -17.1831162869794, 1.8)
    pt3dadd(46.808388007066, -183.821919761455, -16.9450983772002, 1.8)
    pt3dadd(47.3483556414901, -184.66181558492, -16.9999614749972, 1.8)
    pt3dadd(47.8883232759142, -185.501711408386, -17.0548245727941, 1.8)
    pt3dadd(48.4282909103383, -186.341607231851, -17.1096876705911, 1.8)
    pt3dadd(48.9682585447625, -187.181503055316, -17.164550768388, 1.8)
    pt3dadd(49.4800949618899, -188.015742397212, -17.3418414864877, 1.8)
    pt3dadd(49.9730083099955, -188.846176784988, -17.6014857794338, 1.8)
    pt3dadd(50.4659216581012, -189.676611172763, -17.8611300723798, 1.8)
    pt3dadd(50.9588350062068, -190.507045560538, -18.1207743653259, 1.8)
    pt3dadd(51.4517483543125, -191.337479948314, -18.3804186582719, 1.8)
    pt3dadd(51.9002231716436, -192.220153814037, -18.4929182645426, 1.8)
    pt3dadd(52.3367247237782, -193.116902787832, -18.5657720426297, 1.8)
    pt3dadd(52.7732262759129, -194.013651761627, -18.6386258207168, 1.8)
    pt3dadd(53.2097278280475, -194.910400735422, -18.7114795988039, 1.8)
    pt3dadd(53.6462293801822, -195.807149709217, -18.784333376891, 1.8)
    pt3dadd(54.0827309323168, -196.703898683012, -18.8571871549781, 1.8)
    pt3dadd(54.5192324844515, -197.600647656807, -18.9300409330652, 1.8)
    pt3dadd(54.9149544666442, -198.512341556663, -18.9978614455219, 1.8)
    pt3dadd(55.1481534983096, -199.483596984076, -19.0456223746579, 1.8)
    pt3dadd(55.3813525299749, -200.454852411488, -19.0933833037939, 1.8)
    pt3dadd(55.6145515616403, -201.426107838901, -19.1411442329299, 1.8)
    pt3dadd(55.8477505933057, -202.397363266314, -19.1889051620658, 1.8)
    pt3dadd(56.080949624971, -203.368618693726, -19.2366660912018, 1.8)
    pt3dadd(56.3141486566364, -204.339874121139, -19.2844270203378, 1.8)
    pt3dadd(56.5473476883017, -205.311129548551, -19.3321879494738, 1.8)
    pt3dadd(56.7805467199671, -206.282384975964, -19.3799488786097, 1.8)
    pt3dadd(57.0137457516325, -207.253640403377, -19.4277098077457, 1.8)
    pt3dadd(57.2550222779095, -208.213090270116, -19.3583302753514, 1.8)
    pt3dadd(57.5058272293314, -209.158613986906, -19.1507687728299, 1.8)
    pt3dadd(57.7566321807534, -210.104137703697, -18.9432072703084, 1.8)
    pt3dadd(58.0074371321753, -211.049661420487, -18.735645767787, 1.8)
    pt3dadd(58.2582420835972, -211.995185137278, -18.5280842652655, 1.8)
    pt3dadd(58.5090470350192, -212.940708854068, -18.320522762744, 1.8)
    pt3dadd(58.7872617608667, -213.884886121249, -18.1953168639281, 1.8)
    pt3dadd(59.121671803642, -214.826302907392, -18.2389558150975, 1.8)
    pt3dadd(59.4560818464174, -215.767719693535, -18.282594766267, 1.8)
    pt3dadd(59.7904918891927, -216.709136479678, -18.3262337174364, 1.8)
    pt3dadd(60.124901931968, -217.650553265821, -18.3698726686058, 1.8)
    pt3dadd(60.4593119747434, -218.591970051964, -18.4135116197753, 1.8)
    pt3dadd(60.7937220175187, -219.533386838107, -18.4571505709447, 1.8)
    pt3dadd(61.128132060294, -220.47480362425, -18.5007895221141, 1.8)
    pt3dadd(61.4860068802905, -221.404802230879, -18.5541036609453, 1.8)
    pt3dadd(61.9706846891262, -222.27309732011, -18.6597022387692, 1.8)
    pt3dadd(62.4553624979619, -223.141392409342, -18.765300816593, 1.8)
    pt3dadd(62.9400403067976, -224.009687498574, -18.8708993944169, 1.8)
    pt3dadd(63.4247181156333, -224.877982587805, -18.9764979722407, 1.8)
    pt3dadd(63.909395924469, -225.746277677037, -19.0820965500645, 1.8)
    pt3dadd(64.3940737333047, -226.614572766269, -19.1876951278884, 1.8)
    pt3dadd(64.8787515421404, -227.4828678555, -19.2932937057122, 1.8)
    pt3dadd(65.3817685487417, -228.329278278684, -19.4469760577775, 1.8)
    pt3dadd(65.9255125540267, -229.127088060948, -19.7074410420649, 1.8)
    pt3dadd(66.4692565593117, -229.924897843212, -19.9679060263523, 1.8)
    pt3dadd(67.0130005645967, -230.722707625477, -20.2283710106397, 1.8)
    pt3dadd(67.5567445698817, -231.520517407741, -20.4888359949271, 1.8)
    pt3dadd(68.1004885751667, -232.318327190006, -20.7493009792145, 1.8)
    pt3dadd(68.6442325804517, -233.11613697227, -21.009765963502, 1.8)
    pt3dadd(69.3506606547545, -233.773057917208, -21.2648528317398, 1.8)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(69.3506606547545, -233.773057917208, -21.2648528317398, 1.8)
    pt3dadd(70.0723407903386, -234.416770161417, -21.519435487389, 1.8)
    pt3dadd(70.7940209259227, -235.060482405627, -21.7740181430382, 1.8)
    pt3dadd(71.5157010615069, -235.704194649837, -22.0286007986874, 1.8)
    pt3dadd(72.28725365681, -236.309942496327, -22.2112602712944, 1.8)
    pt3dadd(73.082980300241, -236.89728833933, -22.3590573268845, 1.8)
    pt3dadd(73.8787069436721, -237.484634182333, -22.5068543824746, 1.8)
    pt3dadd(74.6744335871032, -238.071980025336, -22.6546514380647, 1.8)
    pt3dadd(75.4701602305342, -238.659325868339, -22.8024484936547, 1.8)
    pt3dadd(76.2658868739653, -239.246671711342, -22.9502455492448, 1.8)
    pt3dadd(77.0660319386806, -239.800199894193, -23.1775192342104, 1.8)
    pt3dadd(77.867193694762, -240.345946536786, -23.4230807187531, 1.8)
    pt3dadd(78.6683554508434, -240.891693179379, -23.6686422032958, 1.8)
    pt3dadd(79.4695172069248, -241.437439821972, -23.9142036878386, 1.8)
    pt3dadd(80.2706789630062, -241.983186464565, -24.1597651723813, 1.8)
    pt3dadd(81.0718407190876, -242.528933107159, -24.4053266569241, 1.8)
    pt3dadd(81.873002475169, -243.074679749752, -24.6508881414668, 1.8)
    pt3dadd(82.6803746685966, -243.620277031887, -24.871762974363, 1.8)
    pt3dadd(83.5039246325103, -244.165485240101, -25.0283307444625, 1.8)
    pt3dadd(84.3274745964241, -244.710693448314, -25.184898514562, 1.8)
    pt3dadd(85.1510245603379, -245.255901656528, -25.3414662846615, 1.8)
    pt3dadd(85.9745745242517, -245.801109864742, -25.498034054761, 1.8)
    pt3dadd(86.7981244881655, -246.346318072956, -25.6546018248605, 1.8)
    pt3dadd(87.6216744520793, -246.891526281169, -25.8111695949601, 1.8)
    pt3dadd(88.4452244159931, -247.436734489383, -25.9677373650596, 1.8)
    pt3dadd(89.2687743799068, -247.981942697597, -26.1243051351591, 1.8)
    pt3dadd(90.0923243438206, -248.527150905811, -26.2808729052586, 1.8)
    pt3dadd(90.9158743077344, -249.072359114025, -26.4374406753581, 1.8)
  }
  GCL[4] {pt3dclear()
    pt3dadd(-4.05074840202796, 58.9588852005003, 0.959020726591086, 4.06308755840424)
    pt3dadd(-3.65699390407261, 58.0259538921176, 1.05927700176915, 4.06308755840424)
    pt3dadd(-3.32153566612394, 57.0862600759085, 1.12593510233328, 3.71829125048031)
    pt3dadd(-2.98607742817526, 56.1465662596995, 1.1925932028974, 3.37349494255639)
    pt3dadd(-2.65061919022658, 55.2068724434904, 1.25925130346153, 3.02869863463246)
    pt3dadd(-2.32105876351598, 54.2668712729785, 1.33431153875797, 2.69505950379602)
    pt3dadd(-2.11192583375948, 53.3205942303043, 1.58093509034888, 2.58923894081153)
    pt3dadd(-1.90279290400298, 52.3743171876302, 1.8275586419398, 2.48341837782703)
    pt3dadd(-1.69365997424649, 51.428040144956, 2.07418219353071, 2.37759781484254)
    pt3dadd(-1.48452704448999, 50.4817631022819, 2.32080574512162, 2.27177725185804)
    pt3dadd(-1.24219617481386, 49.5303615025602, 2.50759632625091, 2.25)
    pt3dadd(-0.991263075060074, 48.5776320307214, 2.6788830243264, 2.25)
    pt3dadd(-0.740329975306288, 47.6249025588825, 2.85016972240189, 2.25)
    pt3dadd(-0.489396875552503, 46.6721730870437, 3.02145642047739, 2.25)
    pt3dadd(-0.238463775798715, 45.7194436152048, 3.19274311855288, 2.25)
    pt3dadd(0.00289077680266914, 44.833352035175, 3.54862941855146, 2.25)
    pt3dadd(0.2368188861838, 43.998926173543, 4.04763955981228, 2.25)
    pt3dadd(0.470746995564934, 43.164500311911, 4.54664970107311, 2.25)
    pt3dadd(0.704675104946064, 42.3300744502791, 5.04565984233394, 2.25)
  }
  GCL[5] {pt3dclear()
    pt3dadd(0.704675104946064, 42.3300744502791, 5.04565984233394, 2.25)
    pt3dadd(0.425893798458777, 41.5163239434636, 5.54512110331463, 2.25)
    pt3dadd(0.126414063623864, 40.703408114805, 6.04460057630569, 2.25)
    pt3dadd(-0.173065671211049, 39.8904922861463, 6.54408004929675, 2.25)
    pt3dadd(-0.472545406045962, 39.0775764574877, 7.04355952228781, 2.25)
    pt3dadd(-0.827054819465157, 38.2313883286217, 7.4293367131831, 2.25)
    pt3dadd(-1.21208774615714, 37.3667449311967, 7.75204624302743, 2.25)
    pt3dadd(-1.59712067284913, 36.5021015337717, 8.07475577287177, 2.25)
    pt3dadd(-1.98215359954111, 35.6374581363467, 8.3974653027161, 2.25)
    pt3dadd(-2.36718652623309, 34.7728147389217, 8.72017483256043, 2.25)
    pt3dadd(-2.75221945292508, 33.9081713414967, 9.04288436240476, 2.25)
    pt3dadd(-3.13725237961706, 33.0435279440717, 9.3655938922491, 2.25)
    pt3dadd(-3.52228530630905, 32.1788845466467, 9.68830342209343, 2.25)
    pt3dadd(-3.90731823300103, 31.3142411492217, 10.0110129519378, 2.25)
    pt3dadd(-4.05638419624093, 30.3997889772117, 10.3451327268556, 2.25)
    pt3dadd(-4.08433032180813, 29.4597703843599, 10.6851092836335, 2.25)
    pt3dadd(-4.11227644737533, 28.519751791508, 11.0250858404114, 2.25)
    pt3dadd(-4.14022257294253, 27.5797331986561, 11.3650623971894, 2.25)
    pt3dadd(-4.16816869850973, 26.6397146058042, 11.7050389539673, 2.25)
    pt3dadd(-4.19611482407693, 25.6996960129524, 12.0450155107452, 2.25)
    pt3dadd(-4.36741722204697, 24.7553306615493, 12.0908458743776, 2.25)
    pt3dadd(-4.64143144997708, 23.8078509467654, 11.9259265214655, 2.25)
    pt3dadd(-4.9154456779072, 22.8603712319816, 11.7610071685535, 2.25)
    pt3dadd(-5.18945990583732, 21.9128915171977, 11.5960878156415, 2.25)
    pt3dadd(-5.46347413376744, 20.9654118024138, 11.4311684627294, 2.25)
    pt3dadd(-5.6906109701557, 20.0452565896034, 11.4857710215094, 2.25)
    pt3dadd(-5.82722566421509, 19.1778660971702, 11.9642792858095, 2.25)
    pt3dadd(-5.96384035827449, 18.3104756047369, 12.4427875501095, 2.25)
    pt3dadd(-6.10045505233388, 17.4430851123037, 12.9212958144096, 2.25)
  }
}
proc shape3d_13() {
  GCL[5] {
    pt3dadd(-6.23706974639327, 16.5756946198704, 13.3998040787097, 2.25)
    pt3dadd(-6.27897086549881, 15.6807195292191, 13.806276626706, 2.25)
    pt3dadd(-6.11746370255653, 14.7265033452266, 14.0580441991316, 2.25)
    pt3dadd(-5.95595653961426, 13.7722871612341, 14.3098117715573, 2.25)
    pt3dadd(-5.79444937667198, 12.8180709772416, 14.5615793439829, 2.25)
    pt3dadd(-5.63294221372971, 11.8638547932491, 14.8133469164086, 2.25)
    pt3dadd(-5.4864086272891, 10.9067648992035, 15.056130026774, 2.25)
    pt3dadd(-5.51023316423106, 9.91698008743171, 15.1966946660878, 2.25)
    pt3dadd(-5.53405770117302, 8.92719527565994, 15.3372593054016, 2.25)
    pt3dadd(-5.55788223811498, 7.93741046388816, 15.4778239447154, 2.25)
    pt3dadd(-5.58170677505694, 6.94762565211639, 15.6183885840292, 2.25)
    pt3dadd(-5.6055313119989, 5.95784084034463, 15.758953223343, 2.25)
    pt3dadd(-5.61127832929811, 4.99375247618424, 15.8815678568912, 2.25)
  }
  GCL[6] {pt3dclear()
    pt3dadd(-5.61127832929811, 4.99375247618424, 15.8815678568912, 2.25)
    pt3dadd(-4.712742800738, 4.53013050806237, 15.6299142843408, 2.25)
    pt3dadd(-3.86863990100158, 4.04965522159824, 15.3919357270005, 2.25)
    pt3dadd(-3.02453700126515, 3.56917993513412, 15.1539571696602, 2.25)
    pt3dadd(-2.18043410152873, 3.08870464867, 14.9159786123198, 2.25)
    pt3dadd(-1.3363312017923, 2.60822936220588, 14.6780000549795, 2.25)
    pt3dadd(-0.492228302055876, 2.12775407574175, 14.4400214976392, 2.25)
    pt3dadd(0.310940755397342, 1.53227496497674, 14.4408307392737, 2.25)
    pt3dadd(1.11392572775031, 0.936278666248257, 14.4427138423748, 2.25)
    pt3dadd(1.91691070010327, 0.340282367519806, 14.444596945476, 2.25)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(1.91691070010327, 0.340282367519806, 14.444596945476, 2.25)
    pt3dadd(2.71989567245623, -0.255713931208646, 14.4464800485771, 2.25)
    pt3dadd(3.5228806448092, -0.851710229937111, 14.4483631516783, 2.25)
    pt3dadd(4.32586561716216, -1.44770652866556, 14.4502462547795, 2.25)
    pt3dadd(5.07704205044966, -2.08978619017016, 14.3723817282264, 2.25)
    pt3dadd(5.74747365205654, -2.8036878608986, 14.170228637481, 2.25)
    pt3dadd(6.41790525366341, -3.51758953162708, 13.9680755467355, 2.25)
    pt3dadd(7.08833685527029, -4.23149120235554, 13.76592245599, 2.25)
    pt3dadd(7.75876845687717, -4.945392873084, 13.5637693652445, 2.25)
    pt3dadd(8.42920005848405, -5.65929454381246, 13.361616274499, 2.25)
    pt3dadd(9.09963166009092, -6.37319621454094, 13.1594631837536, 2.25)
    pt3dadd(9.77006326169781, -7.08709788526937, 12.9573100930081, 2.25)
    pt3dadd(10.3973352518557, -7.85677380526617, 12.8612129755889, 2.25)
    pt3dadd(11.0115855091778, -8.64327743405623, 12.7971141200618, 2.25)
    pt3dadd(11.6258357664998, -9.42978106284627, 12.7330152645347, 2.25)
    pt3dadd(12.2400860238218, -10.2162846916363, 12.6689164090076, 2.25)
    pt3dadd(12.8543362811439, -11.0027883204264, 12.6048175534805, 2.25)
    pt3dadd(13.4685865384659, -11.7892919492164, 12.5407186979534, 2.25)
    pt3dadd(14.082836795788, -12.5757955780065, 12.4766198424263, 2.25)
    pt3dadd(14.69708705311, -13.3622992067965, 12.4125209868992, 2.25)
    pt3dadd(15.311337310432, -14.1488028355866, 12.3484221313721, 2.25)
    pt3dadd(15.9155273362945, -14.9425748406419, 12.2946026138601, 2.25)
    pt3dadd(16.4428668668984, -15.7918702516897, 12.3193073550157, 2.25)
    pt3dadd(16.9702063975022, -16.6411656627376, 12.3440120961714, 2.25)
    pt3dadd(17.497545928106, -17.4904610737855, 12.368716837327, 2.25)
    pt3dadd(18.0248854587099, -18.3397564848333, 12.3934215784827, 2.25)
    pt3dadd(18.5522249893137, -19.1890518958812, 12.4181263196383, 2.25)
    pt3dadd(19.0795645199175, -20.0383473069291, 12.442831060794, 2.25)
    pt3dadd(19.6069040505214, -20.8876427179769, 12.4675358019496, 2.25)
    pt3dadd(20.1342435811252, -21.7369381290248, 12.4922405431053, 2.25)
    pt3dadd(20.6554006153124, -22.5891892355089, 12.4982123742344, 2.25)
    pt3dadd(21.1450496081261, -23.4565035410338, 12.4087151157933, 2.25)
    pt3dadd(21.6346986009398, -24.3238178465586, 12.3192178573523, 2.25)
    pt3dadd(22.1243475937534, -25.1911321520835, 12.2297205989113, 2.25)
    pt3dadd(22.6139965865671, -26.0584464576084, 12.1402233404702, 2.25)
    pt3dadd(23.1036455793808, -26.9257607631333, 12.0507260820292, 2.25)
    pt3dadd(23.5932945721944, -27.7930750686582, 11.9612288235881, 2.25)
    pt3dadd(24.0829435650081, -28.660389374183, 11.8717315651471, 2.25)
    pt3dadd(24.5725925578218, -29.5277036797079, 11.782234306706, 2.25)
    pt3dadd(24.9778323205619, -30.4387131169121, 11.7295722023702, 2.25)
    pt3dadd(25.3581397244878, -31.3626289945675, 11.6877902740332, 2.25)
    pt3dadd(25.7384471284136, -32.2865448722228, 11.6460083456963, 2.25)
    pt3dadd(26.1187545323394, -33.2104607498781, 11.6042264173594, 2.25)
    pt3dadd(26.4990619362653, -34.1343766275335, 11.5624444890224, 2.25)
    pt3dadd(26.8793693401911, -35.0582925051888, 11.5206625606855, 2.25)
    pt3dadd(27.2596767441169, -35.9822083828442, 11.4788806323485, 2.25)
    pt3dadd(27.6399841480428, -36.9061242604995, 11.4370987040116, 2.25)
    pt3dadd(28.0202915519686, -37.8300401381549, 11.3953167756747, 2.25)
    pt3dadd(28.4005989558944, -38.7539560158102, 11.3535348473377, 2.25)
    pt3dadd(28.7897988367579, -39.6744531944936, 11.3209941136143, 2.25)
    pt3dadd(29.1865451371245, -40.5920491638989, 11.2962957315498, 2.25)
    pt3dadd(29.5832914374911, -41.5096451333041, 11.2715973494852, 2.25)
    pt3dadd(29.9800377378577, -42.4272411027094, 11.2468989674207, 2.25)
    pt3dadd(30.3767840382243, -43.3448370721147, 11.2222005853561, 2.25)
    pt3dadd(30.7735303385909, -44.26243304152, 11.1975022032916, 2.25)
    pt3dadd(31.2083560791067, -45.1504967900144, 11.2733954933426, 2.23183471175125)
    pt3dadd(31.6937148109419, -45.9993700604691, 11.4827780908497, 2.18956333502549)
    pt3dadd(32.1790735427772, -46.8482433309238, 11.6921606883568, 2.14729195829973)
    pt3dadd(32.6644322746124, -47.6971166013785, 11.901543285864, 2.10502058157398)
    pt3dadd(33.1497910064477, -48.5459898718332, 12.1109258833711, 2.06274920484822)
    pt3dadd(33.6351497382829, -49.3948631422878, 12.3203084808783, 2.02047782812247)
    pt3dadd(34.1205084701182, -50.2437364127426, 12.5296910783854, 1.97820645139671)
    pt3dadd(34.6058672019534, -51.0926096831972, 12.7390736758925, 1.93593507467096)
    pt3dadd(35.0912259337887, -51.9414829536519, 12.9484562733997, 1.8936636979452)
    pt3dadd(35.5765846656239, -52.7903562241066, 13.1578388709068, 1.85139232121944)
    pt3dadd(36.0619433974592, -53.6392294945613, 13.3672214684139, 1.80912094449369)
    pt3dadd(36.4962057865352, -54.5306749081178, 13.3434361022038, 1.8)
    pt3dadd(36.9164096287158, -55.4338335371006, 13.2554973626716, 1.8)
    pt3dadd(37.3366134708965, -56.3369921660835, 13.1675586231393, 1.8)
    pt3dadd(37.7568173130771, -57.2401507950663, 13.0796198836071, 1.8)
    pt3dadd(38.1770211552577, -58.1433094240491, 12.9916811440749, 1.8)
    pt3dadd(38.5972249974383, -59.0464680530319, 12.9037424045426, 1.8)
    pt3dadd(39.017428839619, -59.9496266820147, 12.8158036650104, 1.8)
    pt3dadd(39.4376326817996, -60.8527853109975, 12.7278649254782, 1.8)
    pt3dadd(39.8578365239802, -61.7559439399803, 12.639926185946, 1.8)
    pt3dadd(40.2711932547269, -62.6574821342601, 12.5122030159872, 1.8)
    pt3dadd(40.6843323236324, -63.558968816774, 12.3832151444875, 1.8)
    pt3dadd(41.0974713925378, -64.4604554992879, 12.2542272729878, 1.8)
    pt3dadd(41.5106104614432, -65.3619421818019, 12.125239401488, 1.8)
    pt3dadd(41.9237495303486, -66.2634288643158, 11.9962515299882, 1.8)
    pt3dadd(42.336888599254, -67.1649155468297, 11.8672636584885, 1.8)
    pt3dadd(42.7500276681595, -68.0664022293435, 11.7382757869887, 1.8)
    pt3dadd(43.1631667370649, -68.9678889118574, 11.609287915489, 1.8)
    pt3dadd(43.5763058059703, -69.8693755943714, 11.4803000439892, 1.8)
    pt3dadd(43.9894448748757, -70.7708622768853, 11.3513121724895, 1.8)
    pt3dadd(44.4025839437811, -71.6723489593992, 11.2223243009897, 1.8)
    pt3dadd(44.816918114564, -72.5736294707991, 11.0974858944942, 1.8)
    pt3dadd(45.2591337844298, -73.4701000493952, 11.0694537158988, 1.8)
    pt3dadd(45.7013494542956, -74.3665706279912, 11.0414215373034, 1.8)
    pt3dadd(46.1435651241614, -75.2630412065872, 11.0133893587081, 1.8)
    pt3dadd(46.5857807940272, -76.1595117851833, 10.9853571801127, 1.8)
    pt3dadd(47.027996463893, -77.0559823637794, 10.9573250015173, 1.8)
    pt3dadd(47.4702121337589, -77.9524529423754, 10.9292928229219, 1.8)
    pt3dadd(47.9124278036247, -78.8489235209715, 10.9012606443266, 1.8)
    pt3dadd(48.3546434734905, -79.7453940995674, 10.8732284657312, 1.8)
    pt3dadd(48.7968591433563, -80.6418646781635, 10.8451962871358, 1.8)
    pt3dadd(49.2390748132221, -81.5383352567596, 10.8171641085404, 1.8)
    pt3dadd(49.570524564088, -82.4166960038607, 10.488405193994, 1.8)
    pt3dadd(49.8906422122187, -83.2932039927048, 10.1288799002417, 1.8)
    pt3dadd(50.2107598603494, -84.169711981549, 9.76935460648939, 1.8)
    pt3dadd(50.5308775084801, -85.0462199703931, 9.40982931273708, 1.8)
    pt3dadd(50.8509951566107, -85.9227279592373, 9.05030401898479, 1.8)
    pt3dadd(51.1711128047414, -86.7992359480814, 8.6907787252325, 1.8)
    pt3dadd(51.4912304528721, -87.6757439369256, 8.33125343148021, 1.8)
    pt3dadd(51.8113481010027, -88.5522519257698, 7.9717281377279, 1.8)
    pt3dadd(52.1304678879446, -89.4443396841123, 7.67635898094354, 1.8)
    pt3dadd(52.4461317857805, -90.3903848027467, 7.60318154513833, 1.8)
    pt3dadd(52.7617956836164, -91.3364299213811, 7.5300041093331, 1.8)
    pt3dadd(53.0774595814523, -92.2824750400156, 7.45682667352786, 1.8)
    pt3dadd(53.3931234792882, -93.22852015865, 7.38364923772265, 1.8)
    pt3dadd(53.7087873771241, -94.1745652772844, 7.31047180191742, 1.8)
    pt3dadd(54.02445127496, -95.1206103959188, 7.23729436611219, 1.8)
    pt3dadd(54.3401151727959, -96.0666555145533, 7.16411693030696, 1.8)
    pt3dadd(54.6557790706318, -97.0127006331877, 7.09093949450173, 1.8)
    pt3dadd(54.9514050837686, -97.9630602144955, 7.05067477685111, 1.8)
    pt3dadd(55.1430591992002, -98.9358065336482, 7.18118645683757, 1.8)
    pt3dadd(55.3347133146318, -99.908552852801, 7.31169813682401, 1.8)
    pt3dadd(55.5263674300634, -100.881299171954, 7.44220981681047, 1.8)
    pt3dadd(55.7180215454949, -101.854045491107, 7.57272149679693, 1.8)
    pt3dadd(55.9096756609265, -102.826791810259, 7.70323317678337, 1.8)
    pt3dadd(56.1013297763581, -103.799538129412, 7.83374485676982, 1.8)
    pt3dadd(56.2929838917897, -104.772284448565, 7.96425653675627, 1.8)
    pt3dadd(56.4597503215886, -105.729648440011, 7.86252585589076, 1.8)
    pt3dadd(56.6059434496943, -106.674296694311, 7.56881299450871, 1.8)
    pt3dadd(56.7521365778, -107.618944948612, 7.27510013312666, 1.8)
    pt3dadd(56.8983297059057, -108.563593202913, 6.98138727174462, 1.8)
    pt3dadd(57.0445228340114, -109.508241457214, 6.68767441036256, 1.8)
    pt3dadd(57.1907159621171, -110.452889711514, 6.3939615489805, 1.8)
    pt3dadd(57.3369090902228, -111.397537965815, 6.10024868759846, 1.8)
    pt3dadd(57.4831022183285, -112.342186220116, 5.80653582621641, 1.8)
    pt3dadd(57.6345002609058, -113.28821620664, 5.52540017868267, 1.8)
    pt3dadd(57.8712250972469, -114.256897627902, 5.45044915493581, 1.8)
    pt3dadd(58.1079499335881, -115.225579049165, 5.37549813118894, 1.8)
    pt3dadd(58.3446747699293, -116.194260470427, 5.30054710744207, 1.8)
  }
  adendMML[10] {pt3dclear()
    pt3dadd(58.3446747699293, -116.194260470427, 5.30054710744207, 1.8)
    pt3dadd(58.5813996062704, -117.162941891689, 5.22559608369521, 1.8)
    pt3dadd(58.8181244426116, -118.131623312951, 5.15064505994835, 1.8)
    pt3dadd(59.0548492789528, -119.100304734213, 5.07569403620148, 1.8)
    pt3dadd(59.2915741152939, -120.068986155476, 5.00074301245463, 1.8)
    pt3dadd(59.5282989516351, -121.037667576738, 4.92579198870776, 1.8)
    pt3dadd(59.7650237879762, -122.006348998, 4.85084096496089, 1.8)
    pt3dadd(59.9536202057378, -122.982877021419, 4.75692408991485, 1.8)
    pt3dadd(60.1069849445866, -123.965149030946, 4.64912355105853, 1.8)
    pt3dadd(60.2603496834354, -124.947421040473, 4.54132301220221, 1.8)
    pt3dadd(60.4137144222842, -125.929693049999, 4.4335224733459, 1.8)
    pt3dadd(60.567079161133, -126.911965059526, 4.32572193448956, 1.8)
    pt3dadd(60.7204438999818, -127.894237069053, 4.21792139563324, 1.8)
    pt3dadd(60.8738086388306, -128.87650907858, 4.11012085677692, 1.8)
    pt3dadd(61.0271733776794, -129.858781088107, 4.0023203179206, 1.8)
    pt3dadd(61.1805381165282, -130.841053097634, 3.89451977906428, 1.8)
    pt3dadd(61.333902855377, -131.823325107161, 3.78671924020795, 1.8)
    pt3dadd(61.4872675942258, -132.805597116688, 3.67891870135163, 1.8)
    pt3dadd(61.6406323330746, -133.787869126215, 3.57111816249532, 1.8)
    pt3dadd(61.8395323103239, -134.764794259426, 3.51174943579056, 1.8)
    pt3dadd(62.0643490383766, -135.738676174552, 3.47994606836755, 1.8)
    pt3dadd(62.2891657664293, -136.712558089677, 3.44814270094457, 1.8)
    pt3dadd(62.513982494482, -137.686440004803, 3.41633933352158, 1.8)
    pt3dadd(62.7387992225347, -138.660321919928, 3.38453596609858, 1.8)
    pt3dadd(62.9636159505874, -139.634203835053, 3.35273259867558, 1.8)
    pt3dadd(63.1884326786402, -140.608085750179, 3.32092923125259, 1.8)
    pt3dadd(63.4132494066929, -141.581967665304, 3.2891258638296, 1.8)
    pt3dadd(63.6380661347456, -142.555849580429, 3.2573224964066, 1.8)
    pt3dadd(63.8186913261825, -143.536556557073, 3.26426764470062, 1.8)
    pt3dadd(63.92938437201, -144.528064045136, 3.33253147640743, 1.8)
    pt3dadd(64.0400774178375, -145.5195715332, 3.40079530811422, 1.8)
    pt3dadd(64.150770463665, -146.511079021264, 3.46905913982102, 1.8)
    pt3dadd(64.2614635094925, -147.502586509327, 3.53732297152783, 1.8)
    pt3dadd(64.37215655532, -148.494093997391, 3.60558680323463, 1.8)
    pt3dadd(64.4828496011475, -149.485601485454, 3.67385063494143, 1.8)
    pt3dadd(64.593542646975, -150.477108973518, 3.74211446664824, 1.8)
    pt3dadd(64.7042356928026, -151.468616461581, 3.81037829835505, 1.8)
    pt3dadd(64.8149287386301, -152.460123949645, 3.87864213006183, 1.8)
    pt3dadd(64.9256217844576, -153.451631437709, 3.94690596176864, 1.8)
    pt3dadd(65.0363148302851, -154.443138925772, 4.01516979347544, 1.8)
    pt3dadd(65.1470078761126, -155.434646413836, 4.08343362518225, 1.8)
    pt3dadd(65.2430238123453, -156.429699485837, 4.10016329954231, 1.8)
    pt3dadd(65.3371543559805, -157.42520801657, 4.11027299752696, 1.8)
    pt3dadd(65.4312848996158, -158.420716547303, 4.12038269551162, 1.8)
    pt3dadd(65.525415443251, -159.416225078036, 4.13049239349628, 1.8)
    pt3dadd(65.6195459868863, -160.411733608768, 4.14060209148094, 1.8)
    pt3dadd(65.7136765305216, -161.407242139501, 4.15071178946559, 1.8)
    pt3dadd(65.8078070741568, -162.402750670234, 4.16082148745026, 1.8)
    pt3dadd(65.9019376177921, -163.398259200966, 4.1709311854349, 1.8)
    pt3dadd(66.0099318836646, -164.391213755726, 4.19368016257868, 1.8)
    pt3dadd(66.1898974047413, -165.370909760339, 4.28204389818278, 1.8)
    pt3dadd(66.369862925818, -166.350605764951, 4.37040763378687, 1.8)
    pt3dadd(66.5498284468948, -167.330301769564, 4.45877136939097, 1.8)
    pt3dadd(66.7297939679715, -168.309997774176, 4.54713510499506, 1.8)
    pt3dadd(66.9097594890482, -169.289693778789, 4.63549884059916, 1.8)
    pt3dadd(67.0897250101249, -170.269389783401, 4.72386257620325, 1.8)
    pt3dadd(67.2696905312016, -171.249085788014, 4.81222631180734, 1.8)
    pt3dadd(67.4496560522783, -172.228781792626, 4.90059004741146, 1.8)
    pt3dadd(67.6892154774847, -173.198950065564, 4.90746990833324, 1.8)
    pt3dadd(67.9365269395721, -174.16787896128, 4.90375026229262, 1.8)
    pt3dadd(68.1838384016594, -175.136807856996, 4.900030616252, 1.8)
    pt3dadd(68.4311498637468, -176.105736752712, 4.89631097021138, 1.8)
    pt3dadd(68.6784613258341, -177.074665648428, 4.89259132417076, 1.8)
    pt3dadd(68.9257727879215, -178.043594544144, 4.88887167813014, 1.8)
    pt3dadd(69.1730842500088, -179.012523439861, 4.88515203208953, 1.8)
    pt3dadd(69.3304947224549, -179.998035334575, 4.86946317260895, 1.8)
    pt3dadd(69.4483285375747, -180.990847478947, 4.84850516691911, 1.8)
    pt3dadd(69.5661623526945, -181.983659623318, 4.82754716122928, 1.8)
    pt3dadd(69.6839961678144, -182.97647176769, 4.80658915553943, 1.8)
    pt3dadd(69.8018299829342, -183.969283912062, 4.78563114984959, 1.8)
    pt3dadd(69.919663798054, -184.962096056433, 4.76467314415974, 1.8)
    pt3dadd(70.0374976131738, -185.954908200805, 4.7437151384699, 1.8)
    pt3dadd(70.15694210001, -186.943289404228, 4.76069441686852, 1.8)
    pt3dadd(70.285806531157, -187.905756439943, 4.99954827081919, 1.8)
    pt3dadd(70.4146709623041, -188.868223475658, 5.2384021247699, 1.8)
    pt3dadd(70.5435353934511, -189.830690511373, 5.47725597872058, 1.8)
    pt3dadd(70.6723998245982, -190.793157547088, 5.71610983267126, 1.8)
  }
  adendMML[11] {pt3dclear()
    pt3dadd(70.6723998245982, -190.793157547088, 5.71610983267126, 1.8)
    pt3dadd(70.7826702736287, -191.77751469829, 5.83520048501451, 1.8)
    pt3dadd(70.8871806080878, -192.768653052809, 5.91719043679876, 1.8)
    pt3dadd(70.9916909425468, -193.759791407328, 5.99918038858302, 1.8)
    pt3dadd(71.0962012770059, -194.750929761846, 6.08117034036729, 1.8)
    pt3dadd(71.200711611465, -195.742068116365, 6.16316029215155, 1.8)
    pt3dadd(71.3052219459241, -196.733206470883, 6.24515024393581, 1.8)
    pt3dadd(71.4097322803831, -197.724344825402, 6.32714019572006, 1.8)
    pt3dadd(71.5544269760282, -198.70997717193, 6.37077306824704, 1.8)
    pt3dadd(71.7724726977006, -199.685559057943, 6.3443903666579, 1.8)
    pt3dadd(71.990518419373, -200.661140943956, 6.31800766506878, 1.8)
    pt3dadd(72.2085641410454, -201.63672282997, 6.29162496347965, 1.8)
    pt3dadd(72.4266098627178, -202.612304715983, 6.26524226189051, 1.8)
    pt3dadd(72.6446555843902, -203.587886601996, 6.23885956030138, 1.8)
    pt3dadd(72.8627013060625, -204.563468488009, 6.21247685871226, 1.8)
  }
}
proc shape3d_14() {
  adendMML[11] {
    pt3dadd(73.0807470277349, -205.539050374023, 6.18609415712312, 1.8)
    pt3dadd(73.2987927494073, -206.514632260036, 6.15971145553399, 1.8)
    pt3dadd(73.5168384710797, -207.490214146049, 6.13332875394485, 1.8)
    pt3dadd(73.8437960264027, -208.40388810602, 5.90787576276785, 1.8)
    pt3dadd(74.1854585439461, -209.309203436052, 5.6555448742178, 1.8)
    pt3dadd(74.5271210614895, -210.214518766083, 5.40321398566776, 1.8)
    pt3dadd(74.8687835790328, -211.119834096114, 5.15088309711773, 1.8)
    pt3dadd(75.2104460965762, -212.025149426145, 4.89855220856769, 1.8)
    pt3dadd(75.5521086141195, -212.930464756176, 4.64622132001764, 1.8)
    pt3dadd(75.8896143416227, -213.83769926991, 4.39894221668103, 1.8)
    pt3dadd(76.0600295066022, -214.822079244753, 4.35472981262564, 1.8)
    pt3dadd(76.2304446715817, -215.806459219596, 4.31051740857024, 1.8)
    pt3dadd(76.4008598365613, -216.79083919444, 4.26630500451485, 1.8)
    pt3dadd(76.5712750015408, -217.775219169283, 4.22209260045946, 1.8)
    pt3dadd(76.7416901665203, -218.759599144127, 4.17788019640407, 1.8)
    pt3dadd(76.9121053314998, -219.74397911897, 4.13366779234867, 1.8)
    pt3dadd(77.0825204964793, -220.728359093813, 4.08945538829327, 1.8)
    pt3dadd(77.2529356614588, -221.712739068657, 4.04524298423789, 1.8)
    pt3dadd(77.4233508264383, -222.6971190435, 4.0010305801825, 1.8)
    pt3dadd(77.5937659914178, -223.681499018344, 3.9568181761271, 1.8)
    pt3dadd(77.8332786489064, -224.624907772743, 3.7412573599218, 1.8)
    pt3dadd(78.0846514595702, -225.56128407296, 3.49628565859431, 1.8)
    pt3dadd(78.336024270234, -226.497660373177, 3.25131395726683, 1.8)
    pt3dadd(78.5873970808978, -227.434036673394, 3.00634225593933, 1.8)
    pt3dadd(78.8387698915615, -228.370412973611, 2.76137055461185, 1.8)
    pt3dadd(79.0901427022253, -229.306789273827, 2.51639885328436, 1.8)
    pt3dadd(79.3415155128891, -230.243165574044, 2.27142715195689, 1.8)
    pt3dadd(79.5991798991981, -231.177399576235, 2.02593779784969, 1.8)
    pt3dadd(79.9348311859379, -232.085078834071, 1.77403190549115, 1.8)
    pt3dadd(80.2704824726777, -232.992758091906, 1.52212601313262, 1.8)
    pt3dadd(80.6061337594176, -233.900437349742, 1.27022012077407, 1.8)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(80.6061337594176, -233.900437349742, 1.27022012077407, 1.8)
    pt3dadd(80.9417850461574, -234.808116607577, 1.01831422841554, 1.8)
    pt3dadd(81.2774363328973, -235.715795865413, 0.76640833605699, 1.8)
    pt3dadd(81.6130876196371, -236.623475123248, 0.514502443698454, 1.8)
    pt3dadd(81.9487389063769, -237.531154381084, 0.262596551339918, 1.8)
    pt3dadd(82.2843901931168, -238.43883363892, 0.0106906589813889, 1.8)
    pt3dadd(82.4844630240717, -239.417261153529, -0.0057717565084161, 1.8)
    pt3dadd(82.6804429822104, -240.397824432373, -0.0151265515387138, 1.8)
    pt3dadd(82.8764229403492, -241.378387711217, -0.0244813465690044, 1.8)
    pt3dadd(83.072402898488, -242.358950990062, -0.0338361415992878, 1.8)
    pt3dadd(83.2683828566268, -243.339514268906, -0.0431909366295713, 1.8)
    pt3dadd(83.4643628147656, -244.32007754775, -0.0525457316598619, 1.8)
    pt3dadd(83.6603427729044, -245.300640826594, -0.0619005266901453, 1.8)
    pt3dadd(83.8563227310432, -246.281204105439, -0.0712553217204501, 1.8)
    pt3dadd(84.0469722549472, -247.252046277132, -0.162406961031138, 1.8)
    pt3dadd(84.2276005801423, -248.204612799573, -0.407336396709923, 1.8)
    pt3dadd(84.4082289053374, -249.157179322014, -0.652265832388714, 1.8)
    pt3dadd(84.5888572305326, -250.109745844455, -0.897195268067499, 1.8)
    pt3dadd(84.7694855557277, -251.062312366896, -1.14212470374629, 1.8)
    pt3dadd(84.9501138809228, -252.014878889337, -1.38705413942506, 1.8)
    pt3dadd(85.1307422061179, -252.967445411777, -1.63198357510385, 1.8)
    pt3dadd(85.3477039636956, -253.925221821152, -1.74314524189263, 1.8)
    pt3dadd(85.6085410383164, -254.889289555788, -1.69277239665356, 1.8)
    pt3dadd(85.8693781129373, -255.853357290424, -1.64239955141446, 1.8)
    pt3dadd(86.1302151875581, -256.817425025059, -1.59202670617538, 1.8)
    pt3dadd(86.391052262179, -257.781492759695, -1.54165386093631, 1.8)
    pt3dadd(86.6518893367999, -258.745560494331, -1.49128101569723, 1.8)
    pt3dadd(86.683829737065, -259.736944005527, -1.38718838583429, 1.8)
    pt3dadd(86.6941032662844, -260.730913169878, -1.27801075572256, 1.8)
    pt3dadd(86.7043767955038, -261.724882334229, -1.16883312561082, 1.8)
    pt3dadd(86.7146503247231, -262.71885149858, -1.05965549549907, 1.8)
    pt3dadd(86.7249238539425, -263.712820662931, -0.950477865387334, 1.8)
    pt3dadd(86.7351973831619, -264.706789827282, -0.84130023527559, 1.8)
    pt3dadd(86.7651366743398, -265.686589941321, -0.976094420012942, 1.8)
    pt3dadd(86.8019221730888, -266.661457408473, -1.19582208911991, 1.8)
    pt3dadd(86.8387076718377, -267.636324875624, -1.4155497582269, 1.8)
    pt3dadd(86.8754931705866, -268.611192342776, -1.63527742733388, 1.8)
    pt3dadd(86.9122786693355, -269.586059809927, -1.85500509644086, 1.8)
    pt3dadd(86.9490641680845, -270.560927277079, -2.07473276554784, 1.8)
    pt3dadd(87.0360185678965, -271.538285986818, -2.20208847579844, 1.8)
    pt3dadd(87.2182193271534, -272.520374355409, -2.15407473187695, 1.8)
    pt3dadd(87.4004200864102, -273.502462723999, -2.10606098795544, 1.8)
    pt3dadd(87.582620845667, -274.48455109259, -2.05804724403394, 1.8)
    pt3dadd(87.7648216049239, -275.46663946118, -2.01003350011243, 1.8)
    pt3dadd(87.9470223641807, -276.448727829771, -1.96201975619092, 1.8)
    pt3dadd(88.0826427576316, -277.429543386989, -1.97863018237994, 1.8)
    pt3dadd(88.0764002523348, -278.406482531735, -2.19205684095399, 1.8)
    pt3dadd(88.0701577470381, -279.383421676481, -2.40548349952803, 1.8)
    pt3dadd(88.0639152417414, -280.360360821227, -2.61891015810208, 1.8)
    pt3dadd(88.0576727364447, -281.337299965974, -2.83233681667611, 1.8)
    pt3dadd(88.051430231148, -282.31423911072, -3.04576347525015, 1.8)
    pt3dadd(88.0451877258513, -283.291178255466, -3.25919013382419, 1.8)
    pt3dadd(87.8001220842562, -284.192982171324, -3.55481343232434, 1.8)
    pt3dadd(87.4198913509906, -285.052262317257, -3.89695699909841, 1.8)
    pt3dadd(87.039660617725, -285.91154246319, -4.23910056587248, 1.8)
    pt3dadd(86.6594298844594, -286.770822609124, -4.58124413264654, 1.8)
    pt3dadd(86.2791991511938, -287.630102755057, -4.92338769942061, 1.8)
    pt3dadd(85.8989684179282, -288.489382900991, -5.26553126619466, 1.8)
    pt3dadd(85.5187376846627, -289.348663046924, -5.60767483296873, 1.8)
    pt3dadd(85.1385069513971, -290.207943192858, -5.9498183997428, 1.8)
    pt3dadd(84.802631817367, -291.1292584187, -5.8976583320868, 1.8)
    pt3dadd(84.4765593085448, -292.064283450037, -5.75835682540146, 1.8)
    pt3dadd(84.1504867997225, -292.999308481373, -5.61905531871611, 1.8)
    pt3dadd(83.8244142909003, -293.934333512709, -5.47975381203076, 1.8)
    pt3dadd(83.498341782078, -294.869358544046, -5.34045230534541, 1.8)
    pt3dadd(83.1458072720753, -295.368867569466, -5.91171522796215, 1.8)
    pt3dadd(82.7818598461626, -295.680540931249, -6.78944069000981, 1.8)
    pt3dadd(82.4179124202499, -295.992214293031, -7.6671661520575, 1.8)
  }
  adendMML[12] {pt3dclear()
    pt3dadd(70.6723998245982, -190.793157547088, 5.71610983267126, 1.8)
    pt3dadd(71.1022851071847, -191.605063486531, 6.05898369851074, 1.8)
    pt3dadd(71.6254217751832, -192.370328036351, 6.43408127966033, 1.8)
    pt3dadd(72.1485584431816, -193.135592586171, 6.80917886080992, 1.8)
    pt3dadd(72.6716951111801, -193.900857135991, 7.18427644195951, 1.8)
    pt3dadd(73.0446905114286, -194.780272997227, 7.43407802662861, 1.8)
    pt3dadd(73.3441809428939, -195.715574150415, 7.62253819299242, 1.8)
    pt3dadd(73.6436713743593, -196.650875303603, 7.81099835935623, 1.8)
    pt3dadd(73.9431618058247, -197.586176456791, 7.99945852572003, 1.8)
    pt3dadd(74.2287519283735, -198.513173819138, 8.21740839181923, 1.8)
    pt3dadd(74.3717295834639, -199.354977096364, 8.73791260179046, 1.8)
    pt3dadd(74.5147072385544, -200.196780373589, 9.25841681176169, 1.8)
    pt3dadd(74.6576848936448, -201.038583650814, 9.77892102173291, 1.8)
    pt3dadd(74.8006625487353, -201.880386928039, 10.2994252317041, 1.8)
    pt3dadd(75.3073998672097, -202.722251977085, 10.3658208006841, 1.8)
    pt3dadd(75.8464499851881, -203.564122513326, 10.3918778633743, 1.8)
    pt3dadd(76.3855001031665, -204.405993049568, 10.4179349260645, 1.8)
    pt3dadd(76.9245502211449, -205.247863585809, 10.4439919887547, 1.8)
    pt3dadd(77.4586349384324, -206.090182696757, 10.486659741903, 1.8)
    pt3dadd(77.9360695422431, -206.937619583608, 10.7188383840897, 1.8)
    pt3dadd(78.4135041460538, -207.78505647046, 10.9510170262763, 1.8)
    pt3dadd(78.8909387498646, -208.632493357311, 11.183195668463, 1.8)
    pt3dadd(79.3683733536753, -209.479930244162, 11.4153743106496, 1.8)
    pt3dadd(79.7155386499007, -210.364969321357, 11.6647513407797, 1.8)
    pt3dadd(79.8256420741859, -211.318436225468, 11.9454257049924, 1.8)
    pt3dadd(79.935745498471, -212.271903129579, 12.2261000692051, 1.8)
    pt3dadd(80.0458489227562, -213.22537003369, 12.5067744334178, 1.8)
    pt3dadd(80.1950971677704, -214.169930797282, 12.7916197662423, 1.8)
    pt3dadd(80.4499083919819, -215.090474112108, 13.0877130717131, 1.8)
    pt3dadd(80.7047196161934, -216.011017426934, 13.3838063771839, 1.8)
    pt3dadd(80.9873409159852, -216.890992768634, 13.7541584156358, 1.8)
    pt3dadd(81.3001364882698, -217.726951362804, 14.2050820885469, 1.8)
    pt3dadd(81.6129320605543, -218.562909956975, 14.6560057614579, 1.8)
    pt3dadd(82.1137971237768, -219.372930854458, 14.4966557675506, 1.8)
    pt3dadd(82.6457899877704, -220.178658745931, 14.2362980183616, 1.8)
    pt3dadd(83.2528471895454, -220.730684373704, 14.6699958632629, 1.8)
    pt3dadd(83.8787694264571, -221.218950002251, 15.2781225189193, 1.8)
    pt3dadd(84.3538979606983, -221.804609827142, 15.8956451818985, 1.8)
    pt3dadd(84.5960588396135, -222.540738120962, 16.5276841393693, 1.8)
    pt3dadd(84.8382197185287, -223.276866414782, 17.1597230968401, 1.8)
    pt3dadd(85.0803805974439, -224.012994708602, 17.791762054311, 1.8)
    pt3dadd(85.2738197460472, -224.675925001808, 18.4975344334108, 1.8)
    pt3dadd(85.3747979948992, -225.199944937082, 19.3432332572804, 1.8)
    pt3dadd(85.4757762437512, -225.723964872356, 20.1889320811501, 1.8)
    pt3dadd(85.5767544926032, -226.24798480763, 21.0346309050197, 1.8)
    pt3dadd(85.6777327414552, -226.772004742903, 21.8803297288893, 1.8)
    pt3dadd(85.8808558039857, -227.434890614176, 22.5769496504545, 1.8)
    pt3dadd(86.1509272370563, -228.188792835704, 23.1758593777205, 1.8)
    pt3dadd(86.420998670127, -228.942695057232, 23.7747691049865, 1.8)
    pt3dadd(86.6508117429938, -229.707796420319, 24.3656255825012, 1.8)
    pt3dadd(86.5984294845528, -230.551399377766, 24.900031934622, 1.8)
    pt3dadd(86.5460472261118, -231.395002335213, 25.4344382867428, 1.8)
    pt3dadd(86.4936649676708, -232.23860529266, 25.9688446388635, 1.8)
    pt3dadd(86.4518373378888, -233.079230722323, 26.5073203038461, 1.8)
    pt3dadd(86.5367726790918, -233.884095512706, 27.0946691414335, 1.8)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(86.5367726790918, -233.884095512706, 27.0946691414335, 1.8)
    pt3dadd(86.6217080202949, -234.68896030309, 27.6820179790209, 1.8)
    pt3dadd(86.706643361498, -235.493825093474, 28.2693668166083, 1.8)
    pt3dadd(86.3684177350011, -236.242711646631, 28.8003429966027, 1.8)
    pt3dadd(85.9324084888449, -236.978662803861, 29.3182926384, 1.8)
    pt3dadd(85.6709874316976, -237.714653503231, 29.9077902324037, 1.8)
    pt3dadd(85.6178419082832, -238.450691374522, 30.5826411828855, 1.8)
    pt3dadd(85.5646963848689, -239.186729245813, 31.2574921333674, 1.8)
    pt3dadd(85.5161901410882, -240.109493741801, 31.5870826565686, 1.8)
    pt3dadd(85.468813599293, -241.077727676001, 31.8325994827769, 1.8)
    pt3dadd(85.4214370574977, -242.045961610201, 32.0781163089851, 1.8)
    pt3dadd(85.3740605157024, -243.014195544401, 32.3236331351934, 1.8)
    pt3dadd(85.3266839739071, -243.982429478601, 32.5691499614016, 1.8)
    pt3dadd(85.1785337721718, -244.93008286427, 32.8349363835897, 1.8)
    pt3dadd(84.9445345676021, -245.860203696591, 33.1179904588902, 1.8)
    pt3dadd(84.7105353630324, -246.790324528911, 33.4010445341908, 1.8)
    pt3dadd(84.4765361584627, -247.720445361232, 33.6840986094913, 1.8)
    pt3dadd(84.3020135712052, -248.657633636303, 33.9784197125001, 1.8)
    pt3dadd(84.2010703698768, -249.603565147309, 34.2866794189042, 1.8)
    pt3dadd(84.1001271685485, -250.549496658315, 34.5949391253083, 1.8)
    pt3dadd(83.9991839672201, -251.49542816932, 34.9031988317124, 1.8)
    pt3dadd(83.9398063727373, -252.447921912331, 35.1946826543455, 1.8)
    pt3dadd(83.9668566990005, -253.414060591884, 35.4512841580848, 1.8)
    pt3dadd(83.9939070252636, -254.380199271437, 35.707885661824, 1.8)
    pt3dadd(84.0209573515267, -255.346337950989, 35.9644871655633, 1.8)
    pt3dadd(83.9461860537302, -256.288458907225, 36.2712016990974, 1.8)
    pt3dadd(83.7749828692257, -257.207833473433, 36.6253766228622, 1.8)
    pt3dadd(83.6037796847211, -258.127208039642, 36.9795515466269, 1.8)
    pt3dadd(83.4325765002166, -259.046582605851, 37.3337264703916, 1.8)
    pt3dadd(83.261373315712, -259.96595717206, 37.6879013941564, 1.8)
    pt3dadd(83.1095277714098, -260.908320688216, 37.9708921375131, 1.8)
    pt3dadd(82.9862471864032, -261.884607679165, 38.1488404689538, 1.8)
    pt3dadd(82.8629666013966, -262.860894670115, 38.3267888003945, 1.8)
    pt3dadd(82.73968601639, -263.837181661065, 38.5047371318352, 1.8)
    pt3dadd(82.6050121937855, -264.804197087573, 38.6973097716483, 1.8)
    pt3dadd(82.2141749309973, -265.562752379466, 39.2186926474282, 1.8)
    pt3dadd(81.8233376682092, -266.32130767136, 39.7400755232082, 1.8)
    pt3dadd(81.432500405421, -267.079862963254, 40.2614583989882, 1.8)
    pt3dadd(81.0435517342514, -267.84619014076, 40.7711686213843, 1.8)
    pt3dadd(80.6702335958525, -268.676839700927, 41.1842725740867, 1.8)
    pt3dadd(80.2969154574536, -269.507489261093, 41.597376526789, 1.8)
    pt3dadd(79.9235973190547, -270.338138821259, 42.0104804794914, 1.8)
    pt3dadd(79.5502791806558, -271.168788381425, 42.4235844321937, 1.8)
    pt3dadd(79.4612093252845, -271.984818854739, 42.9589908216294, 1.8)
    pt3dadd(79.4891363972453, -272.794832094725, 43.5447370377498, 1.8)
    pt3dadd(79.5170634692061, -273.60484533471, 44.1304832538702, 1.8)
    pt3dadd(79.5449905411669, -274.414858574696, 44.7162294699906, 1.8)
    pt3dadd(79.568513367814, -275.224488392705, 45.2854176322579, 1.8)
    pt3dadd(79.2925692579629, -276.008047409285, 44.7287398836687, 1.8)
    pt3dadd(79.0166251481117, -276.791606425865, 44.1720621350794, 1.8)
    pt3dadd(78.7406810382606, -277.575165442445, 43.6153843864902, 1.8)
    pt3dadd(78.4647369284095, -278.358724459025, 43.0587066379009, 1.8)
    pt3dadd(78.1887928185584, -279.142283475605, 42.5020288893117, 1.8)
    pt3dadd(77.9762878984098, -279.939962661923, 41.9386471178012, 1.8)
    pt3dadd(77.7808812967101, -280.741447558242, 41.3734584581617, 1.8)
  }
  GCL[7] {pt3dclear()
    pt3dadd(-5.61127832929811, 4.99375247618424, 15.8815678568912, 2.25)
    pt3dadd(-6.12469660545896, 4.09296428130097, 15.9846369970366, 2.25)
    pt3dadd(-6.58368225279614, 3.20902940475999, 16.074031121972, 2.25)
    pt3dadd(-7.0426679001333, 2.325094528219, 16.1634252469074, 2.25)
    pt3dadd(-7.50165354747047, 1.44115965167804, 16.2528193718427, 2.25)
    pt3dadd(-7.96063919480764, 0.557224775137044, 16.3422134967781, 2.25)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(-7.96063919480764, 0.557224775137044, 16.3422134967781, 2.25)
    pt3dadd(-8.41962484214481, -0.326710101403933, 16.4316076217135, 2.25)
    pt3dadd(-8.87861048948198, -1.21064497794491, 16.5210017466488, 2.25)
    pt3dadd(-9.33759613681915, -2.09457985448589, 16.6103958715842, 2.25)
    pt3dadd(-9.71025147060423, -3.00358129587167, 16.7314339411647, 2.25)
    pt3dadd(-9.89096068980521, -3.96831553295762, 16.9228288990137, 2.25)
    pt3dadd(-10.0716699090062, -4.93304977004355, 17.1142238568626, 2.25)
    pt3dadd(-10.2523791282072, -5.8977840071295, 17.3056188147115, 2.25)
    pt3dadd(-10.4330883474082, -6.86251824421544, 17.4970137725604, 2.25)
    pt3dadd(-10.6137975666091, -7.82725248130137, 17.6884087304093, 2.25)
    pt3dadd(-10.7945067858101, -8.79198671838731, 17.8798036882582, 2.25)
    pt3dadd(-10.9682391533767, -9.74209337297434, 18.135724292669, 2.25)
    pt3dadd(-11.1394194689607, -10.6868494263342, 18.4152476355163, 2.25)
    pt3dadd(-11.3105997845447, -11.631605479694, 18.6947709783635, 2.25)
    pt3dadd(-11.4817801001287, -12.5763615330539, 18.9742943212108, 2.25)
    pt3dadd(-11.6529604157127, -13.5211175864137, 19.253817664058, 2.25)
    pt3dadd(-11.8241407312967, -14.4658736397735, 19.5333410069053, 2.25)
    pt3dadd(-12.0674259244631, -15.3996081205386, 19.7892724373377, 2.19542824851584)
    pt3dadd(-12.3530543505908, -16.3268702372747, 20.0313496338144, 2.10880950570902)
    pt3dadd(-12.6386827767184, -17.2541323540107, 20.273426830291, 2.0221907629022)
    pt3dadd(-12.9243112028461, -18.1813944707468, 20.5155040267676, 1.93557202009539)
    pt3dadd(-13.2099396289738, -19.1086565874828, 20.7575812232443, 1.84895327728857)
    pt3dadd(-13.4293850905723, -20.0619805076043, 20.9324032645512, 1.8)
    pt3dadd(-13.5628134813661, -21.0491765880777, 21.019814723915, 1.8)
    pt3dadd(-13.6962418721599, -22.0363726685511, 21.1072261832789, 1.8)
    pt3dadd(-13.8296702629537, -23.0235687490245, 21.1946376426427, 1.8)
    pt3dadd(-13.9630986537475, -24.0107648294979, 21.2820491020065, 1.8)
    pt3dadd(-14.0965270445413, -24.9979609099713, 21.3694605613703, 1.8)
    pt3dadd(-14.2299554353351, -25.9851569904448, 21.4568720207342, 1.8)
    pt3dadd(-14.3633838261289, -26.9723530709181, 21.544283480098, 1.8)
    pt3dadd(-14.4968122169227, -27.9595491513916, 21.6316949394618, 1.8)
    pt3dadd(-14.6302406077165, -28.946745231865, 21.7191063988256, 1.8)
    pt3dadd(-14.7492619242774, -29.865928802742, 22.0709166750745, 1.8)
    pt3dadd(-14.8649744677486, -30.7694924109614, 22.4834495988335, 1.8)
  }
}
proc shape3d_15() {
  adendIML[7] {
    pt3dadd(-14.9806870112198, -31.6730560191807, 22.8959825225924, 1.8)
    pt3dadd(-15.096399554691, -32.5766196274, 23.3085154463514, 1.8)
    pt3dadd(-15.2121120981621, -33.4801832356193, 23.7210483701103, 1.8)
    pt3dadd(-15.3278246416333, -34.3837468438387, 24.1335812938693, 1.8)
    pt3dadd(-15.4435371851045, -35.287310452058, 24.5461142176282, 1.8)
    pt3dadd(-15.5745726498781, -36.1916177030302, 24.9459852521741, 1.8)
    pt3dadd(-15.9054865138563, -37.1056253316321, 25.1806894691889, 1.8)
    pt3dadd(-16.2364003778346, -38.019632960234, 25.4153936862037, 1.8)
    pt3dadd(-16.5673142418128, -38.9336405888359, 25.6500979032185, 1.8)
    pt3dadd(-16.8982281057911, -39.8476482174378, 25.8848021202333, 1.8)
    pt3dadd(-17.2291419697693, -40.7616558460397, 26.1195063372481, 1.8)
    pt3dadd(-17.5600558337475, -41.6756634746416, 26.3542105542629, 1.8)
    pt3dadd(-17.8909696977258, -42.5896711032435, 26.5889147712776, 1.8)
    pt3dadd(-18.221883561704, -43.5036787318454, 26.8236189882924, 1.8)
    pt3dadd(-18.4961560928986, -44.4472685033553, 26.9854312011621, 1.8)
    pt3dadd(-18.7208209530949, -45.4167669380389, 27.0834030631373, 1.8)
    pt3dadd(-18.9454858132911, -46.3862653727226, 27.1813749251125, 1.8)
    pt3dadd(-19.1701506734874, -47.3557638074063, 27.2793467870876, 1.8)
    pt3dadd(-19.3948155336836, -48.32526224209, 27.3773186490628, 1.8)
    pt3dadd(-19.6194803938799, -49.2947606767737, 27.475290511038, 1.8)
    pt3dadd(-19.8441452540761, -50.2642591114574, 27.5732623730132, 1.8)
    pt3dadd(-20.0688101142723, -51.2337575461411, 27.6712342349884, 1.8)
    pt3dadd(-20.2934749744686, -52.2032559808248, 27.7692060969635, 1.8)
    pt3dadd(-20.5310838700243, -53.1455944597093, 27.979676640076, 1.8)
    pt3dadd(-20.7794235131802, -54.0654170366808, 28.2834098264927, 1.8)
    pt3dadd(-21.0277631563361, -54.9852396136522, 28.5871430129093, 1.8)
    pt3dadd(-21.276102799492, -55.9050621906237, 28.890876199326, 1.8)
    pt3dadd(-21.524442442648, -56.8248847675951, 29.1946093857427, 1.8)
    pt3dadd(-21.7727820858039, -57.7447073445665, 29.4983425721593, 1.8)
    pt3dadd(-22.0567555770812, -58.6526826320733, 29.8013088887874, 1.8)
    pt3dadd(-22.4203300748019, -59.5341927406915, 30.1025621261326, 1.8)
    pt3dadd(-22.7839045725226, -60.4157028493097, 30.4038153634778, 1.8)
    pt3dadd(-23.1474790702434, -61.297212957928, 30.7050686008231, 1.8)
    pt3dadd(-23.5110535679641, -62.1787230665462, 31.0063218381683, 1.8)
    pt3dadd(-23.8746280656849, -63.0602331751644, 31.3075750755135, 1.8)
    pt3dadd(-24.2382025634056, -63.9417432837826, 31.6088283128587, 1.8)
    pt3dadd(-24.5868066142828, -64.8348211949595, 31.8761133427037, 1.8)
    pt3dadd(-24.8418728372462, -65.8001766497785, 31.9311593939198, 1.8)
    pt3dadd(-25.0969390602096, -66.7655321045974, 31.9862054451359, 1.8)
    pt3dadd(-25.3520052831731, -67.7308875594164, 32.041251496352, 1.8)
    pt3dadd(-25.6070715061365, -68.6962430142353, 32.0962975475681, 1.8)
    pt3dadd(-25.8621377290999, -69.6615984690543, 32.1513435987842, 1.8)
    pt3dadd(-26.1172039520633, -70.6269539238732, 32.2063896500003, 1.8)
    pt3dadd(-26.3722701750267, -71.5923093786922, 32.2614357012164, 1.8)
    pt3dadd(-26.6273363979901, -72.5576648335111, 32.3164817524325, 1.8)
    pt3dadd(-26.8824026209536, -73.5230202883301, 32.3715278036486, 1.8)
    pt3dadd(-27.137468843917, -74.488375743149, 32.4265738548647, 1.8)
    pt3dadd(-27.3925350668804, -75.453731197968, 32.4816199060808, 1.8)
    pt3dadd(-27.6476012898438, -76.4190866527869, 32.5366659572969, 1.8)
    pt3dadd(-27.8151056866892, -77.4005605301555, 32.6103289961159, 1.8)
    pt3dadd(-27.9484778115436, -78.3883174923674, 32.6912490796163, 1.8)
    pt3dadd(-28.0818499363979, -79.3760744545793, 32.7721691631167, 1.8)
    pt3dadd(-28.2152220612523, -80.3638314167913, 32.8530892466171, 1.8)
    pt3dadd(-28.3485941861066, -81.3515883790032, 32.9340093301175, 1.8)
    pt3dadd(-28.481966310961, -82.3393453412151, 33.0149294136179, 1.8)
    pt3dadd(-28.6153384358154, -83.327102303427, 33.0958494971184, 1.8)
    pt3dadd(-28.7487105606697, -84.3148592656389, 33.1767695806188, 1.8)
    pt3dadd(-28.8820826855241, -85.3026162278508, 33.2576896641192, 1.8)
    pt3dadd(-29.0154548103784, -86.2903731900628, 33.3386097476196, 1.8)
    pt3dadd(-29.3415492104691, -87.2323620995548, 33.3476620537994, 1.8)
    pt3dadd(-29.6947166289154, -88.1679216571214, 33.3466186009282, 1.8)
    pt3dadd(-30.0478840473617, -89.1034812146879, 33.3455751480569, 1.8)
    pt3dadd(-30.4010514658079, -90.0390407722545, 33.3445316951856, 1.8)
    pt3dadd(-30.7542188842542, -90.974600329821, 33.3434882423144, 1.8)
    pt3dadd(-31.1073863027005, -91.9101598873876, 33.3424447894431, 1.8)
    pt3dadd(-31.4605537211467, -92.8457194449541, 33.3414013365718, 1.8)
    pt3dadd(-31.813721139593, -93.7812790025206, 33.3403578837005, 1.8)
    pt3dadd(-32.1668885580393, -94.7168385600872, 33.3393144308293, 1.8)
    pt3dadd(-32.511577427818, -95.6549316301841, 33.3396952966837, 1.8)
    pt3dadd(-32.7326941881615, -96.6299498274384, 33.3608351481082, 1.8)
    pt3dadd(-32.9538109485049, -97.6049680246927, 33.3819749995326, 1.8)
    pt3dadd(-33.1749277088484, -98.5799862219469, 33.403114850957, 1.8)
    pt3dadd(-33.3960444691919, -99.5550044192011, 33.4242547023815, 1.8)
    pt3dadd(-33.6171612295354, -100.530022616455, 33.4453945538059, 1.8)
    pt3dadd(-33.8382779898789, -101.50504081371, 33.4665344052303, 1.8)
    pt3dadd(-34.0593947502224, -102.480059010964, 33.4876742566548, 1.8)
    pt3dadd(-34.2805115105658, -103.455077208218, 33.5088141080792, 1.8)
    pt3dadd(-34.5795491561983, -104.389224429904, 33.6986547510955, 1.8)
    pt3dadd(-34.882689221529, -105.321219855, 33.8973772420011, 1.8)
    pt3dadd(-35.1858292868597, -106.253215280096, 34.0960997329067, 1.8)
    pt3dadd(-35.4889693521903, -107.185210705192, 34.2948222238123, 1.8)
    pt3dadd(-35.792109417521, -108.117206130288, 34.4935447147179, 1.8)
    pt3dadd(-36.0952494828517, -109.049201555383, 34.6922672056235, 1.8)
    pt3dadd(-36.412677956258, -109.980583404214, 34.7208694935858, 1.8)
    pt3dadd(-36.7452789985656, -110.911313708931, 34.5688246102897, 1.8)
    pt3dadd(-37.0778800408732, -111.842044013649, 34.4167797269935, 1.8)
    pt3dadd(-37.4104810831808, -112.772774318366, 34.2647348436974, 1.8)
    pt3dadd(-37.7430821254883, -113.703504623083, 34.1126899604013, 1.8)
    pt3dadd(-38.0756831677959, -114.634234927801, 33.9606450771052, 1.8)
    pt3dadd(-38.4082842101035, -115.564965232518, 33.8086001938091, 1.8)
    pt3dadd(-38.7408852524111, -116.495695537236, 33.656555310513, 1.8)
  }
  adendMML[13] {pt3dclear()
    pt3dadd(-38.7408852524111, -116.495695537236, 33.656555310513, 1.8)
    pt3dadd(-39.0692685896312, -117.427764773875, 33.5035543674486, 1.8)
    pt3dadd(-39.3972334930787, -118.359966844443, 33.3504585747713, 1.8)
    pt3dadd(-39.7251983965263, -119.292168915011, 33.1973627820939, 1.8)
    pt3dadd(-40.0531632999739, -120.224370985579, 33.0442669894165, 1.8)
    pt3dadd(-40.3811282034214, -121.156573056147, 32.8911711967391, 1.8)
    pt3dadd(-40.709093106869, -122.088775126715, 32.7380754040617, 1.8)
    pt3dadd(-41.0370580103166, -123.020977197283, 32.5849796113843, 1.8)
    pt3dadd(-41.4174356517823, -123.930818325048, 32.4450204693185, 1.8)
    pt3dadd(-41.9191005792597, -124.788914434948, 32.3354605920155, 1.8)
    pt3dadd(-42.4207655067371, -125.647010544847, 32.2259007147126, 1.8)
    pt3dadd(-42.9224304342145, -126.505106654746, 32.1163408374096, 1.8)
    pt3dadd(-43.4240953616919, -127.363202764646, 32.0067809601066, 1.8)
    pt3dadd(-43.9257602891693, -128.221298874545, 31.8972210828036, 1.8)
    pt3dadd(-44.1271262189118, -129.189060640025, 31.9956969985147, 1.8)
    pt3dadd(-44.3012634140061, -130.166766018566, 32.1130359522247, 1.8)
    pt3dadd(-44.4754006091004, -131.144471397106, 32.2303749059348, 1.8)
    pt3dadd(-44.6495378041947, -132.122176775647, 32.3477138596448, 1.8)
    pt3dadd(-44.8236749992889, -133.099882154187, 32.4650528133549, 1.8)
    pt3dadd(-44.9978121943832, -134.077587532728, 32.5823917670649, 1.8)
    pt3dadd(-45.1719493894775, -135.055292911268, 32.6997307207749, 1.8)
    pt3dadd(-45.3593390995105, -136.032257953307, 32.7923871717409, 1.8)
    pt3dadd(-45.5777623359418, -137.007489343094, 32.8272443971242, 1.8)
    pt3dadd(-45.796185572373, -137.98272073288, 32.8621016225074, 1.8)
    pt3dadd(-46.0146088088043, -138.957952122667, 32.8969588478907, 1.8)
    pt3dadd(-46.2330320452356, -139.933183512454, 32.931816073274, 1.8)
    pt3dadd(-46.4514552816669, -140.908414902241, 32.9666732986572, 1.8)
    pt3dadd(-46.6698785180982, -141.883646292028, 33.0015305240405, 1.8)
    pt3dadd(-46.8883017545294, -142.858877681814, 33.0363877494237, 1.8)
    pt3dadd(-47.1067249909607, -143.834109071601, 33.071244974807, 1.8)
    pt3dadd(-47.2803583660409, -144.814227392524, 33.1568066832109, 1.8)
    pt3dadd(-47.4355078747331, -145.796362450704, 33.2632931022783, 1.8)
    pt3dadd(-47.5906573834252, -146.778497508884, 33.3697795213456, 1.8)
    pt3dadd(-47.7458068921174, -147.760632567065, 33.4762659404131, 1.8)
    pt3dadd(-47.9009564008095, -148.742767625245, 33.5827523594805, 1.8)
    pt3dadd(-48.0561059095016, -149.724902683425, 33.6892387785479, 1.8)
    pt3dadd(-48.2197580782048, -150.705772689261, 33.7895935921901, 1.8)
    pt3dadd(-48.4627925916432, -151.67483194162, 33.8327026480334, 1.8)
    pt3dadd(-48.7058271050815, -152.643891193979, 33.8758117038766, 1.8)
    pt3dadd(-48.9488616185199, -153.612950446337, 33.9189207597199, 1.8)
    pt3dadd(-49.1918961319583, -154.582009698696, 33.9620298155632, 1.8)
    pt3dadd(-49.4349306453966, -155.551068951055, 34.0051388714064, 1.8)
    pt3dadd(-49.677965158835, -156.520128203414, 34.0482479272497, 1.8)
    pt3dadd(-49.903184181714, -157.492077103647, 34.1014701133835, 1.8)
    pt3dadd(-50.0551825626848, -158.475902290505, 34.1962566835631, 1.8)
    pt3dadd(-50.2071809436557, -159.459727477362, 34.2910432537428, 1.8)
    pt3dadd(-50.3591793246265, -160.44355266422, 34.3858298239225, 1.8)
    pt3dadd(-50.5111777055973, -161.427377851078, 34.4806163941022, 1.8)
    pt3dadd(-50.6631760865682, -162.411203037936, 34.5754029642818, 1.8)
    pt3dadd(-50.815174467539, -163.395028224794, 34.6701895344615, 1.8)
    pt3dadd(-50.9709538877155, -164.378182104727, 34.765219879772, 1.8)
    pt3dadd(-51.1549395587444, -165.356328088557, 34.8620687681122, 1.8)
    pt3dadd(-51.3389252297733, -166.334474072388, 34.9589176564524, 1.8)
    pt3dadd(-51.5229109008022, -167.312620056218, 35.0557665447926, 1.8)
    pt3dadd(-51.7068965718311, -168.290766040048, 35.1526154331328, 1.8)
    pt3dadd(-51.8823145215366, -169.269261413234, 35.2079750083919, 1.8)
    pt3dadd(-52.0161530386268, -170.249452384422, 35.0619855863621, 1.8)
    pt3dadd(-52.1499915557171, -171.22964335561, 34.9159961643322, 1.8)
    pt3dadd(-52.2838300728073, -172.209834326798, 34.7700067423023, 1.8)
    pt3dadd(-52.4176685898976, -173.190025297986, 34.6240173202724, 1.8)
    pt3dadd(-52.5512406809208, -174.170255469242, 34.4781045336252, 1.8)
    pt3dadd(-52.6278296672261, -175.158869735881, 34.348582493127, 1.8)
    pt3dadd(-52.7044186535314, -176.147484002519, 34.2190604526288, 1.8)
    pt3dadd(-52.7810076398366, -177.136098269158, 34.0895384121307, 1.8)
    pt3dadd(-52.8575966261419, -178.124712535797, 33.9600163716325, 1.8)
    pt3dadd(-52.9341856124471, -179.113326802436, 33.8304943311343, 1.8)
    pt3dadd(-53.0107745987524, -180.101941069075, 33.7009722906361, 1.8)
    pt3dadd(-53.0875461366852, -181.090526659282, 33.5715160067272, 1.8)
    pt3dadd(-53.3813236545599, -182.045023496925, 33.520227051586, 1.8)
    pt3dadd(-53.6751011724346, -182.999520334569, 33.4689380964449, 1.8)
    pt3dadd(-53.9688786903093, -183.954017172213, 33.4176491413037, 1.8)
    pt3dadd(-54.2626562081839, -184.908514009857, 33.3663601861626, 1.8)
    pt3dadd(-54.5564337260586, -185.8630108475, 33.3150712310214, 1.8)
    pt3dadd(-54.8711359827976, -186.805631349862, 33.2186364190175, 1.8)
    pt3dadd(-55.210859628264, -187.734050365473, 33.0682170846106, 1.8)
    pt3dadd(-55.5505832737303, -188.662469381084, 32.9177977502037, 1.8)
    pt3dadd(-55.8903069191967, -189.590888396694, 32.7673784157967, 1.8)
    pt3dadd(-56.2300305646631, -190.519307412305, 32.6169590813899, 1.8)
    pt3dadd(-56.5697542101294, -191.447726427916, 32.4665397469829, 1.8)
    pt3dadd(-56.8716173340626, -192.392832851708, 32.3621028035521, 1.8)
    pt3dadd(-57.1265249664981, -193.358635383774, 32.3146942813125, 1.8)
    pt3dadd(-57.3814325989336, -194.32443791584, 32.2672857590728, 1.8)
    pt3dadd(-57.6363402313692, -195.290240447906, 32.2198772368332, 1.8)
    pt3dadd(-57.8912478638047, -196.256042979972, 32.1724687145936, 1.8)
    pt3dadd(-58.1461554962403, -197.221845512038, 32.1250601923539, 1.8)
    pt3dadd(-58.4010631286758, -198.187648044104, 32.0776516701143, 1.8)
    pt3dadd(-58.6559707611114, -199.15345057617, 32.0302431478746, 1.8)
    pt3dadd(-58.9108783935469, -200.119253108236, 31.982834625635, 1.8)
    pt3dadd(-59.1657860259825, -201.085055640302, 31.9354261033954, 1.8)
    pt3dadd(-59.420693658418, -202.050858172368, 31.8880175811557, 1.8)
    pt3dadd(-59.6107108320616, -203.016019970138, 31.7101896021889, 1.8)
    pt3dadd(-59.7984853604581, -203.981159623825, 31.5278542645102, 1.8)
    pt3dadd(-59.9862598888546, -204.946299277512, 31.3455189268315, 1.8)
    pt3dadd(-60.1740344172511, -205.911438931199, 31.1631835891528, 1.8)
    pt3dadd(-60.3618089456476, -206.876578584886, 30.9808482514741, 1.8)
    pt3dadd(-60.5495834740441, -207.841718238573, 30.7985129137954, 1.8)
    pt3dadd(-60.7373580024406, -208.80685789226, 30.6161775761167, 1.8)
    pt3dadd(-60.9251325308371, -209.771997545947, 30.433842238438, 1.8)
    pt3dadd(-61.1477524835352, -210.730555243393, 30.2584223876672, 1.8)
    pt3dadd(-61.3926721590641, -211.684900743604, 30.0874281808477, 1.8)
    pt3dadd(-61.637591834593, -212.639246243815, 29.9164339740281, 1.8)
    pt3dadd(-61.8825115101219, -213.593591744026, 29.7454397672085, 1.8)
    pt3dadd(-62.1274311856508, -214.547937244237, 29.5744455603889, 1.8)
    pt3dadd(-62.3723508611797, -215.502282744448, 29.4034513535693, 1.8)
    pt3dadd(-62.6172705367087, -216.456628244659, 29.2324571467497, 1.8)
    pt3dadd(-62.8621902122376, -217.41097374487, 29.0614629399301, 1.8)
    pt3dadd(-63.1071098877665, -218.365319245081, 28.8904687331105, 1.8)
    pt3dadd(-63.3520295632954, -219.319664745292, 28.7194745262909, 1.8)
    pt3dadd(-63.5065000043996, -220.26217361219, 28.4367372998844, 1.8)
    pt3dadd(-63.6267359515841, -221.200202384218, 28.1117060093108, 1.8)
    pt3dadd(-63.7469718987686, -222.138231156246, 27.7866747187372, 1.8)
    pt3dadd(-63.867207845953, -223.076259928275, 27.4616434281636, 1.8)
    pt3dadd(-63.9874437931375, -224.014288700303, 27.13661213759, 1.8)
    pt3dadd(-64.107679740322, -224.952317472331, 26.8115808470165, 1.8)
    pt3dadd(-64.2279156875065, -225.890346244359, 26.4865495564429, 1.8)
    pt3dadd(-64.348151634691, -226.828375016387, 26.1615182658693, 1.8)
    pt3dadd(-64.3575927214069, -227.811916451963, 26.1445002757185, 1.8)
    pt3dadd(-64.3343007688959, -228.808904069022, 26.2184811947455, 1.8)
    pt3dadd(-64.3110088163849, -229.80589168608, 26.2924621137724, 1.8)
    pt3dadd(-64.2877168638739, -230.802879303139, 26.3664430327993, 1.8)
    pt3dadd(-64.2644249113629, -231.799866920197, 26.4404239518263, 1.8)
    pt3dadd(-64.3723516287877, -232.786103269965, 26.4757641130063, 1.8)
    pt3dadd(-64.5809260037561, -233.764093157022, 26.4814659478344, 1.8)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(-64.5809260037561, -233.764093157022, 26.4814659478344, 1.8)
    pt3dadd(-64.7895003787244, -234.742083044079, 26.4871677826627, 1.8)
    pt3dadd(-64.9980747536928, -235.720072931136, 26.4928696174909, 1.8)
    pt3dadd(-65.2066491286612, -236.698062818193, 26.4985714523191, 1.8)
    pt3dadd(-65.4152235036296, -237.676052705251, 26.5042732871473, 1.8)
    pt3dadd(-65.623797878598, -238.654042592308, 26.5099751219755, 1.8)
    pt3dadd(-65.8219797447477, -239.633715567228, 26.5175750674747, 1.8)
    pt3dadd(-65.9377905196406, -240.626728707295, 26.5402194502731, 1.8)
    pt3dadd(-66.0536012945336, -241.619741847363, 26.5628638330714, 1.8)
    pt3dadd(-66.1694120694265, -242.61275498743, 26.5855082158698, 1.8)
    pt3dadd(-66.2852228443194, -243.605768127497, 26.6081525986681, 1.8)
    pt3dadd(-66.4010336192123, -244.598781267565, 26.6307969814664, 1.8)
    pt3dadd(-66.5168443941052, -245.591794407632, 26.6534413642648, 1.8)
    pt3dadd(-66.6326551689982, -246.584807547699, 26.6760857470631, 1.8)
    pt3dadd(-66.7484659438911, -247.577820687767, 26.6987301298615, 1.8)
    pt3dadd(-66.864276718784, -248.570833827834, 26.7213745126598, 1.8)
    pt3dadd(-66.9800874936769, -249.563846967901, 26.7440188954582, 1.8)
    pt3dadd(-67.237664774279, -250.502044188564, 26.5702714554769, 1.8)
    pt3dadd(-67.5486910135588, -251.419574653024, 26.3224801617104, 1.8)
    pt3dadd(-67.8597172528386, -252.337105117485, 26.0746888679439, 1.8)
    pt3dadd(-68.1707434921183, -253.254635581945, 25.8268975741774, 1.8)
    pt3dadd(-68.4817697313981, -254.172166046406, 25.5791062804109, 1.8)
    pt3dadd(-68.7927959706778, -255.089696510866, 25.3313149866444, 1.8)
    pt3dadd(-69.0712923177768, -256.03186080061, 25.1505782262497, 1.8)
    pt3dadd(-69.3386988976124, -256.982423009033, 24.9927010303725, 1.8)
    pt3dadd(-69.6061054774479, -257.932985217456, 24.8348238344953, 1.8)
    pt3dadd(-69.8735120572835, -258.88354742588, 24.6769466386181, 1.8)
    pt3dadd(-70.140918637119, -259.834109634303, 24.5190694427409, 1.8)
    pt3dadd(-70.4083252169546, -260.784671842726, 24.3611922468637, 1.8)
    pt3dadd(-70.6400619085359, -261.69222363766, 24.0216189101661, 1.8)
    pt3dadd(-70.8645553994259, -262.591041649788, 23.645149982335, 1.8)
    pt3dadd(-71.0890488903159, -263.489859661916, 23.2686810545039, 1.8)
    pt3dadd(-71.3135423812059, -264.388677674044, 22.8922121266729, 1.8)
    pt3dadd(-71.5380358720959, -265.287495686172, 22.5157431988418, 1.8)
    pt3dadd(-71.7625293629859, -266.1863136983, 22.1392742710107, 1.8)
  }
}
proc shape3d_16() {
  adendOML[9] {
    pt3dadd(-71.9870228538759, -267.085131710428, 21.7628053431797, 1.8)
    pt3dadd(-72.1354744825582, -268.028028899124, 21.5536988946479, 1.8)
    pt3dadd(-72.1877841338192, -269.026656695612, 21.5561937830481, 1.8)
    pt3dadd(-72.2400937850803, -270.025284492099, 21.5586886714484, 1.8)
    pt3dadd(-72.2924034363413, -271.023912288586, 21.5611835598486, 1.8)
    pt3dadd(-72.3447130876024, -272.022540085073, 21.5636784482488, 1.8)
    pt3dadd(-72.3970227388634, -273.02116788156, 21.566173336649, 1.8)
    pt3dadd(-72.4493323901245, -274.019795678047, 21.5686682250492, 1.8)
    pt3dadd(-72.69316820158, -274.989251428965, 21.5534939418307, 1.8)
    pt3dadd(-72.9393794499059, -275.95834536846, 21.5381005136051, 1.8)
    pt3dadd(-73.1855906982317, -276.927439307955, 21.5227070853795, 1.8)
    pt3dadd(-73.4318019465575, -277.896533247449, 21.507313657154, 1.8)
    pt3dadd(-73.6780131948833, -278.865627186944, 21.4919202289284, 1.8)
    pt3dadd(-73.9135099763195, -279.82746540848, 21.3759020302016, 1.8)
    pt3dadd(-74.1428147882973, -280.785110497081, 21.2017320342705, 1.8)
    pt3dadd(-74.372119600275, -281.742755585682, 21.0275620383394, 1.8)
    pt3dadd(-74.6014244122527, -282.700400674283, 20.8533920424084, 1.8)
    pt3dadd(-74.8307292242305, -283.658045762883, 20.6792220464773, 1.8)
    pt3dadd(-75.1677030503557, -284.583591831042, 20.5290014922158, 1.8)
    pt3dadd(-75.5638034922063, -285.491510669474, 20.3919328131306, 1.8)
    pt3dadd(-75.9599039340569, -286.399429507906, 20.2548641340455, 1.8)
    pt3dadd(-76.4849390182938, -287.241682235123, 20.1524506375282, 1.8)
    pt3dadd(-77.0136132681776, -288.077148547212, 20.0520979139583, 1.8)
    pt3dadd(-77.0506408692047, -289.054433640777, 19.8434287915223, 1.8)
    pt3dadd(-77.0876684702317, -290.031718734341, 19.6347596690863, 1.8)
    pt3dadd(-77.1246960712588, -291.009003827906, 19.4260905466503, 1.8)
    pt3dadd(-77.1617236722859, -291.986288921471, 19.2174214242143, 1.8)
    pt3dadd(-77.198751273313, -292.963574015036, 19.0087523017783, 1.8)
    pt3dadd(-77.2580206877471, -293.940792321737, 18.8526523732026, 1.8)
    pt3dadd(-77.4344600557176, -294.917658795003, 18.9734871481663, 1.8)
    pt3dadd(-77.610899423688, -295.894525268268, 19.09432192313, 1.8)
    pt3dadd(-77.7873387916585, -296.871391741533, 19.2151566980937, 1.8)
    pt3dadd(-77.963778159629, -297.848258214798, 19.3359914730574, 1.8)
    pt3dadd(-78.2056336113968, -298.788583792339, 19.2326199152071, 1.8)
    pt3dadd(-78.5020480246236, -299.698433174948, 18.942253600704, 1.8)
    pt3dadd(-78.7984624378505, -300.608282557556, 18.651887286201, 1.8)
    pt3dadd(-79.0948768510773, -301.518131940165, 18.3615209716979, 1.8)
    pt3dadd(-79.3912912643041, -302.427981322774, 18.0711546571948, 1.8)
    pt3dadd(-79.6877056775309, -303.337830705382, 17.7807883426918, 1.8)
  }
  GCL[8] {pt3dclear()
    pt3dadd(0.704675104946064, 42.3300744502791, 5.04565984233394, 2.25)
    pt3dadd(1.09934510075954, 41.4523175507922, 4.81894967575019, 2.25)
    pt3dadd(1.50050435601667, 40.5728113477924, 4.56294168601861, 2.25)
    pt3dadd(1.90166361127381, 39.6933051447926, 4.30693369628704, 2.25)
    pt3dadd(2.30282286653095, 38.8137989417928, 4.05092570655547, 2.25)
    pt3dadd(2.70398212178809, 37.934292738793, 3.7949177168239, 2.25)
    pt3dadd(3.10514137704523, 37.0547865357932, 3.53890972709233, 2.25)
    pt3dadd(3.50630063230236, 36.1752803327933, 3.28290173736076, 2.25)
    pt3dadd(3.88493398840301, 35.2760707944724, 3.08983208162605, 2.25)
    pt3dadd(4.21355594659436, 34.3331164388616, 3.03649642911129, 2.25)
    pt3dadd(4.54217790478572, 33.3901620832508, 2.98316077659654, 2.25)
    pt3dadd(4.87079986297707, 32.4472077276401, 2.92982512408178, 2.25)
    pt3dadd(5.19942182116842, 31.5042533720293, 2.87648947156703, 2.25)
    pt3dadd(5.52804377935978, 30.5612990164185, 2.82315381905227, 2.25)
    pt3dadd(5.85666573755113, 29.6183446608078, 2.76981816653752, 2.25)
    pt3dadd(6.18528769574249, 28.675390305197, 2.71648251402276, 2.25)
    pt3dadd(6.51390965393384, 27.7324359495863, 2.66314686150801, 2.25)
    pt3dadd(6.8425316121252, 26.7894815939755, 2.60981120899326, 2.25)
    pt3dadd(7.17115357031655, 25.8465272383647, 2.5564755564785, 2.25)
    pt3dadd(7.49977552850791, 24.903572882754, 2.50313990396375, 2.25)
    pt3dadd(7.82839748669926, 23.9606185271432, 2.44980425144899, 2.25)
    pt3dadd(8.11690293194072, 23.0046968137623, 2.40579742372714, 2.25)
    pt3dadd(8.38299568756275, 22.0415303688851, 2.36700251596599, 2.25)
    pt3dadd(8.64908844318478, 21.078363924008, 2.32820760820484, 2.25)
    pt3dadd(8.9151811988068, 20.1151974791308, 2.28941270044369, 2.25)
    pt3dadd(9.18127395442883, 19.1520310342537, 2.25061779268253, 2.25)
    pt3dadd(9.44736671005086, 18.1888645893766, 2.21182288492138, 2.25)
    pt3dadd(9.71345946567289, 17.2256981444994, 2.17302797716023, 2.25)
    pt3dadd(9.97955222129492, 16.2625316996223, 2.13423306939908, 2.25)
    pt3dadd(10.1367582089722, 15.291052249732, 2.20540386377691, 2.25)
    pt3dadd(10.1740573011555, 14.3104184586654, 2.39766968377811, 2.25)
    pt3dadd(10.2113563933388, 13.3297846675989, 2.5899355037793, 2.25)
    pt3dadd(10.248655485522, 12.3491508765323, 2.7822013237805, 2.25)
    pt3dadd(10.2859545777053, 11.3685170854658, 2.9744671437817, 2.25)
    pt3dadd(10.3232536698886, 10.3878832943992, 3.16673296378289, 2.25)
    pt3dadd(10.3697286224922, 9.40853982317653, 3.36224439835372, 2.25)
    pt3dadd(10.463962528352, 8.43591226983908, 3.57464876148026, 2.25)
    pt3dadd(10.5581964342117, 7.46328471650161, 3.78705312460681, 2.25)
    pt3dadd(10.6524303400715, 6.49065716316413, 3.99945748773335, 2.25)
    pt3dadd(10.7466642459312, 5.51802960982666, 4.2118618508599, 2.25)
    pt3dadd(10.840898151791, 4.54540205648921, 4.42426621398644, 2.25)
    pt3dadd(10.9351320576508, 3.57277450315175, 4.63667057711298, 2.25)
    pt3dadd(11.0293659635105, 2.60014694981428, 4.84907494023953, 2.25)
  }
  GCL[9] {pt3dclear()
    pt3dadd(11.0293659635105, 2.60014694981428, 4.84907494023953, 2.19397758894922)
    pt3dadd(10.8785979639067, 1.63865740018669, 4.70669988832108, 2.19397758894922)
    pt3dadd(10.6849770516117, 0.679115981940471, 4.50227090556154, 2.12815638272185)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(10.6849770516117, 0.679115981940471, 4.50227090556154, 2.06233517649449)
    pt3dadd(10.4913561393167, -0.280425436305733, 4.297841922802, 2.06233517649449)
    pt3dadd(10.2977352270216, -1.23996685455194, 4.09341294004246, 1.99651397026712)
    pt3dadd(10.1041143147266, -2.19950827279813, 3.88898395728292, 1.93069276403975)
    pt3dadd(9.91049340243153, -3.15904969104433, 3.68455497452338, 1.86487155781238)
    pt3dadd(9.72007320162398, -4.11881421767778, 3.48625502992415, 1.8)
    pt3dadd(9.74829722432638, -5.0938195307037, 3.70663661743483, 1.8)
    pt3dadd(9.77652124702879, -6.0688248437296, 3.92701820494551, 1.8)
    pt3dadd(9.8047452697312, -7.04383015675552, 4.14739979245619, 1.8)
    pt3dadd(9.8329692924336, -8.01883546978145, 4.36778137996687, 1.8)
    pt3dadd(9.86119331513601, -8.99384078280737, 4.58816296747755, 1.8)
    pt3dadd(9.88941733783842, -9.96884609583327, 4.80854455498823, 1.8)
    pt3dadd(9.91764136054083, -10.9438514088592, 5.02892614249891, 1.8)
    pt3dadd(9.94586538324324, -11.9188567218851, 5.24930773000959, 1.8)
    pt3dadd(9.97408940594564, -12.893862034911, 5.46968931752026, 1.8)
    pt3dadd(10.0027433239871, -13.8654576991291, 5.69860700235129, 1.8)
    pt3dadd(10.0454986028259, -14.7252105875276, 6.20752443870205, 1.8)
    pt3dadd(10.0882538816648, -15.5849634759261, 6.71644187505282, 1.8)
    pt3dadd(10.1310091605036, -16.4447163643246, 7.22535931140359, 1.8)
    pt3dadd(10.1737644393424, -17.3044692527231, 7.73427674775435, 1.8)
    pt3dadd(10.2165197181812, -18.1642221411216, 8.24319418410512, 1.8)
    pt3dadd(10.2592749970201, -19.0239750295201, 8.75211162045589, 1.8)
    pt3dadd(10.3020302758589, -19.8837279179186, 9.26102905680666, 1.8)
    pt3dadd(10.3483767514847, -20.74573375564, 9.76410616505003, 1.8)
    pt3dadd(10.5127266172533, -21.6817694150873, 10.0752755174371, 1.8)
    pt3dadd(10.6770764830219, -22.6178050745345, 10.3864448698242, 1.8)
    pt3dadd(10.8414263487905, -23.5538407339817, 10.6976142222113, 1.8)
    pt3dadd(11.0057762145591, -24.489876393429, 11.0087835745984, 1.8)
    pt3dadd(11.1701260803277, -25.4259120528763, 11.3199529269855, 1.8)
    pt3dadd(11.3344759460963, -26.3619477123235, 11.6311222793726, 1.8)
    pt3dadd(11.4988258118649, -27.2979833717707, 11.9422916317597, 1.8)
    pt3dadd(11.6631756776335, -28.234019031218, 12.2534609841468, 1.8)
    pt3dadd(11.8092870924105, -29.1932632462926, 12.4638143346418, 1.8)
    pt3dadd(11.9318409540909, -30.1824846113863, 12.5439494819209, 1.8)
    pt3dadd(12.0543948157713, -31.17170597648, 12.6240846292, 1.8)
    pt3dadd(12.1769486774517, -32.1609273415737, 12.7042197764791, 1.8)
    pt3dadd(12.2995025391321, -33.1501487066673, 12.7843549237582, 1.8)
    pt3dadd(12.4220564008125, -34.139370071761, 12.8644900710373, 1.8)
    pt3dadd(12.5446102624929, -35.1285914368546, 12.9446252183164, 1.8)
    pt3dadd(12.6671641241733, -36.1178128019483, 13.0247603655955, 1.8)
    pt3dadd(12.7897179858537, -37.107034167042, 13.1048955128746, 1.8)
    pt3dadd(12.9102928512432, -38.0961229246759, 13.1819703377405, 1.8)
    pt3dadd(12.8486451598175, -39.073001416691, 12.9772559660416, 1.8)
    pt3dadd(12.7869974683918, -40.0498799087062, 12.7725415943427, 1.8)
    pt3dadd(12.7253497769661, -41.0267584007213, 12.5678272226438, 1.8)
    pt3dadd(12.6637020855404, -42.0036368927365, 12.3631128509449, 1.8)
    pt3dadd(12.6020543941147, -42.9805153847517, 12.1583984792459, 1.8)
    pt3dadd(12.540406702689, -43.9573938767668, 11.953684107547, 1.8)
    pt3dadd(12.4787590112633, -44.934272368782, 11.7489697358481, 1.8)
    pt3dadd(12.4171113198376, -45.9111508607971, 11.5442553641492, 1.8)
    pt3dadd(12.2931523217412, -46.9001956136726, 11.5502395025003, 1.8)
    pt3dadd(12.1609723626446, -47.8908455063115, 11.5840218740527, 1.8)
    pt3dadd(12.028792403548, -48.8814953989504, 11.617804245605, 1.8)
    pt3dadd(11.8966124444514, -49.8721452915894, 11.6515866171574, 1.8)
    pt3dadd(11.7644324853548, -50.8627951842283, 11.6853689887098, 1.8)
    pt3dadd(11.6322525262582, -51.8534450768672, 11.7191513602621, 1.8)
    pt3dadd(11.498799235755, -52.8387126038591, 11.7184164551805, 1.8)
    pt3dadd(11.3534282460432, -53.7736040744022, 11.3946183488614, 1.8)
    pt3dadd(11.2080572563314, -54.7084955449454, 11.0708202425422, 1.8)
    pt3dadd(11.0626862666196, -55.6433870154885, 10.7470221362231, 1.8)
    pt3dadd(10.9173152769077, -56.5782784860317, 10.4232240299039, 1.8)
    pt3dadd(10.7719442871959, -57.5131699565748, 10.0994259235848, 1.8)
    pt3dadd(10.6265732974841, -58.448061427118, 9.77562781726562, 1.8)
    pt3dadd(10.4812023077723, -59.3829528976612, 9.45182971094648, 1.8)
    pt3dadd(10.3358313180604, -60.3178443682043, 9.12803160462733, 1.8)
    pt3dadd(10.3380395018984, -61.2698509574192, 9.01999228714221, 1.8)
    pt3dadd(10.5166046523486, -62.2423100965402, 9.16978450918545, 1.8)
    pt3dadd(10.6951698027987, -63.2147692356613, 9.3195767312287, 1.8)
    pt3dadd(10.8737349532489, -64.1872283747823, 9.46936895327194, 1.8)
    pt3dadd(11.052300103699, -65.1596875139034, 9.61916117531518, 1.8)
    pt3dadd(11.2308652541492, -66.1321466530244, 9.76895339735842, 1.8)
    pt3dadd(11.2177997729498, -67.109060140741, 9.58685540358993, 1.8)
    pt3dadd(11.1886756492953, -68.0863469027657, 9.37694501749039, 1.8)
    pt3dadd(11.1595515256407, -69.0636336647905, 9.16703463139084, 1.8)
    pt3dadd(11.1304274019861, -70.0409204268153, 8.9571242452913, 1.8)
    pt3dadd(11.1013032783316, -71.0182071888401, 8.74721385919176, 1.8)
    pt3dadd(11.072179154677, -71.9954939508649, 8.53730347309221, 1.8)
    pt3dadd(11.0430550310225, -72.9727807128897, 8.32739308699267, 1.8)
    pt3dadd(11.0891836331377, -73.9363109351531, 8.15477283154464, 1.8)
  }
  adendIML[9] {pt3dclear()
    pt3dadd(11.0891836331377, -73.9363109351531, 8.15477283154464, 1.8)
    pt3dadd(11.5468866153158, -74.8152253791435, 7.84393079943031, 1.8)
    pt3dadd(11.8983669965241, -75.7165856517219, 7.5909264503709, 1.8)
    pt3dadd(12.2498473777325, -76.6179459243004, 7.33792210131149, 1.8)
    pt3dadd(12.6013277589409, -77.5193061968788, 7.08491775225208, 1.8)
    pt3dadd(12.9528081401493, -78.4206664694572, 6.83191340319267, 1.8)
    pt3dadd(13.3042885213577, -79.3220267420356, 6.57890905413326, 1.8)
    pt3dadd(13.655768902566, -80.223387014614, 6.32590470507385, 1.8)
    pt3dadd(14.0079581232885, -81.125834225834, 6.0832741605981, 1.8)
    pt3dadd(14.3775421862872, -82.0549547895704, 6.09521561862124, 1.8)
    pt3dadd(14.7471262492859, -82.9840753533066, 6.1071570766444, 1.8)
    pt3dadd(15.1167103122846, -83.9131959170429, 6.11909853466755, 1.8)
    pt3dadd(15.4862943752834, -84.8423164807792, 6.1310399926907, 1.8)
    pt3dadd(15.8558784382821, -85.7714370445155, 6.14298145071386, 1.8)
    pt3dadd(16.2254625012808, -86.7005576082518, 6.15492290873701, 1.8)
    pt3dadd(16.5950465642795, -87.6296781719881, 6.16686436676017, 1.8)
    pt3dadd(16.886834844064, -88.5812888336995, 6.07733788838446, 1.8)
    pt3dadd(17.172706607924, -89.5346099097459, 5.98009458222297, 1.8)
    pt3dadd(17.4585783717841, -90.4879309857924, 5.88285127606149, 1.8)
    pt3dadd(17.7444501356441, -91.4412520618389, 5.7856079699, 1.8)
    pt3dadd(18.0303218995041, -92.3945731378853, 5.68836466373851, 1.8)
    pt3dadd(18.3161936633641, -93.3478942139317, 5.59112135757703, 1.8)
    pt3dadd(18.6020654272241, -94.3012152899782, 5.49387805141554, 1.8)
    pt3dadd(18.8879371910841, -95.2545363660246, 5.39663474525405, 1.8)
    pt3dadd(19.1738089549442, -96.2078574420711, 5.29939143909257, 1.8)
    pt3dadd(19.4596807188042, -97.1611785181175, 5.20214813293108, 1.8)
    pt3dadd(19.7455524826642, -98.1144995941639, 5.10490482676959, 1.8)
    pt3dadd(20.0206695265466, -99.0713827450365, 5.01476416656635, 1.8)
    pt3dadd(20.2621083422705, -100.039420474453, 4.94686532498858, 1.8)
    pt3dadd(20.5035471579943, -101.00745820387, 4.87896648341082, 1.8)
    pt3dadd(20.7449859737182, -101.975495933287, 4.81106764183305, 1.8)
    pt3dadd(20.9864247894421, -102.943533662703, 4.74316880025528, 1.8)
    pt3dadd(21.227863605166, -103.91157139212, 4.67526995867752, 1.8)
    pt3dadd(21.4693024208898, -104.879609121537, 4.60737111709975, 1.8)
    pt3dadd(21.7107412366137, -105.847646850953, 4.53947227552198, 1.8)
    pt3dadd(21.9521800523376, -106.81568458037, 4.47157343394421, 1.8)
    pt3dadd(22.1936188680614, -107.783722309787, 4.40367459236644, 1.8)
    pt3dadd(22.4350576837853, -108.751760039204, 4.33577575078868, 1.8)
    pt3dadd(22.6524047747268, -109.713869059447, 4.207461049877, 1.8)
    pt3dadd(22.8096483845612, -110.661187272348, 3.92842225208786, 1.8)
    pt3dadd(22.9668919943956, -111.60850548525, 3.64938345429873, 1.8)
    pt3dadd(23.12413560423, -112.555823698151, 3.37034465650959, 1.8)
    pt3dadd(23.2813792140644, -113.503141911052, 3.09130585872044, 1.8)
    pt3dadd(23.4386228238988, -114.450460123954, 2.81226706093131, 1.8)
    pt3dadd(23.5958664337332, -115.397778336855, 2.53322826314217, 1.8)
    pt3dadd(23.7531100435676, -116.345096549756, 2.25418946535303, 1.8)
  }
  adendMML[14] {pt3dclear()
    pt3dadd(23.7531100435676, -116.345096549756, 2.25418946535303, 1.8)
    pt3dadd(23.910353653402, -117.292414762658, 1.97515066756389, 1.8)
    pt3dadd(24.0675972632365, -118.239732975559, 1.69611186977475, 1.8)
    pt3dadd(24.2248408730709, -119.18705118846, 1.41707307198561, 1.8)
    pt3dadd(24.4896128789717, -120.139239737307, 1.42725277369399, 1.8)
    pt3dadd(24.7805000649376, -121.092611133706, 1.50767432284785, 1.8)
    pt3dadd(25.0713872509036, -122.045982530106, 1.58809587200172, 1.8)
    pt3dadd(25.3622744368696, -122.999353926505, 1.66851742115558, 1.8)
    pt3dadd(25.6531616228356, -123.952725322904, 1.74893897030945, 1.8)
    pt3dadd(25.9440488088016, -124.906096719304, 1.82936051946331, 1.8)
    pt3dadd(26.2349359947675, -125.859468115703, 1.90978206861718, 1.8)
    pt3dadd(26.5258231807335, -126.812839512102, 1.99020361777104, 1.8)
    pt3dadd(26.8167103666995, -127.766210908502, 2.07062516692491, 1.8)
    pt3dadd(27.1075975526655, -128.719582304901, 2.15104671607878, 1.8)
    pt3dadd(27.3984847386315, -129.6729537013, 2.23146826523264, 1.8)
    pt3dadd(27.7194898430186, -130.577416580518, 2.01342291776824, 1.8)
    pt3dadd(28.0507184449718, -131.465277512039, 1.69406327797773, 1.8)
    pt3dadd(28.3819470469252, -132.35313844356, 1.37470363818722, 1.8)
    pt3dadd(28.7131756488785, -133.240999375081, 1.05534399839671, 1.8)
    pt3dadd(29.0444042508318, -134.128860306601, 0.735984358606196, 1.8)
    pt3dadd(29.3756328527851, -135.016721238122, 0.416624718815687, 1.8)
    pt3dadd(29.7068614547384, -135.904582169643, 0.0972650790251706, 1.8)
    pt3dadd(30.0380900566917, -136.792443101164, -0.222094560765338, 1.8)
    pt3dadd(30.369318658645, -137.680304032685, -0.541454200555851, 1.8)
    pt3dadd(30.7005472605983, -138.568164964205, -0.860813840346363, 1.8)
    pt3dadd(30.9947105013119, -139.48322680211, -1.05416189396302, 1.8)
    pt3dadd(31.2090551785728, -140.456864550231, -0.976149748990501, 1.8)
    pt3dadd(31.4233998558337, -141.430502298352, -0.898137604017986, 1.8)
    pt3dadd(31.6377445330946, -142.404140046473, -0.820125459045467, 1.8)
    pt3dadd(31.8520892103555, -143.377777794595, -0.742113314072949, 1.8)
    pt3dadd(32.0664338876164, -144.351415542716, -0.66410116910043, 1.8)
    pt3dadd(32.2807785648773, -145.325053290837, -0.586089024127915, 1.8)
    pt3dadd(32.4805243918767, -146.300210765246, -0.490789981500392, 1.8)
    pt3dadd(32.6777835658966, -147.27562709784, -0.39254642510706, 1.8)
    pt3dadd(32.8750427399165, -148.251043430435, -0.294302868713736, 1.8)
    pt3dadd(33.0723019139364, -149.226459763029, -0.196059312320408, 1.8)
    pt3dadd(33.2695610879563, -150.201876095624, -0.0978157559270763, 1.8)
    pt3dadd(33.4668202619762, -151.177292428218, 0.000427800466251682, 1.8)
    pt3dadd(33.6640794359961, -152.152708760813, 0.0986713568595796, 1.8)
  }
}
proc shape3d_17() {
  adendMML[14] {
    pt3dadd(33.861338610016, -153.128125093407, 0.196914913252911, 1.8)
    pt3dadd(34.1384366287978, -153.98948237347, -0.189749976132951, 1.8)
    pt3dadd(34.4255005751981, -154.836602169696, -0.636943828414651, 1.8)
    pt3dadd(34.7125645215983, -155.683721965922, -1.08413768069634, 1.8)
    pt3dadd(34.9996284679986, -156.530841762149, -1.53133153297804, 1.8)
    pt3dadd(35.2866924143989, -157.377961558375, -1.97852538525973, 1.8)
    pt3dadd(35.5737563607992, -158.225081354601, -2.42571923754144, 1.8)
    pt3dadd(35.592402439159, -159.183206671693, -2.67074249535278, 1.8)
    pt3dadd(35.5647307263412, -160.160486937644, -2.88087949374586, 1.8)
    pt3dadd(35.5506349227377, -161.126480499489, -3.00069461189246, 1.8)
    pt3dadd(35.6203726954596, -162.022776720621, -2.56275657170762, 1.8)
    pt3dadd(35.6901104681816, -162.919072941753, -2.12481853152277, 1.8)
    pt3dadd(35.7598482409035, -163.815369162884, -1.68688049133793, 1.8)
    pt3dadd(36.117579237681, -164.686934890818, -1.5839838797651, 1.8)
    pt3dadd(36.6250603679891, -165.545641306971, -1.65530143186749, 1.8)
    pt3dadd(37.1325414982972, -166.404347723125, -1.72661898396988, 1.8)
    pt3dadd(37.6672594304713, -167.247286631431, -1.76172427239061, 1.8)
    pt3dadd(38.2291734934127, -168.074481576572, -1.76067137075259, 1.8)
    pt3dadd(38.7910875563541, -168.901676521713, -1.75961846911455, 1.8)
    pt3dadd(39.3304749041464, -169.741208637399, -1.75989743616395, 1.8)
    pt3dadd(39.7252189098028, -170.659957344066, -1.76872829091469, 1.8)
    pt3dadd(40.1199629154592, -171.578706050733, -1.77755914566543, 1.8)
    pt3dadd(40.5147069211155, -172.4974547574, -1.78639000041618, 1.8)
    pt3dadd(40.9094509267719, -173.416203464068, -1.79522085516691, 1.8)
    pt3dadd(41.3041949324283, -174.334952170735, -1.80405170991765, 1.8)
    pt3dadd(41.6989389380847, -175.253700877402, -1.81288256466839, 1.8)
    pt3dadd(42.0936829437411, -176.172449584069, -1.82171341941913, 1.8)
    pt3dadd(42.4884269493974, -177.091198290737, -1.83054427416987, 1.8)
    pt3dadd(42.8831709550538, -178.009946997404, -1.83937512892061, 1.8)
    pt3dadd(43.2779149607102, -178.928695704071, -1.84820598367135, 1.8)
    pt3dadd(43.5828546026505, -179.875916640492, -1.86415710417838, 1.8)
    pt3dadd(43.7919163501489, -180.853535403098, -1.88771003889942, 1.8)
    pt3dadd(44.0009780976472, -181.831154165704, -1.91126297362048, 1.8)
    pt3dadd(44.2100398451456, -182.80877292831, -1.93481590834153, 1.8)
    pt3dadd(44.419101592644, -183.786391690916, -1.95836884306258, 1.8)
    pt3dadd(44.6281633401424, -184.764010453521, -1.98192177778364, 1.8)
    pt3dadd(44.8372250876408, -185.741629216127, -2.00547471250469, 1.8)
    pt3dadd(45.0462868351392, -186.719247978733, -2.02902764722574, 1.8)
    pt3dadd(45.2553485826376, -187.696866741339, -2.0525805819468, 1.8)
    pt3dadd(45.464410330136, -188.674485503945, -2.07613351666785, 1.8)
    pt3dadd(45.7045816829024, -189.643594512557, -2.11759017321856, 1.8)
    pt3dadd(45.9773721991285, -190.603780841048, -2.17781930932558, 1.8)
    pt3dadd(46.2501627153547, -191.563967169539, -2.23804844543259, 1.8)
    pt3dadd(46.5229532315809, -192.52415349803, -2.2982775815396, 1.8)
    pt3dadd(46.795743747807, -193.484339826521, -2.35850671764662, 1.8)
    pt3dadd(47.0685342640332, -194.444526155012, -2.41873585375363, 1.8)
    pt3dadd(47.3413247802593, -195.404712483503, -2.47896498986064, 1.8)
    pt3dadd(47.6141152964854, -196.364898811994, -2.53919412596765, 1.8)
    pt3dadd(47.8869058127116, -197.325085140484, -2.59942326207466, 1.8)
    pt3dadd(48.1596963289378, -198.285271468975, -2.65965239818168, 1.8)
    pt3dadd(48.4911744195516, -199.210656858718, -2.60617770662658, 1.8)
    pt3dadd(48.9258657242479, -200.074838206909, -2.35273330037573, 1.8)
    pt3dadd(49.3605570289443, -200.9390195551, -2.09928889412487, 1.8)
    pt3dadd(49.7952483336407, -201.803200903291, -1.84584448787401, 1.8)
    pt3dadd(50.229939638337, -202.667382251482, -1.59240008162315, 1.8)
    pt3dadd(50.6646309430334, -203.531563599674, -1.3389556753723, 1.8)
    pt3dadd(51.0993222477298, -204.395744947865, -1.08551126912144, 1.8)
    pt3dadd(51.5340135524261, -205.259926296056, -0.832066862870594, 1.8)
    pt3dadd(51.9687048571225, -206.124107644247, -0.57862245661974, 1.8)
    pt3dadd(52.1953584764996, -207.093847885708, -0.582512907675024, 1.8)
    pt3dadd(52.4078429412795, -208.070777595151, -0.603930074482872, 1.8)
    pt3dadd(52.6203274060594, -209.047707304594, -0.625347241290701, 1.8)
    pt3dadd(52.8328118708393, -210.024637014038, -0.646764408098541, 1.8)
    pt3dadd(53.0452963356192, -211.001566723481, -0.668181574906377, 1.8)
    pt3dadd(53.2577808003991, -211.978496432924, -0.689598741714224, 1.8)
    pt3dadd(53.470265265179, -212.955426142368, -0.711015908522057, 1.8)
    pt3dadd(53.6827497299589, -213.932355851811, -0.732433075329901, 1.8)
    pt3dadd(53.9107157719167, -214.898857402353, -0.798381271495689, 1.8)
    pt3dadd(54.2021441608795, -215.822611664863, -1.04687182785809, 1.8)
    pt3dadd(54.4935725498423, -216.746365927373, -1.29536238422051, 1.8)
    pt3dadd(54.7850009388052, -217.670120189883, -1.54385294058292, 1.8)
    pt3dadd(55.076429327768, -218.593874452393, -1.79234349694532, 1.8)
    pt3dadd(55.3678577167308, -219.517628714903, -2.04083405330773, 1.8)
    pt3dadd(55.6592861056937, -220.441382977413, -2.28932460967014, 1.8)
    pt3dadd(55.9507144946565, -221.365137239923, -2.53781516603254, 1.8)
    pt3dadd(56.2982653445277, -222.281638571072, -2.71540456243988, 1.8)
    pt3dadd(56.698299684437, -223.191357249703, -2.82669001810832, 1.8)
    pt3dadd(57.0983340243464, -224.101075928334, -2.93797547377675, 1.8)
    pt3dadd(57.4983683642557, -225.010794606965, -3.04926092944519, 1.8)
    pt3dadd(57.898402704165, -225.920513285596, -3.16054638511364, 1.8)
    pt3dadd(58.2984370440743, -226.830231964227, -3.27183184078208, 1.8)
    pt3dadd(58.6984713839836, -227.739950642858, -3.38311729645051, 1.8)
    pt3dadd(59.0985057238929, -228.649669321488, -3.49440275211895, 1.8)
    pt3dadd(59.4985400638022, -229.559388000119, -3.6056882077874, 1.8)
    pt3dadd(59.8985744037115, -230.46910667875, -3.71697366345582, 1.8)
    pt3dadd(60.2986087436208, -231.378825357381, -3.82825911912428, 1.8)
    pt3dadd(60.6986430835302, -232.288544036012, -3.93954457479271, 1.8)
    pt3dadd(61.0986774234395, -233.198262714643, -4.05083003046114, 1.8)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(61.0986774234395, -233.198262714643, -4.05083003046114, 1.8)
    pt3dadd(61.4987117633488, -234.107981393274, -4.16211548612959, 1.8)
    pt3dadd(61.8454169271862, -235.035125236958, -4.29573166161403, 1.8)
    pt3dadd(62.1578026149847, -235.973482877263, -4.44371855609526, 1.8)
    pt3dadd(62.4701883027831, -236.911840517569, -4.59170545057649, 1.8)
    pt3dadd(62.7825739905815, -237.850198157875, -4.73969234505773, 1.8)
    pt3dadd(63.09495967838, -238.788555798181, -4.88767923953897, 1.8)
    pt3dadd(63.4073453661784, -239.726913438487, -5.0356661340202, 1.8)
    pt3dadd(63.7197310539768, -240.665271078793, -5.18365302850144, 1.8)
    pt3dadd(64.0321167417753, -241.603628719099, -5.33163992298267, 1.8)
    pt3dadd(64.3445024295737, -242.541986359405, -5.47962681746391, 1.8)
    pt3dadd(64.6660392192548, -243.47394342358, -5.64068665337805, 1.8)
    pt3dadd(65.053508750027, -244.359784999774, -5.89593567807419, 1.8)
    pt3dadd(65.4409782807992, -245.245626575969, -6.15118470277034, 1.8)
    pt3dadd(65.8284478115714, -246.131468152164, -6.40643372746649, 1.8)
    pt3dadd(66.2159173423436, -247.017309728358, -6.66168275216262, 1.8)
    pt3dadd(66.6033868731158, -247.903151304553, -6.91693177685877, 1.8)
    pt3dadd(66.9908564038879, -248.788992880747, -7.17218080155492, 1.8)
    pt3dadd(67.3783259346601, -249.674834456942, -7.42742982625106, 1.8)
    pt3dadd(67.7657954654323, -250.560676033136, -7.6826788509472, 1.8)
    pt3dadd(68.1532649962045, -251.446517609331, -7.93792787564334, 1.8)
    pt3dadd(68.4260882647402, -252.303508374331, -8.36360876192975, 1.8)
    pt3dadd(68.6724502914864, -253.153840149531, -8.82862663670754, 1.8)
    pt3dadd(68.9188123182326, -254.004171924731, -9.29364451148533, 1.8)
    pt3dadd(69.1651743449787, -254.854503699931, -9.75866238626313, 1.8)
    pt3dadd(69.4115363717249, -255.70483547513, -10.2236802610409, 1.8)
    pt3dadd(69.6578983984711, -256.55516725033, -10.6886981358187, 1.8)
    pt3dadd(69.9171434954059, -257.425322840441, -11.0724204098741, 1.8)
    pt3dadd(70.2273937509773, -258.373962581415, -11.134286561858, 1.8)
    pt3dadd(70.5376440065486, -259.32260232239, -11.1961527138418, 1.8)
    pt3dadd(70.84789426212, -260.271242063365, -11.2580188658257, 1.8)
    pt3dadd(71.1581445176913, -261.21988180434, -11.3198850178096, 1.8)
    pt3dadd(71.4683947732627, -262.168521545314, -11.3817511697935, 1.8)
    pt3dadd(71.778645028834, -263.117161286289, -11.4436173217773, 1.8)
    pt3dadd(72.0888952844054, -264.065801027264, -11.5054834737612, 1.8)
    pt3dadd(72.3991455399768, -265.014440768239, -11.5673496257451, 1.8)
    pt3dadd(72.7193526954711, -265.951563451247, -11.6966375514246, 1.8)
    pt3dadd(73.0448808236301, -266.882531412296, -11.8619557091659, 1.8)
    pt3dadd(73.3704089517891, -267.813499373344, -12.0272738669072, 1.8)
    pt3dadd(73.6959370799481, -268.744467334392, -12.1925920246486, 1.8)
    pt3dadd(74.0214652081071, -269.67543529544, -12.3579101823899, 1.8)
    pt3dadd(74.3469933362661, -270.606403256489, -12.5232283401312, 1.8)
    pt3dadd(74.6725214644251, -271.537371217537, -12.6885464978725, 1.8)
    pt3dadd(74.9980495925841, -272.468339178585, -12.8538646556138, 1.8)
    pt3dadd(75.250618499325, -273.367348373724, -12.561504415615, 1.8)
    pt3dadd(75.4888139117409, -274.260061460825, -12.1789782209261, 1.8)
    pt3dadd(75.7270093241568, -275.152774547925, -11.7964520262372, 1.8)
    pt3dadd(75.9652047365727, -276.045487635026, -11.4139258315483, 1.8)
    pt3dadd(76.2034001489886, -276.938200722127, -11.0313996368594, 1.8)
    pt3dadd(76.41136902346, -277.877180553378, -10.8038653485181, 1.8)
    pt3dadd(76.5933341785939, -278.855963402486, -10.7096697190615, 1.8)
    pt3dadd(76.7752993337278, -279.834746251595, -10.6154740896049, 1.8)
    pt3dadd(76.9572644888618, -280.813529100703, -10.5212784601483, 1.8)
    pt3dadd(77.0970491906311, -281.779881366484, -10.5695130149605, 1.8)
    pt3dadd(77.152744768932, -282.721452560164, -10.9016902113344, 1.8)
    pt3dadd(77.2084403472329, -283.663023753843, -11.2338674077084, 1.8)
    pt3dadd(77.2641359255338, -284.604594947523, -11.5660446040824, 1.8)
    pt3dadd(77.3198315038347, -285.546166141202, -11.8982218004564, 1.8)
    pt3dadd(77.3766439670339, -286.485297522736, -12.2179162169007, 1.8)
    pt3dadd(77.5197822692993, -287.235851879919, -11.5727963959854, 1.8)
    pt3dadd(77.6629205715648, -287.986406237102, -10.9276765750701, 1.8)
    pt3dadd(77.8060588738302, -288.736960594286, -10.2825567541549, 1.8)
    pt3dadd(77.9491971760957, -289.487514951469, -9.63743693323963, 1.8)
    pt3dadd(78.0923354783611, -290.238069308652, -8.99231711232439, 1.8)
  }
  adendIML[10] {pt3dclear()
    pt3dadd(11.0891836331377, -73.9363109351531, 8.15477283154464, 1.8)
    pt3dadd(10.8888844203271, -74.9542673941608, 8.20220975377488, 1.8)
    pt3dadd(10.7948078084862, -75.9497780245806, 8.19180899295022, 1.8)
    pt3dadd(10.7007311966453, -76.9452886550004, 8.18140823212555, 1.8)
    pt3dadd(10.6066545848045, -77.9407992854202, 8.17100747130089, 1.8)
    pt3dadd(10.5125779729636, -78.93630991584, 8.16060671047622, 1.8)
    pt3dadd(10.4185013611227, -79.9318205462597, 8.15020594965156, 1.8)
    pt3dadd(10.3244247492818, -80.9273311766795, 8.13980518882689, 1.8)
    pt3dadd(10.3410979718755, -81.9224704174994, 8.07234154750259, 1.8)
    pt3dadd(10.3925087950366, -82.917493168903, 7.98697966226535, 1.8)
    pt3dadd(10.4439196181978, -83.9125159203065, 7.90161777702811, 1.8)
    pt3dadd(10.4953304413589, -84.90753867171, 7.81625589179087, 1.8)
    pt3dadd(10.5467412645201, -85.9025614231135, 7.73089400655363, 1.8)
    pt3dadd(10.5981520876812, -86.8975841745171, 7.64553212131639, 1.8)
    pt3dadd(10.6495629108424, -87.8926069259206, 7.56017023607915, 1.8)
    pt3dadd(10.7009737340035, -88.8876296773241, 7.47480835084191, 1.8)
    pt3dadd(10.7523845571647, -89.8826524287276, 7.38944646560467, 1.8)
    pt3dadd(10.8037953803258, -90.8776751801311, 7.30408458036743, 1.8)
    pt3dadd(10.6554807235411, -91.850983467195, 7.32443575967433, 1.8)
    pt3dadd(10.389898805403, -92.8115422754966, 7.40685554220467, 1.8)
    pt3dadd(10.1243168872648, -93.7721010837981, 7.48927532473502, 1.8)
    pt3dadd(9.85873496912665, -94.7326598920997, 7.57169510726536, 1.8)
    pt3dadd(9.59315305098849, -95.6932187004013, 7.65411488979571, 1.8)
    pt3dadd(9.32757113285033, -96.6537775087028, 7.73653467232605, 1.8)
    pt3dadd(9.06198921471217, -97.6143363170044, 7.8189544548564, 1.8)
    pt3dadd(9.0191698682673, -98.5983175388122, 7.97693344383536, 1.8)
    pt3dadd(8.99624293019893, -99.5843903517303, 8.14165977183027, 1.8)
    pt3dadd(8.97331599213055, -100.570463164648, 8.30638609982517, 1.8)
    pt3dadd(8.95038905406217, -101.556535977566, 8.47111242782008, 1.8)
    pt3dadd(8.92746211599379, -102.542608790484, 8.63583875581499, 1.8)
    pt3dadd(8.90453517792542, -103.528681603403, 8.8005650838099, 1.8)
    pt3dadd(8.88494134935817, -104.513664531412, 8.9218982310757, 1.8)
    pt3dadd(8.89120492299757, -105.490192413935, 8.70659829540245, 1.8)
    pt3dadd(8.89746849663697, -106.466720296457, 8.49129835972919, 1.8)
    pt3dadd(8.90373207027637, -107.44324817898, 8.27599842405593, 1.8)
    pt3dadd(8.90999564391577, -108.419776061503, 8.06069848838268, 1.8)
    pt3dadd(8.91625921755517, -109.396303944026, 7.84539855270942, 1.8)
    pt3dadd(8.94771928928139, -110.375778325418, 7.67676599150625, 1.8)
    pt3dadd(9.07923039350346, -111.366952755488, 7.69344168161301, 1.8)
    pt3dadd(9.21074149772554, -112.358127185559, 7.71011737171978, 1.8)
    pt3dadd(9.34225260194762, -113.34930161563, 7.72679306182654, 1.8)
    pt3dadd(9.4737637061697, -114.3404760457, 7.74346875193331, 1.8)
    pt3dadd(9.60527481039178, -115.331650475771, 7.76014444204008, 1.8)
    pt3dadd(9.73678591461386, -116.322824905841, 7.77682013214684, 1.8)
  }
  adendMML[15] {pt3dclear()
    pt3dadd(9.73678591461386, -116.322824905841, 7.77682013214684, 1.8)
    pt3dadd(9.86829701883594, -117.313999335912, 7.79349582225361, 1.8)
    pt3dadd(9.77824231657362, -118.306685372046, 7.80467267603276, 1.8)
    pt3dadd(9.65959355832437, -119.299566487688, 7.81513988044719, 1.8)
    pt3dadd(9.54094480007512, -120.292447603329, 7.82560708486162, 1.8)
    pt3dadd(9.42229604182586, -121.285328718971, 7.83607428927606, 1.8)
    pt3dadd(9.30364728357661, -122.278209834612, 7.84654149369049, 1.8)
    pt3dadd(9.18499852532736, -123.271090950254, 7.85700869810492, 1.8)
    pt3dadd(9.06634976707811, -124.263972065895, 7.86747590251936, 1.8)
    pt3dadd(8.94770100882886, -125.256853181537, 7.87794310693379, 1.8)
    pt3dadd(8.82905225057961, -126.249734297179, 7.88841031134822, 1.8)
    pt3dadd(8.71040349233036, -127.24261541282, 7.89887751576265, 1.8)
    pt3dadd(8.68570802700893, -128.237283997519, 7.82705187535439, 1.8)
    pt3dadd(8.69031171206794, -129.232510000941, 7.72956337246885, 1.8)
    pt3dadd(8.69491539712695, -130.227736004364, 7.63207486958331, 1.8)
    pt3dadd(8.69951908218596, -131.222962007787, 7.53458636669776, 1.8)
    pt3dadd(8.70412276724496, -132.21818801121, 7.43709786381222, 1.8)
    pt3dadd(8.70872645230397, -133.213414014633, 7.33960936092668, 1.8)
    pt3dadd(8.71333013736298, -134.208640018056, 7.24212085804113, 1.8)
    pt3dadd(8.71793382242199, -135.203866021478, 7.14463235515559, 1.8)
    pt3dadd(8.722537507481, -136.199092024901, 7.04714385227004, 1.8)
    pt3dadd(8.73679398254469, -137.189738100566, 6.91788006096987, 1.8)
    pt3dadd(8.76572072250342, -138.173423623544, 6.74032433563478, 1.8)
    pt3dadd(8.79464746246214, -139.157109146522, 6.56276861029968, 1.8)
    pt3dadd(8.82357420242086, -140.1407946695, 6.38521288496459, 1.8)
    pt3dadd(8.85250094237959, -141.124480192478, 6.20765715962951, 1.8)
    pt3dadd(8.88142768233831, -142.108165715455, 6.03010143429442, 1.8)
    pt3dadd(8.91035442229704, -143.091851238433, 5.85254570895933, 1.8)
    pt3dadd(8.93928116225577, -144.075536761411, 5.67498998362423, 1.8)
    pt3dadd(8.96820790221449, -145.059222284389, 5.49743425828914, 1.8)
    pt3dadd(9.00843794780465, -146.038266608089, 5.2994821826883, 1.8)
    pt3dadd(9.0620390430439, -147.01182070548, 5.07740259775907, 1.8)
    pt3dadd(9.11564013828316, -147.985374802872, 4.85532301282984, 1.8)
    pt3dadd(9.16924123352241, -148.958928900263, 4.63324342790062, 1.8)
    pt3dadd(9.22284232876167, -149.932482997654, 4.41116384297138, 1.8)
    pt3dadd(9.27644342400092, -150.906037095045, 4.18908425804216, 1.8)
    pt3dadd(9.33004451924018, -151.879591192436, 3.96700467311293, 1.8)
    pt3dadd(9.36448268615683, -152.853079862107, 3.74794815218521, 1.8)
    pt3dadd(9.23863296790838, -153.826021263086, 3.55417798245406, 1.8)
    pt3dadd(9.11278324965993, -154.798962664066, 3.36040781272291, 1.8)
    pt3dadd(8.98693353141148, -155.771904065045, 3.16663764299176, 1.8)
    pt3dadd(8.86108381316303, -156.744845466024, 2.97286747326061, 1.8)
    pt3dadd(8.73523409491458, -157.717786867003, 2.77909730352946, 1.8)
    pt3dadd(8.60938437666613, -158.690728267982, 2.5853271337983, 1.8)
    pt3dadd(8.59522891511727, -159.659147153787, 2.52818383266741, 1.8)
    pt3dadd(8.79146281162844, -160.619047346756, 2.72839341634839, 1.8)
    pt3dadd(8.98769670813961, -161.578947539725, 2.92860300002938, 1.8)
    pt3dadd(9.18393060465079, -162.538847732694, 3.12881258371037, 1.8)
    pt3dadd(9.38016450116197, -163.498747925664, 3.32902216739136, 1.8)
    pt3dadd(9.57639839767314, -164.458648118633, 3.52923175107235, 1.8)
    pt3dadd(9.75912083147215, -165.4216142548, 3.70513180522672, 1.8)
    pt3dadd(9.79743048923848, -166.417349705274, 3.62120753704277, 1.8)
    pt3dadd(9.83574014700482, -167.413085155749, 3.53728326885882, 1.8)
  }
}
proc shape3d_18() {
  adendMML[15] {
    pt3dadd(9.87404980477115, -168.408820606223, 3.45335900067486, 1.8)
    pt3dadd(10.0166777380473, -169.297144255544, 3.15492795649322, 1.8)
    pt3dadd(10.313996721964, -170.02618953978, 2.53840999622299, 1.8)
    pt3dadd(10.6113157058806, -170.755234824016, 1.92189203595276, 1.8)
    pt3dadd(10.9086346897973, -171.484280108253, 1.30537407568254, 1.8)
    pt3dadd(11.2059536737139, -172.213325392489, 0.688856115412309, 1.8)
    pt3dadd(11.1420351356179, -173.150572342845, 0.433216366383514, 1.8)
    pt3dadd(11.0161854173694, -174.123513743824, 0.239446196652368, 1.8)
    pt3dadd(10.8903356991209, -175.096455144803, 0.0456760269212193, 1.8)
    pt3dadd(10.7644859808725, -176.069396545783, -0.148094142809926, 1.8)
    pt3dadd(10.5715298550156, -177.033435277148, -0.275844912992049, 1.8)
    pt3dadd(10.2504040974131, -177.980470388048, -0.277502178398496, 1.8)
    pt3dadd(9.92927833981056, -178.927505498947, -0.279159443804939, 1.8)
    pt3dadd(9.60815258220806, -179.874540609846, -0.280816709211386, 1.8)
    pt3dadd(9.28702682460557, -180.821575720745, -0.28247397461783, 1.8)
    pt3dadd(8.96590106700307, -181.768610831644, -0.284131240024275, 1.8)
    pt3dadd(8.75270409249005, -182.733880586783, -0.213307652005824, 1.8)
    pt3dadd(8.65088501001055, -183.717967715558, -0.0676869205732586, 1.8)
    pt3dadd(8.54906592753105, -184.702054844332, 0.0779338108593048, 1.8)
    pt3dadd(8.44724684505154, -185.686141973107, 0.22355454229187, 1.8)
    pt3dadd(8.34542776257204, -186.670229101882, 0.369175273724434, 1.8)
    pt3dadd(8.24360868009254, -187.654316230656, 0.514796005156999, 1.8)
    pt3dadd(8.14178959761303, -188.638403359431, 0.660416736589562, 1.8)
    pt3dadd(8.10012250683246, -189.618337777894, 0.611131218182747, 1.8)
    pt3dadd(8.10984901908605, -190.594724138525, 0.395318638074381, 1.8)
    pt3dadd(8.11957553133963, -191.571110499156, 0.179506057966014, 1.8)
    pt3dadd(8.12930204359321, -192.547496859788, -0.0363065221423522, 1.8)
    pt3dadd(8.13902855584679, -193.523883220419, -0.252119102250719, 1.8)
    pt3dadd(8.14875506810037, -194.50026958105, -0.467931682359085, 1.8)
    pt3dadd(8.15848158035395, -195.476655941681, -0.683744262467451, 1.8)
    pt3dadd(8.16820809260753, -196.453042302312, -0.899556842575818, 1.8)
    pt3dadd(8.44859975125687, -197.387567760554, -0.811261242722999, 1.8)
    pt3dadd(8.79402873237295, -198.312034587149, -0.649892393402046, 1.8)
    pt3dadd(9.13945771348903, -199.236501413743, -0.48852354408109, 1.8)
    pt3dadd(9.48488669460511, -200.160968240338, -0.327154694760136, 1.8)
    pt3dadd(9.83031567572119, -201.085435066932, -0.165785845439183, 1.8)
    pt3dadd(10.1757446568373, -202.009901893527, -0.00441699611822699, 1.8)
    pt3dadd(10.3035934240594, -202.991874443009, 0.0521960932529151, 1.8)
    pt3dadd(10.3743138500209, -203.988945822035, 0.0813042790470195, 1.8)
    pt3dadd(10.4450342759825, -204.98601720106, 0.110412464841129, 1.8)
    pt3dadd(10.515754701944, -205.983088580085, 0.139520650635236, 1.8)
    pt3dadd(10.5864751279056, -206.980159959111, 0.168628836429344, 1.8)
    pt3dadd(10.6571955538671, -207.977231338136, 0.197737022223452, 1.8)
    pt3dadd(10.7279159798287, -208.974302717162, 0.226845208017558, 1.8)
    pt3dadd(10.9041643870601, -209.957113149123, 0.264053180453095, 1.8)
    pt3dadd(11.0955475799899, -210.937878281107, 0.302422821420011, 1.8)
    pt3dadd(11.2869307729196, -211.918643413091, 0.340792462386926, 1.8)
    pt3dadd(11.4783139658494, -212.899408545076, 0.37916210335384, 1.8)
    pt3dadd(11.6696971587792, -213.88017367706, 0.417531744320753, 1.8)
    pt3dadd(11.861080351709, -214.860938809044, 0.455901385287669, 1.8)
    pt3dadd(12.0524635446388, -215.841703941028, 0.494271026254586, 1.8)
    pt3dadd(12.2491795209515, -216.82078676394, 0.537415859157768, 1.8)
    pt3dadd(12.5285605758869, -217.773791608105, 0.654582378018821, 1.8)
    pt3dadd(12.8079416308222, -218.72679645227, 0.771748896879872, 1.8)
    pt3dadd(13.0873226857576, -219.679801296434, 0.888915415740925, 1.8)
    pt3dadd(13.366703740693, -220.632806140599, 1.00608193460198, 1.8)
    pt3dadd(13.6460847956284, -221.585810984763, 1.12324845346302, 1.8)
    pt3dadd(13.9254658505637, -222.538815828928, 1.24041497232408, 1.8)
    pt3dadd(14.1916328182892, -223.501616949473, 1.25161622627207, 1.8)
    pt3dadd(14.4554513339394, -224.466159097245, 1.24398497651804, 1.8)
    pt3dadd(14.7192698495896, -225.430701245016, 1.23635372676402, 1.8)
    pt3dadd(14.9830883652397, -226.395243392787, 1.22872247700999, 1.8)
    pt3dadd(15.2469068808899, -227.359785540559, 1.22109122725596, 1.8)
    pt3dadd(15.51072539654, -228.32432768833, 1.21345997750193, 1.8)
    pt3dadd(15.7745439121902, -229.288869836101, 1.20582872774791, 1.8)
    pt3dadd(16.0437956463504, -230.247979297128, 1.25102843729541, 1.8)
    pt3dadd(16.32366455648, -231.196472621318, 1.39946632703175, 1.8)
    pt3dadd(16.6035334666097, -232.144965945508, 1.5479042167681, 1.8)
    pt3dadd(16.8834023767393, -233.093459269698, 1.69634210650444, 1.8)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(16.8834023767393, -233.093459269698, 1.69634210650444, 1.8)
    pt3dadd(17.163271286869, -234.041952593889, 1.84477999624078, 1.8)
    pt3dadd(17.4431401969986, -234.990445918079, 1.99321788597712, 1.8)
    pt3dadd(17.7230091071283, -235.938939242269, 2.14165577571346, 1.8)
    pt3dadd(18.002878017258, -236.887432566459, 2.2900936654498, 1.8)
    pt3dadd(18.2827469273876, -237.835925890649, 2.43853155518614, 1.8)
    pt3dadd(18.4903394205883, -238.808229395857, 2.51961716331702, 1.8)
    pt3dadd(18.6632437836483, -239.791960289042, 2.56837791627559, 1.8)
    pt3dadd(18.8361481467083, -240.775691182227, 2.61713866923415, 1.8)
    pt3dadd(19.0090525097683, -241.759422075411, 2.66589942219273, 1.8)
    pt3dadd(19.1819568728282, -242.743152968596, 2.7146601751513, 1.8)
    pt3dadd(19.3548612358882, -243.72688386178, 2.76342092810987, 1.8)
    pt3dadd(19.5703060666523, -244.694098668629, 2.86242443074694, 1.8)
    pt3dadd(19.8621861234755, -245.631637948601, 3.05170235058673, 1.8)
    pt3dadd(20.1540661802988, -246.569177228572, 3.24098027042653, 1.8)
    pt3dadd(20.4459462371221, -247.506716508544, 3.43025819026633, 1.8)
    pt3dadd(20.7378262939454, -248.444255788516, 3.61953611010613, 1.8)
    pt3dadd(21.0297063507687, -249.381795068488, 3.80881402994593, 1.8)
    pt3dadd(21.3215864075919, -250.319334348459, 3.99809194978574, 1.8)
    pt3dadd(21.7050990857073, -251.215816982959, 4.21913617143197, 1.8)
    pt3dadd(22.0917211610258, -252.110906430002, 4.44125832851861, 1.8)
    pt3dadd(22.4783432363443, -253.005995877045, 4.66338048560527, 1.8)
    pt3dadd(22.915645319501, -253.868391896688, 4.8892837667094, 1.8)
    pt3dadd(23.5473570997856, -254.605375163057, 5.12969152810853, 1.8)
    pt3dadd(24.1790688800702, -255.342358429427, 5.37009928950767, 1.8)
    pt3dadd(24.8107806603549, -256.079341695796, 5.6105070509068, 1.8)
    pt3dadd(25.4424924406395, -256.816324962166, 5.85091481230594, 1.8)
    pt3dadd(26.0742042209241, -257.553308228535, 6.09132257370507, 1.8)
    pt3dadd(26.3651915011798, -258.480013131334, 6.27757653863197, 1.8)
    pt3dadd(26.6081453092682, -259.433463950386, 6.45619619820254, 1.8)
    pt3dadd(26.8510991173567, -260.386914769438, 6.6348158577731, 1.8)
    pt3dadd(27.0940529254451, -261.340365588489, 6.81343551734368, 1.8)
    pt3dadd(27.3370067335335, -262.293816407541, 6.99205517691424, 1.8)
    pt3dadd(27.5799605416219, -263.247267226593, 7.17067483648481, 1.8)
    pt3dadd(27.7250831213085, -264.18615368932, 7.02394375279069, 1.8)
    pt3dadd(27.8059909322452, -265.115480354132, 6.66365792709244, 1.8)
    pt3dadd(27.886898743182, -266.044807018944, 6.30337210139418, 1.8)
    pt3dadd(27.9678065541188, -266.974133683756, 5.94308627569593, 1.8)
    pt3dadd(28.0487143650555, -267.903460348567, 5.58280044999768, 1.8)
    pt3dadd(28.1296221759923, -268.832787013379, 5.22251462429942, 1.8)
    pt3dadd(28.1658433848973, -269.779235493647, 4.90365036189674, 1.8)
    pt3dadd(28.1881327219361, -270.731022015479, 4.59770003535162, 1.8)
    pt3dadd(28.210422058975, -271.682808537311, 4.2917497088065, 1.8)
    pt3dadd(28.2327113960138, -272.634595059143, 3.98579938226136, 1.8)
    pt3dadd(28.2550007330527, -273.586381580975, 3.67984905571624, 1.8)
    pt3dadd(28.2772900700915, -274.538168102807, 3.37389872917111, 1.8)
    pt3dadd(28.2995794071304, -275.489954624639, 3.06794840262598, 1.8)
    pt3dadd(28.3218687441692, -276.441741146471, 2.76199807608085, 1.8)
    pt3dadd(28.344158081208, -277.393527668304, 2.45604774953573, 1.8)
    pt3dadd(28.4970760117138, -278.346342611088, 2.20379370116605, 1.8)
    pt3dadd(28.683572070787, -279.299421909861, 1.9653423010858, 1.8)
    pt3dadd(28.8700681298601, -280.252501208634, 1.72689090100555, 1.8)
    pt3dadd(29.0565641889333, -281.205580507408, 1.4884395009253, 1.8)
    pt3dadd(29.2430602480065, -282.158659806181, 1.24998810084504, 1.8)
    pt3dadd(29.4295563070797, -283.111739104954, 1.0115367007648, 1.8)
    pt3dadd(29.8460255091674, -283.978954571781, 0.755822371469325, 1.8)
    pt3dadd(30.2970559310039, -284.833266102412, 0.497513704929535, 1.8)
    pt3dadd(30.7480863528404, -285.687577633042, 0.239205038389745, 1.8)
    pt3dadd(31.0806976791935, -286.592415374115, -0.00279656655117222, 1.8)
    pt3dadd(31.3284169382855, -287.53347425366, -0.233107994629723, 1.8)
    pt3dadd(31.5761361973775, -288.474533133206, -0.463419422708281, 1.8)
    pt3dadd(31.8238554564695, -289.415592012751, -0.693730850786839, 1.8)
    pt3dadd(31.9692415871336, -290.380648440209, -0.758102223760055, 1.8)
    pt3dadd(31.9995606839836, -291.372688569813, -0.635884657010102, 1.8)
    pt3dadd(32.0298797808336, -292.364728699417, -0.513667090260149, 1.8)
    pt3dadd(32.0601988776837, -293.35676882902, -0.3914495235102, 1.8)
    pt3dadd(32.0905179745337, -294.348808958624, -0.269231956760247, 1.8)
    pt3dadd(32.1272791051747, -295.192138476122, -0.485611756109193, 1.8)
    pt3dadd(32.1753710467566, -295.773902797698, -1.29754613726075, 1.8)
    pt3dadd(32.2234629883384, -296.355667119274, -2.10948051841231, 1.8)
  }
  GCL[10] {pt3dclear()
    pt3dadd(11.0293659635105, 2.60014694981428, 4.84907494023953, 2.17391527852465)
    pt3dadd(11.3915959382799, 1.71000296724746, 4.66244548480616, 2.17391527852465)
    pt3dadd(11.8007007000875, 0.834286061278293, 4.40602162775275, 2.08452269350288)
  }
  adendIML[11] {pt3dclear()
    pt3dadd(11.8007007000875, 0.834286061278293, 4.40602162775275, 1.99513010848111)
    pt3dadd(12.2098054618951, -0.0414308446908778, 4.14959777069934, 1.99513010848111)
    pt3dadd(12.6189102237027, -0.91714775066002, 3.89317391364594, 1.90573752345934)
    pt3dadd(13.0280149855103, -1.79286465662918, 3.63675005659253, 1.81634493843758)
    pt3dadd(13.2918865844184, -2.74744536516178, 3.6186432948315, 1.8)
    pt3dadd(13.523261214325, -3.71967241903375, 3.65386170415159, 1.8)
    pt3dadd(13.7546358442316, -4.69189947290572, 3.68908011347169, 1.8)
    pt3dadd(13.9860104741381, -5.66412652677769, 3.72429852279178, 1.8)
    pt3dadd(14.2173851040447, -6.63635358064965, 3.75951693211188, 1.8)
    pt3dadd(14.4487597339513, -7.60858063452163, 3.79473534143197, 1.8)
    pt3dadd(14.6801343638578, -8.58080768839358, 3.82995375075207, 1.8)
    pt3dadd(14.8985053513864, -9.55151031093427, 3.82576964786554, 1.8)
    pt3dadd(15.0411990623918, -10.5133412029209, 3.59227480839432, 1.8)
    pt3dadd(15.1838927733972, -11.4751720949075, 3.3587799689231, 1.8)
    pt3dadd(15.3265864844026, -12.4370029868942, 3.12528512945188, 1.8)
    pt3dadd(15.469280195408, -13.3988338788808, 2.89179028998066, 1.8)
    pt3dadd(15.6119739064134, -14.3606647708675, 2.65829545050944, 1.8)
    pt3dadd(15.7546676174188, -15.3224956628541, 2.42480061103822, 1.8)
    pt3dadd(15.8973613284242, -16.2843265548408, 2.191305771567, 1.8)
    pt3dadd(16.0400550394296, -17.2461574468274, 1.95781093209578, 1.8)
    pt3dadd(16.1827487504349, -18.207988338814, 1.72431609262456, 1.8)
    pt3dadd(16.3668762960919, -19.170501838846, 1.54619705725754, 1.8)
    pt3dadd(16.6197620303104, -20.1341481061703, 1.4599724847697, 1.8)
    pt3dadd(16.8726477645288, -21.0977943734947, 1.37374791228187, 1.8)
    pt3dadd(17.1255334987472, -22.061440640819, 1.28752333979404, 1.8)
    pt3dadd(17.3784192329656, -23.0250869081433, 1.2012987673062, 1.8)
    pt3dadd(17.631304967184, -23.9887331754676, 1.11507419481837, 1.8)
    pt3dadd(17.8841907014024, -24.9523794427919, 1.02884962233053, 1.8)
    pt3dadd(18.1370764356209, -25.9160257101163, 0.942625049842691, 1.8)
    pt3dadd(18.3899621698393, -26.8796719774406, 0.85640047735486, 1.8)
    pt3dadd(18.6021107930137, -27.8230634774219, 0.662165475978078, 1.8)
    pt3dadd(18.7333600605514, -28.7262312702077, 0.253433818474941, 1.8)
    pt3dadd(18.864609328089, -29.6293990629935, -0.155297839028206, 1.8)
    pt3dadd(18.9958585956266, -30.5325668557793, -0.564029496531349, 1.8)
    pt3dadd(19.1271078631642, -31.4357346485651, -0.972761154034496, 1.8)
    pt3dadd(19.2583571307018, -32.3389024413509, -1.38149281153764, 1.8)
    pt3dadd(19.3896063982395, -33.2420702341367, -1.79022446904078, 1.8)
    pt3dadd(19.5208556657771, -34.1452380269225, -2.19895612654393, 1.8)
    pt3dadd(19.6521049333147, -35.0484058197083, -2.60768778404707, 1.8)
    pt3dadd(19.784823567934, -35.9519688649093, -3.01357337534547, 1.8)
    pt3dadd(20.0891586992845, -36.9016958916362, -3.08704923893527, 1.8)
    pt3dadd(20.393493830635, -37.8514229183631, -3.16052510252509, 1.8)
    pt3dadd(20.6978289619855, -38.8011499450901, -3.23400096611489, 1.8)
    pt3dadd(21.002164093336, -39.750876971817, -3.30747682970469, 1.8)
    pt3dadd(21.3064992246865, -40.700603998544, -3.3809526932945, 1.8)
    pt3dadd(21.610834356037, -41.6503310252709, -3.4544285568843, 1.8)
    pt3dadd(21.9151694873875, -42.6000580519979, -3.52790442047411, 1.8)
    pt3dadd(22.2195046187381, -43.5497850787248, -3.60138028406392, 1.8)
    pt3dadd(22.5238397500885, -44.4995121054517, -3.67485614765372, 1.8)
    pt3dadd(22.8281748814391, -45.4492391321787, -3.74833201124352, 1.8)
    pt3dadd(23.1325100127896, -46.3989661589056, -3.82180787483334, 1.8)
    pt3dadd(23.4762826764527, -47.3236740112736, -3.93603269620395, 1.8)
    pt3dadd(23.9605739210112, -48.1592368621686, -4.19544879564299, 1.8)
    pt3dadd(24.4448651655698, -48.9947997130636, -4.45486489508203, 1.8)
    pt3dadd(24.9291564101283, -49.8303625639586, -4.71428099452107, 1.8)
    pt3dadd(25.4134476546868, -50.6659254148536, -4.9736970939601, 1.8)
    pt3dadd(25.8977388992454, -51.5014882657486, -5.23311319339914, 1.8)
    pt3dadd(26.3820301438039, -52.3370511166436, -5.49252929283818, 1.8)
    pt3dadd(26.8663213883625, -53.1726139675386, -5.75194539227722, 1.8)
    pt3dadd(27.350612632921, -54.0081768184336, -6.01136149171625, 1.8)
    pt3dadd(28.0756739116182, -54.6678094780023, -6.10533624538854, 1.8)
    pt3dadd(28.8635498853745, -55.2815435631933, -6.15614886835099, 1.8)
    pt3dadd(29.6514258591308, -55.8952776483844, -6.20696149131344, 1.8)
    pt3dadd(30.4393018328871, -56.5090117335754, -6.25777411427589, 1.8)
    pt3dadd(31.2271778066434, -57.1227458187664, -6.30858673723835, 1.8)
    pt3dadd(32.0150537803997, -57.7364799039574, -6.3593993602008, 1.8)
    pt3dadd(32.7660241659081, -58.357172459444, -6.48246506596616, 1.8)
    pt3dadd(33.318639795789, -59.0152643829005, -6.99386606898897, 1.8)
    pt3dadd(33.8712554256699, -59.6733563063569, -7.50526707201178, 1.8)
    pt3dadd(34.4238710555508, -60.3314482298134, -8.01666807503458, 1.8)
    pt3dadd(34.9764866854316, -60.9895401532698, -8.52806907805739, 1.8)
    pt3dadd(35.5291023153125, -61.6476320767263, -9.0394700810802, 1.8)
    pt3dadd(36.0817179451934, -62.3057240001827, -9.550871084103, 1.8)
    pt3dadd(36.6343335750743, -62.9638159236392, -10.0622720871258, 1.8)
    pt3dadd(37.1869492049552, -63.6219078470956, -10.5736730901486, 1.8)
    pt3dadd(37.7395648348361, -64.2799997705521, -11.0850740931714, 1.8)
    pt3dadd(38.3987057161549, -64.7663028965023, -11.6551331158147, 1.8)
    pt3dadd(39.0676461965547, -65.236802620729, -12.2305882775649, 1.8)
    pt3dadd(39.7365866769546, -65.7073023449557, -12.8060434393152, 1.8)
    pt3dadd(40.4055271573545, -66.1778020691823, -13.3814986010655, 1.8)
    pt3dadd(41.0744676377543, -66.648301793409, -13.9569537628157, 1.8)
    pt3dadd(41.7434081181542, -67.1188015176357, -14.532408924566, 1.8)
    pt3dadd(42.4123485985541, -67.5893012418623, -15.1078640863163, 1.8)
    pt3dadd(43.1475111862632, -68.1082246904247, -15.5423687427122, 1.8)
    pt3dadd(43.8863092123935, -68.6298064879146, -15.969135546849, 1.8)
    pt3dadd(44.6251072385238, -69.1513882854045, -16.3959023509859, 1.8)
    pt3dadd(45.3639052646541, -69.6729700828944, -16.8226691551228, 1.8)
    pt3dadd(45.9622765285478, -70.4159734858873, -17.1022394354854, 1.8)
    pt3dadd(46.5424165278001, -71.1877235168234, -17.3626995495486, 1.8)
    pt3dadd(47.1225565270524, -71.9594735477594, -17.6231596636118, 1.8)
    pt3dadd(47.7026965263047, -72.7312235786954, -17.883619777675, 1.8)
    pt3dadd(48.3102265407519, -73.4792032631482, -18.1431634749644, 1.8)
    pt3dadd(49.0024759612715, -74.1536594529311, -18.3998726252763, 1.8)
    pt3dadd(49.694725381791, -74.8281156427141, -18.6565817755882, 1.8)
    pt3dadd(50.3869748023104, -75.5025718324971, -18.9132909259001, 1.8)
    pt3dadd(51.07922422283, -76.1770280222801, -19.170000076212, 1.8)
    pt3dadd(51.804810514083, -76.8161984392879, -19.4241992385431, 1.8)
    pt3dadd(52.5355961088896, -77.4498655969993, -19.6780069367344, 1.8)
    pt3dadd(53.2663817036961, -78.0835327547107, -19.9318146349257, 1.8)
    pt3dadd(53.9971672985027, -78.7171999124221, -20.185622333117, 1.8)
    pt3dadd(54.7279528933092, -79.3508670701336, -20.4394300313083, 1.8)
    pt3dadd(55.4587384881158, -79.984534227845, -20.6932377294995, 1.8)
    pt3dadd(56.1895240829223, -80.6182013855564, -20.9470454276908, 1.8)
    pt3dadd(56.9009133417905, -81.2908641015221, -21.1098651327583, 1.8)
    pt3dadd(57.5838249118103, -82.0207800728427, -21.139096320626, 1.8)
    pt3dadd(58.2667364818301, -82.7506960441633, -21.1683275084938, 1.8)
    pt3dadd(58.9496480518498, -83.480612015484, -21.1975586963615, 1.8)
  }
}
proc shape3d_19() {
  adendIML[11] {
    pt3dadd(59.6325596218696, -84.2105279868046, -21.2267898842292, 1.8)
    pt3dadd(60.2041313321185, -84.9218071847717, -21.4888826759448, 1.8)
    pt3dadd(60.611615355792, -85.6056203428936, -22.0941564447719, 1.8)
    pt3dadd(61.0190993794656, -86.2894335010156, -22.699430213599, 1.8)
    pt3dadd(61.4265834031391, -86.9732466591375, -23.3047039824261, 1.8)
    pt3dadd(62.1031706682869, -87.5643465712818, -23.6518598089232, 1.8)
    pt3dadd(62.9115659978769, -88.110035088775, -23.8725882234354, 1.8)
    pt3dadd(63.6296858084475, -88.5115155820761, -24.2746741615046, 1.8)
    pt3dadd(64.1121108426167, -88.5364922525636, -25.1502552556006, 1.8)
    pt3dadd(64.5945358767858, -88.561468923051, -26.0258363496965, 1.8)
    pt3dadd(65.076960910955, -88.5864455935385, -26.9014174437924, 1.8)
    pt3dadd(65.8074690113176, -89.0123193218568, -27.3954122042993, 1.8)
    pt3dadd(66.5655985551549, -89.4828287264101, -27.8469213348692, 1.8)
    pt3dadd(67.3237280989921, -89.9533381309635, -28.2984304654391, 1.8)
    pt3dadd(68.0818576428293, -90.4238475355168, -28.749939596009, 1.8)
    pt3dadd(68.8399871866666, -90.8943569400702, -29.2014487265789, 1.8)
    pt3dadd(69.4961234311656, -91.4360297342897, -29.6995736975788, 1.8)
    pt3dadd(69.9906691707628, -92.0904484455577, -30.2715532966805, 1.8)
    pt3dadd(70.4852149103599, -92.7448671568258, -30.8435328957823, 1.8)
    pt3dadd(70.9797606499571, -93.3992858680937, -31.4155124948841, 1.8)
    pt3dadd(71.4743063895542, -94.0537045793617, -31.9874920939859, 1.8)
    pt3dadd(72.0095066544925, -94.7778005483348, -32.2618203749465, 1.8)
    pt3dadd(72.5934345882089, -95.5854102296519, -32.1793899747989, 1.8)
    pt3dadd(73.1773625219254, -96.393019910969, -32.0969595746514, 1.8)
    pt3dadd(73.7612904556418, -97.2006295922862, -32.0145291745038, 1.8)
  }
}
proc basic_shape() {
  shape3d_1()
  shape3d_2()
  shape3d_3()
  shape3d_4()
  shape3d_5()
  shape3d_6()
  shape3d_7()
  shape3d_8()
  shape3d_9()
  shape3d_10()
  shape3d_11()
  shape3d_12()
  shape3d_13()
  shape3d_14()
  shape3d_15()
  shape3d_16()
  shape3d_17()
  shape3d_18()
  shape3d_19()
}

objref allreg, allregobj, alladendreg, allaxonreg, sec
objref regaxon
objref regGCL
objref regadendIML
objref regadendMML
objref regadendOML
objref regsoma
objref regaxonh
proc subsets() { local ward
  allregobj = new List()
  allreg = new SectionList()
  alladendreg = new SectionList()
  allaxonreg = new SectionList()
  regaxon = new SectionList()
  for ward = 0, 0 axon[ward] {
    regaxon.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.append()
  }
  regGCL = new SectionList()
  for ward = 0, 10 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 11 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 15 adendMML[ward] {
    regadendMML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendOML = new SectionList()
  for ward = 0, 11 adendOML[ward] {
    regadendOML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regsoma = new SectionList()
  for ward = 0, 2 soma[ward] {
    regsoma.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regaxonh = new SectionList()
  for ward = 0, 0 axonh[ward] {
    regaxonh.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.append()
  }
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access axon
proc init() {
  celldef()
}

endtemplate cell_rat_mGC_Claiborne_09