begintemplate celltemplate
public apcounter,apvec
public all,dends,tcdends,ccdends,ccsyn,tcsyn,ccnetcon,tcnetcon,soma,dend,apic
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]
objref all,dends,segdends,Esyn
proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[70], apic[116]
proc topol() { local i
connect dend(0), soma(0.5)
for i = 1, 3 connect dend[i](0), dend[i-1](1)
connect dend[4](0), dend[2](1)
connect dend[5](0), dend[1](1)
for i = 6, 7 connect dend[i](0), dend[5](1)
for i = 8, 9 connect dend[i](0), dend[7](1)
for i = 10, 11 connect dend[i](0), dend[9](1)
connect dend[12](0), dend(1)
for i = 13, 14 connect dend[i](0), dend[i-1](1)
connect dend[15](0), dend[13](1)
connect dend[16](0), dend[12](1)
connect dend[17](0), soma(0.5)
for i = 18, 19 connect dend[i](0), dend[17](1)
connect dend[20](0), soma(0.5)
for i = 21, 23 connect dend[i](0), dend[i-1](1)
connect dend[24](0), dend[22](1)
connect dend[25](0), dend[21](1)
for i = 26, 27 connect dend[i](0), dend[25](1)
connect dend[28](0), dend[20](1)
for i = 29, 30 connect dend[i](0), dend[28](1)
connect dend[31](0), soma(0.5)
for i = 32, 36 connect dend[i](0), dend[i-1](1)
connect dend[37](0), dend[35](1)
for i = 38, 39 connect dend[i](0), dend[37](1)
connect dend[40](0), dend[34](1)
for i = 41, 42 connect dend[i](0), dend[40](1)
connect dend[43](0), dend[33](1)
connect dend[44](0), dend[32](1)
for i = 45, 46 connect dend[i](0), dend[i-1](1)
connect dend[47](0), dend[45](1)
connect dend[48](0), dend[44](1)
connect dend[49](0), dend[32](1)
for i = 50, 52 connect dend[i](0), dend[i-1](1)
connect dend[53](0), dend[51](1)
connect dend[54](0), dend[50](1)
connect dend[55](0), dend[49](1)
connect dend[56](0), dend[31](1)
connect dend[57](0), soma(0.5)
for i = 58, 60 connect dend[i](0), dend[i-1](1)
connect dend[61](0), dend[59](1)
connect dend[62](0), dend[58](1)
connect dend[63](0), dend[57](1)
connect dend[64](0), soma(0.5)
for i = 65, 66 connect dend[i](0), dend[64](1)
connect dend[67](0), soma(0.5)
for i = 68, 69 connect dend[i](0), dend[67](1)
connect apic(0), soma(0.5)
for i = 1, 17 connect apic[i](0), apic[i-1](1)
connect apic[18](0), apic[16](1)
connect apic[19](0), apic[15](1)
for i = 20, 21 connect apic[i](0), apic[i-1](1)
connect apic[22](0), apic[20](1)
for i = 23, 24 connect apic[i](0), apic[22](1)
connect apic[25](0), apic[19](1)
connect apic[26](0), apic[14](1)
for i = 27, 28 connect apic[i](0), apic[26](1)
connect apic[29](0), apic[13](1)
for i = 30, 31 connect apic[i](0), apic[29](1)
connect apic[32](0), apic[12](1)
for i = 33, 34 connect apic[i](0), apic[i-1](1)
connect apic[35](0), apic[33](1)
connect apic[36](0), apic[32](1)
for i = 37, 38 connect apic[i](0), apic[36](1)
connect apic[39](0), apic[11](1)
for i = 40, 44 connect apic[i](0), apic[i-1](1)
connect apic[45](0), apic[43](1)
connect apic[46](0), apic[42](1)
connect apic[47](0), apic[10](1)
for i = 48, 52 connect apic[i](0), apic[i-1](1)
connect apic[53](0), apic[51](1)
connect apic[54](0), apic[50](1)
connect apic[55](0), apic[49](1)
for i = 56, 57 connect apic[i](0), apic[55](1)
connect apic[58](0), apic[48](1)
for i = 59, 61 connect apic[i](0), apic[i-1](1)
connect apic[62](0), apic[60](1)
connect apic[63](0), apic[59](1)
for i = 64, 65 connect apic[i](0), apic[i-1](1)
connect apic[66](0), apic[64](1)
for i = 67, 68 connect apic[i](0), apic[66](1)
connect apic[69](0), apic[63](1)
connect apic[70](0), apic[58](1)
for i = 71, 72 connect apic[i](0), apic[i-1](1)
connect apic[73](0), apic[71](1)
connect apic[74](0), apic[70](1)
connect apic[75](0), apic[47](1)
connect apic[76](0), apic[9](1)
connect apic[77](0), apic[8](1)
for i = 78, 79 connect apic[i](0), apic[77](1)
for i = 80, 81 connect apic[i](0), apic[79](1)
connect apic[82](0), apic[7](1)
for i = 83, 84 connect apic[i](0), apic[i-1](1)
connect apic[85](0), apic[83](1)
for i = 86, 87 connect apic[i](0), apic[85](1)
connect apic[88](0), apic[82](1)
connect apic[89](0), apic[6](1)
connect apic[90](0), apic[5](1)
for i = 91, 93 connect apic[i](0), apic[i-1](1)
connect apic[94](0), apic[92](1)
for i = 95, 96 connect apic[i](0), apic[91](1)
connect apic[97](0), apic[90](1)
connect apic[98](0), apic[4](1)
for i = 99, 101 connect apic[i](0), apic[i-1](1)
connect apic[102](0), apic[100](1)
for i = 103, 104 connect apic[i](0), apic[102](1)
connect apic[105](0), apic[99](1)
for i = 106, 107 connect apic[i](0), apic[105](1)
connect apic[108](0), apic[98](1)
connect apic[109](0), apic[3](1)
for i = 110, 111 connect apic[i](0), apic[109](1)
for i = 112, 113 connect apic[i](0), apic[111](1)
connect apic[114](0), apic[2](1)
connect apic[115](0), apic[114](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(5.2086, -0.585965, 0.408518, 8.3235)
pt3dadd(4.95805, -2.05509, 0.36858, 10.2405)
pt3dadd(4.70749, -3.52421, 0.328643, 11.5482)
pt3dadd(4.45693, -4.99334, 0.288705, 12.3947)
pt3dadd(4.20638, -6.46246, 0.248768, 14.018)
pt3dadd(3.95582, -7.93159, 0.20883, 16.2498)
pt3dadd(3.70527, -9.40071, 0.168893, 17.6724)
pt3dadd(3.45471, -10.8698, 0.128955, 18.8965)
pt3dadd(3.20415, -12.339, 0.0890177, 20.0475)
pt3dadd(2.9536, -13.8081, 0.0490801, 20.7176)
pt3dadd(2.70304, -15.2772, 0.00914259, 21.1493)
pt3dadd(2.45249, -16.7463, -0.0307949, 21.3533)
pt3dadd(2.20193, -18.2155, -0.0707325, 20.2617)
pt3dadd(1.95137, -19.6846, -0.11067, 19.4887)
pt3dadd(1.70082, -21.1537, -0.150608, 19.0323)
pt3dadd(1.45026, -22.6228, -0.190545, 18.0945)
pt3dadd(1.19971, -24.092, -0.230483, 16.6777)
pt3dadd(0.94915, -25.5611, -0.27042, 14.5185)
pt3dadd(0.698594, -27.0302, -0.310358, 12.9191)
pt3dadd(0.448038, -28.4993, -0.350295, 9.87433)
pt3dadd(0.197482, -29.9685, -0.390233, 5.47302)
}
}
proc shape3d_2() {
dend {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(-6.87, -12.91, 2.25, 3.77)
pt3dadd(-7.61, -12.76, 2.25, 3.25)
pt3dadd(-9.39, -12.39, 2.75, 2.96)
pt3dadd(-10.72, -12.17, 2.85, 2.96)
pt3dadd(-12.12, -12.24, 3.3, 2.96)
pt3dadd(-13.08, -12.46, 3.4, 2.96)
pt3dadd(-13.82, -12.32, 3.45, 2.96)
pt3dadd(-14.34, -11.95, 3.45, 2.96)
pt3dadd(-14.78, -11.65, 3.85, 2.96)
pt3dadd(-15.45, -11.14, 4, 2.96)
pt3dadd(-15.82, -10.55, 4.05, 2.96)
pt3dadd(-16.41, -9.81, 4.95, 2.96)
pt3dadd(-17.07, -9, 5.05, 2.96)
pt3dadd(-17.44, -8.04, 6, 2.66)
pt3dadd(-17.89, -6.86, 6.35, 2.66)
pt3dadd(-18.48, -6.49, 6.4, 2.66)
pt3dadd(-19.07, -5.9, 6.4, 2.66)
pt3dadd(-19.36, -5.31, 6.4, 2.66)
pt3dadd(-19.88, -4.87, 6.4, 2.66)
pt3dadd(-20.47, -4.35, 6.45, 2.66)
pt3dadd(-21.21, -3.83, 6.5, 2.66)
pt3dadd(-21.66, -3.54, 6.5, 2.66)
pt3dadd(-22.39, -3.1, 6.5, 2.66)
pt3dadd(-22.99, -2.8, 6.55, 2.66)
}
dend[1] {pt3dclear()
pt3dadd(-22.99, -2.8, 6.55, 2.51)
pt3dadd(-24.46, -2.51, 6.6, 2.51)
pt3dadd(-25.2, -2.36, 6.6, 2.51)
pt3dadd(-26.24, -1.99, 6.6, 2.37)
pt3dadd(-27.27, -1.77, 6.6, 2)
pt3dadd(-28.01, -1.55, 6.6, 2)
pt3dadd(-28.68, -1.4, 6.65, 2)
pt3dadd(-29.19, -1.11, 6.65, 2)
pt3dadd(-30.23, -0.66, 6.8, 2)
pt3dadd(-30.82, -0.29, 6.8, 2)
pt3dadd(-31.71, 0.15, 6.9, 2)
}
dend[2] {pt3dclear()
pt3dadd(-31.71, 0.15, 6.9, 1.48)
pt3dadd(-31.85, 0.96, 7.1, 1.48)
pt3dadd(-32.08, 1.4, 7.15, 1.48)
pt3dadd(-32.45, 2.14, 7.15, 1.48)
pt3dadd(-32.59, 2.73, 7.15, 1.48)
pt3dadd(-32.96, 3.32, 7.15, 1.48)
pt3dadd(-33.19, 3.83, 7.15, 1.48)
pt3dadd(-33.63, 4.35, 7.25, 1.33)
pt3dadd(-34.29, 4.79, 7.2, 1.33)
pt3dadd(-34.89, 5.24, 7.15, 1.33)
pt3dadd(-35.48, 5.75, 7.75, 1.11)
pt3dadd(-36.07, 6.27, 7.8, 1.11)
pt3dadd(-36.73, 6.78, 8.05, 1.11)
pt3dadd(-37.32, 7.01, 8.1, 1.11)
pt3dadd(-37.77, 7.3, 8.2, 1.11)
pt3dadd(-38.14, 7.82, 8.2, 1.11)
pt3dadd(-38.28, 8.33, 8.2, 1.11)
pt3dadd(-38.28, 9, 8.2, 1.11)
pt3dadd(-37.92, 9.96, 8.65, 1.11)
pt3dadd(-37.69, 10.32, 8.7, 1.11)
pt3dadd(-37.25, 10.84, 8.75, 1.11)
pt3dadd(-36.73, 11.21, 8.75, 1.11)
pt3dadd(-36.29, 11.73, 8.75, 0.96)
pt3dadd(-36.36, 12.39, 9.05, 0.96)
pt3dadd(-36.66, 13.2, 9.1, 1.11)
pt3dadd(-37.4, 13.86, 9.5, 1.11)
pt3dadd(-37.99, 13.86, 9.55, 1.11)
pt3dadd(-38.58, 14.01, 9.55, 1.11)
pt3dadd(-39.17, 14.09, 9.6, 0.96)
pt3dadd(-39.62, 14.38, 9.6, 0.96)
pt3dadd(-39.98, 14.75, 9.6, 0.96)
pt3dadd(-40.35, 15.04, 9.6, 0.96)
pt3dadd(-40.87, 15.04, 9.6, 0.96)
pt3dadd(-41.39, 15.04, 9.6, 0.96)
pt3dadd(-42.09, 15.57, 10.15, 0.96)
pt3dadd(-42.68, 15.87, 10.15, 1.18)
pt3dadd(-43.12, 16.46, 10.3, 1.18)
pt3dadd(-43.27, 17.27, 10.35, 1.18)
pt3dadd(-43.34, 17.86, 10.35, 1.18)
pt3dadd(-43.64, 18.67, 10.65, 1.18)
pt3dadd(-43.56, 19.04, 10.65, 1.18)
pt3dadd(-43.93, 19.78, 10.9, 0.74)
pt3dadd(-43.86, 20.37, 10.9, 0.74)
pt3dadd(-43.49, 20.96, 11, 0.89)
pt3dadd(-42.75, 21.18, 11, 0.89)
pt3dadd(-42.16, 21.55, 11.55, 0.89)
pt3dadd(-41.72, 21.77, 11.55, 0.89)
pt3dadd(-41.72, 22.51, 12.2, 0.81)
pt3dadd(-42.01, 23.1, 12.2, 0.81)
pt3dadd(-42.23, 23.47, 12.2, 0.81)
pt3dadd(-42.53, 24.35, 12.2, 0.81)
pt3dadd(-42.46, 24.72, 12.25, 0.81)
pt3dadd(-42.46, 25.68, 12.55, 0.81)
pt3dadd(-42.75, 26.12, 12.5, 0.81)
pt3dadd(-42.97, 26.71, 13.25, 0.81)
pt3dadd(-42.68, 27.3, 13.3, 0.81)
pt3dadd(-42.83, 27.89, 13.85, 0.52)
pt3dadd(-43.2, 28.33, 13.95, 0.52)
pt3dadd(-43.86, 28.55, 13.95, 0.52)
pt3dadd(-44.3, 28.85, 13.95, 0.52)
pt3dadd(-44.67, 29.14, 13.95, 0.52)
pt3dadd(-45.12, 29.59, 14, 0.52)
pt3dadd(-45.41, 29.96, 14, 0.52)
pt3dadd(-45.78, 30.47, 14.85, 0.52)
pt3dadd(-46.08, 31.21, 14.85, 0.52)
pt3dadd(-46.23, 31.87, 14.9, 0.52)
pt3dadd(-46.74, 32.17, 14.9, 0.52)
pt3dadd(-47.11, 32.61, 14.9, 0.52)
pt3dadd(-47.33, 33.35, 15.1, 0.52)
pt3dadd(-47.7, 34.16, 15.15, 0.52)
pt3dadd(-47.7, 34.9, 15.15, 0.52)
pt3dadd(-47.93, 35.34, 15.2, 0.52)
pt3dadd(-48.07, 36.15, 15.25, 0.52)
pt3dadd(-48.3, 36.67, 15.45, 0.52)
pt3dadd(-47.41, 37.26, 16.15, 0.52)
}
dend[3] {pt3dclear()
pt3dadd(-47.41, 37.26, 16.15, 0.52)
pt3dadd(-47.26, 37.85, 16.15, 0.52)
pt3dadd(-46.74, 38.29, 16.15, 0.52)
pt3dadd(-46.3, 38.66, 16.15, 0.52)
pt3dadd(-45.86, 39.1, 16.15, 0.52)
pt3dadd(-45.19, 39.17, 16.15, 0.52)
}
dend[4] {pt3dclear()
pt3dadd(-47.41, 37.26, 16.15, 0.37)
pt3dadd(-46.89, 36.81, 16.55, 0.37)
pt3dadd(-46.45, 36.67, 16.55, 0.37)
pt3dadd(-45.93, 36.37, 16.55, 0.22)
pt3dadd(-45.49, 36.59, 16.55, 0.22)
pt3dadd(-44.97, 37.18, 16.55, 0.22)
}
dend[5] {pt3dclear()
pt3dadd(-31.71, 0.15, 6.9, 1.03)
pt3dadd(-32.48, -0.13, 4.55, 1.03)
pt3dadd(-33.22, -0.35, 4.05, 1.26)
pt3dadd(-33.96, -0.72, 3.95, 1.26)
pt3dadd(-33.74, -1.09, 3.95, 1.26)
pt3dadd(-33.66, -1.61, 3.95, 1.26)
pt3dadd(-33.74, -2.57, 3.95, 1.26)
pt3dadd(-33.88, -3.16, 3.95, 1.26)
pt3dadd(-34.33, -3.75, 3.95, 1.26)
pt3dadd(-34.84, -4.26, 3.95, 1.26)
pt3dadd(-35.29, -5, 3.6, 1.26)
pt3dadd(-35.66, -5.44, 4.05, 1.26)
pt3dadd(-36.32, -5.89, 4.15, 1.26)
pt3dadd(-36.84, -5.89, 4.15, 1.26)
pt3dadd(-37.58, -5.89, 5.45, 1.26)
pt3dadd(-38.24, -5.81, 5.6, 1.26)
pt3dadd(-38.91, -6.03, 5.65, 1.26)
pt3dadd(-39.8, -6.25, 5.9, 1.26)
pt3dadd(-40.53, -6.25, 5.95, 1.26)
pt3dadd(-41.2, -6.48, 6, 1.26)
pt3dadd(-42.16, -6.77, 6.3, 1.4)
pt3dadd(-42.6, -7.66, 6.3, 1.4)
pt3dadd(-43.12, -8.25, 6.35, 1.4)
}
dend[6] {pt3dclear()
pt3dadd(-43.12, -8.25, 6.35, 0.89)
pt3dadd(-43.93, -7.95, 6.65, 0.89)
pt3dadd(-44.38, -8.25, 6.7, 0.89)
pt3dadd(-44.9, -8.76, 6.7, 0.89)
pt3dadd(-45.34, -9.43, 6.95, 0.89)
pt3dadd(-45.93, -9.72, 7, 0.89)
pt3dadd(-46.37, -10.16, 5.65, 0.89)
pt3dadd(-46.82, -10.75, 5.4, 0.89)
pt3dadd(-47.63, -11.05, 5.25, 0.89)
pt3dadd(-48.22, -11.42, 4.7, 0.89)
pt3dadd(-48.74, -11.64, 4.55, 0.89)
pt3dadd(-49.26, -11.71, 4.45, 0.89)
pt3dadd(-49.85, -11.56, 4.4, 0.89)
pt3dadd(-50.29, -11.56, 4.35, 0.89)
pt3dadd(-50.81, -11.27, 4.25, 0.89)
pt3dadd(-51.33, -10.97, 4.15, 0.89)
pt3dadd(-51.62, -10.9, 4.1, 0.89)
pt3dadd(-51.84, -10.61, 4.05, 0.89)
pt3dadd(-52.21, -10.24, 3.95, 0.89)
pt3dadd(-52.51, -9.94, 3.85, 0.89)
pt3dadd(-52.88, -9.79, 3.8, 0.89)
pt3dadd(-53.32, -9.43, 3.7, 0.89)
pt3dadd(-53.47, -9.35, 3.65, 0.89)
pt3dadd(-54.06, -8.91, 3.5, 0.89)
pt3dadd(-54.58, -8.76, 3.45, 0.89)
pt3dadd(-55.32, -8.84, 3.35, 0.89)
pt3dadd(-55.69, -8.84, 3.3, 0.89)
pt3dadd(-56.35, -8.61, 3.25, 0.89)
pt3dadd(-56.79, -8.76, 3.2, 0.89)
pt3dadd(-57.76, -9.13, 3.05, 0.89)
pt3dadd(-58.12, -9.06, 3.05, 0.89)
pt3dadd(-58.57, -9.13, 3, 0.89)
pt3dadd(-59.23, -8.91, 3, 0.89)
pt3dadd(-59.97, -8.98, 2.8, 1.03)
pt3dadd(-60.49, -9.06, 2.8, 1.03)
}
}
proc shape3d_3() {
dend[6] { pt3dadd(-61.52, -9.2, 2.6, 1.03)
pt3dadd(-61.97, -9.65, 2.55, 1.03)
pt3dadd(-62.71, -9.65, 3.7, 1.03)
pt3dadd(-63.37, -9.72, 3.8, 1.03)
pt3dadd(-63.89, -9.87, 3.8, 1.03)
pt3dadd(-64.48, -10.16, 3.5, 1.03)
pt3dadd(-65.15, -10.46, 3.4, 1.03)
pt3dadd(-65.81, -10.83, 3.55, 1.03)
pt3dadd(-66.62, -10.75, 3.6, 1.03)
pt3dadd(-67.66, -11.2, 3.65, 1.03)
pt3dadd(-68.18, -11.12, 0.35, 0.89)
pt3dadd(-68.77, -10.97, 0.25, 0.89)
pt3dadd(-69.36, -11.2, 0.05, 0.89)
pt3dadd(-69.88, -11.42, 0, 0.89)
pt3dadd(-70.25, -11.56, -0.45, 0.89)
pt3dadd(-70.76, -11.79, -0.8, 0.89)
pt3dadd(-71.35, -12.01, -0.85, 0.89)
pt3dadd(-71.87, -12.3, -0.85, 0.89)
pt3dadd(-72.39, -12.3, -1.1, 0.89)
pt3dadd(-73.05, -12.08, -1.2, 0.89)
pt3dadd(-73.87, -12.01, -1.45, 0.89)
pt3dadd(-74.38, -11.79, -1.45, 0.89)
pt3dadd(-75.05, -12.01, -1.5, 0.89)
pt3dadd(-75.49, -12.15, -1.55, 0.89)
pt3dadd(-75.94, -12.15, -1.6, 0.89)
pt3dadd(-76.75, -12.45, -1.85, 0.89)
pt3dadd(-77.34, -12.67, -1.9, 0.89)
pt3dadd(-77.86, -12.6, -2.45, 0.89)
pt3dadd(-78.15, -12.01, -2.5, 0.89)
pt3dadd(-78.6, -11.71, -2.5, 0.89)
pt3dadd(-78.89, -11.64, -2.5, 0.89)
pt3dadd(-79.26, -11.27, -2.5, 0.89)
pt3dadd(-79.71, -10.53, -2.25, 0.67)
pt3dadd(-80.08, -9.79, -2.2, 0.67)
pt3dadd(-80.22, -9.43, -2.15, 0.67)
pt3dadd(-80.52, -8.76, -2.15, 0.67)
pt3dadd(-80.82, -8.47, -2.15, 0.67)
pt3dadd(-81.33, -8.17, -2.1, 0.67)
pt3dadd(-81.63, -7.88, -2.1, 0.67)
pt3dadd(-82, -7.43, -2.1, 0.67)
pt3dadd(-82.22, -7.07, -2.1, 0.67)
pt3dadd(-82.74, -6.7, -2.1, 0.74)
pt3dadd(-83.25, -6.33, -2.1, 0.74)
pt3dadd(-83.7, -6.25, -2.1, 0.74)
pt3dadd(-84.51, -6.09, -1.1, 0.89)
pt3dadd(-84.95, -6.16, -1.15, 0.89)
pt3dadd(-85.62, -6.16, -1.75, 0.37)
pt3dadd(-85.99, -6.38, -1.8, 0.37)
pt3dadd(-86.36, -6.75, -1.8, 0.37)
pt3dadd(-86.5, -7.19, -1.8, 0.37)
pt3dadd(-86.87, -7.71, -1.95, 0.37)
pt3dadd(-87.24, -8.08, -1.95, 0.37)
pt3dadd(-87.54, -8, -2, 0.37)
pt3dadd(-87.98, -7.56, -2.6, 0.81)
pt3dadd(-88.35, -7.12, -2.6, 0.81)
pt3dadd(-88.43, -6.75, -2.75, 0.81)
pt3dadd(-88.43, -6.23, -3.1, 0.81)
pt3dadd(-88.5, -6.01, -3.1, 0.81)
pt3dadd(-88.65, -5.2, -3.1, 0.81)
pt3dadd(-88.94, -4.68, -3.1, 0.81)
pt3dadd(-89.39, -4.46, -3.5, 0.81)
pt3dadd(-89.9, -4.32, -3.5, 0.81)
pt3dadd(-90.13, -4.17, -3.5, 0.81)
pt3dadd(-91.09, -3.87, -3.6, 1.11)
pt3dadd(-91.53, -3.43, -3.65, 1.33)
pt3dadd(-91.83, -3.21, -3.65, 1.33)
pt3dadd(-92.34, -2.47, -3.65, 1.33)
pt3dadd(-92.71, -1.88, -3.7, 1.33)
pt3dadd(-93.08, -1.59, -3.7, 1.33)
pt3dadd(-93.45, -0.78, -3.7, 1.33)
pt3dadd(-93.82, -0.04, -3.7, 1.33)
pt3dadd(-94.34, 0.33, -2.95, 0.89)
pt3dadd(-94.63, 0.77, -2.8, 0.89)
pt3dadd(-94.93, 1.22, -2.7, 0.67)
pt3dadd(-95.37, 1.44, -2.6, 0.67)
pt3dadd(-95.82, 1.51, -2.55, 0.67)
pt3dadd(-96.33, 1.44, -2.5, 0.67)
pt3dadd(-96.63, 1.44, -2.45, 0.67)
pt3dadd(-97.22, 1.44, -3.6, 0.67)
pt3dadd(-97.59, 1.66, -3.7, 0.67)
pt3dadd(-97.81, 1.95, -3.75, 0.67)
pt3dadd(-97.89, 2.62, -3.8, 0.67)
pt3dadd(-97.96, 3.28, -3.8, 0.67)
pt3dadd(-98.11, 3.8, -3.85, 0.67)
pt3dadd(-97.96, 4.17, -3.85, 0.67)
pt3dadd(-98.03, 4.68, -3.9, 0.67)
pt3dadd(-98.4, 5.35, -4, 0.67)
pt3dadd(-98.7, 5.79, -4.8, 0.81)
pt3dadd(-99.22, 5.79, -4.85, 0.81)
pt3dadd(-99.66, 5.64, -4.85, 0.81)
pt3dadd(-100.33, 5.57, -4.9, 0.81)
pt3dadd(-100.99, 5.49, -4.9, 0.81)
pt3dadd(-101.29, 4.98, -5.85, 0.81)
pt3dadd(-101.88, 4.9, -6.55, 1.11)
pt3dadd(-102.32, 4.31, -6.55, 1.11)
pt3dadd(-102.69, 3.58, -6.55, 1.11)
pt3dadd(-103.13, 2.76, -7.55, 0.81)
}
dend[7] {pt3dclear()
pt3dadd(-43.12, -8.25, 6.35, 1.33)
pt3dadd(-43.19, -9.11, 7.9, 1.33)
pt3dadd(-43.49, -9.85, 7.9, 1.33)
pt3dadd(-44.38, -10.58, 7.95, 1.33)
pt3dadd(-44.89, -11.25, 7.95, 1.33)
pt3dadd(-45.26, -11.98, 7.95, 1.33)
pt3dadd(-45.63, -12.8, 7.95, 1.33)
pt3dadd(-45.78, -13.68, 7.15, 1.33)
pt3dadd(-45.93, -14.34, 7, 1.33)
pt3dadd(-46.3, -15.3, 6.9, 1.33)
pt3dadd(-46.45, -16.34, 6.85, 1.33)
pt3dadd(-46.89, -16.93, 5.7, 1.33)
pt3dadd(-47.7, -17.44, 5.55, 1.33)
pt3dadd(-48.22, -18.11, 5.5, 1.33)
pt3dadd(-49.03, -18.55, 5.45, 1.33)
pt3dadd(-49.55, -18.77, 5.45, 1.33)
pt3dadd(-50.21, -19.14, 5.45, 1.33)
}
dend[8] {pt3dclear()
pt3dadd(-50.21, -19.14, 5.45, 0.96)
pt3dadd(-50.66, -18.77, 4.4, 0.96)
pt3dadd(-51.25, -18.7, 4.4, 0.96)
pt3dadd(-51.99, -18.62, 4.4, 0.96)
pt3dadd(-52.58, -18.55, 4.4, 0.96)
pt3dadd(-53.02, -18.62, 4.4, 0.96)
pt3dadd(-53.84, -18.7, 4.1, 0.96)
pt3dadd(-54.35, -18.99, 4.05, 0.96)
pt3dadd(-55.02, -19.43, 4.65, 0.96)
pt3dadd(-55.61, -19.8, 4.7, 0.96)
pt3dadd(-56.2, -19.73, 4.75, 0.96)
pt3dadd(-56.87, -19.73, 5.7, 0.89)
pt3dadd(-57.38, -19.73, 5.75, 0.89)
pt3dadd(-57.9, -19.43, 5.8, 0.89)
pt3dadd(-58.49, -19.29, 5.85, 0.89)
pt3dadd(-58.94, -19.21, 5.85, 0.89)
pt3dadd(-59.53, -18.84, 6.25, 0.96)
pt3dadd(-60.04, -19.14, 6.35, 1.18)
pt3dadd(-60.56, -18.7, 6.4, 1.18)
pt3dadd(-61.01, -18.47, 7.1, 1.03)
pt3dadd(-61.45, -18.03, 7.2, 1.03)
pt3dadd(-62.11, -17.66, 7.55, 1.03)
pt3dadd(-62.48, -17.22, 7.65, 1.03)
pt3dadd(-63.15, -16.85, 7.95, 0.89)
pt3dadd(-63.59, -16.7, 8, 0.89)
pt3dadd(-64.04, -16.26, 8, 0.89)
pt3dadd(-64.33, -15.67, 8, 0.89)
pt3dadd(-64.92, -15.67, 8.05, 0.89)
pt3dadd(-65.81, -15.89, 8.35, 0.89)
pt3dadd(-66.62, -16.19, 8.4, 1.11)
pt3dadd(-67.21, -16.56, 8.5, 1.11)
pt3dadd(-67.73, -16.63, 7.35, 1.11)
pt3dadd(-68.47, -16.56, 7.2, 1.11)
pt3dadd(-69.06, -16.93, 6.9, 0.96)
pt3dadd(-69.58, -17.22, 6.85, 0.96)
pt3dadd(-70.1, -17.29, 6.8, 0.96)
pt3dadd(-70.54, -17.29, 6.8, 0.96)
pt3dadd(-71.06, -17.15, 6.75, 0.96)
pt3dadd(-71.57, -16.85, 6.75, 0.96)
pt3dadd(-71.8, -16.41, 6.65, 0.96)
pt3dadd(-71.72, -15.89, 7.35, 0.96)
pt3dadd(-72.09, -15.3, 7.5, 0.96)
pt3dadd(-72.31, -14.86, 7.7, 0.96)
pt3dadd(-72.61, -14.57, 7.8, 0.96)
pt3dadd(-73.2, -14.42, 7.85, 0.96)
pt3dadd(-73.72, -14.42, 7.9, 0.96)
pt3dadd(-74.09, -14.57, 8, 0.96)
pt3dadd(-75.2, -14.64, 8.35, 0.96)
pt3dadd(-75.79, -14.86, 8.45, 0.96)
pt3dadd(-76.3, -14.64, 8.5, 0.96)
pt3dadd(-76.67, -14.42, 8.5, 0.96)
pt3dadd(-76.97, -13.98, 8.55, 0.96)
pt3dadd(-77.19, -13.68, 8.55, 0.96)
pt3dadd(-77.56, -13.39, 8.6, 0.96)
pt3dadd(-78.08, -12.94, 9, 0.96)
pt3dadd(-77.86, -12.57, 9.7, 0.96)
pt3dadd(-78, -11.98, 9.55, 0.96)
pt3dadd(-77.86, -11.17, 9.5, 0.89)
pt3dadd(-77.93, -10.81, 9.5, 0.89)
pt3dadd(-78.15, -10.51, 9.5, 0.89)
pt3dadd(-78.45, -9.85, 9.5, 0.89)
pt3dadd(-79.04, -9.77, 9.5, 0.89)
pt3dadd(-79.48, -9.92, 9.5, 0.89)
pt3dadd(-79.85, -10.44, 9.5, 0.89)
pt3dadd(-80.15, -10.73, 9.5, 0.89)
pt3dadd(-80.59, -11.25, 9.5, 0.89)
pt3dadd(-81.11, -11.32, 9.5, 0.89)
pt3dadd(-81.85, -11.17, 9.45, 1.03)
pt3dadd(-82.22, -10.95, 9.45, 1.03)
pt3dadd(-82.96, -10.73, 9.3, 1.03)
pt3dadd(-83.4, -10.44, 9.25, 1.03)
pt3dadd(-83.7, -9.99, 9.25, 1.03)
pt3dadd(-84.07, -9.26, 9.85, 1.03)
pt3dadd(-84.43, -8.67, 10.85, 1.26)
pt3dadd(-84.29, -8.08, 11.85, 1.26)
pt3dadd(-84.73, -7.56, 11.95, 1.26)
pt3dadd(-85.03, -7.41, 12.05, 1.26)
pt3dadd(-85.25, -7.19, 12.15, 1.26)
pt3dadd(-85.69, -6.75, 12.2, 1.26)
pt3dadd(-85.91, -6.53, 12.3, 1.26)
pt3dadd(-86.36, -6.16, 12.4, 1.26)
pt3dadd(-86.87, -6.23, 12.45, 1.26)
pt3dadd(-87.54, -6.6, 13.2, 1.11)
pt3dadd(-87.83, -7.19, 13.25, 1.11)
pt3dadd(-88.2, -7.56, 13.3, 0.89)
pt3dadd(-88.72, -7.56, 13.3, 0.89)
}
}
proc shape3d_4() {
dend[8] { pt3dadd(-89.24, -7.49, 13.3, 0.89)
pt3dadd(-89.61, -7.04, 13.3, 0.89)
pt3dadd(-89.83, -6.6, 13.3, 0.89)
pt3dadd(-89.9, -5.64, 13.4, 0.89)
pt3dadd(-89.98, -4.98, 13.5, 0.89)
pt3dadd(-90.2, -4.68, 13.55, 0.89)
pt3dadd(-90.72, -4.46, 13.55, 0.89)
pt3dadd(-91.16, -4.76, 13.6, 0.89)
pt3dadd(-91.46, -5.35, 13.7, 0.89)
pt3dadd(-91.6, -6.38, 13.75, 0.89)
pt3dadd(-92.34, -6.45, 14.05, 1.03)
pt3dadd(-93.08, -6.16, 14, 1.03)
pt3dadd(-93.67, -6.38, 14, 1.03)
pt3dadd(-94.12, -6.38, 13.95, 1.03)
pt3dadd(-94.41, -6.31, 13.95, 1.03)
pt3dadd(-94.78, -6.31, 13.95, 1.03)
pt3dadd(-95.52, -6.23, 13.95, 1.03)
pt3dadd(-95.96, -5.94, 13.9, 1.03)
pt3dadd(-96.48, -5.64, 13.9, 1.03)
pt3dadd(-96.85, -5.5, 13.9, 1.03)
pt3dadd(-97.22, -5.27, 13.9, 1.03)
pt3dadd(-97.52, -5.13, 13.9, 1.03)
pt3dadd(-97.96, -4.83, 13.65, 1.03)
pt3dadd(-98.77, -4.46, 13.65, 1.03)
pt3dadd(-99.44, -4.54, 14.65, 0.81)
pt3dadd(-99.88, -4.09, 14.7, 0.81)
pt3dadd(-100.1, -3.58, 14.7, 0.81)
pt3dadd(-100.47, -3.21, 14.7, 0.81)
pt3dadd(-100.77, -2.69, 14.7, 0.81)
pt3dadd(-101.29, -2.62, 14.7, 0.81)
pt3dadd(-102.1, -2.62, 15.25, 0.67)
pt3dadd(-102.91, -2.4, 15.3, 0.67)
pt3dadd(-103.21, -2.1, 15.3, 0.67)
pt3dadd(-104.09, -1.51, 15.3, 0.67)
pt3dadd(-104.69, -1.07, 15.3, 0.67)
pt3dadd(-105.2, -0.55, 15.3, 0.67)
pt3dadd(-105.5, -0.26, 15.3, 0.67)
pt3dadd(-105.94, 0.33, 15.25, 0.67)
pt3dadd(-106.24, 0.77, 15.25, 0.67)
pt3dadd(-106.53, 1.44, 15.2, 0.67)
pt3dadd(-106.9, 1.81, 15.2, 0.67)
}
dend[9] {pt3dclear()
pt3dadd(-50.21, -19.14, 5.45, 1.33)
pt3dadd(-50.29, -20.02, 4.35, 1.33)
pt3dadd(-50.51, -20.54, 4.3, 1.33)
pt3dadd(-50.95, -21.42, 4.3, 1.26)
pt3dadd(-51.55, -21.79, 4.25, 1.26)
pt3dadd(-51.91, -22.75, 4.25, 1.26)
pt3dadd(-52.36, -23.05, 4.25, 1.26)
pt3dadd(-52.88, -23.71, 4.05, 1.26)
pt3dadd(-53.25, -24.08, 4, 1.26)
pt3dadd(-53.84, -24.6, 3.35, 1.26)
pt3dadd(-54.58, -25.19, 3.3, 1.26)
pt3dadd(-55.39, -25.7, 3.25, 1.26)
pt3dadd(-55.98, -26.14, 3.2, 1.26)
pt3dadd(-56.87, -26.29, 3.15, 1.26)
pt3dadd(-57.61, -26.44, 3.1, 1.26)
pt3dadd(-58.34, -26.51, 3.1, 1.26)
pt3dadd(-58.94, -26.66, 3.05, 1.26)
pt3dadd(-59.9, -26.66, 2.85, 1.18)
pt3dadd(-60.64, -27.03, 2.85, 1.18)
pt3dadd(-61.3, -27.03, 2, 1.18)
pt3dadd(-62.11, -27.25, 2, 1.18)
pt3dadd(-62.93, -27.84, 0.95, 1.18)
pt3dadd(-63.44, -28.21, 0.95, 1.18)
pt3dadd(-64.04, -28.8, 0.7, 1.18)
pt3dadd(-64.92, -29.24, 0.7, 1.18)
pt3dadd(-65.22, -30.13, 0.3, 1.18)
pt3dadd(-65.59, -30.79, 0.3, 1.18)
pt3dadd(-65.96, -31.53, 0.3, 1.18)
pt3dadd(-66.55, -32.41, -0.55, 1.18)
pt3dadd(-66.92, -33.3, -0.55, 1.18)
pt3dadd(-67.36, -33.89, -0.55, 1.03)
pt3dadd(-67.88, -34.18, -0.55, 1.03)
pt3dadd(-68.54, -34.48, -0.7, 1.18)
pt3dadd(-69.14, -34.77, -0.7, 1.18)
pt3dadd(-69.87, -35.51, -0.75, 1.18)
pt3dadd(-70.39, -36.3, -1.4, 1.18)
pt3dadd(-70.76, -37.03, -1.4, 1.18)
pt3dadd(-70.98, -38.07, -1.45, 1.18)
pt3dadd(-71.13, -38.73, -1.45, 1.18)
pt3dadd(-71.5, -39.61, -1.8, 1.18)
pt3dadd(-71.86, -40.13, -1.8, 1.18)
pt3dadd(-71.94, -40.94, -1.8, 1.18)
pt3dadd(-72.23, -41.68, -1.8, 1.18)
pt3dadd(-72.38, -42.86, -1.8, 1.18)
}
dend[10] {pt3dclear()
pt3dadd(-72.38, -42.86, -1.8, 0.96)
pt3dadd(-72.46, -43.82, -2.45, 0.96)
pt3dadd(-72.6, -44.7, -2.45, 0.96)
pt3dadd(-72.53, -45.44, -2.5, 0.96)
pt3dadd(-72.83, -46.4, -2.5, 0.96)
pt3dadd(-72.97, -47.21, -2.5, 0.96)
pt3dadd(-73.27, -48.17, -2.55, 0.81)
pt3dadd(-73.79, -48.76, -2.65, 0.81)
pt3dadd(-74.38, -49.64, -2.65, 0.81)
pt3dadd(-74.9, -50.31, -2.65, 0.81)
pt3dadd(-75.63, -50.9, -1.8, 0.81)
pt3dadd(-76.45, -51.27, -1.95, 0.81)
pt3dadd(-76.89, -51.71, -2, 0.81)
pt3dadd(-77.41, -52.37, -2, 0.81)
pt3dadd(-78.15, -52.74, -2.35, 0.81)
pt3dadd(-78.66, -53.11, -2.55, 0.81)
pt3dadd(-79.4, -53.48, -3.05, 0.89)
pt3dadd(-80.14, -53.26, -3.1, 0.89)
pt3dadd(-81.03, -53.18, -3.1, 1.11)
pt3dadd(-81.69, -53.7, -3.15, 1.11)
pt3dadd(-82.21, -54.07, -3.15, 1.11)
pt3dadd(-83.03, -54.29, -3.75, 0.89)
pt3dadd(-83.76, -54.58, -3.8, 0.89)
pt3dadd(-84.21, -55.03, -3.8, 0.89)
pt3dadd(-84.95, -55.54, -4.3, 0.89)
pt3dadd(-85.69, -55.47, -4.3, 0.89)
pt3dadd(-86.42, -55.4, -4.3, 0.89)
pt3dadd(-87.16, -55.32, -4.35, 0.89)
pt3dadd(-88.05, -55.17, -4.35, 0.89)
pt3dadd(-89.09, -55.25, -4.6, 0.89)
pt3dadd(-89.82, -55.54, -4.6, 0.89)
pt3dadd(-90.64, -56.06, -4.6, 0.89)
pt3dadd(-91.52, -56.13, -4.75, 0.89)
pt3dadd(-92.19, -56.72, -4, 0.89)
pt3dadd(-92.56, -57.53, -3.9, 0.89)
pt3dadd(-93, -58.42, -3.75, 1.03)
pt3dadd(-93.45, -59.08, -3.75, 1.03)
pt3dadd(-94.04, -60.04, -3.65, 1.03)
pt3dadd(-94.55, -61.22, -3.65, 1.03)
pt3dadd(-94.92, -62.03, -3.65, 1.03)
pt3dadd(-94.92, -62.62, -3.65, 1.03)
pt3dadd(-95.07, -63.73, -3.65, 1.03)
pt3dadd(-95.44, -64.47, -3.65, 1.03)
pt3dadd(-95.74, -65.35, -3.65, 1.03)
pt3dadd(-96.25, -65.79, -3.65, 1.03)
pt3dadd(-96.85, -66.46, -3.65, 1.03)
pt3dadd(-97.77, -66.9, -2.8, 0.89)
pt3dadd(-98.36, -67.34, -2.75, 0.89)
pt3dadd(-98.96, -68.08, -2.5, 0.89)
pt3dadd(-99.7, -68.74, -2.45, 0.89)
pt3dadd(-100.21, -69.11, -2.4, 0.89)
pt3dadd(-100.51, -69.78, -3.3, 0.74)
pt3dadd(-101.25, -70, -3.35, 0.74)
pt3dadd(-101.76, -70.44, -3.4, 0.74)
pt3dadd(-102.36, -71.1, -3.45, 0.74)
pt3dadd(-102.87, -71.25, -3.45, 0.74)
pt3dadd(-103.46, -71.77, -3.5, 0.74)
pt3dadd(-103.91, -72.28, -3.65, 0.89)
pt3dadd(-104.35, -72.73, -3.65, 0.89)
pt3dadd(-104.79, -73.02, -3.9, 0.89)
pt3dadd(-105.39, -73.61, -4, 0.89)
pt3dadd(-105.83, -74.13, -4.4, 0.89)
pt3dadd(-106.42, -74.5, -4.65, 0.89)
pt3dadd(-106.86, -74.94, -5.2, 0.89)
pt3dadd(-107.23, -75.31, -5.2, 0.89)
pt3dadd(-108.12, -75.31, -5.25, 0.89)
pt3dadd(-108.42, -75.38, -5.3, 0.89)
pt3dadd(-108.86, -75.31, -5.3, 0.89)
pt3dadd(-109.45, -75.31, -5.3, 0.89)
pt3dadd(-110.12, -75.6, -5.95, 0.89)
pt3dadd(-110.78, -75.31, -6, 0.89)
pt3dadd(-111.37, -75.23, -6, 0.89)
pt3dadd(-111.96, -74.57, -6.45, 0.89)
pt3dadd(-112.41, -73.83, -6.5, 0.67)
pt3dadd(-112.85, -73.17, -6.55, 0.52)
pt3dadd(-113.07, -72.73, -6.55, 0.52)
pt3dadd(-113.07, -71.84, -6.55, 0.52)
}
dend[11] {pt3dclear()
pt3dadd(-72.38, -42.86, -1.8, 0.52)
pt3dadd(-73.01, -43.3, -3.2, 0.52)
pt3dadd(-73.53, -43.89, -3.2, 0.52)
pt3dadd(-73.75, -44.55, -3.2, 0.52)
pt3dadd(-73.83, -45.29, -3.6, 0.52)
pt3dadd(-74.2, -46.1, -3.6, 0.52)
pt3dadd(-74.49, -47.14, -3.65, 0.52)
pt3dadd(-74.42, -47.73, -3.65, 0.52)
pt3dadd(-74.79, -48.32, -3.65, 0.52)
pt3dadd(-75.01, -48.83, -3.65, 0.52)
pt3dadd(-75.38, -49.57, -3.65, 0.52)
pt3dadd(-75.9, -49.94, -3.7, 0.52)
pt3dadd(-76.49, -50.53, -3.7, 0.52)
pt3dadd(-76.64, -51.27, -3.7, 0.52)
pt3dadd(-76.93, -51.86, -3.7, 0.52)
pt3dadd(-77.15, -52.52, -3.7, 0.52)
pt3dadd(-77.67, -53.11, -3.7, 0.52)
pt3dadd(-77.97, -54.14, -3.7, 0.52)
pt3dadd(-78.26, -54.73, -3.9, 0.52)
pt3dadd(-78.78, -55.25, -3.8, 0.52)
pt3dadd(-79.44, -55.54, -3.65, 0.59)
pt3dadd(-80.04, -55.84, -3.6, 0.59)
pt3dadd(-80.55, -56.13, -3.6, 0.59)
pt3dadd(-80.63, -56.87, -3.55, 0.59)
pt3dadd(-80.92, -57.39, -3.55, 0.59)
pt3dadd(-81.44, -57.76, -3.55, 0.59)
pt3dadd(-82.25, -58.12, -3.55, 0.59)
pt3dadd(-82.4, -59.01, -3.3, 0.59)
pt3dadd(-83.14, -59.38, -3.3, 0.59)
pt3dadd(-83.66, -60.04, -4.35, 0.59)
pt3dadd(-84.03, -60.78, -4.4, 0.59)
pt3dadd(-84.84, -61.3, -4.4, 0.59)
pt3dadd(-85.73, -61.66, -4.35, 0.59)
pt3dadd(-86.24, -62.03, -4.35, 0.59)
pt3dadd(-86.98, -62.33, -4.35, 0.59)
pt3dadd(-87.8, -62.84, -4.3, 0.59)
pt3dadd(-88.31, -63.51, -4.3, 0.59)
pt3dadd(-89.05, -63.95, -4.3, 0.59)
}
}
proc shape3d_5() {
dend[11] { pt3dadd(-90.01, -64.54, -4.3, 0.59)
pt3dadd(-90.68, -65.06, -4.3, 0.59)
pt3dadd(-91.34, -65.43, -4.4, 0.59)
pt3dadd(-91.79, -65.94, -4.4, 0.59)
pt3dadd(-92.38, -66.83, -4.4, 0.59)
pt3dadd(-92.97, -67.49, -4.4, 0.59)
pt3dadd(-93.41, -68.3, -4.4, 0.59)
pt3dadd(-93.86, -68.97, -4.4, 0.59)
pt3dadd(-94.23, -69.48, -5.15, 0.81)
pt3dadd(-94.74, -69.85, -5.15, 0.81)
pt3dadd(-95.33, -70.37, -5.2, 0.81)
pt3dadd(-96.37, -70.37, -5.4, 0.81)
pt3dadd(-97.18, -70.51, -5.9, 0.67)
pt3dadd(-97.77, -70.74, -5.95, 0.52)
pt3dadd(-98.51, -70.51, -5.95, 0.52)
pt3dadd(-98.96, -70.74, -5.95, 0.52)
pt3dadd(-99.55, -70.37, -5.95, 0.52)
}
dend[12] {pt3dclear()
pt3dadd(-22.99, -2.8, 6.55, 1.18)
pt3dadd(-22.67, -2.29, 4.8, 1.18)
pt3dadd(-22.45, -1.7, 4.45, 1.18)
pt3dadd(-22.23, -1.11, 3.95, 0.89)
pt3dadd(-22.23, -0.67, 3.9, 1.03)
pt3dadd(-22.08, -0.3, 3.85, 1.03)
pt3dadd(-21.93, 0.21, 3.75, 1.03)
pt3dadd(-21.56, 0.66, 2.95, 1.03)
pt3dadd(-21.56, 1.17, 2.65, 1.03)
pt3dadd(-21.86, 1.69, 2.6, 1.03)
pt3dadd(-22.08, 2.06, 2.55, 1.03)
pt3dadd(-22.52, 2.5, 2.55, 1.03)
pt3dadd(-22.96, 2.94, 2.55, 1.03)
pt3dadd(-23.56, 3.31, 2.55, 1.03)
pt3dadd(-24.22, 3.68, 2.5, 1.03)
pt3dadd(-24.52, 3.97, 2.5, 1.03)
pt3dadd(-24.96, 4.2, 2.5, 1.03)
pt3dadd(-25.33, 4.42, 2.5, 1.03)
pt3dadd(-25.92, 5.15, 2.5, 1.03)
pt3dadd(-26.22, 5.45, 2.5, 1.03)
pt3dadd(-26.66, 5.74, 2.5, 1.03)
pt3dadd(-27.1, 6.48, 2.5, 1.03)
pt3dadd(-27.62, 6.7, 2.5, 1.03)
pt3dadd(-28.36, 6.92, 2.5, 1.03)
pt3dadd(-28.88, 7.22, 2.5, 1.03)
pt3dadd(-29.32, 7.59, 2.5, 1.03)
pt3dadd(-29.76, 7.74, 2.5, 1.03)
pt3dadd(-30.21, 8.03, 2.5, 1.03)
pt3dadd(-30.58, 8.4, 2.5, 1.03)
pt3dadd(-30.8, 8.92, 2.5, 1.03)
pt3dadd(-30.95, 9.58, 2.5, 1.03)
pt3dadd(-31.09, 10.39, 2.5, 1.03)
pt3dadd(-30.87, 11.13, 2.5, 1.03)
pt3dadd(-30.73, 11.72, 2.5, 1.03)
pt3dadd(-30.28, 12.38, 2.5, 1.03)
pt3dadd(-30.06, 13.05, 2.5, 1.03)
pt3dadd(-29.76, 13.64, 2.5, 1.03)
pt3dadd(-29.25, 14.23, 2.5, 1.03)
pt3dadd(-28.95, 14.45, 1.8, 1.03)
pt3dadd(-28.58, 15.26, 1.75, 1.03)
pt3dadd(-28.06, 15.48, 1.7, 1.03)
pt3dadd(-27.92, 16.29, 1, 1.03)
pt3dadd(-28.29, 16.95, 0.9, 1.03)
pt3dadd(-28.51, 17.54, 0.35, 1.03)
pt3dadd(-28.95, 17.91, 0.05, 1.03)
pt3dadd(-29.4, 18.43, -0.25, 1.03)
pt3dadd(-29.84, 18.87, -0.65, 1.03)
pt3dadd(-30.21, 19.39, -0.75, 1.03)
pt3dadd(-30.87, 19.46, -0.8, 1.03)
pt3dadd(-31.61, 19.61, -0.8, 1.03)
pt3dadd(-32.13, 19.83, -0.8, 1.03)
pt3dadd(-32.5, 20.05, -1, 1.03)
pt3dadd(-33.24, 20.27, -1.5, 1.03)
pt3dadd(-33.68, 20.64, -1.55, 1.03)
pt3dadd(-34.13, 21.01, -1.55, 1.03)
pt3dadd(-34.72, 21.38, -1.55, 1.03)
pt3dadd(-35.23, 21.6, -1.55, 1.03)
pt3dadd(-35.75, 22.04, -1.55, 1.03)
pt3dadd(-36.56, 22.49, -1.55, 1.03)
pt3dadd(-37.38, 22.78, -1.55, 1.03)
pt3dadd(-38.12, 23, -1.55, 1.03)
pt3dadd(-38.93, 23.52, -1.55, 1.03)
pt3dadd(-39.45, 24.03, -1.55, 1.03)
}
dend[13] {pt3dclear()
pt3dadd(-39.45, 24.03, -1.55, 0.89)
pt3dadd(-40.11, 24.48, -0.9, 0.89)
pt3dadd(-40.7, 24.85, -0.85, 0.89)
pt3dadd(-41.22, 25.51, -0.75, 0.89)
pt3dadd(-41.52, 26.25, -0.6, 0.89)
pt3dadd(-41.81, 26.62, -0.55, 0.89)
pt3dadd(-42.18, 27.06, -0.5, 0.89)
pt3dadd(-42.4, 27.5, -0.4, 0.89)
pt3dadd(-42.7, 28.09, -0.35, 0.89)
pt3dadd(-42.99, 28.61, -0.25, 0.89)
pt3dadd(-43.07, 28.98, -0.2, 0.89)
pt3dadd(-43.27, 29.5, -2.5, 1.11)
pt3dadd(-43.64, 30.24, -2.4, 1.11)
pt3dadd(-43.72, 31.57, -2.3, 1.11)
}
dend[14] {pt3dclear()
pt3dadd(-43.72, 31.57, -2.3, 1.11)
pt3dadd(-44.16, 31.64, -5.6, 1.11)
pt3dadd(-45.12, 31.64, -5.65, 1.11)
pt3dadd(-45.56, 31.49, -5.7, 1.11)
pt3dadd(-46.16, 30.61, -5.7, 1.11)
pt3dadd(-46.67, 29.94, -5.75, 1.11)
pt3dadd(-47.19, 29.5, -5.75, 1.11)
pt3dadd(-47.86, 28.91, -5.75, 1.11)
pt3dadd(-48.37, 28.62, -5.75, 1.11)
pt3dadd(-49.04, 28.39, -5.75, 1.11)
pt3dadd(-49.56, 28.47, -5.75, 1.11)
pt3dadd(-50.22, 29.06, -5.85, 1.11)
pt3dadd(-50.66, 29.35, -5.9, 1.11)
pt3dadd(-51.03, 29.72, -5.9, 1.11)
pt3dadd(-51.55, 30.16, -5.95, 1.11)
pt3dadd(-51.92, 30.61, -5.95, 1.11)
pt3dadd(-52.22, 31.12, -6.05, 1.11)
pt3dadd(-52.44, 31.49, -6.2, 1.11)
pt3dadd(-52.81, 32.3, -6.5, 1.11)
pt3dadd(-52.81, 33.11, -6.6, 1.11)
pt3dadd(-53.03, 34, -6.6, 1.11)
pt3dadd(-53.33, 34.66, -6.6, 1.11)
pt3dadd(-53.62, 35.4, -6.65, 1.11)
pt3dadd(-53.77, 35.77, -6.75, 1.11)
pt3dadd(-53.92, 36.88, -6.9, 1.11)
pt3dadd(-54.14, 37.98, -6.95, 1.11)
pt3dadd(-54.43, 38.94, -6.95, 1.11)
pt3dadd(-54.51, 39.46, -6.95, 1.11)
pt3dadd(-54.66, 39.83, -6.95, 1.11)
pt3dadd(-55.1, 40.34, -7, 1.11)
pt3dadd(-55.76, 40.42, -7, 1.11)
pt3dadd(-56.5, 40.71, -7.05, 1.11)
pt3dadd(-57.54, 41.08, -7.1, 1.11)
pt3dadd(-58.5, 41.6, -6.95, 1.11)
pt3dadd(-58.94, 42.04, -6.85, 1.11)
pt3dadd(-59.02, 42.33, -6.8, 0.96)
pt3dadd(-59.9, 42.92, -6.75, 0.96)
pt3dadd(-60.79, 43.14, -6.75, 0.96)
pt3dadd(-61.23, 43.37, -6.7, 0.96)
pt3dadd(-61.68, 43.51, -6.7, 0.96)
pt3dadd(-62.12, 43.59, -6.7, 0.96)
pt3dadd(-62.71, 43.96, -6.7, 0.96)
pt3dadd(-63.01, 44.25, -6.65, 0.96)
pt3dadd(-63.3, 44.62, -6.55, 0.96)
pt3dadd(-63.67, 45.14, -6.5, 0.96)
pt3dadd(-63.89, 45.95, -6.4, 0.96)
pt3dadd(-64.04, 46.39, -6.55, 0.96)
pt3dadd(-64.34, 46.83, -6.7, 0.96)
pt3dadd(-64.71, 47.27, -6.8, 0.96)
pt3dadd(-64.93, 47.27, -6.9, 0.96)
pt3dadd(-65.22, 47.72, -6.95, 0.96)
pt3dadd(-65.59, 48.23, -7, 0.96)
pt3dadd(-65.67, 48.82, -7, 0.96)
pt3dadd(-66.04, 49.41, -7.05, 0.96)
pt3dadd(-66.7, 49.41, -7.05, 0.96)
pt3dadd(-67.44, 49.12, -7.05, 0.96)
pt3dadd(-67.81, 49.04, -7.05, 0.96)
pt3dadd(-68.4, 49.27, -7.1, 0.96)
pt3dadd(-68.77, 49.49, -7.1, 0.96)
pt3dadd(-69.07, 49.78, -7.1, 0.96)
pt3dadd(-69.29, 50, -7.15, 0.96)
pt3dadd(-69.88, 50.3, -7.2, 0.96)
pt3dadd(-70.55, 50.59, -7.2, 0.96)
pt3dadd(-71.06, 50.89, -7.25, 0.96)
pt3dadd(-71.73, 50.96, -7.25, 0.96)
pt3dadd(-72.47, 51.26, -7.25, 0.96)
pt3dadd(-72.84, 51.7, -7.35, 0.96)
pt3dadd(-73.5, 52.22, -7.4, 0.96)
pt3dadd(-73.8, 52.81, -7.4, 0.96)
pt3dadd(-73.95, 53.17, -7.45, 0.96)
pt3dadd(-74.17, 53.54, -7.5, 0.96)
pt3dadd(-74.76, 53.69, -7.5, 0.96)
pt3dadd(-75.42, 53.91, -7.55, 0.96)
pt3dadd(-76.16, 53.76, -7.6, 0.96)
pt3dadd(-76.75, 53.4, -7.75, 0.96)
pt3dadd(-77.2, 53.32, -8.1, 0.96)
pt3dadd(-78.16, 53.32, -8.2, 0.96)
pt3dadd(-78.38, 53.62, -8.25, 0.96)
pt3dadd(-78.75, 53.91, -8.25, 0.96)
pt3dadd(-79.12, 54.28, -8.25, 0.96)
pt3dadd(-79.56, 54.58, -8.25, 0.96)
pt3dadd(-79.93, 54.94, -8.3, 0.96)
pt3dadd(-80.38, 55.31, -8.4, 0.96)
pt3dadd(-80.67, 55.76, -8.4, 0.96)
pt3dadd(-80.82, 56.05, -8.4, 0.96)
pt3dadd(-81.19, 56.35, -8.45, 0.96)
pt3dadd(-81.34, 56.86, -8.45, 0.96)
pt3dadd(-81.78, 57.3, -8.45, 0.96)
pt3dadd(-82.15, 57.67, -8.45, 0.96)
pt3dadd(-82.59, 58.04, -8.45, 0.96)
pt3dadd(-82.74, 58.34, -8.65, 0.96)
pt3dadd(-83.18, 58.85, -7.6, 0.81)
pt3dadd(-83.48, 59.44, -7.55, 0.81)
pt3dadd(-83.92, 59.81, -7.5, 0.81)
pt3dadd(-84.22, 59.89, -7.45, 0.81)
pt3dadd(-84.74, 59.89, -7.45, 0.81)
pt3dadd(-84.96, 59.96, -7.4, 0.81)
pt3dadd(-85.18, 59.96, -7.4, 0.81)
pt3dadd(-85.55, 60.11, -7.4, 0.81)
pt3dadd(-86.07, 60.18, -7.4, 0.81)
pt3dadd(-86.51, 60.4, -7.4, 0.81)
pt3dadd(-86.85, 60.9, -7.15, 0.81)
pt3dadd(-87.36, 61.34, -7.2, 0.81)
pt3dadd(-87.29, 62.15, -7.95, 0.81)
pt3dadd(-86.33, 62.74, -8, 0.81)
pt3dadd(-85.66, 62.59, -8.05, 0.81)
}
}
proc shape3d_6() {
dend[14] { pt3dadd(-85, 62.08, -8.1, 0.81)
pt3dadd(-85.74, 61.93, -8.1, 0.81)
pt3dadd(-86.63, 61.85, -8.1, 0.81)
pt3dadd(-87.14, 61.63, -9.1, 0.81)
pt3dadd(-87.73, 61.71, -9.45, 0.81)
pt3dadd(-88.25, 62.15, -10.6, 0.81)
pt3dadd(-88.84, 61.85, -10.65, 0.81)
pt3dadd(-89.36, 61.34, -11, 0.81)
pt3dadd(-89.8, 61.49, -11.3, 0.81)
pt3dadd(-90.4, 61.63, -11.35, 0.67)
pt3dadd(-90.84, 62, -11.35, 0.67)
pt3dadd(-91.21, 62.44, -11.35, 0.67)
pt3dadd(-91.43, 62.81, -11.35, 0.67)
pt3dadd(-91.8, 63.48, -11.4, 0.67)
pt3dadd(-92.1, 63.77, -11.45, 0.67)
pt3dadd(-92.98, 64.21, -11.45, 0.67)
pt3dadd(-93.43, 64.44, -11.45, 0.67)
pt3dadd(-93.94, 64.73, -11.5, 0.67)
pt3dadd(-94.31, 65.25, -11.55, 0.67)
pt3dadd(-94.39, 65.84, -11.55, 0.67)
pt3dadd(-94.68, 66.5, -11.55, 0.67)
pt3dadd(-94.76, 67.09, -11.55, 0.67)
pt3dadd(-94.9, 67.75, -11.55, 0.67)
pt3dadd(-94.98, 68.64, -11.55, 0.67)
pt3dadd(-95.13, 69.52, -11.55, 0.52)
pt3dadd(-95.27, 69.89, -11.55, 0.52)
pt3dadd(-95.35, 70.7, -11.55, 0.37)
pt3dadd(-95.42, 71.37, -11.55, 0.37)
pt3dadd(-95.57, 71.88, -11.55, 0.37)
pt3dadd(-95.86, 72.77, -11.75, 0.3)
pt3dadd(-95.79, 73.36, -11.75, 0.3)
pt3dadd(-95.94, 74.02, -11.75, 0.3)
pt3dadd(-96.6, 74.1, -11.75, 0.3)
}
dend[15] {pt3dclear()
pt3dadd(-43.72, 31.57, -2.3, 0.59)
pt3dadd(-44.35, 31.91, -4.25, 0.59)
pt3dadd(-44.94, 32.06, -4.25, 0.59)
pt3dadd(-45.61, 31.77, -4.25, 0.59)
pt3dadd(-46.35, 32.06, -4.15, 0.59)
pt3dadd(-46.86, 32.06, -4.15, 0.59)
pt3dadd(-47.6, 32.36, -4.1, 0.59)
pt3dadd(-48.19, 32.5, -4.05, 0.59)
pt3dadd(-48.71, 32.21, -4, 0.59)
pt3dadd(-48.86, 31.4, -3.95, 0.59)
pt3dadd(-48.64, 30.59, -4.3, 0.59)
pt3dadd(-48.56, 29.77, -4.45, 0.59)
pt3dadd(-48.78, 29.04, -4.55, 0.59)
pt3dadd(-49.01, 28.37, -4.6, 0.59)
pt3dadd(-49.67, 28.13, -6.8, 0.74)
pt3dadd(-50.11, 28.27, -6.8, 0.74)
pt3dadd(-50.63, 28.64, -6.75, 0.74)
pt3dadd(-51.07, 28.94, -6.75, 0.74)
pt3dadd(-51.44, 29.31, -6.75, 0.74)
pt3dadd(-51.74, 29.53, -6.75, 0.74)
pt3dadd(-52.03, 29.82, -6.75, 0.74)
pt3dadd(-52.33, 29.97, -6.65, 0.74)
pt3dadd(-52.63, 30.34, -6.35, 0.74)
pt3dadd(-53.22, 31.15, -6.3, 0.74)
pt3dadd(-53.66, 31.74, -6.25, 0.74)
pt3dadd(-53.88, 32.4, -6.2, 0.74)
pt3dadd(-54.18, 33.21, -6.2, 0.74)
pt3dadd(-54.55, 33.95, -6.1, 0.74)
pt3dadd(-54.77, 34.54, -5.95, 0.74)
pt3dadd(-55.06, 35.13, -5.9, 0.74)
pt3dadd(-55.29, 35.43, -6.05, 0.74)
pt3dadd(-55.66, 35.72, -6.25, 0.74)
pt3dadd(-56.17, 36.24, -6.4, 0.74)
pt3dadd(-56.47, 36.46, -6.5, 0.74)
pt3dadd(-57.06, 36.75, -6.6, 0.74)
pt3dadd(-57.5, 36.98, -6.65, 0.74)
pt3dadd(-58.46, 37.12, -6.8, 0.74)
pt3dadd(-59.13, 37.57, -6.8, 0.74)
pt3dadd(-59.43, 37.71, -6.8, 0.74)
pt3dadd(-59.87, 38.01, -6.85, 0.74)
pt3dadd(-60.31, 38.08, -6.85, 0.74)
pt3dadd(-61.13, 38.23, -6.85, 0.74)
pt3dadd(-61.64, 38.23, -6.85, 0.74)
pt3dadd(-62.6, 37.93, -6.95, 0.74)
pt3dadd(-63.19, 37.79, -7.05, 0.74)
pt3dadd(-64.01, 38.01, -7.7, 0.74)
pt3dadd(-64.75, 38.08, -8.05, 0.89)
pt3dadd(-65.49, 38.01, -8.1, 0.89)
pt3dadd(-65.93, 38.38, -8.15, 0.89)
pt3dadd(-66.59, 38.52, -8.15, 0.89)
pt3dadd(-67.11, 38.82, -8.2, 0.89)
pt3dadd(-67.63, 39.11, -8.25, 0.89)
pt3dadd(-68.15, 39.63, -8.3, 0.89)
pt3dadd(-68.44, 40.66, -8.45, 0.89)
pt3dadd(-68.44, 41.11, -8.6, 0.89)
pt3dadd(-68.59, 42.14, -8.8, 0.89)
pt3dadd(-68.59, 42.8, -8.85, 0.89)
pt3dadd(-68.59, 43.83, -8.9, 0.89)
pt3dadd(-68.96, 44.94, -8.9, 0.89)
pt3dadd(-69.55, 45.68, -8.9, 0.89)
pt3dadd(-70.51, 45.9, -8.9, 0.89)
pt3dadd(-71.25, 46.12, -8.95, 0.89)
pt3dadd(-72.06, 46.12, -8.95, 0.89)
pt3dadd(-73.17, 46.42, -8.95, 0.89)
}
dend[16] {pt3dclear()
pt3dadd(-39.45, 24.03, -1.55, 0.59)
pt3dadd(-39.47, 24.51, -1.95, 0.59)
pt3dadd(-39.54, 25.32, -1.85, 0.59)
pt3dadd(-39.25, 25.84, -1.8, 0.59)
pt3dadd(-39.47, 26.43, -1.8, 0.59)
pt3dadd(-39.77, 26.8, -1.8, 0.59)
pt3dadd(-39.84, 27.31, -1.75, 0.59)
pt3dadd(-39.62, 27.83, -1.75, 0.59)
pt3dadd(-39.4, 28.27, -1.3, 0.59)
pt3dadd(-39.62, 29.16, -1.2, 0.59)
pt3dadd(-40.14, 29.31, -1.2, 0.59)
pt3dadd(-40.43, 29.67, -1.35, 0.59)
pt3dadd(-40.65, 30.19, -1.45, 0.59)
pt3dadd(-40.95, 31, -1.5, 0.59)
pt3dadd(-40.65, 31.3, -2.05, 0.59)
pt3dadd(-40.58, 31.81, -2.1, 0.59)
pt3dadd(-39.91, 32.18, -2.1, 0.59)
pt3dadd(-38.95, 31.67, -2.15, 0.59)
pt3dadd(-39.47, 31.08, -2.15, 0.59)
pt3dadd(-40.06, 31.52, -2.15, 0.59)
pt3dadd(-40.43, 31.74, -4.95, 0.59)
pt3dadd(-40.87, 32.26, -5, 0.59)
pt3dadd(-40.73, 32.99, -5.15, 0.59)
pt3dadd(-40.8, 33.36, -5.5, 0.59)
pt3dadd(-40.58, 33.88, -5.75, 0.59)
pt3dadd(-40.43, 34.47, -5.8, 0.59)
pt3dadd(-40.28, 35.21, -5.85, 0.59)
pt3dadd(-40.43, 36.16, -6.25, 0.59)
pt3dadd(-40.73, 36.75, -6.3, 0.59)
pt3dadd(-40.87, 37.34, -6, 0.59)
pt3dadd(-41.02, 38.23, -5.85, 0.59)
pt3dadd(-41.17, 38.67, -5.8, 0.59)
pt3dadd(-41.47, 39.7, -5.75, 0.59)
pt3dadd(-41.32, 40.59, -5.7, 0.59)
pt3dadd(-40.95, 40.74, -5.7, 0.59)
pt3dadd(-39.99, 41.18, -6.3, 0.59)
pt3dadd(-39.62, 41.62, -7, 0.59)
pt3dadd(-39.62, 42.29, -7.1, 0.59)
pt3dadd(-39.69, 43.1, -7.15, 0.59)
pt3dadd(-40.06, 43.61, -7.15, 0.59)
pt3dadd(-40.73, 43.76, -7.15, 0.59)
pt3dadd(-41.24, 44.13, -7.25, 0.59)
pt3dadd(-41.54, 44.87, -7.55, 0.74)
pt3dadd(-41.69, 45.38, -7.55, 0.74)
pt3dadd(-41.54, 46.27, -7.55, 0.74)
pt3dadd(-41.54, 46.93, -7.7, 0.74)
pt3dadd(-41.17, 47.67, -7.75, 0.74)
pt3dadd(-40.65, 48.11, -8.8, 0.74)
pt3dadd(-40.58, 48.85, -8.8, 0.74)
pt3dadd(-40.87, 49.66, -8.9, 0.74)
pt3dadd(-41.54, 49.88, -9.35, 0.74)
pt3dadd(-41.83, 50.4, -9.4, 0.74)
pt3dadd(-41.91, 51.06, -9.55, 0.74)
pt3dadd(-42.2, 51.58, -9.8, 0.74)
pt3dadd(-42.2, 52.39, -9.9, 0.74)
pt3dadd(-42.35, 52.91, -9.95, 0.74)
pt3dadd(-42.72, 53.5, -10, 0.74)
pt3dadd(-43.24, 54.01, -10.05, 0.74)
pt3dadd(-43.76, 54.31, -10.15, 0.74)
pt3dadd(-44.2, 54.6, -10.15, 0.74)
pt3dadd(-44.64, 55.41, -10.15, 0.89)
pt3dadd(-45.23, 56.08, -10.2, 0.89)
pt3dadd(-45.46, 56.74, -10.2, 0.89)
pt3dadd(-45.75, 57.26, -10.2, 0.89)
pt3dadd(-46.34, 57.33, -10.2, 0.89)
pt3dadd(-47.01, 58.07, -10.7, 0.74)
pt3dadd(-47.23, 58.81, -10.7, 0.74)
pt3dadd(-48.04, 59.17, -10.7, 0.74)
pt3dadd(-48.78, 59.69, -9.75, 0.74)
pt3dadd(-49.96, 59.99, -9.6, 0.74)
pt3dadd(-50.93, 59.69, -9.5, 0.74)
pt3dadd(-51.59, 59.32, -8.95, 0.52)
pt3dadd(-52.18, 58.88, -9.05, 0.52)
pt3dadd(-52.55, 58.29, -9.15, 0.52)
}
dend[17] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(-5.97, -19.94, -3.9, 1.92)
pt3dadd(-6.26, -20.08, -3.95, 1.92)
pt3dadd(-7.23, -20.23, -3.95, 1.92)
pt3dadd(-7.96, -20.67, -3.95, 1.92)
pt3dadd(-8.85, -21.26, -3.8, 1.92)
pt3dadd(-9.74, -21.71, -3.55, 1.92)
pt3dadd(-10.33, -22.15, -3.4, 1.92)
pt3dadd(-11.07, -23.03, -2.6, 1.92)
pt3dadd(-11.66, -23.4, -2.4, 1.92)
pt3dadd(-12.33, -24.36, -2.25, 1.92)
pt3dadd(-12.84, -25.25, -2.1, 1.92)
pt3dadd(-13.29, -26.43, -1.5, 1.92)
pt3dadd(-13.58, -27.09, -1.35, 1.92)
pt3dadd(-14.03, -27.68, -1.3, 1.92)
pt3dadd(-14.69, -27.98, -1.25, 1.92)
pt3dadd(-15.58, -28.34, -1.15, 1.7)
pt3dadd(-16.61, -28.49, -1.1, 1.7)
pt3dadd(-17.2, -28.42, -1.05, 1.7)
pt3dadd(-17.94, -28.12, -0.85, 1.7)
pt3dadd(-18.61, -27.98, -0.8, 1.7)
pt3dadd(-19.42, -27.75, -2.7, 1.7)
pt3dadd(-20.38, -27.61, -2.8, 1.7)
pt3dadd(-21.27, -27.75, -3.85, 1.7)
pt3dadd(-21.93, -28.05, -5.5, 1.7)
pt3dadd(-22.23, -29.16, -5.55, 1.7)
pt3dadd(-22.67, -30.04, -5.7, 1.7)
pt3dadd(-23.12, -30.7, -5.7, 1.7)
pt3dadd(-23.78, -31.81, -5.95, 1.7)
}
}
proc shape3d_7() {
dend[17] { pt3dadd(-24.56, -32.75, -6.1, 1.7)
pt3dadd(-25.53, -33.12, -6.1, 1.7)
pt3dadd(-26.26, -33.34, -6.1, 1.7)
pt3dadd(-27.23, -33.78, -6.15, 1.7)
pt3dadd(-27.74, -33.85, -6.15, 1.7)
}
dend[18] {pt3dclear()
pt3dadd(-27.74, -33.85, -6.15, 1.03)
pt3dadd(-28.41, -34.44, -6.15, 1.03)
pt3dadd(-29.07, -34.96, -6.15, 1.03)
pt3dadd(-29.74, -35.55, -6.15, 1.03)
pt3dadd(-30.55, -36.14, -6.15, 1.03)
pt3dadd(-31.07, -36.73, -6.15, 1.03)
pt3dadd(-31.81, -37.1, -6.2, 1.03)
pt3dadd(-32.4, -37.47, -6.2, 1.03)
pt3dadd(-32.99, -37.76, -6.2, 1.03)
pt3dadd(-33.88, -38.35, -6.15, 1.03)
pt3dadd(-34.32, -38.87, -6.15, 1.03)
pt3dadd(-34.76, -39.38, -6.15, 1.03)
pt3dadd(-35.21, -40.27, -6, 1.03)
pt3dadd(-35.73, -40.93, -5.95, 1.03)
pt3dadd(-36.09, -41.82, -5.9, 1.03)
pt3dadd(-36.69, -42.56, -5.85, 1.03)
pt3dadd(-37.35, -43.07, -5.85, 1.03)
pt3dadd(-38.31, -43.37, -5.8, 1.03)
pt3dadd(-38.9, -43.44, -5.75, 1.03)
pt3dadd(-39.64, -43.51, -7, 1.03)
pt3dadd(-40.38, -43.96, -7.1, 1.03)
pt3dadd(-40.82, -44.33, -7.15, 1.03)
pt3dadd(-41.56, -44.77, -7.2, 1.03)
pt3dadd(-42.45, -45.21, -7.25, 1.03)
pt3dadd(-42.75, -45.87, -7.25, 1.03)
pt3dadd(-43.26, -46.83, -8.2, 0.89)
pt3dadd(-43.71, -47.57, -8.2, 0.89)
pt3dadd(-44.3, -47.87, -9.25, 0.89)
pt3dadd(-45.04, -48.31, -9.25, 0.89)
pt3dadd(-45.92, -48.46, -9.25, 0.89)
pt3dadd(-46.44, -48.68, -9.3, 0.89)
pt3dadd(-47.18, -48.97, -9.3, 0.89)
pt3dadd(-47.92, -49.05, -9.3, 0.89)
pt3dadd(-48.88, -49.27, -9.35, 0.89)
pt3dadd(-49.69, -49.34, -9.7, 0.89)
pt3dadd(-50.36, -49.78, -9.75, 0.89)
pt3dadd(-51.17, -50.23, -9.75, 1.11)
pt3dadd(-51.69, -50.74, -9.75, 1.11)
pt3dadd(-52.43, -51.33, -9.75, 1.11)
pt3dadd(-53.17, -51.85, -9.75, 1.11)
pt3dadd(-54.13, -52.22, -8.8, 1.11)
pt3dadd(-54.79, -52.66, -8.65, 1.11)
pt3dadd(-55.75, -53.47, -8.6, 1.11)
pt3dadd(-56.2, -54.13, -8.55, 1.11)
pt3dadd(-56.86, -54.65, -8.5, 1.11)
pt3dadd(-57.53, -55.17, -8.45, 1.11)
pt3dadd(-58.56, -55.39, -8.15, 1.11)
pt3dadd(-59.23, -56.05, -9, 1.11)
pt3dadd(-59.67, -56.64, -9.15, 1.11)
pt3dadd(-60.12, -57.31, -9.25, 1.11)
pt3dadd(-60.34, -58.12, -9.35, 1.11)
pt3dadd(-60.93, -58.26, -9.4, 1.11)
pt3dadd(-61.96, -58.78, -9.45, 1.11)
pt3dadd(-62.55, -59.37, -9.45, 1.11)
pt3dadd(-63.22, -59.59, -9.9, 1.11)
pt3dadd(-64.25, -59.67, -8.95, 1.11)
pt3dadd(-65.14, -59.74, -8.75, 1.11)
pt3dadd(-66.25, -59.74, -8.65, 1.11)
pt3dadd(-67.06, -60.03, -8.6, 1.11)
pt3dadd(-68.02, -60.48, -8.55, 1.11)
pt3dadd(-68.76, -60.7, -8.5, 1.11)
pt3dadd(-69.5, -61.14, -8.5, 1.11)
pt3dadd(-70.31, -61.66, -8.5, 1.11)
pt3dadd(-70.98, -61.73, -8.5, 1.11)
pt3dadd(-71.57, -61.73, -8.5, 1.11)
pt3dadd(-72.39, -61.75, -8.15, 1.11)
pt3dadd(-73.28, -61.9, -8.05, 1.11)
pt3dadd(-73.94, -61.9, -9.25, 0.96)
pt3dadd(-74.76, -61.83, -9.35, 1.03)
pt3dadd(-75.27, -61.97, -9.35, 1.03)
pt3dadd(-75.86, -61.9, -9.35, 1.03)
pt3dadd(-76.31, -61.68, -9.35, 1.03)
pt3dadd(-76.83, -61.46, -9.35, 1.03)
pt3dadd(-77.2, -61.31, -9.35, 1.03)
pt3dadd(-78.08, -61.46, -9.35, 0.89)
pt3dadd(-78.97, -61.68, -9.45, 0.89)
pt3dadd(-79.78, -62.05, -9.5, 0.89)
pt3dadd(-80.23, -62.86, -10.3, 0.89)
pt3dadd(-80.96, -63.23, -10.35, 0.89)
pt3dadd(-81.56, -63.96, -10.4, 0.89)
pt3dadd(-82.37, -64.7, -10.5, 0.89)
pt3dadd(-83.11, -65.07, -10.5, 0.89)
pt3dadd(-83.92, -65.59, -10.5, 0.89)
pt3dadd(-84.66, -65.96, -10.5, 0.89)
pt3dadd(-85.18, -66.18, -10.5, 0.89)
pt3dadd(-85.55, -66.62, -10.5, 0.89)
pt3dadd(-86.21, -67.06, -10.55, 0.89)
pt3dadd(-86.88, -67.14, -10.55, 0.89)
pt3dadd(-87.54, -67.36, -10.55, 0.89)
pt3dadd(-88.21, -67.73, -10.55, 0.89)
pt3dadd(-88.8, -68.02, -10.55, 0.89)
pt3dadd(-89.61, -68.09, -10.8, 0.89)
pt3dadd(-90.5, -68.24, -10.85, 0.89)
pt3dadd(-91.09, -68.76, -10.85, 0.89)
pt3dadd(-91.68, -69.2, -11, 0.89)
pt3dadd(-92.2, -69.94, -11.1, 0.89)
pt3dadd(-92.27, -70.75, -11.15, 0.89)
pt3dadd(-92.12, -71.49, -11.15, 0.89)
pt3dadd(-92.2, -72.37, -11.15, 0.89)
pt3dadd(-92.27, -73.26, -11.15, 0.89)
pt3dadd(-92.27, -73.92, -11.2, 0.89)
pt3dadd(-92.42, -74.66, -11.2, 0.89)
pt3dadd(-92.49, -75.47, -11.6, 0.89)
pt3dadd(-93.16, -75.91, -11.65, 0.89)
pt3dadd(-94.12, -76.21, -11.65, 0.89)
pt3dadd(-94.79, -76.57, -11.65, 0.89)
pt3dadd(-95.75, -76.87, -11.65, 0.89)
pt3dadd(-96.34, -77.16, -11.65, 0.89)
pt3dadd(-97, -77.24, -11.65, 0.89)
pt3dadd(-97.67, -77.39, -11.65, 0.89)
pt3dadd(-98.33, -77.53, -11.65, 0.89)
pt3dadd(-98.85, -77.9, -11.7, 0.89)
pt3dadd(-99.52, -78.27, -11.65, 0.89)
pt3dadd(-99.66, -79.3, -11.65, 0.89)
pt3dadd(-100.03, -80.04, -11.65, 0.89)
pt3dadd(-99.74, -81, -11.9, 0.89)
pt3dadd(-99.81, -81.44, -11.9, 0.89)
pt3dadd(-100.25, -82.4, -11.95, 0.89)
pt3dadd(-101.07, -82.99, -11.95, 0.89)
pt3dadd(-101.44, -83.58, -12, 0.89)
pt3dadd(-102.1, -84.24, -12, 0.89)
pt3dadd(-103.06, -84.54, -12, 0.89)
pt3dadd(-103.73, -85.35, -12, 0.89)
pt3dadd(-104.47, -85.65, -12, 0.89)
pt3dadd(-105.13, -86.16, -12, 0.89)
pt3dadd(-105.87, -86.68, -12, 0.89)
pt3dadd(-106.54, -87.12, -12, 0.89)
pt3dadd(-107.5, -87.34, -12, 0.89)
pt3dadd(-108.16, -87.71, -12, 0.81)
pt3dadd(-108.68, -88.37, -12.05, 0.81)
pt3dadd(-109.35, -89.19, -12.6, 0.81)
pt3dadd(-109.79, -89.92, -12.65, 0.81)
pt3dadd(-110.23, -90.66, -12.65, 0.81)
pt3dadd(-110.9, -91.1, -12.65, 0.81)
pt3dadd(-111.56, -91.69, -14, 0.81)
pt3dadd(-112.01, -92.21, -14, 0.81)
pt3dadd(-112.6, -92.43, -14, 0.81)
pt3dadd(-113.19, -92.95, -14, 0.81)
pt3dadd(-113.84, -93.36, -14.05, 0.67)
pt3dadd(-114.51, -93.81, -14.05, 0.67)
pt3dadd(-114.95, -94.4, -14.05, 0.67)
pt3dadd(-115.54, -94.84, -14.05, 0.67)
pt3dadd(-116.21, -94.91, -14.05, 0.67)
pt3dadd(-116.87, -94.84, -14.05, 0.67)
pt3dadd(-117.54, -95.06, -14.05, 0.67)
pt3dadd(-118.2, -95.58, -14.05, 0.67)
pt3dadd(-118.5, -96.17, -14.05, 0.67)
pt3dadd(-118.43, -97.12, -14.7, 0.67)
pt3dadd(-118.5, -97.86, -14.7, 0.89)
pt3dadd(-118.57, -98.67, -14.7, 0.89)
pt3dadd(-118.87, -99.34, -14.7, 0.89)
pt3dadd(-119.46, -100.44, -14.7, 0.89)
pt3dadd(-120.05, -101.25, -14.9, 0.89)
pt3dadd(-120.86, -102.21, -15.05, 0.89)
pt3dadd(-121.31, -102.73, -15.05, 0.89)
pt3dadd(-121.75, -103.39, -15.1, 0.89)
pt3dadd(-122.05, -104.42, -15.1, 0.89)
pt3dadd(-122.34, -105.01, -15.1, 0.89)
pt3dadd(-122.79, -105.97, -15.1, 1.03)
pt3dadd(-123.08, -106.71, -15.15, 1.03)
pt3dadd(-123.01, -107.67, -15.15, 0.89)
pt3dadd(-123.08, -108.33, -15.15, 0.89)
pt3dadd(-122.86, -109, -15.15, 0.74)
pt3dadd(-122.49, -109.66, -15.15, 0.74)
pt3dadd(-122.12, -110.25, -15.15, 0.74)
}
dend[19] {pt3dclear()
pt3dadd(-27.74, -33.85, -6.15, 0.74)
pt3dadd(-28.62, -34.26, -9.15, 0.74)
pt3dadd(-29.43, -34.7, -9.15, 0.74)
pt3dadd(-30.25, -35.14, -9.15, 0.89)
pt3dadd(-30.76, -35.36, -9.15, 0.89)
pt3dadd(-31.43, -35.95, -9.15, 0.89)
pt3dadd(-31.5, -36.77, -9.15, 0.89)
pt3dadd(-30.99, -37.65, -9.15, 0.89)
pt3dadd(-30.62, -38.39, -9.15, 0.89)
pt3dadd(-30.1, -39.13, -9.15, 0.89)
pt3dadd(-29.95, -39.86, -10.05, 0.89)
pt3dadd(-29.8, -40.75, -10.1, 0.89)
pt3dadd(-30.17, -41.41, -10.15, 0.89)
pt3dadd(-30.62, -41.71, -10.15, 0.89)
pt3dadd(-31.36, -42, -10.15, 0.89)
pt3dadd(-32.1, -42.3, -10.3, 0.89)
pt3dadd(-32.61, -42.15, -10.45, 0.89)
pt3dadd(-33.35, -41.93, -10.7, 0.89)
pt3dadd(-34.02, -41.63, -10.75, 0.89)
pt3dadd(-34.68, -41.12, -10.95, 0.89)
pt3dadd(-35.27, -40.75, -11.05, 0.89)
pt3dadd(-35.94, -40.67, -11.2, 0.89)
pt3dadd(-36.68, -40.67, -11.4, 0.89)
pt3dadd(-37.34, -40.38, -11.8, 0.89)
pt3dadd(-38.23, -40.75, -11.8, 0.89)
pt3dadd(-39.12, -40.6, -10, 0.89)
pt3dadd(-39.56, -41.26, -10.1, 0.89)
pt3dadd(-39.49, -42.22, -15.4, 0.89)
pt3dadd(-39.56, -43.11, -15.35, 0.89)
pt3dadd(-40.37, -43.18, -15.35, 0.89)
}
}
proc shape3d_8() {
dend[19] { pt3dadd(-40.89, -42.96, -15.35, 0.89)
pt3dadd(-41.41, -42.3, -15.35, 0.89)
pt3dadd(-41.93, -41.93, -15.3, 0.89)
pt3dadd(-42.59, -41.71, -15.3, 0.89)
pt3dadd(-42.96, -42, -15.3, 0.89)
pt3dadd(-43.18, -42.66, -15.35, 0.89)
pt3dadd(-43.03, -43.4, -15.3, 0.89)
pt3dadd(-43.11, -44.29, -15.2, 0.89)
pt3dadd(-42.52, -44.8, -15.15, 0.89)
pt3dadd(-42.37, -44.95, -15.9, 0.89)
pt3dadd(-41.85, -45.47, -16, 0.89)
pt3dadd(-41.48, -46.06, -16.1, 0.89)
pt3dadd(-41.04, -47.09, -16.65, 1.03)
pt3dadd(-41.11, -47.9, -16.65, 1.03)
pt3dadd(-41.19, -49.08, -16.7, 1.03)
pt3dadd(-41.41, -49.74, -16.7, 1.03)
pt3dadd(-41.78, -50.56, -16.75, 1.03)
pt3dadd(-42.52, -51.07, -16.75, 1.03)
pt3dadd(-42.89, -51.59, -16.9, 1.03)
pt3dadd(-43.7, -52.25, -17.6, 1.03)
pt3dadd(-43.99, -52.92, -17.6, 1.03)
pt3dadd(-44.07, -53.8, -17.6, 1.03)
pt3dadd(-43.62, -54.76, -17.8, 1.03)
pt3dadd(-42.89, -55.72, -18.95, 1.03)
pt3dadd(-42.44, -56.01, -18.95, 1.03)
pt3dadd(-41.93, -56.31, -19, 1.03)
pt3dadd(-41.56, -56.9, -19, 1.03)
pt3dadd(-40.82, -57.93, -19.3, 1.03)
pt3dadd(-40.89, -58.96, -19.4, 1.03)
pt3dadd(-41.56, -59.41, -19.45, 1.03)
pt3dadd(-42.52, -59.55, -20.75, 1.03)
pt3dadd(-43.18, -60.07, -20.8, 1.03)
pt3dadd(-43.85, -60.73, -20.9, 1.03)
pt3dadd(-44.51, -61.1, -20.95, 1.03)
pt3dadd(-45.18, -61.84, -22, 1.03)
pt3dadd(-45.69, -62.36, -22, 1.03)
pt3dadd(-46.29, -63.24, -22, 1.03)
pt3dadd(-46.66, -63.9, -22, 1.03)
pt3dadd(-46.66, -65.16, -22, 1.03)
pt3dadd(-46.75, -65.91, -23.05, 1.03)
pt3dadd(-46.53, -66.86, -23.1, 1.03)
pt3dadd(-46.38, -67.9, -23.1, 1.03)
pt3dadd(-46.09, -68.71, -23.1, 1.03)
pt3dadd(-45.94, -69.89, -23.3, 1.03)
pt3dadd(-45.86, -71.07, -24.05, 1.03)
pt3dadd(-46.6, -71.73, -24.1, 1.03)
pt3dadd(-47.49, -72.17, -24.1, 1.03)
pt3dadd(-48.08, -72.91, -24.15, 1.03)
pt3dadd(-48.67, -73.43, -24.4, 1.03)
pt3dadd(-48.75, -74.24, -24.6, 1.03)
pt3dadd(-48.23, -74.9, -25.5, 1.03)
pt3dadd(-47.86, -75.71, -25.55, 1.03)
pt3dadd(-47.64, -76.67, -25.9, 1.03)
pt3dadd(-47.56, -77.56, -25.95, 1.03)
pt3dadd(-48.08, -78.37, -26.05, 1.03)
pt3dadd(-48.53, -79.03, -26.5, 1.03)
pt3dadd(-49.04, -79.77, -26.7, 1.03)
pt3dadd(-49.63, -80.58, -27.05, 1.03)
pt3dadd(-50.08, -81.17, -27.3, 1.03)
pt3dadd(-50.52, -81.76, -27.75, 0.89)
pt3dadd(-51.04, -82.57, -27.75, 0.89)
pt3dadd(-51.78, -83.68, -27.8, 0.89)
pt3dadd(-52.37, -83.38, -27.8, 0.89)
pt3dadd(-52.66, -82.94, -27.8, 0.89)
pt3dadd(-52.52, -82.2, -28.5, 0.89)
pt3dadd(-52, -81.91, -29.95, 0.89)
pt3dadd(-51.26, -81.39, -29.8, 0.89)
pt3dadd(-51.26, -80.29, -29.7, 0.89)
pt3dadd(-51.41, -79.55, -29.65, 0.89)
pt3dadd(-52.37, -79.62, -29.65, 0.89)
pt3dadd(-52.3, -80.21, -29.6, 0.89)
pt3dadd(-52.22, -80.8, -29.75, 0.89)
pt3dadd(-52.3, -81.69, -29.8, 0.89)
pt3dadd(-52.66, -81.91, -30.05, 0.89)
pt3dadd(-53.33, -82.2, -32.15, 0.89)
pt3dadd(-53.99, -82.35, -32.3, 0.89)
pt3dadd(-54.51, -82.72, -33.15, 0.74)
pt3dadd(-54.73, -83.16, -33.2, 0.74)
pt3dadd(-54.73, -84.12, -33.2, 0.74)
pt3dadd(-55.25, -84.56, -33.2, 0.74)
pt3dadd(-55.92, -84.42, -33.2, 0.74)
pt3dadd(-56.29, -83.83, -33.5, 0.74)
pt3dadd(-56.58, -83.46, -33.8, 0.74)
pt3dadd(-57.03, -83.16, -34.15, 0.74)
pt3dadd(-57.54, -83.01, -34.5, 0.74)
pt3dadd(-58.13, -82.87, -34.65, 0.74)
pt3dadd(-58.65, -83.24, -34.75, 0.74)
pt3dadd(-59.09, -84.05, -35.3, 0.74)
pt3dadd(-59.91, -84.64, -35.35, 0.74)
pt3dadd(-60.5, -84.64, -35.5, 0.74)
pt3dadd(-61.02, -84.42, -35.85, 0.74)
pt3dadd(-61.39, -84.12, -36.4, 0.74)
pt3dadd(-61.9, -83.68, -36.45, 0.74)
pt3dadd(-62.2, -83.68, -37.15, 0.74)
pt3dadd(-62.86, -83.31, -37.15, 0.74)
pt3dadd(-63.38, -83.31, -37.2, 0.74)
pt3dadd(-63.97, -83.31, -37.5, 0.74)
pt3dadd(-64.34, -83.16, -38, 0.74)
pt3dadd(-64.79, -82.72, -38.45, 0.74)
pt3dadd(-64.93, -82.13, -38.55, 0.59)
pt3dadd(-65.45, -81.54, -38.4, 0.59)
pt3dadd(-65.97, -81.24, -38.3, 0.59)
pt3dadd(-66.41, -80.95, -38.25, 0.59)
pt3dadd(-66.93, -80.95, -38.2, 0.59)
pt3dadd(-67.52, -80.58, -38.25, 0.59)
pt3dadd(-67.96, -80.43, -38.3, 0.59)
pt3dadd(-68.41, -80.43, -38.35, 0.59)
pt3dadd(-69.22, -80.58, -38.35, 0.59)
pt3dadd(-69.96, -80.43, -38.25, 0.59)
pt3dadd(-70.99, -79.92, -40, 0.59)
pt3dadd(-71.95, -79.55, -41.8, 0.59)
pt3dadd(-72.18, -79.03, -42, 0.44)
pt3dadd(-73.14, -78.44, -42.05, 0.44)
pt3dadd(-72.62, -78.15, -42.05, 0.44)
pt3dadd(-72.69, -77.26, -42.1, 0.44)
pt3dadd(-73.21, -76.45, -42.1, 0.44)
pt3dadd(-72.47, -75.71, -43.45, 0.44)
pt3dadd(-72.18, -75.57, -43.6, 0.44)
pt3dadd(-71.59, -74.9, -44.25, 0.44)
}
dend[20] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(-4.15, -26.51, 9.65, 2.07)
pt3dadd(-4.37, -27.77, 9.5, 2.07)
pt3dadd(-4.81, -29.09, 9.45, 2.07)
pt3dadd(-4.74, -30.57, 9.4, 2.51)
pt3dadd(-4.53, -31.97, 9.35, 2.51)
pt3dadd(-4.24, -33, 9.35, 2.51)
}
dend[21] {pt3dclear()
pt3dadd(-4.24, -33, 9.35, 2.37)
pt3dadd(-4.39, -34.85, 11.45, 2.37)
pt3dadd(-4.39, -36.17, 11.8, 2)
pt3dadd(-4.46, -37.35, 11.1, 1.85)
pt3dadd(-4.61, -38.53, 11.05, 1.85)
pt3dadd(-4.39, -39.42, 10.6, 1.85)
pt3dadd(-4.31, -40.23, 10.5, 1.85)
pt3dadd(-3.8, -41.26, 10.3, 1.85)
pt3dadd(-3.8, -42.22, 10.2, 1.85)
pt3dadd(-4.24, -43.33, 9.35, 1.85)
pt3dadd(-4.46, -44.06, 9.25, 1.85)
pt3dadd(-4.53, -44.87, 9.2, 1.85)
pt3dadd(-4.46, -45.91, 8.6, 1.85)
pt3dadd(-4.53, -47.01, 8.55, 1.85)
pt3dadd(-4.83, -48.12, 8.3, 1.85)
pt3dadd(-4.68, -49.08, 8.2, 1.85)
pt3dadd(-4.46, -50.26, 8.1, 1.85)
pt3dadd(-4.39, -51.44, 8, 1.55)
pt3dadd(-4.61, -52.77, 8, 1.55)
pt3dadd(-4.76, -53.87, 7.95, 1.55)
pt3dadd(-4.9, -55.05, 7.95, 1.55)
pt3dadd(-5.35, -56.23, 7.9, 1.55)
pt3dadd(-5.79, -57.63, 7.7, 1.55)
pt3dadd(-5.86, -58.96, 7.7, 1.55)
pt3dadd(-5.72, -60.14, 6.6, 1.92)
pt3dadd(-5.72, -61.1, 6.6, 1.92)
pt3dadd(-5.79, -61.91, 6.6, 1.92)
pt3dadd(-6.03, -63.13, 6.2, 1.92)
pt3dadd(-6.17, -64.24, 6.15, 1.92)
pt3dadd(-6.1, -65.42, 6.15, 1.92)
pt3dadd(-5.88, -66.3, 6.1, 1.92)
pt3dadd(-5.66, -67.63, 6.1, 1.92)
pt3dadd(-5.66, -68.52, 6.1, 1.92)
pt3dadd(-5.66, -69.55, 6.1, 1.92)
pt3dadd(-5.58, -70.87, 6.1, 1.92)
pt3dadd(-5.95, -71.76, 6.1, 1.92)
pt3dadd(-6.25, -72.87, 6.1, 1.92)
pt3dadd(-6.47, -74.05, 6.1, 1.92)
pt3dadd(-6.76, -74.78, 6.1, 1.92)
pt3dadd(-7.13, -75.82, 6.1, 1.92)
}
dend[22] {pt3dclear()
pt3dadd(-7.13, -75.82, 6.1, 1.63)
pt3dadd(-8.02, -76.77, 5.7, 1.63)
pt3dadd(-8.24, -78.1, 5.7, 1.63)
pt3dadd(-8.61, -79.13, 5.65, 1.63)
pt3dadd(-9.13, -80.24, 5.65, 1.63)
pt3dadd(-9.2, -81.35, 5.6, 1.63)
pt3dadd(-9.43, -82.75, 5.1, 1.63)
pt3dadd(-9.57, -83.93, 5.1, 1.63)
pt3dadd(-9.87, -84.44, 5.1, 1.63)
pt3dadd(-10.56, -85.18, 5.1, 1.63)
}
dend[23] {pt3dclear()
pt3dadd(-10.56, -85.18, 5.1, 1.63)
pt3dadd(-10.68, -85.85, 5.1, 1.63)
pt3dadd(-11.13, -86.88, 4.45, 0.96)
pt3dadd(-11.86, -87.84, 4.4, 0.96)
pt3dadd(-12.31, -88.72, 4.4, 0.96)
pt3dadd(-12.83, -89.24, 4.4, 0.96)
pt3dadd(-13.27, -90.2, 4.4, 0.96)
pt3dadd(-13.12, -91.3, 4.4, 0.96)
pt3dadd(-13.27, -92.41, 4.4, 0.96)
pt3dadd(-13.27, -93.44, 4.4, 0.96)
pt3dadd(-13.48, -94.27, 3.45, 0.96)
pt3dadd(-13.77, -95.23, 3.4, 0.96)
pt3dadd(-14.29, -95.82, 3.4, 0.96)
pt3dadd(-14.66, -96.41, 3.4, 0.96)
pt3dadd(-14.81, -97.3, 3.4, 0.96)
pt3dadd(-15.18, -98.04, 3.4, 0.96)
pt3dadd(-15.7, -98.85, 3.4, 0.96)
pt3dadd(-15.92, -99.44, 3.4, 0.96)
pt3dadd(-16.06, -100.03, 3.25, 0.96)
pt3dadd(-16.58, -100.47, 3.2, 0.96)
pt3dadd(-17.1, -101.35, 3.2, 0.96)
pt3dadd(-17.47, -102.16, 3.2, 0.96)
pt3dadd(-17.84, -102.75, 3.2, 0.96)
pt3dadd(-18.28, -103.71, 3.2, 0.96)
}
}
proc shape3d_9() {
dend[23] { pt3dadd(-18.28, -104.23, 3.15, 0.96)
pt3dadd(-18.8, -105.19, 3.15, 0.96)
pt3dadd(-19.24, -106.29, 2.6, 0.96)
pt3dadd(-19.83, -107.25, 2.55, 0.96)
pt3dadd(-19.91, -108.36, 2.4, 0.96)
pt3dadd(-20.28, -109.32, 2.4, 0.96)
pt3dadd(-20.87, -110.2, 2.35, 0.96)
pt3dadd(-21.09, -111.09, 2.35, 0.96)
pt3dadd(-21.09, -111.9, 1.45, 0.96)
pt3dadd(-21.61, -113.01, 1.45, 0.96)
pt3dadd(-22.2, -114.11, 1.45, 0.96)
pt3dadd(-22.57, -115.14, 1.45, 0.96)
pt3dadd(-23.09, -116.1, 1.3, 0.96)
pt3dadd(-23.38, -116.91, 1.3, 0.96)
pt3dadd(-23.75, -117.73, 1.3, 0.96)
pt3dadd(-24.05, -118.61, 1.2, 0.96)
pt3dadd(-24.34, -119.42, 1.2, 0.96)
pt3dadd(-24.86, -120.23, 1.15, 0.96)
pt3dadd(-25.3, -120.97, 1, 0.96)
pt3dadd(-25.45, -121.93, 1, 0.96)
pt3dadd(-25.75, -123.04, 1, 0.96)
pt3dadd(-26.26, -124.07, 1, 0.96)
pt3dadd(-26.6, -124.88, 1.1, 0.96)
pt3dadd(-26.75, -125.92, 1.2, 0.96)
pt3dadd(-26.82, -126.88, 1.25, 0.96)
pt3dadd(-27.04, -127.76, 1.3, 0.96)
pt3dadd(-27.19, -128.42, 1.3, 0.96)
pt3dadd(-27.71, -128.94, 1.3, 0.96)
pt3dadd(-28, -129.53, 1.3, 0.96)
pt3dadd(-28.3, -130.42, 1.3, 0.96)
pt3dadd(-28.23, -131.52, 1.3, 0.96)
pt3dadd(-28.82, -132.55, 1.3, 0.96)
pt3dadd(-29.48, -133.36, 1.3, 0.96)
pt3dadd(-29.41, -134.69, 1.3, 1.18)
pt3dadd(-29.85, -135.5, 1.3, 1.18)
pt3dadd(-29.93, -136.61, 1.3, 1.18)
pt3dadd(-30.07, -137.64, 1.3, 1.18)
pt3dadd(-30.37, -138.38, 1.2, 0.96)
pt3dadd(-30.74, -139.34, 1.2, 0.96)
pt3dadd(-31.11, -140.44, 1.2, 0.96)
pt3dadd(-31.63, -141.55, 1.2, 0.96)
pt3dadd(-31.92, -142.73, 1.2, 0.96)
pt3dadd(-32.36, -143.47, 1.2, 0.96)
pt3dadd(-32.66, -144.5, 1.2, 0.96)
pt3dadd(-32.73, -145.61, 1.15, 0.96)
pt3dadd(-33.18, -146.49, 1.2, 0.96)
pt3dadd(-33.55, -147.38, 1.2, 0.96)
pt3dadd(-33.92, -148.34, 1.15, 0.96)
pt3dadd(-34.66, -148.85, 1.05, 1.11)
pt3dadd(-34.95, -149.66, 1.05, 1.11)
pt3dadd(-34.58, -150.99, 1.05, 1.11)
pt3dadd(-34.88, -152.1, 1.05, 1.11)
pt3dadd(-35.25, -153.28, 1.05, 1.11)
pt3dadd(-35.76, -154.24, 1.05, 1.11)
pt3dadd(-35.91, -155.64, 1.05, 1.11)
pt3dadd(-36.3, -156.62, 0.95, 1.11)
pt3dadd(-36.37, -157.43, 0.95, 1.11)
pt3dadd(-36.37, -158.17, 0.95, 1.11)
pt3dadd(-36.67, -159.2, 1.45, 1.11)
pt3dadd(-36.67, -160.09, 1.55, 1.11)
pt3dadd(-36.89, -161.12, 1.65, 0.89)
pt3dadd(-36.89, -162.3, 1.7, 0.89)
pt3dadd(-37.04, -163.48, 1.75, 0.89)
pt3dadd(-37.19, -164.59, 1.8, 0.89)
pt3dadd(-37.26, -165.4, 1.8, 0.89)
pt3dadd(-36.96, -166.72, 1.9, 0.89)
pt3dadd(-37.26, -167.61, 1.95, 0.89)
pt3dadd(-37.26, -168.64, 2, 0.89)
pt3dadd(-37.19, -170.04, 2.05, 0.89)
pt3dadd(-37.04, -171.15, 2.05, 0.89)
pt3dadd(-36.6, -172.26, 2.1, 0.89)
pt3dadd(-36.82, -173.21, 2.15, 0.89)
pt3dadd(-36.74, -174.25, 2.15, 0.89)
pt3dadd(-37.33, -175.21, 2.75, 0.59)
pt3dadd(-37.26, -176.39, 2.75, 0.59)
pt3dadd(-37.85, -177.2, 2.8, 0.59)
pt3dadd(-38.22, -178.38, 2.9, 0.74)
pt3dadd(-38.66, -179.04, 3.15, 0.74)
pt3dadd(-39.11, -180, 3.25, 0.74)
pt3dadd(-39.18, -181.33, 3.35, 0.74)
pt3dadd(-38.89, -182.65, 3.35, 0.74)
pt3dadd(-39.33, -183.61, 3.4, 0.74)
pt3dadd(-39.7, -184.13, 3.4, 0.74)
pt3dadd(-40.22, -185.24, 3.5, 0.74)
pt3dadd(-40.59, -185.9, 3.55, 0.74)
pt3dadd(-41.03, -186.42, 3.55, 0.74)
pt3dadd(-41.28, -187.01, 3.75, 0.74)
pt3dadd(-40.99, -188.19, 3.8, 0.74)
pt3dadd(-40.76, -189.37, 3.8, 0.74)
pt3dadd(-40.76, -190.77, 3.85, 0.74)
pt3dadd(-41.36, -191.58, 3.85, 0.74)
pt3dadd(-41.95, -192.24, 3.85, 0.74)
pt3dadd(-42.32, -192.83, 3.85, 0.74)
pt3dadd(-43.2, -193.35, 3.95, 0.74)
pt3dadd(-43.87, -193.13, 3.95, 0.74)
pt3dadd(-44.53, -192.98, 4, 0.74)
pt3dadd(-45.35, -192.83, 4, 0.74)
pt3dadd(-46.01, -193.35, 4, 0.74)
pt3dadd(-46.6, -194.23, 4.1, 0.74)
pt3dadd(-47.27, -194.08, 4.15, 0.74)
pt3dadd(-47.86, -194.23, 4.15, 0.74)
pt3dadd(-48.53, -194.53, 4.2, 0.74)
}
dend[24] {pt3dclear()
pt3dadd(-10.56, -85.18, 5.1, 0.81)
pt3dadd(-11.29, -86.07, 6.75, 0.81)
pt3dadd(-11.66, -87.1, 6.8, 0.81)
pt3dadd(-12.26, -87.76, 6.8, 0.81)
pt3dadd(-12.4, -88.57, 6.8, 0.81)
pt3dadd(-12.26, -89.75, 6.85, 0.81)
pt3dadd(-12.26, -90.49, 7.3, 0.89)
pt3dadd(-12.18, -91.52, 7.35, 0.89)
pt3dadd(-12.11, -92.41, 7.4, 0.89)
pt3dadd(-12.33, -93.15, 7.45, 0.89)
pt3dadd(-12.55, -93.88, 7.5, 0.89)
pt3dadd(-12.85, -94.55, 7.5, 0.89)
pt3dadd(-12.92, -95.36, 7.55, 0.89)
pt3dadd(-13.36, -96.24, 7.55, 0.89)
pt3dadd(-12.99, -97.35, 7.6, 0.89)
pt3dadd(-13.29, -97.86, 7.6, 0.89)
pt3dadd(-13.59, -98.75, 7.6, 0.89)
pt3dadd(-14.1, -99.27, 7.6, 0.89)
pt3dadd(-14.62, -100.08, 6.9, 0.89)
pt3dadd(-15.21, -100.81, 6.7, 0.89)
pt3dadd(-15.29, -101.26, 6.55, 0.89)
pt3dadd(-15.58, -102.22, 6.45, 0.89)
pt3dadd(-16.1, -103.32, 6.35, 0.89)
pt3dadd(-16.39, -103.99, 6.3, 0.89)
pt3dadd(-16.91, -104.58, 6.3, 0.89)
pt3dadd(-17.06, -105.76, 7.55, 0.89)
pt3dadd(-17.5, -106.35, 7.65, 0.89)
pt3dadd(-18.02, -107.67, 7.75, 0.89)
pt3dadd(-18.39, -108.26, 7.75, 0.89)
pt3dadd(-18.61, -109.15, 7.8, 0.89)
pt3dadd(-19.2, -109.96, 7.8, 0.89)
pt3dadd(-18.98, -110.84, 7.8, 0.89)
pt3dadd(-18.91, -112.02, 9.55, 0.89)
pt3dadd(-18.83, -113.06, 9.55, 0.89)
pt3dadd(-18.98, -113.87, 9.55, 0.89)
pt3dadd(-19.42, -114.38, 9.55, 0.89)
pt3dadd(-19.87, -114.97, 9.55, 0.89)
pt3dadd(-20.39, -115.64, 9.55, 0.89)
pt3dadd(-20.76, -116.52, 9.6, 0.89)
pt3dadd(-21.12, -117.33, 9.8, 0.89)
pt3dadd(-21.42, -118.44, 9.85, 0.89)
pt3dadd(-21.42, -119.25, 9.9, 0.89)
pt3dadd(-21.79, -120.14, 9.9, 0.89)
pt3dadd(-22.88, -120.53, 10.05, 0.89)
pt3dadd(-23.55, -121.2, 10.1, 0.89)
pt3dadd(-24.29, -121.56, 9, 0.67)
pt3dadd(-25.03, -122.08, 8.9, 0.67)
pt3dadd(-25.76, -122.74, 8.75, 0.67)
pt3dadd(-26.65, -122.89, 8.75, 0.67)
pt3dadd(-27.17, -122.6, 8.45, 0.67)
pt3dadd(-27.76, -122.08, 9.65, 0.67)
pt3dadd(-28.2, -121.27, 9.9, 0.67)
pt3dadd(-28.43, -120.68, 9.95, 0.67)
pt3dadd(-28.65, -120.16, 10.05, 0.67)
pt3dadd(-28.87, -119.28, 10.1, 0.67)
pt3dadd(-28.65, -118.76, 10.2, 0.67)
pt3dadd(-28.65, -118.17, 10.35, 0.67)
pt3dadd(-29.02, -117.58, 10.45, 0.67)
pt3dadd(-29.24, -117.21, 10.5, 0.67)
pt3dadd(-29.61, -116.99, 10.6, 0.67)
pt3dadd(-29.83, -116.48, 10.85, 0.67)
pt3dadd(-30.72, -115.89, 10.95, 0.67)
pt3dadd(-31.16, -115.52, 11.05, 0.67)
pt3dadd(-32.05, -115.3, 11.1, 0.67)
pt3dadd(-32.86, -115.3, 11.25, 0.67)
pt3dadd(-33.53, -115.3, 11.35, 0.67)
pt3dadd(-34.41, -115.74, 11.8, 0.67)
pt3dadd(-35.52, -116.03, 11.85, 0.67)
pt3dadd(-36.26, -116.4, 11.85, 0.67)
pt3dadd(-36.63, -117.14, 11.65, 0.67)
pt3dadd(-37.81, -117.21, 11.55, 0.67)
pt3dadd(-38.48, -117.43, 11.5, 0.67)
pt3dadd(-39.29, -117.51, 10.8, 0.52)
pt3dadd(-40.55, -117.66, 10.8, 0.52)
pt3dadd(-41.73, -117.95, 10.75, 0.52)
pt3dadd(-42.54, -118.39, 10.75, 0.52)
pt3dadd(-43.13, -119.06, 10.7, 0.52)
}
dend[25] {pt3dclear()
pt3dadd(-7.13, -75.82, 6.1, 1.11)
pt3dadd(-6.52, -76.51, 6, 1.11)
pt3dadd(-6.37, -77.46, 6, 1.11)
pt3dadd(-6.59, -78.13, 6, 1.11)
pt3dadd(-6.89, -79.16, 6, 1.11)
pt3dadd(-7.03, -80.05, 6, 1.11)
pt3dadd(-7.03, -81, 6, 1.11)
pt3dadd(-6.66, -81.96, 6, 1.11)
pt3dadd(-6.74, -82.77, 6.05, 1.11)
pt3dadd(-6.37, -83.81, 6.05, 1.11)
pt3dadd(-6.74, -84.69, 6, 1.11)
pt3dadd(-6.89, -85.35, 6.05, 1.11)
pt3dadd(-7.18, -86.39, 6.05, 1.11)
pt3dadd(-7.48, -87.2, 6.05, 1.11)
pt3dadd(-7.92, -87.64, 6.05, 1.11)
pt3dadd(-8, -88.3, 6.05, 1.11)
pt3dadd(-8.36, -88.75, 6.05, 1.11)
pt3dadd(-8.81, -89.63, 6.05, 1.11)
pt3dadd(-8.96, -90.66, 6.05, 1.11)
pt3dadd(-9.18, -91.33, 6.05, 1.11)
pt3dadd(-8.88, -92.29, 6.05, 1.11)
}
}
proc shape3d_10() {
dend[25] { pt3dadd(-9.03, -93.39, 6.15, 1.11)
pt3dadd(-9.33, -94.35, 6.2, 1.11)
pt3dadd(-9.84, -95.46, 6.25, 1.11)
pt3dadd(-9.92, -96.64, 6.1, 1.11)
pt3dadd(-10.43, -97.67, 5.95, 1.11)
pt3dadd(-10.51, -98.85, 5.7, 1.11)
pt3dadd(-10.8, -99.81, 5.9, 1.11)
pt3dadd(-11.1, -100.55, 6.4, 1.11)
pt3dadd(-11.54, -101.21, 6.85, 1.11)
pt3dadd(-11.91, -101.87, 7.35, 1.11)
pt3dadd(-12.13, -102.83, 7.1, 1.11)
pt3dadd(-12.5, -103.87, 6.7, 1.11)
pt3dadd(-12.73, -104.68, 6.65, 1.11)
pt3dadd(-12.95, -105.49, 6.65, 1.11)
pt3dadd(-12.73, -106, 6.65, 1.11)
pt3dadd(-12.87, -106.82, 6.6, 1.11)
pt3dadd(-13.39, -107.42, 6.4, 1.11)
pt3dadd(-13.69, -108.15, 6.4, 1.11)
pt3dadd(-13.83, -109.41, 6.35, 1.11)
pt3dadd(-13.98, -110, 6.35, 1.11)
pt3dadd(-14.06, -110.96, 6.3, 1.11)
pt3dadd(-13.98, -111.47, 6.3, 1.11)
pt3dadd(-13.91, -112.43, 6.3, 1.11)
pt3dadd(-13.83, -113.39, 6.1, 1.11)
pt3dadd(-13.76, -114.42, 6, 1.11)
pt3dadd(-13.83, -114.86, 5.9, 1.11)
pt3dadd(-13.54, -115.97, 5.9, 1.11)
pt3dadd(-13.39, -116.63, 5.7, 1.11)
}
dend[26] {pt3dclear()
pt3dadd(-13.39, -116.63, 5.7, 0.96)
pt3dadd(-13.76, -117.74, 5.55, 0.96)
pt3dadd(-13.83, -118.62, 5.5, 0.96)
pt3dadd(-13.91, -119.73, 5.5, 0.96)
pt3dadd(-13.98, -120.62, 5.45, 0.96)
pt3dadd(-13.69, -121.72, 5.45, 0.96)
pt3dadd(-13.61, -123.05, 5.45, 0.96)
pt3dadd(-13.54, -123.71, 5.45, 0.96)
pt3dadd(-13.24, -124.75, 6.2, 0.96)
pt3dadd(-13.46, -125.48, 6.4, 0.96)
pt3dadd(-13.54, -126.66, 6.5, 0.96)
pt3dadd(-13.61, -127.77, 6.55, 0.96)
pt3dadd(-13.83, -128.51, 6.6, 0.96)
pt3dadd(-13.98, -129.69, 6.65, 0.96)
pt3dadd(-14.13, -130.72, 6.7, 0.96)
pt3dadd(-13.98, -131.38, 6.7, 0.81)
pt3dadd(-13.98, -132.56, 7.15, 0.81)
pt3dadd(-13.61, -133.89, 7.15, 0.81)
pt3dadd(-14.13, -134.41, 6.9, 0.81)
pt3dadd(-14.2, -135.51, 6.75, 0.81)
pt3dadd(-14.72, -136.47, 6.75, 0.81)
pt3dadd(-14.87, -137.43, 6.7, 0.81)
pt3dadd(-15.24, -138.61, 6.7, 0.81)
pt3dadd(-15.6, -139.53, 6.6, 0.81)
pt3dadd(-15.82, -140.34, 6.55, 0.81)
pt3dadd(-16.26, -141.15, 6.5, 0.81)
pt3dadd(-16.78, -141.89, 6.45, 0.81)
pt3dadd(-17.15, -142.56, 8.3, 0.81)
pt3dadd(-17.3, -143.51, 8.2, 0.81)
pt3dadd(-17.81, -144.33, 8.1, 0.81)
pt3dadd(-18.4, -145.06, 8.1, 0.81)
pt3dadd(-18.85, -145.8, 8.1, 0.81)
pt3dadd(-19.07, -146.76, 8, 0.81)
pt3dadd(-19.14, -148.16, 7.95, 0.81)
pt3dadd(-18.85, -148.9, 7.75, 0.81)
pt3dadd(-18.11, -149.56, 7.7, 0.81)
pt3dadd(-19.14, -150.08, 7.65, 0.81)
pt3dadd(-19.73, -150.37, 7.65, 0.81)
pt3dadd(-20.1, -151.26, 8.55, 0.81)
pt3dadd(-19.81, -152.29, 8.7, 0.81)
pt3dadd(-19.59, -153.03, 8.8, 0.81)
pt3dadd(-19.96, -153.76, 8.85, 0.81)
pt3dadd(-20.18, -154.87, 8.9, 0.81)
pt3dadd(-20.47, -155.53, 8.95, 0.81)
pt3dadd(-20.62, -156.42, 8.95, 0.81)
pt3dadd(-20.99, -157.23, 8.95, 0.81)
pt3dadd(-20.99, -158.34, 8.95, 0.67)
pt3dadd(-20.99, -159.52, 9, 0.67)
pt3dadd(-20.7, -160.4, 9, 0.67)
pt3dadd(-20.47, -161.14, 9, 0.67)
pt3dadd(-19.88, -161.95, 9.2, 0.81)
pt3dadd(-19.88, -163.2, 9.25, 0.81)
pt3dadd(-19.96, -164.16, 9.25, 0.81)
pt3dadd(-19.96, -165.49, 9.3, 0.81)
pt3dadd(-20.55, -166.6, 9.35, 0.81)
pt3dadd(-20.33, -167.56, 9.35, 0.81)
pt3dadd(-19.88, -168.37, 9.4, 0.81)
pt3dadd(-19.66, -169.18, 9.4, 0.81)
pt3dadd(-19.29, -170.43, 9.4, 0.81)
pt3dadd(-19.5, -171.27, 9.95, 0.67)
pt3dadd(-19.64, -172.16, 9.95, 0.67)
pt3dadd(-19.5, -173.41, 9.95, 0.67)
pt3dadd(-19.57, -174.37, 9.95, 0.67)
pt3dadd(-19.86, -175.11, 10, 0.67)
pt3dadd(-20.01, -176.22, 10, 0.67)
pt3dadd(-20.53, -177.32, 10, 0.67)
pt3dadd(-20.75, -178.21, 10, 0.67)
pt3dadd(-20.9, -179.24, 10.05, 0.67)
pt3dadd(-20.53, -180.05, 10.05, 0.67)
pt3dadd(-19.86, -180.71, 10.2, 0.67)
pt3dadd(-19.64, -181.6, 10.25, 0.67)
pt3dadd(-20.31, -182.41, 10.3, 0.67)
pt3dadd(-20.68, -183.15, 10.5, 0.67)
pt3dadd(-20.09, -184.25, 10.55, 0.67)
pt3dadd(-19.79, -184.99, 10.6, 0.67)
pt3dadd(-19.86, -185.95, 10.65, 0.67)
pt3dadd(-19.79, -187.06, 10.7, 0.67)
pt3dadd(-19.5, -187.65, 11.05, 0.67)
pt3dadd(-18.53, -188.09, 11.1, 0.67)
pt3dadd(-18.53, -189.12, 11.15, 0.67)
pt3dadd(-18.61, -189.93, 9, 0.67)
pt3dadd(-18.76, -191.11, 8.85, 0.67)
pt3dadd(-18.02, -191.92, 8.6, 0.67)
pt3dadd(-17.65, -192.88, 8.55, 0.67)
pt3dadd(-17.87, -193.4, 7.55, 0.52)
pt3dadd(-18.46, -194.28, 7.45, 0.52)
pt3dadd(-18.83, -195.09, 7.35, 0.52)
pt3dadd(-19.35, -196.05, 6.95, 0.52)
pt3dadd(-20.09, -196.05, 6.85, 0.52)
pt3dadd(-20.83, -196.13, 6.8, 0.52)
}
dend[27] {pt3dclear()
pt3dadd(-13.39, -116.63, 5.7, 1.18)
pt3dadd(-12.76, -117.06, 6.55, 1.18)
pt3dadd(-12.24, -118.02, 6.6, 1.18)
pt3dadd(-11.57, -119.05, 6.5, 1.18)
pt3dadd(-10.98, -120.01, 6.45, 1.18)
pt3dadd(-10.91, -120.97, 7.65, 1.03)
pt3dadd(-10.69, -122, 7.7, 1.03)
pt3dadd(-10.76, -122.88, 7.75, 1.03)
pt3dadd(-11.13, -123.69, 7.8, 1.03)
pt3dadd(-11.28, -124.73, 7.8, 1.03)
pt3dadd(-11.06, -125.76, 7.85, 1.03)
pt3dadd(-10.47, -126.72, 7.85, 1.03)
pt3dadd(-10.32, -127.68, 7.85, 1.03)
pt3dadd(-9.8, -128.86, 7.85, 1.03)
pt3dadd(-9.28, -130.04, 8.1, 0.96)
pt3dadd(-8.54, -130.41, 8.15, 0.96)
pt3dadd(-8.17, -131, 8.2, 0.96)
pt3dadd(-7.88, -131.66, 8.2, 0.96)
pt3dadd(-7.66, -132.25, 8.2, 0.96)
pt3dadd(-7.51, -133.43, 8.2, 0.96)
pt3dadd(-7.21, -134.46, 8.2, 0.96)
pt3dadd(-7.29, -135.42, 8.2, 0.96)
pt3dadd(-7.51, -136.45, 8.35, 0.96)
pt3dadd(-7.58, -137.34, 8.45, 0.96)
pt3dadd(-7.36, -138.15, 8.5, 0.96)
pt3dadd(-7.36, -139.18, 8.5, 0.96)
pt3dadd(-7.36, -140.07, 8.55, 0.96)
pt3dadd(-7.88, -140.88, 9.65, 0.81)
pt3dadd(-8.47, -141.54, 9.65, 0.81)
pt3dadd(-8.4, -142.72, 9.7, 0.81)
pt3dadd(-8.69, -143.9, 9.7, 0.81)
pt3dadd(-8.84, -144.93, 9.7, 0.81)
pt3dadd(-8.69, -145.97, 9.75, 0.81)
pt3dadd(-8.1, -146.78, 9.75, 0.81)
pt3dadd(-8.03, -147.88, 9.75, 0.81)
pt3dadd(-7.85, -148.91, 10, 0.81)
pt3dadd(-7.04, -150.01, 10.05, 0.81)
pt3dadd(-6.6, -151.04, 10.05, 0.81)
pt3dadd(-6.37, -151.71, 10.05, 0.81)
pt3dadd(-5.86, -152.67, 10.05, 0.81)
pt3dadd(-5.56, -153.99, 10.05, 0.81)
pt3dadd(-5.12, -155.17, 10.1, 1.03)
pt3dadd(-5.19, -156.13, 10.1, 1.03)
pt3dadd(-4.97, -157.16, 10.1, 1.03)
pt3dadd(-5.34, -158.42, 10.1, 0.81)
pt3dadd(-5.49, -159.23, 10.1, 0.81)
pt3dadd(-4.67, -160.26, 10.1, 0.81)
pt3dadd(-4.45, -161.07, 10, 0.81)
pt3dadd(-4.67, -162.33, 9.95, 0.81)
pt3dadd(-4.67, -163.36, 9.95, 0.81)
pt3dadd(-4.38, -164.69, 9.95, 0.81)
pt3dadd(-4.38, -165.72, 9.95, 0.81)
pt3dadd(-4.08, -166.9, 9.95, 0.81)
pt3dadd(-3.71, -167.78, 10.1, 0.81)
pt3dadd(-3.42, -168.52, 10.15, 0.81)
pt3dadd(-3.34, -169.63, 10.2, 0.81)
pt3dadd(-3.64, -170.73, 10.25, 0.81)
pt3dadd(-2.75, -172.06, 10.25, 0.81)
pt3dadd(-2.23, -173.39, 10.3, 0.81)
pt3dadd(-1.72, -173.91, 10.3, 0.81)
pt3dadd(-1.35, -175.16, 10.3, 0.81)
pt3dadd(-1.64, -175.82, 10.3, 0.81)
pt3dadd(-1.64, -176.78, 11.2, 0.81)
pt3dadd(-1.42, -177.3, 11.25, 0.81)
pt3dadd(-0.76, -177.74, 11.3, 0.81)
pt3dadd(-0.02, -178.48, 11.3, 0.81)
pt3dadd(0.65, -179.14, 11.3, 0.81)
pt3dadd(0.55, -180.34, 11.8, 0.67)
pt3dadd(0.33, -181.15, 11.85, 0.67)
pt3dadd(-0.04, -181.82, 12.55, 0.67)
pt3dadd(-0.26, -182.56, 12.65, 0.67)
pt3dadd(-0.19, -183.29, 12.7, 0.67)
pt3dadd(-0.71, -183.59, 12.75, 0.67)
pt3dadd(-0.71, -184.47, 12.8, 0.67)
pt3dadd(-1.08, -185.14, 12.95, 0.67)
pt3dadd(-1.67, -185.14, 13.1, 0.67)
}
dend[28] {pt3dclear()
pt3dadd(-4.24, -33, 9.35, 1.03)
pt3dadd(-5.06, -33.36, 10.6, 1.03)
pt3dadd(-6.03, -33.43, 10.7, 1.03)
pt3dadd(-7.13, -33.36, 10.85, 1.4)
pt3dadd(-7.95, -33.14, 10.9, 1.4)
pt3dadd(-8.61, -33.28, 10.95, 1.4)
}
}
proc shape3d_11() {
dend[28] { pt3dadd(-9.65, -33.06, 11, 1.4)
pt3dadd(-10.16, -33.43, 11, 1.4)
pt3dadd(-10.39, -34.39, 8.15, 1.4)
pt3dadd(-10.39, -35.42, 8.05, 1.4)
pt3dadd(-10.31, -36.09, 8, 1.4)
pt3dadd(-10.68, -36.75, 8, 1.4)
pt3dadd(-11.35, -37.64, 7.95, 1.4)
pt3dadd(-11.94, -38.45, 7.95, 1.4)
}
dend[29] {pt3dclear()
pt3dadd(-11.94, -38.45, 7.95, 1.26)
pt3dadd(-13.12, -38.15, 7.35, 1.26)
pt3dadd(-13.93, -37.78, 8.4, 1.26)
pt3dadd(-14.82, -37.34, 9.05, 1.26)
pt3dadd(-15.49, -36.97, 9.9, 1.26)
pt3dadd(-16.45, -36.6, 10.05, 1.26)
pt3dadd(-17.11, -36.23, 10.2, 1.26)
pt3dadd(-16.82, -35.35, 10.85, 1.26)
pt3dadd(-16.96, -34.61, 11, 1.03)
pt3dadd(-17.26, -34.1, 11, 1.03)
pt3dadd(-17.41, -33.65, 11, 1.03)
pt3dadd(-17.04, -32.84, 11, 0.89)
pt3dadd(-16.45, -32.55, 11.05, 0.89)
pt3dadd(-15.71, -32.1, 11.05, 0.89)
pt3dadd(-15.34, -31.81, 11.05, 0.89)
pt3dadd(-14.82, -31.29, 11.95, 0.89)
pt3dadd(-14.82, -30.33, 12, 0.89)
pt3dadd(-15.12, -29.52, 12.05, 0.89)
pt3dadd(-15.12, -28.49, 12.2, 0.89)
pt3dadd(-14.82, -28.05, 12.25, 0.89)
pt3dadd(-14.23, -27.83, 12.25, 0.89)
pt3dadd(-13.56, -27.9, 12.4, 0.89)
pt3dadd(-12.75, -27.75, 12.45, 0.89)
pt3dadd(-11.79, -27.31, 13.2, 0.89)
pt3dadd(-11.35, -26.79, 13.2, 0.89)
pt3dadd(-11.79, -26.13, 13.25, 0.89)
pt3dadd(-12.01, -25.61, 13.4, 0.89)
pt3dadd(-12.16, -25.02, 12.2, 0.89)
pt3dadd(-12.38, -24.36, 12.35, 0.89)
pt3dadd(-12.53, -23.55, 12.75, 0.89)
pt3dadd(-12.68, -23.11, 13.9, 0.89)
pt3dadd(-13.71, -23.11, 13.95, 0.89)
pt3dadd(-13.49, -22.3, 15.2, 0.3)
pt3dadd(-12.68, -22.07, 15.2, 0.3)
pt3dadd(-12.38, -21.56, 15.2, 0.3)
pt3dadd(-12.09, -20.67, 15.2, 0.3)
pt3dadd(-12.23, -19.94, 15.2, 0.3)
pt3dadd(-12.75, -19.57, 15.2, 0.3)
pt3dadd(-12.83, -18.83, 15.2, 0.3)
pt3dadd(-12.46, -17.94, 15.2, 0.3)
}
dend[30] {pt3dclear()
pt3dadd(-11.94, -38.45, 7.95, 1.26)
pt3dadd(-12.16, -39.26, 5.95, 1.26)
pt3dadd(-12.23, -40.29, 5.9, 1.26)
pt3dadd(-12.68, -41.17, 6.25, 1.26)
pt3dadd(-13.19, -41.91, 6.45, 1.26)
pt3dadd(-13.42, -42.72, 7.45, 1.26)
pt3dadd(-13.71, -43.9, 7.55, 1.26)
pt3dadd(-14.23, -44.57, 8.55, 0.96)
pt3dadd(-14.67, -45.45, 8.6, 0.96)
pt3dadd(-15.26, -46.26, 8.6, 0.96)
pt3dadd(-16, -46.19, 8.65, 0.96)
pt3dadd(-16.82, -45.89, 8.65, 0.96)
pt3dadd(-17.41, -45.67, 8.9, 0.96)
pt3dadd(-18.15, -45.53, 8.95, 0.96)
pt3dadd(-19.18, -45.53, 9, 0.96)
pt3dadd(-19.99, -45.67, 9, 0.96)
pt3dadd(-20.66, -46.26, 9, 0.96)
pt3dadd(-20.81, -47.22, 9.7, 0.96)
pt3dadd(-21.03, -47.96, 9.75, 1.33)
pt3dadd(-20.96, -49.29, 9.75, 1.33)
pt3dadd(-21.55, -50.02, 9.75, 1.33)
pt3dadd(-21.99, -51.13, 9.75, 1.33)
pt3dadd(-22.14, -52.38, 10.1, 1.33)
pt3dadd(-22.36, -53.64, 10.1, 1.33)
pt3dadd(-22.14, -54.74, 10.1, 1.33)
pt3dadd(-22.06, -55.85, 10.15, 1.33)
pt3dadd(-21.92, -56.66, 11.25, 1.11)
pt3dadd(-21.62, -57.55, 11.25, 1.11)
pt3dadd(-21.69, -58.65, 11.25, 1.11)
pt3dadd(-21.92, -59.39, 12.4, 0.89)
pt3dadd(-23.25, -59.46, 12.4, 0.89)
pt3dadd(-24.21, -60.13, 12.8, 0.89)
pt3dadd(-24.72, -60.72, 12.8, 0.89)
pt3dadd(-25.09, -61.9, 12.8, 0.89)
pt3dadd(-25.24, -62.71, 12.85, 0.89)
pt3dadd(-25.17, -63.89, 12.85, 0.89)
pt3dadd(-25.32, -64.56, 13.3, 0.89)
pt3dadd(-26.13, -65.44, 13.35, 0.89)
pt3dadd(-26.65, -66.18, 13.4, 0.81)
pt3dadd(-27.39, -66.84, 13.4, 0.81)
pt3dadd(-28.28, -67.51, 13.9, 0.81)
pt3dadd(-29.09, -68.02, 14, 0.81)
pt3dadd(-29.53, -68.69, 14, 0.81)
pt3dadd(-29.39, -69.87, 14, 0.81)
pt3dadd(-29.39, -70.83, 14, 0.81)
pt3dadd(-28.8, -71.78, 14, 0.81)
pt3dadd(-28.13, -72.74, 14, 0.81)
pt3dadd(-28.2, -72.96, 14.45, 0.81)
pt3dadd(-27.98, -74, 14.3, 0.81)
pt3dadd(-28.87, -74.73, 14.2, 0.81)
pt3dadd(-29.53, -74.59, 14.15, 0.81)
pt3dadd(-30.2, -74.66, 14.1, 0.81)
pt3dadd(-31.16, -74.66, 13.95, 0.81)
pt3dadd(-31.75, -75.1, 13.85, 0.81)
pt3dadd(-32.49, -75.77, 13.75, 0.81)
pt3dadd(-32.71, -76.8, 13.7, 1.18)
pt3dadd(-33.08, -77.68, 13.65, 1.18)
pt3dadd(-33.3, -78.94, 13.65, 1.18)
pt3dadd(-33.82, -79.53, 13.65, 1.18)
pt3dadd(-34.49, -80.19, 13.6, 1.18)
pt3dadd(-35.15, -81, 13.6, 1.18)
pt3dadd(-35.74, -81.81, 13.6, 1.18)
pt3dadd(-36.19, -82.4, 14.1, 0.96)
pt3dadd(-36.48, -83.44, 14.25, 0.67)
pt3dadd(-37.07, -84.25, 14.25, 0.67)
pt3dadd(-37.81, -84.99, 14.25, 0.67)
pt3dadd(-38.55, -85.5, 14.25, 0.67)
pt3dadd(-39.36, -86.09, 14.25, 0.67)
pt3dadd(-39.73, -86.83, 14.35, 0.67)
pt3dadd(-39.88, -87.57, 14.3, 0.67)
pt3dadd(-40.47, -88.01, 14.15, 0.67)
pt3dadd(-40.32, -88.97, 14.2, 0.67)
pt3dadd(-40.55, -90.3, 14.3, 0.67)
pt3dadd(-40.77, -91.4, 14.35, 0.67)
pt3dadd(-40.92, -92.58, 14.4, 0.67)
pt3dadd(-41.43, -93.39, 14.45, 0.67)
pt3dadd(-42.25, -93.84, 14.45, 0.67)
pt3dadd(-42.99, -93.69, 15, 0.81)
pt3dadd(-43.87, -93.54, 15.05, 0.81)
pt3dadd(-44.54, -93.1, 15.05, 0.81)
pt3dadd(-44.76, -92.07, 15.1, 0.81)
pt3dadd(-45.13, -91.11, 15.1, 0.81)
pt3dadd(-45.5, -90.37, 15.1, 0.81)
pt3dadd(-45.5, -89.78, 15.1, 0.81)
}
dend[31] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(11.19, -22.71, 2.75, 6.21)
pt3dadd(12.44, -23.08, 2.75, 6.06)
pt3dadd(12.96, -23.38, 2.75, 5.69)
}
dend[32] {pt3dclear()
pt3dadd(12.96, -23.38, 2.75, 3.4)
pt3dadd(15.1, -22.93, 3.05, 3.4)
pt3dadd(16.58, -23.01, 3.15, 3.4)
pt3dadd(17.99, -22.93, 3.2, 3.33)
pt3dadd(19.09, -22.93, 3.2, 3.33)
pt3dadd(20.72, -22.71, 3.25, 3.33)
pt3dadd(21.68, -22.71, 3.25, 3.33)
pt3dadd(22.49, -22.93, 3.25, 3.33)
pt3dadd(24.27, -23.75, 5, 3.33)
pt3dadd(26.12, -23.82, 4.75, 3.33)
}
dend[33] {pt3dclear()
pt3dadd(26.12, -23.82, 4.75, 2.22)
pt3dadd(26.26, -22.64, 1, 2.22)
pt3dadd(26.56, -21.75, 0.95, 2.07)
pt3dadd(27.52, -21.24, 0.95, 2.07)
pt3dadd(28.56, -20.35, 0.6, 2.07)
pt3dadd(29.44, -19.76, 1.9, 2.07)
pt3dadd(29.96, -18.88, 2.2, 2.07)
pt3dadd(30.62, -18.14, 2.4, 2.07)
pt3dadd(30.77, -16.96, 3.2, 2.07)
pt3dadd(31.59, -15.78, 3.3, 2.07)
pt3dadd(32.99, -14.31, 4.3, 2.07)
pt3dadd(33.88, -13.35, 4.35, 2.07)
}
dend[34] {pt3dclear()
pt3dadd(33.88, -13.35, 4.35, 1.55)
pt3dadd(34.39, -12.54, 2.6, 1.55)
pt3dadd(34.62, -11.5, 2.45, 1.55)
pt3dadd(35.13, -10.32, 2.3, 1.77)
pt3dadd(36.02, -9.51, 2.25, 1.77)
pt3dadd(36.69, -8.7, 1.15, 1.77)
pt3dadd(37.72, -7.96, 1.1, 1.77)
pt3dadd(38.31, -7.37, 1.15, 1.77)
pt3dadd(38.68, -6.49, 1.2, 1.77)
}
dend[35] {pt3dclear()
pt3dadd(38.68, -6.49, 1.2, 1.77)
pt3dadd(39.2, -5.31, 1.55, 1.77)
pt3dadd(39.57, -4.42, 1.5, 1.7)
pt3dadd(39.57, -3.47, 1.5, 1.7)
pt3dadd(39.57, -2.36, 1.45, 1.48)
pt3dadd(39.42, -1.47, 1.45, 1.48)
pt3dadd(39.49, -0.81, 1.5, 1.48)
pt3dadd(39.64, -0.07, 1.55, 1.48)
pt3dadd(40.16, 0.66, 1.9, 1.48)
pt3dadd(40.38, 1.18, 2.05, 1.48)
pt3dadd(40.82, 1.84, 2.2, 1.48)
pt3dadd(41.42, 2.21, 2.5, 1.48)
pt3dadd(41.78, 2.73, 2.7, 1.48)
pt3dadd(42.08, 3.17, 2.8, 1.48)
pt3dadd(42.97, 3.61, 3, 1.48)
pt3dadd(43.71, 3.98, 3.3, 1.48)
pt3dadd(44, 4.79, 3.55, 1.48)
pt3dadd(44.67, 5.53, 2.5, 1.48)
pt3dadd(45.41, 6.12, 2.35, 1.48)
pt3dadd(45.92, 6.64, 2.2, 1.48)
pt3dadd(46.07, 7.23, 2.1, 1.48)
pt3dadd(46.66, 7.52, 2.05, 1.48)
pt3dadd(47.11, 8.04, 2, 1.48)
pt3dadd(47.64, 8.72, 0.85, 1.48)
pt3dadd(48.24, 9.39, 0.85, 1.48)
pt3dadd(48.9, 10.2, 1, 1.48)
pt3dadd(49.64, 10.86, -0.9, 1.48)
}
dend[36] {pt3dclear()
pt3dadd(49.64, 10.86, -0.9, 0.89)
pt3dadd(49.93, 12.12, -0.15, 0.89)
pt3dadd(50.16, 13, -0.1, 0.89)
pt3dadd(49.93, 13.52, -0.1, 0.89)
pt3dadd(49.86, 14.03, -0.1, 0.89)
pt3dadd(49.49, 14.55, -0.1, 0.89)
}
}
proc shape3d_12() {
dend[36] { pt3dadd(49.49, 15.07, -0.1, 0.89)
pt3dadd(49.86, 15.88, -0.1, 0.89)
pt3dadd(50.45, 16.47, -0.1, 0.89)
pt3dadd(50.45, 17.13, -0.1, 0.89)
pt3dadd(50.82, 17.72, -0.1, 0.89)
pt3dadd(51.49, 18.61, 0, 0.89)
pt3dadd(52.08, 19.34, 0.1, 1.03)
pt3dadd(52.52, 20.08, 0.1, 1.03)
pt3dadd(52.6, 20.52, 0.1, 1.03)
pt3dadd(52.67, 21.33, 0.1, 1.03)
pt3dadd(52.89, 21.92, 0.1, 1.03)
pt3dadd(53.11, 22.51, 0.1, 1.03)
pt3dadd(53.56, 23.33, 0.1, 1.03)
pt3dadd(53.63, 24.06, 0.1, 1.03)
pt3dadd(53.85, 24.65, -1, 1.03)
pt3dadd(54.22, 25.24, -1, 1.03)
pt3dadd(54.89, 25.83, -1.05, 1.03)
pt3dadd(55.4, 26.42, -1.1, 1.03)
pt3dadd(56, 27.23, -1.1, 1.03)
pt3dadd(56.44, 27.97, -1.1, 1.03)
pt3dadd(56.66, 28.56, -1.15, 1.03)
pt3dadd(56.96, 29.15, -1.15, 1.03)
pt3dadd(57.4, 29.82, -1.15, 1.03)
pt3dadd(57.77, 30.63, -1.15, 0.96)
pt3dadd(57.99, 31.44, -1.15, 0.96)
pt3dadd(58.21, 32.03, -1.2, 0.96)
pt3dadd(58.51, 32.77, -1.2, 0.96)
pt3dadd(58.66, 33.28, -1.2, 0.96)
pt3dadd(59.1, 33.87, -1.2, 0.96)
pt3dadd(59.17, 34.9, -1.2, 0.96)
pt3dadd(59.25, 35.57, -1.2, 0.96)
pt3dadd(59.47, 36.38, -1.2, 0.96)
pt3dadd(59.84, 37.12, -1.2, 0.67)
pt3dadd(60.21, 37.56, -1.2, 0.67)
pt3dadd(60.8, 38, -1.2, 0.67)
pt3dadd(61.39, 38.67, -1.2, 0.67)
pt3dadd(62.06, 39.48, -1.25, 0.67)
pt3dadd(62.08, 40.05, -1.05, 0.67)
pt3dadd(62.37, 40.5, -1.15, 0.67)
pt3dadd(62.82, 41.01, -1.2, 0.67)
pt3dadd(63.78, 41.53, -1.2, 0.67)
pt3dadd(64.3, 42.27, -1.25, 0.67)
pt3dadd(65.03, 43.15, -1.25, 0.67)
pt3dadd(65.92, 43.59, -1.35, 0.67)
pt3dadd(66.37, 44.48, -1.4, 0.67)
pt3dadd(66.88, 45.07, -1.45, 0.67)
pt3dadd(67.18, 45.81, -1.45, 0.67)
pt3dadd(67.62, 46.69, -1.45, 0.74)
pt3dadd(67.62, 47.13, -1.45, 0.74)
pt3dadd(67.92, 47.8, -1.45, 0.74)
pt3dadd(68.29, 48.39, -1.5, 0.74)
pt3dadd(68.88, 48.83, -1.5, 0.74)
pt3dadd(69.1, 49.79, -1.75, 0.59)
pt3dadd(68.88, 50.67, -1.75, 0.59)
pt3dadd(68.29, 51.49, -1.8, 0.59)
pt3dadd(68.43, 52.3, -2.3, 0.59)
pt3dadd(68.29, 53.26, -2.35, 0.59)
pt3dadd(68.07, 54.14, -2.35, 0.59)
pt3dadd(68.43, 55.03, -2.35, 0.59)
pt3dadd(68.14, 55.76, -2.35, 0.59)
pt3dadd(68.29, 56.35, -2.35, 0.59)
}
dend[37] {pt3dclear()
pt3dadd(49.64, 10.86, -0.9, 1.03)
pt3dadd(50.77, 11.81, -2.15, 1.03)
pt3dadd(51.21, 12.55, -2.15, 1.03)
pt3dadd(51.73, 12.92, -2.15, 1.03)
pt3dadd(52.62, 13.36, -2.15, 1.03)
pt3dadd(52.77, 14.1, -2.2, 1.03)
pt3dadd(53.43, 15.05, -2.15, 1.03)
}
dend[38] {pt3dclear()
pt3dadd(53.43, 15.05, -2.15, 1.03)
pt3dadd(54.61, 15.57, -2.2, 1.03)
pt3dadd(55.13, 16.23, -2.2, 1.03)
pt3dadd(55.43, 16.82, -2.2, 1.03)
pt3dadd(55.87, 17.71, -2.55, 1.03)
pt3dadd(55.87, 18.59, -2.75, 0.74)
pt3dadd(55.43, 19.33, -2.75, 0.74)
pt3dadd(55.21, 19.7, -2.75, 0.74)
pt3dadd(54.98, 20, -2.75, 0.74)
pt3dadd(54.39, 20.44, -2.75, 0.74)
pt3dadd(54.24, 21.03, -2.8, 0.74)
pt3dadd(54.24, 22.06, -2.85, 0.74)
pt3dadd(54.76, 22.58, -2.85, 0.74)
pt3dadd(55.35, 23.31, -3.4, 0.74)
pt3dadd(55.35, 24.13, -3.4, 0.74)
pt3dadd(55.5, 24.57, -3.4, 0.74)
pt3dadd(56.61, 25.08, -3.4, 0.89)
pt3dadd(57.64, 25.45, -3.4, 0.89)
pt3dadd(58.24, 25.6, -3.45, 0.89)
pt3dadd(59.05, 25.6, -3.6, 0.89)
pt3dadd(59.94, 25.9, -3.65, 0.89)
pt3dadd(60.97, 26.19, -3.65, 0.89)
pt3dadd(61.86, 26.78, -3.65, 0.89)
pt3dadd(62.15, 27.44, -3.65, 0.89)
pt3dadd(62.82, 27.89, -3.65, 0.89)
pt3dadd(63.63, 28.77, -3.65, 0.89)
pt3dadd(64.15, 29.66, -3.7, 0.89)
pt3dadd(64.52, 30.25, -3.75, 0.89)
pt3dadd(65.11, 31.28, -3.75, 0.89)
pt3dadd(65.18, 31.94, -3.75, 0.89)
pt3dadd(64.81, 32.83, -3.75, 0.89)
pt3dadd(64.44, 33.27, -3.75, 0.89)
pt3dadd(64.22, 33.86, -3.75, 0.89)
pt3dadd(63.41, 34.6, -3.8, 0.89)
pt3dadd(63.26, 35.56, -3.8, 0.89)
pt3dadd(63.78, 36.44, -3.8, 0.89)
pt3dadd(64.52, 36.96, -3.8, 0.89)
pt3dadd(64.89, 37.99, -4.4, 0.89)
pt3dadd(65.33, 38.28, -4.45, 0.89)
pt3dadd(66.14, 39.02, -4.5, 0.89)
pt3dadd(66.51, 39.98, -4.55, 0.89)
pt3dadd(67.55, 40.57, -5.35, 0.74)
pt3dadd(68.73, 40.72, -5.35, 0.74)
pt3dadd(69.69, 41.16, -5.4, 0.74)
pt3dadd(70.36, 41.68, -5.55, 0.74)
pt3dadd(71.24, 42.12, -5.65, 0.74)
pt3dadd(71.69, 42.64, -6, 0.74)
pt3dadd(72.5, 43.45, -7.1, 0.74)
pt3dadd(72.5, 44.11, -7.1, 0.74)
pt3dadd(72.13, 44.92, -7.1, 0.74)
pt3dadd(71.98, 45.95, -7.25, 0.74)
pt3dadd(71.91, 46.84, -7.35, 0.89)
pt3dadd(71.76, 47.65, -7.8, 0.89)
pt3dadd(71.76, 48.68, -8.05, 0.89)
pt3dadd(71.91, 49.42, -8.15, 0.89)
pt3dadd(72.43, 50.08, -8.15, 0.89)
pt3dadd(73.02, 50.97, -8.15, 0.89)
pt3dadd(74.05, 51.49, -8.15, 0.89)
pt3dadd(74.79, 52.22, -8.15, 0.89)
pt3dadd(75.9, 52.67, -8.15, 0.89)
pt3dadd(76.79, 53.4, -8.15, 0.89)
pt3dadd(77.45, 54.21, -8.15, 0.89)
pt3dadd(77.82, 55.1, -8.15, 0.89)
pt3dadd(78.04, 56.21, -8.15, 0.89)
pt3dadd(78.49, 57.09, -8.15, 0.89)
pt3dadd(78.93, 57.39, -8.35, 0.89)
pt3dadd(79.37, 57.68, -8.7, 0.89)
pt3dadd(80.11, 58.34, -8.85, 0.89)
pt3dadd(81.07, 58.86, -8.95, 0.89)
pt3dadd(81.74, 59.6, -9, 0.89)
pt3dadd(82.4, 60.34, -9, 0.89)
pt3dadd(82.85, 61.15, -9, 0.89)
pt3dadd(83.51, 62.03, -9, 0.89)
pt3dadd(84.03, 63.14, -9.15, 0.89)
pt3dadd(84.62, 64.17, -9.15, 0.89)
pt3dadd(84.99, 65.06, -9.15, 0.89)
pt3dadd(85.66, 66.01, -9.15, 0.89)
pt3dadd(86.32, 66.9, -9.2, 0.89)
pt3dadd(87.28, 67.42, -9.2, 0.89)
pt3dadd(87.87, 68.23, -9.2, 0.89)
pt3dadd(88.39, 68.89, -9.2, 0.89)
pt3dadd(88.91, 69.7, -9.2, 0.89)
pt3dadd(89.2, 70.44, -9.2, 0.89)
pt3dadd(89.28, 71.4, -9.2, 0.89)
pt3dadd(89.55, 71.98, -9.45, 0.89)
pt3dadd(89.55, 72.71, -9.5, 0.89)
pt3dadd(89.7, 73.23, -9.55, 0.89)
pt3dadd(90.14, 73.97, -9.75, 0.89)
pt3dadd(90.51, 74.56, -9.8, 0.89)
pt3dadd(91.03, 74.85, -9.85, 0.89)
pt3dadd(91.69, 75, -9.85, 0.89)
pt3dadd(92.36, 75.22, -9.9, 0.74)
pt3dadd(92.87, 75.59, -9.9, 0.74)
pt3dadd(93.17, 76.18, -9.9, 0.74)
pt3dadd(93.69, 77.06, -9.9, 0.74)
pt3dadd(94.43, 77.43, -9.9, 0.74)
pt3dadd(95.53, 77.65, -10.1, 0.74)
pt3dadd(95.98, 78.24, -10.15, 0.74)
pt3dadd(96.57, 78.24, -10.15, 0.74)
pt3dadd(97.9, 78.1, -10.5, 0.74)
pt3dadd(98.86, 78.61, -10.65, 0.89)
pt3dadd(99.9, 79.2, -10.7, 0.89)
pt3dadd(100.63, 79.57, -10.5, 0.89)
pt3dadd(101.37, 79.94, -10.4, 0.89)
pt3dadd(102.26, 80.31, -10.55, 0.89)
pt3dadd(103.07, 80.75, -11.4, 0.89)
pt3dadd(103.44, 81.93, -11.45, 0.89)
pt3dadd(103.89, 83.11, -11.45, 0.89)
pt3dadd(104.77, 83.63, -11.45, 0.89)
pt3dadd(105.59, 83.26, -11.45, 0.89)
}
dend[39] {pt3dclear()
pt3dadd(53.43, 15.05, -2.15, 0.74)
pt3dadd(52.8, 15.8, -2.05, 0.74)
pt3dadd(52.73, 16.61, -1.95, 0.74)
pt3dadd(52.21, 17.28, -2.05, 0.74)
pt3dadd(52.07, 17.72, -2.15, 0.74)
pt3dadd(51.92, 18.31, -2.2, 0.74)
pt3dadd(51.47, 18.97, -2.2, 0.74)
pt3dadd(51.03, 19.78, -2.25, 0.74)
pt3dadd(50.88, 20.37, -2.25, 0.74)
pt3dadd(50.59, 21.26, -2.25, 0.89)
pt3dadd(50.44, 22.37, -2.25, 0.89)
pt3dadd(50.66, 23.25, -2.3, 0.89)
pt3dadd(50.96, 24.06, -2.3, 0.89)
pt3dadd(51.47, 24.58, -2.3, 0.89)
pt3dadd(51.99, 25.68, -2.6, 0.89)
pt3dadd(52.44, 26.5, -2.65, 0.89)
pt3dadd(52.66, 27.31, -2.65, 0.89)
pt3dadd(52.8, 28.27, -2.7, 0.89)
pt3dadd(52.8, 28.93, -2.8, 0.89)
pt3dadd(53.03, 29.59, -2.85, 0.89)
pt3dadd(53.32, 30.4, -2.75, 0.89)
pt3dadd(53.69, 30.85, -2.5, 0.89)
}
}
proc shape3d_13() {
dend[39] { pt3dadd(53.4, 31.88, -2.15, 0.89)
pt3dadd(53.4, 32.47, -2.05, 0.89)
pt3dadd(53.47, 33.35, -2, 0.89)
pt3dadd(53.32, 34.17, -2, 0.89)
pt3dadd(53.47, 35.35, -1.95, 0.89)
pt3dadd(53.62, 36.08, -1.95, 0.89)
pt3dadd(53.17, 37.19, -1.9, 0.89)
pt3dadd(52.95, 38, -1.9, 0.89)
pt3dadd(53.32, 38.59, -1.8, 0.89)
pt3dadd(53.77, 39.25, -1.75, 0.89)
pt3dadd(54.06, 39.77, -1.7, 0.89)
pt3dadd(54.28, 40.51, -1.55, 0.89)
pt3dadd(54.8, 40.88, -1.65, 0.89)
pt3dadd(55.02, 41.39, -1.8, 0.89)
pt3dadd(55.24, 42.06, -1.95, 0.89)
pt3dadd(55.61, 42.94, -2.05, 0.89)
pt3dadd(55.76, 43.61, -2.1, 0.89)
pt3dadd(55.95, 44.23, -3.2, 0.89)
pt3dadd(56.62, 44.6, -3.2, 0.89)
pt3dadd(57.28, 45.12, -3.2, 0.89)
pt3dadd(57.65, 45.85, -3.2, 0.89)
pt3dadd(57.95, 46.37, -3.35, 0.89)
pt3dadd(58.17, 47.25, -3.4, 0.89)
pt3dadd(58.39, 47.99, -3.45, 0.89)
pt3dadd(58.24, 48.58, -3.45, 0.89)
pt3dadd(57.95, 49.25, -3.5, 0.89)
pt3dadd(57.8, 50.13, -3.6, 0.89)
pt3dadd(57.8, 50.65, -3.7, 0.89)
pt3dadd(57.95, 51.31, -3.8, 0.89)
pt3dadd(58.17, 52.2, -3.85, 0.89)
pt3dadd(58.61, 53.01, -3.9, 0.89)
pt3dadd(59.35, 53.6, -3.95, 0.89)
pt3dadd(59.87, 54.26, -4, 0.89)
pt3dadd(60.09, 55.51, -4.05, 0.89)
pt3dadd(60.39, 56.92, -4.1, 0.89)
pt3dadd(60.39, 57.65, -4.1, 0.89)
pt3dadd(60.53, 58.54, -4.1, 0.89)
pt3dadd(60.68, 59.42, -4.15, 0.89)
pt3dadd(60.76, 60.53, -4.2, 0.89)
pt3dadd(60.83, 61.34, -4.25, 0.89)
pt3dadd(60.83, 62.3, -4.3, 0.89)
pt3dadd(60.53, 63.26, -4.3, 0.89)
pt3dadd(60.98, 64.07, -4.3, 0.89)
pt3dadd(61.42, 64.81, -4.3, 0.89)
pt3dadd(62.31, 65.47, -4.35, 0.89)
pt3dadd(62.83, 65.84, -4.35, 0.89)
pt3dadd(63.27, 66.28, -4.35, 0.89)
pt3dadd(63.93, 67.09, -4.35, 0.89)
pt3dadd(64.38, 68.05, -4.85, 0.89)
pt3dadd(64.53, 68.79, -4.9, 0.89)
pt3dadd(64.82, 69.9, -4.95, 0.89)
pt3dadd(64.97, 71, -5, 0.89)
pt3dadd(64.9, 72.11, -5, 0.89)
pt3dadd(65.12, 72.85, -5, 0.89)
pt3dadd(65.34, 73.51, -5.35, 0.89)
pt3dadd(65.86, 74.54, -5.35, 0.89)
pt3dadd(66.08, 75.57, -5.35, 0.89)
pt3dadd(66.45, 76.53, -5.35, 0.89)
pt3dadd(66.89, 77.49, -5.35, 0.89)
pt3dadd(66.85, 78.1, -4.5, 0.89)
pt3dadd(67.3, 78.99, -4.6, 0.89)
pt3dadd(67.22, 79.94, -4.65, 0.89)
pt3dadd(67.37, 81.27, -4.65, 0.89)
pt3dadd(67.52, 82.01, -4.85, 0.89)
pt3dadd(67.15, 83.26, -5.3, 0.74)
pt3dadd(67.15, 83.93, -5.6, 0.74)
pt3dadd(67.07, 84.96, -5.9, 0.74)
pt3dadd(66.78, 85.92, -6.15, 0.74)
pt3dadd(66.7, 87.02, -6.4, 0.74)
pt3dadd(66.93, 88.2, -6.55, 0.74)
pt3dadd(67.37, 89.02, -6.55, 0.74)
}
dend[40] {pt3dclear()
pt3dadd(38.68, -6.49, 1.2, 0.89)
pt3dadd(39.59, -6.47, 0.05, 0.89)
pt3dadd(41, -6.39, 0.05, 0.89)
pt3dadd(42.03, -5.95, 0.05, 0.89)
pt3dadd(42.62, -5.51, 0.05, 0.89)
pt3dadd(43.07, -5.07, -0.1, 0.89)
pt3dadd(44.03, -4.4, -0.3, 0.89)
pt3dadd(44.91, -3.96, -0.5, 0.89)
pt3dadd(45.73, -3.52, -0.35, 0.89)
pt3dadd(46.61, -3.74, -1.05, 1.03)
pt3dadd(47.72, -3.66, -0.95, 1.03)
pt3dadd(48.46, -3.3, -0.85, 1.03)
pt3dadd(49.5, -3, -0.65, 1.03)
pt3dadd(50.16, -2.78, -0.55, 1.03)
pt3dadd(50.68, -2.56, -0.45, 1.03)
pt3dadd(51.49, -2.78, -0.3, 1.03)
pt3dadd(52.3, -3.3, -1.45, 1.03)
pt3dadd(52.67, -4.25, -1.6, 1.03)
pt3dadd(52.75, -5.21, -2, 1.03)
pt3dadd(52.67, -6.02, -2.1, 1.03)
pt3dadd(52.3, -6.98, -2.15, 1.03)
pt3dadd(52.38, -7.94, -2.15, 1.03)
pt3dadd(52.82, -8.53, -2.2, 1.03)
pt3dadd(53.56, -8.68, -2.2, 1.03)
pt3dadd(54.67, -8.31, -2.55, 1.03)
pt3dadd(55.41, -7.94, -2.9, 1.03)
pt3dadd(56, -7.06, -3, 1.03)
pt3dadd(56.74, -6.61, -3.4, 1.03)
pt3dadd(57.7, -6.25, -3.45, 1.03)
pt3dadd(58.73, -6.39, -3.5, 1.03)
pt3dadd(59.92, -7.13, -3.5, 1.03)
pt3dadd(60.29, -7.87, -3.5, 1.03)
pt3dadd(61.03, -8.83, -3.5, 1.03)
pt3dadd(61.91, -10.01, -3.95, 1.03)
pt3dadd(63.32, -10.3, -3.95, 1.03)
pt3dadd(63.83, -10.45, -7.1, 1.03)
pt3dadd(65.16, -11.11, -6.9, 1.03)
pt3dadd(65.68, -12, -6.8, 1.03)
pt3dadd(66.35, -13.92, -6.75, 1.03)
pt3dadd(67.38, -13.55, -6.7, 1.03)
pt3dadd(67.31, -12.37, -6.65, 1.03)
}
dend[41] {pt3dclear()
pt3dadd(67.31, -12.37, -6.65, 1.03)
pt3dadd(67.38, -11.7, -9.95, 1.03)
pt3dadd(67.09, -10.67, -10.05, 1.03)
pt3dadd(67.31, -10.01, -10.1, 1.03)
pt3dadd(68.27, -9.34, -10.15, 1.03)
pt3dadd(69.45, -9.27, -10.15, 1.03)
pt3dadd(70.71, -9.12, -10.15, 1.03)
pt3dadd(71.82, -8.46, -10.2, 1.03)
pt3dadd(73, -8.38, -10.25, 1.03)
pt3dadd(73.89, -8.02, -10.3, 0.89)
pt3dadd(74.62, -7.94, -10.3, 0.89)
pt3dadd(75.73, -8.31, -10.35, 0.89)
pt3dadd(76.69, -8.9, -10.4, 0.89)
pt3dadd(77.51, -9.56, -10.4, 0.89)
pt3dadd(78.1, -9.79, -10.4, 0.89)
pt3dadd(79.72, -10.01, -10.45, 0.89)
pt3dadd(80.54, -10.08, -10.45, 0.89)
pt3dadd(81.35, -9.34, -11.05, 0.74)
pt3dadd(82.16, -8.53, -11.05, 0.74)
pt3dadd(82.98, -7.79, -11.05, 0.74)
pt3dadd(83.49, -6.98, -11.05, 0.74)
pt3dadd(83.86, -6.1, -11.1, 0.89)
pt3dadd(84.53, -5.36, -11.1, 0.89)
pt3dadd(85.19, -4.92, -11.1, 0.89)
pt3dadd(85.71, -4.92, -11.1, 0.89)
pt3dadd(86.82, -4.77, -11.1, 0.89)
pt3dadd(87.41, -5.14, -11.1, 0.89)
pt3dadd(88.52, -4.99, -11.1, 0.89)
pt3dadd(89.19, -4.25, -11.1, 0.89)
pt3dadd(89.56, -3.96, -11.1, 0.89)
pt3dadd(90.59, -3.73, -11.1, 0.89)
pt3dadd(91.48, -3.81, -11.5, 0.89)
pt3dadd(92.37, -3.81, -10.75, 0.89)
pt3dadd(92.96, -3.44, -10.6, 0.89)
pt3dadd(93.99, -2.78, -10.45, 0.89)
pt3dadd(95.1, -2.63, -10.35, 0.89)
pt3dadd(96.06, -2.78, -10.3, 0.74)
pt3dadd(96.95, -3, -10.2, 0.74)
pt3dadd(97.46, -2.7, -10.1, 0.74)
pt3dadd(98.28, -2.92, -12.05, 0.74)
pt3dadd(99.09, -3.14, -11.4, 0.74)
pt3dadd(99.83, -3.07, -9.95, 0.74)
pt3dadd(100.94, -3.81, -9.6, 0.74)
pt3dadd(101.75, -4.1, -9.25, 0.74)
pt3dadd(102.2, -4.1, -9.15, 0.74)
pt3dadd(103.08, -4.84, -8.55, 0.74)
pt3dadd(103.75, -4.99, -8.5, 0.52)
pt3dadd(104.56, -5.73, -8.45, 0.52)
pt3dadd(105.52, -5.87, -8.3, 0.52)
pt3dadd(106.48, -5.95, -10.3, 0.67)
pt3dadd(107.07, -5.65, -10.35, 0.67)
pt3dadd(108.11, -5.95, -10.4, 0.67)
pt3dadd(108.85, -6.76, -10.45, 0.67)
pt3dadd(109.36, -7.72, -10.6, 0.67)
pt3dadd(109.59, -8.53, -10.65, 0.67)
pt3dadd(110.1, -9.19, -10.7, 0.67)
pt3dadd(109.88, -9.93, -10.7, 0.67)
pt3dadd(109.88, -10.37, -10.75, 0.67)
}
dend[42] {pt3dclear()
pt3dadd(67.31, -12.37, -6.65, 0.89)
pt3dadd(66.87, -12.36, -10.5, 0.89)
pt3dadd(66.5, -11.48, -10.55, 0.89)
pt3dadd(66.42, -10.3, -10.65, 1.03)
pt3dadd(67.01, -9.56, -10.75, 1.03)
pt3dadd(67.16, -8.75, -11.1, 1.03)
pt3dadd(67.31, -7.72, -11.15, 1.03)
pt3dadd(68.12, -7.64, -11.2, 1.03)
pt3dadd(69.23, -8.23, -11.2, 1.03)
pt3dadd(70.04, -9.19, -11.5, 1.03)
pt3dadd(70.41, -10.15, -12.1, 1.03)
pt3dadd(71.15, -11.18, -12.45, 1.03)
pt3dadd(71.82, -12.07, -12.6, 1.03)
pt3dadd(72.48, -13.03, -12.8, 1.03)
pt3dadd(72.56, -14.28, -12.8, 1.03)
pt3dadd(73.15, -15.02, -12.8, 1.03)
pt3dadd(74.33, -15.02, -12.8, 1.03)
pt3dadd(75, -14.65, -13.55, 0.89)
pt3dadd(76.18, -15.24, -13.55, 0.89)
pt3dadd(76.4, -14.28, -14, 0.81)
pt3dadd(76.92, -13.32, -14, 0.81)
pt3dadd(77.58, -12.73, -14.2, 0.81)
pt3dadd(78.62, -12.29, -14.75, 0.96)
pt3dadd(79.87, -12.14, -14.75, 0.96)
pt3dadd(80.69, -11.7, -14.8, 0.96)
pt3dadd(81.72, -11.55, -14.85, 0.96)
pt3dadd(82.9, -11.4, -15.7, 0.96)
pt3dadd(84.09, -10.96, -15.75, 0.96)
pt3dadd(85.27, -11.63, -15.75, 0.96)
pt3dadd(84.75, -12.88, -15.75, 0.96)
}
}
proc shape3d_14() {
dend[42] { pt3dadd(83.72, -12.36, -15.75, 0.96)
pt3dadd(84.31, -11.4, -16.25, 0.96)
pt3dadd(85.86, -11.04, -16.5, 0.96)
pt3dadd(86.9, -10.59, -16.9, 0.96)
pt3dadd(88.23, -10.52, -17.15, 0.96)
pt3dadd(89.19, -10, -17.8, 0.96)
pt3dadd(90.44, -9.86, -17.9, 0.96)
pt3dadd(91.7, -9.78, -18.3, 1.11)
pt3dadd(92.59, -10.22, -18.4, 1.11)
pt3dadd(93.7, -10.81, -18.4, 1.11)
pt3dadd(94.88, -11.4, -18.4, 1.11)
pt3dadd(96.28, -11.55, -18.45, 1.11)
pt3dadd(97.39, -11.26, -18.5, 1.11)
pt3dadd(98.57, -11.04, -18.5, 1.11)
pt3dadd(99.98, -11.4, -18.5, 1.11)
pt3dadd(100.72, -12.14, -18.85, 0.74)
pt3dadd(101.46, -13.1, -18.85, 0.74)
pt3dadd(102.64, -13.84, -18.85, 0.74)
pt3dadd(103.3, -13.91, -18.85, 0.59)
pt3dadd(104.56, -14.06, -18.85, 0.59)
pt3dadd(105.23, -14.72, -18.85, 0.59)
pt3dadd(105.96, -15.31, -19.55, 0.59)
pt3dadd(107, -15.68, -19.6, 0.74)
pt3dadd(107.89, -15.61, -19.6, 0.74)
pt3dadd(108.77, -15.31, -19.6, 0.74)
pt3dadd(109.51, -14.94, -19.6, 0.74)
pt3dadd(110.18, -14.35, -19.6, 0.74)
pt3dadd(110.92, -14.43, -19.6, 0.74)
pt3dadd(111.95, -14.21, -19.6, 0.74)
pt3dadd(112.91, -13.98, -19.6, 0.74)
pt3dadd(113.65, -14.43, -20.35, 0.74)
pt3dadd(114.46, -14.28, -20.35, 0.74)
pt3dadd(115.35, -13.47, -20.35, 0.74)
}
dend[43] {pt3dclear()
pt3dadd(33.88, -13.35, 4.35, 0.89)
pt3dadd(34.81, -13.07, 3.45, 0.89)
pt3dadd(35.7, -12.33, 3.5, 0.89)
pt3dadd(36.44, -11.67, 3.5, 0.89)
pt3dadd(37.55, -11.52, 3.45, 0.89)
pt3dadd(38.07, -11.22, 4.2, 0.89)
pt3dadd(38.73, -10.78, 4.35, 0.89)
pt3dadd(39.25, -10.04, 4.6, 0.89)
pt3dadd(39.32, -9.01, 5.4, 0.89)
pt3dadd(39.99, -8.2, 5.5, 0.89)
pt3dadd(40.36, -7.54, 5.55, 0.89)
pt3dadd(40.58, -6.72, 5.65, 0.89)
pt3dadd(40.73, -5.99, 5.65, 0.89)
pt3dadd(41.1, -5.62, 5.8, 0.89)
pt3dadd(41.83, -4.81, 5.9, 0.89)
pt3dadd(42.43, -4.22, 5.95, 0.89)
pt3dadd(42.87, -3.48, 6.1, 0.89)
pt3dadd(43.76, -2.45, 6.25, 0.89)
pt3dadd(44.35, -1.71, 7.1, 0.89)
pt3dadd(44.57, -0.68, 7.1, 0.89)
pt3dadd(44.86, 0.13, 7.25, 0.89)
pt3dadd(45.38, 0.8, 7.5, 0.89)
pt3dadd(45.9, 1.61, 7.65, 0.89)
pt3dadd(46.56, 2.27, 7.7, 0.89)
pt3dadd(47.08, 2.86, 7.75, 0.89)
pt3dadd(47.38, 3.82, 7.9, 0.89)
pt3dadd(47.45, 4.85, 7.95, 0.89)
pt3dadd(47.82, 5.81, 8.4, 0.89)
pt3dadd(47.82, 6.77, 8.45, 0.89)
pt3dadd(48.56, 7.44, 8.45, 0.89)
pt3dadd(49.23, 7.8, 8.45, 0.89)
pt3dadd(49.67, 8.69, 9.2, 0.89)
pt3dadd(50.33, 8.98, 9.2, 0.89)
pt3dadd(51.52, 9.57, 9.25, 0.89)
pt3dadd(52.77, 9.8, 9.25, 0.89)
pt3dadd(53.22, 10.98, 9.75, 0.89)
pt3dadd(53.51, 12.23, 9.8, 0.89)
pt3dadd(53.59, 13.04, 9.95, 0.89)
pt3dadd(53.88, 13.85, 10, 0.89)
pt3dadd(53.96, 14.74, 10, 0.89)
pt3dadd(54.25, 15.62, 10.1, 0.89)
pt3dadd(54.77, 16.8, 10.1, 0.89)
pt3dadd(55.14, 17.61, 10.45, 0.74)
pt3dadd(55.95, 17.98, 10.45, 0.74)
pt3dadd(56.76, 18.33, 10.45, 0.74)
pt3dadd(57.57, 18.55, 10.45, 0.74)
pt3dadd(58.46, 18.48, 10.5, 0.74)
pt3dadd(59.5, 18.4, 11.15, 0.74)
pt3dadd(60.23, 18.99, 11.2, 0.74)
pt3dadd(60.31, 19.88, 11.45, 0.74)
pt3dadd(60.31, 20.54, 11.7, 0.74)
pt3dadd(60.68, 21.65, 11.85, 0.74)
pt3dadd(61.79, 22.02, 11.85, 0.74)
pt3dadd(62.82, 22.02, 11.85, 0.74)
pt3dadd(63.41, 21.35, 11.9, 0.74)
pt3dadd(64.52, 20.69, 11.9, 0.74)
pt3dadd(65.56, 20.76, 12.05, 0.74)
pt3dadd(66.07, 21.28, 12.3, 0.74)
pt3dadd(66.22, 22.31, 12.5, 0.74)
pt3dadd(65.93, 23.27, 12.55, 0.74)
pt3dadd(66.22, 23.79, 12.6, 0.74)
pt3dadd(66.74, 24.23, 12.85, 0.74)
pt3dadd(67.63, 24.52, 12.85, 0.74)
pt3dadd(68.59, 24.89, 12.9, 0.74)
pt3dadd(69.18, 25.33, 13, 0.74)
pt3dadd(69.84, 25.63, 13, 0.74)
pt3dadd(70.51, 26.15, 13.25, 0.74)
pt3dadd(71.47, 26.37, 13.3, 0.74)
pt3dadd(71.91, 26.51, 13.3, 0.74)
pt3dadd(72.65, 26.81, 13.75, 0.74)
pt3dadd(73.83, 26.88, 13.75, 0.74)
pt3dadd(74.72, 27.4, 14.2, 0.59)
pt3dadd(75.39, 27.84, 14.2, 0.59)
pt3dadd(76.05, 28.58, 14.2, 0.59)
pt3dadd(76.94, 29.61, 14.2, 0.59)
pt3dadd(77.6, 30.57, 14.2, 0.59)
pt3dadd(78.56, 31.6, 14.2, 0.59)
}
dend[44] {pt3dclear()
pt3dadd(26.12, -23.82, 4.75, 1.18)
pt3dadd(25.71, -24.59, 9.7, 1.18)
pt3dadd(24.9, -25.48, 9.75, 1.18)
pt3dadd(24.38, -26.51, 9.8, 1.18)
pt3dadd(23.94, -27.32, 9.8, 1.18)
}
dend[45] {pt3dclear()
pt3dadd(23.94, -27.32, 9.8, 1.03)
pt3dadd(24.01, -28.13, 9.8, 1.03)
pt3dadd(23.71, -28.72, 9.8, 1.03)
pt3dadd(23.34, -29.54, 9.8, 1.03)
pt3dadd(23.34, -30.35, 9.8, 1.03)
pt3dadd(24.08, -30.94, 9.8, 1.03)
pt3dadd(24.45, -31.75, 9.85, 1.03)
pt3dadd(25.04, -32.78, 10.25, 0.96)
pt3dadd(25.34, -33.96, 10.3, 0.96)
pt3dadd(25.34, -34.77, 10.3, 0.96)
pt3dadd(25.49, -36.1, 10.3, 0.96)
pt3dadd(25.71, -37.2, 10.35, 0.96)
pt3dadd(26.23, -38.16, 10.35, 0.96)
pt3dadd(26.82, -38.83, 10.35, 0.96)
pt3dadd(27.48, -39.42, 10.35, 0.96)
pt3dadd(28.15, -40.15, 10.35, 0.96)
pt3dadd(28.96, -40.89, 10.35, 0.96)
pt3dadd(29.92, -41.56, 10.35, 0.96)
pt3dadd(30.73, -41.85, 10.35, 0.96)
pt3dadd(31.77, -42.37, 10.35, 0.96)
pt3dadd(32.88, -42.96, 10.35, 0.96)
pt3dadd(33.84, -42.81, 10.4, 0.96)
pt3dadd(34.43, -43.25, 10.4, 0.96)
pt3dadd(35.32, -44.14, 11.05, 0.81)
pt3dadd(36.06, -44.65, 11.05, 0.81)
pt3dadd(36.8, -44.58, 11.1, 0.81)
pt3dadd(37.53, -44.28, 11.1, 0.81)
pt3dadd(38.5, -44.65, 11.1, 0.81)
pt3dadd(39.09, -45.24, 11.2, 0.81)
pt3dadd(39.6, -46.64, 11.55, 0.81)
pt3dadd(39.75, -47.46, 11.65, 0.81)
pt3dadd(40.05, -48.71, 11.7, 0.81)
pt3dadd(40.49, -49.74, 11.7, 0.81)
pt3dadd(40.64, -50.77, 11.75, 0.81)
pt3dadd(40.56, -51.88, 11.75, 0.81)
pt3dadd(40.2, -52.18, 12.25, 0.81)
pt3dadd(39.6, -52.84, 12.3, 0.81)
pt3dadd(39.16, -53.58, 12.3, 0.81)
pt3dadd(39.46, -54.9, 12.4, 0.81)
pt3dadd(40.19, -55.72, 13.2, 0.81)
pt3dadd(40.93, -56.61, 13.2, 0.81)
pt3dadd(41.74, -57.42, 13.2, 0.81)
pt3dadd(42.11, -58.3, 13.2, 0.81)
pt3dadd(42.63, -59.19, 13.2, 0.81)
pt3dadd(43.29, -60.15, 13.2, 0.81)
pt3dadd(43.88, -60.96, 13.25, 0.81)
}
dend[46] {pt3dclear()
pt3dadd(43.88, -60.96, 13.25, 0.67)
pt3dadd(43.51, -61.77, 14.85, 0.67)
pt3dadd(43.22, -62.58, 14.85, 0.67)
pt3dadd(42.85, -63.91, 14.85, 0.67)
pt3dadd(42.48, -64.57, 14.85, 0.67)
pt3dadd(41.67, -64.72, 14.85, 0.67)
pt3dadd(40.93, -64.79, 14.85, 0.67)
pt3dadd(40.11, -64.42, 14.85, 0.67)
pt3dadd(39.67, -63.61, 14.85, 0.67)
}
dend[47] {pt3dclear()
pt3dadd(43.88, -60.96, 13.25, 0.81)
pt3dadd(44.47, -61.18, 13.75, 0.81)
pt3dadd(44.77, -61.25, 13.9, 0.81)
pt3dadd(45.21, -61.77, 14.05, 0.81)
pt3dadd(45.51, -62.36, 14.15, 0.81)
pt3dadd(45.8, -63.1, 14.25, 0.81)
pt3dadd(45.73, -64.13, 14.5, 0.96)
pt3dadd(45.95, -64.72, 15.45, 0.96)
pt3dadd(46.1, -65.68, 15.45, 0.96)
pt3dadd(45.73, -66.41, 15.5, 0.96)
pt3dadd(45.43, -67.15, 15.5, 0.74)
pt3dadd(45.36, -68.18, 15.55, 0.74)
}
dend[48] {pt3dclear()
pt3dadd(23.94, -27.32, 9.8, 0.74)
pt3dadd(23.04, -26.96, 9.4, 0.74)
pt3dadd(22.3, -27.33, 9.3, 0.74)
pt3dadd(21.64, -27.99, 9.25, 0.74)
pt3dadd(21.27, -28.73, 9.15, 0.74)
pt3dadd(21.12, -29.83, 9.15, 0.74)
pt3dadd(21.19, -30.79, 9.1, 0.81)
pt3dadd(21.19, -31.46, 8.45, 0.81)
pt3dadd(20.97, -32.71, 8.35, 0.81)
pt3dadd(21.04, -33.6, 8.35, 0.81)
pt3dadd(21.34, -34.33, 8.6, 0.81)
pt3dadd(22.01, -35, 9.45, 0.81)
pt3dadd(22.38, -35.96, 9.6, 0.81)
pt3dadd(22.67, -36.62, 9.75, 0.81)
pt3dadd(22.45, -37.5, 9.95, 0.81)
pt3dadd(22.01, -38.46, 10.05, 0.81)
pt3dadd(22.45, -39.05, 10.15, 0.81)
pt3dadd(22.45, -39.94, 10.3, 0.81)
}
}
proc shape3d_15() {
dend[48] { pt3dadd(22.45, -41.12, 10.9, 0.81)
pt3dadd(22.52, -42, 11, 0.81)
pt3dadd(23.11, -42.81, 11.05, 0.81)
pt3dadd(23.85, -43.26, 11.75, 0.81)
pt3dadd(24.96, -43.26, 11.8, 0.81)
pt3dadd(25.7, -43.26, 11.8, 0.81)
pt3dadd(26.59, -43.77, 11.85, 0.81)
pt3dadd(27.4, -44.88, 11.85, 0.81)
pt3dadd(27.18, -45.62, 11.9, 0.81)
pt3dadd(27.03, -46.28, 12.05, 0.81)
pt3dadd(26.59, -47.39, 12.05, 0.81)
pt3dadd(27.33, -48.27, 12.2, 0.81)
pt3dadd(28.21, -48.64, 12.25, 0.81)
pt3dadd(29.03, -49.08, 12.55, 0.81)
pt3dadd(29.91, -49.67, 12.55, 0.81)
pt3dadd(30.43, -50.41, 12.6, 0.81)
pt3dadd(30.73, -51, 13.95, 0.81)
pt3dadd(31.76, -51.44, 13.95, 0.81)
pt3dadd(32.65, -51.96, 13.95, 0.81)
pt3dadd(33.46, -52.99, 13.95, 0.81)
pt3dadd(33.9, -53.73, 13.95, 0.81)
pt3dadd(34.13, -54.47, 13.95, 0.81)
pt3dadd(34.64, -55.5, 13.95, 0.81)
pt3dadd(35.38, -55.94, 14, 0.81)
pt3dadd(36.12, -56.38, 14, 0.81)
pt3dadd(36.86, -56.97, 14, 0.81)
pt3dadd(36.79, -57.93, 14.85, 0.81)
pt3dadd(36.64, -59.04, 14.9, 0.81)
pt3dadd(36.94, -60.15, 14.9, 0.81)
pt3dadd(36.79, -61.1, 14.9, 0.81)
pt3dadd(36.94, -62.06, 14.9, 0.81)
pt3dadd(37.16, -63.24, 14.9, 0.59)
pt3dadd(37.75, -64.5, 14.9, 0.59)
pt3dadd(37.82, -66.27, 14.9, 0.59)
pt3dadd(38.56, -67.3, 14.9, 0.59)
pt3dadd(39.15, -68.4, 14.9, 0.59)
pt3dadd(39.74, -69.51, 14.9, 0.59)
}
dend[49] {pt3dclear()
pt3dadd(26.12, -23.82, 4.75, 1.48)
pt3dadd(25.89, -24.72, -0.3, 1.48)
pt3dadd(26.11, -25.45, -0.35, 1.48)
pt3dadd(26.63, -26.19, -0.65, 1.48)
pt3dadd(27.44, -27, -0.7, 1.48)
pt3dadd(28.62, -27.89, -1, 1.48)
pt3dadd(29.36, -28.55, -1.35, 1.48)
pt3dadd(30.47, -29.21, -1.55, 1.7)
pt3dadd(31.43, -29.73, -1.6, 1.7)
pt3dadd(31.95, -30.25, -1.65, 1.7)
pt3dadd(32.91, -30.69, -1.75, 1.7)
pt3dadd(33.65, -31.21, -1.8, 1.7)
pt3dadd(34.68, -31.5, -1.95, 1.7)
pt3dadd(35.57, -32.16, -2.05, 1.7)
pt3dadd(36.6, -32.83, -0.55, 1.7)
pt3dadd(36.83, -34.01, -0.75, 1.7)
pt3dadd(37.79, -35.11, -0.85, 1.7)
pt3dadd(38.23, -36.66, -2, 2.07)
pt3dadd(38.3, -38.28, -3.35, 2.22)
}
dend[50] {pt3dclear()
pt3dadd(38.3, -38.28, -3.35, 2.22)
pt3dadd(37.86, -40.05, -3.6, 2.22)
pt3dadd(37.34, -41.16, -3.65, 2.22)
pt3dadd(36.68, -42.12, -3.1, 1.55)
pt3dadd(35.94, -42.78, -3, 1.55)
pt3dadd(35.49, -43.59, -3.05, 1.55)
pt3dadd(34.98, -44.26, -3.15, 1.55)
pt3dadd(34.68, -45.14, -3.25, 1.55)
pt3dadd(33.79, -46.1, -4.25, 1.26)
pt3dadd(33.35, -46.91, -4.4, 1.26)
pt3dadd(33.13, -47.72, -4.8, 1.26)
pt3dadd(32.83, -48.68, -5.05, 1.26)
pt3dadd(32.24, -49.42, -5.15, 1.26)
pt3dadd(31.73, -50.01, -5.3, 1.26)
pt3dadd(31.28, -50.75, -5.55, 1.26)
pt3dadd(30.54, -51.26, -5.7, 1.26)
pt3dadd(30.17, -51.63, -5.8, 1.26)
pt3dadd(29.43, -52.22, -5.9, 1.26)
pt3dadd(29.36, -53.26, -5.95, 1.26)
pt3dadd(29.21, -54.51, -5.95, 1.26)
}
dend[51] {pt3dclear()
pt3dadd(29.21, -54.51, -5.95, 1.11)
pt3dadd(28.93, -55.52, -7.7, 1.11)
pt3dadd(28.93, -56.55, -7.9, 1.11)
pt3dadd(29.52, -57.59, -8.45, 1.11)
pt3dadd(29.67, -58.62, -8.45, 1.11)
pt3dadd(30.11, -59.36, -8.5, 1.11)
pt3dadd(30.33, -60.54, -8.55, 1.11)
pt3dadd(30.33, -61.35, -8.55, 1.11)
pt3dadd(30.63, -62.53, -8.55, 1.11)
pt3dadd(30.77, -63.71, -8.55, 1.11)
pt3dadd(30.85, -64.66, -9.5, 1.11)
pt3dadd(30.7, -65.84, -9.5, 1.11)
pt3dadd(30.4, -66.88, -9.55, 1.11)
pt3dadd(30.7, -67.98, -9.75, 0.96)
pt3dadd(30.11, -69.46, -9.75, 0.96)
pt3dadd(30.48, -70.2, -10.5, 0.96)
pt3dadd(30.11, -71.67, -10.25, 0.96)
pt3dadd(31.07, -73.29, -10.05, 0.96)
}
dend[52] {pt3dclear()
pt3dadd(31.07, -73.29, -10.05, 0.96)
pt3dadd(30.7, -74.55, -10.1, 0.96)
pt3dadd(30.4, -75.51, -10.25, 0.96)
pt3dadd(30.26, -76.46, -10.3, 0.96)
pt3dadd(30.63, -77.5, -10.4, 0.96)
pt3dadd(30.63, -78.16, -10.6, 0.96)
pt3dadd(30.26, -79.49, -11.05, 0.96)
pt3dadd(29.89, -80.52, -11.3, 0.96)
pt3dadd(29.22, -81.63, -11.65, 0.96)
pt3dadd(29.15, -82.95, -12.6, 1.11)
pt3dadd(29.07, -84.13, -12.6, 1.11)
pt3dadd(28.93, -84.95, -12.6, 1.11)
pt3dadd(29.15, -86.35, -12.6, 1.11)
pt3dadd(29.08, -87.96, -12.85, 1.11)
pt3dadd(29.37, -89.29, -12.9, 1.11)
pt3dadd(29.6, -90.62, -13.5, 0.96)
pt3dadd(29.89, -92.17, -13.5, 0.96)
pt3dadd(30.26, -93.57, -13.5, 0.96)
pt3dadd(30.34, -94.82, -13.55, 0.96)
pt3dadd(30.11, -95.93, -13.55, 0.96)
pt3dadd(29.67, -97.11, -14.45, 0.96)
pt3dadd(30.34, -98.43, -14.45, 0.96)
pt3dadd(30.63, -99.39, -14.45, 0.96)
pt3dadd(30.93, -100.06, -14.45, 0.96)
pt3dadd(31.22, -101.16, -14.45, 0.96)
pt3dadd(31.52, -102.93, -14.45, 0.96)
pt3dadd(31.81, -104.26, -15.4, 1.03)
pt3dadd(31.81, -105.44, -16.2, 1.03)
pt3dadd(32.11, -107.14, -16.2, 1.03)
pt3dadd(32.03, -108.32, -16.25, 1.03)
pt3dadd(31.67, -109.57, -16.25, 1.03)
pt3dadd(31.59, -111.05, -16.25, 1.03)
pt3dadd(32.03, -112.23, -16.9, 1.03)
pt3dadd(31.96, -113.55, -16.9, 1.03)
pt3dadd(31.59, -114.59, -16.9, 1.03)
pt3dadd(30.85, -115.77, -16.95, 1.03)
pt3dadd(29.74, -116.65, -17.1, 1.03)
pt3dadd(28.93, -117.02, -18.15, 1.03)
pt3dadd(28.19, -117.98, -18.15, 1.03)
pt3dadd(27.34, -118.47, -18.7, 0.89)
pt3dadd(27.19, -119.87, -18.7, 0.89)
pt3dadd(27.48, -120.69, -18.7, 0.89)
pt3dadd(28.37, -121.57, -19.1, 0.89)
pt3dadd(28.81, -122.75, -19.85, 0.89)
pt3dadd(28.96, -123.93, -20.1, 0.89)
pt3dadd(28.81, -125.33, -20.15, 0.89)
pt3dadd(28.3, -126.58, -20.65, 0.89)
pt3dadd(27.11, -127.17, -20.7, 0.89)
pt3dadd(26.37, -127.47, -21.3, 0.89)
pt3dadd(25.49, -128.8, -21.3, 0.89)
pt3dadd(26.45, -129.02, -25.8, 0.74)
pt3dadd(27.11, -128.58, -25.8, 0.74)
pt3dadd(28, -129.17, -25.85, 0.74)
pt3dadd(28.3, -130.2, -25.85, 0.74)
pt3dadd(28, -131.3, -25.85, 0.74)
pt3dadd(27.41, -132.26, -25.85, 0.74)
pt3dadd(27.85, -133.52, -26.2, 0.74)
pt3dadd(27.63, -134.7, -26.25, 0.74)
pt3dadd(28.22, -135.73, -26.25, 0.74)
pt3dadd(28.67, -136.91, -26.25, 0.74)
pt3dadd(28.89, -137.94, -26.25, 0.74)
pt3dadd(29.11, -139.56, -26.5, 0.74)
pt3dadd(29.33, -141.33, -26.5, 0.74)
pt3dadd(29.18, -142.51, -26.5, 0.74)
pt3dadd(28.59, -143.69, -26.5, 0.74)
pt3dadd(28.22, -145.02, -26.75, 0.74)
pt3dadd(27.7, -146.13, -27.05, 0.74)
pt3dadd(27.26, -147.16, -27.1, 0.74)
pt3dadd(26.37, -147.9, -27.1, 0.74)
pt3dadd(26.89, -148.93, -27.15, 0.74)
pt3dadd(26.58, -150.09, -27.6, 0.74)
pt3dadd(26.28, -150.83, -27.6, 0.74)
pt3dadd(25.91, -151.93, -27.6, 0.74)
pt3dadd(25.1, -153.11, -27.6, 0.74)
pt3dadd(24.58, -153.85, -27.6, 0.74)
pt3dadd(23.92, -155.18, -27.6, 0.74)
pt3dadd(23.55, -156.21, -27.6, 0.74)
pt3dadd(22.88, -156.8, -28.05, 0.74)
pt3dadd(22.14, -157.61, -28.1, 0.74)
pt3dadd(20.96, -158.27, -28.1, 0.74)
pt3dadd(20.3, -158.94, -28.1, 0.74)
pt3dadd(20.07, -159.82, -29.65, 0.74)
pt3dadd(19.11, -160.34, -29.7, 0.74)
pt3dadd(19.04, -161.59, -29.75, 0.74)
pt3dadd(19.34, -162.92, -31.15, 0.74)
pt3dadd(19.56, -164.03, -31.25, 0.74)
pt3dadd(19.26, -165.5, -31.35, 0.74)
pt3dadd(19.11, -166.76, -32.25, 0.59)
pt3dadd(18.67, -167.71, -32.3, 0.59)
pt3dadd(17.64, -168.53, -32.45, 0.59)
pt3dadd(16.67, -169.12, -32.9, 0.59)
pt3dadd(14.9, -170.15, -33.75, 0.59)
pt3dadd(13.87, -170.59, -33.8, 0.59)
pt3dadd(13.2, -171.18, -33.85, 0.59)
pt3dadd(12.91, -171.99, -33.85, 0.59)
pt3dadd(12.46, -172.51, -34.05, 0.59)
pt3dadd(12.02, -172.51, -34.3, 0.59)
pt3dadd(11.35, -171.84, -34.4, 0.59)
pt3dadd(10.61, -172.29, -34.45, 0.59)
pt3dadd(10.1, -172.07, -34.45, 0.59)
}
dend[53] {pt3dclear()
pt3dadd(31.07, -73.29, -10.05, 0.81)
pt3dadd(31.45, -73.78, -11.8, 0.81)
pt3dadd(32.04, -74.74, -11.8, 0.81)
pt3dadd(32.48, -75.7, -11.85, 0.81)
pt3dadd(33, -76.81, -11.85, 0.81)
pt3dadd(32.78, -77.77, -11.9, 0.81)
}
}
proc shape3d_16() {
dend[53] { pt3dadd(32.7, -78.87, -12, 0.81)
pt3dadd(32.56, -79.98, -12.8, 0.81)
pt3dadd(32.34, -81.38, -12.85, 0.81)
pt3dadd(32.19, -82.12, -12.85, 0.81)
pt3dadd(32.41, -83.22, -13.15, 0.81)
pt3dadd(32.56, -84.25, -13.4, 0.81)
pt3dadd(33.44, -85.43, -13.85, 0.81)
pt3dadd(33.59, -86.32, -14, 0.81)
pt3dadd(34.26, -87.28, -14.5, 0.81)
pt3dadd(34.4, -88.24, -14.85, 0.81)
pt3dadd(34.7, -89.2, -14.95, 0.81)
pt3dadd(34.85, -90.38, -15, 0.81)
pt3dadd(34.77, -91.78, -15.05, 0.81)
pt3dadd(34.4, -92.74, -15.05, 0.81)
pt3dadd(33.67, -93.4, -15.1, 0.81)
pt3dadd(33.44, -94.28, -15.7, 0.81)
pt3dadd(33.07, -95.1, -15.85, 0.81)
pt3dadd(32.48, -95.98, -16.05, 0.81)
pt3dadd(32.19, -97.23, -16.15, 0.81)
pt3dadd(32.7, -98.34, -16.4, 0.81)
pt3dadd(33.07, -99.74, -17.5, 0.81)
pt3dadd(33.44, -101, -17.5, 0.81)
pt3dadd(33.22, -102.54, -17.5, 0.81)
pt3dadd(33.07, -103.58, -17.5, 0.81)
pt3dadd(32.48, -104.39, -19.2, 0.81)
pt3dadd(31.74, -104.73, -19.25, 0.81)
pt3dadd(31.14, -105.32, -19.4, 0.81)
pt3dadd(30.11, -105.61, -19.4, 0.81)
pt3dadd(29.22, -105.68, -20.1, 0.67)
pt3dadd(29, -106.42, -20.1, 0.67)
pt3dadd(29, -107.75, -20.1, 0.67)
pt3dadd(29.74, -109.15, -21.1, 0.67)
pt3dadd(30.04, -110.18, -21.1, 0.67)
pt3dadd(30.04, -111.07, -21.9, 0.67)
pt3dadd(30.55, -112.25, -21.9, 0.67)
pt3dadd(30.77, -113.8, -21.95, 0.67)
pt3dadd(30.77, -114.9, -23.2, 0.67)
pt3dadd(30.55, -116.75, -23.4, 0.67)
pt3dadd(30.33, -117.93, -23.45, 0.67)
pt3dadd(30.11, -119.03, -23.5, 0.67)
pt3dadd(30.26, -119.99, -23.5, 0.67)
pt3dadd(30.26, -121.32, -23.6, 0.67)
pt3dadd(29.81, -122.35, -23.65, 0.67)
pt3dadd(29.59, -123.31, -23.65, 0.67)
pt3dadd(29.67, -124.64, -23.7, 0.67)
pt3dadd(29.59, -125.82, -23.75, 0.67)
pt3dadd(30.04, -126.78, -24.85, 0.67)
pt3dadd(31, -127.22, -24.85, 0.67)
pt3dadd(31.96, -128.1, -24.85, 0.67)
pt3dadd(32.18, -129.06, -24.9, 0.67)
pt3dadd(32.4, -130.17, -26.05, 0.67)
pt3dadd(32.03, -131.42, -26.1, 0.67)
pt3dadd(31.74, -132.31, -26.15, 0.67)
pt3dadd(31.07, -133.27, -26.45, 0.67)
pt3dadd(30.48, -134.37, -26.55, 0.67)
pt3dadd(30.77, -135.48, -26.6, 0.67)
pt3dadd(30.75, -136.64, -27.65, 0.67)
pt3dadd(30.46, -137.9, -27.65, 0.67)
pt3dadd(29.79, -138.78, -27.7, 0.67)
pt3dadd(29.2, -139.59, -27.8, 0.67)
pt3dadd(28.31, -140.11, -27.9, 0.67)
pt3dadd(27.87, -140.92, -27.95, 0.67)
pt3dadd(27.35, -141.88, -29, 0.67)
pt3dadd(26.69, -142.62, -29, 0.67)
pt3dadd(25.8, -143.06, -29.3, 0.67)
pt3dadd(24.91, -143.21, -29.35, 0.67)
pt3dadd(24.03, -143.06, -29.35, 0.67)
pt3dadd(22.99, -143.35, -29.9, 0.67)
pt3dadd(22.33, -144.02, -29.9, 0.67)
pt3dadd(21.66, -144.61, -30.05, 0.67)
pt3dadd(21, -145.56, -30.35, 0.67)
pt3dadd(20.18, -146.08, -30.45, 0.67)
pt3dadd(19.37, -146.6, -30.45, 0.67)
pt3dadd(18.85, -147.41, -31.05, 0.67)
pt3dadd(18.26, -148.07, -31.1, 0.67)
pt3dadd(17.45, -148.59, -31.1, 0.59)
pt3dadd(16.19, -148.59, -31.1, 0.59)
pt3dadd(15.23, -148.88, -31.3, 0.59)
pt3dadd(14.34, -148.96, -31.35, 0.59)
pt3dadd(14.2, -150.14, -31.95, 0.59)
pt3dadd(14.05, -151.32, -31.95, 0.59)
pt3dadd(13.98, -152.05, -32, 0.59)
pt3dadd(13.31, -152.2, -33.15, 0.59)
pt3dadd(11.61, -152.42, -33.2, 0.59)
pt3dadd(10.5, -152.94, -33.45, 0.59)
pt3dadd(9.47, -152.79, -34.3, 0.59)
pt3dadd(8.43, -152.94, -34.35, 0.59)
pt3dadd(7.77, -153.46, -34.35, 0.59)
pt3dadd(7.18, -153.82, -34.35, 0.59)
}
dend[54] {pt3dclear()
pt3dadd(29.21, -54.51, -5.95, 0.81)
pt3dadd(29.67, -55.49, -2.15, 0.81)
pt3dadd(30.11, -56.23, -2.2, 0.81)
pt3dadd(30.55, -56.53, -2.2, 0.81)
pt3dadd(31.07, -57.04, -2.3, 0.81)
pt3dadd(31.44, -57.26, -2.35, 0.81)
pt3dadd(31.88, -57.93, -2.45, 0.81)
pt3dadd(32.33, -58.81, -3.4, 0.81)
pt3dadd(33.07, -59.4, -3.85, 0.81)
pt3dadd(33.43, -60.07, -3.9, 0.81)
pt3dadd(33.66, -61.03, -3.95, 0.81)
pt3dadd(34.03, -61.91, -4.7, 0.81)
pt3dadd(33.73, -62.65, -4.75, 0.81)
pt3dadd(34.54, -62.87, -4.75, 0.81)
pt3dadd(35.28, -63.31, -4.75, 0.81)
pt3dadd(35.87, -63.75, -4.75, 0.81)
pt3dadd(36.83, -64.27, -5, 0.81)
pt3dadd(37.72, -65.08, -5.45, 0.81)
pt3dadd(38.16, -65.52, -5.55, 0.81)
pt3dadd(38.46, -66.19, -5.55, 0.81)
pt3dadd(39.35, -67.37, -6.1, 0.81)
pt3dadd(39.64, -68.47, -6.15, 0.81)
pt3dadd(39.86, -69.51, -6.15, 0.81)
pt3dadd(40.38, -70.32, -6.2, 0.81)
pt3dadd(40.97, -70.83, -6.2, 0.81)
pt3dadd(41.42, -71.72, -7.05, 1.03)
pt3dadd(41.56, -73.12, -7.05, 1.03)
pt3dadd(41.79, -73.78, -7.05, 1.03)
pt3dadd(42.08, -74.3, -7.05, 1.03)
pt3dadd(42.53, -75.18, -7.05, 1.03)
pt3dadd(43.04, -76.22, -7.1, 1.03)
pt3dadd(43.86, -77.03, -7.05, 1.03)
pt3dadd(44.3, -77.4, -7.05, 1.03)
pt3dadd(44.52, -78.58, -7.05, 1.03)
pt3dadd(44.96, -79.83, -7.1, 1.03)
pt3dadd(44.89, -81.08, -7.1, 1.03)
pt3dadd(44.96, -82.12, -7.1, 1.03)
pt3dadd(45.41, -83.44, -7.15, 1.03)
pt3dadd(46.44, -84.26, -7.15, 1.03)
pt3dadd(47.26, -85.14, -7.15, 1.03)
pt3dadd(47.99, -86.07, -7.15, 1.03)
pt3dadd(48.58, -87.03, -7.15, 1.03)
pt3dadd(48.8, -88.06, -8.05, 1.03)
pt3dadd(49.1, -89.17, -8.05, 1.03)
pt3dadd(49.17, -89.9, -8.05, 1.03)
pt3dadd(49.91, -91.38, -8.05, 1.03)
pt3dadd(50.28, -92.26, -8.05, 1.03)
pt3dadd(50.5, -92.71, -8.05, 1.03)
pt3dadd(51.24, -93.74, -8.05, 1.03)
pt3dadd(51.39, -94.99, -8.75, 1.18)
pt3dadd(51.46, -96.24, -8.85, 1.18)
pt3dadd(51.61, -97.13, -9.7, 1.18)
pt3dadd(51.53, -98.38, -9.95, 1.03)
pt3dadd(51.9, -99.49, -9.95, 1.03)
pt3dadd(52.64, -100.67, -10, 1.03)
pt3dadd(52.72, -101.92, -9.95, 1.03)
pt3dadd(53.01, -103.32, -10, 1.03)
pt3dadd(53.09, -104.8, -10.3, 1.03)
pt3dadd(53.23, -105.83, -10.3, 1.03)
pt3dadd(53.38, -107.16, -10.3, 1.03)
pt3dadd(53.53, -108.49, -10.3, 1.03)
pt3dadd(53.75, -110.18, -10.35, 1.03)
pt3dadd(53.83, -111.44, -10.35, 1.03)
pt3dadd(53.6, -112.62, -10.6, 1.03)
pt3dadd(53.31, -113.94, -10.6, 1.03)
pt3dadd(52.72, -114.83, -10.65, 1.03)
pt3dadd(52.64, -116.16, -10.65, 1.03)
pt3dadd(52.5, -117.17, -10.65, 1.03)
pt3dadd(52.36, -118.35, -10.7, 1.03)
pt3dadd(52.28, -119.53, -10.7, 1.03)
pt3dadd(52.87, -120.93, -10.7, 1.03)
pt3dadd(53.02, -122.63, -10.9, 1.03)
pt3dadd(53.1, -124.03, -11.15, 1.03)
pt3dadd(53.24, -126.09, -11.5, 1.03)
pt3dadd(53.98, -127.64, -11.55, 1.03)
pt3dadd(54.28, -128.6, -11, 1.03)
pt3dadd(54.5, -130.22, -10.9, 0.96)
pt3dadd(54.28, -131.47, -10.85, 0.96)
pt3dadd(54.43, -132.88, -10.85, 0.96)
pt3dadd(55.31, -134.28, -10.9, 0.96)
pt3dadd(55.98, -135.53, -10.9, 0.96)
pt3dadd(56.57, -136.64, -10.95, 0.96)
pt3dadd(57.09, -138.26, -10.95, 0.96)
pt3dadd(57.9, -139.88, -10.95, 0.96)
pt3dadd(58.57, -141.5, -10.95, 0.96)
pt3dadd(58.71, -142.91, -10.95, 0.96)
pt3dadd(59.45, -144.16, -10.95, 0.96)
pt3dadd(60.12, -145.27, -10.95, 0.96)
pt3dadd(60.63, -146.22, -10.95, 0.96)
pt3dadd(60.93, -147.55, -10.95, 0.96)
pt3dadd(61.29, -148.94, -9.7, 0.96)
pt3dadd(60.92, -150.2, -9.6, 0.96)
pt3dadd(61.22, -151.23, -9.65, 0.96)
pt3dadd(61.59, -152.19, -9.9, 0.96)
pt3dadd(62.4, -153.15, -9.95, 0.96)
pt3dadd(62.47, -154.03, -10.05, 0.96)
pt3dadd(62.92, -155.21, -10.2, 0.96)
pt3dadd(63.43, -156.17, -10.45, 0.96)
pt3dadd(63.88, -157.27, -10.75, 0.96)
pt3dadd(64.47, -158.31, -12.4, 0.81)
pt3dadd(65.06, -159.41, -12.4, 0.81)
pt3dadd(64.17, -160.22, -12.45, 0.81)
pt3dadd(63.95, -161.77, -12.45, 0.81)
pt3dadd(63.43, -163.17, -12.45, 0.81)
pt3dadd(63.66, -164.06, -12.45, 0.81)
pt3dadd(64.47, -165.39, -12.45, 0.81)
pt3dadd(64.32, -166.42, -12.6, 0.81)
pt3dadd(64.77, -167.67, -12.7, 0.81)
pt3dadd(65.58, -168.41, -12.75, 0.81)
pt3dadd(66.24, -169, -12.8, 0.67)
pt3dadd(66.54, -170.33, -12.8, 0.67)
}
}
proc shape3d_17() {
dend[54] { pt3dadd(66.54, -171.95, -12.8, 0.67)
pt3dadd(66.69, -173.57, -12.85, 0.67)
pt3dadd(67.2, -174.31, -12.85, 0.67)
pt3dadd(68.46, -175.42, -12.85, 0.67)
}
dend[55] {pt3dclear()
pt3dadd(38.3, -38.28, -3.35, 1.11)
pt3dadd(39.21, -38.68, -0.9, 1.11)
pt3dadd(40.03, -39.72, -0.8, 1.11)
pt3dadd(41.5, -39.42, -0.8, 1.11)
pt3dadd(42.1, -38.83, -0.75, 1.11)
pt3dadd(43.35, -39.05, -0.75, 1.11)
pt3dadd(44.24, -39.57, -0.75, 1.11)
pt3dadd(45.05, -40.01, -0.75, 1.11)
pt3dadd(45.94, -40.45, -0.7, 1.11)
pt3dadd(46.6, -40.45, -0.35, 1.11)
pt3dadd(46.9, -39.94, -0.25, 1.11)
pt3dadd(47.2, -39.05, -0.25, 1.11)
pt3dadd(48.16, -38.46, -0.2, 1.11)
pt3dadd(49.04, -39.05, -0.2, 1.11)
pt3dadd(49.71, -39.42, -0.15, 0.67)
pt3dadd(50.67, -39.49, -0.15, 0.67)
pt3dadd(51.11, -38.68, -0.1, 0.67)
pt3dadd(51.26, -38.09, 0.05, 0.81)
pt3dadd(51.11, -37.36, 0.05, 0.81)
pt3dadd(51.63, -36.4, 0.15, 0.81)
pt3dadd(52.15, -35.81, 0.2, 0.81)
pt3dadd(53.26, -35.44, 0.2, 0.81)
pt3dadd(54.66, -35.59, 0.25, 0.81)
pt3dadd(55.92, -35.73, 0.25, 0.81)
pt3dadd(57.17, -35.88, 0.25, 0.81)
pt3dadd(57.76, -35.66, 0.25, 0.89)
pt3dadd(59.02, -35.95, 0.3, 0.89)
pt3dadd(60.06, -36.18, 0.3, 0.89)
pt3dadd(61.24, -36.4, 0.3, 0.89)
pt3dadd(62.42, -36.32, 0.3, 0.89)
pt3dadd(63.23, -35.88, 0.3, 0.89)
pt3dadd(63.97, -35, 0.35, 0.89)
pt3dadd(65.23, -34.48, 0.35, 0.89)
pt3dadd(66.49, -34.04, 0.4, 0.89)
pt3dadd(67.67, -33.37, 0.5, 0.89)
pt3dadd(68.63, -33.15, 1.35, 0.89)
pt3dadd(69.74, -32.86, 1.4, 0.89)
pt3dadd(70.7, -32.86, 1.4, 0.89)
pt3dadd(71.88, -33.45, 1.45, 1.03)
pt3dadd(72.4, -34.33, 1.45, 1.03)
pt3dadd(72.55, -35.14, 1.45, 1.03)
pt3dadd(72.69, -36.1, 1.45, 1.03)
pt3dadd(73.06, -36.84, 1.45, 1.03)
pt3dadd(74.1, -37.13, 1.45, 1.03)
pt3dadd(75.28, -36.4, 2.6, 1.03)
pt3dadd(75.8, -35.73, 2.65, 1.03)
pt3dadd(76.39, -35.29, 2.85, 1.03)
pt3dadd(77.28, -34.85, 2.95, 1.03)
pt3dadd(78.46, -34.26, 3.3, 1.03)
pt3dadd(79.79, -34.18, 3.35, 1.03)
pt3dadd(80.6, -34.11, 3.35, 1.03)
pt3dadd(81.71, -33.89, 3.35, 1.03)
pt3dadd(82.6, -33.89, 3.4, 1.03)
pt3dadd(83.19, -34.18, 3.4, 1.03)
pt3dadd(83.78, -34.63, 3.4, 1.03)
pt3dadd(84.67, -34.85, 3.4, 1.03)
pt3dadd(85.18, -35, 3.4, 1.03)
pt3dadd(86, -34.63, 3.4, 1.03)
pt3dadd(86.83, -34.31, 4.8, 1.03)
pt3dadd(87.87, -33.87, 4.85, 1.03)
pt3dadd(88.61, -33.28, 5.25, 1.03)
pt3dadd(89.35, -32.54, 5.3, 1.03)
pt3dadd(90.31, -32.47, 5.3, 1.03)
pt3dadd(91.12, -32.99, 5.3, 1.03)
pt3dadd(91.34, -34.17, 5.3, 1.03)
pt3dadd(92.08, -34.9, 5.9, 1.03)
pt3dadd(92.9, -35.79, 4.5, 1.03)
pt3dadd(93.56, -36.97, 4.35, 1.03)
pt3dadd(94.67, -37.78, 4.15, 0.89)
pt3dadd(95.93, -38.22, 4.1, 0.89)
pt3dadd(97.03, -38.74, 4.1, 0.89)
pt3dadd(98.07, -38.81, 4.05, 0.89)
pt3dadd(99.18, -38.59, 4.05, 0.89)
pt3dadd(100.21, -38.96, 4, 0.89)
pt3dadd(100.73, -38.96, 4, 0.89)
pt3dadd(101.99, -38.81, 4, 0.89)
pt3dadd(103.09, -39.4, 3.95, 0.89)
pt3dadd(104.35, -40.29, 3.9, 0.89)
pt3dadd(105.16, -40.8, 3.9, 0.89)
pt3dadd(105.98, -41.39, 3.9, 0.89)
pt3dadd(106.13, -42.35, 3.85, 0.89)
pt3dadd(106.2, -43.9, 3.85, 0.89)
pt3dadd(106.72, -44.34, 3.35, 0.89)
pt3dadd(107.68, -45.15, 3.15, 0.89)
pt3dadd(108.86, -45.38, 3.05, 0.89)
pt3dadd(109.6, -44.93, 2.95, 0.89)
pt3dadd(110.63, -44.2, 2.9, 0.89)
pt3dadd(111.74, -44.42, 2.8, 0.89)
pt3dadd(112.56, -44.64, 2.75, 0.89)
pt3dadd(113.81, -44.71, 2.6, 0.89)
pt3dadd(114.99, -45.15, 1.85, 0.89)
pt3dadd(116.55, -45.52, 1.65, 0.89)
pt3dadd(117.66, -45.67, 1.35, 0.89)
pt3dadd(116.84, -46.33, 1.3, 0.89)
pt3dadd(117.88, -46.63, 1.3, 0.89)
pt3dadd(118.84, -46.63, 1.25, 0.89)
pt3dadd(120.09, -46.56, -0.6, 0.74)
pt3dadd(120.46, -45.82, -0.65, 0.74)
pt3dadd(120.24, -45.3, -0.95, 0.74)
pt3dadd(119.87, -44.64, -1.15, 0.74)
pt3dadd(119.28, -43.75, -1.3, 0.59)
pt3dadd(119.06, -43.02, -1.3, 0.59)
pt3dadd(119.43, -42.28, -1.3, 0.59)
pt3dadd(119.8, -42.65, -1.3, 0.59)
}
dend[56] {pt3dclear()
pt3dadd(12.96, -23.38, 2.75, 2.44)
pt3dadd(12.66, -24.49, 2.15, 2.44)
pt3dadd(13.1, -25.08, 2.15, 2.44)
pt3dadd(13.91, -26.04, 2.1, 1.85)
pt3dadd(14.8, -27.22, 2.15, 1.85)
pt3dadd(15.76, -27.74, 2.1, 1.85)
pt3dadd(17.61, -28.11, 2.2, 1.85)
pt3dadd(18.57, -28.26, 2.25, 1.85)
pt3dadd(19.68, -27.96, 2.35, 1.85)
pt3dadd(21.08, -27.52, 2.8, 1.7)
pt3dadd(22.04, -27.08, 2.85, 1.7)
pt3dadd(23, -26.78, 2.85, 1.7)
pt3dadd(24.48, -26.56, 2.85, 1.7)
pt3dadd(25.66, -26.04, 2.85, 1.7)
pt3dadd(26.03, -25.31, 2.85, 1.7)
pt3dadd(26.85, -24.2, 2.9, 1.7)
pt3dadd(27.81, -23.98, 2.9, 1.7)
pt3dadd(29.14, -24.35, 2.9, 1.7)
pt3dadd(30.32, -24.64, 2.9, 1.7)
pt3dadd(31.8, -24.64, 2.9, 1.7)
pt3dadd(33.2, -24.72, 3.25, 1.7)
pt3dadd(34.53, -25.23, 3.45, 1.4)
pt3dadd(35.64, -25.6, 3.45, 1.4)
pt3dadd(36.38, -26.04, 3.5, 1.4)
pt3dadd(37.19, -26.78, 3.6, 1.4)
pt3dadd(37.64, -27.59, 3.85, 1.4)
pt3dadd(37.49, -28.62, 4.9, 1.4)
pt3dadd(37.27, -29.36, 5.85, 1.03)
pt3dadd(36.6, -29.88, 5.9, 1.03)
pt3dadd(35.79, -29.66, 6, 1.03)
pt3dadd(35.2, -29.14, 6.15, 1.03)
pt3dadd(34.16, -28.92, 6.5, 1.03)
pt3dadd(33.35, -28.48, 6.9, 1.03)
pt3dadd(32.32, -28.33, 7.05, 1.03)
pt3dadd(31.8, -28.62, 7.45, 1.03)
pt3dadd(31.5, -28.99, 8.05, 1.03)
pt3dadd(30.99, -29.66, 8.1, 1.03)
pt3dadd(30.69, -30.76, 8.15, 1.03)
pt3dadd(30.99, -31.43, 8.15, 1.03)
pt3dadd(32.17, -31.72, 8.5, 1.03)
pt3dadd(32.98, -32.09, 8.55, 1.03)
pt3dadd(33.65, -32.68, 8.65, 1.03)
pt3dadd(34.31, -33.71, 8.65, 1.03)
pt3dadd(34.83, -34.23, 8.7, 1.03)
pt3dadd(35.49, -34.82, 9.05, 1.03)
pt3dadd(36.6, -35.41, 9.05, 1.03)
pt3dadd(37.64, -35.56, 9.05, 1.03)
pt3dadd(38.75, -35.7, 9.5, 0.96)
pt3dadd(39.63, -35.63, 9.55, 0.96)
pt3dadd(40.52, -36.15, 9.6, 0.96)
pt3dadd(41.33, -36.37, 9.8, 0.96)
pt3dadd(41.85, -36.37, 10.1, 0.96)
pt3dadd(43.03, -36.66, 10.15, 0.96)
pt3dadd(43.7, -36.37, 10.4, 0.96)
pt3dadd(44.29, -35.78, 9.35, 1.11)
pt3dadd(44.96, -34.89, 9.2, 1.11)
pt3dadd(45.32, -33.71, 11.05, 1.11)
pt3dadd(46.36, -33.64, 13.05, 1.11)
pt3dadd(47.32, -33.93, 13.05, 1.11)
pt3dadd(48.06, -33.2, 13.05, 1.11)
pt3dadd(48.5, -32.53, 13.1, 1.11)
pt3dadd(49.46, -31.87, 13.1, 0.74)
pt3dadd(50.57, -32.24, 13.1, 0.74)
pt3dadd(51.68, -32.31, 13.1, 0.74)
pt3dadd(52.94, -32.68, 13.1, 0.74)
pt3dadd(53.6, -32.09, 13.55, 0.74)
pt3dadd(53.53, -31.28, 13.55, 0.74)
pt3dadd(53.09, -30.54, 13, 0.74)
pt3dadd(52.64, -29.95, 13.1, 0.74)
pt3dadd(52.64, -28.99, 13.8, 0.74)
pt3dadd(52.72, -27.81, 13.85, 0.74)
pt3dadd(53.53, -27.15, 13.9, 0.74)
pt3dadd(54.49, -26.71, 13.9, 0.74)
pt3dadd(55.38, -26.49, 13.9, 0.74)
}
dend[57] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(-2.56, -7.34, 11.1, 2.81)
pt3dadd(-2.93, -6.38, 11.1, 2.81)
pt3dadd(-2.48, -5.13, 11.1, 2.81)
pt3dadd(-2.41, -4.76, 13.35, 2.81)
pt3dadd(-1.67, -3.88, 13.3, 2.81)
}
dend[58] {pt3dclear()
pt3dadd(-1.67, -3.88, 13.3, 2.81)
pt3dadd(-2.33, -2.4, 13.3, 2.81)
pt3dadd(-2.85, -0.85, 13.3, 2.81)
pt3dadd(-3.15, -0.04, 14.85, 2.44)
pt3dadd(-3.52, 0.77, 15.3, 2.22)
pt3dadd(-3.3, 2.17, 15.35, 2.22)
pt3dadd(-3.3, 3.13, 13.8, 2.07)
pt3dadd(-3.59, 4.09, 13.3, 1.48)
pt3dadd(-3.89, 4.31, 13.25, 1.48)
pt3dadd(-4.18, 4.83, 13.2, 1.48)
pt3dadd(-4.33, 5.42, 13, 1.48)
pt3dadd(-4.48, 6.23, 12.9, 1.48)
}
}
proc shape3d_18() {
dend[58] { pt3dadd(-4.33, 7.26, 12.8, 1.48)
}
dend[59] {pt3dclear()
pt3dadd(-4.33, 7.26, 12.8, 0.81)
pt3dadd(-3.44, 7.85, 12.65, 0.81)
pt3dadd(-2.85, 8.07, 12.65, 0.81)
pt3dadd(-2.19, 8.37, 12.6, 0.81)
pt3dadd(-1.6, 8.44, 12.6, 0.81)
pt3dadd(-1, 8.22, 12.55, 0.81)
pt3dadd(-0.34, 7.85, 12.5, 0.81)
pt3dadd(0.18, 7.33, 12.4, 0.81)
pt3dadd(0.55, 7.63, 12.9, 0.81)
pt3dadd(1.14, 8.15, 12.95, 0.81)
pt3dadd(1.29, 8.88, 13.15, 0.81)
pt3dadd(0.99, 9.55, 14.05, 0.74)
pt3dadd(0.33, 9.99, 14.25, 0.74)
pt3dadd(-0.41, 10.73, 14.45, 0.74)
pt3dadd(-1.37, 10.87, 14.5, 0.74)
pt3dadd(-1.89, 11.32, 14.6, 0.74)
pt3dadd(-2.41, 11.61, 15.45, 0.74)
pt3dadd(-3.52, 12.13, 15.45, 0.74)
}
dend[60] {pt3dclear()
pt3dadd(-3.52, 12.13, 15.45, 0.74)
pt3dadd(-3.89, 13.38, 15.5, 0.74)
pt3dadd(-3.07, 13.68, 15.5, 0.74)
pt3dadd(-2.26, 14.41, 15.5, 0.74)
pt3dadd(-2.04, 15.15, 15.75, 0.74)
pt3dadd(-1.96, 16.04, 15.85, 0.59)
pt3dadd(-2.11, 16.7, 15.9, 0.59)
pt3dadd(-1.74, 17.44, 16.2, 0.59)
pt3dadd(-0.71, 18.1, 16.25, 0.59)
pt3dadd(-1.08, 18.4, 16.25, 0.59)
pt3dadd(-2.41, 18.62, 16.25, 0.59)
}
dend[61] {pt3dclear()
pt3dadd(-3.52, 12.13, 15.45, 0.59)
pt3dadd(-3.81, 11.69, 15.05, 0.59)
pt3dadd(-4.55, 11.46, 15, 0.59)
pt3dadd(-5.07, 11.83, 15.05, 0.59)
pt3dadd(-5.29, 12.2, 15.15, 0.59)
pt3dadd(-5.51, 12.72, 15.25, 0.59)
pt3dadd(-5.36, 13.82, 15.65, 0.59)
pt3dadd(-5.22, 14.49, 16, 0.59)
pt3dadd(-5.29, 15.45, 16.15, 0.59)
pt3dadd(-5.29, 16.18, 16.3, 0.52)
pt3dadd(-5.22, 16.85, 16.5, 0.52)
pt3dadd(-5.29, 17.59, 16.7, 0.52)
pt3dadd(-5.66, 18.03, 16.8, 0.52)
pt3dadd(-6.03, 18.69, 16.85, 0.52)
}
dend[62] {pt3dclear()
pt3dadd(-4.33, 7.26, 12.8, 0.74)
pt3dadd(-4.85, 7.41, 11.35, 0.74)
pt3dadd(-5.51, 7.78, 11.25, 0.74)
pt3dadd(-6.77, 8, 11.15, 0.74)
pt3dadd(-7.73, 7.63, 11.1, 0.96)
pt3dadd(-7.95, 8.66, 11.5, 0.96)
pt3dadd(-8.47, 9.4, 11.65, 0.96)
pt3dadd(-8.54, 10.36, 11.7, 0.96)
pt3dadd(-8.76, 10.95, 11.75, 0.96)
pt3dadd(-8.54, 11.83, 11.8, 0.96)
pt3dadd(-7.95, 12.57, 11.85, 0.96)
pt3dadd(-7.66, 13.38, 12, 0.96)
pt3dadd(-7.21, 14.41, 11.4, 0.96)
pt3dadd(-6.99, 15.08, 11.2, 0.96)
pt3dadd(-6.69, 15.96, 11.1, 0.96)
pt3dadd(-6.77, 16.7, 11, 0.96)
pt3dadd(-6.77, 17.66, 11.15, 0.96)
pt3dadd(-7.14, 18.4, 11.6, 0.96)
pt3dadd(-7.43, 19.58, 11.8, 0.96)
pt3dadd(-7.88, 20.68, 11.9, 0.96)
pt3dadd(-8.32, 21.49, 11.95, 0.96)
pt3dadd(-8.54, 22.45, 12, 0.96)
pt3dadd(-8.84, 23.04, 12, 0.96)
pt3dadd(-9.21, 23.78, 12.05, 0.96)
pt3dadd(-9.5, 24.52, 12.1, 0.96)
pt3dadd(-9.58, 25.26, 12.1, 0.96)
pt3dadd(-9.73, 26.14, 12.1, 0.96)
pt3dadd(-10.02, 27.17, 12.15, 0.96)
pt3dadd(-10.32, 27.91, 12.2, 0.96)
pt3dadd(-10.61, 28.57, 12.3, 0.96)
pt3dadd(-11.06, 29.61, 12.4, 0.96)
pt3dadd(-11.35, 30.57, 12.45, 0.96)
pt3dadd(-11.28, 31.08, 12.45, 0.96)
pt3dadd(-10.79, 31.7, 13.85, 0.96)
pt3dadd(-10.49, 32.51, 13.9, 0.96)
pt3dadd(-10.12, 33.54, 13.95, 0.96)
pt3dadd(-10.2, 34.28, 13.95, 0.96)
pt3dadd(-10.34, 34.72, 14, 0.96)
pt3dadd(-10.79, 35.61, 14, 0.96)
pt3dadd(-11.08, 36.34, 14, 0.96)
pt3dadd(-11.6, 37.01, 14.4, 0.96)
pt3dadd(-12.26, 37.23, 14.5, 0.96)
pt3dadd(-12.78, 37.3, 14.55, 0.96)
pt3dadd(-13.23, 37.45, 14.6, 0.96)
pt3dadd(-14.19, 37.67, 14.6, 0.96)
pt3dadd(-14.78, 37.97, 14.6, 0.96)
pt3dadd(-15.15, 38.63, 14.75, 0.96)
pt3dadd(-14.93, 39, 15.25, 0.96)
pt3dadd(-15.3, 39.96, 15.35, 0.96)
pt3dadd(-15.44, 40.99, 15.45, 0.96)
pt3dadd(-15.96, 42.02, 15.5, 0.96)
pt3dadd(-16.26, 42.69, 15.55, 0.96)
pt3dadd(-16.7, 43.35, 15.55, 0.96)
pt3dadd(-17.14, 44.01, 15.6, 0.96)
pt3dadd(-17.73, 44.38, 15.6, 0.96)
pt3dadd(-18.55, 44.75, 15.6, 0.96)
pt3dadd(-19.29, 45.19, 15.6, 0.96)
pt3dadd(-19.43, 45.41, 16, 0.96)
pt3dadd(-20.32, 46.45, 16.1, 0.96)
pt3dadd(-20.69, 47.11, 16.05, 0.96)
pt3dadd(-20.99, 47.92, 15.95, 0.96)
pt3dadd(-21.43, 48.29, 15.9, 0.96)
pt3dadd(-21.87, 48.59, 15.85, 0.96)
pt3dadd(-22.24, 49.25, 15.85, 0.96)
pt3dadd(-22.91, 49.77, 15.8, 0.96)
pt3dadd(-23.2, 50.5, 15.8, 0.96)
pt3dadd(-23.43, 51.31, 15.75, 0.96)
pt3dadd(-23.35, 52.2, 15.7, 0.96)
pt3dadd(-23.72, 52.86, 15.8, 0.96)
pt3dadd(-23.94, 53.45, 16, 0.96)
pt3dadd(-24.24, 54.12, 16.2, 0.96)
pt3dadd(-24.31, 54.85, 16.75, 0.96)
pt3dadd(-24.83, 55.52, 16.6, 0.96)
pt3dadd(-25.2, 55.96, 16.4, 0.96)
pt3dadd(-25.57, 56.48, 16.1, 0.96)
pt3dadd(-26.31, 56.99, 15.95, 0.96)
pt3dadd(-27.19, 57.66, 15.8, 0.96)
pt3dadd(-28.01, 58.54, 15.7, 0.96)
pt3dadd(-28.38, 58.84, 15.65, 0.96)
pt3dadd(-28.75, 59.72, 15.6, 0.96)
pt3dadd(-29.04, 60.46, 15.55, 0.96)
pt3dadd(-29.71, 61.05, 15.55, 0.96)
pt3dadd(-30.08, 61.57, 15.55, 0.96)
pt3dadd(-30.37, 62.38, 15.5, 0.96)
pt3dadd(-30.4, 63.15, 16.1, 0.96)
pt3dadd(-30.69, 63.67, 16.2, 0.96)
pt3dadd(-30.99, 64.33, 16.1, 0.96)
pt3dadd(-31.28, 64.77, 15.9, 0.96)
pt3dadd(-31.87, 64.92, 15.85, 0.96)
pt3dadd(-32.61, 65.29, 15.8, 0.96)
pt3dadd(-33.35, 65.51, 15.8, 0.96)
pt3dadd(-34.09, 65.8, 15.75, 0.96)
pt3dadd(-34.61, 66.03, 15.75, 0.96)
pt3dadd(-35.2, 66.69, 15.75, 0.96)
pt3dadd(-36.09, 67.65, 15.75, 1.18)
pt3dadd(-36.46, 68.83, 15.7, 1.55)
pt3dadd(-36.46, 70.08, 15.7, 1.55)
pt3dadd(-37.12, 71.11, 15.7, 0.74)
pt3dadd(-37.49, 71.56, 15.7, 0.74)
pt3dadd(-38.08, 71.93, 15.7, 0.74)
pt3dadd(-38.75, 72.15, 15.7, 0.74)
pt3dadd(-39.56, 72.37, 15.7, 1.11)
pt3dadd(-40.23, 72.74, 15.7, 1.11)
pt3dadd(-40.23, 73.55, 15.7, 1.11)
pt3dadd(-39.86, 74.43, 15.65, 1.11)
}
dend[63] {pt3dclear()
pt3dadd(-1.67, -3.88, 13.3, 0.67)
pt3dadd(-0.64, -4.32, 11.55, 0.67)
pt3dadd(0.91, -4.25, 11.65, 0.67)
pt3dadd(1.65, -3.44, 13.15, 0.67)
pt3dadd(2.54, -2.55, 13.25, 0.67)
pt3dadd(2.76, -1.52, 13.4, 0.67)
pt3dadd(2.76, -0.78, 13.5, 0.67)
pt3dadd(1.95, -0.12, 13.7, 0.67)
pt3dadd(1.28, 0.03, 13.85, 0.67)
pt3dadd(0.25, 0.77, 12.9, 0.67)
pt3dadd(-0.27, 1.06, 12.8, 0.67)
pt3dadd(-1.01, 1.51, 13, 0.67)
pt3dadd(-2.34, 1.58, 14.9, 0.67)
pt3dadd(-3, 1.43, 14.95, 0.67)
pt3dadd(-3.74, 1.65, 15, 0.81)
pt3dadd(-4.19, 2.02, 15, 0.96)
pt3dadd(-4.85, 2.24, 15.05, 1.18)
pt3dadd(-5.37, 2.54, 15.05, 1.18)
}
dend[64] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(8.97, -6.61, 10.2, 1.18)
pt3dadd(9.71, -5.94, 10.3, 1.18)
pt3dadd(9.93, -5.28, 9.4, 1.18)
pt3dadd(10.37, -4.76, 9.3, 1.18)
pt3dadd(11.26, -4.91, 9.25, 1.18)
pt3dadd(12.3, -5.21, 9.2, 1.18)
pt3dadd(12.81, -4.1, 7.95, 1.18)
pt3dadd(12.74, -3.36, 11.25, 1.18)
pt3dadd(12.3, -2.55, 11.45, 1.18)
pt3dadd(11.7, -2.4, 12.65, 1.18)
}
dend[65] {pt3dclear()
pt3dadd(11.7, -2.4, 12.65, 0.89)
pt3dadd(11.78, -1.37, 13.05, 0.89)
pt3dadd(11.41, -0.78, 13.15, 0.89)
pt3dadd(10.89, -0.34, 13.2, 0.89)
pt3dadd(10.67, 0.4, 13.2, 0.89)
pt3dadd(10.74, 1.21, 13.25, 0.89)
pt3dadd(11.11, 1.8, 13.25, 0.89)
pt3dadd(11.48, 2.46, 13.3, 0.89)
pt3dadd(12.15, 2.91, 13.35, 0.89)
pt3dadd(12.66, 3.79, 13.65, 0.89)
pt3dadd(12.89, 4.46, 13.7, 0.89)
pt3dadd(13.33, 5.41, 13.75, 0.89)
pt3dadd(13.55, 6.08, 13.75, 0.89)
pt3dadd(13.63, 7.48, 13.75, 0.89)
pt3dadd(13.63, 8.29, 14.35, 0.74)
pt3dadd(13.48, 8.81, 14.35, 0.74)
pt3dadd(13.03, 9.62, 14.35, 0.74)
pt3dadd(12.66, 10.28, 14.35, 0.74)
pt3dadd(12.52, 11.17, 14.35, 0.74)
pt3dadd(13.4, 11.9, 15.05, 0.74)
pt3dadd(14.22, 12.72, 15.05, 0.74)
pt3dadd(14.44, 13.97, 15.05, 0.74)
}
}
proc shape3d_19() {
dend[65] { pt3dadd(13.63, 14.56, 15.05, 0.74)
}
dend[66] {pt3dclear()
pt3dadd(11.7, -2.4, 12.65, 0.96)
pt3dadd(11.33, -2.4, 14.15, 0.96)
pt3dadd(10.52, -2.7, 14.1, 0.96)
pt3dadd(9.71, -2.55, 14.1, 0.96)
pt3dadd(9.19, -2.26, 14.1, 0.96)
pt3dadd(8.9, -1.81, 14.1, 0.96)
pt3dadd(8.97, -0.85, 13.9, 0.96)
pt3dadd(9.12, 0.1, 14.5, 0.96)
pt3dadd(8.97, 1.14, 14.6, 0.96)
pt3dadd(8.75, 1.36, 14.6, 0.96)
pt3dadd(8.75, 2.24, 14.65, 0.96)
pt3dadd(8.67, 3.28, 14.65, 0.96)
pt3dadd(7.93, 3.42, 14.7, 0.96)
pt3dadd(7.12, 3.79, 15.25, 0.96)
pt3dadd(5.94, 3.28, 15.3, 0.96)
pt3dadd(4.98, 3.79, 15.3, 0.96)
pt3dadd(4.76, 4.09, 15.3, 0.96)
}
dend[67] {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(11.56, -21.43, 6.65, 1.33)
pt3dadd(12.44, -21.5, 6.85, 1.55)
pt3dadd(13.4, -21.13, 7, 1.55)
pt3dadd(14.07, -20.54, 7.15, 1.55)
pt3dadd(14.81, -20.18, 7.25, 1.55)
pt3dadd(15.77, -19.66, 7.45, 1.55)
pt3dadd(16.29, -19, 7.65, 1.55)
pt3dadd(16.95, -18.18, 7.95, 1.55)
pt3dadd(17.69, -17.3, 8, 1.55)
pt3dadd(18.43, -16.71, 8.05, 1.55)
pt3dadd(19.54, -16.05, 8.05, 1.33)
pt3dadd(19.91, -15.31, 8.05, 1.33)
pt3dadd(21.02, -14.94, 8.1, 1.33)
pt3dadd(22.49, -14.79, 8.2, 1.33)
pt3dadd(23.31, -15.09, 8.25, 1.33)
pt3dadd(24.42, -15.31, 8.8, 1.33)
pt3dadd(25.3, -15.38, 8.8, 1.33)
pt3dadd(26.34, -15.68, 8.95, 1.33)
pt3dadd(26.86, -15.68, 9.15, 1.33)
pt3dadd(27.96, -15.53, 9.2, 1.33)
pt3dadd(28.92, -15.46, 9.7, 1.26)
pt3dadd(29.81, -16.27, 9.7, 1.11)
pt3dadd(30.55, -16.49, 9.7, 1.11)
pt3dadd(31.29, -16.71, 9.75, 1.11)
pt3dadd(32.1, -17.15, 9.8, 0.96)
pt3dadd(33.14, -17.23, 9.6, 0.96)
pt3dadd(33.29, -16.71, 9.5, 0.96)
pt3dadd(33.51, -15.53, 9.4, 0.96)
pt3dadd(34.1, -15.01, 9.35, 0.96)
pt3dadd(34.54, -14.87, 9.3, 0.96)
pt3dadd(35.35, -15.01, 9.3, 0.96)
pt3dadd(35.8, -16.12, 9.3, 0.96)
pt3dadd(34.99, -17.15, 9.3, 0.96)
pt3dadd(35.06, -17.96, 10.5, 0.67)
pt3dadd(35.35, -18.55, 10.6, 0.67)
pt3dadd(35.5, -19.44, 11.85, 0.81)
pt3dadd(36.46, -20.25, 11.85, 0.81)
pt3dadd(37.5, -20.91, 12, 0.81)
pt3dadd(38.02, -21.43, 12.05, 0.81)
}
dend[68] {pt3dclear()
pt3dadd(38.02, -21.43, 12.05, 0.81)
pt3dadd(38.98, -20.99, 12.55, 0.81)
pt3dadd(39.57, -20.4, 13.15, 0.81)
pt3dadd(40.23, -19.66, 12.95, 0.81)
pt3dadd(40.45, -18.55, 12.85, 0.81)
pt3dadd(40.31, -17.59, 12.2, 0.81)
pt3dadd(40.08, -16.49, 12.1, 0.81)
pt3dadd(40.9, -15.68, 11.45, 0.81)
pt3dadd(41.34, -15.46, 13.7, 0.81)
pt3dadd(42.45, -14.79, 13.8, 0.81)
pt3dadd(43.12, -13.61, 13.9, 0.81)
pt3dadd(43.34, -12.8, 13.95, 0.81)
pt3dadd(44.15, -11.84, 14.1, 0.81)
pt3dadd(45.04, -11.25, 15.1, 0.81)
pt3dadd(46.15, -11.47, 15.15, 0.81)
pt3dadd(46.57, -11.88, 15.3, 0.81)
pt3dadd(48.04, -12.98, 15.35, 0.81)
}
dend[69] {pt3dclear()
pt3dadd(38.02, -21.43, 12.05, 0.67)
pt3dadd(37.77, -20.51, 13.9, 0.67)
pt3dadd(38.29, -19.62, 13.9, 0.67)
pt3dadd(38.88, -19.11, 13.95, 0.67)
pt3dadd(38.81, -18.15, 13.95, 0.67)
pt3dadd(39.03, -17.48, 14.55, 0.67)
pt3dadd(39.25, -16.6, 14.45, 0.67)
pt3dadd(39.69, -15.71, 14.1, 0.67)
pt3dadd(40.36, -15.42, 14.05, 0.67)
pt3dadd(41.39, -14.53, 14, 0.67)
pt3dadd(41.47, -13.43, 13.95, 0.67)
pt3dadd(41.84, -12.69, 13.95, 0.67)
pt3dadd(42.06, -11.66, 14.65, 0.67)
pt3dadd(42.2, -10.92, 14.7, 0.67)
pt3dadd(41.84, -10.26, 14.7, 0.67)
pt3dadd(42.2, -9.37, 14.65, 0.67)
pt3dadd(41.84, -8.56, 14.55, 0.67)
pt3dadd(41.84, -7.97, 14.55, 0.67)
}
apic {pt3dclear()
pt3dstyle(1, 2.46875, -16.651, -0.0282026)
pt3dadd(4.37, -2.27, -0.35, 10.13)
pt3dadd(4.51, -0.87, -0.35, 9.16)
pt3dadd(4.59, 1.04, -0.35, 8.87)
pt3dadd(4.73, 4.29, -0.9, 7.76)
pt3dadd(5.47, 6.58, -0.25, 7.61)
}
apic[1] {pt3dclear()
pt3dadd(5.47, 6.58, -0.25, 7.61)
pt3dadd(5.99, 9.82, -0.25, 7.61)
pt3dadd(6.51, 13.43, -0.25, 7.61)
pt3dadd(7.03, 16.31, -0.25, 7.61)
pt3dadd(8.06, 19.78, -0.1, 7.46)
pt3dadd(8.65, 22.21, 0.25, 7.24)
pt3dadd(9.24, 25.01, 1.05, 6.43)
pt3dadd(10.13, 28.33, 1.05, 6.43)
pt3dadd(10.72, 30.77, 1.05, 6.43)
pt3dadd(11.24, 33.27, 2.45, 6.43)
pt3dadd(11.52, 36.27, 2.5, 6.43)
pt3dadd(12.48, 39.29, 2.5, 6.43)
pt3dadd(12.41, 42.46, 2.5, 6.43)
pt3dadd(12.56, 44.97, 2.7, 6.43)
pt3dadd(12.56, 47.26, 2.7, 6.28)
}
apic[2] {pt3dclear()
pt3dadd(12.56, 47.26, 2.7, 6.28)
pt3dadd(12.7, 49.03, 2.5, 6.28)
pt3dadd(12.4, 50.92, 2.5, 6.28)
}
apic[3] {pt3dclear()
pt3dadd(12.4, 50.92, 2.5, 6.28)
pt3dadd(12.33, 52.49, 2.55, 6.28)
pt3dadd(12.63, 54.11, 2.35, 6.28)
pt3dadd(13.15, 56.1, 2.45, 6.43)
pt3dadd(13.44, 57.65, 2.45, 6.43)
}
apic[4] {pt3dclear()
pt3dadd(13.44, 57.65, 2.45, 6.43)
pt3dadd(13.89, 59.13, 2.45, 6.43)
pt3dadd(14.7, 61.27, 2.5, 5.99)
pt3dadd(15.29, 63.04, 2.5, 5.99)
pt3dadd(15.73, 64.59, 2.5, 5.99)
pt3dadd(16.55, 66.28, 2.5, 5.99)
}
apic[5] {pt3dclear()
pt3dadd(16.55, 66.28, 2.5, 5.99)
pt3dadd(16.87, 69.09, 2.65, 5.99)
pt3dadd(17.17, 71.82, 2.7, 5.99)
pt3dadd(17.47, 74.25, 2.75, 5.99)
pt3dadd(17.47, 76.17, 2.8, 5.99)
pt3dadd(17.61, 78.38, 2.8, 5.99)
pt3dadd(17.76, 80.08, 2.8, 5.99)
pt3dadd(17.98, 82.07, 2.85, 5.99)
pt3dadd(18.06, 84.06, 2.85, 5.99)
pt3dadd(18.28, 85.76, 2.85, 5.99)
pt3dadd(18.5, 87.16, 2.85, 5.99)
}
apic[6] {pt3dclear()
pt3dadd(18.5, 87.16, 2.85, 5.62)
pt3dadd(19.68, 89.3, 2.85, 5.62)
pt3dadd(20.57, 91.88, 2.85, 5.62)
pt3dadd(21.01, 94.16, 2.85, 5.47)
pt3dadd(21.31, 95.79, 2.85, 5.47)
pt3dadd(21.53, 97.41, 2.85, 5.47)
pt3dadd(22.14, 99.6, 3.35, 5.47)
pt3dadd(22.66, 101.37, 3.35, 5.47)
pt3dadd(22.96, 103.73, 3.35, 5.47)
pt3dadd(23.62, 105.8, 3.35, 5.47)
pt3dadd(24.66, 107.42, 3.35, 5.17)
pt3dadd(25.4, 109.26, 3.35, 5.17)
pt3dadd(25.77, 110.96, 3.35, 5.17)
pt3dadd(26.36, 112.88, 3.35, 5.1)
pt3dadd(26.36, 114.87, 3.35, 5.1)
pt3dadd(26.36, 117.01, 3.35, 5.1)
pt3dadd(26.8, 118.85, 3.35, 5.1)
pt3dadd(27.1, 120.55, 3.35, 5.1)
pt3dadd(27.76, 122.54, 3.35, 5.1)
pt3dadd(28.35, 124.6, 4.1, 4.8)
pt3dadd(28.57, 126.45, 4.1, 4.8)
pt3dadd(28.57, 127.85, 4.1, 4.8)
pt3dadd(28.2, 129.1, 4.15, 4.8)
pt3dadd(28.07, 130.31, 4.15, 5.1)
pt3dadd(28.22, 133.19, 4.15, 5.25)
pt3dadd(28.74, 135.84, 4.15, 5.25)
pt3dadd(29.4, 137.98, 4.15, 5.25)
pt3dadd(30.14, 140.27, 4.15, 5.25)
pt3dadd(30.51, 142.7, 4.15, 5.25)
pt3dadd(30.66, 144.69, 4.15, 5.4)
pt3dadd(31.25, 146.61, 4.15, 5.4)
pt3dadd(31.77, 148.53, 4.15, 5.4)
}
apic[7] {pt3dclear()
pt3dadd(31.77, 148.53, 4.15, 5.4)
pt3dadd(32.21, 151.04, 4.15, 5.4)
pt3dadd(32.51, 153.03, 4.85, 5.4)
pt3dadd(33.25, 154.8, 4.9, 5.4)
pt3dadd(33.54, 157.08, 4.9, 5.54)
pt3dadd(33.77, 158.56, 4.9, 5.54)
pt3dadd(33.84, 159.67, 4.9, 5.54)
pt3dadd(33.91, 160.55, 4.9, 5.54)
pt3dadd(34.37, 162.92, 4.2, 5.69)
pt3dadd(34.66, 164.69, 4.1, 6.06)
pt3dadd(34.66, 166.31, 4.05, 6.28)
pt3dadd(34.96, 167.49, 4, 6.28)
}
apic[8] {pt3dclear()
pt3dadd(34.96, 167.49, 4, 6.5)
pt3dadd(35.62, 170.37, 3.95, 6.5)
pt3dadd(35.55, 172.36, 3.7, 6.5)
pt3dadd(35.7, 173.83, 3.65, 6.21)
pt3dadd(36.43, 175.68, 3.6, 5.99)
pt3dadd(37.1, 177.67, 3.6, 5.99)
pt3dadd(37.91, 179.73, 2.7, 5.99)
pt3dadd(38.43, 181.36, 2.8, 5.99)
pt3dadd(38.87, 183.5, 2.85, 5.99)
pt3dadd(39.24, 185.34, 2.85, 5.99)
pt3dadd(39.39, 186.81, 2.85, 5.99)
pt3dadd(39.83, 188.81, 2.85, 5.99)
pt3dadd(40.8, 189.91, 2.85, 5.99)
pt3dadd(41.83, 191.24, 2.85, 5.99)
pt3dadd(43.09, 193.3, 2.9, 5.54)
pt3dadd(44.08, 194.94, 2.9, 5.1)
pt3dadd(44.38, 196.93, 2.9, 5.1)
}
}
proc shape3d_20() {
apic[8] { pt3dadd(44.75, 198.7, 2.9, 5.1)
pt3dadd(45.27, 200.77, 2.9, 5.1)
pt3dadd(46.67, 202.98, 2.9, 5.1)
pt3dadd(47.19, 205.04, 1.55, 5.47)
pt3dadd(47.48, 206.67, 1.45, 5.47)
pt3dadd(47.56, 208.21, 1.45, 5.47)
pt3dadd(48.22, 209.84, 1.4, 5.47)
pt3dadd(48.44, 212.05, 1.4, 5.47)
pt3dadd(48.74, 214.04, 1.4, 5.47)
pt3dadd(48.37, 216.03, 1.4, 5.47)
pt3dadd(48.07, 217.43, 1.4, 5.47)
pt3dadd(48.22, 218.54, 1.4, 5.47)
pt3dadd(48, 219.72, 1.4, 5.47)
pt3dadd(48.44, 221.05, 1.4, 5.47)
pt3dadd(48.37, 222.52, 1.35, 5.47)
pt3dadd(48.37, 223.63, 1.35, 5.47)
pt3dadd(48.44, 224.59, 1.35, 5.47)
pt3dadd(48.74, 225.69, 1.35, 5.47)
pt3dadd(48.57, 226.94, 5.25, 5.47)
}
apic[9] {pt3dclear()
pt3dadd(48.57, 226.94, 5.25, 5.47)
pt3dadd(49.39, 229.15, 3.1, 5.47)
pt3dadd(49.83, 230.55, 2.95, 5.47)
pt3dadd(50.13, 232.4, 2.9, 5.47)
pt3dadd(50.35, 234.09, 2.9, 5.47)
pt3dadd(50.05, 235.72, 2.85, 5.47)
pt3dadd(50.42, 237.34, 2.85, 5.47)
pt3dadd(49.98, 239.11, 2.85, 5.47)
pt3dadd(49.76, 240.73, 2.85, 5.47)
pt3dadd(49.76, 242.72, 2.85, 5.47)
pt3dadd(49.68, 244.34, 2.85, 5.47)
pt3dadd(49.83, 246.11, 2, 5.47)
pt3dadd(49.68, 248.03, 2.05, 5.47)
pt3dadd(49.61, 249.36, 2.1, 5.47)
pt3dadd(49.39, 250.83, 2.15, 5.47)
pt3dadd(49.61, 252.53, 2.15, 5.47)
pt3dadd(49.76, 253.78, 2.15, 5.47)
pt3dadd(49.98, 254.89, 2.15, 5.47)
pt3dadd(50.64, 256.22, 2.15, 5.47)
pt3dadd(51.09, 257.84, 2.15, 5.47)
pt3dadd(51.47, 259.82, 1, 5.47)
pt3dadd(51.76, 261.59, 1.2, 5.47)
pt3dadd(51.54, 262.7, 1.25, 5.47)
pt3dadd(51.54, 264.77, 1.3, 5.62)
pt3dadd(51.69, 266.54, 1.3, 5.62)
pt3dadd(52.06, 268.16, 1.3, 5.62)
pt3dadd(52.28, 269.49, 1.3, 5.62)
pt3dadd(52.28, 271.03, 1.3, 5.62)
pt3dadd(52.94, 272.58, 1.3, 5.62)
pt3dadd(52.8, 273.91, 1.3, 5.62)
pt3dadd(52.72, 275.61, 1.3, 5.62)
pt3dadd(52.72, 277.16, 1.3, 5.62)
pt3dadd(52.35, 278.78, 1.3, 5.62)
pt3dadd(52.13, 280.18, 1.3, 5.62)
pt3dadd(52.13, 281.58, 1.3, 5.62)
pt3dadd(51.84, 282.83, 1.3, 5.62)
pt3dadd(51.84, 284.31, 1.3, 5.62)
pt3dadd(51.84, 285.49, 1.3, 5.62)
pt3dadd(51.91, 286.67, 1.3, 5.62)
pt3dadd(51.47, 287.78, 1.3, 5.62)
pt3dadd(51.54, 288.44, 1.3, 5.62)
pt3dadd(51.91, 289.55, 1.3, 5.62)
pt3dadd(51.75, 291.82, 1.3, 5.62)
pt3dadd(51.97, 293.82, 1.3, 5.62)
pt3dadd(51.97, 295.14, 1.3, 5.62)
pt3dadd(52.12, 296.32, 1.3, 5.62)
pt3dadd(52.12, 297.58, 1.3, 5.62)
pt3dadd(52.12, 298.68, 1.3, 5.62)
pt3dadd(52.49, 300.01, 1.3, 5.62)
pt3dadd(52.94, 301.34, 1.3, 5.62)
pt3dadd(53.23, 302.67, 1.3, 5.62)
pt3dadd(53.38, 303.85, 1.3, 5.62)
pt3dadd(53.08, 305.17, 1.3, 5.62)
pt3dadd(53.53, 307.02, 1.3, 5.62)
pt3dadd(52.94, 308.2, 1.3, 5.62)
pt3dadd(52.79, 309.67, 1.3, 5.62)
pt3dadd(52.86, 311.07, 1.3, 5.62)
pt3dadd(52.71, 312.62, 1.3, 5.62)
pt3dadd(52.79, 313.95, 1.3, 5.62)
pt3dadd(52.86, 315.2, 1.3, 5.62)
pt3dadd(53.08, 316.53, 1.3, 5.62)
pt3dadd(53.01, 317.93, 1.3, 5.62)
pt3dadd(53.08, 318.82, 1.3, 5.62)
pt3dadd(52.79, 320, 1.3, 5.62)
pt3dadd(53.01, 321.55, 1.3, 5.62)
pt3dadd(53.34, 322.87, 1.3, 5.62)
pt3dadd(53.71, 324.12, 1.3, 5.62)
pt3dadd(53.79, 325.52, 1.3, 5.4)
pt3dadd(53.42, 327, 1.3, 5.4)
pt3dadd(53.71, 328.77, 1.3, 5.4)
pt3dadd(53.49, 330.46, 1.3, 5.4)
pt3dadd(53.34, 332.45, 1.3, 5.25)
pt3dadd(53.34, 333.56, 1.3, 5.25)
pt3dadd(52.75, 334.96, 1.3, 5.25)
pt3dadd(52.46, 336.51, 1.3, 5.25)
pt3dadd(51.35, 337.76, 1.3, 5.25)
pt3dadd(50.83, 338.87, 1.3, 5.25)
pt3dadd(50.24, 340.79, 1.3, 5.25)
pt3dadd(49.94, 342.48, 1.3, 5.25)
pt3dadd(49.35, 344.4, 1.3, 5.25)
pt3dadd(48.76, 345.73, 1.3, 5.25)
pt3dadd(48.47, 347.06, 1.3, 5.25)
pt3dadd(48.17, 348.24, 1.3, 5.25)
pt3dadd(47.65, 349.34, 1.3, 5.25)
pt3dadd(47.28, 350.6, 1.3, 5.25)
pt3dadd(46.69, 352, 1.3, 5.25)
pt3dadd(46.4, 353.03, 1.3, 5.25)
pt3dadd(46.18, 354.13, 1.3, 5.25)
pt3dadd(45.96, 355.09, 1.35, 5.25)
pt3dadd(45.74, 356.64, 1.35, 5.25)
}
apic[10] {pt3dclear()
pt3dadd(45.74, 356.64, 1.35, 5.25)
pt3dadd(45.07, 358.63, 1.35, 5.25)
pt3dadd(44.7, 360.03, 1.35, 5.1)
pt3dadd(44.18, 362.02, 1.35, 4.95)
pt3dadd(43.96, 363.57, 1.35, 4.95)
pt3dadd(43.59, 365.49, 1.35, 4.95)
pt3dadd(43.22, 367.03, 1.35, 4.95)
pt3dadd(42.78, 368.29, 1.35, 4.95)
pt3dadd(42.19, 369.76, 1.35, 4.95)
pt3dadd(41.82, 370.94, 1.35, 4.95)
pt3dadd(41.6, 372.2, 1.35, 4.95)
pt3dadd(41.6, 373.23, 1.35, 4.95)
pt3dadd(41.3, 374.63, 1.35, 4.95)
pt3dadd(40.86, 375.66, 1.35, 4.95)
pt3dadd(40.64, 376.92, 1.35, 4.95)
pt3dadd(40.04, 378.17, 1.35, 4.95)
pt3dadd(39.38, 379.28, 1.35, 4.95)
pt3dadd(38.94, 380.38, 1.35, 4.8)
pt3dadd(38.49, 381.19, 1.35, 4.8)
pt3dadd(38.12, 382.74, 1.35, 4.8)
pt3dadd(38.34, 383.78, 1.35, 4.8)
pt3dadd(38.42, 384.81, 1.35, 4.8)
pt3dadd(39.12, 387.05, 1.35, 4.8)
pt3dadd(39.41, 388.01, 1.35, 4.8)
pt3dadd(39.71, 389.56, 1.35, 4.8)
pt3dadd(40.08, 390.66, 1.35, 4.8)
pt3dadd(40.15, 392.14, 1.35, 4.8)
pt3dadd(40.08, 393.25, 1.35, 4.8)
pt3dadd(40.23, 394.35, 1.35, 4.8)
pt3dadd(39.56, 395.68, 1.35, 4.8)
pt3dadd(39.19, 396.93, 1.35, 4.8)
pt3dadd(39.27, 398.41, 1.35, 4.8)
pt3dadd(39.27, 400.1, 1.35, 4.8)
pt3dadd(40.23, 401.58, 1.35, 4.8)
pt3dadd(40.6, 402.98, 1.35, 4.8)
pt3dadd(41.04, 404.9, 1.35, 4.8)
pt3dadd(41.41, 406.3, 1.35, 4.8)
pt3dadd(41.93, 408, 1.35, 4.8)
pt3dadd(42.07, 409.25, 1.35, 4.8)
pt3dadd(42.44, 410.65, 1.35, 4.8)
pt3dadd(43.33, 411.83, 1.35, 4.8)
pt3dadd(43.63, 413.01, 1.35, 4.8)
pt3dadd(44.07, 414.26, 1.35, 4.8)
pt3dadd(44.96, 415, 1.35, 4.8)
pt3dadd(45.25, 415.67, 1.35, 4.8)
pt3dadd(45.84, 416.7, 1.35, 4.8)
pt3dadd(47.74, 417.73, 1.35, 4.8)
pt3dadd(49.67, 419.42, -2.25, 4.8)
pt3dadd(50.92, 420.38, -2.4, 4.8)
pt3dadd(52.03, 421.34, -2.45, 4.8)
pt3dadd(53.07, 422.45, -2.45, 4.8)
pt3dadd(54.25, 423.26, -2.45, 4.8)
pt3dadd(55.5, 423.78, -2.5, 4.58)
pt3dadd(56.98, 424.37, -2.5, 4.06)
pt3dadd(58.24, 425.03, -2.5, 4.06)
pt3dadd(59.57, 425.99, -2.55, 3.84)
pt3dadd(59.72, 427.32, -5.35, 3.84)
pt3dadd(60.16, 428.72, -5.25, 3.84)
pt3dadd(59.94, 429.68, -4.9, 3.84)
pt3dadd(59.5, 431, -4.35, 3.84)
pt3dadd(58.68, 432.11, -4.15, 3.84)
pt3dadd(58.02, 433.14, -3.85, 3.84)
pt3dadd(57.5, 433.81, -3.7, 3.84)
pt3dadd(56.02, 434.99, -2.1, 3.84)
pt3dadd(54.99, 435.87, -1.65, 3.84)
pt3dadd(53.58, 436.98, -1.15, 3.84)
}
apic[11] {pt3dclear()
pt3dadd(53.58, 436.98, -1.15, 3.84)
pt3dadd(53.29, 439.41, 0.7, 3.84)
pt3dadd(52.99, 440.59, 0.7, 3.84)
pt3dadd(52.55, 441.92, 0.75, 3.84)
pt3dadd(51.81, 443.61, 0.75, 3.84)
pt3dadd(51.51, 444.72, 0.75, 3.84)
pt3dadd(51, 445.75, 0.75, 3.84)
pt3dadd(50.26, 446.42, 0.75, 3.84)
}
apic[12] {pt3dclear()
pt3dadd(50.26, 446.42, 0.75, 2.29)
pt3dadd(51.22, 447.38, 0.85, 2.29)
pt3dadd(51.22, 448.04, 0.9, 2.29)
pt3dadd(51.44, 448.78, 0.9, 2.29)
pt3dadd(51.72, 449.87, 1.45, 2.29)
pt3dadd(51.72, 450.6, 1.5, 2.29)
pt3dadd(52.31, 451.71, 0.05, 2.29)
pt3dadd(52.53, 452.67, -0.1, 2.29)
pt3dadd(53.34, 453.7, -0.3, 2.29)
pt3dadd(54.08, 454.59, -0.4, 2.29)
pt3dadd(54.82, 455.47, -0.4, 2.29)
pt3dadd(56.08, 456.43, -0.45, 2.29)
pt3dadd(57.7, 456.72, -0.45, 2.29)
pt3dadd(58.81, 457.09, -0.45, 2.29)
pt3dadd(60.07, 457.17, -0.45, 2.29)
pt3dadd(61.03, 457.9, -0.5, 2.14)
pt3dadd(62.36, 459.08, -1.95, 2.14)
}
}
proc shape3d_21() {
apic[12] { pt3dadd(62.58, 460.34, -2, 2.14)
pt3dadd(63.1, 461.3, -2.4, 2.29)
pt3dadd(63.17, 462.55, -2.5, 2.29)
pt3dadd(63.1, 463.44, -2.5, 2.29)
pt3dadd(63.62, 464.54, -2.4, 2.29)
pt3dadd(64.06, 465.94, -2.05, 2.29)
pt3dadd(64.58, 466.98, -2, 2.29)
pt3dadd(65.02, 467.57, -0.45, 2.29)
pt3dadd(65.39, 468.67, -0.3, 2.29)
pt3dadd(66.28, 470, -0.2, 2.29)
pt3dadd(66.87, 471.25, -0.15, 2.29)
pt3dadd(67.24, 472.21, -0.15, 2.29)
pt3dadd(67.76, 473.1, -0.15, 2.29)
pt3dadd(68.2, 474.06, -0.1, 2.29)
pt3dadd(68.35, 475.31, -0.1, 2.44)
pt3dadd(68.35, 476.49, -0.1, 2.44)
pt3dadd(69.23, 477.82, -0.1, 2.44)
pt3dadd(69.31, 478.78, -0.1, 2.44)
pt3dadd(69.16, 479.96, -0.1, 2.44)
pt3dadd(68.43, 481.26, 0.1, 2.44)
pt3dadd(68.5, 482.66, 0.7, 2.44)
pt3dadd(68.28, 484.06, 0.8, 2.44)
pt3dadd(67.99, 484.87, 0.85, 2.44)
pt3dadd(68.06, 486.05, 0.85, 2.44)
pt3dadd(67.99, 487.09, 0.9, 2.44)
pt3dadd(67.62, 488.12, 0.9, 2.44)
pt3dadd(67.17, 489.3, 0.9, 2.44)
pt3dadd(66.73, 490.55, 0.95, 2.44)
pt3dadd(66.44, 491.51, 0.95, 2.44)
pt3dadd(65.62, 492.54, 0.95, 2.44)
pt3dadd(65.18, 493.72, 0.95, 2.44)
pt3dadd(64.44, 494.83, 0.95, 2.44)
pt3dadd(63.85, 495.86, 0.95, 2.44)
pt3dadd(63.18, 497.56, 0.95, 2.44)
pt3dadd(62.89, 498.52, 0.95, 2.44)
pt3dadd(62.44, 499.4, 0.95, 2.44)
pt3dadd(61.93, 500.51, 0.95, 2.44)
pt3dadd(61.56, 501.47, 1.05, 2.44)
pt3dadd(61.26, 502.5, 1.15, 2.44)
pt3dadd(61.34, 504.05, 1.3, 2.44)
pt3dadd(61.04, 505.67, 1.35, 2.44)
pt3dadd(60.97, 507, 1.4, 2.44)
pt3dadd(61.34, 508.33, 1.4, 2.44)
pt3dadd(62, 509.51, 1.4, 2.44)
pt3dadd(62.22, 510.17, 1.45, 2.44)
pt3dadd(62.74, 511.35, 1.45, 2.44)
pt3dadd(62.95, 513.33, 1.6, 2.44)
pt3dadd(63.76, 514.44, 1.65, 2.44)
pt3dadd(64.87, 515.77, 1.65, 2.44)
pt3dadd(65.24, 517.32, 1.65, 2.44)
pt3dadd(65.98, 518.5, 1.65, 2.44)
pt3dadd(67.01, 519.68, 1.65, 2.44)
pt3dadd(67.68, 520.86, 1.95, 2.44)
pt3dadd(67.9, 522.48, 0.7, 2.44)
pt3dadd(68.2, 523.59, 0.5, 2.44)
pt3dadd(68.27, 524.69, 0.4, 2.44)
pt3dadd(68.27, 525.65, 0.25, 2.44)
pt3dadd(67.83, 526.9, 0.1, 2.44)
pt3dadd(67.6, 527.86, 0, 2.22)
pt3dadd(67.16, 528.82, -0.1, 2.22)
pt3dadd(66.72, 529.56, -0.35, 2.22)
pt3dadd(66.13, 530.67, -0.6, 2.22)
pt3dadd(65.46, 531.92, -0.85, 2.22)
pt3dadd(65.02, 533.1, -1.15, 2.22)
pt3dadd(65.02, 534.35, -1.25, 2.22)
pt3dadd(64.2, 535.68, -1.3, 2.22)
pt3dadd(63.54, 536.86, -1.45, 2.22)
pt3dadd(63.1, 537.67, -1.5, 2.22)
pt3dadd(62.8, 538.85, -1.5, 2.22)
pt3dadd(62.95, 539.74, -1.55, 2.22)
pt3dadd(62.73, 541.21, -1.55, 2.22)
pt3dadd(62.65, 542.32, -1.6, 2.22)
pt3dadd(62.58, 543.2, -1.6, 2.22)
pt3dadd(62.84, 544.62, -1.6, 2.22)
pt3dadd(62.7, 546.09, -1.65, 2.22)
pt3dadd(63.51, 547.2, -1.65, 2.66)
pt3dadd(63.88, 548.45, -1.65, 2.66)
pt3dadd(64.32, 549.56, -1.65, 2.66)
pt3dadd(64.77, 550.74, -1.65, 2.66)
pt3dadd(64.69, 551.77, -1.7, 2.66)
pt3dadd(65.13, 552.73, -2, 2.66)
pt3dadd(65.21, 554.13, -1.4, 2.66)
pt3dadd(64.99, 555.61, -1.2, 2.66)
pt3dadd(64.91, 557.01, -1.05, 2.66)
pt3dadd(64.47, 557.89, -1, 2.66)
pt3dadd(64.03, 558.93, -0.85, 2.66)
pt3dadd(63.44, 559.81, -0.5, 2.66)
pt3dadd(62.33, 560.55, -2.15, 2.66)
pt3dadd(61.66, 561.29, -2.3, 2.66)
pt3dadd(60.77, 561.95, -2.4, 2.66)
pt3dadd(59.67, 563.2, -2.45, 2.66)
pt3dadd(59, 563.72, -2.5, 2.66)
pt3dadd(58.34, 564.46, -2.55, 2.66)
pt3dadd(57.3, 565.71, -2.8, 2.66)
pt3dadd(56.49, 566.74, -2.9, 2.66)
pt3dadd(56.27, 567.63, -3, 2.66)
pt3dadd(55.9, 568.59, -3.25, 2.66)
pt3dadd(55.6, 569.4, -3.4, 2.66)
pt3dadd(55.9, 570.5, -3.55, 2.66)
pt3dadd(55.9, 571.68, -3.6, 2.66)
pt3dadd(56.64, 573.09, -3.65, 2.66)
pt3dadd(57.23, 574.04, -3.7, 2.66)
pt3dadd(57.89, 575.08, -3.7, 2.66)
pt3dadd(59.65, 576.43, -3.75, 2.66)
pt3dadd(61.13, 577.1, -2.05, 2.66)
pt3dadd(62.09, 578.65, -1.8, 2.66)
pt3dadd(63.42, 579.75, -1.75, 2.66)
pt3dadd(63.57, 581.23, -1.7, 2.66)
pt3dadd(63.94, 582.48, -1.7, 2.66)
pt3dadd(64.68, 583.59, -1.7, 2.66)
pt3dadd(65.05, 584.77, -1.75, 2.66)
pt3dadd(65.57, 586.17, -1.95, 2.66)
pt3dadd(66.01, 587.42, -2.1, 2.66)
pt3dadd(65.93, 588.6, -2.3, 2.66)
pt3dadd(65.86, 589.86, -2.55, 2.66)
pt3dadd(65.79, 591.26, -3.05, 2.66)
pt3dadd(65.2, 592.88, -4.05, 2.37)
pt3dadd(64.97, 594.8, -4.1, 2.37)
pt3dadd(64.97, 596.13, -4.2, 2.37)
pt3dadd(65.34, 597.38, -4.3, 2.37)
pt3dadd(65.79, 598.41, -4.3, 2.37)
pt3dadd(66.75, 599.67, -5.05, 2.37)
pt3dadd(67.71, 600.7, -2.9, 2.37)
pt3dadd(67.86, 601.95, -2.65, 2.37)
pt3dadd(68.52, 602.84, -2.5, 2.37)
pt3dadd(68.89, 604.24, -2.4, 2.37)
pt3dadd(68.89, 605.34, -2.4, 2.37)
pt3dadd(68.82, 606.23, -2.35, 2.37)
pt3dadd(68.77, 607.35, -1.95, 2.37)
pt3dadd(68.4, 608.75, -1.85, 2.37)
pt3dadd(68.03, 610, -1.75, 2.37)
pt3dadd(68.18, 610.89, -1.45, 2.37)
pt3dadd(68.25, 612.14, -1.45, 2.37)
pt3dadd(68.33, 613.47, -1.65, 2.37)
pt3dadd(68.62, 614.58, -1.95, 2.37)
pt3dadd(68.7, 615.83, -2.15, 2.37)
pt3dadd(69.21, 616.94, -2.4, 2.37)
pt3dadd(69.43, 617.9, -2.55, 2.37)
pt3dadd(69.8, 619.08, -2.6, 2.37)
pt3dadd(71.36, 620.18, -3.15, 2.37)
pt3dadd(71.95, 621.44, -3.25, 2.37)
pt3dadd(72.76, 622.76, -3.3, 2.37)
pt3dadd(73.35, 623.94, -3.5, 2.37)
pt3dadd(73.8, 624.83, -4, 2.37)
pt3dadd(74.61, 626.67, -4.7, 2.37)
pt3dadd(75.2, 628.07, -4.7, 2.37)
pt3dadd(75.57, 629.62, -4.75, 2.37)
pt3dadd(75.35, 630.65, -4.8, 2.37)
pt3dadd(75.05, 631.98, -4.8, 2.37)
pt3dadd(74.98, 632.79, -5.1, 2.37)
pt3dadd(74.39, 633.68, -5.3, 2.37)
pt3dadd(73.28, 634.42, -5.4, 2.37)
pt3dadd(72.61, 635.15, -5.45, 2.37)
pt3dadd(71.73, 635.89, -5.45, 2.37)
pt3dadd(70.91, 636.55, -5.45, 2.37)
pt3dadd(70.47, 637.07, -5.45, 2.37)
pt3dadd(70.17, 638.03, -5.5, 2.37)
pt3dadd(69.88, 638.81, -5.6, 2.37)
pt3dadd(69.8, 639.69, 0.3, 2.37)
pt3dadd(69.51, 640.5, 0.1, 2.29)
pt3dadd(69.14, 641.46, 0, 2.29)
pt3dadd(68.84, 642.27, -0.1, 2.29)
pt3dadd(68.84, 642.94, 0.45, 2.29)
pt3dadd(68.7, 643.82, 0.6, 2.29)
pt3dadd(68.77, 644.49, 0.7, 2.29)
pt3dadd(69.29, 645.15, 0.9, 2.29)
pt3dadd(69.66, 646.11, 1.15, 2.29)
pt3dadd(70.25, 646.92, 1.3, 2.29)
pt3dadd(70.62, 647.73, 1.4, 1.77)
pt3dadd(70.91, 648.76, 1.45, 2.14)
pt3dadd(70.69, 650.02, 1.55, 2.29)
pt3dadd(70.62, 650.9, 1.7, 2.29)
pt3dadd(70.4, 651.71, 0.2, 2.29)
pt3dadd(69.95, 652.6, 0.05, 2.51)
pt3dadd(70.03, 653.34, 0.05, 2.51)
pt3dadd(69.58, 654.59, -0.8, 2.51)
pt3dadd(69.51, 655.33, -0.9, 2.51)
pt3dadd(69.44, 656.21, -1, 2.29)
pt3dadd(69.29, 657.39, -1, 2.29)
pt3dadd(69.51, 658.57, -1, 2.29)
pt3dadd(69.8, 659.97, -1, 2.29)
pt3dadd(70.03, 661.08, -1, 2.29)
pt3dadd(70.32, 662.26, -1, 2.29)
pt3dadd(70.77, 663.37, -1, 2.29)
pt3dadd(70.99, 664.4, -1.15, 2.29)
pt3dadd(71.14, 665.43, -1.15, 2.29)
pt3dadd(71.8, 666.32, -1.2, 2.29)
pt3dadd(72.02, 667.27, -1.2, 2.29)
pt3dadd(72.32, 667.94, -1.2, 2.29)
pt3dadd(72.69, 668.82, -1.2, 2.29)
pt3dadd(73.13, 669.63, -1.2, 2.29)
pt3dadd(73.47, 670.99, -1.3, 2.29)
pt3dadd(73.99, 671.8, -1.3, 2.29)
pt3dadd(74.43, 672.69, -1.35, 2.29)
pt3dadd(74.95, 673.72, -1.35, 2.29)
pt3dadd(75.17, 674.38, -1.35, 2.29)
pt3dadd(75.32, 675.34, -1.35, 2.29)
pt3dadd(75.32, 675.93, -1.4, 2.29)
pt3dadd(75.32, 677.19, -1.45, 2.29)
pt3dadd(75.47, 678.15, -1.45, 2.29)
}
}
proc shape3d_22() {
apic[12] { pt3dadd(75.17, 679.47, -1.45, 2.22)
pt3dadd(75.25, 680.51, -2.05, 2.22)
pt3dadd(75.4, 681.61, -2.25, 2.22)
pt3dadd(75.25, 682.28, -2.35, 2.22)
pt3dadd(75.32, 683.23, -2.35, 2.22)
pt3dadd(75.4, 684.05, -2.35, 2.07)
pt3dadd(75.03, 684.71, -2.35, 2.07)
pt3dadd(75.03, 685.37, -2.4, 2.07)
pt3dadd(74.88, 686.11, -2.7, 2.07)
pt3dadd(74.66, 686.85, -3, 2.07)
pt3dadd(74.51, 687.88, -3.35, 1.92)
pt3dadd(74.58, 688.62, -3.4, 1.92)
pt3dadd(74.29, 689.13, -3.6, 1.92)
pt3dadd(74.14, 690.24, -4.35, 1.92)
pt3dadd(73.99, 691.35, -4.4, 1.92)
pt3dadd(74.14, 692.6, -4.4, 1.92)
}
apic[13] {pt3dclear()
pt3dadd(74.14, 692.6, -4.4, 1.77)
pt3dadd(74.95, 693.78, -4.4, 1.77)
pt3dadd(75.62, 694.74, -4.4, 1.77)
pt3dadd(76.43, 695.92, -4.4, 1.63)
pt3dadd(77.24, 696.73, -4.4, 1.63)
pt3dadd(78.06, 697.62, -5.05, 1.63)
pt3dadd(78.43, 698.57, -5.05, 1.63)
pt3dadd(78.94, 699.46, -5.05, 1.63)
pt3dadd(79.46, 700.34, -5.05, 1.63)
pt3dadd(79.68, 701.23, -5.05, 1.63)
pt3dadd(79.68, 702.35, -5.1, 1.63)
pt3dadd(79.31, 703.53, -5.1, 1.63)
pt3dadd(79.09, 704.41, -5.1, 1.63)
pt3dadd(78.79, 705, -5.55, 1.63)
pt3dadd(78.13, 706.26, -4.6, 1.63)
pt3dadd(77.76, 706.77, -4.35, 1.63)
pt3dadd(77.39, 707.51, -4.15, 1.63)
pt3dadd(77.02, 708.18, -4, 1.63)
pt3dadd(76.35, 708.99, -3.85, 1.63)
pt3dadd(75.84, 709.58, -3.75, 1.63)
pt3dadd(75.47, 710.17, -3.7, 1.63)
pt3dadd(75.24, 710.98, -3.6, 1.63)
pt3dadd(75.17, 711.72, -3.45, 1.63)
pt3dadd(75.24, 712.45, -3.3, 1.63)
pt3dadd(75.47, 713.12, -3.1, 1.63)
pt3dadd(75.91, 713.78, -3, 1.63)
pt3dadd(76.72, 714.37, -2.95, 1.63)
pt3dadd(77.54, 715.03, -2.75, 1.48)
pt3dadd(78.13, 716.07, -2.5, 1.33)
pt3dadd(78.87, 717.03, -2.5, 1.33)
pt3dadd(79.38, 717.76, -2.45, 1.33)
pt3dadd(79.83, 718.8, -3.1, 1.48)
pt3dadd(79.75, 719.68, -3.35, 1.48)
pt3dadd(79.97, 720.49, -3.45, 1.48)
pt3dadd(80.05, 721.45, -3.65, 1.48)
pt3dadd(80.2, 722.41, -3.95, 1.48)
pt3dadd(80.27, 723.22, -4.1, 1.48)
pt3dadd(80.42, 724.18, -4.3, 1.33)
pt3dadd(80.49, 724.92, -4.35, 1.18)
pt3dadd(80.57, 725.88, -4.4, 1.18)
pt3dadd(80.79, 726.69, -4.4, 1.18)
pt3dadd(81.23, 727.35, -4.45, 1.18)
pt3dadd(81.6, 728.24, -4.5, 1.18)
pt3dadd(82.27, 728.75, -5.15, 1.18)
pt3dadd(82.49, 729.19, -5.3, 1.18)
pt3dadd(82.71, 730.37, -5.1, 1.18)
}
apic[14] {pt3dclear()
pt3dadd(82.71, 730.37, -5.1, 1.18)
pt3dadd(83.67, 731.41, -5, 1.18)
pt3dadd(84.41, 732.14, -5, 1.18)
pt3dadd(84.93, 732.96, -4.95, 1.18)
pt3dadd(84.86, 733.88, -4.85, 1.11)
pt3dadd(84.86, 735.13, -4.8, 1.11)
pt3dadd(84.79, 735.87, -5.2, 1.11)
pt3dadd(85.16, 736.9, -5.75, 1.11)
pt3dadd(85.45, 738.01, -6.1, 1.11)
pt3dadd(85.75, 738.67, -6.2, 1.11)
pt3dadd(85.97, 739.78, -6.35, 1.11)
pt3dadd(86.49, 740.44, -6.45, 1.11)
pt3dadd(87.3, 741.11, -6.5, 1.11)
pt3dadd(88.04, 741.77, -6.5, 1.11)
pt3dadd(88.85, 742.51, -6.55, 1.03)
pt3dadd(89.52, 743.17, -6.55, 1.03)
pt3dadd(90.48, 743.62, -6.6, 1.03)
pt3dadd(91.66, 744.21, -6.6, 1.03)
pt3dadd(92.55, 744.21, -6.65, 1.03)
pt3dadd(93.21, 744.28, -6.65, 1.03)
pt3dadd(94.32, 744.06, -6.95, 1.18)
pt3dadd(94.99, 744.06, -8, 1.18)
pt3dadd(95.73, 743.98, -7.8, 1.18)
pt3dadd(96.76, 744.13, -7.65, 1.18)
}
apic[15] {pt3dclear()
pt3dadd(96.76, 744.13, -7.65, 1.03)
pt3dadd(97.87, 743.76, -8.8, 1.03)
pt3dadd(98.68, 744.57, -8.95, 1.03)
pt3dadd(98.83, 745.68, -9.9, 1.03)
pt3dadd(99.72, 746.64, -9.95, 1.03)
pt3dadd(100.16, 747.38, -10, 1.03)
pt3dadd(100.53, 748.04, -10, 1.03)
pt3dadd(100.9, 748.78, -10.05, 0.89)
pt3dadd(101.27, 749.52, -10.05, 0.89)
pt3dadd(102.16, 749.81, -10.05, 0.89)
pt3dadd(103.12, 750.11, -10.05, 0.89)
pt3dadd(104.08, 750.11, -10.1, 0.81)
pt3dadd(104.89, 750.18, -10.1, 0.81)
pt3dadd(105.7, 750.4, -10.1, 0.81)
pt3dadd(106.29, 750.47, -10.1, 0.81)
pt3dadd(107.4, 750.62, -10.15, 0.89)
pt3dadd(108.22, 751.14, -10.35, 0.89)
pt3dadd(108.66, 751.65, -10.35, 1.03)
pt3dadd(109.32, 752.1, -10.4, 1.03)
pt3dadd(109.77, 752.54, -10.6, 1.03)
pt3dadd(110.43, 753.2, -10.85, 1.18)
pt3dadd(111.02, 754.01, -10.6, 1.18)
pt3dadd(111.62, 754.38, -10.6, 1.18)
pt3dadd(112.13, 754.97, -10.7, 1.18)
pt3dadd(112.65, 755.56, -12, 1.18)
pt3dadd(113.24, 756.23, -12, 1.18)
pt3dadd(113.54, 756.89, -12, 1.18)
pt3dadd(113.46, 757.41, -12, 1.18)
pt3dadd(113.24, 757.92, -12, 1.18)
pt3dadd(113.17, 758.51, -12.05, 1.18)
pt3dadd(113.17, 759.25, -12.05, 1.18)
pt3dadd(113.32, 759.84, -12.4, 1.18)
pt3dadd(113.69, 760.43, -12.6, 1.18)
pt3dadd(114.06, 761.24, -12.65, 1.18)
pt3dadd(114.57, 761.61, -12.65, 1.18)
pt3dadd(115.39, 762.35, -12.65, 1.18)
pt3dadd(116.05, 762.72, -12.65, 1.18)
pt3dadd(116.72, 762.64, -12.65, 1.18)
pt3dadd(117.75, 762.72, -12.65, 1.18)
pt3dadd(118.64, 762.64, -12.65, 1.18)
pt3dadd(119.15, 762.57, -12.65, 1.18)
pt3dadd(120.04, 762.72, -12.65, 1.18)
pt3dadd(120.56, 762.5, -12.65, 1.18)
}
apic[16] {pt3dclear()
pt3dadd(120.56, 762.5, -12.65, 0.81)
pt3dadd(121.08, 761.91, -12.3, 0.81)
pt3dadd(121.31, 761.42, -13.9, 0.89)
pt3dadd(121.83, 761.05, -13.9, 0.89)
pt3dadd(122.5, 761.2, -13.85, 0.89)
pt3dadd(123.16, 761.42, -13.75, 0.89)
pt3dadd(123.68, 761.79, -13.65, 0.89)
pt3dadd(124.2, 762.3, -13.4, 0.89)
pt3dadd(124.57, 763.04, -14.55, 0.89)
pt3dadd(124.71, 763.71, -14.65, 0.89)
pt3dadd(125.08, 764.37, -14.8, 0.89)
pt3dadd(125.38, 765.11, -15.2, 0.89)
pt3dadd(125.82, 765.77, -15.2, 0.89)
pt3dadd(126.34, 766.07, -15.25, 0.89)
pt3dadd(127, 766.73, -15.25, 0.89)
pt3dadd(127.89, 767.17, -15.5, 0.89)
pt3dadd(128.63, 767.84, -15.55, 0.89)
pt3dadd(129.59, 767.91, -15.6, 0.89)
pt3dadd(130.26, 767.69, -15.6, 0.89)
pt3dadd(130.77, 767.17, -17, 0.89)
pt3dadd(131.14, 767.1, -17.05, 0.89)
pt3dadd(132.03, 767.1, -17.05, 0.89)
pt3dadd(132.77, 767.25, -17.9, 1.03)
pt3dadd(133.29, 767.98, -17.9, 1.03)
pt3dadd(134.17, 768.72, -17.9, 1.03)
pt3dadd(134.69, 769.31, -18, 0.96)
pt3dadd(135.28, 769.97, -18.05, 0.96)
pt3dadd(135.73, 770.49, -18.05, 0.96)
pt3dadd(136.32, 771.23, -18.05, 0.96)
pt3dadd(137.2, 771.52, -18.05, 0.96)
pt3dadd(137.94, 771.82, -18.05, 0.96)
pt3dadd(138.53, 772.19, -18.05, 0.96)
pt3dadd(139.05, 772.56, -18.05, 0.96)
pt3dadd(139.72, 773.15, -18.05, 0.96)
pt3dadd(140.31, 773.66, -18.05, 0.96)
pt3dadd(140.97, 774.47, -18.05, 0.96)
pt3dadd(141.86, 774.84, -17.3, 0.96)
pt3dadd(143.04, 775.43, -17.25, 0.96)
pt3dadd(143.93, 775.87, -17.2, 0.96)
pt3dadd(145.04, 775.73, -17.15, 0.96)
pt3dadd(145.85, 776.69, -17.05, 0.96)
pt3dadd(146.52, 777.35, -17, 0.96)
pt3dadd(146.89, 778.01, -18.15, 0.96)
pt3dadd(147.26, 778.75, -18.25, 0.96)
pt3dadd(147.26, 779.64, -18.35, 0.96)
pt3dadd(147.4, 780.45, -18.5, 0.96)
pt3dadd(147.7, 781.41, -18.65, 0.96)
pt3dadd(147.77, 782.07, -18.75, 0.96)
pt3dadd(148.14, 782.66, -19, 0.96)
pt3dadd(149.18, 783.25, -20.15, 0.96)
pt3dadd(150.06, 783.47, -20.2, 0.96)
pt3dadd(151.02, 783.4, -20.25, 0.96)
pt3dadd(151.69, 783.77, -20.25, 0.96)
pt3dadd(152.36, 783.84, -20.25, 0.96)
pt3dadd(153.32, 784.13, -20.25, 0.96)
pt3dadd(154.13, 784.5, -20.25, 0.96)
pt3dadd(155.09, 785.24, -20.3, 0.96)
pt3dadd(155.83, 785.98, -20.35, 0.96)
pt3dadd(156.27, 787.31, -20.8, 0.96)
pt3dadd(156.35, 788.63, -20.85, 0.96)
pt3dadd(156.64, 789.37, -20.85, 0.96)
pt3dadd(156.94, 790.18, -20.9, 0.96)
pt3dadd(157.45, 791.07, -20.9, 0.96)
pt3dadd(158.19, 791.88, -20.9, 0.96)
pt3dadd(158.64, 792.25, -21.2, 0.96)
pt3dadd(159.08, 793.72, -21.55, 0.96)
pt3dadd(159.67, 794.46, -21.55, 0.96)
pt3dadd(160.41, 795.12, -21.55, 0.96)
pt3dadd(160.85, 795.71, -21.55, 0.96)
pt3dadd(161.43, 796.34, -21.6, 0.96)
pt3dadd(162.24, 796.93, -21.6, 0.96)
}
}
proc shape3d_23() {
apic[16] { pt3dadd(162.61, 797.52, -21.65, 0.96)
pt3dadd(163.72, 798.33, -21.65, 0.96)
pt3dadd(164.6, 798.77, -21.65, 0.89)
pt3dadd(165.57, 799.44, -21.65, 0.89)
pt3dadd(166.08, 799.73, -21.65, 0.89)
pt3dadd(166.75, 800.03, -21.65, 0.89)
pt3dadd(167.71, 800.69, -21.65, 1.03)
pt3dadd(168.37, 801.21, -21.5, 1.03)
pt3dadd(169.04, 802.16, -21.55, 1.03)
pt3dadd(169.7, 802.83, -21.6, 1.03)
pt3dadd(170, 804.01, -21.6, 1.03)
pt3dadd(170.59, 804.45, -21.6, 1.03)
pt3dadd(171.11, 805.19, -21.65, 1.03)
pt3dadd(171.33, 805.93, -21.7, 1.03)
pt3dadd(171.26, 806.66, -21.7, 1.03)
pt3dadd(171.33, 807.55, -21.75, 1.03)
pt3dadd(171.18, 808.06, -21.75, 1.03)
pt3dadd(170.96, 808.95, -21.85, 1.03)
pt3dadd(170.96, 809.76, -21.85, 1.03)
pt3dadd(170.74, 810.28, -21.9, 1.03)
pt3dadd(170.66, 811.09, -21.4, 1.03)
pt3dadd(170.74, 811.6, -21.3, 1.03)
pt3dadd(171.33, 812.05, -21.25, 1.03)
pt3dadd(171.85, 812.49, -21.2, 1.03)
pt3dadd(172.66, 812.93, -21.2, 1.03)
pt3dadd(173.1, 813.3, -21.2, 1.03)
pt3dadd(174.14, 813.23, -21.2, 1.03)
pt3dadd(174.88, 813.67, -20.2, 1.03)
pt3dadd(175.4, 814.26, -20.15, 1.03)
pt3dadd(175.62, 815.37, -20.1, 1.03)
pt3dadd(175.91, 816.25, -20.05, 0.89)
pt3dadd(176.21, 816.84, -20.05, 0.89)
pt3dadd(176.73, 817.73, -20.05, 0.89)
pt3dadd(177.24, 818.76, -20.05, 0.89)
pt3dadd(177.61, 819.42, -20.05, 1.03)
pt3dadd(178.28, 820.01, -20, 1.03)
pt3dadd(179.46, 820.23, -20, 1.03)
pt3dadd(180.27, 820.16, -20, 1.03)
pt3dadd(181.23, 820.45, -20, 1.03)
pt3dadd(181.9, 821.27, -20, 1.03)
pt3dadd(182.56, 821.71, -20, 1.03)
pt3dadd(183.23, 822.59, -20, 1.03)
pt3dadd(183.6, 823.26, -20, 1.03)
pt3dadd(183.67, 824.07, -20, 1.03)
pt3dadd(184.49, 824.66, -20, 1.03)
pt3dadd(185.22, 825.32, -20, 1.03)
pt3dadd(186.19, 825.47, -19.95, 1.03)
pt3dadd(186.85, 825.99, -19.9, 1.03)
pt3dadd(187.22, 826.5, -19.85, 1.03)
pt3dadd(187.52, 826.94, -19.85, 1.03)
pt3dadd(187.96, 827.53, -19.85, 1.03)
pt3dadd(188.4, 828.03, -20.05, 1.03)
pt3dadd(188.62, 828.84, -20.15, 1.03)
pt3dadd(188.69, 829.73, -20.25, 1.03)
pt3dadd(188.84, 830.61, -20.3, 1.03)
pt3dadd(188.91, 831.35, -20.35, 1.03)
pt3dadd(188.99, 832.38, -20.4, 1.03)
pt3dadd(189.28, 833.27, -20.4, 1.03)
pt3dadd(189.73, 833.79, -20.4, 1.03)
pt3dadd(190.1, 834.67, -20.45, 0.89)
pt3dadd(190.39, 835.33, -20.95, 0.89)
pt3dadd(190.47, 836.07, -21.05, 0.89)
pt3dadd(190.69, 836.88, -21.05, 0.89)
pt3dadd(191.06, 837.84, -21.1, 0.89)
pt3dadd(191.43, 838.28, -21.15, 0.89)
pt3dadd(191.57, 839.24, -21.15, 0.89)
pt3dadd(191.65, 839.91, -21.15, 0.89)
pt3dadd(192.09, 840.5, -21.15, 0.89)
pt3dadd(192.53, 841.01, -21.1, 0.89)
pt3dadd(192.98, 841.38, -21.1, 0.89)
pt3dadd(193.27, 841.97, -21.1, 0.89)
pt3dadd(193.94, 842.34, -21.1, 0.89)
pt3dadd(194.68, 842.78, -21.1, 1.03)
pt3dadd(195.2, 843.45, -21.05, 1.03)
pt3dadd(195.71, 843.52, -21.05, 1.03)
pt3dadd(196.67, 843.67, -21.05, 1.03)
pt3dadd(197.26, 844.04, -20.95, 1.03)
pt3dadd(197.78, 844.26, -21, 0.81)
pt3dadd(198.3, 844.48, -21, 0.81)
pt3dadd(199.04, 844.63, -21, 0.81)
pt3dadd(199.7, 844.7, -21, 0.81)
pt3dadd(200.37, 845.07, -20.8, 0.81)
pt3dadd(201.33, 845.36, -20.8, 0.81)
pt3dadd(201.85, 845.59, -20.75, 0.81)
pt3dadd(202.44, 846.1, -21.5, 0.74)
pt3dadd(202.96, 846.62, -21.55, 0.74)
pt3dadd(203.62, 846.77, -21.6, 0.74)
pt3dadd(203.69, 847.28, -21.6, 0.74)
pt3dadd(204.21, 848.02, -21.65, 0.74)
pt3dadd(204.58, 848.68, -21.65, 0.74)
pt3dadd(205.17, 849.2, -21.65, 0.74)
pt3dadd(205.84, 849.57, -21.65, 0.74)
pt3dadd(206.43, 850.01, -21.5, 1.03)
pt3dadd(206.73, 850.82, -21.5, 1.03)
pt3dadd(207.17, 851.49, -20.6, 0.67)
pt3dadd(207.61, 852.08, -20.55, 0.67)
pt3dadd(207.61, 852.81, -20.55, 0.67)
pt3dadd(208.13, 853.4, -20.5, 0.67)
pt3dadd(208.5, 854.36, -20.5, 0.81)
pt3dadd(208.72, 855.32, -20.5, 0.81)
pt3dadd(208.87, 855.98, -20.5, 0.81)
pt3dadd(209.24, 856.5, -20.5, 0.81)
pt3dadd(209.9, 857.16, -20.5, 0.81)
pt3dadd(210.42, 857.75, -20.5, 0.81)
pt3dadd(210.79, 858.34, -20.5, 0.81)
pt3dadd(211.09, 859.16, -20.5, 0.81)
pt3dadd(211.23, 860.02, -20.5, 1.11)
pt3dadd(211.89, 860.98, -20.5, 1.11)
pt3dadd(212.7, 861.72, -20.5, 1.11)
pt3dadd(213.59, 862.53, -20.5, 1.11)
pt3dadd(214.63, 862.75, -20.5, 1.11)
pt3dadd(215.07, 863.49, -20.5, 1.11)
pt3dadd(215.29, 864.23, -20.5, 1.11)
pt3dadd(215.51, 865.04, -20.5, 1.11)
pt3dadd(215.88, 866, -20.5, 1.11)
pt3dadd(216.4, 866.66, -20.5, 1.11)
pt3dadd(216.84, 867.18, -20.5, 1.11)
pt3dadd(217.58, 867.4, -20.5, 1.11)
pt3dadd(218.4, 867.69, -20.5, 1.11)
pt3dadd(219.58, 867.69, -20.5, 1.11)
pt3dadd(220.1, 867.69, -20.5, 1.11)
pt3dadd(221.35, 867.32, -20.5, 1.11)
pt3dadd(222.02, 867.25, -20.5, 1.11)
pt3dadd(222.9, 867.18, -20.5, 0.67)
pt3dadd(223.64, 867.1, -20.5, 0.67)
pt3dadd(224.09, 867.47, -20.5, 0.81)
pt3dadd(225.05, 868.14, -20.5, 0.81)
pt3dadd(225.56, 868.43, -20.5, 1.33)
pt3dadd(226.53, 869.09, -20.5, 1.33)
pt3dadd(226.97, 869.83, -20.5, 1.33)
pt3dadd(227.78, 870.5, -20.5, 1.33)
pt3dadd(228.37, 871.38, -20.5, 1.33)
pt3dadd(228.74, 872.19, -20.5, 1.33)
pt3dadd(229.04, 873, -20.7, 1.33)
pt3dadd(229.56, 873.74, -20.8, 1.33)
pt3dadd(230.29, 873.96, -19.95, 1.33)
pt3dadd(231.33, 874.04, -19.9, 1.33)
pt3dadd(232.51, 874.11, -19.6, 1.18)
pt3dadd(233.55, 873.74, -19.55, 1.18)
pt3dadd(234.43, 873.22, -19.5, 1.18)
pt3dadd(235.1, 873.37, -19.45, 1.18)
pt3dadd(235.99, 873.74, -19.45, 1.18)
pt3dadd(236.8, 874.63, -19.3, 1.18)
pt3dadd(237.17, 875.44, -19.3, 1.18)
pt3dadd(237.54, 876.32, -19.4, 1.18)
pt3dadd(237.76, 877.21, -19.5, 1.18)
pt3dadd(237.91, 878.46, -19.7, 1.03)
pt3dadd(238.2, 879.35, -19.75, 1.03)
pt3dadd(238.5, 879.94, -19.8, 1.03)
pt3dadd(239.46, 880.97, -19.9, 1.03)
pt3dadd(240.2, 881.26, -19.95, 1.03)
pt3dadd(240.86, 880.97, -20, 1.03)
pt3dadd(241.97, 881.19, -20.05, 1.03)
pt3dadd(242.93, 881.48, -20, 1.03)
pt3dadd(244.19, 881.71, -20.05, 1.03)
pt3dadd(245.08, 881.63, -20.05, 1.03)
pt3dadd(246.19, 881.71, -20.05, 1.03)
}
apic[17] {pt3dclear()
pt3dadd(246.19, 881.71, -20.05, 0.67)
pt3dadd(246.33, 881.04, -19.15, 0.67)
pt3dadd(246.7, 880.3, -19.05, 0.67)
pt3dadd(247.22, 879.79, -19, 0.67)
pt3dadd(247.66, 879.12, -18.95, 0.67)
pt3dadd(248.4, 879.2, -18.95, 0.67)
pt3dadd(249.51, 879.71, -18.95, 0.67)
pt3dadd(250.1, 879.94, -18.9, 0.67)
pt3dadd(250.99, 880.01, -18.85, 0.67)
pt3dadd(251.65, 880.3, -18.8, 0.67)
pt3dadd(252.17, 881.34, -18.75, 0.67)
pt3dadd(252.32, 882, -18.75, 0.67)
pt3dadd(252.84, 882.66, -18.75, 0.67)
pt3dadd(253.21, 883.18, -18.75, 0.67)
pt3dadd(254.17, 883.4, -18.75, 0.67)
pt3dadd(254.46, 883.25, -18.7, 0.67)
pt3dadd(255.42, 883.4, -18.7, 0.67)
pt3dadd(256.31, 883.7, -18.65, 0.67)
pt3dadd(256.9, 884.51, -18.55, 0.67)
pt3dadd(257.42, 884.95, -18.55, 0.67)
pt3dadd(258.38, 884.95, -18.55, 0.67)
pt3dadd(259.17, 885.19, -17.4, 0.81)
pt3dadd(259.68, 885.19, -17.35, 0.81)
pt3dadd(260.57, 885.11, -17.3, 0.81)
pt3dadd(261.46, 885.41, -17.3, 0.81)
pt3dadd(262.79, 886, -17.3, 0.81)
pt3dadd(263.6, 886.07, -17.3, 0.81)
pt3dadd(264.19, 886, -17.25, 0.81)
pt3dadd(264.93, 886.22, -17.25, 0.81)
pt3dadd(265.6, 886.44, -17.25, 0.81)
pt3dadd(266.33, 886.29, -17.25, 0.81)
pt3dadd(267, 886.22, -17.25, 0.67)
pt3dadd(267.59, 886.14, -17.25, 0.67)
pt3dadd(268.48, 886.22, -17.25, 0.67)
pt3dadd(269.36, 886.29, -17.25, 0.67)
pt3dadd(270.1, 886.81, -17.25, 0.67)
pt3dadd(270.55, 887.1, -17.25, 0.67)
pt3dadd(271.14, 887.4, -17.25, 0.67)
pt3dadd(271.66, 887.69, -17.25, 0.67)
pt3dadd(272.17, 888.5, -17.25, 0.67)
pt3dadd(272.17, 889.32, -17.25, 0.67)
pt3dadd(272.62, 889.91, -17.5, 0.67)
pt3dadd(273.13, 890.35, -17.6, 0.67)
}
}
proc shape3d_24() {
apic[17] { pt3dadd(273.73, 890.94, -18.2, 0.67)
pt3dadd(274.09, 891.53, -18.05, 0.67)
pt3dadd(274.09, 892.41, -17.55, 0.67)
pt3dadd(274.02, 893.08, -17.45, 0.67)
pt3dadd(273.73, 893.81, -17.4, 0.67)
pt3dadd(273.65, 894.33, -17.35, 0.67)
pt3dadd(273.73, 894.7, -17.3, 0.67)
pt3dadd(273.95, 894.99, -17.25, 0.67)
pt3dadd(274.39, 895.51, -17, 0.52)
pt3dadd(275.2, 895.44, -17, 0.52)
pt3dadd(275.87, 895.22, -17, 0.52)
pt3dadd(276.53, 895.22, -16.55, 0.52)
pt3dadd(277.49, 895.14, -16.85, 0.52)
pt3dadd(278.38, 895.36, -17.4, 0.59)
pt3dadd(279.19, 896.25, -17.6, 0.74)
pt3dadd(279.71, 896.62, -17.6, 0.74)
pt3dadd(280.6, 896.99, -18.95, 0.74)
pt3dadd(281.26, 896.76, -19, 0.74)
pt3dadd(282.15, 896.62, -19.1, 0.74)
pt3dadd(283.04, 896.69, -19, 0.74)
pt3dadd(283.41, 896.32, -18.05, 0.74)
pt3dadd(284.29, 895.88, -17.9, 0.74)
pt3dadd(284.96, 895.88, -17.85, 0.74)
pt3dadd(285.33, 896.1, -17.7, 0.74)
pt3dadd(286.07, 896.17, -17.35, 0.74)
pt3dadd(286.88, 896.32, -18.75, 0.74)
pt3dadd(287.62, 895.88, -18.8, 0.74)
pt3dadd(288.36, 895.36, -18.85, 0.74)
pt3dadd(289.32, 895.07, -18.9, 0.74)
pt3dadd(290.13, 894.99, -20.05, 0.74)
pt3dadd(291.02, 895.44, -20.15, 0.74)
pt3dadd(291.46, 895.73, -20.2, 0.74)
pt3dadd(291.83, 896.25, -20.25, 0.74)
pt3dadd(292.79, 896.54, -20.25, 0.74)
pt3dadd(293.61, 896.54, -20.8, 0.74)
pt3dadd(294.42, 896.76, -20.85, 0.74)
pt3dadd(295.45, 897.28, -18.4, 0.74)
pt3dadd(295.9, 897.8, -18.1, 0.74)
pt3dadd(295.97, 898.46, -18.05, 0.74)
pt3dadd(296.86, 898.9, -18, 0.74)
pt3dadd(297.97, 898.98, -17.95, 0.74)
pt3dadd(298.71, 898.39, -17.9, 0.74)
pt3dadd(299.15, 897.58, -17.85, 0.74)
pt3dadd(299.82, 896.84, -17.85, 0.74)
pt3dadd(300.7, 896.25, -17.8, 0.74)
pt3dadd(301.44, 896.03, -17.8, 0.74)
pt3dadd(302.25, 895.51, -18.9, 0.74)
pt3dadd(303.14, 894.99, -18.95, 0.74)
pt3dadd(304.18, 894.92, -19, 0.74)
pt3dadd(304.99, 894.85, -19, 0.74)
pt3dadd(305.8, 894.85, -19.05, 0.74)
pt3dadd(306.32, 894.5, -19.1, 0.74)
pt3dadd(307.36, 894.06, -19.1, 0.74)
pt3dadd(308.1, 893.54, -19.1, 0.74)
pt3dadd(308.83, 893.47, -19.1, 0.74)
pt3dadd(309.65, 893.47, -19.3, 0.59)
pt3dadd(310.46, 893.69, -19.3, 0.59)
pt3dadd(311.05, 893.84, -19.2, 0.59)
pt3dadd(311.72, 893.76, -19.1, 0.59)
pt3dadd(312.38, 893.91, -19.35, 0.59)
pt3dadd(313.42, 894.06, -19.25, 0.59)
pt3dadd(313.79, 894.43, -19.25, 0.59)
pt3dadd(314.45, 894.57, -19.3, 0.59)
pt3dadd(315.26, 894.87, -19.45, 0.52)
pt3dadd(316.15, 894.21, -19.6, 0.52)
pt3dadd(316.82, 893.47, -19.9, 0.52)
pt3dadd(316.89, 892.58, -21.5, 0.52)
pt3dadd(316.67, 892.14, -21.55, 0.52)
pt3dadd(315.71, 891.62, -21.6, 0.52)
}
apic[18] {pt3dclear()
pt3dadd(246.19, 881.71, -20.05, 0.89)
pt3dadd(246.58, 882.28, -20.3, 0.89)
pt3dadd(246.8, 882.87, -20.35, 0.89)
pt3dadd(247.39, 883.39, -20.4, 0.89)
pt3dadd(247.91, 883.9, -20.4, 0.81)
pt3dadd(248.35, 884.71, -20.4, 0.81)
pt3dadd(248.43, 885.3, -20.4, 0.81)
pt3dadd(248.5, 886.04, -20.4, 0.81)
pt3dadd(249.24, 886.56, -20.4, 0.81)
pt3dadd(250.05, 886.78, -20.4, 0.81)
pt3dadd(250.87, 886.71, -20.4, 0.81)
pt3dadd(251.75, 886.93, -20.4, 0.81)
pt3dadd(252.64, 887.15, -20.4, 0.81)
pt3dadd(253.67, 887.15, -20.4, 0.81)
pt3dadd(254.19, 887.52, -20.4, 0.81)
pt3dadd(255, 887.74, -20.4, 0.81)
pt3dadd(255.74, 888.03, -20.45, 0.81)
pt3dadd(256.7, 888.7, -20.6, 0.81)
pt3dadd(257.37, 889.51, -21.05, 0.81)
pt3dadd(257.66, 890.1, -21.1, 0.81)
pt3dadd(257.74, 890.84, -21.1, 0.81)
pt3dadd(258.26, 891.43, -21.1, 0.81)
pt3dadd(259.36, 891.35, -21.1, 0.81)
pt3dadd(259.88, 891.5, -21.1, 0.81)
pt3dadd(260.84, 892.16, -22.3, 0.81)
pt3dadd(261.21, 892.61, -22.3, 0.81)
pt3dadd(261.58, 893.49, -22.35, 0.81)
pt3dadd(262.03, 893.93, -22.55, 0.81)
pt3dadd(262.54, 894.23, -22.85, 0.81)
pt3dadd(263.28, 894.82, -22.15, 0.81)
pt3dadd(264.02, 895.19, -22.05, 0.81)
pt3dadd(265.06, 895.7, -22, 0.81)
pt3dadd(265.94, 895.56, -22, 0.81)
pt3dadd(266.68, 895.85, -21.95, 0.81)
pt3dadd(267.49, 896.22, -22, 0.74)
pt3dadd(268.46, 896.22, -22.05, 0.74)
pt3dadd(269.42, 896, -22.35, 0.74)
pt3dadd(270.08, 895.78, -22.4, 0.74)
pt3dadd(270.75, 896.15, -22.4, 0.74)
pt3dadd(271.41, 897.1, -22.45, 0.74)
pt3dadd(271.56, 898.06, -22.45, 0.74)
pt3dadd(272.15, 898.8, -22.45, 0.74)
pt3dadd(272.74, 898.95, -22.45, 0.74)
pt3dadd(273.63, 898.95, -21.85, 0.74)
pt3dadd(274.44, 899.17, -21.75, 0.74)
pt3dadd(275.48, 899.17, -21.7, 0.74)
pt3dadd(276.51, 898.87, -21.65, 0.74)
pt3dadd(277.1, 898.58, -22.8, 0.74)
pt3dadd(278.21, 897.92, -22.9, 0.74)
pt3dadd(279.02, 897.18, -22.95, 0.74)
pt3dadd(280.06, 896.88, -23, 0.74)
pt3dadd(280.87, 896.59, -23, 0.74)
pt3dadd(281.69, 896, -23.05, 0.74)
pt3dadd(282.28, 895.48, -23.05, 0.74)
pt3dadd(283.16, 894.97, -23.05, 0.74)
pt3dadd(284.12, 895.33, -23.05, 0.74)
pt3dadd(285.09, 895.85, -23.4, 0.74)
pt3dadd(285.45, 896.44, -23.4, 0.74)
pt3dadd(286.12, 896.59, -23.4, 0.74)
pt3dadd(286.93, 896.37, -23.4, 0.74)
pt3dadd(287.67, 895.7, -23.4, 0.74)
pt3dadd(287.97, 894.97, -23.4, 0.74)
pt3dadd(287.67, 894.52, -23.4, 0.74)
pt3dadd(287.97, 894.08, -24.55, 0.59)
pt3dadd(287.97, 893.27, -24.4, 0.59)
pt3dadd(288.19, 892.75, -24.35, 0.59)
pt3dadd(289.08, 892.38, -24.3, 0.59)
pt3dadd(290.04, 892.75, -24.25, 0.59)
pt3dadd(290.7, 892.68, -24.2, 0.59)
pt3dadd(291.66, 892.46, -24.2, 0.59)
pt3dadd(292.4, 892.31, -24.2, 0.59)
pt3dadd(292.77, 892.16, -24.15, 0.59)
pt3dadd(293.29, 891.94, -24.15, 0.59)
pt3dadd(294.18, 892.02, -24.15, 0.59)
pt3dadd(294.97, 892.48, -24.05, 0.59)
pt3dadd(295.93, 892.48, -24.05, 0.59)
pt3dadd(296.37, 892.92, -24.05, 0.44)
pt3dadd(296.81, 893.59, -24.05, 0.44)
pt3dadd(297.26, 894.18, -24.05, 0.44)
pt3dadd(297.7, 894.55, -24.05, 0.44)
}
apic[19] {pt3dclear()
pt3dadd(120.56, 762.5, -12.65, 0.67)
pt3dadd(121.13, 763.13, -11.75, 0.67)
pt3dadd(121.57, 763.87, -11.95, 0.67)
pt3dadd(121.57, 764.31, -12.1, 0.67)
pt3dadd(121.5, 764.82, -12.25, 0.67)
pt3dadd(121.5, 765.41, -12.35, 0.67)
pt3dadd(121.94, 765.93, -12.4, 0.67)
pt3dadd(122.38, 766.59, -12.45, 0.67)
pt3dadd(122.75, 767.26, -12.45, 0.67)
pt3dadd(122.97, 768.14, -12.5, 0.67)
pt3dadd(123.71, 768.73, -12.5, 0.67)
pt3dadd(124.45, 769.32, -12.5, 0.67)
pt3dadd(124.6, 770.28, -12.5, 0.67)
pt3dadd(125.04, 771.09, -12.55, 0.67)
pt3dadd(125.34, 772.05, -12.75, 0.74)
pt3dadd(125.63, 772.94, -12.9, 0.74)
pt3dadd(126.15, 773.75, -13.1, 0.74)
pt3dadd(126.82, 774.34, -13.3, 0.96)
pt3dadd(127.56, 774.63, -13.3, 0.96)
pt3dadd(128.37, 775.22, -13.35, 0.96)
pt3dadd(129.4, 775.52, -14.55, 0.81)
pt3dadd(130.81, 776.11, -14.55, 0.81)
pt3dadd(132.06, 776.18, -14.55, 0.81)
pt3dadd(132.95, 776.48, -13.9, 0.81)
pt3dadd(133.69, 776.7, -13.85, 0.81)
pt3dadd(134.28, 776.99, -13.75, 0.81)
pt3dadd(135.32, 777.21, -13, 0.81)
pt3dadd(136.5, 777.51, -12.9, 0.81)
pt3dadd(137.46, 777.95, -12.8, 0.81)
pt3dadd(138.49, 778.84, -12.7, 0.74)
pt3dadd(138.86, 779.8, -12.65, 0.74)
pt3dadd(138.86, 780.75, -12.6, 0.74)
pt3dadd(138.35, 781.57, -12.6, 0.74)
pt3dadd(138.2, 782.45, -12.6, 0.74)
pt3dadd(137.83, 782.97, -12.55, 0.74)
pt3dadd(137.53, 784.22, -12.45, 0.74)
pt3dadd(137.16, 785.25, -12.4, 0.74)
pt3dadd(137.16, 785.92, -12.95, 0.74)
pt3dadd(136.87, 786.51, -12.8, 0.74)
pt3dadd(136.79, 787.39, -12.35, 0.74)
pt3dadd(137.16, 788.06, -11.65, 0.74)
pt3dadd(137.9, 788.79, -11.55, 0.74)
pt3dadd(138.72, 789.09, -11.5, 0.74)
pt3dadd(139.83, 789.16, -11.45, 0.74)
pt3dadd(141.08, 789.09, -10.75, 0.74)
pt3dadd(142.19, 789.31, -10.7, 0.74)
pt3dadd(143.45, 789.46, -10.65, 0.74)
pt3dadd(144.56, 789.6, -10.65, 0.74)
pt3dadd(145.22, 790.34, -10.6, 0.74)
}
apic[20] {pt3dclear()
pt3dadd(145.22, 790.34, -10.6, 0.74)
pt3dadd(144.92, 790.78, -9.4, 0.74)
}
}
proc shape3d_25() {
apic[20] { pt3dadd(144.56, 791.45, -9.4, 0.74)
pt3dadd(143.82, 792.04, -9.4, 0.74)
pt3dadd(143.45, 792.26, -9.4, 0.74)
pt3dadd(142.93, 792.7, -9.35, 0.74)
pt3dadd(142.26, 793.22, -9.35, 0.74)
pt3dadd(141.75, 793.51, -9.35, 0.74)
pt3dadd(140.86, 793.88, -9.35, 0.74)
pt3dadd(140.6, 795.2, -9.2, 0.74)
pt3dadd(140.97, 796.16, -9.15, 0.74)
pt3dadd(140.9, 796.97, -9.15, 0.74)
pt3dadd(140.97, 797.7, -9.1, 0.74)
pt3dadd(140.97, 798.59, -8.75, 0.74)
pt3dadd(141.41, 799.11, -8.6, 0.74)
pt3dadd(141.71, 799.47, -8.65, 0.74)
pt3dadd(142.08, 800.14, -8.8, 0.74)
pt3dadd(142.15, 801.02, -8.95, 0.74)
pt3dadd(142, 801.83, -9, 0.74)
pt3dadd(141.86, 802.72, -9, 0.74)
pt3dadd(141.78, 803.83, -9.05, 0.74)
pt3dadd(141.27, 804.56, -9.05, 0.74)
pt3dadd(140.67, 805.01, -9.05, 0.74)
pt3dadd(139.71, 805.23, -8.35, 0.74)
pt3dadd(138.75, 805.52, -8.3, 0.74)
pt3dadd(137.94, 805.67, -8.3, 0.74)
pt3dadd(137.2, 805.74, -8.25, 0.74)
pt3dadd(136.39, 805.89, -8.25, 0.74)
pt3dadd(135.8, 806.11, -8.25, 0.74)
pt3dadd(135.13, 806.41, -8.2, 0.74)
pt3dadd(134.47, 806.85, -8.2, 0.74)
pt3dadd(134.02, 807.22, -8.15, 0.74)
pt3dadd(133.58, 807.66, -8.15, 0.74)
pt3dadd(133.14, 808.69, -8.15, 0.74)
pt3dadd(132.54, 809.43, -8.15, 0.74)
pt3dadd(132.32, 810.32, -8.15, 0.74)
pt3dadd(132.17, 811.05, -8.15, 0.74)
pt3dadd(132.47, 811.79, -8.15, 0.74)
pt3dadd(132.54, 812.31, -8.1, 0.74)
pt3dadd(132.62, 812.97, -8.05, 0.74)
pt3dadd(133.06, 813.71, -8, 0.74)
pt3dadd(133.21, 814.59, -7.95, 0.74)
pt3dadd(133.43, 815.63, -7.9, 0.74)
pt3dadd(133.21, 816.44, -7.9, 0.74)
pt3dadd(132.84, 817.25, -7.9, 0.74)
pt3dadd(132.77, 817.84, -7.9, 0.74)
pt3dadd(132.62, 818.58, -7.85, 0.74)
pt3dadd(132.54, 819.61, -7.85, 0.74)
pt3dadd(132.4, 820.27, -7.75, 0.74)
pt3dadd(132.54, 820.94, -7.4, 0.74)
pt3dadd(133.14, 821.75, -7.3, 0.74)
pt3dadd(133.95, 822.26, -7.3, 0.74)
pt3dadd(134.47, 822.85, -7.2, 0.74)
pt3dadd(135.13, 823.52, -7.15, 0.74)
pt3dadd(135.43, 824.4, -7.15, 0.74)
pt3dadd(135.87, 824.99, -7.15, 0.74)
pt3dadd(135.8, 825.95, -7.15, 0.74)
pt3dadd(135.76, 826.78, -7.1, 0.74)
pt3dadd(135.39, 827.51, -7.1, 0.74)
pt3dadd(134.94, 828.4, -7.1, 0.74)
pt3dadd(134.8, 829.28, -7.1, 0.74)
pt3dadd(134.5, 830.09, -7.1, 0.74)
pt3dadd(134.5, 830.68, -7.1, 0.74)
pt3dadd(134.57, 831.35, -7.05, 0.74)
pt3dadd(134.72, 832.38, -7.05, 0.74)
pt3dadd(134.43, 833.12, -7.9, 0.89)
pt3dadd(134.28, 833.86, -8.1, 0.89)
pt3dadd(133.76, 834.67, -8.25, 0.81)
pt3dadd(133.39, 835.33, -8.25, 0.81)
pt3dadd(133.32, 835.99, -8.3, 0.81)
pt3dadd(133.1, 836.81, -8.3, 0.81)
pt3dadd(132.8, 837.32, -8.35, 0.81)
pt3dadd(132.5, 838.06, -8.35, 0.81)
pt3dadd(132.58, 838.94, -8.35, 0.81)
pt3dadd(132.65, 839.83, -8.35, 0.81)
pt3dadd(132.58, 840.64, -8.35, 0.81)
pt3dadd(132.43, 841.23, -8.4, 0.81)
pt3dadd(132.28, 841.82, -8.55, 0.81)
pt3dadd(131.91, 842.48, -8.65, 0.81)
pt3dadd(131.69, 843.07, -8.7, 0.81)
pt3dadd(131.54, 843.59, -8.75, 0.81)
pt3dadd(131.54, 844.11, -8.8, 0.81)
pt3dadd(131.4, 844.84, -8.8, 0.81)
pt3dadd(131.69, 845.66, -8.85, 0.81)
pt3dadd(131.84, 846.25, -8.85, 0.81)
pt3dadd(131.99, 846.84, -8.85, 0.81)
pt3dadd(132.06, 847.43, -8.9, 0.81)
pt3dadd(132.06, 848.09, -8.9, 0.81)
pt3dadd(132.5, 848.68, -8.9, 0.81)
pt3dadd(132.58, 849.12, -8.9, 0.81)
pt3dadd(132.65, 849.49, -8.9, 0.81)
pt3dadd(133.02, 850.08, -8.9, 0.81)
pt3dadd(133.39, 850.52, -8.9, 0.81)
pt3dadd(133.61, 850.82, -8.9, 0.81)
pt3dadd(133.84, 851.63, -8.9, 0.81)
pt3dadd(133.84, 852.59, -8.9, 0.81)
}
apic[21] {pt3dclear()
pt3dadd(133.84, 852.59, -8.9, 0.59)
pt3dadd(134.13, 853.55, -8.95, 0.59)
pt3dadd(134.35, 854.51, -8.95, 0.59)
pt3dadd(134.2, 855.24, -8.95, 0.59)
pt3dadd(133.98, 855.91, -8.95, 0.59)
pt3dadd(133.91, 856.72, -8.95, 0.59)
pt3dadd(134.2, 857.53, -8.95, 0.59)
pt3dadd(134.4, 858.23, -8.95, 0.67)
pt3dadd(134.99, 859.04, -8.95, 0.67)
pt3dadd(134.62, 860.15, -8.95, 0.67)
pt3dadd(134.7, 861.04, -8.95, 0.67)
pt3dadd(134.92, 861.77, -8.95, 0.67)
pt3dadd(135.14, 862.58, -8.95, 0.67)
pt3dadd(135.14, 863.25, -8.95, 0.67)
pt3dadd(135.36, 864.28, -9.4, 0.67)
pt3dadd(135.66, 865.02, -9.5, 0.67)
pt3dadd(135.51, 865.9, -9.45, 0.67)
pt3dadd(135.66, 866.64, -9.25, 0.67)
pt3dadd(136.03, 867.23, -9.1, 0.67)
pt3dadd(136.69, 867.82, -8.95, 0.67)
pt3dadd(136.91, 868.56, -8.9, 0.67)
pt3dadd(137.43, 869.15, -8.8, 0.67)
pt3dadd(138.39, 869.59, -8.75, 0.67)
pt3dadd(139.35, 869.59, -8.65, 0.67)
pt3dadd(139.94, 870.03, -8.6, 0.67)
pt3dadd(140.9, 870.77, -8.5, 0.67)
pt3dadd(141.94, 870.84, -8.5, 0.67)
pt3dadd(142.46, 871.43, -8.45, 0.67)
pt3dadd(143.12, 871.88, -8.4, 0.67)
pt3dadd(143.93, 872.32, -8.15, 0.67)
pt3dadd(144.3, 873.13, -8, 0.67)
pt3dadd(144.67, 874.24, -7.95, 0.67)
pt3dadd(144.9, 874.9, -7.9, 0.67)
pt3dadd(145.26, 875.64, -7.8, 0.67)
pt3dadd(145.56, 876.38, -7.75, 0.67)
pt3dadd(146.37, 876.45, -7.65, 0.67)
pt3dadd(147.41, 876.6, -7.55, 0.67)
pt3dadd(148.3, 876.89, -7.3, 0.67)
pt3dadd(149.48, 877.41, -7.2, 0.67)
pt3dadd(150.29, 877.41, -7.15, 0.67)
pt3dadd(150.66, 877.78, -7.1, 0.52)
pt3dadd(151.4, 878.37, -7.1, 0.52)
pt3dadd(151.33, 879.33, -7.1, 0.52)
pt3dadd(151.47, 879.92, -8.2, 0.52)
pt3dadd(151.99, 880.73, -8.3, 0.52)
pt3dadd(151.92, 881.83, -8.3, 0.52)
pt3dadd(151.99, 882.79, -8.3, 0.52)
pt3dadd(152.06, 883.38, -8.3, 0.52)
pt3dadd(152.14, 884.34, -8.25, 0.52)
pt3dadd(152.43, 884.93, -8.2, 0.52)
pt3dadd(153.1, 885.59, -8.4, 0.52)
pt3dadd(153.39, 886.63, -8.6, 0.52)
pt3dadd(154.21, 887.22, -8.65, 0.52)
pt3dadd(155.46, 887.51, -8.75, 0.52)
pt3dadd(156.72, 888.1, -8.8, 0.52)
pt3dadd(157.53, 888.69, -8.8, 0.52)
pt3dadd(158.35, 888.99, -8.8, 0.52)
pt3dadd(159.31, 889.5, -8.85, 0.52)
pt3dadd(159.3, 890.03, -9.65, 0.52)
pt3dadd(159.6, 890.99, -9.7, 0.52)
pt3dadd(159.52, 891.66, -9.75, 0.52)
pt3dadd(159.82, 892.61, -9.8, 0.52)
pt3dadd(160.41, 893.35, -10.05, 0.52)
pt3dadd(160.56, 894.24, -9.55, 0.52)
pt3dadd(160.7, 895.2, -9.2, 0.52)
pt3dadd(160.63, 896.3, -9, 0.52)
pt3dadd(160.85, 896.82, -8.9, 0.52)
pt3dadd(160.85, 897.92, -8.85, 0.52)
pt3dadd(161.3, 898.37, -8.8, 0.52)
pt3dadd(162.03, 898.81, -8.8, 0.52)
pt3dadd(162.77, 898.96, -8.75, 0.52)
pt3dadd(163.59, 899.03, -9.35, 0.52)
pt3dadd(164.18, 899.18, -9.5, 0.52)
pt3dadd(164.47, 899.84, -9.55, 0.52)
pt3dadd(164.55, 900.51, -9.6, 0.52)
pt3dadd(164.62, 901.1, -9.65, 0.52)
pt3dadd(164.99, 901.83, -9.65, 0.52)
pt3dadd(165.43, 902.5, -9.7, 0.52)
pt3dadd(166.25, 902.64, -10.1, 0.37)
pt3dadd(166.62, 903.31, -10.2, 0.37)
pt3dadd(167.28, 903.53, -8.8, 0.37)
pt3dadd(167.8, 904.12, -8.75, 0.37)
pt3dadd(168.54, 905.08, -8.7, 0.37)
pt3dadd(169.35, 905.82, -8.65, 0.37)
pt3dadd(170.16, 906.18, -8.6, 0.37)
pt3dadd(170.61, 906.18, -8.6, 0.37)
pt3dadd(171.79, 906.18, -8.55, 0.37)
}
apic[22] {pt3dclear()
pt3dadd(133.84, 852.59, -8.9, 0.52)
pt3dadd(133.55, 853.49, -8.4, 0.52)
pt3dadd(132.96, 854.38, -8.5, 0.52)
pt3dadd(132.81, 854.97, -8.55, 0.52)
pt3dadd(132.59, 855.85, -8.6, 0.52)
pt3dadd(132.89, 856.52, -8.65, 0.52)
pt3dadd(132.89, 857.25, -8.65, 0.52)
pt3dadd(132.81, 858.21, -8.65, 0.52)
pt3dadd(133.04, 859.02, -8.7, 0.52)
pt3dadd(133.11, 859.69, -8.7, 0.52)
pt3dadd(133.18, 860.5, -8.7, 0.52)
pt3dadd(133.11, 861.24, -8.7, 0.52)
pt3dadd(132.96, 861.83, -8.85, 0.52)
pt3dadd(132.96, 862.64, -8.95, 0.52)
pt3dadd(133.11, 863.37, -9, 0.52)
pt3dadd(133.11, 864.33, -9, 0.52)
pt3dadd(133.33, 865.44, -9.05, 0.52)
pt3dadd(133.26, 866.1, -9.05, 0.52)
pt3dadd(133.04, 866.62, -9.15, 0.52)
}
}
proc shape3d_26() {
apic[22] { pt3dadd(133.33, 867.5, -9.2, 0.52)
pt3dadd(133.7, 868.54, -9.25, 0.52)
pt3dadd(133.77, 869.57, -8.7, 0.52)
pt3dadd(133.92, 870.45, -8.5, 0.52)
pt3dadd(134.14, 871.34, -8.35, 0.52)
pt3dadd(134.22, 872.22, -8.3, 0.52)
pt3dadd(134.73, 873.11, -8.25, 0.52)
pt3dadd(134.73, 873.99, -8.2, 0.52)
pt3dadd(134.66, 875.25, -8.15, 0.52)
pt3dadd(134.44, 876.35, -8.15, 0.52)
pt3dadd(134.14, 877.31, -8.1, 0.52)
pt3dadd(133.77, 878.2, -8.05, 0.52)
pt3dadd(133.4, 879.16, -8, 0.52)
pt3dadd(132.67, 880.12, -8, 0.52)
pt3dadd(132.3, 881.15, -8, 0.52)
pt3dadd(131.63, 881.96, -7.95, 0.52)
pt3dadd(131.41, 882.25, -7.95, 0.67)
pt3dadd(130.89, 882.7, -7.95, 0.67)
pt3dadd(130.3, 883.07, -7.95, 0.67)
pt3dadd(129.86, 883.36, -7.95, 0.67)
pt3dadd(129.34, 884.1, -7.9, 0.67)
pt3dadd(129.08, 884.8, -7.75, 0.67)
pt3dadd(128.86, 885.24, -7.75, 0.67)
pt3dadd(128.49, 885.39, -7.7, 0.67)
pt3dadd(128.05, 885.61, -7.55, 0.67)
pt3dadd(127.53, 885.83, -7.4, 0.67)
pt3dadd(127.01, 886.13, -7.4, 0.67)
pt3dadd(126.79, 886.2, -7.6, 0.67)
pt3dadd(126.13, 886.65, -7.7, 0.67)
pt3dadd(125.9, 887.01, -7.75, 0.67)
pt3dadd(125.61, 887.75, -7.8, 0.52)
pt3dadd(125.54, 888.27, -7.85, 0.52)
pt3dadd(125.83, 889.3, -8.6, 0.52)
pt3dadd(126.13, 889.89, -8.65, 0.52)
pt3dadd(126.2, 890.41, -8.3, 0.52)
pt3dadd(126.42, 890.92, -8.35, 0.52)
pt3dadd(126.35, 891.29, -8.55, 0.52)
pt3dadd(126.13, 891.51, -8.7, 0.52)
pt3dadd(125.68, 892.18, -8.8, 0.52)
pt3dadd(125.39, 892.69, -8.85, 0.52)
pt3dadd(125.02, 893.06, -8.9, 0.52)
pt3dadd(124.72, 893.43, -9, 0.52)
pt3dadd(124.65, 894.09, -9, 0.52)
pt3dadd(124.28, 894.68, -9.05, 0.52)
pt3dadd(123.84, 895.27, -9.1, 0.52)
pt3dadd(123.32, 895.86, -9.1, 0.52)
pt3dadd(123.1, 896.9, -9.1, 0.52)
pt3dadd(122.8, 897.56, -9.1, 0.52)
pt3dadd(122.21, 898, -9.2, 0.67)
pt3dadd(121.69, 898.37, -9.2, 0.67)
pt3dadd(121.1, 898.89, -9.25, 0.67)
pt3dadd(120.73, 899.33, -9.25, 0.67)
pt3dadd(120.58, 899.92, -9.3, 0.67)
pt3dadd(120.88, 900.81, -10.1, 0.67)
pt3dadd(120.95, 901.4, -10.1, 0.67)
pt3dadd(120.95, 902.06, -10.15, 0.67)
pt3dadd(121.17, 902.87, -9.1, 0.67)
pt3dadd(121.1, 903.39, -9, 0.67)
pt3dadd(120.81, 903.9, -8.9, 0.67)
pt3dadd(120.51, 904.42, -8.85, 0.67)
pt3dadd(120.14, 905.01, -8.8, 0.67)
pt3dadd(119.99, 905.89, -8.8, 0.67)
pt3dadd(119.84, 906.56, -9.85, 0.67)
pt3dadd(119.25, 907.37, -9.75, 0.67)
}
apic[23] {pt3dclear()
pt3dadd(119.25, 907.37, -9.75, 0.67)
pt3dadd(119.18, 907.96, -9.05, 0.67)
pt3dadd(118.81, 908.33, -8.9, 0.67)
pt3dadd(118.59, 908.77, -8.8, 0.67)
pt3dadd(118.37, 909.36, -8.7, 0.67)
pt3dadd(118.59, 910.02, -8.65, 0.67)
pt3dadd(118.66, 910.76, -8.6, 0.67)
pt3dadd(119.25, 910.98, -8.6, 0.67)
pt3dadd(119.84, 911.06, -8.65, 0.67)
pt3dadd(120.21, 911.65, -8.7, 0.67)
pt3dadd(120.44, 912.75, -8.75, 0.67)
pt3dadd(120.66, 913.2, -8.8, 0.67)
pt3dadd(121.32, 913.34, -8.8, 0.67)
pt3dadd(121.84, 914.08, -8.8, 0.67)
pt3dadd(122.36, 914.6, -8.8, 0.67)
pt3dadd(122.36, 915.11, -8.8, 0.67)
pt3dadd(122.14, 915.56, -8.85, 0.67)
pt3dadd(122.63, 916.05, -8.85, 0.44)
pt3dadd(123.37, 916.35, -8.85, 0.44)
pt3dadd(123.59, 917.38, -8.1, 0.44)
pt3dadd(123.51, 918.12, -8, 0.44)
pt3dadd(123.59, 919.08, -7.9, 0.59)
pt3dadd(124.25, 919.52, -7.85, 0.59)
pt3dadd(124.99, 919.59, -7.85, 0.59)
pt3dadd(125.29, 919.59, -7.85, 0.59)
pt3dadd(125.95, 919.52, -7.85, 0.59)
pt3dadd(126.84, 919.23, -7.85, 0.59)
pt3dadd(127.58, 919.59, -8.2, 0.59)
pt3dadd(128.39, 919.89, -8.4, 0.59)
pt3dadd(128.98, 920.33, -8.55, 0.59)
pt3dadd(130.09, 920.63, -8.75, 0.59)
pt3dadd(131.13, 920.55, -8.85, 0.59)
pt3dadd(132.16, 920.33, -8.9, 0.59)
pt3dadd(133.71, 920.55, -9.45, 0.59)
}
apic[24] {pt3dclear()
pt3dadd(119.25, 907.37, -9.75, 0.52)
pt3dadd(118.64, 907.43, -9.75, 0.52)
pt3dadd(118.04, 907.65, -10.05, 0.52)
pt3dadd(117.6, 908.16, -10.15, 0.52)
pt3dadd(117.3, 908.75, -10.2, 0.52)
pt3dadd(117.3, 909.42, -10.25, 0.52)
pt3dadd(117.53, 910.38, -10.3, 0.52)
pt3dadd(117.67, 911.11, -10.3, 0.52)
pt3dadd(117.6, 911.63, -10.3, 0.52)
pt3dadd(117.9, 912.37, -10.3, 0.52)
pt3dadd(118.34, 913.1, -10.45, 0.52)
pt3dadd(118.49, 913.69, -11.35, 0.52)
pt3dadd(118.34, 914.51, -11.4, 0.52)
pt3dadd(118.19, 914.95, -11.5, 0.52)
pt3dadd(117.6, 915.32, -10.85, 0.52)
pt3dadd(117.01, 915.54, -10.85, 0.52)
pt3dadd(116.64, 915.98, -10.85, 0.52)
pt3dadd(116.27, 916.57, -10.85, 0.52)
pt3dadd(115.6, 916.72, -10.85, 0.52)
pt3dadd(115.01, 917.23, -10.85, 0.52)
pt3dadd(115.01, 918.12, -10.85, 0.52)
pt3dadd(115.53, 918.41, -10.85, 0.52)
pt3dadd(115.97, 919, -10.85, 0.52)
pt3dadd(116.27, 919.52, -11.1, 0.52)
pt3dadd(116.27, 920.33, -11, 0.52)
pt3dadd(117.01, 920.85, -10.95, 0.52)
pt3dadd(117.38, 921.29, -12.35, 0.52)
pt3dadd(116.94, 921.95, -12.45, 0.52)
pt3dadd(116.27, 922.03, -13.95, 0.52)
pt3dadd(115.68, 922.47, -14.05, 0.37)
pt3dadd(115.01, 922.91, -14.05, 0.37)
pt3dadd(114.42, 923.43, -14.05, 0.37)
pt3dadd(113.61, 923.65, -14.1, 0.37)
pt3dadd(113.02, 923.8, -14.8, 0.37)
pt3dadd(112.28, 924.09, -15.05, 0.37)
pt3dadd(111.54, 924.39, -15.05, 0.37)
pt3dadd(111.32, 924.68, -15.1, 0.37)
pt3dadd(110.73, 925.2, -15.1, 0.37)
pt3dadd(110.28, 925.49, -15.1, 0.37)
pt3dadd(109.69, 925.42, -15.15, 0.37)
pt3dadd(108.66, 925.35, -15.75, 0.37)
pt3dadd(108.07, 925.27, -16.05, 0.37)
pt3dadd(107.18, 925.2, -16.2, 0.37)
pt3dadd(106.37, 924.9, -16.2, 0.37)
}
apic[25] {pt3dclear()
pt3dadd(145.22, 790.34, -10.6, 0.52)
pt3dadd(145.23, 790.95, -8.5, 0.52)
pt3dadd(145.53, 791.54, -8.5, 0.52)
pt3dadd(144.71, 792.06, -8.55, 0.52)
pt3dadd(144.05, 792.36, -8.55, 0.52)
pt3dadd(143.53, 792.58, -8.55, 0.67)
pt3dadd(143.09, 793.02, -8.55, 0.67)
pt3dadd(142.64, 793.31, -8.5, 0.67)
pt3dadd(142.27, 793.98, -8.5, 0.67)
pt3dadd(142.27, 794.42, -8.5, 0.67)
pt3dadd(142.57, 794.94, -8.5, 0.67)
pt3dadd(142.64, 795.6, -8.55, 0.67)
pt3dadd(143.38, 795.9, -8.55, 0.67)
pt3dadd(144.12, 795.75, -8.1, 0.67)
pt3dadd(144.49, 795.6, -7.95, 0.67)
pt3dadd(145.16, 795.31, -7.9, 0.67)
pt3dadd(145.82, 794.86, -7.85, 0.67)
pt3dadd(146.34, 794.57, -7.8, 0.67)
pt3dadd(146.93, 794.2, -7.8, 0.67)
pt3dadd(147.6, 794.2, -7.75, 0.67)
pt3dadd(148.19, 794.57, -7.75, 0.67)
pt3dadd(148.93, 794.49, -7.7, 0.67)
pt3dadd(149.67, 794.64, -7.7, 0.67)
pt3dadd(150.85, 794.49, -7.7, 0.67)
pt3dadd(151.51, 794.2, -7.7, 0.67)
pt3dadd(151.66, 793.68, -6.1, 0.67)
pt3dadd(151.88, 792.95, -6.05, 0.67)
pt3dadd(152.25, 792.36, -6.05, 0.67)
pt3dadd(152.7, 791.69, -6.05, 0.67)
pt3dadd(152.84, 791.25, -6.05, 0.67)
pt3dadd(152.99, 790.66, -5.2, 0.59)
pt3dadd(152.84, 790.14, -5.2, 0.59)
pt3dadd(152.99, 789.48, -5.2, 0.59)
pt3dadd(153.36, 789.04, -5.15, 0.59)
pt3dadd(153.8, 789.48, -5.15, 0.59)
pt3dadd(154.1, 790.29, -4.15, 0.59)
pt3dadd(154.4, 790.59, -4.05, 0.59)
pt3dadd(155.06, 790.59, -4.05, 0.59)
pt3dadd(156.02, 790.44, -4, 0.59)
pt3dadd(156.46, 790.95, -4, 0.59)
pt3dadd(157.2, 791.1, -4, 0.59)
pt3dadd(158.46, 791.25, -4, 0.59)
pt3dadd(158.83, 791.1, -4, 0.59)
pt3dadd(159.94, 790.59, -3.95, 0.59)
pt3dadd(161.12, 790.36, -3.95, 0.59)
pt3dadd(162.16, 789.92, -2.85, 0.59)
pt3dadd(163.12, 789.63, -2.8, 0.59)
pt3dadd(164.08, 789.48, -2.8, 0.59)
pt3dadd(165.26, 789.63, -2.75, 0.59)
pt3dadd(165.78, 790.14, -2.75, 0.59)
pt3dadd(166.44, 790.44, -2.75, 0.59)
pt3dadd(167.11, 791.4, -2.7, 0.59)
pt3dadd(167.7, 791.77, -2.7, 0.59)
pt3dadd(168.22, 792.43, -3.2, 0.67)
pt3dadd(168.36, 792.95, -3.35, 0.67)
pt3dadd(168.44, 793.61, -3.5, 0.67)
pt3dadd(168.73, 793.98, -3.55, 0.67)
pt3dadd(169.18, 794.49, -3.7, 0.67)
}
}
proc shape3d_27() {
apic[25] { pt3dadd(169.4, 795.01, -3.8, 0.67)
pt3dadd(170.06, 795.97, -4.05, 0.67)
pt3dadd(170.14, 796.63, -4.2, 0.67)
pt3dadd(170.51, 797, -4.2, 0.67)
pt3dadd(171.1, 797.44, -4.25, 0.67)
pt3dadd(171.99, 797.74, -4.3, 0.67)
pt3dadd(172.5, 798.26, -4.35, 0.67)
pt3dadd(173.32, 798.7, -4.35, 0.67)
pt3dadd(174.13, 799.14, -4.35, 0.67)
pt3dadd(174.87, 799.73, -4.35, 0.67)
pt3dadd(175.53, 800.47, -4.9, 0.67)
pt3dadd(175.61, 801.65, -5, 0.67)
pt3dadd(175.76, 802.68, -5.1, 0.67)
pt3dadd(176.2, 803.34, -5.15, 0.67)
pt3dadd(176.49, 804.01, -5.4, 0.67)
pt3dadd(177.09, 804.6, -5.45, 0.67)
pt3dadd(177.31, 805.63, -5.5, 0.67)
pt3dadd(177.68, 806.22, -5.5, 0.67)
pt3dadd(178.49, 806.74, -5.55, 0.67)
pt3dadd(179.08, 807.4, -5.55, 0.67)
pt3dadd(179.45, 807.92, -5.55, 0.67)
pt3dadd(179.6, 808.88, -6.05, 0.67)
pt3dadd(179.82, 809.91, -6.1, 0.67)
pt3dadd(180.26, 810.94, -6.1, 0.67)
pt3dadd(180.26, 811.9, -6.15, 0.67)
pt3dadd(180.63, 812.49, -6.15, 0.67)
pt3dadd(181.15, 813.3, -6.15, 0.67)
pt3dadd(181.96, 813.89, -6.15, 0.67)
pt3dadd(182.55, 814.63, -6.15, 0.67)
pt3dadd(182.7, 815.37, -6.15, 0.67)
pt3dadd(183.52, 815.59, -6.15, 0.67)
pt3dadd(184.25, 816.32, -6.15, 0.67)
pt3dadd(184.77, 816.69, -6.15, 0.67)
pt3dadd(185.22, 817.43, -6.5, 0.59)
pt3dadd(186.03, 817.8, -6.5, 0.59)
pt3dadd(186.92, 818.39, -6.5, 0.59)
pt3dadd(187.88, 818.39, -6.55, 0.59)
pt3dadd(189.21, 818.46, -6.55, 0.59)
pt3dadd(190.39, 818.54, -6.55, 0.59)
pt3dadd(191.35, 818.46, -6.55, 0.59)
pt3dadd(192.53, 818.68, -6.55, 0.59)
pt3dadd(193.05, 818.98, -6.55, 0.59)
pt3dadd(193.83, 818.84, -6.55, 0.59)
pt3dadd(194.5, 819.43, -6.55, 0.59)
pt3dadd(194.8, 820.32, -7, 0.59)
pt3dadd(194.5, 821.2, -7, 0.59)
pt3dadd(194.43, 822.01, -6.95, 0.59)
pt3dadd(195.17, 822.16, -6.95, 0.59)
pt3dadd(195.76, 821.65, -6.4, 0.59)
pt3dadd(195.98, 821.13, -6.3, 0.59)
pt3dadd(196.87, 820.69, -6.2, 0.59)
pt3dadd(197.53, 820.61, -6.15, 0.59)
pt3dadd(197.9, 820.83, -6.1, 0.59)
pt3dadd(198.34, 821.42, -5.65, 0.59)
pt3dadd(198.79, 822.01, -5.55, 0.59)
pt3dadd(199.08, 822.97, -5.35, 0.59)
pt3dadd(199.82, 823.42, -5.25, 0.59)
pt3dadd(200.56, 823.34, -5.2, 0.59)
pt3dadd(201.08, 823.12, -5.15, 0.59)
pt3dadd(201.82, 822.75, -5.15, 0.59)
pt3dadd(202.7, 822.6, -5.1, 0.59)
pt3dadd(203.22, 822.53, -5.1, 0.59)
pt3dadd(203.52, 822.6, -5.1, 0.59)
pt3dadd(203.66, 822.97, -5.05, 0.59)
pt3dadd(204.33, 823.71, -4.95, 0.59)
pt3dadd(204.63, 824.45, -4.9, 0.59)
pt3dadd(205.07, 824.67, -4.9, 0.59)
pt3dadd(205.81, 824.96, -4.8, 0.59)
pt3dadd(206.33, 825.55, -4.8, 0.59)
pt3dadd(206.99, 825.92, -4.8, 0.59)
pt3dadd(207.66, 826.22, -4.75, 0.52)
pt3dadd(208.1, 826.44, -4.75, 0.52)
pt3dadd(208.25, 827.1, -4.75, 0.52)
pt3dadd(208.03, 828.14, -4.7, 0.52)
pt3dadd(207.88, 828.8, -4.7, 0.52)
pt3dadd(208.62, 829.32, -4.7, 0.52)
pt3dadd(209.21, 829.02, -3.35, 0.52)
pt3dadd(209.73, 828.65, -3.3, 0.52)
pt3dadd(210.09, 827.99, -3.25, 0.52)
pt3dadd(210.69, 827.47, -3.25, 0.52)
pt3dadd(211.79, 827.69, -2.55, 0.52)
pt3dadd(212.53, 827.77, -2.5, 0.52)
pt3dadd(213.27, 827.99, -2.5, 0.52)
pt3dadd(214.23, 828.06, -2.45, 0.52)
pt3dadd(215.27, 828.43, -2.45, 0.52)
pt3dadd(215.71, 828.43, -2.45, 0.52)
pt3dadd(215.34, 827.77, -2.45, 0.52)
pt3dadd(215.49, 826.96, -2.45, 0.52)
pt3dadd(216.3, 826.51, -2.45, 0.52)
pt3dadd(216.97, 827.25, -1.5, 0.52)
pt3dadd(217.49, 827.84, -1.45, 0.52)
pt3dadd(218.22, 828.5, -1.4, 0.52)
pt3dadd(218.67, 829.17, -1.4, 0.52)
pt3dadd(218.96, 829.83, -1.35, 0.52)
pt3dadd(219.48, 830.72, -1.3, 0.52)
pt3dadd(220, 831.09, -1.3, 0.52)
pt3dadd(220.59, 830.72, -0.95, 0.59)
pt3dadd(221.33, 830.35, -0.9, 0.59)
pt3dadd(222.44, 830.13, -0.9, 0.59)
pt3dadd(223.25, 829.91, -0.9, 0.59)
pt3dadd(224.14, 829.68, -0.85, 0.59)
pt3dadd(224.65, 830.05, -0.85, 0.59)
pt3dadd(225.1, 830.13, -0.85, 0.59)
pt3dadd(225.99, 830.57, -0.85, 0.59)
pt3dadd(226.28, 831.09, -0.7, 0.59)
pt3dadd(227.09, 831.45, 0.1, 0.59)
pt3dadd(227.83, 831.68, 0.2, 0.59)
pt3dadd(228.87, 831.97, 0.2, 0.59)
pt3dadd(229.31, 832.41, 0.2, 0.59)
pt3dadd(229.75, 832.86, 0.25, 0.59)
pt3dadd(230.2, 833.52, 0.35, 0.59)
pt3dadd(230.35, 833.59, 0.4, 0.59)
pt3dadd(231.01, 833.59, 0.4, 0.59)
pt3dadd(231.6, 834.18, 0.45, 0.59)
pt3dadd(231.97, 835.07, 1.45, 0.59)
pt3dadd(231.82, 835.66, 1.45, 0.59)
pt3dadd(231.38, 836.32, 1.45, 0.59)
pt3dadd(231.23, 836.91, 1.5, 0.59)
pt3dadd(231.45, 837.43, 1.5, 0.59)
pt3dadd(231.6, 838.02, 1.5, 0.59)
pt3dadd(232.27, 838.39, 1.5, 0.59)
pt3dadd(232.78, 838.76, 1.5, 0.59)
pt3dadd(234.12, 838.9, 1.5, 0.59)
pt3dadd(234.63, 838.83, 1.5, 0.59)
pt3dadd(235.67, 838.9, 1.5, 0.59)
pt3dadd(236.55, 839.05, 0.3, 0.59)
pt3dadd(237.44, 839.05, 0.15, 0.59)
pt3dadd(237.88, 839.05, 0.15, 0.59)
pt3dadd(238.92, 839.27, 0.15, 0.59)
pt3dadd(239.36, 839.64, 0.15, 0.59)
pt3dadd(239.81, 839.79, 0.9, 0.59)
pt3dadd(240.55, 840.67, 0.9, 0.59)
pt3dadd(240.92, 841.34, 2, 0.59)
pt3dadd(241.44, 841.86, 1.9, 0.59)
pt3dadd(242.4, 842.45, 1.8, 0.59)
pt3dadd(243.07, 842.67, 1.75, 0.59)
pt3dadd(243.73, 843.19, 1.65, 0.59)
pt3dadd(244.47, 843.56, 1.65, 0.59)
pt3dadd(245.5, 844.59, 0.8, 0.59)
pt3dadd(245.5, 845.18, 0.65, 0.59)
}
apic[26] {pt3dclear()
pt3dadd(96.76, 744.13, -7.65, 0.67)
pt3dadd(96.92, 744.88, -6.35, 0.67)
pt3dadd(97.73, 745.47, -6.3, 0.67)
pt3dadd(98.32, 746.2, -6.25, 0.67)
pt3dadd(98.91, 747.09, -6.2, 0.67)
pt3dadd(99.13, 748.12, -6.2, 0.67)
pt3dadd(99.28, 748.71, -6.15, 0.67)
pt3dadd(99.58, 749.67, -6, 0.67)
pt3dadd(99.43, 750.33, -5.95, 0.67)
pt3dadd(99.5, 751.14, -5.85, 0.74)
pt3dadd(99.73, 751.88, -5.7, 0.74)
pt3dadd(99.87, 752.69, -5.65, 0.74)
pt3dadd(99.5, 753.28, -5.6, 0.74)
pt3dadd(98.77, 753.73, -5.55, 0.74)
pt3dadd(98.62, 754.24, -5.5, 0.74)
pt3dadd(99.21, 754.76, -5.5, 0.74)
pt3dadd(100.02, 754.54, -5.5, 0.74)
pt3dadd(101.13, 754.54, -4.65, 0.74)
pt3dadd(102.17, 754.76, -4.6, 0.74)
pt3dadd(103.05, 754.76, -4.6, 0.74)
pt3dadd(103.87, 754.98, -4.55, 0.74)
pt3dadd(104.09, 755.13, -4.55, 0.89)
pt3dadd(104.6, 755.64, -4.55, 0.89)
pt3dadd(105.2, 756.09, -4.55, 0.89)
pt3dadd(105.93, 756.6, -4.55, 0.89)
pt3dadd(106.53, 757.12, -4.55, 0.89)
pt3dadd(106.9, 757.86, -4.55, 0.89)
pt3dadd(106.9, 759.11, -3.9, 0.89)
pt3dadd(106.82, 760.22, -3.9, 0.89)
pt3dadd(106.75, 760.81, -3.85, 0.89)
pt3dadd(106.6, 761.69, -3.85, 0.89)
pt3dadd(106.45, 762.43, -3.85, 0.89)
pt3dadd(106.08, 762.94, -3.85, 0.89)
pt3dadd(106.3, 763.68, -3.85, 0.89)
pt3dadd(106.45, 764.49, -3.85, 0.89)
pt3dadd(106.97, 765.08, -3.85, 0.89)
pt3dadd(108, 765.08, -3.85, 0.96)
pt3dadd(109.19, 765.16, -3.85, 0.96)
pt3dadd(109.85, 765.3, -3.85, 0.96)
pt3dadd(110.81, 765.3, -3.85, 0.96)
pt3dadd(111.55, 765.6, -3.85, 0.96)
pt3dadd(112.07, 765.97, -3.65, 0.74)
pt3dadd(112.36, 766.78, -3.6, 0.74)
pt3dadd(112.29, 767.52, -3.55, 0.74)
pt3dadd(112.22, 768.33, -2.75, 0.74)
pt3dadd(112.66, 768.99, -2.75, 0.74)
pt3dadd(113.47, 769.29, -2.75, 0.74)
pt3dadd(113.92, 769.73, -2.85, 0.74)
pt3dadd(114.58, 770.02, -2.95, 0.74)
pt3dadd(115.25, 771.06, -3, 0.74)
pt3dadd(115.47, 771.87, -2.95, 0.74)
pt3dadd(115.47, 772.46, -2.55, 0.74)
pt3dadd(115.91, 773.42, -2.35, 0.74)
pt3dadd(116.06, 774.15, -2.35, 0.74)
pt3dadd(116.65, 775.04, -2.35, 0.74)
pt3dadd(117.17, 775.11, -2.4, 0.74)
pt3dadd(117.91, 774.6, -2.45, 0.74)
pt3dadd(118.5, 774.01, -2, 0.89)
pt3dadd(118.65, 773.12, -1.95, 0.89)
pt3dadd(119.09, 772.61, -1.9, 0.89)
}
}
proc shape3d_28() {
apic[26] { pt3dadd(119.53, 772.09, -1.1, 0.89)
pt3dadd(120.27, 771.65, -1, 0.89)
pt3dadd(121.46, 771.57, -0.95, 0.89)
pt3dadd(122.27, 772.02, -0.4, 0.89)
pt3dadd(122.86, 772.75, -0.2, 0.89)
pt3dadd(123.67, 773.2, -0.15, 0.89)
pt3dadd(124.19, 773.93, -0.1, 0.89)
pt3dadd(124.93, 774.52, -0.05, 0.89)
pt3dadd(125.37, 775.04, -0.05, 0.89)
pt3dadd(125.96, 775.55, 0, 0.89)
pt3dadd(126.78, 776.07, 0, 0.89)
pt3dadd(127.34, 776.9, 0.05, 0.89)
pt3dadd(128.15, 776.68, 1.45, 0.89)
pt3dadd(128.67, 775.72, 1.5, 0.89)
pt3dadd(128.82, 774.68, 1.5, 0.89)
pt3dadd(129.11, 773.65, 1.8, 0.89)
pt3dadd(129.33, 772.32, 1.75, 0.89)
pt3dadd(129.78, 771.22, 1.75, 0.89)
pt3dadd(130.44, 770.78, 1.75, 0.89)
pt3dadd(131.18, 770.11, 2.65, 0.89)
pt3dadd(132.44, 769.96, 2.95, 0.89)
pt3dadd(133.33, 770.63, 2.95, 0.89)
pt3dadd(134.07, 771.29, 3.15, 0.89)
pt3dadd(134.43, 772.1, 3.2, 0.89)
pt3dadd(134.8, 772.69, 3.25, 0.89)
pt3dadd(135.4, 773.28, 3.25, 0.89)
pt3dadd(135.84, 773.87, 3.3, 0.89)
pt3dadd(136.13, 774.83, 3.3, 0.89)
pt3dadd(136.06, 775.5, 3.3, 0.89)
pt3dadd(136.28, 776.23, 3.3, 0.89)
pt3dadd(136.5, 777.19, 3.3, 0.89)
pt3dadd(136.73, 777.78, 3.35, 0.89)
pt3dadd(137.69, 778, 3.35, 0.89)
pt3dadd(138.65, 778, 3.35, 0.89)
pt3dadd(139.53, 778.15, 3.75, 0.89)
pt3dadd(140.27, 778.74, 3.8, 0.89)
pt3dadd(140.86, 779.48, 3.85, 0.89)
pt3dadd(141.53, 779.92, 4.7, 0.89)
pt3dadd(141.38, 780.88, 4.75, 0.89)
pt3dadd(141.46, 781.84, 4.75, 0.89)
pt3dadd(142.19, 782.28, 4.75, 0.89)
pt3dadd(142.79, 782.06, 4.75, 0.89)
pt3dadd(143.45, 781.69, 4.75, 0.89)
pt3dadd(143.89, 781.25, 4.95, 0.89)
pt3dadd(144.56, 780.51, 5.25, 0.89)
pt3dadd(144.93, 779.7, 5.3, 0.89)
pt3dadd(145, 778.52, 5.3, 0.89)
pt3dadd(145.89, 777.71, 5.6, 0.89)
pt3dadd(146.48, 777.19, 5.75, 0.89)
pt3dadd(147.29, 776.75, 6.1, 0.89)
pt3dadd(147.44, 777.56, 7.1, 0.89)
pt3dadd(147.15, 778.74, 8.95, 0.89)
pt3dadd(147.44, 779.55, 8.8, 0.89)
}
apic[27] {pt3dclear()
pt3dadd(147.44, 779.55, 8.8, 0.89)
pt3dadd(147.07, 780.66, 8.7, 0.89)
pt3dadd(147.22, 781.62, 8.2, 0.89)
pt3dadd(147.29, 782.8, 7.95, 0.89)
pt3dadd(147.44, 783.83, 7.8, 0.89)
pt3dadd(147.74, 784.35, 7.65, 0.67)
pt3dadd(148.26, 784.94, 7.6, 0.67)
pt3dadd(148.99, 785.53, 7.6, 0.67)
pt3dadd(149.81, 785.82, 7.6, 0.67)
pt3dadd(150.69, 786.19, 7.55, 0.67)
pt3dadd(151.51, 786.26, 7.55, 0.67)
pt3dadd(151.73, 787.37, 7.5, 0.67)
pt3dadd(151.66, 788.7, 7.55, 0.67)
pt3dadd(151.51, 789.51, 7.35, 0.67)
pt3dadd(151.21, 790.47, 7.25, 0.67)
pt3dadd(150.84, 791.43, 7.1, 0.67)
pt3dadd(150.47, 792.09, 7.05, 0.67)
pt3dadd(149.96, 792.61, 6.95, 0.67)
pt3dadd(149.73, 793.27, 6.85, 0.67)
pt3dadd(149.66, 793.93, 6.65, 0.67)
pt3dadd(149.96, 794.67, 6.5, 0.67)
pt3dadd(150.4, 795.33, 6.25, 0.67)
pt3dadd(150.62, 796.15, 6.15, 0.67)
pt3dadd(150.84, 796.88, 6.05, 0.67)
pt3dadd(151.66, 797.4, 6, 0.67)
pt3dadd(152.62, 797.84, 5.95, 0.67)
pt3dadd(153.58, 797.77, 5.95, 0.67)
pt3dadd(154.39, 797.33, 7.1, 0.67)
pt3dadd(154.76, 796.88, 7.2, 0.67)
pt3dadd(155.2, 796.22, 7.3, 0.67)
pt3dadd(155.79, 795.63, 7.35, 0.67)
pt3dadd(156.61, 795.26, 7.4, 0.67)
pt3dadd(157.35, 795.11, 7.45, 0.67)
pt3dadd(158.45, 795.56, 7.45, 0.67)
pt3dadd(159.19, 795.85, 7.45, 0.67)
pt3dadd(159.93, 796.37, 7.45, 0.67)
pt3dadd(160.45, 797.1, 7.45, 0.67)
pt3dadd(160.3, 797.92, 7.55, 0.67)
pt3dadd(160.3, 798.87, 7.55, 0.67)
pt3dadd(160.38, 799.91, 7.6, 0.67)
pt3dadd(160.97, 800.79, 7.6, 0.67)
pt3dadd(161.49, 801.6, 7.65, 0.67)
pt3dadd(161.71, 802.27, 7.65, 0.67)
pt3dadd(162, 803, 7.7, 0.67)
pt3dadd(162.52, 803.89, 7.75, 0.67)
pt3dadd(162.96, 804.55, 8, 0.67)
pt3dadd(163.85, 805.07, 8.2, 0.67)
pt3dadd(164.37, 805.66, 8.15, 0.67)
pt3dadd(164.96, 805.88, 8, 0.67)
pt3dadd(165.18, 806.62, 7.85, 0.67)
pt3dadd(164.59, 806.99, 7.8, 0.67)
pt3dadd(164.07, 807.43, 7.7, 0.67)
pt3dadd(163.85, 807.94, 7.65, 0.67)
pt3dadd(163.82, 808.37, 7.4, 0.67)
pt3dadd(164.19, 809.03, 6.9, 0.67)
pt3dadd(164.41, 809.85, 7.2, 0.67)
pt3dadd(165.08, 810.29, 8.45, 0.67)
pt3dadd(166.19, 810.66, 8.6, 0.67)
pt3dadd(167.07, 811.1, 8.65, 0.67)
pt3dadd(167.67, 811.76, 8.7, 0.67)
pt3dadd(168.33, 812.35, 8.75, 0.67)
pt3dadd(168.85, 813.02, 8.8, 0.67)
pt3dadd(168.77, 813.83, 8.8, 0.67)
pt3dadd(168.55, 814.49, 9.6, 0.67)
pt3dadd(167.81, 815.08, 9.55, 0.67)
pt3dadd(167.44, 815.67, 9.4, 0.67)
pt3dadd(166.7, 816.26, 9.35, 0.67)
pt3dadd(166.41, 817.22, 9.3, 0.67)
pt3dadd(167.07, 816.93, 9.25, 0.67)
pt3dadd(167.89, 816.48, 9.25, 0.67)
pt3dadd(168.55, 816.63, 9.25, 0.67)
pt3dadd(169.22, 817, 9.15, 0.67)
pt3dadd(169.73, 817.74, 9, 0.67)
pt3dadd(169.96, 818.62, 8.85, 0.67)
pt3dadd(170.25, 819.65, 8.65, 0.67)
pt3dadd(170.92, 820.24, 8.6, 0.67)
pt3dadd(171.07, 821.13, 8.55, 0.67)
pt3dadd(171.51, 822.16, 8.5, 0.67)
pt3dadd(171.95, 822.83, 8.5, 0.67)
pt3dadd(172.25, 823.86, 8.5, 0.67)
pt3dadd(172.32, 824.82, 8.45, 0.67)
pt3dadd(172.32, 825.7, 8.45, 0.67)
pt3dadd(172.4, 826.29, 8.4, 0.44)
pt3dadd(172.17, 827.03, 8.4, 0.44)
pt3dadd(172.76, 827.99, 8.4, 0.44)
pt3dadd(173.28, 828.73, 8.4, 0.44)
pt3dadd(174.1, 829.17, 8.4, 0.52)
pt3dadd(175.06, 829.39, 8.4, 0.52)
pt3dadd(175.94, 829.68, 8.9, 0.52)
pt3dadd(176.83, 829.54, 9.05, 0.52)
pt3dadd(178.01, 829.32, 9.1, 0.52)
pt3dadd(178.97, 829.61, 9.25, 0.52)
pt3dadd(179.12, 830.57, 9.25, 0.52)
pt3dadd(179.27, 831.68, 9.25, 0.52)
pt3dadd(179.93, 832.56, 9.3, 0.52)
pt3dadd(180.82, 833.59, 9.3, 0.52)
pt3dadd(181.26, 834.18, 9.3, 0.52)
pt3dadd(181.71, 834.63, 9.45, 0.52)
pt3dadd(181.93, 835.51, 9.75, 0.52)
pt3dadd(182.23, 836.39, 9.95, 0.52)
pt3dadd(182.82, 837.06, 9.7, 0.52)
pt3dadd(183.26, 837.72, 9.25, 0.52)
pt3dadd(183.48, 838.53, 9.1, 0.52)
pt3dadd(183.7, 838.83, 8.95, 0.52)
pt3dadd(184.44, 839.27, 8.9, 0.52)
pt3dadd(185.03, 840.17, 8.6, 0.52)
pt3dadd(185.48, 840.61, 8.6, 0.52)
pt3dadd(186.14, 841.35, 8.55, 0.52)
pt3dadd(186.66, 842.16, 8.55, 0.52)
pt3dadd(186.51, 843.26, 8.55, 0.52)
pt3dadd(185.92, 843.93, 8.55, 0.52)
pt3dadd(185.4, 844.37, 8.55, 0.52)
pt3dadd(185.18, 845.11, 8.55, 0.52)
pt3dadd(184.52, 845.7, 8.5, 0.52)
pt3dadd(184.67, 846.51, 8.5, 0.52)
pt3dadd(184.52, 847.17, 8.5, 0.52)
pt3dadd(185.03, 847.84, 8.5, 0.52)
pt3dadd(185.55, 848.35, 8.5, 0.52)
pt3dadd(186.88, 848.79, 8.45, 0.52)
pt3dadd(187.77, 849.16, 8.4, 0.52)
pt3dadd(188.73, 849.31, 8.4, 0.52)
pt3dadd(189.47, 850.27, 8.35, 0.52)
pt3dadd(190.13, 851.08, 8.35, 0.52)
pt3dadd(190.5, 851.89, 8.35, 0.52)
pt3dadd(191.02, 852.92, 8.35, 0.52)
pt3dadd(191.32, 853.96, 9.45, 0.52)
pt3dadd(191.39, 854.77, 9.35, 0.52)
pt3dadd(191.76, 855.14, 9.15, 0.52)
pt3dadd(192.43, 855.65, 9, 0.52)
pt3dadd(193.02, 856.24, 8.95, 0.52)
pt3dadd(193.24, 856.91, 8.9, 0.52)
pt3dadd(193.76, 857.57, 8.85, 0.52)
pt3dadd(193.98, 858.31, 8.8, 0.52)
pt3dadd(194.2, 858.9, 8.8, 0.52)
pt3dadd(194.13, 859.71, 8.8, 0.52)
pt3dadd(193.98, 860.74, 8.75, 0.52)
pt3dadd(194.35, 861.41, 8.75, 0.52)
pt3dadd(194.05, 862.29, 8.75, 0.52)
pt3dadd(194.05, 862.95, 8.75, 0.52)
pt3dadd(194.05, 863.54, 8.75, 0.52)
pt3dadd(194.86, 864.13, 8.75, 0.52)
pt3dadd(195.31, 864.43, 8.75, 0.52)
pt3dadd(196.34, 864.28, 9.95, 0.52)
pt3dadd(197.16, 863.99, 10.1, 0.52)
pt3dadd(198.19, 864.13, 10.15, 0.52)
pt3dadd(198.63, 864.95, 10.15, 0.52)
pt3dadd(199.15, 865.54, 10.05, 0.52)
}
}
proc shape3d_29() {
apic[27] { pt3dadd(199.37, 866.13, 9.8, 0.52)
pt3dadd(200.04, 866.49, 9.7, 0.52)
pt3dadd(200.78, 866.86, 9.6, 0.52)
pt3dadd(201.66, 867.23, 9.5, 0.52)
pt3dadd(202.4, 867.53, 9.4, 0.52)
pt3dadd(202.85, 868.12, 9.35, 0.52)
pt3dadd(203.14, 868.78, 9.3, 0.52)
pt3dadd(203.66, 869.22, 9.3, 0.52)
pt3dadd(203.73, 870.33, 9.25, 0.52)
pt3dadd(204.18, 871.14, 9.25, 0.52)
pt3dadd(204.69, 871.58, 9, 0.52)
pt3dadd(205.13, 872.09, 9, 0.52)
pt3dadd(205.65, 872.53, 9, 0.52)
pt3dadd(206.31, 873.2, 8.95, 0.52)
pt3dadd(206.83, 873.64, 8, 0.52)
pt3dadd(207.42, 874.23, 7.95, 0.52)
pt3dadd(208.31, 874.67, 8, 0.52)
pt3dadd(209.05, 875.19, 8, 0.52)
pt3dadd(209.42, 875.78, 8, 0.52)
pt3dadd(209.64, 876.3, 8, 0.52)
pt3dadd(209.86, 876.74, 7.65, 0.52)
pt3dadd(209.93, 877.4, 7.75, 0.52)
pt3dadd(210.01, 877.84, 8.05, 0.52)
pt3dadd(210.67, 878.58, 8.45, 0.52)
pt3dadd(210.9, 879.39, 9.25, 0.52)
pt3dadd(210.9, 880.5, 9.55, 0.52)
pt3dadd(210.97, 881.09, 9.65, 0.52)
pt3dadd(211.41, 881.61, 9.6, 0.52)
pt3dadd(212.45, 881.9, 9.45, 0.52)
pt3dadd(213.26, 882.42, 9.35, 0.52)
pt3dadd(213.48, 883.23, 9.3, 0.52)
pt3dadd(213.11, 884.11, 9.2, 0.52)
pt3dadd(213.26, 885.15, 8.65, 0.37)
pt3dadd(214.07, 885.96, 8.4, 0.37)
}
apic[28] {pt3dclear()
pt3dadd(147.44, 779.55, 8.8, 0.52)
pt3dadd(148.31, 779.23, 10.25, 0.52)
pt3dadd(148.61, 778.86, 10.25, 0.52)
pt3dadd(149.13, 778.2, 10.3, 0.52)
pt3dadd(149.72, 777.61, 10.3, 0.52)
pt3dadd(150.46, 777.61, 10.3, 0.52)
pt3dadd(151.12, 777.76, 10.3, 0.52)
pt3dadd(151.57, 778.42, 10.3, 0.52)
pt3dadd(151.93, 779.09, 10.3, 0.52)
pt3dadd(152.23, 779.75, 10.3, 0.52)
pt3dadd(152.3, 780.56, 10.3, 0.52)
pt3dadd(152.53, 781.15, 10.35, 0.52)
pt3dadd(152.97, 781.96, 10.4, 0.52)
pt3dadd(153.34, 782.48, 10.45, 0.52)
pt3dadd(153.93, 782.48, 10.45, 0.52)
pt3dadd(154.67, 781.89, 10.45, 0.52)
pt3dadd(155.19, 781.15, 10.5, 0.52)
pt3dadd(155.78, 780.78, 10.4, 0.52)
pt3dadd(156.96, 780.12, 10.35, 0.52)
pt3dadd(157.55, 779.68, 10.35, 0.52)
pt3dadd(158.07, 779.23, 10.3, 0.52)
pt3dadd(158.96, 779.01, 10.3, 0.44)
pt3dadd(159.77, 778.64, 10.3, 0.44)
pt3dadd(160.43, 778.72, 10.2, 0.44)
pt3dadd(161.1, 778.64, 10.15, 0.44)
pt3dadd(161.32, 779.01, 10.1, 0.44)
pt3dadd(161.4, 779.68, 11.4, 0.44)
pt3dadd(160.73, 780.41, 11.45, 0.44)
pt3dadd(159.99, 780.63, 11.55, 0.44)
pt3dadd(159.77, 781, 11.55, 0.44)
pt3dadd(159.99, 781.37, 11.6, 0.44)
pt3dadd(160.66, 781.89, 11.6, 0.44)
pt3dadd(161.32, 781.67, 11.6, 0.44)
pt3dadd(162.06, 781.59, 11.6, 0.44)
pt3dadd(162.87, 781.08, 11.6, 0.44)
pt3dadd(163.69, 780.86, 11.6, 0.44)
pt3dadd(164.2, 781.08, 11.6, 0.44)
pt3dadd(165.31, 781.15, 11.55, 0.44)
pt3dadd(166.05, 781.37, 12.85, 0.59)
pt3dadd(166.49, 781.67, 12.9, 0.59)
pt3dadd(167.46, 781.67, 12.95, 0.59)
pt3dadd(168.56, 781.67, 13, 0.59)
pt3dadd(169.45, 781.45, 13, 0.59)
pt3dadd(169.89, 781.22, 13, 0.59)
pt3dadd(170.63, 781.08, 13.05, 0.59)
pt3dadd(171.37, 781.3, 13.85, 0.59)
pt3dadd(171.89, 781.52, 13.9, 0.59)
pt3dadd(172.7, 781.15, 13.95, 0.59)
pt3dadd(173, 780.63, 14.8, 0.59)
pt3dadd(173.37, 780.04, 14.85, 0.59)
pt3dadd(173.96, 779.75, 14.9, 0.59)
pt3dadd(174.99, 779.6, 14.9, 0.59)
pt3dadd(175.66, 779.82, 14.9, 0.59)
pt3dadd(176.47, 780.12, 14.95, 0.59)
pt3dadd(177.14, 780.27, 14.95, 0.59)
pt3dadd(178.1, 780.63, 14.95, 0.59)
pt3dadd(179.43, 781.15, 14.95, 0.59)
pt3dadd(180.54, 781.22, 14.95, 0.59)
pt3dadd(181.35, 781.96, 14.95, 0.59)
}
apic[29] {pt3dclear()
pt3dadd(82.71, 730.37, -5.1, 2.07)
pt3dadd(82.68, 730.88, -3.15, 2.07)
pt3dadd(82.6, 731.69, -3.15, 3.03)
pt3dadd(82.9, 732.13, -3.15, 3.99)
pt3dadd(83.05, 733.09, -3.15, 3.99)
pt3dadd(82.16, 733.31, -3.15, 1.4)
pt3dadd(81.35, 733.38, -3.15, 0.96)
pt3dadd(80.68, 733.6, -3.7, 0.67)
pt3dadd(80.09, 734.19, -3.8, 0.67)
pt3dadd(79.35, 734.56, -3.85, 0.67)
pt3dadd(79.2, 735.37, -3.85, 0.67)
pt3dadd(78.69, 736.04, -3.85, 0.67)
pt3dadd(78.69, 736.92, -3.95, 0.67)
pt3dadd(78.54, 737.73, -4, 0.67)
pt3dadd(78.54, 738.69, -4.75, 0.67)
pt3dadd(77.87, 739.36, -5.1, 0.67)
pt3dadd(77.65, 740.02, -5.2, 0.67)
pt3dadd(77.21, 740.68, -5.3, 0.67)
pt3dadd(76.69, 741.13, -3.25, 0.67)
pt3dadd(76.25, 741.86, -3.05, 0.67)
pt3dadd(75.73, 742.31, -2.7, 0.67)
pt3dadd(75.14, 742.82, -2.45, 0.67)
pt3dadd(74.62, 743.19, -2.35, 0.67)
pt3dadd(74.47, 744.08, -2.25, 0.67)
pt3dadd(74.77, 744.81, -2.2, 0.67)
pt3dadd(75.66, 745.48, -3.55, 0.81)
pt3dadd(76.54, 745.85, -3.65, 0.81)
pt3dadd(77.14, 746.07, -3.75, 0.81)
pt3dadd(77.73, 746.58, -3.8, 0.81)
pt3dadd(78.32, 747.32, -3.9, 0.81)
pt3dadd(78.47, 748.28, -3.7, 0.81)
pt3dadd(78.24, 748.87, -3.65, 0.81)
pt3dadd(77.95, 749.24, -2.75, 0.81)
pt3dadd(77.36, 749.17, -2.5, 0.81)
pt3dadd(76.47, 749.98, -2.45, 0.81)
pt3dadd(76.91, 750.42, -2.4, 0.81)
pt3dadd(77.58, 750.2, -2.4, 0.81)
pt3dadd(78.24, 750.05, -2.35, 0.81)
pt3dadd(78.69, 750.64, -1.1, 0.81)
pt3dadd(79.65, 751.3, -0.9, 0.81)
pt3dadd(80.02, 751.89, -0.8, 0.81)
pt3dadd(80.46, 753.22, -0.7, 0.81)
pt3dadd(81.35, 754.11, -0.3, 0.81)
pt3dadd(81.79, 754.92, -2.05, 0.81)
pt3dadd(82.83, 755.58, -2.2, 0.81)
pt3dadd(83.49, 756.69, -2.45, 1.03)
pt3dadd(83.71, 757.65, -1.8, 1.03)
pt3dadd(84.23, 758.46, -1.7, 1.03)
pt3dadd(84.53, 759.12, -1.6, 1.03)
pt3dadd(84.38, 759.93, -1.45, 1.03)
pt3dadd(84.01, 760.6, -1.15, 1.03)
pt3dadd(83.57, 761.26, -0.85, 1.03)
pt3dadd(83.27, 761.92, -0.7, 1.03)
pt3dadd(83.05, 762.66, -0.65, 1.03)
pt3dadd(82.96, 763.38, 0.1, 1.03)
pt3dadd(82.89, 764.27, 0.05, 1.11)
pt3dadd(82.81, 765.15, -0.45, 1.11)
pt3dadd(82.96, 766.11, -1.65, 1.11)
pt3dadd(82.52, 767.07, -1.8, 1.11)
pt3dadd(82.15, 767.81, -1.9, 1.11)
pt3dadd(81.78, 768.47, -1.95, 1.11)
pt3dadd(81.48, 769.13, -2, 1.11)
pt3dadd(81.11, 769.87, -2, 1.11)
pt3dadd(80.89, 770.46, -2.05, 1.11)
pt3dadd(80.37, 771.13, -2.05, 1.11)
pt3dadd(79.86, 771.79, -2.05, 1.11)
pt3dadd(79.27, 772.38, -2.1, 1.11)
pt3dadd(78.75, 773.19, -2.2, 1.11)
pt3dadd(78.23, 774.15, -2.4, 1.11)
pt3dadd(78.01, 775.33, -2.65, 1.11)
pt3dadd(77.64, 776.73, -2.75, 1.11)
pt3dadd(77.79, 778.06, -2.85, 1.11)
pt3dadd(77.57, 779.16, -2.85, 1.11)
pt3dadd(77.57, 780.27, -2.85, 1.11)
pt3dadd(76.97, 781.38, -2.9, 1.03)
pt3dadd(76.6, 781.97, -2.9, 1.03)
pt3dadd(76.16, 782.48, -3, 1.03)
pt3dadd(75.5, 783.29, -3.05, 1.03)
pt3dadd(74.68, 783.88, -3.15, 1.03)
pt3dadd(73.8, 784.4, -3.2, 1.03)
pt3dadd(73.06, 784.77, -3.2, 1.03)
pt3dadd(72.39, 785.06, -3.25, 1.03)
pt3dadd(71.8, 785.73, -3.25, 1.03)
pt3dadd(71.21, 786.24, -3.25, 1.03)
pt3dadd(70.84, 787.13, -3.25, 1.03)
pt3dadd(70.25, 788.23, -3.25, 1.03)
pt3dadd(69.88, 788.82, -3.25, 1.03)
pt3dadd(69.66, 789.34, -3.3, 0.89)
pt3dadd(69.07, 790.3, -4.15, 0.89)
pt3dadd(69.07, 791.11, -4.15, 0.89)
pt3dadd(68.55, 791.77, -4.15, 0.89)
pt3dadd(68.33, 792.44, -4.2, 0.89)
pt3dadd(67.96, 793.32, -4.2, 0.89)
pt3dadd(67.88, 794.21, -4.2, 0.89)
pt3dadd(67.74, 795.18, -4.55, 0.89)
pt3dadd(68.03, 796.51, -4.6, 0.89)
pt3dadd(68.25, 797.54, -4.6, 0.89)
pt3dadd(68.33, 798.43, -4.6, 0.89)
pt3dadd(68.47, 799.53, -4.6, 0.89)
pt3dadd(68.7, 800.49, -4.6, 0.89)
pt3dadd(68.62, 801.45, -4.6, 0.89)
pt3dadd(68.4, 802.34, -4.6, 0.89)
pt3dadd(67.81, 803.29, -4.6, 0.89)
pt3dadd(67.29, 803.81, -4.6, 0.89)
pt3dadd(66.85, 804.33, -5.1, 0.96)
pt3dadd(66.48, 804.99, -5.15, 0.96)
pt3dadd(65.89, 805.65, -5.25, 0.96)
}
}
proc shape3d_30() {
apic[29] { pt3dadd(65.22, 806.1, -5.3, 0.96)
pt3dadd(64.56, 806.61, -5.3, 0.96)
pt3dadd(64.11, 807.2, -5.7, 0.96)
pt3dadd(63.6, 807.94, -5.7, 0.96)
pt3dadd(63.23, 808.31, -5.75, 0.96)
pt3dadd(62.78, 808.83, -5.75, 0.96)
pt3dadd(62.41, 809.78, -5.8, 0.96)
pt3dadd(62.86, 810.82, -4.1, 0.96)
pt3dadd(62.41, 811.92, -5, 0.96)
pt3dadd(63, 813.25, -5, 0.96)
pt3dadd(63.23, 814.43, -5.05, 0.96)
pt3dadd(63.23, 815.09, -5.05, 0.96)
pt3dadd(63.89, 816.2, -5.05, 0.96)
pt3dadd(63.97, 817.16, -5.05, 0.96)
pt3dadd(63.6, 818.27, -5.05, 0.96)
pt3dadd(63.08, 818.71, -5.05, 0.96)
pt3dadd(62.41, 819.3, -5.05, 0.96)
pt3dadd(61.9, 819.37, -5.05, 0.96)
}
apic[30] {pt3dclear()
pt3dadd(61.9, 819.37, -5.05, 0.96)
pt3dadd(61.53, 818.27, -5.5, 0.96)
pt3dadd(61.53, 817.23, -4.8, 0.96)
pt3dadd(61.75, 816.05, -4.6, 0.96)
pt3dadd(61.67, 814.73, -4.45, 0.96)
pt3dadd(61.6, 813.84, -4.4, 0.96)
pt3dadd(61.38, 812.96, -4.35, 0.96)
pt3dadd(61.45, 811.85, -3.5, 0.96)
pt3dadd(60.57, 811.48, -3.35, 0.96)
pt3dadd(59.61, 811.63, -2.7, 0.96)
pt3dadd(59.09, 811.63, -2.45, 0.96)
pt3dadd(58.2, 812.51, -2.15, 0.96)
pt3dadd(58.2, 813.1, -2.1, 0.96)
pt3dadd(58.5, 814.06, -2.05, 0.96)
pt3dadd(58.42, 815.24, -2, 0.81)
pt3dadd(57.83, 815.91, -2, 0.81)
pt3dadd(57.39, 816.2, -1.75, 0.81)
pt3dadd(56.35, 816.5, -1.6, 0.81)
pt3dadd(55.47, 816.5, -1.5, 0.81)
pt3dadd(54.73, 816.2, -1.3, 0.81)
pt3dadd(53.91, 815.76, -0.4, 0.81)
pt3dadd(52.95, 815.32, -0.35, 0.81)
pt3dadd(52.14, 815.09, -0.35, 0.67)
pt3dadd(51.55, 815.17, -0.35, 0.67)
pt3dadd(51.33, 815.68, -0.3, 0.67)
pt3dadd(51.77, 816.13, 0.3, 0.67)
pt3dadd(52.29, 816.57, 0.45, 0.67)
pt3dadd(52.81, 817.38, 0.6, 0.67)
pt3dadd(53.1, 818.04, 0.65, 0.67)
pt3dadd(53.47, 818.49, 1, 0.67)
pt3dadd(53.47, 819.45, 1.1, 0.67)
pt3dadd(52.88, 819.74, 1.3, 0.67)
pt3dadd(51.99, 820.4, 1.75, 0.67)
pt3dadd(51.33, 820.62, 1.75, 0.67)
pt3dadd(50.96, 819.67, 2.45, 0.67)
pt3dadd(51.25, 818.63, 2.45, 0.67)
pt3dadd(50.81, 817.97, 2.45, 0.67)
pt3dadd(50, 817.38, 2.75, 0.67)
pt3dadd(48.89, 817.23, 3.1, 0.67)
pt3dadd(47.93, 817.23, 3.2, 0.67)
pt3dadd(47.34, 817.6, 3.3, 0.67)
pt3dadd(47.11, 818.04, 3.35, 0.67)
pt3dadd(47.04, 818.63, 3.4, 0.67)
pt3dadd(47.63, 819.45, 3.45, 0.67)
pt3dadd(47.93, 820.03, 3.65, 0.67)
pt3dadd(48.15, 820.99, 3.55, 0.67)
pt3dadd(48.67, 822.17, 3.5, 0.67)
pt3dadd(47.93, 821.8, 3.5, 0.67)
pt3dadd(47.19, 822.17, 3.65, 0.67)
pt3dadd(46.23, 822.62, 5.05, 0.67)
pt3dadd(45.56, 822.39, 5.15, 0.67)
pt3dadd(44.75, 821.88, 5.2, 0.67)
pt3dadd(45.19, 821.21, 5.3, 0.67)
pt3dadd(44.82, 820.33, 5.35, 0.67)
pt3dadd(44.31, 819.81, 5.65, 0.67)
pt3dadd(44.31, 818.71, 6.4, 0.67)
pt3dadd(44.16, 818.04, 6.45, 0.67)
pt3dadd(43.35, 817.16, 6.45, 0.67)
pt3dadd(42.9, 816.64, 6.5, 0.67)
pt3dadd(42.31, 817.16, 7.45, 0.67)
pt3dadd(42.09, 818.27, 7.5, 0.67)
pt3dadd(41.79, 819.15, 7.5, 0.67)
pt3dadd(41.72, 819.67, 7.7, 0.67)
pt3dadd(41.42, 820.18, 8.05, 0.67)
pt3dadd(41.35, 820.92, 8.2, 0.67)
pt3dadd(40.91, 821.29, 8.25, 0.67)
pt3dadd(40.68, 821.88, 9.15, 0.67)
pt3dadd(40.24, 822.32, 9.35, 0.67)
pt3dadd(40.09, 823.06, 9.35, 0.67)
pt3dadd(40.24, 823.94, 9.4, 0.67)
pt3dadd(40.76, 824.61, 9.45, 0.67)
pt3dadd(40.98, 825.12, 9.45, 0.67)
pt3dadd(41.65, 825.86, 9.45, 0.67)
pt3dadd(41.36, 827.06, 9.65, 0.67)
pt3dadd(40.69, 827.65, 9.7, 0.67)
pt3dadd(40.1, 827.72, 9.7, 0.67)
pt3dadd(39.51, 828.01, 9.7, 0.67)
pt3dadd(38.77, 828.24, 9.8, 0.67)
pt3dadd(38.18, 828.6, 9.9, 0.67)
pt3dadd(37.81, 828.83, 9.9, 0.67)
pt3dadd(36.92, 829.27, 9.95, 0.67)
pt3dadd(36.33, 829.42, 9.95, 0.67)
pt3dadd(36.04, 829.93, 9.95, 0.67)
pt3dadd(36.04, 830.67, 9.95, 0.67)
pt3dadd(36.18, 831.7, 9.95, 0.59)
pt3dadd(36.33, 832.73, 9.95, 0.59)
pt3dadd(36.92, 833.69, 9.95, 0.59)
pt3dadd(36.7, 834.14, 10.7, 0.59)
pt3dadd(35.96, 834.73, 10.7, 0.59)
pt3dadd(35.44, 834.95, 10.55, 0.59)
pt3dadd(34.78, 835.09, 10.45, 0.59)
pt3dadd(34.19, 835.46, 10.3, 0.59)
pt3dadd(33.82, 835.76, 10.2, 0.59)
pt3dadd(33.74, 836.57, 10.1, 0.59)
pt3dadd(33.01, 837.01, 10.05, 0.59)
pt3dadd(32.34, 837.23, 10, 0.59)
pt3dadd(31.97, 837.82, 9.95, 0.59)
pt3dadd(32.49, 838.49, 9.15, 0.59)
pt3dadd(33.15, 839.3, 10.65, 0.59)
pt3dadd(32.93, 839.81, 10.7, 0.59)
pt3dadd(32.34, 840.04, 10.8, 0.59)
pt3dadd(31.67, 840.26, 10.8, 0.59)
pt3dadd(30.94, 840.7, 11.2, 0.59)
pt3dadd(30.34, 841.29, 11.25, 0.59)
pt3dadd(29.61, 840.77, 11.3, 0.59)
pt3dadd(29.16, 840.18, 11.3, 0.59)
pt3dadd(28.57, 839.74, 11.35, 0.59)
pt3dadd(27.54, 840.04, 11.35, 0.59)
pt3dadd(26.8, 840.48, 11.35, 0.59)
pt3dadd(26.35, 840.85, 11.7, 0.59)
pt3dadd(25.84, 841.36, 11.75, 0.59)
pt3dadd(25.1, 841.51, 11.85, 0.59)
pt3dadd(24.43, 841.88, 11.85, 0.59)
pt3dadd(24.14, 842.47, 11.9, 0.59)
pt3dadd(24.65, 842.84, 11.95, 0.59)
pt3dadd(25.24, 843.06, 11.95, 0.59)
pt3dadd(25.47, 844.02, 11.95, 0.59)
pt3dadd(25.02, 844.46, 11.95, 0.59)
pt3dadd(25.02, 844.9, 12, 0.59)
pt3dadd(25.39, 845.71, 12, 0.59)
pt3dadd(26.13, 845.94, 12.85, 0.59)
pt3dadd(26.87, 846.53, 12.9, 0.59)
pt3dadd(26.87, 847.41, 12.95, 0.59)
pt3dadd(26.57, 848.37, 13.15, 0.59)
pt3dadd(25.69, 848.44, 13.25, 0.59)
pt3dadd(25.1, 848.66, 13.3, 0.59)
pt3dadd(24.43, 849.03, 12.75, 0.44)
pt3dadd(23.77, 849.48, 12.75, 0.44)
pt3dadd(23.47, 850.14, 12.8, 0.44)
pt3dadd(22.81, 850.88, 12.8, 0.44)
pt3dadd(22.29, 851.61, 12.75, 0.44)
pt3dadd(21.55, 851.84, 12.75, 0.44)
}
apic[31] {pt3dclear()
pt3dadd(61.9, 819.37, -5.05, 0.67)
pt3dadd(61.61, 820.05, -5.7, 0.67)
pt3dadd(61.9, 821.23, -5.95, 0.67)
pt3dadd(61.76, 822.19, -6, 0.67)
pt3dadd(61.68, 823, -6.05, 0.67)
pt3dadd(61.46, 823.96, -6.1, 0.67)
pt3dadd(61.09, 824.62, -6.1, 0.67)
pt3dadd(60.87, 825.58, -6.45, 0.67)
pt3dadd(60.35, 826.1, -6.45, 0.67)
pt3dadd(60.2, 827.28, -6.55, 0.67)
pt3dadd(60.43, 828.53, -6.6, 0.67)
pt3dadd(59.91, 829.49, -6.6, 0.67)
pt3dadd(59.54, 830.82, -6.6, 0.67)
pt3dadd(58.43, 831.55, -6.6, 0.67)
pt3dadd(57.47, 832.22, -6.6, 0.67)
pt3dadd(56.73, 832.73, -6.6, 0.67)
pt3dadd(56.14, 833.4, -6.6, 0.67)
pt3dadd(55.84, 834.28, -6.6, 0.67)
pt3dadd(56.06, 835.32, -6.6, 0.67)
pt3dadd(56.14, 835.83, -6.6, 0.67)
pt3dadd(56.43, 836.64, -6.6, 0.67)
pt3dadd(56.95, 837.45, -6.65, 0.67)
pt3dadd(57.25, 838.12, -6.65, 0.67)
pt3dadd(57.54, 838.71, -6.65, 0.67)
pt3dadd(58.06, 839.67, -6.65, 0.67)
pt3dadd(57.91, 840.7, -6.65, 0.67)
pt3dadd(57.62, 841.29, -6.65, 0.67)
pt3dadd(57.1, 842.17, -6.65, 0.67)
pt3dadd(56.51, 842.99, -6.65, 0.67)
pt3dadd(56.06, 843.58, -6.65, 0.67)
pt3dadd(55.62, 843.87, -6.65, 0.67)
pt3dadd(55.03, 844.46, -6.65, 0.67)
pt3dadd(54.44, 844.98, -6.65, 0.67)
pt3dadd(53.77, 845.64, -6.65, 0.67)
pt3dadd(53.18, 846.75, -6.65, 0.67)
pt3dadd(53.03, 847.85, -6.65, 0.67)
pt3dadd(52.89, 848.59, -6.65, 0.67)
pt3dadd(52.81, 849.99, -6.65, 0.67)
pt3dadd(52.81, 850.66, -6.65, 0.67)
pt3dadd(52.96, 851.47, -6.65, 0.67)
pt3dadd(53.03, 852.35, -6.65, 0.67)
pt3dadd(53.7, 853.31, -6.65, 0.67)
pt3dadd(54.36, 854.12, -6.65, 0.67)
pt3dadd(55.33, 854.93, -6.65, 0.67)
pt3dadd(55.62, 855.67, -6.65, 0.67)
pt3dadd(55.77, 856.26, -5.8, 0.67)
pt3dadd(56.21, 856.92, -5.7, 0.67)
pt3dadd(55.99, 858.03, -5.65, 0.67)
pt3dadd(55.86, 858.88, -5.5, 0.67)
pt3dadd(55.19, 859.62, -5.5, 0.67)
}
}
proc shape3d_31() {
apic[31] { pt3dadd(54.67, 860.06, -5.5, 0.67)
pt3dadd(54.45, 860.87, -5.5, 0.67)
pt3dadd(54.16, 861.68, -5.45, 0.67)
pt3dadd(53.79, 862.42, -5.45, 0.67)
pt3dadd(53.79, 863.38, -5.45, 0.67)
pt3dadd(53.64, 864.19, -5.45, 0.67)
pt3dadd(53.71, 864.86, -5.45, 0.67)
pt3dadd(54.01, 865.74, -5.45, 0.67)
pt3dadd(54.16, 866.7, -5.45, 0.67)
pt3dadd(54.01, 868.03, -5.45, 0.67)
pt3dadd(54.67, 869.13, -5.4, 0.67)
pt3dadd(54.38, 870.24, -5.4, 0.67)
pt3dadd(54.38, 871.2, -5.4, 0.67)
pt3dadd(54.38, 872.16, -5.4, 0.67)
pt3dadd(54.67, 872.97, -5.35, 0.67)
pt3dadd(55.12, 874, -5.35, 0.67)
pt3dadd(55.27, 875.4, -5.35, 0.67)
pt3dadd(55.04, 876.07, -5.35, 0.67)
pt3dadd(54.38, 876.51, -5.35, 0.67)
pt3dadd(53.79, 876.88, -5.35, 0.67)
pt3dadd(52.9, 877.47, -5.35, 0.67)
pt3dadd(52.38, 878.28, -5.35, 0.67)
pt3dadd(52.01, 879.16, -5.35, 0.67)
pt3dadd(51.87, 880.27, -5.35, 0.67)
pt3dadd(51.87, 881.38, -5.35, 0.67)
pt3dadd(51.57, 882.11, -5.35, 0.67)
pt3dadd(51.05, 883, -5.35, 0.67)
pt3dadd(50.9, 883.44, -5.35, 0.67)
pt3dadd(50.61, 883.96, -5.35, 0.67)
pt3dadd(50.46, 885.21, -5.35, 0.67)
pt3dadd(50.98, 886.24, -5.35, 0.67)
pt3dadd(51.35, 886.98, -4.3, 0.67)
pt3dadd(51.54, 887.65, -4.4, 0.52)
pt3dadd(51.76, 888.39, -4.4, 0.52)
pt3dadd(52.2, 888.83, -4.3, 0.52)
pt3dadd(53.24, 889.64, -4.2, 0.52)
pt3dadd(53.9, 890.3, -4.1, 0.52)
pt3dadd(54.27, 890.82, -4.1, 0.52)
pt3dadd(54.87, 891.7, -3.9, 0.52)
pt3dadd(55.31, 892.59, -3.85, 0.52)
pt3dadd(55.6, 893.33, -3.8, 0.52)
pt3dadd(56.12, 894.06, -3.8, 0.52)
pt3dadd(56.57, 894.8, -3.8, 0.52)
pt3dadd(57.01, 895.47, -3.8, 0.52)
pt3dadd(57.38, 895.98, -3.8, 0.52)
pt3dadd(57.9, 896.42, -3.75, 0.52)
pt3dadd(58.41, 897.09, -3.7, 0.52)
pt3dadd(58.63, 897.68, -2.65, 0.52)
pt3dadd(58.78, 898.42, -2.6, 0.52)
pt3dadd(58.63, 899.01, -2.6, 0.52)
pt3dadd(58.63, 899.6, -2.6, 0.52)
pt3dadd(59.3, 899.82, -2.55, 0.52)
pt3dadd(59.6, 899.82, -2.55, 0.52)
pt3dadd(60.04, 899.67, -2.55, 0.52)
pt3dadd(60.78, 899.37, -2.55, 0.52)
pt3dadd(61.74, 899.37, -2.55, 0.52)
pt3dadd(62.4, 899.6, -2.55, 0.52)
pt3dadd(63, 899.74, -2.55, 0.52)
pt3dadd(64.4, 900.33, -2.55, 0.52)
pt3dadd(65.66, 900.26, -2.55, 0.52)
pt3dadd(66.69, 900.48, -2.55, 0.52)
pt3dadd(67.58, 900.78, -2.5, 0.52)
pt3dadd(68.61, 901.22, -2.5, 0.52)
pt3dadd(69.8, 901.96, -2.5, 0.52)
pt3dadd(70.83, 902.18, -2.5, 0.52)
pt3dadd(71.35, 902.91, -2.5, 0.52)
pt3dadd(71.64, 904.09, -2.5, 0.52)
pt3dadd(71.2, 904.61, -2.5, 0.52)
pt3dadd(70.9, 905.13, -2.5, 0.52)
pt3dadd(71.35, 906.01, -2.5, 0.52)
pt3dadd(72.31, 906.31, -2.5, 0.52)
pt3dadd(73.42, 906.75, -2.9, 0.52)
pt3dadd(73.93, 907.34, -3, 0.52)
pt3dadd(73.93, 908.15, -3.1, 0.52)
pt3dadd(73.79, 908.81, -3.15, 0.52)
pt3dadd(73.56, 909.4, -3.2, 0.52)
pt3dadd(73.34, 909.99, -3.25, 0.52)
pt3dadd(73.19, 910.51, -3.3, 0.52)
pt3dadd(73.49, 911.25, -3.35, 0.52)
pt3dadd(74.16, 911.99, -3.65, 0.52)
pt3dadd(74.75, 912.65, -3.7, 0.52)
pt3dadd(75.56, 913.24, -4.55, 0.52)
pt3dadd(76.23, 913.98, -4.65, 0.52)
pt3dadd(76.96, 914.86, -5.5, 0.52)
pt3dadd(77.7, 915.6, -5.55, 0.52)
pt3dadd(78.74, 916.56, -8.5, 0.52)
pt3dadd(79.55, 916.63, -8.55, 0.52)
pt3dadd(80.14, 916.63, -8.55, 0.52)
pt3dadd(80.88, 917.22, -8.55, 0.52)
pt3dadd(81.32, 917.96, -8.55, 0.52)
pt3dadd(81.77, 918.84, -8.55, 0.52)
pt3dadd(82.36, 919.29, -8.95, 0.52)
pt3dadd(82.73, 919.95, -9.3, 0.52)
pt3dadd(82.95, 920.24, -9.6, 0.52)
pt3dadd(83.1, 920.91, -9.65, 0.52)
pt3dadd(83.2, 921.81, -9.85, 0.52)
pt3dadd(83.87, 922.55, -10, 0.52)
pt3dadd(84.61, 923.28, -10.55, 0.52)
pt3dadd(85.35, 923.5, -10.6, 0.52)
pt3dadd(86.31, 923.95, -10.7, 0.52)
pt3dadd(87.27, 924.61, -11.05, 0.52)
pt3dadd(88.08, 925.27, -11.25, 0.52)
pt3dadd(88.53, 925.86, -11.25, 0.52)
}
apic[32] {pt3dclear()
pt3dadd(74.14, 692.6, -4.4, 0.89)
pt3dadd(73.69, 692.94, -3.9, 0.89)
pt3dadd(73.03, 693.39, -4, 0.89)
pt3dadd(72.58, 693.76, -4.15, 0.89)
pt3dadd(72.14, 694.64, -4.2, 0.89)
pt3dadd(71.99, 695.6, -4.25, 0.89)
pt3dadd(72.14, 696.71, -4.3, 0.89)
pt3dadd(72.29, 697.66, -4.3, 0.89)
pt3dadd(72.07, 698.25, -4.3, 0.89)
pt3dadd(71.84, 699.29, -4.4, 0.89)
pt3dadd(71.84, 700.25, -4.4, 0.89)
pt3dadd(71.55, 700.84, -4.45, 0.89)
pt3dadd(71.18, 701.72, -4.5, 0.89)
pt3dadd(71.1, 702.24, -4.55, 0.89)
pt3dadd(70.96, 703.12, -4.6, 0.89)
pt3dadd(70.66, 703.71, -4.75, 0.89)
pt3dadd(70.51, 704.3, -4.8, 0.89)
pt3dadd(70.37, 705.11, -4.8, 0.89)
pt3dadd(70.29, 706, -4.9, 0.89)
pt3dadd(70.29, 706.59, -5.15, 0.89)
pt3dadd(70, 707.69, -5.25, 0.89)
pt3dadd(70.14, 708.43, -5.3, 0.89)
pt3dadd(69.7, 709.32, -5.35, 0.89)
pt3dadd(69.48, 709.91, -5.45, 0.89)
pt3dadd(69.26, 711.38, -5.5, 0.89)
pt3dadd(69.26, 712.05, -5.55, 0.89)
pt3dadd(69.18, 713.08, -6.1, 0.89)
pt3dadd(69.18, 713.96, -6.15, 0.89)
pt3dadd(69.11, 715.07, -6.15, 0.89)
pt3dadd(69.26, 716.18, -6.15, 0.89)
pt3dadd(69.55, 717.35, -6.15, 0.89)
pt3dadd(70.14, 718.68, -6.15, 0.89)
pt3dadd(70, 720.01, -7.1, 0.89)
pt3dadd(70.22, 721.71, -7.1, 0.89)
pt3dadd(69.77, 722.66, -7.1, 0.89)
pt3dadd(69.63, 723.77, -7.1, 0.89)
pt3dadd(69.4, 724.73, -7.1, 0.89)
pt3dadd(69.45, 725.65, -7.95, 0.89)
pt3dadd(69.6, 726.54, -8.05, 0.89)
pt3dadd(69.3, 727.35, -8.25, 0.89)
pt3dadd(69.01, 727.94, -8.35, 0.89)
pt3dadd(68.64, 728.6, -8.4, 0.89)
pt3dadd(68.42, 729.34, -8.5, 0.89)
pt3dadd(68.05, 730.44, -8.55, 0.89)
pt3dadd(67.83, 731.18, -8.6, 0.89)
pt3dadd(67.46, 731.77, -8.95, 0.89)
pt3dadd(67.38, 732.66, -9.1, 0.89)
pt3dadd(67.38, 733.47, -9.2, 0.89)
pt3dadd(67.38, 734.21, -9.25, 0.89)
pt3dadd(67.24, 735.02, -9.3, 0.89)
pt3dadd(67.38, 735.98, -9.4, 0.89)
pt3dadd(67.68, 736.86, -9.65, 0.89)
pt3dadd(67.68, 737.89, -9.8, 0.89)
pt3dadd(67.75, 738.78, -9.95, 0.89)
pt3dadd(67.53, 739.81, -10, 0.89)
pt3dadd(67.31, 740.62, -10.05, 0.89)
pt3dadd(67.09, 741.58, -10.35, 0.89)
pt3dadd(67.01, 742.47, -10.4, 0.89)
pt3dadd(66.87, 743.13, -10.55, 0.89)
pt3dadd(66.87, 743.94, -10.55, 0.89)
pt3dadd(66.57, 745.05, -10.55, 0.89)
pt3dadd(66.27, 745.86, -10.55, 0.89)
pt3dadd(66.27, 746.82, -10.6, 0.89)
pt3dadd(66.42, 747.41, -10.6, 0.89)
pt3dadd(66.57, 748.29, -10.7, 0.89)
pt3dadd(66.64, 749.4, -10.9, 0.89)
pt3dadd(66.87, 750.06, -11.15, 0.89)
pt3dadd(67.16, 751.09, -12, 0.89)
pt3dadd(67.46, 751.61, -12.05, 0.89)
pt3dadd(67.9, 752.94, -12.15, 0.89)
pt3dadd(68.27, 753.9, -12.35, 0.89)
pt3dadd(68.34, 754.85, -13.2, 0.89)
pt3dadd(68.27, 755.67, -13.25, 0.89)
pt3dadd(68.27, 756.33, -13.25, 0.89)
pt3dadd(68.68, 757.18, -13.6, 0.89)
pt3dadd(68.6, 757.91, -13.6, 0.89)
pt3dadd(68.83, 758.65, -13.9, 0.89)
pt3dadd(69.05, 759.91, -13.35, 0.89)
pt3dadd(69.2, 760.57, -13.1, 0.89)
pt3dadd(69.2, 761.6, -13.05, 0.89)
pt3dadd(69.42, 762.78, -12.9, 0.89)
pt3dadd(69.49, 763.89, -12.85, 0.89)
pt3dadd(69.64, 764.92, -12.8, 0.89)
pt3dadd(70.08, 765.58, -13, 0.89)
pt3dadd(69.57, 766.32, -13.1, 0.89)
pt3dadd(69.64, 766.91, -13.1, 0.89)
pt3dadd(69.49, 767.87, -13.15, 0.89)
pt3dadd(69.86, 768.61, -13.25, 0.89)
pt3dadd(69.71, 769.71, -13.4, 0.89)
pt3dadd(70.01, 770.82, -13.7, 0.89)
pt3dadd(69.93, 771.78, -14.55, 0.89)
pt3dadd(69.93, 773.03, -14.75, 0.89)
pt3dadd(70.01, 773.99, -15.35, 0.89)
pt3dadd(69.49, 774.8, -15.35, 0.89)
pt3dadd(69.2, 775.54, -15.45, 0.89)
pt3dadd(69.49, 776.57, -15.45, 0.89)
pt3dadd(69.27, 777.38, -15.45, 0.89)
}
}
proc shape3d_32() {
apic[32] { pt3dadd(69.49, 778.56, -15.85, 0.89)
pt3dadd(69.12, 779.23, -16.2, 0.89)
pt3dadd(68.83, 780.48, -16.45, 0.89)
pt3dadd(68.83, 781.37, -16.8, 0.89)
pt3dadd(69.05, 782.25, -17.25, 0.89)
pt3dadd(69.34, 782.84, -17.25, 0.89)
pt3dadd(69.42, 783.73, -17.3, 0.89)
pt3dadd(69.49, 784.68, -17.35, 0.89)
pt3dadd(69.64, 785.57, -17.55, 0.89)
pt3dadd(69.86, 786.38, -17.9, 0.89)
pt3dadd(69.71, 787.27, -18.15, 0.89)
pt3dadd(69.42, 788.15, -18.65, 0.89)
pt3dadd(69.4, 789.41, -19.05, 0.89)
pt3dadd(69.55, 789.78, -19.1, 0.89)
pt3dadd(69.25, 791.33, -19.2, 0.89)
pt3dadd(69.18, 792.36, -19.3, 0.89)
pt3dadd(69.18, 793.77, -19.45, 0.89)
pt3dadd(69.47, 795.02, -19.65, 0.89)
pt3dadd(69.18, 795.98, -19.85, 0.89)
pt3dadd(68.96, 796.72, -20.25, 0.89)
pt3dadd(68.96, 797.9, -20.55, 0.89)
pt3dadd(68.88, 798.93, -21.05, 0.89)
pt3dadd(68.81, 800.18, -21.2, 0.89)
pt3dadd(68.81, 801.21, -21.2, 0.89)
pt3dadd(68.51, 802.25, -21.2, 0.89)
pt3dadd(68.59, 803.28, -21.3, 0.89)
pt3dadd(68.51, 804.16, -21.55, 0.89)
pt3dadd(68.22, 805.2, -21.85, 0.89)
pt3dadd(67.77, 806.3, -22, 0.89)
pt3dadd(67.33, 807.78, -22.05, 0.89)
pt3dadd(67.04, 808.96, -22.2, 1.03)
pt3dadd(66.74, 810.29, -22.2, 1.03)
pt3dadd(66.89, 811.47, -22.2, 1.03)
pt3dadd(66.67, 812.57, -22.45, 1.03)
pt3dadd(66.44, 813.68, -22.75, 1.03)
pt3dadd(66.15, 814.71, -23, 1.03)
pt3dadd(66.07, 815.74, -23.1, 1.03)
pt3dadd(66.22, 816.92, -23.15, 1.03)
pt3dadd(66.07, 817.66, -23.15, 1.03)
pt3dadd(65.85, 818.77, -23.15, 1.03)
pt3dadd(65.63, 820.02, -23.15, 1.03)
}
apic[33] {pt3dclear()
pt3dadd(65.63, 820.02, -23.15, 0.96)
pt3dadd(65.76, 821.11, -22.8, 0.96)
pt3dadd(65.61, 822.22, -22.6, 0.89)
pt3dadd(66.05, 823.33, -22.55, 0.89)
pt3dadd(66.05, 824.43, -22.55, 0.89)
pt3dadd(66.27, 825.54, -22.55, 0.89)
pt3dadd(66.2, 826.79, -22.55, 0.89)
pt3dadd(66.27, 827.75, -22.55, 0.89)
pt3dadd(66.42, 829.01, -22.5, 0.89)
pt3dadd(66.5, 829.96, -22.45, 0.89)
pt3dadd(66.64, 831.29, -22.35, 0.89)
pt3dadd(66.79, 832.47, -22.3, 0.89)
pt3dadd(67.01, 833.65, -22.25, 0.89)
pt3dadd(67.46, 834.76, -22.2, 0.89)
pt3dadd(67.75, 835.79, -22.2, 0.89)
pt3dadd(68.42, 836.68, -22.2, 0.89)
pt3dadd(68.93, 837.56, -22.15, 0.81)
pt3dadd(69.3, 838.37, -22.1, 0.81)
pt3dadd(69.08, 838.96, -22.1, 0.81)
pt3dadd(69.08, 840.22, -22.1, 0.81)
pt3dadd(68.86, 840.95, -22.1, 0.81)
pt3dadd(68.57, 841.76, -22.05, 0.81)
pt3dadd(68.2, 842.58, -22, 0.81)
pt3dadd(68.49, 843.53, -21.95, 0.81)
pt3dadd(69.01, 844.27, -21.95, 0.81)
pt3dadd(69.75, 845.23, -21.95, 0.81)
pt3dadd(70.27, 846.34, -21.9, 0.81)
pt3dadd(70.34, 847.59, -21.25, 0.81)
pt3dadd(70.41, 848.62, -21.25, 0.81)
pt3dadd(70.34, 850.1, -21.2, 0.81)
pt3dadd(70.56, 850.91, -21.2, 0.81)
pt3dadd(70.49, 851.72, -21.15, 0.81)
pt3dadd(70.7, 852.81, -21.1, 0.81)
pt3dadd(70.48, 853.85, -21.1, 0.81)
pt3dadd(70.48, 854.51, -21.1, 0.81)
pt3dadd(70.63, 855.76, -21, 0.74)
pt3dadd(70.85, 856.58, -20.95, 0.74)
pt3dadd(71.22, 857.61, -20.95, 0.74)
pt3dadd(72.18, 858.57, -20.9, 0.74)
pt3dadd(72.84, 859.6, -20.9, 0.74)
pt3dadd(73.21, 860.93, -20.9, 0.74)
pt3dadd(73.66, 862.62, -20.9, 0.74)
pt3dadd(73.58, 863.58, -20.9, 0.74)
pt3dadd(73.8, 865.35, -20.85, 0.74)
pt3dadd(74.25, 866.75, -20.85, 0.74)
pt3dadd(74.54, 867.86, -20.8, 0.74)
pt3dadd(75.21, 868.89, -19.85, 0.81)
pt3dadd(75.21, 870.37, -19.8, 0.81)
pt3dadd(74.84, 871.84, -19.8, 0.81)
pt3dadd(74.4, 872.65, -19.75, 0.81)
pt3dadd(73.88, 873.69, -19.75, 0.81)
pt3dadd(73.51, 874.57, -19.75, 0.81)
pt3dadd(73.43, 876.04, -19.75, 0.81)
pt3dadd(73.66, 876.93, -19.75, 0.81)
pt3dadd(74.47, 877.81, -19.75, 0.81)
pt3dadd(74.4, 879.14, -19.75, 0.81)
pt3dadd(74.03, 879.66, -19.7, 0.81)
pt3dadd(74.17, 880.32, -19.7, 0.81)
pt3dadd(74.1, 881.13, -19.9, 0.89)
pt3dadd(74.25, 881.8, -20, 0.89)
pt3dadd(73.88, 882.24, -19.2, 0.89)
pt3dadd(73.8, 883.05, -19.2, 0.89)
pt3dadd(74.07, 883.55, -18.6, 0.89)
pt3dadd(74.22, 884.14, -18.55, 0.89)
pt3dadd(74.81, 884.51, -18.45, 0.81)
pt3dadd(75.11, 885.25, -18.3, 0.81)
pt3dadd(75.33, 886.13, -18, 0.81)
pt3dadd(75.92, 886.57, -18.95, 0.81)
pt3dadd(76.07, 887.16, -18.85, 0.81)
pt3dadd(76.44, 887.46, -18.85, 0.81)
pt3dadd(76.29, 888.12, -18.4, 0.81)
pt3dadd(76.96, 888.79, -18.05, 0.81)
pt3dadd(76.96, 889.6, -17.8, 0.81)
pt3dadd(76.44, 890.11, -17.65, 0.81)
pt3dadd(75.55, 889.97, -17.55, 0.81)
pt3dadd(75.33, 889.45, -17.55, 0.81)
pt3dadd(75.85, 888.86, -17.5, 0.81)
pt3dadd(76.37, 888.93, -16.1, 0.81)
pt3dadd(77.33, 889.23, -15.75, 0.81)
pt3dadd(77.33, 889.82, -15.25, 0.81)
pt3dadd(77.33, 890.93, -14.55, 0.81)
pt3dadd(77.77, 891.88, -14.35, 0.81)
pt3dadd(78.29, 893.14, -14.15, 0.81)
pt3dadd(78.73, 894.39, -14, 0.81)
pt3dadd(78.73, 895.06, -14, 0.81)
pt3dadd(78.95, 896.24, -13.6, 0.81)
pt3dadd(79.69, 897.12, -13.25, 0.81)
pt3dadd(80.58, 897.56, -14.85, 0.81)
pt3dadd(81.54, 897.93, -15.05, 0.81)
pt3dadd(82.06, 898.6, -15.05, 0.81)
pt3dadd(82.72, 899.04, -13.9, 0.81)
pt3dadd(83.76, 899.55, -13.8, 0.81)
pt3dadd(84.5, 900.14, -13.75, 0.81)
pt3dadd(84.86, 901.32, -13.55, 0.81)
}
apic[34] {pt3dclear()
pt3dadd(84.86, 901.32, -13.55, 0.81)
pt3dadd(84.79, 902.21, -12.1, 0.81)
pt3dadd(84.05, 902.87, -12.2, 0.81)
pt3dadd(83.16, 903.68, -12.3, 0.81)
pt3dadd(82.8, 904.27, -12.3, 0.81)
pt3dadd(82.06, 904.86, -12.25, 0.81)
pt3dadd(81.54, 905.38, -11.4, 0.81)
pt3dadd(81.02, 905.9, -11.15, 0.81)
pt3dadd(80.5, 906.41, -10.95, 0.81)
pt3dadd(80.06, 907.08, -10.85, 0.81)
pt3dadd(80.28, 908.26, -10.8, 0.81)
pt3dadd(80.73, 909.21, -10.8, 0.81)
pt3dadd(80.73, 909.95, -10.7, 0.59)
pt3dadd(80.73, 911.06, -10.7, 0.59)
pt3dadd(80.65, 911.65, -10.7, 0.59)
pt3dadd(80.58, 912.46, -10.7, 0.59)
pt3dadd(81.02, 913.2, -10.7, 0.59)
pt3dadd(81.36, 913.77, -10.7, 0.59)
pt3dadd(82.1, 913.99, -10.7, 0.59)
pt3dadd(83.06, 913.92, -10.7, 0.59)
pt3dadd(83.8, 913.77, -10.7, 0.59)
pt3dadd(84.39, 913.84, -10.7, 0.59)
pt3dadd(85.13, 914.36, -11, 0.59)
pt3dadd(85.72, 915.1, -11.15, 0.59)
pt3dadd(86.01, 915.91, -11.25, 0.59)
pt3dadd(86.75, 916.35, -11.3, 0.59)
pt3dadd(87.79, 916.87, -11.3, 0.59)
pt3dadd(89.12, 917.16, -11.35, 0.59)
pt3dadd(89.86, 917.83, -11.35, 0.59)
pt3dadd(90.37, 918.71, -11.4, 0.59)
pt3dadd(90.89, 919.89, -11.75, 0.59)
pt3dadd(92.22, 919.82, -11.85, 0.59)
pt3dadd(93.48, 919.97, -11.9, 0.59)
pt3dadd(94, 920.48, -11.95, 0.59)
pt3dadd(94.36, 921.22, -10.6, 0.59)
pt3dadd(95.18, 921.88, -10.5, 0.59)
pt3dadd(95.55, 922.47, -10.45, 0.59)
pt3dadd(96.21, 923.28, -10.55, 0.59)
pt3dadd(96.8, 923.28, -10.6, 0.59)
pt3dadd(97.47, 922.69, -10.65, 0.59)
pt3dadd(97.99, 922.55, -11.8, 0.59)
pt3dadd(99.02, 922.99, -11.9, 0.59)
pt3dadd(100.2, 923.14, -12.15, 0.59)
pt3dadd(101.61, 923.36, -12.45, 0.59)
pt3dadd(102.72, 923.06, -12.5, 0.59)
pt3dadd(103.68, 922.55, -12.55, 0.59)
pt3dadd(104.79, 922.4, -13.35, 0.59)
pt3dadd(105.67, 921.88, -13.4, 0.59)
pt3dadd(106.93, 922.03, -13.65, 0.59)
pt3dadd(108.11, 922.03, -13.95, 0.59)
pt3dadd(108.92, 922.69, -14.05, 0.59)
pt3dadd(110.18, 923.21, -14.05, 0.59)
pt3dadd(111.36, 923.21, -14.3, 0.59)
pt3dadd(113.06, 923.14, -14.3, 0.59)
}
apic[35] {pt3dclear()
pt3dadd(84.86, 901.32, -13.55, 0.59)
pt3dadd(85.42, 901.38, -10.75, 0.59)
pt3dadd(85.94, 901.68, -10.6, 0.59)
pt3dadd(86.75, 902.12, -10.55, 0.59)
pt3dadd(86.75, 902.71, -10.45, 0.59)
pt3dadd(86.6, 903.74, -10.2, 0.59)
pt3dadd(86.09, 904.33, -9.75, 0.59)
pt3dadd(85.05, 904.85, -9.15, 0.59)
pt3dadd(84.76, 905.36, -9, 0.59)
pt3dadd(84.39, 906.1, -8.95, 0.59)
pt3dadd(84.39, 906.62, -8.9, 0.59)
}
}
proc shape3d_33() {
apic[35] { pt3dadd(84.83, 906.99, -8.9, 0.59)
pt3dadd(85.64, 907.13, -8.85, 0.59)
pt3dadd(86.31, 906.91, -8.85, 0.59)
pt3dadd(87.27, 906.47, -8.85, 0.59)
pt3dadd(88.23, 906.17, -8.8, 0.59)
pt3dadd(89.19, 906.1, -8.8, 0.59)
pt3dadd(89.93, 905.73, -8.75, 0.59)
pt3dadd(90.97, 905.51, -8.25, 0.59)
pt3dadd(91.7, 905.07, -8.4, 0.59)
pt3dadd(92.3, 904.7, -9.15, 0.59)
pt3dadd(93.33, 904.63, -9.4, 0.59)
pt3dadd(94, 904.77, -9.55, 0.59)
pt3dadd(94.81, 905.07, -10.2, 0.59)
pt3dadd(95.84, 904.92, -8.4, 0.59)
pt3dadd(97.1, 904.7, -8.25, 0.59)
pt3dadd(97.99, 904.63, -7.2, 0.59)
pt3dadd(98.8, 904.92, -7.1, 0.59)
pt3dadd(99.32, 904.85, -7.1, 0.59)
pt3dadd(100.5, 904.48, -7.05, 0.59)
pt3dadd(101.02, 904.55, -7.05, 0.59)
pt3dadd(102.05, 904.77, -7, 0.59)
pt3dadd(102.86, 905.14, -6.95, 0.59)
pt3dadd(103.38, 905.95, -8, 0.59)
pt3dadd(103.75, 906.4, -8.05, 0.59)
pt3dadd(104.42, 907.21, -8.2, 0.59)
pt3dadd(105.01, 908.02, -8.4, 0.59)
pt3dadd(106.12, 908.76, -8.3, 0.59)
pt3dadd(106.71, 909.27, -8.3, 0.59)
pt3dadd(107.52, 910.01, -8.45, 0.59)
pt3dadd(108.63, 910.08, -8.5, 0.59)
pt3dadd(109.66, 910.08, -7.05, 0.59)
pt3dadd(110.62, 910.3, -6.95, 0.59)
pt3dadd(111.66, 910.23, -6.9, 0.59)
pt3dadd(112.92, 909.64, -6.9, 0.59)
pt3dadd(113.36, 908.76, -6.1, 0.59)
pt3dadd(113.66, 907.5, -6.05, 0.59)
pt3dadd(114.1, 906.54, -6, 0.59)
pt3dadd(114.69, 905.58, -6, 0.59)
pt3dadd(114.91, 905.36, -4.7, 0.59)
pt3dadd(115.21, 903.96, -4.7, 0.59)
pt3dadd(115.95, 903.22, -4.65, 0.59)
pt3dadd(116.69, 902.71, -4.65, 0.59)
pt3dadd(117.65, 902.41, -4.65, 0.59)
pt3dadd(118.46, 902.04, -4.65, 0.59)
pt3dadd(118.61, 901.68, -4.6, 0.59)
pt3dadd(119.35, 901.01, -4.6, 0.59)
pt3dadd(119.94, 900.42, -4.6, 0.59)
pt3dadd(120.75, 900.42, -4.4, 0.59)
pt3dadd(121.49, 900.13, -4.35, 0.59)
pt3dadd(122.23, 899.76, -4.35, 0.59)
pt3dadd(122.82, 899.32, -4.3, 0.59)
pt3dadd(123.78, 898.87, -4, 0.59)
pt3dadd(124.37, 898.21, -4.05, 0.59)
pt3dadd(124.08, 897.99, -2.7, 0.59)
pt3dadd(123.78, 896.96, -2.85, 0.59)
pt3dadd(123.04, 896.73, -2.85, 0.59)
pt3dadd(123.71, 896.07, -0.9, 0.59)
pt3dadd(124.3, 894.96, -0.7, 0.59)
pt3dadd(124.37, 894.08, -0.65, 0.59)
pt3dadd(124.89, 893.78, -0.6, 0.59)
pt3dadd(125.78, 893.64, -0.4, 0.59)
pt3dadd(126.74, 893.42, 0.15, 0.59)
pt3dadd(127.85, 893.19, 0.9, 0.59)
pt3dadd(128.88, 893.12, 1.45, 0.59)
pt3dadd(129.55, 893.42, 1.95, 0.59)
pt3dadd(130.51, 893.78, 2.4, 0.59)
pt3dadd(131.17, 894.08, 2.5, 0.59)
pt3dadd(132.06, 894.15, 2.6, 0.59)
pt3dadd(132.8, 894.3, 2.75, 0.59)
pt3dadd(133.83, 894.05, 2.75, 0.3)
pt3dadd(134.35, 893.98, 2.75, 0.3)
pt3dadd(135.46, 894.12, 2.75, 0.3)
pt3dadd(135.9, 894.71, 2.75, 0.3)
pt3dadd(136.87, 894.86, 2.75, 0.3)
pt3dadd(137.75, 894.86, 2.75, 0.3)
pt3dadd(138.12, 894.64, 2.75, 0.3)
}
apic[36] {pt3dclear()
pt3dadd(65.63, 820.02, -23.15, 0.52)
pt3dadd(65.01, 820.32, -30.85, 0.52)
pt3dadd(64.72, 821.13, -30.9, 0.52)
pt3dadd(64.42, 822.01, -30.95, 0.52)
pt3dadd(64.35, 823.41, -31.05, 0.52)
pt3dadd(63.98, 824.52, -31.05, 0.52)
pt3dadd(63.9, 825.11, -31.1, 0.52)
pt3dadd(63.83, 826.22, -31.2, 0.67)
pt3dadd(63.39, 827.18, -31.25, 0.67)
pt3dadd(63.31, 828.06, -32.1, 0.67)
pt3dadd(63.24, 829.46, -32.15, 0.67)
pt3dadd(63.24, 830.2, -32.35, 0.67)
pt3dadd(63.09, 831.45, -32.35, 0.67)
pt3dadd(63.24, 832.19, -32.35, 0.67)
pt3dadd(63.31, 833.44, -32.4, 0.67)
pt3dadd(63.31, 834.62, -32.4, 0.67)
pt3dadd(63.09, 835.44, -32.45, 0.67)
pt3dadd(63.17, 836.17, -32.65, 0.67)
pt3dadd(63.17, 837.21, -32.75, 0.67)
pt3dadd(62.72, 837.87, -32.95, 0.67)
pt3dadd(62.65, 839.05, -33, 0.67)
pt3dadd(62.35, 839.79, -33, 0.67)
pt3dadd(62.35, 841.04, -33.5, 0.74)
pt3dadd(62.06, 841.63, -33.55, 0.74)
pt3dadd(61.54, 842.07, -33.7, 0.74)
pt3dadd(61.32, 842.88, -33.95, 0.74)
pt3dadd(61.17, 843.99, -34, 0.74)
pt3dadd(61.39, 845.02, -34, 0.74)
pt3dadd(61.02, 845.91, -34, 0.74)
pt3dadd(61.02, 846.79, -34.05, 0.74)
pt3dadd(60.73, 847.68, -34.05, 0.74)
pt3dadd(60.43, 848.49, -34.15, 0.74)
pt3dadd(60.21, 849.45, -34.35, 0.74)
pt3dadd(59.77, 849.96, -34.35, 0.74)
pt3dadd(59.54, 850.85, -34.45, 0.74)
pt3dadd(59.47, 851.36, -34.45, 0.74)
pt3dadd(59.32, 851.81, -34.45, 0.74)
pt3dadd(58.97, 852.68, -35.1, 0.74)
pt3dadd(58.67, 853.71, -35.1, 0.89)
pt3dadd(58.23, 854.96, -35.1, 0.89)
pt3dadd(57.78, 855.7, -35.1, 0.89)
pt3dadd(57.34, 856.51, -35.1, 0.89)
pt3dadd(56.9, 857.17, -35.15, 0.89)
pt3dadd(56.53, 857.91, -35.55, 0.89)
pt3dadd(56.23, 858.87, -35.85, 0.89)
pt3dadd(55.42, 860.05, -36.05, 0.89)
pt3dadd(55.2, 860.79, -36.1, 0.89)
pt3dadd(54.6, 861.6, -36.1, 0.89)
pt3dadd(54.38, 862.78, -36.1, 0.89)
pt3dadd(54.31, 863.66, -36.3, 0.89)
pt3dadd(53.72, 864.33, -36.4, 0.89)
pt3dadd(53.64, 865.43, -36.4, 0.89)
pt3dadd(53.5, 866.32, -36.5, 0.89)
pt3dadd(53.35, 867.72, -36.55, 0.89)
pt3dadd(52.9, 868.68, -36.7, 0.89)
pt3dadd(52.46, 869.49, -36.8, 0.89)
pt3dadd(51.94, 870.15, -36.8, 0.89)
pt3dadd(51.43, 870.74, -36.85, 0.89)
pt3dadd(50.91, 871.26, -37, 0.89)
pt3dadd(50.1, 871.78, -37.25, 0.89)
pt3dadd(49.58, 872.59, -37.5, 0.89)
pt3dadd(49.28, 873.4, -37.15, 0.89)
pt3dadd(49.06, 874.43, -36.9, 0.89)
pt3dadd(48.32, 875.69, -36.75, 0.89)
pt3dadd(47.81, 876.5, -36.6, 0.89)
pt3dadd(46.99, 877.6, -36.5, 0.89)
pt3dadd(46.55, 878.49, -36.45, 0.89)
pt3dadd(45.96, 879, -36.6, 0.89)
pt3dadd(45.67, 879.88, -37, 0.89)
pt3dadd(45.59, 880.4, -37, 0.89)
pt3dadd(45.22, 880.91, -37, 0.89)
pt3dadd(44.78, 881.43, -37.1, 0.89)
pt3dadd(44.56, 881.87, -37.3, 0.89)
pt3dadd(44.48, 882.76, -37.45, 0.89)
pt3dadd(44.56, 883.5, -37.6, 0.89)
pt3dadd(44.78, 884.31, -37.7, 0.89)
pt3dadd(44.78, 885.12, -37.75, 0.89)
pt3dadd(44.56, 886, -37.8, 0.89)
pt3dadd(44.19, 886.89, -37.8, 0.89)
pt3dadd(43.82, 887.33, -37.85, 0.89)
pt3dadd(42.86, 887.55, -37.9, 0.89)
pt3dadd(42.27, 887.92, -37.55, 0.89)
pt3dadd(41.75, 888.22, -37.45, 0.89)
pt3dadd(41.45, 888.81, -37.4, 0.89)
pt3dadd(40.94, 889.54, -37.3, 0.89)
pt3dadd(40.79, 890.35, -37.2, 0.89)
pt3dadd(40.27, 891.17, -37.05, 0.89)
pt3dadd(39.97, 891.61, -36.95, 0.89)
pt3dadd(39.97, 892.49, -36.9, 0.89)
pt3dadd(39.83, 893.23, -36.9, 0.89)
pt3dadd(39.83, 894.41, -36.85, 0.89)
pt3dadd(39.75, 895.44, -36.8, 0.89)
pt3dadd(39.38, 896.4, -36.75, 0.89)
pt3dadd(39.01, 897.36, -36.75, 0.89)
pt3dadd(38.64, 897.66, -36.45, 0.89)
pt3dadd(37.98, 898.39, -36.3, 0.89)
pt3dadd(37.46, 899.2, -36.2, 0.89)
pt3dadd(36.8, 899.65, -36.45, 0.89)
pt3dadd(36.13, 900.61, -36.6, 0.89)
pt3dadd(35.69, 901.71, -36.7, 0.89)
pt3dadd(34.8, 902.38, -36.85, 0.89)
pt3dadd(33.84, 903.19, -36.9, 0.89)
pt3dadd(32.73, 903.85, -36.95, 0.81)
pt3dadd(32.07, 904.96, -37, 0.81)
pt3dadd(31.47, 905.69, -37, 0.81)
pt3dadd(31.18, 906.28, -37, 0.81)
pt3dadd(30.96, 907.32, -37, 0.81)
pt3dadd(31.4, 908.42, -37.1, 0.81)
pt3dadd(31.7, 909.09, -37.7, 0.81)
pt3dadd(32.07, 909.97, -37.9, 0.81)
pt3dadd(32.73, 910.71, -38, 0.81)
pt3dadd(33.17, 911.45, -38.45, 0.81)
pt3dadd(34.06, 912.26, -38.85, 0.81)
pt3dadd(34.73, 912.77, -38.85, 0.81)
pt3dadd(34.73, 913.66, -38.9, 0.81)
pt3dadd(34.51, 913.88, -38.9, 0.81)
pt3dadd(34.14, 914.32, -38.9, 0.81)
pt3dadd(33.77, 914.91, -38.9, 0.81)
pt3dadd(33.59, 915.5, -39.9, 0.81)
pt3dadd(33.22, 916.09, -40.05, 0.81)
pt3dadd(32.85, 916.76, -40.35, 0.81)
pt3dadd(32.48, 917.27, -40.8, 0.81)
pt3dadd(32.33, 918.08, -40.8, 0.81)
pt3dadd(32.33, 918.89, -40.8, 0.81)
}
}
proc shape3d_34() {
apic[36] { pt3dadd(32.77, 919.41, -40.85, 0.81)
pt3dadd(33.66, 919.63, -41.4, 0.81)
pt3dadd(34.55, 919.71, -41.4, 0.81)
pt3dadd(35.07, 919.26, -41.4, 0.81)
pt3dadd(36.03, 918.53, -42.6, 0.81)
pt3dadd(37.13, 917.94, -42.6, 0.81)
pt3dadd(38.47, 917.94, -43.55, 0.81)
pt3dadd(38.32, 918.89, -43.6, 0.81)
pt3dadd(38.32, 919.71, -45.35, 0.81)
pt3dadd(37.5, 920.3, -46, 0.96)
pt3dadd(36.91, 920.3, -46, 0.96)
pt3dadd(36.03, 920.44, -46, 0.96)
pt3dadd(35.29, 920.44, -46.1, 0.96)
pt3dadd(34.55, 920.59, -46.65, 0.96)
pt3dadd(33.96, 920.59, -47.8, 0.96)
pt3dadd(33.29, 921.03, -47.8, 0.96)
pt3dadd(32.85, 921.7, -47.85, 0.96)
pt3dadd(32.4, 922.36, -47.95, 0.96)
pt3dadd(33.22, 922.95, -49.8, 0.52)
pt3dadd(33.66, 924.2, -49.75, 0.52)
pt3dadd(33.88, 925.31, -49.75, 0.52)
pt3dadd(32.55, 925.97, -49.75, 0.52)
pt3dadd(31.67, 925.46, -49.75, 0.52)
pt3dadd(31.89, 923.76, -49.7, 0.52)
pt3dadd(33, 923.76, -49.7, 0.52)
pt3dadd(33.66, 924.57, -47.55, 0.52)
pt3dadd(34.03, 925.16, -51.3, 0.52)
pt3dadd(35.07, 925.38, -53.7, 0.52)
pt3dadd(35.88, 926.05, -53.8, 0.52)
pt3dadd(36.91, 925.9, -53.85, 0.52)
pt3dadd(37.95, 925.75, -54.4, 0.67)
pt3dadd(39.06, 926.2, -54.65, 0.67)
pt3dadd(40.39, 926.79, -56.15, 0.81)
pt3dadd(40.61, 927.52, -56.35, 0.81)
pt3dadd(41.2, 928.19, -56.65, 0.81)
pt3dadd(40.9, 929.22, -56.75, 0.81)
pt3dadd(40.53, 930.18, -57.2, 0.81)
pt3dadd(41.05, 930.77, -57.35, 0.81)
pt3dadd(42.23, 931.28, -58.6, 0.81)
pt3dadd(43.12, 930.99, -60.05, 0.67)
}
apic[37] {pt3dclear()
pt3dadd(43.12, 930.99, -60.05, 0.67)
pt3dadd(44.38, 930.84, -60.1, 0.67)
pt3dadd(44.67, 930.03, -60.15, 0.67)
pt3dadd(45.04, 928.92, -60.15, 0.67)
pt3dadd(45.93, 928.19, -60.15, 0.67)
pt3dadd(46.89, 928.48, -61.05, 0.67)
pt3dadd(47.7, 928.85, -61.15, 0.67)
pt3dadd(48.59, 928.33, -61.2, 0.67)
pt3dadd(50.22, 927.97, -62.35, 0.67)
pt3dadd(50.88, 927.52, -62.4, 0.67)
pt3dadd(51.84, 927.08, -62.4, 0.67)
pt3dadd(52.21, 926.42, -68.05, 0.67)
pt3dadd(53.32, 925.83, -68.05, 0.67)
pt3dadd(54.8, 925.31, -68.05, 0.67)
pt3dadd(55.76, 925.38, -68.05, 0.67)
pt3dadd(56.79, 925.46, -68.05, 0.67)
pt3dadd(57.31, 925.46, -68.05, 0.67)
pt3dadd(58.42, 925.02, -68.05, 0.67)
pt3dadd(58.49, 924.43, -68.05, 0.67)
pt3dadd(58.72, 923.76, -68.05, 0.67)
}
apic[38] {pt3dclear()
pt3dadd(43.12, 930.99, -60.05, 0.67)
pt3dadd(42.9, 930.03, -61.45, 0.67)
pt3dadd(42.97, 929.07, -61.45, 0.67)
pt3dadd(43.12, 928.33, -61.5, 0.67)
pt3dadd(43.05, 927.67, -61.5, 0.67)
pt3dadd(43.27, 926.93, -61.5, 0.67)
pt3dadd(43.93, 926.12, -61.5, 0.67)
pt3dadd(44.38, 925.46, -62.55, 0.67)
pt3dadd(45.41, 925.16, -62.55, 0.67)
pt3dadd(46.3, 924.57, -62.55, 0.67)
pt3dadd(46.82, 923.76, -63.3, 0.67)
pt3dadd(47.26, 922.51, -63.3, 0.67)
pt3dadd(47.78, 921.55, -63.35, 0.67)
pt3dadd(48.07, 920.59, -63.35, 0.67)
pt3dadd(48.3, 919.26, -63.35, 0.67)
pt3dadd(48.81, 918.16, -63.35, 0.67)
pt3dadd(49.33, 917.86, -63.35, 0.67)
pt3dadd(49.92, 918.3, -63.6, 0.67)
pt3dadd(50.51, 918.97, -64.05, 0.67)
pt3dadd(51.18, 919.12, -65.35, 0.67)
pt3dadd(52.14, 919.71, -65.35, 0.67)
pt3dadd(52.66, 919.93, -65.35, 0.67)
pt3dadd(53.69, 919.78, -66.6, 0.67)
pt3dadd(54.73, 920, -66.6, 0.67)
pt3dadd(54.65, 918.89, -67.8, 0.67)
pt3dadd(54.21, 918.01, -67.85, 0.67)
pt3dadd(54.28, 917.12, -67.85, 0.67)
pt3dadd(54.65, 916.24, -67.85, 0.67)
pt3dadd(55.24, 915.43, -68.05, 0.67)
pt3dadd(56.35, 914.32, -68.7, 0.67)
pt3dadd(56.94, 913.36, -68.7, 0.67)
pt3dadd(57.61, 912.85, -68.7, 0.67)
pt3dadd(58.27, 912.55, -68.7, 0.52)
pt3dadd(59.46, 912.26, -68.7, 0.52)
pt3dadd(60.19, 911.67, -68.9, 0.52)
pt3dadd(61.01, 910.71, -68.95, 0.52)
}
apic[39] {pt3dclear()
pt3dadd(50.26, 446.42, 0.75, 2.37)
pt3dadd(48.96, 445.91, 0, 2.37)
pt3dadd(47.77, 446.79, -0.05, 2.37)
pt3dadd(47.18, 447.6, -0.05, 2.37)
pt3dadd(46.52, 448.12, -0.1, 2.37)
pt3dadd(46.22, 448.86, -0.45, 2.37)
pt3dadd(45.7, 449.67, -0.75, 2.37)
pt3dadd(45.41, 450.55, -1.3, 2.37)
pt3dadd(44.97, 451.66, -1.6, 2.37)
pt3dadd(44.74, 452.4, -1.9, 2.37)
pt3dadd(44.74, 453.21, -2.2, 2.37)
pt3dadd(44.89, 454.09, -2.85, 2.37)
pt3dadd(45.26, 454.9, -2.9, 2.37)
pt3dadd(45.41, 455.86, -2.95, 2.37)
pt3dadd(45.63, 456.67, -3.15, 2.37)
pt3dadd(45.93, 457.41, -3.25, 2.37)
pt3dadd(46, 458, -3.3, 2.51)
pt3dadd(46, 459.25, -3.4, 2.51)
pt3dadd(46.22, 460.58, -3.6, 2.51)
pt3dadd(45.63, 461.76, -1.4, 2.51)
pt3dadd(45.41, 462.79, -1.5, 2.51)
pt3dadd(45.34, 463.83, -1.5, 2.51)
pt3dadd(45.04, 464.79, -1.5, 2.51)
pt3dadd(45.11, 465.38, -1.45, 2.51)
pt3dadd(44.74, 466.26, -1.35, 2.51)
pt3dadd(44.3, 467.29, -1.25, 2.51)
pt3dadd(43.78, 468.33, -1.15, 2.51)
pt3dadd(43.34, 469.36, -1.45, 2.51)
pt3dadd(43.19, 470.02, -2.55, 2.51)
pt3dadd(42.9, 471.28, -2.7, 2.51)
pt3dadd(42.23, 472.23, -2.8, 2.51)
pt3dadd(41.71, 473.34, -2.85, 2.51)
pt3dadd(41.49, 474.3, -2.9, 2.51)
pt3dadd(41.12, 475.11, -2.9, 2.51)
pt3dadd(41.05, 476.29, -2.95, 2.51)
pt3dadd(41.27, 476.95, -2.95, 2.51)
pt3dadd(41.34, 477.76, -2.95, 2.51)
pt3dadd(41.64, 478.43, -2.95, 2.51)
pt3dadd(42.3, 479.28, -3.35, 2.51)
pt3dadd(42.74, 480.09, -3.4, 2.51)
pt3dadd(42.89, 481.64, -1.9, 2.51)
pt3dadd(43.4, 482.67, -1.75, 2.51)
pt3dadd(43.63, 483.56, -1.7, 2.51)
pt3dadd(43.77, 484.37, -1.65, 2.51)
pt3dadd(43.92, 485.84, -1.6, 2.51)
pt3dadd(44, 486.73, -1.6, 2.51)
pt3dadd(44, 487.54, -1.55, 2.51)
pt3dadd(44.22, 488.35, -1.45, 2.51)
pt3dadd(44.44, 489.38, -1.4, 2.51)
pt3dadd(44.44, 490.56, -1.4, 2.51)
pt3dadd(44.29, 491.52, -1.4, 2.37)
pt3dadd(44.29, 492.19, -1.4, 2.37)
pt3dadd(44.29, 492.85, -1.3, 2.37)
pt3dadd(44.07, 493.81, -1.1, 2.37)
pt3dadd(43.77, 494.77, -0.85, 2.37)
pt3dadd(43.7, 496.17, -2.55, 2.37)
pt3dadd(43.33, 497.13, -2.65, 2.37)
pt3dadd(43.11, 498.23, -2.7, 2.37)
pt3dadd(43.03, 499.05, -2.8, 2.37)
pt3dadd(42.81, 500.59, -2.95, 2.37)
pt3dadd(42.96, 501.48, -3, 2.37)
pt3dadd(43.11, 502.44, -3.05, 2.37)
pt3dadd(43.26, 503.54, -3.05, 2.37)
pt3dadd(43.18, 504.43, -3.1, 2.37)
pt3dadd(42.89, 505.46, -3.15, 2.37)
pt3dadd(42.37, 506.42, -3.2, 2.37)
pt3dadd(41.85, 507.3, -3.25, 2.37)
pt3dadd(41.48, 508.12, -3.25, 2.37)
pt3dadd(40.89, 508.93, -3.4, 2.37)
pt3dadd(40.89, 509.81, -3.45, 2.37)
pt3dadd(41.64, 511.51, -2.75, 2.37)
pt3dadd(42.38, 512.32, -2.55, 2.37)
pt3dadd(43.05, 513.43, -2.45, 2.37)
pt3dadd(43.57, 514.53, -2.35, 2.37)
pt3dadd(44.08, 515.71, -2.3, 2.37)
pt3dadd(44.75, 516.52, -2.25, 2.37)
pt3dadd(45.12, 517.48, -2.2, 2.37)
pt3dadd(45.49, 518.59, -2.2, 2.37)
pt3dadd(45.49, 519.62, -2.15, 2.37)
pt3dadd(45.41, 520.87, -2.15, 2.37)
pt3dadd(45.56, 521.69, -2.05, 2.37)
pt3dadd(45.19, 522.64, -2.05, 2.37)
pt3dadd(45.34, 523.16, -1.95, 2.37)
pt3dadd(45.34, 524.12, -1.7, 2.37)
pt3dadd(44.97, 525, -1.5, 2.37)
pt3dadd(44.6, 525.96, -1.65, 2.37)
pt3dadd(44.6, 526.7, -1.9, 2.37)
pt3dadd(44.01, 528.1, -2.85, 2.37)
pt3dadd(43.71, 528.91, -3.1, 2.37)
pt3dadd(43.57, 529.95, -3.5, 2.37)
pt3dadd(43.64, 530.83, -3.7, 2.37)
pt3dadd(43.79, 531.64, -3.85, 2.37)
pt3dadd(43.79, 532.45, -3.9, 2.37)
pt3dadd(43.64, 533.04, -3.9, 2.37)
pt3dadd(42.97, 534.08, -3.95, 2.37)
pt3dadd(42.53, 534.81, -3.95, 2.37)
pt3dadd(42.6, 536.58, -4.1, 2.37)
pt3dadd(42.46, 537.61, -2.3, 2.59)
pt3dadd(42.68, 538.87, -2.3, 2.59)
pt3dadd(42.6, 539.61, -2.35, 2.59)
pt3dadd(42.83, 540.2, -2.35, 2.59)
pt3dadd(43.05, 541.15, -2.35, 2.59)
pt3dadd(43.1, 542, -2.35, 2.59)
pt3dadd(43.4, 542.88, -2.35, 2.44)
}
}
proc shape3d_35() {
apic[39] { pt3dadd(43.7, 543.62, -2.35, 2.44)
pt3dadd(44.29, 544.73, -2.35, 2.29)
pt3dadd(44.43, 545.39, -2.35, 2.29)
pt3dadd(44.43, 546.13, -2.35, 2.29)
pt3dadd(44.21, 546.79, -2.35, 2.29)
pt3dadd(43.33, 548.04, -2.3, 2.29)
pt3dadd(43.03, 548.86, -2.3, 2.29)
pt3dadd(42.59, 549.67, -2.25, 2.29)
pt3dadd(41.55, 550.55, -4, 2.29)
pt3dadd(41.18, 551.14, -3.95, 2.29)
pt3dadd(40.67, 551.88, -3.95, 2.29)
pt3dadd(40.22, 552.4, -3.95, 2.29)
pt3dadd(39.63, 553.35, -3.95, 2.29)
pt3dadd(39.19, 554.17, -3.95, 2.29)
pt3dadd(38.89, 555.05, -3.95, 2.29)
pt3dadd(38.37, 556.01, -3.95, 2.29)
pt3dadd(38.08, 557.56, -3.6, 2.29)
pt3dadd(37.41, 558.59, -3.8, 2.29)
pt3dadd(37.04, 559.62, -5.2, 2.29)
pt3dadd(36.67, 560.36, -5.3, 2.29)
pt3dadd(36.08, 561.17, -5.35, 2.29)
pt3dadd(36.01, 561.98, -5.35, 2.29)
pt3dadd(35.79, 562.72, -5.4, 2.29)
pt3dadd(35.71, 563.53, -5.4, 2.29)
pt3dadd(35.79, 564.64, -5.4, 2.29)
pt3dadd(36.08, 565.6, -5.4, 2.29)
pt3dadd(36.45, 567.51, -5.4, 2.29)
pt3dadd(36.3, 568.4, -5.4, 2.29)
pt3dadd(36.6, 569.21, -5.4, 2.29)
pt3dadd(36.75, 569.65, -5.65, 2.29)
pt3dadd(37.12, 570.61, -5.8, 2.29)
pt3dadd(37.04, 571.5, -5.85, 2.29)
pt3dadd(37.12, 572.53, -5.9, 2.29)
pt3dadd(36.81, 573.64, -4, 2.29)
pt3dadd(37.03, 574.53, -3.8, 2.29)
pt3dadd(37.03, 575.49, -3.7, 2.29)
pt3dadd(36.59, 576.59, -3.65, 2.29)
pt3dadd(36.59, 577.55, -3.65, 2.29)
pt3dadd(36.37, 578.44, -3.5, 2.29)
pt3dadd(35.85, 579.47, -3.4, 2.29)
pt3dadd(35.55, 580.13, -3.55, 2.29)
pt3dadd(35.7, 581.17, -4.65, 2.29)
pt3dadd(35.55, 581.98, -4.8, 2.29)
pt3dadd(35.7, 582.94, -4.85, 2.29)
pt3dadd(35.77, 583.97, -5.95, 2.29)
pt3dadd(35.77, 585.44, -6.1, 2.29)
pt3dadd(36, 586.48, -6.15, 2.29)
pt3dadd(36.37, 587.58, -6.15, 2.29)
pt3dadd(36.51, 588.54, -6.2, 2.29)
pt3dadd(36.66, 589.43, -6.2, 2.29)
pt3dadd(37.03, 590.24, -6.25, 2.29)
pt3dadd(37.1, 591.27, -6.25, 2.29)
pt3dadd(37.62, 592.38, -6.25, 2.29)
pt3dadd(37.84, 593.26, -6.25, 2.29)
pt3dadd(37.92, 595.03, -6.25, 2.29)
pt3dadd(38.36, 595.84, -6.25, 2.29)
pt3dadd(38.43, 597.02, -6.25, 2.29)
pt3dadd(38.51, 598.28, -6.3, 2.29)
pt3dadd(38.21, 599.16, -6.3, 2.29)
pt3dadd(37.62, 600.05, -6.35, 2.29)
pt3dadd(36.81, 600.86, -6.4, 2.29)
pt3dadd(36.51, 601.59, -6.4, 2.29)
pt3dadd(36.22, 602.11, -6.4, 2.29)
pt3dadd(35.85, 602.63, -6.45, 2.29)
pt3dadd(35.55, 603.07, -6.45, 2.29)
pt3dadd(35.18, 603.95, -6.45, 2.29)
pt3dadd(34.99, 605.42, -6.45, 2.29)
pt3dadd(34.32, 606.52, -6.45, 2.29)
pt3dadd(33.95, 607.19, -6.45, 2.29)
pt3dadd(33.66, 607.93, -6.45, 2.29)
pt3dadd(33.07, 609.25, -6.45, 2.29)
pt3dadd(32.7, 609.77, -6.45, 2.29)
pt3dadd(31.74, 611.02, -6.45, 2.29)
pt3dadd(31.59, 612.35, -6.45, 2.29)
pt3dadd(31.81, 613.31, -6.45, 2.29)
pt3dadd(31.81, 614.49, -6.45, 2.29)
pt3dadd(32.03, 616.04, -4.95, 2.29)
pt3dadd(32.84, 617, -4.7, 1.92)
pt3dadd(33.73, 617.37, -4.65, 1.92)
pt3dadd(34.84, 618.03, -3.8, 1.92)
pt3dadd(35.28, 618.91, -5.35, 1.92)
pt3dadd(36.02, 619.65, -6, 1.92)
pt3dadd(36.32, 620.32, -6.25, 1.92)
pt3dadd(36.69, 621.27, -6.75, 1.92)
pt3dadd(37.2, 622.45, -7.75, 1.92)
pt3dadd(37.35, 623.71, -7.8, 1.92)
pt3dadd(37.5, 624.96, -7.85, 1.92)
pt3dadd(37.65, 625.99, -7.9, 1.92)
pt3dadd(37.06, 627.4, -8.15, 1.92)
pt3dadd(36.69, 628.21, -8.15, 1.92)
pt3dadd(35.95, 629.02, -8.2, 1.92)
pt3dadd(35.21, 630.05, -8.2, 1.92)
pt3dadd(34.91, 630.71, -8.25, 1.92)
pt3dadd(33.88, 631.6, -8.25, 1.92)
pt3dadd(33.44, 632.04, -8.25, 1.92)
pt3dadd(32.7, 632.7, -8.25, 1.92)
pt3dadd(32.18, 633.22, -8.35, 1.92)
pt3dadd(31.74, 634.03, -8.5, 1.92)
pt3dadd(31.44, 634.55, -8.55, 1.92)
pt3dadd(31.37, 635.29, -8.55, 1.92)
pt3dadd(30.99, 636.08, -9.05, 1.92)
pt3dadd(30.99, 636.89, -9.05, 1.92)
pt3dadd(30.47, 637.92, -9.05, 1.92)
pt3dadd(30.18, 639.39, -9.05, 1.92)
pt3dadd(30.25, 640.5, -9.05, 2.07)
pt3dadd(30.03, 641.75, -9.05, 2.07)
pt3dadd(30.55, 642.86, -9.05, 2.07)
pt3dadd(30.99, 643.82, -9.1, 2.07)
pt3dadd(30.99, 644.85, -9.1, 2.07)
pt3dadd(30.77, 646.25, -9.1, 2.07)
pt3dadd(30.7, 646.99, -9.1, 2.07)
pt3dadd(30.47, 648.1, -9.2, 1.85)
pt3dadd(30.4, 649.2, -9.2, 1.85)
pt3dadd(30.1, 650.53, -9.2, 1.85)
pt3dadd(29.81, 651.34, -9.2, 1.85)
pt3dadd(29.22, 652.15, -9.2, 1.85)
pt3dadd(28.92, 652.82, -9.2, 1.85)
pt3dadd(29.07, 654.29, -9.2, 1.85)
pt3dadd(29.29, 655.62, -10, 1.85)
pt3dadd(29.59, 657.02, -10, 1.85)
pt3dadd(29.96, 658.05, -10, 1.85)
pt3dadd(30.33, 659.23, -10, 1.85)
pt3dadd(30.4, 660.41, -10, 1.85)
pt3dadd(30.77, 661.3, -10, 1.85)
pt3dadd(31.14, 662.55, -10.05, 1.85)
pt3dadd(31.51, 663.8, -10.3, 1.85)
pt3dadd(31.95, 664.76, -10.3, 1.85)
pt3dadd(32.25, 665.8, -10.3, 1.85)
pt3dadd(32.84, 666.53, -10.3, 1.85)
pt3dadd(33.25, 667.7, -10.95, 1.85)
pt3dadd(33.84, 668.73, -10.95, 1.85)
pt3dadd(34.14, 669.84, -10.95, 1.85)
pt3dadd(34.29, 671.09, -11, 1.85)
pt3dadd(34.43, 671.97, -11, 1.85)
pt3dadd(34.43, 672.93, -11, 1.85)
pt3dadd(34.21, 673.97, -11, 1.85)
pt3dadd(33.99, 675.22, -11, 1.85)
pt3dadd(33.77, 676.18, -11, 1.85)
pt3dadd(33.47, 677.06, -11, 1.85)
pt3dadd(33.1, 678.24, -11, 1.85)
pt3dadd(32.81, 679.42, -11, 1.85)
pt3dadd(32.88, 680.6, -11, 1.85)
pt3dadd(32.44, 681.41, -11, 1.85)
pt3dadd(32.44, 682.52, -11, 1.85)
pt3dadd(32.29, 683.85, -11, 1.85)
pt3dadd(32.29, 684.95, -11.45, 1.85)
pt3dadd(32, 686.36, -11.45, 1.85)
pt3dadd(31.55, 686.65, -11.5, 1.7)
pt3dadd(30.59, 687.61, -11.5, 1.7)
pt3dadd(29.63, 688.72, -11.5, 1.7)
pt3dadd(28.97, 689.38, -11.5, 1.7)
pt3dadd(28.15, 690.34, -11.5, 1.7)
pt3dadd(27.34, 691.22, -11.5, 1.7)
pt3dadd(26.82, 692.18, -11.5, 1.7)
pt3dadd(26.57, 693.33, -12.35, 2.07)
pt3dadd(26.86, 694.36, -12.2, 2.07)
pt3dadd(26.86, 695.84, -12.15, 2.07)
pt3dadd(27.16, 697.31, -12.15, 2.07)
}
apic[40] {pt3dclear()
pt3dadd(27.16, 697.31, -12.15, 2.07)
pt3dadd(27.01, 698.71, -12.1, 2.07)
pt3dadd(27.08, 699.82, -12.1, 2.07)
pt3dadd(26.34, 701.74, -12.4, 1.92)
pt3dadd(25.83, 702.99, -12.5, 1.55)
pt3dadd(25.38, 704.39, -12.5, 1.55)
pt3dadd(24.79, 705.13, -12.5, 1.55)
pt3dadd(24.35, 706.09, -12.55, 1.55)
pt3dadd(23.76, 706.68, -11.6, 1.55)
pt3dadd(23.31, 707.56, -11.45, 1.55)
pt3dadd(23.54, 708.59, -11.4, 1.55)
pt3dadd(24.35, 710.14, -11.3, 1.55)
pt3dadd(25.38, 711.4, -11.3, 1.55)
pt3dadd(26.05, 712.5, -10.65, 1.55)
pt3dadd(26.49, 713.54, -10.85, 1.55)
pt3dadd(26.71, 714.13, -11.3, 1.55)
pt3dadd(27.08, 715.01, -11.55, 1.55)
pt3dadd(27.45, 715.9, -12.25, 1.55)
pt3dadd(27.75, 716.85, -12.4, 1.55)
pt3dadd(27.9, 718.18, -12.45, 1.55)
pt3dadd(27.67, 719.29, -12.5, 1.55)
pt3dadd(27.3, 720.62, -12.6, 1.55)
pt3dadd(27.16, 721.5, -12.75, 1.55)
pt3dadd(26.94, 722.83, -13.05, 1.55)
pt3dadd(26.64, 724.23, -13.3, 1.55)
pt3dadd(26.05, 725.41, -13.35, 1.55)
pt3dadd(25.9, 726.37, -13.35, 1.55)
pt3dadd(25.38, 727.4, -13.4, 1.55)
pt3dadd(25.16, 728.14, -13.4, 1.55)
pt3dadd(24.64, 729.1, -13.4, 1.55)
pt3dadd(23.98, 729.98, -13.4, 1.55)
pt3dadd(23.52, 730.6, -13.6, 1.55)
pt3dadd(23.22, 731.19, -13.6, 1.55)
pt3dadd(22.19, 731.63, -13.6, 1.55)
pt3dadd(21.74, 732, -13.65, 1.55)
pt3dadd(21, 732.45, -14.1, 1.55)
pt3dadd(20.86, 733.4, -14.4, 1.55)
pt3dadd(20.64, 734.44, -14.45, 1.55)
pt3dadd(20.34, 735.4, -14.5, 1.55)
pt3dadd(19.97, 736.06, -14.5, 1.55)
pt3dadd(19.53, 737.46, -14.55, 1.55)
pt3dadd(19.53, 738.79, -14.55, 1.55)
}
}
proc shape3d_36() {
apic[40] { pt3dadd(19.53, 740.04, -14.55, 1.55)
pt3dadd(19.3, 741.07, -14.55, 1.55)
pt3dadd(19.23, 741.89, -14.55, 1.55)
pt3dadd(18.71, 743.36, -14.7, 1.55)
pt3dadd(18.49, 744.98, -14.95, 1.48)
pt3dadd(18.2, 745.79, -15.15, 1.48)
pt3dadd(17.83, 746.97, -15.15, 1.48)
pt3dadd(17.6, 747.86, -15.25, 1.48)
pt3dadd(17.46, 749.11, -15.35, 1.48)
pt3dadd(17.46, 749.85, -15.35, 1.48)
pt3dadd(17.38, 750.74, -15.35, 1.48)
pt3dadd(16.87, 751.69, -15.35, 1.48)
pt3dadd(15.83, 752.51, -15.35, 1.48)
pt3dadd(15.54, 753.1, -15.4, 1.48)
pt3dadd(14.65, 753.46, -15.6, 1.48)
pt3dadd(13.98, 754.35, -15.6, 1.48)
pt3dadd(13.02, 755.38, -15.65, 1.48)
pt3dadd(12.51, 756.04, -15.65, 1.48)
pt3dadd(11.99, 757.37, -16.3, 1.48)
pt3dadd(11.4, 758.63, -16.3, 1.48)
pt3dadd(10.95, 759.58, -16.3, 1.48)
pt3dadd(10.36, 760.54, -16.3, 1.48)
pt3dadd(9.92, 761.5, -16.3, 1.48)
pt3dadd(9.64, 762.55, -16.45, 1.48)
pt3dadd(9.42, 763.51, -16.45, 1.48)
pt3dadd(9.2, 764.54, -16.45, 1.48)
pt3dadd(8.6, 765.43, -16.5, 1.48)
pt3dadd(7.72, 766.31, -16.5, 1.48)
}
apic[41] {pt3dclear()
pt3dadd(7.72, 766.31, -16.5, 1.48)
pt3dadd(7.94, 767.49, -16.5, 1.48)
pt3dadd(7.87, 768.52, -16.5, 1.48)
pt3dadd(7.79, 769.11, -16.5, 1.48)
pt3dadd(7.72, 770.07, -16.7, 1.48)
pt3dadd(7.57, 771.1, -16.75, 1.48)
pt3dadd(7.13, 772.36, -16.7, 1.48)
pt3dadd(6.83, 773.46, -16.7, 1.48)
pt3dadd(6.68, 774.2, -16.7, 1.48)
pt3dadd(6.83, 775.46, -16.7, 1.48)
pt3dadd(6.98, 776.64, -16.7, 1.48)
pt3dadd(7.35, 777.74, -16.65, 1.48)
pt3dadd(7.94, 778.41, -16.65, 1.48)
pt3dadd(8.75, 779.22, -16.65, 1.48)
pt3dadd(9.12, 780.03, -16.65, 1.48)
pt3dadd(9.27, 781.06, -16.65, 1.48)
pt3dadd(9.64, 782.17, -16.65, 1.48)
pt3dadd(9.86, 783.35, -16.65, 1.48)
}
apic[42] {pt3dclear()
pt3dadd(9.86, 783.35, -16.65, 1.11)
pt3dadd(10.01, 784.38, -16.4, 1.11)
pt3dadd(9.86, 784.97, -17.25, 1.11)
pt3dadd(9.86, 785.85, -17.35, 1.11)
pt3dadd(9.49, 786.59, -17.45, 1.11)
pt3dadd(9.27, 787.48, -17.55, 1.11)
pt3dadd(8.83, 788.21, -17.6, 1.11)
pt3dadd(8.46, 789.39, -17.65, 1.11)
pt3dadd(8.01, 790.43, -17.7, 1.11)
pt3dadd(7.89, 791.11, -20.3, 1.03)
pt3dadd(7.97, 791.92, -20.3, 1.03)
}
apic[43] {pt3dclear()
pt3dadd(7.97, 791.92, -20.3, 1.03)
pt3dadd(8.34, 792.73, -18.05, 1.03)
pt3dadd(8.41, 793.62, -18, 1.03)
pt3dadd(8.19, 794.13, -17.8, 1.03)
pt3dadd(7.89, 794.87, -17.45, 1.03)
pt3dadd(7.74, 795.61, -17.35, 1.03)
pt3dadd(7.89, 796.42, -17.7, 1.03)
pt3dadd(8.26, 797.01, -17.95, 1.03)
pt3dadd(8.56, 797.67, -18.4, 1.03)
pt3dadd(9, 798.63, -18.55, 1.03)
pt3dadd(9.37, 799.22, -18.6, 1.03)
pt3dadd(9.89, 799.74, -17.15, 0.89)
pt3dadd(9.96, 800.33, -17.15, 0.89)
pt3dadd(9.74, 800.99, -17.1, 0.89)
pt3dadd(9.37, 801.8, -17.1, 0.89)
pt3dadd(9.22, 802.47, -17.05, 0.89)
pt3dadd(9.22, 803.13, -17.05, 0.89)
pt3dadd(9.52, 803.5, -17.05, 0.89)
pt3dadd(10.11, 803.87, -17.05, 0.89)
pt3dadd(10.55, 804.38, -17.05, 0.89)
pt3dadd(10.85, 805.05, -17.05, 0.89)
pt3dadd(11, 805.79, -17, 0.89)
pt3dadd(11.14, 806.89, -17, 0.89)
pt3dadd(11.59, 807.78, -17, 0.89)
pt3dadd(11.59, 809.1, -17, 0.89)
pt3dadd(11.22, 809.92, -17, 0.89)
pt3dadd(11.07, 810.73, -17, 0.89)
pt3dadd(10.77, 811.76, -17, 0.89)
pt3dadd(10.55, 811.98, -17, 0.89)
pt3dadd(9.67, 812.28, -17, 0.81)
pt3dadd(9.07, 812.5, -17, 0.81)
pt3dadd(7.97, 812.42, -17, 0.81)
pt3dadd(7.52, 813.16, -17, 0.81)
pt3dadd(7.6, 813.9, -17, 0.81)
pt3dadd(8.34, 814.71, -17, 0.81)
pt3dadd(9.22, 814.93, -17.05, 0.81)
pt3dadd(9.96, 815.3, -17.05, 0.81)
pt3dadd(10.26, 816.33, -17.05, 0.81)
pt3dadd(10.33, 817.29, -17.05, 0.81)
}
apic[44] {pt3dclear()
pt3dadd(10.33, 817.29, -17.05, 0.52)
pt3dadd(11.29, 817.81, -17.4, 0.52)
pt3dadd(11.66, 818.77, -17.5, 0.52)
pt3dadd(11.73, 819.8, -17.55, 0.52)
pt3dadd(12.03, 820.76, -17.55, 0.52)
pt3dadd(12.55, 821.57, -17.55, 0.52)
pt3dadd(12.84, 822.3, -17.55, 0.52)
pt3dadd(13.29, 823.26, -17.55, 0.52)
pt3dadd(13.66, 824, -17.55, 0.52)
pt3dadd(14.03, 824.66, -17.55, 0.52)
pt3dadd(14.32, 825.33, -17.55, 0.52)
pt3dadd(14.58, 826, -18.2, 0.44)
pt3dadd(14.36, 826.81, -18.25, 0.44)
pt3dadd(14.28, 827.77, -18.3, 0.44)
pt3dadd(14.58, 828.58, -18.3, 0.44)
pt3dadd(14.73, 829.98, -18.35, 0.44)
pt3dadd(14.8, 830.94, -18.35, 0.44)
pt3dadd(14.95, 831.75, -18.4, 0.44)
pt3dadd(15.47, 832.42, -19.8, 0.44)
pt3dadd(15.76, 833.16, -19.8, 0.44)
pt3dadd(15.98, 834.26, -19.85, 0.44)
pt3dadd(16.13, 835.07, -19.85, 0.44)
pt3dadd(16.35, 836.11, -19.85, 0.44)
pt3dadd(16.5, 837.06, -19.85, 0.44)
pt3dadd(16.87, 837.8, -19.85, 0.44)
pt3dadd(17.76, 838.24, -19.85, 0.44)
pt3dadd(18.57, 838.83, -19.85, 0.44)
pt3dadd(19.38, 839.65, -20.3, 0.44)
pt3dadd(19.97, 840.9, -20.35, 0.44)
pt3dadd(20.2, 842.01, -20.4, 0.44)
pt3dadd(20.71, 843.11, -20.4, 0.44)
pt3dadd(21.23, 843.48, -20.4, 0.44)
pt3dadd(22.04, 844.14, -20.4, 0.44)
pt3dadd(22.12, 844.88, -20.4, 0.44)
pt3dadd(22.19, 845.91, -20.65, 0.44)
pt3dadd(22.78, 846.8, -20.95, 0.44)
pt3dadd(23.45, 848.05, -21.25, 0.44)
pt3dadd(23.52, 849.45, -21.25, 0.44)
pt3dadd(23.89, 850.85, -21.25, 0.44)
pt3dadd(24.04, 852.11, -21.3, 0.44)
pt3dadd(24.04, 853.07, -21.3, 0.44)
pt3dadd(24.04, 854.54, -21.3, 0.44)
pt3dadd(24.04, 855.57, -21.3, 0.44)
pt3dadd(23.89, 856.39, -21.3, 0.44)
pt3dadd(23.56, 857.13, -21.3, 0.44)
pt3dadd(23.26, 857.94, -21.3, 0.44)
pt3dadd(22.97, 859.27, -21.3, 0.44)
pt3dadd(23.48, 860.59, -21.3, 0.44)
pt3dadd(23.78, 861.7, -21.3, 0.44)
pt3dadd(24.52, 862.66, -21.3, 0.44)
pt3dadd(24.44, 863.32, -20, 0.44)
pt3dadd(24, 864.72, -20, 0.44)
pt3dadd(23.7, 865.54, -20.05, 0.44)
pt3dadd(23.7, 866.42, -20.05, 0.44)
pt3dadd(24, 867.16, -20.15, 0.44)
pt3dadd(24.22, 867.82, -20.4, 0.44)
pt3dadd(23.93, 869, -18.95, 0.44)
pt3dadd(23.48, 870.11, -18.85, 0.44)
pt3dadd(22.82, 870.77, -18.7, 0.44)
pt3dadd(22.45, 871.21, -18.6, 0.44)
pt3dadd(21.71, 871.95, -18.5, 0.44)
pt3dadd(21.64, 873.21, -18.35, 0.44)
pt3dadd(21.86, 873.65, -18.2, 0.44)
pt3dadd(22.3, 874.24, -17.9, 0.44)
pt3dadd(22.74, 874.68, -17.75, 0.44)
pt3dadd(23.34, 875.2, -17.7, 0.44)
pt3dadd(23.19, 876.23, -17.8, 0.44)
pt3dadd(22.89, 877.11, -17.85, 0.44)
pt3dadd(22.97, 877.48, -17.9, 0.44)
pt3dadd(23.34, 877.78, -17.9, 0.44)
pt3dadd(23.56, 878.66, -17.9, 0.44)
pt3dadd(23.41, 879.62, -17.95, 0.44)
pt3dadd(23.56, 879.99, -17.95, 0.44)
pt3dadd(24, 880.43, -17.95, 0.44)
}
apic[45] {pt3dclear()
pt3dadd(10.33, 817.29, -17.05, 0.74)
pt3dadd(9.8, 817.86, -15.6, 0.74)
pt3dadd(9.35, 818.45, -15.55, 0.74)
pt3dadd(8.98, 819.12, -15.55, 0.74)
pt3dadd(8.61, 819.41, -15.5, 0.74)
pt3dadd(8.1, 819.71, -15.5, 0.74)
pt3dadd(7.36, 819.78, -15.5, 0.74)
pt3dadd(6.62, 820, -15.45, 0.74)
pt3dadd(6.47, 820.45, -15.45, 0.74)
pt3dadd(6.17, 820.89, -15.45, 0.74)
pt3dadd(5.8, 821.33, -15.45, 0.74)
pt3dadd(5.88, 822.07, -15.45, 0.74)
pt3dadd(6.03, 822.88, -15.45, 0.74)
pt3dadd(6.1, 823.47, -15.45, 0.74)
pt3dadd(6.4, 824.28, -15.15, 0.74)
pt3dadd(6.54, 825.39, -14.85, 0.74)
pt3dadd(6.62, 826.35, -14.75, 0.74)
pt3dadd(6.25, 827.08, -14.7, 0.74)
pt3dadd(5.66, 827.53, -14.7, 0.74)
pt3dadd(4.99, 827.67, -14.65, 0.74)
pt3dadd(4.4, 827.38, -14.65, 0.74)
pt3dadd(3.59, 826.79, -14.25, 0.74)
pt3dadd(3.14, 826.42, -14.2, 0.74)
pt3dadd(2.33, 826.12, -14.2, 0.74)
pt3dadd(1.81, 826.12, -14.15, 0.74)
pt3dadd(0.71, 826.42, -14.15, 0.74)
pt3dadd(-0.03, 826.86, -13.95, 0.74)
pt3dadd(-0.33, 827.38, -13.35, 0.74)
pt3dadd(-0.11, 828.19, -13.3, 0.74)
pt3dadd(0.11, 828.71, -13.3, 0.74)
}
}
proc shape3d_37() {
apic[45] { pt3dadd(0.11, 829.3, -13.25, 0.74)
pt3dadd(-0.03, 830.03, -13.2, 0.74)
pt3dadd(-0.4, 830.92, -13.15, 0.74)
pt3dadd(-0.7, 831.66, -13.1, 0.74)
pt3dadd(-1.22, 832.25, -13.1, 0.74)
pt3dadd(-1.81, 832.91, -12.95, 0.74)
pt3dadd(-2.4, 833.65, -12.75, 0.74)
pt3dadd(-2.92, 834.53, -12.8, 0.74)
pt3dadd(-3.21, 835.2, -12.95, 0.74)
pt3dadd(-3.06, 836.3, -13.15, 0.74)
pt3dadd(-2.4, 837.33, -13.25, 0.74)
pt3dadd(-1.51, 838.37, -13.35, 0.74)
pt3dadd(-0.92, 839.25, -13.35, 0.74)
pt3dadd(-0.55, 839.77, -13.35, 0.74)
pt3dadd(-0.92, 840.95, -13.4, 0.74)
pt3dadd(-1.51, 840.36, -13.4, 0.74)
pt3dadd(-2.55, 840.58, -13.4, 0.74)
pt3dadd(-2.84, 841.46, -13.4, 0.74)
pt3dadd(-2.1, 842.2, -13.4, 0.74)
pt3dadd(-1.81, 843.23, -13.55, 0.74)
pt3dadd(-1.66, 844.27, -13.65, 0.74)
pt3dadd(-1.96, 845.3, -13.7, 0.74)
pt3dadd(-2.55, 846.26, -13.7, 0.74)
pt3dadd(-2.92, 846.99, -13.75, 0.74)
pt3dadd(-3.21, 847.36, -13.75, 0.74)
pt3dadd(-3.73, 848.17, -13.75, 0.74)
pt3dadd(-3.43, 848.76, -13.75, 0.74)
pt3dadd(-2.92, 849.21, -13.75, 0.74)
pt3dadd(-2.74, 850.03, -12.7, 0.74)
pt3dadd(-2.52, 850.84, -12.55, 0.74)
pt3dadd(-2.37, 852.09, -12.45, 0.74)
pt3dadd(-2.07, 852.68, -12.35, 0.74)
pt3dadd(-1.19, 853.35, -12.25, 0.74)
pt3dadd(-0.82, 854.08, -12.05, 0.74)
pt3dadd(-0.67, 854.6, -11.9, 0.74)
pt3dadd(-0.45, 855.34, -11.8, 0.74)
pt3dadd(-0.3, 856.44, -11.7, 0.74)
pt3dadd(-0.15, 857.03, -11.4, 0.74)
pt3dadd(0.22, 857.85, -11.15, 0.74)
pt3dadd(0.73, 858.58, -10.9, 0.74)
pt3dadd(1.7, 859.54, -10.85, 0.74)
pt3dadd(1.99, 860.43, -10.8, 0.74)
pt3dadd(0.88, 860.65, -10.45, 0.74)
pt3dadd(0.29, 859.91, -10.05, 0.74)
pt3dadd(-0.45, 859.91, -9.95, 0.74)
pt3dadd(-1.26, 859.91, -9.5, 0.74)
pt3dadd(-2.37, 860.8, -9.25, 0.74)
pt3dadd(-3.03, 860.57, -9.15, 0.74)
pt3dadd(-3.4, 860.72, -9, 0.74)
pt3dadd(-4.36, 861.02, -8.95, 0.74)
pt3dadd(-4.81, 861.61, -8.85, 0.74)
pt3dadd(-5.03, 862.27, -8.75, 0.74)
pt3dadd(-4.51, 863.3, -8.65, 0.74)
pt3dadd(-4, 863.75, -8.55, 0.74)
pt3dadd(-3.4, 864.19, -8.4, 0.74)
pt3dadd(-2.81, 864.7, -8.25, 0.74)
pt3dadd(-1.7, 865, -7.9, 0.74)
pt3dadd(-1.19, 865.29, -8.15, 0.74)
pt3dadd(-0.45, 865.29, -8.3, 0.74)
pt3dadd(0.14, 865.15, -8.4, 0.74)
pt3dadd(0.88, 864.11, -8.45, 0.74)
pt3dadd(1.55, 863.97, -8.25, 0.74)
pt3dadd(2.07, 863.97, -8.1, 0.74)
pt3dadd(2.88, 864.7, -7.4, 0.74)
pt3dadd(2.95, 865.59, -7.35, 0.74)
pt3dadd(2.8, 865.74, -7.25, 0.52)
pt3dadd(2.21, 865.88, -7.25, 0.52)
pt3dadd(1.92, 865.96, -6.85, 0.52)
pt3dadd(1.18, 866.55, -6.75, 0.52)
pt3dadd(1.99, 866.99, -6.7, 0.52)
pt3dadd(2.66, 866.99, -6.65, 0.52)
pt3dadd(3.03, 867.73, -6.65, 0.52)
pt3dadd(2.66, 867.95, -3.6, 0.52)
pt3dadd(2.29, 867.8, -3.5, 0.52)
pt3dadd(1.55, 868.39, -3.45, 0.52)
pt3dadd(0.81, 868.32, -3.4, 0.52)
pt3dadd(0.07, 868.24, -3.15, 0.52)
pt3dadd(-0.89, 868.17, -3.05, 0.52)
pt3dadd(-2.07, 868.32, -2.8, 0.52)
pt3dadd(-2.66, 868.47, -4.4, 0.52)
pt3dadd(-3.4, 868.54, -4.55, 0.52)
pt3dadd(-3.85, 868.98, -4.5, 0.52)
pt3dadd(-4.44, 868.83, -4.2, 0.52)
pt3dadd(-4.96, 869.35, -3.3, 0.52)
pt3dadd(-5.55, 869.5, -3.2, 0.52)
pt3dadd(-6.66, 869.28, -3.15, 0.52)
pt3dadd(-7.62, 868.83, -3.15, 0.52)
pt3dadd(-8.06, 867.88, -2.45, 0.52)
pt3dadd(-8.43, 867.21, -1.55, 0.52)
pt3dadd(-9.32, 866.92, -1.5, 0.52)
pt3dadd(-10.13, 866.77, -1.5, 0.52)
pt3dadd(-10.65, 867.21, -1.45, 0.52)
pt3dadd(-11.24, 867.88, -1.45, 0.52)
pt3dadd(-11.68, 868.17, -1.4, 0.52)
pt3dadd(-12.49, 868.17, -1.4, 0.52)
pt3dadd(-13.23, 867.73, -1.35, 0.52)
pt3dadd(-13.53, 866.84, -1.35, 0.52)
pt3dadd(-13.83, 865.74, -1.35, 0.52)
pt3dadd(-14.27, 865.22, -0.6, 0.52)
pt3dadd(-15.08, 864.48, -0.45, 0.52)
pt3dadd(-15.89, 864.26, -0.45, 0.52)
pt3dadd(-16.63, 863.97, -0.4, 0.52)
pt3dadd(-17.15, 863.89, -0.35, 0.52)
pt3dadd(-18.26, 864.26, -0.35, 0.52)
pt3dadd(-19.15, 864.26, -0.35, 0.52)
pt3dadd(-20.11, 864.63, -0.35, 0.52)
pt3dadd(-20.55, 865.22, -0.3, 0.52)
pt3dadd(-20.92, 865.66, 0.2, 0.52)
pt3dadd(-21.51, 866.62, 0.5, 0.52)
pt3dadd(-22.1, 867.36, 0.55, 0.52)
pt3dadd(-22.32, 868.02, 0.6, 0.52)
pt3dadd(-22.92, 868.83, 0.55, 0.52)
pt3dadd(-23.21, 868.91, 0.4, 0.52)
pt3dadd(-24.02, 869.2, -0.4, 0.52)
pt3dadd(-24.76, 869.06, -0.6, 0.52)
pt3dadd(-25.95, 868.76, -0.7, 0.52)
pt3dadd(-27.05, 868.39, -0.8, 0.52)
pt3dadd(-27.94, 868.02, -0.85, 0.52)
pt3dadd(-28.9, 867.88, -1.15, 0.52)
pt3dadd(-29.79, 867.29, -1.25, 0.52)
pt3dadd(-30.53, 866.92, 0, 0.52)
pt3dadd(-31.05, 866.7, 0.1, 0.52)
pt3dadd(-31.05, 865.74, 0.2, 0.52)
pt3dadd(-30.75, 864.48, 0.25, 0.52)
pt3dadd(-30.97, 863.67, 0.3, 0.52)
pt3dadd(-31.19, 862.71, 0.3, 0.52)
pt3dadd(-32.01, 862.64, 0.5, 0.52)
pt3dadd(-32.6, 862.79, 0.75, 0.52)
pt3dadd(-33.26, 863.38, 1.15, 0.52)
pt3dadd(-33.71, 863.67, 1.7, 0.52)
pt3dadd(-34.3, 864.04, 2.05, 0.52)
pt3dadd(-35.33, 864.56, 2.25, 0.52)
pt3dadd(-36.07, 865.07, 2.3, 0.52)
pt3dadd(-36.81, 865.15, 2.35, 0.52)
pt3dadd(-37.77, 865.74, 2.4, 0.52)
pt3dadd(-37.92, 866.55, 2.4, 0.52)
pt3dadd(-38.22, 867.14, 2.45, 0.52)
pt3dadd(-39.1, 867.95, 2.45, 0.52)
pt3dadd(-39.62, 868.17, 2.45, 0.52)
pt3dadd(-40.43, 868.39, 2.6, 0.52)
pt3dadd(-40.95, 868.39, 2.65, 0.52)
pt3dadd(-41.62, 868.02, 2.7, 0.52)
pt3dadd(-42.5, 867.88, 4.65, 0.52)
pt3dadd(-43.39, 868.17, 4.35, 0.52)
pt3dadd(-43.76, 868.47, 4.05, 0.52)
pt3dadd(-44.57, 868.39, 3.9, 0.52)
pt3dadd(-45.09, 868.54, 4.9, 0.44)
pt3dadd(-45.61, 868.98, 4.95, 0.44)
pt3dadd(-46.27, 869.42, 5, 0.44)
pt3dadd(-46.79, 869.72, 5, 0.44)
pt3dadd(-47.23, 869.42, 5.05, 0.44)
pt3dadd(-47.6, 868.83, 5.05, 0.44)
pt3dadd(-47.9, 868.39, 5.05, 0.44)
pt3dadd(-48.34, 868.24, 5.05, 0.44)
pt3dadd(-48.78, 868.24, 5.05, 0.44)
pt3dadd(-49.23, 868.61, 5.05, 0.44)
pt3dadd(-50.04, 869.13, 5.05, 0.44)
pt3dadd(-50.41, 869.42, 5.05, 0.44)
pt3dadd(-50.71, 869.72, 5.05, 0.44)
pt3dadd(-51.11, 870.26, 5.1, 0.44)
pt3dadd(-52.07, 870.48, 5.9, 0.44)
pt3dadd(-52.74, 870.33, 5.95, 0.44)
pt3dadd(-53.7, 869.89, 5.95, 0.44)
pt3dadd(-54.73, 869.23, 6, 0.44)
pt3dadd(-55.47, 868.34, 6, 0.44)
pt3dadd(-55.84, 867.38, 6, 0.44)
pt3dadd(-56.36, 866.57, 6, 0.44)
pt3dadd(-56.95, 866.06, 6, 0.44)
pt3dadd(-57.99, 865.76, 6, 0.44)
pt3dadd(-59.02, 865.61, 6.05, 0.44)
pt3dadd(-60.06, 865.61, 6.1, 0.44)
pt3dadd(-61.31, 865.61, 6.05, 0.44)
pt3dadd(-61.98, 865.32, 6.05, 0.44)
pt3dadd(-62.72, 865.24, 6.05, 0.44)
pt3dadd(-63.01, 865.02, 6.05, 0.44)
}
apic[46] {pt3dclear()
pt3dadd(7.97, 791.92, -20.3, 0.44)
pt3dadd(7.73, 793.01, -21.75, 0.44)
pt3dadd(7.95, 793.82, -21.5, 0.44)
pt3dadd(7.8, 794.71, -21.35, 0.44)
pt3dadd(7.8, 795.59, -21.25, 0.44)
pt3dadd(7.73, 796.55, -21.15, 0.44)
pt3dadd(7.65, 797.22, -21.2, 0.44)
pt3dadd(7.65, 797.95, -21.35, 0.44)
pt3dadd(7.95, 798.84, -21.5, 0.44)
pt3dadd(8.02, 799.87, -21.65, 0.44)
pt3dadd(7.8, 800.76, -21.85, 0.44)
pt3dadd(7.65, 801.64, -22.15, 0.44)
pt3dadd(7.36, 802.45, -22.3, 0.44)
pt3dadd(7.36, 803.48, -22.4, 0.44)
pt3dadd(7.14, 804.37, -22.45, 0.44)
pt3dadd(6.84, 805.25, -22.9, 0.44)
pt3dadd(6.54, 806.43, -22.95, 0.44)
pt3dadd(6.32, 807.61, -24.45, 0.44)
pt3dadd(5.88, 808.79, -24.35, 0.44)
pt3dadd(5.36, 809.24, -24.3, 0.44)
pt3dadd(4.99, 809.75, -24.25, 0.44)
pt3dadd(4.33, 810.71, -24.25, 0.44)
pt3dadd(3.96, 811.52, -24.2, 0.44)
pt3dadd(3.66, 812.56, -24.3, 0.44)
pt3dadd(3.66, 813.51, -24.55, 0.44)
}
}
proc shape3d_38() {
apic[46] { pt3dadd(3.88, 814.33, -25.1, 0.44)
pt3dadd(4.18, 815.14, -25.55, 0.44)
pt3dadd(4.47, 815.95, -25.95, 0.44)
pt3dadd(4.84, 816.69, -26, 0.44)
pt3dadd(4.99, 817.64, -26.05, 0.44)
pt3dadd(4.77, 818.38, -26.15, 0.44)
pt3dadd(4.7, 818.82, -26.35, 0.44)
pt3dadd(4.55, 819.34, -26.75, 0.44)
pt3dadd(3.96, 820.74, -27.15, 0.44)
pt3dadd(3.74, 821.77, -27.15, 0.44)
pt3dadd(3.44, 822.58, -28.1, 0.44)
pt3dadd(3.37, 823.54, -28.15, 0.44)
pt3dadd(3.59, 824.28, -28.15, 0.44)
pt3dadd(4.18, 825.39, -28.2, 0.44)
pt3dadd(4.4, 826.28, -28.2, 0.44)
pt3dadd(4.77, 827.16, -28.2, 0.44)
pt3dadd(4.7, 828.05, -28.2, 0.44)
pt3dadd(4.55, 828.71, -28.75, 0.44)
pt3dadd(4.18, 829.67, -28.75, 0.44)
pt3dadd(4.26, 830.63, -28.8, 0.44)
pt3dadd(4.26, 831.44, -29.05, 0.44)
pt3dadd(3.89, 832.47, -29.1, 0.44)
pt3dadd(3.81, 833.36, -29.25, 0.44)
pt3dadd(3.89, 834.09, -29.4, 0.44)
pt3dadd(3.96, 834.76, -29.5, 0.44)
pt3dadd(4.4, 835.42, -29.75, 0.44)
pt3dadd(4.77, 836.6, -29.85, 0.44)
pt3dadd(4.92, 837.34, -30.2, 0.44)
pt3dadd(4.92, 838.08, -30.2, 0.44)
pt3dadd(5.07, 838.96, -30.2, 0.44)
pt3dadd(4.48, 839.92, -30.25, 0.44)
pt3dadd(4.33, 840.88, -30.4, 0.44)
pt3dadd(4.48, 841.69, -30.7, 0.44)
pt3dadd(4.63, 842.94, -31, 0.44)
pt3dadd(4.63, 843.68, -31.25, 0.44)
pt3dadd(4.26, 844.49, -31.7, 0.44)
pt3dadd(3.59, 845.08, -32.05, 0.44)
pt3dadd(3.15, 845.6, -32.5, 0.44)
pt3dadd(2.93, 845.82, -32.6, 0.59)
pt3dadd(2.41, 846.48, -32.95, 0.59)
pt3dadd(1.89, 847, -33.4, 0.59)
pt3dadd(1.37, 847.37, -33.85, 0.59)
pt3dadd(0.78, 847.74, -34.1, 0.59)
pt3dadd(0.41, 848.03, -34.15, 0.59)
pt3dadd(0.49, 848.92, -34.2, 0.59)
pt3dadd(0.86, 849.29, -34.2, 0.59)
pt3dadd(1.3, 849.88, -34.25, 0.59)
pt3dadd(1.97, 850.54, -34.8, 0.59)
pt3dadd(2.34, 851.28, -34.8, 0.59)
pt3dadd(2.93, 852.16, -34.8, 0.59)
pt3dadd(3.37, 852.31, -34.85, 0.59)
pt3dadd(4.48, 851.87, -35.45, 0.59)
pt3dadd(5.66, 851.79, -35.45, 0.59)
pt3dadd(5.81, 852.75, -35.6, 0.59)
pt3dadd(6.03, 853.34, -35.65, 0.59)
pt3dadd(6.25, 854.3, -36.05, 0.59)
pt3dadd(6.03, 854.89, -36.25, 0.59)
pt3dadd(5.81, 855.41, -37.5, 0.59)
pt3dadd(5.34, 856.34, -37.4, 0.59)
pt3dadd(5.71, 857.23, -37.35, 0.59)
pt3dadd(5.79, 857.75, -37.45, 0.59)
pt3dadd(6.08, 858.34, -37.55, 0.59)
pt3dadd(5.86, 858.85, -37.7, 0.59)
pt3dadd(5.27, 859.59, -37.85, 0.59)
pt3dadd(5.27, 860.18, -37.9, 0.59)
pt3dadd(5.12, 860.99, -38.05, 0.59)
pt3dadd(5.34, 861.58, -38.65, 0.59)
pt3dadd(5.34, 862.17, -39.4, 0.59)
pt3dadd(5.05, 862.76, -39.45, 0.59)
pt3dadd(4.83, 863.57, -39.5, 0.59)
pt3dadd(4.53, 864.46, -39.6, 0.59)
pt3dadd(4.09, 865.12, -39.65, 0.59)
pt3dadd(3.64, 865.56, -39.7, 0.59)
pt3dadd(3.27, 865.71, -41.35, 0.59)
pt3dadd(2.68, 865.93, -41.35, 0.59)
pt3dadd(2.09, 866.45, -41.35, 0.59)
pt3dadd(1.5, 866.67, -41.35, 0.59)
pt3dadd(0.91, 866.96, -41.35, 0.59)
pt3dadd(0.61, 867.41, -41.35, 0.59)
pt3dadd(0.47, 868, -41.4, 0.59)
pt3dadd(0.98, 868.81, -41.4, 0.59)
pt3dadd(1.57, 869.62, -41.4, 0.59)
pt3dadd(2.31, 870.28, -41.85, 0.59)
pt3dadd(2.83, 871.17, -42, 0.59)
pt3dadd(3.13, 871.91, -42.05, 0.59)
pt3dadd(3.42, 872.64, -42.05, 0.59)
pt3dadd(3.57, 873.45, -42.05, 0.59)
pt3dadd(4.01, 874.86, -42.05, 0.59)
pt3dadd(4.38, 875.37, -42.1, 0.59)
pt3dadd(4.31, 876.11, -42.3, 0.59)
pt3dadd(4.24, 876.85, -42.45, 0.59)
pt3dadd(4.38, 877.73, -42.55, 0.59)
pt3dadd(4.75, 878.4, -42.8, 0.59)
pt3dadd(5.12, 878.91, -43.1, 0.59)
pt3dadd(5.71, 879.35, -43.25, 0.59)
pt3dadd(6.6, 880.09, -43.45, 0.59)
pt3dadd(7.63, 880.68, -43.45, 0.59)
pt3dadd(8.3, 881.2, -44.95, 0.59)
pt3dadd(9.19, 881.86, -44.95, 0.59)
pt3dadd(8.89, 883.04, -45, 0.59)
pt3dadd(8.82, 884.25, -44.9, 0.59)
pt3dadd(9.64, 884.77, -44.95, 0.59)
pt3dadd(10.23, 885.14, -44.95, 0.59)
pt3dadd(10.89, 885.65, -44.95, 0.52)
pt3dadd(11.34, 886.32, -44.95, 0.52)
pt3dadd(12.22, 886.76, -44.95, 0.52)
pt3dadd(12.74, 887.42, -45.05, 0.52)
pt3dadd(13.11, 888.46, -45.2, 0.52)
pt3dadd(13.18, 889.34, -45.2, 0.52)
pt3dadd(13.18, 890.3, -45.2, 0.52)
pt3dadd(12.81, 890.96, -45.25, 0.52)
pt3dadd(12.59, 891.48, -45.25, 0.52)
pt3dadd(12.44, 891.92, -45.25, 0.52)
pt3dadd(12.3, 892.88, -45.25, 0.52)
pt3dadd(12.37, 893.54, -45.25, 0.52)
pt3dadd(12.74, 894.13, -45.25, 0.52)
pt3dadd(13.04, 895.02, -45.3, 0.52)
pt3dadd(13.33, 895.98, -45.3, 0.52)
pt3dadd(12.96, 896.49, -45.35, 0.52)
pt3dadd(12.74, 897.16, -45.45, 0.52)
pt3dadd(12.37, 897.82, -45.65, 0.52)
pt3dadd(12.15, 898.93, -45.85, 0.52)
pt3dadd(11.63, 899.67, -45.9, 0.52)
pt3dadd(11.34, 900.62, -45.95, 0.52)
pt3dadd(10.97, 901.29, -46, 0.52)
pt3dadd(10.67, 901.88, -46.05, 0.52)
pt3dadd(10.45, 902.54, -46.05, 0.52)
pt3dadd(10.45, 903.57, -46.35, 0.52)
pt3dadd(10.37, 904.83, -46.45, 0.52)
pt3dadd(10, 905.57, -46.45, 0.52)
pt3dadd(9.71, 906.23, -46.45, 0.52)
pt3dadd(9.49, 906.97, -46.45, 0.52)
pt3dadd(9.78, 908.07, -46.5, 0.52)
pt3dadd(10.3, 909.03, -46.5, 0.52)
pt3dadd(10.52, 909.47, -46.5, 0.52)
pt3dadd(10.82, 910.36, -46.5, 0.52)
pt3dadd(11.26, 911.1, -46.5, 0.52)
pt3dadd(11.85, 911.61, -46.5, 0.52)
pt3dadd(12.74, 912.06, -46.5, 0.52)
pt3dadd(13.18, 912.5, -46.5, 0.52)
pt3dadd(13.55, 913.53, -46.5, 0.52)
pt3dadd(13.55, 913.9, -47.15, 0.52)
pt3dadd(13.18, 915, -47.2, 0.52)
pt3dadd(14, 915.52, -47.2, 0.52)
pt3dadd(13.7, 916.33, -47.2, 0.52)
pt3dadd(12.96, 916.48, -47.25, 0.52)
pt3dadd(12.44, 916.55, -47.7, 0.52)
pt3dadd(11.41, 917.07, -47.75, 0.52)
pt3dadd(11.93, 917.73, -47.8, 0.52)
pt3dadd(12.16, 918.52, -45.95, 0.52)
pt3dadd(12.68, 919.33, -45.85, 0.52)
pt3dadd(13.05, 919.78, -45.95, 0.52)
pt3dadd(13.34, 920.37, -46.05, 0.52)
pt3dadd(13.86, 921.18, -46.25, 0.52)
pt3dadd(14.38, 921.69, -46.5, 0.52)
pt3dadd(15.12, 922.36, -47.85, 0.52)
pt3dadd(15.56, 923.02, -47.9, 0.52)
pt3dadd(16.52, 923.32, -47.9, 0.52)
pt3dadd(17.19, 923.39, -47.9, 0.52)
pt3dadd(17.78, 923.17, -47.9, 0.52)
pt3dadd(18.59, 922.58, -47.9, 0.52)
pt3dadd(19.11, 922.06, -47.9, 0.52)
pt3dadd(19.7, 922.43, -48.15, 0.52)
pt3dadd(19.92, 922.95, -48.75, 0.52)
pt3dadd(20.22, 923.76, -48.95, 0.52)
pt3dadd(20.66, 924.72, -49, 0.52)
pt3dadd(21.18, 925.46, -49.1, 0.52)
pt3dadd(21.92, 925.6, -49.1, 0.52)
pt3dadd(23.03, 925.46, -49.1, 0.52)
pt3dadd(23.76, 925.38, -49.15, 0.52)
pt3dadd(24.5, 925.38, -49.15, 0.52)
pt3dadd(25.39, 925.75, -49.45, 0.52)
pt3dadd(26.5, 925.82, -49.55, 0.52)
pt3dadd(27.39, 926.12, -49.6, 0.52)
pt3dadd(28.05, 926.71, -49.6, 0.52)
pt3dadd(28.57, 927.52, -49.6, 0.52)
pt3dadd(29.16, 927.89, -49.6, 0.52)
pt3dadd(29.9, 928.11, -49.6, 0.52)
pt3dadd(30.86, 928.11, -49.65, 0.52)
pt3dadd(31.97, 928.41, -50.15, 0.52)
pt3dadd(32.04, 929, -50.25, 0.52)
pt3dadd(31.75, 929.66, -50.55, 0.52)
pt3dadd(31.89, 930.1, -50.7, 0.52)
pt3dadd(32.26, 930.77, -50.95, 0.52)
pt3dadd(32.86, 931.21, -51.1, 0.52)
pt3dadd(33.67, 931.5, -51.1, 0.52)
pt3dadd(34.56, 931.65, -51.15, 0.52)
pt3dadd(35.81, 931.58, -51.15, 0.52)
pt3dadd(36.7, 931.72, -51.5, 0.37)
pt3dadd(37.36, 932.17, -51.4, 0.37)
}
apic[47] {pt3dclear()
pt3dadd(53.58, 436.98, -1.15, 2.81)
pt3dadd(51.86, 436.78, -3.6, 2.81)
pt3dadd(50.75, 437.59, -3.7, 2.81)
pt3dadd(49.79, 438.41, -3.75, 3.18)
pt3dadd(49.12, 438.77, -3.85, 3.18)
pt3dadd(47.94, 439.29, -4, 3.18)
pt3dadd(46.98, 439.66, -4.5, 3.18)
pt3dadd(46.24, 439.95, -5.45, 3.18)
pt3dadd(45.28, 440.77, -5.5, 3.18)
pt3dadd(44.47, 441.06, -5.4, 3.18)
}
}
proc shape3d_39() {
apic[47] { pt3dadd(43.88, 441.43, -5.3, 3.18)
pt3dadd(43.51, 441.72, -5.25, 3.18)
pt3dadd(43.21, 442.31, -5.2, 3.18)
pt3dadd(42.84, 442.76, -5.2, 3.18)
pt3dadd(42.32, 443.49, -5.2, 3.18)
pt3dadd(41.73, 444.01, -5.2, 3.18)
pt3dadd(41.29, 444.6, -5.2, 3.18)
pt3dadd(40.77, 445.78, -6.85, 2.81)
pt3dadd(40.25, 446.37, -6.85, 2.81)
pt3dadd(39.96, 447.04, -6.9, 2.81)
pt3dadd(39.74, 447.77, -7.05, 2.81)
pt3dadd(39.66, 448.66, -7.2, 2.81)
pt3dadd(39.66, 449.32, -7.45, 2.81)
pt3dadd(39.81, 450.5, -8.25, 2.66)
pt3dadd(40.25, 451.46, -8.3, 2.66)
pt3dadd(40.4, 452.57, -8.4, 2.66)
pt3dadd(40.77, 453.53, -8.45, 2.66)
pt3dadd(41.29, 454.63, -8.75, 2.66)
pt3dadd(41.73, 455.74, -9.1, 2.66)
pt3dadd(42.32, 456.84, -10.2, 2.66)
pt3dadd(42.91, 457.58, -10.25, 2.66)
pt3dadd(44.1, 459.28, -11.8, 2.81)
pt3dadd(44.39, 460.38, -11.9, 2.81)
pt3dadd(44.76, 461.42, -11.95, 2.81)
pt3dadd(44.98, 462.52, -12, 2.81)
pt3dadd(45.13, 463.55, -12.5, 2.81)
pt3dadd(45.35, 465.1, -12.55, 2.81)
pt3dadd(45.87, 466.65, -12.55, 2.81)
pt3dadd(46.09, 467.39, -12.2, 2.81)
pt3dadd(46.09, 469.01, -11.95, 2.81)
pt3dadd(46.17, 470.04, -11.55, 2.81)
pt3dadd(46.53, 471.22, -11.35, 2.81)
pt3dadd(46.68, 472.99, -11, 2.96)
pt3dadd(46.53, 474.4, -10.95, 2.96)
pt3dadd(46.46, 475.35, -10.9, 2.96)
pt3dadd(46.17, 476.02, -10.85, 2.96)
pt3dadd(46.24, 477.05, -10.85, 2.96)
pt3dadd(45.79, 478.4, -12, 2.96)
pt3dadd(45.64, 479.51, -12.4, 3.1)
pt3dadd(45.42, 480.69, -13.35, 3.1)
pt3dadd(44.83, 481.8, -13.2, 3.1)
pt3dadd(44.83, 482.83, -12.55, 3.1)
pt3dadd(45.13, 484.23, -11.5, 3.1)
pt3dadd(44.61, 485.41, -13.55, 3.1)
pt3dadd(44.02, 486.44, -13.65, 3.1)
pt3dadd(43.43, 487.62, -13.7, 3.1)
pt3dadd(42.69, 488.51, -13.75, 3.1)
pt3dadd(42.17, 489.39, -13.95, 3.1)
pt3dadd(41.28, 489.98, -14.15, 3.1)
pt3dadd(40.91, 490.64, -14.2, 3.1)
pt3dadd(40.54, 491.46, -14.25, 3.1)
pt3dadd(40.25, 492.86, -14.25, 3.1)
pt3dadd(39.66, 493.74, -14.3, 3.1)
pt3dadd(38.84, 494.7, -14.3, 3.1)
pt3dadd(38.47, 495.73, -14.3, 3.1)
}
apic[48] {pt3dclear()
pt3dadd(38.47, 495.73, -14.3, 3.1)
pt3dadd(39.8, 497.43, -16.55, 3.1)
pt3dadd(40.54, 497.58, -16.6, 3.1)
pt3dadd(40.91, 498.61, -16.65, 3.1)
pt3dadd(41.8, 499.64, -16.8, 3.25)
pt3dadd(41.95, 500.45, -16.8, 3.25)
pt3dadd(42.02, 501.78, -16.8, 3.25)
pt3dadd(42.02, 502.96, -16.85, 3.25)
pt3dadd(42.1, 503.7, -17.8, 3.25)
pt3dadd(42.17, 504.66, -18, 3.25)
pt3dadd(42.24, 505.69, -15.25, 3.25)
pt3dadd(42.32, 506.72, -15.1, 3.25)
pt3dadd(42.54, 507.61, -15.05, 3.25)
pt3dadd(42.91, 508.27, -15, 3.25)
pt3dadd(43.28, 508.79, -14.95, 3.25)
pt3dadd(43.94, 509.75, -14.95, 3.25)
pt3dadd(43.64, 511.1, -14.8, 3.33)
pt3dadd(43.64, 512.21, -14.75, 3.33)
pt3dadd(43.27, 513.09, -14.75, 3.33)
pt3dadd(42.97, 514.2, -14.7, 3.33)
pt3dadd(41.72, 515.31, -14.65, 3.18)
pt3dadd(41.57, 515.82, -14.65, 3.18)
pt3dadd(41.27, 516.63, -14.65, 3.18)
pt3dadd(40.61, 517.52, -14.65, 3.18)
pt3dadd(39.94, 518.77, -14.65, 3.03)
pt3dadd(39.8, 519.73, -14.65, 3.03)
pt3dadd(39.57, 521.21, -14.65, 3.03)
pt3dadd(39.35, 522.24, -14.6, 3.03)
pt3dadd(39.5, 523.27, -14.6, 3.03)
pt3dadd(39.5, 524.23, -14.6, 3.03)
pt3dadd(39.65, 525.34, -14.6, 3.03)
pt3dadd(39.72, 526.22, -14.6, 3.03)
pt3dadd(40.02, 527.33, -14.6, 3.03)
pt3dadd(40.31, 528.29, -14.6, 3.03)
pt3dadd(41.05, 529.61, -14.3, 3.03)
pt3dadd(41.27, 530.87, -14.2, 3.03)
pt3dadd(41.79, 532.42, -14.15, 3.4)
pt3dadd(42.31, 533.82, -14.15, 3.4)
pt3dadd(42.38, 535.14, -13.75, 3.4)
pt3dadd(42.6, 536.4, -13.5, 3.4)
pt3dadd(42.46, 536.4, -15.8, 3.4)
pt3dadd(42.9, 538.17, -16, 3.4)
pt3dadd(42.97, 539.86, -16.1, 3.4)
pt3dadd(43.12, 540.97, -16.1, 3.4)
pt3dadd(42.83, 542, -16.15, 3.4)
pt3dadd(42.97, 543.18, -16.15, 3.4)
pt3dadd(42.81, 545.48, -16.25, 3.4)
pt3dadd(42.89, 546.96, -16.3, 3.4)
pt3dadd(42.67, 548.51, -16.3, 3.4)
pt3dadd(42.15, 549.91, -16.85, 3.4)
pt3dadd(42.37, 551.09, -17.35, 3.4)
pt3dadd(42.07, 552.27, -17.6, 3.4)
pt3dadd(41.63, 553.67, -17.75, 3.4)
pt3dadd(41.19, 554.77, -17.75, 3.4)
pt3dadd(40.52, 556.03, -17.85, 3.4)
pt3dadd(40.15, 556.99, -18.05, 3.4)
pt3dadd(39.49, 558.46, -18.1, 3.4)
pt3dadd(38.9, 560.16, -18.2, 3.4)
pt3dadd(38.9, 560.9, -18.25, 3.4)
pt3dadd(38.23, 562, -18.25, 3.18)
pt3dadd(38.16, 563.03, -18.25, 3.18)
pt3dadd(38.45, 564.58, -18.3, 3.03)
pt3dadd(38.53, 565.62, -18.3, 3.03)
pt3dadd(39.04, 567.68, -19.8, 3.03)
pt3dadd(39.49, 568.64, -19.8, 3.03)
pt3dadd(40.08, 569.52, -19.8, 3.03)
pt3dadd(41.11, 570.85, -19.8, 3.03)
pt3dadd(41.63, 571.96, -19.8, 3.03)
pt3dadd(42.22, 572.92, -19.8, 3.03)
pt3dadd(42.37, 573.73, -19.8, 3.03)
pt3dadd(42.59, 574.61, -19.8, 3.03)
pt3dadd(43.04, 575.72, -19.8, 3.03)
pt3dadd(43.72, 576.8, -20.25, 3.03)
pt3dadd(44.01, 577.61, -20.3, 3.03)
pt3dadd(44.38, 578.87, -20.3, 3.03)
pt3dadd(44.53, 580.12, -20.3, 3.03)
pt3dadd(44.6, 581.3, -20.3, 3.03)
pt3dadd(44.75, 582.63, -20.3, 3.03)
pt3dadd(44.6, 583.74, -20.3, 3.03)
pt3dadd(44.38, 584.99, -20.3, 3.03)
pt3dadd(44.01, 585.95, -20.3, 3.03)
pt3dadd(43.27, 586.98, -20.3, 3.03)
pt3dadd(42.9, 587.94, -20.3, 3.03)
pt3dadd(41.8, 589.34, -20.95, 3.03)
pt3dadd(41.35, 590.45, -21, 3.03)
pt3dadd(40.69, 591.4, -21.05, 3.03)
pt3dadd(40.54, 592.58, -21.1, 3.03)
pt3dadd(40.24, 593.76, -21.1, 3.03)
pt3dadd(39.87, 594.94, -21.1, 3.03)
pt3dadd(39.36, 596.2, -21.1, 3.03)
pt3dadd(39.06, 596.94, -21.1, 3.03)
pt3dadd(38.47, 598.19, -21.1, 3.03)
pt3dadd(38.25, 599.37, -21.15, 3.03)
pt3dadd(37.95, 600.84, -21.15, 3.03)
pt3dadd(37.8, 601.73, -21.15, 3.03)
pt3dadd(37.58, 602.76, -21.15, 3.03)
pt3dadd(37.51, 603.79, -21.4, 3.03)
pt3dadd(37.36, 604.75, -21.6, 3.03)
pt3dadd(37.14, 605.64, -21.7, 3.03)
pt3dadd(36.7, 606.97, -21.7, 3.03)
pt3dadd(36.84, 608.07, -21.75, 3.03)
pt3dadd(36.88, 609.5, -22.4, 3.03)
pt3dadd(36.88, 610.9, -22.1, 3.03)
pt3dadd(36.95, 612.37, -22, 3.03)
pt3dadd(36.73, 613.55, -21.85, 3.03)
pt3dadd(36.66, 614.96, -21.8, 3.03)
pt3dadd(36.58, 616.21, -21.75, 3.03)
pt3dadd(36.29, 617.17, -21.7, 3.03)
pt3dadd(35.92, 618.35, -21.6, 3.03)
pt3dadd(35.62, 619.31, -21.6, 3.03)
pt3dadd(35.4, 620.34, -21.55, 3.03)
pt3dadd(35.25, 621.52, -21.55, 3.03)
pt3dadd(35.92, 623.14, -21.5, 3.03)
pt3dadd(35.55, 624.84, -21.5, 3.03)
pt3dadd(35.77, 626.09, -21.5, 3.03)
pt3dadd(35.55, 627.79, -21.5, 3.03)
pt3dadd(36.07, 628.89, -22.05, 3.03)
pt3dadd(35.99, 630.22, -22.1, 3.03)
pt3dadd(35.77, 631.33, -22.1, 3.03)
pt3dadd(35.7, 632.36, -22.05, 3.03)
pt3dadd(35.4, 633.91, -22, 3.03)
pt3dadd(35.4, 634.79, -22, 3.03)
pt3dadd(35.62, 635.75, -22, 3.03)
pt3dadd(35.55, 636.86, -22, 3.03)
pt3dadd(35.33, 637.74, -21.95, 3.03)
pt3dadd(34.96, 638.78, -21.9, 3.03)
pt3dadd(34.81, 639.51, -21.85, 3.03)
pt3dadd(34.66, 640.47, -21.85, 3.03)
pt3dadd(34.27, 642.11, -21.65, 3.03)
pt3dadd(34.49, 643.29, -21.45, 3.03)
pt3dadd(34.56, 644.92, -21.25, 2.88)
pt3dadd(34.27, 645.88, -21.15, 2.88)
pt3dadd(34.19, 646.83, -20.85, 2.88)
pt3dadd(33.67, 648.24, -20.6, 2.88)
pt3dadd(32.86, 649.12, -22.5, 2.88)
pt3dadd(32.57, 649.78, -22.65, 2.88)
pt3dadd(32.57, 650.67, -22.75, 2.88)
pt3dadd(32.2, 651.48, -22.85, 2.88)
pt3dadd(32.05, 652.36, -22.95, 2.88)
pt3dadd(31.83, 653.25, -23.1, 2.88)
pt3dadd(31.75, 653.84, -23.35, 2.88)
pt3dadd(31.38, 655.02, -23.65, 2.88)
pt3dadd(31.16, 656.35, -24.05, 2.88)
pt3dadd(30.64, 658.12, -24.35, 2.88)
pt3dadd(30.87, 659.15, -24.4, 2.88)
}
}
proc shape3d_40() {
apic[48] { pt3dadd(31.16, 660.18, -24.6, 2.88)
pt3dadd(31.01, 661.07, -24.75, 2.88)
pt3dadd(31.31, 662.17, -24.8, 2.88)
pt3dadd(31.31, 663.35, -24.85, 2.88)
pt3dadd(31.38, 664.9, -25.05, 2.88)
pt3dadd(31.31, 666.01, -25.1, 2.88)
pt3dadd(31.53, 667.41, -25.15, 2.88)
pt3dadd(31.53, 668.29, -25.15, 2.88)
pt3dadd(31.68, 669.55, -25.25, 2.88)
pt3dadd(31.46, 670.65, -25.3, 2.88)
pt3dadd(31.46, 671.54, -25.3, 2.88)
pt3dadd(31.6, 672.5, -25.3, 2.88)
pt3dadd(31.34, 674, -26.05, 2.73)
pt3dadd(31.71, 674.88, -26.05, 2.59)
pt3dadd(31.56, 676.06, -26.05, 2.59)
pt3dadd(32, 677.17, -26.05, 2.59)
pt3dadd(31.93, 678.2, -26.1, 2.59)
pt3dadd(32.08, 679.01, -26.2, 2.59)
pt3dadd(32.15, 680.19, -26.2, 2.59)
pt3dadd(32.08, 681.23, -26.25, 2.59)
pt3dadd(32, 682.48, -26.25, 2.59)
pt3dadd(31.71, 683.66, -26.25, 2.59)
pt3dadd(31.34, 685.06, -26.25, 2.59)
pt3dadd(30.9, 686.17, -26.25, 2.59)
pt3dadd(31.49, 687.2, -26.75, 2.59)
pt3dadd(31.78, 689.04, -27, 2.59)
pt3dadd(31.93, 690.3, -27.3, 2.59)
pt3dadd(31.49, 691.55, -27.65, 2.59)
pt3dadd(31.34, 692.58, -27.65, 2.59)
pt3dadd(31.27, 693.39, -27.95, 2.59)
pt3dadd(31.12, 694.87, -28.55, 2.59)
pt3dadd(30.75, 696.2, -28.6, 2.59)
pt3dadd(30.45, 697.08, -28.6, 2.59)
pt3dadd(30.67, 698.19, -28.65, 2.59)
pt3dadd(30.3, 699.07, -28.75, 2.59)
pt3dadd(29.94, 700.18, -28.9, 2.59)
pt3dadd(29.94, 701.43, -29.15, 2.59)
pt3dadd(29.79, 702.61, -29.2, 2.59)
pt3dadd(29.71, 703.64, -29.2, 2.59)
pt3dadd(29.42, 704.6, -29.2, 2.59)
pt3dadd(29.49, 705.12, -29.2, 2.59)
pt3dadd(28.47, 706.62, -30.05, 2.44)
pt3dadd(28.33, 707.65, -30.05, 2.44)
pt3dadd(28.1, 708.68, -30.05, 2.44)
pt3dadd(28.18, 710.23, -30.05, 2.44)
pt3dadd(28.18, 711.63, -30.05, 2.44)
pt3dadd(28.47, 713.04, -30.1, 2.44)
pt3dadd(28.62, 714.81, -30.1, 2.44)
pt3dadd(28.7, 716.21, -30.1, 2.44)
pt3dadd(29.29, 717.9, -30.1, 2.44)
pt3dadd(29.29, 719.38, -30.15, 2.44)
pt3dadd(28.99, 720.63, -30.15, 2.44)
pt3dadd(29.29, 722.03, -30.15, 2.44)
pt3dadd(29.36, 723.36, -30.2, 2.44)
pt3dadd(29.44, 724.39, -30.55, 2.44)
pt3dadd(29.21, 725.57, -31.1, 2.44)
pt3dadd(29.36, 726.83, -31.45, 2.44)
pt3dadd(29.66, 727.86, -31.6, 2.44)
pt3dadd(29.44, 729.33, -31.65, 2.44)
pt3dadd(29.51, 731.03, -31.65, 2.44)
pt3dadd(29.58, 731.99, -31.65, 2.44)
pt3dadd(29.73, 733.39, -31.7, 2.44)
pt3dadd(29.73, 734.42, -31.7, 2.44)
pt3dadd(29.88, 735.75, -31.7, 2.44)
pt3dadd(30.17, 736.41, -31.7, 2.44)
pt3dadd(30.47, 737.45, -31.7, 2.44)
pt3dadd(30.75, 738.19, -31.7, 2.44)
pt3dadd(30.97, 739.22, -31.7, 2.44)
pt3dadd(30.9, 740.47, -31.7, 2.44)
}
apic[49] {pt3dclear()
pt3dadd(30.9, 740.47, -31.7, 1.33)
pt3dadd(31.93, 741.14, -32.8, 1.33)
pt3dadd(32.89, 741.87, -32.8, 1.33)
pt3dadd(33.26, 742.32, -32.8, 1.33)
pt3dadd(34.07, 743.13, -32.8, 1.33)
pt3dadd(34.81, 743.94, -32.8, 1.33)
pt3dadd(35.55, 744.75, -32.8, 1.33)
pt3dadd(36.37, 745.41, -32.8, 1.33)
pt3dadd(37.03, 746.08, -32.85, 1.33)
pt3dadd(37.7, 746.82, -32.9, 1.03)
pt3dadd(38.14, 747.26, -32.9, 1.03)
pt3dadd(38.88, 748.29, -33.45, 1.03)
pt3dadd(39.32, 749.1, -33.35, 1.03)
pt3dadd(39.47, 749.76, -33.5, 1.03)
pt3dadd(39.99, 750.35, -33.45, 1.03)
pt3dadd(40.5, 751.24, -34.3, 1.03)
pt3dadd(40.73, 751.9, -34.3, 1.03)
pt3dadd(41.24, 753.08, -34.3, 1.03)
pt3dadd(42.06, 753.97, -34.1, 1.03)
pt3dadd(43.02, 754.71, -34.25, 1.03)
pt3dadd(43.68, 755.37, -34.25, 1.03)
pt3dadd(44.27, 755.81, -34.25, 1.03)
pt3dadd(44.64, 756.25, -34.2, 1.03)
pt3dadd(45.23, 756.7, -34.05, 1.03)
pt3dadd(45.46, 757.29, -34.6, 1.03)
pt3dadd(45.53, 758.02, -34.9, 1.03)
pt3dadd(45.75, 758.76, -35.2, 1.03)
pt3dadd(45.97, 759.35, -35.45, 1.03)
pt3dadd(46.34, 760.09, -35.55, 1.03)
pt3dadd(46.79, 761.12, -35.55, 1.03)
pt3dadd(47.01, 761.93, -35.6, 1.03)
pt3dadd(47.53, 762.6, -36, 1.03)
pt3dadd(47.75, 763.41, -36.25, 1.03)
pt3dadd(47.89, 764.29, -36.35, 1.03)
pt3dadd(48.04, 765.18, -36.4, 1.03)
pt3dadd(48.04, 765.92, -36.75, 1.03)
pt3dadd(47.82, 766.73, -36.9, 1.03)
pt3dadd(47.75, 767.76, -37, 1.03)
pt3dadd(47.75, 768.72, -37.05, 1.03)
pt3dadd(47.82, 769.68, -37.1, 1.03)
pt3dadd(47.89, 770.19, -37.15, 1.03)
pt3dadd(48.17, 771.37, -37.7, 1.03)
pt3dadd(48.1, 772.4, -37.75, 1.03)
pt3dadd(48.69, 773.58, -37.75, 1.03)
pt3dadd(49.13, 774.62, -37.8, 1.03)
pt3dadd(49.28, 775.58, -38.05, 1.03)
pt3dadd(49.21, 776.53, -38.85, 1.03)
pt3dadd(49.65, 777.35, -38.9, 1.03)
pt3dadd(49.95, 778.38, -39.7, 1.03)
pt3dadd(50.24, 779.19, -39.7, 1.03)
pt3dadd(51.28, 779.93, -39.8, 1.03)
pt3dadd(52.61, 780.15, -39.95, 1.03)
pt3dadd(53.64, 780.89, -39.95, 1.03)
pt3dadd(54.6, 781.47, -39.95, 1.03)
pt3dadd(55.79, 781.92, -40.4, 1.03)
pt3dadd(56.6, 782.88, -40.45, 1.03)
pt3dadd(57.19, 783.61, -40.45, 1.03)
pt3dadd(57.78, 784.57, -40.65, 1.03)
pt3dadd(58.52, 785.31, -41, 1.03)
pt3dadd(59.11, 786.05, -41.55, 1.03)
pt3dadd(59.63, 786.93, -41.9, 1.03)
pt3dadd(60.15, 787.89, -42.15, 1.03)
pt3dadd(60.81, 789.14, -42.3, 1.03)
pt3dadd(61.33, 790.03, -42.3, 1.03)
pt3dadd(61.92, 791.06, -42.4, 1.03)
pt3dadd(62.36, 792.17, -42.45, 1.03)
pt3dadd(62.66, 792.91, -42.45, 1.03)
pt3dadd(63.18, 793.64, -42.45, 1.03)
pt3dadd(63.62, 794.53, -42.45, 1.03)
pt3dadd(63.92, 795.78, -42.45, 1.03)
pt3dadd(64.51, 796.67, -42.45, 1.03)
pt3dadd(65.25, 797.7, -43.65, 1.03)
pt3dadd(66.21, 798.36, -43.65, 1.03)
pt3dadd(66.8, 799.32, -43.65, 1.03)
pt3dadd(67.32, 800.35, -43.65, 1.03)
pt3dadd(68.06, 801.31, -43.7, 1.03)
pt3dadd(68.72, 802.57, -43.7, 1.03)
pt3dadd(69.25, 803.66, -43.7, 1.03)
pt3dadd(69.47, 804.32, -43.7, 1.03)
pt3dadd(70.21, 805.65, -43.7, 1.03)
}
apic[50] {pt3dclear()
pt3dadd(70.21, 805.65, -43.7, 0.67)
pt3dadd(71.17, 806.02, -44.85, 0.67)
pt3dadd(71.91, 806.02, -44.7, 0.67)
pt3dadd(72.58, 806.16, -44.65, 0.67)
pt3dadd(73.32, 806.46, -44.65, 0.67)
pt3dadd(73.91, 806.83, -44.35, 0.67)
pt3dadd(74.43, 807.49, -44.05, 0.67)
pt3dadd(75.09, 808.01, -44.3, 0.67)
pt3dadd(75.68, 808.74, -44.45, 0.67)
pt3dadd(76.42, 808.97, -44.55, 0.67)
pt3dadd(77.16, 809.19, -44.75, 0.67)
pt3dadd(78.2, 809.41, -44.9, 0.67)
pt3dadd(79.16, 809.78, -44.95, 0.67)
pt3dadd(79.6, 810.22, -45, 0.67)
pt3dadd(80.12, 810.66, -45.05, 0.67)
pt3dadd(81.15, 811.33, -45.05, 0.67)
pt3dadd(81.67, 812.14, -45.15, 0.67)
pt3dadd(82.11, 813.02, -45.3, 0.67)
pt3dadd(83, 814.27, -45.45, 0.67)
pt3dadd(84.03, 815.23, -45.5, 0.67)
pt3dadd(85.07, 816.12, -45.55, 0.67)
pt3dadd(85.81, 817.45, -45.6, 0.67)
pt3dadd(86.62, 818.11, -45.6, 0.67)
pt3dadd(87.51, 818.18, -45.6, 0.67)
pt3dadd(88.03, 818.55, -45.65, 0.67)
pt3dadd(88.84, 819.44, -45.8, 0.67)
pt3dadd(89.58, 820.4, -45.85, 0.67)
pt3dadd(90.39, 820.91, -46.15, 0.67)
pt3dadd(91.35, 821.5, -46.2, 0.67)
pt3dadd(92.02, 822.09, -46.35, 0.67)
pt3dadd(92.68, 822.98, -46.6, 0.67)
pt3dadd(93.79, 823.64, -46.8, 0.67)
pt3dadd(94.6, 824.38, -47, 0.67)
pt3dadd(95.49, 825.41, -47.1, 0.67)
pt3dadd(96.6, 825.71, -47.15, 0.67)
pt3dadd(97.49, 826.07, -47.15, 0.67)
pt3dadd(98.89, 826.22, -47.25, 0.67)
pt3dadd(99.92, 826.74, -47.5, 0.67)
pt3dadd(100.81, 827.03, -47.55, 0.67)
pt3dadd(101.62, 827.25, -46.7, 0.67)
pt3dadd(102.95, 827.7, -46.6, 0.67)
pt3dadd(103.47, 828.29, -46.45, 0.81)
pt3dadd(104.36, 829.02, -46.5, 0.81)
pt3dadd(104.88, 829.69, -46.4, 0.81)
pt3dadd(105.84, 830.43, -46.4, 0.81)
pt3dadd(106.87, 830.57, -46.4, 0.81)
pt3dadd(107.54, 831.38, -46.35, 0.81)
pt3dadd(108.2, 831.83, -46.4, 0.81)
pt3dadd(108.94, 832.79, -46.35, 0.81)
pt3dadd(109.09, 833.74, -46.35, 0.81)
pt3dadd(109.53, 834.63, -46.3, 0.81)
}
}
proc shape3d_41() {
apic[50] { pt3dadd(110.05, 835.29, -46.25, 0.81)
pt3dadd(110.97, 836.25, -45.85, 0.81)
pt3dadd(111.63, 836.55, -45.7, 0.81)
pt3dadd(112.81, 836.77, -45.15, 0.81)
pt3dadd(113.48, 837.28, -45.1, 0.81)
pt3dadd(114, 837.73, -45.45, 0.81)
pt3dadd(114.59, 838.09, -45.8, 0.81)
pt3dadd(115.4, 838.61, -46.45, 0.81)
pt3dadd(116.29, 839.5, -46.65, 0.81)
pt3dadd(116.95, 840.31, -46.7, 0.81)
pt3dadd(117.76, 841.04, -46.75, 0.81)
pt3dadd(118.58, 841.93, -46.8, 0.81)
pt3dadd(119.39, 843.11, -46.85, 0.81)
pt3dadd(119.54, 844.07, -46.85, 0.81)
pt3dadd(119.54, 844.73, -47, 0.81)
pt3dadd(119.91, 845.47, -47.15, 0.81)
pt3dadd(120.43, 846.28, -47.25, 0.81)
pt3dadd(120.72, 847.02, -47.5, 0.81)
pt3dadd(121.39, 848.35, -47.55, 0.81)
pt3dadd(121.98, 848.93, -47.6, 0.81)
pt3dadd(123.01, 849.52, -47.6, 0.81)
pt3dadd(123.9, 850.19, -47.65, 0.81)
pt3dadd(124.34, 851.07, -47.65, 0.81)
pt3dadd(124.93, 851.88, -47.7, 0.81)
pt3dadd(125.89, 852.47, -47.7, 0.81)
pt3dadd(126.71, 853.21, -47.7, 0.81)
pt3dadd(127.67, 853.8, -47.7, 0.81)
pt3dadd(128.7, 854.32, -47.7, 0.81)
pt3dadd(129.29, 854.61, -47.7, 0.81)
pt3dadd(130.48, 855.28, -47.7, 0.81)
pt3dadd(131.14, 855.87, -47.75, 0.81)
pt3dadd(132.69, 856.6, -47.75, 0.81)
pt3dadd(133.14, 857.42, -47.75, 0.81)
pt3dadd(133.51, 858.74, -47.75, 0.81)
pt3dadd(134.02, 858.96, -47.8, 0.81)
pt3dadd(134.84, 859.41, -47.8, 0.67)
pt3dadd(135.65, 859.85, -48.8, 0.67)
pt3dadd(136.39, 860.81, -48.85, 0.67)
pt3dadd(136.76, 861.55, -48.75, 0.67)
pt3dadd(137.35, 862.28, -48.65, 0.67)
pt3dadd(137.79, 863.02, -48.55, 0.67)
pt3dadd(138.53, 863.98, -48.5, 0.67)
pt3dadd(139.2, 864.72, -48.45, 0.67)
pt3dadd(140.01, 865.45, -48.4, 0.67)
pt3dadd(140.53, 865.75, -48.4, 0.67)
pt3dadd(141.64, 866.41, -48.4, 0.67)
pt3dadd(142.08, 867.37, -48.35, 0.67)
pt3dadd(142.47, 868.19, -47.8, 0.59)
pt3dadd(143.8, 868.56, -46.75, 0.59)
pt3dadd(145.13, 869.15, -46.7, 0.59)
pt3dadd(145.8, 870.1, -46.65, 0.59)
pt3dadd(146.76, 870.4, -46.65, 0.59)
pt3dadd(147.5, 870.55, -46.6, 0.81)
pt3dadd(147.79, 870.84, -46.6, 0.81)
pt3dadd(148.31, 871.65, -46.15, 0.81)
pt3dadd(148.53, 872.32, -46.25, 0.81)
pt3dadd(149.05, 873.42, -47.6, 0.81)
pt3dadd(149.27, 874.16, -47.7, 0.81)
pt3dadd(149.34, 874.9, -47.75, 0.81)
pt3dadd(149.2, 875.86, -47.8, 0.81)
pt3dadd(149.05, 876.74, -47.85, 0.81)
pt3dadd(148.9, 877.55, -47.85, 0.81)
pt3dadd(149.27, 878.73, -47.85, 0.81)
pt3dadd(150.08, 879.25, -47.85, 0.81)
pt3dadd(150.97, 879.4, -47.85, 0.81)
pt3dadd(151.56, 879.77, -47.85, 0.81)
pt3dadd(152.08, 880.21, -47.95, 0.81)
pt3dadd(152.74, 881.02, -48, 0.81)
pt3dadd(153.04, 881.76, -48, 0.81)
pt3dadd(153.26, 882.42, -48.05, 0.81)
pt3dadd(153.7, 883.16, -48.05, 0.81)
pt3dadd(154.15, 883.38, -48.05, 0.81)
pt3dadd(154.89, 883.89, -48.05, 0.81)
pt3dadd(156.14, 884.04, -48.1, 0.81)
pt3dadd(156.66, 884.93, -48.15, 0.81)
pt3dadd(157.4, 885.52, -48.15, 0.81)
pt3dadd(157.99, 886.25, -48.15, 0.81)
pt3dadd(159.03, 886.92, -48.2, 0.81)
pt3dadd(159.91, 887.36, -48.25, 0.81)
pt3dadd(160.65, 887.73, -48.3, 0.81)
pt3dadd(161.32, 888.17, -48.35, 0.81)
pt3dadd(161.91, 889.13, -48.35, 0.81)
pt3dadd(162.43, 889.87, -48.35, 0.81)
pt3dadd(163.02, 890.83, -48.4, 0.81)
pt3dadd(163.39, 891.05, -48.55, 0.81)
pt3dadd(163.9, 891.49, -48.7, 0.81)
pt3dadd(164.27, 891.86, -48.9, 0.81)
pt3dadd(165.46, 892.3, -49.4, 0.81)
}
apic[51] {pt3dclear()
pt3dadd(165.46, 892.3, -49.4, 0.59)
pt3dadd(165.23, 893.11, -48.55, 0.59)
pt3dadd(165.16, 894.59, -48.5, 0.59)
pt3dadd(165.31, 895.55, -48.45, 0.59)
pt3dadd(165.23, 896.28, -48.45, 0.59)
pt3dadd(165.6, 897.39, -48.45, 0.59)
pt3dadd(166.79, 897.91, -48.45, 0.59)
pt3dadd(167.6, 898.2, -48.45, 0.59)
pt3dadd(168.41, 898.87, -48.4, 0.59)
pt3dadd(168.41, 899.9, -48.4, 0.59)
pt3dadd(168.03, 900.64, -48.3, 0.59)
pt3dadd(167.8, 901.46, -48.2, 0.59)
pt3dadd(167.73, 902.12, -48.15, 0.59)
pt3dadd(167.73, 902.86, -48.15, 0.59)
pt3dadd(168.1, 903.74, -48.1, 0.59)
pt3dadd(168.4, 904.55, -47.75, 0.59)
pt3dadd(168.62, 905.14, -47.3, 0.59)
pt3dadd(168.25, 905.88, -48.85, 0.59)
pt3dadd(168.17, 906.54, -49.05, 0.59)
pt3dadd(168.47, 907.36, -49.2, 0.59)
pt3dadd(168.4, 908.24, -49.25, 0.59)
pt3dadd(168.17, 909.13, -49.5, 0.59)
pt3dadd(168.25, 910.01, -49.8, 0.59)
pt3dadd(168.69, 910.75, -49.85, 0.59)
pt3dadd(169.21, 911.56, -49.95, 0.59)
pt3dadd(169.73, 912.08, -49.95, 0.59)
pt3dadd(170.24, 913.33, -50, 0.59)
pt3dadd(170.61, 913.77, -50.05, 0.59)
pt3dadd(171.28, 914.43, -51.4, 0.59)
pt3dadd(172.24, 914.51, -51.35, 0.59)
pt3dadd(173.13, 915.25, -51.25, 0.59)
pt3dadd(173.57, 915.61, -51.15, 0.59)
pt3dadd(174.46, 916.06, -51, 0.59)
pt3dadd(175.2, 916.65, -50.85, 0.59)
pt3dadd(175.79, 917.38, -50.8, 0.59)
pt3dadd(176.16, 917.75, -51.4, 0.59)
pt3dadd(177.41, 917.9, -51.55, 0.44)
pt3dadd(178.3, 918.27, -51.6, 0.44)
pt3dadd(178.6, 918.56, -49.35, 0.44)
pt3dadd(179.04, 918.79, -49.45, 0.44)
pt3dadd(180.07, 919.01, -49.55, 0.44)
pt3dadd(181.33, 919.97, -49.6, 0.44)
pt3dadd(180.96, 920.26, -49.65, 0.44)
pt3dadd(179.85, 920.56, -49.7, 0.44)
pt3dadd(179.41, 921, -49.7, 0.44)
pt3dadd(179.7, 921.37, -50.5, 0.44)
pt3dadd(180.22, 921.96, -47.75, 0.44)
pt3dadd(180.52, 922.47, -47.3, 0.44)
pt3dadd(180.74, 923.36, -46.9, 0.44)
pt3dadd(180.59, 924.1, -46.75, 0.44)
pt3dadd(180.59, 924.83, -47.15, 0.44)
pt3dadd(180.59, 925.42, -47.7, 0.44)
pt3dadd(180.22, 925.79, -48.05, 0.44)
pt3dadd(180.22, 926.53, -48.15, 0.44)
pt3dadd(180.44, 927.12, -48.2, 0.44)
pt3dadd(181.33, 927.93, -47, 0.44)
pt3dadd(181.33, 928.59, -46.85, 0.44)
pt3dadd(181.85, 929.11, -46.8, 0.44)
pt3dadd(182.81, 929.26, -45.4, 0.44)
pt3dadd(183.33, 929.11, -45.4, 0.44)
pt3dadd(184.14, 929.55, -45.35, 0.44)
pt3dadd(185.39, 929.33, -44.05, 0.44)
pt3dadd(186.13, 929.26, -43.95, 0.59)
pt3dadd(186.65, 928.89, -43.95, 0.59)
pt3dadd(187.76, 928.67, -43.95, 0.59)
pt3dadd(188.5, 928.52, -43.95, 0.59)
pt3dadd(189.61, 928.52, -43.95, 0.59)
pt3dadd(190.35, 928.52, -43.95, 0.59)
pt3dadd(191.6, 928.37, -42.45, 0.59)
pt3dadd(192.79, 927.93, -42.65, 0.59)
}
apic[52] {pt3dclear()
pt3dadd(192.79, 927.93, -42.65, 0.59)
pt3dadd(193.3, 927.41, -44.15, 0.59)
pt3dadd(193.67, 926.6, -44.2, 0.59)
pt3dadd(194.04, 926.01, -44.2, 0.59)
pt3dadd(194.56, 925.42, -44.2, 0.59)
pt3dadd(194.71, 924.61, -44.2, 0.59)
pt3dadd(195.15, 923.51, -44.2, 0.59)
pt3dadd(196.11, 922.84, -44.2, 0.59)
pt3dadd(196.85, 921.66, -44.25, 0.59)
pt3dadd(196.85, 920.85, -43.3, 0.59)
pt3dadd(196.85, 919.67, -43.2, 0.59)
pt3dadd(197.29, 918.56, -43.15, 0.59)
pt3dadd(198.18, 917.09, -43.1, 0.59)
pt3dadd(199.22, 916.43, -43.1, 0.37)
pt3dadd(200.1, 915.39, -43.1, 0.37)
pt3dadd(200.77, 913.99, -43.1, 0.37)
pt3dadd(200.84, 912.81, -43.1, 0.37)
pt3dadd(201.36, 911.56, -43.1, 0.37)
pt3dadd(202.62, 910.6, -43.1, 0.37)
}
apic[53] {pt3dclear()
pt3dadd(192.79, 927.93, -42.65, 0.44)
pt3dadd(193.97, 927.78, -42.9, 0.44)
pt3dadd(194.78, 927.78, -42.8, 0.44)
pt3dadd(195.37, 927.49, -42.75, 0.44)
pt3dadd(195.74, 927.78, -42.7, 0.44)
pt3dadd(196.26, 927.64, -42.7, 0.44)
pt3dadd(196.78, 927.19, -42.7, 0.44)
pt3dadd(197.07, 926.82, -42.7, 0.44)
pt3dadd(197.29, 925.94, -42.65, 0.44)
pt3dadd(197.37, 925.35, -42.65, 0.44)
pt3dadd(197.59, 924.69, -42.65, 0.44)
pt3dadd(197.81, 923.8, -42.65, 0.44)
pt3dadd(198.11, 922.92, -42.65, 0.44)
pt3dadd(198.48, 922.1, -42.65, 0.44)
pt3dadd(199.07, 921.51, -42.65, 0.44)
pt3dadd(199.51, 921.07, -42.65, 0.44)
pt3dadd(200.18, 920.63, -42.65, 0.44)
pt3dadd(200.99, 920.7, -41.95, 0.44)
pt3dadd(201.73, 920.85, -41.9, 0.44)
pt3dadd(202.39, 921, -41.9, 0.44)
pt3dadd(203.5, 920.92, -41.9, 0.44)
pt3dadd(204.32, 920.41, -41.9, 0.44)
pt3dadd(205.05, 920.04, -41.85, 0.44)
}
}
proc shape3d_42() {
apic[53] { pt3dadd(205.65, 920.33, -41.85, 0.44)
pt3dadd(206.24, 920.41, -41.25, 0.44)
pt3dadd(206.9, 920.7, -42.35, 0.44)
pt3dadd(207.94, 920.33, -42.45, 0.44)
pt3dadd(208.53, 920.04, -42.5, 0.44)
pt3dadd(209.42, 919.45, -41.95, 0.44)
pt3dadd(210.15, 919.01, -41.7, 0.44)
pt3dadd(210.67, 918.49, -41.65, 0.44)
pt3dadd(211.19, 917.61, -41.55, 0.44)
pt3dadd(211.12, 916.72, -41.55, 0.44)
}
apic[54] {pt3dclear()
pt3dadd(165.46, 892.3, -49.4, 0.44)
pt3dadd(165.81, 892.83, -49.05, 0.44)
pt3dadd(166.18, 893.79, -49.1, 0.44)
pt3dadd(166.55, 894.52, -48.4, 0.44)
pt3dadd(166.7, 895.26, -48.35, 0.44)
pt3dadd(166.33, 896, -48.55, 0.44)
pt3dadd(165.96, 896.66, -49.5, 0.44)
pt3dadd(165.88, 897.03, -52.6, 0.44)
pt3dadd(165.44, 897.55, -52.6, 0.44)
pt3dadd(164.85, 897.84, -52.95, 0.44)
pt3dadd(164.4, 898.21, -53.25, 0.44)
pt3dadd(163.96, 898.58, -53.75, 0.44)
pt3dadd(163.67, 899.1, -54.65, 0.44)
pt3dadd(162.85, 899.24, -54.8, 0.44)
pt3dadd(162.41, 898.65, -54.85, 0.44)
pt3dadd(162.41, 897.25, -55.25, 0.44)
pt3dadd(162.19, 896.44, -55.3, 0.44)
pt3dadd(161.74, 896.07, -55.5, 0.44)
pt3dadd(161.08, 895.78, -53.2, 0.44)
pt3dadd(160.49, 895.33, -53.2, 0.44)
pt3dadd(159.82, 895.11, -54.75, 0.44)
pt3dadd(159.45, 894.15, -54.75, 0.44)
pt3dadd(159.23, 893.05, -54.8, 0.44)
pt3dadd(159.01, 891.5, -54.85, 0.44)
}
apic[55] {pt3dclear()
pt3dadd(70.21, 805.65, -43.7, 0.67)
pt3dadd(70.2, 806.88, -45.6, 0.67)
pt3dadd(69.98, 807.61, -45.4, 0.67)
pt3dadd(70.35, 808.43, -45.25, 0.67)
pt3dadd(70.87, 809.31, -45.15, 0.67)
pt3dadd(71.53, 809.9, -44.95, 0.67)
pt3dadd(71.75, 811.01, -44.5, 0.67)
pt3dadd(72.2, 811.52, -44.9, 0.67)
pt3dadd(72.57, 812.33, -45.9, 0.67)
pt3dadd(72.93, 813, -46, 0.67)
pt3dadd(73.3, 813.96, -46.05, 0.67)
pt3dadd(73.6, 814.62, -46.1, 0.67)
pt3dadd(74.04, 815.28, -46.2, 0.67)
pt3dadd(74.49, 815.95, -46.35, 0.67)
pt3dadd(74.71, 816.61, -46.6, 0.67)
pt3dadd(75.23, 817.28, -46.65, 0.67)
pt3dadd(75.6, 817.79, -46.7, 0.67)
pt3dadd(75.89, 818.38, -46.75, 0.67)
pt3dadd(76.19, 819.12, -47, 0.67)
pt3dadd(76.56, 819.86, -47.05, 0.67)
pt3dadd(76.93, 820.52, -47.05, 0.67)
pt3dadd(77.52, 821.4, -47.1, 0.67)
pt3dadd(77.81, 822.44, -47.25, 0.67)
pt3dadd(77.96, 823.62, -47.85, 0.67)
pt3dadd(78.11, 824.21, -47.95, 0.67)
pt3dadd(78.4, 824.87, -47.85, 0.67)
pt3dadd(78.63, 825.46, -47.7, 0.67)
pt3dadd(78.92, 826.2, -47.5, 0.67)
pt3dadd(79.22, 826.94, -47.4, 0.67)
pt3dadd(79.44, 827.67, -47.35, 0.67)
pt3dadd(79.73, 828.34, -47.3, 0.67)
pt3dadd(79.81, 829.3, -47.2, 0.67)
pt3dadd(80.33, 830.48, -47.1, 0.67)
pt3dadd(80.92, 831.36, -47.05, 0.67)
pt3dadd(81.21, 832.17, -46.95, 0.67)
pt3dadd(81.58, 832.98, -46.9, 0.67)
pt3dadd(81.95, 833.57, -46.8, 0.67)
pt3dadd(81.95, 834.38, -46.6, 0.67)
pt3dadd(82.25, 835.12, -46.4, 0.67)
pt3dadd(82.54, 835.93, -46.15, 0.67)
pt3dadd(82.76, 836.67, -47.8, 0.67)
pt3dadd(83.06, 837.48, -48, 0.67)
pt3dadd(83.43, 838.44, -48.1, 0.67)
pt3dadd(83.35, 839.06, -48.2, 0.67)
pt3dadd(83.43, 840.17, -48.25, 0.67)
pt3dadd(83.72, 840.98, -48.3, 0.67)
pt3dadd(83.8, 841.94, -48.35, 0.67)
pt3dadd(83.72, 842.67, -48.4, 0.67)
pt3dadd(83.87, 843.49, -48.5, 0.67)
pt3dadd(83.94, 844.37, -48.55, 0.67)
pt3dadd(84.02, 845.26, -48.6, 0.67)
pt3dadd(83.94, 846.07, -49, 0.67)
pt3dadd(83.8, 846.8, -49.25, 0.67)
pt3dadd(84.09, 847.69, -49.3, 0.67)
pt3dadd(83.87, 848.65, -49.4, 0.67)
pt3dadd(83.87, 849.24, -49.45, 0.67)
pt3dadd(84.02, 850.05, -49.5, 0.67)
pt3dadd(83.94, 851.08, -49.55, 0.67)
pt3dadd(84.02, 851.97, -49.65, 0.67)
pt3dadd(83.8, 852.92, -49.95, 0.67)
pt3dadd(84.02, 853.88, -50, 0.81)
pt3dadd(84.09, 854.99, -50, 0.81)
pt3dadd(84.17, 856.02, -50, 0.81)
pt3dadd(84.31, 856.83, -50.15, 0.81)
pt3dadd(84.68, 857.64, -50.35, 0.81)
pt3dadd(84.68, 858.82, -50.5, 0.81)
pt3dadd(84.9, 859.86, -50.55, 0.81)
pt3dadd(85.13, 860.74, -50.6, 0.81)
pt3dadd(85.64, 861.55, -50.6, 0.81)
pt3dadd(85.94, 862.44, -51.7, 0.81)
pt3dadd(86.23, 863.54, -51.7, 0.81)
pt3dadd(86.46, 864.65, -51.75, 0.81)
pt3dadd(86.38, 865.61, -51.8, 0.81)
pt3dadd(86.09, 866.57, -51.85, 0.81)
pt3dadd(86.53, 867.23, -51.85, 0.81)
pt3dadd(87.34, 868.04, -51.85, 0.81)
pt3dadd(88.16, 868.56, -51.9, 0.81)
pt3dadd(88.82, 869.15, -51.9, 0.81)
pt3dadd(89.34, 870.11, -51.9, 0.81)
pt3dadd(89.34, 870.62, -51.9, 0.81)
pt3dadd(89.49, 871.29, -51.9, 0.81)
pt3dadd(89.8, 872.47, -52.1, 0.81)
pt3dadd(90.53, 873.58, -52.15, 0.81)
pt3dadd(90.68, 874.39, -52.15, 0.81)
pt3dadd(90.68, 875.27, -52.15, 0.81)
pt3dadd(90.46, 876.38, -52.2, 0.81)
pt3dadd(90.17, 877.56, -52.25, 0.81)
pt3dadd(89.72, 878.22, -52.25, 0.81)
pt3dadd(89.28, 878.96, -52.35, 0.81)
pt3dadd(88.54, 879.77, -52.45, 0.81)
pt3dadd(88.54, 880.36, -52.45, 0.81)
pt3dadd(88.24, 881.32, -52.5, 0.81)
pt3dadd(88.24, 882.06, -52.5, 0.81)
pt3dadd(88.32, 882.94, -52.5, 0.81)
pt3dadd(88.47, 884.2, -52.7, 0.81)
pt3dadd(88.98, 885.16, -52.75, 0.81)
pt3dadd(89.65, 885.89, -52.75, 0.81)
pt3dadd(90.46, 886.34, -52.75, 0.81)
pt3dadd(90.61, 886.93, -51.6, 0.89)
}
apic[56] {pt3dclear()
pt3dadd(90.61, 886.93, -51.6, 0.67)
pt3dadd(91.2, 887.89, -54.85, 0.67)
pt3dadd(91.94, 888.77, -54.95, 0.67)
pt3dadd(92.53, 889.51, -54.95, 0.67)
pt3dadd(92.75, 889.88, -55, 0.67)
pt3dadd(93.12, 890.61, -55.05, 0.67)
pt3dadd(93.93, 891.2, -55.1, 0.67)
pt3dadd(94.38, 892.09, -55.2, 0.67)
pt3dadd(95.04, 892.53, -55.75, 0.67)
pt3dadd(95.41, 893.78, -55.7, 0.67)
pt3dadd(95.86, 894.37, -55.55, 0.67)
pt3dadd(96.52, 895.04, -55.45, 0.67)
pt3dadd(96.37, 895.85, -53.95, 0.67)
pt3dadd(96.96, 896.81, -54.3, 0.67)
pt3dadd(96.96, 897.91, -54.45, 0.3)
pt3dadd(96.45, 897.25, -56.4, 0.3)
pt3dadd(95.34, 897.18, -56.5, 0.3)
pt3dadd(94.75, 897.47, -56.95, 0.3)
pt3dadd(94.3, 897.84, -57.5, 0.3)
pt3dadd(93.79, 898.5, -58.2, 0.44)
pt3dadd(93.34, 898.95, -58.2, 0.44)
pt3dadd(93.49, 899.76, -58.5, 0.52)
pt3dadd(93.64, 900.5, -58.55, 0.52)
pt3dadd(93.64, 901.23, -58.6, 0.52)
pt3dadd(94.23, 902.04, -58.65, 0.52)
pt3dadd(94.98, 902.85, -58.9, 0.52)
pt3dadd(95.57, 903.52, -58.95, 0.52)
pt3dadd(96.17, 903.74, -58.95, 0.52)
pt3dadd(96.76, 904.03, -59.1, 0.52)
pt3dadd(97.05, 904.4, -59.15, 0.52)
pt3dadd(98.09, 904.77, -59.2, 0.52)
pt3dadd(98.83, 904.85, -59.2, 0.52)
pt3dadd(99.64, 904.85, -59.2, 0.52)
pt3dadd(100.38, 904.92, -60.25, 0.52)
pt3dadd(100.97, 905.14, -60.3, 0.52)
pt3dadd(101.86, 904.92, -60.3, 0.52)
pt3dadd(102.67, 904.48, -60.3, 0.52)
pt3dadd(102.37, 904.26, -62.6, 0.52)
pt3dadd(101.49, 903.67, -62.6, 0.52)
pt3dadd(101.19, 903.08, -62.65, 0.52)
pt3dadd(101.19, 902.26, -62.7, 0.52)
pt3dadd(101.41, 901.9, -62.7, 0.52)
pt3dadd(101.78, 901.67, -62.75, 0.52)
pt3dadd(102.45, 901.38, -62.75, 0.52)
pt3dadd(103.48, 901.53, -62.75, 0.52)
pt3dadd(104.15, 901.01, -63.15, 0.52)
pt3dadd(104.89, 900.94, -63.35, 0.52)
pt3dadd(106.14, 900.94, -63.55, 0.52)
pt3dadd(107.84, 900.86, -64.55, 0.67)
pt3dadd(108.51, 901.23, -64.6, 0.67)
pt3dadd(109.84, 901.53, -64.75, 0.67)
pt3dadd(110.43, 902.26, -66.85, 0.81)
pt3dadd(109.91, 902.93, -66.95, 0.81)
pt3dadd(109.47, 903.67, -67.05, 0.81)
pt3dadd(109.39, 904.26, -67.25, 0.81)
pt3dadd(109.76, 905.07, -67.5, 0.81)
pt3dadd(110.13, 905.73, -67.75, 0.81)
pt3dadd(110.8, 906.17, -68.3, 0.81)
pt3dadd(111.24, 906.76, -68.85, 0.81)
pt3dadd(111.91, 907.28, -68.85, 0.81)
pt3dadd(112.79, 907.8, -68.9, 0.81)
pt3dadd(113.61, 907.21, -68.95, 0.81)
pt3dadd(113.83, 906.62, -68.95, 0.81)
pt3dadd(114.35, 906.69, -70.25, 0.81)
pt3dadd(115.09, 906.84, -70.3, 0.81)
pt3dadd(115.75, 907.57, -70.3, 0.81)
pt3dadd(117.3, 908.02, -70.6, 0.81)
}
}
proc shape3d_43() {
apic[56] { pt3dadd(117.75, 908.83, -72.05, 0.81)
pt3dadd(118.26, 909.79, -72.95, 0.81)
pt3dadd(118.71, 911.41, -73.1, 0.81)
pt3dadd(118.26, 912.15, -73.15, 0.81)
pt3dadd(117.52, 912.52, -73.4, 0.81)
pt3dadd(116.56, 912.81, -74, 0.81)
pt3dadd(115.75, 913.33, -74.2, 0.67)
pt3dadd(115.46, 913.84, -74.3, 0.67)
pt3dadd(115.6, 914.36, -74.55, 0.67)
pt3dadd(115.97, 915.02, -74.9, 0.67)
pt3dadd(116.93, 915.32, -76.1, 0.67)
pt3dadd(117.75, 915.02, -76.15, 0.67)
pt3dadd(118.26, 914.8, -76.15, 0.67)
pt3dadd(119.15, 914.58, -76.35, 0.67)
pt3dadd(119.45, 914.88, -76.9, 0.67)
pt3dadd(119.67, 915.24, -77.55, 0.67)
pt3dadd(119.96, 916.06, -77.75, 0.67)
pt3dadd(119.96, 916.65, -78.05, 0.67)
pt3dadd(119.15, 916.65, -78.35, 0.67)
pt3dadd(118.49, 916.65, -78.75, 0.67)
pt3dadd(118.04, 917.01, -79.1, 0.67)
pt3dadd(117.6, 917.38, -79.85, 0.67)
pt3dadd(117.67, 917.83, -80.1, 0.67)
pt3dadd(117.75, 918.34, -80.7, 0.67)
pt3dadd(117.45, 919.08, -81.4, 0.67)
pt3dadd(117.45, 920.04, -81.7, 0.67)
pt3dadd(118.04, 920.7, -82.25, 0.67)
pt3dadd(119.22, 921.14, -83.05, 0.81)
pt3dadd(119.45, 921.07, -83.35, 0.81)
pt3dadd(120.19, 920.92, -83.35, 0.81)
pt3dadd(120.92, 921.07, -83.65, 0.81)
pt3dadd(121.15, 921.88, -85.6, 0.81)
pt3dadd(121.44, 922.84, -85.6, 0.81)
pt3dadd(122.18, 923.13, -85.6, 0.81)
pt3dadd(122.85, 922.77, -85.6, 0.67)
pt3dadd(123.07, 922.25, -85.6, 0.67)
pt3dadd(123.22, 921.29, -85.35, 0.67)
pt3dadd(123.73, 920.41, -85.55, 0.67)
pt3dadd(124.18, 919.89, -85.8, 0.67)
pt3dadd(125.21, 919.01, -85.9, 0.67)
pt3dadd(125.88, 918.42, -86.05, 0.67)
pt3dadd(126.1, 917.6, -86.2, 0.67)
pt3dadd(126.62, 916.87, -86.6, 0.67)
pt3dadd(127.58, 917.01, -87.5, 0.67)
pt3dadd(128.46, 916.5, -87.55, 0.67)
pt3dadd(128.98, 915.54, -87.7, 0.67)
pt3dadd(129.57, 915.17, -87.75, 0.67)
pt3dadd(130.53, 915.69, -88.6, 0.59)
pt3dadd(130.9, 916.35, -89.1, 0.59)
pt3dadd(131.57, 916.94, -89.45, 0.59)
pt3dadd(132.82, 917.01, -89.9, 0.59)
pt3dadd(133.93, 917.16, -90, 0.59)
pt3dadd(134.89, 916.13, -90.1, 0.59)
pt3dadd(135.34, 915.69, -90.25, 0.59)
pt3dadd(135.41, 915.24, -90.35, 0.59)
pt3dadd(135.26, 914.36, -91.2, 0.59)
pt3dadd(135.26, 913.47, -91.45, 0.59)
pt3dadd(135.71, 912.81, -91.55, 0.59)
pt3dadd(136.37, 912, -91.7, 0.59)
pt3dadd(137.63, 912.22, -91.75, 0.59)
pt3dadd(138.44, 912.66, -91.8, 0.59)
pt3dadd(140.29, 912.44, -91.8, 0.59)
}
apic[57] {pt3dclear()
pt3dadd(90.61, 886.93, -51.6, 0.59)
pt3dadd(90.99, 888.18, -52.35, 0.59)
pt3dadd(91.73, 888.99, -52.45, 0.59)
pt3dadd(92.25, 889.8, -52.5, 0.59)
pt3dadd(92.84, 890.39, -52.5, 0.59)
pt3dadd(93.13, 891.05, -52.55, 0.59)
pt3dadd(93.5, 891.79, -52.55, 0.59)
pt3dadd(93.43, 892.6, -52.55, 0.59)
pt3dadd(93.65, 893.05, -52.6, 0.59)
pt3dadd(94.17, 893.56, -52.65, 0.59)
pt3dadd(94.32, 894.3, -52.65, 0.59)
pt3dadd(94.83, 894.96, -52.7, 0.59)
pt3dadd(94.91, 895.77, -52.8, 0.59)
pt3dadd(95.2, 896.29, -52.9, 0.81)
pt3dadd(95.72, 897.03, -52.95, 0.81)
pt3dadd(95.35, 897.84, -53, 0.81)
pt3dadd(95.28, 898.58, -53, 0.81)
pt3dadd(95.2, 899.24, -53.2, 0.81)
pt3dadd(94.76, 899.83, -53.25, 0.81)
pt3dadd(94.17, 900.27, -53.3, 0.81)
pt3dadd(93.36, 900.79, -53.3, 0.81)
pt3dadd(93.28, 901.31, -53.3, 0.81)
pt3dadd(93.21, 902.04, -53.35, 0.81)
pt3dadd(93.13, 902.56, -53.35, 0.81)
pt3dadd(93.28, 903.22, -53.45, 0.81)
pt3dadd(93.28, 903.89, -53.6, 0.81)
pt3dadd(93.8, 904.62, -53.8, 0.81)
pt3dadd(94.83, 905.88, -54.2, 0.74)
pt3dadd(95.8, 906.39, -54.2, 0.74)
pt3dadd(96.61, 906.84, -54.2, 0.74)
pt3dadd(97.27, 907.72, -54.2, 0.74)
pt3dadd(97.42, 908.9, -54.2, 0.74)
pt3dadd(97.27, 909.42, -54.2, 0.74)
pt3dadd(97.2, 910.3, -54.35, 0.74)
pt3dadd(97.2, 910.97, -54.4, 0.74)
pt3dadd(97.2, 911.78, -54.65, 0.74)
pt3dadd(97.35, 912.52, -54.95, 0.74)
pt3dadd(98.09, 913.47, -55.25, 0.74)
pt3dadd(98.31, 913.84, -55.25, 0.74)
pt3dadd(98.83, 914.21, -55.3, 0.74)
pt3dadd(99.27, 914.95, -55.75, 0.74)
pt3dadd(99.64, 915.47, -55.8, 0.67)
pt3dadd(100.45, 915.76, -55.8, 0.67)
pt3dadd(101.49, 915.61, -55.8, 0.67)
pt3dadd(102.37, 915.83, -55.85, 0.67)
pt3dadd(102.67, 916.42, -55.85, 0.67)
pt3dadd(103.19, 916.94, -56, 0.67)
pt3dadd(103.63, 917.46, -56.3, 0.67)
pt3dadd(104.44, 917.9, -56.5, 0.67)
pt3dadd(105.92, 918.05, -56.55, 0.67)
pt3dadd(106.59, 918.34, -56.6, 0.67)
pt3dadd(107.62, 918.86, -56.7, 0.52)
pt3dadd(108.51, 919.23, -56.7, 0.52)
pt3dadd(109.32, 919.67, -56.75, 0.52)
pt3dadd(109.99, 920.18, -56.95, 0.52)
pt3dadd(110.28, 921.07, -57.2, 0.52)
pt3dadd(110.28, 921.88, -57.05, 0.52)
pt3dadd(111.17, 922.69, -56.85, 0.52)
pt3dadd(111.24, 923.43, -56.65, 0.52)
pt3dadd(111.32, 924.09, -56.5, 0.52)
pt3dadd(111.61, 924.24, -56.4, 0.52)
pt3dadd(112.72, 924.54, -56.3, 0.52)
pt3dadd(113.39, 924.54, -56.2, 0.52)
pt3dadd(114.42, 924.39, -56.15, 0.52)
pt3dadd(115.01, 924.09, -56.05, 0.52)
pt3dadd(115.97, 924.17, -56.05, 0.52)
pt3dadd(116.71, 924.24, -55.95, 0.52)
pt3dadd(117.67, 924.39, -55.85, 0.52)
pt3dadd(118.63, 924.61, -55.8, 0.52)
pt3dadd(119.74, 924.76, -55.75, 0.52)
pt3dadd(120.78, 924.83, -55.75, 0.52)
pt3dadd(121.96, 924.39, -55.7, 0.52)
pt3dadd(123.22, 923.72, -55.65, 0.52)
pt3dadd(124.62, 923.43, -55.65, 0.52)
pt3dadd(125.14, 923.65, -55.6, 0.52)
pt3dadd(125.43, 924.02, -55.55, 0.52)
pt3dadd(126.1, 924.39, -55.4, 0.52)
pt3dadd(127.21, 924.54, -55.7, 0.52)
pt3dadd(128.09, 924.17, -55.75, 0.52)
pt3dadd(128.83, 924.17, -55.85, 0.52)
pt3dadd(130.02, 924.68, -55.9, 0.52)
pt3dadd(131.42, 924.98, -55.9, 0.52)
pt3dadd(132.38, 925.49, -55.95, 0.52)
pt3dadd(132.9, 925.94, -56.05, 0.52)
pt3dadd(134.75, 925.86, -56.1, 0.52)
pt3dadd(135.56, 925.49, -56.15, 0.52)
pt3dadd(136.37, 925.05, -56.15, 0.52)
pt3dadd(137.04, 924.46, -56.2, 0.52)
pt3dadd(138.07, 923.95, -56.2, 0.52)
pt3dadd(139.55, 923.5, -56.25, 0.52)
pt3dadd(140.88, 923.5, -56.3, 0.52)
pt3dadd(142.14, 924.09, -56.35, 0.52)
pt3dadd(143.03, 923.89, -55.6, 0.52)
pt3dadd(144.14, 923.74, -55.5, 0.52)
pt3dadd(144.95, 924.18, -55.45, 0.52)
pt3dadd(145.62, 924.18, -55.4, 0.52)
pt3dadd(146.87, 924.33, -55.35, 0.52)
pt3dadd(147.69, 924.48, -55.35, 0.52)
pt3dadd(148.2, 924.18, -55.35, 0.52)
pt3dadd(148.43, 924.11, -55.3, 0.52)
pt3dadd(149.31, 923.89, -55.3, 0.52)
pt3dadd(150.79, 923.59, -55.3, 0.52)
pt3dadd(151.75, 923.82, -55.3, 0.52)
pt3dadd(152.27, 924.33, -55.25, 0.52)
pt3dadd(152.71, 924.41, -55.2, 0.52)
pt3dadd(153.67, 924.26, -55.1, 0.52)
pt3dadd(154.19, 923.89, -54.95, 0.52)
pt3dadd(155.23, 923.45, -54.5, 0.52)
pt3dadd(156.19, 923.67, -56.5, 0.52)
pt3dadd(157, 923.82, -56.6, 0.52)
pt3dadd(158.26, 923.67, -56.65, 0.52)
pt3dadd(158.85, 922.93, -56.7, 0.52)
pt3dadd(159.36, 922.56, -56.8, 0.52)
pt3dadd(160.03, 922.05, -56.9, 0.52)
pt3dadd(160.77, 921.97, -56.95, 0.52)
pt3dadd(162.62, 922.27, -57.05, 0.52)
pt3dadd(164.32, 921.97, -57.1, 0.52)
pt3dadd(165.06, 922.41, -57.2, 0.52)
pt3dadd(166.24, 922.93, -57.45, 0.52)
pt3dadd(167.2, 923.45, -57.55, 0.52)
pt3dadd(168.31, 923.82, -57.6, 0.52)
pt3dadd(169.49, 924.11, -57.65, 0.52)
pt3dadd(170.3, 923.89, -57.7, 0.52)
pt3dadd(171.34, 923.59, -57.75, 0.44)
pt3dadd(172.67, 923.3, -57.75, 0.44)
pt3dadd(173.19, 923.37, -57.9, 0.44)
pt3dadd(174.44, 923.23, -57.95, 0.44)
pt3dadd(175.03, 923.15, -57.95, 0.44)
pt3dadd(175.99, 923, -58, 0.44)
pt3dadd(176.81, 923.37, -58, 0.44)
pt3dadd(177.99, 923.59, -58.25, 0.44)
pt3dadd(178.8, 923.89, -58.4, 0.44)
pt3dadd(179.84, 924.33, -58.4, 0.44)
pt3dadd(180.58, 924.63, -58.45, 0.44)
pt3dadd(180.95, 924.55, -58.45, 0.44)
pt3dadd(181.68, 924.41, -58.45, 0.44)
pt3dadd(182.79, 923.89, -59.8, 0.44)
pt3dadd(183.53, 923.82, -59.8, 0.37)
}
}
proc shape3d_44() {
apic[57] { pt3dadd(184.64, 923.67, -60.1, 0.37)
pt3dadd(185.08, 923.89, -58.35, 0.37)
pt3dadd(186.27, 924.18, -58.3, 0.37)
pt3dadd(187.52, 923.96, -58.35, 0.37)
pt3dadd(187.97, 924.11, -58.45, 0.37)
pt3dadd(188.85, 924.63, -59.7, 0.37)
pt3dadd(189.45, 925.29, -59.75, 0.37)
}
apic[58] {pt3dclear()
pt3dadd(30.9, 740.47, -31.7, 1.11)
pt3dadd(30.23, 740.77, -34.45, 1.11)
pt3dadd(29.57, 741.44, -34.35, 1.11)
pt3dadd(28.9, 742.18, -34.2, 1.11)
pt3dadd(29.05, 742.84, -34.15, 1.11)
pt3dadd(29.2, 743.58, -34.05, 1.11)
pt3dadd(29.2, 744.46, -33.95, 1.11)
pt3dadd(29.42, 744.98, -34.6, 1.11)
pt3dadd(28.98, 745.42, -36.65, 1.11)
pt3dadd(28.46, 746.16, -36.45, 1.11)
}
apic[59] {pt3dclear()
pt3dadd(28.46, 746.16, -36.45, 0.96)
pt3dadd(28.76, 747.56, -36.4, 0.96)
pt3dadd(28.76, 748.37, -36.45, 0.96)
pt3dadd(28.9, 748.89, -36.5, 0.96)
pt3dadd(28.98, 749.55, -36.6, 0.96)
pt3dadd(28.83, 750.14, -36.6, 0.96)
pt3dadd(28.83, 751.39, -37.15, 0.81)
pt3dadd(29.05, 751.91, -37.15, 0.81)
pt3dadd(29.13, 752.35, -36.95, 0.81)
pt3dadd(29.27, 752.87, -36.75, 0.81)
pt3dadd(29.42, 753.39, -36.6, 0.81)
pt3dadd(29.57, 754.12, -36.4, 0.81)
pt3dadd(29.64, 755.16, -36.1, 0.81)
pt3dadd(29.64, 755.97, -36, 0.81)
pt3dadd(29.72, 756.63, -35.9, 0.81)
pt3dadd(29.5, 757.52, -36, 0.81)
pt3dadd(29.57, 758.25, -36.05, 0.81)
pt3dadd(29.64, 759.51, -36, 0.96)
pt3dadd(30.01, 760.46, -35.95, 0.96)
pt3dadd(30.31, 761.13, -35.9, 0.96)
pt3dadd(30.38, 761.94, -35.85, 0.96)
pt3dadd(30.46, 762.6, -35.75, 0.96)
pt3dadd(30.83, 764.08, -35.45, 0.96)
pt3dadd(31.05, 764.89, -35.3, 0.96)
pt3dadd(31.27, 765.48, -35.45, 0.96)
pt3dadd(31.64, 766.36, -35.75, 0.96)
pt3dadd(31.64, 767.18, -35.85, 0.96)
pt3dadd(31.42, 767.62, -35.95, 0.96)
pt3dadd(31.86, 768.65, -36.05, 0.96)
pt3dadd(31.93, 769.54, -36.1, 0.96)
pt3dadd(32.3, 770.27, -36.1, 0.96)
pt3dadd(32.45, 771.08, -36.15, 0.96)
pt3dadd(32.6, 771.75, -36.15, 0.96)
pt3dadd(32.67, 772.63, -36.25, 0.96)
pt3dadd(32.7, 773.29, -36.45, 0.96)
pt3dadd(32.7, 773.95, -36.5, 0.96)
pt3dadd(32.99, 774.47, -36.6, 0.96)
pt3dadd(32.99, 774.99, -36.75, 0.96)
pt3dadd(33.21, 775.72, -37.3, 0.96)
pt3dadd(33.58, 776.39, -37.85, 0.96)
pt3dadd(33.66, 777.42, -37.9, 0.96)
pt3dadd(33.66, 778.31, -37.95, 0.96)
pt3dadd(33.66, 779.19, -38.05, 0.96)
pt3dadd(33.88, 780, -38.1, 0.96)
pt3dadd(34.1, 781.11, -38.1, 0.96)
pt3dadd(34.1, 782.36, -38.15, 0.96)
pt3dadd(34.25, 783.39, -38.2, 0.96)
pt3dadd(34.25, 784.5, -38.2, 0.96)
pt3dadd(34.03, 785.02, -38.2, 1.11)
pt3dadd(33.95, 785.68, -38.2, 1.11)
pt3dadd(33.66, 786.34, -38.55, 1.11)
pt3dadd(33.88, 786.86, -38.6, 1.11)
pt3dadd(33.95, 787.45, -38.65, 1.11)
pt3dadd(34.17, 788.41, -38.65, 1.11)
pt3dadd(34.4, 789.44, -38.65, 1.11)
pt3dadd(34.1, 790.7, -38.7, 1.11)
pt3dadd(34.17, 791.58, -38.7, 1.11)
pt3dadd(34.4, 792.24, -38.7, 1.11)
pt3dadd(34.32, 792.98, -38.7, 1.11)
pt3dadd(33.8, 793.72, -38.7, 1.11)
pt3dadd(33.66, 794.53, -38.7, 1.11)
pt3dadd(33.21, 795.05, -38.7, 1.11)
pt3dadd(32.92, 795.78, -38.7, 1.11)
pt3dadd(32.62, 796.45, -38.7, 1.11)
pt3dadd(32.25, 797.18, -38.75, 1.11)
pt3dadd(32.25, 798.07, -38.95, 1.11)
pt3dadd(32.33, 798.95, -39.3, 1.11)
pt3dadd(31.88, 799.69, -39.45, 1.11)
pt3dadd(31.81, 800.5, -39.55, 1.11)
pt3dadd(31.29, 801.61, -39.55, 1.11)
pt3dadd(31.44, 802.42, -39.55, 1.11)
pt3dadd(31.29, 803.08, -39.55, 1.11)
pt3dadd(31.14, 803.97, -39.55, 1.11)
pt3dadd(30.92, 804.71, -39.6, 1.11)
pt3dadd(30.95, 805.82, -39.8, 1.11)
pt3dadd(31.03, 806.49, -39.85, 1.11)
pt3dadd(30.88, 807.08, -39.85, 1.11)
pt3dadd(30.43, 808.33, -39.85, 1.48)
pt3dadd(30.43, 809.8, -39.85, 1.48)
pt3dadd(30.36, 810.76, -39.85, 1.48)
pt3dadd(30.21, 811.43, -39.85, 1.48)
pt3dadd(30.07, 812.24, -39.9, 1.48)
pt3dadd(29.7, 813.49, -39.9, 1.48)
pt3dadd(29.47, 814.3, -39.95, 1.48)
pt3dadd(29.33, 814.89, -39.95, 1.48)
pt3dadd(28.88, 815.7, -39.95, 1.48)
pt3dadd(28.14, 816.59, -40, 1.48)
pt3dadd(27.77, 817.47, -40, 1.48)
pt3dadd(27.04, 818.58, -40.15, 1.48)
pt3dadd(26.44, 819.17, -40.15, 1.48)
pt3dadd(26.07, 819.69, -40.15, 1.48)
pt3dadd(25.7, 820.13, -40.45, 1.48)
pt3dadd(25.26, 820.94, -40.55, 1.48)
pt3dadd(24.82, 821.53, -40.55, 1.48)
pt3dadd(24.37, 821.75, -40.5, 1.48)
pt3dadd(23.93, 822.64, -40.4, 1.48)
pt3dadd(23.41, 822.93, -40.4, 1.48)
pt3dadd(22.82, 823.37, -40.35, 1.48)
pt3dadd(21.94, 823.96, -40.3, 1.48)
pt3dadd(21.57, 824.7, -40.25, 1.48)
pt3dadd(20.9, 825.51, -40.25, 1.48)
pt3dadd(20.61, 826.47, -40.25, 1.48)
pt3dadd(20.16, 827.28, -40.25, 1.48)
pt3dadd(19.57, 828.09, -40.25, 1.48)
pt3dadd(18.98, 828.98, -40.25, 1.48)
pt3dadd(18.31, 830.38, -40.25, 1.48)
pt3dadd(17.8, 830.9, -40.25, 1.48)
pt3dadd(17.57, 831.49, -40.25, 1.48)
pt3dadd(17.13, 832, -40.25, 1.48)
pt3dadd(16.61, 832.81, -40.3, 1.48)
pt3dadd(16.1, 833.55, -40.3, 1.48)
pt3dadd(15.51, 834.21, -40.3, 1.48)
pt3dadd(15.06, 835.03, -40.3, 1.48)
pt3dadd(14.47, 836.13, -40.3, 1.48)
pt3dadd(14.03, 836.8, -40.3, 1.48)
pt3dadd(13.73, 837.24, -40.3, 1.48)
pt3dadd(13.21, 837.61, -40.3, 1.48)
pt3dadd(13.18, 838.22, -40.35, 1.48)
pt3dadd(12.88, 838.81, -40.35, 1.48)
pt3dadd(12.37, 839.54, -40.4, 1.48)
pt3dadd(11.77, 840.28, -40.4, 1.48)
pt3dadd(11.4, 840.95, -40.45, 1.48)
pt3dadd(10.81, 841.31, -39.65, 1.48)
pt3dadd(10.37, 841.98, -39.55, 1.48)
pt3dadd(9.63, 842.94, -39.5, 1.48)
pt3dadd(8.82, 843.67, -39.45, 1.48)
pt3dadd(8.52, 844.71, -39.45, 1.48)
pt3dadd(8.08, 845.59, -39.4, 1.48)
pt3dadd(7.93, 846.33, -39.4, 1.48)
pt3dadd(7.56, 846.92, -39.4, 1.48)
pt3dadd(7.19, 847.88, -39.4, 1.48)
pt3dadd(6.97, 848.47, -39.35, 1.48)
}
apic[60] {pt3dclear()
pt3dadd(6.97, 848.47, -39.35, 0.96)
pt3dadd(7.12, 849.5, -39.25, 0.96)
pt3dadd(7.19, 850.46, -39.25, 0.96)
pt3dadd(7.04, 850.9, -39.25, 0.96)
pt3dadd(6.45, 851.42, -39.2, 0.96)
pt3dadd(6.67, 852.16, -39.15, 0.96)
pt3dadd(7.04, 852.67, -39.2, 0.96)
pt3dadd(7.27, 853.26, -39.3, 0.96)
pt3dadd(7.34, 854.07, -39.45, 0.96)
pt3dadd(7.41, 854.59, -39.55, 0.96)
pt3dadd(7.56, 854.74, -39.35, 0.96)
pt3dadd(7.56, 855.25, -39.1, 0.96)
pt3dadd(7.93, 855.77, -38.95, 0.96)
pt3dadd(8.23, 856.36, -38.85, 0.96)
pt3dadd(8.52, 857.02, -38.7, 0.96)
pt3dadd(8.45, 857.91, -38.5, 0.96)
pt3dadd(8.6, 858.94, -38.4, 0.74)
pt3dadd(8.45, 859.6, -38.35, 0.74)
pt3dadd(8, 860.05, -38.35, 0.74)
pt3dadd(7.71, 860.78, -38.35, 0.74)
pt3dadd(7.71, 861.67, -38.2, 0.74)
pt3dadd(7.56, 862.33, -38, 0.74)
pt3dadd(7.71, 863.66, -37.15, 0.74)
pt3dadd(7.71, 864.54, -36.9, 0.74)
pt3dadd(7.49, 865.21, -36.65, 0.74)
pt3dadd(7.34, 866.17, -36.55, 0.74)
pt3dadd(7.27, 866.9, -36.5, 0.74)
pt3dadd(7.12, 867.72, -36.5, 0.74)
pt3dadd(7.41, 868.53, -36.45, 0.74)
pt3dadd(7.56, 869.04, -36.45, 0.74)
pt3dadd(7.49, 869.85, -36.45, 0.74)
pt3dadd(7.8, 870.67, -36.3, 0.74)
pt3dadd(8.31, 871.49, -36.3, 0.74)
pt3dadd(8.61, 871.93, -36.25, 0.89)
pt3dadd(9.27, 872.3, -35.5, 0.89)
pt3dadd(9.27, 873.48, -35.4, 0.89)
pt3dadd(9.05, 874.29, -35.05, 0.89)
pt3dadd(9.5, 875.1, -34.7, 0.89)
pt3dadd(9.5, 875.69, -34.65, 0.89)
pt3dadd(9.64, 876.5, -34.65, 0.89)
pt3dadd(10.23, 877.16, -34.65, 0.89)
pt3dadd(10.46, 877.98, -34.6, 0.89)
pt3dadd(11.12, 878.79, -34.6, 0.89)
pt3dadd(11.42, 879.45, -34.45, 0.89)
pt3dadd(11.49, 880.63, -34.4, 0.89)
pt3dadd(11.05, 881.29, -34.4, 0.89)
pt3dadd(11.05, 881.81, -34.1, 0.89)
pt3dadd(10.53, 882.11, -34, 0.89)
pt3dadd(10.09, 882.33, -33.8, 0.89)
pt3dadd(9.57, 882.84, -32.55, 0.89)
pt3dadd(8.9, 882.92, -32.55, 0.89)
}
}
proc shape3d_45() {
apic[60] { pt3dadd(8.09, 883.43, -32.55, 0.89)
pt3dadd(7.94, 884.02, -32.55, 0.89)
pt3dadd(7.87, 884.61, -32.55, 0.89)
pt3dadd(7.94, 885.35, -32.55, 0.89)
pt3dadd(7.94, 886.09, -32.4, 0.89)
pt3dadd(7.87, 886.75, -32.4, 0.89)
pt3dadd(8.09, 887.64, -32.35, 0.89)
pt3dadd(8.46, 888.52, -32.35, 0.89)
pt3dadd(8.9, 889.18, -32.35, 0.89)
pt3dadd(9.5, 889.92, -32.2, 0.89)
pt3dadd(9.79, 890.81, -31.5, 0.89)
pt3dadd(10.01, 891.47, -31.4, 0.89)
pt3dadd(9.72, 892.36, -31.55, 0.89)
pt3dadd(9.64, 893.02, -31.75, 0.89)
pt3dadd(9.79, 893.76, -32.05, 0.89)
pt3dadd(9.27, 894.79, -32.3, 0.89)
pt3dadd(9.2, 895.38, -32.4, 0.89)
pt3dadd(9.2, 895.9, -32.5, 0.89)
pt3dadd(9.5, 896.34, -32.7, 0.89)
pt3dadd(10.09, 896.85, -33, 0.89)
pt3dadd(10.68, 898.03, -33.4, 0.81)
pt3dadd(10.9, 898.85, -33.45, 0.81)
pt3dadd(11.27, 899.51, -33.5, 0.81)
pt3dadd(11.57, 900.1, -31.1, 0.81)
pt3dadd(11.57, 900.91, -31.35, 0.81)
pt3dadd(11.64, 901.35, -31.45, 0.81)
}
apic[61] {pt3dclear()
pt3dadd(11.64, 901.35, -31.45, 0.81)
pt3dadd(11.93, 902.09, -31.6, 0.81)
pt3dadd(12.38, 902.61, -31.6, 0.81)
pt3dadd(13.11, 903, -30.95, 0.67)
pt3dadd(14.14, 903.37, -30.7, 0.67)
pt3dadd(14.73, 903.44, -30.65, 0.67)
pt3dadd(15.33, 903.74, -30.55, 0.67)
pt3dadd(16.36, 904.11, -30.5, 0.67)
pt3dadd(17.03, 904.48, -30.45, 0.67)
pt3dadd(17.47, 904.62, -30, 0.67)
pt3dadd(17.91, 904.99, -29.8, 0.67)
pt3dadd(18.43, 905.66, -29.7, 0.67)
pt3dadd(19.02, 906.39, -29.5, 0.67)
pt3dadd(18.95, 907.28, -29.45, 0.67)
pt3dadd(19.1, 907.87, -29.4, 0.67)
pt3dadd(18.95, 908.53, -29.35, 0.67)
pt3dadd(18.65, 908.83, -29.35, 0.67)
pt3dadd(18.36, 909.12, -29.35, 0.67)
pt3dadd(17.84, 909.56, -29.3, 0.67)
pt3dadd(17.62, 909.86, -29.25, 0.67)
pt3dadd(17.47, 910.3, -29.05, 0.67)
pt3dadd(17.54, 911.26, -28.85, 0.67)
pt3dadd(17.77, 911.7, -28.65, 0.67)
pt3dadd(17.91, 912.15, -28.4, 0.67)
pt3dadd(18.13, 912.74, -28.25, 0.67)
pt3dadd(18.43, 913.4, -28.1, 0.67)
pt3dadd(19.17, 913.92, -28.05, 0.67)
pt3dadd(19.76, 914.43, -28, 0.67)
pt3dadd(20.43, 914.43, -27.3, 0.67)
pt3dadd(20.8, 914.21, -27.25, 0.67)
pt3dadd(21.39, 914.14, -27.25, 0.67)
pt3dadd(21.83, 914.14, -26.7, 0.67)
pt3dadd(22.72, 914.28, -26.65, 0.67)
pt3dadd(23.31, 914.8, -26.65, 0.67)
pt3dadd(23.23, 915.39, -24.75, 0.67)
pt3dadd(23.38, 916.35, -24.3, 0.67)
pt3dadd(23.9, 916.87, -23.9, 0.67)
pt3dadd(24.64, 917.23, -23.75, 0.67)
pt3dadd(25.3, 917.9, -23.35, 0.67)
pt3dadd(26.19, 918.64, -23.35, 0.67)
pt3dadd(27.15, 918.41, -23.25, 0.67)
pt3dadd(27.82, 918.12, -22.85, 0.67)
pt3dadd(28.11, 917.97, -22.5, 0.67)
pt3dadd(28.63, 918.05, -22.3, 0.67)
pt3dadd(29.44, 918.34, -22.05, 0.67)
pt3dadd(30.03, 918.71, -21.95, 0.67)
pt3dadd(30.26, 918.93, -21.75, 0.67)
pt3dadd(31.07, 919.89, -21.3, 0.67)
pt3dadd(31.07, 920.41, -21.25, 0.67)
pt3dadd(31.22, 920.92, -21.25, 0.67)
pt3dadd(31.59, 921.36, -21.25, 0.67)
pt3dadd(32.03, 921.51, -21.25, 0.67)
pt3dadd(33.14, 921.73, -20.9, 0.67)
pt3dadd(34.25, 921.14, -20.65, 0.67)
pt3dadd(34.69, 920.48, -20.55, 0.67)
pt3dadd(34.84, 919.96, -20.55, 0.67)
pt3dadd(35.06, 919.3, -20.5, 0.67)
pt3dadd(35.8, 918.49, -20.5, 0.67)
pt3dadd(36.46, 917.9, -20.5, 0.67)
pt3dadd(37.35, 918.12, -20.45, 0.67)
pt3dadd(38.24, 918.27, -20.4, 0.67)
pt3dadd(39.42, 918.93, -20.3, 0.67)
pt3dadd(39.94, 919.3, -20.2, 0.67)
pt3dadd(41.05, 919.45, -19.95, 0.67)
pt3dadd(41.71, 919.74, -19.9, 0.67)
pt3dadd(43.19, 919.67, -19.5, 0.67)
pt3dadd(43.63, 919.67, -18.5, 0.52)
pt3dadd(44.15, 919.37, -18.55, 0.52)
pt3dadd(44.67, 919.15, -18.75, 0.52)
pt3dadd(45.04, 919, -18.95, 0.52)
pt3dadd(46.44, 918.86, -19.1, 0.52)
pt3dadd(47.11, 919.15, -19.2, 0.52)
pt3dadd(47.55, 919.52, -19.3, 0.52)
pt3dadd(48.29, 920.11, -19.35, 0.52)
pt3dadd(48.66, 920.33, -19.4, 0.52)
pt3dadd(49.03, 920.26, -19.4, 0.52)
pt3dadd(49.77, 919.82, -19.45, 0.52)
pt3dadd(50.8, 919.23, -19.45, 0.52)
pt3dadd(51.76, 918.93, -19.5, 0.52)
pt3dadd(52.95, 919.15, -19.5, 0.52)
pt3dadd(53.39, 919.45, -19.5, 0.52)
pt3dadd(53.54, 919.67, -19.5, 0.52)
pt3dadd(54.05, 920.04, -19.55, 0.52)
pt3dadd(54.57, 920.55, -19.55, 0.52)
pt3dadd(55.16, 921.36, -19.75, 0.52)
pt3dadd(55.83, 921.58, -19.8, 0.52)
pt3dadd(56.35, 921.58, -19.8, 0.52)
pt3dadd(56.79, 921.22, -18.8, 0.52)
pt3dadd(57.38, 920.04, -18.75, 0.52)
pt3dadd(58.34, 920.04, -18.75, 0.52)
pt3dadd(58.86, 919.82, -18.7, 0.52)
pt3dadd(59.82, 919.67, -18.7, 0.52)
pt3dadd(60.37, 920.06, -18.65, 0.37)
pt3dadd(60.96, 920.57, -18.65, 0.37)
pt3dadd(61.48, 920.87, -18.65, 0.37)
pt3dadd(62.07, 921.31, -18.3, 0.37)
pt3dadd(62.88, 921.53, -18.25, 0.37)
pt3dadd(63.92, 921.39, -19.25, 0.37)
pt3dadd(64.88, 921.02, -19.4, 0.37)
pt3dadd(65.54, 921.09, -19.55, 0.37)
pt3dadd(66.06, 921.24, -19.65, 0.37)
pt3dadd(67.02, 921.39, -19.7, 0.37)
pt3dadd(67.39, 921.31, -19.7, 0.37)
pt3dadd(68.2, 921.02, -19.75, 0.37)
pt3dadd(68.8, 920.87, -19.8, 0.37)
pt3dadd(69.76, 920.57, -19.9, 0.37)
pt3dadd(70.79, 920.21, -19.1, 0.37)
pt3dadd(71.83, 919.98, -19, 0.37)
pt3dadd(73.08, 919.98, -18.95, 0.37)
pt3dadd(74.12, 920.21, -18.9, 0.37)
pt3dadd(75.08, 920.35, -18.85, 0.37)
pt3dadd(75.74, 920.8, -19.4, 0.37)
pt3dadd(76.48, 921.46, -19.55, 0.37)
pt3dadd(77.22, 921.75, -19.7, 0.37)
pt3dadd(77.81, 922.2, -19.75, 0.37)
pt3dadd(78.63, 922.64, -19.85, 0.37)
}
apic[62] {pt3dclear()
pt3dadd(11.64, 901.35, -31.45, 0.52)
pt3dadd(11.53, 902.22, -32.2, 0.52)
pt3dadd(11.68, 902.74, -32.1, 0.52)
pt3dadd(11.38, 902.96, -32.1, 0.52)
pt3dadd(11.01, 903.25, -32.05, 0.52)
pt3dadd(10.94, 903.77, -32.05, 0.52)
pt3dadd(11.38, 904.21, -32.05, 0.52)
pt3dadd(11.75, 904.51, -32.05, 0.52)
pt3dadd(12.42, 904.88, -32, 0.52)
pt3dadd(13.01, 905.25, -32, 0.52)
pt3dadd(13.38, 905.54, -32, 0.52)
pt3dadd(13.53, 905.98, -31.95, 0.52)
pt3dadd(13.6, 906.94, -31.85, 0.52)
pt3dadd(13.3, 907.61, -31.8, 0.52)
pt3dadd(13.3, 908.2, -31.75, 0.52)
pt3dadd(13.6, 908.71, -31.65, 0.52)
pt3dadd(13.82, 909.52, -31.25, 0.52)
pt3dadd(14.19, 910.26, -31.25, 0.52)
pt3dadd(14.49, 910.7, -31.2, 0.52)
pt3dadd(14.56, 911.81, -31.2, 0.52)
pt3dadd(15.08, 912.33, -31.15, 0.52)
pt3dadd(15.23, 912.84, -31.15, 0.52)
pt3dadd(15.82, 913.28, -31.15, 0.52)
pt3dadd(15.97, 913.95, -31.15, 0.52)
pt3dadd(15.89, 914.61, -31.15, 0.52)
pt3dadd(15.74, 915.13, -31.1, 0.52)
pt3dadd(15.6, 915.57, -31.05, 0.52)
pt3dadd(15.3, 916.16, -31.05, 0.52)
pt3dadd(15.15, 916.75, -31, 0.52)
pt3dadd(15.15, 917.34, -31, 0.52)
pt3dadd(15.15, 918.08, -31, 0.52)
pt3dadd(15.08, 919.04, -30.95, 0.52)
pt3dadd(14.78, 919.48, -30.85, 0.52)
pt3dadd(14.34, 919.99, -30.7, 0.52)
pt3dadd(13.75, 920.81, -30.55, 0.52)
pt3dadd(13.6, 921.47, -32.15, 0.52)
pt3dadd(13.38, 922.06, -32.25, 0.52)
pt3dadd(13.08, 922.72, -32.3, 0.52)
pt3dadd(12.86, 922.94, -32.35, 0.52)
pt3dadd(13.3, 923.68, -30.85, 0.52)
pt3dadd(13.82, 924.27, -30.75, 0.52)
pt3dadd(13.6, 925.38, -30.6, 0.52)
pt3dadd(13.16, 925.89, -29.4, 0.52)
pt3dadd(13.75, 926.26, -29.35, 0.52)
pt3dadd(14.78, 926.93, -28.8, 0.52)
pt3dadd(15.3, 926.93, -28.75, 0.52)
pt3dadd(16.04, 927, -28.45, 0.52)
pt3dadd(17, 926.85, -29.8, 0.52)
pt3dadd(17.96, 927.15, -29.65, 0.52)
pt3dadd(18.48, 927.74, -29.6, 0.52)
pt3dadd(18.48, 928.4, -29.55, 0.52)
pt3dadd(17.74, 928.99, -29.5, 0.52)
pt3dadd(17.3, 929.14, -29.45, 0.52)
pt3dadd(16.33, 929.43, -29.45, 0.52)
pt3dadd(15.74, 929.43, -29.45, 0.52)
}
apic[63] {pt3dclear()
pt3dadd(6.97, 848.47, -39.35, 1.03)
pt3dadd(6.69, 848.44, -40.1, 1.03)
pt3dadd(6.1, 849.1, -40.2, 1.03)
}
}
proc shape3d_46() {
apic[63] { pt3dadd(5.8, 849.32, -40.3, 1.03)
pt3dadd(5.58, 849.91, -40.35, 1.03)
pt3dadd(5.36, 850.35, -40.5, 1.03)
pt3dadd(5.21, 850.65, -40.55, 1.03)
pt3dadd(4.77, 851.02, -41.05, 1.03)
pt3dadd(4.47, 851.9, -40.95, 1.03)
pt3dadd(4.33, 852.12, -40.75, 1.03)
pt3dadd(4.03, 852.42, -40.15, 1.03)
pt3dadd(3.96, 853.23, -39.5, 1.03)
pt3dadd(3.81, 853.89, -39.3, 1.03)
pt3dadd(3.29, 854.56, -39.2, 1.03)
pt3dadd(3.14, 855.3, -39.15, 1.03)
pt3dadd(3.29, 856.03, -39.1, 1.03)
pt3dadd(3.51, 857.07, -39, 1.03)
pt3dadd(3.88, 857.8, -38.95, 1.03)
pt3dadd(3.96, 858.84, -38.95, 1.03)
pt3dadd(3.81, 859.35, -38.9, 1.03)
pt3dadd(3.66, 859.94, -38.7, 1.03)
pt3dadd(3.74, 860.68, -38.65, 1.03)
pt3dadd(3.66, 861.27, -38.2, 1.03)
pt3dadd(3.14, 862.08, -37.95, 1.03)
pt3dadd(2.92, 863.33, -37.85, 1.03)
pt3dadd(2.77, 864.22, -37.8, 1.03)
pt3dadd(2.4, 864.81, -37.65, 1.03)
pt3dadd(2.33, 865.92, -37.35, 1.03)
pt3dadd(2.18, 866.51, -37.2, 1.03)
pt3dadd(1.67, 867.17, -37, 1.03)
pt3dadd(1.52, 867.54, -36.65, 1.03)
pt3dadd(1.15, 867.91, -36.45, 1.03)
pt3dadd(0.63, 868.72, -36.45, 1.03)
pt3dadd(0.34, 869.68, -36.45, 1.03)
pt3dadd(0.19, 870.41, -36.4, 1.03)
pt3dadd(0.04, 871.15, -36.35, 1.03)
pt3dadd(0.19, 872.63, -36.2, 1.03)
pt3dadd(0.34, 873.81, -36.15, 1.03)
pt3dadd(0.56, 874.69, -36.15, 1.03)
pt3dadd(1.07, 875.65, -36.15, 1.03)
pt3dadd(1.07, 876.61, -36.1, 1.03)
pt3dadd(0.7, 877.35, -36.1, 1.03)
pt3dadd(0.56, 877.86, -36.1, 1.03)
pt3dadd(0.34, 878.38, -36, 1.03)
pt3dadd(-0.03, 878.89, -35.8, 1.03)
pt3dadd(0.04, 879.78, -35.75, 1.03)
pt3dadd(0.11, 880.37, -35.75, 1.03)
pt3dadd(0.34, 881.33, -35.7, 1.03)
pt3dadd(0.44, 882.49, -34.95, 1.03)
pt3dadd(0.07, 883.3, -34.95, 1.03)
pt3dadd(-0.22, 883.52, -34.8, 1.03)
pt3dadd(-0.81, 884.11, -34.4, 1.03)
pt3dadd(-1.33, 884.33, -34.15, 1.03)
pt3dadd(-1.7, 884.7, -33.9, 1.03)
pt3dadd(-2, 885.14, -33.75, 1.03)
pt3dadd(-2.36, 885.36, -33.6, 1.03)
pt3dadd(-2.73, 885.66, -33.4, 1.03)
pt3dadd(-3.25, 885.88, -33.2, 1.03)
pt3dadd(-3.62, 886.39, -32.9, 1.03)
pt3dadd(-3.99, 886.84, -32.8, 1.03)
pt3dadd(-4.43, 887.87, -32.75, 1.03)
pt3dadd(-4.51, 888.46, -32.65, 1.03)
pt3dadd(-4.66, 888.9, -32.6, 1.03)
pt3dadd(-4.8, 889.71, -32.45, 1.03)
pt3dadd(-4.88, 890.3, -32.2, 1.03)
pt3dadd(-4.73, 891.04, -32, 1.03)
pt3dadd(-5.4, 892.22, -31.4, 1.03)
pt3dadd(-5.69, 893.11, -31.35, 1.03)
pt3dadd(-5.69, 893.92, -31.15, 1.03)
pt3dadd(-5.54, 894.43, -30.65, 1.03)
pt3dadd(-5.62, 895.17, -30.6, 1.03)
pt3dadd(-5.62, 895.61, -30.7, 1.03)
pt3dadd(-5.47, 896.65, -30.85, 1.03)
pt3dadd(-5.17, 897.6, -30.95, 1.03)
pt3dadd(-5.03, 898.56, -31, 1.03)
pt3dadd(-5.1, 899.45, -31.05, 1.03)
pt3dadd(-5.69, 900.04, -31.05, 1.03)
pt3dadd(-6.28, 900.33, -31.05, 1.03)
pt3dadd(-7.46, 900.63, -30.75, 1.03)
pt3dadd(-8.2, 901.14, -30.7, 1.03)
pt3dadd(-8.72, 901.51, -30.7, 1.03)
pt3dadd(-9.39, 901.59, -30.7, 1.03)
pt3dadd(-9.83, 901.73, -30.4, 1.03)
pt3dadd(-10.13, 901.88, -30.15, 1.03)
pt3dadd(-10.49, 902.18, -30.35, 1.03)
pt3dadd(-10.94, 902.32, -30.5, 1.03)
pt3dadd(-11.16, 902.54, -30.7, 1.03)
pt3dadd(-11.23, 903.21, -31.55, 1.03)
pt3dadd(-11.53, 904.09, -31.75, 1.03)
pt3dadd(-11.6, 904.98, -31.85, 1.03)
pt3dadd(-11.75, 905.64, -31.95, 1.03)
pt3dadd(-11.9, 906.38, -32, 1.03)
pt3dadd(-11.97, 907.19, -32.05, 1.03)
pt3dadd(-12.12, 907.93, -32.05, 1.03)
pt3dadd(-12.05, 908.74, -32.8, 1.03)
pt3dadd(-11.9, 909.18, -32.55, 1.03)
pt3dadd(-12.27, 910.07, -30.7, 1.03)
pt3dadd(-11.9, 911.25, -30.55, 1.03)
pt3dadd(-12.49, 911.62, -30.5, 1.03)
}
apic[64] {pt3dclear()
pt3dadd(-12.49, 911.62, -30.5, 0.59)
pt3dadd(-13.16, 912.65, -30.45, 0.59)
pt3dadd(-13.16, 913.02, -30.45, 0.59)
pt3dadd(-13.01, 913.53, -30.45, 0.59)
pt3dadd(-12.71, 914.49, -30.45, 0.59)
pt3dadd(-11.9, 914.93, -30.4, 0.59)
pt3dadd(-11.67, 915.37, -30.4, 0.59)
pt3dadd(-11.67, 915.96, -30.4, 0.59)
pt3dadd(-12.04, 916.26, -30.35, 0.59)
pt3dadd(-12.41, 916.55, -30.25, 0.59)
pt3dadd(-12.63, 916.92, -30.25, 0.59)
pt3dadd(-13.08, 916.99, -30.2, 0.59)
pt3dadd(-13.52, 917.29, -30.15, 0.59)
pt3dadd(-14.04, 917.44, -30.15, 0.59)
pt3dadd(-14.78, 917.58, -30.15, 0.59)
}
apic[65] {pt3dclear()
pt3dadd(-14.78, 917.58, -30.15, 0.59)
pt3dadd(-15.44, 918.17, -29.25, 0.59)
pt3dadd(-15.96, 918.47, -29.2, 0.59)
pt3dadd(-16.48, 918.54, -29.2, 0.59)
pt3dadd(-16.92, 918.98, -29.2, 0.59)
pt3dadd(-17.29, 919.43, -29.2, 0.59)
pt3dadd(-17.73, 919.87, -29.25, 0.59)
pt3dadd(-18.33, 919.8, -29.3, 0.59)
pt3dadd(-18.99, 919.72, -29.7, 0.59)
pt3dadd(-19.66, 919.28, -29.75, 0.59)
pt3dadd(-20.03, 919.21, -29.8, 0.59)
pt3dadd(-20.69, 919.28, -29.9, 0.59)
pt3dadd(-21.28, 919.35, -28.7, 0.59)
pt3dadd(-21.73, 920.09, -28.6, 0.59)
pt3dadd(-22.09, 920.46, -28.55, 0.59)
pt3dadd(-22.32, 920.98, -28.55, 0.59)
pt3dadd(-22.61, 921.42, -28.5, 0.59)
pt3dadd(-23.35, 921.57, -28.5, 0.59)
pt3dadd(-24.09, 921.71, -28.45, 0.59)
pt3dadd(-24.76, 922.01, -28.45, 0.59)
pt3dadd(-25.42, 922.16, -28.45, 0.59)
pt3dadd(-25.86, 922.08, -28.4, 0.59)
pt3dadd(-26.75, 921.93, -28.4, 0.59)
pt3dadd(-27.56, 921.86, -28.4, 0.59)
pt3dadd(-28.3, 921.79, -28.35, 0.59)
pt3dadd(-29.19, 921.71, -28.35, 0.59)
pt3dadd(-29.93, 921.71, -28.3, 0.59)
pt3dadd(-30.82, 921.71, -28.2, 0.59)
pt3dadd(-31.11, 921.79, -27.55, 0.59)
pt3dadd(-32.22, 922.08, -27.4, 0.59)
pt3dadd(-32.89, 921.79, -28.75, 0.59)
pt3dadd(-33.55, 921.86, -28.85, 0.59)
pt3dadd(-34.07, 922.3, -28.95, 0.59)
pt3dadd(-34.73, 922.75, -29, 0.59)
pt3dadd(-35.62, 922.89, -29.1, 0.59)
pt3dadd(-36.36, 922.82, -29.2, 0.59)
pt3dadd(-37.02, 922.89, -29.35, 0.59)
pt3dadd(-37.91, 922.6, -29.65, 0.59)
pt3dadd(-38.8, 922.75, -29.7, 0.59)
pt3dadd(-39.46, 923.19, -29.75, 0.59)
pt3dadd(-40.13, 923.7, -29.8, 0.59)
pt3dadd(-40.79, 924, -29.8, 0.59)
pt3dadd(-41.31, 924.15, -30, 0.59)
pt3dadd(-42.42, 924.07, -30, 0.59)
pt3dadd(-43.45, 923.78, -30.1, 0.59)
pt3dadd(-44.27, 923.34, -30.1, 0.59)
pt3dadd(-45.15, 922.97, -30.9, 0.59)
pt3dadd(-46.48, 923.04, -31.05, 0.59)
pt3dadd(-47.89, 922.45, -31.9, 0.59)
pt3dadd(-48.7, 922.45, -31.95, 0.59)
pt3dadd(-49.44, 922.23, -29.75, 0.59)
pt3dadd(-50.18, 921.79, -29.65, 0.59)
pt3dadd(-51.22, 922.01, -29.6, 0.59)
pt3dadd(-52.1, 921.71, -29.6, 0.59)
pt3dadd(-52.69, 921.86, -29.7, 0.59)
pt3dadd(-53.65, 921.86, -30, 0.59)
pt3dadd(-54.47, 922.08, -30.15, 0.59)
pt3dadd(-55.5, 921.93, -31.45, 0.59)
pt3dadd(-56.17, 921.71, -31.6, 0.59)
pt3dadd(-57.05, 921.71, -31.7, 0.59)
pt3dadd(-58.01, 921.93, -31.7, 0.59)
pt3dadd(-58.61, 922.01, -31.75, 0.59)
pt3dadd(-59.35, 921.71, -31.75, 0.59)
pt3dadd(-59.86, 921.57, -31.8, 0.59)
pt3dadd(-60.9, 921.57, -32.85, 0.59)
pt3dadd(-61.3, 921.48, -33.15, 0.59)
pt3dadd(-61.6, 921.19, -33.15, 0.59)
pt3dadd(-61.52, 919.71, -33.2, 0.59)
pt3dadd(-61.74, 918.61, -33.2, 0.59)
pt3dadd(-61.97, 917.65, -33.25, 0.59)
pt3dadd(-62.56, 917.28, -33.85, 0.59)
pt3dadd(-63.66, 917.28, -34.75, 0.59)
pt3dadd(-64.55, 917.35, -34.75, 0.59)
pt3dadd(-64.92, 917.35, -34.85, 0.59)
pt3dadd(-65.66, 917.35, -35.15, 0.59)
pt3dadd(-66.18, 917.43, -35.4, 0.59)
pt3dadd(-66.62, 917.5, -35.75, 0.59)
pt3dadd(-67.29, 917.8, -35.85, 0.59)
pt3dadd(-67.8, 918.17, -35.85, 0.59)
pt3dadd(-68.03, 918.39, -36, 0.59)
pt3dadd(-68.47, 918.76, -36.15, 0.59)
pt3dadd(-68.69, 919.35, -36.3, 0.59)
pt3dadd(-69.21, 919.71, -36.35, 0.59)
pt3dadd(-69.5, 920.01, -36.6, 0.59)
pt3dadd(-70.09, 920.38, -37.05, 0.59)
pt3dadd(-70.69, 920.53, -37.35, 0.59)
pt3dadd(-71.2, 920.3, -38.15, 0.59)
pt3dadd(-72.24, 920.3, -38.3, 0.59)
pt3dadd(-72.68, 919.94, -38.35, 0.59)
}
}
proc shape3d_47() {
apic[65] { pt3dadd(-73.2, 919.64, -38.5, 0.59)
pt3dadd(-74.01, 919.12, -38.85, 0.59)
pt3dadd(-74.6, 918.76, -38.9, 0.59)
pt3dadd(-75.05, 918.46, -39.2, 0.59)
pt3dadd(-75.42, 918.46, -39.55, 0.59)
pt3dadd(-76.01, 918.61, -39.65, 0.59)
pt3dadd(-76.38, 918.9, -39.75, 0.59)
pt3dadd(-76.89, 919.2, -40.05, 0.59)
pt3dadd(-77.34, 919.79, -40.2, 0.59)
pt3dadd(-78.08, 920.38, -40.2, 0.59)
pt3dadd(-78.67, 920.89, -40.2, 0.59)
pt3dadd(-79.11, 921.34, -40.2, 0.59)
pt3dadd(-79.56, 921.63, -40.2, 0.59)
pt3dadd(-80.15, 922, -40.55, 0.59)
pt3dadd(-80.89, 922, -40.55, 0.59)
pt3dadd(-81.55, 921.93, -40.55, 0.59)
pt3dadd(-81.99, 921.85, -41.55, 0.59)
pt3dadd(-82.59, 922, -41.35, 0.59)
pt3dadd(-83.18, 922.07, -40.65, 0.59)
pt3dadd(-83.69, 922.07, -40.65, 0.59)
pt3dadd(-84.36, 922.3, -40.75, 0.59)
pt3dadd(-84.58, 922.66, -40.85, 0.59)
}
apic[66] {pt3dclear()
pt3dadd(-14.78, 917.58, -30.15, 0.59)
pt3dadd(-14.88, 916.91, -28.2, 0.59)
pt3dadd(-15.33, 916.84, -28.2, 0.59)
pt3dadd(-16.36, 916.54, -28.35, 0.59)
pt3dadd(-16.88, 916.47, -28.4, 0.59)
pt3dadd(-17.47, 916.4, -28.45, 0.59)
pt3dadd(-18.51, 916.76, -28.55, 0.59)
pt3dadd(-19.25, 915.95, -28.65, 0.59)
pt3dadd(-20.13, 915.66, -28.75, 0.59)
pt3dadd(-20.72, 914.99, -27.2, 0.59)
pt3dadd(-21.68, 914.92, -27.1, 0.59)
pt3dadd(-22.65, 915.22, -27, 0.59)
pt3dadd(-23.31, 915.44, -26.95, 0.59)
pt3dadd(-24.05, 915.88, -26.9, 0.59)
pt3dadd(-24.64, 915.88, -26.75, 0.59)
pt3dadd(-26.19, 915.95, -26.5, 0.59)
pt3dadd(-27.15, 916.03, -26.45, 0.59)
pt3dadd(-27.75, 915.73, -26.35, 0.59)
pt3dadd(-28.48, 915.29, -26.3, 0.59)
pt3dadd(-29.08, 915.07, -26.25, 0.59)
pt3dadd(-29.67, 914.77, -26.2, 0.59)
pt3dadd(-30.33, 914.4, -26.15, 0.59)
pt3dadd(-30.78, 914.33, -25.95, 0.59)
pt3dadd(-31.74, 914.48, -25.9, 0.59)
pt3dadd(-32.33, 914.7, -25.85, 0.59)
pt3dadd(-32.77, 914.92, -25.8, 0.59)
pt3dadd(-33.51, 914.92, -25.8, 0.59)
pt3dadd(-34.18, 915.07, -25.55, 0.59)
pt3dadd(-34.54, 915.14, -25.4, 0.59)
pt3dadd(-35.36, 915.73, -25.35, 0.59)
pt3dadd(-36.17, 915.81, -25.35, 0.59)
pt3dadd(-36.84, 915.51, -25.25, 0.59)
pt3dadd(-37.43, 915.66, -25.2, 0.59)
pt3dadd(-37.94, 916.17, -25.2, 0.59)
pt3dadd(-39.2, 915.73, -25.05, 0.59)
pt3dadd(-39.94, 915.58, -24.5, 0.59)
pt3dadd(-40.38, 915.95, -24.45, 0.59)
pt3dadd(-40.75, 916.25, -24.4, 0.59)
pt3dadd(-41.34, 916.4, -24.15, 0.59)
pt3dadd(-42.31, 916.76, -24.05, 0.59)
pt3dadd(-43.12, 916.47, -23.8, 0.59)
pt3dadd(-43.78, 916.03, -23.65, 0.59)
pt3dadd(-44.08, 915.29, -24.25, 0.59)
pt3dadd(-44.08, 914.77, -24.35, 0.59)
pt3dadd(-44.15, 913.81, -24.4, 0.59)
pt3dadd(-44.01, 913.22, -24.4, 0.59)
pt3dadd(-44.3, 912.71, -24.4, 0.59)
pt3dadd(-44.89, 913.81, -19.7, 0.59)
pt3dadd(-45.48, 914.55, -19.05, 0.59)
pt3dadd(-46.07, 915.07, -19, 0.59)
pt3dadd(-47.04, 915.44, -18.95, 0.59)
pt3dadd(-47.92, 914.77, -18.8, 0.59)
pt3dadd(-48.74, 914.4, -18.75, 0.59)
pt3dadd(-49.1, 914.33, -18.7, 0.59)
pt3dadd(-50.8, 913.74, -18.25, 0.59)
pt3dadd(-51.32, 913.59, -18, 0.59)
pt3dadd(-52.21, 913.52, -18, 0.59)
pt3dadd(-52.95, 913.37, -17.95, 0.59)
pt3dadd(-53.76, 913.15, -17.85, 0.59)
pt3dadd(-54.43, 912.49, -16.3, 0.59)
pt3dadd(-55.17, 912.04, -16.25, 0.59)
pt3dadd(-55.68, 911.38, -16.3, 0.59)
}
apic[67] {pt3dclear()
pt3dadd(-55.68, 911.38, -16.3, 0.59)
pt3dadd(-56.42, 911.82, -16.8, 0.59)
pt3dadd(-56.5, 912.34, -17.05, 0.59)
pt3dadd(-57.16, 912.86, -17.3, 0.59)
pt3dadd(-57.68, 912.93, -15.7, 0.59)
pt3dadd(-58.34, 912.71, -15.6, 0.59)
pt3dadd(-59.08, 912.19, -15.55, 0.59)
pt3dadd(-59.6, 911.68, -15.45, 0.59)
pt3dadd(-60.49, 911.45, -15.4, 0.59)
pt3dadd(-60.78, 910.86, -15.25, 0.59)
pt3dadd(-61.3, 910.27, -15.1, 0.59)
pt3dadd(-61.67, 909.61, -14.95, 0.59)
pt3dadd(-62.48, 909.32, -14.85, 0.59)
pt3dadd(-62.93, 908.95, -14.6, 0.59)
pt3dadd(-63.37, 907.84, -13.7, 0.59)
pt3dadd(-63.96, 907.62, -13.6, 0.59)
pt3dadd(-64.63, 908.21, -13.4, 0.59)
pt3dadd(-65.14, 908.8, -13.15, 0.59)
pt3dadd(-65.66, 909.68, -13.1, 0.59)
pt3dadd(-66.4, 910.42, -13.05, 0.59)
pt3dadd(-66.84, 910.86, -13.05, 0.59)
pt3dadd(-67.21, 910.94, -13.05, 0.59)
pt3dadd(-67.8, 911.16, -13, 0.59)
pt3dadd(-68.25, 910.86, -13, 0.59)
}
apic[68] {pt3dclear()
pt3dadd(-55.68, 911.38, -16.3, 0.59)
pt3dadd(-56.35, 911.09, -19.65, 0.59)
pt3dadd(-56.87, 910.72, -19.35, 0.59)
pt3dadd(-57.83, 910.42, -19.7, 0.59)
pt3dadd(-58.34, 910.5, -19.55, 0.59)
pt3dadd(-58.93, 910.5, -19.5, 0.59)
pt3dadd(-59.67, 910.35, -19.45, 0.59)
pt3dadd(-60.27, 909.98, -19.4, 0.59)
pt3dadd(-61, 909.91, -19.35, 0.59)
pt3dadd(-61.97, 910.2, -19.35, 0.59)
pt3dadd(-62.7, 910.86, -19.3, 0.59)
pt3dadd(-63.66, 911.31, -19.3, 0.59)
pt3dadd(-63.96, 911.68, -19.3, 0.59)
pt3dadd(-64.4, 911.9, -19.3, 0.59)
pt3dadd(-64.77, 912.19, -19.2, 0.59)
pt3dadd(-65.29, 912.41, -18.85, 0.59)
pt3dadd(-66.03, 912.78, -18.65, 0.59)
pt3dadd(-66.92, 912.78, -18.6, 0.59)
pt3dadd(-67.8, 912.78, -18.6, 0.59)
pt3dadd(-68.54, 912.71, -18.55, 0.59)
pt3dadd(-69.13, 912.49, -18.55, 0.59)
pt3dadd(-69.95, 912.71, -18.5, 0.59)
pt3dadd(-70.61, 913, -18.5, 0.59)
pt3dadd(-71.35, 913.52, -18.5, 0.59)
pt3dadd(-71.72, 913.81, -18.5, 0.59)
pt3dadd(-72.09, 914.18, -18.5, 0.59)
pt3dadd(-72.61, 914.48, -18.5, 0.59)
}
apic[69] {pt3dclear()
pt3dadd(-12.49, 911.62, -30.5, 0.59)
pt3dadd(-12.8, 911.51, -30.2, 0.59)
pt3dadd(-13.03, 912.17, -30.3, 0.59)
pt3dadd(-13.54, 912.69, -30.35, 0.59)
pt3dadd(-14.28, 913.06, -30.45, 0.59)
pt3dadd(-14.95, 912.84, -30.45, 0.59)
pt3dadd(-15.83, 912.76, -30.5, 0.59)
pt3dadd(-16.35, 912.32, -29.5, 0.59)
pt3dadd(-17.02, 911.95, -29.4, 0.59)
pt3dadd(-17.68, 911.36, -29.35, 0.59)
pt3dadd(-18.42, 910.99, -29.3, 0.59)
pt3dadd(-19.09, 910.63, -29.3, 0.59)
pt3dadd(-19.53, 910.4, -29.3, 0.59)
pt3dadd(-20.12, 910.26, -29.25, 0.59)
pt3dadd(-20.86, 910.33, -29.25, 0.59)
pt3dadd(-21.67, 910.48, -29.2, 0.59)
pt3dadd(-22.41, 910.7, -29, 0.59)
pt3dadd(-23.15, 910.77, -28.75, 0.59)
pt3dadd(-23.82, 910.77, -28.7, 0.59)
pt3dadd(-24.56, 910.4, -28.65, 0.59)
pt3dadd(-25.15, 910.11, -28.6, 0.59)
pt3dadd(-25.81, 909.81, -28.6, 0.59)
pt3dadd(-26.63, 909.74, -28.4, 0.59)
pt3dadd(-27.36, 909.74, -28.3, 0.59)
pt3dadd(-28.4, 909.96, -28.25, 0.59)
pt3dadd(-28.77, 910.26, -28.25, 0.59)
pt3dadd(-28.99, 910.48, -28.05, 0.59)
pt3dadd(-29.51, 910.85, -27.65, 0.59)
pt3dadd(-30.47, 911.29, -27.7, 0.59)
pt3dadd(-30.76, 911.36, -27.95, 0.59)
pt3dadd(-31.36, 911.07, -29.1, 0.59)
pt3dadd(-31.8, 910.7, -29.2, 0.59)
pt3dadd(-32.02, 910.11, -29.3, 0.59)
pt3dadd(-32.39, 909.74, -29.35, 0.59)
pt3dadd(-32.91, 909.52, -29.55, 0.59)
pt3dadd(-33.28, 909.52, -30.1, 0.59)
pt3dadd(-33.87, 909.81, -28.45, 0.59)
pt3dadd(-34.39, 910.11, -27.45, 0.59)
pt3dadd(-34.98, 910.18, -27, 0.59)
pt3dadd(-35.42, 910.04, -26.65, 0.59)
pt3dadd(-36.23, 910.18, -26.55, 0.59)
pt3dadd(-36.9, 910.33, -26.4, 0.59)
pt3dadd(-37.49, 910.18, -26.3, 0.59)
pt3dadd(-38.3, 910.33, -26.25, 0.59)
pt3dadd(-39.04, 910.26, -26.2, 0.59)
pt3dadd(-39.78, 909.59, -26.15, 0.59)
pt3dadd(-40, 909.45, -26.1, 0.59)
pt3dadd(-40.45, 909.15, -26.05, 0.59)
pt3dadd(-40.96, 909.15, -26, 0.59)
pt3dadd(-41.92, 908.63, -25.55, 0.59)
pt3dadd(-43.11, 908.93, -25.1, 0.59)
pt3dadd(-43.77, 908.56, -25.1, 0.59)
pt3dadd(-44.51, 908.27, -25.05, 0.59)
pt3dadd(-45.03, 907.9, -25.05, 0.59)
pt3dadd(-45.55, 907.75, -25, 0.59)
pt3dadd(-46.36, 908.19, -24.7, 0.59)
pt3dadd(-46.58, 908.56, -24.5, 0.59)
pt3dadd(-46.95, 908.93, -24.45, 0.59)
pt3dadd(-47.69, 909.45, -24.25, 0.59)
pt3dadd(-48.21, 909.45, -24.2, 0.59)
pt3dadd(-48.8, 909.52, -24.2, 0.59)
pt3dadd(-49.46, 909.3, -24.05, 0.59)
pt3dadd(-50.13, 909.45, -24.05, 0.59)
pt3dadd(-50.72, 909.3, -24.05, 0.59)
pt3dadd(-51.9, 909.52, -24, 0.59)
}
}
proc shape3d_48() {
apic[69] { pt3dadd(-52.57, 909.74, -24, 0.59)
pt3dadd(-52.79, 909.81, -23.8, 0.59)
pt3dadd(-53.31, 910.11, -23.5, 0.59)
pt3dadd(-53.53, 910.55, -23.15, 0.59)
pt3dadd(-53.82, 911.51, -24.45, 0.59)
pt3dadd(-54.71, 911.81, -24.6, 0.59)
pt3dadd(-55.3, 911.81, -24.6, 0.59)
pt3dadd(-55.89, 911.07, -22.45, 0.59)
pt3dadd(-56.26, 910.63, -22.4, 0.59)
pt3dadd(-56.78, 910.48, -22.4, 0.59)
pt3dadd(-57.52, 910.26, -22.35, 0.59)
pt3dadd(-58.04, 910.26, -22.35, 0.59)
pt3dadd(-58.85, 910.48, -22.25, 0.59)
pt3dadd(-59.51, 910.33, -22.2, 0.59)
pt3dadd(-60.03, 910.33, -22.15, 0.59)
pt3dadd(-60.99, 910.33, -22.15, 0.59)
pt3dadd(-61.74, 910.58, -22.1, 0.59)
}
apic[70] {pt3dclear()
pt3dadd(28.46, 746.16, -36.45, 0.81)
pt3dadd(27.75, 746.67, -35.9, 0.81)
pt3dadd(27.38, 747.26, -36.15, 0.81)
pt3dadd(26.87, 748.3, -36.5, 0.81)
pt3dadd(26.72, 749.33, -36.7, 0.96)
pt3dadd(26.42, 750.14, -37.05, 0.96)
pt3dadd(26.2, 750.73, -37.65, 0.96)
pt3dadd(25.98, 751.76, -37.75, 0.96)
pt3dadd(25.76, 752.65, -37.85, 0.96)
pt3dadd(25.24, 753.68, -37.95, 0.96)
pt3dadd(25.09, 754.71, -38.05, 0.96)
pt3dadd(25.09, 755.38, -38.3, 0.96)
pt3dadd(24.72, 756.63, -38.35, 0.96)
pt3dadd(24.72, 757.59, -38.4, 0.96)
pt3dadd(24.72, 758.18, -38.4, 0.96)
pt3dadd(24.5, 759.29, -38.4, 0.96)
pt3dadd(24.5, 760.1, -38.4, 0.96)
pt3dadd(24.8, 760.91, -38.45, 0.96)
pt3dadd(24.43, 761.79, -38.45, 0.96)
pt3dadd(24.65, 762.68, -38.45, 0.96)
pt3dadd(24.87, 763.86, -38.45, 0.96)
pt3dadd(24.87, 764.52, -38.7, 0.96)
pt3dadd(24.28, 765.18, -39, 0.96)
pt3dadd(23.76, 765.55, -39.25, 0.96)
pt3dadd(23.47, 765.85, -39.9, 0.96)
pt3dadd(22.8, 766.44, -40.3, 0.96)
pt3dadd(22.43, 766.88, -40.35, 0.96)
pt3dadd(22.06, 767.62, -40.4, 0.96)
pt3dadd(22.28, 768.28, -40.5, 0.96)
pt3dadd(22.87, 768.95, -40.55, 0.96)
pt3dadd(23.39, 769.83, -40.55, 0.96)
pt3dadd(23.39, 770.64, -41.05, 0.96)
pt3dadd(23.91, 771.6, -41.45, 0.96)
pt3dadd(24.57, 772.56, -41.5, 0.96)
pt3dadd(25.24, 773.08, -41.55, 0.96)
pt3dadd(25.61, 773.81, -41.55, 0.96)
pt3dadd(26.05, 774.85, -41.85, 0.96)
pt3dadd(25.9, 775.44, -42, 0.96)
pt3dadd(25.61, 775.88, -42.3, 0.96)
pt3dadd(25.24, 776.1, -42.55, 0.96)
pt3dadd(24.72, 776.39, -42.85, 0.96)
pt3dadd(23.91, 776.84, -43.3, 0.96)
pt3dadd(23.32, 777.13, -43.5, 0.96)
pt3dadd(22.73, 777.43, -43.6, 0.96)
pt3dadd(22.21, 777.8, -43.6, 0.96)
pt3dadd(21.77, 778.31, -43.6, 0.96)
pt3dadd(21.32, 778.83, -43.65, 0.96)
}
apic[71] {pt3dclear()
pt3dadd(21.32, 778.83, -43.65, 0.89)
pt3dadd(20.74, 778.71, -44.75, 0.89)
pt3dadd(20, 778.78, -44.9, 0.89)
pt3dadd(19.41, 779.45, -44.9, 0.89)
pt3dadd(18.89, 779.74, -44.9, 0.89)
pt3dadd(18.3, 780.19, -44.9, 0.89)
pt3dadd(17.93, 780.92, -45.1, 0.89)
pt3dadd(17.64, 781.88, -45.45, 0.89)
pt3dadd(17.49, 782.84, -45.55, 0.89)
pt3dadd(17.56, 783.73, -45.55, 0.89)
pt3dadd(17.49, 784.76, -45.65, 0.89)
pt3dadd(17.19, 785.42, -45.75, 0.89)
pt3dadd(16.9, 786.09, -45.9, 0.89)
pt3dadd(16.67, 786.6, -46.3, 0.89)
pt3dadd(16.08, 787.19, -46.4, 0.89)
pt3dadd(15.64, 787.49, -46.5, 0.89)
pt3dadd(15.05, 787.71, -46.6, 0.89)
pt3dadd(14.53, 788.45, -46.65, 0.89)
pt3dadd(13.79, 789.11, -46.65, 0.89)
pt3dadd(13.5, 789.77, -46.9, 0.89)
pt3dadd(13.5, 790.66, -47.15, 0.89)
pt3dadd(13.13, 791.32, -47.45, 0.89)
pt3dadd(12.76, 791.62, -47.8, 0.89)
pt3dadd(12.09, 792.06, -48.15, 0.89)
pt3dadd(11.21, 792.5, -48.7, 0.89)
pt3dadd(10.47, 792.72, -48.9, 0.89)
pt3dadd(10.02, 792.8, -48.9, 0.89)
pt3dadd(9.43, 793.31, -49.05, 0.89)
pt3dadd(8.77, 793.46, -49.1, 0.89)
pt3dadd(8.17, 793.76, -49.1, 0.89)
pt3dadd(7.44, 794.05, -49.1, 0.89)
pt3dadd(6.99, 794.27, -49.1, 0.89)
pt3dadd(6.11, 794.86, -49.15, 0.89)
pt3dadd(5.88, 795.6, -49.5, 0.89)
pt3dadd(5.74, 796.12, -49.75, 0.89)
pt3dadd(5.96, 796.85, -50, 0.89)
pt3dadd(5.74, 797.66, -49.35, 0.89)
pt3dadd(5.14, 798.47, -49.2, 0.89)
pt3dadd(4.78, 799.36, -49.1, 0.89)
pt3dadd(4.33, 799.8, -49, 0.89)
pt3dadd(3.59, 800.32, -48.9, 0.89)
pt3dadd(3.22, 800.98, -48.85, 0.89)
pt3dadd(3, 801.35, -48.45, 0.89)
pt3dadd(2.48, 801.87, -48.25, 0.89)
pt3dadd(2.11, 802.97, -49.8, 0.89)
pt3dadd(2.41, 803.64, -50, 0.89)
pt3dadd(2.56, 804.67, -50.4, 0.89)
pt3dadd(2.71, 805.55, -50.6, 0.89)
pt3dadd(3, 806.37, -50.9, 0.89)
pt3dadd(3.22, 807.32, -50.95, 0.89)
pt3dadd(3.15, 808.14, -51, 0.89)
pt3dadd(3, 809.02, -51.55, 0.89)
pt3dadd(2.48, 809.46, -51.75, 0.89)
pt3dadd(2.04, 809.68, -51.9, 0.89)
pt3dadd(1.67, 810.05, -51.95, 0.89)
pt3dadd(1.15, 810.42, -52.4, 0.89)
pt3dadd(0.64, 810.86, -52.5, 0.89)
pt3dadd(0.27, 811.16, -52.55, 0.89)
pt3dadd(-0.25, 811.45, -52.55, 0.89)
pt3dadd(-1.6, 811.46, -52.6, 0.89)
pt3dadd(-2.27, 811.61, -52.6, 0.89)
pt3dadd(-3.01, 811.68, -53.25, 0.89)
pt3dadd(-3.75, 811.31, -53.3, 0.74)
pt3dadd(-4.26, 811.24, -53.3, 0.74)
pt3dadd(-5, 811.24, -53.3, 0.74)
pt3dadd(-5.74, 811.68, -53.3, 0.74)
pt3dadd(-6.19, 811.97, -53.3, 0.74)
pt3dadd(-6.63, 812.49, -53.3, 0.74)
pt3dadd(-6.85, 812.79, -53.75, 0.74)
pt3dadd(-7.44, 813.45, -54, 0.74)
pt3dadd(-7.89, 814.26, -54.1, 0.89)
pt3dadd(-8.03, 815.15, -54.1, 0.89)
pt3dadd(-7.89, 815.81, -54.3, 0.89)
pt3dadd(-7.89, 816.33, -54.6, 0.89)
pt3dadd(-7.89, 816.99, -55.1, 0.89)
pt3dadd(-8.18, 817.87, -53.9, 0.89)
pt3dadd(-8.33, 818.46, -54.7, 0.89)
pt3dadd(-8.7, 819.05, -55.15, 0.89)
pt3dadd(-9.14, 819.64, -55.3, 0.89)
pt3dadd(-9.29, 820.6, -55.4, 0.89)
pt3dadd(-9.14, 821.34, -55.5, 0.89)
pt3dadd(-9.29, 822.08, -56.2, 0.89)
pt3dadd(-9.51, 823.04, -56.5, 0.89)
pt3dadd(-9.66, 823.77, -56.8, 0.89)
pt3dadd(-10.03, 824.22, -56.85, 0.89)
pt3dadd(-10.77, 824.81, -56.9, 0.89)
pt3dadd(-11.51, 825.47, -57.8, 0.89)
pt3dadd(-11.73, 826.36, -58, 0.89)
pt3dadd(-12.25, 827.17, -59, 0.89)
pt3dadd(-12.69, 827.9, -59, 0.89)
pt3dadd(-13.36, 828.05, -59, 0.89)
pt3dadd(-14.32, 827.83, -59, 0.89)
pt3dadd(-15.2, 827.54, -59.2, 0.89)
pt3dadd(-16.02, 827.39, -59.35, 0.89)
pt3dadd(-16.68, 827.17, -59.75, 0.89)
pt3dadd(-17.57, 827.39, -59.8, 0.89)
pt3dadd(-18.16, 827.68, -59.8, 0.89)
pt3dadd(-18.82, 827.9, -60.1, 0.89)
pt3dadd(-19.05, 828.05, -60.5, 0.89)
pt3dadd(-19.49, 828.49, -60.7, 0.89)
pt3dadd(-19.93, 829.3, -60.85, 0.89)
pt3dadd(-19.93, 829.97, -61.1, 0.89)
pt3dadd(-19.93, 831, -61.15, 0.89)
pt3dadd(-20.08, 832.25, -61.5, 0.89)
pt3dadd(-20.45, 832.84, -61.55, 0.89)
pt3dadd(-20.75, 833.36, -61.6, 0.89)
pt3dadd(-21.26, 833.73, -61.6, 0.89)
pt3dadd(-21.71, 834.32, -61.8, 0.89)
pt3dadd(-22.22, 834.84, -61.85, 0.89)
pt3dadd(-22.74, 835.35, -61.9, 0.89)
pt3dadd(-23.78, 836.24, -62.35, 0.89)
pt3dadd(-24.44, 836.83, -62.45, 0.89)
pt3dadd(-25.25, 837.49, -62.45, 0.89)
pt3dadd(-25.77, 838.01, -62.5, 0.89)
pt3dadd(-26.59, 838.23, -62.85, 0.89)
pt3dadd(-27.55, 838.52, -62.9, 0.89)
pt3dadd(-28.51, 838.6, -62.9, 0.89)
pt3dadd(-29.39, 838.3, -62.85, 0.89)
pt3dadd(-30.13, 838.3, -62.8, 0.89)
pt3dadd(-30.72, 838.6, -62.9, 0.89)
pt3dadd(-31.02, 839.33, -63.2, 0.89)
pt3dadd(-31.24, 839.7, -63.8, 0.89)
pt3dadd(-31.46, 840.44, -64.05, 0.89)
pt3dadd(-31.54, 841.25, -64.1, 0.89)
pt3dadd(-31.83, 842.51, -64.2, 0.89)
pt3dadd(-31.46, 843.17, -64.2, 0.89)
pt3dadd(-31.09, 843.69, -64.25, 0.89)
pt3dadd(-30.58, 844.28, -64.25, 0.89)
pt3dadd(-30.2, 845.19, -65, 0.89)
pt3dadd(-30.13, 846, -65.05, 0.89)
pt3dadd(-29.98, 846.81, -65.05, 0.89)
pt3dadd(-30.2, 847.47, -65.05, 0.89)
pt3dadd(-30.65, 848.14, -65.05, 0.89)
pt3dadd(-31.09, 848.65, -65.5, 0.89)
pt3dadd(-31.39, 849.09, -65.75, 0.89)
pt3dadd(-31.53, 849.76, -66.05, 0.89)
}
}
proc shape3d_49() {
apic[71] { pt3dadd(-32.05, 850.13, -66.15, 0.89)
pt3dadd(-32.72, 850.27, -66.2, 0.89)
pt3dadd(-33.38, 850.2, -66.25, 0.89)
pt3dadd(-34.05, 849.83, -66.25, 0.89)
pt3dadd(-34.71, 849.61, -66.3, 0.89)
pt3dadd(-35.6, 849.83, -66.35, 0.89)
pt3dadd(-35.97, 850.5, -66.35, 0.89)
pt3dadd(-36.12, 851.01, -66.35, 0.89)
pt3dadd(-36.56, 851.68, -66.6, 0.89)
pt3dadd(-36.86, 852.86, -66.75, 0.89)
pt3dadd(-37.15, 853.59, -66.75, 0.89)
pt3dadd(-37.23, 854.4, -66.8, 0.89)
pt3dadd(-37, 855.29, -67, 0.89)
pt3dadd(-36.56, 856.03, -67.15, 0.89)
pt3dadd(-36.34, 856.62, -67.25, 0.89)
pt3dadd(-36.26, 857.65, -67.25, 0.89)
pt3dadd(-36.41, 858.17, -67.95, 0.89)
pt3dadd(-36.49, 858.9, -68.05, 0.89)
pt3dadd(-36.71, 859.27, -68.2, 0.89)
pt3dadd(-37, 859.86, -68.8, 0.89)
pt3dadd(-37.45, 860.45, -69.5, 0.89)
pt3dadd(-37.74, 861.19, -69.55, 0.89)
pt3dadd(-38.11, 861.85, -69.75, 0.89)
pt3dadd(-38.33, 862.44, -69.85, 0.89)
pt3dadd(-38.85, 862.66, -70.65, 0.89)
pt3dadd(-39.81, 863.03, -70.9, 0.89)
pt3dadd(-40.7, 863.18, -71.05, 0.89)
pt3dadd(-41.66, 863.03, -71.05, 0.89)
pt3dadd(-42.33, 863.11, -71.1, 0.89)
pt3dadd(-43.06, 863.11, -71.45, 0.89)
pt3dadd(-43.66, 862.89, -71.8, 0.89)
pt3dadd(-44.47, 862.59, -71.95, 0.89)
pt3dadd(-44.91, 862.74, -72.05, 0.89)
pt3dadd(-45.8, 862.96, -72.3, 0.89)
pt3dadd(-46.09, 863.55, -72.5, 0.89)
pt3dadd(-46.09, 864.29, -72.9, 0.89)
pt3dadd(-45.87, 864.8, -73.1, 0.89)
pt3dadd(-45.95, 865.54, -73.1, 0.89)
pt3dadd(-45.8, 866.28, -73.15, 0.89)
pt3dadd(-45.65, 867.24, -73.4, 0.89)
pt3dadd(-45.36, 868.42, -73.5, 0.89)
pt3dadd(-45.21, 869.3, -73.6, 0.89)
pt3dadd(-45.06, 869.89, -73.8, 0.89)
pt3dadd(-44.62, 870.55, -73.95, 0.89)
pt3dadd(-44.32, 871.22, -74.05, 0.89)
pt3dadd(-44.25, 871.66, -74.3, 0.89)
pt3dadd(-44.17, 872.32, -74.85, 0.89)
pt3dadd(-44.62, 872.99, -74.95, 0.89)
pt3dadd(-45.28, 873.43, -74.95, 0.89)
pt3dadd(-46.09, 873.65, -75, 0.89)
pt3dadd(-46.76, 873.87, -75.3, 0.89)
pt3dadd(-47.2, 874.17, -75.65, 0.89)
pt3dadd(-48.02, 874.46, -75.95, 0.89)
pt3dadd(-48.68, 874.76, -76.35, 0.89)
pt3dadd(-49.12, 874.98, -76.65, 0.89)
pt3dadd(-49.42, 875.2, -76.75, 0.89)
pt3dadd(-49.57, 875.72, -76.8, 0.89)
pt3dadd(-49.05, 876.38, -76.8, 0.89)
pt3dadd(-48.36, 877.54, -76.95, 0.89)
pt3dadd(-47.77, 877.91, -77.05, 0.89)
pt3dadd(-47.32, 878.2, -77.15, 0.89)
pt3dadd(-46.73, 878.57, -77.25, 0.89)
pt3dadd(-46.14, 879.46, -77.35, 0.89)
pt3dadd(-45.99, 880.19, -77.35, 0.89)
pt3dadd(-46.29, 880.64, -77.4, 0.89)
pt3dadd(-46.29, 881.52, -77.75, 0.89)
pt3dadd(-46.07, 882.33, -77.8, 0.89)
pt3dadd(-45.99, 883.14, -77.8, 0.89)
pt3dadd(-46.14, 883.59, -78.05, 0.89)
pt3dadd(-46.21, 884.25, -78.2, 0.89)
pt3dadd(-46.21, 884.99, -78.45, 0.89)
pt3dadd(-46.29, 885.58, -78.8, 0.89)
pt3dadd(-46.73, 886.17, -79.15, 0.89)
pt3dadd(-47.25, 886.31, -79.25, 0.89)
pt3dadd(-47.84, 886.17, -79.65, 0.89)
pt3dadd(-48.73, 886.17, -79.95, 0.89)
pt3dadd(-49.76, 886.17, -80.35, 0.89)
pt3dadd(-50.35, 886.24, -80.55, 0.89)
pt3dadd(-50.87, 886.46, -80.7, 0.89)
pt3dadd(-51.31, 886.9, -80.85, 0.89)
pt3dadd(-51.39, 887.35, -80.95, 0.89)
pt3dadd(-51.39, 887.72, -81, 0.89)
pt3dadd(-51.31, 888.23, -81.05, 0.89)
pt3dadd(-51.61, 888.9, -81.15, 0.89)
pt3dadd(-51.9, 890.22, -81.5, 0.89)
pt3dadd(-52.13, 891.18, -81.65, 0.89)
pt3dadd(-52.42, 891.48, -81.8, 0.89)
pt3dadd(-53.01, 891.62, -81.95, 0.89)
pt3dadd(-53.83, 891.55, -82.75, 0.89)
pt3dadd(-54.86, 891.55, -82.9, 0.89)
pt3dadd(-55.16, 892.14, -83.5, 0.89)
pt3dadd(-56.12, 892.51, -83.8, 0.74)
pt3dadd(-56.86, 893.03, -83.8, 0.74)
pt3dadd(-57.59, 893.98, -84.1, 0.74)
pt3dadd(-58.11, 895.02, -84.15, 0.74)
pt3dadd(-58.33, 895.75, -84.15, 0.74)
pt3dadd(-58.63, 896.86, -84.2, 0.74)
pt3dadd(-58.56, 897.82, -84.25, 0.74)
pt3dadd(-58.41, 899, -84.5, 0.74)
pt3dadd(-58.33, 899.96, -85.1, 0.74)
pt3dadd(-58.04, 900.62, -85.6, 0.74)
pt3dadd(-58.63, 901.21, -85.65, 0.74)
pt3dadd(-59.52, 901.36, -85.65, 0.74)
pt3dadd(-60.33, 901.21, -85.65, 0.74)
pt3dadd(-60.48, 900.4, -86.15, 0.74)
pt3dadd(-60.77, 899.74, -88.2, 0.74)
pt3dadd(-61.51, 900.4, -88.95, 0.74)
pt3dadd(-62.18, 901.43, -88.95, 0.74)
pt3dadd(-62.62, 902.1, -89, 0.74)
pt3dadd(-62.99, 902.98, -89.15, 0.74)
pt3dadd(-63.36, 903.5, -89.85, 0.74)
pt3dadd(-63.21, 904.16, -90.65, 0.74)
pt3dadd(-63.88, 904.75, -90.7, 0.74)
pt3dadd(-64.62, 905.49, -90.85, 0.74)
pt3dadd(-65.21, 905.93, -91, 0.74)
pt3dadd(-66.39, 906.3, -91.05, 0.74)
pt3dadd(-67.57, 906.52, -91.35, 0.74)
pt3dadd(-68.76, 906.82, -91.4, 0.74)
pt3dadd(-69.86, 907.04, -91.4, 0.74)
pt3dadd(-71.12, 906.89, -91.4, 0.74)
pt3dadd(-72.23, 906, -91.45, 0.74)
pt3dadd(-73.04, 905.41, -91.45, 0.74)
pt3dadd(-73.41, 904.38, -91.45, 0.74)
pt3dadd(-73.41, 903.13, -91.5, 0.74)
pt3dadd(-73.85, 902.32, -91.55, 0.74)
pt3dadd(-74.22, 901.28, -91.6, 0.74)
pt3dadd(-75.04, 900.99, -91.6, 0.74)
pt3dadd(-75.92, 900.99, -91.7, 0.74)
pt3dadd(-76.81, 901.28, -91.85, 0.74)
pt3dadd(-77.18, 902.1, -92.8, 0.74)
pt3dadd(-78.14, 902.39, -92.85, 0.74)
pt3dadd(-79.32, 902.69, -93, 0.74)
pt3dadd(-80.36, 902.83, -93.05, 0.74)
pt3dadd(-81.69, 902.76, -93.05, 0.74)
pt3dadd(-82.8, 902.32, -93.05, 0.74)
pt3dadd(-83.61, 902.32, -93.05, 0.74)
pt3dadd(-84.2, 902.46, -93.05, 0.74)
pt3dadd(-85.02, 902.76, -93.05, 0.74)
pt3dadd(-86.05, 903.05, -93.1, 0.74)
pt3dadd(-86.64, 903.35, -93.1, 0.74)
pt3dadd(-87.38, 903.5, -92.25, 0.74)
pt3dadd(-88.34, 903.79, -92.35, 0.74)
pt3dadd(-89.45, 903.64, -92.4, 0.74)
pt3dadd(-90.56, 903.35, -92.4, 0.74)
}
apic[72] {pt3dclear()
pt3dadd(-90.56, 903.35, -92.4, 0.74)
pt3dadd(-91.15, 903.5, -92.45, 0.74)
pt3dadd(-91.89, 903.5, -92.2, 0.74)
pt3dadd(-92.7, 903.5, -92, 0.74)
pt3dadd(-93.51, 904.01, -91.85, 0.74)
pt3dadd(-94.18, 904.38, -91.8, 0.74)
pt3dadd(-94.7, 904.75, -91.7, 0.74)
pt3dadd(-95.14, 905.05, -91.7, 0.74)
pt3dadd(-95.73, 905.34, -91.65, 0.74)
pt3dadd(-96.25, 905.41, -91.65, 0.74)
pt3dadd(-96.77, 905.41, -91.6, 0.74)
pt3dadd(-96.78, 905.82, -92.9, 0.74)
pt3dadd(-97.37, 906.26, -93.05, 0.74)
pt3dadd(-98.11, 906.78, -93.1, 0.74)
pt3dadd(-98.7, 906.93, -93.15, 0.74)
pt3dadd(-99.59, 907.37, -93.15, 0.74)
pt3dadd(-100.4, 907.52, -93.35, 0.59)
pt3dadd(-100.77, 907.89, -93.6, 0.59)
pt3dadd(-101.36, 908.26, -94, 0.59)
pt3dadd(-101.95, 908.48, -94.3, 0.59)
pt3dadd(-102.76, 908.48, -94.65, 0.59)
pt3dadd(-103.65, 907.96, -94.85, 0.59)
pt3dadd(-104.24, 907.15, -94.9, 0.59)
pt3dadd(-104.54, 906.49, -92.65, 0.59)
pt3dadd(-104.98, 905.97, -93.55, 0.59)
pt3dadd(-105.57, 905.6, -94.25, 0.59)
pt3dadd(-106.39, 905.45, -94.3, 0.59)
pt3dadd(-107.27, 905.31, -94.35, 0.59)
pt3dadd(-107.94, 905.38, -94.4, 0.59)
pt3dadd(-108.68, 905.38, -94.4, 0.59)
pt3dadd(-109.34, 905.31, -94.45, 0.59)
pt3dadd(-109.79, 905.38, -94.45, 0.59)
}
apic[73] {pt3dclear()
pt3dadd(-90.56, 903.35, -92.4, 0.59)
pt3dadd(-90.79, 902.8, -93.4, 0.59)
pt3dadd(-91.53, 902.43, -92.45, 0.59)
pt3dadd(-92.34, 902.5, -92.3, 0.59)
pt3dadd(-93.08, 902.58, -92.15, 0.59)
pt3dadd(-93.97, 902.8, -92.1, 0.59)
pt3dadd(-94.49, 902.95, -92, 0.59)
pt3dadd(-95.15, 903.31, -91.9, 0.59)
pt3dadd(-95.97, 903.68, -91.7, 0.59)
pt3dadd(-96.41, 903.61, -91.55, 0.59)
pt3dadd(-96.93, 903.9, -93.35, 0.59)
pt3dadd(-97.74, 904.13, -93.45, 0.59)
pt3dadd(-98.4, 903.9, -93.55, 0.59)
pt3dadd(-99.07, 903.83, -93.65, 0.59)
pt3dadd(-99.66, 903.76, -94.7, 0.59)
pt3dadd(-100.33, 903.76, -94.75, 0.59)
pt3dadd(-101.06, 903.9, -94.75, 0.59)
pt3dadd(-101.66, 904.2, -94.75, 0.59)
pt3dadd(-102.54, 904.72, -94.75, 0.59)
pt3dadd(-102.03, 905.31, -94.75, 0.59)
pt3dadd(-102.17, 906.19, -94.75, 0.59)
pt3dadd(-102.54, 906.41, -94.75, 0.59)
pt3dadd(-103.06, 906.63, -94.75, 0.59)
}
apic[74] {pt3dclear()
pt3dadd(21.32, 778.83, -43.65, 0.59)
}
}
proc shape3d_50() {
apic[74] { pt3dadd(21.62, 779.6, -44.4, 0.59)
pt3dadd(21.62, 780.48, -44.45, 0.59)
pt3dadd(21.84, 780.85, -44.45, 0.59)
pt3dadd(22.28, 781.51, -44.5, 0.59)
pt3dadd(22.36, 782.03, -44.55, 0.59)
pt3dadd(22.43, 782.47, -44.75, 0.59)
pt3dadd(22.8, 782.77, -45.15, 0.59)
pt3dadd(23.17, 783.21, -45.4, 0.59)
pt3dadd(23.76, 783.43, -45.45, 0.59)
pt3dadd(24.2, 784.02, -46.35, 0.59)
pt3dadd(24.87, 783.8, -46.35, 0.59)
pt3dadd(25.68, 782.77, -46.35, 0.59)
pt3dadd(26.2, 782.47, -46.35, 0.59)
pt3dadd(27.01, 782.32, -46.4, 0.59)
pt3dadd(26.79, 782.91, -46.4, 0.59)
pt3dadd(26.13, 783.36, -46.4, 0.59)
pt3dadd(25.9, 783.8, -46.85, 0.59)
pt3dadd(25.61, 784.32, -47.25, 0.59)
pt3dadd(25.68, 784.61, -47.4, 0.59)
pt3dadd(26.2, 785.2, -47.65, 0.59)
pt3dadd(26.27, 785.72, -47.7, 0.59)
pt3dadd(26.72, 786.31, -47.75, 0.59)
pt3dadd(27.01, 787.04, -47.8, 0.59)
pt3dadd(26.94, 788.3, -47.8, 0.59)
pt3dadd(26.94, 788.67, -47.85, 0.59)
pt3dadd(26.87, 789.4, -47.85, 0.59)
pt3dadd(26.79, 790.22, -47.85, 0.59)
pt3dadd(26.57, 790.29, -47.95, 0.59)
pt3dadd(25.83, 790.29, -48.45, 0.59)
pt3dadd(24.72, 790.29, -48.65, 0.59)
pt3dadd(24.13, 789.63, -48.7, 0.59)
pt3dadd(23.47, 788.96, -48.9, 0.59)
pt3dadd(23.54, 788.59, -48.95, 0.59)
pt3dadd(25.09, 788.52, -49, 0.59)
pt3dadd(25.98, 788.67, -49.05, 0.59)
pt3dadd(26.72, 788.52, -49.95, 0.59)
pt3dadd(27.75, 788.45, -51.65, 0.59)
pt3dadd(28.86, 789.11, -51.7, 0.59)
pt3dadd(29.6, 789.7, -51.9, 0.59)
pt3dadd(30.41, 790.29, -52.4, 0.59)
pt3dadd(31.6, 790.95, -52.6, 0.59)
pt3dadd(32.93, 791.99, -52.65, 0.59)
pt3dadd(34.03, 792.72, -52.65, 0.59)
pt3dadd(34.77, 793.83, -52.65, 0.59)
pt3dadd(35.59, 794.42, -52.65, 0.59)
pt3dadd(36.55, 794.57, -52.65, 0.59)
pt3dadd(37.06, 794.2, -53.45, 0.59)
pt3dadd(38.03, 794.05, -53.5, 0.74)
pt3dadd(38.39, 793.98, -53.5, 0.74)
pt3dadd(39.21, 794.35, -53.5, 0.74)
pt3dadd(40.24, 795.01, -53.5, 0.74)
pt3dadd(41.35, 795.23, -53.55, 0.74)
pt3dadd(42.39, 795.6, -53.6, 0.74)
pt3dadd(43.64, 796.34, -54.6, 0.74)
pt3dadd(44.46, 796.34, -54.65, 0.74)
pt3dadd(45.27, 796.93, -54.65, 0.74)
pt3dadd(45.71, 797.89, -54.65, 0.74)
pt3dadd(46.67, 798.47, -54.65, 0.74)
pt3dadd(47.49, 799.07, -54.7, 0.74)
pt3dadd(48.74, 799.29, -55.4, 0.74)
pt3dadd(50, 799.21, -55.4, 0.74)
pt3dadd(51.03, 799.65, -55.45, 0.74)
pt3dadd(51.85, 800.39, -55.45, 0.74)
pt3dadd(52.14, 801.2, -55.45, 0.74)
pt3dadd(52.81, 801.42, -55.45, 0.74)
pt3dadd(54.06, 800.98, -55.45, 0.74)
pt3dadd(55.32, 800.32, -55.45, 0.74)
pt3dadd(56.06, 800.02, -55.45, 0.74)
pt3dadd(56.87, 800.17, -55.65, 0.74)
pt3dadd(57.61, 800.76, -55.65, 0.74)
pt3dadd(58.2, 801.57, -55.9, 0.74)
pt3dadd(58.57, 802.6, -56.35, 0.74)
pt3dadd(58.87, 803.64, -56.4, 0.74)
pt3dadd(59.31, 804.52, -56.4, 0.74)
pt3dadd(60.2, 805.26, -56.5, 0.74)
pt3dadd(60.86, 805.85, -56.5, 0.74)
pt3dadd(61.82, 806.37, -56.5, 0.74)
pt3dadd(62.42, 806.88, -56.5, 0.74)
pt3dadd(63.3, 807.1, -56.5, 0.74)
pt3dadd(64.12, 807.1, -56.55, 0.74)
pt3dadd(65.59, 806.81, -56.55, 0.74)
pt3dadd(66.33, 806.81, -56.55, 0.74)
pt3dadd(67, 806.96, -56.55, 0.74)
pt3dadd(68.25, 807.32, -56.55, 0.74)
pt3dadd(69.26, 807.12, -57.5, 0.74)
pt3dadd(70.52, 806.68, -57.55, 0.74)
pt3dadd(71.55, 806.53, -57.55, 0.74)
pt3dadd(72.66, 806.83, -57.55, 0.74)
pt3dadd(73.62, 807.12, -58.15, 0.74)
pt3dadd(74.43, 807.56, -58.65, 0.74)
pt3dadd(74.8, 808.23, -59.15, 0.74)
pt3dadd(74.8, 809.11, -59.15, 0.74)
pt3dadd(74.88, 809.48, -59.55, 0.74)
pt3dadd(75.69, 809.85, -59.95, 0.74)
pt3dadd(76.58, 810.37, -60.05, 0.74)
pt3dadd(77.24, 810.81, -60.05, 0.74)
pt3dadd(78.13, 811.1, -60.1, 0.74)
pt3dadd(78.87, 811.62, -60.1, 0.74)
pt3dadd(78.94, 812.36, -60.5, 0.74)
pt3dadd(79.39, 813.24, -60.65, 0.74)
pt3dadd(80.05, 813.61, -59.05, 0.74)
pt3dadd(80.86, 814.28, -58.8, 0.74)
pt3dadd(81.9, 814.87, -59.1, 0.74)
pt3dadd(82.86, 815.38, -59.2, 0.74)
pt3dadd(83.67, 815.82, -59.25, 0.74)
pt3dadd(84.63, 816.05, -59.3, 0.74)
pt3dadd(85.37, 816.78, -59.3, 0.74)
pt3dadd(86.11, 817.59, -59.35, 0.74)
pt3dadd(86.85, 818.04, -59.35, 0.74)
pt3dadd(87.96, 818.04, -59.45, 0.74)
pt3dadd(88.4, 817.67, -59.55, 0.74)
pt3dadd(89.22, 816.93, -60, 0.74)
pt3dadd(90.47, 816.56, -60.05, 0.74)
pt3dadd(91.29, 816.56, -60.2, 0.74)
pt3dadd(92.1, 817.08, -61.6, 0.74)
pt3dadd(92.69, 817.67, -61.85, 0.74)
pt3dadd(93.36, 818.55, -62.15, 0.74)
pt3dadd(93.43, 819.29, -62.3, 0.74)
pt3dadd(93.58, 820.32, -62.4, 0.74)
pt3dadd(93.72, 821.06, -62.45, 0.74)
pt3dadd(93.95, 821.95, -62.5, 0.74)
pt3dadd(94.32, 822.54, -62.5, 0.74)
pt3dadd(94.69, 823.57, -62.5, 0.74)
pt3dadd(95.28, 824.6, -62.55, 0.74)
pt3dadd(96.39, 825.04, -62.55, 0.74)
pt3dadd(97.49, 825.71, -62.55, 0.74)
pt3dadd(98.23, 825.85, -62.55, 0.74)
pt3dadd(98.97, 826.07, -63.45, 0.67)
pt3dadd(100.08, 826.22, -63.45, 0.67)
pt3dadd(100.38, 827.18, -63.5, 0.67)
pt3dadd(100.3, 828.43, -63.5, 0.67)
pt3dadd(100.38, 829.17, -63.5, 0.67)
pt3dadd(100.45, 830.06, -63.55, 0.67)
pt3dadd(100.45, 830.5, -63.75, 0.67)
pt3dadd(101.19, 830.87, -64.05, 0.67)
pt3dadd(102.3, 830.87, -64.15, 0.67)
pt3dadd(103.26, 831.16, -64.15, 0.67)
pt3dadd(104.59, 831.09, -64.2, 0.67)
pt3dadd(105.18, 831.16, -64.25, 0.67)
pt3dadd(105.92, 831.24, -64.25, 0.67)
pt3dadd(106.59, 831.97, -64.95, 0.67)
pt3dadd(107.4, 832.79, -64.95, 0.67)
pt3dadd(108.14, 833.38, -64.95, 0.67)
pt3dadd(109.25, 834.11, -64.95, 0.67)
pt3dadd(109.84, 835, -64.95, 0.67)
pt3dadd(110.13, 835.81, -65.6, 0.67)
pt3dadd(110.35, 836.55, -65.8, 0.67)
pt3dadd(110.95, 837.36, -65.85, 0.67)
pt3dadd(111.61, 838.1, -65.9, 0.67)
pt3dadd(112.28, 838.76, -65.9, 0.67)
pt3dadd(113.24, 839.57, -65.9, 0.67)
pt3dadd(113.42, 840.55, -66.2, 0.67)
pt3dadd(114.01, 841.07, -66.25, 0.67)
pt3dadd(114.83, 841.43, -66.25, 0.67)
pt3dadd(115.27, 842.02, -66.3, 0.67)
pt3dadd(115.93, 842.76, -66.3, 0.67)
pt3dadd(116.6, 843.5, -66.3, 0.67)
pt3dadd(117.34, 843.57, -66.7, 0.67)
pt3dadd(118.15, 843.2, -66.75, 0.67)
pt3dadd(118.67, 842.69, -66.75, 0.67)
pt3dadd(119.04, 842.02, -66.8, 0.67)
pt3dadd(119.63, 841.07, -66.8, 0.67)
pt3dadd(119.93, 840.33, -66.8, 0.81)
pt3dadd(120.44, 839.66, -66.8, 0.81)
pt3dadd(120.89, 839.3, -66.95, 0.81)
pt3dadd(121.77, 838.85, -67.4, 0.81)
pt3dadd(122.59, 839.37, -67.45, 0.81)
pt3dadd(123.18, 840.33, -67.5, 0.81)
pt3dadd(123.18, 840.99, -67.85, 0.81)
pt3dadd(123.47, 842.02, -68.25, 0.81)
pt3dadd(123.92, 842.76, -68.7, 0.81)
pt3dadd(124.14, 843.35, -69.25, 0.81)
pt3dadd(124.36, 844.09, -69.5, 0.81)
pt3dadd(125.03, 844.46, -69.75, 0.81)
pt3dadd(125.76, 844.46, -69.75, 0.81)
pt3dadd(127.02, 844.09, -69.75, 0.81)
pt3dadd(127.83, 844.02, -69.8, 0.81)
pt3dadd(128.28, 844.02, -69.8, 0.81)
pt3dadd(128.79, 844.53, -69.8, 0.81)
pt3dadd(129.16, 845.34, -69.8, 0.81)
pt3dadd(129.76, 846.38, -69.8, 0.81)
pt3dadd(131.01, 847.04, -69.8, 0.81)
pt3dadd(132.64, 846.89, -69.8, 0.81)
pt3dadd(133.6, 846.3, -69.8, 0.81)
pt3dadd(134.26, 845.34, -70.35, 0.81)
pt3dadd(134.63, 844.53, -70.85, 0.81)
pt3dadd(136.04, 844.9, -71.45, 0.81)
pt3dadd(136.7, 845.71, -71.8, 0.81)
pt3dadd(137.07, 846.89, -71.85, 0.81)
pt3dadd(137.59, 847.78, -71.9, 0.81)
pt3dadd(137.89, 848.59, -72, 0.81)
pt3dadd(138.4, 849.25, -72.7, 0.81)
pt3dadd(139.44, 849.92, -73.05, 0.81)
pt3dadd(140.77, 849.77, -73.2, 0.81)
pt3dadd(141.66, 849.69, -73.25, 0.81)
pt3dadd(142.84, 849.62, -73.35, 0.81)
pt3dadd(143.5, 849.84, -74.05, 0.81)
pt3dadd(144.17, 849.99, -74.45, 0.81)
pt3dadd(144.83, 850.21, -74.9, 0.81)
pt3dadd(145.79, 851.61, -75.3, 0.81)
}
}
proc shape3d_51() {
apic[74] { pt3dadd(146.9, 850.87, -75.3, 0.81)
pt3dadd(146.68, 849.62, -75.3, 0.81)
pt3dadd(146.09, 849.55, -75.3, 0.81)
pt3dadd(145.87, 850.43, -75.35, 0.81)
pt3dadd(146.98, 850.95, -75.35, 0.81)
pt3dadd(148.09, 851.17, -75.35, 0.81)
pt3dadd(148.97, 851.91, -76.55, 0.81)
pt3dadd(149.49, 852.2, -77.05, 0.81)
pt3dadd(150.3, 852.72, -77.75, 0.81)
pt3dadd(151.34, 853.09, -78, 0.81)
pt3dadd(151.93, 853.46, -78.9, 0.81)
pt3dadd(152.59, 853.31, -78.9, 0.81)
pt3dadd(152.15, 852.13, -78.9, 0.81)
pt3dadd(153.18, 851.98, -78.9, 0.81)
pt3dadd(153.92, 852.2, -78.9, 0.81)
pt3dadd(153.7, 852.87, -79.25, 0.81)
pt3dadd(154.44, 852.94, -79.15, 0.81)
pt3dadd(155.33, 853.6, -79.1, 0.81)
pt3dadd(155.85, 854.34, -79.05, 0.81)
pt3dadd(155.33, 855.23, -79, 0.81)
pt3dadd(155.03, 854.64, -82.05, 0.81)
pt3dadd(154.29, 853.9, -82.1, 0.81)
pt3dadd(154, 853.16, -82.1, 0.81)
pt3dadd(153.04, 852.2, -82.15, 0.81)
pt3dadd(151.93, 852.05, -82.15, 0.81)
pt3dadd(152.3, 853.53, -82.15, 0.81)
pt3dadd(153.26, 854.34, -82.2, 0.81)
pt3dadd(153.85, 855.15, -82.2, 0.81)
pt3dadd(153.33, 856.04, -82.2, 0.81)
pt3dadd(152.89, 855.96, -82.2, 0.81)
pt3dadd(152.89, 854.93, -82.2, 0.81)
pt3dadd(152.15, 854.86, -82.2, 0.81)
pt3dadd(151.63, 854.78, -83.05, 0.81)
pt3dadd(151.12, 855.89, -83.1, 0.81)
pt3dadd(152.3, 856.48, -83.1, 0.81)
pt3dadd(153.26, 856.92, -83.75, 0.81)
pt3dadd(154.29, 856.99, -84.35, 0.81)
pt3dadd(155.18, 856.04, -84.6, 0.81)
pt3dadd(155.92, 855.3, -84.75, 0.81)
pt3dadd(156.88, 855.37, -85.4, 0.81)
pt3dadd(157.4, 855.96, -85.9, 0.81)
pt3dadd(158.06, 856.63, -86.55, 0.81)
pt3dadd(158.43, 857.51, -87.4, 0.81)
pt3dadd(158.65, 858.54, -87.55, 0.81)
pt3dadd(158.43, 859.21, -87.9, 0.81)
pt3dadd(157.99, 859.06, -86.8, 0.81)
pt3dadd(156.66, 859.58, -86.75, 0.81)
pt3dadd(155.62, 860.68, -89.2, 0.81)
pt3dadd(154.81, 861.94, -89.2, 0.81)
pt3dadd(154.37, 862.67, -89.2, 0.81)
pt3dadd(154.81, 863.85, -90.3, 0.81)
pt3dadd(155.18, 864.89, -90.35, 0.81)
pt3dadd(156.29, 865.03, -90.35, 0.81)
pt3dadd(157.69, 864.22, -90.35, 0.81)
pt3dadd(158.36, 863.12, -90.35, 0.81)
pt3dadd(157.99, 862.01, -90.35, 0.81)
pt3dadd(157.32, 861.27, -90.35, 0.81)
pt3dadd(156.88, 860.68, -92.25, 0.81)
pt3dadd(156.51, 859.94, -92.35, 0.81)
pt3dadd(156.07, 859.06, -92.35, 0.81)
pt3dadd(156.88, 858.69, -92.4, 0.81)
pt3dadd(158.06, 860.09, -92.4, 0.81)
pt3dadd(157.84, 860.17, -93.9, 0.81)
pt3dadd(157.03, 860.68, -93.95, 0.81)
pt3dadd(156.95, 861.94, -93.95, 0.81)
pt3dadd(156.22, 862.82, -93.95, 0.81)
pt3dadd(155.7, 863.85, -93.95, 0.81)
pt3dadd(155.48, 865.33, -94, 0.81)
pt3dadd(154.96, 866.07, -94.6, 0.81)
pt3dadd(154.52, 866.8, -95.3, 0.81)
pt3dadd(154.29, 867.47, -95.4, 0.81)
pt3dadd(154.66, 868.13, -95.45, 0.81)
pt3dadd(155.33, 868.87, -95.5, 0.81)
pt3dadd(156.14, 869.38, -95.85, 0.67)
pt3dadd(157.03, 869.38, -96, 0.67)
pt3dadd(157.47, 869.75, -96.05, 0.67)
pt3dadd(158.06, 870.42, -96.05, 0.67)
pt3dadd(158.65, 870.93, -96.05, 0.67)
pt3dadd(158.8, 871.89, -96.05, 0.67)
pt3dadd(158.97, 873.13, -96.4, 0.67)
pt3dadd(159.71, 874.01, -96.4, 0.67)
pt3dadd(160.08, 874.75, -96.45, 0.67)
pt3dadd(160.82, 875.49, -96.45, 0.67)
pt3dadd(161.63, 876.37, -96.45, 0.67)
pt3dadd(162, 877.18, -96.45, 0.67)
pt3dadd(162.3, 877.7, -96.45, 0.67)
pt3dadd(162.6, 878.73, -96.85, 0.67)
pt3dadd(162.74, 879.91, -96.9, 0.67)
pt3dadd(162.37, 881.02, -96.9, 0.67)
pt3dadd(161.19, 881.46, -96.95, 0.67)
pt3dadd(160.23, 881.31, -97, 0.67)
pt3dadd(159.42, 880.65, -97.4, 0.67)
pt3dadd(159.12, 879.91, -97.5, 0.67)
pt3dadd(158.68, 878.66, -98, 0.67)
pt3dadd(158.31, 878, -98.15, 0.67)
pt3dadd(157.64, 877.48, -98.3, 0.67)
pt3dadd(156.54, 876.82, -98.35, 0.67)
pt3dadd(155.5, 876.37, -98.45, 0.67)
pt3dadd(154.47, 876.15, -98.6, 0.67)
pt3dadd(153.73, 875.93, -98.7, 0.67)
pt3dadd(152.25, 876.37, -98.95, 0.67)
pt3dadd(151.29, 876.52, -99.05, 0.67)
pt3dadd(150.33, 876.15, -99.3, 0.67)
pt3dadd(149.74, 876, -99.55, 0.67)
pt3dadd(149.22, 876.08, -99.6, 0.67)
pt3dadd(148.33, 876.45, -99.65, 0.67)
}
apic[75] {pt3dclear()
pt3dadd(38.47, 495.73, -14.3, 0.89)
pt3dadd(37.41, 495.9, -14.85, 0.89)
pt3dadd(36.3, 496.34, -14.95, 0.89)
pt3dadd(35.64, 496.71, -15, 0.89)
pt3dadd(35.34, 496.93, -15, 0.89)
pt3dadd(35.41, 497.6, -15.35, 0.89)
pt3dadd(35.49, 498.26, -15.7, 0.89)
pt3dadd(35.19, 498.63, -15.6, 0.89)
pt3dadd(34.67, 499.15, -15.35, 0.89)
pt3dadd(34.23, 499.51, -14.85, 0.89)
pt3dadd(33.05, 499.59, -14.4, 0.89)
pt3dadd(32.38, 499.22, -14.25, 0.89)
pt3dadd(31.42, 499.15, -14.15, 0.89)
pt3dadd(30.98, 498.92, -14.05, 0.89)
pt3dadd(30.31, 498.92, -13.95, 0.89)
pt3dadd(29.35, 499.29, -13.8, 0.89)
pt3dadd(28.84, 499.15, -13.75, 0.89)
pt3dadd(28.02, 499.44, -13.9, 0.89)
pt3dadd(26.99, 499.51, -14.25, 0.89)
pt3dadd(26.47, 499.74, -14.4, 0.89)
pt3dadd(26.1, 500.03, -14.6, 0.89)
pt3dadd(25.81, 500.55, -14.9, 0.89)
pt3dadd(25.66, 501.21, -15.4, 0.89)
pt3dadd(25.51, 501.8, -15.65, 0.89)
pt3dadd(25.21, 502.46, -15.75, 0.89)
pt3dadd(24.92, 503.13, -15.75, 0.89)
pt3dadd(24.25, 503.42, -16.4, 0.89)
pt3dadd(23.74, 504.6, -16.45, 0.89)
pt3dadd(23.22, 505.19, -16.45, 0.89)
pt3dadd(22.92, 505.78, -16.5, 0.89)
pt3dadd(22.77, 506.45, -16.55, 0.74)
pt3dadd(21.89, 507.04, -16.75, 0.74)
pt3dadd(21.22, 507.33, -17.1, 0.74)
pt3dadd(20.63, 507.33, -17.2, 0.74)
pt3dadd(19.97, 507.11, -17.2, 0.74)
pt3dadd(18.86, 506.67, -17.25, 0.74)
pt3dadd(18.34, 506.3, -17.3, 0.74)
pt3dadd(17.82, 505.86, -17.3, 0.74)
pt3dadd(17.16, 505.49, -17.3, 0.74)
pt3dadd(16.64, 505.12, -17.35, 0.74)
pt3dadd(15.83, 505.34, -17.35, 0.74)
pt3dadd(15.38, 505.93, -17.35, 0.74)
pt3dadd(14.87, 506.45, -17.7, 0.74)
pt3dadd(14.05, 507.04, -17.95, 0.74)
pt3dadd(13.54, 507.26, -18, 0.74)
pt3dadd(12.35, 507.77, -18.35, 0.74)
pt3dadd(11.61, 507.26, -18.35, 0.74)
pt3dadd(10.58, 507.04, -18.65, 0.74)
pt3dadd(9.62, 506.74, -19.45, 0.74)
pt3dadd(8.88, 506.45, -19.5, 0.74)
pt3dadd(8.14, 505.93, -19.55, 0.74)
pt3dadd(7.55, 505.27, -19.6, 0.74)
pt3dadd(7.4, 504.38, -19.95, 0.74)
pt3dadd(7.11, 503.28, -20.05, 0.74)
pt3dadd(6.81, 502.98, -20.2, 0.74)
pt3dadd(6.22, 502.32, -20.85, 0.74)
pt3dadd(5.41, 502.17, -21, 0.74)
pt3dadd(5.11, 502.98, -21.35, 0.74)
pt3dadd(5.11, 503.64, -23.3, 0.74)
pt3dadd(5.18, 504.38, -23.75, 0.74)
pt3dadd(4.96, 505.12, -23.9, 0.74)
pt3dadd(4.96, 505.64, -23.95, 0.74)
pt3dadd(5.11, 506.37, -24.25, 0.74)
pt3dadd(5.11, 507.26, -24.45, 0.74)
pt3dadd(5.11, 508.07, -24.45, 0.74)
pt3dadd(4.96, 508.95, -24.45, 0.74)
pt3dadd(5.04, 510.06, -24.5, 0.74)
pt3dadd(5.26, 511.02, -24.5, 0.74)
pt3dadd(5.55, 512.05, -24.5, 0.74)
pt3dadd(4.89, 512.79, -24.5, 0.74)
pt3dadd(4.3, 513.16, -24.5, 0.74)
pt3dadd(3.78, 513.67, -24.5, 0.74)
pt3dadd(3.19, 513.97, -24.5, 0.74)
pt3dadd(2.6, 514.56, -24.5, 0.74)
}
apic[76] {pt3dclear()
pt3dadd(45.74, 356.64, 1.35, 0.89)
pt3dadd(46.74, 356.74, 0.8, 0.89)
pt3dadd(47.7, 357.19, 0.55, 0.89)
pt3dadd(48.22, 357.56, 0.3, 0.89)
pt3dadd(48.52, 358.15, -0.4, 0.89)
pt3dadd(48.74, 359.1, -0.55, 0.89)
pt3dadd(48.96, 360.21, -0.4, 0.89)
pt3dadd(49.04, 360.8, -0.05, 0.89)
pt3dadd(49.18, 361.69, 0.2, 0.89)
pt3dadd(49.18, 362.64, 0.35, 0.89)
pt3dadd(49.26, 363.16, 0.5, 1.03)
pt3dadd(49.55, 363.9, 0.55, 1.03)
pt3dadd(49.55, 364.56, 0.55, 1.03)
pt3dadd(49.4, 365.37, 0.6, 1.03)
pt3dadd(49.48, 365.96, 0.6, 1.03)
pt3dadd(49.63, 366.7, 0.65, 1.03)
pt3dadd(49.77, 367.36, 0.65, 1.03)
pt3dadd(49.77, 368.1, 0.8, 1.03)
pt3dadd(49.7, 368.84, 0.95, 1.03)
pt3dadd(49.85, 369.5, 1.1, 1.03)
}
}
proc shape3d_52() {
apic[76] { pt3dadd(50.37, 369.87, 1.25, 1.03)
pt3dadd(50.66, 370.02, 1.45, 1.03)
pt3dadd(51.33, 370.09, 1.3, 1.03)
pt3dadd(51.4, 370.09, 1, 1.03)
pt3dadd(52.07, 369.65, 0.9, 1.03)
pt3dadd(52.43, 369.13, 0.75, 1.03)
pt3dadd(52.88, 368.62, 0.2, 1.03)
pt3dadd(53.32, 367.81, 0, 1.03)
pt3dadd(53.77, 367.29, -0.45, 1.03)
pt3dadd(54.28, 367.36, -0.9, 1.03)
pt3dadd(54.8, 367.88, -1.15, 1.03)
pt3dadd(55.24, 368.47, -1.8, 1.03)
pt3dadd(55.47, 369.36, -2.45, 1.03)
pt3dadd(55.61, 370.39, -2.5, 1.03)
pt3dadd(55.69, 371.72, -2.75, 1.03)
pt3dadd(55.32, 372.75, -3.1, 1.03)
pt3dadd(55.02, 373.93, -3.2, 1.03)
pt3dadd(55.17, 374.81, -3.25, 1.03)
pt3dadd(55.69, 375.7, -3.25, 1.03)
pt3dadd(56.06, 376.44, -3.3, 1.03)
pt3dadd(57.09, 376.95, -3.3, 1.03)
pt3dadd(57.98, 377.76, -3.3, 1.03)
pt3dadd(59.46, 377.84, -3.3, 1.03)
pt3dadd(60.71, 378.13, -3.3, 1.03)
pt3dadd(61.9, 378.35, -3.3, 1.03)
pt3dadd(62.63, 379.31, -3.3, 1.03)
pt3dadd(62.49, 380.42, -3.9, 1.03)
pt3dadd(62.12, 381.16, -3.95, 1.03)
pt3dadd(61.82, 382.04, -4.05, 1.03)
pt3dadd(61.16, 382.7, -4.2, 1.03)
pt3dadd(60.64, 383.22, -4.25, 1.03)
pt3dadd(60.34, 384.11, -4.4, 1.03)
pt3dadd(60.42, 384.84, -4.4, 1.03)
pt3dadd(60.42, 385.65, -4.5, 1.03)
pt3dadd(60.64, 386.39, -4.6, 1.03)
pt3dadd(61.45, 386.98, -4.6, 1.03)
pt3dadd(62.34, 387.57, -4.6, 1.03)
pt3dadd(63, 387.65, -4.6, 1.03)
pt3dadd(63.82, 387.5, -4.6, 1.03)
pt3dadd(64.78, 387.65, -4.65, 1.03)
pt3dadd(65.81, 388.38, -5.6, 1.03)
pt3dadd(65.52, 389.49, -5.6, 1.03)
pt3dadd(64.93, 390.08, -5.8, 1.03)
pt3dadd(64.11, 390.74, -6.05, 1.03)
pt3dadd(63.6, 391.33, -6.15, 1.03)
pt3dadd(63.3, 391.78, -6.4, 1.03)
pt3dadd(62.86, 392.37, -6.7, 1.03)
pt3dadd(62.63, 393.4, -6.9, 1.03)
pt3dadd(63.52, 393.84, -7.7, 0.89)
pt3dadd(64.85, 393.99, -7.7, 0.89)
pt3dadd(65.74, 394.8, -8.15, 0.67)
pt3dadd(65.74, 395.9, -8.15, 0.67)
pt3dadd(66.18, 396.86, -8.2, 0.67)
pt3dadd(66.48, 397.53, -8.7, 0.67)
pt3dadd(66.7, 398.56, -8.75, 0.67)
pt3dadd(66.85, 399.59, -8.75, 0.67)
pt3dadd(67, 400.62, -8.75, 0.67)
pt3dadd(66.92, 401.36, -8.75, 0.67)
pt3dadd(67.44, 402.62, -8.75, 0.67)
}
apic[77] {pt3dclear()
pt3dadd(48.57, 226.94, 5.25, 1.11)
pt3dadd(47.93, 227.09, 7.85, 1.11)
pt3dadd(47.04, 227.01, 8.3, 1.11)
pt3dadd(46.37, 227.6, 8.4, 1.11)
pt3dadd(45.71, 227.6, 8.45, 1.11)
pt3dadd(45.12, 227.97, 8.5, 1.11)
pt3dadd(44.23, 228.49, 8.6, 1.11)
pt3dadd(43.79, 229.15, 8.65, 1.11)
pt3dadd(43.42, 230.19, 8.75, 1.11)
pt3dadd(43.34, 231.29, 8.8, 1.33)
pt3dadd(43.2, 231.88, 8.9, 1.33)
pt3dadd(42.83, 232.55, 9.05, 1.33)
pt3dadd(42.61, 232.99, 9.35, 1.33)
pt3dadd(42.01, 233.5, 9.45, 1.33)
pt3dadd(41.2, 234.09, 9.5, 1.33)
pt3dadd(39.94, 234.24, 9.55, 1.33)
pt3dadd(39.06, 234.24, 9.6, 1.33)
pt3dadd(38.32, 234.02, 9.6, 1.33)
pt3dadd(37.51, 233.87, 9.65, 1.33)
pt3dadd(36.77, 233.73, 9.8, 1.33)
pt3dadd(35.95, 233.36, 10.2, 1.33)
pt3dadd(35.21, 233.06, 10.45, 1.33)
pt3dadd(34.62, 232.69, 10.6, 1.26)
pt3dadd(33.51, 233.06, 10.65, 1.11)
pt3dadd(32.85, 233.73, 10.65, 1.11)
pt3dadd(32.78, 234.39, 10.65, 1.11)
pt3dadd(33, 234.76, 11, 1.11)
pt3dadd(33.74, 235.35, 11.3, 1.11)
pt3dadd(34.03, 236.01, 11.6, 1.11)
}
apic[78] {pt3dclear()
pt3dadd(34.03, 236.01, 11.6, 0.96)
pt3dadd(34.03, 236.9, 13.2, 0.96)
pt3dadd(34.29, 237.81, 13.2, 0.96)
pt3dadd(34.58, 238.84, 13.2, 0.96)
pt3dadd(35.17, 239.28, 13.25, 0.96)
pt3dadd(35.84, 239.5, 13.25, 0.81)
pt3dadd(36.65, 239.72, 13.25, 0.81)
pt3dadd(37.54, 239.72, 13.25, 0.81)
pt3dadd(38.72, 240.09, 13.25, 0.81)
pt3dadd(39.53, 240.54, 13.25, 0.81)
pt3dadd(40.42, 241.05, 13.25, 0.81)
pt3dadd(41.46, 241.57, 13.25, 0.81)
pt3dadd(42.34, 241.86, 13.35, 0.81)
pt3dadd(43.23, 242.31, 14.05, 0.81)
pt3dadd(43.97, 243.04, 14.25, 0.81)
pt3dadd(44.26, 244.15, 14.25, 0.81)
pt3dadd(43.67, 244.74, 14.3, 0.81)
pt3dadd(43.53, 245.4, 14.35, 0.81)
pt3dadd(43.23, 246.51, 14.55, 0.67)
pt3dadd(43.16, 247.47, 14.6, 0.67)
pt3dadd(42.93, 248.57, 14.6, 0.67)
pt3dadd(42.93, 249.39, 14.6, 0.67)
pt3dadd(42.93, 250.27, 14.75, 0.67)
pt3dadd(43.23, 251.01, 15, 0.67)
pt3dadd(43.67, 251.89, 15, 0.67)
pt3dadd(43.23, 252.26, 15.05, 0.67)
pt3dadd(41.9, 252.26, 15.05, 0.67)
pt3dadd(41.31, 251.6, 15.05, 0.67)
pt3dadd(40.79, 251.08, 15.05, 0.67)
}
apic[79] {pt3dclear()
pt3dadd(34.03, 236.01, 11.6, 0.89)
pt3dadd(33.18, 236.48, 14.1, 0.89)
pt3dadd(32.44, 236.55, 14.1, 0.89)
pt3dadd(31.55, 236.7, 14.1, 0.89)
pt3dadd(30.96, 237.22, 14.1, 0.89)
pt3dadd(30.44, 237.88, 14.1, 0.89)
pt3dadd(30.3, 238.84, 14.1, 0.89)
pt3dadd(30.37, 239.65, 14.1, 0.89)
pt3dadd(30.52, 240.61, 14.1, 0.89)
pt3dadd(30.15, 241.64, 14.1, 0.89)
pt3dadd(29.7, 242.45, 14.15, 0.89)
pt3dadd(29.48, 242.9, 14.65, 0.89)
pt3dadd(28.89, 243.93, 14.65, 0.89)
pt3dadd(28.08, 244.52, 14.65, 0.89)
pt3dadd(27.41, 245.33, 14.7, 0.89)
pt3dadd(26.82, 246.07, 14.7, 0.89)
pt3dadd(26.23, 246.73, 14.7, 0.89)
pt3dadd(25.64, 247.47, 14.7, 0.89)
pt3dadd(25.34, 248.35, 14.7, 1.11)
pt3dadd(24.53, 249.16, 14.7, 1.11)
pt3dadd(23.87, 249.9, 14.7, 1.11)
pt3dadd(23.57, 250.42, 14.7, 1.11)
pt3dadd(22.91, 250.79, 14.7, 1.11)
pt3dadd(21.94, 250.86, 14.7, 1.11)
pt3dadd(20.98, 251.16, 14.7, 1.11)
pt3dadd(20.17, 251.01, 14.7, 1.11)
pt3dadd(19.14, 251.67, 14.7, 0.74)
pt3dadd(18.99, 252.19, 14.9, 0.74)
pt3dadd(18.54, 253, 15.15, 0.74)
pt3dadd(18.25, 253.81, 15.2, 0.74)
pt3dadd(17.73, 254.33, 15.2, 0.74)
pt3dadd(17.21, 254.69, 15.2, 0.74)
pt3dadd(16.4, 254.99, 15.25, 0.74)
pt3dadd(15.66, 255.73, 15.25, 0.74)
pt3dadd(14.92, 256.54, 15.25, 0.74)
pt3dadd(14.63, 257.57, 15.25, 0.74)
pt3dadd(14.41, 258.31, 15.25, 0.74)
pt3dadd(13.81, 259.05, 15.25, 0.74)
pt3dadd(13, 259.41, 15.25, 0.74)
pt3dadd(11.89, 259.93, 15.25, 0.74)
pt3dadd(11.3, 260.23, 15.25, 0.74)
pt3dadd(10.86, 260.96, 15.25, 0.67)
pt3dadd(10.04, 261.7, 15.25, 0.67)
pt3dadd(9.9, 262.81, 15.8, 0.67)
pt3dadd(9.23, 263.54, 15.8, 0.67)
pt3dadd(8.35, 264.36, 15.85, 0.67)
pt3dadd(7.75, 264.95, 15.85, 0.67)
pt3dadd(6.94, 265.39, 15.85, 0.67)
pt3dadd(6.28, 265.83, 15.85, 0.67)
pt3dadd(5.46, 266.35, 15.85, 0.67)
pt3dadd(4.58, 266.72, 15.85, 0.67)
pt3dadd(3.84, 267.16, 15.85, 0.67)
pt3dadd(3.76, 268.04, 15.85, 0.67)
pt3dadd(2.88, 268.78, 15.85, 0.67)
pt3dadd(2.21, 269.3, 15.85, 0.67)
}
apic[80] {pt3dclear()
pt3dadd(2.21, 269.3, 15.85, 0.67)
pt3dadd(0.74, 269.17, 15.85, 0.67)
pt3dadd(-0.51, 269.69, 15.85, 0.67)
pt3dadd(-1.33, 269.91, 15.85, 0.67)
pt3dadd(-1.99, 270.21, 15.85, 0.67)
pt3dadd(-2.66, 270.58, 15.85, 0.67)
pt3dadd(-2.95, 271.31, 15.85, 0.67)
}
apic[81] {pt3dclear()
pt3dadd(2.21, 269.3, 15.85, 0.67)
pt3dadd(2.52, 269.91, 15.85, 0.67)
pt3dadd(3.26, 270.8, 15.85, 0.67)
pt3dadd(3.77, 271.53, 15.85, 0.67)
pt3dadd(4.29, 271.9, 15.85, 0.67)
pt3dadd(4.66, 272.49, 15.85, 0.67)
pt3dadd(5.4, 272.64, 15.85, 0.67)
}
apic[82] {pt3dclear()
pt3dadd(34.96, 167.49, 4, 2.51)
pt3dadd(36.47, 167.38, 1.6, 2.51)
pt3dadd(37.58, 167.6, 1.5, 2.51)
pt3dadd(38.98, 167.89, 1.5, 2.51)
pt3dadd(40.17, 167.75, 1.45, 2.51)
pt3dadd(41.87, 167.45, 2.95, 2.59)
pt3dadd(43.34, 167.53, 3.15, 2.59)
pt3dadd(44.82, 167.75, 3.25, 2.59)
pt3dadd(46.15, 167.67, 3.35, 2.59)
pt3dadd(47.26, 166.94, 3.45, 2.59)
pt3dadd(47.93, 166.57, 3.45, 2.59)
pt3dadd(48.96, 165.98, 3.55, 2.59)
pt3dadd(49.7, 165.53, 3.6, 2.59)
pt3dadd(50.66, 164.87, 3.8, 2.59)
}
}
proc shape3d_53() {
apic[82] { pt3dadd(51.62, 164.21, 3.9, 2.59)
pt3dadd(52.73, 163.03, 4, 2.59)
pt3dadd(54.43, 161.92, 0, 2.59)
}
apic[83] {pt3dclear()
pt3dadd(54.43, 161.92, 0, 2.44)
pt3dadd(56.28, 161.59, -3.25, 2.44)
pt3dadd(57.16, 162.25, -4.8, 1.7)
pt3dadd(58.36, 162.53, -4.8, 1.7)
}
apic[84] {pt3dclear()
pt3dadd(58.36, 162.53, -4.8, 1.7)
pt3dadd(58.79, 161.74, -4.85, 1.7)
pt3dadd(58.72, 160.71, -4.9, 1.7)
pt3dadd(58.27, 159.01, -4.9, 1.7)
pt3dadd(57.53, 157.91, -4.9, 1.7)
pt3dadd(59.31, 157.91, -4.9, 1.7)
pt3dadd(60.2, 159.09, -4.9, 1.7)
pt3dadd(61.3, 160.56, -6.85, 1.4)
pt3dadd(62.26, 161.52, -6.95, 1.4)
pt3dadd(63.08, 162.33, -7.2, 1.4)
pt3dadd(64.04, 162.55, -7.8, 1.4)
pt3dadd(65.29, 162.33, -7.95, 1.4)
pt3dadd(65.81, 161.59, -8, 1.4)
pt3dadd(66.4, 160.34, -9.45, 1.4)
pt3dadd(66.99, 159.38, -9.5, 1.4)
pt3dadd(67.59, 158.79, -9.85, 1.4)
pt3dadd(68.62, 158.13, -11, 1.4)
pt3dadd(69.8, 157.83, -11.2, 1.4)
pt3dadd(70.32, 158.13, -12.7, 1.4)
pt3dadd(71.8, 158.42, -12.8, 1.4)
pt3dadd(73.13, 159.31, -12.95, 1.4)
pt3dadd(73.42, 161, -12.95, 1.4)
pt3dadd(72.69, 162.11, -13, 1.4)
pt3dadd(70.54, 161.81, -13, 1.4)
pt3dadd(69.14, 161, -13, 1.4)
pt3dadd(69.66, 159.31, -13, 1.4)
pt3dadd(71.72, 158.42, -13, 1.4)
pt3dadd(73.2, 159.53, -13, 1.4)
pt3dadd(74.02, 160.19, -11.6, 1.4)
pt3dadd(74.46, 161.15, -15.15, 1.4)
pt3dadd(74.9, 162.4, -16.15, 1.4)
pt3dadd(75.49, 163.44, -16.3, 1.4)
pt3dadd(76.31, 164.32, -16.4, 1.4)
pt3dadd(77.71, 165.06, -16.45, 1.26)
pt3dadd(78.75, 164.76, -16.6, 1.26)
pt3dadd(79.78, 163.95, -16.9, 1.26)
pt3dadd(80.89, 163.07, -17, 1.26)
pt3dadd(81.63, 162.04, -17.2, 1.26)
pt3dadd(82.52, 161.52, -17.65, 1.26)
pt3dadd(83.62, 161.22, -17.9, 1.26)
pt3dadd(84.59, 161.22, -18.1, 1.26)
pt3dadd(85.32, 162.11, -18.3, 1.26)
pt3dadd(85.92, 163.22, -18.4, 1.26)
pt3dadd(85.77, 163.88, -19.05, 1.26)
pt3dadd(85.1, 164.32, -19.75, 1.26)
pt3dadd(84.51, 164.84, -20.3, 1.26)
pt3dadd(84.44, 165.8, -20.5, 1.26)
pt3dadd(84.73, 166.76, -20.75, 1.26)
pt3dadd(85.32, 167.49, -20.8, 1.11)
pt3dadd(86.36, 168.16, -21, 1.11)
pt3dadd(87.84, 168.6, -21.1, 1.11)
pt3dadd(89.46, 168.53, -21.15, 1.11)
pt3dadd(90.79, 168.53, -21.35, 1.11)
pt3dadd(91.98, 168.45, -21.8, 1.11)
pt3dadd(92.86, 169.26, -22.95, 1.11)
pt3dadd(92.64, 170.37, -22.95, 1.11)
pt3dadd(91.98, 171.48, -22.95, 0.96)
pt3dadd(91.61, 172.29, -23, 0.96)
pt3dadd(91.83, 173.17, -23.2, 0.96)
pt3dadd(92.35, 174.06, -23.45, 0.96)
pt3dadd(93.38, 174.72, -23.5, 0.96)
pt3dadd(94.42, 174.94, -23.55, 0.96)
pt3dadd(95.45, 174.5, -23.55, 0.96)
pt3dadd(96.19, 174.35, -23.55, 0.96)
pt3dadd(96.71, 174.13, -23.65, 0.96)
pt3dadd(97.6, 173.84, -23.65, 0.96)
pt3dadd(98.19, 174.13, -23.65, 0.81)
pt3dadd(98.7, 174.65, -24.2, 0.81)
pt3dadd(98.93, 175.39, -24.2, 0.81)
pt3dadd(98.26, 176.05, -24.25, 0.81)
pt3dadd(98.33, 176.79, -24.25, 0.81)
pt3dadd(98.7, 177.23, -24.55, 0.81)
pt3dadd(100.26, 178.11, -25.05, 0.81)
pt3dadd(101.22, 178.63, -25.05, 0.81)
pt3dadd(102.25, 179.15, -25.1, 0.81)
pt3dadd(103.43, 178.93, -25.15, 0.81)
pt3dadd(104.1, 178.34, -25.15, 0.81)
pt3dadd(104.99, 178.48, -25.45, 0.81)
pt3dadd(106.17, 178.19, -25.85, 0.81)
pt3dadd(106.76, 177.6, -26.2, 0.81)
pt3dadd(106.83, 176.93, -26.5, 0.81)
pt3dadd(107.13, 176.2, -26.75, 0.81)
pt3dadd(107.57, 176.05, -27.8, 0.81)
pt3dadd(108.53, 176.05, -27.85, 0.81)
pt3dadd(109.05, 176.57, -27.85, 0.81)
pt3dadd(109.79, 177.08, -27.9, 0.81)
pt3dadd(109.57, 178.78, -27.9, 0.81)
pt3dadd(109.94, 179.15, -27.9, 0.81)
pt3dadd(110.31, 178.11, -27.95, 0.81)
pt3dadd(111.19, 177.16, -28.85, 0.81)
pt3dadd(112.08, 176.93, -29.25, 0.81)
pt3dadd(113.04, 177.3, -29.4, 0.81)
pt3dadd(114.37, 177.45, -29.45, 0.81)
pt3dadd(115.19, 177.08, -29.45, 0.81)
pt3dadd(115.93, 176.42, -29.55, 0.81)
pt3dadd(117.26, 175.68, -30.9, 0.67)
pt3dadd(118.07, 174.94, -30.95, 0.67)
pt3dadd(118.36, 173.69, -30.95, 0.67)
pt3dadd(117.7, 173.17, -30.95, 0.67)
pt3dadd(117.11, 174.28, -31, 0.67)
pt3dadd(117.11, 175.46, -31.05, 0.67)
pt3dadd(118.22, 175.83, -31.15, 0.67)
pt3dadd(119.18, 175.68, -33.2, 0.67)
pt3dadd(119.99, 175.98, -33.7, 0.67)
pt3dadd(120.51, 176.64, -33.85, 0.67)
pt3dadd(120.66, 177.52, -33.85, 0.67)
pt3dadd(121.32, 178.34, -33.9, 0.67)
pt3dadd(121.54, 179.22, -33.9, 0.67)
pt3dadd(121.99, 179.88, -33.9, 0.67)
pt3dadd(122.5, 179.15, -35.25, 0.67)
pt3dadd(122.95, 178.63, -35.3, 0.67)
pt3dadd(124.06, 178.19, -35.3, 0.67)
pt3dadd(125.02, 177.45, -37.15, 0.59)
pt3dadd(125.68, 177.89, -37.2, 0.59)
pt3dadd(125.83, 178.78, -37.4, 0.59)
pt3dadd(126.05, 179.81, -37.4, 0.59)
pt3dadd(126.86, 180.25, -37.8, 0.59)
pt3dadd(127.6, 180.4, -37.85, 0.59)
pt3dadd(128.71, 180.4, -37.9, 0.59)
pt3dadd(129.82, 179.81, -37.9, 0.59)
pt3dadd(130.71, 179.15, -37.95, 0.59)
}
apic[85] {pt3dclear()
pt3dadd(58.36, 162.53, -4.8, 1.11)
pt3dadd(58.36, 163.42, -4.15, 1.11)
pt3dadd(58.65, 164.08, -4.1, 1.11)
pt3dadd(58.8, 164.75, -4.1, 1.11)
pt3dadd(58.58, 165.63, -4.05, 1.11)
}
apic[86] {pt3dclear()
pt3dadd(58.58, 165.63, -4.05, 1.11)
pt3dadd(58.13, 166.59, -4.05, 1.11)
pt3dadd(57.54, 167.7, -4.05, 1.11)
pt3dadd(57.32, 168.29, -4.05, 1.11)
pt3dadd(56.88, 169.1, -4.05, 1.11)
pt3dadd(56.66, 169.61, -4.05, 1.11)
pt3dadd(56.29, 170.5, -4.05, 1.11)
pt3dadd(56.14, 171.16, -4.05, 1.11)
pt3dadd(55.99, 171.83, -4.05, 1.11)
pt3dadd(55.7, 172.42, -4.05, 1.11)
pt3dadd(55.62, 172.93, -4.05, 1.11)
pt3dadd(55.33, 173.67, -4.05, 1.11)
pt3dadd(55.18, 174.26, -4.05, 1.11)
pt3dadd(55.03, 175.07, -4.05, 1.11)
pt3dadd(54.81, 175.51, -4.05, 1.11)
pt3dadd(54.59, 175.96, -4.05, 1.11)
pt3dadd(54.22, 176.32, -4.05, 1.11)
pt3dadd(53.7, 176.84, -4.05, 1.11)
pt3dadd(53.4, 177.5, -4.05, 1.11)
pt3dadd(53.04, 178.09, -4.05, 1.11)
pt3dadd(52.67, 178.98, -4.05, 1.11)
pt3dadd(52.67, 179.72, -4.05, 1.11)
pt3dadd(52.52, 180.31, -4.05, 1.11)
pt3dadd(52.37, 180.97, -4.05, 1.11)
pt3dadd(52.22, 182.08, -4.05, 1.11)
pt3dadd(52, 182.67, -4.05, 1.11)
pt3dadd(51.85, 183.26, -4.05, 1.11)
pt3dadd(51.48, 183.77, -4.05, 1.11)
pt3dadd(51.19, 184.51, -4.05, 1.11)
pt3dadd(51.04, 184.95, -4.05, 1.11)
pt3dadd(50.67, 185.32, -4.05, 1.11)
pt3dadd(50.23, 185.69, -4.05, 1.11)
pt3dadd(49.93, 186.06, -4.05, 1.11)
pt3dadd(49.19, 186.87, -4.05, 1.11)
pt3dadd(49.12, 187.98, -4.05, 1.11)
pt3dadd(49.19, 188.57, -4.05, 1.11)
pt3dadd(49.34, 189.16, -4.05, 1.11)
pt3dadd(49.27, 190.12, -4.1, 1.11)
pt3dadd(48.82, 191.15, -4.1, 1.11)
pt3dadd(48.82, 191.89, -4.15, 1.11)
pt3dadd(48.75, 192.55, -4.15, 1.11)
pt3dadd(48.75, 193.51, -4.15, 1.11)
pt3dadd(49.12, 194.47, -4.15, 1.11)
pt3dadd(49.43, 195.25, -4.3, 0.96)
pt3dadd(49.95, 196.2, -4.3, 0.96)
pt3dadd(50.32, 196.94, -4.35, 0.96)
pt3dadd(50.32, 198.2, -5.7, 0.96)
pt3dadd(50.24, 199.08, -5.8, 0.96)
pt3dadd(50.69, 199.82, -5.8, 0.96)
pt3dadd(50.47, 200.41, -5.85, 0.96)
pt3dadd(50.24, 200.92, -5.85, 0.96)
pt3dadd(50.17, 201.44, -5.9, 0.96)
pt3dadd(49.8, 201.88, -5.9, 0.96)
pt3dadd(49.65, 202.55, -5.95, 0.96)
pt3dadd(49.5, 203.28, -5.95, 0.96)
pt3dadd(49.06, 204.68, -6, 0.96)
pt3dadd(49.13, 205.5, -6, 0.96)
pt3dadd(48.84, 206.09, -6.05, 0.96)
pt3dadd(48.91, 207.04, -6.05, 0.96)
pt3dadd(48.54, 207.49, -6.05, 0.96)
pt3dadd(48.17, 208, -6.05, 0.96)
pt3dadd(47.66, 208.59, -6.05, 0.96)
pt3dadd(46.92, 209.33, -6.3, 0.81)
pt3dadd(47.21, 210.07, -6.45, 0.81)
pt3dadd(46.7, 210.66, -6.5, 0.81)
pt3dadd(46.33, 211.32, -6.5, 0.81)
pt3dadd(46.03, 212.21, -6.5, 0.81)
}
}
proc shape3d_54() {
apic[86] { pt3dadd(45.44, 213.02, -6.5, 0.81)
pt3dadd(45, 213.24, -6.55, 0.81)
pt3dadd(44.33, 213.98, -6.55, 0.67)
pt3dadd(44.33, 214.71, -6.55, 0.67)
pt3dadd(44.33, 215.38, -6.55, 0.67)
pt3dadd(44.92, 216.34, -6.7, 0.67)
pt3dadd(45.51, 217.15, -7.15, 0.67)
pt3dadd(45.51, 217.96, -7.15, 0.67)
pt3dadd(45.37, 218.55, -7.2, 0.67)
pt3dadd(44.92, 219.07, -7.2, 0.67)
pt3dadd(44.63, 219.43, -7.3, 0.67)
pt3dadd(44.11, 219.88, -7.55, 0.67)
pt3dadd(43.67, 220.1, -7.6, 0.67)
pt3dadd(43.3, 220.39, -7.6, 0.67)
pt3dadd(42.78, 220.98, -7.6, 0.67)
pt3dadd(43, 221.87, -7.8, 0.67)
pt3dadd(43.3, 222.83, -7.85, 0.81)
pt3dadd(43.74, 223.93, -7.85, 0.81)
pt3dadd(44.04, 224.45, -7.9, 0.81)
pt3dadd(44.55, 225.11, -8, 0.81)
pt3dadd(44.77, 225.63, -8, 0.81)
pt3dadd(44.77, 226.44, -8.05, 0.81)
pt3dadd(44.79, 227.65, -8.25, 0.81)
pt3dadd(44.57, 228.09, -8.3, 0.81)
pt3dadd(44.42, 228.68, -8.35, 0.81)
pt3dadd(44.05, 229.05, -8.45, 0.81)
pt3dadd(43.39, 229.49, -8.5, 0.81)
pt3dadd(42.94, 229.72, -8.6, 0.81)
pt3dadd(42.5, 230.01, -8.8, 0.81)
pt3dadd(42.2, 230.23, -9.05, 0.81)
pt3dadd(41.54, 230.97, -9.75, 0.81)
pt3dadd(41.69, 231.63, -9.85, 0.81)
pt3dadd(42.06, 232.22, -10.65, 0.81)
pt3dadd(42.2, 232.96, -10.7, 0.81)
pt3dadd(42.35, 233.55, -10.8, 0.81)
pt3dadd(42.43, 234.73, -11.2, 0.81)
pt3dadd(42.2, 235.76, -11.25, 0.81)
pt3dadd(42.28, 236.57, -11.25, 0.81)
pt3dadd(42.13, 237.38, -11.25, 0.81)
pt3dadd(41.98, 238.2, -11.25, 0.81)
pt3dadd(42.28, 238.86, -11.25, 0.81)
pt3dadd(42.72, 239.38, -11.3, 0.81)
pt3dadd(43.31, 239.82, -11.3, 0.81)
pt3dadd(43.83, 240.26, -11.35, 0.81)
pt3dadd(44.27, 240.56, -11.45, 0.81)
pt3dadd(44.87, 240.78, -11.75, 0.81)
pt3dadd(45.68, 240.85, -11.8, 0.81)
pt3dadd(46.05, 241.29, -11.85, 0.81)
pt3dadd(46.64, 242.03, -12.15, 0.81)
pt3dadd(46.42, 242.77, -12.25, 0.81)
pt3dadd(46.34, 243.95, -12.4, 0.81)
pt3dadd(45.53, 244.69, -12.4, 0.81)
pt3dadd(45.16, 245.28, -12.4, 0.81)
pt3dadd(44.79, 245.72, -12.55, 0.81)
pt3dadd(44.05, 246.38, -12.55, 0.81)
pt3dadd(43.61, 246.82, -12.6, 0.81)
pt3dadd(43.02, 247.19, -12.65, 0.81)
pt3dadd(42.5, 247.86, -13.05, 0.67)
pt3dadd(42.35, 248.67, -13.1, 0.67)
pt3dadd(42.28, 249.63, -12.05, 0.67)
pt3dadd(42.13, 250.51, -11.85, 0.67)
pt3dadd(41.76, 250.88, -11.8, 0.67)
pt3dadd(41.54, 251.47, -11.75, 0.67)
pt3dadd(41.47, 252.36, -11.7, 0.67)
pt3dadd(41.69, 252.87, -11.65, 0.67)
pt3dadd(41.91, 253.68, -11.75, 0.67)
pt3dadd(41.76, 254.27, -12.6, 0.67)
pt3dadd(41.84, 254.79, -12.7, 0.67)
pt3dadd(42.28, 255.38, -12.9, 0.67)
pt3dadd(42.13, 255.97, -13.1, 0.67)
pt3dadd(41.69, 256.71, -13.7, 0.67)
pt3dadd(41.32, 257.59, -13.9, 0.67)
pt3dadd(40.58, 258.18, -13.95, 0.67)
pt3dadd(40.06, 258.48, -14, 0.67)
pt3dadd(39.4, 258.77, -14.05, 0.67)
pt3dadd(38.8, 259.21, -14.05, 0.67)
pt3dadd(38.37, 259.69, -14.7, 0.67)
pt3dadd(38.14, 260.13, -14.7, 0.67)
pt3dadd(38, 260.72, -14.75, 0.67)
pt3dadd(37.92, 261.38, -14.95, 0.67)
pt3dadd(38, 262.49, -15.1, 0.67)
pt3dadd(38.29, 263.37, -15.15, 0.67)
pt3dadd(38.66, 264.26, -15.15, 0.67)
pt3dadd(39.55, 264.92, -15.15, 0.67)
pt3dadd(39.99, 265.44, -15.2, 0.67)
pt3dadd(40.58, 266.4, -15.65, 0.74)
pt3dadd(40.66, 267.21, -15.75, 0.74)
pt3dadd(40.58, 268.31, -15.85, 0.74)
pt3dadd(40.73, 268.98, -16, 0.74)
pt3dadd(40.66, 269.72, -16.1, 0.74)
pt3dadd(40.14, 270.23, -16.15, 0.89)
pt3dadd(39.84, 270.97, -16.2, 0.89)
pt3dadd(39.33, 271.34, -16.25, 0.89)
pt3dadd(38.81, 271.85, -16.45, 0.89)
pt3dadd(38.29, 272.3, -16.7, 0.89)
pt3dadd(37.33, 272.74, -16.75, 0.89)
pt3dadd(36.89, 273.18, -16.8, 0.89)
pt3dadd(36.67, 274.36, -16.8, 0.89)
pt3dadd(36.67, 275.17, -16.8, 0.89)
pt3dadd(37.18, 275.91, -16.8, 0.89)
pt3dadd(37.48, 276.8, -16.8, 0.89)
pt3dadd(37.7, 277.68, -17.25, 0.74)
pt3dadd(37.7, 278.42, -17.3, 0.74)
pt3dadd(37.7, 279.6, -17.35, 0.74)
pt3dadd(37.63, 280.56, -17.4, 0.74)
pt3dadd(37.7, 281.07, -17.4, 0.74)
pt3dadd(37.77, 282.03, -17.55, 0.74)
pt3dadd(37.85, 282.92, -17.55, 0.74)
pt3dadd(37.7, 283.88, -17.6, 0.74)
pt3dadd(37.48, 284.69, -17.6, 0.74)
pt3dadd(37.48, 285.35, -17.65, 0.67)
pt3dadd(37.18, 286.01, -17.75, 0.67)
pt3dadd(37.26, 286.6, -17.75, 0.67)
pt3dadd(37.26, 287.42, -18.15, 0.67)
pt3dadd(37.63, 288.01, -18.25, 0.67)
pt3dadd(37.63, 288.82, -18.25, 0.67)
pt3dadd(37.11, 290.14, -18.3, 0.67)
}
apic[87] {pt3dclear()
pt3dadd(58.58, 165.63, -4.05, 1.03)
pt3dadd(59.15, 165.76, -4.8, 1.03)
pt3dadd(59.97, 166.72, -4.8, 1.03)
pt3dadd(60.41, 167.38, -4.85, 1.03)
pt3dadd(60.78, 168.12, -4.95, 1.03)
pt3dadd(60.78, 169.15, -5.55, 1.03)
pt3dadd(61, 169.96, -5.55, 1.03)
pt3dadd(60.85, 170.55, -5.65, 1.03)
pt3dadd(60.78, 171.07, -5.7, 1.03)
pt3dadd(60.56, 171.73, -5.8, 1.03)
pt3dadd(60.33, 172.25, -5.95, 1.03)
pt3dadd(59.74, 172.69, -6.2, 1.03)
pt3dadd(59.15, 173.13, -6.45, 1.03)
pt3dadd(58.34, 173.43, -6.65, 1.03)
pt3dadd(57.53, 173.43, -6.95, 1.03)
pt3dadd(56.71, 173.58, -6.95, 1.03)
pt3dadd(56.12, 173.13, -7, 1.03)
pt3dadd(54.87, 172.84, -7, 1.03)
pt3dadd(54.05, 172.62, -7.05, 1.03)
pt3dadd(53.46, 172.03, -7.3, 1.03)
pt3dadd(52.94, 171.14, -7.3, 1.03)
pt3dadd(52.13, 171.29, -7.5, 1.03)
pt3dadd(52.28, 171.95, -7.65, 1.03)
pt3dadd(52.8, 172.25, -7.9, 1.03)
pt3dadd(53.24, 172.54, -8, 1.03)
pt3dadd(53.68, 172.99, -8.55, 1.03)
pt3dadd(54.42, 173.58, -8.8, 1.03)
pt3dadd(54.94, 173.95, -10.15, 1.03)
pt3dadd(55.53, 174.54, -10.2, 1.03)
pt3dadd(55.97, 175.27, -10.5, 1.03)
pt3dadd(56.34, 176.45, -10.6, 1.03)
pt3dadd(56.05, 177.34, -10.65, 1.03)
pt3dadd(55.75, 178.08, -10.7, 1.03)
pt3dadd(55.97, 178.74, -10.85, 1.03)
pt3dadd(56.71, 179.48, -11.3, 0.96)
pt3dadd(57.38, 180.14, -11.35, 0.96)
pt3dadd(57.9, 180.36, -11.45, 0.96)
pt3dadd(58.71, 180.21, -12.25, 0.96)
pt3dadd(59.08, 179.33, -13.1, 0.96)
pt3dadd(59.37, 178.37, -13.35, 0.96)
pt3dadd(59.82, 177.78, -14.6, 0.96)
pt3dadd(60.48, 176.75, -14.75, 0.96)
pt3dadd(60.63, 176.23, -15.15, 0.81)
pt3dadd(61.37, 175.27, -15.15, 0.81)
pt3dadd(61.89, 174.61, -15.15, 0.81)
pt3dadd(62.48, 173.87, -15.15, 0.81)
pt3dadd(62.26, 173.06, -15.15, 0.81)
pt3dadd(61.67, 173.58, -15.2, 0.81)
pt3dadd(60.63, 174.31, -15.9, 0.81)
pt3dadd(59.74, 174.9, -16, 0.81)
pt3dadd(59.52, 175.42, -16.45, 0.81)
pt3dadd(58.78, 175.86, -17.05, 0.59)
pt3dadd(57.9, 176.23, -17.2, 0.59)
pt3dadd(57.6, 176.67, -17.65, 0.59)
pt3dadd(57.75, 177.63, -17.9, 0.59)
pt3dadd(58.78, 178.22, -17.95, 0.59)
pt3dadd(59.82, 178.44, -18.1, 0.59)
pt3dadd(60.78, 178.59, -18.65, 0.59)
pt3dadd(61.67, 178.74, -19.4, 0.59)
pt3dadd(62.55, 178.89, -19.4, 0.74)
pt3dadd(63.22, 179.18, -19.5, 0.74)
pt3dadd(63.88, 179.62, -19.75, 0.74)
pt3dadd(64.1, 180.29, -19.9, 0.74)
pt3dadd(63.44, 180.8, -20.6, 0.89)
pt3dadd(62.77, 181.39, -20.95, 0.89)
pt3dadd(62.33, 181.98, -21.25, 0.89)
pt3dadd(61.67, 182.28, -21.45, 0.89)
pt3dadd(60.93, 182.57, -21.5, 0.89)
pt3dadd(60.7, 183.09, -21.6, 0.89)
pt3dadd(61, 183.46, -21.75, 0.89)
pt3dadd(61.74, 183.61, -22.1, 0.89)
pt3dadd(62.63, 183.83, -22.45, 0.89)
pt3dadd(63.37, 183.9, -22.8, 0.89)
pt3dadd(63.96, 184.34, -23.25, 0.89)
pt3dadd(64.03, 184.93, -23.65, 0.89)
pt3dadd(63.66, 185.52, -24.15, 0.89)
pt3dadd(63.14, 185.89, -24.5, 0.89)
pt3dadd(62.18, 186.7, -24.6, 0.89)
pt3dadd(61.59, 187.15, -24.95, 0.89)
pt3dadd(60.93, 187.52, -25.1, 0.89)
pt3dadd(60.63, 187.66, -25.4, 0.74)
pt3dadd(60.04, 187.88, -25.4, 0.74)
pt3dadd(59.15, 187.22, -25.4, 0.74)
}
}
proc shape3d_55() {
apic[87] { pt3dadd(58.78, 187.66, -25.4, 0.74)
pt3dadd(59.23, 188.11, -25.55, 0.74)
pt3dadd(59.97, 188.84, -26.8, 0.67)
pt3dadd(60.63, 189.36, -27.05, 0.67)
pt3dadd(61.07, 189.88, -27.35, 0.67)
pt3dadd(61.44, 190.47, -27.65, 0.67)
pt3dadd(61.81, 191.13, -27.75, 0.67)
pt3dadd(62.77, 191.57, -28.1, 0.67)
pt3dadd(63.66, 191.79, -28.15, 0.67)
pt3dadd(64.47, 191.72, -28.35, 0.67)
pt3dadd(65.06, 191.79, -28.5, 0.67)
pt3dadd(65.73, 192.01, -28.8, 0.67)
pt3dadd(66.32, 192.46, -28.95, 0.67)
pt3dadd(66.76, 192.97, -29.05, 0.67)
pt3dadd(67.73, 193.71, -29.75, 0.67)
pt3dadd(67.73, 194.52, -29.85, 0.67)
pt3dadd(66.84, 194.89, -30, 0.67)
pt3dadd(66.4, 194.52, -31, 0.67)
pt3dadd(66.69, 194.08, -34.6, 0.67)
pt3dadd(66.17, 193.12, -34.6, 0.67)
pt3dadd(65.51, 192.46, -34.6, 0.67)
pt3dadd(64.77, 192.31, -34.6, 0.67)
pt3dadd(65.21, 193.12, -34.6, 0.67)
pt3dadd(65.88, 193.71, -34.6, 0.67)
pt3dadd(65.66, 194.52, -34.6, 0.67)
pt3dadd(65.73, 195.41, -34.6, 0.67)
pt3dadd(66.25, 195.48, -34.7, 0.67)
pt3dadd(66.91, 195.41, -35.05, 0.67)
pt3dadd(67.65, 195.11, -35.3, 0.67)
pt3dadd(67.87, 195.7, -35.6, 0.67)
pt3dadd(67.95, 196.22, -35.8, 0.67)
pt3dadd(67.58, 196.51, -36.5, 0.67)
pt3dadd(67.13, 197.03, -37.3, 0.59)
pt3dadd(66.32, 197.25, -37.6, 0.59)
pt3dadd(65.58, 197.18, -37.6, 0.59)
pt3dadd(64.62, 197.32, -37.65, 0.59)
pt3dadd(63.96, 197.4, -37.65, 0.59)
pt3dadd(63.51, 197.91, -37.65, 0.59)
pt3dadd(63.36, 198.56, -38.1, 0.59)
pt3dadd(63.36, 199.44, -38.4, 0.59)
pt3dadd(63.07, 199.81, -38.6, 0.59)
pt3dadd(62.7, 200.33, -38.95, 0.59)
pt3dadd(62.33, 200.69, -39.5, 0.59)
pt3dadd(62.1, 201.43, -39.7, 0.59)
pt3dadd(62.62, 201.73, -39.7, 0.59)
pt3dadd(63.07, 201.95, -39.9, 0.59)
pt3dadd(63.58, 202.24, -40, 0.59)
pt3dadd(64.25, 202.83, -40.3, 0.59)
pt3dadd(64.84, 203.2, -40.55, 0.59)
pt3dadd(65.58, 203.64, -40.65, 0.59)
pt3dadd(66.17, 204.09, -40.95, 0.59)
pt3dadd(66.61, 204.45, -41.2, 0.59)
pt3dadd(67.72, 204.82, -41.25, 0.59)
pt3dadd(67.94, 205.27, -41.25, 0.59)
pt3dadd(67.94, 206.37, -41.4, 0.59)
pt3dadd(68.09, 206.96, -41.75, 0.59)
pt3dadd(68.53, 207.33, -41.9, 0.59)
pt3dadd(69.35, 207.18, -42, 0.59)
pt3dadd(69.79, 207.4, -42.1, 0.59)
pt3dadd(70.23, 207.77, -42.6, 0.59)
pt3dadd(71.12, 208.29, -42.7, 0.59)
pt3dadd(71.56, 208.66, -42.75, 0.59)
pt3dadd(71.56, 209.17, -42.75, 0.59)
pt3dadd(70.83, 209.54, -42.95, 0.59)
pt3dadd(70.9, 210.13, -43.3, 0.59)
pt3dadd(70.68, 210.94, -43.4, 0.59)
pt3dadd(70.68, 211.9, -43.45, 0.59)
pt3dadd(70.31, 212.57, -43.45, 0.59)
pt3dadd(69.79, 212.94, -43.45, 0.59)
}
apic[88] {pt3dclear()
pt3dadd(54.43, 161.92, 0, 1.33)
pt3dadd(54.88, 160.78, 0.55, 1.33)
pt3dadd(55.1, 159.53, 0.45, 1.33)
pt3dadd(55.62, 158.57, 0.4, 1.33)
pt3dadd(55.32, 157.61, -2.1, 1.33)
pt3dadd(55.62, 156.5, -2.1, 1.33)
pt3dadd(56.43, 155.84, -2.05, 1.33)
pt3dadd(57.2, 155.13, -3.65, 1.7)
pt3dadd(58.3, 154.61, -4.2, 1.7)
pt3dadd(59.49, 154.1, -4.25, 2.07)
pt3dadd(60.52, 153.06, -5.3, 2.07)
pt3dadd(61.33, 151.88, -5.35, 1.92)
pt3dadd(61.78, 150.92, -5.35, 1.92)
pt3dadd(61.85, 149.15, -5.35, 1.92)
pt3dadd(62.07, 147.83, -5.4, 1.92)
pt3dadd(61.93, 146.57, -5.4, 1.55)
pt3dadd(61.19, 145.61, -5.4, 1.55)
pt3dadd(60.23, 144.36, -5.4, 1.55)
pt3dadd(59.41, 143.03, -5.4, 1.55)
pt3dadd(58.67, 142.3, -5.4, 1.55)
pt3dadd(58.23, 141.41, -5.4, 1.55)
pt3dadd(57.79, 140.38, -5.4, 1.11)
pt3dadd(57.34, 139.12, -5.4, 1.11)
pt3dadd(57.34, 137.87, -5.4, 1.11)
pt3dadd(57.86, 136.99, -5.4, 1.11)
pt3dadd(58.82, 136.32, -5.4, 1.11)
pt3dadd(59.63, 135.73, -5.4, 1.11)
pt3dadd(60.3, 135.07, -5.4, 0.96)
pt3dadd(60.97, 134.48, -5.4, 0.96)
pt3dadd(61.85, 133.89, -5.4, 0.96)
pt3dadd(62.74, 133.3, -5.4, 0.96)
pt3dadd(63.55, 132.78, -5.4, 0.96)
pt3dadd(63.7, 132.04, -4.8, 0.96)
pt3dadd(64.14, 131.31, -4.7, 0.96)
pt3dadd(64.14, 130.35, -4.35, 0.96)
pt3dadd(63.77, 129.54, -4.3, 0.96)
pt3dadd(63.03, 128.28, -4.2, 0.96)
pt3dadd(63.11, 127.32, -4.2, 0.96)
pt3dadd(63.7, 126.29, -4.15, 0.96)
pt3dadd(64.07, 125.48, -4.15, 0.96)
pt3dadd(64.36, 124.3, -4.1, 0.96)
pt3dadd(64.51, 123.42, -4.1, 0.96)
pt3dadd(64.07, 122.53, -2.45, 0.96)
}
apic[89] {pt3dclear()
pt3dadd(31.77, 148.53, 4.15, 1.33)
pt3dadd(33.06, 148.55, 4.5, 1.33)
pt3dadd(34.02, 148.84, 4.5, 1.33)
pt3dadd(34.68, 148.99, 4.5, 1.33)
pt3dadd(35.72, 149.06, 4.55, 1.33)
pt3dadd(36.46, 149.29, 4.55, 1.33)
pt3dadd(36.9, 149.29, 4.55, 1.33)
pt3dadd(37.86, 149.21, 4.55, 1.33)
pt3dadd(38.82, 149.36, 4.55, 1.33)
pt3dadd(38.97, 149.58, 4.5, 1.33)
pt3dadd(39.64, 149.58, 4.5, 1.33)
pt3dadd(40.15, 149.65, 4.45, 1.33)
pt3dadd(40.82, 149.73, 4.3, 1.33)
pt3dadd(41.11, 149.88, 4.2, 1.33)
pt3dadd(41.78, 150.1, 5.25, 1.33)
pt3dadd(42.37, 150.54, 5.35, 1.33)
pt3dadd(42.96, 150.76, 5.4, 1.33)
pt3dadd(43.7, 151.13, 5.5, 1.33)
pt3dadd(44.59, 151.42, 5.6, 1.33)
pt3dadd(45.18, 151.72, 5.65, 1.33)
pt3dadd(45.84, 152.09, 5.7, 1.33)
pt3dadd(46.81, 152.53, 5.75, 1.33)
pt3dadd(48.06, 151.87, 5.8, 1.33)
pt3dadd(48.8, 151.28, 5.8, 1.33)
pt3dadd(49.98, 151.42, 5.85, 1.33)
pt3dadd(50.94, 151.72, 6, 1.33)
pt3dadd(52.05, 151.79, 6.1, 1.33)
pt3dadd(52.87, 151.87, 6.3, 1.33)
pt3dadd(53.46, 152.16, 6.4, 1.33)
pt3dadd(54.64, 152.75, 5.85, 1.33)
pt3dadd(55.67, 153.19, 5.7, 1.33)
pt3dadd(56.86, 153.49, 5.55, 1.33)
pt3dadd(57.6, 154.01, 5.4, 1.33)
pt3dadd(58.7, 154.52, 5.35, 1.33)
pt3dadd(59.96, 154.74, 5.25, 1.33)
pt3dadd(61.14, 154.74, 5.2, 1.33)
pt3dadd(62.03, 154.82, 5.1, 1.33)
pt3dadd(63.43, 155.11, 5.05, 1.33)
pt3dadd(64.17, 155.7, 5.05, 1.33)
pt3dadd(64.91, 156.29, 5, 1.33)
pt3dadd(65.73, 157.18, 4.9, 1.33)
pt3dadd(66.02, 157.99, 4.85, 1.33)
pt3dadd(66.46, 158.28, 4.85, 1.33)
pt3dadd(67.28, 158.8, 4.55, 1.33)
pt3dadd(68.39, 159.02, 4.45, 1.33)
pt3dadd(68.83, 159.02, 4.4, 1.33)
pt3dadd(69.64, 159.02, 4.35, 1.33)
pt3dadd(70.46, 158.87, 4.35, 1.33)
pt3dadd(71.27, 158.87, 4.35, 1.33)
pt3dadd(71.86, 159.09, 4.25, 1.33)
pt3dadd(72.75, 159.46, 4.2, 1.33)
pt3dadd(73.34, 160.05, 4.15, 1.33)
pt3dadd(74.15, 160.79, 4.1, 1.33)
pt3dadd(74.74, 161.9, 4.05, 1.33)
pt3dadd(75.85, 162.27, 4, 1.33)
pt3dadd(76.74, 162.27, 4, 1.33)
pt3dadd(77.85, 161.97, 3.95, 1.33)
pt3dadd(79.18, 161.9, 3.95, 1.33)
pt3dadd(80.14, 162.12, 3.95, 1.33)
pt3dadd(80.8, 162.41, 3.9, 1.33)
pt3dadd(81.69, 162.56, 3.8, 1.33)
pt3dadd(82.43, 162.71, 3.7, 1.33)
pt3dadd(83.39, 163.3, 3.6, 1.33)
pt3dadd(84.2, 163.67, 3.5, 1.33)
pt3dadd(85.24, 163.81, 3.5, 1.33)
pt3dadd(86.2, 164.04, 3.45, 1.33)
pt3dadd(87.53, 164.18, 3.45, 1.33)
pt3dadd(88.34, 164.11, 3.45, 1.33)
pt3dadd(89.6, 164.04, 3.4, 1.33)
pt3dadd(90.49, 163.67, 3.35, 1.33)
pt3dadd(91.37, 163.3, 3.35, 1.33)
pt3dadd(92.26, 162.71, 3.3, 1.33)
pt3dadd(92.55, 162.49, 3.25, 1.33)
pt3dadd(93.37, 162.34, 2.4, 1.33)
pt3dadd(94.25, 161.75, 2, 1.18)
pt3dadd(94.77, 160.79, 2, 1.18)
pt3dadd(95.51, 160.35, 1.95, 1.03)
pt3dadd(96.4, 159.76, 1.8, 1.03)
pt3dadd(97.14, 159.83, 1.6, 1.03)
pt3dadd(97.95, 160.2, 1.5, 1.03)
pt3dadd(98.76, 160.57, 1.45, 1.03)
pt3dadd(99.35, 160.79, 1.35, 1.03)
pt3dadd(99.87, 161.09, 1.2, 1.03)
pt3dadd(100.83, 161.53, 1.15, 1.03)
pt3dadd(101.35, 161.97, 1.15, 1.03)
pt3dadd(102.16, 162.71, 1.15, 1.03)
pt3dadd(103.12, 162.71, 1.1, 1.03)
pt3dadd(103.64, 162.86, 1.1, 1.03)
}
}
proc shape3d_56() {
apic[89] { pt3dadd(104.31, 163.08, 1.1, 1.03)
pt3dadd(105.05, 163.45, 1.1, 1.03)
pt3dadd(105.56, 163.89, 1.1, 1.03)
pt3dadd(105.73, 164.34, 0.35, 1.03)
pt3dadd(106.54, 164.93, 1.7, 1.03)
pt3dadd(107.43, 165.37, 1.8, 1.03)
pt3dadd(107.95, 165.37, 1.95, 1.03)
pt3dadd(108.61, 165.59, 2.05, 1.03)
pt3dadd(109.65, 166.04, 2.25, 1.03)
pt3dadd(110.24, 166.55, 2.5, 0.89)
pt3dadd(110.39, 167.22, 2.6, 0.89)
pt3dadd(110.9, 167.95, 2.65, 0.89)
pt3dadd(111.5, 168.62, 2.75, 0.89)
pt3dadd(112.38, 169.57, 2.75, 0.89)
pt3dadd(112.97, 170.16, 2.8, 0.89)
pt3dadd(113.79, 170.61, 2.8, 0.89)
pt3dadd(114.23, 171.12, 2.8, 0.89)
pt3dadd(115.26, 171.86, 2.85, 0.89)
pt3dadd(115.78, 172.3, 2.9, 0.89)
pt3dadd(116.6, 172.89, 2.9, 0.89)
pt3dadd(117.04, 173.48, 2.9, 0.89)
pt3dadd(117.7, 174.22, 2.95, 0.89)
pt3dadd(118.3, 174.96, 2.95, 0.89)
pt3dadd(119.18, 175.47, 2.95, 0.89)
pt3dadd(120.36, 175.03, 2.95, 0.89)
pt3dadd(121.47, 174.59, 2.95, 0.89)
pt3dadd(122.06, 174, 2.95, 0.89)
pt3dadd(122.58, 173.63, 3, 0.96)
pt3dadd(123.47, 173.56, 2.95, 0.96)
pt3dadd(124.28, 173.78, 3, 0.96)
pt3dadd(124.95, 174.15, 3, 0.96)
pt3dadd(125.76, 175.11, 3, 0.96)
pt3dadd(126.5, 175.99, 3.05, 0.96)
pt3dadd(126.57, 177.02, 3.1, 0.96)
pt3dadd(126.87, 177.39, 3.1, 0.96)
pt3dadd(127.31, 178.13, 3.15, 0.96)
pt3dadd(128.12, 178.5, 3.1, 0.96)
pt3dadd(128.42, 179.24, 2.85, 0.96)
pt3dadd(128.72, 179.9, 2.7, 0.96)
pt3dadd(129.01, 180.42, 2.55, 0.96)
pt3dadd(129.31, 181.01, 2.4, 0.96)
pt3dadd(129.53, 181.96, 2.3, 0.96)
pt3dadd(129.46, 182.85, 2.2, 0.96)
pt3dadd(129.46, 183.29, 2.05, 0.81)
pt3dadd(130.27, 183.66, 2, 0.81)
pt3dadd(130.93, 183.66, 2, 0.81)
pt3dadd(131.6, 183.37, 2, 0.81)
pt3dadd(132.56, 183.37, 1.95, 0.81)
pt3dadd(132.93, 183.59, 1.95, 0.81)
pt3dadd(133.52, 184.62, 1.9, 0.81)
pt3dadd(133.67, 185.58, 1.85, 0.81)
pt3dadd(133.82, 186.09, 1.8, 0.81)
pt3dadd(134.11, 186.54, 1.75, 0.81)
pt3dadd(134.7, 187.05, 1.75, 0.81)
pt3dadd(135.52, 187.2, 1.75, 0.81)
pt3dadd(136.18, 187.35, 1.7, 0.81)
pt3dadd(136.85, 186.76, 1.7, 0.81)
pt3dadd(137.44, 186.24, 1.7, 0.81)
pt3dadd(138.1, 186.46, 1.7, 0.81)
pt3dadd(138.92, 186.83, 0.9, 0.81)
pt3dadd(138.77, 187.64, 0.8, 0.96)
pt3dadd(139.21, 188.75, 0.7, 0.96)
pt3dadd(139.88, 189.56, 0.65, 0.96)
pt3dadd(140.54, 190.45, 0.65, 0.96)
pt3dadd(141.06, 191.18, 0.35, 0.96)
pt3dadd(141.8, 191.55, 0.3, 0.96)
pt3dadd(142.69, 192.14, 0.25, 0.96)
pt3dadd(143.72, 192.29, 0.25, 0.96)
pt3dadd(144.68, 191.77, 0.25, 0.96)
pt3dadd(145.42, 191.77, 0.25, 0.96)
pt3dadd(146.53, 191.55, 0.25, 0.96)
pt3dadd(147.05, 191.77, 0.2, 0.96)
pt3dadd(147.71, 191.92, -0.1, 0.96)
pt3dadd(148.82, 191.77, -0.3, 0.96)
pt3dadd(149.63, 191.18, -0.35, 0.96)
pt3dadd(150.3, 190.52, -0.35, 0.96)
pt3dadd(150.59, 189.71, -0.5, 0.96)
pt3dadd(150.74, 189.04, -0.5, 0.96)
pt3dadd(151.41, 188.6, -0.7, 0.96)
pt3dadd(152.15, 188.45, -0.9, 0.96)
pt3dadd(153.11, 188.68, -0.95, 0.96)
pt3dadd(154, 188.73, -1.35, 0.96)
pt3dadd(154.59, 189.1, -1.35, 0.96)
pt3dadd(155.18, 189.62, -1.35, 0.81)
pt3dadd(155.47, 190.21, -1.4, 0.81)
pt3dadd(155.92, 190.73, -1.8, 0.81)
pt3dadd(156.51, 191.39, -1.85, 0.81)
pt3dadd(157.25, 191.76, -1.85, 0.81)
pt3dadd(158.06, 191.61, -1.85, 0.81)
pt3dadd(158.73, 191.68, -1.8, 0.81)
pt3dadd(159.1, 192.2, -1.75, 0.81)
pt3dadd(159.61, 192.72, -1.75, 0.81)
pt3dadd(160.94, 192.35, -1.65, 0.74)
pt3dadd(161.46, 192.42, -1.6, 0.74)
pt3dadd(162.05, 192.72, -1.55, 0.74)
pt3dadd(162.57, 193.01, -1.55, 0.74)
pt3dadd(163.46, 193.31, -1.55, 0.74)
pt3dadd(164.05, 193.53, -1.5, 0.74)
pt3dadd(164.71, 193.45, -1.4, 0.74)
pt3dadd(165.45, 193.08, -1.4, 0.74)
pt3dadd(166.26, 192.94, -1.35, 0.74)
pt3dadd(167.23, 192.72, -1.35, 0.74)
pt3dadd(167.89, 192.35, -1.3, 0.74)
pt3dadd(168.56, 192.05, -2.65, 0.81)
pt3dadd(169.44, 191.76, -2.65, 0.81)
pt3dadd(170.26, 191.17, -2.65, 0.81)
pt3dadd(170.77, 190.36, -2.65, 0.67)
pt3dadd(171.22, 190.06, -2.65, 0.67)
pt3dadd(171.96, 189.4, -2.65, 0.67)
pt3dadd(172.25, 188.51, -2.65, 0.67)
pt3dadd(172.92, 188.22, -2.65, 0.67)
pt3dadd(173.66, 188.44, -2.65, 0.67)
pt3dadd(174.25, 188.51, -2.65, 0.67)
pt3dadd(175.13, 188.51, -2.6, 0.67)
pt3dadd(175.65, 188.22, -2.6, 0.67)
pt3dadd(176.54, 188, -2.6, 0.67)
pt3dadd(177.2, 187.33, -2.55, 0.67)
pt3dadd(177.06, 186.67, -2.55, 0.67)
}
apic[90] {pt3dclear()
pt3dadd(18.5, 87.16, 2.85, 2.29)
pt3dadd(17.38, 88.11, 3.8, 2.29)
pt3dadd(17.01, 88.62, 3.8, 2.29)
pt3dadd(16.57, 89.21, 3.85, 2.29)
pt3dadd(16.12, 89.58, 3.85, 2.29)
pt3dadd(15.68, 90.02, 3.85, 2.29)
pt3dadd(15.24, 90.47, 3.85, 2.29)
pt3dadd(14.5, 91.5, 3.75, 2.29)
pt3dadd(13.98, 92.38, 3.05, 2.29)
pt3dadd(13.83, 93.34, 2.9, 2.29)
pt3dadd(13.91, 94.08, 2.85, 2.29)
pt3dadd(13.83, 94.82, 2.8, 2.29)
pt3dadd(13.31, 95.63, 2.8, 2.29)
pt3dadd(13.09, 96.51, 2.75, 2.29)
pt3dadd(13.02, 97.77, 2.75, 2.29)
pt3dadd(12.72, 98.43, 2.7, 2.66)
pt3dadd(12.43, 99.98, 2.65, 2.66)
pt3dadd(12.35, 101.16, 2.65, 2.96)
pt3dadd(12.13, 102.04, 2.65, 2.96)
pt3dadd(11.54, 103.44, 2.3, 2.96)
pt3dadd(11.39, 104.48, 2.25, 2.96)
pt3dadd(10.95, 105.58, 5.55, 2.96)
pt3dadd(10.78, 106.59, 5.55, 2.96)
}
apic[91] {pt3dclear()
pt3dadd(10.78, 106.59, 5.55, 2.96)
pt3dadd(10.51, 107.35, 5.45, 2.96)
pt3dadd(10.58, 108.39, 3.7, 2.73)
}
apic[92] {pt3dclear()
pt3dadd(10.58, 108.39, 3.7, 1.92)
pt3dadd(9.62, 109.64, 5.7, 1.92)
pt3dadd(9.18, 110.97, 6.25, 1.77)
pt3dadd(8.44, 112, 6, 1.77)
pt3dadd(7.77, 112.66, 5.55, 1.77)
pt3dadd(6.96, 113.33, 5.3, 1.77)
pt3dadd(6.44, 114.14, 5.15, 1.77)
pt3dadd(5.92, 115.02, 5.05, 1.77)
pt3dadd(5.7, 115.98, 4.95, 1.63)
pt3dadd(5.41, 117.01, 4.9, 1.63)
pt3dadd(4.81, 117.6, 4.9, 1.63)
pt3dadd(4.74, 118.56, 4.9, 1.63)
pt3dadd(4.37, 119.08, 4.9, 1.63)
pt3dadd(4, 119.82, 4.85, 1.63)
pt3dadd(3.56, 120.33, 4.8, 1.63)
pt3dadd(2.97, 120.78, 4.75, 1.48)
pt3dadd(2.15, 121.07, 4.75, 1.33)
pt3dadd(1.41, 121.73, 4.75, 1.33)
pt3dadd(0.82, 122.1, 4.75, 1.33)
pt3dadd(0.31, 122.4, 4.75, 1.33)
pt3dadd(-0.21, 122.77, 4.75, 1.33)
pt3dadd(-0.46, 123.36, 4.55, 1.33)
pt3dadd(-1.27, 123.87, 3.65, 1.33)
pt3dadd(-1.93, 124.39, 3.55, 1.33)
pt3dadd(-2.45, 124.76, 3.45, 1.33)
pt3dadd(-2.75, 125.27, 3.2, 1.33)
pt3dadd(-3.04, 126.01, 3.1, 1.33)
pt3dadd(-3.34, 126.38, 3.1, 1.33)
pt3dadd(-3.56, 127.19, 3.05, 1.33)
pt3dadd(-3.71, 127.78, 3.05, 1.33)
pt3dadd(-3.71, 128.44, 3, 1.33)
pt3dadd(-4.08, 128.96, 3, 1.33)
pt3dadd(-4.37, 129.4, 2.95, 1.33)
pt3dadd(-4.74, 129.84, 2.9, 1.33)
pt3dadd(-5.19, 130.36, 2.9, 1.33)
pt3dadd(-5.78, 131.02, 2.85, 1.26)
pt3dadd(-6.3, 131.47, 2.85, 1.26)
pt3dadd(-6.74, 131.98, 2.85, 1.26)
pt3dadd(-7.48, 132.57, 2.85, 1.26)
}
apic[93] {pt3dclear()
pt3dadd(-7.48, 132.57, 2.85, 0.96)
pt3dadd(-7.85, 133.31, 2.55, 0.96)
pt3dadd(-8.22, 134.05, 2.4, 0.96)
pt3dadd(-8.66, 134.42, 2.4, 0.96)
pt3dadd(-9.4, 135.08, 2.35, 0.81)
pt3dadd(-9.84, 136.11, 2.35, 0.81)
pt3dadd(-9.84, 136.63, 2.35, 0.81)
pt3dadd(-9.99, 137.51, 2.35, 0.81)
pt3dadd(-10.14, 138.33, 2.3, 0.81)
pt3dadd(-10.06, 139.36, 2.3, 0.81)
pt3dadd(-10.21, 140.24, 2.3, 0.81)
pt3dadd(-10.36, 140.76, 2.3, 0.81)
pt3dadd(-10.66, 141.35, 2.3, 0.81)
pt3dadd(-10.8, 142.16, 1.95, 0.81)
pt3dadd(-11.17, 142.68, 1.85, 0.81)
pt3dadd(-11.69, 143.41, 2.65, 0.81)
pt3dadd(-11.99, 144.23, 2.95, 0.81)
}
}
proc shape3d_57() {
apic[93] { pt3dadd(-12.21, 145.18, 3.15, 0.81)
pt3dadd(-12.5, 145.77, 3.25, 0.81)
pt3dadd(-12.8, 146.81, 3.35, 0.81)
pt3dadd(-13.24, 147.47, 3.4, 0.81)
pt3dadd(-13.61, 148.13, 3.45, 0.81)
pt3dadd(-14.43, 148.8, 3.5, 0.89)
pt3dadd(-14.94, 149.39, 3.5, 0.89)
pt3dadd(-15.39, 149.76, 3.55, 0.89)
pt3dadd(-15.98, 150.27, 3.55, 0.89)
pt3dadd(-16.27, 150.94, 3.6, 0.89)
pt3dadd(-16.64, 151.53, 3.65, 0.89)
pt3dadd(-17.09, 152.19, 3.75, 0.89)
pt3dadd(-17.68, 153, 3.7, 0.89)
pt3dadd(-18.19, 153.44, 3.65, 0.89)
pt3dadd(-18.19, 154.11, 3.5, 0.89)
pt3dadd(-18.64, 154.4, 3.4, 0.89)
pt3dadd(-19.01, 154.92, 3.35, 0.89)
pt3dadd(-19.31, 155.68, 3.1, 0.74)
pt3dadd(-19.68, 156.27, 3.1, 0.74)
pt3dadd(-20.27, 156.94, 3.1, 0.74)
pt3dadd(-20.64, 157.6, 3.1, 0.74)
pt3dadd(-20.93, 158.41, 3.1, 0.74)
pt3dadd(-21.3, 158.85, 3.1, 0.74)
pt3dadd(-21.6, 159.52, 3.05, 0.74)
pt3dadd(-21.9, 160.25, 3, 0.74)
pt3dadd(-21.97, 161.14, 3, 0.74)
pt3dadd(-22.19, 161.95, 3, 0.74)
pt3dadd(-22.26, 163.06, 2.85, 0.74)
pt3dadd(-22.78, 164.01, 2.75, 0.74)
pt3dadd(-23, 164.68, 2.75, 0.74)
pt3dadd(-22.93, 165.49, 2.7, 0.74)
pt3dadd(-22.78, 166.23, 2.7, 0.74)
pt3dadd(-23, 166.82, 2.7, 0.74)
pt3dadd(-23.23, 167.26, 2.65, 0.74)
pt3dadd(-23.6, 167.78, 2.65, 0.74)
pt3dadd(-23.89, 168.44, 2.6, 0.74)
pt3dadd(-24.26, 169.18, 2.55, 0.74)
pt3dadd(-24.85, 169.55, 3.15, 0.74)
pt3dadd(-25.37, 170.36, 3.35, 0.74)
pt3dadd(-25.66, 170.73, 3.45, 0.74)
pt3dadd(-25.74, 171.46, 3.45, 0.74)
pt3dadd(-26.03, 172.42, 3.4, 0.74)
pt3dadd(-26.26, 173.23, 3.4, 0.74)
pt3dadd(-26.92, 173.45, 4.4, 0.74)
pt3dadd(-27.51, 173.82, 4.5, 0.74)
pt3dadd(-27.96, 174.19, 4.6, 0.74)
pt3dadd(-28.33, 174.63, 4.65, 0.74)
pt3dadd(-28.33, 175.22, 4.7, 0.59)
pt3dadd(-28.55, 176.4, 4.75, 0.59)
pt3dadd(-28.84, 176.92, 4.75, 0.59)
pt3dadd(-28.99, 177.44, 4.75, 0.59)
pt3dadd(-29.21, 178.1, 4.75, 0.59)
pt3dadd(-29.58, 178.69, 4.75, 0.59)
pt3dadd(-29.88, 179.13, 4.85, 0.59)
pt3dadd(-30.25, 179.5, 4.9, 0.59)
pt3dadd(-30.69, 180.02, 4.2, 0.59)
pt3dadd(-30.84, 180.61, 4.1, 0.59)
pt3dadd(-31.5, 181.27, 4.05, 0.59)
pt3dadd(-31.65, 181.94, 4, 0.59)
pt3dadd(-31.87, 182.3, 3.95, 0.59)
pt3dadd(-32.02, 183.34, 3.95, 0.59)
pt3dadd(-32.39, 183.93, 3.85, 0.59)
pt3dadd(-32.69, 184.44, 3.75, 0.59)
pt3dadd(-33.28, 185.03, 4.25, 0.59)
pt3dadd(-33.5, 185.77, 4.35, 0.59)
pt3dadd(-33.79, 186.21, 4.45, 0.59)
pt3dadd(-34.31, 186.51, 4.5, 0.59)
pt3dadd(-35.05, 187.25, 4.55, 0.59)
pt3dadd(-35.17, 188.28, 4.7, 0.59)
pt3dadd(-35.47, 189.53, 4.8, 0.59)
pt3dadd(-35.99, 190.27, 4.85, 0.59)
pt3dadd(-36.06, 190.93, 4.9, 0.59)
pt3dadd(-36.36, 191.52, 5.05, 0.59)
pt3dadd(-36.5, 192.04, 5.2, 0.59)
pt3dadd(-36.65, 192.92, 5.25, 0.59)
pt3dadd(-36.87, 193.36, 5.35, 0.59)
pt3dadd(-37.17, 193.88, 5.35, 0.59)
pt3dadd(-37.54, 194.62, 5.4, 0.59)
pt3dadd(-37.46, 195.28, 5.4, 0.59)
pt3dadd(-37.54, 195.87, 5.4, 0.59)
pt3dadd(-37.76, 196.39, 5.45, 0.59)
pt3dadd(-37.91, 196.61, 5.45, 0.59)
pt3dadd(-38.2, 197.35, 5.45, 0.59)
pt3dadd(-38.35, 198.38, 5.55, 0.59)
pt3dadd(-38.72, 199.04, 5.6, 0.59)
pt3dadd(-39.02, 199.56, 5.6, 0.59)
pt3dadd(-39.24, 200, 5.6, 0.59)
pt3dadd(-39.46, 200.37, 5.6, 0.59)
pt3dadd(-39.76, 201.03, 5.65, 0.59)
pt3dadd(-39.9, 201.48, 5.75, 0.59)
pt3dadd(-40.13, 202.14, 5.9, 0.59)
pt3dadd(-40.35, 202.58, 6, 0.59)
pt3dadd(-40.57, 203.1, 6.1, 0.59)
pt3dadd(-41.01, 203.54, 6.2, 0.59)
pt3dadd(-41.16, 204.35, 6.3, 0.59)
pt3dadd(-41.53, 205.39, 6.3, 0.59)
pt3dadd(-41.68, 205.98, 6.35, 0.59)
pt3dadd(-41.75, 206.79, 6.35, 0.59)
pt3dadd(-41.9, 207.52, 6.4, 0.59)
pt3dadd(-42.2, 208.11, 6.4, 0.59)
pt3dadd(-42.64, 208.56, 6.4, 0.59)
pt3dadd(-43.08, 209.07, 6.5, 0.59)
pt3dadd(-43.82, 209.66, 5.85, 0.52)
pt3dadd(-43.97, 210.92, 5.6, 0.52)
pt3dadd(-44.12, 211.88, 5.6, 0.52)
pt3dadd(-44.12, 212.98, 5.55, 0.52)
pt3dadd(-43.97, 213.79, 5.55, 0.52)
pt3dadd(-44.34, 214.6, 5.55, 0.52)
pt3dadd(-44.71, 215.64, 5.45, 0.52)
pt3dadd(-45.37, 216.37, 5.35, 0.52)
pt3dadd(-45.37, 217.11, 5.5, 0.52)
pt3dadd(-45.96, 217.7, 5.6, 0.52)
pt3dadd(-46.26, 218.07, 5.7, 0.52)
pt3dadd(-46.78, 218.88, 5.8, 0.52)
pt3dadd(-47, 219.62, 5.85, 0.52)
pt3dadd(-47.1, 220.6, 6, 0.52)
pt3dadd(-47.17, 221.7, 6.05, 0.52)
pt3dadd(-47.02, 222.81, 6.15, 0.52)
pt3dadd(-47.17, 223.47, 6.2, 0.52)
pt3dadd(-47.76, 223.77, 6.25, 0.52)
pt3dadd(-48.43, 223.84, 6.25, 0.52)
pt3dadd(-49.02, 224.43, 6.3, 0.52)
pt3dadd(-48.8, 225.32, 6.3, 0.52)
pt3dadd(-49.53, 226.2, 6.35, 0.52)
pt3dadd(-49.53, 227.46, 6.35, 0.52)
pt3dadd(-49.61, 228.34, 6.4, 0.52)
pt3dadd(-49.83, 228.93, 6.45, 0.52)
pt3dadd(-50.13, 229.37, 6.45, 0.52)
pt3dadd(-50.64, 229.96, 6.5, 0.52)
pt3dadd(-51.09, 230.85, 6.55, 0.44)
pt3dadd(-51.6, 231.29, 6.55, 0.44)
pt3dadd(-51.75, 231.88, 6.6, 0.44)
pt3dadd(-51.97, 232.54, 6.8, 0.44)
pt3dadd(-52.27, 233.43, 6.9, 0.44)
pt3dadd(-52.64, 234.02, 6.95, 0.44)
pt3dadd(-53.23, 235.05, 7, 0.44)
pt3dadd(-54.04, 235.49, 7, 0.44)
pt3dadd(-54.93, 235.27, 7.05, 0.44)
pt3dadd(-55.45, 234.98, 7.05, 0.44)
pt3dadd(-55.89, 234.46, 7.05, 0.44)
pt3dadd(-56.56, 234.09, 7.05, 0.44)
}
apic[94] {pt3dclear()
pt3dadd(-7.48, 132.57, 2.85, 0.59)
pt3dadd(-8.07, 132.62, 2.55, 0.59)
pt3dadd(-8.66, 132.77, 2.45, 0.59)
pt3dadd(-9.33, 133.06, 2.35, 0.59)
pt3dadd(-9.77, 133.43, 2.3, 0.59)
pt3dadd(-10.14, 133.8, 2.25, 0.59)
pt3dadd(-10.51, 134.17, 2.25, 0.59)
pt3dadd(-10.73, 134.54, 2.2, 0.59)
pt3dadd(-10.88, 135.13, 2.15, 0.59)
pt3dadd(-11.32, 135.79, 2.1, 0.59)
pt3dadd(-11.4, 136.45, 2.1, 0.59)
pt3dadd(-11.62, 137.19, 2.05, 0.67)
pt3dadd(-11.69, 137.63, 2.05, 0.67)
pt3dadd(-11.62, 138.15, 2.05, 0.67)
pt3dadd(-11.69, 138.66, 2.05, 0.67)
pt3dadd(-12.06, 139.03, 2, 0.67)
pt3dadd(-12.36, 139.25, 2, 0.67)
pt3dadd(-12.8, 139.62, 2, 0.67)
pt3dadd(-13.46, 140.29, 1.95, 0.67)
pt3dadd(-14.06, 140.88, 1.95, 0.67)
pt3dadd(-14.28, 141.25, 1.95, 0.67)
pt3dadd(-14.57, 141.54, 1.95, 0.67)
pt3dadd(-15.02, 141.84, 1.95, 0.67)
pt3dadd(-15.24, 141.98, 1.9, 0.67)
pt3dadd(-15.61, 142.28, 1.85, 0.67)
pt3dadd(-16.2, 142.57, 1.8, 0.67)
pt3dadd(-16.49, 143.24, 1.75, 0.67)
pt3dadd(-16.57, 144.05, 1.75, 0.67)
pt3dadd(-16.72, 144.71, 1.75, 0.67)
pt3dadd(-17.01, 145.23, 1.75, 0.67)
pt3dadd(-17.38, 145.67, 1.7, 0.67)
pt3dadd(-17.83, 146.04, 1.7, 0.67)
pt3dadd(-18.56, 146.26, 0.45, 0.67)
pt3dadd(-19.3, 146.33, 0.4, 0.67)
pt3dadd(-20.12, 146.48, 0.4, 0.67)
pt3dadd(-20.78, 146.33, 0.4, 0.67)
pt3dadd(-21.45, 146.19, 0.4, 0.67)
pt3dadd(-22.26, 146.11, 0.4, 0.67)
pt3dadd(-22.7, 146.11, 0.4, 0.67)
pt3dadd(-23.07, 146.41, 0.4, 0.67)
pt3dadd(-23.29, 146.85, 0.4, 0.67)
pt3dadd(-23.66, 147.44, 0.4, 0.67)
pt3dadd(-23.89, 148.1, 0.4, 0.67)
pt3dadd(-24.11, 148.4, 0.4, 0.67)
pt3dadd(-24.77, 148.69, 0.4, 0.67)
pt3dadd(-25.44, 149.14, 0.4, 0.67)
pt3dadd(-26.1, 149.06, 0.4, 0.67)
pt3dadd(-26.69, 149.8, 0.4, 0.67)
pt3dadd(-27.14, 150.69, 0.4, 0.67)
pt3dadd(-27.43, 151.28, 0.4, 0.67)
pt3dadd(-27.95, 151.87, 0.35, 0.67)
pt3dadd(-28.62, 152.16, 0.35, 0.67)
pt3dadd(-29.21, 152.16, 0.3, 0.67)
pt3dadd(-30.09, 151.87, 0.3, 0.67)
pt3dadd(-31.13, 151.64, 0.85, 0.81)
pt3dadd(-31.72, 151.5, 1, 0.81)
pt3dadd(-32.46, 151.87, 1.25, 1.11)
pt3dadd(-33.12, 152.31, 1.25, 1.11)
pt3dadd(-33.79, 152.68, 1.3, 1.11)
}
}
proc shape3d_58() {
apic[94] { pt3dadd(-34.38, 153.05, 1.3, 1.11)
pt3dadd(-35.05, 153.12, 1.3, 1.11)
pt3dadd(-35.56, 153.19, 1.05, 0.67)
pt3dadd(-36.3, 153.34, 0.95, 0.67)
pt3dadd(-36.97, 153.71, 0.9, 0.67)
pt3dadd(-37.56, 154.15, 0.85, 0.67)
pt3dadd(-37.93, 154.52, 0.8, 0.67)
pt3dadd(-38.52, 154.96, 0.75, 0.67)
pt3dadd(-38.59, 155.63, 0.4, 0.67)
pt3dadd(-38.37, 156.59, 0.35, 0.67)
pt3dadd(-37.85, 157.18, 0.3, 0.67)
pt3dadd(-37.71, 157.99, -0.1, 0.67)
pt3dadd(-38.08, 158.72, -0.15, 0.67)
pt3dadd(-38.3, 159.17, -0.2, 0.67)
pt3dadd(-38.82, 159.76, -0.4, 0.67)
pt3dadd(-39.11, 160.35, -0.45, 0.67)
pt3dadd(-39.48, 160.64, -0.5, 0.67)
pt3dadd(-40, 161.01, -0.55, 0.67)
pt3dadd(-40.29, 161.67, -0.6, 0.67)
pt3dadd(-40.88, 162.19, -0.6, 0.67)
pt3dadd(-41.33, 162.85, -0.65, 0.67)
pt3dadd(-42.29, 163.15, -0.95, 0.67)
pt3dadd(-42.51, 163.81, -1, 0.67)
pt3dadd(-42.58, 164.4, -1, 0.67)
pt3dadd(-42.58, 165.44, -1.05, 0.67)
pt3dadd(-42.65, 165.86, -2.1, 0.52)
pt3dadd(-43.02, 166.23, -2.1, 0.52)
pt3dadd(-43.31, 166.6, -2.25, 0.52)
pt3dadd(-43.68, 167.19, -2.35, 0.52)
pt3dadd(-43.9, 167.63, -1.75, 0.52)
pt3dadd(-43.68, 168.29, -1.6, 0.52)
pt3dadd(-43.98, 168.59, -1.45, 0.67)
pt3dadd(-43.98, 169.33, -1.35, 0.67)
pt3dadd(-44.27, 169.77, -1.3, 0.67)
pt3dadd(-44.5, 170.58, -0.65, 0.67)
pt3dadd(-44.57, 171.46, -0.75, 0.67)
pt3dadd(-44.79, 172.35, -0.7, 0.67)
pt3dadd(-45.01, 173.23, -0.7, 0.67)
pt3dadd(-45.68, 173.75, -0.65, 0.67)
pt3dadd(-45.75, 174.41, -0.65, 0.67)
pt3dadd(-46.12, 174.71, -0.65, 0.67)
pt3dadd(-46.64, 174.71, -0.65, 0.52)
pt3dadd(-47.3, 174.41, -0.65, 0.52)
}
apic[95] {pt3dclear()
pt3dadd(10.58, 108.39, 3.7, 0.89)
pt3dadd(11.38, 108.97, 0.9, 0.89)
pt3dadd(11.53, 110.07, 1, 0.89)
pt3dadd(11.38, 110.96, 1.25, 0.89)
pt3dadd(11.16, 111.47, 1.3, 0.89)
pt3dadd(11.01, 112.14, 1.35, 0.89)
pt3dadd(10.42, 112.51, 1.4, 0.89)
pt3dadd(9.76, 112.95, -0.05, 0.89)
pt3dadd(9.39, 113.39, -0.05, 0.89)
pt3dadd(8.94, 113.68, -0.05, 0.89)
pt3dadd(8.57, 114.2, -0.05, 0.89)
pt3dadd(8.28, 114.57, -0.05, 0.89)
pt3dadd(7.98, 115.45, 0.05, 0.89)
pt3dadd(7.69, 116.04, 0.1, 0.89)
pt3dadd(7.54, 116.49, 0.1, 0.89)
pt3dadd(7.24, 117.15, 0.15, 0.89)
pt3dadd(6.95, 117.67, 0.2, 0.89)
pt3dadd(6.73, 118.4, 0.2, 0.89)
pt3dadd(6.28, 118.85, 0.2, 0.89)
pt3dadd(5.77, 119.14, 0.25, 0.89)
pt3dadd(5.4, 119.66, 0.3, 0.89)
pt3dadd(5.47, 120.47, 0.35, 0.89)
pt3dadd(5.32, 121.21, 0.4, 0.89)
pt3dadd(5.32, 121.8, 0.5, 0.89)
pt3dadd(5.1, 122.02, 0.5, 0.89)
pt3dadd(4.88, 122.31, 0.55, 0.89)
pt3dadd(4.44, 122.83, 0.55, 0.89)
pt3dadd(4.21, 123.35, 0.6, 0.89)
pt3dadd(3.62, 123.64, 0.7, 0.89)
pt3dadd(3.1, 124.08, 0.45, 0.89)
pt3dadd(2.51, 124.38, 0.25, 0.89)
pt3dadd(2.07, 124.75, 0.1, 0.89)
pt3dadd(1.63, 125.34, -0.05, 0.89)
pt3dadd(1.33, 126.07, -0.2, 0.89)
pt3dadd(1.04, 126.74, -0.25, 0.89)
pt3dadd(0.67, 127.48, -0.35, 0.89)
pt3dadd(0.52, 128.07, -0.35, 0.89)
pt3dadd(0.37, 128.8, -0.55, 0.89)
pt3dadd(-0.07, 129.69, -0.65, 0.89)
pt3dadd(-0.37, 130.28, -0.7, 0.89)
pt3dadd(-1.03, 130.65, -0.75, 0.89)
pt3dadd(-1.85, 130.94, -0.8, 0.89)
pt3dadd(-2.36, 131.24, -0.85, 0.89)
pt3dadd(-2.81, 131.46, -0.85, 0.89)
pt3dadd(-3.33, 131.61, -0.85, 0.89)
pt3dadd(-4.06, 131.97, -0.85, 0.89)
pt3dadd(-4.36, 132.2, -0.9, 0.89)
pt3dadd(-4.95, 132.49, -0.9, 0.89)
pt3dadd(-5.39, 132.79, -0.9, 0.89)
pt3dadd(-5.84, 133.15, -0.95, 0.89)
pt3dadd(-6.58, 133.52, -0.95, 0.89)
pt3dadd(-7.17, 133.97, -0.95, 0.89)
pt3dadd(-7.61, 134.33, -0.95, 0.89)
pt3dadd(-7.61, 135, -0.95, 0.89)
pt3dadd(-7.98, 135.88, -0.95, 0.89)
pt3dadd(-8.28, 136.55, -0.95, 0.89)
pt3dadd(-8.57, 137.28, -1, 0.89)
pt3dadd(-8.79, 137.87, -1.15, 1.03)
pt3dadd(-9.09, 138.39, -1.15, 1.03)
pt3dadd(-9.31, 138.76, -1.6, 1.03)
pt3dadd(-9.61, 139.28, -1.6, 1.03)
pt3dadd(-10.2, 139.79, -1.65, 1.03)
pt3dadd(-10.42, 140.38, -1.65, 1.03)
pt3dadd(-10.57, 140.6, -1.65, 1.03)
pt3dadd(-11.46, 141.12, -1.65, 1.03)
pt3dadd(-11.92, 141.67, -1.65, 1.03)
pt3dadd(-12.58, 142.18, -1.65, 1.03)
pt3dadd(-13.03, 142.4, -1.65, 1.03)
pt3dadd(-13.4, 142.7, -1.65, 1.03)
pt3dadd(-13.91, 143.07, -1.65, 1.03)
pt3dadd(-14.8, 143.29, -1.65, 1.03)
pt3dadd(-15.61, 143.51, -1.65, 1.03)
pt3dadd(-16.2, 143.73, -1.65, 1.03)
pt3dadd(-16.65, 143.8, -1.65, 1.03)
pt3dadd(-17.46, 144.03, -1.65, 1.03)
pt3dadd(-18.35, 143.8, -1.45, 1.03)
pt3dadd(-19.31, 144.25, -1.4, 1.03)
pt3dadd(-19.83, 144.54, -1.4, 1.03)
pt3dadd(-20.19, 144.76, -1.4, 1.03)
pt3dadd(-20.86, 144.76, -1.4, 1.03)
pt3dadd(-21.67, 144.91, -1.35, 1.03)
pt3dadd(-22.49, 145.13, -1.35, 1.03)
pt3dadd(-23, 145.65, -1.65, 1.03)
pt3dadd(-23.59, 146.09, -1.85, 0.96)
pt3dadd(-24.33, 146.53, -1.9, 0.96)
pt3dadd(-24.78, 146.9, -1.9, 0.96)
pt3dadd(-25.22, 147.34, -1.95, 0.96)
pt3dadd(-25.96, 148.01, -1.95, 0.96)
pt3dadd(-26.11, 149.11, -1.95, 0.96)
pt3dadd(-25.81, 149.63, -1.95, 0.96)
pt3dadd(-25.96, 150.22, -1.95, 0.96)
pt3dadd(-25.96, 151.1, -2, 0.96)
pt3dadd(-25.59, 152.06, -2, 0.96)
pt3dadd(-26.03, 152.95, -2, 0.96)
pt3dadd(-26.26, 153.69, -2, 1.03)
pt3dadd(-26.7, 154.28, -2, 1.03)
pt3dadd(-27.29, 155.09, -2, 1.03)
pt3dadd(-27.96, 155.9, -2, 1.03)
pt3dadd(-28.25, 156.41, -2, 1.03)
pt3dadd(-28.62, 157.15, -2, 1.03)
pt3dadd(-28.99, 157.74, -2, 1.03)
pt3dadd(-29.06, 158.48, -2.05, 0.89)
pt3dadd(-29.73, 158.92, -2.05, 0.89)
pt3dadd(-30.32, 159.36, -2.1, 0.89)
pt3dadd(-30.91, 159.95, -2.1, 0.89)
pt3dadd(-31.28, 160.4, -2.3, 0.89)
pt3dadd(-31.5, 160.91, -2.3, 0.89)
pt3dadd(-31.58, 162.24, -1.95, 0.89)
pt3dadd(-32.02, 163.2, -1.85, 0.89)
pt3dadd(-32.39, 163.72, -1.8, 0.89)
pt3dadd(-32.32, 164.53, -1.75, 0.89)
pt3dadd(-32.32, 165.26, -1.7, 0.89)
pt3dadd(-32.54, 165.78, -1.7, 0.89)
pt3dadd(-32.91, 166.44, -1.7, 0.89)
pt3dadd(-33.06, 167.11, -1.65, 0.89)
pt3dadd(-33.13, 167.85, -1.65, 0.89)
pt3dadd(-33.5, 168.51, -1.65, 0.89)
pt3dadd(-33.35, 169.1, -1.65, 0.89)
pt3dadd(-33.65, 170.13, -1.65, 0.89)
pt3dadd(-34.24, 170.72, -1.6, 0.89)
pt3dadd(-34.68, 171.09, -1.6, 0.89)
pt3dadd(-35.27, 171.75, -1.6, 1.03)
pt3dadd(-35.64, 172.27, -1.6, 1.03)
pt3dadd(-36.01, 172.64, -1.6, 1.03)
pt3dadd(-36.16, 173.23, -1.6, 1.03)
pt3dadd(-36.38, 173.89, -1.6, 1.03)
pt3dadd(-36.67, 174.31, -0.9, 1.03)
pt3dadd(-37.04, 174.68, -1, 1.03)
pt3dadd(-37.33, 175.12, -1.05, 1.03)
pt3dadd(-37.41, 175.49, -1.15, 1.03)
pt3dadd(-37.93, 175.71, -1.2, 1.03)
pt3dadd(-38.22, 176.08, -1.3, 1.03)
pt3dadd(-38.66, 176.67, -1.4, 1.03)
pt3dadd(-38.89, 176.89, -0.9, 1.03)
pt3dadd(-39.26, 177.41, -0.7, 1.03)
pt3dadd(-39.4, 177.78, -0.55, 1.03)
pt3dadd(-39.7, 178.44, -0.45, 1.03)
pt3dadd(-39.7, 178.66, -0.35, 0.89)
pt3dadd(-39.77, 179.11, -0.3, 0.89)
pt3dadd(-40, 179.77, -0.25, 0.89)
pt3dadd(-40, 180.29, -0.25, 0.89)
pt3dadd(-40.07, 181.17, -0.4, 0.89)
pt3dadd(-39.77, 181.91, -0.45, 0.89)
pt3dadd(-39.7, 182.79, -0.55, 0.89)
pt3dadd(-39.77, 183.16, -0.6, 0.89)
pt3dadd(-40, 183.53, -0.7, 0.89)
pt3dadd(-40.44, 183.9, -0.8, 0.89)
pt3dadd(-40.81, 184.49, -2.1, 0.89)
pt3dadd(-41.55, 184.86, -2.2, 0.89)
pt3dadd(-41.84, 185.08, -2.4, 0.89)
pt3dadd(-42.29, 185.45, -2.5, 0.89)
pt3dadd(-42.66, 186.04, -2.6, 0.89)
pt3dadd(-43.25, 186.41, -2.7, 0.89)
pt3dadd(-43.54, 186.92, -2.85, 0.89)
pt3dadd(-43.76, 187.51, -3, 0.89)
pt3dadd(-43.76, 188.25, -3.05, 0.89)
pt3dadd(-43.99, 188.69, -3.1, 0.89)
}
}
proc shape3d_59() {
apic[95] { pt3dadd(-44.36, 188.99, -3.2, 0.89)
pt3dadd(-44.58, 189.5, -3.25, 0.89)
pt3dadd(-44.87, 189.95, -3.25, 0.89)
pt3dadd(-45.46, 190.32, -3, 0.89)
pt3dadd(-46.06, 191.05, -2.5, 0.89)
pt3dadd(-46.72, 191.64, -2.4, 0.89)
pt3dadd(-47.24, 192.23, -2.3, 0.89)
pt3dadd(-47.61, 193.04, -2.25, 0.89)
pt3dadd(-47.68, 193.34, -1.85, 0.81)
pt3dadd(-48.05, 194.15, -2.6, 0.81)
pt3dadd(-48.79, 194.52, -2.7, 0.81)
pt3dadd(-49.38, 194.96, -2.8, 0.81)
pt3dadd(-50.05, 195.4, -2.9, 0.81)
pt3dadd(-50.79, 195.7, -2.95, 0.81)
pt3dadd(-51.6, 195.55, -3, 0.81)
pt3dadd(-52.19, 195.92, -3.9, 0.81)
pt3dadd(-53.15, 196.22, -3.95, 0.81)
pt3dadd(-53.96, 196.51, -4, 0.81)
pt3dadd(-54.63, 196.73, -4.05, 0.81)
pt3dadd(-54.92, 196.81, -4.05, 0.81)
pt3dadd(-55.59, 197.17, -4.15, 0.81)
pt3dadd(-56.26, 197.47, -4.2, 0.81)
pt3dadd(-56.85, 198.06, -4.2, 0.81)
pt3dadd(-57.07, 198.58, -4.25, 0.81)
pt3dadd(-57.22, 199.39, -4.25, 0.81)
pt3dadd(-57.44, 200.42, -4.8, 0.67)
pt3dadd(-57.81, 200.94, -4.85, 0.67)
pt3dadd(-58.55, 201.67, -4.9, 0.67)
pt3dadd(-59.06, 201.89, -4.95, 0.67)
pt3dadd(-59.88, 202.04, -5.05, 0.67)
pt3dadd(-60.54, 202.26, -5.3, 0.67)
pt3dadd(-61.35, 202.41, -5.4, 0.67)
pt3dadd(-61.58, 201.89, -5.5, 0.67)
pt3dadd(-61.65, 200.94, -5.95, 0.67)
pt3dadd(-61.95, 200.57, -6, 0.67)
pt3dadd(-62.61, 200.57, -6, 0.67)
pt3dadd(-63.28, 200.35, -6.65, 0.67)
pt3dadd(-64.16, 200.49, -6.7, 0.67)
pt3dadd(-64.83, 200.64, -6.7, 0.67)
pt3dadd(-65.64, 201.01, -6.75, 0.67)
pt3dadd(-66.16, 201.23, -6.95, 0.67)
pt3dadd(-66.53, 201.6, -7.05, 0.52)
pt3dadd(-66.97, 202.19, -7.05, 0.52)
pt3dadd(-67.56, 202.71, -7.05, 0.52)
pt3dadd(-68.01, 203.07, -7.05, 0.52)
pt3dadd(-68.15, 203.81, -7.05, 0.52)
}
apic[96] {pt3dclear()
pt3dadd(10.58, 108.39, 3.7, 1.03)
pt3dadd(9.39, 108.94, 0.05, 1.03)
pt3dadd(8.57, 109.39, 0.05, 1.03)
pt3dadd(7.91, 109.98, 0.05, 1.03)
pt3dadd(6.65, 110.2, -1.3, 1.03)
pt3dadd(5.91, 110.35, -1.65, 1.03)
pt3dadd(5.25, 110.42, -2.05, 1.03)
pt3dadd(4.29, 110.35, -2.15, 1.03)
pt3dadd(3.1, 110.57, -2.35, 1.03)
pt3dadd(2.22, 111.01, -2.35, 1.03)
pt3dadd(1.55, 111.23, -2.35, 1.03)
pt3dadd(0.89, 111.38, -2.35, 1.03)
pt3dadd(0.3, 111.45, -2.4, 1.03)
pt3dadd(-0.44, 111.89, -2.45, 1.03)
pt3dadd(-0.89, 111.97, -2.75, 1.03)
pt3dadd(-1.4, 112.12, -2.95, 1.03)
pt3dadd(-2.14, 112.26, -1.25, 1.03)
pt3dadd(-2.51, 112.71, -1.15, 1.03)
pt3dadd(-3.18, 113.07, -1.1, 1.03)
pt3dadd(-3.55, 113.96, -1.05, 1.03)
pt3dadd(-4.21, 114.77, -1, 1.18)
pt3dadd(-5.17, 115.65, -1, 1.18)
pt3dadd(-6.43, 116.02, -1, 1.18)
pt3dadd(-7.24, 116.1, -1, 1.18)
pt3dadd(-7.98, 116.1, -1, 1.18)
pt3dadd(-8.57, 116.17, -1, 1.18)
pt3dadd(-9.46, 116.17, -1, 1.18)
pt3dadd(-10.27, 115.95, -1.2, 1.18)
pt3dadd(-10.94, 116.32, -1.25, 1.18)
pt3dadd(-11.68, 116.76, -1.25, 1.18)
pt3dadd(-12.12, 117.42, -1.3, 1.18)
pt3dadd(-12.64, 118.24, -1.3, 1.18)
pt3dadd(-12.93, 119.12, -1.35, 1.18)
pt3dadd(-13.6, 119.86, -1.35, 1.18)
pt3dadd(-14.12, 120.45, -1.4, 1.18)
pt3dadd(-14.49, 120.96, -1.4, 1.18)
pt3dadd(-15.08, 121.48, -1.45, 1.18)
pt3dadd(-15.67, 121.92, -1.45, 1.18)
pt3dadd(-16.19, 122.29, -1.45, 1.18)
pt3dadd(-16.92, 122.81, -1.45, 1.18)
pt3dadd(-17.89, 123.62, -1.45, 1.18)
pt3dadd(-18.7, 123.62, -1.5, 1.18)
pt3dadd(-19.51, 123.77, -1.55, 1.03)
pt3dadd(-20.32, 123.77, -1.55, 1.03)
pt3dadd(-20.92, 124.14, -1.55, 1.03)
pt3dadd(-21.51, 124.58, -1.55, 1.03)
pt3dadd(-21.88, 125.24, -1.55, 1.03)
pt3dadd(-22.62, 125.54, -0.85, 1.03)
pt3dadd(-22.98, 126.57, -0.7, 1.03)
pt3dadd(-23.43, 127.23, -0.65, 1.03)
pt3dadd(-23.43, 127.9, -0.6, 1.03)
pt3dadd(-23.72, 128.41, -0.55, 1.03)
pt3dadd(-23.87, 129.08, -0.4, 1.03)
pt3dadd(-24.09, 129.89, -0.3, 1.03)
pt3dadd(-24.46, 130.55, -0.25, 1.03)
pt3dadd(-24.98, 130.92, -0.2, 1.03)
pt3dadd(-25.2, 131.22, 0, 1.03)
pt3dadd(-25.57, 131.51, 0.15, 1.03)
pt3dadd(-26.16, 132.17, -0.6, 1.03)
pt3dadd(-26.68, 132.69, -0.8, 1.03)
pt3dadd(-27.2, 133.21, -0.85, 1.03)
pt3dadd(-27.49, 133.72, -0.95, 1.03)
pt3dadd(-27.94, 134.31, -1, 1.03)
pt3dadd(-28.23, 134.76, -1.1, 1.03)
pt3dadd(-29.12, 135.2, -1.2, 1.03)
pt3dadd(-29.34, 135.64, -1.3, 1.03)
pt3dadd(-29.71, 136.01, -1.35, 1.03)
pt3dadd(-30.75, 136.45, -1.4, 1.03)
pt3dadd(-31.34, 136.67, -1.5, 1.03)
pt3dadd(-32.15, 136.97, -1.55, 1.03)
pt3dadd(-32.74, 137.41, -1.6, 1.03)
pt3dadd(-33.41, 137.71, -1.65, 1.03)
pt3dadd(-34, 138.07, -1.75, 1.03)
pt3dadd(-34.66, 138.37, -1.75, 1.03)
pt3dadd(-35.03, 138.37, -1.8, 0.81)
pt3dadd(-35.7, 138.44, -1.85, 0.81)
pt3dadd(-36.21, 138.52, -1.85, 0.81)
pt3dadd(-36.88, 138.74, -1.85, 0.81)
pt3dadd(-37.55, 138.96, -1.85, 0.81)
pt3dadd(-38.19, 139.08, -2, 0.81)
pt3dadd(-38.93, 139.15, -1.9, 0.81)
pt3dadd(-39.74, 139.3, -1.9, 0.81)
pt3dadd(-40.48, 139.59, -2.4, 0.81)
pt3dadd(-41.36, 139.52, -2.45, 0.81)
pt3dadd(-41.96, 139.74, -3.15, 0.81)
pt3dadd(-42.55, 140.18, -3.2, 0.67)
pt3dadd(-42.77, 140.62, -3.2, 0.67)
pt3dadd(-43.06, 140.92, -3.2, 0.67)
pt3dadd(-43.95, 141.29, -3.2, 0.67)
pt3dadd(-44.32, 141.66, -3.25, 0.67)
pt3dadd(-44.62, 142.17, -3.4, 0.67)
pt3dadd(-44.84, 142.84, -3.45, 0.81)
pt3dadd(-45.06, 143.5, -3.5, 0.81)
pt3dadd(-45.58, 143.94, -3.5, 0.81)
pt3dadd(-45.73, 144.68, -3.5, 0.81)
pt3dadd(-46.02, 145.2, -3.5, 0.81)
pt3dadd(-46.24, 145.86, -3.55, 0.81)
pt3dadd(-46.83, 146.45, -3.7, 0.81)
pt3dadd(-47.65, 146.52, -3.7, 0.81)
pt3dadd(-48.24, 146.97, -3.95, 0.81)
pt3dadd(-48.98, 147.92, -4.05, 0.81)
pt3dadd(-49.64, 148.59, -4.1, 0.81)
pt3dadd(-50.38, 148.96, -4.1, 0.81)
pt3dadd(-51.05, 149.77, -4.15, 0.81)
pt3dadd(-52.01, 149.62, -3.9, 0.81)
pt3dadd(-52.97, 149.62, -3.75, 0.81)
pt3dadd(-53.63, 149.18, -3.55, 0.81)
pt3dadd(-54.45, 149.18, -3.45, 0.81)
pt3dadd(-55.19, 149.18, -3.3, 0.81)
pt3dadd(-55.85, 149.47, -3.2, 0.81)
pt3dadd(-56.37, 149.92, -3.1, 0.67)
pt3dadd(-57.11, 150.28, -3.05, 0.67)
pt3dadd(-57.33, 150.51, -2.95, 0.67)
pt3dadd(-57.77, 151.17, -2.85, 0.67)
pt3dadd(-57.7, 151.54, -3.05, 0.67)
pt3dadd(-58.22, 152.2, -3.15, 0.67)
pt3dadd(-58.59, 152.57, -3.2, 0.67)
pt3dadd(-59.18, 152.79, -3.25, 0.67)
pt3dadd(-59.69, 152.79, -3.3, 0.67)
pt3dadd(-60.43, 152.72, -3.45, 0.67)
pt3dadd(-61.17, 152.28, -4, 0.67)
pt3dadd(-61.62, 151.69, -4.1, 0.67)
pt3dadd(-61.69, 151.1, -4.55, 0.96)
pt3dadd(-61.76, 150.36, -5.1, 0.96)
pt3dadd(-61.99, 149.62, -5.15, 0.96)
pt3dadd(-62.35, 148.51, -6.05, 0.96)
pt3dadd(-63.17, 148.29, -6.1, 0.96)
pt3dadd(-64.2, 149.03, -6.1, 0.96)
pt3dadd(-63.76, 150.14, -6.1, 0.96)
pt3dadd(-63.32, 151.1, -6.1, 0.96)
pt3dadd(-62.21, 151.02, -6.1, 0.96)
pt3dadd(-61.91, 149.84, -6.1, 0.96)
pt3dadd(-62.28, 148.59, -6.1, 0.96)
pt3dadd(-63.24, 147.92, -6.7, 0.96)
pt3dadd(-64.13, 147.85, -7.7, 0.96)
pt3dadd(-64.87, 147.7, -7.9, 0.96)
pt3dadd(-65.75, 147.92, -9.05, 0.81)
pt3dadd(-66.57, 148, -9.15, 0.81)
pt3dadd(-67.23, 148, -9.4, 0.81)
pt3dadd(-68.05, 148, -9.6, 0.81)
pt3dadd(-68.64, 147.92, -10.35, 0.81)
pt3dadd(-69.45, 148, -10.4, 0.81)
pt3dadd(-69.67, 147.78, -10.4, 0.67)
pt3dadd(-70.56, 148.15, -11.1, 0.67)
pt3dadd(-70.78, 148.88, -11.2, 0.67)
pt3dadd(-70.71, 149.77, -11.2, 0.67)
pt3dadd(-70.85, 150.36, -11.2, 0.67)
pt3dadd(-71.59, 150.8, -11.2, 0.67)
pt3dadd(-72.11, 151.02, -11.25, 0.67)
pt3dadd(-73.22, 151.39, -11.25, 0.67)
}
apic[97] {pt3dclear()
pt3dadd(10.78, 106.59, 5.55, 0.96)
pt3dadd(10.12, 106.3, 3.9, 0.96)
pt3dadd(9.6, 105.93, 3.85, 0.96)
pt3dadd(9.31, 105.85, 3.8, 0.96)
}
}
proc shape3d_60() {
apic[97] { pt3dadd(8.71, 106, 3.75, 0.96)
pt3dadd(8.27, 106.07, 3.7, 0.81)
pt3dadd(7.83, 106.07, 3.6, 0.81)
pt3dadd(7.09, 106.07, 4.05, 0.81)
pt3dadd(6.5, 106.3, 4.2, 0.81)
pt3dadd(6.13, 106.59, 4.25, 0.81)
pt3dadd(5.68, 107.03, 4.35, 0.81)
pt3dadd(5.76, 107.7, 4.55, 0.81)
pt3dadd(5.91, 108.07, 4.7, 0.81)
pt3dadd(5.98, 109.02, 4.85, 0.81)
pt3dadd(6.13, 109.54, 4.95, 0.81)
pt3dadd(6.2, 110.06, 5, 0.81)
pt3dadd(6.13, 110.57, 5.35, 0.81)
pt3dadd(5.61, 110.79, 5.45, 0.81)
pt3dadd(4.65, 111.02, 5.5, 0.81)
pt3dadd(4.13, 110.79, 5.55, 0.81)
pt3dadd(3.39, 110.5, 5.75, 0.81)
pt3dadd(2.58, 110.43, 5.85, 0.81)
pt3dadd(1.77, 110.28, 5.9, 0.81)
pt3dadd(1.25, 109.76, 5.95, 0.81)
pt3dadd(1.03, 109.25, 5.85, 0.81)
pt3dadd(1.32, 108.58, 5.65, 0.81)
pt3dadd(1.25, 107.11, 5.55, 0.81)
pt3dadd(1.03, 106, 5.5, 0.81)
pt3dadd(0.29, 106.07, 5.45, 0.81)
pt3dadd(-0.23, 106.74, 5.3, 0.81)
pt3dadd(-0.52, 107.4, 5, 0.81)
pt3dadd(-0.67, 108.14, 5.95, 0.81)
pt3dadd(-0.52, 108.73, 7.05, 0.81)
pt3dadd(-0.45, 109.25, 7.4, 0.81)
pt3dadd(-0.75, 109.76, 7.6, 0.81)
pt3dadd(-1.41, 109.98, 7.95, 0.81)
pt3dadd(-1.93, 110.35, 8.2, 0.81)
pt3dadd(-2.45, 110.57, 8.3, 0.81)
pt3dadd(-2.89, 110.72, 8.4, 0.81)
pt3dadd(-3.33, 110.94, 8.4, 0.81)
pt3dadd(-3.63, 111.09, 8.5, 0.81)
pt3dadd(-4.44, 111.02, 9.3, 0.67)
pt3dadd(-5.11, 110.72, 9.35, 0.67)
pt3dadd(-5.77, 110.28, 9.6, 0.67)
pt3dadd(-6.07, 109.76, 9.7, 0.67)
pt3dadd(-6.73, 109.17, 9.8, 0.67)
pt3dadd(-7.25, 108.73, 9.9, 0.67)
pt3dadd(-7.99, 108.58, 10.95, 0.59)
pt3dadd(-8.65, 108.8, 11, 0.59)
pt3dadd(-9.32, 109.02, 11.1, 0.59)
pt3dadd(-9.99, 109.69, 11.2, 0.59)
pt3dadd(-10.35, 110.06, 11.2, 0.59)
pt3dadd(-10.87, 110.57, 11.25, 0.59)
pt3dadd(-11.46, 110.79, 11.25, 0.59)
pt3dadd(-12.13, 110.79, 11.25, 0.59)
pt3dadd(-12.65, 110.87, 11.25, 0.59)
pt3dadd(-12.87, 111.24, 11.25, 0.59)
}
apic[98] {pt3dclear()
pt3dadd(16.55, 66.28, 2.5, 2)
pt3dadd(17.58, 66.4, -0.4, 2)
pt3dadd(18.1, 66.77, -0.45, 2)
pt3dadd(19.06, 67.06, -0.45, 2)
pt3dadd(19.8, 67.14, -0.45, 2)
pt3dadd(20.69, 67.43, -0.5, 2)
pt3dadd(21.5, 67.73, -0.5, 2)
pt3dadd(22.68, 67.95, -0.5, 2)
pt3dadd(23.13, 68.24, -0.5, 2)
pt3dadd(23.87, 68.83, -0.5, 2)
pt3dadd(24.83, 69.2, -0.5, 2)
pt3dadd(25.27, 69.5, -0.5, 2)
pt3dadd(26.38, 69.64, -0.5, 2)
pt3dadd(27.78, 69.79, -0.5, 2)
pt3dadd(28.67, 69.72, -0.5, 2)
pt3dadd(29.63, 69.94, -0.5, 2.37)
pt3dadd(30.3, 70.31, -0.5, 2.37)
pt3dadd(31.26, 70.97, -0.5, 2.37)
pt3dadd(31.55, 71.63, -0.5, 2.37)
pt3dadd(32.36, 72.37, 0.2, 2.37)
pt3dadd(32.88, 72.96, 0.35, 2.37)
pt3dadd(33.47, 73.7, 0.45, 2.37)
pt3dadd(34.21, 74.81, 0.5, 2.37)
pt3dadd(35.03, 75.62, 0.55, 2.37)
pt3dadd(35.54, 75.99, 0.55, 2.37)
pt3dadd(36.36, 76.65, -1.2, 2.37)
pt3dadd(36.8, 77.31, -1.4, 2.37)
pt3dadd(36.65, 78.27, -1.45, 2.37)
pt3dadd(36.73, 79.01, -1.5, 2.37)
pt3dadd(36.73, 80.19, -1.55, 2.37)
}
apic[99] {pt3dclear()
pt3dadd(36.73, 80.19, -1.55, 2.22)
pt3dadd(36.87, 81.07, -1.6, 2.22)
pt3dadd(37.17, 82.03, -1.6, 2.07)
pt3dadd(37.91, 82.84, -1.6, 2.07)
pt3dadd(38.79, 83.43, -1.6, 2.07)
pt3dadd(39.76, 83.88, -1.6, 2.07)
pt3dadd(40.79, 84.32, -1.6, 2.07)
pt3dadd(41.53, 85.13, -1.6, 2.07)
pt3dadd(42.12, 85.28, -1.6, 2.07)
pt3dadd(43.08, 85.72, -1.6, 2.07)
pt3dadd(44.26, 86.09, -1.6, 2.07)
pt3dadd(45.3, 86.38, -1.6, 2.07)
pt3dadd(45.96, 86.61, -1.6, 2.07)
pt3dadd(46.85, 86.83, -1.6, 2.07)
pt3dadd(47.59, 86.83, -1.6, 2.07)
pt3dadd(48.7, 86.83, -1.6, 2.07)
pt3dadd(49.95, 86.61, -1.6, 2.07)
}
apic[100] {pt3dclear()
pt3dadd(49.95, 86.61, -1.6, 1.48)
pt3dadd(50.84, 87.27, -2.4, 1.48)
pt3dadd(51.88, 87.64, -2.5, 1.48)
pt3dadd(52.47, 87.93, -2.55, 1.48)
pt3dadd(52.99, 88.52, -2.6, 1.48)
pt3dadd(53.72, 88.97, -2.65, 1.48)
pt3dadd(54.39, 89.78, -2.7, 1.48)
pt3dadd(54.76, 90.51, -2.75, 1.48)
pt3dadd(54.98, 91.03, -2.8, 1.48)
pt3dadd(55.72, 91.92, -2.85, 1.48)
pt3dadd(56.61, 92.95, -2.85, 1.48)
}
apic[101] {pt3dclear()
pt3dadd(56.61, 92.95, -2.85, 1.03)
pt3dadd(56.53, 93.98, -1.9, 1.03)
pt3dadd(56.9, 94.86, -1.8, 1.03)
pt3dadd(57.49, 95.82, -1.7, 1.03)
pt3dadd(57.86, 96.56, -1.65, 1.03)
pt3dadd(58.53, 97.3, -1.65, 1.03)
pt3dadd(58.68, 97.96, -1.6, 1.03)
pt3dadd(58.97, 98.63, -1.6, 1.03)
pt3dadd(59.49, 99.51, -1.75, 1.03)
pt3dadd(60.01, 99.95, -1.55, 1.03)
pt3dadd(60.45, 100.4, -0.7, 1.03)
pt3dadd(60.67, 101.35, -0.55, 1.03)
pt3dadd(60.97, 102.24, -0.45, 1.03)
pt3dadd(61.12, 102.98, -0.45, 1.03)
pt3dadd(61.12, 103.57, -0.4, 1.03)
pt3dadd(61.56, 104.53, -0.35, 1.03)
pt3dadd(61.85, 105.04, -0.35, 1.03)
pt3dadd(62.08, 105.85, -0.35, 1.03)
pt3dadd(62.45, 106.37, -0.2, 1.03)
pt3dadd(62.96, 106.74, 0.05, 1.03)
pt3dadd(63.41, 107.48, 0.15, 1.03)
pt3dadd(63.41, 108.43, 0.2, 1.03)
pt3dadd(63.48, 109.25, 0.2, 1.03)
pt3dadd(63.63, 109.98, 0.25, 1.03)
pt3dadd(63.78, 110.65, 0.3, 1.03)
pt3dadd(63.7, 111.75, 1, 1.03)
pt3dadd(63.7, 112.49, 1.05, 1.03)
pt3dadd(63.92, 113.23, 1.05, 1.03)
pt3dadd(64.15, 114.11, 1.1, 1.03)
pt3dadd(64.29, 114.85, 1.1, 1.03)
pt3dadd(64.59, 115.66, 1.1, 1.03)
pt3dadd(64.81, 116.47, 1.15, 1.03)
pt3dadd(65.18, 117.14, 1.15, 1.03)
pt3dadd(65.62, 117.95, 1.15, 1.03)
pt3dadd(65.92, 118.1, 1.15, 1.03)
pt3dadd(66.43, 119, 1.55, 1.03)
pt3dadd(66.95, 119.59, 1.7, 1.03)
pt3dadd(67.4, 120.63, 1.75, 1.03)
pt3dadd(67.47, 121.22, 1.8, 1.03)
pt3dadd(67.99, 121.81, 1.95, 0.89)
pt3dadd(68.43, 122.54, 2, 0.89)
pt3dadd(69.24, 122.91, 2.1, 0.89)
pt3dadd(69.54, 123.28, 2.15, 0.89)
pt3dadd(69.83, 123.8, 2.2, 0.89)
pt3dadd(69.83, 124.53, 2.25, 0.89)
pt3dadd(70.06, 125.12, 2.35, 0.89)
pt3dadd(70.28, 125.86, 2.55, 0.89)
pt3dadd(70.5, 126.67, 2.65, 0.89)
pt3dadd(70.94, 127.19, 2.75, 0.89)
pt3dadd(71.39, 127.63, 2.75, 0.89)
pt3dadd(71.9, 128.15, 2.85, 0.89)
pt3dadd(72.5, 128.52, 3, 0.89)
pt3dadd(73.01, 128.88, 3.15, 0.89)
pt3dadd(73.53, 129.4, 3.35, 0.89)
pt3dadd(73.97, 129.99, 3.45, 0.89)
pt3dadd(74.56, 130.73, 3.5, 0.89)
pt3dadd(75.01, 131.61, 3.85, 0.81)
pt3dadd(75.3, 131.98, 3.85, 0.81)
pt3dadd(75.82, 132.5, 3.85, 0.81)
pt3dadd(76.34, 133.01, 3.9, 0.81)
pt3dadd(76.93, 133.75, 4.35, 0.81)
pt3dadd(77.45, 134.78, 4.4, 0.81)
pt3dadd(77.45, 135.6, 4.4, 0.81)
pt3dadd(77.96, 136.41, 4.45, 0.81)
pt3dadd(78.11, 137, 4.65, 0.81)
pt3dadd(78.56, 137.81, 4.8, 0.81)
pt3dadd(78.78, 138.47, 4.9, 0.81)
pt3dadd(79, 138.99, 4.95, 0.81)
pt3dadd(79.22, 139.95, 5.1, 0.81)
pt3dadd(79.44, 140.61, 5.15, 0.81)
pt3dadd(79.96, 141.27, 5.15, 0.81)
pt3dadd(80.33, 141.94, 5.2, 0.81)
pt3dadd(80.7, 142.53, 5.25, 0.67)
pt3dadd(80.92, 143.34, 5.3, 0.67)
pt3dadd(80.77, 144, 5.3, 0.67)
pt3dadd(80.99, 145.26, 5.35, 0.67)
pt3dadd(81.66, 145.92, 5.45, 0.67)
pt3dadd(82.03, 146.51, 5.6, 0.67)
pt3dadd(82.25, 147.32, 5.85, 0.67)
pt3dadd(82.62, 148.06, 5.95, 0.67)
pt3dadd(82.77, 148.87, 6, 0.67)
pt3dadd(82.92, 149.46, 6, 0.67)
pt3dadd(82.84, 150.05, 6, 0.67)
pt3dadd(82.83, 150.74, 6.55, 0.74)
pt3dadd(83.13, 151.33, 6.55, 0.74)
pt3dadd(83.2, 152.29, 6.6, 0.74)
pt3dadd(83.43, 152.96, 6.6, 0.74)
pt3dadd(83.43, 154.36, 6.65, 0.74)
pt3dadd(83.35, 155.1, 6.65, 0.74)
}
}
proc shape3d_61() {
apic[101] { pt3dadd(83.5, 155.39, 6.85, 0.74)
pt3dadd(83.5, 156.13, 6.95, 0.74)
pt3dadd(83.57, 156.72, 7, 0.74)
pt3dadd(83.5, 157.38, 7, 0.74)
pt3dadd(83.5, 158.41, 7.05, 0.74)
pt3dadd(83.87, 159.37, 7.05, 0.74)
pt3dadd(83.65, 160.26, 7.05, 0.74)
pt3dadd(83.65, 161.29, 7.1, 0.74)
pt3dadd(83.5, 162.25, 7.1, 0.74)
pt3dadd(83.65, 163.06, 7.15, 0.74)
pt3dadd(84.09, 163.8, 7.2, 0.74)
pt3dadd(84.39, 164.76, 7.25, 0.74)
pt3dadd(84.17, 165.64, 7.25, 0.74)
pt3dadd(84.31, 166.38, 7.4, 0.74)
pt3dadd(84.46, 167.41, 7.55, 0.74)
pt3dadd(84.9, 168.07, 7.65, 0.74)
pt3dadd(85.13, 168.66, 7.75, 0.74)
pt3dadd(85.27, 169.55, 7.75, 0.74)
pt3dadd(85.42, 170.36, 7.8, 0.74)
pt3dadd(85.57, 171.17, 7.8, 0.74)
pt3dadd(85.79, 171.84, 7.9, 0.74)
pt3dadd(85.94, 172.5, 8.15, 0.74)
pt3dadd(86.31, 173.24, 8.25, 0.74)
pt3dadd(86.6, 173.9, 8.25, 0.74)
pt3dadd(87.2, 174.79, 8.4, 0.74)
pt3dadd(87.49, 175.45, 8.45, 0.74)
pt3dadd(87.71, 176.11, 8.45, 0.74)
pt3dadd(88.23, 176.7, 8.5, 0.74)
pt3dadd(88.53, 177.51, 8.95, 0.74)
pt3dadd(88.38, 178.62, 9.1, 0.74)
pt3dadd(88.53, 179.43, 9.2, 0.74)
pt3dadd(88.6, 180.17, 9.4, 0.74)
pt3dadd(88.53, 181.42, 9.6, 0.74)
pt3dadd(88.67, 181.94, 9.65, 0.74)
pt3dadd(88.82, 182.9, 9.7, 0.74)
pt3dadd(88.81, 184.12, 10.05, 0.74)
pt3dadd(88.59, 184.71, 10.1, 0.74)
pt3dadd(88.81, 185.67, 10.1, 0.74)
pt3dadd(88.88, 186.63, 10.25, 0.74)
pt3dadd(88.66, 187.22, 10.35, 0.74)
pt3dadd(88.37, 187.96, 10.45, 0.59)
pt3dadd(88.07, 188.7, 10.45, 0.59)
pt3dadd(87.77, 189.73, 10.5, 0.59)
pt3dadd(87.48, 190.32, 10.5, 0.59)
pt3dadd(86.96, 190.98, 10.5, 0.59)
pt3dadd(86.37, 191.5, 10.5, 0.59)
}
apic[102] {pt3dclear()
pt3dadd(56.61, 92.95, -2.85, 0.81)
pt3dadd(57.5, 93, -2.95, 0.81)
pt3dadd(58.1, 92.93, -2.65, 0.81)
pt3dadd(59.06, 92.93, -4.05, 0.81)
pt3dadd(59.28, 92.93, -4.2, 0.81)
pt3dadd(60.02, 93.22, -4.35, 0.81)
pt3dadd(60.61, 93.44, -4.4, 0.81)
pt3dadd(61.27, 93.89, -4.5, 0.81)
pt3dadd(61.87, 94.26, -4.55, 0.81)
pt3dadd(62.31, 94.55, -4.6, 0.81)
pt3dadd(63.12, 95.29, -4.65, 0.81)
pt3dadd(63.56, 96.03, -4.8, 0.81)
pt3dadd(63.93, 96.62, -4.9, 0.81)
pt3dadd(64.6, 96.91, -5, 0.81)
pt3dadd(65.41, 97.43, -5.1, 0.81)
pt3dadd(66.23, 97.35, -5.2, 0.81)
}
apic[103] {pt3dclear()
pt3dadd(66.23, 97.35, -5.2, 0.81)
pt3dadd(67.11, 96.76, -5.05, 0.81)
pt3dadd(67.48, 95.95, -5.1, 0.81)
pt3dadd(67.78, 94.99, -5.1, 0.81)
pt3dadd(68.44, 94.55, -5.1, 0.81)
pt3dadd(69.18, 94.55, -5.1, 0.81)
pt3dadd(70.36, 94.85, -6.75, 0.81)
pt3dadd(71.03, 95.07, -6.75, 0.81)
pt3dadd(71.62, 95.51, -6.8, 0.81)
pt3dadd(71.99, 96.03, -6.85, 0.81)
pt3dadd(71.84, 96.62, -6.85, 0.81)
pt3dadd(71.77, 97.5, -6.85, 0.81)
pt3dadd(72.36, 98.02, -6.9, 0.81)
pt3dadd(73.32, 98.31, -6.9, 0.96)
pt3dadd(74.13, 98.24, -6.9, 0.96)
pt3dadd(74.95, 98.24, -6.9, 0.96)
pt3dadd(75.83, 98.24, -7.05, 0.96)
pt3dadd(76.35, 98.16, -7.1, 0.96)
pt3dadd(77.16, 98.31, -7.1, 0.96)
pt3dadd(77.98, 99.2, -7.1, 0.96)
pt3dadd(78.72, 99.79, -7.15, 0.96)
pt3dadd(79.31, 100.45, -7.2, 0.96)
pt3dadd(79.97, 100.82, -7.25, 0.96)
pt3dadd(80.93, 101.04, -7.3, 0.96)
pt3dadd(82.26, 100.74, -7.3, 0.96)
pt3dadd(83.67, 100.6, -7.35, 1.11)
pt3dadd(84.85, 100.15, -7.35, 1.11)
pt3dadd(85.81, 100.38, -7.35, 1.11)
pt3dadd(86.4, 100.74, -7.4, 1.11)
pt3dadd(87.29, 101.33, -7.45, 1.11)
pt3dadd(87.95, 101.78, -7.45, 1.11)
pt3dadd(88.55, 102.51, -7.5, 1.11)
pt3dadd(89.14, 103.33, -7.5, 1.11)
pt3dadd(89.73, 103.84, -7.5, 1.11)
pt3dadd(90.32, 104.73, -7.5, 1.11)
pt3dadd(91.06, 105.61, -7.5, 1.11)
pt3dadd(91.58, 106.64, -7.5, 1.11)
pt3dadd(92.17, 107.31, -7.5, 1.11)
pt3dadd(92.98, 108.05, -7.5, 1.11)
pt3dadd(93.87, 108.49, -7.5, 1.11)
pt3dadd(94.83, 108.64, -7.5, 1.11)
pt3dadd(96.01, 108.05, -7.5, 1.11)
pt3dadd(96.9, 107.31, -8.4, 1.11)
pt3dadd(97.93, 107.16, -8.4, 1.11)
pt3dadd(98.75, 107.46, -8.4, 1.11)
pt3dadd(99.48, 108.12, -8.4, 1.11)
pt3dadd(100.08, 108.56, -8.4, 1.11)
pt3dadd(100.74, 108.93, -8.4, 1.11)
pt3dadd(101.78, 109, -8.4, 1.11)
pt3dadd(102.81, 108.78, -8.4, 1.11)
pt3dadd(103.77, 108.78, -8.4, 1.11)
pt3dadd(104.73, 108.78, -8.4, 1.11)
pt3dadd(105.28, 108.45, -6.4, 1.11)
pt3dadd(106.61, 108.68, -6.4, 1.11)
pt3dadd(107.87, 109.19, -8.05, 1.11)
pt3dadd(108.31, 109.19, -8.25, 0.96)
pt3dadd(108.9, 109.41, -8.45, 0.96)
pt3dadd(109.2, 109.71, -8.5, 0.96)
pt3dadd(109.71, 110.37, -8.55, 0.96)
pt3dadd(110.45, 110.59, -8.55, 0.96)
pt3dadd(111.34, 110.74, -8.6, 0.96)
pt3dadd(112, 110.89, -8.6, 0.96)
pt3dadd(112.96, 111.4, -8.6, 0.96)
pt3dadd(113.63, 111.92, -8.6, 0.96)
pt3dadd(114.3, 112.66, -8.6, 0.96)
pt3dadd(114.96, 113.25, -8.6, 0.96)
pt3dadd(115.92, 113.76, -8.6, 0.96)
pt3dadd(116.36, 113.91, -8.6, 0.96)
pt3dadd(116.96, 114.35, -8.6, 0.96)
pt3dadd(117.47, 114.87, -8.6, 0.96)
pt3dadd(117.7, 115.39, -8.65, 0.96)
pt3dadd(117.84, 116.05, -8.85, 0.96)
pt3dadd(118.58, 116.64, -7.85, 0.96)
pt3dadd(118.95, 117.38, -7.65, 0.96)
pt3dadd(119.47, 117.75, -7.55, 0.96)
pt3dadd(119.76, 118.48, -7.45, 0.96)
pt3dadd(120.06, 119.22, -7.3, 0.96)
pt3dadd(120.28, 120.03, -7.7, 0.96)
pt3dadd(120.5, 120.7, -7.85, 0.96)
pt3dadd(120.8, 121.51, -8, 0.96)
pt3dadd(121.09, 121.88, -8.1, 0.96)
pt3dadd(121.91, 122.1, -8.15, 0.96)
pt3dadd(122.65, 122.61, -8.2, 0.96)
pt3dadd(123.68, 122.61, -8.6, 0.96)
pt3dadd(124.72, 122.76, -8.7, 0.96)
pt3dadd(125.09, 123.06, -8.8, 0.96)
pt3dadd(125.53, 123.72, -8.85, 0.96)
pt3dadd(125.46, 124.68, -9, 0.96)
pt3dadd(125.68, 125.49, -9.1, 0.96)
pt3dadd(125.83, 126.82, -9.15, 0.96)
pt3dadd(125.68, 127.63, -9.25, 0.96)
pt3dadd(125.6, 128.22, -9.3, 0.96)
pt3dadd(125.83, 128.88, -9.3, 0.96)
pt3dadd(126.64, 129.25, -9.4, 0.96)
pt3dadd(127.52, 129.69, -10.15, 0.96)
pt3dadd(128.26, 129.77, -10.15, 0.96)
pt3dadd(128.78, 130.21, -10.2, 0.96)
pt3dadd(129.37, 130.87, -10.2, 0.96)
pt3dadd(129.82, 131.46, -10.3, 0.96)
pt3dadd(130.33, 132.13, -10.4, 0.96)
pt3dadd(130.48, 132.79, -10.4, 0.96)
pt3dadd(130.48, 133.82, -10.5, 0.96)
pt3dadd(130.48, 134.63, -10.5, 0.96)
pt3dadd(130.41, 135.22, -10.85, 0.96)
pt3dadd(130.33, 136.33, -10.9, 0.89)
pt3dadd(130.63, 136.92, -10.9, 0.89)
pt3dadd(131.07, 137.66, -10.9, 0.89)
pt3dadd(131.44, 138.69, -10.9, 0.89)
pt3dadd(132.03, 139.21, -10.9, 0.89)
pt3dadd(132.77, 139.58, -10.9, 0.89)
pt3dadd(133.44, 140.09, -10.9, 0.89)
pt3dadd(134.03, 140.24, -10.9, 0.89)
pt3dadd(134.55, 140.61, -10.9, 0.89)
pt3dadd(135, 140.98, -10.95, 0.89)
pt3dadd(135.59, 141.49, -11.1, 0.74)
pt3dadd(136.18, 141.93, -11.1, 0.74)
pt3dadd(136.47, 142.3, -11.15, 0.74)
pt3dadd(137.07, 142.97, -11.25, 0.74)
pt3dadd(137.95, 143.19, -11.35, 0.74)
pt3dadd(138.91, 143.19, -11.4, 0.74)
pt3dadd(139.73, 142.75, -11.4, 0.74)
pt3dadd(140.61, 142.75, -11.45, 0.74)
}
apic[104] {pt3dclear()
pt3dadd(66.23, 97.35, -5.2, 0.59)
pt3dadd(66.6, 97.65, -6.35, 0.59)
pt3dadd(66.97, 98.24, -6.15, 0.59)
pt3dadd(67.04, 98.9, -6.05, 0.59)
pt3dadd(66.67, 99.42, -6, 0.59)
pt3dadd(66.53, 99.94, -5.9, 0.59)
pt3dadd(66.82, 100.45, -5.85, 0.59)
pt3dadd(67.27, 100.89, -5.8, 0.59)
pt3dadd(67.63, 101.48, -5.75, 0.59)
pt3dadd(68, 102.07, -5.7, 0.59)
pt3dadd(67.78, 103.11, -5.7, 0.67)
pt3dadd(67.49, 103.7, -5.7, 0.67)
pt3dadd(67.41, 104.29, -5.7, 0.67)
pt3dadd(67.19, 105.17, -5.65, 0.67)
pt3dadd(67.12, 105.83, -5.65, 0.67)
pt3dadd(67.27, 106.72, -5.7, 0.67)
}
}
proc shape3d_62() {
apic[104] { pt3dadd(67.63, 107.68, -5.7, 0.67)
pt3dadd(67.86, 108.49, -5.75, 0.67)
pt3dadd(68.08, 109.01, -5.75, 0.67)
pt3dadd(68.23, 110.26, -5.8, 0.67)
pt3dadd(68.3, 111.07, -5.85, 0.67)
pt3dadd(68.37, 111.66, -5.9, 0.67)
pt3dadd(68.37, 112.4, -5.95, 0.67)
pt3dadd(68.15, 113.14, -6, 0.67)
pt3dadd(68.23, 113.73, -6.1, 0.67)
pt3dadd(68.37, 114.68, -6.2, 0.67)
pt3dadd(67.86, 115.57, -6.3, 0.67)
pt3dadd(67.56, 116.16, -6.35, 0.74)
pt3dadd(66.82, 117.27, -6.8, 0.89)
pt3dadd(66.67, 117.93, -6.95, 0.89)
pt3dadd(66.38, 118.67, -5.15, 0.89)
pt3dadd(65.86, 119.26, -5, 0.89)
pt3dadd(65.49, 119.63, -5.15, 0.89)
pt3dadd(65.2, 119.77, -6.15, 0.89)
pt3dadd(64.46, 120.29, -6.25, 0.89)
pt3dadd(64.16, 121.03, -6.3, 0.89)
}
apic[105] {pt3dclear()
pt3dadd(49.95, 86.61, -1.6, 1.18)
pt3dadd(49.97, 85.7, -3.6, 1.18)
pt3dadd(50.41, 85.11, -3.6, 1.18)
pt3dadd(50.93, 84.6, -3.6, 1.18)
pt3dadd(51.6, 84.23, -3.55, 1.18)
pt3dadd(52.34, 84.08, -3.55, 1.03)
pt3dadd(53.3, 84.3, -3.55, 1.03)
pt3dadd(53.89, 84.6, -3.55, 1.03)
pt3dadd(54.55, 85.04, -3.55, 1.03)
pt3dadd(55.07, 85.26, -3.55, 1.03)
pt3dadd(55.81, 85.48, -3.6, 1.03)
pt3dadd(56.33, 85.7, -3.6, 1.03)
pt3dadd(57.07, 86.07, -3.6, 1.03)
pt3dadd(57.66, 86.29, -3.6, 1.03)
pt3dadd(58.4, 86.51, -3.65, 1.03)
pt3dadd(59.43, 86.73, -3.65, 1.03)
pt3dadd(59.87, 87.1, -3.7, 1.03)
pt3dadd(60.54, 87.55, -3.75, 1.03)
pt3dadd(60.98, 88.06, -3.8, 1.03)
pt3dadd(61.8, 88.43, -3.8, 1.03)
pt3dadd(62.76, 88.58, -3.85, 1.03)
pt3dadd(63.5, 88.28, -3.85, 1.03)
pt3dadd(64.53, 87.91, -3.9, 1.03)
pt3dadd(65.64, 87.84, -3.9, 0.96)
pt3dadd(66.3, 88.14, -3.9, 0.96)
pt3dadd(67.27, 88.28, -3.9, 0.96)
pt3dadd(68, 87.77, -3.9, 0.96)
pt3dadd(68.45, 87.25, -3.9, 0.96)
pt3dadd(68.97, 86.81, -3.9, 0.96)
pt3dadd(70.22, 86.73, -3.9, 0.96)
}
apic[106] {pt3dclear()
pt3dadd(70.22, 86.73, -3.9, 0.81)
pt3dadd(70.96, 86.51, -2.05, 0.81)
pt3dadd(72, 86.44, -1.95, 0.81)
pt3dadd(72.66, 86.29, -1.85, 0.81)
pt3dadd(73.4, 86.59, -1.8, 0.81)
pt3dadd(74.06, 86.96, -1.75, 0.81)
pt3dadd(74.29, 87.03, -1.5, 0.81)
pt3dadd(75.1, 87.18, -1.35, 0.81)
pt3dadd(75.47, 87.32, -1.3, 0.81)
pt3dadd(76.28, 87.62, -1.2, 0.81)
pt3dadd(76.73, 88.06, -1.2, 0.81)
pt3dadd(77.17, 88.58, -0.95, 0.81)
pt3dadd(77.39, 89.02, -0.85, 0.81)
pt3dadd(77.61, 89.83, -1.05, 0.81)
pt3dadd(77.76, 90.5, -1.4, 0.81)
pt3dadd(77.91, 91.01, -1.65, 0.81)
pt3dadd(78.28, 91.6, -1.75, 0.81)
pt3dadd(78.57, 92.04, -1.85, 0.81)
pt3dadd(79.39, 92.49, -1.95, 0.81)
pt3dadd(80.05, 92.56, -2, 0.81)
pt3dadd(81.09, 92.93, -2.05, 0.81)
pt3dadd(81.83, 92.71, -2.1, 0.81)
pt3dadd(82.49, 92.63, -2.15, 0.81)
pt3dadd(83.3, 92.41, -2.3, 0.81)
pt3dadd(84.04, 92.34, -1.4, 0.81)
pt3dadd(84.78, 92.78, -1.05, 0.81)
pt3dadd(85.67, 93.15, -0.8, 0.81)
pt3dadd(86.33, 93.67, -0.7, 0.81)
pt3dadd(86.93, 94.11, -0.6, 0.81)
pt3dadd(87.44, 94.85, -0.5, 0.81)
pt3dadd(87.81, 95.51, -0.45, 0.81)
pt3dadd(88.4, 96.32, -0.4, 0.81)
pt3dadd(88.7, 96.91, -0.35, 0.81)
pt3dadd(89.07, 97.5, -0.3, 0.81)
pt3dadd(89.81, 98.02, -0.25, 0.81)
pt3dadd(90.69, 98.09, 0, 0.81)
pt3dadd(91.58, 98.24, 0.05, 0.81)
pt3dadd(92.54, 98.68, 0.15, 0.81)
pt3dadd(93.58, 99.05, 0.3, 0.81)
pt3dadd(94.24, 99.2, 0.5, 0.81)
pt3dadd(95.2, 99.49, 0.7, 0.81)
pt3dadd(95.87, 100.01, 0.8, 0.81)
pt3dadd(96.61, 100.6, 0.85, 0.81)
pt3dadd(97.57, 101.41, 0.9, 0.81)
pt3dadd(98.01, 101.56, 0.9, 0.81)
pt3dadd(99.12, 101.56, 0.95, 0.81)
pt3dadd(99.86, 101.48, 0.95, 0.81)
pt3dadd(100.82, 101.12, 0.95, 0.81)
pt3dadd(102.22, 100.67, 1, 0.81)
pt3dadd(102.74, 100.53, 1.1, 0.81)
pt3dadd(103.63, 100.3, 1.25, 0.81)
pt3dadd(104.22, 100.08, 1.3, 0.81)
pt3dadd(104.66, 99.86, 1.3, 0.81)
pt3dadd(105.85, 99.57, 1.35, 0.81)
pt3dadd(106.36, 99.79, 1.35, 0.81)
pt3dadd(107.4, 100.23, 1.45, 0.81)
pt3dadd(107.99, 100.38, 1.65, 0.81)
pt3dadd(108.65, 100.75, 1.75, 0.81)
pt3dadd(109.17, 101.04, 1.65, 0.81)
pt3dadd(109.39, 101.34, 1.5, 0.81)
pt3dadd(109.98, 101.63, 1.4, 0.81)
pt3dadd(111.17, 101.85, 1.3, 0.81)
pt3dadd(112.05, 101.41, 1.25, 0.81)
pt3dadd(112.35, 100.89, 1.2, 0.81)
pt3dadd(113.31, 100.75, 1.2, 0.81)
pt3dadd(114.07, 100.41, 1.15, 0.81)
pt3dadd(115.18, 99.97, 1.1, 0.74)
pt3dadd(115.92, 99.67, 1.1, 0.74)
pt3dadd(116.81, 99.97, 1.1, 0.74)
pt3dadd(117.7, 99.97, 1.05, 0.74)
pt3dadd(118.29, 100.19, 0.4, 0.74)
pt3dadd(119.32, 100.85, 0.3, 0.74)
pt3dadd(120.13, 100.71, 1, 0.74)
pt3dadd(120.65, 100.71, 0.85, 0.74)
pt3dadd(121.32, 101.3, 0.75, 0.74)
pt3dadd(121.91, 101.67, 2.5, 0.74)
pt3dadd(122.43, 101.81, 2.6, 0.74)
pt3dadd(123.53, 101.89, 2.95, 0.74)
pt3dadd(124.64, 101.59, 3.1, 0.74)
pt3dadd(125.53, 101.44, 3.25, 0.74)
pt3dadd(126.42, 101.15, 3.4, 0.74)
pt3dadd(127.23, 101.44, 3.8, 0.74)
pt3dadd(128.12, 101.52, 3.85, 0.74)
pt3dadd(129.23, 101.52, 4.05, 0.74)
pt3dadd(129.82, 100.93, 4.15, 0.74)
pt3dadd(129.89, 99.75, 4.25, 0.74)
pt3dadd(129.59, 99.38, 5, 0.59)
pt3dadd(129.08, 98.72, 5.05, 0.59)
pt3dadd(129.52, 98.05, 5.05, 0.59)
pt3dadd(130.48, 98.27, 5.05, 0.59)
pt3dadd(131.15, 99.08, 5.05, 0.59)
pt3dadd(131.81, 99.16, 5.1, 0.59)
pt3dadd(132.7, 99.38, 5.45, 0.59)
pt3dadd(133.81, 99.45, 5.55, 0.59)
pt3dadd(134.62, 99.16, 5.6, 0.59)
pt3dadd(135.21, 99.45, 5.6, 0.59)
pt3dadd(135.95, 99.23, 5.6, 0.59)
pt3dadd(136.62, 98.79, 5.65, 0.59)
pt3dadd(137.13, 98.35, 5.65, 0.59)
pt3dadd(137.65, 98.2, 5.65, 0.59)
pt3dadd(138.69, 98.13, 5.65, 0.59)
pt3dadd(138.98, 97.83, 5.65, 0.59)
pt3dadd(139.5, 97.31, 5.7, 0.59)
pt3dadd(140.24, 97.17, 5.75, 0.59)
pt3dadd(141.12, 97.09, 5.85, 0.59)
pt3dadd(141.72, 97.54, 5.95, 0.59)
pt3dadd(141.79, 98.35, 6, 0.59)
pt3dadd(141.86, 99.01, 6.1, 0.59)
pt3dadd(143.05, 99.6, 6.4, 0.59)
pt3dadd(143.71, 100.04, 6.5, 0.59)
pt3dadd(144.6, 100.63, 6.65, 0.44)
pt3dadd(145.19, 100.49, 6.65, 0.44)
pt3dadd(145.49, 100.49, 6.65, 0.44)
pt3dadd(145.71, 101.08, 6.75, 0.44)
pt3dadd(146.37, 101.3, 7, 0.44)
pt3dadd(146.89, 100.85, 7, 0.44)
pt3dadd(147.33, 100.26, 6.8, 0.44)
pt3dadd(147.7, 99.9, 6.6, 0.44)
pt3dadd(148.22, 99.67, 6.45, 0.44)
pt3dadd(149.11, 99.53, 6.35, 0.44)
pt3dadd(149.7, 99.31, 6.2, 0.44)
pt3dadd(150.44, 98.64, 6, 0.44)
pt3dadd(150.95, 98.64, 5.8, 0.44)
pt3dadd(151.92, 98.57, 5.45, 0.44)
pt3dadd(152.88, 98.35, 5.4, 0.44)
pt3dadd(153.54, 98.79, 5.35, 0.44)
pt3dadd(154.06, 99.01, 5.3, 0.44)
pt3dadd(154.8, 99.08, 5.25, 0.44)
pt3dadd(155.54, 99.08, 5.2, 0.44)
pt3dadd(156.65, 99.08, 4.8, 0.44)
pt3dadd(157.09, 99.16, 4.75, 0.44)
pt3dadd(158.27, 99.31, 5.05, 0.44)
pt3dadd(159.16, 98.57, 4.9, 0.44)
pt3dadd(159.97, 98.05, 4.85, 0.44)
}
apic[107] {pt3dclear()
pt3dadd(70.22, 86.73, -3.9, 0.52)
pt3dadd(70.47, 87.36, -4.6, 0.52)
pt3dadd(70.62, 88.24, -4.7, 0.52)
pt3dadd(70.39, 88.54, -4.75, 0.52)
pt3dadd(70.1, 89.05, -4.8, 0.52)
pt3dadd(69.73, 89.2, -4.8, 0.52)
pt3dadd(69.29, 89.57, -4.85, 0.52)
pt3dadd(68.99, 89.79, -4.85, 0.52)
pt3dadd(68.69, 90.01, -5.05, 0.52)
pt3dadd(68.47, 90.31, -5.4, 0.52)
pt3dadd(68.18, 90.82, -4.15, 0.52)
pt3dadd(68.1, 91.27, -3.9, 0.52)
pt3dadd(68.03, 92.08, -3.75, 0.52)
pt3dadd(68.32, 92.52, -3.65, 0.52)
pt3dadd(68.62, 93.18, -3.5, 0.52)
pt3dadd(68.77, 93.7, -3.35, 0.52)
}
}
proc shape3d_63() {
apic[107] { pt3dadd(69.14, 94.14, -3.05, 0.52)
pt3dadd(69.36, 94.81, -3.05, 0.52)
pt3dadd(69.21, 95.18, -3.25, 0.52)
pt3dadd(69.06, 95.54, -3.35, 0.52)
pt3dadd(68.99, 95.91, -3.45, 0.52)
pt3dadd(68.77, 96.36, -3.55, 0.52)
pt3dadd(68.62, 96.72, -3.65, 0.52)
pt3dadd(68.25, 97.09, -3.75, 0.52)
pt3dadd(67.95, 97.54, -3.85, 0.52)
pt3dadd(67.29, 98.13, -3.9, 0.52)
pt3dadd(66.99, 98.79, -3.9, 0.52)
pt3dadd(66.4, 99.31, -3.95, 0.52)
pt3dadd(65.74, 99.67, -3.95, 0.52)
pt3dadd(64.92, 99.9, -4, 0.52)
}
apic[108] {pt3dclear()
pt3dadd(36.73, 80.19, -1.55, 1.03)
pt3dadd(37.5, 79.85, -6.6, 1.03)
pt3dadd(38.16, 80.07, -6.55, 1.03)
pt3dadd(38.61, 80.22, -6.4, 1.03)
pt3dadd(39.2, 80.22, -6.3, 1.03)
pt3dadd(39.79, 79.99, -6.15, 1.03)
pt3dadd(40.53, 79.48, -6.05, 1.03)
pt3dadd(41.04, 78.96, -5.9, 1.03)
pt3dadd(41.41, 78.08, -5.65, 1.03)
pt3dadd(42.08, 77.19, -6.45, 1.03)
pt3dadd(42.38, 76.53, -6.65, 1.03)
pt3dadd(42.74, 75.79, -6.75, 1.03)
pt3dadd(43.41, 74.91, -6.8, 1.03)
pt3dadd(44, 73.28, -6.8, 1.03)
pt3dadd(43.48, 72.4, -6.85, 1.03)
pt3dadd(43.04, 71.81, -6.85, 1.03)
pt3dadd(42.08, 72.03, -6.85, 1.03)
pt3dadd(41.86, 72.91, -6.85, 1.03)
pt3dadd(41.93, 73.65, -8.35, 1.03)
pt3dadd(42.52, 74.68, -8.4, 1.03)
pt3dadd(43.26, 74.76, -8.55, 1.03)
pt3dadd(44.3, 74.68, -8.9, 1.03)
pt3dadd(44.59, 75.2, -10.75, 0.89)
pt3dadd(45.26, 75.64, -10.8, 0.89)
pt3dadd(46.29, 76.16, -11.5, 1.03)
pt3dadd(46.96, 76.82, -11.55, 1.03)
pt3dadd(47.7, 77.34, -11.55, 1.03)
pt3dadd(48.66, 77.41, -11.6, 1.03)
pt3dadd(49.62, 76.9, -12, 1.03)
pt3dadd(50.14, 76.38, -12.5, 1.03)
pt3dadd(51.02, 75.86, -12.5, 1.03)
pt3dadd(51.91, 75.86, -12.6, 1.03)
pt3dadd(52.65, 76.09, -12.65, 1.03)
pt3dadd(53.61, 75.5, -12.65, 1.03)
pt3dadd(54.42, 74.83, -12.65, 1.03)
pt3dadd(55.24, 74.17, -13, 1.03)
pt3dadd(55.68, 73.5, -13, 1.03)
pt3dadd(56.42, 73.06, -13, 1.03)
pt3dadd(56.64, 72.25, -13.05, 1.03)
pt3dadd(56.94, 71.22, -13.45, 1.03)
pt3dadd(56.64, 70.33, -13.6, 1.03)
pt3dadd(56.71, 69.45, -14.55, 1.03)
pt3dadd(57.16, 68.49, -14.6, 1.03)
pt3dadd(57.83, 67.98, -15.55, 1.18)
pt3dadd(59.09, 68.05, -15.8, 1.18)
pt3dadd(60.05, 68.42, -16.05, 1.18)
pt3dadd(61.01, 69.09, -16.15, 1.18)
pt3dadd(61.67, 69.75, -16.3, 1.18)
pt3dadd(62.41, 70.12, -16.6, 1.18)
pt3dadd(63, 70.41, -16.7, 1.18)
pt3dadd(63.6, 71.15, -16.8, 1.18)
pt3dadd(64.11, 71.67, -16.9, 1.18)
pt3dadd(64.56, 72.26, -17, 1.18)
pt3dadd(65.3, 72.33, -17.1, 1.18)
pt3dadd(66.55, 72.33, -17.2, 1.18)
pt3dadd(67.81, 72.26, -17.25, 1.18)
pt3dadd(69.29, 71.89, -17.3, 1.18)
pt3dadd(70.1, 71.3, -17.4, 1.18)
pt3dadd(71.28, 70.56, -17.4, 1.18)
pt3dadd(71.65, 69.68, -17.7, 1.18)
pt3dadd(72.32, 69.09, -17.8, 1.18)
pt3dadd(72.69, 68.2, -17.8, 1.18)
pt3dadd(73.06, 67.32, -17.85, 1.18)
pt3dadd(74.24, 66.58, -17.9, 1.18)
pt3dadd(75.2, 66.65, -18.5, 1.03)
pt3dadd(75.94, 67.17, -18.6, 1.03)
pt3dadd(76.53, 67.76, -19.5, 1.03)
pt3dadd(77.27, 68.35, -20.3, 1.03)
pt3dadd(78.01, 68.87, -20.3, 1.03)
pt3dadd(77.34, 70.27, -20.3, 1.03)
pt3dadd(76.38, 70.19, -20.3, 1.03)
pt3dadd(76.6, 68.79, -20.3, 1.03)
pt3dadd(76.97, 68.72, -21.3, 1.03)
pt3dadd(77.93, 68.64, -21.35, 1.03)
pt3dadd(78.75, 69.16, -23.05, 0.89)
pt3dadd(79.41, 69.6, -23.1, 0.89)
pt3dadd(80.15, 69.75, -23.15, 0.89)
pt3dadd(81.26, 70.05, -23.25, 0.89)
pt3dadd(81.92, 70.41, -23.65, 1.03)
pt3dadd(83.18, 70.56, -23.7, 1.03)
pt3dadd(83.99, 70.19, -23.9, 1.03)
pt3dadd(85.03, 69.38, -24, 1.03)
pt3dadd(85.62, 68.72, -24, 1.03)
pt3dadd(86.06, 68.05, -24, 1.03)
pt3dadd(86.58, 67.02, -24.05, 1.03)
pt3dadd(86.88, 66.58, -24.75, 1.03)
pt3dadd(87.17, 65.84, -24.8, 1.03)
pt3dadd(87.76, 65.47, -24.8, 1.03)
pt3dadd(88.5, 65.18, -24.85, 1.03)
pt3dadd(89.17, 65.4, -25.05, 1.03)
pt3dadd(89.69, 66.06, -25.25, 1.03)
pt3dadd(90.42, 66.73, -25.35, 1.03)
pt3dadd(91.09, 67.46, -25.45, 1.03)
pt3dadd(91.46, 68.2, -25.7, 1.03)
pt3dadd(91.46, 69.09, -25.8, 1.03)
pt3dadd(91.68, 69.9, -26.55, 0.96)
pt3dadd(92.42, 70.56, -24.6, 0.96)
pt3dadd(92.79, 71.23, -25.2, 0.96)
pt3dadd(93.6, 72.11, -25.55, 0.96)
pt3dadd(94.49, 71.82, -25.6, 0.96)
pt3dadd(95.6, 71.52, -26.3, 0.96)
pt3dadd(96.34, 71.74, -26.35, 0.96)
pt3dadd(97.52, 71.59, -25.3, 0.96)
pt3dadd(97.89, 71.74, -25.15, 0.96)
pt3dadd(98.55, 71.37, -25.1, 0.96)
pt3dadd(98.48, 70.64, -25.7, 0.96)
pt3dadd(98.63, 70.12, -25.8, 0.96)
pt3dadd(99.29, 69.68, -25.85, 0.96)
pt3dadd(99.88, 69.68, -26.15, 0.96)
pt3dadd(101.14, 69.97, -28.45, 1.11)
pt3dadd(101.44, 70.71, -28.7, 1.11)
pt3dadd(101.95, 71.67, -28.7, 1.11)
pt3dadd(101.88, 72.41, -28.9, 1.11)
pt3dadd(101.88, 73, -29, 1.11)
pt3dadd(102.03, 74.03, -29.1, 1.11)
pt3dadd(102.62, 74.91, -29.15, 1.11)
pt3dadd(102.99, 75.5, -29.2, 1.11)
pt3dadd(103.36, 75.94, -29.25, 1.11)
pt3dadd(104.1, 76.24, -29.25, 1.11)
pt3dadd(105.13, 76.39, -29.25, 1.11)
pt3dadd(106, 76.8, -29.35, 1.11)
pt3dadd(106.81, 76.29, -29.35, 1.11)
pt3dadd(107.84, 75.47, -29.95, 1.11)
pt3dadd(108.58, 74.66, -30, 1.11)
pt3dadd(109.77, 74.07, -30, 1.11)
pt3dadd(110.73, 74.29, -30, 1.11)
pt3dadd(111.47, 74.66, -30.45, 1.11)
pt3dadd(112.28, 74.81, -30.75, 1.11)
pt3dadd(113.16, 75.4, -31, 1.11)
pt3dadd(114.05, 76.36, -31.25, 1.11)
pt3dadd(114.72, 76.88, -31.3, 1.11)
pt3dadd(115.97, 77.32, -31.35, 0.96)
pt3dadd(116.34, 77.83, -31.35, 0.96)
pt3dadd(116.64, 78.72, -31.4, 0.96)
pt3dadd(117.08, 79.38, -31.4, 0.96)
pt3dadd(117.75, 79.53, -31.4, 0.96)
pt3dadd(119.08, 79.68, -31.45, 0.81)
pt3dadd(119.96, 80.12, -32.05, 0.81)
pt3dadd(120.41, 80.71, -32.05, 0.81)
pt3dadd(121.37, 81.3, -31.8, 0.81)
pt3dadd(122.11, 81.67, -31.7, 0.81)
pt3dadd(123.29, 81.37, -31.7, 0.81)
pt3dadd(124.18, 81.23, -31.75, 0.81)
pt3dadd(124.92, 80.86, -31.8, 0.81)
pt3dadd(125.43, 80.78, -31.15, 0.81)
pt3dadd(126.25, 80.34, -30.95, 0.81)
pt3dadd(127.28, 79.68, -30.8, 0.81)
pt3dadd(127.72, 79.9, -30.5, 0.81)
pt3dadd(128.24, 80.71, -29.85, 0.81)
pt3dadd(128.69, 81.45, -29.65, 0.81)
pt3dadd(129.28, 82.33, -29.55, 0.81)
pt3dadd(129.87, 82.63, -29.5, 0.81)
pt3dadd(130.98, 83, -29.4, 0.81)
pt3dadd(131.79, 83.14, -29.4, 0.81)
pt3dadd(132.75, 83.73, -29.3, 0.81)
pt3dadd(133.64, 84.32, -29.3, 0.81)
pt3dadd(134.16, 84.91, -29.25, 0.81)
pt3dadd(135.04, 85.21, -29.2, 0.81)
pt3dadd(135.93, 85.21, -29, 0.81)
pt3dadd(136.89, 85.65, -28.5, 0.81)
pt3dadd(137.85, 86.09, -28.45, 0.81)
pt3dadd(138.81, 86.39, -28.4, 0.81)
pt3dadd(139.85, 86.68, -28.35, 0.81)
pt3dadd(140.22, 87.72, -27.75, 0.52)
pt3dadd(140.73, 88.53, -27.75, 0.52)
pt3dadd(141.62, 88.67, -27.7, 0.52)
pt3dadd(142.51, 88.6, -27.6, 0.52)
pt3dadd(143.17, 89.12, -27.55, 0.52)
pt3dadd(143.98, 89.56, -28.45, 0.52)
pt3dadd(145.24, 89.78, -28.55, 0.52)
pt3dadd(146.5, 89.93, -28.7, 0.52)
pt3dadd(147.46, 89.78, -28.75, 0.52)
pt3dadd(148.64, 89.34, -28.8, 0.52)
pt3dadd(149.16, 89.34, -28.8, 0.52)
pt3dadd(149.6, 89.41, -28.85, 0.52)
pt3dadd(150.27, 89.78, -28.85, 0.52)
}
apic[109] {pt3dclear()
pt3dadd(13.44, 57.65, 2.45, 1.4)
pt3dadd(12.4, 57.79, 1.95, 1.4)
pt3dadd(11.37, 58.68, 1.55, 1.55)
pt3dadd(11.07, 59.71, 1.5, 1.55)
pt3dadd(10.7, 60.38, 1.7, 1.55)
pt3dadd(10.48, 60.97, 1.95, 1.55)
pt3dadd(10.18, 61.7, 2.15, 1.55)
pt3dadd(10.11, 62.44, 2.3, 1.55)
pt3dadd(9.67, 63.18, 2.5, 1.55)
pt3dadd(9.52, 63.99, 2.6, 1.55)
}
}
proc shape3d_64() {
apic[109] { pt3dadd(9.22, 64.73, 2.65, 1.55)
}
apic[110] {pt3dclear()
pt3dadd(9.22, 64.73, 2.65, 1.26)
pt3dadd(9.44, 65.76, 2.95, 1.26)
pt3dadd(9.52, 66.72, 3.2, 1.11)
pt3dadd(9.3, 67.82, 3.3, 1.11)
pt3dadd(8.78, 68.49, 3.4, 1.11)
pt3dadd(8.56, 68.93, 3.45, 0.96)
pt3dadd(8.19, 69, 3.45, 0.96)
pt3dadd(7.52, 69.3, 3.5, 0.96)
pt3dadd(6.49, 69.3, 3.6, 0.96)
pt3dadd(5.31, 69.23, 3.65, 0.96)
pt3dadd(4.71, 68.49, 3.7, 0.96)
pt3dadd(4.79, 67.68, 3.75, 0.96)
pt3dadd(5.75, 67.16, 3.75, 0.96)
pt3dadd(6.49, 67.09, 3.8, 0.96)
pt3dadd(7.89, 66.64, 3.9, 0.96)
pt3dadd(8.85, 66.94, 4.7, 0.96)
pt3dadd(9.96, 67.31, 4.75, 0.96)
pt3dadd(10.7, 67.68, 4.8, 0.96)
pt3dadd(11.74, 67.75, 4.85, 0.96)
pt3dadd(12.84, 67.9, 5.4, 0.96)
pt3dadd(13.73, 68.78, 5.4, 0.96)
pt3dadd(14.03, 69.45, 5.6, 0.96)
pt3dadd(15.21, 69.74, 6.2, 0.96)
pt3dadd(16.24, 70.04, 6.25, 0.96)
pt3dadd(16.83, 69.82, 6.25, 0.96)
pt3dadd(17.94, 69.37, 6.3, 0.96)
pt3dadd(19.35, 68.86, 6.7, 0.96)
pt3dadd(19.94, 68.27, 6.85, 0.96)
pt3dadd(20.38, 67.9, 6.95, 0.96)
pt3dadd(21.34, 67.23, 7, 0.96)
pt3dadd(21.93, 66.35, 7, 0.96)
pt3dadd(22.23, 65.69, 7.2, 0.96)
pt3dadd(22.67, 64.43, 7.25, 0.96)
pt3dadd(22.3, 63.77, 7.6, 0.96)
pt3dadd(21.79, 62.59, 7.65, 0.81)
pt3dadd(22.01, 61.78, 7.7, 0.81)
pt3dadd(22.23, 61.33, 8.65, 0.81)
pt3dadd(22.53, 59.71, 8.7, 0.81)
}
apic[111] {pt3dclear()
pt3dadd(9.22, 64.73, 2.65, 1.18)
pt3dadd(8.11, 64.95, 0.3, 1.18)
pt3dadd(7.67, 65.1, 0.3, 1.18)
pt3dadd(7.08, 65.02, 0.3, 1.18)
pt3dadd(6.71, 65.02, 0.25, 1.18)
pt3dadd(6.04, 65.02, 0.2, 1.18)
pt3dadd(5.16, 64.87, 0.15, 1.18)
pt3dadd(4.27, 64.43, 0.1, 1.18)
pt3dadd(3.97, 63.47, 0.1, 1.18)
pt3dadd(3.61, 62.88, 0.05, 1.18)
pt3dadd(3.24, 62.15, 0, 1.11)
pt3dadd(2.87, 61.63, 0, 1.11)
pt3dadd(2.57, 60.67, -0.05, 1.11)
pt3dadd(2.2, 60.08, -0.5, 0.96)
pt3dadd(1.68, 60.23, -0.55, 0.96)
pt3dadd(0.87, 60.89, -0.7, 0.96)
pt3dadd(0.35, 61.26, -0.8, 0.96)
pt3dadd(-0.39, 61.41, -0.9, 0.96)
pt3dadd(-1.05, 61.63, -0.95, 0.96)
pt3dadd(-1.64, 61.85, -1, 0.96)
pt3dadd(-2.46, 62.37, -1.05, 0.96)
pt3dadd(-3.64, 62.51, -0.9, 0.96)
pt3dadd(-4.82, 62.22, -1.05, 0.96)
pt3dadd(-5.49, 62.66, -1.1, 0.96)
pt3dadd(-6.52, 62.88, -1.1, 0.96)
pt3dadd(-6.82, 63.03, -1.15, 0.96)
pt3dadd(-8, 63.4, -1.3, 0.96)
pt3dadd(-8.74, 63.18, -1.4, 0.96)
pt3dadd(-10.07, 63.25, -1.45, 0.96)
pt3dadd(-11.03, 63.92, -1.05, 0.96)
pt3dadd(-11.69, 64.36, -0.9, 0.96)
pt3dadd(-12.21, 64.51, -0.8, 0.96)
pt3dadd(-13.1, 65.17, -0.7, 0.96)
pt3dadd(-13.54, 65.54, -0.65, 0.96)
pt3dadd(-14.21, 66.05, -0.55, 0.96)
pt3dadd(-14.43, 67.01, -0.2, 0.96)
pt3dadd(-14.8, 67.53, -0.15, 0.96)
pt3dadd(-15.54, 67.9, -0.1, 1.33)
pt3dadd(-16.2, 67.97, -0.1, 1.33)
pt3dadd(-16.94, 68.12, -0.1, 1.33)
pt3dadd(-17.9, 68.64, -0.1, 1.33)
pt3dadd(-18.2, 68.78, -0.1, 1.33)
pt3dadd(-18.57, 68.86, -0.1, 1.33)
pt3dadd(-19.01, 69.23, -0.05, 1.33)
pt3dadd(-19.38, 69.67, -0.05, 1.33)
pt3dadd(-19.68, 69.82, -0.05, 1.33)
pt3dadd(-20.42, 69.74, -0.05, 1.33)
pt3dadd(-21.01, 69.82, -0.05, 1.33)
}
apic[112] {pt3dclear()
pt3dadd(-21.01, 69.82, -0.05, 1.03)
pt3dadd(-21.23, 70.7, -0.05, 1.03)
pt3dadd(-21.6, 71.14, -0.05, 1.03)
pt3dadd(-21.97, 71.36, -0.05, 1.03)
pt3dadd(-22.41, 71.36, 0, 1.03)
pt3dadd(-23.08, 71.81, 0, 1.03)
pt3dadd(-23.67, 71.88, 0, 1.03)
pt3dadd(-24.18, 72.1, 0, 1.03)
pt3dadd(-24.85, 72.25, 0, 1.03)
pt3dadd(-25.22, 72.32, 0, 1.03)
pt3dadd(-25.59, 72.47, 0, 1.03)
pt3dadd(-26.62, 72.62, 0, 1.03)
pt3dadd(-27.29, 73.06, 0, 1.03)
pt3dadd(-27.73, 73.5, 0, 1.03)
pt3dadd(-28.25, 74.02, 0, 1.03)
pt3dadd(-28.69, 74.39, 0, 1.03)
pt3dadd(-29.14, 74.68, 0, 1.03)
pt3dadd(-29.51, 75.27, 0, 1.03)
pt3dadd(-30.1, 75.86, -0.1, 1.03)
pt3dadd(-30.47, 76.6, -0.15, 1.03)
pt3dadd(-30.47, 77.19, -0.15, 1.03)
pt3dadd(-30.32, 77.63, -0.15, 1.03)
pt3dadd(-30.1, 78.15, -0.2, 1.03)
pt3dadd(-30.1, 78.81, -0.25, 1.03)
pt3dadd(-30.17, 79.4, -0.3, 1.03)
pt3dadd(-30.39, 80.14, -0.3, 1.03)
pt3dadd(-30.61, 80.88, -0.3, 1.03)
pt3dadd(-30.76, 81.47, -0.35, 1.03)
pt3dadd(-30.91, 82.2, -0.35, 1.03)
pt3dadd(-31.21, 83.16, -0.4, 1.03)
pt3dadd(-31.38, 83.83, -0.45, 1.03)
pt3dadd(-31.83, 84.2, -0.45, 1.03)
pt3dadd(-32.05, 84.49, -0.4, 1.03)
pt3dadd(-32.12, 85.16, -0.45, 1.03)
pt3dadd(-32.2, 85.82, -0.45, 1.03)
pt3dadd(-32.2, 86.34, -0.45, 1.03)
pt3dadd(-32.2, 86.93, -0.45, 1.03)
pt3dadd(-32.49, 87.52, -0.45, 1.03)
pt3dadd(-32.64, 87.88, -0.45, 1.03)
pt3dadd(-32.79, 88.33, -0.45, 1.03)
pt3dadd(-33.16, 88.84, -0.45, 1.03)
pt3dadd(-33.38, 89.28, -0.45, 1.03)
pt3dadd(-33.53, 89.58, -0.5, 1.03)
pt3dadd(-33.67, 90.02, -0.55, 1.03)
pt3dadd(-33.9, 90.32, -0.65, 1.03)
pt3dadd(-34.19, 90.83, -0.7, 0.89)
pt3dadd(-34.63, 91.42, -0.7, 0.89)
pt3dadd(-34.86, 92.01, -0.7, 0.89)
pt3dadd(-35.08, 92.31, -0.6, 0.89)
pt3dadd(-35.52, 92.82, -0.4, 0.89)
pt3dadd(-35.96, 93.12, -0.3, 0.89)
pt3dadd(-36.41, 93.41, -0.25, 0.89)
pt3dadd(-37, 94.08, -0.2, 0.89)
pt3dadd(-37.59, 94.45, -0.2, 1.03)
pt3dadd(-37.96, 94.89, -0.15, 1.03)
pt3dadd(-38.48, 95.18, -0.2, 1.03)
pt3dadd(-39.22, 95.33, -0.25, 1.03)
pt3dadd(-39.81, 95.26, -0.25, 1.03)
pt3dadd(-40.4, 95.26, -0.3, 1.03)
pt3dadd(-41.36, 95.41, -0.3, 1.03)
pt3dadd(-41.73, 95.77, -0.3, 1.03)
pt3dadd(-42.03, 96.14, -0.3, 1.03)
pt3dadd(-42.32, 96.44, -0.3, 1.03)
pt3dadd(-42.76, 96.81, -0.35, 1.03)
pt3dadd(-43.28, 97.32, -0.4, 1.03)
pt3dadd(-43.65, 97.99, -0.4, 1.03)
pt3dadd(-43.95, 99.02, 2, 1.03)
pt3dadd(-44.24, 99.61, 1.75, 1.03)
pt3dadd(-44.54, 100.27, 1.6, 1.03)
pt3dadd(-44.61, 100.86, 1.45, 1.03)
pt3dadd(-45.28, 101.38, 1.25, 1.03)
pt3dadd(-45.5, 102.04, 1.15, 1.03)
pt3dadd(-46.16, 102.71, 0.95, 1.18)
pt3dadd(-46.68, 103.3, 0.95, 1.18)
pt3dadd(-47.2, 103.74, 0.9, 1.18)
pt3dadd(-47.72, 103.67, 0.85, 0.96)
pt3dadd(-48.46, 104.33, 0.85, 0.96)
pt3dadd(-48.97, 104.92, 0.8, 1.11)
pt3dadd(-49.34, 105.07, 0.8, 1.11)
pt3dadd(-50.45, 105.73, 0.8, 1.11)
pt3dadd(-51.04, 106.47, 0.8, 1.11)
pt3dadd(-51.19, 106.76, 0.75, 0.96)
pt3dadd(-51.86, 107.65, 0.75, 0.96)
pt3dadd(-52.22, 107.87, 0.75, 0.96)
pt3dadd(-52.59, 108.39, 0.75, 0.96)
pt3dadd(-53.41, 108.9, 0.7, 0.96)
pt3dadd(-53.92, 109.64, 0.65, 0.96)
pt3dadd(-54.52, 110.38, 0.65, 0.96)
pt3dadd(-55.11, 111.04, 0.25, 0.96)
pt3dadd(-55.33, 111.7, 0.25, 0.96)
pt3dadd(-56.14, 112, 1.05, 0.96)
pt3dadd(-56.66, 112.52, 1.25, 0.96)
pt3dadd(-57.03, 112.81, 1.45, 0.81)
pt3dadd(-57.47, 113.33, 1.5, 0.81)
pt3dadd(-57.99, 113.55, 1.55, 0.81)
pt3dadd(-58.46, 113.67, 0.95, 0.52)
pt3dadd(-58.83, 114.19, 1.1, 0.52)
pt3dadd(-58.83, 114.78, 1.2, 0.52)
pt3dadd(-58.68, 115.37, 1.25, 0.52)
pt3dadd(-58.75, 116.03, 1.3, 0.52)
pt3dadd(-58.9, 116.55, 1.45, 0.67)
pt3dadd(-59.12, 117.07, 1.5, 0.67)
pt3dadd(-59.56, 117.36, 1.55, 0.67)
pt3dadd(-60.01, 117.51, 1.55, 0.67)
pt3dadd(-60.6, 117.88, 1.65, 0.67)
pt3dadd(-61.04, 118.32, 1.8, 0.67)
pt3dadd(-61.34, 118.47, 1.85, 0.67)
pt3dadd(-61.71, 118.54, 1.9, 0.67)
pt3dadd(-62.6, 118.76, 1.95, 0.67)
pt3dadd(-63.19, 119.13, 1.85, 0.67)
pt3dadd(-63.56, 119.35, 1.6, 0.67)
pt3dadd(-64.07, 119.65, 1.2, 0.67)
pt3dadd(-64.37, 120.09, 0.9, 0.67)
}
}
proc shape3d_65() {
apic[112] { pt3dadd(-64.59, 120.46, 0.6, 0.67)
pt3dadd(-64.81, 120.75, 0.35, 0.67)
pt3dadd(-65.18, 120.9, 0.25, 0.67)
pt3dadd(-65.7, 121.19, 0.1, 0.67)
pt3dadd(-66.07, 121.49, 0, 0.67)
pt3dadd(-66.59, 121.86, -0.1, 0.67)
pt3dadd(-66.88, 122.3, -0.15, 0.67)
pt3dadd(-67.1, 123.26, -0.4, 0.52)
pt3dadd(-67.25, 123.7, -0.25, 0.52)
pt3dadd(-67.69, 124.07, -0.1, 0.52)
pt3dadd(-68.14, 124.44, 0.05, 0.52)
pt3dadd(-68.51, 124.73, 0.2, 0.52)
pt3dadd(-68.95, 125.18, 0.3, 0.52)
pt3dadd(-69.1, 125.84, 0.35, 0.52)
pt3dadd(-69.1, 126.43, 0.4, 0.52)
pt3dadd(-69.03, 127.24, 0.7, 0.74)
pt3dadd(-69.03, 128.13, 0.75, 0.74)
pt3dadd(-69.1, 128.94, 0.85, 0.74)
pt3dadd(-69.25, 129.82, 0.95, 0.74)
pt3dadd(-69.39, 130.56, 1.05, 0.74)
pt3dadd(-69.54, 131.37, 1.15, 0.74)
pt3dadd(-69.62, 132.04, 1.3, 0.74)
pt3dadd(-69.62, 132.48, 1.4, 0.74)
pt3dadd(-69.76, 132.92, 1.5, 0.74)
pt3dadd(-69.84, 133.88, 1.65, 0.74)
pt3dadd(-70.13, 134.62, 1.7, 0.74)
pt3dadd(-70.13, 135.35, 1.75, 0.74)
pt3dadd(-70.21, 135.94, 1.8, 0.74)
pt3dadd(-70.58, 136.46, 1.8, 0.74)
pt3dadd(-70.95, 136.98, 1.85, 0.74)
pt3dadd(-71.32, 137.27, 2.2, 0.74)
pt3dadd(-71.91, 138.45, 2.25, 0.74)
pt3dadd(-72.43, 139.19, 2.3, 0.74)
pt3dadd(-73.31, 139.34, 2.3, 0.74)
pt3dadd(-73.76, 139.71, 2.35, 0.89)
pt3dadd(-74.35, 140.22, 2.4, 0.89)
pt3dadd(-74.86, 141.03, 2.45, 0.74)
pt3dadd(-75.23, 141.55, 2.5, 0.74)
pt3dadd(-76.05, 142.14, 2.65, 0.74)
pt3dadd(-76.64, 142.58, 2.65, 0.74)
pt3dadd(-77.08, 143.17, 2.7, 0.74)
pt3dadd(-77.6, 143.61, 2.7, 0.74)
pt3dadd(-78.19, 144.5, 2.7, 0.74)
pt3dadd(-78.56, 145.75, 2.7, 0.74)
pt3dadd(-78.78, 146.42, 2.7, 0.74)
pt3dadd(-79, 147.15, 2.7, 0.74)
pt3dadd(-79.37, 147.67, 2.7, 0.74)
pt3dadd(-79.67, 148.19, 2.7, 0.74)
pt3dadd(-79.57, 149.05, 2.65, 0.74)
pt3dadd(-80.01, 149.87, 3.65, 0.74)
pt3dadd(-80.23, 150.46, 3.6, 0.74)
pt3dadd(-80.46, 150.97, 3.55, 0.74)
pt3dadd(-80.68, 151.78, 3.5, 0.74)
pt3dadd(-81.05, 152.52, 3.45, 0.74)
pt3dadd(-81.64, 152.89, 3.45, 0.74)
pt3dadd(-82.45, 153.63, 3.4, 0.74)
pt3dadd(-82.9, 154.14, 3.4, 0.74)
pt3dadd(-83.34, 154.58, 3.4, 0.74)
pt3dadd(-83.71, 155.25, 3.35, 0.89)
pt3dadd(-84.15, 155.76, 3.35, 0.89)
pt3dadd(-84.52, 156.21, 3.3, 0.89)
pt3dadd(-85.56, 156.8, 3.25, 0.89)
pt3dadd(-86.44, 156.87, 3.25, 0.89)
pt3dadd(-87.4, 157.39, 3.25, 0.89)
pt3dadd(-88.51, 158.12, 3.2, 0.89)
pt3dadd(-89.62, 158.64, 3.2, 0.89)
pt3dadd(-89.77, 159.45, 3.2, 0.89)
pt3dadd(-90.21, 160.12, 3.2, 0.67)
pt3dadd(-90.58, 160.78, 3.2, 0.67)
pt3dadd(-90.88, 161.59, 3.1, 0.59)
pt3dadd(-91.25, 162.11, 3.05, 0.59)
pt3dadd(-91.39, 162.77, 3, 0.59)
pt3dadd(-91.84, 163.14, 2.95, 0.59)
pt3dadd(-92.65, 163.21, 2.95, 0.59)
pt3dadd(-93.69, 162.92, 2.9, 0.59)
pt3dadd(-94.06, 162.48, 2.9, 0.59)
pt3dadd(-94.2, 161.96, 2.9, 0.59)
}
apic[113] {pt3dclear()
pt3dadd(-21.01, 69.82, -0.05, 1.03)
pt3dadd(-21.61, 69.06, 0.95, 1.03)
pt3dadd(-22.5, 68.76, 1, 1.03)
pt3dadd(-23.09, 68.62, 1, 1.03)
pt3dadd(-23.83, 68.84, 1.15, 1.03)
pt3dadd(-24.27, 68.69, 1.2, 1.03)
pt3dadd(-25.16, 68.32, 1.25, 1.03)
pt3dadd(-25.67, 68.25, 1.3, 1.03)
pt3dadd(-26.41, 67.8, 1.35, 1.03)
pt3dadd(-27, 67.51, 1.4, 1.03)
pt3dadd(-27.67, 67.29, 0.95, 1.03)
pt3dadd(-28.26, 66.7, 0.7, 1.03)
pt3dadd(-28.78, 66.03, 0.6, 1.03)
pt3dadd(-29.37, 65.37, 0.4, 1.03)
pt3dadd(-30.18, 64.85, 0.3, 1.03)
pt3dadd(-30.7, 64.49, 0.2, 1.03)
pt3dadd(-31.14, 63.97, 0.2, 1.03)
pt3dadd(-32.03, 63.9, 0.15, 1.03)
pt3dadd(-32.99, 63.82, 0.1, 1.03)
pt3dadd(-33.88, 63.53, 0.05, 0.89)
pt3dadd(-34.62, 63.82, 0.05, 0.89)
pt3dadd(-35.36, 63.67, -0.2, 0.89)
pt3dadd(-35.95, 63.23, -0.25, 0.89)
pt3dadd(-36.54, 62.57, -0.35, 0.89)
pt3dadd(-37.2, 61.98, -0.4, 0.89)
pt3dadd(-37.72, 61.17, -0.7, 0.89)
pt3dadd(-38.24, 60.5, -0.85, 0.89)
pt3dadd(-38.9, 60.06, -0.9, 0.89)
pt3dadd(-39.79, 59.54, -1, 1.03)
pt3dadd(-40.38, 58.81, -1, 1.03)
pt3dadd(-41.05, 58.14, -1.25, 1.03)
pt3dadd(-41.27, 57.26, -1.35, 1.03)
pt3dadd(-42.01, 56.45, -1.5, 1.03)
pt3dadd(-42.75, 56.08, -1.55, 1.03)
pt3dadd(-43.63, 55.34, -1.6, 1.03)
pt3dadd(-44.59, 55.19, -1.6, 1.03)
pt3dadd(-45.19, 55.19, -1.7, 1.03)
pt3dadd(-46.44, 54.97, -1.75, 1.03)
pt3dadd(-47.33, 54.38, -1.75, 1.03)
pt3dadd(-48.51, 53.64, -1.85, 1.03)
pt3dadd(-49.03, 52.98, -1.85, 1.03)
pt3dadd(-49.32, 52.02, -0.5, 1.03)
pt3dadd(-49.4, 51.14, -0.3, 1.03)
pt3dadd(-49.84, 49.88, -0.25, 1.03)
pt3dadd(-50.36, 48.92, -0.2, 1.03)
pt3dadd(-50.8, 48.33, -0.15, 0.89)
pt3dadd(-51.47, 48.04, -0.1, 0.89)
pt3dadd(-52.65, 47.38, -0.05, 0.89)
pt3dadd(-53.32, 46.56, -0.05, 0.89)
pt3dadd(-53.76, 45.68, -1.1, 0.89)
pt3dadd(-54.5, 45.09, -1.25, 0.89)
pt3dadd(-55.16, 44.65, -1.35, 0.89)
pt3dadd(-56.2, 44.28, -1.4, 0.89)
pt3dadd(-57.08, 43.98, -1.45, 0.89)
pt3dadd(-57.97, 43.32, -1.45, 0.89)
pt3dadd(-58.78, 42.58, -1.45, 0.89)
pt3dadd(-59.75, 41.99, -1.45, 0.89)
pt3dadd(-60.19, 41.11, -1.5, 0.89)
pt3dadd(-61, 40.3, -1.55, 0.89)
pt3dadd(-61.45, 39.41, -1.6, 0.89)
pt3dadd(-62.26, 38.45, -1.6, 0.89)
pt3dadd(-62.46, 36.86, -1.65, 0.89)
pt3dadd(-62.68, 36.05, -1.65, 0.89)
pt3dadd(-63.05, 35.46, -1.65, 0.89)
pt3dadd(-63.35, 34.65, -0.95, 0.89)
pt3dadd(-63.57, 34.06, -0.8, 0.89)
pt3dadd(-63.79, 33.83, -0.65, 0.74)
pt3dadd(-64.46, 33.24, -0.6, 0.74)
pt3dadd(-64.97, 33.1, -0.55, 0.74)
pt3dadd(-65.86, 32.8, -0.45, 0.74)
pt3dadd(-66.6, 32.58, -0.35, 0.74)
pt3dadd(-67.86, 31.77, -0.65, 0.74)
pt3dadd(-68.74, 31.25, -0.75, 0.74)
pt3dadd(-69.56, 30.59, -0.8, 0.74)
pt3dadd(-70.37, 29.41, -0.85, 0.74)
pt3dadd(-70.96, 28.67, -0.85, 0.74)
pt3dadd(-71.99, 28.01, -0.9, 0.89)
pt3dadd(-72.66, 27.64, -0.9, 0.89)
pt3dadd(-73.33, 27.34, -0.9, 0.89)
pt3dadd(-74.14, 27.12, -0.9, 0.89)
pt3dadd(-75.03, 26.83, -0.9, 0.89)
pt3dadd(-75.84, 26.61, -0.9, 0.89)
pt3dadd(-76.43, 26.53, -0.9, 0.74)
pt3dadd(-76.95, 26.68, -0.9, 0.74)
pt3dadd(-77.76, 27.12, -0.9, 0.74)
pt3dadd(-78.42, 27.57, -0.9, 0.74)
pt3dadd(-79.16, 27.86, -0.9, 0.74)
pt3dadd(-79.76, 27.79, -0.9, 0.74)
pt3dadd(-80.94, 28.08, -0.9, 0.74)
pt3dadd(-81.6, 26.98, -0.95, 0.89)
pt3dadd(-82.34, 26.24, -0.95, 0.89)
pt3dadd(-82.86, 25.35, -1, 0.89)
pt3dadd(-83.52, 24.69, -1, 0.89)
pt3dadd(-83.75, 23.73, -1, 0.89)
pt3dadd(-84.19, 23.14, -1, 0.67)
pt3dadd(-84.71, 22.7, -1, 0.67)
pt3dadd(-85.3, 22.85, -1.05, 0.67)
pt3dadd(-85.89, 23.07, -1.1, 0.67)
pt3dadd(-87, 23.58, -1.3, 0.67)
pt3dadd(-87.66, 23.29, -0.5, 0.67)
pt3dadd(-88.62, 23.66, -0.35, 0.67)
pt3dadd(-89.51, 23.58, -0.25, 0.67)
pt3dadd(-90.4, 23.58, -0.2, 0.67)
pt3dadd(-91.06, 23.66, -0.15, 0.67)
pt3dadd(-91.95, 23.66, -0.1, 0.67)
pt3dadd(-92.69, 23.14, -0.1, 0.67)
pt3dadd(-93.13, 22.62, -0.1, 0.67)
pt3dadd(-93.65, 21.74, -0.05, 0.67)
pt3dadd(-94.24, 21.59, -0.05, 0.67)
pt3dadd(-94.83, 21.81, 0.45, 0.67)
pt3dadd(-95.28, 22.18, 0.4, 0.67)
pt3dadd(-96.09, 22.18, 0.25, 0.67)
pt3dadd(-96.75, 21.89, 0.15, 0.67)
pt3dadd(-97.35, 21.08, -0.35, 0.67)
pt3dadd(-98.01, 20.56, -0.6, 0.67)
pt3dadd(-98.75, 19.82, -0.75, 0.67)
pt3dadd(-99.42, 18.86, -0.85, 0.67)
pt3dadd(-100.38, 18.49, -0.9, 0.67)
pt3dadd(-101.34, 18.05, -0.95, 0.67)
pt3dadd(-102, 17.54, -0.95, 0.67)
pt3dadd(-102.96, 17.68, -1, 0.67)
pt3dadd(-103.55, 17.9, -1.05, 0.67)
pt3dadd(-104.07, 17.98, -1.05, 0.67)
}
}
proc shape3d_66() {
apic[113] { pt3dadd(-104.74, 17.98, -1.1, 0.67)
pt3dadd(-105.25, 18.05, -1.1, 0.67)
pt3dadd(-105.99, 17.68, -1.1, 0.67)
pt3dadd(-106.58, 17.31, -2.15, 0.52)
pt3dadd(-106.95, 16.8, -2.2, 0.52)
pt3dadd(-107.69, 16.65, -2.2, 0.52)
pt3dadd(-108.21, 16.43, -2.2, 0.52)
pt3dadd(-108.95, 16.58, -2.25, 0.52)
pt3dadd(-109.32, 16.06, -2.25, 0.52)
pt3dadd(-109.61, 15.62, -2.25, 0.52)
pt3dadd(-110.13, 15.32, -2.25, 0.52)
pt3dadd(-111.1, 14.79, -2.05, 0.52)
pt3dadd(-111.69, 14.79, -2.1, 0.52)
pt3dadd(-112.13, 14.79, -2.1, 0.52)
pt3dadd(-112.8, 14.79, -2.1, 0.52)
pt3dadd(-113.39, 14.34, -2.1, 0.52)
pt3dadd(-114.13, 13.97, -2.1, 0.52)
pt3dadd(-114.64, 13.75, -2.1, 0.52)
pt3dadd(-114.94, 13.61, -2.8, 0.52)
pt3dadd(-115.97, 13.16, -0.75, 0.37)
pt3dadd(-116.56, 13.31, -0.75, 0.37)
pt3dadd(-117.23, 13.53, -0.75, 0.37)
pt3dadd(-117.6, 13.68, -0.75, 0.37)
}
apic[114] {pt3dclear()
pt3dadd(12.4, 50.92, 2.5, 1.48)
pt3dadd(13.43, 50.85, -9.1, 1.48)
pt3dadd(14.24, 50.77, -9.1, 1.48)
pt3dadd(15.28, 50.77, -9.15, 1.48)
pt3dadd(16.02, 50.92, -9.15, 1.48)
pt3dadd(17.05, 51.22, -9.15, 1.48)
pt3dadd(17.94, 51.66, -9.15, 1.48)
pt3dadd(18.97, 52.1, -9.5, 1.48)
pt3dadd(19.49, 52.1, -9.55, 1.48)
pt3dadd(20.3, 52.54, -9.6, 1.48)
pt3dadd(20.9, 52.99, -10.15, 1.48)
pt3dadd(21.34, 53.65, -10.35, 1.48)
pt3dadd(21.34, 54.54, -10.6, 1.48)
pt3dadd(21.12, 55.2, -11.1, 1.48)
pt3dadd(20.82, 55.57, -11.75, 1.48)
pt3dadd(20.38, 56.08, -11.8, 1.48)
pt3dadd(19.71, 56.23, -11.85, 1.48)
pt3dadd(19.05, 56.38, -12.15, 1.48)
pt3dadd(18.16, 56.6, -12.35, 1.48)
pt3dadd(17.57, 56.67, -12.35, 1.48)
pt3dadd(16.83, 56.82, -12.35, 1.48)
pt3dadd(16.02, 56.97, -12.35, 1.48)
pt3dadd(15.65, 57.26, -12.8, 1.48)
pt3dadd(14.83, 57.34, -12.9, 1.48)
pt3dadd(14.32, 57.49, -12.9, 1.48)
pt3dadd(13.43, 57.71, -12.9, 1.48)
pt3dadd(12.03, 57.93, -12.9, 1.48)
pt3dadd(11.44, 58.22, -12.9, 1.48)
pt3dadd(10.7, 58.37, -13.3, 1.48)
pt3dadd(10.03, 58.59, -13.35, 1.48)
pt3dadd(9.59, 58.89, -13.45, 1.48)
pt3dadd(8.92, 59.18, -13.55, 1.48)
pt3dadd(8.48, 59.33, -13.6, 1.48)
pt3dadd(7.89, 59.85, -13.7, 1.48)
pt3dadd(7.74, 60.29, -13.8, 1.48)
pt3dadd(7.37, 60.8, -13.9, 1.48)
pt3dadd(7.07, 61.54, -14, 1.48)
pt3dadd(6.93, 62.06, -14, 1.48)
pt3dadd(6.78, 62.65, -14.1, 1.48)
pt3dadd(6.63, 63.38, -14.15, 1.48)
pt3dadd(6.78, 64.2, -14.15, 1.48)
pt3dadd(7.22, 64.86, -14.8, 1.63)
pt3dadd(7.15, 65.97, -14.8, 1.63)
pt3dadd(6.85, 66.56, -14.85, 1.63)
pt3dadd(6.93, 67.66, -14.85, 1.63)
pt3dadd(6.41, 68.55, -14.85, 1.63)
pt3dadd(6.11, 69.36, -14.85, 1.63)
pt3dadd(5.6, 69.95, -14.85, 1.63)
pt3dadd(5.23, 70.76, -14.85, 1.63)
pt3dadd(4.86, 71.35, -14.9, 1.63)
pt3dadd(4.64, 71.94, -15, 1.63)
pt3dadd(4.19, 72.38, -15.05, 1.63)
pt3dadd(3.23, 72.75, -15.1, 1.63)
pt3dadd(3.01, 72.97, -15.1, 1.63)
pt3dadd(2.05, 73.86, -15.1, 1.63)
pt3dadd(1.9, 74.23, -15.1, 1.63)
pt3dadd(1.68, 74.74, -15.15, 1.63)
pt3dadd(1.38, 75.18, -15.15, 1.63)
pt3dadd(1.01, 75.63, -15.15, 1.63)
pt3dadd(0.42, 76.07, -15.15, 1.63)
pt3dadd(0.13, 76.36, -15.15, 1.63)
pt3dadd(-0.39, 76.81, -15.15, 1.63)
}
apic[115] {pt3dclear()
pt3dadd(-0.39, 76.81, -15.15, 1.26)
pt3dadd(-1.06, 77.91, -14.15, 1.26)
pt3dadd(-1.2, 78.65, -14.35, 1.26)
pt3dadd(-1.72, 79.24, -14.5, 1.26)
pt3dadd(-2.09, 79.76, -14.65, 1.18)
pt3dadd(-2.61, 80.35, -14.7, 1.18)
pt3dadd(-2.98, 80.49, -14.8, 1.18)
pt3dadd(-3.57, 81.08, -15.05, 1.18)
pt3dadd(-3.86, 81.75, -15.25, 1.18)
pt3dadd(-4.31, 82.34, -15.3, 1.18)
pt3dadd(-4.6, 82.85, -15.3, 1.18)
pt3dadd(-4.6, 83.96, -15.35, 1.18)
pt3dadd(-4.53, 84.92, -15.4, 1.18)
pt3dadd(-4.09, 85.8, -15.4, 1.18)
pt3dadd(-3.72, 86.39, -15.4, 1.18)
pt3dadd(-3.35, 86.98, -15.8, 1.18)
pt3dadd(-3.2, 87.8, -15.9, 1.18)
pt3dadd(-3.35, 88.46, -15.95, 1.18)
pt3dadd(-3.49, 89.12, -15.95, 1.18)
pt3dadd(-3.72, 89.93, -15.95, 1.18)
pt3dadd(-4.09, 90.6, -15.95, 1.18)
pt3dadd(-4.43, 91.33, -16.15, 1.18)
pt3dadd(-4.8, 92.22, -14.85, 1.18)
pt3dadd(-5.32, 92.74, -14.75, 1.18)
pt3dadd(-5.69, 93.18, -14.7, 1.18)
pt3dadd(-6.21, 93.55, -14.7, 1.18)
pt3dadd(-6.8, 94.28, -14.65, 1.18)
pt3dadd(-6.8, 95.1, -14.65, 1.18)
pt3dadd(-6.73, 95.91, -14.65, 1.18)
pt3dadd(-6.5, 96.35, -14.7, 1.18)
pt3dadd(-6.28, 96.72, -14.75, 1.18)
pt3dadd(-5.84, 97.53, -14.7, 1.18)
pt3dadd(-5.62, 98.34, -16.7, 1.33)
pt3dadd(-5.54, 99.15, -16.8, 1.33)
pt3dadd(-5.47, 99.74, -16.85, 1.33)
pt3dadd(-5.62, 100.33, -17.35, 1.33)
pt3dadd(-5.69, 100.85, -17.4, 1.33)
pt3dadd(-5.99, 101.51, -17.45, 1.33)
pt3dadd(-6.28, 102.1, -17.6, 1.33)
pt3dadd(-6.8, 102.84, -17.65, 1.18)
pt3dadd(-7.1, 103.28, -17.7, 1.18)
pt3dadd(-7.54, 104.09, -17.7, 1.03)
pt3dadd(-8.06, 104.83, -17.7, 1.03)
pt3dadd(-8.43, 105.35, -17.7, 1.03)
pt3dadd(-8.8, 105.79, -17.9, 1.03)
pt3dadd(-9.31, 106.16, -17.95, 1.03)
pt3dadd(-9.9, 106.53, -17.95, 1.03)
pt3dadd(-10.5, 106.82, -18, 1.03)
pt3dadd(-11.31, 107.12, -18.05, 1.03)
pt3dadd(-12.12, 107.41, -18.1, 1.03)
pt3dadd(-12.71, 108, -18.1, 1.03)
pt3dadd(-13.3, 108.3, -18.1, 1.03)
pt3dadd(-13.97, 108.74, -18.1, 1.03)
pt3dadd(-14.78, 109.4, -18.15, 1.03)
pt3dadd(-15.15, 110.14, -18.35, 0.89)
pt3dadd(-15.89, 110.73, -18.35, 0.89)
pt3dadd(-16.78, 111.32, -18.4, 0.89)
pt3dadd(-17.22, 111.61, -18.4, 0.89)
pt3dadd(-17.81, 112.35, -18.5, 1.03)
pt3dadd(-18.03, 113.09, -18.55, 1.03)
pt3dadd(-17.89, 113.9, -18.7, 1.03)
pt3dadd(-17.66, 114.86, -18.9, 1.03)
pt3dadd(-16.93, 115.38, -19, 1.03)
pt3dadd(-16.33, 116.04, -19, 1.03)
pt3dadd(-16.04, 116.7, -19.05, 1.03)
pt3dadd(-16.04, 117.29, -19.3, 1.03)
pt3dadd(-15.67, 118.47, -20, 1.03)
pt3dadd(-15.37, 119.43, -20.1, 1.03)
pt3dadd(-15.37, 119.95, -20.1, 1.03)
pt3dadd(-15.23, 120.39, -20.1, 1.03)
pt3dadd(-15.23, 121.05, -20.1, 1.03)
pt3dadd(-15.59, 121.94, -20.1, 1.03)
pt3dadd(-16.19, 122.46, -20.1, 1.03)
pt3dadd(-16.63, 122.82, -20.1, 1.03)
pt3dadd(-16.89, 123.14, -20.8, 1.03)
pt3dadd(-17.26, 123.59, -20.7, 1.03)
pt3dadd(-17.92, 124.03, -20.6, 1.03)
pt3dadd(-18.07, 124.4, -20.55, 1.03)
pt3dadd(-18.36, 125.06, -20.45, 1.03)
pt3dadd(-18.22, 125.87, -20.35, 1.03)
pt3dadd(-18, 126.61, -20.25, 1.03)
pt3dadd(-17.55, 127.42, -20.1, 1.03)
pt3dadd(-17.48, 128.23, -20, 1.03)
pt3dadd(-17.18, 128.97, -21, 1.03)
pt3dadd(-17.26, 129.63, -21.25, 1.03)
pt3dadd(-17.55, 130.67, -21.6, 0.89)
pt3dadd(-17.7, 131.26, -21.65, 0.89)
pt3dadd(-17.85, 131.85, -21.7, 0.89)
pt3dadd(-18.07, 132.51, -21.8, 0.89)
pt3dadd(-18.29, 133.32, -21.8, 0.89)
pt3dadd(-18.29, 134.35, -21.8, 0.89)
pt3dadd(-18.44, 135.39, -21.85, 0.89)
pt3dadd(-18.51, 136.2, -21.85, 0.89)
pt3dadd(-18.59, 136.42, -21.85, 1.03)
pt3dadd(-18.51, 137.23, -21.85, 1.03)
pt3dadd(-18.14, 137.89, -21.85, 1.03)
pt3dadd(-17.55, 138.41, -21.9, 1.03)
pt3dadd(-17.26, 139.22, -21.9, 1.03)
pt3dadd(-17.26, 139.96, -21.9, 1.03)
pt3dadd(-17.63, 140.77, -22.05, 1.03)
pt3dadd(-18.22, 141.58, -22.1, 1.03)
pt3dadd(-18.66, 142.39, -22.1, 1.03)
pt3dadd(-18.88, 143.2, -22.1, 1.03)
pt3dadd(-19.03, 143.42, -22.1, 1.03)
pt3dadd(-19.33, 144.16, -22.15, 1.03)
pt3dadd(-19.47, 144.75, -22.15, 1.03)
pt3dadd(-19.55, 145.49, -22.3, 1.03)
pt3dadd(-19.25, 146.08, -22.3, 1.03)
pt3dadd(-19.1, 146.82, -22.35, 1.03)
pt3dadd(-18.88, 147.78, -22.35, 1.03)
pt3dadd(-18.66, 148.29, -22.35, 1.03)
pt3dadd(-18.36, 149.25, -22.35, 1.03)
pt3dadd(-17.92, 150.21, -22.4, 1.03)
pt3dadd(-18.22, 151.09, -22.4, 1.03)
pt3dadd(-18.22, 151.83, -22.4, 1.03)
}
}
proc shape3d_67() {
apic[115] { pt3dadd(-18.29, 152.94, -22.4, 1.03)
pt3dadd(-18.22, 153.75, -22.45, 1.03)
pt3dadd(-18, 154.12, -22.45, 1.03)
pt3dadd(-18.14, 154.86, -22.45, 1.03)
pt3dadd(-18.04, 155.57, -22.45, 1.03)
pt3dadd(-18.19, 156.6, -22.45, 1.03)
pt3dadd(-18.56, 156.89, -22.5, 1.03)
pt3dadd(-19.22, 157.78, -22.55, 0.89)
pt3dadd(-19.74, 158.22, -22.55, 0.89)
pt3dadd(-20.03, 158.59, -22.55, 0.89)
pt3dadd(-20.26, 159.18, -22.75, 0.89)
pt3dadd(-20.63, 159.77, -22.9, 0.89)
pt3dadd(-20.48, 160.65, -22.9, 0.89)
pt3dadd(-20.63, 161.76, -22.95, 0.89)
pt3dadd(-20.48, 162.28, -22.85, 0.89)
pt3dadd(-20.48, 163.31, -22.8, 0.89)
pt3dadd(-20.48, 164.19, -22.75, 0.89)
pt3dadd(-20.48, 164.71, -22.7, 0.89)
pt3dadd(-20.03, 165.74, -22.65, 0.89)
pt3dadd(-19.81, 166.63, -22.65, 0.89)
pt3dadd(-19.74, 167.59, -22.6, 0.89)
pt3dadd(-20.11, 168.25, -22.55, 0.89)
pt3dadd(-20.11, 169.13, -22.5, 0.89)
pt3dadd(-20.11, 170.17, -22.4, 0.89)
pt3dadd(-20.11, 170.76, -22.3, 0.81)
pt3dadd(-20.11, 171.64, -22.25, 0.81)
pt3dadd(-20.18, 172.38, -22.2, 0.81)
pt3dadd(-19.81, 173.34, -22.2, 0.81)
pt3dadd(-19.66, 174.22, -22.15, 0.81)
pt3dadd(-19.22, 174.89, -22.1, 0.81)
pt3dadd(-19, 175.85, -22.05, 0.81)
pt3dadd(-18.56, 176.36, -22.05, 0.81)
pt3dadd(-17.89, 176.8, -22, 0.81)
pt3dadd(-17.15, 177.98, -22, 0.81)
pt3dadd(-16.71, 178.94, -21.95, 0.81)
pt3dadd(-16.71, 180.12, -21.9, 0.81)
pt3dadd(-17, 181.08, -21.9, 0.81)
pt3dadd(-17.08, 182.04, -21.9, 0.81)
pt3dadd(-17.08, 182.93, -21.9, 0.81)
pt3dadd(-16.93, 184.03, -21.9, 0.81)
pt3dadd(-17, 185.36, -21.85, 0.81)
pt3dadd(-17.23, 186.61, -21.85, 0.81)
pt3dadd(-16.93, 187.28, -21.85, 0.81)
pt3dadd(-16.69, 187.67, -21.8, 0.81)
pt3dadd(-16.47, 188.48, -21.75, 0.81)
pt3dadd(-16.62, 189.44, -21.7, 0.81)
pt3dadd(-16.62, 190.69, -21.6, 0.81)
pt3dadd(-17.06, 191.36, -21.5, 0.81)
pt3dadd(-17.21, 192.24, -21.45, 0.81)
pt3dadd(-16.76, 192.83, -21.45, 0.81)
pt3dadd(-16.25, 193.42, -21.55, 0.81)
pt3dadd(-15.88, 194.31, -21.65, 0.81)
pt3dadd(-15.73, 195.04, -21.75, 0.81)
pt3dadd(-15.58, 195.78, -21.8, 0.81)
pt3dadd(-15.88, 196.74, -21.85, 0.81)
pt3dadd(-16.17, 197.33, -21.95, 0.81)
pt3dadd(-16.62, 197.85, -22.05, 0.81)
pt3dadd(-17.21, 198.36, -22.3, 0.81)
pt3dadd(-17.73, 198.88, -22.55, 0.81)
pt3dadd(-18.61, 199.25, -22.65, 0.67)
pt3dadd(-19.28, 199.69, -22.7, 0.67)
pt3dadd(-19.72, 200.21, -22.7, 0.67)
pt3dadd(-20.16, 200.87, -22.75, 0.67)
pt3dadd(-20.9, 201.31, -22.75, 0.67)
pt3dadd(-21.57, 201.61, -22.75, 0.67)
pt3dadd(-21.86, 202.27, -22.75, 0.67)
pt3dadd(-22.01, 203.23, -22.75, 0.67)
pt3dadd(-22.09, 204.04, -22.8, 0.67)
pt3dadd(-22.31, 204.56, -22.8, 0.67)
pt3dadd(-22.83, 205.07, -23, 0.67)
pt3dadd(-23.27, 205.74, -23.45, 0.67)
pt3dadd(-23.86, 206.55, -23.85, 0.67)
pt3dadd(-24.6, 207.07, -24, 0.67)
pt3dadd(-25.19, 207.8, -24.05, 0.67)
pt3dadd(-25.63, 208.76, -24.05, 0.67)
pt3dadd(-25.86, 209.72, -24.05, 0.67)
pt3dadd(-25.78, 210.68, -24.1, 0.67)
pt3dadd(-25.56, 211.64, -24.1, 0.67)
pt3dadd(-24.97, 212.23, -24.1, 0.67)
pt3dadd(-24.3, 213.04, -24.1, 0.67)
}
}
proc basic_shape() {
shape3d_1()
shape3d_2()
shape3d_3()
shape3d_4()
shape3d_5()
shape3d_6()
shape3d_7()
shape3d_8()
shape3d_9()
shape3d_10()
shape3d_11()
shape3d_12()
shape3d_13()
shape3d_14()
shape3d_15()
shape3d_16()
shape3d_17()
shape3d_18()
shape3d_19()
shape3d_20()
shape3d_21()
shape3d_22()
shape3d_23()
shape3d_24()
shape3d_25()
shape3d_26()
shape3d_27()
shape3d_28()
shape3d_29()
shape3d_30()
shape3d_31()
shape3d_32()
shape3d_33()
shape3d_34()
shape3d_35()
shape3d_36()
shape3d_37()
shape3d_38()
shape3d_39()
shape3d_40()
shape3d_41()
shape3d_42()
shape3d_43()
shape3d_44()
shape3d_45()
shape3d_46()
shape3d_47()
shape3d_48()
shape3d_49()
shape3d_50()
shape3d_51()
shape3d_52()
shape3d_53()
shape3d_54()
shape3d_55()
shape3d_56()
shape3d_57()
shape3d_58()
shape3d_59()
shape3d_60()
shape3d_61()
shape3d_62()
shape3d_63()
shape3d_64()
shape3d_65()
shape3d_66()
shape3d_67()
}
//objref all, somatic, axonal, basal, apical
proc subsets() { }
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
objref all,dends,tcdends,ccdends,ccsyn,tcsyn,ccnetcon,tcnetcon,apcounter,apvec,nil
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
//dends.append()
distance()
//numdend=-1
forall{
//dends.append()
all.append()
for i=0,n3d()-1{
pt3dchange(i,x3d(i)+$1,y3d(i)+$2,z3d(i),diam3d(i))
}
if (diam<=2){diam=1}
nseg=9
insert pas
e_pas=-60
g_pas=1/10000
cm=1
Ra=100
}
//soma dends.remove()
//for i=0,69{dend[i] dends.append()}
for i=0,115{
access apic[i]
if (distance(1)>500){ 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[10].v(0.5))
//dends=new SectionList()
}
endtemplate celltemplate