begintemplate Amandola_MN3
objref this
public init, topol, subsets, geom, biophys, geom_nseg, basic_shape
public soma, dend, ah, iseg
public all, somatic, basal, AHIS
proc init() {
parameters()
topol()
subsets()
biophys()
geom()
print "full Cell Created"
}
create soma, dend[146]
create ah, iseg
// create axon
proc topol() { local i
// connect axon(0), soma(0.5)
connect ah(0), soma(0.5)
connect iseg(0),ah(1)
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)
for i = 7, 8 connect dend[i](0), dend[6](1)
for i = 9, 10 connect dend[i](0), dend[8](1)
connect dend[11](0), dend[1](1)
connect dend[12](0), dend(1)
for i = 13, 14 connect dend[i](0), dend[12](1)
for i = 15, 16 connect dend[i](0), dend[14](1)
connect dend[17](0), soma(0.5)
for i = 18, 19 connect dend[i](0), dend[17](1)
connect dend[20](0), soma(0.5)
for i = 21, 24 connect dend[i](0), dend[i-1](1)
connect dend[25](0), dend[23](1)
for i = 26, 27 connect dend[i](0), dend[25](1)
for i = 28, 29 connect dend[i](0), dend[27](1)
connect dend[30](0), dend[22](1)
connect dend[31](0), dend[21](1)
connect dend[32](0), dend[20](1)
for i = 33, 34 connect dend[i](0), dend[32](1)
for i = 35, 36 connect dend[i](0), dend[34](1)
connect dend[37](0), soma(0.5)
for i = 38, 40 connect dend[i](0), dend[i-1](1)
connect dend[41](0), dend[39](1)
connect dend[42](0), dend[38](1)
for i = 43, 44 connect dend[i](0), dend[i-1](1)
connect dend[45](0), dend[43](1)
for i = 46, 47 connect dend[i](0), dend[45](1)
connect dend[48](0), dend[42](1)
for i = 49, 50 connect dend[i](0), dend[48](1)
for i = 51, 53 connect dend[i](0), dend[i-1](1)
connect dend[54](0), dend[52](1)
connect dend[55](0), dend[51](1)
for i = 56, 57 connect dend[i](0), dend[i-1](1)
connect dend[58](0), dend[56](1)
connect dend[59](0), dend[55](1)
connect dend[60](0), dend[50](1)
connect dend[61](0), dend[37](1)
for i = 62, 64 connect dend[i](0), dend[i-1](1)
connect dend[65](0), dend[63](1)
connect dend[66](0), dend[62](1)
connect dend[67](0), dend[61](1)
for i = 68, 69 connect dend[i](0), dend[i-1](1)
connect dend[70](0), dend[68](1)
connect dend[71](0), dend[67](1)
connect dend[72](0), soma(0.5)
for i = 73, 74 connect dend[i](0), dend[i-1](1)
connect dend[75](0), dend[73](1)
connect dend[76](0), dend[72](1)
connect dend[77](0), soma(0.5)
for i = 78, 79 connect dend[i](0), dend[77](1)
for i = 80, 81 connect dend[i](0), dend[i-1](1)
connect dend[82](0), dend[80](1)
connect dend[83](0), dend[79](1)
connect dend[84](0), soma(0.5)
for i = 85, 86 connect dend[i](0), dend[84](1)
for i = 87, 88 connect dend[i](0), dend[86](1)
for i = 89, 91 connect dend[i](0), dend[88](1)
connect dend[92](0), soma(0.5)
for i = 93, 95 connect dend[i](0), dend[i-1](1)
connect dend[96](0), dend[94](1)
connect dend[97](0), dend[93](1)
connect dend[98](0), dend[92](1)
for i = 99, 100 connect dend[i](0), dend[98](1)
for i = 101, 102 connect dend[i](0), dend[100](1)
connect dend[103](0), soma(0.5)
for i = 104, 107 connect dend[i](0), dend[i-1](1)
connect dend[108](0), dend[106](1)
for i = 109, 111 connect dend[i](0), dend[i-1](1)
connect dend[112](0), dend[110](1)
connect dend[113](0), dend[109](1)
connect dend[114](0), dend[108](1)
for i = 115, 116 connect dend[i](0), dend[114](1)
connect dend[117](0), dend[105](1)
connect dend[118](0), dend[104](1)
for i = 119, 122 connect dend[i](0), dend[i-1](1)
connect dend[123](0), dend[121](1)
connect dend[124](0), dend[120](1)
connect dend[125](0), dend[119](1)
connect dend[126](0), dend[118](1)
for i = 127, 128 connect dend[i](0), dend[126](1)
connect dend[129](0), dend[103](1)
for i = 130, 133 connect dend[i](0), dend[i-1](1)
connect dend[134](0), dend[132](1)
for i = 135, 136 connect dend[i](0), dend[134](1)
for i = 137, 138 connect dend[i](0), dend[136](1)
connect dend[139](0), dend[131](1)
connect dend[140](0), dend[130](1)
connect dend[141](0), dend[129](1)
for i = 142, 143 connect dend[i](0), dend[141](1)
for i = 144, 145 connect dend[i](0), dend[143](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
// pt3dconst(1) // this line is activated in the translation function
//# note that the soma here is unsual with 5 pts and different diam
// if you are not cautious, neuron may change these diameters to another unified value and mess up with the soma area
// this may happen with you open the soma parameters from the GUI
pt3dadd(-518.36, 44.2714, 0, 36.9042)
pt3dadd(-517.175, 42.5831, -5.87, 32.0881)
pt3dadd(-516.49, 43.8719, -10.77, 17.2456)
pt3dadd(-514.756, 41.2769, 3.23, 33.5642)
pt3dadd(-507.193, 37.5256, 6.8856, 19.205)
}
dend {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-524.43, 32.08, -5.87, 7.31)
pt3dadd(-526.35, 29.77, -5.87, 5.57)
pt3dadd(-527.66, 27.47, -5.87, 4.52)
}
dend[1] {pt3dclear()
pt3dadd(-527.66, 27.47, -5.87, 3.48)
pt3dadd(-528.27, 24.07, -5.87, 3.48)
pt3dadd(-529.49, 20.91, -6.85, 3.48)
pt3dadd(-530.74, 17.71, -6.85, 2.78)
pt3dadd(-531.54, 15.99, -6.85, 2.44)
pt3dadd(-532.74, 13.56, -5.87, 2.44)
pt3dadd(-533.95, 10.74, -5.87, 2.44)
pt3dadd(-534.92, 7.31, -5.87, 2.09)
pt3dadd(-535.42, 4.21, -5.87, 2.09)
pt3dadd(-536.12, 1.97, -6.85, 2.09)
pt3dadd(-537.27, -0.37, -7.83, 2.09)
pt3dadd(-538.98, -2.27, -9.79, 2.09)
pt3dadd(-539.4, -5.02, -9.79, 2.09)
pt3dadd(-540.36, -7.12, -15.66, 2.09)
pt3dadd(-540.26, -9.76, -15.66, 2.09)
pt3dadd(-540.38, -11, -19.58, 2.09)
pt3dadd(-541.52, -12.61, -21.54, 2.09)
pt3dadd(-541.78, -14.47, -21.54, 2.09)
pt3dadd(-543.42, -16.25, -22.52, 2.09)
pt3dadd(-544.01, -18.39, -23.5, 2.09)
pt3dadd(-545.38, -20.31, -23.5, 2.09)
pt3dadd(-544.32, -22.17, -30.35, 1.74)
pt3dadd(-543.09, -23.14, -30.35, 1.74)
pt3dadd(-544.55, -25.22, -35.24, 1.74)
pt3dadd(-545.35, -27.34, -37.2, 1.74)
pt3dadd(-547.34, -28.33, -40.14, 1.39)
pt3dadd(-547.65, -28.16, -40.14, 1.39)
pt3dadd(-546.8, -30.07, -41.12, 1.39)
pt3dadd(-547.17, -31.65, -45.03, 1.39)
pt3dadd(-548.52, -32.21, -45.03, 1.39)
pt3dadd(-551.14, -32.5, -48.95, 1.39)
pt3dadd(-551.99, -33.86, -50.91, 1.39)
pt3dadd(-553.94, -34.47, -56.78, 1.39)
pt3dadd(-555.04, -35.4, -57.76, 1.39)
pt3dadd(-556.28, -36.49, -57.76, 1.04)
pt3dadd(-558.71, -38.45, -57.76, 1.04)
}
dend[2] {pt3dclear()
pt3dadd(-558.71, -38.45, -57.76, 1.04)
pt3dadd(-561.54, -38.61, -57.76, 1.04)
pt3dadd(-563.31, -40.2, -64.61, 1.04)
pt3dadd(-565.88, -41.04, -66.57, 1.04)
pt3dadd(-568.57, -42.23, -71.47, 1.04)
pt3dadd(-572.2, -43.02, -76.36, 1.04)
pt3dadd(-575.56, -43.5, -80.28, 0.7)
pt3dadd(-579.38, -44.04, -81.26, 0.7)
pt3dadd(-583.44, -44.22, -81.26, 0.7)
pt3dadd(-585.63, -43.61, -81.26, 0.7)
pt3dadd(-586.84, -44.55, -87.13, 0.7)
pt3dadd(-589.88, -43.98, -93, 0.7)
pt3dadd(-593.33, -44.66, -98.88, 0.7)
pt3dadd(-594.99, -44.34, -98.88, 0.7)
}
dend[3] {pt3dclear()
pt3dadd(-594.99, -44.34, -98.88, 0.7)
pt3dadd(-596.56, -44.85, -98.88, 0.7)
pt3dadd(-598.17, -46.92, -98.88, 0.7)
pt3dadd(-600.61, -49.26, -102.79, 0.7)
pt3dadd(-602.16, -48.34, -102.79, 0.7)
pt3dadd(-603.57, -47.12, -102.79, 0.7)
pt3dadd(-606.87, -46.83, -109.65, 0.7)
pt3dadd(-607.12, -48.65, -113.56, 0.7)
pt3dadd(-607.93, -49.07, -113.56, 0.7)
pt3dadd(-609.06, -51.56, -113.56, 0.7)
pt3dadd(-609.05, -53.15, -118.46, 0.7)
pt3dadd(-607.8, -53.65, -119.44, 0.7)
pt3dadd(-608.66, -55.66, -122.37, 0.7)
pt3dadd(-609.26, -57.25, -122.37, 0.7)
pt3dadd(-609.97, -59.86, -131.19, 0.7)
pt3dadd(-612.63, -62.32, -138.04, 0.7)
pt3dadd(-611.62, -64.41, -142.93, 0.7)
pt3dadd(-613.29, -67.02, -145.87, 0.7)
pt3dadd(-615.37, -67.59, -151.74, 0.7)
pt3dadd(-616.8, -69.23, -151.74, 0.7)
pt3dadd(-618.42, -68.79, -156.64, 0.35)
pt3dadd(-622, -69.28, -156.64, 0.35)
pt3dadd(-624.22, -68.69, -157.62, 0.35)
pt3dadd(-626.45, -68.51, -157.62, 0.35)
pt3dadd(-628.95, -67.38, -158.6, 0.35)
}
dend[4] {pt3dclear()
pt3dadd(-628.95, -67.38, -158.6, 0.35)
pt3dadd(-630.72, -67.72, -159.58, 0.35)
pt3dadd(-634.51, -69.58, -159.58, 0.35)
pt3dadd(-637.08, -70.56, -159.58, 0.35)
pt3dadd(-639.68, -71.31, -164.47, 0.35)
pt3dadd(-641.44, -73.1, -164.47, 0.35)
pt3dadd(-641.38, -75.35, -164.47, 0.35)
pt3dadd(-644.49, -76.84, -167.41, 0.35)
pt3dadd(-646.71, -78.24, -167.41, 0.35)
pt3dadd(-648.44, -78.76, -173.28, 0.35)
pt3dadd(-648.44, -78.76, -174.26, 0.35)
pt3dadd(-649.85, -78.31, -174.26, 0.35)
pt3dadd(-651.63, -77.8, -181.11, 0.35)
pt3dadd(-652.98, -80.34, -181.11, 0.35)
pt3dadd(-655.31, -79.73, -181.11, 0.35)
pt3dadd(-657.3, -80.02, -181.11, 0.35)
pt3dadd(-658.97, -82.66, -181.11, 0.35)
pt3dadd(-661.83, -83.09, -185.03, 0.35)
pt3dadd(-663.61, -81.75, -185.03, 0.35)
pt3dadd(-664.87, -82.83, -185.03, 0.35)
pt3dadd(-667.96, -81.43, -189.92, 0.35)
pt3dadd(-670.53, -80.95, -189.92, 0.35)
pt3dadd(-671.87, -78.38, -189.92, 0.35)
pt3dadd(-673.71, -79.53, -189.92, 0.35)
pt3dadd(-674.51, -77.83, -196.78, 0.35)
pt3dadd(-675.4, -76.74, -196.78, 0.35)
pt3dadd(-677.2, -78.28, -199.71, 0.35)
pt3dadd(-678.61, -77.48, -201.67, 0.35)
pt3dadd(-679.66, -76.35, -201.67, 0.35)
pt3dadd(-681.46, -75.98, -201.67, 0.35)
pt3dadd(-682.83, -74.79, -207.55, 0.35)
}
}
proc shape3d_2() {
dend[4] { pt3dadd(-683.2, -71.65, -210.48, 0.35)
pt3dadd(-684.12, -71.74, -214.4, 0.35)
pt3dadd(-685.45, -69.78, -217.34, 0.35)
pt3dadd(-688.07, -70.1, -217.34, 0.35)
pt3dadd(-689.61, -70.92, -217.34, 0.35)
pt3dadd(-691.09, -69.1, -219.29, 0.35)
pt3dadd(-692.82, -68.8, -219.29, 0.35)
pt3dadd(-694.19, -67.61, -219.29, 0.35)
pt3dadd(-696.12, -67.84, -220.27, 0.35)
pt3dadd(-697.12, -69.04, -226.15, 0.35)
pt3dadd(-698.45, -67.89, -233.98, 0.35)
pt3dadd(-699.97, -69.44, -238.87, 0.35)
pt3dadd(-700.76, -71.28, -238.87, 0.35)
pt3dadd(-701.84, -74.15, -238.87, 0.35)
pt3dadd(-705.57, -76.11, -238.87, 0.35)
pt3dadd(-708.34, -78.28, -248.66, 0.35)
pt3dadd(-710.51, -81.27, -249.64, 0.35)
pt3dadd(-711.23, -84.27, -260.41, 0.35)
pt3dadd(-712.05, -88.24, -266.29, 0.35)
pt3dadd(-714.82, -89.79, -266.29, 0.35)
pt3dadd(-717.56, -87.97, -267.27, 0.35)
pt3dadd(-719.27, -85.99, -267.27, 0.35)
pt3dadd(-720.81, -85.97, -272.16, 0.35)
pt3dadd(-722.97, -82.63, -274.12, 0.35)
pt3dadd(-727.31, -82.34, -274.12, 0.35)
pt3dadd(-729.82, -83.16, -280.97, 0.35)
pt3dadd(-734.42, -81.16, -280.97, 0.35)
pt3dadd(-737.93, -81.43, -281.95, 0.35)
pt3dadd(-741.61, -84.44, -288.8, 0.35)
pt3dadd(-744.9, -88.43, -289.78, 0.35)
pt3dadd(-747.98, -90.08, -289.78, 0.35)
pt3dadd(-747.92, -92.28, -289.78, 0.35)
pt3dadd(-746.7, -94.73, -295.66, 0.35)
pt3dadd(-746.7, -94.73, -296.63, 0.35)
pt3dadd(-746.22, -95.97, -294.68, 0.35)
}
dend[5] {pt3dclear()
pt3dadd(-628.95, -67.38, -158.6, 0.35)
pt3dadd(-632.01, -70.23, -155.66, 0.35)
pt3dadd(-633.93, -72.58, -155.66, 0.35)
pt3dadd(-635.67, -75.15, -155.66, 0.35)
pt3dadd(-637.29, -76.24, -155.66, 0.35)
pt3dadd(-640.05, -79.58, -160.55, 0.35)
pt3dadd(-642.58, -80.15, -160.55, 0.35)
pt3dadd(-645.52, -81.12, -160.55, 0.35)
pt3dadd(-647.36, -83.65, -160.55, 0.35)
pt3dadd(-648.54, -85.41, -160.55, 0.35)
pt3dadd(-651.61, -86.78, -160.55, 0.35)
pt3dadd(-652.02, -89.24, -160.55, 0.35)
pt3dadd(-655.44, -91.52, -160.55, 0.35)
pt3dadd(-655.35, -93.94, -160.55, 0.35)
pt3dadd(-655.07, -96.15, -167.41, 0.35)
pt3dadd(-656.63, -98.19, -167.41, 0.35)
pt3dadd(-657.72, -102.12, -171.32, 0.35)
pt3dadd(-658.65, -103.54, -173.28, 0.35)
pt3dadd(-659.87, -106.48, -173.28, 0.35)
pt3dadd(-659.53, -109.65, -177.2, 0.35)
pt3dadd(-658.75, -112.75, -177.2, 0.35)
pt3dadd(-660.17, -114.09, -176.22, 0.35)
pt3dadd(-661.6, -115.64, -176.22, 0.35)
pt3dadd(-659.5, -116.53, -176.22, 0.35)
pt3dadd(-661.23, -119.79, -176.22, 0.35)
pt3dadd(-660.74, -122.27, -183.07, 0.35)
pt3dadd(-660.74, -122.27, -184.05, 0.35)
pt3dadd(-663.09, -124.62, -185.03, 0.35)
pt3dadd(-661.64, -126.33, -186.99, 0.35)
pt3dadd(-661.64, -126.33, -187.97, 0.35)
pt3dadd(-662.9, -129.49, -192.86, 0.35)
pt3dadd(-661.9, -131.56, -192.86, 0.35)
pt3dadd(-662.84, -134.02, -192.86, 0.35)
pt3dadd(-663.33, -135.17, -193.84, 0.35)
pt3dadd(-663.53, -136.86, -193.84, 0.35)
pt3dadd(-665.02, -138.06, -194.82, 0.35)
pt3dadd(-665.63, -140.33, -194.82, 0.35)
pt3dadd(-666.93, -142.23, -195.8, 0.35)
pt3dadd(-668.11, -144.49, -201.67, 0.35)
pt3dadd(-670.12, -146.52, -204.61, 0.35)
pt3dadd(-671.57, -146.71, -209.5, 0.35)
pt3dadd(-673.4, -144.95, -214.4, 0.35)
pt3dadd(-675.09, -145.42, -218.32, 0.35)
pt3dadd(-678.03, -146.26, -220.27, 0.35)
pt3dadd(-679.95, -145.05, -222.23, 0.35)
pt3dadd(-681.68, -143.78, -222.23, 0.35)
pt3dadd(-683.96, -144, -227.13, 0.35)
pt3dadd(-686.2, -145.94, -234.96, 0.35)
}
dend[6] {pt3dclear()
pt3dadd(-594.99, -44.34, -98.88, 0.7)
pt3dadd(-596.61, -41.94, -95.94, 0.7)
pt3dadd(-599.26, -41.91, -95.94, 0.7)
pt3dadd(-602.3, -40.43, -95.94, 0.7)
pt3dadd(-604.27, -40.54, -102.79, 0.7)
pt3dadd(-604.27, -37.71, -110.63, 0.7)
pt3dadd(-604.92, -37.68, -110.63, 0.35)
pt3dadd(-607.16, -38.46, -110.63, 0.35)
pt3dadd(-609.79, -38.18, -110.63, 0.35)
pt3dadd(-610.8, -38.92, -116.5, 0.35)
pt3dadd(-612.68, -39.82, -120.42, 0.35)
pt3dadd(-614.97, -38.39, -122.37, 0.35)
pt3dadd(-616.79, -39.37, -125.31, 0.35)
pt3dadd(-616.79, -39.37, -126.29, 0.35)
pt3dadd(-619.92, -39.13, -128.25, 0.35)
pt3dadd(-623.36, -39.61, -128.25, 0.35)
pt3dadd(-626.6, -41.24, -130.21, 0.35)
pt3dadd(-629.54, -42.35, -136.08, 0.35)
pt3dadd(-634.14, -42.33, -139.02, 0.35)
pt3dadd(-637.2, -41.16, -140.97, 0.35)
pt3dadd(-638.49, -39.42, -146.85, 0.35)
pt3dadd(-640.81, -38.92, -147.83, 0.35)
pt3dadd(-641.9, -37.35, -147.83, 0.35)
pt3dadd(-644.55, -37.01, -147.83, 0.35)
pt3dadd(-647.76, -36.3, -147.83, 0.35)
pt3dadd(-649.58, -35.11, -153.7, 0.35)
pt3dadd(-653.08, -34.71, -159.58, 0.35)
pt3dadd(-656.1, -35.35, -161.53, 0.35)
pt3dadd(-658.28, -36.12, -170.34, 0.35)
pt3dadd(-659.6, -35.35, -170.34, 0.35)
pt3dadd(-661.86, -35.33, -171.32, 0.7)
pt3dadd(-658.86, -36.74, -170.34, 0.7)
pt3dadd(-656.94, -40.07, -175.24, 0.7)
pt3dadd(-656.91, -43.05, -180.13, 0.7)
pt3dadd(-658.94, -43.06, -189.92, 0.35)
pt3dadd(-659.93, -44.8, -189.92, 0.35)
pt3dadd(-661.39, -46.31, -189.92, 0.35)
pt3dadd(-662.69, -48.74, -189.92, 0.35)
pt3dadd(-665.3, -49.76, -189.92, 0.35)
pt3dadd(-668.72, -50.42, -189.92, 0.35)
pt3dadd(-670.95, -49.98, -199.71, 0.35)
pt3dadd(-674.14, -49.88, -199.71, 0.35)
pt3dadd(-675.69, -49.81, -200.69, 0.35)
pt3dadd(-676.93, -46.69, -211.46, 0.35)
}
dend[7] {pt3dclear()
pt3dadd(-676.93, -46.69, -211.46, 0.35)
pt3dadd(-678.69, -49.12, -211.46, 0.35)
pt3dadd(-680.65, -52.45, -212.44, 0.35)
pt3dadd(-678.84, -54.78, -220.27, 0.35)
pt3dadd(-677.56, -57.69, -220.27, 0.35)
pt3dadd(-677.33, -58.45, -228.11, 0.35)
pt3dadd(-673.39, -58.73, -229.08, 0.35)
pt3dadd(-672.21, -57.16, -229.08, 0.35)
pt3dadd(-670.39, -58.32, -230.06, 0.35)
pt3dadd(-671.85, -58.97, -229.08, 0.35)
pt3dadd(-672.09, -60.95, -229.08, 0.35)
pt3dadd(-674.81, -61.45, -229.08, 0.35)
pt3dadd(-677.1, -60.22, -240.83, 0.35)
pt3dadd(-677.1, -60.22, -241.81, 0.35)
pt3dadd(-677.71, -58.62, -243.77, 0.35)
pt3dadd(-678.29, -58.06, -246.71, 0.35)
pt3dadd(-680.84, -56.05, -246.71, 0.35)
pt3dadd(-681.45, -54.94, -251.6, 0.35)
pt3dadd(-678.88, -55.14, -258.45, 0.35)
pt3dadd(-674.17, -54.91, -258.45, 0.35)
pt3dadd(-669.68, -55.54, -258.45, 0.35)
pt3dadd(-666.21, -56.66, -258.45, 0.35)
pt3dadd(-665.22, -58.37, -262.37, 0.35)
pt3dadd(-662.93, -60.74, -270.2, 0.35)
pt3dadd(-658.92, -64.34, -273.14, 0.35)
}
dend[8] {pt3dclear()
pt3dadd(-676.93, -46.69, -211.46, 0.35)
pt3dadd(-677.98, -44.92, -212.44, 0.35)
pt3dadd(-679.38, -44.1, -212.44, 0.35)
pt3dadd(-680.85, -42.74, -212.44, 0.35)
pt3dadd(-681.57, -40.41, -212.44, 0.35)
pt3dadd(-682.35, -38.26, -212.44, 0.35)
pt3dadd(-683.11, -37.53, -212.44, 0.35)
pt3dadd(-684.67, -36.38, -212.44, 0.35)
pt3dadd(-685.38, -33.02, -212.44, 0.35)
pt3dadd(-688.63, -32.16, -212.44, 0.35)
pt3dadd(-688.9, -28.51, -212.44, 0.35)
pt3dadd(-691.37, -28.42, -212.44, 0.35)
pt3dadd(-693.54, -26.82, -212.44, 0.35)
pt3dadd(-696.77, -25.8, -209.5, 0.35)
pt3dadd(-698.47, -25.8, -209.5, 0.35)
pt3dadd(-699.42, -22.4, -208.53, 0.35)
pt3dadd(-701.45, -21.2, -208.53, 0.35)
pt3dadd(-702.26, -19.29, -208.53, 0.35)
pt3dadd(-702.5, -17.05, -208.53, 0.35)
pt3dadd(-704.35, -14.28, -204.61, 0.35)
pt3dadd(-706.96, -12.68, -204.61, 0.35)
pt3dadd(-707.22, -12.92, -204.61, 0.35)
pt3dadd(-709.29, -10.75, -204.61, 0.35)
pt3dadd(-710.65, -9, -203.63, 0.35)
pt3dadd(-712.02, -6.8, -203.63, 0.35)
pt3dadd(-712.76, -5.35, -203.63, 0.35)
pt3dadd(-713.25, -4.31, -203.63, 0.35)
pt3dadd(-715.45, -1.45, -202.65, 0.35)
pt3dadd(-717.84, 1.11, -202.65, 0.35)
pt3dadd(-719.54, 3.97, -201.67, 0.35)
pt3dadd(-721.52, 7.11, -201.67, 0.35)
pt3dadd(-724.18, 10.03, -201.67, 0.35)
pt3dadd(-724.62, 11.75, -201.67, 0.35)
pt3dadd(-726.41, 14.18, -201.67, 0.35)
}
dend[9] {pt3dclear()
pt3dadd(-726.41, 14.18, -201.67, 0.35)
pt3dadd(-726.46, 16.74, -199.71, 0.35)
pt3dadd(-727.33, 18.46, -199.71, 0.35)
pt3dadd(-728.35, 19.62, -199.71, 0.35)
pt3dadd(-728.42, 21.61, -198.74, 0.35)
pt3dadd(-730.26, 22.9, -198.74, 0.35)
pt3dadd(-732.84, 25.96, -198.74, 0.35)
pt3dadd(-732.75, 28.45, -198.74, 0.35)
pt3dadd(-734.62, 30.73, -206.57, 0.35)
pt3dadd(-736.58, 30.96, -207.55, 0.35)
pt3dadd(-738.2, 31.98, -207.55, 0.35)
pt3dadd(-740.11, 31.36, -207.55, 0.35)
pt3dadd(-743.12, 32.84, -210.48, 0.35)
}
dend[10] {pt3dclear()
pt3dadd(-726.41, 14.18, -201.67, 0.35)
}
}
proc shape3d_3() {
dend[10] { pt3dadd(-729.15, 16.14, -200.69, 0.35)
pt3dadd(-732.1, 14.35, -200.69, 0.35)
pt3dadd(-734.03, 16.02, -199.71, 0.35)
pt3dadd(-737.38, 16.8, -199.71, 0.35)
pt3dadd(-739.53, 16.24, -199.71, 0.35)
pt3dadd(-743.11, 15.96, -199.71, 0.35)
pt3dadd(-747.44, 17.38, -199.71, 0.35)
pt3dadd(-750.48, 17.56, -199.71, 0.35)
pt3dadd(-753.54, 19.61, -199.71, 0.35)
pt3dadd(-757.65, 20.7, -199.71, 0.35)
pt3dadd(-759.53, 20.07, -199.71, 0.35)
pt3dadd(-760.7, 22.17, -199.71, 0.35)
pt3dadd(-763.19, 23.27, -199.71, 0.35)
pt3dadd(-764.59, 24.57, -208.53, 0.35)
pt3dadd(-765.99, 24.43, -209.5, 0.35)
pt3dadd(-767.24, 25.65, -209.5, 0.35)
pt3dadd(-768.72, 26.87, -209.5, 0.35)
pt3dadd(-770.51, 28.27, -209.5, 0.35)
pt3dadd(-772.47, 30, -212.44, 0.35)
pt3dadd(-774.96, 32.66, -212.44, 0.35)
pt3dadd(-775.47, 32.18, -212.44, 0.35)
pt3dadd(-776.8, 31.98, -212.44, 0.35)
pt3dadd(-777.08, 31.24, -212.44, 0.35)
pt3dadd(-778.89, 30.24, -212.44, 0.35)
pt3dadd(-781.91, 31.44, -213.42, 0.35)
}
dend[11] {pt3dclear()
pt3dadd(-558.71, -38.45, -57.76, 0.7)
pt3dadd(-560.22, -40.99, -62.66, 0.7)
pt3dadd(-562.16, -44.53, -62.66, 0.7)
pt3dadd(-561.55, -46.12, -62.66, 0.7)
pt3dadd(-561.85, -48.41, -62.66, 0.7)
pt3dadd(-562.83, -51.26, -62.66, 0.7)
pt3dadd(-564.01, -54.4, -62.66, 0.7)
pt3dadd(-564.72, -57.55, -62.66, 0.7)
pt3dadd(-564.6, -60.1, -62.66, 0.7)
pt3dadd(-564.93, -65.18, -68.53, 0.7)
pt3dadd(-566.34, -68.14, -68.53, 0.7)
pt3dadd(-566.85, -71.79, -68.53, 0.7)
pt3dadd(-568.04, -76.27, -68.53, 0.7)
pt3dadd(-569.44, -79.29, -68.53, 0.7)
pt3dadd(-569.89, -82.68, -74.4, 0.7)
pt3dadd(-568.32, -84.27, -77.34, 0.7)
pt3dadd(-569.17, -87.48, -77.34, 0.7)
pt3dadd(-570.07, -90.74, -77.34, 0.7)
pt3dadd(-570.02, -94.53, -77.34, 0.7)
pt3dadd(-569.9, -98.25, -77.34, 0.7)
pt3dadd(-570.36, -101.58, -77.34, 0.7)
pt3dadd(-570.01, -105.57, -77.34, 0.7)
pt3dadd(-570.2, -110.36, -79.3, 0.7)
pt3dadd(-569, -115.06, -80.28, 0.7)
pt3dadd(-569.29, -118.86, -83.21, 0.7)
pt3dadd(-571.37, -121.56, -85.17, 0.7)
pt3dadd(-571.14, -124.3, -88.11, 0.7)
pt3dadd(-572.98, -127, -90.07, 0.7)
pt3dadd(-574.49, -130.52, -90.07, 0.7)
pt3dadd(-577.45, -135.11, -92.03, 0.7)
pt3dadd(-577.4, -138.39, -92.03, 0.7)
pt3dadd(-578.59, -140.23, -92.03, 0.7)
pt3dadd(-577, -142.22, -94.96, 0.7)
pt3dadd(-577, -142.22, -95.94, 0.7)
pt3dadd(-577.79, -144.36, -96.92, 0.7)
pt3dadd(-577.02, -148.35, -98.88, 0.7)
pt3dadd(-575.97, -152.03, -100.84, 0.7)
pt3dadd(-575.02, -155.59, -100.84, 0.7)
pt3dadd(-573.75, -159.92, -100.84, 0.7)
pt3dadd(-573.03, -161.98, -100.84, 0.7)
pt3dadd(-573.04, -163.42, -100.84, 0.7)
pt3dadd(-572.19, -166.32, -100.84, 0.7)
pt3dadd(-570.88, -169.45, -103.77, 0.7)
pt3dadd(-568.75, -173.41, -103.77, 0.35)
pt3dadd(-568.93, -176.87, -106.71, 0.35)
pt3dadd(-567.31, -180.76, -106.71, 0.35)
pt3dadd(-566.23, -185.82, -106.71, 0.35)
pt3dadd(-563.96, -188.8, -106.71, 0.35)
pt3dadd(-563.93, -191.25, -106.71, 0.35)
pt3dadd(-563.37, -194.49, -106.71, 0.35)
pt3dadd(-565.06, -196.37, -111.61, 0.35)
pt3dadd(-562.06, -199.38, -116.5, 0.35)
pt3dadd(-559.67, -200.81, -116.5, 0.35)
pt3dadd(-555.38, -201.96, -116.5, 0.35)
pt3dadd(-554.48, -205.1, -116.5, 0.35)
pt3dadd(-552.29, -207.82, -116.5, 0.35)
pt3dadd(-549, -209.27, -117.48, 0.35)
pt3dadd(-548.25, -212.53, -117.48, 0.35)
pt3dadd(-547.59, -214.95, -121.4, 0.35)
pt3dadd(-546.75, -217.6, -122.37, 0.35)
pt3dadd(-543.65, -218.74, -126.29, 0.35)
pt3dadd(-541.7, -221.22, -128.25, 0.35)
pt3dadd(-540.79, -223.88, -128.25, 0.35)
pt3dadd(-538.64, -226.78, -128.25, 0.35)
pt3dadd(-536.12, -228.96, -130.21, 0.35)
pt3dadd(-536.35, -231.55, -130.21, 0.35)
pt3dadd(-537.25, -234.41, -130.21, 0.35)
pt3dadd(-537.42, -238.86, -130.21, 0.35)
pt3dadd(-539.37, -244.41, -139.02, 0.35)
pt3dadd(-542.4, -250.85, -139.02, 0.35)
pt3dadd(-543.32, -257.29, -140, 0.35)
pt3dadd(-545.33, -260.66, -140, 0.35)
pt3dadd(-547.13, -261.84, -150.76, 0.35)
pt3dadd(-547.57, -263.15, -150.76, 0.35)
pt3dadd(-549.12, -264.12, -151.74, 0.35)
pt3dadd(-548.57, -266.87, -153.7, 0.35)
pt3dadd(-550.12, -267.45, -153.7, 0.35)
}
dend[12] {pt3dclear()
pt3dadd(-527.66, 27.47, -5.87, 2.44)
pt3dadd(-529.1, 25.24, -4.89, 2.44)
pt3dadd(-530.43, 22.89, -4.89, 2.44)
pt3dadd(-532.83, 22.19, -2.94, 3.13)
pt3dadd(-535.18, 22.5, -5.87, 2.44)
pt3dadd(-537.23, 22.64, -8.81, 1.74)
pt3dadd(-539.16, 22.58, -9.79, 1.74)
pt3dadd(-541.52, 23.59, -9.79, 1.74)
pt3dadd(-544.03, 24.44, -12.73, 2.09)
pt3dadd(-546.4, 24.62, -12.73, 2.09)
pt3dadd(-548.77, 24.3, -14.68, 2.09)
pt3dadd(-550.82, 24.44, -14.68, 2.09)
pt3dadd(-552.89, 25.34, -15.66, 2.09)
pt3dadd(-555.24, 25.16, -19.58, 2.09)
pt3dadd(-557.22, 24.21, -30.35, 2.09)
pt3dadd(-558.8, 22.86, -30.35, 2.09)
pt3dadd(-560.21, 22.7, -33.29, 2.09)
pt3dadd(-560.3, 23.75, -41.12, 2.09)
}
dend[13] {pt3dclear()
pt3dadd(-560.3, 23.75, -41.12, 1.39)
pt3dadd(-558.8, 24.69, -41.12, 1.39)
pt3dadd(-556.8, 26.09, -42.1, 1.39)
pt3dadd(-555.52, 26.62, -46.99, 1.39)
pt3dadd(-554.31, 26.44, -46.99, 1.39)
pt3dadd(-554.31, 28.23, -46.99, 1.39)
pt3dadd(-552.4, 28.18, -48.95, 1.39)
pt3dadd(-550.77, 28.11, -49.93, 1.04)
pt3dadd(-549.18, 27.67, -52.87, 1.04)
pt3dadd(-548.21, 28.15, -52.87, 1.39)
pt3dadd(-546.65, 28.47, -52.87, 1.39)
pt3dadd(-545.12, 29.75, -52.87, 1.04)
pt3dadd(-543.58, 29.43, -56.78, 1.39)
pt3dadd(-541.88, 28.68, -56.78, 1.39)
pt3dadd(-539.26, 29.64, -57.76, 1.39)
pt3dadd(-536.89, 29.26, -57.76, 1.04)
pt3dadd(-534.84, 28.31, -57.76, 1.04)
pt3dadd(-534.58, 27.63, -57.76, 1.04)
pt3dadd(-532.65, 27.58, -57.76, 1.04)
pt3dadd(-532.51, 25.34, -57.76, 1.04)
pt3dadd(-530.53, 23.02, -57.76, 1.04)
pt3dadd(-528.77, 21.15, -57.76, 0.7)
pt3dadd(-527.34, 19.87, -56.78, 0.7)
pt3dadd(-524.93, 20.74, -56.78, 0.7)
pt3dadd(-523.27, 19.27, -59.72, 0.7)
pt3dadd(-521.3, 18.78, -59.72, 0.7)
pt3dadd(-520.45, 20.45, -59.72, 0.7)
pt3dadd(-518.62, 18.81, -63.63, 0.7)
pt3dadd(-517.3, 18.77, -63.63, 0.7)
pt3dadd(-516.27, 17.19, -63.63, 0.7)
pt3dadd(-514.5, 17.64, -64.61, 0.7)
pt3dadd(-512.66, 18.2, -70.49, 0.7)
pt3dadd(-510.42, 17.32, -70.49, 0.7)
pt3dadd(-509.27, 16.34, -73.42, 0.7)
pt3dadd(-507.58, 16.16, -76.36, 0.7)
pt3dadd(-505.57, 16.43, -82.24, 0.7)
pt3dadd(-504.91, 14.74, -85.17, 0.7)
pt3dadd(-505.45, 11.93, -87.13, 0.7)
pt3dadd(-504.01, 10.67, -87.13, 0.7)
pt3dadd(-501.84, 10.91, -89.09, 0.7)
pt3dadd(-500.63, 10.73, -89.09, 0.7)
pt3dadd(-499.42, 8.79, -89.09, 0.7)
pt3dadd(-498.86, 7.56, -89.09, 0.7)
pt3dadd(-496.56, 7.04, -93.98, 0.7)
pt3dadd(-494.43, 7.4, -93.98, 0.7)
pt3dadd(-493.98, 8.48, -100.84, 0.7)
pt3dadd(-494.1, 10.15, -100.84, 0.7)
pt3dadd(-492.47, 8.22, -107.69, 0.7)
pt3dadd(-492.36, 6.25, -112.58, 0.7)
pt3dadd(-492.9, 5.11, -120.42, 0.7)
pt3dadd(-492.9, 5.11, -121.4, 0.7)
pt3dadd(-493.55, 6.61, -121.4, 0.7)
pt3dadd(-495.23, 7.03, -120.42, 0.7)
pt3dadd(-496.74, 5.04, -124.33, 0.7)
pt3dadd(-493.74, 4.63, -126.29, 0.7)
pt3dadd(-490.88, 1.1, -131.19, 0.7)
pt3dadd(-491, -3.06, -138.04, 0.7)
pt3dadd(-489.07, -5.23, -138.04, 0.35)
pt3dadd(-486, -7.66, -138.04, 0.35)
pt3dadd(-486.16, -9.87, -138.04, 0.35)
pt3dadd(-489.8, -11.21, -142.93, 0.35)
pt3dadd(-489.8, -11.21, -143.91, 0.35)
pt3dadd(-492.96, -11.07, -148.81, 0.35)
pt3dadd(-495.15, -9.13, -150.76, 0.35)
pt3dadd(-495.09, -6.74, -154.68, 0.35)
pt3dadd(-499.59, -4.92, -158.6, 0.35)
pt3dadd(-499.59, -4.92, -159.58, 0.35)
pt3dadd(-505.17, -4.42, -161.53, 0.35)
pt3dadd(-506.97, -4.37, -162.51, 0.35)
pt3dadd(-507.52, -4.41, -162.51, 0.35)
pt3dadd(-510.99, -4.17, -167.41, 0.35)
pt3dadd(-513.6, -2.22, -168.39, 0.35)
pt3dadd(-515.49, -2.19, -170.34, 0.35)
pt3dadd(-517.94, -2.37, -171.32, 0.35)
pt3dadd(-519.68, -0.99, -175.24, 0.35)
pt3dadd(-522.01, -1.44, -181.11, 0.35)
pt3dadd(-524.45, -0.51, -181.11, 0.35)
pt3dadd(-527.43, -2.19, -186.01, 0.35)
pt3dadd(-531.74, -2.41, -190.9, 0.35)
pt3dadd(-535.18, -3.56, -195.8, 0.35)
}
}
proc shape3d_4() {
dend[13] { pt3dadd(-536.75, -5.83, -203.63, 0.35)
pt3dadd(-538.43, -7.61, -208.53, 0.35)
pt3dadd(-537.76, -8.88, -213.42, 0.35)
}
dend[14] {pt3dclear()
pt3dadd(-560.3, 23.75, -41.12, 1.04)
pt3dadd(-562.29, 22.78, -42.1, 1.04)
pt3dadd(-564.22, 22.21, -42.1, 1.04)
pt3dadd(-565.03, 20.31, -42.1, 1.04)
pt3dadd(-567.36, 20.43, -45.03, 1.04)
pt3dadd(-568.5, 20.86, -45.03, 1.04)
pt3dadd(-569.89, 19.34, -45.03, 1.04)
pt3dadd(-570.21, 16.98, -45.03, 1.04)
pt3dadd(-570.05, 15.64, -46.01, 1.04)
pt3dadd(-571.32, 14.8, -51.89, 1.04)
pt3dadd(-572.43, 13.76, -52.87, 1.04)
pt3dadd(-572.66, 12.05, -52.87, 1.04)
pt3dadd(-574.78, 10.72, -56.78, 1.04)
pt3dadd(-576.88, 9.85, -56.78, 1.04)
pt3dadd(-577.68, 9.28, -56.78, 1.04)
pt3dadd(-578.5, 8.58, -56.78, 0.7)
pt3dadd(-579.75, 8.42, -56.78, 0.7)
pt3dadd(-581.79, 7.38, -61.68, 0.7)
pt3dadd(-584.51, 6.58, -61.68, 0.7)
pt3dadd(-587.32, 4.61, -61.68, 0.7)
pt3dadd(-589.21, 5.21, -61.68, 0.7)
pt3dadd(-591.13, 5.68, -63.63, 0.7)
pt3dadd(-593.9, 5.01, -63.63, 0.7)
pt3dadd(-596.01, 7.04, -63.63, 0.35)
pt3dadd(-598.82, 5.52, -64.61, 0.35)
pt3dadd(-600.99, 5.09, -64.61, 0.35)
pt3dadd(-602.97, 6.1, -69.51, 0.35)
pt3dadd(-605.25, 4.91, -69.51, 0.35)
pt3dadd(-607.59, 3.35, -70.49, 0.35)
pt3dadd(-609.31, 4.81, -73.42, 0.35)
pt3dadd(-612.05, 5.4, -73.42, 0.35)
pt3dadd(-613.61, 4.65, -73.42, 0.35)
pt3dadd(-616.06, 3.1, -73.42, 0.35)
pt3dadd(-618.49, 4.06, -74.4, 0.35)
pt3dadd(-621.09, 4.69, -74.4, 0.35)
pt3dadd(-623.91, 2.53, -74.4, 0.35)
pt3dadd(-625.88, 3.19, -76.36, 0.35)
pt3dadd(-628.73, 2.39, -77.34, 0.35)
pt3dadd(-632.94, 2.68, -77.34, 0.35)
pt3dadd(-634.56, 1.42, -77.34, 0.35)
pt3dadd(-637.85, 2.17, -77.34, 0.35)
pt3dadd(-640.77, 2.41, -77.34, 0.35)
pt3dadd(-643.17, 3.52, -78.32, 0.35)
pt3dadd(-645.65, 4.5, -79.3, 0.35)
pt3dadd(-648.59, 4.19, -79.3, 0.35)
pt3dadd(-651.81, 4.09, -80.28, 0.35)
pt3dadd(-655.17, 3.78, -80.28, 0.35)
pt3dadd(-658.57, 3.94, -83.21, 0.35)
pt3dadd(-661.21, 3.38, -83.21, 0.35)
pt3dadd(-663.73, 4.83, -88.11, 0.35)
pt3dadd(-665.81, 4.36, -88.11, 0.35)
pt3dadd(-669.6, 4.65, -88.11, 0.35)
pt3dadd(-672.71, 2.88, -88.11, 0.35)
pt3dadd(-675.64, 0.03, -88.11, 0.35)
pt3dadd(-679.57, 0.02, -91.05, 0.35)
pt3dadd(-683.26, 0.38, -92.03, 0.35)
pt3dadd(-686.07, 0.79, -92.03, 0.35)
pt3dadd(-689.01, -1.53, -93, 0.35)
pt3dadd(-692.69, -2.32, -94.96, 0.35)
}
dend[15] {pt3dclear()
pt3dadd(-692.69, -2.32, -94.96, 0.35)
pt3dadd(-695.4, -3.43, -94.96, 0.35)
pt3dadd(-698.42, -3.42, -95.94, 0.35)
pt3dadd(-701.15, -6.06, -97.9, 0.35)
pt3dadd(-703.41, -7.51, -97.9, 0.35)
pt3dadd(-708.23, -5.92, -97.9, 0.35)
pt3dadd(-709.23, -7.38, -97.9, 0.35)
pt3dadd(-712.01, -8.73, -97.9, 0.35)
pt3dadd(-714.23, -12.31, -97.9, 0.35)
pt3dadd(-717.47, -15.8, -97.9, 0.35)
pt3dadd(-721.51, -17.13, -97.9, 0.35)
pt3dadd(-725.05, -18.4, -102.79, 0.35)
}
dend[16] {pt3dclear()
pt3dadd(-692.69, -2.32, -94.96, 0.35)
pt3dadd(-689.5, -4.05, -93.98, 0.35)
pt3dadd(-689.54, -8.01, -99.86, 0.35)
pt3dadd(-688.96, -9.83, -103.77, 0.35)
pt3dadd(-689.15, -12.93, -103.77, 0.35)
pt3dadd(-688.81, -16.32, -103.77, 0.35)
pt3dadd(-689.2, -18.41, -104.75, 0.35)
pt3dadd(-688.42, -19.84, -104.75, 0.35)
pt3dadd(-690.53, -22.49, -106.71, 0.35)
pt3dadd(-692.17, -23.65, -106.71, 0.35)
pt3dadd(-693.12, -27.14, -106.71, 0.35)
pt3dadd(-694.34, -30.42, -107.69, 0.35)
pt3dadd(-696.04, -33.26, -107.69, 0.35)
pt3dadd(-698.12, -34.54, -109.65, 0.35)
pt3dadd(-701.11, -35.65, -112.58, 0.35)
pt3dadd(-702.55, -36.84, -116.5, 0.35)
pt3dadd(-700.2, -38.24, -119.44, 0.35)
pt3dadd(-699.53, -38.81, -119.44, 0.35)
pt3dadd(-697.54, -41.3, -119.44, 0.35)
pt3dadd(-694.98, -42.99, -119.44, 0.35)
pt3dadd(-694.18, -45.61, -119.44, 0.35)
pt3dadd(-692.23, -48.29, -119.44, 0.35)
pt3dadd(-689.99, -48.92, -119.44, 0.35)
pt3dadd(-688.26, -48.16, -119.44, 0.35)
pt3dadd(-686.7, -48.52, -119.44, 0.35)
pt3dadd(-686.18, -45.75, -120.42, 0.35)
pt3dadd(-684.58, -45.54, -120.42, 0.35)
pt3dadd(-684.83, -43.97, -120.42, 0.35)
pt3dadd(-683.81, -42.15, -119.44, 0.35)
pt3dadd(-682.49, -38.09, -122.37, 0.35)
pt3dadd(-684.88, -37.26, -122.37, 0.35)
pt3dadd(-684.16, -36.61, -122.37, 0.35)
pt3dadd(-682.48, -34.94, -122.37, 0.35)
pt3dadd(-680.37, -33.55, -127.27, 0.35)
pt3dadd(-680.52, -32.04, -133.14, 0.35)
pt3dadd(-680.52, -32.04, -134.12, 0.35)
pt3dadd(-681.05, -30.05, -140, 0.35)
pt3dadd(-683.05, -28.94, -140, 0.35)
pt3dadd(-683.72, -26.55, -142.93, 0.35)
pt3dadd(-686.85, -29.13, -147.83, 0.35)
pt3dadd(-688.74, -31.51, -147.83, 0.35)
pt3dadd(-689.73, -35.08, -152.72, 0.35)
pt3dadd(-687.76, -33.84, -156.64, 0.35)
pt3dadd(-685.58, -31.68, -156.64, 0.35)
pt3dadd(-682.56, -30.42, -156.64, 0.35)
pt3dadd(-680.66, -28.43, -164.47, 0.35)
pt3dadd(-679.38, -31.01, -164.47, 0.35)
}
dend[17] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-534.3, 44.33, 0, 4.87)
pt3dadd(-536.69, 42.72, 0, 3.13)
pt3dadd(-539.33, 41.41, 0, 2.78)
pt3dadd(-543.13, 39.88, 0, 2.44)
pt3dadd(-546.05, 38.5, 0, 2.44)
pt3dadd(-548.99, 37.17, 0, 2.44)
pt3dadd(-552.1, 35.54, -1.96, 2.09)
pt3dadd(-553.67, 33.8, -1.96, 2.09)
pt3dadd(-555.86, 33.98, -3.92, 2.09)
pt3dadd(-557.91, 33.52, -4.89, 2.09)
pt3dadd(-560.24, 32.65, -4.89, 2.09)
pt3dadd(-562.15, 32.54, -4.89, 2.09)
pt3dadd(-564.9, 31.33, -4.89, 2.09)
pt3dadd(-567.44, 29.9, -5.87, 1.74)
pt3dadd(-569.92, 29.48, -6.85, 1.74)
pt3dadd(-571.07, 27.88, -6.85, 1.74)
pt3dadd(-573.4, 25.91, -6.85, 1.74)
pt3dadd(-575.14, 24.26, -6.85, 1.74)
}
dend[18] {pt3dclear()
pt3dadd(-575.14, 24.26, -6.85, 0.7)
pt3dadd(-577.85, 23.92, -3.92, 0.7)
pt3dadd(-579.59, 22.31, -3.92, 0.7)
pt3dadd(-581.42, 22.1, -3.92, 0.7)
pt3dadd(-583.25, 23.33, -3.92, 0.7)
pt3dadd(-584.65, 22.5, -3.92, 0.7)
pt3dadd(-587.37, 21.44, -3.92, 0.7)
pt3dadd(-589.35, 19.69, -3.92, 0.7)
pt3dadd(-589.72, 17.84, -3.92, 0.7)
pt3dadd(-592.51, 16.77, -4.89, 0.7)
pt3dadd(-593.74, 16.22, -4.89, 0.7)
pt3dadd(-596.08, 14.43, -2.94, 0.7)
pt3dadd(-597.57, 15.65, -2.94, 0.7)
pt3dadd(-600.06, 12.99, -2.94, 0.7)
pt3dadd(-601.75, 12.55, -1.96, 0.7)
pt3dadd(-603.43, 11.83, -1.96, 0.7)
pt3dadd(-605.77, 12.95, -1.96, 0.7)
pt3dadd(-608.55, 11.91, -6.85, 0.7)
pt3dadd(-609.84, 10.46, -7.83, 0.7)
pt3dadd(-611.64, 9.71, -7.83, 0.7)
pt3dadd(-613.56, 10.18, -7.83, 0.7)
pt3dadd(-616.21, 9.37, -7.83, 0.7)
pt3dadd(-617.71, 10.47, -7.83, 0.7)
pt3dadd(-619.19, 10.91, -7.83, 0.7)
pt3dadd(-621.52, 11.25, -7.83, 0.7)
pt3dadd(-623.93, 12.16, -8.81, 0.7)
pt3dadd(-626.14, 11.22, -8.81, 0.7)
pt3dadd(-629.6, 10.88, -8.81, 0.7)
pt3dadd(-631.06, 11.97, -13.71, 0.7)
pt3dadd(-634.11, 11.26, -13.71, 0.7)
pt3dadd(-636.32, 10.62, -13.71, 0.7)
pt3dadd(-638.42, 7.94, -13.71, 0.7)
pt3dadd(-642.65, 7.65, -14.68, 0.7)
pt3dadd(-646.4, 5.52, -14.68, 0.7)
pt3dadd(-648.33, 0.73, -14.68, 0.7)
pt3dadd(-649.93, -2.08, -24.47, 0.7)
pt3dadd(-652.14, -6.36, -25.45, 0.7)
pt3dadd(-653.9, -9.78, -25.45, 0.7)
pt3dadd(-655.03, -11.76, -25.45, 0.7)
pt3dadd(-656.95, -13.03, -25.45, 0.7)
pt3dadd(-656.81, -14.88, -25.45, 0.7)
pt3dadd(-657.9, -16.92, -25.45, 0.7)
pt3dadd(-659.74, -19.04, -25.45, 0.7)
pt3dadd(-661.51, -21.14, -25.45, 0.7)
pt3dadd(-660.17, -22.91, -25.45, 0.7)
pt3dadd(-661.94, -25.04, -25.45, 0.7)
pt3dadd(-662.32, -27, -25.45, 0.7)
pt3dadd(-663.92, -32.05, -33.29, 0.7)
pt3dadd(-665.49, -37.43, -32.31, 0.7)
pt3dadd(-666.23, -41.77, -32.31, 0.7)
pt3dadd(-667.96, -44.22, -32.31, 0.7)
pt3dadd(-669.76, -48.1, -32.31, 0.7)
pt3dadd(-669.27, -50.36, -32.31, 0.7)
pt3dadd(-670.63, -52.36, -32.31, 0.7)
pt3dadd(-670.17, -55.78, -37.2, 0.7)
pt3dadd(-670.24, -58.33, -37.2, 0.7)
pt3dadd(-670.63, -60.75, -37.2, 0.7)
}
dend[19] {pt3dclear()
pt3dadd(-575.14, 24.26, -6.85, 1.04)
pt3dadd(-577.46, 21.9, -10.77, 1.04)
pt3dadd(-579.25, 20.27, -10.77, 1.04)
}
}
proc shape3d_5() {
dend[19] { pt3dadd(-579.18, 19.39, -10.77, 1.04)
pt3dadd(-581.03, 18.94, -10.77, 1.04)
pt3dadd(-581.29, 17.3, -12.73, 1.04)
pt3dadd(-580.95, 15.38, -12.73, 1.04)
pt3dadd(-581.99, 13.73, -12.73, 1.04)
pt3dadd(-583.54, 12.42, -22.52, 1.04)
pt3dadd(-584.91, 11.72, -27.41, 1.04)
pt3dadd(-585.5, 12.3, -26.43, 1.04)
pt3dadd(-587.25, 10.85, -31.33, 1.04)
pt3dadd(-587.68, 7.98, -31.33, 1.04)
pt3dadd(-589.21, 7.9, -37.2, 1.04)
pt3dadd(-589.65, 9.55, -37.2, 1.04)
pt3dadd(-590.26, 7.39, -40.14, 1.04)
pt3dadd(-590.26, 7.39, -41.12, 1.04)
pt3dadd(-593.37, 5.74, -41.12, 1.04)
pt3dadd(-595.37, 4.54, -46.01, 1.39)
pt3dadd(-596.88, 4.32, -46.01, 1.39)
pt3dadd(-598.55, 4.52, -46.01, 1.39)
pt3dadd(-600.25, 3.06, -49.93, 1.39)
pt3dadd(-602.62, 3.62, -49.93, 1.39)
pt3dadd(-604.68, 3.75, -49.93, 1.39)
pt3dadd(-606.45, 1.45, -54.82, 1.39)
pt3dadd(-607.48, 0.95, -54.82, 0.7)
pt3dadd(-610.51, -0.12, -54.82, 0.7)
pt3dadd(-610.59, -3.03, -54.82, 0.7)
pt3dadd(-614.22, -4.92, -58.74, 0.7)
pt3dadd(-617.47, -5.59, -59.72, 0.7)
pt3dadd(-619.25, -7.82, -67.55, 0.7)
pt3dadd(-622.63, -8.79, -73.42, 0.7)
pt3dadd(-626, -9.63, -73.42, 0.7)
pt3dadd(-629.57, -9.72, -75.38, 0.7)
pt3dadd(-631.64, -8.15, -76.36, 0.7)
pt3dadd(-633.67, -5.9, -83.21, 0.7)
pt3dadd(-637.88, -4.62, -83.21, 0.7)
pt3dadd(-642.53, -5.03, -83.21, 0.7)
pt3dadd(-645.2, -2.12, -88.11, 0.7)
pt3dadd(-645, -1.83, -88.11, 0.7)
pt3dadd(-648.3, -0.62, -89.09, 0.7)
pt3dadd(-648.83, -1.72, -89.09, 0.7)
pt3dadd(-649.89, -0.18, -89.09, 0.7)
pt3dadd(-652.02, 1.21, -89.09, 0.7)
pt3dadd(-654.36, 2.39, -89.09, 0.7)
pt3dadd(-657.07, 2.6, -93, 0.7)
pt3dadd(-657.44, 4.82, -93, 0.7)
pt3dadd(-659.38, 7.18, -101.82, 0.7)
pt3dadd(-660.22, 8.11, -101.82, 0.7)
pt3dadd(-660.66, 10.73, -106.71, 0.7)
pt3dadd(-663.38, 11.97, -111.61, 0.7)
pt3dadd(-663.8, 12.7, -112.58, 0.7)
pt3dadd(-664.8, 12.86, -112.58, 0.7)
pt3dadd(-665.95, 14.17, -112.58, 0.7)
pt3dadd(-668.04, 13.87, -112.58, 0.7)
pt3dadd(-669.49, 15.25, -116.5, 0.7)
pt3dadd(-672.03, 15.1, -120.42, 0.7)
pt3dadd(-674.04, 16.72, -121.4, 0.7)
pt3dadd(-675.13, 18.83, -123.35, 0.7)
pt3dadd(-678.06, 21.1, -126.29, 0.7)
pt3dadd(-680.97, 23.21, -122.37, 0.7)
pt3dadd(-682.91, 25.83, -122.37, 0.7)
pt3dadd(-686.05, 27.8, -122.37, 0.7)
pt3dadd(-687.8, 30.59, -122.37, 0.7)
pt3dadd(-691.66, 32.85, -121.4, 0.7)
pt3dadd(-693.97, 35.75, -121.4, 0.7)
pt3dadd(-697.67, 37.29, -121.4, 0.7)
pt3dadd(-700.07, 39.06, -121.4, 0.7)
pt3dadd(-703.15, 41.14, -121.4, 0.7)
pt3dadd(-705.51, 42.47, -124.33, 0.7)
pt3dadd(-707.26, 45.26, -125.31, 0.7)
pt3dadd(-710.06, 44.68, -125.31, 0.7)
pt3dadd(-710.64, 46.62, -129.23, 0.7)
pt3dadd(-712.31, 47.69, -129.23, 0.7)
pt3dadd(-714.63, 49.57, -131.19, 0.7)
pt3dadd(-717.71, 53.11, -135.1, 0.7)
pt3dadd(-720.67, 56.18, -136.08, 0.7)
pt3dadd(-722.42, 59.96, -136.08, 0.7)
pt3dadd(-723.31, 62.18, -140, 0.7)
pt3dadd(-725.64, 63.53, -140, 0.7)
pt3dadd(-727.73, 64.55, -140.97, 0.7)
pt3dadd(-730.59, 64.85, -140.97, 0.7)
pt3dadd(-733.03, 66.89, -145.87, 0.7)
pt3dadd(-736.07, 69.08, -145.87, 0.7)
pt3dadd(-739.08, 72.16, -145.87, 0.7)
pt3dadd(-741.29, 73.62, -145.87, 0.7)
pt3dadd(-745.13, 73.72, -145.87, 0.7)
pt3dadd(-746.79, 75.13, -149.79, 0.7)
pt3dadd(-747.66, 78.28, -149.79, 0.7)
pt3dadd(-747.33, 81.95, -149.79, 0.7)
pt3dadd(-748.05, 87.03, -154.68, 0.7)
pt3dadd(-746.77, 89.82, -158.6, 0.7)
pt3dadd(-744.58, 91.03, -158.6, 0.7)
pt3dadd(-743.54, 94.17, -158.6, 0.7)
pt3dadd(-739.21, 94.4, -159.58, 0.7)
pt3dadd(-736.37, 94.56, -165.45, 0.7)
pt3dadd(-735.38, 96.14, -165.45, 0.35)
pt3dadd(-734.12, 96.05, -165.45, 0.35)
pt3dadd(-731.8, 98.54, -165.45, 0.35)
pt3dadd(-732.25, 101.38, -167.41, 0.35)
pt3dadd(-730.55, 103.48, -167.41, 0.35)
pt3dadd(-728.35, 106.52, -167.41, 0.35)
pt3dadd(-730.33, 108.5, -168.39, 0.35)
pt3dadd(-730.69, 110.52, -168.39, 0.35)
pt3dadd(-728.75, 112.89, -168.39, 0.35)
pt3dadd(-727.9, 115.55, -168.39, 0.35)
pt3dadd(-725.25, 118.47, -168.39, 0.35)
pt3dadd(-726.01, 119.46, -168.39, 0.35)
pt3dadd(-727.32, 122.19, -168.39, 0.35)
pt3dadd(-726.65, 123.38, -168.39, 0.35)
pt3dadd(-727.09, 125.09, -168.39, 0.35)
pt3dadd(-727.25, 126.58, -168.39, 0.35)
pt3dadd(-729.92, 126.61, -168.39, 0.35)
pt3dadd(-731.49, 129.58, -167.41, 0.35)
pt3dadd(-732.55, 132.77, -167.41, 0.35)
pt3dadd(-734.99, 133.37, -167.41, 0.35)
pt3dadd(-735.93, 133.73, -173.28, 0.35)
pt3dadd(-737.12, 136.57, -174.26, 0.35)
pt3dadd(-737.5, 138.14, -174.26, 0.35)
pt3dadd(-738.43, 138.38, -179.16, 0.35)
pt3dadd(-739.94, 139.49, -186.01, 0.35)
pt3dadd(-740.46, 141.6, -186.01, 0.35)
pt3dadd(-743.54, 140.51, -186.01, 0.35)
pt3dadd(-745.45, 141.8, -194.82, 0.35)
pt3dadd(-748.52, 141.46, -195.8, 0.35)
pt3dadd(-748.89, 141.81, -198.74, 0.35)
pt3dadd(-751.65, 141.82, -199.71, 0.35)
pt3dadd(-752.82, 144.35, -199.71, 0.35)
pt3dadd(-750.74, 145.97, -202.65, 0.35)
pt3dadd(-750.3, 147.82, -204.61, 0.35)
pt3dadd(-751.79, 148.95, -208.53, 0.35)
pt3dadd(-752.31, 151.06, -208.53, 0.35)
pt3dadd(-750.99, 154.08, -208.53, 0.35)
pt3dadd(-752.18, 155.08, -209.5, 0.35)
pt3dadd(-752.86, 158.41, -209.5, 0.35)
}
dend[20] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-502.37, 27.34, 4.89, 4.52)
pt3dadd(-500.77, 23.83, 4.89, 4.18)
pt3dadd(-499.16, 21.28, 8.81, 3.83)
pt3dadd(-498.16, 17.69, 9.79, 3.83)
pt3dadd(-497.08, 14.61, 12.73, 3.83)
pt3dadd(-495.95, 12.77, 12.73, 3.83)
pt3dadd(-496.14, 10.61, 14.68, 3.83)
pt3dadd(-494.74, 7.92, 14.68, 3.83)
pt3dadd(-495.16, 4.55, 15.66, 3.13)
pt3dadd(-495.66, 2.08, 19.58, 3.13)
pt3dadd(-495.39, 0.25, 23.5, 3.13)
}
dend[21] {pt3dclear()
pt3dadd(-495.39, 0.25, 23.5, 1.74)
pt3dadd(-493.98, 0.43, 29.37, 1.74)
pt3dadd(-492.92, 0.42, 33.29, 1.74)
pt3dadd(-491.15, 1.06, 45.03, 1.74)
pt3dadd(-488.64, 1.29, 45.03, 1.74)
pt3dadd(-486.84, 1.45, 47.97, 1.74)
pt3dadd(-485.66, 2.47, 47.97, 1.74)
pt3dadd(-484.54, 2.11, 47.97, 1.74)
}
dend[22] {pt3dclear()
pt3dadd(-484.54, 2.11, 47.97, 1.39)
pt3dadd(-482.37, 2.56, 46.99, 1.39)
pt3dadd(-480.17, 3.61, 46.99, 1.39)
pt3dadd(-477.71, 2.96, 46.99, 1.39)
pt3dadd(-475.45, 2.1, 48.95, 1.39)
pt3dadd(-473.79, 1.7, 52.87, 1.39)
pt3dadd(-471.57, 1.23, 53.84, 1.74)
pt3dadd(-469.64, 1.85, 57.76, 1.39)
pt3dadd(-467.83, 3.08, 57.76, 1.04)
pt3dadd(-464.97, 3.25, 60.7, 1.39)
pt3dadd(-462.61, 2.84, 60.7, 1.39)
pt3dadd(-460.18, 4.6, 60.7, 1.39)
pt3dadd(-458.26, 6.21, 60.7, 1.04)
pt3dadd(-456.26, 6.23, 62.66, 1.04)
pt3dadd(-453.15, 5.8, 63.63, 1.04)
pt3dadd(-449.88, 7.34, 57.76, 1.04)
pt3dadd(-446.71, 6.82, 57.76, 1.04)
pt3dadd(-444.65, 7.3, 57.76, 1.04)
pt3dadd(-443.81, 7.7, 57.76, 1.04)
pt3dadd(-441.45, 8.49, 57.76, 1.04)
pt3dadd(-438.9, 8.48, 58.74, 1.04)
pt3dadd(-437.18, 7.74, 59.72, 1.04)
pt3dadd(-433.52, 8.73, 63.63, 1.04)
pt3dadd(-431.49, 7.09, 67.55, 1.04)
pt3dadd(-429.15, 7.54, 71.47, 1.04)
pt3dadd(-428.56, 5.39, 74.4, 1.04)
pt3dadd(-426.32, 5.26, 78.32, 1.04)
pt3dadd(-423.21, 4.41, 78.32, 1.04)
pt3dadd(-422.23, 2.82, 78.32, 1.04)
}
dend[23] {pt3dclear()
pt3dadd(-422.23, 2.82, 78.32, 0.7)
pt3dadd(-421.45, 0.45, 80.28, 0.7)
pt3dadd(-422.48, -1.4, 81.26, 0.7)
pt3dadd(-420.91, -3.02, 81.26, 0.7)
pt3dadd(-416.62, -1.6, 87.13, 0.7)
pt3dadd(-411.36, 0.16, 87.13, 0.7)
pt3dadd(-408.76, 1.19, 91.05, 0.7)
pt3dadd(-406.63, 0.98, 91.05, 0.7)
pt3dadd(-404.08, 3.76, 93.98, 0.7)
pt3dadd(-401.77, 4.52, 94.96, 0.7)
pt3dadd(-398.63, 5.48, 100.84, 0.7)
pt3dadd(-396.13, 5.94, 101.82, 0.7)
pt3dadd(-394.63, 7.5, 105.73, 0.7)
pt3dadd(-392.43, 8.36, 109.65, 0.7)
pt3dadd(-391.51, 6.35, 110.63, 0.7)
pt3dadd(-389.37, 4.8, 112.58, 0.7)
pt3dadd(-386.1, 6.68, 114.54, 0.7)
pt3dadd(-383.51, 4.42, 117.48, 0.7)
pt3dadd(-382.36, 2.96, 119.44, 0.7)
}
}
proc shape3d_6() {
dend[23] { pt3dadd(-378.84, 2.51, 121.4, 0.7)
pt3dadd(-377.24, 1.1, 121.4, 0.7)
pt3dadd(-374.66, 2.24, 121.4, 0.7)
pt3dadd(-372.99, 0.8, 121.4, 0.7)
pt3dadd(-371.2, 0.57, 121.4, 0.7)
pt3dadd(-370.02, 2.04, 121.4, 0.7)
pt3dadd(-365.96, 2.37, 124.33, 0.7)
pt3dadd(-362.82, 2.11, 124.33, 0.7)
pt3dadd(-360.39, 0.57, 130.21, 0.7)
pt3dadd(-358.11, -1, 131.19, 0.7)
pt3dadd(-357.69, -1.82, 134.12, 0.7)
pt3dadd(-354.03, -1.23, 137.06, 0.7)
pt3dadd(-352.92, -2.36, 137.06, 0.7)
}
dend[24] {pt3dclear()
pt3dadd(-352.92, -2.36, 137.06, 0.35)
pt3dadd(-351.67, -2.46, 138.04, 0.35)
pt3dadd(-349.37, -0.45, 138.04, 0.35)
pt3dadd(-347.41, 1.81, 142.93, 0.35)
pt3dadd(-343.98, 4.49, 142.93, 0.35)
pt3dadd(-339.97, 6.64, 144.89, 0.35)
pt3dadd(-336.73, 7.21, 146.85, 0.35)
pt3dadd(-334.95, 6.56, 149.79, 0.35)
pt3dadd(-332.63, 8.07, 153.7, 0.35)
pt3dadd(-330.43, 7.99, 156.64, 0.35)
pt3dadd(-327.17, 8.18, 158.6, 0.35)
pt3dadd(-323.38, 9.91, 159.58, 0.35)
pt3dadd(-321.83, 11.68, 163.49, 0.35)
pt3dadd(-320.04, 10.51, 163.49, 0.35)
pt3dadd(-317.38, 9.63, 168.39, 0.35)
pt3dadd(-316.54, 8.28, 168.39, 0.35)
pt3dadd(-315.08, 8.52, 173.28, 0.35)
pt3dadd(-311.72, 8.7, 173.28, 0.35)
pt3dadd(-310.47, 7.57, 175.24, 0.35)
pt3dadd(-307.36, 6.82, 180.13, 0.35)
pt3dadd(-304.83, 6.29, 180.13, 0.35)
pt3dadd(-303.85, 8.73, 180.13, 0.35)
pt3dadd(-303.08, 8.01, 180.13, 0.35)
pt3dadd(-300.84, 7.96, 183.07, 0.35)
pt3dadd(-300.01, 8.23, 183.07, 0.35)
pt3dadd(-298.61, 8.93, 183.07, 0.35)
pt3dadd(-296.53, 11.06, 185.03, 0.35)
pt3dadd(-294.44, 12.82, 185.03, 0.35)
pt3dadd(-294.44, 14.59, 185.03, 0.35)
pt3dadd(-293.39, 16.01, 186.99, 0.35)
pt3dadd(-291.65, 17.42, 191.88, 0.35)
pt3dadd(-290.96, 19.19, 191.88, 0.35)
pt3dadd(-290.61, 19.9, 195.8, 0.35)
pt3dadd(-287.82, 19.19, 195.8, 0.35)
pt3dadd(-285.74, 19.9, 205.59, 0.35)
pt3dadd(-282.6, 19.55, 209.5, 0.35)
pt3dadd(-281.91, 22.02, 215.38, 0.35)
pt3dadd(-277.73, 25.21, 215.38, 0.35)
pt3dadd(-275.99, 25.91, 215.38, 0.35)
pt3dadd(-274.25, 28.39, 215.38, 0.35)
pt3dadd(-272.86, 30.16, 214.4, 0.35)
pt3dadd(-271.81, 32.28, 220.27, 0.35)
pt3dadd(-270.42, 34.4, 225.17, 0.35)
pt3dadd(-268.44, 37.39, 229.08, 0.35)
pt3dadd(-268.09, 39.52, 229.08, 0.35)
pt3dadd(-268.09, 39.52, 230.06, 0.35)
pt3dadd(-265.3, 39.87, 230.06, 0.35)
pt3dadd(-264.26, 41.29, 230.06, 0.35)
pt3dadd(-262.17, 43.41, 233, 0.35)
pt3dadd(-260.24, 46.75, 233.98, 0.35)
pt3dadd(-257.8, 49.58, 233.98, 0.35)
pt3dadd(-257.45, 52.05, 233.98, 0.35)
pt3dadd(-256.06, 54.53, 233.98, 0.35)
pt3dadd(-252.58, 58.42, 233.98, 0.35)
pt3dadd(-248.7, 61.29, 235.94, 0.35)
pt3dadd(-246.61, 64.83, 235.94, 0.35)
pt3dadd(-244.17, 68.72, 235.94, 0.35)
pt3dadd(-241.29, 69.83, 236.92, 0.35)
pt3dadd(-240.25, 70.53, 236.92, 0.35)
pt3dadd(-236.42, 70.53, 237.9, 0.35)
pt3dadd(-233.24, 71.07, 244.75, 0.35)
pt3dadd(-230.11, 70.37, 245.73, 0.35)
}
dend[25] {pt3dclear()
pt3dadd(-352.92, -2.36, 137.06, 0.35)
pt3dadd(-350.68, -5.54, 135.1, 0.35)
pt3dadd(-349.78, -6.62, 134.12, 0.35)
pt3dadd(-348.68, -7.58, 139.02, 0.35)
pt3dadd(-348.64, -10, 139.02, 0.35)
pt3dadd(-347.33, -14.69, 142.93, 0.35)
pt3dadd(-347.58, -15.9, 143.91, 0.35)
pt3dadd(-346.25, -17.16, 143.91, 0.35)
pt3dadd(-345.76, -19.45, 144.89, 0.35)
pt3dadd(-343.72, -23.47, 151.74, 0.35)
pt3dadd(-343.85, -26.21, 151.74, 0.35)
pt3dadd(-345.58, -28.93, 152.72, 0.35)
pt3dadd(-345.56, -28.57, 152.72, 0.35)
pt3dadd(-344.04, -31.86, 155.66, 0.35)
pt3dadd(-343.44, -35.96, 156.64, 0.35)
pt3dadd(-342.89, -39.99, 156.64, 0.35)
}
dend[26] {pt3dclear()
pt3dadd(-342.89, -39.99, 156.64, 0.35)
pt3dadd(-341.47, -41.43, 159.58, 0.35)
pt3dadd(-337.15, -41.79, 159.58, 0.35)
pt3dadd(-334.29, -42.89, 159.58, 0.35)
}
dend[27] {pt3dclear()
pt3dadd(-342.89, -39.99, 156.64, 0.35)
pt3dadd(-344.02, -43.73, 155.66, 0.35)
pt3dadd(-343.27, -47.43, 154.68, 0.35)
pt3dadd(-345.49, -51.12, 154.68, 0.35)
pt3dadd(-347.05, -52.27, 154.68, 0.35)
pt3dadd(-348.69, -55.06, 154.68, 0.35)
pt3dadd(-349.38, -57.67, 159.58, 0.35)
pt3dadd(-351.22, -58.61, 159.58, 0.35)
pt3dadd(-353.29, -60.83, 160.55, 0.35)
pt3dadd(-354.19, -62.78, 160.55, 0.35)
pt3dadd(-355.17, -64.33, 161.53, 0.35)
pt3dadd(-357.19, -65.83, 162.51, 0.35)
pt3dadd(-357.49, -68.48, 164.47, 0.35)
pt3dadd(-358.09, -70.44, 167.41, 0.35)
pt3dadd(-358.07, -71.99, 167.41, 0.35)
}
dend[28] {pt3dclear()
pt3dadd(-358.07, -71.99, 167.41, 0.35)
pt3dadd(-355.18, -72.02, 167.41, 0.35)
pt3dadd(-352.5, -75.55, 167.41, 0.35)
pt3dadd(-351.87, -78.17, 168.39, 0.35)
pt3dadd(-351.5, -79.83, 164.47, 0.35)
pt3dadd(-349.71, -81.88, 171.32, 0.35)
pt3dadd(-350.23, -83.4, 171.32, 0.35)
pt3dadd(-351.23, -86.47, 171.32, 0.35)
pt3dadd(-352.24, -88.71, 172.3, 0.35)
pt3dadd(-352.36, -90.05, 175.24, 0.35)
pt3dadd(-355.3, -89.94, 176.22, 0.35)
pt3dadd(-357.98, -91.47, 176.22, 0.35)
pt3dadd(-358.21, -94.88, 179.16, 0.35)
pt3dadd(-357.89, -99.37, 179.16, 0.35)
pt3dadd(-357.91, -102.71, 182.09, 0.35)
pt3dadd(-355.02, -103.63, 185.03, 0.35)
pt3dadd(-354.57, -104.18, 185.03, 0.35)
pt3dadd(-352.83, -105.6, 185.03, 0.35)
pt3dadd(-349.7, -104.89, 185.03, 0.35)
pt3dadd(-348.31, -105.95, 185.03, 0.35)
pt3dadd(-348.31, -108.07, 189.92, 0.35)
pt3dadd(-345.87, -109.13, 189.92, 0.35)
pt3dadd(-344.73, -109.28, 192.86, 0.35)
pt3dadd(-344.03, -111.05, 192.86, 0.35)
pt3dadd(-343.68, -114.94, 193.84, 0.35)
pt3dadd(-345.08, -116.71, 193.84, 0.35)
pt3dadd(-345.08, -117.06, 193.84, 0.35)
pt3dadd(-345.77, -119.89, 193.84, 0.35)
pt3dadd(-346.47, -122.02, 193.84, 0.35)
pt3dadd(-346.47, -124.49, 194.82, 0.35)
pt3dadd(-348.21, -127.68, 194.82, 0.35)
pt3dadd(-348.9, -131.21, 195.8, 0.35)
pt3dadd(-348.9, -134.4, 195.8, 0.35)
pt3dadd(-347.51, -138.29, 195.8, 0.35)
pt3dadd(-346.47, -142.18, 195.8, 0.35)
pt3dadd(-345.08, -146.07, 195.8, 0.35)
pt3dadd(-343.34, -149.61, 197.76, 0.35)
pt3dadd(-343.34, -149.61, 198.74, 0.35)
pt3dadd(-341.88, -154.78, 198.74, 0.35)
pt3dadd(-340.84, -158.67, 198.74, 0.35)
pt3dadd(-341.88, -162.92, 198.74, 0.35)
pt3dadd(-341.53, -165.75, 198.74, 0.35)
pt3dadd(-342.58, -169.64, 198.74, 0.35)
pt3dadd(-341.18, -171.76, 199.71, 0.35)
pt3dadd(-341.18, -171.76, 198.74, 0.35)
pt3dadd(-338.4, -175.3, 198.74, 0.35)
pt3dadd(-334.22, -177.42, 198.74, 0.35)
pt3dadd(-332.33, -179.55, 197.76, 0.35)
pt3dadd(-330.24, -179.55, 197.76, 0.35)
pt3dadd(-328.5, -181.32, 197.76, 0.35)
pt3dadd(-324.68, -182.38, 197.76, 0.35)
pt3dadd(-321.79, -183.19, 197.76, 0.35)
pt3dadd(-319.7, -185.31, 197.76, 0.35)
pt3dadd(-318.66, -182.48, 196.78, 0.35)
pt3dadd(-315.18, -182.84, 196.78, 0.35)
pt3dadd(-312.29, -180.86, 191.88, 0.35)
}
dend[29] {pt3dclear()
pt3dadd(-358.07, -71.99, 167.41, 0.35)
pt3dadd(-359.2, -72.78, 167.41, 0.35)
pt3dadd(-360.74, -74.62, 167.41, 0.35)
pt3dadd(-362.36, -76.99, 168.39, 0.35)
pt3dadd(-366.57, -76.45, 168.39, 0.35)
pt3dadd(-369.59, -78.43, 168.39, 0.35)
pt3dadd(-371.89, -82.39, 168.39, 0.35)
pt3dadd(-373.93, -84.97, 164.47, 0.35)
pt3dadd(-375.68, -88.04, 164.47, 0.35)
pt3dadd(-376.69, -91, 163.49, 0.35)
pt3dadd(-378.25, -91.19, 163.49, 0.35)
pt3dadd(-379.48, -92.79, 163.49, 0.35)
pt3dadd(-379.77, -95.39, 163.49, 0.35)
pt3dadd(-381.44, -98.01, 163.49, 0.35)
pt3dadd(-382.74, -99.94, 163.49, 0.35)
pt3dadd(-385.77, -101.69, 163.49, 0.35)
pt3dadd(-388.82, -104.6, 163.49, 0.35)
pt3dadd(-391.8, -108.01, 163.49, 0.35)
pt3dadd(-394.53, -111.53, 163.49, 0.35)
pt3dadd(-396.84, -114.51, 159.58, 0.35)
pt3dadd(-399.78, -116.31, 159.58, 0.35)
pt3dadd(-402.29, -123.5, 158.6, 0.35)
pt3dadd(-400.75, -125.22, 158.6, 0.35)
pt3dadd(-401.2, -130.34, 152.72, 0.35)
pt3dadd(-401.07, -134.64, 152.72, 0.35)
pt3dadd(-399.38, -136.65, 152.72, 0.35)
pt3dadd(-396.15, -136.95, 161.53, 0.35)
pt3dadd(-392.15, -137.04, 161.53, 0.35)
pt3dadd(-387.98, -135.69, 162.51, 0.35)
pt3dadd(-383.79, -133.99, 162.51, 0.35)
pt3dadd(-382.59, -135.43, 168.39, 0.35)
pt3dadd(-379.08, -136.16, 168.39, 0.35)
pt3dadd(-377.63, -138.25, 168.39, 0.35)
pt3dadd(-376.17, -141.13, 168.39, 0.35)
}
}
proc shape3d_7() {
dend[29] { pt3dadd(-374.76, -142.94, 168.39, 0.35)
pt3dadd(-373.36, -144.97, 168.39, 0.35)
pt3dadd(-373.66, -147.21, 171.32, 0.35)
}
dend[30] {pt3dclear()
pt3dadd(-422.23, 2.82, 78.32, 0.7)
pt3dadd(-418.71, 2.37, 81.26, 0.7)
pt3dadd(-418.71, 2.37, 80.28, 0.7)
pt3dadd(-414.99, 3.41, 80.28, 0.7)
pt3dadd(-412.05, 1.6, 80.28, 0.7)
pt3dadd(-407.58, 3.03, 77.34, 0.7)
pt3dadd(-403.71, 1.97, 77.34, 0.7)
pt3dadd(-399.3, 2.15, 77.34, 0.7)
pt3dadd(-396.39, 0.38, 77.34, 0.7)
pt3dadd(-393.8, 1.33, 76.36, 0.35)
pt3dadd(-391.33, 2.72, 76.36, 0.35)
pt3dadd(-388.85, 1.83, 76.36, 0.35)
pt3dadd(-388.85, 1.83, 75.38, 0.35)
pt3dadd(-384.85, 2.13, 72.45, 0.35)
pt3dadd(-381.42, 1.98, 72.45, 0.35)
pt3dadd(-378.62, -0.45, 72.45, 0.35)
pt3dadd(-376.48, 1.48, 75.38, 0.35)
pt3dadd(-374.03, -0.12, 75.38, 0.35)
pt3dadd(-370.58, -2.35, 75.38, 0.35)
pt3dadd(-366.11, -2.57, 75.38, 0.35)
pt3dadd(-364.11, -2.78, 76.36, 0.35)
pt3dadd(-361.77, -3.8, 77.34, 0.35)
pt3dadd(-358.39, -2.71, 79.3, 0.35)
pt3dadd(-357.29, -3.75, 79.3, 0.35)
pt3dadd(-354.38, -3.04, 83.21, 0.35)
pt3dadd(-351.01, -2.85, 83.21, 0.35)
pt3dadd(-348.54, -2.35, 83.21, 0.35)
pt3dadd(-344.56, -5.04, 80.28, 0.35)
pt3dadd(-340.77, -4.48, 80.28, 0.35)
pt3dadd(-336.47, -5.71, 79.3, 0.35)
pt3dadd(-331.99, -2.3, 79.3, 0.35)
pt3dadd(-324.22, -1.53, 79.3, 0.35)
pt3dadd(-317.13, 1.54, 79.3, 0.35)
pt3dadd(-311.08, 6.71, 79.3, 0.35)
pt3dadd(-308.53, 10.51, 78.32, 0.35)
pt3dadd(-306.22, 14.84, 78.32, 0.35)
}
dend[31] {pt3dclear()
pt3dadd(-484.54, 2.11, 47.97, 1.04)
pt3dadd(-486.58, -2.09, 48.95, 1.04)
pt3dadd(-486.36, -4.05, 48.95, 1.04)
pt3dadd(-484.12, -6.88, 48.95, 1.04)
pt3dadd(-482.35, -8.73, 52.87, 1.04)
pt3dadd(-482.01, -10.93, 53.84, 1.04)
pt3dadd(-480.49, -14.54, 57.76, 1.04)
pt3dadd(-477.57, -18.19, 57.76, 1.04)
pt3dadd(-475.65, -19.47, 63.63, 1.04)
pt3dadd(-474.9, -21.9, 63.63, 1.04)
pt3dadd(-471.63, -25.25, 63.63, 1.04)
pt3dadd(-470.82, -27.29, 63.63, 1.04)
pt3dadd(-467.52, -30.12, 69.51, 1.04)
pt3dadd(-464.73, -31.94, 69.51, 1.04)
pt3dadd(-464.2, -32.63, 71.47, 1.04)
pt3dadd(-463.61, -33.09, 71.47, 1.04)
pt3dadd(-461.98, -34.58, 71.47, 1.04)
pt3dadd(-458.29, -37.13, 71.47, 1.04)
pt3dadd(-456.11, -38.41, 75.38, 1.04)
pt3dadd(-453.3, -41.08, 76.36, 1.04)
pt3dadd(-451.19, -44.07, 76.36, 1.04)
pt3dadd(-451.35, -46.7, 78.32, 1.04)
pt3dadd(-448.21, -49.81, 79.3, 1.04)
pt3dadd(-445.95, -52.68, 82.24, 1.04)
pt3dadd(-443.5, -54.44, 82.24, 1.04)
pt3dadd(-442.32, -56.76, 82.24, 1.04)
pt3dadd(-440.97, -58.44, 86.15, 1.04)
pt3dadd(-439.63, -59.74, 86.15, 1.04)
pt3dadd(-437.71, -59.31, 91.05, 1.04)
pt3dadd(-435.06, -61.78, 93.98, 1.04)
pt3dadd(-432.8, -63.82, 96.92, 1.04)
pt3dadd(-433.23, -64.75, 98.88, 1.04)
pt3dadd(-432.4, -66.51, 98.88, 0.7)
pt3dadd(-428.35, -67.94, 98.88, 0.7)
pt3dadd(-427.95, -71.33, 100.84, 0.7)
pt3dadd(-425.91, -74.76, 100.84, 0.7)
pt3dadd(-425.59, -77.83, 103.77, 0.7)
pt3dadd(-424.06, -78.92, 106.71, 0.7)
pt3dadd(-422.88, -80.98, 107.69, 0.7)
pt3dadd(-420.9, -82.08, 107.69, 0.7)
pt3dadd(-422.3, -85.06, 108.67, 0.7)
pt3dadd(-421.34, -87.1, 112.58, 0.7)
pt3dadd(-423.26, -88.9, 113.56, 0.7)
pt3dadd(-423.24, -90.66, 115.52, 0.7)
pt3dadd(-420.85, -92.2, 118.46, 0.7)
pt3dadd(-420.98, -93.91, 124.33, 0.7)
pt3dadd(-418.32, -95.93, 124.33, 0.7)
pt3dadd(-416.07, -97.47, 124.33, 0.7)
pt3dadd(-416.34, -99.1, 126.29, 0.7)
pt3dadd(-414.15, -99.33, 128.25, 0.35)
pt3dadd(-414.22, -101.69, 129.23, 0.35)
pt3dadd(-415.06, -104.28, 133.14, 0.35)
pt3dadd(-414.11, -106.32, 134.12, 0.35)
pt3dadd(-414.19, -107.39, 134.12, 0.35)
pt3dadd(-416.37, -109.19, 134.12, 0.35)
pt3dadd(-417.27, -111.05, 134.12, 0.35)
pt3dadd(-418.39, -110.42, 139.02, 0.35)
pt3dadd(-420.3, -110.68, 143.91, 0.7)
pt3dadd(-421.26, -111.59, 143.91, 0.7)
pt3dadd(-422.03, -110.17, 147.83, 0.7)
pt3dadd(-424.28, -109.11, 152.72, 0.7)
pt3dadd(-427.48, -109.11, 152.72, 0.7)
pt3dadd(-428.28, -110.84, 159.58, 0.7)
pt3dadd(-431.1, -111.49, 167.41, 0.7)
pt3dadd(-433.69, -112.17, 167.41, 0.35)
pt3dadd(-435.95, -112.24, 167.41, 0.35)
pt3dadd(-437.48, -112.77, 167.41, 0.35)
pt3dadd(-439.66, -112.3, 171.32, 0.35)
pt3dadd(-440.81, -112.19, 172.3, 0.35)
pt3dadd(-442.41, -113.28, 173.28, 0.35)
pt3dadd(-443.88, -112.69, 173.28, 0.35)
pt3dadd(-445.06, -114.15, 176.22, 0.35)
pt3dadd(-448.29, -113.77, 177.2, 0.35)
pt3dadd(-448.61, -111.99, 181.11, 0.35)
pt3dadd(-446.24, -112.37, 182.09, 0.35)
pt3dadd(-442.33, -112.93, 186.01, 0.35)
pt3dadd(-438.8, -114.47, 186.01, 0.35)
pt3dadd(-438.78, -114.11, 186.01, 0.35)
pt3dadd(-437.36, -115.89, 187.97, 0.35)
pt3dadd(-436.7, -117.88, 192.86, 0.35)
pt3dadd(-437.46, -120.2, 193.84, 0.35)
pt3dadd(-438.43, -122.66, 193.84, 0.35)
pt3dadd(-439.11, -125.12, 193.84, 0.35)
pt3dadd(-438.79, -127.64, 193.84, 0.35)
pt3dadd(-439.17, -129.32, 196.78, 0.35)
pt3dadd(-441.71, -131.15, 196.78, 0.35)
pt3dadd(-441.82, -133.15, 196.78, 0.35)
pt3dadd(-444.51, -137.14, 197.76, 0.35)
pt3dadd(-444.71, -137.39, 197.76, 0.35)
pt3dadd(-446.8, -139.86, 197.76, 0.35)
pt3dadd(-447.15, -141.98, 197.76, 0.35)
pt3dadd(-447.15, -145.17, 197.76, 0.35)
pt3dadd(-448.89, -146.94, 197.76, 0.35)
pt3dadd(-450.28, -149.41, 197.76, 0.35)
pt3dadd(-450.98, -152.24, 197.76, 0.35)
pt3dadd(-453.07, -153.66, 197.76, 0.35)
pt3dadd(-452.72, -155.78, 197.76, 0.35)
pt3dadd(-453.42, -156.84, 197.76, 0.35)
pt3dadd(-453.76, -157.52, 195.8, 0.35)
pt3dadd(-456.87, -160.37, 195.8, 0.35)
pt3dadd(-457.35, -162.64, 195.8, 0.35)
pt3dadd(-455.93, -166.08, 195.8, 0.35)
pt3dadd(-458.04, -169.63, 197.76, 0.35)
pt3dadd(-459.37, -173.11, 197.76, 0.35)
pt3dadd(-460.1, -177.54, 188.95, 0.35)
pt3dadd(-460.02, -181.85, 188.95, 0.35)
pt3dadd(-461.61, -185.82, 188.95, 0.35)
pt3dadd(-463.31, -188.68, 188.95, 0.35)
pt3dadd(-465.32, -193, 187.97, 0.35)
pt3dadd(-465.18, -194.88, 186.99, 0.35)
}
dend[32] {pt3dclear()
pt3dadd(-495.39, 0.25, 23.5, 2.09)
pt3dadd(-497.65, -0.75, 32.31, 2.09)
pt3dadd(-499.43, -2.51, 32.31, 2.09)
pt3dadd(-500.29, -4.12, 35.24, 2.09)
pt3dadd(-501.82, -5.85, 38.18, 1.74)
pt3dadd(-502.75, -7.96, 38.18, 1.74)
pt3dadd(-502.33, -9.22, 41.12, 1.74)
pt3dadd(-504.5, -10.61, 41.12, 1.74)
pt3dadd(-506.84, -11.73, 41.12, 1.74)
pt3dadd(-508.22, -12.88, 41.12, 1.74)
pt3dadd(-509.47, -14.39, 44.05, 1.74)
pt3dadd(-511.91, -15.41, 44.05, 1.74)
pt3dadd(-514.26, -17.1, 44.05, 1.74)
pt3dadd(-513.99, -19.2, 47.97, 1.74)
pt3dadd(-513.01, -21.39, 52.87, 1.39)
pt3dadd(-512.44, -24.9, 52.87, 1.39)
pt3dadd(-513.02, -27.67, 62.66, 1.39)
pt3dadd(-514.94, -29.78, 62.66, 1.39)
pt3dadd(-514, -32.56, 62.66, 1.39)
pt3dadd(-513.52, -35.61, 61.68, 1.39)
pt3dadd(-513.21, -37.48, 62.66, 1.39)
}
dend[33] {pt3dclear()
pt3dadd(-513.21, -37.48, 62.66, 0.7)
pt3dadd(-515.79, -38.66, 68.53, 0.7)
pt3dadd(-517.2, -38.78, 71.47, 0.7)
pt3dadd(-519.99, -41.26, 68.53, 0.7)
pt3dadd(-522.23, -43.25, 68.53, 0.7)
pt3dadd(-524.41, -43.94, 68.53, 0.7)
pt3dadd(-525.37, -47.19, 68.53, 0.7)
pt3dadd(-528.46, -49.98, 68.53, 0.7)
pt3dadd(-527.25, -54.16, 68.53, 0.7)
pt3dadd(-529.83, -56.4, 68.53, 0.7)
pt3dadd(-531.45, -59.96, 68.53, 0.7)
pt3dadd(-533.49, -63.66, 69.51, 0.7)
pt3dadd(-535.39, -64.92, 69.51, 0.7)
pt3dadd(-535.17, -68.33, 69.51, 0.7)
pt3dadd(-537.2, -70.85, 69.51, 0.7)
pt3dadd(-538.45, -73.28, 73.42, 0.7)
pt3dadd(-539.75, -76.67, 74.4, 0.7)
pt3dadd(-540.29, -77.19, 74.4, 0.35)
pt3dadd(-542.54, -80.08, 74.4, 0.35)
pt3dadd(-543.86, -83.16, 74.4, 0.35)
pt3dadd(-546, -84.87, 74.4, 0.35)
pt3dadd(-547.23, -86.93, 77.34, 0.35)
pt3dadd(-546.15, -88.49, 83.21, 0.35)
pt3dadd(-548.24, -90.42, 83.21, 0.35)
pt3dadd(-550.35, -92.1, 87.13, 0.35)
pt3dadd(-550.51, -93.56, 87.13, 0.35)
pt3dadd(-553.22, -92.73, 87.13, 0.35)
pt3dadd(-552.74, -97.04, 86.15, 0.35)
pt3dadd(-553.66, -99.58, 86.15, 0.35)
pt3dadd(-554.69, -102.88, 85.17, 0.35)
}
}
proc shape3d_8() {
dend[33] { pt3dadd(-556.85, -105.63, 85.17, 0.35)
pt3dadd(-558.76, -106.83, 85.17, 0.35)
pt3dadd(-558.8, -108.2, 91.05, 0.35)
pt3dadd(-558.17, -109.86, 93.98, 0.35)
pt3dadd(-560.24, -109.93, 93.98, 0.35)
pt3dadd(-559.8, -112.49, 93.98, 0.35)
pt3dadd(-558.39, -113.35, 96.92, 0.35)
pt3dadd(-559.95, -113.84, 103.77, 0.35)
pt3dadd(-559.13, -116.3, 108.67, 0.35)
pt3dadd(-559.99, -118.53, 111.61, 0.35)
pt3dadd(-561.35, -119.87, 111.61, 0.35)
pt3dadd(-562.87, -120.19, 111.61, 0.35)
pt3dadd(-564.96, -121.21, 111.61, 0.35)
pt3dadd(-566.67, -121.93, 114.54, 0.35)
pt3dadd(-568.3, -122.46, 115.52, 0.35)
pt3dadd(-567.88, -119.71, 115.52, 0.35)
pt3dadd(-571.01, -118.88, 115.52, 0.35)
pt3dadd(-573.98, -116.59, 115.52, 0.35)
pt3dadd(-575.35, -114.03, 117.48, 0.35)
pt3dadd(-574.32, -113.13, 118.46, 0.35)
pt3dadd(-575.33, -111.07, 118.46, 0.35)
pt3dadd(-576.97, -110.08, 118.46, 0.35)
pt3dadd(-579.19, -108.97, 118.46, 0.35)
pt3dadd(-580.93, -106.78, 118.46, 0.35)
pt3dadd(-580.05, -105.61, 121.4, 0.35)
pt3dadd(-581.32, -104.52, 121.4, 0.35)
pt3dadd(-581.97, -103.13, 121.4, 0.35)
pt3dadd(-583.74, -102.62, 121.4, 0.35)
pt3dadd(-583.75, -99.82, 123.35, 0.35)
pt3dadd(-581.5, -97.89, 124.33, 0.35)
pt3dadd(-580.82, -96.2, 124.33, 0.35)
pt3dadd(-580.71, -93.76, 124.33, 0.35)
pt3dadd(-582.24, -91.53, 124.33, 0.35)
pt3dadd(-583.81, -89.9, 124.33, 0.35)
pt3dadd(-583.21, -86.74, 124.33, 0.35)
pt3dadd(-582.86, -85.44, 126.29, 0.35)
pt3dadd(-583.64, -84.15, 126.29, 0.35)
pt3dadd(-584.77, -81.35, 126.29, 0.35)
pt3dadd(-583.8, -78.77, 126.29, 0.35)
pt3dadd(-582.44, -76.22, 126.29, 0.35)
pt3dadd(-581.39, -73.86, 126.29, 0.35)
pt3dadd(-581.27, -70.95, 126.29, 0.35)
pt3dadd(-579.76, -68.66, 126.29, 0.35)
pt3dadd(-579.33, -65.84, 126.29, 0.35)
pt3dadd(-580.93, -64.18, 126.29, 0.35)
pt3dadd(-581.47, -61.22, 126.29, 0.35)
pt3dadd(-580.84, -60.26, 123.35, 0.35)
pt3dadd(-581.21, -58.58, 123.35, 0.35)
pt3dadd(-581.8, -56.24, 123.35, 0.35)
pt3dadd(-581.15, -52.92, 123.35, 0.35)
pt3dadd(-582.16, -50.15, 123.35, 0.35)
}
dend[34] {pt3dclear()
pt3dadd(-513.21, -37.48, 62.66, 1.04)
pt3dadd(-511.44, -39.39, 62.66, 1.04)
pt3dadd(-509.95, -39.89, 66.57, 1.04)
pt3dadd(-509.46, -40.96, 66.57, 0.7)
pt3dadd(-510.22, -42.52, 66.57, 0.7)
pt3dadd(-511.78, -44.33, 68.53, 0.7)
pt3dadd(-513.8, -42.58, 67.55, 0.7)
pt3dadd(-516.19, -43.95, 67.55, 0.7)
pt3dadd(-517.98, -44.16, 71.47, 0.7)
pt3dadd(-520.09, -43.1, 73.42, 0.7)
pt3dadd(-520.76, -42.16, 84.19, 0.7)
pt3dadd(-523.6, -42, 90.07, 0.7)
pt3dadd(-526.11, -42.38, 91.05, 0.7)
pt3dadd(-529.11, -41.08, 91.05, 0.7)
pt3dadd(-531.32, -39.01, 91.05, 0.7)
pt3dadd(-531.11, -39.28, 91.05, 0.7)
pt3dadd(-532.88, -39.15, 93, 0.7)
pt3dadd(-535.52, -40.6, 93, 0.7)
pt3dadd(-539.02, -41.09, 93, 0.7)
pt3dadd(-541.96, -41, 93, 0.7)
pt3dadd(-544.72, -40.26, 93, 0.7)
pt3dadd(-546.34, -41.92, 95.94, 0.7)
pt3dadd(-549.31, -42.05, 95.94, 0.7)
pt3dadd(-547.89, -44.85, 103.77, 0.7)
pt3dadd(-545.7, -47.26, 102.79, 0.7)
pt3dadd(-545.48, -46.41, 102.79, 0.7)
pt3dadd(-546.11, -44.49, 102.79, 0.7)
pt3dadd(-548.73, -45.1, 108.67, 0.7)
pt3dadd(-550.37, -43.98, 112.58, 0.7)
}
dend[35] {pt3dclear()
pt3dadd(-550.37, -43.98, 112.58, 0.35)
pt3dadd(-553.54, -46.23, 119.44, 0.35)
pt3dadd(-554.79, -46.78, 121.4, 0.35)
pt3dadd(-556.72, -48.56, 124.33, 0.35)
pt3dadd(-558.71, -48.12, 129.23, 0.35)
pt3dadd(-558.98, -48.55, 129.23, 0.35)
pt3dadd(-559.96, -50.2, 129.23, 0.35)
pt3dadd(-561.85, -52.06, 137.06, 0.35)
pt3dadd(-563.81, -55.29, 142.93, 0.35)
pt3dadd(-565.88, -58.49, 142.93, 0.35)
pt3dadd(-566.64, -62.46, 147.83, 0.35)
pt3dadd(-566.67, -65.05, 147.83, 0.35)
pt3dadd(-568.74, -67.65, 148.81, 0.35)
pt3dadd(-568.74, -67.65, 149.79, 0.35)
pt3dadd(-567.27, -69.82, 151.74, 0.35)
pt3dadd(-564.72, -70.88, 155.66, 0.35)
pt3dadd(-563.32, -71.86, 155.66, 0.35)
pt3dadd(-564.74, -74.56, 160.55, 0.35)
pt3dadd(-563.32, -74.04, 160.55, 0.35)
pt3dadd(-560.95, -75.43, 160.55, 0.35)
pt3dadd(-562.22, -76.32, 171.32, 0.35)
pt3dadd(-561.02, -78.09, 173.28, 0.35)
pt3dadd(-560.18, -79.38, 176.22, 0.35)
pt3dadd(-560.79, -81.61, 178.18, 0.35)
pt3dadd(-560.83, -82.34, 182.09, 0.35)
pt3dadd(-558, -84.6, 185.03, 0.35)
pt3dadd(-558.29, -86.69, 188.95, 0.35)
pt3dadd(-560.77, -87.4, 188.95, 0.35)
pt3dadd(-560.75, -87.05, 188.95, 0.35)
pt3dadd(-559.28, -90.15, 191.88, 0.35)
pt3dadd(-559.08, -91.88, 192.86, 0.35)
pt3dadd(-560.13, -93.64, 192.86, 0.35)
pt3dadd(-557.69, -94, 193.84, 0.35)
pt3dadd(-557.34, -92.94, 200.69, 0.35)
pt3dadd(-555.95, -91.52, 200.69, 0.35)
pt3dadd(-553.86, -91.52, 200.69, 0.35)
pt3dadd(-551.43, -91.52, 203.63, 0.35)
pt3dadd(-550.38, -93.29, 203.63, 0.35)
pt3dadd(-548.99, -94.71, 203.63, 0.35)
pt3dadd(-547.6, -93.29, 203.63, 0.35)
pt3dadd(-545.86, -94.35, 203.63, 0.35)
pt3dadd(-544.46, -95.06, 203.63, 0.35)
pt3dadd(-544.12, -96.83, 203.63, 0.35)
pt3dadd(-541.33, -96.83, 203.63, 0.35)
pt3dadd(-540.29, -97.89, 209.5, 0.35)
pt3dadd(-537.74, -99.77, 209.5, 0.35)
pt3dadd(-536.35, -101.89, 209.5, 0.35)
pt3dadd(-536.35, -103.3, 209.5, 0.35)
pt3dadd(-534.95, -104.72, 209.5, 0.35)
pt3dadd(-533.21, -104.72, 209.5, 0.35)
pt3dadd(-532.87, -104.01, 209.5, 0.35)
pt3dadd(-531.47, -104.37, 209.5, 0.35)
pt3dadd(-530.78, -103.3, 209.5, 0.35)
pt3dadd(-529.04, -103.3, 208.53, 0.35)
pt3dadd(-527.99, -104.01, 208.53, 0.35)
pt3dadd(-526.6, -104.72, 208.53, 0.35)
pt3dadd(-526.25, -104.72, 208.53, 0.35)
pt3dadd(-524.86, -104.72, 208.53, 0.35)
pt3dadd(-524.51, -104.01, 209.5, 0.35)
pt3dadd(-523.12, -104.72, 209.5, 0.35)
pt3dadd(-521.38, -106.13, 209.5, 0.35)
pt3dadd(-521.38, -107.2, 209.5, 0.35)
pt3dadd(-519.64, -108.26, 209.5, 0.35)
pt3dadd(-517.9, -108.26, 209.5, 0.35)
pt3dadd(-517.55, -107.2, 209.5, 0.35)
pt3dadd(-515.81, -106.84, 209.5, 0.35)
pt3dadd(-514.77, -107.2, 209.5, 0.35)
pt3dadd(-514.07, -108.26, 209.5, 0.35)
pt3dadd(-512.33, -108.26, 209.5, 0.35)
pt3dadd(-511.29, -108.26, 209.5, 0.35)
pt3dadd(-510.24, -109.32, 210.48, 0.35)
pt3dadd(-509.89, -110.03, 216.36, 0.35)
pt3dadd(-508.5, -110.38, 216.36, 0.35)
pt3dadd(-505.37, -108.96, 212.44, 0.35)
pt3dadd(-503.63, -108.96, 212.44, 0.35)
pt3dadd(-502.93, -108.96, 211.46, 0.35)
pt3dadd(-501.54, -110.03, 211.46, 0.35)
pt3dadd(-499.8, -111.09, 211.46, 0.35)
pt3dadd(-499.45, -112.86, 211.46, 0.35)
pt3dadd(-498.76, -113.21, 211.46, 0.35)
pt3dadd(-497.02, -113.92, 211.46, 0.35)
pt3dadd(-494.23, -113.56, 211.46, 0.35)
pt3dadd(-494.23, -115.33, 211.46, 0.35)
pt3dadd(-493.19, -117.81, 211.46, 0.35)
pt3dadd(-492.49, -119.22, 207.55, 0.35)
pt3dadd(-492.14, -119.22, 207.55, 0.35)
pt3dadd(-491.1, -121.34, 207.55, 0.35)
pt3dadd(-490.75, -123.82, 207.55, 0.35)
pt3dadd(-489.71, -124.17, 214.4, 0.35)
pt3dadd(-490.56, -127.51, 214.4, 0.35)
pt3dadd(-491.26, -129.99, 215.38, 0.35)
pt3dadd(-491.95, -132.82, 215.38, 0.35)
pt3dadd(-493, -134.23, 211.46, 0.35)
pt3dadd(-494.74, -135.65, 204.61, 0.35)
pt3dadd(-494.04, -140.25, 204.61, 0.35)
pt3dadd(-492.65, -142.37, 209.5, 0.35)
pt3dadd(-494.04, -144.14, 209.5, 0.35)
pt3dadd(-495.08, -145.55, 203.63, 0.35)
pt3dadd(-496.48, -147.32, 203.63, 0.35)
pt3dadd(-498.57, -150.86, 203.63, 0.35)
pt3dadd(-499.96, -153.34, 200.69, 0.35)
pt3dadd(-502.74, -154.75, 200.69, 0.35)
pt3dadd(-502.74, -157.58, 200.69, 0.35)
pt3dadd(-502.39, -160.06, 200.69, 0.35)
pt3dadd(-499.96, -159.7, 194.82, 0.35)
pt3dadd(-498.22, -159.35, 194.82, 0.35)
pt3dadd(-497.52, -157.23, 194.82, 0.35)
pt3dadd(-495.43, -157.93, 194.82, 0.35)
pt3dadd(-493, -156.87, 194.82, 0.35)
pt3dadd(-490.91, -156.52, 194.82, 0.35)
pt3dadd(-490.05, -156.11, 194.82, 0.35)
pt3dadd(-488.4, -155.26, 194.82, 0.35)
pt3dadd(-486.86, -155.45, 194.82, 0.35)
pt3dadd(-487.2, -157.55, 193.84, 0.35)
pt3dadd(-485.77, -156.75, 193.84, 0.35)
pt3dadd(-483.96, -158.56, 193.84, 0.35)
pt3dadd(-481.26, -158.58, 193.84, 0.35)
pt3dadd(-479.93, -156.17, 193.84, 0.35)
pt3dadd(-476.61, -155.6, 193.84, 0.35)
pt3dadd(-477.66, -159.05, 193.84, 0.35)
}
}
proc shape3d_9() {
dend[35] { pt3dadd(-474.47, -160.8, 186.01, 0.35)
pt3dadd(-471.7, -162.54, 185.03, 0.35)
pt3dadd(-473.12, -163.36, 178.18, 0.35)
pt3dadd(-473.99, -164.67, 177.2, 0.35)
pt3dadd(-473.79, -167.55, 177.2, 0.35)
pt3dadd(-474.3, -170.88, 178.18, 0.35)
pt3dadd(-476.71, -174.17, 178.18, 0.35)
pt3dadd(-479.71, -175.2, 178.18, 0.35)
pt3dadd(-481.14, -178.45, 173.28, 0.35)
pt3dadd(-482.19, -182.41, 172.3, 0.35)
pt3dadd(-482.19, -182.41, 171.32, 0.35)
pt3dadd(-482.09, -185.25, 167.41, 0.35)
pt3dadd(-483.5, -185.61, 167.41, 0.35)
}
dend[36] {pt3dclear()
pt3dadd(-550.37, -43.98, 112.58, 0.7)
pt3dadd(-552.74, -43.82, 111.61, 0.7)
pt3dadd(-555.11, -42.84, 112.58, 0.7)
}
dend[37] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-494.52, 30.44, 0, 6.26)
pt3dadd(-492.19, 30.05, 0, 5.22)
pt3dadd(-488, 28.52, 1.96, 4.52)
pt3dadd(-483.95, 26.48, 3.92, 4.52)
pt3dadd(-480.12, 25.9, 3.92, 4.18)
pt3dadd(-478.53, 25.84, 4.89, 4.18)
pt3dadd(-476.5, 24.06, 4.89, 4.18)
pt3dadd(-474.06, 23.3, 4.89, 4.52)
}
dend[38] {pt3dclear()
pt3dadd(-474.06, 23.3, 4.89, 3.83)
pt3dadd(-471.09, 25.17, 12.73, 3.83)
pt3dadd(-469.1, 27.06, 13.71, 3.13)
pt3dadd(-466.4, 29.03, 20.56, 2.78)
pt3dadd(-463.53, 33.62, 20.56, 2.78)
pt3dadd(-461.08, 36.89, 25.45, 2.44)
pt3dadd(-458.84, 39.81, 32.31, 2.09)
pt3dadd(-457.54, 43.26, 32.31, 2.09)
pt3dadd(-457.01, 45.9, 37.2, 2.09)
pt3dadd(-455.25, 46.81, 41.12, 2.44)
pt3dadd(-453.75, 48.08, 47.97, 2.09)
pt3dadd(-452.4, 49.41, 47.97, 2.09)
pt3dadd(-450.62, 50.68, 47.97, 2.09)
pt3dadd(-449.16, 52.75, 51.89, 2.09)
pt3dadd(-446.98, 55.61, 51.89, 2.09)
pt3dadd(-445.73, 57.9, 51.89, 2.09)
pt3dadd(-445.08, 60.58, 50.91, 2.09)
pt3dadd(-443.64, 64.18, 54.82, 2.09)
pt3dadd(-442.6, 66.82, 54.82, 2.09)
pt3dadd(-441.57, 69.04, 60.7, 2.09)
}
dend[39] {pt3dclear()
pt3dadd(-441.57, 69.04, 60.7, 0.7)
pt3dadd(-439.58, 71.02, 58.74, 0.7)
pt3dadd(-436.05, 73.81, 59.72, 0.7)
pt3dadd(-433.48, 77.53, 63.63, 0.7)
pt3dadd(-430.5, 80.35, 63.63, 0.7)
pt3dadd(-427.3, 83.51, 63.63, 0.7)
pt3dadd(-427.06, 83.26, 63.63, 0.7)
pt3dadd(-424.84, 86.42, 63.63, 0.7)
pt3dadd(-422.64, 88.89, 63.63, 0.7)
pt3dadd(-420.42, 89.83, 63.63, 0.7)
pt3dadd(-417.74, 92.68, 63.63, 0.7)
pt3dadd(-415.7, 96.17, 63.63, 0.7)
pt3dadd(-412.32, 99.66, 63.63, 0.7)
pt3dadd(-409.27, 102.4, 63.63, 0.7)
pt3dadd(-407.28, 105.13, 63.63, 0.7)
pt3dadd(-405.42, 108.16, 63.63, 0.7)
pt3dadd(-402.89, 111.3, 63.63, 0.7)
pt3dadd(-402.03, 116.63, 63.63, 0.7)
pt3dadd(-402.07, 119.76, 59.72, 0.7)
pt3dadd(-402.45, 121.84, 59.72, 0.7)
pt3dadd(-401.66, 124.32, 59.72, 0.7)
pt3dadd(-403.06, 127.07, 59.72, 0.7)
pt3dadd(-404.26, 128.85, 59.72, 0.7)
pt3dadd(-406.67, 129.63, 58.74, 0.7)
pt3dadd(-406.1, 132.94, 51.89, 0.7)
pt3dadd(-406.65, 135.41, 50.91, 0.7)
pt3dadd(-405.74, 138.35, 46.99, 0.7)
pt3dadd(-403.88, 141.81, 46.99, 0.7)
pt3dadd(-400.98, 146.02, 46.99, 0.35)
pt3dadd(-398.91, 150.17, 46.01, 0.35)
pt3dadd(-397.56, 156.06, 44.05, 0.35)
pt3dadd(-396.01, 159.3, 44.05, 0.35)
pt3dadd(-395.37, 164.07, 43.08, 0.35)
pt3dadd(-392.92, 169.44, 43.08, 0.35)
pt3dadd(-393.29, 172.03, 43.08, 0.35)
pt3dadd(-392.13, 175.29, 43.08, 0.35)
pt3dadd(-390.56, 177.97, 43.08, 0.35)
}
dend[40] {pt3dclear()
pt3dadd(-390.56, 177.97, 43.08, 0.35)
pt3dadd(-391.67, 181.92, 37.2, 0.35)
pt3dadd(-392.67, 186.28, 36.22, 0.35)
pt3dadd(-390.93, 191.24, 36.22, 0.35)
pt3dadd(-388.41, 194.38, 29.37, 0.35)
pt3dadd(-387.49, 196.48, 27.41, 0.35)
pt3dadd(-386.34, 199.37, 27.41, 0.35)
pt3dadd(-385.92, 203.43, 27.41, 0.35)
pt3dadd(-385.98, 206.54, 21.54, 0.35)
pt3dadd(-387.01, 211.06, 20.56, 0.35)
pt3dadd(-386.79, 216.56, 20.56, 0.35)
pt3dadd(-388.38, 219.9, 20.56, 0.35)
pt3dadd(-387.76, 223.14, 23.5, 0.35)
pt3dadd(-387.82, 225.75, 23.5, 0.35)
pt3dadd(-387.55, 228.68, 24.47, 0.35)
pt3dadd(-388.26, 230.66, 24.47, 0.35)
pt3dadd(-388.28, 235.34, 24.47, 0.35)
}
dend[41] {pt3dclear()
pt3dadd(-390.56, 177.97, 43.08, 0.35)
pt3dadd(-387.34, 176.97, 39.16, 0.35)
pt3dadd(-382.72, 178.09, 35.24, 0.35)
pt3dadd(-380.41, 177.85, 34.26, 0.35)
pt3dadd(-376.94, 177.55, 34.26, 0.35)
pt3dadd(-376.73, 175.65, 34.26, 0.35)
pt3dadd(-373.26, 176.97, 27.41, 0.35)
pt3dadd(-369, 178.08, 27.41, 0.35)
pt3dadd(-364.65, 173.91, 27.41, 0.35)
pt3dadd(-360.91, 171.48, 21.54, 0.35)
pt3dadd(-358.34, 174.41, 14.68, 0.35)
pt3dadd(-354.81, 177.61, 14.68, 0.35)
pt3dadd(-352.13, 179.07, 14.68, 0.35)
pt3dadd(-348.97, 178.13, 9.79, 0.35)
pt3dadd(-347.75, 174.14, 9.79, 0.35)
}
dend[42] {pt3dclear()
pt3dadd(-441.57, 69.04, 60.7, 2.09)
pt3dadd(-440.21, 71.44, 59.72, 2.09)
pt3dadd(-437.17, 72.71, 58.74, 1.74)
pt3dadd(-435.34, 72.9, 58.74, 1.04)
pt3dadd(-434.26, 74.59, 61.68, 1.04)
pt3dadd(-433.24, 75.39, 61.68, 1.04)
pt3dadd(-432.61, 77.01, 61.68, 1.04)
}
dend[43] {pt3dclear()
pt3dadd(-432.61, 77.01, 61.68, 0.7)
pt3dadd(-434.1, 78.12, 65.59, 0.7)
pt3dadd(-433.48, 80.53, 68.53, 0.7)
pt3dadd(-431.93, 80.57, 68.53, 0.7)
pt3dadd(-430.56, 82.48, 75.38, 0.7)
pt3dadd(-428.84, 83.85, 76.36, 0.7)
pt3dadd(-428.08, 84.64, 82.24, 0.7)
}
dend[44] {pt3dclear()
pt3dadd(-428.08, 84.64, 82.24, 0.7)
pt3dadd(-428.08, 85.85, 80.28, 0.7)
pt3dadd(-426, 86.3, 80.28, 0.7)
pt3dadd(-424.61, 87.21, 80.28, 0.7)
pt3dadd(-422.85, 89.75, 80.28, 0.7)
pt3dadd(-419.88, 90.91, 80.28, 0.7)
pt3dadd(-418.19, 93.77, 82.24, 0.7)
pt3dadd(-416.29, 95.8, 83.21, 0.7)
pt3dadd(-414.87, 96.23, 86.15, 0.35)
pt3dadd(-415.09, 97.38, 86.15, 0.35)
pt3dadd(-413.98, 99.8, 87.13, 0.35)
pt3dadd(-412.67, 101.04, 87.13, 0.35)
pt3dadd(-412.46, 102.29, 91.05, 0.35)
pt3dadd(-410.55, 104.89, 92.03, 0.35)
pt3dadd(-409.92, 109.08, 93, 0.35)
pt3dadd(-408.6, 111.11, 93, 0.35)
pt3dadd(-409.02, 113.13, 93, 0.35)
pt3dadd(-407.05, 116.17, 93, 0.35)
pt3dadd(-406.69, 119.32, 99.86, 0.35)
pt3dadd(-404.29, 124.86, 99.86, 0.35)
pt3dadd(-401.4, 129.02, 103.77, 0.35)
pt3dadd(-400.47, 132.56, 103.77, 0.35)
pt3dadd(-398.35, 135.28, 107.69, 0.35)
pt3dadd(-395.15, 142.4, 108.67, 0.35)
pt3dadd(-394.38, 147.16, 111.61, 0.35)
pt3dadd(-392.04, 152.35, 114.54, 0.35)
pt3dadd(-390.37, 157.32, 120.42, 0.35)
pt3dadd(-391.31, 159.39, 120.42, 0.35)
pt3dadd(-389.66, 161.28, 124.33, 0.35)
pt3dadd(-387.63, 162.2, 128.25, 0.35)
pt3dadd(-387.19, 163.95, 127.27, 0.35)
pt3dadd(-387.03, 164.38, 127.27, 0.35)
pt3dadd(-385.77, 165.75, 127.27, 0.35)
pt3dadd(-385.97, 167.57, 128.25, 0.35)
pt3dadd(-383.84, 168.4, 128.25, 0.35)
pt3dadd(-382.57, 169.59, 132.16, 0.35)
pt3dadd(-380.27, 170.78, 132.16, 0.35)
pt3dadd(-378.64, 173.22, 132.16, 0.35)
pt3dadd(-376.6, 176.98, 137.06, 0.35)
pt3dadd(-376.68, 179.17, 140, 0.35)
pt3dadd(-376.17, 182.36, 141.95, 0.35)
pt3dadd(-375.94, 183.83, 146.85, 0.35)
pt3dadd(-375.83, 186.04, 146.85, 0.35)
pt3dadd(-375.33, 189.02, 155.66, 0.35)
pt3dadd(-375.69, 190.83, 155.66, 0.35)
pt3dadd(-375.01, 193.46, 155.66, 0.35)
pt3dadd(-373.59, 192.8, 163.49, 0.35)
pt3dadd(-373.45, 194.57, 163.49, 0.35)
pt3dadd(-372.7, 199.47, 163.49, 0.35)
pt3dadd(-372.14, 200.71, 169.37, 0.35)
pt3dadd(-372.14, 203.68, 170.34, 0.35)
pt3dadd(-370.89, 207.78, 170.34, 0.35)
pt3dadd(-369.29, 211.66, 172.3, 0.35)
pt3dadd(-367.22, 216.06, 173.28, 0.35)
pt3dadd(-364.67, 221.05, 173.28, 0.35)
pt3dadd(-361.17, 225.98, 173.28, 0.35)
pt3dadd(-357.99, 226.58, 181.11, 0.35)
pt3dadd(-353.24, 227.59, 182.09, 0.35)
pt3dadd(-349.98, 226.51, 182.09, 0.35)
pt3dadd(-347.34, 229.16, 187.97, 0.35)
pt3dadd(-345, 230.84, 189.92, 0.35)
pt3dadd(-341.43, 232.31, 193.84, 0.35)
pt3dadd(-340.17, 234.25, 195.8, 0.35)
pt3dadd(-340.17, 234.25, 196.78, 0.35)
pt3dadd(-338.48, 236.98, 189.92, 0.35)
pt3dadd(-339.26, 240.28, 191.88, 0.35)
pt3dadd(-340.3, 245.36, 192.86, 0.35)
pt3dadd(-340.24, 246.08, 192.86, 0.35)
pt3dadd(-340.59, 248.2, 192.86, 0.35)
pt3dadd(-341.63, 249.62, 192.86, 0.35)
pt3dadd(-342.33, 252.09, 192.86, 0.35)
pt3dadd(-343.02, 253.51, 192.86, 0.35)
}
}
proc shape3d_10() {
dend[44] { pt3dadd(-344.77, 255.28, 192.86, 0.35)
pt3dadd(-345.11, 257.75, 192.86, 0.35)
pt3dadd(-345.11, 258.46, 192.86, 0.35)
pt3dadd(-345.46, 262.35, 192.86, 0.35)
pt3dadd(-346.51, 265.89, 192.86, 0.35)
pt3dadd(-347.2, 268.36, 197.76, 0.35)
pt3dadd(-347.55, 271.19, 197.76, 0.35)
pt3dadd(-347.55, 272.25, 197.76, 0.35)
pt3dadd(-346.85, 274.73, 197.76, 0.35)
pt3dadd(-346.85, 278.62, 197.76, 0.35)
pt3dadd(-346.85, 278.98, 197.76, 0.35)
pt3dadd(-346.52, 282.05, 198.74, 0.35)
pt3dadd(-344.78, 284.88, 198.74, 0.35)
pt3dadd(-343.39, 287.35, 198.74, 0.35)
pt3dadd(-342, 289.12, 198.74, 0.35)
pt3dadd(-341.65, 291.95, 202.65, 0.35)
pt3dadd(-339.22, 295.49, 202.65, 0.35)
pt3dadd(-339.56, 299.74, 206.57, 0.35)
pt3dadd(-340.26, 303.98, 206.57, 0.35)
pt3dadd(-340.26, 305.04, 206.57, 0.35)
pt3dadd(-340.26, 309.64, 206.57, 0.35)
pt3dadd(-342.35, 311.76, 206.57, 0.35)
pt3dadd(-343.39, 314.24, 203.63, 0.35)
pt3dadd(-346.52, 316.71, 203.63, 0.35)
pt3dadd(-346.52, 316.71, 202.65, 0.35)
}
dend[45] {pt3dclear()
pt3dadd(-428.08, 84.64, 82.24, 0.7)
pt3dadd(-427.18, 84.47, 81.26, 0.7)
pt3dadd(-426.05, 84.66, 81.26, 0.7)
pt3dadd(-426.66, 82.97, 82.24, 0.7)
pt3dadd(-429.32, 79.77, 86.15, 0.7)
pt3dadd(-430.87, 81, 92.03, 0.7)
pt3dadd(-432.42, 82.2, 92.03, 0.7)
pt3dadd(-432.52, 84.05, 97.9, 0.7)
pt3dadd(-432.91, 86.22, 112.58, 1.04)
pt3dadd(-430.74, 89.49, 112.58, 1.04)
pt3dadd(-431.03, 90.27, 111.61, 1.04)
pt3dadd(-432.36, 93.48, 114.54, 1.04)
pt3dadd(-433.69, 93.53, 118.46, 1.04)
pt3dadd(-433.61, 95.63, 119.44, 1.04)
pt3dadd(-432.07, 95.21, 124.33, 1.04)
pt3dadd(-431.16, 98.03, 124.33, 1.04)
pt3dadd(-429.97, 98.85, 124.33, 1.04)
pt3dadd(-429.2, 96.8, 124.33, 1.04)
pt3dadd(-427.79, 97.24, 124.33, 0.7)
pt3dadd(-426.81, 99, 124.33, 0.7)
pt3dadd(-428.06, 98.84, 127.27, 0.7)
pt3dadd(-429.17, 100.67, 127.27, 0.7)
pt3dadd(-431.39, 103.09, 127.27, 0.7)
pt3dadd(-429.64, 105.56, 132.16, 0.7)
pt3dadd(-429.33, 108.7, 132.16, 0.35)
pt3dadd(-430.58, 110.35, 132.16, 0.35)
pt3dadd(-430.57, 113.72, 132.16, 0.35)
pt3dadd(-429.92, 115.83, 137.06, 0.35)
pt3dadd(-429.2, 117.24, 139.02, 0.35)
pt3dadd(-429.91, 119.79, 139.02, 0.35)
pt3dadd(-429.15, 123.26, 140, 0.35)
pt3dadd(-427.19, 124.39, 140, 0.35)
pt3dadd(-426.8, 122.08, 145.87, 0.35)
pt3dadd(-429.18, 120.3, 145.87, 0.35)
pt3dadd(-431.09, 119.26, 147.83, 0.35)
pt3dadd(-428.64, 116.56, 154.68, 0.35)
pt3dadd(-425.75, 116.45, 165.45, 0.35)
pt3dadd(-429.54, 114.87, 167.41, 0.35)
pt3dadd(-432.8, 113.78, 169.37, 0.35)
pt3dadd(-435.48, 112.46, 169.37, 0.35)
pt3dadd(-436.72, 109.86, 169.37, 0.35)
pt3dadd(-439.02, 110.81, 169.37, 0.35)
pt3dadd(-441.94, 110.24, 169.37, 0.35)
pt3dadd(-445.4, 111.08, 169.37, 0.35)
pt3dadd(-449.03, 110.7, 169.37, 0.35)
pt3dadd(-450.29, 108.75, 169.37, 0.35)
pt3dadd(-453.62, 110, 169.37, 0.35)
pt3dadd(-455.76, 110.3, 169.37, 0.35)
pt3dadd(-458.11, 112.34, 169.37, 0.35)
pt3dadd(-461.07, 110.19, 172.3, 0.35)
pt3dadd(-461.91, 107.62, 172.3, 0.35)
pt3dadd(-465.49, 105.81, 172.3, 0.35)
pt3dadd(-466.51, 103.76, 172.3, 0.35)
pt3dadd(-467.44, 101.19, 172.3, 0.35)
pt3dadd(-470.37, 100.51, 172.3, 0.35)
pt3dadd(-471.9, 98.17, 172.3, 0.35)
pt3dadd(-473.49, 95.39, 173.28, 0.35)
pt3dadd(-475.19, 92.52, 177.2, 0.35)
pt3dadd(-478.07, 92.74, 180.13, 0.35)
pt3dadd(-481.64, 93.28, 183.07, 0.35)
pt3dadd(-482.23, 93.34, 183.07, 0.35)
pt3dadd(-485.01, 92.63, 183.07, 0.35)
pt3dadd(-487.1, 92.63, 183.07, 0.35)
pt3dadd(-488.84, 90.51, 183.07, 0.35)
pt3dadd(-490.58, 89.09, 183.07, 0.35)
pt3dadd(-493.02, 89.09, 186.99, 0.35)
pt3dadd(-495.46, 89.09, 186.99, 0.35)
pt3dadd(-496.85, 89.8, 186.99, 0.35)
pt3dadd(-500.33, 90.15, 186.99, 0.35)
pt3dadd(-502.42, 89.44, 191.88, 0.35)
pt3dadd(-505.9, 89.44, 191.88, 0.35)
pt3dadd(-508.33, 90.86, 191.88, 0.35)
pt3dadd(-509.38, 88.74, 195.8, 0.35)
pt3dadd(-511.12, 88.74, 195.8, 0.35)
pt3dadd(-512.86, 89.09, 195.8, 0.35)
pt3dadd(-513.9, 88.38, 195.8, 0.35)
pt3dadd(-514.95, 87.32, 195.8, 0.35)
pt3dadd(-517.73, 87.68, 195.8, 0.35)
pt3dadd(-519.12, 89.44, 195.8, 0.35)
pt3dadd(-521.56, 87.32, 198.74, 0.35)
pt3dadd(-523.65, 86.61, 198.74, 0.35)
pt3dadd(-524.34, 85.55, 198.74, 0.35)
pt3dadd(-524.69, 84.49, 198.74, 0.35)
pt3dadd(-526.78, 84.14, 198.74, 0.35)
pt3dadd(-529.22, 84.14, 198.74, 0.35)
pt3dadd(-530.61, 83.08, 198.74, 0.35)
pt3dadd(-530.96, 82.02, 198.74, 0.35)
pt3dadd(-533.39, 81.31, 198.74, 0.35)
pt3dadd(-534.09, 80.25, 198.74, 0.35)
pt3dadd(-534.79, 78.83, 198.74, 0.35)
pt3dadd(-535.83, 76.71, 198.74, 0.35)
pt3dadd(-536.53, 75.65, 202.65, 0.35)
pt3dadd(-539.31, 73.17, 202.65, 0.35)
pt3dadd(-539.66, 71.4, 202.65, 0.35)
pt3dadd(-541.4, 69.99, 202.65, 0.35)
pt3dadd(-542.44, 68.22, 202.65, 0.35)
pt3dadd(-542.79, 66.81, 202.65, 0.35)
pt3dadd(-545.92, 65.39, 205.59, 0.35)
pt3dadd(-548.01, 63.98, 205.59, 0.35)
pt3dadd(-549.75, 61.85, 205.59, 0.35)
pt3dadd(-551.49, 62.21, 205.59, 0.35)
pt3dadd(-552.54, 60.44, 198.74, 0.35)
pt3dadd(-553.23, 58.32, 198.74, 0.35)
pt3dadd(-553.93, 56.55, 198.74, 0.35)
pt3dadd(-555.67, 55.13, 198.74, 0.35)
pt3dadd(-556.36, 53.72, 198.74, 0.35)
pt3dadd(-557.94, 51.1, 202.65, 0.35)
pt3dadd(-561.07, 50.74, 202.65, 0.35)
pt3dadd(-560.72, 49.33, 202.65, 0.35)
pt3dadd(-561.07, 46.85, 202.65, 0.35)
pt3dadd(-563.85, 46.85, 202.65, 0.35)
}
dend[46] {pt3dclear()
pt3dadd(-563.85, 46.85, 202.65, 0.35)
pt3dadd(-564.2, 47.21, 202.65, 0.35)
pt3dadd(-566.99, 48.62, 202.65, 0.35)
pt3dadd(-569.07, 46.5, 202.65, 0.35)
pt3dadd(-571.51, 46.5, 200.69, 0.35)
pt3dadd(-571.86, 44.38, 200.69, 0.35)
pt3dadd(-573.95, 44.02, 200.69, 0.35)
pt3dadd(-576.04, 43.32, 200.69, 0.35)
pt3dadd(-577.78, 43.32, 200.69, 0.35)
pt3dadd(-578.82, 42.25, 200.69, 0.35)
pt3dadd(-578.82, 40.84, 200.69, 0.35)
pt3dadd(-581.6, 40.13, 200.69, 0.35)
}
dend[47] {pt3dclear()
pt3dadd(-563.85, 46.85, 202.65, 0.35)
pt3dadd(-563.16, 44.02, 195.8, 0.35)
pt3dadd(-563.85, 42.25, 195.8, 0.35)
pt3dadd(-563.85, 40.49, 195.8, 0.35)
pt3dadd(-561.77, 39.78, 196.78, 0.35)
pt3dadd(-561.77, 39.78, 195.8, 0.35)
}
dend[48] {pt3dclear()
pt3dadd(-432.61, 77.01, 61.68, 1.04)
pt3dadd(-430.89, 74.58, 61.68, 1.04)
pt3dadd(-427.61, 75, 67.55, 1.04)
pt3dadd(-427.61, 75, 68.53, 1.04)
pt3dadd(-424.45, 75.53, 72.45, 1.04)
pt3dadd(-421.24, 75.66, 73.42, 0.7)
pt3dadd(-419.38, 77.25, 76.36, 0.7)
pt3dadd(-418.25, 79.04, 76.36, 0.7)
pt3dadd(-415.59, 78.68, 81.26, 0.7)
pt3dadd(-414.64, 78.41, 83.21, 0.7)
pt3dadd(-413.81, 77.6, 85.17, 0.7)
pt3dadd(-411.44, 78.84, 86.15, 0.7)
pt3dadd(-410.14, 79.68, 91.05, 0.7)
pt3dadd(-410.14, 79.68, 92.03, 0.7)
pt3dadd(-407.84, 80.42, 94.96, 0.7)
pt3dadd(-407.3, 81.8, 99.86, 0.7)
pt3dadd(-405.24, 82.36, 104.75, 0.7)
pt3dadd(-403.5, 83.55, 104.75, 0.35)
pt3dadd(-401.94, 82.37, 104.75, 0.35)
pt3dadd(-399.7, 84.9, 112.58, 0.35)
pt3dadd(-396.44, 87.24, 112.58, 0.35)
pt3dadd(-393.15, 87.89, 112.58, 0.35)
pt3dadd(-391.63, 89.34, 112.58, 0.35)
pt3dadd(-389, 90.55, 118.46, 0.35)
pt3dadd(-386.95, 90.2, 118.46, 0.35)
pt3dadd(-385.1, 88.74, 122.37, 0.35)
pt3dadd(-382.19, 90.02, 123.35, 0.35)
pt3dadd(-381.17, 92.92, 123.35, 0.35)
pt3dadd(-378.01, 92.96, 126.29, 0.35)
pt3dadd(-375.83, 93.67, 128.25, 0.35)
pt3dadd(-373.54, 93.27, 128.25, 0.35)
pt3dadd(-370.45, 95.23, 130.21, 0.35)
pt3dadd(-370.3, 95.77, 134.12, 0.7)
}
dend[49] {pt3dclear()
pt3dadd(-370.3, 95.77, 134.12, 0.35)
pt3dadd(-372.34, 96.77, 134.12, 0.35)
pt3dadd(-371.56, 99.61, 135.1, 0.35)
pt3dadd(-372.58, 102.06, 137.06, 0.35)
}
dend[50] {pt3dclear()
pt3dadd(-370.3, 95.77, 134.12, 0.7)
pt3dadd(-368.74, 96.23, 133.14, 0.7)
pt3dadd(-367.79, 99.01, 132.16, 0.35)
pt3dadd(-367.26, 100.58, 136.08, 0.35)
pt3dadd(-366.16, 100.71, 137.06, 0.35)
pt3dadd(-364.71, 103.62, 140, 0.35)
pt3dadd(-362.33, 107.21, 140, 0.35)
pt3dadd(-361.35, 109.76, 143.91, 0.35)
pt3dadd(-359.15, 111.74, 148.81, 0.35)
}
}
proc shape3d_11() {
dend[50] { pt3dadd(-360.33, 112.84, 148.81, 0.35)
pt3dadd(-357.59, 113, 152.72, 0.35)
pt3dadd(-355.48, 111.97, 153.7, 0.35)
pt3dadd(-354.91, 114.23, 157.62, 0.35)
pt3dadd(-353.07, 112.15, 159.58, 0.35)
pt3dadd(-351.16, 112.22, 159.58, 0.35)
pt3dadd(-348.66, 111.38, 161.53, 0.35)
pt3dadd(-345.78, 112.96, 166.43, 0.35)
pt3dadd(-344.72, 112.95, 172.3, 0.35)
pt3dadd(-344.08, 115.64, 177.2, 0.35)
pt3dadd(-341.77, 116.81, 179.16, 0.35)
pt3dadd(-344.29, 115.11, 185.03, 0.35)
pt3dadd(-343.07, 112.84, 186.01, 0.35)
pt3dadd(-340.87, 112.8, 187.97, 0.35)
pt3dadd(-338.4, 111.26, 189.92, 0.35)
pt3dadd(-336.57, 110.78, 191.88, 0.35)
}
dend[51] {pt3dclear()
pt3dadd(-336.57, 110.78, 191.88, 0.35)
pt3dadd(-333.97, 110.81, 191.88, 0.35)
pt3dadd(-330.71, 111.85, 191.88, 0.35)
pt3dadd(-331.82, 112.69, 191.88, 0.35)
pt3dadd(-333.21, 113.4, 191.88, 0.35)
pt3dadd(-332.52, 115.17, 191.88, 0.35)
pt3dadd(-330.08, 115.88, 194.82, 0.35)
pt3dadd(-327.99, 116.94, 194.82, 0.35)
pt3dadd(-327.99, 116.94, 195.8, 0.35)
pt3dadd(-327.64, 118.71, 201.67, 0.35)
}
dend[52] {pt3dclear()
pt3dadd(-327.64, 118.71, 201.67, 0.35)
pt3dadd(-325.9, 120.47, 203.63, 0.35)
pt3dadd(-325.82, 122.16, 203.63, 0.35)
pt3dadd(-324.08, 126.41, 203.63, 0.35)
pt3dadd(-320.6, 128.53, 203.63, 0.35)
pt3dadd(-319.55, 131, 203.63, 0.35)
pt3dadd(-316.77, 132.06, 203.63, 0.35)
pt3dadd(-316.42, 132.06, 203.63, 0.35)
pt3dadd(-313.29, 133.13, 206.57, 0.35)
pt3dadd(-310.51, 135.25, 206.57, 0.35)
pt3dadd(-308.42, 137.72, 206.57, 0.35)
pt3dadd(-305.28, 138.79, 206.57, 0.35)
pt3dadd(-305.28, 139.14, 206.57, 0.35)
pt3dadd(-302.5, 140.55, 206.57, 0.35)
pt3dadd(-299.72, 142.32, 206.57, 0.35)
pt3dadd(-300.06, 142.32, 206.57, 0.35)
pt3dadd(-297.63, 145.51, 214.4, 0.35)
pt3dadd(-297.63, 145.86, 214.4, 0.35)
pt3dadd(-294.49, 148.69, 214.4, 0.35)
pt3dadd(-293.14, 151.88, 219.29, 0.35)
pt3dadd(-293.14, 154.36, 218.32, 0.35)
pt3dadd(-291.74, 155.07, 218.32, 0.35)
pt3dadd(-288.96, 156.84, 218.32, 0.35)
pt3dadd(-286.17, 159.67, 218.32, 0.35)
pt3dadd(-285.48, 161.79, 218.32, 0.35)
}
dend[53] {pt3dclear()
pt3dadd(-285.48, 161.79, 218.32, 0.35)
pt3dadd(-281.3, 162.14, 219.29, 0.35)
pt3dadd(-278.87, 162.85, 219.29, 0.35)
pt3dadd(-275.73, 161.79, 219.29, 0.35)
pt3dadd(-273.64, 162.85, 219.29, 0.35)
pt3dadd(-269.82, 165.33, 218.32, 0.35)
pt3dadd(-267.38, 167.09, 218.32, 0.35)
pt3dadd(-264.25, 167.45, 218.32, 0.35)
pt3dadd(-263.55, 167.45, 218.32, 0.35)
pt3dadd(-261.46, 168.86, 218.32, 0.35)
pt3dadd(-256.24, 168.86, 218.32, 0.35)
pt3dadd(-254.15, 167.8, 218.32, 0.35)
pt3dadd(-253.11, 169.92, 216.36, 0.35)
}
dend[54] {pt3dclear()
pt3dadd(-285.48, 161.79, 218.32, 0.35)
pt3dadd(-285.13, 164.26, 218.32, 0.35)
pt3dadd(-284.43, 168.16, 214.4, 0.35)
pt3dadd(-286.17, 170.63, 214.4, 0.35)
pt3dadd(-288.96, 172.4, 214.4, 0.35)
pt3dadd(-294.88, 172.4, 214.4, 0.35)
pt3dadd(-295.22, 172.05, 214.4, 0.35)
pt3dadd(-297.31, 169.92, 214.4, 0.35)
pt3dadd(-301.49, 169.92, 214.4, 0.35)
}
dend[55] {pt3dclear()
pt3dadd(-327.64, 118.71, 201.67, 0.35)
pt3dadd(-329.73, 118.71, 201.67, 0.35)
pt3dadd(-331.47, 122.24, 201.67, 0.35)
pt3dadd(-332.86, 123.66, 207.55, 0.35)
pt3dadd(-333.56, 123.66, 207.55, 0.35)
}
dend[56] {pt3dclear()
pt3dadd(-333.56, 123.66, 207.55, 0.35)
pt3dadd(-336.69, 122.95, 209.5, 0.35)
pt3dadd(-338.08, 121.89, 209.5, 0.35)
pt3dadd(-339.48, 120.12, 209.5, 0.35)
pt3dadd(-341.22, 121.54, 209.5, 0.35)
pt3dadd(-342.26, 120.83, 209.5, 0.35)
pt3dadd(-343.31, 119.77, 209.5, 0.35)
pt3dadd(-345.39, 119.06, 209.5, 0.35)
pt3dadd(-347.83, 118, 209.5, 0.35)
pt3dadd(-349.92, 116.58, 209.5, 0.35)
pt3dadd(-350.96, 115.88, 209.5, 0.35)
}
dend[57] {pt3dclear()
pt3dadd(-350.96, 115.88, 209.5, 0.35)
pt3dadd(-353.05, 116.58, 216.36, 0.35)
pt3dadd(-354.44, 116.94, 216.36, 0.35)
pt3dadd(-356.53, 118, 216.36, 0.35)
pt3dadd(-358.27, 120.47, 216.36, 0.35)
pt3dadd(-359.66, 123.66, 223.21, 0.35)
pt3dadd(-363.49, 122.95, 226.15, 0.35)
pt3dadd(-365.93, 123.66, 222.23, 0.35)
pt3dadd(-366.62, 123.66, 222.23, 0.35)
pt3dadd(-369.06, 126.49, 222.23, 0.35)
pt3dadd(-370.11, 128.96, 222.23, 0.35)
pt3dadd(-370.45, 130.02, 222.23, 0.35)
pt3dadd(-372.89, 130.38, 219.29, 0.35)
pt3dadd(-374.63, 128.61, 219.29, 0.35)
pt3dadd(-376.72, 127.9, 219.29, 0.35)
pt3dadd(-378.46, 128.61, 219.29, 0.35)
pt3dadd(-381.59, 127.19, 219.29, 0.35)
pt3dadd(-382.98, 128.26, 219.29, 0.35)
pt3dadd(-385.42, 130.02, 219.29, 0.35)
pt3dadd(-387.86, 130.02, 219.29, 0.35)
pt3dadd(-389.96, 131.05, 226.15, 0.35)
pt3dadd(-391.01, 132.47, 226.15, 0.35)
pt3dadd(-392.75, 132.47, 226.15, 0.35)
pt3dadd(-393.1, 132.47, 226.15, 0.35)
pt3dadd(-393.44, 133.88, 226.15, 0.35)
pt3dadd(-393.44, 135.65, 226.15, 0.35)
pt3dadd(-396.92, 137.42, 226.15, 0.35)
pt3dadd(-398.67, 138.84, 226.15, 0.35)
pt3dadd(-399.71, 140.61, 226.15, 0.35)
pt3dadd(-401.45, 142.37, 226.15, 0.35)
pt3dadd(-405.28, 145.2, 226.15, 0.35)
pt3dadd(-405.28, 147.68, 226.15, 0.35)
pt3dadd(-403.89, 148.03, 226.15, 0.35)
pt3dadd(-403.89, 149.45, 226.15, 0.35)
pt3dadd(-405.28, 151.22, 226.15, 0.35)
pt3dadd(-407.02, 149.8, 226.15, 0.35)
pt3dadd(-408.06, 148.03, 226.15, 0.35)
pt3dadd(-410.85, 146.97, 226.15, 0.35)
pt3dadd(-412.94, 144.5, 226.15, 0.35)
pt3dadd(-413.63, 142.37, 226.15, 0.35)
pt3dadd(-415.37, 142.37, 226.15, 0.35)
pt3dadd(-416.76, 141.31, 226.15, 0.35)
pt3dadd(-417.81, 138.84, 226.15, 0.35)
pt3dadd(-418.5, 138.13, 226.15, 0.35)
pt3dadd(-420.94, 138.13, 226.15, 0.35)
pt3dadd(-421.29, 137.78, 226.15, 0.35)
pt3dadd(-421.98, 136.71, 226.15, 0.35)
pt3dadd(-422.33, 136.36, 226.15, 0.35)
pt3dadd(-424.77, 134.95, 226.15, 0.35)
pt3dadd(-425.47, 134.59, 226.15, 0.35)
pt3dadd(-426.16, 134.59, 226.15, 0.35)
pt3dadd(-427.55, 134.59, 226.15, 0.35)
pt3dadd(-428.25, 134.59, 226.15, 0.35)
pt3dadd(-429.64, 132.82, 226.15, 0.35)
pt3dadd(-429.64, 130.35, 226.15, 0.35)
pt3dadd(-429.64, 129.99, 226.15, 0.35)
pt3dadd(-433.82, 128.93, 225.17, 0.35)
pt3dadd(-433.82, 128.22, 227.13, 0.35)
pt3dadd(-437.3, 128.22, 227.13, 0.35)
pt3dadd(-439.39, 126.46, 227.13, 0.35)
pt3dadd(-439.39, 124.69, 227.13, 0.35)
pt3dadd(-440.08, 122.92, 227.13, 0.35)
pt3dadd(-440.08, 122.57, 227.13, 0.35)
pt3dadd(-442.52, 121.5, 227.13, 0.35)
pt3dadd(-442.87, 121.5, 227.13, 0.35)
pt3dadd(-443.57, 120.33, 214.4, 0.35)
pt3dadd(-446.01, 121.04, 214.4, 0.35)
pt3dadd(-446.01, 121.39, 214.4, 0.35)
pt3dadd(-446.01, 122.1, 214.4, 0.35)
pt3dadd(-447.75, 120.69, 210.48, 0.35)
pt3dadd(-449.49, 120.33, 210.48, 0.35)
pt3dadd(-450.88, 121.04, 210.48, 0.35)
pt3dadd(-451.92, 122.45, 210.48, 0.35)
pt3dadd(-452.62, 123.52, 210.48, 0.35)
pt3dadd(-454.36, 123.52, 210.48, 0.35)
pt3dadd(-456.45, 125.28, 210.48, 0.35)
pt3dadd(-457.49, 124.22, 210.48, 0.35)
pt3dadd(-458.54, 124.93, 210.48, 0.35)
pt3dadd(-459.93, 127.41, 209.5, 0.35)
pt3dadd(-460.28, 129.18, 209.5, 0.35)
pt3dadd(-461.32, 130.94, 209.5, 0.35)
pt3dadd(-462.37, 130.59, 213.42, 0.35)
pt3dadd(-462.71, 130.59, 213.42, 0.35)
pt3dadd(-464.45, 130.59, 213.42, 0.35)
pt3dadd(-464.8, 132.36, 213.42, 0.35)
pt3dadd(-467.24, 134.13, 214.4, 0.35)
pt3dadd(-468.28, 135.54, 214.4, 0.35)
pt3dadd(-469.33, 138.02, 214.4, 0.35)
pt3dadd(-471.07, 138.02, 214.4, 0.35)
pt3dadd(-472.81, 139.08, 214.4, 0.35)
pt3dadd(-473.85, 139.79, 214.4, 0.35)
pt3dadd(-475.94, 139.08, 214.4, 0.35)
pt3dadd(-477.33, 140.85, 214.4, 0.35)
pt3dadd(-478.03, 142.26, 214.4, 0.35)
pt3dadd(-480.47, 141.56, 214.4, 0.35)
pt3dadd(-482.21, 141.56, 214.4, 0.35)
pt3dadd(-485.34, 142.97, 214.4, 0.35)
pt3dadd(-485.69, 141.2, 214.4, 0.35)
pt3dadd(-487.43, 140.85, 218.32, 0.35)
pt3dadd(-489.51, 140.85, 218.32, 0.35)
pt3dadd(-491.25, 141.91, 219.29, 0.35)
pt3dadd(-492.65, 141.56, 219.29, 0.35)
pt3dadd(-492.65, 141.2, 219.29, 0.35)
pt3dadd(-494.04, 140.14, 219.29, 0.35)
pt3dadd(-496.13, 141.2, 219.29, 0.35)
pt3dadd(-497.52, 141.56, 219.29, 0.35)
pt3dadd(-498.91, 142.62, 219.29, 0.35)
pt3dadd(-501.26, 144.57, 219.29, 0.35)
pt3dadd(-502.66, 145.28, 219.29, 0.35)
pt3dadd(-502.66, 147.75, 219.29, 0.35)
pt3dadd(-501.96, 148.46, 225.17, 0.35)
}
}
proc shape3d_12() {
dend[57] { pt3dadd(-502.66, 150.23, 226.15, 0.35)
pt3dadd(-504.74, 148.81, 226.15, 0.35)
pt3dadd(-505.79, 149.88, 226.15, 0.35)
pt3dadd(-505.09, 153.77, 226.15, 0.35)
pt3dadd(-506.48, 155.18, 226.15, 0.35)
pt3dadd(-504.4, 157.3, 226.15, 0.35)
pt3dadd(-504.74, 159.07, 232.02, 0.35)
pt3dadd(-503.7, 159.78, 232.02, 0.35)
pt3dadd(-503.7, 161.9, 232.02, 0.35)
pt3dadd(-504.74, 163.67, 232.02, 0.35)
pt3dadd(-507.18, 165.79, 236.92, 0.35)
pt3dadd(-508.22, 168.27, 236.92, 0.35)
pt3dadd(-510.31, 169.33, 236.92, 0.35)
pt3dadd(-511.36, 171.81, 236.92, 0.35)
pt3dadd(-512.05, 174.64, 236.92, 0.35)
pt3dadd(-513.45, 177.47, 236.92, 0.35)
pt3dadd(-513.79, 179.94, 239.85, 0.35)
pt3dadd(-513.79, 179.94, 240.83, 0.35)
}
dend[58] {pt3dclear()
pt3dadd(-350.96, 115.88, 209.5, 0.35)
pt3dadd(-352.7, 114.46, 209.5, 0.35)
pt3dadd(-354.1, 112.34, 209.5, 0.35)
pt3dadd(-354.1, 109.86, 209.5, 0.35)
pt3dadd(-355.14, 108.8, 209.5, 0.35)
pt3dadd(-356.53, 107.39, 214.4, 0.35)
pt3dadd(-358.62, 107.39, 215.38, 0.35)
pt3dadd(-360.36, 106.32, 215.38, 0.35)
pt3dadd(-363.14, 106.32, 215.38, 0.35)
pt3dadd(-364.88, 109.15, 215.38, 0.35)
pt3dadd(-364.54, 111.28, 221.25, 0.35)
pt3dadd(-366.97, 113.75, 221.25, 0.35)
pt3dadd(-366.97, 115.17, 221.25, 0.35)
}
dend[59] {pt3dclear()
pt3dadd(-333.56, 123.66, 207.55, 0.35)
pt3dadd(-337.04, 125.43, 207.55, 0.35)
pt3dadd(-339.13, 125.78, 207.55, 0.35)
pt3dadd(-339.13, 127.9, 207.55, 0.35)
pt3dadd(-340.87, 128.96, 207.55, 0.35)
pt3dadd(-344.35, 131.09, 207.55, 0.35)
pt3dadd(-344, 132.85, 215.38, 0.35)
pt3dadd(-345.05, 134.98, 216.36, 0.35)
}
dend[60] {pt3dclear()
pt3dadd(-336.57, 110.78, 191.88, 0.35)
pt3dadd(-338.98, 108.17, 191.88, 0.35)
pt3dadd(-341.36, 105.64, 193.84, 0.35)
pt3dadd(-344.76, 104.63, 192.86, 0.35)
pt3dadd(-345.92, 102.72, 192.86, 0.35)
pt3dadd(-348.77, 102.53, 192.86, 0.35)
pt3dadd(-351.77, 100.67, 192.86, 0.35)
pt3dadd(-354.67, 100.63, 192.86, 0.35)
}
dend[61] {pt3dclear()
pt3dadd(-474.06, 23.3, 4.89, 3.83)
pt3dadd(-472.56, 21.76, 3.92, 3.83)
pt3dadd(-470.17, 19, 5.87, 3.13)
pt3dadd(-466.39, 17.68, 7.83, 2.78)
pt3dadd(-462.41, 15.58, 11.75, 2.78)
pt3dadd(-458.78, 13.61, 17.62, 2.78)
pt3dadd(-456.34, 12.21, 17.62, 2.44)
pt3dadd(-453.62, 11.24, 17.62, 2.44)
pt3dadd(-450.17, 9.53, 17.62, 2.44)
pt3dadd(-447.73, 8.84, 18.6, 2.44)
pt3dadd(-444.91, 7.69, 17.62, 2.44)
pt3dadd(-442.51, 6.47, 16.64, 2.44)
}
dend[62] {pt3dclear()
pt3dadd(-442.51, 6.47, 16.64, 1.74)
pt3dadd(-439.67, 6.39, 17.62, 1.74)
pt3dadd(-437.26, 7.65, 17.62, 1.39)
pt3dadd(-435.21, 7.92, 23.5, 1.39)
pt3dadd(-432.49, 7.94, 22.52, 1.39)
pt3dadd(-428.08, 7.05, 22.52, 1.39)
pt3dadd(-424.88, 8.01, 21.54, 1.39)
pt3dadd(-422.61, 6.61, 21.54, 1.39)
pt3dadd(-419.11, 5.93, 21.54, 1.39)
pt3dadd(-415.07, 5.84, 21.54, 1.39)
pt3dadd(-412, 8.22, 21.54, 1.39)
pt3dadd(-409.83, 10.29, 20.56, 1.39)
pt3dadd(-404.9, 10.06, 20.56, 1.39)
pt3dadd(-398.66, 10.96, 20.56, 1.39)
pt3dadd(-392.93, 11.56, 20.56, 1.39)
pt3dadd(-389.96, 12.87, 20.56, 1.39)
pt3dadd(-386.56, 13.41, 24.47, 1.04)
pt3dadd(-384.03, 15.2, 24.47, 1.04)
pt3dadd(-381.25, 15.78, 24.47, 1.04)
pt3dadd(-378.52, 16.86, 24.47, 1.04)
pt3dadd(-377.12, 15.99, 19.58, 1.04)
pt3dadd(-373.6, 16.81, 18.6, 1.04)
pt3dadd(-369.83, 18.7, 18.6, 1.04)
pt3dadd(-367.31, 20.9, 18.6, 1.04)
pt3dadd(-364.48, 22.23, 18.6, 1.04)
pt3dadd(-360.79, 23.77, 18.6, 1.04)
pt3dadd(-358.15, 23.78, 19.58, 1.04)
pt3dadd(-355.65, 23.59, 19.58, 1.04)
pt3dadd(-352.07, 25.92, 19.58, 1.04)
pt3dadd(-347.73, 26.64, 19.58, 1.04)
pt3dadd(-345.57, 25.62, 19.58, 1.04)
pt3dadd(-341.07, 27.45, 20.56, 1.04)
pt3dadd(-336.9, 28.42, 20.56, 1.04)
pt3dadd(-335.16, 28.67, 20.56, 1.04)
pt3dadd(-332.76, 29.61, 20.56, 1.04)
pt3dadd(-328.81, 31.98, 20.56, 1.04)
pt3dadd(-324.15, 32.94, 20.56, 1.04)
pt3dadd(-317.89, 35.47, 20.56, 1.04)
pt3dadd(-313.17, 38.93, 20.56, 1.04)
pt3dadd(-309.74, 38.75, 20.56, 1.04)
pt3dadd(-306.02, 41.36, 20.56, 1.04)
pt3dadd(-302.12, 43.46, 20.56, 1.04)
pt3dadd(-299.17, 43.71, 20.56, 1.04)
pt3dadd(-296.35, 45.78, 20.56, 1.04)
pt3dadd(-292.65, 48.74, 20.56, 1.04)
pt3dadd(-287.24, 50.1, 20.56, 1.04)
pt3dadd(-282.52, 52.16, 20.56, 1.04)
pt3dadd(-279.25, 54.67, 20.56, 1.04)
pt3dadd(-276.12, 57.7, 19.58, 1.04)
pt3dadd(-271.53, 59.09, 19.58, 0.7)
pt3dadd(-266.51, 59.91, 19.58, 0.7)
pt3dadd(-263.24, 62.01, 19.58, 0.7)
pt3dadd(-259.66, 63.43, 26.43, 0.7)
pt3dadd(-255.54, 65.47, 26.43, 0.7)
}
dend[63] {pt3dclear()
pt3dadd(-255.54, 65.47, 26.43, 0.7)
pt3dadd(-252.43, 69.09, 22.52, 0.7)
pt3dadd(-250.61, 73.06, 23.5, 0.7)
pt3dadd(-248.81, 77.86, 23.5, 0.7)
pt3dadd(-248.63, 80.71, 23.5, 0.7)
pt3dadd(-246.31, 83.72, 22.52, 0.7)
pt3dadd(-244.3, 87.73, 21.54, 0.7)
pt3dadd(-241.23, 89.45, 21.54, 0.7)
pt3dadd(-239.92, 93.83, 21.54, 0.7)
pt3dadd(-238.13, 100.22, 21.54, 0.7)
pt3dadd(-235.21, 105.66, 20.56, 0.7)
pt3dadd(-230.6, 109.53, 20.56, 0.7)
pt3dadd(-225.42, 112.54, 20.56, 0.7)
pt3dadd(-224.07, 113.03, 20.56, 0.7)
pt3dadd(-221.83, 116.99, 19.58, 0.7)
pt3dadd(-218.5, 121.9, 19.58, 0.7)
pt3dadd(-217.25, 123.35, 19.58, 0.7)
pt3dadd(-213.63, 125.19, 19.58, 0.7)
pt3dadd(-210.84, 128.14, 19.58, 0.7)
pt3dadd(-208.17, 131.63, 20.56, 0.7)
pt3dadd(-204.08, 135.68, 20.56, 0.7)
pt3dadd(-200.19, 139.94, 20.56, 0.7)
pt3dadd(-198.97, 141.85, 20.56, 0.7)
}
dend[64] {pt3dclear()
pt3dadd(-198.97, 141.85, 20.56, 0.7)
pt3dadd(-195.31, 141.27, 19.58, 0.7)
pt3dadd(-190, 143.92, 19.58, 0.35)
pt3dadd(-184.23, 148.42, 19.58, 0.35)
pt3dadd(-179.27, 154.79, 19.58, 0.35)
pt3dadd(-176.58, 158.64, 19.58, 0.35)
pt3dadd(-175.71, 163.07, 19.58, 0.35)
pt3dadd(-171.53, 167.78, 19.58, 0.35)
pt3dadd(-164.54, 177.49, 19.58, 0.35)
pt3dadd(-160.3, 185.9, 22.52, 0.35)
pt3dadd(-157.15, 191.34, 22.52, 0.35)
pt3dadd(-153.46, 195.71, 22.52, 0.35)
pt3dadd(-152.52, 195.03, 22.52, 0.35)
pt3dadd(-151.98, 200.24, 22.52, 0.35)
}
dend[65] {pt3dclear()
pt3dadd(-198.97, 141.85, 20.56, 0.7)
pt3dadd(-199.96, 146.47, 22.52, 0.7)
pt3dadd(-198.79, 150.86, 22.52, 0.7)
pt3dadd(-198.43, 156.83, 22.52, 0.7)
}
dend[66] {pt3dclear()
pt3dadd(-255.54, 65.47, 26.43, 0.7)
pt3dadd(-253.61, 63.73, 26.43, 0.7)
pt3dadd(-249.82, 62.77, 27.41, 0.7)
pt3dadd(-246.73, 60.42, 27.41, 0.7)
pt3dadd(-243.47, 59.48, 27.41, 0.7)
pt3dadd(-241.39, 56.63, 27.41, 0.7)
pt3dadd(-238.35, 54.57, 27.41, 0.7)
pt3dadd(-233.43, 50.94, 27.41, 0.7)
pt3dadd(-227.28, 48.45, 26.43, 0.7)
pt3dadd(-224.7, 47.31, 26.43, 0.7)
pt3dadd(-220.95, 44.08, 26.43, 0.7)
pt3dadd(-216.44, 41.37, 26.43, 0.7)
pt3dadd(-212.37, 39.69, 24.47, 0.7)
pt3dadd(-208.94, 36.48, 24.47, 0.7)
pt3dadd(-206.14, 32.49, 24.47, 0.7)
}
dend[67] {pt3dclear()
pt3dadd(-442.51, 6.47, 16.64, 2.44)
pt3dadd(-440.98, 4.26, 16.64, 2.44)
pt3dadd(-440.44, 1.7, 15.66, 2.09)
pt3dadd(-437.33, -0.13, 15.66, 2.09)
pt3dadd(-434.21, -3.58, 15.66, 1.74)
pt3dadd(-430.91, -7.42, 15.66, 1.74)
pt3dadd(-428.29, -11.5, 15.66, 1.74)
pt3dadd(-427.1, -14.99, 15.66, 1.74)
pt3dadd(-425.44, -19.45, 15.66, 1.74)
pt3dadd(-423.72, -23.31, 15.66, 1.74)
pt3dadd(-421.04, -28.73, 15.66, 1.74)
pt3dadd(-418.37, -33.13, 15.66, 1.74)
pt3dadd(-416.61, -35.97, 15.66, 1.74)
pt3dadd(-414.43, -38.95, 15.66, 1.74)
pt3dadd(-412.08, -42.18, 15.66, 1.74)
pt3dadd(-410.69, -45.45, 14.68, 1.74)
pt3dadd(-409.15, -48.57, 14.68, 1.74)
pt3dadd(-407.62, -51.69, 13.71, 1.39)
pt3dadd(-405.07, -53.81, 13.71, 1.39)
pt3dadd(-403.57, -56.34, 13.71, 1.39)
pt3dadd(-402.59, -60.02, 14.68, 1.39)
pt3dadd(-401.87, -61.7, 14.68, 1.39)
pt3dadd(-400.68, -64.05, 14.68, 1.39)
pt3dadd(-399.46, -64.95, 14.68, 1.39)
pt3dadd(-396.72, -66.68, 14.68, 1.39)
pt3dadd(-394.81, -70.21, 14.68, 1.04)
pt3dadd(-394.09, -71.4, 13.71, 1.04)
pt3dadd(-391.26, -72.37, 13.71, 1.04)
pt3dadd(-390.14, -75.56, 13.71, 1.04)
pt3dadd(-388.62, -77.45, 13.71, 1.04)
}
dend[68] {pt3dclear()
pt3dadd(-388.62, -77.45, 13.71, 0.7)
}
}
proc shape3d_13() {
dend[68] { pt3dadd(-388.79, -80.88, 8.81, 0.7)
pt3dadd(-386.61, -84.41, 8.81, 0.7)
pt3dadd(-387.98, -89.89, 2.94, 0.7)
pt3dadd(-387.91, -92.19, 2.94, 0.7)
pt3dadd(-388.95, -95.64, 2.94, 0.7)
pt3dadd(-387.32, -97.92, 2.94, 0.7)
pt3dadd(-386.57, -102.57, 2.94, 0.7)
pt3dadd(-387, -104.96, 0, 0.7)
pt3dadd(-385.11, -107.69, 0, 0.7)
pt3dadd(-383.83, -111.31, 0, 0.7)
pt3dadd(-381.38, -113.36, 0, 0.7)
pt3dadd(-382.66, -115.95, -3.92, 0.7)
pt3dadd(-381.97, -118.57, -4.89, 0.7)
pt3dadd(-379.9, -118.67, -4.89, 0.7)
pt3dadd(-380.52, -120.89, -4.89, 0.7)
pt3dadd(-379.55, -123.22, -11.75, 0.7)
pt3dadd(-376.34, -124.03, -11.75, 0.7)
pt3dadd(-375.83, -126.19, -11.75, 0.7)
pt3dadd(-372.88, -127.44, -11.75, 0.7)
pt3dadd(-369.97, -128, -14.68, 0.7)
pt3dadd(-367.26, -127.69, -22.52, 0.7)
pt3dadd(-369.82, -125.38, -31.33, 0.7)
pt3dadd(-372.76, -124.18, -31.33, 0.7)
pt3dadd(-374.85, -123.8, -38.18, 0.7)
pt3dadd(-376.18, -120.88, -38.18, 0.7)
pt3dadd(-378.91, -119.71, -38.18, 0.7)
pt3dadd(-380.82, -118.62, -41.12, 0.7)
pt3dadd(-383.73, -117.78, -42.1, 0.7)
pt3dadd(-383.52, -118.47, -42.1, 0.7)
pt3dadd(-387.1, -115.62, -42.1, 0.7)
pt3dadd(-388.49, -115.24, -42.1, 0.7)
pt3dadd(-388.57, -113.98, -42.1, 0.7)
pt3dadd(-392.15, -111.13, -42.1, 0.7)
pt3dadd(-394.01, -110.88, -42.1, 0.7)
pt3dadd(-394.88, -109.58, -42.1, 0.7)
pt3dadd(-398.03, -107.57, -42.1, 0.7)
pt3dadd(-399.22, -107.11, -43.08, 0.7)
pt3dadd(-398.64, -103.52, -45.03, 0.7)
pt3dadd(-399.58, -101.63, -45.03, 0.7)
}
dend[69] {pt3dclear()
pt3dadd(-399.58, -101.63, -45.03, 0.7)
pt3dadd(-401.83, -100.4, -45.03, 0.7)
pt3dadd(-402.67, -98.97, -45.03, 0.7)
pt3dadd(-403.63, -98.32, -46.99, 0.35)
pt3dadd(-404.31, -96.57, -46.99, 0.35)
pt3dadd(-406.15, -95.38, -46.99, 0.35)
pt3dadd(-408.3, -93.91, -46.99, 0.35)
pt3dadd(-409.44, -90.98, -46.99, 0.35)
pt3dadd(-411.07, -88.85, -46.99, 0.35)
pt3dadd(-410.34, -86.79, -49.93, 0.35)
pt3dadd(-408.63, -83.94, -49.93, 0.35)
pt3dadd(-405.63, -81.14, -49.93, 0.35)
pt3dadd(-401.83, -78.77, -49.93, 0.35)
pt3dadd(-401.14, -77.7, -50.91, 0.35)
pt3dadd(-398.4, -77.39, -50.91, 0.35)
pt3dadd(-396.43, -75.34, -50.91, 0.35)
pt3dadd(-394.59, -75.47, -50.91, 0.35)
pt3dadd(-391.13, -74.91, -56.78, 0.35)
pt3dadd(-388.7, -72.81, -56.78, 0.35)
pt3dadd(-386.76, -70.07, -56.78, 0.35)
pt3dadd(-386.8, -67.76, -56.78, 0.35)
pt3dadd(-385.54, -65.03, -56.78, 0.35)
pt3dadd(-384.69, -61.06, -56.78, 0.35)
pt3dadd(-385.29, -57.51, -56.78, 0.35)
pt3dadd(-385.41, -53.18, -56.78, 0.35)
}
dend[70] {pt3dclear()
pt3dadd(-399.58, -101.63, -45.03, 0.35)
pt3dadd(-397.77, -98.6, -52.87, 0.35)
pt3dadd(-394.12, -96.98, -52.87, 0.35)
pt3dadd(-393.07, -94.49, -52.87, 0.35)
pt3dadd(-390.07, -94.68, -52.87, 0.35)
pt3dadd(-388.9, -94.4, -60.7, 0.35)
pt3dadd(-387.78, -92.79, -60.7, 0.35)
pt3dadd(-386.38, -91.63, -67.55, 0.35)
pt3dadd(-385.04, -90.73, -67.55, 0.35)
pt3dadd(-387.73, -88.67, -74.4, 0.35)
pt3dadd(-386.77, -87.86, -74.4, 0.35)
pt3dadd(-388.73, -86.41, -74.4, 0.35)
pt3dadd(-387.4, -84.45, -74.4, 0.35)
pt3dadd(-389, -83.62, -74.4, 0.35)
pt3dadd(-389.61, -80.63, -80.28, 0.35)
pt3dadd(-391.44, -79.4, -82.24, 0.35)
pt3dadd(-394.21, -80.07, -84.19, 0.35)
pt3dadd(-394.65, -83.6, -84.19, 0.35)
pt3dadd(-394.84, -87.23, -84.19, 0.35)
pt3dadd(-393.91, -88.63, -91.05, 0.35)
pt3dadd(-392.83, -89, -93.98, 0.35)
pt3dadd(-390.33, -90.28, -98.88, 0.35)
pt3dadd(-388.74, -89.23, -98.88, 0.35)
pt3dadd(-387.71, -86.74, -98.88, 0.35)
pt3dadd(-385.59, -84.68, -98.88, 0.35)
pt3dadd(-385.64, -81.74, -98.88, 0.35)
pt3dadd(-387.28, -79.27, -104.75, 0.35)
pt3dadd(-386.77, -76.42, -104.75, 0.35)
pt3dadd(-386.17, -74.37, -107.69, 0.35)
pt3dadd(-387.44, -71.57, -107.69, 0.35)
pt3dadd(-387.44, -71.57, -108.67, 0.35)
pt3dadd(-388.79, -72.27, -111.61, 0.35)
pt3dadd(-392.01, -70.26, -115.52, 0.35)
pt3dadd(-392.27, -68.94, -119.44, 0.35)
pt3dadd(-394.25, -67.23, -122.37, 0.35)
pt3dadd(-395.27, -66.58, -126.29, 0.35)
pt3dadd(-393.7, -65.07, -137.06, 0.35)
pt3dadd(-391.57, -65.39, -137.06, 0.35)
pt3dadd(-388.78, -65, -137.06, 0.35)
pt3dadd(-389.83, -63.76, -145.87, 0.35)
pt3dadd(-390.47, -60.88, -146.85, 0.35)
pt3dadd(-391.33, -59.69, -146.85, 0.35)
pt3dadd(-390.39, -56.62, -152.72, 0.35)
pt3dadd(-387.44, -56.2, -152.72, 0.35)
pt3dadd(-383.87, -59.17, -156.64, 0.35)
pt3dadd(-383.87, -59.17, -157.62, 0.35)
}
dend[71] {pt3dclear()
pt3dadd(-388.62, -77.45, 13.71, 1.04)
pt3dadd(-387, -79.86, 12.73, 1.04)
pt3dadd(-383.58, -83.71, 14.68, 0.7)
pt3dadd(-379.44, -88.67, 14.68, 0.7)
pt3dadd(-377.14, -92.03, 14.68, 0.7)
pt3dadd(-377.22, -93.83, 14.68, 0.7)
pt3dadd(-377.49, -95.92, 15.66, 0.7)
pt3dadd(-374.56, -98.03, 15.66, 0.7)
pt3dadd(-372.43, -101.56, 16.64, 0.7)
pt3dadd(-368.86, -104.67, 16.64, 0.7)
pt3dadd(-366.65, -108.18, 16.64, 0.7)
pt3dadd(-363.67, -112.35, 16.64, 0.7)
pt3dadd(-361.41, -115.06, 15.66, 0.7)
pt3dadd(-361.67, -117.97, 15.66, 0.7)
pt3dadd(-358.09, -120.44, 16.64, 0.7)
pt3dadd(-355.91, -123.19, 16.64, 0.7)
pt3dadd(-352.5, -124.58, 16.64, 0.7)
pt3dadd(-348.43, -127.02, 13.71, 0.7)
pt3dadd(-347.51, -129.98, 12.73, 0.7)
pt3dadd(-344.59, -132.61, 12.73, 0.7)
pt3dadd(-340.49, -137.72, 11.75, 0.7)
pt3dadd(-337.76, -142.55, 11.75, 0.7)
pt3dadd(-333.66, -144.74, 11.75, 0.7)
pt3dadd(-331.48, -147.6, 11.75, 0.7)
pt3dadd(-331.12, -150.12, 12.73, 0.7)
pt3dadd(-327.38, -152.21, 10.77, 0.7)
pt3dadd(-327.21, -151.91, 10.77, 0.7)
pt3dadd(-325.51, -154.1, 10.77, 0.7)
pt3dadd(-324.45, -155.38, 10.77, 0.7)
pt3dadd(-321.76, -156.5, 9.79, 0.7)
pt3dadd(-320.16, -159.56, 9.79, 0.7)
pt3dadd(-317.29, -163.2, 9.79, 0.7)
pt3dadd(-314.92, -168.43, 9.79, 0.7)
pt3dadd(-313.19, -172.8, 9.79, 0.7)
pt3dadd(-312.97, -175.97, 9.79, 0.7)
pt3dadd(-311.45, -179.24, 9.79, 0.7)
pt3dadd(-311.33, -181.49, 9.79, 0.7)
pt3dadd(-309.8, -183.03, 10.77, 0.7)
pt3dadd(-308.89, -185.87, 10.77, 0.7)
pt3dadd(-308.26, -188.42, 10.77, 0.7)
pt3dadd(-306.69, -191.31, 10.77, 0.7)
pt3dadd(-303.53, -193.73, 10.77, 0.7)
pt3dadd(-300.35, -196.23, 4.89, 0.7)
pt3dadd(-296.78, -198.95, 4.89, 0.7)
pt3dadd(-293.25, -203.27, 4.89, 0.7)
pt3dadd(-289.94, -206.64, 3.92, 0.7)
pt3dadd(-289.04, -210.16, 3.92, 0.7)
pt3dadd(-286.79, -214.37, 3.92, 0.7)
pt3dadd(-287.02, -219.96, 3.92, 0.7)
pt3dadd(-286.55, -222.78, 1.96, 0.7)
pt3dadd(-285.01, -224.62, 1.96, 0.7)
pt3dadd(-281.44, -225.71, 1.96, 0.7)
pt3dadd(-279.9, -231.59, 1.96, 0.7)
pt3dadd(-277.27, -236.58, 1.96, 0.7)
pt3dadd(-277.48, -237.99, 1.96, 0.7)
pt3dadd(-273.96, -241.26, 1.96, 0.7)
pt3dadd(-271.07, -244.98, 1.96, 0.7)
pt3dadd(-266.88, -248.44, 1.96, 0.7)
pt3dadd(-267.19, -251.45, 2.94, 0.35)
pt3dadd(-265.04, -252.93, 2.94, 0.35)
pt3dadd(-264.18, -254.23, 2.94, 0.35)
pt3dadd(-264.37, -257.38, 2.94, 0.35)
pt3dadd(-258.67, -261.43, 2.94, 0.35)
pt3dadd(-259.03, -264.89, 2.94, 0.35)
pt3dadd(-256.13, -266.13, 2.94, 0.35)
pt3dadd(-255.87, -269.68, 3.92, 0.35)
pt3dadd(-255.36, -274.64, 3.92, 0.35)
pt3dadd(-253.2, -276.51, 3.92, 0.35)
pt3dadd(-250.34, -278.54, 3.92, 0.35)
pt3dadd(-248.85, -282.51, 3.92, 0.35)
pt3dadd(-248.12, -284.18, 3.92, 0.35)
pt3dadd(-244.77, -286.36, 3.92, 0.35)
pt3dadd(-242.21, -289.84, 3.92, 0.35)
pt3dadd(-240.39, -293.13, -3.92, 0.35)
pt3dadd(-238.38, -296.16, -3.92, 0.35)
pt3dadd(-236.35, -300.38, -8.81, 0.35)
pt3dadd(-234.93, -302.55, -8.81, 0.35)
pt3dadd(-237.55, -303.26, -11.75, 0.35)
pt3dadd(-236.99, -305.58, -17.62, 0.35)
}
dend[72] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-526.04, 34, 1.96, 3.48)
pt3dadd(-527.26, 30.91, 1.96, 3.48)
pt3dadd(-528.76, 27.97, 2.94, 3.48)
pt3dadd(-530.25, 25.02, 5.87, 2.78)
pt3dadd(-532.14, 22.41, 6.85, 2.78)
pt3dadd(-533.9, 20.32, 6.85, 2.78)
pt3dadd(-534.72, 18.38, 7.83, 2.09)
pt3dadd(-534.72, 18.38, 8.81, 2.09)
pt3dadd(-536.31, 16.28, 8.81, 2.09)
pt3dadd(-537.78, 14.01, 8.81, 2.09)
}
}
proc shape3d_14() {
dend[72] { pt3dadd(-539.38, 10.48, 10.77, 2.09)
pt3dadd(-540.78, 7.72, 10.77, 1.74)
pt3dadd(-542.65, 6.55, 12.73, 1.74)
pt3dadd(-543.6, 5.5, 12.73, 1.39)
pt3dadd(-543.89, 2.49, 12.73, 1.39)
pt3dadd(-545.62, 0.55, 12.73, 1.39)
pt3dadd(-545.82, -2.59, 12.73, 1.39)
pt3dadd(-546.77, -3.68, 11.75, 1.39)
pt3dadd(-547.6, -5.48, 11.75, 1.39)
pt3dadd(-546.96, -8.83, 14.68, 1.39)
pt3dadd(-546.21, -13.16, 14.68, 1.39)
pt3dadd(-546.91, -17.44, 14.68, 1.39)
pt3dadd(-547.33, -21.85, 15.66, 1.39)
pt3dadd(-547.94, -25.42, 15.66, 1.39)
pt3dadd(-547.66, -28.24, 13.71, 1.39)
pt3dadd(-547.51, -31.18, 13.71, 1.39)
pt3dadd(-547.68, -35, 13.71, 1.39)
pt3dadd(-546.39, -39.28, 13.71, 1.39)
pt3dadd(-546.9, -42.47, 13.71, 1.39)
pt3dadd(-545.83, -46.53, 13.71, 1.39)
pt3dadd(-545.72, -50.5, 13.71, 1.39)
pt3dadd(-545.26, -53.15, 13.71, 1.39)
pt3dadd(-545.93, -56.76, 13.71, 1.39)
pt3dadd(-546.76, -60.18, 13.71, 1.39)
pt3dadd(-546.85, -61.48, 13.71, 1.39)
pt3dadd(-545.39, -64.1, 13.71, 1.39)
pt3dadd(-545.22, -65.55, 20.56, 1.39)
pt3dadd(-543.29, -68.42, 24.47, 1.39)
pt3dadd(-540, -72.25, 29.37, 1.39)
pt3dadd(-538.6, -73, 35.24, 1.39)
pt3dadd(-538.97, -76.95, 36.22, 1.39)
pt3dadd(-537.95, -79.95, 42.1, 1.39)
pt3dadd(-537.95, -79.95, 43.08, 1.39)
pt3dadd(-534.05, -83.59, 45.03, 1.39)
pt3dadd(-534.23, -87.94, 44.05, 1.39)
pt3dadd(-534.55, -90.37, 47.97, 1.39)
}
dend[73] {pt3dclear()
pt3dadd(-534.55, -90.37, 47.97, 1.04)
pt3dadd(-536.98, -91.68, 48.95, 1.04)
pt3dadd(-537.17, -95.55, 48.95, 1.04)
pt3dadd(-536.89, -98.31, 48.95, 1.04)
pt3dadd(-541.74, -99.7, 53.84, 1.04)
pt3dadd(-541.81, -101.14, 53.84, 1.04)
pt3dadd(-544.4, -102.46, 53.84, 1.04)
pt3dadd(-547.17, -104.14, 60.7, 1.04)
pt3dadd(-547.86, -106.35, 63.63, 0.7)
pt3dadd(-547.11, -109.67, 63.63, 0.7)
pt3dadd(-547.55, -112.71, 66.57, 0.7)
pt3dadd(-548.55, -115.75, 67.55, 0.7)
pt3dadd(-550.97, -118.3, 67.55, 0.7)
pt3dadd(-550.48, -120.47, 67.55, 0.7)
pt3dadd(-549.52, -121.14, 71.47, 0.7)
pt3dadd(-550.85, -122.81, 71.47, 0.7)
pt3dadd(-553.33, -124.01, 71.47, 0.7)
pt3dadd(-553.66, -126.5, 71.47, 0.7)
pt3dadd(-553.34, -129.9, 71.47, 0.7)
pt3dadd(-551.04, -132.12, 71.47, 0.7)
pt3dadd(-549.51, -135.17, 71.47, 0.7)
pt3dadd(-547.64, -137.48, 78.32, 0.7)
pt3dadd(-546.7, -139.65, 78.32, 0.7)
pt3dadd(-546.46, -141.6, 85.17, 0.7)
pt3dadd(-546.48, -143.79, 85.17, 0.7)
pt3dadd(-545.01, -146.97, 83.21, 0.7)
pt3dadd(-544.71, -147.75, 83.21, 0.7)
pt3dadd(-544.31, -149.96, 83.21, 0.7)
pt3dadd(-543.39, -151.59, 83.21, 0.7)
pt3dadd(-542.68, -152.88, 83.21, 0.7)
pt3dadd(-541.43, -155.59, 83.21, 0.7)
pt3dadd(-540.39, -158.02, 86.15, 0.7)
pt3dadd(-541.59, -159.75, 86.15, 0.7)
pt3dadd(-541.79, -161, 86.15, 0.7)
pt3dadd(-542.38, -165.28, 88.11, 0.7)
pt3dadd(-541.93, -166.85, 89.09, 0.7)
pt3dadd(-543.05, -169.66, 89.09, 0.7)
pt3dadd(-541.61, -173.54, 89.09, 0.7)
pt3dadd(-539.62, -177.96, 89.09, 0.7)
pt3dadd(-538.95, -181.14, 89.09, 0.7)
pt3dadd(-535.01, -182.99, 89.09, 0.7)
pt3dadd(-529.19, -184.42, 89.09, 0.7)
pt3dadd(-524.79, -184.64, 93, 0.7)
pt3dadd(-521.73, -185.47, 93, 0.7)
pt3dadd(-519.46, -186.98, 94.96, 0.7)
pt3dadd(-516.88, -188.77, 94.96, 0.7)
pt3dadd(-515.29, -188.03, 94.96, 0.7)
pt3dadd(-512.44, -189.45, 94.96, 0.7)
pt3dadd(-510.04, -189.98, 94.96, 0.7)
pt3dadd(-508.07, -191.6, 94.96, 0.7)
pt3dadd(-505.72, -191.15, 94.96, 0.7)
pt3dadd(-503.89, -193.07, 94.96, 0.7)
pt3dadd(-501.54, -196.37, 94.96, 0.7)
pt3dadd(-498.33, -196.26, 96.92, 0.7)
pt3dadd(-493.99, -198.35, 100.84, 0.7)
pt3dadd(-490.99, -198.34, 101.82, 0.7)
pt3dadd(-490.1, -200.57, 101.82, 0.7)
pt3dadd(-490.12, -201.18, 101.82, 0.7)
pt3dadd(-487.63, -201.3, 101.82, 0.7)
pt3dadd(-486.01, -200.2, 103.77, 0.7)
pt3dadd(-484.37, -201.32, 103.77, 0.7)
pt3dadd(-482.67, -200.55, 103.77, 0.7)
pt3dadd(-480.46, -202.55, 107.69, 0.35)
pt3dadd(-480.24, -202.82, 107.69, 0.35)
pt3dadd(-475.66, -202.5, 108.67, 0.35)
pt3dadd(-470.93, -202.51, 108.67, 0.35)
pt3dadd(-467.35, -202.93, 110.63, 0.35)
pt3dadd(-467.35, -202.93, 111.61, 0.35)
pt3dadd(-463.6, -203.71, 111.61, 0.35)
pt3dadd(-462.34, -205.84, 111.61, 0.35)
pt3dadd(-461.35, -207.48, 111.61, 0.35)
pt3dadd(-459.73, -207.81, 111.61, 0.35)
pt3dadd(-458.04, -210.6, 111.61, 0.35)
pt3dadd(-455.8, -211.7, 111.61, 0.35)
pt3dadd(-453.7, -211.44, 114.54, 0.35)
pt3dadd(-452.09, -214.23, 115.52, 0.35)
pt3dadd(-449.18, -213.34, 116.5, 0.35)
pt3dadd(-447.19, -214.43, 116.5, 0.35)
pt3dadd(-443.62, -213.9, 119.44, 0.35)
pt3dadd(-440.23, -214.9, 120.42, 0.35)
pt3dadd(-436.29, -216.23, 120.42, 0.35)
pt3dadd(-432.35, -219.03, 120.42, 0.35)
pt3dadd(-430.72, -219.56, 127.27, 0.35)
pt3dadd(-427.81, -218.77, 128.25, 0.35)
pt3dadd(-424.78, -218.34, 127.27, 0.35)
pt3dadd(-421.67, -218.23, 126.29, 0.35)
}
dend[74] {pt3dclear()
pt3dadd(-421.67, -218.23, 126.29, 0.35)
pt3dadd(-419.04, -221.75, 130.21, 0.35)
pt3dadd(-414.26, -224.58, 130.21, 0.35)
pt3dadd(-411.35, -228.28, 130.21, 0.35)
pt3dadd(-408.03, -231.89, 130.21, 0.35)
pt3dadd(-405.34, -234.31, 130.21, 0.35)
pt3dadd(-404.56, -238.15, 131.19, 0.35)
pt3dadd(-403.37, -243.27, 131.19, 0.35)
pt3dadd(-399.32, -247.83, 131.19, 0.35)
pt3dadd(-398.88, -250.83, 131.19, 0.35)
pt3dadd(-396.88, -254.21, 131.19, 0.35)
pt3dadd(-395.52, -260.46, 131.19, 0.35)
pt3dadd(-394.26, -267.12, 131.19, 0.35)
pt3dadd(-393.85, -273.19, 131.19, 0.35)
pt3dadd(-394.72, -276.83, 131.19, 0.35)
pt3dadd(-395.99, -279.64, 131.19, 0.35)
pt3dadd(-394.66, -282.4, 130.21, 0.35)
pt3dadd(-393.74, -284.93, 129.23, 0.35)
pt3dadd(-395.69, -285.8, 119.44, 0.35)
}
dend[75] {pt3dclear()
pt3dadd(-421.67, -218.23, 126.29, 0.35)
pt3dadd(-417.05, -218.32, 126.29, 0.35)
pt3dadd(-412.9, -219.94, 126.29, 0.35)
pt3dadd(-410.9, -219.01, 126.29, 0.35)
pt3dadd(-409.04, -217.72, 126.29, 0.35)
pt3dadd(-406.12, -217.38, 126.29, 0.35)
pt3dadd(-403.88, -219.03, 125.31, 0.35)
pt3dadd(-399.75, -217.17, 125.31, 0.35)
pt3dadd(-397.06, -217.45, 125.31, 0.35)
pt3dadd(-394.22, -218.95, 125.31, 0.35)
pt3dadd(-393.03, -219.49, 125.31, 0.35)
pt3dadd(-391.02, -218.54, 125.31, 0.35)
pt3dadd(-387, -217.88, 125.31, 0.35)
pt3dadd(-382.37, -216.7, 125.31, 0.35)
pt3dadd(-378.42, -214.59, 125.31, 0.35)
pt3dadd(-372.31, -215.77, 125.31, 0.35)
pt3dadd(-367.06, -215.95, 125.31, 0.35)
pt3dadd(-363.16, -215.74, 125.31, 0.35)
pt3dadd(-358.22, -214.62, 129.23, 0.35)
pt3dadd(-356.38, -217.81, 129.23, 0.35)
pt3dadd(-351.76, -217.78, 129.23, 0.35)
pt3dadd(-345.57, -217.01, 129.23, 0.35)
pt3dadd(-338.85, -215, 129.23, 0.35)
pt3dadd(-334.59, -216.26, 130.21, 0.35)
pt3dadd(-329.12, -214.74, 130.21, 0.35)
pt3dadd(-323.52, -213.99, 130.21, 0.35)
pt3dadd(-319.27, -215.2, 130.21, 0.35)
pt3dadd(-314.9, -215.95, 130.21, 0.35)
pt3dadd(-311.14, -214, 130.21, 0.35)
pt3dadd(-307.44, -211.32, 130.21, 0.35)
pt3dadd(-306.07, -212.64, 130.21, 0.35)
pt3dadd(-301.77, -211.97, 130.21, 0.35)
pt3dadd(-297.59, -210.63, 130.21, 0.35)
pt3dadd(-293.37, -210.08, 130.21, 0.35)
pt3dadd(-288.85, -210.07, 131.19, 0.35)
pt3dadd(-283.84, -212.45, 131.19, 0.35)
}
dend[76] {pt3dclear()
pt3dadd(-534.55, -90.37, 47.97, 0.7)
pt3dadd(-535.35, -93.84, 40.14, 0.7)
pt3dadd(-536.89, -96.98, 40.14, 0.7)
pt3dadd(-537.18, -102.38, 40.14, 0.7)
pt3dadd(-537.61, -108.43, 39.16, 0.7)
pt3dadd(-538.02, -113.27, 39.16, 0.7)
pt3dadd(-537.32, -117.22, 39.16, 0.7)
pt3dadd(-537.71, -121.75, 40.14, 0.7)
pt3dadd(-536.61, -127.05, 40.14, 0.7)
pt3dadd(-535.51, -130.06, 40.14, 0.7)
pt3dadd(-535.85, -132.44, 40.14, 0.7)
pt3dadd(-534.68, -136.82, 40.14, 0.7)
pt3dadd(-532.44, -143.65, 40.14, 0.7)
pt3dadd(-529.12, -148.26, 40.14, 0.7)
pt3dadd(-525.87, -151.1, 40.14, 0.7)
pt3dadd(-524.35, -155.16, 40.14, 0.7)
pt3dadd(-522.22, -159.65, 38.18, 0.7)
pt3dadd(-519.56, -164.61, 37.2, 0.7)
pt3dadd(-516.63, -167.35, 37.2, 0.7)
pt3dadd(-516.05, -170.44, 37.2, 0.7)
pt3dadd(-515.15, -173.7, 37.2, 0.7)
pt3dadd(-511.88, -174.54, 37.2, 0.7)
pt3dadd(-509.5, -176.76, 37.2, 0.7)
}
}
proc shape3d_15() {
dend[76] { pt3dadd(-508.48, -178.44, 37.2, 0.7)
pt3dadd(-506.58, -179.71, 37.2, 0.7)
pt3dadd(-506.33, -179.96, 37.2, 0.7)
pt3dadd(-504.52, -182.31, 37.2, 0.7)
pt3dadd(-502.18, -186.53, 36.22, 0.7)
pt3dadd(-501.63, -189.8, 36.22, 0.7)
pt3dadd(-497.5, -192.65, 36.22, 0.7)
pt3dadd(-495.99, -197.21, 36.22, 0.7)
pt3dadd(-493.3, -200.11, 31.33, 0.7)
}
dend[77] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-533.16, 40.49, 2.94, 5.92)
pt3dadd(-534.77, 38.43, 2.94, 5.22)
pt3dadd(-538.06, 35.18, 2.94, 4.87)
pt3dadd(-540.94, 31.84, 2.94, 4.18)
pt3dadd(-543.22, 28.32, 2.94, 3.48)
pt3dadd(-543.81, 27.11, 2.94, 3.48)
pt3dadd(-546.15, 26.18, 2.94, 3.48)
pt3dadd(-547.94, 24.22, 7.83, 3.13)
pt3dadd(-548.71, 20.79, 7.83, 3.13)
pt3dadd(-549.64, 17.62, 7.83, 3.13)
pt3dadd(-552.2, 14.93, 12.73, 2.78)
pt3dadd(-555.11, 12.83, 14.68, 2.78)
pt3dadd(-555.97, 10.16, 14.68, 2.78)
pt3dadd(-558.71, 8.22, 19.58, 2.78)
pt3dadd(-559.28, 5.69, 16.64, 2.78)
}
dend[78] {pt3dclear()
pt3dadd(-559.28, 5.69, 16.64, 1.04)
pt3dadd(-559.38, 2.51, 19.58, 1.04)
pt3dadd(-557.9, -0.17, 19.58, 1.04)
pt3dadd(-557.8, -4.21, 24.47, 1.04)
pt3dadd(-559.67, -9.17, 24.47, 1.04)
pt3dadd(-561.26, -14.4, 24.47, 1.04)
pt3dadd(-563.83, -18.98, 24.47, 1.04)
pt3dadd(-564.54, -22.36, 24.47, 1.04)
pt3dadd(-564.95, -28.37, 24.47, 1.04)
pt3dadd(-569.49, -32.19, 23.5, 1.04)
pt3dadd(-572.9, -35.84, 23.5, 1.04)
pt3dadd(-572.9, -35.84, 22.52, 1.04)
pt3dadd(-574.81, -40.66, 22.52, 1.04)
pt3dadd(-574.56, -40.91, 22.52, 1.04)
pt3dadd(-576.86, -43.76, 22.52, 1.04)
pt3dadd(-578.22, -49.3, 22.52, 1.04)
pt3dadd(-579.15, -53.18, 15.66, 1.04)
pt3dadd(-578.23, -55.78, 15.66, 1.04)
pt3dadd(-579.5, -59.72, 14.68, 1.04)
pt3dadd(-579.59, -63.38, 14.68, 1.04)
pt3dadd(-582.03, -70.43, 14.68, 1.04)
pt3dadd(-584.39, -78.73, 14.68, 1.04)
pt3dadd(-588.9, -82.39, 14.68, 1.04)
pt3dadd(-588.72, -87.73, 14.68, 1.04)
pt3dadd(-589.23, -91.41, 15.66, 1.04)
pt3dadd(-591.04, -93.84, 15.66, 1.04)
pt3dadd(-591.59, -97.05, 15.66, 1.04)
pt3dadd(-593.34, -100.48, 15.66, 1.04)
pt3dadd(-594.56, -106.31, 15.66, 1.04)
pt3dadd(-596.69, -110.11, 15.66, 1.04)
pt3dadd(-597.6, -114.17, 19.58, 0.7)
pt3dadd(-598.95, -116.99, 19.58, 0.7)
pt3dadd(-600.06, -122.71, 17.62, 0.7)
pt3dadd(-601.77, -126.74, 18.6, 0.7)
pt3dadd(-602.84, -129.9, 18.6, 0.7)
}
dend[79] {pt3dclear()
pt3dadd(-559.28, 5.69, 16.64, 2.78)
pt3dadd(-555.82, 5.46, 26.43, 2.78)
pt3dadd(-554.36, 6.89, 34.26, 2.44)
pt3dadd(-555.67, 8.47, 41.12, 2.44)
pt3dadd(-554.47, 11.28, 41.12, 2.44)
pt3dadd(-555.6, 12.61, 45.03, 2.09)
pt3dadd(-557.66, 13.38, 49.93, 1.74)
}
dend[80] {pt3dclear()
pt3dadd(-557.66, 13.38, 49.93, 1.04)
pt3dadd(-558.38, 10.53, 53.84, 1.04)
pt3dadd(-559.78, 7.03, 56.78, 1.04)
pt3dadd(-562.62, 4.56, 56.78, 1.04)
pt3dadd(-564.84, 3.35, 63.63, 1.04)
pt3dadd(-566.14, 3.46, 63.63, 1.04)
pt3dadd(-568.45, 2.37, 63.63, 1.04)
pt3dadd(-568.09, -0.55, 68.53, 1.04)
pt3dadd(-570.32, -2.07, 68.53, 1.04)
pt3dadd(-570.58, -2.92, 68.53, 1.04)
pt3dadd(-570.1, -5, 68.53, 1.04)
pt3dadd(-570.14, -7.53, 68.53, 1.04)
pt3dadd(-572.42, -10.81, 68.53, 1.04)
pt3dadd(-574.06, -12.82, 68.53, 1.04)
pt3dadd(-573.75, -15.44, 68.53, 1.04)
pt3dadd(-573.35, -18.44, 72.45, 1.39)
pt3dadd(-572.97, -21.9, 73.42, 1.39)
pt3dadd(-573.52, -25.15, 73.42, 1.39)
pt3dadd(-573.49, -27.5, 76.36, 1.04)
pt3dadd(-573.57, -30.05, 79.3, 1.04)
pt3dadd(-572.85, -31.83, 79.3, 1.04)
pt3dadd(-571.51, -34.16, 80.28, 1.04)
pt3dadd(-570.7, -35.82, 85.17, 1.04)
pt3dadd(-573.24, -38.54, 85.17, 1.04)
pt3dadd(-571.82, -41.17, 85.17, 1.04)
pt3dadd(-571.19, -42.02, 86.15, 1.04)
pt3dadd(-570.98, -43.26, 84.19, 1.04)
pt3dadd(-568.94, -43.62, 83.21, 0.7)
pt3dadd(-569.86, -45.82, 85.17, 0.7)
pt3dadd(-570.03, -47.04, 89.09, 0.7)
pt3dadd(-570.93, -49.22, 93, 0.7)
pt3dadd(-572.59, -51.63, 93, 0.7)
pt3dadd(-572.59, -55.89, 94.96, 0.7)
pt3dadd(-571.79, -59.79, 94.96, 0.7)
pt3dadd(-571.08, -63.82, 99.86, 0.7)
pt3dadd(-571.9, -67.29, 103.77, 0.7)
pt3dadd(-569.95, -68.56, 106.71, 0.7)
pt3dadd(-568.81, -68.3, 106.71, 0.7)
}
dend[81] {pt3dclear()
pt3dadd(-568.81, -68.3, 106.71, 0.7)
pt3dadd(-570.28, -71.82, 107.69, 0.7)
pt3dadd(-570.09, -76.32, 107.69, 0.7)
pt3dadd(-572.21, -78.16, 107.69, 0.7)
pt3dadd(-572.07, -78.69, 108.67, 0.7)
pt3dadd(-571.66, -80.33, 111.61, 0.7)
pt3dadd(-569.73, -83.89, 113.56, 0.7)
pt3dadd(-567.58, -85.45, 113.56, 0.7)
pt3dadd(-566.22, -85.71, 115.52, 0.7)
pt3dadd(-564.5, -88.54, 115.52, 0.7)
pt3dadd(-563.34, -90.96, 115.52, 0.7)
pt3dadd(-563.23, -93.36, 115.52, 0.7)
pt3dadd(-561.5, -95.69, 115.52, 0.7)
pt3dadd(-561.68, -99.84, 120.42, 0.7)
pt3dadd(-561.01, -103.08, 121.4, 0.7)
pt3dadd(-558.98, -105.94, 121.4, 0.7)
pt3dadd(-558.29, -108.34, 121.4, 0.7)
pt3dadd(-558.98, -110.3, 118.46, 0.7)
pt3dadd(-556.6, -114.32, 117.48, 0.7)
pt3dadd(-556.29, -115.85, 117.48, 0.7)
pt3dadd(-556, -119.35, 117.48, 0.7)
pt3dadd(-556.09, -122.37, 117.48, 0.7)
pt3dadd(-553.34, -123.37, 122.37, 0.7)
pt3dadd(-551.7, -125.77, 122.37, 0.7)
pt3dadd(-549.22, -128.33, 122.37, 0.7)
pt3dadd(-545.07, -129.18, 122.37, 0.7)
pt3dadd(-543.64, -130.93, 125.31, 0.7)
pt3dadd(-542.92, -134.12, 125.31, 0.7)
pt3dadd(-540.09, -135.06, 125.31, 0.7)
pt3dadd(-537.16, -135.68, 129.23, 0.35)
pt3dadd(-537.25, -139.58, 129.23, 0.35)
pt3dadd(-535.37, -143.12, 129.23, 0.35)
pt3dadd(-534.98, -146.52, 129.23, 0.35)
pt3dadd(-534.15, -147.22, 135.1, 0.35)
pt3dadd(-533.57, -147.53, 135.1, 0.35)
pt3dadd(-531.28, -148.48, 136.08, 0.35)
pt3dadd(-530.92, -149.45, 136.08, 0.35)
pt3dadd(-527.5, -148.76, 136.08, 0.35)
pt3dadd(-526.61, -148.94, 136.08, 0.35)
pt3dadd(-524.75, -150.4, 134.13, 0.35)
pt3dadd(-522.78, -152.08, 134.13, 0.35)
pt3dadd(-522.4, -152.26, 134.13, 0.35)
pt3dadd(-517.8, -153.88, 135.11, 0.35)
pt3dadd(-517.11, -157.5, 137.07, 0.35)
pt3dadd(-515.41, -160.58, 139.03, 0.35)
pt3dadd(-513.83, -161.89, 140.01, 0.35)
pt3dadd(-510.57, -162.6, 140.98, 0.35)
pt3dadd(-508.35, -164.33, 140.98, 0.35)
pt3dadd(-506.26, -165.68, 141.96, 0.35)
pt3dadd(-504.73, -165.19, 145.88, 0.35)
pt3dadd(-502.48, -167.08, 145.88, 0.35)
pt3dadd(-501.88, -169.21, 145.88, 0.35)
pt3dadd(-498.68, -171.22, 148.82, 0.35)
pt3dadd(-498.09, -173.56, 151.75, 0.35)
pt3dadd(-496.37, -174.03, 152.73, 0.35)
pt3dadd(-494.46, -173.91, 152.73, 0.35)
pt3dadd(-492.64, -175.63, 152.73, 0.35)
pt3dadd(-494.34, -178.96, 153.71, 0.35)
pt3dadd(-492.78, -180.47, 154.69, 0.35)
pt3dadd(-489.89, -181.47, 154.69, 0.35)
pt3dadd(-489.97, -183.43, 154.69, 0.35)
pt3dadd(-488.91, -186.09, 154.69, 0.35)
pt3dadd(-487.12, -187.37, 158.61, 0.35)
pt3dadd(-486.32, -190.43, 158.61, 0.35)
pt3dadd(-487.77, -193.51, 158.61, 0.35)
pt3dadd(-487.02, -195.49, 158.61, 0.35)
pt3dadd(-486.64, -197.77, 158.61, 0.35)
pt3dadd(-487.02, -199.44, 158.61, 0.35)
pt3dadd(-485.43, -202.54, 161.54, 0.35)
pt3dadd(-484.77, -205.32, 161.54, 0.35)
pt3dadd(-484.47, -208.4, 161.54, 0.35)
pt3dadd(-484.82, -211.48, 161.54, 0.35)
pt3dadd(-483.27, -215.27, 161.54, 0.35)
pt3dadd(-481.83, -218.59, 161.54, 0.35)
pt3dadd(-482.62, -222.41, 162.52, 0.35)
pt3dadd(-479.02, -223.11, 162.52, 0.35)
pt3dadd(-478.39, -226.88, 162.52, 0.35)
pt3dadd(-479.87, -230.56, 162.52, 0.35)
pt3dadd(-480.8, -232.2, 162.52, 0.35)
pt3dadd(-481.61, -232.34, 169.38, 0.35)
}
dend[82] {pt3dclear()
pt3dadd(-568.81, -68.3, 106.71, 0.35)
pt3dadd(-568.2, -65.28, 105.73, 0.35)
pt3dadd(-569.77, -65.37, 110.63, 0.35)
pt3dadd(-567.9, -65.91, 115.52, 0.35)
pt3dadd(-566.07, -65.48, 118.46, 0.35)
pt3dadd(-566.42, -62.46, 119.44, 0.35)
pt3dadd(-564.68, -63.22, 124.33, 0.35)
pt3dadd(-564.43, -61.51, 129.23, 0.35)
pt3dadd(-563.71, -59.92, 131.19, 0.35)
pt3dadd(-563.09, -60.1, 131.19, 0.35)
pt3dadd(-560.86, -60.68, 131.19, 0.35)
pt3dadd(-558.25, -58.48, 131.19, 0.35)
pt3dadd(-555.9, -55.64, 137.06, 0.35)
pt3dadd(-553.01, -53.84, 137.06, 0.35)
pt3dadd(-549.67, -52.11, 138.04, 0.35)
}
}
proc shape3d_16() {
dend[82] { pt3dadd(-549.45, -51.08, 145.87, 0.35)
pt3dadd(-553.57, -52.9, 151.74, 0.35)
pt3dadd(-555.51, -54.41, 154.68, 0.35)
pt3dadd(-557.13, -56.73, 154.68, 0.35)
pt3dadd(-558.43, -59.53, 155.66, 0.35)
pt3dadd(-558.71, -62.12, 155.66, 0.35)
pt3dadd(-557.61, -64.77, 155.66, 0.35)
pt3dadd(-555.49, -67.48, 155.66, 0.35)
pt3dadd(-553.68, -68.25, 158.6, 0.35)
pt3dadd(-550.92, -66.16, 161.53, 0.35)
pt3dadd(-547.4, -66.71, 163.49, 0.35)
pt3dadd(-545.86, -67.14, 168.39, 0.35)
pt3dadd(-543.89, -65.82, 168.39, 0.35)
pt3dadd(-541.75, -66.85, 173.28, 0.35)
pt3dadd(-539.5, -66.05, 173.28, 0.35)
pt3dadd(-538.33, -67.83, 173.28, 0.35)
pt3dadd(-537.13, -67.68, 175.24, 0.35)
pt3dadd(-535.91, -67.38, 176.22, 0.35)
pt3dadd(-534.15, -68.19, 176.22, 0.35)
pt3dadd(-532.55, -67.3, 176.22, 0.35)
pt3dadd(-531.17, -69.7, 183.07, 0.35)
pt3dadd(-530.8, -71.37, 183.07, 0.35)
pt3dadd(-528.29, -72.03, 183.07, 0.35)
pt3dadd(-527.6, -72.47, 183.07, 0.35)
pt3dadd(-526.93, -75.03, 185.03, 0.35)
pt3dadd(-525.14, -76.15, 186.99, 0.35)
pt3dadd(-524.34, -77.19, 186.99, 0.35)
pt3dadd(-522.67, -75.8, 186.99, 0.35)
pt3dadd(-521.56, -76.68, 188.95, 0.35)
pt3dadd(-520.82, -77.02, 188.95, 0.35)
pt3dadd(-517.68, -78.43, 188.95, 0.35)
pt3dadd(-516.64, -79.85, 188.95, 0.35)
pt3dadd(-515.94, -80.91, 188.95, 0.35)
pt3dadd(-515.94, -81.62, 188.95, 0.35)
pt3dadd(-512.81, -82.32, 193.84, 0.35)
pt3dadd(-512.11, -83.74, 193.84, 0.35)
pt3dadd(-511.42, -83.74, 193.84, 0.35)
pt3dadd(-510.37, -83.74, 193.84, 0.35)
pt3dadd(-508.98, -86.21, 196.78, 0.35)
pt3dadd(-507.59, -86.21, 197.76, 0.35)
pt3dadd(-507.59, -87.63, 197.76, 0.35)
pt3dadd(-505.5, -87.63, 197.76, 0.35)
pt3dadd(-504.46, -88.69, 197.76, 0.35)
pt3dadd(-505.5, -90.1, 197.76, 0.35)
pt3dadd(-503.76, -90.81, 205.59, 0.35)
pt3dadd(-504.46, -95.06, 210.48, 0.35)
pt3dadd(-504.11, -95.76, 210.48, 0.35)
pt3dadd(-503.76, -97.89, 210.48, 0.35)
pt3dadd(-501.67, -98.24, 218.32, 0.35)
pt3dadd(-500.98, -100.36, 218.32, 0.35)
pt3dadd(-502.02, -101.07, 218.32, 0.35)
pt3dadd(-502.02, -101.07, 219.29, 0.35)
pt3dadd(-500.63, -102.48, 222.23, 0.35)
pt3dadd(-500.98, -103.55, 222.23, 0.35)
pt3dadd(-498.19, -104.61, 229.08, 0.35)
pt3dadd(-499.24, -106.02, 230.06, 0.35)
pt3dadd(-499.93, -107.44, 230.06, 0.35)
pt3dadd(-501.33, -109.21, 230.06, 0.35)
pt3dadd(-503.07, -109.21, 230.06, 0.35)
pt3dadd(-504.11, -110.62, 230.06, 0.35)
pt3dadd(-506.2, -112.04, 230.06, 0.35)
pt3dadd(-507.94, -112.04, 230.06, 0.35)
pt3dadd(-509.33, -110.62, 233.98, 0.35)
}
dend[83] {pt3dclear()
pt3dadd(-557.66, 13.38, 49.93, 1.39)
pt3dadd(-557.52, 15.92, 59.72, 1.39)
pt3dadd(-558.01, 17.61, 59.72, 1.04)
pt3dadd(-559.44, 20.4, 65.59, 1.04)
pt3dadd(-561.19, 21.15, 65.59, 1.04)
pt3dadd(-562.32, 23.82, 65.59, 1.04)
pt3dadd(-562.17, 25.6, 65.59, 1.04)
pt3dadd(-564.79, 27.07, 65.59, 1.04)
pt3dadd(-567.1, 29.92, 65.59, 1.04)
pt3dadd(-567.96, 32.73, 65.59, 1.04)
pt3dadd(-567.41, 35.39, 65.59, 1.04)
pt3dadd(-568.4, 35.83, 65.59, 1.04)
pt3dadd(-569.53, 36.52, 65.59, 1.04)
pt3dadd(-570.41, 37.8, 69.51, 1.04)
pt3dadd(-571.22, 39.95, 73.42, 1.04)
pt3dadd(-572.61, 41.53, 73.42, 1.04)
pt3dadd(-574.41, 43.23, 73.42, 1.04)
pt3dadd(-576.97, 45.73, 73.42, 1.04)
pt3dadd(-578.65, 48.98, 73.42, 1.04)
pt3dadd(-580.08, 52.89, 73.42, 1.04)
pt3dadd(-581.51, 57.18, 73.42, 1.04)
pt3dadd(-583.67, 59.62, 75.38, 1.04)
pt3dadd(-586.43, 61.96, 75.38, 0.7)
pt3dadd(-588.78, 63.8, 75.38, 0.7)
pt3dadd(-590.21, 65.36, 78.32, 0.7)
pt3dadd(-592, 68.52, 81.26, 0.7)
pt3dadd(-594.86, 71.29, 81.26, 0.7)
pt3dadd(-598.04, 74.32, 81.26, 0.7)
pt3dadd(-600.82, 74.17, 81.26, 0.7)
pt3dadd(-603.63, 74.74, 81.26, 0.7)
pt3dadd(-608.4, 75.99, 81.26, 0.7)
pt3dadd(-609.68, 78.3, 82.24, 0.7)
pt3dadd(-613.28, 80.54, 85.17, 0.7)
pt3dadd(-615.11, 81.97, 85.17, 0.7)
pt3dadd(-617.38, 85.58, 85.17, 0.7)
pt3dadd(-617.5, 86.85, 85.17, 0.7)
pt3dadd(-621.58, 90.28, 85.17, 0.7)
pt3dadd(-621.93, 93.56, 85.17, 0.7)
pt3dadd(-620.2, 95.37, 85.17, 0.7)
pt3dadd(-618.98, 97.43, 90.07, 0.7)
pt3dadd(-616.58, 100.22, 93.98, 0.7)
pt3dadd(-612.18, 101.19, 93.98, 0.7)
pt3dadd(-608.8, 102.47, 93.98, 0.7)
pt3dadd(-606.32, 105.64, 94.96, 0.7)
pt3dadd(-606.11, 105.36, 94.96, 0.7)
pt3dadd(-606.42, 107.15, 96.92, 0.7)
pt3dadd(-602.73, 110.22, 101.82, 0.7)
pt3dadd(-599.01, 113.81, 101.82, 0.7)
pt3dadd(-596.88, 116.65, 101.82, 0.7)
pt3dadd(-593.75, 119.72, 100.84, 0.35)
pt3dadd(-591.76, 123.72, 101.82, 0.35)
pt3dadd(-588.32, 127.03, 104.75, 0.35)
pt3dadd(-587.06, 128.93, 108.67, 0.35)
pt3dadd(-584.57, 130.65, 108.67, 0.35)
pt3dadd(-581.9, 131.7, 112.58, 0.35)
pt3dadd(-578.72, 133.59, 114.54, 0.35)
pt3dadd(-575.7, 138.01, 114.54, 0.35)
pt3dadd(-574.04, 141.76, 116.5, 0.35)
pt3dadd(-571.83, 143.71, 117.48, 0.35)
pt3dadd(-569.1, 145.25, 118.46, 0.35)
pt3dadd(-567.04, 145.94, 122.37, 0.35)
pt3dadd(-565.89, 148.12, 124.33, 0.35)
pt3dadd(-564.37, 149.9, 123.35, 0.35)
pt3dadd(-564.11, 150.44, 123.35, 0.35)
pt3dadd(-563.44, 152.78, 123.35, 0.35)
pt3dadd(-561.54, 152.01, 123.35, 0.35)
pt3dadd(-559.91, 153.45, 125.31, 0.35)
pt3dadd(-559.91, 153.45, 126.29, 0.35)
pt3dadd(-556.65, 153.82, 126.29, 0.35)
pt3dadd(-554.06, 153.39, 126.29, 0.35)
pt3dadd(-551.38, 153.96, 128.25, 0.35)
pt3dadd(-549.38, 151.88, 130.21, 0.35)
pt3dadd(-548.02, 150.92, 134.12, 0.35)
pt3dadd(-546.24, 149.57, 135.1, 0.35)
pt3dadd(-544.31, 150.05, 139.02, 0.35)
pt3dadd(-545.02, 153.52, 145.87, 0.35)
pt3dadd(-545.85, 155.05, 149.79, 0.35)
pt3dadd(-543.56, 155.12, 156.64, 0.35)
pt3dadd(-542.97, 156.65, 157.62, 0.35)
pt3dadd(-541.7, 159.1, 159.58, 0.35)
pt3dadd(-541.07, 162.58, 159.58, 0.35)
pt3dadd(-539.97, 162.64, 163.49, 0.35)
pt3dadd(-538.67, 162.58, 165.45, 0.35)
pt3dadd(-537.03, 161.78, 165.45, 0.35)
pt3dadd(-537.99, 158.63, 165.45, 0.35)
pt3dadd(-538.56, 155.57, 165.45, 0.35)
pt3dadd(-539.04, 151.98, 165.45, 0.35)
pt3dadd(-537.33, 150.49, 161.53, 0.35)
pt3dadd(-535.88, 146.86, 160.55, 0.35)
pt3dadd(-533.65, 144.43, 160.55, 0.35)
pt3dadd(-531.18, 145.56, 151.74, 0.35)
pt3dadd(-528.75, 142.92, 151.74, 0.35)
pt3dadd(-530.11, 139.71, 147.83, 0.35)
pt3dadd(-531, 138.27, 139.02, 0.35)
pt3dadd(-534.01, 137.15, 135.1, 0.35)
pt3dadd(-536.43, 135.71, 127.27, 0.35)
pt3dadd(-534.86, 133.04, 121.4, 0.35)
pt3dadd(-534.05, 128.33, 115.52, 0.35)
pt3dadd(-533.62, 126.51, 111.61, 0.35)
}
dend[84] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-531.54, 53.28, 3.92, 5.57)
pt3dadd(-534.37, 53.56, 4.89, 3.48)
pt3dadd(-536.47, 53.72, 7.83, 3.48)
pt3dadd(-538.84, 53.72, 8.81, 2.44)
pt3dadd(-541.12, 53.22, 8.81, 2.44)
pt3dadd(-542.82, 52.74, 8.81, 2.44)
pt3dadd(-543.89, 53.92, 8.81, 2.44)
pt3dadd(-545.38, 51.12, 11.75, 2.09)
pt3dadd(-546.52, 49.44, 11.75, 2.09)
pt3dadd(-548.23, 47.46, 11.75, 2.44)
}
dend[85] {pt3dclear()
pt3dadd(-548.23, 47.46, 11.75, 1.39)
pt3dadd(-550.36, 48.15, 12.73, 1.39)
pt3dadd(-552.98, 48.65, 12.73, 1.39)
pt3dadd(-556.22, 47.14, 16.64, 1.04)
pt3dadd(-557.68, 45.43, 16.64, 1.39)
pt3dadd(-559.94, 44.66, 17.62, 1.39)
pt3dadd(-561.66, 45.07, 16.64, 1.39)
pt3dadd(-564.19, 44.19, 16.64, 1.39)
pt3dadd(-566.29, 44.77, 16.64, 1.39)
pt3dadd(-567.96, 44.82, 15.66, 1.04)
pt3dadd(-569.57, 45.89, 16.64, 1.04)
pt3dadd(-572.69, 45.96, 16.64, 1.04)
pt3dadd(-574.44, 47.33, 16.64, 1.04)
pt3dadd(-577.13, 47.84, 16.64, 1.04)
pt3dadd(-579.55, 49.59, 16.64, 1.04)
pt3dadd(-580.21, 50.91, 16.64, 1.04)
pt3dadd(-582.14, 50.27, 16.64, 1.04)
pt3dadd(-584.26, 50.78, 19.58, 1.04)
pt3dadd(-587.27, 50.47, 20.56, 1.04)
pt3dadd(-589.74, 53.57, 23.5, 1.04)
pt3dadd(-591.32, 53.15, 23.5, 1.04)
pt3dadd(-593.21, 51.78, 27.41, 1.04)
pt3dadd(-594.57, 50.02, 27.41, 1.04)
pt3dadd(-595.67, 48.45, 28.39, 1.04)
pt3dadd(-597.81, 48.98, 28.39, 1.04)
pt3dadd(-599.27, 50.62, 32.31, 1.04)
pt3dadd(-601.5, 51.87, 32.31, 1.04)
}
}
proc shape3d_17() {
dend[85] { pt3dadd(-602.48, 50.64, 35.24, 1.04)
pt3dadd(-602.63, 49.02, 35.24, 1.04)
pt3dadd(-602.6, 47.79, 40.14, 1.04)
pt3dadd(-605.11, 50.05, 42.1, 1.04)
pt3dadd(-607.22, 54.42, 43.08, 1.04)
pt3dadd(-606.98, 54.17, 43.08, 1.04)
pt3dadd(-607.78, 51.66, 46.99, 1.04)
pt3dadd(-610.2, 51.91, 50.91, 1.04)
pt3dadd(-609.7, 49.63, 54.82, 1.04)
pt3dadd(-611.39, 49.13, 57.76, 1.04)
pt3dadd(-610.91, 47.45, 57.76, 1.04)
pt3dadd(-609.49, 46.31, 57.76, 1.04)
pt3dadd(-606.44, 46.25, 60.7, 1.04)
pt3dadd(-608.6, 44.09, 60.7, 0.7)
pt3dadd(-611.12, 44.95, 60.7, 0.7)
pt3dadd(-612.31, 43.8, 65.59, 0.7)
pt3dadd(-613.04, 43.36, 65.59, 0.7)
pt3dadd(-613.91, 41.02, 65.59, 0.7)
pt3dadd(-614.94, 41.54, 69.51, 0.7)
pt3dadd(-617.18, 40.39, 72.45, 0.7)
pt3dadd(-619.43, 40.9, 76.36, 0.7)
pt3dadd(-619.45, 42.42, 80.28, 0.7)
pt3dadd(-617.23, 43.43, 83.21, 0.7)
pt3dadd(-613.92, 44.98, 83.21, 0.7)
pt3dadd(-611.31, 46.92, 85.17, 0.7)
pt3dadd(-609.59, 46.89, 86.15, 0.7)
pt3dadd(-607.6, 48.02, 86.15, 0.7)
pt3dadd(-606.26, 49.78, 88.11, 0.7)
pt3dadd(-604.16, 50.68, 88.11, 0.7)
pt3dadd(-602.41, 53.4, 88.11, 0.7)
pt3dadd(-600.53, 56.43, 88.11, 0.7)
pt3dadd(-599.25, 58.98, 88.11, 0.7)
pt3dadd(-599.07, 61.55, 92.03, 0.7)
pt3dadd(-596.89, 64.38, 92.03, 0.7)
pt3dadd(-596.28, 66.64, 92.03, 0.7)
pt3dadd(-594.06, 68.93, 92.03, 0.7)
pt3dadd(-590.51, 70.99, 92.03, 0.7)
pt3dadd(-590.69, 75.85, 92.03, 0.7)
pt3dadd(-590.33, 77.06, 92.03, 0.35)
pt3dadd(-587.98, 78.55, 93, 0.35)
pt3dadd(-586.53, 82.37, 93, 0.35)
pt3dadd(-585.62, 85.96, 94.96, 0.35)
pt3dadd(-582.53, 89.32, 95.94, 0.35)
pt3dadd(-582.96, 93.69, 95.94, 0.35)
pt3dadd(-582.83, 98.84, 95.94, 0.35)
pt3dadd(-580.84, 102.86, 95.94, 0.35)
pt3dadd(-578.36, 106.81, 95.94, 0.35)
pt3dadd(-576.17, 107.8, 97.9, 0.35)
pt3dadd(-576.7, 109.41, 97.9, 0.35)
pt3dadd(-576.46, 112.34, 97.9, 0.35)
pt3dadd(-575.9, 114.77, 97.9, 0.35)
pt3dadd(-576.14, 117.32, 97.9, 0.35)
pt3dadd(-577.16, 119.39, 97.9, 0.35)
pt3dadd(-578.49, 122.03, 94.96, 0.35)
pt3dadd(-578.49, 122.03, 93.98, 0.35)
pt3dadd(-580.29, 124.68, 93.98, 0.35)
pt3dadd(-580.59, 128.15, 93.98, 0.35)
pt3dadd(-581.2, 130.35, 93, 0.35)
pt3dadd(-580.76, 133.51, 93, 0.35)
pt3dadd(-578.97, 136.41, 93, 0.35)
pt3dadd(-578.53, 141.41, 93, 0.35)
pt3dadd(-579.78, 145.45, 93, 0.35)
pt3dadd(-580.23, 149.32, 93, 0.35)
pt3dadd(-581.26, 153.1, 93, 0.35)
pt3dadd(-581.55, 156.19, 92.03, 0.35)
pt3dadd(-580.93, 158.55, 92.03, 0.35)
pt3dadd(-583.17, 160.85, 92.03, 0.35)
pt3dadd(-584.69, 162.77, 92.03, 0.35)
pt3dadd(-588.09, 161.92, 93, 0.35)
pt3dadd(-589.45, 163.2, 93, 0.35)
pt3dadd(-587.95, 166.44, 94.96, 0.35)
pt3dadd(-588.06, 169.61, 94.96, 0.35)
pt3dadd(-589.79, 172, 94.96, 0.35)
pt3dadd(-587.69, 176.42, 93.98, 0.35)
pt3dadd(-588.58, 177.95, 93.98, 0.35)
pt3dadd(-590.53, 179.27, 92.03, 0.35)
}
dend[86] {pt3dclear()
pt3dadd(-548.23, 47.46, 11.75, 1.39)
pt3dadd(-546.5, 45.25, 15.66, 1.39)
pt3dadd(-544.57, 43.51, 15.66, 1.39)
pt3dadd(-543.48, 41.91, 15.66, 1.39)
pt3dadd(-540.65, 40.21, 21.54, 1.39)
pt3dadd(-538.42, 40.23, 25.45, 1.39)
pt3dadd(-538.42, 40.23, 26.43, 1.39)
pt3dadd(-534.51, 38.56, 26.43, 1.39)
pt3dadd(-532.53, 35.38, 26.43, 1.39)
pt3dadd(-530.38, 33.28, 26.43, 1.04)
pt3dadd(-527.83, 31.72, 26.43, 1.04)
pt3dadd(-525.97, 29.97, 31.33, 1.04)
pt3dadd(-525.47, 26.95, 32.31, 1.04)
pt3dadd(-523.53, 24.72, 34.26, 1.04)
pt3dadd(-522.1, 22.06, 37.2, 1.04)
pt3dadd(-521.06, 19.65, 37.2, 1.04)
pt3dadd(-519.61, 17.91, 44.05, 1.04)
pt3dadd(-517.56, 16.49, 44.05, 1.04)
pt3dadd(-516.04, 15.81, 44.05, 1.04)
pt3dadd(-515.5, 13.6, 48.95, 1.04)
pt3dadd(-514.63, 11.3, 48.95, 1.04)
pt3dadd(-512.03, 10.91, 54.82, 1.04)
pt3dadd(-512.12, 7.74, 54.82, 1.04)
pt3dadd(-510.01, 7.36, 57.76, 1.04)
pt3dadd(-509.96, 5.08, 57.76, 1.04)
pt3dadd(-508.43, 4.48, 57.76, 1.04)
pt3dadd(-507.9, 1.92, 56.78, 1.04)
pt3dadd(-507.95, -0.81, 61.68, 1.04)
pt3dadd(-505.57, -2.03, 62.66, 1.04)
pt3dadd(-503.33, -4.45, 62.66, 1.04)
pt3dadd(-501.77, -7.54, 68.53, 1.04)
pt3dadd(-499.75, -9.21, 71.47, 1.04)
pt3dadd(-497.73, -12.27, 71.47, 1.04)
pt3dadd(-496.54, -15.25, 73.42, 1.04)
pt3dadd(-496.37, -16.29, 73.42, 0.7)
pt3dadd(-495.64, -18.37, 73.42, 0.7)
pt3dadd(-495.23, -20.34, 73.42, 0.7)
pt3dadd(-495.56, -23.48, 73.42, 0.7)
pt3dadd(-494.73, -26.52, 73.42, 0.7)
pt3dadd(-496.27, -28.78, 76.36, 0.7)
pt3dadd(-494.09, -31.31, 76.36, 0.7)
pt3dadd(-493.52, -33.74, 80.28, 0.7)
pt3dadd(-492.57, -35.41, 81.26, 0.7)
pt3dadd(-492.93, -37.62, 85.17, 0.7)
pt3dadd(-491.48, -39.27, 85.17, 0.7)
pt3dadd(-488.85, -40.3, 88.11, 0.7)
pt3dadd(-485.1, -40.65, 88.11, 0.7)
pt3dadd(-481.05, -42.15, 93.98, 0.7)
pt3dadd(-479.23, -40.16, 99.86, 0.7)
pt3dadd(-476.21, -39.21, 101.82, 0.7)
pt3dadd(-476.31, -36.95, 101.82, 0.7)
pt3dadd(-478.56, -37.71, 103.77, 0.7)
pt3dadd(-480.58, -38.23, 108.67, 0.7)
pt3dadd(-482.72, -39.73, 108.67, 0.35)
pt3dadd(-485.07, -37.86, 111.61, 0.35)
pt3dadd(-487.81, -35.95, 114.54, 0.35)
pt3dadd(-490.28, -37.7, 118.46, 0.35)
pt3dadd(-492.86, -40, 120.42, 0.35)
pt3dadd(-494.93, -38.72, 121.4, 0.35)
pt3dadd(-496.67, -40.22, 121.4, 0.35)
}
dend[87] {pt3dclear()
pt3dadd(-496.67, -40.22, 121.4, 0.35)
pt3dadd(-498.12, -41.81, 122.37, 0.35)
pt3dadd(-499.88, -43.92, 129.23, 0.35)
pt3dadd(-500.91, -45.5, 129.23, 0.35)
}
dend[88] {pt3dclear()
pt3dadd(-496.67, -40.22, 121.4, 0.35)
pt3dadd(-496.2, -40.92, 125.31, 0.35)
pt3dadd(-495.24, -42.9, 131.19, 0.35)
pt3dadd(-493.99, -44.71, 130.21, 0.35)
pt3dadd(-492.93, -48.14, 130.21, 0.35)
pt3dadd(-489.88, -49.61, 135.1, 0.35)
pt3dadd(-489.97, -49.84, 140, 0.35)
pt3dadd(-489.33, -49.99, 140, 0.35)
pt3dadd(-488.61, -53.21, 140, 0.35)
pt3dadd(-488.39, -55.87, 140, 0.35)
pt3dadd(-486.68, -58.66, 144.89, 0.35)
pt3dadd(-485.23, -59.76, 148.81, 0.35)
pt3dadd(-484.17, -61.53, 150.76, 0.35)
pt3dadd(-483.04, -61.06, 152.72, 0.35)
pt3dadd(-482.63, -62.86, 152.72, 0.35)
pt3dadd(-480.94, -64.85, 156.64, 0.35)
pt3dadd(-480.85, -66.25, 162.51, 0.35)
pt3dadd(-480.81, -68.51, 166.43, 0.35)
pt3dadd(-479.86, -70.36, 167.41, 0.35)
pt3dadd(-480.22, -71.69, 167.41, 0.35)
pt3dadd(-478.86, -74.37, 172.3, 0.35)
pt3dadd(-477.59, -74.05, 172.3, 0.35)
pt3dadd(-477.91, -76.62, 172.3, 0.35)
pt3dadd(-476.56, -77.37, 174.26, 0.35)
pt3dadd(-475.83, -78.97, 178.18, 0.35)
pt3dadd(-475.81, -78.62, 178.18, 0.35)
pt3dadd(-474.41, -79.43, 184.05, 0.35)
pt3dadd(-474.41, -81.6, 185.03, 0.35)
pt3dadd(-472.01, -81.34, 188.95, 0.35)
pt3dadd(-470.32, -84.62, 190.9, 0.35)
pt3dadd(-467.07, -85.71, 190.9, 0.35)
pt3dadd(-465.31, -88.57, 193.84, 0.35)
pt3dadd(-463.98, -90.99, 196.78, 0.35)
pt3dadd(-465.72, -92.14, 199.71, 0.35)
pt3dadd(-468.68, -93.55, 202.65, 0.35)
pt3dadd(-470.74, -92.47, 205.59, 0.35)
pt3dadd(-470.93, -93.02, 207.55, 0.35)
pt3dadd(-471.4, -95.47, 210.48, 0.35)
pt3dadd(-473.29, -94.44, 214.4, 0.35)
pt3dadd(-472.43, -93.7, 214.4, 0.35)
pt3dadd(-470.34, -93.7, 214.4, 0.35)
pt3dadd(-468.95, -92.29, 214.4, 0.35)
pt3dadd(-466.17, -90.87, 217.34, 0.35)
pt3dadd(-464.08, -90.52, 221.25, 0.35)
pt3dadd(-463.03, -88.75, 221.25, 0.35)
pt3dadd(-462.69, -88.75, 221.25, 0.35)
pt3dadd(-460.6, -88.4, 221.25, 0.35)
pt3dadd(-459.55, -86.63, 222.23, 0.35)
pt3dadd(-459.55, -86.63, 223.21, 0.35)
pt3dadd(-457.81, -85.92, 225.17, 0.35)
pt3dadd(-456.77, -82.38, 226.15, 0.35)
pt3dadd(-454.68, -82.38, 226.15, 0.35)
pt3dadd(-453.29, -80.61, 227.13, 0.35)
pt3dadd(-452.59, -78.85, 227.13, 0.35)
pt3dadd(-448.42, -76.02, 234.96, 0.35)
pt3dadd(-444.93, -73.89, 234.96, 0.35)
pt3dadd(-443.54, -72.83, 238.87, 0.35)
pt3dadd(-441.45, -73.19, 238.87, 0.35)
pt3dadd(-441.8, -69.65, 243.77, 0.35)
pt3dadd(-439.37, -68.94, 250.62, 0.35)
}
}
proc shape3d_18() {
dend[88] { pt3dadd(-438.67, -67.88, 250.62, 0.35)
pt3dadd(-437.28, -66.82, 250.62, 0.35)
}
dend[89] {pt3dclear()
pt3dadd(-437.28, -66.82, 250.62, 0.35)
pt3dadd(-435.75, -68.72, 249.64, 0.35)
pt3dadd(-435.75, -68.72, 248.66, 0.35)
pt3dadd(-434.7, -70.48, 248.66, 0.35)
pt3dadd(-434.35, -70.48, 248.66, 0.35)
pt3dadd(-432.61, -70.48, 248.66, 0.35)
pt3dadd(-430.52, -70.48, 248.66, 0.35)
pt3dadd(-427.74, -70.84, 248.66, 0.35)
pt3dadd(-424.75, -73.42, 247.69, 0.35)
pt3dadd(-425.45, -76.61, 247.69, 0.35)
pt3dadd(-426.15, -79.08, 247.69, 0.35)
pt3dadd(-427.89, -79.44, 247.69, 0.35)
pt3dadd(-427.54, -81.21, 247.69, 0.35)
pt3dadd(-426.84, -84.04, 247.69, 0.35)
pt3dadd(-427.89, -86.87, 247.69, 0.35)
pt3dadd(-427.19, -89.34, 247.69, 0.35)
pt3dadd(-426.49, -91.82, 247.69, 0.35)
pt3dadd(-426.15, -94.29, 247.69, 0.35)
pt3dadd(-426.15, -96.77, 247.69, 0.35)
pt3dadd(-427.19, -98.89, 247.69, 0.35)
pt3dadd(-427.89, -100.66, 247.69, 0.35)
pt3dadd(-428.93, -103.14, 247.69, 0.35)
pt3dadd(-430.32, -107.03, 239.85, 0.35)
pt3dadd(-430.32, -108.8, 239.85, 0.35)
pt3dadd(-430.39, -111.52, 234.96, 0.35)
pt3dadd(-431.78, -113.29, 234.96, 0.35)
pt3dadd(-430.73, -117.54, 234.96, 0.35)
pt3dadd(-433.17, -118.6, 234.96, 0.35)
pt3dadd(-434.21, -121.78, 231.04, 0.35)
pt3dadd(-435.61, -126.73, 230.06, 0.35)
pt3dadd(-436.65, -128.86, 230.06, 0.35)
pt3dadd(-436.65, -130.27, 230.06, 0.35)
pt3dadd(-434.56, -129.92, 223.21, 0.35)
pt3dadd(-433.52, -129.21, 223.21, 0.35)
}
dend[90] {pt3dclear()
pt3dadd(-437.28, -66.82, 250.62, 0.35)
pt3dadd(-437.83, -64.47, 250.62, 0.35)
pt3dadd(-437.14, -63.06, 250.62, 0.35)
pt3dadd(-436.79, -63.06, 250.62, 0.35)
pt3dadd(-434.35, -63.76, 250.62, 0.35)
pt3dadd(-431.22, -64.12, 250.62, 0.35)
pt3dadd(-430.87, -65.53, 255.52, 0.35)
}
dend[91] {pt3dclear()
pt3dadd(-437.28, -66.82, 250.62, 0.35)
pt3dadd(-439.71, -66.47, 250.62, 0.35)
pt3dadd(-441.8, -63.99, 250.62, 0.35)
pt3dadd(-440.41, -61.16, 253.56, 0.35)
pt3dadd(-441.45, -57.62, 253.56, 0.35)
pt3dadd(-441.8, -55.15, 253.56, 0.35)
pt3dadd(-442.15, -54.09, 265.31, 0.35)
pt3dadd(-445.98, -55.5, 265.31, 0.35)
pt3dadd(-448.76, -53.38, 270.2, 0.35)
pt3dadd(-450.5, -54.09, 270.2, 0.35)
pt3dadd(-453.98, -52.67, 270.2, 0.35)
pt3dadd(-455.72, -51.61, 270.2, 0.35)
pt3dadd(-456.42, -49.49, 271.18, 0.35)
pt3dadd(-459.21, -48.07, 276.08, 0.35)
pt3dadd(-461.29, -45.24, 276.08, 0.35)
}
dend[92] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-526.33, 56.49, 2.94, 7.31)
pt3dadd(-527.26, 62.12, 2.94, 6.61)
pt3dadd(-528.88, 64.45, 6.85, 4.18)
pt3dadd(-529.84, 67.42, 7.83, 3.48)
pt3dadd(-530.68, 69.79, 7.83, 3.48)
pt3dadd(-532.02, 71.98, 7.83, 3.83)
pt3dadd(-533.13, 73.65, 7.83, 2.09)
pt3dadd(-533.57, 75.39, 7.83, 2.09)
pt3dadd(-535.73, 76.83, 7.83, 2.09)
pt3dadd(-537.48, 78.76, 4.89, 2.44)
pt3dadd(-538.02, 81.39, 4.89, 2.44)
pt3dadd(-539.91, 85.14, 4.89, 2.44)
pt3dadd(-541.33, 88.93, 3.92, 2.44)
pt3dadd(-542.24, 91.63, 9.79, 2.44)
pt3dadd(-542.33, 94.57, 10.77, 2.44)
pt3dadd(-544, 95.94, 10.77, 2.44)
pt3dadd(-544.81, 99.28, 10.77, 2.44)
pt3dadd(-545.08, 101.97, 10.77, 2.44)
pt3dadd(-546.48, 104.66, 10.77, 2.44)
}
dend[93] {pt3dclear()
pt3dadd(-546.48, 104.66, 10.77, 1.39)
pt3dadd(-545.89, 108.42, 10.77, 1.39)
pt3dadd(-545.97, 112.34, 10.77, 1.39)
pt3dadd(-546.65, 116.23, 10.77, 1.39)
pt3dadd(-548.39, 118.66, 10.77, 1.39)
pt3dadd(-549.68, 121.47, 10.77, 1.39)
pt3dadd(-550.79, 124.31, 10.77, 1.39)
pt3dadd(-552.9, 126.64, 10.77, 1.39)
pt3dadd(-554.29, 129.91, 10.77, 1.39)
pt3dadd(-555.4, 133.1, 11.75, 1.39)
pt3dadd(-556.83, 136.61, 11.75, 1.39)
pt3dadd(-559.23, 139.3, 11.75, 1.39)
pt3dadd(-560.09, 142.53, 11.75, 1.39)
pt3dadd(-561.52, 145.54, 11.75, 1.04)
pt3dadd(-562.02, 147.25, 11.75, 1.39)
pt3dadd(-563.14, 151.68, 11.75, 1.39)
pt3dadd(-565.54, 154.43, 11.75, 1.39)
pt3dadd(-567.15, 157.56, 11.75, 1.39)
pt3dadd(-569.08, 160.29, 11.75, 1.39)
pt3dadd(-569.9, 164.12, 10.77, 1.39)
pt3dadd(-570.23, 167.95, 10.77, 1.04)
pt3dadd(-571.74, 171.02, 10.77, 1.04)
pt3dadd(-574.14, 175.73, 9.79, 1.04)
pt3dadd(-574.78, 178.15, 9.79, 1.04)
pt3dadd(-576.27, 181.37, 9.79, 1.04)
pt3dadd(-576.03, 185.21, 15.66, 1.04)
pt3dadd(-577.18, 189.13, 17.62, 1.04)
pt3dadd(-578.48, 191.99, 21.54, 1.04)
pt3dadd(-578.58, 195.96, 21.54, 1.04)
pt3dadd(-577.47, 199.04, 22.52, 1.04)
}
dend[94] {pt3dclear()
pt3dadd(-577.47, 199.04, 22.52, 0.7)
pt3dadd(-575.13, 201.58, 17.62, 0.7)
pt3dadd(-573.5, 205.64, 17.62, 0.7)
pt3dadd(-573.74, 208.98, 17.62, 0.7)
pt3dadd(-570.29, 212.21, 17.62, 0.7)
pt3dadd(-568.99, 216.22, 17.62, 0.7)
pt3dadd(-567.8, 220.56, 21.54, 0.7)
pt3dadd(-565.11, 225.26, 21.54, 0.7)
pt3dadd(-563.57, 229.45, 21.54, 0.7)
pt3dadd(-562.61, 235.67, 25.45, 0.7)
pt3dadd(-561.03, 240.96, 25.45, 0.7)
pt3dadd(-562.24, 243.49, 25.45, 0.7)
pt3dadd(-559.83, 247.36, 25.45, 0.7)
pt3dadd(-560.24, 251.37, 26.43, 0.7)
pt3dadd(-560.12, 254.59, 26.43, 0.7)
pt3dadd(-561.39, 256.91, 32.31, 0.7)
pt3dadd(-560.36, 261.1, 35.24, 0.7)
pt3dadd(-560.57, 263.49, 41.12, 0.7)
pt3dadd(-559.25, 265.37, 41.12, 0.7)
pt3dadd(-557.6, 266.24, 41.12, 0.7)
pt3dadd(-558.43, 268.35, 41.12, 0.35)
pt3dadd(-557.3, 269, 41.12, 0.35)
pt3dadd(-556.17, 271.58, 46.99, 0.35)
pt3dadd(-555.32, 273.41, 46.99, 0.35)
pt3dadd(-555.32, 273.41, 47.97, 0.35)
pt3dadd(-553.08, 272.34, 48.95, 0.35)
pt3dadd(-550.81, 275.27, 47.97, 0.35)
pt3dadd(-548.01, 277.13, 47.97, 0.35)
pt3dadd(-547.25, 280.05, 47.97, 0.35)
pt3dadd(-544.38, 281.63, 47.97, 0.35)
pt3dadd(-543.8, 284.44, 51.89, 0.35)
pt3dadd(-540.97, 285.64, 51.89, 0.35)
pt3dadd(-538.69, 287.4, 58.74, 0.35)
pt3dadd(-538.19, 289.29, 59.72, 0.35)
pt3dadd(-538.11, 289.43, 59.72, 0.35)
}
dend[95] {pt3dclear()
pt3dadd(-538.11, 289.43, 59.72, 0.35)
pt3dadd(-535.98, 288.47, 59.72, 0.35)
pt3dadd(-534.98, 291.75, 63.63, 0.35)
pt3dadd(-535.94, 293.97, 64.61, 0.35)
pt3dadd(-534.94, 295.11, 64.61, 0.35)
pt3dadd(-534.5, 295.6, 64.61, 0.35)
pt3dadd(-533.6, 297.04, 64.61, 0.35)
pt3dadd(-531.51, 296.42, 67.55, 0.35)
pt3dadd(-529.78, 297.72, 71.47, 0.35)
pt3dadd(-528.34, 298.87, 76.36, 0.35)
pt3dadd(-528.47, 299.65, 76.36, 0.35)
pt3dadd(-526.59, 300.44, 76.36, 0.35)
pt3dadd(-524.41, 301.48, 79.3, 0.35)
pt3dadd(-524.5, 305.79, 81.26, 0.35)
pt3dadd(-524.29, 307.75, 83.21, 0.35)
pt3dadd(-522.1, 309.19, 86.15, 0.35)
pt3dadd(-523.36, 311.3, 89.09, 0.35)
pt3dadd(-525.16, 313.95, 89.09, 0.35)
pt3dadd(-527, 317.97, 91.05, 0.35)
pt3dadd(-526.2, 319.97, 93.98, 0.35)
pt3dadd(-525.62, 322.85, 94.96, 0.35)
pt3dadd(-527.06, 324.71, 95.94, 0.35)
pt3dadd(-524.64, 326.78, 96.92, 0.35)
pt3dadd(-523.06, 329.05, 96.92, 0.35)
pt3dadd(-521.17, 328.9, 96.92, 0.35)
pt3dadd(-519.84, 330.85, 101.82, 0.35)
pt3dadd(-520.64, 332.63, 101.82, 0.35)
pt3dadd(-520.35, 334.2, 103.77, 0.35)
pt3dadd(-519.45, 335.5, 104.75, 0.35)
pt3dadd(-517.3, 333.08, 107.69, 0.35)
pt3dadd(-515.13, 330.59, 107.69, 0.35)
pt3dadd(-513.63, 327.57, 111.61, 0.35)
pt3dadd(-513.34, 327.18, 111.61, 0.35)
pt3dadd(-510.98, 325.54, 111.61, 0.35)
pt3dadd(-511.6, 322.91, 114.54, 0.35)
pt3dadd(-509.7, 321.98, 115.52, 0.35)
pt3dadd(-508.08, 318.52, 115.52, 0.35)
pt3dadd(-505.59, 317.21, 115.52, 0.35)
pt3dadd(-504.81, 315.62, 117.48, 0.35)
pt3dadd(-503.45, 312.99, 124.33, 0.35)
pt3dadd(-503.8, 310.76, 130.21, 0.35)
pt3dadd(-500.44, 308.24, 132.16, 0.35)
pt3dadd(-496.89, 306.21, 138.04, 0.35)
pt3dadd(-496.91, 303.55, 140.97, 0.35)
pt3dadd(-496.91, 303.55, 141.95, 0.35)
pt3dadd(-493.38, 301.43, 141.95, 0.35)
pt3dadd(-490.09, 301.08, 141.95, 0.35)
pt3dadd(-488.28, 299.07, 142.93, 0.35)
pt3dadd(-485.38, 298.03, 142.93, 0.35)
pt3dadd(-484.1, 295.45, 147.83, 0.35)
pt3dadd(-481.83, 294.95, 148.81, 0.35)
pt3dadd(-480.27, 296.05, 151.74, 0.35)
pt3dadd(-477.08, 294.96, 154.68, 0.35)
pt3dadd(-475.51, 295.19, 156.64, 0.35)
}
dend[96] {pt3dclear()
pt3dadd(-538.11, 289.43, 59.72, 0.35)
pt3dadd(-538.11, 290.07, 59.72, 0.35)
pt3dadd(-536.79, 291.03, 59.72, 0.35)
}
}
proc shape3d_19() {
dend[96] { pt3dadd(-537.49, 292.7, 65.59, 0.35)
pt3dadd(-536.94, 296.38, 71.47, 0.35)
pt3dadd(-534.45, 298.07, 78.32, 0.35)
pt3dadd(-532.31, 295.57, 78.32, 0.35)
pt3dadd(-529.97, 297.41, 72.45, 0.35)
pt3dadd(-526.82, 298.52, 71.47, 0.35)
pt3dadd(-525.42, 299.94, 74.4, 0.35)
pt3dadd(-523.7, 298.64, 75.38, 0.35)
pt3dadd(-521.99, 296.17, 77.34, 0.35)
pt3dadd(-518.71, 295.45, 77.34, 0.35)
pt3dadd(-515.94, 293.06, 78.32, 0.35)
pt3dadd(-513.55, 293.86, 78.32, 0.35)
pt3dadd(-514.55, 295.16, 80.28, 0.35)
pt3dadd(-511.56, 295.95, 83.21, 0.35)
pt3dadd(-508.28, 295.76, 86.15, 0.35)
pt3dadd(-505.76, 295.46, 91.05, 0.35)
pt3dadd(-506.47, 297.87, 91.05, 0.35)
pt3dadd(-503.95, 296.39, 91.05, 0.35)
pt3dadd(-502.28, 296.3, 93.98, 0.35)
pt3dadd(-500.01, 297.08, 94.96, 0.35)
pt3dadd(-498.03, 299.42, 96.92, 0.35)
pt3dadd(-496.54, 300.66, 98.88, 0.35)
pt3dadd(-494.68, 300.81, 101.82, 0.35)
pt3dadd(-494.28, 300.95, 101.82, 0.35)
pt3dadd(-491.52, 302.22, 101.82, 0.35)
pt3dadd(-490.64, 298.78, 106.71, 0.35)
pt3dadd(-490.6, 296.38, 106.71, 0.35)
pt3dadd(-488.86, 295.36, 110.63, 0.35)
pt3dadd(-488.5, 293.42, 114.54, 0.35)
pt3dadd(-485.36, 292.58, 116.5, 0.35)
pt3dadd(-482.46, 291.48, 116.5, 0.35)
pt3dadd(-479.62, 289.02, 116.5, 0.35)
pt3dadd(-480.21, 287.96, 120.42, 0.35)
pt3dadd(-478.88, 286.74, 125.31, 0.35)
pt3dadd(-478.74, 288.36, 132.16, 0.35)
pt3dadd(-477.6, 290.16, 132.16, 0.35)
pt3dadd(-477.5, 292.11, 134.12, 0.35)
pt3dadd(-476.14, 295.47, 139.02, 0.35)
pt3dadd(-475.4, 299.09, 140.97, 0.35)
pt3dadd(-471.97, 301.91, 143.91, 0.35)
pt3dadd(-469.53, 300.64, 143.91, 0.35)
pt3dadd(-469.66, 302.68, 145.87, 0.35)
pt3dadd(-469.24, 303.14, 145.87, 0.35)
pt3dadd(-466.81, 305.62, 145.87, 0.35)
pt3dadd(-464.37, 305.26, 145.87, 0.35)
pt3dadd(-463.33, 305.62, 145.87, 0.35)
pt3dadd(-460.54, 305.26, 145.87, 0.35)
pt3dadd(-457.76, 303.49, 148.81, 0.35)
pt3dadd(-455.32, 305.97, 148.81, 0.35)
pt3dadd(-456.02, 307.03, 159.58, 0.35)
pt3dadd(-455.32, 309.86, 159.58, 0.35)
pt3dadd(-452.89, 313.04, 166.43, 0.35)
pt3dadd(-451.14, 314.46, 167.41, 0.35)
pt3dadd(-449.75, 316.23, 167.41, 0.35)
pt3dadd(-446.97, 315.52, 167.41, 0.35)
pt3dadd(-446.97, 314.81, 167.41, 0.35)
pt3dadd(-444.53, 315.52, 167.41, 0.35)
pt3dadd(-442.79, 312.69, 174.26, 0.35)
pt3dadd(-442.44, 310.57, 177.2, 0.35)
pt3dadd(-437.92, 309.15, 177.2, 0.35)
pt3dadd(-435.83, 309.15, 180.13, 0.35)
pt3dadd(-434.79, 307.38, 180.13, 0.35)
pt3dadd(-431.65, 308.09, 183.07, 0.35)
}
dend[97] {pt3dclear()
pt3dadd(-577.47, 199.04, 22.52, 0.7)
pt3dadd(-580.63, 201.53, 21.54, 0.7)
pt3dadd(-583.26, 203.99, 21.54, 0.7)
pt3dadd(-583.89, 208.44, 21.54, 0.7)
pt3dadd(-586.33, 211.08, 20.56, 0.7)
pt3dadd(-587.77, 213.25, 20.56, 0.7)
pt3dadd(-589.37, 214.21, 20.56, 0.7)
pt3dadd(-590.74, 214.89, 14.68, 0.7)
pt3dadd(-591.82, 216.92, 14.68, 0.7)
pt3dadd(-590.39, 218.34, 14.68, 0.7)
pt3dadd(-590.09, 220.82, 14.68, 0.7)
pt3dadd(-589.37, 225.26, 14.68, 0.7)
pt3dadd(-585.84, 224.75, 14.68, 0.7)
pt3dadd(-583.14, 222.22, 10.77, 0.7)
pt3dadd(-583.17, 219.1, 10.77, 0.7)
pt3dadd(-582.37, 216.07, 3.92, 0.7)
pt3dadd(-582.8, 213.67, 3.92, 0.7)
pt3dadd(-586.54, 211.11, 0, 0.7)
pt3dadd(-588.24, 206.84, 0, 0.7)
pt3dadd(-590.18, 203.12, -4.89, 0.7)
pt3dadd(-591.87, 200.53, -4.89, 0.7)
pt3dadd(-590.8, 198.5, -8.81, 0.7)
pt3dadd(-591, 193.69, -8.81, 0.7)
pt3dadd(-589.04, 192.8, -8.81, 0.7)
pt3dadd(-587.95, 190.15, -12.73, 0.7)
pt3dadd(-584.86, 188.94, -21.54, 0.7)
pt3dadd(-586.27, 187.52, -26.43, 0.7)
pt3dadd(-588.82, 186.26, -31.33, 0.7)
pt3dadd(-589.35, 186.17, -31.33, 0.7)
pt3dadd(-592.42, 184.56, -31.33, 0.7)
pt3dadd(-592.88, 186.2, -31.33, 0.7)
pt3dadd(-593.4, 188.08, -31.33, 0.7)
pt3dadd(-596.18, 188, -37.2, 0.7)
pt3dadd(-598.94, 189.18, -38.18, 0.7)
pt3dadd(-600.7, 190.52, -46.01, 0.7)
pt3dadd(-602.67, 191.01, -46.01, 0.7)
pt3dadd(-603.14, 193.06, -49.93, 0.7)
pt3dadd(-605.74, 195, -50.91, 0.7)
}
dend[98] {pt3dclear()
pt3dadd(-546.48, 104.66, 10.77, 1.74)
pt3dadd(-547.43, 106.4, 19.58, 1.74)
pt3dadd(-548.22, 109.2, 21.54, 1.04)
pt3dadd(-547.98, 108.95, 21.54, 1.04)
pt3dadd(-548.44, 112.64, 20.56, 1.04)
pt3dadd(-548.34, 114.44, 22.52, 1.39)
pt3dadd(-549.12, 117.8, 22.52, 1.39)
pt3dadd(-550.61, 122.01, 22.52, 1.39)
pt3dadd(-550.37, 126.55, 23.5, 1.39)
pt3dadd(-549.92, 131, 23.5, 1.39)
pt3dadd(-551.96, 135.09, 23.5, 1.39)
pt3dadd(-552.61, 138.54, 28.39, 1.39)
pt3dadd(-554.21, 142.36, 28.39, 1.39)
pt3dadd(-554.61, 146.61, 28.39, 1.39)
pt3dadd(-555.49, 149.4, 28.39, 1.04)
pt3dadd(-555.34, 151.6, 28.39, 1.04)
pt3dadd(-555.46, 154.5, 28.39, 1.04)
pt3dadd(-556.72, 154.95, 31.33, 1.39)
pt3dadd(-557.3, 156.06, 32.31, 1.39)
pt3dadd(-558.4, 157.16, 32.31, 1.39)
pt3dadd(-559.43, 159.71, 32.31, 1.04)
pt3dadd(-560.35, 161.56, 35.24, 1.04)
pt3dadd(-561.86, 163.15, 35.24, 1.04)
pt3dadd(-561.77, 165.42, 35.24, 1.04)
pt3dadd(-563, 167.37, 35.24, 1.04)
pt3dadd(-564.93, 169.53, 35.24, 1.04)
pt3dadd(-566.74, 170.7, 35.24, 1.04)
pt3dadd(-566.65, 172.41, 39.16, 1.04)
pt3dadd(-565.95, 174.79, 39.16, 1.04)
pt3dadd(-568.5, 176.4, 39.16, 1.04)
pt3dadd(-567.8, 179.22, 39.16, 1.04)
pt3dadd(-568.99, 182.11, 44.05, 1.04)
pt3dadd(-566.95, 184.78, 44.05, 1.04)
pt3dadd(-566.71, 184.53, 44.05, 1.04)
pt3dadd(-565.95, 187.45, 44.05, 1.04)
pt3dadd(-564.4, 188.71, 44.05, 1.04)
pt3dadd(-563.78, 190.79, 46.99, 1.04)
pt3dadd(-561.95, 190.79, 47.97, 1.04)
pt3dadd(-561.5, 193.18, 47.97, 1.04)
pt3dadd(-562.87, 195.76, 50.91, 1.04)
pt3dadd(-563.62, 198.95, 50.91, 1.04)
pt3dadd(-562.43, 201.09, 50.91, 1.04)
pt3dadd(-562.8, 202.43, 57.76, 0.7)
pt3dadd(-563.06, 203.51, 57.76, 0.7)
}
dend[99] {pt3dclear()
pt3dadd(-563.06, 203.51, 57.76, 0.7)
pt3dadd(-564.01, 204.82, 60.7, 0.7)
pt3dadd(-563.83, 206.7, 60.7, 0.7)
pt3dadd(-563.84, 209.85, 62.66, 0.7)
pt3dadd(-563.93, 212.71, 62.66, 0.7)
pt3dadd(-562.85, 215.97, 62.66, 0.7)
pt3dadd(-562.64, 216.72, 62.66, 0.35)
pt3dadd(-561.77, 219.26, 62.66, 0.35)
pt3dadd(-561.33, 221.01, 62.66, 0.35)
pt3dadd(-561.55, 222.81, 62.66, 0.35)
pt3dadd(-562.63, 225.21, 62.66, 0.35)
pt3dadd(-564.26, 228.95, 62.66, 0.35)
pt3dadd(-563.94, 231.13, 65.59, 0.35)
pt3dadd(-565.13, 232.36, 68.53, 0.35)
pt3dadd(-565.55, 235.72, 70.49, 0.35)
pt3dadd(-565.11, 238.31, 71.47, 0.35)
pt3dadd(-565.91, 240.1, 71.47, 0.35)
pt3dadd(-567.49, 243.05, 71.47, 0.35)
pt3dadd(-566.47, 245.41, 74.4, 0.35)
pt3dadd(-567.54, 248.19, 76.36, 0.35)
pt3dadd(-567.66, 250.91, 77.34, 0.35)
pt3dadd(-566.83, 252.03, 77.34, 0.35)
pt3dadd(-567.94, 254.39, 78.32, 0.35)
pt3dadd(-568.71, 258.44, 78.32, 0.35)
pt3dadd(-568.62, 260.81, 80.28, 0.35)
pt3dadd(-569.63, 262.95, 81.26, 0.35)
pt3dadd(-569.06, 264.49, 81.26, 0.35)
pt3dadd(-570.24, 265.79, 81.26, 0.35)
pt3dadd(-568.52, 266.47, 84.19, 0.35)
pt3dadd(-568.65, 267.5, 85.17, 0.35)
pt3dadd(-569.82, 268.8, 85.17, 0.35)
pt3dadd(-570.61, 271.49, 87.13, 0.35)
pt3dadd(-569.51, 272.2, 91.05, 0.35)
pt3dadd(-571.79, 272.86, 93, 0.35)
}
dend[100] {pt3dclear()
pt3dadd(-563.06, 203.51, 57.76, 0.7)
pt3dadd(-562.34, 203.4, 57.76, 0.7)
pt3dadd(-560.76, 200.06, 56.78, 0.7)
pt3dadd(-558.9, 198.71, 66.57, 0.7)
pt3dadd(-559.65, 196.64, 68.53, 0.7)
pt3dadd(-557.15, 194.42, 68.53, 0.7)
pt3dadd(-553.87, 189.71, 73.42, 0.7)
pt3dadd(-553.35, 187.28, 73.42, 0.7)
pt3dadd(-551.23, 184.95, 73.42, 0.7)
pt3dadd(-550.01, 181.71, 78.32, 0.7)
pt3dadd(-550.12, 178.29, 83.21, 0.7)
pt3dadd(-548.21, 174.71, 84.19, 0.7)
pt3dadd(-548.21, 174.71, 85.17, 0.7)
pt3dadd(-549.51, 172.13, 89.09, 0.7)
pt3dadd(-548.82, 169.36, 90.07, 0.7)
pt3dadd(-545.29, 164.85, 90.07, 0.7)
pt3dadd(-545.64, 162.62, 94.96, 0.35)
pt3dadd(-544.12, 161.47, 94.96, 0.35)
pt3dadd(-544.11, 158.6, 94.96, 0.35)
pt3dadd(-543.26, 156.02, 98.88, 0.35)
pt3dadd(-540.44, 153.3, 99.86, 0.35)
}
}
proc shape3d_20() {
dend[100] { pt3dadd(-540.54, 152.11, 101.82, 0.35)
pt3dadd(-537.38, 151.82, 103.77, 0.35)
pt3dadd(-536.05, 152.22, 104.75, 0.35)
pt3dadd(-534.77, 150.25, 104.75, 0.35)
pt3dadd(-532.11, 150.32, 107.69, 0.35)
pt3dadd(-530.07, 150.4, 107.69, 0.35)
pt3dadd(-528.39, 148.75, 109.65, 0.35)
pt3dadd(-528.39, 148.75, 110.63, 0.35)
}
dend[101] {pt3dclear()
pt3dadd(-528.39, 148.75, 110.63, 0.35)
pt3dadd(-529.03, 146.7, 109.65, 0.35)
pt3dadd(-528.91, 144.31, 108.67, 0.35)
pt3dadd(-527.28, 140.89, 108.67, 0.35)
pt3dadd(-527.41, 137.9, 111.61, 0.35)
pt3dadd(-527.18, 137.19, 111.61, 0.35)
pt3dadd(-526.95, 133.68, 111.61, 0.35)
pt3dadd(-529, 133.61, 111.61, 0.35)
pt3dadd(-530.19, 131.91, 111.61, 0.35)
pt3dadd(-531.66, 130.43, 111.61, 0.35)
pt3dadd(-533.26, 128.45, 112.58, 0.35)
pt3dadd(-535.45, 127.72, 112.58, 0.35)
pt3dadd(-537.5, 125.86, 112.58, 0.35)
pt3dadd(-538.81, 121.7, 112.58, 0.35)
pt3dadd(-541.75, 118.8, 112.58, 0.35)
pt3dadd(-542.71, 115.85, 112.58, 0.35)
pt3dadd(-544.26, 112.92, 112.58, 0.35)
pt3dadd(-544.5, 110.19, 112.58, 0.35)
pt3dadd(-546.82, 108.66, 114.54, 0.35)
pt3dadd(-548.17, 106.77, 113.56, 0.35)
pt3dadd(-549.11, 104.01, 113.56, 0.35)
pt3dadd(-549.11, 104.01, 112.58, 0.35)
pt3dadd(-550.71, 101.99, 113.56, 0.35)
pt3dadd(-551.24, 100.63, 116.5, 0.35)
pt3dadd(-553.93, 98.6, 117.48, 0.35)
pt3dadd(-556.5, 97.29, 117.48, 0.35)
pt3dadd(-559.07, 97.99, 117.48, 0.35)
pt3dadd(-562.12, 97.07, 117.48, 0.35)
pt3dadd(-563.16, 98.5, 117.48, 0.35)
pt3dadd(-564.86, 97.46, 117.48, 0.35)
pt3dadd(-566.7, 97.61, 117.48, 0.35)
pt3dadd(-567.61, 96.6, 123.35, 0.35)
pt3dadd(-569.37, 96.39, 123.35, 0.35)
pt3dadd(-569.38, 93.41, 123.35, 0.35)
pt3dadd(-571.33, 93.19, 123.35, 0.35)
pt3dadd(-571.9, 91.91, 123.35, 0.35)
pt3dadd(-572.85, 89.99, 126.29, 0.35)
pt3dadd(-572.04, 87.34, 129.23, 0.35)
pt3dadd(-573.13, 85.5, 131.19, 0.35)
pt3dadd(-571.66, 83.07, 136.08, 0.35)
pt3dadd(-571.57, 81.72, 136.08, 0.35)
pt3dadd(-571.16, 79.89, 136.08, 0.35)
pt3dadd(-572.93, 76.41, 141.95, 0.35)
pt3dadd(-575.32, 74.6, 144.89, 0.35)
pt3dadd(-574.33, 70.62, 144.89, 0.35)
pt3dadd(-577.12, 69.59, 144.89, 0.35)
pt3dadd(-580.02, 68.53, 144.89, 0.35)
pt3dadd(-581.49, 67.4, 144.89, 0.35)
pt3dadd(-583.08, 65.67, 144.89, 0.35)
pt3dadd(-585.94, 66.4, 139.02, 0.35)
pt3dadd(-589.92, 64.82, 138.04, 0.35)
pt3dadd(-593.94, 63.47, 138.04, 0.35)
pt3dadd(-596.67, 63.07, 137.06, 0.35)
pt3dadd(-599.24, 61.74, 137.06, 0.35)
pt3dadd(-602.08, 62.05, 137.06, 0.35)
pt3dadd(-601.97, 64.52, 137.06, 0.35)
pt3dadd(-602.39, 66.08, 141.95, 0.35)
pt3dadd(-602.66, 67.65, 141.95, 0.35)
pt3dadd(-600.56, 67.83, 141.95, 0.35)
pt3dadd(-599.02, 67.55, 144.89, 0.35)
}
dend[102] {pt3dclear()
pt3dadd(-528.39, 148.75, 110.63, 0.35)
pt3dadd(-525.54, 148.07, 113.56, 0.35)
pt3dadd(-521.95, 145, 114.54, 0.35)
pt3dadd(-517.68, 141.06, 114.54, 0.35)
pt3dadd(-514.37, 139.08, 117.48, 0.35)
pt3dadd(-512.84, 139.25, 118.46, 0.35)
pt3dadd(-512.28, 139.44, 118.46, 0.35)
pt3dadd(-510.12, 140.04, 118.46, 0.35)
pt3dadd(-507.96, 139.11, 118.46, 0.35)
pt3dadd(-505.97, 140.99, 118.46, 0.35)
pt3dadd(-503, 141.38, 122.37, 0.35)
pt3dadd(-500.57, 140.95, 122.37, 0.35)
}
dend[103] {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-519.95, 63.15, 0.98, 9.05)
pt3dadd(-519.74, 66.28, 0.98, 7.31)
pt3dadd(-519.38, 69.94, 1.96, 5.92)
pt3dadd(-518.85, 73.9, 1.96, 5.22)
pt3dadd(-518.4, 77.73, 1.96, 5.22)
pt3dadd(-518.2, 81.12, 3.92, 5.22)
pt3dadd(-516.9, 85.04, 3.92, 5.22)
pt3dadd(-517.2, 88.94, 3.92, 4.52)
pt3dadd(-516.89, 93.14, 4.89, 4.52)
pt3dadd(-516.52, 96.84, 0.98, 4.52)
pt3dadd(-516.38, 99.4, 0, 4.87)
}
dend[104] {pt3dclear()
pt3dadd(-516.38, 99.4, 0, 3.83)
pt3dadd(-515.13, 102.03, 2.94, 3.83)
pt3dadd(-514, 104.72, 2.94, 3.83)
pt3dadd(-513.07, 108.17, -0.98, 4.52)
}
dend[105] {pt3dclear()
pt3dadd(-513.07, 108.17, -0.98, 3.13)
pt3dadd(-514.82, 110.92, 1.96, 3.13)
pt3dadd(-514.48, 113.79, 1.96, 2.78)
pt3dadd(-515, 117.13, 1.96, 1.74)
pt3dadd(-516.5, 121.03, 2.94, 1.74)
pt3dadd(-516.25, 124.52, 2.94, 1.74)
pt3dadd(-516.5, 128.52, 1.96, 1.74)
pt3dadd(-517.35, 130.88, 1.96, 1.74)
pt3dadd(-518.32, 133.73, 2.94, 1.39)
pt3dadd(-520.61, 136.87, 2.94, 1.39)
pt3dadd(-521.36, 140.01, -1.96, 1.39)
pt3dadd(-521.89, 143.42, -2.94, 1.39)
pt3dadd(-523.25, 147.59, -2.94, 1.39)
pt3dadd(-524.08, 151.92, -2.94, 1.39)
pt3dadd(-524.49, 155.95, -3.92, 1.39)
pt3dadd(-524.7, 157.7, -3.92, 1.39)
pt3dadd(-526.19, 159.24, -3.92, 1.39)
pt3dadd(-526.5, 161.84, -6.85, 1.39)
pt3dadd(-527.98, 168.38, -6.85, 1.39)
pt3dadd(-529.48, 172.08, -9.79, 1.39)
pt3dadd(-530.93, 175.47, -6.85, 1.39)
pt3dadd(-531.44, 177.42, -6.85, 1.39)
}
dend[106] {pt3dclear()
pt3dadd(-531.44, 177.42, -6.85, 1.04)
pt3dadd(-530.79, 178.89, -9.79, 1.04)
pt3dadd(-532.09, 180.13, -9.79, 1.04)
pt3dadd(-531.23, 181.85, -9.79, 1.04)
pt3dadd(-533.04, 181.81, -9.79, 1.04)
pt3dadd(-534.58, 182.92, -9.79, 1.04)
pt3dadd(-535.41, 185.43, -14.68, 1.04)
pt3dadd(-533.32, 186.49, -14.68, 1.04)
pt3dadd(-534.57, 188.51, -14.68, 1.04)
pt3dadd(-535.09, 191.35, -15.66, 1.04)
pt3dadd(-534.72, 194.43, -18.6, 1.04)
pt3dadd(-532.74, 196.81, -19.58, 1.04)
pt3dadd(-534.15, 200.37, -24.47, 1.04)
pt3dadd(-534.31, 203.74, -25.45, 1.04)
pt3dadd(-534.31, 203.74, -26.43, 1.04)
pt3dadd(-534.59, 207, -29.37, 1.04)
pt3dadd(-534.1, 210.99, -30.35, 1.04)
pt3dadd(-533.47, 214.43, -30.35, 1.04)
pt3dadd(-532.58, 218.53, -30.35, 1.04)
pt3dadd(-533.33, 222.86, -29.37, 1.04)
pt3dadd(-533.78, 227.73, -29.37, 1.04)
pt3dadd(-535.81, 232.14, -29.37, 1.04)
}
dend[107] {pt3dclear()
pt3dadd(-535.81, 232.14, -29.37, 0.35)
pt3dadd(-533.5, 234.08, -26.43, 0.35)
pt3dadd(-535.06, 240.94, -26.43, 0.35)
pt3dadd(-534.89, 246.02, -25.45, 0.35)
pt3dadd(-534.47, 248.4, -25.45, 0.35)
pt3dadd(-535.72, 251.14, -25.45, 0.35)
pt3dadd(-535.53, 254.29, -25.45, 0.35)
pt3dadd(-535.04, 257.26, -25.45, 0.35)
pt3dadd(-535.29, 258.22, -25.45, 0.35)
pt3dadd(-535.61, 259.55, -25.45, 0.35)
pt3dadd(-535.52, 262.63, -25.45, 0.35)
pt3dadd(-534.8, 266.84, -26.43, 0.35)
pt3dadd(-532.31, 270.14, -26.43, 0.35)
pt3dadd(-531.86, 275.75, -26.43, 0.35)
pt3dadd(-532.36, 278.71, -19.58, 0.35)
pt3dadd(-530.44, 281.72, -20.56, 0.35)
pt3dadd(-530.8, 285.31, -17.62, 0.35)
pt3dadd(-528.65, 289.4, -13.71, 0.35)
pt3dadd(-527.49, 292.46, -16.64, 0.35)
pt3dadd(-526.63, 296.59, -16.64, 0.35)
pt3dadd(-523.18, 300.97, -16.64, 0.35)
pt3dadd(-522.39, 301.55, -17.62, 0.35)
pt3dadd(-522.1, 304.06, -17.62, 0.35)
pt3dadd(-520.43, 307.72, -17.62, 0.35)
pt3dadd(-518.77, 311.44, -17.62, 0.35)
pt3dadd(-518.1, 314.44, -17.62, 0.35)
pt3dadd(-518.1, 314.44, -16.64, 0.35)
pt3dadd(-517.26, 317.53, -16.64, 0.35)
pt3dadd(-514.91, 321.68, -16.64, 0.35)
pt3dadd(-513.8, 325.35, -16.64, 0.35)
pt3dadd(-512.99, 328.39, -16.64, 0.35)
pt3dadd(-511.44, 330.72, -16.64, 0.35)
pt3dadd(-510.89, 333.81, -16.64, 0.35)
pt3dadd(-510.35, 337.07, -15.66, 0.35)
pt3dadd(-510.12, 342.02, -15.66, 0.35)
pt3dadd(-510.86, 345.87, -15.66, 0.35)
pt3dadd(-511.03, 349.42, -9.79, 0.35)
pt3dadd(-506.86, 354.27, -9.79, 0.35)
pt3dadd(-504.04, 359.22, -8.81, 0.35)
pt3dadd(-501.19, 363.93, -9.79, 0.35)
pt3dadd(-499.22, 365.99, -10.77, 0.35)
}
dend[108] {pt3dclear()
pt3dadd(-535.81, 232.14, -29.37, 1.04)
pt3dadd(-535.46, 232.06, -29.37, 1.04)
pt3dadd(-534, 234.16, -30.35, 1.04)
pt3dadd(-534.45, 236.88, -30.35, 1.04)
pt3dadd(-533.47, 238.04, -33.29, 1.04)
pt3dadd(-532.75, 241.8, -33.29, 1.04)
pt3dadd(-531.63, 244.49, -39.16, 1.04)
pt3dadd(-531.81, 247.41, -39.16, 1.04)
pt3dadd(-530.75, 250.2, -39.16, 1.04)
pt3dadd(-530.75, 251.91, -41.12, 1.04)
}
dend[109] {pt3dclear()
pt3dadd(-530.75, 251.91, -41.12, 0.7)
pt3dadd(-527.43, 253.14, -40.14, 0.7)
pt3dadd(-524.38, 252.54, -40.14, 0.7)
pt3dadd(-522.61, 256.23, -40.14, 0.7)
pt3dadd(-522.03, 257.24, -44.05, 0.7)
pt3dadd(-521.41, 259.74, -45.03, 0.7)
pt3dadd(-523.25, 265.67, -46.01, 0.7)
pt3dadd(-523.33, 265.79, -46.01, 0.7)
pt3dadd(-523.14, 268.93, -46.01, 0.7)
}
}
proc shape3d_21() {
dend[109] { pt3dadd(-523.25, 272.25, -46.99, 0.7)
pt3dadd(-522.55, 273.48, -46.99, 0.7)
}
dend[110] {pt3dclear()
pt3dadd(-522.55, 273.48, -46.99, 0.7)
pt3dadd(-519.34, 273.95, -43.08, 0.7)
pt3dadd(-519.34, 273.95, -42.1, 0.7)
pt3dadd(-516.41, 273.84, -42.1, 0.7)
pt3dadd(-514.68, 274.07, -42.1, 0.7)
pt3dadd(-512.42, 275.23, -42.1, 0.7)
pt3dadd(-509.89, 278.27, -41.12, 0.7)
pt3dadd(-507.5, 278.94, -41.12, 0.7)
pt3dadd(-507.67, 281.48, -41.12, 0.7)
pt3dadd(-507.27, 282.88, -41.12, 0.7)
pt3dadd(-505.54, 283.11, -41.12, 0.7)
pt3dadd(-505.35, 283.76, -44.05, 0.7)
pt3dadd(-500.9, 290.18, -45.03, 0.7)
pt3dadd(-498.02, 293.83, -45.03, 0.7)
pt3dadd(-497.23, 294.91, -49.93, 0.7)
pt3dadd(-494.69, 300.79, -49.93, 0.7)
pt3dadd(-493.8, 300.94, -49.93, 0.7)
pt3dadd(-492.58, 303.49, -49.93, 0.7)
pt3dadd(-490.32, 305.67, -49.93, 0.7)
pt3dadd(-490.7, 306.89, -49.93, 0.7)
pt3dadd(-489.6, 309.04, -49.93, 0.7)
pt3dadd(-489.37, 310.86, -49.93, 0.7)
pt3dadd(-487.37, 311.45, -52.87, 0.7)
pt3dadd(-487.07, 312.28, -52.87, 0.7)
pt3dadd(-486.95, 314.04, -56.78, 0.7)
pt3dadd(-488.59, 314.9, -56.78, 0.7)
pt3dadd(-489.56, 316.85, -56.78, 0.7)
pt3dadd(-486.8, 318.08, -56.78, 0.35)
pt3dadd(-484.69, 319.66, -56.78, 0.35)
pt3dadd(-484.79, 321.17, -56.78, 0.35)
pt3dadd(-482.46, 323.6, -60.7, 0.35)
pt3dadd(-481.66, 327.05, -61.68, 0.35)
pt3dadd(-480.5, 330.25, -61.68, 0.35)
pt3dadd(-478.87, 330.87, -67.55, 0.35)
pt3dadd(-476.07, 333.46, -67.55, 0.35)
pt3dadd(-472.4, 334.94, -67.55, 0.35)
}
dend[111] {pt3dclear()
pt3dadd(-472.4, 334.94, -67.55, 0.35)
pt3dadd(-470.19, 336.02, -67.55, 0.35)
pt3dadd(-468.28, 337.75, -67.55, 0.35)
pt3dadd(-464.08, 336.13, -67.55, 0.35)
pt3dadd(-458.83, 334.96, -67.55, 0.35)
pt3dadd(-455.25, 333.09, -68.53, 0.35)
pt3dadd(-454.09, 330.88, -68.53, 0.35)
pt3dadd(-451.38, 331.12, -68.53, 0.35)
pt3dadd(-449.08, 333.57, -68.53, 0.35)
pt3dadd(-447, 334.31, -68.53, 0.35)
pt3dadd(-444.37, 333.83, -67.55, 0.35)
pt3dadd(-440.54, 334.38, -67.55, 0.35)
}
dend[112] {pt3dclear()
pt3dadd(-472.4, 334.94, -67.55, 0.35)
pt3dadd(-471.49, 338.44, -67.55, 0.35)
pt3dadd(-470.04, 340.22, -67.55, 0.35)
pt3dadd(-469.25, 340.14, -67.55, 0.35)
pt3dadd(-465.34, 343.64, -67.55, 0.35)
pt3dadd(-461.87, 346.23, -73.42, 0.35)
pt3dadd(-458.57, 347.77, -73.42, 0.35)
pt3dadd(-456.7, 346.7, -73.42, 0.35)
pt3dadd(-453.39, 352.13, -74.4, 0.35)
pt3dadd(-450.56, 353.8, -74.4, 0.35)
pt3dadd(-448.08, 357.14, -74.4, 0.35)
pt3dadd(-445.94, 360.52, -74.4, 0.35)
pt3dadd(-445.31, 362.67, -74.4, 0.35)
pt3dadd(-443.65, 364.57, -74.4, 0.35)
pt3dadd(-441.37, 366.04, -74.4, 0.35)
pt3dadd(-441.51, 368.74, -74.4, 0.35)
pt3dadd(-439.39, 372.28, -74.4, 0.35)
pt3dadd(-434.62, 375.2, -74.4, 0.35)
pt3dadd(-432.06, 376.27, -79.3, 0.35)
pt3dadd(-428.95, 376.31, -81.26, 0.35)
pt3dadd(-428.59, 379.71, -83.21, 0.35)
pt3dadd(-423.57, 380.46, -83.21, 0.35)
pt3dadd(-422.05, 381.76, -83.21, 0.35)
pt3dadd(-420.7, 383.63, -83.21, 0.35)
pt3dadd(-418.3, 385.02, -83.21, 0.35)
pt3dadd(-416.25, 384.31, -83.21, 0.35)
pt3dadd(-413.31, 384, -83.21, 0.35)
pt3dadd(-413.31, 384, -84.19, 0.35)
pt3dadd(-412.93, 386.12, -84.19, 0.35)
pt3dadd(-410.65, 388.39, -87.13, 0.35)
pt3dadd(-410.91, 390.74, -88.11, 0.35)
pt3dadd(-407.1, 393.06, -88.11, 0.35)
}
dend[113] {pt3dclear()
pt3dadd(-522.55, 273.48, -46.99, 0.7)
pt3dadd(-523.55, 278.32, -47.97, 0.7)
pt3dadd(-524.63, 282.79, -48.95, 0.7)
pt3dadd(-525.86, 287.8, -48.95, 0.7)
pt3dadd(-525.12, 290.24, -48.95, 0.7)
pt3dadd(-524.89, 293.57, -48.95, 0.7)
pt3dadd(-524.51, 295.88, -48.95, 0.7)
pt3dadd(-523.56, 297.75, -48.95, 0.7)
pt3dadd(-523.85, 301.78, -51.89, 0.7)
pt3dadd(-523.08, 303.45, -52.87, 0.7)
pt3dadd(-524.19, 306.74, -52.87, 0.7)
pt3dadd(-524.54, 307.45, -52.87, 0.35)
pt3dadd(-526.13, 310.95, -52.87, 0.35)
pt3dadd(-526.12, 314.16, -52.87, 0.35)
pt3dadd(-527.36, 316.33, -52.87, 0.35)
pt3dadd(-528.58, 317.82, -52.87, 0.35)
pt3dadd(-527.83, 321.04, -52.87, 0.35)
pt3dadd(-528.13, 323.35, -52.87, 0.35)
pt3dadd(-527.53, 326.17, -52.87, 0.35)
pt3dadd(-527.78, 329.06, -52.87, 0.35)
pt3dadd(-529.42, 331.19, -52.87, 0.35)
pt3dadd(-530.07, 332.37, -52.87, 0.35)
pt3dadd(-530.25, 333.96, -52.87, 0.35)
pt3dadd(-530.22, 337.53, -52.87, 0.35)
pt3dadd(-529.28, 340.52, -55.8, 0.35)
pt3dadd(-529.86, 342.84, -55.8, 0.35)
pt3dadd(-532.72, 346.43, -55.8, 0.35)
pt3dadd(-533.44, 347.96, -55.8, 0.35)
pt3dadd(-533.88, 351.92, -56.78, 0.35)
pt3dadd(-534.42, 356.78, -56.78, 0.35)
pt3dadd(-535.15, 362.51, -60.7, 0.35)
pt3dadd(-533.67, 366.83, -60.7, 0.35)
pt3dadd(-533.94, 369.35, -60.7, 0.35)
pt3dadd(-535.82, 371.1, -65.59, 0.35)
pt3dadd(-536.23, 374.93, -65.59, 0.35)
pt3dadd(-535.16, 378.01, -65.59, 0.35)
pt3dadd(-534.21, 381.43, -65.59, 0.35)
pt3dadd(-530.71, 383.03, -65.59, 0.35)
}
dend[114] {pt3dclear()
pt3dadd(-530.75, 251.91, -41.12, 1.04)
pt3dadd(-531.46, 253.8, -42.1, 1.04)
pt3dadd(-532.65, 256.73, -42.1, 0.7)
pt3dadd(-533.5, 260.51, -42.1, 0.7)
pt3dadd(-534.82, 264.65, -42.1, 0.7)
pt3dadd(-534.7, 266.52, -43.08, 0.7)
pt3dadd(-536.14, 268.31, -43.08, 0.7)
pt3dadd(-537.04, 269.56, -43.08, 0.7)
pt3dadd(-538.04, 272.04, -44.05, 0.7)
pt3dadd(-538.56, 275.4, -43.08, 0.7)
pt3dadd(-538.25, 275.22, -43.08, 0.7)
pt3dadd(-539.53, 277.32, -43.08, 0.7)
pt3dadd(-540.55, 278.57, -42.1, 0.7)
pt3dadd(-542.77, 280.52, -42.1, 0.7)
pt3dadd(-544.26, 283.57, -42.1, 0.7)
pt3dadd(-544.84, 285.39, -41.12, 0.7)
pt3dadd(-547.43, 291.62, -41.12, 0.7)
pt3dadd(-549.62, 294.26, -40.14, 0.7)
pt3dadd(-550.77, 295.19, -40.14, 0.7)
pt3dadd(-551.16, 297.44, -40.14, 0.7)
pt3dadd(-553.39, 298.57, -45.03, 0.7)
pt3dadd(-554.22, 298.76, -45.03, 0.7)
pt3dadd(-556.9, 299.47, -45.03, 0.7)
pt3dadd(-557.47, 300.21, -46.01, 0.7)
}
dend[115] {pt3dclear()
pt3dadd(-557.47, 300.21, -46.01, 0.7)
pt3dadd(-558.15, 300.64, -45.03, 0.7)
pt3dadd(-560.27, 301.85, -44.05, 0.7)
pt3dadd(-561.23, 302.4, -44.05, 0.7)
pt3dadd(-563.69, 305.83, -44.05, 0.7)
pt3dadd(-564.97, 305.14, -44.05, 0.7)
pt3dadd(-566.83, 305.39, -44.05, 0.7)
pt3dadd(-567.96, 304.81, -44.05, 0.7)
pt3dadd(-570.2, 306.49, -44.05, 0.7)
pt3dadd(-571.86, 304.99, -44.05, 0.7)
pt3dadd(-575.32, 307.36, -44.05, 0.7)
}
dend[116] {pt3dclear()
pt3dadd(-557.47, 300.21, -46.01, 0.35)
pt3dadd(-555.47, 301.33, -47.97, 0.35)
pt3dadd(-552.13, 300.86, -47.97, 0.35)
pt3dadd(-551.62, 301.32, -47.97, 0.35)
pt3dadd(-550.73, 302.65, -48.95, 0.35)
pt3dadd(-549.76, 300.01, -48.95, 0.35)
pt3dadd(-546.98, 302.11, -48.95, 0.35)
pt3dadd(-544.54, 301.19, -48.95, 0.35)
pt3dadd(-544.74, 300.89, -48.95, 0.35)
pt3dadd(-540.13, 298.89, -48.95, 0.35)
pt3dadd(-536.53, 298.99, -54.82, 0.35)
pt3dadd(-532.03, 300.6, -54.82, 0.35)
pt3dadd(-530.35, 297.92, -56.78, 0.35)
pt3dadd(-525.14, 296.26, -60.7, 0.35)
pt3dadd(-521.84, 293.19, -61.68, 0.35)
pt3dadd(-520.53, 294.88, -62.66, 0.35)
pt3dadd(-518.69, 294.75, -62.66, 0.35)
pt3dadd(-515.87, 297.52, -62.66, 0.35)
pt3dadd(-516.06, 299.62, -62.66, 0.35)
pt3dadd(-513.46, 302.29, -63.63, 0.35)
pt3dadd(-511.75, 303.46, -63.63, 0.35)
pt3dadd(-510.16, 304.37, -66.57, 0.35)
pt3dadd(-507.88, 306.89, -67.55, 0.35)
pt3dadd(-506.03, 307.48, -67.55, 0.35)
pt3dadd(-501.29, 306.9, -67.55, 0.35)
pt3dadd(-496.67, 306.03, -70.49, 0.35)
pt3dadd(-494.51, 304.04, -71.47, 0.35)
pt3dadd(-492.35, 302.14, -72.45, 0.35)
pt3dadd(-489.28, 300.89, -74.4, 0.35)
pt3dadd(-484.86, 302.38, -74.4, 0.35)
pt3dadd(-482.54, 300.2, -74.4, 0.35)
pt3dadd(-478.69, 298.12, -74.4, 0.35)
pt3dadd(-475.84, 295.91, -74.4, 0.35)
pt3dadd(-472.78, 293.39, -74.4, 0.35)
pt3dadd(-469.94, 290.72, -77.34, 0.35)
pt3dadd(-468.58, 288.19, -77.34, 0.35)
pt3dadd(-466.48, 286.65, -77.34, 0.35)
pt3dadd(-462.87, 286.88, -77.34, 0.35)
pt3dadd(-459.23, 283.98, -79.3, 0.35)
pt3dadd(-454.95, 279.46, -79.3, 0.35)
pt3dadd(-450.61, 277.54, -79.3, 0.35)
pt3dadd(-447.84, 275.2, -79.3, 0.35)
pt3dadd(-444.34, 273.24, -79.3, 0.35)
pt3dadd(-441.32, 270.49, -79.3, 0.35)
pt3dadd(-436.93, 267.97, -82.24, 0.35)
}
}
proc shape3d_22() {
dend[116] { }
dend[117] {pt3dclear()
pt3dadd(-531.44, 177.42, -6.85, 0.7)
pt3dadd(-534.07, 179.47, -8.81, 0.7)
pt3dadd(-533.76, 179.3, -8.81, 0.7)
pt3dadd(-535.94, 182.04, -8.81, 0.7)
pt3dadd(-537.36, 185.22, -7.83, 0.7)
pt3dadd(-539.63, 188.29, -7.83, 0.7)
pt3dadd(-538.2, 191.76, -7.83, 0.7)
pt3dadd(-538.8, 195.94, -7.83, 0.7)
pt3dadd(-540.08, 198.03, -7.83, 0.7)
pt3dadd(-539.21, 201.81, -10.77, 0.7)
pt3dadd(-538.58, 204.44, -6.85, 0.7)
pt3dadd(-538.67, 208.12, -6.85, 0.7)
pt3dadd(-539.4, 211.17, -6.85, 0.7)
pt3dadd(-540.47, 214.25, -6.85, 0.7)
pt3dadd(-539.76, 216.44, -6.85, 0.7)
pt3dadd(-540.26, 218.38, -4.89, 0.7)
pt3dadd(-539.32, 221.66, 0.98, 0.7)
pt3dadd(-541.27, 225.16, 2.94, 0.7)
pt3dadd(-541.04, 227.28, 2.94, 0.7)
pt3dadd(-541.21, 228.72, 2.94, 0.7)
pt3dadd(-542.65, 230.45, 8.81, 0.7)
pt3dadd(-544.52, 232.19, 9.79, 0.7)
pt3dadd(-545.68, 235.53, 12.73, 0.7)
pt3dadd(-547.21, 236.84, 11.75, 0.7)
pt3dadd(-548.29, 238.94, 11.75, 0.7)
pt3dadd(-550.18, 239.04, 11.75, 0.7)
pt3dadd(-550.05, 243.17, 12.73, 0.7)
pt3dadd(-551.63, 246.59, 12.73, 0.7)
pt3dadd(-551.47, 249.65, 16.64, 0.7)
pt3dadd(-551.57, 252.08, 16.64, 0.7)
pt3dadd(-551.09, 255.31, 16.64, 0.7)
pt3dadd(-551.23, 256.78, 22.52, 0.7)
pt3dadd(-552.86, 257.84, 22.52, 0.7)
pt3dadd(-552.68, 260.69, 22.52, 0.35)
pt3dadd(-554.58, 261.49, 22.52, 0.35)
pt3dadd(-554.15, 264.44, 24.47, 0.35)
pt3dadd(-552.75, 264.58, 25.45, 0.35)
pt3dadd(-551.88, 264.11, 25.45, 0.35)
pt3dadd(-553.33, 266.93, 33.29, 0.35)
pt3dadd(-553.85, 268.96, 33.29, 0.35)
pt3dadd(-554.42, 269.67, 42.1, 0.35)
pt3dadd(-552.77, 271.86, 42.1, 0.35)
pt3dadd(-553.07, 274.22, 45.03, 0.35)
pt3dadd(-551.84, 275.18, 46.01, 0.35)
pt3dadd(-550.45, 276.06, 52.87, 0.35)
pt3dadd(-550.28, 276.65, 47.97, 0.35)
}
dend[118] {pt3dclear()
pt3dadd(-513.07, 108.17, -0.98, 2.78)
pt3dadd(-510.23, 109.24, -2.94, 2.78)
pt3dadd(-507.78, 111.13, -2.94, 2.44)
pt3dadd(-505.3, 112.36, -2.94, 2.09)
pt3dadd(-502.71, 113.88, -2.94, 2.09)
pt3dadd(-500.36, 115.77, -1.96, 2.09)
pt3dadd(-497.38, 117.3, -1.96, 2.09)
pt3dadd(-494.29, 119.58, -1.96, 2.09)
pt3dadd(-490.97, 121.08, -1.96, 2.09)
pt3dadd(-488.94, 122.21, -1.96, 2.09)
}
dend[119] {pt3dclear()
pt3dadd(-488.94, 122.21, -1.96, 2.09)
pt3dadd(-488.17, 123.84, -2.94, 2.09)
pt3dadd(-486.21, 126.2, -2.94, 2.09)
pt3dadd(-484.55, 129.52, -4.89, 1.39)
pt3dadd(-481.89, 132.08, -4.89, 1.39)
pt3dadd(-479.3, 135.22, -4.89, 1.39)
pt3dadd(-477.23, 137.25, -4.89, 1.39)
pt3dadd(-475.42, 138.81, -4.89, 1.39)
pt3dadd(-473.01, 141.53, -7.83, 1.39)
pt3dadd(-470.43, 143.86, -7.83, 1.39)
pt3dadd(-469.54, 145.11, -7.83, 1.39)
pt3dadd(-467.18, 146.83, -7.83, 1.04)
pt3dadd(-464.75, 149.49, -7.83, 1.04)
pt3dadd(-464.21, 151.64, -11.75, 1.04)
pt3dadd(-463.38, 153.41, -11.75, 1.39)
pt3dadd(-460.58, 154.81, -11.75, 1.39)
pt3dadd(-456.16, 157.44, -12.73, 1.04)
pt3dadd(-452.14, 159.75, -12.73, 1.04)
pt3dadd(-448.96, 161.79, -12.73, 1.04)
pt3dadd(-447.35, 164.32, -12.73, 1.39)
pt3dadd(-445.86, 167.33, -12.73, 1.39)
pt3dadd(-444.76, 170.27, -12.73, 1.39)
pt3dadd(-442.15, 172.35, -12.73, 1.39)
pt3dadd(-439.79, 174.28, -12.73, 1.04)
pt3dadd(-438.32, 177.25, -17.62, 1.04)
pt3dadd(-436.39, 179.95, -17.62, 1.04)
pt3dadd(-435.72, 181.74, -16.64, 1.39)
pt3dadd(-432.44, 182.88, -16.64, 1.39)
pt3dadd(-429.7, 186.16, -16.64, 1.39)
pt3dadd(-429.4, 185.99, -16.64, 1.39)
pt3dadd(-426.44, 188.16, -24.47, 1.04)
pt3dadd(-426.1, 190.65, -24.47, 1.04)
pt3dadd(-423.61, 191.83, -24.47, 1.04)
pt3dadd(-420.86, 192.62, -25.45, 1.04)
pt3dadd(-417.7, 194.23, -25.45, 1.04)
pt3dadd(-415.14, 194.59, -25.45, 1.04)
pt3dadd(-413.13, 195.7, -29.37, 1.04)
pt3dadd(-410.63, 194.84, -29.37, 1.04)
pt3dadd(-408.38, 193.55, -29.37, 1.04)
pt3dadd(-405.67, 194.45, -33.29, 1.04)
pt3dadd(-404.59, 194.62, -34.26, 1.04)
}
dend[120] {pt3dclear()
pt3dadd(-404.59, 194.62, -34.26, 1.04)
pt3dadd(-402.06, 193.93, -31.33, 1.04)
pt3dadd(-400.46, 192.9, -31.33, 1.04)
pt3dadd(-399.26, 193.27, -31.33, 1.04)
pt3dadd(-397.21, 192.44, -31.33, 1.04)
pt3dadd(-394.04, 194.87, -35.24, 1.04)
pt3dadd(-391.72, 194.91, -35.24, 1.04)
pt3dadd(-389.81, 197.24, -35.24, 1.04)
pt3dadd(-386.39, 197.53, -35.24, 1.04)
pt3dadd(-383.49, 199.58, -35.24, 1.04)
pt3dadd(-382.29, 201.47, -35.24, 1.04)
pt3dadd(-378.66, 204.02, -35.24, 0.7)
pt3dadd(-376.13, 205.44, -35.24, 0.7)
pt3dadd(-374.36, 206.32, -35.24, 0.7)
pt3dadd(-370.56, 207.17, -35.24, 0.7)
pt3dadd(-368, 209.52, -35.24, 0.7)
pt3dadd(-365.25, 211.23, -35.24, 0.7)
pt3dadd(-361.8, 211.55, -35.24, 0.7)
pt3dadd(-360.56, 212.69, -39.16, 0.7)
pt3dadd(-359.89, 214.96, -39.16, 0.7)
pt3dadd(-359.87, 216.43, -39.16, 0.7)
pt3dadd(-360.17, 216.6, -39.16, 0.7)
pt3dadd(-358.21, 218.15, -45.03, 0.7)
pt3dadd(-355.67, 219.99, -46.99, 0.7)
pt3dadd(-355.55, 222.1, -46.99, 0.7)
pt3dadd(-352.3, 226.62, -47.97, 0.7)
pt3dadd(-349.55, 228.53, -47.97, 0.7)
pt3dadd(-349.15, 229.72, -49.93, 0.7)
pt3dadd(-346.57, 230.74, -50.91, 0.7)
pt3dadd(-346.11, 232.13, -50.91, 0.7)
}
dend[121] {pt3dclear()
pt3dadd(-346.11, 232.13, -50.91, 0.7)
pt3dadd(-340.95, 234.47, -48.95, 0.7)
pt3dadd(-340.95, 234.47, -47.97, 0.7)
pt3dadd(-336.65, 234.65, -47.97, 0.7)
pt3dadd(-333.34, 233.2, -47.97, 0.7)
}
dend[122] {pt3dclear()
pt3dadd(-333.34, 233.2, -47.97, 0.7)
pt3dadd(-331.6, 230.98, -48.95, 0.7)
pt3dadd(-331.36, 229.06, -48.95, 0.7)
pt3dadd(-329.72, 226.7, -52.87, 0.35)
pt3dadd(-329.62, 222.52, -52.87, 0.35)
pt3dadd(-326.45, 220.72, -52.87, 0.35)
pt3dadd(-323.63, 218.3, -53.84, 0.35)
pt3dadd(-321.45, 216.25, -53.84, 0.35)
pt3dadd(-320.78, 215.3, -54.82, 0.35)
}
dend[123] {pt3dclear()
pt3dadd(-333.34, 233.2, -47.97, 0.7)
pt3dadd(-329.35, 235.64, -46.99, 0.7)
pt3dadd(-323.6, 236.27, -46.99, 0.7)
pt3dadd(-319.43, 234.09, -46.99, 0.7)
pt3dadd(-317.94, 232.84, -46.99, 0.7)
pt3dadd(-315.19, 231.92, -46.99, 0.7)
pt3dadd(-312.91, 230.27, -46.99, 0.7)
pt3dadd(-310, 229.02, -46.99, 0.7)
pt3dadd(-305.8, 226.92, -46.99, 0.7)
pt3dadd(-301.19, 225.52, -46.99, 0.7)
pt3dadd(-296.31, 223.89, -45.03, 0.7)
pt3dadd(-292.61, 221.77, -50.91, 0.35)
pt3dadd(-286.64, 223.79, -44.05, 0.35)
pt3dadd(-279.32, 225.04, -43.08, 0.35)
pt3dadd(-275.03, 227.2, -42.1, 0.35)
pt3dadd(-268.89, 228.01, -42.1, 0.35)
pt3dadd(-264.25, 228.87, -42.1, 0.35)
pt3dadd(-257.95, 230.55, -43.08, 0.35)
pt3dadd(-255.05, 228.26, -44.05, 0.35)
pt3dadd(-249.54, 229.26, -44.05, 0.35)
pt3dadd(-244.55, 231.45, -45.03, 0.35)
pt3dadd(-238.44, 230.59, -45.03, 0.35)
pt3dadd(-234.74, 229.1, -45.03, 0.35)
pt3dadd(-231.42, 229.65, -45.03, 0.35)
pt3dadd(-227.24, 226.31, -44.05, 0.35)
pt3dadd(-220.04, 228.85, -44.05, 0.35)
pt3dadd(-212.36, 232.15, -43.08, 0.35)
pt3dadd(-203.39, 235.8, -48.95, 0.35)
pt3dadd(-198.27, 233.97, -49.93, 0.35)
pt3dadd(-193.24, 236.33, -49.93, 0.35)
pt3dadd(-186.41, 240.47, -49.93, 0.35)
pt3dadd(-175.91, 242.38, -49.93, 0.35)
pt3dadd(-169.82, 242.14, -49.93, 0.35)
pt3dadd(-165.91, 240.3, -56.78, 0.35)
pt3dadd(-161, 240.64, -56.78, 0.35)
pt3dadd(-154.97, 236.42, -56.78, 0.35)
}
dend[124] {pt3dclear()
pt3dadd(-346.11, 232.13, -50.91, 0.7)
pt3dadd(-344.44, 235.47, -52.87, 0.7)
pt3dadd(-341.78, 237.64, -53.84, 0.7)
pt3dadd(-338.46, 240.36, -53.84, 0.7)
pt3dadd(-337.06, 241.49, -53.84, 0.35)
pt3dadd(-334.65, 244.29, -53.84, 0.35)
pt3dadd(-332.06, 245.34, -53.84, 0.35)
pt3dadd(-327.35, 249.56, -59.72, 0.35)
pt3dadd(-322.95, 254.37, -59.72, 0.35)
pt3dadd(-320.7, 253.78, -59.72, 0.35)
pt3dadd(-318.5, 254.41, -60.7, 0.35)
pt3dadd(-314.28, 254.31, -65.59, 0.35)
pt3dadd(-309.73, 253.36, -65.59, 0.35)
pt3dadd(-307.28, 253.63, -70.49, 0.35)
pt3dadd(-305.79, 252.45, -71.47, 0.35)
pt3dadd(-304.01, 254.67, -71.47, 0.35)
pt3dadd(-301.45, 256.56, -71.47, 0.35)
pt3dadd(-301.27, 258.48, -71.47, 0.35)
pt3dadd(-298.1, 258.98, -74.4, 0.35)
pt3dadd(-297.26, 261.86, -74.4, 0.35)
pt3dadd(-295.32, 261.35, -74.4, 0.35)
}
dend[125] {pt3dclear()
pt3dadd(-404.59, 194.62, -34.26, 0.7)
pt3dadd(-403.13, 196.87, -39.16, 0.7)
}
}
proc shape3d_23() {
dend[125] { pt3dadd(-404.29, 198.36, -39.16, 0.7)
pt3dadd(-402.29, 200.88, -39.16, 0.7)
pt3dadd(-402.63, 203.71, -39.16, 0.7)
pt3dadd(-400.1, 206.26, -39.16, 0.7)
pt3dadd(-399.93, 206.56, -39.16, 0.7)
pt3dadd(-398.25, 210.51, -39.16, 0.7)
pt3dadd(-396.53, 215.06, -43.08, 0.7)
pt3dadd(-393.29, 219.55, -43.08, 0.7)
pt3dadd(-391.53, 222.25, -43.08, 0.7)
pt3dadd(-389.18, 223.96, -43.08, 0.7)
pt3dadd(-386.31, 227.59, -44.05, 0.7)
pt3dadd(-383.95, 231.54, -44.05, 0.7)
pt3dadd(-380.02, 236.74, -44.05, 0.7)
pt3dadd(-377.94, 240.08, -46.01, 0.7)
pt3dadd(-376.49, 243.74, -46.01, 0.7)
pt3dadd(-376.22, 247.84, -46.99, 0.7)
pt3dadd(-373.67, 250.65, -46.99, 0.7)
pt3dadd(-373.4, 253.53, -46.99, 0.7)
pt3dadd(-371.92, 257.54, -46.99, 0.7)
pt3dadd(-371.29, 260.97, -46.99, 0.7)
pt3dadd(-369.15, 264.36, -46.99, 0.7)
pt3dadd(-367.53, 269.31, -46.99, 0.7)
pt3dadd(-365.37, 273.32, -47.97, 0.35)
pt3dadd(-364.03, 275.99, -46.99, 0.35)
pt3dadd(-364.19, 279.23, -46.99, 0.35)
pt3dadd(-361.42, 283.62, -46.99, 0.35)
pt3dadd(-359.3, 287.35, -46.99, 0.35)
pt3dadd(-356.65, 292.01, -49.93, 0.35)
pt3dadd(-352.8, 297.37, -49.93, 0.35)
pt3dadd(-351.59, 299.91, -50.91, 0.35)
pt3dadd(-349.34, 301.04, -50.91, 0.35)
pt3dadd(-348.94, 304.04, -50.91, 0.35)
}
dend[126] {pt3dclear()
pt3dadd(-488.94, 122.21, -1.96, 1.39)
pt3dadd(-486.79, 122.06, -2.94, 1.39)
pt3dadd(-484.35, 121.19, -2.94, 1.04)
pt3dadd(-480.88, 121.54, -2.94, 1.04)
pt3dadd(-477.13, 122.47, -2.94, 1.04)
pt3dadd(-474.19, 121.98, -0.98, 1.04)
pt3dadd(-471, 121.73, -0.98, 1.04)
pt3dadd(-467.67, 121.21, -0.98, 1.04)
pt3dadd(-463.68, 121.55, -0.98, 1.04)
pt3dadd(-460.92, 121.23, 0.98, 1.04)
pt3dadd(-458.09, 119.14, 0.98, 1.04)
pt3dadd(-455.64, 118.98, 0.98, 1.04)
pt3dadd(-454.39, 116.93, 2.94, 1.04)
pt3dadd(-452.43, 116.55, 2.94, 1.04)
pt3dadd(-451.89, 114.41, 2.94, 1.04)
pt3dadd(-448.8, 114.38, 10.77, 1.04)
pt3dadd(-446.24, 112.98, 10.77, 1.04)
pt3dadd(-443.32, 110.81, 10.77, 1.04)
pt3dadd(-441.82, 111.15, 12.73, 1.04)
pt3dadd(-439.43, 109.94, 12.73, 1.04)
pt3dadd(-436.12, 110.53, 17.62, 1.04)
pt3dadd(-434.59, 109.3, 17.62, 1.04)
pt3dadd(-432.68, 109.08, 17.62, 1.04)
pt3dadd(-431.31, 110.28, 20.56, 1.04)
pt3dadd(-426.3, 109.63, 21.54, 1.04)
pt3dadd(-422.73, 109.92, 21.54, 1.04)
pt3dadd(-419.93, 110.72, 21.54, 1.04)
pt3dadd(-416.84, 111.66, 28.39, 1.04)
pt3dadd(-414.12, 112.1, 26.43, 1.04)
pt3dadd(-410.81, 111.3, 26.43, 0.7)
pt3dadd(-408.43, 112.17, 29.37, 0.7)
pt3dadd(-406.78, 114.56, 29.37, 0.7)
pt3dadd(-405.08, 115.82, 36.22, 0.7)
pt3dadd(-401.92, 114.82, 37.2, 0.7)
pt3dadd(-399.74, 115.9, 37.2, 0.7)
pt3dadd(-398.03, 115.49, 41.12, 0.7)
pt3dadd(-396.24, 113.68, 41.12, 0.7)
pt3dadd(-393.24, 112.65, 42.1, 0.7)
pt3dadd(-393.08, 111.18, 42.1, 0.7)
pt3dadd(-390.65, 111.89, 45.03, 0.7)
pt3dadd(-389.47, 110.95, 45.03, 0.7)
pt3dadd(-387.84, 112.83, 45.03, 0.7)
pt3dadd(-386.23, 112.95, 50.91, 0.7)
pt3dadd(-384.24, 113.8, 51.89, 0.7)
pt3dadd(-382.78, 112.01, 51.89, 0.7)
pt3dadd(-379.92, 113.14, 53.84, 0.7)
pt3dadd(-380.23, 114.78, 53.84, 0.7)
pt3dadd(-378.18, 115.49, 57.76, 0.7)
pt3dadd(-376.48, 116.47, 57.76, 0.7)
pt3dadd(-374.05, 116.36, 58.74, 0.35)
}
dend[127] {pt3dclear()
pt3dadd(-374.05, 116.36, 58.74, 0.35)
pt3dadd(-371.3, 112.9, 58.74, 0.35)
pt3dadd(-366.99, 113.01, 59.72, 0.35)
pt3dadd(-364.29, 111.24, 59.72, 0.35)
pt3dadd(-360.3, 109.57, 62.66, 0.35)
pt3dadd(-356.31, 108.38, 62.66, 0.35)
pt3dadd(-353.13, 107.3, 62.66, 0.35)
pt3dadd(-350.2, 106.75, 51.89, 0.35)
pt3dadd(-346.24, 106.52, 51.89, 0.35)
pt3dadd(-343.24, 108.98, 52.87, 0.35)
pt3dadd(-339.87, 110.76, 52.87, 0.35)
pt3dadd(-337.95, 112.93, 52.87, 0.35)
pt3dadd(-337.7, 114.65, 51.89, 0.35)
}
dend[128] {pt3dclear()
pt3dadd(-374.05, 116.36, 58.74, 0.35)
pt3dadd(-373.44, 119.6, 61.68, 0.35)
pt3dadd(-370.77, 121.96, 61.68, 0.35)
pt3dadd(-368.02, 123.22, 60.7, 0.35)
pt3dadd(-365.82, 124.76, 65.59, 0.35)
pt3dadd(-365.04, 124.61, 65.59, 0.35)
pt3dadd(-362.21, 125.28, 65.59, 0.35)
pt3dadd(-360.23, 126.65, 66.57, 0.35)
pt3dadd(-360.23, 126.65, 67.55, 0.35)
pt3dadd(-359.03, 127.86, 68.53, 0.35)
pt3dadd(-356.66, 128.6, 72.45, 0.35)
pt3dadd(-354.4, 130.9, 74.4, 0.35)
pt3dadd(-354.44, 133.09, 76.36, 0.35)
pt3dadd(-351.7, 133.69, 78.32, 0.35)
pt3dadd(-349.51, 135.43, 82.24, 0.35)
pt3dadd(-347.71, 137.1, 85.17, 0.35)
pt3dadd(-346.65, 136.37, 86.15, 0.35)
pt3dadd(-343.11, 138.41, 88.11, 0.35)
pt3dadd(-343.5, 139.24, 91.05, 0.35)
pt3dadd(-339.96, 139.32, 91.05, 0.35)
pt3dadd(-337.23, 138.69, 91.05, 0.35)
pt3dadd(-337.01, 141.39, 89.09, 0.35)
}
dend[129] {pt3dclear()
pt3dadd(-516.38, 99.4, 0, 3.48)
pt3dadd(-518.15, 101.65, -3.92, 3.48)
pt3dadd(-519.05, 103.6, -3.92, 3.48)
pt3dadd(-520.33, 106, -10.77, 2.44)
pt3dadd(-521.19, 108.33, -10.77, 2.44)
pt3dadd(-522.56, 110.48, -10.77, 2.44)
pt3dadd(-523.63, 113.05, -13.71, 2.09)
pt3dadd(-523.71, 115.35, -13.71, 2.09)
pt3dadd(-523.99, 117.69, -14.68, 2.09)
pt3dadd(-525.78, 118.98, -18.6, 2.09)
pt3dadd(-528.37, 118.99, -21.54, 2.09)
pt3dadd(-530.49, 117.59, -24.47, 2.09)
pt3dadd(-531.96, 118.23, -27.41, 2.09)
pt3dadd(-533.13, 119.82, -27.41, 2.09)
pt3dadd(-533.76, 122.44, -32.31, 2.09)
pt3dadd(-534.77, 123.8, -32.31, 2.09)
pt3dadd(-533.66, 125.89, -37.2, 2.09)
pt3dadd(-531.69, 127.24, -37.2, 2.09)
pt3dadd(-530.35, 127.97, -42.1, 2.09)
pt3dadd(-528.16, 127.59, -42.1, 2.09)
pt3dadd(-527.92, 129.41, -49.93, 2.09)
pt3dadd(-527.08, 130.89, -48.95, 2.09)
pt3dadd(-528.61, 132.06, -48.95, 1.74)
pt3dadd(-530.86, 133.28, -48.95, 1.74)
pt3dadd(-532.52, 135.28, -53.84, 1.74)
pt3dadd(-531.28, 137.3, -54.82, 1.04)
}
dend[130] {pt3dclear()
pt3dadd(-531.28, 137.3, -54.82, 1.04)
pt3dadd(-529.17, 135.45, -58.74, 1.04)
pt3dadd(-523.75, 134.45, -58.74, 1.04)
pt3dadd(-521.14, 133.11, -62.66, 0.7)
pt3dadd(-517.97, 131.55, -62.66, 0.7)
pt3dadd(-516.24, 130.35, -66.57, 0.7)
pt3dadd(-515.34, 129, -66.57, 0.7)
pt3dadd(-514.71, 130.35, -70.49, 0.7)
pt3dadd(-514.31, 131.54, -71.47, 0.7)
pt3dadd(-512.09, 131.35, -74.4, 0.7)
pt3dadd(-509.08, 133.62, -75.38, 0.7)
pt3dadd(-506.37, 136.68, -75.38, 0.7)
pt3dadd(-506.53, 138.02, -75.38, 0.7)
pt3dadd(-505.37, 139.29, -75.38, 0.7)
pt3dadd(-505.8, 140.67, -75.38, 0.7)
pt3dadd(-504.93, 142.14, -75.38, 0.7)
pt3dadd(-501.78, 141.8, -79.3, 0.7)
pt3dadd(-499.18, 142.94, -82.24, 0.7)
pt3dadd(-497.15, 145.01, -83.21, 0.7)
pt3dadd(-493.06, 145.78, -84.19, 0.7)
pt3dadd(-489.3, 143.84, -84.19, 0.7)
pt3dadd(-488.44, 147.35, -93, 0.35)
pt3dadd(-487.2, 150.57, -93.98, 0.35)
pt3dadd(-486.45, 152.46, -93.98, 0.35)
}
dend[131] {pt3dclear()
pt3dadd(-486.45, 152.46, -93.98, 0.35)
pt3dadd(-484.09, 153.19, -93.98, 0.35)
pt3dadd(-480.95, 155.56, -93.98, 0.35)
pt3dadd(-477.89, 154.82, -93.98, 0.35)
pt3dadd(-477.19, 153.96, -97.9, 0.35)
}
dend[132] {pt3dclear()
pt3dadd(-477.19, 153.96, -97.9, 0.35)
pt3dadd(-475.3, 152.66, -97.9, 0.35)
pt3dadd(-475.75, 150.4, -97.9, 0.35)
pt3dadd(-477.01, 149.08, -102.79, 0.35)
pt3dadd(-477.74, 148.85, -102.79, 0.35)
pt3dadd(-479.25, 148.46, -102.79, 0.35)
pt3dadd(-481.25, 147.31, -106.71, 0.35)
pt3dadd(-483.58, 146.73, -108.67, 0.35)
pt3dadd(-485.31, 148.2, -110.63, 0.35)
pt3dadd(-487.79, 150.28, -113.56, 0.35)
pt3dadd(-489.16, 148.63, -117.48, 0.35)
pt3dadd(-490.67, 146.85, -121.4, 0.35)
pt3dadd(-494.29, 146.66, -125.31, 0.35)
pt3dadd(-496.24, 145.17, -127.27, 0.35)
pt3dadd(-499.14, 146.53, -124.33, 0.35)
pt3dadd(-499.14, 148.01, -144.89, 0.35)
pt3dadd(-500.51, 147.94, -153.7, 0.35)
}
dend[133] {pt3dclear()
pt3dadd(-500.51, 147.94, -153.7, 0.35)
pt3dadd(-501.02, 149.55, -153.7, 0.35)
pt3dadd(-500.95, 151.61, -153.7, 0.35)
pt3dadd(-503.28, 153.8, -156.64, 0.35)
pt3dadd(-504.01, 155.7, -156.64, 0.35)
pt3dadd(-506.71, 157.71, -156.64, 0.35)
pt3dadd(-507.48, 161.29, -156.64, 0.35)
pt3dadd(-510.08, 163.39, -156.64, 0.35)
pt3dadd(-511.62, 167.23, -156.64, 0.35)
pt3dadd(-512.4, 167.54, -156.64, 0.35)
pt3dadd(-515.28, 169.79, -156.64, 0.35)
}
}
proc shape3d_24() {
dend[133] { pt3dadd(-513.73, 172.35, -160.55, 0.35)
pt3dadd(-516.06, 174.13, -160.55, 0.35)
pt3dadd(-517.37, 176.73, -160.55, 0.35)
pt3dadd(-517.31, 177.02, -161.53, 0.35)
pt3dadd(-518.26, 178.04, -161.53, 0.35)
pt3dadd(-520.14, 179.01, -161.53, 0.35)
pt3dadd(-521.91, 180.91, -161.53, 0.35)
pt3dadd(-522.98, 183.61, -161.53, 0.35)
pt3dadd(-525.58, 183.72, -161.53, 0.35)
pt3dadd(-527.41, 184.88, -161.53, 0.35)
pt3dadd(-529.48, 185.48, -165.45, 0.35)
pt3dadd(-532.74, 188.91, -165.45, 0.35)
pt3dadd(-532.97, 191.25, -166.43, 0.35)
pt3dadd(-533.49, 193.03, -166.43, 0.35)
pt3dadd(-534.55, 195.04, -166.43, 0.35)
pt3dadd(-535, 198.18, -167.41, 0.35)
pt3dadd(-535.98, 200.75, -163.49, 0.35)
pt3dadd(-536.61, 203.79, -163.49, 0.35)
pt3dadd(-538.11, 206.69, -164.47, 0.35)
pt3dadd(-536.78, 210.07, -168.39, 0.35)
pt3dadd(-536.59, 212.78, -168.39, 0.35)
pt3dadd(-536.77, 215.75, -168.39, 0.35)
pt3dadd(-538.06, 217.7, -168.39, 0.35)
pt3dadd(-541.06, 219.34, -169.37, 0.35)
pt3dadd(-543.44, 220.94, -169.37, 0.35)
pt3dadd(-545.13, 223.2, -169.37, 0.35)
pt3dadd(-548.87, 223.06, -169.37, 0.35)
pt3dadd(-551.01, 225.02, -171.32, 0.35)
pt3dadd(-553.91, 226.21, -172.3, 0.35)
pt3dadd(-556.43, 229.6, -172.3, 0.35)
pt3dadd(-560.18, 232.93, -171.32, 0.35)
}
dend[134] {pt3dclear()
pt3dadd(-500.51, 147.94, -153.7, 0.35)
pt3dadd(-497.67, 145.48, -151.74, 0.35)
pt3dadd(-496.59, 142.63, -150.76, 0.35)
pt3dadd(-494.74, 138.68, -150.76, 0.35)
pt3dadd(-492.94, 135.34, -150.76, 0.35)
pt3dadd(-492.01, 132.75, -150.76, 0.35)
pt3dadd(-490.35, 129.96, -149.79, 0.35)
pt3dadd(-490.11, 128.23, -149.79, 0.35)
pt3dadd(-489.08, 125.44, -149.79, 0.35)
pt3dadd(-487.97, 123.63, -149.79, 0.35)
pt3dadd(-487.86, 121.7, -148.81, 0.35)
pt3dadd(-485.26, 121.58, -148.81, 0.35)
pt3dadd(-485.24, 118.61, -148.81, 0.35)
pt3dadd(-484.96, 113.56, -148.81, 0.35)
pt3dadd(-483.48, 110, -147.83, 0.35)
pt3dadd(-484.49, 106.65, -149.79, 0.35)
pt3dadd(-484.36, 102.85, -144.89, 0.35)
pt3dadd(-481.81, 100.44, -144.89, 0.35)
pt3dadd(-480.78, 97.48, -145.87, 0.35)
pt3dadd(-481.36, 94.18, -145.87, 0.35)
pt3dadd(-479.17, 90.4, -145.87, 0.35)
pt3dadd(-477.89, 88.12, -145.87, 0.35)
pt3dadd(-475.71, 85.78, -145.87, 0.35)
pt3dadd(-474.74, 81.45, -145.87, 0.35)
}
dend[135] {pt3dclear()
pt3dadd(-474.74, 81.45, -145.87, 0.35)
pt3dadd(-471.64, 80.63, -145.87, 0.35)
pt3dadd(-467.58, 78.02, -145.87, 0.35)
pt3dadd(-464.36, 73.54, -145.87, 0.35)
}
dend[136] {pt3dclear()
pt3dadd(-474.74, 81.45, -145.87, 0.35)
pt3dadd(-475.18, 77.99, -145.87, 0.35)
pt3dadd(-475.7, 75.41, -146.85, 0.35)
pt3dadd(-473.9, 72.15, -146.85, 0.35)
pt3dadd(-472.94, 69.6, -141.95, 0.35)
pt3dadd(-470.44, 65.23, -139.02, 0.35)
pt3dadd(-470.77, 61.54, -137.06, 0.35)
pt3dadd(-475, 56.76, -134.12, 0.35)
pt3dadd(-475.4, 52.18, -126.29, 0.35)
pt3dadd(-476.71, 48.04, -125.31, 0.35)
pt3dadd(-475.46, 42.98, -125.31, 0.35)
pt3dadd(-475.46, 42.98, -124.33, 0.35)
pt3dadd(-476.74, 40.11, -122.37, 0.35)
pt3dadd(-478.17, 37.26, -122.37, 0.35)
pt3dadd(-476.28, 33.62, -119.44, 0.35)
}
dend[137] {pt3dclear()
pt3dadd(-476.28, 33.62, -119.44, 0.35)
pt3dadd(-473.91, 28.92, -118.46, 0.35)
pt3dadd(-472.49, 24.85, -118.46, 0.35)
pt3dadd(-470.26, 21.49, -118.46, 0.35)
pt3dadd(-470.49, 21.75, -118.46, 0.35)
pt3dadd(-469.49, 17.84, -118.46, 0.35)
pt3dadd(-468.47, 13.95, -118.46, 0.35)
pt3dadd(-468.3, 10.71, -118.46, 0.35)
pt3dadd(-467.06, 7.48, -113.56, 0.35)
pt3dadd(-464.13, 3.54, -113.56, 0.35)
pt3dadd(-461.79, -1.52, -115.52, 0.35)
pt3dadd(-461.79, -1.52, -116.5, 0.35)
}
dend[138] {pt3dclear()
pt3dadd(-476.28, 33.62, -119.44, 0.35)
pt3dadd(-479.97, 31.02, -120.42, 0.35)
pt3dadd(-483.43, 29.13, -120.42, 0.35)
pt3dadd(-484.47, 25.78, -120.42, 0.35)
pt3dadd(-487.31, 24.47, -120.42, 0.35)
pt3dadd(-490.17, 23.57, -115.52, 0.35)
pt3dadd(-491.9, 21.6, -115.52, 0.35)
pt3dadd(-494.12, 18.27, -114.54, 0.35)
pt3dadd(-492.61, 16.29, -112.58, 0.35)
pt3dadd(-493.62, 15.31, -111.61, 0.35)
pt3dadd(-494.13, 14.67, -109.65, 0.35)
pt3dadd(-494.35, 14.94, -109.65, 0.35)
}
dend[139] {pt3dclear()
pt3dadd(-477.19, 153.96, -97.9, 0.35)
pt3dadd(-472.75, 154.97, -96.92, 0.35)
pt3dadd(-469.68, 153, -96.92, 0.35)
pt3dadd(-466.57, 151.17, -96.92, 0.35)
pt3dadd(-464.12, 147.77, -96.92, 0.35)
pt3dadd(-460.61, 145.2, -96.92, 0.35)
pt3dadd(-456.61, 145.28, -100.84, 0.35)
pt3dadd(-452.04, 146.1, -100.84, 0.35)
pt3dadd(-448.55, 147.29, -100.84, 0.35)
pt3dadd(-445.86, 146.62, -100.84, 0.35)
pt3dadd(-443.56, 147.85, -100.84, 0.35)
pt3dadd(-440.18, 145.81, -101.82, 0.35)
pt3dadd(-438.88, 147.06, -101.82, 0.35)
pt3dadd(-435.94, 146.68, -104.75, 0.35)
pt3dadd(-434.76, 143.89, -105.73, 0.35)
pt3dadd(-433.02, 141.13, -105.73, 0.35)
}
dend[140] {pt3dclear()
pt3dadd(-486.45, 152.46, -93.98, 0.35)
pt3dadd(-487.86, 156.21, -93, 0.35)
pt3dadd(-488.34, 159.94, -92.03, 0.35)
pt3dadd(-488.89, 163.04, -92.03, 0.35)
pt3dadd(-491.63, 164.95, -92.03, 0.35)
pt3dadd(-494.43, 166.44, -92.03, 0.35)
pt3dadd(-497.21, 168.05, -92.03, 0.35)
pt3dadd(-498.64, 171.17, -87.13, 0.35)
pt3dadd(-500.59, 172.85, -86.15, 0.35)
pt3dadd(-501.46, 173.63, -83.21, 0.35)
pt3dadd(-501.65, 175.91, -81.26, 0.35)
pt3dadd(-500.34, 178.11, -81.26, 0.35)
pt3dadd(-500.43, 181.32, -81.26, 0.35)
pt3dadd(-497.58, 183.2, -80.28, 0.35)
pt3dadd(-495.12, 187.84, -76.36, 0.35)
pt3dadd(-493.47, 191.48, -76.36, 0.35)
pt3dadd(-491.7, 195.91, -76.36, 0.35)
pt3dadd(-494.85, 198.99, -71.47, 0.35)
pt3dadd(-495.67, 201.69, -70.49, 0.35)
pt3dadd(-497.06, 201.09, -60.7, 0.35)
pt3dadd(-496.19, 203.26, -59.72, 0.35)
pt3dadd(-496.87, 205.17, -59.72, 0.35)
}
dend[141] {pt3dclear()
pt3dadd(-531.28, 137.3, -54.82, 0.7)
pt3dadd(-531.56, 139.79, -61.68, 0.7)
pt3dadd(-530.92, 142.15, -62.66, 0.7)
pt3dadd(-528.62, 143.84, -62.66, 0.7)
pt3dadd(-527.91, 146.02, -62.66, 0.7)
pt3dadd(-526.88, 149.02, -62.66, 0.7)
pt3dadd(-527.3, 151.23, -62.66, 0.7)
pt3dadd(-525.52, 153.49, -62.66, 0.7)
pt3dadd(-523.48, 155.85, -62.66, 0.7)
pt3dadd(-523.88, 158.6, -66.57, 0.7)
pt3dadd(-525.53, 159.46, -66.57, 0.7)
pt3dadd(-525.15, 160.91, -66.57, 0.7)
pt3dadd(-523.88, 161.8, -71.47, 0.7)
pt3dadd(-523.75, 163.65, -72.45, 0.7)
pt3dadd(-521.55, 165.92, -75.38, 0.7)
pt3dadd(-519.45, 165.55, -78.32, 0.7)
pt3dadd(-518.55, 168.59, -78.32, 0.7)
pt3dadd(-518.7, 170.31, -80.28, 0.7)
pt3dadd(-519.68, 172.86, -83.21, 0.7)
pt3dadd(-518.72, 175.86, -84.19, 0.7)
}
dend[142] {pt3dclear()
pt3dadd(-518.72, 175.86, -84.19, 0.35)
pt3dadd(-521.18, 178.61, -89.09, 0.35)
pt3dadd(-523.5, 181.42, -89.09, 0.35)
pt3dadd(-525.87, 181.25, -97.9, 0.35)
pt3dadd(-528.89, 181.01, -97.9, 0.35)
pt3dadd(-531.29, 181.39, -101.82, 0.35)
pt3dadd(-534.69, 182.08, -101.82, 0.35)
pt3dadd(-537.86, 180.66, -104.75, 0.35)
pt3dadd(-539.17, 183.06, -105.73, 0.35)
pt3dadd(-539.72, 184.22, -108.67, 0.35)
pt3dadd(-540.25, 184.31, -108.67, 0.35)
pt3dadd(-544.75, 184.68, -108.67, 0.35)
pt3dadd(-546.51, 184.29, -108.67, 0.35)
pt3dadd(-548.72, 185.61, -108.67, 0.35)
pt3dadd(-550.3, 188.21, -108.67, 0.35)
pt3dadd(-552.13, 189.6, -108.67, 0.35)
pt3dadd(-553.8, 191.13, -112.58, 0.35)
pt3dadd(-553.95, 193.92, -112.58, 0.35)
pt3dadd(-555.33, 195.24, -112.58, 0.35)
pt3dadd(-555.25, 197.84, -112.58, 0.35)
pt3dadd(-556.62, 199.15, -113.56, 0.35)
pt3dadd(-558.4, 200.65, -113.56, 0.35)
pt3dadd(-562.24, 200.22, -116.5, 0.35)
pt3dadd(-563.03, 202.39, -117.48, 0.35)
pt3dadd(-565.01, 203.57, -117.48, 0.35)
pt3dadd(-566.99, 204.77, -117.48, 0.35)
pt3dadd(-570.21, 205.4, -117.48, 0.35)
pt3dadd(-572.98, 207.83, -119.44, 0.35)
pt3dadd(-574.95, 209.56, -122.37, 0.35)
pt3dadd(-576.97, 212.11, -118.46, 0.35)
pt3dadd(-578.28, 214.68, -118.46, 0.35)
pt3dadd(-579.67, 217.72, -118.46, 0.35)
pt3dadd(-582.08, 218.61, -118.46, 0.35)
pt3dadd(-583.78, 221.49, -121.4, 0.35)
pt3dadd(-584.81, 223.59, -122.37, 0.35)
pt3dadd(-586.54, 223.55, -123.35, 0.35)
pt3dadd(-587.78, 226.3, -123.35, 0.35)
pt3dadd(-590.46, 225.83, -124.33, 0.35)
pt3dadd(-592.12, 228.22, -126.29, 0.35)
pt3dadd(-593.89, 231.32, -126.29, 0.35)
pt3dadd(-596.31, 232.46, -127.27, 0.35)
pt3dadd(-598.05, 234.4, -128.25, 0.35)
}
dend[143] {pt3dclear()
pt3dadd(-518.72, 175.86, -84.19, 0.7)
pt3dadd(-516.64, 177.33, -88.11, 0.7)
}
}
proc shape3d_25() {
dend[143] { pt3dadd(-516.06, 178.07, -91.05, 0.7)
pt3dadd(-514.29, 179.42, -93.98, 0.7)
pt3dadd(-514.4, 179.85, -93.98, 0.7)
}
dend[144] {pt3dclear()
pt3dadd(-514.4, 179.85, -93.98, 0.7)
pt3dadd(-516.3, 180.53, -94.96, 0.7)
pt3dadd(-519.6, 179.79, -95.94, 0.7)
pt3dadd(-521.49, 179.77, -96.92, 0.7)
pt3dadd(-523.59, 181.83, -92.03, 0.35)
pt3dadd(-527.19, 184.17, -92.03, 0.35)
pt3dadd(-528.78, 186.37, -92.03, 0.35)
pt3dadd(-528.5, 186.17, -91.05, 0.35)
pt3dadd(-530.14, 187.84, -91.05, 0.35)
pt3dadd(-532.72, 188.5, -91.05, 0.35)
pt3dadd(-534.79, 191.22, -91.05, 0.35)
pt3dadd(-535.98, 194.53, -91.05, 0.35)
pt3dadd(-539.13, 198.14, -89.09, 0.35)
pt3dadd(-540.93, 202.42, -88.11, 0.35)
pt3dadd(-543.04, 205.18, -88.11, 0.35)
pt3dadd(-542.84, 205.47, -88.11, 0.35)
pt3dadd(-542.75, 210.66, -88.11, 0.35)
pt3dadd(-542.04, 215.5, -88.11, 0.35)
pt3dadd(-541.26, 220.61, -88.11, 0.35)
pt3dadd(-541.46, 221.31, -87.13, 0.35)
pt3dadd(-543.52, 222.89, -84.19, 0.35)
pt3dadd(-542.6, 225.57, -84.19, 0.35)
pt3dadd(-543.22, 227.31, -85.17, 0.35)
pt3dadd(-544.87, 229.4, -85.17, 0.35)
pt3dadd(-546.62, 230.84, -85.17, 0.35)
pt3dadd(-548.41, 233.53, -85.17, 0.35)
pt3dadd(-548.89, 235.93, -85.17, 0.35)
pt3dadd(-550.9, 238.38, -86.15, 0.35)
pt3dadd(-550.65, 240.71, -86.15, 0.35)
pt3dadd(-552.56, 243.04, -84.19, 0.35)
pt3dadd(-551.72, 245.51, -84.19, 0.35)
}
dend[145] {pt3dclear()
pt3dadd(-514.4, 179.85, -93.98, 0.35)
pt3dadd(-514.8, 180.64, -93.98, 0.35)
pt3dadd(-515.68, 183.04, -93.98, 0.35)
pt3dadd(-514.6, 186.78, -93.98, 0.35)
pt3dadd(-513.87, 189.35, -93.98, 0.35)
pt3dadd(-515.63, 190.32, -93.98, 0.35)
pt3dadd(-514.52, 193.36, -96.92, 0.35)
pt3dadd(-515.99, 194.92, -97.9, 0.35)
pt3dadd(-514, 196.95, -101.82, 0.35)
pt3dadd(-513.42, 198.84, -101.82, 0.35)
pt3dadd(-516.14, 200.63, -101.82, 0.35)
pt3dadd(-514.73, 204.4, -104.75, 0.35)
pt3dadd(-510.86, 205.68, -104.75, 0.35)
pt3dadd(-508.96, 204.82, -105.73, 0.35)
pt3dadd(-506, 205.8, -107.69, 0.35)
pt3dadd(-502.87, 204.17, -111.61, 0.35)
pt3dadd(-502.17, 207.34, -117.48, 0.35)
pt3dadd(-499.59, 208.35, -117.48, 0.35)
pt3dadd(-501.88, 209.84, -124.33, 0.35)
pt3dadd(-504.73, 212.19, -127.27, 0.35)
pt3dadd(-504.5, 211.93, -127.27, 0.35)
pt3dadd(-506.93, 209.5, -134.12, 0.35)
pt3dadd(-505.71, 211.51, -143.91, 0.35)
pt3dadd(-503.52, 210.91, -150.76, 0.35)
pt3dadd(-503.66, 214.59, -155.66, 0.35)
pt3dadd(-501.75, 217.27, -156.64, 0.35)
pt3dadd(-498.38, 218.51, -158.6, 0.35)
pt3dadd(-496.89, 219.67, -154.68, 0.35)
pt3dadd(-497.64, 220.28, -154.68, 0.35)
pt3dadd(-500.81, 221.94, -154.68, 0.35)
pt3dadd(-501.58, 224.7, -154.68, 0.35)
pt3dadd(-499.96, 228.28, -154.68, 0.35)
pt3dadd(-497.94, 228.95, -158.6, 0.35)
pt3dadd(-495.74, 230.94, -162.51, 0.35)
pt3dadd(-491.74, 232.08, -164.47, 0.35)
pt3dadd(-486.96, 234.98, -164.47, 0.35)
pt3dadd(-483.47, 235.16, -167.41, 0.35)
pt3dadd(-480.47, 235.9, -167.41, 0.35)
pt3dadd(-481.35, 237.32, -168.39, 0.35)
pt3dadd(-477.11, 239.73, -167.41, 0.35)
pt3dadd(-473.37, 239.87, -167.41, 0.35)
pt3dadd(-468.91, 242.53, -167.41, 0.35)
pt3dadd(-462.73, 244.28, -167.41, 0.35)
pt3dadd(-458.1, 244.63, -166.43, 0.35)
pt3dadd(-453.74, 245.83, -166.43, 0.35)
pt3dadd(-451.42, 247.43, -161.53, 0.35)
pt3dadd(-448.73, 247.84, -161.53, 0.35)
pt3dadd(-447.69, 246.76, -160.55, 0.35)
pt3dadd(-444.3, 247.8, -160.55, 0.35)
pt3dadd(-439.96, 250.28, -160.55, 0.35)
pt3dadd(-436.03, 255.03, -160.55, 0.35)
pt3dadd(-435.64, 256.22, -160.55, 0.35)
pt3dadd(-431.98, 259.84, -160.55, 0.35)
pt3dadd(-432.17, 261.3, -158.6, 0.35)
pt3dadd(-429.04, 261.85, -158.6, 0.35)
pt3dadd(-425.85, 263.8, -158.6, 0.35)
pt3dadd(-422.96, 268.12, -158.6, 0.35)
pt3dadd(-420, 271.98, -159.58, 0.35)
pt3dadd(-416.72, 277.57, -159.58, 0.35)
pt3dadd(-416.78, 281.54, -159.58, 0.35)
}
}
proc AxonHillock() {
ah{ pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-499.68, 31.43, 7.83, 5.92)
pt3dadd(-498.5, 29.61, 7.83, 4.87)
pt3dadd(-496.43, 25.88, 7.83, 3.48)
pt3dadd(-494.37, 22.13, 7.83, 2.44)
pt3dadd(-493.45, 19.77, 7.83, 2.09)
pt3dadd(-491.23, 16.21, 7.83, 1.74)
pt3dadd(-489.78, 12.79, 7.83, 1.74)
pt3dadd(-487.93, 8.97, 4.89, 1.39)
pt3dadd(-486.86, 5.78, 3.92, 1.39)
pt3dadd(-485.75, 1.86, 3.92, 1.39)
pt3dadd(-484.54, -1.87, 3.92, 1.39)
pt3dadd(-484.09, -4.83, 3.92, 1.39)
pt3dadd(-483.8, -6.87, 3.92, 1.39)
pt3dadd(-482.67, -8.61, 4.89, 1.39)
pt3dadd(-481.52, -12.74, 1.96, 1.39)
pt3dadd(-479.64, -18.94, 5.87, 1.39)
pt3dadd(-475.5, -29.72, 5.87, 1.39)
pt3dadd(-472.62, -37.02, 5.87, 1.39)
}
iseg {
pt3dclear()
pt3dadd(-471.65, -44.14, 5.87, 1.39)
pt3dadd(-470.61, -50.3, 5.87, 1.39)
pt3dadd(-471.59, -58.41, 5.87, 1.39)
pt3dadd(-471.47, -64.78, 6.85, 1.39)
}
}
proc axon_shape(){
axon {pt3dclear()
pt3dstyle(1, -515.752, 42.7676, -4.81197)
pt3dadd(-499.68, 31.43, 7.83, 5.92)
pt3dadd(-498.5, 29.61, 7.83, 4.87)
pt3dadd(-496.43, 25.88, 7.83, 3.48)
pt3dadd(-494.37, 22.13, 7.83, 2.44)
pt3dadd(-493.45, 19.77, 7.83, 2.09)
pt3dadd(-491.23, 16.21, 7.83, 1.74)
pt3dadd(-489.78, 12.79, 7.83, 1.74)
pt3dadd(-487.93, 8.97, 4.89, 1.39)
pt3dadd(-486.86, 5.78, 3.92, 1.39)
pt3dadd(-485.75, 1.86, 3.92, 1.39)
pt3dadd(-484.54, -1.87, 3.92, 1.39)
pt3dadd(-484.09, -4.83, 3.92, 1.39)
pt3dadd(-483.8, -6.87, 3.92, 1.39)
pt3dadd(-482.67, -8.61, 4.89, 1.39)
pt3dadd(-481.52, -12.74, 1.96, 1.39)
pt3dadd(-479.64, -18.94, 5.87, 1.39)
pt3dadd(-475.5, -29.72, 5.87, 1.39)
pt3dadd(-472.62, -37.02, 5.87, 1.39)
pt3dadd(-471.65, -44.14, 5.87, 1.39)
pt3dadd(-470.61, -50.3, 5.87, 1.39)
pt3dadd(-471.59, -58.41, 5.87, 1.39)
pt3dadd(-471.47, -64.78, 6.85, 1.39)
pt3dadd(-473.97, -73.75, 6.85, 1.39)
pt3dadd(-478.77, -83.82, 6.85, 1.39)
pt3dadd(-483.03, -92.94, 8.81, 1.39)
pt3dadd(-488.25, -103.04, 8.81, 1.39)
pt3dadd(-495.34, -113.7, 8.81, 1.39)
pt3dadd(-500.34, -123.6, 8.81, 1.39)
pt3dadd(-502.08, -128.46, 8.81, 1.39)
pt3dadd(-500.9, -133.03, 7.83, 1.39)
pt3dadd(-498.87, -137.97, 7.83, 1.39)
pt3dadd(-495.21, -143.45, 10.77, 1.39)
pt3dadd(-490.44, -148.5, 11.75, 1.39)
pt3dadd(-482.84, -156.64, 11.75, 1.39)
pt3dadd(-475.21, -163.96, 11.75, 1.39)
pt3dadd(-468.59, -171.34, 11.75, 1.39)
pt3dadd(-461.33, -179.21, 11.75, 1.39)
pt3dadd(-457.28, -182.87, 11.75, 1.39)
pt3dadd(-452.81, -189.35, 11.75, 1.39)
pt3dadd(-447.89, -197.97, 12.73, 1.39)
pt3dadd(-445.39, -205.15, 12.73, 1.39)
pt3dadd(-443.49, -216.16, 12.73, 1.39)
pt3dadd(-444.82, -226.64, 10.77, 1.39)
pt3dadd(-447.28, -239.65, 10.77, 1.39)
pt3dadd(-456.51, -258.95, 10.77, 1.39)
pt3dadd(-466.74, -268.62, 24.47, 1.39)
pt3dadd(-480.67, -275.89, 24.47, 1.39)
pt3dadd(-492.92, -282.94, 25.45, 1.39)
pt3dadd(-500.67, -287.05, 25.45, 1.39)
pt3dadd(-503.03, -289.22, 25.45, 1.39)
pt3dadd(-505.93, -288.58, 25.45, 1.39)
pt3dadd(-509.41, -286.46, 25.45, 1.39)
pt3dadd(-511.87, -286.85, 31.33, 1.39)
pt3dadd(-514.58, -285.88, 31.33, 1.39)
pt3dadd(-516.91, -287.6, 35.24, 1.39)
pt3dadd(-519.64, -289.25, 37.2, 1.39)
pt3dadd(-522.7, -289.05, 46.01, 1.39)
pt3dadd(-525.41, -288.01, 48.95, 1.39)
pt3dadd(-529.79, -286.94, 48.95, 1.39)
pt3dadd(-531.8, -286.31, 51.89, 1.39)
pt3dadd(-532.29, -283.71, 55.8, 1.39)
pt3dadd(-534.73, -287.08, 58.74, 1.39)
pt3dadd(-538.29, -287.88, 61.68, 1.39)
pt3dadd(-538.29, -287.88, 62.66, 1.39)
pt3dadd(-537.13, -289.36, 62.66, 1.39)
pt3dadd(-538.49, -291.01, 67.55, 1.39)
pt3dadd(-537.15, -293.05, 67.55, 1.39)
pt3dadd(-535.15, -296.9, 67.55, 1.39)
pt3dadd(-536.13, -298.58, 72.45, 1.39)
pt3dadd(-538.1, -296.72, 85.17, 1.39)
pt3dadd(-538.29, -295.02, 93, 1.39)
pt3dadd(-542.24, -293.06, 97.9, 1.39)
pt3dadd(-542.24, -293.06, 98.88, 1.39)
pt3dadd(-544.98, -293.24, 112.58, 1.39)
pt3dadd(-544.98, -293.24, 113.56, 1.39)
pt3dadd(-547.23, -293.87, 120.42, 1.39)
pt3dadd(-550.15, -292.51, 124.33, 1.39)
pt3dadd(-550.89, -290.66, 131.19, 1.39)
pt3dadd(-554.07, -286.83, 131.19, 1.39)
pt3dadd(-553.14, -285.48, 139.02, 1.39)
pt3dadd(-557.62, -282.62, 141.95, 1.39)
pt3dadd(-563.6, -277.43, 140.97, 1.39)
pt3dadd(-569.24, -274.05, 140.97, 1.39)
pt3dadd(-572.32, -272, 147.83, 1.39)
}
}
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()
AxonHillock()
// axon_shape()
}
objref all, somatic, basal , AHIS
proc subsets() { local i
objref all, somatic, basal, AHIS
all = new SectionList()
soma all.append()
ah all.append()
iseg all.append()
// axon all.append()
for i=0, 145 dend[i] all.append()
somatic = new SectionList()
soma somatic.append()
// axonal = new SectionList()
// axon axonal.append()
basal = new SectionList()
for i=0, 145 dend[i] basal.append()
AHIS = new SectionList()
ah AHIS.append()
iseg AHIS.append()
// axon AHIS.append()
}
proc parameters() {
celsius = 36 // Temperature at which simulations are performed
v_init = -70 // mV, resting membrane potential
}
proc geom() {
geom_nseg()
}
external lambda_f
proc geom_nseg() {
forsec all { nseg = int((L/(0.1*lambda_f(100))+.999)/2)*2 + 1 }
}
proc biophys() {
RM = 833
forsec all {
Ra = 70
cm = 1.0
}
soma {
insert pas
g_pas = 1.0/(RM)
e_pas = -70
insert NafSm
gnabar_NafSm = 0.06
ena_NafSm = 50
amA_NafSm = 14+17.5
bmA_NafSm = 38+17.5
theta_h_NafSm = 55-17.5
insert KdrSm
gkdrbar_KdrSm = 0.55//0.43
ek_KdrSm = -80
theta_n_KdrSm = 28-17.5
tn_KdrSm = 5
insert CaSm2
gSK3bar_CaSm2 = 0//0.0481 // SK3 conductance
gSK2bar_CaSm2 = 0.00855 // SK2 conductance
gcanbar_CaSm2 = 0.035 // Calcium conductance
gcalbar_CaSm2 = 0
ek_CaSm2 = ek_KdrSm
// Calcium dynamics
f_CaSm2 = 0.025 // speed 0.01
alpha_CaSm2 = 0.4 // current to Cai rate 0.5
kca_CaSm2 = 12//0.25 // buffering
// SK3 dynamics ( do not touch these)
kd3_CaSm2 = 0.001 // half [Cai]
nexp3_CaSm2 = 1.4 //2
S3_tau_CaSm2 = 11 //(ms)
// SK2 dynamics
kd2_CaSm2 = 0.001/2 // half [Cai]
nexp2_CaSm2 = 4//1.5
S2_tau_CaSm2 = 15.7//49.8 //(ms)
// N-type Calcium channel dynamics
tmn_CaSm2 = 5 //(ms)
thetamn_CaSm2 = 22-16.5 //(mV)
thn_CaSm2 = 40 //(ms)
thetahn_CaSm2 = 40-16.5 //(mV)
}
forsec basal {
insert pas
g_pas = 1.0/(RM*50)
e_pas = -70
insert info // to save the electronic distance
}
forsec AHIS {
insert pas
g_pas = 1.0/(RM)
e_pas = -70
insert NafIs
gnabar_NafIs = 0.36 //0.45
ena_NafIs = 50
amA_NafIs = 10+17.5
bmA_NafIs = 30+17.5
theta_h_NafIs = 55-17.5
insert KdrIs
gkbar_KdrIs = 0.2 //0.355
ek_KdrIs = -80
theta_n_KdrIs = 28-17.5
insert NapIs
gnapbar_NapIs = 4.0571e-005
ena_NapIs = 50
ampB_NapIs = 38.4-17.5
bmpB_NapIs = 42.7-17.5
}
}
endtemplate Amandola_MN3