begintemplate celltemplate
public apcounter,apvec
public all,dends,tcdends,ccdends,ccsyn,tcsyn,ccnetcon,tcnetcon,soma,dend
public Esyn,Enetcon,Isyn,Inetcon,Esourse,numdend,Vvec,spikevec,segdends
objref Esyn,Enetcon[2],Isyn,Inetcon,Esourse[2]
objref apcounter,apvec,nil,Vvec[2],spikevec[2]
proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[75], apic[70]
proc topol() { local i
connect dend(0), soma(0.5)
for i = 1, 2 connect dend[i](0), dend(1)
for i = 3, 4 connect dend[i](0), dend[i-1](1)
connect dend[5](0), dend[3](1)
for i = 6, 7 connect dend[i](0), dend[2](1)
connect dend[8](0), soma(0.5)
for i = 9, 12 connect dend[i](0), dend[i-1](1)
connect dend[13](0), dend[11](1)
connect dend[14](0), dend[10](1)
connect dend[15](0), dend[9](1)
for i = 16, 17 connect dend[i](0), dend[i-1](1)
connect dend[18](0), dend[16](1)
connect dend[19](0), dend[15](1)
connect dend[20](0), dend[8](1)
for i = 21, 22 connect dend[i](0), dend[i-1](1)
connect dend[23](0), dend[21](1)
connect dend[24](0), dend[20](1)
connect dend[25](0), soma(0.5)
for i = 26, 27 connect dend[i](0), dend[25](1)
for i = 28, 29 connect dend[i](0), dend[27](1)
for i = 30, 31 connect dend[i](0), dend[29](1)
connect dend[32](0), soma(0.5)
for i = 33, 34 connect dend[i](0), dend[32](1)
connect dend[35](0), soma(0.5)
for i = 36, 37 connect dend[i](0), dend[i-1](1)
connect dend[38](0), dend[36](1)
connect dend[39](0), dend[35](1)
for i = 40, 42 connect dend[i](0), dend[i-1](1)
connect dend[43](0), dend[41](1)
connect dend[44](0), dend[40](1)
connect dend[45](0), dend[39](1)
for i = 46, 47 connect dend[i](0), dend[45](1)
connect dend[48](0), soma(0.5)
for i = 49, 51 connect dend[i](0), dend[i-1](1)
connect dend[52](0), dend[50](1)
for i = 53, 54 connect dend[i](0), dend[52](1)
connect dend[55](0), dend[49](1)
connect dend[56](0), dend[48](1)
for i = 57, 59 connect dend[i](0), soma(0.5)
for i = 60, 61 connect dend[i](0), dend[59](1)
for i = 62, 63 connect dend[i](0), soma(0.5)
for i = 64, 65 connect dend[i](0), dend[i-1](1)
connect dend[66](0), dend[64](1)
connect dend[67](0), dend[63](1)
for i = 68, 69 connect dend[i](0), soma(0.5)
for i = 70, 71 connect dend[i](0), dend[69](1)
connect dend[72](0), soma(0.5)
for i = 73, 74 connect dend[i](0), dend[72](1)
connect apic(0), soma(0.5)
for i = 1, 4 connect apic[i](0), apic[i-1](1)
connect apic[5](0), apic[2](1)
connect apic[6](0), apic[1](1)
connect apic[7](0), apic(1)
for i = 8, 9 connect apic[i](0), apic[i-1](1)
connect apic[10](0), apic[8](1)
connect apic[11](0), apic[7](1)
for i = 12, 13 connect apic[i](0), apic[11](1)
connect apic[14](0), apic[3](1)
for i = 15, 29 connect apic[i](0), apic[i-1](1)
connect apic[30](0), apic[28](1)
connect apic[31](0), apic[27](1)
connect apic[32](0), apic[26](1)
for i = 33, 34 connect apic[i](0), apic[25](1)
connect apic[35](0), apic[24](1)
for i = 36, 39 connect apic[i](0), apic[i-1](1)
connect apic[40](0), apic[38](1)
connect apic[41](0), apic[37](1)
connect apic[42](0), apic[36](1)
connect apic[43](0), apic[35](1)
connect apic[44](0), apic[23](1)
connect apic[45](0), apic[22](1)
connect apic[46](0), apic[21](1)
connect apic[47](0), apic[20](1)
connect apic[48](0), apic[19](1)
for i = 49, 50 connect apic[i](0), apic[48](1)
connect apic[51](0), apic[18](1)
for i = 52, 53 connect apic[i](0), apic[51](1)
connect apic[54](0), apic[17](1)
connect apic[55](0), apic[16](1)
for i = 56, 57 connect apic[i](0), apic[55](1)
connect apic[58](0), apic[15](1)
connect apic[59](0), apic[14](1)
for i = 60, 62 connect apic[i](0), apic[i-1](1)
connect apic[63](0), apic[61](1)
for i = 64, 65 connect apic[i](0), apic[63](1)
connect apic[66](0), apic[60](1)
connect apic[67](0), apic[59](1)
for i = 68, 69 connect apic[i](0), apic[67](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(-9.08491, -25.0431, 2.66197, 4.00787)
pt3dadd(-7.84252, -24.1868, 2.4198, 7.10668)
pt3dadd(-6.60013, -23.3305, 2.17764, 16.1684)
pt3dadd(-5.35774, -22.4742, 1.93548, 18.5698)
pt3dadd(-4.11535, -21.6179, 1.69332, 19.6396)
pt3dadd(-2.87295, -20.7616, 1.45116, 20.4578)
pt3dadd(-1.63056, -19.9053, 1.209, 20.933)
pt3dadd(-0.388173, -19.049, 0.966836, 22.1711)
pt3dadd(0.854218, -18.1927, 0.724674, 23.8827)
pt3dadd(2.09661, -17.3364, 0.482513, 24.5129)
pt3dadd(3.339, -16.4801, 0.240351, 24.8211)
pt3dadd(4.58139, -15.6238, -0.0018104, 25.0812)
pt3dadd(5.82378, -14.7675, -0.243972, 25.3919)
pt3dadd(7.06617, -13.9112, -0.486133, 26.3411)
pt3dadd(8.30856, -13.0549, -0.728295, 26.6549)
pt3dadd(9.55095, -12.1986, -0.970457, 25.4291)
pt3dadd(10.7933, -11.3423, -1.21262, 22.6507)
pt3dadd(12.0357, -10.486, -1.45478, 19.9541)
pt3dadd(13.2781, -9.62973, -1.69694, 16.7706)
pt3dadd(14.5205, -8.77343, -1.9391, 10.9325)
pt3dadd(15.7629, -7.91714, -2.18126, 6.72039)
}
dend {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(-11.38, -18.07, 8.5, 3.99)
pt3dadd(-12.79, -18.29, 8.5, 3.99)
pt3dadd(-13.6, -18.51, 8.5, 3.7)
pt3dadd(-14.63, -18.36, 8.5, 3.47)
pt3dadd(-15.45, -18.36, 8.5, 3.4)
pt3dadd(-16.63, -18.14, 8.05, 3.18)
pt3dadd(-17.52, -17.82, 8.05, 3.18)
pt3dadd(-18.26, -17.63, 6.45, 3.18)
}
dend[1] {pt3dclear()
pt3dadd(-18.26, -17.63, 6.45, 2.14)
pt3dadd(-19.29, -16.74, 6.3, 2.14)
pt3dadd(-20.69, -16.22, 6.9, 1.85)
pt3dadd(-21.95, -15.71, 7.65, 1.55)
pt3dadd(-23.06, -15.04, 7.75, 1.55)
pt3dadd(-24.09, -14.31, 8, 1.63)
pt3dadd(-25.13, -13.42, 9.65, 1.63)
pt3dadd(-26.09, -12.76, 9.85, 1.26)
pt3dadd(-27.12, -11.8, 9.85, 1.26)
pt3dadd(-27.72, -10.91, 9.05, 1.03)
pt3dadd(-28.23, -9.96, 8.95, 1.03)
pt3dadd(-28.6, -9.14, 11.85, 1.11)
pt3dadd(-29.56, -9, 12, 1.11)
pt3dadd(-30.67, -9.44, 12, 1.11)
pt3dadd(-31.71, -9.66, 13.4, 1.11)
pt3dadd(-32.89, -9.59, 13.5, 1.11)
pt3dadd(-33.63, -8.63, 13.6, 1.33)
pt3dadd(-33.92, -7.52, 13.65, 1.33)
pt3dadd(-34.07, -6.19, 13.6, 1.33)
pt3dadd(-34.52, -4.87, 13.6, 1.48)
pt3dadd(-35.03, -3.83, 13.6, 1.48)
pt3dadd(-35.33, -2.73, 14.8, 1.33)
pt3dadd(-35.92, -1.55, 15.25, 1.55)
pt3dadd(-36.73, -0.37, 17.5, 1.11)
pt3dadd(-37.62, 0.29, 17.5, 1.11)
pt3dadd(-38.28, 1.18, 17.55, 1.11)
pt3dadd(-38.73, 2.65, 18.2, 1.18)
pt3dadd(-38.73, 3.61, 18.25, 1.18)
pt3dadd(-38.73, 5.09, 18.3, 1.7)
pt3dadd(-39.25, 6.34, 18.3, 1.7)
pt3dadd(-39.91, 7.23, 18.3, 1.7)
pt3dadd(-40.65, 7.6, 19.55, 1.7)
pt3dadd(-41.51, 8.52, 19.6, 1.7)
}
dend[2] {pt3dclear()
pt3dadd(-18.26, -17.63, 6.45, 1.4)
pt3dadd(-19.48, -17.81, 4.75, 1.4)
pt3dadd(-20.44, -17.36, 4.85, 1.11)
pt3dadd(-21.7, -17.36, 4.85, 1.11)
pt3dadd(-23.03, -17.81, 4.9, 1.55)
pt3dadd(-23.99, -17.73, 4.9, 1.7)
pt3dadd(-24.81, -17.66, 4.9, 1.7)
pt3dadd(-26.28, -17.73, 4.95, 1.48)
pt3dadd(-27.39, -17.66, 4.95, 1.48)
pt3dadd(-28.28, -17.14, 4.95, 1.48)
pt3dadd(-29.46, -16.41, 3.55, 1.48)
pt3dadd(-30.57, -15.96, 3.4, 1.48)
pt3dadd(-31.83, -15.59, 3.3, 1.48)
pt3dadd(-33.01, -15.52, 3.7, 1.48)
pt3dadd(-33.9, -15, 3.8, 1.48)
pt3dadd(-34.71, -14.64, 3.9, 1.48)
pt3dadd(-35.74, -14.12, 1.75, 1.4)
pt3dadd(-36.7, -13.53, 1.7, 1.4)
pt3dadd(-37.74, -12.72, 1.65, 1.4)
pt3dadd(-38.63, -11.98, 1.55, 1.4)
pt3dadd(-39.73, -11.46, 1.55, 1.4)
pt3dadd(-40.99, -11.17, 1.5, 1.4)
pt3dadd(-42.17, -11.32, -0.15, 1.4)
pt3dadd(-43.13, -11.17, -1.1, 1.4)
pt3dadd(-44.54, -11.02, -1.15, 2.44)
}
dend[3] {pt3dclear()
pt3dadd(-44.54, -11.02, -1.15, 2.22)
pt3dadd(-46.02, -10.73, -1.2, 2.22)
pt3dadd(-47.05, -10.36, 0.65, 1.85)
pt3dadd(-47.86, -9.77, 0.55, 1.85)
pt3dadd(-48.6, -9.25, 0.5, 1.85)
pt3dadd(-49.86, -8.74, 0.45, 1.85)
}
dend[4] {pt3dclear()
pt3dadd(-49.86, -8.74, 0.45, 1.26)
pt3dadd(-49.93, -7.48, -3.3, 1.26)
pt3dadd(-50.97, -6.67, -2.15, 1.26)
pt3dadd(-52, -6.08, -1.95, 1.26)
pt3dadd(-52.45, -5.34, -3.25, 1.11)
pt3dadd(-53.26, -4.61, -3.3, 1.11)
pt3dadd(-54.15, -4.46, -5.15, 1.33)
pt3dadd(-55.33, -3.87, -5.05, 1.33)
pt3dadd(-56.14, -3.79, -5, 1.33)
pt3dadd(-57.1, -3.94, -7.05, 1.03)
pt3dadd(-57.99, -3.35, -7.45, 1.03)
pt3dadd(-58.29, -2.54, -7.55, 1.18)
pt3dadd(-58.51, -1.43, -7.55, 1.18)
pt3dadd(-59.1, -0.33, -8.5, 1.03)
pt3dadd(-60.13, 0.04, -8.5, 1.03)
pt3dadd(-61.39, -0.11, -9.55, 1.33)
pt3dadd(-62.57, -0.33, -9.6, 1.33)
pt3dadd(-63.46, -0.7, -9.6, 1.33)
pt3dadd(-64.57, -0.77, -9.65, 1.33)
pt3dadd(-65.68, -0.33, -10.4, 1.03)
pt3dadd(-66.49, -0.03, -10.4, 1.03)
pt3dadd(-67.08, 0.48, -11.55, 1.11)
pt3dadd(-67.97, 1.07, -11.55, 1.11)
pt3dadd(-68.78, 1.44, -11.55, 0.96)
pt3dadd(-69.59, 1.74, -11.55, 0.96)
pt3dadd(-70.33, 2.47, -12.9, 0.96)
pt3dadd(-71.29, 2.99, -13, 0.96)
pt3dadd(-72.4, 3.36, -13, 0.96)
pt3dadd(-73.66, 3.36, -15.65, 1.18)
pt3dadd(-74.69, 3.8, -15.7, 1.55)
pt3dadd(-75.43, 4.46, -15.7, 1.55)
pt3dadd(-75.43, 5.13, -15.7, 1.55)
pt3dadd(-75.88, 5.35, -17.45, 0.81)
pt3dadd(-76.69, 6.09, -17.45, 0.81)
pt3dadd(-77.28, 6.6, -16.2, 1.63)
pt3dadd(-78.39, 6.53, -16, 1.63)
pt3dadd(-79.42, 6.9, -15.65, 1.63)
pt3dadd(-80.38, 6.31, -16.15, 1.4)
pt3dadd(-81.49, 5.79, -16.3, 1.4)
pt3dadd(-82.53, 5.35, -16.4, 1.4)
pt3dadd(-83.34, 5.64, -17.1, 0.96)
pt3dadd(-84.38, 5.72, -17.15, 0.96)
pt3dadd(-85.41, 5.42, -18.2, 0.96)
pt3dadd(-86.37, 5.13, -18.25, 0.96)
pt3dadd(-87.18, 5.35, -18.25, 0.96)
pt3dadd(-87.85, 5.87, -19.65, 1.18)
pt3dadd(-88.88, 6.46, -19.7, 1.18)
pt3dadd(-90.1, 6.31, -18.9, 1.18)
pt3dadd(-91.51, 6.75, -18.75, 1.18)
}
}
proc shape3d_2() {
dend[4] { pt3dadd(-92.47, 7.19, -20.65, 1.33)
pt3dadd(-93.58, 8.01, -20.75, 1.33)
pt3dadd(-94.54, 8.23, -20.75, 1.33)
pt3dadd(-95.28, 8.74, -20.8, 1.26)
pt3dadd(-96.31, 9.26, -19.7, 1.26)
pt3dadd(-97.49, 9.85, -19.55, 1.26)
pt3dadd(-98.46, 9.92, -19.45, 1.26)
pt3dadd(-99.19, 10.37, -20.05, 1.03)
pt3dadd(-100.01, 10.81, -20.1, 1.03)
pt3dadd(-101.04, 11.47, -20.15, 1.03)
pt3dadd(-101.93, 11.99, -20.2, 1.03)
pt3dadd(-102.96, 12.06, -22.15, 1.11)
pt3dadd(-104, 11.99, -22.2, 1.11)
pt3dadd(-104.96, 12.14, -22.1, 1.11)
pt3dadd(-106.07, 12.87, -23.2, 1.11)
pt3dadd(-107.03, 13.61, -22.95, 1.11)
pt3dadd(-107.92, 14.2, -22.8, 1.11)
pt3dadd(-109.1, 14.2, -24.9, 1.18)
pt3dadd(-110.06, 13.98, -25.05, 1.18)
pt3dadd(-111.17, 13.91, -25.15, 1.18)
pt3dadd(-112.13, 13.76, -25.2, 1.18)
pt3dadd(-113.09, 13.76, -25.5, 1.18)
pt3dadd(-114.2, 13.68, -25.7, 1.18)
pt3dadd(-115.09, 13.83, -25.75, 1.18)
pt3dadd(-116.19, 14.35, -26.65, 1.18)
pt3dadd(-117.38, 14.94, -26.8, 1.18)
pt3dadd(-118.34, 15.01, -26.85, 1.18)
pt3dadd(-119.37, 15.23, -26.9, 1.33)
pt3dadd(-120.19, 15.6, -27.45, 1.11)
pt3dadd(-121.37, 15.45, -27.5, 1.11)
pt3dadd(-122.33, 15.68, -27.5, 1.11)
pt3dadd(-123.44, 15.6, -27.05, 0.89)
pt3dadd(-124.25, 15.38, -26.95, 0.89)
pt3dadd(-125.06, 14.86, -26.95, 0.89)
pt3dadd(-125.43, 13.91, -30.15, 1.11)
pt3dadd(-125.95, 13.02, -30.2, 1.11)
pt3dadd(-126.98, 12.8, -30.25, 1.11)
pt3dadd(-127.5, 13.24, -30.25, 1.11)
pt3dadd(-128.09, 13.91, -29.6, 1.11)
pt3dadd(-128.54, 14.72, -29.45, 1.11)
pt3dadd(-129.13, 15.45, -29.35, 1.11)
pt3dadd(-130.09, 15.75, -29.25, 1.11)
pt3dadd(-130.68, 15.53, -31.55, 0.96)
pt3dadd(-131.64, 15.68, -31.65, 0.96)
pt3dadd(-132.53, 15.97, -31.65, 0.96)
pt3dadd(-133.19, 16.04, -31.65, 0.67)
pt3dadd(-133.93, 16.27, -34.25, 1.03)
pt3dadd(-134.89, 16.71, -34.3, 1.03)
pt3dadd(-135.19, 15.75, -34.3, 1.03)
pt3dadd(-135.71, 15.09, -34.35, 1.03)
pt3dadd(-136.67, 15.01, -41.65, 0.96)
pt3dadd(-137.7, 15.16, -41.6, 0.96)
pt3dadd(-139.02, 15.4, -41.6, 0.89)
pt3dadd(-139.54, 14.81, -41.6, 0.89)
pt3dadd(-139.1, 13.92, -43.1, 1.03)
pt3dadd(-138.87, 12.89, -43.1, 1.03)
pt3dadd(-139.91, 12.52, -45.8, 1.03)
pt3dadd(-140.94, 12.6, -46.8, 1.03)
pt3dadd(-141.98, 12.23, -46.65, 1.03)
pt3dadd(-142.86, 11.64, -46.55, 1.03)
pt3dadd(-143.97, 11.05, -46.5, 1.03)
pt3dadd(-144.79, 10.31, -46.45, 1.03)
pt3dadd(-145.16, 9.72, -46.45, 1.03)
pt3dadd(-145.82, 9.72, -48.2, 0.74)
pt3dadd(-146.56, 9.35, -48.2, 0.74)
pt3dadd(-146.63, 8.25, -48.2, 0.74)
pt3dadd(-147.15, 7.8, -48.25, 1.03)
pt3dadd(-148.04, 7.51, -48.25, 1.03)
pt3dadd(-148.93, 7.44, -47.8, 1.03)
pt3dadd(-150.11, 7.29, -47.55, 1.03)
pt3dadd(-150.7, 7.07, -47.4, 1.03)
pt3dadd(-151.44, 7.36, -50.1, 0.81)
pt3dadd(-152.4, 7.73, -51.3, 0.81)
pt3dadd(-153.21, 8.03, -51.35, 0.81)
pt3dadd(-153.43, 8.69, -51.4, 0.67)
pt3dadd(-154.32, 8.76, -51.4, 0.67)
pt3dadd(-155.13, 8.62, -51.4, 0.67)
pt3dadd(-155.95, 8.76, -52.3, 0.67)
pt3dadd(-156.76, 8.91, -52.35, 0.67)
pt3dadd(-157.42, 9.21, -52.35, 0.67)
pt3dadd(-158.09, 9.13, -52.35, 0.67)
pt3dadd(-158.46, 9.87, -52.85, 0.67)
pt3dadd(-159.35, 9.72, -52.9, 0.67)
pt3dadd(-160.01, 8.91, -54.9, 0.74)
pt3dadd(-160.9, 8.69, -54.9, 0.74)
pt3dadd(-161.86, 8.62, -54.9, 0.74)
pt3dadd(-162.45, 8.39, -55.1, 0.67)
pt3dadd(-163.34, 8.47, -54.9, 0.67)
pt3dadd(-163.63, 9.43, -109.5, 0.67)
}
dend[5] {pt3dclear()
pt3dadd(-49.86, -8.74, 0.45, 1.11)
pt3dadd(-50.56, -9.68, 5.55, 1.11)
pt3dadd(-51.23, -10.27, 5.55, 1.11)
pt3dadd(-51.89, -10.93, 5.55, 1.11)
pt3dadd(-52.7, -11.45, 5.6, 1.18)
pt3dadd(-53.52, -11.96, 5.6, 1.18)
pt3dadd(-54.03, -12.26, 5.6, 1.18)
pt3dadd(-54.77, -12.26, 5.6, 1.03)
pt3dadd(-55.81, -11.96, 5.65, 1.26)
pt3dadd(-56.7, -11.45, 5.9, 1.26)
pt3dadd(-57.95, -10.78, 4.25, 1.26)
pt3dadd(-58.69, -11.37, 7.95, 1.11)
pt3dadd(-59.43, -12.33, 8, 1.11)
pt3dadd(-60.32, -11.89, 10.6, 1.18)
pt3dadd(-61.28, -11.74, 11.8, 1.18)
pt3dadd(-62.24, -11.45, 12.45, 1.48)
pt3dadd(-63.35, -11.3, 12.45, 1.48)
pt3dadd(-64.23, -10.93, 13.15, 1.33)
pt3dadd(-64.83, -10.41, 13.85, 0.89)
pt3dadd(-65.49, -10.34, 13.85, 0.89)
pt3dadd(-66.3, -10.93, 14.8, 1.03)
pt3dadd(-67.04, -10.34, 14, 1.03)
pt3dadd(-67.86, -9.6, 13.9, 1.03)
}
dend[6] {pt3dclear()
pt3dadd(-44.54, -11.02, -1.15, 0.59)
pt3dadd(-44.72, -11.67, 0.55, 0.59)
pt3dadd(-44.65, -12.48, 0.6, 0.59)
pt3dadd(-44.43, -13.07, 0.65, 0.59)
pt3dadd(-44.57, -13.88, 0.65, 0.59)
pt3dadd(-45.31, -14.32, 0.65, 0.59)
pt3dadd(-45.39, -14.91, 0.7, 0.59)
pt3dadd(-45.31, -15.5, 0.7, 0.59)
pt3dadd(-44.87, -16.31, 0.7, 1.26)
}
dend[7] {pt3dclear()
pt3dadd(-44.54, -11.02, -1.15, 0.59)
pt3dadd(-44.35, -10.49, -0.2, 0.59)
pt3dadd(-44.13, -9.9, -0.15, 0.59)
pt3dadd(-42.87, -9.9, 1.25, 0.59)
pt3dadd(-42.43, -9.31, 1.35, 0.59)
pt3dadd(-42.36, -8.57, 1.4, 0.59)
pt3dadd(-42.73, -8.05, 1.55, 0.59)
pt3dadd(-43.54, -7.83, 1.75, 0.59)
pt3dadd(-44.28, -7.39, -1.25, 0.52)
pt3dadd(-45.02, -6.95, -1.05, 0.52)
pt3dadd(-45.98, -7.02, -0.9, 0.67)
pt3dadd(-46.42, -7.32, -0.85, 0.67)
pt3dadd(-46.72, -8.05, -0.85, 0.67)
pt3dadd(-46.2, -8.94, -0.8, 0.67)
}
dend[8] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(-11.16, -17.34, -12.8, 3.77)
pt3dadd(-12.41, -17.19, -12.8, 3.77)
pt3dadd(-14.04, -16.97, -12.8, 3.99)
pt3dadd(-15.37, -16.75, -12.8, 4.21)
pt3dadd(-16.33, -16.53, -12.8, 4.21)
pt3dadd(-17.66, -16.09, -12.8, 4.21)
}
dend[9] {pt3dclear()
pt3dadd(-17.66, -16.09, -12.8, 3.77)
pt3dadd(-18.77, -17.19, -12.05, 3.77)
pt3dadd(-20.25, -17.41, -11.9, 3.55)
pt3dadd(-20.99, -17.67, -11.9, 3.55)
pt3dadd(-21.87, -17.93, -11.9, 3.25)
pt3dadd(-23.57, -18.67, -11.85, 2.81)
pt3dadd(-24.47, -19.44, -11.85, 2.81)
pt3dadd(-25.35, -20.44, -11.85, 2.81)
pt3dadd(-25.8, -21.21, -11.85, 2.81)
pt3dadd(-26.16, -22.28, -11.9, 3.25)
pt3dadd(-27.12, -23.68, -11.8, 3.4)
pt3dadd(-27.72, -24.6, -11.8, 3.4)
pt3dadd(-28.23, -25.82, -12.7, 4.14)
}
dend[10] {pt3dclear()
pt3dadd(-28.23, -25.82, -12.7, 4.14)
pt3dadd(-28.23, -27.04, -12.7, 4.14)
pt3dadd(-28.08, -28.18, -10.65, 3.1)
pt3dadd(-28.23, -28.96, -10.65, 3.1)
pt3dadd(-28.6, -29.8, -10.55, 3.1)
pt3dadd(-29.19, -30.98, -10.45, 2.66)
pt3dadd(-29.57, -31.76, -10.45, 2.66)
pt3dadd(-30, -32.53, -10.45, 2.51)
pt3dadd(-30.3, -33.86, -10.45, 2.37)
pt3dadd(-29.96, -35.45, -10.4, 1.92)
pt3dadd(-29.49, -36.11, -10.4, 1.92)
pt3dadd(-28.93, -37.07, -10.4, 1.92)
pt3dadd(-28.19, -38.33, -11.35, 1.7)
pt3dadd(-27.16, -39.65, -11.4, 1.7)
pt3dadd(-26.71, -41.13, -11.5, 1.7)
pt3dadd(-26.93, -42.82, -10.25, 1.7)
pt3dadd(-27.01, -44.15, -9.65, 1.85)
pt3dadd(-26.57, -45.48, -9.6, 1.85)
pt3dadd(-26.71, -47.1, -9.5, 1.85)
pt3dadd(-26.71, -48.58, -9.65, 1.85)
pt3dadd(-27.08, -49.98, -9.7, 1.85)
pt3dadd(-27.08, -51.53, -8.1, 1.85)
pt3dadd(-27.08, -53.3, -7.95, 2)
pt3dadd(-27.53, -54.62, -7.9, 2)
pt3dadd(-28.19, -56.02, -7.9, 2)
pt3dadd(-28.78, -57.35, -7.9, 2)
pt3dadd(-29.6, -58.53, -7.85, 2)
pt3dadd(-30.63, -59.64, -9.85, 2.14)
pt3dadd(-31.59, -61.04, -11.9, 2.51)
pt3dadd(-32.18, -62.59, -12, 2.37)
pt3dadd(-32.7, -64.43, -12, 2.37)
pt3dadd(-33.14, -66.05, -12, 2.37)
pt3dadd(-33.36, -67.23, -12.05, 2.81)
}
dend[11] {pt3dclear()
pt3dadd(-33.36, -67.23, -12.05, 2)
pt3dadd(-34.05, -68.14, -13.4, 2)
pt3dadd(-34.86, -69.54, -13.45, 2)
pt3dadd(-35.46, -71.09, -13.45, 2)
pt3dadd(-35.97, -72.64, -13.5, 2)
pt3dadd(-36.86, -73.53, -13.4, 1.7)
pt3dadd(-38.19, -74.71, -13.35, 1.7)
pt3dadd(-39.15, -75.22, -13.35, 1.7)
pt3dadd(-40.11, -75.74, -13.35, 1.7)
}
dend[12] {pt3dclear()
pt3dadd(-40.11, -75.74, -13.35, 0.89)
pt3dadd(-40.78, -75.37, -14.1, 0.89)
pt3dadd(-41.66, -75.22, -14.15, 0.89)
}
}
proc shape3d_3() {
dend[12] { pt3dadd(-42.63, -75.3, -14.2, 0.89)
pt3dadd(-43.73, -75.52, -14.2, 0.89)
pt3dadd(-44.77, -76.03, -14.2, 0.89)
pt3dadd(-45.51, -76.4, -14.25, 0.89)
pt3dadd(-46.17, -76.48, -13.1, 0.81)
pt3dadd(-46.69, -77.07, -13, 0.81)
pt3dadd(-47.21, -77.8, -12.9, 0.81)
pt3dadd(-47.87, -78.25, -12.4, 0.96)
pt3dadd(-48.91, -78.47, -12.35, 1.03)
pt3dadd(-49.57, -78.47, -12.3, 1.03)
pt3dadd(-50.24, -78.1, -12.3, 0.89)
pt3dadd(-50.9, -77.95, -12.3, 0.89)
pt3dadd(-51.64, -77.43, -11.55, 0.96)
pt3dadd(-52.6, -77.07, -11.5, 0.96)
pt3dadd(-53.27, -76.77, -11.45, 1.11)
pt3dadd(-53.71, -76.25, -11.45, 1.11)
pt3dadd(-54.3, -75.81, -11.45, 1.11)
pt3dadd(-55.04, -75.59, -11.4, 0.89)
pt3dadd(-55.78, -75.74, -12.3, 0.89)
pt3dadd(-56.52, -76.03, -12.6, 1.18)
pt3dadd(-57.26, -76.48, -12.65, 1.18)
pt3dadd(-58.15, -76.77, -13.15, 1.18)
pt3dadd(-59.11, -76.77, -12.25, 1.18)
pt3dadd(-59.99, -76.84, -12.1, 1.18)
pt3dadd(-60.73, -77.21, -12, 1.18)
pt3dadd(-61.47, -77.8, -11.95, 1.18)
pt3dadd(-62.36, -77.73, -9, 1.03)
pt3dadd(-63.39, -77.36, -8.95, 1.03)
pt3dadd(-64.06, -77.07, -8.9, 0.89)
pt3dadd(-64.58, -76.7, -8, 0.89)
pt3dadd(-65.39, -76.4, -8.15, 0.89)
pt3dadd(-66.2, -76.25, -6.8, 1.03)
pt3dadd(-66.87, -76.03, -7.1, 1.18)
pt3dadd(-67.9, -75.52, -5.9, 1.11)
pt3dadd(-68.57, -75, -5.8, 1.11)
pt3dadd(-68.94, -74.12, -5.7, 1.11)
pt3dadd(-68.94, -73.01, -5.65, 1.11)
pt3dadd(-68.57, -71.98, -3.9, 1.11)
pt3dadd(-68.94, -71.02, -3.8, 1.11)
pt3dadd(-69.75, -71.02, -3.8, 1.11)
pt3dadd(-70.78, -71.31, -2.05, 1.11)
pt3dadd(-71.97, -71.39, -1.9, 1.26)
pt3dadd(-72.63, -71.09, -1.85, 1.26)
pt3dadd(-73.37, -71.02, -0.35, 1.03)
pt3dadd(-74.18, -71.17, -0.35, 1.03)
pt3dadd(-74.92, -70.87, -0.35, 1.03)
pt3dadd(-76.11, -70.28, -0.25, 1.03)
pt3dadd(-77.14, -69.69, -0.25, 1.03)
pt3dadd(-77.73, -69.4, -0.25, 1.03)
pt3dadd(-78.77, -68.88, -0.25, 0.89)
pt3dadd(-79.36, -68.44, -0.25, 0.89)
pt3dadd(-79.95, -68.73, -0.35, 0.74)
pt3dadd(-80.69, -68.81, -0.4, 0.74)
pt3dadd(-81.13, -68.66, -0.4, 0.74)
pt3dadd(-81.46, -67.85, 2.25, 0.96)
pt3dadd(-81.46, -66.89, 2.25, 0.96)
pt3dadd(-81.61, -65.93, 2.3, 0.96)
pt3dadd(-82.06, -65.04, 2.3, 0.96)
pt3dadd(-82.43, -64.53, 2.3, 0.96)
pt3dadd(-83.02, -63.72, 2.3, 0.96)
}
dend[13] {pt3dclear()
pt3dadd(-40.11, -75.74, -13.35, 1.11)
pt3dadd(-40.48, -76.89, -12.65, 1.11)
pt3dadd(-41.22, -77.55, -12.7, 1.11)
pt3dadd(-42.1, -78.22, -11.85, 1.11)
pt3dadd(-42.7, -79.47, -11.7, 1.11)
pt3dadd(-42.92, -80.43, -11.65, 1.11)
pt3dadd(-42.84, -81.61, -13.1, 1.11)
pt3dadd(-43.29, -82.79, -13.2, 1.11)
pt3dadd(-43.73, -84.12, -13.25, 1.11)
pt3dadd(-44.4, -85.08, -13.3, 1.11)
pt3dadd(-44.54, -85.96, -13.35, 1.33)
pt3dadd(-45.13, -86.77, -13.35, 1.33)
pt3dadd(-45.87, -86.7, -13.35, 1.33)
pt3dadd(-46.69, -86.92, -15.8, 1.11)
pt3dadd(-47.72, -87.29, -15.85, 1.11)
pt3dadd(-48.76, -87.8, -15.9, 1.11)
pt3dadd(-49.86, -88.32, -15.9, 1.11)
pt3dadd(-50.83, -88.98, -16.1, 1.11)
pt3dadd(-51.79, -89.65, -16.15, 1.11)
pt3dadd(-52.16, -90.39, -16.15, 1.11)
pt3dadd(-53.12, -90.46, -18.55, 1.26)
pt3dadd(-53.71, -91.2, -18.55, 1.26)
pt3dadd(-54.08, -92.38, -18.55, 1.26)
pt3dadd(-54.37, -93.26, -18.55, 1.03)
pt3dadd(-54.67, -94.22, -18.55, 1.03)
pt3dadd(-55.41, -95.11, -18.55, 1.03)
pt3dadd(-56, -95.84, -18.55, 1.03)
pt3dadd(-56.96, -96.43, -18.45, 1.33)
pt3dadd(-57.7, -97.32, -18.45, 1.33)
pt3dadd(-58.44, -97.83, -18.45, 1.33)
pt3dadd(-59.18, -98.5, -18.4, 1.33)
pt3dadd(-60.14, -99.09, -18.4, 1.33)
pt3dadd(-61.17, -99.68, -19.3, 0.96)
pt3dadd(-61.76, -100.27, -19.35, 0.96)
pt3dadd(-62.21, -101.01, -19.45, 0.96)
pt3dadd(-63.09, -101.45, -19.85, 0.96)
pt3dadd(-63.98, -101.82, -19.85, 0.96)
pt3dadd(-64.65, -101.6, -19.9, 0.96)
pt3dadd(-65.39, -101.37, -20.75, 0.96)
pt3dadd(-66.2, -101.01, -20.8, 0.96)
pt3dadd(-67.31, -101.15, -21.9, 1.03)
pt3dadd(-68.34, -101.74, -23.4, 1.26)
pt3dadd(-68.56, -102.7, -23.4, 1.26)
pt3dadd(-68.05, -103.73, -23.4, 1.26)
pt3dadd(-67.97, -104.99, -25.45, 1.11)
pt3dadd(-68.19, -106.02, -25.45, 1.11)
pt3dadd(-68.86, -107.05, -25.5, 1.11)
pt3dadd(-69.52, -107.79, -25.5, 1.11)
pt3dadd(-70.19, -108.45, -26.2, 1.33)
pt3dadd(-71.15, -108.82, -26.25, 1.33)
pt3dadd(-71.89, -109.27, -26.25, 1.4)
pt3dadd(-72.87, -110.04, -26.55, 1.4)
pt3dadd(-73.61, -110.63, -27.2, 1.4)
pt3dadd(-74.28, -111.37, -25.55, 1.11)
pt3dadd(-75.02, -112.55, -25.35, 1.11)
pt3dadd(-75.68, -113.44, -24.7, 1.11)
pt3dadd(-76.2, -114.39, -26.8, 1.11)
pt3dadd(-76.86, -114.91, -27.1, 1.11)
pt3dadd(-77.09, -116.09, -27.15, 1.11)
pt3dadd(-77.68, -116.83, -29.05, 0.81)
pt3dadd(-78.34, -117.71, -29.1, 0.81)
pt3dadd(-78.93, -118.08, -30.05, 1.18)
pt3dadd(-79.82, -118.23, -30.05, 1.18)
pt3dadd(-80.49, -118.82, -30.1, 1.18)
pt3dadd(-81.23, -119.56, -30.1, 1.18)
pt3dadd(-81.82, -120.51, -30.1, 1.18)
pt3dadd(-81.67, -121.4, -30.1, 1.18)
pt3dadd(-81.3, -122.58, -31, 0.96)
pt3dadd(-80.63, -123.32, -31, 0.96)
pt3dadd(-79.6, -122.51, -31.75, 0.96)
pt3dadd(-78.93, -121.69, -31.6, 0.96)
}
dend[14] {pt3dclear()
pt3dadd(-33.36, -67.23, -12.05, 1.7)
pt3dadd(-32.85, -68.23, -11.3, 1.7)
pt3dadd(-32.56, -69.34, -11.25, 1.7)
pt3dadd(-31.97, -70.74, -11.25, 1.7)
pt3dadd(-31.45, -72.14, -11.2, 1.7)
pt3dadd(-31.08, -74.06, -12.55, 1.55)
pt3dadd(-30.34, -75.31, -12.65, 1.55)
pt3dadd(-29.67, -76.71, -12.75, 1.55)
pt3dadd(-29.67, -78.48, -12.8, 1.55)
pt3dadd(-29.9, -79.88, -12.8, 1.55)
pt3dadd(-30.04, -81.36, -12.85, 1.55)
pt3dadd(-30.19, -82.76, -12.85, 1.55)
pt3dadd(-29.97, -84.24, -12.85, 1.55)
pt3dadd(-29.82, -85.34, -12.85, 1.55)
pt3dadd(-29.16, -86.23, -12.85, 1.55)
pt3dadd(-28.93, -87.48, -12.85, 1.55)
pt3dadd(-28.12, -88.37, -12.85, 1.55)
pt3dadd(-26.94, -89.1, -13.35, 1.55)
pt3dadd(-25.83, -89.55, -13.5, 1.55)
pt3dadd(-25.54, -90.73, -14.55, 1.48)
pt3dadd(-25.83, -91.98, -14.6, 1.48)
pt3dadd(-25.68, -93.23, -15.25, 1.33)
pt3dadd(-24.94, -94.49, -15.3, 1.33)
pt3dadd(-24.2, -95.67, -15.3, 1.33)
pt3dadd(-23.32, -96.48, -15.3, 1.33)
pt3dadd(-22.87, -97.44, -15.3, 1.18)
pt3dadd(-23.32, -98.47, -15.3, 1.18)
pt3dadd(-23.24, -99.65, -16.5, 1.18)
pt3dadd(-23.47, -100.83, -17.15, 1.18)
pt3dadd(-23.71, -101.97, -18.35, 1.7)
pt3dadd(-23.71, -103, -17.2, 1.7)
pt3dadd(-23.34, -104.48, -17.05, 1.7)
pt3dadd(-23.86, -105.58, -21.1, 1.55)
pt3dadd(-23.78, -107.06, -21.2, 1.48)
pt3dadd(-23.26, -108.68, -21.55, 1.48)
pt3dadd(-23.12, -110.08, -21.6, 1.48)
pt3dadd(-23.41, -111.56, -21.65, 1.48)
pt3dadd(-23.93, -112.96, -21.65, 1.48)
pt3dadd(-24, -114.43, -23.6, 1.48)
pt3dadd(-23.93, -116.05, -23.8, 1.48)
pt3dadd(-23.26, -117.16, -23.85, 1.48)
pt3dadd(-22.38, -118.34, -24.65, 1.48)
pt3dadd(-21.42, -119.45, -24.85, 1.48)
pt3dadd(-20.38, -120.63, -24.95, 1.48)
pt3dadd(-19.79, -121.81, -26.1, 1.48)
pt3dadd(-18.83, -122.62, -26.1, 1.63)
pt3dadd(-18.53, -123.95, -26.15, 1.63)
pt3dadd(-18.02, -125.27, -26.15, 1.63)
pt3dadd(-17.43, -126.38, -26.15, 1.63)
pt3dadd(-16.47, -127.85, -27.2, 1.63)
pt3dadd(-15.58, -128.81, -27.3, 1.63)
pt3dadd(-15.21, -129.85, -27.3, 1.63)
pt3dadd(-15.06, -130.88, -27.3, 1.63)
pt3dadd(-15.06, -132.06, -27.3, 1.4)
pt3dadd(-15.36, -132.8, -27.3, 1.4)
pt3dadd(-15.58, -133.61, -27.9, 1.26)
pt3dadd(-15.95, -134.42, -27.95, 1.26)
pt3dadd(-15.74, -135.39, -28.4, 1.18)
pt3dadd(-15, -136.49, -28.4, 1.18)
pt3dadd(-14.26, -137.45, -28.45, 1.48)
pt3dadd(-13, -138.48, -29.8, 1.18)
pt3dadd(-11.9, -139.44, -29.7, 1.18)
pt3dadd(-10.86, -140.11, -31.2, 1.18)
pt3dadd(-9.83, -141.21, -31.25, 1.18)
pt3dadd(-9.09, -142.61, -31.3, 1.18)
pt3dadd(-8.79, -144.01, -31.3, 1.18)
pt3dadd(-8.57, -145.34, -31.3, 1.18)
pt3dadd(-8.27, -146.37, -32.2, 1.18)
pt3dadd(-8.64, -147.63, -32.2, 1.18)
}
}
proc shape3d_4() {
dend[14] { pt3dadd(-9.16, -149.18, -32.25, 1.18)
pt3dadd(-8.64, -150.65, -35.2, 1.11)
pt3dadd(-7.98, -152.13, -36.45, 1.48)
pt3dadd(-7.02, -152.72, -36.45, 1.48)
pt3dadd(-6.5, -153.82, -36.5, 1.48)
pt3dadd(-6.28, -155.08, -36.5, 1.48)
pt3dadd(-5.84, -156.26, -36.5, 1.48)
pt3dadd(-5.91, -157.8, -36.5, 1.48)
pt3dadd(-6.13, -159.13, -36.5, 1.48)
pt3dadd(-6.43, -160.24, -36.5, 1.48)
pt3dadd(-6.87, -161.34, -36.5, 1.48)
pt3dadd(-6.94, -162.38, -37.8, 1.48)
pt3dadd(-6.65, -163.41, -37.9, 1.48)
pt3dadd(-6.57, -164.52, -38.8, 1.18)
pt3dadd(-6.35, -165.55, -38.85, 1.18)
pt3dadd(-6.94, -166.36, -38.85, 1.18)
pt3dadd(-7.83, -167.32, -38.85, 1.18)
pt3dadd(-8.6, -167.78, -40.55, 1.18)
pt3dadd(-9.49, -167.93, -40.6, 1.18)
pt3dadd(-9.78, -169.33, -43.65, 1.11)
pt3dadd(-9.56, -170.29, -43.65, 1.11)
pt3dadd(-9.93, -171.39, -43.7, 1.11)
pt3dadd(-10.6, -172.13, -43.7, 1.11)
pt3dadd(-11.19, -172.79, -43.7, 1.11)
pt3dadd(-11.85, -173.24, -44.45, 1.11)
pt3dadd(-12.96, -173.61, -44.5, 1.11)
pt3dadd(-12.81, -174.64, -44.5, 0.74)
pt3dadd(-12.44, -175.82, -44.5, 0.74)
pt3dadd(-11.7, -176.41, -89, 0.74)
}
dend[15] {pt3dclear()
pt3dadd(-28.23, -25.82, -12.7, 1.85)
pt3dadd(-29.27, -27.04, -15.6, 1.85)
pt3dadd(-30.23, -27.41, -15.65, 1.85)
pt3dadd(-31.04, -27.92, -15.65, 1.85)
pt3dadd(-31.63, -28.66, -15.7, 1.85)
pt3dadd(-32.3, -29.62, -15.7, 1.85)
pt3dadd(-32.52, -30.87, -15.7, 1.85)
pt3dadd(-33.7, -31.54, -21.05, 2.59)
pt3dadd(-34.37, -31.76, -21.05, 2.59)
pt3dadd(-35.4, -32.35, -21.05, 2.59)
pt3dadd(-36.51, -32.79, -21.1, 2.59)
}
dend[16] {pt3dclear()
pt3dadd(-36.51, -32.79, -21.1, 2)
pt3dadd(-37.1, -34.04, -22.75, 2)
pt3dadd(-37.99, -35, -22.85, 2)
pt3dadd(-38.66, -35.59, -22.9, 2)
pt3dadd(-39.32, -35.89, -22.95, 2)
pt3dadd(-40.06, -36.26, -22.95, 2)
pt3dadd(-40.8, -37.14, -23.1, 1.92)
}
dend[17] {pt3dclear()
pt3dadd(-40.8, -37.14, -23.1, 1.55)
pt3dadd(-41.39, -37.95, -23, 1.55)
pt3dadd(-42.43, -38.69, -22.9, 1.55)
pt3dadd(-43.24, -39.5, -23.85, 1.48)
pt3dadd(-43.98, -40.31, -24.45, 1.48)
pt3dadd(-45.31, -40.76, -28.15, 1.26)
pt3dadd(-46.12, -41.27, -28.3, 1.26)
pt3dadd(-46.86, -41.57, -28.3, 1.26)
pt3dadd(-47.97, -42.01, -29.45, 1.26)
pt3dadd(-48.49, -42.23, -29.5, 1.26)
pt3dadd(-49.23, -42.3, -29.55, 1.26)
pt3dadd(-50.04, -42.67, -30.4, 1.4)
pt3dadd(-50.63, -42.6, -30.5, 1.4)
pt3dadd(-51.52, -42.67, -30.55, 1.4)
pt3dadd(-52.62, -42.89, -31.35, 1.4)
pt3dadd(-53.51, -43.48, -31.4, 1.4)
pt3dadd(-54.18, -44, -32.9, 1.4)
pt3dadd(-54.92, -44.37, -32.9, 1.4)
pt3dadd(-55.8, -44.88, -32.9, 1.4)
pt3dadd(-56.02, -45.11, -33.6, 1.4)
pt3dadd(-56.99, -45.18, -33.6, 1.4)
pt3dadd(-57.65, -45.25, -33.6, 1.4)
pt3dadd(-58.46, -45.25, -33.6, 1.4)
pt3dadd(-58.98, -45.25, -33.6, 1.4)
pt3dadd(-59.5, -45.25, -33.6, 1.4)
pt3dadd(-60.24, -45.11, -33.6, 1.4)
pt3dadd(-60.75, -45.11, -33.6, 1.4)
pt3dadd(-61.42, -44.81, -33.6, 1.4)
pt3dadd(-62.01, -44.66, -33.6, 1.4)
pt3dadd(-62.75, -44.37, -34.15, 1.11)
pt3dadd(-63.42, -44.07, -34.15, 1.11)
pt3dadd(-64.01, -43.63, -34.15, 1.11)
pt3dadd(-64.75, -43.41, -34.3, 1.11)
pt3dadd(-65.63, -43.34, -34.45, 1.11)
pt3dadd(-66.22, -43.12, -34.4, 1.11)
pt3dadd(-66.89, -43.12, -34.2, 1.11)
pt3dadd(-67.92, -43.26, -32.4, 1.11)
pt3dadd(-68.44, -43.93, -32.25, 1.11)
pt3dadd(-69.18, -44.44, -32.15, 1.11)
pt3dadd(-69.62, -44.88, -32.1, 1.11)
pt3dadd(-70.07, -46.06, -33.15, 1.11)
pt3dadd(-70.81, -46.65, -33.3, 1.11)
pt3dadd(-71.25, -47.1, -33.4, 1.11)
pt3dadd(-71.92, -47.54, -33.5, 1.11)
pt3dadd(-72.73, -47.91, -33.65, 1.26)
pt3dadd(-73.39, -48.42, -33.65, 1.26)
pt3dadd(-73.76, -48.87, -33.65, 1.26)
pt3dadd(-74.43, -49.38, -33.65, 1.26)
pt3dadd(-74.72, -50.42, -34.3, 1.11)
pt3dadd(-74.87, -51.23, -34.3, 1.11)
pt3dadd(-74.8, -52.26, -34.3, 1.11)
pt3dadd(-75.02, -53.07, -33, 1.11)
pt3dadd(-75.31, -53.96, -32.8, 1.11)
pt3dadd(-75.76, -54.69, -32.75, 1.11)
pt3dadd(-76.42, -55.21, -33.35, 1.18)
pt3dadd(-77.01, -56.09, -33.45, 1.18)
pt3dadd(-77.75, -56.61, -31.4, 1.26)
pt3dadd(-78.27, -56.83, -31.35, 1.26)
pt3dadd(-78.86, -57.35, -31.35, 1.26)
pt3dadd(-79.31, -58.09, -30.1, 1.11)
pt3dadd(-79.53, -59.04, -30, 1.11)
pt3dadd(-80.05, -59.63, -29.95, 1.11)
pt3dadd(-80.78, -60, -29.7, 1.11)
pt3dadd(-81.6, -60.37, -29.65, 1.11)
pt3dadd(-82.19, -60.89, -29.6, 1.11)
pt3dadd(-82.85, -61.26, -29.55, 1.11)
pt3dadd(-83.65, -61.48, -29, 1.11)
pt3dadd(-84.53, -61.26, -28.95, 1.11)
pt3dadd(-85.5, -61.12, -30.15, 1.11)
pt3dadd(-86.38, -61.34, -30.3, 1.11)
pt3dadd(-87.2, -61.04, -30.4, 1.11)
pt3dadd(-88.23, -60.97, -30.45, 1.11)
pt3dadd(-88.6, -61.19, -30.5, 1.26)
pt3dadd(-89.26, -61.12, -30.55, 1.48)
pt3dadd(-90.23, -60.6, -30.55, 1.48)
pt3dadd(-91.11, -60.08, -30.55, 1.48)
pt3dadd(-91.78, -59.64, -30.55, 1.48)
pt3dadd(-92.15, -59.2, -30.55, 1.03)
pt3dadd(-92.81, -58.83, -31.5, 1.03)
pt3dadd(-93.55, -58.53, -31.6, 1.03)
pt3dadd(-94.44, -58.09, -31.7, 1.33)
pt3dadd(-95.18, -57.65, -31.7, 1.33)
pt3dadd(-95.69, -56.84, -31.75, 1.33)
pt3dadd(-96.06, -56.1, -32.15, 1.33)
pt3dadd(-96.95, -55.58, -32.25, 1.33)
pt3dadd(-97.17, -54.92, -33.4, 0.96)
pt3dadd(-97.69, -54.55, -33.45, 0.96)
pt3dadd(-98.06, -53.81, -33.45, 0.96)
pt3dadd(-98.06, -53.45, -33.6, 0.89)
pt3dadd(-97.32, -52.27, -33.5, 0.89)
pt3dadd(-98.36, -52.78, -33.45, 0.89)
pt3dadd(-98.72, -51.82, -35.55, 0.89)
}
dend[18] {pt3dclear()
pt3dadd(-40.8, -37.14, -23.1, 1.85)
pt3dadd(-41.74, -36.85, -29, 1.85)
pt3dadd(-42.48, -36.11, -28.95, 1.85)
pt3dadd(-43.29, -35.82, -32.05, 1.33)
pt3dadd(-44.11, -35.89, -32.2, 1.33)
pt3dadd(-44.92, -36.34, -34.25, 1.48)
pt3dadd(-45.73, -36.7, -34.4, 1.48)
pt3dadd(-46.69, -37.29, -34.65, 1.48)
pt3dadd(-47.58, -37.81, -35.8, 1.48)
pt3dadd(-48.39, -37.81, -35.85, 1.48)
pt3dadd(-49.43, -37.52, -37.1, 1.48)
pt3dadd(-49.95, -37.15, -37.15, 1.48)
pt3dadd(-51.05, -36.63, -37.8, 1.48)
pt3dadd(-52.01, -37, -37.8, 1.48)
pt3dadd(-52.46, -37.52, -37.8, 1.48)
pt3dadd(-52.83, -38.4, -38.75, 1.4)
pt3dadd(-52.75, -39.14, -38.8, 1.4)
pt3dadd(-52.53, -39.95, -38.85, 1.4)
pt3dadd(-52.83, -40.76, -39.5, 1.4)
pt3dadd(-53.2, -41.65, -39.5, 1.4)
pt3dadd(-53.79, -42.31, -39.55, 1.4)
pt3dadd(-54.31, -43.49, -42.7, 1.4)
pt3dadd(-55.19, -44.37, -43.75, 1.4)
pt3dadd(-56.74, -45.48, -43.85, 1.4)
pt3dadd(-57.34, -46.07, -43.9, 1.4)
pt3dadd(-58.74, -46.59, -43.9, 1.4)
pt3dadd(-60.14, -47.25, -43.95, 1.4)
}
dend[19] {pt3dclear()
pt3dadd(-36.51, -32.79, -21.1, 1.26)
pt3dadd(-36.87, -32.22, -21.05, 1.26)
pt3dadd(-37.61, -31.85, -21.05, 1.26)
pt3dadd(-38.28, -31.93, -21.05, 0.89)
pt3dadd(-39.16, -31.85, -21.05, 0.89)
pt3dadd(-39.83, -32, -20.9, 0.89)
pt3dadd(-40.57, -32.15, -20.9, 0.89)
pt3dadd(-41.53, -32.22, -22.05, 0.89)
pt3dadd(-42.34, -32.29, -22.2, 0.89)
pt3dadd(-43.01, -32, -22.25, 0.89)
pt3dadd(-43.82, -32.07, -22.85, 0.89)
pt3dadd(-44.78, -31.93, -23.35, 1.03)
pt3dadd(-45.82, -31.7, -23.4, 1.48)
pt3dadd(-46.78, -31.56, -23.4, 1.48)
pt3dadd(-47.59, -31.7, -24.85, 1.11)
pt3dadd(-48.33, -31.56, -24.9, 1.11)
pt3dadd(-49.22, -31.19, -24.9, 1.11)
pt3dadd(-49.81, -31.11, -24.9, 1.11)
pt3dadd(-50.25, -31.19, -24.9, 0.89)
pt3dadd(-50.77, -31.04, -24.9, 0.89)
pt3dadd(-51.29, -30.75, -26.15, 0.89)
pt3dadd(-51.8, -30.67, -26.15, 1.03)
pt3dadd(-52.39, -30.67, -26.2, 1.03)
pt3dadd(-52.91, -30.75, -26.2, 1.03)
pt3dadd(-53.8, -30.6, -26.85, 1.03)
pt3dadd(-54.76, -30.52, -26.85, 1.03)
pt3dadd(-55.65, -30.45, -26.85, 1.03)
pt3dadd(-56.39, -29.71, -27.25, 0.96)
pt3dadd(-57.2, -29.42, -27.35, 0.96)
pt3dadd(-57.94, -28.61, -28.35, 1.18)
pt3dadd(-58.38, -27.65, -28.35, 1.18)
pt3dadd(-58.23, -26.76, -28.4, 1.55)
pt3dadd(-57.94, -26.39, -28.4, 1.55)
pt3dadd(-57.12, -25.58, -30.55, 1.11)
}
}
proc shape3d_5() {
dend[19] { pt3dadd(-56.76, -25.07, -30.6, 1.11)
pt3dadd(-56.61, -24.48, -30.6, 1.11)
pt3dadd(-56.31, -23.74, -30.6, 1.11)
pt3dadd(-56.02, -23, -30.6, 1.11)
pt3dadd(-55.28, -22.41, -31.65, 1.26)
pt3dadd(-54.61, -22.12, -31.65, 1.26)
pt3dadd(-54.09, -21.9, -31.65, 1.26)
pt3dadd(-52.99, -21.45, -33.25, 0.89)
pt3dadd(-53.06, -20.72, -33.25, 0.89)
pt3dadd(-52.69, -19.9, -34.45, 1.18)
pt3dadd(-52.76, -19.17, -34.45, 1.33)
pt3dadd(-52.62, -18.43, -34.45, 1.33)
}
dend[20] {pt3dclear()
pt3dadd(-17.66, -16.09, -12.8, 1.33)
pt3dadd(-18.24, -15.53, -12, 1.33)
pt3dadd(-18.69, -15.24, -12.05, 1.33)
pt3dadd(-19.35, -14.8, -12.05, 1.33)
pt3dadd(-20.02, -14.5, -12.05, 1.48)
pt3dadd(-20.68, -14.28, -12.1, 1.63)
pt3dadd(-21.42, -14.13, -12.1, 1.63)
pt3dadd(-21.94, -14.21, -12.1, 1.63)
pt3dadd(-22.68, -14.13, -12.6, 1.63)
pt3dadd(-23.19, -13.69, -12.6, 1.63)
pt3dadd(-24.38, -13.39, -13, 1.85)
pt3dadd(-25.19, -13.17, -13, 1.85)
pt3dadd(-26, -13.03, -14, 1.85)
pt3dadd(-26.82, -13.03, -14, 1.85)
pt3dadd(-27.63, -13.1, -14, 1.85)
pt3dadd(-28.37, -13.17, -14, 1.85)
pt3dadd(-29.25, -13.25, -14.5, 1.85)
pt3dadd(-29.62, -13.39, -14.5, 1.85)
pt3dadd(-30.73, -13.32, -14.85, 1.85)
pt3dadd(-31.55, -13.25, -14.85, 1.85)
}
dend[21] {pt3dclear()
pt3dadd(-31.55, -13.25, -14.85, 1.85)
pt3dadd(-32.58, -13.54, -12.45, 1.85)
pt3dadd(-33.76, -13.32, -12.15, 1.85)
pt3dadd(-35.02, -13.17, -11.85, 1.85)
pt3dadd(-35.83, -12.58, -11.7, 1.55)
pt3dadd(-36.87, -12.36, -11.7, 1.55)
pt3dadd(-37.9, -11.7, -11.65, 1.55)
pt3dadd(-39.16, -11.4, -11.65, 1.55)
pt3dadd(-40.05, -11.48, -11.65, 1.55)
pt3dadd(-40.93, -11.85, -11.45, 1.55)
pt3dadd(-41.6, -12.29, -11.35, 1.55)
pt3dadd(-42.56, -12.66, -11.35, 1.55)
pt3dadd(-43.3, -12.73, -11.3, 1.55)
pt3dadd(-44.48, -12.51, -11.3, 1.55)
pt3dadd(-44.92, -12.66, -11.25, 1.55)
pt3dadd(-45.96, -12.73, -10.7, 1.7)
pt3dadd(-46.85, -12.95, -10.65, 1.7)
pt3dadd(-47.51, -13.25, -10.65, 1.7)
pt3dadd(-48.46, -13.74, -11.5, 1.7)
pt3dadd(-49.49, -14.04, -11.55, 1.7)
pt3dadd(-50.38, -13.89, -11.6, 1.7)
pt3dadd(-51.12, -13.52, -11.6, 1.7)
pt3dadd(-51.93, -13.3, -11.95, 1.7)
pt3dadd(-52.52, -13, -11.95, 1.7)
pt3dadd(-53.56, -12.41, -13.25, 1.7)
pt3dadd(-54.07, -12.05, -13.35, 1.7)
pt3dadd(-55.33, -11.75, -15.2, 1.7)
pt3dadd(-56.36, -11.68, -15.25, 1.7)
pt3dadd(-57.18, -11.75, -15.35, 1.7)
pt3dadd(-57.99, -11.6, -15.5, 1.7)
pt3dadd(-58.88, -11.68, -15.55, 1.7)
pt3dadd(-59.54, -11.68, -15.55, 1.7)
pt3dadd(-60.65, -11.6, -15.85, 1.7)
pt3dadd(-61.91, -11.82, -15.9, 1.7)
}
dend[22] {pt3dclear()
pt3dadd(-61.91, -11.82, -15.9, 1.55)
pt3dadd(-63.02, -11.53, -12.75, 1.55)
pt3dadd(-64.12, -11.46, -12.5, 1.55)
pt3dadd(-64.94, -11.53, -12.4, 1.55)
pt3dadd(-65.6, -11.75, -12.4, 1.55)
pt3dadd(-66.49, -11.9, -12.35, 1.55)
pt3dadd(-67.23, -11.97, -12.3, 1.55)
pt3dadd(-68.12, -12.05, -12.3, 1.55)
pt3dadd(-68.78, -12.12, -12.3, 1.55)
pt3dadd(-69.52, -11.82, -12.3, 1.55)
pt3dadd(-70.41, -11.75, -12.25, 1.55)
pt3dadd(-71.52, -11.6, -12.25, 1.55)
pt3dadd(-72.55, -11.82, -12.25, 1.55)
pt3dadd(-73.36, -12.19, -12.25, 1.55)
pt3dadd(-73.88, -12.71, -12.25, 1.55)
pt3dadd(-74.84, -13.37, -12.05, 1.55)
pt3dadd(-75.43, -13.89, -12, 1.55)
pt3dadd(-76.47, -14.33, -11.95, 1.55)
pt3dadd(-77.06, -14.41, -11.95, 1.55)
pt3dadd(-77.87, -14.48, -11.95, 1.55)
pt3dadd(-78.61, -14.55, -11.75, 1.55)
pt3dadd(-79.5, -14.48, -11.65, 1.55)
pt3dadd(-80.24, -14.33, -11.65, 1.55)
pt3dadd(-81.12, -14.41, -11.6, 1.55)
pt3dadd(-82.16, -14.85, -11.55, 1.33)
pt3dadd(-82.97, -15.29, -11.55, 1.33)
pt3dadd(-83.93, -15.44, -11.55, 1.33)
pt3dadd(-84.38, -15.44, -11.55, 1.33)
pt3dadd(-85.48, -15.29, -11, 1.33)
pt3dadd(-86.45, -15.14, -10.9, 1.33)
pt3dadd(-87.41, -14.85, -10.9, 1.33)
pt3dadd(-88.29, -14.48, -10.85, 1.48)
pt3dadd(-88.96, -14.26, -10.85, 1.48)
pt3dadd(-89.77, -14.11, -9.6, 1.48)
pt3dadd(-90.66, -14.04, -9.55, 1.48)
pt3dadd(-91.4, -13.89, -9.45, 1.48)
pt3dadd(-91.91, -13.59, -9.4, 1.48)
pt3dadd(-92.73, -13.08, -9.25, 1.26)
pt3dadd(-92.95, -12.49, -9.25, 1.26)
pt3dadd(-93.39, -11.9, -9.95, 1.26)
pt3dadd(-94.13, -11.46, -10.15, 1.26)
pt3dadd(-94.87, -11.23, -10.25, 1.26)
pt3dadd(-95.68, -10.64, -10.35, 1.26)
pt3dadd(-95.91, -10.42, -10.4, 1.4)
pt3dadd(-96.64, -10.28, -10.45, 1.4)
pt3dadd(-97.64, -9.7, -10.45, 1.4)
pt3dadd(-98.6, -9.56, -10.5, 1.4)
pt3dadd(-99.26, -9.19, -10.5, 1.4)
pt3dadd(-100.15, -8.67, -10.5, 1.4)
pt3dadd(-100.74, -7.79, -10.5, 1.26)
pt3dadd(-101.56, -7.2, -10.5, 1.26)
pt3dadd(-102.22, -6.68, -10.5, 1.26)
pt3dadd(-102.59, -6.31, -10.5, 1.26)
pt3dadd(-103.4, -6.02, -10.5, 1.26)
pt3dadd(-104.22, -6.02, -9.7, 1.26)
pt3dadd(-105.03, -5.94, -9.5, 1.26)
pt3dadd(-105.62, -5.8, -9.4, 1.26)
pt3dadd(-106.21, -5.72, -9.35, 1.26)
pt3dadd(-106.73, -5.57, -9.35, 1.26)
pt3dadd(-107.25, -5.06, -9.3, 1.26)
pt3dadd(-107.62, -4.62, -9.25, 1.26)
pt3dadd(-107.84, -3.95, -8.6, 1.26)
pt3dadd(-108.43, -3.44, -8.55, 1.26)
pt3dadd(-109.32, -3.44, -9.8, 1.26)
pt3dadd(-110.13, -3.29, -10, 1.26)
pt3dadd(-110.65, -3.36, -10.1, 1.26)
pt3dadd(-111.68, -3.21, -10.2, 1.26)
pt3dadd(-112.27, -3.14, -10.25, 1.26)
}
dend[23] {pt3dclear()
pt3dadd(-61.91, -11.82, -15.9, 0.81)
pt3dadd(-61.94, -12.73, -15.55, 0.81)
pt3dadd(-62.75, -13.1, -15.7, 0.81)
pt3dadd(-63.64, -13.17, -13.7, 0.81)
pt3dadd(-64.31, -13.39, -13.6, 0.81)
pt3dadd(-64.97, -13.54, -13.5, 0.81)
pt3dadd(-65.78, -13.76, -13.45, 0.81)
pt3dadd(-67.04, -13.69, -13.4, 0.81)
pt3dadd(-67.85, -14.28, -12.3, 0.89)
pt3dadd(-68.59, -14.72, -12.25, 0.89)
pt3dadd(-69.33, -15.31, -12.15, 1.03)
pt3dadd(-70.22, -15.6, -12.1, 1.03)
pt3dadd(-70.88, -16.05, -12.1, 1.03)
pt3dadd(-71.55, -16.42, -10.95, 1.03)
pt3dadd(-72.21, -16.71, -10.85, 1.03)
pt3dadd(-72.81, -16.86, -10.8, 1.03)
pt3dadd(-73.54, -17.08, -10.75, 1.03)
pt3dadd(-74.28, -17.37, -9.8, 0.96)
pt3dadd(-74.95, -17.45, -9.75, 0.96)
pt3dadd(-75.76, -17.67, -9.7, 0.96)
pt3dadd(-76.57, -17.96, -9.7, 1.18)
pt3dadd(-77.46, -18.11, -9.65, 1.18)
pt3dadd(-78.13, -18.26, -9.65, 1.18)
pt3dadd(-79.01, -18.48, -9.65, 1.18)
pt3dadd(-79.83, -19, -9.1, 1.18)
pt3dadd(-80.64, -19.22, -9.05, 1.18)
pt3dadd(-81.08, -19.66, -9, 1.18)
pt3dadd(-81.67, -19.81, -8.1, 0.96)
pt3dadd(-82.41, -19.66, -8.1, 0.96)
pt3dadd(-83.23, -19.44, -8.05, 0.96)
pt3dadd(-83.82, -19.36, -8.05, 0.96)
pt3dadd(-84.56, -19.36, -8.05, 0.96)
pt3dadd(-85.37, -19.36, -7.4, 0.96)
pt3dadd(-86.4, -19.95, -9, 0.96)
pt3dadd(-87.14, -20.32, -9.25, 0.96)
pt3dadd(-87.81, -20.77, -9.4, 0.96)
pt3dadd(-88.4, -21.21, -9.95, 0.96)
pt3dadd(-88.84, -21.36, -10.05, 0.96)
pt3dadd(-89.43, -21.72, -10.9, 0.96)
pt3dadd(-90.32, -21.43, -11.15, 0.96)
pt3dadd(-91.06, -21.06, -11.25, 0.96)
pt3dadd(-91.8, -20.84, -11.3, 0.96)
pt3dadd(-92.54, -20.77, -11.35, 0.96)
pt3dadd(-93.2, -20.62, -11.95, 0.96)
pt3dadd(-93.72, -20.1, -12.05, 0.96)
pt3dadd(-94.31, -19.59, -12.1, 0.96)
pt3dadd(-95.2, -19.22, -11, 0.81)
pt3dadd(-95.57, -18.85, -10.9, 0.81)
pt3dadd(-96.23, -18.55, -10.85, 0.81)
pt3dadd(-97.12, -18.48, -10.35, 1.03)
pt3dadd(-97.93, -18.33, -10.15, 1.18)
pt3dadd(-98.53, -18.33, -10.05, 1.4)
pt3dadd(-99.04, -18.55, -10, 1.4)
pt3dadd(-99.93, -18.7, -9.65, 1.4)
}
dend[24] {pt3dclear()
pt3dadd(-31.55, -13.25, -14.85, 1.33)
pt3dadd(-32.25, -12.58, -15.95, 1.33)
pt3dadd(-32.92, -11.48, -15.8, 1.26)
pt3dadd(-33.44, -10.74, -15.75, 1.26)
pt3dadd(-33.81, -10.3, -15.75, 1.26)
pt3dadd(-34.47, -9.56, -15.7, 1.26)
pt3dadd(-35.06, -8.82, -15.7, 1.26)
pt3dadd(-35.28, -8.09, -15.7, 1.26)
pt3dadd(-35.58, -7.35, -15.7, 1.26)
pt3dadd(-35.36, -6.61, -15.7, 1.26)
pt3dadd(-35.36, -5.73, -15.7, 1.26)
pt3dadd(-35.21, -4.99, -15.7, 1.26)
}
}
proc shape3d_6() {
dend[24] { pt3dadd(-35.36, -4.25, -15.7, 1.26)
pt3dadd(-35.73, -3.81, -16.15, 1.26)
pt3dadd(-36.47, -3.29, -16.45, 1.26)
pt3dadd(-37.21, -3.44, -16.55, 1.26)
pt3dadd(-37.87, -3.29, -16.65, 1.26)
pt3dadd(-38.39, -3.14, -16.7, 1.26)
pt3dadd(-39.13, -2.78, -17.2, 1.26)
pt3dadd(-39.57, -2.41, -17.3, 1.26)
pt3dadd(-40.24, -2.11, -18.45, 1.26)
pt3dadd(-40.83, -1.52, -18.5, 1.26)
pt3dadd(-41.49, -0.86, -18.55, 1.26)
pt3dadd(-42.53, -1.23, -21.65, 1.26)
pt3dadd(-43.41, -1.6, -21.75, 1.26)
pt3dadd(-44.23, -2.04, -21.85, 1.26)
pt3dadd(-45.04, -1.74, -23.65, 1.26)
pt3dadd(-46.07, -1.52, -23.9, 1.26)
pt3dadd(-46.89, -0.93, -24, 1.26)
pt3dadd(-47.26, -0.19, -24, 1.26)
pt3dadd(-47.7, 0.17, -24.05, 1.26)
pt3dadd(-48, 0.69, -24.2, 1.26)
pt3dadd(-48.51, 1.21, -24.7, 1.26)
pt3dadd(-48.74, 1.87, -24.95, 1.26)
pt3dadd(-49.25, 2.53, -25, 1.26)
pt3dadd(-50.29, 2.98, -25.65, 1.26)
pt3dadd(-51.17, 3.71, -25.7, 1.26)
pt3dadd(-51.84, 4.75, -25.75, 1.26)
pt3dadd(-52.28, 5.19, -25.75, 1.26)
pt3dadd(-52.8, 5.71, -25.8, 1.26)
pt3dadd(-53.39, 6.15, -26.75, 1.26)
pt3dadd(-53.91, 6.89, -26.95, 1.26)
pt3dadd(-53.69, 7.84, -27, 1.26)
pt3dadd(-52.5, 8.66, -27, 1.26)
}
dend[25] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(-9.1, -23.3, 5.85, 2.22)
pt3dadd(-9.69, -24.33, 6.45, 2.07)
pt3dadd(-10.14, -25.07, 6.25, 2.07)
pt3dadd(-10.43, -26.03, 6.15, 2.07)
pt3dadd(-11.03, -26.84, 5.95, 2.07)
pt3dadd(-11.25, -27.94, 5.95, 2.07)
pt3dadd(-11.25, -28.68, 5.9, 2.07)
pt3dadd(-11.62, -29.42, 5.9, 2.07)
pt3dadd(-11.91, -30.08, 5.9, 2.07)
pt3dadd(-12.43, -30.89, 7.95, 2.07)
pt3dadd(-13.17, -31.19, 8.1, 2.07)
pt3dadd(-13.83, -31.26, 8.2, 2.07)
pt3dadd(-14.79, -31.48, 8.25, 2.07)
pt3dadd(-15.31, -31.26, 8.3, 2.07)
pt3dadd(-15.76, -30.82, 8.3, 2.07)
pt3dadd(-16.35, -30.45, 9.7, 2.07)
pt3dadd(-17.16, -30.52, 9.75, 2.07)
pt3dadd(-17.68, -30.52, 9.8, 2.07)
pt3dadd(-18.27, -30.52, 9.85, 2.07)
pt3dadd(-19.16, -30.52, 10.05, 2.07)
pt3dadd(-20.26, -30.75, 11.6, 2.07)
pt3dadd(-20.93, -31.04, 11.7, 2.07)
pt3dadd(-21.52, -31.56, 11.75, 2.07)
pt3dadd(-21.67, -32.29, 11.8, 2.07)
pt3dadd(-21.89, -32.96, 11.8, 2.07)
pt3dadd(-22.19, -33.7, 11.8, 2.07)
pt3dadd(-22.48, -34.36, 11.8, 2.07)
pt3dadd(-22.61, -35.54, 12.45, 2.07)
pt3dadd(-22.76, -36.43, 12.5, 2.07)
pt3dadd(-22.9, -36.94, 12.55, 2.07)
pt3dadd(-23.35, -37.39, 12.55, 2.07)
pt3dadd(-23.57, -37.75, 12.6, 2.07)
pt3dadd(-23.79, -38.2, 12.6, 2.07)
}
dend[26] {pt3dclear()
pt3dadd(-23.79, -38.2, 12.6, 1.55)
pt3dadd(-22.9, -38.86, 15.3, 1.55)
pt3dadd(-22.24, -39.75, 15.4, 1.48)
pt3dadd(-21.57, -40.19, 15.4, 1.48)
pt3dadd(-21.28, -40.78, 15.4, 1.48)
pt3dadd(-21.06, -41.59, 15.4, 1.48)
pt3dadd(-21.35, -41.96, 15.4, 1.48)
pt3dadd(-21.2, -42.77, 15.4, 1.48)
pt3dadd(-20.83, -43.51, 15.4, 1.48)
pt3dadd(-20.32, -44.24, 16.55, 1.48)
pt3dadd(-19.65, -44.76, 16.65, 1.48)
pt3dadd(-19.58, -45.42, 16.65, 1.48)
pt3dadd(-19.95, -46.31, 17.7, 1.48)
pt3dadd(-20.47, -46.9, 17.85, 1.48)
pt3dadd(-21.06, -47.19, 17.9, 1.48)
pt3dadd(-21.8, -47.34, 18, 1.48)
pt3dadd(-22.53, -47.78, 18.9, 1.48)
pt3dadd(-23.27, -47.93, 19, 1.48)
pt3dadd(-23.64, -48.15, 19.15, 1.48)
pt3dadd(-24.83, -48.3, 19.9, 1.48)
pt3dadd(-25.34, -48.74, 19.95, 1.48)
pt3dadd(-26.3, -49.26, 19.95, 1.48)
pt3dadd(-26.6, -49.63, 19.95, 1.48)
pt3dadd(-27.34, -50.29, 22.1, 0.81)
pt3dadd(-28.08, -50.81, 22.1, 0.81)
pt3dadd(-28.89, -51.1, 22.1, 0.81)
pt3dadd(-29.7, -51.1, 22.1, 0.81)
pt3dadd(-30.22, -50.88, 22.1, 0.81)
pt3dadd(-30.74, -50.59, 22.1, 0.81)
pt3dadd(-31.26, -50.59, 22.1, 0.81)
}
dend[27] {pt3dclear()
pt3dadd(-23.79, -38.2, 12.6, 1.63)
pt3dadd(-24.83, -38.42, 12.7, 1.63)
pt3dadd(-25.56, -38.71, 12.7, 1.63)
pt3dadd(-26.23, -39.45, 12.7, 1.63)
pt3dadd(-26.82, -40.34, 12.7, 1.48)
pt3dadd(-26.9, -40.93, 12.7, 1.48)
pt3dadd(-26.38, -41.74, 11.15, 1.48)
pt3dadd(-25.79, -42.47, 10.95, 1.48)
pt3dadd(-25.64, -43.51, 10.9, 1.48)
pt3dadd(-25.12, -44.54, 10.35, 1.33)
pt3dadd(-25.42, -45.5, 10.25, 1.33)
pt3dadd(-26.01, -46.01, 10.2, 1.33)
pt3dadd(-26.6, -46.75, 9.4, 1.33)
pt3dadd(-27.04, -47.27, 9.25, 1.33)
pt3dadd(-27.63, -47.93, 8.35, 1.55)
pt3dadd(-28.37, -48.3, 8.25, 1.55)
pt3dadd(-28.89, -48.74, 7.7, 1.55)
pt3dadd(-29.48, -48.82, 7.65, 1.55)
pt3dadd(-30, -48.96, 7.6, 1.55)
pt3dadd(-31.03, -49.33, 7.6, 1.55)
pt3dadd(-31.55, -50, 8.9, 1.55)
pt3dadd(-31.7, -50.73, 9.05, 1.55)
pt3dadd(-32.22, -51.25, 9.15, 1.55)
pt3dadd(-32.73, -51.4, 9.2, 1.55)
pt3dadd(-33.47, -51.32, 9.2, 1.55)
pt3dadd(-34.21, -51.32, 9.25, 1.55)
pt3dadd(-35.03, -51.62, 9.25, 1.55)
pt3dadd(-35.47, -51.91, 9.25, 1.55)
pt3dadd(-36.28, -52.13, 9.3, 1.55)
pt3dadd(-36.95, -52.13, 9.45, 1.55)
pt3dadd(-37.61, -52.13, 9.5, 1.55)
pt3dadd(-38.2, -51.84, 9.55, 1.55)
pt3dadd(-38.79, -51.84, 9.55, 1.55)
pt3dadd(-39.39, -51.84, 9.55, 1.55)
pt3dadd(-39.83, -51.91, 9.7, 1.55)
pt3dadd(-40.57, -52.06, 9.8, 1.55)
pt3dadd(-41.01, -52.5, 9.9, 1.55)
pt3dadd(-41.9, -52.95, 10.05, 1.55)
pt3dadd(-42.42, -53.31, 10.1, 1.55)
pt3dadd(-42.79, -53.76, 10.15, 1.55)
pt3dadd(-43.3, -54.42, 10.15, 1.55)
pt3dadd(-43.97, -54.79, 10.2, 1.55)
pt3dadd(-44.63, -55.31, 10.35, 1.55)
pt3dadd(-45.15, -55.75, 10.4, 1.55)
pt3dadd(-45.59, -56.26, 10.45, 1.55)
pt3dadd(-46.33, -56.78, 10.45, 1.55)
pt3dadd(-47.22, -57.37, 10.5, 1.55)
pt3dadd(-47.74, -57.89, 10.5, 1.55)
pt3dadd(-48.48, -58.18, 10.5, 1.55)
pt3dadd(-49.14, -58.33, 10.5, 1.55)
pt3dadd(-49.66, -57.96, 10.5, 1.55)
pt3dadd(-50.47, -57.74, 10.5, 1.55)
pt3dadd(-51.06, -57.67, 10.5, 1.55)
pt3dadd(-51.73, -57.67, 10.5, 1.55)
pt3dadd(-52.47, -57.59, 10.5, 1.55)
pt3dadd(-53.28, -57.44, 10.5, 1.55)
pt3dadd(-54.02, -57.22, 10.5, 1.55)
pt3dadd(-54.68, -57.15, 10.5, 1.55)
pt3dadd(-55.35, -56.93, 10.5, 1.55)
pt3dadd(-56.61, -56.93, 10.6, 1.55)
pt3dadd(-57.49, -56.56, 10.65, 1.55)
pt3dadd(-58.31, -56.26, 10.7, 1.55)
pt3dadd(-58.82, -56.19, 10.7, 1.55)
pt3dadd(-59.49, -55.97, 10.7, 1.55)
pt3dadd(-60.23, -55.75, 10.75, 1.55)
pt3dadd(-60.67, -55.45, 10.75, 1.55)
pt3dadd(-61.41, -55.16, 10.75, 1.55)
pt3dadd(-62.08, -54.94, 10.75, 1.55)
}
dend[28] {pt3dclear()
pt3dadd(-62.08, -54.94, 10.75, 0.96)
pt3dadd(-62.67, -55.45, 11.9, 0.96)
pt3dadd(-63.26, -55.53, 11.9, 0.96)
pt3dadd(-64, -55.75, 11.9, 0.96)
pt3dadd(-64.51, -56.12, 11.95, 0.96)
pt3dadd(-65.18, -56.41, 11.95, 0.96)
pt3dadd(-65.85, -56.56, 11.95, 0.96)
pt3dadd(-66.51, -56.85, 11.95, 0.96)
pt3dadd(-67.25, -57.22, 13, 0.96)
pt3dadd(-67.99, -57.59, 12.9, 0.96)
pt3dadd(-68.51, -58.11, 12.8, 0.96)
pt3dadd(-68.14, -58.48, 15.9, 1.18)
pt3dadd(-67.4, -58.85, 15.9, 1.18)
pt3dadd(-66.95, -59.36, 15.95, 1.18)
pt3dadd(-67.4, -60.17, 18.35, 0.52)
pt3dadd(-67.91, -60.62, 18.4, 0.52)
pt3dadd(-68.58, -60.98, 18.5, 0.52)
pt3dadd(-68.95, -61.57, 18.55, 0.52)
pt3dadd(-69.02, -62.53, 19.45, 0.67)
pt3dadd(-69.02, -63.2, 19.5, 0.67)
pt3dadd(-68.73, -63.86, 19.5, 0.67)
pt3dadd(-69.39, -64.3, 19.55, 0.67)
pt3dadd(-70.35, -64.97, 20.65, 0.67)
pt3dadd(-70.56, -65.52, 21.15, 0.67)
pt3dadd(-71.07, -65.96, 21.25, 0.67)
pt3dadd(-71.59, -66.55, 21.25, 0.67)
pt3dadd(-72.18, -67.22, 21.4, 0.67)
pt3dadd(-72.55, -68.18, 21.55, 0.67)
pt3dadd(-72.7, -68.77, 22, 0.67)
pt3dadd(-72.92, -69.5, 22.05, 0.67)
pt3dadd(-72.33, -70.39, 22.05, 0.67)
pt3dadd(-72.33, -71.2, 22.05, 0.67)
pt3dadd(-72.63, -71.72, 22.1, 0.67)
}
dend[29] {pt3dclear()
pt3dadd(-62.08, -54.94, 10.75, 1.11)
pt3dadd(-62.8, -54.38, 10.8, 1.11)
pt3dadd(-63.76, -53.94, 10.8, 1.11)
}
}
proc shape3d_7() {
dend[29] { pt3dadd(-64.72, -53.87, 11.9, 1.26)
pt3dadd(-65.68, -53.79, 11.9, 1.26)
pt3dadd(-66.57, -53.5, 11.9, 1.48)
pt3dadd(-67.16, -53.43, 11.9, 1.48)
pt3dadd(-68.04, -53.43, 11.9, 1.48)
pt3dadd(-68.93, -53.13, 11.9, 1.48)
pt3dadd(-69.82, -52.84, 11.9, 1.48)
pt3dadd(-70.63, -52.69, 11.9, 1.48)
pt3dadd(-71.3, -52.47, 11.9, 1.48)
pt3dadd(-71.81, -52.17, 11.9, 1.63)
pt3dadd(-72.48, -51.88, 11.9, 1.77)
pt3dadd(-73.44, -51.36, 11.9, 1.77)
pt3dadd(-74.03, -51.43, 11.9, 1.77)
pt3dadd(-74.55, -51.66, 11.9, 1.77)
pt3dadd(-75.29, -51.88, 11.9, 1.77)
pt3dadd(-76.47, -52.1, 10.9, 1.4)
pt3dadd(-77.43, -51.95, 10.8, 1.4)
pt3dadd(-78.24, -52.02, 10.75, 1.4)
pt3dadd(-78.83, -51.88, 9.8, 1.4)
pt3dadd(-79.72, -52.1, 9.6, 1.4)
pt3dadd(-80.31, -51.73, 9.5, 1.4)
pt3dadd(-80.83, -50.84, 9.4, 1.4)
pt3dadd(-81.49, -50.03, 9.35, 1.4)
pt3dadd(-82.09, -49.44, 8.6, 1.4)
pt3dadd(-82.6, -49.15, 8.4, 1.4)
pt3dadd(-83.34, -49.07, 8.15, 1.4)
pt3dadd(-84.45, -49.07, 7.95, 1.4)
pt3dadd(-85.26, -49.44, 7.85, 1.4)
pt3dadd(-85.86, -49.81, 7.8, 1.4)
pt3dadd(-86.67, -50.03, 7.8, 1.4)
pt3dadd(-87.56, -50.25, 7.8, 1.4)
pt3dadd(-88.74, -50.4, 7.5, 1.4)
pt3dadd(-89.62, -50.77, 7.45, 1.4)
pt3dadd(-90.36, -51.21, 7.5, 1.4)
pt3dadd(-91.1, -51.66, 8.3, 1.4)
pt3dadd(-91.84, -52.1, 8.45, 1.4)
pt3dadd(-92.73, -52.25, 8.5, 1.4)
pt3dadd(-93.47, -52.69, 8.55, 1.4)
pt3dadd(-94.21, -53.35, 8.6, 1.4)
pt3dadd(-94.87, -54.24, 6.8, 1.26)
pt3dadd(-95.39, -55.05, 6.7, 1.26)
pt3dadd(-95.24, -55.79, 6.6, 1.26)
pt3dadd(-95.69, -56.45, 5.95, 1.18)
pt3dadd(-96.28, -56.82, 5.9, 1.18)
pt3dadd(-97.16, -56.6, 5.9, 1.18)
pt3dadd(-98.12, -56.52, 5.9, 1.18)
pt3dadd(-99.01, -56.52, 5.85, 1.18)
pt3dadd(-100.12, -56.67, 5.4, 1.18)
pt3dadd(-101.01, -57.26, 5.35, 1.18)
pt3dadd(-101.67, -57.85, 5.3, 1.18)
pt3dadd(-102.34, -58.59, 5, 1.18)
pt3dadd(-103.15, -59.18, 5, 1.18)
pt3dadd(-104.11, -59.69, 4.95, 1.18)
pt3dadd(-104.92, -60.58, 4.1, 1.11)
pt3dadd(-105.66, -61.17, 4.05, 1.26)
pt3dadd(-106.4, -61.76, 4.05, 1.26)
pt3dadd(-106.92, -62.64, 4.05, 1.26)
pt3dadd(-107.58, -63.31, 4, 1.26)
pt3dadd(-108.47, -63.97, 3.95, 1.26)
pt3dadd(-109.36, -64.78, 3.95, 1.26)
pt3dadd(-110.1, -65.3, 3.95, 1.26)
pt3dadd(-110.84, -65.59, 3.9, 1.26)
pt3dadd(-111.58, -66.11, 3.9, 1.26)
pt3dadd(-112.17, -66.77, 4.85, 1.26)
pt3dadd(-113.05, -67, 5.05, 1.26)
pt3dadd(-113.79, -67.44, 5.15, 1.26)
pt3dadd(-114.83, -67.44, 5.2, 1.26)
pt3dadd(-115.79, -67.44, 5.25, 1.26)
pt3dadd(-116.45, -67.51, 5.3, 1.26)
pt3dadd(-117.34, -67.36, 5.3, 1.26)
pt3dadd(-118.01, -67.44, 5.3, 1.26)
pt3dadd(-118.68, -67.67, 6.65, 1.26)
pt3dadd(-119.49, -67.82, 6.75, 1.26)
pt3dadd(-120.23, -68.19, 6.85, 1.26)
pt3dadd(-120.82, -68.63, 6.85, 1.26)
pt3dadd(-121.56, -68.85, 3.15, 1.26)
pt3dadd(-122.45, -68.85, 2.9, 1.26)
pt3dadd(-123.11, -69.07, 2.75, 1.26)
pt3dadd(-123.56, -69.52, 2.55, 1.26)
pt3dadd(-124.3, -69.59, 2.35, 1.26)
pt3dadd(-124.81, -69.37, 1.3, 1.26)
pt3dadd(-125.55, -69.37, 1.1, 1.26)
pt3dadd(-126.29, -69.52, 0.9, 1.26)
pt3dadd(-126.88, -69.15, 0.6, 1.26)
pt3dadd(-127.62, -68.78, 0.45, 1.26)
pt3dadd(-128.36, -68.26, 0.3, 1.26)
pt3dadd(-129.03, -67.53, 0.3, 1.26)
pt3dadd(-129.76, -67.53, 0.25, 1.26)
pt3dadd(-130.21, -68.19, 0.25, 1.26)
pt3dadd(-130.36, -69.07, -1, 1.26)
pt3dadd(-130.73, -69.66, -1.2, 1.26)
pt3dadd(-131.39, -70.4, -1.5, 1.26)
pt3dadd(-131.98, -70.92, -1.6, 1.26)
pt3dadd(-132.65, -70.62, -2.5, 1.03)
pt3dadd(-133.76, -70.4, -2.5, 1.03)
pt3dadd(-134.94, -70.48, -2.55, 1.03)
pt3dadd(-136.05, -70.92, -2.95, 1.03)
pt3dadd(-136.93, -71.36, -3.15, 1.03)
pt3dadd(-137.97, -71.8, -3.2, 1.03)
pt3dadd(-138.78, -72.17, -3.2, 1.03)
pt3dadd(-139.22, -72.98, -3.2, 1.03)
}
dend[30] {pt3dclear()
pt3dadd(-139.22, -72.98, -3.2, 0.74)
pt3dadd(-139.96, -73.06, -3.2, 0.74)
pt3dadd(-140.85, -73.28, -3.15, 0.74)
pt3dadd(-141.37, -74.02, -3.15, 0.74)
pt3dadd(-141.66, -74.61, -3.15, 0.74)
pt3dadd(-141.81, -75.34, -3.15, 0.59)
pt3dadd(-141.96, -76.08, -3.15, 0.59)
pt3dadd(-142.03, -76.6, -3.15, 0.59)
pt3dadd(-142.11, -77.48, -3.15, 0.59)
pt3dadd(-142.77, -77.63, -3.15, 0.59)
pt3dadd(-143.29, -77.7, -3.25, 0.59)
pt3dadd(-144.18, -78, -3.1, 0.59)
pt3dadd(-144.69, -78.44, -3.05, 0.59)
pt3dadd(-145.51, -79.1, -3, 0.59)
pt3dadd(-145.21, -79.4, -2.95, 0.59)
pt3dadd(-144.32, -79.84, -2.95, 0.59)
}
dend[31] {pt3dclear()
pt3dadd(-139.22, -72.98, -3.2, 0.44)
pt3dadd(-139.52, -73.79, -2.75, 0.44)
pt3dadd(-139.74, -74.31, -2.75, 0.44)
pt3dadd(-140.11, -74.53, -2.7, 0.44)
pt3dadd(-140.56, -75.05, -2.7, 0.44)
pt3dadd(-140.78, -75.42, -2.7, 0.44)
pt3dadd(-141.07, -75.93, -2.7, 0.44)
}
dend[32] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(15.29, -19.68, -7.85, 4.06)
pt3dadd(16.99, -19.31, -7.85, 3.4)
pt3dadd(18.24, -18.72, -7.85, 3.4)
pt3dadd(19.06, -18.65, -7.85, 3.4)
pt3dadd(20.39, -18.06, -7.85, 3.4)
pt3dadd(21.42, -17.25, -7.85, 3.4)
pt3dadd(22.75, -16.73, -7, 3.4)
pt3dadd(23.34, -16.14, -6.95, 3.4)
pt3dadd(24.23, -16, -6.95, 3.4)
pt3dadd(25.56, -14.96, -6.95, 3.4)
pt3dadd(26.59, -14.59, -6.95, 3.4)
pt3dadd(27.56, -13.86, -3.55, 3.1)
pt3dadd(28.44, -13.12, -3.5, 3.1)
pt3dadd(29.62, -12.75, -3.5, 3.1)
pt3dadd(31.25, -12.82, -2.6, 2.29)
pt3dadd(32.14, -13.05, -2.7, 2.29)
pt3dadd(33.25, -13.34, -0.15, 2.29)
pt3dadd(34.8, -13.86, 0, 2.29)
}
dend[33] {pt3dclear()
pt3dadd(34.8, -13.86, 0, 1.7)
pt3dadd(35.54, -12.82, 2.5, 1.7)
pt3dadd(36.05, -12.01, 3.1, 1.7)
pt3dadd(35.91, -11.2, 3.15, 1.7)
pt3dadd(35.76, -10.46, 3.2, 1.63)
pt3dadd(35.32, -9.95, 3.25, 1.63)
pt3dadd(34.95, -9.58, 3.25, 1.63)
pt3dadd(33.54, -8.69, 3.3, 1.63)
pt3dadd(34.43, -7.88, 5.5, 1.55)
pt3dadd(35.32, -7.07, 5.55, 1.55)
pt3dadd(36.05, -6.19, 5.55, 1.55)
pt3dadd(36.35, -5.3, 5.6, 1.55)
pt3dadd(36.94, -4.49, 5.6, 1.55)
pt3dadd(37.53, -3.53, 5.6, 1.55)
pt3dadd(38.2, -3.31, 5.6, 1.55)
pt3dadd(39.38, -2.21, 7.15, 1.33)
pt3dadd(39.9, -1.03, 7.2, 1.33)
pt3dadd(39.9, 0.3, 7.25, 1.33)
pt3dadd(40.19, 1.04, 7.25, 1.33)
pt3dadd(40.27, 1.7, 7.25, 1.33)
pt3dadd(40.27, 2.66, 7.5, 1.33)
pt3dadd(40.19, 3.69, 8.25, 1.26)
pt3dadd(39.97, 4.51, 8.3, 1.26)
pt3dadd(39.75, 5.32, 8.35, 1.26)
pt3dadd(39.68, 6.05, 8.35, 1.26)
pt3dadd(39.68, 6.87, 8.35, 1.26)
pt3dadd(40.19, 7.68, 8.35, 1.26)
pt3dadd(40.64, 8.49, 9.25, 1.26)
pt3dadd(41.52, 9.15, 9.3, 1.26)
pt3dadd(41.82, 9.96, 10.75, 1.26)
pt3dadd(41.89, 10.77, 10.85, 1.26)
pt3dadd(42.34, 11, 10.85, 1.26)
pt3dadd(43, 11.66, 10.85, 1.26)
pt3dadd(43.37, 12.47, 12.2, 1.26)
pt3dadd(43.67, 13.06, 12.25, 1.26)
pt3dadd(44.04, 13.72, 12.25, 1.26)
pt3dadd(44.33, 14.61, 12.25, 1.26)
pt3dadd(44.48, 15.13, 12.25, 1.26)
pt3dadd(44.92, 15.79, 12.25, 1.26)
pt3dadd(44.85, 16.6, 13.5, 1.26)
pt3dadd(44.41, 17.19, 13.5, 1.26)
pt3dadd(44.63, 17.85, 13.55, 1.26)
pt3dadd(45.29, 18.37, 13.55, 1.26)
pt3dadd(45.88, 19.03, 14.9, 1.26)
pt3dadd(46.03, 20.29, 14.95, 1.26)
pt3dadd(45.15, 20.88, 14.95, 1.26)
pt3dadd(44.78, 20.66, 16.95, 0.89)
pt3dadd(44.18, 19.99, 16.95, 0.89)
pt3dadd(43.59, 19.92, 16.95, 0.89)
pt3dadd(42.78, 19.55, 16.95, 0.89)
pt3dadd(42.48, 19.62, 18.3, 0.89)
pt3dadd(41.38, 19.26, 18.35, 1.33)
}
dend[34] {pt3dclear()
pt3dadd(34.8, -13.86, 0, 1.92)
pt3dadd(35.91, -14.74, 2.45, 1.92)
pt3dadd(36.35, -15.55, 2.45, 1.92)
pt3dadd(36.79, -15.92, 2.4, 1.7)
pt3dadd(37.46, -16.59, 2.4, 1.7)
}
}
proc shape3d_8() {
dend[34] { pt3dadd(38.35, -17.4, 2.4, 1.7)
pt3dadd(39.6, -17.03, 2.35, 1.7)
pt3dadd(40.49, -16.51, 4.85, 1.7)
pt3dadd(41.52, -16.44, 4.9, 1.7)
pt3dadd(42.48, -17.32, 6.1, 1.7)
pt3dadd(43.37, -18.28, 7, 1.7)
pt3dadd(43.59, -19.17, 7.2, 1.7)
pt3dadd(43.3, -20.27, 7.45, 1.7)
pt3dadd(42.93, -21.23, 7.55, 1.7)
pt3dadd(42.48, -22.26, 7.6, 1.7)
pt3dadd(42.04, -23.44, 8.55, 1.7)
pt3dadd(41.75, -24.33, 8.6, 1.7)
pt3dadd(41.67, -25.58, 8.6, 1.7)
pt3dadd(41.45, -26.62, 9.6, 1.7)
pt3dadd(41.3, -27.21, 9.6, 1.7)
pt3dadd(41.6, -28.61, 10.75, 1.7)
pt3dadd(41.75, -29.49, 10.75, 1.7)
pt3dadd(42.04, -30.23, 10.75, 1.7)
pt3dadd(42.48, -31.11, 10.75, 1.7)
pt3dadd(43.15, -32.37, 12.1, 1.85)
pt3dadd(43.89, -32.88, 12.1, 1.85)
pt3dadd(44.63, -33.18, 12.1, 1.85)
pt3dadd(45.44, -33.18, 12.1, 1.85)
pt3dadd(46.18, -33.25, 12.15, 1.85)
pt3dadd(47.07, -33.25, 12.15, 1.85)
pt3dadd(47.73, -33.4, 12.15, 1.85)
pt3dadd(48.55, -33.47, 12.15, 1.85)
pt3dadd(49.28, -33.4, 12.15, 1.85)
pt3dadd(50.71, -33, 13.05, 1.55)
pt3dadd(51.75, -32.26, 13.75, 1.55)
pt3dadd(52.71, -31.82, 13.65, 1.55)
pt3dadd(53.82, -31.38, 14.7, 1.48)
pt3dadd(54.78, -31.52, 14.7, 1.48)
pt3dadd(56.11, -31.82, 16.5, 1.48)
pt3dadd(57.51, -31.67, 16.6, 1.48)
pt3dadd(58.92, -31.74, 17.45, 1.48)
pt3dadd(59.8, -31.6, 17.5, 1.48)
pt3dadd(61.13, -31.6, 18.15, 1.26)
pt3dadd(62.17, -31.67, 18.2, 1.26)
pt3dadd(63.28, -32.48, 18.2, 1.26)
pt3dadd(63.87, -33.44, 18.25, 1.26)
pt3dadd(64.61, -34.25, 18.25, 1.26)
pt3dadd(65.94, -34.25, 18.6, 1.26)
pt3dadd(67.12, -33.66, 18.65, 1.26)
pt3dadd(68.16, -33.15, 16.15, 1.26)
pt3dadd(69.49, -32.7, 15.95, 1.26)
pt3dadd(70.52, -31.97, 15.5, 1.4)
pt3dadd(71.7, -31.45, 15.4, 1.4)
pt3dadd(72.81, -30.86, 15.3, 1.4)
pt3dadd(73.11, -29.83, 19.7, 1.4)
pt3dadd(74.22, -29.02, 19.7, 1.4)
pt3dadd(75.25, -28.43, 19.7, 1.4)
pt3dadd(75.69, -28.06, 19.7, 1.4)
pt3dadd(76.43, -27.84, 19.7, 1.4)
pt3dadd(77.17, -27.84, 19.7, 1.4)
pt3dadd(77.99, -27.98, 19.7, 1.4)
pt3dadd(78.65, -28.06, 19.7, 1.4)
pt3dadd(79.83, -28.28, 19.7, 1.4)
pt3dadd(80.65, -28.87, 18.6, 1.26)
pt3dadd(81.61, -29.46, 18.5, 1.26)
pt3dadd(82.57, -30.27, 20.3, 1.03)
pt3dadd(83.6, -30.2, 20.35, 1.03)
pt3dadd(84.19, -30.05, 20.4, 1.03)
pt3dadd(85.23, -30.12, 20.45, 1.33)
pt3dadd(85.75, -30.2, 20.5, 1.33)
pt3dadd(86.63, -30.42, 20.5, 1.33)
pt3dadd(87.89, -30.56, 20.55, 1.33)
pt3dadd(88.7, -30.56, 20.6, 1.33)
pt3dadd(89.22, -30.79, 20.6, 1.33)
pt3dadd(90.33, -31.15, 20.6, 1.33)
pt3dadd(91.22, -31.3, 20.65, 1.33)
pt3dadd(91.95, -31.67, 20.65, 1.33)
pt3dadd(92.84, -32.11, 21.4, 1.03)
pt3dadd(93.58, -32.41, 21.45, 1.03)
pt3dadd(94.17, -33.22, 21.45, 1.03)
pt3dadd(94.76, -33.66, 21.85, 0.74)
pt3dadd(95.65, -34.03, 21.85, 0.74)
pt3dadd(96.17, -33.74, 22.2, 0.74)
pt3dadd(96.68, -33, 22.65, 0.74)
pt3dadd(97.05, -32.26, 22.7, 0.74)
}
dend[35] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(15.46, -18.99, -7.5, 3.33)
pt3dadd(16.86, -18.76, -7.25, 3.33)
pt3dadd(18.64, -18.4, -7.15, 3.33)
pt3dadd(20.11, -17.88, -7.15, 3.33)
pt3dadd(21.96, -16.99, -7.1, 3.33)
pt3dadd(23.22, -16.26, -7.1, 3.33)
pt3dadd(24.77, -15.59, -7.1, 3.33)
pt3dadd(25.51, -15, -7.1, 3.33)
pt3dadd(26.91, -14.19, -6.4, 3.33)
pt3dadd(27.65, -13.75, -6.25, 3.33)
pt3dadd(28.54, -13.45, -6.2, 3.33)
pt3dadd(29.5, -13.01, -6.15, 3.33)
pt3dadd(31.05, -12.94, -4.35, 3.33)
pt3dadd(31.57, -13.23, -4.25, 3.33)
pt3dadd(32.24, -14.12, -11.35, 3.33)
pt3dadd(33.2, -15, -11.4, 2.96)
pt3dadd(33.71, -15.67, -11.4, 2.96)
}
dend[36] {pt3dclear()
pt3dadd(33.71, -15.67, -11.4, 2.59)
pt3dadd(34.53, -16.7, -11.4, 2.59)
}
dend[37] {pt3dclear()
pt3dadd(34.53, -16.7, -11.4, 1.18)
pt3dadd(35.64, -16.11, -13.15, 1.18)
pt3dadd(36.82, -16.11, -13.2, 1.18)
pt3dadd(37.48, -16.63, -11.35, 1.18)
pt3dadd(38.22, -16.99, -11.15, 1.18)
pt3dadd(39.04, -17.07, -11.05, 1.18)
pt3dadd(39.85, -16.63, -11, 1.18)
pt3dadd(40.88, -15.96, -10.35, 1.11)
pt3dadd(41.7, -15.3, -10.3, 1.11)
pt3dadd(42.14, -14.34, -10.5, 1.11)
pt3dadd(42.51, -13.38, -10.7, 1.11)
pt3dadd(43.1, -12.57, -10.8, 1.11)
pt3dadd(43.77, -12.05, -10.9, 1.11)
pt3dadd(44.21, -13.09, -14.7, 1.03)
pt3dadd(43.91, -13.9, -14.75, 1.03)
pt3dadd(44.36, -14.12, -14.75, 1.03)
pt3dadd(44.95, -14.63, -14.8, 1.03)
pt3dadd(45.32, -15.81, -15.15, 1.18)
pt3dadd(44.8, -16.77, -15.2, 1.18)
pt3dadd(44.87, -17.51, -15.25, 1.18)
pt3dadd(44.8, -18.47, -17.4, 1.18)
pt3dadd(44.8, -19.43, -17.55, 1.18)
pt3dadd(44.73, -20.09, -17.55, 1.18)
pt3dadd(44.43, -20.76, -17.55, 1.18)
pt3dadd(44.28, -21.57, -17.6, 1.18)
pt3dadd(44.06, -22.3, -17.75, 1.18)
pt3dadd(44.36, -23.34, -17.8, 1.18)
pt3dadd(45.02, -24.22, -20.4, 1.18)
pt3dadd(45.61, -25.03, -20.5, 1.18)
pt3dadd(46.57, -25.92, -20.55, 1.18)
pt3dadd(47.24, -26.51, -21.5, 1.18)
pt3dadd(47.98, -26.66, -21.6, 1.18)
pt3dadd(48.64, -26.43, -21.6, 1.18)
pt3dadd(49.53, -26.36, -21.65, 1.18)
pt3dadd(50.64, -26.8, -23.05, 1.18)
pt3dadd(51.53, -27.1, -23.15, 1.18)
pt3dadd(52.49, -27.25, -23.15, 1.18)
pt3dadd(53.3, -26.95, -24.25, 1.18)
pt3dadd(53.97, -26.43, -24.35, 1.18)
pt3dadd(54.78, -25.99, -24.4, 1.18)
pt3dadd(55.59, -25.25, -25.4, 1.18)
pt3dadd(56.26, -24.89, -25.4, 1.18)
pt3dadd(57.22, -24.74, -25.45, 1.18)
pt3dadd(58.33, -24.89, -26.3, 1.18)
pt3dadd(59.06, -24.96, -26.35, 1.18)
pt3dadd(59.51, -25.48, -26.35, 1.18)
pt3dadd(58.99, -25.99, -27.6, 1.18)
pt3dadd(58.7, -27.02, -27.6, 1.18)
pt3dadd(59.21, -27.76, -32.1, 0.96)
pt3dadd(60.32, -27.25, -32.15, 0.96)
pt3dadd(61.28, -27.02, -32.15, 0.96)
pt3dadd(61.95, -26.66, -32.15, 0.96)
pt3dadd(62.91, -26.88, -33.15, 0.96)
pt3dadd(63.72, -27.17, -33.25, 1.11)
pt3dadd(64.53, -27.54, -34.1, 1.11)
pt3dadd(65.35, -27.91, -34.2, 1.11)
pt3dadd(66.09, -28.43, -34.4, 1.11)
pt3dadd(67.19, -28.79, -35.35, 1.11)
pt3dadd(68.01, -28.94, -35.45, 1.11)
pt3dadd(69.04, -28.72, -35.5, 1.11)
pt3dadd(69.78, -28.72, -35.5, 1.11)
pt3dadd(70.82, -28.43, -35.8, 1.26)
pt3dadd(72.29, -28.72, -34.6, 1.48)
pt3dadd(73.03, -29.16, -34.5, 1.48)
pt3dadd(73.4, -29.38, -34.5, 1.48)
pt3dadd(73.99, -29.68, -34.45, 1.48)
pt3dadd(74.66, -30.05, -34.45, 1.48)
pt3dadd(75.77, -30.79, -34.45, 1.18)
pt3dadd(77.39, -30.93, -34.1, 1.18)
pt3dadd(78.43, -30.86, -33.95, 1.18)
pt3dadd(79.54, -30.64, -33.9, 1.18)
pt3dadd(80.79, -30.56, -33.75, 1.33)
pt3dadd(81.68, -30.56, -33.95, 1.33)
pt3dadd(82.49, -30.64, -34.05, 1.33)
pt3dadd(83.31, -30.56, -34.1, 1.33)
pt3dadd(84.05, -30.2, -34.95, 1.33)
pt3dadd(84.86, -29.83, -35.1, 1.33)
pt3dadd(86.12, -29.83, -35.15, 1.33)
pt3dadd(87.37, -29.75, -36.1, 1.33)
pt3dadd(88.78, -29.68, -36.15, 1.33)
pt3dadd(89.37, -30.05, -36.2, 1.33)
pt3dadd(90.03, -30.27, -36.25, 1.33)
pt3dadd(90.99, -30.64, -36.25, 1.33)
pt3dadd(92.03, -31.01, -36.3, 1.33)
pt3dadd(92.47, -31.67, -36.3, 1.33)
pt3dadd(92.99, -32.04, -36.3, 1.33)
pt3dadd(93.95, -32.11, -36.3, 1.33)
pt3dadd(94.98, -31.89, -37.7, 1.33)
pt3dadd(95.95, -31.67, -37.7, 1.33)
pt3dadd(96.83, -31.67, -37.75, 1.33)
pt3dadd(97.42, -31.82, -37.75, 1.33)
pt3dadd(98.46, -31.97, -37.75, 1.33)
pt3dadd(99.4, -32.57, -39.2, 1.26)
pt3dadd(99.91, -32.71, -39.35, 1.33)
pt3dadd(100.65, -33.23, -39.4, 1.33)
pt3dadd(101.47, -33.45, -39.45, 1.33)
pt3dadd(102.28, -33.6, -39.55, 1.33)
pt3dadd(103.39, -33.75, -40.75, 1.33)
pt3dadd(104.42, -33.67, -40.8, 1.33)
pt3dadd(105.16, -33.75, -42.2, 1.33)
}
}
proc shape3d_9() {
dend[37] { pt3dadd(106.05, -34.04, -42.25, 1.33)
pt3dadd(106.93, -34.48, -42.3, 1.33)
pt3dadd(106.71, -35.22, -43.65, 1.33)
pt3dadd(106.34, -35.66, -43.8, 1.33)
pt3dadd(105.97, -36.55, -43.85, 1.33)
pt3dadd(105.97, -37.36, -43.85, 1.33)
pt3dadd(107.01, -37.95, -45.55, 1.33)
pt3dadd(108.12, -37.88, -45.55, 1.33)
pt3dadd(109.52, -37.88, -49.05, 1.33)
pt3dadd(110.56, -38.02, -49.2, 1.33)
pt3dadd(111.37, -38.32, -49.35, 1.33)
pt3dadd(111.96, -39.13, -50.05, 1.33)
pt3dadd(113, -38.84, -49.9, 1.33)
pt3dadd(114.18, -39.13, -49.9, 1.33)
pt3dadd(114.1, -40.31, -49.85, 1.33)
pt3dadd(113.14, -40.24, -49.85, 1.33)
pt3dadd(112.63, -39.35, -49.85, 1.33)
pt3dadd(113.29, -38.54, -49.85, 1.33)
pt3dadd(114.33, -38.47, -54.2, 1.33)
pt3dadd(115.36, -38.32, -54.25, 1.33)
pt3dadd(116.62, -38.91, -54.3, 1.33)
pt3dadd(117.65, -39.57, -54.8, 1.33)
pt3dadd(118.76, -40.46, -56.35, 1.33)
pt3dadd(119.35, -41.19, -56.6, 1.33)
pt3dadd(119.87, -41.86, -57.6, 1.33)
pt3dadd(121.05, -42.37, -57.7, 1.33)
pt3dadd(122.31, -42.3, -57.85, 1.33)
pt3dadd(122.9, -41.56, -59.25, 1.33)
pt3dadd(123.49, -40.9, -59.3, 1.33)
pt3dadd(123.86, -40.46, -59.45, 1.33)
pt3dadd(124.45, -40.16, -59.55, 1.33)
pt3dadd(125.78, -40.09, -61.15, 1.33)
pt3dadd(126.59, -40.02, -61.4, 1.33)
pt3dadd(127.63, -40.16, -61.6, 1.33)
pt3dadd(128.89, -40.38, -61.8, 1.33)
pt3dadd(129.62, -40.24, -61.95, 1.33)
pt3dadd(130.36, -40.61, -62.2, 1.33)
pt3dadd(131.03, -41.05, -62.3, 1.33)
pt3dadd(131.77, -41.34, -62.5, 1.33)
pt3dadd(132.51, -40.97, -62.65, 1.33)
pt3dadd(133.25, -41.05, -63.4, 1.33)
pt3dadd(134.21, -41.19, -63.45, 1.33)
pt3dadd(135.17, -41.49, -62.25, 1.33)
pt3dadd(135.83, -42.23, -62, 1.18)
pt3dadd(136.35, -42.74, -61.9, 1.18)
pt3dadd(136.87, -43.48, -61.85, 1.18)
pt3dadd(137.02, -44, -61.75, 1.18)
pt3dadd(137.83, -45.03, -60.5, 1.11)
pt3dadd(138.57, -45.69, -60.45, 1.11)
pt3dadd(139.31, -45.99, -60.4, 1.26)
pt3dadd(140.34, -46.5, -60.4, 1.26)
pt3dadd(141.3, -46.87, -60.35, 1.26)
pt3dadd(142.04, -46.65, -60.35, 1.26)
pt3dadd(142.71, -46.73, -60.35, 1.26)
pt3dadd(143.67, -47.61, -59.9, 1.26)
pt3dadd(144.26, -48.35, -59.9, 1.26)
pt3dadd(144.92, -49.01, -59.85, 0.89)
pt3dadd(145.29, -49.68, -59.85, 0.89)
pt3dadd(146.11, -50.12, -61.4, 0.89)
pt3dadd(146.62, -50.93, -61.5, 0.89)
pt3dadd(147.36, -51.45, -61.6, 0.89)
pt3dadd(148, -52.3, -60.2, 0.89)
pt3dadd(148.52, -52.97, -60.05, 0.89)
pt3dadd(149.03, -53.71, -59.95, 0.89)
pt3dadd(149.55, -54.59, -59.9, 0.89)
pt3dadd(150.22, -55.03, -59.85, 0.89)
pt3dadd(150.66, -55.18, -59.8, 0.89)
pt3dadd(150.73, -55.92, -59.8, 0.89)
pt3dadd(150.66, -56.58, -59.8, 0.89)
pt3dadd(151.25, -57.61, -59.8, 0.89)
pt3dadd(152.07, -58.43, -59.35, 0.89)
pt3dadd(152.73, -59.16, -59.3, 0.89)
pt3dadd(153.1, -59.97, -60.15, 0.89)
pt3dadd(152.95, -60.71, -60.4, 0.89)
pt3dadd(153.91, -61.15, -60.5, 0.89)
pt3dadd(155.39, -61.82, -60.6, 0.89)
pt3dadd(156.35, -62.48, -61.55, 0.89)
pt3dadd(156.94, -61.96, -61.75, 0.89)
pt3dadd(157.68, -62.26, -61.85, 0.89)
pt3dadd(158.42, -62.78, -61.95, 0.89)
pt3dadd(159.31, -63.37, -62.15, 0.89)
pt3dadd(160.34, -63.73, -63.7, 0.89)
pt3dadd(161.01, -64.03, -63.7, 0.89)
pt3dadd(161.9, -64.25, -63.75, 0.89)
pt3dadd(163.08, -64.18, -64.65, 0.89)
pt3dadd(163.37, -64.84, -64.8, 0.89)
pt3dadd(164.19, -65.28, -64.85, 0.89)
pt3dadd(164.93, -66.02, -64.85, 0.89)
pt3dadd(165.74, -66.91, -64.85, 0.74)
pt3dadd(166.77, -66.98, -64.85, 0.74)
pt3dadd(167.59, -67.13, -64.85, 0.74)
pt3dadd(168.69, -67.64, -65.7, 0.74)
pt3dadd(169.29, -68.01, -65.7, 0.74)
pt3dadd(169.73, -68.45, -65.75, 0.74)
pt3dadd(170.25, -68.82, -65.75, 0.74)
pt3dadd(170.76, -69.34, -64.8, 0.74)
pt3dadd(170.76, -70.22, -64.7, 0.74)
pt3dadd(171.65, -70.52, -64.6, 0.74)
pt3dadd(172.46, -71.11, -63.75, 0.74)
pt3dadd(173.35, -71.77, -63.8, 0.74)
pt3dadd(173.5, -72.51, -63.9, 0.81)
pt3dadd(174.31, -72.66, -63.9, 0.81)
pt3dadd(175.05, -73.25, -63.9, 0.81)
pt3dadd(175.42, -73.99, -63.85, 0.81)
pt3dadd(175.79, -75.09, -63.85, 0.81)
pt3dadd(176.6, -74.87, -63.85, 0.81)
pt3dadd(177.34, -74.87, -63.85, 0.81)
pt3dadd(178.3, -75.17, -63.85, 0.81)
pt3dadd(178.89, -76.86, -127.7, 0.81)
}
dend[38] {pt3dclear()
pt3dadd(34.53, -16.7, -11.4, 1.55)
pt3dadd(34.13, -17.5, -11, 1.55)
pt3dadd(33.91, -18.46, -11, 1.55)
pt3dadd(34.05, -19.34, -11, 1.55)
pt3dadd(34.2, -20.45, -10.3, 1.55)
pt3dadd(34.05, -21.63, -10.2, 1.55)
pt3dadd(33.98, -22.96, -10.15, 1.55)
pt3dadd(34.72, -24.06, -10.2, 1.55)
pt3dadd(35.53, -24.95, -10.05, 1.55)
pt3dadd(35.75, -25.46, -9.95, 1.55)
pt3dadd(36.27, -26.64, -9.9, 1.55)
pt3dadd(36.64, -27.68, -11.45, 1.55)
pt3dadd(36.94, -28.71, -11.6, 1.55)
pt3dadd(37.9, -29.81, -12.25, 1.55)
pt3dadd(38.7, -31.26, -10.8, 1.63)
}
dend[39] {pt3dclear()
pt3dadd(33.71, -15.67, -11.4, 1.26)
pt3dadd(33.38, -16.36, -15.6, 1.26)
pt3dadd(33.46, -17.17, -15.65, 1.26)
pt3dadd(33.46, -17.99, -15.65, 1.26)
pt3dadd(33.38, -18.72, -15.7, 1.26)
pt3dadd(33.01, -19.68, -14.95, 1.26)
pt3dadd(32.57, -20.57, -14.8, 1.26)
pt3dadd(32.5, -21.82, -14.7, 1.26)
pt3dadd(32.64, -22.71, -14.6, 1.26)
pt3dadd(32.72, -23.44, -14.45, 1.26)
pt3dadd(32.64, -24.33, -14.35, 1.26)
pt3dadd(33.09, -24.77, -14.3, 1.26)
pt3dadd(33.38, -25.58, -14.3, 1.26)
pt3dadd(33.09, -26.61, -14.25, 1.26)
pt3dadd(32.64, -27.43, -14.25, 1.26)
pt3dadd(32.27, -28.02, -15.7, 1.11)
pt3dadd(31.83, -28.61, -15.85, 1.11)
pt3dadd(31.91, -29.71, -16.25, 1.11)
pt3dadd(33.16, -30.01, -18.55, 1.11)
pt3dadd(33.97, -29.56, -18.75, 1.11)
pt3dadd(35.3, -29.2, -19.75, 1.18)
pt3dadd(36.04, -29.12, -19.8, 1.18)
pt3dadd(37.08, -28.97, -22, 1.26)
pt3dadd(38.04, -29.2, -22.05, 1.26)
pt3dadd(38.63, -29.71, -22.1, 1.26)
pt3dadd(39.15, -30.38, -22.25, 1.26)
pt3dadd(39.67, -31.78, -24.95, 1.26)
pt3dadd(39.44, -32.66, -24.95, 1.26)
pt3dadd(39.52, -33.4, -24.95, 1.26)
pt3dadd(40.03, -34.28, -24.95, 1.26)
}
dend[40] {pt3dclear()
pt3dadd(40.03, -34.28, -24.95, 1.03)
pt3dadd(40.03, -34.95, -24.1, 1.03)
pt3dadd(39.81, -35.69, -24.1, 1.03)
pt3dadd(40.18, -36.35, -24.1, 1.03)
pt3dadd(40.92, -36.64, -24.1, 1.03)
pt3dadd(41.73, -37.09, -24.1, 1.03)
pt3dadd(42.25, -37.68, -24.1, 1.03)
pt3dadd(42.92, -38.05, -24.1, 1.03)
pt3dadd(43.43, -38.41, -24.1, 1.03)
pt3dadd(43.73, -38.78, -24.1, 1.03)
pt3dadd(44.54, -39.3, -24.1, 1.03)
pt3dadd(45.13, -40.04, -24.1, 1.03)
}
dend[41] {pt3dclear()
pt3dadd(45.13, -40.04, -24.1, 1.11)
pt3dadd(44.54, -40.85, -22.7, 1.11)
pt3dadd(44.32, -41.51, -22.7, 1.11)
pt3dadd(44.1, -42.1, -22.65, 1.11)
pt3dadd(44.77, -42.84, -22.65, 1.11)
pt3dadd(45.28, -43.5, -22.65, 1.11)
pt3dadd(46.02, -44.17, -22.65, 1.11)
pt3dadd(46.69, -45.12, -22.6, 1.11)
pt3dadd(47.13, -45.71, -22.6, 1.11)
pt3dadd(47.5, -46.23, -22.6, 1.11)
pt3dadd(47.87, -46.97, -22.6, 1.11)
pt3dadd(47.94, -47.93, -22.6, 1.26)
pt3dadd(48.02, -48.96, -22.6, 1.26)
pt3dadd(48.31, -49.77, -22.6, 1.26)
pt3dadd(48.46, -50.66, -22.6, 1.26)
pt3dadd(48.68, -51.39, -22.6, 1.26)
pt3dadd(48.61, -52.5, -23.7, 1.4)
pt3dadd(48.39, -53.24, -23.7, 1.4)
pt3dadd(48.39, -53.83, -23.75, 1.4)
pt3dadd(48.9, -54.79, -23.75, 1.4)
pt3dadd(48.98, -55.97, -23.8, 1.4)
pt3dadd(48.76, -57, -23.8, 1.4)
pt3dadd(49.57, -57.66, -23.8, 1.4)
pt3dadd(50.23, -58.03, -23.8, 1.4)
pt3dadd(50.97, -58.99, -25.6, 1.55)
pt3dadd(51.56, -59.51, -25.7, 1.7)
pt3dadd(51.86, -60.17, -25.7, 1.7)
pt3dadd(52.23, -61.05, -25.7, 1.7)
pt3dadd(52.6, -62.01, -25.75, 1.7)
pt3dadd(52.82, -62.97, -26.25, 1.7)
pt3dadd(52.82, -63.93, -26.3, 1.7)
pt3dadd(52.82, -64.74, -26.3, 1.7)
pt3dadd(52.67, -65.48, -26.35, 1.7)
pt3dadd(53.04, -66.14, -26.35, 1.7)
}
}
proc shape3d_10() {
dend[41] { pt3dadd(53.19, -66.59, -26.35, 1.7)
pt3dadd(52.97, -67.69, -24.8, 1.7)
pt3dadd(53.26, -68.8, -24.6, 1.7)
pt3dadd(53.56, -69.53, -24.5, 1.7)
pt3dadd(54.15, -70.27, -24.1, 1.7)
pt3dadd(54.89, -71.16, -24, 1.7)
pt3dadd(55.11, -72.04, -23.9, 1.7)
pt3dadd(55.26, -72.7, -24.9, 1.7)
pt3dadd(55.26, -73.44, -25.15, 1.7)
pt3dadd(55.11, -74.4, -25.25, 1.7)
pt3dadd(55.11, -75.28, -25.35, 1.7)
pt3dadd(55.48, -76.17, -25.4, 1.7)
pt3dadd(55.85, -76.83, -25.45, 1.7)
pt3dadd(56.29, -77.64, -25.5, 1.7)
pt3dadd(56.81, -78.01, -25.5, 1.7)
}
dend[42] {pt3dclear()
pt3dadd(56.81, -78.01, -25.5, 0.96)
pt3dadd(56.88, -79.12, -27.65, 0.96)
pt3dadd(57.03, -80.08, -27.7, 1.11)
pt3dadd(57.77, -80.37, -27.7, 1.11)
pt3dadd(58.88, -80.52, -27.7, 1.11)
pt3dadd(59.47, -80.74, -28.3, 1.11)
pt3dadd(60.5, -81.41, -28.35, 1.11)
pt3dadd(61.24, -82.14, -28.45, 1.11)
pt3dadd(61.91, -82.95, -28.6, 1.11)
pt3dadd(62.57, -83.84, -29.15, 1.11)
pt3dadd(62.94, -84.95, -29.2, 1.11)
pt3dadd(63.09, -85.76, -29.2, 1.11)
pt3dadd(62.94, -86.35, -29.2, 1.11)
pt3dadd(62.65, -87.01, -29.2, 1.11)
pt3dadd(62.87, -87.82, -29.2, 1.11)
pt3dadd(63.02, -88.41, -29.2, 1.11)
pt3dadd(63.31, -88.71, -29.25, 1.11)
pt3dadd(63.76, -89.37, -29.25, 1.11)
pt3dadd(64.57, -90.18, -29.25, 1.11)
pt3dadd(64.57, -90.62, -29.25, 1.11)
pt3dadd(64.79, -91.73, -29.3, 1.11)
pt3dadd(65.09, -92.54, -30.65, 1.11)
pt3dadd(65.38, -93.13, -30.85, 1.11)
pt3dadd(65.97, -93.72, -30.85, 1.11)
pt3dadd(66.12, -94.46, -30.85, 1.11)
pt3dadd(66.64, -95.2, -30.9, 1.11)
pt3dadd(66.27, -95.93, -30.9, 1.11)
pt3dadd(66.2, -96.45, -30.95, 1.11)
pt3dadd(66.71, -97.34, -31, 1.11)
pt3dadd(66.96, -98.39, -29.8, 1.11)
pt3dadd(67.55, -99.05, -29.8, 1.11)
pt3dadd(68.07, -99.64, -29.8, 1.11)
pt3dadd(68.81, -100.6, -29.8, 1.11)
pt3dadd(68.73, -101.48, -29.8, 1.11)
pt3dadd(69.18, -102.59, -30.45, 1.11)
pt3dadd(69.33, -103.25, -30.7, 1.11)
pt3dadd(69.62, -103.84, -30.75, 1.11)
pt3dadd(69.77, -104.66, -30.8, 1.11)
pt3dadd(70.14, -105.61, -30.9, 1.11)
pt3dadd(70.36, -106.43, -31.2, 1.11)
pt3dadd(70.66, -107.24, -31.5, 1.11)
pt3dadd(70.95, -107.68, -31.7, 1.11)
pt3dadd(71.32, -108.49, -32.05, 1.11)
pt3dadd(71.62, -109.52, -32.35, 1.11)
pt3dadd(71.99, -110.19, -32.45, 1.11)
pt3dadd(72.36, -110.92, -32.55, 1.11)
pt3dadd(73.02, -111.73, -32.7, 1.11)
pt3dadd(73.32, -112.25, -32.95, 1.11)
pt3dadd(74.2, -112.55, -33.1, 1.11)
pt3dadd(74.94, -112.84, -33.25, 1.11)
pt3dadd(75.53, -113.28, -33.45, 1.11)
pt3dadd(76.35, -113.58, -34.05, 1.11)
pt3dadd(77.16, -114.02, -34.3, 1.11)
pt3dadd(77.68, -114.46, -34.45, 1.11)
pt3dadd(78.42, -114.91, -34.45, 1.11)
pt3dadd(78.34, -115.5, -38.85, 1.03)
pt3dadd(78.12, -116.01, -39.05, 1.03)
pt3dadd(77.83, -116.53, -39.2, 1.03)
pt3dadd(77.68, -117.41, -39.35, 1.03)
pt3dadd(78.05, -118.15, -39.45, 1.03)
pt3dadd(78.42, -118.81, -39.7, 1.03)
pt3dadd(79.08, -119.63, -41.3, 0.96)
pt3dadd(80.19, -120.29, -41.25, 0.96)
pt3dadd(80.93, -120.95, -41.2, 0.96)
pt3dadd(80.78, -121.4, -42.65, 0.96)
pt3dadd(80.78, -122.35, -43.2, 0.96)
pt3dadd(80.34, -122.87, -43.45, 0.96)
pt3dadd(79.75, -123.31, -43.75, 0.96)
pt3dadd(78.79, -123.98, -44.2, 0.96)
}
dend[43] {pt3dclear()
pt3dadd(56.81, -78.01, -25.5, 0.89)
pt3dadd(57.87, -77.81, -30.15, 0.89)
pt3dadd(58.91, -77.37, -29.25, 0.89)
pt3dadd(59.79, -77.22, -28.35, 0.89)
pt3dadd(60.61, -77.15, -27.7, 0.89)
pt3dadd(61.27, -77.52, -30.15, 0.89)
pt3dadd(61.71, -77.81, -30.35, 0.89)
pt3dadd(61.71, -78.47, -30.5, 0.89)
pt3dadd(62.01, -79.06, -30.95, 0.89)
pt3dadd(62.6, -79.51, -31.05, 0.89)
pt3dadd(63.49, -79.88, -31.95, 0.96)
pt3dadd(63.78, -79.29, -32.25, 0.96)
pt3dadd(64.6, -78.84, -33.45, 0.96)
pt3dadd(65.26, -78.33, -33.5, 0.81)
pt3dadd(66, -78.18, -33.55, 0.81)
pt3dadd(66.74, -78.4, -33.55, 0.81)
pt3dadd(67.11, -78.55, -33.55, 0.81)
pt3dadd(67.48, -78.77, -33.55, 0.81)
pt3dadd(68.22, -79.21, -33.45, 1.26)
pt3dadd(68.44, -79.8, -33.3, 1.26)
pt3dadd(69.33, -80.32, -33.2, 1.26)
pt3dadd(70.07, -80.76, -33.15, 1.26)
pt3dadd(70.51, -81.5, -37.85, 0.81)
pt3dadd(70.66, -82.38, -37.9, 0.81)
pt3dadd(70.14, -83.05, -37.9, 0.81)
pt3dadd(69.84, -83.56, -37.9, 0.81)
pt3dadd(69.84, -84.15, -37.95, 0.81)
pt3dadd(69.47, -85.04, -37.95, 0.81)
pt3dadd(69.4, -85.78, -38.35, 0.81)
pt3dadd(69.55, -86.51, -39.6, 0.81)
pt3dadd(69.47, -87.47, -39.75, 0.81)
pt3dadd(69.47, -88.21, -41.2, 0.81)
pt3dadd(69.33, -89.17, -41.15, 0.81)
pt3dadd(69.1, -89.91, -41.15, 0.81)
pt3dadd(69.4, -91.09, -41.15, 0.81)
pt3dadd(70.51, -91.31, -41.15, 0.81)
pt3dadd(71.4, -92.12, -41.2, 0.81)
pt3dadd(72.21, -93, -44.95, 0.81)
pt3dadd(73.17, -94.04, -42.45, 0.96)
pt3dadd(73.54, -94.99, -42.35, 0.96)
pt3dadd(74.35, -95.88, -44, 0.96)
pt3dadd(75.46, -96.32, -44.2, 0.96)
pt3dadd(76.5, -96.47, -44.3, 0.96)
pt3dadd(77.38, -96.84, -44.4, 0.96)
pt3dadd(77.9, -96.76, -44.4, 0.96)
pt3dadd(78.86, -97.06, -44.45, 0.96)
pt3dadd(79.82, -97.87, -44.45, 0.96)
pt3dadd(80.78, -98.02, -44.45, 0.96)
}
dend[44] {pt3dclear()
pt3dadd(45.13, -40.04, -24.1, 0.81)
pt3dadd(46.35, -40.17, -23.45, 0.81)
pt3dadd(47.38, -40.76, -23.4, 0.81)
pt3dadd(48.64, -41.06, -21.7, 0.81)
pt3dadd(49.6, -41.72, -21.75, 0.81)
pt3dadd(50.04, -42.31, -21.75, 0.81)
pt3dadd(50.78, -42.46, -22.75, 0.81)
pt3dadd(51.67, -43.2, -23.55, 0.81)
pt3dadd(52.04, -43.57, -23.6, 0.81)
pt3dadd(52.78, -44.16, -23.65, 0.81)
pt3dadd(53.52, -44.75, -22.95, 0.74)
pt3dadd(54.63, -45.04, -23.05, 0.74)
pt3dadd(55.73, -45.19, -24.75, 1.03)
pt3dadd(56.77, -45.19, -24.8, 1.03)
pt3dadd(57.8, -45.85, -25.6, 1.03)
pt3dadd(58.84, -46.29, -25.65, 1.03)
pt3dadd(59.87, -46.74, -25.65, 1.03)
pt3dadd(60.83, -47.11, -25.65, 1.03)
pt3dadd(62.02, -47.4, -25.65, 1.03)
pt3dadd(62.76, -47.92, -25.65, 1.03)
pt3dadd(63.35, -48.58, -25.7, 1.03)
pt3dadd(63.27, -49.46, -25.7, 1.03)
pt3dadd(63.05, -50.28, -25.7, 1.03)
pt3dadd(63.42, -51.01, -26.3, 1.03)
pt3dadd(63.94, -51.97, -26.35, 1.03)
pt3dadd(64.53, -52.64, -26.35, 1.03)
pt3dadd(64.46, -53.67, -26.35, 1.03)
pt3dadd(64.68, -54.7, -26.35, 1.03)
pt3dadd(64.53, -55.73, -26.35, 1.03)
pt3dadd(64.38, -56.54, -26.35, 1.03)
pt3dadd(64.53, -57.65, -27, 1.03)
pt3dadd(64.97, -58.76, -27.05, 1.03)
pt3dadd(65.56, -58.83, -27.05, 0.81)
pt3dadd(66.01, -59.57, -27.05, 0.81)
pt3dadd(66.01, -60.6, -27.05, 1.18)
pt3dadd(66, -61.92, -28.4, 1.11)
pt3dadd(66.29, -62.81, -28.45, 1.11)
pt3dadd(66.66, -63.25, -28.45, 1.11)
pt3dadd(67.18, -64.13, -28.45, 1.11)
pt3dadd(67.33, -65.02, -28.45, 1.11)
pt3dadd(67.33, -65.68, -28.45, 1.11)
pt3dadd(67.25, -66.27, -28.45, 1.11)
pt3dadd(67.47, -67.23, -28.45, 1.11)
pt3dadd(67.92, -68.04, -28.45, 1.11)
pt3dadd(68.8, -68.19, -28.45, 1.11)
pt3dadd(69.47, -68.93, -28.45, 1.11)
pt3dadd(70.14, -69.44, -28.45, 1.11)
pt3dadd(70.87, -70.25, -28.45, 1.11)
pt3dadd(71.39, -70.84, -28.45, 1.11)
pt3dadd(71.91, -71.43, -28.45, 1.11)
pt3dadd(72.43, -72.02, -28.45, 1.11)
pt3dadd(72.94, -72.54, -28.45, 1.11)
pt3dadd(73.76, -72.91, -29.5, 0.96)
pt3dadd(74.64, -73.35, -29.55, 0.96)
pt3dadd(75.31, -74.09, -29.6, 0.96)
pt3dadd(75.53, -74.83, -29.6, 0.96)
pt3dadd(75.6, -75.64, -28.25, 1.11)
pt3dadd(75.38, -76.38, -28.2, 1.11)
pt3dadd(75.09, -77.19, -31.5, 1.11)
pt3dadd(74.72, -78, -31.6, 1.11)
pt3dadd(74.57, -78.88, -31.7, 1.11)
pt3dadd(74.57, -79.77, -31.7, 1.11)
pt3dadd(74.05, -80.43, -31.75, 1.11)
pt3dadd(73.24, -80.65, -31.75, 1.11)
pt3dadd(73.02, -81.46, -31.75, 1.11)
pt3dadd(72.94, -82.57, -31.75, 1.11)
pt3dadd(72.94, -83.53, -31.75, 1.11)
pt3dadd(73.17, -84.41, -31.8, 1.11)
}
}
proc shape3d_11() {
dend[44] { pt3dadd(73.09, -85.52, -31.8, 1.11)
pt3dadd(73.09, -86.77, -31.8, 1.11)
pt3dadd(73.09, -87.88, -32.45, 1.11)
pt3dadd(73.39, -88.91, -32.5, 1.11)
pt3dadd(73.54, -90.02, -32.55, 0.96)
pt3dadd(73.68, -90.9, -32.55, 0.96)
pt3dadd(74.35, -91.79, -32.55, 0.96)
pt3dadd(74.57, -92.75, -31.3, 0.96)
pt3dadd(75.68, -93.26, -31.2, 0.96)
pt3dadd(76.12, -93.93, -31.1, 0.96)
pt3dadd(76.71, -94.59, -32.45, 0.96)
pt3dadd(77.01, -95.4, -32.55, 0.96)
pt3dadd(77.23, -96.21, -32.65, 0.96)
pt3dadd(77.23, -97.02, -32.7, 0.96)
pt3dadd(76.71, -97.61, -32.7, 0.96)
pt3dadd(76.34, -98.13, -31.55, 0.96)
pt3dadd(76.12, -98.87, -31.5, 0.96)
pt3dadd(76.05, -99.75, -31.45, 0.96)
pt3dadd(76.12, -100.64, -31.4, 0.96)
pt3dadd(76.27, -101.38, -31.4, 0.96)
pt3dadd(76.42, -102.11, -31.4, 0.96)
pt3dadd(76.42, -103, -31.35, 0.96)
}
dend[45] {pt3dclear()
pt3dadd(40.03, -34.28, -24.95, 0.96)
pt3dadd(40.93, -34.49, -29.3, 0.96)
pt3dadd(42.03, -35.53, -29.3, 0.96)
pt3dadd(43, -36.19, -29.3, 0.96)
pt3dadd(44.03, -36.78, -29.35, 0.96)
pt3dadd(44.62, -37.15, -29.35, 0.96)
pt3dadd(45.8, -37.37, -29.2, 0.96)
pt3dadd(46.4, -37.96, -29.15, 0.96)
pt3dadd(46.99, -38.55, -29.15, 0.96)
pt3dadd(47.43, -38.99, -29.15, 0.96)
pt3dadd(48.17, -39.36, -29.1, 0.96)
pt3dadd(48.91, -39.36, -27.65, 0.96)
pt3dadd(49.87, -39.58, -27.45, 0.96)
pt3dadd(50.46, -39.36, -27.25, 0.96)
pt3dadd(51.42, -39.21, -27.1, 0.96)
pt3dadd(51.94, -39.88, -27.05, 0.96)
pt3dadd(51.64, -40.69, -31, 0.96)
pt3dadd(51.35, -41.72, -31.1, 0.96)
pt3dadd(51.27, -42.31, -31.15, 0.96)
pt3dadd(51.35, -42.61, -31.15, 0.96)
pt3dadd(52.16, -42.97, -34.35, 1.18)
pt3dadd(52.97, -43.12, -34.35, 1.18)
pt3dadd(53.56, -43.12, -34.35, 1.18)
pt3dadd(54.38, -43.12, -34.35, 1.18)
pt3dadd(55.63, -42.83, -35.75, 1.18)
pt3dadd(56.45, -42.38, -35.6, 1.18)
pt3dadd(57.26, -42.38, -35.5, 1.18)
pt3dadd(58.07, -42.46, -35.4, 1.18)
pt3dadd(58.74, -42.75, -35.35, 1.18)
pt3dadd(59.18, -42.97, -35.3, 1.18)
pt3dadd(59.03, -44.15, -40.6, 1.18)
pt3dadd(58.52, -44.67, -40.75, 1.18)
pt3dadd(58, -45.33, -40.8, 1.18)
pt3dadd(57.85, -46, -40.8, 1.18)
pt3dadd(57.93, -46.66, -40.8, 1.33)
pt3dadd(58.22, -47.33, -40.8, 1.33)
pt3dadd(58.22, -47.92, -40.8, 1.33)
pt3dadd(57.56, -48.43, -40.8, 1.33)
pt3dadd(57.93, -49.39, -42, 1.33)
pt3dadd(58, -50.05, -42, 1.33)
pt3dadd(58.44, -50.94, -42.05, 1.33)
pt3dadd(58.59, -51.6, -42.05, 1.33)
pt3dadd(59.18, -52.64, -42.05, 1.33)
pt3dadd(59.55, -53.45, -42.05, 1.33)
pt3dadd(59.85, -54.18, -42.05, 1.33)
}
dend[46] {pt3dclear()
pt3dadd(59.85, -54.18, -42.05, 1.33)
pt3dadd(59.33, -54.77, -42.05, 1.33)
pt3dadd(58.89, -55.73, -42.05, 1.33)
pt3dadd(59.11, -56.77, -42.05, 1.33)
pt3dadd(59.55, -57.5, -42.05, 1.33)
pt3dadd(60.07, -58.24, -42.05, 1.33)
pt3dadd(60.73, -59.27, -40.65, 1.26)
pt3dadd(61.25, -60.08, -40.55, 1.26)
pt3dadd(61.77, -60.75, -40.55, 1.26)
pt3dadd(62.29, -61.63, -40.5, 1.26)
pt3dadd(62.29, -62.3, -40.5, 1.26)
pt3dadd(62.58, -63.26, -40.5, 1.26)
pt3dadd(62.73, -63.92, -40.5, 1.26)
pt3dadd(62.88, -64.51, -40.45, 1.11)
pt3dadd(62.95, -65.47, -40.45, 1.11)
pt3dadd(62.29, -65.98, -40.45, 1.11)
pt3dadd(62.51, -66.94, -40.45, 1.11)
pt3dadd(62.36, -67.83, -40.45, 1.11)
pt3dadd(62.7, -68.65, -40.55, 1.11)
pt3dadd(62.85, -69.24, -40.7, 1.11)
pt3dadd(63.52, -69.76, -40.75, 1.11)
pt3dadd(63.59, -70.42, -40.8, 1.11)
pt3dadd(63.52, -71.23, -40.8, 1.11)
pt3dadd(62.93, -71.6, -40.85, 1.11)
pt3dadd(62.41, -72.27, -40.9, 1.11)
pt3dadd(62.11, -72.78, -40.95, 1.11)
pt3dadd(62.19, -73.74, -39.9, 1.11)
pt3dadd(62.11, -74.41, -39.75, 1.11)
pt3dadd(62.11, -74.99, -39.65, 1.11)
pt3dadd(62.19, -76.25, -39.6, 1.11)
}
dend[47] {pt3dclear()
pt3dadd(59.85, -54.18, -42.05, 1.18)
pt3dadd(60.49, -55.01, -38.1, 1.18)
pt3dadd(61.08, -55.82, -38.1, 1.18)
pt3dadd(61.45, -56.34, -38.05, 1.18)
pt3dadd(61.97, -56.63, -38.05, 1.18)
pt3dadd(62.56, -56.34, -38.05, 1.18)
pt3dadd(63.3, -56.48, -38.05, 1.18)
pt3dadd(62.85, -57.22, -38.05, 1.18)
pt3dadd(62.11, -57.89, -38.05, 1.18)
pt3dadd(62.78, -58.77, -38.05, 1.18)
pt3dadd(63.74, -58.33, -39.75, 1.03)
pt3dadd(64.55, -58.25, -39.85, 1.03)
pt3dadd(65.37, -58.62, -39.9, 1.03)
pt3dadd(66.33, -59.21, -38.3, 1.03)
pt3dadd(66.99, -59.73, -38.2, 1.03)
pt3dadd(67.73, -60.02, -38.15, 1.03)
pt3dadd(68.62, -60.02, -38.1, 1.03)
pt3dadd(69.58, -59.88, -38.05, 1.03)
pt3dadd(71.06, -59.95, -41.2, 1.03)
pt3dadd(71.94, -60.61, -41.35, 1.03)
pt3dadd(72.46, -61.06, -41.4, 1.03)
pt3dadd(73.05, -61.57, -41.4, 1.03)
pt3dadd(73.64, -61.94, -41.45, 1.03)
pt3dadd(74.68, -62.31, -40.25, 1.03)
pt3dadd(75.49, -62.31, -40.2, 1.03)
pt3dadd(76.38, -62.16, -40.15, 1.03)
pt3dadd(77.04, -62.38, -40.15, 1.03)
pt3dadd(77.71, -62.83, -40.1, 1.03)
pt3dadd(78.37, -63.79, -40.1, 1.03)
}
dend[48] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(11.86, -24.39, -23.15, 2.44)
pt3dadd(12.97, -24.39, -23.15, 2.44)
pt3dadd(13.79, -24.39, -23.15, 2.44)
pt3dadd(14.53, -24.39, -23.15, 2.44)
pt3dadd(15.49, -24.47, -23.15, 2.44)
pt3dadd(16.15, -24.32, -23.15, 2.44)
pt3dadd(17.26, -24.39, -23.1, 1.92)
pt3dadd(18, -24.54, -23.1, 1.7)
pt3dadd(18.89, -24.69, -23.1, 1.7)
pt3dadd(19.7, -25.06, -23.1, 1.4)
pt3dadd(20.14, -25.5, -23.1, 1.4)
pt3dadd(20.66, -25.79, -23.1, 1.4)
pt3dadd(21.4, -26.46, -23.1, 1.4)
pt3dadd(22.06, -27.42, -23.4, 1.33)
pt3dadd(22.66, -28.3, -23.25, 1.33)
pt3dadd(23.25, -28.89, -23.2, 1.33)
pt3dadd(24.21, -30, -25, 1.63)
pt3dadd(25.17, -31.21, -26.85, 2.14)
pt3dadd(26.5, -32.32, -26.85, 2.14)
pt3dadd(27.24, -33.06, -26.85, 2.14)
pt3dadd(28.05, -33.94, -26.85, 2.14)
}
dend[49] {pt3dclear()
pt3dadd(28.05, -33.94, -26.85, 1.63)
pt3dadd(28.49, -35.34, -26.85, 1.63)
pt3dadd(29.38, -36.3, -26.85, 1.63)
pt3dadd(29.9, -36.96, -26.85, 1.63)
pt3dadd(30.78, -37.85, -26.85, 1.63)
pt3dadd(31.08, -39.1, -27.2, 1.55)
pt3dadd(31.3, -39.84, -27.35, 1.77)
pt3dadd(31.23, -40.65, -27.4, 1.77)
pt3dadd(31.15, -41.68, -27.45, 2)
pt3dadd(31.3, -42.49, -27.45, 2)
pt3dadd(31.15, -43.53, -27.45, 2)
pt3dadd(31.52, -44.56, -29.85, 1.48)
pt3dadd(32.33, -45.52, -29.95, 1.48)
pt3dadd(32.93, -46.33, -30, 1.48)
pt3dadd(33.59, -47.14, -30, 1.48)
pt3dadd(33.81, -48.54, -30.05, 1.48)
pt3dadd(35.44, -48.54, -30.05, 1.48)
pt3dadd(36.55, -49.13, -30.05, 1.48)
pt3dadd(37.58, -49.8, -31.2, 1.7)
pt3dadd(38.17, -50.53, -31.2, 1.7)
pt3dadd(38.84, -51.79, -33.2, 1.92)
}
dend[50] {pt3dclear()
pt3dadd(38.84, -51.79, -33.2, 1.33)
pt3dadd(39.95, -52.01, -33.95, 1.33)
pt3dadd(40.46, -52.97, -34, 1.33)
pt3dadd(41.43, -53.78, -34, 1.33)
pt3dadd(42.31, -54.29, -34.05, 1.33)
pt3dadd(43.42, -54.66, -35.85, 1.18)
pt3dadd(44.6, -55.7, -35.55, 1.18)
pt3dadd(44.9, -56.95, -35.45, 1.18)
pt3dadd(45.12, -58.28, -35.4, 1.18)
pt3dadd(45.64, -59.6, -36.6, 1.18)
pt3dadd(46.38, -60.78, -36.7, 1.18)
pt3dadd(47.41, -61.45, -36.7, 1.18)
pt3dadd(48.59, -61.82, -38, 0.96)
pt3dadd(49.11, -62.48, -38, 0.96)
pt3dadd(49.78, -62.78, -38, 0.96)
pt3dadd(50.74, -62.92, -38, 0.96)
pt3dadd(51.33, -63.51, -38.05, 0.96)
pt3dadd(51.77, -64.55, -38.05, 0.96)
pt3dadd(52.59, -64.18, -38.05, 0.96)
pt3dadd(53.47, -64.91, -38.7, 0.96)
pt3dadd(53.99, -65.73, -38.9, 0.96)
pt3dadd(54.51, -66.24, -39.2, 0.96)
pt3dadd(55.32, -67.13, -39.35, 0.96)
pt3dadd(55.91, -67.86, -39.4, 0.96)
pt3dadd(56.28, -69.27, -40.6, 1.33)
pt3dadd(56.01, -70.23, -41.35, 1.33)
pt3dadd(55.42, -71.04, -41.4, 1.33)
pt3dadd(54.9, -71.41, -43.6, 0.81)
pt3dadd(54.9, -72.22, -43.6, 0.81)
pt3dadd(55.2, -72.96, -43.6, 0.81)
pt3dadd(55.57, -73.62, -43.6, 0.81)
}
}
proc shape3d_12() {
dend[50] { pt3dadd(55.64, -74.36, -43.6, 0.81)
pt3dadd(56.01, -75.09, -43.6, 0.81)
pt3dadd(56.53, -75.83, -43.6, 0.81)
pt3dadd(56.82, -76.86, -43.6, 0.81)
pt3dadd(57.19, -77.67, -43.6, 0.81)
pt3dadd(57.86, -78.63, -43.6, 0.81)
pt3dadd(58.45, -79.15, -43.6, 0.81)
pt3dadd(59.48, -79.81, -43.6, 0.81)
pt3dadd(60, -80.48, -43.6, 0.81)
}
dend[51] {pt3dclear()
pt3dadd(60, -80.48, -43.6, 0.81)
pt3dadd(61.11, -81.07, -45.3, 0.81)
pt3dadd(62, -81.51, -45.3, 0.81)
pt3dadd(62.66, -81.95, -45.3, 0.81)
pt3dadd(63.62, -82.32, -45.3, 0.81)
pt3dadd(64.21, -82.84, -43.95, 0.81)
pt3dadd(64.88, -83.43, -43.85, 0.81)
pt3dadd(65.76, -83.94, -43.8, 0.81)
pt3dadd(66.5, -85.12, -43.75, 0.81)
}
dend[52] {pt3dclear()
pt3dadd(60, -80.48, -43.6, 0.81)
pt3dadd(61.03, -80.55, -46.9, 0.81)
pt3dadd(61.92, -80.77, -47, 0.96)
pt3dadd(62.88, -80.7, -47, 0.96)
pt3dadd(63.33, -80.18, -47.05, 0.96)
pt3dadd(64.29, -80.11, -45.75, 0.96)
pt3dadd(65.17, -80.18, -45.45, 1.18)
pt3dadd(65.84, -80.7, -45.4, 1.18)
pt3dadd(66.43, -81.36, -45.35, 1.18)
pt3dadd(67.17, -82.1, -45.3, 1.18)
pt3dadd(66.87, -82.62, -45.25, 1.18)
pt3dadd(66.21, -83.43, -45.25, 1.18)
pt3dadd(66.8, -84.16, -45.25, 1.18)
}
dend[53] {pt3dclear()
pt3dadd(66.8, -84.16, -45.25, 0.96)
pt3dadd(67.17, -84.75, -50.85, 0.96)
pt3dadd(66.87, -85.49, -50.9, 0.96)
pt3dadd(66.5, -85.93, -50.9, 0.96)
pt3dadd(66.73, -86.52, -50.85, 0.81)
pt3dadd(67.39, -87.48, -50.7, 0.81)
pt3dadd(67.46, -88.52, -50.65, 0.81)
pt3dadd(68.13, -89.7, -50.55, 0.81)
}
dend[54] {pt3dclear()
pt3dadd(66.8, -84.16, -45.25, 0.81)
pt3dadd(67.69, -84.83, -45.65, 0.81)
pt3dadd(67.76, -85.71, -45.65, 0.81)
pt3dadd(67.83, -86.45, -45.65, 0.81)
pt3dadd(68.72, -86.52, -45.65, 0.81)
pt3dadd(69.61, -86.89, -45.65, 0.81)
pt3dadd(70.5, -87.85, -46.1, 0.89)
pt3dadd(71.46, -87.78, -46.15, 0.89)
pt3dadd(71.97, -86.97, -46.75, 0.89)
pt3dadd(72.93, -86.82, -46.8, 0.89)
pt3dadd(73.45, -87.56, -49.9, 0.89)
pt3dadd(74.26, -88.44, -49.95, 0.89)
pt3dadd(75.23, -88.52, -49.95, 0.89)
pt3dadd(76.11, -88.59, -49.95, 0.89)
pt3dadd(77, -88.96, -49.95, 0.89)
}
dend[55] {pt3dclear()
pt3dadd(38.84, -51.79, -33.2, 0.89)
pt3dadd(38.57, -52.67, -35.2, 0.89)
pt3dadd(38.34, -53.26, -35.05, 0.89)
pt3dadd(38.27, -54.08, -34.95, 0.89)
pt3dadd(38.2, -54.96, -34.85, 0.89)
pt3dadd(38.49, -55.77, -35.5, 0.89)
pt3dadd(38.79, -56.66, -35.65, 0.89)
pt3dadd(39.31, -57.32, -35.7, 0.89)
pt3dadd(39.97, -57.84, -35.75, 0.89)
pt3dadd(40.64, -58.35, -35.75, 0.89)
pt3dadd(41.45, -58.5, -35.75, 0.89)
pt3dadd(42.26, -58.06, -35.8, 0.89)
pt3dadd(42.56, -57.32, -35.8, 0.89)
pt3dadd(42.71, -56.44, -35.8, 0.89)
}
dend[56] {pt3dclear()
pt3dadd(28.05, -33.94, -26.85, 1.03)
pt3dadd(28.92, -33.77, -25.2, 1.03)
pt3dadd(29.58, -34.29, -25.05, 1.03)
pt3dadd(30.47, -34.95, -25, 1.03)
pt3dadd(31.06, -35.47, -24.95, 1.03)
pt3dadd(32.02, -36.13, -24.7, 1.03)
pt3dadd(32.91, -36.65, -24.65, 1.03)
pt3dadd(33.35, -37.09, -24.6, 1.03)
pt3dadd(34.39, -36.87, -24.6, 1.03)
pt3dadd(34.98, -36.87, -24.55, 1.03)
pt3dadd(35.27, -37.83, -24.2, 0.81)
pt3dadd(35.5, -38.64, -24.2, 0.81)
pt3dadd(36.38, -38.49, -23.85, 1.18)
pt3dadd(37.49, -38.35, -23.8, 1.18)
pt3dadd(38.23, -39.01, -23.8, 1.18)
pt3dadd(38.9, -39.89, -25.2, 1.18)
pt3dadd(39.78, -39.89, -25.45, 1.18)
pt3dadd(41.11, -39.97, -25.55, 1.18)
pt3dadd(41.93, -40.34, -25.65, 1.18)
pt3dadd(42.81, -40.93, -25.7, 1.26)
pt3dadd(43.99, -41.44, -25.9, 1.26)
pt3dadd(45.03, -40.93, -26, 1.26)
pt3dadd(46.06, -40.93, -26, 1.26)
pt3dadd(47.03, -41.29, -26.05, 1.26)
pt3dadd(47.91, -41.59, -26.05, 1.26)
pt3dadd(48.95, -42.33, -26.1, 1.26)
pt3dadd(49.61, -43.29, -26.1, 1.26)
pt3dadd(50.35, -44.24, -26.1, 1.26)
pt3dadd(51.02, -44.98, -26.1, 1.26)
pt3dadd(51.83, -45.72, -26.1, 1.26)
pt3dadd(52.49, -46.24, -26.1, 1.26)
pt3dadd(53.31, -46.83, -26.1, 1.26)
pt3dadd(54.49, -47.27, -28.15, 1.26)
pt3dadd(55.16, -47.86, -28.25, 1.26)
pt3dadd(55.97, -48.37, -28.25, 1.26)
pt3dadd(56.71, -48.82, -28.3, 1.26)
pt3dadd(57.37, -49.33, -26.8, 1.26)
pt3dadd(58.19, -50.07, -26.6, 1.26)
pt3dadd(58.78, -50.73, -26.5, 1.26)
pt3dadd(59.37, -51.55, -26.45, 1.26)
pt3dadd(59.81, -52.5, -26.4, 1.26)
pt3dadd(60.7, -53.17, -26.4, 1.26)
pt3dadd(61.22, -53.54, -26.35, 1.55)
pt3dadd(61.66, -54.2, -26.35, 1.63)
pt3dadd(62.55, -54.57, -26.3, 1.63)
pt3dadd(63.51, -55.09, -26.3, 1.63)
pt3dadd(64.32, -55.75, -26.3, 1.63)
pt3dadd(64.91, -56.04, -27.75, 1.03)
pt3dadd(65.87, -56.71, -27.9, 1.03)
pt3dadd(66.69, -57.22, -27.95, 1.03)
pt3dadd(67.57, -58.04, -28, 1.03)
pt3dadd(68.24, -58.77, -28, 1.03)
pt3dadd(68.9, -59.58, -27.55, 1.03)
pt3dadd(69.64, -60.54, -27.35, 1.03)
pt3dadd(70.6, -60.91, -27.25, 1.18)
pt3dadd(71.86, -61.5, -27.2, 1.18)
pt3dadd(72.67, -62.31, -27.2, 1.18)
pt3dadd(73.12, -62.53, -27.15, 1.18)
pt3dadd(73.93, -62.9, -27.15, 1.18)
pt3dadd(75.18, -63.05, -27.15, 1.18)
pt3dadd(75.33, -63.86, -29.8, 0.96)
pt3dadd(75.48, -64.89, -29.9, 0.96)
pt3dadd(76.07, -66.15, -30, 0.96)
pt3dadd(76.81, -66.96, -30, 0.96)
pt3dadd(77.32, -67.61, -30.1, 0.96)
pt3dadd(78.13, -68.05, -30.1, 0.96)
pt3dadd(79.1, -67.9, -30.1, 0.96)
pt3dadd(80.13, -67.75, -31.75, 0.96)
pt3dadd(81.39, -67.53, -30.7, 1.18)
pt3dadd(82.42, -67.53, -30.65, 1.18)
pt3dadd(83.31, -67.61, -30.65, 1.18)
pt3dadd(84.34, -67.97, -30.55, 1.18)
pt3dadd(85.23, -68.49, -30.5, 1.18)
pt3dadd(85.97, -69.01, -31.6, 1.03)
pt3dadd(86.93, -69.6, -31.65, 1.03)
pt3dadd(87.96, -69.74, -31.7, 1.03)
pt3dadd(88.56, -71, -31.7, 1.03)
pt3dadd(89.44, -72.18, -33.15, 1.03)
pt3dadd(90.7, -72.69, -32.75, 1.26)
pt3dadd(91.73, -73.14, -32.9, 1.26)
pt3dadd(92.69, -72.92, -32.95, 1.26)
pt3dadd(93.88, -73.36, -33, 1.26)
pt3dadd(94.69, -73.51, -33, 1.26)
pt3dadd(95.73, -73.87, -31.2, 1.26)
pt3dadd(96.39, -74.83, -31.15, 1.26)
pt3dadd(96.83, -75.5, -31.1, 1.26)
pt3dadd(97.72, -75.86, -31.05, 1.26)
pt3dadd(98.53, -76.31, -31.05, 1.26)
pt3dadd(99.49, -76.9, -31, 1.26)
pt3dadd(100.16, -77.56, -31, 1.26)
pt3dadd(101.56, -77.93, -31, 1.26)
pt3dadd(102.6, -78.22, -31, 1.26)
pt3dadd(103.49, -78.45, -31, 1.26)
pt3dadd(104.45, -78.74, -31, 1.26)
pt3dadd(105.26, -79.4, -30.95, 1.26)
pt3dadd(106.37, -80.29, -30.95, 1.26)
pt3dadd(107.11, -81.17, -30.95, 1.26)
pt3dadd(107.26, -82.21, -30.95, 1.26)
pt3dadd(107.92, -82.87, -30.95, 1.26)
pt3dadd(108.81, -83.31, -30.95, 1.26)
pt3dadd(109.92, -83.76, -29.5, 1.26)
pt3dadd(110.65, -84.86, -29.5, 1.26)
pt3dadd(111.17, -85.75, -29.45, 1.26)
pt3dadd(111.62, -86.56, -29.45, 1.26)
pt3dadd(112.35, -87.52, -29.45, 1.26)
pt3dadd(112.87, -88.11, -29.45, 1.26)
pt3dadd(113.69, -88.7, -29.45, 1.26)
pt3dadd(114.57, -88.92, -29.45, 1.26)
pt3dadd(115.61, -88.92, -29.45, 1.26)
pt3dadd(116.49, -89.29, -29.45, 1.26)
pt3dadd(117.45, -89.73, -28.5, 1.26)
pt3dadd(118.42, -90.25, -28.65, 1.26)
pt3dadd(119.38, -90.76, -28.7, 1.26)
pt3dadd(119.82, -91.5, -28.75, 1.26)
pt3dadd(120.12, -92.53, -28.75, 1.26)
pt3dadd(120.78, -93.27, -28.8, 1.26)
pt3dadd(121.82, -93.86, -28.85, 1.11)
pt3dadd(122.85, -94.67, -28.85, 1.11)
pt3dadd(123.66, -95.04, -28.85, 1.11)
pt3dadd(124.7, -96, -28.9, 1.63)
pt3dadd(125.44, -96.81, -28.9, 1.63)
pt3dadd(126.03, -97.77, -28.9, 1.63)
pt3dadd(126.45, -98.78, -28.9, 1.4)
pt3dadd(126.67, -99.81, -28.9, 1.4)
pt3dadd(126.45, -100.99, -28.9, 1.4)
pt3dadd(126.97, -101.95, -28.9, 1.4)
pt3dadd(127.33, -102.61, -28.9, 1.4)
pt3dadd(127.93, -103.35, -28.9, 1.4)
pt3dadd(128.52, -103.87, -28.9, 1.4)
pt3dadd(129.26, -104.68, -28.9, 1.4)
pt3dadd(130.14, -105.12, -28.9, 1.4)
pt3dadd(131.03, -105.56, -28.9, 1.4)
}
}
proc shape3d_13() {
dend[56] { pt3dadd(131.92, -105.78, -28.9, 1.4)
pt3dadd(133.17, -106.23, -28.9, 1.4)
pt3dadd(133.62, -106.89, -28.9, 1.18)
pt3dadd(134.5, -107.55, -28.9, 1.18)
pt3dadd(135.24, -108.59, -29.9, 1.18)
pt3dadd(136.06, -109.84, -30.1, 1.18)
pt3dadd(136.65, -110.65, -30.25, 1.18)
pt3dadd(137.83, -111.68, -31.25, 1.18)
pt3dadd(138.57, -112.27, -31.4, 1.18)
pt3dadd(139.53, -112.72, -31.45, 1.18)
pt3dadd(140.42, -112.72, -31.7, 1.18)
pt3dadd(141.23, -112.42, -31.85, 1.18)
pt3dadd(141.97, -112.2, -32.05, 1.18)
pt3dadd(143.3, -111.98, -32.15, 1.18)
pt3dadd(144.11, -111.76, -32.7, 1.18)
pt3dadd(145.07, -111.61, -32.7, 1.18)
pt3dadd(145.59, -112.13, -29.5, 0.89)
pt3dadd(145.96, -112.72, -29.4, 0.67)
pt3dadd(146.7, -113.38, -29.4, 0.67)
pt3dadd(147.44, -113.38, -29.4, 0.67)
pt3dadd(148.25, -113.97, -29.35, 0.67)
pt3dadd(149.29, -114.86, -29.35, 1.11)
pt3dadd(149.88, -115.37, -29.35, 1.11)
pt3dadd(150.25, -116.18, -29.3, 1.11)
pt3dadd(150.99, -117.07, -32.15, 1.03)
pt3dadd(151.72, -117.81, -32.25, 1.18)
pt3dadd(152.61, -118.1, -32.3, 1.33)
pt3dadd(153.94, -118.32, -33.6, 1.11)
pt3dadd(154.76, -118.54, -33.6, 1.11)
pt3dadd(155.72, -118.76, -33.6, 1.11)
pt3dadd(156.6, -118.91, -33.65, 0.89)
pt3dadd(157.42, -119.21, -33.65, 0.89)
pt3dadd(158.45, -119.28, -33.65, 0.89)
pt3dadd(159.12, -118.62, -33.55, 0.89)
pt3dadd(159.93, -119.35, -33.5, 0.89)
pt3dadd(160.45, -120.31, -33.5, 0.89)
pt3dadd(160.45, -121.12, -32.85, 1.03)
pt3dadd(161.33, -121.86, -32.7, 1.03)
pt3dadd(162.59, -122.3, -34.85, 0.96)
pt3dadd(163.48, -122.45, -34.9, 0.96)
pt3dadd(164.29, -122.53, -34.9, 0.96)
pt3dadd(164.95, -122.97, -34.9, 0.96)
pt3dadd(165.47, -123.04, -34.95, 1.11)
pt3dadd(166.28, -122.67, -34.95, 1.11)
pt3dadd(167.47, -122.75, -36.15, 1.11)
pt3dadd(168.35, -122.82, -36.2, 1.11)
pt3dadd(169.09, -123.04, -36.25, 1.11)
pt3dadd(169.68, -123.48, -36.25, 1.11)
pt3dadd(170.65, -123.93, -37.3, 1.11)
pt3dadd(171.46, -124.22, -37.35, 1.11)
pt3dadd(172.27, -124.44, -37.35, 1.11)
pt3dadd(173.01, -124.59, -37.35, 1.11)
pt3dadd(174.05, -124.66, -37.35, 1.11)
pt3dadd(174.78, -124.59, -37.35, 1.11)
pt3dadd(175.44, -124.05, -39.6, 1.11)
pt3dadd(176.48, -123.54, -39.6, 1.11)
pt3dadd(177.07, -122.95, -39.65, 1.11)
pt3dadd(178.03, -122.58, -39.65, 1.11)
pt3dadd(178.77, -123.09, -39.65, 1.11)
pt3dadd(179.66, -123.68, -39.65, 1.11)
pt3dadd(180.03, -124.27, -39.65, 1.11)
pt3dadd(181.06, -124.64, -39.65, 1.11)
pt3dadd(181.73, -125.38, -40.4, 1.11)
pt3dadd(182.17, -126.12, -40.45, 1.11)
pt3dadd(182.98, -126.78, -40.45, 1.11)
pt3dadd(184.02, -127.52, -40.45, 1.11)
pt3dadd(185.05, -128.18, -40.45, 1.11)
pt3dadd(186.09, -128.62, -40.45, 1.11)
pt3dadd(186.83, -128.92, -40.45, 1.11)
pt3dadd(187.49, -129.14, -40.35, 0.89)
pt3dadd(188.38, -129.29, -40.25, 0.89)
pt3dadd(189.26, -130.17, -41.05, 1.03)
pt3dadd(189.71, -131.21, -41.1, 1.03)
pt3dadd(189.93, -132.24, -41.15, 1.11)
pt3dadd(190.3, -133.12, -41.15, 1.11)
pt3dadd(190.96, -133.56, -41.15, 1.11)
pt3dadd(191.78, -133.93, -42.5, 1.11)
pt3dadd(192.74, -133.64, -42.8, 1.11)
pt3dadd(193.77, -133.05, -44.5, 1.11)
}
dend[57] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(14.33, -20.78, 19.55, 1.85)
pt3dadd(15.51, -21.45, 19.55, 1.85)
pt3dadd(16.03, -22.4, 19.55, 1.85)
pt3dadd(15.88, -23.51, 19.55, 1.85)
pt3dadd(15.88, -25.06, 19.45, 2.29)
pt3dadd(16.18, -26.39, 19.45, 2.29)
pt3dadd(15.73, -27.57, 19.45, 2.29)
pt3dadd(15.36, -29.34, 19.45, 2.29)
pt3dadd(14.4, -30.66, 19.45, 2.29)
pt3dadd(13.07, -31.99, 19.45, 2.29)
pt3dadd(11.89, -33.02, 19.45, 2.29)
pt3dadd(11, -33.76, 19.45, 2.29)
pt3dadd(10.12, -34.43, 19.45, 2.29)
pt3dadd(9.3, -35.9, 19.45, 2.29)
pt3dadd(9.23, -37.37, 19.45, 1.77)
pt3dadd(9.9, -38.48, 19.45, 1.77)
pt3dadd(10.71, -39.29, 19.45, 1.77)
pt3dadd(11.6, -39.81, 19.45, 2)
pt3dadd(12.56, -40.32, 19.45, 2)
pt3dadd(13.22, -41.21, 19.45, 2)
pt3dadd(13.59, -42.39, 20.6, 1.48)
pt3dadd(13.22, -43.27, 20.65, 1.48)
pt3dadd(12.63, -44.23, 20.65, 1.48)
pt3dadd(12.11, -45.04, 20.65, 1.48)
pt3dadd(11.37, -45.78, 20.65, 1.48)
pt3dadd(11.15, -46.96, 20.65, 1.48)
pt3dadd(11.45, -48.29, 20.65, 1.48)
pt3dadd(11.82, -49.62, 21.9, 1.48)
pt3dadd(12.26, -50.58, 21.95, 1.48)
pt3dadd(12.11, -51.31, 23.2, 1.48)
pt3dadd(12.26, -52.2, 24.2, 1.33)
pt3dadd(12.56, -53.16, 24.25, 1.33)
pt3dadd(12.85, -53.97, 24.3, 1.33)
pt3dadd(13.37, -54.71, 24.35, 1.18)
pt3dadd(13.44, -55.3, 24.35, 1.18)
pt3dadd(13.59, -56.33, 24.35, 1.18)
}
dend[58] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(10.78, -25.58, 13.4, 2.37)
pt3dadd(12.41, -26.46, 13.45, 2.37)
pt3dadd(12.78, -27.57, 13.5, 2.37)
pt3dadd(13.15, -28.82, 13.5, 2.37)
pt3dadd(13.37, -29.93, 13.5, 2.37)
pt3dadd(13.96, -30.96, 13.5, 2.37)
pt3dadd(14.4, -32.14, 13.5, 2.37)
pt3dadd(13.22, -33.17, 13.55, 2.37)
}
dend[59] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(6.2, -27.57, 10.2, 2.07)
pt3dadd(6.72, -28.97, 10.15, 2.07)
pt3dadd(7.38, -29.56, 10.1, 2.07)
pt3dadd(8.34, -30, 10.1, 2.07)
pt3dadd(8.64, -30.59, 10.05, 2.07)
pt3dadd(9.23, -30.89, 10.05, 2.07)
pt3dadd(10.56, -31.99, 8.25, 2.07)
pt3dadd(10.93, -33.1, 8.2, 2.07)
pt3dadd(10.63, -34.28, 7.5, 2.07)
pt3dadd(9.9, -35.09, 7.5, 2.07)
pt3dadd(9.38, -36.05, 8.55, 1.92)
pt3dadd(8.42, -36.64, 10, 1.92)
pt3dadd(7.09, -36.86, 10.15, 1.92)
pt3dadd(6.2, -37.37, 11.4, 1.77)
pt3dadd(5.17, -37.74, 11.7, 1.4)
pt3dadd(4.5, -38.11, 11.75, 1.4)
pt3dadd(3.47, -38.48, 12.9, 1.18)
pt3dadd(2.65, -38.78, 12.9, 1.18)
pt3dadd(1.84, -39.59, 12.95, 1.18)
pt3dadd(1.54, -40.47, 12.95, 1.18)
pt3dadd(1.32, -41.21, 15.15, 1.18)
pt3dadd(1.25, -42.24, 15.25, 1.18)
pt3dadd(1.62, -42.98, 15.3, 1.18)
pt3dadd(2.28, -44.09, 16.65, 1.18)
pt3dadd(2.95, -44.9, 16.75, 1.18)
pt3dadd(3.47, -45.56, 16.8, 1.18)
pt3dadd(3.61, -46.22, 18, 1.77)
pt3dadd(3.91, -47.04, 18, 2)
pt3dadd(3.61, -48.29, 18, 1.7)
pt3dadd(3.24, -49.47, 18, 1.7)
pt3dadd(3.02, -50.65, 18, 1.7)
pt3dadd(2.73, -51.98, 19.4, 1.7)
pt3dadd(2.28, -53.23, 19.45, 1.7)
pt3dadd(2.06, -54.41, 19.5, 1.7)
pt3dadd(1.47, -55.07, 19.5, 1.55)
pt3dadd(0.8, -55.66, 19.5, 1.55)
pt3dadd(0.29, -56.11, 19.5, 1.55)
pt3dadd(-0.53, -56.62, 19.5, 1.55)
pt3dadd(-1.27, -57.29, 19.55, 1.55)
pt3dadd(-2.37, -58.1, 20.2, 1.55)
pt3dadd(-2.96, -58.76, 20.25, 1.55)
pt3dadd(-2.82, -59.57, 20.25, 1.55)
pt3dadd(-2.89, -60.83, 21.95, 1.33)
pt3dadd(-2.89, -61.86, 22, 1.33)
pt3dadd(-3.19, -62.89, 22, 1.33)
pt3dadd(-3.68, -63.96, 22.05, 1.33)
pt3dadd(-4.05, -65.07, 22.05, 1.33)
pt3dadd(-4.86, -65.59, 22.1, 1.33)
}
dend[60] {pt3dclear()
pt3dadd(-4.86, -65.59, 22.1, 1.26)
pt3dadd(-5.75, -65.37, 22.95, 1.26)
pt3dadd(-6.79, -65.59, 22.95, 1.26)
pt3dadd(-7.82, -66.03, 22.95, 1.26)
pt3dadd(-8.86, -66.25, 22.95, 1.26)
pt3dadd(-9.89, -66.32, 22.95, 1.26)
pt3dadd(-10.93, -66.55, 22.95, 1.26)
pt3dadd(-11.81, -66.84, 22.95, 1.26)
pt3dadd(-12.99, -67.21, 23.65, 1.11)
pt3dadd(-13.44, -67.65, 23.65, 1.11)
pt3dadd(-14.25, -68.54, 23.7, 1.11)
pt3dadd(-14.99, -69.2, 23.7, 1.11)
pt3dadd(-15.66, -69.94, 23.7, 1.11)
pt3dadd(-16.32, -70.38, 23.7, 1.11)
pt3dadd(-16.99, -70.6, 23.7, 1.11)
pt3dadd(-17.73, -71.04, 23.7, 1.11)
pt3dadd(-18.32, -71.41, 23.7, 1.11)
pt3dadd(-18.83, -71.71, 23.2, 0.89)
pt3dadd(-19.57, -71.78, 22.9, 0.89)
pt3dadd(-20.09, -71.63, 22, 0.89)
pt3dadd(-20.9, -71.63, 21.9, 0.89)
pt3dadd(-21.64, -71.56, 21.9, 0.89)
pt3dadd(-22.31, -71.78, 21.85, 0.89)
pt3dadd(-22.97, -72.52, 21.8, 0.89)
pt3dadd(-22.9, -73.33, 21.8, 0.89)
}
dend[61] {pt3dclear()
pt3dadd(-4.86, -65.59, 22.1, 1.11)
}
}
proc shape3d_14() {
dend[61] { pt3dadd(-5.09, -66.55, 23.2, 1.11)
pt3dadd(-5.68, -67.58, 23.25, 1.11)
pt3dadd(-5.97, -68.32, 23.3, 1.11)
pt3dadd(-5.9, -69.35, 23.3, 1.11)
pt3dadd(-5.97, -70.31, 23.3, 1.11)
pt3dadd(-5.83, -71.26, 23.65, 1.11)
pt3dadd(-5.83, -72, 23.7, 1.11)
pt3dadd(-5.6, -72.89, 23.75, 1.11)
pt3dadd(-5.53, -73.99, 22.85, 1.11)
pt3dadd(-6.05, -74.36, 22.4, 1.11)
pt3dadd(-6.79, -75.47, 22.4, 1.11)
pt3dadd(-5.6, -76.5, 22.4, 1.11)
}
dend[62] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(13.78, -8.59, -22.45, 2.14)
pt3dadd(15.26, -8.52, -22.4, 2.14)
pt3dadd(16.66, -9.25, -22.4, 2.14)
pt3dadd(17.63, -9.62, -22.5, 1.77)
pt3dadd(18.07, -10.14, -22.55, 1.77)
pt3dadd(18.88, -10.43, -22.55, 1.77)
pt3dadd(19.84, -10.14, -22.55, 1.77)
pt3dadd(21.03, -9.7, -21.95, 1.63)
pt3dadd(21.91, -9.03, -21.85, 1.63)
pt3dadd(22.65, -8.81, -21.8, 1.63)
pt3dadd(23.02, -8.74, -21.75, 1.63)
pt3dadd(23.69, -8.89, -21.7, 1.63)
pt3dadd(24.13, -9.11, -21.7, 1.63)
pt3dadd(25.09, -9.48, -21.7, 1.63)
pt3dadd(25.9, -9.84, -21.65, 1.63)
pt3dadd(26.86, -10.88, -27.75, 1.63)
pt3dadd(27.38, -11.76, -27.75, 1.63)
pt3dadd(27.9, -12.65, -27.8, 1.48)
pt3dadd(28.34, -13.02, -27.8, 1.48)
pt3dadd(28.86, -13.61, -27.8, 1.48)
pt3dadd(29.38, -13.31, -27.8, 1.48)
pt3dadd(29.97, -12.65, -27.8, 1.48)
pt3dadd(30.78, -12.2, -28.75, 1.48)
pt3dadd(31.67, -12.06, -28.75, 1.48)
}
dend[63] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(10.83, -1.22, -22.5, 2.88)
pt3dadd(12.01, 0.04, -18.8, 3.25)
}
dend[64] {pt3dclear()
pt3dadd(12.01, 0.04, -18.8, 1.77)
pt3dadd(11.86, 1.51, -17.95, 1.77)
pt3dadd(11.79, 2.47, -17.85, 1.77)
pt3dadd(12.01, 3.28, -17.8, 1.77)
pt3dadd(11.93, 3.87, -17.8, 1.77)
pt3dadd(11.86, 4.61, -17.5, 1.77)
pt3dadd(11.71, 5.42, -17.3, 1.77)
pt3dadd(11.49, 6.31, -17.25, 1.77)
pt3dadd(11.27, 6.97, -17.3, 1.77)
pt3dadd(10.68, 8, -17.35, 1.77)
pt3dadd(10.09, 8.81, -17.35, 1.77)
pt3dadd(9.72, 9.77, -17.4, 1.77)
pt3dadd(9.57, 10.8, -15.75, 1.77)
pt3dadd(9.64, 12.06, -15.65, 1.77)
pt3dadd(10.16, 13.16, -15.6, 1.77)
pt3dadd(11.05, 13.83, -15.55, 1.77)
pt3dadd(11.71, 14.57, -15.55, 1.77)
pt3dadd(12.45, 16.11, -14.35, 1.77)
pt3dadd(12.45, 17.37, -14.5, 1.77)
pt3dadd(12.38, 18.62, -16.75, 1.77)
pt3dadd(12.01, 19.51, -16.95, 1.77)
pt3dadd(11.93, 20.54, -17.05, 1.77)
pt3dadd(12.01, 21.5, -17.15, 1.77)
pt3dadd(12.08, 22.24, -17.15, 1.77)
pt3dadd(12.23, 22.97, -17.2, 1.77)
pt3dadd(12.6, 23.86, -17.2, 1.77)
pt3dadd(13.04, 24.74, -17.25, 1.77)
pt3dadd(13.19, 25.55, -17.25, 1.77)
pt3dadd(13.04, 26.22, -17.25, 1.77)
pt3dadd(12.82, 27.1, -17.25, 1.77)
pt3dadd(12.82, 27.84, -17.25, 1.77)
pt3dadd(12.3, 28.58, -17.25, 1.77)
pt3dadd(11.79, 29.39, -17.25, 1.77)
pt3dadd(11.42, 29.98, -17.25, 1.77)
pt3dadd(10.83, 30.64, -18.7, 1.77)
pt3dadd(10.46, 31.68, -18.8, 1.77)
pt3dadd(10.38, 32.56, -18.8, 1.77)
pt3dadd(10.38, 33.08, -18.9, 1.77)
pt3dadd(10.6, 33.82, -19.75, 1.77)
pt3dadd(10.67, 34.56, -19.75, 1.77)
pt3dadd(10.75, 35.22, -19.75, 1.77)
pt3dadd(11.04, 35.96, -19.7, 1.77)
pt3dadd(11.19, 36.77, -19.7, 1.77)
pt3dadd(11.19, 37.95, -20.95, 1.48)
pt3dadd(11.12, 38.84, -20.95, 1.48)
pt3dadd(10.97, 39.72, -20.95, 1.48)
pt3dadd(11.27, 40.61, -20.95, 1.48)
pt3dadd(11.34, 41.79, -21.75, 1.48)
pt3dadd(11.27, 42.67, -21.85, 1.48)
pt3dadd(10.97, 43.56, -21.9, 1.48)
pt3dadd(11.19, 44.37, -21.9, 1.48)
pt3dadd(11.34, 45.33, -22.85, 1.48)
pt3dadd(11.56, 46.29, -23, 1.48)
pt3dadd(11.78, 47.32, -24, 1.48)
pt3dadd(11.93, 48.35, -23.95, 1.48)
pt3dadd(12.3, 49.09, -23.95, 1.48)
pt3dadd(12.37, 50.05, -23.9, 1.48)
pt3dadd(12.52, 50.86, -23.85, 1.48)
pt3dadd(12.67, 51.89, -24.8, 1.48)
pt3dadd(12.74, 52.85, -24.85, 1.48)
pt3dadd(12.97, 53.73, -24.9, 1.48)
pt3dadd(13.48, 54.4, -24.95, 1.48)
pt3dadd(14.15, 54.91, -25, 1.48)
pt3dadd(14.74, 55.5, -25.05, 1.48)
pt3dadd(15.77, 56.02, -25.1, 1.48)
pt3dadd(16.81, 56.54, -25.75, 1.48)
pt3dadd(17.99, 56.76, -25.75, 1.48)
pt3dadd(18.8, 57.35, -23.9, 1.33)
pt3dadd(19.47, 58.09, -23.9, 1.33)
pt3dadd(19.62, 59.12, -23.85, 1.33)
pt3dadd(19.62, 59.93, -25.7, 1.33)
pt3dadd(19.62, 60.81, -25.85, 1.33)
pt3dadd(19.47, 61.85, -25.9, 1.33)
pt3dadd(19.17, 62.66, -26.55, 2)
pt3dadd(19.17, 63.69, -26.55, 2)
}
dend[65] {pt3dclear()
pt3dadd(19.17, 63.69, -26.55, 1.18)
pt3dadd(19.54, 64.87, -27.35, 1.18)
pt3dadd(20.06, 65.24, -27.25, 1.18)
pt3dadd(20.28, 65.68, -27.2, 1.18)
pt3dadd(20.72, 66.56, -27.1, 1.18)
pt3dadd(21.76, 66.56, -26.95, 1.18)
pt3dadd(22.5, 66.86, -29, 1.18)
pt3dadd(23.53, 67.23, -29.2, 1.18)
pt3dadd(24.12, 68.11, -30, 1.18)
pt3dadd(24.93, 68.85, -30.1, 1.18)
pt3dadd(25.67, 69.44, -30.1, 1.18)
pt3dadd(26.34, 70.25, -30.15, 1.18)
pt3dadd(27, 71.06, -30.7, 1.18)
pt3dadd(27.3, 72.02, -30.8, 1.18)
pt3dadd(27.67, 72.98, -30.85, 1.18)
pt3dadd(27.82, 73.87, -30.9, 1.18)
pt3dadd(28.11, 74.53, -31, 1.18)
pt3dadd(28.56, 75.27, -31.05, 1.18)
pt3dadd(28.85, 76, -31.1, 1.18)
pt3dadd(28.93, 76.96, -32.4, 1.18)
pt3dadd(29.59, 77.55, -32.5, 1.18)
pt3dadd(30.18, 78.07, -32.55, 1.18)
pt3dadd(30.77, 78.44, -32.55, 1.18)
pt3dadd(31.59, 79.18, -33.35, 1.18)
pt3dadd(32.7, 79.99, -33.55, 1.18)
pt3dadd(32.62, 81.02, -35.05, 1.18)
pt3dadd(32.84, 81.9, -35.25, 1.18)
pt3dadd(32.99, 82.86, -35.3, 1.18)
pt3dadd(33.14, 83.97, -35.3, 1.18)
pt3dadd(33.43, 85.3, -35.3, 1.18)
pt3dadd(33.43, 85.96, -35.3, 1.18)
pt3dadd(33.73, 86.92, -35.4, 1.18)
pt3dadd(33.51, 87.95, -35.5, 1.18)
pt3dadd(33.88, 88.69, -35.55, 1.18)
pt3dadd(34.69, 89.13, -35.55, 1.18)
pt3dadd(35.06, 89.8, -35.55, 1.18)
pt3dadd(35.8, 90.39, -36.45, 1.18)
pt3dadd(36.24, 90.98, -36.45, 1.18)
pt3dadd(35.95, 92.16, -36.5, 1.18)
pt3dadd(35.8, 93.11, -36.45, 1.11)
pt3dadd(35.87, 94.37, -36.4, 1.11)
pt3dadd(35.58, 95.33, -36.4, 1.11)
pt3dadd(35.65, 96.21, -36.4, 1.11)
pt3dadd(35.21, 97.24, -36.4, 1.11)
pt3dadd(35.5, 97.91, -36.4, 1.11)
pt3dadd(35.95, 98.54, -36.1, 1.11)
pt3dadd(36.39, 99.21, -36, 1.11)
pt3dadd(36.61, 99.8, -37.9, 1.11)
pt3dadd(37.06, 100.46, -38, 1.11)
pt3dadd(37.35, 101.12, -38.05, 0.89)
pt3dadd(37.43, 101.79, -38.05, 0.89)
pt3dadd(37.65, 102.67, -38.15, 0.89)
pt3dadd(37.8, 103.34, -38.25, 1.33)
pt3dadd(37.2, 103.93, -38.3, 1.33)
pt3dadd(37.13, 104.52, -38.3, 1.33)
pt3dadd(37.13, 105.11, -38.3, 1.33)
pt3dadd(37.28, 105.84, -40.5, 0.74)
pt3dadd(37.28, 106.8, -40.55, 0.74)
pt3dadd(37.57, 107.17, -40.55, 0.74)
pt3dadd(38.39, 107.32, -41.8, 0.74)
pt3dadd(39.5, 107.1, -41.85, 0.74)
pt3dadd(39.27, 107.69, -41.85, 0.74)
pt3dadd(39.5, 108.28, -43.15, 0.96)
pt3dadd(40.01, 108.87, -43.2, 0.96)
pt3dadd(40.68, 109.09, -43.25, 0.96)
pt3dadd(41.86, 109.16, -43.4, 0.96)
pt3dadd(42.9, 109.53, -43.25, 0.96)
pt3dadd(43.93, 109.61, -45.65, 0.96)
pt3dadd(44.6, 110.71, -45.45, 0.96)
pt3dadd(44.89, 111.45, -45.4, 0.96)
pt3dadd(45.26, 111.82, -45.35, 0.96)
pt3dadd(45.63, 112.63, -45.3, 0.96)
pt3dadd(45.63, 113.51, -46.5, 0.96)
pt3dadd(45.63, 114.4, -46.6, 0.96)
pt3dadd(46.22, 114.84, -46.75, 0.96)
pt3dadd(47.18, 115.21, -48, 0.96)
pt3dadd(48.29, 115.65, -48.15, 0.96)
pt3dadd(49.1, 115.8, -48.25, 0.96)
pt3dadd(49.99, 116.39, -48.3, 0.96)
pt3dadd(50.29, 117.2, -48.55, 0.96)
pt3dadd(50.95, 117.72, -48.6, 0.96)
pt3dadd(51.39, 118.38, -47.65, 0.96)
pt3dadd(51.76, 119.05, -47.7, 0.96)
pt3dadd(52.58, 120.15, -47.85, 0.96)
pt3dadd(53.17, 120.37, -47.9, 0.96)
}
}
proc shape3d_15() {
dend[65] { pt3dadd(53.91, 120.74, -48.3, 0.96)
pt3dadd(54.43, 121.48, -48.4, 0.96)
pt3dadd(54.87, 122.29, -48.45, 0.96)
pt3dadd(55.02, 123.1, -48.5, 0.96)
pt3dadd(55.39, 123.69, -48.5, 0.96)
pt3dadd(55.61, 124.58, -48.55, 0.96)
pt3dadd(55.53, 125.09, -48.55, 0.96)
pt3dadd(55.9, 125.61, -48.55, 0.96)
pt3dadd(56.2, 126.2, -48.55, 0.96)
pt3dadd(56.94, 126.79, -48.55, 0.96)
pt3dadd(57.09, 127.45, -48.55, 0.96)
pt3dadd(57.6, 128.12, -48.55, 0.96)
pt3dadd(58.05, 128.78, -48.6, 0.96)
pt3dadd(58.64, 129.44, -48.6, 0.96)
pt3dadd(58.86, 130.18, -48.6, 0.96)
pt3dadd(58.83, 130.95, -50.35, 0.96)
pt3dadd(59.2, 131.69, -50.4, 0.81)
pt3dadd(59.64, 132.28, -50.45, 0.81)
pt3dadd(59.5, 132.94, -50.45, 0.81)
pt3dadd(58.98, 133.6, -50.45, 0.81)
pt3dadd(58.98, 134.27, -50.45, 0.81)
pt3dadd(58.83, 135.23, -50.45, 0.81)
pt3dadd(59.42, 135.59, -50.45, 0.81)
pt3dadd(59.27, 136.11, -51.8, 0.81)
pt3dadd(59.27, 137.07, -52.05, 0.81)
pt3dadd(59.57, 137.59, -52.1, 0.81)
pt3dadd(59.94, 138.03, -52.1, 0.81)
pt3dadd(60.31, 138.62, -52.15, 0.81)
pt3dadd(60.53, 139.36, -52.15, 0.81)
pt3dadd(60.53, 139.8, -52.15, 0.81)
pt3dadd(60.68, 140.46, -52.75, 0.81)
pt3dadd(60.83, 141.35, -52.8, 0.81)
pt3dadd(60.9, 142.01, -52.85, 0.81)
pt3dadd(61.05, 142.9, -53.9, 0.81)
pt3dadd(60.6, 143.56, -53.9, 0.81)
pt3dadd(60.16, 143.85, -53.95, 0.81)
pt3dadd(59.87, 144.37, -53.95, 0.81)
pt3dadd(59.64, 145.11, -53.95, 0.81)
pt3dadd(59.64, 145.62, -54, 0.81)
pt3dadd(60.16, 146.66, -54.4, 0.81)
pt3dadd(60.23, 147.69, -54.45, 0.81)
pt3dadd(60.23, 148.5, -54.45, 0.81)
pt3dadd(59.72, 149.75, -54.5, 0.81)
pt3dadd(58.9, 149.9, -54.55, 0.81)
pt3dadd(58.53, 150.42, -54.55, 0.81)
pt3dadd(58.09, 150.79, -54.6, 0.81)
pt3dadd(57.72, 151.38, -54.6, 0.81)
pt3dadd(57.35, 151.89, -109.2, 0.81)
}
dend[66] {pt3dclear()
pt3dadd(19.17, 63.69, -26.55, 1.03)
pt3dadd(18.59, 64.17, -26.6, 1.03)
pt3dadd(18.15, 65.2, -26.4, 1.03)
pt3dadd(17.85, 66.23, -32.3, 1.03)
pt3dadd(17.92, 67.05, -32.35, 1.03)
pt3dadd(17.63, 67.78, -32.4, 1.03)
pt3dadd(17.48, 68.67, -32.45, 1.03)
pt3dadd(17.26, 69.41, -32.45, 1.03)
pt3dadd(17.04, 70.29, -31.95, 1.03)
pt3dadd(16.74, 71.03, -31.75, 1.03)
pt3dadd(16.3, 71.4, -31.7, 1.03)
pt3dadd(15.78, 71.91, -31.6, 1.03)
pt3dadd(15.34, 72.43, -31.6, 1.03)
pt3dadd(15.34, 73.24, -32.4, 1.03)
pt3dadd(15.34, 74.13, -32.55, 1.03)
pt3dadd(14.82, 74.72, -32.7, 1.03)
pt3dadd(13.86, 74.72, -35.25, 1.03)
pt3dadd(13.56, 74.13, -35.4, 1.03)
pt3dadd(12.75, 73.9, -35.45, 1.03)
pt3dadd(12.08, 73.83, -35.45, 1.03)
pt3dadd(11.49, 74.27, -35.5, 1.03)
pt3dadd(10.83, 75.01, -37.5, 1.03)
pt3dadd(10.02, 75.31, -37.6, 1.03)
pt3dadd(9.13, 75.53, -38.8, 1.03)
pt3dadd(8.46, 75.97, -39, 1.03)
pt3dadd(7.8, 76.34, -39.3, 1.03)
pt3dadd(7.43, 76.71, -39.4, 1.03)
pt3dadd(6.84, 77.08, -40, 1.03)
pt3dadd(6.54, 77.44, -40.05, 1.03)
pt3dadd(5.88, 77.59, -40.15, 1.03)
pt3dadd(5.36, 78.03, -40.2, 1.03)
pt3dadd(4.84, 78.26, -40.2, 1.03)
pt3dadd(3.88, 78.99, -40.7, 1.4)
pt3dadd(2.77, 79.58, -40.7, 1.4)
pt3dadd(1.89, 79.73, -40.7, 1.4)
pt3dadd(0.92, 80.1, -40.7, 1.4)
pt3dadd(0.11, 80.54, -40.7, 1.4)
pt3dadd(-0.85, 80.47, -40.7, 1.4)
pt3dadd(-2.03, 80.54, -40.7, 1.4)
pt3dadd(-2.95, 80.88, -39.05, 0.89)
pt3dadd(-3.62, 81.25, -39.1, 0.89)
pt3dadd(-4.36, 81.47, -39.15, 0.89)
pt3dadd(-5.02, 81.77, -39.15, 0.89)
pt3dadd(-5.98, 82.29, -39.2, 0.89)
pt3dadd(-6.8, 82.21, -39.2, 0.89)
pt3dadd(-7.83, 81.84, -37.25, 0.81)
pt3dadd(-8.5, 81.62, -37.15, 0.81)
pt3dadd(-9.16, 81.47, -37.15, 0.81)
pt3dadd(-9.68, 82.43, -35.2, 0.81)
pt3dadd(-10.05, 82.88, -35.3, 0.81)
pt3dadd(-10.86, 82.73, -35.35, 0.81)
pt3dadd(-11.38, 83.32, -35.4, 0.81)
pt3dadd(-11.89, 83.32, -37.15, 0.81)
pt3dadd(-12.41, 83.83, -37.25, 0.81)
pt3dadd(-13.23, 83.91, -37.3, 0.81)
pt3dadd(-13.96, 84.28, -37.3, 0.81)
pt3dadd(-14.63, 84.94, -37.9, 0.96)
pt3dadd(-15.07, 85.24, -37.9, 1.18)
pt3dadd(-15.74, 85.46, -37.9, 1.18)
pt3dadd(-16.26, 85.83, -37.9, 1.18)
pt3dadd(-17.07, 86.05, -36, 0.37)
pt3dadd(-17.73, 86.56, -35.95, 0.37)
pt3dadd(-18.47, 86.93, -35.95, 0.37)
pt3dadd(-19.06, 87.45, -35.95, 0.37)
pt3dadd(-19.14, 88.63, -35.95, 0.37)
}
dend[67] {pt3dclear()
pt3dadd(12.01, 0.04, -18.8, 1.55)
pt3dadd(13.06, 0.41, -21.55, 1.55)
pt3dadd(13.87, 1.14, -21.6, 1.55)
pt3dadd(13.73, 2.1, -24.05, 1.4)
pt3dadd(13.73, 2.99, -24.1, 1.4)
pt3dadd(13.73, 3.43, -24.15, 1.4)
pt3dadd(14.17, 3.72, -24.15, 1.4)
pt3dadd(14.24, 4.46, -24.2, 1.4)
pt3dadd(14.54, 5.13, -24.2, 1.4)
pt3dadd(14.61, 5.94, -24.2, 1.4)
pt3dadd(14.83, 6.53, -24.2, 1.4)
pt3dadd(15.28, 7.04, -24.2, 1.4)
pt3dadd(15.94, 7.63, -24.2, 1.4)
pt3dadd(16.17, 8.22, -24.2, 1.4)
pt3dadd(16.31, 8.96, -22.8, 1.4)
pt3dadd(15.8, 9.77, -22.7, 1.4)
pt3dadd(15.72, 10.8, -22.6, 1.4)
pt3dadd(16.39, 11.47, -26.65, 1.4)
pt3dadd(16.98, 12.28, -26.7, 1.4)
pt3dadd(17.64, 13.24, -27.85, 1.4)
pt3dadd(18.31, 13.98, -28.1, 1.4)
pt3dadd(18.53, 14.64, -28.1, 1.4)
pt3dadd(18.6, 15.52, -28.15, 1.4)
pt3dadd(18.53, 16.41, -28.15, 1.4)
pt3dadd(18.38, 17.37, -28.2, 1.4)
pt3dadd(18.68, 18.25, -29.4, 1.4)
pt3dadd(18.9, 19.21, -29.4, 1.4)
pt3dadd(18.97, 20.17, -29.4, 1.4)
pt3dadd(19.71, 21.35, -29.4, 1.4)
pt3dadd(20.45, 21.94, -33.85, 1.4)
pt3dadd(21.26, 22.24, -33.85, 1.4)
pt3dadd(21.71, 22.83, -33.85, 1.4)
pt3dadd(22.3, 23.34, -33.9, 1.4)
pt3dadd(22.89, 23.64, -33.9, 1.4)
pt3dadd(23.48, 24.08, -33.9, 1.4)
pt3dadd(23.85, 24.52, -33.9, 1.4)
pt3dadd(24.3, 24.96, -33.9, 1.4)
pt3dadd(25.11, 25.41, -33.9, 1.4)
pt3dadd(25.85, 25.85, -33.9, 1.4)
pt3dadd(26.51, 26.96, -34.5, 1.4)
pt3dadd(26.96, 27.69, -34.5, 1.4)
pt3dadd(27.62, 28.28, -33.25, 1.4)
pt3dadd(28.36, 29.02, -33.4, 1.4)
pt3dadd(28.66, 29.83, -33.85, 1.92)
pt3dadd(29.32, 30.57, -33.85, 1.92)
pt3dadd(29.25, 31.45, -33.9, 1.92)
pt3dadd(29.17, 32.12, -33.9, 1.92)
pt3dadd(29.1, 32.71, -33.9, 1.92)
pt3dadd(28.88, 33.57, -35.9, 1.63)
pt3dadd(29.7, 34.01, -35.95, 1.63)
pt3dadd(30.51, 34.31, -35.95, 1.63)
pt3dadd(31.4, 34.38, -35.95, 1.63)
pt3dadd(32.58, 34.82, -37.45, 1.63)
pt3dadd(33.1, 35.49, -37.55, 1.63)
pt3dadd(33.69, 36.45, -37.55, 1.63)
pt3dadd(33.91, 37.55, -37.6, 1.63)
pt3dadd(34.87, 37.63, -37.6, 1.55)
pt3dadd(35.98, 37.99, -38.15, 1.48)
pt3dadd(36.57, 38.81, -37.8, 1.48)
pt3dadd(37.31, 39.47, -37.85, 1.48)
pt3dadd(37.75, 39.99, -37.9, 1.48)
pt3dadd(38.49, 40.87, -37.95, 1.48)
pt3dadd(38.86, 41.68, -37.95, 1.48)
pt3dadd(39.23, 42.27, -38, 1.18)
pt3dadd(39.67, 42.94, -38, 1.18)
pt3dadd(40.34, 43.67, -38, 1.18)
pt3dadd(40.71, 44.34, -38, 1.18)
pt3dadd(41.37, 45.07, -38, 1.18)
pt3dadd(42.11, 45.81, -38, 1.18)
pt3dadd(42.93, 45.81, -38, 1.18)
pt3dadd(43.96, 46.18, -39.3, 1.18)
pt3dadd(44.7, 46.84, -39.35, 1.18)
pt3dadd(45.29, 47.58, -39.4, 1.18)
pt3dadd(45.66, 48.32, -39.4, 1.18)
pt3dadd(46.1, 48.76, -39.45, 1.18)
pt3dadd(46.33, 49.5, -37.75, 1.18)
pt3dadd(46.18, 50.31, -37.65, 1.18)
pt3dadd(46.03, 51.2, -37.55, 1.18)
pt3dadd(46.25, 52.01, -37.5, 1.18)
pt3dadd(46.84, 52.52, -37.45, 1.18)
pt3dadd(47.66, 52.89, -37.4, 1.18)
pt3dadd(48.39, 52.89, -37.4, 1.18)
pt3dadd(48.84, 52.89, -37.4, 1.18)
pt3dadd(49.8, 52.52, -37.4, 1.18)
pt3dadd(50.61, 52.38, -37.4, 1.18)
pt3dadd(51.13, 52.74, -37.35, 1.18)
pt3dadd(51.57, 53.48, -37.35, 1.18)
}
}
proc shape3d_16() {
dend[67] { pt3dadd(52.09, 54.51, -38.8, 1.18)
pt3dadd(52.46, 55.4, -39, 1.18)
pt3dadd(52.39, 56.28, -39.1, 1.18)
pt3dadd(52.39, 57.02, -39.2, 1.18)
pt3dadd(52.31, 57.91, -39.25, 1.18)
pt3dadd(51.94, 58.5, -39.25, 1.18)
pt3dadd(52.02, 59.09, -39.35, 1.18)
pt3dadd(51.87, 59.46, -39.75, 1.18)
pt3dadd(51.87, 59.97, -39.9, 1.18)
pt3dadd(51.35, 60.41, -42.1, 1.18)
pt3dadd(51.28, 61.15, -42.2, 1.18)
pt3dadd(51.13, 61.89, -42.2, 1.18)
pt3dadd(51.2, 63.14, -42.25, 1.18)
pt3dadd(51.57, 63.81, -42.25, 1.18)
pt3dadd(51.94, 64.4, -42.25, 1.18)
pt3dadd(52.24, 64.77, -42.25, 1.18)
pt3dadd(52.46, 65.21, -42.25, 1.18)
pt3dadd(52.56, 66.32, -42.7, 1.18)
pt3dadd(53.07, 67.2, -42.9, 1.18)
pt3dadd(53.67, 67.79, -42.9, 1.33)
pt3dadd(54.11, 68.31, -42.9, 1.33)
pt3dadd(54.63, 68.75, -42.95, 1.33)
pt3dadd(55.29, 69.19, -42.95, 1.33)
pt3dadd(55.96, 69.86, -42.95, 1.33)
pt3dadd(55.88, 70.96, -42.95, 1.33)
pt3dadd(55.59, 71.85, -42.95, 1.33)
pt3dadd(55.22, 72.81, -42.95, 1.33)
pt3dadd(54.63, 73.84, -42.95, 1.33)
pt3dadd(54.18, 74.43, -42.95, 1.33)
pt3dadd(54.26, 75.17, -42.95, 1.33)
pt3dadd(54.33, 76.05, -45.1, 1.26)
pt3dadd(55, 76.79, -45.1, 1.26)
pt3dadd(55.73, 77.53, -45.15, 1.26)
pt3dadd(56.4, 78.41, -45.15, 1.26)
pt3dadd(56.7, 79.22, -45.15, 1.26)
pt3dadd(57.29, 79.96, -45.15, 1.26)
pt3dadd(57.58, 80.7, -45.15, 1.26)
pt3dadd(57.43, 81.51, -45.15, 1.26)
pt3dadd(57.14, 82.39, -45.35, 1.26)
pt3dadd(57.36, 83.13, -45.45, 1.26)
pt3dadd(57.21, 83.94, -42.7, 1.26)
pt3dadd(57.07, 84.9, -42.75, 1.26)
pt3dadd(57.36, 85.57, -42.8, 1.26)
pt3dadd(57.73, 86.45, -42.8, 1.26)
pt3dadd(57.95, 87.11, -42.8, 1.26)
pt3dadd(58.17, 88.22, -44.1, 1.26)
pt3dadd(58.47, 88.88, -44.3, 1.26)
pt3dadd(59.13, 89.55, -44.4, 1.26)
pt3dadd(59.43, 90.29, -44.45, 1.26)
pt3dadd(59.87, 90.95, -44.5, 1.26)
pt3dadd(60.1, 91.39, -44.55, 0.96)
pt3dadd(60.54, 92.06, -44.55, 0.96)
pt3dadd(61.13, 93.16, -44.55, 0.96)
pt3dadd(60.76, 93.75, -46.6, 1.33)
pt3dadd(60.46, 94.34, -46.6, 1.33)
pt3dadd(59.95, 94.56, -46.65, 1.33)
pt3dadd(59.5, 95.15, -46.65, 1.33)
pt3dadd(59.06, 95.74, -46.65, 1.33)
pt3dadd(58.62, 96.33, -46.65, 1.33)
pt3dadd(58.25, 96.85, -46.65, 1.33)
pt3dadd(57.95, 97.88, -46.65, 1.11)
pt3dadd(57.83, 99.14, -46.65, 1.11)
pt3dadd(57.83, 99.58, -46.65, 1.11)
pt3dadd(58.2, 100.02, -46.7, 1.11)
pt3dadd(58.43, 100.54, -46.65, 1.11)
pt3dadd(58.8, 101.06, -46.7, 1.11)
pt3dadd(59.39, 101.5, -46.7, 1.11)
pt3dadd(59.53, 102.24, -49.55, 1.11)
pt3dadd(59.76, 102.97, -49.5, 1.11)
pt3dadd(60.13, 103.56, -49.5, 1.11)
pt3dadd(60.64, 103.93, -49.5, 1.11)
pt3dadd(61.09, 104.3, -49.5, 1.11)
pt3dadd(61.23, 104.74, -49.5, 1.11)
pt3dadd(61.31, 105.55, -49.5, 1.11)
pt3dadd(61.16, 105.92, -49.5, 1.11)
pt3dadd(60.94, 106.37, -49.5, 1.11)
pt3dadd(60.5, 106.66, -49.5, 1.11)
pt3dadd(60.2, 107.03, -49.5, 1.11)
pt3dadd(60.27, 107.69, -50.7, 1.11)
pt3dadd(60.2, 108.28, -50.85, 1.11)
pt3dadd(59.98, 109.02, -50.95, 1.11)
pt3dadd(60.05, 109.68, -51, 1.11)
pt3dadd(59.76, 110.42, -51, 1.11)
pt3dadd(59.53, 111.31, -51.1, 1.11)
pt3dadd(59.09, 111.97, -53.55, 0.96)
pt3dadd(59.02, 112.93, -53.6, 0.96)
pt3dadd(58.87, 113.81, -53.6, 0.96)
pt3dadd(58.06, 114.4, -53.6, 0.96)
pt3dadd(57.76, 115.29, -53.6, 1.18)
pt3dadd(57.54, 116.17, -53.6, 1.18)
pt3dadd(57.17, 116.91, -53.6, 0.96)
pt3dadd(57.1, 117.5, -53.6, 0.96)
pt3dadd(56.8, 118.09, -53.65, 0.96)
pt3dadd(56.36, 118.76, -53.65, 0.96)
pt3dadd(55.91, 119.42, -53.6, 0.96)
pt3dadd(55.99, 120.38, -53.65, 0.96)
pt3dadd(55.54, 121.19, -55.15, 0.96)
pt3dadd(55.77, 122.59, -55.15, 0.96)
pt3dadd(56.14, 123.25, -55.15, 0.96)
pt3dadd(57.24, 124.14, -56.25, 0.96)
pt3dadd(58.13, 124.73, -56.05, 0.96)
pt3dadd(59.17, 125.1, -55.85, 1.18)
pt3dadd(59.46, 125.76, -55.8, 1.18)
pt3dadd(59.98, 126.35, -55.75, 1.18)
pt3dadd(60.5, 127.09, -55.75, 1.18)
pt3dadd(60.87, 127.68, -55.7, 1.18)
pt3dadd(61.16, 127.9, -55.7, 1.18)
pt3dadd(61.53, 128.2, -55.7, 0.81)
pt3dadd(62.27, 128.34, -55.7, 0.81)
pt3dadd(62.86, 128.56, -55.7, 0.81)
pt3dadd(63.01, 129.23, -55.7, 0.81)
pt3dadd(63.16, 129.82, -55.7, 0.81)
pt3dadd(63.45, 130.56, -55.7, 0.81)
pt3dadd(63.87, 131.13, -55.7, 0.81)
pt3dadd(64.02, 131.79, -55.7, 0.59)
pt3dadd(64.54, 132.38, -55.7, 0.59)
pt3dadd(64.91, 133.04, -55.65, 0.59)
pt3dadd(65.57, 133.19, -55.65, 0.89)
pt3dadd(66.53, 133.78, -55.65, 0.89)
pt3dadd(67.2, 134, -55.65, 0.89)
pt3dadd(68.16, 134.52, -111.3, 0.89)
}
dend[68] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(-10.24, -22.14, -38.45, 1.18)
pt3dadd(-11.2, -22.36, -38.3, 1.18)
pt3dadd(-12.01, -22.36, -38.2, 1.18)
pt3dadd(-12.97, -22.36, -38.15, 1.18)
pt3dadd(-13.79, -22.66, -38.1, 1.18)
pt3dadd(-14.38, -23.17, -38.1, 1.18)
pt3dadd(-15.12, -24.13, -38.7, 1.18)
pt3dadd(-16.08, -24.65, -38.9, 1.18)
pt3dadd(-16.96, -24.94, -38.95, 1.18)
pt3dadd(-18.22, -24.94, -40.9, 1.18)
pt3dadd(-19.11, -24.79, -41.05, 1.18)
pt3dadd(-20.07, -24.65, -41.1, 1.18)
pt3dadd(-20.81, -25.31, -41.1, 1.18)
pt3dadd(-21.62, -25.75, -41.15, 1.18)
pt3dadd(-22.58, -26.05, -43.25, 1.18)
pt3dadd(-23.25, -25.97, -43.7, 1.18)
pt3dadd(-24.06, -25.83, -44.1, 1.18)
pt3dadd(-24.8, -25.53, -44.6, 1.18)
pt3dadd(-25.61, -25.46, -44.85, 1.18)
pt3dadd(-26.72, -25.75, -45, 1.18)
pt3dadd(-27.83, -25.9, -45.05, 1.18)
pt3dadd(-28.94, -26.27, -45.15, 1.18)
pt3dadd(-29.82, -26.27, -44.5, 1.18)
pt3dadd(-30.93, -26.34, -44.3, 1.18)
pt3dadd(-32.04, -26.12, -44.2, 1.18)
pt3dadd(-32.78, -25.46, -44.15, 1.18)
pt3dadd(-33.37, -24.87, -44.05, 1.48)
pt3dadd(-34.18, -23.98, -44.05, 1.48)
pt3dadd(-34.55, -23.69, -44.05, 1.48)
pt3dadd(-35.07, -23.39, -44, 1.48)
pt3dadd(-35.88, -22.8, -44.2, 1.48)
pt3dadd(-36.77, -22.51, -44.25, 1.48)
pt3dadd(-37.88, -22.21, -44.3, 1.48)
pt3dadd(-38.62, -21.99, -44.3, 1.48)
pt3dadd(-39.43, -21.77, -44.3, 1.48)
pt3dadd(-40.32, -21.77, -44.3, 1.48)
pt3dadd(-41.43, -21.99, -46.05, 1.48)
pt3dadd(-42.54, -21.84, -46.25, 1.48)
pt3dadd(-43.57, -21.84, -48.75, 1.48)
pt3dadd(-44.53, -21.77, -49.55, 1.48)
pt3dadd(-45.35, -22.14, -49.6, 1.48)
pt3dadd(-46.01, -22.58, -49.7, 1.48)
pt3dadd(-46.6, -23.39, -49.7, 1.48)
pt3dadd(-47.05, -24.28, -51.05, 1.48)
pt3dadd(-47.93, -24.87, -51.2, 1.48)
pt3dadd(-48.38, -25.73, -52.1, 1.48)
pt3dadd(-48.9, -26.32, -52.45, 1.48)
pt3dadd(-49.93, -27.13, -52.9, 1.48)
pt3dadd(-50.67, -27.28, -52.9, 1.48)
pt3dadd(-51.41, -27.43, -52.9, 1.48)
pt3dadd(-52.37, -27.21, -52.9, 1.48)
pt3dadd(-53.19, -27.13, -52.9, 1.48)
pt3dadd(-53.93, -26.84, -52.9, 1.48)
pt3dadd(-54.59, -26.69, -55.65, 1.48)
pt3dadd(-55.4, -26.76, -55.65, 1.48)
pt3dadd(-57.03, -26.4, -55.7, 1.48)
pt3dadd(-57.92, -25.58, -58.95, 1.26)
pt3dadd(-58.36, -24.85, -59.15, 1.26)
pt3dadd(-58.43, -23.74, -59.5, 1.26)
pt3dadd(-58.43, -23.22, -59.65, 1.26)
pt3dadd(-58.36, -21.97, -60.9, 1.26)
pt3dadd(-58.36, -21.23, -61, 1.26)
pt3dadd(-58.43, -20.5, -61.1, 1.26)
pt3dadd(-58.66, -19.76, -61.35, 1.26)
pt3dadd(-59.39, -19.39, -62.5, 1.26)
pt3dadd(-60.06, -18.87, -62.55, 1.4)
pt3dadd(-60.5, -18.73, -62.55, 1.4)
pt3dadd(-61.17, -18.14, -61.55, 1.4)
pt3dadd(-61.91, -17.84, -61.4, 1.4)
pt3dadd(-62.65, -17.69, -61.25, 1.4)
pt3dadd(-63.61, -17.69, -61.2, 1.4)
pt3dadd(-64.27, -17.91, -61.15, 1.4)
pt3dadd(-64.42, -17.32, -61.1, 1.4)
pt3dadd(-63.9, -16.44, -65.6, 1.26)
pt3dadd(-63.76, -15.63, -65.65, 1.26)
pt3dadd(-64.42, -15.19, -65.7, 1.26)
pt3dadd(-65.31, -15.19, -65.7, 1.26)
pt3dadd(-66.05, -15.41, -65.7, 1.26)
}
}
proc shape3d_17() {
dend[68] { pt3dadd(-66.86, -15.41, -65.7, 1.26)
pt3dadd(-67.6, -15.41, -66.75, 1.26)
pt3dadd(-68.34, -15.33, -66.85, 1.26)
pt3dadd(-68.78, -15.26, -72.05, 1.26)
pt3dadd(-69.59, -15.41, -72.05, 1.26)
pt3dadd(-70.26, -15.55, -72, 1.26)
pt3dadd(-71.15, -15.92, -71.95, 1.26)
pt3dadd(-71.96, -16.14, -71.95, 1.26)
pt3dadd(-72.7, -16.44, -71.95, 1.26)
pt3dadd(-73.73, -16.44, -71.9, 0.89)
pt3dadd(-74.62, -16.29, -71.9, 0.74)
pt3dadd(-75.36, -16, -71.9, 0.74)
pt3dadd(-75.43, -15.33, -71.9, 0.74)
pt3dadd(-74.84, -14.82, -71.9, 0.74)
pt3dadd(-74.03, -15.19, -71.9, 0.74)
pt3dadd(-74.4, -15.48, -78.35, 0.74)
pt3dadd(-75.21, -15.92, -78.35, 0.74)
pt3dadd(-76.02, -16.07, -78.35, 0.74)
pt3dadd(-76.39, -16.14, -78.4, 0.89)
pt3dadd(-77.06, -16.44, -78.55, 0.89)
pt3dadd(-77.8, -16.44, -78.85, 0.89)
pt3dadd(-78.46, -16.44, -78.95, 0.89)
pt3dadd(-78.91, -16.37, -79.15, 0.89)
pt3dadd(-79.35, -16.22, -79.45, 0.89)
pt3dadd(-79.72, -15.92, -80.1, 0.89)
pt3dadd(-80.46, -15.78, -80.2, 0.89)
pt3dadd(-80.9, -16.07, -80.25, 0.89)
pt3dadd(-81.79, -16.44, -79.85, 0.89)
pt3dadd(-82.38, -16.59, -79.65, 0.89)
pt3dadd(-83.12, -16.73, -79.45, 0.89)
pt3dadd(-83.71, -16.73, -79.35, 0.89)
pt3dadd(-84.3, -16.73, -79.2, 0.89)
pt3dadd(-84.89, -16.96, -77.75, 0.89)
pt3dadd(-85.71, -17.03, -77.65, 0.89)
pt3dadd(-86.37, -17.18, -77.55, 0.89)
pt3dadd(-86.89, -17.32, -77.5, 0.89)
pt3dadd(-87.78, -17.4, -77.45, 0.89)
pt3dadd(-88.37, -17.47, -77.4, 0.89)
pt3dadd(-88.96, -17.4, -77.15, 0.89)
pt3dadd(-89.85, -17.32, -77, 0.89)
pt3dadd(-90.81, -17.18, -77.1, 0.89)
pt3dadd(-91.91, -16.88, -77.3, 0.89)
pt3dadd(-92.58, -16.81, -77.35, 0.89)
pt3dadd(-93.32, -16.88, -80.8, 0.89)
pt3dadd(-93.91, -16.96, -80.55, 0.89)
pt3dadd(-94.65, -16.73, -80.3, 0.89)
pt3dadd(-95.24, -16.59, -79.95, 0.89)
pt3dadd(-96.05, -16.37, -79.75, 0.89)
pt3dadd(-96.66, -15.62, -80.95, 0.89)
pt3dadd(-97.4, -14.96, -81.05, 0.89)
pt3dadd(-97.91, -14.22, -81.1, 0.89)
pt3dadd(-98.65, -13.48, -81.1, 0.89)
pt3dadd(-99.61, -13.56, 0, 0.89)
}
dend[69] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(5.67, -27.96, -33, 2.73)
pt3dadd(5.89, -29.51, -33.05, 2.73)
pt3dadd(5.52, -30.84, -33.05, 2.73)
pt3dadd(5.82, -32.68, -30.5, 2.59)
pt3dadd(5.52, -33.79, -30.5, 2.37)
pt3dadd(5.12, -35.38, -30.15, 2.22)
pt3dadd(4.45, -35.89, -30.05, 2.22)
pt3dadd(3.94, -37.07, -28.7, 2)
pt3dadd(3.27, -37.81, -28.65, 2)
pt3dadd(2.75, -39.51, -27.9, 2)
pt3dadd(2.38, -41.05, -29.75, 3.18)
pt3dadd(2.75, -43.63, -27.9, 3.92)
pt3dadd(3.27, -44.74, -27.85, 3.92)
}
dend[70] {pt3dclear()
pt3dadd(3.27, -44.74, -27.85, 2.59)
pt3dadd(1.94, -44.67, -28.85, 2.59)
pt3dadd(0.83, -45.77, -28.9, 2.59)
pt3dadd(-0.2, -46.66, -28.95, 2.59)
pt3dadd(-1.46, -48.06, -25.85, 2.37)
pt3dadd(-2.49, -48.58, -25.8, 2.37)
pt3dadd(-2.94, -48.94, -25.75, 2.37)
pt3dadd(-3.83, -49.46, -25.75, 2.37)
pt3dadd(-4.56, -49.98, -25.75, 2.37)
pt3dadd(-5.45, -50.79, -25.2, 2.07)
pt3dadd(-6.12, -51.3, -25.2, 2.07)
pt3dadd(-6.78, -51.97, -25.2, 2.07)
pt3dadd(-7.52, -52.71, -25.2, 2.07)
pt3dadd(-7.89, -53.59, -25.2, 2.07)
pt3dadd(-8.19, -54.48, -25.2, 1.77)
pt3dadd(-8.56, -55.14, -25.15, 1.77)
pt3dadd(-9.15, -55.88, -25.15, 1.77)
pt3dadd(-9.59, -56.47, -25.15, 1.63)
pt3dadd(-9.89, -57.06, -25.15, 1.63)
pt3dadd(-10.33, -57.79, -25.15, 1.63)
pt3dadd(-10.4, -58.83, -25.15, 1.26)
pt3dadd(-10.26, -59.27, -25.15, 1.26)
pt3dadd(-10.03, -60.15, -25.15, 1.26)
pt3dadd(-9.89, -60.82, -25.15, 1.26)
pt3dadd(-9.74, -61.26, -25.15, 1.26)
pt3dadd(-9.37, -61.92, -25.15, 1.26)
pt3dadd(-9.37, -62.51, -25.15, 0.89)
pt3dadd(-9.44, -63.1, -25.15, 0.89)
pt3dadd(-9.74, -64.14, -25.15, 0.89)
pt3dadd(-9.96, -65.24, -24.05, 1.11)
pt3dadd(-10.48, -66.13, -24.25, 1.11)
pt3dadd(-10.99, -66.87, -24.35, 1.11)
pt3dadd(-11.43, -67.67, -25.1, 1.33)
pt3dadd(-12.46, -68.19, -25.15, 1.33)
pt3dadd(-13.27, -68.85, -25.2, 1.33)
pt3dadd(-13.94, -69.59, -25.25, 1.33)
pt3dadd(-14.83, -70.55, -25.3, 1.33)
pt3dadd(-15.27, -70.99, -25.3, 1.33)
pt3dadd(-15.71, -71.65, -25.3, 1.33)
pt3dadd(-16.16, -72.46, -25.3, 1.33)
pt3dadd(-16.16, -73.72, -25.15, 1.33)
pt3dadd(-16.3, -74.9, -24.95, 1.33)
pt3dadd(-16.53, -76, -24.9, 1.33)
pt3dadd(-16.67, -76.89, -24.85, 1.33)
pt3dadd(-16.67, -77.99, -24.85, 1.33)
pt3dadd(-16.75, -78.8, -24.8, 1.33)
pt3dadd(-16.9, -79.91, -24.8, 1.33)
pt3dadd(-16.97, -80.87, -24.8, 1.33)
pt3dadd(-17.19, -81.75, -24.8, 1.33)
pt3dadd(-17.78, -82.79, -24.8, 1.33)
pt3dadd(-18.37, -83.75, -24.4, 1.48)
pt3dadd(-18.89, -84.7, -24.35, 1.48)
pt3dadd(-19.41, -85.74, -24.35, 1.48)
pt3dadd(-19.85, -86.84, -24.3, 1.48)
pt3dadd(-20.81, -87.43, -24.4, 1.48)
pt3dadd(-21.77, -87.88, -24.5, 1.48)
pt3dadd(-22.59, -88.24, -24.6, 1.48)
pt3dadd(-23.4, -88.32, -24.65, 1.48)
pt3dadd(-24.51, -88.61, -24.65, 1.48)
pt3dadd(-25.25, -89.06, -24.7, 1.48)
pt3dadd(-25.76, -89.2, -22.5, 1.48)
pt3dadd(-26.95, -89.42, -22.45, 1.48)
pt3dadd(-28.06, -89.79, -22.4, 1.48)
pt3dadd(-28.79, -90.97, -22.4, 1.48)
pt3dadd(-29.31, -92.3, -22.4, 1.48)
pt3dadd(-29.68, -93.26, -22.35, 1.48)
pt3dadd(-30.12, -94.29, -22.35, 1.11)
pt3dadd(-30.57, -94.96, -22.35, 1.11)
pt3dadd(-31.16, -95.47, -22.35, 1.11)
pt3dadd(-31.75, -96.43, -22.35, 1.11)
pt3dadd(-32.49, -97.09, -22.85, 1.11)
pt3dadd(-33.01, -97.83, -23.05, 1.11)
pt3dadd(-33.82, -98.27, -23.15, 1.11)
pt3dadd(-34.78, -98.94, -21.8, 0.96)
pt3dadd(-35, -99.82, -21.75, 0.96)
pt3dadd(-35.08, -100.34, -21.7, 0.96)
pt3dadd(-35.38, -100.7, -19.85, 0.96)
pt3dadd(-35.9, -100.63, -19.7, 0.96)
pt3dadd(-36.86, -100.55, -18.9, 1.63)
pt3dadd(-37.6, -100.77, -17.4, 1.33)
pt3dadd(-38.41, -100.92, -17.4, 1.33)
pt3dadd(-39.44, -101.29, -17.35, 1.33)
pt3dadd(-40.11, -101.88, -17.35, 1.33)
pt3dadd(-40.85, -102.54, -16.2, 1.18)
pt3dadd(-41.66, -103.06, -16.1, 1.11)
pt3dadd(-42.33, -103.65, -15.65, 1.11)
pt3dadd(-43.06, -104.24, -15.6, 1.11)
pt3dadd(-43.36, -105.42, -15.55, 1.11)
pt3dadd(-43.58, -106.6, -15.55, 1.11)
pt3dadd(-44.03, -107.34, -15.55, 1.11)
pt3dadd(-44.76, -108.15, -15.55, 1.11)
pt3dadd(-45.28, -108.89, -17.2, 1.11)
pt3dadd(-46.09, -109.4, -17.4, 1.11)
pt3dadd(-46.69, -110.29, -17.5, 1.11)
pt3dadd(-47.06, -111.1, -17.55, 1.11)
pt3dadd(-47.28, -112.2, -17.65, 1.11)
pt3dadd(-47.35, -113.09, -17.65, 1.11)
pt3dadd(-47.87, -113.68, -17.7, 1.11)
pt3dadd(-48.46, -114.12, -17.7, 1.11)
pt3dadd(-49.05, -114.64, -17.7, 1.11)
pt3dadd(-49.86, -115.01, -17.7, 1.11)
pt3dadd(-50.46, -115.6, -17.7, 1.11)
pt3dadd(-50.97, -116.33, -17.75, 1.11)
pt3dadd(-51.79, -116.85, -17.75, 0.96)
pt3dadd(-52.6, -117.07, -17.75, 0.96)
pt3dadd(-53.04, -117.51, -17.75, 0.96)
pt3dadd(-53.63, -117.96, -17.75, 0.96)
pt3dadd(-54.3, -118.1, -18, 0.96)
pt3dadd(-55.11, -118.4, -18.1, 0.96)
pt3dadd(-55.7, -118.62, -17.85, 0.96)
pt3dadd(-56.29, -119.36, -18.15, 0.96)
pt3dadd(-56.96, -119.73, -18.6, 0.96)
pt3dadd(-57.99, -120.24, -19, 0.96)
pt3dadd(-58.88, -120.61, -19.1, 0.96)
pt3dadd(-59.92, -121.05, -19.2, 1.18)
pt3dadd(-60.8, -120.54, -19.2, 1.18)
pt3dadd(-61.62, -120.32, -19.2, 1.18)
pt3dadd(-62.87, -119.95, -19.25, 1.18)
pt3dadd(-64.05, -119.95, -20, 1.11)
pt3dadd(-64.94, -120.1, -20.05, 1.11)
pt3dadd(-66.27, -120.1, -19.05, 1.18)
pt3dadd(-67.31, -120.61, -19.2, 1.18)
pt3dadd(-68.05, -121.05, -19.3, 1.18)
pt3dadd(-68.71, -121.57, -19.35, 1.18)
pt3dadd(-69.23, -122.01, -20.55, 1.18)
pt3dadd(-69.82, -122.31, -19.7, 0.96)
pt3dadd(-70.63, -122.68, -19.6, 0.96)
pt3dadd(-71.15, -122.53, -17.5, 0.96)
pt3dadd(-71.82, -122.6, -17.35, 0.96)
pt3dadd(-72.63, -122.46, -17.25, 0.96)
pt3dadd(-73.29, -122.68, -16.45, 0.96)
pt3dadd(-74.18, -123.27, -16.2, 0.96)
pt3dadd(-74.99, -123.78, -16.05, 0.96)
}
}
proc shape3d_18() {
dend[70] { pt3dadd(-75.81, -124.15, -15.95, 0.96)
pt3dadd(-76.99, -124.37, -15.95, 0.96)
pt3dadd(-77.8, -124.74, -15.6, 0.96)
pt3dadd(-78.47, -125.55, -15.5, 0.96)
pt3dadd(-79.28, -126.07, -15.45, 0.96)
pt3dadd(-79.8, -126.59, -15.45, 0.96)
pt3dadd(-80.39, -126.66, -14, 0.96)
pt3dadd(-80.98, -126.73, -13.8, 0.96)
pt3dadd(-81.87, -126.95, -13.75, 0.96)
pt3dadd(-82.24, -127.69, -13.65, 0.96)
pt3dadd(-82.98, -127.77, -13.55, 0.96)
pt3dadd(-83.6, -128.07, -11.55, 0.96)
pt3dadd(-84.26, -128.89, -11.4, 0.81)
pt3dadd(-84.93, -129.48, -11.4, 0.81)
pt3dadd(-85.23, -130.21, -11.4, 0.81)
pt3dadd(-85.08, -131.1, -13.05, 0.81)
pt3dadd(-86.04, -131.1, -13.15, 0.81)
pt3dadd(-87, -131.1, -13.15, 0.81)
pt3dadd(-86.93, -131.61, -13.2, 0.59)
pt3dadd(-87.44, -132.43, -14.05, 0.59)
}
dend[71] {pt3dclear()
pt3dadd(3.27, -44.74, -27.85, 1.33)
pt3dadd(4.27, -45.28, -32.9, 1.33)
pt3dadd(4.34, -46.24, -32.95, 1.33)
pt3dadd(4.49, -47.12, -33, 1.33)
pt3dadd(4.2, -48.16, -33, 1.33)
pt3dadd(2.94, -48.6, -33, 1.33)
pt3dadd(2.79, -49.48, -33, 1.33)
pt3dadd(3.46, -50.29, -33, 1.33)
pt3dadd(4.2, -51.03, -33.45, 1.33)
pt3dadd(4.86, -52.14, -31.9, 1.11)
pt3dadd(4.93, -53.17, -31.8, 1.11)
pt3dadd(5.23, -54.79, -31.7, 1.11)
pt3dadd(5.23, -55.97, -31.7, 1.11)
pt3dadd(5.53, -57.23, -33.25, 1.03)
pt3dadd(5.82, -58.26, -33.45, 0.96)
pt3dadd(6.41, -59.22, -33.45, 0.96)
pt3dadd(7.08, -60.18, -34.1, 0.96)
pt3dadd(7.74, -60.99, -34.15, 0.96)
pt3dadd(8.41, -61.65, -33.5, 1.26)
pt3dadd(9.37, -61.95, -33.5, 1.26)
pt3dadd(10.33, -62.83, -33.45, 1.26)
pt3dadd(11.59, -63.27, -33.45, 1.26)
pt3dadd(12.33, -63.94, -33.45, 1.26)
pt3dadd(12.84, -64.9, -33.45, 1.26)
pt3dadd(13.06, -65.71, -34.45, 1.26)
pt3dadd(13.29, -66.96, -34.5, 1.26)
pt3dadd(13.06, -67.99, -34.55, 1.26)
pt3dadd(12.92, -68.95, -34.55, 1.26)
pt3dadd(12.84, -70.06, -33.35, 1.26)
pt3dadd(12.77, -70.87, -33.1, 1.26)
pt3dadd(13.14, -71.75, -33.05, 1.26)
pt3dadd(13.43, -73.01, -33, 1.26)
pt3dadd(14.25, -73.82, -33, 1.26)
pt3dadd(14.76, -74.78, -32.95, 1.26)
pt3dadd(15.5, -75.44, -32.95, 1.26)
pt3dadd(15.73, -75.96, -32.95, 1.11)
pt3dadd(16.24, -76.47, -32.95, 1.11)
pt3dadd(16.32, -77.58, -32.95, 1.11)
pt3dadd(16.1, -78.54, -32.95, 1.11)
pt3dadd(15.87, -79.39, -32.3, 1.11)
pt3dadd(15.87, -80.57, -32.2, 1.11)
pt3dadd(16.01, -81.9, -31.95, 1.11)
pt3dadd(16.53, -82.41, -33.4, 1.03)
pt3dadd(16.9, -83.45, -33.65, 1.03)
pt3dadd(17.27, -84.26, -33.75, 1.03)
pt3dadd(17.71, -84.77, -33.8, 1.03)
pt3dadd(18.67, -86.1, -33.85, 1.03)
pt3dadd(19.19, -86.47, -34.95, 1.03)
pt3dadd(20.23, -87.35, -34.95, 1.03)
pt3dadd(20.6, -88.31, -34.95, 1.03)
pt3dadd(21.26, -89.12, -34.95, 1.03)
pt3dadd(21.56, -89.86, -33.95, 1.03)
pt3dadd(21.93, -91.41, -33.85, 1.03)
pt3dadd(21.63, -92.44, -33.85, 1.03)
pt3dadd(22.52, -93.11, -36.95, 1.03)
pt3dadd(23.26, -93.55, -37.05, 1.03)
pt3dadd(24, -94.14, -37.1, 1.03)
pt3dadd(24.73, -94.8, -37.15, 1.03)
pt3dadd(24.96, -95.39, -37.15, 1.03)
pt3dadd(24.88, -96.06, -37.2, 1.03)
pt3dadd(24.59, -96.87, -38.5, 1.03)
pt3dadd(24.14, -97.97, -38.6, 1.03)
pt3dadd(24.81, -98.79, -39.9, 1.18)
pt3dadd(25.33, -99.52, -39.95, 1.18)
pt3dadd(25.99, -100.41, -39.95, 1.18)
pt3dadd(26.73, -101.15, -39.95, 1.18)
pt3dadd(27.62, -101.88, -41.5, 1.18)
pt3dadd(28.43, -102.62, -41.6, 1.18)
pt3dadd(28.95, -103.51, -41.6, 1.18)
pt3dadd(29.46, -104.61, -41.6, 1.18)
pt3dadd(29.83, -105.42, -41.6, 1.18)
pt3dadd(29.98, -106.6, -41.6, 1.18)
pt3dadd(30.2, -107.49, -41.6, 1.18)
pt3dadd(30.8, -108.67, -41.6, 1.18)
pt3dadd(31.31, -109.26, -41.6, 1.18)
pt3dadd(31.46, -110.22, -43.6, 1.18)
pt3dadd(31.53, -111.03, -43.65, 1.18)
pt3dadd(31.61, -112.13, -43.65, 1.18)
pt3dadd(31.27, -112.68, -44.3, 1.18)
pt3dadd(31.19, -113.49, -44.45, 1.18)
pt3dadd(31.49, -114.38, -44.5, 1.18)
pt3dadd(31.63, -115.48, -44.5, 1.18)
pt3dadd(32.3, -116.44, -44.5, 1.18)
pt3dadd(32.82, -117.25, -44.5, 1.18)
pt3dadd(33.19, -117.99, -44.5, 1.18)
pt3dadd(33.56, -118.51, -44.5, 1.18)
pt3dadd(33.93, -119.24, -44.5, 1.18)
pt3dadd(34.15, -120.2, -44.55, 1.18)
pt3dadd(34.37, -120.94, -44.15, 1.18)
pt3dadd(34.67, -121.75, -44, 1.18)
pt3dadd(35.11, -122.49, -43.95, 1.18)
pt3dadd(35.55, -123.22, -43.9, 1.18)
pt3dadd(35.48, -124.18, -43.85, 1.18)
pt3dadd(35.48, -125.22, -43.8, 1.18)
pt3dadd(35.92, -125.73, -47.65, 1.03)
pt3dadd(36.51, -126.69, -47.7, 1.03)
pt3dadd(36.66, -127.35, -47.75, 1.03)
pt3dadd(36.73, -128.46, -47.75, 1.03)
pt3dadd(36.37, -129.57, -47.75, 1.03)
pt3dadd(36.73, -130.38, -47.75, 1.03)
pt3dadd(37.33, -131.12, -47.75, 1.03)
pt3dadd(38.07, -131.85, -47.8, 1.03)
pt3dadd(38.66, -132.37, -47.8, 1.03)
pt3dadd(39.76, -132.96, -48.3, 1.03)
pt3dadd(40.43, -133.48, -48.3, 1.03)
pt3dadd(41.1, -134.29, -48.3, 1.03)
pt3dadd(41.32, -134.95, -48.35, 1.03)
pt3dadd(41.32, -136.2, -48.35, 1.03)
pt3dadd(41.46, -137.31, -48.35, 1.03)
pt3dadd(40.95, -138.12, -48.35, 1.03)
pt3dadd(41.54, -138.79, -48.35, 1.03)
pt3dadd(42.13, -139.3, -48.35, 1.03)
pt3dadd(42.35, -140.26, -48.35, 1.03)
pt3dadd(42.72, -140.63, -49.8, 1.03)
pt3dadd(43.02, -141.22, -49.85, 1.03)
pt3dadd(43.31, -142.25, -49.85, 1.03)
pt3dadd(43.24, -143.28, -49.85, 1.03)
pt3dadd(42.57, -143.95, -49.85, 1.03)
pt3dadd(42.06, -144.83, -49.85, 1.03)
pt3dadd(41.39, -145.42, -49.85, 1.03)
pt3dadd(41.46, -146.23, -49.85, 1.03)
pt3dadd(41.12, -146.46, -51.5, 1.03)
pt3dadd(41.27, -147.34, -51.55, 1.03)
pt3dadd(41.27, -148.3, -51.55, 1.03)
pt3dadd(41.49, -149.19, -51.55, 1.03)
pt3dadd(41.42, -149.85, -51.55, 1.03)
pt3dadd(40.97, -150.44, -51.55, 1.03)
pt3dadd(40.83, -150.96, -52.2, 1.03)
pt3dadd(40.97, -152.06, -52.25, 1.03)
pt3dadd(40.9, -153.24, -52.25, 1.03)
pt3dadd(41.79, -152.87, -53.25, 1.03)
pt3dadd(42.6, -152.43, -53.4, 1.03)
pt3dadd(43.34, -152.14, -55.5, 1.03)
pt3dadd(43.93, -152.21, -55.55, 1.03)
pt3dadd(44.89, -152.65, -55.55, 1.03)
pt3dadd(45.26, -153.32, -57.55, 1.03)
pt3dadd(45.04, -154.35, -57.6, 1.03)
pt3dadd(45.04, -154.86, -57.6, 1.03)
pt3dadd(45.85, -155.23, -63.45, 0.89)
pt3dadd(46.67, -155.68, -63.55, 0.89)
pt3dadd(46.59, -156.71, -63.75, 0.89)
pt3dadd(46.44, -157.37, -66.15, 0.89)
pt3dadd(46.37, -158.11, -66.2, 0.89)
pt3dadd(46.22, -158.77, -66.2, 0.89)
pt3dadd(46.52, -159.58, -66.2, 0.89)
pt3dadd(46.89, -160.03, -66.2, 0.89)
pt3dadd(46.52, -160.99, -66.2, 0.89)
pt3dadd(46.96, -161.65, -67.4, 0.89)
pt3dadd(47.26, -162.68, -67.45, 0.89)
pt3dadd(47.63, -163.49, -67.45, 0.89)
pt3dadd(48.14, -164.45, -67.45, 1.03)
pt3dadd(48.22, -165.19, -67.45, 1.03)
pt3dadd(48.44, -166.07, -67.45, 1.03)
pt3dadd(48.73, -166.66, -67.45, 1.03)
pt3dadd(49.18, -167.62, -68.05, 1.03)
pt3dadd(49.47, -168.66, -68.1, 1.03)
pt3dadd(49.47, -169.25, -66.85, 1.03)
pt3dadd(50.14, -170.2, -66.7, 1.03)
pt3dadd(49.84, -171.24, -66.6, 1.03)
pt3dadd(49.4, -171.61, -66.55, 1.03)
pt3dadd(48.88, -172.27, -66.5, 1.03)
pt3dadd(48, -172.56, -66.5, 1.03)
}
dend[72] {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(7.32, -27.76, -29.15, 1.55)
pt3dadd(7.32, -28.94, -29.1, 1.55)
pt3dadd(7.02, -29.75, -29.05, 1.55)
pt3dadd(7.17, -30.79, -29.05, 1.55)
pt3dadd(6.95, -31.97, -29.05, 1.55)
pt3dadd(6.8, -32.7, -29.05, 1.55)
pt3dadd(6.36, -33.66, -29.05, 1.55)
pt3dadd(6.13, -34.33, -29.05, 1.55)
pt3dadd(5.54, -35.43, -29, 1.55)
pt3dadd(5.03, -35.87, -29, 1.55)
pt3dadd(4.36, -36.83, -29, 1.55)
pt3dadd(3.77, -37.79, -29, 1.55)
pt3dadd(3.1, -38.38, -29, 1.55)
pt3dadd(2.74, -39.27, -29, 1.7)
pt3dadd(2.44, -40, -29, 1.7)
pt3dadd(2.96, -40.82, -29, 1.7)
pt3dadd(3.1, -41.7, -29, 1.7)
}
}
proc shape3d_19() {
dend[72] { pt3dadd(3.03, -42.81, -29, 1.7)
pt3dadd(3.1, -43.99, -29, 1.7)
pt3dadd(2.37, -45.02, -29, 1.7)
pt3dadd(1.92, -45.02, -31.95, 1.55)
pt3dadd(0.89, -45.39, -32.15, 1.55)
pt3dadd(-0.07, -45.9, -32.3, 1.55)
pt3dadd(-0.89, -46.27, -32.65, 1.55)
pt3dadd(-1.77, -46.64, -32.75, 1.55)
pt3dadd(-2.44, -47.16, -33.2, 1.55)
pt3dadd(-3.18, -47.67, -33.4, 1.55)
pt3dadd(-3.77, -48.04, -35.1, 1.55)
pt3dadd(-4.36, -47.9, -35.35, 1.4)
pt3dadd(-5.47, -48.19, -35.4, 1.4)
pt3dadd(-5.91, -48.78, -35.4, 1.4)
pt3dadd(-6.43, -49.37, -35.4, 1.4)
pt3dadd(-6.73, -50.11, -35, 1.4)
pt3dadd(-7.02, -50.85, -34.9, 1.4)
pt3dadd(-7.17, -51.88, -34.8, 1.4)
pt3dadd(-6.8, -52.69, -34.75, 1.4)
pt3dadd(-6.21, -53.28, -34.7, 1.4)
pt3dadd(-5.54, -54.02, -34.7, 1.4)
pt3dadd(-5.1, -54.68, -34.7, 1.4)
}
dend[73] {pt3dclear()
pt3dadd(-5.1, -54.68, -34.7, 0.96)
pt3dadd(-4.73, -56.16, -43.35, 0.96)
pt3dadd(-5.03, -57.26, -43.4, 0.96)
pt3dadd(-5.39, -57.85, -43.45, 0.96)
pt3dadd(-5.76, -58.81, -43.45, 0.96)
pt3dadd(-6.36, -59.4, -43.45, 0.96)
pt3dadd(-6.87, -60.14, -43.45, 0.96)
pt3dadd(-6.95, -61.24, -44.2, 0.96)
pt3dadd(-7.01, -61.98, -43.1, 1.03)
pt3dadd(-7.3, -63.01, -42.9, 1.03)
pt3dadd(-7.67, -63.82, -42.8, 1.03)
pt3dadd(-7.97, -64.71, -42.75, 1.03)
pt3dadd(-8.41, -65.96, -42.7, 1.03)
pt3dadd(-8.78, -66.63, -42.7, 1.03)
pt3dadd(-9.08, -67.36, -42.65, 1.03)
pt3dadd(-8.78, -68.54, -42.65, 1.03)
pt3dadd(-8.41, -69.13, -42.65, 1.03)
pt3dadd(-7.82, -69.87, -42.65, 1.03)
pt3dadd(-7.3, -70.68, -42.65, 1.03)
pt3dadd(-6.49, -71.27, -42.65, 1.03)
pt3dadd(-5.83, -71.93, -46.45, 1.03)
pt3dadd(-5.38, -72.82, -46.75, 1.03)
pt3dadd(-5.75, -73.63, -47, 1.03)
pt3dadd(-6.05, -74.88, -47.25, 1.03)
pt3dadd(-6.71, -75.4, -47.35, 1.03)
pt3dadd(-7.38, -75.92, -47.45, 1.03)
pt3dadd(-8.19, -76.06, -47.6, 1.03)
pt3dadd(-8.86, -76.43, -48.15, 1.03)
pt3dadd(-9.45, -76.58, -48.35, 1.03)
pt3dadd(-10.33, -76.65, -48.45, 1.03)
pt3dadd(-10.93, -76.95, -48.5, 1.03)
pt3dadd(-11.3, -77.69, -50.65, 1.03)
pt3dadd(-10.7, -78.42, -50.75, 1.03)
pt3dadd(-10.26, -78.87, -50.95, 1.03)
pt3dadd(-9.45, -79.31, -51.15, 1.03)
pt3dadd(-8.78, -79.9, -51.4, 1.03)
pt3dadd(-8.34, -80.42, -51.6, 1.03)
pt3dadd(-7.97, -80.86, -51.7, 1.03)
pt3dadd(-7.23, -81.6, -52.6, 1.03)
pt3dadd(-6.57, -82.48, -52.65, 1.03)
pt3dadd(-6.2, -83.51, -52.75, 1.03)
pt3dadd(-5.83, -84.18, -52.8, 1.03)
pt3dadd(-5.6, -84.91, -53.7, 1.03)
pt3dadd(-4.94, -85.73, -53.8, 1.03)
pt3dadd(-4.64, -86.61, -53.8, 1.03)
pt3dadd(-4.64, -87.64, -53.8, 1.03)
pt3dadd(-4.42, -88.45, -53.8, 1.03)
pt3dadd(-4.13, -89.27, -53.85, 1.03)
pt3dadd(-3.83, -90.37, -53.85, 1.03)
pt3dadd(-3.46, -91.26, -54.65, 1.03)
pt3dadd(-3.02, -92.29, -54.75, 1.03)
pt3dadd(-3.17, -92.95, -54.75, 1.03)
pt3dadd(-3.39, -94.13, -54.75, 1.03)
pt3dadd(-3.53, -94.8, -54.75, 1.03)
pt3dadd(-3.68, -95.68, -54.75, 1.03)
pt3dadd(-3.76, -96.06, -55.1, 1.03)
pt3dadd(-4.2, -96.57, -55.2, 1.03)
pt3dadd(-4.94, -97.02, -55.25, 1.03)
pt3dadd(-5.68, -97.46, -55.25, 1.03)
pt3dadd(-5.31, -98.12, -55.95, 1.03)
pt3dadd(-5.31, -99.38, -56.2, 1.03)
pt3dadd(-5.83, -100.48, -56.2, 1.03)
pt3dadd(-6.64, -100.93, -56.25, 1.03)
pt3dadd(-7.6, -101.22, -56.25, 1.03)
pt3dadd(-8.49, -101.81, -56.25, 1.03)
pt3dadd(-9.16, -102.47, -56.25, 1.03)
pt3dadd(-9.75, -103.51, -56.25, 1.03)
pt3dadd(-10.19, -104.32, -56.25, 1.03)
pt3dadd(-10.34, -105.42, -56.25, 1.03)
pt3dadd(-10.49, -106.31, -56.25, 1.03)
pt3dadd(-10.56, -107.19, -56.25, 1.03)
pt3dadd(-10.71, -108.08, -56.25, 1.03)
pt3dadd(-10.86, -108.96, -56.25, 1.03)
pt3dadd(-11.15, -109.55, -56.25, 1.03)
pt3dadd(-11.52, -110.44, -56.25, 1.03)
pt3dadd(-11.96, -111.47, -56.25, 1.03)
pt3dadd(-11.89, -112.06, -56.25, 1.03)
pt3dadd(-11.59, -112.72, -56.25, 1.03)
pt3dadd(-11.96, -113.46, -56.25, 1.03)
pt3dadd(-11.96, -114.72, -56.25, 1.03)
pt3dadd(-12.48, -115.45, -56.25, 1.03)
pt3dadd(-12.93, -116.26, -56.25, 1.03)
pt3dadd(-13.59, -116.85, -56.25, 1.03)
pt3dadd(-13.07, -117.67, -57.9, 1.03)
pt3dadd(-13.96, -118.92, -57.75, 1.03)
pt3dadd(-14.48, -120.17, -57.65, 1.03)
pt3dadd(-15.59, -120.54, -57.6, 1.03)
pt3dadd(-16.25, -121.72, -57.55, 1.03)
pt3dadd(-16.92, -122.68, -57.55, 1.03)
pt3dadd(-17.43, -123.64, -57.55, 1.03)
pt3dadd(-17.8, -124.45, -57.5, 1.03)
pt3dadd(-18.25, -125.48, -57.5, 1.03)
pt3dadd(-18.69, -126.44, -57.5, 1.03)
}
dend[74] {pt3dclear()
pt3dadd(-5.1, -54.68, -34.7, 0.89)
pt3dadd(-5.6, -55.18, -44.85, 0.89)
pt3dadd(-6.19, -55.47, -44.6, 0.89)
pt3dadd(-7, -56.14, -44.5, 0.89)
pt3dadd(-7.6, -56.58, -44.4, 0.89)
pt3dadd(-8.19, -57.17, -44.3, 0.89)
pt3dadd(-8.56, -57.54, -44.3, 0.89)
pt3dadd(-8.78, -58.2, -44.25, 0.89)
pt3dadd(-9.22, -58.87, -44.2, 0.89)
pt3dadd(-10.03, -59.9, -44.15, 0.89)
pt3dadd(-10.63, -60.27, -44, 0.89)
pt3dadd(-11, -60.49, -44.2, 0.89)
pt3dadd(-11.73, -60.71, -44.3, 0.89)
pt3dadd(-12.62, -61.08, -44.35, 0.89)
pt3dadd(-13.36, -61.59, -44.4, 0.89)
pt3dadd(-13.95, -62.41, -44.45, 0.89)
pt3dadd(-13.8, -63.29, -48.3, 1.11)
pt3dadd(-13.95, -64.03, -48.3, 1.11)
pt3dadd(-14.25, -64.77, -48.3, 1.11)
pt3dadd(-15.06, -65.28, -48.3, 1.11)
pt3dadd(-15.58, -65.65, -48.3, 1.11)
pt3dadd(-16.17, -66.24, -48.3, 1.11)
pt3dadd(-16.98, -66.83, -49.7, 1.11)
pt3dadd(-17.57, -67.42, -49.9, 1.11)
pt3dadd(-18.16, -67.72, -50.1, 1.11)
pt3dadd(-19.13, -68.23, -50.3, 1.11)
pt3dadd(-19.57, -67.86, -50.5, 1.11)
pt3dadd(-20.68, -67.27, -50.6, 1.11)
pt3dadd(-20.97, -68.23, -52.9, 1.03)
pt3dadd(-21.12, -68.82, -52.9, 1.03)
pt3dadd(-21.42, -69.71, -53, 1.03)
pt3dadd(-21.71, -70.52, -53.05, 1.03)
pt3dadd(-22.01, -71.62, -57.45, 1.03)
pt3dadd(-22.89, -72.21, -57.5, 1.03)
pt3dadd(-23.41, -73.1, -57.5, 1.03)
pt3dadd(-23.86, -73.32, -57.7, 1.03)
pt3dadd(-24.59, -73.62, -58.2, 1.03)
pt3dadd(-25.33, -73.76, -58.65, 1.03)
pt3dadd(-26.37, -73.91, -59.15, 1.03)
pt3dadd(-27.11, -73.91, -59.6, 1.03)
pt3dadd(-27.62, -74.28, -59.9, 1.03)
pt3dadd(-27.7, -75.68, -61.4, 1.03)
pt3dadd(-28.22, -76.42, -61.35, 1.03)
pt3dadd(-27.99, -77.75, -61.35, 1.03)
pt3dadd(-28.36, -78.63, -61.35, 1.03)
pt3dadd(-29.25, -78.63, -61.3, 1.03)
pt3dadd(-30.06, -78.78, -61.25, 1.03)
pt3dadd(-30.58, -79.37, -61.25, 1.03)
pt3dadd(-31.1, -80.47, -61.25, 1.03)
pt3dadd(-30.95, -81.21, -61.25, 1.03)
pt3dadd(-31.02, -82.39, -61.25, 1.03)
pt3dadd(-30.65, -83.35, -61.25, 1.03)
pt3dadd(-30.36, -83.94, -61.25, 1.03)
pt3dadd(-29.99, -84.68, -61.25, 1.03)
pt3dadd(-29.92, -85.93, -68.55, 1.03)
pt3dadd(-30.14, -86.89, -68.6, 1.03)
pt3dadd(-30.8, -87.04, -68.6, 1.03)
pt3dadd(-31.54, -87.78, -68.6, 1.03)
pt3dadd(-32.28, -88.66, -68.6, 1.03)
pt3dadd(-32.38, -89.61, -67.2, 1.03)
pt3dadd(-32.68, -90.28, -66.95, 1.03)
pt3dadd(-33.12, -90.87, -66.8, 1.03)
pt3dadd(-33.56, -91.9, -66.65, 1.03)
pt3dadd(-34.08, -92.49, -66.55, 1.03)
pt3dadd(-34.53, -93.23, -66.4, 1.03)
pt3dadd(-35.12, -93.74, -66, 1.03)
pt3dadd(-35.63, -93.96, -65.65, 1.03)
pt3dadd(-35.93, -94.77, -65.6, 1.03)
pt3dadd(-36.08, -95.58, -67.45, 1.03)
pt3dadd(-35.86, -96.4, -67.55, 1.03)
pt3dadd(-35.78, -97.58, -67.55, 1.03)
pt3dadd(-37.11, -98.09, -67.6, 1.03)
pt3dadd(-38.07, -98.46, -70.15, 0.89)
pt3dadd(-38.44, -99.42, -70.2, 0.89)
pt3dadd(-38.89, -100.16, -70.2, 0.89)
pt3dadd(-39.48, -101.12, -70.25, 0.89)
pt3dadd(-39.92, -101.85, -70.25, 0.89)
pt3dadd(-40.36, -102.66, -70.25, 0.89)
pt3dadd(-41.03, -103.33, -70.25, 0.89)
pt3dadd(-41.55, -103.48, -70.25, 0.89)
pt3dadd(-41.77, -103.55, -70.65, 0.89)
pt3dadd(-42.21, -103.92, -71.65, 0.89)
pt3dadd(-43.03, -103.92, -71.85, 0.89)
pt3dadd(-44.13, -104.21, -72.2, 0.89)
pt3dadd(-45.02, -103.99, -72.25, 0.89)
}
}
proc shape3d_20() {
dend[74] { pt3dadd(-45.17, -104.95, -74.25, 0.89)
pt3dadd(-45.61, -105.76, -74.35, 0.89)
pt3dadd(-45.91, -106.57, -74.4, 0.89)
pt3dadd(-45.17, -107.24, -76, 1.18)
pt3dadd(-44.5, -107.9, -76, 1.18)
pt3dadd(-44.65, -108.64, -76, 1.18)
pt3dadd(-44.5, -109.52, -76.25, 1.18)
pt3dadd(-44.87, -110.48, -76.5, 1.18)
pt3dadd(-45.17, -111.37, -76.55, 1.18)
pt3dadd(-45.54, -112.1, -76.55, 1.18)
pt3dadd(-45.98, -112.4, -76.55, 1.18)
pt3dadd(-46.65, -112.84, -76.55, 1.18)
pt3dadd(-46.94, -113.28, -78.8, 1.18)
pt3dadd(-47.68, -114.24, -78.8, 1.18)
pt3dadd(-48.86, -114.98, -78.8, 1.18)
pt3dadd(-49.6, -114.46, -78.8, 1.18)
pt3dadd(-50.19, -114.61, -78.8, 1.18)
pt3dadd(-51.3, -115.13, -78.8, 1.18)
pt3dadd(-51.97, -115.2, -78.8, 1.18)
}
apic {pt3dclear()
pt3dstyle(1, 2.68109, -16.9336, 0.368589)
pt3dadd(5.46, -1.09, 0, 10.57)
pt3dadd(5.17, 0.53, 0.05, 9.98)
pt3dadd(5.02, 2.89, 0, 8.8)
pt3dadd(4.72, 5.03, 0.05, 8.5)
pt3dadd(4.72, 7.54, 0.05, 8.28)
pt3dadd(4.5, 9.97, -3.25, 8.2)
pt3dadd(4.28, 12.77, -3.35, 8.2)
pt3dadd(4.06, 14.32, -3.4, 8.65)
pt3dadd(4.2, 16.68, -3.4, 8.65)
}
apic[1] {pt3dclear()
pt3dadd(4.2, 16.68, -3.4, 7.24)
pt3dadd(3.32, 18.38, -3.4, 7.24)
pt3dadd(2.36, 20.52, -3.4, 7.24)
}
apic[2] {pt3dclear()
pt3dadd(2.36, 20.52, -3.4, 6.36)
pt3dadd(1.84, 23.62, -5.25, 6.36)
pt3dadd(1.69, 26.12, -5.25, 5.76)
pt3dadd(1.17, 29.15, -5.3, 5.62)
pt3dadd(0.14, 31.36, -5.3, 5.62)
pt3dadd(-0.45, 32.83, -5.3, 5.62)
pt3dadd(-1.12, 34.31, -5.3, 5.62)
pt3dadd(-1.85, 37.28, -5.3, 5.47)
pt3dadd(-2.36, 39.49, -5.3, 5.47)
pt3dadd(-3.1, 42.07, -5.3, 5.47)
pt3dadd(-4.59, 43.94, -5.3, 5.47)
}
apic[3] {pt3dclear()
pt3dadd(-4.59, 43.94, -5.3, 5.03)
pt3dadd(-6.21, 45.68, -5.3, 5.03)
pt3dadd(-7.91, 47.31, -5.3, 5.47)
pt3dadd(-9.39, 49.22, -5.3, 5.47)
pt3dadd(-10.72, 50.77, -5.3, 5.47)
pt3dadd(-11.6, 52.99, -5.3, 5.25)
pt3dadd(-12.79, 54.98, -3.1, 5.25)
pt3dadd(-13.82, 56.97, -2.95, 5.25)
pt3dadd(-14.71, 59.62, -3.3, 5.25)
pt3dadd(-15.37, 62.13, -3.6, 5.25)
pt3dadd(-15.44, 64.33, -3.6, 5.25)
pt3dadd(-15.52, 64.33, -3.6, 5.25)
}
apic[4] {pt3dclear()
pt3dadd(-15.52, 64.33, -3.6, 5.25)
pt3dadd(-15.45, 64.34, -3.7, 5.25)
}
apic[5] {pt3dclear()
pt3dadd(-4.59, 43.94, -5.3, 1.33)
pt3dadd(-4.14, 44.9, -1.6, 1.33)
pt3dadd(-3.7, 45.86, -1.55, 1.33)
pt3dadd(-3.33, 46.97, -1.45, 1.33)
pt3dadd(-3.55, 48.15, -1.2, 1.33)
pt3dadd(-4, 49.18, -1.05, 1.33)
pt3dadd(-4.22, 50.51, -0.85, 1.33)
pt3dadd(-4, 52.13, 0.1, 1.33)
pt3dadd(-4.37, 53.31, 0.45, 1.33)
pt3dadd(-3.85, 55.6, 1.7, 1.33)
pt3dadd(-3.55, 57, 2.05, 1.33)
pt3dadd(-3.04, 58.62, 3.1, 1.33)
pt3dadd(-2.15, 59.28, 3.4, 1.33)
pt3dadd(-1.41, 60.39, 4.15, 1.33)
pt3dadd(-0.6, 61.72, 4.85, 1.33)
pt3dadd(0.22, 62.75, 4.85, 1.33)
pt3dadd(1.1, 63.04, 5.1, 1.33)
pt3dadd(1.92, 62.31, 6.45, 1.26)
pt3dadd(2.95, 61.72, 6.45, 1.26)
pt3dadd(3.99, 62.16, 8.8, 1.26)
pt3dadd(5.17, 63.04, 8.9, 1.26)
pt3dadd(6.65, 62.97, 9.2, 1.03)
pt3dadd(7.46, 63.56, 9.2, 1.03)
pt3dadd(8.42, 63.63, 9.25, 1.03)
pt3dadd(9.09, 62.75, 10.6, 1.03)
pt3dadd(9.38, 62.01, 10.7, 1.03)
pt3dadd(9.6, 61.05, 10.7, 1.03)
pt3dadd(9.83, 60.32, 10.7, 1.03)
pt3dadd(9.68, 59.21, 12.45, 0.96)
pt3dadd(10.56, 60.02, 12.45, 0.96)
pt3dadd(11.16, 61.05, 13.7, 0.96)
pt3dadd(11.6, 61.79, 13.8, 0.96)
pt3dadd(12.63, 62.45, 15.25, 0.96)
pt3dadd(13.37, 63.12, 15.3, 0.96)
pt3dadd(14.78, 62.6, 15.35, 0.96)
}
apic[6] {pt3dclear()
pt3dadd(2.36, 20.52, -3.4, 1.11)
pt3dadd(1.19, 21.12, -3.55, 1.11)
pt3dadd(0.22, 21.19, -1.4, 1.11)
pt3dadd(-0.74, 21.56, -1.2, 1.11)
pt3dadd(-1.84, 21.71, -0.95, 1.11)
pt3dadd(-2.73, 21.63, -0.85, 1.11)
pt3dadd(-3.84, 21.78, -0.8, 1.11)
pt3dadd(-4.8, 21.85, 0.05, 1.11)
pt3dadd(-5.84, 22.15, 0.1, 1.11)
pt3dadd(-6.5, 22.44, -0.2, 1.11)
pt3dadd(-7.31, 22.96, -0.5, 1.11)
pt3dadd(-8.35, 22.96, -0.8, 1.11)
pt3dadd(-9.38, 22.52, -2.8, 1.11)
pt3dadd(-10.34, 22.37, 1.45, 1.11)
pt3dadd(-10.49, 23.18, 1.65, 1.11)
pt3dadd(-9.97, 24.36, 2.9, 1.11)
pt3dadd(-10.2, 25.17, 3.05, 1.11)
pt3dadd(-10.49, 25.76, 3.25, 1.11)
pt3dadd(-11.01, 26.2, 3.4, 1.11)
pt3dadd(-11.6, 26.65, 3.85, 1.11)
pt3dadd(-11.45, 27.75, 4.2, 1.11)
pt3dadd(-11.82, 28.42, 4.25, 1.11)
pt3dadd(-11.82, 29.52, 5.95, 1.11)
pt3dadd(-12.04, 30.41, 6.05, 1.11)
pt3dadd(-11.82, 31.37, 6.1, 1.11)
pt3dadd(-11.38, 32.4, 6.1, 1.11)
pt3dadd(-11.67, 33.36, 6.15, 1.11)
pt3dadd(-11.9, 34.61, 6.75, 1.11)
pt3dadd(-12.71, 35.13, 6.85, 1.11)
pt3dadd(-13.37, 35.64, 7, 1.11)
pt3dadd(-14.19, 36.09, 7.25, 1.11)
pt3dadd(-15.22, 36.68, 7.55, 1.11)
pt3dadd(-15.07, 37.78, 8.85, 1.11)
pt3dadd(-14.85, 38.89, 9.05, 1.11)
pt3dadd(-14.34, 39.77, 9.25, 1.11)
pt3dadd(-14.26, 40.95, 10.6, 1.11)
pt3dadd(-14.93, 42.06, 10.65, 1.11)
pt3dadd(-15.44, 42.72, 10.75, 1.11)
pt3dadd(-16.33, 42.95, 11.85, 1.11)
pt3dadd(-17.44, 43.02, 11.95, 1.11)
pt3dadd(-18.4, 43.46, 12.45, 1.11)
pt3dadd(-18.77, 44.35, 12.95, 1.11)
pt3dadd(-18.84, 45.38, 13.45, 1.11)
pt3dadd(-19.36, 46.26, 13.7, 1.11)
pt3dadd(-19.95, 47.08, 13.75, 1.11)
pt3dadd(-20.99, 47.67, 13.85, 1.11)
pt3dadd(-21.87, 47.89, 13.95, 1.11)
pt3dadd(-22.91, 47.89, 14.7, 1.11)
pt3dadd(-22.91, 48.92, 15.9, 1.11)
pt3dadd(-23.94, 49.66, 17.6, 1.11)
pt3dadd(-24.9, 49.8, 17.75, 1.11)
pt3dadd(-25.94, 50.03, 18, 1.11)
pt3dadd(-26.68, 50.47, 18.15, 1.11)
pt3dadd(-27.49, 50.84, 18.4, 1.11)
pt3dadd(-28.16, 51.35, 18.65, 1.11)
pt3dadd(-28.75, 51.72, 19.3, 1.11)
pt3dadd(-29.86, 52.39, 19.55, 1.11)
pt3dadd(-30.3, 53.05, 19.6, 1.11)
pt3dadd(-31.26, 54.08, 19.65, 1.11)
pt3dadd(-31.56, 54.75, 19.7, 1.11)
pt3dadd(-31.63, 55.78, 19.7, 1.11)
pt3dadd(-32, 56.52, 20.95, 1.11)
pt3dadd(-32.59, 57.55, 21, 1.11)
}
apic[7] {pt3dclear()
pt3dadd(4.2, 16.68, -3.4, 2.44)
pt3dadd(5.78, 17.07, -4.4, 2.44)
pt3dadd(7.48, 17.73, -4.45, 2.44)
pt3dadd(8.59, 18.03, -4.5, 2.44)
pt3dadd(9.92, 18.25, -4.5, 2.44)
pt3dadd(11.92, 18.47, -4.55, 2.44)
pt3dadd(13.32, 18.47, -4.55, 2.44)
pt3dadd(14.36, 18.47, -4.6, 2.44)
}
apic[8] {pt3dclear()
pt3dadd(14.36, 18.47, -4.6, 1.92)
pt3dadd(16.42, 18.32, -4.65, 1.92)
pt3dadd(17.53, 18.99, -4.65, 1.92)
pt3dadd(18.79, 19.94, -4.65, 1.92)
}
apic[9] {pt3dclear()
pt3dadd(18.79, 19.94, -4.65, 1.48)
pt3dadd(19.16, 21.94, -4.65, 1.48)
pt3dadd(19.6, 22.97, -4.6, 1.48)
pt3dadd(20.49, 23.93, -4.7, 1.48)
pt3dadd(21.6, 25.33, -5.05, 1.48)
pt3dadd(22.26, 26.36, -5.4, 1.48)
pt3dadd(22.56, 27.47, -5.4, 1.48)
pt3dadd(23.59, 28.87, -3.2, 1.48)
pt3dadd(24.85, 29.09, -3.05, 1.48)
pt3dadd(26.18, 29.31, -2.45, 1.48)
pt3dadd(27.88, 29.46, -2.15, 1.48)
pt3dadd(28.84, 29.38, -1.3, 1.48)
pt3dadd(29.43, 28.94, -0.95, 1.48)
pt3dadd(30.17, 29.31, -0.65, 1.48)
pt3dadd(31.21, 29.68, -0.25, 1.48)
pt3dadd(32.76, 29.75, -0.1, 1.48)
pt3dadd(34.16, 29.38, 0.1, 1.48)
pt3dadd(35.27, 29.09, 0.25, 1.48)
pt3dadd(36.16, 28.57, 0.4, 1.48)
pt3dadd(37.34, 28.94, 0.55, 1.48)
pt3dadd(38.57, 29.25, 1.3, 1.48)
pt3dadd(40.12, 29.62, 1.4, 1.48)
pt3dadd(41.9, 30.28, 2.35, 1.48)
pt3dadd(43, 31.09, 2.5, 1.48)
pt3dadd(43.89, 31.91, 4.4, 1.48)
pt3dadd(44.93, 32.79, 4.5, 1.48)
pt3dadd(46.03, 32.5, 8.05, 1.63)
pt3dadd(47.22, 32.27, 8.1, 1.63)
pt3dadd(48.55, 32.05, 8.1, 1.63)
pt3dadd(50.03, 31.83, 8.1, 1.63)
pt3dadd(51.28, 31.46, 8.1, 1.63)
pt3dadd(52.46, 31.02, 8.15, 1.63)
pt3dadd(53.57, 30.21, 8.15, 1.48)
}
}
proc shape3d_21() {
apic[9] { pt3dadd(54.09, 29.32, 8.15, 1.48)
pt3dadd(54.39, 28.37, 8.15, 1.18)
pt3dadd(54.83, 27.33, 8.15, 1.18)
pt3dadd(55.57, 26.01, 8.15, 1.18)
pt3dadd(56.97, 25.34, 8.15, 1.18)
pt3dadd(58.75, 25.12, 8.15, 1.18)
pt3dadd(60.3, 25.56, 9, 1.18)
pt3dadd(61.85, 25.42, 8.85, 1.18)
pt3dadd(62.74, 25.64, 8.45, 1.18)
pt3dadd(63.77, 25.93, 7.75, 1.18)
pt3dadd(64.81, 26.3, 7.4, 1.18)
pt3dadd(66.29, 26.45, 7.25, 1.18)
pt3dadd(67.69, 26.08, 7.15, 1.18)
pt3dadd(68.43, 26.45, 8.2, 0.89)
pt3dadd(69.39, 26.82, 8.25, 0.89)
pt3dadd(70.35, 27.11, 8.35, 1.48)
pt3dadd(71.16, 27.92, 8.35, 1.48)
pt3dadd(71.9, 28.81, 8.4, 1.48)
pt3dadd(72.79, 29.69, 8.4, 1.48)
pt3dadd(72.86, 30.73, 8.4, 1.26)
pt3dadd(72.94, 31.68, 8.4, 1.48)
pt3dadd(73.08, 32.94, 8.4, 1.48)
pt3dadd(72.86, 34.12, 8.4, 1.48)
pt3dadd(72.42, 35, 8.4, 1.48)
pt3dadd(72.49, 36.18, 9.85, 1.33)
pt3dadd(72.2, 37.51, 9.95, 1.18)
pt3dadd(72.35, 38.62, 9.95, 0.96)
pt3dadd(73.23, 39.65, 9.95, 1.18)
pt3dadd(74.05, 40.68, 10, 1.18)
pt3dadd(74.42, 42.01, 9.95, 1.18)
pt3dadd(74.93, 42.82, 10.7, 0.89)
pt3dadd(75.6, 43.78, 10.75, 0.89)
pt3dadd(76.71, 44.22, 10.8, 0.89)
pt3dadd(77.67, 44.59, 10.8, 0.89)
pt3dadd(78.78, 45.11, 10.8, 0.89)
pt3dadd(79.59, 45.77, 11.5, 0.89)
pt3dadd(80.48, 46.29, 11.7, 0.89)
pt3dadd(80.92, 46.36, 12.7, 0.3)
pt3dadd(81.73, 45.48, 12.7, 0.3)
pt3dadd(81.88, 44.59, 12.7, 0.3)
pt3dadd(82.18, 43.71, 12.7, 0.3)
pt3dadd(82.77, 42.89, 12.7, 0.3)
}
apic[10] {pt3dclear()
pt3dadd(18.79, 19.94, -4.65, 1.55)
pt3dadd(19.72, 19.44, -4.05, 1.55)
pt3dadd(20.83, 18.93, -4, 1.55)
pt3dadd(22.16, 18.26, -4, 1.4)
pt3dadd(22.75, 17.67, -3.95, 1.4)
pt3dadd(22.83, 16.57, -3.95, 1.4)
pt3dadd(22.68, 15.09, -3.95, 1.4)
pt3dadd(22.97, 13.25, -3.95, 1.4)
pt3dadd(23.71, 11.55, -3, 1.4)
pt3dadd(24.9, 10.59, -4.2, 1.4)
pt3dadd(26, 9.78, -4.65, 1.4)
pt3dadd(27.19, 9.12, -2.7, 1.55)
pt3dadd(28.37, 8.6, -2.6, 1.55)
pt3dadd(29.55, 8.6, -1.25, 1.55)
pt3dadd(30.59, 8.6, -1.15, 1.55)
pt3dadd(31.92, 8.45, -1.05, 1.55)
pt3dadd(33.54, 8.16, -0.95, 1.55)
pt3dadd(34.5, 7.49, -0.95, 1.55)
pt3dadd(35.47, 5.95, -0.9, 1.55)
pt3dadd(35.98, 4.54, -0.9, 1.55)
pt3dadd(36.13, 3.29, -0.55, 1.55)
pt3dadd(36.06, 2.18, 1.2, 1.55)
pt3dadd(36.35, 0.64, 1.25, 1.55)
pt3dadd(36.57, -1.21, 1.25, 1.55)
pt3dadd(37.17, -2.31, 2.4, 1.55)
pt3dadd(37.9, -4.12, 4.35, 1.63)
pt3dadd(39.09, -5.38, 4.35, 1.63)
pt3dadd(40.27, -6.7, 4.35, 1.63)
pt3dadd(41.9, -7.44, 4.35, 1.63)
pt3dadd(43.52, -7.74, 4.35, 1.63)
pt3dadd(45.07, -8.25, 4.35, 1.63)
pt3dadd(46.18, -8.55, 7.65, 1.26)
pt3dadd(47.44, -9.06, 8.95, 1.11)
pt3dadd(48.4, -9.8, 9.05, 1.11)
pt3dadd(49.43, -10.98, 9.05, 1.11)
pt3dadd(49.95, -12.46, 9.05, 1.11)
pt3dadd(50.17, -13.64, 9.1, 1.11)
pt3dadd(51.21, -14.37, 9.1, 1.11)
pt3dadd(52.76, -15.19, 9.2, 1.11)
pt3dadd(53.28, -16.37, 9.25, 1.11)
pt3dadd(53.94, -17.25, 9.35, 1.63)
pt3dadd(54.76, -17.99, 9.35, 1.63)
pt3dadd(55.49, -18.87, 9.35, 1.63)
pt3dadd(56.38, -19.46, 10.75, 1.18)
pt3dadd(57.12, -20.27, 10.75, 1.18)
pt3dadd(57.86, -21.38, 10.75, 1.18)
pt3dadd(58.01, -22.19, 11.95, 1.18)
pt3dadd(57.86, -23.15, 12.15, 1.18)
pt3dadd(57.49, -23.81, 13.15, 1.03)
pt3dadd(57.34, -24.99, 13.25, 1.03)
pt3dadd(58.01, -25.66, 13.25, 1.03)
pt3dadd(58.82, -26.17, 13.3, 1.03)
pt3dadd(59.93, -26.47, 13.45, 1.03)
pt3dadd(60.96, -26.54, 13.6, 1.03)
pt3dadd(62.15, -26.47, 13.7, 1.03)
pt3dadd(63.48, -26.76, 14.9, 1.03)
pt3dadd(64.66, -27.13, 15.05, 1.03)
pt3dadd(66.21, -27.43, 15.15, 1.03)
pt3dadd(67.47, -27.28, 15.25, 1.03)
pt3dadd(68.43, -26.99, 15.4, 1.03)
pt3dadd(69.76, -27.8, 15.5, 1.03)
pt3dadd(70.87, -28.39, 17.3, 1.03)
pt3dadd(72.35, -29.05, 17.35, 1.03)
pt3dadd(73.23, -29.27, 18.15, 1.03)
pt3dadd(74.93, -29.2, 18.2, 1.03)
pt3dadd(76.56, -28.83, 18.2, 1.03)
pt3dadd(78.55, -28.76, 18.2, 1.03)
pt3dadd(79.81, -28.53, 18.2, 1.03)
pt3dadd(81.22, -28.24, 18.2, 1.03)
pt3dadd(82.62, -27.65, 18.75, 1.03)
pt3dadd(83.88, -27.58, 18.85, 1.03)
pt3dadd(85.58, -27.43, 18.85, 1.03)
pt3dadd(86.83, -27.13, 19.05, 1.03)
pt3dadd(87.72, -26.99, 19.15, 1.03)
pt3dadd(88.61, -26.69, 19.15, 1.03)
pt3dadd(89.83, -25.9, 19.35, 1.03)
pt3dadd(90.42, -25.46, 19.4, 1.03)
}
apic[11] {pt3dclear()
pt3dadd(14.36, 18.47, -4.6, 1.26)
pt3dadd(14.93, 19.41, -2, 1.26)
pt3dadd(15.75, 20.3, -1.75, 1.26)
pt3dadd(16.19, 21.41, -1.3, 1.26)
pt3dadd(16.86, 22.66, -1.25, 1.26)
pt3dadd(17.37, 23.54, -1.15, 1.26)
pt3dadd(18.26, 24.5, -1.1, 1.26)
pt3dadd(19.44, 25.39, -1, 1.26)
pt3dadd(20.48, 25.61, -0.9, 1.26)
pt3dadd(21.66, 25.31, 0.25, 1.26)
pt3dadd(22.47, 24.8, 0.35, 1.26)
pt3dadd(23.8, 24.5, 1.45, 1.26)
pt3dadd(24.91, 24.43, 1.55, 1.26)
pt3dadd(25.58, 23.91, 4, 1.26)
pt3dadd(26.02, 23.03, 4, 1.26)
pt3dadd(27.06, 23.1, 4.1, 1.26)
pt3dadd(27.94, 23.99, 7.6, 1.26)
pt3dadd(29.27, 24.21, 7.8, 1.26)
pt3dadd(30.83, 24.21, 8.35, 1.26)
pt3dadd(32.23, 24.58, 9.5, 1.26)
pt3dadd(33.41, 25.39, 9.75, 1.26)
pt3dadd(34.22, 26.2, 10.5, 1.26)
pt3dadd(34.96, 27.53, 10.75, 1.26)
pt3dadd(35.19, 28.78, 12.85, 1.26)
pt3dadd(36.44, 29.22, 12.85, 1.26)
pt3dadd(37.77, 29, 13.35, 1.26)
pt3dadd(38.96, 28.85, 13.45, 1.26)
pt3dadd(40.51, 28.63, 15.7, 1.26)
pt3dadd(41.69, 28.49, 15.75, 1.26)
pt3dadd(43.61, 28.12, 15.85, 1.48)
pt3dadd(44.79, 28.12, 15.85, 1.48)
pt3dadd(46.05, 28.26, 16.8, 1.92)
pt3dadd(46.94, 28.41, 16.8, 1.92)
pt3dadd(47.97, 29.08, 17.65, 1.92)
pt3dadd(48.79, 29.74, 19.1, 1.92)
}
apic[12] {pt3dclear()
pt3dadd(48.79, 29.74, 19.1, 1.63)
pt3dadd(49.3, 30.77, 19.15, 1.63)
pt3dadd(49.38, 31.95, 19.95, 1.63)
pt3dadd(50.41, 32.47, 19.95, 1.63)
pt3dadd(51.3, 32.76, 20.05, 1.63)
pt3dadd(52.55, 32.84, 20.1, 1.63)
pt3dadd(53.66, 33.43, 20.1, 1.63)
pt3dadd(54.77, 33.94, 20.6, 1.26)
pt3dadd(55.81, 34.31, 20.6, 1.26)
pt3dadd(56.99, 34.09, 20.6, 1.03)
pt3dadd(58.02, 33.94, 20.6, 1.03)
pt3dadd(59.35, 34.02, 20.6, 1.03)
pt3dadd(60.68, 33.72, 20.6, 1.03)
pt3dadd(61.94, 33.87, 20.6, 1.03)
pt3dadd(62.98, 34.39, 20.6, 1.03)
pt3dadd(63.94, 34.68, 20.6, 1.03)
pt3dadd(65.14, 35, 22.15, 1.26)
pt3dadd(65.73, 36.04, 22.15, 1.26)
pt3dadd(66.33, 36.99, 22.15, 1.26)
pt3dadd(66.62, 37.81, 22.15, 1.26)
pt3dadd(67.88, 38.1, 22.15, 1.26)
}
apic[13] {pt3dclear()
pt3dadd(48.79, 29.74, 19.1, 1.03)
pt3dadd(48.96, 28.81, 22.35, 1.03)
pt3dadd(48.44, 27.85, 22.4, 1.03)
pt3dadd(48.88, 26.74, 22.45, 1.03)
pt3dadd(49.25, 26.08, 22.45, 1.03)
pt3dadd(49.33, 25.19, 22.5, 1.03)
pt3dadd(49.55, 24.24, 22.5, 1.03)
pt3dadd(49.92, 23.35, 22.5, 1.03)
pt3dadd(49.77, 21.88, 22.5, 1.03)
pt3dadd(49.47, 20.84, 22.5, 1.03)
pt3dadd(48.66, 20.18, 22.5, 1.03)
pt3dadd(47.63, 20.18, 22.55, 0.81)
pt3dadd(46.74, 19.96, 22.55, 0.81)
pt3dadd(46, 19.52, 22.55, 0.81)
pt3dadd(45.56, 18.93, 22.55, 0.81)
pt3dadd(44.6, 18.48, 22.55, 0.81)
pt3dadd(43.71, 18.04, 22.65, 0.81)
pt3dadd(42.45, 18.19, 22.75, 0.81)
pt3dadd(41.57, 18.41, 22.8, 0.81)
pt3dadd(41.34, 19.07, 22.85, 0.81)
pt3dadd(41.12, 19.59, 22.9, 0.81)
pt3dadd(40.98, 20.7, 23, 0.81)
}
apic[14] {pt3dclear()
pt3dadd(-15.52, 64.33, -3.6, 1.11)
pt3dadd(-15.52, 64.26, -3.2, 1.11)
pt3dadd(-15.37, 65.95, -3.25, 5.17)
}
}
proc shape3d_22() {
apic[14] { pt3dadd(-15.15, 67.28, -0.35, 5.17)
pt3dadd(-15, 69.64, -0.25, 5.17)
pt3dadd(-15.19, 72.62, -0.2, 5.17)
}
apic[15] {pt3dclear()
pt3dadd(-15.19, 72.62, -0.2, 5.17)
pt3dadd(-16.3, 75.57, -0.15, 5.17)
pt3dadd(-17.11, 78.52, -0.15, 5.17)
pt3dadd(-17.48, 81.18, -0.15, 5.17)
pt3dadd(-18.14, 84.05, -0.15, 5.17)
pt3dadd(-19.18, 86.49, -0.15, 5.17)
pt3dadd(-19.55, 89.36, -0.15, 5.17)
pt3dadd(-21.03, 91.87, 0.6, 5.17)
pt3dadd(-22.21, 94.38, 0.75, 5.17)
pt3dadd(-23.24, 96.59, 0.8, 5.17)
}
apic[16] {pt3dclear()
pt3dadd(-23.24, 96.59, 0.8, 5.17)
pt3dadd(-24.2, 99.24, 0.85, 5.17)
pt3dadd(-25.31, 101.6, 0.85, 5.17)
pt3dadd(-26.2, 104.04, 0.85, 5.17)
pt3dadd(-26.63, 106.64, 0.9, 5.17)
pt3dadd(-27.14, 110.77, 0.9, 5.17)
pt3dadd(-28.18, 114.6, 0.9, 5.17)
pt3dadd(-28.47, 117.55, 0.9, 5.17)
pt3dadd(-29.14, 120.72, 0.9, 5.17)
pt3dadd(-29.66, 123.67, 0.9, 5.17)
pt3dadd(-30.77, 127.06, 0.9, 5.17)
pt3dadd(-31.65, 129.72, 0.9, 5.17)
}
apic[17] {pt3dclear()
pt3dadd(-31.65, 129.72, 0.9, 5.17)
pt3dadd(-31.06, 132.15, 1.85, 5.17)
pt3dadd(-31.65, 134.22, -0.9, 5.17)
pt3dadd(-31.95, 136.58, -1.15, 5.17)
pt3dadd(-32.83, 139.6, -1.25, 5.17)
pt3dadd(-32.78, 142.21, -1.35, 5.17)
pt3dadd(-33.3, 147.23, -1.35, 5.17)
pt3dadd(-33.67, 149.88, -1.4, 5.17)
pt3dadd(-33.6, 152.31, -1.4, 5.17)
pt3dadd(-33.6, 155.12, -1.4, 5.17)
pt3dadd(-33.89, 157.85, -1.4, 5.17)
pt3dadd(-33.82, 161.09, -1.4, 5.17)
pt3dadd(-34.41, 163.74, -1.4, 5.17)
pt3dadd(-35.59, 166.18, -1.4, 5.17)
pt3dadd(-37.22, 168.24, -1.4, 5.17)
pt3dadd(-39.21, 169.64, -1.4, 5.17)
}
apic[18] {pt3dclear()
pt3dadd(-39.21, 169.64, -1.4, 5.17)
pt3dadd(-40.32, 172, -1.4, 5.17)
pt3dadd(-41.5, 174.36, -1.45, 5.17)
pt3dadd(-42.34, 175.9, -1.45, 5.17)
pt3dadd(-43.9, 179.29, -1.45, 5.17)
pt3dadd(-44.41, 181.43, -1.45, 5.17)
pt3dadd(-45.37, 184.09, -1.45, 5.17)
pt3dadd(-45.67, 187.33, -1.45, 5.17)
pt3dadd(-44.86, 190.35, -1.45, 5.17)
pt3dadd(-43.97, 192.64, -1.45, 5.17)
pt3dadd(-42.86, 196.4, -1.45, 5.17)
pt3dadd(-42.49, 199.06, -1.45, 5.17)
pt3dadd(-42.79, 201.42, -1.45, 5.17)
pt3dadd(-43.23, 204.44, -1.45, 5.17)
pt3dadd(-43.38, 206.28, -1.45, 5.17)
pt3dadd(-43.53, 208.94, -1.45, 5.17)
pt3dadd(-44.57, 213.2, -1.45, 5.17)
pt3dadd(-45.53, 215.56, -1.45, 5.17)
pt3dadd(-46.71, 217.26, -1.45, 5.17)
pt3dadd(-48.71, 219.4, -1.45, 5.17)
}
apic[19] {pt3dclear()
pt3dadd(-48.71, 219.4, -1.45, 5.17)
pt3dadd(-49.82, 222.64, -1.45, 5.17)
pt3dadd(-51.44, 224.71, -1.45, 5.17)
pt3dadd(-52.11, 226.77, -1.45, 5.17)
pt3dadd(-51.89, 230.24, -1.45, 5.17)
}
apic[20] {pt3dclear()
pt3dadd(-51.89, 230.24, -1.45, 5.17)
pt3dadd(-52.33, 234.07, -1.45, 5.17)
pt3dadd(-53.22, 237.61, -1.45, 5.17)
pt3dadd(-53.59, 239.68, -1.45, 5.17)
pt3dadd(-54.62, 241.89, -1.45, 5.17)
pt3dadd(-55.07, 244.43, -3.4, 5.17)
pt3dadd(-56.4, 247.16, -3.45, 5.17)
}
apic[21] {pt3dclear()
pt3dadd(-56.4, 247.16, -3.45, 5.17)
pt3dadd(-58.25, 250.18, -3.45, 5.17)
pt3dadd(-59.88, 253.79, -3.5, 4.95)
pt3dadd(-59.88, 256.67, -3.45, 4.95)
pt3dadd(-59.51, 259.84, -3.45, 4.95)
pt3dadd(-59.29, 263.67, -3.45, 4.95)
pt3dadd(-58.99, 266.85, -3.45, 4.95)
pt3dadd(-59.29, 270.02, -3.45, 4.95)
pt3dadd(-59.43, 272.01, -3.45, 4.95)
pt3dadd(-60.47, 274.37, -3.45, 4.95)
pt3dadd(-60.75, 277.31, -3.45, 4.95)
pt3dadd(-60.23, 279.96, -3.45, 4.95)
}
apic[22] {pt3dclear()
pt3dadd(-60.23, 279.96, -3.45, 4.95)
pt3dadd(-61.57, 283.5, -3.5, 4.95)
pt3dadd(-61.79, 287.04, -3.5, 4.95)
pt3dadd(-61.86, 290.73, -3.5, 4.95)
pt3dadd(-60.97, 295.01, -3.5, 4.95)
pt3dadd(-60.9, 298.54, -3.5, 4.95)
pt3dadd(-61.12, 301.49, -3.5, 4.95)
pt3dadd(-61.49, 304, -4, 4.95)
pt3dadd(-62.6, 305.55, -4.15, 4.95)
pt3dadd(-63.63, 308.13, -4.2, 4.95)
pt3dadd(-65.36, 310.56, -4.65, 4.95)
pt3dadd(-66.76, 313.29, -4.85, 4.95)
pt3dadd(-68.76, 315.72, -4.8, 4.95)
pt3dadd(-70.75, 318.67, -4.55, 4.95)
pt3dadd(-71.64, 321.69, -4.2, 4.95)
pt3dadd(-72.38, 325.09, -3.35, 4.95)
pt3dadd(-72.53, 327.52, -3.2, 4.95)
pt3dadd(-72.9, 330.25, -3.15, 4.95)
pt3dadd(-73.19, 332.68, -3.1, 4.95)
pt3dadd(-73.93, 334.89, -3.1, 4.95)
pt3dadd(-74.23, 337.18, -3.05, 4.95)
pt3dadd(-74.15, 338.66, -3.05, 4.95)
pt3dadd(-73.71, 340.79, -3.05, 4.95)
pt3dadd(-72.84, 343.38, -3, 4.95)
pt3dadd(-72.62, 346.48, -5.5, 4.43)
pt3dadd(-72.77, 349.21, -5.55, 4.43)
pt3dadd(-73.21, 351.87, -5.65, 4.43)
pt3dadd(-74.03, 355.11, -5.95, 4.43)
pt3dadd(-74.03, 357.77, -6.15, 4.43)
pt3dadd(-74.32, 360.2, -6.3, 4.43)
pt3dadd(-74.17, 363.15, -6.4, 4.43)
pt3dadd(-74.69, 365.73, -6.6, 4.43)
pt3dadd(-75.28, 367.57, -6.75, 4.43)
pt3dadd(-75.5, 369.56, -7.1, 4.43)
pt3dadd(-76.17, 371.7, -7.25, 4.43)
pt3dadd(-76.17, 373.18, -7.35, 4.43)
pt3dadd(-75.8, 373.77, -7.35, 4.43)
pt3dadd(-76.08, 375.98, -7.4, 4.43)
}
apic[23] {pt3dclear()
pt3dadd(-76.08, 375.98, -7.4, 4.43)
pt3dadd(-77.41, 378.79, -7.45, 4.43)
pt3dadd(-78.07, 381.15, -7.45, 4.43)
pt3dadd(-80, 384.32, -7.45, 4.06)
pt3dadd(-81.7, 385.94, -7.45, 4.06)
pt3dadd(-82.95, 388.01, -8.05, 4.06)
pt3dadd(-83.91, 390.37, -8.05, 4.06)
pt3dadd(-84.73, 393.24, -7.85, 4.06)
pt3dadd(-84.58, 396.56, -7.4, 4.06)
pt3dadd(-83.99, 398.92, -7.15, 4.06)
pt3dadd(-83.32, 400.62, -7, 4.06)
pt3dadd(-82.58, 403.2, -6.85, 4.06)
pt3dadd(-82.36, 404.89, -6.75, 4.06)
pt3dadd(-82.58, 406.07, -6.7, 4.06)
pt3dadd(-81.72, 408.65, -6.65, 4.06)
pt3dadd(-82.53, 411.38, -6.6, 4.06)
pt3dadd(-84.16, 413.82, -6.6, 4.06)
pt3dadd(-85.12, 416.54, -6.6, 4.06)
pt3dadd(-86.08, 418.68, -6.6, 4.06)
pt3dadd(-87.41, 421.34, -6.6, 4.06)
pt3dadd(-87.78, 423.48, -5.15, 4.06)
pt3dadd(-89.55, 425.76, -5.3, 4.06)
pt3dadd(-91.55, 428.49, -7, 4.06)
pt3dadd(-92.36, 431.88, -7.6, 4.06)
pt3dadd(-92.66, 434.24, -8.05, 4.06)
pt3dadd(-93.1, 436.38, -8.2, 4.06)
pt3dadd(-92.88, 438.45, -8.2, 4.06)
pt3dadd(-92.78, 440.49, -6.5, 4.06)
pt3dadd(-92.86, 442.78, -6.25, 4.06)
pt3dadd(-92.19, 445.21, -6.05, 4.06)
pt3dadd(-91.97, 447.13, -5.75, 4.06)
}
apic[24] {pt3dclear()
pt3dadd(-91.97, 447.13, -5.75, 4.06)
pt3dadd(-91.9, 450.74, -5.7, 4.06)
pt3dadd(-91.97, 453.1, -5.7, 4.06)
pt3dadd(-92.78, 455.98, -5.7, 4.06)
pt3dadd(-93.67, 457.89, -5.35, 4.06)
pt3dadd(-94.7, 459.74, -5.4, 4.06)
pt3dadd(-95.67, 461.43, -7.45, 4.06)
pt3dadd(-97.22, 463.28, -8.7, 4.06)
pt3dadd(-98.1, 465.71, -9.8, 4.06)
pt3dadd(-98.62, 468.59, -10.1, 4.06)
pt3dadd(-98.1, 470.95, -10.15, 4.06)
pt3dadd(-96.85, 472.85, -10.25, 4.06)
pt3dadd(-96.11, 475.58, -10.25, 4.06)
pt3dadd(-94.63, 478.67, -10.25, 4.06)
pt3dadd(-95.15, 481.55, -10.25, 4.06)
pt3dadd(-96.92, 482.58, -10.9, 4.73)
pt3dadd(-98.84, 483.84, -10.9, 4.73)
pt3dadd(-100.91, 485.75, -10.95, 4.73)
pt3dadd(-102.76, 487.23, -10.95, 4.73)
pt3dadd(-103.57, 488.48, -10.95, 4.21)
pt3dadd(-104.46, 489.66, -10.95, 4.21)
pt3dadd(-105.94, 492.39, -10.95, 4.21)
pt3dadd(-107.34, 495.04, -10.95, 4.21)
pt3dadd(-107.86, 497.7, -10.95, 4.21)
pt3dadd(-108.9, 499.91, -10.95, 4.21)
pt3dadd(-109.71, 501.83, -10.95, 4.21)
pt3dadd(-109.86, 503.82, -10.95, 4.21)
pt3dadd(-110.03, 506.87, -11.05, 4.21)
pt3dadd(-109.73, 509.6, -11.1, 4.21)
pt3dadd(-109.36, 512.41, -11.15, 4.21)
pt3dadd(-108.99, 514.99, -11.15, 4.21)
pt3dadd(-108.18, 517.57, -11.25, 4.21)
pt3dadd(-108.1, 520.3, -11.35, 4.21)
pt3dadd(-108.7, 522.88, -11.45, 4.21)
pt3dadd(-109.73, 525.53, -11.6, 4.21)
pt3dadd(-111.5, 528.26, -11.65, 4.21)
pt3dadd(-112.61, 530.25, -11.7, 4.21)
pt3dadd(-113.72, 532.39, -11.7, 4.21)
pt3dadd(-114.09, 534.6, -11.75, 4.21)
pt3dadd(-114.31, 536.89, -11.8, 4.21)
pt3dadd(-113.99, 539.21, -12.55, 5.4)
pt3dadd(-113.99, 542.38, -12.55, 5.4)
pt3dadd(-113.77, 545.84, -12.55, 5.4)
pt3dadd(-114.28, 548.65, -12.55, 5.4)
pt3dadd(-115.39, 551.45, -12.55, 5.4)
pt3dadd(-116.43, 554.62, -12.55, 5.4)
}
}
proc shape3d_23() {
apic[24] { pt3dadd(-117.98, 557.05, -12.55, 5.4)
pt3dadd(-120.2, 559.63, -12.55, 5.4)
pt3dadd(-122.49, 561.77, -15.6, 4.95)
pt3dadd(-123.52, 563.98, -15.75, 4.95)
pt3dadd(-124.33, 566.12, -16.15, 4.95)
pt3dadd(-125.07, 568.34, -17, 4.95)
pt3dadd(-125.96, 569.88, -17.05, 4.95)
pt3dadd(-126.99, 573.15, -17.6, 4.95)
pt3dadd(-127.21, 576.84, -17.65, 4.95)
pt3dadd(-127.21, 580.08, -17.7, 4.95)
pt3dadd(-126.7, 582.81, -17.7, 4.95)
pt3dadd(-125.51, 585.54, -17.8, 4.95)
pt3dadd(-124.63, 588.19, -17.85, 4.95)
pt3dadd(-123.89, 591.22, -17.85, 4.95)
pt3dadd(-123.15, 593.65, -17.9, 4.95)
pt3dadd(-122.56, 596.38, -17.9, 4.95)
pt3dadd(-122.34, 598.96, -17.9, 4.95)
pt3dadd(-122.26, 601.02, -17.9, 4.95)
pt3dadd(-122.34, 602.72, -17.95, 4.95)
pt3dadd(-123.35, 606, -17.95, 4.95)
pt3dadd(-124.53, 608.58, -17.95, 4.95)
pt3dadd(-126.6, 611.6, -17.95, 4.95)
pt3dadd(-127.63, 613.08, -17.95, 4.95)
pt3dadd(-129.7, 614.85, -18.45, 4.95)
pt3dadd(-130.52, 615.44, -18.45, 4.29)
pt3dadd(-132.44, 616.84, -18.5, 4.29)
pt3dadd(-132.81, 619.12, -18.5, 4.29)
pt3dadd(-132.66, 621.34, -18.55, 4.29)
pt3dadd(-131.33, 623.25, -18.55, 4.29)
pt3dadd(-129.85, 626.57, -18.6, 4.29)
pt3dadd(-129.41, 629, -18.6, 4.29)
pt3dadd(-129.26, 631.44, -18.6, 4.29)
pt3dadd(-128.89, 633.5, -18.6, 4.29)
pt3dadd(-128.45, 635.2, -18.6, 4.29)
pt3dadd(-128.26, 637.15, -18.95, 4.29)
pt3dadd(-127.6, 640.02, -19.05, 4.29)
pt3dadd(-127.52, 643.34, -19.05, 4.29)
pt3dadd(-128.19, 645.92, -19.05, 4.29)
pt3dadd(-129.74, 648.87, -19.05, 4.29)
pt3dadd(-130.92, 651.45, -19.05, 4.29)
pt3dadd(-133.36, 653.96, -19.05, 4.29)
pt3dadd(-135.5, 656.76, -19.1, 4.29)
pt3dadd(-137.13, 658.75, -19.1, 4.29)
pt3dadd(-139.13, 660.6, -19.1, 4.29)
pt3dadd(-141.12, 662.52, -19.1, 4.29)
pt3dadd(-141.64, 665.83, -19.1, 4.29)
pt3dadd(-140.31, 668.12, -19.1, 4.29)
pt3dadd(-139.67, 670.44, -19.6, 4.29)
pt3dadd(-138.56, 673.02, -19.75, 4.29)
pt3dadd(-139, 676.19, -20.3, 4.29)
pt3dadd(-138.85, 679.07, -20.3, 4.29)
pt3dadd(-139.07, 681.43, -20.25, 4.29)
pt3dadd(-139, 683.49, -20.45, 4.29)
pt3dadd(-139.22, 685.92, -21.4, 4.29)
pt3dadd(-139.22, 688.14, -21.6, 4.29)
pt3dadd(-140.03, 690.5, -22.05, 4.29)
pt3dadd(-140.55, 693.22, -22.35, 4.29)
pt3dadd(-140.7, 695.22, -22.05, 4.29)
pt3dadd(-140.77, 697.06, -18.35, 4.29)
pt3dadd(-141.29, 699.05, -17.85, 4.29)
pt3dadd(-141.96, 701.04, -17.65, 4.29)
pt3dadd(-142.52, 703.55, -19.95, 4.14)
pt3dadd(-142.89, 705.69, -20.9, 4.14)
pt3dadd(-142.89, 708.35, -21.55, 4.14)
pt3dadd(-142.89, 710.49, -21.65, 4.14)
pt3dadd(-142.97, 713.21, -22.15, 4.14)
pt3dadd(-142.74, 715.8, -22.25, 4.14)
pt3dadd(-142.37, 717.79, -22.4, 4.14)
pt3dadd(-142.37, 719.78, -22.5, 4.14)
}
apic[25] {pt3dclear()
pt3dadd(-142.37, 719.78, -22.5, 4.14)
pt3dadd(-143.41, 721.62, -22.55, 4.14)
pt3dadd(-144.74, 724.05, -23.45, 4.14)
pt3dadd(-146.37, 726.12, -23.75, 4.14)
pt3dadd(-146.96, 727.45, -24.3, 4.14)
}
apic[26] {pt3dclear()
pt3dadd(-146.96, 727.45, -24.3, 3.77)
pt3dadd(-148.36, 729.88, -23.6, 3.77)
pt3dadd(-149.47, 731.87, -23.25, 3.77)
pt3dadd(-150.28, 733.42, -23, 3.77)
}
apic[27] {pt3dclear()
pt3dadd(-150.28, 733.42, -23, 2.88)
pt3dadd(-152.4, 734.11, -20.75, 2.88)
pt3dadd(-155.06, 735.22, -20.7, 2.88)
pt3dadd(-157.13, 736.4, -20.7, 2.88)
pt3dadd(-158.98, 738.1, -20.65, 2.51)
pt3dadd(-159.86, 739.94, -20.65, 2.51)
pt3dadd(-161.71, 742.6, -20.65, 2.51)
pt3dadd(-161.93, 745.1, -20.65, 2.51)
pt3dadd(-162.67, 747.61, -20.65, 2.51)
pt3dadd(-162.67, 750.78, -20.65, 2.51)
pt3dadd(-162.82, 754.47, -20.65, 2.51)
pt3dadd(-163.04, 756.9, -20, 2.51)
pt3dadd(-163.12, 759.19, -19.85, 2.51)
pt3dadd(-163.12, 761.33, -18.9, 2.51)
pt3dadd(-163.26, 763.91, -18.75, 2.51)
pt3dadd(-163.56, 765.97, -18.6, 2.51)
pt3dadd(-165.16, 768.18, -18.5, 2.51)
pt3dadd(-167.3, 769.14, -17.7, 2.51)
pt3dadd(-168.71, 770.25, -17.65, 2.51)
pt3dadd(-170.63, 771.72, -17, 2.51)
pt3dadd(-171.74, 773.79, -16.85, 2.51)
pt3dadd(-172.85, 776.59, -16.7, 2.51)
pt3dadd(-173.36, 778.29, -16.35, 2.51)
pt3dadd(-174.99, 779.47, -16.15, 2.51)
pt3dadd(-176.84, 780.94, -15.7, 2.51)
pt3dadd(-178.02, 783.16, -15.35, 2.51)
pt3dadd(-177.8, 785.66, -15.1, 2.51)
pt3dadd(-178.98, 787.87, -14.55, 2.51)
pt3dadd(-181.27, 789.5, -14.3, 2.51)
pt3dadd(-183.79, 790.68, -14, 2.51)
pt3dadd(-185.49, 792.23, -13.95, 2.51)
pt3dadd(-187.33, 794.14, -13.8, 2.51)
pt3dadd(-186.96, 796.43, -13.65, 2.51)
pt3dadd(-186.22, 798.57, -13.55, 2.51)
pt3dadd(-185.89, 799.85, -13.05, 2.51)
pt3dadd(-185.37, 802.06, -12.95, 2.51)
pt3dadd(-185.96, 804.5, -12.9, 2.51)
pt3dadd(-186.48, 806.64, -12.9, 2.51)
pt3dadd(-187.29, 809, -12.9, 2.51)
pt3dadd(-189.58, 811.95, -12.9, 2.51)
pt3dadd(-191.5, 813.42, -12.85, 2.51)
pt3dadd(-193.5, 814.38, -12.7, 2.51)
pt3dadd(-195.57, 816.74, -12.35, 2.51)
pt3dadd(-195.27, 819.47, -12.3, 2.51)
pt3dadd(-194.9, 822.79, -12.3, 2.51)
pt3dadd(-194.39, 824.78, -11.85, 2.51)
pt3dadd(-194.53, 827.65, -11.55, 2.51)
pt3dadd(-195.13, 829.28, -11.2, 2.51)
pt3dadd(-196.38, 830.46, -10.7, 2.51)
pt3dadd(-198.6, 831.34, -10.5, 2.51)
pt3dadd(-199.99, 832.33, -10.35, 2.14)
pt3dadd(-201.83, 833.22, -10.35, 2.14)
pt3dadd(-204.35, 834.76, -10.35, 2.14)
pt3dadd(-205.68, 836.31, -10.35, 2.14)
pt3dadd(-206.64, 839.04, -9.5, 2.14)
pt3dadd(-206.49, 841.55, -9.15, 2.14)
pt3dadd(-206.2, 844.2, -8.65, 2.14)
pt3dadd(-205.01, 846.27, -7.8, 2.14)
pt3dadd(-203.98, 848.7, -7.5, 2.14)
pt3dadd(-204.35, 850.18, -6.7, 2.14)
pt3dadd(-205.53, 852.39, -6.35, 2.14)
pt3dadd(-207.16, 854.53, -6.5, 2.14)
pt3dadd(-208.71, 856.15, -6.85, 2.14)
pt3dadd(-210.11, 857.33, -7.65, 2.14)
pt3dadd(-212.18, 858.88, -8.75, 2.14)
pt3dadd(-213.44, 860.58, -9, 2.14)
pt3dadd(-214.4, 861.9, -9.3, 2.14)
pt3dadd(-215.43, 862.86, -9.55, 2.14)
pt3dadd(-216.03, 864.04, -9.7, 2.14)
pt3dadd(-216.01, 865.5, -10.1, 2.14)
pt3dadd(-215.42, 867.86, -10.25, 2.14)
pt3dadd(-215.57, 869.56, -10, 2.14)
pt3dadd(-215.49, 871.7, -9.45, 2.14)
pt3dadd(-216.38, 873.47, -8.8, 2.14)
pt3dadd(-217.86, 875.02, -8.15, 2.14)
pt3dadd(-218.89, 877.08, -7.55, 2.14)
pt3dadd(-220.22, 878.93, -7.6, 2.14)
pt3dadd(-221.77, 880.99, -7.9, 2.14)
pt3dadd(-222.73, 882.98, -8.85, 2.14)
pt3dadd(-224.21, 884.6, -9.7, 2.14)
pt3dadd(-225.25, 886.82, -10.3, 2.14)
pt3dadd(-226.73, 888.88, -10.7, 2.14)
pt3dadd(-228.13, 889.84, -10.95, 2.14)
pt3dadd(-229.16, 891.76, -11.25, 2.14)
pt3dadd(-230.42, 893.23, -11.4, 2.14)
pt3dadd(-231.31, 894.71, -11.5, 2.14)
pt3dadd(-231.53, 895.74, -11.55, 2.14)
pt3dadd(-231.83, 897.66, -11.6, 2.14)
}
apic[28] {pt3dclear()
pt3dadd(-231.83, 897.66, -11.6, 1.4)
pt3dadd(-233.26, 898.68, -11.3, 1.4)
pt3dadd(-234.59, 899.86, -10.75, 1.4)
pt3dadd(-235.48, 900.08, -10.85, 1.4)
pt3dadd(-236.29, 900.45, -11.3, 1.4)
pt3dadd(-237.99, 900.82, -12.55, 1.4)
pt3dadd(-239.76, 901.56, -12.9, 1.4)
pt3dadd(-241.61, 902.08, -13.35, 1.4)
pt3dadd(-242.87, 903.26, -13.9, 1.4)
pt3dadd(-244.49, 904.51, -14.4, 1.4)
pt3dadd(-246.19, 905.1, -14.85, 1.4)
pt3dadd(-247.97, 906.43, -15.35, 1.4)
pt3dadd(-250.11, 907.68, -15.85, 1.4)
pt3dadd(-252.26, 908.79, -16.2, 1.4)
pt3dadd(-253.59, 910.26, -16.7, 1.4)
pt3dadd(-253.96, 912.25, -16.55, 1.4)
pt3dadd(-253.59, 913.8, -16.25, 1.4)
pt3dadd(-254.62, 915.57, -15.7, 1.4)
pt3dadd(-256.17, 916.24, -15, 1.4)
pt3dadd(-257.87, 916.9, -14.4, 1.4)
pt3dadd(-259.35, 917.49, -14.3, 1.4)
pt3dadd(-260.46, 917.78, -14.6, 1.4)
pt3dadd(-262.09, 918.82, -15.4, 1.4)
pt3dadd(-263.42, 920.29, -16.55, 1.4)
pt3dadd(-263.56, 921.69, -16.55, 1.4)
}
apic[29] {pt3dclear()
pt3dadd(-263.56, 921.69, -16.55, 1.4)
pt3dadd(-263.56, 922.5, -17.2, 1.4)
pt3dadd(-264.3, 925.01, -17.5, 1.4)
pt3dadd(-265.49, 926.04, -17.5, 1.4)
pt3dadd(-266.82, 926.49, -17.6, 1.4)
pt3dadd(-268.44, 925.9, -17.85, 1.4)
pt3dadd(-270.14, 925.67, -18, 1.4)
pt3dadd(-271.32, 926.49, -18.1, 1.4)
pt3dadd(-272.36, 927.22, -18.15, 1.4)
}
}
proc shape3d_24() {
apic[29] { pt3dadd(-273.84, 928.03, -18.2, 1.4)
pt3dadd(-274.28, 928.62, -18.4, 0.89)
pt3dadd(-275.46, 928.4, -18.35, 0.89)
}
apic[30] {pt3dclear()
pt3dadd(-263.56, 921.69, -16.55, 0.89)
pt3dadd(-262.75, 922.5, -16.55, 0.89)
pt3dadd(-261.72, 923.83, -18.95, 0.89)
pt3dadd(-260.98, 924.72, -20.1, 0.89)
pt3dadd(-260.61, 925.53, -20.25, 0.89)
pt3dadd(-260.02, 926.04, -20.05, 0.89)
pt3dadd(-259.57, 927.08, -19.6, 0.89)
pt3dadd(-258.98, 928.18, -18.55, 0.89)
pt3dadd(-259.13, 928.85, -18.5, 0.89)
pt3dadd(-259.13, 929.51, -20.8, 0.89)
pt3dadd(-259.2, 930.39, -20.95, 0.89)
pt3dadd(-258.37, 931.48, -21.55, 0.89)
pt3dadd(-257.33, 931.85, -21.6, 0.89)
pt3dadd(-256.15, 932.59, -21.6, 0.89)
pt3dadd(-254.97, 933.33, -21.65, 0.89)
pt3dadd(-254.82, 934.43, -21.65, 0.89)
pt3dadd(-254.82, 935.32, -21.65, 0.89)
pt3dadd(-255.49, 936.06, -22.55, 0.89)
pt3dadd(-256.45, 937.16, -22.85, 0.89)
pt3dadd(-256.82, 937.9, -22.9, 0.89)
pt3dadd(-257.63, 938.93, -23.2, 0.89)
pt3dadd(-256.97, 939.74, -24.7, 0.89)
pt3dadd(-256.08, 940.63, -25.4, 0.89)
pt3dadd(-255.04, 942.03, -25.65, 0.89)
pt3dadd(-254.82, 942.91, -25.75, 0.89)
pt3dadd(-254.6, 943.95, -26.5, 0.89)
pt3dadd(-254.38, 945.05, -26.7, 0.89)
pt3dadd(-254.6, 946.16, -27.45, 0.89)
pt3dadd(-255.19, 947.78, -27.7, 0.89)
pt3dadd(-255.86, 948.59, -28.15, 0.89)
pt3dadd(-256.08, 949.77, -28.5, 0.89)
pt3dadd(-255.86, 950.66, -28.6, 0.89)
pt3dadd(-255.27, 952.06, -28.95, 0.89)
pt3dadd(-255.12, 953.09, -31.65, 0.89)
pt3dadd(-255.27, 954.27, -31.7, 0.89)
pt3dadd(-256.52, 955.45, -31.8, 0.89)
pt3dadd(-256, 956.7, -32, 0.89)
pt3dadd(-255.27, 958.18, -32.15, 0.89)
pt3dadd(-254.75, 958.92, -32.55, 0.89)
pt3dadd(-255.34, 960.02, -35.7, 0.89)
pt3dadd(-255.49, 961.35, -35.8, 0.89)
pt3dadd(-255.41, 962.38, -35.85, 0.89)
pt3dadd(-254.97, 963.34, -35.9, 0.89)
pt3dadd(-253.92, 964.16, -36.9, 0.89)
pt3dadd(-253.26, 965.34, -36.9, 0.89)
pt3dadd(-253.92, 966.6, -37.35, 0.89)
pt3dadd(-254.51, 967.85, -37.75, 0.89)
pt3dadd(-254.81, 969.03, -38.2, 0.89)
pt3dadd(-255.25, 969.99, -38.7, 0.89)
pt3dadd(-255.84, 970.8, -39.55, 0.89)
pt3dadd(-256.66, 971.68, -39.85, 0.89)
pt3dadd(-256.36, 972.79, -40.2, 0.89)
pt3dadd(-255.33, 973.53, -40.25, 0.89)
pt3dadd(-254.59, 974.12, -40.25, 0.89)
pt3dadd(-254.73, 975.08, -40.3, 0.89)
pt3dadd(-255.03, 975.52, -45, 0.52)
pt3dadd(-256.29, 976.11, -44.75, 0.52)
pt3dadd(-256.51, 976.99, -44.35, 0.52)
pt3dadd(-256.14, 978.69, -42.75, 0.52)
pt3dadd(-255.84, 979.87, -42.8, 0.52)
pt3dadd(-255.99, 980.61, -44.25, 0.74)
pt3dadd(-255.47, 981.94, -44.25, 0.74)
pt3dadd(-255.62, 983.04, -47.75, 0.74)
pt3dadd(-255.7, 984.22, -48.45, 0.74)
pt3dadd(-255.4, 985.11, -48.6, 0.74)
pt3dadd(-254.37, 985.77, -48.7, 0.74)
pt3dadd(-253.33, 986.29, -48.75, 0.74)
pt3dadd(-253.18, 987.39, -48.8, 0.96)
pt3dadd(-252.81, 988.2, -48.9, 0.96)
pt3dadd(-252.3, 989.09, -49.2, 0.96)
pt3dadd(-251.34, 989.97, -49.5, 0.96)
pt3dadd(-250.52, 990.19, -49.65, 0.96)
pt3dadd(-249.78, 990.64, -49.9, 0.96)
pt3dadd(-248.75, 991.23, -50.35, 0.96)
pt3dadd(-247.71, 991.74, -50.3, 0.96)
pt3dadd(-247.64, 992.55, -50.15, 0.96)
pt3dadd(-248.6, 993, -49.85, 0.96)
pt3dadd(-249.41, 993.73, -49.4, 0.96)
pt3dadd(-248.9, 994.62, -49.2, 0.96)
pt3dadd(-247.94, 995.28, -51.65, 0.96)
pt3dadd(-247.27, 996.09, -51.95, 0.96)
pt3dadd(-246.99, 996.74, -52.7, 0.96)
pt3dadd(-246.55, 997.55, -52.7, 0.96)
pt3dadd(-245.51, 997.47, -52.7, 0.96)
pt3dadd(-244.26, 997.1, -54.7, 0.96)
pt3dadd(-244.04, 998.06, -55.05, 0.96)
pt3dadd(-243.44, 999.17, -55.4, 0.96)
pt3dadd(-242.56, 999.83, -55.7, 0.96)
pt3dadd(-240.93, 1000.57, -56.1, 0.96)
pt3dadd(-239.6, 1001.23, -56.45, 0.96)
pt3dadd(-239.08, 1002.05, -56.8, 0.96)
pt3dadd(-237.9, 1002.56, -56.95, 0.96)
pt3dadd(-236.57, 1002.71, -57.05, 0.96)
pt3dadd(-235.54, 1002.64, -57.45, 0.96)
pt3dadd(-234.13, 1003, -57.55, 0.96)
pt3dadd(-233.17, 1003.15, -58.1, 0.96)
pt3dadd(-232.14, 1003.82, -58.35, 0.96)
pt3dadd(-230.95, 1003.96, -58.5, 0.96)
pt3dadd(-229.7, 1003.89, -58.95, 0.96)
pt3dadd(-229.18, 1004.92, -59.65, 0.96)
pt3dadd(-228.88, 1006.03, -59.95, 0.96)
pt3dadd(-228.07, 1006.69, -60.2, 0.96)
pt3dadd(-226.81, 1007.58, -60.55, 0.96)
pt3dadd(-226.15, 1008.02, -61.1, 0.81)
pt3dadd(-225.41, 1008.68, -61.4, 0.81)
pt3dadd(-224.38, 1009.05, -61.2, 0.81)
pt3dadd(-224.52, 1010.23, -60.75, 0.81)
pt3dadd(-224.23, 1011.49, -59.8, 0.81)
pt3dadd(-223.71, 1012.44, -58.95, 0.81)
pt3dadd(-223.04, 1012.67, -58.8, 0.81)
pt3dadd(-222.08, 1013.11, -60.35, 0.81)
pt3dadd(-221.27, 1013.4, -60.8, 0.81)
pt3dadd(-220.31, 1014.07, -63.2, 0.81)
pt3dadd(-220.01, 1015.03, -63.7, 0.81)
pt3dadd(-219.87, 1015.91, -64, 0.81)
pt3dadd(-219.42, 1016.87, -64.3, 0.81)
pt3dadd(-218.46, 1016.94, -64.4, 0.81)
pt3dadd(-217.43, 1017.24, -65.9, 0.81)
pt3dadd(-216.61, 1017.53, -65.9, 0.81)
pt3dadd(-216.39, 1018.2, -66.2, 0.81)
pt3dadd(-216.17, 1019.23, -66.35, 0.81)
pt3dadd(-215.43, 1020.33, -66.5, 0.81)
pt3dadd(-214.62, 1021, -66.65, 0.81)
pt3dadd(-213.66, 1021.15, -67.4, 0.81)
pt3dadd(-212.62, 1021.44, -67.55, 0.81)
pt3dadd(-211.52, 1020.78, -67.65, 0.81)
pt3dadd(-210.41, 1021, -67.7, 0.81)
pt3dadd(-208.78, 1021.59, -68.3, 0.81)
pt3dadd(-206.93, 1022.47, -68.45, 0.81)
pt3dadd(-205.6, 1022.84, -69, 0.81)
pt3dadd(-203.98, 1023.43, -69.2, 0.81)
pt3dadd(-203.09, 1023.8, -67.75, 0.81)
pt3dadd(-202.28, 1024.1, -67.65, 0.81)
}
apic[31] {pt3dclear()
pt3dadd(-231.83, 897.66, -11.6, 0.81)
pt3dadd(-232, 898.54, -9.8, 0.81)
pt3dadd(-232.81, 898.84, -9.6, 0.81)
pt3dadd(-233.33, 899.5, -9.35, 0.81)
pt3dadd(-233.33, 900.38, -8.95, 0.81)
pt3dadd(-233.25, 901.34, -8.8, 0.81)
pt3dadd(-232.59, 902.08, -8.65, 0.81)
pt3dadd(-231.85, 902.6, -8.45, 0.81)
pt3dadd(-231.55, 903.19, -8.2, 0.81)
pt3dadd(-231.7, 904.15, -7.75, 0.81)
pt3dadd(-231.92, 905.33, -7.3, 0.81)
pt3dadd(-232.44, 905.92, -6.35, 0.81)
pt3dadd(-232.37, 906.73, -5.8, 1.03)
pt3dadd(-232.37, 907.32, -5.55, 1.03)
pt3dadd(-233.03, 908.28, -5.15, 1.03)
pt3dadd(-234.29, 908.64, -4.75, 1.03)
pt3dadd(-235.1, 908.5, -4.55, 1.03)
pt3dadd(-236.21, 908.42, -4.35, 1.03)
pt3dadd(-237.1, 909.01, -4.05, 1.03)
pt3dadd(-237.61, 909.46, -3.9, 1.03)
pt3dadd(-237.98, 910.71, -3.85, 1.03)
pt3dadd(-237.61, 911.59, -3.85, 1.03)
pt3dadd(-237.54, 912.55, -3.35, 1.03)
pt3dadd(-237.76, 913.59, -3.35, 1.03)
pt3dadd(-238.13, 914.62, -3.25, 1.03)
pt3dadd(-238.43, 915.65, -3.1, 1.03)
pt3dadd(-239.02, 916.76, -2.85, 1.03)
pt3dadd(-239.83, 917.64, -2.7, 1.03)
pt3dadd(-239.9, 918.53, -2.65, 1.03)
pt3dadd(-240.05, 919.34, -2.65, 1.03)
pt3dadd(-240.27, 920.66, -2.15, 1.03)
pt3dadd(-241.09, 921.26, -2.1, 1.03)
pt3dadd(-241.09, 922.21, -1.9, 1.03)
pt3dadd(-241.09, 923.91, -1.85, 1.03)
pt3dadd(-240.72, 925.16, -1.8, 1.03)
}
apic[32] {pt3dclear()
pt3dadd(-150.28, 733.42, -23, 1.4)
pt3dadd(-150.31, 734.44, -25.2, 1.4)
pt3dadd(-151.05, 735.76, -25.35, 1.4)
pt3dadd(-152.75, 735.76, -25.55, 1.4)
pt3dadd(-154.15, 735.98, -26.05, 1.26)
pt3dadd(-155.04, 736.57, -26.05, 1.26)
pt3dadd(-156.15, 737.75, -26.05, 1.26)
pt3dadd(-156.74, 739.23, -26.1, 1.26)
pt3dadd(-157.4, 740.41, -26.55, 1.26)
pt3dadd(-157.92, 741.07, -26.85, 1.26)
pt3dadd(-158.29, 741.88, -26.95, 1.26)
pt3dadd(-158.81, 742.77, -24.6, 1.26)
pt3dadd(-159.4, 743.43, -24.35, 1.26)
pt3dadd(-160.06, 744.39, -23.2, 1.26)
pt3dadd(-160.88, 745.5, -23.05, 1.26)
pt3dadd(-161.4, 745.87, -23, 1.26)
}
apic[33] {pt3dclear()
pt3dadd(-146.96, 727.45, -24.3, 1.48)
pt3dadd(-147.2, 729.13, -20.95, 1.48)
pt3dadd(-148.17, 730.6, -21.1, 1.48)
pt3dadd(-148.61, 731.71, -21.15, 1.48)
pt3dadd(-149.13, 733.18, -21.3, 1.48)
pt3dadd(-149.87, 734.07, -16.45, 2.07)
pt3dadd(-150.83, 734.88, -16.45, 2.07)
pt3dadd(-152.23, 736.57, -16.45, 2.07)
pt3dadd(-153.19, 737.98, -16.45, 2.07)
pt3dadd(-153.56, 739.23, -16.45, 2.07)
pt3dadd(-154, 740.11, -16.45, 2.07)
pt3dadd(-154.23, 741.52, -16.4, 2.07)
pt3dadd(-154.15, 742.84, -16.45, 2.07)
}
}
proc shape3d_25() {
apic[33] { pt3dadd(-153.49, 744.02, -16.45, 2.07)
pt3dadd(-152.97, 744.54, -15.5, 2.07)
pt3dadd(-152.3, 745.57, -14.95, 2.07)
pt3dadd(-151.71, 746.6, -14.55, 2.07)
pt3dadd(-150.9, 747.56, -14.15, 2.07)
pt3dadd(-150.01, 748.82, -13.75, 2.07)
pt3dadd(-149.2, 750.66, -13.45, 2.07)
pt3dadd(-148.98, 752.21, -13.1, 2.07)
pt3dadd(-148.68, 753.39, -12.85, 2.07)
pt3dadd(-148.24, 755.09, -12.8, 2.07)
pt3dadd(-147.87, 756.12, -9.4, 2.07)
pt3dadd(-147.13, 757.81, -9.25, 2.07)
pt3dadd(-146.91, 759.21, -9.25, 2.07)
pt3dadd(-146.61, 761.06, -9.2, 2.07)
pt3dadd(-146.76, 762.53, -9, 2.07)
pt3dadd(-147.43, 763.71, -7.95, 2.07)
pt3dadd(-147.57, 764.82, -11.95, 2.07)
pt3dadd(-147.43, 766, -12.25, 2.07)
pt3dadd(-147.35, 766.81, -12.45, 2.07)
pt3dadd(-147.65, 768.3, -13.2, 2.07)
pt3dadd(-148.54, 770.81, -13.85, 2.07)
pt3dadd(-148.83, 772.73, -13.95, 2.07)
pt3dadd(-149.35, 773.91, -13.85, 2.07)
pt3dadd(-149.8, 775.31, -13.55, 2.07)
pt3dadd(-150.24, 776.49, -12.9, 2.07)
pt3dadd(-151.27, 777.82, -11.95, 2.07)
pt3dadd(-151.87, 779.15, -11.15, 2.07)
pt3dadd(-152.16, 780.4, -10.25, 2.07)
pt3dadd(-152.09, 781.95, -9.5, 2.07)
pt3dadd(-151.79, 783.5, -8.8, 2.07)
pt3dadd(-151.05, 785.05, -8.2, 2.07)
pt3dadd(-150.53, 786.82, -8.15, 2.07)
pt3dadd(-149.8, 788.44, -8, 2.07)
pt3dadd(-148.98, 789.99, -7.65, 2.07)
pt3dadd(-148.47, 791.76, -7.4, 2.07)
pt3dadd(-147.8, 793.45, -7.4, 2.07)
pt3dadd(-147.65, 794.78, -7.55, 2.07)
pt3dadd(-147.5, 796.25, -7.8, 2.07)
pt3dadd(-147.28, 797.73, -8.1, 2.07)
pt3dadd(-147.58, 798.91, -8.4, 2.07)
pt3dadd(-147.73, 800.02, -8.65, 2.07)
pt3dadd(-147.53, 801.23, -9.1, 2.07)
pt3dadd(-148.5, 802.93, -9.3, 2.07)
pt3dadd(-149.23, 804.62, -9.35, 2.07)
pt3dadd(-149.75, 805.95, -9.4, 2.07)
pt3dadd(-150.64, 807.5, -9.45, 2.07)
pt3dadd(-151.6, 809.34, -9.5, 2.07)
pt3dadd(-151.3, 811.04, -9.5, 2.07)
pt3dadd(-151.08, 812.81, -9.5, 2.07)
pt3dadd(-149.97, 815.1, -9.55, 2.07)
pt3dadd(-149.23, 816.5, -9.7, 2.07)
pt3dadd(-147.76, 819.08, -9.8, 2.07)
pt3dadd(-147.9, 821.81, -10, 1.48)
pt3dadd(-148.42, 822.91, -10, 1.48)
pt3dadd(-149.97, 824.61, -10, 1.48)
pt3dadd(-150.71, 825.49, -10, 1.48)
pt3dadd(-152.34, 826.97, -10, 1.48)
pt3dadd(-153.89, 828.15, -10, 1.48)
pt3dadd(-155.3, 828.89, -10, 1.48)
pt3dadd(-156.55, 829.48, -10, 1.26)
pt3dadd(-157.88, 830.07, -10, 1.26)
pt3dadd(-157.81, 831.69, -10, 1.03)
pt3dadd(-157.66, 832.28, -10, 1.03)
pt3dadd(-157.44, 833.02, -10, 1.03)
pt3dadd(-157.23, 834.13, -11.35, 0.81)
pt3dadd(-157.23, 835.16, -11.2, 0.81)
pt3dadd(-157.82, 836.71, -9.9, 0.81)
pt3dadd(-157.89, 837.52, -9.75, 0.81)
pt3dadd(-158.41, 838.48, -9.6, 0.81)
pt3dadd(-159.3, 840.25, -9.4, 0.81)
pt3dadd(-159.67, 841.51, -9.35, 0.81)
pt3dadd(-159.59, 842.54, -9.25, 0.81)
pt3dadd(-159.81, 843.35, -9.2, 0.81)
pt3dadd(-159.67, 844.31, -9.2, 0.81)
pt3dadd(-159.52, 845.49, -8.85, 0.81)
pt3dadd(-158.78, 846.89, -8.65, 0.81)
pt3dadd(-158.19, 847.41, -10.7, 0.81)
pt3dadd(-157.37, 848.29, -11.05, 0.81)
pt3dadd(-156.63, 849.4, -11.2, 0.81)
pt3dadd(-157, 850.8, -11.45, 0.81)
pt3dadd(-157.52, 852.35, -11.8, 1.77)
pt3dadd(-158.56, 853.23, -9.6, 1.11)
pt3dadd(-158.85, 854.19, -9.5, 1.11)
pt3dadd(-159.67, 855, -9.35, 1.11)
pt3dadd(-160.11, 855.52, -9.25, 1.11)
pt3dadd(-160.33, 856.48, -9.05, 1.11)
pt3dadd(-161.44, 857.21, -8.5, 1.11)
pt3dadd(-162.7, 857.21, -8.15, 1.11)
pt3dadd(-164.03, 856.99, -7.75, 1.11)
pt3dadd(-163.95, 857.88, -7.5, 1.11)
pt3dadd(-162.84, 858.76, -7.05, 1.11)
pt3dadd(-162.25, 859.35, -5.95, 1.33)
pt3dadd(-161.96, 860.24, -5.9, 1.33)
pt3dadd(-161.81, 861.05, -5.9, 1.33)
pt3dadd(-161.73, 862.08, -5.9, 1.33)
pt3dadd(-161.88, 862.6, -5.85, 1.33)
pt3dadd(-162.33, 863.33, -4.9, 0.96)
pt3dadd(-163.06, 863.7, -4.7, 0.96)
pt3dadd(-163.95, 863.92, -4.55, 0.96)
pt3dadd(-165.21, 863.85, -4.55, 0.96)
pt3dadd(-166.1, 864.22, -4.5, 0.96)
pt3dadd(-166.1, 865.03, -4.5, 0.96)
pt3dadd(-165.8, 865.55, -4.45, 0.96)
pt3dadd(-164.77, 866.73, -4.35, 0.81)
pt3dadd(-164.25, 867.98, -4.3, 0.81)
pt3dadd(-164.17, 869.02, -3.5, 0.81)
pt3dadd(-164.32, 869.9, -1.85, 0.81)
pt3dadd(-164.77, 870.27, -1.5, 0.81)
pt3dadd(-165.65, 870.93, -0.95, 0.81)
pt3dadd(-166.76, 871.38, -0.6, 0.81)
pt3dadd(-167.94, 871.97, -0.3, 0.81)
pt3dadd(-168.61, 872.93, -0.25, 0.81)
pt3dadd(-169.13, 874.18, -0.15, 0.81)
pt3dadd(-169.2, 875.29, 0.05, 0.81)
pt3dadd(-169.72, 876.24, 0.2, 0.81)
pt3dadd(-170.09, 876.76, 0.55, 0.81)
pt3dadd(-170.9, 878.31, 0.9, 0.81)
pt3dadd(-171.34, 879.19, 0.9, 0.81)
pt3dadd(-171.05, 879.86, 0.95, 0.59)
pt3dadd(-170.75, 880.67, 1.2, 0.59)
pt3dadd(-170.23, 881.33, 1.6, 0.59)
pt3dadd(-170.75, 882.51, 1.7, 0.59)
pt3dadd(-171.56, 883.4, 1.75, 0.59)
pt3dadd(-172.75, 883.99, 1.75, 0.59)
pt3dadd(-172.08, 884.73, 1.75, 0.59)
pt3dadd(-171.2, 885.24, 1.75, 0.59)
}
apic[34] {pt3dclear()
pt3dadd(-146.96, 727.45, -24.3, 2.07)
pt3dadd(-148.44, 728.06, -31.7, 2.07)
pt3dadd(-149.92, 729.1, -31.8, 2.07)
pt3dadd(-150.96, 729.91, -31.9, 2.07)
pt3dadd(-151.92, 731.09, -31.95, 2.07)
pt3dadd(-152.66, 732.19, -32, 2.07)
pt3dadd(-153.32, 733.74, -32, 2.07)
pt3dadd(-153.99, 734.77, -32.3, 2.07)
pt3dadd(-154.95, 736.1, -32.35, 2.07)
pt3dadd(-155.32, 736.91, -32.85, 2.07)
pt3dadd(-156.28, 738.09, -32.8, 2.07)
pt3dadd(-156.87, 739.57, -32.55, 2.07)
pt3dadd(-157.53, 740.45, -32.25, 2.07)
pt3dadd(-158.13, 741.63, -31.75, 2.07)
pt3dadd(-158.57, 742.52, -31.55, 2.07)
pt3dadd(-159.46, 743.4, -31.45, 2.07)
pt3dadd(-160.86, 744.29, -31.35, 2.07)
pt3dadd(-162.04, 745.91, -31.3, 2.07)
pt3dadd(-163.67, 746.35, -31.25, 2.07)
pt3dadd(-165.37, 747.31, -31.25, 2.07)
pt3dadd(-166.62, 748.42, -31.2, 2.07)
pt3dadd(-167.81, 749.3, -31.2, 2.07)
pt3dadd(-168.47, 751.22, -31.2, 2.07)
pt3dadd(-168.84, 752.62, -31.2, 2.07)
pt3dadd(-169.2, 753.74, -32, 2.07)
pt3dadd(-169.57, 755.06, -32.25, 2.07)
pt3dadd(-170.16, 756.69, -32.3, 2.07)
pt3dadd(-170.16, 758.01, -32.75, 2.07)
pt3dadd(-170.53, 759.64, -33.3, 2.07)
pt3dadd(-170.9, 761.18, -33.75, 2.07)
pt3dadd(-171.93, 762.29, -34.45, 2.07)
pt3dadd(-172.82, 763.32, -34.95, 2.07)
pt3dadd(-173.63, 764.5, -35.5, 2.07)
pt3dadd(-174.81, 765.39, -35.95, 2.07)
pt3dadd(-175.92, 766.27, -36.5, 2.07)
pt3dadd(-176.44, 767.31, -36.9, 2.07)
pt3dadd(-177.77, 769.3, -37.2, 2.07)
pt3dadd(-178.36, 770.77, -37.25, 2.07)
pt3dadd(-179.32, 771.8, -37.75, 2.07)
pt3dadd(-180.06, 773.06, -38, 2.07)
pt3dadd(-180.58, 774.39, -38.7, 2.07)
pt3dadd(-180.8, 776.01, -38.9, 2.07)
pt3dadd(-180.58, 777.48, -39.55, 2.07)
pt3dadd(-180.28, 778.96, -40.15, 2.07)
pt3dadd(-179.99, 780.73, -40.55, 2.07)
pt3dadd(-180.43, 781.83, -41.2, 2.07)
pt3dadd(-181.61, 783.09, -41.45, 2.07)
pt3dadd(-182.72, 783.82, -42, 2.07)
pt3dadd(-184.05, 784.34, -42.15, 2.07)
pt3dadd(-185.46, 785.59, -42.2, 2.07)
pt3dadd(-186.26, 786.68, -42.4, 2.07)
pt3dadd(-187.37, 787.64, -42.85, 2.07)
pt3dadd(-188.18, 788.67, -42.95, 2.07)
pt3dadd(-189.51, 790.44, -43.05, 2.07)
pt3dadd(-190.1, 791.7, -43.05, 2.07)
pt3dadd(-191.66, 793.69, -43.05, 2.07)
pt3dadd(-192.62, 795.09, -43.3, 2.07)
pt3dadd(-194.17, 796.57, -43.6, 2.07)
pt3dadd(-195.87, 796.71, -43.65, 2.07)
pt3dadd(-197.57, 796.79, -43.95, 2.07)
pt3dadd(-199.42, 796.71, -44.3, 2.07)
pt3dadd(-201.04, 797.45, -44.6, 2.07)
pt3dadd(-201.34, 798.7, -44.9, 2.07)
pt3dadd(-201.78, 800.55, -45.2, 2.07)
pt3dadd(-202.74, 801.95, -45.35, 2.07)
pt3dadd(-203.19, 803.42, -45.45, 2.07)
pt3dadd(-204.07, 804.83, -45.75, 2.29)
pt3dadd(-204.74, 806.15, -45.75, 2.29)
pt3dadd(-205.26, 807.48, -46.15, 2.29)
pt3dadd(-205.85, 809.18, -46.35, 2.29)
pt3dadd(-206.22, 811.09, -46.45, 2.29)
pt3dadd(-206.36, 812.86, -46.45, 2.29)
pt3dadd(-208.06, 814.71, -46.45, 2.29)
pt3dadd(-208.73, 816.03, -46.5, 2.29)
}
}
proc shape3d_26() {
apic[34] { pt3dadd(-209.54, 816.99, -46.5, 2.29)
pt3dadd(-210.58, 818.25, -46.5, 2.29)
pt3dadd(-210.8, 819.44, -47.3, 2.29)
pt3dadd(-211.46, 820.03, -49.1, 2.29)
pt3dadd(-212.05, 821.21, -49.35, 2.29)
pt3dadd(-212.64, 822.61, -51.1, 2.29)
pt3dadd(-212.57, 824.23, -51.2, 2.29)
pt3dadd(-212.79, 825.34, -51.85, 2.29)
pt3dadd(-213.01, 826.44, -53.2, 2.29)
pt3dadd(-213.97, 827.84, -53.45, 2.29)
pt3dadd(-214.2, 829.39, -53.5, 2.29)
pt3dadd(-214.34, 831.46, -53.65, 2.29)
pt3dadd(-214.57, 833.6, -53.9, 2.29)
pt3dadd(-215.3, 835.51, -54.1, 2.29)
pt3dadd(-216.56, 837.14, -54.8, 2.29)
pt3dadd(-217.96, 838.68, -54.95, 2.29)
pt3dadd(-219.44, 840.53, -54.95, 2.29)
pt3dadd(-218.93, 842.15, -57.1, 2.29)
pt3dadd(-219.03, 843.04, -58.75, 0.81)
pt3dadd(-219.1, 844.51, -58.75, 0.81)
pt3dadd(-219.33, 846.73, -58.75, 0.81)
pt3dadd(-219.92, 848.42, -58.75, 0.81)
pt3dadd(-221.54, 848.64, -58.75, 0.81)
pt3dadd(-223.47, 849.45, -58.75, 0.81)
pt3dadd(-222.65, 850.41, -58.75, 0.81)
}
apic[35] {pt3dclear()
pt3dadd(-142.37, 719.78, -22.5, 0.81)
pt3dadd(-141.35, 720.14, -22.65, 0.81)
pt3dadd(-141.05, 721.54, -22.65, 0.81)
pt3dadd(-141.35, 722.8, -22.9, 0.81)
pt3dadd(-141.57, 723.68, -22.95, 0.81)
pt3dadd(-142.46, 724.71, -22.95, 0.81)
pt3dadd(-142.97, 725.52, -23.05, 0.81)
pt3dadd(-143.71, 726.34, -23.3, 0.81)
pt3dadd(-144.38, 727.29, -23.75, 0.81)
pt3dadd(-144.53, 728.33, -23.75, 0.81)
pt3dadd(-145.12, 729.21, -23.65, 0.81)
pt3dadd(-145.41, 730.02, -23.3, 0.81)
pt3dadd(-145.78, 730.98, -22.8, 0.81)
pt3dadd(-146.08, 731.57, -21.85, 0.81)
pt3dadd(-146.67, 732.83, -21.55, 0.81)
pt3dadd(-146.6, 733.71, -23.1, 0.81)
pt3dadd(-145.78, 734.82, -26.05, 1.26)
pt3dadd(-145.63, 736, -26.1, 1.26)
pt3dadd(-145.78, 737.25, -26.2, 1.26)
pt3dadd(-146, 739.02, -26.3, 1.26)
pt3dadd(-145.71, 740.35, -26.4, 1.26)
pt3dadd(-145.19, 741.6, -26.7, 1.26)
pt3dadd(-144.6, 743.3, -27.6, 1.26)
pt3dadd(-144.45, 744.62, -27.7, 1.26)
pt3dadd(-143.57, 746.17, -28, 1.26)
pt3dadd(-144.38, 747.43, -29.85, 1.26)
pt3dadd(-144.9, 748.31, -30.75, 1.26)
pt3dadd(-145.56, 748.83, -30.95, 1.26)
pt3dadd(-146.45, 749.34, -31.25, 1.26)
pt3dadd(-147.48, 750.16, -31.55, 1.26)
pt3dadd(-148.81, 751.85, -31.7, 1.26)
pt3dadd(-148.81, 752.59, -31.7, 1.26)
pt3dadd(-149.2, 753.87, -31.7, 1.48)
pt3dadd(-149.27, 755.35, -31.7, 1.48)
pt3dadd(-148.53, 756.53, -31.7, 1.48)
pt3dadd(-148.09, 757.93, -31.75, 1.63)
pt3dadd(-147.87, 759.33, -32.4, 1.63)
pt3dadd(-147.35, 760.73, -32.85, 1.63)
pt3dadd(-147.35, 761.99, -33, 1.63)
pt3dadd(-147.27, 763.31, -33.5, 1.63)
pt3dadd(-147.13, 764.86, -34, 1.63)
pt3dadd(-147.42, 766.56, -34.4, 1.63)
pt3dadd(-147.94, 767.81, -34.65, 1.63)
pt3dadd(-148.68, 768.99, -34.85, 1.63)
pt3dadd(-149.12, 770.39, -35.05, 1.63)
pt3dadd(-149.12, 771.79, -35.2, 1.63)
pt3dadd(-148.9, 773.05, -35.25, 1.63)
pt3dadd(-148.38, 773.93, -35.2, 1.63)
pt3dadd(-148.09, 775.11, -35, 1.63)
pt3dadd(-147.87, 776.44, -34.75, 1.63)
pt3dadd(-146.76, 777.25, -34.35, 1.7)
pt3dadd(-145.8, 778.8, -33.05, 1.7)
pt3dadd(-145.72, 780.35, -32.9, 1.7)
pt3dadd(-145.87, 781.38, -32.8, 1.7)
pt3dadd(-146.02, 782.63, -32.75, 1.7)
pt3dadd(-145.94, 784.11, -32.75, 1.7)
pt3dadd(-145.57, 785.07, -32.7, 1.7)
pt3dadd(-145.04, 785.98, -32.7, 1.7)
pt3dadd(-145.11, 787.38, -32.7, 1.7)
pt3dadd(-145.56, 790.26, -32.65, 1.7)
}
apic[36] {pt3dclear()
pt3dadd(-145.56, 790.26, -32.65, 1.33)
pt3dadd(-145.11, 791.44, -32.65, 1.33)
pt3dadd(-145.48, 792.77, -32.65, 1.33)
pt3dadd(-144.45, 794.24, -32.65, 1.33)
pt3dadd(-142.9, 795.2, -32.65, 1.33)
pt3dadd(-141.49, 796.01, -32.65, 1.33)
pt3dadd(-140.53, 797.64, -32.65, 1.33)
pt3dadd(-139.57, 799.04, -32.65, 1.33)
pt3dadd(-140.16, 800.36, -32.65, 1.33)
pt3dadd(-140.6, 802.21, -32.65, 1.33)
pt3dadd(-140.75, 803.9, -32.65, 1.33)
pt3dadd(-140.53, 805.16, -32.4, 1.33)
pt3dadd(-140.68, 807.22, -32.4, 1.33)
pt3dadd(-140.53, 808.33, -32.65, 1.33)
pt3dadd(-140.6, 809.58, -33, 1.33)
pt3dadd(-140.46, 810.91, -34.1, 1.33)
pt3dadd(-140.38, 812.02, -34.35, 1.33)
pt3dadd(-140.09, 813.49, -34.45, 1.33)
pt3dadd(-139.79, 814.74, -34.55, 1.33)
pt3dadd(-139.13, 815.85, -34.65, 1.33)
pt3dadd(-138.46, 816.81, -34.65, 1.33)
pt3dadd(-137.06, 817.69, -34.7, 1.33)
pt3dadd(-136.27, 819.13, -34.75, 1.33)
pt3dadd(-135.09, 820.45, -34.8, 1.33)
pt3dadd(-134.57, 822.89, -34.8, 1.33)
pt3dadd(-134.42, 824.51, -34.8, 1.33)
pt3dadd(-134.57, 826.35, -34.8, 1.33)
pt3dadd(-133.98, 828.2, -34.8, 1.33)
pt3dadd(-132.8, 829.75, -34.8, 1.33)
pt3dadd(-131.91, 830.7, -34.9, 1.33)
pt3dadd(-131.69, 831.96, -34.95, 1.55)
pt3dadd(-131.1, 833.29, -34.95, 1.55)
pt3dadd(-130.73, 834.47, -35.1, 1.55)
pt3dadd(-130.14, 835.79, -35.4, 1.55)
pt3dadd(-129.69, 837.34, -35.7, 1.55)
pt3dadd(-128.73, 838.59, -35.95, 1.55)
pt3dadd(-127.92, 840.14, -36.1, 1.55)
pt3dadd(-127.84, 841.4, -36.4, 1.55)
pt3dadd(-128.29, 842.72, -36.75, 1.55)
pt3dadd(-128.29, 844.35, -37, 1.55)
pt3dadd(-128.29, 845.45, -37.15, 1.55)
pt3dadd(-127.55, 846.34, -37.25, 1.55)
pt3dadd(-126.07, 847.3, -37.4, 1.55)
pt3dadd(-124.96, 848.48, -37.4, 1.55)
pt3dadd(-124.3, 849.14, -37.45, 1.55)
pt3dadd(-123.41, 850.25, -37.45, 1.55)
pt3dadd(-123.28, 851.58, -37.55, 1.55)
pt3dadd(-122.62, 852.91, -37.6, 1.55)
pt3dadd(-121.51, 853.79, -38.95, 1.55)
pt3dadd(-120.7, 854.75, -36.55, 1.55)
pt3dadd(-119.51, 856.08, -36.2, 1.55)
pt3dadd(-119.44, 857.4, -35.95, 1.55)
pt3dadd(-118.7, 859.4, -35.8, 1.55)
pt3dadd(-118.26, 861.09, -35.7, 1.55)
pt3dadd(-117.3, 862.64, -35.6, 1.55)
pt3dadd(-116.41, 863.67, -35.6, 1.55)
pt3dadd(-115.15, 864.12, -35.65, 1.55)
pt3dadd(-113.75, 864.85, -35.75, 1.55)
pt3dadd(-112.2, 865.74, -36.1, 1.55)
pt3dadd(-111.9, 867.14, -36.35, 1.55)
pt3dadd(-111.68, 868.69, -36.65, 1.55)
pt3dadd(-113.16, 870.09, -36.9, 1.55)
pt3dadd(-113.6, 871.34, -37.3, 1.55)
pt3dadd(-114.41, 873.26, -37.5, 1.55)
pt3dadd(-114.34, 874.96, -38.05, 1.55)
pt3dadd(-113.6, 876.43, -38.1, 1.55)
pt3dadd(-112.64, 878.2, -38.45, 1.55)
pt3dadd(-112.12, 880.27, -38.5, 1.55)
pt3dadd(-110.57, 881.74, -38.6, 1.55)
pt3dadd(-109.31, 882.7, -38.65, 1.55)
pt3dadd(-108.8, 883.07, -38.65, 1.55)
pt3dadd(-107.72, 883.86, -39.75, 1.55)
pt3dadd(-106.61, 885.19, -40.35, 1.55)
pt3dadd(-105.58, 886.44, -40.85, 1.55)
pt3dadd(-104.47, 887.7, -41.25, 1.55)
pt3dadd(-104.47, 889.02, -41.6, 1.55)
pt3dadd(-103.14, 889.84, -41.6, 1.55)
pt3dadd(-102.33, 891.46, -41.6, 1.55)
pt3dadd(-102.1, 892.79, -42.1, 1.55)
pt3dadd(-101.88, 894.26, -42.4, 1.55)
pt3dadd(-101.07, 896.4, -42.45, 1.55)
pt3dadd(-99.52, 898.46, -42.5, 1.55)
pt3dadd(-97.74, 899.94, -42.8, 1.55)
pt3dadd(-97.6, 900.68, -40.65, 1.55)
pt3dadd(-97.01, 901.93, -40.55, 1.55)
pt3dadd(-96.34, 903.26, -40.45, 1.55)
pt3dadd(-95.53, 904.59, -40.25, 1.55)
pt3dadd(-94.42, 905.99, -40.05, 1.55)
pt3dadd(-94.27, 906.94, -39.8, 1.55)
pt3dadd(-94.27, 908.79, -39.45, 1.55)
pt3dadd(-93.46, 910.41, -39.25, 1.55)
}
apic[37] {pt3dclear()
pt3dadd(-93.46, 910.41, -39.25, 1.4)
pt3dadd(-92.35, 911.37, -37.75, 1.4)
pt3dadd(-91.54, 912.25, -37.6, 1.4)
pt3dadd(-90.65, 913.51, -37, 1.4)
pt3dadd(-90.65, 914.69, -36.9, 1.4)
pt3dadd(-90.35, 916.16, -36.85, 1.4)
pt3dadd(-89.84, 917.67, -36.75, 1.4)
pt3dadd(-88.58, 919.14, -36.75, 1.4)
pt3dadd(-87.33, 920.25, -36.75, 1.4)
pt3dadd(-85.63, 921.21, -36.75, 1.4)
pt3dadd(-84, 922.17, -36.7, 1.4)
pt3dadd(-82.08, 923.2, -36.7, 1.4)
pt3dadd(-80.53, 923.64, -36.65, 1.4)
pt3dadd(-79.64, 924.31, -36.65, 1.4)
pt3dadd(-77.79, 925.12, -36.6, 1.4)
pt3dadd(-76.46, 925.19, -36.6, 1.4)
pt3dadd(-74.98, 925.12, -36.6, 1.4)
pt3dadd(-73.8, 926.3, -36.6, 1.4)
pt3dadd(-72.91, 928.07, -36.6, 1.4)
pt3dadd(-71.73, 929.32, -36.6, 1.4)
pt3dadd(-69.74, 931.02, -36.6, 1.4)
pt3dadd(-68.85, 932.34, -36.6, 1.4)
pt3dadd(-67.3, 933.82, -36.6, 1.4)
pt3dadd(-66.19, 934.56, -36.55, 1.4)
}
}
proc shape3d_27() {
apic[37] { pt3dadd(-64.04, 934.34, -36.05, 1.4)
pt3dadd(-62.35, 934.48, -35.85, 1.4)
pt3dadd(-61.24, 935.37, -35.75, 1.4)
pt3dadd(-59.39, 936.47, -35.7, 1.4)
pt3dadd(-58.95, 938.02, -35.65, 1.4)
pt3dadd(-58.13, 939.42, -35.65, 1.4)
pt3dadd(-56.8, 940.46, -35.65, 1.4)
pt3dadd(-56.51, 942.3, -35.65, 1.4)
pt3dadd(-55.18, 943.55, -35.05, 1.4)
pt3dadd(-53.85, 944.88, -34.95, 1.4)
pt3dadd(-52.59, 945.18, -34.9, 1.4)
pt3dadd(-50.82, 945.1, -33.8, 1.4)
pt3dadd(-49.85, 945.84, -33.45, 1.4)
pt3dadd(-49.26, 946.95, -32.65, 1.4)
pt3dadd(-48.45, 947.83, -32.05, 1.4)
pt3dadd(-48.3, 948.79, -32, 1.4)
pt3dadd(-47.37, 951.65, -31.55, 1.4)
pt3dadd(-46.63, 953.79, -31.55, 1.4)
pt3dadd(-45.6, 955.78, -31.5, 1.4)
pt3dadd(-45.3, 956.88, -30.9, 1.4)
pt3dadd(-44.04, 958.43, -30.8, 1.4)
pt3dadd(-43.82, 960.35, -30.8, 1.4)
pt3dadd(-43.01, 962.86, -30.8, 1.4)
pt3dadd(-42.05, 965.14, -30.75, 1.4)
pt3dadd(-41.16, 968.24, -30.75, 1.4)
}
apic[38] {pt3dclear()
pt3dadd(-41.16, 968.24, -30.75, 1.33)
pt3dadd(-39.61, 968.98, -30.75, 1.33)
pt3dadd(-38.28, 969.27, -30.7, 1.33)
pt3dadd(-36.51, 970.45, -30.7, 1.18)
pt3dadd(-34.88, 971.71, -30.7, 1.18)
pt3dadd(-34.21, 973.26, -30.7, 1.18)
pt3dadd(-33.33, 975.84, -30.7, 1.18)
pt3dadd(-32.66, 977.83, -30.7, 1.18)
pt3dadd(-31.41, 979.52, -30.7, 1.18)
pt3dadd(-29.26, 980.41, -30.7, 1.18)
pt3dadd(-28.38, 981.22, -30.7, 1.18)
pt3dadd(-27.67, 981.91, -30.3, 1.18)
pt3dadd(-26.7, 982.95, -30.1, 1.18)
pt3dadd(-26.26, 984.35, -29.55, 1.18)
pt3dadd(-24.71, 985.45, -29.2, 1.18)
pt3dadd(-23.23, 986.63, -28.75, 1.18)
pt3dadd(-21.75, 987.15, -28.35, 1.18)
pt3dadd(-18.8, 988.04, -28, 1.18)
pt3dadd(-17.17, 987.81, -27.6, 1.18)
pt3dadd(-15.62, 987.37, -26.75, 1.18)
pt3dadd(-13.33, 987, -26.4, 1.18)
pt3dadd(-11.92, 987.96, -25.4, 1.18)
pt3dadd(-9.26, 988.92, -25.4, 1.18)
pt3dadd(-8.38, 990.4, -25.4, 1.18)
pt3dadd(-6.6, 991.5, -25.35, 1.18)
pt3dadd(-4.83, 991.13, -24.55, 1.03)
pt3dadd(-3.64, 990.4, -24.4, 1.03)
pt3dadd(-1.72, 989.51, -24.4, 1.03)
pt3dadd(-0.47, 990.03, -24.4, 1.03)
pt3dadd(0.35, 991.28, -24.35, 1.03)
pt3dadd(1.31, 992.61, -24.35, 1.03)
pt3dadd(2.42, 994.01, -24.35, 1.03)
pt3dadd(3.82, 993.71, -24.35, 1.03)
pt3dadd(5.82, 993.42, -24.35, 1.03)
pt3dadd(7.37, 994.38, -23.8, 1.03)
pt3dadd(7.81, 996.15, -23.6, 1.03)
pt3dadd(9.44, 997.18, -23.55, 1.03)
pt3dadd(11.14, 998.58, -23.55, 1.03)
pt3dadd(12.54, 999.69, -23.55, 1.03)
pt3dadd(14.32, 1000.13, -23.5, 1.03)
pt3dadd(16.16, 1000.72, -23.25, 1.03)
pt3dadd(17.57, 1002.05, -23, 1.03)
pt3dadd(19.34, 1001.97, -22.95, 1.03)
pt3dadd(20.15, 1002.34, -22.95, 1.03)
pt3dadd(20.89, 1002.64, -22.95, 1.03)
pt3dadd(22.52, 1003.07, -22.9, 1.03)
pt3dadd(23.85, 1004.39, -22.9, 1.03)
pt3dadd(25.03, 1005.87, -22.9, 1.03)
}
apic[39] {pt3dclear()
pt3dadd(25.03, 1005.87, -22.9, 1.03)
pt3dadd(26.73, 1006.02, -22.15, 1.03)
pt3dadd(28.21, 1006.09, -21.55, 1.03)
pt3dadd(29.98, 1005.72, -21.3, 1.03)
pt3dadd(31.61, 1005.06, -21.25, 1.03)
pt3dadd(32.79, 1004.32, -21.25, 1.03)
pt3dadd(33.97, 1004.25, -21.2, 0.96)
pt3dadd(34.27, 1005.57, -21.2, 0.96)
pt3dadd(34.93, 1006.24, -21.2, 0.96)
pt3dadd(35.89, 1006.02, -21.2, 0.89)
pt3dadd(37.15, 1005.5, -21.2, 0.89)
pt3dadd(38.48, 1005.65, -21.2, 0.89)
pt3dadd(40.4, 1006.61, -21.2, 0.89)
pt3dadd(42.1, 1007.64, -20.7, 0.89)
pt3dadd(44.1, 1008.52, -20.55, 0.89)
pt3dadd(45.87, 1009.48, -20.55, 0.89)
pt3dadd(47.79, 1009.34, -20.55, 0.89)
pt3dadd(50.16, 1009.56, -20, 0.89)
pt3dadd(50.9, 1010.74, -19.75, 0.89)
pt3dadd(52.3, 1012.51, -20.25, 0.89)
pt3dadd(53.85, 1014.57, -20.95, 0.81)
pt3dadd(55.63, 1015.16, -21.2, 0.81)
pt3dadd(57.85, 1014.94, -21.4, 0.81)
pt3dadd(60.06, 1014.79, -21.5, 0.81)
pt3dadd(61.02, 1016.12, -21.7, 0.81)
pt3dadd(63.17, 1016.71, -22, 0.81)
pt3dadd(65.38, 1017.15, -22.3, 0.81)
pt3dadd(66.79, 1017.74, -22.55, 0.81)
pt3dadd(68.19, 1018.26, -22.65, 0.81)
pt3dadd(69.23, 1018.63, -22.75, 0.81)
pt3dadd(69.6, 1019.07, -22.85, 0.81)
pt3dadd(70.7, 1019.25, -22.95, 0.81)
pt3dadd(72.18, 1019.61, -23.55, 0.81)
pt3dadd(72.7, 1020.94, -23.45, 0.81)
pt3dadd(73.36, 1021.61, -21.15, 0.81)
pt3dadd(74.69, 1022.2, -20.95, 0.81)
pt3dadd(75.43, 1023.01, -20.2, 0.81)
pt3dadd(76.83, 1023.82, -19.25, 0.81)
pt3dadd(78.09, 1024.63, -19, 0.81)
pt3dadd(79.86, 1026.1, -18.7, 0.81)
pt3dadd(81.49, 1026.55, -18.6, 0.81)
pt3dadd(82.97, 1027.51, -18.3, 0.81)
pt3dadd(83.93, 1028.91, -17.8, 0.81)
pt3dadd(85.26, 1030.16, -17.5, 0.81)
pt3dadd(86.44, 1031.12, -17.4, 0.81)
pt3dadd(88.07, 1031.71, -17.3, 0.67)
pt3dadd(88.73, 1031.19, -17.25, 0.67)
pt3dadd(89.55, 1030.6, -17.25, 0.67)
pt3dadd(90.36, 1029.72, -17.2, 0.67)
pt3dadd(91.32, 1029.5, -17.15, 0.67)
}
apic[40] {pt3dclear()
pt3dadd(25.03, 1005.87, -22.9, 0.81)
pt3dadd(25.32, 1007, -21.7, 0.81)
pt3dadd(25.62, 1008.04, -21.7, 0.81)
pt3dadd(26.8, 1009.29, -21.65, 0.81)
pt3dadd(27.09, 1010.32, -21.2, 0.81)
pt3dadd(26.35, 1011.28, -21, 0.81)
pt3dadd(25.54, 1012.83, -20.9, 0.81)
pt3dadd(24.88, 1014.01, -20.85, 0.81)
pt3dadd(25.02, 1015.41, -20.75, 0.81)
pt3dadd(25.02, 1017.11, -20.1, 0.89)
pt3dadd(24.58, 1018.51, -19.9, 0.89)
pt3dadd(24.88, 1019.98, -19.9, 0.89)
pt3dadd(25.02, 1020.87, -19.5, 0.89)
pt3dadd(24.95, 1022.2, -19.45, 0.89)
pt3dadd(24.58, 1023.6, -19.45, 0.89)
pt3dadd(24.06, 1025.29, -19.4, 0.89)
pt3dadd(24.58, 1026.69, -19.4, 0.89)
pt3dadd(25.98, 1027.87, -19.4, 0.89)
pt3dadd(26.8, 1029.2, -18.35, 0.89)
pt3dadd(26.87, 1030.68, -18.1, 0.89)
pt3dadd(26.13, 1032.08, -18, 0.89)
pt3dadd(26.58, 1033.11, -18, 0.89)
pt3dadd(27.24, 1034, -17.85, 0.89)
pt3dadd(27.24, 1035.1, -16.65, 0.89)
pt3dadd(28.57, 1036.28, -16.5, 0.89)
pt3dadd(29.53, 1037.24, -16.2, 0.89)
pt3dadd(29.02, 1038.49, -15.9, 0.89)
pt3dadd(28.87, 1039.16, -14.7, 0.89)
pt3dadd(28.72, 1039.82, -13.05, 0.89)
pt3dadd(28.72, 1040.85, -12.35, 0.89)
pt3dadd(28.35, 1041.52, -12.3, 0.89)
pt3dadd(29.38, 1042.03, -11.5, 0.89)
pt3dadd(30.35, 1042.84, -10.85, 0.89)
pt3dadd(30.94, 1043.29, -10.75, 0.89)
pt3dadd(31.97, 1044.1, -10.75, 0.89)
pt3dadd(33.08, 1044.17, -9.9, 0.89)
pt3dadd(34.48, 1044.84, -8.9, 0.89)
pt3dadd(35.89, 1044.69, -8.65, 0.89)
pt3dadd(36.33, 1044.39, -8.55, 0.74)
pt3dadd(37, 1043.88, -8.05, 0.74)
pt3dadd(38.11, 1043.73, -7.95, 0.74)
pt3dadd(38.99, 1043.88, -7.65, 0.74)
pt3dadd(39.73, 1043.58, -7.4, 1.18)
pt3dadd(40.77, 1043.58, -7.4, 1.03)
pt3dadd(41.88, 1043.8, -7.35, 1.03)
pt3dadd(42.39, 1045.06, -7.05, 1.03)
pt3dadd(43.35, 1046.02, -7, 0.89)
pt3dadd(44.39, 1046.38, -6.95, 0.89)
pt3dadd(45.87, 1046.75, -6.95, 0.89)
}
apic[41] {pt3dclear()
pt3dadd(-41.16, 968.24, -30.75, 0.89)
pt3dadd(-41.3, 969.19, -32.15, 0.89)
pt3dadd(-40.04, 969.7, -32.4, 0.89)
pt3dadd(-39.08, 970.37, -32.75, 0.89)
pt3dadd(-37.97, 970.81, -32.95, 0.89)
pt3dadd(-37.01, 971.47, -33.15, 0.89)
pt3dadd(-36.42, 972.8, -33.5, 0.89)
pt3dadd(-36.34, 973.76, -33.85, 0.89)
pt3dadd(-36.42, 975.09, -34.15, 0.89)
pt3dadd(-36.94, 975.68, -35.4, 0.89)
pt3dadd(-37.08, 976.56, -35.65, 0.89)
pt3dadd(-37.38, 977.45, -36.25, 0.89)
pt3dadd(-37.67, 978.11, -36.3, 0.89)
pt3dadd(-38.12, 978.85, -36.35, 0.89)
pt3dadd(-37.3, 979.29, -38.85, 1.03)
pt3dadd(-36.12, 980.32, -40.2, 1.03)
pt3dadd(-34.64, 980.99, -40.35, 1.03)
pt3dadd(-33.31, 980.84, -40.55, 1.03)
pt3dadd(-32.57, 980.25, -45.25, 1.03)
pt3dadd(-31.76, 978.78, -45.25, 1.03)
pt3dadd(-31.1, 980.55, -45.3, 1.03)
pt3dadd(-30.28, 981.36, -46.6, 1.03)
pt3dadd(-29.32, 982.39, -47.15, 1.03)
pt3dadd(-28.14, 982.54, -47.4, 1.03)
pt3dadd(-26.81, 982.83, -48.5, 1.03)
pt3dadd(-25.7, 982.91, -49.55, 1.03)
pt3dadd(-24.67, 983.42, -50.7, 1.03)
pt3dadd(-23.78, 984.16, -51.2, 1.03)
}
}
proc shape3d_28() {
apic[41] { pt3dadd(-22.74, 984.6, -51.55, 1.03)
pt3dadd(-21.93, 985.63, -52.15, 1.03)
pt3dadd(-22.08, 986.37, -52.65, 1.03)
pt3dadd(-22.15, 987.18, -54.65, 1.03)
pt3dadd(-21.12, 987.85, -54.75, 1.03)
pt3dadd(-19.71, 988.95, -57.2, 1.03)
pt3dadd(-18.68, 989.62, -57.9, 1.03)
pt3dadd(-17.2, 989.84, -58.1, 1.03)
pt3dadd(-16.31, 989.91, -58.4, 1.03)
pt3dadd(-14.76, 989.99, -58.85, 1.03)
pt3dadd(-13.28, 990.58, -60.2, 1.03)
pt3dadd(-14.17, 991.16, -60.6, 1.03)
pt3dadd(-15.06, 991.98, -62.4, 1.03)
pt3dadd(-14.1, 992.79, -62.9, 1.03)
pt3dadd(-13.14, 994.11, -63.05, 1.03)
pt3dadd(-13.28, 995.44, -63.15, 1.03)
pt3dadd(-12.32, 996.4, -63.4, 1.03)
pt3dadd(-11.36, 996.99, -63.6, 1.03)
pt3dadd(-10.18, 997.73, -63.6, 1.03)
pt3dadd(-9.51, 999.42, -63.8, 1.03)
pt3dadd(-10.25, 1000.31, -64.05, 1.03)
pt3dadd(-10.25, 1001.42, -64.1, 1.03)
pt3dadd(-9.3, 1002.38, -65.4, 1.03)
pt3dadd(-8.26, 1003.26, -65.45, 1.03)
pt3dadd(-7.15, 1004.3, -65.8, 1.03)
pt3dadd(-6.71, 1005.77, -66, 1.03)
pt3dadd(-6.49, 1007.1, -66.65, 1.03)
pt3dadd(-5.75, 1007.84, -66.8, 1.03)
pt3dadd(-3.9, 1008.13, -67.2, 1.03)
pt3dadd(-3.09, 1008.65, -68.65, 1.03)
pt3dadd(-1.98, 1009.53, -68.85, 1.03)
pt3dadd(-1.09, 1010.2, -72, 1.03)
pt3dadd(-0.8, 1010.86, -72.15, 1.03)
pt3dadd(-0.65, 1012.56, -72.3, 1.03)
pt3dadd(0.39, 1013.66, -72.65, 1.03)
pt3dadd(2.31, 1014.4, -72.9, 1.03)
pt3dadd(3.86, 1014.4, -75.1, 1.03)
pt3dadd(4.75, 1014.92, -75.4, 1.03)
pt3dadd(5.19, 1015.73, -76.15, 0.89)
pt3dadd(5.93, 1016.54, -76.2, 0.89)
pt3dadd(6.82, 1017.5, -76.7, 0.89)
pt3dadd(6.96, 1018.16, -77.05, 1.11)
pt3dadd(7.7, 1018.68, -77.1, 1.11)
pt3dadd(8.59, 1019.64, -77.45, 1.11)
pt3dadd(9.03, 1020.59, -77.7, 1.11)
pt3dadd(9.62, 1021.41, -77.75, 1.11)
pt3dadd(10.22, 1022.14, -78.1, 1.11)
pt3dadd(11.4, 1023.32, -78.25, 1.11)
}
apic[42] {pt3dclear()
pt3dadd(-93.46, 910.41, -39.25, 0.67)
pt3dadd(-94.43, 911.01, -37.55, 0.67)
pt3dadd(-94.51, 912.34, -37.5, 0.67)
pt3dadd(-95.1, 913.23, -37.45, 0.67)
pt3dadd(-96.8, 913.67, -37.4, 0.67)
pt3dadd(-97.61, 914.04, -37.35, 0.67)
pt3dadd(-98.8, 914.33, -37.35, 0.67)
pt3dadd(-99.39, 915.14, -37.3, 0.67)
pt3dadd(-99.9, 916.91, -37.15, 0.67)
pt3dadd(-100.05, 918.02, -37, 0.67)
pt3dadd(-100.5, 919.13, -37, 0.67)
pt3dadd(-101.31, 919.35, -37.1, 0.67)
pt3dadd(-102.05, 919.86, -37.25, 0.67)
pt3dadd(-103.01, 921.12, -37.45, 0.67)
pt3dadd(-103.75, 922.52, -37.5, 0.67)
pt3dadd(-104.04, 923.18, -36.9, 0.67)
pt3dadd(-104.56, 923.92, -35.9, 0.67)
pt3dadd(-105.15, 924.22, -35.1, 0.67)
pt3dadd(-105.6, 924.44, -34.85, 0.67)
pt3dadd(-106.56, 924.81, -34.8, 0.67)
pt3dadd(-107.07, 925.03, -34.85, 0.67)
pt3dadd(-107.74, 925.32, -35, 0.67)
pt3dadd(-108.85, 925.84, -35.2, 0.67)
pt3dadd(-109.51, 926.58, -35.4, 0.67)
pt3dadd(-110.92, 926.8, -35.6, 0.67)
pt3dadd(-112.03, 927.24, -35.85, 0.67)
pt3dadd(-112.62, 927.98, -36.1, 0.67)
pt3dadd(-112.62, 929.75, -36.3, 0.67)
pt3dadd(-112.54, 930.85, -36.35, 0.67)
pt3dadd(-112.47, 931.96, -35.85, 0.67)
pt3dadd(-113.13, 932.84, -35.5, 0.67)
pt3dadd(-113.95, 933.73, -35, 0.67)
pt3dadd(-114.83, 935.13, -34.6, 0.67)
pt3dadd(-115.42, 935.79, -34.6, 0.67)
pt3dadd(-116.53, 937.05, -34.7, 0.67)
pt3dadd(-116.46, 938.15, -34.85, 0.67)
pt3dadd(-116.24, 939.63, -35.1, 0.81)
pt3dadd(-116.24, 940.59, -35.75, 0.81)
pt3dadd(-116.24, 941.32, -35.8, 0.81)
pt3dadd(-116.98, 942.43, -33, 0.81)
pt3dadd(-117.71, 943.52, -32.65, 0.81)
pt3dadd(-118.82, 944.63, -32.65, 0.81)
pt3dadd(-119.56, 945.73, -32.65, 0.81)
pt3dadd(-120.52, 946.25, -32.65, 0.81)
pt3dadd(-121.78, 946.99, -32.65, 0.81)
pt3dadd(-122.07, 948.61, -32.65, 0.81)
pt3dadd(-121.63, 950.16, -32.55, 0.81)
pt3dadd(-121.93, 951.85, -32.2, 0.81)
pt3dadd(-122.3, 952.96, -32.1, 0.81)
pt3dadd(-122.74, 953.62, -32.2, 0.81)
pt3dadd(-123.48, 954.51, -32.4, 0.81)
pt3dadd(-124.36, 955.1, -32.55, 0.81)
pt3dadd(-125.1, 956.06, -32.7, 0.81)
pt3dadd(-124.51, 957.46, -32.85, 0.81)
pt3dadd(-124, 959.08, -32.9, 0.81)
pt3dadd(-123.55, 960.78, -32.95, 0.81)
pt3dadd(-122.81, 961.88, -32.95, 0.81)
pt3dadd(-121.93, 963.14, -33.05, 0.81)
pt3dadd(-121.93, 964.83, -33.2, 0.81)
pt3dadd(-122.22, 966.01, -33.5, 0.81)
pt3dadd(-121.93, 967.49, -33.75, 0.81)
pt3dadd(-121.11, 968.59, -33.95, 0.81)
pt3dadd(-120.37, 969.7, -34.4, 0.81)
pt3dadd(-119.27, 970.81, -34.6, 0.81)
pt3dadd(-119.12, 972.58, -35, 0.81)
pt3dadd(-119.34, 973.61, -35.3, 0.81)
pt3dadd(-119.93, 974.57, -36, 0.81)
pt3dadd(-120, 975.38, -37.05, 0.81)
pt3dadd(-120.45, 976.12, -37.1, 0.81)
pt3dadd(-121.53, 977, -37.15, 0.81)
pt3dadd(-122.57, 977.45, -37.2, 0.81)
pt3dadd(-123.6, 978.33, -37.85, 0.81)
pt3dadd(-124.71, 978.92, -38.45, 0.81)
pt3dadd(-125.6, 979.36, -38.65, 0.81)
pt3dadd(-125.52, 980.99, -38.75, 0.81)
pt3dadd(-124.78, 981.8, -39, 0.81)
pt3dadd(-124.56, 983.05, -39.15, 0.81)
pt3dadd(-124.56, 984.45, -39.5, 0.81)
pt3dadd(-124.49, 985.78, -39.8, 0.81)
pt3dadd(-124.19, 987.18, -40, 0.81)
pt3dadd(-124.12, 988.44, -40.05, 0.81)
pt3dadd(-124.63, 989.69, -40.7, 0.81)
pt3dadd(-125.08, 990.8, -41.15, 0.81)
pt3dadd(-125.6, 991.98, -41.25, 0.81)
pt3dadd(-125.74, 993.08, -41.25, 0.81)
pt3dadd(-125.82, 994.34, -41.85, 0.81)
pt3dadd(-125.08, 995.29, -42, 0.81)
pt3dadd(-124.19, 996.47, -42.3, 0.81)
pt3dadd(-123.53, 997.51, -42.45, 0.81)
pt3dadd(-122.86, 998.46, -42.55, 0.81)
pt3dadd(-122.2, 999.42, -42.7, 0.81)
pt3dadd(-122.42, 1000.53, -42.75, 0.81)
pt3dadd(-122.71, 1001.56, -42.75, 0.81)
pt3dadd(-122.2, 1003.04, -42.8, 0.81)
pt3dadd(-121.23, 1004.14, -43.6, 0.81)
pt3dadd(-119.9, 1004.95, -43.8, 0.81)
pt3dadd(-118.28, 1005.1, -44.7, 0.81)
pt3dadd(-117.1, 1004.95, -44.75, 0.81)
pt3dadd(-115.69, 1004.66, -44.75, 0.81)
pt3dadd(-114.66, 1004.88, -45.85, 0.81)
pt3dadd(-114.21, 1005.77, -45.9, 0.81)
pt3dadd(-113.99, 1007.76, -45.9, 0.81)
}
apic[43] {pt3dclear()
pt3dadd(-145.56, 790.26, -32.65, 0.81)
pt3dadd(-146.09, 790.55, -34.25, 0.81)
pt3dadd(-146.76, 791.06, -34.5, 0.81)
pt3dadd(-147.5, 791.73, -34.65, 0.81)
pt3dadd(-147.64, 792.02, -34.7, 1.03)
pt3dadd(-147.94, 793.13, -34.7, 1.03)
pt3dadd(-148.31, 794.31, -35.15, 1.03)
pt3dadd(-148.97, 795.12, -35.7, 1.03)
pt3dadd(-149.12, 796, -36.2, 1.03)
pt3dadd(-149.49, 797.18, -36.35, 1.03)
pt3dadd(-149.12, 798.51, -36.85, 1.03)
pt3dadd(-148.83, 799.84, -37, 1.03)
pt3dadd(-148.97, 801.46, -37.5, 1.03)
pt3dadd(-149.42, 802.27, -37.75, 1.03)
pt3dadd(-149.93, 803.53, -38.3, 1.03)
pt3dadd(-150.45, 804.48, -38.55, 1.03)
pt3dadd(-151.19, 805.37, -38.55, 1.03)
pt3dadd(-151.93, 806.33, -38.5, 1.03)
pt3dadd(-151.71, 807.07, -38.3, 1.03)
pt3dadd(-150.01, 807.36, -37.75, 1.03)
pt3dadd(-149.2, 808.39, -37.6, 1.03)
pt3dadd(-148.75, 809.2, -36.4, 1.03)
pt3dadd(-148.46, 810.24, -39.8, 1.03)
pt3dadd(-148.01, 811.56, -40.3, 1.03)
pt3dadd(-148.09, 812.82, -40.65, 1.03)
pt3dadd(-148.53, 814.37, -41.2, 1.03)
pt3dadd(-147.64, 815.4, -41.35, 1.03)
pt3dadd(-147.2, 816.21, -42, 1.03)
pt3dadd(-146.24, 817.39, -42.15, 1.03)
pt3dadd(-146.98, 818.27, -42.4, 1.03)
pt3dadd(-147.72, 819.53, -42.85, 1.03)
pt3dadd(-148.75, 820.34, -43, 1.03)
pt3dadd(-149.64, 821.45, -43.7, 1.03)
pt3dadd(-150.23, 822.63, -43.85, 1.03)
pt3dadd(-150.6, 823.29, -44.3, 1.03)
pt3dadd(-150.52, 824.61, -45.75, 1.63)
pt3dadd(-150.89, 825.72, -45.75, 1.63)
pt3dadd(-151.11, 826.67, -45.75, 1.63)
pt3dadd(-151.33, 827.56, -45.75, 1.85)
pt3dadd(-152.15, 828.89, -45.75, 1.85)
pt3dadd(-152.52, 830.66, -45.75, 1.85)
pt3dadd(-152.37, 831.62, -45.75, 1.85)
pt3dadd(-152, 832.94, -47, 1.48)
pt3dadd(-151.78, 834.49, -47, 1.48)
pt3dadd(-151.93, 836.04, -47, 1.48)
pt3dadd(-152.3, 837.07, -47, 1.33)
pt3dadd(-153.03, 837.88, -47, 1.33)
pt3dadd(-153.92, 839.14, -46.95, 1.33)
pt3dadd(-154.14, 840.24, -46.9, 1.33)
pt3dadd(-153.4, 841.65, -46.9, 1.33)
}
}
proc shape3d_29() {
apic[43] { pt3dadd(-152, 843.19, -47.8, 1.33)
pt3dadd(-151.56, 845.26, -48.1, 1.33)
pt3dadd(-151.33, 847.4, -48.15, 1.33)
pt3dadd(-151.11, 849.09, -48.75, 1.33)
pt3dadd(-151.19, 850.72, -48.95, 1.33)
pt3dadd(-152, 852.56, -49, 1.33)
pt3dadd(-152.07, 854.03, -49.1, 1.33)
pt3dadd(-152.3, 855.44, -49.15, 1.33)
pt3dadd(-152.22, 856.62, -49.2, 1.33)
pt3dadd(-152.1, 857.89, -49.95, 1.33)
pt3dadd(-151.73, 859.66, -50, 1.33)
pt3dadd(-150.62, 860.77, -50, 1.18)
pt3dadd(-149.88, 862.1, -50, 1.18)
pt3dadd(-149, 863.5, -50, 1.18)
pt3dadd(-149.14, 865.2, -50.75, 1.18)
pt3dadd(-149.81, 866.74, -50.9, 1.18)
pt3dadd(-150.62, 868.81, -51.4, 1.18)
pt3dadd(-150.03, 870.21, -51.5, 1.18)
pt3dadd(-148.4, 871.54, -51.55, 1.18)
pt3dadd(-146.7, 872.42, -52.25, 1.18)
pt3dadd(-144.86, 872.28, -52.4, 1.18)
pt3dadd(-143.53, 873.68, -52.9, 1.18)
pt3dadd(-143.3, 875.23, -53.35, 1.18)
pt3dadd(-143.9, 876.55, -53.8, 1.18)
pt3dadd(-144.56, 878.17, -54.15, 1.18)
pt3dadd(-145, 879.21, -54.35, 1.18)
pt3dadd(-146.04, 879.72, -54.85, 1.18)
pt3dadd(-147.07, 880.46, -55.35, 1.18)
pt3dadd(-148.55, 881.27, -55.75, 1.18)
pt3dadd(-148.7, 882.3, -56.15, 1.18)
pt3dadd(-148.92, 883.93, -56.55, 1.18)
pt3dadd(-149, 885.48, -56.8, 1.18)
pt3dadd(-148.63, 886.66, -57.1, 1.18)
pt3dadd(-148.63, 887.84, -57.45, 1.18)
pt3dadd(-148.48, 888.72, -57.7, 1.18)
pt3dadd(-148.87, 890.27, -57.95, 1.18)
pt3dadd(-149.17, 892.04, -58.2, 1.18)
pt3dadd(-149.32, 893.07, -58.75, 1.18)
pt3dadd(-149.83, 894.03, -58.9, 1.18)
pt3dadd(-150.94, 894.84, -59.55, 1.18)
pt3dadd(-151.83, 895.8, -59.7, 1.18)
pt3dadd(-152.72, 897.42, -60.15, 1.18)
pt3dadd(-152.42, 898.68, -60.25, 1.18)
pt3dadd(-151.61, 899.78, -60.45, 1.18)
pt3dadd(-150.87, 900.74, -60.65, 1.18)
pt3dadd(-150.57, 901.77, -60.7, 1.18)
pt3dadd(-151.68, 903.4, -60.7, 1.18)
pt3dadd(-152.5, 903.76, -61.25, 1.18)
pt3dadd(-153.46, 903.91, -62.35, 1.18)
pt3dadd(-154.34, 904.13, -63.3, 1.18)
pt3dadd(-155.23, 904.28, -64.05, 1.18)
pt3dadd(-156.19, 904.87, -64.55, 1.18)
pt3dadd(-157.23, 905.39, -65.4, 1.18)
pt3dadd(-157.74, 906.12, -66.35, 1.18)
pt3dadd(-158.56, 907.01, -66.45, 1.18)
pt3dadd(-159.22, 908.56, -67.05, 1.18)
pt3dadd(-159.81, 909.22, -67.6, 1.18)
pt3dadd(-160.55, 909.74, -68, 1.18)
pt3dadd(-162.03, 911.14, -68.55, 1.18)
pt3dadd(-161.96, 912.39, -69, 1.18)
pt3dadd(-161.73, 914.16, -69.7, 1.18)
pt3dadd(-161.73, 916.01, -70.1, 1.18)
pt3dadd(-161.44, 917.26, -70.4, 1.18)
pt3dadd(-162.03, 917.63, -70.7, 1.18)
pt3dadd(-162.92, 918.51, -71.05, 1.18)
pt3dadd(-164.17, 918.96, -71.4, 1.18)
pt3dadd(-163.88, 919.91, -71.55, 1.18)
pt3dadd(-162.99, 921.09, -71.7, 1.18)
pt3dadd(-163.64, 922.23, -73.3, 1.18)
pt3dadd(-165.19, 922.89, -74.15, 1.18)
pt3dadd(-166.08, 923.33, -74.65, 1.18)
pt3dadd(-166.97, 924.14, -75.75, 1.18)
pt3dadd(-167.78, 925.4, -75.8, 1.18)
pt3dadd(-168.89, 927.68, -76.05, 1.18)
pt3dadd(-168.52, 929.9, -76.15, 1.18)
pt3dadd(-168.74, 931.81, -76.45, 1.18)
pt3dadd(-168.81, 933.66, -76.65, 1.18)
pt3dadd(-168.96, 935.28, -77.05, 1.18)
pt3dadd(-169.11, 936.9, -77.35, 1.18)
pt3dadd(-168.37, 938.45, -77.55, 1.18)
pt3dadd(-167.85, 940.15, -78.1, 1.18)
pt3dadd(-167.78, 941.99, -78.3, 1.18)
pt3dadd(-168.22, 943.17, -78.6, 1.18)
pt3dadd(-169.11, 944.35, -78.9, 1.18)
pt3dadd(-169.18, 945.38, -79.2, 1.18)
pt3dadd(-169.55, 947.08, -80.15, 1.18)
pt3dadd(-170.36, 948.11, -80.4, 1.18)
pt3dadd(-171.1, 949.36, -80.85, 1.18)
pt3dadd(-171.7, 950.54, -80.9, 1.18)
pt3dadd(-172.88, 951.87, -80.95, 1.18)
pt3dadd(-172.88, 952.31, -80.95, 1.18)
pt3dadd(-173.69, 953.64, -81, 1.18)
pt3dadd(-174.31, 954.7, -81.8, 1.18)
pt3dadd(-175.05, 956.33, -81.85, 1.18)
pt3dadd(-175.13, 958.47, -81.9, 1.18)
pt3dadd(-175.13, 960.97, -82.3, 1.18)
pt3dadd(-175.42, 962.74, -83.05, 1.18)
pt3dadd(-176.09, 964.59, -83.85, 1.18)
pt3dadd(-176.16, 966.5, -84.25, 1.18)
pt3dadd(-176.75, 968.27, -84.8, 1.18)
pt3dadd(-177.64, 969.45, -85.7, 1.18)
pt3dadd(-177.86, 969.82, -85.9, 1.18)
pt3dadd(-178.23, 970.63, -85.6, 1.18)
pt3dadd(-179.78, 971.15, -84.9, 1.18)
pt3dadd(-180.6, 971.59, -83.9, 1.18)
pt3dadd(-180.82, 972.77, -83, 1.18)
pt3dadd(-181.11, 973.88, -82.7, 1.18)
pt3dadd(-181.93, 974.62, -82.65, 1.18)
pt3dadd(-182.22, 975.58, -82.95, 1.18)
pt3dadd(-183.33, 976.02, -84.5, 1.18)
pt3dadd(-184.14, 976.9, -85.25, 1.18)
pt3dadd(-185.25, 978.67, -85.85, 1.18)
pt3dadd(-185.55, 980.07, -86.2, 1.18)
pt3dadd(-186.36, 981.03, -87.1, 1.18)
pt3dadd(-186.66, 981.4, -87.4, 1.18)
pt3dadd(-188.5, 983.17, -87.75, 1.18)
pt3dadd(-189.24, 984.28, -88.2, 1.18)
pt3dadd(-189.54, 985.38, -88.5, 1.18)
pt3dadd(-189.61, 986.49, -88.55, 1.18)
pt3dadd(-189.08, 987.34, -90.4, 1.18)
pt3dadd(-188.79, 988.3, -88.25, 1.18)
pt3dadd(-189.97, 988.89, -88, 1.18)
pt3dadd(-191, 989.92, -87.45, 1.18)
pt3dadd(-191.67, 991.03, -86.9, 1.18)
pt3dadd(-191.67, 992.58, -86.8, 1.18)
pt3dadd(-191.45, 993.68, -88.1, 1.18)
pt3dadd(-191.6, 994.72, -89.6, 1.18)
pt3dadd(-191.82, 995.82, -90.05, 1.18)
pt3dadd(-192.19, 996.56, -90.55, 1.18)
pt3dadd(-192.56, 997.59, -90.8, 1.18)
pt3dadd(-193.3, 998.4, -91.2, 1.18)
pt3dadd(-193.74, 999.14, -91.4, 1.18)
pt3dadd(-194.55, 999.88, -91.65, 1.18)
pt3dadd(-194.85, 1001.21, -92, 1.18)
pt3dadd(-195.29, 1001.72, -92.25, 1.18)
pt3dadd(-195.81, 1002.24, -92.75, 1.18)
pt3dadd(-196.55, 1002.83, -93.15, 1.18)
pt3dadd(-197.29, 1003.34, -93.4, 1.18)
pt3dadd(-198.25, 1003.27, -93.6, 1.18)
pt3dadd(-198.84, 1003.57, -94, 1.18)
pt3dadd(-199.65, 1005.04, -94.4, 1.18)
pt3dadd(-200.02, 1005.56, -94.65, 1.18)
pt3dadd(-200.46, 1006.59, -94.8, 1.18)
pt3dadd(-200.76, 1007.47, -95.15, 1.18)
pt3dadd(-200.98, 1007.92, -95.3, 1.18)
pt3dadd(-201.65, 1008.58, -95.7, 1.18)
pt3dadd(-202.02, 1009.47, -96.15, 1.18)
pt3dadd(-202.16, 1010.2, -96.25, 1.18)
pt3dadd(-202.68, 1010.79, -96.25, 1.18)
pt3dadd(-203.57, 1011.01, -96.25, 1.18)
pt3dadd(-204.23, 1010.57, -96.3, 1.18)
pt3dadd(-204.97, 1010.5, -98.3, 1.18)
pt3dadd(-206.08, 1010.13, -98.4, 1.18)
pt3dadd(-206.01, 1011.09, -98.5, 1.18)
pt3dadd(-206.01, 1011.97, -100.55, 1.18)
pt3dadd(-206.08, 1012.56, -100.95, 1.18)
pt3dadd(-206.23, 1014.04, -101.7, 1.18)
pt3dadd(-206.3, 1014.92, -101.85, 1.18)
pt3dadd(-207.49, 1015.14, -103, 1.18)
pt3dadd(-208.15, 1015.59, -103.2, 1.18)
pt3dadd(-209.11, 1015.95, -103.7, 1.18)
pt3dadd(-209.41, 1016.77, -105.15, 1.18)
pt3dadd(-209.04, 1018.24, -105.4, 1.18)
pt3dadd(-209.11, 1019.05, -105.95, 1.18)
pt3dadd(-209.41, 1019.42, -106, 1.18)
pt3dadd(-209.67, 1019.72, -108, 1.18)
pt3dadd(-210.93, 1020.31, -108.2, 1.18)
pt3dadd(-210.63, 1021.27, -108.25, 1.18)
}
apic[44] {pt3dclear()
pt3dadd(-91.97, 447.13, -5.75, 1.48)
pt3dadd(-90.59, 447.28, -2.75, 1.48)
pt3dadd(-89.26, 448.38, -2.85, 1.48)
pt3dadd(-88.3, 449.49, -2.9, 1.48)
pt3dadd(-87.41, 450.52, -2.9, 1.48)
pt3dadd(-86.53, 451.63, -2.9, 1.48)
pt3dadd(-85.42, 452.88, -2.9, 1.48)
pt3dadd(-84.31, 453.18, -2.8, 1.48)
pt3dadd(-83.13, 452.88, -2.65, 1.48)
pt3dadd(-81.57, 452.81, -1.8, 1.48)
pt3dadd(-80.69, 453.69, -0.5, 1.48)
pt3dadd(-80.54, 455.02, 0.05, 1.48)
pt3dadd(-80.54, 456.35, 0.55, 1.48)
pt3dadd(-80.54, 457.97, 0.85, 1.48)
pt3dadd(-79.95, 459.22, 1.05, 1.48)
pt3dadd(-79.51, 461.22, 1.9, 1.48)
pt3dadd(-79.28, 462.99, 2.5, 1.48)
pt3dadd(-78.99, 464.17, 2.65, 1.48)
pt3dadd(-78.03, 464.76, 2.5, 1.48)
pt3dadd(-77.88, 466.01, -0.6, 1.48)
pt3dadd(-77.14, 467.41, -0.9, 1.48)
pt3dadd(-77.44, 469.4, -1.1, 1.48)
pt3dadd(-77.95, 470.65, -1.25, 1.48)
pt3dadd(-78.47, 471.98, -1.75, 1.48)
pt3dadd(-77.44, 473.53, -1.95, 1.48)
pt3dadd(-76.84, 474.71, -1.9, 1.48)
pt3dadd(-75.81, 475.82, -1.65, 1.48)
pt3dadd(-75.59, 477.44, -1.3, 1.48)
pt3dadd(-75.96, 478.69, -0.6, 1.48)
pt3dadd(-74.92, 480.02, 0.05, 1.48)
pt3dadd(-73.67, 481.18, 0.3, 1.48)
pt3dadd(-73.01, 482.81, 0.5, 1.48)
}
}
proc shape3d_30() {
apic[44] { pt3dadd(-72.64, 484.35, 0.8, 1.48)
pt3dadd(-72.27, 485.9, 1.6, 1.48)
pt3dadd(-72.34, 487.67, 2.2, 1.48)
pt3dadd(-73.01, 489, 2.35, 1.48)
pt3dadd(-73.38, 490.92, 2.6, 1.48)
pt3dadd(-72.64, 492.47, 2.65, 1.48)
pt3dadd(-71.31, 494.24, 2.65, 1.48)
pt3dadd(-69.54, 495.27, 2.7, 1.48)
pt3dadd(-68.2, 496.38, 2.7, 1.48)
pt3dadd(-66.28, 497.63, 2.7, 1.48)
pt3dadd(-64.88, 498.74, 2.75, 1.48)
pt3dadd(-63.84, 499.84, 2.95, 1.48)
pt3dadd(-62.44, 500.73, 3.15, 1.48)
pt3dadd(-60.89, 501.24, 3.2, 1.48)
pt3dadd(-59.63, 501.46, 6.05, 1.18)
pt3dadd(-59.19, 502.28, 6.15, 1.18)
pt3dadd(-58.6, 503.75, 7.8, 1.18)
pt3dadd(-58.23, 505.3, 8.05, 1.18)
pt3dadd(-57.71, 506.4, 8.35, 1.18)
pt3dadd(-57.71, 507.95, 8.95, 1.18)
pt3dadd(-57.34, 509.58, 9.15, 1.18)
pt3dadd(-57.93, 510.39, 10.4, 0.96)
pt3dadd(-58.82, 511.12, 10.45, 0.96)
pt3dadd(-58.97, 512.23, 10.45, 0.96)
pt3dadd(-58.89, 513.34, 10.45, 0.96)
pt3dadd(-59.45, 513.42, 11.15, 0.96)
pt3dadd(-60.48, 514.01, 11.3, 0.96)
pt3dadd(-61.22, 513.35, 11.35, 0.96)
}
apic[45] {pt3dclear()
pt3dadd(-76.08, 375.98, -7.4, 2.14)
pt3dadd(-75.04, 376.35, -11.05, 2.14)
pt3dadd(-74.08, 377.01, -11.2, 2.14)
pt3dadd(-73.12, 377.31, -11.25, 2)
pt3dadd(-71.27, 377.24, -11.3, 2)
pt3dadd(-69.87, 377.01, -11.3, 2)
pt3dadd(-68.83, 377.31, -11.35, 2)
pt3dadd(-67.35, 378.64, -11.35, 2)
pt3dadd(-67.2, 379.96, -11.35, 2)
pt3dadd(-66.84, 381.44, -11.35, 2)
pt3dadd(-66.47, 382.84, -11.4, 2)
pt3dadd(-65.43, 383.95, -11.4, 2)
pt3dadd(-64.77, 384.68, -11.75, 2)
pt3dadd(-63.81, 385.86, -12, 2)
pt3dadd(-62.55, 386.97, -12.05, 2)
pt3dadd(-61.51, 388.37, -11.9, 2)
pt3dadd(-60.18, 389.4, -11.55, 2)
pt3dadd(-58.48, 390.51, -13.85, 1.92)
pt3dadd(-56.27, 390.36, -13.9, 1.92)
pt3dadd(-54.57, 391.62, -15.05, 1.77)
pt3dadd(-52.94, 392.35, -15.1, 1.77)
pt3dadd(-51.31, 393.17, -15.2, 1.77)
pt3dadd(-50.43, 394.49, -15.4, 1.77)
pt3dadd(-49.17, 395.75, -15.4, 1.77)
pt3dadd(-48.28, 396.85, -15.35, 1.77)
pt3dadd(-47.55, 398.03, -15.2, 1.77)
pt3dadd(-45.92, 399.21, -14.95, 1.77)
pt3dadd(-45.11, 400.39, -14.75, 1.77)
pt3dadd(-43.92, 401.35, -14.75, 1.77)
pt3dadd(-42.45, 402.75, -16.15, 1.77)
pt3dadd(-40.52, 403.42, -16.7, 1.77)
pt3dadd(-38.75, 403.56, -16.95, 1.77)
pt3dadd(-37.57, 403.49, -17.05, 1.77)
pt3dadd(-36.83, 403.78, -17.15, 1.55)
pt3dadd(-35.42, 404.37, -17.15, 1.4)
pt3dadd(-34.46, 405.19, -17.2, 1.4)
pt3dadd(-32.76, 405.63, -17.2, 1.4)
pt3dadd(-31.29, 406, -17.2, 1.4)
pt3dadd(-29.66, 406, -17.2, 1.26)
pt3dadd(-28.77, 406.44, -17.2, 1.26)
pt3dadd(-27.89, 406.73, -16.1, 1.26)
pt3dadd(-26.55, 407.4, -15.9, 1.26)
pt3dadd(-25.74, 407.18, -15.75, 1.18)
pt3dadd(-24.34, 407.62, -15.75, 1.18)
pt3dadd(-23.67, 408.43, -15.6, 1.18)
pt3dadd(-23.16, 409.54, -15.35, 1.18)
pt3dadd(-22.42, 410.5, -15.15, 1.18)
pt3dadd(-21.83, 411.75, -15.1, 1.18)
pt3dadd(-21.24, 412.86, -15.15, 1.18)
pt3dadd(-20.42, 413.89, -15.2, 1.18)
pt3dadd(-18.94, 414.48, -15.25, 1.18)
pt3dadd(-17.1, 414.26, -15.3, 1.18)
pt3dadd(-16.28, 415.07, -15.3, 1.18)
pt3dadd(-15.1, 416.17, -15.5, 1.18)
pt3dadd(-13.11, 417.21, -15.65, 1.18)
pt3dadd(-12.44, 418.24, -15.85, 1.18)
pt3dadd(-11.63, 419.42, -16.2, 1.18)
pt3dadd(-11.18, 421.12, -15.95, 1.18)
pt3dadd(-11.41, 422.37, -14.6, 1.18)
pt3dadd(-11.41, 423.48, -14.15, 1.18)
pt3dadd(-11.04, 424.43, -14.05, 1.18)
pt3dadd(-10.52, 425.61, -13.95, 1.18)
pt3dadd(-10.81, 426.28, -15.8, 1.11)
pt3dadd(-11.63, 426.94, -16.5, 1.11)
pt3dadd(-12.29, 427.68, -17, 1.11)
pt3dadd(-12.51, 428.49, -17.6, 1.11)
pt3dadd(-12.81, 430.04, -18.35, 1.11)
pt3dadd(-12.51, 431.07, -18.6, 1.11)
pt3dadd(-12.07, 432.32, -19.25, 1.11)
pt3dadd(-11.85, 433.43, -19.75, 1.11)
pt3dadd(-11.7, 434.76, -20.4, 1.11)
pt3dadd(-12.14, 435.27, -20.95, 1.11)
pt3dadd(-13.25, 436.16, -21.5, 1.11)
pt3dadd(-14.44, 437.19, -21.9, 1.11)
pt3dadd(-15.25, 438.22, -22.1, 1.11)
pt3dadd(-15.47, 438.89, -22.25, 1.11)
pt3dadd(-15.25, 440.07, -22.25, 1.11)
}
apic[46] {pt3dclear()
pt3dadd(-60.23, 279.96, -3.45, 1.18)
pt3dadd(-58.99, 280.21, -4.3, 1.18)
pt3dadd(-58.33, 280.8, -4.35, 1.18)
pt3dadd(-57.29, 281.25, -4.35, 1.18)
pt3dadd(-56.26, 281.47, -6.55, 1.18)
pt3dadd(-55.37, 281.98, -6.7, 1.4)
pt3dadd(-54.19, 282.35, -6.7, 1.4)
pt3dadd(-52.34, 281.84, -6.75, 1.4)
pt3dadd(-50.86, 280.8, -6.75, 1.4)
pt3dadd(-50.2, 279.33, -6.8, 1.4)
pt3dadd(-48.87, 277.93, -7.8, 1.4)
pt3dadd(-47.76, 276.45, -8.1, 1.4)
pt3dadd(-46.65, 275.35, -8.25, 1.4)
pt3dadd(-44.87, 274.39, -8.4, 1.4)
pt3dadd(-43.47, 273.28, -9.15, 1.4)
pt3dadd(-42.21, 272.18, -9.4, 1.4)
pt3dadd(-41.25, 271, -9.9, 1.4)
pt3dadd(-40.81, 269.82, -10.6, 1.4)
pt3dadd(-40.22, 268.41, -10.75, 1.4)
pt3dadd(-38.89, 267.31, -11.1, 1.4)
pt3dadd(-37.11, 266.35, -11.25, 1.4)
pt3dadd(-35.71, 265.32, -11.55, 1.4)
pt3dadd(-34.82, 264.43, -11.75, 1.4)
pt3dadd(-34.01, 263.4, -11.9, 1.4)
pt3dadd(-33.27, 262.29, -13.3, 1.4)
pt3dadd(-33.64, 260.74, -13.45, 1.4)
pt3dadd(-33.94, 260.01, -16.3, 1.4)
pt3dadd(-33.57, 258.61, -16.35, 1.4)
pt3dadd(-32.68, 257.5, -16.35, 1.4)
pt3dadd(-32.01, 256.76, -16.35, 1.4)
pt3dadd(-31.05, 256.17, -16.95, 1.4)
pt3dadd(-29.87, 255.66, -17.6, 1.4)
pt3dadd(-27.65, 255.51, -18.4, 1.4)
pt3dadd(-26.1, 255.66, -19.1, 1.4)
pt3dadd(-24.7, 256.02, -19.65, 1.4)
pt3dadd(-23.22, 256.17, -20.85, 1.4)
pt3dadd(-21.89, 256.39, -21.55, 1.4)
pt3dadd(-20.78, 255.88, -22.2, 1.4)
pt3dadd(-20.12, 254.18, -23.05, 1.4)
pt3dadd(-19.15, 252.56, -23.45, 1.4)
pt3dadd(-17.9, 251.45, -24, 1.4)
pt3dadd(-16.86, 251.16, -24.9, 1.4)
pt3dadd(-15.31, 251.53, -25.4, 1.4)
pt3dadd(-14.28, 251.9, -26.05, 1.4)
pt3dadd(-13.39, 252.34, -26.2, 1.4)
pt3dadd(-11.91, 252.56, -26.75, 1.4)
}
apic[47] {pt3dclear()
pt3dadd(-56.4, 247.16, -3.45, 1.48)
pt3dadd(-55.07, 247.84, -1.25, 1.48)
pt3dadd(-54.04, 248.65, -1, 1.48)
pt3dadd(-52.93, 249.61, -0.85, 1.48)
pt3dadd(-51.3, 249.98, -0.75, 1.48)
pt3dadd(-49.83, 249.68, 0.35, 1.48)
pt3dadd(-48.87, 249.17, 0.5, 1.48)
pt3dadd(-47.83, 249.68, 3.55, 1.48)
pt3dadd(-48.27, 250.94, 3.75, 1.48)
pt3dadd(-49.01, 251.53, 4.35, 1.48)
pt3dadd(-49.53, 251.97, 5.15, 1.48)
pt3dadd(-50.2, 253.59, 5.45, 1.48)
pt3dadd(-49.6, 254.4, 6.3, 1.48)
pt3dadd(-48.79, 255.51, 6.5, 1.48)
pt3dadd(-47.54, 256.39, 6.8, 1.48)
pt3dadd(-45.98, 257.35, 7.15, 1.48)
pt3dadd(-44.51, 258.16, 7.5, 1.48)
pt3dadd(-43.1, 258.9, 7.9, 1.48)
pt3dadd(-41.84, 260.01, 7.95, 1.48)
pt3dadd(-40.88, 260.67, 8.5, 1.48)
pt3dadd(-39.04, 261.26, 8.65, 1.48)
pt3dadd(-38, 262.37, 8.7, 1.48)
pt3dadd(-37.34, 263.99, 8.75, 1.48)
pt3dadd(-36.23, 265.32, 8.8, 1.48)
pt3dadd(-34.97, 266.2, 8.95, 1.48)
pt3dadd(-33.57, 267.38, 9.2, 1.48)
pt3dadd(-32.16, 268.49, 10, 1.48)
pt3dadd(-30.98, 269.37, 6.5, 1.48)
pt3dadd(-29.72, 271.44, 6.2, 1.48)
pt3dadd(-29.28, 273.43, 6.1, 1.48)
pt3dadd(-28.47, 275.72, 6, 1.48)
pt3dadd(-27.06, 277.41, 5.85, 1.48)
pt3dadd(-25.21, 279.4, 5.85, 1.48)
pt3dadd(-24.77, 281.1, 5.8, 1.48)
pt3dadd(-25.14, 282.72, 5.8, 1.48)
pt3dadd(-25.07, 284.86, 5.75, 1.48)
pt3dadd(-23.66, 285.67, 5.75, 1.48)
pt3dadd(-21.3, 287.07, 5.75, 1.48)
pt3dadd(-21.3, 288.55, 5.75, 1.48)
pt3dadd(-22.63, 290.32, 5.65, 1.48)
pt3dadd(-23.29, 291.72, 4.9, 1.48)
pt3dadd(-23.96, 293.05, 4.3, 1.48)
pt3dadd(-25.07, 294.82, 3.5, 1.48)
pt3dadd(-26.18, 296.22, 3.45, 1.48)
pt3dadd(-26.62, 297.32, 3.45, 1.48)
pt3dadd(-26.69, 299.61, 3.45, 1.48)
pt3dadd(-26.55, 301.45, 3.1, 1.48)
pt3dadd(-26.84, 303.22, 2.85, 1.48)
pt3dadd(-27.36, 304.03, 2, 1.48)
}
}
proc shape3d_31() {
apic[47] { pt3dadd(-27.8, 305.07, 1.6, 1.48)
pt3dadd(-28.1, 307.21, 1.1, 1.33)
pt3dadd(-28.54, 308.83, 1.1, 1.33)
pt3dadd(-27.95, 310.23, 1.1, 1.33)
pt3dadd(-27.73, 311.19, 1.1, 1.33)
pt3dadd(-27.65, 312.22, 1.05, 1.33)
pt3dadd(-26.99, 313.87, 0.55, 1.33)
pt3dadd(-25.81, 314.83, 0.5, 1.33)
pt3dadd(-25.22, 316.23, 0.5, 1.26)
pt3dadd(-24.55, 317.34, 0.45, 1.26)
pt3dadd(-24.11, 318.96, -0.55, 1.26)
pt3dadd(-23, 319.7, -0.8, 1.26)
pt3dadd(-21.89, 321.03, -1.2, 1.26)
pt3dadd(-21.6, 321.91, -3.25, 1.26)
pt3dadd(-21.6, 323.17, -3.45, 1.26)
pt3dadd(-21.08, 324.71, -3.5, 1.26)
pt3dadd(-20.93, 326.12, -3.5, 1.26)
pt3dadd(-21.15, 326.93, -3.55, 1.26)
pt3dadd(-21.97, 328.48, -3.55, 1.26)
pt3dadd(-21.97, 329.88, -3.55, 1.26)
pt3dadd(-20.93, 331.13, -3.55, 1.26)
pt3dadd(-21.08, 332.16, -4.4, 1.26)
pt3dadd(-20.71, 334.08, -4.65, 1.26)
pt3dadd(-21.6, 335.7, -4.65, 1.26)
pt3dadd(-22.11, 336.73, -4.65, 1.26)
pt3dadd(-22.85, 337.62, -4.7, 1.26)
pt3dadd(-24.18, 338.95, -4.7, 1.26)
pt3dadd(-24.55, 339.98, -4.7, 1.26)
pt3dadd(-24.63, 341.9, -4.7, 1.26)
pt3dadd(-24.85, 343.3, -4.7, 1.26)
pt3dadd(-25, 344.63, -4.7, 1.26)
pt3dadd(-24.55, 345.07, -4.8, 1.26)
pt3dadd(-23.64, 345.69, -6.45, 1.26)
pt3dadd(-22.68, 346.35, -6.6, 1.26)
pt3dadd(-21.8, 347.53, -6.9, 1.26)
pt3dadd(-20.69, 349.15, -7.1, 1.26)
pt3dadd(-20.76, 350.33, -7.15, 1.26)
pt3dadd(-21.06, 351.59, -7.15, 1.26)
pt3dadd(-21.43, 353.14, -7.2, 1.26)
pt3dadd(-21.57, 354.98, -7.25, 1.26)
pt3dadd(-21.35, 356.6, -7.3, 1.26)
pt3dadd(-21.13, 358.23, -7.3, 1.26)
pt3dadd(-20.54, 359.77, -7.3, 1.26)
pt3dadd(-19.65, 361.32, -7.4, 1.26)
pt3dadd(-18.77, 361.99, -7.75, 1.26)
pt3dadd(-17.73, 362.58, -8.3, 1.26)
pt3dadd(-16.92, 363.46, -10.3, 1.26)
pt3dadd(-16.7, 364.57, -10.85, 1.26)
pt3dadd(-16.99, 365.9, -11.15, 1.26)
pt3dadd(-16.99, 367, -11.15, 1.26)
pt3dadd(-17.66, 367.74, -11.15, 1.26)
pt3dadd(-18.77, 368.84, -11.15, 1.26)
pt3dadd(-19.8, 369.07, -11.15, 1.26)
pt3dadd(-21.43, 369.29, -11.15, 1.26)
pt3dadd(-22.17, 369.29, -11.15, 1.26)
pt3dadd(-23.05, 369.29, -11.15, 1.26)
}
apic[48] {pt3dclear()
pt3dadd(-51.89, 230.24, -1.45, 1.48)
pt3dadd(-50.74, 231.13, -2.65, 1.48)
pt3dadd(-49.63, 232.67, -2.05, 1.48)
pt3dadd(-48.74, 233.93, -1, 1.48)
pt3dadd(-47.78, 235.48, -0.4, 1.48)
pt3dadd(-46.82, 236.51, -0.1, 1.63)
pt3dadd(-46.6, 237.76, -0.05, 1.63)
pt3dadd(-45.71, 239.31, 0.5, 1.63)
pt3dadd(-45.2, 240.86, -0.15, 1.63)
pt3dadd(-44.68, 242.26, 1.3, 1.85)
pt3dadd(-44.24, 243.59, 1.4, 1.85)
pt3dadd(-43.2, 244.77, 1.45, 1.85)
pt3dadd(-42.24, 245.88, 1.5, 1.85)
pt3dadd(-41.06, 246.91, 1.7, 1.85)
pt3dadd(-39.95, 248.83, 1.8, 1.85)
pt3dadd(-39.28, 250.15, 1.95, 1.85)
pt3dadd(-38.84, 251.26, 2.1, 1.85)
pt3dadd(-38.1, 253.1, 2.15, 1.85)
pt3dadd(-36.55, 253.91, 4.05, 1.85)
pt3dadd(-35.22, 253.47, 4.15, 1.85)
pt3dadd(-34.77, 252.88, 4.45, 1.85)
pt3dadd(-34.11, 252.36, 4.8, 1.85)
pt3dadd(-33.07, 251.26, 5.15, 1.85)
pt3dadd(-31.6, 250.67, 5.6, 1.85)
pt3dadd(-30.27, 250.52, 6.3, 1.85)
pt3dadd(-29.31, 251.04, 7.05, 1.85)
pt3dadd(-28.27, 251.7, 7.25, 1.85)
pt3dadd(-27.01, 252.88, 9, 1.85)
pt3dadd(-27.24, 254.06, 9.5, 1.85)
pt3dadd(-27.38, 255.24, 10.45, 1.85)
pt3dadd(-28.2, 256.05, 10.7, 1.85)
pt3dadd(-28.57, 256.94, 12, 1.85)
pt3dadd(-29.16, 257.97, 12.25, 1.85)
pt3dadd(-29.45, 259.08, 12.45, 1.85)
pt3dadd(-29.6, 260.55, 12.75, 1.85)
pt3dadd(-29.38, 261.44, 13, 1.85)
pt3dadd(-29.23, 262.25, 13.1, 1.85)
pt3dadd(-29.57, 263.15, 13.85, 1.03)
pt3dadd(-30.6, 263.3, 13.9, 1.03)
pt3dadd(-31.27, 263.74, 13.9, 1.03)
pt3dadd(-31.2, 265.07, 14.8, 1.03)
pt3dadd(-30.6, 266.25, 15, 1.03)
pt3dadd(-29.35, 267.43, 15.55, 1.03)
pt3dadd(-27.87, 268.54, 15.75, 1.03)
pt3dadd(-27.13, 268.9, 17.1, 0.81)
pt3dadd(-26.76, 269.86, 17.1, 0.81)
pt3dadd(-26.1, 270.6, 17.1, 0.81)
}
apic[49] {pt3dclear()
pt3dadd(-26.1, 270.6, 17.1, 0.81)
pt3dadd(-26.32, 271.41, 17.15, 0.81)
pt3dadd(-26.39, 272.22, 17.5, 0.81)
pt3dadd(-25.14, 272.96, 17.75, 0.81)
pt3dadd(-23.66, 273.92, 18.6, 0.81)
pt3dadd(-23.51, 274.8, 18.6, 0.81)
pt3dadd(-24.47, 275.69, 18.6, 0.67)
pt3dadd(-25.8, 275.98, 18.6, 0.67)
pt3dadd(-27.06, 276.5, 18.6, 0.67)
pt3dadd(-28.31, 277.16, 18.6, 0.67)
pt3dadd(-28.61, 278.71, 18.6, 0.67)
}
apic[50] {pt3dclear()
pt3dadd(-26.1, 270.6, 17.1, 0.67)
pt3dadd(-24.99, 270.31, 17.15, 0.67)
pt3dadd(-23.44, 270.38, 17.15, 0.67)
pt3dadd(-21.51, 270.9, 17.15, 0.67)
pt3dadd(-20.63, 271.63, 17.15, 0.67)
pt3dadd(-19.81, 271.56, 17.15, 0.67)
pt3dadd(-18.41, 271.12, 17.15, 0.67)
}
apic[51] {pt3dclear()
pt3dadd(-48.71, 219.4, -1.45, 2.44)
pt3dadd(-50.23, 219.22, -4.3, 2.44)
pt3dadd(-51.48, 218.41, -4.5, 2.44)
pt3dadd(-53.48, 218.04, -7.1, 2.37)
pt3dadd(-55.33, 218.49, -7.15, 2.37)
}
apic[52] {pt3dclear()
pt3dadd(-55.33, 218.49, -7.15, 1.85)
pt3dadd(-56.21, 220.04, -9.65, 1.85)
pt3dadd(-57.54, 220.63, -9.9, 1.85)
pt3dadd(-58.73, 221.29, -10.35, 1.85)
pt3dadd(-59.91, 221.73, -10.65, 1.85)
pt3dadd(-61.46, 222.47, -10.9, 1.85)
pt3dadd(-62.42, 222.76, -11.3, 1.85)
pt3dadd(-63.01, 223.8, -11.55, 1.85)
pt3dadd(-63.31, 225.35, -11.7, 1.85)
pt3dadd(-62.86, 226.38, -13.25, 1.85)
pt3dadd(-62.42, 227.19, -13.5, 1.85)
pt3dadd(-61.16, 228.37, -16.15, 1.85)
pt3dadd(-60.06, 229.11, -16.2, 1.85)
pt3dadd(-59.69, 230.51, -18.65, 1.85)
pt3dadd(-60.87, 231.47, -19.1, 1.85)
pt3dadd(-61.9, 232.13, -19.35, 1.85)
pt3dadd(-62.94, 232.72, -19.9, 1.85)
pt3dadd(-63.9, 233.24, -20.4, 1.85)
pt3dadd(-64.93, 233.61, -21.6, 1.85)
pt3dadd(-66.26, 233.53, -21.75, 1.85)
pt3dadd(-67.67, 233.02, -22.3, 1.85)
pt3dadd(-69.07, 232.72, -23.05, 1.85)
pt3dadd(-70.26, 232.72, -23.65, 1.85)
pt3dadd(-71.66, 233.09, -24.1, 1.85)
pt3dadd(-73.06, 233.53, -24.7, 1.85)
pt3dadd(-73.8, 233.83, -25.2, 1.85)
pt3dadd(-74.69, 234.64, -25.75, 1.85)
pt3dadd(-75.28, 235.52, -26.3, 1.85)
pt3dadd(-76.02, 236.33, -30.35, 1.85)
pt3dadd(-76.61, 237.59, -30.4, 1.85)
pt3dadd(-77.42, 239.28, -30.4, 1.7)
pt3dadd(-78.31, 240.61, -30.8, 1.7)
pt3dadd(-79.05, 240.98, -31, 1.7)
pt3dadd(-80.45, 241.05, -31.5, 1.7)
pt3dadd(-81.93, 240.54, -32, 1.7)
pt3dadd(-83.12, 240.46, -32.55, 1.7)
pt3dadd(-83.93, 240.17, -32.9, 1.48)
pt3dadd(-85.55, 240.02, -33.05, 1.48)
pt3dadd(-86.96, 240.1, -33.15, 1.48)
pt3dadd(-88.22, 239.8, -33.45, 1.48)
pt3dadd(-89.84, 239.06, -33.9, 1.48)
pt3dadd(-90.43, 239.06, -34.2, 1.48)
pt3dadd(-91.76, 239.58, -34.15, 1.48)
pt3dadd(-92.87, 238.99, -34, 1.48)
pt3dadd(-93.76, 238.47, -33.7, 1.48)
pt3dadd(-95.24, 237.81, -32.6, 1.48)
pt3dadd(-96.86, 237.07, -32.05, 1.48)
pt3dadd(-97.88, 236.26, -30.3, 1.48)
pt3dadd(-99.36, 236.33, -32.95, 1.33)
pt3dadd(-100.32, 236.63, -33.55, 1.33)
pt3dadd(-101.43, 236.78, -33.9, 1.33)
pt3dadd(-102.61, 237, -34.3, 1.33)
pt3dadd(-103.72, 237.44, -34.5, 1.33)
pt3dadd(-104.9, 237.96, -34.6, 1.33)
pt3dadd(-106.23, 238.99, -34.85, 1.11)
pt3dadd(-106.83, 239.87, -35.2, 1.11)
pt3dadd(-107.05, 241.64, -35.85, 1.11)
pt3dadd(-107.42, 243.34, -35.2, 1.11)
pt3dadd(-107.34, 245.04, -35.05, 1.11)
pt3dadd(-107.64, 246, -38.5, 1.11)
pt3dadd(-107.93, 247.25, -38.85, 1.11)
pt3dadd(-109.26, 247.84, -39.05, 0.96)
pt3dadd(-110.23, 247.03, -39.3, 0.96)
pt3dadd(-111.56, 246.73, -39.7, 0.96)
pt3dadd(-112.59, 246.88, -40, 0.96)
pt3dadd(-113.33, 246.95, -40.7, 0.96)
pt3dadd(-114.14, 247.32, -40.95, 0.96)
pt3dadd(-114.73, 247.91, -41.6, 0.96)
pt3dadd(-115.69, 248.87, -41.75, 0.96)
pt3dadd(-116.43, 249.24, -42.25, 0.96)
pt3dadd(-117.32, 249.09, -42.35, 0.96)
pt3dadd(-118.43, 249.09, -42.8, 0.96)
pt3dadd(-119.39, 248.87, -43, 0.96)
pt3dadd(-120.06, 249.31, -43.25, 0.96)
}
}
proc shape3d_32() {
apic[52] { pt3dadd(-120.2, 249.98, -43.65, 0.96)
pt3dadd(-119.61, 250.79, -44.1, 0.96)
pt3dadd(-119.46, 251.75, -44.3, 0.96)
pt3dadd(-119.61, 252.41, -44.9, 0.96)
pt3dadd(-119.69, 253.44, -45.15, 0.96)
pt3dadd(-119.76, 254.55, -45.3, 0.96)
pt3dadd(-120.13, 255.21, -45.55, 0.96)
pt3dadd(-120.35, 256.03, -45.8, 0.96)
pt3dadd(-120.35, 256.98, -45.85, 0.96)
pt3dadd(-120.42, 258.24, -46, 0.96)
pt3dadd(-120.79, 259.05, -46.25, 0.96)
pt3dadd(-121.53, 260.15, -46.65, 0.96)
pt3dadd(-122.2, 260.52, -46.95, 0.96)
pt3dadd(-122.64, 260.74, -47.2, 0.96)
pt3dadd(-123.82, 261.04, -47.35, 0.96)
pt3dadd(-124.27, 261.33, -47.5, 0.96)
pt3dadd(-124.27, 262.59, -48.45, 0.96)
pt3dadd(-123.46, 263.77, -48.95, 0.96)
pt3dadd(-123.53, 264.87, -49.3, 0.96)
pt3dadd(-124.05, 265.91, -49.6, 0.96)
pt3dadd(-123.68, 267.16, -49.8, 0.96)
pt3dadd(-123.75, 268.34, -50.35, 0.96)
pt3dadd(-124.27, 269.45, -50.5, 0.96)
pt3dadd(-123.88, 270.8, -50.7, 0.96)
pt3dadd(-123.95, 272.05, -50.7, 0.96)
pt3dadd(-123.8, 273.01, -50.75, 0.96)
pt3dadd(-123.8, 274.19, -51.55, 0.96)
pt3dadd(-123.36, 275, -51.7, 0.96)
pt3dadd(-123.14, 276.77, -52.4, 0.96)
pt3dadd(-123.66, 277.95, -52.45, 0.96)
pt3dadd(-123.73, 279.06, -52.5, 0.96)
pt3dadd(-123.8, 280.24, -52.5, 0.96)
pt3dadd(-124.32, 281.2, -52.5, 0.96)
pt3dadd(-124.77, 282.01, -52.5, 0.96)
pt3dadd(-125.58, 282.16, -52.5, 0.96)
}
apic[53] {pt3dclear()
pt3dadd(-55.33, 218.49, -7.15, 1.85)
pt3dadd(-55.73, 217.66, -7.45, 1.85)
pt3dadd(-57.28, 217, -7.45, 1.85)
pt3dadd(-58.83, 216.85, -7.45, 1.85)
pt3dadd(-59.64, 216.11, -7.45, 1.85)
pt3dadd(-60.9, 214.49, -7.6, 1.85)
pt3dadd(-61.12, 212.42, -7.8, 1.85)
pt3dadd(-61.42, 210.73, -8, 1.85)
pt3dadd(-60.9, 208.81, -8.1, 1.85)
pt3dadd(-61.05, 207.11, -8.1, 1.85)
pt3dadd(-61.12, 204.68, -8.15, 1.85)
pt3dadd(-62.16, 202.91, -8.15, 1.85)
pt3dadd(-63.26, 201.51, -8.2, 1.85)
pt3dadd(-64.89, 200.03, -8.2, 1.85)
pt3dadd(-65.85, 198.41, -8.2, 1.85)
pt3dadd(-66.07, 196.35, -8.2, 1.85)
pt3dadd(-66.81, 194.21, -8.7, 1.85)
pt3dadd(-68.44, 193.03, -8.7, 1.85)
pt3dadd(-69.03, 192.22, -5.8, 1.85)
pt3dadd(-70.58, 191.11, -5.65, 1.85)
pt3dadd(-71.32, 189.34, -5.55, 1.85)
pt3dadd(-72.06, 187.65, -5.5, 1.85)
pt3dadd(-73.32, 186.47, -5.45, 1.85)
pt3dadd(-74.5, 185.51, -5.45, 1.85)
pt3dadd(-75.39, 184.4, -5.45, 1.85)
pt3dadd(-76.11, 183.81, 0.1, 1.85)
pt3dadd(-77.59, 183, 0.25, 1.85)
pt3dadd(-79.07, 181.37, 0.3, 1.85)
pt3dadd(-79.66, 179.9, 0.3, 1.85)
pt3dadd(-80.77, 178.42, 0.35, 1.85)
pt3dadd(-81.73, 177.32, 0.35, 1.85)
pt3dadd(-81.88, 176.14, 0.4, 1.85)
pt3dadd(-82.03, 174.44, 0.4, 1.85)
pt3dadd(-81.95, 172.67, 0.4, 1.85)
pt3dadd(-82.54, 171.42, 0.4, 1.85)
pt3dadd(-82.76, 170.02, 0.4, 1.85)
pt3dadd(-82.62, 168.98, 0.45, 1.85)
pt3dadd(-82.69, 167.29, 0.45, 1.85)
pt3dadd(-83.13, 166.11, 0.45, 1.85)
pt3dadd(-83.65, 164.85, 0.45, 1.85)
pt3dadd(-84.54, 163.9, 0.55, 1.85)
pt3dadd(-85.13, 162.49, 0.75, 1.85)
pt3dadd(-85.2, 160.8, 0.8, 1.85)
pt3dadd(-84.61, 159.99, 0.85, 1.85)
pt3dadd(-83.73, 159.1, 0.85, 1.85)
pt3dadd(-82.54, 157.63, 0.85, 1.85)
pt3dadd(-82.32, 156.08, 0.9, 1.85)
pt3dadd(-83.21, 155.12, 0.9, 1.85)
pt3dadd(-84.54, 153.72, 0.9, 1.85)
pt3dadd(-85.5, 152.39, 0.9, 1.85)
pt3dadd(-86.39, 150.92, 0.9, 1.85)
pt3dadd(-86.52, 149.67, 4.05, 1.4)
pt3dadd(-87.33, 148.56, 4.5, 1.26)
pt3dadd(-88.22, 147.97, 4.65, 1.26)
pt3dadd(-89.4, 146.49, 4.8, 1.26)
pt3dadd(-89.18, 144.87, 4.85, 1.26)
pt3dadd(-88.07, 144.13, 6.65, 1.26)
pt3dadd(-88.15, 142.95, 6.85, 1.26)
pt3dadd(-89.4, 141.63, 6.85, 1.26)
pt3dadd(-90.14, 140.23, 6.9, 1.26)
pt3dadd(-90.96, 138.97, 6.9, 1.26)
pt3dadd(-91.18, 137.35, 6.9, 1.26)
pt3dadd(-91.47, 136.1, 6.9, 1.26)
pt3dadd(-91.84, 134.62, 6.9, 1.26)
pt3dadd(-92.43, 133.22, 6.9, 1.26)
pt3dadd(-93.03, 132.33, 6.9, 1.26)
pt3dadd(-93.1, 131.38, 3.35, 1.26)
pt3dadd(-93.76, 130.42, 3.15, 1.26)
pt3dadd(-94.8, 129.24, 2.95, 1.26)
pt3dadd(-95.32, 128.5, 2.8, 1.11)
pt3dadd(-96.06, 127.17, 2.75, 1.11)
pt3dadd(-96.72, 126.07, 2.7, 1.11)
pt3dadd(-97.24, 124.52, 2.55, 1.11)
pt3dadd(-98.13, 123.26, 2.5, 1.11)
pt3dadd(-98.5, 122.01, 2.45, 1.11)
pt3dadd(-98.35, 120.68, 2.35, 1.11)
pt3dadd(-98.13, 118.99, 2.3, 1.11)
pt3dadd(-97.68, 118.32, 2.25, 1.11)
pt3dadd(-98.05, 116.7, 2.2, 1.11)
pt3dadd(-97.93, 115.67, 2.15, 1.11)
pt3dadd(-98.3, 114.93, 2.05, 1.11)
pt3dadd(-98.59, 113.75, 2.05, 1.11)
pt3dadd(-99.4, 113.02, 2, 1.11)
pt3dadd(-100.14, 112.28, 2, 1.11)
pt3dadd(-100.37, 111.17, 2, 1.11)
pt3dadd(-100.88, 110.36, 1.95, 1.11)
pt3dadd(-101.92, 109.84, 1.95, 1.11)
pt3dadd(-102.58, 109.11, 1.95, 1.11)
pt3dadd(-103.69, 108.07, 1.95, 1.11)
pt3dadd(-104.65, 106.3, 1.95, 1.11)
pt3dadd(-105.02, 105.57, 1.95, 1.11)
pt3dadd(-105.98, 104.53, 1.95, 1.11)
pt3dadd(-106.35, 104.24, 1.95, 1.11)
pt3dadd(-106.8, 103.35, 1.95, 1.11)
pt3dadd(-107.16, 102.1, 1.95, 0.96)
pt3dadd(-107.9, 101.14, 1.95, 0.96)
pt3dadd(-108.13, 99.67, 1.95, 0.96)
pt3dadd(-108.2, 97.9, 1.95, 0.96)
pt3dadd(-108.2, 96.27, 1.95, 0.96)
pt3dadd(-108.57, 94.73, 1.95, 0.96)
pt3dadd(-108.5, 93.25, 1.95, 0.96)
pt3dadd(-108.35, 92.07, 1.95, 0.96)
pt3dadd(-107.9, 90.3, 1.95, 0.96)
pt3dadd(-107.83, 89.93, 1.95, 0.96)
pt3dadd(-107.46, 87.79, 1.95, 0.96)
pt3dadd(-106.86, 87.4, -0.75, 0.96)
pt3dadd(-106.27, 85.85, -0.75, 0.96)
pt3dadd(-105.75, 83.64, -0.75, 0.96)
pt3dadd(-105.23, 81.87, -0.8, 0.96)
pt3dadd(-105.01, 80.17, -0.8, 0.96)
pt3dadd(-104.79, 78.85, -0.8, 0.96)
pt3dadd(-104.5, 77.52, -0.95, 0.96)
pt3dadd(-103.17, 76.78, -0.85, 0.96)
pt3dadd(-102.2, 75.68, -0.8, 0.96)
}
apic[54] {pt3dclear()
pt3dadd(-39.21, 169.64, -1.4, 2.14)
pt3dadd(-40.63, 169.43, -1.05, 2.14)
pt3dadd(-42.18, 169.58, -1.05, 2.14)
pt3dadd(-43.44, 169.95, -1.1, 2.14)
pt3dadd(-44.25, 170.47, -1.35, 2.14)
pt3dadd(-45.43, 171.2, -1.6, 2.14)
pt3dadd(-47.06, 171.94, -1.25, 2.14)
pt3dadd(-48.1, 172.61, -0.3, 2.14)
pt3dadd(-49.8, 173.05, -0.3, 2.14)
pt3dadd(-51.27, 173.42, -0.65, 2.14)
pt3dadd(-52.23, 174.08, -1.55, 2.14)
pt3dadd(-53.12, 174.97, -2.5, 2.14)
pt3dadd(-54.08, 175.78, -2.85, 2.14)
pt3dadd(-55.49, 176.15, 1.3, 2.14)
pt3dadd(-56.82, 177.4, 1, 2.14)
pt3dadd(-57.56, 178.8, 0.25, 2.14)
pt3dadd(-59.4, 180.64, -0.35, 2.14)
pt3dadd(-61.03, 181.68, -0.7, 2.14)
pt3dadd(-62.14, 182.49, -1.05, 2.14)
pt3dadd(-63.69, 183.23, -1.55, 2.14)
pt3dadd(-64.8, 184.92, -2.25, 2.14)
pt3dadd(-65.39, 186.18, -2.45, 2.14)
pt3dadd(-65.61, 187.43, -2.45, 2.14)
pt3dadd(-65.91, 189.49, 0.05, 2.14)
pt3dadd(-65.61, 190.97, 0.3, 2.14)
pt3dadd(-65.02, 192.81, 0.4, 2.14)
pt3dadd(-65.69, 194.58, 0.45, 2.14)
pt3dadd(-66.72, 195.32, 0.5, 2.14)
pt3dadd(-67.9, 196.2, 0.55, 2.14)
pt3dadd(-69.23, 196.79, 0.55, 2.14)
pt3dadd(-70.86, 197.46, 0.6, 2.14)
pt3dadd(-71.89, 198.27, 0.6, 2.14)
pt3dadd(-72.78, 199.89, 0.6, 2.14)
pt3dadd(-73.37, 201.07, 0.8, 2.14)
pt3dadd(-74.41, 202.03, 1.05, 2.14)
pt3dadd(-75.29, 202.84, 1.15, 2.14)
pt3dadd(-76.33, 203.63, 1.95, 2.14)
pt3dadd(-76.93, 204.81, 2.1, 2.14)
pt3dadd(-77.89, 205.47, 2.35, 2.14)
pt3dadd(-79, 206.14, 2.65, 1.63)
pt3dadd(-79.73, 206.29, 3.45, 1.63)
pt3dadd(-80.55, 206.65, 3.5, 1.63)
pt3dadd(-81.58, 207.24, 3.65, 1.63)
pt3dadd(-82.62, 207.83, 3.7, 1.63)
pt3dadd(-83.36, 206.8, 9, 1.63)
pt3dadd(-84.24, 207.17, 9.05, 1.63)
pt3dadd(-84.91, 208.65, 9.1, 1.48)
pt3dadd(-85.5, 209.31, 9.9, 1.48)
pt3dadd(-86.31, 209.97, 10, 1.48)
pt3dadd(-87.27, 211.01, 10, 1.48)
pt3dadd(-88.53, 211.96, 10.05, 1.48)
}
}
proc shape3d_33() {
apic[54] { pt3dadd(-89.56, 212.48, 10.3, 1.48)
pt3dadd(-90.82, 213.22, 11.05, 1.48)
pt3dadd(-91.41, 214.18, 11.15, 1.48)
pt3dadd(-92.08, 215.58, 11.2, 1.48)
pt3dadd(-92.52, 216.76, 11.2, 1.48)
pt3dadd(-92.96, 218.09, 11.65, 1.48)
pt3dadd(-93.11, 219.71, 11.8, 1.48)
pt3dadd(-93.48, 220.08, 11.8, 1.48)
pt3dadd(-94.59, 220.37, 11.9, 1.48)
pt3dadd(-95.55, 221.55, 12.2, 1.48)
pt3dadd(-95.48, 222.81, 12.35, 1.48)
pt3dadd(-95.7, 224.21, 13.75, 1.48)
pt3dadd(-96.36, 225.98, 13.8, 1.48)
pt3dadd(-97.03, 227.08, 13.95, 1.48)
pt3dadd(-98.14, 227.45, 14.35, 1.48)
pt3dadd(-99.1, 228.04, 14.45, 1.48)
pt3dadd(-99.54, 229.29, 14.75, 1.48)
pt3dadd(-100.06, 230.47, 14.95, 1.48)
pt3dadd(-100.36, 231.51, 15.5, 1.48)
pt3dadd(-99.76, 232.98, 15.65, 1.48)
pt3dadd(-98.95, 234.31, 15.75, 1.48)
pt3dadd(-99.1, 235.42, 15.95, 1.48)
pt3dadd(-99.62, 236.58, 18.25, 1.26)
pt3dadd(-100.58, 237.32, 18.25, 1.26)
pt3dadd(-101.98, 237.62, 18.3, 1.26)
pt3dadd(-103.46, 238.13, 18.3, 1.26)
pt3dadd(-103.24, 239.83, 18.3, 1.26)
pt3dadd(-102.5, 241.38, 18.3, 1.26)
}
apic[55] {pt3dclear()
pt3dadd(-31.65, 129.72, 0.9, 2.29)
pt3dadd(-32.94, 129.59, 4.35, 2.29)
pt3dadd(-33.97, 130.63, 4.85, 2.29)
pt3dadd(-35.3, 132.17, 5.6, 2.29)
pt3dadd(-36.63, 133.06, 6.1, 2.29)
pt3dadd(-38.11, 133.58, 6.35, 2.29)
pt3dadd(-39.59, 134.17, 6.4, 2.29)
pt3dadd(-41.36, 133.87, 6.45, 2.29)
pt3dadd(-42.84, 134.46, 6.45, 2.29)
pt3dadd(-43.88, 135.12, 6.7, 2.29)
pt3dadd(-44.39, 136.45, 7.05, 2.29)
pt3dadd(-44.76, 138, 7.1, 2.29)
pt3dadd(-44.76, 138.89, 8.05, 2.29)
pt3dadd(-44.76, 140.43, 8.4, 2.29)
pt3dadd(-44.27, 142.31, 9.85, 2.29)
pt3dadd(-44.57, 144.81, 9.45, 2.29)
}
apic[56] {pt3dclear()
pt3dadd(-44.57, 144.81, 9.45, 2.29)
pt3dadd(-44.87, 146.73, 9.35, 2.29)
pt3dadd(-44.87, 148.28, 13.4, 2.29)
pt3dadd(-45.97, 149.31, 13.9, 2.29)
pt3dadd(-46.64, 150.42, 14.45, 2.29)
pt3dadd(-47.67, 151.6, 15.15, 2.29)
pt3dadd(-48.86, 153, 15.35, 2.29)
pt3dadd(-50.04, 153.59, 15.55, 2.29)
pt3dadd(-51.96, 154.55, 15.7, 2.29)
pt3dadd(-53.51, 155.43, 15.8, 2.29)
pt3dadd(-54.7, 156.84, 15.95, 1.85)
pt3dadd(-55.66, 158.38, 15.95, 1.85)
pt3dadd(-56.77, 160.23, 16, 1.85)
pt3dadd(-57.36, 161.56, 16, 1.85)
pt3dadd(-58.02, 162.96, 16, 1.85)
pt3dadd(-58.76, 164.65, 16, 1.85)
pt3dadd(-59.06, 166.05, 16, 1.48)
pt3dadd(-59.72, 167.31, 16.05, 1.48)
pt3dadd(-59.94, 168.71, 16.05, 1.48)
pt3dadd(-61.57, 170.11, 16.05, 1.48)
pt3dadd(-61.94, 172.18, 16.05, 1.48)
pt3dadd(-62.6, 174.09, 16.05, 1.48)
pt3dadd(-63.12, 175.13, 16.2, 1.48)
pt3dadd(-63.86, 176.16, 16.3, 1.48)
pt3dadd(-64.97, 177.04, 16.3, 1.48)
pt3dadd(-65.86, 177.85, 16.15, 1.48)
pt3dadd(-66.82, 178.74, 16, 1.48)
pt3dadd(-67.85, 179.4, 15.9, 1.48)
pt3dadd(-69.4, 180.21, 15.85, 1.48)
}
apic[57] {pt3dclear()
pt3dadd(-44.57, 144.81, 9.45, 1.48)
pt3dadd(-45.16, 144.74, 16.05, 1.48)
pt3dadd(-46.34, 144.67, 17.45, 1.18)
pt3dadd(-48.04, 144.81, 17.5, 1.18)
pt3dadd(-49.3, 145.18, 17.7, 1.18)
pt3dadd(-50.7, 145.33, 17.8, 1.18)
pt3dadd(-51.96, 144.74, 17.9, 1.18)
pt3dadd(-52.26, 143.56, 18, 1.18)
pt3dadd(-51.59, 142.38, 18.8, 1.03)
pt3dadd(-51.3, 141.42, 18.8, 1.03)
pt3dadd(-50.48, 140.91, 18.85, 1.03)
pt3dadd(-49.74, 140.76, 18.85, 1.03)
}
apic[58] {pt3dclear()
pt3dadd(-23.24, 96.59, 0.8, 2.44)
pt3dadd(-25.03, 96.63, 1, 2.44)
pt3dadd(-26.14, 96.78, 1, 2.44)
pt3dadd(-27.69, 96.7, 1, 2.44)
pt3dadd(-29.46, 95.82, 1, 2.44)
pt3dadd(-30.94, 95.01, 0.9, 2.44)
pt3dadd(-32.42, 95.01, 0.75, 2.44)
pt3dadd(-34.34, 95.3, 0.55, 2.44)
pt3dadd(-35.97, 95.3, 0.35, 2.44)
pt3dadd(-37.45, 95.67, 0.25, 2.44)
pt3dadd(-39.15, 95.74, 0.15, 2.44)
pt3dadd(-41.51, 95.52, 0.05, 2.44)
pt3dadd(-43.66, 95.15, 0, 2.44)
pt3dadd(-44.99, 95.89, -0.15, 2.44)
pt3dadd(-46.39, 96.41, -0.35, 2.44)
pt3dadd(-48.31, 96.85, -0.45, 2.51)
pt3dadd(-50.09, 97.22, -0.6, 2.51)
pt3dadd(-52.15, 98.1, -0.7, 2.51)
pt3dadd(-53.85, 99.14, -0.8, 2.51)
pt3dadd(-55.11, 100.17, -1.05, 2.51)
pt3dadd(-56.96, 100.61, -1.25, 2.51)
pt3dadd(-58.22, 101.42, -1.45, 2.51)
pt3dadd(-59.99, 101.87, -1.7, 2.51)
pt3dadd(-61.84, 102.46, -1.8, 2.51)
pt3dadd(-63.24, 103.12, -1.95, 2.51)
pt3dadd(-64.87, 103.56, -2.05, 2.51)
pt3dadd(-66.72, 103.27, -2.15, 2.51)
pt3dadd(-68.12, 102.75, -2.2, 2.51)
pt3dadd(-69.38, 101.87, -2.25, 2.51)
pt3dadd(-71.3, 101.57, -2.25, 2.51)
pt3dadd(-71.74, 101.42, -2.3, 2.51)
pt3dadd(-72.91, 101.33, -2.3, 2.51)
}
apic[59] {pt3dclear()
pt3dadd(-15.19, 72.62, -0.2, 3.33)
pt3dadd(-13.83, 73.86, -1.05, 3.33)
pt3dadd(-12.42, 74, -1.05, 3.33)
pt3dadd(-10.5, 74.74, -1.05, 2.51)
pt3dadd(-8.87, 76, -1.05, 2.51)
pt3dadd(-7.47, 77.4, -1, 2.51)
pt3dadd(-6.36, 78.8, -1, 2.51)
pt3dadd(-5.03, 80.57, -0.95, 2.51)
pt3dadd(-2.74, 81.9, -0.95, 2.51)
pt3dadd(-0.15, 82.12, -0.95, 2.51)
pt3dadd(2.51, 82.26, -0.95, 2.51)
pt3dadd(4.8, 82.12, 0.85, 2.51)
pt3dadd(6.42, 82.04, 1, 2.51)
}
apic[60] {pt3dclear()
pt3dadd(6.42, 82.04, 1, 2.14)
pt3dadd(8.42, 83.15, 1.15, 2.14)
pt3dadd(9.97, 83.3, 1.15, 2.14)
pt3dadd(12.26, 83.89, 1.2, 2.14)
pt3dadd(14.19, 84.7, 1.2, 2.14)
pt3dadd(15.81, 86.47, 1.2, 2.14)
pt3dadd(16.62, 89.05, 1.2, 2.14)
pt3dadd(17.95, 91.04, 1.2, 2.14)
pt3dadd(19.58, 91.7, 2.65, 2.14)
pt3dadd(21.8, 92.74, 2.7, 2.14)
pt3dadd(23.65, 94.29, 2.7, 2.14)
pt3dadd(25.49, 95.98, 2.65, 2.14)
pt3dadd(27.05, 97.82, 2.65, 2.14)
pt3dadd(28.6, 99.37, 2.4, 2.14)
pt3dadd(28.6, 101.81, 2.25, 2.14)
pt3dadd(29.93, 103.43, 2.3, 2.14)
pt3dadd(30.59, 104.54, 4.45, 2.14)
}
apic[61] {pt3dclear()
pt3dadd(30.59, 104.54, 4.45, 1.77)
pt3dadd(31.86, 105.07, 9.15, 1.77)
pt3dadd(33.27, 106.25, 9.2, 1.77)
pt3dadd(34.23, 107.94, 9.2, 1.77)
pt3dadd(35.56, 109.49, 10.1, 1.77)
}
apic[62] {pt3dclear()
pt3dadd(35.56, 109.49, 10.1, 1.77)
pt3dadd(37.63, 109.79, 10.25, 1.77)
pt3dadd(39.33, 110.6, 10.25, 1.77)
pt3dadd(40.73, 110.89, 10.3, 1.33)
pt3dadd(42.06, 110.74, 10.3, 1.33)
pt3dadd(43.91, 111.04, 10.7, 1.33)
pt3dadd(45.76, 111.7, 10.85, 1.33)
pt3dadd(47.01, 113.03, 10.95, 1.33)
pt3dadd(48.12, 113.77, 11.1, 1.33)
pt3dadd(49.45, 114.43, 11.4, 1.33)
pt3dadd(50.63, 115.54, 11.85, 1.33)
pt3dadd(52.04, 116.2, 12.1, 1.33)
pt3dadd(53.22, 115.83, 12.35, 1.03)
pt3dadd(53.74, 114.43, 12.4, 1.03)
pt3dadd(54.85, 113.92, 12.4, 1.03)
pt3dadd(56.55, 113.84, 12.4, 1.03)
pt3dadd(57.66, 114.65, 12.4, 1.03)
pt3dadd(58.84, 115.17, 12.4, 1.03)
pt3dadd(60.76, 115.91, 12.45, 1.03)
pt3dadd(62.09, 116.87, 12.45, 1.03)
pt3dadd(62.75, 117.97, 12.45, 1.03)
pt3dadd(63.42, 119.15, 12.45, 1.03)
pt3dadd(64.23, 120.48, 12.45, 1.03)
pt3dadd(65.86, 121.59, 12.45, 1.03)
pt3dadd(67.34, 121.88, 13.15, 1.03)
pt3dadd(68.67, 121.95, 13.1, 1.03)
pt3dadd(69.63, 122.4, 11.8, 1.03)
pt3dadd(70.88, 122.91, 11.4, 1.03)
pt3dadd(72.14, 124.24, 11.1, 1.03)
pt3dadd(72.66, 125.94, 10.85, 1.03)
pt3dadd(73.18, 127.56, 10.6, 1.03)
pt3dadd(73.84, 128.96, 10.5, 1.03)
pt3dadd(74.8, 129.55, 10.4, 1.03)
pt3dadd(76.28, 130.43, 10.35, 1.03)
pt3dadd(77.61, 131.69, 10.3, 1.03)
pt3dadd(78.57, 132.43, 10.2, 1.03)
pt3dadd(79.46, 133.68, 10.1, 1.03)
pt3dadd(79.83, 134.49, 10, 1.03)
pt3dadd(80.35, 134.71, 9.95, 1.03)
pt3dadd(81.75, 135.27, 9.85, 1.03)
pt3dadd(82.56, 134.9, 9.8, 1.03)
pt3dadd(84.48, 134.68, 9.75, 1.03)
pt3dadd(86.18, 135.78, 9.75, 1.03)
pt3dadd(87.81, 136.67, 9.75, 1.03)
pt3dadd(89.21, 137.48, 9.75, 1.03)
pt3dadd(90.54, 138.14, 9.7, 1.03)
pt3dadd(91.87, 138.29, 9.7, 1.03)
pt3dadd(93.06, 139.32, 9.7, 1.03)
}
}
proc shape3d_34() {
apic[62] { pt3dadd(94.16, 139.91, 9.65, 1.03)
pt3dadd(95.42, 140.8, 9.55, 1.03)
pt3dadd(96.9, 140.43, 9.5, 1.03)
pt3dadd(97.79, 140.65, 7.65, 1.03)
pt3dadd(98.53, 141.76, 6.6, 1.03)
pt3dadd(99.49, 143.23, 6.1, 1.03)
pt3dadd(99.86, 144.71, 5.7, 1.03)
pt3dadd(100.45, 146.62, 4.8, 1.03)
pt3dadd(101.26, 147.95, 4.75, 1.03)
pt3dadd(103.4, 148.54, 4.7, 1.03)
pt3dadd(104.44, 150.39, 4.7, 1.03)
pt3dadd(103.99, 151.93, 4.65, 1.03)
pt3dadd(104.22, 153.78, 4.65, 1.03)
pt3dadd(105.32, 155.11, 4.65, 1.03)
pt3dadd(106.51, 156.14, 4.65, 1.03)
pt3dadd(108.35, 157.24, 4.65, 1.03)
pt3dadd(109.09, 158.87, 4.55, 1.03)
pt3dadd(109.83, 160.34, 4.1, 1.03)
pt3dadd(109.98, 161.67, 4.05, 1.03)
pt3dadd(110.87, 162.85, 4.05, 1.03)
pt3dadd(112.2, 163.44, 4, 1.03)
pt3dadd(113.82, 164.18, 4, 0.89)
pt3dadd(114.93, 165.06, 4, 0.89)
pt3dadd(115.97, 165.5, 4, 0.89)
pt3dadd(117.96, 165.43, 3.95, 0.89)
pt3dadd(118.55, 165.06, 6.25, 1.03)
pt3dadd(119.37, 164.62, 6.3, 1.03)
pt3dadd(121.36, 164.62, 6.35, 1.03)
pt3dadd(122.55, 164.91, 6.4, 1.03)
pt3dadd(124.32, 165.36, 6.4, 1.03)
pt3dadd(124.91, 166.17, 6.4, 1.03)
pt3dadd(125.87, 166.76, 6.45, 1.03)
pt3dadd(126.54, 167.57, 6.45, 1.03)
pt3dadd(127.7, 168.01, 6.45, 1.03)
pt3dadd(128.89, 168.75, 6.45, 0.81)
pt3dadd(129.63, 169.71, 6.5, 0.81)
pt3dadd(130.36, 170.74, 6.5, 0.81)
}
apic[63] {pt3dclear()
pt3dadd(35.56, 109.49, 10.1, 1.18)
pt3dadd(35.6, 110.06, 9.35, 1.18)
pt3dadd(36.71, 111.17, 9.25, 1.18)
pt3dadd(37.6, 111.61, 9.1, 1.18)
pt3dadd(39, 111.98, 8.9, 1.18)
pt3dadd(39.89, 112.57, 9.2, 1.18)
pt3dadd(41.51, 113.01, 9.8, 1.18)
pt3dadd(42.4, 113.53, 10.25, 1.18)
pt3dadd(43.66, 114.78, 10.8, 1.18)
pt3dadd(44.17, 115.45, 11.1, 1.18)
pt3dadd(44.91, 116.26, 11.5, 1.18)
pt3dadd(45.58, 117.51, 12.4, 1.18)
pt3dadd(45.87, 118.54, 12.55, 1.18)
pt3dadd(46.83, 119.72, 12.7, 1.18)
pt3dadd(48.09, 120.9, 13, 1.18)
pt3dadd(48.53, 122.45, 13.2, 1.18)
pt3dadd(48.76, 123.78, 13.35, 1.18)
pt3dadd(49.79, 125.03, 13.6, 1.18)
pt3dadd(50.75, 126.21, 14.15, 0.96)
pt3dadd(51.49, 127.47, 14.2, 0.96)
pt3dadd(52.75, 127.54, 14.2, 0.96)
pt3dadd(53.71, 128.57, 14.25, 0.96)
pt3dadd(54.37, 129.83, 14.6, 0.96)
pt3dadd(55.26, 130.49, 14.65, 0.96)
pt3dadd(56.52, 130.93, 15.9, 1.18)
pt3dadd(58.07, 131.01, 15.9, 1.18)
pt3dadd(59.77, 131.3, 15.95, 1.18)
pt3dadd(61.02, 131.67, 15.95, 1.18)
pt3dadd(61.69, 131.82, 16, 1.18)
pt3dadd(63.09, 131.74, 16.25, 1.18)
pt3dadd(64.57, 132.11, 16.95, 1.18)
pt3dadd(65.68, 132.41, 17.1, 1.18)
pt3dadd(66.42, 133.81, 17.15, 1.18)
pt3dadd(67.9, 134.77, 17.2, 1.18)
pt3dadd(69.38, 133.88, 17.2, 1.18)
pt3dadd(69.97, 134.84, 18, 1.18)
pt3dadd(71.22, 135.87, 18.2, 1.18)
pt3dadd(71.96, 137.2, 18.5, 1.18)
pt3dadd(72.78, 138.6, 18.7, 1.18)
pt3dadd(73, 139.93, 18.8, 1.18)
pt3dadd(73.74, 140.96, 18.9, 1.18)
pt3dadd(74.92, 141.85, 18.95, 1.18)
}
apic[64] {pt3dclear()
pt3dadd(74.92, 141.85, 18.95, 0.59)
pt3dadd(75.34, 142.98, 20.4, 0.59)
pt3dadd(75.63, 144.23, 20.4, 0.59)
pt3dadd(75.71, 145.63, 20.4, 0.59)
pt3dadd(75.49, 147.26, 20.4, 0.59)
pt3dadd(75.86, 147.85, 20.4, 0.59)
pt3dadd(76.15, 148.88, 20.4, 0.59)
}
apic[65] {pt3dclear()
pt3dadd(74.92, 141.85, 18.95, 0.59)
pt3dadd(74.16, 141.95, 20.7, 0.59)
pt3dadd(73.49, 142.46, 20.8, 0.59)
pt3dadd(72.97, 142.83, 20.8, 0.59)
pt3dadd(71.94, 143.42, 20.8, 0.59)
pt3dadd(70.46, 143.35, 20.85, 0.59)
pt3dadd(69.8, 143.49, 20.85, 0.59)
pt3dadd(69.5, 144.53, 20.85, 0.59)
pt3dadd(69.57, 145.26, 20.85, 0.59)
}
apic[66] {pt3dclear()
pt3dadd(30.59, 104.54, 4.45, 1.26)
pt3dadd(29.96, 105.29, 4.45, 1.26)
pt3dadd(30.48, 106.76, 4.45, 1.26)
pt3dadd(31.07, 108.02, 4.4, 1.26)
pt3dadd(31.51, 108.75, 4.3, 1.26)
pt3dadd(32.47, 109.64, 4.1, 1.26)
pt3dadd(33.88, 110.38, 4, 1.26)
pt3dadd(35.36, 110.89, 5.5, 0.89)
pt3dadd(36.61, 111.04, 4.05, 0.89)
pt3dadd(38.24, 111.48, 3.9, 0.89)
pt3dadd(39.27, 112.59, 2.3, 0.89)
pt3dadd(39.05, 113.84, 2.1, 0.89)
pt3dadd(38.31, 114.29, 1.65, 0.89)
pt3dadd(37.13, 114.21, -0.3, 0.89)
pt3dadd(36.91, 115.24, -0.45, 0.89)
pt3dadd(37.06, 116.57, -1.5, 0.89)
pt3dadd(37.87, 117.16, -2.15, 0.89)
pt3dadd(39.2, 117.97, -6.5, 0.89)
pt3dadd(40.38, 119.01, -6.65, 0.89)
pt3dadd(41.49, 120.26, -7.95, 0.89)
pt3dadd(42.53, 121.37, -8.85, 0.89)
pt3dadd(43.93, 122.84, -10.95, 0.89)
pt3dadd(44.96, 124.09, -11.85, 0.89)
pt3dadd(46, 124.76, -12.35, 0.89)
pt3dadd(46.52, 126.38, -13, 0.89)
pt3dadd(47.11, 127.49, -13.1, 0.89)
pt3dadd(47.92, 128.74, -13.75, 0.89)
pt3dadd(48.29, 130.51, -14, 1.11)
pt3dadd(48.14, 131.91, -14, 1.11)
pt3dadd(47.63, 132.94, -14.45, 1.11)
pt3dadd(46.44, 135.01, -14.85, 1.11)
pt3dadd(45.7, 136.04, -14.85, 1.11)
pt3dadd(44.96, 136.48, -14.7, 1.11)
pt3dadd(43.78, 136.85, -14.5, 1.11)
pt3dadd(42.01, 137.22, -14.1, 1.11)
pt3dadd(40.81, 137.59, -13.65, 1.11)
pt3dadd(39.93, 138.04, -13.25, 1.11)
pt3dadd(38.89, 138.99, -13.05, 1.11)
pt3dadd(37.93, 139.58, -12.95, 1.11)
pt3dadd(37.34, 141.43, -13.05, 1.11)
pt3dadd(37.41, 142.76, -13.25, 1.11)
pt3dadd(36.9, 143.64, -13.55, 1.11)
pt3dadd(36.16, 144.01, -13.8, 1.11)
pt3dadd(34.83, 144.67, -14.3, 1.11)
}
apic[67] {pt3dclear()
pt3dadd(6.42, 82.04, 1, 1.48)
pt3dadd(7.12, 80.82, 1.7, 1.48)
pt3dadd(8.23, 79.79, 1.75, 1.48)
pt3dadd(9.85, 79.72, 1.85, 1.48)
pt3dadd(11.7, 79.79, 2.1, 1.48)
pt3dadd(13.77, 79.94, 4, 1.48)
pt3dadd(15.1, 80.45, 4.25, 1.48)
pt3dadd(16.73, 80.6, 5, 1.48)
pt3dadd(18.28, 80.97, 5.85, 1.7)
pt3dadd(19.76, 81.27, 6, 1.92)
pt3dadd(21.16, 82, 6.1, 1.92)
pt3dadd(22.34, 82.15, 7, 2.22)
pt3dadd(24.04, 82.67, 7.5, 2.22)
pt3dadd(25.23, 83.18, 7.3, 2.22)
pt3dadd(26.63, 83.7, 6.75, 2.22)
pt3dadd(28.03, 84.36, 5.9, 2.22)
pt3dadd(28.62, 85.03, 7.95, 1.85)
pt3dadd(30.4, 86.35, 8.15, 1.85)
pt3dadd(31.66, 86.94, 9.2, 1.85)
pt3dadd(33.43, 86.35, 9.3, 1.85)
pt3dadd(34.69, 85.47, 9.7, 1.85)
pt3dadd(35.2, 84.14, 11.7, 1.85)
pt3dadd(35.65, 82.59, 11.8, 1.85)
pt3dadd(36.53, 81.49, 11.9, 1.85)
pt3dadd(37.94, 80.09, 12.45, 1.85)
pt3dadd(39.19, 80.23, 12.7, 1.85)
pt3dadd(40.82, 81.27, 14.5, 1.85)
pt3dadd(42.59, 81.56, 14.75, 1.85)
pt3dadd(44.81, 82.59, 15.2, 1.85)
pt3dadd(46.29, 83.04, 15.4, 1.85)
pt3dadd(47.77, 82.3, 15.5, 1.55)
pt3dadd(49.25, 81.63, 16.45, 1.55)
pt3dadd(51.17, 81.71, 16.6, 1.55)
pt3dadd(52.94, 81.41, 16.65, 1.55)
pt3dadd(55.01, 81.04, 16.65, 1.55)
pt3dadd(55.9, 80.16, 16.65, 1.55)
}
apic[68] {pt3dclear()
pt3dadd(55.9, 80.16, 16.65, 1.55)
pt3dadd(56.33, 79.19, 18.7, 1.55)
pt3dadd(57.15, 77.72, 19.05, 1.55)
pt3dadd(57.59, 76.09, 19.05, 1.55)
pt3dadd(57.74, 74.62, 19.1, 1.55)
pt3dadd(59.44, 72.7, 19.55, 1.55)
pt3dadd(60.47, 71.3, 19.6, 1.55)
pt3dadd(62.03, 70.05, 19.8, 1.55)
pt3dadd(62.84, 68.57, 19.95, 1.55)
pt3dadd(64.24, 66.65, 20.1, 1.55)
pt3dadd(65.94, 65.18, 20.25, 1.55)
pt3dadd(67.35, 64.59, 20.25, 1.55)
pt3dadd(68.46, 63.11, 20.25, 1.55)
pt3dadd(69.71, 61.93, 20.3, 1.55)
pt3dadd(71.04, 61.12, 20.3, 1.55)
pt3dadd(72.3, 60.24, 20.6, 1.26)
pt3dadd(73.63, 58.76, 20.6, 1.26)
pt3dadd(74.66, 57.58, 20.6, 1.26)
pt3dadd(75.85, 56.4, 20.6, 1.26)
pt3dadd(77.4, 55.74, 20.6, 1.26)
pt3dadd(79.02, 54.93, 20.65, 1.03)
pt3dadd(80.65, 55, 20.65, 1.03)
pt3dadd(81.98, 54.63, 20.75, 1.03)
pt3dadd(83.31, 54.04, 20.95, 1.03)
pt3dadd(84.49, 52.42, 21.05, 1.03)
}
}
proc shape3d_35() {
apic[68] { pt3dadd(85.23, 51.17, 21.1, 1.03)
pt3dadd(86.42, 50.21, 21.15, 1.03)
pt3dadd(88.04, 49.62, 21.7, 1.03)
pt3dadd(88.63, 48.37, 21.95, 1.03)
pt3dadd(89.45, 47.19, 22.2, 1.03)
pt3dadd(89.52, 45.71, 21.95, 1.03)
pt3dadd(89.37, 44.3, 18.7, 1.26)
pt3dadd(89.3, 43.12, 18.45, 1.26)
pt3dadd(90.4, 40.84, 18.2, 1.26)
pt3dadd(91.14, 38.84, 18.1, 1.26)
pt3dadd(91.73, 37.22, 18.1, 1.26)
pt3dadd(93.06, 35.45, 18.05, 1.26)
pt3dadd(94.32, 34.27, 18.05, 1.26)
pt3dadd(95.65, 33.17, 18, 1.26)
pt3dadd(96.32, 31.62, 17.95, 1.26)
pt3dadd(97.5, 29.92, 17.85, 1.26)
pt3dadd(99.05, 28.45, 17.8, 1.26)
pt3dadd(99.79, 27.27, 17.7, 1.26)
pt3dadd(100.97, 25.35, 17.7, 1.26)
pt3dadd(102.3, 24.46, 17.65, 1.26)
pt3dadd(103.19, 23.14, 17.65, 1.26)
pt3dadd(104, 21.66, 17.65, 1.26)
pt3dadd(104, 20.63, 17.6, 1.26)
pt3dadd(104.3, 19.6, 18.55, 0.89)
pt3dadd(105.26, 18.2, 18.75, 0.89)
pt3dadd(105.85, 16.94, 18.9, 0.89)
pt3dadd(106.52, 16.79, 17, 0.89)
pt3dadd(106.15, 15.61, 16.85, 0.89)
pt3dadd(106.29, 14.51, 16.75, 0.89)
pt3dadd(106.74, 13.48, 16.7, 0.89)
pt3dadd(107.99, 13.62, 16.65, 0.89)
pt3dadd(109.62, 13.18, 16.6, 0.89)
pt3dadd(110.36, 12.74, 16.55, 0.89)
}
apic[69] {pt3dclear()
pt3dadd(55.9, 80.16, 16.65, 0.89)
pt3dadd(56.71, 81.01, 19.7, 0.89)
pt3dadd(58.04, 81.16, 19.85, 0.89)
pt3dadd(58.93, 80.35, 20.1, 0.89)
pt3dadd(59.74, 79.98, 20.3, 0.89)
pt3dadd(60.7, 80.13, 20.55, 0.89)
pt3dadd(61.59, 80.42, 21.05, 0.89)
pt3dadd(62.48, 80.65, 21.35, 0.89)
pt3dadd(63.81, 81.24, 21.45, 0.89)
pt3dadd(64.99, 81.16, 21.5, 0.89)
pt3dadd(65.73, 80.13, 21.5, 0.89)
pt3dadd(66.69, 79.32, 21.5, 0.89)
pt3dadd(67.95, 78.95, 21.5, 0.89)
pt3dadd(68.76, 79.54, 21.5, 0.89)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
}
proc subsets() {
}
proc geom() {
}
proc geom_nseg() {
soma area(.5) // make sure diam reflects 3d points
}
proc biophys() {
}
objref all,dends,tcdends,ccdends,ccsyn,tcsyn,ccnetcon,tcnetcon,apcounter,apvec,nil
objref all,dends,segdends,Esyn,Esourse[2]
proc init(){
objref all,dends,segdends,Esyn,Esourse[2]
all=new SectionList()
dends = new SectionList()
segdends = new SectionList()
Esyn=new List()
Enetcon=new List()
Esourse[0]=new Vector()
Esourse[1]=new Vector()
Isyn=new List()
Inetcon=new List()
topol()
basic_shape()
access soma
distance()
forall{
//dends.append()
all.append()
for i=0,n3d()-1{
pt3dchange(i,x3d(i)+$1,y3d(i)+$2,z3d(i),diam3d(i))
}
if (diam<3){diam=1}
nseg=9
insert pas
e_pas=-60
g_pas=1/10000
cm=1
Ra=100
}
//soma dends.remove()
for i=0,69{
access apic[i]
//if (distance(1)>700){ dends.append()}
}
for i=0,74{ dend[i] dends.append()}
objref apcounter,apvec,nil
numdend=0
forsec dends{numdend=numdend+1 segdends.append()}
apvec=new Vector()
access soma
apcounter=new NetCon(&v(.5), nil)
apcounter.threshold = -20
apcounter.record(apvec)
//saving voltage vectors
objref Vvec[numdend+1],spikevec[numdend+1]
i=0
forsec dends {
Vvec[i]=new Vector()
Vvec[i].record(&v(0.9))
spikevec[i]=new Vector()
i=i+1
}
Vvec[numdend]=new Vector()
//Vvec[numdend].record(&soma.v(0.5))
Vvec[numdend].record(&apic[24].v(0.5))
}
endtemplate celltemplate