proc celldef() { topol() subsets() geom() biophys() geom_nseg() } apicNum = 69 dendNum = 37 axonNum = 9 myNum = 10 nodeNum = 10 create soma, axon[axonNum], dend[dendNum], apic[apicNum], my[myNum], node[nodeNum] for i=0,9 { node[i] { nseg = 1 L = 1 diam = 1.3 } } proc topol() { local i connect axon(0), soma(0.5) connect my(0), axon(1) connect node(0), my(1) //connect axon[0](0), node(1) for i = 1, 9 connect my[i](0), node[i-1](1) for i = 1, 9 connect node[i](0), my[i](1) //connect axon[1](0), axon[0](1) connect axon[1](0), node[1](0.5) connect axon[2](0), node(0.5) connect dend(0), soma(0.5) for i = 1, 4 connect dend[i](0), dend[i-1](1) connect dend[5](0), dend[3](1) connect dend[6](0), dend[2](1) connect dend[7](0), dend[1](1) for i = 8, 9 connect dend[i](0), dend[7](1) connect dend[10](0), dend(1) for i = 11, 12 connect dend[i](0), dend[10](1) connect dend[13](0), soma(0.5) for i = 14, 15 connect dend[i](0), dend[13](1) for i = 16, 17 connect dend[i](0), soma(0.5) for i = 18, 19 connect dend[i](0), dend[17](1) for i = 20, 21 connect dend[i](0), soma(0.5) for i = 22, 23 connect dend[i](0), dend[21](1) for i = 24, 25 connect dend[i](0), dend[23](1) for i = 26, 27 connect dend[i](0), dend[25](1) connect dend[28](0), soma(0.5) for i = 29, 31 connect dend[i](0), dend[i-1](1) connect dend[32](0), dend[30](1) connect dend[33](0), dend[29](1) for i = 34, 35 connect dend[i](0), dend[33](1) connect dend[36](0), dend[28](1) connect apic(0), soma(0.5) for i = 1, 2 connect apic[i](0), apic(1) for i = 3, 4 connect apic[i](0), apic[2](1) for i = 5, 6 connect apic[i](0), apic[4](1) for i = 7, 8 connect apic[i](0), apic[i-1](1) connect apic[9](0), apic[7](1) for i = 10, 11 connect apic[i](0), apic[9](1) connect apic[12](0), apic[6](1) for i = 13, 14 connect apic[i](0), apic[12](1) for i = 15, 16 connect apic[i](0), apic[14](1) for i = 17, 18 connect apic[i](0), apic[16](1) for i = 19, 20 connect apic[i](0), apic[i-1](1) connect apic[21](0), apic[19](1) connect apic[22](0), apic[18](1) for i = 23, 24 connect apic[i](0), apic[i-1](1) connect apic[25](0), apic[23](1) for i = 26, 27 connect apic[i](0), apic[25](1) connect apic[28](0), apic[22](1) for i = 29, 30 connect apic[i](0), apic[28](1) for i = 31, 32 connect apic[i](0), apic[30](1) for i = 33, 34 connect apic[i](0), apic[32](1) for i = 35, 36 connect apic[i](0), apic[34](1) for i = 37, 39 connect apic[i](0), apic[i-1](1) connect apic[40](0), apic[38](1) for i = 41, 42 connect apic[i](0), apic[i-1](1) connect apic[43](0), apic[41](1) connect apic[44](0), apic[40](1) connect apic[45](0), apic[37](1) for i = 46, 47 connect apic[i](0), apic[45](1) for i = 48, 49 connect apic[i](0), apic[47](1) connect apic[50](0), apic[36](1) for i = 51, 52 connect apic[i](0), apic[i-1](1) connect apic[53](0), apic[51](1) for i = 54, 56 connect apic[i](0), apic[i-1](1) connect apic[57](0), apic[55](1) for i = 58, 59 connect apic[i](0), apic[57](1) connect apic[60](0), apic[54](1) for i = 61, 62 connect apic[i](0), apic[60](1) connect apic[63](0), apic[53](1) for i = 64, 65 connect apic[i](0), apic[63](1) connect apic[66](0), apic[50](1) for i = 67, 68 connect apic[i](0), apic[66](1) //------------- connect axon[3](0), axon[2](1) connect axon[4](0), axon[2](1) connect axon[5](0), axon[4](1) connect axon[6](0), axon[4](1) connect axon[7](0), axon[6](1) connect axon[8](0), axon[6](1) //----------- basic_shape() } proc shape3d_1() { soma {pt3dclear() pt3dadd(-0.458145, -15.6144, 0, 4.65492) pt3dadd(-0.27415, -13.8731, 0, 7.42025) pt3dadd(-0.0901553, -12.1318, 0, 10.94) pt3dadd(0.0938398, -10.3906, 0, 17.1554) pt3dadd(0.277835, -8.64929, 0, 21.3182) pt3dadd(0.46183, -6.90801, 0, 23.6881) pt3dadd(0.645825, -5.16673, 0, 24.0386) pt3dadd(0.82982, -3.42546, 0, 24.8989) pt3dadd(1.01382, -1.68418, 0, 23.8339) pt3dadd(1.19781, 0.0570966, 0, 23.0579) pt3dadd(1.38181, 1.79837, 0, 21.6736) pt3dadd(1.5658, 3.53965, 0, 19.6378) pt3dadd(1.7498, 5.28093, 0, 18.0403) pt3dadd(1.93379, 7.0222, 0, 16.106) pt3dadd(2.11779, 8.76348, 0, 14.3185) pt3dadd(2.30178, 10.5048, 0, 12.5175) pt3dadd(2.48578, 12.246, 0, 11.4555) pt3dadd(2.66977, 13.9873, 0, 10.5705) pt3dadd(2.85377, 15.7286, 0, 9.7451) pt3dadd(3.03776, 17.4699, 0, 7.81717) pt3dadd(3.22176, 19.2111, 0, 4.86879) } axon {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(-2.43, -14.71, 1.94, 4.22) pt3dadd(-2.43, -14.9, 1.94, 4.22) pt3dadd(-2.43, -16.3, 1.94, 4.03) pt3dadd(-2.49, -16.43, 1.94, 4.03) pt3dadd(-2.69, -16.75, 1.94, 4.03) pt3dadd(-2.94, -17.01, 1.94, 4.03) pt3dadd(-3.01, -17.07, 1.94, 4.03) pt3dadd(-3.01, -18.09, 1.94, 3.77) pt3dadd(-3.07, -18.41, 1.94, 3.77) pt3dadd(-3.13, -18.73, 1.94, 3.64) pt3dadd(-3.13, -20.27, 1.94, 3.26) pt3dadd(-3.2, -20.65, 1.94, 3.26) pt3dadd(-3.26, -20.97, 1.94, 3.26) pt3dadd(-3.26, -22.25, 1.94, 3.01) pt3dadd(-3.32, -22.51, 1.94, 3.01) pt3dadd(-3.39, -22.76, 1.94, 3.01) pt3dadd(-3.52, -23.02, 1.94, 3.01) pt3dadd(-3.71, -23.34, 1.94, 3.01) pt3dadd(-3.77, -23.66, 1.94, 3.01) pt3dadd(-3.77, -28.2, 1.94, 2.75) pt3dadd(-3.84, -28.26, 1.94, 2.75) pt3dadd(-3.9, -28.32, 1.94, 2.75) pt3dadd(-4.16, -29.35, 1.94, 2.56) pt3dadd(-4.16, -31.97, 1.94, 2.43) pt3dadd(-4.22, -32.16, 1.94, 2.43) pt3dadd(-4.28, -32.22, 1.94, 2.43) pt3dadd(-4.12, -33.8, 6.48, 2.11) pt3dadd(-4.12, -34.38, 6.48, 2.11) pt3dadd(-4.19, -34.83, 6.48, 2.11) pt3dadd(-4.19, -35.15, 6.48, 2.11) pt3dadd(-4.25, -35.53, 6.48, 2.11) pt3dadd(-4.25, -46.78, 6.48, 2.11) pt3dadd(-4.51, -48.7, 6.48, 1.85) pt3dadd(-4.51, -49.02, 6.48, 1.85) pt3dadd(-4.57, -49.34, 6.48, 1.85) pt3dadd(-4.7, -49.72, 6.48, 1.85) pt3dadd(-4.76, -50.11, 6.48, 1.85) pt3dadd(-4.95, -51.13, 6.48, 1.85) pt3dadd(-5.02, -52.47, 6.48, 1.85) pt3dadd(-5.08, -53.11, 6.48, 1.85) pt3dadd(-5.15, -53.37, 6.48, 1.85) pt3dadd(-5.15, -54.71, 6.48, 1.73) pt3dadd(-5.21, -55.22, 6.48, 1.73) pt3dadd(-5.34, -55.86, 6.48, 1.73) pt3dadd(-5.4, -56.63, 6.48, 1.73) pt3dadd(-5.47, -57.2, 6.48, 1.73) pt3dadd(-5.53, -57.84, 6.48, 1.73) pt3dadd(-5.53, -58.67, 6.48, 1.73) pt3dadd(-5.79, -60.02, 6.48, 1.73) pt3dadd(-5.91, -60.4, 6.48, 1.73) pt3dadd(-5.98, -60.46, 6.48, 1.73) pt3dadd(-6.05, -61.19, 6.48, 1.73) pt3dadd(-6.05, -63.75, 6.48, 1.73) pt3dadd(-6.18, -64.45, 6.48, 1.73) pt3dadd(-6.18, -65.28, 6.48, 1.73) pt3dadd(-6.24, -65.47, 6.48, 1.73) pt3dadd(-6.24, -66.5, 6.48, 1.73) pt3dadd(-6.31, -66.88, 6.48, 1.73) pt3dadd(-6.37, -67.2, 6.48, 1.73) pt3dadd(-6.43, -67.39, 6.48, 1.73) pt3dadd(-6.5, -67.52, 6.48, 1.73) pt3dadd(-6.56, -67.58, 6.48, 1.73) pt3dadd(-6.63, -67.71, 6.48, 1.73) pt3dadd(-6.69, -67.9, 6.48, 1.73) pt3dadd(-6.88, -68.09, 6.48, 1.73) pt3dadd(-7.07, -68.41, 6.48, 1.73) pt3dadd(-7.2, -68.61, 6.48, 1.73) pt3dadd(-7.33, -68.8, 6.48, 1.73) pt3dadd(-7.39, -68.99, 6.48, 1.73) pt3dadd(-7.46, -69.12, 6.48, 1.73) pt3dadd(-7.52, -69.24, 6.48, 1.73) pt3dadd(-7.65, -69.37, 6.48, 1.73) pt3dadd(-7.84, -69.56, 6.48, 1.73) pt3dadd(-7.97, -69.88, 6.48, 1.73) pt3dadd(-8.1, -70.08, 6.48, 1.73) pt3dadd(-8.16, -70.2, 6.48, 1.73) pt3dadd(-8.16, -70.52, 6.48, 1.73) pt3dadd(-8.22, -70.65, 6.48, 1.73) pt3dadd(-8.22, -71.16, 6.48, 1.73) pt3dadd(-8.29, -72.51, 6.48, 1.73) pt3dadd(-8.29, -72.95, 6.48, 1.73) pt3dadd(-8.22, -73.4, 6.48, 1.73) } my {pt3dclear() pt3dadd(-8.1, -73.98, 6.48, 1.73) pt3dadd(-7.91, -74.62, 6.48, 1.73) pt3dadd(-7.78, -75.06, 6.48, 1.73) pt3dadd(-7.71, -75.32, 6.48, 1.73) pt3dadd(-7.65, -75.57, 6.48, 1.73) pt3dadd(-7.46, -75.96, 6.48, 1.73) pt3dadd(-7.27, -76.28, 6.48, 1.73) pt3dadd(-7.07, -76.6, 6.48, 1.73) pt3dadd(-6.95, -77.11, 6.48, 1.73) pt3dadd(-6.88, -77.43, 6.48, 1.73) pt3dadd(-6.75, -77.88, 6.48, 1.73) pt3dadd(-6.75, -79.35, 6.48, 1.73) pt3dadd(-6.69, -80.24, 6.48, 1.73) pt3dadd(-6.56, -80.82, 6.48, 1.73) pt3dadd(-6.5, -81.39, 6.48, 1.73) pt3dadd(-6.24, -82.22, 6.48, 1.73) pt3dadd(-5.92, -83.44, 6.48, 1.73) pt3dadd(-5.86, -84.08, 6.48, 1.73) pt3dadd(-5.8, -84.59, 6.48, 1.73) pt3dadd(-5.8, -88.49, 6.48, 1.73) pt3dadd(-5.67, -89, 6.48, 1.73) pt3dadd(-5.67, -89.13, 6.48, 1.73) pt3dadd(-5.71, -89.1, 6.48, 1.73) pt3dadd(-5.71, -92.43, 6.48, 1.73) pt3dadd(-5.46, -93.13, 6.48, 1.73) pt3dadd(-5.4, -93.71, 6.48, 1.73) pt3dadd(-5.4, -96.01, 6.48, 1.73) pt3dadd(-5.33, -96.52, 6.48, 1.73) pt3dadd(-5.33, -97.42, 6.48, 1.53) pt3dadd(-5.27, -97.93, 6.48, 1.53) pt3dadd(-5.27, -99.01, 6.48, 1.34) pt3dadd(-5.14, -99.59, 6.48, 1.34) pt3dadd(-5.14, -101.25, 6.48, 1.34) pt3dadd(-5.01, -101.96, 6.48, 1.34) pt3dadd(-5.01, -104.32, 6.48, 1.34) pt3dadd(-4.76, -105.15, 6.48, 1.34) pt3dadd(-4.76, -110.2, 6.48, 1.34) pt3dadd(-4.82, -111.16, 6.48, 1.34) pt3dadd(-4.88, -111.93, 6.48, 1.34) pt3dadd(-4.95, -112.63, 6.48, 1.34) pt3dadd(-4.95, -113.4, 6.48, 1.34) pt3dadd(-5.01, -114.1, 6.48, 1.34) pt3dadd(-5.01, -117.36, 6.48, 1.34) pt3dadd(-4.8, -117.74, 6.48, 1.34) pt3dadd(-4.86, -117.93, 6.48, 1.34) pt3dadd(-4.99, -118.76, 6.48, 1.34) pt3dadd(-5.05, -119.21, 6.48, 1.34) pt3dadd(-5.11, -119.53, 6.48, 1.34) pt3dadd(-5.11, -120.11, 6.48, 1.34) pt3dadd(-5.18, -120.62, 6.48, 1.34) pt3dadd(-5.18, -131.04, 6.48, 1.34) pt3dadd(-5.5, -131.36, 6.48, 1.34) pt3dadd(-5.5, -136.41, 6.48, 1.34) pt3dadd(-5.63, -136.79, 6.48, 1.34) pt3dadd(-5.69, -137.05, 6.48, 1.34) pt3dadd(-5.95, -137.5, 6.48, 1.34) pt3dadd(-6.14, -138.26, 6.48, 1.34) pt3dadd(-6.2, -138.58, 6.48, 1.34) pt3dadd(-6.2, -142.74, 6.48, 1.34) pt3dadd(-6.14, -143.19, 6.48, 1.34) pt3dadd(-6.14, -146.45, 6.48, 1.34) pt3dadd(-6.25, -147.18, 11.01, 1.34) pt3dadd(-6.25, -149.03, 11.01, 1.34) pt3dadd(-6.19, -149.67, 11.01, 1.34) pt3dadd(-6.19, -156.45, 11.01, 1.34) pt3dadd(-6.06, -157.28, 11.01, 1.34) pt3dadd(-5.87, -157.92, 11.01, 1.34) pt3dadd(-5.87, -158.24, 11.01, 1.34) pt3dadd(-5.8, -158.69, 11.01, 1.34) pt3dadd(-5.68, -159.33, 11.01, 1.34) pt3dadd(-5.68, -159.9, 11.01, 1.34) pt3dadd(-5.42, -160.73, 9.72, 1.34) pt3dadd(-5.42, -166.23, 9.72, 1.34) pt3dadd(-5.16, -167.64, 9.72, 1.34) pt3dadd(-5.1, -168.28, 9.72, 1.34) pt3dadd(-4.84, -168.98, 9.72, 1.34) pt3dadd(-4.65, -169.69, 9.72, 1.34) pt3dadd(-4.52, -170.39, 9.72, 1.34) pt3dadd(-4.46, -171.16, 9.72, 1.34) pt3dadd(-4.46, -174.93, 9.72, 1.34) pt3dadd(-4.28, -175.84, -0.97, 1.34) pt3dadd(-4.28, -179.29, -0.97, 1.34) pt3dadd(-4.15, -179.74, -0.97, 1.34) pt3dadd(-3.83, -180.31, -0.97, 1.34) pt3dadd(-3.83, -181.72, -0.97, 1.34) pt3dadd(-3.76, -181.91, -0.97, 1.34) pt3dadd(-3.7, -182.04, -0.97, 1.34) pt3dadd(-3.38, -182.61, -0.97, 1.34) pt3dadd(-3.25, -183, -0.97, 1.34) pt3dadd(-3.12, -183.32, -0.97, 1.34) pt3dadd(-3.12, -183.51, -0.97, 1.34) } my[1] {pt3dclear() pt3dadd(-3.12, -183.51, -0.97, 1.34) pt3dadd(-3.12, -184.34, -0.97, 1.34) pt3dadd(-3.19, -184.47, -0.97, 1.34) pt3dadd(-3.32, -184.79, -0.97, 1.34) pt3dadd(-3.38, -185.43, -0.97, 1.34) } } proc shape3d_2() { my[1] { pt3dadd(-3.44, -186, -0.97, 1.34) pt3dadd(-3.51, -186.64, -0.97, 1.34) pt3dadd(-3.51, -191.18, -0.97, 1.34) pt3dadd(-3.96, -193.1, -0.97, 1.34) pt3dadd(-4.08, -193.55, -0.97, 1.34) pt3dadd(-4.08, -194.12, -0.97, 1.34) pt3dadd(-4.15, -194.57, -0.97, 1.34) pt3dadd(-4.15, -194.83, -0.97, 1.34) pt3dadd(-4.21, -195.98, 10.15, 1.34) pt3dadd(-4.34, -197.06, 10.15, 1.34) pt3dadd(-4.4, -197.7, 10.15, 1.34) pt3dadd(-4.4, -198.41, 10.15, 1.34) pt3dadd(-4.47, -199.43, 10.15, 1.34) pt3dadd(-4.47, -202.11, 10.15, 1.34) pt3dadd(-4.34, -202.88, 10.15, 1.34) pt3dadd(-4.21, -203.39, 10.15, 1.34) pt3dadd(-4.21, -203.84, 10.15, 1.34) pt3dadd(-3.84, -204.32, 5.18, 1.34) pt3dadd(-3.9, -204.83, 5.18, 1.34) pt3dadd(-3.9, -216.59, 5.18, 1.34) } my[2] {pt3dclear() pt3dadd(-3.9, -216.59, 5.18, 1.34) pt3dadd(-4.35, -217.55, 5.18, 1.34) pt3dadd(-4.48, -217.81, 5.18, 1.34) pt3dadd(-4.67, -218.45, 5.18, 1.34) pt3dadd(-4.67, -225.35, 5.18, 1.34) pt3dadd(-4.99, -226.95, 5.18, 1.34) pt3dadd(-5.18, -227.78, 5.18, 1.34) pt3dadd(-5.69, -229.44, 5.18, 1.34) pt3dadd(-5.89, -230.15, 5.18, 1.34) pt3dadd(-6.08, -230.85, 5.18, 1.34) pt3dadd(-6.33, -231.43, 5.18, 1.34) pt3dadd(-6.52, -232.06, 5.18, 1.34) pt3dadd(-6.78, -233.22, 5.18, 1.34) pt3dadd(-6.84, -233.34, 5.18, 1.34) pt3dadd(-6.7, -234.3, 5.18, 1.34) pt3dadd(-6.7, -239.54, 5.18, 1.34) pt3dadd(-6.82, -240.25, 5.18, 1.34) pt3dadd(-6.89, -240.57, 5.18, 1.34) pt3dadd(-7.01, -240.89, 5.18, 1.34) pt3dadd(-7.14, -241.46, 5.18, 1.34) pt3dadd(-7.33, -242.1, 5.18, 1.34) pt3dadd(-7.65, -243.57, 5.18, 1.34) pt3dadd(-7.72, -243.95, 5.18, 1.34) pt3dadd(-7.78, -244.4, 5.18, 1.34) pt3dadd(-7.85, -244.79, 5.18, 1.34) pt3dadd(-7.91, -245.3, 5.18, 1.34) pt3dadd(-8.04, -246.13, 5.18, 1.34) pt3dadd(-8.49, -247.73, 5.18, 1.34) pt3dadd(-9, -249.45, 5.18, 1.34) pt3dadd(-9.38, -250.54, 5.18, 1.34) pt3dadd(-9.57, -251.24, 5.18, 1.34) pt3dadd(-9.76, -252.01, 5.18, 1.34) pt3dadd(-10.02, -253.35, 5.18, 1.34) pt3dadd(-10.4, -255.46, 5.18, 1.34) pt3dadd(-10.66, -256.81, 5.18, 1.34) pt3dadd(-10.85, -258.02, 5.18, 1.34) pt3dadd(-11.04, -259.43, 5.18, 1.34) pt3dadd(-11.3, -260.51, 5.18, 1.34) pt3dadd(-11.43, -261.28, 5.18, 1.34) pt3dadd(-11.55, -261.92, 5.18, 1.34) pt3dadd(-11.68, -262.37, 5.18, 1.34) pt3dadd(-11.81, -262.69, 5.18, 1.34) pt3dadd(-11.87, -262.75, 5.18, 1.34) pt3dadd(-11.87, -262.82, 5.18, 1.34) pt3dadd(-11.8, -263.03, 6.15, 1.34) pt3dadd(-11.86, -263.22, 6.15, 1.34) pt3dadd(-12.05, -264.89, 6.15, 1.34) pt3dadd(-12.24, -265.85, 6.15, 1.34) pt3dadd(-12.31, -266.49, 6.15, 1.34) pt3dadd(-12.63, -267.83, 6.15, 1.34) pt3dadd(-12.82, -268.79, 6.15, 1.34) pt3dadd(-13.07, -269.62, 6.15, 1.34) pt3dadd(-13.39, -271.28, 6.15, 1.34) pt3dadd(-13.84, -273.2, 6.15, 1.34) pt3dadd(-14.35, -274.73, 6.15, 1.34) pt3dadd(-14.74, -275.76, 6.15, 1.34) pt3dadd(-15.44, -277.29, 6.15, 1.34) } my[3] {pt3dclear() pt3dadd(-15.89, -277.99, 6.15, 1.34) pt3dadd(-16.59, -279.53, 6.15, 1.34) pt3dadd(-16.85, -280.3, 6.15, 1.34) pt3dadd(-17.23, -281.25, 6.15, 1.34) pt3dadd(-17.61, -282.21, 6.15, 1.34) pt3dadd(-18.32, -283.81, 6.15, 1.34) pt3dadd(-18.7, -284.64, 6.15, 1.34) pt3dadd(-19.21, -285.86, 6.15, 1.34) pt3dadd(-19.66, -286.82, 6.15, 1.34) pt3dadd(-20.17, -287.97, 6.15, 1.34) pt3dadd(-20.49, -288.61, 6.15, 1.34) pt3dadd(-20.87, -290.01, 6.15, 1.34) pt3dadd(-20.94, -290.59, 6.15, 1.34) pt3dadd(-21, -290.97, 6.15, 1.34) pt3dadd(-21, -291.48, 6.15, 1.34) pt3dadd(-21.07, -291.48, 6.15, 1.34) pt3dadd(-21.19, -292.18, 7.77, 1.34) pt3dadd(-21.19, -294.55, 7.77, 1.34) pt3dadd(-21.25, -295.06, 7.77, 1.34) pt3dadd(-21.38, -295.63, 7.77, 1.34) pt3dadd(-21.63, -295.89, 7.77, 1.34) pt3dadd(-21.7, -296.53, 7.77, 1.34) pt3dadd(-21.89, -297.23, 7.77, 1.34) pt3dadd(-22.08, -298.38, 7.77, 1.34) pt3dadd(-22.21, -299.02, 7.77, 1.34) pt3dadd(-22.4, -300.3, 7.77, 1.34) pt3dadd(-22.59, -301.39, 7.77, 1.34) pt3dadd(-22.72, -302.73, 7.77, 1.34) pt3dadd(-23.11, -304.39, 7.77, 1.34) pt3dadd(-23.74, -307.14, 7.77, 1.34) pt3dadd(-24.26, -309.06, 7.77, 1.34) pt3dadd(-24.77, -310.66, 7.77, 1.34) pt3dadd(-25.02, -311.94, 7.77, 1.34) pt3dadd(-25.15, -313.02, 7.77, 1.34) pt3dadd(-25.22, -313.92, 7.77, 1.34) pt3dadd(-25.34, -315.2, 7.77, 1.34) pt3dadd(-25.41, -316.16, 7.77, 1.34) pt3dadd(-25.47, -316.92, 7.77, 1.34) pt3dadd(-25.53, -317.76, 7.77, 1.34) pt3dadd(-25.73, -319.42, 7.77, 1.34) pt3dadd(-25.73, -320.25, 7.77, 1.34) pt3dadd(-25.79, -320.5, 7.77, 1.34) pt3dadd(-25.79, -320.63, 7.77, 1.34) pt3dadd(-25.5, -321.05, 17.17, 1.34) pt3dadd(-25.63, -321.12, 17.17, 1.34) pt3dadd(-25.89, -322.33, 17.17, 1.34) pt3dadd(-26.08, -324.12, 17.17, 1.34) pt3dadd(-26.27, -325.27, 17.17, 1.34) pt3dadd(-26.4, -326.04, 17.17, 1.34) pt3dadd(-26.46, -326.36, 17.17, 1.34) pt3dadd(-26.53, -327.25, 17.17, 1.34) pt3dadd(-26.53, -329.49, 17.17, 1.34) pt3dadd(-26.59, -330.71, 17.17, 1.34) pt3dadd(-26.59, -331.41, 17.17, 1.34) pt3dadd(-26.72, -332.24, 16.41, 1.34) pt3dadd(-26.97, -333.26, 15.44, 1.34) pt3dadd(-27.36, -334.61, 15.44, 1.34) pt3dadd(-27.74, -335.44, 14.14, 1.34) pt3dadd(-28.32, -336.72, 12.74, 1.34) pt3dadd(-28.57, -337.74, 12.74, 1.34) pt3dadd(-28.76, -338.95, 12.2, 1.34) pt3dadd(-28.96, -340.43, 12.2, 1.34) pt3dadd(-29.21, -343.49, 12.2, 1.34) pt3dadd(-29.47, -344.65, 12.2, 1.34) pt3dadd(-29.79, -345.73, 12.2, 1.34) pt3dadd(-30.17, -346.95, 12.2, 1.34) pt3dadd(-30.43, -348.8, 12.2, 1.34) pt3dadd(-30.55, -349.76, 12.2, 1.34) pt3dadd(-30.62, -350.46, 12.2, 1.34) pt3dadd(-30.68, -350.72, 12.2, 1.34) pt3dadd(-30.79, -351.29, -2.7, 1.34) pt3dadd(-30.79, -352.31, -2.7, 1.34) pt3dadd(-30.98, -353.97, -2.7, 1.34) pt3dadd(-31.04, -355.64, -2.7, 1.34) pt3dadd(-31.11, -356.72, -2.7, 1.34) } my[4] {pt3dclear() pt3dadd(-31.23, -357.62, -2.7, 1.34) pt3dadd(-31.23, -358.83, -2.7, 1.34) pt3dadd(-31.3, -359.79, -2.7, 1.34) pt3dadd(-31.3, -362.54, -2.7, 1.34) pt3dadd(-31.55, -363.88, -2.7, 1.34) pt3dadd(-31.87, -365.16, -2.7, 1.34) pt3dadd(-32.13, -366.38, -2.7, 1.34) pt3dadd(-32.39, -368.23, -2.7, 1.34) pt3dadd(-32.45, -369.19, -2.7, 1.34) pt3dadd(-32.77, -372, -2.7, 1.34) pt3dadd(-32.96, -373.73, -2.7, 1.34) pt3dadd(-33.15, -374.95, -2.7, 1.34) pt3dadd(-33.34, -376.16, -2.7, 1.34) pt3dadd(-33.47, -377.06, -2.7, 1.34) pt3dadd(-33.73, -378.14, -2.7, 1.34) pt3dadd(-34.05, -379.55, -2.7, 1.34) pt3dadd(-34.24, -380.44, -2.7, 1.34) pt3dadd(-34.37, -381.02, -2.7, 1.34) pt3dadd(-34.43, -381.27, -2.7, 1.34) pt3dadd(-34.77, -381.76, -10.91, 1.34) pt3dadd(-34.9, -381.89, -10.91, 1.34) pt3dadd(-35.22, -382.34, -10.91, 1.34) pt3dadd(-35.6, -382.98, -10.91, 1.34) pt3dadd(-36.18, -383.81, -10.91, 1.34) pt3dadd(-36.43, -384.32, -10.91, 1.34) pt3dadd(-36.82, -384.89, -10.91, 1.34) pt3dadd(-37.01, -385.34, -10.91, 1.34) pt3dadd(-37.26, -386.11, -10.91, 1.34) pt3dadd(-37.39, -386.75, -10.91, 1.34) pt3dadd(-37.52, -387.71, -12.2, 1.34) pt3dadd(-37.65, -388.86, -12.52, 1.34) pt3dadd(-37.65, -388.99, -12.85, 1.34) pt3dadd(-37.78, -389.75, -12.85, 1.34) pt3dadd(-37.84, -390.14, -12.85, 1.34) pt3dadd(-37.9, -390.65, -12.85, 1.34) pt3dadd(-38.03, -391.1, -12.85, 1.34) pt3dadd(-38.03, -391.61, -12.85, 1.34) pt3dadd(-38.1, -392.37, -12.85, 1.34) pt3dadd(-38.1, -393.01, -12.85, 1.34) pt3dadd(-38.22, -393.97, -12.85, 1.34) pt3dadd(-38.29, -395.19, -12.85, 1.34) pt3dadd(-38.35, -396.27, -12.85, 1.34) pt3dadd(-38.35, -402.03, -12.85, 1.34) pt3dadd(-38.48, -403.37, -12.85, 1.34) pt3dadd(-38.54, -404.59, -12.85, 1.34) pt3dadd(-38.61, -405.55, -12.85, 1.34) pt3dadd(-38.67, -406.25, -12.85, 1.34) pt3dadd(-38.73, -407.14, -12.85, 1.34) } } proc shape3d_3() { my[4] { pt3dadd(-38.8, -407.78, -12.85, 1.34) pt3dadd(-39.05, -409.13, -12.85, 1.34) pt3dadd(-39.25, -410.02, -12.85, 1.34) pt3dadd(-39.44, -410.66, -12.85, 1.34) pt3dadd(-39.89, -411.68, -12.85, 1.34) pt3dadd(-40.08, -412.19, -12.85, 1.34) pt3dadd(-40.14, -412.32, -12.85, 1.34) pt3dadd(-40.2, -412.34, -20.62, 1.34) pt3dadd(-40.26, -412.53, -22.13, 1.34) pt3dadd(-40.64, -413.62, -22.13, 1.34) pt3dadd(-40.83, -414.58, -22.13, 1.34) pt3dadd(-40.83, -416.88, -21.49, 1.34) pt3dadd(-40.96, -417.52, -21.49, 1.34) pt3dadd(-41.15, -418.35, -17.82, 1.34) pt3dadd(-41.28, -419.05, -17.82, 1.34) pt3dadd(-41.47, -419.76, -17.49, 1.34) pt3dadd(-41.73, -420.84, -17.49, 1.34) pt3dadd(-41.92, -421.74, -17.49, 1.34) pt3dadd(-42.18, -422.89, -17.49, 1.34) pt3dadd(-42.56, -424.17, -16.74, 1.34) pt3dadd(-43.26, -426.66, -16.63, 1.34) pt3dadd(-44.16, -430.05, -16.63, 1.34) pt3dadd(-44.48, -432.35, -16.63, 1.34) pt3dadd(-44.61, -433.57, -16.63, 1.34) pt3dadd(-44.67, -434.34, -16.63, 1.34) pt3dadd(-44.73, -435.17, -16.63, 1.34) pt3dadd(-44.73, -436.83, -16.63, 1.34) pt3dadd(-44.86, -437.98, -16.63, 1.34) pt3dadd(-45.12, -438.94, -16.63, 1.34) pt3dadd(-45.44, -440.54, -16.63, 1.34) } my[5] {pt3dclear() pt3dadd(-45.44, -441.37, -16.63, 1.34) pt3dadd(-45.5, -441.75, -16.63, 1.34) pt3dadd(-45.5, -442.01, -16.63, 1.34) pt3dadd(-45.71, -442.33, -25.05, 1.34) pt3dadd(-45.91, -442.46, -25.05, 1.34) pt3dadd(-46.29, -443.1, -25.05, 1.34) pt3dadd(-46.87, -444.7, -25.05, 1.34) pt3dadd(-47.31, -446.17, -25.05, 1.34) pt3dadd(-47.7, -448.02, -25.05, 1.34) pt3dadd(-47.95, -449.62, -25.05, 1.34) pt3dadd(-48.14, -451.16, -25.05, 1.34) pt3dadd(-48.21, -452.31, -25.05, 1.34) pt3dadd(-48.27, -453.65, -25.05, 1.34) pt3dadd(-48.34, -455.18, -25.05, 1.34) pt3dadd(-48.34, -457.1, -25.05, 1.34) pt3dadd(-48.4, -458.38, -25.05, 1.34) pt3dadd(-48.85, -461.32, -25.05, 1.34) pt3dadd(-49.23, -462.66, -25.05, 1.34) pt3dadd(-49.62, -463.82, -25.05, 1.34) pt3dadd(-49.93, -464.71, -25.05, 1.34) pt3dadd(-50.38, -465.99, -25.05, 1.34) pt3dadd(-50.83, -467.72, -25.05, 1.34) pt3dadd(-51.09, -469.38, -25.05, 1.34) pt3dadd(-51.15, -470.27, -25.05, 1.34) pt3dadd(-51.21, -470.72, -25.05, 1.34) pt3dadd(-51.28, -470.85, -25.05, 1.34) pt3dadd(-51.28, -470.91, -25.05, 1.34) pt3dadd(-51.22, -470.73, -19.44, 1.34) pt3dadd(-51.29, -470.79, -18.57, 1.34) pt3dadd(-51.41, -471.3, -18.36, 1.34) pt3dadd(-51.67, -472.14, -18.36, 1.34) pt3dadd(-51.93, -472.97, -17.82, 1.34) pt3dadd(-52.05, -473.93, -17.82, 1.34) pt3dadd(-52.25, -475.01, -17.82, 1.34) pt3dadd(-52.5, -476.68, -17.82, 1.34) pt3dadd(-52.76, -478.27, -17.82, 1.34) pt3dadd(-52.82, -479.94, -17.82, 1.34) pt3dadd(-52.82, -482.88, -17.82, 1.34) pt3dadd(-53.01, -484.41, -17.82, 1.34) pt3dadd(-53.08, -487.03, -17.82, 1.34) pt3dadd(-53.4, -488.82, -17.82, 1.34) pt3dadd(-53.72, -490.04, -17.82, 1.34) pt3dadd(-54.1, -491.19, -17.82, 1.34) pt3dadd(-54.29, -492.08, -17.82, 1.34) pt3dadd(-54.42, -492.92, -17.82, 1.34) pt3dadd(-54.55, -494.13, -17.82, 1.34) } my[6] {pt3dclear() pt3dadd(-54.55, -499.37, -17.82, 1.34) pt3dadd(-54.59, -499.96, -12.63, 1.34) pt3dadd(-54.59, -502.65, -12.63, 1.34) pt3dadd(-54.65, -503.6, -12.63, 1.34) pt3dadd(-54.84, -505.2, -12.63, 1.34) pt3dadd(-55.03, -507.12, -12.63, 1.34) pt3dadd(-55.29, -508.78, -12.63, 1.34) pt3dadd(-55.8, -511.41, -12.63, 1.34) pt3dadd(-56.25, -512.81, -12.63, 1.34) pt3dadd(-56.63, -514.03, -12.63, 1.34) pt3dadd(-57.21, -516.26, -12.63, 1.34) pt3dadd(-57.34, -517.8, -12.63, 1.34) pt3dadd(-57.4, -518.69, -12.63, 1.34) pt3dadd(-57.4, -525.15, -12.63, 1.34) pt3dadd(-57.46, -525.54, -12.63, 1.34) pt3dadd(-58.04, -527.07, -12.63, 1.34) pt3dadd(-58.23, -527.9, -12.63, 1.34) pt3dadd(-58.23, -528.22, -12.63, 1.34) pt3dadd(-58.3, -528.28, -12.63, 1.34) pt3dadd(-58.3, -528.48, -12.63, 1.34) pt3dadd(-58.77, -528.8, -12.63, 1.34) pt3dadd(-58.77, -529.12, -12.63, 1.34) pt3dadd(-59.09, -530.46, -12.63, 1.34) pt3dadd(-59.35, -531.48, -12.63, 1.34) pt3dadd(-59.6, -532.25, -12.63, 1.34) pt3dadd(-59.99, -533.66, -12.63, 1.34) pt3dadd(-60.31, -535, -12.63, 1.34) pt3dadd(-60.69, -536.79, -12.63, 1.34) pt3dadd(-60.75, -537.94, -12.63, 1.34) pt3dadd(-60.75, -542.22, -12.63, 1.34) pt3dadd(-60.82, -543.76, -12.63, 1.34) pt3dadd(-61.07, -545.74, -12.63, 1.34) pt3dadd(-61.33, -547.27, -12.63, 1.34) pt3dadd(-61.46, -548.81, -12.63, 1.34) pt3dadd(-61.58, -549.7, -12.63, 1.34) pt3dadd(-62.03, -551.56, -12.63, 1.34) pt3dadd(-62.29, -552.77, -12.63, 1.34) pt3dadd(-62.61, -554.05, -12.63, 1.34) pt3dadd(-62.73, -554.88, -12.63, 1.34) pt3dadd(-62.8, -555.52, -12.63, 1.34) pt3dadd(-62.8, -557.89, -12.63, 1.34) } my[7] {pt3dclear() pt3dadd(-62.82, -558.9, -12.63, 1.34) pt3dadd(-63.01, -559.03, -12.63, 1.34) pt3dadd(-63.4, -559.67, -12.63, 1.34) pt3dadd(-64.1, -561.65, -12.63, 1.34) pt3dadd(-64.81, -563.63, -12.63, 1.34) pt3dadd(-65.38, -565.93, -12.63, 1.34) pt3dadd(-65.76, -567.28, -12.42, 1.34) pt3dadd(-66.21, -568.62, -11.88, 1.34) pt3dadd(-66.72, -570.34, -11.88, 1.34) pt3dadd(-67.17, -572.13, -10.91, 1.34) pt3dadd(-67.68, -573.86, -10.26, 1.34) pt3dadd(-67.81, -574.5, -9.61, 1.34) pt3dadd(-68, -575.14, -9.61, 1.34) pt3dadd(-68.13, -575.72, -9.18, 1.34) pt3dadd(-68.19, -576.48, -9.18, 1.34) pt3dadd(-68.19, -577.63, -8.96, 1.34) pt3dadd(-68.26, -579.23, -8.42, 1.34) pt3dadd(-68.32, -580.7, -8.1, 1.34) pt3dadd(-68.32, -583.58, -6.91, 1.34) pt3dadd(-68.45, -584.35, -6.59, 1.34) pt3dadd(-68.64, -585.11, -6.59, 1.34) pt3dadd(-68.71, -585.56, -6.59, 1.34) pt3dadd(-68.71, -586.97, -6.48, 1.34) pt3dadd(-69.65, -587.94, 3.46, 1.34) pt3dadd(-69.72, -588.2, 3.46, 1.34) pt3dadd(-69.72, -590.12, 3.46, 1.34) pt3dadd(-70.1, -592.16, 3.46, 1.34) pt3dadd(-70.29, -593.76, 3.46, 1.34) pt3dadd(-70.36, -594.85, 3.46, 1.34) pt3dadd(-70.36, -597.73, 3.46, 1.34) pt3dadd(-70.61, -599.45, 3.46, 1.34) pt3dadd(-70.93, -601.12, 3.46, 1.34) pt3dadd(-71.44, -603.23, 3.46, 1.34) pt3dadd(-71.83, -605.08, 3.46, 1.34) pt3dadd(-72.02, -606.68, 3.46, 1.34) pt3dadd(-72.28, -609.17, 3.46, 1.34) pt3dadd(-72.34, -610.26, 3.46, 1.34) pt3dadd(-72.4, -611.03, 3.46, 1.34) pt3dadd(-72.53, -611.86, 3.46, 1.34) pt3dadd(-72.6, -612.82, 3.46, 1.34) pt3dadd(-72.79, -613.77, 3.46, 1.34) pt3dadd(-73.04, -614.48, 3.46, 1.34) pt3dadd(-73.62, -615.69, 3.46, 1.34) pt3dadd(-73.81, -616.27, 3.46, 1.34) pt3dadd(-73.87, -616.4, 3.46, 1.34) pt3dadd(-74.4, -617.09, 13.82, 1.34) pt3dadd(-74.4, -617.86, 13.82, 1.34) pt3dadd(-74.46, -619.39, 13.82, 1.34) pt3dadd(-74.65, -622.2, 13.82, 1.34) pt3dadd(-74.65, -633.2, 13.82, 1.34) pt3dadd(-74.91, -635.37, 13.82, 1.34) pt3dadd(-75.23, -637.1, 13.82, 1.34) } my[8] {pt3dclear() pt3dadd(-75.42, -638.95, 13.82, 1.34) pt3dadd(-75.49, -640.04, 13.82, 1.34) pt3dadd(-75.61, -641.19, 13.82, 1.34) pt3dadd(-75.93, -642.47, 13.82, 1.34) pt3dadd(-76.32, -643.56, 13.82, 1.34) pt3dadd(-76.44, -644.58, 13.82, 1.34) pt3dadd(-76.51, -645.22, 13.82, 1.34) pt3dadd(-76.57, -645.8, 13.82, 1.34) pt3dadd(-76.64, -646.18, 13.82, 1.34) pt3dadd(-76.7, -646.37, 13.82, 1.34) pt3dadd(-76.7, -646.44, 13.82, 1.34) pt3dadd(-76.68, -647.3, 4.75, 1.34) pt3dadd(-76.87, -648.77, 4.75, 1.34) pt3dadd(-77.44, -651.2, 4.75, 1.34) pt3dadd(-77.76, -652.35, 4.75, 1.34) pt3dadd(-78.02, -654.14, 4.75, 1.34) pt3dadd(-78.15, -656.25, 4.75, 1.34) pt3dadd(-78.15, -662.77, 4.75, 1.34) pt3dadd(-78.27, -664.5, 4.75, 1.34) pt3dadd(-78.72, -666.74, 4.75, 1.34) pt3dadd(-78.98, -667.89, 4.75, 1.34) pt3dadd(-79.36, -669.55, 4.75, 1.34) pt3dadd(-79.94, -670.96, 4.75, 1.34) pt3dadd(-80.13, -672.3, 4.75, 1.34) pt3dadd(-80.19, -673.77, 4.75, 1.34) pt3dadd(-80.32, -675.24, 4.75, 1.34) pt3dadd(-80.38, -675.56, 4.75, 1.34) pt3dadd(-80.45, -675.69, 4.75, 1.34) pt3dadd(-80.45, -676.07, 4.75, 1.34) pt3dadd(-80.13, -676.4, -12.2, 1.34) pt3dadd(-80.13, -676.59, -12.2, 1.34) } } proc shape3d_4() { my[8] { pt3dadd(-80.45, -677.16, -12.2, 1.34) pt3dadd(-81.47, -679.27, -12.2, 1.34) pt3dadd(-82.69, -682.53, -12.2, 1.34) pt3dadd(-83.26, -684.39, -12.2, 1.34) pt3dadd(-83.97, -687.52, -12.2, 1.34) pt3dadd(-84.1, -689.38, -12.2, 1.34) pt3dadd(-84.22, -690.65, -12.2, 1.34) pt3dadd(-84.42, -691.61, -12.2, 1.34) pt3dadd(-84.54, -692.76, -12.2, 1.34) pt3dadd(-84.73, -693.6, -12.2, 1.34) } my[9] {pt3dclear() pt3dadd(-85.25, -694.81, -12.2, 1.34) pt3dadd(-85.69, -695.9, -12.2, 1.34) pt3dadd(-86.14, -696.66, -12.2, 1.34) pt3dadd(-86.53, -697.24, -12.2, 1.34) pt3dadd(-86.91, -698.01, -12.2, 1.34) pt3dadd(-87.29, -698.97, -12.2, 1.34) pt3dadd(-87.55, -700.31, -12.2, 1.34) pt3dadd(-87.8, -701.52, -12.2, 1.34) pt3dadd(-87.93, -702.67, -12.2, 1.34) pt3dadd(-88.19, -703.63, -12.2, 1.34) pt3dadd(-88.76, -705.04, -12.2, 1.34) pt3dadd(-89.08, -706, -12.2, 1.34) pt3dadd(-89.47, -706.96, -12.2, 1.34) pt3dadd(-89.91, -707.92, -12.2, 1.34) pt3dadd(-90.04, -708.17, -12.2, 1.34) pt3dadd(-90.02, -708.84, -20.73, 1.34) pt3dadd(-90.15, -708.91, -20.62, 1.34) pt3dadd(-90.41, -709.42, -20.62, 1.34) pt3dadd(-90.73, -710.95, -20.62, 1.34) pt3dadd(-91.24, -713.26, -20.62, 1.34) pt3dadd(-91.69, -716.01, -20.62, 1.34) pt3dadd(-92.01, -719.01, -20.62, 1.34) pt3dadd(-92.45, -722.72, -20.62, 1.34) pt3dadd(-93.22, -726.36, -20.62, 1.34) pt3dadd(-93.8, -729.82, -20.62, 1.34) pt3dadd(-94.05, -731.73, -20.62, 1.34) pt3dadd(-94.24, -733.65, -20.62, 1.34) pt3dadd(-94.24, -735.89, -20.62, 1.34) pt3dadd(-94.31, -736.85, -20.62, 1.34) pt3dadd(-94.5, -737.94, -20.62, 1.34) pt3dadd(-94.56, -738.64, -20.62, 1.34) pt3dadd(-94.75, -739.09, -20.62, 1.34) pt3dadd(-95.01, -739.6, -20.62, 1.34) pt3dadd(-95.14, -739.85, -20.62, 1.34) } axon[1] {pt3dclear() pt3dadd(-3.9, -216.59, 5.18, 0.83) pt3dadd(-3.9, -216.62, -4.53, 0.83) pt3dadd(-3.83, -217.13, -4.53, 0.83) pt3dadd(-3.7, -218.03, -4.53, 0.83) pt3dadd(-3.45, -218.54, -4.53, 0.83) pt3dadd(-3.32, -218.86, -4.53, 0.83) pt3dadd(-3.06, -219.05, -4.53, 0.83) pt3dadd(-2.74, -219.18, -4.53, 0.83) pt3dadd(-0.19, -219.18, -4.53, 0.83) pt3dadd(0.2, -219.05, -4.53, 0.83) pt3dadd(0.84, -218.73, -4, 0.83) pt3dadd(1.03, -218.6, -4, 0.83) pt3dadd(1.03, -218.48, -2.48, 0.83) pt3dadd(1.09, -218.41, 13.17, 0.83) pt3dadd(1.6, -218.09, 13.17, 0.83) pt3dadd(2.18, -217.71, 13.17, 0.83) pt3dadd(2.63, -217.45, 13.17, 0.83) pt3dadd(3.14, -217.26, 13.17, 0.83) pt3dadd(4.29, -217.2, 13.17, 0.83) pt3dadd(5.25, -217.2, 13.17, 0.83) pt3dadd(6.27, -217.32, 13.17, 0.83) pt3dadd(7.04, -217.45, 13.17, 0.83) pt3dadd(8.06, -217.77, 13.17, 0.83) pt3dadd(9.34, -218.28, 13.17, 0.83) pt3dadd(10.24, -218.48, 13.17, 0.83) pt3dadd(10.81, -218.73, 13.17, 0.83) pt3dadd(11.58, -219.18, 13.17, 0.83) pt3dadd(11.9, -219.24, 14.47, 0.83) pt3dadd(12.28, -219.24, 15.55, 0.83) pt3dadd(13.11, -219.43, 18.03, 0.83) pt3dadd(13.3, -219.43, 18.03, 0.83) } axon[2] {pt3dclear() pt3dadd(-3.12, -183.51, -0.97, 0.83) pt3dadd(-3.08, -182.56, -0.86, 0.83) pt3dadd(-3.08, -180.39, -0.86, 0.83) pt3dadd(-2.95, -179.94, -0.86, 0.83) pt3dadd(-2.95, -179.43, -0.86, 0.83) pt3dadd(-2.69, -179.11, -0.86, 0.83) pt3dadd(-2.31, -178.73, -0.86, 0.83) pt3dadd(-1.8, -178.34, -0.86, 0.83) pt3dadd(-1.35, -178.15, -0.86, 0.83) pt3dadd(-0.52, -178.15, -0.86, 0.83) pt3dadd(0.38, -178.66, -0.86, 0.83) pt3dadd(0.89, -178.92, -0.86, 0.83) pt3dadd(1.59, -179.62, -0.86, 0.83) pt3dadd(2.3, -180.32, -0.86, 0.83) pt3dadd(2.74, -180.64, -0.86, 0.83) pt3dadd(3.06, -180.96, -0.86, 0.83) pt3dadd(3.64, -181.48, -0.86, 0.83) pt3dadd(3.96, -181.6, -0.86, 0.83) pt3dadd(4.34, -181.67, -0.86, 0.83) pt3dadd(5.11, -181.67, -0.86, 0.83) pt3dadd(5.56, -181.35, -0.86, 0.83) pt3dadd(6.07, -180.96, -0.86, 0.83) pt3dadd(6.52, -180.58, -0.86, 0.83) pt3dadd(6.84, -180.13, -0.86, 0.83) pt3dadd(7.28, -179.49, -0.86, 0.83) pt3dadd(7.6, -178.98, -0.86, 0.83) pt3dadd(7.6, -178.66, -0.86, 0.83) pt3dadd(7.73, -178.41, -0.86, 0.83) pt3dadd(7.79, -178.09, -0.86, 0.83) pt3dadd(7.92, -177.77, -0.86, 0.83) pt3dadd(8.24, -177.32, -0.86, 0.83) pt3dadd(8.43, -176.94, -0.86, 0.83) pt3dadd(8.63, -176.62, -0.86, 0.83) pt3dadd(9.2, -176.23, -0.86, 0.83) pt3dadd(9.65, -175.78, -0.86, 0.83) pt3dadd(10.29, -175.46, -0.86, 0.83) pt3dadd(10.67, -175.27, -0.86, 0.83) pt3dadd(11.06, -175.08, -0.86, 0.83) pt3dadd(11.5, -174.83, -0.86, 0.83) pt3dadd(11.63, -174.76, -0.86, 0.83) } axon[3] {pt3dclear() pt3dadd(11.63, -174.76, -0.86, 0.77) pt3dadd(13.04, -174.83, -0.86, 0.77) pt3dadd(13.48, -174.83, -0.86, 0.77) pt3dadd(14.32, -174.63, -0.86, 0.77) pt3dadd(15.53, -174.19, -0.86, 0.77) pt3dadd(16.17, -174.12, -0.86, 0.77) pt3dadd(16.87, -174.38, -0.86, 0.77) pt3dadd(17.58, -174.38, -0.86, 0.77) pt3dadd(18.47, -174.44, -0.86, 0.77) pt3dadd(19.37, -174.44, -6.59, 0.77) pt3dadd(20.71, -174.7, -6.59, 0.77) pt3dadd(21.16, -174.7, -6.59, 0.77) pt3dadd(21.8, -174.44, -6.59, 0.77) pt3dadd(22.56, -174.12, -6.59, 0.77) pt3dadd(23.52, -173.61, -6.59, 0.77) pt3dadd(24.1, -173.36, -6.59, 0.77) pt3dadd(24.8, -173.29, -6.59, 0.77) pt3dadd(26.02, -173.16, -6.59, 0.77) pt3dadd(28, -173.42, -6.59, 0.77) pt3dadd(28.64, -173.55, -6.59, 0.77) pt3dadd(29.47, -173.93, -6.59, 0.77) pt3dadd(30.11, -174.12, -6.59, 0.77) pt3dadd(30.3, -174.25, -6.59, 0.77) pt3dadd(30.68, -174.38, -6.59, 0.77) pt3dadd(31.39, -174.89, -6.59, 0.77) pt3dadd(31.58, -175.15, -6.59, 0.77) pt3dadd(31.71, -175.15, -6.59, 0.77) pt3dadd(32.15, -175.4, -6.59, 0.77) pt3dadd(33.11, -175.78, -6.59, 0.77) pt3dadd(33.75, -175.66, -6.59, 0.77) pt3dadd(34.39, -175.34, -6.59, 0.77) pt3dadd(35.61, -175.15, -6.59, 0.77) pt3dadd(37.14, -175.15, -6.59, 0.77) pt3dadd(37.59, -175.34, -6.59, 0.77) pt3dadd(37.85, -175.15, -6.59, 0.77) pt3dadd(38.1, -175.15, -6.59, 0.77) pt3dadd(39.38, -174.99, -6.59, 0.77) pt3dadd(40.08, -174.93, -6.59, 0.77) pt3dadd(41.61, -174.93, -6.59, 0.77) pt3dadd(43.34, -174.55, -6.59, 0.77) pt3dadd(44.75, -174.55, -6.59, 0.77) pt3dadd(46.03, -174.61, -6.59, 0.77) pt3dadd(48.33, -174.61, -6.59, 0.77) pt3dadd(49.93, -174.55, -6.59, 0.77) pt3dadd(53.19, -174.29, -6.59, 0.77) pt3dadd(54.72, -174.03, -6.59, 0.77) pt3dadd(56.45, -173.97, -6.59, 0.77) pt3dadd(58.69, -173.97, -6.59, 0.77) pt3dadd(60.73, -173.84, -6.59, 0.77) pt3dadd(62.01, -173.84, -6.59, 0.77) pt3dadd(64.38, -174.03, -6.59, 0.77) pt3dadd(65.21, -174.03, -6.59, 0.77) pt3dadd(66.36, -173.91, -6.59, 0.77) pt3dadd(66.61, -173.71, -6.59, 0.77) pt3dadd(68.15, -173.27, -6.59, 0.77) pt3dadd(69.04, -173.01, -6.59, 0.77) pt3dadd(70.45, -173.14, -6.59, 0.77) pt3dadd(71.98, -173.84, -6.59, 0.77) pt3dadd(72.88, -174.29, -6.59, 0.77) pt3dadd(73.65, -174.67, -6.59, 0.77) pt3dadd(75.12, -174.99, -6.59, 0.77) pt3dadd(75.95, -174.99, -6.59, 0.77) pt3dadd(77.36, -174.87, -6.59, 0.77) pt3dadd(78.57, -174.61, -6.59, 0.77) pt3dadd(80.87, -174.61, -6.59, 0.77) pt3dadd(81.77, -174.93, -6.59, 0.77) pt3dadd(83.57, -174.82, 2.38, 0.64) pt3dadd(83.7, -174.82, 2.38, 0.64) pt3dadd(84.33, -174.89, 2.38, 0.64) pt3dadd(85.23, -174.89, 2.38, 0.64) pt3dadd(86, -174.57, 2.38, 0.64) pt3dadd(87.02, -173.99, 2.38, 0.64) pt3dadd(87.92, -173.86, 2.38, 0.64) pt3dadd(89.19, -173.8, 2.38, 0.64) pt3dadd(93.54, -173.8, -10.69, 0.64) pt3dadd(95.65, -174.31, -10.69, 0.64) pt3dadd(96.8, -174.76, -10.69, 0.64) pt3dadd(98.08, -175.01, -10.69, 0.64) pt3dadd(104.73, -175.01, -13.17, 0.64) pt3dadd(107.22, -175.59, -13.17, 0.64) pt3dadd(109.27, -176.1, -13.17, 0.64) pt3dadd(110.49, -176.16, -12.63, 0.64) pt3dadd(112.08, -176.1, -12.63, 0.64) pt3dadd(112.92, -176.29, -12.63, 0.64) pt3dadd(114, -176.42, -12.63, 0.64) } } proc shape3d_5() { axon[3] { pt3dadd(114.83, -176.42, -12.63, 0.64) pt3dadd(115.28, -176.36, -12.63, 0.64) pt3dadd(117.07, -176.23, -12.63, 0.64) pt3dadd(117.9, -176.23, -12.63, 0.64) pt3dadd(119.37, -176.68, -12.63, 0.64) pt3dadd(120.33, -177.44, -12.63, 0.64) pt3dadd(120.97, -178.4, -12.63, 0.64) pt3dadd(121.29, -179.1, -12.63, 0.64) pt3dadd(121.74, -179.49, -12.63, 0.64) pt3dadd(122.31, -179.62, -12.63, 0.64) pt3dadd(122.89, -179.55, -12.63, 0.64) pt3dadd(124.42, -178.85, -12.63, 0.64) pt3dadd(125, -178.79, -12.63, 0.64) pt3dadd(125.19, -178.79, -12.63, 0.64) pt3dadd(127.37, -178.8, -12.63, 0.64) pt3dadd(128.65, -178.8, -12.63, 0.64) pt3dadd(129.42, -179.19, -12.63, 0.64) pt3dadd(130.38, -179.96, -12.63, 0.64) pt3dadd(131.46, -180.02, -12.63, 0.64) pt3dadd(132.36, -179.7, -12.63, 0.64) pt3dadd(133, -179.44, -12.63, 0.64) pt3dadd(133.38, -179.38, -14.25, 0.64) pt3dadd(133.38, -179.25, -17.17, 0.64) pt3dadd(133.7, -178.93, -17.17, 0.64) pt3dadd(134.08, -178.61, -17.17, 0.64) pt3dadd(134.66, -178.49, -17.17, 0.64) pt3dadd(135.55, -178.49, -17.17, 0.64) pt3dadd(136, -178.8, -17.17, 0.64) pt3dadd(136.51, -179.32, -17.17, 0.64) pt3dadd(137.47, -179.96, -17.49, 0.64) pt3dadd(139.01, -180.59, -18.46, 0.64) pt3dadd(139.46, -180.72, -19.65, 0.64) pt3dadd(139.58, -180.72, -19.65, 0.64) pt3dadd(139.77, -180.53, -20.95, 0.64) pt3dadd(140.09, -180.21, -20.95, 0.64) pt3dadd(140.48, -179.96, -20.95, 0.64) pt3dadd(140.61, -179.76, -20.95, 0.64) pt3dadd(140.61, -179.32, -21.59, 0.64) pt3dadd(140.8, -179, -23, 0.64) pt3dadd(140.93, -178.93, -24.19, 0.64) pt3dadd(140.99, -178.87, -24.19, 0.64) pt3dadd(143.93, -178.87, -24.19, 0.64) pt3dadd(145.21, -179.19, -24.19, 0.64) pt3dadd(146.74, -180.21, -23.86, 0.64) pt3dadd(147.58, -180.98, -23.86, 0.64) pt3dadd(148.15, -181.55, -18.25, 0.64) pt3dadd(148.41, -181.68, -17.49, 0.64) pt3dadd(148.53, -181.68, -17.49, 0.64) pt3dadd(148.6, -181.75, -17.49, 0.64) pt3dadd(150.45, -181.75, -17.49, 0.64) pt3dadd(150.71, -181.75, -17.49, 0.64) pt3dadd(151.67, -182, -17.49, 0.64) pt3dadd(154.99, -182.83, -17.49, 0.64) pt3dadd(156.78, -183.54, -17.49, 0.64) pt3dadd(158.06, -184.18, -17.49, 0.64) pt3dadd(159.79, -185.13, -17.49, 0.64) pt3dadd(160.81, -185.77, -17.49, 0.64) pt3dadd(161.77, -186.16, -17.49, 0.64) pt3dadd(162.79, -186.48, -17.49, 0.64) pt3dadd(163.75, -186.48, -17.49, 0.64) pt3dadd(165.03, -186.54, -17.49, 0.64) pt3dadd(166.31, -186.54, -17.49, 0.64) pt3dadd(167.01, -186.86, -17.49, 0.64) pt3dadd(168.1, -187.31, -17.49, 0.64) pt3dadd(169.31, -187.63, -17.49, 0.64) pt3dadd(170.21, -187.82, -17.49, 0.64) pt3dadd(171.1, -187.37, -17.49, 0.64) pt3dadd(171.62, -187.37, -17.49, 0.64) pt3dadd(172.86, -187.5, -17.49, 0.64) pt3dadd(172.98, -187.5, -17.49, 0.64) pt3dadd(173.81, -187.76, -17.49, 0.64) pt3dadd(175.16, -188.14, -17.49, 0.64) pt3dadd(175.54, -188.27, -17.49, 0.64) pt3dadd(176.37, -188.78, -17.49, 0.64) pt3dadd(176.82, -188.85, -17.49, 0.64) pt3dadd(177.01, -188.85, -29.37, 0.64) pt3dadd(178.16, -188.72, -29.37, 0.64) pt3dadd(179.95, -188.66, -29.37, 0.64) pt3dadd(180.98, -188.85, -29.37, 0.64) pt3dadd(182.06, -189.36, -29.37, 0.64) pt3dadd(184.24, -190.25, -29.37, 0.64) pt3dadd(185.96, -190.45, -29.37, 0.64) pt3dadd(188.07, -189.93, -29.37, 0.64) pt3dadd(189.42, -189.61, -29.37, 0.64) pt3dadd(190.44, -189.68, -29.37, 0.64) pt3dadd(192.1, -190.25, -29.37, 0.64) pt3dadd(194.53, -190.7, -29.37, 0.64) pt3dadd(195.49, -190.7, -29.37, 0.64) pt3dadd(196.26, -190.51, -29.37, 0.64) pt3dadd(197.6, -190.51, -29.37, 0.64) pt3dadd(198.62, -190.06, -29.37, 0.64) pt3dadd(199.33, -189.68, -29.37, 0.64) pt3dadd(200.29, -189.36, -29.37, 0.64) pt3dadd(201.56, -189.29, -29.37, 0.64) pt3dadd(202.14, -189.42, -29.37, 0.64) pt3dadd(203.8, -190.51, -29.37, 0.64) pt3dadd(204.76, -190.64, -29.37, 0.64) pt3dadd(208.41, -190.64, -29.37, 0.64) pt3dadd(209.36, -190.25, -29.37, 0.64) pt3dadd(210.45, -190, -29.37, 0.64) pt3dadd(212.24, -190, -29.37, 0.64) pt3dadd(212.82, -190.13, -29.37, 0.64) pt3dadd(213.39, -190.25, -29.37, 0.64) pt3dadd(213.84, -190.45, -29.37, 0.64) pt3dadd(213.97, -190.45, -29.37, 0.64) pt3dadd(218.05, -191.81, -29.37, 0.64) pt3dadd(218.37, -191.88, -29.37, 0.64) pt3dadd(219.59, -192.51, -29.37, 0.64) pt3dadd(220.42, -193.03, -29.37, 0.64) pt3dadd(222.08, -193.35, -29.37, 0.64) pt3dadd(223.3, -193.35, -34.55, 0.64) pt3dadd(224.57, -193.47, -34.55, 0.64) pt3dadd(226.3, -193.86, -34.55, 0.64) pt3dadd(228.28, -194.56, -34.55, 0.64) pt3dadd(230.33, -195.65, -34.55, 0.64) pt3dadd(231.86, -197.05, -34.55, 0.64) pt3dadd(232.5, -197.69, -34.55, 0.64) pt3dadd(233.53, -198.4, -34.55, 0.64) pt3dadd(234.17, -198.78, -34.55, 0.64) pt3dadd(234.23, -198.78, -35.09, 0.64) pt3dadd(235.83, -199.87, -37.57, 0.64) pt3dadd(236.21, -199.93, -37.57, 0.64) pt3dadd(237.04, -200.31, -37.57, 0.64) pt3dadd(238.45, -201.15, -37.57, 0.64) pt3dadd(240.56, -202.49, -37.57, 0.64) pt3dadd(242.8, -204.73, -37.57, 0.64) pt3dadd(244.33, -206.64, -37.57, 0.64) pt3dadd(246.31, -207.8, -37.57, 0.64) pt3dadd(247.72, -209.14, -37.57, 0.64) pt3dadd(248.62, -210.23, -37.57, 0.64) pt3dadd(250.21, -211.63, -37.57, 0.64) pt3dadd(252, -212.91, -37.57, 0.64) pt3dadd(252.58, -213.29, -37.57, 0.64) pt3dadd(253.28, -213.93, -37.57, 0.64) pt3dadd(254.24, -214.64, -37.57, 0.64) pt3dadd(255.14, -215.15, -37.57, 0.64) pt3dadd(255.71, -215.6, -37.57, 0.64) pt3dadd(256.54, -215.98, -37.57, 0.64) pt3dadd(256.99, -216.11, -37.57, 0.64) pt3dadd(257.25, -216.24, -37.57, 0.64) pt3dadd(257.31, -216.24, -37.57, 0.64) pt3dadd(259.5, -217.27, -37.57, 0.64) pt3dadd(260.14, -218.04, -37.57, 0.64) pt3dadd(261.16, -219.06, -37.57, 0.64) pt3dadd(262.25, -219.83, -37.57, 0.64) pt3dadd(263.46, -220.6, -37.57, 0.64) pt3dadd(264.68, -220.85, -37.57, 0.64) pt3dadd(265.51, -220.98, -37.57, 0.64) pt3dadd(267.43, -222.2, -37.57, 0.64) pt3dadd(268.13, -222.64, -41.35, 0.64) pt3dadd(268.45, -222.71, -41.35, 0.64) pt3dadd(270.18, -223.67, -41.35, 0.64) pt3dadd(273.57, -225.2, -41.35, 0.64) pt3dadd(274.97, -226.16, -41.46, 0.64) pt3dadd(275.61, -226.93, -41.46, 0.64) pt3dadd(276.19, -227.63, -42, 0.64) pt3dadd(276.95, -228.72, -42.11, 0.64) pt3dadd(278.42, -229.93, -42.33, 0.64) pt3dadd(279.64, -230.89, -42.33, 0.64) pt3dadd(280.73, -231.59, -42.54, 0.64) pt3dadd(282.07, -232.23, -42.54, 0.64) pt3dadd(282.77, -232.55, -43.08, 0.64) pt3dadd(283.03, -232.62, -43.62, 0.64) pt3dadd(283.35, -232.68, -43.62, 0.64) pt3dadd(285.46, -234.34, -44.92, 0.64) pt3dadd(286.74, -235.24, -44.92, 0.64) pt3dadd(288.85, -237.03, -44.92, 0.64) pt3dadd(289.49, -238.18, -44.92, 0.64) pt3dadd(290.13, -238.88, -45.02, 0.64) pt3dadd(290.96, -239.52, -45.89, 0.64) pt3dadd(291.08, -239.65, -47.83, 0.64) pt3dadd(293.32, -240.35, -47.83, 0.64) pt3dadd(293.83, -240.67, -47.83, 0.64) pt3dadd(295.24, -241.25, -47.83, 0.64) pt3dadd(296.97, -241.82, -47.83, 0.64) pt3dadd(298.44, -242.78, -47.83, 0.64) pt3dadd(299.84, -242.85, -47.83, 0.64) pt3dadd(301.44, -242.85, -47.83, 0.64) pt3dadd(302.59, -243.17, -47.83, 0.64) pt3dadd(302.72, -243.17, -47.83, 0.64) pt3dadd(303.05, -243.75, -47.83, 0.58) pt3dadd(303.5, -244.01, -47.83, 0.58) pt3dadd(304.84, -244.78, -47.83, 0.58) pt3dadd(305.67, -245.48, -47.83, 0.58) pt3dadd(306.7, -246.18, -47.83, 0.58) pt3dadd(307.53, -246.63, -47.83, 0.58) pt3dadd(308.87, -247.01, -47.83, 0.58) pt3dadd(310.02, -247.46, -47.83, 0.58) pt3dadd(310.98, -248.1, -47.83, 0.58) pt3dadd(312.13, -248.74, -47.83, 0.58) pt3dadd(313.54, -249.44, -47.83, 0.58) pt3dadd(315.71, -250.08, -47.83, 0.58) pt3dadd(317.44, -250.4, -47.83, 0.58) pt3dadd(318.72, -251.23, -47.83, 0.58) pt3dadd(320.12, -252.06, -47.83, 0.58) pt3dadd(321.59, -252.51, -47.83, 0.58) pt3dadd(322.62, -252.64, -47.83, 0.58) pt3dadd(325.05, -252.64, -48.59, 0.58) pt3dadd(325.88, -253.02, -52.58, 0.58) pt3dadd(329.78, -254.37, -52.58, 0.58) } } proc shape3d_6() { axon[3] { pt3dadd(332.08, -255.71, -52.58, 0.58) pt3dadd(333.62, -256.92, -52.58, 0.58) pt3dadd(334.89, -257.69, -52.58, 0.58) pt3dadd(336.43, -258.33, -52.58, 0.58) pt3dadd(338.15, -259.03, -52.58, 0.58) pt3dadd(339.18, -259.67, -52.58, 0.58) pt3dadd(340.07, -260.18, -51.94, 0.58) pt3dadd(341.1, -260.95, -51.94, 0.58) pt3dadd(342.18, -261.46, -50.53, 0.58) pt3dadd(343.01, -261.91, -50.53, 0.58) pt3dadd(343.46, -262.17, -50.53, 0.58) pt3dadd(343.97, -262.29, -49.99, 0.58) pt3dadd(344.17, -262.29, -49.99, 0.58) pt3dadd(344.86, -262.73, -56.79, 0.58) pt3dadd(345.06, -262.8, -56.79, 0.58) pt3dadd(346.01, -263.69, -56.79, 0.58) pt3dadd(347.1, -265.03, -56.79, 0.58) pt3dadd(347.68, -265.87, -56.79, 0.58) pt3dadd(349.02, -266.95, -56.79, 0.58) pt3dadd(350.43, -268.04, -56.79, 0.58) pt3dadd(351.58, -269.13, -56.79, 0.58) pt3dadd(353.18, -270.66, -56.79, 0.58) pt3dadd(354.77, -271.88, -56.79, 0.58) pt3dadd(355.8, -272.83, -56.79, 0.58) pt3dadd(357.33, -273.86, -56.79, 0.58) pt3dadd(357.65, -273.86, -56.79, 0.58) pt3dadd(358.1, -274.43, -56.79, 0.58) pt3dadd(358.36, -274.5, -56.79, 0.58) pt3dadd(359.44, -275.39, -56.79, 0.58) pt3dadd(360.85, -276.93, -56.79, 0.58) pt3dadd(361.94, -278.4, -56.79, 0.58) pt3dadd(363.28, -279.74, -56.79, 0.58) pt3dadd(365.84, -280.95, -56.79, 0.58) pt3dadd(366.8, -281.47, -56.79, 0.58) pt3dadd(367.5, -281.79, -56.79, 0.58) pt3dadd(367.69, -281.91, -56.79, 0.58) pt3dadd(368.65, -282.74, -49.02, 0.58) pt3dadd(369.03, -283.32, -49.02, 0.58) pt3dadd(370.82, -284.22, -49.02, 0.58) pt3dadd(373, -285.17, -49.02, 0.58) pt3dadd(374.92, -286.07, -49.02, 0.58) pt3dadd(376.26, -287.22, -49.02, 0.58) pt3dadd(377.41, -288.31, -49.02, 0.58) pt3dadd(379.33, -289.01, -49.02, 0.58) pt3dadd(380.41, -289.52, -49.02, 0.58) pt3dadd(381.12, -289.97, -49.02, 0.58) pt3dadd(382.33, -290.42, -49.02, 0.58) pt3dadd(382.72, -290.67, -49.02, 0.58) pt3dadd(382.78, -290.67, -49.02, 0.58) pt3dadd(384.68, -291.57, -58.85, 0.58) pt3dadd(385.13, -292.21, -59.39, 0.58) pt3dadd(386.02, -292.91, -59.39, 0.58) pt3dadd(386.98, -293.23, -59.39, 0.58) pt3dadd(388.32, -293.55, -59.49, 0.58) pt3dadd(390.18, -294.32, -59.82, 0.58) pt3dadd(391.33, -295.66, -59.82, 0.58) pt3dadd(392.22, -296.43, -61.33, 0.58) pt3dadd(392.67, -296.43, -62.62, 0.58) pt3dadd(394.85, -297.13, -62.62, 0.58) pt3dadd(396.12, -297.84, -62.62, 0.58) pt3dadd(397.59, -299.37, -62.62, 0.58) pt3dadd(400.02, -300.78, -62.62, 0.58) pt3dadd(402.65, -301.61, -62.62, 0.58) pt3dadd(403.99, -302.44, -61.44, 0.58) pt3dadd(405.78, -303.98, -60.03, 0.58) pt3dadd(406.55, -304.36, -60.03, 0.58) pt3dadd(407.06, -304.36, -52.37, 0.58) pt3dadd(409.1, -304.49, -52.37, 0.58) pt3dadd(410.64, -304.93, -52.37, 0.58) pt3dadd(411.09, -305.13, -52.37, 0.58) pt3dadd(411.92, -305.83, -52.37, 0.58) pt3dadd(413.2, -306.66, -52.37, 0.58) pt3dadd(414.35, -307.49, -52.37, 0.58) pt3dadd(416.07, -308.71, -52.37, 0.58) pt3dadd(417.22, -309.15, -52.37, 0.58) pt3dadd(417.54, -309.79, -52.37, 0.58) pt3dadd(417.99, -309.99, -52.37, 0.58) pt3dadd(419.01, -310.63, -52.37, 0.58) pt3dadd(421.06, -312.35, -52.37, 0.58) pt3dadd(422.91, -313.69, -52.37, 0.58) pt3dadd(424.9, -314.46, -52.37, 0.58) pt3dadd(426.11, -314.97, -52.37, 0.58) pt3dadd(426.94, -315.29, -52.37, 0.58) pt3dadd(427.84, -315.8, -52.37, 0.58) pt3dadd(428.29, -315.87, -52.37, 0.58) pt3dadd(428.35, -315.87, -52.37, 0.58) pt3dadd(429.36, -316.25, -52.37, 0.58) pt3dadd(429.8, -316.51, -52.37, 0.58) pt3dadd(431.53, -317.79, -52.37, 0.58) pt3dadd(432.68, -318.94, -52.37, 0.58) pt3dadd(434.15, -320.6, -52.37, 0.58) pt3dadd(435.69, -321.3, -52.37, 0.58) pt3dadd(437.28, -322.01, -52.37, 0.58) pt3dadd(439.27, -323.09, -52.37, 0.58) pt3dadd(440.48, -324.24, -52.37, 0.58) pt3dadd(441.38, -325.46, -52.37, 0.58) pt3dadd(443.04, -326.67, -52.37, 0.58) pt3dadd(443.87, -327.25, -52.37, 0.58) pt3dadd(444.45, -327.63, -52.37, 0.58) pt3dadd(445.34, -328.27, -52.37, 0.58) pt3dadd(446.43, -328.91, -52.37, 0.58) pt3dadd(447.32, -329.17, -52.37, 0.58) pt3dadd(448.35, -329.93, -52.37, 0.58) pt3dadd(449.82, -330.89, -52.37, 0.58) pt3dadd(451.48, -332.11, -52.37, 0.58) pt3dadd(453.4, -333.2, -52.37, 0.58) pt3dadd(455.19, -334.09, -52.37, 0.58) pt3dadd(458, -335.24, -52.37, 0.58) pt3dadd(460.05, -336.26, -52.37, 0.58) pt3dadd(461.9, -337.67, -52.37, 0.58) pt3dadd(463.12, -338.76, -52.37, 0.58) pt3dadd(464.14, -339.85, -52.37, 0.58) pt3dadd(465.03, -340.36, -52.37, 0.58) pt3dadd(465.67, -341.12, -52.37, 0.58) pt3dadd(466.5, -341.76, -52.37, 0.58) pt3dadd(467.78, -342.34, -52.37, 0.58) pt3dadd(468.49, -342.72, -52.37, 0.58) pt3dadd(468.93, -342.91, -52.37, 0.58) pt3dadd(469, -342.98, -52.37, 0.58) pt3dadd(471.13, -343.55, -52.37, 0.58) pt3dadd(471.33, -343.55, -52.37, 0.58) pt3dadd(472.67, -344.83, -52.37, 0.58) pt3dadd(473.76, -345.6, -52.37, 0.58) pt3dadd(479.06, -345.6, -51.94, 0.58) pt3dadd(480.21, -345.73, -50.75, 0.58) pt3dadd(480.73, -345.85, -50.75, 0.58) pt3dadd(481.05, -345.85, -49.56, 0.58) pt3dadd(481.56, -346.11, -49.56, 0.58) pt3dadd(482.9, -346.69, -50.64, 0.58) pt3dadd(483.35, -347, -60.46, 0.58) pt3dadd(484.88, -347.07, -60.46, 0.58) pt3dadd(486.74, -347.45, -60.46, 0.58) pt3dadd(489.04, -348.73, -60.46, 0.58) pt3dadd(490.19, -349.63, -60.46, 0.58) pt3dadd(491.02, -350.39, -60.46, 0.58) pt3dadd(491.66, -351.22, -60.46, 0.58) pt3dadd(493.51, -352.25, -60.46, 0.58) pt3dadd(495.62, -352.95, -60.46, 0.58) pt3dadd(497.35, -353.59, -60.46, 0.58) pt3dadd(498.37, -354.23, -60.46, 0.58) pt3dadd(499.91, -355.32, -60.46, 0.58) pt3dadd(500.61, -355.83, -60.46, 0.58) pt3dadd(501.19, -356.28, -60.46, 0.58) pt3dadd(501.76, -356.6, -60.46, 0.58) pt3dadd(503.36, -357.17, -60.46, 0.58) pt3dadd(503.68, -357.23, -60.46, 0.58) pt3dadd(504.7, -357.68, -60.46, 0.58) pt3dadd(506.43, -358.13, -60.46, 0.58) pt3dadd(507.77, -358.9, -60.46, 0.58) pt3dadd(509.11, -359.92, -60.46, 0.58) pt3dadd(510.78, -360.5, -60.46, 0.58) pt3dadd(512.12, -360.94, -60.46, 0.58) pt3dadd(512.95, -361.33, -60.46, 0.58) pt3dadd(513.85, -361.84, -60.46, 0.58) pt3dadd(514.8, -362.29, -60.46, 0.58) pt3dadd(515, -362.35, -60.46, 0.58) pt3dadd(517.33, -362.73, -60.46, 0.58) pt3dadd(521.03, -364.33, -60.46, 0.58) pt3dadd(523.53, -365.16, -60.46, 0.58) pt3dadd(525, -365.61, -60.46, 0.58) pt3dadd(526.02, -366.06, -60.46, 0.58) pt3dadd(526.79, -366.5, -60.46, 0.58) pt3dadd(527.75, -366.95, -60.46, 0.58) pt3dadd(528.9, -367.53, -60.46, 0.58) pt3dadd(530.37, -367.98, -60.46, 0.58) pt3dadd(531.71, -368.42, -60.57, 0.58) pt3dadd(533.06, -368.93, -61, 0.58) pt3dadd(533.95, -369.32, -61, 0.58) pt3dadd(534.01, -369.32, -63.92, 0.58) pt3dadd(536.7, -370.47, -63.92, 0.58) pt3dadd(536.96, -370.6, -63.92, 0.58) pt3dadd(537.08, -370.6, -65.43, 0.58) pt3dadd(537.91, -371.17, -65.43, 0.58) pt3dadd(538.68, -371.68, -65.43, 0.58) pt3dadd(540.09, -372.51, -65.43, 0.58) pt3dadd(542.77, -373.67, -60.57, 0.58) pt3dadd(544.95, -374.94, -60.57, 0.58) pt3dadd(545.97, -375.65, -59.28, 0.58) pt3dadd(547.25, -376.29, -58.63, 0.58) pt3dadd(548.34, -376.86, -58.63, 0.58) pt3dadd(549.55, -377.37, -58.63, 0.58) pt3dadd(552.05, -378.4, -57.66, 0.58) pt3dadd(554.09, -379.23, -57.66, 0.58) pt3dadd(555.24, -379.48, -57.66, 0.58) pt3dadd(557.42, -379.48, -57.66, 0.58) pt3dadd(557.86, -379.61, -57.66, 0.58) pt3dadd(558.57, -380, -57.66, 0.58) pt3dadd(559.33, -380.44, -57.66, 0.58) pt3dadd(559.46, -380.51, -57.66, 0.58) pt3dadd(561.63, -381.06, -55.61, 0.51) pt3dadd(562.02, -381.06, -55.61, 0.51) pt3dadd(563.87, -381.83, -55.61, 0.51) pt3dadd(564.77, -382.66, -55.61, 0.51) pt3dadd(566.24, -383.87, -55.61, 0.51) pt3dadd(567.71, -384.83, -55.61, 0.51) pt3dadd(570.07, -385.6, -55.61, 0.51) pt3dadd(571.61, -386.05, -55.61, 0.51) pt3dadd(573.66, -386.24, -55.61, 0.51) pt3dadd(575.32, -386.3, -55.61, 0.51) pt3dadd(576.15, -386.56, -55.61, 0.51) } } proc shape3d_7() { axon[3] { pt3dadd(578.96, -387.58, -55.61, 0.51) pt3dadd(581.39, -388.09, -55.61, 0.51) pt3dadd(583.69, -388.41, -55.61, 0.51) pt3dadd(586.38, -388.54, -55.61, 0.51) pt3dadd(589.06, -388.67, -55.61, 0.51) pt3dadd(590.92, -389.18, -55.61, 0.51) pt3dadd(595.07, -389.18, -55.61, 0.51) pt3dadd(596.93, -388.86, -55.61, 0.51) pt3dadd(597.95, -388.92, -55.61, 0.51) pt3dadd(599.29, -389.63, -55.61, 0.51) pt3dadd(600.25, -390.08, -55.61, 0.51) pt3dadd(601.08, -390.59, -55.61, 0.51) pt3dadd(602.04, -391.1, -55.61, 0.51) pt3dadd(602.68, -391.35, -55.61, 0.51) pt3dadd(604.07, -391.41, -54.09, 0.51) pt3dadd(604.32, -391.48, -54.09, 0.51) pt3dadd(605.15, -391.86, -54.09, 0.51) pt3dadd(606.75, -392.37, -54.09, 0.51) pt3dadd(609.18, -392.95, -54.09, 0.51) pt3dadd(611.1, -393.84, -54.09, 0.51) pt3dadd(612.7, -395.19, -54.09, 0.51) pt3dadd(615, -396.98, -54.09, 0.51) pt3dadd(617.3, -398, -54.09, 0.51) pt3dadd(620.95, -399.02, -54.09, 0.51) pt3dadd(623.95, -400.24, -54.09, 0.51) pt3dadd(626.13, -400.88, -54.09, 0.51) pt3dadd(627.28, -401.39, -54.09, 0.51) pt3dadd(628.94, -402.15, -54.09, 0.51) pt3dadd(631.31, -402.15, -54.09, 0.51) pt3dadd(632.33, -402.47, -54.09, 0.51) pt3dadd(633.67, -403.11, -54.09, 0.51) pt3dadd(636.1, -404.14, -54.09, 0.51) pt3dadd(637.44, -405.03, -54.09, 0.51) pt3dadd(638.98, -405.93, -54.09, 0.51) pt3dadd(641.6, -406.95, -54.09, 0.51) pt3dadd(643.52, -406.95, -54.09, 0.51) pt3dadd(644.8, -407.4, -54.09, 0.51) pt3dadd(645.82, -407.72, -54.09, 0.51) pt3dadd(646.08, -407.72, -54.09, 0.51) pt3dadd(646.27, -407.91, -54.09, 0.51) pt3dadd(646.65, -408.1, -54.09, 0.51) } axon[4] {pt3dclear() pt3dadd(11.63, -174.76, -0.86, 0.64) pt3dadd(11.74, -174.69, -8.1, 0.64) pt3dadd(12, -174.69, -8.1, 0.64) pt3dadd(12.32, -174.56, -8.1, 0.64) pt3dadd(12.64, -174.3, -8.1, 0.64) pt3dadd(12.96, -173.98, -8.1, 0.64) pt3dadd(13.15, -173.79, -8.1, 0.64) pt3dadd(13.28, -173.53, -8.1, 0.64) pt3dadd(13.53, -173.28, -8.1, 0.64) pt3dadd(13.6, -173.02, -8.1, 0.64) pt3dadd(13.66, -172.77, -8.1, 0.64) pt3dadd(13.66, -172.19, -8.1, 0.64) pt3dadd(14.04, -171.81, -8.1, 0.64) pt3dadd(14.23, -171.62, -8.1, 0.64) pt3dadd(14.3, -171.42, -8.1, 0.64) pt3dadd(14.36, -171.36, -8.1, 0.64) pt3dadd(14.43, -171.23, -8.1, 0.64) pt3dadd(14.43, -171.1, -8.1, 0.64) pt3dadd(14.49, -170.98, -8.1, 0.64) pt3dadd(14.49, -170.85, -8.1, 0.64) } axon[5] {pt3dclear() pt3dadd(14.49, -170.85, -8.1, 0.64) pt3dadd(14.87, -171.1, -8.1, 0.64) pt3dadd(14.81, -171.17, -8.1, 0.64) pt3dadd(14.68, -171.62, -8.1, 0.64) pt3dadd(14.62, -172.06, -8.1, 0.64) pt3dadd(14.49, -172.38, -8.1, 0.64) pt3dadd(14.3, -172.64, -8.1, 0.64) pt3dadd(13.85, -173.09, -8.1, 0.64) pt3dadd(13.66, -173.47, -8.1, 0.64) pt3dadd(13.47, -173.92, -8.1, 0.64) pt3dadd(13.34, -174.43, -8.1, 0.64) pt3dadd(13.28, -175.2, -8.1, 0.64) pt3dadd(13.21, -175.71, -8.1, 0.64) pt3dadd(13.15, -176.22, -8.1, 0.64) pt3dadd(12.83, -176.73, -8.1, 0.64) pt3dadd(12.51, -177.37, -8.1, 0.64) pt3dadd(12, -178.07, -8.1, 0.64) pt3dadd(11.23, -179.16, -8.1, 0.64) pt3dadd(11.1, -179.42, -8.1, 0.64) pt3dadd(11.04, -179.48, -8.1, 0.64) pt3dadd(11.04, -179.61, -8.1, 0.64) pt3dadd(10.85, -179.74, -8.1, 0.64) pt3dadd(10.4, -180.5, -8.1, 0.64) pt3dadd(9.63, -181.85, -8.1, 0.64) pt3dadd(9.18, -182.81, -8.1, 0.64) pt3dadd(8.8, -183.32, -8.1, 0.64) pt3dadd(8.35, -184.15, -8.1, 0.64) pt3dadd(7.9, -184.79, -8.1, 0.64) pt3dadd(7.52, -185.68, -8.1, 0.64) pt3dadd(7.33, -186.58, -8.1, 0.64) pt3dadd(6.88, -187.6, -8.1, 0.64) pt3dadd(6.63, -189.2, -8.1, 0.64) pt3dadd(6.63, -193.87, -8.1, 0.64) pt3dadd(6.69, -194.51, -8.1, 0.64) pt3dadd(6.69, -195.46, -8.1, 0.64) pt3dadd(6.63, -196.1, -8.1, 0.64) pt3dadd(6.43, -197.13, -8.1, 0.64) pt3dadd(6.37, -198.21, -8.1, 0.64) pt3dadd(6.24, -199.17, -8.1, 0.64) pt3dadd(6.24, -200.9, -8.1, 0.64) pt3dadd(6.31, -201.28, -8.1, 0.64) pt3dadd(6.43, -201.86, -8.1, 0.64) pt3dadd(6.63, -202.56, -8.1, 0.64) pt3dadd(6.88, -203.07, -8.1, 0.64) pt3dadd(6.88, -203.46, -8.1, 0.64) pt3dadd(6.43, -203.9, -7.02, 0.58) pt3dadd(6.3, -204.22, -7.02, 0.58) pt3dadd(5.98, -204.79, -7.02, 0.58) pt3dadd(5.53, -205.69, -7.02, 0.58) pt3dadd(5.09, -206.45, -7.02, 0.58) pt3dadd(4.7, -207.22, -7.02, 0.58) pt3dadd(4.32, -207.8, -7.02, 0.58) pt3dadd(3.74, -208.69, -7.02, 0.58) pt3dadd(3.42, -209.59, -7.02, 0.58) pt3dadd(3.17, -211.19, -7.02, 0.58) pt3dadd(3.1, -212.4, -7.02, 0.58) pt3dadd(2.85, -213.36, -7.02, 0.58) pt3dadd(2.47, -214.38, -7.02, 0.58) pt3dadd(2.4, -215.47, -7.02, 0.58) pt3dadd(2.15, -216.17, -7.02, 0.58) pt3dadd(1.83, -216.81, -7.02, 0.58) pt3dadd(1.31, -217.77, -7.02, 0.58) pt3dadd(1.12, -218.54, -7.02, 0.58) pt3dadd(1.06, -218.99, -7.02, 0.58) pt3dadd(1.06, -220.52, -7.02, 0.58) } axon[6] {pt3dclear() pt3dadd(14.49, -170.85, -8.1, 0.58) pt3dadd(14.74, -170.57, 5.18, 0.58) pt3dadd(14.85, -170.44, 5.18, 0.58) } axon[7] {pt3dclear() pt3dadd(14.85, -170.44, 5.18, 0.58) pt3dadd(14.74, -169.29, 5.18, 0.58) pt3dadd(14.49, -168.71, 5.18, 0.58) pt3dadd(13.91, -167.82, 5.18, 0.58) pt3dadd(13.66, -167.43, 5.18, 0.58) pt3dadd(13.47, -166.86, 5.18, 0.58) pt3dadd(13.4, -166.22, 5.18, 0.58) pt3dadd(13.4, -164.87, 5.18, 0.58) pt3dadd(13.47, -164.17, 5.18, 0.58) pt3dadd(13.66, -163.34, 5.18, 0.58) pt3dadd(13.72, -162.57, 5.18, 0.58) pt3dadd(14.04, -161.74, 5.18, 0.58) pt3dadd(14.36, -161.04, 5.18, 0.58) pt3dadd(14.68, -160.08, 5.18, 0.58) pt3dadd(14.81, -159.18, 5.18, 0.58) pt3dadd(14.81, -158.61, 5.18, 0.58) pt3dadd(14.94, -158.35, 5.18, 0.58) pt3dadd(14.94, -157.2, 5.18, 0.58) pt3dadd(14.55, -156.18, 5.18, 0.58) pt3dadd(14.36, -155.22, 5.18, 0.58) pt3dadd(14.36, -154.33, 5.18, 0.58) pt3dadd(14.68, -153.3, 5.18, 0.58) pt3dadd(15, -152.6, 5.18, 0.58) pt3dadd(15.51, -151.83, 5.18, 0.58) pt3dadd(15.83, -151.06, 5.18, 0.58) pt3dadd(15.96, -150.81, 5.18, 0.58) pt3dadd(16.09, -150.36, 5.18, 0.58) pt3dadd(16.53, -149.27, 5.18, 0.58) pt3dadd(16.53, -147.23, 5.18, 0.58) pt3dadd(16.34, -146.27, 5.18, 0.58) pt3dadd(16.21, -145.5, 5.18, 0.58) pt3dadd(16.21, -142.75, 5.18, 0.58) pt3dadd(16.61, -139.42, -3.35, 0.58) pt3dadd(16.61, -139.23, -3.35, 0.58) pt3dadd(16.48, -138.34, -3.35, 0.58) pt3dadd(16.42, -136.67, -3.35, 0.58) pt3dadd(16.42, -131.3, -3.35, 0.58) pt3dadd(16.22, -130.09, -3.35, 0.58) pt3dadd(16.22, -127.02, -3.35, 0.58) pt3dadd(15.9, -126.13, -3.35, 0.58) pt3dadd(15.84, -125.93, -3.35, 0.58) pt3dadd(15.52, -125.23, -3.35, 0.58) pt3dadd(15.39, -124.14, -3.35, 0.58) pt3dadd(15.33, -122.67, -3.35, 0.58) pt3dadd(15.27, -121.27, -3.35, 0.58) pt3dadd(15.46, -120.12, -3.35, 0.58) pt3dadd(15.46, -118.01, -3.35, 0.58) pt3dadd(15.2, -116.85, -3.35, 0.58) pt3dadd(14.75, -115.58, -3.35, 0.58) pt3dadd(14.56, -114.42, -3.35, 0.58) pt3dadd(14.5, -113.4, -3.35, 0.58) pt3dadd(14.56, -112.44, -3.35, 0.58) pt3dadd(14.56, -112.06, -3.35, 0.58) pt3dadd(14.8, -110.9, -3.35, 0.58) pt3dadd(14.8, -108.47, -3.35, 0.58) pt3dadd(14.48, -107.64, -3.35, 0.58) pt3dadd(14.03, -106.61, -3.35, 0.58) pt3dadd(13.65, -105.59, -3.35, 0.58) pt3dadd(13.45, -104.7, -3.35, 0.58) pt3dadd(13.58, -103.67, -3.35, 0.58) pt3dadd(14.03, -102.59, -3.35, 0.58) pt3dadd(14.54, -101.37, -3.35, 0.58) pt3dadd(14.92, -100.35, -3.35, 0.58) pt3dadd(15.05, -99.58, -3.35, 0.58) pt3dadd(15.05, -93.89, -3.35, 0.58) pt3dadd(14.92, -93.19, -3.35, 0.58) pt3dadd(14.92, -93.06, -3.35, 0.58) pt3dadd(14.8, -92.42, -3.35, 0.58) pt3dadd(14.67, -91.97, -3.35, 0.58) pt3dadd(14.22, -90.63, -3.35, 0.58) pt3dadd(13.84, -89.67, -3.35, 0.58) } } proc shape3d_8() { axon[7] { pt3dadd(13.45, -88.33, -3.35, 0.58) pt3dadd(13.45, -83.53, -3.35, 0.58) pt3dadd(13.13, -82.51, -3.35, 0.58) pt3dadd(12.94, -81.68, -3.35, 0.58) pt3dadd(12.88, -81.3, -3.35, 0.58) pt3dadd(13.31, -80.1, -3.35, 0.58) pt3dadd(13.18, -79.97, -3.35, 0.58) pt3dadd(12.92, -78.63, -3.35, 0.58) pt3dadd(12.92, -76.97, -3.35, 0.58) pt3dadd(13.37, -76.01, -3.35, 0.58) pt3dadd(14.01, -74.86, -3.35, 0.58) pt3dadd(14.65, -73.7, -3.35, 0.58) pt3dadd(14.97, -72.87, -3.35, 0.58) pt3dadd(14.97, -71.98, -3.35, 0.58) pt3dadd(15.16, -70.89, -3.35, 0.58) pt3dadd(15.35, -69.74, -3.35, 0.58) pt3dadd(15.35, -68.78, -3.35, 0.58) pt3dadd(15.23, -68.01, -3.35, 0.58) pt3dadd(15.35, -66.67, -3.35, 0.58) pt3dadd(15.93, -65.33, -3.35, 0.58) pt3dadd(16.06, -64.24, -3.35, 0.58) pt3dadd(16.06, -63.92, -3.35, 0.58) pt3dadd(16.31, -62.71, -3.35, 0.58) pt3dadd(16.7, -61.81, -3.35, 0.58) pt3dadd(16.76, -60.41, -3.35, 0.58) pt3dadd(16.57, -59, -3.35, 0.58) pt3dadd(16.19, -57.85, -3.35, 0.58) pt3dadd(16.12, -57.08, -3.35, 0.58) pt3dadd(16.12, -55.93, -3.35, 0.58) pt3dadd(16.38, -55.1, -3.35, 0.58) pt3dadd(16.76, -54.14, -3.35, 0.58) pt3dadd(16.76, -52.8, -3.35, 0.58) pt3dadd(16.38, -51.39, -3.35, 0.58) pt3dadd(16.12, -50.81, -3.35, 0.58) pt3dadd(16.06, -50.75, -3.35, 0.58) pt3dadd(15.55, -49.28, -3.35, 0.58) pt3dadd(15.23, -48.77, -3.35, 0.58) pt3dadd(14.91, -46.91, -3.35, 0.58) pt3dadd(14.91, -45.57, -3.35, 0.58) pt3dadd(15.36, -44.1, -3.35, 0.58) pt3dadd(15.36, -41.48, -3.35, 0.58) pt3dadd(15.23, -39.88, -3.35, 0.58) pt3dadd(15.23, -34.32, -3.35, 0.58) pt3dadd(15.17, -33.61, -3.35, 0.58) pt3dadd(15.1, -32.91, -3.35, 0.58) pt3dadd(15.1, -32.85, -3.35, 0.58) pt3dadd(14.85, -32.02, -3.35, 0.58) pt3dadd(14.85, -31.12, -3.35, 0.58) pt3dadd(14.59, -29.91, -3.35, 0.58) pt3dadd(14.14, -29.01, -3.35, 0.58) pt3dadd(13.76, -28.05, -3.35, 0.58) pt3dadd(13.5, -27.16, -3.35, 0.58) pt3dadd(13.38, -26.2, -3.35, 0.58) pt3dadd(13.31, -25.3, -3.35, 0.58) pt3dadd(13.31, -21.59, -3.35, 0.58) pt3dadd(14.17, -20.09, -8.1, 0.58) pt3dadd(14.17, -18.68, -8.1, 0.58) pt3dadd(14.11, -16.89, -8.1, 0.58) pt3dadd(14.11, -7.36, -8.1, 0.58) pt3dadd(14.24, -6.02, -8.1, 0.58) pt3dadd(14.36, -4.74, -8.1, 0.58) pt3dadd(13.98, -3.34, -8.1, 0.58) pt3dadd(13.6, -1.8, -8.1, 0.58) pt3dadd(13.02, 0.12, -8.1, 0.58) pt3dadd(12.57, 1.52, -8.1, 0.58) pt3dadd(12.19, 2.1, -8.1, 0.58) pt3dadd(12, 2.42, -8.1, 0.58) pt3dadd(11.81, 2.74, -8.1, 0.58) pt3dadd(11.74, 3.12, -8.1, 0.58) pt3dadd(11.74, 4.79, -10.04, 0.58) pt3dadd(12.13, 5.68, -10.04, 0.58) pt3dadd(12.32, 6.51, -11.88, 0.58) pt3dadd(12.32, 7.79, -11.88, 0.58) pt3dadd(12.72, 8.27, -1.08, 0.58) pt3dadd(12.72, 10.51, -0.43, 0.58) pt3dadd(12.47, 11.72, -0.43, 0.58) pt3dadd(12.34, 12.75, -0.43, 0.58) pt3dadd(12.72, 13.71, -0.43, 0.58) pt3dadd(13.24, 15.11, -0.43, 0.58) pt3dadd(13.24, 20.35, -0.43, 0.58) pt3dadd(13.75, 21.44, -0.43, 0.58) pt3dadd(14.45, 22.85, -0.43, 0.58) pt3dadd(14.58, 23.04, -0.43, 0.58) pt3dadd(14.96, 24.26, -0.43, 0.58) pt3dadd(15.03, 24.64, -0.43, 0.58) pt3dadd(15.03, 25.09, -0.43, 0.58) pt3dadd(15.22, 25.79, -0.43, 0.58) pt3dadd(15.67, 26.68, -0.43, 0.58) pt3dadd(16.43, 27.96, -0.43, 0.58) pt3dadd(17.58, 29.63, -0.43, 0.58) pt3dadd(18.35, 30.78, -0.43, 0.58) pt3dadd(18.86, 31.74, -0.43, 0.58) pt3dadd(19.18, 32.89, -0.43, 0.58) pt3dadd(19.63, 33.97, -0.43, 0.58) pt3dadd(20.33, 35.32, -0.43, 0.58) pt3dadd(20.84, 36.53, -0.43, 0.58) pt3dadd(21.16, 37.17, -0.43, 0.58) pt3dadd(21.16, 37.36, -0.43, 0.58) pt3dadd(21.13, 36.9, -10.04, 0.58) pt3dadd(21.13, 37.48, -10.04, 0.58) pt3dadd(21.2, 38.5, -10.04, 0.58) pt3dadd(21.2, 40.04, -10.04, 0.58) pt3dadd(21.32, 40.93, -10.04, 0.58) pt3dadd(21.52, 41.89, -10.04, 0.58) pt3dadd(21.96, 42.79, -9.83, 0.58) pt3dadd(22.8, 44.19, -9.72, 0.58) pt3dadd(23.37, 45.22, -9.72, 0.58) pt3dadd(23.88, 46.62, -9.39, 0.58) pt3dadd(24.71, 48.35, -9.39, 0.58) pt3dadd(25.1, 49.56, -9.39, 0.58) pt3dadd(25.54, 50.97, -9.39, 0.58) pt3dadd(25.99, 51.93, -9.39, 0.58) pt3dadd(25.99, 52.06, -9.39, 0.58) pt3dadd(26.76, 53.78, -9.39, 0.58) pt3dadd(26.76, 54.81, -9.39, 0.58) pt3dadd(26.95, 56.34, -9.39, 0.58) pt3dadd(27.4, 57.62, -9.39, 0.58) pt3dadd(28.42, 59.41, -9.39, 0.58) pt3dadd(29.32, 60.5, -9.39, 0.58) pt3dadd(29.83, 61.46, -9.39, 0.58) pt3dadd(29.96, 62.35, -9.39, 0.58) pt3dadd(29.96, 63.69, -9.39, 0.58) pt3dadd(29.76, 64.84, -9.39, 0.58) pt3dadd(29.76, 65.48, -9.39, 0.58) pt3dadd(29.96, 65.99, -9.39, 0.58) pt3dadd(30.34, 66.51, -9.39, 0.58) pt3dadd(30.47, 66.76, -9.39, 0.58) pt3dadd(31.04, 68.03, -9.39, 0.58) pt3dadd(31.04, 68.48, -9.39, 0.58) pt3dadd(31.36, 69.95, -9.39, 0.58) pt3dadd(32, 72.12, -9.39, 0.58) pt3dadd(32.7, 74.17, -9.39, 0.58) pt3dadd(33.59, 75.96, -9.39, 0.58) pt3dadd(33.98, 77.68, -9.39, 0.58) pt3dadd(34.04, 79.09, -9.39, 0.58) pt3dadd(34.04, 83.25, -9.39, 0.58) pt3dadd(33.98, 84.72, -9.39, 0.58) pt3dadd(34.11, 86.06, -9.39, 0.58) pt3dadd(34.3, 86.57, -9.39, 0.58) pt3dadd(34.62, 87.27, -9.39, 0.58) pt3dadd(34.62, 88.49, -9.39, 0.58) pt3dadd(34.87, 90.15, -9.39, 0.58) pt3dadd(35.26, 91.37, -9.39, 0.58) pt3dadd(35.7, 92.58, -9.39, 0.58) pt3dadd(35.83, 93.8, -9.39, 0.58) pt3dadd(35.83, 94.88, -9.39, 0.58) pt3dadd(36.22, 96.1, -9.39, 0.58) pt3dadd(36.53, 96.99, -9.39, 0.58) pt3dadd(36.53, 97.31, -9.39, 0.58) pt3dadd(36.69, 98.21, -4.97, 0.58) pt3dadd(36.75, 98.27, -4.97, 0.58) pt3dadd(36.82, 98.53, -4.97, 0.58) pt3dadd(37.78, 100.19, -4.97, 0.58) pt3dadd(38.48, 102.11, -4.97, 0.58) pt3dadd(38.93, 103.58, -4.97, 0.58) pt3dadd(38.99, 105.24, -4.97, 0.58) pt3dadd(39.5, 107.03, -4.97, 0.58) pt3dadd(40.4, 109.02, -4.97, 0.58) pt3dadd(41.68, 111.45, -4.97, 0.58) pt3dadd(42.38, 113.36, -4.97, 0.58) pt3dadd(43.08, 115.15, -4.97, 0.58) pt3dadd(44.11, 117.58, -4.97, 0.58) pt3dadd(45.13, 120.01, -4.97, 0.58) pt3dadd(45.7, 121.55, -4.97, 0.58) pt3dadd(45.96, 122.12, -4.97, 0.58) pt3dadd(46.09, 122.44, -4.97, 0.58) pt3dadd(46.09, 124.49, -4.97, 0.58) pt3dadd(46.22, 124.94, -4.97, 0.58) pt3dadd(46.6, 125.58, -4.97, 0.58) pt3dadd(46.79, 126.15, -4.97, 0.58) pt3dadd(47.11, 126.85, -4.97, 0.58) pt3dadd(47.17, 127.17, -4.97, 0.58) pt3dadd(48.25, 129.32, -23.54, 0.58) pt3dadd(48.18, 129.77, -23.54, 0.58) pt3dadd(48.18, 131.31, -23.54, 0.58) pt3dadd(48.57, 133.16, -23.54, 0.58) pt3dadd(49.27, 134.76, -23.54, 0.58) pt3dadd(50.04, 136.49, -23.54, 0.58) pt3dadd(50.61, 137.89, -23.54, 0.58) pt3dadd(51.19, 139.36, -23.54, 0.58) pt3dadd(51.89, 140.64, -23.54, 0.58) pt3dadd(52.6, 142.11, -23.54, 0.58) pt3dadd(52.79, 142.5, -23.54, 0.58) pt3dadd(53.55, 144.41, -23.54, 0.58) pt3dadd(53.55, 144.73, -23.54, 0.58) pt3dadd(53.75, 145.88, -23.54, 0.58) pt3dadd(53.75, 150.55, -23.54, 0.58) pt3dadd(54.64, 152.92, -23.54, 0.58) pt3dadd(55.15, 154.52, -23.54, 0.58) pt3dadd(55.34, 156.24, -23.54, 0.58) pt3dadd(55.34, 157.39, -23.54, 0.58) pt3dadd(55.28, 157.78, -23.54, 0.58) pt3dadd(55.22, 157.84, -23.54, 0.58) pt3dadd(56.06, 159.96, -23.54, 0.58) pt3dadd(56.13, 160.15, -23.54, 0.58) pt3dadd(56.77, 161.62, -23.54, 0.58) pt3dadd(57.28, 162.71, -23.54, 0.58) pt3dadd(57.79, 163.8, -23.54, 0.58) pt3dadd(58.17, 164.69, -23.54, 0.58) pt3dadd(58.37, 165.72, -23.54, 0.58) } } proc shape3d_9() { axon[7] { pt3dadd(58.49, 166.8, -23.54, 0.58) pt3dadd(58.49, 168.72, -23.54, 0.58) pt3dadd(58.37, 169.55, -23.54, 0.58) pt3dadd(58.37, 174.92, -23.54, 0.58) pt3dadd(58.49, 176.14, -23.54, 0.58) pt3dadd(58.49, 176.9, -23.54, 0.58) pt3dadd(58.75, 177.67, -23.54, 0.58) pt3dadd(59.26, 178.44, -23.54, 0.58) pt3dadd(59.77, 179.08, -23.54, 0.58) pt3dadd(60.48, 179.78, -23.54, 0.58) pt3dadd(60.92, 180.55, -23.54, 0.58) pt3dadd(61.12, 181.06, -23.54, 0.58) pt3dadd(61.37, 181.51, -23.54, 0.58) pt3dadd(61.88, 182.28, -23.54, 0.58) pt3dadd(62.33, 183.23, -23.54, 0.58) pt3dadd(62.91, 184.77, -23.54, 0.58) pt3dadd(63.03, 185.86, -23.54, 0.58) pt3dadd(63.03, 189.12, -23.54, 0.58) pt3dadd(63.29, 189.69, -23.54, 0.58) pt3dadd(63.35, 189.95, -23.54, 0.58) pt3dadd(63.35, 190.01, -23.54, 0.58) pt3dadd(64.13, 193.15, -23.54, 0.58) pt3dadd(64.06, 193.21, -23.54, 0.58) pt3dadd(64.06, 195.19, -23.54, 0.58) pt3dadd(64.32, 196.41, -23.54, 0.58) pt3dadd(64.32, 197.62, -23.54, 0.58) pt3dadd(64.13, 198.71, -23.54, 0.58) pt3dadd(64.13, 199.8, -23.54, 0.58) pt3dadd(64.06, 200.69, -23.54, 0.58) pt3dadd(64.19, 201.59, -23.54, 0.58) pt3dadd(64.38, 202.87, -23.54, 0.58) pt3dadd(64.7, 203.95, -23.54, 0.58) pt3dadd(64.77, 205.1, -23.54, 0.58) pt3dadd(64.77, 207.85, -23.54, 0.58) pt3dadd(65.21, 209.13, -23.54, 0.58) pt3dadd(65.28, 209.45, -23.54, 0.58) pt3dadd(65.98, 212.14, -23.54, 0.58) pt3dadd(66.05, 212.52, -23.54, 0.58) pt3dadd(66.37, 213.86, -23.54, 0.58) pt3dadd(67.07, 216.49, -23.54, 0.58) pt3dadd(67.07, 221.73, -23.54, 0.58) pt3dadd(67.57, 222.99, -27.64, 0.58) pt3dadd(67.51, 223.12, -27.64, 0.58) pt3dadd(67.32, 225.17, -27.64, 0.58) pt3dadd(67.32, 227.73, -27.64, 0.58) pt3dadd(67.89, 229.32, -27.64, 0.58) pt3dadd(68.21, 230.86, -27.64, 0.58) pt3dadd(68.6, 232.97, -27.64, 0.58) pt3dadd(69.17, 234.63, -27.64, 0.58) pt3dadd(69.49, 235.78, -27.64, 0.58) pt3dadd(69.68, 236.48, -27.64, 0.58) pt3dadd(69.62, 238.72, -27.64, 0.58) pt3dadd(69.62, 243.2, -27.64, 0.58) pt3dadd(70.19, 245.76, -27.64, 0.58) pt3dadd(70.64, 247.1, -27.64, 0.58) pt3dadd(70.83, 248.25, -27.64, 0.58) pt3dadd(70.83, 250.81, -27.64, 0.58) pt3dadd(71.18, 252.99, -27.64, 0.58) pt3dadd(71.18, 258.17, -27.64, 0.58) pt3dadd(71.88, 260.79, -27.64, 0.58) pt3dadd(72.65, 262.45, -27.64, 0.58) pt3dadd(73.42, 263.86, -27.64, 0.58) pt3dadd(73.61, 264.18, -27.64, 0.58) pt3dadd(73.67, 265.58, -30.88, 0.58) pt3dadd(73.74, 266.74, -30.88, 0.58) pt3dadd(73.93, 268.85, -30.88, 0.58) pt3dadd(74.51, 270.64, -30.88, 0.58) pt3dadd(75.02, 272.11, -30.88, 0.58) pt3dadd(76.17, 274.34, -30.88, 0.58) pt3dadd(77.25, 277.73, -30.88, 0.58) pt3dadd(77.89, 279.2, -30.88, 0.58) pt3dadd(78.28, 280.16, -30.88, 0.58) pt3dadd(78.34, 280.93, -30.88, 0.58) pt3dadd(78.34, 281.25, -30.88, 0.58) } axon[8] {pt3dclear() pt3dadd(14.85, -170.44, 5.18, 0.7) pt3dadd(15.87, -170.32, -29.8, 0.7) pt3dadd(15.94, -170.06, -29.8, 0.7) pt3dadd(17.22, -169.29, -29.8, 0.7) pt3dadd(18.3, -168.78, -29.8, 0.7) pt3dadd(18.88, -168.4, -29.8, 0.7) pt3dadd(19.52, -168.01, -29.8, 0.7) pt3dadd(20.29, -167.57, -29.8, 0.7) pt3dadd(20.99, -166.99, -29.8, 0.7) pt3dadd(21.31, -166.48, -29.8, 0.7) pt3dadd(21.76, -165.84, -29.8, 0.7) pt3dadd(22.01, -165.27, -29.8, 0.7) pt3dadd(22.59, -164.24, -29.8, 0.7) pt3dadd(22.91, -163.73, -29.8, 0.7) pt3dadd(23.35, -163.03, -29.8, 0.7) pt3dadd(24.06, -161.62, -29.8, 0.7) pt3dadd(24.95, -160.09, -29.8, 0.7) pt3dadd(25.78, -158.87, -29.8, 0.7) pt3dadd(27.38, -156.38, -29.8, 0.7) pt3dadd(28.09, -155.42, -29.8, 0.7) pt3dadd(28.79, -154.52, -29.8, 0.7) pt3dadd(29.81, -153.5, -29.8, 0.7) pt3dadd(31.09, -151.97, -29.8, 0.7) pt3dadd(32.24, -150.18, -29.8, 0.7) pt3dadd(33.27, -148.45, -29.8, 0.7) pt3dadd(34.16, -147.11, -29.8, 0.7) pt3dadd(34.99, -145.7, -29.8, 0.7) pt3dadd(35.82, -144.42, -29.8, 0.7) pt3dadd(36.4, -143.33, -29.8, 0.7) pt3dadd(38.19, -139.75, -29.8, 0.7) pt3dadd(38.57, -138.86, -29.8, 0.7) pt3dadd(38.64, -138.41, -29.8, 0.7) pt3dadd(39.02, -137.58, -29.8, 0.7) pt3dadd(39.47, -136.69, -29.8, 0.7) pt3dadd(39.72, -136.17, -29.8, 0.7) pt3dadd(39.91, -135.53, -29.8, 0.7) pt3dadd(39.98, -135.34, -29.8, 0.7) pt3dadd(40.99, -133.85, -33.8, 0.7) pt3dadd(40.99, -133.21, -33.8, 0.7) pt3dadd(41.69, -130.59, -33.8, 0.7) pt3dadd(42.39, -128.73, -33.8, 0.7) pt3dadd(43.74, -125.66, -33.8, 0.7) pt3dadd(44.76, -123.62, -33.8, 0.7) pt3dadd(45.65, -121.83, -33.8, 0.7) pt3dadd(45.85, -121.44, -33.8, 0.7) pt3dadd(46.29, -120.36, -33.8, 0.7) pt3dadd(47, -118.89, -33.8, 0.7) pt3dadd(47.57, -117.48, -33.8, 0.7) pt3dadd(48.15, -116.39, -33.8, 0.7) pt3dadd(48.72, -115.31, -33.8, 0.7) pt3dadd(49.3, -114.22, -33.8, 0.7) pt3dadd(49.81, -112.94, -33.8, 0.7) pt3dadd(50.19, -111.72, -33.8, 0.7) pt3dadd(50.26, -111.47, -33.8, 0.7) pt3dadd(50.26, -111.21, -33.8, 0.7) pt3dadd(50.51, -110.32, -33.8, 0.7) pt3dadd(50.51, -110, -33.8, 0.7) pt3dadd(51.03, -108.72, -33.8, 0.7) pt3dadd(51.47, -107.38, -33.8, 0.7) pt3dadd(51.73, -106.67, -33.8, 0.7) pt3dadd(51.98, -105.97, -33.8, 0.7) pt3dadd(51.98, -105.84, -33.8, 0.7) pt3dadd(51.93, -105.31, -33.8, 0.58) pt3dadd(52.06, -104.29, -33.8, 0.58) pt3dadd(52.38, -102.63, -33.8, 0.58) pt3dadd(52.89, -101.03, -33.8, 0.58) pt3dadd(53.97, -99.18, -33.8, 0.58) pt3dadd(54.81, -98.03, -33.8, 0.58) pt3dadd(56.53, -96.49, -33.8, 0.58) pt3dadd(57.49, -95.4, -33.8, 0.58) pt3dadd(58.13, -94.64, -33.8, 0.58) pt3dadd(58.58, -94.13, -33.8, 0.58) pt3dadd(59.03, -93.74, -34.12, 0.58) pt3dadd(59.98, -92.02, -33.9, 0.58) pt3dadd(60.18, -91.5, -34.12, 0.58) pt3dadd(60.82, -90.29, -34.12, 0.58) pt3dadd(61.26, -88.37, -34.12, 0.58) pt3dadd(61.14, -85.62, -34.12, 0.58) pt3dadd(60.82, -83.45, -34.12, 0.58) pt3dadd(60.88, -81.79, -34.12, 0.58) pt3dadd(61.33, -80.12, -34.12, 0.58) pt3dadd(61.77, -78.84, -34.12, 0.58) pt3dadd(61.77, -77.25, -34.12, 0.58) pt3dadd(62.08, -75.37, -21.59, 0.58) pt3dadd(62.08, -70, -21.27, 0.58) pt3dadd(62.28, -69.17, -21.27, 0.58) pt3dadd(62.53, -68.53, -16.74, 0.58) pt3dadd(62.6, -68.15, -16.41, 0.58) pt3dadd(62.72, -67.57, -16.41, 0.58) pt3dadd(64.07, -64.76, -16.2, 0.58) pt3dadd(64.13, -63.48, -16.2, 0.58) pt3dadd(64.13, -61.82, -15.66, 0.58) pt3dadd(64.07, -59.96, -15.66, 0.58) pt3dadd(64.07, -58.36, -14.9, 0.58) pt3dadd(64.13, -57.79, -14.79, 0.58) pt3dadd(64.13, -57.66, -14.79, 0.58) pt3dadd(64.51, -56.51, -14.79, 0.58) pt3dadd(64.83, -55.49, -14.79, 0.58) pt3dadd(65.28, -54.53, -14.79, 0.58) pt3dadd(66.82, -52.29, -14.79, 0.58) pt3dadd(67.65, -51.14, -14.79, 0.58) pt3dadd(68.09, -50.18, -14.79, 0.58) pt3dadd(68.22, -49.22, -14.79, 0.58) pt3dadd(68.29, -48.26, -14.79, 0.58) pt3dadd(68.29, -46.6, -14.79, 0.58) pt3dadd(68.61, -45.58, -14.79, 0.58) pt3dadd(68.93, -44.75, -14.79, 0.58) pt3dadd(69.05, -44.17, -14.79, 0.58) pt3dadd(69.05, -44.11, -14.79, 0.58) pt3dadd(70.04, -44.32, -41.14, 0.58) pt3dadd(70.1, -43.81, -41.14, 0.58) pt3dadd(70.61, -42.91, -41.14, 0.58) pt3dadd(71.25, -41.89, -41.14, 0.58) pt3dadd(72.47, -39.84, -41.14, 0.58) pt3dadd(72.72, -38.56, -41.14, 0.58) pt3dadd(73.04, -36.96, -41.14, 0.58) pt3dadd(73.62, -35.3, -41.14, 0.58) pt3dadd(74.26, -32.94, -41.14, 0.58) pt3dadd(74.77, -31.21, -41.14, 0.58) pt3dadd(75.15, -28.91, -41.14, 0.58) pt3dadd(75.73, -27.31, -41.14, 0.58) pt3dadd(76.56, -25.97, -41.14, 0.58) pt3dadd(76.82, -24.75, -41.14, 0.58) pt3dadd(77.26, -23.73, -41.14, 0.58) pt3dadd(77.46, -23.15, -41.14, 0.58) pt3dadd(77.52, -22.77, -41.14, 0.58) } } proc shape3d_10() { axon[8] { pt3dadd(77.52, -22.2, -41.14, 0.58) pt3dadd(77.97, -20.41, -41.14, 0.58) pt3dadd(78.29, -18.17, -41.14, 0.58) pt3dadd(78.29, -15.1, -41.14, 0.58) pt3dadd(78.24, -14.23, -41.14, 0.58) pt3dadd(77.79, -13.27, -41.14, 0.58) pt3dadd(77.53, -10.65, -41.14, 0.58) pt3dadd(77.34, -8.16, -41.14, 0.58) pt3dadd(78.24, -6.11, -41.14, 0.58) pt3dadd(79.26, -3.87, -41.14, 0.58) pt3dadd(80.22, -1.95, -41.57, 0.58) pt3dadd(81.31, 0.16, -42.65, 0.58) pt3dadd(82.2, 2.58, -42.65, 0.58) pt3dadd(82.52, 3.8, -44.16, 0.58) pt3dadd(82.52, 7.57, -45.89, 0.58) pt3dadd(82.71, 9.36, -45.89, 0.58) pt3dadd(83.1, 10.96, -45.89, 0.58) pt3dadd(83.1, 12.11, -45.89, 0.58) pt3dadd(83.16, 13.01, -45.89, 0.58) pt3dadd(83.22, 13.71, -45.89, 0.58) pt3dadd(83.22, 14.09, -45.89, 0.58) pt3dadd(83.29, 16.47, -29.48, 0.58) pt3dadd(83.16, 17.3, -29.48, 0.58) pt3dadd(83.04, 19.47, -29.48, 0.58) pt3dadd(83.04, 20.94, -29.48, 0.58) pt3dadd(83.36, 22.09, -29.48, 0.58) pt3dadd(84.19, 23.82, -29.48, 0.58) pt3dadd(85.08, 25.74, -29.48, 0.58) pt3dadd(86.49, 27.59, -29.48, 0.58) pt3dadd(87.64, 29.32, -29.48, 0.58) pt3dadd(88.92, 31.49, -29.48, 0.58) pt3dadd(89.69, 33.47, -29.48, 0.58) pt3dadd(90.26, 34.69, -29.48, 0.58) pt3dadd(90.9, 35.71, -29.48, 0.58) pt3dadd(91.16, 36.16, -29.48, 0.58) pt3dadd(91.8, 37.12, -29.48, 0.58) pt3dadd(92.44, 38.53, -29.48, 0.58) pt3dadd(92.69, 40.51, -29.48, 0.58) pt3dadd(92.69, 41.91, -29.48, 0.58) pt3dadd(93.01, 43.32, -29.48, 0.58) pt3dadd(93.27, 44.02, -29.48, 0.58) pt3dadd(93.27, 44.28, -29.48, 0.58) pt3dadd(93.29, 44.72, -43.62, 0.58) pt3dadd(93.42, 45.3, -43.62, 0.58) pt3dadd(93.74, 46.51, -43.62, 0.58) pt3dadd(93.87, 48.3, -43.62, 0.58) pt3dadd(93.87, 50.16, -43.62, 0.58) pt3dadd(93.8, 51.24, -43.62, 0.58) pt3dadd(94.44, 52.71, -43.62, 0.58) pt3dadd(95.47, 54.76, -43.62, 0.58) pt3dadd(95.66, 56.1, -43.62, 0.58) pt3dadd(95.79, 57.13, -43.62, 0.58) pt3dadd(95.85, 59.87, -43.62, 0.58) pt3dadd(95.85, 60.32, -43.62, 0.58) pt3dadd(96.17, 61.54, -43.62, 0.58) pt3dadd(96.23, 63.01, -43.62, 0.58) pt3dadd(95.53, 64.48, -43.62, 0.58) pt3dadd(95.21, 65.31, -43.62, 0.58) pt3dadd(95.15, 66.2, -43.62, 0.58) pt3dadd(95.34, 67.16, -43.62, 0.58) pt3dadd(95.47, 67.93, -43.62, 0.58) pt3dadd(95.72, 69.08, -43.62, 0.58) pt3dadd(96.17, 70.1, -43.62, 0.58) pt3dadd(96.74, 71.45, -43.62, 0.58) pt3dadd(97.26, 72.98, -43.62, 0.58) pt3dadd(97.38, 74.2, -43.62, 0.58) pt3dadd(97.38, 75.03, -43.62, 0.58) pt3dadd(98.13, 78.02, -43.62, 0.58) pt3dadd(97.94, 78.65, -43.62, 0.58) pt3dadd(98, 81.79, -43.62, 0.58) pt3dadd(98, 83.19, -43.62, 0.58) pt3dadd(98.39, 84.54, -43.62, 0.58) pt3dadd(98.39, 86.65, -43.62, 0.58) pt3dadd(99.03, 88.5, -43.62, 0.58) pt3dadd(100.24, 91.12, -43.62, 0.58) pt3dadd(100.69, 92.21, -43.62, 0.58) pt3dadd(101.01, 95.21, -47.83, 0.58) pt3dadd(101.01, 96.49, -47.83, 0.58) pt3dadd(101.2, 98.09, -47.83, 0.58) pt3dadd(101.26, 99.95, -47.83, 0.58) pt3dadd(101.26, 103.97, -47.83, 0.58) pt3dadd(101.52, 105, -47.83, 0.58) pt3dadd(101.65, 105.38, -47.83, 0.58) pt3dadd(101.47, 106.05, -50.53, 0.58) pt3dadd(101.79, 108.8, -50.53, 0.58) pt3dadd(102.37, 111.42, -50.53, 0.58) pt3dadd(103.01, 114.43, -50.53, 0.58) pt3dadd(103.52, 117.05, -50.53, 0.58) pt3dadd(103.9, 119.99, -50.53, 0.58) pt3dadd(104.48, 122.03, -50.53, 0.58) pt3dadd(105.24, 123.89, -50.53, 0.58) pt3dadd(105.44, 124.85, -50.53, 0.58) pt3dadd(105.5, 126.7, -50.53, 0.58) pt3dadd(105.5, 130.47, -50.53, 0.58) pt3dadd(106.14, 132.58, -50.53, 0.58) pt3dadd(107.16, 134.95, -50.53, 0.58) pt3dadd(107.99, 136.48, -50.53, 0.58) pt3dadd(108.12, 137.06, -50.53, 0.58) pt3dadd(108.12, 137.38, -50.53, 0.58) pt3dadd(108.86, 137.69, -54.31, 0.58) pt3dadd(108.8, 138.08, -54.31, 0.58) pt3dadd(108.8, 142.3, -54.31, 0.58) pt3dadd(109.31, 144.34, -54.31, 0.58) pt3dadd(110.14, 146.13, -54.31, 0.58) pt3dadd(111.48, 148.12, -54.31, 0.58) pt3dadd(112.31, 149.59, -54.31, 0.58) pt3dadd(112.89, 151.31, -54.31, 0.58) pt3dadd(113.53, 153.29, -54.31, 0.58) pt3dadd(113.78, 153.87, -54.31, 0.58) pt3dadd(112.89, 155.92, -54.31, 0.58) pt3dadd(114.17, 158.92, -54.31, 0.58) pt3dadd(114.61, 160.9, -54.53, 0.58) pt3dadd(114.68, 163.2, -54.53, 0.58) pt3dadd(115.19, 164.74, -54.85, 0.58) pt3dadd(115.96, 166.59, -54.85, 0.58) pt3dadd(116.34, 168.06, -54.85, 0.58) pt3dadd(116.47, 168.64, -54.85, 0.58) pt3dadd(117.39, 170.88, -59.71, 0.58) pt3dadd(117.77, 171.59, -59.71, 0.58) pt3dadd(120.58, 175.81, -59.71, 0.58) pt3dadd(121.61, 178.3, -59.71, 0.58) pt3dadd(122.37, 180.92, -59.71, 0.58) pt3dadd(122.89, 183.1, -59.71, 0.58) pt3dadd(123.46, 184.89, -59.71, 0.58) pt3dadd(123.97, 185.97, -59.71, 0.58) pt3dadd(124.04, 186.04, -59.71, 0.58) pt3dadd(124.55, 188.79, -63.06, 0.58) pt3dadd(124.61, 190.83, -63.06, 0.58) pt3dadd(124.61, 194.86, -63.06, 0.58) pt3dadd(125.06, 196.78, -63.06, 0.58) pt3dadd(125.38, 198.25, -63.06, 0.58) pt3dadd(125.32, 199.4, -63.06, 0.58) pt3dadd(125.06, 200.68, -63.06, 0.58) pt3dadd(125.06, 200.74, -63.06, 0.58) pt3dadd(126.28, 201.94, -67.48, 0.58) pt3dadd(126.28, 204.5, -67.48, 0.58) pt3dadd(127.05, 207.89, -67.48, 0.58) pt3dadd(127.88, 211.28, -67.48, 0.58) pt3dadd(128.84, 214.09, -67.48, 0.58) pt3dadd(130.24, 216.9, -67.48, 0.58) pt3dadd(130.88, 218.31, -67.48, 0.58) pt3dadd(131.01, 218.95, -67.48, 0.58) pt3dadd(131.2, 219.78, -67.48, 0.58) pt3dadd(131.2, 221.38, -67.48, 0.58) pt3dadd(131.78, 223.87, -67.48, 0.58) pt3dadd(132.48, 225.98, -67.48, 0.58) pt3dadd(133.38, 227.84, -67.48, 0.58) pt3dadd(134.34, 230.01, -67.48, 0.58) pt3dadd(134.85, 231.61, -67.48, 0.58) pt3dadd(134.97, 232.5, -67.48, 0.58) pt3dadd(135.04, 233.14, -67.48, 0.58) pt3dadd(136, 234.94, -73.53, 0.58) pt3dadd(135.94, 235.2, -73.53, 0.58) pt3dadd(136.07, 239.16, -73.53, 0.58) pt3dadd(136.96, 242.11, -73.53, 0.58) pt3dadd(137.92, 244.54, -73.53, 0.58) pt3dadd(138.5, 246.77, -73.53, 0.58) pt3dadd(138.75, 248.69, -73.53, 0.58) pt3dadd(138.88, 249.65, -74.29, 0.58) pt3dadd(138.37, 251.7, -78.28, 0.58) pt3dadd(138.24, 254.25, -78.28, 0.58) pt3dadd(138.5, 257.32, -78.28, 0.58) pt3dadd(139.14, 260.14, -78.28, 0.58) pt3dadd(139.71, 261.93, -78.28, 0.58) pt3dadd(140.35, 263.46, -78.28, 0.58) pt3dadd(140.8, 264.48, -78.28, 0.58) pt3dadd(140.86, 264.93, -78.28, 0.58) pt3dadd(141.09, 266.36, -85.62, 0.58) pt3dadd(141.22, 266.81, -85.62, 0.58) pt3dadd(142.75, 273.07, -85.62, 0.58) pt3dadd(143.46, 276.02, -85.62, 0.58) pt3dadd(144.42, 279.02, -85.62, 0.58) pt3dadd(145.18, 281.32, -85.62, 0.58) pt3dadd(145.25, 282.73, -85.62, 0.58) pt3dadd(145.25, 286.31, -85.62, 0.58) pt3dadd(145.31, 286.88, -85.62, 0.58) pt3dadd(145.31, 287.01, -85.62, 0.58) pt3dadd(145.5, 288.55, -85.62, 0.58) pt3dadd(145.82, 290.47, -85.62, 0.58) pt3dadd(146.21, 292.89, -85.62, 0.58) pt3dadd(146.4, 293.92, -85.62, 0.58) pt3dadd(146.4, 294.43, -85.62, 0.58) pt3dadd(146.53, 295.07, -85.62, 0.58) pt3dadd(146.6, 297.6, -87.57, 0.58) pt3dadd(146.79, 298.23, -87.57, 0.58) pt3dadd(148.07, 300.6, -87.57, 0.58) pt3dadd(148.65, 302.39, -87.57, 0.58) pt3dadd(148.65, 303.8, -87.57, 0.58) pt3dadd(148.2, 305.84, -87.57, 0.58) pt3dadd(148.26, 307.7, -87.57, 0.58) pt3dadd(148.77, 309.55, -87.57, 0.58) pt3dadd(149.41, 311.53, -87.57, 0.58) pt3dadd(149.8, 313.32, -87.57, 0.58) pt3dadd(150.37, 315.5, -87.57, 0.58) pt3dadd(151.78, 317.54, -87.57, 0.58) pt3dadd(153.12, 319.78, -87.57, 0.58) pt3dadd(153.7, 321.06, -87.57, 0.58) pt3dadd(153.83, 323.62, -87.57, 0.58) pt3dadd(153.63, 325.02, -87.57, 0.58) pt3dadd(153.51, 325.47, -87.57, 0.58) } } proc shape3d_11() { axon[8] { pt3dadd(154.55, 326.79, -92.1, 0.58) pt3dadd(154.36, 327.43, -82.82, 0.58) pt3dadd(154.23, 328.64, -82.82, 0.58) pt3dadd(154.36, 330.63, -82.82, 0.58) pt3dadd(155.96, 334.01, -82.82, 0.58) pt3dadd(157.17, 337.53, -82.82, 0.58) pt3dadd(157.3, 339.96, -82.82, 0.58) pt3dadd(157.3, 342.07, -82.82, 0.58) pt3dadd(157.88, 343.99, -82.82, 0.58) pt3dadd(158.77, 345.91, -82.82, 0.58) pt3dadd(159.41, 347.12, -82.82, 0.58) pt3dadd(159.86, 348.02, -82.82, 0.58) pt3dadd(159.86, 350.06, -82.82, 0.58) pt3dadd(159.99, 351.66, -82.82, 0.58) pt3dadd(160.31, 353.83, -82.82, 0.58) pt3dadd(160.5, 354.41, -82.82, 0.58) pt3dadd(160.69, 354.73, -82.82, 0.58) pt3dadd(161.53, 359.6, -82.82, 0.58) pt3dadd(161.47, 360.24, -82.82, 0.58) pt3dadd(161.47, 361.84, -82.82, 0.58) pt3dadd(161.98, 363.5, -82.82, 0.58) pt3dadd(162.75, 365.54, -82.82, 0.58) pt3dadd(162.87, 367.4, -82.82, 0.58) pt3dadd(162.87, 369.44, -82.82, 0.58) pt3dadd(162.75, 370.66, -82.82, 0.58) pt3dadd(162.68, 371.68, -82.82, 0.58) pt3dadd(162.62, 372.83, -82.82, 0.58) pt3dadd(162.81, 374.81, -82.82, 0.58) pt3dadd(163.26, 376.48, -82.82, 0.58) pt3dadd(163.26, 376.73, -82.82, 0.58) pt3dadd(163.45, 377.44, -82.82, 0.58) pt3dadd(163.83, 378.33, -82.82, 0.58) pt3dadd(164.6, 380.5, -82.82, 0.58) pt3dadd(164.6, 381.02, -82.82, 0.58) pt3dadd(164.86, 382.1, -82.82, 0.58) pt3dadd(164.86, 382.61, -82.82, 0.58) pt3dadd(165.72, 385.39, -82.82, 0.58) pt3dadd(165.66, 385.58, -82.82, 0.58) pt3dadd(165.66, 387.69, -82.82, 0.58) pt3dadd(165.21, 389.61, -82.82, 0.58) pt3dadd(164.83, 391.21, -82.82, 0.58) pt3dadd(164.76, 393.51, -82.82, 0.58) pt3dadd(165.66, 395.94, -82.82, 0.58) pt3dadd(166.36, 397.92, -82.82, 0.58) pt3dadd(166.55, 398.88, -82.82, 0.58) pt3dadd(166.55, 399.07, -82.82, 0.58) pt3dadd(166.81, 398.88, -91.67, 0.58) pt3dadd(166.81, 403.8, -94.15, 0.58) pt3dadd(166.62, 405.98, -94.15, 0.58) pt3dadd(166.3, 408.53, -94.15, 0.58) pt3dadd(166.23, 410.19, -94.15, 0.58) pt3dadd(166.55, 411.6, -94.15, 0.58) pt3dadd(166.87, 412.5, -94.15, 0.58) pt3dadd(167.03, 415.03, -94.15, 0.58) pt3dadd(167.03, 415.93, -94.15, 0.58) pt3dadd(166.71, 417.97, -94.15, 0.58) pt3dadd(166.9, 420.27, -94.15, 0.58) pt3dadd(167.67, 422.32, -94.26, 0.58) pt3dadd(168.24, 424.17, -94.58, 0.58) pt3dadd(168.37, 425.39, -94.58, 0.58) pt3dadd(168.37, 425.45, -94.58, 0.58) pt3dadd(168.56, 426.09, -98.69, 0.58) pt3dadd(168.69, 427.31, -98.69, 0.58) pt3dadd(168.63, 429.48, -98.69, 0.58) pt3dadd(167.54, 432.55, -98.69, 0.58) pt3dadd(167.22, 434.53, -98.69, 0.58) pt3dadd(167.92, 436.9, -98.69, 0.58) pt3dadd(168.05, 438.18, -98.69, 0.58) pt3dadd(167.86, 439.26, -98.69, 0.58) pt3dadd(167.48, 440.29, -98.69, 0.58) pt3dadd(167.41, 440.48, -98.69, 0.58) pt3dadd(167.35, 440.48, -98.69, 0.58) pt3dadd(167.02, 444.05, -88.21, 0.58) pt3dadd(167.21, 445.21, -88.21, 0.58) pt3dadd(167.21, 448.08, -88.21, 0.58) pt3dadd(166.82, 449.81, -88.21, 0.58) pt3dadd(167.34, 451.54, -88.21, 0.58) pt3dadd(168.1, 453.01, -88.21, 0.58) pt3dadd(168.17, 453.58, -88.21, 0.58) pt3dadd(168.17, 453.65, -96.74, 0.58) pt3dadd(168.42, 455.44, -96.74, 0.58) pt3dadd(168.42, 456.78, -96.74, 0.58) pt3dadd(169.13, 461.64, -96.74, 0.58) pt3dadd(169.77, 464.58, -96.74, 0.58) pt3dadd(169.77, 469.82, -96.74, 0.58) pt3dadd(169.96, 471.48, -96.74, 0.58) pt3dadd(169.96, 472.25, -96.74, 0.58) pt3dadd(170.26, 474.08, -100.63, 0.58) pt3dadd(170.46, 476.7, -100.63, 0.58) pt3dadd(170.2, 478.94, -100.63, 0.58) pt3dadd(170.01, 481.94, -100.63, 0.58) pt3dadd(170.01, 484.82, -100.63, 0.58) pt3dadd(169.88, 487.06, -100.63, 0.58) pt3dadd(169.69, 488.34, -100.63, 0.58) pt3dadd(169.69, 488.4, -100.63, 0.58) pt3dadd(169.05, 490.77, -100.63, 0.58) pt3dadd(169.11, 494.48, -100.63, 0.58) pt3dadd(169.3, 496.46, -100.63, 0.58) pt3dadd(169.82, 498.38, -100.63, 0.58) pt3dadd(170.39, 499.85, -100.63, 0.58) pt3dadd(170.65, 501.64, -100.63, 0.58) pt3dadd(170.65, 504.96, -100.63, 0.58) pt3dadd(171.62, 506.89, -100.63, 0.58) pt3dadd(171.56, 507.79, -100.63, 0.58) pt3dadd(172.33, 511.82, -100.63, 0.58) pt3dadd(173.99, 514.69, -100.63, 0.58) pt3dadd(174.95, 516.61, -100.63, 0.58) pt3dadd(175.33, 518.21, -100.63, 0.58) pt3dadd(175.33, 519.17, -100.63, 0.58) pt3dadd(175.27, 519.62, -100.63, 0.58) pt3dadd(175.27, 521.09, -104.95, 0.58) pt3dadd(175.14, 524.09, -104.95, 0.58) pt3dadd(174.82, 528.12, -104.95, 0.58) pt3dadd(174.76, 530.87, -104.95, 0.58) pt3dadd(175.27, 533.11, -104.95, 0.58) pt3dadd(175.72, 535.6, -104.95, 0.58) pt3dadd(175.72, 537.13, -104.95, 0.58) pt3dadd(174.7, 538.96, -99.55, 0.58) pt3dadd(174.7, 539.48, -99.55, 0.58) pt3dadd(175.14, 542.35, -99.55, 0.58) pt3dadd(174.63, 545.74, -99.55, 0.58) pt3dadd(173.8, 548.68, -99.55, 0.58) pt3dadd(173.74, 551.75, -99.55, 0.58) pt3dadd(174.06, 553.99, -99.55, 0.58) pt3dadd(174.44, 555.97, -99.55, 0.58) pt3dadd(174.76, 557.12, -99.55, 0.58) pt3dadd(174.76, 557.38, -99.55, 0.58) pt3dadd(174.82, 557.25, -99.55, 0.58) pt3dadd(175.14, 558.72, -99.55, 0.58) pt3dadd(175.14, 562.05, -99.55, 0.58) pt3dadd(175.27, 562.88, -99.55, 0.58) pt3dadd(175.53, 563.32, -99.55, 0.58) pt3dadd(175.53, 564.09, -99.55, 0.58) pt3dadd(175.72, 565.5, -99.55, 0.58) pt3dadd(175.78, 565.95, -99.55, 0.58) pt3dadd(175.78, 566.01, -99.55, 0.58) pt3dadd(175.64, 568.7, -113.48, 0.58) pt3dadd(174.56, 571.64, -113.48, 0.58) pt3dadd(173.47, 574.39, -113.48, 0.58) pt3dadd(172.83, 577.45, -113.48, 0.58) pt3dadd(173.15, 581.99, -113.48, 0.58) pt3dadd(173.34, 584.3, -113.48, 0.58) pt3dadd(173.53, 585.19, -113.48, 0.58) pt3dadd(174.3, 587.62, -113.48, 0.58) pt3dadd(175.13, 591.14, -113.48, 0.58) pt3dadd(175.07, 595.74, -113.48, 0.58) pt3dadd(175, 597.98, -113.48, 0.58) pt3dadd(174.7, 600, -113.48, 0.58) pt3dadd(175.78, 604.54, -113.48, 0.58) pt3dadd(176.55, 607.99, -113.48, 0.58) pt3dadd(177.32, 610.42, -113.48, 0.58) pt3dadd(178.47, 612.92, -113.48, 0.58) pt3dadd(178.92, 614.39, -113.48, 0.58) pt3dadd(179.04, 615.47, -113.48, 0.58) pt3dadd(179.36, 618.16, -113.48, 0.58) pt3dadd(179.3, 619.82, -113.48, 0.58) pt3dadd(179.3, 624.1, -113.48, 0.58) pt3dadd(179.75, 626.85, -113.48, 0.58) pt3dadd(180.39, 628.52, -113.48, 0.58) pt3dadd(180.45, 629.35, -113.48, 0.58) pt3dadd(180.45, 629.67, -113.48, 0.58) pt3dadd(181.3, 631.02, -119.96, 0.58) pt3dadd(181.3, 633.45, -119.96, 0.58) pt3dadd(181.56, 638.05, -119.96, 0.58) pt3dadd(181.62, 641.31, -119.96, 0.58) pt3dadd(181.69, 643.8, -119.96, 0.58) pt3dadd(182.07, 646.3, -119.96, 0.58) pt3dadd(182.52, 647.51, -119.96, 0.58) pt3dadd(182.52, 649.49, -119.96, 0.58) pt3dadd(182.52, 651.67, -119.96, 0.58) pt3dadd(182.58, 654.93, -119.96, 0.58) pt3dadd(183.16, 657.61, -119.96, 0.58) pt3dadd(183.48, 659.21, -119.96, 0.58) pt3dadd(184.18, 660.68, -119.96, 0.58) pt3dadd(184.63, 661.64, -119.96, 0.58) pt3dadd(184.76, 662.22, -119.96, 0.58) pt3dadd(184.76, 662.35, -119.96, 0.58) pt3dadd(185.56, 664.74, -119.96, 0.58) pt3dadd(185.56, 667.68, -119.96, 0.58) pt3dadd(185.75, 670.49, -119.96, 0.58) pt3dadd(185.88, 673.5, -119.96, 0.58) pt3dadd(185.88, 677.34, -119.96, 0.58) pt3dadd(185.81, 678.55, -119.96, 0.58) pt3dadd(185.62, 680.02, -119.96, 0.58) pt3dadd(185.62, 683.79, -119.96, 0.58) pt3dadd(185.88, 686.73, -119.96, 0.58) pt3dadd(186.84, 689.42, -119.96, 0.58) pt3dadd(187.29, 691.15, -119.96, 0.58) pt3dadd(187.48, 692.74, -119.96, 0.58) pt3dadd(187.48, 693.77, -119.96, 0.58) pt3dadd(188.36, 692.94, -128.27, 0.58) pt3dadd(191.04, 707.9, -128.49, 0.58) pt3dadd(191.68, 709.95, -129.57, 0.58) pt3dadd(191.62, 710.27, -129.57, 0.58) pt3dadd(190.85, 712.25, -129.57, 0.58) pt3dadd(189.83, 716.22, -129.57, 0.58) pt3dadd(189.57, 720.18, -129.57, 0.58) pt3dadd(189.57, 725.3, -129.57, 0.58) pt3dadd(189.85, 728.34, -129.57, 0.58) pt3dadd(190.17, 730.26, -129.57, 0.58) } } proc shape3d_12() { axon[8] { pt3dadd(190.23, 734.1, -129.57, 0.58) pt3dadd(190.04, 738.19, -129.57, 0.58) pt3dadd(189.34, 741, -129.57, 0.58) pt3dadd(188.63, 743.3, -129.57, 0.58) pt3dadd(188.31, 744.46, -129.57, 0.58) pt3dadd(188.19, 745.73, -129.57, 0.58) pt3dadd(188.89, 749.25, -129.57, 0.58) pt3dadd(189.66, 751.68, -129.57, 0.58) pt3dadd(190.23, 753.53, -129.57, 0.58) pt3dadd(190.42, 754.24, -129.57, 0.58) pt3dadd(189.89, 752.98, -117.8, 0.58) pt3dadd(190.34, 754.89, -117.8, 0.58) pt3dadd(191.87, 758.92, -117.8, 0.58) pt3dadd(192.64, 762.76, -117.8, 0.58) pt3dadd(192.7, 766.34, -117.8, 0.58) pt3dadd(192.64, 768.51, -117.8, 0.58) pt3dadd(192.64, 769.22, -117.8, 0.58) pt3dadd(192.7, 770.75, -114.78, 0.58) pt3dadd(192.83, 771.2, -114.78, 0.58) pt3dadd(193.47, 772.99, -114.78, 0.58) pt3dadd(193.6, 776.31, -114.78, 0.58) pt3dadd(192.77, 779.13, -114.78, 0.58) pt3dadd(192.51, 781.24, -114.78, 0.58) pt3dadd(192.89, 783.67, -114.78, 0.58) pt3dadd(193.53, 785.58, -114.78, 0.58) pt3dadd(193.92, 786.35, -114.78, 0.58) pt3dadd(193.92, 786.48, -114.78, 0.58) pt3dadd(195.67, 788.71, -114.78, 0.58) pt3dadd(195.93, 790.95, -114.78, 0.58) pt3dadd(197.27, 795.23, -114.78, 0.58) pt3dadd(197.97, 798.43, -114.78, 0.58) pt3dadd(198.36, 801.12, -114.78, 0.58) pt3dadd(198.55, 803.67, -114.78, 0.58) pt3dadd(199.32, 805.66, -114.78, 0.58) pt3dadd(199.38, 806.04, -114.78, 0.58) pt3dadd(199.25, 807.13, -114.78, 0.58) pt3dadd(199.32, 808.02, -114.78, 0.58) pt3dadd(199, 810.26, -114.78, 0.58) pt3dadd(198.87, 813.14, -114.78, 0.58) pt3dadd(199.95, 815.44, -114.78, 0.58) pt3dadd(200.85, 816.97, -114.78, 0.58) pt3dadd(201.55, 818.44, -114.78, 0.58) pt3dadd(201.55, 819.53, -114.78, 0.58) pt3dadd(202.95, 822.56, -114.78, 0.58) pt3dadd(204.81, 825.82, -114.78, 0.58) pt3dadd(205.38, 829.53, -114.78, 0.58) pt3dadd(205.38, 836.88, -114.78, 0.58) pt3dadd(205.51, 836.5, -128.6, 0.58) pt3dadd(205.7, 837.65, -128.6, 0.58) pt3dadd(206.66, 841.04, -128.6, 0.58) pt3dadd(206.79, 842.96, -128.6, 0.58) pt3dadd(206.79, 847.11, -128.6, 0.58) pt3dadd(207.23, 848.84, -128.6, 0.58) pt3dadd(207.49, 849.73, -128.6, 0.58) pt3dadd(207.49, 850.18, -128.6, 0.58) } dend {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(-7.89, -8.53, -13.39, 3.71) pt3dadd(-8.6, -8.92, -13.39, 3.71) pt3dadd(-9.3, -9.05, -13.39, 3.71) pt3dadd(-11.09, -9.05, -13.39, 3.71) pt3dadd(-11.73, -9.17, -13.39, 3.71) pt3dadd(-12.82, -9.17, -13.39, 3.58) pt3dadd(-13.26, -9.43, -13.39, 3.58) pt3dadd(-13.65, -9.56, -13.39, 3.58) pt3dadd(-13.9, -9.62, -13.39, 3.58) pt3dadd(-14.22, -9.69, -13.39, 3.52) pt3dadd(-14.48, -9.88, -13.39, 3.39) pt3dadd(-14.61, -9.94, -13.39, 3.39) pt3dadd(-14.86, -10, -13.39, 3.39) pt3dadd(-15.24, -10.07, -13.39, 3.39) pt3dadd(-15.56, -10.07, -13.39, 3.32) pt3dadd(-15.76, -10.2, -13.39, 3.2) pt3dadd(-16.72, -10.2, -13.39, 3.07) pt3dadd(-16.97, -10.45, -13.39, 2.94) pt3dadd(-17.04, -10.52, -13.39, 2.94) pt3dadd(-17.1, -10.64, -13.39, 2.94) pt3dadd(-17.16, -10.64, -13.39, 2.94) } dend[1] {pt3dclear() pt3dadd(-17.16, -10.64, -13.39, 1.98) pt3dadd(-18.63, -10.39, -13.39, 1.98) pt3dadd(-19.15, -10.39, -13.39, 1.98) pt3dadd(-19.98, -10.64, -13.39, 1.98) pt3dadd(-20.81, -10.71, -13.39, 1.98) pt3dadd(-21.64, -10.71, -13.39, 1.98) pt3dadd(-22.66, -10.9, -13.39, 1.98) pt3dadd(-23.62, -11.16, -13.39, 1.98) pt3dadd(-24.52, -11.22, -13.39, 1.98) pt3dadd(-25.48, -11.16, -13.39, 1.98) pt3dadd(-26.31, -11.16, -13.39, 1.98) pt3dadd(-26.95, -11.28, -13.39, 1.98) pt3dadd(-27.59, -11.67, -13.39, 1.92) pt3dadd(-28.35, -11.67, -13.39, 1.92) pt3dadd(-28.61, -11.48, -13.39, 1.92) pt3dadd(-30.08, -11.54, -13.39, 1.92) pt3dadd(-30.59, -11.6, -13.39, 1.92) pt3dadd(-31.49, -11.8, -13.39, 1.92) pt3dadd(-33.28, -11.8, -13.39, 1.92) pt3dadd(-34.3, -11.86, -13.39, 1.92) pt3dadd(-35.32, -11.99, -13.39, 1.92) pt3dadd(-36.66, -12.24, -13.39, 1.92) pt3dadd(-37.56, -12.31, -13.39, 1.92) pt3dadd(-38.45, -12.37, -13.39, 1.92) pt3dadd(-38.97, -12.37, -13.39, 1.92) pt3dadd(-39.48, -11.92, -13.39, 1.92) pt3dadd(-39.93, -11.22, -13.39, 1.92) pt3dadd(-39.99, -10.71, -13.39, 1.92) pt3dadd(-39.99, -9.43, -13.39, 1.92) pt3dadd(-40.31, -9.11, -13.39, 1.92) pt3dadd(-40.63, -8.73, -13.39, 1.92) pt3dadd(-41.14, -8.47, -13.39, 1.92) pt3dadd(-41.52, -8.34, -13.39, 1.92) pt3dadd(-42.23, -8.34, -13.39, 1.92) pt3dadd(-42.8, -8.53, -13.39, 1.92) pt3dadd(-43.25, -8.85, -13.39, 1.92) pt3dadd(-43.63, -9.17, -13.39, 1.92) pt3dadd(-44.02, -9.43, -13.39, 1.92) pt3dadd(-44.27, -9.69, -13.39, 1.92) pt3dadd(-44.4, -9.81, -13.39, 1.92) pt3dadd(-44.46, -9.81, -13.39, 1.92) } dend[2] {pt3dclear() pt3dadd(-44.46, -9.81, -13.39, 1.53) pt3dadd(-43.7, -10.45, -31.42, 1.53) pt3dadd(-43.63, -10.52, -31.42, 1.53) pt3dadd(-43.63, -11.28, -31.42, 1.53) pt3dadd(-44.02, -11.54, -31.42, 1.53) pt3dadd(-44.34, -11.92, -31.42, 1.53) pt3dadd(-44.72, -12.11, -31.42, 1.53) pt3dadd(-45.1, -12.31, -31.42, 1.53) pt3dadd(-45.42, -12.69, -31.42, 1.53) pt3dadd(-45.81, -12.95, -31.42, 1.53) pt3dadd(-46.19, -13.39, -31.42, 1.53) pt3dadd(-46.77, -14.16, -31.42, 1.53) pt3dadd(-47.34, -14.8, -31.42, 1.53) pt3dadd(-48.05, -15.57, -31.42, 1.53) pt3dadd(-48.62, -15.95, -31.42, 1.53) pt3dadd(-49.39, -16.53, -31.42, 1.53) pt3dadd(-49.84, -17.1, -31.42, 1.53) pt3dadd(-50.03, -17.36, -31.42, 1.53) pt3dadd(-50.66, -17.89, -31.42, 1.53) pt3dadd(-50.91, -18.01, -31.42, 1.53) pt3dadd(-51.49, -18.91, -31.42, 1.53) pt3dadd(-52.19, -19.74, -31.42, 1.53) pt3dadd(-52.64, -20.38, -31.42, 1.53) pt3dadd(-53.28, -20.89, -31.42, 1.53) pt3dadd(-54.05, -21.66, -31.42, 1.53) pt3dadd(-54.62, -22.1, -31.42, 1.53) pt3dadd(-55.07, -22.36, -31.42, 1.53) pt3dadd(-55.39, -22.55, -31.42, 1.53) pt3dadd(-55.9, -22.68, -31.42, 1.53) pt3dadd(-56.29, -22.74, -31.42, 1.53) pt3dadd(-56.61, -22.87, -31.42, 1.53) pt3dadd(-57.24, -23.58, -31.42, 1.53) pt3dadd(-57.63, -24.02, -31.42, 1.53) pt3dadd(-57.95, -24.34, -31.42, 1.53) pt3dadd(-58.14, -24.53, -31.42, 1.53) pt3dadd(-58.2, -24.6, -31.42, 1.53) pt3dadd(-58.33, -24.79, -31.42, 1.53) pt3dadd(-58.33, -24.98, -31.42, 1.53) pt3dadd(-58.4, -25.24, -31.42, 1.53) pt3dadd(-58.4, -25.49, -31.42, 1.53) pt3dadd(-58.65, -26.39, -31.42, 1.53) pt3dadd(-59.04, -27.28, -31.42, 1.53) pt3dadd(-59.35, -27.8, -31.42, 1.53) pt3dadd(-59.55, -28.05, -31.42, 1.53) pt3dadd(-59.8, -28.31, -31.42, 1.53) pt3dadd(-59.87, -28.56, -31.42, 1.53) pt3dadd(-59.74, -28.56, -36.49, 1.53) pt3dadd(-59.99, -28.82, -36.49, 1.53) pt3dadd(-60.19, -28.95, -36.49, 1.53) pt3dadd(-60.44, -29.2, -36.49, 1.53) pt3dadd(-60.51, -29.27, -36.49, 1.53) pt3dadd(-60.51, -29.39, -36.49, 1.79) pt3dadd(-60.57, -29.52, -36.49, 1.92) pt3dadd(-60.63, -29.52, -36.49, 1.92) } dend[3] {pt3dclear() pt3dadd(-60.63, -29.52, -36.49, 1.6) pt3dadd(-60.06, -31.25, -36.49, 1.6) pt3dadd(-60.06, -31.57, -36.49, 1.6) pt3dadd(-59.93, -32.97, -36.49, 1.6) pt3dadd(-60.12, -33.74, -36.49, 1.6) pt3dadd(-60.83, -34.44, -36.49, 1.6) pt3dadd(-61.59, -35.02, -36.49, 1.6) pt3dadd(-62.42, -35.53, -36.49, 1.6) pt3dadd(-63.13, -35.79, -36.49, 1.6) pt3dadd(-64.21, -35.79, -36.49, 1.6) pt3dadd(-64.6, -36.04, -36.49, 1.6) pt3dadd(-64.85, -36.3, -36.49, 1.6) pt3dadd(-64.98, -36.43, -36.49, 1.6) } dend[4] {pt3dclear() pt3dadd(-64.98, -36.43, -36.49, 1.02) pt3dadd(-66, -37.32, -36.49, 1.02) pt3dadd(-66.77, -38.15, -36.49, 1.02) pt3dadd(-66.9, -38.86, -36.49, 1.02) pt3dadd(-66.84, -39.82, -36.49, 1.02) pt3dadd(-66.52, -40.58, -36.49, 1.02) pt3dadd(-66, -41.61, -36.49, 1.02) pt3dadd(-65.81, -42.63, -36.49, 1.02) pt3dadd(-66.07, -43.01, -36.49, 1.02) pt3dadd(-66.84, -43.72, -36.49, 1.02) pt3dadd(-67.54, -44.42, -36.49, 1.02) pt3dadd(-68.05, -44.8, -36.49, 1.02) pt3dadd(-68.37, -45.25, -36.49, 1.02) pt3dadd(-68.56, -45.51, -36.49, 1.02) pt3dadd(-68.63, -45.51, -36.49, 1.02) } } proc shape3d_13() { dend[4] { pt3dadd(-68.39, -46, -41.57, 1.02) pt3dadd(-68.78, -46.7, -41.57, 1.02) pt3dadd(-69.41, -47.86, -41.57, 1.02) pt3dadd(-69.73, -48.62, -41.57, 1.02) pt3dadd(-70.18, -49.33, -41.57, 1.02) pt3dadd(-70.57, -49.97, -41.57, 1.02) pt3dadd(-70.89, -50.41, -41.57, 1.02) pt3dadd(-71.08, -51.18, -41.57, 1.02) pt3dadd(-71.14, -52.08, -41.57, 1.02) pt3dadd(-71.14, -53.23, -41.57, 1.02) pt3dadd(-70.76, -54.06, -41.57, 1.02) pt3dadd(-70.18, -54.7, -41.68, 1.02) pt3dadd(-69.73, -55.14, -41.68, 1.02) pt3dadd(-69.67, -55.34, -43.62, 1.02) pt3dadd(-69.41, -55.53, -46, 1.02) pt3dadd(-68.78, -56.17, -46, 1.02) pt3dadd(-68.52, -56.42, -46, 1.02) pt3dadd(-68.07, -57.13, -46, 1.02) pt3dadd(-68.07, -57.96, -46, 1.02) pt3dadd(-68.33, -58.98, -46.1, 1.02) pt3dadd(-68.71, -59.68, -46.1, 1.02) pt3dadd(-69.29, -60.45, -47.62, 1.02) pt3dadd(-69.73, -61.09, -48.7, 1.02) pt3dadd(-70.12, -61.6, -48.7, 1.02) pt3dadd(-70.69, -62.43, -49.24, 1.02) pt3dadd(-70.76, -62.69, -49.24, 1.02) pt3dadd(-71.52, -62.94, -49.45, 1.02) pt3dadd(-72.29, -63.9, -49.45, 1.02) pt3dadd(-72.87, -64.93, -50.21, 1.02) pt3dadd(-73.25, -65.82, -50.21, 1.02) pt3dadd(-73.57, -66.72, -50.53, 1.02) pt3dadd(-73.63, -67.29, -50.96, 1.02) pt3dadd(-73.51, -68.12, -51.5, 1.02) pt3dadd(-73, -68.89, -51.5, 1.02) pt3dadd(-72.61, -69.47, -51.5, 1.02) pt3dadd(-72.04, -70.3, -51.83, 1.02) pt3dadd(-72.04, -71.19, -51.83, 1.02) pt3dadd(-72.42, -71.7, -51.83, 1.02) pt3dadd(-72.61, -72.41, -51.83, 1.02) pt3dadd(-72.8, -73.05, -51.83, 1.02) pt3dadd(-72.87, -73.43, -51.83, 1.02) pt3dadd(-72.69, -73.77, -51.83, 0.96) pt3dadd(-72.31, -74.53, -51.83, 0.96) pt3dadd(-71.8, -75.04, -51.83, 0.96) pt3dadd(-71.35, -75.24, -51.83, 0.96) pt3dadd(-70.2, -76.58, -51.83, 0.96) pt3dadd(-69.49, -77.54, -51.83, 0.96) pt3dadd(-69.24, -77.99, -51.83, 0.96) pt3dadd(-69.11, -78.82, -51.83, 0.96) pt3dadd(-68.66, -79.71, -51.83, 0.96) pt3dadd(-68.09, -80.67, -51.83, 0.96) pt3dadd(-68.09, -81.5, -51.83, 0.83) pt3dadd(-68.02, -81.76, -51.83, 0.77) pt3dadd(-68.02, -83.04, -51.83, 0.77) pt3dadd(-67.96, -83.61, -51.83, 0.77) pt3dadd(-67.9, -84.19, -51.83, 0.77) pt3dadd(-67.77, -85.21, -51.83, 0.77) pt3dadd(-67.77, -85.85, -51.83, 0.77) pt3dadd(-67.64, -86.49, -51.83, 0.77) pt3dadd(-67.64, -87, -51.83, 0.77) pt3dadd(-67.96, -88.34, -51.83, 0.77) pt3dadd(-67.96, -89.94, -51.83, 0.77) pt3dadd(-67.9, -90.52, -51.83, 0.77) pt3dadd(-67.9, -92.75, -54.74, 0.77) pt3dadd(-67.96, -92.82, -54.74, 0.77) pt3dadd(-68.09, -92.95, -54.74, 0.77) pt3dadd(-68.22, -93.27, -54.74, 0.77) pt3dadd(-68.22, -96.59, -51.4, 0.77) pt3dadd(-68.34, -96.78, -51.18, 0.77) pt3dadd(-68.54, -96.97, -51.07, 0.77) pt3dadd(-68.92, -97.04, -51.07, 0.77) pt3dadd(-69.05, -97.17, -51.07, 0.77) pt3dadd(-69.11, -97.17, -51.07, 0.77) } dend[5] {pt3dclear() pt3dadd(-64.98, -36.43, -36.49, 1.28) pt3dadd(-64.75, -36.16, -28.07, 1.28) pt3dadd(-64.75, -36.35, -28.07, 1.28) pt3dadd(-65.01, -37.19, -28.07, 1.28) pt3dadd(-65.39, -37.82, -28.07, 1.28) pt3dadd(-65.84, -38.4, -28.07, 1.28) pt3dadd(-66.1, -38.91, -28.07, 1.28) pt3dadd(-66.54, -39.36, -28.07, 1.28) pt3dadd(-66.86, -39.81, -28.07, 1.28) pt3dadd(-67.25, -40.51, -28.07, 1.28) pt3dadd(-67.76, -41.28, -28.07, 1.28) pt3dadd(-68.14, -41.98, -28.07, 1.28) pt3dadd(-68.52, -42.56, -28.07, 1.28) pt3dadd(-68.91, -43.26, -28.07, 1.28) pt3dadd(-69.36, -43.77, -28.07, 1.28) pt3dadd(-69.74, -44.22, -28.07, 1.28) pt3dadd(-70.32, -45.05, -28.07, 1.28) pt3dadd(-70.7, -45.69, -28.07, 1.28) pt3dadd(-71.15, -46.65, -28.07, 1.28) pt3dadd(-71.59, -47.8, -28.07, 1.28) pt3dadd(-71.98, -48.63, -28.07, 1.28) pt3dadd(-72.3, -49.27, -28.07, 1.28) pt3dadd(-72.68, -49.91, -28.07, 1.28) pt3dadd(-73.13, -50.68, -28.07, 1.28) pt3dadd(-73.45, -51.25, -28.07, 1.28) pt3dadd(-73.9, -51.89, -28.07, 1.28) pt3dadd(-74.28, -52.47, -28.07, 1.28) pt3dadd(-74.66, -52.98, -28.07, 1.28) pt3dadd(-74.92, -53.36, -28.07, 1.28) pt3dadd(-75.11, -53.49, -28.07, 1.28) pt3dadd(-75.49, -54.06, -28.07, 1.21) pt3dadd(-75.88, -54.83, -28.07, 1.15) pt3dadd(-76.45, -55.92, -28.07, 1.09) pt3dadd(-77.22, -57.2, -28.07, 1.09) pt3dadd(-77.6, -57.9, -28.07, 1.09) pt3dadd(-77.86, -58.16, -28.07, 1.09) pt3dadd(-78.18, -58.41, -28.07, 1.09) pt3dadd(-78.56, -58.92, -28.07, 1.09) pt3dadd(-79.07, -59.69, -28.07, 1.09) pt3dadd(-79.84, -60.78, -28.07, 1.09) pt3dadd(-80.48, -61.42, -28.07, 1.09) pt3dadd(-80.8, -61.61, -28.07, 1.09) pt3dadd(-81.18, -61.61, -28.07, 1.09) pt3dadd(-81.82, -61.8, -28.07, 1.09) pt3dadd(-82.98, -62.38, -28.07, 1.09) pt3dadd(-83.87, -62.89, -28.07, 1.09) pt3dadd(-84.96, -63.78, -28.07, 1.09) pt3dadd(-85.79, -64.74, -28.07, 1.09) pt3dadd(-86.04, -64.93, -28.07, 1.09) pt3dadd(-85.97, -65.69, -28.07, 0.9) pt3dadd(-86.1, -65.69, -28.07, 0.9) pt3dadd(-86.74, -66.65, -28.07, 0.9) pt3dadd(-87.19, -67.36, -28.07, 0.9) pt3dadd(-87.7, -68.19, -28.07, 0.9) pt3dadd(-88.08, -68.51, -28.07, 0.9) pt3dadd(-88.27, -68.63, -28.07, 0.9) pt3dadd(-88.34, -68.7, -35.2, 0.9) pt3dadd(-89.04, -69.47, -35.2, 0.9) pt3dadd(-89.55, -69.91, -35.2, 0.9) pt3dadd(-89.94, -70.23, -35.2, 0.9) pt3dadd(-90.32, -70.94, -35.2, 0.9) pt3dadd(-90.51, -71.64, -35.2, 0.9) pt3dadd(-90.9, -72.47, -35.2, 0.9) pt3dadd(-91.28, -73.05, -35.2, 0.9) pt3dadd(-91.73, -73.69, -35.2, 0.9) pt3dadd(-92.11, -74.2, -35.2, 0.9) pt3dadd(-92.37, -74.64, -35.2, 0.9) pt3dadd(-92.37, -74.9, -35.2, 0.9) } dend[6] {pt3dclear() pt3dadd(-60.63, -29.52, -36.49, 1.02) pt3dadd(-61.3, -29.65, -35.2, 1.02) pt3dadd(-61.69, -31.44, -35.2, 1.02) pt3dadd(-61.94, -31.95, -35.2, 1.02) pt3dadd(-62.33, -32.52, -35.2, 1.02) pt3dadd(-62.65, -32.91, -35.2, 1.02) pt3dadd(-62.97, -33.16, -35.2, 1.02) pt3dadd(-65.33, -33.16, -35.2, 1.02) pt3dadd(-65.72, -33.1, -39.3, 1.02) pt3dadd(-66.16, -32.91, -39.3, 1.02) pt3dadd(-67.7, -32.46, -39.3, 1.02) pt3dadd(-68.53, -32.27, -39.3, 1.02) pt3dadd(-69.74, -31.95, -39.3, 1.02) pt3dadd(-70.89, -31.82, -39.3, 1.02) pt3dadd(-71.53, -31.76, -39.3, 1.02) pt3dadd(-72.68, -32.33, -39.3, 1.02) pt3dadd(-73.64, -32.97, -39.3, 1.02) pt3dadd(-74.79, -33.67, -39.3, 1.02) pt3dadd(-75.75, -34.5, -39.3, 1.02) pt3dadd(-76.27, -35.08, -39.3, 1.02) pt3dadd(-76.46, -35.14, -39.3, 1.02) pt3dadd(-76.52, -35.53, -44.48, 1.02) pt3dadd(-77.8, -36.81, -44.48, 1.02) pt3dadd(-78.95, -37.7, -44.48, 1.02) pt3dadd(-79.65, -38.34, -44.48, 1.02) pt3dadd(-80.17, -38.79, -44.48, 1.02) pt3dadd(-80.8, -39.3, -44.48, 1.02) pt3dadd(-81.51, -39.81, -44.48, 1.02) pt3dadd(-82.02, -40.45, -44.48, 1.02) pt3dadd(-82.66, -41.09, -44.48, 1.02) pt3dadd(-83.04, -41.6, -44.48, 1.02) pt3dadd(-83.3, -42.11, -44.48, 1.02) pt3dadd(-83.75, -42.69, -44.48, 1.02) pt3dadd(-84.07, -43.2, -44.48, 1.02) pt3dadd(-84.64, -44.22, -44.48, 1.02) pt3dadd(-84.83, -44.73, -44.48, 1.02) pt3dadd(-85.02, -45.44, -44.48, 1.02) pt3dadd(-85.34, -45.89, -44.48, 1.02) pt3dadd(-85.92, -46.27, -44.48, 1.02) pt3dadd(-86.43, -46.53, -44.48, 1.02) pt3dadd(-87.39, -46.78, -44.48, 1.02) pt3dadd(-88.03, -46.84, -44.7, 1.02) pt3dadd(-88.09, -46.84, -44.7, 1.02) pt3dadd(-89.24, -46.78, -47.72, 1.02) pt3dadd(-89.69, -46.78, -47.72, 1.02) pt3dadd(-90.46, -47.04, -47.72, 1.02) pt3dadd(-91.74, -47.48, -47.72, 1.02) pt3dadd(-92.63, -47.68, -47.72, 1.02) pt3dadd(-94.04, -47.68, -47.08, 1.02) pt3dadd(-95.25, -48.19, -47.08, 1.02) pt3dadd(-95.7, -48.32, -47.08, 1.02) pt3dadd(-96.73, -48.32, -47.08, 1.02) pt3dadd(-96.92, -48.38, -47.08, 1.02) pt3dadd(-96.79, -48.57, -47.08, 1.02) pt3dadd(-97.3, -48.95, -47.08, 1.02) pt3dadd(-97.88, -49.59, -47.08, 1.02) pt3dadd(-99.03, -50.49, -47.08, 1.02) pt3dadd(-100.31, -51, -47.08, 1.02) pt3dadd(-101.14, -51.13, -47.08, 1.02) } } proc shape3d_14() { dend[6] { pt3dadd(-101.97, -50.87, -47.08, 1.02) pt3dadd(-102.67, -50.55, -47.08, 1.02) pt3dadd(-103.44, -50.62, -47.08, 1.02) pt3dadd(-104.65, -51.26, -47.08, 1.02) pt3dadd(-105.04, -51.7, -47.08, 1.02) pt3dadd(-105.23, -51.83, -47.08, 1.02) pt3dadd(-105.07, -52.32, -47.08, 1.02) pt3dadd(-105.65, -52.9, -47.08, 1.02) pt3dadd(-106.29, -54.11, -47.08, 1.02) pt3dadd(-106.67, -54.62, -47.08, 1.02) pt3dadd(-107.25, -55.26, -47.08, 1.02) pt3dadd(-108.08, -56.09, -47.08, 1.02) pt3dadd(-108.72, -56.29, -47.08, 1.02) pt3dadd(-109.29, -56.35, -47.08, 1.02) pt3dadd(-109.42, -56.35, -58.63, 1.02) pt3dadd(-109.61, -56.86, -58.63, 1.02) pt3dadd(-110.06, -57.56, -58.63, 1.02) pt3dadd(-110.38, -57.76, -58.63, 1.02) pt3dadd(-111.08, -58.2, -58.63, 1.02) pt3dadd(-111.66, -58.65, -58.63, 1.02) pt3dadd(-112.36, -58.65, -60.79, 1.02) pt3dadd(-112.74, -58.4, -60.79, 1.02) pt3dadd(-112.81, -58.27, -62.41, 0.83) pt3dadd(-112.94, -58.2, -62.95, 0.77) pt3dadd(-113.19, -58.14, -62.95, 0.77) pt3dadd(-113.96, -58.14, -67.38, 0.77) pt3dadd(-113.96, -57.76, -67.38, 0.77) pt3dadd(-113.9, -56.92, -67.48, 0.77) pt3dadd(-113.9, -56.35, -71.69, 0.77) pt3dadd(-114.02, -56.29, -71.69, 0.77) pt3dadd(-114.22, -56.22, -71.69, 0.77) pt3dadd(-114.66, -56.22, -71.69, 0.77) pt3dadd(-115.11, -56.16, -71.69, 0.77) pt3dadd(-116.2, -56.67, -71.69, 0.77) pt3dadd(-116.84, -57.05, -71.69, 0.77) pt3dadd(-117.54, -56.92, -71.69, 0.77) pt3dadd(-118.56, -56.41, -71.69, 0.77) pt3dadd(-119.78, -55.9, -71.69, 0.77) pt3dadd(-122.02, -55.9, -72.02, 0.77) pt3dadd(-123.1, -55.77, -73.75, 0.77) pt3dadd(-124.32, -55.9, -74.39, 0.77) pt3dadd(-125.34, -56.41, -74.39, 0.77) pt3dadd(-126.04, -56.8, -74.39, 0.77) pt3dadd(-126.36, -56.99, -74.61, 0.77) pt3dadd(-126.68, -57.05, -74.61, 0.77) pt3dadd(-126.88, -57.05, -74.61, 0.77) pt3dadd(-127.71, -56.73, -74.61, 0.77) pt3dadd(-128.6, -56.8, -74.83, 0.77) pt3dadd(-130.14, -57.56, -74.83, 0.77) pt3dadd(-131.29, -58.14, -77.52, 0.77) pt3dadd(-131.54, -58.14, -78.28, 0.77) } dend[7] {pt3dclear() pt3dadd(-44.46, -9.81, -13.39, 1.73) pt3dadd(-44.53, -10.07, -22.89, 1.73) pt3dadd(-46, -11.42, -22.89, 1.73) pt3dadd(-46.32, -11.67, -22.89, 1.73) pt3dadd(-47.53, -11.67, -22.89, 1.73) pt3dadd(-47.92, -11.74, -22.89, 1.73) pt3dadd(-48.68, -11.74, -22.89, 1.73) pt3dadd(-49.07, -11.93, -22.89, 1.73) pt3dadd(-49.45, -12.25, -22.89, 1.73) pt3dadd(-49.9, -12.63, -22.89, 1.73) pt3dadd(-50.41, -12.89, -22.89, 1.73) pt3dadd(-50.99, -12.89, -22.89, 1.73) pt3dadd(-51.75, -13.01, -22.89, 1.73) pt3dadd(-53.42, -13.01, -22.89, 1.73) } dend[8] {pt3dclear() pt3dadd(-53.42, -13.01, -22.89, 1.53) pt3dadd(-54.95, -12.57, -22.89, 1.53) pt3dadd(-56.1, -12.44, -22.89, 1.53) pt3dadd(-56.68, -12.06, -22.89, 1.53) pt3dadd(-57.19, -11.67, -22.89, 1.53) pt3dadd(-57.76, -11.22, -22.89, 1.53) pt3dadd(-58.08, -10.97, -22.89, 1.53) pt3dadd(-58.59, -10.65, -22.89, 1.53) pt3dadd(-59.23, -10.39, -22.89, 1.53) pt3dadd(-60.38, -10.39, -22.89, 1.53) pt3dadd(-60.96, -10.59, -22.89, 1.53) pt3dadd(-61.66, -11.1, -22.89, 1.53) pt3dadd(-62.43, -11.8, -22.89, 1.53) pt3dadd(-63.58, -12.76, -22.89, 1.53) pt3dadd(-64.16, -13.72, -22.89, 1.53) pt3dadd(-64.41, -14.17, -22.89, 1.53) pt3dadd(-64.73, -14.36, -22.89, 1.53) pt3dadd(-64.8, -14.49, -22.89, 1.53) pt3dadd(-65.63, -14.23, -22.89, 1.41) pt3dadd(-66.59, -14.23, -22.89, 1.41) pt3dadd(-67.16, -14.04, -22.89, 1.41) pt3dadd(-67.42, -13.85, -40.49, 1.41) pt3dadd(-67.42, -12.89, -40.49, 1.41) pt3dadd(-67.16, -12.44, -40.49, 1.41) pt3dadd(-66.78, -12.18, -40.49, 1.41) pt3dadd(-66.59, -11.93, -40.49, 1.41) pt3dadd(-66.52, -11.54, -40.49, 1.41) pt3dadd(-66.52, -11.16, -40.49, 1.41) pt3dadd(-67.16, -10.59, -40.49, 1.41) pt3dadd(-67.93, -9.95, -40.49, 1.41) pt3dadd(-68.7, -9.56, -40.49, 1.41) pt3dadd(-69.4, -9.18, -40.49, 1.41) pt3dadd(-69.78, -8.86, -40.49, 1.41) pt3dadd(-70.17, -8.48, -40.71, 1.41) pt3dadd(-70.61, -7.77, -41.35, 1.41) pt3dadd(-70.87, -7.2, -41.35, 1.41) pt3dadd(-71.19, -6.56, -42.54, 1.41) pt3dadd(-71.57, -6.17, -42.54, 1.41) pt3dadd(-71.7, -6.05, -45.89, 1.41) pt3dadd(-72.15, -6.05, -46, 1.28) pt3dadd(-72.34, -5.85, -46, 1.28) pt3dadd(-74.07, -5.09, -46, 1.28) pt3dadd(-74.77, -4.96, -46, 1.28) pt3dadd(-77.65, -4.96, -46.64, 1.28) pt3dadd(-78.16, -5.21, -47.83, 1.28) pt3dadd(-78.54, -5.41, -47.83, 1.28) pt3dadd(-79.05, -5.41, -50.21, 1.28) pt3dadd(-79.5, -5.47, -50.21, 1.28) pt3dadd(-80.01, -5.6, -50.21, 1.28) pt3dadd(-80.21, -5.6, -50.21, 1.28) pt3dadd(-80.53, -6.05, -50.21, 1.28) pt3dadd(-80.78, -7, -50.21, 1.28) pt3dadd(-81.04, -8.09, -50.21, 1.28) pt3dadd(-81.16, -8.99, -50.21, 1.28) pt3dadd(-81.16, -9.69, -50.21, 1.28) pt3dadd(-81.48, -10.46, -50.21, 1.28) pt3dadd(-81.61, -11.35, -50.21, 1.28) pt3dadd(-81.61, -12.5, -50.21, 1.28) pt3dadd(-81.8, -12.89, -50.21, 1.28) pt3dadd(-82.12, -13.33, -50.21, 1.28) pt3dadd(-82.38, -13.78, -50.21, 1.28) pt3dadd(-82.76, -14.17, -50.86, 1.28) pt3dadd(-82.96, -14.36, -51.29, 1.28) pt3dadd(-83.15, -14.49, -52.15, 1.28) pt3dadd(-83.47, -14.74, -53.23, 1.28) pt3dadd(-83.91, -15.06, -53.23, 1.28) pt3dadd(-84.3, -15.51, -53.23, 1.28) pt3dadd(-84.81, -16.21, -53.45, 1.28) pt3dadd(-85.13, -16.79, -53.45, 1.28) pt3dadd(-85.51, -17.43, -53.45, 1.28) pt3dadd(-85.77, -17.75, -53.45, 1.28) pt3dadd(-86.58, -18.32, -53.45, 1.15) pt3dadd(-86.9, -19.54, -53.45, 1.15) pt3dadd(-87.79, -20.37, -53.45, 1.15) pt3dadd(-88.69, -20.75, -53.45, 1.15) pt3dadd(-89.39, -20.94, -53.45, 1.15) pt3dadd(-89.71, -20.94, -53.66, 1.15) pt3dadd(-90.29, -20.69, -53.66, 1.15) pt3dadd(-90.73, -20.43, -55.07, 1.15) pt3dadd(-91.37, -19.92, -55.07, 1.15) pt3dadd(-91.89, -19.54, -55.07, 1.15) pt3dadd(-92.01, -19.47, -57.55, 1.15) pt3dadd(-92.14, -19.47, -59.06, 1.15) pt3dadd(-92.84, -19.34, -59.06, 1.15) pt3dadd(-94.57, -19.34, -62.19, 1.15) pt3dadd(-95.08, -19.6, -62.41, 1.15) pt3dadd(-95.4, -19.98, -62.41, 1.15) pt3dadd(-95.98, -20.43, -64.57, 1.15) pt3dadd(-96.75, -20.94, -65.65, 1.15) pt3dadd(-97.45, -21.33, -65.65, 1.15) pt3dadd(-97.96, -21.52, -65.65, 1.15) pt3dadd(-98.54, -21.58, -65.65, 1.15) pt3dadd(-98.92, -21.58, -65.65, 1.15) pt3dadd(-99.3, -21.71, -66.08, 1.15) pt3dadd(-99.56, -21.71, -68.45, 1.15) pt3dadd(-99.75, -21.77, -68.45, 1.15) pt3dadd(-99.88, -21.9, -69.53, 1.15) pt3dadd(-99.94, -22.03, -69.53, 1.15) pt3dadd(-99.94, -22.48, -69.53, 1.15) pt3dadd(-100.01, -22.67, -69.53, 1.15) pt3dadd(-100.2, -22.86, -69.53, 1.15) pt3dadd(-100.45, -23.12, -69.53, 1.15) pt3dadd(-101.48, -23.12, -72.34, 1.15) pt3dadd(-101.73, -23.18, -72.34, 1.15) pt3dadd(-101.86, -23.18, -72.45, 1.15) } dend[9] {pt3dclear() pt3dadd(-53.42, -13.01, -22.89, 1.47) pt3dadd(-53.14, -13.33, -17.17, 1.47) pt3dadd(-53.52, -13.72, -17.17, 1.47) pt3dadd(-54.29, -14.29, -17.17, 1.47) pt3dadd(-55.25, -14.87, -17.17, 1.47) pt3dadd(-55.76, -15.06, -17.17, 1.47) pt3dadd(-56.53, -15.25, -17.17, 1.47) pt3dadd(-58.51, -15.25, -17.17, 1.47) pt3dadd(-59.85, -15.7, -17.17, 1.47) pt3dadd(-61.13, -15.76, -17.17, 1.47) pt3dadd(-62.47, -16.21, -17.17, 1.47) pt3dadd(-63.69, -16.53, -17.17, 1.47) pt3dadd(-64.65, -16.59, -17.17, 1.47) pt3dadd(-69.89, -16.59, -17.17, 1.47) pt3dadd(-70.79, -16.72, -17.17, 1.47) pt3dadd(-71.74, -16.91, -17.17, 1.47) pt3dadd(-72.83, -17.17, -17.17, 1.47) pt3dadd(-73.6, -17.3, -17.17, 1.47) pt3dadd(-76.35, -17.3, -17.17, 1.47) pt3dadd(-78.01, -17.04, -17.17, 1.47) pt3dadd(-79.8, -16.85, -17.17, 1.47) pt3dadd(-82.74, -16.85, -21.7, 1.47) pt3dadd(-83.96, -16.66, -22.57, 1.47) pt3dadd(-84.53, -16.4, -22.57, 1.47) pt3dadd(-87.35, -15.83, -35.85, 1.47) pt3dadd(-87.99, -15.44, -35.85, 1.47) pt3dadd(-88.69, -15.19, -35.85, 1.47) pt3dadd(-89.46, -14.8, -35.85, 1.47) pt3dadd(-90.42, -14.36, -35.85, 1.47) pt3dadd(-92.4, -13.46, -35.85, 1.47) } } proc shape3d_15() { dend[9] { pt3dadd(-94.38, -12.57, -35.85, 1.47) pt3dadd(-95.85, -12.12, -35.85, 1.47) pt3dadd(-97.26, -11.93, -35.85, 1.47) pt3dadd(-98.15, -11.74, -35.85, 1.47) pt3dadd(-99.43, -11.22, -35.85, 1.47) pt3dadd(-101.03, -10.84, -35.85, 1.47) pt3dadd(-102.18, -10.78, -35.85, 1.47) pt3dadd(-102.63, -11.1, -35.85, 1.47) pt3dadd(-104.99, -10.9, -35.85, 1.47) pt3dadd(-106.91, -10.58, -35.85, 1.47) pt3dadd(-110.56, -10.58, -35.85, 1.47) pt3dadd(-112.86, -10.52, -35.85, 1.47) pt3dadd(-115.35, -10.07, -35.85, 1.47) pt3dadd(-117.14, -9.5, -35.85, 1.47) pt3dadd(-118.61, -9.11, -35.85, 1.47) pt3dadd(-120.08, -8.6, -35.85, 1.47) pt3dadd(-121.36, -8.03, -35.85, 1.47) pt3dadd(-122.7, -7.77, -35.85, 1.47) pt3dadd(-124.69, -7.77, -35.85, 1.47) pt3dadd(-125.58, -7.45, -35.85, 1.47) pt3dadd(-126.22, -7.32, -35.85, 1.47) pt3dadd(-128.01, -7.32, -35.85, 1.47) pt3dadd(-128.91, -7.01, -35.85, 1.47) pt3dadd(-129.68, -6.94, -35.85, 1.47) pt3dadd(-136.84, -6.94, -35.85, 1.47) pt3dadd(-137.99, -6.88, -35.85, 1.47) pt3dadd(-140.49, -6.88, -35.85, 1.47) pt3dadd(-140.87, -6.56, -38.22, 1.47) pt3dadd(-146.69, -8.6, -38.22, 1.47) pt3dadd(-147.71, -9.12, -38.22, 1.47) pt3dadd(-149.31, -9.12, -38.22, 1.34) pt3dadd(-149.76, -8.6, -38.22, 1.34) pt3dadd(-150.14, -8.09, -38.22, 1.34) pt3dadd(-151.23, -7.97, -38.22, 1.34) pt3dadd(-152.32, -8.22, -38.22, 1.34) pt3dadd(-153.4, -8.73, -38.22, 1.34) pt3dadd(-154.43, -9.18, -38.22, 1.34) pt3dadd(-155.39, -9.63, -38.22, 1.34) pt3dadd(-155.83, -9.76, -38.22, 1.34) pt3dadd(-156.54, -10.01, -38.22, 1.21) pt3dadd(-156.92, -10.2, -38.22, 1.21) pt3dadd(-157.3, -10.39, -38.22, 1.21) pt3dadd(-158.07, -10.71, -38.22, 1.21) pt3dadd(-159.16, -11.29, -38.22, 1.21) pt3dadd(-160.44, -11.87, -38.22, 1.21) pt3dadd(-161.2, -12.31, -38.22, 1.21) pt3dadd(-161.72, -12.38, -38.22, 1.21) pt3dadd(-163.12, -12.5, -38.22, 1.09) pt3dadd(-163.83, -12.5, -38.22, 1.09) pt3dadd(-165.23, -12.44, -38.22, 1.09) pt3dadd(-166.19, -12.5, -38.22, 1.09) pt3dadd(-167.02, -12.76, -38.22, 1.09) pt3dadd(-167.85, -13.02, -38.22, 1.09) pt3dadd(-169.39, -13.02, -38.22, 1.09) pt3dadd(-170.03, -13.34, -38.22, 1.09) pt3dadd(-170.09, -13.34, -38.22, 1.09) pt3dadd(-170.8, -14.18, -38.22, 1.02) pt3dadd(-171.06, -14.3, -38.22, 1.02) pt3dadd(-172.27, -15.2, -38.33, 1.02) pt3dadd(-173.49, -16.22, -38.33, 1.02) pt3dadd(-174.26, -16.99, -38.33, 1.02) pt3dadd(-174.51, -17.05, -39.95, 1.02) pt3dadd(-174.64, -17.05, -42.54, 1.02) pt3dadd(-175.34, -17.44, -42.54, 1.02) pt3dadd(-176.24, -18.08, -42.54, 1.02) pt3dadd(-176.94, -18.84, -42.54, 1.02) pt3dadd(-177.33, -19.42, -42.54, 1.02) pt3dadd(-177.71, -19.93, -42.54, 1.02) pt3dadd(-178.09, -20.44, -42.54, 1.02) pt3dadd(-178.48, -20.89, -42.54, 1.02) pt3dadd(-178.99, -21.4, -42.54, 1.02) pt3dadd(-179.56, -21.79, -42.54, 1.02) pt3dadd(-180.46, -22.3, -42.54, 1.02) pt3dadd(-181.48, -22.94, -42.54, 1.02) pt3dadd(-182.18, -23.51, -42.54, 1.02) pt3dadd(-182.89, -23.96, -42.54, 1.02) pt3dadd(-183.59, -24.41, -42.54, 1.02) pt3dadd(-184.36, -24.79, -42.54, 1.02) pt3dadd(-185.32, -25.37, -42.54, 1.02) pt3dadd(-186.28, -25.94, -42.54, 1.02) pt3dadd(-186.98, -26.39, -42.54, 1.02) pt3dadd(-187.75, -26.84, -42.54, 1.02) pt3dadd(-188.45, -27.28, -42.54, 1.02) pt3dadd(-188.96, -27.41, -42.54, 1.02) pt3dadd(-189.67, -27.8, -42.54, 1.02) pt3dadd(-191.07, -28.63, -42.54, 1.02) pt3dadd(-192.29, -29.27, -42.54, 1.02) pt3dadd(-192.99, -29.71, -42.54, 1.02) pt3dadd(-193.25, -29.91, -42.54, 1.02) pt3dadd(-193.89, -30.16, -42.54, 0.96) pt3dadd(-194.72, -30.8, -42.54, 0.96) pt3dadd(-195.42, -31.31, -42.54, 0.96) pt3dadd(-196.38, -31.95, -42.54, 0.96) pt3dadd(-197.02, -32.34, -42.54, 0.96) pt3dadd(-197.72, -32.65, -42.54, 0.96) pt3dadd(-198.11, -32.72, -42.87, 0.96) pt3dadd(-199.06, -32.72, -45.78, 0.96) pt3dadd(-199.38, -32.85, -45.78, 0.96) pt3dadd(-200.22, -33.29, -45.78, 0.96) pt3dadd(-201.43, -33.93, -45.78, 0.96) pt3dadd(-202.39, -34, -45.78, 0.96) pt3dadd(-204.31, -33.29, -45.78, 0.96) pt3dadd(-205.71, -33.23, -45.78, 0.96) pt3dadd(-206.93, -33.61, -45.78, 0.96) pt3dadd(-207.5, -33.87, -45.78, 0.96) pt3dadd(-208.14, -34.32, -45.78, 0.96) pt3dadd(-208.78, -34.89, -45.78, 0.96) pt3dadd(-209.49, -35.47, -45.78, 0.96) pt3dadd(-210.13, -35.98, -45.78, 0.96) pt3dadd(-210.64, -36.62, -45.78, 0.96) pt3dadd(-211.02, -37.07, -45.78, 0.96) pt3dadd(-211.28, -37.32, -45.78, 0.96) pt3dadd(-211.34, -37.45, -45.78, 0.96) pt3dadd(-211.35, -37.67, -45.78, 0.77) pt3dadd(-211.54, -38.05, -45.78, 0.77) pt3dadd(-211.92, -39.14, -45.78, 0.77) pt3dadd(-212.37, -40.03, -45.78, 0.77) pt3dadd(-212.82, -41.31, -46.32, 0.77) pt3dadd(-212.95, -41.69, -46.32, 0.77) pt3dadd(-213.14, -42.2, -46.86, 0.77) pt3dadd(-213.46, -42.72, -47.18, 0.77) pt3dadd(-214.03, -43.42, -47.18, 0.77) pt3dadd(-214.29, -43.93, -49.56, 0.77) pt3dadd(-214.48, -44.12, -49.56, 0.77) pt3dadd(-214.99, -44.83, -49.56, 0.77) pt3dadd(-215.31, -45.34, -49.56, 0.77) pt3dadd(-215.57, -45.59, -49.56, 0.77) pt3dadd(-215.82, -46.23, -49.56, 0.77) pt3dadd(-216.08, -46.87, -49.56, 0.77) pt3dadd(-216.4, -47.77, -49.56, 0.77) pt3dadd(-217.1, -48.85, -49.56, 0.77) pt3dadd(-217.81, -49.56, -50.53, 0.77) pt3dadd(-218.06, -49.62, -50.53, 0.77) pt3dadd(-218.25, -49.69, -51.29, 0.77) pt3dadd(-218.44, -49.75, -51.72, 0.77) pt3dadd(-218.83, -49.75, -51.72, 0.77) pt3dadd(-219.02, -49.81, -52.91, 0.77) pt3dadd(-219.08, -49.88, -53.23, 0.77) pt3dadd(-219.34, -50.01, -53.23, 0.77) pt3dadd(-219.66, -50.32, -53.23, 0.77) pt3dadd(-219.98, -50.71, -53.23, 0.77) pt3dadd(-220.3, -51.16, -53.23, 0.77) pt3dadd(-220.55, -51.8, -53.23, 0.77) pt3dadd(-220.55, -52.37, -53.23, 0.77) pt3dadd(-220.75, -53.01, -53.23, 0.77) pt3dadd(-221.19, -53.46, -53.23, 0.77) pt3dadd(-221.45, -53.52, -53.23, 0.77) } dend[10] {pt3dclear() pt3dadd(-17.16, -10.64, -13.39, 1.92) pt3dadd(-17.44, -10.84, -14.58, 1.92) pt3dadd(-17.95, -11.48, -14.58, 1.92) pt3dadd(-18.65, -11.99, -14.58, 1.92) pt3dadd(-19.1, -12.37, -14.58, 1.92) pt3dadd(-19.68, -12.88, -14.58, 1.92) pt3dadd(-20.06, -13.2, -14.58, 1.92) pt3dadd(-20.7, -13.2, -14.58, 1.92) pt3dadd(-21.08, -13.52, -14.58, 1.92) pt3dadd(-21.47, -14.03, -14.58, 1.92) pt3dadd(-21.66, -14.48, -14.58, 1.92) pt3dadd(-21.66, -14.67, -14.58, 1.92) pt3dadd(-21.85, -14.99, -14.58, 1.92) pt3dadd(-22.43, -16.08, -14.58, 1.92) pt3dadd(-22.62, -16.46, -14.58, 1.92) pt3dadd(-22.68, -16.91, -14.58, 1.92) pt3dadd(-22.68, -18.13, -14.58, 1.92) pt3dadd(-22.3, -19.21, -14.58, 1.92) pt3dadd(-22.23, -19.47, -14.58, 1.92) pt3dadd(-21.98, -19.92, -14.58, 1.92) pt3dadd(-21.85, -20.3, -14.58, 1.92) pt3dadd(-21.85, -20.49, -14.58, 1.92) pt3dadd(-21.79, -20.81, -29.58, 1.79) pt3dadd(-21.72, -21.39, -29.58, 1.73) pt3dadd(-21.72, -22.35, -29.58, 1.73) pt3dadd(-21.92, -23.11, -29.58, 1.73) pt3dadd(-22.3, -23.88, -29.58, 1.73) pt3dadd(-22.68, -24.46, -29.58, 1.73) pt3dadd(-23.07, -25.03, -30.56, 1.73) pt3dadd(-23.19, -25.42, -30.56, 1.73) pt3dadd(-23.26, -25.67, -33.47, 1.73) pt3dadd(-23.26, -25.86, -33.8, 1.73) pt3dadd(-23.07, -26.05, -33.8, 1.73) pt3dadd(-22.94, -26.18, -33.8, 1.73) pt3dadd(-22.81, -26.44, -33.8, 1.73) pt3dadd(-22.81, -26.63, -33.8, 1.73) pt3dadd(-23.07, -26.82, -35.63, 1.73) pt3dadd(-23.45, -27.27, -35.63, 1.73) pt3dadd(-23.9, -27.91, -37.79, 1.73) pt3dadd(-24.34, -28.55, -37.79, 1.73) pt3dadd(-24.6, -29.12, -37.79, 1.73) pt3dadd(-24.54, -29.7, -37.79, 1.73) pt3dadd(-24.28, -30.21, -37.79, 1.73) pt3dadd(-24.28, -30.59, -38.33, 1.73) pt3dadd(-24.54, -32.7, -40.92, 1.73) pt3dadd(-24.54, -32.9, -40.92, 1.73) pt3dadd(-22.94, -33.73, -40.92, 1.73) pt3dadd(-21.92, -34.17, -40.92, 1.73) pt3dadd(-20.25, -35.33, -40.92, 1.73) pt3dadd(-19.23, -36.28, -40.92, 1.73) pt3dadd(-19.23, -36.8, -40.92, 1.73) pt3dadd(-19.81, -37.82, -40.92, 1.73) pt3dadd(-20.32, -38.59, -40.92, 1.73) } } proc shape3d_16() { dend[10] { pt3dadd(-20.83, -39.23, -40.92, 1.73) pt3dadd(-20.83, -39.45, -33.9, 1.73) pt3dadd(-21.4, -39.45, -33.9, 1.73) pt3dadd(-21.72, -39.57, -33.9, 1.73) pt3dadd(-21.98, -39.64, -33.9, 1.73) pt3dadd(-22.49, -39.77, -33.9, 1.73) pt3dadd(-22.87, -39.83, -33.9, 1.73) } dend[11] {pt3dclear() pt3dadd(-22.87, -39.83, -33.9, 1.53) pt3dadd(-25.11, -40.4, -33.9, 1.53) pt3dadd(-25.5, -40.4, -33.9, 1.53) pt3dadd(-25.82, -40.53, -33.9, 1.53) pt3dadd(-26.2, -41.04, -33.9, 1.53) pt3dadd(-26.39, -42, -33.9, 1.53) pt3dadd(-26.07, -43.28, -33.9, 1.53) pt3dadd(-25.37, -44.62, -33.9, 1.53) pt3dadd(-24.6, -45.9, -33.9, 1.53) pt3dadd(-23.39, -48.01, -33.9, 1.53) pt3dadd(-22.75, -49.04, -33.9, 1.53) pt3dadd(-22.55, -49.68, -33.9, 1.53) pt3dadd(-22.23, -50.76, -33.9, 1.53) pt3dadd(-22.04, -52.23, -33.9, 1.53) pt3dadd(-22.04, -53.83, -33.9, 1.53) pt3dadd(-22.36, -54.22, -33.9, 1.53) pt3dadd(-22.75, -55.3, -33.9, 1.53) pt3dadd(-23.07, -56.45, -33.9, 1.53) pt3dadd(-23.26, -57.54, -33.9, 1.53) pt3dadd(-23.39, -58.31, -33.9, 1.53) pt3dadd(-23.58, -58.88, -33.9, 1.53) pt3dadd(-23.96, -59.84, -33.9, 1.53) pt3dadd(-24.6, -61.12, -33.9, 1.53) pt3dadd(-25.5, -62.65, -33.9, 1.53) pt3dadd(-26.33, -63.55, -33.9, 1.53) pt3dadd(-27.09, -64.06, -33.9, 1.53) pt3dadd(-28.44, -64.64, -33.9, 1.53) pt3dadd(-28.82, -65.15, -33.9, 1.53) pt3dadd(-29.14, -65.66, -33.9, 1.53) pt3dadd(-29.4, -66.36, -33.9, 1.53) pt3dadd(-29.52, -67.19, -33.9, 1.53) pt3dadd(-29.72, -67.83, -33.9, 1.53) pt3dadd(-29.97, -68.03, -33.9, 1.53) pt3dadd(-30.04, -68.03, -33.9, 1.53) pt3dadd(-29.7, -68.56, -49.24, 1.53) pt3dadd(-29.96, -68.56, -49.24, 1.53) pt3dadd(-30.21, -69, -49.24, 1.53) pt3dadd(-30.34, -70.16, -49.24, 1.53) pt3dadd(-30.28, -71.56, -49.24, 1.53) pt3dadd(-29.76, -72.97, -49.24, 1.53) pt3dadd(-29.25, -74.38, -49.24, 1.53) pt3dadd(-28.87, -75.59, -49.24, 1.53) pt3dadd(-28.61, -76.61, -49.56, 1.53) pt3dadd(-28.61, -83.77, -52.58, 1.34) pt3dadd(-28.68, -84.22, -53.01, 1.34) pt3dadd(-28.74, -84.61, -53.01, 1.34) pt3dadd(-28.8, -84.86, -53.01, 1.34) pt3dadd(-28.87, -85.18, -53.01, 1.34) pt3dadd(-28.93, -85.44, -53.01, 1.34) pt3dadd(-29.06, -85.76, -53.01, 1.34) pt3dadd(-29.19, -86.01, -53.01, 1.34) pt3dadd(-29.25, -86.2, -53.01, 1.34) pt3dadd(-29.32, -86.4, -53.01, 1.34) pt3dadd(-29.32, -86.52, -54.2, 1.34) pt3dadd(-29.38, -86.78, -54.63, 1.34) pt3dadd(-29.51, -86.91, -54.63, 1.34) pt3dadd(-29.51, -87.04, -56.04, 1.34) pt3dadd(-29.57, -87.1, -56.04, 1.34) pt3dadd(-29.64, -87.23, -56.15, 1.34) pt3dadd(-29.64, -87.35, -56.15, 1.34) pt3dadd(-29.7, -87.42, -56.15, 1.34) pt3dadd(-29.76, -87.61, -56.15, 1.34) pt3dadd(-29.83, -87.74, -56.15, 1.34) pt3dadd(-29.89, -87.93, -56.15, 1.34) pt3dadd(-30.15, -88.25, -56.15, 1.34) pt3dadd(-30.72, -89.21, -56.15, 1.34) pt3dadd(-31.43, -90.74, -56.15, 1.34) pt3dadd(-32.07, -92.34, -56.15, 1.34) pt3dadd(-32.26, -92.41, -56.25, 1.34) pt3dadd(-34.56, -96.88, -58.52, 1.34) pt3dadd(-34.88, -97.39, -58.74, 1.34) pt3dadd(-35.01, -97.58, -58.74, 1.34) pt3dadd(-35.5, -98.48, -57.77, 1.34) pt3dadd(-36.21, -99.82, -57.77, 1.34) pt3dadd(-37.04, -101.35, -57.77, 1.34) pt3dadd(-37.61, -102.63, -57.77, 1.34) pt3dadd(-38.25, -103.78, -57.77, 1.34) pt3dadd(-38.83, -104.74, -57.77, 1.34) pt3dadd(-39.4, -106.02, -57.77, 1.34) pt3dadd(-39.85, -106.92, -57.77, 1.34) pt3dadd(-40.3, -108.45, -57.77, 1.34) pt3dadd(-40.62, -110.11, -57.77, 1.34) pt3dadd(-40.81, -111.84, -57.77, 1.34) pt3dadd(-40.81, -114.65, -57.77, 1.34) pt3dadd(-41.51, -116.57, -57.77, 1.34) pt3dadd(-42.09, -117.85, -57.77, 1.34) pt3dadd(-42.54, -118.81, -57.77, 1.34) pt3dadd(-42.98, -120.34, -57.77, 1.34) pt3dadd(-43.18, -121.24, -57.77, 1.34) pt3dadd(-43.24, -121.94, -57.77, 1.34) pt3dadd(-43.24, -124.88, -57.77, 1.34) pt3dadd(-43.3, -125.2, -57.77, 1.34) pt3dadd(-43.3, -125.46, -57.77, 1.34) pt3dadd(-44.26, -127.37, -57.77, 1.21) pt3dadd(-44.71, -128.27, -57.77, 1.21) pt3dadd(-45.09, -129.23, -57.77, 1.21) pt3dadd(-45.28, -130.25, -57.77, 1.21) pt3dadd(-45.28, -131.27, -57.77, 1.21) pt3dadd(-45.35, -132.1, -57.77, 1.21) pt3dadd(-45.54, -133.19, -57.77, 1.21) pt3dadd(-45.79, -134.09, -57.77, 1.21) pt3dadd(-46.18, -134.92, -57.77, 1.21) pt3dadd(-46.75, -136.13, -57.77, 1.21) pt3dadd(-47.14, -137.28, -57.77, 1.21) pt3dadd(-47.65, -139.07, -57.77, 1.21) pt3dadd(-47.84, -140.16, -57.77, 1.21) pt3dadd(-47.84, -140.99, -57.77, 1.21) pt3dadd(-48.16, -141.89, -57.77, 1.21) pt3dadd(-48.54, -143.16, -57.77, 1.21) pt3dadd(-48.8, -144.95, -57.77, 1.21) pt3dadd(-48.99, -146.23, -57.77, 1.21) pt3dadd(-49.12, -147.51, -57.77, 1.21) pt3dadd(-49.31, -148.66, -57.77, 1.21) pt3dadd(-49.69, -149.75, -57.77, 1.21) pt3dadd(-50.14, -150.96, -57.77, 1.21) pt3dadd(-50.78, -152.44, -57.77, 1.21) pt3dadd(-51.29, -153.52, -57.77, 1.21) pt3dadd(-51.55, -154.16, -57.77, 1.21) pt3dadd(-51.68, -154.48, -57.77, 1.21) pt3dadd(-51.57, -155.96, -57.77, 1.15) pt3dadd(-51.7, -156.66, -57.77, 1.15) pt3dadd(-51.44, -158.01, -57.77, 1.15) pt3dadd(-50.74, -159.41, -57.77, 1.15) pt3dadd(-50.36, -160.82, -57.77, 1.15) pt3dadd(-50.49, -162.42, -57.77, 1.15) pt3dadd(-50.55, -163.95, -57.77, 1.15) pt3dadd(-50.55, -169.45, -49.24, 1.15) pt3dadd(-50.36, -171.31, -49.24, 1.15) pt3dadd(-50.55, -173.29, -49.24, 1.15) pt3dadd(-50.61, -175.4, -49.24, 1.15) pt3dadd(-50.74, -177.19, -49.24, 1.15) pt3dadd(-51.06, -178.79, -49.24, 1.15) pt3dadd(-51.44, -180.13, -49.24, 1.15) pt3dadd(-52.02, -181.6, -49.24, 1.15) pt3dadd(-52.53, -182.88, -49.24, 1.15) pt3dadd(-52.72, -183.52, -49.24, 1.15) pt3dadd(-52.85, -183.96, -49.24, 1.15) pt3dadd(-52.91, -184.03, -49.24, 1.15) } dend[12] {pt3dclear() pt3dadd(-22.87, -39.83, -33.9, 1.28) pt3dadd(-22.58, -39.76, -47.18, 1.28) pt3dadd(-22.77, -39.89, -47.18, 1.28) pt3dadd(-23.28, -40.15, -47.18, 1.28) pt3dadd(-23.86, -40.53, -47.18, 1.28) pt3dadd(-24.24, -41.1, -47.18, 1.28) pt3dadd(-24.31, -41.49, -47.18, 1.28) pt3dadd(-24.18, -42.32, -47.18, 1.28) pt3dadd(-23.67, -43.15, -47.18, 1.28) pt3dadd(-22.9, -43.92, -47.18, 1.28) pt3dadd(-22.07, -44.62, -47.18, 1.28) pt3dadd(-21.05, -45.45, -47.18, 1.28) pt3dadd(-20.41, -45.9, -47.18, 1.28) pt3dadd(-19.89, -46.28, -47.18, 1.28) pt3dadd(-19.32, -46.86, -47.18, 1.28) pt3dadd(-19, -47.63, -47.29, 1.28) pt3dadd(-19, -47.82, -58.2, 1.28) pt3dadd(-18.62, -49.48, -58.2, 1.28) pt3dadd(-18.42, -50.31, -58.63, 1.28) pt3dadd(-18.23, -50.95, -58.63, 1.28) pt3dadd(-17.78, -51.65, -58.63, 1.28) pt3dadd(-17.27, -52.55, -58.63, 1.28) pt3dadd(-16.95, -52.74, -58.63, 1.28) pt3dadd(-15.67, -52.49, -60.79, 1.28) pt3dadd(-14.27, -52.49, -63.06, 1.28) pt3dadd(-13.31, -52.68, -63.81, 1.28) pt3dadd(-12.8, -52.93, -63.81, 1.28) pt3dadd(-12.48, -53.44, -63.81, 1.28) pt3dadd(-12.09, -54.15, -65.65, 1.28) pt3dadd(-11.33, -54.85, -66.73, 1.28) pt3dadd(-10.05, -55.23, -66.73, 1.28) pt3dadd(-9.54, -55.3, -67.05, 1.28) pt3dadd(-9.28, -55.36, -67.05, 1.28) pt3dadd(-9.03, -55.55, -67.05, 1.28) pt3dadd(-8.32, -56.13, -67.92, 1.28) pt3dadd(-7.87, -56.07, -69.21, 1.28) pt3dadd(-6.85, -55.55, -70.61, 1.28) pt3dadd(-6.53, -55.3, -70.61, 1.28) pt3dadd(-6.4, -55.11, -71.15, 1.28) pt3dadd(-6.34, -55.04, -77.2, 1.28) pt3dadd(-5.64, -55.04, -77.52, 1.28) pt3dadd(-5.51, -55.23, -78.6, 1.28) pt3dadd(-5.51, -56.32, -80.44, 1.28) pt3dadd(-6.08, -57.41, -81.52, 1.28) pt3dadd(-6.92, -59.2, -81.52, 1.28) pt3dadd(-7.23, -60.35, -81.74, 1.28) pt3dadd(-7.36, -60.67, -81.74, 1.28) pt3dadd(-7.36, -60.86, -81.74, 1.28) pt3dadd(-7.43, -61.05, -84.54, 1.28) pt3dadd(-6.21, -61.05, -85.51, 1.28) pt3dadd(-5.19, -60.99, -85.51, 1.28) pt3dadd(-4.1, -60.99, -85.51, 1.28) pt3dadd(-3.46, -61.12, -85.51, 1.28) pt3dadd(-3.01, -61.12, -88.75, 1.28) pt3dadd(-2.82, -61.44, -88.75, 1.28) } } proc shape3d_17() { dend[12] { pt3dadd(-2.57, -61.63, -88.75, 1.28) pt3dadd(-2.06, -61.63, -88.75, 1.28) pt3dadd(-1.8, -61.82, -88.75, 1.28) pt3dadd(-1.54, -61.95, -90.48, 1.28) pt3dadd(-1.1, -62.4, -91.78, 1.28) pt3dadd(-0.52, -62.78, -92.64, 1.28) pt3dadd(-0.14, -63.04, -92.64, 1.28) pt3dadd(0.37, -63.23, -92.64, 1.28) pt3dadd(0.5, -63.29, -92.64, 1.28) pt3dadd(0.89, -63.35, -94.69, 1.28) pt3dadd(1.72, -63.35, -95.66, 1.28) pt3dadd(2.04, -63.48, -95.66, 1.28) pt3dadd(2.48, -63.55, -95.77, 1.28) pt3dadd(3, -63.74, -95.77, 1.28) pt3dadd(3.44, -63.99, -95.77, 1.28) pt3dadd(3.63, -64.12, -95.77, 1.28) pt3dadd(3.7, -64.12, -95.77, 1.28) } dend[13] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(-7.61, -5.06, -20.62, 4.22) pt3dadd(-8.38, -5.19, -20.62, 4.22) pt3dadd(-11.39, -5.19, -20.62, 4.22) pt3dadd(-11.64, -5.25, -20.62, 4.22) pt3dadd(-12.35, -5.25, -20.62, 4.22) pt3dadd(-12.92, -5.44, -20.62, 4.22) pt3dadd(-13.24, -5.44, -20.62, 4.22) pt3dadd(-13.82, -5.64, -20.62, 4.16) pt3dadd(-18.55, -5.64, -20.62, 3.71) pt3dadd(-19, -5.7, -20.62, 3.64) pt3dadd(-19.64, -5.76, -20.62, 3.64) pt3dadd(-21.94, -5.76, -20.62, 3.45) pt3dadd(-23.02, -6.08, -20.62, 3.45) pt3dadd(-26.99, -6.08, -20.62, 3.26) pt3dadd(-27.24, -6.15, -20.62, 3.26) pt3dadd(-28.78, -6.15, -20.62, 3.26) pt3dadd(-29.16, -6.21, -20.62, 3.26) pt3dadd(-30.63, -6.21, -20.62, 3.26) pt3dadd(-31.46, -6.02, -20.62, 3.26) pt3dadd(-31.91, -6.02, -20.62, 3.13) pt3dadd(-32.68, -5.76, -20.62, 3.07) pt3dadd(-33.32, -5.51, -20.62, 3.07) pt3dadd(-34.09, -5.19, -20.62, 3.07) pt3dadd(-34.66, -4.87, -20.62, 3.07) pt3dadd(-35.3, -4.68, -20.62, 3.01) pt3dadd(-35.81, -4.68, -20.62, 2.81) pt3dadd(-37.22, -4.29, -20.62, 2.81) pt3dadd(-37.86, -4.04, -20.62, 2.81) pt3dadd(-38.62, -3.78, -20.62, 2.81) pt3dadd(-39.9, -3.33, -20.62, 2.75) pt3dadd(-40.22, -3.27, -20.62, 2.69) pt3dadd(-40.48, -3.21, -20.62, 2.69) pt3dadd(-41.12, -3.14, -20.62, 2.69) pt3dadd(-42.01, -2.95, -20.62, 2.69) pt3dadd(-42.72, -2.63, -20.62, 2.69) pt3dadd(-43.8, -2.06, -20.62, 2.69) pt3dadd(-44.19, -1.61, -20.62, 2.69) pt3dadd(-44.57, -1.03, -20.62, 2.62) pt3dadd(-44.7, -0.84, -20.62, 2.49) pt3dadd(-44.89, -0.33, -20.62, 2.43) pt3dadd(-45.08, 0.5, -20.62, 2.43) pt3dadd(-45.15, 1.4, -20.62, 2.43) pt3dadd(-45.15, 2.29, -20.62, 2.43) pt3dadd(-45.4, 2.8, -20.62, 2.43) pt3dadd(-45.72, 3.7, -20.62, 2.43) pt3dadd(-46.11, 4.21, -20.62, 2.43) pt3dadd(-46.43, 4.53, -20.62, 2.43) pt3dadd(-46.81, 4.72, -20.62, 2.43) pt3dadd(-47.19, 5.04, -20.62, 2.43) pt3dadd(-47.32, 5.04, -20.62, 2.17) pt3dadd(-47.7, 5.23, -20.62, 2.17) pt3dadd(-48.22, 5.36, -20.62, 2.17) pt3dadd(-48.54, 5.49, -20.62, 2.17) pt3dadd(-49.56, 5.43, -20.62, 2.17) pt3dadd(-50.2, 5.43, -20.62, 2.17) pt3dadd(-50.71, 5.62, -20.62, 2.17) pt3dadd(-51.09, 5.81, -20.62, 2.17) pt3dadd(-51.54, 6.19, -20.62, 2.17) pt3dadd(-52.18, 6.64, -20.62, 2.17) pt3dadd(-52.5, 6.83, -20.62, 2.17) pt3dadd(-52.63, 6.96, -20.62, 2.17) pt3dadd(-53.3, 7.55, -20.62, 2.17) pt3dadd(-53.69, 7.74, -20.62, 2.17) pt3dadd(-54.13, 7.93, -20.62, 2.17) pt3dadd(-54.58, 8.12, -20.62, 2.17) pt3dadd(-54.9, 8.25, -20.62, 2.17) pt3dadd(-55.16, 8.38, -20.62, 2.17) pt3dadd(-55.48, 8.51, -20.62, 2.17) pt3dadd(-55.73, 8.57, -20.62, 2.17) pt3dadd(-55.99, 8.64, -20.62, 2.17) pt3dadd(-56.12, 8.76, -20.62, 2.17) } dend[14] {pt3dclear() pt3dadd(-56.12, 8.76, -20.62, 1.92) pt3dadd(-56.82, 9.79, -20.62, 1.92) pt3dadd(-57.14, 10.11, -20.62, 1.92) pt3dadd(-57.59, 10.43, -20.62, 1.92) pt3dadd(-58.03, 10.81, -20.62, 1.92) pt3dadd(-58.8, 11.32, -20.62, 1.92) pt3dadd(-59.89, 11.83, -20.62, 1.92) pt3dadd(-60.91, 12.28, -20.62, 1.92) pt3dadd(-61.23, 12.6, -20.62, 1.79) pt3dadd(-61.68, 12.98, -20.62, 1.73) pt3dadd(-62.06, 13.37, -20.62, 1.73) pt3dadd(-63.41, 14.26, -20.62, 1.73) pt3dadd(-63.98, 14.65, -20.62, 1.73) pt3dadd(-64.62, 14.9, -20.62, 1.66) pt3dadd(-64.81, 14.97, -20.62, 1.53) pt3dadd(-65.13, 15.09, -20.62, 1.53) pt3dadd(-66.22, 15.54, -20.62, 1.53) pt3dadd(-66.99, 15.93, -20.62, 1.53) pt3dadd(-67.75, 16.37, -20.62, 1.53) pt3dadd(-68.2, 16.63, -20.62, 1.47) pt3dadd(-68.52, 16.82, -20.62, 1.34) pt3dadd(-68.71, 16.88, -20.62, 1.28) pt3dadd(-69.22, 17.14, -20.62, 1.28) pt3dadd(-70.82, 17.78, -20.62, 1.28) pt3dadd(-71.91, 18.16, -20.62, 1.28) pt3dadd(-73, 18.55, -20.62, 1.28) pt3dadd(-74.21, 18.87, -20.62, 1.21) pt3dadd(-74.85, 18.87, -20.62, 1.02) pt3dadd(-75.94, 18.99, -20.62, 1.02) pt3dadd(-77.15, 19.19, -20.62, 1.02) pt3dadd(-77.79, 19.25, -20.62, 1.02) pt3dadd(-78.43, 19.31, -20.62, 1.02) pt3dadd(-79.26, 19.7, -20.62, 1.02) pt3dadd(-80.41, 20.34, -20.62, 1.02) pt3dadd(-81.24, 20.78, -20.62, 1.02) pt3dadd(-81.37, 20.91, -20.62, 1.02) pt3dadd(-82.65, 21.87, -20.62, 1.02) pt3dadd(-87.25, 24.56, -20.62, 1.02) pt3dadd(-88.02, 24.88, -20.62, 1.02) pt3dadd(-88.41, 25.26, -20.62, 1.02) pt3dadd(-88.6, 25.45, -20.62, 1.02) pt3dadd(-88.73, 25.58, -20.62, 1.02) pt3dadd(-89.11, 25.77, -20.62, 1.02) pt3dadd(-89.17, 25.84, -25.59, 1.02) pt3dadd(-89.3, 25.9, -26.35, 1.02) pt3dadd(-89.94, 26.22, -26.35, 1.02) pt3dadd(-91.16, 26.73, -26.35, 1.02) pt3dadd(-91.99, 27.24, -26.35, 1.02) pt3dadd(-92.69, 27.75, -26.35, 1.02) pt3dadd(-93.14, 28.2, -26.35, 1.02) pt3dadd(-93.46, 28.71, -26.35, 1.02) pt3dadd(-93.9, 29.67, -26.35, 1.02) pt3dadd(-94.29, 30.31, -26.35, 1.02) pt3dadd(-94.86, 31.01, -26.35, 1.02) pt3dadd(-95.63, 31.65, -26.35, 1.02) pt3dadd(-96.4, 32.04, -26.35, 1.02) pt3dadd(-96.59, 32.1, -26.35, 1.02) pt3dadd(-97.03, 32.14, -26.35, 1.02) pt3dadd(-97.54, 32.39, -26.35, 1.02) pt3dadd(-98.69, 33.03, -26.35, 1.02) pt3dadd(-100.29, 33.67, -26.35, 1.02) pt3dadd(-101.38, 33.99, -26.35, 1.02) pt3dadd(-102.79, 34.44, -26.35, 1.02) pt3dadd(-103.94, 35.02, -26.35, 1.02) pt3dadd(-105.09, 35.53, -26.35, 1.02) pt3dadd(-105.79, 36.1, -26.35, 1.02) pt3dadd(-106.81, 36.68, -26.35, 1.02) pt3dadd(-107.58, 37.25, -26.35, 1.02) pt3dadd(-107.96, 37.89, -26.35, 1.02) pt3dadd(-108.28, 38.66, -26.35, 1.02) pt3dadd(-108.67, 39.49, -26.35, 1.02) pt3dadd(-109.05, 40.07, -26.35, 1.02) pt3dadd(-109.44, 40.45, -26.56, 1.02) pt3dadd(-109.76, 40.51, -26.99, 1.02) pt3dadd(-110.52, 40.51, -26.99, 1.02) pt3dadd(-111.29, 40.26, -27.21, 1.02) pt3dadd(-112.25, 39.68, -28.29, 1.02) pt3dadd(-112.57, 39.55, -29.91, 1.02) pt3dadd(-113.46, 39.55, -31.31, 1.02) pt3dadd(-113.91, 39.49, -31.31, 1.02) pt3dadd(-115.51, 39.49, -31.31, 1.02) pt3dadd(-116.53, 39.81, -31.31, 1.02) pt3dadd(-117.49, 40.19, -31.42, 1.02) pt3dadd(-118.32, 40.51, -31.42, 1.02) pt3dadd(-119.28, 40.71, -32.5, 1.02) pt3dadd(-119.47, 40.9, -32.61, 1.02) pt3dadd(-120.37, 41.41, -32.61, 1.02) pt3dadd(-121.58, 41.92, -32.72, 1.02) pt3dadd(-122.86, 42.56, -32.72, 1.02) pt3dadd(-124.33, 43.01, -33.04, 1.02) pt3dadd(-124.91, 43.52, -33.58, 1.02) pt3dadd(-125.68, 44.22, -34.55, 1.02) pt3dadd(-126.12, 44.86, -34.55, 1.02) pt3dadd(-126.38, 45.31, -34.98, 1.02) pt3dadd(-126.89, 46.08, -34.98, 1.02) pt3dadd(-127.34, 46.84, -35.63, 1.02) pt3dadd(-128.11, 47.74, -36.06, 1.02) pt3dadd(-129.83, 48.63, -36.06, 1.02) pt3dadd(-131.05, 49.34, -36.06, 1.02) pt3dadd(-131.43, 49.59, -36.06, 1.02) pt3dadd(-133.09, 50.36, -36.06, 1.02) pt3dadd(-133.22, 50.68, -36.06, 1.02) pt3dadd(-133.92, 51.45, -36.06, 1.02) pt3dadd(-134.95, 51.89, -36.06, 1.02) pt3dadd(-135.84, 52.21, -36.06, 1.02) pt3dadd(-137.06, 52.85, -36.06, 1.02) pt3dadd(-138.02, 53.43, -36.06, 1.02) pt3dadd(-138.91, 54.39, -36.06, 1.02) pt3dadd(-140.13, 55.22, -36.06, 1.02) pt3dadd(-141.21, 56.18, -36.06, 1.02) pt3dadd(-141.66, 56.69, -36.06, 1.02) } } proc shape3d_18() { dend[14] { pt3dadd(-142.11, 57.39, -36.06, 1.02) pt3dadd(-142.3, 57.84, -36.06, 1.02) pt3dadd(-142.36, 57.84, -36.06, 1.02) pt3dadd(-143.3, 58.29, -36.06, 0.9) pt3dadd(-143.3, 58.42, -36.06, 0.9) pt3dadd(-144.19, 59.19, -36.06, 0.9) pt3dadd(-144.89, 59.96, -36.06, 0.9) pt3dadd(-145.21, 60.98, -36.06, 0.9) pt3dadd(-145.28, 62, -36.06, 0.9) pt3dadd(-144.89, 62.83, -36.06, 0.9) pt3dadd(-144.32, 63.92, -36.06, 0.9) pt3dadd(-143.87, 64.94, -36.06, 0.9) pt3dadd(-143.87, 65.9, -36.06, 0.9) pt3dadd(-143.93, 66.48, -36.06, 0.9) pt3dadd(-144.13, 66.99, -36.06, 0.9) pt3dadd(-144.57, 67.95, -36.06, 0.9) pt3dadd(-145.21, 68.84, -36.28, 0.9) pt3dadd(-145.98, 69.55, -36.28, 0.9) pt3dadd(-146.36, 69.93, -36.93, 0.9) pt3dadd(-146.68, 70.44, -37.9, 0.9) pt3dadd(-146.94, 71.02, -38.76, 0.9) pt3dadd(-146.94, 72.1, -38.98, 0.9) pt3dadd(-147.13, 72.81, -38.98, 0.9) pt3dadd(-147.71, 73.64, -38.98, 0.9) pt3dadd(-148.99, 74.85, -38.98, 0.9) pt3dadd(-149.56, 75.56, -38.98, 0.9) pt3dadd(-149.88, 75.88, -38.98, 0.83) pt3dadd(-150.78, 76.77, -38.98, 0.83) pt3dadd(-151.35, 77.47, -39.09, 0.83) pt3dadd(-151.8, 78.18, -39.52, 0.83) pt3dadd(-152.37, 79.07, -39.52, 0.83) pt3dadd(-152.95, 80.29, -39.73, 0.83) pt3dadd(-153.14, 80.74, -39.73, 0.83) pt3dadd(-153.21, 80.86, -40.06, 0.83) pt3dadd(-153.65, 81.63, -40.06, 0.83) pt3dadd(-154.04, 82.27, -40.06, 0.83) pt3dadd(-154.61, 83.29, -40.06, 0.83) pt3dadd(-155.12, 84.57, -40.06, 0.83) pt3dadd(-155.32, 85.66, -40.06, 0.83) pt3dadd(-155.32, 87.26, -40.06, 0.83) pt3dadd(-155.57, 87.7, -40.06, 0.83) pt3dadd(-155.64, 87.77, -40.06, 0.83) pt3dadd(-155.76, 90.01, -40.06, 0.64) pt3dadd(-156.47, 90.91, -40.06, 0.64) pt3dadd(-156.91, 91.8, -40.06, 0.64) pt3dadd(-157.3, 93.14, -40.06, 0.64) pt3dadd(-157.81, 94.68, -40.06, 0.64) pt3dadd(-158.71, 95.7, -40.06, 0.64) pt3dadd(-159.41, 96.53, -40.06, 0.64) pt3dadd(-160.18, 97.24, -40.06, 0.64) pt3dadd(-160.94, 98.2, -40.06, 0.64) pt3dadd(-162.09, 99.03, -40.06, 0.64) pt3dadd(-163.05, 99.73, -40.06, 0.64) pt3dadd(-163.63, 100.24, -40.06, 0.64) pt3dadd(-164.52, 100.75, -40.06, 0.64) pt3dadd(-165.67, 101.33, -40.06, 0.64) pt3dadd(-166.06, 101.52, -40.06, 0.64) pt3dadd(-166.95, 101.52, -40.06, 0.64) pt3dadd(-168.81, 101.71, -40.06, 0.64) pt3dadd(-169.89, 102.16, -40.06, 0.64) pt3dadd(-170.85, 102.67, -40.06, 0.64) pt3dadd(-171.68, 103.06, -40.06, 0.64) pt3dadd(-172.58, 103.5, -40.06, 0.64) pt3dadd(-173.09, 103.89, -40.06, 0.64) pt3dadd(-173.92, 104.33, -41.03, 0.64) pt3dadd(-175.39, 104.97, -41.03, 0.64) pt3dadd(-176.67, 105.42, -41.79, 0.64) pt3dadd(-177.25, 105.68, -41.79, 0.64) pt3dadd(-178.4, 106, -42.97, 0.64) pt3dadd(-178.65, 106.25, -42.97, 0.64) pt3dadd(-180.7, 107.27, -42.97, 0.64) pt3dadd(-181.72, 107.72, -42.97, 0.64) pt3dadd(-182.3, 108.11, -42.97, 0.64) pt3dadd(-182.68, 108.49, -42.97, 0.64) pt3dadd(-183.07, 108.75, -43.84, 0.64) pt3dadd(-183.39, 109, -43.84, 0.64) pt3dadd(-183.58, 109.13, -43.84, 0.64) pt3dadd(-183.83, 109.26, -45.89, 0.64) pt3dadd(-184.86, 109.96, -45.89, 0.64) pt3dadd(-185.69, 110.47, -45.89, 0.64) pt3dadd(-186.52, 110.73, -46, 0.64) pt3dadd(-187.09, 110.92, -46, 0.64) pt3dadd(-187.54, 111.3, -47.18, 0.64) pt3dadd(-187.86, 111.69, -47.18, 0.64) pt3dadd(-188.31, 112.13, -47.18, 0.64) pt3dadd(-188.5, 112.33, -49.34, 0.64) pt3dadd(-188.56, 112.39, -49.88, 0.64) } dend[15] {pt3dclear() pt3dadd(-56.12, 8.76, -20.62, 1.09) pt3dadd(-55.69, 8.58, -12.63, 1.09) pt3dadd(-57.1, 8.58, -12.63, 1.09) pt3dadd(-57.54, 8.39, -12.63, 1.09) pt3dadd(-57.8, 8.26, -12.63, 1.09) pt3dadd(-58.12, 8.2, -12.63, 1.09) pt3dadd(-58.95, 8.39, -12.63, 1.09) pt3dadd(-59.46, 8.52, -12.63, 1.09) pt3dadd(-60.42, 8.26, -12.63, 1.09) pt3dadd(-61.25, 7.75, -12.63, 1.09) pt3dadd(-62.34, 7.3, -12.63, 1.09) pt3dadd(-63.43, 7.18, -12.63, 1.09) pt3dadd(-64.13, 7.18, -12.63, 1.09) pt3dadd(-64.77, 7.3, -12.63, 1.09) pt3dadd(-65.41, 7.5, -12.63, 1.09) pt3dadd(-66.11, 7.5, -12.63, 1.09) pt3dadd(-67.01, 6.98, -12.63, 1.09) pt3dadd(-68.09, 6.28, -12.63, 1.09) pt3dadd(-69.24, 5.26, -12.63, 1.09) pt3dadd(-70.65, 4.3, -12.63, 1.09) pt3dadd(-71.23, 3.85, -12.63, 1.09) pt3dadd(-71.35, 3.79, -12.63, 1.09) pt3dadd(-71.8, 3.6, -27.21, 1.09) pt3dadd(-72.12, 3.28, -29.48, 1.09) pt3dadd(-73.14, 2.44, -29.48, 1.09) pt3dadd(-73.98, 1.93, -29.48, 1.09) pt3dadd(-74.61, 1.42, -29.48, 1.09) pt3dadd(-75.38, 0.59, -29.48, 1.09) pt3dadd(-76.79, -0.31, -29.48, 1.09) pt3dadd(-77.68, -0.82, -29.48, 1.09) pt3dadd(-78.9, -1.46, -29.48, 1.09) pt3dadd(-79.99, -2.03, -29.48, 1.09) pt3dadd(-81.26, -2.73, -29.48, 1.09) pt3dadd(-82.29, -3.5, -29.48, 1.09) pt3dadd(-83.18, -3.89, -29.48, 1.09) pt3dadd(-83.44, -4.14, -29.48, 1.09) pt3dadd(-83.5, -4.21, -29.48, 1.09) pt3dadd(-83.89, -4.46, -29.48, 1.09) pt3dadd(-84.65, -4.97, -29.48, 1.09) pt3dadd(-85.68, -5.68, -29.48, 1.09) pt3dadd(-86.83, -6.19, -29.48, 1.09) pt3dadd(-88.74, -7.34, -29.37, 1.09) pt3dadd(-89.9, -7.98, -28.83, 1.09) pt3dadd(-90.98, -8.62, -28.83, 1.09) pt3dadd(-91.69, -8.87, -28.72, 1.09) pt3dadd(-92.52, -9.26, -28.72, 1.09) pt3dadd(-93.73, -9.77, -28.72, 1.09) pt3dadd(-94.88, -10.34, -28.72, 1.09) pt3dadd(-96.1, -11.17, -28.72, 1.09) pt3dadd(-96.61, -11.69, -28.72, 1.09) pt3dadd(-97.06, -12.26, -28.72, 1.09) pt3dadd(-97.38, -12.77, -28.72, 1.09) pt3dadd(-97.82, -13.03, -28.72, 1.09) pt3dadd(-98.72, -13.28, -28.72, 1.09) pt3dadd(-100.25, -13.28, -28.72, 1.09) pt3dadd(-101.15, -13.6, -28.72, 1.09) pt3dadd(-101.34, -13.6, -28.72, 1.09) pt3dadd(-102.17, -13.86, -28.72, 1.09) pt3dadd(-105.05, -13.86, -28.72, 1.09) pt3dadd(-106.14, -13.92, -28.72, 1.09) pt3dadd(-108.06, -13.92, -15.87, 1.09) pt3dadd(-109.59, -14.62, -15.87, 1.09) pt3dadd(-111.7, -15.84, -15.87, 1.09) pt3dadd(-112.92, -16.73, -15.87, 1.09) pt3dadd(-113.87, -17.69, -15.87, 1.09) pt3dadd(-114.13, -17.95, -15.87, 1.09) pt3dadd(-114.39, -18.46, -15.87, 1.09) pt3dadd(-115.6, -20.51, -15.87, 1.09) pt3dadd(-116.11, -24.53, -15.87, 1.09) pt3dadd(-116.88, -26.84, -15.87, 1.09) pt3dadd(-117.14, -27.67, -15.87, 1.09) pt3dadd(-118.35, -28.63, -15.87, 1.09) pt3dadd(-119.76, -28.95, -15.87, 1.09) pt3dadd(-120.46, -30.23, -15.87, 1.09) pt3dadd(-120.52, -31.44, -15.87, 1.09) pt3dadd(-120.59, -31.63, -15.87, 1.09) } dend[16] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(-10.3, 0.18, -5.18, 3.84) pt3dadd(-10.56, 0.25, -5.18, 3.84) pt3dadd(-11.26, 0.38, -5.18, 3.84) pt3dadd(-11.39, 0.44, -5.18, 3.84) pt3dadd(-11.71, 0.44, -5.18, 3.84) pt3dadd(-12.61, 0.63, -5.18, 3.84) pt3dadd(-12.93, 0.76, -5.18, 3.84) pt3dadd(-13.37, 0.95, -5.18, 3.84) pt3dadd(-14.2, 1.46, -5.18, 3.84) pt3dadd(-15.99, 1.46, -5.18, 3.64) pt3dadd(-16.89, 1.53, -5.18, 3.64) pt3dadd(-17.66, 1.66, -5.18, 3.64) pt3dadd(-22.9, 1.66, -5.18, 3.32) pt3dadd(-23.8, 1.78, -5.18, 3.32) pt3dadd(-24.95, 2.04, -5.18, 3.32) pt3dadd(-26.8, 2.04, -5.18, 3.2) pt3dadd(-27.5, 2.17, -5.18, 3.2) pt3dadd(-28.4, 2.42, -5.18, 3.2) pt3dadd(-29.1, 2.42, -5.18, 3.07) pt3dadd(-30.06, 2.61, -5.18, 3.07) pt3dadd(-30.83, 2.81, -5.18, 3.07) pt3dadd(-31.4, 3.19, -5.18, 3.01) pt3dadd(-31.66, 3.25, -5.18, 2.88) pt3dadd(-31.98, 3.51, -5.18, 2.88) pt3dadd(-32.36, 3.83, -5.18, 2.88) pt3dadd(-32.68, 4.28, -5.18, 2.88) pt3dadd(-33, 4.72, -5.18, 2.81) pt3dadd(-33.13, 4.92, -5.18, 2.69) pt3dadd(-33.45, 5.3, -5.18, 2.69) pt3dadd(-33.9, 5.75, -5.18, 2.69) pt3dadd(-34.47, 6.13, -5.18, 2.69) pt3dadd(-35.18, 6.39, -5.18, 2.69) pt3dadd(-35.75, 6.39, -5.18, 2.56) pt3dadd(-36.07, 6.19, -5.18, 2.49) pt3dadd(-36.9, 5.81, -5.18, 2.49) pt3dadd(-37.8, 4.85, -5.18, 2.49) } } proc shape3d_19() { dend[16] { pt3dadd(-38.31, 4.21, -5.18, 2.49) pt3dadd(-38.63, 4.21, -5.18, 2.43) pt3dadd(-38.95, 4.02, -5.18, 2.3) pt3dadd(-39.4, 3.76, -5.18, 2.24) pt3dadd(-40.42, 3.19, -5.18, 2.24) pt3dadd(-41.31, 2.55, -5.18, 2.24) pt3dadd(-41.89, 2.04, -5.18, 2.24) pt3dadd(-42.15, 1.91, -5.18, 2.24) pt3dadd(-42.53, 1.78, -5.18, 2.17) pt3dadd(-42.85, 1.72, -5.18, 2.17) pt3dadd(-43.55, 1.78, -5.18, 2.17) pt3dadd(-44.89, 1.85, -5.18, 2.17) pt3dadd(-45.09, 1.85, -5.18, 2.17) pt3dadd(-46.59, 1.97, -9.29, 2.05) pt3dadd(-50.94, 1.97, -9.29, 2.05) pt3dadd(-51.13, 2.1, -9.29, 2.05) pt3dadd(-51.64, 2.55, -9.29, 2.05) pt3dadd(-51.9, 2.68, -9.29, 2.05) pt3dadd(-55.03, 2.68, -9.29, 2.05) pt3dadd(-56.69, 2.49, -9.29, 2.05) pt3dadd(-57.78, 2.1, -9.29, 2.05) pt3dadd(-58.36, 1.97, -9.29, 2.05) pt3dadd(-59.19, 1.78, -9.29, 2.05) pt3dadd(-61.87, 1.78, -9.29, 2.05) pt3dadd(-63.85, 1.97, -9.29, 2.05) pt3dadd(-65.58, 2.17, -9.29, 2.05) pt3dadd(-69.29, 2.17, -9.29, 2.05) pt3dadd(-70.44, 2.42, -9.29, 2.05) pt3dadd(-71.91, 2.61, -9.29, 2.05) pt3dadd(-72.55, 2.68, -9.29, 2.05) pt3dadd(-73.83, 3.06, -9.29, 2.05) pt3dadd(-75.23, 3.44, -9.29, 2.05) pt3dadd(-75.81, 3.51, -9.29, 2.05) pt3dadd(-77.28, 3.51, -9.29, 2.05) pt3dadd(-81.76, 3.51, -9.29, 2.05) pt3dadd(-82.65, 3.25, -9.29, 2.05) pt3dadd(-83.74, 2.55, -9.29, 2.05) pt3dadd(-85.08, 1.01, -9.29, 2.05) pt3dadd(-85.78, 0.44, -9.29, 2.05) pt3dadd(-86.42, 0.06, -9.29, 2.05) pt3dadd(-87, -0.14, -9.29, 2.05) pt3dadd(-88.09, -0.2, -9.29, 2.05) pt3dadd(-89.05, -0.2, -9.29, 2.05) pt3dadd(-90.28, -0.4, -9.29, 1.92) pt3dadd(-90.53, -0.4, -9.29, 1.92) pt3dadd(-92.84, -1.17, -9.29, 1.92) pt3dadd(-93.99, -2, -9.29, 1.92) pt3dadd(-95.07, -3.21, -9.29, 1.92) pt3dadd(-96.42, -3.85, -9.29, 1.92) pt3dadd(-97.89, -4.49, -9.29, 1.92) pt3dadd(-99.42, -4.56, -9.29, 1.92) pt3dadd(-101.66, -5.32, -9.29, 1.92) pt3dadd(-103.07, -6.03, -9.29, 1.92) pt3dadd(-103.83, -6.35, -9.29, 1.92) pt3dadd(-104.79, -6.67, -9.29, 1.92) pt3dadd(-105.88, -6.92, -9.29, 1.92) pt3dadd(-107.54, -6.73, -9.29, 1.92) pt3dadd(-109.01, -6.22, -9.29, 1.92) pt3dadd(-110.8, -5.26, -9.29, 1.92) pt3dadd(-111.95, -5.2, -9.29, 1.92) pt3dadd(-116.43, -5.2, -9.29, 1.92) pt3dadd(-116.94, -5.39, -9.29, 1.92) pt3dadd(-117.84, -5.9, -9.29, 1.92) pt3dadd(-118.09, -5.9, -9.29, 1.92) pt3dadd(-119.63, -6.41, -9.29, 1.92) pt3dadd(-120.97, -7.11, -9.29, 1.92) pt3dadd(-121.23, -7.11, -9.29, 1.92) pt3dadd(-121.42, -7.18, 3.67, 1.92) pt3dadd(-122.63, -7.95, 3.67, 1.92) pt3dadd(-123.14, -8.2, 3.67, 1.92) pt3dadd(-123.59, -8.46, 3.67, 1.92) pt3dadd(-123.97, -8.65, 3.67, 1.92) pt3dadd(-124.42, -8.97, 3.67, 1.92) pt3dadd(-124.74, -9.16, 3.67, 1.92) pt3dadd(-125.57, -9.16, 3.67, 1.79) pt3dadd(-125.96, -9.48, 3.67, 1.79) pt3dadd(-126.6, -10.31, 3.67, 1.79) pt3dadd(-127.11, -11.08, 3.67, 1.79) pt3dadd(-127.49, -11.78, 3.67, 1.79) pt3dadd(-127.94, -12.36, 3.67, 1.79) pt3dadd(-128.51, -13, 3.67, 1.79) pt3dadd(-129.09, -13.38, 3.67, 1.79) pt3dadd(-129.86, -13.7, 3.67, 1.79) pt3dadd(-130.5, -14.15, 3.67, 1.79) pt3dadd(-130.88, -14.6, 3.67, 1.79) pt3dadd(-131.2, -14.98, 3.67, 1.79) pt3dadd(-131.65, -15.11, 3.67, 1.79) pt3dadd(-131.78, -15.11, 3.67, 1.79) pt3dadd(-131.91, -14.98, 3.67, 1.66) pt3dadd(-132.17, -15.05, 3.67, 1.66) pt3dadd(-133.25, -15.69, 3.67, 1.66) pt3dadd(-134.09, -16.32, 3.67, 1.66) pt3dadd(-135.24, -17.41, 3.67, 1.66) pt3dadd(-136, -18.11, 3.67, 1.66) pt3dadd(-136.96, -18.75, 3.67, 1.66) pt3dadd(-138.37, -19.46, 3.67, 1.66) pt3dadd(-139.2, -19.71, 3.67, 1.66) pt3dadd(-140.22, -19.97, 3.67, 1.66) pt3dadd(-141.76, -20.48, 3.67, 1.66) pt3dadd(-142.91, -20.99, 3.67, 1.66) pt3dadd(-144.19, -21.06, 3.78, 1.66) pt3dadd(-145.59, -21.06, 4, 1.66) pt3dadd(-146.75, -20.86, 4, 1.66) pt3dadd(-147.7, -20.42, 4, 1.66) pt3dadd(-148.79, -19.59, 4.43, 1.66) pt3dadd(-149.37, -19.14, 4.53, 1.66) pt3dadd(-151.09, -17.41, 5.07, 1.66) pt3dadd(-151.16, -17.28, 7.56, 1.66) pt3dadd(-151.29, -17.22, 7.56, 1.66) pt3dadd(-151.41, -17.16, 7.67, 1.66) pt3dadd(-151.48, -17.09, 7.99, 1.66) pt3dadd(-151.73, -16.96, 8.85, 1.66) pt3dadd(-151.86, -16.9, 10.8, 1.66) pt3dadd(-152.31, -16.71, 10.8, 1.66) pt3dadd(-152.88, -16.45, 10.8, 1.66) pt3dadd(-153.33, -16.13, 10.8, 1.66) pt3dadd(-153.91, -15.75, 10.8, 1.66) pt3dadd(-154.48, -15.43, 10.8, 1.66) pt3dadd(-155.19, -15.3, 10.8, 1.66) pt3dadd(-156.08, -15.37, 10.8, 1.66) pt3dadd(-156.66, -15.49, 10.8, 1.53) pt3dadd(-157.49, -16.07, 10.8, 1.47) pt3dadd(-158.13, -16.45, 10.8, 1.41) pt3dadd(-158.89, -16.45, 10.8, 1.41) pt3dadd(-159.53, -16.84, 10.8, 1.41) pt3dadd(-159.66, -16.9, 10.8, 1.34) pt3dadd(-159.98, -17.03, 10.8, 1.21) pt3dadd(-160.43, -17.35, 10.8, 1.21) pt3dadd(-160.68, -17.35, 10.8, 1.21) pt3dadd(-160.75, -17.48, 10.8, 1.21) pt3dadd(-161.64, -17.67, 10.8, 1.21) pt3dadd(-161.77, -17.79, 10.8, 1.21) pt3dadd(-162.15, -17.99, 10.8, 1.21) pt3dadd(-163.43, -18.63, 10.8, 1.21) pt3dadd(-164.71, -19.01, 10.8, 1.21) pt3dadd(-165.74, -19.33, 10.8, 1.21) pt3dadd(-166.5, -19.52, 10.8, 1.21) pt3dadd(-167.65, -19.97, 10.8, 1.21) pt3dadd(-169, -19.97, 10.8, 1.21) pt3dadd(-170.21, -19.59, 10.8, 1.21) pt3dadd(-171.17, -19.52, 10.8, 1.21) pt3dadd(-172.64, -19.9, 10.8, 1.21) pt3dadd(-172.96, -19.9, 10.8, 1.21) pt3dadd(-173.22, -19.97, 10.8, 1.21) pt3dadd(-173.28, -19.97, 10.8, 1.21) pt3dadd(-174.02, -20.15, 10.8, 1.02) pt3dadd(-174.28, -20.15, 10.8, 1.02) pt3dadd(-175.11, -20.41, 10.8, 1.02) pt3dadd(-176.2, -20.47, 10.8, 1.02) pt3dadd(-176.96, -20.47, 10.8, 1.02) pt3dadd(-177.92, -20.47, 10.8, 1.02) pt3dadd(-179.27, -20.54, 10.8, 1.02) pt3dadd(-180.93, -20.54, 10.8, 1.02) pt3dadd(-181.7, -20.86, 10.8, 1.02) pt3dadd(-183.42, -20.86, 10.8, 1.02) pt3dadd(-184.38, -21.24, 10.8, 1.02) pt3dadd(-185.47, -21.43, 10.8, 1.02) pt3dadd(-187.19, -21.05, 10.8, 1.02) pt3dadd(-188.47, -20.6, 10.8, 1.02) pt3dadd(-189.37, -20.54, 10.8, 1.02) pt3dadd(-190.01, -20.6, 10.8, 1.02) pt3dadd(-190.58, -20.79, 10.8, 0.9) pt3dadd(-191.03, -20.86, 10.8, 0.9) pt3dadd(-191.86, -21.18, 10.8, 0.9) pt3dadd(-192.89, -21.3, 10.8, 0.9) pt3dadd(-193.59, -21.43, 10.8, 0.9) } dend[17] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(-7.97, -10.34, 3.24, 3.58) pt3dadd(-8.42, -10.79, 3.24, 3.58) pt3dadd(-9.44, -11.62, 3.24, 3.58) pt3dadd(-10.08, -12.07, 3.24, 3.58) pt3dadd(-10.59, -12.26, 3.24, 3.58) pt3dadd(-11.04, -12.33, 3.24, 3.58) pt3dadd(-12.19, -12.9, 3.24, 3.58) pt3dadd(-13.15, -13.48, 3.24, 3.58) pt3dadd(-13.85, -13.8, 3.24, 3.58) pt3dadd(-14.17, -13.8, 3.24, 3.58) pt3dadd(-14.62, -13.92, 3.24, 3.58) pt3dadd(-15.33, -14.12, 3.24, 3.45) pt3dadd(-15.96, -14.5, 3.24, 3.32) pt3dadd(-16.6, -14.82, 3.24, 3.32) pt3dadd(-17.18, -15.08, 3.24, 3.32) pt3dadd(-17.56, -15.14, 3.24, 3.32) pt3dadd(-18.33, -15.14, 3.24, 3.32) pt3dadd(-18.78, -15.27, 3.24, 3.32) pt3dadd(-19.42, -15.91, 3.24, 3.32) pt3dadd(-19.74, -16.48, 3.24, 3.32) pt3dadd(-20.12, -16.99, 3.24, 3.32) pt3dadd(-20.5, -17.63, 3.24, 3.32) pt3dadd(-20.95, -18.14, 3.24, 3.26) pt3dadd(-21.46, -18.66, 3.24, 3.26) pt3dadd(-21.85, -19.1, 3.24, 3.2) pt3dadd(-22.23, -19.49, 3.24, 3.2) pt3dadd(-22.74, -19.81, 3.24, 3.13) pt3dadd(-23.51, -20.06, 3.24, 3.13) pt3dadd(-24.15, -20.25, 3.24, 3.13) pt3dadd(-24.47, -20.45, 3.24, 3.13) pt3dadd(-24.92, -20.7, 3.24, 3.13) pt3dadd(-25.43, -21.02, 3.24, 3.07) pt3dadd(-25.68, -21.15, 3.24, 3.07) } } proc shape3d_20() { dend[17] { pt3dadd(-26.13, -21.6, 3.24, 3.07) pt3dadd(-26.26, -21.66, 3.24, 3.07) } dend[18] {pt3dclear() pt3dadd(-26.26, -21.66, 3.24, 1.66) pt3dadd(-27.15, -21.79, 8.96, 1.66) pt3dadd(-27.35, -21.66, 8.96, 1.66) pt3dadd(-28.05, -21.28, 8.96, 1.66) pt3dadd(-28.69, -21.15, 8.96, 1.66) pt3dadd(-29.2, -21.09, 8.96, 1.66) pt3dadd(-29.78, -21.21, 8.96, 1.66) pt3dadd(-30.67, -21.28, 8.96, 1.66) pt3dadd(-31.44, -21.09, 8.96, 1.66) pt3dadd(-32.27, -20.7, 8.96, 1.6) pt3dadd(-32.65, -20.51, 8.96, 1.53) pt3dadd(-33.04, -20.32, 8.96, 1.47) pt3dadd(-33.55, -19.93, 8.96, 1.47) pt3dadd(-34.51, -19.55, 8.96, 1.47) pt3dadd(-35.02, -19.23, 8.96, 1.47) pt3dadd(-35.59, -18.91, 8.96, 1.47) pt3dadd(-36.04, -18.91, 8.96, 1.47) pt3dadd(-36.55, -19.1, 8.96, 1.47) pt3dadd(-37, -19.55, 8.96, 1.34) pt3dadd(-37.45, -19.87, 8.96, 1.34) pt3dadd(-37.83, -19.93, 8.96, 1.34) pt3dadd(-38.22, -20, 8.96, 1.34) pt3dadd(-38.98, -20.06, 8.96, 1.34) pt3dadd(-40.64, -20.06, 8.96, 1.34) } dend[19] {pt3dclear() pt3dadd(-26.26, -21.66, 3.24, 1.6) pt3dadd(-26.07, -21.85, 8.96, 1.6) pt3dadd(-26.58, -22.11, 8.96, 1.6) pt3dadd(-27.47, -23.07, 8.96, 1.6) pt3dadd(-27.99, -24.03, 8.96, 1.6) pt3dadd(-28.24, -24.6, 8.96, 1.6) pt3dadd(-28.24, -27.99, 8.96, 1.6) pt3dadd(-28.5, -28.25, 8.96, 1.6) pt3dadd(-28.94, -28.5, 8.96, 1.6) pt3dadd(-29.65, -28.89, 8.96, 1.6) pt3dadd(-30.29, -29.33, 8.96, 1.6) pt3dadd(-31.05, -29.84, 8.96, 1.6) pt3dadd(-31.82, -30.36, 8.96, 1.6) pt3dadd(-33.1, -31, 8.96, 1.6) pt3dadd(-34.19, -31.44, 8.96, 1.6) pt3dadd(-35.59, -31.89, 8.96, 1.6) pt3dadd(-36.55, -32.27, 8.96, 1.6) pt3dadd(-37.45, -32.66, 8.96, 1.6) pt3dadd(-37.58, -32.66, 8.96, 1.6) pt3dadd(-38.73, -33.11, 8.96, 1.6) pt3dadd(-39.62, -33.36, 8.96, 1.6) pt3dadd(-40.9, -33.75, 8.96, 1.6) pt3dadd(-42.88, -34.51, 8.96, 1.6) pt3dadd(-44.29, -34.77, 8.96, 1.6) pt3dadd(-45.5, -35.02, 8.96, 1.6) pt3dadd(-45.95, -35.22, 8.96, 1.6) pt3dadd(-46.08, -35.34, 8.96, 1.6) pt3dadd(-46.14, -35.47, 8.96, 1.6) pt3dadd(-46.44, -35.84, 8.96, 1.6) pt3dadd(-46.76, -36.16, 8.96, 1.6) pt3dadd(-47.78, -36.73, 8.96, 1.6) pt3dadd(-49.31, -37.44, 8.96, 1.6) pt3dadd(-50.14, -37.76, 8.96, 1.6) pt3dadd(-50.98, -38.14, 8.96, 1.6) pt3dadd(-51.55, -38.39, 8.96, 1.6) pt3dadd(-51.93, -38.39, 8.96, 1.6) pt3dadd(-52.51, -38.65, 8.96, 1.6) pt3dadd(-52.83, -38.91, 8.96, 1.6) pt3dadd(-53.09, -39.16, 8.96, 1.6) pt3dadd(-53.47, -39.67, 8.96, 1.6) } dend[20] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(1.18, -13.44, 3.24, 3.9) pt3dadd(1.18, -13.57, 3.24, 3.9) pt3dadd(1.75, -14.92, 3.24, 3.9) pt3dadd(1.95, -15.75, 3.24, 3.9) pt3dadd(1.95, -19.07, 3.24, 3.9) pt3dadd(2.01, -19.58, 3.24, 3.9) pt3dadd(2.14, -20.09, 3.24, 3.9) pt3dadd(2.2, -20.48, 3.24, 3.9) pt3dadd(2.39, -20.67, 3.24, 3.9) pt3dadd(3.1, -21.05, 3.24, 3.9) pt3dadd(3.54, -21.24, 3.24, 3.9) pt3dadd(3.86, -21.31, 3.24, 3.9) pt3dadd(4.06, -21.31, 3.24, 3.9) pt3dadd(4.31, -21.37, 3.24, 3.9) pt3dadd(4.5, -21.44, 3.24, 3.84) pt3dadd(4.7, -21.56, 3.24, 3.71) pt3dadd(4.82, -21.56, 3.24, 3.64) pt3dadd(5.53, -22.4, 3.24, 3.64) pt3dadd(6.1, -23.48, 3.24, 3.64) pt3dadd(6.42, -24.25, 3.24, 3.64) pt3dadd(6.74, -25.02, 3.24, 3.64) pt3dadd(6.93, -25.66, 3.24, 3.64) pt3dadd(7, -25.91, 3.24, 3.64) pt3dadd(7, -30.07, 3.24, 3.13) pt3dadd(6.94, -32.25, 3.24, 2.94) pt3dadd(7.32, -33.91, 3.24, 2.94) pt3dadd(7.7, -35.25, 3.24, 2.94) pt3dadd(7.7, -36.79, 3.24, 2.94) pt3dadd(7.26, -38.07, 3.24, 2.94) pt3dadd(6.87, -38.71, 3.24, 2.94) pt3dadd(6.62, -38.77, 3.24, 2.94) pt3dadd(6.23, -39.41, 3.24, 2.94) pt3dadd(5.79, -40.3, 3.24, 2.88) pt3dadd(5.34, -41.07, 3.24, 2.81) pt3dadd(5.02, -41.84, 3.24, 2.75) pt3dadd(4.57, -42.35, 3.24, 2.75) pt3dadd(4.57, -43.18, 3.24, 2.75) } dend[21] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(5.27, -10.57, -3.13, 3.9) pt3dadd(5.34, -10.76, -3.13, 3.9) pt3dadd(6.04, -11.53, -3.13, 3.9) pt3dadd(6.3, -11.6, -3.13, 3.9) pt3dadd(6.55, -11.79, -3.13, 3.9) pt3dadd(6.68, -11.92, -3.13, 3.9) pt3dadd(6.74, -12.04, -3.13, 3.84) pt3dadd(6.74, -12.17, -3.13, 3.77) pt3dadd(7.06, -12.94, -3.13, 3.77) pt3dadd(7.13, -13.07, -3.13, 3.58) pt3dadd(7.45, -13.26, -3.13, 3.45) pt3dadd(7.45, -13.39, -3.13, 3.39) pt3dadd(8.34, -14.34, -3.13, 3.39) pt3dadd(9.11, -14.92, -3.13, 3.39) pt3dadd(9.56, -15.37, -3.13, 3.39) pt3dadd(9.75, -15.88, -3.13, 3.26) pt3dadd(10.07, -16.26, -3.13, 3.26) pt3dadd(10.64, -16.77, -3.13, 3.26) pt3dadd(10.84, -16.77, -3.13, 3.26) pt3dadd(11.48, -17.54, -3.13, 3.26) pt3dadd(12.18, -18.44, -3.13, 3.13) pt3dadd(12.75, -18.95, -3.13, 3.13) pt3dadd(13.01, -19.01, -3.13, 3.13) pt3dadd(13.46, -19.01, -3.13, 3.13) pt3dadd(14.48, -19.59, -3.13, 3.13) pt3dadd(15.57, -20.23, -3.13, 3.13) pt3dadd(16.46, -20.67, -3.13, 3.13) pt3dadd(17.1, -21.06, -3.13, 3.13) pt3dadd(17.81, -21.38, -3.13, 3.07) pt3dadd(18.51, -21.57, -3.13, 3.01) pt3dadd(19.28, -21.7, -3.13, 3.01) pt3dadd(23.69, -21.7, -3.13, 3.01) pt3dadd(24.07, -21.57, -3.13, 3.01) pt3dadd(24.46, -21.25, -3.13, 3.01) pt3dadd(25.48, -20.67, -3.13, 3.01) pt3dadd(25.67, -20.42, -3.13, 3.01) } dend[22] {pt3dclear() pt3dadd(25.67, -20.42, -3.13, 2.37) pt3dadd(27.2, -19.72, 2.59, 2.37) pt3dadd(30.72, -19.14, 2.59, 2.37) pt3dadd(31.11, -18.76, 2.59, 2.37) pt3dadd(31.49, -18.44, 2.59, 2.37) pt3dadd(32.19, -17.93, 2.59, 2.37) pt3dadd(32.77, -17.86, 2.59, 2.37) pt3dadd(34.81, -17.86, 2.59, 2.37) pt3dadd(36.03, -17.99, 2.59, 2.37) pt3dadd(37.18, -17.99, 2.59, 2.37) pt3dadd(38.97, -18.76, 2.59, 2.3) pt3dadd(39.99, -19.27, 2.59, 2.17) pt3dadd(40.89, -20.29, 2.59, 2.17) pt3dadd(41.21, -20.93, 2.59, 2.17) pt3dadd(41.91, -21.63, 2.59, 2.17) pt3dadd(42.68, -22.15, 2.59, 2.17) pt3dadd(43.76, -22.98, 2.59, 2.17) pt3dadd(44.6, -23.36, 2.59, 2.17) pt3dadd(45.49, -24.06, 2.59, 2.17) pt3dadd(46.45, -24.7, 2.59, 2.17) pt3dadd(47.15, -25.21, 2.59, 2.17) pt3dadd(47.73, -25.73, 2.59, 2.17) pt3dadd(48.18, -25.85, 2.59, 2.17) pt3dadd(48.62, -26.11, 2.59, 2.17) pt3dadd(48.88, -26.17, 2.59, 2.17) pt3dadd(48.94, -26.17, 2.59, 2.17) pt3dadd(50.51, -26.33, 2.59, 2.17) pt3dadd(50.77, -26.65, 2.59, 2.17) pt3dadd(51.47, -27.22, 2.59, 2.17) pt3dadd(52.5, -27.67, 2.59, 2.17) pt3dadd(53.65, -28.37, 2.59, 2.17) pt3dadd(54.54, -29.14, 2.81, 2.17) pt3dadd(54.86, -29.46, 2.81, 2.17) pt3dadd(54.93, -29.59, 5.61, 2.17) pt3dadd(55.95, -30.74, 5.61, 2.17) pt3dadd(57.1, -31.89, 5.61, 2.17) pt3dadd(58.06, -32.91, 5.61, 2.17) pt3dadd(59.4, -34.25, 5.61, 2.17) pt3dadd(60.87, -35.66, 5.61, 2.17) pt3dadd(61.83, -36.62, 5.61, 2.17) pt3dadd(62.66, -37.58, 5.61, 2.17) pt3dadd(63.75, -38.6, 5.61, 2.17) pt3dadd(64.58, -39.62, 5.61, 2.17) pt3dadd(65.09, -40.58, 5.61, 2.17) pt3dadd(65.8, -41.48, 5.61, 2.17) pt3dadd(66.44, -42.12, 5.61, 2.17) pt3dadd(66.82, -42.69, 5.61, 2.05) pt3dadd(67.2, -43.27, 5.61, 1.98) pt3dadd(67.84, -44.16, 5.61, 1.98) pt3dadd(68.87, -45.12, 5.61, 1.98) pt3dadd(69.44, -45.44, 5.61, 1.98) pt3dadd(70.14, -45.83, 5.61, 1.98) pt3dadd(70.66, -45.95, 5.61, 1.98) pt3dadd(71.1, -46.27, 5.61, 1.92) pt3dadd(71.42, -46.53, 5.61, 1.85) pt3dadd(72.51, -47.43, 5.61, 1.85) pt3dadd(73.47, -48.26, 5.61, 1.85) pt3dadd(74.11, -48.83, 5.61, 1.85) pt3dadd(74.36, -49.22, 5.61, 1.85) } } proc shape3d_21() { dend[22] { pt3dadd(74.75, -49.6, 5.61, 1.85) pt3dadd(75.32, -49.92, 5.61, 1.85) pt3dadd(75.71, -50.24, 5.61, 1.85) pt3dadd(76.35, -50.75, 5.61, 1.85) pt3dadd(76.99, -51.26, 5.61, 1.85) pt3dadd(77.5, -51.45, 5.61, 1.85) pt3dadd(78.01, -51.71, 5.61, 1.85) pt3dadd(78.2, -51.65, 5.61, 1.85) pt3dadd(78.71, -52.16, 5.61, 1.85) pt3dadd(79.29, -52.8, 5.61, 1.85) pt3dadd(80.18, -53.63, 5.61, 1.85) pt3dadd(80.76, -53.82, 5.61, 1.85) pt3dadd(81.14, -54.01, 5.61, 1.85) pt3dadd(81.27, -54.01, 5.61, 1.85) pt3dadd(83.31, -55.9, 5.61, 1.85) pt3dadd(83.31, -56.22, 5.61, 1.85) pt3dadd(83.95, -57.24, 5.61, 1.85) pt3dadd(85.23, -58.84, 5.61, 1.85) pt3dadd(86.7, -60.57, 5.61, 1.85) pt3dadd(88.17, -62.42, 5.61, 1.85) pt3dadd(89.26, -63.25, 5.61, 1.85) pt3dadd(90.15, -63.89, 5.61, 1.85) pt3dadd(91.81, -64.91, 5.61, 1.85) pt3dadd(93.35, -65.62, 5.61, 1.79) pt3dadd(93.99, -65.75, 5.61, 1.79) pt3dadd(94.44, -65.94, 5.61, 1.73) pt3dadd(95.52, -66.77, 5.61, 1.73) pt3dadd(96.1, -67.15, 5.61, 1.73) pt3dadd(96.48, -67.47, 5.61, 1.73) pt3dadd(97.06, -67.92, 5.61, 1.73) pt3dadd(97.5, -68.3, 5.61, 1.73) pt3dadd(98.02, -68.75, 5.61, 1.66) pt3dadd(98.53, -69.26, 5.61, 1.6) pt3dadd(99.23, -69.65, 5.61, 1.6) pt3dadd(99.61, -69.84, 5.61, 1.6) pt3dadd(99.87, -69.9, 5.61, 1.6) pt3dadd(100, -69.97, 5.61, 1.6) pt3dadd(100.19, -70.03, 5.61, 1.6) pt3dadd(100.32, -70.09, -7.13, 1.6) pt3dadd(100.77, -70.03, -7.13, 1.6) pt3dadd(101.85, -70.03, -7.13, 1.6) pt3dadd(102.56, -70.29, -7.13, 1.6) pt3dadd(103.39, -70.61, -7.13, 1.6) pt3dadd(104.09, -70.8, -7.13, 1.6) pt3dadd(105.31, -71.37, -7.13, 1.6) pt3dadd(105.75, -71.5, -7.13, 1.6) pt3dadd(106.39, -71.95, -7.13, 1.6) pt3dadd(106.71, -72.01, -7.13, 1.6) pt3dadd(106.9, -72.14, -7.13, 1.6) pt3dadd(107.54, -72.91, -7.13, 1.47) pt3dadd(107.8, -72.91, -7.13, 1.47) pt3dadd(108.89, -73.42, -7.13, 1.47) pt3dadd(110.1, -74.19, -7.13, 1.47) pt3dadd(110.87, -74.7, -7.13, 1.47) pt3dadd(111.63, -75.27, -7.13, 1.47) pt3dadd(112.4, -76.17, -7.13, 1.47) pt3dadd(113.87, -77.45, -7.13, 1.47) pt3dadd(114.77, -78.28, -7.13, 1.47) pt3dadd(115.28, -79.11, -7.13, 1.47) pt3dadd(116.3, -80.32, -7.13, 1.47) pt3dadd(117.52, -81.28, -7.13, 1.47) pt3dadd(118.41, -81.79, -7.13, 1.47) pt3dadd(118.73, -81.92, -7.13, 1.47) pt3dadd(119.31, -82.31, -7.13, 1.47) pt3dadd(119.44, -82.37, -7.13, 1.47) pt3dadd(119.56, -82.43, -7.13, 1.47) pt3dadd(120.4, -82.64, -7.13, 1.34) pt3dadd(120.59, -83.28, -7.13, 1.34) pt3dadd(121.74, -84.62, -7.13, 1.34) pt3dadd(122.82, -85.39, -7.13, 1.34) pt3dadd(124.04, -86.22, -7.13, 1.34) pt3dadd(125.06, -87.3, -7.13, 1.34) pt3dadd(125.38, -88.01, -7.13, 1.34) pt3dadd(126.41, -89.29, -7.13, 1.34) pt3dadd(127.04, -90.18, -7.13, 1.34) pt3dadd(127.81, -91.01, -7.13, 1.34) pt3dadd(128.71, -91.97, -7.13, 1.34) pt3dadd(128.9, -92.04, -7.13, 1.34) pt3dadd(129.03, -92.04, -10.58, 1.34) pt3dadd(129.03, -92.29, -10.58, 1.28) pt3dadd(129.47, -93.51, -10.58, 1.15) pt3dadd(130.37, -94.4, -10.58, 1.15) pt3dadd(131.07, -94.91, -10.58, 1.15) pt3dadd(131.9, -95.74, -10.58, 1.15) pt3dadd(132.42, -96.7, -10.58, 1.15) pt3dadd(132.74, -97.34, -10.58, 1.15) pt3dadd(132.99, -97.92, -10.58, 1.15) pt3dadd(133.25, -98.49, -10.58, 1.15) pt3dadd(133.57, -99.07, -10.58, 1.15) pt3dadd(134.14, -99.45, -10.58, 1.15) pt3dadd(134.85, -100.16, -10.58, 1.15) pt3dadd(134.97, -100.8, -10.58, 1.09) pt3dadd(135.17, -101.56, -10.58, 1.02) pt3dadd(135.74, -102.65, -10.58, 0.96) pt3dadd(136.44, -103.48, -10.58, 0.96) pt3dadd(137.08, -104.18, -10.58, 0.96) pt3dadd(137.21, -104.7, -10.58, 0.96) pt3dadd(137.21, -105.4, -10.58, 0.96) pt3dadd(136.89, -106.49, -10.58, 0.96) pt3dadd(136.89, -107.51, -10.58, 0.96) pt3dadd(136.64, -107.76, -10.58, 0.96) pt3dadd(136.38, -108.02, -10.58, 0.96) pt3dadd(136.32, -108.08, -10.58, 0.96) } dend[23] {pt3dclear() pt3dadd(25.67, -20.42, -3.13, 2.49) pt3dadd(25.2, -21.19, -7.02, 2.49) pt3dadd(25.46, -21.19, -7.99, 2.49) pt3dadd(26.04, -21.5, -7.99, 2.49) pt3dadd(26.36, -22.02, -7.99, 2.49) pt3dadd(26.8, -22.91, -7.99, 2.49) pt3dadd(26.8, -28.35, -15.76, 2.49) pt3dadd(27.06, -28.73, -15.76, 2.49) pt3dadd(27.06, -31.22, -17.71, 2.49) pt3dadd(27.19, -31.86, -18.68, 2.49) pt3dadd(27.19, -31.93, -18.68, 2.49) } dend[24] {pt3dclear() pt3dadd(27.19, -31.93, -18.68, 2.05) pt3dadd(28.79, -32.12, -19.22, 2.05) pt3dadd(29.23, -32.12, -19.98, 2.05) pt3dadd(29.74, -31.99, -20.62, 2.05) pt3dadd(30.51, -31.67, -20.62, 2.05) pt3dadd(31.02, -31.35, -23.11, 2.05) pt3dadd(31.22, -31.1, -24.94, 2.05) pt3dadd(31.28, -31.03, -25.59, 2.05) pt3dadd(32.17, -31.03, -25.59, 2.05) pt3dadd(32.81, -31.41, -25.7, 2.05) pt3dadd(33.64, -32.31, -25.7, 2.05) pt3dadd(33.64, -33.08, -26.13, 2.05) pt3dadd(33.13, -34.04, -26.13, 2.05) pt3dadd(32.24, -35, -27.32, 2.05) pt3dadd(31.6, -35.7, -27.32, 2.05) pt3dadd(31.41, -35.95, -29.48, 2.05) pt3dadd(31.41, -37.11, -30.34, 1.85) pt3dadd(31.66, -37.68, -30.34, 1.85) pt3dadd(32.17, -38.58, -30.34, 1.85) pt3dadd(32.62, -39.34, -30.34, 1.85) pt3dadd(33.01, -40.05, -30.56, 1.85) pt3dadd(33.2, -40.37, -30.56, 1.85) pt3dadd(33.26, -40.49, -31.74, 1.85) pt3dadd(33.33, -40.56, -34.88, 1.85) pt3dadd(34.54, -41.2, -34.88, 1.85) pt3dadd(35.12, -41.64, -34.88, 1.85) pt3dadd(35.44, -41.84, -34.88, 1.85) pt3dadd(35.82, -42.16, -34.88, 1.85) pt3dadd(36.07, -42.8, -34.88, 1.85) pt3dadd(36.52, -43.69, -34.88, 1.85) pt3dadd(37.03, -44.14, -34.88, 1.85) pt3dadd(37.48, -44.39, -34.88, 1.85) pt3dadd(38.06, -44.97, -34.88, 1.85) pt3dadd(38.57, -45.42, -34.88, 1.85) pt3dadd(39.27, -45.93, -34.88, 1.85) pt3dadd(39.53, -46.18, -34.88, 1.85) pt3dadd(39.78, -46.5, -34.88, 1.85) pt3dadd(40.23, -47.02, -34.88, 1.85) pt3dadd(40.81, -47.78, -34.88, 1.85) pt3dadd(41.51, -48.74, -34.88, 1.85) pt3dadd(42.47, -49.64, -34.88, 1.85) pt3dadd(42.85, -50.34, -34.88, 1.85) pt3dadd(43.17, -50.72, -34.88, 1.85) pt3dadd(43.3, -51.04, -34.88, 1.85) pt3dadd(43.78, -52.42, -34.88, 1.73) pt3dadd(43.78, -52.74, -34.88, 1.73) pt3dadd(43.9, -53.51, -34.88, 1.73) pt3dadd(43.97, -53.96, -34.88, 1.73) pt3dadd(44.35, -54.41, -34.88, 1.73) pt3dadd(44.67, -54.53, -34.88, 1.73) pt3dadd(45.05, -54.53, -40.06, 1.73) pt3dadd(45.37, -54.6, -40.81, 1.73) pt3dadd(45.82, -54.6, -45.89, 1.73) pt3dadd(45.82, -54.73, -45.89, 1.73) pt3dadd(45.63, -54.98, -45.89, 1.73) pt3dadd(45.18, -55.17, -45.89, 1.73) pt3dadd(44.41, -55.69, -45.89, 1.73) pt3dadd(43.9, -56.26, -46.54, 1.73) pt3dadd(43.46, -57.09, -46.54, 1.73) pt3dadd(43.14, -58.05, -48.7, 1.73) pt3dadd(42.94, -59.14, -49.78, 1.73) pt3dadd(42.56, -60.42, -50.64, 1.73) pt3dadd(42.11, -61.63, -50.64, 1.73) pt3dadd(42.05, -62.53, -50.96, 1.73) pt3dadd(42.05, -63.17, -50.96, 1.73) pt3dadd(42.24, -63.87, -50.96, 1.73) pt3dadd(42.43, -64.38, -50.96, 1.73) pt3dadd(42.5, -64.57, -50.96, 1.73) pt3dadd(42.62, -64.64, -50.96, 1.73) pt3dadd(42.88, -64.64, -50.96, 1.73) pt3dadd(43.2, -64.25, -52.8, 1.73) pt3dadd(44.1, -63.68, -54.85, 1.73) pt3dadd(44.48, -63.42, -55.82, 1.73) pt3dadd(44.61, -63.29, -55.82, 1.73) pt3dadd(45.69, -63.55, -55.82, 1.73) pt3dadd(46.08, -63.36, -61.54, 1.73) pt3dadd(47.68, -63.74, -62.62, 1.73) pt3dadd(48.12, -64.12, -63.7, 1.73) pt3dadd(48.19, -65.47, -63.7, 1.73) pt3dadd(48.19, -67.9, -68.78, 1.73) pt3dadd(48.83, -68.79, -68.78, 1.73) pt3dadd(50.87, -71.8, -68.78, 1.73) pt3dadd(51.26, -72.63, -68.78, 1.73) pt3dadd(51.51, -73.14, -53.66, 1.73) pt3dadd(51.58, -73.33, -53.66, 1.73) pt3dadd(52.09, -74.1, -53.66, 1.73) } } proc shape3d_22() { dend[24] { pt3dadd(52.47, -74.8, -53.66, 1.73) pt3dadd(52.54, -75.51, -51.72, 1.73) pt3dadd(52.54, -76.66, -50.32, 1.73) pt3dadd(52.22, -77.49, -49.56, 1.73) pt3dadd(51.64, -79.09, -49.13, 1.73) pt3dadd(51.32, -80.05, -49.13, 1.73) pt3dadd(51.26, -80.56, -48.48, 1.73) pt3dadd(51.26, -80.68, -48.48, 1.73) pt3dadd(51.61, -82.83, -48.48, 1.73) pt3dadd(51.55, -83.08, -48.48, 1.73) pt3dadd(51.61, -84.11, -48.48, 1.73) pt3dadd(52, -85.19, -48.48, 1.73) pt3dadd(52.44, -86.79, -48.48, 1.73) pt3dadd(52.95, -88.01, -48.37, 1.73) pt3dadd(53.4, -89.16, -48.37, 1.73) pt3dadd(53.72, -89.99, -47.29, 1.73) pt3dadd(53.98, -90.76, -46.43, 1.73) pt3dadd(54.17, -92.23, -45.89, 1.73) pt3dadd(54.17, -93.31, -62.73, 1.73) pt3dadd(54.87, -94.46, -62.73, 1.73) pt3dadd(55.13, -95.68, -62.73, 1.73) pt3dadd(55.19, -97.34, -62.73, 1.73) pt3dadd(55.26, -98.75, -62.73, 1.73) pt3dadd(55.58, -99.64, -62.73, 1.73) pt3dadd(55.7, -100.09, -62.73, 1.73) pt3dadd(55.77, -100.92, -62.73, 1.73) pt3dadd(56.09, -102.2, -62.73, 1.73) pt3dadd(56.92, -103.61, -62.73, 1.66) pt3dadd(57.17, -104.5, -62.73, 1.6) pt3dadd(57.17, -105.08, -62.73, 1.53) pt3dadd(57.3, -105.46, -62.73, 1.53) pt3dadd(57.88, -105.78, -62.73, 1.53) pt3dadd(59.09, -106.42, -62.73, 1.53) pt3dadd(60.24, -106.61, -62.73, 1.53) pt3dadd(60.82, -106.74, -62.73, 1.53) pt3dadd(61.84, -107.19, -62.73, 1.53) pt3dadd(62.86, -107.83, -62.73, 1.53) pt3dadd(63.57, -108.21, -62.73, 1.53) pt3dadd(63.7, -108.4, -62.73, 1.53) pt3dadd(64.21, -109.04, -62.73, 1.53) pt3dadd(64.34, -109.23, -62.73, 1.53) pt3dadd(65.71, -110.49, -62.73, 1.53) pt3dadd(65.83, -110.87, -62.73, 1.53) pt3dadd(66.28, -112.15, -62.73, 1.53) pt3dadd(67.43, -114.64, -62.73, 1.53) pt3dadd(68.2, -115.8, -62.73, 1.53) pt3dadd(70.05, -117.91, -62.73, 1.53) pt3dadd(71.4, -118.86, -62.73, 1.53) pt3dadd(72.42, -118.86, -62.73, 1.53) pt3dadd(74.79, -120.08, -62.73, 1.53) pt3dadd(75.87, -121.23, -62.73, 1.53) pt3dadd(76.64, -122.44, -62.73, 1.53) pt3dadd(77.02, -123.66, -62.73, 1.53) pt3dadd(77.47, -125, -62.73, 1.53) pt3dadd(78.56, -126.79, -62.73, 1.53) pt3dadd(80.03, -128.52, -62.73, 1.53) pt3dadd(80.86, -129.35, -62.73, 1.53) pt3dadd(81.05, -129.93, -62.73, 1.53) pt3dadd(81.5, -130.44, -62.73, 1.53) pt3dadd(83.03, -130.95, -62.73, 1.53) pt3dadd(84.95, -130.95, -62.73, 1.53) pt3dadd(86.3, -131.14, -62.73, 1.53) pt3dadd(87.89, -131.52, -62.73, 1.53) pt3dadd(88.53, -131.91, -62.73, 1.53) pt3dadd(88.79, -132.23, -62.73, 1.53) pt3dadd(88.92, -132.93, -62.73, 1.53) pt3dadd(89.11, -133.95, -62.73, 1.53) pt3dadd(89.36, -134.53, -62.73, 1.53) pt3dadd(89.49, -134.66, -62.73, 1.53) pt3dadd(89.75, -134.78, -62.73, 1.53) pt3dadd(90.07, -134.85, -62.73, 1.53) pt3dadd(91.54, -134.85, -62.73, 1.53) pt3dadd(92.5, -134.66, -62.73, 1.53) pt3dadd(92.69, -134.59, -62.73, 1.53) pt3dadd(93.14, -134.59, -62.73, 1.53) pt3dadd(93.78, -134.85, -62.73, 1.53) pt3dadd(94.42, -135.17, -62.73, 1.53) pt3dadd(95.37, -135.74, -62.73, 1.53) pt3dadd(96.27, -136.26, -62.73, 1.53) pt3dadd(96.4, -136.32, -62.73, 1.53) pt3dadd(96.78, -136.57, -62.73, 1.53) pt3dadd(97.29, -136.89, -62.73, 1.53) pt3dadd(97.36, -136.96, -62.73, 1.53) pt3dadd(99.28, -137.79, -62.73, 1.34) pt3dadd(99.6, -138.1, -62.73, 1.34) pt3dadd(100.69, -139.19, -63.06, 1.34) pt3dadd(101.58, -140.02, -63.06, 1.34) pt3dadd(102.93, -141.43, -63.6, 1.34) pt3dadd(103.69, -142.26, -64.46, 1.34) pt3dadd(103.76, -142.45, -66.08, 1.34) pt3dadd(104.72, -144.11, -66.08, 1.34) pt3dadd(105.42, -145.01, -66.08, 1.34) pt3dadd(106.57, -146.29, -66.08, 1.34) pt3dadd(107.59, -148.08, -66.08, 1.34) pt3dadd(107.79, -149.04, -66.08, 1.34) pt3dadd(108.17, -150.83, -66.08, 1.34) pt3dadd(108.17, -152.04, -66.08, 1.34) pt3dadd(108.23, -153.19, -66.08, 1.34) pt3dadd(108.68, -154.86, -66.08, 1.34) pt3dadd(109.45, -156.45, -66.08, 1.34) pt3dadd(110.15, -157.8, -66.08, 1.28) pt3dadd(110.28, -158.5, -66.08, 1.21) pt3dadd(110.34, -158.69, -66.19, 1.21) pt3dadd(110.34, -158.82, -68.67, 1.21) pt3dadd(110.54, -159.4, -68.67, 1.21) pt3dadd(111.37, -160.74, -68.67, 1.21) pt3dadd(112.01, -162.02, -68.67, 1.21) pt3dadd(112.01, -163.68, -68.67, 1.21) pt3dadd(111.62, -164.89, -68.67, 1.21) pt3dadd(111.56, -165.92, -68.67, 1.21) pt3dadd(111.62, -166.36, -68.67, 1.21) pt3dadd(111.62, -166.56, -68.78, 1.21) pt3dadd(112.01, -168.43, -69.32, 1.02) pt3dadd(112.01, -168.81, -69.32, 1.02) pt3dadd(112.33, -170.6, -69.32, 1.02) pt3dadd(112.59, -171.56, -69.32, 1.02) pt3dadd(112.91, -171.94, -69.32, 1.02) pt3dadd(113.23, -172.46, -69.32, 1.02) pt3dadd(113.29, -172.84, -69.97, 1.02) pt3dadd(113.29, -173.61, -72.88, 1.02) pt3dadd(112.65, -175.91, -72.88, 1.02) pt3dadd(112.71, -177.25, -72.88, 1.02) pt3dadd(112.97, -178.15, -72.88, 1.02) pt3dadd(112.97, -179.87, -72.88, 1.02) pt3dadd(113.35, -180.96, -72.88, 1.02) pt3dadd(113.61, -181.6, -72.88, 1.02) pt3dadd(113.61, -182.24, -72.88, 1.02) pt3dadd(113.67, -182.49, -72.88, 1.02) } dend[25] {pt3dclear() pt3dadd(27.19, -31.93, -18.68, 1.53) pt3dadd(27.56, -32.37, -12.63, 1.53) pt3dadd(27.88, -33.2, -12.63, 1.53) pt3dadd(28.27, -33.97, -12.63, 1.53) pt3dadd(28.52, -34.61, -12.63, 1.53) pt3dadd(28.71, -35.25, -12.63, 1.53) pt3dadd(28.78, -35.7, -12.63, 1.53) pt3dadd(28.78, -37.62, -12.63, 1.53) pt3dadd(29.16, -38.58, -12.63, 1.53) pt3dadd(29.42, -39.21, -12.63, 1.53) pt3dadd(29.67, -40.05, -12.63, 1.53) pt3dadd(30.06, -41.13, -12.63, 1.53) pt3dadd(30.44, -42.28, -12.63, 1.53) pt3dadd(30.76, -43.11, -12.63, 1.53) pt3dadd(30.95, -44.2, -12.63, 1.53) pt3dadd(31.02, -45.29, -12.63, 1.53) pt3dadd(31.21, -45.93, -12.63, 1.53) pt3dadd(31.21, -47.21, -12.63, 1.53) pt3dadd(31.59, -48.68, -12.63, 1.53) pt3dadd(31.59, -50.28, -12.63, 1.53) pt3dadd(31.46, -51.43, -12.63, 1.53) pt3dadd(31.4, -53.47, -12.63, 1.53) pt3dadd(31.4, -56.41, -12.63, 1.53) pt3dadd(31.14, -57.37, -12.63, 1.53) pt3dadd(30.89, -58.14, -12.63, 1.53) pt3dadd(30.57, -59.04, -12.63, 1.53) pt3dadd(30.25, -60.38, -12.63, 1.53) pt3dadd(30.12, -61.08, -12.63, 1.53) pt3dadd(30.12, -61.78, -12.63, 1.53) pt3dadd(29.81, -62.8, -12.63, 1.53) pt3dadd(29.81, -63.25, -12.63, 1.53) pt3dadd(30.32, -65.23, -12.63, 1.53) pt3dadd(30.58, -66.51, -12.63, 1.53) pt3dadd(31.21, -68.11, -12.63, 1.53) pt3dadd(31.79, -69.33, -12.63, 1.53) pt3dadd(32.05, -70.03, -12.63, 1.53) pt3dadd(32.17, -70.41, -12.63, 1.53) pt3dadd(32.69, -71.12, -12.63, 1.53) pt3dadd(32.88, -71.56, -12.63, 1.53) pt3dadd(32.88, -71.82, -27.53, 1.53) pt3dadd(33.52, -72.91, -27.53, 1.53) pt3dadd(34.09, -73.87, -27.53, 1.53) pt3dadd(34.41, -74.82, -27.53, 1.53) pt3dadd(35.05, -76.55, -27.53, 1.53) pt3dadd(35.24, -77.83, -27.53, 1.53) pt3dadd(35.5, -79.43, -27.53, 1.53) pt3dadd(35.5, -84.54, -27.53, 1.53) pt3dadd(35.75, -85.57, -27.53, 1.53) pt3dadd(35.75, -87.1, -27.53, 1.53) pt3dadd(35.5, -88.51, -27.53, 1.53) pt3dadd(35.43, -90.04, -27.53, 1.53) pt3dadd(35.43, -92.15, -27.53, 1.53) pt3dadd(35.37, -92.54, -27.53, 1.53) pt3dadd(35.54, -92.55, -27.53, 1.53) pt3dadd(35.54, -92.74, -27.53, 1.53) pt3dadd(35.34, -93.44, -27.53, 1.53) pt3dadd(35.15, -94.4, -27.53, 1.53) pt3dadd(34.96, -95.55, -27.53, 1.53) pt3dadd(34.64, -97.09, -27.53, 1.53) pt3dadd(34.51, -98.04, -27.53, 1.53) pt3dadd(34.51, -98.75, -27.53, 1.53) pt3dadd(34.83, -99.64, -27.53, 1.53) pt3dadd(34.83, -99.96, -27.53, 1.53) } dend[26] {pt3dclear() pt3dadd(34.83, -99.96, -27.53, 1.53) pt3dadd(35.22, -99.96, -27.53, 1.53) pt3dadd(35.22, -100.15, -27.53, 1.53) pt3dadd(35.28, -101.18, -27.53, 1.53) pt3dadd(35.41, -102.52, -27.53, 1.53) pt3dadd(35.86, -104.37, -27.53, 1.53) pt3dadd(36.43, -105.78, -27.53, 1.53) pt3dadd(36.88, -106.68, -27.53, 1.53) pt3dadd(37.13, -107.19, -27.53, 1.53) } } proc shape3d_23() { dend[26] { pt3dadd(37.2, -107.32, -31.1, 1.53) pt3dadd(37.58, -107.7, -32.5, 1.53) pt3dadd(37.58, -108.02, -34.77, 1.53) pt3dadd(37.65, -108.15, -34.77, 1.53) pt3dadd(37.77, -108.53, -34.77, 1.53) pt3dadd(37.97, -108.85, -34.77, 1.53) pt3dadd(38.22, -109.23, -34.77, 1.53) pt3dadd(38.22, -111.79, -34.77, 1.53) pt3dadd(38.16, -112.24, -34.77, 1.53) pt3dadd(38.03, -112.75, -34.77, 1.53) pt3dadd(37.71, -113.33, -34.77, 1.53) pt3dadd(37.39, -113.96, -34.77, 1.53) pt3dadd(37.07, -114.8, -34.77, 1.53) pt3dadd(36.81, -115.56, -34.77, 1.53) pt3dadd(36.5, -116.2, -34.77, 1.53) pt3dadd(36.11, -116.78, -34.77, 1.53) pt3dadd(35.86, -117.23, -34.77, 1.53) pt3dadd(35.47, -117.48, -34.77, 1.53) pt3dadd(35.02, -117.74, -34.77, 1.53) pt3dadd(34.64, -118.25, -34.77, 1.53) pt3dadd(34.26, -118.89, -34.77, 1.53) pt3dadd(33.87, -119.59, -34.77, 1.53) pt3dadd(33.55, -120.1, -34.77, 1.53) pt3dadd(33.3, -120.36, -34.77, 1.53) pt3dadd(33.32, -120.67, -38.11, 1.53) pt3dadd(32.61, -127.83, -38.11, 1.53) pt3dadd(32.61, -129.75, -38.11, 1.53) pt3dadd(32.42, -131.29, -38.11, 1.53) pt3dadd(32.1, -132.31, -38.11, 1.53) pt3dadd(31.53, -133.27, -38.11, 1.53) pt3dadd(30.44, -135.44, -38.11, 1.53) pt3dadd(29.48, -137.11, -38.11, 1.53) pt3dadd(28.71, -138.51, -38.11, 1.53) pt3dadd(27.18, -140.75, -38.11, 1.53) pt3dadd(26.41, -141.45, -38.11, 1.53) pt3dadd(25.45, -142.22, -38.11, 1.53) pt3dadd(24.81, -142.86, -38.11, 1.53) pt3dadd(24.17, -143.5, -38.11, 1.53) pt3dadd(23.85, -144.01, -38.11, 1.53) pt3dadd(23.41, -144.65, -38.11, 1.53) pt3dadd(22.96, -145.61, -38.11, 1.53) pt3dadd(22.57, -146.12, -38.11, 1.53) pt3dadd(22.19, -146.57, -38.11, 1.53) pt3dadd(21.74, -147.4, -38.11, 1.53) pt3dadd(21.36, -148.17, -38.11, 1.53) pt3dadd(20.91, -149, -38.11, 1.53) pt3dadd(20.59, -149.64, -38.11, 1.53) pt3dadd(20.27, -150.4, -38.11, 1.53) pt3dadd(20.02, -150.92, -38.11, 1.53) pt3dadd(20.02, -151.11, -38.11, 1.53) pt3dadd(19.95, -151.11, -38.11, 1.53) pt3dadd(19.24, -151.89, -38.11, 1.53) pt3dadd(18.92, -152.59, -38.11, 1.53) pt3dadd(18.92, -155.4, -38.11, 1.53) pt3dadd(18.73, -156.55, -38.11, 1.53) pt3dadd(18.15, -157.77, -38.11, 1.53) pt3dadd(17.39, -159.3, -38.11, 1.53) pt3dadd(17, -160.26, -38.11, 1.53) pt3dadd(16.81, -160.9, -38.11, 1.53) pt3dadd(16.75, -161.35, -38.11, 1.53) pt3dadd(16.75, -162.63, -38.11, 1.53) pt3dadd(16.88, -163.59, -38.11, 1.53) pt3dadd(17.13, -164.86, -38.11, 1.53) pt3dadd(17.71, -166.33, -38.11, 1.53) pt3dadd(18.15, -167.49, -38.11, 1.53) pt3dadd(18.28, -168.25, -38.11, 1.53) pt3dadd(18.28, -171.71, -38.11, 1.53) pt3dadd(18.67, -172.92, -38.11, 1.53) pt3dadd(19.11, -173.88, -38.11, 1.53) pt3dadd(19.43, -174.58, -38.11, 1.53) pt3dadd(19.69, -175.48, -38.11, 1.53) pt3dadd(19.69, -178.55, -38.11, 1.53) pt3dadd(20.01, -179.76, -38.11, 1.53) pt3dadd(20.2, -180.53, -38.11, 1.53) pt3dadd(20.2, -181.17, -38.11, 1.53) pt3dadd(19.4, -181.47, -38.11, 1.34) pt3dadd(19.6, -181.86, -38.11, 1.34) pt3dadd(20.11, -182.88, -38.11, 1.34) pt3dadd(20.68, -184.61, -38.11, 1.34) pt3dadd(20.94, -186.14, -38.11, 1.34) pt3dadd(20.94, -189.91, -38.11, 1.34) pt3dadd(20.75, -191.51, -38.11, 1.34) pt3dadd(20.56, -192.66, -38.11, 1.34) pt3dadd(20.49, -193.24, -38.11, 1.34) pt3dadd(20.43, -193.43, -41.46, 1.34) pt3dadd(20.24, -193.81, -41.46, 1.34) pt3dadd(19.34, -195.41, -41.46, 1.34) pt3dadd(19.02, -196.24, -43.19, 1.34) pt3dadd(18.89, -196.56, -44.7, 1.34) pt3dadd(18.89, -196.69, -44.7, 1.34) pt3dadd(18.83, -196.75, -44.7, 1.34) pt3dadd(18.83, -197.2, -44.7, 1.34) pt3dadd(18.57, -198.67, -44.7, 1.21) pt3dadd(18.57, -201.81, -44.7, 1.15) pt3dadd(18.64, -202.57, -44.7, 1.15) pt3dadd(18.64, -204.3, -44.7, 1.15) pt3dadd(18.96, -205.77, -45.02, 1.15) pt3dadd(19.53, -206.98, -45.02, 1.15) pt3dadd(19.92, -207.62, -46.1, 1.15) pt3dadd(19.98, -207.94, -46.86, 1.15) pt3dadd(20.81, -208.97, -46.86, 1.15) pt3dadd(21.26, -210.12, -47.18, 1.15) pt3dadd(21.45, -211.4, -47.18, 1.15) pt3dadd(21.58, -211.97, -47.18, 1.15) pt3dadd(21.58, -212.04, -47.18, 1.15) pt3dadd(21.73, -213.61, -49.88, 1.02) pt3dadd(21.73, -216.87, -49.88, 1.02) } dend[27] {pt3dclear() pt3dadd(34.83, -99.96, -27.53, 1.66) pt3dadd(35.03, -100.71, -22.67, 1.66) pt3dadd(35.16, -101.29, -22.67, 1.66) pt3dadd(35.6, -103.4, -22.67, 1.66) pt3dadd(35.99, -105.12, -22.67, 1.66) pt3dadd(36.5, -106.34, -22.67, 1.66) pt3dadd(37.65, -107.62, -22.67, 1.66) pt3dadd(38.74, -108.51, -22.67, 1.66) pt3dadd(39.95, -109.28, -22.67, 1.66) pt3dadd(40.91, -109.86, -22.67, 1.66) pt3dadd(41.81, -110.69, -22.67, 1.66) pt3dadd(42.19, -111.39, -22.67, 1.66) pt3dadd(42.19, -114.52, -14.14, 1.66) pt3dadd(42.44, -115.67, -14.14, 1.66) pt3dadd(43.02, -117.14, -14.14, 1.66) pt3dadd(43.66, -118.42, -14.14, 1.66) pt3dadd(44.04, -119.25, -13.71, 1.66) pt3dadd(44.55, -120.21, -12.52, 1.66) pt3dadd(45.07, -120.92, -12.52, 1.66) pt3dadd(45.64, -121.68, -11.45, 1.66) pt3dadd(46.03, -122.45, -10.69, 1.66) pt3dadd(46.15, -123.03, -10.69, 1.66) pt3dadd(46.28, -123.54, -10.47, 1.66) pt3dadd(46.54, -124.24, -10.15, 1.66) pt3dadd(46.86, -124.95, -10.15, 1.66) pt3dadd(47.18, -125.65, -9.83, 1.66) pt3dadd(47.62, -126.48, -9.61, 1.66) pt3dadd(47.94, -127.18, -9.61, 1.66) pt3dadd(48.07, -128.21, -9.39, 1.66) pt3dadd(48.07, -129.36, -9.39, 1.66) pt3dadd(48.92, -130.82, -9.18, 1.66) pt3dadd(48.92, -131.39, -9.18, 1.66) pt3dadd(49.75, -133.63, -9.18, 1.66) pt3dadd(50.33, -135.42, -9.18, 1.66) pt3dadd(50.52, -137.15, -9.18, 1.66) pt3dadd(50.52, -140.34, -9.18, 1.66) pt3dadd(50.39, -140.92, -8.31, 1.66) pt3dadd(50.2, -141.62, -7.67, 1.66) pt3dadd(50.07, -142.32, -7.02, 1.66) pt3dadd(49.88, -142.84, -7.02, 1.66) pt3dadd(49.63, -143.54, -7.02, 1.66) pt3dadd(49.37, -145.07, -5.29, 1.66) pt3dadd(49.31, -145.91, -4.86, 1.66) pt3dadd(49.43, -147.18, -4.86, 1.66) pt3dadd(50.2, -148.53, -4.75, 1.66) pt3dadd(50.71, -149.87, -4.75, 1.66) pt3dadd(51.03, -151.08, -4.43, 1.66) pt3dadd(51.74, -152.62, -4.43, 1.66) pt3dadd(52.5, -154.09, -4.43, 1.66) pt3dadd(52.89, -155.11, -4.43, 1.66) pt3dadd(53.53, -156.14, -4.43, 1.66) pt3dadd(54.42, -157.16, -4.43, 1.66) pt3dadd(55.13, -158.05, -4.43, 1.66) pt3dadd(57.24, -159.65, -4.43, 1.66) pt3dadd(57.3, -160.1, -4.43, 1.66) pt3dadd(57.43, -160.74, -4.43, 1.66) pt3dadd(57.43, -161.06, -4.43, 1.66) pt3dadd(59.4, -161.98, -23.11, 1.66) pt3dadd(59.65, -162.3, -23.32, 1.66) pt3dadd(61.06, -164.15, -23.32, 1.66) pt3dadd(62.92, -165.94, -23.32, 1.66) pt3dadd(64, -166.84, -23.32, 1.66) pt3dadd(64.83, -168.05, -23.32, 1.66) pt3dadd(65.03, -168.95, -23.32, 1.66) pt3dadd(65.22, -170.1, -25.48, 1.66) pt3dadd(65.28, -170.61, -26.99, 1.66) pt3dadd(65.28, -170.74, -28.4, 1.66) pt3dadd(66.18, -172.72, -28.4, 1.66) pt3dadd(67.45, -175.15, -28.4, 1.66) pt3dadd(68.35, -177.07, -28.4, 1.66) pt3dadd(68.41, -178.34, -28.4, 1.66) pt3dadd(68.41, -179.94, -28.4, 1.66) pt3dadd(68.48, -181.86, -28.4, 1.66) pt3dadd(68.48, -183.27, -28.4, 1.66) pt3dadd(68.8, -184.29, -28.4, 1.66) pt3dadd(69.25, -185.06, -28.4, 1.66) pt3dadd(69.37, -185.63, -28.4, 1.66) pt3dadd(69.37, -187.68, -28.4, 1.66) pt3dadd(69.76, -189.92, -28.4, 1.66) pt3dadd(69.88, -191.39, -28.4, 1.66) pt3dadd(69.76, -192.28, -28.4, 1.66) pt3dadd(69.31, -192.92, -28.4, 1.66) pt3dadd(69.25, -192.92, -28.4, 1.66) pt3dadd(69.52, -194.29, -28.4, 1.66) pt3dadd(69.26, -194.42, -28.4, 1.66) pt3dadd(68.75, -195.57, -28.4, 1.66) pt3dadd(67.99, -197.8, -28.4, 1.66) pt3dadd(67.79, -199.4, -28.4, 1.66) pt3dadd(67.73, -200.68, -28.4, 1.66) pt3dadd(67.73, -201.51, -32.07, 1.66) pt3dadd(67.09, -202.73, -28.61, 1.66) pt3dadd(66.64, -203.69, -28.61, 1.66) pt3dadd(66.51, -203.94, -21.27, 1.66) } } proc shape3d_24() { dend[27] { pt3dadd(66.19, -204.26, -21.27, 1.66) pt3dadd(65.88, -204.71, -21.27, 1.66) pt3dadd(65.3, -205.86, -21.27, 1.66) pt3dadd(64.98, -206.69, -21.27, 1.66) pt3dadd(64.92, -206.82, -14.14, 1.66) pt3dadd(64.53, -207.4, -14.14, 1.66) pt3dadd(64.28, -208.16, -14.14, 1.66) pt3dadd(64.15, -209.25, -14.14, 1.66) pt3dadd(64.08, -210.27, -14.14, 1.66) pt3dadd(64.6, -211.68, -14.14, 1.66) pt3dadd(64.92, -212.51, -14.14, 1.66) pt3dadd(64.79, -213.09, -14.14, 1.66) pt3dadd(64.6, -213.6, -14.14, 1.66) pt3dadd(64.53, -213.73, -14.14, 1.66) } dend[28] {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(12.16, -7.19, -19.87, 4.8) pt3dadd(12.48, -7.38, -19.87, 4.8) pt3dadd(13.32, -8.02, -19.87, 4.8) pt3dadd(14.15, -8.53, -19.87, 4.8) pt3dadd(14.4, -8.72, -19.87, 4.8) pt3dadd(14.85, -8.98, -19.87, 4.8) pt3dadd(15.3, -9.36, -19.87, 4.8) pt3dadd(15.68, -9.55, -19.87, 4.8) pt3dadd(16.32, -9.94, -19.87, 4.8) pt3dadd(17.22, -10.58, -19.87, 4.8) pt3dadd(17.73, -11.02, -19.87, 4.67) pt3dadd(17.98, -11.28, -19.87, 4.54) pt3dadd(18.88, -11.79, -19.87, 4.54) pt3dadd(20.03, -12.43, -19.87, 4.54) pt3dadd(20.22, -12.62, -19.87, 4.54) pt3dadd(20.41, -12.81, -19.87, 4.54) pt3dadd(20.67, -13.26, -19.87, 4.48) pt3dadd(20.99, -13.64, -19.87, 4.48) pt3dadd(21.12, -13.96, -19.87, 4.41) pt3dadd(21.44, -14.41, -19.87, 4.35) pt3dadd(21.63, -14.48, -19.87, 4.35) } dend[29] {pt3dclear() pt3dadd(21.63, -14.48, -19.87, 3.13) pt3dadd(22.91, -16.27, -9.72, 3.13) pt3dadd(23.29, -16.97, -9.5, 3.13) pt3dadd(24.12, -17.99, -8.64, 3.13) pt3dadd(25.08, -18.76, -7.99, 3.13) pt3dadd(26.74, -19.85, -7.99, 3.13) pt3dadd(27.83, -20.81, -7.56, 3.13) pt3dadd(29.49, -22.15, -7.13, 3.13) pt3dadd(30.32, -23.11, -7.13, 3.13) pt3dadd(30.96, -24.07, -6.05, 3.13) pt3dadd(32.18, -25.03, -5.72, 3.13) pt3dadd(33.14, -25.66, -5.72, 3.13) pt3dadd(33.52, -26.05, -5.07, 3.13) pt3dadd(33.84, -27.33, -4, 3.13) pt3dadd(34.74, -27.71, -4, 3.13) pt3dadd(36.72, -28.54, -4, 3.13) pt3dadd(37.42, -29.18, -4, 3.13) pt3dadd(38.38, -30.14, -4, 3.13) pt3dadd(39.27, -30.59, -4, 3.13) pt3dadd(39.66, -30.84, -4, 3.13) pt3dadd(39.79, -30.97, -4, 3.13) pt3dadd(41.32, -32.76, -4, 3.13) pt3dadd(41.96, -33.34, -4, 3.13) pt3dadd(44.26, -34.81, -4, 3.13) pt3dadd(45.03, -35.06, -4, 3.13) pt3dadd(45.86, -35.45, -4, 3.13) pt3dadd(46.62, -35.77, -4, 3.13) pt3dadd(47.01, -36.09, -4, 3.13) pt3dadd(47.46, -36.34, -4, 3.13) pt3dadd(48.03, -36.72, -4, 3.13) pt3dadd(48.16, -36.72, -4, 3.13) } dend[30] {pt3dclear() pt3dadd(48.16, -36.72, -4, 2.69) pt3dadd(48.42, -39.35, -4, 2.69) pt3dadd(48.22, -40.5, -4, 2.69) pt3dadd(48.1, -41.58, -4, 2.69) pt3dadd(48.03, -42.54, -4, 2.69) pt3dadd(48.03, -43.63, -4, 2.69) pt3dadd(48.61, -45.04, -4, 2.69) pt3dadd(49.25, -46, -4, 2.69) pt3dadd(49.57, -46.25, -3.78, 2.69) pt3dadd(50.27, -48.3, 2.59, 2.17) pt3dadd(50.46, -48.43, 3.02, 2.17) pt3dadd(51.1, -49, 3.02, 2.17) pt3dadd(52.19, -49.64, 3.02, 2.17) pt3dadd(53.66, -50.34, 3.67, 2.17) pt3dadd(54.62, -51.11, 4.1, 2.17) pt3dadd(55.77, -52.2, 4.43, 2.17) pt3dadd(56.79, -52.9, 4.43, 2.17) pt3dadd(57.37, -53.8, 4.43, 2.17) pt3dadd(58.01, -54.95, 5.61, 2.17) pt3dadd(59.09, -56.03, 5.61, 2.17) pt3dadd(59.6, -56.55, 5.61, 2.17) pt3dadd(59.86, -57.12, 6.48, 2.17) pt3dadd(60.5, -57.89, 6.48, 2.17) pt3dadd(61.01, -58.66, 6.48, 2.17) pt3dadd(61.2, -59.17, 6.48, 2.17) pt3dadd(61.46, -59.81, 6.48, 2.17) pt3dadd(61.46, -59.87, 6.48, 2.17) pt3dadd(61.97, -60.7, 6.48, 2.17) pt3dadd(61.97, -60.83, 6.48, 2.17) pt3dadd(63.57, -63.77, 6.48, 2.17) pt3dadd(64.59, -65.31, 6.48, 2.17) pt3dadd(65.8, -67.42, 6.48, 2.17) pt3dadd(67.15, -69.4, 6.48, 2.17) pt3dadd(67.85, -70.93, 6.48, 2.17) pt3dadd(67.98, -71.95, 6.48, 2.17) pt3dadd(67.98, -74.51, 6.48, 2.17) pt3dadd(68.23, -75.47, 6.48, 2.17) pt3dadd(68.87, -76.37, 6.48, 2.17) pt3dadd(69.51, -76.88, 6.48, 2.17) pt3dadd(71.11, -77.45, 6.48, 2.17) pt3dadd(72.64, -78.22, 6.48, 2.17) pt3dadd(74.12, -79.18, 6.48, 2.17) pt3dadd(75.2, -79.95, 6.48, 2.17) pt3dadd(76.23, -80.65, 6.48, 2.17) pt3dadd(76.29, -80.65, 6.48, 2.17) pt3dadd(77.06, -81.23, 6.48, 2.17) pt3dadd(77.76, -81.23, 6.48, 2.17) pt3dadd(78.97, -81.67, 6.48, 2.17) pt3dadd(80, -82.63, 6.48, 2.17) pt3dadd(80.77, -84.04, 6.48, 2.17) pt3dadd(80.83, -85, 6.48, 2.17) pt3dadd(80.38, -85.89, 6.48, 2.17) pt3dadd(80.25, -86.92, 6.48, 2.17) pt3dadd(80.25, -89.28, 6.48, 2.17) pt3dadd(80.68, -89.87, 6.48, 1.98) pt3dadd(80.56, -90.51, 6.48, 1.98) pt3dadd(80.04, -92.94, 6.48, 1.98) pt3dadd(80.11, -94.09, 6.48, 1.98) pt3dadd(80.24, -95.69, 6.48, 1.98) pt3dadd(80.3, -96.91, 6.48, 1.98) pt3dadd(80.43, -99.14, 6.48, 1.98) pt3dadd(81.64, -101.7, 6.48, 1.98) pt3dadd(82.28, -103.94, 6.48, 1.98) pt3dadd(82.79, -105.41, 6.48, 1.98) pt3dadd(82.99, -107.58, 6.48, 1.98) pt3dadd(83.62, -110.46, 6.48, 1.98) pt3dadd(83.82, -111.48, 6.48, 1.98) pt3dadd(83.82, -111.74, 6.48, 1.98) pt3dadd(83.82, -112.7, 6.48, 1.98) pt3dadd(83.82, -113.08, 6.48, 1.98) pt3dadd(84.14, -114.49, 6.48, 1.98) pt3dadd(84.33, -116.02, 6.48, 1.98) pt3dadd(84.33, -117.37, 6.48, 1.98) pt3dadd(84.07, -117.88, 6.48, 1.98) pt3dadd(83.94, -118.33, 6.48, 1.98) pt3dadd(83.94, -118.58, 6.48, 1.98) pt3dadd(83.98, -120.42, 6.48, 1.92) pt3dadd(83.54, -127.27, 6.48, 1.92) pt3dadd(83.54, -128.16, 6.48, 1.92) pt3dadd(83.92, -128.8, 6.48, 1.92) pt3dadd(84.37, -129.38, 6.48, 1.92) pt3dadd(84.56, -130.21, 6.48, 1.92) pt3dadd(84.75, -130.97, 6.48, 1.92) pt3dadd(84.75, -131.29, 6.48, 1.92) pt3dadd(84.81, -131.74, 6.48, 1.92) pt3dadd(84.88, -132.32, 6.48, 1.92) pt3dadd(84.88, -132.83, 6.48, 1.92) } dend[31] {pt3dclear() pt3dadd(84.88, -132.83, 6.48, 1.66) pt3dadd(85.84, -133.85, 6.48, 1.66) pt3dadd(86.09, -134.49, 6.48, 1.66) pt3dadd(87.82, -138.26, 6.48, 1.66) pt3dadd(88.2, -139.41, 6.48, 1.66) pt3dadd(88.97, -141.14, 6.48, 1.66) pt3dadd(88.78, -143.25, 6.48, 1.66) pt3dadd(88.71, -144.78, 6.48, 1.66) pt3dadd(88.14, -145.81, 6.48, 1.66) pt3dadd(87.12, -146.77, 6.48, 1.66) pt3dadd(86.54, -147.34, 6.48, 1.66) pt3dadd(86.03, -147.73, 6.48, 1.66) pt3dadd(85.77, -148.24, 6.48, 1.66) pt3dadd(85.77, -148.3, 6.48, 1.66) pt3dadd(85.59, -148.73, 6.48, 1.34) pt3dadd(85.72, -148.79, 6.48, 1.34) pt3dadd(85.72, -149.37, 6.48, 1.34) pt3dadd(85.14, -151.67, 6.48, 1.34) pt3dadd(84.82, -152.69, 6.48, 1.34) pt3dadd(84.31, -153.2, 6.48, 1.34) pt3dadd(83.67, -153.91, 6.48, 1.34) pt3dadd(82.2, -155.89, 6.48, 1.34) pt3dadd(80.67, -157.23, 6.48, 1.34) pt3dadd(79.65, -157.87, 6.48, 1.21) pt3dadd(79.39, -158.13, 6.48, 1.15) pt3dadd(78.94, -158.7, 6.48, 1.15) pt3dadd(78.81, -158.83, 6.48, 1.15) pt3dadd(78.75, -158.89, 6.48, 1.15) pt3dadd(77.02, -162.41, 6.48, 1.15) pt3dadd(76.19, -164.45, 6.48, 1.15) pt3dadd(75.81, -165.29, 6.48, 1.15) pt3dadd(75.62, -165.41, 6.48, 1.15) pt3dadd(75.36, -165.93, 6.48, 1.15) pt3dadd(75.11, -166.95, 6.48, 1.15) pt3dadd(75.11, -171.94, 6.48, 1.02) } dend[32] {pt3dclear() pt3dadd(84.88, -132.83, 6.48, 1.02) pt3dadd(84.7, -132.93, 6.48, 1.02) pt3dadd(84.5, -134.28, 6.48, 1.02) pt3dadd(84.18, -135.49, 6.48, 1.02) pt3dadd(83.93, -137.03, 6.48, 1.02) pt3dadd(83.74, -138.82, 6.48, 1.02) pt3dadd(83.8, -140.03, 6.48, 1.02) pt3dadd(84.31, -141.12, 6.48, 1.02) pt3dadd(84.7, -142.14, 6.48, 1.02) pt3dadd(84.76, -143.48, 6.48, 1.02) pt3dadd(84.25, -145.02, 6.48, 1.02) } } proc shape3d_25() { dend[32] { pt3dadd(83.29, -147, 6.48, 1.02) pt3dadd(82.84, -148.21, 6.48, 1.02) pt3dadd(82.78, -149.3, 6.48, 1.02) pt3dadd(82.59, -150.26, 6.48, 1.02) pt3dadd(82.39, -151.09, 6.48, 1.02) pt3dadd(81.95, -151.99, 6.48, 1.02) pt3dadd(81.63, -152.43, 6.48, 1.02) pt3dadd(81.5, -152.56, 6.48, 1.02) pt3dadd(81.37, -152.69, 6.48, 1.02) pt3dadd(81.31, -153.01, 6.48, 1.02) } dend[33] {pt3dclear() pt3dadd(48.16, -36.72, -4, 2.43) pt3dadd(49.16, -37.07, -18.46, 2.43) pt3dadd(50.31, -37.26, -18.46, 2.43) pt3dadd(52.48, -38.29, -18.46, 2.43) pt3dadd(53.7, -39.44, -18.46, 2.43) pt3dadd(54.53, -40.71, -18.46, 2.43) pt3dadd(55.42, -41.99, -18.46, 2.43) pt3dadd(56.19, -43.08, -18.46, 2.43) pt3dadd(56.9, -44.04, -18.46, 2.43) pt3dadd(57.66, -45.06, -18.46, 2.43) pt3dadd(58.3, -45.96, -18.46, 2.43) pt3dadd(58.88, -46.66, -18.46, 2.43) pt3dadd(59.58, -47.17, -18.46, 2.43) pt3dadd(60.09, -47.43, -18.46, 2.43) pt3dadd(60.73, -47.62, -18.46, 2.43) pt3dadd(61.24, -47.88, -18.46, 2.43) pt3dadd(61.69, -48, -18.46, 2.43) pt3dadd(62.14, -48, -18.46, 2.43) } dend[34] {pt3dclear() pt3dadd(62.14, -48, -18.46, 2.24) pt3dadd(63.48, -49.73, -18.46, 2.24) pt3dadd(65.27, -50.5, -18.46, 2.24) pt3dadd(66.81, -50.82, -18.46, 2.24) pt3dadd(67.89, -50.88, -18.46, 2.24) pt3dadd(69.68, -50.88, -18.46, 2.24) pt3dadd(71.15, -51.39, -18.46, 2.24) pt3dadd(72.56, -52.16, -18.46, 2.24) pt3dadd(73.52, -52.93, -18.46, 2.24) pt3dadd(75.31, -54.01, -18.46, 2.24) pt3dadd(76.4, -55.23, -18.46, 2.24) pt3dadd(77.23, -55.74, -18.46, 2.24) pt3dadd(78.31, -56.51, -18.46, 2.24) pt3dadd(79.47, -58.3, -18.46, 2.24) pt3dadd(80.11, -59.64, -18.46, 2.24) pt3dadd(80.87, -61.24, -18.46, 2.24) pt3dadd(81.38, -61.88, -18.46, 2.24) pt3dadd(81.77, -62.97, -18.46, 2.24) pt3dadd(82.15, -63.67, -18.46, 2.24) pt3dadd(82.66, -64.69, -18.46, 2.24) pt3dadd(82.73, -65.01, -18.46, 2.24) pt3dadd(82.79, -65.2, -18.46, 2.24) pt3dadd(82.79, -65.27, -18.46, 2.24) pt3dadd(84.35, -66.55, -18.46, 2.24) pt3dadd(86.07, -67.89, -18.46, 2.24) pt3dadd(87.48, -69.11, -18.46, 2.24) pt3dadd(89.4, -70.58, -18.46, 2.24) pt3dadd(91, -71.73, -18.46, 2.24) pt3dadd(92.21, -72.75, -18.46, 2.24) pt3dadd(93.3, -73.9, -18.46, 2.24) pt3dadd(94.38, -74.99, -18.46, 2.11) pt3dadd(95.41, -75.82, -18.46, 2.05) pt3dadd(96.17, -76.33, -18.46, 2.05) pt3dadd(97.77, -77.93, -18.46, 2.05) pt3dadd(97.96, -78.51, -18.46, 2.05) pt3dadd(97.96, -78.83, -18.46, 2.05) pt3dadd(98.67, -80.1, -18.46, 2.05) pt3dadd(99.82, -80.87, -18.46, 2.05) pt3dadd(100.84, -80.94, -18.46, 2.05) pt3dadd(102.06, -81, -18.46, 2.05) pt3dadd(103.14, -81.45, -18.46, 1.98) pt3dadd(104.23, -82.34, -18.46, 1.85) pt3dadd(105.13, -83.11, -18.46, 1.85) pt3dadd(105.57, -84, -18.46, 1.85) pt3dadd(106.21, -84.77, -18.46, 1.85) pt3dadd(106.28, -84.77, -18.46, 1.85) pt3dadd(106.28, -85.86, -18.46, 1.66) pt3dadd(106.66, -86.5, -18.46, 1.66) pt3dadd(107.3, -87.65, -18.46, 1.66) pt3dadd(108, -89.06, -18.46, 1.66) pt3dadd(108.26, -90.01, -18.46, 1.66) pt3dadd(108.26, -90.85, -18.46, 1.66) pt3dadd(108.07, -91.68, -18.46, 1.66) pt3dadd(107.81, -92.12, -18.46, 1.66) pt3dadd(107.75, -92.64, -18.46, 1.66) pt3dadd(107.75, -93.34, -18.46, 1.66) pt3dadd(107.88, -93.85, -18.46, 1.66) pt3dadd(107.88, -94.11, -18.46, 1.66) pt3dadd(108.55, -94.9, -18.46, 1.47) pt3dadd(108.87, -101.87, -15.22, 1.47) pt3dadd(108.87, -101.93, -15.22, 1.47) pt3dadd(109.25, -101.81, -28.72, 1.47) pt3dadd(109.7, -103.41, -29.26, 1.47) pt3dadd(110.28, -104.24, -29.26, 1.47) pt3dadd(111.36, -105.07, -29.26, 1.47) pt3dadd(113.03, -106.15, -29.26, 1.47) pt3dadd(114.24, -106.79, -29.26, 1.47) pt3dadd(115.26, -107.82, -29.26, 1.47) pt3dadd(116.22, -108.9, -29.58, 1.47) pt3dadd(116.8, -109.22, -29.58, 1.47) pt3dadd(117.37, -109.42, -30.88, 1.47) pt3dadd(117.63, -109.48, -30.88, 1.47) pt3dadd(119.1, -110.82, -33.04, 1.47) pt3dadd(119.48, -110.95, -33.04, 1.47) pt3dadd(120.7, -112.04, -33.04, 1.47) pt3dadd(120.44, -113.89, -33.04, 1.47) pt3dadd(120.25, -115.55, -33.04, 1.47) pt3dadd(120.57, -116.96, -33.04, 1.47) pt3dadd(121.15, -117.79, -33.04, 1.47) pt3dadd(121.53, -118.43, -33.04, 1.47) pt3dadd(122.49, -119.26, -33.04, 1.47) pt3dadd(122.94, -119.84, -33.04, 1.47) pt3dadd(122.94, -120.16, -33.04, 1.47) pt3dadd(122.81, -120.99, -33.04, 1.47) pt3dadd(122.87, -121.76, -33.04, 1.47) pt3dadd(122.87, -122.71, -33.04, 1.47) pt3dadd(123.82, -124.53, -33.04, 1.21) pt3dadd(125.36, -127.09, -33.04, 1.21) pt3dadd(126.12, -128.11, -33.04, 1.21) pt3dadd(126.89, -129.2, -33.04, 1.21) pt3dadd(127.6, -130.67, -33.04, 1.21) pt3dadd(127.6, -131.25, -33.04, 1.21) pt3dadd(127.98, -131.95, -33.04, 1.21) pt3dadd(128.75, -132.78, -33.04, 1.21) pt3dadd(129.77, -133.93, -33.04, 1.21) pt3dadd(130.86, -135.27, -33.04, 1.21) pt3dadd(132.01, -136.49, -33.04, 1.15) pt3dadd(132.58, -137.06, -33.04, 1.02) pt3dadd(133.35, -137.38, -33.04, 1.02) pt3dadd(134.12, -137.7, -33.04, 1.02) pt3dadd(134.37, -137.83, -33.04, 1.02) pt3dadd(135.33, -138.85, -33.04, 1.02) pt3dadd(136.42, -139.3, -33.04, 1.02) pt3dadd(137.38, -139.62, -33.04, 1.02) pt3dadd(138.02, -140.01, -33.04, 1.02) pt3dadd(138.72, -140.26, -33.04, 1.02) pt3dadd(138.78, -140.26, -33.04, 1.02) } dend[35] {pt3dclear() pt3dadd(62.14, -48, -18.46, 1.92) pt3dadd(62.8, -47.9, -16.84, 1.92) pt3dadd(63.19, -48.21, -16.84, 1.92) pt3dadd(64.47, -48.85, -16.84, 1.92) pt3dadd(66.58, -48.98, -16.84, 1.92) pt3dadd(67.73, -48.79, -16.84, 1.92) pt3dadd(68.88, -48.66, -16.84, 1.92) pt3dadd(70.48, -48.47, -16.84, 1.92) pt3dadd(71.75, -48.47, -16.84, 1.92) pt3dadd(72.59, -48.21, -16.84, 1.92) pt3dadd(73.54, -47.7, -16.84, 1.92) pt3dadd(75.08, -47.26, -16.84, 1.92) pt3dadd(76.68, -47, -16.84, 1.92) pt3dadd(80.13, -47, -16.84, 1.92) pt3dadd(82.05, -47.7, -16.84, 1.92) pt3dadd(82.18, -47.77, -16.84, 1.92) pt3dadd(84.09, -48.6, -16.84, 1.92) pt3dadd(87.93, -48.6, -16.84, 1.92) pt3dadd(90.04, -48.47, -16.84, 1.92) pt3dadd(92.28, -48.28, -16.84, 1.92) pt3dadd(94.45, -48.66, -16.84, 1.92) pt3dadd(95.73, -48.92, -16.84, 1.92) pt3dadd(97.39, -49.17, -16.84, 1.92) pt3dadd(98.67, -49.3, -16.84, 1.92) pt3dadd(100.91, -49.94, -16.84, 1.92) pt3dadd(101.61, -50.07, -16.84, 1.92) pt3dadd(102.45, -49.69, -16.84, 1.92) pt3dadd(103.85, -49.62, -16.84, 1.92) pt3dadd(105.39, -49.62, -16.84, 1.92) pt3dadd(108.47, -50.59, -16.84, 1.92) pt3dadd(110.58, -50.66, -16.84, 1.92) pt3dadd(112.31, -50.79, -16.84, 1.92) pt3dadd(114.35, -50.98, -16.84, 1.92) pt3dadd(117.16, -51.23, -16.84, 1.92) pt3dadd(118.38, -51.68, -16.84, 1.92) pt3dadd(120.36, -52.51, -16.84, 1.92) pt3dadd(123.05, -53.41, -16.84, 1.92) pt3dadd(125.16, -54.3, -16.84, 1.92) pt3dadd(125.92, -54.3, -16.84, 1.92) pt3dadd(127.14, -54.37, -16.84, 1.92) pt3dadd(128.87, -54.56, -16.84, 1.92) pt3dadd(130.21, -54.69, -16.84, 1.92) pt3dadd(131.17, -54.94, -16.84, 1.92) pt3dadd(132.64, -55.52, -16.84, 1.92) pt3dadd(134.62, -56.54, -16.84, 1.92) pt3dadd(135.83, -57.82, -16.84, 1.92) pt3dadd(136.79, -58.71, -16.84, 1.92) pt3dadd(138.2, -59.1, -16.84, 1.92) pt3dadd(139.42, -59.61, -16.84, 1.92) pt3dadd(141.33, -60.31, -16.84, 1.92) pt3dadd(143.06, -61.08, -16.84, 1.92) pt3dadd(144.02, -61.21, -16.84, 1.92) pt3dadd(145.17, -61.4, -16.84, 1.92) pt3dadd(146.64, -62.04, -16.84, 1.92) pt3dadd(148.37, -63, -16.84, 1.92) pt3dadd(148.69, -63.32, -16.84, 1.92) pt3dadd(149.01, -63.7, -16.84, 1.92) pt3dadd(149.07, -63.7, -16.84, 1.92) pt3dadd(151.09, -65.05, -16.84, 1.66) pt3dadd(151.22, -65.62, -16.84, 1.66) pt3dadd(151.54, -66.52, -16.84, 1.66) pt3dadd(152.5, -68.18, -16.84, 1.66) pt3dadd(153.4, -69.46, -16.84, 1.66) pt3dadd(154.1, -70.29, -16.84, 1.66) pt3dadd(154.74, -70.93, -16.84, 1.66) } } proc shape3d_26() { dend[35] { pt3dadd(155.7, -72.34, -16.84, 1.47) pt3dadd(156.85, -73.62, -16.84, 1.41) pt3dadd(157.49, -74.26, -16.84, 1.41) pt3dadd(158.13, -74.83, -16.84, 1.41) pt3dadd(158.77, -75.41, -16.84, 1.34) pt3dadd(159.85, -76.37, -16.84, 1.21) pt3dadd(161.32, -77.39, -16.84, 1.21) pt3dadd(162.67, -78.22, -16.84, 1.21) pt3dadd(163.56, -78.86, -16.84, 1.21) pt3dadd(163.69, -79.18, -16.84, 1.21) pt3dadd(163.75, -79.56, -16.84, 1.15) pt3dadd(164.2, -80.39, -16.84, 1.02) pt3dadd(165.16, -81.29, -16.84, 1.02) pt3dadd(165.42, -81.55, -16.84, 1.02) pt3dadd(165.86, -82.12, -16.84, 1.02) pt3dadd(166.37, -82.89, -16.84, 1.02) pt3dadd(166.44, -83.72, -16.84, 1.02) pt3dadd(166.44, -84.87, -16.84, 1.02) pt3dadd(166.82, -85.76, -16.84, 1.02) pt3dadd(167.33, -86.85, -16.84, 1.02) pt3dadd(167.4, -87.17, -16.84, 1.02) pt3dadd(167.85, -87.75, -16.84, 1.02) pt3dadd(168.04, -88.26, -16.84, 1.02) pt3dadd(168.23, -88.77, -16.84, 1.02) pt3dadd(168.61, -89.54, -16.84, 1.02) pt3dadd(168.87, -90.24, -16.84, 1.02) pt3dadd(169, -91.01, -16.84, 1.02) pt3dadd(169.19, -91.71, -16.84, 1.02) pt3dadd(169.44, -92.35, -16.84, 1.02) pt3dadd(169.44, -92.67, -16.84, 1.02) pt3dadd(170.06, -93.72, -16.84, 1.02) pt3dadd(170.19, -94.23, -16.84, 1.02) pt3dadd(170.38, -94.74, -16.84, 1.02) pt3dadd(170.95, -95.7, -16.84, 1.02) pt3dadd(171.59, -96.79, -16.84, 1.02) pt3dadd(172.23, -98.01, -16.52, 1.02) pt3dadd(172.94, -99.41, -16.52, 1.02) pt3dadd(173.06, -99.8, -15.76, 1.02) pt3dadd(173.06, -99.99, -8.64, 1.02) pt3dadd(172.81, -100.69, -8.64, 1.02) pt3dadd(172.36, -102.16, -8.64, 1.02) pt3dadd(172.23, -103.63, -8.64, 1.02) pt3dadd(172.17, -105.42, -8.64, 1.02) pt3dadd(172.55, -108.11, -8.64, 1.02) pt3dadd(172.74, -109.71, -8.64, 1.02) pt3dadd(172.81, -110.79, -8.64, 1.02) pt3dadd(173, -111.82, -8.1, 1.02) pt3dadd(173.19, -112.65, -8.1, 1.02) pt3dadd(173.38, -113.22, -8.1, 1.02) pt3dadd(173.38, -113.54, -7.02, 1.02) pt3dadd(173.45, -113.99, -6.8, 1.02) pt3dadd(173.58, -114.56, -6.8, 1.02) pt3dadd(173.83, -115.33, -6.48, 1.02) pt3dadd(174.09, -116.1, -6.48, 1.02) pt3dadd(174.6, -117.12, -6.48, 1.02) pt3dadd(175.11, -118.34, -6.48, 1.02) pt3dadd(175.49, -119.17, -6.48, 1.02) pt3dadd(175.94, -119.94, -6.48, 1.02) pt3dadd(176.39, -120.77, -6.48, 1.02) pt3dadd(176.39, -121.15, -6.48, 1.02) pt3dadd(177.51, -123.35, -4.64, 0.9) pt3dadd(178.47, -124.7, -4.64, 0.9) pt3dadd(179.49, -125.59, -4, 0.9) pt3dadd(180.06, -125.85, -3.24, 0.9) pt3dadd(180.58, -126.04, -3.24, 0.9) pt3dadd(181.21, -126.55, -2.38, 0.9) pt3dadd(181.6, -127.06, -2.38, 0.9) } dend[36] {pt3dclear() pt3dadd(21.63, -14.48, -19.87, 2.3) pt3dadd(22.81, -14.34, -19.87, 2.3) pt3dadd(24.67, -15.24, -19.87, 2.3) pt3dadd(26.08, -15.94, -19.87, 2.3) pt3dadd(27.48, -16.77, -19.87, 2.3) pt3dadd(28.63, -17.28, -19.87, 2.3) pt3dadd(29.59, -17.48, -19.87, 2.3) pt3dadd(34.84, -17.48, -19.87, 2.3) pt3dadd(36.63, -17.22, -19.87, 2.3) pt3dadd(38.1, -16.71, -19.87, 2.3) pt3dadd(39.76, -15.75, -19.87, 2.3) pt3dadd(40.4, -14.92, -19.87, 2.3) pt3dadd(40.72, -13.9, -19.87, 2.3) pt3dadd(40.72, -12.36, -19.87, 2.3) pt3dadd(40.14, -11.21, -19.87, 2.3) pt3dadd(40.01, -10.63, -19.87, 2.3) pt3dadd(40.65, -9.8, -19.87, 2.3) pt3dadd(42.12, -9.36, -19.87, 2.3) pt3dadd(43.34, -9.36, -19.22, 2.3) pt3dadd(45.13, -9.23, -23.75, 2.3) pt3dadd(48.52, -9.23, -23.75, 2.3) pt3dadd(50.44, -8.72, -23.75, 2.3) pt3dadd(52.16, -7.76, -23.75, 2.3) pt3dadd(53.12, -7.05, -23.75, 2.3) pt3dadd(54.78, -6.22, -23.75, 2.3) pt3dadd(56.45, -5.39, -23.75, 2.3) pt3dadd(57.09, -5.26, -23.75, 2.3) pt3dadd(57.79, -5.97, -23.75, 2.3) pt3dadd(58.81, -6.8, -23.75, 2.3) pt3dadd(59.9, -7.18, -23.75, 2.3) pt3dadd(61.05, -7.25, -23.75, 2.3) pt3dadd(63.29, -7.25, -23.75, 2.3) pt3dadd(63.67, -6.48, -23.75, 2.3) pt3dadd(63.86, -5.26, -23.75, 2.3) pt3dadd(63.86, -2.45, -23.75, 2.3) pt3dadd(64.91, -0.84, -23.75, 2.3) pt3dadd(65.48, 0.31, -23.75, 2.3) pt3dadd(66.57, 1.52, -23.75, 2.3) pt3dadd(67.91, 2.35, -23.75, 2.3) pt3dadd(69, 2.42, -23.75, 2.3) pt3dadd(70.02, 2.48, -23.75, 2.3) pt3dadd(71.56, 2.99, -23.21, 2.3) pt3dadd(72.26, 3.25, -23.21, 2.3) pt3dadd(72.32, 3.31, -36.93, 2.3) pt3dadd(72.77, 3.63, -36.93, 2.3) pt3dadd(73.86, 4.14, -36.93, 2.3) pt3dadd(75.01, 4.46, -36.93, 2.3) pt3dadd(76.48, 4.91, -36.93, 2.3) pt3dadd(77.82, 5.17, -36.93, 2.3) pt3dadd(78.59, 5.49, -36.93, 2.3) pt3dadd(79.23, 5.68, -36.93, 2.3) pt3dadd(80.25, 6.19, -36.93, 2.3) pt3dadd(81.34, 6.64, -37.68, 2.3) pt3dadd(81.91, 7.08, -39.52, 2.3) pt3dadd(82.11, 7.4, -39.52, 2.3) pt3dadd(82.11, 7.53, -42.33, 2.3) pt3dadd(82.68, 7.92, -42.33, 2.3) pt3dadd(84.09, 8.23, -42.33, 2.3) pt3dadd(86.26, 8.23, -42.33, 2.3) pt3dadd(87.48, 7.85, -42.33, 2.3) pt3dadd(89.01, 7.02, -42.33, 2.3) pt3dadd(91.19, 6.32, -42.33, 2.3) pt3dadd(93.17, 6.19, -42.33, 2.3) pt3dadd(94.57, 6.19, -42.76, 2.3) pt3dadd(95.21, 6.12, -42.76, 2.3) pt3dadd(98.41, 6.76, -45.46, 2.3) pt3dadd(98.6, 6.76, -45.46, 2.3) pt3dadd(100.26, 6, -45.46, 2.3) pt3dadd(101.86, 5.17, -45.46, 2.3) pt3dadd(102.69, 5.04, -45.46, 2.3) pt3dadd(104.48, 4.91, -45.46, 2.3) pt3dadd(106.27, 5.49, -45.46, 2.3) pt3dadd(106.47, 5.61, -45.46, 2.3) pt3dadd(106.47, 5.68, -46.75, 2.3) pt3dadd(108.43, 6.93, -48.7, 2.3) pt3dadd(110.48, 8.14, -48.7, 2.3) pt3dadd(113.48, 10, -48.7, 2.3) pt3dadd(115.46, 11.08, -48.91, 2.3) pt3dadd(116.74, 11.47, -48.91, 2.3) pt3dadd(118.02, 11.91, -50.1, 2.3) pt3dadd(119.55, 12.62, -50.1, 2.3) pt3dadd(120.39, 12.81, -52.47, 2.3) pt3dadd(120.77, 12.87, -52.47, 2.17) pt3dadd(122.75, 12.87, -55.07, 2.17) pt3dadd(123.26, 13.26, -55.07, 2.17) pt3dadd(124.48, 13.96, -55.07, 2.17) pt3dadd(125.37, 14.41, -55.07, 2.17) pt3dadd(126.27, 14.54, -55.07, 2.17) pt3dadd(127.29, 14.73, -55.71, 2.17) pt3dadd(127.61, 14.86, -57.55, 2.17) pt3dadd(127.74, 14.86, -59.82, 2.17) pt3dadd(129.59, 15.43, -59.82, 2.17) pt3dadd(131.9, 16.71, -59.82, 2.17) pt3dadd(133.3, 17.22, -59.82, 2.17) pt3dadd(134.01, 17.61, -59.82, 2.17) pt3dadd(136.05, 17.99, -59.82, 2.17) pt3dadd(137.07, 18.5, -59.82, 2.17) pt3dadd(138.54, 19.65, -59.82, 2.17) pt3dadd(140.08, 21.95, -59.82, 2.17) pt3dadd(141.81, 24.83, -59.82, 2.17) pt3dadd(142.44, 26.05, -59.82, 2.17) pt3dadd(142.83, 26.56, -59.82, 2.17) pt3dadd(143.53, 27.13, -59.82, 2.17) pt3dadd(144.43, 27.39, -59.82, 2.17) pt3dadd(145.51, 27.45, -59.82, 2.17) pt3dadd(146.28, 28.03, -59.82, 2.17) pt3dadd(147.05, 28.86, -59.82, 2.17) pt3dadd(147.69, 30.14, -59.82, 2.17) pt3dadd(148.14, 30.97, -59.82, 2.17) pt3dadd(148.14, 31.22, -59.82, 2.17) pt3dadd(149.33, 32.08, -59.82, 1.92) pt3dadd(150.03, 33.23, -59.82, 1.92) pt3dadd(151.5, 34.7, -59.82, 1.92) pt3dadd(152.59, 35.98, -59.82, 1.92) pt3dadd(153.61, 36.94, -59.82, 1.92) pt3dadd(154.7, 38.22, -59.82, 1.92) pt3dadd(156.1, 39.56, -59.82, 1.92) pt3dadd(156.87, 39.94, -59.82, 1.79) pt3dadd(158.34, 40.71, -59.82, 1.73) pt3dadd(159.43, 41.61, -59.82, 1.73) pt3dadd(160.26, 42.82, -59.82, 1.73) pt3dadd(160.77, 43.84, -59.82, 1.73) pt3dadd(161.6, 44.87, -59.82, 1.73) pt3dadd(162.95, 45.95, -59.82, 1.73) pt3dadd(163.71, 47.3, -59.82, 1.73) pt3dadd(164.48, 48.96, -59.82, 1.73) pt3dadd(164.74, 49.47, -63.92, 1.73) pt3dadd(164.93, 49.66, -65.32, 1.73) pt3dadd(165.76, 50.05, -65.32, 1.73) pt3dadd(167.61, 50.49, -65.32, 1.73) pt3dadd(168.57, 50.94, -65.32, 1.73) pt3dadd(169.15, 51.52, -65.32, 1.73) pt3dadd(169.91, 52.28, -65.32, 1.73) } } proc shape3d_27() { dend[36] { pt3dadd(170.75, 52.92, -65.32, 1.73) pt3dadd(170.87, 53.24, -65.32, 1.73) pt3dadd(170.87, 54.01, -65.32, 1.73) } apic {pt3dclear() pt3dstyle(1, 1.32823, 1.29137, 0) pt3dadd(4.9, 17.89, -2.16, 9.34) pt3dadd(4.97, 17.96, -2.16, 9.34) pt3dadd(5.09, 18.21, -2.16, 9.34) pt3dadd(5.22, 18.47, -2.16, 9.34) pt3dadd(5.54, 18.85, -2.16, 9.34) pt3dadd(5.54, 19.24, -2.16, 9.34) pt3dadd(5.61, 19.56, -2.16, 9.34) pt3dadd(5.61, 20, -2.16, 9.34) pt3dadd(5.67, 20.39, -2.16, 9.34) pt3dadd(5.67, 21.09, -2.16, 9.34) pt3dadd(5.8, 21.47, -2.16, 9.34) pt3dadd(5.86, 21.79, -2.16, 9.34) pt3dadd(5.93, 22.11, -2.16, 9.34) pt3dadd(5.93, 22.5, -2.16, 9.34) pt3dadd(5.99, 22.69, -2.16, 9.34) pt3dadd(5.99, 22.75, -2.16, 9.34) pt3dadd(6.18, 24.28, -2.16, 7.67) pt3dadd(6.18, 24.66, -2.16, 7.67) pt3dadd(6.43, 25.36, -2.16, 7.67) pt3dadd(6.56, 25.81, -2.16, 7.67) pt3dadd(6.62, 26.07, -2.16, 7.67) pt3dadd(6.94, 26.77, -2.16, 7.67) pt3dadd(6.94, 27.86, -2.16, 7.67) pt3dadd(7.01, 28.24, -2.16, 7.67) pt3dadd(7.01, 30.99, -2.16, 7.42) pt3dadd(7.07, 31.31, -2.16, 7.42) pt3dadd(7.2, 31.69, -2.16, 7.42) pt3dadd(7.26, 31.95, -2.16, 7.16) pt3dadd(7.33, 32.27, -2.16, 7.1) pt3dadd(7.39, 32.65, -2.16, 7.1) pt3dadd(7.46, 33.03, -2.16, 7.1) pt3dadd(7.58, 33.48, -2.16, 7.1) pt3dadd(7.58, 33.8, -2.16, 6.84) pt3dadd(7.78, 34.38, -2.16, 6.84) pt3dadd(7.78, 35.72, -2.16, 6.84) pt3dadd(7.9, 36.17, -2.16, 6.84) pt3dadd(7.97, 36.49, -2.16, 6.84) pt3dadd(7.97, 36.55, -2.16, 6.84) pt3dadd(8.22, 37.19, -4.1, 6.84) pt3dadd(8.22, 37.83, -4.1, 6.84) pt3dadd(8.29, 38.34, -4.1, 6.84) pt3dadd(8.29, 39.11, -4.1, 6.84) } apic[1] {pt3dclear() pt3dadd(8.29, 39.11, -4.1, 4.16) pt3dadd(9.76, 39.56, -20.3, 4.16) pt3dadd(10.4, 40, -20.3, 4.16) pt3dadd(10.84, 40.32, -20.3, 4.16) pt3dadd(11.42, 40.64, -20.3, 4.16) pt3dadd(11.87, 41.47, -20.3, 4.16) pt3dadd(12.12, 42.37, -20.3, 4.16) pt3dadd(12.31, 43.52, -20.3, 4.16) pt3dadd(12.44, 44.03, -20.3, 4.09) pt3dadd(12.44, 44.35, -20.3, 3.96) pt3dadd(13.02, 44.86, -20.3, 3.96) pt3dadd(13.66, 45.37, -20.3, 3.96) pt3dadd(14.04, 45.63, -20.3, 3.9) pt3dadd(14.11, 45.76, -20.3, 3.77) pt3dadd(14.49, 46.14, -20.3, 3.71) pt3dadd(15.32, 46.72, -20.3, 3.71) pt3dadd(16.02, 47.36, -20.3, 3.71) pt3dadd(16.73, 47.87, -20.3, 3.71) pt3dadd(17.94, 48.7, -20.3, 3.71) pt3dadd(18.9, 49.21, -20.3, 3.71) pt3dadd(19.6, 49.72, -20.3, 3.71) pt3dadd(20.18, 50.17, -20.3, 3.71) pt3dadd(20.5, 50.43, -20.3, 3.71) pt3dadd(20.56, 50.49, -20.3, 3.71) pt3dadd(22.42, 52.01, -20.3, 3.39) pt3dadd(22.74, 52.46, -20.3, 3.39) pt3dadd(23.19, 52.84, -20.3, 3.39) pt3dadd(24.6, 53.42, -20.3, 3.39) pt3dadd(26.2, 54.12, -20.3, 3.39) pt3dadd(27.15, 54.44, -20.3, 3.39) pt3dadd(27.92, 54.57, -20.3, 3.39) pt3dadd(28.56, 54.63, -20.3, 3.26) pt3dadd(30.22, 54.63, -20.3, 3.13) pt3dadd(31.05, 54.82, -20.3, 3.13) pt3dadd(31.82, 55.02, -20.3, 3.07) pt3dadd(32.27, 55.08, -20.3, 2.94) pt3dadd(32.84, 55.53, -20.3, 2.88) pt3dadd(33.8, 56.04, -20.3, 2.88) pt3dadd(34.38, 56.49, -20.62, 2.88) pt3dadd(34.51, 56.61, -20.62, 2.88) pt3dadd(34.57, 56.68, -26.35, 2.88) pt3dadd(35.15, 56.93, -26.35, 2.88) pt3dadd(35.85, 57.45, -26.35, 2.88) pt3dadd(36.17, 57.83, -26.35, 2.88) pt3dadd(36.62, 58.15, -26.45, 2.88) pt3dadd(37.13, 58.72, -26.45, 2.81) pt3dadd(37.13, 59.24, -26.78, 2.69) pt3dadd(37.64, 60.13, -26.78, 2.62) pt3dadd(38.28, 61.22, -26.78, 2.62) pt3dadd(38.47, 61.73, -26.78, 2.62) pt3dadd(39.11, 62.43, -26.78, 2.62) pt3dadd(39.56, 62.82, -26.78, 2.62) pt3dadd(39.94, 63.2, -27.21, 2.62) pt3dadd(40.45, 63.46, -27.32, 2.56) pt3dadd(40.84, 63.52, -27.64, 2.43) pt3dadd(40.97, 63.26, -28.18, 2.37) pt3dadd(41.22, 63.33, -28.18, 2.37) pt3dadd(41.6, 62.82, -28.18, 2.37) pt3dadd(42.12, 62.24, -30.02, 2.37) pt3dadd(43.14, 61.73, -31.1, 2.37) pt3dadd(43.71, 61.6, -31.31, 2.37) pt3dadd(44.35, 61.47, -31.31, 2.37) pt3dadd(44.99, 61.28, -31.31, 2.37) pt3dadd(45.7, 61.03, -31.31, 2.37) pt3dadd(46.02, 61.03, -31.31, 2.37) pt3dadd(47.61, 60.45, -35.52, 2.17) pt3dadd(47.81, 60.58, -35.52, 2.17) pt3dadd(48.19, 61.09, -35.52, 2.17) pt3dadd(48.57, 61.99, -35.52, 2.17) pt3dadd(48.96, 62.82, -35.52, 2.17) pt3dadd(49.47, 63.78, -35.52, 2.17) pt3dadd(49.85, 63.9, -35.52, 2.17) pt3dadd(50.17, 63.26, -35.52, 2.17) pt3dadd(50.36, 62.82, -37.36, 2.17) pt3dadd(50.36, 62.56, -39.52, 2.17) pt3dadd(50.49, 62.5, -39.73, 2.17) pt3dadd(52.15, 62.5, -39.73, 1.98) pt3dadd(53.05, 62.69, -39.73, 1.98) pt3dadd(54.26, 63.01, -39.73, 1.98) pt3dadd(55.42, 63.52, -39.73, 1.98) pt3dadd(56.31, 64.1, -39.73, 1.98) pt3dadd(57.21, 64.61, -40.49, 1.98) pt3dadd(57.65, 64.93, -41.79, 1.98) pt3dadd(57.72, 64.93, -41.79, 1.98) pt3dadd(59.89, 65.69, -42.43, 1.98) pt3dadd(60.85, 66.33, -42.43, 1.98) pt3dadd(61.94, 66.84, -42.43, 1.98) pt3dadd(63.54, 66.78, -42.43, 1.98) pt3dadd(64.49, 65.89, -42.43, 1.98) pt3dadd(65.2, 65.05, -42.43, 1.98) pt3dadd(65.77, 64.54, -42.43, 1.98) pt3dadd(66.22, 64.35, -42.43, 1.98) pt3dadd(66.41, 64.35, -42.43, 1.98) pt3dadd(69.53, 63.89, -42.43, 1.66) pt3dadd(70.49, 64.09, -42.43, 1.66) pt3dadd(71.45, 64.34, -42.43, 1.66) pt3dadd(72.53, 64.85, -42.43, 1.66) pt3dadd(73.49, 65.04, -42.87, 1.66) pt3dadd(74.32, 65.43, -44.38, 1.66) pt3dadd(74.71, 65.75, -46.32, 1.66) pt3dadd(74.77, 65.81, -47.29, 1.66) pt3dadd(74.84, 65.88, -47.29, 1.66) pt3dadd(75.16, 66.2, -47.29, 1.66) pt3dadd(75.67, 66.51, -47.29, 1.66) pt3dadd(76.5, 66.77, -47.83, 1.66) pt3dadd(77.27, 67.03, -48.26, 1.66) pt3dadd(77.65, 67.35, -49.02, 1.66) pt3dadd(78.16, 67.67, -49.02, 1.66) pt3dadd(78.93, 67.99, -49.02, 1.66) pt3dadd(79.76, 67.92, -51.07, 1.66) pt3dadd(80.02, 67.73, -51.94, 1.66) pt3dadd(80.4, 67.15, -52.04, 1.66) pt3dadd(80.59, 66.2, -52.04, 1.66) pt3dadd(80.59, 65.3, -52.04, 1.66) pt3dadd(80.53, 64.66, -52.04, 1.66) pt3dadd(80.53, 64.02, -56.15, 1.66) pt3dadd(80.72, 63.7, -56.15, 1.66) pt3dadd(81.29, 63.06, -56.15, 1.66) pt3dadd(82, 62.74, -56.15, 1.66) pt3dadd(83.4, 62.74, -56.15, 1.66) pt3dadd(83.98, 62.93, -56.15, 1.6) pt3dadd(84.62, 63.38, -56.15, 1.53) pt3dadd(84.87, 63.7, -56.15, 1.47) pt3dadd(85.32, 64.15, -56.58, 1.41) pt3dadd(85.83, 64.4, -58.31, 1.41) pt3dadd(86.41, 64.47, -58.31, 1.41) pt3dadd(86.67, 64.53, -59.39, 1.41) pt3dadd(86.98, 64.53, -59.6, 1.41) pt3dadd(87.75, 64.98, -59.6, 1.41) pt3dadd(88.84, 65.36, -60.14, 1.41) pt3dadd(89.16, 65.3, -61.76, 1.41) pt3dadd(89.35, 65.04, -61.76, 1.41) pt3dadd(90.12, 64.34, -63.38, 1.41) pt3dadd(91.01, 63.96, -64.57, 1.41) pt3dadd(91.59, 63.96, -64.57, 1.41) pt3dadd(91.65, 64.02, -64.57, 1.41) pt3dadd(91.65, 64.02, -65.11, 1.41) pt3dadd(91.72, 64.15, -65.32, 1.41) pt3dadd(91.97, 64.53, -65.32, 1.41) pt3dadd(93.12, 64.98, -65.32, 1.41) pt3dadd(93.89, 65.04, -65.32, 1.41) pt3dadd(94.66, 64.28, -65.32, 1.41) pt3dadd(95.94, 63.13, -65.32, 1.41) pt3dadd(96.58, 63.06, -65.32, 1.41) pt3dadd(97.85, 62.61, -65.32, 1.41) pt3dadd(99.13, 62.61, -67.38, 1.41) pt3dadd(100.28, 62.36, -68.78, 1.41) pt3dadd(100.86, 62.1, -68.78, 1.41) pt3dadd(102.59, 61.34, -68.78, 1.41) pt3dadd(103.93, 60.63, -68.78, 1.41) pt3dadd(105.14, 60.25, -68.78, 1.41) pt3dadd(106.17, 60.12, -68.78, 1.41) pt3dadd(107.32, 60.12, -68.78, 1.41) pt3dadd(107.7, 60.31, -68.78, 1.41) } } proc shape3d_28() { apic[1] { pt3dadd(108.34, 60.82, -68.78, 1.41) pt3dadd(108.53, 61.59, -68.78, 1.41) pt3dadd(109.36, 62.29, -68.78, 1.41) pt3dadd(110.39, 62.74, -69.53, 1.41) pt3dadd(110.9, 62.93, -70.29, 1.41) pt3dadd(110.96, 63, -70.29, 1.41) pt3dadd(112.18, 63.59, -70.4, 1.21) pt3dadd(113.26, 63.97, -70.4, 1.21) pt3dadd(113.97, 64.61, -70.4, 1.21) pt3dadd(114.22, 65.12, -70.94, 1.21) pt3dadd(114.22, 65.51, -73.75, 1.21) pt3dadd(114.48, 65.89, -73.75, 1.21) pt3dadd(114.86, 66.66, -73.75, 1.21) pt3dadd(114.92, 67.23, -73.75, 1.21) pt3dadd(115.12, 67.87, -76.01, 1.21) pt3dadd(115.95, 68.51, -76.44, 1.21) pt3dadd(116.01, 68.77, -76.44, 1.21) pt3dadd(116.01, 68.9, -76.55, 1.21) pt3dadd(116.71, 69.41, -76.55, 1.21) pt3dadd(117.23, 69.79, -77.63, 1.21) pt3dadd(117.42, 69.98, -78.5, 1.21) pt3dadd(118.38, 70.37, -78.5, 1.21) pt3dadd(118.82, 70.43, -78.5, 1.21) } apic[2] {pt3dclear() pt3dadd(8.29, 39.11, -4.1, 5.69) pt3dadd(8.06, 39.53, -4.1, 5.69) pt3dadd(8.06, 41.64, -4.1, 5.69) pt3dadd(8.12, 42.15, -4.1, 5.69) pt3dadd(8.18, 42.6, -4.1, 5.69) pt3dadd(8.31, 42.99, -4.1, 5.69) pt3dadd(8.63, 44.33, -4.1, 5.69) pt3dadd(8.7, 44.78, -4.1, 5.69) pt3dadd(8.76, 45.29, -4.1, 5.69) pt3dadd(8.89, 45.73, -4.1, 5.69) pt3dadd(8.89, 46.25, -4.1, 5.69) pt3dadd(9.02, 46.69, -4.1, 5.69) pt3dadd(9.21, 47.21, -4.1, 5.69) pt3dadd(9.4, 47.65, -4.1, 5.69) pt3dadd(9.53, 48.16, -4.1, 5.69) pt3dadd(9.66, 48.55, -4.1, 5.69) pt3dadd(9.66, 49, -4.1, 5.69) pt3dadd(9.78, 49.38, -4.1, 5.69) pt3dadd(9.85, 49.7, -4.1, 5.69) pt3dadd(9.85, 50.98, -4.1, 5.69) pt3dadd(9.91, 51.3, -4.1, 5.69) pt3dadd(9.91, 51.62, -4.1, 5.69) pt3dadd(10.1, 52.13, -4.1, 5.69) pt3dadd(10.1, 52.83, -4.1, 5.69) pt3dadd(10.17, 53.02, -4.1, 5.69) pt3dadd(10.23, 53.09, -4.1, 5.69) pt3dadd(10.23, 53.15, -4.1, 5.69) } apic[3] {pt3dclear() pt3dadd(10.23, 53.15, -4.1, 2.81) pt3dadd(11.51, 53.28, -4.1, 2.81) pt3dadd(11.89, 53.28, -4.1, 2.81) pt3dadd(13.49, 53.02, -4.1, 2.81) pt3dadd(13.94, 52.83, -4.1, 2.81) pt3dadd(14.77, 52.32, -4.1, 2.81) pt3dadd(15.15, 52.19, -4.1, 2.81) pt3dadd(15.35, 52.32, -4.1, 2.81) pt3dadd(16.11, 52.7, -4.1, 2.81) pt3dadd(16.75, 52.9, -4.1, 2.75) pt3dadd(17.07, 52.9, 2.81, 2.62) pt3dadd(18.16, 52.38, 2.81, 2.62) pt3dadd(18.48, 52.26, 2.81, 2.62) pt3dadd(27.05, 52.26, 2.81, 2.49) pt3dadd(28.26, 52.19, 2.81, 2.43) pt3dadd(29.22, 52.13, 2.81, 2.43) pt3dadd(30.12, 52.26, 2.81, 2.43) pt3dadd(31.01, 52.51, 2.81, 2.43) pt3dadd(32.16, 52.58, 2.81, 2.43) pt3dadd(33.31, 52.45, 2.81, 2.43) pt3dadd(34.59, 52, 2.81, 2.43) pt3dadd(36.45, 50.85, 2.81, 2.43) pt3dadd(36.57, 50.85, 2.81, 2.43) pt3dadd(37.98, 49.95, 2.81, 2.11) pt3dadd(38.62, 49.7, 2.81, 2.11) pt3dadd(39.58, 49.12, 2.81, 2.11) pt3dadd(40.47, 48.55, 2.81, 2.11) pt3dadd(41.62, 47.78, 2.81, 2.11) pt3dadd(43.03, 47.21, 2.81, 2.11) pt3dadd(44.76, 47.21, 2.81, 2.11) pt3dadd(45.65, 47.27, 2.81, 2.11) pt3dadd(46.16, 47.59, 2.81, 2.11) pt3dadd(47.06, 48.16, 2.81, 2.11) pt3dadd(47.83, 48.74, 2.81, 2.11) pt3dadd(48.59, 49.19, 3.02, 2.11) pt3dadd(49.23, 49.51, 3.02, 2.11) pt3dadd(49.3, 49.63, 5.72, 2.11) pt3dadd(51.47, 51.2, 5.72, 1.85) pt3dadd(51.98, 51.46, 5.72, 1.85) pt3dadd(52.75, 51.78, 5.72, 1.85) pt3dadd(53.84, 52.1, 5.72, 1.85) pt3dadd(54.92, 52.29, 5.72, 1.85) pt3dadd(56.2, 52.35, 5.72, 1.85) pt3dadd(57.86, 52.29, 5.72, 1.85) pt3dadd(66.3, 52.29, 5.72, 1.66) pt3dadd(67.33, 52.74, 5.72, 1.66) pt3dadd(68.54, 53.38, 5.72, 1.66) pt3dadd(69.57, 54.02, 5.72, 1.66) pt3dadd(70.27, 54.78, 5.72, 1.66) pt3dadd(71.1, 55.68, 5.72, 1.66) pt3dadd(71.93, 56.38, 5.72, 1.66) pt3dadd(72.95, 56.89, 5.72, 1.66) pt3dadd(74.36, 57.66, 5.72, 1.66) pt3dadd(75.83, 58.3, 5.72, 1.66) pt3dadd(77.05, 58.88, 5.72, 1.66) pt3dadd(78.13, 59.32, 5.72, 1.66) pt3dadd(78.96, 59.77, 5.72, 1.66) pt3dadd(80.05, 60.41, 5.72, 1.66) pt3dadd(81.78, 61.31, 5.72, 1.66) pt3dadd(82.99, 61.88, 5.72, 1.66) pt3dadd(84.78, 62.26, 5.72, 1.66) pt3dadd(86.06, 62.52, 5.72, 1.66) pt3dadd(86.25, 62.58, 5.72, 1.66) pt3dadd(87.34, 63.29, 5.72, 1.66) pt3dadd(87.98, 63.8, 5.72, 1.66) pt3dadd(89.32, 64.57, 5.72, 1.66) pt3dadd(90.22, 64.95, 5.72, 1.66) pt3dadd(91.24, 65.4, 5.72, 1.66) pt3dadd(92.33, 65.65, 5.72, 1.66) pt3dadd(93.22, 65.65, 5.72, 1.66) pt3dadd(93.86, 65.53, 5.72, 1.66) pt3dadd(95.75, 65.85, 5.72, 1.47) pt3dadd(96.71, 65.47, 5.72, 1.47) pt3dadd(97.54, 65.02, 5.72, 1.47) pt3dadd(98.76, 64.51, 5.72, 1.47) pt3dadd(99.46, 64.19, 5.72, 1.47) pt3dadd(100.03, 64.13, 5.72, 1.47) pt3dadd(101.89, 64.13, 5.72, 1.47) } apic[4] {pt3dclear() pt3dadd(10.23, 53.15, -4.1, 5.95) pt3dadd(10.53, 53.09, -4.32, 5.95) pt3dadd(10.53, 55.96, -4.32, 5.95) } apic[5] {pt3dclear() pt3dadd(10.53, 55.96, -4.32, 2.43) pt3dadd(11.88, 56.86, -4.32, 2.43) pt3dadd(12.32, 56.99, -4.32, 2.43) pt3dadd(13.41, 57.37, -4.32, 2.43) pt3dadd(13.73, 57.43, -4.32, 2.43) pt3dadd(14.05, 57.5, -4.32, 2.43) pt3dadd(14.37, 57.5, -29.69, 2.43) pt3dadd(14.94, 57.94, -30.23, 2.43) pt3dadd(15.52, 58.26, -30.23, 2.43) pt3dadd(16.22, 58.58, -30.66, 2.43) pt3dadd(17.05, 58.9, -30.88, 2.43) pt3dadd(17.89, 59.29, -30.88, 2.43) pt3dadd(18.84, 59.73, -32.18, 2.43) pt3dadd(19.61, 60.25, -32.18, 2.43) pt3dadd(19.93, 60.63, -33.26, 2.43) pt3dadd(20.25, 61.27, -33.9, 2.43) pt3dadd(20.76, 62.23, -33.9, 2.43) pt3dadd(20.83, 63.25, -33.9, 2.43) pt3dadd(20.76, 64.27, -33.9, 2.43) pt3dadd(20.44, 65.23, -33.9, 2.43) pt3dadd(20.12, 65.68, -33.9, 2.43) pt3dadd(18.78, 67.6, -33.9, 2.3) pt3dadd(18.4, 68.24, -33.9, 2.3) pt3dadd(18.08, 69.9, -33.9, 2.3) pt3dadd(18.08, 71.56, -33.9, 2.3) pt3dadd(18.27, 73.48, -33.9, 2.3) pt3dadd(18.91, 74.82, -33.9, 2.3) pt3dadd(19.68, 76.29, -33.9, 2.3) pt3dadd(20.25, 77.25, -33.9, 2.3) pt3dadd(20.25, 77.96, -33.9, 2.3) pt3dadd(19.8, 79.3, -33.9, 2.3) pt3dadd(18.97, 80.58, -33.9, 2.3) pt3dadd(18.52, 81.09, -33.9, 2.3) pt3dadd(18.21, 81.41, -33.9, 2.3) pt3dadd(18.14, 81.47, -33.9, 2.3) pt3dadd(18.1, 81.86, -33.9, 1.92) pt3dadd(18.1, 82.63, -33.9, 1.92) pt3dadd(17.84, 83.78, -33.9, 1.92) pt3dadd(17.07, 85.06, -33.9, 1.92) pt3dadd(16.37, 86.02, -33.9, 1.92) pt3dadd(15.86, 86.78, -33.9, 1.92) pt3dadd(15.67, 87.1, -40.06, 1.92) pt3dadd(15.35, 87.36, -40.06, 1.92) pt3dadd(14.58, 88.13, -40.06, 1.92) pt3dadd(14.26, 88.45, -40.06, 1.92) pt3dadd(13.75, 88.7, -40.06, 1.92) pt3dadd(12.73, 88.7, -40.06, 1.92) pt3dadd(11.13, 89.15, -40.06, 1.92) pt3dadd(10.49, 89.6, -40.92, 1.92) pt3dadd(10.17, 89.92, -43.95, 1.92) pt3dadd(10.04, 90.11, -45.24, 1.92) pt3dadd(10.04, 91.39, -45.24, 1.92) pt3dadd(10.42, 92.03, -45.24, 1.92) pt3dadd(11, 92.6, -45.24, 1.92) pt3dadd(11.38, 92.99, -45.24, 1.85) pt3dadd(11.83, 93.56, -45.24, 1.73) pt3dadd(12.79, 94.52, -45.35, 1.73) pt3dadd(13.05, 94.9, -45.89, 1.73) pt3dadd(13.3, 95.29, -45.89, 1.73) pt3dadd(13.62, 95.67, -49.67, 1.73) pt3dadd(13.75, 95.93, -49.67, 1.73) pt3dadd(14.52, 96.57, -49.67, 1.73) pt3dadd(15.16, 97.14, -49.67, 1.73) pt3dadd(15.54, 97.72, -49.67, 1.73) pt3dadd(15.6, 98.48, -49.67, 1.73) pt3dadd(15.28, 99.64, -49.67, 1.73) pt3dadd(14.32, 100.66, -49.67, 1.73) pt3dadd(12.92, 101.75, -49.67, 1.73) pt3dadd(11.83, 102.83, -49.67, 1.73) } } proc shape3d_29() { apic[5] { pt3dadd(10.04, 104.24, -49.67, 1.73) pt3dadd(9.21, 105.13, -49.67, 1.73) pt3dadd(8.44, 106.41, -49.67, 1.73) pt3dadd(7.48, 108.27, -49.67, 1.73) pt3dadd(6.97, 109.35, -49.67, 1.73) pt3dadd(6.59, 109.67, -49.67, 1.73) pt3dadd(6.14, 110.18, -49.67, 1.73) pt3dadd(5.76, 110.57, -49.67, 1.73) pt3dadd(5.69, 110.7, -49.67, 1.73) pt3dadd(5.14, 111.47, -49.67, 1.53) pt3dadd(4.69, 111.79, -49.67, 1.53) pt3dadd(2.32, 113.07, -49.67, 1.53) pt3dadd(1.56, 113.45, -49.67, 1.53) pt3dadd(1.24, 113.77, -49.78, 1.53) pt3dadd(0.92, 114.22, -51.5, 1.53) pt3dadd(0.73, 114.48, -51.5, 1.53) pt3dadd(0.66, 114.61, -54.2, 1.53) pt3dadd(0.66, 114.86, -54.96, 1.53) pt3dadd(0.6, 115.69, -54.96, 1.53) pt3dadd(0.66, 116.71, -54.96, 1.53) pt3dadd(0.15, 118.25, -54.96, 1.53) pt3dadd(-0.75, 120.36, -54.96, 1.53) pt3dadd(-1.13, 122.02, -54.96, 1.53) pt3dadd(-1.38, 124.13, -54.96, 1.53) pt3dadd(-1.7, 125.86, -54.96, 1.53) pt3dadd(-2.02, 126.69, -54.96, 1.53) pt3dadd(-2.02, 126.75, -54.96, 1.53) pt3dadd(-2.66, 128.54, -59.93, 1.28) pt3dadd(-3.17, 130.14, -59.93, 1.28) pt3dadd(-3.49, 131.61, -59.93, 1.28) pt3dadd(-3.69, 132.64, -59.93, 1.28) pt3dadd(-4.2, 133.59, -59.93, 1.28) pt3dadd(-4.71, 134.23, -61.11, 1.28) pt3dadd(-4.9, 134.49, -63.81, 1.28) pt3dadd(-4.97, 134.55, -64.89, 1.28) pt3dadd(-4.84, 135.06, -64.89, 1.28) pt3dadd(-5.16, 136.79, -64.89, 1.28) pt3dadd(-5.86, 137.37, -64.89, 1.28) pt3dadd(-7.08, 138.33, -64.89, 1.28) pt3dadd(-8.48, 139.6, -64.89, 1.28) pt3dadd(-9.7, 141.08, -64.89, 1.28) pt3dadd(-10.21, 141.59, -64.89, 1.28) pt3dadd(-10.65, 142.7, -64.89, 1.09) pt3dadd(-11.16, 143.47, -64.89, 1.09) pt3dadd(-12.12, 144.43, -64.89, 1.09) pt3dadd(-13.08, 144.75, -64.89, 1.09) pt3dadd(-14.04, 144.94, -64.89, 1.09) pt3dadd(-14.36, 145.26, -65.22, 1.09) pt3dadd(-14.55, 145.45, -71.8, 1.09) pt3dadd(-14.55, 146.98, -71.8, 1.09) pt3dadd(-15, 148.07, -71.8, 1.09) pt3dadd(-16.02, 149.67, -71.8, 1.09) pt3dadd(-16.41, 150.88, -71.8, 1.09) pt3dadd(-16.09, 152.67, -71.8, 1.09) pt3dadd(-16.34, 154.34, -72.02, 1.09) pt3dadd(-17.11, 155.81, -72.02, 1.09) pt3dadd(-18.32, 157.28, -73.64, 1.09) pt3dadd(-18.84, 158.3, -76.44, 1.09) pt3dadd(-19.03, 159.07, -76.44, 1.09) pt3dadd(-19.03, 159.32, -76.44, 1.09) pt3dadd(-19.92, 161.24, -78.06, 1.09) pt3dadd(-21.01, 162.2, -78.06, 1.09) pt3dadd(-21.65, 163.61, -78.06, 1.09) pt3dadd(-21.39, 164.89, -78.06, 1.09) pt3dadd(-20.31, 166.1, -78.06, 1.09) pt3dadd(-19.09, 166.61, -78.06, 1.09) pt3dadd(-18.77, 167, -78.28, 1.09) pt3dadd(-18.84, 168.08, -79.25, 1.09) pt3dadd(-19.47, 169.49, -79.25, 1.09) pt3dadd(-20.05, 170.51, -79.25, 1.09) pt3dadd(-20.18, 170.7, -79.25, 1.09) pt3dadd(-20.32, 171.41, -81.95, 1.09) pt3dadd(-20.89, 172.11, -81.95, 1.09) pt3dadd(-22.11, 173.33, -81.95, 1.09) pt3dadd(-22.74, 173.84, -81.95, 1.09) pt3dadd(-23, 174.09, -83.25, 1.09) } apic[6] {pt3dclear() pt3dadd(10.53, 55.96, -4.32, 5.88) pt3dadd(10.62, 56.45, -14.25, 5.88) pt3dadd(10.62, 56.64, -14.25, 5.88) pt3dadd(10.75, 57.16, -14.25, 5.88) pt3dadd(10.75, 59.2, -14.25, 5.88) pt3dadd(10.88, 59.71, -14.25, 5.88) pt3dadd(11.01, 60.29, -14.25, 5.88) pt3dadd(11.26, 60.93, -14.25, 5.88) pt3dadd(11.39, 61.38, -14.25, 5.88) pt3dadd(11.78, 62.08, -14.25, 5.88) pt3dadd(11.9, 62.65, -14.25, 5.88) pt3dadd(11.9, 63.17, -14.25, 5.88) pt3dadd(11.97, 63.74, -14.25, 5.88) pt3dadd(11.97, 65.28, -14.25, 5.88) pt3dadd(12.03, 65.6, -14.25, 5.88) pt3dadd(12.03, 65.72, -14.25, 5.88) pt3dadd(12.09, 67.45, -14.25, 5.88) } apic[7] {pt3dclear() pt3dadd(12.09, 67.45, -14.25, 2.81) pt3dadd(13.95, 67.83, -14.25, 2.81) pt3dadd(14.2, 68.09, -14.25, 2.81) pt3dadd(14.91, 68.66, -14.25, 2.81) pt3dadd(15.61, 69.05, -14.25, 2.81) pt3dadd(16.51, 69.5, -14.25, 2.81) pt3dadd(17.15, 69.88, -14.25, 2.81) pt3dadd(17.79, 70.52, -14.25, 2.81) pt3dadd(18.49, 71.41, -14.25, 2.81) pt3dadd(19.38, 72.12, -14.25, 2.81) pt3dadd(19.77, 72.56, -14.25, 2.75) pt3dadd(20.02, 72.88, -14.25, 2.62) pt3dadd(21.11, 73.52, -14.25, 2.62) pt3dadd(22.13, 73.97, -14.25, 2.62) pt3dadd(22.96, 74.35, -14.25, 2.62) pt3dadd(24.24, 74.67, -14.25, 2.62) pt3dadd(25.71, 74.8, -14.25, 2.62) pt3dadd(28.53, 74.8, -14.25, 2.62) pt3dadd(30.13, 74.99, -14.25, 2.62) pt3dadd(31.15, 75.38, -14.25, 2.62) pt3dadd(32.04, 75.63, -14.25, 2.62) pt3dadd(33.32, 75.83, -14.25, 2.62) pt3dadd(33.9, 75.89, -14.14, 2.62) pt3dadd(34.86, 76.08, -14.14, 2.62) pt3dadd(37.93, 76.08, 0.97, 2.62) pt3dadd(39.01, 76.27, 0.97, 2.62) pt3dadd(39.78, 76.66, 0.97, 2.62) pt3dadd(40.68, 77.04, 0.97, 2.62) pt3dadd(42.15, 77.62, 0.97, 2.62) pt3dadd(43.81, 78.26, 0.97, 2.62) pt3dadd(45.02, 78.45, 0.97, 2.62) pt3dadd(46.69, 78.57, 0.97, 2.62) pt3dadd(47.96, 78.7, 0.97, 2.62) pt3dadd(49.24, 78.83, 0.97, 2.62) pt3dadd(50.78, 78.83, 0.97, 2.62) pt3dadd(51.48, 78.96, 0.97, 2.62) pt3dadd(51.86, 78.96, 0.97, 2.62) pt3dadd(53.9, 80.12, 0.97, 2.62) pt3dadd(55.18, 80.7, 0.97, 2.62) pt3dadd(56.27, 81.21, 0.97, 2.62) pt3dadd(57.93, 81.97, 0.97, 2.62) pt3dadd(58.95, 82.55, 0.97, 2.62) pt3dadd(61.51, 84.08, 0.97, 2.62) pt3dadd(63.04, 85.04, 0.97, 2.62) pt3dadd(65.03, 86, 0.97, 2.62) pt3dadd(67.65, 87.41, 0.97, 2.62) pt3dadd(68.73, 88.3, 0.97, 2.62) pt3dadd(69.82, 89.07, 0.97, 2.62) pt3dadd(71.1, 90.03, 0.97, 2.62) pt3dadd(72.44, 90.8, 0.97, 2.62) pt3dadd(73.4, 91.31, 0.97, 2.62) pt3dadd(73.98, 91.63, 0.97, 2.62) pt3dadd(75.38, 92.52, 0.97, 2.62) pt3dadd(76.09, 93.04, 0.97, 2.62) pt3dadd(76.79, 93.42, 0.97, 2.62) pt3dadd(77.56, 93.93, 0.97, 2.62) pt3dadd(78.13, 94.38, 0.97, 2.62) pt3dadd(78.64, 94.7, 0.97, 2.62) pt3dadd(78.9, 95.08, 0.97, 2.62) pt3dadd(79.16, 95.4, 0.97, 2.62) } apic[8] {pt3dclear() pt3dadd(79.16, 95.4, 0.97, 1.41) pt3dadd(79.22, 96.74, 0.97, 1.41) pt3dadd(79.22, 98.34, 0.97, 1.41) pt3dadd(79.54, 99.24, 0.97, 1.41) pt3dadd(79.86, 99.88, 0.97, 1.41) pt3dadd(80.56, 100.9, 0.97, 1.41) pt3dadd(81.33, 101.99, 0.97, 1.41) pt3dadd(81.65, 102.31, 0.97, 1.41) pt3dadd(82.29, 102.82, 0.97, 1.41) pt3dadd(82.86, 103.46, 0.97, 1.41) pt3dadd(83.12, 103.78, 0.97, 1.41) pt3dadd(83.12, 103.97, 0.97, 1.41) pt3dadd(83.82, 104.99, 0.97, 1.41) pt3dadd(84.53, 105.5, 0.97, 1.41) pt3dadd(85.61, 106.14, 0.97, 1.41) pt3dadd(86.57, 106.78, 0.97, 1.41) pt3dadd(87.4, 107.36, 0.97, 1.41) pt3dadd(87.66, 107.55, 0.97, 1.41) pt3dadd(87.72, 107.61, 0.97, 1.41) pt3dadd(89.8, 108.5, 0.97, 1.41) pt3dadd(89.99, 108.88, 0.97, 1.41) pt3dadd(90.95, 110.03, 0.97, 1.41) pt3dadd(91.91, 111.38, 0.97, 1.41) pt3dadd(92.29, 112.59, 0.97, 1.41) pt3dadd(92.49, 113.68, 0.97, 1.41) pt3dadd(92.87, 115.02, 0.97, 1.41) pt3dadd(93.19, 116.43, 0.97, 1.41) pt3dadd(93.76, 118.09, 0.97, 1.41) pt3dadd(94.21, 119.88, 0.97, 1.41) pt3dadd(94.53, 121.16, 0.97, 1.41) pt3dadd(94.91, 121.93, 0.97, 1.41) pt3dadd(95.11, 123.65, 0.97, 1.41) pt3dadd(95.11, 124.23, 0.97, 1.41) pt3dadd(95.55, 125.57, 0.97, 1.41) pt3dadd(95.75, 127.36, 0.97, 1.41) pt3dadd(95.36, 128.7, 0.97, 1.41) pt3dadd(95.04, 129.92, 0.97, 1.41) pt3dadd(94.98, 130.94, 0.97, 1.41) pt3dadd(95.04, 132.28, 0.97, 1.41) pt3dadd(95.43, 133.5, 0.97, 1.41) pt3dadd(96.13, 134.59, 0.97, 1.41) pt3dadd(97.22, 136.06, 0.97, 1.41) pt3dadd(97.66, 136.95, 0.97, 1.41) pt3dadd(97.66, 137.21, 0.97, 1.41) pt3dadd(97.97, 138.61, 0.97, 1.41) pt3dadd(97.97, 138.87, 0.97, 1.41) pt3dadd(98.42, 140.08, 0.97, 1.41) } } proc shape3d_30() { apic[8] { pt3dadd(99.25, 141.55, 0.97, 1.41) pt3dadd(100.34, 143.02, 0.97, 1.41) pt3dadd(101.55, 144.11, 0.97, 1.41) pt3dadd(102.51, 145.13, 0.97, 1.41) pt3dadd(103.22, 146.35, 0.97, 1.41) pt3dadd(103.6, 147.18, 0.97, 1.41) pt3dadd(104.05, 147.88, 0.97, 1.41) pt3dadd(104.11, 147.95, 0.97, 1.41) } apic[9] {pt3dclear() pt3dadd(79.16, 95.4, 0.97, 2.37) pt3dadd(79.7, 94.87, 0.86, 2.37) pt3dadd(79.89, 95.26, 0.86, 2.37) pt3dadd(80.34, 95.64, 0.86, 2.37) pt3dadd(80.85, 95.96, 0.86, 2.37) pt3dadd(81.49, 96.02, 0.86, 2.37) pt3dadd(82.26, 96.09, 0.86, 2.37) pt3dadd(83.15, 96.09, 0.86, 2.37) pt3dadd(84.11, 96.15, 0.86, 2.37) pt3dadd(86.54, 96.15, 0.86, 2.37) pt3dadd(87.44, 96.22, 0.86, 2.37) pt3dadd(88.21, 96.28, 0.86, 2.37) pt3dadd(88.84, 96.54, 0.86, 2.37) pt3dadd(89.48, 96.6, 0.86, 2.37) pt3dadd(89.93, 96.66, 0.86, 2.37) pt3dadd(90.32, 96.73, 0.86, 2.37) pt3dadd(90.89, 96.79, 0.86, 2.37) pt3dadd(93.96, 96.79, 0.86, 2.37) } apic[10] {pt3dclear() pt3dadd(93.96, 96.79, 0.86, 1.21) pt3dadd(96.13, 96.09, 0.86, 1.21) pt3dadd(96.58, 96.09, 0.86, 1.21) pt3dadd(97.54, 96.02, 0.86, 1.21) pt3dadd(98.76, 95.9, 0.86, 1.21) pt3dadd(101.06, 95.9, 0.86, 1.21) pt3dadd(102.66, 95.45, 0.86, 1.21) pt3dadd(103.93, 94.62, 0.86, 1.21) pt3dadd(105.02, 93.47, 0.86, 1.21) pt3dadd(105.72, 92.7, 0.86, 1.21) pt3dadd(105.85, 92.7, 0.86, 1.21) pt3dadd(106.88, 91.87, 0.86, 1.21) pt3dadd(107.96, 90.97, 0.86, 1.21) pt3dadd(109.11, 90.08, 0.86, 1.21) pt3dadd(110.46, 89.18, 0.86, 1.21) pt3dadd(111.73, 87.71, 0.86, 1.21) pt3dadd(112.76, 86.69, 0.86, 1.21) pt3dadd(113.84, 85.41, 0.86, 1.21) pt3dadd(114.1, 85.28, 0.86, 1.21) pt3dadd(114.61, 85.09, 0.86, 1.21) pt3dadd(115.19, 84.45, 0.86, 1.21) pt3dadd(115.63, 83.75, 0.86, 1.21) pt3dadd(116.21, 83.05, 0.86, 1.21) pt3dadd(116.79, 82.53, 0.86, 1.21) pt3dadd(117.23, 82.28, 0.86, 1.21) pt3dadd(118.13, 81.83, 0.86, 1.21) pt3dadd(118.83, 81.45, 0.86, 1.21) pt3dadd(119.28, 81.26, 0.86, 1.21) pt3dadd(119.6, 81.19, 0.86, 1.21) pt3dadd(120.17, 80.87, 0.86, 1.21) pt3dadd(120.43, 80.68, 0.86, 1.21) pt3dadd(120.62, 80.62, 0.86, 1.21) pt3dadd(121.57, 80.46, 0.86, 0.96) pt3dadd(121.76, 79.88, 0.86, 0.96) pt3dadd(122.59, 78.99, 0.86, 0.96) pt3dadd(123.61, 78.22, 0.86, 0.96) pt3dadd(124.51, 77.71, 0.86, 0.96) pt3dadd(125.59, 77.32, 0.86, 0.96) pt3dadd(127.26, 77, 0.86, 0.96) pt3dadd(127.58, 76.94, 3.13, 0.96) pt3dadd(127.58, 76.81, 3.89, 0.96) pt3dadd(128.21, 75.66, 3.89, 0.96) pt3dadd(129.43, 73.94, 3.89, 0.96) pt3dadd(131.48, 73.17, 3.89, 0.96) pt3dadd(133.07, 72.78, 3.89, 0.96) pt3dadd(134.48, 72.02, 3.89, 0.96) pt3dadd(135.89, 71.63, 3.89, 0.96) pt3dadd(137.1, 71.63, 3.89, 0.96) pt3dadd(138.19, 71.76, 3.89, 0.96) pt3dadd(139.34, 71.89, 3.89, 0.96) pt3dadd(140.81, 72.59, 3.89, 0.96) pt3dadd(141.51, 72.72, 3.89, 0.96) pt3dadd(142.41, 72.4, 3.89, 0.96) pt3dadd(142.67, 72.27, 3.89, 0.96) } apic[11] {pt3dclear() pt3dadd(93.96, 96.79, 0.86, 1.47) pt3dadd(94.65, 97.34, -17.71, 1.47) pt3dadd(95.41, 97.34, -17.71, 1.47) pt3dadd(96.05, 97.59, -17.71, 1.47) pt3dadd(96.95, 98.04, -17.71, 1.47) pt3dadd(97.72, 98.49, -17.71, 1.47) pt3dadd(98.74, 98.74, -17.71, 1.47) pt3dadd(99.7, 98.94, -17.71, 1.47) pt3dadd(100.98, 99.06, -17.71, 1.47) pt3dadd(102.32, 99.13, -17.71, 1.47) pt3dadd(103.6, 99.19, -17.71, 1.47) pt3dadd(105.07, 99.25, -17.71, 1.47) pt3dadd(106.35, 99.51, -17.71, 1.47) pt3dadd(107.69, 100.02, -17.71, 1.47) pt3dadd(108.71, 100.34, -17.71, 1.47) pt3dadd(109.67, 100.79, -17.71, 1.47) pt3dadd(110.63, 101.17, -17.71, 1.47) pt3dadd(111.53, 101.62, -17.71, 1.47) pt3dadd(112.55, 102.13, -17.71, 1.47) pt3dadd(113.32, 102.45, -17.71, 1.47) pt3dadd(115.87, 103.73, -17.71, 1.47) pt3dadd(116.39, 103.99, -17.71, 1.47) pt3dadd(117.54, 104.05, -17.71, 1.47) pt3dadd(119.58, 104.05, -17.71, 1.47) pt3dadd(120.54, 103.92, -17.71, 1.47) pt3dadd(121.31, 103.86, -17.71, 1.47) pt3dadd(122.52, 104.05, -17.71, 1.47) pt3dadd(123.55, 105.01, -17.71, 1.47) pt3dadd(124.19, 106.29, -17.71, 1.47) pt3dadd(124.7, 107.31, -17.71, 1.47) pt3dadd(125.4, 108.59, -17.71, 1.47) pt3dadd(125.98, 109.42, -17.71, 1.47) pt3dadd(126.04, 109.61, -17.71, 1.47) pt3dadd(126.49, 109.68, -17.71, 1.47) pt3dadd(127.06, 109.48, -17.71, 1.47) pt3dadd(127.58, 109.17, -17.71, 1.47) pt3dadd(127.7, 108.65, -17.71, 1.47) pt3dadd(127.7, 108.4, -17.71, 1.47) pt3dadd(128.02, 107.12, -17.71, 1.47) pt3dadd(128.28, 106.35, -17.71, 1.47) pt3dadd(128.98, 105.33, -17.71, 1.47) pt3dadd(130.13, 103.86, -17.71, 1.47) pt3dadd(130.45, 103.6, -17.71, 1.47) } apic[12] {pt3dclear() pt3dadd(12.09, 67.45, -14.25, 5.24) pt3dadd(11.88, 68.53, -3.78, 5.24) pt3dadd(11.88, 69.23, -3.78, 5.24) pt3dadd(11.94, 69.61, -3.78, 5.24) pt3dadd(11.94, 72.56, -3.78, 5.24) } apic[13] {pt3dclear() pt3dadd(11.94, 72.56, -3.78, 1.92) pt3dadd(12.77, 72.56, -3.78, 1.92) pt3dadd(13.16, 72.56, -3.78, 1.92) pt3dadd(14.12, 72.81, -3.78, 1.92) pt3dadd(14.82, 73.39, -3.78, 1.92) pt3dadd(15.33, 74.22, -3.78, 1.92) pt3dadd(15.65, 74.86, -3.78, 1.92) pt3dadd(15.65, 76.01, -3.78, 1.92) pt3dadd(15.33, 76.71, -3.78, 1.92) pt3dadd(15.01, 77.61, -3.78, 1.92) pt3dadd(14.76, 79.01, -3.78, 1.92) pt3dadd(14.63, 80.42, -3.78, 1.92) pt3dadd(14.63, 82.85, -3.78, 1.92) pt3dadd(14.82, 83.68, -3.78, 1.92) pt3dadd(15.2, 84.45, -3.78, 1.92) pt3dadd(15.78, 85.09, -3.78, 1.92) pt3dadd(16.61, 85.66, -3.78, 1.92) pt3dadd(17.38, 86.24, -3.78, 1.92) pt3dadd(18.08, 86.62, -3.78, 1.92) pt3dadd(19.04, 87.13, -3.78, 1.92) pt3dadd(20.45, 87.77, -3.78, 1.92) pt3dadd(21.85, 88.22, -3.78, 1.92) pt3dadd(23.07, 88.35, -3.78, 1.92) pt3dadd(24.86, 87.77, -3.78, 1.92) pt3dadd(25.37, 87.65, -3.78, 1.92) pt3dadd(25.5, 87.58, -3.78, 1.92) pt3dadd(25.56, 87.58, -3.78, 1.92) pt3dadd(27.86, 87.13, -20.3, 1.92) pt3dadd(28.37, 86.81, -21.05, 1.92) pt3dadd(29.01, 85.66, -21.05, 1.92) pt3dadd(29.46, 84.9, -21.05, 1.92) pt3dadd(29.91, 83.87, -23, 1.92) pt3dadd(30.16, 83.43, -23, 1.92) pt3dadd(30.36, 82.91, -23, 1.92) pt3dadd(30.61, 82.72, -26.24, 1.92) pt3dadd(30.93, 82.79, -26.24, 1.92) pt3dadd(31.12, 83.04, -26.24, 1.92) pt3dadd(31.12, 84.38, -26.24, 1.92) pt3dadd(30.74, 85.85, -26.24, 1.92) pt3dadd(30.29, 86.81, -29.04, 1.92) pt3dadd(30.16, 87.13, -29.37, 1.92) pt3dadd(30.16, 88.86, -29.8, 1.92) pt3dadd(30.23, 89.69, -33.26, 1.92) pt3dadd(30.23, 91.29, -34.23, 1.92) pt3dadd(30.16, 91.93, -34.23, 1.92) pt3dadd(30.16, 92.25, -34.34, 1.92) } apic[14] {pt3dclear() pt3dadd(11.94, 72.56, -3.78, 5.05) pt3dadd(12.13, 73, -2.7, 5.05) pt3dadd(12.13, 83.49, -2.7, 5.05) pt3dadd(11.88, 84.32, -2.7, 5.05) pt3dadd(11.81, 84.7, -2.7, 5.05) pt3dadd(11.81, 85.66, -2.7, 5.05) pt3dadd(11.75, 86.05, -2.7, 5.05) pt3dadd(11.75, 87.71, -2.7, 5.05) pt3dadd(11.69, 88.92, -2.7, 5.05) pt3dadd(11.62, 89.95, -2.7, 5.05) pt3dadd(11.62, 92.57, -2.7, 5.05) pt3dadd(11.56, 93.21, -2.7, 5.05) pt3dadd(11.49, 93.78, -2.7, 5.05) pt3dadd(11.49, 94.55, -2.7, 5.05) pt3dadd(11.43, 95.38, -2.7, 5.05) pt3dadd(11.37, 96.34, -2.7, 5.05) pt3dadd(11.37, 97.36, -2.7, 5.05) pt3dadd(11.3, 98.51, -2.7, 5.05) pt3dadd(11.24, 99.41, -2.7, 5.05) pt3dadd(11.11, 99.99, -2.7, 5.05) pt3dadd(11.11, 100.18, -2.7, 5.05) pt3dadd(10.69, 101.07, -2.7, 5.05) pt3dadd(10.69, 105.8, -2.7, 5.05) pt3dadd(10.62, 106.57, -2.7, 5.05) pt3dadd(10.62, 108.62, -2.7, 5.05) pt3dadd(10.62, 110.15, -2.7, 5.05) } } proc shape3d_31() { apic[14] { pt3dadd(10.62, 118.46, -2.7, 5.05) pt3dadd(10.62, 119.17, -2.7, 5.05) pt3dadd(10.62, 123.07, -2.7, 5.05) } apic[15] {pt3dclear() pt3dadd(10.62, 123.07, -2.7, 2.05) pt3dadd(11.97, 123.26, -2.7, 2.05) pt3dadd(12.16, 123.64, -2.7, 2.05) pt3dadd(12.67, 123.9, -2.7, 2.05) pt3dadd(13.44, 124.09, -2.7, 2.05) pt3dadd(14.08, 124.09, -2.7, 2.05) pt3dadd(14.46, 124.03, -2.7, 2.05) pt3dadd(14.59, 123.77, -2.27, 2.05) pt3dadd(14.65, 123.45, -2.27, 2.05) pt3dadd(14.65, 122.11, 0.97, 2.05) pt3dadd(14.46, 121.47, 0.97, 2.05) pt3dadd(13.88, 120.64, 0.97, 2.05) pt3dadd(13.44, 120.19, 0.97, 2.05) pt3dadd(12.86, 119.42, 0.97, 2.05) pt3dadd(12.03, 118.65, 0.97, 2.05) pt3dadd(11.2, 118.02, 0.97, 2.05) pt3dadd(10.37, 117.57, 0.97, 2.05) pt3dadd(9.6, 116.99, 0.97, 2.05) pt3dadd(8.83, 116.16, 0.97, 2.05) pt3dadd(8.26, 115.27, 0.97, 2.05) pt3dadd(7.87, 114.18, 0.97, 2.05) pt3dadd(7.36, 112.96, 0.97, 2.05) pt3dadd(7.23, 111.94, 0.97, 2.05) pt3dadd(7.23, 111.37, 0.97, 2.05) pt3dadd(7.11, 110.85, 0.97, 2.05) pt3dadd(6.98, 110.15, 0.97, 2.05) pt3dadd(6.98, 109.45, 0.97, 2.05) pt3dadd(7.11, 108.49, 0.97, 2.05) pt3dadd(7.43, 107.4, 0.97, 2.05) pt3dadd(7.49, 106.76, 0.97, 2.05) pt3dadd(7.49, 105.87, 2.48, 2.05) pt3dadd(7.43, 105.68, 3.46, 2.05) pt3dadd(7.43, 104.78, 3.46, 2.05) pt3dadd(7.36, 104.59, 3.78, 2.05) pt3dadd(7.3, 104.46, 3.78, 2.05) pt3dadd(7.3, 104.27, 4.86, 2.05) pt3dadd(7.55, 103.69, 4.86, 2.05) pt3dadd(7.55, 103.31, 4.86, 2.05) pt3dadd(7.36, 102.86, 4.86, 2.05) pt3dadd(6.98, 102.48, 4.86, 2.05) pt3dadd(6.66, 102.1, 4.86, 2.05) pt3dadd(6.4, 101.71, 4.86, 2.05) pt3dadd(6.02, 101.26, 4.86, 2.05) pt3dadd(5.7, 100.75, 4.86, 2.05) pt3dadd(5.38, 100.05, 4.86, 2.05) pt3dadd(5.25, 99.79, 4.86, 2.05) } apic[16] {pt3dclear() pt3dadd(10.62, 123.07, -2.7, 5.18) pt3dadd(10.69, 123.58, -11.55, 5.18) pt3dadd(10.69, 127.16, -11.55, 5.18) pt3dadd(11.07, 128.37, -11.55, 5.18) pt3dadd(11.07, 129.59, -11.55, 5.18) pt3dadd(10.88, 130.29, -11.55, 5.18) pt3dadd(10.81, 130.48, -11.55, 5.18) pt3dadd(10.81, 130.55, -11.55, 5.18) pt3dadd(10.85, 131.37, -11.55, 5.18) pt3dadd(10.85, 131.69, -11.55, 5.18) pt3dadd(10.79, 132.01, -11.55, 5.18) pt3dadd(10.6, 132.4, -11.55, 5.18) pt3dadd(10.41, 132.91, -11.55, 5.18) pt3dadd(10.28, 133.48, -11.55, 5.18) pt3dadd(10.09, 133.93, -11.55, 5.18) pt3dadd(10.02, 134.44, -11.55, 5.18) pt3dadd(9.89, 134.95, -11.55, 5.18) pt3dadd(9.83, 135.59, -11.55, 5.18) pt3dadd(9.83, 136.61, -11.55, 5.18) } apic[17] {pt3dclear() pt3dadd(9.83, 136.61, -11.55, 2.94) pt3dadd(12.84, 136.87, -11.55, 2.94) pt3dadd(13.41, 136.68, -11.55, 2.94) pt3dadd(13.54, 136.68, -11.55, 2.94) pt3dadd(13.92, 136.49, -11.55, 2.94) pt3dadd(14.88, 135.91, -11.55, 2.94) pt3dadd(15.78, 135.34, -11.55, 2.94) pt3dadd(16.22, 135.21, -11.55, 2.94) pt3dadd(16.54, 134.95, -11.55, 2.94) pt3dadd(17.38, 133.99, -11.55, 2.81) pt3dadd(18.4, 132.59, -11.55, 2.75) pt3dadd(19.42, 130.67, -11.55, 2.69) pt3dadd(20.12, 129.65, -11.55, 2.69) pt3dadd(20.76, 129.33, -11.55, 2.69) pt3dadd(20.89, 129.33, -11.55, 2.69) pt3dadd(21.53, 128.81, -11.55, 2.69) pt3dadd(22.43, 128.11, -11.55, 2.69) pt3dadd(23.19, 127.41, -11.55, 2.69) pt3dadd(23.51, 126.9, -11.34, 2.56) pt3dadd(23.58, 126.51, -11.01, 2.49) pt3dadd(23.58, 126.32, 2.16, 2.3) pt3dadd(24.22, 125.17, 2.16, 2.24) pt3dadd(24.66, 124.59, 2.16, 2.24) pt3dadd(25.05, 124.4, 2.16, 2.24) pt3dadd(27.22, 124.4, 4.86, 2.24) pt3dadd(27.8, 124.28, 4.86, 2.24) pt3dadd(28.5, 124.28, 4.86, 2.24) pt3dadd(28.63, 124.47, 5.83, 2.24) pt3dadd(28.69, 124.53, 5.83, 2.24) } apic[18] {pt3dclear() pt3dadd(9.83, 136.61, -11.55, 5.31) pt3dadd(9.83, 137.57, -14.9, 5.31) pt3dadd(9.83, 142.82, -14.9, 5.31) pt3dadd(9.77, 143.26, -14.9, 5.31) pt3dadd(9.7, 144.03, -14.9, 5.31) pt3dadd(9.51, 144.93, -14.9, 5.31) pt3dadd(9.32, 146.01, -14.9, 5.31) pt3dadd(9.19, 146.33, -14.9, 5.31) pt3dadd(9.13, 147.16, -14.9, 5.31) pt3dadd(9.13, 147.55, -14.9, 5.31) pt3dadd(9.13, 149.98, -14.9, 5.31) pt3dadd(9.06, 150.94, -14.9, 5.31) pt3dadd(9.06, 153.43, -14.9, 5.31) pt3dadd(9.38, 154.65, -14.9, 5.31) pt3dadd(9.77, 155.73, -14.9, 5.31) pt3dadd(9.96, 156.82, -14.9, 5.31) pt3dadd(10.21, 157.78, -14.9, 5.31) pt3dadd(10.34, 158.67, -14.9, 5.31) pt3dadd(10.47, 159.63, -14.9, 5.31) pt3dadd(10.47, 160.53, -14.9, 5.31) pt3dadd(10.55, 161.82, -14.9, 5.31) pt3dadd(10.55, 168.02, -14.9, 5.31) pt3dadd(10.48, 168.47, -14.9, 5.31) pt3dadd(10.55, 168.92, -14.9, 5.31) pt3dadd(10.8, 169.62, -14.9, 5.31) pt3dadd(10.8, 172.24, -14.9, 6.07) } apic[19] {pt3dclear() pt3dadd(10.8, 172.24, -14.9, 2.17) pt3dadd(9.52, 172.18, -14.9, 2.17) pt3dadd(9.2, 172.43, -14.9, 2.17) pt3dadd(8.82, 172.75, -14.9, 2.17) pt3dadd(8.18, 173.07, -14.9, 2.17) pt3dadd(7.67, 173.39, -14.9, 2.17) pt3dadd(7.09, 173.58, -14.9, 2.17) pt3dadd(6.45, 173.97, -14.9, 2.17) pt3dadd(5.88, 174.48, -14.9, 2.17) pt3dadd(5.3, 174.8, -14.9, 2.17) pt3dadd(4.6, 175.18, -14.9, 2.17) pt3dadd(4.15, 175.31, -14.9, 2.05) pt3dadd(3.77, 175.63, -14.9, 1.92) pt3dadd(2.68, 176.08, -14.9, 1.92) pt3dadd(1.02, 176.59, -14.9, 1.92) pt3dadd(-0.58, 176.91, -14.9, 1.92) pt3dadd(-1.6, 177.42, -14.9, 1.92) pt3dadd(-2.95, 177.87, -14.9, 1.92) pt3dadd(-4.74, 178.38, -14.9, 1.92) pt3dadd(-6.01, 179.02, -14.9, 1.92) pt3dadd(-6.65, 179.91, -14.9, 1.92) pt3dadd(-7.36, 180.87, -14.9, 1.92) pt3dadd(-7.93, 181.77, -14.9, 1.92) pt3dadd(-8.76, 182.73, -14.9, 1.92) pt3dadd(-9.47, 183.43, -14.9, 1.92) pt3dadd(-10.81, 184.45, -14.9, 1.92) pt3dadd(-11.96, 185.03, -14.9, 1.92) pt3dadd(-13.05, 185.48, -14.9, 1.92) pt3dadd(-13.62, 186.12, -14.9, 1.92) pt3dadd(-14.45, 187.27, -14.9, 1.92) pt3dadd(-15.03, 188.1, -14.9, 1.92) pt3dadd(-15.73, 188.74, -14.9, 1.92) pt3dadd(-16.12, 189.06, -14.9, 1.92) pt3dadd(-16.56, 189.38, -14.9, 1.92) pt3dadd(-16.63, 189.44, -14.9, 1.92) pt3dadd(-17.08, 189.63, -14.9, 1.92) pt3dadd(-17.72, 190.4, -14.9, 1.92) pt3dadd(-18.68, 191.04, -14.9, 1.92) pt3dadd(-19.76, 191.61, -14.9, 1.92) pt3dadd(-20.53, 192.06, -14.9, 1.92) pt3dadd(-21.17, 192.51, -14.9, 1.92) pt3dadd(-21.62, 192.96, -14.9, 1.92) pt3dadd(-21.94, 193.15, -14.9, 1.92) pt3dadd(-22.26, 193.41, -14.9, 1.92) pt3dadd(-22.32, 193.47, -14.9, 1.92) } apic[20] {pt3dclear() pt3dadd(-22.32, 193.47, -14.9, 1.66) pt3dadd(-22.38, 194.49, -21.81, 1.66) pt3dadd(-22.77, 195.51, -21.81, 1.66) pt3dadd(-23.34, 196.54, -21.81, 1.66) pt3dadd(-24.3, 197.88, -21.81, 1.66) pt3dadd(-25.26, 198.71, -21.81, 1.66) pt3dadd(-26.41, 199.42, -21.81, 1.66) pt3dadd(-27.63, 199.86, -21.81, 1.66) pt3dadd(-28.97, 199.86, -21.81, 1.66) pt3dadd(-30.25, 200.05, -21.81, 1.66) pt3dadd(-31.21, 200.37, -21.81, 1.66) pt3dadd(-31.78, 200.82, -21.81, 1.66) pt3dadd(-32.1, 201.46, -21.81, 1.66) pt3dadd(-32.3, 201.97, -21.81, 1.66) pt3dadd(-32.36, 202.93, -21.81, 1.66) pt3dadd(-31.91, 203.89, -24.51, 1.66) pt3dadd(-31.46, 204.47, -25.27, 1.66) pt3dadd(-31.21, 204.85, -25.27, 1.66) pt3dadd(-31.21, 204.91, -25.27, 1.66) pt3dadd(-31.53, 206.64, -25.48, 1.47) pt3dadd(-32.17, 207.09, -25.48, 1.47) pt3dadd(-33.32, 207.22, -26.78, 1.47) pt3dadd(-34.21, 207.15, -29.04, 1.47) pt3dadd(-34.53, 207.15, -30.77, 1.47) pt3dadd(-34.66, 207.22, -30.77, 1.47) pt3dadd(-34.72, 207.28, -30.99, 1.47) pt3dadd(-34.98, 207.54, -30.99, 1.47) pt3dadd(-35.04, 207.66, -30.99, 1.47) pt3dadd(-35.24, 207.92, -30.99, 1.47) pt3dadd(-35.36, 208.17, -32.93, 1.47) pt3dadd(-35.43, 208.3, -35.09, 1.47) pt3dadd(-35.43, 208.43, -36.49, 1.47) } } proc shape3d_32() { apic[20] { pt3dadd(-35.49, 208.43, -36.71, 1.47) pt3dadd(-35.49, 210.22, -36.71, 1.47) pt3dadd(-29.99, 214.31, -37.57, 1.47) pt3dadd(-29.99, 214.31, -37.57, 1.47) pt3dadd(-29.99, 214.57, -37.57, 1.47) pt3dadd(-31.02, 215.08, -37.57, 1.47) pt3dadd(-32.04, 215.53, -37.57, 1.47) pt3dadd(-32.68, 215.85, -37.57, 1.47) pt3dadd(-33.19, 216.29, -37.57, 1.47) pt3dadd(-33.45, 216.61, -37.57, 1.47) pt3dadd(-33.19, 217.19, -37.57, 1.47) pt3dadd(-32.61, 217.7, -37.57, 1.47) pt3dadd(-32.61, 218.08, -38.01, 1.47) pt3dadd(-32.93, 218.6, -38.01, 1.47) pt3dadd(-33.19, 218.85, -38.01, 1.47) pt3dadd(-34.83, 220.64, -42.76, 1.47) pt3dadd(-34.89, 221.15, -42.76, 1.47) pt3dadd(-35.66, 221.98, -42.76, 1.47) pt3dadd(-37.19, 222.75, -42.76, 1.47) pt3dadd(-37.64, 222.94, -42.76, 1.47) pt3dadd(-38.22, 223.07, -44.81, 1.47) pt3dadd(-38.28, 223.13, -48.16, 1.47) pt3dadd(-39.3, 223.77, -48.16, 1.47) pt3dadd(-40.14, 224.09, -48.16, 1.47) pt3dadd(-41.93, 224.09, -48.16, 1.28) pt3dadd(-43.08, 224.6, -48.16, 1.28) pt3dadd(-44.36, 225.11, -48.16, 1.28) pt3dadd(-45.76, 225.37, -48.48, 1.28) pt3dadd(-46.53, 225.43, -48.48, 1.28) pt3dadd(-48.83, 225.43, -53.34, 1.28) } apic[21] {pt3dclear() pt3dadd(-22.32, 193.47, -14.9, 1.41) pt3dadd(-23.7, 194.36, -14.9, 1.41) pt3dadd(-23.77, 194.43, -14.9, 1.41) pt3dadd(-24.73, 194.62, -14.9, 1.41) pt3dadd(-25.75, 194.62, -14.9, 1.41) pt3dadd(-26.58, 194.23, -14.9, 1.41) pt3dadd(-27.35, 193.72, -14.9, 1.41) pt3dadd(-28.43, 192.63, -14.9, 1.41) pt3dadd(-29.27, 192.06, -14.9, 1.41) pt3dadd(-30.42, 191.48, -14.9, 1.41) pt3dadd(-31.18, 191.1, -14.9, 1.41) pt3dadd(-32.08, 190.65, -14.9, 1.41) pt3dadd(-33.1, 190.21, -14.9, 1.41) pt3dadd(-34, 190.27, -14.9, 1.41) pt3dadd(-35.08, 190.65, -14.9, 1.41) pt3dadd(-35.47, 191.61, -14.9, 1.41) pt3dadd(-35.53, 192.57, -14.9, 1.41) pt3dadd(-35.85, 193.4, -14.9, 1.41) pt3dadd(-36.49, 194.11, -14.9, 1.41) pt3dadd(-37.32, 194.74, -14.9, 1.41) pt3dadd(-38.15, 195.19, -14.9, 1.41) pt3dadd(-38.92, 195.26, -14.9, 1.41) pt3dadd(-39.75, 195.26, -14.9, 1.41) pt3dadd(-40.71, 195, -14.9, 1.41) pt3dadd(-41.8, 194.3, -14.9, 1.41) pt3dadd(-42.76, 193.79, -14.9, 1.41) pt3dadd(-43.78, 193.4, -14.9, 1.41) pt3dadd(-44.23, 193.08, -14.9, 1.41) pt3dadd(-44.99, 193.66, -14.9, 1.41) pt3dadd(-46.27, 194.11, -14.9, 1.41) pt3dadd(-47.49, 194.43, -14.9, 1.41) pt3dadd(-49.09, 194.87, -14.9, 1.41) pt3dadd(-50.05, 195.19, -14.9, 1.41) pt3dadd(-51.07, 195.9, -14.9, 1.41) pt3dadd(-51.77, 196.79, -14.9, 1.41) pt3dadd(-52.99, 196.92, -14.9, 1.41) pt3dadd(-53.88, 196.66, -15.01, 1.41) pt3dadd(-54.07, 196.66, -21.27, 1.41) pt3dadd(-55.1, 196.54, -29.04, 1.41) pt3dadd(-56.57, 197.24, -29.04, 1.41) pt3dadd(-57.91, 197.49, -29.04, 1.41) pt3dadd(-60.08, 197.81, -29.04, 1.41) pt3dadd(-62.32, 198.71, -29.04, 1.41) pt3dadd(-63.98, 199.67, -29.04, 1.41) pt3dadd(-65.77, 200.63, -29.04, 1.41) pt3dadd(-66.67, 201.39, -29.15, 1.41) pt3dadd(-67.31, 201.84, -29.15, 1.41) pt3dadd(-67.95, 202.48, -30.45, 1.41) pt3dadd(-68.14, 202.67, -30.45, 1.41) pt3dadd(-69.1, 203.44, -33.26, 1.41) pt3dadd(-69.68, 204.46, -33.26, 1.41) pt3dadd(-70.19, 205.23, -33.26, 1.41) pt3dadd(-71.4, 205.93, -33.26, 1.41) pt3dadd(-72.74, 206.38, -33.26, 1.41) pt3dadd(-74.09, 206.57, -33.26, 1.41) pt3dadd(-75.11, 206.76, -33.26, 1.41) pt3dadd(-75.56, 207.15, -33.26, 1.41) pt3dadd(-76.01, 208.04, -33.26, 1.41) pt3dadd(-76.45, 208.81, -33.26, 1.41) pt3dadd(-76.64, 209.07, -33.26, 1.41) pt3dadd(-78.83, 209.53, -33.26, 1.41) pt3dadd(-78.77, 209.72, -33.26, 1.41) pt3dadd(-80.43, 210.88, -33.26, 1.41) pt3dadd(-83.05, 211.9, -33.26, 1.41) pt3dadd(-84.39, 212.47, -33.26, 1.41) pt3dadd(-86.38, 213.18, -33.26, 1.41) pt3dadd(-87.4, 214.01, -33.26, 1.41) pt3dadd(-87.98, 214.58, -33.26, 1.41) pt3dadd(-88.74, 215.35, -33.36, 1.41) pt3dadd(-90.34, 216.69, -36.82, 1.21) pt3dadd(-92.39, 218.55, -36.82, 1.21) pt3dadd(-94.24, 218.87, -36.82, 1.21) pt3dadd(-96.93, 219.38, -36.82, 1.21) pt3dadd(-98.59, 220.53, -36.82, 1.21) pt3dadd(-99.55, 221.62, -38.01, 1.21) pt3dadd(-100.89, 222.7, -38.01, 1.21) pt3dadd(-101.79, 223.28, -40.6, 1.21) pt3dadd(-102.68, 224.05, -41.79, 1.21) pt3dadd(-102.81, 224.17, -41.79, 1.21) } apic[22] {pt3dclear() pt3dadd(10.8, 172.24, -14.9, 5.82) pt3dadd(10.75, 173.29, -3.46, 5.82) pt3dadd(11.27, 176.94, -3.46, 5.82) pt3dadd(11.27, 177.32, -3.46, 5.82) pt3dadd(11.33, 178.6, -3.46, 5.82) pt3dadd(11.46, 179.11, -3.46, 5.82) pt3dadd(11.65, 179.81, -3.46, 5.82) pt3dadd(11.65, 184.67, -3.46, 5.82) pt3dadd(12.29, 185.95, -3.46, 5.82) pt3dadd(12.42, 186.46, -3.46, 5.82) pt3dadd(12.42, 193.94, -3.46, 5.82) pt3dadd(12.42, 195.03, -3.46, 5.82) pt3dadd(12.42, 201.1, -3.46, 5.82) pt3dadd(12.07, 203.19, -3.46, 5.63) pt3dadd(12.65, 204.27, -3.46, 5.63) pt3dadd(12.65, 206.96, -3.46, 5.63) pt3dadd(12.58, 207.79, -3.46, 5.63) pt3dadd(12.33, 208.69, -3.46, 5.63) pt3dadd(12.2, 209.77, -3.46, 5.63) pt3dadd(12.2, 212.91, -3.46, 5.43) pt3dadd(12.39, 213.54, -3.46, 5.43) pt3dadd(12.39, 215.59, -3.46, 5.43) pt3dadd(12.39, 215.91, -3.46, 5.43) pt3dadd(12.39, 217.06, -3.35, 5.43) } apic[23] {pt3dclear() pt3dadd(12.39, 217.06, -3.35, 3.07) pt3dadd(13.86, 217.7, -5.72, 3.07) pt3dadd(13.92, 217.96, -5.72, 3.07) pt3dadd(13.99, 218.28, -5.72, 3.07) pt3dadd(13.99, 218.4, -11.34, 3.07) pt3dadd(14.24, 218.6, -12.96, 3.07) pt3dadd(14.56, 218.92, -14.25, 3.07) pt3dadd(14.88, 218.98, -15.55, 3.07) pt3dadd(15.14, 219.04, -15.76, 3.07) pt3dadd(16.8, 219.04, -22.13, 3.07) pt3dadd(16.99, 218.85, -22.13, 3.07) pt3dadd(17.5, 218.53, -22.13, 3.07) pt3dadd(17.63, 218.53, -22.13, 3.07) pt3dadd(17.89, 218.34, -22.13, 3.07) pt3dadd(18.21, 218.08, -22.35, 3.07) pt3dadd(19.1, 217.19, -22.89, 3.07) pt3dadd(19.55, 216.55, -23.65, 3.07) pt3dadd(19.87, 216.29, -24.19, 3.07) pt3dadd(20.19, 215.97, -24.62, 3.07) pt3dadd(20.32, 215.97, -25.05, 3.07) pt3dadd(20.32, 215.91, -25.05, 3.07) pt3dadd(20.51, 215.78, -25.05, 3.07) pt3dadd(20.89, 215.78, -25.05, 3.07) } apic[24] {pt3dclear() pt3dadd(20.89, 215.78, -25.05, 1.79) pt3dadd(22.24, 214.95, -25.05, 1.79) pt3dadd(22.94, 214.38, -25.05, 1.79) pt3dadd(23.52, 214.06, -25.05, 1.79) pt3dadd(24.35, 213.54, -25.05, 1.79) pt3dadd(25.31, 213.35, -25.05, 1.79) pt3dadd(26.97, 213.35, -28.5, 1.79) pt3dadd(27.42, 213.48, -28.5, 1.79) pt3dadd(28.69, 213.48, -32.39, 1.79) pt3dadd(28.89, 213.35, -32.39, 1.79) pt3dadd(29.01, 213.29, -32.39, 1.79) pt3dadd(29.4, 212.84, -32.39, 1.79) pt3dadd(29.65, 212.71, -32.39, 1.79) pt3dadd(30.23, 212.52, -32.5, 1.79) pt3dadd(30.8, 212.52, -32.93, 1.79) pt3dadd(31, 212.71, -34.44, 1.79) pt3dadd(31, 213.48, -36.71, 1.79) pt3dadd(30.93, 213.61, -36.71, 1.79) pt3dadd(30.87, 213.67, -37.25, 1.79) pt3dadd(30.8, 213.8, -38.33, 1.79) pt3dadd(30.74, 213.99, -38.87, 1.79) pt3dadd(30.68, 214.12, -38.98, 1.79) pt3dadd(30.68, 214.25, -38.98, 1.79) pt3dadd(30.55, 214.38, -38.98, 1.79) pt3dadd(30.42, 214.57, -38.98, 1.79) pt3dadd(30.29, 214.89, -38.98, 1.79) pt3dadd(30.04, 215.14, -38.98, 1.79) pt3dadd(29.78, 215.65, -38.98, 1.79) pt3dadd(29.53, 216.42, -38.98, 1.79) pt3dadd(29.53, 217, -38.98, 1.79) pt3dadd(29.59, 217.51, -38.98, 1.79) pt3dadd(29.91, 217.83, -39.3, 1.79) pt3dadd(30.55, 218.21, -39.3, 1.79) pt3dadd(30.93, 218.53, -39.3, 1.79) pt3dadd(31.12, 218.72, -39.3, 1.79) pt3dadd(31.19, 218.85, -40.6, 1.79) pt3dadd(31.51, 219.11, -40.6, 1.79) pt3dadd(31.96, 219.43, -40.6, 1.79) pt3dadd(32.21, 219.75, -40.6, 1.79) pt3dadd(32.34, 220, -40.6, 1.79) pt3dadd(32.34, 221.03, -41.57, 1.79) pt3dadd(31.76, 221.6, -41.57, 1.79) pt3dadd(29.97, 221.6, -42.76, 1.79) pt3dadd(29.53, 221.79, -44.38, 1.79) } } proc shape3d_33() { apic[24] { pt3dadd(29.27, 222.11, -44.48, 1.79) pt3dadd(29.21, 222.24, -44.48, 1.79) pt3dadd(29.21, 223.39, -44.48, 1.79) pt3dadd(29.59, 224.22, -44.48, 1.79) pt3dadd(30.1, 224.8, -44.48, 1.79) pt3dadd(30.61, 225.12, -44.48, 1.79) pt3dadd(31.06, 225.5, -44.81, 1.79) pt3dadd(32.08, 226.01, -45.89, 1.79) pt3dadd(32.72, 226.4, -46.75, 1.79) pt3dadd(33.43, 226.4, -47.18, 1.79) pt3dadd(33.94, 226.65, -47.18, 1.79) pt3dadd(34.32, 226.97, -47.51, 1.79) pt3dadd(34.77, 227.36, -47.51, 1.79) pt3dadd(35.28, 227.61, -47.51, 1.79) pt3dadd(36.05, 227.74, -47.51, 1.79) pt3dadd(37.01, 227.61, -47.51, 1.79) pt3dadd(37.71, 227.29, -47.51, 1.79) pt3dadd(37.97, 227.1, -47.94, 1.79) pt3dadd(38.16, 226.97, -47.94, 1.79) pt3dadd(38.41, 226.78, -47.94, 1.79) pt3dadd(38.54, 226.65, -49.67, 1.79) pt3dadd(38.54, 226.52, -49.67, 1.79) } apic[25] {pt3dclear() pt3dadd(20.89, 215.78, -25.05, 1.79) pt3dadd(21.92, 216.1, -16.52, 1.79) pt3dadd(23.07, 216.1, -16.52, 1.79) pt3dadd(23.77, 216.29, -16.52, 1.79) pt3dadd(25.05, 216.61, -16.52, 1.79) pt3dadd(26.26, 216.68, -16.52, 1.79) pt3dadd(27.42, 216.81, -16.52, 1.79) pt3dadd(27.99, 216.93, -16.52, 1.79) pt3dadd(28.69, 217.19, -16.52, 1.79) pt3dadd(29.21, 217.32, -16.52, 1.79) pt3dadd(29.65, 217.38, -16.52, 1.79) pt3dadd(29.91, 217.44, -16.52, 1.79) pt3dadd(30.16, 217.51, -16.52, 1.79) pt3dadd(30.61, 217.57, -16.52, 1.79) pt3dadd(30.87, 217.76, -16.52, 1.79) pt3dadd(31.44, 218.08, -16.63, 1.79) pt3dadd(31.76, 218.6, -16.63, 1.79) pt3dadd(31.96, 219.04, -16.63, 1.79) pt3dadd(32.02, 219.55, -17.17, 1.79) pt3dadd(32.02, 220.07, -17.17, 1.79) pt3dadd(31.64, 220.77, -17.6, 1.79) pt3dadd(31.32, 221.35, -17.6, 1.79) pt3dadd(30.93, 221.86, -18.03, 1.79) pt3dadd(30.36, 222.37, -18.03, 1.79) pt3dadd(29.97, 222.75, -19.11, 1.79) pt3dadd(29.53, 223.07, -19.54, 1.79) pt3dadd(29.08, 223.33, -20.19, 1.79) pt3dadd(28.5, 223.9, -21.05, 1.79) pt3dadd(28.05, 224.29, -21.05, 1.79) pt3dadd(27.67, 224.86, -21.05, 1.79) pt3dadd(27.48, 225.12, -22.35, 1.79) pt3dadd(27.48, 225.18, -22.35, 1.79) pt3dadd(27.48, 225.18, -32.72, 1.79) pt3dadd(27.48, 225.44, -32.72, 1.79) pt3dadd(27.22, 226.46, -32.72, 1.79) pt3dadd(27.16, 227.29, -32.72, 1.79) pt3dadd(27.16, 228.7, -32.72, 1.79) pt3dadd(27.35, 229.02, -32.72, 1.79) pt3dadd(27.54, 229.34, -32.72, 1.79) pt3dadd(27.54, 229.4, -32.72, 1.79) } apic[26] {pt3dclear() pt3dadd(27.54, 229.4, -32.72, 1.28) pt3dadd(28.85, 230.22, -32.72, 1.28) pt3dadd(29.1, 230.34, -32.72, 1.28) pt3dadd(30.13, 230.79, -32.72, 1.28) pt3dadd(31.09, 230.86, -32.72, 1.28) pt3dadd(32.3, 230.98, -32.72, 1.28) pt3dadd(33.26, 231.75, -32.72, 1.28) pt3dadd(34.6, 232.52, -32.72, 1.28) pt3dadd(34.99, 232.97, -32.72, 1.28) pt3dadd(34.99, 234.24, -38.65, 1.28) pt3dadd(35.11, 234.63, -38.65, 1.28) pt3dadd(35.56, 235.46, -38.65, 1.28) pt3dadd(36.14, 235.84, -38.65, 1.28) pt3dadd(36.71, 236.03, -38.65, 1.28) pt3dadd(37.22, 236.35, -38.65, 1.28) pt3dadd(37.74, 236.67, -38.65, 1.28) pt3dadd(37.93, 236.74, -38.65, 1.28) pt3dadd(38.06, 236.74, -38.65, 1.28) } apic[27] {pt3dclear() pt3dadd(27.54, 229.4, -32.72, 1.28) pt3dadd(27.06, 230.02, -27.86, 1.28) pt3dadd(26.74, 230.54, -27.64, 1.28) pt3dadd(26.48, 231.11, -27.64, 1.28) pt3dadd(26.61, 231.94, -27.64, 1.28) pt3dadd(27.51, 232.9, -27.64, 1.28) pt3dadd(28.34, 233.16, -27.64, 1.28) pt3dadd(29.04, 233.09, -27.64, 1.28) pt3dadd(29.74, 233.03, -27.43, 1.28) pt3dadd(30.38, 233.29, -27.32, 1.28) pt3dadd(31.02, 233.8, -27.32, 1.28) pt3dadd(31.28, 234.31, -27.32, 1.28) pt3dadd(30.83, 235.2, -27.32, 1.28) pt3dadd(30.26, 236.16, -27.21, 1.28) pt3dadd(29.81, 236.99, -27.21, 1.28) pt3dadd(29.49, 237.44, -27.1, 1.28) pt3dadd(29.23, 238.14, -27.1, 1.28) pt3dadd(29.23, 238.98, -27.1, 1.28) pt3dadd(29.74, 239.68, -27.1, 1.28) pt3dadd(30.83, 240.38, -26.99, 1.28) pt3dadd(31.85, 240.77, -26.99, 1.28) pt3dadd(32.56, 240.89, -26.78, 1.28) pt3dadd(33.07, 241.02, -26.78, 1.28) pt3dadd(33.32, 241.09, -26.67, 1.28) pt3dadd(33.52, 241.15, -26.67, 1.28) pt3dadd(33.58, 241.21, -26.56, 1.28) pt3dadd(35.11, 242.3, -26.45, 1.28) pt3dadd(35.31, 242.56, -26.45, 1.28) pt3dadd(35.82, 242.94, -26.45, 1.28) pt3dadd(36.2, 243.39, -26.45, 1.28) pt3dadd(36.39, 243.58, -26.45, 1.28) } apic[28] {pt3dclear() pt3dadd(12.39, 217.06, -3.35, 5.37) pt3dadd(12.42, 217.56, -15.87, 5.37) pt3dadd(12.42, 218.13, -15.87, 5.37) pt3dadd(12.86, 219.03, -15.87, 5.37) pt3dadd(12.93, 219.6, -15.87, 5.37) pt3dadd(12.93, 222.1, -15.87, 5.37) pt3dadd(13.12, 222.93, -15.87, 5.37) pt3dadd(13.38, 223.82, -15.87, 5.37) pt3dadd(13.63, 224.85, -15.87, 5.37) pt3dadd(13.95, 225.8, -15.87, 5.37) pt3dadd(14.14, 226.7, -15.87, 5.37) pt3dadd(14.53, 227.98, -15.87, 5.37) pt3dadd(14.85, 228.81, -15.87, 5.37) pt3dadd(14.85, 229, -15.87, 5.37) pt3dadd(15.23, 231.3, -15.87, 5.37) pt3dadd(15.36, 232.39, -15.87, 5.37) pt3dadd(15.55, 233.09, -15.87, 5.37) pt3dadd(15.74, 233.99, -15.87, 5.37) pt3dadd(15.81, 234.88, -15.87, 5.37) pt3dadd(15.87, 235.91, -15.87, 5.37) pt3dadd(16.06, 236.8, -15.87, 5.37) pt3dadd(16.19, 237.95, -15.87, 5.37) pt3dadd(16.38, 238.91, -15.87, 5.37) pt3dadd(16.7, 240.06, -15.87, 5.37) pt3dadd(17.02, 240.83, -15.87, 5.37) pt3dadd(17.28, 241.47, -15.87, 5.37) pt3dadd(17.08, 242.62, -15.87, 5.37) pt3dadd(17.34, 243.71, -15.87, 5.37) pt3dadd(17.4, 244.86, -15.87, 5.37) pt3dadd(17.4, 247.86, -15.87, 5.37) pt3dadd(17.6, 248.82, -15.87, 5.37) pt3dadd(17.98, 249.85, -15.87, 5.37) pt3dadd(18.43, 250.74, -15.87, 5.37) pt3dadd(18.55, 251.38, -15.87, 5.37) pt3dadd(18.55, 252.27, -15.87, 5.37) pt3dadd(18.49, 252.47, -15.87, 5.37) pt3dadd(18.36, 252.66, -15.87, 5.37) } apic[29] {pt3dclear() pt3dadd(18.36, 252.66, -15.87, 2.88) pt3dadd(19.77, 252.4, -19.87, 2.88) pt3dadd(20.47, 252.27, -19.87, 2.88) pt3dadd(20.98, 252.02, -19.87, 2.88) pt3dadd(21.56, 251.51, -19.87, 2.88) pt3dadd(21.75, 251.25, -19.87, 2.88) pt3dadd(21.82, 251.12, -19.87, 2.88) pt3dadd(22.26, 250.36, -19.87, 2.75) pt3dadd(22.71, 249.14, -19.87, 2.62) pt3dadd(23.29, 248.18, -19.87, 2.62) pt3dadd(23.61, 247.35, -19.87, 2.62) pt3dadd(23.73, 246.71, -19.87, 2.62) pt3dadd(24.12, 245.94, -19.87, 2.62) pt3dadd(24.5, 245.05, -19.87, 2.62) pt3dadd(24.63, 244.41, -19.87, 2.62) pt3dadd(24.63, 241.85, -19.87, 2.56) pt3dadd(24.88, 240.89, -19.87, 2.49) pt3dadd(25.33, 239.74, -19.87, 2.37) pt3dadd(25.78, 238.78, -19.87, 2.37) pt3dadd(26.23, 237.82, -19.87, 2.37) pt3dadd(26.42, 237.19, -19.87, 2.37) pt3dadd(26.42, 235.33, -19.87, 2.37) pt3dadd(26.74, 233.8, -19.87, 2.37) pt3dadd(27.19, 232.71, -19.87, 2.37) pt3dadd(27.76, 231.75, -19.87, 2.37) pt3dadd(28.47, 230.73, -19.87, 2.37) pt3dadd(28.91, 230.09, -19.87, 2.37) pt3dadd(29.3, 229.39, -19.87, 2.37) pt3dadd(29.81, 228.62, -19.87, 2.37) pt3dadd(30.38, 227.66, -19.87, 2.37) pt3dadd(30.96, 226.64, -19.87, 2.37) pt3dadd(31.66, 225.1, -19.87, 2.37) pt3dadd(32.17, 224.01, -19.87, 2.37) pt3dadd(32.49, 223.12, -19.87, 2.37) pt3dadd(32.94, 221.97, -19.87, 2.37) pt3dadd(33.84, 220.05, -19.87, 2.37) pt3dadd(34.28, 218.84, -19.87, 2.3) pt3dadd(34.86, 217.3, -19.87, 2.24) pt3dadd(35.63, 215.51, -19.87, 2.17) pt3dadd(36.46, 213.91, -19.87, 2.17) pt3dadd(37.35, 212.31, -19.87, 2.17) pt3dadd(37.93, 210.97, -19.87, 2.17) pt3dadd(38.18, 210.14, -19.87, 2.17) pt3dadd(38.25, 209.63, -19.87, 2.17) pt3dadd(38.25, 208.73, -19.87, 2.17) pt3dadd(38.5, 207.65, -19.87, 2.17) pt3dadd(38.82, 206.75, -19.87, 2.17) pt3dadd(38.95, 206.18, -19.87, 2.17) pt3dadd(39.27, 205.34, -19.87, 2.17) pt3dadd(39.4, 205.03, -19.87, 2.17) pt3dadd(39.59, 204.39, -19.87, 2.17) pt3dadd(40.04, 203.43, -19.87, 2.17) } } proc shape3d_34() { apic[29] { pt3dadd(40.42, 202.4, -19.87, 2.17) pt3dadd(40.87, 201.57, -19.87, 2.17) pt3dadd(41.19, 201.06, -19.87, 2.17) pt3dadd(41.64, 200.55, -19.87, 2.17) pt3dadd(42.21, 199.85, -19.87, 2.17) pt3dadd(42.32, 198.86, -19.87, 1.92) pt3dadd(43.02, 198.54, -19.87, 1.92) pt3dadd(43.79, 197.46, -19.87, 1.92) pt3dadd(44.62, 196.3, -19.87, 1.92) pt3dadd(45.58, 195.03, -19.87, 1.92) pt3dadd(46.92, 193.11, -19.87, 1.92) pt3dadd(48.14, 191.7, -19.87, 1.92) pt3dadd(49.29, 190.55, -19.87, 1.92) pt3dadd(49.99, 189.59, -19.87, 1.92) pt3dadd(50.89, 188.38, -19.87, 1.85) pt3dadd(51.46, 187.1, -19.87, 1.73) pt3dadd(52.04, 185.69, -19.87, 1.66) pt3dadd(52.74, 184.73, -19.87, 1.66) pt3dadd(53.76, 183.71, -19.87, 1.66) pt3dadd(54.34, 183.07, -19.87, 1.66) pt3dadd(54.98, 182.05, -19.87, 1.66) pt3dadd(55.81, 180.64, -19.87, 1.66) pt3dadd(56.58, 179.49, -19.87, 1.66) pt3dadd(57.22, 178.53, -19.87, 1.66) pt3dadd(57.6, 177.89, -19.87, 1.66) pt3dadd(57.98, 177.25, -19.87, 1.66) pt3dadd(58.24, 176.93, -19.87, 1.6) pt3dadd(59.13, 175.78, -19.87, 1.53) pt3dadd(59.96, 174.89, -19.87, 1.53) pt3dadd(61.18, 173.73, -19.87, 1.53) pt3dadd(61.95, 172.84, -19.87, 1.53) pt3dadd(62.84, 171.24, -19.87, 1.53) pt3dadd(63.67, 170.09, -19.87, 1.53) pt3dadd(64.31, 169.51, -19.87, 1.53) pt3dadd(65.21, 169.07, -19.87, 1.53) pt3dadd(65.91, 169, -19.87, 1.53) pt3dadd(65.98, 169, -19.87, 1.53) pt3dadd(68.32, 168.67, -19.87, 1.34) pt3dadd(68.89, 168.47, -19.65, 1.34) pt3dadd(69.98, 168.15, -19, 1.34) pt3dadd(71.39, 168.15, -17.38, 1.34) } apic[30] {pt3dclear() pt3dadd(18.36, 252.66, -15.87, 5.82) pt3dadd(18.24, 252.48, -15.76, 5.82) pt3dadd(18.11, 252.8, -15.76, 5.82) pt3dadd(17.47, 253.76, -15.76, 5.82) pt3dadd(17.35, 254.27, -15.76, 5.82) pt3dadd(17.22, 254.84, -15.76, 5.82) pt3dadd(17.03, 255.55, -15.76, 5.82) pt3dadd(17.03, 259.45, -15.76, 5.82) pt3dadd(17.09, 261.43, -15.76, 5.82) pt3dadd(17.09, 270.64, -15.76, 5.82) pt3dadd(17.16, 272.68, -15.76, 5.82) pt3dadd(17.16, 274.47, -15.76, 5.82) pt3dadd(17.41, 275.69, -15.76, 5.82) pt3dadd(17.47, 276.77, -15.76, 5.82) pt3dadd(17.47, 279.2, -15.76, 5.82) pt3dadd(17.73, 280.03, -15.76, 5.82) pt3dadd(17.86, 280.55, -15.76, 5.82) pt3dadd(17.86, 281.12, -15.76, 5.82) } apic[31] {pt3dclear() pt3dadd(17.86, 281.12, -15.76, 2.37) pt3dadd(17.02, 280.76, -15.76, 2.37) pt3dadd(16.7, 280.95, -15.76, 2.37) pt3dadd(16.26, 281.2, -15.76, 2.37) pt3dadd(15.81, 281.27, -15.76, 2.37) pt3dadd(14.98, 281.27, -15.76, 2.37) pt3dadd(14.34, 281.46, -15.76, 2.37) pt3dadd(13.95, 281.84, -15.76, 2.37) pt3dadd(13.44, 282.23, -15.76, 2.37) pt3dadd(13.19, 282.29, -15.76, 2.3) pt3dadd(11.84, 282.29, -15.76, 2.17) pt3dadd(11.08, 282.42, -15.76, 2.17) pt3dadd(7.69, 282.42, -15.76, 2.17) pt3dadd(7.18, 282.29, -15.76, 2.17) pt3dadd(6.47, 281.97, -15.76, 2.17) pt3dadd(5.83, 281.72, -15.76, 2.17) pt3dadd(5.51, 281.46, -15.76, 2.05) pt3dadd(5.13, 281.01, -15.76, 1.98) pt3dadd(4.49, 280.12, -15.76, 1.98) pt3dadd(3.28, 279.03, -15.76, 1.98) pt3dadd(2.12, 278.01, -15.76, 1.98) pt3dadd(1.23, 277.11, -15.76, 1.98) pt3dadd(0.21, 276.73, -15.76, 1.98) pt3dadd(-0.82, 276.47, -15.76, 1.98) pt3dadd(-1.58, 276.03, -15.76, 1.98) pt3dadd(-2.16, 275.71, -15.76, 1.98) pt3dadd(-2.99, 275.45, -15.12, 1.98) pt3dadd(-3.31, 275.45, -25.91, 1.98) pt3dadd(-3.69, 275.26, -25.91, 1.98) pt3dadd(-4.52, 275.07, -25.91, 1.98) pt3dadd(-5.16, 275.32, -25.91, 1.98) pt3dadd(-6.89, 276.28, -25.91, 1.98) pt3dadd(-7.4, 276.73, -26.35, 1.98) pt3dadd(-9.26, 277.43, -27.53, 1.98) pt3dadd(-10.28, 278.01, -27.53, 1.98) pt3dadd(-10.98, 278.65, -28.29, 1.98) pt3dadd(-11.37, 278.97, -28.29, 1.98) pt3dadd(-11.81, 279.29, -29.91, 1.98) pt3dadd(-12.26, 279.61, -30.77, 1.98) pt3dadd(-12.65, 279.93, -30.77, 1.98) pt3dadd(-13.28, 279.93, -30.77, 1.98) pt3dadd(-14.44, 279.35, -30.77, 1.98) pt3dadd(-14.63, 279.35, -30.77, 1.98) pt3dadd(-15.84, 278.46, -30.77, 1.98) pt3dadd(-16.42, 278.07, -30.77, 1.98) pt3dadd(-17.31, 277.5, -30.99, 1.98) pt3dadd(-18.27, 277.18, -30.99, 1.98) pt3dadd(-18.85, 276.99, -31.31, 1.98) pt3dadd(-20.32, 276.99, -31.85, 1.98) pt3dadd(-21.09, 277.37, -31.85, 1.98) pt3dadd(-21.98, 278.33, -31.85, 1.98) pt3dadd(-22.49, 278.65, -32.07, 1.98) pt3dadd(-22.94, 278.9, -32.61, 1.98) pt3dadd(-23.58, 279.03, -33.04, 1.98) pt3dadd(-24.22, 279.03, -33.04, 1.98) pt3dadd(-24.92, 278.97, -33.04, 1.98) pt3dadd(-24.99, 278.97, -33.04, 1.98) pt3dadd(-25.83, 278.73, -33.26, 1.66) pt3dadd(-27.42, 277.77, -33.26, 1.66) pt3dadd(-28.45, 277.19, -33.26, 1.66) pt3dadd(-29.28, 276.68, -33.26, 1.66) pt3dadd(-30.68, 276.04, -33.26, 1.66) pt3dadd(-31.07, 275.47, -33.26, 1.66) pt3dadd(-31.39, 275.02, -33.26, 1.66) pt3dadd(-31.96, 273.81, -33.26, 1.66) pt3dadd(-32.54, 273.29, -33.26, 1.66) pt3dadd(-33.31, 272.98, -33.26, 1.66) pt3dadd(-35.22, 272.98, -33.26, 1.66) pt3dadd(-36.44, 273.1, -33.26, 1.66) pt3dadd(-39.51, 273.1, -33.26, 1.53) pt3dadd(-40.28, 272.91, -33.26, 1.47) pt3dadd(-40.72, 272.72, -33.26, 1.47) pt3dadd(-41.43, 272.53, -33.26, 1.41) pt3dadd(-42.45, 272.27, -33.26, 1.41) pt3dadd(-42.9, 272.21, -33.26, 1.41) pt3dadd(-43.28, 272.21, -33.26, 1.41) pt3dadd(-43.6, 272.08, -33.26, 1.41) pt3dadd(-44.11, 271.5, -33.26, 1.34) pt3dadd(-44.69, 270.93, -33.26, 1.21) pt3dadd(-45.52, 270.55, -33.26, 1.15) pt3dadd(-46.67, 270.29, -33.26, 1.15) pt3dadd(-48.4, 270.16, -33.26, 1.15) pt3dadd(-49.67, 270.03, -33.26, 1.15) pt3dadd(-51.66, 269.71, -33.26, 1.15) pt3dadd(-53, 269.39, -33.26, 1.15) pt3dadd(-54.21, 269.14, -33.26, 1.15) pt3dadd(-54.85, 268.76, -33.26, 1.15) pt3dadd(-56.2, 268.18, -33.26, 0.9) pt3dadd(-56.96, 267.73, -33.26, 0.9) pt3dadd(-58.24, 267.16, -33.26, 0.9) pt3dadd(-59.39, 267.03, -33.26, 0.9) pt3dadd(-60.48, 267.03, -33.26, 0.9) pt3dadd(-61.76, 266.77, -33.26, 0.9) pt3dadd(-62.97, 266.45, -33.26, 0.9) pt3dadd(-63.8, 266.33, -33.26, 0.9) pt3dadd(-64.19, 266.2, -33.26, 0.77) pt3dadd(-64.57, 265.75, -33.26, 0.64) pt3dadd(-65.15, 265.17, -33.26, 0.64) pt3dadd(-65.53, 264.98, -33.26, 0.64) pt3dadd(-65.85, 264.92, -33.26, 0.64) pt3dadd(-66.17, 264.86, -33.26, 0.64) pt3dadd(-66.36, 264.86, -33.26, 0.64) pt3dadd(-67.25, 263.99, -33.26, 0.64) pt3dadd(-67.96, 263.8, -33.26, 0.64) pt3dadd(-69.04, 263.48, -33.26, 0.64) pt3dadd(-70.39, 262.9, -33.26, 0.64) pt3dadd(-71.86, 262.07, -33.26, 0.64) pt3dadd(-73.58, 261.11, -33.26, 0.64) pt3dadd(-75.76, 260.67, -33.26, 0.64) pt3dadd(-77.16, 260.47, -33.26, 0.64) pt3dadd(-78.76, 259.71, -33.26, 0.64) pt3dadd(-79.53, 259.26, -33.26, 0.64) pt3dadd(-80.49, 258.81, -33.26, 0.64) pt3dadd(-81.32, 258.17, -33.26, 0.64) pt3dadd(-82.09, 257.34, -33.26, 0.64) pt3dadd(-83.11, 256.57, -33.26, 0.64) pt3dadd(-84.39, 255.74, -33.26, 0.64) pt3dadd(-86.5, 254.14, -33.26, 0.64) pt3dadd(-87.46, 252.93, -33.26, 0.64) pt3dadd(-88.42, 251.39, -33.26, 0.64) pt3dadd(-89.25, 250.18, -33.26, 0.64) pt3dadd(-89.89, 249.28, -33.26, 0.64) pt3dadd(-90.21, 248.71, -33.26, 0.64) pt3dadd(-90.72, 247.88, -33.26, 0.64) pt3dadd(-91.93, 246.28, -33.26, 0.64) pt3dadd(-92.89, 244.87, -33.26, 0.64) pt3dadd(-93.47, 243.27, -33.26, 0.64) pt3dadd(-94.04, 241.29, -33.26, 0.64) pt3dadd(-94.75, 239.57, -33.26, 0.64) pt3dadd(-95.51, 238.22, -33.26, 0.64) pt3dadd(-96.22, 237.26, -33.26, 0.64) pt3dadd(-96.73, 236.5, -33.26, 0.64) pt3dadd(-97.69, 235.47, -33.26, 0.64) pt3dadd(-98.71, 234.45, -33.26, 0.64) pt3dadd(-99.61, 233.56, -33.26, 0.64) pt3dadd(-100.18, 233.04, -33.26, 0.64) pt3dadd(-100.25, 233.04, -33.26, 0.64) } apic[32] {pt3dclear() pt3dadd(17.86, 281.12, -15.76, 6.27) pt3dadd(18.27, 281.52, -10.37, 6.27) pt3dadd(18.27, 283.12, -10.37, 6.27) pt3dadd(18.59, 284.34, -10.37, 6.27) } } proc shape3d_35() { apic[32] { pt3dadd(18.66, 284.72, -10.37, 6.27) pt3dadd(18.78, 285.11, -10.37, 6.27) pt3dadd(18.78, 286.32, -10.37, 6.27) pt3dadd(18.85, 286.83, -10.37, 6.27) pt3dadd(18.91, 287.34, -10.37, 6.27) pt3dadd(19.17, 288.05, -10.37, 6.27) pt3dadd(19.49, 288.75, -10.37, 6.27) pt3dadd(19.49, 289.39, -10.37, 6.27) pt3dadd(19.55, 289.84, -10.37, 6.27) pt3dadd(19.68, 290.35, -10.37, 6.27) pt3dadd(19.68, 290.92, -10.37, 6.27) pt3dadd(19.81, 291.63, -10.37, 6.27) pt3dadd(19.87, 292.59, -10.37, 6.27) pt3dadd(19.87, 297.64, -10.37, 6.27) pt3dadd(20.19, 298.53, -10.37, 6.27) pt3dadd(20.51, 299.55, -10.37, 6.27) pt3dadd(20.7, 300.45, -10.37, 6.27) pt3dadd(20.77, 301.28, -10.37, 6.27) pt3dadd(20.77, 309.85, -10.37, 6.27) pt3dadd(20.95, 312.87, -10.37, 6.27) pt3dadd(20.95, 316.65, -10.37, 6.27) pt3dadd(20.88, 317.92, -10.37, 6.27) pt3dadd(20.82, 319.27, -10.37, 6.27) pt3dadd(20.75, 320.61, -10.37, 6.27) pt3dadd(20.63, 321.76, -10.37, 6.27) pt3dadd(20.56, 322.78, -10.37, 6.27) pt3dadd(20.5, 324, -10.37, 6.27) pt3dadd(20.56, 325.98, -10.37, 6.27) pt3dadd(20.69, 327.64, -10.37, 6.27) pt3dadd(20.69, 330.14, -10.37, 6.27) pt3dadd(20.43, 331.67, -10.37, 6.27) pt3dadd(20.37, 332.95, -10.37, 6.27) pt3dadd(20.31, 334.23, -10.37, 6.27) pt3dadd(20.05, 336.66, -10.37, 6.27) pt3dadd(20.05, 338.13, -10.37, 6.27) pt3dadd(20.15, 344.34, -10.37, 6.27) pt3dadd(20.15, 345.17, -10.37, 6.27) pt3dadd(19.89, 346.52, -10.37, 6.27) pt3dadd(19.76, 347.99, -10.37, 6.27) pt3dadd(19.63, 349.46, -10.37, 6.27) pt3dadd(19.57, 350.74, -10.37, 6.27) pt3dadd(19.51, 351.82, -10.37, 6.27) pt3dadd(19.51, 355.4, -10.37, 6.27) pt3dadd(19.89, 356.87, -10.37, 6.27) pt3dadd(20.02, 357.64, -10.37, 6.27) pt3dadd(20.15, 358.15, -10.37, 6.27) pt3dadd(20.47, 359.75, -10.37, 6.07) pt3dadd(20.66, 360.39, -10.37, 6.07) pt3dadd(21.04, 361.41, -10.37, 6.07) pt3dadd(21.3, 362.57, -10.37, 6.07) pt3dadd(21.68, 363.52, -10.37, 6.07) pt3dadd(22.38, 364.74, -10.37, 6.07) pt3dadd(22.7, 365.44, -10.37, 6.07) pt3dadd(22.77, 365.44, -10.37, 6.07) pt3dadd(23.2, 370.04, -10.37, 5.82) pt3dadd(23.9, 371.39, -10.37, 5.82) pt3dadd(24.35, 372.6, -10.37, 5.82) pt3dadd(24.54, 374.01, -10.37, 5.82) pt3dadd(24.54, 376.25, -10.37, 5.82) pt3dadd(24.35, 378.48, -10.37, 5.82) pt3dadd(24.29, 379.95, -10.37, 5.82) pt3dadd(24.29, 381.74, -10.37, 5.82) pt3dadd(24.22, 385.2, -10.37, 5.56) pt3dadd(24.22, 387.18, -10.37, 5.56) pt3dadd(24.16, 388.65, -10.37, 5.56) pt3dadd(24.16, 395.04, -10.37, 5.56) pt3dadd(24.22, 395.75, -10.37, 5.56) pt3dadd(24.22, 395.81, -10.37, 5.56) pt3dadd(24.42, 402.36, -10.37, 5.56) pt3dadd(23.2, 411.95, -10.37, 5.56) pt3dadd(23.2, 413.1, -10.37, 5.56) pt3dadd(23.07, 414.06, -10.37, 5.56) pt3dadd(23.01, 415.09, -10.37, 5.56) } apic[33] {pt3dclear() pt3dadd(23.01, 415.09, -10.37, 1.09) pt3dadd(22.11, 415.52, -21.59, 1.09) pt3dadd(21.28, 416.61, -21.59, 1.09) pt3dadd(20.96, 417.31, -21.59, 1.09) pt3dadd(20.38, 418.01, -21.59, 1.09) pt3dadd(20.19, 418.72, -21.59, 1.09) pt3dadd(20.19, 420.44, -21.59, 1.09) pt3dadd(19.87, 421.08, -21.59, 1.09) pt3dadd(19.43, 421.85, -21.59, 1.09) pt3dadd(18.98, 422.42, -21.59, 1.09) pt3dadd(18.53, 423, -21.59, 1.09) pt3dadd(18.02, 423.77, -21.59, 1.09) pt3dadd(17.51, 424.41, -21.59, 1.09) pt3dadd(17.25, 424.98, -21.59, 1.09) pt3dadd(17.25, 426.64, -21.59, 1.09) pt3dadd(17.51, 427.8, -21.59, 1.09) pt3dadd(17.57, 428.82, -21.59, 1.09) pt3dadd(17.89, 429.52, -21.16, 1.09) pt3dadd(17.95, 429.84, -35.96, 1.09) pt3dadd(18.47, 430.61, -35.96, 1.09) pt3dadd(19.11, 431.5, -35.96, 1.09) pt3dadd(19.36, 432.14, -35.96, 1.09) pt3dadd(19.43, 432.78, -35.96, 1.09) pt3dadd(19.43, 434.38, -35.96, 1.09) pt3dadd(19.3, 435.15, -35.96, 1.09) pt3dadd(19.11, 436.11, -35.96, 1.09) pt3dadd(19.11, 436.55, -35.96, 1.09) pt3dadd(19.04, 437.32, -35.96, 1.09) pt3dadd(18.91, 438.22, -35.96, 1.09) pt3dadd(18.72, 438.92, -35.96, 1.09) pt3dadd(18.47, 439.37, -35.96, 1.09) pt3dadd(18.02, 440.07, -35.96, 1.09) pt3dadd(17.64, 440.84, -35.96, 1.09) pt3dadd(17.25, 441.61, -35.96, 1.09) pt3dadd(17.19, 441.73, -35.96, 1.09) pt3dadd(17.06, 443.08, -35.96, 1.09) pt3dadd(17, 444.93, -35.96, 1.09) pt3dadd(17, 447.49, -35.96, 1.09) pt3dadd(17.25, 448.26, -35.96, 1.09) pt3dadd(17.57, 449.21, -35.96, 1.09) pt3dadd(17.64, 450.3, -35.96, 1.09) pt3dadd(17.64, 452.41, -35.96, 1.09) pt3dadd(17.51, 453.43, -35.96, 1.09) pt3dadd(17.32, 454.2, -35.96, 1.09) pt3dadd(17.19, 454.58, -35.96, 1.09) pt3dadd(17.06, 454.84, -35.96, 1.09) pt3dadd(16.24, 456.53, -35.96, 1.09) pt3dadd(16.24, 457.11, -35.96, 1.09) pt3dadd(15.79, 458.96, -35.96, 1.09) pt3dadd(15.47, 459.66, -35.96, 1.09) pt3dadd(15.15, 460.05, -35.96, 1.09) pt3dadd(14.83, 460.56, -35.96, 1.09) pt3dadd(14.77, 460.69, -35.96, 1.09) } apic[34] {pt3dclear() pt3dadd(23.01, 415.09, -10.37, 5.88) pt3dadd(22.95, 415.94, -10.37, 5.88) pt3dadd(22.95, 416.7, -10.37, 5.88) pt3dadd(22.89, 417.21, -10.37, 5.88) pt3dadd(22.83, 418.11, -10.37, 5.88) pt3dadd(22.7, 419.45, -10.37, 5.88) pt3dadd(22.63, 420.67, -10.37, 5.88) pt3dadd(22.51, 421.75, -10.37, 5.88) pt3dadd(22.51, 423.54, -10.37, 5.88) pt3dadd(22.95, 425.4, -10.37, 5.88) pt3dadd(23.4, 426.61, -10.37, 5.88) pt3dadd(24.04, 430.07, -10.37, 5.88) pt3dadd(24.04, 436.33, -10.37, 5.88) pt3dadd(24.23, 437.61, -10.37, 5.88) pt3dadd(24.55, 439.15, -10.37, 5.88) pt3dadd(25.06, 440.62, -10.37, 5.88) pt3dadd(25.38, 441.7, -10.37, 5.88) pt3dadd(25.38, 442.53, -10.37, 5.88) pt3dadd(25.58, 443.05, -10.37, 5.88) pt3dadd(25.64, 443.62, -10.37, 5.88) pt3dadd(25.7, 444, -10.37, 5.88) pt3dadd(25.77, 444.32, -10.37, 5.88) pt3dadd(25.83, 444.58, -10.37, 5.88) pt3dadd(26.94, 449.14, -10.37, 5.88) pt3dadd(27.07, 450.87, -10.37, 5.88) pt3dadd(27.13, 452.66, -10.37, 5.88) pt3dadd(27.13, 454.32, -10.37, 5.88) pt3dadd(27.26, 455.92, -10.37, 5.88) pt3dadd(27.39, 457.97, -10.37, 5.88) pt3dadd(27.96, 460.65, -10.37, 5.88) pt3dadd(28.03, 463.02, -10.37, 5.88) pt3dadd(28.03, 463.66, -10.37, 5.88) pt3dadd(27.9, 465.19, -10.37, 5.88) pt3dadd(27.9, 466.6, -10.37, 5.88) pt3dadd(27.96, 467.81, -10.37, 5.88) pt3dadd(27.96, 470.24, -10.37, 5.88) pt3dadd(27.9, 472.1, -10.37, 5.88) pt3dadd(27.9, 474.78, -10.37, 5.88) pt3dadd(27.28, 476.5, -10.37, 5.75) pt3dadd(27.28, 481.43, -21.27, 5.75) pt3dadd(27.47, 482.9, -22.57, 5.75) pt3dadd(27.98, 483.98, -23.97, 5.75) pt3dadd(28.56, 485.71, -25.16, 5.75) pt3dadd(28.81, 487.76, -25.16, 5.75) pt3dadd(28.81, 489.42, -25.27, 5.75) pt3dadd(28.81, 489.61, -28.07, 5.75) pt3dadd(29.2, 490.31, -28.07, 5.75) pt3dadd(29.26, 490.89, -28.07, 5.75) pt3dadd(29.64, 492.04, -28.07, 5.75) pt3dadd(29.96, 493.06, -28.07, 5.75) pt3dadd(30.22, 493.83, -28.07, 5.75) pt3dadd(30.35, 494.34, -28.07, 5.75) pt3dadd(30.35, 494.6, -28.07, 5.75) pt3dadd(30.6, 495.17, -28.5, 5.75) pt3dadd(30.6, 496.32, -28.5, 5.75) } apic[35] {pt3dclear() pt3dadd(30.6, 496.32, -28.5, 1.6) pt3dadd(33.54, 496.26, -28.5, 1.6) pt3dadd(35.46, 496.26, -28.5, 1.6) pt3dadd(36.17, 496.71, -28.5, 1.6) pt3dadd(36.29, 497.03, -28.5, 1.41) pt3dadd(36.36, 497.09, -28.5, 1.41) pt3dadd(36.49, 497.35, -30.77, 1.41) pt3dadd(37.12, 497.86, -30.77, 1.41) pt3dadd(37.44, 498.75, -30.77, 1.41) pt3dadd(37.64, 499.9, -30.77, 1.41) pt3dadd(37.64, 500.99, -30.77, 1.41) pt3dadd(38.08, 502.27, -30.77, 1.41) pt3dadd(38.66, 503.1, -30.77, 1.41) pt3dadd(39.36, 503.61, -30.77, 1.41) pt3dadd(40.13, 504.12, -30.77, 1.41) pt3dadd(40.19, 504.19, -30.77, 1.41) pt3dadd(42.04, 504.59, -30.77, 1.28) pt3dadd(42.68, 505.36, -30.77, 1.28) pt3dadd(43.26, 505.68, -30.77, 1.28) } } proc shape3d_36() { apic[35] { pt3dadd(44.09, 506, -30.77, 1.28) pt3dadd(44.6, 506, -30.77, 1.28) pt3dadd(44.73, 506.12, -34.34, 1.28) pt3dadd(45.3, 506.31, -35.96, 1.28) pt3dadd(46.14, 506.63, -37.9, 1.28) pt3dadd(46.65, 507.08, -37.9, 1.28) pt3dadd(47.35, 507.85, -38.33, 1.28) pt3dadd(47.8, 508.62, -38.33, 1.28) pt3dadd(48.05, 509.64, -38.33, 1.28) pt3dadd(48.05, 510.09, -42.76, 1.28) pt3dadd(48.63, 510.66, -42.76, 1.28) pt3dadd(50.04, 510.66, -42.76, 1.15) pt3dadd(50.74, 510.85, -42.76, 1.15) pt3dadd(51.89, 511.37, -42.76, 1.15) pt3dadd(52.91, 511.75, -42.76, 1.15) pt3dadd(53.94, 512.39, -42.76, 1.15) pt3dadd(54.64, 512.9, -42.76, 1.15) pt3dadd(55.28, 513.48, -42.76, 1.15) pt3dadd(56.05, 513.92, -42.65, 1.15) pt3dadd(57.07, 514.63, -42.65, 1.15) pt3dadd(57.39, 515.01, -44.27, 1.15) pt3dadd(57.39, 515.2, -46.32, 1.15) pt3dadd(57.52, 515.65, -46.32, 1.15) pt3dadd(57.9, 516.29, -46.43, 1.15) pt3dadd(58.28, 516.93, -46.43, 1.15) pt3dadd(58.73, 517.44, -46.43, 1.15) pt3dadd(58.99, 517.76, -46.43, 1.15) pt3dadd(58.99, 517.82, -46.43, 1.15) } apic[36] {pt3dclear() pt3dadd(30.6, 496.32, -28.5, 5.82) pt3dadd(30.53, 497.04, -17.82, 5.82) pt3dadd(30.53, 497.62, -17.82, 5.82) pt3dadd(30.73, 498.26, -17.82, 5.82) pt3dadd(30.98, 498.96, -17.82, 5.82) pt3dadd(31.11, 499.6, -17.82, 5.82) pt3dadd(31.17, 500.3, -17.82, 5.82) pt3dadd(31.17, 509.45, -17.82, 5.82) pt3dadd(30.98, 510.15, -17.82, 5.82) pt3dadd(30.92, 510.79, -17.82, 5.82) pt3dadd(30.79, 511.49, -17.82, 5.82) pt3dadd(30.73, 512.2, -17.82, 5.82) pt3dadd(30.66, 513.03, -17.82, 5.82) pt3dadd(30.6, 513.73, -17.82, 5.82) pt3dadd(30.53, 514.43, -17.82, 5.82) pt3dadd(30.53, 519.55, -17.82, 5.63) pt3dadd(30.66, 520.19, -17.82, 5.5) pt3dadd(31.17, 521.47, -17.82, 5.5) pt3dadd(31.43, 522.3, -17.82, 5.5) pt3dadd(31.43, 522.81, -17.82, 5.5) pt3dadd(31.56, 523.39, -17.82, 5.43) pt3dadd(31.69, 524.03, -17.82, 5.37) pt3dadd(32.2, 525.24, -17.82, 5.31) pt3dadd(32.52, 526.14, -17.82, 5.31) pt3dadd(32.58, 526.65, -17.82, 5.31) pt3dadd(32.64, 526.97, -17.82, 5.31) pt3dadd(32.84, 527.48, -17.82, 5.31) pt3dadd(33.22, 528.31, -17.82, 5.31) pt3dadd(33.6, 529.4, -17.82, 5.31) pt3dadd(34.24, 530.99, -17.82, 5.31) pt3dadd(34.44, 532.08, -17.82, 5.31) pt3dadd(34.56, 533.23, -17.82, 5.31) pt3dadd(34.75, 534.19, -17.82, 5.31) pt3dadd(34.88, 534.89, -17.82, 5.31) pt3dadd(34.88, 535.09, -17.82, 5.31) pt3dadd(35.66, 537.83, -17.82, 5.31) pt3dadd(35.72, 538.21, -17.82, 5.31) pt3dadd(35.72, 539.36, -17.82, 5.31) pt3dadd(36.04, 540.38, -17.82, 5.31) pt3dadd(36.23, 541.34, -17.82, 5.31) pt3dadd(36.23, 551.51, -17.82, 4.92) pt3dadd(36.04, 552.15, -17.82, 4.92) pt3dadd(35.98, 552.72, -17.82, 4.92) pt3dadd(35.98, 553.87, -17.82, 4.92) pt3dadd(35.47, 554.96, -17.82, 4.73) pt3dadd(35.47, 564.62, -17.82, 4.73) pt3dadd(35.84, 566.2, -17.82, 4.86) pt3dadd(35.84, 567.99, -17.82, 4.86) pt3dadd(35.77, 569.21, -17.82, 4.86) pt3dadd(35.77, 571.64, -17.82, 4.86) pt3dadd(35.84, 572.98, -17.82, 4.86) pt3dadd(36.35, 574.2, -17.82, 4.86) pt3dadd(36.8, 575.41, -17.82, 4.86) pt3dadd(37.05, 576.18, -17.82, 4.86) pt3dadd(36.99, 577.2, -17.82, 4.86) pt3dadd(37.18, 578.16, -17.82, 4.86) pt3dadd(37.63, 579.57, -17.82, 4.86) pt3dadd(37.76, 580.65, -17.82, 4.86) pt3dadd(37.95, 581.61, -17.82, 4.86) pt3dadd(38.2, 582.64, -17.82, 4.86) pt3dadd(38.65, 583.72, -17.82, 4.86) pt3dadd(39.1, 584.94, -17.82, 4.86) pt3dadd(39.55, 586.09, -17.82, 4.86) pt3dadd(39.93, 587.24, -17.82, 4.86) pt3dadd(40.12, 588.52, -17.82, 4.86) pt3dadd(40.19, 588.9, -17.82, 4.86) pt3dadd(40.19, 588.9, -17.82, 4.86) pt3dadd(40.31, 589.48, -17.82, 4.86) pt3dadd(40.44, 590.63, -17.82, 4.86) pt3dadd(40.57, 591.65, -17.82, 4.86) pt3dadd(40.7, 592.29, -17.82, 4.86) pt3dadd(40.89, 592.99, -17.82, 4.86) pt3dadd(41.27, 593.82, -17.82, 4.86) pt3dadd(41.46, 594.46, -17.82, 4.86) pt3dadd(41.59, 594.85, -17.82, 4.86) pt3dadd(41.59, 594.91, -17.82, 4.86) pt3dadd(42.83, 597.24, -17.82, 4.86) pt3dadd(42.77, 598.07, -17.82, 4.86) pt3dadd(42.77, 604.85, -17.82, 4.86) pt3dadd(42.83, 606.39, -17.82, 4.86) pt3dadd(42.83, 610.22, -17.82, 4.86) pt3dadd(42.77, 612.72, -17.82, 4.86) pt3dadd(42.77, 620.77, -17.82, 4.86) pt3dadd(42.83, 621.86, -17.82, 4.86) pt3dadd(43.28, 623.2, -17.82, 4.86) pt3dadd(43.66, 624.16, -17.82, 4.86) pt3dadd(43.98, 624.99, -17.82, 4.86) pt3dadd(44.11, 625.31, -17.82, 4.86) pt3dadd(44.18, 625.44, -17.82, 4.86) pt3dadd(44.5, 628.99, -17.82, 4.86) pt3dadd(46.29, 638.14, -17.82, 4.86) pt3dadd(46.87, 640.25, -30.56, 4.86) pt3dadd(47.19, 641.14, -30.56, 4.86) pt3dadd(47.51, 642.04, -30.56, 4.86) pt3dadd(47.95, 643.19, -30.56, 4.86) pt3dadd(48.4, 644.59, -30.56, 4.86) pt3dadd(48.98, 645.75, -30.56, 4.86) pt3dadd(49.49, 647.09, -30.56, 4.86) pt3dadd(49.68, 648.17, -30.56, 4.86) pt3dadd(50.13, 649.65, -30.56, 4.86) pt3dadd(50.26, 650.86, -30.56, 4.86) pt3dadd(50.26, 654.44, -30.56, 4.86) pt3dadd(50.96, 658.85, -30.56, 4.86) pt3dadd(50.96, 660.2, -30.56, 4.86) pt3dadd(51.34, 662.18, -30.56, 4.86) pt3dadd(52.11, 664.86, -30.56, 4.86) pt3dadd(52.56, 666.33, -30.56, 4.86) pt3dadd(52.68, 667.93, -30.56, 4.86) pt3dadd(52.68, 675.09, -30.56, 4.86) pt3dadd(52.75, 676.88, -30.56, 4.86) pt3dadd(52.88, 677.65, -30.56, 4.86) pt3dadd(52.94, 678.61, -30.56, 4.86) pt3dadd(53.19, 679.82, -30.56, 4.86) pt3dadd(53.77, 681.1, -30.56, 4.86) pt3dadd(54.28, 682.38, -30.56, 4.86) pt3dadd(54.67, 683.53, -30.56, 4.86) pt3dadd(55.05, 684.62, -30.56, 4.86) pt3dadd(55.18, 685.58, -30.56, 4.86) pt3dadd(55.24, 685.77, -30.56, 4.86) pt3dadd(55.35, 689.45, -30.56, 4.86) pt3dadd(55.42, 690.28, -30.56, 4.86) pt3dadd(55.42, 698.53, -30.56, 4.86) pt3dadd(55.67, 699.74, -30.56, 4.86) pt3dadd(55.99, 700.89, -30.56, 4.86) pt3dadd(56.57, 702.04, -30.56, 4.86) pt3dadd(57.21, 703.32, -30.56, 4.86) pt3dadd(57.78, 704.6, -30.56, 4.86) pt3dadd(58.49, 706.07, -30.56, 4.86) pt3dadd(59.06, 707.35, -30.56, 4.86) pt3dadd(59.45, 708.69, -30.56, 4.86) pt3dadd(59.64, 709.91, -30.56, 4.86) pt3dadd(60.09, 711.06, -30.56, 4.86) pt3dadd(60.34, 712.4, -30.56, 4.86) pt3dadd(60.34, 715.73, -30.56, 4.86) pt3dadd(60.39, 718.49, -34.55, 4.86) pt3dadd(60.39, 722.45, -34.55, 4.86) pt3dadd(60.65, 723.92, -34.55, 4.86) pt3dadd(61.03, 725.2, -34.55, 4.86) pt3dadd(61.54, 726.87, -34.55, 4.86) pt3dadd(62.12, 728.59, -34.55, 4.86) pt3dadd(62.56, 729.81, -34.55, 4.86) pt3dadd(62.63, 730, -34.55, 4.86) pt3dadd(62.24, 733.96, -34.55, 4.86) pt3dadd(62.5, 734.79, -34.55, 4.86) pt3dadd(62.82, 735.95, -34.55, 4.86) pt3dadd(63.2, 737.8, -34.55, 4.86) pt3dadd(63.27, 739.53, -34.55, 4.86) pt3dadd(63.27, 741.51, -34.55, 4.86) pt3dadd(62.88, 743.43, -34.55, 4.86) pt3dadd(62.88, 744.51, -34.55, 4.86) pt3dadd(63.2, 745.66, -34.55, 4.86) pt3dadd(63.33, 746.3, -34.55, 4.86) pt3dadd(62.88, 747.66, -34.55, 4.86) pt3dadd(62.88, 748.04, -34.55, 4.86) pt3dadd(63.07, 748.87, -34.55, 4.86) pt3dadd(63.2, 749.38, -34.55, 4.86) pt3dadd(63.45, 750.02, -34.55, 4.86) pt3dadd(63.9, 750.79, -34.55, 4.86) pt3dadd(64.03, 751.36, -34.55, 4.86) pt3dadd(64.09, 751.68, -34.55, 4.86) pt3dadd(64.22, 752.13, -34.55, 4.86) pt3dadd(64.28, 752.52, -34.55, 4.86) pt3dadd(64.48, 753.09, -34.55, 4.86) pt3dadd(64.48, 753.92, -34.55, 4.86) } apic[37] {pt3dclear() pt3dadd(64.48, 753.92, -34.55, 2.43) pt3dadd(66.08, 754.69, -34.55, 2.43) pt3dadd(66.59, 755.07, -34.55, 2.43) pt3dadd(66.78, 755.39, -34.55, 2.43) pt3dadd(67.16, 755.84, -34.55, 2.43) pt3dadd(67.61, 756.35, -34.55, 2.43) pt3dadd(68.06, 757.18, -34.55, 2.43) pt3dadd(68.38, 757.95, -34.55, 2.43) } } proc shape3d_37() { apic[37] { pt3dadd(68.82, 758.97, -34.55, 2.43) pt3dadd(69.14, 760.38, -34.55, 2.43) pt3dadd(69.21, 761.79, -34.55, 2.43) pt3dadd(69.21, 763.58, -34.55, 2.43) pt3dadd(69.21, 763.58, -34.55, 2.43) pt3dadd(69.27, 764.92, -34.55, 2.43) pt3dadd(71, 771.89, -34.55, 2.43) pt3dadd(71.32, 772.85, -34.55, 2.43) pt3dadd(71.45, 773.29, -34.55, 2.43) pt3dadd(71.57, 773.87, -34.55, 2.43) pt3dadd(71.83, 774.51, -34.55, 2.43) pt3dadd(72.02, 775.15, -34.55, 2.43) pt3dadd(72.02, 775.21, -34.55, 2.43) pt3dadd(72.44, 776.23, -36.93, 2.3) pt3dadd(72.44, 777.57, -36.93, 2.3) pt3dadd(72.76, 778.34, -36.93, 2.3) pt3dadd(72.95, 779.42, -36.93, 2.3) pt3dadd(73.4, 780.58, -37.03, 2.3) pt3dadd(74.16, 782.05, -37.03, 2.3) pt3dadd(74.8, 783.2, -37.47, 2.3) pt3dadd(75.19, 784.09, -37.47, 2.3) pt3dadd(75.31, 784.67, -37.47, 2.3) pt3dadd(75.83, 785.88, -38.87, 2.3) pt3dadd(75.89, 786.2, -38.87, 2.3) pt3dadd(77.3, 791.25, -40.92, 2.05) pt3dadd(77.74, 793.49, -40.92, 2.05) pt3dadd(78.38, 795.41, -40.92, 2.05) pt3dadd(78.9, 796.62, -40.92, 2.05) pt3dadd(79.15, 797.46, -40.92, 2.05) pt3dadd(79.34, 798.09, -41.35, 2.05) pt3dadd(79.41, 798.16, -41.35, 2.05) pt3dadd(79.6, 798.61, -42.33, 2.05) pt3dadd(80.17, 800.46, -42.33, 2.05) pt3dadd(80.43, 801.8, -42.33, 2.05) pt3dadd(80.81, 803.15, -42.33, 2.05) pt3dadd(81.39, 804.3, -42.33, 2.05) pt3dadd(82.09, 805.45, -42.33, 2.05) pt3dadd(82.16, 805.77, -42.33, 2.05) pt3dadd(83.05, 808.01, -42.33, 2.05) pt3dadd(83.37, 808.46, -42.33, 2.05) pt3dadd(84.07, 809.1, -42.33, 2.05) pt3dadd(84.58, 809.93, -42.33, 2.05) pt3dadd(85.35, 811.21, -42.33, 2.05) pt3dadd(85.93, 812.43, -42.33, 2.05) pt3dadd(86.57, 813.77, -42.33, 2.05) pt3dadd(87.14, 814.86, -42.33, 2.05) pt3dadd(87.52, 815.82, -42.33, 2.05) pt3dadd(87.78, 816.71, -42.33, 2.05) pt3dadd(87.78, 816.97, -42.33, 2.05) pt3dadd(87.78, 816.97, -42.33, 2.05) pt3dadd(87.97, 817.48, -42.33, 2.05) pt3dadd(88.16, 818.05, -42.33, 2.05) pt3dadd(88.42, 818.5, -42.33, 2.05) pt3dadd(88.48, 819.01, -42.33, 2.05) pt3dadd(88.48, 821.57, -42.33, 2.05) pt3dadd(88.42, 822.53, -42.33, 2.05) pt3dadd(88.42, 823.23, -42.33, 2.05) pt3dadd(88.61, 823.94, -42.33, 2.05) pt3dadd(89, 824.57, -42.33, 2.05) pt3dadd(89, 824.64, -42.33, 2.05) pt3dadd(90.66, 826.81, -50.96, 2.05) pt3dadd(90.91, 827.58, -50.96, 2.05) pt3dadd(91.17, 828.09, -50.96, 2.05) pt3dadd(91.36, 828.35, -50.96, 2.05) pt3dadd(91.42, 828.67, -50.96, 2.05) pt3dadd(91.42, 828.86, -36.6, 2.05) pt3dadd(91.55, 829.37, -36.39, 2.05) pt3dadd(91.94, 830.46, -36.39, 2.05) pt3dadd(92.38, 831.61, -36.39, 2.05) pt3dadd(92.64, 832.25, -36.39, 2.05) pt3dadd(93.02, 832.95, -36.39, 2.05) pt3dadd(93.47, 833.97, -36.39, 2.05) pt3dadd(93.85, 834.87, -36.39, 2.05) pt3dadd(94.24, 835.51, -36.39, 2.05) pt3dadd(94.24, 835.7, -36.39, 2.05) pt3dadd(94.41, 837.81, -36.39, 2.05) pt3dadd(94.41, 838.07, -35.2, 2.05) pt3dadd(94.54, 838.39, -35.2, 2.05) pt3dadd(94.6, 838.77, -35.2, 2.05) pt3dadd(94.73, 839.22, -34.34, 2.05) pt3dadd(95.11, 840.18, -33.69, 2.05) pt3dadd(95.18, 840.88, -33.69, 2.05) pt3dadd(95.18, 843.51, -33.04, 2.05) pt3dadd(94.6, 847.28, -44.16, 2.05) pt3dadd(94.6, 847.53, -44.16, 2.05) pt3dadd(94.67, 848.17, -44.16, 2.05) pt3dadd(94.67, 850.86, -44.81, 2.05) pt3dadd(94.67, 850.86, -47.51, 2.05) pt3dadd(96.01, 856.55, -50.86, 2.05) pt3dadd(96.14, 857.7, -50.86, 2.05) pt3dadd(96.71, 858.72, -50.86, 2.05) pt3dadd(97.16, 859.75, -50.86, 2.05) pt3dadd(97.67, 860.83, -50.86, 2.05) pt3dadd(98.44, 862.17, -50.86, 2.05) pt3dadd(99.27, 863.84, -52.04, 2.05) pt3dadd(99.59, 864.73, -52.04, 2.05) pt3dadd(99.78, 865.18, -52.04, 2.05) pt3dadd(99.78, 865.31, -52.04, 2.05) pt3dadd(100.12, 866.81, -53.23, 2.05) pt3dadd(100.19, 867.32, -53.23, 2.05) pt3dadd(100.7, 868.54, -53.23, 2.05) pt3dadd(101.21, 870.33, -53.23, 2.05) pt3dadd(101.4, 871.48, -53.23, 2.05) pt3dadd(101.4, 872.76, -53.23, 2.05) pt3dadd(101.27, 873.84, -53.23, 2.05) pt3dadd(100.95, 875.51, -53.23, 2.05) pt3dadd(100.63, 876.59, -53.23, 2.05) pt3dadd(100.31, 877.62, -53.23, 2.05) pt3dadd(100.31, 878.64, -55.28, 2.05) pt3dadd(101.53, 880.37, -56.79, 2.05) pt3dadd(101.78, 880.94, -56.79, 2.05) pt3dadd(102.49, 882.09, -56.79, 2.05) pt3dadd(103.32, 883.31, -56.79, 2.05) pt3dadd(103.89, 884.14, -56.79, 2.05) pt3dadd(104.41, 884.91, -56.79, 2.05) pt3dadd(104.98, 886.06, -57.01, 2.05) pt3dadd(105.36, 887.4, -57.55, 2.05) pt3dadd(105.36, 887.59, -57.55, 2.05) pt3dadd(105.94, 888.36, -58.95, 2.05) pt3dadd(106.07, 888.74, -58.95, 2.05) pt3dadd(106.13, 889.25, -58.95, 2.05) pt3dadd(106.39, 890.21, -58.95, 2.05) pt3dadd(106.45, 891.36, -58.95, 2.05) pt3dadd(106.26, 893.09, -58.95, 2.05) pt3dadd(106.26, 895.71, -59.6, 2.05) pt3dadd(106.64, 897.34, -59.93, 2.05) pt3dadd(106.58, 897.91, -59.93, 2.05) pt3dadd(106.51, 899.19, -59.93, 2.05) pt3dadd(106.51, 900.54, -59.93, 2.05) pt3dadd(106.32, 901.24, -59.93, 2.05) pt3dadd(106.26, 901.75, -59.93, 2.05) pt3dadd(106.26, 902.58, -59.93, 2.05) } apic[38] {pt3dclear() pt3dadd(106.26, 902.58, -59.93, 1.79) pt3dadd(107.15, 904.95, -59.93, 1.79) pt3dadd(107.92, 906.23, -59.93, 1.79) pt3dadd(108.56, 907.51, -59.93, 1.79) pt3dadd(109.33, 908.85, -59.93, 1.79) pt3dadd(110.54, 910.7, -59.93, 1.79) pt3dadd(111.44, 912.24, -59.93, 1.79) pt3dadd(112.4, 914.09, -59.93, 1.79) pt3dadd(112.97, 915.82, -59.93, 1.79) pt3dadd(113.16, 916.58, -59.93, 1.79) pt3dadd(113.16, 916.71, -59.93, 1.79) pt3dadd(113.16, 918.25, -59.93, 1.79) pt3dadd(112.97, 919.4, -59.93, 1.79) pt3dadd(112.78, 921.25, -59.93, 1.79) pt3dadd(112.78, 925.6, -59.93, 1.79) pt3dadd(112.91, 926.3, -59.93, 1.79) pt3dadd(112.91, 926.37, -59.93, 1.79) pt3dadd(112.81, 928.36, -60.14, 1.79) pt3dadd(112.81, 930.47, -60.14, 1.79) pt3dadd(112.61, 931.75, -60.14, 1.79) pt3dadd(112.55, 932.9, -60.14, 1.79) pt3dadd(112.55, 934.18, -61.33, 1.79) pt3dadd(112.55, 935.39, -65.22, 1.79) pt3dadd(112.61, 937.37, -66.08, 1.79) pt3dadd(112.68, 939.1, -67.38, 1.79) pt3dadd(112.68, 942.17, -67.38, 1.79) pt3dadd(111.08, 944.41, -68.78, 1.79) pt3dadd(111.08, 945.75, -68.99, 1.79) pt3dadd(110.95, 946.77, -68.99, 1.79) pt3dadd(110.7, 947.73, -71.05, 1.79) pt3dadd(110.7, 948.05, -71.05, 1.79) pt3dadd(110.76, 948.31, -72.13, 1.79) pt3dadd(111.27, 949.33, -72.13, 1.79) pt3dadd(111.53, 950.16, -72.13, 1.79) pt3dadd(111.34, 950.99, -72.56, 1.79) pt3dadd(110.7, 951.89, -72.56, 1.79) pt3dadd(110.06, 952.72, -73.64, 1.79) pt3dadd(108.78, 953.61, -74.5, 1.79) pt3dadd(108.52, 954.13, -74.5, 1.79) pt3dadd(108.33, 955.4, -74.5, 1.79) pt3dadd(108.33, 956.3, -76.12, 1.79) pt3dadd(107.63, 958.54, -76.12, 1.79) pt3dadd(107.69, 958.8, -76.12, 1.79) pt3dadd(107.89, 959.37, -76.12, 1.79) pt3dadd(108.21, 959.89, -76.12, 1.79) pt3dadd(109.23, 960.46, -76.12, 1.79) pt3dadd(110.44, 960.84, -76.12, 1.79) pt3dadd(111.79, 961.42, -76.12, 1.79) pt3dadd(112.87, 961.87, -76.12, 1.79) pt3dadd(114.15, 962.25, -76.44, 1.79) pt3dadd(115.81, 962.95, -76.44, 1.79) pt3dadd(116.77, 963.47, -76.44, 1.79) pt3dadd(117.35, 963.79, -77.74, 1.79) pt3dadd(118.24, 964.23, -77.74, 1.79) pt3dadd(118.95, 964.68, -77.74, 1.79) pt3dadd(120.03, 965.19, -78.39, 1.79) pt3dadd(121.31, 965.9, -79.36, 1.79) pt3dadd(122.21, 966.41, -79.36, 1.79) pt3dadd(122.27, 966.41, -79.36, 1.79) pt3dadd(125.34, 967.05, -80.44, 1.79) pt3dadd(125.41, 967.24, -80.44, 1.79) pt3dadd(126.56, 969.09, -80.44, 1.79) pt3dadd(127.58, 970.95, -80.44, 1.79) pt3dadd(129.05, 972.23, -80.44, 1.79) pt3dadd(130.33, 973.18, -80.44, 1.79) pt3dadd(131.54, 974.27, -80.44, 1.79) pt3dadd(132.31, 975.1, -80.44, 1.79) pt3dadd(133.53, 975.49, -80.44, 1.79) } } proc shape3d_38() { apic[38] { pt3dadd(135.44, 975.61, -86.92, 1.6) pt3dadd(135.7, 976.32, -86.92, 1.6) pt3dadd(136.91, 977.47, -86.92, 1.6) pt3dadd(138.64, 978.49, -86.92, 1.6) pt3dadd(139.79, 979, -86.92, 1.6) pt3dadd(140.69, 979.58, -86.92, 1.6) pt3dadd(141.33, 979.96, -86.92, 1.6) pt3dadd(142.03, 980.28, -87.03, 1.6) pt3dadd(142.22, 980.41, -90.16, 1.6) pt3dadd(142.92, 980.79, -90.16, 1.6) pt3dadd(144.46, 981.56, -90.16, 1.6) pt3dadd(144.91, 982.01, -90.16, 1.6) pt3dadd(145.42, 982.9, -90.16, 1.6) pt3dadd(146.06, 983.73, -90.16, 1.6) pt3dadd(147.21, 984.44, -90.16, 1.6) pt3dadd(147.91, 984.88, -90.16, 1.6) pt3dadd(148.3, 984.95, -90.16, 1.6) pt3dadd(148.36, 985.01, -90.16, 1.6) pt3dadd(149.18, 985.96, -90.16, 1.6) pt3dadd(149.82, 986.67, -90.16, 1.6) pt3dadd(150.91, 987.56, -90.16, 1.6) pt3dadd(152.51, 988.65, -90.16, 1.6) pt3dadd(153.47, 989.86, -90.16, 1.6) pt3dadd(153.98, 991.02, -90.16, 1.6) pt3dadd(154.43, 992.1, -90.7, 1.6) pt3dadd(154.81, 992.81, -92.96, 1.6) pt3dadd(154.81, 993, -93.83, 1.6) pt3dadd(155.26, 993.19, -93.83, 1.6) pt3dadd(156.15, 993.32, -93.83, 1.6) pt3dadd(157.24, 993.38, -93.83, 1.6) pt3dadd(160.05, 993.38, -95.12, 1.6) pt3dadd(161.21, 993.64, -96.1, 1.6) pt3dadd(162.29, 994.28, -96.1, 1.6) pt3dadd(163.19, 994.72, -98.26, 1.6) pt3dadd(164.4, 995.23, -98.26, 1.6) pt3dadd(164.59, 995.36, -98.26, 1.6) pt3dadd(166.45, 996.39, -98.8, 1.6) pt3dadd(167.41, 997.54, -98.8, 1.6) pt3dadd(168.37, 999.39, -98.8, 1.6) pt3dadd(169.2, 1000.54, -98.8, 1.6) pt3dadd(170.09, 1001.31, -98.8, 1.6) pt3dadd(171.18, 1002.33, -98.8, 1.6) pt3dadd(172.14, 1002.78, -98.8, 1.6) pt3dadd(172.91, 1002.91, -99.23, 1.6) pt3dadd(173.61, 1002.84, -99.23, 1.6) pt3dadd(174.12, 1002.65, -99.23, 1.6) pt3dadd(174.57, 1002.59, -99.34, 1.6) pt3dadd(175.53, 1002.59, -99.66, 1.6) } apic[39] {pt3dclear() pt3dadd(175.53, 1002.59, -99.66, 1.34) pt3dadd(177.51, 1003.87, -99.77, 1.34) pt3dadd(178.02, 1004.44, -99.77, 1.34) pt3dadd(179.56, 1004.76, -99.77, 1.34) pt3dadd(180.2, 1004.95, -99.77, 1.34) pt3dadd(180.64, 1005.66, -99.77, 1.34) pt3dadd(180.9, 1006.3, -99.77, 1.34) pt3dadd(181.22, 1007.13, -99.77, 1.34) pt3dadd(181.22, 1008.98, -99.77, 1.34) pt3dadd(181.73, 1009.49, -99.77, 1.34) pt3dadd(182.24, 1009.88, -101.17, 1.34) pt3dadd(182.37, 1009.94, -104.52, 1.34) pt3dadd(183.78, 1010.52, -104.52, 1.34) pt3dadd(184.22, 1010.9, -104.52, 1.34) pt3dadd(184.67, 1011.67, -104.52, 1.34) pt3dadd(185.37, 1012.31, -104.52, 1.34) pt3dadd(186.21, 1012.69, -104.52, 1.34) pt3dadd(187.23, 1013.01, -104.63, 1.34) pt3dadd(187.74, 1013.39, -104.63, 1.34) pt3dadd(188.78, 1013.47, -105.81, 1.34) pt3dadd(189.1, 1013.79, -105.81, 1.34) pt3dadd(189.99, 1014.75, -106.57, 1.34) pt3dadd(190.69, 1015.83, -106.57, 1.34) pt3dadd(190.82, 1016.67, -106.57, 1.34) pt3dadd(190.82, 1018.71, -116.61, 1.34) pt3dadd(191.85, 1020.05, -116.61, 1.34) pt3dadd(193.76, 1020.82, -116.61, 1.34) pt3dadd(196.77, 1021.33, -116.61, 1.34) pt3dadd(197.86, 1021.59, -116.72, 1.34) pt3dadd(198.24, 1021.84, -129.78, 1.34) pt3dadd(199.07, 1022.61, -129.78, 1.34) pt3dadd(199.58, 1023, -129.78, 1.34) pt3dadd(200.41, 1023.06, -130.11, 1.34) pt3dadd(201.63, 1022.68, -130.11, 1.34) pt3dadd(202.14, 1022.61, -131.19, 1.34) pt3dadd(202.59, 1022.61, -131.19, 1.34) pt3dadd(202.97, 1022.74, -136.26, 1.34) pt3dadd(203.04, 1022.8, -136.91, 1.34) pt3dadd(203.35, 1023.25, -136.91, 1.34) pt3dadd(204.25, 1023.7, -136.91, 1.34) pt3dadd(205.02, 1023.44, -137.67, 1.34) pt3dadd(206.62, 1021.65, -137.67, 1.34) pt3dadd(207.13, 1021.01, -141.66, 1.34) pt3dadd(207.45, 1020.63, -141.66, 1.34) pt3dadd(207.45, 1020.5, -143.39, 1.34) pt3dadd(207.77, 1020.12, -143.93, 1.34) pt3dadd(207.77, 1019.99, -144.04, 1.34) pt3dadd(208.66, 1018.33, -145.76, 1.34) pt3dadd(209.94, 1017.62, -145.76, 1.34) pt3dadd(211.73, 1017.5, -149.65, 1.34) pt3dadd(212.56, 1017.5, -152.67, 1.34) pt3dadd(212.95, 1018.01, -152.67, 1.34) pt3dadd(213.71, 1018.71, -152.89, 1.34) pt3dadd(214.22, 1018.84, -152.89, 1.34) pt3dadd(214.35, 1018.84, -152.89, 1.34) pt3dadd(214.42, 1018.71, -162.61, 1.34) pt3dadd(214.74, 1018.84, -162.61, 1.34) pt3dadd(215.38, 1019.03, -162.61, 1.34) pt3dadd(215.63, 1019.03, -162.61, 1.34) pt3dadd(215.63, 1018.78, -162.61, 1.34) pt3dadd(215.12, 1017.31, -164.98, 1.34) pt3dadd(214.54, 1016.09, -164.98, 1.34) pt3dadd(214.16, 1015.39, -167.36, 1.34) pt3dadd(213.9, 1015, -167.36, 1.34) pt3dadd(213.9, 1014.88, -178.37, 1.34) pt3dadd(214.1, 1014.68, -178.37, 1.34) pt3dadd(214.1, 1014.36, -178.37, 1.34) pt3dadd(213.78, 1013.47, -178.37, 1.34) pt3dadd(213.33, 1012.77, -178.37, 1.34) pt3dadd(212.88, 1012.13, -178.48, 1.34) pt3dadd(212.43, 1011.42, -178.48, 1.34) pt3dadd(212.11, 1010.78, -178.48, 1.34) pt3dadd(212.11, 1010.21, -183.12, 1.34) pt3dadd(212.5, 1009.5, -183.66, 1.34) pt3dadd(212.56, 1009.31, -183.66, 1.34) pt3dadd(212.75, 1009.25, -183.66, 1.34) pt3dadd(212.82, 1009.25, -183.66, 1.34) } apic[40] {pt3dclear() pt3dadd(175.53, 1002.59, -99.66, 1.34) pt3dadd(175.73, 1001.9, -90.37, 1.34) pt3dadd(175.86, 1002.28, -90.37, 1.34) pt3dadd(176.5, 1002.66, -90.37, 1.34) pt3dadd(177.52, 1002.92, -90.37, 1.34) pt3dadd(178.8, 1002.92, -90.37, 1.34) pt3dadd(179.57, 1002.66, -90.37, 1.34) pt3dadd(181.04, 1002.66, -90.37, 1.34) pt3dadd(181.49, 1002.92, -90.37, 1.34) pt3dadd(182.13, 1003.43, -90.37, 1.34) pt3dadd(183.15, 1004.07, -90.37, 1.34) pt3dadd(183.92, 1004.65, -90.37, 1.34) pt3dadd(184.75, 1005.22, -90.37, 1.34) pt3dadd(185.71, 1005.67, -90.37, 1.34) pt3dadd(186.03, 1005.86, -90.37, 1.34) pt3dadd(188.2, 1005.86, -90.37, 1.34) } apic[41] {pt3dclear() pt3dadd(188.2, 1005.86, -90.37, 1.15) pt3dadd(189.67, 1006.5, -90.37, 1.15) pt3dadd(190.25, 1006.5, -90.37, 1.15) pt3dadd(191.21, 1007.01, -90.37, 1.15) pt3dadd(192.49, 1007.52, -90.37, 1.15) pt3dadd(193.76, 1008.16, -90.37, 1.15) pt3dadd(194.66, 1008.61, -90.37, 1.15) pt3dadd(195.49, 1008.87, -90.37, 1.15) pt3dadd(196.71, 1009.38, -90.37, 1.15) pt3dadd(197.66, 1009.7, -90.37, 1.15) pt3dadd(198.75, 1009.95, -90.37, 1.15) pt3dadd(203.1, 1009.95, -90.37, 1.15) pt3dadd(203.67, 1009.89, -90.37, 1.15) pt3dadd(205.66, 1009.82, -90.37, 1.15) pt3dadd(207.32, 1010.72, -90.37, 1.15) pt3dadd(209.43, 1011.81, -90.37, 1.15) pt3dadd(211.22, 1012.7, -90.37, 1.15) pt3dadd(212.69, 1013.34, -90.37, 1.15) pt3dadd(213.65, 1013.34, -90.37, 1.15) pt3dadd(214.8, 1012.64, -90.37, 1.15) pt3dadd(216.14, 1011.93, -90.37, 1.15) pt3dadd(218, 1011.81, -90.37, 1.15) pt3dadd(219.6, 1011.81, -90.37, 1.15) pt3dadd(221.19, 1011.87, -90.37, 1.15) pt3dadd(222.15, 1011.61, -90.37, 1.15) pt3dadd(223.62, 1011.42, -90.37, 1.15) pt3dadd(227.91, 1011.42, -90.37, 1.15) pt3dadd(229.31, 1011.87, -90.37, 1.15) pt3dadd(230.27, 1012.19, -90.37, 1.15) pt3dadd(231.3, 1012.38, -90.37, 1.15) pt3dadd(231.3, 1012.45, -90.37, 1.15) pt3dadd(232.43, 1012.99, -102.68, 1.15) pt3dadd(233.65, 1013.12, -102.79, 1.15) pt3dadd(237.16, 1013.18, -102.79, 1.15) pt3dadd(239.47, 1014.01, -102.79, 1.15) pt3dadd(240.94, 1014.84, -102.79, 1.15) pt3dadd(243.75, 1015.61, -102.79, 1.15) pt3dadd(245.86, 1016.19, -102.79, 1.15) pt3dadd(248.8, 1017.14, -102.79, 1.15) pt3dadd(250.66, 1017.59, -103.65, 1.15) pt3dadd(253.28, 1017.72, -105.06, 1.15) pt3dadd(255.39, 1018.74, -105.81, 1.15) pt3dadd(255.9, 1018.93, -105.81, 1.15) pt3dadd(258.33, 1020.09, -105.81, 1.15) pt3dadd(259.22, 1020.85, -105.81, 1.15) pt3dadd(260.37, 1021.56, -105.81, 1.15) pt3dadd(262.16, 1021.68, -105.81, 1.15) pt3dadd(263.38, 1021.17, -105.81, 1.15) pt3dadd(264.4, 1020.92, -105.81, 1.15) pt3dadd(265.87, 1021.3, -105.81, 1.15) pt3dadd(267.85, 1022.26, -105.81, 1.15) pt3dadd(269.2, 1022.96, -105.81, 1.15) pt3dadd(270.8, 1023.86, -105.81, 1.15) pt3dadd(272.14, 1023.99, -105.81, 1.15) pt3dadd(273.55, 1023.99, -105.81, 1.15) pt3dadd(274.5, 1024.18, -105.81, 1.15) pt3dadd(275.08, 1024.24, -105.81, 1.15) pt3dadd(275.72, 1024.18, -105.81, 1.15) pt3dadd(276.74, 1024.11, -105.81, 1.15) } } proc shape3d_39() { apic[41] { pt3dadd(277, 1024.11, -105.81, 1.15) pt3dadd(280.09, 1024.77, -105.81, 1.15) pt3dadd(280.53, 1024.58, -105.81, 1.15) pt3dadd(282.26, 1024.58, -105.81, 1.15) pt3dadd(285.65, 1026.05, -105.81, 1.15) pt3dadd(287.44, 1026.5, -105.81, 1.15) pt3dadd(289.61, 1026.5, -90.91, 1.15) pt3dadd(292.36, 1026.95, -90.91, 1.15) pt3dadd(294.47, 1027.33, -90.91, 1.15) pt3dadd(295.43, 1027.33, -90.91, 1.15) pt3dadd(296.33, 1026.95, -90.91, 1.15) pt3dadd(297.61, 1026.18, -90.91, 1.15) pt3dadd(299.2, 1026.05, -90.91, 1.15) pt3dadd(301.06, 1026.11, -90.81, 1.15) pt3dadd(303.55, 1026.18, -90.81, 1.15) pt3dadd(304.83, 1026.43, -88.86, 1.15) pt3dadd(304.96, 1026.5, -88.86, 1.15) pt3dadd(306.69, 1026.82, -88.21, 1.15) pt3dadd(307.77, 1027.59, -88.21, 1.15) pt3dadd(309.75, 1028.74, -88.11, 1.15) pt3dadd(311.35, 1029.31, -87.89, 1.15) pt3dadd(312.89, 1029.44, -87.89, 1.15) pt3dadd(314.17, 1029.31, -87.89, 1.15) pt3dadd(315.32, 1028.99, -86.16, 1.15) pt3dadd(317.04, 1028.93, -86.16, 1.15) pt3dadd(317.81, 1028.93, -85.84, 1.15) pt3dadd(318.58, 1028.67, -85.73, 1.15) pt3dadd(318.64, 1028.67, -85.73, 1.15) pt3dadd(320.64, 1028.45, -85.73, 1.15) pt3dadd(322.75, 1028.7, -85.73, 1.15) pt3dadd(324.86, 1028.7, -85.73, 1.15) pt3dadd(327.92, 1029.02, -85.73, 1.15) pt3dadd(329.52, 1029.73, -85.73, 1.15) pt3dadd(330.42, 1030.5, -85.73, 1.15) pt3dadd(332.14, 1031.52, -85.73, 1.15) pt3dadd(333.36, 1032.03, -85.73, 1.15) pt3dadd(334.32, 1032.67, -85.73, 1.15) pt3dadd(335.6, 1033.37, -85.73, 1.15) pt3dadd(336.75, 1033.44, -85.73, 1.15) pt3dadd(338.09, 1032.67, -85.73, 1.15) pt3dadd(338.99, 1032.09, -85.73, 1.15) pt3dadd(340.52, 1031.65, -85.73, 1.15) pt3dadd(343.78, 1031.65, -85.73, 1.15) pt3dadd(345.51, 1032.09, -85.73, 1.15) pt3dadd(346.72, 1032.29, -85.73, 1.15) pt3dadd(349.6, 1033.12, -85.73, 1.15) pt3dadd(351.52, 1033.88, -85.73, 1.15) pt3dadd(352.8, 1034.52, -85.73, 1.15) pt3dadd(353.76, 1034.91, -85.73, 1.15) pt3dadd(354.65, 1034.97, -85.73, 1.15) pt3dadd(355.1, 1034.65, -85.73, 1.15) pt3dadd(356.12, 1034.14, -85.73, 1.15) pt3dadd(357.34, 1033.63, -85.73, 1.15) pt3dadd(357.78, 1033.56, -85.73, 1.15) pt3dadd(358.74, 1033.88, -85.73, 1.15) pt3dadd(360.02, 1034.52, -85.73, 1.15) pt3dadd(361.05, 1035.03, -85.73, 1.15) pt3dadd(361.62, 1035.29, -85.73, 1.15) pt3dadd(361.68, 1035.29, -85.73, 1.15) pt3dadd(364.26, 1035.11, -85.73, 1.15) pt3dadd(374.36, 1034.67, -84.11, 1.15) pt3dadd(377.11, 1034.67, -84.11, 1.15) pt3dadd(378.07, 1034.47, -84.11, 1.15) pt3dadd(380.43, 1034.47, -84.11, 1.15) pt3dadd(381.97, 1034.41, -84.11, 1.15) pt3dadd(383.31, 1034.09, -84.11, 1.15) pt3dadd(384.33, 1033.64, -84.11, 1.15) pt3dadd(385.8, 1033.32, -84.11, 1.15) pt3dadd(387.34, 1033.26, -84.11, 1.15) pt3dadd(388.62, 1033.58, -84.11, 1.15) pt3dadd(390.02, 1034.15, -84.11, 1.15) pt3dadd(391.49, 1034.92, -84.11, 1.15) pt3dadd(392.32, 1035.43, -83.68, 1.15) pt3dadd(392.84, 1035.82, -83.14, 1.15) pt3dadd(393.09, 1036.26, -83.14, 1.15) pt3dadd(393.35, 1036.84, -83.14, 1.15) pt3dadd(393.6, 1037.22, -82.71, 1.15) pt3dadd(393.73, 1037.54, -82.49, 1.15) pt3dadd(393.73, 1038.95, -82.38, 1.15) pt3dadd(393.48, 1039.72, -82.06, 1.15) pt3dadd(393.35, 1039.91, -82.06, 1.15) pt3dadd(393.35, 1040.04, -81.52, 1.15) pt3dadd(392.52, 1040.74, -80.01, 1.15) pt3dadd(392.52, 1045.22, -78.17, 1.15) pt3dadd(392.32, 1045.92, -78.17, 1.15) pt3dadd(392.32, 1046.24, -76.98, 1.15) pt3dadd(392.45, 1047.58, -76.34, 1.15) pt3dadd(392.2, 1048.22, -76.23, 1.15) pt3dadd(392.01, 1048.73, -76.23, 1.15) pt3dadd(392.07, 1049.63, -74.83, 1.15) pt3dadd(392.71, 1050.71, -74.83, 1.15) pt3dadd(393.35, 1051.1, -73.85, 1.15) pt3dadd(393.48, 1051.23, -71.15, 1.15) pt3dadd(393.48, 1051.48, -71.15, 1.15) pt3dadd(393.54, 1051.8, -71.15, 1.15) pt3dadd(393.6, 1052.18, -71.15, 1.15) pt3dadd(393.6, 1052.89, -70.83, 1.15) pt3dadd(393.6, 1052.89, -69.43, 1.15) pt3dadd(393.41, 1053.14, -69.43, 1.15) pt3dadd(393.22, 1053.4, -69.43, 1.15) pt3dadd(393.16, 1053.4, -69.43, 1.15) } apic[42] {pt3dclear() pt3dadd(393.16, 1053.4, -69.43, 0.9) pt3dadd(392.52, 1054.04, -69.43, 0.9) pt3dadd(392.39, 1054.29, -69.43, 0.9) pt3dadd(391.94, 1054.68, -69.43, 0.9) pt3dadd(390.73, 1055.06, -69.43, 0.9) pt3dadd(389.77, 1055.38, -69.43, 0.9) pt3dadd(388.68, 1056.15, -69.43, 0.9) pt3dadd(388.42, 1056.47, -69.43, 0.9) pt3dadd(388.17, 1056.85, -69.43, 0.9) pt3dadd(388.17, 1056.92, -69.43, 0.9) } apic[43] {pt3dclear() pt3dadd(393.16, 1053.4, -69.43, 0.9) pt3dadd(393.99, 1052.89, -69.43, 0.9) pt3dadd(394.31, 1053.27, -69.43, 0.9) pt3dadd(394.82, 1054.36, -69.43, 0.9) pt3dadd(395.59, 1055.76, -69.43, 0.9) pt3dadd(395.91, 1057.04, -69.43, 0.9) pt3dadd(395.91, 1058.45, -69.43, 0.9) pt3dadd(396.29, 1059.09, -69.43, 0.9) pt3dadd(396.74, 1059.41, -69.43, 0.9) pt3dadd(396.8, 1059.6, -69.43, 0.9) pt3dadd(396.86, 1059.6, -69.43, 0.9) } apic[44] {pt3dclear() pt3dadd(188.2, 1005.86, -90.37, 1.09) pt3dadd(187.64, 1006.32, -103.44, 1.09) pt3dadd(188.28, 1006.89, -103.44, 1.09) pt3dadd(190.01, 1008.04, -103.44, 1.09) pt3dadd(191.22, 1008.68, -103.44, 1.09) pt3dadd(192.76, 1009.13, -103.44, 1.09) pt3dadd(194.61, 1009.64, -103.44, 1.09) pt3dadd(196.27, 1010.54, -103.44, 1.09) pt3dadd(197.87, 1011.37, -103.44, 1.09) pt3dadd(199.47, 1011.94, -103.98, 1.09) pt3dadd(201.01, 1012.58, -103.98, 1.09) pt3dadd(202.03, 1013.22, -104.95, 1.09) pt3dadd(202.41, 1013.61, -104.95, 1.09) pt3dadd(202.86, 1014.05, -110.67, 1.09) pt3dadd(203.75, 1014.44, -115.1, 1.09) pt3dadd(205.1, 1014.76, -115.96, 1.09) pt3dadd(205.42, 1014.76, -115.96, 1.09) pt3dadd(207.97, 1014.88, -119.85, 1.09) pt3dadd(210.15, 1014.88, -119.85, 1.09) pt3dadd(210.85, 1014.76, -121.9, 1.09) pt3dadd(211.68, 1013.92, -121.9, 1.09) pt3dadd(212.19, 1014.18, -121.9, 1.09) pt3dadd(213.22, 1014.5, -122.01, 1.09) pt3dadd(214.88, 1014.63, -122.01, 1.09) pt3dadd(216.61, 1015.33, -122.87, 1.09) pt3dadd(218.08, 1015.78, -123.74, 1.09) pt3dadd(219.16, 1015.72, -123.74, 1.09) pt3dadd(220.12, 1015.72, -123.74, 1.09) pt3dadd(220.89, 1015.46, -126.54, 1.09) pt3dadd(221.21, 1015.2, -126.54, 1.09) pt3dadd(221.66, 1014.88, -126.54, 1.09) pt3dadd(222.3, 1014.44, -126.65, 1.09) pt3dadd(223.19, 1013.8, -126.65, 1.09) pt3dadd(224.53, 1013.35, -126.65, 1.09) pt3dadd(225.11, 1013.35, -126.65, 1.09) pt3dadd(226.33, 1013.8, -126.65, 1.09) pt3dadd(227.48, 1014.24, -126.76, 1.09) pt3dadd(228.69, 1014.88, -126.76, 1.09) pt3dadd(229.97, 1015.65, -126.76, 1.09) pt3dadd(230.29, 1015.72, -128.06, 1.09) pt3dadd(231.31, 1015.59, -129.46, 1.09) pt3dadd(231.76, 1015.59, -130.32, 1.09) pt3dadd(233.54, 1015.45, -130.32, 1.09) pt3dadd(233.99, 1015.64, -130.32, 1.09) pt3dadd(235.97, 1016.09, -130.32, 1.09) pt3dadd(237.44, 1015.7, -130.32, 1.09) pt3dadd(238.47, 1014.43, -130.43, 1.09) pt3dadd(238.72, 1013.66, -130.43, 1.09) pt3dadd(238.79, 1013.6, -136.8, 1.09) pt3dadd(239.43, 1012.76, -136.8, 1.09) pt3dadd(239.68, 1012.12, -136.91, 1.09) pt3dadd(240.51, 1011.04, -136.91, 1.09) pt3dadd(241.47, 1010.46, -138.1, 1.09) pt3dadd(241.92, 1010.14, -140.15, 1.09) pt3dadd(242.18, 1010.08, -142.52, 1.09) pt3dadd(242.24, 1010.08, -142.52, 1.09) pt3dadd(242.24, 1010.08, -158.07, 1.09) pt3dadd(244.29, 1010.08, -158.07, 1.09) pt3dadd(245.44, 1010.21, -158.07, 1.09) pt3dadd(245.69, 1010.21, -166.17, 1.09) } apic[45] {pt3dclear() pt3dadd(106.26, 902.58, -59.93, 1.09) pt3dadd(106.21, 903.64, -53.34, 1.09) pt3dadd(106.4, 904.28, -53.34, 1.09) pt3dadd(106.65, 906, -53.34, 1.09) pt3dadd(107.17, 908.18, -53.34, 1.09) pt3dadd(107.55, 909.33, -53.34, 1.09) pt3dadd(107.55, 910.48, -53.34, 1.09) pt3dadd(107.68, 912.14, -53.34, 1.09) pt3dadd(107.68, 916.68, -53.34, 1.09) pt3dadd(106.91, 918.92, -53.34, 1.09) pt3dadd(107.1, 920.13, -53.34, 1.09) pt3dadd(107.17, 921.73, -53.34, 1.09) pt3dadd(107.17, 924.42, -53.34, 1.09) pt3dadd(107.29, 926.08, -53.34, 1.09) pt3dadd(107.29, 929.47, -53.34, 1.09) pt3dadd(107.1, 930.75, -53.34, 1.09) pt3dadd(106.97, 931.77, -53.34, 1.09) pt3dadd(106.78, 932.22, -53.34, 1.09) } } proc shape3d_40() { apic[45] { pt3dadd(106.78, 932.28, -53.34, 1.09) pt3dadd(107.52, 933.1, -53.34, 1.09) pt3dadd(107.13, 933.74, -53.34, 1.09) pt3dadd(106.56, 934.95, -53.34, 1.09) pt3dadd(106.43, 936.68, -53.34, 1.09) pt3dadd(106.37, 939.75, -53.34, 1.09) pt3dadd(106.05, 941.67, -53.34, 1.09) pt3dadd(105.86, 942.88, -52.58, 1.09) pt3dadd(105.86, 944.03, -52.58, 1.09) pt3dadd(105.98, 945.12, -52.15, 1.09) pt3dadd(105.98, 945.31, -52.15, 1.09) pt3dadd(105.73, 945.82, -68.99, 1.09) pt3dadd(104.96, 947.17, -68.99, 1.09) pt3dadd(104.51, 948.7, -68.99, 1.09) pt3dadd(104.26, 950.11, -68.99, 1.09) pt3dadd(104.26, 951.45, -68.99, 1.09) pt3dadd(104.58, 953.24, -68.99, 1.09) pt3dadd(104.58, 954.2, -68.99, 1.09) pt3dadd(103.62, 955.99, -69.75, 1.09) pt3dadd(103.55, 957.84, -69.75, 1.09) pt3dadd(103.62, 959.38, -70.18, 1.09) pt3dadd(103.62, 960.53, -70.18, 1.09) pt3dadd(103.55, 961.04, -70.83, 1.09) pt3dadd(103.55, 961.81, -71.8, 1.09) pt3dadd(102.29, 964.08, -73.64, 1.09) pt3dadd(102.29, 967.34, -73.64, 1.09) pt3dadd(101.84, 969.32, -73.64, 1.09) pt3dadd(101.52, 970.6, -73.64, 1.09) pt3dadd(101.33, 972.45, -73.64, 1.09) pt3dadd(101.27, 974.31, -73.64, 1.09) pt3dadd(101.27, 978.53, -73.64, 1.09) pt3dadd(101.65, 979.87, -73.64, 1.09) pt3dadd(102.29, 981.21, -73.64, 1.09) pt3dadd(102.55, 982.05, -73.64, 1.09) pt3dadd(103.25, 984.22, -74.07, 1.09) pt3dadd(103.83, 986.14, -74.07, 1.09) pt3dadd(104.78, 988.18, -74.07, 1.09) pt3dadd(105.1, 989.85, -74.07, 1.09) pt3dadd(105.1, 992.66, -74.07, 1.09) pt3dadd(105.15, 995.11, -74.07, 1.09) pt3dadd(103.24, 1008.09, -74.07, 1.09) pt3dadd(103.17, 1009.43, -79.14, 1.09) pt3dadd(102.92, 1010.64, -79.14, 1.09) pt3dadd(102.53, 1011.86, -79.14, 1.09) pt3dadd(102.15, 1013.07, -79.14, 1.09) pt3dadd(101.83, 1014.22, -79.14, 1.09) pt3dadd(101.64, 1015.31, -79.14, 1.09) pt3dadd(101.76, 1016.78, -79.14, 1.09) pt3dadd(102.21, 1018.51, -79.14, 1.09) pt3dadd(102.21, 1019.15, -79.14, 1.09) pt3dadd(101.96, 1019.72, -79.14, 1.09) pt3dadd(101.57, 1020.36, -79.14, 1.09) pt3dadd(101.25, 1020.81, -79.14, 1.09) pt3dadd(101.13, 1021.07, -79.14, 1.09) pt3dadd(100.66, 1022.1, -79.14, 1.09) pt3dadd(100.66, 1022.74, -79.14, 1.09) pt3dadd(100.4, 1023.83, -79.14, 1.09) pt3dadd(99.89, 1024.4, -79.14, 1.09) pt3dadd(99.51, 1024.91, -79.58, 1.09) pt3dadd(99.06, 1025.49, -79.58, 1.09) pt3dadd(98.8, 1025.74, -79.58, 1.09) pt3dadd(98.8, 1025.81, -83.79, 1.09) } apic[46] {pt3dclear() pt3dadd(98.8, 1025.81, -83.79, 0.9) pt3dadd(99.06, 1027.66, -83.79, 0.9) pt3dadd(98.74, 1028.3, -83.79, 0.9) pt3dadd(98.42, 1029.64, -83.79, 0.9) pt3dadd(98.48, 1031.05, -83.79, 0.9) pt3dadd(98.93, 1032.78, -83.79, 0.9) pt3dadd(98.93, 1037, -83.79, 0.9) pt3dadd(99, 1037.96, -83.79, 0.9) pt3dadd(99.57, 1039.24, -83.79, 0.9) pt3dadd(99.83, 1039.94, -83.79, 0.9) pt3dadd(99.83, 1042.69, -84.87, 0.9) pt3dadd(100.08, 1044.03, -84.87, 0.9) pt3dadd(100.72, 1045.37, -84.87, 0.9) pt3dadd(101.36, 1046.84, -84.87, 0.9) pt3dadd(101.94, 1048.31, -84.87, 0.9) pt3dadd(102, 1049.4, -84.87, 0.9) pt3dadd(102, 1050.23, -84.87, 0.9) pt3dadd(101.87, 1050.42, -84.87, 0.9) pt3dadd(101.06, 1052.58, -84.87, 0.9) pt3dadd(100.61, 1053.99, -84.87, 0.9) pt3dadd(99.91, 1055.33, -84.87, 0.9) pt3dadd(99.14, 1056.99, -84.87, 0.9) pt3dadd(98.76, 1058.21, -84.87, 0.9) pt3dadd(99.08, 1060.06, -84.87, 0.9) pt3dadd(99.01, 1061.79, -84.87, 0.9) pt3dadd(98.44, 1062.94, -84.87, 0.9) pt3dadd(97.67, 1063.9, -84.87, 0.9) pt3dadd(96.9, 1064.73, -84.87, 0.9) pt3dadd(96.07, 1066.01, -84.87, 0.9) pt3dadd(95.18, 1066.58, -84.87, 0.9) pt3dadd(93.96, 1067.16, -84.87, 0.9) pt3dadd(91.47, 1067.8, -84.87, 0.9) pt3dadd(90.83, 1068.05, -84.87, 0.9) pt3dadd(88.97, 1069.07, -85.19, 0.9) pt3dadd(88.01, 1069.71, -85.19, 0.9) pt3dadd(86.67, 1070.48, -85.19, 0.9) pt3dadd(84.24, 1071.12, -85.19, 0.9) pt3dadd(82.26, 1071.44, -85.19, 0.9) pt3dadd(80.21, 1071.95, -85.19, 0.9) pt3dadd(78.36, 1072.72, -85.19, 0.9) pt3dadd(76.51, 1073.87, -85.19, 0.9) pt3dadd(74.97, 1074.64, -85.19, 0.9) pt3dadd(73.76, 1075.47, -85.19, 0.9) pt3dadd(72.03, 1076.75, -85.19, 0.9) pt3dadd(70.82, 1077.32, -85.19, 0.9) pt3dadd(69.41, 1078.09, -85.19, 0.9) pt3dadd(68.71, 1078.6, -85.19, 0.9) pt3dadd(68.19, 1078.98, -85.19, 0.9) pt3dadd(68.07, 1079.11, -85.19, 0.9) pt3dadd(66.92, 1080.16, -85.19, 0.9) pt3dadd(65.06, 1081.06, -85.19, 0.9) pt3dadd(63.47, 1082.08, -85.19, 0.9) pt3dadd(61.8, 1082.98, -85.62, 0.9) pt3dadd(59.44, 1083.87, -86.7, 0.9) pt3dadd(57.2, 1084.32, -86.7, 0.9) pt3dadd(57.01, 1084.38, -86.7, 0.9) pt3dadd(56.82, 1084.77, -80.55, 0.9) pt3dadd(55.35, 1085.73, -80.55, 0.9) pt3dadd(53.3, 1086.69, -80.33, 0.9) pt3dadd(50.81, 1088.09, -79.9, 0.9) pt3dadd(48.82, 1088.86, -79.9, 0.9) pt3dadd(46.84, 1089.63, -79.14, 0.9) pt3dadd(45.18, 1090.46, -78.71, 0.9) pt3dadd(43.65, 1091.93, -78.39, 0.9) pt3dadd(43.01, 1092.5, -78.39, 0.9) pt3dadd(40.7, 1094.23, -78.39, 0.9) pt3dadd(38.66, 1095.44, -78.39, 0.9) pt3dadd(37.64, 1096.34, -78.39, 0.9) pt3dadd(36.87, 1097.3, -78.39, 0.9) pt3dadd(35.72, 1098.26, -78.39, 0.9) pt3dadd(35.01, 1099.47, -78.39, 0.9) pt3dadd(34.37, 1100.82, -78.39, 0.9) pt3dadd(33.73, 1101.97, -78.39, 0.9) pt3dadd(32.39, 1103.5, -78.39, 0.9) pt3dadd(31.82, 1104.4, -78.39, 0.9) pt3dadd(30.99, 1105.36, -78.39, 0.9) pt3dadd(30.22, 1106.19, -78.39, 0.9) pt3dadd(29.32, 1106.76, -78.39, 0.9) pt3dadd(28.75, 1107.27, -78.39, 0.9) pt3dadd(28.56, 1107.53, -78.39, 0.9) pt3dadd(28.49, 1107.53, -78.39, 0.9) pt3dadd(28.02, 1107.5, -78.39, 0.7) pt3dadd(27.83, 1107.7, -78.39, 0.7) pt3dadd(27.51, 1107.76, -78.39, 0.7) pt3dadd(26.23, 1107.89, -78.39, 0.7) pt3dadd(24.7, 1108.02, -78.39, 0.7) pt3dadd(23.67, 1108.14, -78.39, 0.7) pt3dadd(22.4, 1108.4, -78.39, 0.7) pt3dadd(21.69, 1108.4, -78.39, 0.7) pt3dadd(21.24, 1108.59, -78.39, 0.7) } apic[47] {pt3dclear() pt3dadd(98.8, 1025.81, -83.79, 0.9) pt3dadd(98.72, 1024.99, -83.68, 0.9) pt3dadd(98.53, 1025.31, -83.68, 0.9) pt3dadd(97.25, 1025.69, -83.68, 0.9) pt3dadd(96.16, 1026.08, -83.68, 0.9) pt3dadd(94.75, 1027.1, -83.68, 0.9) pt3dadd(93.41, 1028.31, -83.68, 0.9) pt3dadd(92.77, 1029.47, -83.68, 0.9) pt3dadd(92.13, 1030.36, -83.68, 0.9) pt3dadd(91.62, 1030.94, -83.68, 0.9) pt3dadd(91.43, 1031.13, -83.68, 0.9) pt3dadd(91.36, 1031.26, -93.07, 0.9) pt3dadd(91.04, 1032.41, -93.07, 0.9) pt3dadd(90.79, 1033.62, -93.07, 0.9) pt3dadd(90.47, 1034.71, -94.15, 0.9) pt3dadd(90.28, 1035.6, -94.15, 0.9) pt3dadd(90.09, 1035.99, -94.15, 0.9) pt3dadd(89.7, 1036.31, -94.58, 0.9) pt3dadd(89.38, 1036.69, -94.58, 0.9) pt3dadd(89.06, 1036.82, -94.58, 0.9) pt3dadd(88.87, 1036.95, -94.58, 0.9) pt3dadd(88.81, 1036.95, -94.58, 0.9) } apic[48] {pt3dclear() pt3dadd(88.81, 1036.95, -94.58, 0.64) pt3dadd(88.36, 1037.59, -95.45, 0.64) pt3dadd(88.3, 1037.97, -95.45, 0.64) pt3dadd(87.59, 1039.25, -95.45, 0.64) pt3dadd(86.7, 1041.23, -95.45, 0.64) pt3dadd(86.38, 1042.25, -95.45, 0.64) pt3dadd(86.19, 1043.47, -95.45, 0.64) pt3dadd(86.19, 1047.3, -95.45, 0.64) pt3dadd(86.25, 1048.46, -95.45, 0.64) pt3dadd(86.57, 1049.29, -95.45, 0.64) pt3dadd(86.95, 1050.05, -95.45, 0.64) pt3dadd(87.02, 1050.56, -95.45, 0.64) pt3dadd(87.02, 1051.14, -95.45, 0.64) pt3dadd(86.7, 1051.97, -95.45, 0.64) pt3dadd(86.44, 1052.74, -95.45, 0.64) pt3dadd(86.25, 1053.25, -95.45, 0.64) pt3dadd(85.93, 1053.76, -95.45, 0.64) pt3dadd(85.74, 1054.08, -95.45, 0.64) pt3dadd(85.67, 1054.15, -95.45, 0.64) pt3dadd(85.51, 1055.32, -95.45, 0.64) pt3dadd(85.51, 1056.53, -95.45, 0.64) pt3dadd(85.25, 1057.24, -95.45, 0.64) pt3dadd(85.12, 1057.43, -96.2, 0.64) pt3dadd(85.06, 1057.49, -104.95, 0.64) pt3dadd(85.06, 1057.94, -104.95, 0.64) pt3dadd(84.74, 1058.64, -104.95, 0.64) } } proc shape3d_41() { apic[48] { pt3dadd(84.36, 1058.96, -104.95, 0.64) pt3dadd(83.14, 1059.48, -104.95, 0.64) pt3dadd(81.93, 1060.05, -104.95, 0.64) pt3dadd(79.82, 1061.33, -104.95, 0.64) pt3dadd(78.79, 1062.48, -104.95, 0.64) pt3dadd(78.15, 1063.76, -104.95, 0.64) pt3dadd(77.58, 1065.55, -104.95, 0.64) pt3dadd(77.13, 1066.89, -104.95, 0.64) pt3dadd(76.75, 1067.72, -105.06, 0.64) pt3dadd(76.36, 1068.55, -105.06, 0.64) pt3dadd(75.79, 1069.51, -106.03, 0.64) pt3dadd(75.4, 1069.9, -106.57, 0.64) pt3dadd(75.28, 1070.15, -106.57, 0.64) pt3dadd(74.83, 1070.41, -107.43, 0.64) pt3dadd(74.44, 1071.18, -107.43, 0.64) pt3dadd(74.19, 1071.75, -107.43, 0.64) pt3dadd(73.81, 1072.14, -107.43, 0.64) pt3dadd(73.36, 1072.65, -107.43, 0.64) pt3dadd(73.29, 1072.71, -107.43, 0.64) pt3dadd(73.17, 1072.77, -107.43, 0.64) pt3dadd(72.97, 1072.97, -107.43, 0.64) pt3dadd(72.91, 1073.03, -109.38, 0.64) pt3dadd(72.85, 1073.29, -109.38, 0.64) pt3dadd(72.72, 1073.61, -109.38, 0.64) pt3dadd(72.46, 1074.05, -109.38, 0.64) pt3dadd(72.08, 1074.82, -109.38, 0.64) pt3dadd(71.7, 1075.14, -109.38, 0.64) pt3dadd(71.25, 1075.4, -109.38, 0.64) pt3dadd(70.29, 1075.52, -109.38, 0.64) pt3dadd(69.97, 1075.52, -109.38, 0.64) pt3dadd(69.46, 1075.46, -109.48, 0.64) pt3dadd(69.2, 1075.52, -109.48, 0.64) pt3dadd(65.62, 1075.52, -110.24, 0.64) pt3dadd(64.15, 1075.84, -110.89, 0.64) pt3dadd(63.45, 1076.29, -111.75, 0.64) pt3dadd(63, 1076.67, -111.75, 0.64) pt3dadd(62.55, 1076.93, -111.75, 0.64) pt3dadd(62.36, 1076.99, -111.75, 0.64) pt3dadd(61.02, 1077.89, -114.24, 0.64) pt3dadd(59.23, 1078.78, -114.24, 0.64) pt3dadd(57.82, 1079.3, -114.45, 0.64) pt3dadd(56.93, 1080, -114.99, 0.64) pt3dadd(56.61, 1080.64, -114.99, 0.64) pt3dadd(55.9, 1081.6, -117.37, 0.64) pt3dadd(55.65, 1081.92, -117.37, 0.64) pt3dadd(55.58, 1082.05, -118.45, 0.64) pt3dadd(55.39, 1082.68, -118.45, 0.64) pt3dadd(55.07, 1083.26, -118.45, 0.64) pt3dadd(54.69, 1083.64, -118.66, 0.64) pt3dadd(54.24, 1083.96, -119.74, 0.64) pt3dadd(54.11, 1084.09, -119.74, 0.64) pt3dadd(53.3, 1084.33, -120.71, 0.64) pt3dadd(53.37, 1084.59, -120.71, 0.64) pt3dadd(52.86, 1085.29, -120.71, 0.64) pt3dadd(52.22, 1085.55, -120.71, 0.64) pt3dadd(50.94, 1085.55, -121.58, 0.64) pt3dadd(50.04, 1085.61, -123.09, 0.64) pt3dadd(49.08, 1085.61, -125.57, 0.64) pt3dadd(48.38, 1085.48, -125.57, 0.64) pt3dadd(47.23, 1085.8, -125.57, 0.64) pt3dadd(46.4, 1086.31, -126.11, 0.64) pt3dadd(45.82, 1086.76, -127.3, 0.64) pt3dadd(44.8, 1087.21, -128.49, 0.64) pt3dadd(43.39, 1087.53, -128.49, 0.64) pt3dadd(41.09, 1087.53, -130.32, 0.64) pt3dadd(39.75, 1087.59, -130.97, 0.64) pt3dadd(39.62, 1087.66, -130.97, 0.64) pt3dadd(38.34, 1088.68, -130.97, 0.64) pt3dadd(37.89, 1089.06, -130.97, 0.64) pt3dadd(37.06, 1089.45, -131.4, 0.64) pt3dadd(34.95, 1090.09, -132.16, 0.64) pt3dadd(33.42, 1090.66, -133.24, 0.64) pt3dadd(32.59, 1090.92, -133.24, 0.64) pt3dadd(31.88, 1090.92, -133.24, 0.64) pt3dadd(31.24, 1091.37, -135.72, 0.64) pt3dadd(30.16, 1091.81, -135.72, 0.64) pt3dadd(26.96, 1091.81, -135.72, 0.64) pt3dadd(25.68, 1092.26, -135.72, 0.64) pt3dadd(24.08, 1092.58, -136.48, 0.64) pt3dadd(23.44, 1093.16, -137.67, 0.64) pt3dadd(22.87, 1093.6, -139.39, 0.64) pt3dadd(22.36, 1094.05, -139.39, 0.64) pt3dadd(22.23, 1094.24, -139.39, 0.64) pt3dadd(21.84, 1094.43, -140.9, 0.64) pt3dadd(21.59, 1094.69, -140.9, 0.64) pt3dadd(20.95, 1095.07, -142.31, 0.64) pt3dadd(20.44, 1095.52, -142.31, 0.64) pt3dadd(20.18, 1095.84, -144.9, 0.64) pt3dadd(19.93, 1096.1, -144.9, 0.64) } apic[49] {pt3dclear() pt3dadd(88.81, 1036.95, -94.58, 0.7) pt3dadd(88.73, 1037.04, -87.89, 0.7) pt3dadd(88.35, 1037.04, -87.89, 0.7) pt3dadd(86.18, 1037.23, -87.89, 0.7) pt3dadd(85.22, 1037.49, -87.89, 0.7) pt3dadd(84.39, 1038.13, -87.89, 0.7) pt3dadd(83.24, 1038.83, -87.89, 0.7) pt3dadd(82.02, 1039.41, -87.89, 0.7) pt3dadd(80.55, 1040.17, -87.89, 0.7) pt3dadd(78.76, 1041.07, -87.89, 0.7) pt3dadd(77.67, 1041.39, -87.89, 0.7) pt3dadd(76.33, 1041.52, -87.89, 0.7) pt3dadd(74.99, 1042.03, -87.89, 0.7) pt3dadd(74.03, 1042.35, -87.89, 0.7) pt3dadd(72.81, 1042.92, -87.89, 0.7) pt3dadd(71.85, 1043.63, -87.89, 0.7) pt3dadd(71.28, 1044.46, -87.89, 0.7) pt3dadd(70.96, 1044.91, -87.89, 0.7) pt3dadd(70.89, 1044.97, -87.89, 0.7) pt3dadd(70.77, 1045.42, -100.09, 0.7) pt3dadd(70.32, 1046.12, -101.6, 0.7) pt3dadd(69.87, 1046.18, -101.6, 0.7) pt3dadd(69.17, 1046.44, -101.6, 0.7) pt3dadd(67.95, 1046.57, -101.6, 0.7) pt3dadd(66.87, 1046.82, -101.6, 0.7) pt3dadd(66.8, 1046.89, -101.6, 0.7) pt3dadd(65.4, 1046.95, -105.38, 0.7) pt3dadd(64.18, 1046.95, -105.38, 0.7) pt3dadd(62.71, 1046.82, -105.38, 0.7) pt3dadd(60.28, 1046.82, -105.38, 0.7) pt3dadd(59, 1047.4, -105.38, 0.7) pt3dadd(57.79, 1048.23, -105.38, 0.7) pt3dadd(56.7, 1048.42, -105.38, 0.7) pt3dadd(54.91, 1048.49, -105.38, 0.7) pt3dadd(53.38, 1048.36, -105.38, 0.7) pt3dadd(49.73, 1048.36, -105.38, 0.7) pt3dadd(49.35, 1048.49, -105.38, 0.7) pt3dadd(48.45, 1049, -105.38, 0.7) pt3dadd(47.62, 1049.57, -105.38, 0.7) pt3dadd(46.6, 1050.4, -105.38, 0.7) pt3dadd(45.89, 1051.11, -105.38, 0.7) pt3dadd(45.64, 1051.17, -105.38, 0.7) pt3dadd(45.32, 1051.23, -105.38, 0.7) pt3dadd(44.6, 1051.7, -105.38, 0.7) pt3dadd(44.67, 1051.89, -105.38, 0.7) pt3dadd(44.28, 1052.14, -105.38, 0.7) pt3dadd(42.43, 1052.91, -105.38, 0.7) pt3dadd(41.41, 1053.42, -105.6, 0.7) pt3dadd(41.02, 1054.19, -106.46, 0.7) pt3dadd(40.64, 1054.96, -106.46, 0.7) pt3dadd(40, 1055.53, -106.46, 0.7) pt3dadd(39.55, 1055.79, -109.59, 0.7) pt3dadd(39.36, 1055.92, -110.89, 0.7) pt3dadd(38.59, 1056.3, -110.89, 0.7) pt3dadd(37.38, 1056.36, -110.89, 0.7) pt3dadd(36.29, 1056.49, -111.54, 0.7) pt3dadd(35.46, 1056.56, -111.54, 0.7) pt3dadd(34.37, 1056.49, -112.94, 0.7) pt3dadd(32.39, 1056.04, -114.02, 0.7) pt3dadd(30.34, 1055.98, -115.1, 0.7) pt3dadd(29.07, 1056.24, -115.1, 0.7) pt3dadd(27.53, 1056.75, -115.86, 0.7) pt3dadd(26.76, 1057.07, -115.86, 0.7) pt3dadd(24.91, 1058.47, -116.07, 0.7) pt3dadd(23.5, 1059.37, -116.39, 0.7) pt3dadd(21.58, 1060.33, -116.39, 0.7) pt3dadd(20.11, 1061.03, -117.58, 0.7) pt3dadd(19.35, 1061.54, -117.58, 0.7) pt3dadd(18.96, 1061.86, -118.77, 0.7) pt3dadd(18.77, 1062.12, -120.39, 0.7) pt3dadd(18.71, 1062.25, -121.15, 0.7) pt3dadd(18.58, 1062.5, -121.15, 0.7) pt3dadd(18.13, 1062.89, -121.15, 0.7) pt3dadd(17.75, 1063.33, -121.15, 0.7) pt3dadd(16.98, 1064.29, -121.79, 0.7) pt3dadd(16.41, 1065.51, -123.52, 0.7) pt3dadd(16.09, 1066.91, -125.36, 0.7) pt3dadd(16.15, 1068.26, -125.36, 0.7) pt3dadd(16.09, 1069.15, -126.65, 0.7) pt3dadd(15.96, 1069.34, -126.65, 0.7) pt3dadd(14.36, 1070.17, -126.98, 0.7) pt3dadd(13.59, 1070.94, -126.98, 0.7) pt3dadd(12.19, 1071.52, -127.73, 0.7) pt3dadd(11.03, 1072.28, -127.73, 0.7) pt3dadd(10.01, 1073.56, -130.22, 0.7) pt3dadd(9.12, 1074.39, -132.27, 0.7) pt3dadd(8.22, 1074.84, -132.27, 0.7) pt3dadd(8.03, 1075.03, -133.13, 0.7) pt3dadd(7.84, 1075.03, -133.13, 0.7) pt3dadd(6.81, 1075.16, -133.13, 0.7) pt3dadd(5.79, 1075.29, -133.56, 0.7) pt3dadd(4.83, 1075.35, -134.32, 0.7) pt3dadd(3.75, 1075.48, -134.97, 0.7) pt3dadd(3.17, 1075.48, -134.97, 0.7) pt3dadd(2.91, 1075.67, -136.26, 0.7) pt3dadd(1.86, 1075.96, -136.8, 0.7) pt3dadd(1.47, 1076.15, -136.8, 0.7) pt3dadd(0, 1077.18, -136.8, 0.7) pt3dadd(-1.34, 1078.13, -136.8, 0.7) pt3dadd(-2.36, 1078.71, -136.8, 0.7) pt3dadd(-3.45, 1079.22, -136.8, 0.7) pt3dadd(-4.54, 1079.48, -136.8, 0.7) pt3dadd(-5.43, 1079.86, -136.8, 0.7) pt3dadd(-6.01, 1079.92, -137.56, 0.7) pt3dadd(-7.29, 1079.8, -137.56, 0.7) pt3dadd(-8.89, 1079.99, -138.31, 0.7) pt3dadd(-10.42, 1080.18, -139.29, 0.7) pt3dadd(-11.44, 1080.5, -140.26, 0.7) pt3dadd(-12.02, 1080.5, -140.26, 0.7) pt3dadd(-12.79, 1080.12, -140.26, 0.7) pt3dadd(-13.81, 1079.35, -141.55, 0.7) } } proc shape3d_42() { apic[49] { pt3dadd(-14.96, 1078.97, -141.55, 0.7) pt3dadd(-15.6, 1079.16, -141.55, 0.7) pt3dadd(-25.19, 1080.76, -147.06, 0.7) pt3dadd(-25.19, 1080.76, -147.06, 0.7) pt3dadd(-25.38, 1080.82, -147.28, 0.7) pt3dadd(-26.15, 1080.88, -147.28, 0.7) pt3dadd(-28.32, 1080.88, -148.79, 0.7) pt3dadd(-29.73, 1081.2, -150.19, 0.7) pt3dadd(-30.63, 1081.46, -150.19, 0.7) pt3dadd(-31.27, 1081.78, -151.92, 0.7) pt3dadd(-32.48, 1081.97, -151.92, 0.7) pt3dadd(-33.44, 1081.71, -151.92, 0.7) pt3dadd(-35.36, 1081.71, -151.92, 0.7) pt3dadd(-36, 1081.52, -151.92, 0.7) pt3dadd(-36.96, 1081.4, -151.92, 0.7) pt3dadd(-37.66, 1081.59, -151.92, 0.7) pt3dadd(-38.17, 1081.91, -151.92, 0.7) pt3dadd(-38.79, 1082.9, -151.92, 0.7) pt3dadd(-39.23, 1083.22, -151.92, 0.7) pt3dadd(-41.6, 1084.11, -151.92, 0.7) pt3dadd(-43.84, 1084.69, -151.92, 0.7) pt3dadd(-45.18, 1084.75, -151.92, 0.7) pt3dadd(-46.52, 1084.75, -151.92, 0.7) pt3dadd(-48.38, 1085.01, -151.92, 0.7) pt3dadd(-49.98, 1085.2, -151.92, 0.7) pt3dadd(-51.7, 1085.27, -151.92, 0.7) pt3dadd(-54.71, 1085.97, -151.92, 0.7) pt3dadd(-58.29, 1086.67, -151.92, 0.7) pt3dadd(-61.8, 1087.57, -151.92, 0.7) pt3dadd(-64.36, 1088.33, -151.92, 0.7) pt3dadd(-65.77, 1088.78, -151.92, 0.7) pt3dadd(-67.81, 1089.74, -151.92, 0.7) pt3dadd(-73.18, 1091.6, -151.92, 0.7) pt3dadd(-74.46, 1092.49, -151.92, 0.7) pt3dadd(-75.04, 1093.07, -151.92, 0.7) pt3dadd(-75.49, 1093.71, -151.92, 0.7) pt3dadd(-75.87, 1093.9, -151.92, 0.7) pt3dadd(-76.57, 1094.22, -151.92, 0.7) pt3dadd(-77.92, 1094.6, -151.92, 0.7) pt3dadd(-79.58, 1095.11, -151.92, 0.7) pt3dadd(-80.41, 1095.56, -151.92, 0.7) pt3dadd(-80.99, 1095.88, -151.92, 0.7) pt3dadd(-81.7, 1096.37, -160.34, 0.7) pt3dadd(-82.72, 1097.52, -160.34, 0.7) pt3dadd(-83.68, 1098.1, -161.1, 0.7) pt3dadd(-85.21, 1098.61, -163.26, 0.7) pt3dadd(-86.81, 1098.8, -165.2, 0.7) pt3dadd(-88.54, 1098.99, -165.2, 0.7) pt3dadd(-88.79, 1098.99, -165.2, 0.7) pt3dadd(-90.9, 1099.25, -165.52, 0.7) pt3dadd(-91.1, 1099.44, -165.52, 0.7) pt3dadd(-92.5, 1100.14, -165.52, 0.7) pt3dadd(-93.4, 1100.33, -167.36, 0.7) pt3dadd(-93.59, 1100.4, -167.36, 0.7) pt3dadd(-93.65, 1100.4, -167.36, 0.7) } apic[50] {pt3dclear() pt3dadd(64.48, 753.92, -34.55, 4.16) pt3dadd(64.29, 753.5, -28.18, 4.16) pt3dadd(64.29, 754.65, -28.18, 4.16) pt3dadd(64.03, 755.61, -28.18, 4.16) pt3dadd(63.91, 755.93, -28.18, 4.16) pt3dadd(63.71, 756.25, -28.18, 4.16) pt3dadd(63.46, 756.63, -28.18, 4.16) pt3dadd(63.2, 757.02, -28.18, 4.16) pt3dadd(62.88, 757.59, -28.18, 4.16) pt3dadd(62.63, 758.68, -28.18, 4.16) pt3dadd(62.56, 759.32, -28.18, 4.16) pt3dadd(62.56, 760.53, -28.18, 4.16) } apic[51] {pt3dclear() pt3dadd(62.56, 760.53, -28.18, 2.17) pt3dadd(62.95, 762.01, -28.18, 2.17) pt3dadd(63.07, 762.58, -28.18, 2.17) pt3dadd(63.27, 763.6, -28.18, 2.17) pt3dadd(63.46, 764.37, -28.18, 2.17) pt3dadd(63.84, 765.27, -28.18, 2.17) pt3dadd(64.23, 766.16, -28.18, 2.17) pt3dadd(64.42, 766.74, -28.18, 2.17) pt3dadd(64.55, 767.18, -28.18, 2.17) pt3dadd(64.74, 767.7, -28.18, 2.17) pt3dadd(64.99, 768.34, -28.18, 2.17) pt3dadd(64.99, 770, -28.18, 2.17) pt3dadd(64.87, 770.76, -28.18, 2.17) pt3dadd(64.8, 771.66, -28.18, 2.17) pt3dadd(64.8, 773.71, -28.18, 2.17) pt3dadd(64.93, 775.05, -28.18, 2.17) pt3dadd(65.12, 776.52, -28.18, 2.17) pt3dadd(65.25, 778.05, -28.18, 2.17) pt3dadd(65.38, 779.59, -28.18, 2.17) pt3dadd(65.5, 781.19, -28.18, 2.17) pt3dadd(65.5, 783.68, -28.18, 2.17) pt3dadd(65.76, 784.51, -28.18, 2.17) pt3dadd(66.08, 785.28, -28.18, 2.17) pt3dadd(66.4, 785.92, -28.18, 2.17) pt3dadd(66.46, 786.24, -28.18, 2.17) pt3dadd(66.46, 786.3, -28.18, 2.17) pt3dadd(67.03, 787.08, -28.18, 2.17) pt3dadd(67.03, 793.09, -28.18, 2.17) pt3dadd(67.1, 793.92, -28.18, 2.17) pt3dadd(67.23, 794.95, -28.18, 2.17) pt3dadd(67.55, 795.84, -28.18, 2.17) pt3dadd(67.61, 796.74, -28.18, 2.17) pt3dadd(67.8, 798.34, -28.18, 2.17) pt3dadd(67.8, 802.3, -28.18, 2.17) pt3dadd(67.61, 803.2, -28.18, 2.17) pt3dadd(67.61, 804.22, -28.18, 2.17) pt3dadd(67.42, 805.37, -28.18, 2.17) pt3dadd(67.29, 806.14, -28.18, 2.17) pt3dadd(67.1, 806.84, -28.18, 2.17) pt3dadd(66.78, 807.42, -28.18, 2.17) pt3dadd(66.33, 808.06, -28.18, 2.17) pt3dadd(66.01, 808.63, -28.18, 2.17) pt3dadd(65.82, 809.14, -28.18, 2.17) pt3dadd(65.75, 809.65, -28.18, 2.17) pt3dadd(65.69, 810.42, -28.18, 2.17) pt3dadd(65.69, 816.11, -28.18, 2.17) pt3dadd(65.99, 818.42, -45.13, 2.49) pt3dadd(65.99, 822.06, -45.13, 2.49) pt3dadd(66.06, 822.77, -45.13, 2.49) pt3dadd(66.06, 826.6, -45.13, 2.49) pt3dadd(66.19, 827.5, -45.13, 2.49) pt3dadd(66.19, 832.93, -45.13, 2.49) pt3dadd(65.99, 833.89, -45.13, 2.49) pt3dadd(65.8, 834.4, -45.13, 2.49) pt3dadd(65.74, 834.72, -45.13, 2.49) pt3dadd(65.67, 835.23, -45.13, 2.56) pt3dadd(65.61, 835.81, -45.13, 2.62) pt3dadd(65.61, 842.65, -45.13, 2.81) pt3dadd(65.61, 843.8, -45.13, 2.81) pt3dadd(64.69, 845.8, -45.13, 2.81) pt3dadd(64.75, 846.63, -45.13, 2.81) pt3dadd(64.75, 850.59, -45.13, 2.81) pt3dadd(64.82, 851.81, -45.13, 2.81) pt3dadd(64.82, 855.45, -45.13, 2.81) pt3dadd(64.88, 856.73, -45.13, 2.81) pt3dadd(64.82, 858.14, -45.13, 2.81) pt3dadd(64.5, 859.23, -45.13, 2.81) pt3dadd(64.05, 860.38, -45.13, 2.81) pt3dadd(63.41, 861.72, -45.13, 2.81) pt3dadd(63.09, 862.55, -45.13, 2.81) pt3dadd(62.96, 862.93, -45.13, 2.81) pt3dadd(61.88, 865.43, -45.13, 2.81) pt3dadd(61.37, 866.64, -45.13, 2.81) pt3dadd(60.22, 869.52, -45.13, 2.81) pt3dadd(59.7, 871.37, -45.13, 2.81) pt3dadd(59.58, 872.97, -45.13, 2.81) pt3dadd(59.7, 874.31, -45.13, 2.81) pt3dadd(59.77, 875.15, -45.13, 2.81) pt3dadd(59.77, 875.27, -45.13, 2.81) pt3dadd(59.57, 876.02, -45.13, 2.81) pt3dadd(59.57, 879.79, -45.13, 2.81) pt3dadd(59.25, 881.65, -45.13, 2.81) pt3dadd(59.06, 883.82, -45.13, 2.81) pt3dadd(58.94, 885.8, -45.13, 2.81) pt3dadd(58.74, 887.27, -45.13, 2.81) pt3dadd(58.62, 888.04, -45.13, 2.81) pt3dadd(57.46, 890.92, -45.13, 2.81) pt3dadd(57.4, 892.13, -45.13, 2.81) pt3dadd(57.4, 896.22, -45.13, 2.81) pt3dadd(57.34, 898.08, -45.13, 2.81) pt3dadd(57.34, 899.61, -45.13, 2.81) pt3dadd(57.14, 900.76, -45.13, 2.81) pt3dadd(56.63, 901.85, -45.13, 2.81) pt3dadd(56.19, 903, -45.13, 2.81) pt3dadd(55.67, 904.09, -45.13, 2.81) pt3dadd(55.35, 904.73, -45.13, 2.81) pt3dadd(55.16, 905.05, -45.13, 2.81) pt3dadd(55.16, 905.11, -45.13, 2.81) pt3dadd(55.05, 906.71, -45.13, 2.81) pt3dadd(54.98, 907.23, -45.13, 2.81) pt3dadd(54.98, 909.66, -45.13, 2.81) pt3dadd(54.54, 910.87, -45.13, 2.81) pt3dadd(54.15, 911.64, -46, 2.81) pt3dadd(53.7, 912.34, -46, 2.81) pt3dadd(53.58, 912.47, -48.37, 2.81) pt3dadd(53.51, 912.53, -50.75, 2.81) pt3dadd(52.94, 913.11, -50.75, 2.81) pt3dadd(52.55, 913.75, -50.75, 2.81) pt3dadd(52.23, 914.9, -50.75, 2.81) pt3dadd(52.23, 916.94, -50.75, 2.81) pt3dadd(52.55, 918.8, -50.86, 2.81) pt3dadd(52.55, 922.19, -51.83, 2.81) pt3dadd(52.17, 923.85, -51.83, 2.81) pt3dadd(51.79, 924.75, -54.42, 2.81) pt3dadd(51.02, 927.17, -54.85, 2.81) pt3dadd(50.44, 928.33, -54.85, 2.81) pt3dadd(49.8, 929.54, -54.96, 2.81) pt3dadd(49.23, 931.01, -54.96, 2.81) pt3dadd(48.4, 932.48, -55.82, 2.81) pt3dadd(47.95, 934.02, -56.58, 2.81) pt3dadd(47.82, 934.98, -56.58, 2.81) pt3dadd(47.82, 935.42, -56.58, 2.81) pt3dadd(47.75, 936.38, -58.2, 2.81) pt3dadd(47.62, 936.95, -58.2, 2.81) pt3dadd(47.49, 937.78, -58.2, 2.81) pt3dadd(47.24, 938.36, -58.2, 2.81) pt3dadd(46.92, 938.74, -58.2, 2.81) pt3dadd(46.47, 939.25, -58.2, 2.81) pt3dadd(46.34, 939.51, -58.2, 2.81) pt3dadd(46.4, 939.83, -58.2, 2.81) pt3dadd(46.4, 939.89, -58.2, 2.81) } apic[52] {pt3dclear() pt3dadd(46.4, 939.89, -58.2, 1.6) pt3dadd(45.51, 939.64, -58.2, 1.6) } } proc shape3d_43() { apic[52] { pt3dadd(44.81, 940.53, -58.2, 1.6) pt3dadd(44.23, 941.04, -58.2, 1.6) pt3dadd(43.33, 941.62, -58.2, 1.6) pt3dadd(42.31, 942.13, -58.2, 1.6) pt3dadd(41.35, 942.26, -58.2, 1.6) pt3dadd(40.46, 942.07, -58.31, 1.6) pt3dadd(39.75, 942.07, -58.31, 1.6) pt3dadd(39.56, 942.19, -63.38, 1.6) pt3dadd(39.18, 942.58, -63.38, 1.6) pt3dadd(38.48, 943.41, -63.38, 1.6) pt3dadd(37.77, 943.73, -63.38, 1.6) pt3dadd(36.43, 943.92, -63.38, 1.6) pt3dadd(35.02, 944.37, -63.49, 1.6) pt3dadd(34, 944.94, -64.57, 1.6) pt3dadd(32.59, 945.77, -67.27, 1.6) pt3dadd(31.57, 946.35, -67.27, 1.6) pt3dadd(31.38, 946.48, -67.27, 1.6) pt3dadd(28.95, 947.95, -68.02, 1.41) pt3dadd(27.8, 948.84, -68.02, 1.41) pt3dadd(27.03, 949.55, -68.02, 1.41) pt3dadd(26.26, 950.63, -68.02, 1.41) pt3dadd(25.43, 951.78, -68.24, 1.41) pt3dadd(24.73, 953.06, -69.53, 1.41) pt3dadd(24.28, 954.47, -69.53, 1.41) pt3dadd(23.83, 955.43, -72.23, 1.41) pt3dadd(23.58, 955.88, -73.31, 1.41) pt3dadd(23.39, 956.2, -73.31, 1.41) pt3dadd(23, 956.71, -73.31, 1.41) pt3dadd(22.23, 957.61, -77.52, 1.41) pt3dadd(21.78, 958.45, -77.52, 1.41) pt3dadd(21.01, 959.09, -77.52, 1.41) pt3dadd(19.09, 959.92, -77.52, 1.41) pt3dadd(17.11, 960.43, -77.52, 1.41) pt3dadd(15.58, 960.68, -77.52, 1.41) pt3dadd(14.3, 961.13, -77.52, 1.41) pt3dadd(13.66, 961.77, -77.52, 1.41) pt3dadd(12.83, 962.79, -77.52, 1.41) pt3dadd(11.8, 963.82, -77.52, 1.41) pt3dadd(11.04, 964.78, -77.52, 1.41) pt3dadd(10.4, 965.73, -77.52, 1.41) pt3dadd(9.95, 967.01, -77.52, 1.41) pt3dadd(9.44, 968.29, -77.52, 1.41) pt3dadd(8.93, 969.57, -77.52, 1.41) pt3dadd(8.42, 970.85, -77.52, 1.41) pt3dadd(8.1, 971.62, -77.52, 1.41) pt3dadd(7.71, 972.51, -77.52, 1.41) pt3dadd(7.33, 973.28, -77.52, 1.41) pt3dadd(7.01, 973.73, -77.52, 1.41) pt3dadd(6.88, 973.92, -77.52, 1.41) pt3dadd(6.11, 976.09, -83.57, 1.41) pt3dadd(5.28, 976.99, -83.57, 1.41) pt3dadd(4.71, 977.44, -83.57, 1.41) pt3dadd(3.43, 977.95, -83.57, 1.41) pt3dadd(2.28, 978.59, -83.57, 1.41) pt3dadd(1.45, 979.03, -84.11, 1.41) pt3dadd(0.49, 979.86, -84.97, 1.41) pt3dadd(0.04, 980.63, -84.97, 1.41) pt3dadd(-0.34, 981.53, -86.27, 1.41) pt3dadd(-0.34, 981.65, -86.27, 1.41) pt3dadd(-0.98, 982.87, -88.43, 1.41) pt3dadd(-1.88, 983.25, -88.43, 1.41) pt3dadd(-2.9, 983.7, -88.43, 1.41) pt3dadd(-3.67, 984.4, -88.43, 1.41) pt3dadd(-3.61, 985.68, -88.43, 1.41) pt3dadd(-2.9, 987.03, -88.86, 1.41) pt3dadd(-2.2, 988.37, -88.86, 1.41) pt3dadd(-2.2, 990.29, -90.59, 1.41) pt3dadd(-2.39, 991.88, -91.45, 1.41) pt3dadd(-2.9, 992.91, -91.99, 1.41) pt3dadd(-3.8, 993.93, -91.99, 1.41) pt3dadd(-3.86, 994.06, -91.99, 1.41) pt3dadd(-3.99, 994.19, -91.99, 1.41) pt3dadd(-4.3, 995.97, -92.42, 1.41) pt3dadd(-5.51, 997.76, -92.42, 1.41) pt3dadd(-6.15, 998.85, -92.42, 1.41) pt3dadd(-6.6, 999.81, -92.42, 1.41) pt3dadd(-6.86, 1001.21, -92.42, 1.41) pt3dadd(-6.86, 1002.56, -92.42, 1.41) pt3dadd(-6.22, 1003.83, -92.42, 1.41) pt3dadd(-5.51, 1005.05, -92.42, 1.41) pt3dadd(-5.19, 1005.69, -92.42, 1.41) pt3dadd(-5.26, 1006.58, -92.86, 1.41) pt3dadd(-6.09, 1007.35, -92.86, 1.41) pt3dadd(-6.79, 1007.74, -92.86, 1.41) pt3dadd(-7.24, 1008.12, -94.91, 1.41) pt3dadd(-7.43, 1008.25, -97.28, 1.41) pt3dadd(-7.62, 1008.44, -97.28, 1.41) pt3dadd(-8.97, 1009.46, -97.28, 1.41) pt3dadd(-9.67, 1010.04, -97.39, 1.41) pt3dadd(-11.39, 1012.27, -98.26, 1.41) pt3dadd(-11.59, 1013.23, -98.26, 1.41) pt3dadd(-11.46, 1014, -101.39, 1.41) pt3dadd(-11.46, 1015.41, -104.41, 1.41) pt3dadd(-11.78, 1015.54, -105.81, 1.41) pt3dadd(-12.48, 1015.73, -107.76, 1.41) pt3dadd(-13.12, 1016.11, -109.59, 1.41) pt3dadd(-13.63, 1016.62, -109.59, 1.41) pt3dadd(-14.21, 1017.58, -109.92, 1.41) pt3dadd(-14.27, 1017.65, -109.92, 1.41) pt3dadd(-14.21, 1018.41, -109.92, 1.41) pt3dadd(-15.1, 1020.39, -109.92, 1.41) pt3dadd(-15.17, 1021.93, -110.56, 1.41) pt3dadd(-15.36, 1023.34, -110.56, 1.41) pt3dadd(-15.61, 1024.36, -111.43, 1.41) pt3dadd(-15.81, 1024.87, -112.4, 1.41) pt3dadd(-15.87, 1024.93, -112.4, 1.41) pt3dadd(-15.71, 1025.72, -113.48, 1.41) pt3dadd(-16.15, 1026.74, -113.48, 1.41) pt3dadd(-16.86, 1028.02, -113.48, 1.41) pt3dadd(-18.2, 1029.36, -113.48, 1.41) pt3dadd(-19.03, 1030.07, -113.48, 1.41) pt3dadd(-20.12, 1031.79, -113.59, 1.41) pt3dadd(-20.44, 1032.56, -114.99, 1.41) pt3dadd(-20.5, 1032.75, -114.99, 1.41) pt3dadd(-20.57, 1032.94, -117.15, 1.41) pt3dadd(-20.57, 1034.54, -119.2, 1.41) pt3dadd(-20.88, 1035.63, -119.2, 1.41) pt3dadd(-21.97, 1038.06, -119.42, 1.41) pt3dadd(-22.23, 1039.15, -120.5, 1.41) pt3dadd(-22.23, 1040.55, -122.12, 1.41) pt3dadd(-22.42, 1041.64, -122.12, 1.41) pt3dadd(-22.48, 1042.15, -122.12, 1.41) pt3dadd(-23.57, 1044.07, -124.6, 1.41) pt3dadd(-24.02, 1045.48, -124.6, 1.41) pt3dadd(-24.34, 1047.07, -124.6, 1.41) pt3dadd(-24.47, 1048.23, -124.6, 1.41) pt3dadd(-24.85, 1049.31, -124.6, 1.41) pt3dadd(-25.42, 1050.21, -125.14, 1.41) pt3dadd(-26.26, 1050.78, -126.44, 1.41) pt3dadd(-27.15, 1051.23, -127.84, 1.41) pt3dadd(-28.56, 1051.68, -127.84, 1.41) pt3dadd(-29.9, 1052.32, -128.81, 1.41) pt3dadd(-31.18, 1053.28, -128.81, 1.41) pt3dadd(-31.82, 1054.11, -129.03, 1.41) pt3dadd(-31.88, 1054.68, -129.03, 1.41) pt3dadd(-31.88, 1054.88, -129.03, 1.41) pt3dadd(-31.51, 1055.24, -129.03, 1.41) pt3dadd(-31.06, 1056.58, -129.03, 1.41) pt3dadd(-31.19, 1057.86, -129.03, 1.41) pt3dadd(-31.89, 1059.2, -129.03, 1.41) pt3dadd(-32.59, 1060.22, -130.22, 1.41) pt3dadd(-33.36, 1060.86, -130.22, 1.41) pt3dadd(-33.94, 1061.25, -132.27, 1.41) pt3dadd(-34.19, 1061.44, -136.05, 1.41) pt3dadd(-35.09, 1062.21, -136.05, 1.41) pt3dadd(-35.47, 1062.4, -136.05, 1.41) pt3dadd(-36.62, 1062.78, -137.99, 1.41) pt3dadd(-37.58, 1063.16, -137.99, 1.41) pt3dadd(-38.35, 1063.42, -140.69, 1.41) pt3dadd(-39.31, 1063.68, -140.69, 1.41) pt3dadd(-39.75, 1063.68, -141.77, 1.41) pt3dadd(-40.27, 1063.23, -141.77, 1.41) pt3dadd(-40.9, 1061.82, -142.2, 1.41) pt3dadd(-41.29, 1060.99, -142.2, 1.41) pt3dadd(-41.54, 1060.42, -142.2, 1.41) pt3dadd(-41.74, 1059.46, -142.2, 1.41) pt3dadd(-41.8, 1058.94, -142.2, 1.41) pt3dadd(-41.99, 1058.62, -142.2, 1.41) pt3dadd(-42.25, 1058.37, -142.2, 1.41) pt3dadd(-43.21, 1058.31, -142.42, 1.41) pt3dadd(-44.93, 1058.43, -143.82, 1.41) pt3dadd(-45.96, 1058.82, -143.82, 1.41) pt3dadd(-46.02, 1058.88, -143.82, 1.41) pt3dadd(-46.6, 1059.2, -149.54, 1.41) pt3dadd(-46.85, 1059.39, -149.54, 1.41) pt3dadd(-48.58, 1060.16, -149.54, 1.41) pt3dadd(-50.75, 1060.8, -149.54, 1.41) pt3dadd(-52.03, 1061.12, -149.54, 1.41) pt3dadd(-53.05, 1060.93, -149.54, 1.41) pt3dadd(-54.33, 1060.61, -150.73, 1.41) pt3dadd(-55.42, 1060.16, -151.81, 1.41) pt3dadd(-56.51, 1060.1, -153.75, 1.41) pt3dadd(-57.46, 1060.22, -153.75, 1.41) pt3dadd(-57.72, 1060.35, -156.02, 1.41) pt3dadd(-59.19, 1060.8, -156.34, 1.41) pt3dadd(-59.57, 1061.12, -156.34, 1.41) pt3dadd(-60.34, 1061.76, -156.34, 1.41) pt3dadd(-61.17, 1062.14, -157.1, 1.41) pt3dadd(-62.32, 1062.59, -157.1, 1.41) pt3dadd(-62.84, 1062.91, -167.47, 1.41) pt3dadd(-63.09, 1063.23, -167.47, 1.41) pt3dadd(-63.73, 1063.61, -167.47, 1.41) pt3dadd(-64.11, 1063.61, -167.47, 1.41) pt3dadd(-65.01, 1063.29, -167.47, 1.41) pt3dadd(-65.2, 1062.78, -167.47, 1.41) pt3dadd(-65.39, 1061.31, -168.65, 1.41) pt3dadd(-65.52, 1060.35, -168.65, 1.41) pt3dadd(-65.59, 1060.1, -168.65, 1.41) pt3dadd(-65.59, 1058.24, -180.53, 1.41) pt3dadd(-65.65, 1058.5, -182.26, 1.41) pt3dadd(-65.65, 1058.75, -183.55, 1.41) pt3dadd(-66.1, 1059.14, -186.25, 1.41) pt3dadd(-66.86, 1059.33, -186.25, 1.41) pt3dadd(-67.44, 1059.39, -186.25, 1.41) pt3dadd(-68.33, 1059.39, -187.44, 1.41) pt3dadd(-68.72, 1059.07, -187.44, 1.41) pt3dadd(-69.49, 1057.86, -187.44, 1.41) pt3dadd(-69.68, 1056.9, -187.44, 1.41) pt3dadd(-69.55, 1055.81, -187.44, 1.41) pt3dadd(-69.29, 1055.17, -187.44, 1.41) } } proc shape3d_44() { apic[52] { pt3dadd(-69.23, 1055.04, -187.44, 1.41) } apic[53] {pt3dclear() pt3dadd(46.4, 939.89, -58.2, 2.37) pt3dadd(46.79, 940.92, -49.56, 2.37) pt3dadd(46.79, 942.52, -49.56, 2.37) pt3dadd(46.59, 943.54, -49.56, 2.37) pt3dadd(46.47, 944.44, -49.56, 2.37) pt3dadd(46.08, 945.46, -49.56, 2.37) pt3dadd(45.89, 946.23, -49.56, 2.37) pt3dadd(45.57, 947.31, -49.56, 2.37) pt3dadd(45.19, 948.08, -49.56, 2.37) pt3dadd(44.93, 948.66, -49.56, 2.37) pt3dadd(44.42, 949.42, -49.56, 2.37) pt3dadd(43.91, 950.06, -49.56, 2.37) pt3dadd(43.53, 950.7, -49.56, 2.37) pt3dadd(42.95, 951.6, -49.56, 2.37) pt3dadd(42.57, 952.3, -49.56, 2.37) pt3dadd(42.18, 953.2, -49.56, 2.37) pt3dadd(41.99, 953.64, -49.56, 2.37) pt3dadd(41.86, 954.03, -49.56, 2.37) pt3dadd(41.8, 954.47, -49.56, 2.37) pt3dadd(41.73, 954.99, -49.56, 2.37) pt3dadd(41.73, 959.01, -49.56, 2.69) pt3dadd(41.61, 959.27, -49.56, 2.69) pt3dadd(41.42, 959.59, -49.56, 2.69) pt3dadd(41.29, 959.85, -49.56, 2.69) pt3dadd(41.16, 960.04, -49.56, 2.69) pt3dadd(41.03, 960.42, -49.56, 2.69) pt3dadd(40.97, 960.68, -49.56, 2.69) pt3dadd(40.97, 961.06, -49.56, 2.88) } apic[54] {pt3dclear() pt3dadd(40.97, 961.06, -49.56, 1.66) pt3dadd(39.88, 962.15, -49.56, 1.66) pt3dadd(39.56, 962.53, -49.56, 1.66) pt3dadd(38.79, 963.17, -49.56, 1.66) pt3dadd(38.22, 964, -49.56, 1.66) pt3dadd(37.39, 965.92, -49.56, 1.66) pt3dadd(36.68, 967.13, -49.56, 1.66) pt3dadd(35.98, 967.77, -49.56, 1.66) pt3dadd(34.89, 968.67, -49.56, 1.66) pt3dadd(33.61, 969.24, -49.56, 1.66) pt3dadd(33.49, 969.44, -49.56, 1.66) pt3dadd(33.23, 969.76, -49.56, 1.66) pt3dadd(33.23, 969.82, -49.56, 1.66) pt3dadd(32.67, 971.12, -49.56, 1.66) pt3dadd(32.61, 971.7, -49.56, 1.66) pt3dadd(32.61, 972.4, -49.56, 1.66) pt3dadd(32.48, 972.53, -49.56, 1.66) } apic[55] {pt3dclear() pt3dadd(32.48, 972.53, -49.56, 1.41) pt3dadd(31.01, 973.68, -49.56, 1.41) pt3dadd(30.18, 974.13, -49.56, 1.41) pt3dadd(29.41, 974.64, -49.56, 1.41) pt3dadd(28.13, 975.53, -49.56, 1.41) pt3dadd(27.11, 976.62, -49.56, 1.41) pt3dadd(26.53, 977.64, -49.56, 1.41) pt3dadd(25.77, 978.8, -49.56, 1.41) pt3dadd(25.13, 979.56, -49.56, 1.41) pt3dadd(24.3, 980.71, -49.56, 1.41) pt3dadd(23.34, 981.61, -49.56, 1.41) pt3dadd(23.08, 981.93, -49.56, 1.41) pt3dadd(20.2, 983.21, -49.56, 1.41) pt3dadd(19.37, 983.59, -49.56, 1.41) pt3dadd(17.84, 984.04, -49.56, 1.41) pt3dadd(15.09, 985.13, -49.56, 1.41) pt3dadd(13.49, 985.96, -49.56, 1.41) pt3dadd(12.4, 986.72, -49.56, 1.41) pt3dadd(11.32, 988.26, -49.56, 1.41) pt3dadd(10.93, 988.71, -49.56, 1.41) pt3dadd(10.68, 989.09, -49.56, 1.41) pt3dadd(10.61, 989.22, -49.56, 1.41) pt3dadd(10.55, 989.35, -47.08, 1.41) pt3dadd(10.48, 989.54, -47.08, 1.41) pt3dadd(10.42, 989.6, -46.64, 1.41) pt3dadd(10.42, 989.73, -46.64, 1.41) pt3dadd(10.36, 989.79, -46.43, 1.41) pt3dadd(10.29, 989.98, -46.43, 1.41) pt3dadd(10.16, 990.11, -50.1, 1.41) pt3dadd(10.16, 990.3, -53.01, 1.41) pt3dadd(10.1, 990.37, -53.01, 1.41) pt3dadd(10.1, 990.5, -52.8, 1.41) pt3dadd(10.04, 990.75, -52.8, 1.41) pt3dadd(9.85, 991.2, -50.75, 1.41) pt3dadd(9.72, 991.52, -50.75, 1.41) pt3dadd(9.65, 991.65, -44.92, 1.41) pt3dadd(9.59, 991.71, -43.51, 1.41) pt3dadd(9.4, 991.97, -43.51, 1.41) pt3dadd(9.21, 992.29, -43.51, 1.41) pt3dadd(8.89, 992.73, -57.55, 1.41) pt3dadd(8.76, 993.05, -57.55, 1.41) pt3dadd(8.25, 994.2, -57.55, 1.41) pt3dadd(7.8, 995.16, -61, 1.41) pt3dadd(7.35, 995.99, -61, 1.41) pt3dadd(6.14, 997.53, -61, 1.41) pt3dadd(5.69, 997.85, -61.11, 1.41) pt3dadd(5.63, 997.91, -61.11, 1.41) pt3dadd(4.97, 998.33, -63.81, 1.41) pt3dadd(-0.91, 1003.7, -63.81, 1.47) pt3dadd(-1.04, 1003.89, -63.81, 1.47) pt3dadd(-1.29, 1004.34, -63.81, 1.47) pt3dadd(-1.42, 1004.66, -63.81, 1.47) pt3dadd(-1.74, 1005.17, -63.81, 1.47) pt3dadd(-1.93, 1005.36, -63.81, 1.47) pt3dadd(-2.13, 1005.68, -63.81, 1.47) pt3dadd(-2.19, 1005.81, -63.81, 1.47) } apic[56] {pt3dclear() pt3dadd(-2.19, 1005.81, -63.81, 1.21) pt3dadd(-3.66, 1007.47, -63.81, 1.21) pt3dadd(-3.92, 1007.85, -63.81, 1.21) pt3dadd(-4.81, 1008.62, -63.81, 1.21) pt3dadd(-5.32, 1009.26, -63.81, 1.21) pt3dadd(-6.41, 1010.54, -63.81, 1.21) pt3dadd(-7.05, 1011.82, -63.81, 1.21) pt3dadd(-8.26, 1013.61, -63.81, 1.21) pt3dadd(-8.78, 1014.38, -63.81, 1.21) pt3dadd(-9.29, 1015.21, -63.81, 1.21) pt3dadd(-10.05, 1016.04, -63.81, 1.21) pt3dadd(-10.63, 1016.49, -63.81, 1.21) pt3dadd(-11.27, 1017.06, -63.81, 1.21) pt3dadd(-11.91, 1017.45, -63.81, 1.21) pt3dadd(-12.87, 1017.96, -63.81, 1.21) pt3dadd(-13.06, 1018.21, -64.03, 1.21) pt3dadd(-13.12, 1018.21, -64.03, 1.21) pt3dadd(-13.32, 1018.6, -66.3, 1.21) pt3dadd(-14.02, 1019.49, -66.3, 1.21) pt3dadd(-15.04, 1020.45, -66.3, 1.21) pt3dadd(-16.19, 1021.22, -66.3, 1.21) pt3dadd(-17.41, 1022.18, -67.27, 1.21) pt3dadd(-17.98, 1022.88, -67.27, 1.21) pt3dadd(-18.24, 1023.07, -67.27, 1.21) pt3dadd(-18.3, 1023.2, -71.26, 1.21) pt3dadd(-18.3, 1023.46, -71.26, 1.21) pt3dadd(-18.56, 1024.29, -71.26, 1.21) pt3dadd(-18.94, 1025.37, -71.26, 1.21) pt3dadd(-19.33, 1026.14, -71.26, 1.21) pt3dadd(-19.58, 1026.84, -71.26, 1.21) pt3dadd(-19.58, 1027.29, -71.26, 1.21) pt3dadd(-20.87, 1027.47, -71.26, 1.21) pt3dadd(-20.87, 1028.81, -71.26, 1.21) pt3dadd(-21.25, 1030.03, -71.26, 1.21) pt3dadd(-21.7, 1030.73, -71.26, 1.21) pt3dadd(-22.08, 1031.05, -71.26, 1.21) pt3dadd(-22.91, 1030.8, -71.26, 1.21) pt3dadd(-23.94, 1030.22, -71.26, 1.21) pt3dadd(-25.41, 1029.33, -71.26, 1.21) pt3dadd(-27.39, 1029.07, -73.42, 1.21) pt3dadd(-28.73, 1029.2, -74.5, 1.21) pt3dadd(-28.92, 1029.26, -74.5, 1.21) pt3dadd(-29.12, 1029.26, -74.5, 1.21) pt3dadd(-29.44, 1029.33, -74.72, 1.21) pt3dadd(-30.2, 1029.45, -74.72, 1.21) pt3dadd(-33.91, 1029.45, -74.72, 1.21) pt3dadd(-35.7, 1029.65, -74.72, 1.21) pt3dadd(-38.13, 1029.65, -74.72, 1.21) pt3dadd(-39.99, 1029.97, -75.04, 1.21) pt3dadd(-41.9, 1030.48, -75.04, 1.21) pt3dadd(-43.57, 1030.8, -75.04, 1.21) pt3dadd(-44.59, 1030.92, -75.04, 1.21) pt3dadd(-47.4, 1031.24, -77.52, 1.21) pt3dadd(-49.77, 1031.63, -77.52, 1.21) pt3dadd(-52.39, 1032.01, -77.52, 1.21) pt3dadd(-55.27, 1032.84, -77.52, 1.21) pt3dadd(-56.1, 1033.35, -77.52, 1.21) pt3dadd(-56.42, 1033.61, -79.36, 1.21) pt3dadd(-56.48, 1033.74, -81.52, 1.21) pt3dadd(-56.61, 1033.99, -81.52, 1.21) pt3dadd(-57.06, 1034.57, -81.52, 1.21) pt3dadd(-57.57, 1035.27, -81.52, 1.21) pt3dadd(-58.34, 1035.98, -82.06, 1.21) pt3dadd(-59.04, 1036.81, -82.06, 1.21) pt3dadd(-59.49, 1037.83, -85.41, 1.21) pt3dadd(-59.87, 1038.79, -86.27, 1.21) pt3dadd(-60.25, 1039.88, -86.27, 1.21) pt3dadd(-60.51, 1040.13, -86.38, 1.21) pt3dadd(-60.7, 1040.64, -86.38, 1.21) pt3dadd(-60.7, 1040.71, -86.38, 1.21) pt3dadd(-63.37, 1041.48, -86.38, 1.21) pt3dadd(-63.37, 1041.87, -86.38, 1.21) pt3dadd(-63.76, 1042.44, -86.38, 1.21) pt3dadd(-64.85, 1043.34, -86.38, 1.21) pt3dadd(-66.38, 1044.36, -86.38, 1.21) pt3dadd(-67.47, 1045.38, -86.38, 1.21) pt3dadd(-68.62, 1046.41, -86.92, 1.21) pt3dadd(-69.83, 1047.81, -88.86, 1.21) pt3dadd(-70.09, 1048.13, -93.18, 1.21) pt3dadd(-70.86, 1049.86, -93.18, 1.21) pt3dadd(-71.69, 1051.33, -93.18, 1.21) pt3dadd(-72.39, 1052.54, -93.18, 1.21) pt3dadd(-73.22, 1053.57, -93.18, 1.21) pt3dadd(-74.12, 1054.59, -93.18, 1.21) pt3dadd(-75.2, 1055.68, -93.18, 1.21) pt3dadd(-76.16, 1056.57, -93.18, 1.21) pt3dadd(-76.55, 1057.02, -93.18, 1.21) pt3dadd(-77.31, 1057.79, -93.18, 1.21) pt3dadd(-78.72, 1059, -93.18, 1.21) pt3dadd(-80.25, 1060.28, -93.18, 1.21) pt3dadd(-81.41, 1061.18, -93.18, 1.21) pt3dadd(-82.49, 1062.14, -93.18, 1.21) pt3dadd(-83.52, 1063.22, -93.18, 1.21) pt3dadd(-84.22, 1064.18, -93.18, 1.21) pt3dadd(-84.92, 1065.08, -93.18, 1.21) pt3dadd(-85.69, 1065.84, -93.18, 1.21) pt3dadd(-86.39, 1066.68, -93.18, 1.21) pt3dadd(-87.1, 1067.38, -93.18, 1.21) } } proc shape3d_45() { apic[56] { pt3dadd(-88.06, 1068.27, -93.18, 1.21) pt3dadd(-88.63, 1068.72, -93.18, 1.21) pt3dadd(-89.21, 1069.23, -93.18, 1.21) pt3dadd(-89.33, 1069.42, -93.18, 1.21) pt3dadd(-90.86, 1070.6, -93.18, 1.21) pt3dadd(-91.5, 1071.49, -93.18, 1.21) pt3dadd(-92.39, 1072.58, -93.18, 1.21) pt3dadd(-93.67, 1074.37, -93.18, 1.21) pt3dadd(-95.78, 1076.41, -93.18, 1.21) pt3dadd(-98.53, 1078.33, -93.18, 1.21) pt3dadd(-101.35, 1079.93, -93.18, 1.21) pt3dadd(-103.33, 1081.4, -93.18, 1.21) pt3dadd(-104.41, 1082.3, -93.18, 1.21) pt3dadd(-105.05, 1083.13, -93.18, 1.21) pt3dadd(-105.37, 1083.83, -93.18, 1.21) pt3dadd(-105.76, 1085.05, -93.18, 1.21) pt3dadd(-106.08, 1085.94, -93.18, 1.21) pt3dadd(-106.72, 1086.64, -93.18, 1.21) pt3dadd(-107.16, 1087.03, -93.18, 1.21) pt3dadd(-108.44, 1087.09, -93.18, 1.21) pt3dadd(-109.53, 1087.16, -93.18, 1.21) pt3dadd(-110.55, 1087.28, -93.18, 1.21) pt3dadd(-113.62, 1087.28, -93.18, 1.21) pt3dadd(-115.8, 1087.73, -93.18, 1.21) pt3dadd(-117.2, 1088.11, -93.18, 1.21) pt3dadd(-117.71, 1088.24, -93.18, 1.21) pt3dadd(-118.35, 1087.79, -93.18, 1.21) pt3dadd(-121.1, 1089.14, -93.18, 1.21) pt3dadd(-122.77, 1089.84, -93.18, 1.21) pt3dadd(-124.17, 1090.42, -93.18, 1.21) pt3dadd(-126.15, 1091.18, -93.18, 1.21) pt3dadd(-127.56, 1091.63, -93.18, 1.21) pt3dadd(-128.58, 1092.4, -93.18, 1.21) pt3dadd(-129.73, 1093.36, -93.18, 1.21) pt3dadd(-130.44, 1093.8, -93.18, 1.21) pt3dadd(-131.08, 1094.12, -93.18, 1.21) pt3dadd(-131.53, 1094.44, -93.18, 1.21) pt3dadd(-131.91, 1094.57, -93.18, 1.21) pt3dadd(-133.78, 1095.01, -93.18, 1.21) pt3dadd(-134.61, 1095.33, -93.18, 1.21) pt3dadd(-137.36, 1095.9, -93.18, 1.21) pt3dadd(-139.34, 1096.35, -93.18, 1.21) pt3dadd(-141.52, 1097.05, -93.18, 1.21) pt3dadd(-143.82, 1097.76, -93.18, 1.21) pt3dadd(-146.18, 1098.27, -93.18, 1.21) pt3dadd(-148.36, 1098.84, -93.18, 1.21) pt3dadd(-150.4, 1099.48, -93.18, 1.21) pt3dadd(-151.49, 1099.74, -93.18, 1.21) pt3dadd(-152.32, 1099.87, -93.18, 1.21) pt3dadd(-153.54, 1100.12, -93.18, 1.21) pt3dadd(-154.56, 1100.32, -93.18, 1.21) pt3dadd(-155.07, 1100.32, -93.18, 1.21) pt3dadd(-155.58, 1100.38, -81.3, 1.21) pt3dadd(-156.29, 1100.44, -80.66, 1.21) pt3dadd(-156.99, 1100.7, -80.66, 1.21) pt3dadd(-157.44, 1100.76, -80.66, 1.21) pt3dadd(-157.88, 1100.83, -80.12, 1.21) pt3dadd(-158.78, 1100.95, -80.12, 1.21) pt3dadd(-159.74, 1101.02, -80.12, 1.21) pt3dadd(-161.15, 1101.02, -80.12, 1.21) pt3dadd(-161.66, 1100.89, -80.33, 1.21) pt3dadd(-163.26, 1100.89, -80.33, 1.21) pt3dadd(-164.98, 1100.63, -80.33, 1.21) pt3dadd(-167.22, 1100.57, -80.33, 1.21) pt3dadd(-168.63, 1101.02, -80.33, 1.21) pt3dadd(-169.91, 1101.72, -80.33, 1.21) pt3dadd(-171.18, 1102.3, -80.33, 1.21) pt3dadd(-172.21, 1102.68, -79.36, 1.21) pt3dadd(-172.91, 1103.13, -79.36, 1.21) pt3dadd(-173.87, 1103.58, -78.82, 1.21) pt3dadd(-174.7, 1103.64, -78.82, 1.21) pt3dadd(-175.28, 1103.64, -77.63, 1.21) pt3dadd(-176.65, 1103.2, -76.44, 1.21) pt3dadd(-176.78, 1103.4, -76.44, 1.21) pt3dadd(-177.74, 1103.65, -76.44, 1.21) pt3dadd(-180.29, 1103.78, -76.44, 1.21) pt3dadd(-183.36, 1104.1, -76.44, 1.21) pt3dadd(-185.15, 1104.36, -76.44, 1.21) pt3dadd(-186.37, 1104.55, -76.34, 1.21) pt3dadd(-187.2, 1104.68, -76.34, 1.21) pt3dadd(-187.58, 1104.74, -74.61, 1.21) pt3dadd(-187.9, 1104.8, -74.61, 1.21) pt3dadd(-188.03, 1104.8, -72.77, 1.21) pt3dadd(-188.16, 1104.87, -72.45, 1.21) pt3dadd(-188.29, 1104.93, -70.94, 1.21) pt3dadd(-188.41, 1104.93, -70.83, 1.21) pt3dadd(-188.67, 1105.06, -71.48, 1.21) pt3dadd(-188.92, 1105.12, -71.48, 1.21) pt3dadd(-189.05, 1105.19, -87.03, 1.21) pt3dadd(-189.12, 1105.25, -87.03, 1.21) pt3dadd(-189.56, 1105.38, -87.03, 1.21) pt3dadd(-189.88, 1105.51, -87.67, 1.21) pt3dadd(-190.33, 1105.63, -90.81, 1.21) pt3dadd(-190.71, 1105.7, -90.81, 1.21) pt3dadd(-190.97, 1105.7, -91.78, 1.21) pt3dadd(-191.67, 1105.83, -91.78, 1.21) pt3dadd(-193.21, 1105.89, -91.78, 1.21) pt3dadd(-194.62, 1106.02, -91.78, 1.21) pt3dadd(-195.89, 1106.02, -91.78, 1.21) pt3dadd(-197.81, 1106.15, -91.78, 1.21) pt3dadd(-199.6, 1106.34, -91.78, 1.21) pt3dadd(-202.16, 1106.98, -91.78, 1.21) pt3dadd(-204.08, 1107.42, -91.78, 1.21) pt3dadd(-205.42, 1107.87, -91.78, 1.21) pt3dadd(-207.02, 1108.64, -91.78, 1.21) pt3dadd(-208.49, 1109.02, -91.78, 1.21) pt3dadd(-210.28, 1109.47, -91.78, 1.21) pt3dadd(-212.33, 1109.85, -91.78, 1.21) pt3dadd(-214.31, 1110.05, -91.78, 1.21) pt3dadd(-215.14, 1110.11, -91.78, 1.21) pt3dadd(-215.91, 1110.17, -91.78, 1.21) pt3dadd(-216.16, 1110.24, -91.78, 1.21) pt3dadd(-216.74, 1110.3, -91.78, 1.21) pt3dadd(-219.35, 1110.24, -91.78, 1.21) pt3dadd(-219.73, 1110.37, -91.78, 1.21) pt3dadd(-221.78, 1110.95, -91.78, 1.21) pt3dadd(-223.63, 1111.59, -91.78, 1.21) pt3dadd(-226.12, 1112.55, -91.78, 1.21) pt3dadd(-228.55, 1113.06, -91.78, 1.21) pt3dadd(-231.69, 1113.89, -91.78, 1.21) pt3dadd(-233.41, 1114.27, -91.78, 1.21) pt3dadd(-235.14, 1114.4, -91.78, 1.21) pt3dadd(-237.63, 1114.53, -91.78, 1.21) pt3dadd(-240.13, 1114.78, -91.78, 1.21) pt3dadd(-241.09, 1115.04, -91.78, 1.21) pt3dadd(-242.49, 1115.42, -91.78, 1.21) pt3dadd(-244.09, 1115.81, -91.78, 1.21) pt3dadd(-244.67, 1116.06, -91.78, 1.21) pt3dadd(-245.43, 1116.45, -91.78, 1.21) pt3dadd(-245.88, 1116.7, -91.78, 1.21) pt3dadd(-247.54, 1117.21, -91.78, 1.21) pt3dadd(-249.27, 1117.92, -91.78, 1.21) pt3dadd(-250.61, 1118.62, -91.78, 1.21) pt3dadd(-251.89, 1119.39, -91.78, 1.21) pt3dadd(-254, 1120.54, -91.78, 1.21) pt3dadd(-254.96, 1121.24, -91.78, 1.21) pt3dadd(-255.34, 1122.07, -91.78, 1.21) pt3dadd(-255.92, 1122.71, -91.78, 1.21) pt3dadd(-256.88, 1123.22, -91.78, 1.21) pt3dadd(-258.61, 1123.61, -91.78, 1.21) pt3dadd(-259.76, 1123.8, -91.78, 1.21) pt3dadd(-260.2, 1123.8, -91.78, 1.21) pt3dadd(-262.5, 1124.75, -91.78, 1.21) pt3dadd(-262.82, 1125.13, -91.78, 1.21) pt3dadd(-264.55, 1126.09, -91.78, 1.21) pt3dadd(-265.63, 1126.54, -91.78, 1.21) pt3dadd(-266.59, 1126.92, -97.61, 1.21) pt3dadd(-268, 1127.88, -97.61, 1.21) pt3dadd(-268.32, 1128.01, -99.01, 1.21) pt3dadd(-268.96, 1128.58, -100.2, 1.21) pt3dadd(-271.45, 1129.93, -100.2, 1.21) pt3dadd(-272.67, 1130.44, -101.28, 1.21) pt3dadd(-274.01, 1130.63, -101.28, 1.21) pt3dadd(-275.61, 1130.89, -101.28, 1.21) pt3dadd(-277.08, 1130.57, -101.28, 1.21) pt3dadd(-278.23, 1130.37, -101.28, 1.21) pt3dadd(-281.43, 1130.37, -105.06, 1.21) pt3dadd(-282.13, 1130.12, -105.06, 1.21) pt3dadd(-282.58, 1130.05, -105.06, 1.21) pt3dadd(-283.79, 1130.12, -105.06, 1.21) pt3dadd(-285.39, 1130.44, -106.25, 1.21) pt3dadd(-287.12, 1130.89, -106.25, 1.21) pt3dadd(-287.95, 1131.27, -108.19, 1.21) pt3dadd(-288.46, 1131.53, -108.73, 1.21) pt3dadd(-289.03, 1131.84, -108.73, 1.21) pt3dadd(-289.35, 1132.04, -108.73, 1.21) pt3dadd(-289.42, 1132.1, -108.73, 1.21) } apic[57] {pt3dclear() pt3dadd(-2.19, 1005.81, -63.81, 1.21) pt3dadd(-1.84, 1006.88, -57.66, 1.21) pt3dadd(-2.03, 1007.71, -57.66, 1.21) pt3dadd(-2.48, 1008.99, -57.66, 1.21) pt3dadd(-2.93, 1010.72, -57.66, 1.21) pt3dadd(-3.18, 1011.93, -57.66, 1.21) pt3dadd(-3.25, 1013.21, -57.66, 1.21) pt3dadd(-3.12, 1014.43, -57.66, 1.21) pt3dadd(-2.86, 1015.26, -57.23, 1.21) pt3dadd(-2.86, 1015.77, -50.21, 1.21) pt3dadd(-2.55, 1016.47, -50.21, 1.21) pt3dadd(-2.16, 1017.43, -50.21, 1.21) pt3dadd(-2.1, 1018.71, -50.21, 1.21) pt3dadd(-2.03, 1019.61, -50.21, 1.21) pt3dadd(-1.97, 1020.63, -50.21, 1.21) pt3dadd(-1.97, 1022.42, -50.21, 1.21) pt3dadd(-1.91, 1024.27, -49.78, 1.21) pt3dadd(-2.48, 1025.55, -49.78, 1.21) pt3dadd(-2.99, 1026.64, -48.59, 1.21) pt3dadd(-3.44, 1027.6, -47.83, 1.21) pt3dadd(-3.57, 1027.79, -47.83, 1.21) pt3dadd(-3.63, 1027.86, -45.46, 1.21) pt3dadd(-3.89, 1028.3, -45.46, 1.21) pt3dadd(-4.21, 1028.81, -44.7, 1.21) pt3dadd(-4.4, 1029.33, -44.16, 1.21) pt3dadd(-4.53, 1029.77, -43.84, 1.21) pt3dadd(-4.53, 1030.86, -43.84, 1.21) pt3dadd(-4.27, 1031.37, -43.84, 1.21) pt3dadd(-3.57, 1032.14, -43.84, 1.21) pt3dadd(-3.31, 1032.59, -43.84, 1.21) pt3dadd(-2.99, 1033.16, -43.84, 1.21) pt3dadd(-2.93, 1033.55, -43.84, 1.21) pt3dadd(-2.93, 1033.87, -43.84, 1.21) } } proc shape3d_46() { apic[57] { } apic[58] {pt3dclear() pt3dadd(-2.93, 1033.87, -43.84, 1.21) pt3dadd(-2.48, 1036.35, -42.54, 1.21) pt3dadd(-2.73, 1037.56, -42.54, 1.21) pt3dadd(-3.12, 1038.84, -42.54, 1.21) pt3dadd(-3.76, 1039.99, -42.54, 1.21) pt3dadd(-4.2, 1041.01, -42.54, 1.21) pt3dadd(-4.52, 1041.33, -42.11, 1.21) pt3dadd(-4.65, 1041.59, -36.71, 1.21) pt3dadd(-5.04, 1042.61, -36.71, 1.21) pt3dadd(-5.42, 1043.89, -36.71, 1.21) pt3dadd(-5.8, 1044.79, -36.71, 1.21) pt3dadd(-6.19, 1046, -36.71, 1.21) pt3dadd(-6.19, 1046.83, -36.71, 1.21) pt3dadd(-5.87, 1047.28, -36.39, 1.21) pt3dadd(-5.48, 1047.54, -35.74, 1.21) pt3dadd(-5.16, 1047.6, -34.23, 1.21) pt3dadd(-4.46, 1047.6, -34.23, 1.21) pt3dadd(-4.27, 1047.66, -29.26, 1.21) pt3dadd(-3.31, 1047.85, -29.15, 1.21) pt3dadd(-2.54, 1048.3, -29.15, 1.21) pt3dadd(-1.9, 1048.88, -29.15, 1.21) pt3dadd(-1.58, 1049.58, -29.15, 1.21) pt3dadd(-1.9, 1050.6, -29.15, 1.21) pt3dadd(-2.29, 1051.63, -29.15, 1.21) pt3dadd(-2.41, 1052.07, -28.29, 1.21) pt3dadd(-2.41, 1052.52, -26.56, 1.21) pt3dadd(-2.29, 1052.91, -26.56, 1.21) pt3dadd(-2.09, 1053.03, -26.56, 1.21) pt3dadd(-1.77, 1054.06, -22.67, 1.21) pt3dadd(-1.45, 1054.76, -22.46, 1.21) pt3dadd(-0.82, 1055.59, -22.46, 1.21) pt3dadd(0.21, 1056.17, -22.24, 1.21) pt3dadd(0.66, 1056.17, -22.24, 1.21) pt3dadd(1.17, 1055.85, -19.54, 1.21) pt3dadd(2.77, 1055.85, -18.46, 1.21) pt3dadd(3.28, 1056.74, -18.46, 1.21) pt3dadd(3.34, 1057.96, -17.71, 1.21) pt3dadd(3.66, 1058.66, -17.71, 1.21) pt3dadd(3.85, 1059.04, -16.84, 1.21) pt3dadd(3.92, 1059.17, -16.84, 1.21) pt3dadd(4.11, 1059.24, -16.63, 1.21) pt3dadd(4.36, 1059.36, -16.41, 1.21) pt3dadd(4.75, 1059.56, -16.41, 1.21) pt3dadd(5.13, 1059.88, -16.09, 1.21) pt3dadd(5.77, 1060.58, -15.76, 1.21) pt3dadd(6.15, 1061.47, -15.76, 1.21) pt3dadd(6.41, 1062.24, -14.68, 1.21) pt3dadd(6.41, 1062.5, -14.68, 1.21) pt3dadd(6.49, 1064.37, -14.68, 1.21) pt3dadd(6.61, 1066.1, -14.68, 1.21) pt3dadd(6.74, 1067.5, -14.25, 1.21) pt3dadd(7.64, 1069.55, -14.25, 1.21) pt3dadd(8.34, 1070.76, -13.71, 1.21) pt3dadd(8.72, 1071.53, -12.85, 1.21) pt3dadd(9.36, 1072.43, -11.55, 1.21) pt3dadd(10.19, 1073.39, -11.55, 1.21) pt3dadd(10.45, 1074.03, -11.55, 1.21) pt3dadd(10.71, 1075.18, -9.93, 1.21) pt3dadd(10.71, 1076.33, -9.18, 1.21) pt3dadd(10.64, 1076.97, -9.07, 1.21) pt3dadd(10.64, 1077.03, -9.07, 1.21) pt3dadd(10.39, 1078.12, -8.31, 1.21) pt3dadd(10.07, 1079.72, -8.31, 1.21) pt3dadd(9.56, 1081.76, -8.31, 1.21) pt3dadd(9.56, 1083.68, -8.31, 1.21) pt3dadd(9.94, 1085.53, -7.99, 1.21) pt3dadd(10.13, 1086.62, -7.99, 1.21) pt3dadd(9.94, 1087.13, -7.99, 1.21) pt3dadd(9.75, 1087.71, -5.94, 1.21) pt3dadd(9.68, 1088.28, -5.94, 1.21) pt3dadd(9.62, 1088.86, -4.97, 1.21) pt3dadd(9.62, 1089.69, -3.67, 1.21) pt3dadd(10, 1090.39, -2.59, 1.21) pt3dadd(10.51, 1090.78, -2.59, 1.21) pt3dadd(10.71, 1091.03, -2.59, 1.21) pt3dadd(11.55, 1093.15, -1.84, 1.21) pt3dadd(12.64, 1093.15, -0.32, 1.21) } apic[59] {pt3dclear() pt3dadd(-2.93, 1033.87, -43.84, 1.21) pt3dadd(-3.56, 1034.05, -53.66, 1.21) pt3dadd(-4.46, 1035.71, -53.66, 1.21) pt3dadd(-5.93, 1036.67, -53.66, 1.21) pt3dadd(-7.91, 1037.12, -53.66, 1.21) pt3dadd(-9.32, 1037.44, -53.66, 1.21) pt3dadd(-10.85, 1037.82, -53.66, 1.21) pt3dadd(-12.77, 1038.4, -53.55, 1.21) pt3dadd(-13.73, 1038.85, -53.55, 1.21) pt3dadd(-14.18, 1039.23, -51.61, 1.21) pt3dadd(-14.5, 1039.68, -51.61, 1.21) pt3dadd(-14.63, 1039.87, -48.26, 1.21) pt3dadd(-14.95, 1040.32, -48.26, 1.21) pt3dadd(-15.39, 1041.09, -47.51, 1.21) pt3dadd(-15.78, 1041.66, -46.1, 1.21) pt3dadd(-16.35, 1042.56, -46.1, 1.21) pt3dadd(-16.99, 1043.32, -46.1, 1.21) pt3dadd(-17.82, 1043.9, -44.48, 1.21) pt3dadd(-18.33, 1044.15, -44.48, 1.21) pt3dadd(-20, 1044.99, -40.92, 1.21) pt3dadd(-21.08, 1045.75, -40.92, 1.21) pt3dadd(-22.68, 1046.2, -39.84, 1.21) pt3dadd(-23.71, 1046.39, -39.84, 1.21) pt3dadd(-24.03, 1046.39, -35.31, 1.21) pt3dadd(-24.66, 1046.46, -35.31, 1.21) pt3dadd(-25.88, 1046.84, -35.09, 1.21) pt3dadd(-26.84, 1047.29, -35.09, 1.21) pt3dadd(-27.35, 1047.54, -35.09, 1.21) pt3dadd(-28.05, 1047.93, -30.23, 1.21) pt3dadd(-28.37, 1048.44, -30.23, 1.21) pt3dadd(-28.44, 1049.91, -30.23, 1.21) pt3dadd(-28.12, 1051.06, -29.37, 1.21) pt3dadd(-28.12, 1051.44, -28.94, 1.21) pt3dadd(-29.01, 1052.72, -28.72, 1.21) pt3dadd(-29.72, 1053.87, -28.72, 1.21) pt3dadd(-30.61, 1055.28, -28.4, 1.21) pt3dadd(-31.31, 1056.62, -28.4, 1.21) pt3dadd(-32.02, 1058.03, -28.4, 1.21) pt3dadd(-32.53, 1059.12, -26.45, 1.21) pt3dadd(-33.04, 1060.39, -26.45, 1.21) pt3dadd(-33.36, 1061.29, -25.81, 1.21) pt3dadd(-33.42, 1062.44, -25.81, 1.21) pt3dadd(-33.49, 1063.4, -25.81, 1.21) pt3dadd(-33.87, 1064.49, -25.81, 1.21) pt3dadd(-34.19, 1065.06, -25.81, 1.21) pt3dadd(-35.67, 1067.16, -25.81, 1.21) pt3dadd(-36.82, 1068.76, -25.81, 1.21) pt3dadd(-37.78, 1069.98, -25.81, 1.21) pt3dadd(-38.8, 1071.13, -25.81, 1.21) pt3dadd(-39.82, 1072.02, -25.81, 1.21) pt3dadd(-40.98, 1072.85, -24.83, 1.21) pt3dadd(-42.19, 1073.49, -23.65, 1.21) pt3dadd(-43.28, 1073.94, -23.65, 1.21) pt3dadd(-43.92, 1074.07, -23.65, 1.21) pt3dadd(-44.24, 1074.2, -20.95, 1.21) pt3dadd(-44.36, 1074.2, -18.68, 1.21) pt3dadd(-45.96, 1074.83, -18.68, 1.21) pt3dadd(-46.86, 1075.41, -17.38, 1.21) pt3dadd(-47.31, 1075.79, -17.38, 1.21) pt3dadd(-49.54, 1078.42, -16.84, 1.21) pt3dadd(-50.76, 1080.72, -16.84, 1.21) pt3dadd(-51.46, 1082.12, -15.76, 1.21) pt3dadd(-52.29, 1083.4, -15.76, 1.21) pt3dadd(-53.12, 1084.36, -14.9, 1.21) pt3dadd(-53.83, 1085.13, -14.68, 1.21) pt3dadd(-54.91, 1085.83, -14.68, 1.21) pt3dadd(-55.62, 1086.34, -14.68, 1.21) pt3dadd(-56.64, 1087.05, -13.06, 1.21) pt3dadd(-56.9, 1087.37, -13.06, 1.21) pt3dadd(-57.66, 1087.88, -11.77, 1.21) pt3dadd(-66.29, 1091.14, -8.31, 1.21) pt3dadd(-66.93, 1091.65, -8.31, 1.21) pt3dadd(-67.77, 1092.42, -8.31, 1.21) pt3dadd(-68.47, 1093.25, -8.31, 1.21) pt3dadd(-68.98, 1093.82, -8.31, 1.21) pt3dadd(-69.68, 1094.4, -7.77, 1.21) pt3dadd(-70.32, 1094.85, -7.77, 1.21) pt3dadd(-70.45, 1094.91, -7.77, 1.21) pt3dadd(-72.19, 1095.04, -6.59, 1.21) pt3dadd(-72.38, 1095.49, -6.59, 1.21) pt3dadd(-73.21, 1095.94, -6.59, 1.21) pt3dadd(-74.87, 1096.07, -6.59, 1.21) pt3dadd(-76.41, 1095.94, -6.59, 1.21) pt3dadd(-78.13, 1095.88, -6.8, 1.21) pt3dadd(-82.48, 1095.88, -6.37, 1.21) pt3dadd(-84.14, 1096.2, -6.37, 1.21) pt3dadd(-85.23, 1096.64, -4.75, 1.21) pt3dadd(-86.13, 1097.09, -3.67, 1.21) pt3dadd(-86.38, 1097.41, -2.81, 1.21) pt3dadd(-86.57, 1097.86, -2.81, 1.21) pt3dadd(-86.64, 1097.92, -2.81, 1.21) } apic[60] {pt3dclear() pt3dadd(32.48, 972.53, -49.56, 1.21) pt3dadd(33.23, 973.92, -60.36, 1.21) pt3dadd(33.23, 975.65, -60.36, 1.21) pt3dadd(33.48, 977.25, -60.36, 1.21) pt3dadd(33.8, 978.97, -60.36, 1.21) pt3dadd(33.8, 981.28, -60.36, 1.21) pt3dadd(34.12, 983.64, -60.36, 1.21) pt3dadd(34.44, 984.54, -60.36, 1.21) pt3dadd(34.12, 987.29, -60.36, 1.21) pt3dadd(34.31, 988.82, -60.36, 1.21) pt3dadd(34.95, 991.12, -60.36, 1.21) pt3dadd(35.72, 993.55, -60.36, 1.21) pt3dadd(36.36, 994.96, -60.36, 1.21) pt3dadd(37.13, 996.49, -60.36, 1.21) pt3dadd(37.96, 998.35, -60.36, 1.21) pt3dadd(38.4, 999.31, -60.36, 1.21) pt3dadd(38.66, 1000.01, -60.36, 1.21) pt3dadd(38.92, 1000.52, -60.36, 1.21) pt3dadd(39.75, 1001.54, -60.36, 1.21) pt3dadd(40, 1001.93, -60.36, 1.21) pt3dadd(40.07, 1002.06, -60.36, 1.21) pt3dadd(41.44, 1004.06, -60.36, 1.21) pt3dadd(41.82, 1005.21, -60.36, 1.21) pt3dadd(43.1, 1009.11, -60.36, 1.21) pt3dadd(44.44, 1012.57, -60.36, 1.21) pt3dadd(44.76, 1014.93, -60.36, 1.21) pt3dadd(44.76, 1018.06, -60.36, 1.21) pt3dadd(43.99, 1019.86, -60.36, 1.21) pt3dadd(43.48, 1021.84, -60.36, 1.21) pt3dadd(43.48, 1024.71, -60.36, 1.21) pt3dadd(44.25, 1026.44, -60.36, 1.21) pt3dadd(45.02, 1028.42, -60.36, 1.21) } } proc shape3d_47() { apic[60] { pt3dadd(45.27, 1030.47, -60.36, 1.21) pt3dadd(44.44, 1032.26, -60.36, 1.21) pt3dadd(43.99, 1033.67, -60.36, 1.21) pt3dadd(43.87, 1034.18, -60.36, 1.21) pt3dadd(43.87, 1034.5, -60.36, 1.21) pt3dadd(44.26, 1036.61, -60.36, 1.21) pt3dadd(44.26, 1040.32, -60.36, 1.21) pt3dadd(44.32, 1041.59, -60.36, 1.21) pt3dadd(44.51, 1043, -60.36, 1.21) pt3dadd(44.58, 1044.47, -60.36, 1.21) pt3dadd(44.58, 1046.01, -60.36, 1.21) pt3dadd(44.77, 1046.33, -60.36, 1.21) pt3dadd(44.77, 1046.39, -60.36, 1.21) } apic[61] {pt3dclear() pt3dadd(44.77, 1046.39, -60.36, 1.02) pt3dadd(46.05, 1047.67, -60.36, 1.02) pt3dadd(47.01, 1048.88, -60.36, 1.02) pt3dadd(47.71, 1050.23, -60.36, 1.02) pt3dadd(48.09, 1051.82, -60.36, 1.02) pt3dadd(48.09, 1053.87, -60.36, 1.02) pt3dadd(47.65, 1055.6, -60.36, 1.02) pt3dadd(47.46, 1056.81, -60.36, 1.02) pt3dadd(47.39, 1057.71, -60.36, 1.02) pt3dadd(47.71, 1058.35, -60.36, 1.02) pt3dadd(48.35, 1058.98, -60.36, 1.02) pt3dadd(49.18, 1059.69, -60.36, 1.02) pt3dadd(49.82, 1060.46, -60.36, 1.02) pt3dadd(50.01, 1061.35, -60.36, 1.02) pt3dadd(50.01, 1062.63, -60.36, 1.02) pt3dadd(49.95, 1063.14, -60.36, 1.02) pt3dadd(49.68, 1064.5, -60.36, 1.02) pt3dadd(49.75, 1065.07, -46.75, 1.02) pt3dadd(49.68, 1066.41, -46, 1.02) pt3dadd(49.68, 1069.29, -46, 1.02) pt3dadd(50.39, 1070.44, -46, 1.02) pt3dadd(50.58, 1070.76, -46, 1.02) pt3dadd(50.58, 1070.89, -43.51, 1.02) pt3dadd(50.83, 1071.72, -43.51, 1.02) pt3dadd(50.83, 1072.87, -43.51, 1.02) } apic[62] {pt3dclear() pt3dadd(44.77, 1046.39, -60.36, 1.02) pt3dadd(44.7, 1047.62, -60.25, 1.02) pt3dadd(44.76, 1049.73, -60.25, 1.02) pt3dadd(44.63, 1051.32, -60.25, 1.02) pt3dadd(44.18, 1053.24, -60.25, 1.02) pt3dadd(43.54, 1054.97, -60.25, 1.02) pt3dadd(42.84, 1056.95, -60.25, 1.02) pt3dadd(41.88, 1058.49, -60.25, 1.02) pt3dadd(41.24, 1059.51, -60.25, 1.02) pt3dadd(40.8, 1060.79, -60.25, 1.02) pt3dadd(40.73, 1061.43, -60.25, 1.02) pt3dadd(40.67, 1062.7, -60.25, 1.02) pt3dadd(40.67, 1065.13, -60.25, 1.02) pt3dadd(40.22, 1066.48, -60.25, 1.02) pt3dadd(39.13, 1068.52, -60.25, 1.02) pt3dadd(37.6, 1069.87, -60.25, 1.02) pt3dadd(36.45, 1070.83, -60.25, 1.02) pt3dadd(35.04, 1071.78, -60.25, 1.02) pt3dadd(33.38, 1073.06, -60.25, 1.02) pt3dadd(31.52, 1074.79, -60.25, 1.02) pt3dadd(30.37, 1076.52, -60.25, 1.02) pt3dadd(29.54, 1078.11, -60.25, 1.02) pt3dadd(28.97, 1079.2, -60.25, 1.02) pt3dadd(28.26, 1080.61, -60.25, 1.02) pt3dadd(27.3, 1082.21, -60.25, 1.02) pt3dadd(26.6, 1083.93, -60.25, 1.02) pt3dadd(26.09, 1084.96, -60.25, 1.02) pt3dadd(25.19, 1086.81, -60.25, 1.02) pt3dadd(24.49, 1088.09, -60.25, 1.02) pt3dadd(23.6, 1089.3, -60.25, 1.02) pt3dadd(22.89, 1090.33, -60.25, 1.02) pt3dadd(22.25, 1091.48, -60.25, 1.02) pt3dadd(21.74, 1092.12, -60.25, 1.02) pt3dadd(21.55, 1092.44, -60.25, 1.02) pt3dadd(21.19, 1093.4, -60.25, 1.02) pt3dadd(20.55, 1094.11, -60.25, 1.02) pt3dadd(18.89, 1095.51, -60.25, 1.02) pt3dadd(17.87, 1096.47, -60.25, 1.02) pt3dadd(16.91, 1097.24, -60.25, 1.02) pt3dadd(15.88, 1098.2, -60.25, 1.02) pt3dadd(15.18, 1099.41, -60.25, 1.02) pt3dadd(14.29, 1100.82, -60.25, 1.02) pt3dadd(13.77, 1101.46, -60.25, 1.02) pt3dadd(13.65, 1102.55, -60.25, 1.02) pt3dadd(13.65, 1103.06, -60.25, 1.02) } apic[63] {pt3dclear() pt3dadd(40.97, 961.06, -49.56, 1.02) pt3dadd(41.66, 961.54, -63.27, 1.02) pt3dadd(41.73, 961.98, -63.27, 1.02) pt3dadd(41.98, 963.84, -63.27, 1.02) pt3dadd(42.62, 965.88, -63.27, 1.02) pt3dadd(42.88, 967.23, -63.27, 1.02) pt3dadd(42.88, 969.34, -63.27, 1.02) pt3dadd(42.62, 972.47, -63.27, 1.02) pt3dadd(42.62, 973.81, -63.27, 1.02) pt3dadd(42.56, 976.5, -63.27, 1.02) pt3dadd(42.56, 980.4, -63.27, 1.02) pt3dadd(42.88, 981.8, -63.27, 1.02) pt3dadd(43.52, 983.27, -63.27, 1.02) pt3dadd(44.03, 984.11, -63.27, 1.02) pt3dadd(44.16, 985.58, -66.73, 1.02) pt3dadd(44.16, 988.39, -67.27, 1.02) pt3dadd(44.47, 989.73, -67.27, 1.02) pt3dadd(44.99, 990.63, -68.35, 1.02) pt3dadd(45.18, 991.01, -68.35, 1.02) pt3dadd(46.25, 992.04, -69.64, 1.02) pt3dadd(46.76, 995.75, -69.64, 1.02) pt3dadd(47.66, 998.24, -69.64, 1.02) pt3dadd(48.43, 1000.93, -69.64, 1.02) pt3dadd(49, 1002.84, -69.64, 1.02) pt3dadd(49.64, 1004.12, -69.64, 1.02) pt3dadd(50.03, 1005.4, -69.64, 1.02) pt3dadd(50.15, 1006.23, -69.64, 1.02) pt3dadd(50.28, 1010.71, -73.64, 1.02) pt3dadd(50.6, 1018, -73.85, 1.02) } apic[64] {pt3dclear() pt3dadd(50.6, 1018, -73.85, 1.02) pt3dadd(51.75, 1017.89, -73.85, 1.02) pt3dadd(52.7, 1019.81, -73.85, 1.02) pt3dadd(53.66, 1021.28, -73.85, 1.02) pt3dadd(55.39, 1023, -73.85, 1.02) pt3dadd(55.97, 1023.83, -74.07, 1.02) pt3dadd(56.35, 1024.54, -74.07, 1.02) pt3dadd(56.35, 1024.79, -78.28, 1.02) pt3dadd(58.2, 1027.22, -78.39, 1.02) pt3dadd(59.23, 1029.01, -78.5, 1.02) pt3dadd(59.74, 1030.23, -78.5, 1.02) pt3dadd(60.19, 1031.7, -79.47, 1.02) pt3dadd(60.31, 1033.17, -79.47, 1.02) pt3dadd(60.31, 1033.75, -81.2, 1.02) pt3dadd(60.82, 1036.37, -82.06, 1.02) pt3dadd(60.76, 1037.96, -82.06, 1.02) pt3dadd(60.57, 1039.5, -82.06, 1.02) pt3dadd(60.57, 1041.42, -82.06, 1.02) pt3dadd(60.95, 1042.18, -82.06, 1.02) pt3dadd(61.59, 1042.76, -82.38, 1.02) pt3dadd(62.55, 1043.91, -83.25, 1.02) pt3dadd(63.25, 1045.25, -84.65, 1.02) pt3dadd(64.09, 1046.4, -84.65, 1.02) pt3dadd(64.28, 1046.98, -84.65, 1.02) pt3dadd(64.28, 1047.04, -84.65, 1.02) pt3dadd(65.19, 1047.91, -86.05, 1.02) pt3dadd(65.76, 1049.13, -86.05, 1.02) pt3dadd(67.11, 1051.11, -86.05, 1.02) pt3dadd(67.81, 1052.32, -86.05, 1.02) pt3dadd(68.64, 1053.67, -86.05, 1.02) pt3dadd(69.28, 1054.69, -86.05, 1.02) pt3dadd(69.86, 1055.84, -86.05, 1.02) pt3dadd(70.24, 1056.61, -86.38, 1.02) pt3dadd(70.5, 1058.65, -88.97, 1.02) pt3dadd(70.94, 1060.06, -88.97, 1.02) pt3dadd(71.84, 1062.43, -88.97, 1.02) pt3dadd(72.54, 1063.83, -89.29, 1.02) pt3dadd(73.31, 1065.17, -90.48, 1.02) pt3dadd(73.37, 1065.43, -95.66, 1.02) pt3dadd(74.08, 1065.88, -96.96, 1.02) pt3dadd(74.97, 1066.33, -96.96, 1.02) pt3dadd(75.48, 1066.45, -96.96, 1.02) pt3dadd(76.19, 1066.39, -96.96, 1.02) pt3dadd(77.08, 1066.2, -97.18, 1.02) pt3dadd(77.21, 1066.2, -101.71, 1.02) pt3dadd(78.04, 1066.33, -101.71, 1.02) pt3dadd(79.06, 1066.26, -102.47, 1.02) pt3dadd(80.28, 1066.2, -102.47, 1.02) pt3dadd(80.66, 1066.2, -106.25, 1.02) pt3dadd(81.3, 1066.39, -108.3, 1.02) pt3dadd(81.75, 1066.45, -108.3, 1.02) pt3dadd(81.94, 1066.07, -109.7, 1.02) pt3dadd(82.2, 1065.62, -109.7, 1.02) pt3dadd(82.52, 1065.62, -113.26, 1.02) pt3dadd(83.48, 1066.01, -113.26, 1.02) pt3dadd(84.05, 1066.2, -113.26, 1.02) pt3dadd(84.37, 1066.26, -113.37, 1.02) pt3dadd(85.39, 1066.26, -117.37, 1.02) pt3dadd(85.71, 1066.39, -117.47, 1.02) pt3dadd(85.71, 1066.39, -117.47, 1.02) pt3dadd(85.97, 1065.75, -117.58, 1.02) pt3dadd(86.23, 1064.92, -119.42, 1.02) pt3dadd(86.23, 1061.85, -123.2, 1.02) pt3dadd(85.97, 1061.34, -125.46, 1.02) pt3dadd(85.97, 1060.44, -125.46, 1.02) pt3dadd(86.35, 1059.74, -125.46, 1.02) pt3dadd(87.38, 1059.42, -125.46, 1.02) pt3dadd(88.27, 1059.55, -125.46, 1.02) pt3dadd(88.59, 1059.68, -128.6, 1.02) pt3dadd(88.66, 1059.74, -133.24, 1.02) pt3dadd(89.74, 1060.57, -133.24, 1.02) pt3dadd(90.32, 1061.02, -133.24, 1.02) pt3dadd(90.96, 1061.27, -133.24, 1.02) pt3dadd(91.6, 1061.34, -133.24, 1.02) pt3dadd(93.07, 1061.34, -134.64, 1.02) pt3dadd(93.64, 1061.53, -135.61, 1.02) pt3dadd(93.9, 1061.79, -136.48, 1.02) pt3dadd(93.9, 1061.85, -136.48, 1.02) } apic[65] {pt3dclear() pt3dadd(50.6, 1018, -73.85, 1.02) pt3dadd(50.67, 1019.17, -68.02, 1.02) pt3dadd(50.67, 1019.49, -68.02, 1.02) pt3dadd(50.86, 1020.83, -68.02, 1.02) pt3dadd(51.5, 1022.68, -68.02, 1.02) pt3dadd(51.82, 1024.41, -68.02, 1.02) pt3dadd(51.75, 1025.94, -68.02, 1.02) pt3dadd(50.92, 1027.54, -68.02, 1.02) pt3dadd(50.35, 1028.69, -68.02, 1.02) pt3dadd(49.64, 1029.72, -68.02, 1.02) } } proc shape3d_48() { apic[65] { pt3dadd(49.07, 1030.55, -68.02, 1.02) pt3dadd(48.81, 1031, -72.13, 1.02) pt3dadd(48.75, 1031.32, -72.13, 1.02) pt3dadd(48.75, 1031.83, -79.9, 1.02) pt3dadd(48.81, 1032.91, -79.9, 1.02) pt3dadd(49.13, 1034.38, -79.9, 1.02) pt3dadd(49.84, 1035.66, -79.9, 1.02) pt3dadd(50.35, 1036.88, -81.95, 1.02) pt3dadd(50.67, 1037.9, -81.95, 1.02) pt3dadd(51.31, 1039.44, -84.54, 1.02) pt3dadd(51.24, 1040.33, -84.54, 1.02) pt3dadd(52.01, 1041.99, -84.54, 1.02) pt3dadd(52.97, 1043.66, -84.54, 1.02) pt3dadd(52.97, 1045.32, -84.76, 1.02) pt3dadd(52.9, 1046.6, -84.76, 1.02) pt3dadd(52.84, 1047.49, -86.16, 1.02) pt3dadd(52.71, 1048.07, -86.16, 1.02) pt3dadd(52.04, 1049.3, -88.21, 1.02) pt3dadd(51.4, 1061.45, -89.73, 1.02) pt3dadd(51.2, 1062.73, -89.73, 1.02) pt3dadd(51.33, 1063.37, -94.37, 1.02) pt3dadd(51.97, 1065.22, -97.18, 1.02) pt3dadd(52.48, 1067.4, -98.36, 1.02) pt3dadd(52.04, 1068.61, -98.69, 1.02) pt3dadd(51.84, 1069.19, -98.69, 1.02) pt3dadd(51.84, 1069.25, -98.69, 1.02) pt3dadd(51.84, 1069.32, -107.22, 1.02) pt3dadd(51.97, 1069.96, -107.54, 1.02) pt3dadd(52.48, 1070.85, -107.54, 1.02) pt3dadd(52.87, 1072.26, -107.54, 1.02) pt3dadd(52.67, 1073.47, -111.86, 1.02) pt3dadd(52.29, 1074.43, -112.08, 1.02) pt3dadd(51.97, 1075.33, -112.08, 1.02) pt3dadd(51.97, 1077.31, -112.83, 1.02) } apic[66] {pt3dclear() pt3dadd(62.56, 760.53, -28.18, 3.39) pt3dadd(62.46, 761.13, -33.8, 3.39) pt3dadd(62.46, 761.7, -33.8, 3.39) pt3dadd(62.2, 763.05, -33.8, 3.39) pt3dadd(62.01, 764.13, -33.8, 3.39) pt3dadd(61.82, 765.09, -33.8, 3.39) pt3dadd(61.69, 765.92, -33.8, 3.39) pt3dadd(61.5, 767.14, -33.8, 3.39) pt3dadd(61.12, 768.67, -33.8, 3.39) pt3dadd(60.92, 769.7, -33.8, 3.39) pt3dadd(60.86, 770.78, -33.8, 3.39) pt3dadd(60.86, 772.44, -33.8, 3.39) pt3dadd(61.31, 774.04, -33.8, 3.39) pt3dadd(61.95, 775.58, -33.8, 3.39) pt3dadd(62.07, 775.96, -33.8, 3.39) pt3dadd(62.91, 777.69, -33.8, 3.39) pt3dadd(62.91, 779.03, -33.8, 3.39) pt3dadd(63.42, 780.44, -33.8, 3.39) pt3dadd(63.93, 781.72, -33.8, 3.39) pt3dadd(65.27, 783.89, -33.8, 3.39) pt3dadd(66.04, 784.85, -33.8, 3.39) pt3dadd(66.74, 785.49, -33.8, 3.39) pt3dadd(67.51, 786.19, -33.8, 3.39) pt3dadd(67.89, 786.83, -33.8, 3.39) pt3dadd(68.02, 787.47, -33.8, 3.39) pt3dadd(68.02, 789.13, -33.8, 3.39) pt3dadd(67.77, 789.71, -33.8, 3.39) pt3dadd(67.45, 790.28, -33.8, 3.39) pt3dadd(67.13, 790.73, -33.8, 3.39) pt3dadd(66.81, 791.18, -33.8, 3.39) pt3dadd(66.61, 791.63, -33.8, 3.39) pt3dadd(66.61, 791.69, -33.8, 3.39) pt3dadd(66.76, 793.12, -33.8, 3.39) pt3dadd(66.31, 794.08, -33.8, 3.39) pt3dadd(66.06, 795.23, -33.8, 3.39) pt3dadd(65.86, 796.51, -33.8, 3.39) pt3dadd(65.86, 801.43, -33.8, 3.39) pt3dadd(66.06, 802.71, -33.8, 3.39) pt3dadd(66.12, 803.6, -33.8, 3.39) pt3dadd(66.12, 804.69, -33.8, 3.39) pt3dadd(66.12, 807.06, -33.8, 3.39) pt3dadd(66.25, 808.27, -33.8, 3.39) pt3dadd(66.31, 809.42, -33.8, 3.39) pt3dadd(66.89, 810.64, -33.8, 3.39) pt3dadd(67.14, 811.47, -33.8, 3.39) pt3dadd(67.34, 812.11, -33.8, 3.39) pt3dadd(67.53, 812.62, -33.8, 3.39) pt3dadd(67.97, 813.77, -33.8, 3.39) pt3dadd(68.17, 814.15, -33.8, 3.39) pt3dadd(68.49, 814.67, -33.8, 3.39) pt3dadd(68.68, 815.05, -33.8, 3.39) pt3dadd(68.74, 815.3, -33.8, 3.39) pt3dadd(68.74, 815.5, -33.8, 3.39) pt3dadd(68.81, 815.69, -33.8, 3.39) pt3dadd(68.87, 815.88, -33.8, 3.39) pt3dadd(68.93, 815.94, -33.8, 3.39) pt3dadd(68.93, 816.01, -33.8, 3.39) pt3dadd(69.25, 816.39, -33.8, 3.39) pt3dadd(69.38, 816.65, -33.8, 3.39) pt3dadd(69.57, 817.03, -33.8, 3.39) pt3dadd(69.7, 817.41, -33.8, 3.39) pt3dadd(69.76, 817.73, -33.8, 3.39) pt3dadd(69.76, 818.44, -33.8, 3.39) } apic[67] {pt3dclear() pt3dadd(69.76, 818.44, -33.8, 2.81) pt3dadd(71.99, 819.85, -33.8, 2.81) pt3dadd(72.18, 820.43, -33.8, 2.81) pt3dadd(72.95, 821.32, -33.8, 2.81) pt3dadd(73.65, 822.28, -33.8, 2.81) pt3dadd(74.48, 823.5, -33.8, 2.81) pt3dadd(75.57, 825.35, -33.8, 2.81) pt3dadd(75.63, 825.86, -33.8, 2.75) pt3dadd(75.63, 826.5, -33.8, 2.62) pt3dadd(75.7, 826.57, -33.8, 2.62) pt3dadd(77.17, 828.17, -29.48, 2.43) pt3dadd(79.15, 832.58, -24.73, 2.43) pt3dadd(79.85, 834.5, -24.73, 2.43) pt3dadd(79.92, 835.01, -24.73, 2.43) pt3dadd(80.56, 836.09, -24.73, 2.43) pt3dadd(81.39, 837.31, -24.4, 2.43) pt3dadd(81.77, 837.95, -23.21, 2.43) pt3dadd(81.77, 838.01, -23.21, 2.43) pt3dadd(82.99, 839.55, -18.9, 2.17) pt3dadd(83.69, 840.44, -18.46, 2.17) pt3dadd(84.65, 841.21, -17.17, 2.17) pt3dadd(85.1, 841.72, -16.09, 2.17) pt3dadd(85.99, 842.55, -16.09, 2.17) pt3dadd(86.89, 843.64, -14.58, 2.17) pt3dadd(87.33, 844.28, -14.58, 2.17) pt3dadd(87.65, 845.05, -13.93, 2.17) pt3dadd(87.91, 845.94, -12.96, 2.17) pt3dadd(87.91, 846.07, -12.96, 2.17) pt3dadd(88.81, 848.7, -12.85, 2.05) pt3dadd(89.26, 850.36, -12.85, 2.05) pt3dadd(89.26, 852.47, -12.85, 2.05) pt3dadd(89.32, 853.88, -12.85, 2.05) pt3dadd(89.64, 855.35, -12.85, 2.05) pt3dadd(90.22, 856.43, -12.85, 2.05) pt3dadd(91.05, 857.71, -12.85, 2.05) pt3dadd(91.94, 859.05, -12.85, 2.05) pt3dadd(92.65, 860.21, -12.63, 2.05) pt3dadd(93.03, 860.65, -12.63, 1.98) pt3dadd(93.61, 861.29, -12.63, 1.92) pt3dadd(94.63, 862.32, -12.63, 1.92) pt3dadd(95.4, 863.47, -12.63, 1.92) pt3dadd(95.91, 864.49, -12.63, 1.92) pt3dadd(96.1, 865.38, -12.63, 1.92) pt3dadd(96.1, 865.64, -12.63, 1.92) pt3dadd(96.61, 867.24, -12.63, 1.92) pt3dadd(96.87, 867.88, -12.63, 1.92) pt3dadd(96.99, 868.77, -12.63, 1.92) pt3dadd(97.06, 870.37, -12.63, 1.92) pt3dadd(97.44, 871.78, -12.63, 1.92) pt3dadd(98.15, 873.06, -12.63, 1.92) pt3dadd(98.98, 874.21, -12.63, 1.92) pt3dadd(100.62, 874.67, -11.01, 1.92) pt3dadd(100.94, 875.43, -11.01, 1.92) pt3dadd(101.84, 876.91, -10.8, 1.92) pt3dadd(103.12, 878.57, -10.8, 1.92) pt3dadd(103.76, 879.46, -10.26, 1.92) pt3dadd(104.59, 880.55, -9.72, 1.92) pt3dadd(104.65, 880.61, -9.72, 1.92) pt3dadd(105.16, 883.49, -8.42, 1.92) pt3dadd(106.31, 885.47, -8.31, 1.92) pt3dadd(107.66, 887.97, -8.31, 1.92) pt3dadd(108.23, 889.95, -7.88, 1.92) pt3dadd(108.81, 891.48, -7.88, 1.92) pt3dadd(109.06, 892.12, -7.56, 1.92) pt3dadd(110.15, 894.1, -5.51, 1.92) pt3dadd(110.92, 895.57, -5.51, 1.92) pt3dadd(112, 897.37, -5.51, 1.92) pt3dadd(112.77, 898.77, -5.51, 1.92) pt3dadd(113.41, 900.11, -5.51, 1.92) pt3dadd(114.05, 901.07, -5.51, 1.92) pt3dadd(115.14, 902.03, -5.51, 1.92) pt3dadd(116.29, 902.99, -5.51, 1.92) pt3dadd(116.73, 903.25, -5.51, 1.92) pt3dadd(116.73, 903.31, -5.51, 1.92) pt3dadd(118.73, 905.32, -5.18, 1.79) pt3dadd(119.24, 905.83, -5.18, 1.79) pt3dadd(120.84, 906.98, -5.07, 1.79) pt3dadd(121.6, 907.62, -5.07, 1.79) pt3dadd(122.88, 908.33, -5.07, 1.79) pt3dadd(123.07, 908.45, -1.3, 1.79) pt3dadd(123.07, 908.84, -0.11, 1.79) pt3dadd(123.14, 909.09, 1.84, 1.79) pt3dadd(123.71, 910.12, 2.59, 1.79) pt3dadd(124.16, 910.63, 2.59, 1.79) pt3dadd(124.54, 910.88, 3.13, 1.79) pt3dadd(125.12, 910.95, 3.13, 1.79) pt3dadd(126.14, 910.76, 3.56, 1.79) pt3dadd(127.04, 910.37, 3.56, 1.79) pt3dadd(127.68, 910.18, 3.56, 1.66) pt3dadd(127.8, 910.24, 3.56, 1.6) pt3dadd(128.25, 910.5, 3.56, 1.6) pt3dadd(128.64, 910.5, 3.56, 1.6) } apic[68] {pt3dclear() pt3dadd(69.76, 818.44, -33.8, 2.11) pt3dadd(69.27, 819.2, -19.44, 2.11) pt3dadd(69.27, 820.03, -19.44, 2.11) pt3dadd(69.14, 821.18, -19.44, 2.11) pt3dadd(69.14, 823.8, -19.44, 2.11) pt3dadd(68.88, 825.52, -19.44, 2.11) pt3dadd(68.5, 827.12, -19.44, 2.11) pt3dadd(68.31, 829.49, -19.44, 2.11) pt3dadd(67.99, 830.51, -19.44, 2.11) pt3dadd(67.61, 831.34, -19.44, 2.11) pt3dadd(67.22, 831.92, -19.44, 2.11) } } proc shape3d_49() { apic[68] { pt3dadd(66.77, 832.62, -19.44, 2.11) pt3dadd(66.13, 833.58, -19.44, 2.11) pt3dadd(65.5, 834.48, -19.44, 2.11) pt3dadd(65.05, 834.99, -19.44, 2.11) pt3dadd(64.6, 835.63, -19.44, 2.11) pt3dadd(64.28, 836.07, -19.44, 2.11) pt3dadd(64.09, 836.39, -19.44, 2.11) pt3dadd(64.09, 837.29, -19.44, 2.11) pt3dadd(64.09, 837.99, -19.44, 2.11) pt3dadd(64.6, 838.89, -19.44, 2.11) pt3dadd(65.43, 839.72, -19.44, 2.11) pt3dadd(66.26, 840.29, -19.44, 2.11) pt3dadd(67.22, 840.87, -19.44, 2.11) pt3dadd(67.86, 841.25, -19.44, 2.11) pt3dadd(68.69, 841.64, -19.44, 2.11) pt3dadd(69.59, 842.21, -19.44, 2.11) pt3dadd(70.16, 842.92, -19.44, 2.11) pt3dadd(70.55, 843.68, -19.44, 2.11) pt3dadd(70.61, 844.32, -19.44, 2.11) pt3dadd(70.48, 844.9, -19.44, 2.11) pt3dadd(69.72, 846.3, -19.44, 2.11) pt3dadd(69.33, 846.75, -19.44, 2.11) pt3dadd(69.2, 846.88, -19.44, 2.11) pt3dadd(68.99, 848.41, -19.44, 2.11) pt3dadd(68.86, 849.31, -19.44, 2.11) pt3dadd(68.03, 851.93, -19.44, 2.11) pt3dadd(67.45, 853.46, -18.68, 2.11) pt3dadd(67.2, 854.8, -18.68, 2.11) pt3dadd(67.13, 855.57, -16.3, 2.11) pt3dadd(66.62, 857.62, -13.5, 2.11) pt3dadd(66.24, 859.22, -13.5, 2.11) pt3dadd(66.24, 863.24, -13.5, 2.11) pt3dadd(66.11, 864.91, -13.5, 2.11) pt3dadd(66.05, 866.18, -13.5, 2.11) pt3dadd(66.05, 866.25, -13.5, 2.11) pt3dadd(65.79, 869.06, -13.39, 2.11) pt3dadd(65.41, 870.72, -12.96, 2.11) pt3dadd(65.28, 872.71, -12.96, 2.11) pt3dadd(65.28, 874.75, -11.23, 2.11) pt3dadd(65.22, 875.71, -11.23, 2.11) pt3dadd(65.22, 875.97, -11.23, 2.11) pt3dadd(65.27, 878.76, -9.83, 2.11) pt3dadd(65.27, 878.89, -9.83, 2.11) pt3dadd(65.08, 880.17, -9.83, 2.11) pt3dadd(65.27, 881.13, -9.83, 2.11) pt3dadd(66.16, 882.66, -9.83, 2.11) pt3dadd(67.19, 884.58, -8.1, 2.11) pt3dadd(67.44, 886.69, -7.23, 2.11) pt3dadd(67.44, 890.78, -6.59, 2.11) pt3dadd(66.99, 892.76, -6.59, 2.11) pt3dadd(66.61, 893.79, -4.64, 2.11) pt3dadd(66.55, 893.85, -4.64, 2.11) pt3dadd(66.48, 895.45, -2.92, 2.11) pt3dadd(66.1, 896.47, -2.92, 2.11) pt3dadd(65.33, 897.94, -2.92, 2.11) pt3dadd(64.76, 899.35, -2.92, 2.11) pt3dadd(64.37, 900.76, -2.05, 2.11) pt3dadd(64.5, 902.16, -0.86, 2.11) pt3dadd(65.08, 903.57, -0.11, 2.11) pt3dadd(65.27, 904.21, -0.11, 2.11) pt3dadd(65.27, 904.78, -0.11, 2.11) pt3dadd(65.79, 907.65, 0.97, 2.11) pt3dadd(65.79, 908.8, 0.97, 2.11) pt3dadd(65.85, 909.89, 0.97, 2.11) pt3dadd(65.66, 910.98, 0.97, 2.11) pt3dadd(65.15, 911.68, 0.97, 2.11) pt3dadd(64.9, 912.26, 0.97, 2.11) pt3dadd(64.7, 912.45, 0.97, 2.11) } } proc basic_shape() { shape3d_1() shape3d_2() shape3d_3() shape3d_4() shape3d_5() shape3d_6() shape3d_7() shape3d_8() shape3d_9() shape3d_10() shape3d_11() shape3d_12() shape3d_13() shape3d_14() shape3d_15() shape3d_16() shape3d_17() shape3d_18() shape3d_19() shape3d_20() shape3d_21() shape3d_22() shape3d_23() shape3d_24() shape3d_25() shape3d_26() shape3d_27() shape3d_28() shape3d_29() shape3d_30() shape3d_31() shape3d_32() shape3d_33() shape3d_34() shape3d_35() shape3d_36() shape3d_37() shape3d_38() shape3d_39() shape3d_40() shape3d_41() shape3d_42() shape3d_43() shape3d_44() shape3d_45() shape3d_46() shape3d_47() shape3d_48() shape3d_49() } objref all, somatic, axonal, basal, apical, collat proc subsets() { local i objref all, somatic, axonal, basal, apical, collat all = new SectionList() soma all.append() for i=0, 8 axon[i] all.append() for i=0, 36 dend[i] all.append() for i=0, 68 apic[i] all.append() somatic = new SectionList() soma somatic.append() axonal = new SectionList() for i=0, 8 axon[i] axonal.append() basal = new SectionList() for i=0, 36 dend[i] basal.append() apical = new SectionList() for i=0, 68 apic[i] apical.append() collat = new SectionList() axon[1] collat.append() } proc geom() { } proc geom_nseg() { } proc biophys() { } access soma celldef()