/*
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_Beining_03

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

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

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

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

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

proc shape3d_1() {
  soma[0] {pt3dclear()
    pt3dadd(-64.5741996836713, -1369.296, 121.5, 12.336)
    pt3dadd(-64.5740996836713, -1369.296, 121.5, 12.336)
  }
  soma[1] {pt3dclear()
    pt3dadd(-64.5740996836713, -1369.296, 121.5, 12.2546683349653)
    pt3dadd(-65.3869822324604, -1368.71951696795, 121.583001660424, 12.2546683349653)
    pt3dadd(-66.1998647812495, -1368.1430339359, 121.666003320847, 12.0073684044423)
    pt3dadd(-67.0127473300386, -1367.56655090385, 121.749004981271, 11.5834751262305)
    pt3dadd(-67.8256298788277, -1366.9900678718, 121.832006641695, 10.9625223374915)
    pt3dadd(-68.6385124276168, -1366.41358483975, 121.915008302118, 10.1082588015939)
    pt3dadd(-69.4513949764059, -1365.8371018077, 121.998009962542, 8.95415523653683)
    pt3dadd(-70.264277525195, -1365.26061877565, 122.081011622966, 7.36049563548543)
    pt3dadd(-71.0771600739841, -1364.6841357436, 122.164013283389, 4.9170007118161)
  }
  axonh[0] {pt3dclear()
    pt3dadd(-71.0771600739841, -1364.6841357436, 122.164013283389, 2.41474258540178)
    pt3dadd(-71.8900426227733, -1364.10765271155, 122.247014943813, 2.41474258540178)
    pt3dadd(-72.7029251715624, -1363.5311696795, 122.330016604237, 2.05859517655038)
    pt3dadd(-73.5158077203515, -1362.95468664746, 122.41301826466, 1.7670063402947)
    pt3dadd(-74.3286902691406, -1362.37820361541, 122.496019925084, 1.52827359279796)
    pt3dadd(-75.1415728179297, -1361.80172058336, 122.579021585508, 1.33281575065557)
    pt3dadd(-75.9544553667188, -1361.22523755131, 122.662023245932, 1.17278840436334)
    pt3dadd(-76.7673379155079, -1360.64875451926, 122.745024906355, 1.04176909462043)
    pt3dadd(-77.580220464297, -1360.07227148721, 122.828026566779, 0.934499556486861)
    pt3dadd(-78.3931030130861, -1359.49578845516, 122.911028227203, 0.846674686748436)
    pt3dadd(-79.2059855618752, -1358.91930542311, 122.994029887626, 0.774769765008519)
    pt3dadd(-80.0188681106643, -1358.34282239106, 123.07703154805, 0.715898994282384)
    pt3dadd(-80.8317506594534, -1357.76633935901, 123.160033208474, 0.667699683831494)
    pt3dadd(-81.6446332082425, -1357.18985632696, 123.243034868897, 0.628237426088198)
    pt3dadd(-82.4575157570316, -1356.61337329491, 123.326036529321, 0.595928462087872)
    pt3dadd(-83.2703983058207, -1356.03689026286, 123.409038189745, 0.569476119660715)
    pt3dadd(-84.0832808546098, -1355.46040723081, 123.492039850168, 0.547818773424652)
    pt3dadd(-84.8961634033989, -1354.88392419876, 123.575041510592, 0.53008723803113)
    pt3dadd(-85.709045952188, -1354.30744116671, 123.658043171016, 0.515569884705163)
    pt3dadd(-86.5219285009771, -1353.73095813466, 123.741044831439, 0.503684081083894)
    pt3dadd(-87.3348110497662, -1353.15447510261, 123.824046491863, 0.493952808134116)
    pt3dadd(-88.1476935985553, -1352.57799207056, 123.907048152287, 0.485985515703537)
    pt3dadd(-88.9605761473444, -1352.00150903851, 123.99004981271, 0.479462448371856)
    pt3dadd(-89.7734586961335, -1351.42502600646, 124.073051473134, 0.474121812543011)
    pt3dadd(-90.5863412449226, -1350.84854297441, 124.156053133558, 0.469749269748945)
    pt3dadd(-91.3992237937117, -1350.27205994236, 124.239054793982, 0.466169334494294)
    pt3dadd(-92.2121063425008, -1349.69557691032, 124.322056454405, 0.463238331407283)
    pt3dadd(-93.02498889129, -1349.11909387827, 124.405058114829, 0.460838629042581)
    pt3dadd(-93.8378714400791, -1348.54261084622, 124.488059775253, 0.458873918918365)
    pt3dadd(-94.6507539888682, -1347.96612781417, 124.571061435676, 0.457265350318786)
  }
  axon[0] {pt3dclear()
    pt3dadd(-94.6507539888682, -1347.96612781417, 124.571061435676, 0.455948365737875)
    pt3dadd(-95.4636365376573, -1347.38964478212, 124.6540630961, 0.455948365737875)
    pt3dadd(-96.2765190864464, -1346.81316175007, 124.737064756524, 0.454870109960154)
    pt3dadd(-97.0894016352355, -1346.23667871802, 124.820066416947, 0.453987308795249)
    pt3dadd(-97.9022841840246, -1345.66019568597, 124.903068077371, 0.453264532332689)
    pt3dadd(-98.7151667328137, -1345.08371265392, 124.986069737795, 0.45267277301519)
    pt3dadd(-99.5280492816028, -1344.50722962187, 125.069071398218, 0.452188281463533)
    pt3dadd(-100.340931830392, -1343.93074658982, 125.152073058642, 0.451791613330585)
    pt3dadd(-101.153814379181, -1343.35426355777, 125.235074719066, 0.451466848931374)
    pt3dadd(-101.96669692797, -1342.77778052572, 125.318076379489, 0.451200954330236)
    pt3dadd(-102.779579476759, -1342.20129749367, 125.401078039913, 0.450983258243206)
    pt3dadd(-103.592462025548, -1341.62481446162, 125.484079700337, 0.45080502376193)
    pt3dadd(-104.405344574337, -1341.04833142957, 125.56708136076, 0.450659097710851)
    pt3dadd(-105.218227123127, -1340.47184839752, 125.650083021184, 0.450539623565157)
    pt3dadd(-106.031109671916, -1339.89536536547, 125.733084681608, 0.45044180640788)
    pt3dadd(-106.843992220705, -1339.31888233342, 125.816086342031, 0.450361720493038)
    pt3dadd(-107.656874769494, -1338.74239930137, 125.899088002455, 0.450296151691669)
    pt3dadd(-108.469757318283, -1338.16591626932, 125.982089662879, 0.450242468497545)
    pt3dadd(-109.282639867072, -1337.58943323727, 126.065091323303, 0.450198516415593)
    pt3dadd(-110.095522415861, -1337.01295020523, 126.148092983726, 0.450162531494437)
    pt3dadd(-110.90840496465, -1336.43646717318, 126.23109464415, 0.450133069532839)
    pt3dadd(-111.721287513439, -1335.85998414113, 126.314096304574, 0.450108948118833)
    pt3dadd(-112.534170062228, -1335.28350110908, 126.397097964997, 0.450089199175379)
    pt3dadd(-113.347052611018, -1334.70701807703, 126.480099625421, 0.450073030108032)
    pt3dadd(-114.159935159807, -1334.13053504498, 126.563101285845, 0.450059791995346)
    pt3dadd(-114.972817708596, -1333.55405201293, 126.646102946268, 0.450048953545378)
    pt3dadd(-115.785700257385, -1332.97756898088, 126.729104606692, 0.450040079773073)
    pt3dadd(-116.598582806174, -1332.40108594883, 126.812106267116, 0.450032814542791)
    pt3dadd(-117.411465354963, -1331.82460291678, 126.895107927539, 0.450026866275331)
    pt3dadd(-118.224347903752, -1331.24811988473, 126.978109587963, 0.450021996245834)
    pt3dadd(-119.037230452541, -1330.67163685268, 127.061111248387, 0.450018009002917)
    pt3dadd(-119.85011300133, -1330.09515382063, 127.14411290881, 0.45001474452452)
    pt3dadd(-120.66299555012, -1329.51867078858, 127.227114569234, 0.450012071795664)
    pt3dadd(-121.475878098909, -1328.94218775653, 127.310116229658, 0.450009883550355)
    pt3dadd(-122.288760647698, -1328.36570472448, 127.393117890081, 0.450008091966625)
    pt3dadd(-123.101643196487, -1327.78922169243, 127.476119550505, 0.450006625141929)
    pt3dadd(-123.914525745276, -1327.21273866038, 127.559121210929, 0.450005424207441)
    pt3dadd(-124.727408294065, -1326.63625562833, 127.642122871352, 0.450004440965443)
    pt3dadd(-125.540290842854, -1326.05977259628, 127.725124531776, 0.450003635954982)
    pt3dadd(-126.353173391643, -1325.48328956423, 127.8081261922, 0.45000297686816)
    pt3dadd(-127.166055940432, -1324.90680653218, 127.891127852624, 0.450002437253511)
    pt3dadd(-127.978938489221, -1324.33032350014, 127.974129513047, 0.450001995454402)
    pt3dadd(-128.791821038011, -1323.75384046809, 128.057131173471, 0.450001633739885)
    pt3dadd(-129.6047035868, -1323.17735743604, 128.140132833895, 0.450001337593087)
    pt3dadd(-130.417586135589, -1322.60087440399, 128.223134494318, 0.450001095128595)
    pt3dadd(-131.230468684378, -1322.02439137194, 128.306136154742, 0.45000089661546)
    pt3dadd(-132.043351233167, -1321.44790833989, 128.389137815166, 0.45000073408665)
    pt3dadd(-132.856233781956, -1320.87142530784, 128.472139475589, 0.450000601019316)
    pt3dadd(-133.669116330745, -1320.29494227579, 128.555141136013, 0.450000492072997)
    pt3dadd(-134.481998879534, -1319.71845924374, 128.638142796437, 0.450000402875296)
    pt3dadd(-135.294881428323, -1319.14197621169, 128.72114445686, 0.450000329846394)
    pt3dadd(-136.107763977112, -1318.56549317964, 128.804146117284, 0.450000270055387)
    pt3dadd(-136.920646525902, -1317.98901014759, 128.887147777708, 0.45000022110265)
    pt3dadd(-137.733529074691, -1317.41252711554, 128.970149438131, 0.450000181023539)
    pt3dadd(-138.54641162348, -1316.83604408349, 129.053151098555, 0.450000148209539)
    pt3dadd(-139.359294172269, -1316.25956105144, 129.136152758979, 0.450000121343707)
    pt3dadd(-140.172176721058, -1315.68307801939, 129.219154419402, 0.450000099347825)
    pt3dadd(-140.985059269847, -1315.10659498734, 129.302156079826, 0.450000081339119)
    pt3dadd(-141.797941818636, -1314.53011195529, 129.38515774025, 0.450000066594838)
    pt3dadd(-142.610824367425, -1313.95362892324, 129.468159400673, 0.450000054523242)
    pt3dadd(-143.423706916214, -1313.37714589119, 129.551161061097, 0.450000044639855)
    pt3dadd(-144.236589465004, -1312.80066285914, 129.634162721521, 0.450000036548022)
    pt3dadd(-145.049472013793, -1312.22417982709, 129.717164381944, 0.45000002992299)
    pt3dadd(-145.862354562582, -1311.64769679505, 129.800166042368, 0.450000024498872)
    pt3dadd(-146.675237111371, -1311.071213763, 129.883167702792, 0.45000002005798)
    pt3dadd(-147.48811966016, -1310.49473073095, 129.966169363216, 0.450000016422085)
    pt3dadd(-148.301002208949, -1309.9182476989, 130.049171023639, 0.450000013445266)
    pt3dadd(-149.113884757738, -1309.34176466685, 130.132172684063, 0.450000011008053)
    pt3dadd(-149.926767306527, -1308.7652816348, 130.215174344487, 0.450000009012631)
    pt3dadd(-150.739649855316, -1308.18879860275, 130.29817600491, 0.450000007378918)
    pt3dadd(-151.552532404105, -1307.6123155707, 130.381177665334, 0.450000006041347)
    pt3dadd(-152.365414952895, -1307.03583253865, 130.464179325758, 0.450000004946237)
    pt3dadd(-153.178297501684, -1306.4593495066, 130.547180986181, 0.450000004049636)
    pt3dadd(-153.991180050473, -1305.88286647455, 130.630182646605, 0.450000003315562)
    pt3dadd(-154.804062599262, -1305.3063834425, 130.713184307029, 0.450000002714552)
    pt3dadd(-155.616945148051, -1304.72990041045, 130.796185967452, 0.450000002222488)
    pt3dadd(-156.42982769684, -1304.1534173784, 130.879187627876, 0.450000001819619)
    pt3dadd(-157.242710245629, -1303.57693434635, 130.9621892883, 0.450000001489778)
    pt3dadd(-158.055592794418, -1303.0004513143, 131.045190948723, 0.450000001219727)
    pt3dadd(-158.868475343207, -1302.42396828225, 131.128192609147, 0.450000000998628)
    pt3dadd(-159.681357891997, -1301.8474852502, 131.211194269571, 0.450000000817607)
    pt3dadd(-160.494240440786, -1301.27100221815, 131.294195929994, 0.4500000006694)
    pt3dadd(-161.307122989575, -1300.6945191861, 131.377197590418, 0.450000000548059)
    pt3dadd(-162.120005538364, -1300.11803615405, 131.460199250842, 0.450000000448713)
    pt3dadd(-162.932888087153, -1299.541553122, 131.543200911266, 0.450000000367375)
    pt3dadd(-163.745770635942, -1298.96507008996, 131.626202571689, 0.450000000300781)
    pt3dadd(-164.558653184731, -1298.38858705791, 131.709204232113, 0.450000000246259)
    pt3dadd(-165.37153573352, -1297.81210402586, 131.792205892537, 0.45000000020162)
    pt3dadd(-166.184418282309, -1297.23562099381, 131.87520755296, 0.450000000165072)
    pt3dadd(-166.997300831098, -1296.65913796176, 131.958209213384, 0.45000000013515)
    pt3dadd(-167.810183379888, -1296.08265492971, 132.041210873808, 0.450000000110651)
    pt3dadd(-168.623065928677, -1295.50617189766, 132.124212534231, 0.450000000090593)
    pt3dadd(-169.435948477466, -1294.92968886561, 132.207214194655, 0.450000000074172)
    pt3dadd(-170.248831026255, -1294.35320583356, 132.290215855079, 0.450000000060727)
    pt3dadd(-171.061713575044, -1293.77672280151, 132.373217515502, 0.450000000049719)
    pt3dadd(-171.874596123833, -1293.20023976946, 132.456219175926, 0.450000000040706)
    pt3dadd(-172.687478672622, -1292.62375673741, 132.53922083635, 0.450000000033328)
    pt3dadd(-173.500361221411, -1292.04727370536, 132.622222496773, 0.450000000027286)
    pt3dadd(-174.3132437702, -1291.47079067331, 132.705224157197, 0.45000000002234)
    pt3dadd(-175.126126318989, -1290.89430764126, 132.788225817621, 0.450000000018291)
    pt3dadd(-175.939008867779, -1290.31782460921, 132.871227478044, 0.450000000014975)
    pt3dadd(-176.751891416568, -1289.74134157716, 132.954229138468, 0.45000000001226)
    pt3dadd(-177.564773965357, -1289.16485854511, 133.037230798892, 0.450000000010038)
    pt3dadd(-178.377656514146, -1288.58837551306, 133.120232459315, 0.450000000008218)
    pt3dadd(-179.190539062935, -1288.01189248101, 133.203234119739, 0.450000000006729)
    pt3dadd(-180.003421611724, -1287.43540944896, 133.286235780163, 0.450000000005509)
    pt3dadd(-180.816304160513, -1286.85892641691, 133.369237440586, 0.45000000000451)
    pt3dadd(-181.629186709302, -1286.28244338487, 133.45223910101, 0.450000000003693)
    pt3dadd(-182.442069258091, -1285.70596035282, 133.535240761434, 0.450000000003023)
    pt3dadd(-183.254951806881, -1285.12947732077, 133.618242421858, 0.450000000002475)
    pt3dadd(-184.06783435567, -1284.55299428872, 133.701244082281, 0.450000000002027)
    pt3dadd(-184.880716904459, -1283.97651125667, 133.784245742705, 0.450000000001659)
    pt3dadd(-185.693599453248, -1283.40002822462, 133.867247403129, 0.450000000001359)
    pt3dadd(-186.506482002037, -1282.82354519257, 133.950249063552, 0.450000000001112)
    pt3dadd(-187.319364550826, -1282.24706216052, 134.033250723976, 0.450000000000911)
    pt3dadd(-188.132247099615, -1281.67057912847, 134.1162523844, 0.450000000000746)
    pt3dadd(-188.945129648404, -1281.09409609642, 134.199254044823, 0.45000000000061)
    pt3dadd(-189.758012197193, -1280.51761306437, 134.282255705247, 0.4500000000005)
    pt3dadd(-190.570894745982, -1279.94113003232, 134.365257365671, 0.450000000000409)
    pt3dadd(-191.383777294772, -1279.36464700027, 134.448259026094, 0.450000000000335)
    pt3dadd(-192.196659843561, -1278.78816396822, 134.531260686518, 0.450000000000274)
    pt3dadd(-193.00954239235, -1278.21168093617, 134.614262346942, 0.450000000000225)
    pt3dadd(-193.822424941139, -1277.63519790412, 134.697264007365, 0.450000000000184)
    pt3dadd(-194.635307489928, -1277.05871487207, 134.780265667789, 0.450000000000151)
    pt3dadd(-195.448190038717, -1276.48223184002, 134.863267328213, 0.450000000000123)
    pt3dadd(-196.261072587506, -1275.90574880797, 134.946268988636, 0.450000000000101)
    pt3dadd(-197.073955136295, -1275.32926577592, 135.02927064906, 0.450000000000083)
    pt3dadd(-197.886837685084, -1274.75278274387, 135.112272309484, 0.450000000000068)
    pt3dadd(-198.699720233874, -1274.17629971182, 135.195273969908, 0.450000000000055)
    pt3dadd(-199.512602782663, -1273.59981667977, 135.278275630331, 0.450000000000045)
    pt3dadd(-200.325485331452, -1273.02333364773, 135.361277290755, 0.450000000000037)
    pt3dadd(-201.138367880241, -1272.44685061568, 135.444278951179, 0.45000000000003)
    pt3dadd(-201.95125042903, -1271.87036758363, 135.527280611602, 0.450000000000025)
    pt3dadd(-202.764132977819, -1271.29388455158, 135.610282272026, 0.45000000000002)
    pt3dadd(-203.577015526608, -1270.71740151953, 135.69328393245, 0.450000000000017)
    pt3dadd(-204.389898075397, -1270.14091848748, 135.776285592873, 0.450000000000014)
    pt3dadd(-205.202780624186, -1269.56443545543, 135.859287253297, 0.450000000000011)
    pt3dadd(-206.015663172975, -1268.98795242338, 135.942288913721, 0.450000000000009)
    pt3dadd(-206.828545721765, -1268.41146939133, 136.025290574144, 0.450000000000008)
    pt3dadd(-207.641428270554, -1267.83498635928, 136.108292234568, 0.450000000000006)
    pt3dadd(-208.454310819343, -1267.25850332723, 136.191293894992, 0.450000000000005)
    pt3dadd(-209.267193368132, -1266.68202029518, 136.274295555415, 0.450000000000004)
    pt3dadd(-210.080075916921, -1266.10553726313, 136.357297215839, 0.450000000000003)
    pt3dadd(-210.89295846571, -1265.52905423108, 136.440298876263, 0.450000000000003)
    pt3dadd(-211.705841014499, -1264.95257119903, 136.523300536686, 0.450000000000002)
    pt3dadd(-212.518723563288, -1264.37608816698, 136.60630219711, 0.450000000000002)
    pt3dadd(-213.331606112077, -1263.79960513493, 136.689303857534, 0.450000000000002)
    pt3dadd(-214.144488660867, -1263.22312210288, 136.772305517957, 0.450000000000001)
    pt3dadd(-214.957371209656, -1262.64663907083, 136.855307178381, 0.450000000000001)
    pt3dadd(-215.770253758445, -1262.07015603878, 136.938308838805, 0.450000000000001)
    pt3dadd(-216.583136307234, -1261.49367300673, 137.021310499228, 0.450000000000001)
    pt3dadd(-217.396018856023, -1260.91718997468, 137.104312159652, 0.450000000000001)
    pt3dadd(-218.208901404812, -1260.34070694264, 137.187313820076, 0.45)
    pt3dadd(-219.021783953601, -1259.76422391059, 137.2703154805, 0.45)
    pt3dadd(-219.83466650239, -1259.18774087854, 137.353317140923, 0.45)
    pt3dadd(-220.647549051179, -1258.61125784649, 137.436318801347, 0.45)
    pt3dadd(-221.460431599968, -1258.03477481444, 137.519320461771, 0.45)
    pt3dadd(-222.273314148758, -1257.45829178239, 137.602322122194, 0.45)
    pt3dadd(-223.086196697547, -1256.88180875034, 137.685323782618, 0.45)
    pt3dadd(-223.899079246336, -1256.30532571829, 137.768325443042, 0.45)
    pt3dadd(-224.711961795125, -1255.72884268624, 137.851327103465, 0.45)
    pt3dadd(-225.524844343914, -1255.15235965419, 137.934328763889, 0.45)
    pt3dadd(-226.337726892703, -1254.57587662214, 138.017330424313, 0.45)
    pt3dadd(-227.150609441492, -1253.99939359009, 138.100332084736, 0.45)
    pt3dadd(-227.963491990281, -1253.42291055804, 138.18333374516, 0.45)
    pt3dadd(-228.77637453907, -1252.84642752599, 138.266335405584, 0.45)
    pt3dadd(-229.589257087859, -1252.26994449394, 138.349337066007, 0.45)
    pt3dadd(-230.402139636649, -1251.69346146189, 138.432338726431, 0.45)
    pt3dadd(-231.215022185438, -1251.11697842984, 138.515340386855, 0.45)
    pt3dadd(-232.027904734227, -1250.54049539779, 138.598342047278, 0.45)
    pt3dadd(-232.840787283016, -1249.96401236574, 138.681343707702, 0.45)
    pt3dadd(-233.653669831805, -1249.38752933369, 138.764345368126, 0.45)
    pt3dadd(-234.466552380594, -1248.81104630164, 138.84734702855, 0.45)
    pt3dadd(-235.279434929383, -1248.23456326959, 138.930348688973, 0.45)
    pt3dadd(-236.092317478172, -1247.65808023755, 139.013350349397, 0.45)
    pt3dadd(-236.905200026961, -1247.0815972055, 139.096352009821, 0.45)
    pt3dadd(-237.718082575751, -1246.50511417345, 139.179353670244, 0.45)
    pt3dadd(-238.53096512454, -1245.9286311414, 139.262355330668, 0.45)
    pt3dadd(-239.343847673329, -1245.35214810935, 139.345356991092, 0.45)
    pt3dadd(-240.156730222118, -1244.7756650773, 139.428358651515, 0.45)
    pt3dadd(-240.969612770907, -1244.19918204525, 139.511360311939, 0.45)
    pt3dadd(-241.782495319696, -1243.6226990132, 139.594361972363, 0.45)
    pt3dadd(-242.595377868485, -1243.04621598115, 139.677363632786, 0.45)
    pt3dadd(-243.408260417274, -1242.4697329491, 139.76036529321, 0.45)
    pt3dadd(-244.221142966063, -1241.89324991705, 139.843366953634, 0.45)
    pt3dadd(-245.034025514852, -1241.316766885, 139.926368614057, 0.45)
    pt3dadd(-245.846908063642, -1240.74028385295, 140.009370274481, 0.45)
    pt3dadd(-246.659790612431, -1240.1638008209, 140.092371934905, 0.45)
    pt3dadd(-247.47267316122, -1239.58731778885, 140.175373595328, 0.45)
    pt3dadd(-248.285555710009, -1239.0108347568, 140.258375255752, 0.45)
    pt3dadd(-249.098438258798, -1238.43435172475, 140.341376916176, 0.45)
    pt3dadd(-249.911320807587, -1237.8578686927, 140.424378576599, 0.45)
    pt3dadd(-250.724203356376, -1237.28138566065, 140.507380237023, 0.45)
    pt3dadd(-251.537085905165, -1236.7049026286, 140.590381897447, 0.45)
    pt3dadd(-252.349968453954, -1236.12841959655, 140.67338355787, 0.45)
    pt3dadd(-253.162851002744, -1235.5519365645, 140.756385218294, 0.45)
    pt3dadd(-253.975733551533, -1234.97545353246, 140.839386878718, 0.45)
    pt3dadd(-254.788616100322, -1234.39897050041, 140.922388539142, 0.45)
    pt3dadd(-255.601498649111, -1233.82248746836, 141.005390199565, 0.45)
    pt3dadd(-256.4143811979, -1233.24600443631, 141.088391859989, 0.45)
    pt3dadd(-257.227263746689, -1232.66952140426, 141.171393520413, 0.45)
    pt3dadd(-258.040146295478, -1232.09303837221, 141.254395180836, 0.45)
    pt3dadd(-258.853028844267, -1231.51655534016, 141.33739684126, 0.45)
    pt3dadd(-259.665911393056, -1230.94007230811, 141.420398501684, 0.45)
    pt3dadd(-260.478793941845, -1230.36358927606, 141.503400162107, 0.45)
    pt3dadd(-261.291676490635, -1229.78710624401, 141.586401822531, 0.45)
    pt3dadd(-262.104559039424, -1229.21062321196, 141.669403482955, 0.45)
    pt3dadd(-262.917441588213, -1228.63414017991, 141.752405143378, 0.45)
  }
}
proc shape3d_2() {
  axon[0] {
    pt3dadd(-263.730324137002, -1228.05765714786, 141.835406803802, 0.45)
    pt3dadd(-264.543206685791, -1227.48117411581, 141.918408464226, 0.45)
    pt3dadd(-265.35608923458, -1226.90469108376, 142.001410124649, 0.45)
    pt3dadd(-266.168971783369, -1226.32820805171, 142.084411785073, 0.45)
    pt3dadd(-266.981854332158, -1225.75172501966, 142.167413445497, 0.45)
    pt3dadd(-267.794736880947, -1225.17524198761, 142.25041510592, 0.45)
    pt3dadd(-268.607619429736, -1224.59875895556, 142.333416766344, 0.45)
    pt3dadd(-269.420501978526, -1224.02227592351, 142.416418426768, 0.45)
    pt3dadd(-270.233384527315, -1223.44579289146, 142.499420087191, 0.45)
    pt3dadd(-271.046267076104, -1222.86930985941, 142.582421747615, 0.45)
    pt3dadd(-271.859149624893, -1222.29282682736, 142.665423408039, 0.45)
    pt3dadd(-272.672032173682, -1221.71634379532, 142.748425068463, 0.45)
    pt3dadd(-273.484914722471, -1221.13986076327, 142.831426728886, 0.45)
    pt3dadd(-274.29779727126, -1220.56337773122, 142.91442838931, 0.45)
    pt3dadd(-275.110679820049, -1219.98689469917, 142.997430049734, 0.45)
    pt3dadd(-275.923562368838, -1219.41041166712, 143.080431710157, 0.45)
    pt3dadd(-276.736444917628, -1218.83392863507, 143.163433370581, 0.45)
    pt3dadd(-277.549327466417, -1218.25744560302, 143.246435031005, 0.45)
    pt3dadd(-278.362210015206, -1217.68096257097, 143.329436691428, 0.45)
    pt3dadd(-279.175092563995, -1217.10447953892, 143.412438351852, 0.45)
    pt3dadd(-279.987975112784, -1216.52799650687, 143.495440012276, 0.45)
    pt3dadd(-280.800857661573, -1215.95151347482, 143.578441672699, 0.45)
    pt3dadd(-281.613740210362, -1215.37503044277, 143.661443333123, 0.45)
    pt3dadd(-282.426622759151, -1214.79854741072, 143.744444993547, 0.45)
    pt3dadd(-283.23950530794, -1214.22206437867, 143.82744665397, 0.45)
    pt3dadd(-284.052387856729, -1213.64558134662, 143.910448314394, 0.45)
    pt3dadd(-284.865270405519, -1213.06909831457, 143.993449974818, 0.45)
    pt3dadd(-285.678152954308, -1212.49261528252, 144.076451635241, 0.45)
    pt3dadd(-286.491035503097, -1211.91613225047, 144.159453295665, 0.45)
    pt3dadd(-287.303918051886, -1211.33964921842, 144.242454956089, 0.45)
    pt3dadd(-288.116800600675, -1210.76316618637, 144.325456616513, 0.45)
    pt3dadd(-288.929683149464, -1210.18668315432, 144.408458276936, 0.45)
    pt3dadd(-289.742565698253, -1209.61020012227, 144.49145993736, 0.45)
    pt3dadd(-290.555448247042, -1209.03371709023, 144.574461597784, 0.45)
    pt3dadd(-291.368330795831, -1208.45723405818, 144.657463258207, 0.45)
    pt3dadd(-292.18121334462, -1207.88075102613, 144.740464918631, 0.45)
    pt3dadd(-292.99409589341, -1207.30426799408, 144.823466579055, 0.45)
    pt3dadd(-293.806978442199, -1206.72778496203, 144.906468239478, 0.45)
    pt3dadd(-294.619860990988, -1206.15130192998, 144.989469899902, 0.45)
    pt3dadd(-295.432743539777, -1205.57481889793, 145.072471560326, 0.45)
    pt3dadd(-296.245626088566, -1204.99833586588, 145.155473220749, 0.45)
    pt3dadd(-297.058508637355, -1204.42185283383, 145.238474881173, 0.45)
    pt3dadd(-297.871391186144, -1203.84536980178, 145.321476541597, 0.45)
    pt3dadd(-298.684273734933, -1203.26888676973, 145.40447820202, 0.45)
    pt3dadd(-299.497156283722, -1202.69240373768, 145.487479862444, 0.45)
    pt3dadd(-300.310038832512, -1202.11592070563, 145.570481522868, 0.45)
    pt3dadd(-301.122921381301, -1201.53943767358, 145.653483183291, 0.45)
    pt3dadd(-301.93580393009, -1200.96295464153, 145.736484843715, 0.45)
    pt3dadd(-302.748686478879, -1200.38647160948, 145.819486504139, 0.45)
    pt3dadd(-303.561569027668, -1199.80998857743, 145.902488164562, 0.45)
    pt3dadd(-304.374451576457, -1199.23350554538, 145.985489824986, 0.45)
    pt3dadd(-305.187334125246, -1198.65702251333, 146.06849148541, 0.45)
    pt3dadd(-306.000216674035, -1198.08053948128, 146.151493145833, 0.45)
    pt3dadd(-306.813099222824, -1197.50405644923, 146.234494806257, 0.45)
    pt3dadd(-307.625981771614, -1196.92757341718, 146.317496466681, 0.45)
    pt3dadd(-308.438864320403, -1196.35109038514, 146.400498127105, 0.45)
    pt3dadd(-309.251746869192, -1195.77460735309, 146.483499787528, 0.45)
    pt3dadd(-310.064629417981, -1195.19812432104, 146.566501447952, 0.45)
    pt3dadd(-310.87751196677, -1194.62164128899, 146.649503108376, 0.45)
    pt3dadd(-311.690394515559, -1194.04515825694, 146.732504768799, 0.45)
    pt3dadd(-312.503277064348, -1193.46867522489, 146.815506429223, 0.45)
    pt3dadd(-313.316159613137, -1192.89219219284, 146.898508089647, 0.45)
    pt3dadd(-314.129042161926, -1192.31570916079, 146.98150975007, 0.45)
    pt3dadd(-314.941924710715, -1191.73922612874, 147.064511410494, 0.45)
    pt3dadd(-315.754807259505, -1191.16274309669, 147.147513070918, 0.45)
    pt3dadd(-316.567689808294, -1190.58626006464, 147.230514731341, 0.45)
    pt3dadd(-317.380572357083, -1190.00977703259, 147.313516391765, 0.45)
    pt3dadd(-318.193454905872, -1189.43329400054, 147.396518052189, 0.45)
    pt3dadd(-319.006337454661, -1188.85681096849, 147.479519712612, 0.45)
    pt3dadd(-319.81922000345, -1188.28032793644, 147.562521373036, 0.45)
    pt3dadd(-320.632102552239, -1187.70384490439, 147.64552303346, 0.45)
    pt3dadd(-321.444985101028, -1187.12736187234, 147.728524693883, 0.45)
    pt3dadd(-322.257867649817, -1186.55087884029, 147.811526354307, 0.45)
    pt3dadd(-323.070750198606, -1185.97439580824, 147.894528014731, 0.45)
    pt3dadd(-323.883632747396, -1185.39791277619, 147.977529675155, 0.45)
    pt3dadd(-324.696515296185, -1184.82142974414, 148.060531335578, 0.45)
    pt3dadd(-325.509397844974, -1184.24494671209, 148.143532996002, 0.45)
    pt3dadd(-326.322280393763, -1183.66846368005, 148.226534656426, 0.45)
    pt3dadd(-327.135162942552, -1183.091980648, 148.309536316849, 0.45)
    pt3dadd(-327.948045491341, -1182.51549761595, 148.392537977273, 0.45)
    pt3dadd(-328.76092804013, -1181.9390145839, 148.475539637697, 0.45)
    pt3dadd(-329.573810588919, -1181.36253155185, 148.55854129812, 0.45)
    pt3dadd(-330.386693137708, -1180.7860485198, 148.641542958544, 0.45)
    pt3dadd(-331.199575686498, -1180.20956548775, 148.724544618968, 0.45)
    pt3dadd(-332.012458235287, -1179.6330824557, 148.807546279391, 0.45)
    pt3dadd(-332.825340784076, -1179.05659942365, 148.890547939815, 0.45)
    pt3dadd(-333.638223332865, -1178.4801163916, 148.973549600239, 0.45)
    pt3dadd(-334.451105881654, -1177.90363335955, 149.056551260662, 0.45)
    pt3dadd(-335.263988430443, -1177.3271503275, 149.139552921086, 0.45)
    pt3dadd(-336.076870979232, -1176.75066729545, 149.22255458151, 0.45)
    pt3dadd(-336.889753528021, -1176.1741842634, 149.305556241933, 0.45)
    pt3dadd(-337.70263607681, -1175.59770123135, 149.388557902357, 0.45)
    pt3dadd(-338.515518625599, -1175.0212181993, 149.471559562781, 0.45)
    pt3dadd(-339.328401174389, -1174.44473516725, 149.554561223204, 0.45)
    pt3dadd(-340.141283723178, -1173.8682521352, 149.637562883628, 0.45)
    pt3dadd(-340.954166271967, -1173.29176910315, 149.720564544052, 0.45)
    pt3dadd(-341.767048820756, -1172.7152860711, 149.803566204475, 0.45)
    pt3dadd(-342.579931369545, -1172.13880303905, 149.886567864899, 0.45)
    pt3dadd(-343.392813918334, -1171.562320007, 149.969569525323, 0.45)
    pt3dadd(-344.205696467123, -1170.98583697496, 150.052571185747, 0.45)
    pt3dadd(-345.018579015912, -1170.40935394291, 150.13557284617, 0.45)
    pt3dadd(-345.831461564701, -1169.83287091086, 150.218574506594, 0.45)
    pt3dadd(-346.64434411349, -1169.25638787881, 150.301576167018, 0.45)
    pt3dadd(-347.45722666228, -1168.67990484676, 150.384577827441, 0.45)
    pt3dadd(-348.270109211069, -1168.10342181471, 150.467579487865, 0.45)
    pt3dadd(-349.082991759858, -1167.52693878266, 150.550581148289, 0.45)
    pt3dadd(-349.895874308647, -1166.95045575061, 150.633582808712, 0.45)
    pt3dadd(-350.708756857436, -1166.37397271856, 150.716584469136, 0.45)
    pt3dadd(-351.521639406225, -1165.79748968651, 150.79958612956, 0.45)
    pt3dadd(-352.334521955014, -1165.22100665446, 150.882587789983, 0.45)
    pt3dadd(-353.147404503803, -1164.64452362241, 150.965589450407, 0.45)
    pt3dadd(-353.960287052592, -1164.06804059036, 151.048591110831, 0.45)
    pt3dadd(-354.773169601382, -1163.49155755831, 151.131592771254, 0.45)
    pt3dadd(-355.586052150171, -1162.91507452626, 151.214594431678, 0.45)
    pt3dadd(-356.39893469896, -1162.33859149421, 151.297596092102, 0.45)
    pt3dadd(-357.211817247749, -1161.76210846216, 151.380597752525, 0.45)
    pt3dadd(-358.024699796538, -1161.18562543011, 151.463599412949, 0.45)
    pt3dadd(-358.837582345327, -1160.60914239806, 151.546601073373, 0.45)
    pt3dadd(-359.650464894116, -1160.03265936601, 151.629602733797, 0.45)
    pt3dadd(-360.463347442905, -1159.45617633396, 151.71260439422, 0.45)
    pt3dadd(-361.276229991694, -1158.87969330191, 151.795606054644, 0.45)
    pt3dadd(-362.089112540483, -1158.30321026987, 151.878607715068, 0.45)
    pt3dadd(-362.901995089273, -1157.72672723782, 151.961609375491, 0.45)
    pt3dadd(-363.714877638062, -1157.15024420577, 152.044611035915, 0.45)
    pt3dadd(-364.527760186851, -1156.57376117372, 152.127612696339, 0.45)
    pt3dadd(-365.34064273564, -1155.99727814167, 152.210614356762, 0.45)
    pt3dadd(-366.153525284429, -1155.42079510962, 152.293616017186, 0.45)
    pt3dadd(-366.966407833218, -1154.84431207757, 152.37661767761, 0.45)
    pt3dadd(-367.779290382007, -1154.26782904552, 152.459619338033, 0.45)
    pt3dadd(-368.592172930796, -1153.69134601347, 152.542620998457, 0.45)
    pt3dadd(-369.405055479585, -1153.11486298142, 152.625622658881, 0.45)
    pt3dadd(-370.217938028375, -1152.53837994937, 152.708624319304, 0.45)
    pt3dadd(-371.030820577164, -1151.96189691732, 152.791625979728, 0.45)
    pt3dadd(-371.843703125953, -1151.38541388527, 152.874627640152, 0.45)
    pt3dadd(-372.656585674742, -1150.80893085322, 152.957629300575, 0.45)
    pt3dadd(-373.469468223531, -1150.23244782117, 153.040630960999, 0.45)
    pt3dadd(-374.28235077232, -1149.65596478912, 153.123632621423, 0.45)
    pt3dadd(-375.095233321109, -1149.07948175707, 153.206634281846, 0.45)
    pt3dadd(-375.908115869898, -1148.50299872502, 153.28963594227, 0.45)
    pt3dadd(-376.720998418687, -1147.92651569297, 153.372637602694, 0.45)
    pt3dadd(-377.533880967476, -1147.35003266092, 153.455639263117, 0.45)
    pt3dadd(-378.346763516266, -1146.77354962887, 153.538640923541, 0.45)
    pt3dadd(-379.159646065055, -1146.19706659682, 153.621642583965, 0.45)
    pt3dadd(-379.972528613844, -1145.62058356478, 153.704644244389, 0.45)
    pt3dadd(-380.785411162633, -1145.04410053273, 153.787645904812, 0.45)
    pt3dadd(-381.598293711422, -1144.46761750068, 153.870647565236, 0.45)
    pt3dadd(-382.411176260211, -1143.89113446863, 153.95364922566, 0.45)
    pt3dadd(-383.224058809, -1143.31465143658, 154.036650886083, 0.45)
    pt3dadd(-384.036941357789, -1142.73816840453, 154.119652546507, 0.45)
    pt3dadd(-384.849823906578, -1142.16168537248, 154.202654206931, 0.45)
    pt3dadd(-385.662706455367, -1141.58520234043, 154.285655867354, 0.45)
    pt3dadd(-386.475589004157, -1141.00871930838, 154.368657527778, 0.45)
    pt3dadd(-387.288471552946, -1140.43223627633, 154.451659188202, 0.45)
    pt3dadd(-388.101354101735, -1139.85575324428, 154.534660848625, 0.45)
    pt3dadd(-388.914236650524, -1139.27927021223, 154.617662509049, 0.45)
    pt3dadd(-389.727119199313, -1138.70278718018, 154.700664169473, 0.45)
    pt3dadd(-390.540001748102, -1138.12630414813, 154.783665829896, 0.45)
    pt3dadd(-391.352884296891, -1137.54982111608, 154.86666749032, 0.45)
    pt3dadd(-392.16576684568, -1136.97333808403, 154.949669150744, 0.45)
    pt3dadd(-392.978649394469, -1136.39685505198, 155.032670811167, 0.45)
    pt3dadd(-393.791531943259, -1135.82037201993, 155.115672471591, 0.45)
    pt3dadd(-394.604414492048, -1135.24388898788, 155.198674132015, 0.45)
    pt3dadd(-395.417297040837, -1134.66740595583, 155.281675792438, 0.45)
    pt3dadd(-396.230179589626, -1134.09092292378, 155.364677452862, 0.45)
    pt3dadd(-397.043062138415, -1133.51443989173, 155.447679113286, 0.45)
    pt3dadd(-397.855944687204, -1132.93795685968, 155.53068077371, 0.45)
    pt3dadd(-398.668827235993, -1132.36147382764, 155.613682434133, 0.45)
    pt3dadd(-399.481709784782, -1131.78499079559, 155.696684094557, 0.45)
    pt3dadd(-400.294592333571, -1131.20850776354, 155.779685754981, 0.45)
    pt3dadd(-401.10747488236, -1130.63202473149, 155.862687415404, 0.45)
    pt3dadd(-401.92035743115, -1130.05554169944, 155.945689075828, 0.45)
    pt3dadd(-402.733239979939, -1129.47905866739, 156.028690736252, 0.45)
    pt3dadd(-403.546122528728, -1128.90257563534, 156.111692396675, 0.45)
    pt3dadd(-404.359005077517, -1128.32609260329, 156.194694057099, 0.45)
    pt3dadd(-405.171887626306, -1127.74960957124, 156.277695717523, 0.45)
    pt3dadd(-405.984770175095, -1127.17312653919, 156.360697377946, 0.45)
    pt3dadd(-406.797652723884, -1126.59664350714, 156.44369903837, 0.45)
    pt3dadd(-407.610535272673, -1126.02016047509, 156.526700698794, 0.45)
    pt3dadd(-408.423417821462, -1125.44367744304, 156.609702359217, 0.45)
    pt3dadd(-409.236300370252, -1124.86719441099, 156.692704019641, 0.45)
    pt3dadd(-410.049182919041, -1124.29071137894, 156.775705680065, 0.45)
    pt3dadd(-410.86206546783, -1123.71422834689, 156.858707340488, 0.45)
    pt3dadd(-411.674948016619, -1123.13774531484, 156.941709000912, 0.45)
    pt3dadd(-412.487830565408, -1122.56126228279, 157.024710661336, 0.45)
    pt3dadd(-413.300713114197, -1121.98477925074, 157.107712321759, 0.45)
    pt3dadd(-414.113595662986, -1121.40829621869, 157.190713982183, 0.45)
    pt3dadd(-414.926478211775, -1120.83181318664, 157.273715642607, 0.45)
    pt3dadd(-415.739360760564, -1120.25533015459, 157.356717303031, 0.45)
    pt3dadd(-416.552243309353, -1119.67884712255, 157.439718963454, 0.45)
    pt3dadd(-417.365125858143, -1119.1023640905, 157.522720623878, 0.45)
    pt3dadd(-418.178008406932, -1118.52588105845, 157.605722284302, 0.45)
    pt3dadd(-418.990890955721, -1117.9493980264, 157.688723944725, 0.45)
    pt3dadd(-419.80377350451, -1117.37291499435, 157.771725605149, 0.45)
    pt3dadd(-420.616656053299, -1116.7964319623, 157.854727265573, 0.45)
    pt3dadd(-421.429538602088, -1116.21994893025, 157.937728925996, 0.45)
    pt3dadd(-422.242421150877, -1115.6434658982, 158.02073058642, 0.45)
    pt3dadd(-423.055303699666, -1115.06698286615, 158.103732246844, 0.45)
    pt3dadd(-423.868186248455, -1114.4904998341, 158.186733907267, 0.45)
    pt3dadd(-424.681068797245, -1113.91401680205, 158.269735567691, 0.45)
    pt3dadd(-425.493951346034, -1113.33753377, 158.352737228115, 0.45)
    pt3dadd(-426.306833894823, -1112.76105073795, 158.435738888538, 0.45)
    pt3dadd(-427.119716443612, -1112.1845677059, 158.518740548962, 0.45)
    pt3dadd(-427.932598992401, -1111.60808467385, 158.601742209386, 0.45)
    pt3dadd(-428.74548154119, -1111.0316016418, 158.684743869809, 0.45)
    pt3dadd(-429.558364089979, -1110.45511860975, 158.767745530233, 0.45)
    pt3dadd(-430.371246638768, -1109.8786355777, 158.850747190657, 0.45)
    pt3dadd(-431.184129187557, -1109.30215254565, 158.933748851081, 0.45)
    pt3dadd(-431.997011736346, -1108.7256695136, 159.016750511504, 0.45)
    pt3dadd(-432.809894285136, -1108.14918648155, 159.099752171928, 0.45)
    pt3dadd(-433.622776833925, -1107.5727034495, 159.182753832352, 0.45)
    pt3dadd(-434.435659382714, -1106.99622041746, 159.265755492775, 0.45)
    pt3dadd(-435.248541931503, -1106.41973738541, 159.348757153199, 0.45)
    pt3dadd(-436.061424480292, -1105.84325435336, 159.431758813623, 0.45)
    pt3dadd(-436.874307029081, -1105.26677132131, 159.514760474046, 0.45)
    pt3dadd(-437.68718957787, -1104.69028828926, 159.59776213447, 0.45)
    pt3dadd(-438.500072126659, -1104.11380525721, 159.680763794894, 0.45)
    pt3dadd(-439.312954675448, -1103.53732222516, 159.763765455317, 0.45)
    pt3dadd(-440.125837224238, -1102.96083919311, 159.846767115741, 0.45)
    pt3dadd(-440.938719773027, -1102.38435616106, 159.929768776165, 0.45)
    pt3dadd(-441.751602321816, -1101.80787312901, 160.012770436588, 0.45)
    pt3dadd(-442.564484870605, -1101.23139009696, 160.095772097012, 0.45)
    pt3dadd(-443.377367419394, -1100.65490706491, 160.178773757436, 0.45)
    pt3dadd(-444.190249968183, -1100.07842403286, 160.261775417859, 0.45)
    pt3dadd(-445.003132516972, -1099.50194100081, 160.344777078283, 0.45)
    pt3dadd(-445.816015065761, -1098.92545796876, 160.427778738707, 0.45)
    pt3dadd(-446.62889761455, -1098.34897493671, 160.51078039913, 0.45)
    pt3dadd(-447.441780163339, -1097.77249190466, 160.593782059554, 0.45)
    pt3dadd(-448.254662712128, -1097.19600887261, 160.676783719978, 0.45)
    pt3dadd(-449.067545260918, -1096.61952584056, 160.759785380402, 0.45)
    pt3dadd(-449.880427809707, -1096.04304280851, 160.842787040825, 0.45)
    pt3dadd(-450.693310358496, -1095.46655977646, 160.925788701249, 0.45)
    pt3dadd(-451.506192907285, -1094.89007674441, 161.008790361673, 0.45)
    pt3dadd(-452.319075456074, -1094.31359371237, 161.091792022096, 0.45)
    pt3dadd(-453.131958004863, -1093.73711068032, 161.17479368252, 0.45)
    pt3dadd(-453.944840553652, -1093.16062764827, 161.257795342944, 0.45)
    pt3dadd(-454.757723102441, -1092.58414461622, 161.340797003367, 0.45)
    pt3dadd(-455.57060565123, -1092.00766158417, 161.423798663791, 0.45)
    pt3dadd(-456.38348820002, -1091.43117855212, 161.506800324215, 0.45)
    pt3dadd(-457.196370748809, -1090.85469552007, 161.589801984638, 0.45)
    pt3dadd(-458.009253297598, -1090.27821248802, 161.672803645062, 0.45)
    pt3dadd(-458.822135846387, -1089.70172945597, 161.755805305486, 0.45)
    pt3dadd(-459.635018395176, -1089.12524642392, 161.838806965909, 0.45)
    pt3dadd(-460.447900943965, -1088.54876339187, 161.921808626333, 0.45)
    pt3dadd(-461.260783492754, -1087.97228035982, 162.004810286757, 0.45)
    pt3dadd(-462.073666041543, -1087.39579732777, 162.08781194718, 0.45)
    pt3dadd(-462.886548590332, -1086.81931429572, 162.170813607604, 0.45)
    pt3dadd(-463.699431139121, -1086.24283126367, 162.253815268028, 0.45)
    pt3dadd(-464.512313687911, -1085.66634823162, 162.336816928451, 0.45)
    pt3dadd(-465.3251962367, -1085.08986519957, 162.419818588875, 0.45)
  }
}
proc shape3d_3() {
  axon[0] {
    pt3dadd(-466.138078785489, -1084.51338216752, 162.502820249299, 0.45)
    pt3dadd(-466.950961334278, -1083.93689913547, 162.585821909722, 0.45)
    pt3dadd(-467.763843883067, -1083.36041610342, 162.668823570146, 0.45)
    pt3dadd(-468.576726431856, -1082.78393307137, 162.75182523057, 0.45)
    pt3dadd(-469.389608980645, -1082.20745003932, 162.834826890994, 0.45)
    pt3dadd(-470.202491529434, -1081.63096700728, 162.917828551417, 0.45)
    pt3dadd(-471.015374078223, -1081.05448397523, 163.000830211841, 0.45)
    pt3dadd(-471.828256627013, -1080.47800094318, 163.083831872265, 0.45)
    pt3dadd(-472.641139175802, -1079.90151791113, 163.166833532688, 0.45)
    pt3dadd(-473.454021724591, -1079.32503487908, 163.249835193112, 0.45)
    pt3dadd(-474.26690427338, -1078.74855184703, 163.332836853536, 0.45)
    pt3dadd(-475.079786822169, -1078.17206881498, 163.415838513959, 0.45)
    pt3dadd(-475.892669370958, -1077.59558578293, 163.498840174383, 0.45)
    pt3dadd(-476.705551919747, -1077.01910275088, 163.581841834807, 0.45)
    pt3dadd(-477.518434468536, -1076.44261971883, 163.66484349523, 0.45)
    pt3dadd(-478.331317017325, -1075.86613668678, 163.747845155654, 0.45)
    pt3dadd(-479.144199566114, -1075.28965365473, 163.830846816078, 0.45)
    pt3dadd(-479.957082114904, -1074.71317062268, 163.913848476501, 0.45)
    pt3dadd(-480.769964663693, -1074.13668759063, 163.996850136925, 0.45)
    pt3dadd(-481.582847212482, -1073.56020455858, 164.079851797349, 0.45)
    pt3dadd(-482.395729761271, -1072.98372152653, 164.162853457772, 0.45)
    pt3dadd(-483.20861231006, -1072.40723849448, 164.245855118196, 0.45)
    pt3dadd(-484.021494858849, -1071.83075546243, 164.32885677862, 0.45)
    pt3dadd(-484.834377407638, -1071.25427243038, 164.411858439044, 0.45)
    pt3dadd(-485.647259956427, -1070.67778939833, 164.494860099467, 0.45)
    pt3dadd(-486.460142505216, -1070.10130636628, 164.577861759891, 0.45)
    pt3dadd(-487.273025054006, -1069.52482333423, 164.660863420315, 0.45)
    pt3dadd(-488.085907602795, -1068.94834030219, 164.743865080738, 0.45)
    pt3dadd(-488.898790151584, -1068.37185727014, 164.826866741162, 0.45)
    pt3dadd(-489.711672700373, -1067.79537423809, 164.909868401586, 0.45)
    pt3dadd(-490.524555249162, -1067.21889120604, 164.992870062009, 0.45)
    pt3dadd(-491.337437797951, -1066.64240817399, 165.075871722433, 0.45)
    pt3dadd(-492.15032034674, -1066.06592514194, 165.158873382857, 0.45)
    pt3dadd(-492.963202895529, -1065.48944210989, 165.24187504328, 0.45)
    pt3dadd(-493.776085444318, -1064.91295907784, 165.324876703704, 0.45)
    pt3dadd(-494.588967993107, -1064.33647604579, 165.407878364128, 0.45)
    pt3dadd(-495.401850541897, -1063.75999301374, 165.490880024551, 0.45)
    pt3dadd(-496.214733090686, -1063.18350998169, 165.573881684975, 0.45)
    pt3dadd(-497.027615639475, -1062.60702694964, 165.656883345399, 0.45)
    pt3dadd(-497.840498188264, -1062.03054391759, 165.739885005822, 0.45)
    pt3dadd(-498.653380737053, -1061.45406088554, 165.822886666246, 0.45)
    pt3dadd(-499.466263285842, -1060.87757785349, 165.90588832667, 0.45)
    pt3dadd(-500.279145834631, -1060.30109482144, 165.988889987093, 0.45)
    pt3dadd(-501.09202838342, -1059.72461178939, 166.071891647517, 0.45)
    pt3dadd(-501.904910932209, -1059.14812875734, 166.154893307941, 0.45)
    pt3dadd(-502.717793480999, -1058.57164572529, 166.237894968364, 0.45)
    pt3dadd(-503.530676029788, -1057.99516269324, 166.320896628788, 0.45)
    pt3dadd(-504.343558578577, -1057.41867966119, 166.403898289212, 0.45)
    pt3dadd(-505.156441127366, -1056.84219662914, 166.486899949636, 0.45)
    pt3dadd(-505.969323676155, -1056.26571359709, 166.569901610059, 0.45)
    pt3dadd(-506.782206224944, -1055.68923056505, 166.652903270483, 0.45)
    pt3dadd(-507.595088773733, -1055.112747533, 166.735904930907, 0.45)
    pt3dadd(-508.407971322522, -1054.53626450095, 166.81890659133, 0.45)
    pt3dadd(-509.220853871311, -1053.9597814689, 166.901908251754, 0.45)
    pt3dadd(-510.0337364201, -1053.38329843685, 166.984909912178, 0.45)
    pt3dadd(-510.84661896889, -1052.8068154048, 167.067911572601, 0.45)
    pt3dadd(-511.659501517679, -1052.23033237275, 167.150913233025, 0.45)
    pt3dadd(-512.472384066468, -1051.6538493407, 167.233914893449, 0.45)
    pt3dadd(-513.285266615257, -1051.07736630865, 167.316916553872, 0.45)
    pt3dadd(-514.098149164046, -1050.5008832766, 167.399918214296, 0.45)
    pt3dadd(-514.911031712835, -1049.92440024455, 167.48291987472, 0.45)
    pt3dadd(-515.723914261624, -1049.3479172125, 167.565921535143, 0.45)
    pt3dadd(-516.536796810413, -1048.77143418045, 167.648923195567, 0.45)
    pt3dadd(-517.349679359202, -1048.1949511484, 167.731924855991, 0.45)
    pt3dadd(-518.162561907991, -1047.61846811635, 167.814926516414, 0.45)
    pt3dadd(-518.975444456781, -1047.0419850843, 167.897928176838, 0.45)
    pt3dadd(-519.78832700557, -1046.46550205225, 167.980929837262, 0.45)
    pt3dadd(-520.601209554359, -1045.8890190202, 168.063931497686, 0.45)
    pt3dadd(-521.414092103148, -1045.31253598815, 168.146933158109, 0.45)
    pt3dadd(-522.226974651937, -1044.7360529561, 168.229934818533, 0.45)
    pt3dadd(-523.039857200726, -1044.15956992405, 168.312936478957, 0.45)
    pt3dadd(-523.852739749515, -1043.583086892, 168.39593813938, 0.45)
    pt3dadd(-524.665622298304, -1043.00660385996, 168.478939799804, 0.45)
    pt3dadd(-525.478504847093, -1042.43012082791, 168.561941460228, 0.45)
    pt3dadd(-526.291387395883, -1041.85363779586, 168.644943120651, 0.45)
    pt3dadd(-527.104269944672, -1041.27715476381, 168.727944781075, 0.45)
    pt3dadd(-527.917152493461, -1040.70067173176, 168.810946441499, 0.45)
    pt3dadd(-528.73003504225, -1040.12418869971, 168.893948101922, 0.45)
    pt3dadd(-529.542917591039, -1039.54770566766, 168.976949762346, 0.45)
    pt3dadd(-530.355800139828, -1038.97122263561, 169.05995142277, 0.45)
    pt3dadd(-531.168682688617, -1038.39473960356, 169.142953083193, 0.45)
    pt3dadd(-531.981565237406, -1037.81825657151, 169.225954743617, 0.45)
    pt3dadd(-532.794447786195, -1037.24177353946, 169.308956404041, 0.45)
    pt3dadd(-533.607330334984, -1036.66529050741, 169.391958064464, 0.45)
    pt3dadd(-534.420212883774, -1036.08880747536, 169.474959724888, 0.45)
    pt3dadd(-535.233095432563, -1035.51232444331, 169.557961385312, 0.45)
    pt3dadd(-536.045977981352, -1034.93584141126, 169.640963045735, 0.45)
    pt3dadd(-536.858860530141, -1034.35935837921, 169.723964706159, 0.45)
    pt3dadd(-537.67174307893, -1033.78287534716, 169.806966366583, 0.45)
    pt3dadd(-538.484625627719, -1033.20639231511, 169.889968027006, 0.45)
    pt3dadd(-539.297508176508, -1032.62990928306, 169.97296968743, 0.45)
    pt3dadd(-540.110390725297, -1032.05342625101, 170.055971347854, 0.45)
    pt3dadd(-540.923273274086, -1031.47694321896, 170.138973008278, 0.45)
    pt3dadd(-541.736155822876, -1030.90046018691, 170.221974668701, 0.45)
    pt3dadd(-542.549038371665, -1030.32397715487, 170.304976329125, 0.45)
    pt3dadd(-543.361920920454, -1029.74749412282, 170.387977989549, 0.45)
    pt3dadd(-544.174803469243, -1029.17101109077, 170.470979649972, 0.45)
    pt3dadd(-544.987686018032, -1028.59452805872, 170.553981310396, 0.45)
    pt3dadd(-545.800568566821, -1028.01804502667, 170.63698297082, 0.45)
    pt3dadd(-546.61345111561, -1027.44156199462, 170.719984631243, 0.45)
    pt3dadd(-547.426333664399, -1026.86507896257, 170.802986291667, 0.45)
    pt3dadd(-548.239216213188, -1026.28859593052, 170.885987952091, 0.45)
    pt3dadd(-549.052098761978, -1025.71211289847, 170.968989612514, 0.45)
    pt3dadd(-549.864981310767, -1025.13562986642, 171.051991272938, 0.45)
    pt3dadd(-550.677863859556, -1024.55914683437, 171.134992933362, 0.45)
    pt3dadd(-551.490746408345, -1023.98266380232, 171.217994593785, 0.45)
    pt3dadd(-552.303628957134, -1023.40618077027, 171.300996254209, 0.45)
    pt3dadd(-553.116511505923, -1022.82969773822, 171.383997914633, 0.45)
    pt3dadd(-553.929394054712, -1022.25321470617, 171.466999575056, 0.45)
    pt3dadd(-554.742276603501, -1021.67673167412, 171.55000123548, 0.45)
    pt3dadd(-555.55515915229, -1021.10024864207, 171.633002895904, 0.45)
    pt3dadd(-556.368041701079, -1020.52376561002, 171.716004556328, 0.45)
    pt3dadd(-557.180924249868, -1019.94728257797, 171.799006216751, 0.45)
    pt3dadd(-557.993806798658, -1019.37079954592, 171.882007877175, 0.45)
    pt3dadd(-558.806689347447, -1018.79431651387, 171.965009537599, 0.45)
    pt3dadd(-559.619571896236, -1018.21783348182, 172.048011198022, 0.45)
    pt3dadd(-560.432454445025, -1017.64135044978, 172.131012858446, 0.45)
    pt3dadd(-561.245336993814, -1017.06486741773, 172.21401451887, 0.45)
    pt3dadd(-562.058219542603, -1016.48838438568, 172.297016179293, 0.45)
    pt3dadd(-562.871102091392, -1015.91190135363, 172.380017839717, 0.45)
    pt3dadd(-563.683984640181, -1015.33541832158, 172.463019500141, 0.45)
    pt3dadd(-564.49686718897, -1014.75893528953, 172.546021160564, 0.45)
    pt3dadd(-565.30974973776, -1014.18245225748, 172.629022820988, 0.45)
    pt3dadd(-566.122632286549, -1013.60596922543, 172.712024481412, 0.45)
    pt3dadd(-566.935514835338, -1013.02948619338, 172.795026141835, 0.45)
    pt3dadd(-567.748397384127, -1012.45300316133, 172.878027802259, 0.45)
    pt3dadd(-568.561279932916, -1011.87652012928, 172.961029462683, 0.45)
    pt3dadd(-569.374162481705, -1011.30003709723, 173.044031123106, 0.45)
    pt3dadd(-570.187045030494, -1010.72355406518, 173.12703278353, 0.45)
    pt3dadd(-570.999927579283, -1010.14707103313, 173.210034443954, 0.45)
    pt3dadd(-571.812810128072, -1009.57058800108, 173.293036104377, 0.45)
    pt3dadd(-572.625692676861, -1008.99410496903, 173.376037764801, 0.45)
    pt3dadd(-573.438575225651, -1008.41762193698, 173.459039425225, 0.45)
    pt3dadd(-574.25145777444, -1007.84113890493, 173.542041085648, 0.45)
    pt3dadd(-575.064340323229, -1007.26465587288, 173.625042746072, 0.45)
    pt3dadd(-575.877222872018, -1006.68817284083, 173.708044406496, 0.45)
    pt3dadd(-576.690105420807, -1006.11168980878, 173.79104606692, 0.45)
    pt3dadd(-577.502987969596, -1005.53520677673, 173.874047727343, 0.45)
    pt3dadd(-578.315870518385, -1004.95872374468, 173.957049387767, 0.45)
    pt3dadd(-579.128753067174, -1004.38224071264, 174.040051048191, 0.45)
    pt3dadd(-579.941635615963, -1003.80575768059, 174.123052708614, 0.45)
    pt3dadd(-580.754518164753, -1003.22927464854, 174.206054369038, 0.45)
    pt3dadd(-581.567400713542, -1002.65279161649, 174.289056029462, 0.45)
    pt3dadd(-582.380283262331, -1002.07630858444, 174.372057689885, 0.45)
    pt3dadd(-583.19316581112, -1001.49982555239, 174.455059350309, 0.45)
    pt3dadd(-584.006048359909, -1000.92334252034, 174.538061010733, 0.45)
    pt3dadd(-584.818930908698, -1000.34685948829, 174.621062671156, 0.45)
    pt3dadd(-585.631813457487, -999.770376456239, 174.70406433158, 0.45)
    pt3dadd(-586.444696006276, -999.193893424189, 174.787065992004, 0.45)
    pt3dadd(-587.257578555065, -998.61741039214, 174.870067652427, 0.45)
    pt3dadd(-588.070461103854, -998.04092736009, 174.953069312851, 0.45)
    pt3dadd(-588.883343652644, -997.464444328041, 175.036070973275, 0.45)
    pt3dadd(-589.696226201433, -996.887961295991, 175.119072633698, 0.45)
    pt3dadd(-590.509108750222, -996.311478263942, 175.202074294122, 0.45)
    pt3dadd(-591.321991299011, -995.734995231892, 175.285075954546, 0.45)
    pt3dadd(-592.1348738478, -995.158512199843, 175.368077614969, 0.45)
    pt3dadd(-592.947756396589, -994.582029167793, 175.451079275393, 0.45)
    pt3dadd(-593.760638945378, -994.005546135744, 175.534080935817, 0.45)
    pt3dadd(-594.573521494167, -993.429063103694, 175.617082596241, 0.45)
    pt3dadd(-595.386404042956, -992.852580071644, 175.700084256664, 0.45)
    pt3dadd(-596.199286591745, -992.276097039595, 175.783085917088, 0.45)
    pt3dadd(-597.012169140535, -991.699614007545, 175.866087577512, 0.45)
    pt3dadd(-597.825051689324, -991.123130975496, 175.949089237935, 0.45)
    pt3dadd(-598.637934238113, -990.546647943446, 176.032090898359, 0.45)
    pt3dadd(-599.450816786902, -989.970164911397, 176.115092558783, 0.45)
    pt3dadd(-600.263699335691, -989.393681879347, 176.198094219206, 0.45)
    pt3dadd(-601.07658188448, -988.817198847298, 176.28109587963, 0.45)
    pt3dadd(-601.889464433269, -988.240715815248, 176.364097540054, 0.45)
    pt3dadd(-602.702346982058, -987.664232783198, 176.447099200477, 0.45)
    pt3dadd(-603.515229530847, -987.087749751149, 176.530100860901, 0.45)
    pt3dadd(-604.328112079637, -986.511266719099, 176.613102521325, 0.45)
    pt3dadd(-605.140994628426, -985.93478368705, 176.696104181748, 0.45)
    pt3dadd(-605.953877177215, -985.358300655, 176.779105842172, 0.45)
    pt3dadd(-606.766759726004, -984.781817622951, 176.862107502596, 0.45)
    pt3dadd(-607.579642274793, -984.205334590901, 176.945109163019, 0.45)
    pt3dadd(-608.392524823582, -983.628851558852, 177.028110823443, 0.45)
    pt3dadd(-609.205407372371, -983.052368526802, 177.111112483867, 0.45)
    pt3dadd(-610.01828992116, -982.475885494753, 177.194114144291, 0.45)
    pt3dadd(-610.831172469949, -981.899402462703, 177.277115804714, 0.45)
    pt3dadd(-611.644055018739, -981.322919430653, 177.360117465138, 0.45)
    pt3dadd(-612.456937567528, -980.746436398604, 177.443119125562, 0.45)
    pt3dadd(-613.269820116317, -980.169953366554, 177.526120785985, 0.45)
    pt3dadd(-614.082702665106, -979.593470334505, 177.609122446409, 0.45)
    pt3dadd(-614.895585213895, -979.016987302455, 177.692124106833, 0.45)
    pt3dadd(-615.708467762684, -978.440504270406, 177.775125767256, 0.45)
    pt3dadd(-616.521350311473, -977.864021238356, 177.85812742768, 0.45)
    pt3dadd(-617.334232860262, -977.287538206307, 177.941129088104, 0.45)
    pt3dadd(-618.147115409051, -976.711055174257, 178.024130748527, 0.45)
    pt3dadd(-618.95999795784, -976.134572142208, 178.107132408951, 0.45)
    pt3dadd(-619.772880506629, -975.558089110158, 178.190134069375, 0.45)
    pt3dadd(-620.585763055419, -974.981606078108, 178.273135729798, 0.45)
    pt3dadd(-621.398645604208, -974.405123046059, 178.356137390222, 0.45)
    pt3dadd(-622.211528152997, -973.828640014009, 178.439139050646, 0.45)
    pt3dadd(-623.024410701786, -973.25215698196, 178.522140711069, 0.45)
    pt3dadd(-623.837293250575, -972.67567394991, 178.605142371493, 0.45)
    pt3dadd(-624.650175799364, -972.099190917861, 178.688144031917, 0.45)
    pt3dadd(-625.463058348153, -971.522707885811, 178.77114569234, 0.45)
    pt3dadd(-626.275940896942, -970.946224853762, 178.854147352764, 0.45)
    pt3dadd(-627.088823445731, -970.369741821712, 178.937149013188, 0.45)
    pt3dadd(-627.901705994521, -969.793258789662, 179.020150673611, 0.45)
    pt3dadd(-628.71458854331, -969.216775757613, 179.103152334035, 0.45)
    pt3dadd(-629.527471092099, -968.640292725563, 179.186153994459, 0.45)
    pt3dadd(-630.340353640888, -968.063809693514, 179.269155654883, 0.45)
    pt3dadd(-631.153236189677, -967.487326661464, 179.352157315306, 0.45)
    pt3dadd(-631.966118738466, -966.910843629415, 179.43515897573, 0.45)
    pt3dadd(-632.779001287255, -966.334360597365, 179.518160636154, 0.45)
    pt3dadd(-633.591883836044, -965.757877565316, 179.601162296577, 0.45)
    pt3dadd(-634.404766384833, -965.181394533266, 179.684163957001, 0.45)
    pt3dadd(-635.217648933623, -964.604911501217, 179.767165617425, 0.45)
    pt3dadd(-636.030531482412, -964.028428469167, 179.850167277848, 0.45)
    pt3dadd(-636.843414031201, -963.451945437117, 179.933168938272, 0.45)
    pt3dadd(-637.65629657999, -962.875462405068, 180.016170598696, 0.45)
    pt3dadd(-638.469179128779, -962.298979373018, 180.099172259119, 0.45)
    pt3dadd(-639.282061677568, -961.722496340969, 180.182173919543, 0.45)
    pt3dadd(-640.094944226357, -961.146013308919, 180.265175579967, 0.45)
    pt3dadd(-640.907826775146, -960.56953027687, 180.34817724039, 0.45)
    pt3dadd(-641.720709323935, -959.99304724482, 180.431178900814, 0.45)
    pt3dadd(-642.533591872724, -959.41656421277, 180.514180561238, 0.45)
    pt3dadd(-643.346474421514, -958.840081180721, 180.597182221661, 0.45)
    pt3dadd(-644.159356970303, -958.263598148671, 180.680183882085, 0.45)
    pt3dadd(-644.972239519092, -957.687115116622, 180.763185542509, 0.45)
    pt3dadd(-645.785122067881, -957.110632084572, 180.846187202933, 0.45)
    pt3dadd(-646.59800461667, -956.534149052523, 180.929188863356, 0.45)
    pt3dadd(-647.410887165459, -955.957666020473, 181.01219052378, 0.45)
    pt3dadd(-648.223769714248, -955.381182988424, 181.095192184204, 0.45)
    pt3dadd(-649.036652263037, -954.804699956374, 181.178193844627, 0.45)
    pt3dadd(-649.849534811826, -954.228216924325, 181.261195505051, 0.45)
    pt3dadd(-650.662417360615, -953.651733892275, 181.344197165475, 0.45)
    pt3dadd(-651.475299909405, -953.075250860226, 181.427198825898, 0.45)
    pt3dadd(-652.288182458194, -952.498767828176, 181.510200486322, 0.45)
    pt3dadd(-653.101065006983, -951.922284796126, 181.593202146746, 0.45)
    pt3dadd(-653.913947555772, -951.345801764077, 181.676203807169, 0.45)
    pt3dadd(-654.726830104561, -950.769318732027, 181.759205467593, 0.45)
    pt3dadd(-655.53971265335, -950.192835699978, 181.842207128017, 0.45)
    pt3dadd(-656.352595202139, -949.616352667928, 181.92520878844, 0.45)
    pt3dadd(-657.165477750928, -949.039869635879, 182.008210448864, 0.45)
    pt3dadd(-657.978360299717, -948.463386603829, 182.091212109288, 0.45)
    pt3dadd(-658.791242848507, -947.88690357178, 182.174213769711, 0.45)
    pt3dadd(-659.604125397296, -947.31042053973, 182.257215430135, 0.45)
    pt3dadd(-660.417007946085, -946.73393750768, 182.340217090559, 0.45)
    pt3dadd(-661.229890494874, -946.157454475631, 182.423218750982, 0.45)
    pt3dadd(-662.042773043663, -945.580971443581, 182.506220411406, 0.45)
    pt3dadd(-662.855655592452, -945.004488411532, 182.58922207183, 0.45)
    pt3dadd(-663.668538141241, -944.428005379482, 182.672223732253, 0.45)
    pt3dadd(-664.48142069003, -943.851522347433, 182.755225392677, 0.45)
    pt3dadd(-665.294303238819, -943.275039315383, 182.838227053101, 0.45)
    pt3dadd(-666.107185787609, -942.698556283334, 182.921228713525, 0.45)
    pt3dadd(-666.920068336398, -942.122073251284, 183.004230373948, 0.45)
    pt3dadd(-667.732950885187, -941.545590219235, 183.087232034372, 0.45)
  }
}
proc shape3d_4() {
  axon[0] {
    pt3dadd(-668.545833433976, -940.969107187185, 183.170233694796, 0.45)
    pt3dadd(-669.358715982765, -940.392624155135, 183.253235355219, 0.45)
    pt3dadd(-670.171598531554, -939.816141123086, 183.336237015643, 0.45)
    pt3dadd(-670.984481080343, -939.239658091036, 183.419238676067, 0.45)
    pt3dadd(-671.797363629132, -938.663175058987, 183.50224033649, 0.45)
    pt3dadd(-672.610246177921, -938.086692026937, 183.585241996914, 0.45)
    pt3dadd(-673.42312872671, -937.510208994888, 183.668243657338, 0.45)
    pt3dadd(-674.2360112755, -936.933725962838, 183.751245317761, 0.45)
    pt3dadd(-675.048893824289, -936.357242930789, 183.834246978185, 0.45)
    pt3dadd(-675.861776373078, -935.780759898739, 183.917248638609, 0.45)
    pt3dadd(-676.674658921867, -935.20427686669, 184.000250299032, 0.45)
    pt3dadd(-677.487541470656, -934.62779383464, 184.083251959456, 0.45)
    pt3dadd(-678.300424019445, -934.05131080259, 184.16625361988, 0.45)
    pt3dadd(-679.113306568234, -933.474827770541, 184.249255280303, 0.45)
    pt3dadd(-679.926189117023, -932.898344738491, 184.332256940727, 0.45)
    pt3dadd(-680.739071665812, -932.321861706442, 184.415258601151, 0.45)
    pt3dadd(-681.551954214601, -931.745378674392, 184.498260261575, 0.45)
    pt3dadd(-682.364836763391, -931.168895642343, 184.581261921998, 0.45)
    pt3dadd(-683.17771931218, -930.592412610293, 184.664263582422, 0.45)
    pt3dadd(-683.990601860969, -930.015929578244, 184.747265242846, 0.45)
    pt3dadd(-684.803484409758, -929.439446546194, 184.830266903269, 0.45)
    pt3dadd(-685.616366958547, -928.862963514144, 184.913268563693, 0.45)
    pt3dadd(-686.429249507336, -928.286480482095, 184.996270224117, 0.45)
    pt3dadd(-687.242132056125, -927.709997450045, 185.07927188454, 0.45)
    pt3dadd(-688.055014604914, -927.133514417996, 185.162273544964, 0.45)
    pt3dadd(-688.867897153703, -926.557031385946, 185.245275205388, 0.45)
    pt3dadd(-689.680779702492, -925.980548353897, 185.328276865811, 0.45)
    pt3dadd(-690.493662251282, -925.404065321847, 185.411278526235, 0.45)
    pt3dadd(-691.306544800071, -924.827582289798, 185.494280186659, 0.45)
    pt3dadd(-692.11942734886, -924.251099257748, 185.577281847082, 0.45)
    pt3dadd(-692.932309897649, -923.674616225699, 185.660283507506, 0.45)
    pt3dadd(-693.745192446438, -923.098133193649, 185.74328516793, 0.45)
    pt3dadd(-694.558074995227, -922.521650161599, 185.826286828353, 0.45)
    pt3dadd(-695.370957544016, -921.94516712955, 185.909288488777, 0.45)
    pt3dadd(-696.183840092805, -921.3686840975, 185.992290149201, 0.45)
    pt3dadd(-696.996722641594, -920.792201065451, 186.075291809624, 0.45)
    pt3dadd(-697.809605190384, -920.215718033401, 186.158293470048, 0.45)
    pt3dadd(-698.622487739173, -919.639235001352, 186.241295130472, 0.45)
    pt3dadd(-699.435370287962, -919.062751969302, 186.324296790895, 0.45)
    pt3dadd(-700.248252836751, -918.486268937253, 186.407298451319, 0.45)
    pt3dadd(-701.06113538554, -917.909785905203, 186.490300111743, 0.45)
    pt3dadd(-701.874017934329, -917.333302873153, 186.573301772167, 0.45)
    pt3dadd(-702.686900483118, -916.756819841104, 186.65630343259, 0.45)
    pt3dadd(-703.499783031907, -916.180336809054, 186.739305093014, 0.45)
    pt3dadd(-704.312665580696, -915.603853777005, 186.822306753438, 0.45)
    pt3dadd(-705.125548129485, -915.027370744955, 186.905308413861, 0.45)
    pt3dadd(-705.938430678275, -914.450887712906, 186.988310074285, 0.45)
    pt3dadd(-706.751313227064, -913.874404680856, 187.071311734709, 0.45)
    pt3dadd(-707.564195775853, -913.297921648807, 187.154313395132, 0.45)
    pt3dadd(-708.377078324642, -912.721438616757, 187.237315055556, 0.45)
    pt3dadd(-709.189960873431, -912.144955584708, 187.32031671598, 0.45)
    pt3dadd(-710.00284342222, -911.568472552658, 187.403318376403, 0.45)
    pt3dadd(-710.815725971009, -910.991989520609, 187.486320036827, 0.45)
    pt3dadd(-711.628608519798, -910.415506488559, 187.569321697251, 0.45)
    pt3dadd(-712.441491068587, -909.839023456509, 187.652323357674, 0.45)
    pt3dadd(-713.254373617376, -909.26254042446, 187.735325018098, 0.45)
    pt3dadd(-714.067256166166, -908.68605739241, 187.818326678522, 0.45)
    pt3dadd(-714.880138714955, -908.109574360361, 187.901328338945, 0.45)
    pt3dadd(-715.693021263744, -907.533091328311, 187.984329999369, 0.45)
    pt3dadd(-716.505903812533, -906.956608296262, 188.067331659793, 0.45)
    pt3dadd(-717.318786361322, -906.380125264212, 188.150333320216, 0.45)
    pt3dadd(-718.131668910111, -905.803642232162, 188.23333498064, 0.45)
    pt3dadd(-718.9445514589, -905.227159200113, 188.316336641064, 0.45)
    pt3dadd(-719.757434007689, -904.650676168063, 188.399338301488, 0.45)
    pt3dadd(-720.570316556478, -904.074193136014, 188.482339961911, 0.45)
    pt3dadd(-721.383199105268, -903.497710103964, 188.565341622335, 0.45)
    pt3dadd(-722.196081654057, -902.921227071915, 188.648343282759, 0.45)
    pt3dadd(-723.008964202846, -902.344744039865, 188.731344943182, 0.45)
    pt3dadd(-723.821846751635, -901.768261007816, 188.814346603606, 0.45)
    pt3dadd(-724.634729300424, -901.191777975766, 188.89734826403, 0.45)
    pt3dadd(-725.447611849213, -900.615294943717, 188.980349924453, 0.45)
    pt3dadd(-726.260494398002, -900.038811911667, 189.063351584877, 0.45)
    pt3dadd(-727.073376946791, -899.462328879617, 189.146353245301, 0.45)
    pt3dadd(-727.88625949558, -898.885845847568, 189.229354905724, 0.45)
    pt3dadd(-728.69914204437, -898.309362815518, 189.312356566148, 0.45)
    pt3dadd(-729.512024593159, -897.732879783469, 189.395358226572, 0.45)
    pt3dadd(-730.324907141948, -897.156396751419, 189.478359886995, 0.45)
    pt3dadd(-731.137789690737, -896.57991371937, 189.561361547419, 0.45)
    pt3dadd(-731.950672239526, -896.00343068732, 189.644363207843, 0.45)
    pt3dadd(-732.763554788315, -895.426947655271, 189.727364868266, 0.45)
    pt3dadd(-733.576437337104, -894.850464623221, 189.81036652869, 0.45)
    pt3dadd(-734.389319885893, -894.273981591171, 189.893368189114, 0.45)
    pt3dadd(-735.202202434682, -893.697498559122, 189.976369849537, 0.45)
    pt3dadd(-736.015084983471, -893.121015527072, 190.059371509961, 0.45)
    pt3dadd(-736.827967532261, -892.544532495023, 190.142373170385, 0.45)
    pt3dadd(-737.64085008105, -891.968049462973, 190.225374830809, 0.45)
    pt3dadd(-738.453732629839, -891.391566430924, 190.308376491232, 0.45)
    pt3dadd(-739.266615178628, -890.815083398874, 190.391378151656, 0.45)
    pt3dadd(-740.079497727417, -890.238600366825, 190.47437981208, 0.45)
    pt3dadd(-740.892380276206, -889.662117334775, 190.557381472503, 0.45)
    pt3dadd(-741.705262824995, -889.085634302726, 190.640383132927, 0.45)
    pt3dadd(-742.518145373784, -888.509151270676, 190.723384793351, 0.45)
    pt3dadd(-743.331027922573, -887.932668238627, 190.806386453774, 0.45)
    pt3dadd(-744.143910471362, -887.356185206577, 190.889388114198, 0.45)
    pt3dadd(-744.956793020152, -886.779702174527, 190.972389774622, 0.45)
    pt3dadd(-745.769675568941, -886.203219142478, 191.055391435045, 0.45)
    pt3dadd(-746.58255811773, -885.626736110428, 191.138393095469, 0.45)
    pt3dadd(-747.395440666519, -885.050253078379, 191.221394755893, 0.45)
    pt3dadd(-748.208323215308, -884.473770046329, 191.304396416316, 0.45)
    pt3dadd(-749.021205764097, -883.89728701428, 191.38739807674, 0.45)
    pt3dadd(-749.834088312886, -883.32080398223, 191.470399737164, 0.45)
    pt3dadd(-750.646970861675, -882.744320950181, 191.553401397587, 0.45)
    pt3dadd(-751.459853410464, -882.167837918131, 191.636403058011, 0.45)
    pt3dadd(-752.272735959254, -881.591354886081, 191.719404718435, 0.45)
    pt3dadd(-753.085618508043, -881.014871854032, 191.802406378859, 0.45)
    pt3dadd(-753.898501056832, -880.438388821982, 191.885408039282, 0.45)
    pt3dadd(-754.711383605621, -879.861905789933, 191.968409699706, 0.45)
    pt3dadd(-755.52426615441, -879.285422757883, 192.05141136013, 0.45)
    pt3dadd(-756.337148703199, -878.708939725834, 192.134413020553, 0.45)
    pt3dadd(-757.150031251988, -878.132456693784, 192.217414680977, 0.45)
    pt3dadd(-757.962913800777, -877.555973661735, 192.300416341401, 0.45)
    pt3dadd(-758.775796349566, -876.979490629685, 192.383418001824, 0.45)
    pt3dadd(-759.588678898355, -876.403007597635, 192.466419662248, 0.45)
    pt3dadd(-760.401561447145, -875.826524565586, 192.549421322672, 0.45)
    pt3dadd(-761.214443995934, -875.250041533536, 192.632422983095, 0.45)
    pt3dadd(-762.027326544723, -874.673558501487, 192.715424643519, 0.45)
    pt3dadd(-762.840209093512, -874.097075469437, 192.798426303943, 0.45)
    pt3dadd(-763.653091642301, -873.520592437388, 192.881427964366, 0.45)
    pt3dadd(-764.46597419109, -872.944109405338, 192.96442962479, 0.45)
    pt3dadd(-765.278856739879, -872.367626373289, 193.047431285214, 0.45)
    pt3dadd(-766.091739288668, -871.791143341239, 193.130432945637, 0.45)
    pt3dadd(-766.904621837457, -871.21466030919, 193.213434606061, 0.45)
    pt3dadd(-767.717504386246, -870.63817727714, 193.296436266485, 0.45)
    pt3dadd(-768.530386935036, -870.06169424509, 193.379437926908, 0.45)
    pt3dadd(-769.343269483825, -869.485211213041, 193.462439587332, 0.45)
    pt3dadd(-770.156152032614, -868.908728180991, 193.545441247756, 0.45)
    pt3dadd(-770.969034581403, -868.332245148942, 193.628442908179, 0.45)
    pt3dadd(-771.781917130192, -867.755762116892, 193.711444568603, 0.45)
    pt3dadd(-772.594799678981, -867.179279084843, 193.794446229027, 0.45)
    pt3dadd(-773.40768222777, -866.602796052793, 193.877447889451, 0.45)
    pt3dadd(-774.220564776559, -866.026313020744, 193.960449549874, 0.45)
    pt3dadd(-775.033447325348, -865.449829988694, 194.043451210298, 0.45)
    pt3dadd(-775.846329874138, -864.873346956644, 194.126452870722, 0.45)
    pt3dadd(-776.659212422927, -864.296863924595, 194.209454531145, 0.45)
    pt3dadd(-777.472094971716, -863.720380892545, 194.292456191569, 0.45)
    pt3dadd(-778.284977520505, -863.143897860496, 194.375457851993, 0.45)
    pt3dadd(-779.097860069294, -862.567414828446, 194.458459512416, 0.45)
    pt3dadd(-779.910742618083, -861.990931796397, 194.54146117284, 0.45)
    pt3dadd(-780.723625166872, -861.414448764347, 194.624462833264, 0.45)
    pt3dadd(-781.536507715661, -860.837965732298, 194.707464493687, 0.45)
    pt3dadd(-782.34939026445, -860.261482700248, 194.790466154111, 0.45)
    pt3dadd(-783.16227281324, -859.684999668199, 194.873467814535, 0.45)
    pt3dadd(-783.975155362029, -859.108516636149, 194.956469474958, 0.45)
    pt3dadd(-784.788037910818, -858.5320336041, 195.039471135382, 0.45)
    pt3dadd(-785.600920459607, -857.95555057205, 195.122472795806, 0.45)
    pt3dadd(-786.413803008396, -857.37906754, 195.205474456229, 0.45)
    pt3dadd(-787.226685557185, -856.802584507951, 195.288476116653, 0.45)
    pt3dadd(-788.039568105974, -856.226101475901, 195.371477777077, 0.45)
    pt3dadd(-788.852450654763, -855.649618443852, 195.4544794375, 0.45)
    pt3dadd(-789.665333203552, -855.073135411802, 195.537481097924, 0.45)
    pt3dadd(-790.478215752341, -854.496652379753, 195.620482758348, 0.45)
    pt3dadd(-791.291098301131, -853.920169347703, 195.703484418772, 0.45)
    pt3dadd(-792.10398084992, -853.343686315653, 195.786486079195, 0.45)
    pt3dadd(-792.916863398709, -852.767203283604, 195.869487739619, 0.45)
    pt3dadd(-793.729745947498, -852.190720251554, 195.952489400043, 0.45)
    pt3dadd(-794.542628496287, -851.614237219505, 196.035491060466, 0.45)
    pt3dadd(-795.355511045076, -851.037754187455, 196.11849272089, 0.45)
    pt3dadd(-796.168393593865, -850.461271155406, 196.201494381314, 0.45)
    pt3dadd(-796.981276142654, -849.884788123356, 196.284496041737, 0.45)
    pt3dadd(-797.794158691443, -849.308305091307, 196.367497702161, 0.45)
    pt3dadd(-798.607041240232, -848.731822059257, 196.450499362585, 0.45)
    pt3dadd(-799.419923789022, -848.155339027208, 196.533501023008, 0.45)
    pt3dadd(-800.232806337811, -847.578855995158, 196.616502683432, 0.45)
    pt3dadd(-801.0456888866, -847.002372963108, 196.699504343856, 0.45)
    pt3dadd(-801.858571435389, -846.425889931059, 196.782506004279, 0.45)
    pt3dadd(-802.671453984178, -845.849406899009, 196.865507664703, 0.45)
    pt3dadd(-803.484336532967, -845.27292386696, 196.948509325127, 0.45)
    pt3dadd(-804.297219081756, -844.69644083491, 197.03151098555, 0.45)
    pt3dadd(-805.110101630545, -844.119957802861, 197.114512645974, 0.45)
    pt3dadd(-805.922984179334, -843.543474770811, 197.197514306398, 0.45)
    pt3dadd(-806.735866728123, -842.966991738762, 197.280515966822, 0.45)
    pt3dadd(-807.548749276913, -842.390508706712, 197.363517627245, 0.45)
    pt3dadd(-808.361631825702, -841.814025674663, 197.446519287669, 0.45)
    pt3dadd(-809.174514374491, -841.237542642613, 197.529520948093, 0.45)
    pt3dadd(-809.98739692328, -840.661059610563, 197.612522608516, 0.45)
    pt3dadd(-810.800279472069, -840.084576578514, 197.69552426894, 0.45)
    pt3dadd(-811.613162020858, -839.508093546464, 197.778525929364, 0.45)
    pt3dadd(-812.426044569647, -838.931610514415, 197.861527589787, 0.45)
    pt3dadd(-813.238927118436, -838.355127482365, 197.944529250211, 0.45)
    pt3dadd(-814.051809667225, -837.778644450316, 198.027530910635, 0.45)
    pt3dadd(-814.864692216015, -837.202161418266, 198.110532571058, 0.45)
    pt3dadd(-815.677574764804, -836.625678386217, 198.193534231482, 0.45)
    pt3dadd(-816.490457313593, -836.049195354167, 198.276535891906, 0.45)
    pt3dadd(-817.303339862382, -835.472712322117, 198.359537552329, 0.45)
    pt3dadd(-818.116222411171, -834.896229290068, 198.442539212753, 0.45)
    pt3dadd(-818.92910495996, -834.319746258018, 198.525540873177, 0.45)
    pt3dadd(-819.741987508749, -833.743263225969, 198.6085425336, 0.45)
    pt3dadd(-820.554870057538, -833.166780193919, 198.691544194024, 0.45)
    pt3dadd(-821.367752606327, -832.59029716187, 198.774545854448, 0.45)
    pt3dadd(-822.180635155117, -832.01381412982, 198.857547514871, 0.45)
    pt3dadd(-822.993517703906, -831.437331097771, 198.940549175295, 0.45)
    pt3dadd(-823.806400252695, -830.860848065721, 199.023550835719, 0.45)
    pt3dadd(-824.619282801484, -830.284365033672, 199.106552496142, 0.45)
    pt3dadd(-825.432165350273, -829.707882001622, 199.189554156566, 0.45)
    pt3dadd(-826.245047899062, -829.131398969573, 199.27255581699, 0.45)
    pt3dadd(-827.057930447851, -828.554915937523, 199.355557477414, 0.45)
    pt3dadd(-827.87081299664, -827.978432905473, 199.438559137837, 0.45)
    pt3dadd(-828.683695545429, -827.401949873424, 199.521560798261, 0.45)
    pt3dadd(-829.496578094218, -826.825466841374, 199.604562458685, 0.45)
    pt3dadd(-830.309460643007, -826.248983809325, 199.687564119108, 0.45)
    pt3dadd(-831.122343191797, -825.672500777275, 199.770565779532, 0.45)
    pt3dadd(-831.935225740586, -825.096017745226, 199.853567439956, 0.45)
    pt3dadd(-832.748108289375, -824.519534713176, 199.936569100379, 0.45)
    pt3dadd(-833.560990838164, -823.943051681126, 200.019570760803, 0.45)
    pt3dadd(-834.373873386953, -823.366568649077, 200.102572421227, 0.45)
    pt3dadd(-835.186755935742, -822.790085617027, 200.18557408165, 0.45)
    pt3dadd(-835.999638484531, -822.213602584978, 200.268575742074, 0.45)
    pt3dadd(-836.81252103332, -821.637119552928, 200.351577402498, 0.45)
    pt3dadd(-837.625403582109, -821.060636520879, 200.434579062921, 0.45)
    pt3dadd(-838.438286130899, -820.484153488829, 200.517580723345, 0.45)
    pt3dadd(-839.251168679688, -819.90767045678, 200.600582383769, 0.45)
    pt3dadd(-840.064051228477, -819.33118742473, 200.683584044192, 0.45)
    pt3dadd(-840.876933777266, -818.754704392681, 200.766585704616, 0.45)
    pt3dadd(-841.689816326055, -818.178221360631, 200.84958736504, 0.45)
    pt3dadd(-842.502698874844, -817.601738328581, 200.932589025463, 0.45)
    pt3dadd(-843.315581423633, -817.025255296532, 201.015590685887, 0.45)
    pt3dadd(-844.128463972422, -816.448772264482, 201.098592346311, 0.45)
    pt3dadd(-844.941346521211, -815.872289232433, 201.181594006735, 0.45)
    pt3dadd(-845.754229070001, -815.295806200383, 201.264595667158, 0.45)
    pt3dadd(-846.56711161879, -814.719323168334, 201.347597327582, 0.45)
    pt3dadd(-847.379994167579, -814.142840136284, 201.430598988006, 0.45)
    pt3dadd(-848.192876716368, -813.566357104235, 201.513600648429, 0.45)
    pt3dadd(-849.005759265157, -812.989874072185, 201.596602308853, 0.45)
    pt3dadd(-849.818641813946, -812.413391040135, 201.679603969277, 0.45)
    pt3dadd(-850.631524362735, -811.836908008086, 201.7626056297, 0.45)
    pt3dadd(-851.444406911524, -811.260424976036, 201.845607290124, 0.45)
    pt3dadd(-852.257289460313, -810.683941943987, 201.928608950548, 0.45)
    pt3dadd(-853.070172009102, -810.107458911937, 202.011610610971, 0.45)
    pt3dadd(-853.883054557892, -809.530975879888, 202.094612271395, 0.45)
    pt3dadd(-854.695937106681, -808.954492847838, 202.177613931819, 0.45)
    pt3dadd(-855.50881965547, -808.378009815789, 202.260615592242, 0.45)
    pt3dadd(-856.321702204259, -807.801526783739, 202.343617252666, 0.45)
    pt3dadd(-857.134584753048, -807.22504375169, 202.42661891309, 0.45)
    pt3dadd(-857.947467301837, -806.64856071964, 202.509620573513, 0.45)
    pt3dadd(-858.760349850626, -806.07207768759, 202.592622233937, 0.45)
    pt3dadd(-859.573232399415, -805.495594655541, 202.675623894361, 0.45)
    pt3dadd(-860.386114948204, -804.919111623491, 202.758625554784, 0.45)
    pt3dadd(-861.198997496993, -804.342628591442, 202.841627215208, 0.45)
    pt3dadd(-862.011880045783, -803.766145559392, 202.924628875632, 0.45)
    pt3dadd(-862.824762594572, -803.189662527343, 203.007630536056, 0.45)
    pt3dadd(-863.637645143361, -802.613179495293, 203.090632196479, 0.45)
    pt3dadd(-864.45052769215, -802.036696463244, 203.173633856903, 0.45)
    pt3dadd(-865.263410240939, -801.460213431194, 203.256635517327, 0.45)
    pt3dadd(-866.076292789728, -800.883730399145, 203.33963717775, 0.45)
    pt3dadd(-866.889175338517, -800.307247367095, 203.422638838174, 0.45)
    pt3dadd(-867.702057887306, -799.730764335045, 203.505640498598, 0.45)
    pt3dadd(-868.514940436095, -799.154281302996, 203.588642159021, 0.45)
    pt3dadd(-869.327822984885, -798.577798270946, 203.671643819445, 0.45)
    pt3dadd(-870.140705533674, -798.001315238897, 203.754645479869, 0.45)
  }
}
proc shape3d_5() {
  axon[0] {
    pt3dadd(-870.953588082463, -797.424832206847, 203.837647140292, 0.45)
    pt3dadd(-871.766470631252, -796.848349174798, 203.920648800716, 0.45)
    pt3dadd(-872.579353180041, -796.271866142748, 204.00365046114, 0.45)
    pt3dadd(-873.39223572883, -795.695383110699, 204.086652121563, 0.45)
    pt3dadd(-874.205118277619, -795.118900078649, 204.169653781987, 0.45)
    pt3dadd(-875.018000826408, -794.542417046599, 204.252655442411, 0.45)
    pt3dadd(-875.830883375197, -793.96593401455, 204.335657102834, 0.45)
    pt3dadd(-876.643765923987, -793.3894509825, 204.418658763258, 0.45)
    pt3dadd(-877.456648472776, -792.812967950451, 204.501660423682, 0.45)
    pt3dadd(-878.269531021565, -792.236484918401, 204.584662084106, 0.45)
    pt3dadd(-879.082413570354, -791.660001886352, 204.667663744529, 0.45)
    pt3dadd(-879.895296119143, -791.083518854302, 204.750665404953, 0.45)
    pt3dadd(-880.708178667932, -790.507035822253, 204.833667065377, 0.45)
    pt3dadd(-881.521061216721, -789.930552790203, 204.9166687258, 0.45)
    pt3dadd(-882.33394376551, -789.354069758154, 204.999670386224, 0.45)
    pt3dadd(-883.146826314299, -788.777586726104, 205.082672046648, 0.45)
    pt3dadd(-883.959708863088, -788.201103694055, 205.165673707071, 0.45)
    pt3dadd(-884.772591411878, -787.624620662005, 205.248675367495, 0.45)
    pt3dadd(-885.585473960667, -787.048137629955, 205.331677027919, 0.45)
    pt3dadd(-886.398356509456, -786.471654597906, 205.414678688342, 0.45)
    pt3dadd(-887.211239058245, -785.895171565856, 205.497680348766, 0.45)
    pt3dadd(-888.024121607034, -785.318688533807, 205.58068200919, 0.45)
    pt3dadd(-888.837004155823, -784.742205501757, 205.663683669613, 0.45)
    pt3dadd(-889.649886704612, -784.165722469708, 205.746685330037, 0.45)
    pt3dadd(-890.462769253401, -783.589239437658, 205.829686990461, 0.45)
    pt3dadd(-891.27565180219, -783.012756405608, 205.912688650884, 0.45)
    pt3dadd(-892.088534350979, -782.436273373559, 205.995690311308, 0.45)
    pt3dadd(-892.901416899769, -781.859790341509, 206.078691971732, 0.45)
    pt3dadd(-893.714299448558, -781.28330730946, 206.161693632155, 0.45)
    pt3dadd(-894.527181997347, -780.70682427741, 206.244695292579, 0.45)
    pt3dadd(-895.340064546136, -780.130341245361, 206.327696953003, 0.45)
    pt3dadd(-896.152947094925, -779.553858213311, 206.410698613426, 0.45)
    pt3dadd(-896.965829643714, -778.977375181262, 206.49370027385, 0.45)
    pt3dadd(-897.778712192503, -778.400892149212, 206.576701934274, 0.45)
    pt3dadd(-898.591594741292, -777.824409117163, 206.659703594698, 0.45)
    pt3dadd(-899.404477290081, -777.247926085113, 206.742705255121, 0.45)
    pt3dadd(-900.21735983887, -776.671443053064, 206.825706915545, 0.45)
    pt3dadd(-901.03024238766, -776.094960021014, 206.908708575969, 0.45)
    pt3dadd(-901.843124936449, -775.518476988964, 206.991710236392, 0.45)
    pt3dadd(-902.656007485238, -774.941993956915, 207.074711896816, 0.45)
    pt3dadd(-903.468890034027, -774.365510924865, 207.15771355724, 0.45)
    pt3dadd(-904.281772582816, -773.789027892816, 207.240715217663, 0.45)
    pt3dadd(-905.094655131605, -773.212544860766, 207.323716878087, 0.45)
    pt3dadd(-905.907537680394, -772.636061828717, 207.406718538511, 0.45)
    pt3dadd(-906.720420229183, -772.059578796667, 207.489720198934, 0.45)
    pt3dadd(-907.533302777972, -771.483095764617, 207.572721859358, 0.45)
    pt3dadd(-908.346185326762, -770.906612732568, 207.655723519782, 0.45)
    pt3dadd(-909.159067875551, -770.330129700518, 207.738725180205, 0.45)
    pt3dadd(-909.97195042434, -769.753646668469, 207.821726840629, 0.45)
    pt3dadd(-910.784832973129, -769.177163636419, 207.904728501053, 0.45)
    pt3dadd(-911.597715521918, -768.60068060437, 207.987730161476, 0.45)
    pt3dadd(-912.410598070707, -768.02419757232, 208.0707318219, 0.45)
    pt3dadd(-913.223480619496, -767.447714540271, 208.153733482324, 0.45)
    pt3dadd(-914.036363168285, -766.871231508221, 208.236735142747, 0.45)
    pt3dadd(-914.849245717074, -766.294748476172, 208.319736803171, 0.45)
    pt3dadd(-915.662128265863, -765.718265444122, 208.402738463595, 0.45)
    pt3dadd(-916.475010814653, -765.141782412073, 208.485740124019, 0.45)
    pt3dadd(-917.287893363442, -764.565299380023, 208.568741784442, 0.45)
    pt3dadd(-918.100775912231, -763.988816347973, 208.651743444866, 0.45)
    pt3dadd(-918.91365846102, -763.412333315924, 208.73474510529, 0.45)
    pt3dadd(-919.726541009809, -762.835850283874, 208.817746765713, 0.45)
    pt3dadd(-920.539423558598, -762.259367251825, 208.900748426137, 0.45)
    pt3dadd(-921.352306107387, -761.682884219775, 208.983750086561, 0.45)
    pt3dadd(-922.165188656176, -761.106401187726, 209.066751746984, 0.45)
    pt3dadd(-922.978071204965, -760.529918155676, 209.149753407408, 0.45)
    pt3dadd(-923.790953753754, -759.953435123626, 209.232755067832, 0.45)
    pt3dadd(-924.603836302544, -759.376952091577, 209.315756728255, 0.45)
    pt3dadd(-925.416718851333, -758.800469059527, 209.398758388679, 0.45)
    pt3dadd(-926.229601400122, -758.223986027478, 209.481760049103, 0.45)
    pt3dadd(-927.042483948911, -757.647502995428, 209.564761709526, 0.45)
    pt3dadd(-927.8553664977, -757.071019963379, 209.64776336995, 0.45)
    pt3dadd(-928.668249046489, -756.494536931329, 209.730765030374, 0.45)
    pt3dadd(-929.481131595278, -755.91805389928, 209.813766690797, 0.45)
    pt3dadd(-930.294014144067, -755.34157086723, 209.896768351221, 0.45)
    pt3dadd(-931.106896692856, -754.765087835181, 209.979770011645, 0.45)
    pt3dadd(-931.919779241646, -754.188604803131, 210.062771672068, 0.45)
    pt3dadd(-932.732661790435, -753.612121771082, 210.145773332492, 0.45)
    pt3dadd(-933.545544339224, -753.035638739032, 210.228774992916, 0.45)
    pt3dadd(-934.358426888013, -752.459155706982, 210.31177665334, 0.45)
    pt3dadd(-935.171309436802, -751.882672674933, 210.394778313763, 0.45)
    pt3dadd(-935.984191985591, -751.306189642883, 210.477779974187, 0.45)
    pt3dadd(-936.79707453438, -750.729706610834, 210.560781634611, 0.45)
    pt3dadd(-937.609957083169, -750.153223578784, 210.643783295034, 0.45)
    pt3dadd(-938.422839631958, -749.576740546735, 210.726784955458, 0.45)
    pt3dadd(-939.235722180748, -749.000257514685, 210.809786615882, 0.45)
    pt3dadd(-940.048604729537, -748.423774482636, 210.892788276305, 0.45)
    pt3dadd(-940.861487278326, -747.847291450586, 210.975789936729, 0.45)
    pt3dadd(-941.674369827115, -747.270808418536, 211.058791597153, 0.45)
    pt3dadd(-942.487252375904, -746.694325386487, 211.141793257576, 0.45)
    pt3dadd(-943.300134924693, -746.117842354437, 211.224794918, 0.45)
    pt3dadd(-944.113017473482, -745.541359322388, 211.307796578424, 0.45)
    pt3dadd(-944.925900022271, -744.964876290338, 211.390798238847, 0.45)
    pt3dadd(-945.73878257106, -744.388393258289, 211.473799899271, 0.45)
    pt3dadd(-946.551665119849, -743.811910226239, 211.556801559695, 0.45)
    pt3dadd(-947.364547668639, -743.23542719419, 211.639803220118, 0.45)
    pt3dadd(-948.177430217428, -742.65894416214, 211.722804880542, 0.45)
    pt3dadd(-948.990312766217, -742.082461130091, 211.805806540966, 0.45)
    pt3dadd(-949.803195315006, -741.505978098041, 211.888808201389, 0.45)
    pt3dadd(-950.616077863795, -740.929495065991, 211.971809861813, 0.45)
    pt3dadd(-951.428960412584, -740.353012033942, 212.054811522237, 0.45)
    pt3dadd(-952.241842961373, -739.776529001892, 212.137813182661, 0.45)
    pt3dadd(-953.054725510162, -739.200045969843, 212.220814843084, 0.45)
    pt3dadd(-953.867608058951, -738.623562937793, 212.303816503508, 0.45)
    pt3dadd(-954.68049060774, -738.047079905744, 212.386818163932, 0.45)
    pt3dadd(-955.49337315653, -737.470596873694, 212.469819824355, 0.45)
    pt3dadd(-956.306255705319, -736.894113841645, 212.552821484779, 0.45)
    pt3dadd(-957.119138254108, -736.317630809595, 212.635823145203, 0.45)
    pt3dadd(-957.932020802897, -735.741147777546, 212.718824805626, 0.45)
    pt3dadd(-958.744903351686, -735.164664745496, 212.80182646605, 0.45)
    pt3dadd(-959.557785900475, -734.588181713446, 212.884828126474, 0.45)
    pt3dadd(-960.370668449264, -734.011698681397, 212.967829786897, 0.45)
    pt3dadd(-961.183550998053, -733.435215649347, 213.050831447321, 0.45)
    pt3dadd(-961.996433546842, -732.858732617298, 213.133833107745, 0.45)
    pt3dadd(-962.809316095632, -732.282249585248, 213.216834768168, 0.45)
    pt3dadd(-963.622198644421, -731.705766553199, 213.299836428592, 0.45)
    pt3dadd(-964.43508119321, -731.129283521149, 213.382838089016, 0.45)
    pt3dadd(-965.247963741999, -730.5528004891, 213.465839749439, 0.45)
    pt3dadd(-966.060846290788, -729.97631745705, 213.548841409863, 0.45)
    pt3dadd(-966.873728839577, -729.399834425, 213.631843070287, 0.45)
    pt3dadd(-967.686611388366, -728.823351392951, 213.71484473071, 0.45)
    pt3dadd(-968.499493937155, -728.246868360901, 213.797846391134, 0.45)
    pt3dadd(-969.312376485944, -727.670385328852, 213.880848051558, 0.45)
    pt3dadd(-970.125259034733, -727.093902296802, 213.963849711982, 0.45)
    pt3dadd(-970.938141583523, -726.517419264753, 214.046851372405, 0.45)
    pt3dadd(-971.751024132312, -725.940936232703, 214.129853032829, 0.45)
    pt3dadd(-972.563906681101, -725.364453200654, 214.212854693253, 0.45)
    pt3dadd(-973.37678922989, -724.787970168604, 214.295856353676, 0.45)
    pt3dadd(-974.189671778679, -724.211487136555, 214.3788580141, 0.45)
    pt3dadd(-975.002554327468, -723.635004104505, 214.461859674524, 0.45)
    pt3dadd(-975.815436876257, -723.058521072455, 214.544861334947, 0.45)
    pt3dadd(-976.628319425046, -722.482038040406, 214.627862995371, 0.45)
    pt3dadd(-977.441201973835, -721.905555008356, 214.710864655795, 0.45)
    pt3dadd(-978.254084522624, -721.329071976307, 214.793866316218, 0.45)
    pt3dadd(-979.066967071414, -720.752588944257, 214.876867976642, 0.45)
    pt3dadd(-979.879849620203, -720.176105912208, 214.959869637066, 0.45)
    pt3dadd(-980.692732168992, -719.599622880158, 215.042871297489, 0.45)
    pt3dadd(-981.505614717781, -719.023139848109, 215.125872957913, 0.45)
    pt3dadd(-982.31849726657, -718.446656816059, 215.208874618337, 0.45)
    pt3dadd(-983.131379815359, -717.870173784009, 215.29187627876, 0.45)
    pt3dadd(-983.944262364148, -717.29369075196, 215.374877939184, 0.45)
    pt3dadd(-984.757144912937, -716.71720771991, 215.457879599608, 0.45)
    pt3dadd(-985.570027461726, -716.140724687861, 215.540881260031, 0.45)
    pt3dadd(-986.382910010516, -715.564241655811, 215.623882920455, 0.45)
    pt3dadd(-987.195792559305, -714.987758623762, 215.706884580879, 0.45)
    pt3dadd(-988.008675108094, -714.411275591712, 215.789886241303, 0.45)
    pt3dadd(-988.821557656883, -713.834792559663, 215.872887901726, 0.45)
    pt3dadd(-989.634440205672, -713.258309527613, 215.95588956215, 0.45)
    pt3dadd(-990.447322754461, -712.681826495564, 216.038891222574, 0.45)
    pt3dadd(-991.26020530325, -712.105343463514, 216.121892882997, 0.45)
    pt3dadd(-992.073087852039, -711.528860431464, 216.204894543421, 0.45)
    pt3dadd(-992.885970400828, -710.952377399415, 216.287896203845, 0.45)
    pt3dadd(-993.698852949618, -710.375894367365, 216.370897864268, 0.45)
    pt3dadd(-994.511735498407, -709.799411335316, 216.453899524692, 0.45)
    pt3dadd(-995.324618047196, -709.222928303266, 216.536901185116, 0.45)
    pt3dadd(-996.137500595985, -708.646445271217, 216.619902845539, 0.45)
    pt3dadd(-996.950383144774, -708.069962239167, 216.702904505963, 0.45)
    pt3dadd(-997.763265693563, -707.493479207118, 216.785906166387, 0.45)
    pt3dadd(-998.576148242352, -706.916996175068, 216.86890782681, 0.45)
    pt3dadd(-999.389030791141, -706.340513143018, 216.951909487234, 0.45)
    pt3dadd(-1000.20191333993, -705.764030110969, 217.034911147658, 0.45)
    pt3dadd(-1001.01479588872, -705.187547078919, 217.117912808081, 0.45)
    pt3dadd(-1001.82767843751, -704.61106404687, 217.200914468505, 0.45)
    pt3dadd(-1002.6405609863, -704.03458101482, 217.283916128929, 0.45)
    pt3dadd(-1003.45344353509, -703.458097982771, 217.366917789353, 0.45)
    pt3dadd(-1004.26632608388, -702.881614950721, 217.449919449776, 0.45)
    pt3dadd(-1005.07920863267, -702.305131918672, 217.5329211102, 0.45)
    pt3dadd(-1005.89209118145, -701.728648886622, 217.615922770624, 0.45)
    pt3dadd(-1006.70497373024, -701.152165854573, 217.698924431047, 0.45)
    pt3dadd(-1007.51785627903, -700.575682822523, 217.781926091471, 0.45)
    pt3dadd(-1008.33073882782, -699.999199790473, 217.864927751895, 0.45)
    pt3dadd(-1009.14362137661, -699.422716758424, 217.947929412318, 0.45)
    pt3dadd(-1009.9565039254, -698.846233726374, 218.030931072742, 0.45)
    pt3dadd(-1010.76938647419, -698.269750694325, 218.113932733166, 0.45)
    pt3dadd(-1011.58226902298, -697.693267662275, 218.196934393589, 0.45)
    pt3dadd(-1012.39515157177, -697.116784630226, 218.279936054013, 0.45)
    pt3dadd(-1013.20803412056, -696.540301598176, 218.362937714437, 0.45)
    pt3dadd(-1014.02091666935, -695.963818566127, 218.44593937486, 0.45)
    pt3dadd(-1014.83379921813, -695.387335534077, 218.528941035284, 0.45)
    pt3dadd(-1015.64668176692, -694.810852502028, 218.611942695708, 0.45)
    pt3dadd(-1016.45956431571, -694.234369469978, 218.694944356131, 0.45)
    pt3dadd(-1017.2724468645, -693.657886437928, 218.777946016555, 0.45)
    pt3dadd(-1018.08532941329, -693.081403405879, 218.860947676979, 0.45)
    pt3dadd(-1018.89821196208, -692.504920373829, 218.943949337402, 0.45)
    pt3dadd(-1019.71109451087, -691.92843734178, 219.026950997826, 0.45)
    pt3dadd(-1020.52397705966, -691.35195430973, 219.10995265825, 0.45)
    pt3dadd(-1021.33685960845, -690.775471277681, 219.192954318673, 0.45)
    pt3dadd(-1022.14974215724, -690.198988245631, 219.275955979097, 0.45)
    pt3dadd(-1022.96262470603, -689.622505213582, 219.358957639521, 0.45)
    pt3dadd(-1023.77550725481, -689.046022181532, 219.441959299945, 0.45)
    pt3dadd(-1024.5883898036, -688.469539149482, 219.524960960368, 0.45)
    pt3dadd(-1025.40127235239, -687.893056117433, 219.607962620792, 0.45)
    pt3dadd(-1026.21415490118, -687.316573085383, 219.690964281216, 0.45)
    pt3dadd(-1027.02703744997, -686.740090053334, 219.773965941639, 0.45)
    pt3dadd(-1027.83991999876, -686.163607021284, 219.856967602063, 0.45)
    pt3dadd(-1028.65280254755, -685.587123989235, 219.939969262487, 0.45)
    pt3dadd(-1029.46568509634, -685.010640957185, 220.02297092291, 0.45)
    pt3dadd(-1030.27856764513, -684.434157925136, 220.105972583334, 0.45)
    pt3dadd(-1031.09145019392, -683.857674893086, 220.188974243758, 0.45)
    pt3dadd(-1031.90433274271, -683.281191861037, 220.271975904181, 0.45)
    pt3dadd(-1032.71721529149, -682.704708828987, 220.354977564605, 0.45)
    pt3dadd(-1033.53009784028, -682.128225796937, 220.437979225029, 0.45)
    pt3dadd(-1034.34298038907, -681.551742764888, 220.520980885452, 0.45)
    pt3dadd(-1035.15586293786, -680.975259732838, 220.603982545876, 0.45)
    pt3dadd(-1035.96874548665, -680.398776700789, 220.6869842063, 0.45)
    pt3dadd(-1036.78162803544, -679.822293668739, 220.769985866723, 0.45)
    pt3dadd(-1037.59451058423, -679.24581063669, 220.852987527147, 0.45)
    pt3dadd(-1038.40739313302, -678.66932760464, 220.935989187571, 0.45)
    pt3dadd(-1039.22027568181, -678.092844572591, 221.018990847994, 0.45)
    pt3dadd(-1040.0331582306, -677.516361540541, 221.101992508418, 0.45)
    pt3dadd(-1040.84604077939, -676.939878508491, 221.184994168842, 0.45)
    pt3dadd(-1041.65892332817, -676.363395476442, 221.267995829266, 0.45)
    pt3dadd(-1042.47180587696, -675.786912444392, 221.350997489689, 0.45)
    pt3dadd(-1043.28468842575, -675.210429412343, 221.433999150113, 0.45)
    pt3dadd(-1044.09757097454, -674.633946380293, 221.517000810537, 0.45)
    pt3dadd(-1044.91045352333, -674.057463348244, 221.60000247096, 0.45)
    pt3dadd(-1045.72333607212, -673.480980316194, 221.683004131384, 0.45)
    pt3dadd(-1046.53621862091, -672.904497284145, 221.766005791808, 0.45)
    pt3dadd(-1047.3491011697, -672.328014252095, 221.849007452231, 0.45)
    pt3dadd(-1048.16198371849, -671.751531220046, 221.932009112655, 0.45)
    pt3dadd(-1048.97486626728, -671.175048187996, 222.015010773079, 0.45)
    pt3dadd(-1049.78774881607, -670.598565155946, 222.098012433502, 0.45)
    pt3dadd(-1050.60063136485, -670.022082123897, 222.181014093926, 0.45)
    pt3dadd(-1051.41351391364, -669.445599091847, 222.26401575435, 0.45)
    pt3dadd(-1052.22639646243, -668.869116059798, 222.347017414773, 0.45)
    pt3dadd(-1053.03927901122, -668.292633027748, 222.430019075197, 0.45)
    pt3dadd(-1053.85216156001, -667.716149995699, 222.513020735621, 0.45)
    pt3dadd(-1054.6650441088, -667.139666963649, 222.596022396044, 0.45)
    pt3dadd(-1055.47792665759, -666.5631839316, 222.679024056468, 0.45)
    pt3dadd(-1056.29080920638, -665.98670089955, 222.762025716892, 0.45)
    pt3dadd(-1057.10369175517, -665.4102178675, 222.845027377315, 0.45)
    pt3dadd(-1057.91657430396, -664.833734835451, 222.928029037739, 0.45)
    pt3dadd(-1058.72945685275, -664.257251803401, 223.011030698163, 0.45)
    pt3dadd(-1059.54233940153, -663.680768771352, 223.094032358587, 0.45)
    pt3dadd(-1060.35522195032, -663.104285739302, 223.17703401901, 0.45)
    pt3dadd(-1061.16810449911, -662.527802707253, 223.260035679434, 0.45)
    pt3dadd(-1061.9809870479, -661.951319675203, 223.343037339858, 0.45)
    pt3dadd(-1062.79386959669, -661.374836643154, 223.426039000281, 0.45)
    pt3dadd(-1063.60675214548, -660.798353611104, 223.509040660705, 0.45)
    pt3dadd(-1064.41963469427, -660.221870579055, 223.592042321129, 0.45)
    pt3dadd(-1065.23251724306, -659.645387547005, 223.675043981552, 0.45)
    pt3dadd(-1066.04539979185, -659.068904514955, 223.758045641976, 0.45)
    pt3dadd(-1066.85828234064, -658.492421482906, 223.8410473024, 0.45)
    pt3dadd(-1067.67116488943, -657.915938450856, 223.924048962823, 0.45)
    pt3dadd(-1068.48404743821, -657.339455418807, 224.007050623247, 0.45)
    pt3dadd(-1069.296929987, -656.762972386757, 224.090052283671, 0.45)
    pt3dadd(-1070.10981253579, -656.186489354708, 224.173053944094, 0.45)
    pt3dadd(-1070.92269508458, -655.610006322658, 224.256055604518, 0.45)
    pt3dadd(-1071.73557763337, -655.033523290609, 224.339057264942, 0.45)
    pt3dadd(-1072.54846018216, -654.457040258559, 224.422058925365, 0.45)
  }
}
proc shape3d_6() {
  axon[0] {
    pt3dadd(-1073.36134273095, -653.88055722651, 224.505060585789, 0.45)
    pt3dadd(-1074.17422527974, -653.30407419446, 224.588062246213, 0.45)
    pt3dadd(-1074.98710782853, -652.72759116241, 224.671063906636, 0.45)
    pt3dadd(-1075.79999037732, -652.151108130361, 224.75406556706, 0.45)
    pt3dadd(-1076.61287292611, -651.574625098311, 224.837067227484, 0.45)
    pt3dadd(-1077.4257554749, -650.998142066262, 224.920068887908, 0.45)
    pt3dadd(-1078.23863802368, -650.421659034212, 225.003070548331, 0.45)
    pt3dadd(-1079.05152057247, -649.845176002163, 225.086072208755, 0.45)
    pt3dadd(-1079.86440312126, -649.268692970113, 225.169073869179, 0.45)
    pt3dadd(-1080.67728567005, -648.692209938064, 225.252075529602, 0.45)
    pt3dadd(-1081.49016821884, -648.115726906014, 225.335077190026, 0.45)
    pt3dadd(-1082.30305076763, -647.539243873964, 225.41807885045, 0.45)
    pt3dadd(-1083.11593331642, -646.962760841915, 225.501080510873, 0.45)
    pt3dadd(-1083.92881586521, -646.386277809865, 225.584082171297, 0.45)
    pt3dadd(-1084.741698414, -645.809794777816, 225.667083831721, 0.45)
    pt3dadd(-1085.55458096279, -645.233311745766, 225.750085492144, 0.45)
    pt3dadd(-1086.36746351158, -644.656828713717, 225.833087152568, 0.45)
    pt3dadd(-1087.18034606036, -644.080345681667, 225.916088812992, 0.45)
    pt3dadd(-1087.99322860915, -643.503862649618, 225.999090473415, 0.45)
    pt3dadd(-1088.80611115794, -642.927379617568, 226.082092133839, 0.45)
    pt3dadd(-1089.61899370673, -642.350896585519, 226.165093794263, 0.45)
    pt3dadd(-1090.43187625552, -641.774413553469, 226.248095454686, 0.45)
    pt3dadd(-1091.24475880431, -641.197930521419, 226.33109711511, 0.45)
    pt3dadd(-1092.0576413531, -640.62144748937, 226.414098775534, 0.45)
    pt3dadd(-1092.87052390189, -640.04496445732, 226.497100435957, 0.45)
    pt3dadd(-1093.68340645068, -639.468481425271, 226.580102096381, 0.45)
    pt3dadd(-1094.49628899947, -638.891998393221, 226.663103756805, 0.45)
    pt3dadd(-1095.30917154826, -638.315515361172, 226.746105417229, 0.45)
    pt3dadd(-1096.12205409704, -637.739032329122, 226.829107077652, 0.45)
    pt3dadd(-1096.93493664583, -637.162549297073, 226.912108738076, 0.45)
    pt3dadd(-1097.74781919462, -636.586066265023, 226.9951103985, 0.45)
    pt3dadd(-1098.56070174341, -636.009583232973, 227.078112058923, 0.45)
    pt3dadd(-1099.3735842922, -635.433100200924, 227.161113719347, 0.45)
    pt3dadd(-1100.18646684099, -634.856617168874, 227.244115379771, 0.45)
    pt3dadd(-1100.99934938978, -634.280134136825, 227.327117040194, 0.45)
    pt3dadd(-1101.81223193857, -633.703651104775, 227.410118700618, 0.45)
    pt3dadd(-1102.62511448736, -633.127168072726, 227.493120361042, 0.45)
    pt3dadd(-1103.43799703615, -632.550685040676, 227.576122021465, 0.45)
    pt3dadd(-1104.25087958494, -631.974202008627, 227.659123681889, 0.45)
    pt3dadd(-1105.06376213372, -631.397718976577, 227.742125342313, 0.45)
    pt3dadd(-1105.87664468251, -630.821235944528, 227.825127002736, 0.45)
    pt3dadd(-1106.6895272313, -630.244752912478, 227.90812866316, 0.45)
    pt3dadd(-1107.50240978009, -629.668269880428, 227.991130323584, 0.45)
    pt3dadd(-1108.31529232888, -629.091786848379, 228.074131984007, 0.45)
    pt3dadd(-1109.12817487767, -628.515303816329, 228.157133644431, 0.45)
    pt3dadd(-1109.94105742646, -627.93882078428, 228.240135304855, 0.45)
    pt3dadd(-1110.75393997525, -627.36233775223, 228.323136965278, 0.45)
    pt3dadd(-1111.56682252404, -626.785854720181, 228.406138625702, 0.45)
    pt3dadd(-1112.37970507283, -626.209371688131, 228.489140286126, 0.45)
    pt3dadd(-1113.19258762162, -625.632888656082, 228.57214194655, 0.45)
    pt3dadd(-1114.0054701704, -625.056405624032, 228.655143606973, 0.45)
    pt3dadd(-1114.81835271919, -624.479922591982, 228.738145267397, 0.45)
    pt3dadd(-1115.63123526798, -623.903439559933, 228.821146927821, 0.45)
    pt3dadd(-1116.44411781677, -623.326956527883, 228.904148588244, 0.45)
    pt3dadd(-1117.25700036556, -622.750473495834, 228.987150248668, 0.45)
    pt3dadd(-1118.06988291435, -622.173990463784, 229.070151909092, 0.45)
    pt3dadd(-1118.88276546314, -621.597507431735, 229.153153569515, 0.45)
    pt3dadd(-1119.69564801193, -621.021024399685, 229.236155229939, 0.45)
    pt3dadd(-1120.50853056072, -620.444541367636, 229.319156890363, 0.45)
    pt3dadd(-1121.32141310951, -619.868058335586, 229.402158550786, 0.45)
    pt3dadd(-1122.1342956583, -619.291575303537, 229.48516021121, 0.45)
    pt3dadd(-1122.94717820709, -618.715092271487, 229.568161871634, 0.45)
    pt3dadd(-1123.76006075587, -618.138609239437, 229.651163532057, 0.45)
    pt3dadd(-1124.57294330466, -617.562126207388, 229.734165192481, 0.45)
    pt3dadd(-1125.38582585345, -616.985643175338, 229.817166852905, 0.45)
    pt3dadd(-1126.19870840224, -616.409160143289, 229.900168513328, 0.45)
    pt3dadd(-1127.01159095103, -615.832677111239, 229.983170173752, 0.45)
    pt3dadd(-1127.82447349982, -615.25619407919, 230.066171834176, 0.45)
    pt3dadd(-1128.63735604861, -614.67971104714, 230.149173494599, 0.45)
    pt3dadd(-1129.4502385974, -614.103228015091, 230.232175155023, 0.45)
    pt3dadd(-1130.26312114619, -613.526744983041, 230.315176815447, 0.45)
    pt3dadd(-1131.07600369498, -612.950261950991, 230.398178475871, 0.45)
    pt3dadd(-1131.88888624377, -612.373778918942, 230.481180136294, 0.45)
    pt3dadd(-1132.70176879255, -611.797295886892, 230.564181796718, 0.45)
    pt3dadd(-1133.51465134134, -611.220812854843, 230.647183457142, 0.45)
    pt3dadd(-1134.32753389013, -610.644329822793, 230.730185117565, 0.45)
    pt3dadd(-1135.14041643892, -610.067846790744, 230.813186777989, 0.45)
    pt3dadd(-1135.95329898771, -609.491363758694, 230.896188438413, 0.45)
    pt3dadd(-1136.7661815365, -608.914880726645, 230.979190098836, 0.45)
    pt3dadd(-1137.57906408529, -608.338397694595, 231.06219175926, 0.45)
    pt3dadd(-1138.39194663408, -607.761914662546, 231.145193419684, 0.45)
    pt3dadd(-1139.20482918287, -607.185431630496, 231.228195080107, 0.45)
    pt3dadd(-1140.01771173166, -606.608948598446, 231.311196740531, 0.45)
    pt3dadd(-1140.83059428045, -606.032465566397, 231.394198400955, 0.45)
    pt3dadd(-1141.64347682923, -605.455982534347, 231.477200061378, 0.45)
    pt3dadd(-1142.45635937802, -604.879499502298, 231.560201721802, 0.45)
    pt3dadd(-1143.26924192681, -604.303016470248, 231.643203382226, 0.45)
    pt3dadd(-1144.0821244756, -603.726533438199, 231.726205042649, 0.45)
    pt3dadd(-1144.89500702439, -603.150050406149, 231.809206703073, 0.45)
    pt3dadd(-1145.70788957318, -602.5735673741, 231.892208363497, 0.45)
    pt3dadd(-1146.52077212197, -601.99708434205, 231.97521002392, 0.45)
    pt3dadd(-1147.33365467076, -601.420601310001, 232.058211684344, 0.45)
    pt3dadd(-1148.14653721955, -600.844118277951, 232.141213344768, 0.45)
    pt3dadd(-1148.95941976834, -600.267635245901, 232.224215005192, 0.45)
    pt3dadd(-1149.77230231713, -599.691152213852, 232.307216665615, 0.45)
    pt3dadd(-1150.58518486591, -599.114669181802, 232.390218326039, 0.45)
    pt3dadd(-1151.3980674147, -598.538186149753, 232.473219986463, 0.45)
    pt3dadd(-1152.21094996349, -597.961703117703, 232.556221646886, 0.45)
    pt3dadd(-1153.02383251228, -597.385220085654, 232.63922330731, 0.45)
    pt3dadd(-1153.83671506107, -596.808737053604, 232.722224967734, 0.45)
    pt3dadd(-1154.64959760986, -596.232254021555, 232.805226628157, 0.45)
    pt3dadd(-1155.46248015865, -595.655770989505, 232.888228288581, 0.45)
    pt3dadd(-1156.27536270744, -595.079287957455, 232.971229949005, 0.45)
    pt3dadd(-1157.08824525623, -594.502804925406, 233.054231609428, 0.45)
    pt3dadd(-1157.90112780502, -593.926321893356, 233.137233269852, 0.45)
    pt3dadd(-1158.71401035381, -593.349838861307, 233.220234930276, 0.45)
    pt3dadd(-1159.52689290259, -592.773355829257, 233.303236590699, 0.45)
    pt3dadd(-1160.33977545138, -592.196872797208, 233.386238251123, 0.45)
    pt3dadd(-1161.15265800017, -591.620389765158, 233.469239911547, 0.45)
    pt3dadd(-1161.96554054896, -591.043906733109, 233.55224157197, 0.45)
  }
  soma[2] {pt3dclear()
    pt3dadd(-64.5740996836713, -1369.296, 121.5, 12.1846420070173)
    pt3dadd(-63.7612171348823, -1369.87248303205, 121.416998339576, 12.1846420070173)
    pt3dadd(-62.948334586093, -1370.4489660641, 121.333996679153, 11.7581752935223)
    pt3dadd(-62.1354520373039, -1371.02544909615, 121.250995018729, 11.0640053415106)
    pt3dadd(-61.3225694885147, -1371.6019321282, 121.167993358305, 10.1401444401549)
    pt3dadd(-60.5096869397256, -1372.17841516025, 121.084991697882, 9.03061887448605)
    pt3dadd(-59.6968043909363, -1372.7548981923, 121.001990037458, 7.78331896311878)
    pt3dadd(-58.8839218421472, -1373.33138122435, 120.918988377034, 6.46179931440569)
    pt3dadd(-58.071039293358, -1373.9078642564, 120.835986716611, 5.12594315182069)
    pt3dadd(-57.2581567445689, -1374.48434728845, 120.752985056187, 3.83847909557515)
  }
  GCL[0] {pt3dclear()
    pt3dadd(-57.2581567445689, -1374.48434728845, 120.752985056187, 2.66194985588408)
    pt3dadd(-56.4452741957797, -1375.06083032049, 120.669983395763, 2.66194985588408)
    pt3dadd(-55.6323916469905, -1375.63731335254, 120.58698173534, 2.20271386043512)
    pt3dadd(-54.8195090982014, -1376.21379638459, 120.503980074916, 2.19455863692759)
    pt3dadd(-54.0066265494122, -1376.79027941664, 120.420978414492, 2.18642325175712)
    pt3dadd(-53.193744000623, -1377.36676244869, 120.337976754069, 2.17830660499126)
    pt3dadd(-52.3808614518339, -1377.94324548074, 120.254975093645, 2.17020988805675)
    pt3dadd(-51.5679789030447, -1378.51972851279, 120.171973433221, 2.16213211329215)
    pt3dadd(-50.7550963542556, -1379.09621154484, 120.088971772797, 2.154073769334)
    pt3dadd(-49.9421822640982, -1379.67096431731, 119.996426334276, 2.14604209994599)
    pt3dadd(-49.1387248289699, -1380.21083980917, 119.751496856349, 2.13823368565579)
    pt3dadd(-48.3369787155079, -1380.74533721815, 119.484072681398, 2.13047725034303)
    pt3dadd(-47.535232602046, -1381.27983462712, 119.216648506448, 2.12273860280878)
    pt3dadd(-46.7334864885839, -1381.8143320361, 118.949224331498, 2.1150178614229)
    pt3dadd(-45.9317403751219, -1382.34882944507, 118.681800156547, 2.10731589394034)
    pt3dadd(-45.1376464828767, -1382.83130266693, 118.337468602377, 2.09986857892908)
    pt3dadd(-44.3602358547736, -1383.20310774994, 117.830128779809, 2.09294267857858)
    pt3dadd(-43.5828252266706, -1383.57491283294, 117.32278895724, 2.08603155167516)
    pt3dadd(-42.8054145985676, -1383.94671791595, 116.815449134672, 2.07913532775334)
    pt3dadd(-42.0280039704646, -1384.31852299895, 116.308109312104, 2.07225415169678)
    pt3dadd(-41.2505933423615, -1384.69032808196, 115.800769489536, 2.06538774908731)
    pt3dadd(-40.4731827142585, -1385.06213316497, 115.293429666968, 2.05853611992492)
    pt3dadd(-39.6957720861556, -1385.43393824797, 114.786089844399, 2.05169926420961)
    pt3dadd(-38.9183614580526, -1385.80574333098, 114.278750021831, 2.04487718194138)
    pt3dadd(-38.1752904010239, -1386.34852746397, 114, 2.03756502685772)
    pt3dadd(-37.4929721506638, -1387.07958273221, 114, 2.02978638212759)
    pt3dadd(-36.8106539003038, -1387.81063800046, 114, 2.02202675622099)
  }
  GCL[1] {pt3dclear()
    pt3dadd(-36.8106539003038, -1387.81063800046, 114, 2.04819251019861)
    pt3dadd(-36.0605306679756, -1388.44980646775, 114.088481283273, 2.04819251019861)
    pt3dadd(-35.2161944811023, -1388.93610136019, 114.313456128808, 2.04077923662406)
    pt3dadd(-34.3718582942291, -1389.42239625263, 114.538430974343, 2.03338308463863)
    pt3dadd(-33.5275221073558, -1389.90869114507, 114.763405819878, 2.02600516406386)
    pt3dadd(-32.6831859204826, -1390.39498603751, 114.988380665413, 2.01864442106471)
    pt3dadd(-31.8388497336094, -1390.88128092995, 115.213355510948, 2.01130112650306)
    pt3dadd(-30.9945135467361, -1391.36757582239, 115.438330356483, 2.00397579249019)
    pt3dadd(-30.2005584519003, -1391.8946331545, 115.73681209442, 1.99681118694648)
    pt3dadd(-29.4260939885479, -1392.43675827884, 116.062856791595, 1.98971978286534)
    pt3dadd(-28.6516295251955, -1392.97888340319, 116.388901488771, 1.9826452901213)
    pt3dadd(-27.8771650618431, -1393.52100852754, 116.714946185947, 1.97558710868147)
    pt3dadd(-27.0862902237418, -1394.05856042547, 117, 1.96846964296278)
    pt3dadd(-26.2133539111583, -1394.54639461264, 117, 1.96107261918922)
    pt3dadd(-25.3404175985746, -1395.03422879981, 117, 1.95369343461938)
    pt3dadd(-24.4674812859911, -1395.52206298699, 117, 1.94633323161758)
    pt3dadd(-23.5675845684082, -1395.94706475675, 117, 1.93899106809058)
    pt3dadd(-22.6073362710725, -1396.22615916402, 117, 1.93166746884981)
    pt3dadd(-21.6466220882314, -1396.50369881684, 117, 1.92436232873189)
    pt3dadd(-20.6859079053903, -1396.78123846966, 117, 1.91707532830173)
    pt3dadd(-19.7272136998346, -1397.06533145322, 117.002430196765, 1.90980729813862)
  }
  GCL[2] {pt3dclear()
    pt3dadd(-19.7272136998346, -1397.06533145322, 117.002430196765, 1.88377410881474)
    pt3dadd(-18.974215683753, -1397.61692331302, 116.713337708285, 1.88377410881474)
    pt3dadd(-18.2574766610788, -1398.22668636216, 116.374997351131, 1.87688099190735)
    pt3dadd(-17.5407376384047, -1398.8364494113, 116.036656993977, 1.87000503728552)
    pt3dadd(-16.8239986157306, -1399.44621246044, 115.698316636824, 1.86314573405614)
    pt3dadd(-16.1072595930566, -1400.05597550958, 115.35997627967, 1.85630320648049)
    pt3dadd(-15.3905205703824, -1400.66573855872, 115.021635922517, 1.84947816563652)
    pt3dadd(-14.6737815477084, -1401.27550160786, 114.683295565363, 1.842669776185)
    pt3dadd(-13.9570425250342, -1401.88526465701, 114.344955208209, 1.83587803812594)
    pt3dadd(-13.2361613556229, -1402.49873588807, 114.031131050238, 1.82906703463033)
    pt3dadd(-12.476823267053, -1403.14701836966, 114, 1.82193158100875)
    pt3dadd(-11.7163990958858, -1403.79644510141, 114, 1.81480445029352)
    pt3dadd(-10.9559749247185, -1404.44587183315, 114, 1.80769669514327)
    pt3dadd(-10.1955507535512, -1405.0952985649, 114, 1.80060728699882)
    pt3dadd(-9.43512658238399, -1405.74472529664, 114, 1.79353752806874)
    pt3dadd(-8.67470241121669, -1406.39415202839, 114, 1.78648619743974)
    pt3dadd(-7.91427824004938, -1407.04357876013, 114, 1.77945407978515)
    pt3dadd(-7.1538540688822, -1407.69300549188, 114, 1.77244082667161)
    pt3dadd(-6.39342989771501, -1408.34243222362, 114, 1.76544635029252)
    pt3dadd(-5.63300572654771, -1408.99185895536, 114, 1.75847117469442)
    pt3dadd(-4.87321668480354, -1409.64196869871, 114.005609657583, 1.75151459112322)
  }
  GCL[3] {pt3dclear()
    pt3dadd(-4.87321668480354, -1409.64196869871, 114.005609657583, 1.83233639063484)
    pt3dadd(-4.24902651602827, -1410.39891956306, 113.812518247167, 1.83233639063484)
    pt3dadd(-3.6227984830108, -1411.15621857973, 113.627216736084, 1.82572550143508)
    pt3dadd(-2.9965704499931, -1411.91351759641, 113.441915225, 1.81913068050183)
    pt3dadd(-2.37034241697552, -1412.67081661308, 113.256613713916, 1.81255205950129)
    pt3dadd(-1.74411438395794, -1413.42811562975, 113.071312202833, 1.8059890230218)
    pt3dadd(-1.11788635094035, -1414.18541464642, 112.886010691749, 1.799442555307)
    pt3dadd(-0.49165831792277, -1414.9427136631, 112.700709180665, 1.79291178702672)
    pt3dadd(0.137768683813306, -1415.69699760413, 112.514817853649, 1.78639768698429)
    pt3dadd(0.836528503980389, -1416.38398598349, 112.316244135314, 1.77991501570344)
    pt3dadd(1.54486995505533, -1417.0608455923, 112.115960689524, 1.77344996025831)
    pt3dadd(2.25321140613016, -1417.7377052011, 111.915677243734, 1.76700125170717)
  }
  adendIML[0] {pt3dclear()
    pt3dadd(2.25321140613016, -1417.7377052011, 111.915677243734, 1.76056829803746)
    pt3dadd(2.96155285720511, -1418.41456480991, 111.715393797944, 1.76056829803746)
    pt3dadd(3.66989430828005, -1419.09142441871, 111.515110352154, 1.75415105561974)
    pt3dadd(4.37823575935499, -1419.76828402752, 111.314826906364, 1.74775020372546)
    pt3dadd(5.08657721042994, -1420.44514363632, 111.114543460575, 1.74136486238609)
    pt3dadd(5.72901503460787, -1421.18230974068, 110.924506038036, 1.73498379710583)
    pt3dadd(6.2814414881118, -1421.9971387596, 110.748782723142, 1.72860249582893)
    pt3dadd(6.83386794161584, -1422.81196777852, 110.573059408247, 1.72223691527095)
    pt3dadd(7.38629439511976, -1423.62679679744, 110.397336093353, 1.71588798159403)
    pt3dadd(7.9387208486238, -1424.44162581635, 110.221612778459, 1.70955467661628)
    pt3dadd(8.49114730212784, -1425.25645483527, 110.045889463564, 1.70323762598922)
    pt3dadd(9.04357375563177, -1426.07128385419, 109.87016614867, 1.69693668861145)
    pt3dadd(9.59600020913581, -1426.88611287311, 109.694442833775, 1.6906514290145)
    pt3dadd(10.1549597372789, -1427.69556525266, 109.515658436344, 1.68438623043419)
    pt3dadd(10.7988400472136, -1428.42727326745, 109.29656993418, 1.67818506897266)
    pt3dadd(11.4600929110667, -1429.14214122837, 109.069175016706, 1.67201021597676)
    pt3dadd(12.1213457749196, -1429.8570091893, 108.841780099232, 1.6658513040658)
    pt3dadd(12.7825986387728, -1430.57187715022, 108.614385181758, 1.65970775362588)
    pt3dadd(13.4438515026258, -1431.28674511114, 108.386990264284, 1.65358036164837)
    pt3dadd(14.1051043664788, -1432.00161307206, 108.15959534681, 1.64746857754512)
    pt3dadd(14.7214342048477, -1432.76499092413, 108, 1.64131343799077)
    pt3dadd(15.2243277831514, -1433.62933926184, 108, 1.63508293303997)
    pt3dadd(15.727221361455, -1434.49368759955, 108, 1.62886844810658)
    pt3dadd(16.2301149397587, -1435.35803593726, 108, 1.62267097722103)
    pt3dadd(16.7330085180623, -1436.22238427497, 108, 1.61648974035367)
    pt3dadd(17.235902096366, -1437.08673261268, 108, 1.61032513662341)
    pt3dadd(17.7387956746696, -1437.95108095039, 108, 1.60417714782209)
    pt3dadd(18.2432392243462, -1438.8143468352, 107.997337852674, 1.59804599935658)
    pt3dadd(18.8233411895488, -1439.61456563159, 107.857474229752, 1.59199346825378)
    pt3dadd(19.4227123717029, -1440.39514205486, 107.680119688119, 1.58598388752923)
    pt3dadd(20.022083553857, -1441.17571847813, 107.502765146487, 1.5799907246448)
    pt3dadd(20.6214547360111, -1441.9562949014, 107.325410604855, 1.57401349497565)
    pt3dadd(21.2208259181651, -1442.73687132467, 107.148056063222, 1.5680521029002)
    pt3dadd(21.8201971003192, -1443.51744774794, 106.97070152159, 1.56210722428646)
    pt3dadd(22.4195682824733, -1444.29802417121, 106.793346979958, 1.55617796701875)
    pt3dadd(23.0189394646274, -1445.07860059448, 106.615992438325, 1.55026507546166)
    pt3dadd(23.6350514806793, -1445.85397156826, 106.5, 1.54433285331202)
    pt3dadd(24.2809937221455, -1446.61735785363, 106.5, 1.53836456432633)
    pt3dadd(24.9269359636116, -1447.380744139, 106.5, 1.5324131985074)
    pt3dadd(25.5728782050779, -1448.14413042437, 106.5, 1.5264778527059)
    pt3dadd(26.2242116539711, -1448.89332812026, 106.417782737941, 1.52059875643286)
    pt3dadd(26.8801358902614, -1449.60712802445, 106.172317683374, 1.51486319943387)
    pt3dadd(27.5360601265517, -1450.32092792865, 105.926852628807, 1.50914321729676)
    pt3dadd(28.191984362842, -1451.03472783285, 105.68138757424, 1.50343917823053)
    pt3dadd(28.8479085991323, -1451.74852773705, 105.435922519673, 1.49775039023361)
    pt3dadd(29.5038328354226, -1452.46232764125, 105.190457465107, 1.49207742750794)
    pt3dadd(30.1552767595166, -1453.18977989319, 105.001676301785, 1.48638069085601)
    pt3dadd(30.7912556109118, -1453.9614753015, 105, 1.48057491550934)
  }
}
proc shape3d_7() {
  adendIML[0] {
    pt3dadd(31.4269628637728, -1454.73340553712, 105, 1.47478627626456)
    pt3dadd(32.062670116634, -1455.50533577273, 105, 1.46901365703719)
    pt3dadd(32.698377369495, -1456.27726600835, 105, 1.46325793252474)
    pt3dadd(33.3431454598447, -1457.04119913947, 104.989657547138, 1.45751947196177)
  }
  adendIML[1] {pt3dclear()
    pt3dadd(33.3431454598447, -1457.04119913947, 104.989657547138, 1.47746259388593)
    pt3dadd(34.2248257053454, -1457.49493079177, 105, 1.47746259388593)
    pt3dadd(35.1133505929498, -1457.95375921733, 105, 1.47177729086389)
    pt3dadd(36.0018754805542, -1458.4125876429, 105, 1.46610753561832)
    pt3dadd(36.8904003681586, -1458.87141606847, 105, 1.46045436472384)
    pt3dadd(37.7789252557631, -1459.33024449403, 105, 1.45481667615072)
    pt3dadd(38.6674501433674, -1459.7890729196, 105, 1.44919533471305)
    pt3dadd(39.5559750309718, -1460.24790134517, 105, 1.44358977826749)
    pt3dadd(40.4492755739449, -1460.69361946579, 104.991450060462, 1.43800270216389)
    pt3dadd(41.4112866954542, -1460.91418195052, 104.839835597658, 1.43249072667538)
    pt3dadd(42.3784579997337, -1461.10224303746, 104.668918378642, 1.42700815305554)
    pt3dadd(43.3456293040132, -1461.2903041244, 104.498001159627, 1.42154177132181)
    pt3dadd(44.3128006082926, -1461.47836521134, 104.327083940611, 1.41609052514117)
    pt3dadd(45.279971912572, -1461.66642629829, 104.156166721595, 1.41065492390117)
    pt3dadd(46.2471432168514, -1461.85448738523, 103.985249502579, 1.40523500515974)
    pt3dadd(47.2143145211309, -1462.04254847217, 103.814332283563, 1.39983021110041)
    pt3dadd(48.1814858254103, -1462.23060955912, 103.643415064547, 1.39444159311124)
    pt3dadd(49.1374238661282, -1462.47285787346, 103.5055884702, 1.3890478822468)
    pt3dadd(50.0300510975254, -1462.92217055888, 103.5, 1.38361737769751)
    pt3dadd(50.9191869079135, -1463.3798139907, 103.5, 1.37820188886218)
    pt3dadd(51.8083227183015, -1463.83745742251, 103.5, 1.37280215805896)
    pt3dadd(52.6974585286895, -1464.29510085433, 103.5, 1.36741880135119)
    pt3dadd(53.5865943390776, -1464.75274428615, 103.5, 1.36205092696478)
    pt3dadd(54.4757301494657, -1465.21038771797, 103.5, 1.35669960996946)
    pt3dadd(55.3648659598538, -1465.66803114978, 103.5, 1.35136386771061)
    pt3dadd(56.2540017702418, -1466.1256745816, 103.5, 1.346044314717)
    pt3dadd(57.1634260070266, -1466.53238246448, 103.5, 1.34074069614782)
    pt3dadd(58.1429056001039, -1466.73158165625, 103.5, 1.33545292460203)
    pt3dadd(59.125060791996, -1466.91965392703, 103.5, 1.33018143608725)
    pt3dadd(60.1072159838882, -1467.10772619782, 103.5, 1.32492542989383)
    pt3dadd(61.0893711757803, -1467.29579846861, 103.5, 1.31968606853519)
    pt3dadd(62.0715263676725, -1467.4838707394, 103.5, 1.31446219446933)
    pt3dadd(62.9947633866724, -1467.8328480706, 103.5, 1.30925459851493)
    pt3dadd(63.8601896721535, -1468.33388434114, 103.5, 1.30406285361955)
    pt3dadd(64.7143387418117, -1468.84932881307, 103.5, 1.2988870198366)
    pt3dadd(65.3357118710537, -1469.6299118364, 103.5, 1.29372740588387)
    pt3dadd(65.9200165968988, -1470.44144617785, 103.5, 1.28858337103379)
    pt3dadd(66.5043213227437, -1471.25298051931, 103.5, 1.28345586711855)
    pt3dadd(67.2232890040914, -1471.86062537355, 103.571283200282, 1.27837621062034)
    pt3dadd(68.1885669580369, -1472.0019224429, 103.789983704378, 1.2733943763678)
    pt3dadd(69.1543866176228, -1472.13989667999, 104.009427307745, 1.26842833078176)
    pt3dadd(70.1202062772087, -1472.27787091707, 104.228870911111, 1.26347736285911)
    pt3dadd(71.0860259367947, -1472.41584515415, 104.448314514478, 1.2585421169329)
    pt3dadd(72.0518455963806, -1472.55381939124, 104.667758117844, 1.25362176112015)
    pt3dadd(73.0176652559666, -1472.69179362832, 104.887201721211, 1.24871683817386)
  }
  adendMML[0] {pt3dclear()
    pt3dadd(73.0176652559666, -1472.69179362832, 104.887201721211, 1.24376157459337)
    pt3dadd(73.8739831740066, -1473.12258290333, 105, 1.24376157459337)
    pt3dadd(74.5810899551933, -1473.82968968452, 105, 1.2387750702494)
    pt3dadd(75.2881967363797, -1474.53679646571, 105, 1.23380496632407)
    pt3dadd(75.9953035175664, -1475.24390324689, 105, 1.22885034472011)
    pt3dadd(76.7024102987529, -1475.95101002808, 105, 1.22391225418405)
    pt3dadd(77.5013549776529, -1476.51516653531, 105.157230763952, 1.21906634458847)
    pt3dadd(78.3402329632281, -1477.00755143989, 105.389267034958, 1.21428319259608)
    pt3dadd(79.1791109488033, -1477.49993634447, 105.621303305963, 1.20951543539211)
    pt3dadd(80.0179889343787, -1477.99232124904, 105.853339576969, 1.2047624974813)
    pt3dadd(80.8568669199539, -1478.48470615362, 106.085375847974, 1.20002510718401)
    pt3dadd(81.6957449055291, -1478.9770910582, 106.31741211898, 1.1953028095873)
    pt3dadd(82.5296323425825, -1479.49376639124, 106.5, 1.19055681474338)
    pt3dadd(83.3320946835287, -1480.09046915758, 106.5, 1.1857441069954)
    pt3dadd(84.1345570244747, -1480.68717192393, 106.5, 1.18094688156877)
    pt3dadd(84.9370193654208, -1481.28387469027, 106.5, 1.17616602451709)
    pt3dadd(85.739481706367, -1481.88057745662, 106.5, 1.17140093121802)
    pt3dadd(86.5419440473132, -1482.47728022296, 106.5, 1.16665183816805)
    pt3dadd(87.4324816208913, -1482.9069444285, 106.5, 1.16191887040865)
    pt3dadd(88.4007589446006, -1483.15682244753, 106.5, 1.15720156956439)
    pt3dadd(89.36903626831, -1483.40670046655, 106.5, 1.15250071907767)
    pt3dadd(90.3373135920193, -1483.65657848557, 106.5, 1.14781535091231)
    pt3dadd(91.2252810181845, -1484.10624792878, 106.5, 1.14314646744335)
    pt3dadd(92.0773676183094, -1484.6296474781, 106.5, 1.13849321852565)
    pt3dadd(93.0585355604927, -1484.78725816904, 106.5, 1.13385611261353)
    pt3dadd(94.0504172251785, -1484.91442248503, 106.5, 1.12923499578661)
    pt3dadd(95.0422988898645, -1485.04158680102, 106.5, 1.1246296537432)
    pt3dadd(96.0341805545503, -1485.168751117, 106.5, 1.12004066904383)
    pt3dadd(96.9835708598171, -1485.41636621023, 106.571644556925, 1.11549447593026)
    pt3dadd(97.8038372418898, -1485.93703499424, 106.808095352623, 1.11105669451017)
    pt3dadd(98.623459419557, -1486.45861274366, 107.045110409489, 1.10663427181886)
    pt3dadd(99.4430815972243, -1486.98019049308, 107.282125466355, 1.1022268569784)
    pt3dadd(100.262703774892, -1487.50176824251, 107.519140523221, 1.09783500902071)
    pt3dadd(101.082325952559, -1488.02334599193, 107.756155580087, 1.09345795120929)
    pt3dadd(101.911230337418, -1488.53067931036, 107.979545370497, 1.08908764187105)
    pt3dadd(102.86640722863, -1488.82251319553, 108, 1.08462647697537)
    pt3dadd(103.829603529963, -1489.09131216334, 108, 1.08017832862112)
    pt3dadd(104.792799831297, -1489.36011113116, 108, 1.07574666840026)
    pt3dadd(105.75599613263, -1489.62891009897, 108, 1.07133049050077)
    pt3dadd(106.719192433963, -1489.89770906679, 108, 1.06693075595442)
    pt3dadd(107.67308580892, -1490.10450973318, 108.183616693292, 1.06264101461259)
    pt3dadd(108.622262453, -1490.28626696289, 108.440575849147, 1.0584077828913)
    pt3dadd(109.57143909708, -1490.46802419261, 108.697535005002, 1.05418993337089)
    pt3dadd(110.520615741161, -1490.64978142233, 108.954494160857, 1.04998675066884)
    pt3dadd(111.469792385241, -1490.83153865205, 109.211453316712, 1.04579867074344)
    pt3dadd(112.422072431864, -1491.01011399186, 109.458078928068, 1.04161593942622)
    pt3dadd(113.410772162799, -1491.12315122688, 109.5, 1.03734245262679)
    pt3dadd(114.405809353009, -1491.2226549459, 109.5, 1.03306779286039)
    pt3dadd(115.400846543219, -1491.32215866492, 109.5, 1.02880876064212)
    pt3dadd(116.395883733429, -1491.42166238394, 109.5, 1.02456586487743)
    pt3dadd(117.390920923639, -1491.52116610296, 109.5, 1.02033896478673)
    pt3dadd(118.385958113849, -1491.62066982198, 109.5, 1.01612783302375)
    pt3dadd(119.380995304059, -1491.720173541, 109.5, 1.0119330650606)
    pt3dadd(120.273992542623, -1492.09667638454, 109.680014723082, 1.00783206821853)
    pt3dadd(121.132679094748, -1492.55342455057, 109.912476586692, 1.00377413462521)
    pt3dadd(121.991365646873, -1493.01017271659, 110.144938450302, 0.999731205377185)
    pt3dadd(122.850052198998, -1493.46692088261, 110.377400313912, 0.995703205676407)
    pt3dadd(123.708738751124, -1493.92366904864, 110.609862177523, 0.991690911193887)
    pt3dadd(124.567425303249, -1494.38041721466, 110.842324041133, 0.987693433538485)
    pt3dadd(125.481735770609, -1494.71480702442, 111, 0.983667879888487)
    pt3dadd(126.479003525066, -1494.78867870994, 111, 0.979598337507422)
    pt3dadd(127.476271279523, -1494.86255039545, 111, 0.975544448580937)
    pt3dadd(128.473539033979, -1494.93642208097, 111, 0.97150703832743)
    pt3dadd(129.470806788436, -1495.01029376648, 111, 0.967485110395288)
    pt3dadd(130.468074542893, -1495.084165452, 111, 0.963479635276709)
    pt3dadd(131.464413742059, -1495.16705512789, 111.009318446406, 0.959490326505605)
    pt3dadd(132.346511568371, -1495.5177541072, 111.301952275027, 0.95568945055037)
    pt3dadd(133.218277417322, -1495.89136804246, 111.61887013817, 0.951919170804282)
    pt3dadd(134.090043266273, -1496.26498197773, 111.935788001312, 0.948163122373578)
    pt3dadd(134.961809115224, -1496.63859591299, 112.252705864455, 0.944421493665319)
    pt3dadd(135.867658415495, -1496.89161317136, 112.5, 0.940646729741166)
    pt3dadd(136.853394841005, -1496.72331670847, 112.5, 0.936749221567173)
    pt3dadd(137.839131266515, -1496.55502024557, 112.5, 0.932867999758377)
    pt3dadd(138.824867692026, -1496.38672378268, 112.5, 0.929002623711943)
    pt3dadd(139.810604117536, -1496.21842731979, 112.5, 0.925153165904859)
    pt3dadd(140.78472061398, -1496.23630361773, 112.5, 0.921319914671609)
    pt3dadd(141.705051532438, -1496.62744425808, 112.5, 0.917502260087615)
    pt3dadd(142.625382450897, -1497.01858489842, 112.5, 0.913701118477305)
    pt3dadd(143.545713369355, -1497.40972553876, 112.5, 0.909915459188359)
    pt3dadd(144.466044287814, -1497.80086617911, 112.5, 0.90614621841227)
    pt3dadd(145.396911916287, -1498.14216760636, 112.43937547443, 0.902412755476205)
    pt3dadd(146.348238240015, -1498.32598610732, 112.193276857154, 0.898781718100715)
    pt3dadd(147.299359373903, -1498.50432131993, 111.94115557559, 0.895170707899454)
    pt3dadd(148.250480507791, -1498.68265653253, 111.689034294025, 0.891574395403168)
    pt3dadd(149.201601641679, -1498.86099174514, 111.436913012461, 0.887993350036159)
    pt3dadd(150.152722775567, -1499.03932695774, 111.184791730897, 0.88442740428056)
    pt3dadd(151.103500779713, -1499.23037837965, 110.941585550836, 0.880868695167836)
    pt3dadd(152.052944151315, -1499.45440627056, 110.721674061183, 0.877306721216347)
    pt3dadd(153.002364628986, -1499.6788147471, 110.502034373886, 0.873759602283986)
    pt3dadd(153.951785106657, -1499.90322322364, 110.28239468659, 0.870227549464785)
    pt3dadd(154.901205584328, -1500.12763170018, 110.062754999294, 0.866711227782425)
    pt3dadd(155.850626061999, -1500.35204017672, 109.843115311998, 0.863209795142513)
    pt3dadd(156.800046539671, -1500.57644865326, 109.623475624701, 0.859723783015558)
    pt3dadd(157.745694579429, -1500.74837282639, 109.354416002509, 0.856297077341581)
    pt3dadd(158.68340647719, -1500.85256303725, 109.022993618296, 0.852945632412649)
    pt3dadd(159.621118374952, -1500.95675324812, 108.691571234082, 0.849608719118161)
    pt3dadd(160.558830272713, -1501.06094345898, 108.360148849869, 0.846286320775274)
    pt3dadd(161.49662197648, -1501.16577780764, 108.029157521651, 0.842977548690114)
    pt3dadd(162.438766420855, -1501.32115541793, 107.732817875947, 0.839646785151255)
    pt3dadd(163.381383917101, -1501.48209011241, 107.440290475718, 0.836327072244354)
  }
  adendOML[0] {pt3dclear()
    pt3dadd(163.381383917101, -1501.48209011241, 107.440290475718, 0.833021779712288)
    pt3dadd(164.324001413346, -1501.64302480689, 107.147763075489, 0.833021779712288)
    pt3dadd(165.266618909591, -1501.80395950137, 106.85523567526, 0.829731172824781)
    pt3dadd(166.208690113716, -1501.96846327494, 106.563032879539, 0.826455310709717)
    pt3dadd(167.088636504681, -1502.3459362083, 106.299576228546, 0.823168281235402)
    pt3dadd(167.949516144082, -1502.78638625636, 106.044841068777, 0.819888557038456)
    pt3dadd(168.810395783484, -1503.22683630443, 105.790105909009, 0.816624089165488)
    pt3dadd(169.671275422886, -1503.6672863525, 105.53537074924, 0.813374302387174)
    pt3dadd(170.532155062287, -1504.10773640056, 105.280635589472, 0.81013978709129)
    pt3dadd(171.394041784708, -1504.54507973492, 105.024045508476, 0.806921846589111)
    pt3dadd(172.271873650551, -1504.92615202008, 104.735042025183, 0.803746798683004)
    pt3dadd(173.152529371773, -1505.29695442901, 104.44016734976, 0.800592015211156)
    pt3dadd(174.033185092995, -1505.66775683795, 104.145292674336, 0.797451874077881)
    pt3dadd(174.913840814217, -1506.03855924688, 103.850417998912, 0.794326135842577)
    pt3dadd(175.795859607424, -1506.41222269945, 103.564787155674, 0.791208321045351)
    pt3dadd(176.690125283928, -1506.84408004396, 103.5, 0.788000046610599)
    pt3dadd(177.584552474927, -1507.29129363946, 103.5, 0.784787452705349)
    pt3dadd(178.478979665927, -1507.73850723496, 103.5, 0.781591251687025)
    pt3dadd(179.373406856927, -1508.18572083046, 103.5, 0.778410532990064)
    pt3dadd(180.27089582548, -1508.62615697781, 103.493781579451, 0.775246700491238)
    pt3dadd(181.216567392834, -1508.8203799897, 103.285252315103, 0.77217639838598)
    pt3dadd(182.17284972991, -1508.94511246845, 103.020741633766, 0.769146228054751)
    pt3dadd(183.129132066986, -1509.0698449472, 102.756230952429, 0.766131299926194)
    pt3dadd(184.085414404062, -1509.19457742595, 102.491720271091, 0.76313098915326)
    pt3dadd(185.041696741138, -1509.3193099047, 102.227209589754, 0.760145772766981)
    pt3dadd(186.003837615011, -1509.45625767449, 102.010043608054, 0.757153926408834)
    pt3dadd(186.985490488312, -1509.64545087269, 102, 0.754098924316577)
    pt3dadd(187.966981080338, -1509.83696123211, 102, 0.751059745567607)
    pt3dadd(188.948471672364, -1510.02847159153, 102, 0.748036109465865)
    pt3dadd(189.929962264389, -1510.21998195095, 102, 0.745028694718606)
    pt3dadd(190.903541501112, -1510.41210362952, 101.933870267764, 0.742058259433019)
    pt3dadd(191.847679237913, -1510.60501775254, 101.667137826302, 0.739182024243734)
    pt3dadd(192.790294917435, -1510.79782550517, 101.394556001441, 0.736325349532487)
    pt3dadd(193.732910596958, -1510.9906332578, 101.121974176581, 0.733483237615312)
    pt3dadd(194.67552627648, -1511.18344101043, 100.84939235172, 0.730655903180335)
    pt3dadd(195.618141956003, -1511.37624876306, 100.57681052686, 0.727843854454309)
    pt3dadd(196.542953988071, -1511.634615901, 100.300299807969, 0.72504936782237)
    pt3dadd(197.46058545955, -1511.91864468979, 100.022306769048, 0.722270854080944)
    pt3dadd(198.378216931029, -1512.20267347858, 99.7443137301264, 0.71950748454513)
    pt3dadd(199.295848402509, -1512.48670226737, 99.4663206912048, 0.716758640236785)
    pt3dadd(200.213479873988, -1512.77073105616, 99.1883276522832, 0.714024711927685)
    pt3dadd(201.084655807402, -1513.18331439645, 99, 0.711264860996507)
    pt3dadd(201.834493662767, -1513.84493603353, 99, 0.708458744932715)
    pt3dadd(202.584331518132, -1514.50655767062, 99, 0.705669206426259)
    pt3dadd(203.484523097447, -1514.79294869676, 98.8045201394838, 0.702961797691911)
    pt3dadd(204.437618927059, -1514.88371972815, 98.515783305262, 0.700311690731042)
    pt3dadd(205.39071475667, -1514.97449075954, 98.2270464710401, 0.697676535710316)
    pt3dadd(206.343810586282, -1515.06526179094, 97.9383096368182, 0.695055828967444)
    pt3dadd(207.296906415894, -1515.15603282233, 97.6495728025964, 0.692449999640442)
    pt3dadd(208.225618675831, -1515.43646109984, 97.5, 0.689797809947714)
    pt3dadd(209.106778943895, -1515.90927880465, 97.5, 0.687116393656792)
    pt3dadd(209.987939211958, -1516.38209650947, 97.5, 0.684451623326869)
    pt3dadd(210.869099480022, -1516.85491421428, 97.5, 0.681802335318309)
    pt3dadd(211.750259748085, -1517.3277319191, 97.5, 0.679169332835294)
    pt3dadd(212.637369550233, -1517.7888545183, 97.5, 0.676552174652005)
    pt3dadd(213.574932913507, -1518.13505687458, 97.5, 0.673950940606969)
    pt3dadd(214.517035545225, -1518.4703815401, 97.5, 0.671365914125662)
    pt3dadd(215.459138176943, -1518.80570620563, 97.5, 0.668796443234071)
    pt3dadd(216.40124080866, -1519.14103087116, 97.5, 0.666243548880324)
    pt3dadd(217.343343440378, -1519.47635553668, 97.5, 0.66370613684794)
    pt3dadd(218.285446072096, -1519.81168020221, 97.5, 0.661185079764255)
    pt3dadd(219.227548703814, -1520.14700486774, 97.5, 0.65867979985943)
    pt3dadd(220.171157768454, -1520.36824278971, 97.2965779308809, 0.656255797831933)
    pt3dadd(221.105878689759, -1520.51981915533, 96.975141460235, 0.653903081675817)
    pt3dadd(222.040599611063, -1520.67139552095, 96.6537049895891, 0.651564559982673)
    pt3dadd(222.975320532368, -1520.82297188656, 96.3322685189431, 0.649240410070692)
    pt3dadd(223.915113329134, -1520.95868172376, 96.0219019189684, 0.646923700592317)
    pt3dadd(224.892111185585, -1520.95040787678, 95.8139258806682, 0.644560266013311)
    pt3dadd(225.873038656866, -1520.92022549305, 95.6219094235596, 0.642204141472725)
    pt3dadd(226.853966128145, -1520.89004310932, 95.4298929664509, 0.639863662131776)
    pt3dadd(227.834893599425, -1520.85986072559, 95.2378765093422, 0.637538212904976)
    pt3dadd(228.815821070705, -1520.82967834186, 95.0458600522336, 0.635228693343434)
    pt3dadd(229.796748541985, -1520.79949595812, 94.8538435951249, 0.632934358777958)
    pt3dadd(230.777676013265, -1520.76931357439, 94.6618271380162, 0.630655359648284)
    pt3dadd(231.762148089573, -1520.7324433231, 94.5049912535779, 0.628383970105272)
    pt3dadd(232.759930005576, -1520.66683984565, 94.5, 0.626096712132449)
    pt3dadd(233.757715163433, -1520.60032083513, 94.5, 0.623825819874285)
    pt3dadd(234.75550032129, -1520.53380182461, 94.5, 0.621570562149341)
    pt3dadd(235.702674650568, -1520.33649683443, 94.6984904530123, 0.619389842952154)
    pt3dadd(236.608670193752, -1520.0596648629, 95.0187030937236, 0.61727407211837)
    pt3dadd(237.514665736935, -1519.78283289137, 95.3389157344349, 0.615172505785644)
    pt3dadd(238.420661280119, -1519.50600091984, 95.6591283751462, 0.613085475493578)
    pt3dadd(239.331654022297, -1519.22390720506, 95.9555190304734, 0.611000453420862)
    pt3dadd(240.271273890305, -1518.89482107145, 96, 0.608846274279703)
    pt3dadd(241.2130158019, -1518.55848467445, 96, 0.606699670569556)
    pt3dadd(242.154757713495, -1518.22214827745, 96, 0.604568889664396)
    pt3dadd(243.123594285032, -1518.01829523559, 96, 0.602454054114695)
    pt3dadd(244.123074399372, -1517.98605394158, 96, 0.600355399859162)
    pt3dadd(245.122554513712, -1517.95381264757, 96, 0.598272331357644)
    pt3dadd(246.122034628051, -1517.92157135356, 96, 0.59620580922967)
    pt3dadd(247.067796418341, -1517.69077045736, 96.1779337030764, 0.594193527552414)
    pt3dadd(247.998463367874, -1517.40441139597, 96.405656159157, 0.5922076741565)
    pt3dadd(248.929130317407, -1517.11805233457, 96.6333786152378, 0.590237053833854)
    pt3dadd(249.859797266941, -1516.83169327318, 96.8611010713184, 0.588281277532046)
    pt3dadd(250.790464216474, -1516.54533421178, 97.0888235273991, 0.586341284741935)
    pt3dadd(251.721131166007, -1516.25897515039, 97.3165459834798, 0.584416204391503)
    pt3dadd(252.664272463617, -1516.0927475136, 97.5585876015387, 0.582512737711179)
    pt3dadd(253.5760470509, -1516.39667237603, 97.8348063191921, 0.580640800405226)
    pt3dadd(254.487821638184, -1516.70059723846, 98.1110250368455, 0.578783400732244)
    pt3dadd(255.399596225467, -1517.00452210088, 98.387243754499, 0.576940979092709)
  }
}
proc shape3d_8() {
  adendOML[0] {
    pt3dadd(256.311370812751, -1517.30844696331, 98.6634624721524, 0.575113585998401)
    pt3dadd(257.223145400035, -1517.61237182574, 98.9396811898058, 0.573300730537065)
    pt3dadd(258.037532974334, -1518.11171594003, 98.7100493065766, 0.571507828498745)
    pt3dadd(258.800630499933, -1518.64871049508, 98.3504397762933, 0.569772415634101)
    pt3dadd(259.563728025532, -1519.18570505013, 97.9908302460101, 0.568050862599746)
    pt3dadd(260.326479108781, -1519.72314575682, 97.6311724422494, 0.566343333697867)
    pt3dadd(260.994410848782, -1520.36337082051, 97.2642273863601, 0.56465500652503)
    pt3dadd(261.606031273407, -1521.06236559151, 96.893651123901, 0.562982808850772)
    pt3dadd(262.217651698031, -1521.76136036251, 96.523074861442, 0.561324367015498)
    pt3dadd(262.829272122655, -1522.46035513351, 96.1524985989828, 0.559735323656569)
  }
  adendIML[2] {pt3dclear()
    pt3dadd(33.3431454598447, -1457.04119913947, 104.989657547138, 1.42623722754847)
    pt3dadd(33.81952561003, -1457.89383995568, 104.798868286033, 1.42623722754847)
    pt3dadd(34.312657219686, -1458.74140990978, 104.602790779746, 1.42061265442227)
    pt3dadd(34.8057888293419, -1459.58897986387, 104.406713273459, 1.41500413453071)
    pt3dadd(35.2989204389978, -1460.43654981797, 104.210635767173, 1.40941248097876)
    pt3dadd(35.7920520486537, -1461.28411977207, 104.014558260886, 1.40383719001437)
    pt3dadd(36.2851836583096, -1462.13168972616, 103.818480754599, 1.39827811945454)
    pt3dadd(36.7783152679656, -1462.97925968026, 103.622403248312, 1.39273605741731)
    pt3dadd(37.30211322889, -1463.80859460776, 103.432981291505, 1.3872034437024)
    pt3dadd(37.8766848799449, -1464.60738934215, 103.254671476551, 1.38167664547556)
    pt3dadd(38.451256531, -1465.40618407654, 103.076361661596, 1.37616645813387)
    pt3dadd(39.025828182055, -1466.20497881094, 102.898051846642, 1.37067248474017)
    pt3dadd(39.60039983311, -1467.00377354533, 102.719742031687, 1.36519572419556)
    pt3dadd(40.174971484165, -1467.80256827972, 102.541432216733, 1.35973510482779)
    pt3dadd(40.7495431352201, -1468.60136301412, 102.363122401779, 1.35429124188748)
    pt3dadd(41.324114786275, -1469.40015774851, 102.184812586824, 1.34886404931679)
    pt3dadd(41.8991159928886, -1470.19850515204, 102.006449366521, 1.34345306412288)
    pt3dadd(42.7080783027012, -1470.74845266324, 101.799362380319, 1.33808783201961)
    pt3dadd(43.5244776123759, -1471.28727620763, 101.591609269202, 1.33273929578321)
    pt3dadd(44.3408769220505, -1471.82609975201, 101.383856158085, 1.32740720986804)
    pt3dadd(45.1572762317252, -1472.3649232964, 101.176103046968, 1.32209176192526)
    pt3dadd(45.9736755413999, -1472.90374684078, 100.968349935851, 1.31679230471332)
    pt3dadd(46.7900748510746, -1473.44257038517, 100.760596824734, 1.3115097274676)
    pt3dadd(47.6064741607491, -1473.98139392955, 100.552843713617, 1.30624335854928)
    pt3dadd(48.3139288905417, -1474.65394475374, 100.348588405586, 1.30098957341614)
    pt3dadd(48.9821214271441, -1475.36986532868, 100.14616196359, 1.29575080015177)
    pt3dadd(49.6503139637465, -1476.08578590361, 99.9437355215947, 1.29052804659979)
    pt3dadd(50.3185065003489, -1476.80170647854, 99.741309079599, 1.28532199773876)
    pt3dadd(50.9866990369513, -1477.51762705347, 99.5388826376033, 1.28013239768887)
    pt3dadd(51.6548915735538, -1478.2335476284, 99.3364561956077, 1.27495883963376)
    pt3dadd(52.3230841101562, -1478.94946820333, 99.1340297536119, 1.26980239308594)
    pt3dadd(52.9483762218198, -1479.69441092517, 98.9138219666117, 1.26468206628624)
    pt3dadd(53.4893624022434, -1480.49587193321, 98.6588823557419, 1.25961742500293)
    pt3dadd(54.0303485826669, -1481.29733294124, 98.4039427448721, 1.25456914960853)
    pt3dadd(54.5713347630905, -1482.09879394928, 98.1490031340024, 1.24953657365052)
    pt3dadd(55.112320943514, -1482.90025495731, 97.8940635231326, 1.2445202758588)
    pt3dadd(55.6533071239376, -1483.70171596534, 97.6391239122628, 1.23952013278186)
    pt3dadd(56.2280836949254, -1484.47978936691, 97.3888448709145, 1.23452997858982)
    pt3dadd(56.8431393011138, -1485.22938838695, 97.1442883121223, 1.22954941238294)
    pt3dadd(57.4581949073021, -1485.978987407, 96.89973175333, 1.22458484972947)
    pt3dadd(58.0732505134904, -1486.72858642704, 96.6551751945378, 1.21963608463074)
    pt3dadd(58.6883061196787, -1487.47818544708, 96.4106186357456, 1.21470411118119)
    pt3dadd(59.3033617258671, -1488.22778446712, 96.1660620769533, 1.20978790664484)
    pt3dadd(59.93171431028, -1488.97144076163, 95.9390679372392, 1.20486890535759)
    pt3dadd(60.587708228278, -1489.70197944304, 95.7493702447969, 1.19992881543318)
    pt3dadd(61.243702146276, -1490.43251812445, 95.5596725523546, 1.19500481131375)
    pt3dadd(61.8996960642741, -1491.16305680585, 95.3699748599123, 1.19009771295702)
    pt3dadd(62.5556899822719, -1491.89359548726, 95.18027716747, 1.18520701104803)
  }
  adendMML[1] {pt3dclear()
    pt3dadd(62.5556899822719, -1491.89359548726, 95.18027716747, 1.18033258525187)
    pt3dadd(63.21168390027, -1492.62413416867, 94.9905794750277, 1.18033258525187)
    pt3dadd(63.867677818268, -1493.35467285007, 94.8008817825854, 1.17547518555333)
    pt3dadd(64.523671736266, -1494.08521153148, 94.6111840901431, 1.17063387165977)
    pt3dadd(65.2111499860719, -1494.76227558239, 94.3623143903934, 1.16587774419519)
    pt3dadd(65.9402341713492, -1495.36116616316, 94.0310043799028, 1.16124206543526)
    pt3dadd(66.6693183566265, -1495.96005674392, 93.6996943694122, 1.15662147880551)
    pt3dadd(67.3984025419038, -1496.55894732468, 93.3683843589215, 1.15201633971236)
    pt3dadd(68.1165073975404, -1497.16969503128, 93.0364715878878, 1.14742776072696)
    pt3dadd(68.6755119378821, -1497.92451366471, 92.7032574722791, 1.14285630678434)
    pt3dadd(69.1985967439524, -1498.70914087381, 92.3704776225434, 1.13829936894484)
    pt3dadd(69.7216815500226, -1499.49376808292, 92.0376977728077, 1.13375825984788)
    pt3dadd(70.2447663560928, -1500.27839529202, 91.704917923072, 1.12923222948665)
    pt3dadd(70.7750415841722, -1501.06511371278, 91.3896887367817, 1.12469605298671)
    pt3dadd(71.3167295941348, -1501.85509598053, 91.1024572078122, 1.12013624468317)
    pt3dadd(71.858434609263, -1502.64508246092, 90.8152690510617, 1.11559193121819)
    pt3dadd(72.400139624391, -1503.43506894132, 90.5280808943112, 1.11106308166974)
    pt3dadd(72.9418446395192, -1504.22505542171, 90.2408927375606, 1.10655061741237)
    pt3dadd(73.4553540324879, -1505.03399430599, 89.9600647007728, 1.10204580493349)
    pt3dadd(73.8614060002493, -1505.91109127129, 89.7040581325297, 1.09752663305436)
    pt3dadd(74.2615746145485, -1506.79146222275, 89.4494759886974, 1.09302248804498)
    pt3dadd(74.6617432288477, -1507.67183317421, 89.1948938448652, 1.08853404491493)
    pt3dadd(75.0619118431471, -1508.55220412567, 88.9403117010329, 1.08406157511225)
    pt3dadd(75.4620804574463, -1509.43257507712, 88.6857295572007, 1.07960557035992)
    pt3dadd(75.8027786714607, -1510.29650728481, 88.3450202890303, 1.07531544262529)
    pt3dadd(76.0001210983472, -1511.11393126858, 87.8041555423136, 1.0714175330397)
    pt3dadd(76.1932090428146, -1511.92919147855, 87.2581996505646, 1.06754511653056)
    pt3dadd(76.386296987282, -1512.74445168853, 86.7122437588157, 1.06368506984771)
    pt3dadd(76.5793849317494, -1513.5597118985, 86.1662878670667, 1.05983744843038)
    pt3dadd(76.780260641711, -1514.37181978577, 85.6198879555583, 1.05600353892731)
    pt3dadd(77.2684100643706, -1515.04162348312, 85.0726900908203, 1.0521843507751)
    pt3dadd(77.8417664366521, -1515.6574506978, 84.5323019784116, 1.04835930758258)
    pt3dadd(78.4151228089335, -1516.27327791247, 83.9919138660028, 1.04454672645625)
    pt3dadd(78.988479181215, -1516.88910512714, 83.4515257535941, 1.04074660739612)
    pt3dadd(79.5618355534965, -1517.50493234181, 82.9111376411853, 1.03695895040218)
    pt3dadd(80.1420396075065, -1518.14582491917, 82.4155099478851, 1.03308970019473)
    pt3dadd(80.7411252252408, -1518.85807162529, 82.0497799356984, 1.02896783065324)
    pt3dadd(81.3404178284716, -1519.57151520057, 81.686673008455, 1.02485702817427)
    pt3dadd(81.9397104317023, -1520.28495877584, 81.3235660812116, 1.02076128720371)
    pt3dadd(82.5214375925049, -1520.99664703679, 80.9326174351924, 1.01672975573373)
    pt3dadd(83.0203528972418, -1521.69507595771, 80.4204224971242, 1.01295466545957)
    pt3dadd(83.5123489044556, -1522.39207030127, 79.8987532398922, 1.00921326008523)
    pt3dadd(83.9247772119026, -1523.15024989893, 79.407481361774, 1.00541833608409)
    pt3dadd(84.0723543816083, -1524.06522835111, 79.0319345457379, 1.00141388571371)
    pt3dadd(84.2199315513142, -1524.98020680328, 78.6563877297018, 0.997424094987295)
    pt3dadd(84.3675087210199, -1525.89518525546, 78.2808409136657, 0.993448963904836)
    pt3dadd(84.49334311478, -1526.81152471307, 77.9015599980738, 0.9894949592427)
    pt3dadd(84.5546025597363, -1527.73041638741, 77.5118352603094, 0.985572685061968)
    pt3dadd(84.6158620046925, -1528.64930806176, 77.1221105225449, 0.981664918781649)
    pt3dadd(84.6771214496488, -1529.5681997361, 76.7323857847804, 0.977771660401743)
    pt3dadd(84.8922195560139, -1530.4245576134, 76.293447127125, 0.973985017013922)
    pt3dadd(85.3257160735984, -1531.17332432559, 75.7920199839068, 0.970333543310681)
    pt3dadd(85.759212591183, -1531.92209103778, 75.2905928406886, 0.966695141738837)
    pt3dadd(86.1520317643425, -1532.710010638, 74.8198390776175, 0.963007440634341)
    pt3dadd(86.4878190334767, -1533.54947881083, 74.3925919633106, 0.959248669110428)
    pt3dadd(86.8236063026109, -1534.38894698367, 73.9653448490037, 0.955504031481476)
    pt3dadd(87.1619613249272, -1535.22558483776, 73.5348305913647, 0.951780067941642)
    pt3dadd(87.5330302651752, -1536.02502910745, 73.0626919830767, 0.948148686325646)
    pt3dadd(87.9102159389644, -1536.81711902241, 72.5827705998157, 0.944546120876966)
    pt3dadd(88.2874016127536, -1537.60920893736, 72.1028492165547, 0.940956938865758)
    pt3dadd(88.8482466444054, -1538.35497223628, 71.7556977495711, 0.937164504381588)
    pt3dadd(89.4569366298948, -1539.08540021887, 71.4459051353622, 0.933333114852736)
    pt3dadd(90.0656266153843, -1539.81582820146, 71.1361125211534, 0.929517006037348)
    pt3dadd(90.6743166008737, -1540.54625618405, 70.8263199069445, 0.925716177935425)
    pt3dadd(91.2805006604677, -1541.28158492495, 70.5243132403523, 0.921923224815468)
    pt3dadd(91.8576872180064, -1542.06871785949, 70.308363701783, 0.918061741397398)
    pt3dadd(92.429916977948, -1542.86348141497, 70.1061163464807, 0.914204889011254)
    pt3dadd(93.0021467378896, -1543.65824497044, 69.9038689911785, 0.910364984745057)
    pt3dadd(93.5743764978312, -1544.45300852591, 69.7016216358763, 0.906541101152029)
    pt3dadd(94.1466062577729, -1545.24777208139, 69.4993742805741, 0.90273387720462)
    pt3dadd(94.7188360177145, -1546.04253563686, 69.2971269252718, 0.898943149275434)
    pt3dadd(95.2910657776561, -1546.83729919234, 69.0948795699696, 0.895168442019417)
    pt3dadd(95.8652815159968, -1547.60327359399, 68.8147376499011, 0.891487972585604)
    pt3dadd(96.4407009427495, -1548.34309857124, 68.466095302577, 0.887893827042872)
    pt3dadd(97.0161203695021, -1549.0829235485, 68.117452955253, 0.884314611457444)
    pt3dadd(97.5915397962548, -1549.82274852575, 67.7688106079289, 0.880750909578994)
    pt3dadd(98.1181653372206, -1550.59100885714, 67.4187980283499, 0.877204171313711)
    pt3dadd(98.4798498976221, -1551.45348742426, 67.0647994407245, 0.87367750364644)
    pt3dadd(98.8415344580236, -1552.31596599137, 66.7108008530991, 0.870165905461387)
    pt3dadd(99.2032190184251, -1553.17844455848, 66.3568022654737, 0.866669822350933)
    pt3dadd(99.5927599591627, -1554.02453553833, 65.9967956253603, 0.863196601657448)
    pt3dadd(100.197948809552, -1554.70944369162, 65.5990871279596, 0.85979044075348)
    pt3dadd(100.829491269206, -1555.37256327425, 65.1973079090134, 0.856404877476573)
    pt3dadd(101.461033728861, -1556.03568285689, 64.7955286900672, 0.85303398902357)
    pt3dadd(102.067782582463, -1556.61642136359, 64.2952256984851, 0.849915413971899)
    pt3dadd(102.607861144965, -1556.97830469714, 63.5354039683344, 0.847439484579492)
    pt3dadd(103.146779770995, -1557.33758378116, 62.7735081392973, 0.844979487263553)
    pt3dadd(103.685698397024, -1557.69686286518, 62.0116123102601, 0.84252743160547)
    pt3dadd(104.224617023054, -1558.0561419492, 61.2497164812229, 0.840082950150703)
    pt3dadd(104.763535649084, -1558.41542103322, 60.4878206521857, 0.837646773793759)
    pt3dadd(105.302454275113, -1558.77470011724, 59.7259248231486, 0.835218438045582)
    pt3dadd(105.841372901143, -1559.13397920126, 58.9640289941114, 0.83279767650072)
    pt3dadd(106.390380232787, -1559.65124785183, 58.3599926613822, 0.830012809266875)
    pt3dadd(106.947102534585, -1560.40242657646, 58.0053620256514, 0.82669526485814)
    pt3dadd(107.50375580235, -1561.15390848794, 57.6512263508011, 0.823392025765567)
    pt3dadd(108.060409070114, -1561.90539039943, 57.2970906759508, 0.820103663289331)
    pt3dadd(108.607455890771, -1562.65591269088, 56.9272378566199, 0.816850951657651)
    pt3dadd(109.10277325158, -1563.39888873209, 56.477074203863, 0.813727149873691)
    pt3dadd(109.598090612389, -1564.1418647733, 56.026910551106, 0.810617133988975)
    pt3dadd(110.093407973198, -1564.88484081452, 55.5767468983491, 0.807520904003503)
    pt3dadd(110.411043336611, -1565.73698943982, 55.1703272921673, 0.804374191021127)
    pt3dadd(110.691896794041, -1566.61075575183, 54.7732709139845, 0.801228783151591)
    pt3dadd(110.972750251471, -1567.48452206383, 54.3762145358017, 0.798098030508358)
    pt3dadd(111.271672965058, -1568.35289381605, 53.9816095503331, 0.794978464390313)
    pt3dadd(111.675370220112, -1569.185441123, 53.6032838884014, 0.791852358781301)
    pt3dadd(112.089670480383, -1570.01404164354, 53.2267517228477, 0.788739185638366)
    pt3dadd(112.503970740654, -1570.84264216408, 52.8502195572941, 0.785640851723681)
    pt3dadd(112.950617608776, -1571.63929361751, 52.4497790545989, 0.782590073605207)
    pt3dadd(113.558518765738, -1572.23792524172, 51.9323516689308, 0.779735172155105)
    pt3dadd(114.179811959231, -1572.81779888898, 51.4053399793714, 0.776909163371013)
    pt3dadd(114.803385329166, -1573.40040786238, 50.8841194979119, 0.774085428209677)
    pt3dadd(115.434415920282, -1573.99199904155, 50.3823025294841, 0.771240425608739)
    pt3dadd(116.065446511398, -1574.58359022072, 49.8804855610562, 0.768408489333257)
    pt3dadd(116.667112977187, -1575.21695764702, 49.402019942879, 0.765554042269027)
    pt3dadd(117.174629310933, -1575.97823214764, 48.9984257089169, 0.76260212789229)
    pt3dadd(117.68214564468, -1576.73950664826, 48.5948314749549, 0.759664566625646)
    pt3dadd(118.189661978426, -1577.50078114888, 48.1912372409928, 0.756741873229506)
    pt3dadd(118.729723657389, -1578.16108243393, 47.6823491235007, 0.75400385687795)
    pt3dadd(119.295475937336, -1578.72683471388, 47.0824752071893, 0.751437600672926)
    pt3dadd(119.861228217282, -1579.29258699383, 46.4826012908779, 0.748882750932393)
    pt3dadd(120.426980497229, -1579.85833927377, 45.8827273745665, 0.74633930765635)
    pt3dadd(120.992732777175, -1580.42409155372, 45.282853458255, 0.743807270844799)
    pt3dadd(121.555549126289, -1581.09052609463, 44.811655526735, 0.741079080491455)
    pt3dadd(122.112202394054, -1581.84200800611, 44.4575198518847, 0.738192838996813)
    pt3dadd(122.668855661818, -1582.59348991759, 44.1033841770344, 0.735321474118507)
    pt3dadd(123.225508929583, -1583.34497182908, 43.749248502184, 0.732465708359285)
  }
  adendOML[1] {pt3dclear()
    pt3dadd(123.225508929583, -1583.34497182908, 43.749248502184, 0.729772141106466)
    pt3dadd(123.767338440936, -1584.03972021348, 43.2990389709061, 0.729772141106466)
    pt3dadd(124.266376092629, -1584.5912881443, 42.6306571639373, 0.727467987254057)
    pt3dadd(124.765413744321, -1585.14285607512, 41.9622753569685, 0.725173812268472)
    pt3dadd(125.264451396013, -1585.69442400594, 41.2938935499996, 0.722889616149711)
    pt3dadd(125.763489047705, -1586.24599193675, 40.6255117430308, 0.720615771097778)
    pt3dadd(126.390189564642, -1586.70489383208, 39.9976581346605, 0.718260680983277)
    pt3dadd(127.044925108814, -1587.14138419486, 39.3805701908496, 0.715893265292889)
    pt3dadd(127.699660652986, -1587.57787455764, 38.7634822470387, 0.713536920100803)
    pt3dadd(128.354396197158, -1588.01436492043, 38.1463943032278, 0.711191645407015)
    pt3dadd(129.007902973051, -1588.45146688092, 37.5284417135772, 0.708859221489169)
    pt3dadd(129.650363367126, -1588.89398758066, 36.9028283851347, 0.706553697649926)
    pt3dadd(130.290910073281, -1589.33744299261, 36.2758936079494, 0.704261800145081)
    pt3dadd(130.931456779435, -1589.78089840456, 35.648958830764, 0.701980774353512)
    pt3dadd(131.57200348559, -1590.22435381651, 35.0220240535786, 0.69971062027522)
    pt3dadd(132.207695237036, -1590.71242301511, 34.4395432038347, 0.697383914192858)
    pt3dadd(132.819757807005, -1591.41005452298, 34.0671526922248, 0.694754073209326)
    pt3dadd(133.431378231629, -1592.10904929398, 33.6965764297656, 0.69213704349415)
    pt3dadd(134.042998656253, -1592.80804406498, 33.3260001673066, 0.689535359901754)
    pt3dadd(134.655868900144, -1593.49926986708, 32.9440280561633, 0.686961039372258)
    pt3dadd(135.274130670606, -1594.15454487493, 32.5100775182249, 0.684459196966595)
    pt3dadd(135.892656821444, -1594.8074335897, 32.0728570625633, 0.681975250987035)
    pt3dadd(136.513836531282, -1595.45994415637, 31.6393318861695, 0.67950155961897)
    pt3dadd(137.28824296434, -1596.0445022853, 31.5, 0.676860425936892)
    pt3dadd(138.125853561178, -1596.59077006585, 31.5, 0.674171180534593)
    pt3dadd(138.963464158017, -1597.1370378464, 31.5, 0.671499508206174)
    pt3dadd(139.72994571143, -1597.71342498308, 31.2887761509706, 0.668940518810625)
    pt3dadd(140.396758664786, -1598.31004709924, 30.8422310404334, 0.666556945838287)
    pt3dadd(141.063571618142, -1598.9066692154, 30.3956859298961, 0.664187472089249)
    pt3dadd(141.731344114168, -1599.50955899779, 29.9603645104792, 0.661820295433922)
    pt3dadd(142.405575554014, -1600.15517929056, 29.601779940502, 0.659386926484467)
    pt3dadd(143.079856925483, -1600.80136560488, 29.2443056347536, 0.656967379452915)
    pt3dadd(143.754138296951, -1601.44755191921, 28.8868313290052, 0.654563108798174)
    pt3dadd(144.427911810019, -1602.10469733437, 28.5533340311889, 0.652156775518903)
    pt3dadd(145.071903060667, -1602.860937737, 28.5, 0.649643531628297)
    pt3dadd(145.707610313528, -1603.63286797262, 28.5, 0.647133080688597)
    pt3dadd(146.350902616541, -1604.35618072969, 28.3549151736527, 0.644709696393359)
    pt3dadd(147.003791331315, -1604.97470688053, 27.9176947179911, 0.642461527099957)
    pt3dadd(147.65668004609, -1605.59323303137, 27.4804742623294, 0.640227539794953)
    pt3dadd(148.327277878835, -1606.19046087282, 27.0464165825131, 0.638004537142223)
    pt3dadd(149.188889602017, -1606.50948424797, 26.6655990107236, 0.635743209838129)
    pt3dadd(150.082334208374, -1606.76887139175, 26.2988906183848, 0.633483228470217)
    pt3dadd(150.975778814732, -1607.02825853553, 25.932182226046, 0.63123837719608)
    pt3dadd(151.864518770525, -1607.29269515164, 25.5583351457545, 0.629015223946128)
    pt3dadd(152.636277923345, -1607.65559390195, 25.0452872923851, 0.626962477014931)
    pt3dadd(153.37339507598, -1608.04583239452, 24.4935878975986, 0.624968006687679)
    pt3dadd(154.075883185515, -1608.50528317598, 23.9635874672073, 0.622957902684722)
    pt3dadd(154.600060460527, -1609.24575153577, 23.5489511454084, 0.620828282096)
    pt3dadd(155.107576794273, -1610.00702603639, 23.1453569114463, 0.618701818485033)
    pt3dadd(155.61509312802, -1610.76830053701, 22.7417626774842, 0.616589931869845)
    pt3dadd(156.205737333573, -1611.48321364649, 22.3823547536425, 0.614456927165297)
    pt3dadd(156.915639427547, -1612.12441553782, 22.0909801639401, 0.612287586211568)
    pt3dadd(157.625541521521, -1612.76561742915, 21.7996055742377, 0.610134571989299)
    pt3dadd(158.335443615495, -1613.40681932048, 21.5082309845354, 0.607996988892001)
    pt3dadd(159.045345709469, -1614.04802121182, 21.2168563948331, 0.605874918184213)
    pt3dadd(159.69644357104, -1614.66333263832, 20.8047682424235, 0.603889374542449)
    pt3dadd(160.153106789873, -1615.17707875951, 20.0784600244268, 0.602328689953132)
    pt3dadd(160.609770008707, -1615.6908248807, 19.3521518064302, 0.600777240735315)
    pt3dadd(161.06643322754, -1616.20457100189, 18.6258435884336, 0.599234352291362)
    pt3dadd(161.518620601762, -1616.73701707463, 17.9121449956562, 0.597677145556093)
    pt3dadd(161.941960315918, -1617.38447781393, 17.278443111893, 0.595987709173496)
    pt3dadd(162.365300030075, -1618.03193855323, 16.6447412281298, 0.59430900502042)
    pt3dadd(162.788639744232, -1618.67939929252, 16.0110393443667, 0.592641033096867)
    pt3dadd(163.211979458388, -1619.32686003182, 15.3773374606036, 0.590983984908892)
    pt3dadd(163.68419955171, -1619.85529555661, 14.6891451715743, 0.589435725106733)
  }
}
proc shape3d_9() {
  adendOML[1] {
    pt3dadd(164.222196593062, -1620.21781667569, 13.9281805037339, 0.588028678048472)
    pt3dadd(164.761115219092, -1620.57709575971, 13.1662846746967, 0.586631183459598)
    pt3dadd(165.300033845122, -1620.93637484373, 12.4043888456595, 0.585242072153121)
    pt3dadd(165.838952471151, -1621.29565392775, 11.6424930166224, 0.583860723270837)
    pt3dadd(166.377727233334, -1621.65510122772, 10.8805765309197, 0.582486991590361)
    pt3dadd(166.888689320037, -1622.04581328381, 10.1157318192732, 0.581127853127178)
    pt3dadd(167.371200777742, -1622.4680108093, 9.34831280553207, 0.579781640256654)
    pt3dadd(167.853712235448, -1622.89020833479, 8.58089379179098, 0.578442953432968)
    pt3dadd(168.336223693153, -1623.31240586029, 7.81347477804986, 0.57711260261641)
    pt3dadd(168.818735150858, -1623.73460338578, 7.0460557643087, 0.575789663915954)
    pt3dadd(169.301246608564, -1624.15680091127, 6.27863675056758, 0.574793107522965)
  }
  GCL[4] {pt3dclear()
    pt3dadd(-4.87321668480354, -1409.64196869871, 114.005609657583, 1.65892424082879)
    pt3dadd(-4.32699867835458, -1410.06954038916, 114.72568482202, 1.65892424082879)
    pt3dadd(-3.77850189738285, -1410.50076713361, 115.442060963533, 1.65375774630606)
    pt3dadd(-3.23000511641101, -1410.93199387807, 116.158437105046, 1.64860226381167)
    pt3dadd(-2.68150833543928, -1411.36322062253, 116.87481324656, 1.64345779334565)
    pt3dadd(-2.13301155446754, -1411.79444736698, 117.591189388073, 1.63832504853326)
    pt3dadd(-1.5845147734957, -1412.22567411144, 118.307565529586, 1.63320345863895)
    pt3dadd(-1.03601799252397, -1412.65690085589, 119.023941671099, 1.62809288077301)
    pt3dadd(-0.487521211552234, -1413.08812760035, 119.740317812612, 1.62299331493542)
    pt3dadd(0.060975569419611, -1413.51935434481, 120.456693954125, 1.61790529128935)
    pt3dadd(0.609472350391229, -1413.95058108926, 121.173070095638, 1.61282860602348)
    pt3dadd(1.15796913136307, -1414.38180783372, 121.889446237151, 1.60776293278596)
  }
  adendIML[3] {pt3dclear()
    pt3dadd(1.15796913136307, -1414.38180783372, 121.889446237151, 1.60270827157681)
    pt3dadd(1.70646591233481, -1414.81303457818, 122.605822378664, 1.60270827157681)
    pt3dadd(2.39770884891902, -1415.18012505982, 123.19658848548, 1.59707207971393)
    pt3dadd(3.25333735681181, -1415.46533456245, 123.628509075509, 1.59076058504859)
    pt3dadd(4.1089658647046, -1415.75054406509, 124.060429665537, 1.5844665920191)
    pt3dadd(4.96474119901814, -1416.04206015909, 124.487686088896, 1.57817625101772)
    pt3dadd(5.81833715050004, -1416.40978395967, 124.855587901699, 1.57174217318469)
    pt3dadd(6.6716358271309, -1416.78523537739, 125.21741327587, 1.56531115562663)
    pt3dadd(7.52493450376164, -1417.16068679511, 125.579238650041, 1.55889861782889)
    pt3dadd(8.37823318039239, -1417.53613821283, 125.941064024212, 1.55250455979147)
    pt3dadd(9.14577331352996, -1418.02735451029, 126.350690906557, 1.54625488989703)
    pt3dadd(9.89542365401405, -1418.54027316431, 126.768947790989, 1.54004720497463)
    pt3dadd(10.6450739944983, -1419.05319181832, 127.187204675421, 1.53385722836833)
    pt3dadd(11.3931493740362, -1419.59130820403, 127.571324426689, 1.52760059526528)
    pt3dadd(12.1350649375405, -1420.19403790394, 127.86488740471, 1.52115297067473)
    pt3dadd(12.8767065914855, -1420.79833851086, 128.156071940035, 1.5147205037342)
    pt3dadd(13.6183482454305, -1421.40263911778, 128.447256475359, 1.50830730599989)
    pt3dadd(14.3599898993755, -1422.0069397247, 128.738441010683, 1.50191395439575)
    pt3dadd(15.1350129630483, -1422.57439194491, 128.984584140246, 1.49548833105688)
    pt3dadd(16.0622331752454, -1422.94589746475, 129, 1.48887347049432)
    pt3dadd(16.9962850100965, -1423.30303493102, 129, 1.48227695393693)
    pt3dadd(17.9303368449475, -1423.66017239728, 129, 1.47570127594737)
    pt3dadd(18.8643886797986, -1424.01730986355, 129, 1.46914717478568)
    pt3dadd(19.7970812774586, -1424.37793240316, 129, 1.46261440336621)
    pt3dadd(20.7099084072433, -1424.78595702636, 129, 1.45610271844175)
    pt3dadd(21.620274884706, -1425.19975997066, 129, 1.44961285388192)
    pt3dadd(22.5306413621686, -1425.61356291496, 129, 1.44314366331629)
    pt3dadd(23.4410078396312, -1426.02736585926, 129, 1.43669662657434)
    pt3dadd(24.3513743170937, -1426.44116880356, 129, 1.43027034297357)
    pt3dadd(25.0489846249983, -1427.10126979109, 129.249983651463, 1.42407024934572)
    pt3dadd(25.6953028410289, -1427.80378959112, 129.547874057801, 1.41795347011816)
    pt3dadd(26.3416210570595, -1428.50630939116, 129.84576446414, 1.41185589321812)
    pt3dadd(26.98793927309, -1429.20882919119, 130.143654870478, 1.40577824693548)
    pt3dadd(27.6344240097817, -1429.91127404849, 130.441360226685, 1.39971993027697)
    pt3dadd(28.3318813392311, -1430.5864248958, 130.677967665327, 1.39358535885123)
    pt3dadd(29.0420081882804, -1431.25477957726, 130.899376513461, 1.38744787520792)
    pt3dadd(29.7521350373298, -1431.92313425872, 131.120785361595, 1.38133062534169)
    pt3dadd(30.4622618863791, -1432.59148894017, 131.34219420973, 1.37523334283045)
    pt3dadd(31.1723887354284, -1433.25984362163, 131.563603057864, 1.36915718825883)
    pt3dadd(31.8825155844778, -1433.92819830309, 131.785011905999, 1.36310090249463)
    pt3dadd(32.5796147729521, -1434.60621458407, 132.009621395469, 1.35706966445384)
    pt3dadd(33.077919047925, -1435.42916252706, 132.282243045601, 1.35112852734332)
    pt3dadd(33.5689264949402, -1436.25612243782, 132.556193758261, 1.34520895512786)
    pt3dadd(34.0599339419556, -1437.08308234858, 132.830144470922, 1.33930952316884)
    pt3dadd(34.5509413889707, -1437.91004225935, 133.104095183582, 1.33343006687999)
    pt3dadd(35.0419488359861, -1438.73700217011, 133.378045896242, 1.3275700441239)
    pt3dadd(35.530768274995, -1439.5719140842, 133.630215498656, 1.32169824786857)
    pt3dadd(36.0178115073521, -1440.41317057646, 133.864899124112, 1.31582104744684)
    pt3dadd(36.5048547397091, -1441.25442706871, 134.099582749568, 1.30996361507166)
    pt3dadd(36.9918979720661, -1442.09568356096, 134.334266375024, 1.30412722907555)
    pt3dadd(37.4789412044232, -1442.93694005322, 134.56895000048, 1.29831066528304)
    pt3dadd(37.9659844367803, -1443.77819654547, 134.803633625936, 1.29251420332662)
    pt3dadd(38.4417889738357, -1444.60093752482, 135.091711029312, 1.28685617495845)
    pt3dadd(38.8671265349176, -1445.34044106718, 135.613376447466, 1.28174420278585)
    pt3dadd(39.2909253188956, -1446.07737353011, 136.139993135175, 1.27666424538878)
    pt3dadd(39.7147241028734, -1446.81430599305, 136.666609822884, 1.27160012612179)
    pt3dadd(40.1385228868513, -1447.55123845598, 137.193226510593, 1.26655184498488)
    pt3dadd(40.5623216708293, -1448.28817091891, 137.719843198301, 1.26151940197804)
    pt3dadd(40.9861204548073, -1449.02510338185, 138.24645988601, 1.25650280469223)
    pt3dadd(41.4099192387852, -1449.76203584478, 138.773076573719, 1.25150238795598)
    pt3dadd(41.833749084758, -1450.4990218041, 139.299593262304, 1.24651748393776)
    pt3dadd(42.2869441264011, -1451.28647794073, 139.703691874157, 1.24124065386713)
    pt3dadd(42.7581843262345, -1452.10494776149, 140.032385997257, 1.23579298835997)
    pt3dadd(43.229424526068, -1452.92341758226, 140.361080120357, 1.23036433311783)
    pt3dadd(43.7006647259013, -1453.74188740302, 140.689774243457, 1.22495552374438)
    pt3dadd(44.2131231186746, -1454.52136464691, 141.037248977349, 1.21960362009626)
    pt3dadd(44.9343149760645, -1455.05224773987, 141.475221076767, 1.21446967783389)
    pt3dadd(45.6739902193422, -1455.55657176937, 141.920796892699, 1.20937157748253)
    pt3dadd(46.4137656839592, -1456.0605103119, 142.366640471708, 1.2042919346301)
    pt3dadd(47.1600546123201, -1456.53687043794, 142.831040223366, 1.19927866901326)
    pt3dadd(47.9092746824509, -1457.0006733385, 143.303857477649, 1.19430466551936)
    pt3dadd(48.6584947525818, -1457.46447623906, 143.776674731932, 1.18934749624659)
    pt3dadd(49.34803819115, -1458.01920889116, 144.234129332888, 1.1843668354265)
    pt3dadd(49.9822059616666, -1458.65337666167, 144.676466848452, 1.17936467266834)
    pt3dadd(50.6163737321834, -1459.28754443219, 145.118804364017, 1.17438000683488)
    pt3dadd(51.2693677328642, -1459.92506096234, 145.520294989166, 1.16933245532721)
    pt3dadd(51.9956448077563, -1460.57218359587, 145.75082499875, 1.16400129265607)
    pt3dadd(52.7256768246897, -1461.21925742906, 145.970708396604, 1.15867730395335)
    pt3dadd(53.4557088416229, -1461.86633126225, 146.190591794459, 1.15337331790433)
    pt3dadd(54.1857408585562, -1462.51340509544, 146.410475192313, 1.14808956109179)
    pt3dadd(54.9157728754896, -1463.16047892863, 146.630358590168, 1.14282669550311)
    pt3dadd(55.6458048924228, -1463.80755276182, 146.850241988022, 1.13758370990662)
    pt3dadd(56.40695997666, -1464.39673061646, 147.109311892265, 1.13241348188545)
    pt3dadd(57.2267634914857, -1464.85787009355, 147.448830050467, 1.12738247744261)
    pt3dadd(58.0465670063116, -1465.31900957064, 147.788348208669, 1.12237022261055)
    pt3dadd(58.8663705211374, -1465.78014904773, 148.127866366871, 1.11737709776502)
    pt3dadd(59.6766087490693, -1466.25342311237, 148.471833291655, 1.11241150282616)
  }
  adendMML[2] {pt3dclear()
    pt3dadd(59.6766087490693, -1466.25342311237, 148.471833291655, 1.10755339301733)
    pt3dadd(60.3663440790624, -1466.85966675253, 148.862289558628, 1.10755339301733)
    pt3dadd(61.0294782265212, -1467.49265843874, 149.261757489334, 1.10273124297745)
    pt3dadd(61.6926123739801, -1468.12565012495, 149.661225420039, 1.09792762025056)
    pt3dadd(62.3531666890007, -1468.78123999375, 149.994335038553, 1.09307237824906)
    pt3dadd(62.998334942675, -1469.54518657123, 150, 1.0879100499201)
    pt3dadd(63.6424706884578, -1470.31009776934, 150, 1.08276912917219)
    pt3dadd(64.3654710840835, -1470.98413403603, 150, 1.07764937446923)
    pt3dadd(65.233714226208, -1471.48027297439, 150, 1.07255088114266)
    pt3dadd(66.1019573683325, -1471.97641191275, 150, 1.06747402911108)
    pt3dadd(66.8959221462273, -1472.52360128352, 150.222395508615, 1.06257819650055)
    pt3dadd(67.6319604743385, -1473.09607553871, 150.583672143186, 1.05785646076782)
    pt3dadd(68.3679988024497, -1473.66854979391, 150.944948777758, 1.05315337635771)
    pt3dadd(69.1040371305609, -1474.24102404911, 151.306225412329, 1.04846877857929)
    pt3dadd(69.7833652151311, -1474.84843090755, 151.709499634797, 1.04388799028223)
    pt3dadd(70.3969343115682, -1475.49608717601, 152.161245494567, 1.03942403140779)
    pt3dadd(71.0105034080053, -1476.14374344447, 152.612991354338, 1.03497725992089)
    pt3dadd(71.6659007122948, -1476.7567678341, 153.044064079395, 1.03050522006143)
    pt3dadd(72.4768752022887, -1477.22774823013, 153.389599313212, 1.0258857189604)
    pt3dadd(73.2966787171146, -1477.68888770722, 153.729117471414, 1.02127535700795)
    pt3dadd(74.1164822319403, -1478.15002718431, 154.068635629616, 1.01668399884676)
    pt3dadd(74.9362857467661, -1478.6111666614, 154.408153787818, 1.01211139029636)
    pt3dadd(75.6226251665473, -1479.26455871194, 154.712301633722, 1.00750548765207)
    pt3dadd(76.2546099857655, -1479.98371385105, 155.001111388005, 1.00289762611279)
    pt3dadd(76.8865948049836, -1480.70286899016, 155.289921142288, 0.998309057067525)
    pt3dadd(77.5185796242017, -1481.42202412927, 155.578730896572, 0.993740405938972)
    pt3dadd(78.1505644434199, -1482.14117926838, 155.867540650855, 0.989191635483139)
    pt3dadd(78.7536727079543, -1482.85676778956, 156.216847481531, 0.984755050050882)
    pt3dadd(79.3314425952178, -1483.56825804814, 156.616801940573, 0.980420945689884)
    pt3dadd(79.9092124824813, -1484.27974830673, 157.016756399616, 0.976105543003088)
    pt3dadd(80.4869823697449, -1484.99123856531, 157.416710858659, 0.971808113125078)
    pt3dadd(81.1712499549316, -1485.62979439401, 157.761442768341, 0.967436418703437)
    pt3dadd(81.8835284770571, -1486.24916702194, 158.091650058817, 0.963059704492354)
    pt3dadd(82.5958069991825, -1486.86853964988, 158.421857349293, 0.958702475577398)
    pt3dadd(83.308085521308, -1487.48791227781, 158.752064639769, 0.95436410321947)
    pt3dadd(83.9915055270595, -1488.13872595549, 159.079227324836, 0.950040375209397)
    pt3dadd(84.5841945607598, -1488.87958724761, 159.395208740685, 0.945720603439797)
    pt3dadd(85.17688359446, -1489.62044853974, 159.711190156534, 0.941419845262018)
    pt3dadd(85.7695726281603, -1490.36130983186, 160.027171572383, 0.937138125998575)
    pt3dadd(86.3622616618605, -1491.10217112399, 160.343152988232, 0.93287653888031)
    pt3dadd(86.9446577854221, -1491.74294881148, 160.823467211786, 0.928966506611614)
    pt3dadd(87.507446647944, -1492.27611720756, 161.45513180447, 0.925442671871863)
    pt3dadd(88.0702355104659, -1492.80928560363, 162.086796397153, 0.921932290158931)
    pt3dadd(88.6330243729878, -1493.3424539997, 162.718460989837, 0.918435361472815)
    pt3dadd(89.2000417561406, -1493.88150828058, 163.340172020876, 0.914923595205974)
    pt3dadd(89.8439561462502, -1494.53653000262, 163.711042536146, 0.910883986547823)
    pt3dadd(90.5111292323519, -1495.22936359204, 163.984651181043, 0.906690397306058)
    pt3dadd(91.1783023184536, -1495.92219718145, 164.25825982594, 0.902516789014705)
    pt3dadd(91.8454754045553, -1496.61503077086, 164.531868470836, 0.898363322792465)
    pt3dadd(92.5126484906571, -1497.30786436028, 164.805477115733, 0.894229293255386)
    pt3dadd(93.1911431369952, -1497.97236568991, 165.114576182585, 0.890161037631189)
    pt3dadd(93.8940316934071, -1498.56427184268, 165.509031228922, 0.886234193046366)
    pt3dadd(94.5969202498191, -1499.15617799544, 165.903486275259, 0.882325398026032)
    pt3dadd(95.299808806231, -1499.74808414821, 166.297941321596, 0.878434652570189)
    pt3dadd(95.9690586792891, -1500.40081356722, 166.643341474092, 0.874492773018505)
    pt3dadd(96.6024267658827, -1501.11679488249, 166.936966444172, 0.870497865193855)
    pt3dadd(97.2357948524765, -1501.83277619777, 167.230591414253, 0.866522202428142)
    pt3dadd(97.8691629390702, -1502.54875751305, 167.524216384333, 0.862566526736706)
    pt3dadd(98.5025310256639, -1503.26473882833, 167.817841354414, 0.858630555831515)
    pt3dadd(99.1070178807414, -1504.00702396548, 168.102535243688, 0.854703965245992)
    pt3dadd(99.6642582227855, -1504.79222626564, 168.37261032405, 0.850781459766881)
    pt3dadd(100.22149856483, -1505.57742856579, 168.642685404413, 0.846878865776676)
    pt3dadd(100.778738906874, -1506.36263086594, 168.912760484775, 0.84299574078861)
    pt3dadd(101.335979248918, -1507.1478331661, 169.182835565137, 0.839133063707632)
    pt3dadd(101.893219590962, -1507.93303546625, 169.4529106455, 0.835290134452296)
    pt3dadd(102.633415923553, -1508.52244872535, 169.753943680546, 0.831500668588536)
    pt3dadd(103.411642586651, -1509.07008971049, 170.061275117657, 0.827738262480078)
    pt3dadd(104.189869249748, -1509.61773069564, 170.368606554767, 0.823995146557996)
    pt3dadd(104.968095912846, -1510.16537168078, 170.675937991877, 0.82027113598973)
    pt3dadd(105.738367434878, -1510.69901445572, 171.011685387502, 0.816617609663173)
    pt3dadd(106.404738370571, -1511.06625178709, 171.656872352549, 0.813600735562692)
    pt3dadd(107.0485553616, -1511.40425570738, 172.343351071761, 0.810714270895444)
    pt3dadd(107.692372352629, -1511.74225962767, 173.029829790973, 0.807840160314152)
    pt3dadd(108.336189343658, -1512.08026354796, 173.716308510185, 0.804977984563263)
    pt3dadd(108.980006334686, -1512.41826746825, 174.402787229397, 0.802127743642779)
    pt3dadd(109.623823325715, -1512.75627138854, 175.08926594861, 0.799289437552698)
    pt3dadd(110.267640316744, -1513.09427530883, 175.775744667822, 0.796463066293021)
    pt3dadd(110.911457307773, -1513.43227922912, 176.462223387034, 0.793648981787499)
    pt3dadd(111.615001253218, -1513.79953771427, 177.0537661722, 0.790622564368234)
    pt3dadd(112.466067388191, -1514.23810611081, 177.339347806447, 0.787057499024001)
    pt3dadd(113.320493245987, -1514.67826488603, 177.615421539565, 0.783499594560244)
    pt3dadd(114.174919103784, -1515.11842366126, 177.891495272683, 0.779961103969349)
    pt3dadd(115.029344961581, -1515.55858243649, 178.167569005801, 0.776442927233349)
    pt3dadd(115.883770819377, -1515.99874121172, 178.443642738919, 0.772944508334308)
    pt3dadd(116.439634341967, -1516.72887278651, 178.790512973253, 0.76954458304309)
    pt3dadd(116.916492322006, -1517.52931296729, 179.15369610043, 0.766182317650695)
  }
  adendOML[2] {pt3dclear()
    pt3dadd(116.916492322006, -1517.52931296729, 179.15369610043, 0.762838892582313)
    pt3dadd(117.393350302046, -1518.32975314807, 179.516879227606, 0.762838892582313)
    pt3dadd(117.870208282085, -1519.13019332885, 179.880062354782, 0.759513930221287)
    pt3dadd(118.347066262124, -1519.93063350963, 180.243245481958, 0.756207468047894)
    pt3dadd(118.823924242163, -1520.73107369042, 180.606428609134, 0.752920437256335)
    pt3dadd(119.300782222203, -1521.5315138712, 180.969611736311, 0.749651869172134)
    pt3dadd(119.777640202242, -1522.33195405198, 181.332794863487, 0.746401763795288)
    pt3dadd(120.256549399089, -1523.15095098456, 181.645555960555, 0.743116660407118)
    pt3dadd(120.737032387771, -1523.98547407017, 181.915198904426, 0.739806437260741)
    pt3dadd(121.217515376453, -1524.81999715577, 182.184841848298, 0.736515687037779)
    pt3dadd(121.697998365134, -1525.65452024138, 182.454484792169, 0.733245166879138)
    pt3dadd(122.178481353816, -1526.48904332698, 182.72412773604, 0.72999462121177)
    pt3dadd(122.664000193654, -1527.3200621421, 182.99544840228, 0.726765001453635)
    pt3dadd(123.420685475866, -1527.86501675947, 183.347982575654, 0.723637627556128)
    pt3dadd(124.18790993058, -1528.39873811927, 183.703662412275, 0.720532338191434)
    pt3dadd(124.955134385295, -1528.93245947907, 184.059342248896, 0.717445604866152)
    pt3dadd(125.725859284386, -1529.46120084341, 184.412213006547, 0.714375009706503)
    pt3dadd(126.693341140543, -1529.53068152279, 184.5, 0.711162560545214)
    pt3dadd(127.690156419079, -1529.45093630051, 184.5, 0.70793937429672)
    pt3dadd(128.686971697615, -1529.37119107822, 184.5, 0.704738249312205)
    pt3dadd(129.602925196393, -1529.45739074684, 184.670043422914, 0.701692842847315)
    pt3dadd(130.280598275208, -1529.93008742667, 185.231869016458, 0.699033570727255)
    pt3dadd(130.947854201295, -1530.41051169345, 185.801045661261, 0.69640279674784)
    pt3dadd(131.615110127381, -1530.89093596023, 186.370222306065, 0.693786969599932)
    pt3dadd(132.282366053467, -1531.37136022701, 186.939398950868, 0.691186089283531)
    pt3dadd(132.961567235431, -1531.85494269481, 187.491027344075, 0.688567686385024)
    pt3dadd(133.833733079293, -1532.3386895979, 187.5, 0.685505263488066)
    pt3dadd(134.708974614733, -1532.82237570959, 187.5, 0.682456352915927)
    pt3dadd(135.584216150172, -1533.30606182128, 187.5, 0.679429035434175)
    pt3dadd(136.459457685611, -1533.78974793297, 187.5, 0.676423031826899)
    pt3dadd(137.334699221051, -1534.27343404466, 187.5, 0.673438129740855)
    pt3dadd(138.196983334155, -1534.77711935846, 187.513670369507, 0.670476143526568)
    pt3dadd(138.806331257433, -1535.52817766841, 187.722206516912, 0.667600077306989)
    pt3dadd(139.370492622062, -1536.31800357889, 187.962824441829, 0.664758220717821)
    pt3dadd(139.934653986692, -1537.10782948937, 188.203442366747, 0.661936284684446)
    pt3dadd(140.498815351321, -1537.89765539985, 188.444060291664, 0.659134222768703)
    pt3dadd(141.062976715951, -1538.68748131033, 188.684678216582, 0.656353049472871)
    pt3dadd(141.62713808058, -1539.47730722082, 188.925296141499, 0.653591597181316)
    pt3dadd(141.947974569503, -1540.3676901587, 189.221909530835, 0.650891649294906)
    pt3dadd(142.156795692388, -1541.29246941719, 189.539992950237, 0.648228622706347)
    pt3dadd(142.365616815274, -1542.21724867568, 189.858076369639, 0.645584586987346)
    pt3dadd(142.574437938159, -1543.14202793418, 190.176159789041, 0.642959794914387)
    pt3dadd(142.829672839962, -1544.05080740641, 190.479542521426, 0.640354560115218)
  }
  adendOML[3] {pt3dclear()
    pt3dadd(142.829672839962, -1544.05080740641, 190.479542521426, 0.637745094704904)
    pt3dadd(143.59326178983, -1544.62121352285, 190.781915559091, 0.637745094704904)
    pt3dadd(144.392105661083, -1545.1539614529, 191.061250684698, 0.635148642473855)
    pt3dadd(145.190949532335, -1545.68670938294, 191.340585810305, 0.632572326468839)
    pt3dadd(145.989793403588, -1546.21945731298, 191.619920935913, 0.630015393816808)
    pt3dadd(146.78863727484, -1546.75220524302, 191.89925606152, 0.627478427387276)
    pt3dadd(147.632009180191, -1546.7753507051, 192.270217603426, 0.6250439136576)
    pt3dadd(148.499297503709, -1546.51139338925, 192.692280986459, 0.622673327449155)
    pt3dadd(149.366585827227, -1546.2474360734, 193.114344369491, 0.620320392779241)
    pt3dadd(150.239125647896, -1546.05892237768, 193.523583097572, 0.617974413151841)
  }
}
proc shape3d_10() {
  adendOML[3] {
    pt3dadd(151.050343518242, -1546.59261834501, 193.762526984887, 0.615507897701986)
    pt3dadd(151.861561388587, -1547.12631431234, 194.001470872202, 0.613061116652351)
    pt3dadd(152.672779258933, -1547.66001027967, 194.240414759518, 0.610634933927224)
    pt3dadd(153.483997129278, -1548.19370624701, 194.479358646833, 0.608228945755999)
    pt3dadd(154.295214999624, -1548.72740221434, 194.718302534148, 0.605842691984993)
    pt3dadd(155.112359292088, -1549.25463447317, 194.949587600389, 0.603473678620327)
    pt3dadd(156.034916029839, -1549.61770233231, 195, 0.601074456969675)
    pt3dadd(156.983599327889, -1549.93393009833, 195, 0.598686084424619)
    pt3dadd(157.93228262594, -1550.25015786434, 195, 0.596319211135875)
    pt3dadd(158.88096592399, -1550.56638563036, 195, 0.593973253986526)
    pt3dadd(159.829649222041, -1550.88261339638, 195, 0.591649287662645)
    pt3dadd(160.704945594067, -1551.32792693984, 195, 0.589345971163359)
    pt3dadd(161.413174136418, -1552.03382661773, 195, 0.587064693300657)
    pt3dadd(162.120280917605, -1552.74093339892, 195, 0.584804285508014)
    pt3dadd(163.095462165511, -1552.82059481578, 195, 0.582565456888454)
    pt3dadd(164.095191858708, -1552.79734528803, 195, 0.580347892196138)
    pt3dadd(165.094921551905, -1552.77409576028, 195, 0.578151527706237)
    pt3dadd(166.094651245102, -1552.75084623253, 195, 0.575976869978784)
    pt3dadd(167.094380938299, -1552.72759670478, 195, 0.57382292088459)
    pt3dadd(168.06826660665, -1552.80200855457, 195, 0.571691145010491)
    pt3dadd(168.877121017305, -1553.3882566508, 195, 0.569580049084031)
    pt3dadd(169.672552737337, -1553.99429986606, 195, 0.56749081297944)
    pt3dadd(170.46798445737, -1554.60034308132, 195, 0.56542259404455)
    pt3dadd(171.212101196908, -1555.26608163823, 195, 0.563375775028767)
    pt3dadd(171.919207978095, -1555.97318841942, 195, 0.561350460609525)
    pt3dadd(172.626314759281, -1556.68029520061, 195, 0.559346058517837)
    pt3dadd(173.333421540468, -1557.38740198179, 195, 0.557363651063459)
    pt3dadd(174.040528321654, -1558.09450876298, 195, 0.555811984074206)
  }
  adendOML[4] {pt3dclear()
    pt3dadd(142.829672839962, -1544.05080740641, 190.479542521426, 0.637628128123746)
    pt3dadd(143.303104333978, -1544.93136682388, 190.5, 0.637628128123746)
    pt3dadd(143.823051280874, -1545.7855653795, 190.5, 0.634934117782981)
    pt3dadd(144.34299822777, -1546.63976393511, 190.5, 0.632261355278865)
    pt3dadd(144.771295903962, -1547.5258314425, 190.578709326564, 0.629629445467647)
    pt3dadd(144.837899998149, -1548.45828876113, 190.933796982755, 0.627156927413239)
    pt3dadd(144.904504092337, -1549.39074607975, 191.288884638947, 0.62470297267021)
    pt3dadd(144.971108186524, -1550.32320339838, 191.643972295138, 0.622267591466832)
    pt3dadd(145.071253043336, -1551.23753440991, 192.019496666827, 0.619875117357386)
    pt3dadd(145.462796486171, -1551.97516132427, 192.566329836592, 0.617705618174886)
    pt3dadd(145.884467571452, -1552.68673128068, 193.12834557745, 0.615573880015184)
    pt3dadd(146.306138656732, -1553.39830123709, 193.690361318308, 0.613457245426324)
    pt3dadd(146.727809742012, -1554.1098711935, 194.252377059166, 0.611355714408308)
    pt3dadd(147.149480827293, -1554.82144114991, 194.814392800024, 0.609269286961134)
    pt3dadd(147.925865091699, -1555.26350506426, 195.16983615932, 0.60697670670276)
    pt3dadd(148.847736554669, -1555.56311328972, 195.415575690117, 0.604605303881684)
    pt3dadd(149.769608017638, -1555.86272151519, 195.661315220913, 0.602254123216372)
    pt3dadd(150.691479480608, -1556.16232974065, 195.90705475171, 0.599922621957109)
    pt3dadd(151.613350943577, -1556.46193796612, 196.152794282507, 0.597611889149808)
    pt3dadd(152.535222406547, -1556.76154619158, 196.398533813303, 0.595321057032072)
    pt3dadd(153.261993229846, -1557.26148183741, 196.820925771048, 0.59319994160318)
    pt3dadd(153.835424290873, -1557.88477646896, 197.352602948036, 0.591207092678113)
    pt3dadd(154.4088553519, -1558.50807110052, 197.884280125024, 0.589230276499079)
    pt3dadd(154.982286412926, -1559.13136573207, 198.415957302011, 0.587269226565401)
    pt3dadd(155.555717473953, -1559.75466036362, 198.947634478999, 0.585323913748824)
    pt3dadd(156.087746406246, -1560.34768355358, 199.530257721855, 0.583493104031073)
    pt3dadd(156.355186061494, -1560.74174910499, 200.405100104426, 0.582298262710345)
    pt3dadd(156.56140036691, -1561.08543961401, 201.321261931969, 0.581247837335485)
    pt3dadd(156.767614672326, -1561.42913012304, 202.237423759512, 0.580202106354702)
    pt3dadd(156.973828977741, -1561.77282063206, 203.153585587055, 0.579161143300173)
    pt3dadd(157.180043283157, -1562.11651114109, 204.069747414598, 0.578125343543541)
    pt3dadd(157.386257588573, -1562.46020165012, 204.985909242141, 0.577094238180986)
    pt3dadd(157.592471893989, -1562.80389215914, 205.902071069685, 0.576067827212507)
    pt3dadd(157.798686199404, -1563.14758266817, 206.818232897228, 0.575247298772901)
  }
  GCL[5] {pt3dclear()
    pt3dadd(-19.7272136998346, -1397.06533145322, 117.002430196765, 1.94161239427997)
    pt3dadd(-18.9205941728122, -1397.42523096689, 117.420447140606, 1.94161239427997)
    pt3dadd(-18.1412611898801, -1397.80840301683, 117.916248796369, 1.93535299888749)
    pt3dadd(-17.3619282069481, -1398.19157506677, 118.412050452132, 1.9291069700074)
    pt3dadd(-16.5825952240159, -1398.57474711671, 118.907852107896, 1.92287465404451)
    pt3dadd(-15.8032622410838, -1398.95791916665, 119.403653763659, 1.91665576254483)
    pt3dadd(-15.0239292581516, -1399.3410912166, 119.899455419422, 1.91045023755753)
    pt3dadd(-14.2445962752195, -1399.72426326654, 120.395257075185, 1.90425807908263)
    pt3dadd(-13.4652632922873, -1400.10743531648, 120.891058730949, 1.89807928712012)
    pt3dadd(-12.6859303093552, -1400.49060736642, 121.386860386712, 1.89191386167)
    pt3dadd(-11.7943982791578, -1400.90327211914, 121.5, 1.88502928833328)
    pt3dadd(-10.8844266888992, -1401.31794271723, 121.5, 1.87804883576344)
    pt3dadd(-9.97445509864076, -1401.73261331532, 121.5, 1.87108539835599)
    pt3dadd(-9.0644835083823, -1402.14728391341, 121.5, 1.86413986161275)
    pt3dadd(-8.15451191812372, -1402.56195451151, 121.5, 1.85721114846909)
    pt3dadd(-7.24454032786514, -1402.9766251096, 121.5, 1.85030031909759)
    pt3dadd(-6.33456873760667, -1403.39129570769, 121.5, 1.84340652178053)
    pt3dadd(-5.42459714734809, -1403.80596630578, 121.5, 1.83653020821797)
    pt3dadd(-4.51462555708963, -1404.22063690388, 121.5, 1.82967132672751)
    pt3dadd(-3.60465396683105, -1404.63530750197, 121.5, 1.82282952897389)
    pt3dadd(-2.69495554549519, -1405.05057671087, 121.5, 1.81600556331001)
    pt3dadd(-1.78548106990945, -1405.46633647114, 121.5, 1.80919842124559)
    pt3dadd(-0.876006594323712, -1405.88209623141, 121.5, 1.8024092315281)
    pt3dadd(0.0334678812621405, -1406.29785599167, 121.5, 1.79563700529028)
    pt3dadd(0.930874927511354, -1406.70685329653, 121.532161621316, 1.81284053742685)
  }
  GCL[6] {pt3dclear()
    pt3dadd(0.930874927511354, -1406.70685329653, 121.532161621316, 1.87825312908182)
    pt3dadd(1.93438211493356, -1406.86593590995, 121.5, 1.87825312908182)
    pt3dadd(2.92225924033801, -1407.02117374394, 121.5, 1.87174699196187)
    pt3dadd(3.91013636574246, -1407.17641157793, 121.5, 1.86525616989417)
    pt3dadd(4.89801349114691, -1407.33164941193, 121.5, 1.85877986766868)
    pt3dadd(5.88589061655136, -1407.48688724592, 121.5, 1.85231913464769)
    pt3dadd(6.85724515899642, -1407.57406710216, 121.382532134142, 1.84599441082102)
    pt3dadd(7.76455164876302, -1407.4878360062, 120.971946706304, 1.84008679254833)
  }
  adendIML[4] {pt3dclear()
    pt3dadd(7.76455164876302, -1407.4878360062, 120.971946706304, 1.83420822076805)
    pt3dadd(8.66882799364259, -1407.39740837172, 120.554685235506, 1.83420822076805)
    pt3dadd(9.57310433852217, -1407.30698073723, 120.137423764709, 1.82834209631975)
    pt3dadd(10.4773806834017, -1407.21655310274, 119.720162293911, 1.82248841920342)
    pt3dadd(11.3816570282814, -1407.12612546825, 119.302900823114, 1.81664718941906)
    pt3dadd(12.285933373161, -1407.03569783376, 118.885639352316, 1.81081885855504)
    pt3dadd(13.2004175125888, -1406.95762986651, 118.493746915325, 1.80494806066487)
    pt3dadd(14.1704198864271, -1406.95212324844, 118.251834955215, 1.79878790499067)
    pt3dadd(15.1435461224989, -1406.95212324844, 118.021562662768, 1.79262417543964)
    pt3dadd(16.1166723585707, -1406.95212324844, 117.791290370321, 1.78647487911182)
    pt3dadd(17.0897985946425, -1406.95212324844, 117.561018077874, 1.78033949035423)
    pt3dadd(18.0629248307142, -1406.95212324844, 117.330745785427, 1.77421871581426)
    pt3dadd(19.0360510667859, -1406.95212324844, 117.10047349298, 1.76811208403571)
    pt3dadd(19.9514915944914, -1407.07833963352, 116.741154670126, 1.7622749941569)
    pt3dadd(20.8140027572475, -1407.30012821822, 116.286309292208, 1.75666899648146)
    pt3dadd(21.6765139200037, -1407.52191680293, 115.831463914289, 1.75107521286698)
    pt3dadd(22.5390250827598, -1407.74370538764, 115.376618536371, 1.74549346476232)
    pt3dadd(23.401536245516, -1407.96549397235, 114.921773158452, 1.73992375216749)
    pt3dadd(24.2640474082722, -1408.18728255706, 114.466927780534, 1.73436607508248)
    pt3dadd(25.1281099115032, -1408.40603740228, 114.014329983604, 1.72881489888161)
    pt3dadd(26.0609171939221, -1408.48787844689, 113.663543779837, 1.72302308251869)
    pt3dadd(26.9964089145518, -1408.56271778454, 113.318211600373, 1.71723276908479)
    pt3dadd(27.9319006351815, -1408.63755712219, 112.972879420909, 1.71145557586456)
    pt3dadd(28.8673923558111, -1408.71239645984, 112.627547241445, 1.70569207494142)
    pt3dadd(29.8215617100461, -1408.72213667596, 112.334794342031, 1.69984711506206)
    pt3dadd(30.7862540386207, -1408.69376337217, 112.072947694502, 1.69396113665474)
    pt3dadd(31.7509463671953, -1408.66539006839, 111.811101046974, 1.68808955493533)
    pt3dadd(32.7156386957698, -1408.63701676461, 111.549254399446, 1.68223192312154)
    pt3dadd(33.6803310243445, -1408.60864346083, 111.287407751917, 1.67638801648441)
    pt3dadd(34.6439382410231, -1408.58094272511, 111.021716993062, 1.67056477684733)
    pt3dadd(35.5931576238003, -1408.5616862771, 110.70811480287, 1.66483601745298)
    pt3dadd(36.5392644998509, -1408.54416577939, 110.384734513969, 1.65913800687684)
    pt3dadd(37.4853713759015, -1408.52664528169, 110.061354225068, 1.65345396280128)
    pt3dadd(38.4314782519523, -1408.50912478398, 109.737973936166, 1.64778333544633)
    pt3dadd(39.3775851280029, -1408.49160428628, 109.414593647265, 1.64212600510256)
    pt3dadd(40.3236920040536, -1408.47408378857, 109.091213358364, 1.63648247380188)
    pt3dadd(41.2697988801043, -1408.45656329087, 108.767833069463, 1.6308525266793)
    pt3dadd(42.2159057561549, -1408.43904279316, 108.444452780561, 1.62523587656792)
    pt3dadd(43.1620193939059, -1408.42153088057, 108.121091822441, 1.61963282225725)
    pt3dadd(44.1300823126129, -1408.4405397822, 107.881979227861, 1.61392230027979)
    pt3dadd(45.1112758599879, -1408.48142284668, 107.693331944211, 1.6081532038097)
    pt3dadd(46.092469407363, -1408.52230591115, 107.50468466056, 1.60239891921295)
    pt3dadd(47.073662954738, -1408.56318897562, 107.316037376909, 1.59665903659192)
    pt3dadd(48.054856502113, -1408.6040720401, 107.127390093258, 1.5909334159941)
    pt3dadd(49.0360500494882, -1408.64495510457, 106.938742809608, 1.58522274722214)
    pt3dadd(50.0172435968632, -1408.68583816905, 106.750095525957, 1.57952618907374)
    pt3dadd(50.9984371442382, -1408.72672123352, 106.561448242306, 1.57384433570035)
    pt3dadd(51.9801826674458, -1408.86819433579, 106.5, 1.56811205483188)
    pt3dadd(52.9619625180361, -1409.05821624236, 106.5, 1.56236385642889)
    pt3dadd(53.9437423686263, -1409.24823814892, 106.5, 1.5566310562042)
    pt3dadd(54.9255222192165, -1409.43826005549, 106.5, 1.5509127758217)
    pt3dadd(55.9073020698069, -1409.62828196206, 106.5, 1.54520998151768)
    pt3dadd(56.8890819203972, -1409.81830386862, 106.5, 1.53952183572617)
    pt3dadd(57.8708617709874, -1410.00832577519, 106.5, 1.53384883077232)
    pt3dadd(58.8526416215776, -1410.19834768175, 106.5, 1.52819081957181)
    pt3dadd(59.8344214721679, -1410.38836958832, 106.5, 1.52254760396813)
    pt3dadd(60.8162013227582, -1410.57839149489, 106.5, 1.51691972735861)
    pt3dadd(61.768374911446, -1410.84455360589, 106.574831015141, 1.51134115699829)
    pt3dadd(62.6771450903544, -1411.21991520153, 106.757150609394, 1.50582982740611)
    pt3dadd(63.5859152692627, -1411.59527679717, 106.939470203646, 1.50033274206757)
    pt3dadd(64.4946854481711, -1411.9706383928, 107.121789797898, 1.49485015128656)
    pt3dadd(65.4034556270796, -1412.34599998844, 107.304109392151, 1.48938234100709)
    pt3dadd(66.312225805988, -1412.72136158407, 107.486428986403, 1.48392866855563)
    pt3dadd(67.2209959848964, -1413.09672317971, 107.668748580656, 1.47848995381684)
    pt3dadd(68.1297661638047, -1413.47208477535, 107.851068174908, 1.47306555642445)
    pt3dadd(69.0333108414305, -1413.87019659919, 108, 1.46763231720217)
    pt3dadd(69.9029967566668, -1414.36380211865, 108, 1.46215246366762)
    pt3dadd(70.772682671903, -1414.85740763811, 108, 1.45668712997527)
    pt3dadd(71.6423685871391, -1415.35101315757, 108, 1.45123738061186)
    pt3dadd(72.5120545023752, -1415.84461867703, 108, 1.4458021815105)
    pt3dadd(73.3817404176115, -1416.33822419648, 108, 1.44038222149727)
    pt3dadd(74.2514263328477, -1416.83182971594, 108, 1.4349771569869)
    pt3dadd(75.1021009246408, -1417.35592972057, 108, 1.42958698828492)
    pt3dadd(75.8987921955433, -1417.96031620195, 108, 1.42421205595495)
    pt3dadd(76.6954834664457, -1418.56470268332, 108, 1.41885167781276)
    pt3dadd(77.492174737348, -1419.1690891647, 108, 1.41350688007378)
    pt3dadd(78.2888660082505, -1419.77347564607, 108, 1.408176602177)
    pt3dadd(79.0855572791528, -1420.37786212744, 108, 1.40286162813377)
    pt3dadd(79.9405760608582, -1420.85677809221, 107.931593491585, 1.39758966985256)
    pt3dadd(80.8904607606664, -1421.10457410086, 107.741025406193, 1.39239375240854)
    pt3dadd(81.8403454604744, -1421.3523701095, 107.550457320801, 1.38721260493479)
    pt3dadd(82.7902301602826, -1421.60016611815, 107.35988923541, 1.38204555963674)
    pt3dadd(83.7401148600907, -1421.84796212679, 107.169321150018, 1.37689337562566)
    pt3dadd(84.6899995598988, -1422.09575813544, 106.978753064626, 1.37175552516896)
    pt3dadd(85.6398842597067, -1422.34355414408, 106.788184979235, 1.36663198192517)
    pt3dadd(86.5897689595148, -1422.59135015273, 106.597616893843, 1.36152332630983)
    pt3dadd(87.5525508532531, -1422.8310684947, 106.5, 1.35637833195205)
    pt3dadd(88.5256311407431, -1423.06153487858, 106.5, 1.35121133306045)
    pt3dadd(89.4987114282332, -1423.29200126246, 106.5, 1.34605914208641)
    pt3dadd(90.4717917157232, -1423.52246764634, 106.5, 1.34092193254498)
    pt3dadd(91.4448720032132, -1423.75293403022, 106.5, 1.33579987616193)
    pt3dadd(92.4179522907032, -1423.9834004141, 106.5, 1.33069245597068)
    pt3dadd(93.3839725801905, -1424.23714284241, 106.5, 1.32560053347155)
    pt3dadd(94.3158246004197, -1424.59989908413, 106.5, 1.32052313101443)
    pt3dadd(95.2462329932368, -1424.96642360251, 106.5, 1.31546111660349)
    pt3dadd(96.1766413860539, -1425.3329481209, 106.5, 1.31041384796633)
    pt3dadd(97.107049778871, -1425.69947263928, 106.5, 1.30538162290557)
    pt3dadd(98.0374581716881, -1426.06599715766, 106.5, 1.3003644888594)
    pt3dadd(98.959211583199, -1426.43880450658, 106.429720011359, 1.29538815440303)
    pt3dadd(99.864446748418, -1426.82101490967, 106.244073833324, 1.29048109658438)
    pt3dadd(100.769681913637, -1427.20322531276, 106.058427655289, 1.28558816241138)
    pt3dadd(101.674917078856, -1427.58543571586, 105.872781477254, 1.28070995119554)
    pt3dadd(102.580152244075, -1427.96764611895, 105.68713529922, 1.27584626017126)
    pt3dadd(103.485387409294, -1428.34985652204, 105.501489121185, 1.27099674876506)
    pt3dadd(104.390622574513, -1428.73206692513, 105.31584294315, 1.2661623008895)
    pt3dadd(105.295857739732, -1429.11427732823, 105.130196765115, 1.26134197665959)
    pt3dadd(106.212783815945, -1429.47500785777, 104.962812647965, 1.25652246436786)
    pt3dadd(107.155450287297, -1429.78474112693, 104.838533825288, 1.2516881479448)
    pt3dadd(108.098116758648, -1430.09447439609, 104.714255002611, 1.24686826917266)
  }
  adendMML[3] {pt3dclear()
    pt3dadd(108.098116758648, -1430.09447439609, 104.714255002611, 1.24206368962563)
    pt3dadd(109.04078323, -1430.40420766525, 104.589976179934, 1.24206368962563)
    pt3dadd(109.983449701352, -1430.71394093441, 104.465697357257, 1.23727345315862)
    pt3dadd(110.926116172703, -1431.02367420356, 104.341418534579, 1.23249827143666)
    pt3dadd(111.868782644055, -1431.33340747272, 104.217139711902, 1.22773777184569)
    pt3dadd(112.811449115406, -1431.64314074188, 104.092860889225, 1.22299189337786)
    pt3dadd(113.754115586758, -1431.95287401104, 103.968582066548, 1.21826113066295)
    pt3dadd(114.69678205811, -1432.2626072802, 103.844303243871, 1.21354471102804)
    pt3dadd(115.639448529461, -1432.57234054936, 103.720024421193, 1.20884352961038)
    pt3dadd(116.582115000813, -1432.88207381851, 103.595745598516, 1.20415684685152)
    pt3dadd(117.530686571028, -1433.16516175717, 103.458963567036, 1.19949263787187)
    pt3dadd(118.495591018613, -1433.35814264669, 103.280868695371, 1.19487130629552)
    pt3dadd(119.460495466197, -1433.5511235362, 103.102773823706, 1.19026413017747)
    pt3dadd(120.425399913781, -1433.74410442572, 102.92467895204, 1.18567204167439)
    pt3dadd(121.390304361365, -1433.93708531524, 102.746584080375, 1.18109418028352)
    pt3dadd(122.35520880895, -1434.13006620475, 102.56848920871, 1.17653087907485)
    pt3dadd(123.320113256534, -1434.32304709427, 102.390394337045, 1.17198233241116)
    pt3dadd(124.285017704118, -1434.51602798379, 102.21229946538, 1.16744794120575)
    pt3dadd(125.248534557933, -1434.7182917797, 102.038872185486, 1.16292534008323)
    pt3dadd(126.132093323695, -1435.16418442327, 102, 1.15836482870438)
    pt3dadd(126.989586249408, -1435.6786801787, 102, 1.1538073066011)
    pt3dadd(127.84707917512, -1436.19317593413, 102, 1.14926485177098)
    pt3dadd(128.704572100833, -1436.70767168955, 102, 1.14473711901787)
    pt3dadd(129.562065026545, -1437.22216744498, 102, 1.14022479877873)
    pt3dadd(130.419557952258, -1437.73666320041, 102, 1.1357269983818)
    pt3dadd(131.294178889554, -1438.20641860512, 101.966596523262, 1.13125596980344)
    pt3dadd(132.241180853238, -1438.46835531848, 101.780649114102, 1.1268601929125)
    pt3dadd(133.188182816922, -1438.73029203184, 101.594701704941, 1.12247893597075)
    pt3dadd(134.135184780606, -1438.9922287452, 101.40875429578, 1.11811239930955)
    pt3dadd(135.08218674429, -1439.25416545856, 101.222806886619, 1.11375998499666)
    pt3dadd(136.029188707973, -1439.51610217192, 101.036859477459, 1.10942254217832)
    pt3dadd(136.976190671657, -1439.77803888528, 100.850912068298, 1.10509936809517)
    pt3dadd(137.923192635341, -1440.03997559864, 100.664964659137, 1.1007906215188)
    pt3dadd(138.86667032194, -1440.32363166777, 100.509030282104, 1.09648253999987)
    pt3dadd(139.788058321703, -1440.71152289903, 100.5, 1.09213356808338)
    pt3dadd(140.707203351721, -1441.10544219761, 100.5, 1.08779925690555)
    pt3dadd(141.665119523877, -1441.30867946284, 100.359036344454, 1.08353419204325)
    pt3dadd(142.63632157133, -1441.40343088211, 100.140429959437, 1.07932544963766)
    pt3dadd(143.607523618784, -1441.49818230137, 99.9218235744197, 1.0751311908964)
    pt3dadd(144.578725666237, -1441.59293372063, 99.7032171894025, 1.07095090088298)
    pt3dadd(145.54992771369, -1441.6876851399, 99.4846108043854, 1.06678535811884)
    pt3dadd(146.521129761143, -1441.78243655916, 99.2660044193683, 1.06263396268905)
    pt3dadd(147.492191523828, -1441.87902929612, 99.047892290316, 1.05849628135543)
    pt3dadd(148.448373463169, -1442.10236976299, 98.8651052399842, 1.05434563222698)
    pt3dadd(149.398344934223, -1442.36314624524, 98.6932045986604, 1.05020113167116)
  }
}
proc shape3d_11() {
  adendMML[3] {
    pt3dadd(150.348316405278, -1442.62392272749, 98.5213039573365, 1.04607146247302)
    pt3dadd(151.298287876333, -1442.88469920974, 98.3494033160127, 1.04195633307427)
    pt3dadd(152.248259347387, -1443.14547569199, 98.1775026746889, 1.0378555201404)
    pt3dadd(153.198230818442, -1443.40625217424, 98.0056020333651, 1.03376976189873)
    pt3dadd(154.148202289496, -1443.66702865649, 97.8337013920412, 1.0296981841953)
    pt3dadd(155.098173760551, -1443.92780513874, 97.6618007507174, 1.02564141814454)
    pt3dadd(156.0504501337, -1444.17673550024, 97.4863705278643, 1.02160163029383)
    pt3dadd(157.014566258806, -1444.35499072039, 97.2903592455037, 1.01759073268399)
    pt3dadd(157.979652241365, -1444.52656156174, 97.0924388254617, 1.01359620369857)
    pt3dadd(158.944738223923, -1444.69813240308, 96.8945184054197, 1.0096157437334)
    pt3dadd(159.909824206482, -1444.86970324443, 96.6965979853777, 1.00564985384513)
    pt3dadd(160.87491018904, -1445.04127408577, 96.4986775653357, 1.00169851412153)
    pt3dadd(161.839996171599, -1445.21284492711, 96.3007571452937, 0.997761243418181)
    pt3dadd(162.805082154158, -1445.38441576846, 96.1028367252517, 0.993838954341034)
    pt3dadd(163.763712180565, -1445.58241510048, 95.8995431749522, 0.989934877924045)
    pt3dadd(164.715027964905, -1445.80891885866, 95.6905112970028, 0.986049556510022)
    pt3dadd(165.666343749244, -1446.03542261683, 95.4814794190534, 0.982178897084501)
    pt3dadd(166.617659533583, -1446.26192637501, 95.2724475411041, 0.978322254097446)
    pt3dadd(167.568975317923, -1446.48843013319, 95.0634156631547, 0.974480323167424)
    pt3dadd(168.520291102262, -1446.71493389136, 94.8543837852054, 0.970652682112944)
    pt3dadd(169.471606886601, -1446.94143764954, 94.645351907256, 0.966839156172813)
    pt3dadd(170.42798053629, -1447.18318704131, 94.5, 0.963009518965774)
    pt3dadd(171.389504483931, -1447.4579081692, 94.5, 0.959146240138337)
    pt3dadd(172.351028431572, -1447.7326292971, 94.5, 0.955298254473533)
    pt3dadd(173.312552379213, -1448.007350425, 94.5, 0.951465110237085)
    pt3dadd(174.274051856944, -1448.1226749356, 94.2761601688008, 0.947750874467678)
    pt3dadd(175.227915556542, -1448.18626584891, 93.9827317476564, 0.944101806450656)
    pt3dadd(176.181779256139, -1448.24985676221, 93.689303326512, 0.940466256071879)
    pt3dadd(177.135642955736, -1448.31344767552, 93.3958749053676, 0.936844495603049)
    pt3dadd(178.089506655334, -1448.37703858883, 93.1024464842233, 0.933236824856351)
    pt3dadd(178.994837184291, -1448.5709311329, 92.7359218219363, 0.929734487337822)
    pt3dadd(179.870912223591, -1448.83375364469, 92.3316733181501, 0.926295307513626)
    pt3dadd(180.74698726289, -1449.09657615648, 91.9274248143637, 0.922869214591231)
    pt3dadd(181.626191775862, -1449.36817962108, 91.5375056398859, 0.919436518726618)
    pt3dadd(182.526535112016, -1449.72037723234, 91.2871814140857, 0.915858090769397)
    pt3dadd(183.429466407654, -1450.0864304603, 91.0619701584715, 0.912269227133527)
    pt3dadd(184.332397703293, -1450.45248368826, 90.8367589028573, 0.908694773207621)
    pt3dadd(185.235328998932, -1450.81853691622, 90.6115476472431, 0.905134253793569)
    pt3dadd(186.13826029457, -1451.18459014418, 90.3863363916288, 0.901588452935259)
    pt3dadd(187.041191590209, -1451.55064337215, 90.1611251360146, 0.898056751118909)
    pt3dadd(187.956129722128, -1451.8713642013, 89.9224377174072, 0.894550207743596)
    pt3dadd(188.896425053106, -1452.07705380495, 89.6512616168921, 0.891086195624318)
    pt3dadd(189.836720384084, -1452.2827434086, 89.3800855163771, 0.887635850014231)
    pt3dadd(190.777015715062, -1452.48843301226, 89.1089094158621, 0.884199416351705)
    pt3dadd(191.71731104604, -1452.69412261591, 88.837733315347, 0.880777285333324)
    pt3dadd(192.657606377018, -1452.89981221956, 88.566557214832, 0.877368820824133)
    pt3dadd(193.538003073939, -1453.01316211428, 88.1132243762022, 0.874213768139106)
    pt3dadd(194.394281441939, -1453.0960277628, 87.6034002488882, 0.871160514698898)
    pt3dadd(195.250559809939, -1453.17889341131, 87.0935761215742, 0.868118673173871)
    pt3dadd(196.106838177939, -1453.26175905983, 86.5837519942602, 0.865088184087032)
    pt3dadd(196.963116545939, -1453.34462470835, 86.0739278669462, 0.862069047438382)
    pt3dadd(197.824669115167, -1453.42545912569, 85.5730363573801, 0.859045309464959)
    pt3dadd(198.770674958245, -1453.46347369884, 85.2640787552082, 0.855775837467573)
    pt3dadd(199.733315265079, -1453.49264461723, 84.9948712196933, 0.852469725226404)
    pt3dadd(200.695955571913, -1453.52181553562, 84.7256636841783, 0.849177547277304)
    pt3dadd(201.658595878748, -1453.55098645401, 84.4564561486634, 0.845899048399649)
    pt3dadd(202.621236185582, -1453.5801573724, 84.1872486131485, 0.842634977174408)
    pt3dadd(203.570003235563, -1453.66745484132, 83.8969354671862, 0.839405285264705)
    pt3dadd(204.485215488477, -1453.88710578202, 83.5590893537454, 0.836236088733174)
    pt3dadd(205.40042774139, -1454.10675672272, 83.2212432403046, 0.833080659047327)
    pt3dadd(206.315639994304, -1454.32640766342, 82.8833971268638, 0.829938586875856)
    pt3dadd(207.230852247217, -1454.54605860412, 82.545551013423, 0.826809696666177)
    pt3dadd(208.179956400044, -1454.5756736346, 82.2372360960272, 0.823663961320812)
    pt3dadd(209.132869318346, -1454.5756736346, 81.9339920191975, 0.820527014462403)
    pt3dadd(210.085782236648, -1454.5756736346, 81.6307479423678, 0.817403515523373)
    pt3dadd(211.038695154951, -1454.5756736346, 81.3275038655381, 0.814293806777593)
    pt3dadd(211.991722748078, -1454.56500494051, 81.0255813290414, 0.811196792655573)
  }
  adendOML[5] {pt3dclear()
    pt3dadd(211.991722748078, -1454.56500494051, 81.0255813290414, 0.80809817398478)
    pt3dadd(212.940352017183, -1454.43494620147, 80.740255792111, 0.80809817398478)
    pt3dadd(213.887533038243, -1454.28217506904, 80.4582822216479, 0.805010500118138)
    pt3dadd(214.834714059303, -1454.12940393662, 80.1763086511848, 0.801936920090676)
    pt3dadd(215.781895080364, -1453.97663280419, 79.8943350807217, 0.798876935917898)
    pt3dadd(216.729076101424, -1453.82386167176, 79.6123615102587, 0.795830970200132)
    pt3dadd(217.683595595314, -1453.72691727958, 79.3335719407042, 0.792796356079122)
    pt3dadd(218.642708439408, -1453.66697272683, 79.0569689709279, 0.789773525011079)
    pt3dadd(219.601821283502, -1453.60702817407, 78.7803660011517, 0.786764828684331)
    pt3dadd(220.560934127596, -1453.54708362131, 78.5037630313754, 0.783770133142274)
    pt3dadd(221.52004697169, -1453.48713906856, 78.2271600615992, 0.780789068969089)
    pt3dadd(222.477840552384, -1453.4208973723, 77.9476667309544, 0.777824623799152)
    pt3dadd(223.429302579253, -1453.32575116961, 77.6549771145652, 0.774885144443932)
    pt3dadd(224.380764606121, -1453.23060496693, 77.362287498176, 0.771959187873577)
    pt3dadd(225.332226632989, -1453.13545876424, 77.0695978817868, 0.769047338092132)
    pt3dadd(226.283688659857, -1453.04031256155, 76.7769082653976, 0.76614927273375)
    pt3dadd(227.232937023801, -1452.94815566683, 76.4763848505946, 0.763271614398731)
    pt3dadd(228.157417271473, -1452.88539196303, 76.1006802148655, 0.760482355052804)
    pt3dadd(229.080861896745, -1452.82382898802, 75.721919044519, 0.757709302286635)
    pt3dadd(230.004306522018, -1452.762266013, 75.3431578741724, 0.754949075232241)
    pt3dadd(230.92775114729, -1452.70070303798, 74.9643967038258, 0.752201673889621)
    pt3dadd(231.851195772563, -1452.63914006296, 74.5856355334793, 0.749467652980966)
    pt3dadd(232.774640397835, -1452.57757708794, 74.2068743631327, 0.746746574435867)
    pt3dadd(233.698085023107, -1452.51601411292, 73.8281131927862, 0.744038321602542)
    pt3dadd(234.629674296563, -1452.47618362607, 73.4688527328678, 0.741323403077698)
    pt3dadd(235.597989499615, -1452.57549800587, 73.2397188822401, 0.738514858569772)
    pt3dadd(236.566304702667, -1452.67481238567, 73.0105850316124, 0.735720227747227)
    pt3dadd(237.534619905719, -1452.77412676547, 72.7814511809846, 0.73293988913751)
    pt3dadd(238.50293510877, -1452.87344114527, 72.5523173303569, 0.730174029053098)
    pt3dadd(239.471250311822, -1452.97275552508, 72.3231834797291, 0.727422082654067)
    pt3dadd(240.439565514874, -1453.07206990488, 72.0940496291014, 0.724684723516013)
    pt3dadd(241.397841974304, -1453.15151175834, 71.8215296270521, 0.721991713726262)
    pt3dadd(242.348703779198, -1453.21708843454, 71.5189382730263, 0.719334163973647)
    pt3dadd(243.299565584093, -1453.28266511074, 71.2163469190004, 0.716690738555049)
    pt3dadd(244.250427388987, -1453.34824178694, 70.9137555649746, 0.714060922173244)
    pt3dadd(245.201289193882, -1453.41381846314, 70.6111642109487, 0.711444558424674)
    pt3dadd(246.158693664679, -1453.56229014753, 70.3724598414822, 0.708799586368316)
    pt3dadd(247.118357240123, -1453.75858496978, 70.1711785340448, 0.706145390467392)
    pt3dadd(248.078020815568, -1453.95487979203, 69.9698972266074, 0.703505391671867)
    pt3dadd(249.037684391012, -1454.15117461428, 69.76861591917, 0.700880280935915)
    pt3dadd(249.997347966456, -1454.34746943653, 69.5673346117326, 0.698269223630604)
    pt3dadd(250.9570115419, -1454.54376425878, 69.3660533042952, 0.695672763287788)
    pt3dadd(251.916675117344, -1454.74005908103, 69.1647719968578, 0.693090791147449)
    pt3dadd(252.875343140411, -1454.94413922668, 68.9667714617087, 0.690521278941341)
    pt3dadd(253.829055606196, -1455.18244531817, 68.7833608533868, 0.687959976840262)
    pt3dadd(254.782750106622, -1455.42086894328, 68.6000006209237, 0.685412815460196)
    pt3dadd(255.736444607048, -1455.65929256839, 68.4166403884607, 0.682880216730296)
    pt3dadd(256.690139107473, -1455.89771619349, 68.2332801559977, 0.680362320490961)
    pt3dadd(257.643833607899, -1456.1361398186, 68.0499199235346, 0.677858557671494)
    pt3dadd(258.597528108325, -1456.37456344371, 67.8665596910716, 0.675369817351205)
    pt3dadd(259.55122260875, -1456.61298706881, 67.6831994586086, 0.672895319672469)
    pt3dadd(260.50654139921, -1456.83644560228, 67.4995269351571, 0.670435441052077)
    pt3dadd(261.487297489284, -1456.78975060201, 67.31096375839, 0.667992461351746)
    pt3dadd(262.467467645378, -1456.72848996726, 67.1225132350888, 0.665563537402952)
    pt3dadd(263.447637801472, -1456.6672293325, 66.9340627117876, 0.663149532485626)
    pt3dadd(264.427807957565, -1456.60596869775, 66.7456121884864, 0.660749824321735)
    pt3dadd(265.407978113659, -1456.54470806299, 66.5571616651853, 0.658364485769369)
    pt3dadd(266.388148269753, -1456.48344742824, 66.3687111418841, 0.655993993390382)
    pt3dadd(267.368318425847, -1456.42218679348, 66.1802606185829, 0.653637612495339)
    pt3dadd(268.348976302374, -1456.38801449569, 66.0097629673922, 0.651291637613003)
    pt3dadd(269.326949913715, -1456.59477160203, 66, 0.6489257679226)
    pt3dadd(270.302263212689, -1456.81559725463, 66, 0.646574437950976)
    pt3dadd(271.277576511662, -1457.03642290723, 66, 0.644238340774447)
    pt3dadd(272.252889810636, -1457.25724855982, 66, 0.641916800153)
    pt3dadd(273.22820310961, -1457.47807421242, 66, 0.63961083756746)
    pt3dadd(274.203516408583, -1457.69889986502, 66, 0.637319394824125)
    pt3dadd(275.178829707557, -1457.91972551762, 66, 0.635043258301638)
    pt3dadd(276.15414300653, -1458.14055117022, 66, 0.632781950149293)
    pt3dadd(277.130918231666, -1458.34799722639, 65.968663129588, 0.630538276448813)
    pt3dadd(278.107669592596, -1458.50553776848, 65.8232748339125, 0.628328938016626)
    pt3dadd(279.084420953527, -1458.66307831056, 65.6778865382369, 0.626133877193823)
    pt3dadd(280.061172314458, -1458.82061885265, 65.5324982425614, 0.623954097338373)
    pt3dadd(281.037923675389, -1458.97815939474, 65.3871099468859, 0.621788626082709)
    pt3dadd(282.014675036319, -1459.13569993682, 65.2417216512103, 0.619637969437175)
    pt3dadd(282.99142639725, -1459.29324047891, 65.0963333555349, 0.617502087748652)
    pt3dadd(283.968177758181, -1459.45078102099, 64.9509450598593, 0.615380554313034)
    pt3dadd(284.944929119112, -1459.60832156308, 64.8055567641838, 0.61327426219165)
    pt3dadd(285.921680480042, -1459.76586210516, 64.6601684685083, 0.61118224767965)
    pt3dadd(286.895711809258, -1459.93842171712, 64.522296204128, 0.609103546636268)
    pt3dadd(287.810968241937, -1460.33371633438, 64.5, 0.607022308804181)
    pt3dadd(288.710782349133, -1460.7699898409, 64.5, 0.604954315613584)
    pt3dadd(289.610596456329, -1461.20626334742, 64.5, 0.6029016163564)
    pt3dadd(290.510410563525, -1461.64253685394, 64.5, 0.60086343694142)
    pt3dadd(291.410224670722, -1462.07881036046, 64.5, 0.598840847849784)
    pt3dadd(292.31037548324, -1462.5143865259, 64.4994662143052, 0.596832803368493)
    pt3dadd(293.275068409798, -1462.65143573085, 64.2943601956516, 0.594881481885471)
    pt3dadd(294.243827406645, -1462.76957707193, 64.0763037131628, 0.592947155297098)
    pt3dadd(295.212586403492, -1462.88771841301, 63.858247230674, 0.5910268002372)
    pt3dadd(296.18134540034, -1463.00585975409, 63.6401907481851, 0.589121352450229)
    pt3dadd(297.150104397187, -1463.12400109517, 63.4221342656962, 0.587229898275432)
    pt3dadd(298.118863394034, -1463.24214243625, 63.2040777832074, 0.585352731975883)
    pt3dadd(299.088484276482, -1463.35623580323, 62.9878805455804, 0.583489466181934)
    pt3dadd(300.062917397551, -1463.44701914631, 62.782414526099, 0.58163614375467)
    pt3dadd(301.037770774087, -1463.53564218054, 62.5779472865267, 0.579797179226631)
    pt3dadd(302.012624150624, -1463.62426521478, 62.3734800469545, 0.577972538044538)
    pt3dadd(302.987477527161, -1463.71288824901, 62.1690128073822, 0.576162038902563)
    pt3dadd(303.962330903698, -1463.80151128324, 61.9645455678099, 0.574366449068095)
    pt3dadd(304.937184280235, -1463.89013431747, 61.7600783282376, 0.572584897634337)
    pt3dadd(305.910959155173, -1463.97712739464, 61.5506241142573, 0.570819873073979)
    pt3dadd(306.794828208437, -1463.9815628242, 61.1068926113384, 0.569220733833477)
    pt3dadd(307.638097259355, -1463.95248458107, 60.5701880710742, 0.567700423002659)
    pt3dadd(308.481366310273, -1463.92340633793, 60.0334835308101, 0.566191093336201)
    pt3dadd(309.324635361191, -1463.8943280948, 59.4967789905459, 0.564692744834103)
    pt3dadd(310.167904412109, -1463.86524985166, 58.9600744502817, 0.563205377496367)
    pt3dadd(311.034114020499, -1463.88469959837, 58.4691106984941, 0.561689953541109)
    pt3dadd(311.966348292773, -1464.10921733513, 58.1898097227924, 0.560044346444002)
    pt3dadd(312.900613025307, -1464.34278351827, 57.9203728143333, 0.558407116994363)
    pt3dadd(313.834877757841, -1464.5763497014, 57.6509359058742, 0.556783565157494)
    pt3dadd(314.769142490375, -1464.80991588453, 57.3814989974151, 0.55517428983485)
    pt3dadd(315.703407222908, -1465.04348206767, 57.112062088956, 0.553578977572743)
    pt3dadd(316.575068477015, -1465.38216967693, 56.7694008594645, 0.552034592552276)
    pt3dadd(317.397659412235, -1465.79346514454, 56.3767430037968, 0.550531325257292)
    pt3dadd(318.220250347455, -1466.20476061215, 55.9840851481289, 0.549041044896463)
    pt3dadd(319.042841282675, -1466.61605607976, 55.5914272924611, 0.547563458605555)
    pt3dadd(319.865432217895, -1467.02735154737, 55.1987694367932, 0.546098566384568)
    pt3dadd(320.688023153115, -1467.43864701498, 54.8061115811254, 0.544646732632839)
    pt3dadd(321.510614088334, -1467.84994248259, 54.4134537254576, 0.543207867015202)
    pt3dadd(322.333205023554, -1468.2612379502, 54.0207958697898, 0.541781695467487)
    pt3dadd(323.155795958774, -1468.67253341781, 53.6281380141219, 0.540368217989692)
    pt3dadd(323.978386893994, -1469.08382888542, 53.2354801584541, 0.538967817781217)
    pt3dadd(324.800977829214, -1469.49512435303, 52.8428223027863, 0.537580366906773)
    pt3dadd(325.623568764434, -1469.90641982064, 52.4501644471184, 0.536739077531904)
  }
  GCL[7] {pt3dclear()
    pt3dadd(0.930874927511354, -1406.70685329653, 121.532161621316, 1.68790760805177)
    pt3dadd(1.46032167303929, -1407.19810467995, 122.247832441555, 1.68790760805177)
    pt3dadd(1.96957049031403, -1407.66963136261, 122.967782599304, 1.68289883811105)
    pt3dadd(2.47881930758876, -1408.14115804527, 123.687732757052, 1.67790028260185)
    pt3dadd(2.9880681248635, -1408.61268472794, 124.407682914801, 1.67291180867024)
    pt3dadd(3.49731694213824, -1409.0842114106, 125.127633072549, 1.66793341631621)
    pt3dadd(4.00656575941287, -1409.55573809326, 125.847583230298, 1.66296572867782)
  }
  adendIML[5] {pt3dclear()
    pt3dadd(4.00656575941287, -1409.55573809326, 125.847583230298, 1.65946039887812)
    pt3dadd(4.35759939786703, -1409.82929340621, 126.736835978812, 1.65946039887812)
    pt3dadd(4.66348205133431, -1410.04778101583, 127.663496092743, 1.65634671762114)
    pt3dadd(4.96936470480159, -1410.26626862545, 128.590156206674, 1.65323706594956)
    pt3dadd(5.27524735826887, -1410.48475623507, 129.516816320605, 1.65013144386337)
    pt3dadd(5.58113001173615, -1410.70324384469, 130.443476434535, 1.64702985136259)
    pt3dadd(5.88701266520343, -1410.92173145431, 131.370136548466, 1.6439322884472)
    pt3dadd(6.19289531867082, -1411.14021906393, 132.296796662397, 1.64083875511721)
    pt3dadd(6.4987779721381, -1411.35870667355, 133.223456776328, 1.63774925137262)
    pt3dadd(6.8936350318794, -1411.74193825861, 134.051796925499, 1.6336811366909)
    pt3dadd(7.32390844075883, -1412.19270087744, 134.833895292126, 1.62920850379153)
    pt3dadd(7.75418184963837, -1412.64346349627, 135.615993658753, 1.62474474060899)
    pt3dadd(8.1844552585178, -1413.09422611509, 136.39809202538, 1.6202890274905)
    pt3dadd(8.61472866739723, -1413.54498873392, 137.180190392006, 1.61584251319219)
    pt3dadd(9.04666704171541, -1414.00136816331, 137.957924107994, 1.61137323251412)
    pt3dadd(9.49018146641538, -1414.49727944714, 138.704396055866, 1.60669434451436)
    pt3dadd(9.93596119219148, -1415.00120435454, 139.444220442994, 1.60198130933065)
    pt3dadd(10.3817409179677, -1415.50512926194, 140.184044830123, 1.59727774372652)
    pt3dadd(10.8275206437438, -1416.00905416934, 140.923869217251, 1.59258364770199)
    pt3dadd(11.27330036952, -1416.51297907674, 141.663693604379, 1.58789969371186)
    pt3dadd(11.7455002309547, -1417.02665656071, 142.377625286807, 1.58307590492136)
    pt3dadd(12.4748496222858, -1417.59422048082, 142.697256052072, 1.57689149239016)
    pt3dadd(13.2610760113254, -1418.17078649945, 142.919561453131, 1.57042802981446)
    pt3dadd(14.047302400365, -1418.74735251808, 143.14186685419, 1.56398348320464)
    pt3dadd(14.8335287894046, -1419.32391853671, 143.364172255248, 1.55755731288483)
    pt3dadd(15.6197551784443, -1419.90048455534, 143.586477656307, 1.55115065801423)
    pt3dadd(16.4059815674838, -1420.47705057396, 143.808783057366, 1.54476249485596)
    pt3dadd(17.2109796093405, -1421.01160291776, 144.054594210933, 1.53843071712416)
    pt3dadd(18.0983774022681, -1421.27782225564, 144.430961612878, 1.53237048094404)
    pt3dadd(18.9857751951957, -1421.54404159351, 144.807329014823, 1.52632716954275)
    pt3dadd(19.8731729881234, -1421.81026093139, 145.183696416768, 1.5203007829203)
    pt3dadd(20.7569430723111, -1422.06849242861, 145.573156521885, 1.51432545235907)
    pt3dadd(21.6196645284906, -1422.28417279265, 146.030533466662, 1.50855275726656)
    pt3dadd(22.4823859846701, -1422.4998531567, 146.487910411438, 1.50279587825375)
    pt3dadd(23.3446492145216, -1422.71938700339, 146.944279450328, 1.49705179443238)
    pt3dadd(24.140741067324, -1423.1864690189, 147.314654816951, 1.49109921826283)
    pt3dadd(24.9264729122486, -1423.69158234778, 147.671706623919, 1.48512992927311)
    pt3dadd(25.7122047571734, -1424.19669567667, 148.028758430887, 1.47917788983633)
    pt3dadd(26.497936602098, -1424.70180900555, 148.385810237854, 1.47324300261135)
    pt3dadd(27.1739939689442, -1425.25980294599, 148.860311153856, 1.46764807441087)
    pt3dadd(27.7952871624374, -1425.83967659325, 149.387322843415, 1.46223141081125)
    pt3dadd(28.4207599547794, -1426.41912495732, 149.909411261191, 1.45681325691753)
    pt3dadd(29.1232891530821, -1426.98784850348, 150.335086938484, 1.45111644302695)
    pt3dadd(29.8452565198596, -1427.5528664427, 150.734483795847, 1.44536349804895)
    pt3dadd(30.5672238866372, -1428.11788438191, 151.133880653209, 1.43962718857302)
    pt3dadd(31.2934896933851, -1428.66887783926, 151.542055127772, 1.43393222963199)
    pt3dadd(32.0630072170239, -1429.06350221036, 152.044165062496, 1.42852347601171)
    pt3dadd(32.8325247406627, -1429.45812658145, 152.546274997221, 1.42312981147596)
    pt3dadd(33.6020422643016, -1429.85275095255, 153.048384931946, 1.41775123602472)
    pt3dadd(34.3715597879406, -1430.24737532365, 153.55049486667, 1.412387749658)
    pt3dadd(35.1410773115794, -1430.64199969474, 154.052604801395, 1.4070393523758)
    pt3dadd(35.9229871713652, -1431.04305585172, 154.528625270711, 1.40162830861288)
    pt3dadd(36.7722413350616, -1431.47914929829, 154.825143420542, 1.39581070025936)
  }
}
proc shape3d_12() {
  adendIML[5] {
    pt3dadd(37.6228961487463, -1431.91597204045, 155.117670820771, 1.39000228462435)
    pt3dadd(38.4735509624311, -1432.35279478262, 155.410198221, 1.38421168438348)
    pt3dadd(39.3242057761158, -1432.78961752478, 155.702725621229, 1.37843980799656)
    pt3dadd(40.1812576886363, -1433.2014816781, 156.008409111433, 1.37271027374813)
    pt3dadd(41.0705190444356, -1433.39683517889, 156.415573718313, 1.36721275875939)
    pt3dadd(41.9626759458698, -1433.5620494199, 156.836002449244, 1.36176199212949)
    pt3dadd(42.8548328473041, -1433.72726366091, 157.256431180174, 1.35632810620487)
    pt3dadd(43.7277260629999, -1433.95376670333, 157.68490250613, 1.35093118293414)
    pt3dadd(44.5714789984474, -1434.26371676125, 158.123094182819, 1.3455756206758)
    pt3dadd(45.415231933895, -1434.57366681917, 158.561285859507, 1.34023616049493)
    pt3dadd(46.2589848693426, -1434.88361687709, 158.999477536196, 1.33491322381003)
    pt3dadd(47.1027378047902, -1435.19356693501, 159.437669212885, 1.32960665381248)
    pt3dadd(47.9464907402378, -1435.50351699293, 159.875860889574, 1.32431618589241)
    pt3dadd(48.7902436756854, -1435.81346705085, 160.314052566262, 1.31904182004982)
    pt3dadd(49.6806200738164, -1436.11060817209, 160.650515754242, 1.31357102103354)
    pt3dadd(50.6024699114067, -1436.39740589934, 160.911168666328, 1.30797711671607)
    pt3dadd(51.5243197489971, -1436.68420362659, 161.171821578413, 1.30240130260261)
    pt3dadd(52.4461695865875, -1436.97100135384, 161.432474490499, 1.2968439147567)
    pt3dadd(53.3680194241779, -1437.25779908109, 161.693127402584, 1.29130546411128)
    pt3dadd(54.2898692617682, -1437.54459680834, 161.95378031467, 1.28578510366987)
    pt3dadd(55.1756036844873, -1437.86630362426, 162.287186622572, 1.28040340462472)
    pt3dadd(56.0530923625562, -1438.19536187853, 162.636091029472, 1.27506734715829)
    pt3dadd(56.9305810406248, -1438.52442013281, 162.984995436372, 1.26974853376123)
    pt3dadd(57.8080697186936, -1438.85347838709, 163.333899843272, 1.26444696443352)
    pt3dadd(58.7177291668286, -1439.19596712559, 163.5, 1.25898364714386)
    pt3dadd(59.6532012604954, -1439.54936769431, 163.5, 1.2533944791038)
    pt3dadd(60.5886733541621, -1439.90276826303, 163.5, 1.2478251675086)
    pt3dadd(61.524145447829, -1440.25616883175, 163.5, 1.24227569653074)
    pt3dadd(62.4596175414958, -1440.60956940047, 163.5, 1.23674562720324)
    pt3dadd(63.3978566455924, -1440.95488223862, 163.506400604545, 1.23123634151696)
    pt3dadd(64.3666824207538, -1441.05903435209, 163.689908962398, 1.22584691411961)
    pt3dadd(65.340500678487, -1441.11120318732, 163.911169924918, 1.22050124871563)
    pt3dadd(66.3143189362204, -1441.16337202256, 164.132430887438, 1.21517427900746)
    pt3dadd(67.2881371939537, -1441.21554085779, 164.353691849958, 1.2098658100261)
    pt3dadd(68.2619554516871, -1441.26770969303, 164.574952812479, 1.20457686350687)
    pt3dadd(69.2357737094203, -1441.31987852826, 164.796213774999, 1.19930630040095)
    pt3dadd(70.2004927977252, -1441.4008052371, 165.026145751563, 1.19406656638569)
    pt3dadd(71.0505979298193, -1441.81297742236, 165.35391907886, 1.18898410240033)
    pt3dadd(71.9007030619133, -1442.22514960762, 165.681692406157, 1.18391910965923)
    pt3dadd(72.7508081940073, -1442.63732179288, 166.009465733454, 1.17887186861827)
  }
  adendMML[4] {pt3dclear()
    pt3dadd(72.7508081940073, -1442.63732179288, 166.009465733454, 1.17384284668575)
    pt3dadd(73.6009133261014, -1443.04949397813, 166.337239060751, 1.17384284668575)
    pt3dadd(74.4785462807329, -1443.48191450221, 166.5, 1.16866768347101)
    pt3dadd(75.3729734717327, -1443.92912809771, 166.5, 1.16340681249073)
    pt3dadd(76.268605119104, -1444.37369533282, 166.506889034727, 1.15816624998313)
    pt3dadd(77.1366741256098, -1444.6220206114, 166.900708463637, 1.15339794253408)
    pt3dadd(77.9993955817894, -1444.83770097545, 167.358085408414, 1.14872397156783)
    pt3dadd(78.8621170379689, -1445.05338133949, 167.81546235319, 1.14406627716898)
    pt3dadd(79.7622239275177, -1445.32441015319, 168.137722074955, 1.13918113769088)
    pt3dadd(80.6854019948823, -1445.63213617565, 168.368041312191, 1.13415934882594)
    pt3dadd(81.6085800622469, -1445.9398621981, 168.598360549427, 1.12915679010027)
    pt3dadd(82.5317581296116, -1446.24758822056, 168.828679786663, 1.12417288278489)
    pt3dadd(83.4549361969762, -1446.55531424301, 169.058999023899, 1.11920734736702)
    pt3dadd(84.3781142643409, -1446.86304026547, 169.289318261135, 1.11426132160118)
    pt3dadd(85.2813414005951, -1447.2055801992, 169.539487337073, 1.10935862736843)
    pt3dadd(86.0546140123988, -1447.73003416945, 169.89209571814, 1.10462352560213)
    pt3dadd(86.8177115379976, -1448.2670287245, 170.251705248423, 1.09991755944343)
    pt3dadd(87.5808090635963, -1448.80402327955, 170.611314778706, 1.09522871616414)
    pt3dadd(88.3439065891952, -1449.3410178346, 170.97092430899, 1.09055699576424)
    pt3dadd(88.8991262554922, -1450.01896215651, 171.448530647294, 1.08615271185268)
    pt3dadd(89.4352557642031, -1450.70827152485, 171.935785964971, 1.08178602356063)
    pt3dadd(89.9805600930875, -1451.39383052289, 172.417431536262, 1.07742123270919)
    pt3dadd(90.6587090525085, -1452.01267509302, 172.806716382119, 1.07287516195512)
    pt3dadd(91.3721526277832, -1452.61196769625, 173.169823309363, 1.06829332392049)
    pt3dadd(92.0855962030579, -1453.21126029948, 173.532930236606, 1.06372913770182)
    pt3dadd(92.7990397783325, -1453.81055290271, 173.896037163849, 1.05918239554338)
    pt3dadd(93.6276453627736, -1454.21106244464, 174.264796472116, 1.05466262385501)
    pt3dadd(94.499910277099, -1454.53089291323, 174.634745645113, 1.05016193497151)
    pt3dadd(95.3721751914246, -1454.85072338181, 175.004694818109, 1.04567915439323)
    pt3dadd(96.2444401057502, -1455.1705538504, 175.374643991105, 1.04121337568532)
    pt3dadd(96.9253976899194, -1455.73658221826, 175.806478093142, 1.03688572227235)
    pt3dadd(97.4986963148988, -1456.41737433542, 176.26238464037, 1.03262315948221)
    pt3dadd(98.0719949398782, -1457.09816645258, 176.718291187598, 1.02837696211897)
    pt3dadd(98.7566104695976, -1457.6427225149, 177.175147146677, 1.02414892363635)
    pt3dadd(99.5952927920115, -1457.95722838581, 177.619779600774, 1.01991008830841)
    pt3dadd(100.433975114425, -1458.27173425671, 178.064412054872, 1.01568726071897)
    pt3dadd(101.272238519712, -1458.58576634127, 178.510165588624, 1.01148281973387)
    pt3dadd(102.098119967853, -1458.88621445605, 178.987274630743, 1.00736401331787)
    pt3dadd(102.923827096663, -1459.1864715938, 179.464823988049, 1.00326178765575)
    pt3dadd(103.751121954359, -1459.49318982447, 179.935074923118, 0.999159159366133)
    pt3dadd(104.592782523125, -1459.88277199553, 180.305209315959, 0.994881130458867)
    pt3dadd(105.437154632593, -1460.29133914527, 180.651776228552, 0.990577709136778)
    pt3dadd(106.281526742061, -1460.69990629501, 180.998343141146, 0.986292461365192)
    pt3dadd(107.125898851528, -1461.10847344475, 181.344910053739, 0.982024483575613)
    pt3dadd(107.938497740618, -1461.56503347681, 181.704870801644, 0.977794926129665)
    pt3dadd(108.724533550069, -1462.05994491239, 182.075289992822, 0.973599752053909)
    pt3dadd(109.51056935952, -1462.55485634797, 182.445709184, 0.969421938685768)
    pt3dadd(110.296605168971, -1463.04976778355, 182.816128375178, 0.965261121594039)
    pt3dadd(111.149177573184, -1463.41433709515, 183.168096539104, 0.961088935022109)
    pt3dadd(112.062703227401, -1463.64924369194, 183.50019557534, 0.956904846887558)
    pt3dadd(112.976228881617, -1463.88415028874, 183.832294611576, 0.952738184781536)
    pt3dadd(113.889754535834, -1464.11905688554, 184.164393647812, 0.948588948704043)
    pt3dadd(114.811191062127, -1464.33278900157, 184.472972892182, 0.944437512904426)
    pt3dadd(115.808653540834, -1464.29421149636, 184.5, 0.940102046116934)
    pt3dadd(116.79335852038, -1464.29686460693, 184.557070977026, 0.935809701986442)
    pt3dadd(117.549217122079, -1464.76477707465, 185.015040077285, 0.931947695380887)
    pt3dadd(118.305075723777, -1465.23268954236, 185.473009177544, 0.928101495787114)
    pt3dadd(119.061028559673, -1465.70033683421, 185.931093349308, 0.924271334455053)
    pt3dadd(119.844782224082, -1466.07259103458, 186.426201178944, 0.920535598865928)
    pt3dadd(120.633570462977, -1466.42754574209, 186.928018147372, 0.916829264737681)
    pt3dadd(121.416871814561, -1466.79069097732, 187.429283786103, 0.913137027321065)
    pt3dadd(121.931477902483, -1467.50707306487, 187.890354194349, 0.909376544003485)
    pt3dadd(122.38687775397, -1468.27774973661, 188.336076577555, 0.905601039436724)
    pt3dadd(122.842277605457, -1469.04842640836, 188.781798960762, 0.901841526477655)
    pt3dadd(123.37798176264, -1469.75687064259, 189.23409111021, 0.898110559874474)
    pt3dadd(123.988681691601, -1470.40349409678, 189.691172837314, 0.894404860749926)
    pt3dadd(124.599381620562, -1471.05011755097, 190.148254564418, 0.890715410208297)
    pt3dadd(125.268378604438, -1471.63397268947, 190.584415791328, 0.88700603080746)
    pt3dadd(126.123466952534, -1472.00451097364, 190.947079956791, 0.883189846975816)
    pt3dadd(126.97855530063, -1472.37504925782, 191.309744122254, 0.879390785550171)
    pt3dadd(127.833643648726, -1472.74558754199, 191.672408287718, 0.875609709184678)
    pt3dadd(128.673787446475, -1473.1214902682, 192.060001991368, 0.87188732112298)
    pt3dadd(129.442165134509, -1473.52035864729, 192.559929669394, 0.868382180517366)
    pt3dadd(130.203449039493, -1473.92103438676, 193.069739210121, 0.864912147105897)
    pt3dadd(130.997286535685, -1474.33884359528, 193.5, 0.861323521382911)
    pt3dadd(131.882204758067, -1474.80459002811, 193.5, 0.857379018925803)
    pt3dadd(132.767122980449, -1475.27033646095, 193.5, 0.85345364382567)
    pt3dadd(133.537372818443, -1475.83071541402, 193.749784200015, 0.84970482260408)
    pt3dadd(134.23373732711, -1476.43624976938, 194.135017396332, 0.846094410784859)
    pt3dadd(134.930101835777, -1477.04178412474, 194.520250592649, 0.842500814739043)
    pt3dadd(135.626466344444, -1477.6473184801, 194.905483788966, 0.838924034466632)
    pt3dadd(136.474369628253, -1477.88051660125, 195.358942966409, 0.835475986202018)
    pt3dadd(137.352546221284, -1477.99028867538, 195.824513544511, 0.832065133590761)
    pt3dadd(138.230722814314, -1478.10006074951, 196.290084122613, 0.828669970288898)
    pt3dadd(139.09460189346, -1478.31800869562, 196.73815179661, 0.825259817418236)
    pt3dadd(139.943209172087, -1478.62350731593, 197.170050256498, 0.821837961302474)
    pt3dadd(140.791816450713, -1478.92900593624, 197.601948716387, 0.818432919282411)
    pt3dadd(141.638838387112, -1479.25200726847, 198.021637254466, 0.815026067355153)
    pt3dadd(142.474949997964, -1479.67561099169, 198.369821862648, 0.811533110224385)
    pt3dadd(143.309776653757, -1480.10648926565, 198.71247090731, 0.808050316740405)
    pt3dadd(144.14460330955, -1480.5373675396, 199.055119951973, 0.804585822232898)
  }
  adendOML[6] {pt3dclear()
    pt3dadd(144.14460330955, -1480.5373675396, 199.055119951973, 0.801138643451877)
    pt3dadd(144.979429965343, -1480.96824581356, 199.397768996636, 0.801138643451877)
    pt3dadd(145.779838136207, -1481.41841169688, 199.792292804176, 0.797778766368929)
    pt3dadd(146.565186837241, -1481.87653177248, 200.20865011961, 0.794466529205553)
    pt3dadd(147.350535538273, -1482.33465184808, 200.625007435044, 0.791171233224441)
    pt3dadd(148.110587622151, -1482.7825970978, 201.086247863197, 0.787980015601613)
    pt3dadd(148.753995387271, -1483.18234238014, 201.738120151933, 0.785207353476529)
    pt3dadd(149.384576279798, -1483.57645543797, 202.406732622372, 0.782490861045017)
    pt3dadd(150.015157172326, -1483.9705684958, 203.075345092812, 0.779785890083715)
    pt3dadd(150.645738064854, -1484.36468155363, 203.743957563251, 0.777092612776887)
    pt3dadd(151.358614661204, -1484.88388539484, 204.187435932675, 0.773970237952684)
    pt3dadd(152.11058983892, -1485.47136600243, 204.486434039365, 0.770635589923863)
    pt3dadd(152.862565016636, -1486.05884661002, 204.785432146055, 0.767318697313433)
    pt3dadd(153.614540194352, -1486.64632721761, 205.084430252745, 0.764019925513868)
    pt3dadd(154.366515372068, -1487.2338078252, 205.383428359435, 0.760739643103825)
    pt3dadd(155.193130416104, -1487.67956107547, 205.712104545102, 0.757508397459392)
    pt3dadd(156.062485852211, -1488.03273672139, 206.057775036815, 0.75431314690618)
    pt3dadd(156.931841288319, -1488.38591236731, 206.403445528528, 0.751135997492811)
    pt3dadd(157.801196724426, -1488.73908801323, 206.74911602024, 0.747976127946869)
    pt3dadd(158.647558567381, -1489.12648449897, 207.110675487373, 0.744852608047005)
    pt3dadd(159.43444662211, -1489.59678771529, 207.51011062837, 0.74179346203077)
    pt3dadd(160.220356183977, -1490.06833345241, 207.910099101167, 0.738751940127137)
    pt3dadd(161.006265745844, -1490.53987918953, 208.310087573963, 0.735727046029995)
    pt3dadd(161.742118890803, -1491.04587239433, 208.756388675044, 0.732785750752942)
    pt3dadd(162.431428259146, -1491.58200190304, 209.243643992721, 0.729922077610996)
    pt3dadd(163.120737627488, -1492.11813141175, 209.730899310398, 0.72707422866474)
    pt3dadd(163.742317773809, -1492.69526181918, 210.255417837065, 0.724307753569891)
    pt3dadd(164.277960724991, -1493.32017859556, 210.823366471581, 0.721635754859291)
    pt3dadd(164.828796314758, -1493.93750194812, 211.383383603092, 0.718962821278747)
    pt3dadd(165.613084291368, -1494.39139028843, 211.777130240534, 0.71605500731469)
    pt3dadd(166.465012185697, -1494.7907314889, 212.115871245542, 0.71308848168173)
    pt3dadd(167.316940080026, -1495.19007268937, 212.454612250551, 0.710139949901758)
    pt3dadd(168.168867974355, -1495.58941388984, 212.793353255559, 0.707209134235271)
    pt3dadd(168.889243043215, -1496.04425255117, 213.268754937543, 0.704514630021332)
    pt3dadd(169.395491453668, -1496.57714561481, 213.946794412532, 0.702190132357603)
    pt3dadd(169.90173986412, -1497.11003867844, 214.624833887522, 0.69987690590236)
    pt3dadd(170.407988274573, -1497.64293174207, 215.302873362512, 0.697574950655606)
    pt3dadd(170.914236685026, -1498.17582480571, 215.980912837502, 0.69528426979958)
    pt3dadd(171.126462861993, -1499.04871778325, 216.419830572321, 0.692560926902171)
    pt3dadd(171.329428238052, -1499.92823441285, 216.850243809096, 0.689842240599146)
    pt3dadd(171.532393614112, -1500.80775104244, 217.280657045872, 0.687139768079183)
    pt3dadd(171.928102226838, -1501.63007415208, 217.648753489402, 0.684385365594185)
    pt3dadd(172.515582834428, -1502.38204932979, 217.947751596092, 0.6815775570906)
    pt3dadd(173.103063442018, -1503.13402450751, 218.246749702782, 0.678787754944291)
    pt3dadd(173.690544049609, -1503.88599968522, 218.545747809472, 0.676015708216373)
    pt3dadd(174.2780246572, -1504.63797486294, 218.844745916162, 0.673262223931386)
    pt3dadd(175.009416334526, -1505.27571561016, 219, 0.670456572470711)
    pt3dadd(175.874447523787, -1505.77743369993, 219, 0.66761997516911)
    pt3dadd(176.739478713049, -1506.27915178971, 219, 0.664803675064223)
    pt3dadd(177.604509902311, -1506.78086987948, 219, 0.66200650231631)
    pt3dadd(178.469541091573, -1507.28258796925, 219, 0.659229716987641)
    pt3dadd(179.334572280835, -1507.78430605902, 219, 0.656472241301928)
    pt3dadd(180.199603470096, -1508.28602414879, 219, 0.653734698240966)
    pt3dadd(181.129755369625, -1508.57767960686, 219.138305220752, 0.651052090568087)
    pt3dadd(182.089799160515, -1508.76968836504, 219.341894406014, 0.648405442033699)
    pt3dadd(183.049842951406, -1508.96169712322, 219.545483591276, 0.645778485382459)
    pt3dadd(184.009886742296, -1509.1537058814, 219.749072776538, 0.643170027362115)
    pt3dadd(184.969930533187, -1509.34571463957, 219.9526619618, 0.64058067589634)
    pt3dadd(185.929974324077, -1509.53772339775, 220.156251147062, 0.638010500304517)
    pt3dadd(186.890018114967, -1509.72973215593, 220.359840332324, 0.635458823343589)
    pt3dadd(187.83902727826, -1509.81047771393, 220.630906045786, 0.632972483430849)
    pt3dadd(188.737639250258, -1509.65001129036, 221.039252774301, 0.630614597079734)
    pt3dadd(189.636251222256, -1509.48954486679, 221.447599502815, 0.628273228379546)
    pt3dadd(190.534863194254, -1509.32907844322, 221.855946231329, 0.625948444604901)
    pt3dadd(191.433475166252, -1509.16861201965, 222.264292959844, 0.62364090112831)
    pt3dadd(192.33208713825, -1509.00814559607, 222.672639688358, 0.621349875302649)
    pt3dadd(193.230699110248, -1508.8476791725, 223.080986416873, 0.619075367127917)
    pt3dadd(194.129311082246, -1508.68721274893, 223.489333145387, 0.616817376604113)
    pt3dadd(195.02359715475, -1508.4728249199, 223.882068787342, 0.614561387843625)
    pt3dadd(195.917750654099, -1508.25699476489, 224.27437844028, 0.612321825059661)
    pt3dadd(196.811904153447, -1508.04116460987, 224.666688093219, 0.610098988930379)
    pt3dadd(197.705124472234, -1507.81739620949, 225.056551642239, 0.607890620446479)
    pt3dadd(198.592568443538, -1507.55149861869, 225.433022356949, 0.605687765741515)
    pt3dadd(199.479966236465, -1507.28527928081, 225.809389758894, 0.603501818683892)
    pt3dadd(200.367364029393, -1507.01905994293, 226.185757160838, 0.601332796405103)
    pt3dadd(201.248596761963, -1506.80068128677, 226.599183013097, 0.599216887854797)
    pt3dadd(202.064972698494, -1506.82335839612, 227.176258466539, 0.597311004446343)
    pt3dadd(202.881348635024, -1506.84603550547, 227.753333919981, 0.595418786678417)
    pt3dadd(203.697724571555, -1506.86871261482, 228.330409373423, 0.59354023455102)
    pt3dadd(204.514100508086, -1506.89138972417, 228.907484826866, 0.591675348064153)
    pt3dadd(205.338154553839, -1506.90490684526, 229.46903612014, 0.589807662993803)
    pt3dadd(206.281407013872, -1506.76686405388, 229.768670042389, 0.587695171087618)
    pt3dadd(207.231021673578, -1506.61578899438, 230.043275804291, 0.585584072431037)
    pt3dadd(208.180636333283, -1506.46471393488, 230.317881566194, 0.583491529338995)
    pt3dadd(209.130250992988, -1506.31363887538, 230.592487328097, 0.581417532914888)
    pt3dadd(210.079865652693, -1506.16256381588, 230.86709309, 0.579361510590099)
    pt3dadd(211.037216406986, -1506.13921925467, 231.126663631366, 0.57731632076232)
    pt3dadd(212.001810872119, -1506.23567870119, 231.372128685933, 0.575282373136195)
    pt3dadd(212.966405337251, -1506.3321381477, 231.6175937405, 0.573266634769096)
    pt3dadd(213.930999802384, -1506.42859759421, 231.863058795067, 0.571270139105428)
    pt3dadd(214.895594267517, -1506.52505704072, 232.108523849634, 0.569292032080143)
    pt3dadd(215.86018873265, -1506.62151648724, 232.353988904201, 0.567332253914822)
    pt3dadd(216.807330894921, -1506.57675027141, 232.641606314092, 0.565414595122542)
    pt3dadd(217.713176221909, -1506.32893493547, 232.985163882558, 0.563547097601371)
    pt3dadd(218.619021548897, -1506.08111959954, 233.328721451025, 0.561696903134404)
    pt3dadd(219.524866875884, -1505.83330426361, 233.672279019492, 0.559864925422863)
    pt3dadd(220.430712202872, -1505.58548892767, 234.015836587958, 0.558711044109045)
  }
  GCL[8] {pt3dclear()
    pt3dadd(-36.8106539003038, -1387.81063800046, 114, 1.96357868811936)
    pt3dadd(-36.2779695763353, -1388.62796445796, 114.095462212397, 1.96357868811936)
    pt3dadd(-35.9902335917707, -1389.55521451609, 114.3350771804, 1.95587910517974)
    pt3dadd(-35.7024976072059, -1390.48246457421, 114.574692148402, 1.94819893490186)
    pt3dadd(-35.4147616226413, -1391.40971463234, 114.814307116405, 1.94053939116514)
    pt3dadd(-35.1270256380766, -1392.33696469046, 115.053922084408, 1.93289934773734)
    pt3dadd(-34.839289653512, -1393.26421474859, 115.293537052411, 1.92527898226513)
    pt3dadd(-34.5670948024555, -1394.14509081396, 115.620022724589, 1.91802593571423)
    pt3dadd(-34.3694355914519, -1394.8029344359, 116.346409543402, 1.91245141133729)
    pt3dadd(-34.1757509545008, -1395.4485498924, 117.085102269597, 1.90697688971595)
    pt3dadd(-33.9820663175498, -1396.0941653489, 117.823794995792, 1.90151274331674)
    pt3dadd(-33.8014661262637, -1396.76852337058, 118.529142834424, 1.89587865129108)
    pt3dadd(-33.72132004663, -1397.65870178754, 118.977380554829, 1.88890300862985)
    pt3dadd(-33.6445872349226, -1398.55391792413, 119.416356800657, 1.88191113441895)
    pt3dadd(-33.5678544232151, -1399.44913406072, 119.855333046484, 1.87493637307575)
    pt3dadd(-33.2614505718886, -1400.37027961803, 120, 1.86742628491943)
    pt3dadd(-32.8518601690548, -1401.28254915162, 120, 1.85977312272846)
    pt3dadd(-32.442269766221, -1402.1948186852, 120, 1.85214076797411)
    pt3dadd(-32.032679363387, -1403.10708821879, 120, 1.84452982468032)
    pt3dadd(-31.6230889605532, -1404.01935775237, 120, 1.83693922384698)
    pt3dadd(-31.2134985577194, -1404.93162728596, 120, 1.82937048074035)
  }
}
proc shape3d_13() {
  GCL[8] {
    pt3dadd(-30.8039081548856, -1405.84389681954, 120, 1.82182209880419)
    pt3dadd(-30.3943177520517, -1406.75616635312, 120, 1.81429509090853)
    pt3dadd(-29.9847273492179, -1407.66843588671, 120, 1.80678892786956)
    pt3dadd(-29.5214902928445, -1408.54407497339, 120.078229128022, 1.79935073523367)
    pt3dadd(-28.9429876753638, -1409.31791613704, 120.336113937617, 1.79211955954677)
    pt3dadd(-28.3644850578831, -1410.09175730068, 120.593998747211, 1.78490764695994)
    pt3dadd(-27.7859824404026, -1410.86559846432, 120.851883556806, 1.77771575504474)
    pt3dadd(-27.2074798229219, -1411.63943962797, 121.109768366401, 1.77054363279427)
    pt3dadd(-26.6289772054412, -1412.41328079161, 121.367653175996, 1.76339077364387)
    pt3dadd(-26.0504745879605, -1413.18712195525, 121.625537985591, 1.7562581759349)
    pt3dadd(-25.4719719704799, -1413.96096311889, 121.883422795185, 1.74914510712085)
    pt3dadd(-24.8934693529992, -1414.73480428254, 122.14130760478, 1.74205130140688)
    pt3dadd(-24.3149667355185, -1415.50864544618, 122.399192414375, 1.73497799790414)
    pt3dadd(-23.7364641180378, -1416.28248660982, 122.65707722397, 1.72792398252652)
    pt3dadd(-23.1594763259633, -1417.05720935516, 122.915464796137, 1.7208903779437)
    pt3dadd(-22.8419002862303, -1417.93103702371, 123.238938503359, 1.71401439298551)
    pt3dadd(-22.6564732338976, -1418.84787078247, 123.592538089145, 1.7072235809892)
    pt3dadd(-22.4710461815648, -1419.76470454122, 123.946137674931, 1.7004510525389)
    pt3dadd(-22.2856191292321, -1420.68153829998, 124.299737260717, 1.69369767402439)
    pt3dadd(-22.1001920768994, -1421.59837205873, 124.653336846503, 1.6869627319138)
    pt3dadd(-21.9147650245666, -1422.51520581749, 125.006936432289, 1.68024607334921)
    pt3dadd(-21.7293379722339, -1423.43203957625, 125.360536018075, 1.67354807082467)
    pt3dadd(-21.5439109199011, -1424.348873335, 125.714135603861, 1.66686899859979)
    pt3dadd(-21.3274958344747, -1425.26260144656, 126.054021249816, 1.66017692095654)
    pt3dadd(-21.0090765654089, -1426.16382452371, 126.347701472845, 1.6534014298534)
    pt3dadd(-20.6862791534739, -1427.06425940963, 126.639281388236, 1.64664169703965)
    pt3dadd(-20.363481741539, -1427.96469429556, 126.930861303627, 1.63990092059112)
    pt3dadd(-20.040684329604, -1428.86512918148, 127.222441219018, 1.6331791978367)
    pt3dadd(-19.7160681565133, -1429.75755771435, 127.532292252281, 1.62652146917032)
    pt3dadd(-19.3797462510853, -1430.59282002035, 127.966903763487, 1.62019727716223)
    pt3dadd(-19.042686233078, -1431.42250621852, 128.411888433812, 1.61392144958104)
    pt3dadd(-18.7056262150708, -1432.2521924167, 128.856873104137, 1.60766264112356)
    pt3dadd(-18.3685661970635, -1433.08187861487, 129.301857774462, 1.60142138335574)
    pt3dadd(-18.0315061790562, -1433.91156481304, 129.746842444787, 1.59519731628781)
  }
  adendIML[6] {pt3dclear()
    pt3dadd(-18.0315061790562, -1433.91156481304, 129.746842444787, 1.58899026834359)
    pt3dadd(-17.694446161049, -1434.74125101121, 130.191827115112, 1.58899026834359)
    pt3dadd(-17.3388861705268, -1435.53775753994, 130.675021062361, 1.58293897291681)
    pt3dadd(-16.944301887073, -1436.26315741757, 131.239010145695, 1.57720018334115)
    pt3dadd(-16.5492212340149, -1436.98747194817, 131.804058584619, 1.57148066139035)
    pt3dadd(-16.1541405809568, -1437.71178647878, 132.369107023544, 1.56577593582801)
    pt3dadd(-15.7590599278988, -1438.43610100939, 132.934155462469, 1.56008600665413)
    pt3dadd(-15.370889289051, -1439.16740060225, 133.494850673857, 1.55439278736728)
    pt3dadd(-15.1623615117188, -1440.04107848464, 133.931339569307, 1.54827642669901)
    pt3dadd(-14.9613255323517, -1440.92061089437, 134.362625176802, 1.54215935837404)
    pt3dadd(-14.7602895529845, -1441.8001433041, 134.793910784297, 1.53605952064924)
    pt3dadd(-14.5592535736174, -1442.67967571383, 135.225196391792, 1.52997691352459)
    pt3dadd(-14.3582175942503, -1443.55920812356, 135.656481999287, 1.52391153700009)
    pt3dadd(-14.1571816148831, -1444.43874053329, 136.087767606781, 1.51786404552974)
    pt3dadd(-13.9272325511669, -1445.32577240927, 136.467046117838, 1.51173796907586)
    pt3dadd(-13.5176847309708, -1446.23510284979, 136.5, 1.50514515931407)
    pt3dadd(-13.0937446249221, -1447.14079307635, 136.5, 1.49855940791268)
    pt3dadd(-12.6698045188735, -1448.04648330291, 136.5, 1.49199447658554)
    pt3dadd(-12.245864412825, -1448.95217352947, 136.5, 1.48545046039511)
    pt3dadd(-11.7177649091, -1449.77958442005, 136.629504397419, 1.47900847730372)
    pt3dadd(-11.1001650237098, -1450.52644939773, 136.876006094532, 1.47269104764917)
    pt3dadd(-10.4825651383197, -1451.27331437542, 137.122507791645, 1.4663940260963)
    pt3dadd(-9.86496525292955, -1452.0201793531, 137.369009488758, 1.46011659952138)
    pt3dadd(-9.24736536753937, -1452.76704433078, 137.615511185871, 1.45385860495802)
    pt3dadd(-8.62976548214931, -1453.51390930846, 137.862012882984, 1.44762118146273)
    pt3dadd(-7.915383411368, -1454.18335036962, 138, 1.44130750054827)
    pt3dadd(-7.08915606856044, -1454.74668719426, 138, 1.43492811043072)
    pt3dadd(-6.26292872575289, -1455.3100240189, 138, 1.42856980447451)
    pt3dadd(-5.43670138294533, -1455.87336084355, 138, 1.42223214956792)
    pt3dadd(-4.61047404013777, -1456.43669766819, 138, 1.4159160625089)
    pt3dadd(-3.98438353999916, -1457.15941280791, 138.236152543806, 1.4098267521823)
    pt3dadd(-3.41162155397308, -1457.92309545594, 138.534032587538, 1.40381434087341)
    pt3dadd(-2.838859567947, -1458.68677810398, 138.831912631271, 1.39782127772385)
    pt3dadd(-2.26609758192092, -1459.45046075201, 139.129792675003, 1.39184710907105)
    pt3dadd(-1.69784039447484, -1460.21650177315, 139.429680199755, 1.38589625615255)
    pt3dadd(-1.29696658314276, -1461.05139367006, 139.794392832652, 1.38009806685649)
    pt3dadd(-0.958457731606359, -1461.90894942729, 140.181703922967, 1.37436667979044)
    pt3dadd(-0.619948880069956, -1462.76650518451, 140.569015013282, 1.36865314913042)
    pt3dadd(-0.267489043755518, -1463.61993384575, 140.950313554793, 1.36294528218795)
    pt3dadd(0.28356337534035, -1464.40009716503, 141.237941477453, 1.35707018800618)
    pt3dadd(0.874181694029289, -1465.16168394439, 141.504691508625, 1.35117729286716)
    pt3dadd(1.46480001271811, -1465.92327072375, 141.771441539796, 1.34530463660822)
    pt3dadd(2.05541833140705, -1466.68485750312, 142.038191570968, 1.3394513590271)
    pt3dadd(2.64603665009588, -1467.44644428248, 142.30494160214, 1.33361726775563)
    pt3dadd(3.14939800075172, -1468.23658927149, 142.629129709557, 1.32791677231054)
    pt3dadd(3.40835817725508, -1469.08161721586, 143.096962372166, 1.32256175684199)
    pt3dadd(3.66731835375822, -1469.92664516024, 143.564795034775, 1.31722338962872)
    pt3dadd(3.92627853026147, -1470.77167310462, 144.032627697384, 1.31190167067072)
    pt3dadd(4.18523870676484, -1471.616701049, 144.500460359993, 1.30659661122541)
    pt3dadd(4.44419888326809, -1472.46172899338, 144.968293022603, 1.30130879920296)
    pt3dadd(4.70915213219223, -1473.30903719552, 145.427969349978, 1.2960159044183)
    pt3dadd(5.0545547263813, -1474.18062473969, 145.771201531987, 1.29046977457012)
    pt3dadd(5.41979123801991, -1475.05719236762, 146.084620555382, 1.28487893396022)
    pt3dadd(5.78502774965864, -1475.93375999555, 146.398039578777, 1.27930785025085)
    pt3dadd(6.15026426129737, -1476.81032762348, 146.711458602173, 1.27375561336929)
    pt3dadd(6.54582036331954, -1477.67177495315, 147.027221720804, 1.26822626685886)
    pt3dadd(7.18052738974131, -1478.37257179275, 147.350326115077, 1.26272966116143)
    pt3dadd(7.8208352667981, -1479.06937742366, 147.673540804261, 1.25725211589299)
    pt3dadd(8.46114314385488, -1479.76618305458, 147.996755493445, 1.25179320168502)
    pt3dadd(9.1014510209119, -1480.46298868549, 148.319970182629, 1.24635356043995)
    pt3dadd(9.74356632075717, -1481.16585159566, 148.625623219974, 1.24090317288726)
    pt3dadd(10.3878159074987, -1481.8761780631, 148.909134735874, 1.23543523251572)
    pt3dadd(11.0320654942401, -1482.58650453053, 149.192646251773, 1.22998698087522)
    pt3dadd(11.6763150809817, -1483.29683099796, 149.476157767673, 1.22455831425169)
    pt3dadd(12.320564667723, -1484.0071574654, 149.759669283573, 1.21914868113341)
    pt3dadd(12.930050337672, -1484.71187879394, 150.103563296796, 1.21389371011976)
    pt3dadd(13.3286816884557, -1485.35728193331, 150.755136649437, 1.20954144693507)
    pt3dadd(13.7273130392396, -1486.00268507267, 151.406710002077, 1.20520211828892)
    pt3dadd(14.1259443900234, -1486.64808821203, 152.058283354717, 1.20087566421942)
    pt3dadd(14.5245757408072, -1487.2934913514, 152.709856707358, 1.19656192870784)
    pt3dadd(15.0197890975105, -1488.07631637205, 152.91181761151, 1.1914175620414)
    pt3dadd(15.5536422797375, -1488.90880923545, 152.763640649027, 1.18597693225899)
    pt3dadd(16.0874954619643, -1489.74130209886, 152.615463686544, 1.18055629235471)
    pt3dadd(16.6213486441912, -1490.57379496226, 152.46728672406, 1.17515645004509)
    pt3dadd(17.1552018264181, -1491.40628782566, 152.319109761577, 1.16977723572782)
    pt3dadd(17.6890550086449, -1492.23878068906, 152.170932799094, 1.16441815902784)
    pt3dadd(18.2229081908719, -1493.07127355246, 152.022755836611, 1.15908037029758)
    pt3dadd(18.7567613730986, -1493.90376641587, 151.874578874128, 1.15376257144546)
    pt3dadd(19.2906145553255, -1494.73625927927, 151.726401911645, 1.14846569606397)
    pt3dadd(19.8244677375525, -1495.56875214267, 151.578224949161, 1.14318932279885)
    pt3dadd(20.2425231353266, -1496.44095580304, 151.641739138445, 1.13800171807823)
    pt3dadd(20.5291449828338, -1497.35140167159, 151.939960930014, 1.13293442547821)
    pt3dadd(20.8157668303412, -1498.26184754014, 152.238182721583, 1.12788602397775)
    pt3dadd(21.1023886778486, -1499.1722934087, 152.536404513152, 1.12285664573308)
    pt3dadd(21.389010525356, -1500.08273927725, 152.834626304721, 1.11784719756784)
    pt3dadd(21.7533627919562, -1500.80964691798, 153.21612390991, 1.10032850818993)
  }
  adendIML[7] {pt3dclear()
    pt3dadd(21.7533627919562, -1500.80964691798, 153.21612390991, 1.0680757367427)
    pt3dadd(21.7270518377735, -1501.20632081788, 154.295969608458, 1.0680757367427)
    pt3dadd(21.8508073457934, -1501.63383984559, 155.191465032893, 1.06545149707178)
    pt3dadd(21.9745628538134, -1502.06135887329, 156.086960457329, 1.06283279841065)
    pt3dadd(22.0983183618333, -1502.488877901, 156.982455881764, 1.0602202280939)
    pt3dadd(22.2220738698533, -1502.9163969287, 157.8779513062, 1.05761350006394)
    pt3dadd(22.3458293778732, -1503.34391595641, 158.773446730635, 1.05501231304379)
  }
  adendMML[5] {pt3dclear()
    pt3dadd(22.3458293778732, -1503.34391595641, 158.773446730635, 1.05241666703343)
    pt3dadd(22.4695848858931, -1503.77143498411, 159.66894215507, 1.05241666703343)
    pt3dadd(22.5933403939131, -1504.19895401182, 160.564437579506, 1.04982694002712)
    pt3dadd(22.717095901933, -1504.62647303952, 161.459933003941, 1.04724326464794)
    pt3dadd(22.840851409953, -1505.05399206723, 162.355428428377, 1.04466513027855)
    pt3dadd(22.9646069179729, -1505.48151109493, 163.250923852812, 1.04209253691895)
    pt3dadd(23.0883624259928, -1505.90903012264, 164.146419277247, 1.0395256532231)
    pt3dadd(23.2121179340129, -1506.33654915034, 165.041914701683, 1.03696503049468)
    pt3dadd(23.3358734420328, -1506.76406817805, 165.937410126118, 1.03440994877606)
  }
  adendMML[6] {pt3dclear()
    pt3dadd(23.3358734420328, -1506.76406817805, 165.937410126118, 1.00706807299968)
    pt3dadd(23.525084039031, -1507.21225544525, 166.809157832323, 1.00706807299968)
    pt3dadd(23.8019458875046, -1507.6863328824, 167.644779159415, 0.999620244836285)
    pt3dadd(24.0845137821308, -1508.16198883836, 168.477789841515, 0.996651615518186)
    pt3dadd(24.3670816767569, -1508.63764479431, 169.310800523614, 0.993691277591146)
    pt3dadd(24.6496495713831, -1509.11330075027, 170.143811205714, 0.990739409149833)
    pt3dadd(24.9322174660092, -1509.58895670622, 170.976821887814, 0.987795483958161)
    pt3dadd(25.2147853606353, -1510.06461266217, 171.809832569913, 0.984860376393634)
    pt3dadd(25.4973532552615, -1510.54026861813, 172.642843252013, 0.98193286393733)
    pt3dadd(25.7799211498876, -1511.01592457408, 173.475853934112, 0.979014517249589)
    pt3dadd(26.0192514902759, -1511.60237159991, 174.241866967217, 0.975749196630019)
    pt3dadd(26.1809885577436, -1512.35714458143, 174.8776018706, 0.971915120603894)
    pt3dadd(26.3427256252114, -1513.11191756294, 175.513336773984, 0.968095611717654)
    pt3dadd(26.5044626926791, -1513.86669054446, 176.149071677368, 0.964290808210534)
    pt3dadd(26.6661997601469, -1514.62146352598, 176.784806580751, 0.960500492970739)
    pt3dadd(26.8849800784013, -1515.24975317652, 177.527530607084, 0.95717231168228)
    pt3dadd(27.1311037115502, -1515.80912507004, 178.319064713705, 0.954087043671335)
    pt3dadd(27.377227344699, -1516.36849696356, 179.110598820327, 0.951012052372533)
    pt3dadd(27.6159590342527, -1516.92267136603, 179.907677998551, 0.947977627197)
    pt3dadd(27.8009569220535, -1517.43855484643, 180.743779152385, 0.945177150530571)
    pt3dadd(27.9686985751148, -1517.94177980561, 181.591498078848, 0.942455544927976)
    pt3dadd(28.1364402281761, -1518.4450047648, 182.439217005311, 0.939742259147903)
    pt3dadd(28.2694364011905, -1518.96327388638, 183.283573653641, 0.937015019307937)
    pt3dadd(28.3423962032174, -1519.50616646184, 184.120140744954, 0.934248493803252)
    pt3dadd(28.4133147613856, -1520.0498754078, 184.956412913685, 0.931487829210493)
    pt3dadd(28.4825305679916, -1520.59776290182, 185.790024342428, 0.928719994900488)
    pt3dadd(28.5356023631008, -1521.18451078936, 186.597643842616, 0.925813443934998)
    pt3dadd(28.5804984506814, -1521.7906079717, 187.391766343798, 0.922842646946681)
    pt3dadd(28.6253945382618, -1522.39670515404, 188.18588884498, 0.919880986647538)
    pt3dadd(28.7329298379897, -1522.99906726859, 188.971672196976, 0.916887962306892)
    pt3dadd(29.16630364358, -1523.55100912217, 189.673345782519, 0.91353403372091)
    pt3dadd(29.6656150755364, -1524.08872912582, 190.352717029775, 0.910097902794463)
    pt3dadd(30.1649265074927, -1524.62644912946, 191.03208827703, 0.906674953736423)
    pt3dadd(30.664237939449, -1525.16416913311, 191.711459524286, 0.903265556935871)
    pt3dadd(30.9864122630603, -1525.6421267426, 192.519359165032, 0.900471717255787)
    pt3dadd(31.1741051600513, -1526.06756397578, 193.404669583498, 0.898124780858443)
    pt3dadd(31.3617980570424, -1526.49300120896, 194.289980001963, 0.895783922089813)
    pt3dadd(31.5494909540333, -1526.91843844214, 195.175290420429, 0.893450169464699)
    pt3dadd(31.7371838510244, -1527.34387567532, 196.060600838894, 0.891122545742261)
    pt3dadd(31.9248767480154, -1527.7693129085, 196.94591125736, 0.888800999648537)
    pt3dadd(32.1029822964836, -1528.20569184842, 197.826074850112, 0.8864549283999)
    pt3dadd(32.1140068938327, -1528.82537853108, 198.60749664228, 0.883561087620589)
    pt3dadd(32.0721165692518, -1529.49562372437, 199.348453173779, 0.88048545921519)
    pt3dadd(32.0302262446709, -1530.16586891767, 200.089409705278, 0.877420898894786)
    pt3dadd(31.9883359200899, -1530.83611411096, 200.830366236777, 0.874367994198723)
    pt3dadd(32.289474734022, -1531.41476759353, 201.578545314211, 0.871357857255211)
    pt3dadd(32.6866495077007, -1531.95826991541, 202.318043404316, 0.868321434784038)
    pt3dadd(33.0838242813794, -1532.50177223728, 203.05754149442, 0.86529614401241)
    pt3dadd(33.4809990550581, -1533.04527455916, 203.797039584525, 0.862283103563783)
    pt3dadd(33.8331348235037, -1533.5672394134, 204.573394330501, 0.859443967184209)
    pt3dadd(34.1680878729171, -1534.08083408916, 205.36334810365, 0.856676533786103)
    pt3dadd(34.5030409223306, -1534.59442876493, 206.153301876799, 0.853919483659959)
    pt3dadd(34.8441074578386, -1535.10313824438, 206.942945702548, 0.851170092865096)
    pt3dadd(35.3324887015234, -1535.49262847454, 207.723569191891, 0.848389217622815)
    pt3dadd(35.838079319925, -1535.86632588814, 208.501212020992, 0.845604521488258)
    pt3dadd(36.3436699383266, -1536.24002330174, 209.278854850093, 0.842829794589453)
    pt3dadd(36.8168816123379, -1536.64179729248, 210.060414728105, 0.840083807681849)
    pt3dadd(37.1730564858475, -1537.13938079451, 210.850270578709, 0.83738520245395)
    pt3dadd(37.5080095352611, -1537.65297547028, 211.640224351858, 0.834697352265898)
    pt3dadd(37.8429625846745, -1538.16657014605, 212.430178125007, 0.832019056019073)
    pt3dadd(38.1485263230837, -1538.70426563004, 213.215208577282, 0.829328053798221)
    pt3dadd(38.3916735348628, -1539.29082873809, 213.987625706359, 0.826591427721685)
    pt3dadd(38.6316296459792, -1539.87981191992, 214.759325049535, 0.823861498475086)
    pt3dadd(38.8715857570957, -1540.46879510175, 215.531024392711, 0.821142373549767)
    pt3dadd(39.2915816752043, -1541.02612735706, 216.220433030673, 0.81815242284026)
    pt3dadd(39.9695918066524, -1541.51922563447, 216.765553522364, 0.814727104615442)
    pt3dadd(40.6476019381005, -1542.01232391189, 217.310674014056, 0.81131857043333)
    pt3dadd(41.1263632664605, -1542.44801834445, 218.061282268751, 0.808600341179893)
    pt3dadd(41.4914062269849, -1542.8448041711, 218.903484527556, 0.806271625510386)
    pt3dadd(41.8564491875092, -1543.24158999776, 219.745686786361, 0.803951167051242)
    pt3dadd(42.2214921480335, -1543.63837582442, 220.587889045166, 0.801638639747639)
    pt3dadd(42.5865351085578, -1544.03516165107, 221.43009130397, 0.799333792508626)
    pt3dadd(42.9408965458505, -1544.40430796236, 222.288153313119, 0.797126481135861)
    pt3dadd(43.2761615537322, -1544.72413783182, 223.17432304529, 0.795084192319723)
    pt3dadd(43.6105745699158, -1545.0418301972, 224.061588223008, 0.793054699490385)
    pt3dadd(43.9449875860994, -1545.35952256257, 224.948853400725, 0.791032201114336)
    pt3dadd(44.2794006022831, -1545.67721492795, 225.836118578443, 0.7890157219833)
    pt3dadd(44.6830890146558, -1545.96349184333, 226.703146789102, 0.786889813116275)
    pt3dadd(45.2406544516072, -1546.17089551245, 227.506143418827, 0.78445123606111)
    pt3dadd(45.8057127166816, -1546.37431648787, 228.30572397376, 0.782004653186795)
    pt3dadd(46.370770981756, -1546.5777374633, 229.105304528693, 0.779568448039775)
    pt3dadd(46.8950754165594, -1546.97260270489, 229.847216747036, 0.776917768826544)
    pt3dadd(47.3695293661618, -1547.54194744441, 230.518588490025, 0.774031888276421)
    pt3dadd(47.8439833157643, -1548.11129218393, 231.189960233014, 0.771159440057691)
    pt3dadd(48.3184372653667, -1548.68063692345, 231.861331976003, 0.768300935864674)
    pt3dadd(48.7783527803541, -1549.23812494671, 232.551677424703, 0.765517043928999)
    pt3dadd(49.1667646760301, -1549.73599310679, 233.326102878142, 0.763044938588011)
    pt3dadd(49.5445925576018, -1550.22494683588, 234.112340973577, 0.7606269682136)
    pt3dadd(49.9224204391736, -1550.71390056497, 234.898579069012, 0.75821947601282)
    pt3dadd(50.3280033405252, -1551.15730473731, 235.696369238027, 0.755869495634023)
    pt3dadd(50.8164133449479, -1551.44802497804, 236.519131299142, 0.753638074313081)
    pt3dadd(51.3048233493706, -1551.73874521877, 237.341893360258, 0.75141453644102)
    pt3dadd(51.7932333537933, -1552.0294654595, 238.164655421373, 0.749200493910598)
    pt3dadd(52.281643358216, -1552.32018570022, 238.987417482489, 0.74699423385313)
    pt3dadd(52.7700533626387, -1552.61090594095, 239.810179543604, 0.744797570113227)
    pt3dadd(53.2584633670614, -1552.90162618168, 240.63294160472, 0.742608641499768)
    pt3dadd(53.7679989224799, -1553.22482553052, 241.427278676189, 0.740319066770963)
  }
  adendOML[7] {pt3dclear()
    pt3dadd(53.7679989224799, -1553.22482553052, 241.427278676189, 0.73741841394609)
    pt3dadd(54.385843368097, -1553.73314812743, 242.016047474534, 0.73741841394609)
    pt3dadd(55.0254853503066, -1554.28141268361, 242.554809120378, 0.734400857267383)
    pt3dadd(55.6359279343186, -1554.78451609699, 243.155722298944, 0.731561261431362)
    pt3dadd(56.1556892741079, -1555.15299749335, 243.925395758363, 0.729216856905597)
    pt3dadd(56.6653598688262, -1555.50755095054, 244.709313949803, 0.726932926924099)
    pt3dadd(57.1750304635444, -1555.86210440774, 245.493232141242, 0.724659269409523)
    pt3dadd(57.7250206960887, -1556.16734558853, 246.268993312579, 0.722364700873242)
    pt3dadd(58.3443645966507, -1556.3809124508, 247.024507924072, 0.720008304490716)
    pt3dadd(58.9637084972129, -1556.59447931306, 247.780022535565, 0.717662635159134)
    pt3dadd(59.5830523977751, -1556.80804617532, 248.535537147058, 0.715327480924133)
    pt3dadd(60.3206833663625, -1556.92061754851, 249.161046454825, 0.712691919580255)
    pt3dadd(61.2300917797573, -1556.87440138622, 249.57431127468, 0.709607667649467)
    pt3dadd(62.1398117235433, -1556.82774908141, 249.986904520303, 0.706541838810086)
    pt3dadd(63.0495316673292, -1556.7810967766, 250.399497765926, 0.703495322399361)
    pt3dadd(63.9361489756412, -1557.03574154044, 250.761397994995, 0.700404693000652)
  }
}
proc shape3d_14() {
  adendOML[7] {
    pt3dadd(64.80835571966, -1557.38462423805, 251.104233610121, 0.697312518086392)
    pt3dadd(65.6805624636786, -1557.73350693566, 251.447069225247, 0.694240809071661)
    pt3dadd(66.5527692076972, -1558.08238963327, 251.789904840372, 0.691189410083169)
    pt3dadd(67.3061802980196, -1558.37873453973, 252.327739667234, 0.688535126158653)
    pt3dadd(67.8710974710125, -1558.59277334958, 253.124134292386, 0.686483169456176)
    pt3dadd(68.4301149968317, -1558.80429349449, 253.925856584784, 0.684457943569348)
    pt3dadd(68.9891325226507, -1559.01581363939, 254.727578877181, 0.682442987909647)
    pt3dadd(69.5481500484699, -1559.2273337843, 255.529301169578, 0.680436631512309)
    pt3dadd(70.1093583727413, -1559.44161404144, 256.328740265645, 0.678432111162375)
    pt3dadd(70.7542235859856, -1559.77210825663, 257.010604910757, 0.676092383763662)
    pt3dadd(71.4241193582102, -1560.13750595057, 257.65692076204, 0.673662842296933)
    pt3dadd(72.0940151304347, -1560.50290364451, 258.303236613322, 0.671247485443446)
    pt3dadd(72.7639109026593, -1560.86830133845, 258.949552464604, 0.668846313203204)
    pt3dadd(73.4338066748838, -1561.23369903239, 259.595868315886, 0.666459325576203)
    pt3dadd(74.1037024471085, -1561.59909672633, 260.242184167168, 0.66408660822457)
    pt3dadd(74.7735982193329, -1561.96449442027, 260.88850001845, 0.66172836172193)
    pt3dadd(75.5852493030707, -1562.38366703904, 261.286333189612, 0.658975631692593)
    pt3dadd(76.4212074874348, -1562.81136657523, 261.630203834973, 0.656173700590509)
    pt3dadd(77.2571656717988, -1563.23906611142, 261.974074480334, 0.653392066243415)
    pt3dadd(78.0931238561629, -1563.6667656476, 262.317945125694, 0.650630760678644)
    pt3dadd(78.9477548695862, -1563.96293362863, 262.724257334321, 0.647963220771024)
    pt3dadd(79.8165507286111, -1564.10996062015, 263.1970964392, 0.645395657250654)
    pt3dadd(80.685346587636, -1564.25698761168, 263.66993554408, 0.642846366471804)
    pt3dadd(81.554142446661, -1564.40401460321, 264.14277464896, 0.640315348434475)
    pt3dadd(82.4229383056861, -1564.55104159473, 264.61561375384, 0.637802603138664)
    pt3dadd(83.291734164711, -1564.69806858626, 265.088452858719, 0.635308444714019)
    pt3dadd(84.1575157942772, -1564.76625325729, 265.544060752101, 0.632813387128602)
    pt3dadd(84.9853698306728, -1564.31469651016, 265.876858285971, 0.630200233949008)
    pt3dadd(85.8132238670684, -1563.86313976304, 266.209655819841, 0.627607517184054)
    pt3dadd(86.6410779034638, -1563.41158301591, 266.54245335371, 0.625035951322691)
    pt3dadd(87.4689319398594, -1562.96002626879, 266.87525088758, 0.622485298439492)
    pt3dadd(88.3515364773442, -1562.65390986433, 267.220055609168, 0.619965732282779)
    pt3dadd(89.26249619845, -1562.43607167015, 267.570339647743, 0.617471631964085)
    pt3dadd(90.1734559195556, -1562.21823347597, 267.920623686318, 0.614998573911404)
    pt3dadd(91.0844156406614, -1562.00039528179, 268.270907724894, 0.612545729377032)
    pt3dadd(92.0136213668502, -1561.89675609425, 268.596529064676, 0.610093274330231)
    pt3dadd(92.9682825649915, -1562.00573777788, 268.873501879561, 0.607625157448947)
    pt3dadd(93.9229393982142, -1562.11528856202, 269.150321236679, 0.605178099704999)
    pt3dadd(94.8775962314372, -1562.22483934616, 269.427140593797, 0.602752133206389)
    pt3dadd(95.8322530646602, -1562.3343901303, 269.703959950915, 0.600348555381685)
    pt3dadd(96.7849710378881, -1562.44855392377, 269.985359752723, 0.597969128088634)
    pt3dadd(97.6914704637418, -1562.65113672393, 270.353033696061, 0.595678486109752)
    pt3dadd(98.5916589794987, -1562.86546732292, 270.732141900188, 0.593417811646051)
    pt3dadd(99.4918474952555, -1563.07979792191, 271.111250104314, 0.59117708689028)
    pt3dadd(100.390472693149, -1563.26998416437, 271.504620251356, 0.588969762792979)
    pt3dadd(101.210807398035, -1563.1435251258, 272.052058291792, 0.586962650040641)
    pt3dadd(102.022022956512, -1562.98446325158, 272.614755935166, 0.584990721620357)
    pt3dadd(102.833238514988, -1562.82540137737, 273.177453578539, 0.583035171700481)
    pt3dadd(103.644454073465, -1562.66633950316, 273.740151221913, 0.581096000281013)
    pt3dadd(104.455669631941, -1562.50727762895, 274.302848865287, 0.579175181846443)
  }
  adendMML[7] {pt3dclear()
    pt3dadd(23.3358734420328, -1506.76406817805, 165.937410126118, 1.0599311722507)
    pt3dadd(23.6664983887355, -1507.35037088298, 166.614689181476, 1.0599311722507)
    pt3dadd(24.2657990871942, -1508.1033384272, 166.886495270779, 1.05508172364689)
    pt3dadd(24.8650997856529, -1508.85630597141, 167.158301360082, 1.05025172827023)
    pt3dadd(25.4644004841116, -1509.60927351563, 167.430107449385, 1.04544236320524)
    pt3dadd(26.0637011825703, -1510.36224105985, 167.701913538688, 1.04065252806761)
    pt3dadd(26.6633961031623, -1511.11494520723, 167.973525647395, 1.03588198303846)
    pt3dadd(27.3155138175218, -1511.83212550397, 168.219097998963, 1.03110052416941)
    pt3dadd(27.973550473989, -1512.54499854848, 168.461584660786, 1.0263352069508)
    pt3dadd(28.6315871304562, -1513.25787159298, 168.704071322609, 1.02159000805308)
    pt3dadd(29.2896237869234, -1513.97074463749, 168.946557984432, 1.01686541966291)
    pt3dadd(29.9476604433905, -1514.683617682, 169.189044646255, 1.01216053720631)
    pt3dadd(30.6060506381922, -1515.39582312439, 169.432499347918, 1.00747721261534)
    pt3dadd(31.2841839796354, -1516.06382971913, 169.7355293604, 1.0028919703842)
    pt3dadd(31.9704448508752, -1516.71299540814, 170.063599360273, 0.998359328132638)
    pt3dadd(32.656705722115, -1517.36216109715, 170.391669360145, 0.99384610329011)
    pt3dadd(33.3429665933548, -1518.01132678616, 170.719739360018, 0.9893523329547)
    pt3dadd(34.0547764911875, -1518.63310831652, 171.041936800682, 0.984868859750264)
    pt3dadd(34.8648390451548, -1519.13871855804, 171.337739863969, 0.980367539186559)
    pt3dadd(35.6799375059092, -1519.63775843197, 171.6319739604, 0.975884117637031)
    pt3dadd(36.4950359666635, -1520.1367983059, 171.926208056831, 0.971419935085193)
    pt3dadd(37.310134427418, -1520.63583817983, 172.220442153262, 0.966975362446549)
    pt3dadd(38.1433981433582, -1521.11589615059, 172.478041092342, 0.962519568424923)
    pt3dadd(39.0777534464612, -1521.4681812724, 172.5, 0.957931605458756)
    pt3dadd(40.0184441128577, -1521.80744675864, 172.5, 0.953360874282669)
    pt3dadd(40.9591347792541, -1522.14671224488, 172.5, 0.948811226675861)
    pt3dadd(41.8998254456505, -1522.48597773112, 172.5, 0.944282910895482)
    pt3dadd(42.840516112047, -1522.82524321736, 172.5, 0.939776170253537)
    pt3dadd(43.7206810288179, -1523.28937598028, 172.5, 0.935290280613057)
    pt3dadd(44.5485997193063, -1523.85022412545, 172.5, 0.93082643663831)
    pt3dadd(45.3765184097946, -1524.41107227062, 172.5, 0.926383266657762)
    pt3dadd(46.0448291904739, -1525.08379786194, 172.686736303004, 0.922100604775545)
    pt3dadd(46.4322740403778, -1525.8845172184, 173.143611560005, 0.918146407440772)
    pt3dadd(46.8197188902817, -1526.68523657487, 173.600486817007, 0.914209313364664)
    pt3dadd(47.2911634234628, -1527.44284720489, 174.035616310401, 0.910247920093094)
    pt3dadd(48.1386262388662, -1527.89297879259, 174.309574111509, 0.906059311448557)
    pt3dadd(48.9936263610851, -1528.33574671302, 174.579632178671, 0.901884825303079)
    pt3dadd(49.8486264833041, -1528.77851463346, 174.849690245834, 0.897729808314248)
    pt3dadd(50.703626605523, -1529.22128255389, 175.119748312996, 0.8935954309231)
    pt3dadd(51.5586267277421, -1529.66405047433, 175.389806380158, 0.889480610014641)
    pt3dadd(52.3594292240299, -1530.15855704516, 175.722048912054, 0.8854653847421)
    pt3dadd(53.1211117052259, -1530.68750321266, 176.096289142026, 0.881527941990623)
    pt3dadd(53.882794186422, -1531.21644938015, 176.470529371997, 0.877608902585514)
    pt3dadd(54.6444766676179, -1531.74539554765, 176.844769601969, 0.8737081842946)
    pt3dadd(55.3894398911832, -1532.32992496845, 177.161460075173, 0.869748537612882)
    pt3dadd(56.1215070713055, -1532.95296086642, 177.436966724133, 0.865756625053987)
    pt3dadd(56.8535742514276, -1533.5759967644, 177.712473373092, 0.861784131635322)
    pt3dadd(57.5856414315499, -1534.19903266238, 177.987980022051, 0.857831542615492)
    pt3dadd(58.3177086116721, -1534.82206856035, 178.26348667101, 0.853899132740257)
    pt3dadd(59.0592066583965, -1535.4230198854, 178.558861786757, 0.850009788278282)
    pt3dadd(59.8362013648394, -1535.92555919906, 178.937305288998, 0.846249269056424)
    pt3dadd(60.6147975774921, -1536.42299566825, 179.3198558043, 0.842513479309297)
    pt3dadd(61.3933937901448, -1536.92043213745, 179.702406319602, 0.838795901043526)
    pt3dadd(62.145854202532, -1537.44916592962, 180.091599295516, 0.835106832119579)
    pt3dadd(62.8167973770632, -1538.06872160024, 180.498751935584, 0.83146438800189)
    pt3dadd(63.4851233220687, -1538.69095610076, 180.906384929332, 0.827841086769527)
    pt3dadd(64.1534492670743, -1539.31319060128, 181.31401792308, 0.824235649085139)
    pt3dadd(65.0323415662502, -1539.63295745032, 181.5, 0.820449249050998)
    pt3dadd(65.9540006112142, -1539.85150410984, 181.568185893324, 0.816602428913969)
    pt3dadd(66.5586485895384, -1540.59051830557, 181.865269788577, 0.812905864495722)
    pt3dadd(67.1632965678625, -1541.3295325013, 182.16235368383, 0.809228850368329)
    pt3dadd(67.7679445461866, -1542.06854669703, 182.459437579083, 0.805571899959901)
    pt3dadd(68.3725925245109, -1542.80756089276, 182.756521474336, 0.801934160010096)
    pt3dadd(69.0329525248261, -1543.50864699286, 183, 0.798273497692122)
    pt3dadd(69.8983788103072, -1544.0096832634, 183, 0.794519490716459)
    pt3dadd(70.7638050957884, -1544.51071953394, 183, 0.790786157734995)
    pt3dadd(71.6292313812695, -1545.01175580449, 183, 0.787075029576266)
    pt3dadd(72.4946576667506, -1545.51279207503, 183, 0.783384603559664)
    pt3dadd(73.3600839522318, -1546.01382834557, 183, 0.779715890796643)
    pt3dadd(74.0235791256404, -1546.68778777523, 183.227579500869, 0.776196753174376)
    pt3dadd(74.5440888516365, -1547.45814216971, 183.595850775961, 0.772803983122554)
    pt3dadd(75.0645985776326, -1548.22849656418, 183.964122051052, 0.769430342135409)
    pt3dadd(75.5851083036288, -1548.99885095865, 184.332393326144, 0.76607535840702)
    pt3dadd(76.1986403395914, -1549.69185174817, 184.70187862709, 0.762740345925005)
    pt3dadd(76.8864589861047, -1550.31714142682, 185.07054965563, 0.759422771464062)
    pt3dadd(77.5742776326179, -1550.94243110546, 185.43922068417, 0.756124467137936)
    pt3dadd(78.262096279131, -1551.56772078411, 185.807891712709, 0.752844555850193)
    pt3dadd(78.9431468099377, -1552.2161885189, 186.146329639862, 0.749547749764509)
    pt3dadd(79.6164753679063, -1552.88951707686, 186.451710231989, 0.746233266437266)
  }
  adendOML[8] {pt3dclear()
    pt3dadd(79.6164753679063, -1552.88951707686, 186.451710231989, 0.742938350588699)
    pt3dadd(80.2898039258749, -1553.56284563483, 186.757090824116, 0.742938350588699)
    pt3dadd(80.9631324838435, -1554.2361741928, 187.062471416243, 0.73966256040325)
    pt3dadd(81.6364610418121, -1554.90950275077, 187.36785200837, 0.736406532118054)
    pt3dadd(82.3837718253756, -1555.47430467092, 187.702987132366, 0.733202345482298)
    pt3dadd(83.184962682137, -1555.95478563474, 188.059682036242, 0.730040606132944)
    pt3dadd(83.9861535388983, -1556.43526659856, 188.416376940118, 0.726897594030386)
    pt3dadd(84.7873443956597, -1556.91574756238, 188.773071843994, 0.723773968129495)
    pt3dadd(85.5067011513853, -1557.45801727235, 189.188110945819, 0.720750263773679)
    pt3dadd(86.0766199292256, -1558.10119400174, 189.699497571995, 0.717888283543273)
    pt3dadd(86.6465387070658, -1558.74437073114, 190.210884198172, 0.715042437676473)
    pt3dadd(87.3574255110431, -1559.24906819472, 190.634023397428, 0.712093870777088)
    pt3dadd(88.2516254311053, -1559.57362276319, 190.942358985781, 0.709010054121736)
    pt3dadd(89.1458253511674, -1559.89817733166, 191.250694574133, 0.705945332311225)
    pt3dadd(90.0400252712296, -1560.22273190013, 191.559030162487, 0.702899705345555)
    pt3dadd(90.9342251912918, -1560.5472864686, 191.867365750839, 0.699874253237792)
    pt3dadd(91.7037111771707, -1560.82250954103, 192.413392463999, 0.69725143559876)
    pt3dadd(92.366253708885, -1561.05598284919, 193.125099993851, 0.694967382598191)
    pt3dadd(92.9619918338334, -1561.50146260426, 193.747735307637, 0.692494516525879)
    pt3dadd(93.4807134572077, -1562.17945415521, 194.268557095088, 0.689812792248401)
    pt3dadd(93.9994350805819, -1562.85744570616, 194.789378882539, 0.687147020181213)
    pt3dadd(94.7923408481254, -1563.30549893055, 195, 0.68423588350324)
    pt3dadd(95.7506487385931, -1563.59123654983, 195, 0.681195585149383)
    pt3dadd(96.7089566290608, -1563.8769741691, 195, 0.678177487280249)
    pt3dadd(97.5670670022411, -1564.30140255655, 195.105843331362, 0.675224110070381)
    pt3dadd(98.221002021863, -1564.99116186949, 195.416514473727, 0.67238347808416)
    pt3dadd(98.8731514365289, -1565.68216783601, 195.728302695435, 0.669563436002325)
    pt3dadd(99.5253008511947, -1566.37317380252, 196.040090917142, 0.666762452344643)
    pt3dadd(100.177450265861, -1567.06417976903, 196.35187913885, 0.663980983696251)
    pt3dadd(100.827493721942, -1567.73820703471, 196.701251031139, 0.661255646193429)
    pt3dadd(101.475339305125, -1568.39657168264, 197.084463884146, 0.658582648996592)
    pt3dadd(102.123184888308, -1569.05493633057, 197.467676737152, 0.655927854423626)
    pt3dadd(102.771030471491, -1569.7133009785, 197.850889590159, 0.653291977644525)
    pt3dadd(103.573646234768, -1570.24338514565, 198, 0.650547652458905)
    pt3dadd(104.468954437038, -1570.68883236244, 198, 0.647752981383227)
    pt3dadd(105.364262639309, -1571.13427957923, 198, 0.644980524819453)
    pt3dadd(106.25957084158, -1571.57972679602, 198, 0.642228742249877)
    pt3dadd(107.110491852225, -1571.93172892557, 198.27572447279, 0.639690693928731)
    pt3dadd(107.885795107068, -1572.16562894475, 198.862406366202, 0.637451406364195)
    pt3dadd(108.661098361912, -1572.39952896393, 199.449088259614, 0.635226670415841)
    pt3dadd(109.436401616755, -1572.6334289831, 200.035770153026, 0.633016486083668)
    pt3dadd(110.211704871598, -1572.86732900228, 200.622452046438, 0.630820853367677)
    pt3dadd(110.986259684191, -1573.22193082068, 201.12771435041, 0.628523868570095)
    pt3dadd(111.739408022188, -1573.77958512696, 201.476697524306, 0.626054091807335)
    pt3dadd(112.492556360186, -1574.33723943323, 201.825680698201, 0.623602952521128)
    pt3dadd(113.245704698184, -1574.89489373951, 202.174663872097, 0.621171059550043)
    pt3dadd(114.007216519484, -1575.43618957179, 202.529113162516, 0.618763233708078)
    pt3dadd(114.814022236047, -1575.88454723022, 202.913471726274, 0.616401539449076)
    pt3dadd(115.624597144084, -1576.32416334982, 203.30039030408, 0.614060473609169)
    pt3dadd(116.43517205212, -1576.76377946941, 203.687308881887, 0.611738394516241)
    pt3dadd(117.206484123128, -1577.26241074545, 204.057805254446, 0.609420638330422)
    pt3dadd(117.825175815676, -1577.98573371623, 204.364330119967, 0.607067880295347)
    pt3dadd(118.441052764888, -1578.71201254395, 204.66964085977, 0.604733906098063)
    pt3dadd(119.056929714099, -1579.43829137166, 204.974951599573, 0.602419674061885)
    pt3dadd(119.672806663311, -1580.16457019938, 205.280262339377, 0.600124568413398)
    pt3dadd(120.251619618925, -1580.94094693035, 205.5, 0.597808873155603)
    pt3dadd(120.722937105879, -1581.82291055006, 205.5, 0.59544993080268)
    pt3dadd(121.208556208976, -1582.68944585191, 205.516668385461, 0.593117190926519)
    pt3dadd(122.027638162785, -1582.99797032697, 206.000318466854, 0.591065674318084)
    pt3dadd(122.846720116595, -1583.30649480203, 206.483968548247, 0.58903080246773)
    pt3dadd(123.659710217669, -1583.62469382964, 206.971128329898, 0.587016680173303)
    pt3dadd(124.413094813285, -1584.02953431438, 207.487867383592, 0.585054568476334)
    pt3dadd(125.154362854082, -1584.45115807748, 208.010126987695, 0.583115171936572)
    pt3dadd(125.89563089488, -1584.87278184058, 208.532386591799, 0.581191699459406)
    pt3dadd(126.636898935677, -1585.29440560369, 209.054646195902, 0.579284151044837)
    pt3dadd(127.378166976475, -1585.71602936679, 209.576905800006, 0.577392602667644)
    pt3dadd(128.146328765106, -1586.12228565192, 210.06825434394, 0.575484025488041)
    pt3dadd(129.018482747975, -1586.45882715571, 210.423342004092, 0.573464122414362)
    pt3dadd(129.890636730844, -1586.7953686595, 210.778429664243, 0.571462782652014)
    pt3dadd(130.762790713713, -1587.1319101633, 211.133517324395, 0.569480082659534)
    pt3dadd(131.630864036181, -1587.45779692278, 211.504658218429, 0.567530886817788)
    pt3dadd(132.45588656158, -1587.68350648719, 212.021300433111, 0.565735797265013)
    pt3dadd(133.272778903958, -1587.89392771349, 212.558338428494, 0.563979038701935)
    pt3dadd(134.089671246336, -1588.1043489398, 213.095376423877, 0.562237908818634)
    pt3dadd(134.906563588713, -1588.3147701661, 213.63241441926, 0.56051240761511)
    pt3dadd(135.723455931091, -1588.52519139241, 214.169452414643, 0.558802535091363)
    pt3dadd(136.436005532061, -1588.88781772005, 214.723748761647, 0.557129170990775)
    pt3dadd(136.982103192844, -1589.49138256873, 215.304682021729, 0.555502994074492)
    pt3dadd(137.527753828382, -1590.09538305336, 215.885585454756, 0.553891462241551)
    pt3dadd(138.07340446392, -1590.69938353799, 216.466488887783, 0.552294614404503)
    pt3dadd(138.619055099458, -1591.30338402262, 217.047392320809, 0.550712450563349)
    pt3dadd(139.164705734997, -1591.90738450726, 217.628295753836, 0.54987486920505)
  }
  adendIML[8] {pt3dclear()
    pt3dadd(21.7533627919562, -1500.80964691798, 153.21612390991, 1.15096073097229)
    pt3dadd(22.6956117845474, -1501.36466280061, 153, 1.15096073097229)
    pt3dadd(23.5236629649125, -1501.92531531572, 153, 1.14576701464946)
    pt3dadd(24.3517141452777, -1502.48596783083, 153, 1.1405924256836)
    pt3dadd(25.179765325643, -1503.04662034594, 153, 1.13543804995006)
  }
  adendMML[8] {pt3dclear()
    pt3dadd(25.179765325643, -1503.04662034594, 153, 1.13030315314941)
    pt3dadd(25.9970576722949, -1503.62219364942, 153, 1.13030315314941)
    pt3dadd(26.7126560568596, -1504.31961540477, 153, 1.12518802857916)
    pt3dadd(27.4197628380462, -1505.02672218596, 153, 1.12009282815025)
    pt3dadd(28.1268696192327, -1505.73382896714, 153, 1.11501694430139)
    pt3dadd(28.8210360139157, -1506.45296645134, 153, 1.10996144094039)
    pt3dadd(29.4695024695155, -1507.21420968183, 153, 1.10492506471346)
    pt3dadd(30.1179689251153, -1507.97545291231, 153, 1.09990899312321)
    pt3dadd(30.6827210956503, -1508.79775917511, 153, 1.09491231013982)
    pt3dadd(31.1824435491399, -1509.66394476116, 153, 1.0899354883909)
    pt3dadd(31.7693167950264, -1510.43450783543, 152.883697325968, 1.08505968522905)
    pt3dadd(32.5206884114597, -1510.99366810812, 152.533296864412, 1.08041001869813)
    pt3dadd(33.2720600278928, -1511.55282838082, 152.182896402856, 1.07577825418745)
    pt3dadd(34.023431644326, -1512.11198865351, 151.8324959413, 1.07116400977413)
    pt3dadd(34.7636152619338, -1512.71406705157, 151.560565238705, 1.06648085796328)
    pt3dadd(35.2787931101606, -1513.49489335278, 151.888442115196, 1.061898976004)
    pt3dadd(35.7799032271823, -1514.2823521081, 152.247325605048, 1.05735196940074)
    pt3dadd(36.2810133442041, -1515.06981086342, 152.6062090949, 1.05282209402739)
    pt3dadd(36.7821234612259, -1515.85726961874, 152.965092584752, 1.04830934988394)
    pt3dadd(37.1717423428794, -1516.77603120528, 153, 1.04352885764312)
    pt3dadd(37.5469351006126, -1517.7029780185, 153, 1.03875968132343)
    pt3dadd(37.9221278583458, -1518.62992483173, 153, 1.03401055924935)
    pt3dadd(38.4461818308413, -1519.47210337042, 153, 1.02928107033048)
    pt3dadd(39.101112369259, -1520.22779245321, 153, 1.02457121591617)
    pt3dadd(39.7560429076769, -1520.983481536, 153, 1.01988141441595)
    pt3dadd(40.4682635411026, -1521.68312094923, 153, 1.01521080597107)
    pt3dadd(41.2250865488718, -1522.33674081958, 153, 1.01056069820416)
    pt3dadd(41.981909556641, -1522.99036068992, 153, 1.00592971779424)
    pt3dadd(42.73873256441, -1523.64398056027, 153, 1.00131892199909)
    pt3dadd(43.4928681761547, -1524.30067077228, 153, 0.996727638615867)
    pt3dadd(44.2384042186931, -1524.96713480516, 153, 0.992156085154238)
    pt3dadd(44.9836455322182, -1525.63392966463, 153, 0.987604498827744)
    pt3dadd(45.7288868457433, -1526.3007245241, 153, 0.983072187621896)
  }
}
proc shape3d_15() {
  adendMML[8] {
    pt3dadd(46.3771010882032, -1527.03410563318, 153.126781597193, 0.978623247009705)
    pt3dadd(46.8631927270125, -1527.84948515635, 153.441219431883, 0.974340259702644)
    pt3dadd(47.3492843658217, -1528.66486467951, 153.755657266573, 0.970075181819342)
    pt3dadd(47.835376004631, -1529.48024420268, 154.070095101264, 0.965828469669534)
    pt3dadd(48.3214676434403, -1530.29562372584, 154.384532935954, 0.961599364030058)
    pt3dadd(48.799899459429, -1531.10921185874, 154.714803279341, 0.957410072822323)
    pt3dadd(49.2738552063701, -1531.92170742493, 155.054239436625, 0.95325210806676)
    pt3dadd(49.7478109533113, -1532.73420299111, 155.393675593909, 0.949111491134175)
    pt3dadd(50.2217667002524, -1533.54669855729, 155.733111751192, 0.944988222024568)
    pt3dadd(50.6943453092056, -1534.36040194868, 156.071561634061, 0.940881647962701)
    pt3dadd(51.1618489767834, -1535.17853336694, 156.406376961152, 0.936787504766183)
    pt3dadd(51.6293526443613, -1535.9966647852, 156.741192288243, 0.932710758867894)
    pt3dadd(52.0968563119392, -1536.81479620346, 157.076007615333, 0.928651862545636)
    pt3dadd(52.5643599795172, -1537.63292762172, 157.410822942424, 0.92461092107737)
    pt3dadd(53.1100423233157, -1538.4217458662, 157.687679664012, 0.920516987837303)
    pt3dadd(53.683949047392, -1539.19970831439, 157.943424656655, 0.916416315309583)
    pt3dadd(54.2578557714685, -1539.97767076259, 158.199169649299, 0.912334503950841)
    pt3dadd(54.8317624955449, -1540.75563321078, 158.454914641943, 0.908270822099619)
    pt3dadd(55.4056692196212, -1541.53359565897, 158.710659634587, 0.904225970147008)
    pt3dadd(55.9803827578455, -1542.30927472108, 158.971297728977, 0.900204899588154)
    pt3dadd(56.5696996749534, -1543.01723436346, 159.355928682071, 0.896369001380057)
    pt3dadd(57.1617681370636, -1543.7113835949, 159.765332859708, 0.89258435778532)
    pt3dadd(57.7538365991737, -1544.40553282634, 160.174737037344, 0.888816818578152)
    pt3dadd(58.384003600657, -1545.07346883301, 160.559164841012, 0.885030040355175)
    pt3dadd(59.1463940972759, -1545.64864843134, 160.855620469158, 0.881136419577745)
    pt3dadd(59.9108420441703, -1546.22198439151, 161.150417370878, 0.877259351178961)
    pt3dadd(60.6752899910647, -1546.79532035168, 161.445214272599, 0.873400476766754)
    pt3dadd(61.4397379379592, -1547.36865631185, 161.740011174319, 0.86955939687561)
    pt3dadd(62.1910742601137, -1547.95900991466, 162.030335159941, 0.86573204168446)
    pt3dadd(62.8419784721524, -1548.67372826514, 162.286267546024, 0.861887042970359)
    pt3dadd(63.4928826841912, -1549.38844661561, 162.542199932107, 0.858060172277708)
    pt3dadd(64.1437868962299, -1550.10316496609, 162.79813231819, 0.854252378671489)
    pt3dadd(64.7946911082686, -1550.81788331656, 163.054064704273, 0.850462956536106)
    pt3dadd(65.4455953203073, -1551.53260166703, 163.309997090356, 0.846691662422174)
    pt3dadd(66.1602197978657, -1552.19087198138, 163.5, 0.842900093486912)
    pt3dadd(67.0357974818925, -1552.6739493243, 163.5, 0.839048133155942)
    pt3dadd(67.9037309296492, -1553.16806430123, 163.510244122155, 0.835217911509854)
    pt3dadd(68.4420372812726, -1553.91668213287, 163.813516452963, 0.831605728471622)
    pt3dadd(68.8693933097389, -1554.73254364176, 164.203050563465, 0.828087518566797)
    pt3dadd(69.2967493382052, -1555.54840515065, 164.592584673967, 0.824586397075726)
    pt3dadd(69.7292715414382, -1556.37232878995, 164.950721058498, 0.821069624188092)
    pt3dadd(70.1988451903322, -1557.24990075804, 165, 0.817347184050573)
    pt3dadd(70.6716628951467, -1558.1310610261, 165, 0.813628380136106)
    pt3dadd(71.1444805999614, -1559.01222129417, 165, 0.809929381460457)
    pt3dadd(71.8411607990612, -1559.65554771279, 165, 0.806249842082955)
    pt3dadd(72.765177631483, -1560.03789950552, 165, 0.802590516358287)
    pt3dadd(73.6402418640388, -1560.49681284623, 165.065468603836, 0.798968658284681)
    pt3dadd(74.1279948944539, -1561.27721769489, 165.456704151176, 0.795614133402583)
    pt3dadd(74.6157479248691, -1562.05762254356, 165.847939698515, 0.792276348823639)
    pt3dadd(75.1035009552843, -1562.83802739222, 166.239175245855, 0.788955304547851)
    pt3dadd(75.6289584720151, -1563.60743752398, 166.597959905578, 0.785610743779323)
    pt3dadd(76.2280177618114, -1564.35260883568, 166.890957659036, 0.782207631531676)
    pt3dadd(76.8270770516078, -1565.09778014738, 167.183955412494, 0.778822330366623)
    pt3dadd(77.4261363414041, -1565.84295145908, 167.476953165952, 0.775455002779658)
    pt3dadd(78.0251956312005, -1566.58812277078, 167.769950919409, 0.772106437059451)
  }
  adendOML[9] {pt3dclear()
    pt3dadd(78.0251956312005, -1566.58812277078, 167.769950919409, 0.768762243152084)
    pt3dadd(78.6402162483736, -1567.32519880278, 168.04785138499, 0.768762243152084)
    pt3dadd(79.3034825878793, -1568.03684995252, 168.279334761926, 0.765396540450843)
    pt3dadd(79.9683456638169, -1568.74756565438, 168.509204902176, 0.762048824517579)
    pt3dadd(80.6332087397544, -1569.45828135625, 168.739075042426, 0.758719432230297)
    pt3dadd(81.298071815692, -1570.16899705811, 168.968945182675, 0.755409069579134)
    pt3dadd(81.9629348916295, -1570.87971275998, 169.198815322925, 0.752117566004317)
    pt3dadd(82.6277979675671, -1571.59042846184, 169.428685463175, 0.748844386075482)
    pt3dadd(83.2996529875143, -1572.32306762409, 169.5, 0.745526574096822)
    pt3dadd(83.9723257815107, -1573.06300769748, 169.5, 0.742209719746619)
    pt3dadd(84.528726926192, -1573.84478212914, 169.681045285204, 0.73901378430518)
    pt3dadd(84.9493900226181, -1574.66698727216, 170.064478802395, 0.735966469455357)
    pt3dadd(85.3700531190442, -1575.48919241517, 170.447912319586, 0.732935992743439)
    pt3dadd(85.7907162154704, -1576.31139755819, 170.831345836776, 0.729922354169426)
    pt3dadd(86.3025090614279, -1577.09057719296, 171.182015733004, 0.726889452465446)
    pt3dadd(86.8854241155674, -1577.83541309547, 171.50671485217, 0.723845143221411)
    pt3dadd(87.468339169707, -1578.58024899798, 171.831413971336, 0.720818336955696)
    pt3dadd(88.0512542238465, -1579.3250849005, 172.156113090502, 0.717809596507114)
    pt3dadd(88.6278601812836, -1580.04887133324, 172.523376548469, 0.714877169064424)
    pt3dadd(89.1256886759268, -1580.57100876183, 173.2050503864, 0.712538007729213)
    pt3dadd(89.6035391365489, -1581.04885922245, 173.942151379864, 0.7103387185819)
  }
  adendOML[10] {pt3dclear()
    pt3dadd(89.6035391365489, -1581.04885922245, 173.942151379864, 0.707645413169824)
    pt3dadd(90.4536228032376, -1581.12428199553, 174.456122228092, 0.707645413169824)
    pt3dadd(91.3249146817327, -1581.16494228319, 174.94520013955, 0.704923265843581)
    pt3dadd(92.196206560228, -1581.20560257085, 175.434278051007, 0.7022164283337)
    pt3dadd(93.0674984387232, -1581.24626285852, 175.923355962464, 0.699524900640181)
    pt3dadd(93.9387903172184, -1581.28692314618, 176.412433873922, 0.696848682763025)
    pt3dadd(94.8100821957136, -1581.32758343384, 176.901511785379, 0.694187774702231)
    pt3dadd(95.690226695416, -1581.26530262875, 177.370836463512, 0.691512771382472)
    pt3dadd(96.5717268569667, -1581.17715261259, 177.834719034685, 0.688846043654211)
    pt3dadd(97.4532270185176, -1581.08900259644, 178.298601605857, 0.686195031581394)
    pt3dadd(98.3422286483864, -1581.06278610083, 178.753744539151, 0.683547646676923)
    pt3dadd(99.2360299234341, -1581.08406708357, 179.201702573454, 0.680906316418527)
    pt3dadd(100.129831198482, -1581.10534806631, 179.649660607757, 0.678280944528929)
    pt3dadd(101.056917358063, -1581.1072778818, 180, 0.67558372632044)
    pt3dadd(102.054842667031, -1581.0428956038, 180, 0.672712127362791)
    pt3dadd(103.050569669562, -1580.97504794891, 180.010369363157, 0.669864502551608)
    pt3dadd(103.975725758487, -1580.79849055575, 180.346326733355, 0.667183997862667)
    pt3dadd(104.898799432855, -1580.62035353087, 180.687211159601, 0.664525398170866)
    pt3dadd(105.821873107223, -1580.442216506, 181.028095585846, 0.661884130639242)
    pt3dadd(106.744946781591, -1580.26407948112, 181.368980012091, 0.659261087854885)
    pt3dadd(107.684360129336, -1580.12683230187, 181.680973794147, 0.656630805495604)
    pt3dadd(108.63366153619, -1580.01514978342, 181.974834056884, 0.654003047325365)
    pt3dadd(109.582962943045, -1579.90346726496, 182.268694319621, 0.651393935626295)
    pt3dadd(110.532264349899, -1579.79178474651, 182.562554582358, 0.64880289506779)
    pt3dadd(111.481565756754, -1579.68010222806, 182.856414845095, 0.646229657666053)
    pt3dadd(112.402262275142, -1579.65816449482, 183.228966270766, 0.643751073900718)
    pt3dadd(113.294448796912, -1579.72189210352, 183.676115018123, 0.641362781843561)
    pt3dadd(114.186635318681, -1579.78561971222, 184.12326376548, 0.63899046021096)
    pt3dadd(115.042752560938, -1579.77323591872, 184.622059944765, 0.63670925162216)
    pt3dadd(115.748945490362, -1579.50769639143, 185.275600858707, 0.634693170376238)
    pt3dadd(116.465913222689, -1579.28140148164, 185.926302225245, 0.632682945205542)
    pt3dadd(117.268641995494, -1579.64930330464, 186.327599087204, 0.630338886275706)
    pt3dadd(118.075825112115, -1580.12702392468, 186.674353215415, 0.62794101654159)
    pt3dadd(118.883008228735, -1580.60474454472, 187.021107343626, 0.625560988811861)
    pt3dadd(119.690191345355, -1581.08246516476, 187.367861471837, 0.623198228995953)
    pt3dadd(120.555164265419, -1581.29238032012, 187.7933155425, 0.620930308127052)
    pt3dadd(121.439244320526, -1581.33658432288, 188.258555762495, 0.61872142378313)
    pt3dadd(122.323324375634, -1581.38078832564, 188.72379598249, 0.616528397240749)
    pt3dadd(123.263294429435, -1581.46185709691, 189, 0.614220103410022)
    pt3dadd(124.254684939505, -1581.59279546617, 189, 0.611804865091905)
    pt3dadd(125.246075449575, -1581.72373383542, 189, 0.609410055194528)
    pt3dadd(126.237465959645, -1581.85467220468, 189, 0.607034372654126)
    pt3dadd(127.200674310864, -1582.10812787764, 189, 0.604678947711341)
    pt3dadd(128.144134450515, -1582.43961387265, 189, 0.602342958463169)
    pt3dadd(129.086773607809, -1582.76215379786, 189.023412793454, 0.600033849834443)
    pt3dadd(129.908195140588, -1582.8580952022, 189.544439915955, 0.598091719897141)
    pt3dadd(130.67279287906, -1582.88867911174, 190.188221651329, 0.596299671284294)
    pt3dadd(131.437390617531, -1582.91926302128, 190.832003386703, 0.594519775324429)
    pt3dadd(132.201988356003, -1582.94984693082, 191.475785122077, 0.592752040999569)
    pt3dadd(132.964918521493, -1583.06709069198, 192.104788665643, 0.590972656519513)
    pt3dadd(133.680783901165, -1583.50987768848, 192.643671857553, 0.589075115636287)
    pt3dadd(134.395837986479, -1583.9567864918, 193.181231320859, 0.587190256924866)
    pt3dadd(135.110892071794, -1584.40369529512, 193.718790784164, 0.585319847867646)
    pt3dadd(135.825946157108, -1584.85060409844, 194.25635024747, 0.583463888464628)
    pt3dadd(136.541000242422, -1585.29751290176, 194.793909710775, 0.581622378715811)
    pt3dadd(137.294493327978, -1585.72907051862, 195.288293308957, 0.579746072728779)
    pt3dadd(138.071486960455, -1586.15086706197, 195.755592539764, 0.577855104303283)
    pt3dadd(138.848480592932, -1586.57266360531, 196.222891770571, 0.575979798082634)
    pt3dadd(139.557367635447, -1586.88771821568, 196.823395070216, 0.574316199897551)
    pt3dadd(140.168610600299, -1587.05716325465, 197.596335512559, 0.572933349784569)
    pt3dadd(140.776978416254, -1587.22308174991, 198.37245383694, 0.571565607507617)
    pt3dadd(141.385346232209, -1587.38900024517, 199.148572161321, 0.570207239480114)
    pt3dadd(142.090854264957, -1587.58699643514, 199.823291578996, 0.568673593273785)
    pt3dadd(142.870109778389, -1587.80964086755, 200.409116042043, 0.567011404916475)
    pt3dadd(143.649365291821, -1588.03228529996, 200.994940505089, 0.565578506017262)
  }
  adendOML[11] {pt3dclear()
    pt3dadd(89.6035391365489, -1581.04885922245, 173.942151379864, 0.707450509396078)
    pt3dadd(89.9553821139413, -1581.90364726806, 174.315172934572, 0.707450509396078)
    pt3dadd(90.2931485955006, -1582.78184012011, 174.653833706637, 0.70453575313741)
    pt3dadd(90.63091507706, -1583.66003297217, 174.992494478701, 0.701638353056713)
    pt3dadd(90.9686815586194, -1584.53822582422, 175.331155250766, 0.698758789556602)
    pt3dadd(91.5318574326704, -1585.31010499531, 175.5, 0.695800200740305)
    pt3dadd(92.1989998703941, -1586.03872850242, 175.5, 0.692792720665742)
    pt3dadd(92.54859039012, -1586.97563109528, 175.5, 0.68980578137306)
    pt3dadd(92.8981809098458, -1587.91253368815, 175.5, 0.686837969437353)
    pt3dadd(93.2477714295717, -1588.84943628101, 175.5, 0.683890307856578)
    pt3dadd(93.5973619492976, -1589.78633887388, 175.5, 0.680962192983071)
    pt3dadd(93.9629206531711, -1590.71479390302, 175.5, 0.678053767460202)
    pt3dadd(94.6270734234821, -1591.45813390471, 175.5, 0.675165347611734)
    pt3dadd(95.3341802046685, -1592.16524068589, 175.5, 0.672296212033479)
    pt3dadd(96.0412869858552, -1592.87234746708, 175.5, 0.669447459758009)
    pt3dadd(96.7483937670418, -1593.57945424827, 175.5, 0.666617834839513)
    pt3dadd(97.3269604667045, -1594.35658655406, 175.709569831758, 0.66388152358647)
    pt3dadd(97.8414556436654, -1595.15859374168, 176.013015352234, 0.661212269197491)
    pt3dadd(98.3559508206264, -1595.96060092929, 176.316460872709, 0.658560728174931)
    pt3dadd(98.8704459975874, -1596.76260811691, 176.619906393185, 0.655927808899109)
    pt3dadd(99.3849411745484, -1597.56461530452, 176.92335191366, 0.653312783459997)
    pt3dadd(99.6670360434309, -1598.43660007279, 177.305080026314, 0.650788716327904)
    pt3dadd(99.8695581231456, -1599.32769722354, 177.711196604606, 0.648305689898787)
    pt3dadd(100.07208020286, -1600.21879437428, 178.117313182898, 0.645839653613925)
    pt3dadd(100.31744293943, -1601.09516520462, 178.524679832851, 0.643391512457467)
    pt3dadd(100.789620058167, -1601.87540728328, 178.931098977712, 0.64095889312452)
    pt3dadd(101.284961804056, -1602.64369244017, 179.336530195655, 0.63854199563087)
    pt3dadd(101.780303549945, -1603.41197759706, 179.741961413598, 0.636142203094802)
    pt3dadd(102.275645295834, -1604.18026275395, 180.147392631541, 0.633758966938847)
    pt3dadd(102.770987041724, -1604.94854791084, 180.552823849484, 0.631392287163003)
    pt3dadd(103.266328787613, -1605.71683306773, 180.958255067427, 0.629042273718979)
    pt3dadd(103.761670533502, -1606.48511822462, 181.36368628537, 0.626709506307394)
    pt3dadd(104.338445590505, -1607.23392479174, 181.678833852313, 0.624318165803987)
    pt3dadd(104.956292181747, -1607.9726544117, 181.948174042924, 0.621906906846481)
    pt3dadd(105.57413877299, -1608.71138403167, 182.217514233535, 0.619514610737382)
    pt3dadd(106.191985364232, -1609.45011365163, 182.486854424145, 0.617140554312594)
    pt3dadd(106.809831955475, -1610.1888432716, 182.756194614756, 0.614784516565009)
    pt3dadd(107.444618952205, -1610.90914032589, 182.946720079302, 0.612449715264402)
    pt3dadd(108.181478140323, -1611.49583190304, 182.612130737944, 0.610177373573346)
    pt3dadd(108.917627140438, -1612.07423468884, 182.260655465693, 0.607934990752441)
    pt3dadd(109.653776140552, -1612.65263747465, 181.909180193441, 0.605710524805619)
    pt3dadd(110.392528226296, -1613.23265019875, 181.56635598203, 0.603496995732123)
    pt3dadd(111.177039497278, -1613.83549032176, 181.5, 0.601193455342967)
    pt3dadd(111.971397330255, -1614.44294042933, 181.5, 0.598887324801969)
    pt3dadd(112.765755163232, -1615.0503905369, 181.5, 0.596600607713339)
    pt3dadd(113.576493273068, -1615.63557596182, 181.5, 0.594333719644263)
    pt3dadd(114.396451356738, -1616.20799952966, 181.5, 0.592086699313525)
    pt3dadd(115.216409440408, -1616.78042309751, 181.5, 0.589859053708199)
    pt3dadd(116.036367524078, -1617.35284666535, 181.5, 0.587651730439662)
    pt3dadd(116.856325607748, -1617.9252702332, 181.5, 0.585463534528099)
    pt3dadd(117.586854932257, -1618.60682460985, 181.5, 0.583295702509264)
    pt3dadd(118.293961713444, -1619.31393139103, 181.5, 0.581147198229054)
    pt3dadd(119.00106849463, -1620.02103817222, 181.5, 0.579018614007643)
    pt3dadd(119.708175275817, -1620.72814495341, 181.5, 0.577226992084492)
  }
}
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()
}

objref allreg, allregobj, alladendreg, allaxonreg, sec
objref regGCL
objref regadendIML
objref regadendMML
objref regadendOML
objref regsoma
objref regaxon
objref regaxonh
proc subsets() { local ward
  allregobj = new List()
  allreg = new SectionList()
  alladendreg = new SectionList()
  allaxonreg = new SectionList()
  regGCL = new SectionList()
  for ward = 0, 8 GCL[ward] {
    regGCL.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
  }
  regadendIML = new SectionList()
  for ward = 0, 8 adendIML[ward] {
    regadendIML.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    alladendreg.append()
  }
  regadendMML = new SectionList()
  for ward = 0, 8 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()
  }
  regaxon = new SectionList()
  for ward = 0, 0 axon[ward] {
    regaxon.append()
    sec = new SectionRef()
    allregobj.append(sec)
    allreg.append()
    allaxonreg.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 GCL
proc init() {
  celldef()
}

endtemplate cell_rat_mGC_Beining_03