proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma, dend[57], apic[101], axon[1]
proc topol() { local i
{soma(0) connect axon[0](0), 1}
{access axon[0]}
{pt3dclear()}
{pt3dadd(-0.568,-1,-0.023,1.5)}
{pt3dadd(3.5,7,7,1)}
{pt3dadd(5.5,14,7,1)}
{pt3dadd(6.5,22.5,6,1)}
{pt3dadd(6,29.5,7,1)}
{pt3dadd(1.5,36,12,1)}
{pt3dadd(-2.5,41,14,1)}
{pt3dadd(-7.5,45,15.5,1)}
{pt3dadd(-9,45,19.5,.5)}
{pt3dadd(-13.5,45.5,22.5,1)}
{pt3dadd(-16.5,47,25.5,1)}
{pt3dadd(-11.5,51.5,30,1)}
{pt3dadd(-11.5,54.5,36.5,1)}
{pt3dadd(-11,57.5,40.5,1)}
{pt3dadd(-8.5,60.5,44.5,1)}
{pt3dadd(-8.5,160.5,44.5,1)}
//{pt3dadd(-8.5,361.5,44.5,1)}
connect dend(0), soma(0.5)
for i = 1, 4 connect dend[i](0), dend[i-1](1)
connect dend[5](0), dend[3](1)
connect dend[6](0), dend[2](1)
for i = 7, 8 connect dend[i](0), dend[6](1)
connect dend[9](0), dend[1](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)
for i = 16, 17 connect dend[i](0), dend[15](1)
connect dend[18](0), dend[12](1)
connect dend[19](0), soma(0.5)
for i = 20, 22 connect dend[i](0), dend[i-1](1)
connect dend[23](0), dend[21](1)
connect dend[24](0), dend[20](1)
for i = 25, 26 connect dend[i](0), dend[24](1)
connect dend[27](0), dend[19](1)
for i = 28, 29 connect dend[i](0), dend[27](1)
connect dend[30](0), soma(0.5)
for i = 31, 33 connect dend[i](0), dend[i-1](1)
connect dend[34](0), dend[32](1)
connect dend[35](0), dend[31](1)
for i = 36, 37 connect dend[i](0), dend[i-1](1)
connect dend[38](0), dend[36](1)
connect dend[39](0), dend[35](1)
for i = 40, 41 connect dend[i](0), dend[39](1)
connect dend[42](0), dend[30](1)
for i = 43, 45 connect dend[i](0), dend[i-1](1)
connect dend[46](0), dend[44](1)
connect dend[47](0), dend[43](1)
for i = 48, 49 connect dend[i](0), dend[47](1)
connect dend[50](0), dend[42](1)
for i = 51, 52 connect dend[i](0), dend[i-1](1)
connect dend[53](0), dend[51](1)
connect dend[54](0), dend[50](1)
for i = 55, 56 connect dend[i](0), dend[54](1)
connect apic(0), soma(0.5)
for i = 1, 2 connect apic[i](0), apic[i-1](1)
connect apic[3](0), apic[1](1)
for i = 4, 5 connect apic[i](0), apic[3](1)
connect apic[6](0), apic(1)
for i = 7, 19 connect apic[i](0), apic[i-1](1)
connect apic[20](0), apic[18](1)
for i = 21, 34 connect apic[i](0), apic[i-1](1)
connect apic[35](0), apic[33](1)
connect apic[36](0), apic[32](1)
connect apic[37](0), apic[31](1)
for i = 38, 39 connect apic[i](0), apic[i-1](1)
connect apic[40](0), apic[38](1)
connect apic[41](0), apic[37](1)
connect apic[42](0), apic[30](1)
connect apic[43](0), apic[29](1)
connect apic[44](0), apic[28](1)
connect apic[45](0), apic[27](1)
connect apic[46](0), apic[26](1)
connect apic[47](0), apic[25](1)
connect apic[48](0), apic[24](1)
connect apic[49](0), apic[23](1)
for i = 50, 51 connect apic[i](0), apic[49](1)
connect apic[52](0), apic[22](1)
connect apic[53](0), apic[21](1)
for i = 54, 56 connect apic[i](0), apic[i-1](1)
connect apic[57](0), apic[55](1)
connect apic[58](0), apic[54](1)
for i = 59, 62 connect apic[i](0), apic[i-1](1)
connect apic[63](0), apic[61](1)
for i = 64, 65 connect apic[i](0), apic[63](1)
connect apic[66](0), apic[60](1)
connect apic[67](0), apic[59](1)
for i = 68, 69 connect apic[i](0), apic[67](1)
connect apic[70](0), apic[58](1)
connect apic[71](0), apic[53](1)
connect apic[72](0), apic[20](1)
for i = 73, 74 connect apic[i](0), apic[72](1)
connect apic[75](0), apic[17](1)
connect apic[76](0), apic[16](1)
connect apic[77](0), apic[15](1)
for i = 78, 79 connect apic[i](0), apic[77](1)
connect apic[80](0), apic[14](1)
connect apic[81](0), apic[13](1)
for i = 82, 83 connect apic[i](0), apic[81](1)
for i = 84, 85 connect apic[i](0), apic[83](1)
connect apic[86](0), apic[12](1)
connect apic[87](0), apic[11](1)
connect apic[88](0), apic[10](1)
for i = 89, 90 connect apic[i](0), apic[88](1)
for i = 91, 92 connect apic[i](0), apic[90](1)
connect apic[93](0), apic[9](1)
connect apic[94](0), apic[8](1)
connect apic[95](0), apic[7](1)
for i = 96, 97 connect apic[i](0), apic[95](1)
connect apic[98](0), apic[6](1)
for i = 99, 100 connect apic[i](0), apic[98](1)
basic_shape()
}
proc shape3d_1() {
soma {pt3dclear()
pt3dadd(0, 0, 30, 20)
pt3dadd(10, 0, 30, 20)
pt3dadd(20, 0, 30, 20)
}
dend {pt3dclear()
pt3dstyle(1, 10, 0, 30)
pt3dadd(-0.09, 1.2, 30, 0.7)
pt3dadd(-0.8, 2, 30.2, 0.7)
pt3dadd(-2.1, 2.6, 30.7, 0.7)
pt3dadd(-3.1, 3, 31.1, 0.7)
pt3dadd(-4.09, 3.3, 31.6, 0.7)
pt3dadd(-4.9, 3.5, 32.1, 0.7)
pt3dadd(-6.7, 3.8, 33.29, 0.7)
pt3dadd(-7.3, 4.09, 33.79, 0.7)
pt3dadd(-7.8, 4.59, 34.29, 0.7)
pt3dadd(-8.5, 5.2, 35, 0.7)
pt3dadd(-8.9, 5.7, 35.5, 0.7)
pt3dadd(-9.5, 6.5, 36.29, 0.7)
pt3dadd(-10.4, 7.1, 37.2, 0.7)
pt3dadd(-11.1, 7.3, 37.79, 0.7)
pt3dadd(-11.9, 7.7, 38.6, 0.7)
pt3dadd(-12.5, 8.1, 39.2, 0.7)
pt3dadd(-13.3, 8.4, 39.9, 0.7)
pt3dadd(-14.9, 9.1, 41.4, 0.7)
pt3dadd(-16.7, 10.1, 43.1, 0.7)
pt3dadd(-17.6, 10.6, 43.9, 0.7)
pt3dadd(-19.1, 11.3, 45, 0.7)
pt3dadd(-19.89, 11.9, 45.7, 0.7)
pt3dadd(-20.39, 12.2, 46, 0.7)
pt3dadd(-21.2, 12.2, 46.4, 0.7)
pt3dadd(-24.8, 12.2, 47.8, 0.7)
pt3dadd(-26, 12.2, 48, 0.7)
pt3dadd(-26.8, 12.6, 48, 0.7)
}
dend[1] {pt3dclear()
pt3dadd(-26.8, 12.6, 48, 0.7)
pt3dadd(-27.5, 13, 47.3, 0.7)
pt3dadd(-27.9, 13.6, 45.8, 0.7)
pt3dadd(-28.6, 14.5, 42.1, 0.7)
pt3dadd(-29.9, 15.2, 36.2, 0.7)
pt3dadd(-30.2, 15.9, 33.1, 0.7)
pt3dadd(-30.5, 17, 28.6, 0.7)
pt3dadd(-30.5, 17.6, 26.7, 0.7)
pt3dadd(-30.8, 19.1, 24, 0.7)
}
dend[2] {pt3dclear()
pt3dadd(-30.8, 19.1, 24, 0.7)
pt3dadd(-30.9, 20.1, 23.4, 0.7)
pt3dadd(-30.9, 20.7, 23.1, 0.7)
pt3dadd(-31.6, 21.6, 22.5, 0.7)
pt3dadd(-33.2, 23.4, 21.2, 0.7)
pt3dadd(-34.29, 24.6, 20.5, 0.7)
pt3dadd(-35, 25.6, 20, 0.7)
pt3dadd(-35.4, 26.7, 19.6, 0.7)
pt3dadd(-35.4, 27.7, 19.2, 0.7)
pt3dadd(-35.7, 28.6, 19, 0.7)
pt3dadd(-35.7, 29.2, 18.8, 0.7)
pt3dadd(-36.1, 29.8, 18.6, 0.7)
pt3dadd(-36.79, 30.5, 18.39, 0.7)
pt3dadd(-37.29, 31.1, 18.3, 0.7)
pt3dadd(-38.4, 32.4, 18, 0.7)
}
dend[3] {pt3dclear()
pt3dadd(-38.4, 32.4, 18, 0.7)
pt3dadd(-39.1, 32.4, 17.7, 0.7)
pt3dadd(-38.29, 32.79, 17.3, 0.3)
pt3dadd(-37.29, 33.5, 16.89, 0.3)
pt3dadd(-36.79, 34.29, 16.5, 0.3)
pt3dadd(-36.6, 35, 16.2, 0.3)
pt3dadd(-36.29, 35.79, 15.9, 0.3)
pt3dadd(-36.29, 36.9, 15.4, 0.3)
pt3dadd(-36.6, 37.7, 15.1, 0.3)
pt3dadd(-36.6, 38.29, 14.8, 0.3)
pt3dadd(-36.29, 39.6, 14.3, 0.3)
pt3dadd(-36.1, 40.4, 14, 0.3)
pt3dadd(-36.1, 41.1, 13.7, 0.3)
pt3dadd(-36.5, 42.5, 13.1, 0.3)
pt3dadd(-37.7, 43.9, 12.4, 0.3)
pt3dadd(-39.6, 45.9, 11.3, 0.3)
pt3dadd(-41.2, 47.7, 10.3, 0.3)
pt3dadd(-41.7, 48.7, 9.9, 0.3)
pt3dadd(-42, 49.7, 9.5, 0.3)
pt3dadd(-42.5, 50.8, 9, 0.3)
pt3dadd(-43.4, 52.1, 8.3, 0.3)
pt3dadd(-45, 54, 7.3, 0.3)
pt3dadd(-46.1, 54.6, 6.8, 0.3)
pt3dadd(-47.4, 54.8, 6.3, 0.3)
pt3dadd(-50, 55.8, 5.2, 0.3)
pt3dadd(-50.8, 56.5, 4.8, 0.3)
pt3dadd(-51.7, 57.4, 4.2, 0.3)
pt3dadd(-52.7, 58.1, 3.8, 0.3)
pt3dadd(-54.5, 59, 3, 0.3)
pt3dadd(-57.1, 59.9, 1.8, 0.3)
pt3dadd(-60.2, 61.6, 0.4, 0.3)
pt3dadd(-61.6, 62.2, -0.2, 0.3)
pt3dadd(-63.8, 63.1, -1.1, 0.3)
pt3dadd(-64.7, 63.8, -1.6, 0.3)
pt3dadd(-65.59, 64, -2, 0.3)
pt3dadd(-66.4, 64.4, -2.29, 0.3)
pt3dadd(-67.5, 65, -2.8, 0.3)
pt3dadd(-68.7, 65.4, -3.4, 0.3)
pt3dadd(-70.09, 65.8, -3.9, 0.3)
pt3dadd(-73.09, 66.5, -5.2, 0.3)
pt3dadd(-74.09, 66.8, -5.6, 0.3)
pt3dadd(-74.8, 67.3, -5.9, 0.3)
pt3dadd(-75.3, 67.9, -6.2, 0.3)
pt3dadd(-75.8, 68.4, -6.5, 0.3)
pt3dadd(-76.5, 69, -6.9, 0.3)
pt3dadd(-77.8, 69.7, -7.5, 0.3)
pt3dadd(-78.9, 70, -8, 0.3)
pt3dadd(-79.5, 70.2, -8.19, 0.3)
pt3dadd(-80.09, 70.2, -8.5, 0.3)
pt3dadd(-80.7, 70.5, -8.69, 0.3)
pt3dadd(-81.5, 70.8, -9.1, 0.3)
pt3dadd(-82.7, 71.3, -9.6, 0.3)
pt3dadd(-83.9, 71.5, -10.1, 0.3)
pt3dadd(-84.6, 71.8, -10.4, 0.3)
pt3dadd(-85.2, 71.8, -10.6, 0.3)
pt3dadd(-85.9, 72.09, -10.9, 0.3)
pt3dadd(-86.7, 72.3, -11.3, 0.3)
pt3dadd(-87.8, 72.8, -11.7, 0.3)
pt3dadd(-88.4, 73.09, -12, 0.3)
}
dend[4] {pt3dclear()
pt3dadd(-88.4, 73.09, -12, 0.3)
pt3dadd(-89.1, 73.4, -12.3, 0.3)
pt3dadd(-89.5, 74, -12.6, 0.3)
pt3dadd(-89.8, 74.5, -12.7, 0.3)
pt3dadd(-90.1, 75, -12.9, 0.3)
pt3dadd(-91, 75.3, -13.2, 0.3)
pt3dadd(-91.4, 75.9, -13.4, 0.3)
pt3dadd(-92.1, 77.5, -13.8, 0.3)
pt3dadd(-92.4, 78, -13.9, 0.3)
pt3dadd(-92.4, 78.59, -14, 0.3)
pt3dadd(-92.7, 80.2, -14.2, 0.3)
pt3dadd(-93.5, 80.7, -14.3, 0.3)
pt3dadd(-94.4, 80.9, -14.4, 0.3)
pt3dadd(-94.8, 81.5, -14.4, 0.3)
pt3dadd(-95.1, 82, -14.5, 0.3)
pt3dadd(-95.4, 82.7, -14.5, 0.3)
pt3dadd(-95.8, 83.3, -14.5, 0.3)
pt3dadd(-96.5, 83.9, -14.5, 0.3)
pt3dadd(-97.2, 84.5, -14.4, 0.3)
pt3dadd(-97.8, 84.7, -14.4, 0.3)
pt3dadd(-98.4, 85.1, -14.3, 0.3)
pt3dadd(-99.7, 85.4, -14.2, 0.3)
pt3dadd(-100.7, 85.9, -14.1, 0.3)
pt3dadd(-101.4, 86.3, -13.9, 0.3)
pt3dadd(-102, 86.7, -13.8, 0.3)
pt3dadd(-103.3, 87.6, -13.5, 0.3)
pt3dadd(-104, 88.1, -13.3, 0.3)
pt3dadd(-104.7, 88.5, -13.1, 0.3)
pt3dadd(-107.6, 90, -12.2, 0.3)
pt3dadd(-108.6, 90.7, -11.8, 0.3)
pt3dadd(-109.5, 91.3, -11.4, 0.3)
pt3dadd(-109.9, 91.8, -11.2, 0.3)
pt3dadd(-110.5, 92.1, -10.9, 0.3)
pt3dadd(-111.1, 92.4, -10.7, 0.3)
pt3dadd(-111.9, 92.7, -10.3, 0.3)
pt3dadd(-112.9, 92.7, -9.9, 0.3)
pt3dadd(-113.7, 92.9, -9.5, 0.3)
pt3dadd(-114.5, 92.9, -9.1, 0.3)
pt3dadd(-115.3, 93.2, -8.69, 0.3)
pt3dadd(-116.7, 93.9, -8, 0.3)
pt3dadd(-117.2, 94.2, -7.7, 0.3)
pt3dadd(-117.7, 94.5, -7.3, 0.3)
pt3dadd(-118.5, 94.8, -6.9, 0.3)
pt3dadd(-119.3, 94.8, -6.5, 0.3)
pt3dadd(-120.3, 95.1, -5.9, 0.3)
pt3dadd(-121.9, 95.3, -4.9, 0.3)
pt3dadd(-122.5, 95.6, -4.5, 0.3)
pt3dadd(-124, 96.4, -3.5, 0.3)
pt3dadd(-124.7, 96.7, -3, 0.3)
pt3dadd(-125.5, 96.7, -2.5, 0.3)
pt3dadd(-128.4, 97, -0.6, 0.3)
pt3dadd(-129.19, 97.7, 0.09, 0.3)
pt3dadd(-130.1, 98.1, 0.8, 0.3)
pt3dadd(-130.9, 98.1, 1.4, 0.3)
pt3dadd(-131.69, 98.4, 2, 0.3)
pt3dadd(-132.4, 98.4, 2.5, 0.3)
pt3dadd(-133.1, 98.1, 3.1, 0.3)
pt3dadd(-133.8, 98.1, 3.6, 0.3)
pt3dadd(-134.5, 97.8, 4.2, 0.3)
pt3dadd(-135.3, 97.8, 4.8, 0.3)
pt3dadd(-137.19, 98, 6.3, 0.3)
pt3dadd(-138, 98.3, 6.9, 0.3)
pt3dadd(-138.8, 98.3, 7.6, 0.3)
pt3dadd(-139.69, 98.5, 8.3, 0.3)
pt3dadd(-142.1, 98.8, 10.3, 0.18)
pt3dadd(-143.1, 99.1, 11.1, 0.18)
pt3dadd(-144.1, 99.6, 12, 0.18)
pt3dadd(-145.1, 99.9, 12.9, 0.18)
pt3dadd(-145.69, 100.4, 13.6, 0.18)
pt3dadd(-146.5, 100.7, 14.3, 0.18)
pt3dadd(-147.3, 100.7, 14.9, 0.18)
pt3dadd(-150.5, 100.7, 17.7, 0.18)
pt3dadd(-151.3, 101.2, 18.6, 0.18)
pt3dadd(-152.19, 101.2, 19.3, 0.18)
pt3dadd(-153.5, 101.5, 20.39, 0.18)
pt3dadd(-154.1, 101.5, 21, 0.18)
pt3dadd(-156.4, 101.5, 23, 0.18)
pt3dadd(-157.6, 101.5, 24, 0.18)
}
dend[5] {pt3dclear()
pt3dadd(-88.4, 73.09, -12, 0.3)
pt3dadd(-89.3, 72.8, -12.4, 0.3)
pt3dadd(-90.4, 72.4, -13, 0.3)
pt3dadd(-91.1, 72.4, -13.3, 0.3)
pt3dadd(-92.7, 72.09, -14.2, 0.3)
pt3dadd(-93.7, 72.09, -14.7, 0.3)
pt3dadd(-94.3, 71.8, -15.1, 0.3)
pt3dadd(-95, 71.5, -15.5, 0.3)
pt3dadd(-95.7, 71.5, -15.9, 0.3)
}
}
proc shape3d_2() {
dend[5] { pt3dadd(-99.1, 71.5, -18.1, 0.3)
pt3dadd(-99.9, 71.2, -18.7, 0.3)
pt3dadd(-100.3, 70.8, -19.1, 0.3)
pt3dadd(-101.3, 70.5, -19.89, 0.3)
pt3dadd(-103.3, 70.2, -21.4, 0.3)
pt3dadd(-107, 70.2, -24.4, 0.3)
pt3dadd(-107.9, 69.7, -25.2, 0.3)
pt3dadd(-110, 68.9, -27.3, 0.3)
pt3dadd(-111.2, 68.9, -28.4, 0.3)
pt3dadd(-113.2, 69.2, -30.4, 0.3)
pt3dadd(-114.1, 69.2, -31.2, 0.3)
pt3dadd(-117.8, 69.2, -35, 0.3)
pt3dadd(-120.8, 69.2, -38.2, 0.3)
pt3dadd(-123.9, 69.2, -41.6, 0.3)
pt3dadd(-124.7, 68.7, -42.7, 0.3)
pt3dadd(-126.5, 67.8, -45, 0.3)
pt3dadd(-127.5, 67.4, -46.2, 0.3)
pt3dadd(-128.3, 67.4, -47.2, 0.3)
pt3dadd(-129.1, 67.7, -48.2, 0.3)
pt3dadd(-129.9, 67.7, -49.2, 0.3)
pt3dadd(-132.3, 67.4, -52.2, 0.3)
pt3dadd(-133.3, 66.9, -53.5, 0.3)
pt3dadd(-134.8, 66, -55.7, 0.3)
pt3dadd(-134.8, 65.3, -56.6, 0.3)
pt3dadd(-135.1, 64.8, -57.4, 0.3)
pt3dadd(-135.1, 64, -58.4, 0.3)
pt3dadd(-135.69, 62.2, -60.9, 0.3)
pt3dadd(-137.1, 60.6, -63.7, 0.3)
pt3dadd(-137.8, 60.6, -64.59, 0.3)
pt3dadd(-138.69, 60.9, -65.9, 0.3)
pt3dadd(-139.4, 60.9, -66.9, 0.3)
pt3dadd(-140.5, 60.6, -68.4, 0.3)
pt3dadd(-141.19, 60.2, -69.5, 0.3)
pt3dadd(-142.3, 59.9, -71, 0.3)
pt3dadd(-143.19, 59.9, -72.3, 0.3)
pt3dadd(-144.19, 60.3, -73.7, 0.3)
pt3dadd(-145.1, 60.7, -75.09, 0.3)
pt3dadd(-146.1, 61.4, -76.7, 0.3)
pt3dadd(-146.8, 62, -78.09, 0.3)
pt3dadd(-147.5, 62.9, -79.59, 0.3)
pt3dadd(-147.8, 63.9, -81.09, 0.3)
pt3dadd(-148.69, 64.7, -82.8, 0.3)
pt3dadd(-151, 66.59, -87, 0.3)
pt3dadd(-151.6, 66.8, -88, 0.3)
pt3dadd(-152.5, 67.3, -89.3, 0.18)
pt3dadd(-153.19, 68, -90.8, 0.18)
pt3dadd(-154.1, 68.3, -92.1, 0.18)
pt3dadd(-154.69, 68.59, -93.1, 0.18)
pt3dadd(-155.69, 69.09, -94.7, 0.18)
pt3dadd(-156.6, 69.5, -96, 0.18)
}
dend[6] {pt3dclear()
pt3dadd(-38.4, 32.4, 18, 0.7)
pt3dadd(-38.9, 33.4, 18.2, 0.3)
pt3dadd(-39.29, 34.1, 18.39, 0.3)
pt3dadd(-40.6, 34.7, 18.6, 0.3)
pt3dadd(-42.3, 35.2, 19.1, 0.3)
pt3dadd(-43, 35.6, 19.3, 0.3)
pt3dadd(-44.4, 36.7, 19.8, 0.3)
pt3dadd(-44.7, 37.5, 20.1, 0.3)
pt3dadd(-45.9, 38, 20.6, 0.3)
pt3dadd(-47.1, 38.5, 21.1, 0.3)
pt3dadd(-47.7, 38.5, 21.4, 0.3)
pt3dadd(-48.4, 38.79, 21.7, 0.3)
pt3dadd(-49.5, 39, 22.3, 0.3)
pt3dadd(-50.1, 39, 22.7, 0.3)
pt3dadd(-50.8, 39.29, 23.1, 0.3)
pt3dadd(-52, 40.1, 24, 0.3)
}
dend[7] {pt3dclear()
pt3dadd(-52, 40.1, 24, 0.3)
pt3dadd(-52.8, 41.5, 24.9, 0.3)
pt3dadd(-53.6, 42.5, 25.6, 0.3)
pt3dadd(-54.3, 42.9, 26.1, 0.3)
pt3dadd(-55.5, 43.1, 26.8, 0.3)
pt3dadd(-56.3, 43.4, 27.3, 0.3)
pt3dadd(-56.9, 43.8, 27.7, 0.3)
pt3dadd(-57.3, 44.4, 28.1, 0.3)
pt3dadd(-58.1, 44.8, 28.7, 0.3)
pt3dadd(-59, 45.5, 29.3, 0.3)
pt3dadd(-59.8, 45.7, 29.8, 0.3)
pt3dadd(-61.5, 46.2, 30.9, 0.3)
pt3dadd(-62.3, 46.5, 31.4, 0.3)
pt3dadd(-63.2, 46.7, 32, 0.3)
pt3dadd(-66.2, 47.5, 33.9, 0.3)
pt3dadd(-67.5, 47.8, 34.7, 0.3)
pt3dadd(-68.3, 48, 35.2, 0.3)
pt3dadd(-69, 48, 35.7, 0.3)
pt3dadd(-69.7, 48.2, 36.2, 0.3)
pt3dadd(-70.3, 48.2, 36.6, 0.3)
pt3dadd(-74.4, 48.2, 39.2, 0.3)
pt3dadd(-75.2, 48.5, 39.79, 0.3)
pt3dadd(-76, 48.8, 40.4, 0.3)
pt3dadd(-77.5, 49.1, 41.4, 0.3)
pt3dadd(-79.8, 48.8, 43.1, 0.3)
pt3dadd(-80.7, 48.8, 43.6, 0.3)
pt3dadd(-83.3, 49.1, 45.5, 0.3)
pt3dadd(-85.2, 49.3, 46.9, 0.3)
pt3dadd(-86.2, 49.7, 47.6, 0.3)
pt3dadd(-87.1, 49.9, 48.3, 0.3)
pt3dadd(-88.7, 50.4, 49.6, 0.3)
pt3dadd(-90.9, 51.3, 51.4, 0.3)
pt3dadd(-91.7, 51.9, 52.1, 0.3)
pt3dadd(-92.7, 52.4, 53, 0.3)
pt3dadd(-93.7, 52.7, 53.7, 0.3)
pt3dadd(-94.8, 52.9, 54.6, 0.3)
pt3dadd(-96.1, 52.9, 55.7, 0.3)
pt3dadd(-98.5, 53.2, 57.6, 0.3)
pt3dadd(-99.5, 53.6, 58.4, 0.3)
pt3dadd(-100.3, 54.2, 59.2, 0.3)
pt3dadd(-101.2, 54.8, 60.1, 0.3)
pt3dadd(-102.1, 55.1, 60.9, 0.3)
pt3dadd(-103.3, 55.1, 61.9, 0.3)
pt3dadd(-104.5, 55.3, 62.9, 0.3)
pt3dadd(-105.8, 55.3, 64, 0.3)
pt3dadd(-108.6, 55.6, 66.3, 0.3)
pt3dadd(-109.7, 56, 67.4, 0.3)
pt3dadd(-110.5, 56.5, 68.09, 0.3)
pt3dadd(-111, 56.9, 68.7, 0.3)
pt3dadd(-111.8, 57.4, 69.5, 0.3)
pt3dadd(-112.7, 57.6, 70.3, 0.3)
pt3dadd(-113.7, 58, 71.3, 0.3)
pt3dadd(-114.9, 58, 72.4, 0.3)
pt3dadd(-116.2, 58.2, 73.59, 0.3)
pt3dadd(-117.5, 58.2, 74.7, 0.3)
pt3dadd(-118.6, 58.4, 75.8, 0.3)
pt3dadd(-119.8, 59, 77, 0.3)
pt3dadd(-120.7, 59.7, 78.09, 0.3)
pt3dadd(-121.4, 60.3, 79, 0.3)
pt3dadd(-122.3, 60.9, 79.9, 0.3)
pt3dadd(-123.4, 61.5, 81.09, 0.3)
pt3dadd(-124.8, 62, 82.6, 0.3)
pt3dadd(-127.9, 63.5, 85.9, 0.3)
pt3dadd(-129.4, 64.7, 87.8, 0.3)
pt3dadd(-130.4, 65.7, 89.2, 0.3)
pt3dadd(-131.1, 66.7, 90.5, 0.3)
pt3dadd(-131.9, 67.5, 91.6, 0.3)
pt3dadd(-132.9, 68.09, 92.8, 0.3)
pt3dadd(-134.1, 68.3, 94.1, 0.3)
pt3dadd(-135.4, 68.9, 95.5, 0.3)
pt3dadd(-136.8, 69.2, 97, 0.3)
pt3dadd(-138, 69.7, 98.4, 0.3)
pt3dadd(-139, 70.4, 99.7, 0.3)
pt3dadd(-139.69, 71.2, 100.8, 0.3)
pt3dadd(-140, 71.9, 101.7, 0.3)
pt3dadd(-140.5, 72.7, 102.7, 0.3)
pt3dadd(-141.19, 73.4, 103.7, 0.3)
pt3dadd(-141.8, 74, 104.7, 0.3)
pt3dadd(-142.5, 74.4, 105.6, 0.3)
pt3dadd(-143.4, 74.7, 106.6, 0.3)
pt3dadd(-144, 75.59, 107.9, 0.3)
pt3dadd(-143.5, 76.9, 109.4, 0.18)
pt3dadd(-144.19, 78, 110.9, 0.18)
pt3dadd(-144.9, 78.5, 111.9, 0.18)
pt3dadd(-146.19, 79.2, 113.6, 0.18)
pt3dadd(-147.6, 79.9, 115.4, 0.18)
pt3dadd(-148.4, 80.59, 116.6, 0.18)
pt3dadd(-149.19, 80.8, 117.6, 0.18)
pt3dadd(-151.1, 81.7, 120, 0.18)
pt3dadd(-152.4, 82.5, 122.3, 0.18)
pt3dadd(-153.1, 83.2, 124.1, 0.18)
pt3dadd(-153.4, 83.8, 125.5, 0.18)
pt3dadd(-154.69, 84.7, 129.3, 0.18)
pt3dadd(-155.5, 85.5, 132, 0.18)
}
dend[8] {pt3dclear()
pt3dadd(-52, 40.1, 24, 0.3)
pt3dadd(-53.1, 40.4, 25.2, 0.3)
pt3dadd(-53.9, 41, 26.4, 0.3)
pt3dadd(-54.6, 41.4, 27.6, 0.3)
pt3dadd(-55.2, 41.6, 28.7, 0.3)
pt3dadd(-56.6, 41.8, 31.2, 0.3)
pt3dadd(-57.4, 42.1, 32.7, 0.3)
pt3dadd(-58, 42.1, 34.1, 0.3)
pt3dadd(-58.6, 41.8, 35.5, 0.3)
pt3dadd(-59.4, 41.8, 37.29, 0.3)
pt3dadd(-61.6, 42.2, 42.3, 0.3)
pt3dadd(-62.4, 42.7, 44.4, 0.3)
pt3dadd(-63.2, 43.2, 46.5, 0.3)
pt3dadd(-63.8, 43.4, 48.1, 0.3)
pt3dadd(-64.3, 43.8, 49.3, 0.3)
pt3dadd(-65.2, 44, 51.4, 0.3)
pt3dadd(-66, 44.3, 52.9, 0.3)
pt3dadd(-66.7, 44.3, 54.3, 0.3)
pt3dadd(-69, 44, 58.1, 0.3)
pt3dadd(-69.8, 44, 59.2, 0.3)
pt3dadd(-70.5, 44.1, 60, 0.3)
pt3dadd(-71.09, 44.1, 60.6, 0.3)
pt3dadd(-71.8, 43.5, 61.7, 0.3)
pt3dadd(-73.09, 43.5, 63, 0.3)
pt3dadd(-76.09, 43.2, 66.09, 0.3)
pt3dadd(-76.9, 43.2, 66.8, 0.3)
pt3dadd(-79.3, 43.4, 69, 0.3)
pt3dadd(-80.09, 43.7, 69.8, 0.3)
pt3dadd(-81.8, 44.3, 71.4, 0.3)
pt3dadd(-82.7, 44.3, 72.2, 0.3)
pt3dadd(-85, 44, 74.2, 0.3)
pt3dadd(-88, 43.2, 76.59, 0.3)
pt3dadd(-90, 42.9, 78.2, 0.3)
pt3dadd(-93.3, 43.1, 80.5, 0.3)
pt3dadd(-94.5, 43.5, 81.3, 0.3)
pt3dadd(-97.5, 44.5, 83.4, 0.3)
pt3dadd(-98.8, 44.5, 84.2, 0.3)
pt3dadd(-101.1, 44.1, 85.5, 0.3)
pt3dadd(-102.4, 43.9, 86.2, 0.3)
pt3dadd(-103.6, 43.9, 86.9, 0.3)
}
}
proc shape3d_3() {
dend[8] { pt3dadd(-106.8, 44.1, 88.4, 0.3)
pt3dadd(-107.7, 44.1, 88.8, 0.3)
pt3dadd(-108.9, 44.3, 89.3, 0.3)
pt3dadd(-109.7, 44.3, 89.7, 0.3)
pt3dadd(-112.5, 44, 90.8, 0.3)
pt3dadd(-113.2, 43.6, 91.1, 0.3)
pt3dadd(-114.1, 43.2, 91.5, 0.3)
pt3dadd(-114.7, 43.2, 91.7, 0.3)
pt3dadd(-116.3, 43.4, 92.2, 0.3)
pt3dadd(-117.2, 43.4, 92.5, 0.3)
pt3dadd(-118, 43.7, 92.7, 0.3)
pt3dadd(-119.1, 44, 93, 0.3)
pt3dadd(-120.2, 44, 93.3, 0.3)
pt3dadd(-122.3, 43.7, 93.8, 0.3)
pt3dadd(-123.1, 43.7, 93.9, 0.3)
pt3dadd(-124.6, 44, 94.2, 0.3)
pt3dadd(-125.3, 44.5, 94.4, 0.3)
pt3dadd(-126, 44.9, 94.5, 0.3)
pt3dadd(-126.9, 44.9, 94.6, 0.3)
pt3dadd(-127.7, 45.1, 94.8, 0.3)
pt3dadd(-128.5, 45.1, 94.9, 0.3)
pt3dadd(-132, 45.1, 95.2, 0.3)
pt3dadd(-134.69, 45.3, 95.3, 0.3)
pt3dadd(-135.3, 45.6, 95.3, 0.3)
pt3dadd(-135.9, 45.6, 95.3, 0.3)
pt3dadd(-139.1, 45.3, 95.2, 0.3)
pt3dadd(-139.9, 45.3, 95.2, 0.3)
pt3dadd(-142.5, 45.6, 94.9, 0.3)
pt3dadd(-143.1, 45.6, 94.9, 0.3)
pt3dadd(-143.9, 45.8, 94.8, 0.3)
pt3dadd(-145.4, 46, 94.6, 0.3)
pt3dadd(-147.1, 45.7, 94.3, 0.3)
pt3dadd(-147.69, 45.4, 94.2, 0.3)
pt3dadd(-148.5, 45.4, 94, 0.3)
pt3dadd(-150.69, 45.3, 93.6, 0.18)
pt3dadd(-151.3, 45.3, 93.4, 0.18)
pt3dadd(-152, 45, 93.2, 0.18)
pt3dadd(-152.8, 45.9, 92.9, 0.18)
pt3dadd(-153.69, 46.7, 92.6, 0.18)
pt3dadd(-155, 47.5, 92.1, 0.18)
pt3dadd(-156.5, 48.1, 91.6, 0.18)
pt3dadd(-157.69, 48.3, 91.2, 0.18)
pt3dadd(-158.5, 48.5, 90.9, 0.18)
pt3dadd(-159.3, 48.5, 90.6, 0.18)
pt3dadd(-160.5, 49.1, 90.1, 0.18)
pt3dadd(-162.9, 50.5, 89, 0.18)
pt3dadd(-163.19, 51.3, 88.6, 0.18)
pt3dadd(-163.6, 52.1, 88.2, 0.18)
pt3dadd(-163.9, 53.1, 87.7, 0.18)
pt3dadd(-164.9, 54, 87.1, 0.18)
pt3dadd(-165.7, 55, 86.4, 0.18)
pt3dadd(-166.6, 55.6, 85.8, 0.18)
pt3dadd(-167.5, 56, 85.3, 0.18)
pt3dadd(-168.3, 56.2, 84.9, 0.18)
pt3dadd(-168.9, 56.5, 84.5, 0.18)
pt3dadd(-169.8, 56.7, 84, 0.18)
}
dend[9] {pt3dclear()
pt3dadd(-30.8, 19.1, 24, 0.7)
pt3dadd(-31.1, 19.89, 23.9, 0.7)
pt3dadd(-31.9, 20.3, 23.9, 0.7)
pt3dadd(-32.7, 20.6, 23.9, 0.7)
pt3dadd(-33.6, 21.4, 23.9, 0.7)
pt3dadd(-34.5, 21.9, 24, 0.7)
pt3dadd(-35.6, 22.5, 24.1, 0.7)
pt3dadd(-38.4, 23.8, 24.6, 0.7)
pt3dadd(-39.1, 24.2, 24.8, 0.7)
pt3dadd(-39.6, 24.6, 24.9, 0.7)
pt3dadd(-40.4, 25.2, 25.2, 0.7)
pt3dadd(-40.79, 25.8, 25.3, 0.7)
pt3dadd(-41.5, 26.4, 25.6, 0.7)
pt3dadd(-42.2, 26.7, 25.8, 0.7)
pt3dadd(-43.6, 27.6, 26.3, 0.7)
pt3dadd(-44.3, 28, 26.5, 0.7)
pt3dadd(-45.3, 28.2, 26.8, 0.7)
pt3dadd(-46.2, 28.5, 27.1, 0.7)
pt3dadd(-46.9, 28.5, 27.3, 0.3)
pt3dadd(-48, 28.6, 27.6, 0.3)
pt3dadd(-50.1, 29.7, 28.3, 0.3)
pt3dadd(-52.1, 31.1, 29, 0.3)
pt3dadd(-53.1, 31.7, 29.2, 0.3)
pt3dadd(-53.7, 32.1, 29.4, 0.3)
pt3dadd(-54.8, 32.9, 29.7, 0.3)
pt3dadd(-55.4, 33.4, 29.8, 0.3)
pt3dadd(-56.9, 34.5, 30.1, 0.3)
pt3dadd(-58, 35.6, 30.2, 0.3)
pt3dadd(-59.3, 36.5, 30.2, 0.3)
pt3dadd(-61.6, 37.5, 30.1, 0.3)
pt3dadd(-62.3, 37.7, 30, 0.3)
}
dend[10] {pt3dclear()
pt3dadd(-62.3, 37.7, 30, 0.3)
pt3dadd(-62.6, 36.5, 29.8, 0.3)
pt3dadd(-63.8, 36.5, 29.7, 0.3)
pt3dadd(-64.59, 36.9, 29.6, 0.3)
pt3dadd(-65.2, 37.2, 29.5, 0.3)
pt3dadd(-65.59, 37.7, 29.4, 0.3)
pt3dadd(-65.9, 38.4, 29.3, 0.3)
pt3dadd(-66.5, 38.9, 29.2, 0.3)
pt3dadd(-66.8, 39.5, 29.2, 0.3)
pt3dadd(-67.9, 40.5, 29, 0.3)
pt3dadd(-68.2, 41.1, 28.9, 0.3)
pt3dadd(-68.7, 41.6, 28.8, 0.3)
pt3dadd(-69.5, 42.1, 28.7, 0.3)
pt3dadd(-69.9, 42.5, 28.7, 0.3)
pt3dadd(-70.2, 43.2, 28.6, 0.3)
pt3dadd(-71.2, 43.7, 28.4, 0.3)
pt3dadd(-71.8, 44, 28.4, 0.3)
pt3dadd(-74.5, 44.9, 28.1, 0.3)
pt3dadd(-75.4, 45.6, 27.9, 0.3)
pt3dadd(-76.3, 46.1, 27.8, 0.3)
pt3dadd(-77.09, 46.8, 27.7, 0.3)
pt3dadd(-77.9, 47.2, 27.6, 0.3)
pt3dadd(-78.59, 47.5, 27.6, 0.3)
pt3dadd(-79.3, 47.7, 27.5, 0.3)
pt3dadd(-80.09, 47.7, 27.4, 0.3)
pt3dadd(-80.9, 48, 27.3, 0.3)
pt3dadd(-81.7, 48.2, 27.2, 0.3)
pt3dadd(-82.8, 48.2, 27.1, 0.3)
pt3dadd(-83.9, 48.8, 27, 0.3)
pt3dadd(-86, 50.3, 26.7, 0.3)
pt3dadd(-86.9, 51.4, 26.6, 0.3)
pt3dadd(-87.6, 52.7, 26.4, 0.3)
pt3dadd(-88.4, 53.7, 26.3, 0.3)
pt3dadd(-89.3, 54.5, 26.2, 0.3)
pt3dadd(-90.3, 55.1, 26, 0.3)
pt3dadd(-91.3, 55.3, 25.9, 0.3)
pt3dadd(-92.3, 55.6, 25.8, 0.3)
pt3dadd(-93.2, 55.9, 25.7, 0.3)
pt3dadd(-94, 56.4, 25.6, 0.3)
pt3dadd(-94.5, 57, 25.5, 0.3)
pt3dadd(-95.8, 58.4, 25.3, 0.3)
pt3dadd(-96.7, 59.1, 25.2, 0.3)
pt3dadd(-97.8, 59.7, 25.1, 0.3)
pt3dadd(-98.8, 60, 25, 0.3)
pt3dadd(-100.5, 60.6, 24.8, 0.3)
pt3dadd(-101.2, 60.9, 24.7, 0.3)
pt3dadd(-101.9, 61.1, 24.6, 0.3)
pt3dadd(-102.6, 61.7, 24.5, 0.3)
pt3dadd(-103.5, 62.9, 24.3, 0.3)
pt3dadd(-104.3, 63.6, 24.2, 0.3)
pt3dadd(-105.2, 64.7, 24, 0.3)
pt3dadd(-106.4, 65.7, 23.8, 0.3)
pt3dadd(-107.8, 66.7, 23.6, 0.3)
pt3dadd(-109, 67.7, 23.4, 0.3)
pt3dadd(-109.4, 68.59, 23.3, 0.3)
pt3dadd(-109.8, 69.2, 23.2, 0.3)
pt3dadd(-110.9, 70.09, 23, 0.3)
pt3dadd(-111.6, 70.5, 22.9, 0.3)
pt3dadd(-112.5, 71.09, 22.7, 0.3)
pt3dadd(-113.3, 71.7, 22.6, 0.3)
pt3dadd(-115, 73.2, 22.3, 0.3)
pt3dadd(-115.3, 74.09, 22.1, 0.3)
pt3dadd(-115.7, 74.8, 22, 0.3)
pt3dadd(-117, 76.4, 21.7, 0.3)
pt3dadd(-117.9, 77.2, 21.5, 0.3)
pt3dadd(-119.1, 77.9, 21.3, 0.3)
pt3dadd(-120.3, 78.4, 21.1, 0.3)
pt3dadd(-121.3, 79, 20.9, 0.3)
pt3dadd(-122, 79.3, 20.7, 0.3)
pt3dadd(-122.6, 79.59, 20.6, 0.3)
pt3dadd(-123.4, 80.2, 20.5, 0.3)
pt3dadd(-124.1, 80.5, 20.3, 0.3)
pt3dadd(-124.5, 81.2, 20.2, 0.3)
pt3dadd(-125.3, 82, 20, 0.3)
pt3dadd(-126.4, 82.6, 19.7, 0.3)
pt3dadd(-127.1, 82.9, 19.6, 0.3)
pt3dadd(-127.8, 83.2, 19.39, 0.3)
pt3dadd(-128.5, 83.5, 19.3, 0.3)
pt3dadd(-129.1, 83.5, 19.2, 0.3)
pt3dadd(-129.8, 83.7, 19, 0.3)
pt3dadd(-130.6, 84, 18.89, 0.3)
pt3dadd(-131.5, 84.3, 18.7, 0.3)
pt3dadd(-134.19, 85.5, 18, 0.3)
pt3dadd(-134.9, 86, 17.8, 0.3)
pt3dadd(-135.3, 86.6, 17.7, 0.3)
pt3dadd(-135.8, 87.4, 17.5, 0.3)
pt3dadd(-137, 88.9, 17, 0.3)
pt3dadd(-137.8, 89.2, 16.8, 0.3)
pt3dadd(-138.5, 89.5, 16.6, 0.3)
pt3dadd(-139.3, 89.8, 16.5, 0.3)
pt3dadd(-140.3, 90.4, 16.2, 0.18)
pt3dadd(-140.8, 91.5, 15.8, 0.18)
pt3dadd(-141.5, 93.3, 15.3, 0.18)
pt3dadd(-141.9, 94.5, 15, 0.18)
pt3dadd(-142.5, 95.4, 14.7, 0.18)
pt3dadd(-142.8, 96.1, 14.5, 0.18)
pt3dadd(-142.8, 96.8, 14.3, 0.18)
pt3dadd(-142.8, 100.8, 13.2, 0.18)
pt3dadd(-143.1, 101.8, 12.8, 0.18)
pt3dadd(-143.1, 102.4, 12.7, 0.18)
pt3dadd(-143.4, 103.5, 12.3, 0.18)
pt3dadd(-143.4, 104.5, 12, 0.18)
}
dend[11] {pt3dclear()
pt3dadd(-62.3, 37.7, 30, 0.3)
pt3dadd(-63.1, 37.79, 29.9, 0.3)
pt3dadd(-64.09, 38, 29.7, 0.3)
pt3dadd(-64.8, 38.29, 29.6, 0.3)
pt3dadd(-65.4, 39, 29.5, 0.3)
pt3dadd(-66.2, 39.5, 29.3, 0.3)
pt3dadd(-67.59, 40.7, 29.1, 0.3)
pt3dadd(-68.3, 40.7, 29, 0.3)
pt3dadd(-69.3, 40.9, 28.8, 0.3)
pt3dadd(-70, 41.2, 28.7, 0.3)
pt3dadd(-70.59, 41.5, 28.6, 0.3)
}
}
proc shape3d_4() {
dend[11] { pt3dadd(-72.3, 42.4, 28.4, 0.3)
pt3dadd(-73.2, 42.7, 28.2, 0.3)
pt3dadd(-74, 43.4, 28.1, 0.3)
pt3dadd(-75.7, 44.7, 27.8, 0.3)
pt3dadd(-76.3, 45, 27.7, 0.3)
pt3dadd(-78.5, 45.8, 27.4, 0.3)
pt3dadd(-79.4, 46.1, 27.3, 0.3)
pt3dadd(-82, 47.1, 26.9, 0.3)
pt3dadd(-82.7, 47.3, 26.8, 0.3)
pt3dadd(-84.7, 47.8, 26.6, 0.3)
pt3dadd(-85.9, 47.8, 26.4, 0.3)
pt3dadd(-86.8, 48.1, 26.3, 0.3)
pt3dadd(-88.4, 48.5, 26.1, 0.3)
pt3dadd(-89.1, 48.9, 26, 0.3)
pt3dadd(-89.4, 49.6, 25.9, 0.3)
pt3dadd(-90.6, 50.4, 25.7, 0.3)
pt3dadd(-91.3, 50.8, 25.6, 0.3)
pt3dadd(-92.1, 51.1, 25.5, 0.3)
pt3dadd(-93.1, 51.1, 25.4, 0.3)
pt3dadd(-93.9, 51.4, 25.3, 0.3)
pt3dadd(-94.8, 51.6, 25.1, 0.3)
pt3dadd(-95.7, 52.3, 25, 0.3)
pt3dadd(-96.8, 53, 24.8, 0.3)
pt3dadd(-97.5, 53.6, 24.7, 0.3)
pt3dadd(-98.3, 54.2, 24.6, 0.3)
pt3dadd(-99, 55, 24.4, 0.3)
pt3dadd(-100, 55.8, 24.3, 0.3)
pt3dadd(-101, 56.5, 24.1, 0.3)
pt3dadd(-102, 57.1, 24, 0.3)
pt3dadd(-103.1, 57.5, 23.8, 0.3)
pt3dadd(-104.1, 58.1, 23.7, 0.3)
pt3dadd(-106, 59.1, 23.4, 0.3)
pt3dadd(-106.7, 59.9, 23.2, 0.3)
pt3dadd(-106.7, 61, 23.1, 0.3)
pt3dadd(-107.5, 61.3, 23, 0.3)
pt3dadd(-108.2, 61.9, 22.8, 0.3)
pt3dadd(-109, 62.1, 22.7, 0.3)
pt3dadd(-109.7, 62.4, 22.6, 0.3)
pt3dadd(-111.1, 63.1, 22.4, 0.3)
pt3dadd(-112, 63.8, 22.2, 0.3)
pt3dadd(-113.8, 65.4, 21.9, 0.3)
pt3dadd(-114.5, 66, 21.7, 0.3)
pt3dadd(-115.1, 66.3, 21.6, 0.3)
pt3dadd(-116, 66.5, 21.5, 0.3)
pt3dadd(-118.7, 67.2, 21.1, 0.3)
pt3dadd(-122.3, 68.4, 20.5, 0.3)
pt3dadd(-123.4, 69.09, 20.3, 0.3)
pt3dadd(-124.3, 69.9, 20.1, 0.3)
pt3dadd(-125.4, 70.59, 19.8, 0.3)
pt3dadd(-126.6, 71.2, 19.6, 0.3)
pt3dadd(-127.9, 71.5, 19.39, 0.3)
pt3dadd(-129.1, 71.8, 19.2, 0.3)
pt3dadd(-131.9, 72.7, 18.6, 0.3)
pt3dadd(-133.1, 73.59, 18.3, 0.3)
pt3dadd(-134, 74.7, 18.1, 0.3)
pt3dadd(-135.6, 76.09, 17.6, 0.3)
pt3dadd(-136.5, 76.5, 17.5, 0.3)
pt3dadd(-137.19, 76.5, 17.3, 0.3)
pt3dadd(-139, 76.2, 16.89, 0.3)
pt3dadd(-139.9, 76.2, 16.8, 0.3)
pt3dadd(-142, 76.7, 16.3, 0.3)
pt3dadd(-143.19, 77.2, 16, 0.3)
pt3dadd(-144.5, 77.8, 15.7, 0.3)
pt3dadd(-145.8, 78.2, 15.4, 0.3)
pt3dadd(-147, 78.2, 15.1, 0.3)
pt3dadd(-149.4, 77.9, 14.5, 0.3)
pt3dadd(-150.3, 77.9, 14.3, 0.3)
pt3dadd(-151.1, 78.09, 14.1, 0.3)
pt3dadd(-151.8, 78.9, 13.8, 0.18)
pt3dadd(-152.5, 79.09, 13.6, 0.18)
pt3dadd(-153.69, 79.4, 13.3, 0.18)
pt3dadd(-154.4, 79.59, 13.1, 0.18)
pt3dadd(-155.3, 79.9, 12.9, 0.18)
pt3dadd(-156.3, 79.9, 12.6, 0.18)
pt3dadd(-157.6, 79.5, 12.2, 0.18)
pt3dadd(-158.4, 79.09, 12, 0.18)
pt3dadd(-159.1, 78.3, 11.7, 0.18)
pt3dadd(-159.5, 77.59, 11.5, 0.18)
pt3dadd(-159.9, 76.59, 11.2, 0.18)
pt3dadd(-159.9, 75.4, 10.8, 0.18)
pt3dadd(-160.19, 74.5, 10.6, 0.18)
pt3dadd(-160.19, 73.8, 10.3, 0.18)
pt3dadd(-160.9, 73.09, 10, 0.18)
pt3dadd(-162, 72.7, 9.69, 0.18)
pt3dadd(-162.69, 72.3, 9.4, 0.18)
pt3dadd(-163.6, 71.7, 9.1, 0.18)
pt3dadd(-164.2, 71.4, 8.9, 0.18)
pt3dadd(-164.5, 70.7, 8.6, 0.18)
pt3dadd(-165.5, 70.09, 8.19, 0.18)
pt3dadd(-166.2, 69.59, 7.9, 0.18)
pt3dadd(-167.6, 68.9, 7.4, 0.18)
pt3dadd(-168.2, 68.4, 7.2, 0.18)
pt3dadd(-168.9, 68, 6.9, 0.18)
pt3dadd(-170.3, 67.3, 6.3, 0.18)
pt3dadd(-170.7, 66.5, 6, 0.18)
}
dend[12] {pt3dclear()
pt3dadd(-26.8, 12.6, 48, 0.7)
pt3dadd(-27.6, 12.2, 48, 0.7)
pt3dadd(-28.2, 11.9, 48.1, 0.7)
pt3dadd(-29.4, 11.1, 48, 0.7)
pt3dadd(-30.1, 10.4, 47.9, 0.7)
pt3dadd(-30.5, 10, 47.9, 0.7)
pt3dadd(-31.1, 8.69, 47.6, 0.7)
pt3dadd(-31.9, 8, 47.4, 0.7)
pt3dadd(-33.7, 6.5, 46.9, 0.7)
pt3dadd(-34.4, 6.2, 46.6, 0.7)
pt3dadd(-34.9, 5.7, 46.5, 0.7)
pt3dadd(-35.6, 5.4, 46.2, 0.7)
pt3dadd(-35.9, 4.5, 45.9, 0.7)
pt3dadd(-36.6, 3.8, 45.6, 0.7)
pt3dadd(-37, 3.3, 45.4, 0.7)
pt3dadd(-37.5, 2.8, 45.2, 0.7)
pt3dadd(-38.79, 1.7, 44.6, 0.7)
pt3dadd(-39.5, 0.9, 44.3, 0.7)
pt3dadd(-40.4, 0.5, 43.9, 0.7)
pt3dadd(-41.2, -0.2, 43.6, 0.3)
pt3dadd(-41.8, -0.2, 43.4, 0.3)
pt3dadd(-44.1, -0.5, 42.8, 0.3)
pt3dadd(-45.4, -1.5, 42.5, 0.3)
pt3dadd(-46.2, -1.8, 42.3, 0.3)
pt3dadd(-46.8, -2.1, 42.2, 0.3)
pt3dadd(-47.4, -2.1, 42.1, 0.3)
pt3dadd(-48.2, -2.4, 42, 0.3)
}
dend[13] {pt3dclear()
pt3dadd(-48.2, -2.4, 42, 0.3)
pt3dadd(-47.6, -2.8, 41.8, 0.3)
pt3dadd(-48.3, -2.5, 41.5, 0.3)
pt3dadd(-49.6, -2.29, 41, 0.3)
pt3dadd(-50.3, -2.29, 40.79, 0.3)
pt3dadd(-51.3, -2, 40.4, 0.3)
pt3dadd(-52.1, -2, 40.1, 0.3)
pt3dadd(-55.1, -1.8, 38.79, 0.3)
pt3dadd(-56, -1.8, 38.4, 0.3)
pt3dadd(-57.6, -2.1, 37.7, 0.3)
pt3dadd(-58.3, -2.1, 37.4, 0.3)
pt3dadd(-61, -1.8, 36.1, 0.3)
pt3dadd(-61.7, -1.8, 35.79, 0.3)
pt3dadd(-62.5, -1.6, 35.4, 0.3)
pt3dadd(-63.2, -1.6, 35.1, 0.3)
pt3dadd(-65, -1.9, 34.1, 0.3)
pt3dadd(-65.8, -2.2, 33.7, 0.3)
pt3dadd(-66.59, -2.2, 33.29, 0.3)
pt3dadd(-67.3, -2.5, 33, 0.3)
pt3dadd(-68, -2.6, 32.6, 0.3)
pt3dadd(-68.7, -2.4, 32.2, 0.3)
pt3dadd(-69.59, -2.4, 31.8, 0.3)
pt3dadd(-71.09, -2.7, 31, 0.3)
pt3dadd(-71.9, -2.7, 30.6, 0.3)
pt3dadd(-74.7, -2.5, 29.2, 0.3)
pt3dadd(-75.4, -2.5, 28.9, 0.3)
pt3dadd(-76.7, -2.1, 28.2, 0.3)
pt3dadd(-77.3, -2.1, 27.9, 0.3)
pt3dadd(-79.3, -1.7, 26.9, 0.3)
pt3dadd(-80.2, -1.4, 26.5, 0.3)
pt3dadd(-82.4, -0.7, 25.4, 0.3)
pt3dadd(-84.4, 0, 24.5, 0.3)
pt3dadd(-85.6, 0.2, 24, 0.3)
}
dend[14] {pt3dclear()
pt3dadd(-85.6, 0.2, 24, 0.3)
pt3dadd(-86.1, -0.2, 23.5, 0.3)
pt3dadd(-86.9, -0.2, 23, 0.3)
pt3dadd(-89.2, -0.5, 20.9, 0.3)
pt3dadd(-89.8, -0.5, 20.3, 0.3)
pt3dadd(-90.4, -0.2, 19.7, 0.3)
pt3dadd(-91.7, 0, 18.1, 0.3)
pt3dadd(-92.3, 0.2, 17.3, 0.3)
pt3dadd(-93.2, 0.2, 16.2, 0.3)
pt3dadd(-96.5, 0.2, 11.6, 0.3)
pt3dadd(-97.1, 0.3, 10.7, 0.3)
pt3dadd(-98, 0.3, 9.3, 0.3)
pt3dadd(-100.4, -0.09, 5.2, 0.3)
pt3dadd(-101, -0.09, 4, 0.3)
pt3dadd(-103.2, 0.4, 0.09, 0.3)
pt3dadd(-103.9, 0.9, -1.6, 0.3)
pt3dadd(-104.7, 1.2, -3, 0.3)
pt3dadd(-105.4, 1.4, -4.5, 0.3)
pt3dadd(-106.1, 1.8, -6.1, 0.3)
pt3dadd(-106.8, 2.2, -7.6, 0.3)
pt3dadd(-107.6, 2.4, -9.3, 0.3)
pt3dadd(-108.7, 2.4, -11.4, 0.3)
pt3dadd(-109.7, 2.7, -13.5, 0.3)
pt3dadd(-111.5, 3, -17.1, 0.3)
pt3dadd(-112.5, 3.4, -19.3, 0.3)
pt3dadd(-115.9, 4.59, -26.5, 0.3)
pt3dadd(-116.5, 4.59, -27.8, 0.3)
pt3dadd(-120.1, 4.59, -34.7, 0.3)
pt3dadd(-121.4, 5, -37.4, 0.3)
pt3dadd(-122.4, 5.2, -39.4, 0.3)
pt3dadd(-123.3, 5.6, -41.1, 0.3)
pt3dadd(-124, 6.3, -42.9, 0.3)
pt3dadd(-124.7, 6.7, -44.3, 0.3)
pt3dadd(-125.5, 6.9, -45.6, 0.3)
pt3dadd(-126.3, 6.9, -47.1, 0.3)
pt3dadd(-129.9, 7.2, -52.6, 0.3)
pt3dadd(-130.4, 7.6, -53.5, 0.3)
pt3dadd(-131.1, 7.9, -54.6, 0.3)
pt3dadd(-131.8, 8.1, -55.5, 0.3)
pt3dadd(-132.5, 8.1, -56.4, 0.3)
pt3dadd(-133.3, 8.4, -57.4, 0.3)
pt3dadd(-134.19, 8.4, -58.5, 0.3)
pt3dadd(-134.9, 8.69, -59.3, 0.3)
pt3dadd(-135.6, 8.8, -60, 0.3)
pt3dadd(-136.3, 9, -60.7, 0.3)
}
}
proc shape3d_5() {
dend[14] { pt3dadd(-137.1, 9.69, -61.7, 0.3)
pt3dadd(-137.6, 10.19, -62.4, 0.3)
pt3dadd(-138.19, 10.8, -63.1, 0.3)
pt3dadd(-138.8, 11.1, -63.8, 0.3)
pt3dadd(-139.4, 11.4, -64.3, 0.3)
pt3dadd(-140.19, 11.4, -64.9, 0.3)
pt3dadd(-142.1, 11.2, -66.4, 0.18)
pt3dadd(-142.9, 10.9, -67, 0.18)
pt3dadd(-143.4, 10.6, -67.4, 0.18)
pt3dadd(-144.69, 9.8, -68.4, 0.18)
pt3dadd(-145.69, 9.4, -69, 0.18)
pt3dadd(-148.5, 7.7, -70.7, 0.18)
pt3dadd(-149.19, 6.9, -71.2, 0.18)
pt3dadd(-149.9, 6.6, -71.5, 0.18)
pt3dadd(-150.6, 6.6, -71.8, 0.18)
pt3dadd(-151.4, 6.3, -72.09, 0.18)
pt3dadd(-152.19, 6.3, -72.4, 0.18)
pt3dadd(-154, 6, -72.9, 0.18)
pt3dadd(-156.3, 4.7, -73.4, 0.18)
pt3dadd(-157.19, 4.09, -73.59, 0.18)
pt3dadd(-157.8, 3.4, -73.7, 0.18)
pt3dadd(-158.6, 2.1, -73.8, 0.18)
pt3dadd(-159.19, 1.4, -73.8, 0.18)
pt3dadd(-159.5, 0.7, -73.8, 0.18)
pt3dadd(-160.1, 0.7, -73.8, 0.18)
pt3dadd(-160.4, 1.4, -73.8, 0.18)
pt3dadd(-161.8, 0.7, -73.59, 0.18)
pt3dadd(-162.1, 0.09, -73.59, 0.18)
pt3dadd(-163.4, -2.5, -73, 0.18)
pt3dadd(-164.7, -3.6, -72.59, 0.18)
pt3dadd(-165.3, -3.9, -72.4, 0.18)
pt3dadd(-166.2, -4.9, -72, 0.18)
}
dend[15] {pt3dclear()
pt3dadd(-85.6, 0.2, 24, 0.3)
pt3dadd(-86.5, 0.9, 23.7, 0.3)
pt3dadd(-87.1, 1.2, 23.6, 0.3)
pt3dadd(-88.4, 1.5, 23.5, 0.3)
pt3dadd(-91.7, 1.2, 23.7, 0.3)
pt3dadd(-92.3, 1.2, 23.8, 0.3)
pt3dadd(-95, 1.5, 24.6, 0.3)
pt3dadd(-95.8, 1.5, 24.9, 0.3)
pt3dadd(-96.6, 1.8, 25.3, 0.3)
pt3dadd(-97.5, 2, 25.7, 0.3)
pt3dadd(-99.9, 2.29, 26.7, 0.3)
pt3dadd(-103.1, 2.5, 28.3, 0.3)
pt3dadd(-104, 2.9, 28.7, 0.3)
pt3dadd(-105.6, 3.8, 29.5, 0.3)
pt3dadd(-106.3, 4, 29.8, 0.3)
pt3dadd(-106.9, 4.3, 30, 0.3)
}
dend[16] {pt3dclear()
pt3dadd(-106.9, 4.3, 30, 0.3)
pt3dadd(-105.8, 4.4, 31, 0.3)
pt3dadd(-106.5, 4.4, 31.6, 0.3)
pt3dadd(-107.3, 4.4, 32.4, 0.3)
pt3dadd(-109.2, 4.09, 34.1, 0.3)
pt3dadd(-111.1, 3.9, 36, 0.3)
pt3dadd(-112.3, 4.9, 37.6, 0.3)
pt3dadd(-113.1, 5.5, 38.6, 0.3)
pt3dadd(-113.9, 5.7, 39.4, 0.3)
pt3dadd(-115.7, 6.4, 41.4, 0.3)
pt3dadd(-116.5, 6.4, 42.2, 0.3)
pt3dadd(-120.8, 6.7, 46.8, 0.3)
pt3dadd(-122, 7.3, 48.2, 0.3)
pt3dadd(-123.7, 8.3, 50.4, 0.3)
pt3dadd(-124.3, 8.5, 51.1, 0.3)
pt3dadd(-124.9, 8.8, 51.8, 0.3)
pt3dadd(-126.1, 8.8, 53.3, 0.3)
pt3dadd(-129.5, 9.1, 57.2, 0.3)
pt3dadd(-130.3, 9.1, 58, 0.3)
pt3dadd(-131.1, 9.3, 59.1, 0.3)
pt3dadd(-131.8, 9.69, 60, 0.3)
pt3dadd(-132.69, 10.4, 61.4, 0.3)
pt3dadd(-133.69, 11.2, 62.9, 0.3)
pt3dadd(-134.3, 11.9, 64, 0.3)
pt3dadd(-134.8, 12.5, 64.9, 0.3)
pt3dadd(-135.19, 13.1, 65.8, 0.3)
pt3dadd(-135.9, 13.3, 66.59, 0.3)
pt3dadd(-136.5, 13.6, 67.4, 0.3)
pt3dadd(-137.19, 13.9, 68.3, 0.3)
pt3dadd(-138.1, 14.2, 69.4, 0.3)
pt3dadd(-138.69, 14.5, 70.2, 0.3)
pt3dadd(-139.4, 14.8, 71.2, 0.3)
pt3dadd(-140.1, 15, 72.09, 0.3)
pt3dadd(-141.3, 15.6, 73.59, 0.3)
pt3dadd(-143.69, 16.7, 76.8, 0.3)
pt3dadd(-144.4, 16.89, 77.7, 0.3)
pt3dadd(-145.1, 17, 78.59, 0.3)
pt3dadd(-145.9, 16.2, 79.9, 0.3)
pt3dadd(-146.6, 15.8, 81, 0.3)
pt3dadd(-147.4, 15.5, 82, 0.3)
pt3dadd(-148.5, 15.8, 83.4, 0.3)
pt3dadd(-149, 16.1, 84.2, 0.3)
pt3dadd(-149.69, 16.39, 85.1, 0.3)
pt3dadd(-150.5, 16.39, 86.2, 0.3)
pt3dadd(-152.1, 15.8, 88.3, 0.3)
pt3dadd(-152.69, 15.8, 89.1, 0.3)
pt3dadd(-153.4, 15.8, 90, 0.3)
}
dend[17] {pt3dclear()
pt3dadd(-106.9, 4.3, 30, 0.3)
pt3dadd(-107.7, 4.9, 29.8, 0.3)
pt3dadd(-108.6, 5.7, 29.5, 0.3)
pt3dadd(-109.4, 6.3, 29.2, 0.3)
pt3dadd(-110.2, 6.5, 29, 0.3)
pt3dadd(-112.2, 7.1, 28.3, 0.3)
pt3dadd(-114, 7.6, 27.6, 0.3)
pt3dadd(-114.7, 8.3, 27.1, 0.3)
pt3dadd(-116, 9.1, 26.5, 0.3)
pt3dadd(-117, 9.1, 26, 0.3)
pt3dadd(-120.7, 9.1, 23.9, 0.3)
pt3dadd(-121.5, 9.3, 23.4, 0.3)
pt3dadd(-122.1, 9.3, 23, 0.3)
pt3dadd(-122.8, 9.69, 22.5, 0.3)
pt3dadd(-123.4, 10, 22.1, 0.3)
pt3dadd(-124, 10.7, 21.5, 0.3)
pt3dadd(-125.2, 11.6, 20.39, 0.3)
pt3dadd(-126, 12.1, 19.7, 0.3)
pt3dadd(-126.6, 12.4, 19.2, 0.3)
pt3dadd(-127.6, 12.6, 18.39, 0.3)
pt3dadd(-128.69, 12.9, 17.5, 0.3)
pt3dadd(-129.3, 13.5, 16.8, 0.3)
pt3dadd(-130, 14, 16.1, 0.3)
pt3dadd(-131.3, 14.5, 14.9, 0.3)
pt3dadd(-132, 14.9, 14.2, 0.3)
pt3dadd(-132.9, 15.5, 13.2, 0.3)
pt3dadd(-133.8, 16.2, 12.1, 0.3)
pt3dadd(-135.6, 17.7, 9.8, 0.3)
pt3dadd(-136.4, 18, 9, 0.3)
pt3dadd(-137.69, 18.2, 7.6, 0.3)
pt3dadd(-138.6, 18.2, 6.7, 0.3)
pt3dadd(-139.4, 18.5, 5.7, 0.3)
pt3dadd(-140.19, 19, 4.7, 0.3)
pt3dadd(-140.9, 19.6, 3.7, 0.3)
pt3dadd(-141.6, 19.89, 2.8, 0.3)
pt3dadd(-142.3, 20.1, 2, 0.3)
pt3dadd(-143.1, 20.1, 1.1, 0.3)
pt3dadd(-143.9, 20.39, 0.09, 0.3)
pt3dadd(-144.6, 20.6, -0.8, 0.3)
pt3dadd(-145.8, 20.9, -2.2, 0.3)
pt3dadd(-146.5, 21.2, -3.2, 0.3)
pt3dadd(-147, 21.6, -4, 0.18)
pt3dadd(-147.9, 22, -5.2, 0.18)
pt3dadd(-148.9, 22.6, -6.7, 0.18)
pt3dadd(-149.6, 22.8, -7.6, 0.18)
pt3dadd(-151.1, 23.3, -9.6, 0.18)
pt3dadd(-152.19, 23.6, -11.2, 0.18)
pt3dadd(-153.5, 23.6, -12.9, 0.18)
pt3dadd(-155.69, 23.3, -16.1, 0.18)
pt3dadd(-157.5, 23.3, -18.5, 0.18)
pt3dadd(-162, 23, -25.2, 0.18)
pt3dadd(-163.3, 22.7, -27.1, 0.18)
pt3dadd(-164.5, 22.7, -29.1, 0.18)
pt3dadd(-167.5, 22.7, -33.79, 0.18)
pt3dadd(-169.1, 22.9, -36.29, 0.18)
pt3dadd(-170.1, 22.6, -38.1, 0.18)
pt3dadd(-170.8, 22.6, -39.2, 0.18)
pt3dadd(-171.9, 22.3, -41.1, 0.18)
pt3dadd(-173.9, 22, -44.3, 0.18)
pt3dadd(-174.7, 22, -45.7, 0.18)
pt3dadd(-176, 21.7, -48, 0.18)
}
dend[18] {pt3dclear()
pt3dadd(-48.2, -2.4, 42, 0.3)
pt3dadd(-48.8, -2.7, 42.4, 0.3)
pt3dadd(-49.5, -3.1, 43, 0.3)
pt3dadd(-50.5, -3.9, 43.7, 0.3)
pt3dadd(-51.1, -4.09, 44.2, 0.3)
pt3dadd(-51.8, -4.9, 44.9, 0.3)
pt3dadd(-52.6, -5.3, 45.5, 0.3)
pt3dadd(-54, -6, 46.6, 0.3)
pt3dadd(-54.6, -6.3, 47, 0.3)
pt3dadd(-55.3, -6.3, 47.5, 0.3)
pt3dadd(-56.1, -7, 48.3, 0.3)
pt3dadd(-56.8, -7.3, 48.8, 0.3)
pt3dadd(-58.1, -8.19, 50, 0.3)
pt3dadd(-59.3, -9.5, 51.4, 0.3)
pt3dadd(-60.1, -10.3, 52.2, 0.3)
pt3dadd(-61, -10.8, 53.1, 0.3)
pt3dadd(-61.7, -11.5, 53.8, 0.3)
pt3dadd(-62.3, -11.8, 54.4, 0.3)
pt3dadd(-63.1, -12.5, 55.2, 0.3)
pt3dadd(-65.4, -15.2, 58.2, 0.3)
pt3dadd(-66.3, -15.5, 59, 0.3)
pt3dadd(-67.09, -16.39, 60, 0.3)
pt3dadd(-67.7, -17.1, 60.8, 0.3)
pt3dadd(-68.3, -17.39, 61.4, 0.3)
pt3dadd(-69.3, -18.3, 62.5, 0.3)
pt3dadd(-71.5, -20.2, 65, 0.3)
pt3dadd(-72.5, -21.1, 66.2, 0.3)
pt3dadd(-74, -22.2, 67.8, 0.3)
pt3dadd(-75.59, -23.2, 69.4, 0.3)
pt3dadd(-77, -24.5, 71.09, 0.3)
pt3dadd(-77.9, -25.2, 72, 0.3)
pt3dadd(-78.4, -25.7, 72.59, 0.3)
pt3dadd(-79.09, -26, 73.3, 0.3)
pt3dadd(-81.8, -27.5, 75.9, 0.3)
pt3dadd(-82.1, -28, 76.4, 0.3)
pt3dadd(-82.5, -28.7, 77.09, 0.3)
pt3dadd(-82.8, -29.6, 78, 0.3)
pt3dadd(-83.4, -30.5, 78.8, 0.3)
pt3dadd(-83.8, -31.3, 79.59, 0.3)
pt3dadd(-84.6, -32.29, 80.7, 0.3)
pt3dadd(-85.2, -32.6, 81.2, 0.3)
pt3dadd(-85.9, -33.5, 82.2, 0.3)
pt3dadd(-86.6, -34.1, 83, 0.3)
pt3dadd(-88.4, -35.6, 85.1, 0.3)
}
}
proc shape3d_6() {
dend[18] { pt3dadd(-88.8, -36.4, 85.9, 0.3)
pt3dadd(-89.3, -37.2, 86.6, 0.3)
pt3dadd(-89.8, -37.79, 87.3, 0.3)
pt3dadd(-89.8, -38.5, 87.9, 0.3)
pt3dadd(-90.1, -39.1, 88.5, 0.3)
pt3dadd(-90.6, -39.7, 89.2, 0.3)
pt3dadd(-91.1, -40.5, 90, 0.3)
pt3dadd(-91.5, -41, 90.5, 0.3)
pt3dadd(-92, -42.2, 91.6, 0.3)
pt3dadd(-92.3, -43.2, 92.5, 0.3)
pt3dadd(-92.6, -44, 93.3, 0.3)
pt3dadd(-93.8, -45, 94.7, 0.3)
pt3dadd(-94.6, -45.5, 95.4, 0.3)
pt3dadd(-96.2, -46.3, 97, 0.3)
pt3dadd(-96.9, -46.3, 97.7, 0.3)
pt3dadd(-100, -46.1, 100.3, 0.3)
pt3dadd(-100.7, -46.5, 101, 0.3)
pt3dadd(-101.2, -46.8, 101.6, 0.3)
pt3dadd(-101.9, -47.2, 102.2, 0.3)
pt3dadd(-103.2, -48, 103.6, 0.3)
pt3dadd(-104, -48.5, 104.4, 0.3)
pt3dadd(-105, -48.9, 105.4, 0.3)
pt3dadd(-106.7, -49.4, 106.9, 0.3)
pt3dadd(-107.6, -49.7, 107.7, 0.3)
pt3dadd(-109.5, -50.4, 109.5, 0.3)
pt3dadd(-110.1, -50.9, 110.2, 0.3)
pt3dadd(-110.9, -51.3, 111, 0.3)
pt3dadd(-111.7, -51.3, 111.7, 0.3)
pt3dadd(-112.3, -51.6, 112.3, 0.3)
pt3dadd(-113, -51.6, 112.9, 0.3)
pt3dadd(-115.3, -52.2, 115.1, 0.3)
pt3dadd(-115.6, -52.8, 115.6, 0.3)
pt3dadd(-116.4, -53.5, 116.6, 0.3)
pt3dadd(-116.7, -54.5, 117.5, 0.3)
pt3dadd(-117.7, -55.8, 118.9, 0.3)
pt3dadd(-118.2, -55.4, 119.5, 0.3)
pt3dadd(-118.9, -55.2, 120.2, 0.3)
pt3dadd(-120.1, -55.8, 121.4, 0.3)
pt3dadd(-120.9, -56.1, 122.2, 0.3)
pt3dadd(-121.5, -56.5, 122.9, 0.3)
pt3dadd(-122.2, -56.5, 123.5, 0.3)
pt3dadd(-125.3, -56.5, 126.3, 0.3)
pt3dadd(-127.1, -56.9, 128, 0.3)
pt3dadd(-127.6, -57.3, 128.6, 0.3)
pt3dadd(-128.19, -57.6, 129.19, 0.3)
pt3dadd(-130, -57.9, 130.9, 0.3)
pt3dadd(-130.6, -57.6, 131.5, 0.3)
pt3dadd(-131.4, -57.4, 132.19, 0.3)
pt3dadd(-132.1, -57.4, 133, 0.3)
pt3dadd(-132.8, -57.1, 133.6, 0.3)
pt3dadd(-133.4, -57.1, 134.19, 0.3)
pt3dadd(-136.5, -57.1, 137.1, 0.3)
pt3dadd(-137.5, -57.1, 138, 0.3)
}
dend[19] {pt3dclear()
pt3dstyle(1, 10, 0, 30)
pt3dadd(-1.1, 0.09, 29.2, 0.7)
pt3dadd(-1.8, 0.09, 28.7, 0.7)
pt3dadd(-3, -0.2, 27.7, 0.7)
pt3dadd(-3.9, -0.5, 27.1, 0.7)
pt3dadd(-5.5, -1.5, 25.8, 0.7)
pt3dadd(-6.4, -2.2, 25, 0.7)
pt3dadd(-7.8, -2.2, 24.1, 0.7)
pt3dadd(-11.3, -2.5, 21.9, 0.7)
pt3dadd(-12.3, -2.8, 21.2, 0.7)
pt3dadd(-13.9, -3.1, 20.2, 0.7)
pt3dadd(-14.6, -3.4, 19.8, 0.7)
pt3dadd(-15.8, -3.7, 19.1, 0.7)
pt3dadd(-16.89, -3.7, 18.5, 0.7)
pt3dadd(-17.8, -4, 18, 0.7)
pt3dadd(-18.8, -4, 17.5, 0.7)
pt3dadd(-19.6, -4.59, 17, 0.7)
pt3dadd(-20.6, -5, 16.5, 0.7)
pt3dadd(-21.3, -5, 16.2, 0.7)
pt3dadd(-22.2, -5.3, 15.8, 0.7)
pt3dadd(-22.8, -5.3, 15.6, 0.7)
pt3dadd(-23.8, -5.4, 15.2, 0.7)
pt3dadd(-24.6, -5.4, 14.9, 0.7)
pt3dadd(-26.3, -5.8, 14.2, 0.7)
pt3dadd(-27, -6.1, 14, 0.7)
pt3dadd(-27.6, -6.1, 13.8, 0.7)
pt3dadd(-30.8, -6.1, 12.9, 0.7)
pt3dadd(-31.8, -6.9, 12.6, 0.7)
pt3dadd(-33.1, -7.6, 12.3, 0.7)
pt3dadd(-34.5, -7.9, 12.1, 0.7)
pt3dadd(-35.79, -8.19, 11.9, 0.7)
pt3dadd(-36.9, -8.19, 11.8, 0.7)
pt3dadd(-37.79, -8, 11.7, 0.7)
pt3dadd(-38.5, -8, 11.7, 0.7)
pt3dadd(-39.1, -7.8, 11.6, 0.7)
pt3dadd(-39.79, -7.8, 11.6, 0.7)
pt3dadd(-40.7, -7.5, 11.6, 0.7)
pt3dadd(-41.4, -7.5, 11.7, 0.7)
pt3dadd(-42.8, -7.3, 11.7, 0.7)
pt3dadd(-44.4, -7.1, 11.9, 0.7)
pt3dadd(-45, -6.9, 12, 0.3)
}
dend[20] {pt3dclear()
pt3dadd(-45, -6.9, 12, 0.3)
pt3dadd(-44.4, -7.1, 12.1, 0.3)
pt3dadd(-45, -6.8, 12.3, 0.3)
pt3dadd(-45.9, -6.3, 12.6, 0.3)
pt3dadd(-46.7, -6.3, 12.9, 0.3)
pt3dadd(-49.4, -6.6, 13.9, 0.3)
pt3dadd(-51.2, -6.9, 14.7, 0.3)
pt3dadd(-52, -6.7, 15.1, 0.3)
pt3dadd(-53, -6.5, 15.5, 0.3)
pt3dadd(-53.7, -6.1, 15.9, 0.3)
pt3dadd(-54.5, -5.9, 16.2, 0.3)
pt3dadd(-55.1, -5.9, 16.5, 0.3)
pt3dadd(-56.7, -6.2, 17.2, 0.3)
pt3dadd(-57.5, -6.2, 17.5, 0.3)
pt3dadd(-58.1, -5.9, 17.7, 0.3)
pt3dadd(-58.8, -5.5, 18, 0.3)
}
dend[21] {pt3dclear()
pt3dadd(-58.8, -5.5, 18, 0.3)
pt3dadd(-59.6, -5.2, 18.39, 0.3)
pt3dadd(-60.3, -5, 18.8, 0.3)
pt3dadd(-61.1, -5, 19.3, 0.3)
pt3dadd(-64.5, -5, 21.3, 0.3)
pt3dadd(-65.09, -4.7, 21.8, 0.3)
pt3dadd(-65.8, -4.7, 22.2, 0.3)
pt3dadd(-66.5, -4.5, 22.6, 0.3)
pt3dadd(-67.2, -4.4, 23, 0.3)
pt3dadd(-67.9, -4.4, 23.4, 0.3)
pt3dadd(-68.5, -4.4, 23.6, 0.3)
pt3dadd(-69.2, -3.9, 24, 0.3)
}
dend[22] {pt3dclear()
pt3dadd(-69.2, -3.9, 24, 0.3)
pt3dadd(-70, -4.3, 24.3, 0.3)
pt3dadd(-70.9, -4.4, 24.5, 0.3)
pt3dadd(-71.5, -4.2, 24.7, 0.3)
pt3dadd(-72.4, -4.2, 24.8, 0.3)
pt3dadd(-75.59, -4.2, 24.9, 0.3)
pt3dadd(-76.3, -3.9, 24.8, 0.3)
pt3dadd(-77, -3.9, 24.7, 0.3)
pt3dadd(-77.7, -3.7, 24.5, 0.3)
pt3dadd(-79.2, -3.2, 24.1, 0.3)
pt3dadd(-79.9, -3.2, 23.9, 0.3)
pt3dadd(-82.5, -3.5, 22.8, 0.3)
pt3dadd(-83.9, -4.09, 22, 0.3)
pt3dadd(-84.7, -4.09, 21.5, 0.3)
pt3dadd(-85.4, -3.9, 21, 0.3)
pt3dadd(-86, -3.9, 20.6, 0.3)
pt3dadd(-87, -3.6, 19.89, 0.3)
pt3dadd(-87.6, -3.4, 19.3, 0.3)
pt3dadd(-88.3, -3.4, 18.8, 0.3)
pt3dadd(-89.5, -3.8, 17.8, 0.3)
pt3dadd(-90.3, -3.6, 17, 0.3)
pt3dadd(-90.9, -3.6, 16.39, 0.3)
pt3dadd(-93.5, -3.9, 13.9, 0.3)
pt3dadd(-94.3, -4.2, 12.9, 0.3)
pt3dadd(-95.9, -4.9, 10.9, 0.3)
pt3dadd(-96.5, -4.9, 10.19, 0.3)
pt3dadd(-98.6, -4.59, 7.6, 0.3)
pt3dadd(-100.9, -4.3, 4.59, 0.3)
pt3dadd(-103.2, -4.59, 1.3, 0.3)
pt3dadd(-104.4, -5.4, -0.8, 0.3)
pt3dadd(-105.5, -5.7, -2.6, 0.3)
pt3dadd(-106.3, -5.7, -3.8, 0.3)
pt3dadd(-109.5, -5.9, -8.8, 0.3)
pt3dadd(-110.3, -6.2, -10.4, 0.3)
pt3dadd(-111.1, -6.6, -11.9, 0.3)
pt3dadd(-111.8, -7.5, -13.8, 0.3)
pt3dadd(-112.4, -8.5, -15.7, 0.3)
pt3dadd(-113.1, -9.8, -18.39, 0.3)
pt3dadd(-114.4, -10.5, -21.1, 0.3)
pt3dadd(-115.2, -11.3, -23.1, 0.3)
pt3dadd(-115.8, -11.7, -24.3, 0.3)
pt3dadd(-116.6, -12.7, -26.8, 0.3)
pt3dadd(-117.5, -13.3, -28.9, 0.3)
pt3dadd(-118.3, -13.7, -30.5, 0.3)
pt3dadd(-119, -13.7, -31.8, 0.3)
pt3dadd(-121.1, -13.3, -35.79, 0.3)
pt3dadd(-122, -13.3, -37.6, 0.3)
pt3dadd(-123.1, -14, -40.2, 0.3)
pt3dadd(-123.7, -14.3, -41.5, 0.3)
pt3dadd(-124.5, -14.8, -43.4, 0.3)
pt3dadd(-125.5, -15.3, -45.4, 0.3)
pt3dadd(-126.4, -15.6, -47.4, 0.3)
pt3dadd(-127.2, -15.6, -49, 0.3)
pt3dadd(-130.5, -15.9, -55.7, 0.3)
pt3dadd(-131.4, -16.3, -57.5, 0.3)
pt3dadd(-132.6, -16.6, -60, 0.3)
pt3dadd(-134.9, -16.1, -64.8, 0.3)
pt3dadd(-136.5, -15.9, -68.4, 0.3)
pt3dadd(-137.5, -15.9, -70.59, 0.3)
pt3dadd(-138.19, -16.3, -72.4, 0.3)
pt3dadd(-138.5, -16.89, -74.09, 0.3)
pt3dadd(-139.4, -17.8, -77.2, 0.3)
pt3dadd(-140.69, -18.8, -81.4, 0.3)
pt3dadd(-141.3, -18.8, -83.2, 0.3)
pt3dadd(-142.9, -19.2, -87.5, 0.3)
pt3dadd(-143.8, -20.3, -91.7, 0.3)
pt3dadd(-144.19, -21, -94, 0.3)
pt3dadd(-144.5, -21.7, -96.3, 0.3)
pt3dadd(-144.9, -22.5, -98.9, 0.3)
pt3dadd(-145.6, -23.1, -102, 0.3)
}
dend[23] {pt3dclear()
pt3dadd(-69.2, -3.9, 24, 0.3)
pt3dadd(-69.7, -4.09, 24.3, 0.3)
pt3dadd(-70.59, -4.4, 24.6, 0.3)
pt3dadd(-71.4, -4.4, 24.9, 0.3)
pt3dadd(-73, -3.9, 25.5, 0.3)
pt3dadd(-73.9, -3.6, 25.9, 0.3)
pt3dadd(-74.8, -3.5, 26.1, 0.3)
pt3dadd(-75.5, -3.5, 26.4, 0.3)
}
}
proc shape3d_7() {
dend[23] { pt3dadd(-76.09, -3.3, 26.5, 0.3)
pt3dadd(-77.09, -3, 26.8, 0.3)
pt3dadd(-78.9, -2.5, 27.3, 0.3)
pt3dadd(-80.09, -2.2, 27.6, 0.3)
pt3dadd(-80.7, -2.2, 27.7, 0.3)
pt3dadd(-82.1, -2, 28, 0.3)
pt3dadd(-82.9, -2, 28.1, 0.3)
pt3dadd(-85.9, -2, 28.5, 0.3)
pt3dadd(-87.7, -1.7, 28.7, 0.3)
pt3dadd(-88.6, -1.4, 28.8, 0.3)
pt3dadd(-89.6, -1.4, 28.8, 0.3)
pt3dadd(-90.4, -1.2, 28.9, 0.3)
pt3dadd(-91, -1.2, 28.9, 0.3)
pt3dadd(-92, -0.9, 28.9, 0.3)
pt3dadd(-92.7, -0.9, 28.9, 0.3)
pt3dadd(-93.9, -0.7, 28.9, 0.3)
pt3dadd(-94.6, -0.5, 28.9, 0.3)
pt3dadd(-95.5, -0.5, 28.9, 0.3)
pt3dadd(-98, -0.2, 28.8, 0.3)
pt3dadd(-100.1, 0.6, 28.6, 0.3)
pt3dadd(-101.9, 1.1, 28.4, 0.3)
pt3dadd(-104.7, 1.4, 28, 0.3)
pt3dadd(-105.5, 1.4, 27.8, 0.3)
pt3dadd(-106.3, 1.6, 27.7, 0.3)
pt3dadd(-107, 2.2, 27.5, 0.3)
pt3dadd(-107.8, 2.4, 27.4, 0.3)
pt3dadd(-108.4, 2.7, 27.2, 0.3)
pt3dadd(-108.8, 3.4, 27.1, 0.3)
pt3dadd(-109.3, 3.9, 26.9, 0.3)
pt3dadd(-110.3, 4.5, 26.6, 0.3)
pt3dadd(-110.8, 5.09, 26.4, 0.3)
pt3dadd(-111.2, 5.7, 26.2, 0.3)
pt3dadd(-112.4, 7.7, 25.6, 0.3)
pt3dadd(-113.2, 8, 25.4, 0.3)
pt3dadd(-113.8, 8.5, 25.1, 0.3)
pt3dadd(-114.5, 9.4, 24.8, 0.3)
pt3dadd(-115.7, 11, 24.1, 0.3)
pt3dadd(-116.3, 11.7, 23.8, 0.3)
pt3dadd(-117, 12.4, 23.5, 0.3)
pt3dadd(-118.7, 13.9, 22.7, 0.3)
pt3dadd(-119.6, 14.4, 22.3, 0.3)
pt3dadd(-120.7, 14.9, 21.8, 0.3)
pt3dadd(-121.3, 15.3, 21.5, 0.3)
pt3dadd(-122.1, 16.1, 21.1, 0.3)
pt3dadd(-122.7, 16.5, 20.8, 0.3)
pt3dadd(-123, 17, 20.5, 0.3)
pt3dadd(-123.4, 18.39, 19.89, 0.3)
pt3dadd(-123.9, 19.1, 19.5, 0.3)
pt3dadd(-124.6, 20, 19, 0.3)
pt3dadd(-125.4, 20.7, 18.6, 0.3)
pt3dadd(-126.1, 21.2, 18.2, 0.3)
pt3dadd(-126.8, 21.7, 17.8, 0.3)
pt3dadd(-127.4, 21.9, 17.5, 0.3)
pt3dadd(-128.3, 22.2, 17, 0.3)
pt3dadd(-128.8, 22.5, 16.7, 0.3)
pt3dadd(-129.4, 22.9, 16.39, 0.3)
pt3dadd(-130.1, 23.2, 16, 0.3)
pt3dadd(-130.8, 23.6, 15.6, 0.3)
pt3dadd(-131.69, 24, 15.1, 0.3)
pt3dadd(-135.1, 25.4, 13.2, 0.3)
pt3dadd(-135.6, 25.8, 12.9, 0.3)
pt3dadd(-136.19, 26.4, 12.5, 0.3)
pt3dadd(-136.8, 26.9, 12, 0.3)
pt3dadd(-137.3, 27.5, 11.6, 0.3)
pt3dadd(-137.8, 28.1, 11.2, 0.3)
pt3dadd(-139.4, 29.9, 9.9, 0.3)
pt3dadd(-140.4, 30.1, 9.3, 0.3)
pt3dadd(-141.3, 30.1, 8.8, 0.3)
pt3dadd(-142.1, 30.4, 8.3, 0.3)
pt3dadd(-143.6, 31.1, 7.4, 0.3)
pt3dadd(-144.4, 31.3, 6.9, 0.3)
pt3dadd(-145.19, 31.3, 6.4, 0.3)
pt3dadd(-146, 31.3, 6, 0.3)
}
dend[24] {pt3dclear()
pt3dadd(-58.8, -5.5, 18, 0.3)
pt3dadd(-58.9, -4.8, 18.1, 0.3)
pt3dadd(-58.9, -4.2, 18.3, 0.3)
pt3dadd(-59.6, -3.6, 18.39, 0.3)
pt3dadd(-60.2, -3.3, 18.6, 0.3)
pt3dadd(-60.9, -3.3, 18.7, 0.3)
pt3dadd(-62.5, -3.6, 19, 0.3)
pt3dadd(-62.8, -4.2, 19.1, 0.3)
pt3dadd(-63.6, -4.7, 19.3, 0.3)
pt3dadd(-64.3, -5.09, 19.39, 0.3)
pt3dadd(-67.09, -6.2, 19.89, 0.3)
pt3dadd(-68.4, -6.5, 20.1, 0.3)
pt3dadd(-69, -7, 20.2, 0.3)
pt3dadd(-69.7, -7.8, 20.3, 0.3)
pt3dadd(-70.9, -7.8, 20.5, 0.3)
pt3dadd(-74.59, -7.5, 21, 0.3)
pt3dadd(-75.59, -7.5, 21.1, 0.3)
pt3dadd(-76.4, -7.8, 21.2, 0.3)
pt3dadd(-77.3, -8.19, 21.4, 0.3)
pt3dadd(-77.9, -8.69, 21.5, 0.3)
pt3dadd(-78.5, -9.5, 21.6, 0.3)
pt3dadd(-79.2, -9.9, 21.7, 0.3)
pt3dadd(-80.3, -9.9, 21.8, 0.3)
pt3dadd(-82.5, -10.19, 22.1, 0.3)
pt3dadd(-83.3, -11, 22.3, 0.3)
pt3dadd(-84.2, -11.8, 22.5, 0.3)
pt3dadd(-85.7, -13.1, 22.7, 0.3)
pt3dadd(-86.6, -13.8, 22.9, 0.3)
pt3dadd(-88.1, -14.5, 23.2, 0.3)
pt3dadd(-88.7, -14.8, 23.3, 0.3)
pt3dadd(-89.8, -14.8, 23.4, 0.3)
pt3dadd(-90.7, -15.1, 23.6, 0.3)
pt3dadd(-91.6, -15.8, 23.8, 0.3)
pt3dadd(-92.4, -16.7, 24, 0.3)
}
dend[25] {pt3dclear()
pt3dadd(-92.4, -16.7, 24, 0.3)
pt3dadd(-93, -16.8, 24.1, 0.3)
pt3dadd(-93.8, -16.8, 24.3, 0.3)
pt3dadd(-94.6, -17.5, 24.5, 0.3)
pt3dadd(-95.4, -18.1, 24.7, 0.3)
pt3dadd(-96.2, -18.6, 24.8, 0.3)
pt3dadd(-97.1, -19, 25, 0.3)
pt3dadd(-97.8, -19.3, 25.2, 0.3)
pt3dadd(-98.5, -19, 25.3, 0.3)
pt3dadd(-100.3, -18.7, 25.6, 0.3)
pt3dadd(-101, -19, 25.8, 0.3)
pt3dadd(-101.5, -19.39, 25.9, 0.3)
pt3dadd(-102.5, -19.7, 26.1, 0.3)
pt3dadd(-103.1, -20, 26.3, 0.3)
pt3dadd(-104, -19.39, 26.5, 0.3)
pt3dadd(-105.2, -19.1, 26.7, 0.3)
pt3dadd(-106, -19.1, 26.8, 0.3)
pt3dadd(-106.7, -19.7, 27, 0.3)
pt3dadd(-107.7, -20, 27.2, 0.3)
pt3dadd(-108.6, -20, 27.4, 0.3)
pt3dadd(-111.5, -19.7, 27.9, 0.3)
pt3dadd(-113.5, -18.89, 28.4, 0.3)
pt3dadd(-114.7, -18.6, 28.6, 0.3)
pt3dadd(-115.3, -18.6, 28.7, 0.3)
pt3dadd(-116, -19, 28.9, 0.3)
pt3dadd(-116.7, -19, 29, 0.3)
pt3dadd(-117.3, -19.3, 29.1, 0.3)
pt3dadd(-119.3, -19.1, 29.5, 0.3)
pt3dadd(-120.1, -18.89, 29.7, 0.3)
pt3dadd(-121, -18.89, 29.8, 0.3)
pt3dadd(-122.1, -19.3, 30.1, 0.3)
pt3dadd(-123.1, -19.8, 30.3, 0.3)
pt3dadd(-123.8, -20.2, 30.4, 0.3)
pt3dadd(-125.1, -20.9, 30.7, 0.3)
pt3dadd(-126.5, -21.6, 31, 0.3)
pt3dadd(-127.3, -21.6, 31.2, 0.3)
pt3dadd(-130.69, -21.3, 31.9, 0.3)
pt3dadd(-133, -21, 32.29, 0.3)
pt3dadd(-134.1, -21.5, 32.6, 0.3)
pt3dadd(-135.4, -22.1, 32.9, 0.3)
pt3dadd(-136.69, -22.4, 33.2, 0.3)
pt3dadd(-137.5, -22.8, 33.4, 0.3)
pt3dadd(-138.3, -23.1, 33.5, 0.3)
pt3dadd(-139, -23.1, 33.7, 0.3)
pt3dadd(-140.9, -22.9, 34.1, 0.3)
pt3dadd(-141.69, -22.9, 34.2, 0.3)
pt3dadd(-144.8, -22.9, 34.9, 0.18)
pt3dadd(-146.4, -22.6, 35.2, 0.18)
pt3dadd(-146.8, -22.1, 35.4, 0.18)
pt3dadd(-147.1, -21.6, 35.5, 0.18)
pt3dadd(-147.6, -20.5, 35.79, 0.18)
pt3dadd(-147.9, -19.6, 36, 0.18)
}
dend[26] {pt3dclear()
pt3dadd(-92.4, -16.7, 24, 0.3)
pt3dadd(-92.6, -17.2, 24.1, 0.3)
pt3dadd(-92.9, -18, 24.3, 0.3)
pt3dadd(-93.5, -19.3, 24.6, 0.3)
pt3dadd(-93.9, -19.8, 24.7, 0.3)
pt3dadd(-94.2, -20.5, 24.9, 0.3)
pt3dadd(-94.2, -21.8, 25.2, 0.3)
pt3dadd(-93.9, -22.6, 25.5, 0.3)
pt3dadd(-93.9, -23.2, 25.6, 0.3)
pt3dadd(-93.6, -23.9, 25.9, 0.3)
pt3dadd(-93.3, -24.8, 26.2, 0.3)
pt3dadd(-93.7, -26, 26.6, 0.3)
pt3dadd(-94, -26.9, 27, 0.3)
pt3dadd(-94, -28, 27.4, 0.3)
pt3dadd(-94.4, -30.2, 28.3, 0.3)
pt3dadd(-94.8, -31.5, 28.9, 0.3)
pt3dadd(-95.6, -31.9, 29.3, 0.3)
pt3dadd(-96.4, -31.9, 29.7, 0.3)
pt3dadd(-97.5, -32.7, 30.5, 0.3)
pt3dadd(-98.2, -33.1, 30.9, 0.3)
pt3dadd(-98.8, -34.1, 31.5, 0.3)
pt3dadd(-99.1, -35, 32.1, 0.3)
pt3dadd(-99.1, -35.79, 32.5, 0.3)
pt3dadd(-99.4, -37.29, 33.5, 0.3)
pt3dadd(-100.3, -38.9, 34.7, 0.3)
pt3dadd(-100.9, -39.79, 35.4, 0.3)
pt3dadd(-100.9, -40.5, 35.9, 0.3)
pt3dadd(-101.3, -41.1, 36.5, 0.3)
pt3dadd(-101.9, -41.7, 37.1, 0.3)
pt3dadd(-103.5, -43.4, 39, 0.3)
pt3dadd(-104.6, -44.6, 40.2, 0.3)
pt3dadd(-105.4, -45.2, 41.1, 0.3)
pt3dadd(-106.4, -45.9, 42.1, 0.3)
pt3dadd(-107.2, -46.5, 43, 0.3)
pt3dadd(-107.6, -47.1, 43.7, 0.3)
pt3dadd(-108.9, -48.2, 45.3, 0.3)
pt3dadd(-109.9, -48.7, 46.5, 0.3)
pt3dadd(-110.8, -48.9, 47.4, 0.3)
pt3dadd(-111.5, -49.2, 48.1, 0.3)
pt3dadd(-111.8, -49.8, 48.8, 0.3)
pt3dadd(-112.1, -50.5, 49.6, 0.3)
}
}
proc shape3d_8() {
dend[26] { pt3dadd(-112.1, -51.3, 50.4, 0.3)
pt3dadd(-112.7, -52.8, 52.2, 0.3)
pt3dadd(-112.7, -53.4, 52.8, 0.3)
pt3dadd(-112.9, -54.9, 54.6, 0.3)
pt3dadd(-113.7, -54.9, 55.5, 0.3)
pt3dadd(-115, -55.8, 57.3, 0.3)
pt3dadd(-114.7, -56.4, 58.1, 0.3)
pt3dadd(-114.7, -57.1, 59, 0.3)
pt3dadd(-115, -57.8, 60, 0.3)
pt3dadd(-115, -58.8, 62.8, 0.3)
pt3dadd(-115.3, -59.5, 67, 0.3)
pt3dadd(-115.9, -60.2, 74.2, 0.3)
pt3dadd(-116.3, -61, 82, 0.3)
pt3dadd(-117, -61.6, 90.8, 0.3)
pt3dadd(-117.3, -62.2, 97.2, 0.3)
pt3dadd(-117.6, -62.7, 102.8, 0.3)
pt3dadd(-117.9, -63.6, 110.8, 0.3)
pt3dadd(-118.2, -64.09, 115.2, 0.3)
pt3dadd(-118.5, -64.9, 120, 0.3)
pt3dadd(-119.3, -65.2, 123.7, 0.3)
pt3dadd(-120.5, -65.5, 128.6, 0.3)
pt3dadd(-121.6, -66.5, 133.9, 0.3)
pt3dadd(-122.2, -67, 136.6, 0.3)
pt3dadd(-123.1, -67.8, 140.69, 0.3)
pt3dadd(-123.8, -68.09, 143, 0.3)
pt3dadd(-124.5, -69.2, 146.9, 0.3)
pt3dadd(-124.8, -69.8, 148.69, 0.3)
pt3dadd(-125.6, -70.8, 152, 0.3)
pt3dadd(-126.3, -70.8, 153.6, 0.3)
pt3dadd(-127.1, -71.2, 155.3, 0.3)
pt3dadd(-127.9, -71.5, 157.1, 0.3)
pt3dadd(-128.8, -71.5, 158.69, 0.3)
pt3dadd(-129.9, -71.9, 160.6, 0.3)
pt3dadd(-130.8, -71.9, 161.8, 0.3)
pt3dadd(-132, -73.2, 163.69, 0.3)
pt3dadd(-132.69, -73.8, 164.4, 0.3)
pt3dadd(-133.6, -74.3, 164.9, 0.3)
pt3dadd(-134.4, -74.9, 165.3, 0.3)
pt3dadd(-135.1, -75.2, 165.3, 0.3)
pt3dadd(-136.1, -75.9, 165.2, 0.3)
pt3dadd(-136.9, -76.09, 164.9, 0.3)
pt3dadd(-137.69, -76.5, 164.5, 0.3)
pt3dadd(-138.69, -77.5, 163.4, 0.3)
pt3dadd(-139.8, -78, 162, 0.3)
}
dend[27] {pt3dclear()
pt3dadd(-45, -6.9, 12, 0.3)
pt3dadd(-45, -7.8, 12, 0.3)
pt3dadd(-44.8, -9.1, 12.1, 0.3)
pt3dadd(-44.8, -10.3, 12.3, 0.3)
pt3dadd(-45.2, -11, 12.5, 0.3)
pt3dadd(-46, -12.6, 13, 0.3)
pt3dadd(-46.4, -13.4, 13.2, 0.3)
pt3dadd(-46.9, -14.2, 13.6, 0.3)
pt3dadd(-47.8, -14.9, 14, 0.3)
pt3dadd(-48.5, -15.2, 14.3, 0.3)
pt3dadd(-49.2, -15.6, 14.6, 0.3)
pt3dadd(-50.1, -15.9, 15, 0.3)
pt3dadd(-51.7, -16.8, 15.7, 0.3)
pt3dadd(-53.7, -18, 16.5, 0.3)
pt3dadd(-54.5, -18.6, 16.89, 0.3)
pt3dadd(-55.1, -18.89, 17.1, 0.3)
pt3dadd(-55.7, -19.6, 17.39, 0.3)
pt3dadd(-57, -20.9, 17.7, 0.3)
pt3dadd(-58.2, -22.3, 18, 0.3)
pt3dadd(-58.7, -22.8, 18, 0.3)
pt3dadd(-59.3, -23.1, 18, 0.3)
}
dend[28] {pt3dclear()
pt3dadd(-59.3, -23.1, 18, 0.3)
pt3dadd(-60.1, -23, 18.3, 0.3)
pt3dadd(-60.7, -23.3, 18.6, 0.3)
pt3dadd(-61.4, -23.3, 18.89, 0.3)
pt3dadd(-61.7, -24, 19.2, 0.3)
pt3dadd(-62.5, -24.1, 19.5, 0.3)
pt3dadd(-63.1, -24.1, 19.8, 0.3)
pt3dadd(-63.8, -24.4, 20.1, 0.3)
pt3dadd(-64.5, -24.4, 20.39, 0.3)
pt3dadd(-65.09, -24.8, 20.7, 0.3)
pt3dadd(-65.8, -25.4, 21.1, 0.3)
pt3dadd(-66.7, -25.4, 21.4, 0.3)
pt3dadd(-68.9, -25.5, 22.4, 0.3)
pt3dadd(-69.7, -25.8, 22.7, 0.3)
pt3dadd(-70.59, -26.7, 23.3, 0.3)
pt3dadd(-71.5, -27, 23.7, 0.3)
pt3dadd(-72.4, -27.4, 24.1, 0.3)
pt3dadd(-73.5, -27.8, 24.6, 0.3)
pt3dadd(-75, -28.1, 25.2, 0.3)
pt3dadd(-76.7, -27.9, 26, 0.3)
pt3dadd(-77.5, -27.6, 26.3, 0.3)
pt3dadd(-78.5, -27.6, 26.7, 0.3)
pt3dadd(-81.9, -27.9, 28.2, 0.3)
pt3dadd(-82.8, -27.9, 28.5, 0.3)
pt3dadd(-85.9, -27.6, 29.9, 0.3)
pt3dadd(-87.2, -27.2, 30.5, 0.3)
pt3dadd(-88.5, -26.9, 31, 0.3)
pt3dadd(-89.8, -26.7, 31.6, 0.3)
pt3dadd(-91, -26.7, 32.1, 0.3)
pt3dadd(-93.2, -26.4, 33.1, 0.3)
pt3dadd(-95.1, -25.9, 33.9, 0.3)
pt3dadd(-96.2, -25.9, 34.4, 0.3)
pt3dadd(-98.9, -25.7, 35.6, 0.3)
pt3dadd(-100, -25.7, 36.1, 0.3)
pt3dadd(-100.8, -25.3, 36.5, 0.3)
pt3dadd(-101.4, -24.6, 36.9, 0.3)
pt3dadd(-101.8, -23.9, 37.2, 0.3)
pt3dadd(-102.9, -22.6, 38, 0.3)
pt3dadd(-103.8, -21.8, 38.5, 0.3)
pt3dadd(-106.3, -20, 39.9, 0.3)
pt3dadd(-109.5, -17.89, 41.6, 0.3)
pt3dadd(-111.6, -16.8, 42.7, 0.3)
pt3dadd(-112.4, -16.3, 43.2, 0.3)
pt3dadd(-113.3, -15.4, 43.7, 0.3)
pt3dadd(-114.3, -14.4, 44.4, 0.3)
pt3dadd(-114.7, -13.7, 44.8, 0.3)
pt3dadd(-114.7, -12.9, 45.1, 0.3)
pt3dadd(-115.3, -11.4, 45.9, 0.3)
pt3dadd(-115.9, -10.9, 46.2, 0.3)
pt3dadd(-116.3, -10.4, 46.6, 0.3)
pt3dadd(-116.6, -9.8, 46.9, 0.3)
pt3dadd(-116.9, -9, 47.3, 0.3)
pt3dadd(-116.9, -8.1, 47.7, 0.3)
pt3dadd(-117.2, -5.8, 48.8, 0.3)
pt3dadd(-117.7, -4.5, 49.5, 0.3)
pt3dadd(-118, -3.5, 50, 0.3)
pt3dadd(-118.5, -2.9, 50.3, 0.3)
pt3dadd(-119.1, -2.7, 50.7, 0.3)
pt3dadd(-120.4, -2.7, 51.3, 0.3)
pt3dadd(-121.7, -2.4, 51.9, 0.3)
pt3dadd(-122.8, -2.4, 52.5, 0.3)
pt3dadd(-123.9, -2.1, 53.1, 0.3)
pt3dadd(-125, -1.8, 53.6, 0.3)
pt3dadd(-125.7, -1, 54.2, 0.3)
pt3dadd(-126.4, -0.4, 54.6, 0.3)
pt3dadd(-128.3, 1.1, 55.8, 0.3)
pt3dadd(-128.9, 1.3, 56.2, 0.3)
pt3dadd(-129.6, 1.3, 56.5, 0.3)
pt3dadd(-130.4, 1.5, 56.9, 0.3)
pt3dadd(-132, 1.8, 57.8, 0.3)
pt3dadd(-132.6, 2, 58.1, 0.3)
pt3dadd(-133.5, 2, 58.5, 0.3)
pt3dadd(-134.9, 2.29, 59.3, 0.3)
pt3dadd(-135.69, 2.29, 59.7, 0.3)
pt3dadd(-136.5, 2.5, 60.1, 0.3)
pt3dadd(-137.19, 2.8, 60.6, 0.3)
pt3dadd(-138.1, 3.6, 61.2, 0.18)
pt3dadd(-137.69, 4, 61.5, 0.18)
pt3dadd(-138.5, 4, 62, 0.18)
pt3dadd(-140.1, 4.3, 62.8, 0.18)
pt3dadd(-140.9, 4.9, 63.4, 0.18)
pt3dadd(-141.4, 5.5, 63.8, 0.18)
pt3dadd(-142.1, 6.3, 64.4, 0.18)
pt3dadd(-142.6, 6.9, 64.8, 0.18)
pt3dadd(-143.9, 7.1, 65.5, 0.18)
pt3dadd(-144.6, 7.1, 65.9, 0.18)
pt3dadd(-145.19, 7.3, 66.3, 0.18)
pt3dadd(-147.6, 8.6, 67.7, 0.18)
pt3dadd(-148.1, 9, 68.09, 0.18)
pt3dadd(-148.8, 9.5, 68.59, 0.18)
pt3dadd(-149.5, 10, 69.09, 0.18)
pt3dadd(-150.19, 10.4, 69.5, 0.18)
pt3dadd(-152.1, 11.5, 70.8, 0.18)
pt3dadd(-152.6, 12, 71.2, 0.18)
pt3dadd(-153.1, 12.5, 71.59, 0.18)
pt3dadd(-153.5, 13, 72, 0.18)
}
dend[29] {pt3dclear()
pt3dadd(-59.3, -23.1, 18, 0.3)
pt3dadd(-59.6, -24, 17.5, 0.3)
pt3dadd(-60.2, -24.8, 17, 0.3)
pt3dadd(-60.2, -25.6, 16.6, 0.3)
pt3dadd(-60.5, -26.3, 16.2, 0.3)
pt3dadd(-60.5, -27.1, 15.8, 0.3)
pt3dadd(-61.5, -28.4, 14.9, 0.3)
pt3dadd(-62, -29.6, 14.2, 0.3)
pt3dadd(-62.7, -31, 13.3, 0.3)
pt3dadd(-63.8, -32.9, 12, 0.3)
pt3dadd(-65, -34.79, 10.5, 0.3)
pt3dadd(-65.9, -36.6, 9.3, 0.3)
pt3dadd(-66.3, -37.7, 8.5, 0.3)
pt3dadd(-66.3, -38.5, 8, 0.3)
pt3dadd(-66.59, -39.2, 7.4, 0.3)
pt3dadd(-66.9, -40.2, 6.7, 0.3)
pt3dadd(-67.3, -41.3, 5.9, 0.3)
pt3dadd(-67.7, -42.2, 5.2, 0.3)
pt3dadd(-68.09, -43.3, 4.4, 0.3)
pt3dadd(-68.7, -44.3, 3.5, 0.3)
pt3dadd(-69.3, -45.2, 2.7, 0.3)
pt3dadd(-70, -46, 1.9, 0.3)
pt3dadd(-70.3, -46.8, 1.3, 0.3)
pt3dadd(-71.09, -48.6, -0.09, 0.3)
pt3dadd(-71.09, -49.5, -0.9, 0.3)
pt3dadd(-71.4, -52.1, -2.8, 0.3)
pt3dadd(-72.4, -52.6, -3.7, 0.3)
pt3dadd(-73.09, -53.3, -4.5, 0.3)
pt3dadd(-74, -54.3, -5.5, 0.3)
pt3dadd(-76, -56.9, -8.1, 0.3)
pt3dadd(-76.7, -58.3, -9.3, 0.3)
pt3dadd(-77.3, -59.4, -10.4, 0.3)
pt3dadd(-78, -60.3, -11.3, 0.3)
pt3dadd(-78.7, -61.2, -12.2, 0.3)
pt3dadd(-79.59, -61.9, -13.1, 0.3)
pt3dadd(-79.9, -62.5, -13.7, 0.3)
pt3dadd(-80.2, -64.09, -14.9, 0.3)
pt3dadd(-80.7, -65, -15.8, 0.3)
pt3dadd(-81.09, -66, -16.6, 0.3)
}
}
proc shape3d_9() {
dend[29] { pt3dadd(-81.7, -68.59, -18.8, 0.3)
pt3dadd(-81.5, -71.7, -21.3, 0.3)
pt3dadd(-81.2, -72.4, -21.9, 0.3)
pt3dadd(-81.2, -73.09, -22.4, 0.3)
pt3dadd(-81.7, -76, -24.7, 0.3)
pt3dadd(-82.4, -77.5, -26, 0.3)
pt3dadd(-83, -79.5, -27.7, 0.3)
pt3dadd(-83.8, -83, -30.4, 0.3)
pt3dadd(-84.9, -85.7, -32.6, 0.3)
pt3dadd(-85.7, -87.3, -33.9, 0.3)
pt3dadd(-86, -89.2, -35.2, 0.3)
pt3dadd(-86.4, -91.1, -36.6, 0.3)
pt3dadd(-86.4, -92.9, -37.79, 0.3)
pt3dadd(-86.4, -96, -39.79, 0.3)
pt3dadd(-86.8, -97.7, -40.9, 0.3)
pt3dadd(-87.8, -99.4, -42.1, 0.3)
pt3dadd(-88.5, -101, -43.2, 0.3)
pt3dadd(-88.8, -102.9, -44.3, 0.3)
pt3dadd(-88.8, -104.3, -45, 0.3)
pt3dadd(-89.1, -107, -46.5, 0.3)
pt3dadd(-89.5, -108.1, -47.1, 0.3)
pt3dadd(-90.3, -109.3, -47.9, 0.3)
pt3dadd(-91.1, -110.5, -48.6, 0.3)
pt3dadd(-92.6, -113.4, -50.4, 0.3)
pt3dadd(-93.6, -116.9, -52.4, 0.3)
pt3dadd(-93.6, -118.5, -53.3, 0.3)
pt3dadd(-93.9, -120.8, -54.5, 0.3)
pt3dadd(-94.5, -121.7, -55.1, 0.3)
pt3dadd(-95.8, -124.8, -56.9, 0.3)
pt3dadd(-96.4, -127.3, -58.3, 0.3)
pt3dadd(-96.4, -129.19, -59.3, 0.3)
pt3dadd(-96.7, -130.9, -60.2, 0.3)
pt3dadd(-96.7, -132.6, -61.1, 0.3)
pt3dadd(-97, -135.69, -62.7, 0.3)
pt3dadd(-97.8, -137.5, -63.7, 0.3)
pt3dadd(-99.2, -141, -65.59, 0.3)
pt3dadd(-99.6, -142.19, -66.2, 0.3)
pt3dadd(-99.6, -143.3, -66.8, 0.3)
pt3dadd(-99.3, -144.4, -67.3, 0.3)
pt3dadd(-98.7, -148, -69, 0.3)
pt3dadd(-98.7, -151.1, -70.5, 0.3)
pt3dadd(-98.4, -152.5, -71.2, 0.3)
pt3dadd(-97.7, -153.69, -71.8, 0.3)
pt3dadd(-96.6, -154.9, -72.5, 0.3)
pt3dadd(-95.4, -156, -73.2, 0.3)
pt3dadd(-94.6, -156.9, -73.7, 0.3)
pt3dadd(-93.9, -158.5, -74.4, 0.3)
pt3dadd(-93.9, -159.9, -75, 0.3)
pt3dadd(-93.6, -161.5, -75.59, 0.3)
pt3dadd(-92.9, -162.8, -76.2, 0.3)
pt3dadd(-92.1, -163.69, -76.7, 0.3)
pt3dadd(-91.3, -164.4, -77.2, 0.3)
pt3dadd(-89.8, -165.6, -78, 0.3)
pt3dadd(-89.1, -166.3, -78.4, 0.3)
pt3dadd(-88.8, -167.1, -78.7, 0.3)
pt3dadd(-88.3, -167.4, -78.9, 0.3)
pt3dadd(-86.8, -168.1, -79.59, 0.3)
pt3dadd(-86.2, -168.8, -80, 0.3)
pt3dadd(-86.2, -169.5, -80.3, 0.3)
pt3dadd(-86.5, -170.2, -80.59, 0.3)
pt3dadd(-86.5, -170.9, -80.9, 0.3)
pt3dadd(-86.1, -171.7, -81.2, 0.3)
pt3dadd(-85.6, -172.3, -81.59, 0.3)
pt3dadd(-84.9, -173, -81.9, 0.3)
pt3dadd(-82.7, -175.5, -83.3, 0.3)
pt3dadd(-82.4, -176.5, -83.7, 0.3)
pt3dadd(-82.4, -177.4, -84.1, 0.3)
pt3dadd(-82.8, -178.1, -84.4, 0.3)
pt3dadd(-82.8, -178.7, -84.7, 0.3)
pt3dadd(-82.5, -180.8, -85.5, 0.3)
pt3dadd(-82.5, -181.5, -85.8, 0.3)
pt3dadd(-82.5, -184.9, -87.2, 0.18)
pt3dadd(-83.3, -187, -88.1, 0.18)
pt3dadd(-83.6, -188, -88.5, 0.18)
pt3dadd(-83.6, -188.7, -88.8, 0.18)
pt3dadd(-84.1, -189.4, -89.2, 0.18)
pt3dadd(-84.4, -190.4, -89.6, 0.18)
}
dend[30] {pt3dclear()
pt3dstyle(1, 10, 0, 30)
pt3dadd(-0.9, 0.09, 30.1, 0.7)
pt3dadd(-1.8, 0.09, 30.2, 0.7)
pt3dadd(-2.8, -0.2, 30.3, 0.7)
pt3dadd(-4.8, -0.9, 30.5, 0.7)
pt3dadd(-5.6, -1.4, 30.5, 0.7)
pt3dadd(-6.3, -2.2, 30.6, 0.7)
pt3dadd(-6.6, -3.1, 30.6, 0.7)
pt3dadd(-7.1, -3.9, 30.6, 0.7)
pt3dadd(-7.5, -4.7, 30.7, 0.7)
pt3dadd(-7.5, -5.3, 30.7, 0.7)
pt3dadd(-8.19, -5.6, 30.7, 0.7)
pt3dadd(-8.1, -5.8, 30.7, 0.7)
pt3dadd(-7.5, -6.1, 30.7, 0.7)
pt3dadd(-7.5, -6.9, 30.6, 0.7)
pt3dadd(-8.1, -8.4, 30.6, 0.7)
pt3dadd(-8.8, -9.1, 30.5, 0.7)
pt3dadd(-9.1, -9.8, 30.5, 0.7)
pt3dadd(-10.1, -10.1, 30.4, 0.7)
pt3dadd(-10.8, -10.5, 30.4, 0.7)
pt3dadd(-12, -10.8, 30.3, 0.7)
pt3dadd(-12.6, -11.1, 30.2, 0.7)
pt3dadd(-13.5, -11.5, 30.1, 0.7)
pt3dadd(-14, -12.5, 30, 0.7)
}
dend[31] {pt3dclear()
pt3dadd(-14, -12.5, 30, 0.7)
pt3dadd(-14.5, -13.1, 29.7, 0.7)
pt3dadd(-14.5, -13.8, 29.4, 0.7)
pt3dadd(-14.9, -14.5, 29, 0.7)
pt3dadd(-15.2, -15.1, 28.5, 0.7)
pt3dadd(-15.8, -15.8, 27.8, 0.7)
pt3dadd(-16.5, -16.8, 26.9, 0.7)
pt3dadd(-17.2, -17.5, 26.2, 0.7)
pt3dadd(-17.5, -18.1, 25.6, 0.7)
pt3dadd(-18.1, -18.39, 25.2, 0.7)
pt3dadd(-18.39, -19, 24.8, 0.7)
pt3dadd(-19.3, -19.89, 24.2, 0.7)
pt3dadd(-19.6, -20.6, 24, 0.7)
}
dend[32] {pt3dclear()
pt3dadd(-19.6, -20.6, 24, 0.7)
pt3dadd(-20.6, -20.1, 24, 0.7)
pt3dadd(-21.5, -20.1, 24.2, 0.7)
pt3dadd(-22, -19.89, 24.6, 0.7)
pt3dadd(-23, -19.89, 25.2, 0.7)
pt3dadd(-23.6, -20.1, 25.8, 0.7)
pt3dadd(-24.4, -20.1, 26.5, 0.7)
pt3dadd(-25.2, -20.39, 27.3, 0.7)
pt3dadd(-25.8, -20.7, 27.9, 0.7)
pt3dadd(-26.5, -20.7, 28.5, 0.7)
pt3dadd(-29.2, -20.7, 29.9, 0.7)
pt3dadd(-29.9, -20.9, 30, 0.3)
}
dend[33] {pt3dclear()
pt3dadd(-29.9, -20.9, 30, 0.3)
pt3dadd(-30.8, -20.3, 29.8, 0.3)
pt3dadd(-32.1, -20, 29.6, 0.3)
pt3dadd(-32.79, -19.7, 29.5, 0.3)
pt3dadd(-33.4, -19.7, 29.3, 0.3)
pt3dadd(-35.6, -20.1, 28.8, 0.3)
pt3dadd(-36.5, -20.1, 28.6, 0.3)
pt3dadd(-38.79, -19.8, 27.9, 0.3)
pt3dadd(-39.5, -19.8, 27.6, 0.3)
pt3dadd(-40.29, -19.5, 27.3, 0.3)
pt3dadd(-41.1, -19.5, 27, 0.3)
pt3dadd(-42.2, -19.2, 26.6, 0.3)
pt3dadd(-43.4, -19.2, 26.1, 0.3)
pt3dadd(-44.5, -19.6, 25.6, 0.3)
pt3dadd(-45.3, -20, 25.1, 0.3)
pt3dadd(-46, -20, 24.8, 0.3)
pt3dadd(-48.1, -19.7, 23.7, 0.3)
pt3dadd(-50.2, -19.39, 22.6, 0.3)
pt3dadd(-52.5, -19.7, 21.2, 0.3)
pt3dadd(-55.1, -20, 19.6, 0.3)
pt3dadd(-56.1, -20.3, 18.8, 0.3)
pt3dadd(-57, -20.3, 18.2, 0.3)
pt3dadd(-58, -20, 17.5, 0.3)
pt3dadd(-58.7, -19.7, 16.89, 0.3)
pt3dadd(-60.6, -19.3, 15.5, 0.3)
pt3dadd(-61.7, -19.1, 14.6, 0.3)
pt3dadd(-62.7, -19.1, 13.8, 0.3)
pt3dadd(-65.8, -19.1, 11.2, 0.3)
pt3dadd(-67.59, -19.39, 9.5, 0.3)
pt3dadd(-69.5, -19.7, 7.8, 0.3)
pt3dadd(-70.5, -19.39, 6.8, 0.3)
pt3dadd(-71.5, -19.2, 5.8, 0.3)
pt3dadd(-72.4, -18.8, 4.8, 0.3)
pt3dadd(-74.4, -18.1, 2.7, 0.3)
pt3dadd(-77.2, -17.5, -0.3, 0.3)
pt3dadd(-77.8, -18.2, -1.3, 0.3)
pt3dadd(-78.5, -18.2, -2, 0.3)
pt3dadd(-79.5, -17.89, -3.2, 0.3)
pt3dadd(-81.7, -17.1, -6, 0.3)
pt3dadd(-82.6, -16.8, -7.1, 0.3)
pt3dadd(-83.3, -16.2, -8.1, 0.3)
pt3dadd(-84.1, -16.2, -9.1, 0.3)
pt3dadd(-86.5, -15.9, -12.1, 0.3)
pt3dadd(-87.3, -15.7, -13.2, 0.3)
pt3dadd(-87.9, -15.3, -14.1, 0.3)
pt3dadd(-88.2, -14.8, -14.9, 0.3)
pt3dadd(-88.9, -14.2, -16.1, 0.3)
pt3dadd(-90.3, -13.4, -18.2, 0.3)
pt3dadd(-92.2, -12.7, -20.9, 0.3)
pt3dadd(-93.3, -12.7, -22.4, 0.3)
pt3dadd(-94.5, -12.4, -24.1, 0.3)
pt3dadd(-95.3, -12, -25.5, 0.3)
pt3dadd(-97.2, -11.3, -28.3, 0.3)
pt3dadd(-98, -11, -29.5, 0.3)
pt3dadd(-98.7, -10.7, -30.7, 0.3)
pt3dadd(-99.5, -10.7, -31.9, 0.3)
pt3dadd(-100.4, -10.4, -33.29, 0.3)
pt3dadd(-101.3, -10.4, -34.7, 0.3)
pt3dadd(-102.2, -10.19, -36, 0.3)
pt3dadd(-103.1, -10.19, -37.4, 0.3)
pt3dadd(-106.3, -10.6, -42.4, 0.3)
pt3dadd(-107, -10.9, -43.7, 0.3)
pt3dadd(-108.7, -11.4, -46.6, 0.3)
pt3dadd(-109.8, -11.4, -48.4, 0.3)
pt3dadd(-112.3, -11.1, -52.6, 0.3)
pt3dadd(-112.9, -10.7, -53.8, 0.3)
pt3dadd(-114, -9.69, -56.3, 0.3)
pt3dadd(-114.7, -9, -58, 0.3)
pt3dadd(-115.1, -8.19, -59.6, 0.3)
pt3dadd(-115.4, -7.6, -60.8, 0.3)
pt3dadd(-116.6, -6.4, -63.8, 0.3)
pt3dadd(-117.8, -6.2, -65.9, 0.3)
pt3dadd(-119.6, -5.9, -69.2, 0.3)
pt3dadd(-120.5, -5.6, -71, 0.3)
}
}
proc shape3d_10() {
dend[33] { pt3dadd(-122, -5.3, -73.8, 0.3)
pt3dadd(-125.2, -5.3, -79.7, 0.3)
pt3dadd(-128, -5.09, -85.1, 0.3)
pt3dadd(-128.9, -4.8, -86.9, 0.3)
pt3dadd(-129.69, -4.4, -88.7, 0.3)
pt3dadd(-131.69, -3.5, -93, 0.3)
pt3dadd(-133.5, -2.5, -97.2, 0.3)
pt3dadd(-134, -2.1, -98.5, 0.3)
pt3dadd(-134.5, -1.5, -99.9, 0.3)
pt3dadd(-134.8, -0.9, -101.4, 0.3)
pt3dadd(-135.19, -0.2, -102.9, 0.3)
pt3dadd(-135.19, 0.4, -104.2, 0.3)
pt3dadd(-135.5, 0.9, -105.5, 0.3)
pt3dadd(-136.1, 2, -108, 0.3)
}
dend[34] {pt3dclear()
pt3dadd(-29.9, -20.9, 30, 0.3)
pt3dadd(-30.8, -21.2, 30, 0.3)
pt3dadd(-31.5, -21.9, 30, 0.3)
pt3dadd(-32.5, -22.2, 30, 0.3)
pt3dadd(-33.1, -22.2, 30, 0.3)
pt3dadd(-33.79, -22.5, 30, 0.3)
pt3dadd(-34.7, -22.5, 30, 0.3)
pt3dadd(-37.7, -22.5, 29.9, 0.3)
pt3dadd(-38.29, -22.3, 29.9, 0.3)
pt3dadd(-39.1, -22.3, 29.9, 0.3)
pt3dadd(-40, -22, 29.9, 0.3)
pt3dadd(-40.9, -22, 29.8, 0.3)
pt3dadd(-41.8, -21.8, 29.8, 0.3)
pt3dadd(-43.1, -21.8, 29.7, 0.3)
pt3dadd(-44.3, -22.2, 29.6, 0.3)
pt3dadd(-45.6, -22.5, 29.5, 0.3)
pt3dadd(-46.6, -22.8, 29.4, 0.3)
pt3dadd(-47.3, -22.8, 29.3, 0.3)
pt3dadd(-48.1, -23.1, 29.2, 0.3)
pt3dadd(-49.1, -23.1, 29.1, 0.3)
pt3dadd(-49.9, -22.8, 29, 0.3)
pt3dadd(-50.7, -22.8, 28.9, 0.3)
pt3dadd(-53.7, -22.8, 28.6, 0.3)
pt3dadd(-54.5, -22.6, 28.4, 0.3)
pt3dadd(-55.2, -22.6, 28.3, 0.3)
pt3dadd(-55.9, -22.3, 28.2, 0.3)
pt3dadd(-56.5, -22.6, 28.1, 0.3)
pt3dadd(-57.1, -22.6, 28, 0.3)
pt3dadd(-59.1, -22.9, 27.7, 0.3)
pt3dadd(-59.8, -22.9, 27.6, 0.3)
pt3dadd(-63.2, -22.9, 26.9, 0.3)
pt3dadd(-64.5, -23.2, 26.6, 0.3)
pt3dadd(-65.59, -23.5, 26.4, 0.3)
pt3dadd(-66.4, -23.8, 26.2, 0.3)
pt3dadd(-67.2, -23.8, 26, 0.3)
pt3dadd(-70.4, -23.6, 25.2, 0.3)
pt3dadd(-71.5, -23.2, 25, 0.3)
pt3dadd(-72.7, -22.9, 24.6, 0.3)
pt3dadd(-74.3, -22.9, 24.2, 0.3)
pt3dadd(-78.2, -22.9, 23.1, 0.3)
pt3dadd(-80.59, -23.2, 22.3, 0.3)
pt3dadd(-81.3, -23.2, 22.1, 0.3)
pt3dadd(-82, -23.5, 21.8, 0.3)
pt3dadd(-82.6, -23.8, 21.6, 0.3)
pt3dadd(-83.3, -24.1, 21.3, 0.3)
pt3dadd(-84.2, -24.4, 21, 0.3)
pt3dadd(-84.9, -24.4, 20.8, 0.3)
pt3dadd(-85.6, -24.8, 20.5, 0.3)
pt3dadd(-86.9, -25.4, 19.89, 0.3)
pt3dadd(-87.6, -25.4, 19.7, 0.3)
pt3dadd(-89.9, -25.8, 18.8, 0.3)
pt3dadd(-90.5, -26.1, 18.5, 0.3)
pt3dadd(-92.4, -27.1, 17.7, 0.3)
pt3dadd(-94, -28.3, 16.8, 0.3)
pt3dadd(-94.8, -28.6, 16.5, 0.3)
pt3dadd(-95.6, -29, 16.1, 0.3)
pt3dadd(-96.5, -29, 15.7, 0.3)
pt3dadd(-100, -29.3, 14.1, 0.3)
pt3dadd(-100.9, -29.3, 13.7, 0.3)
pt3dadd(-101.6, -29.6, 13.3, 0.3)
pt3dadd(-103.6, -30.3, 12.3, 0.3)
pt3dadd(-104.5, -30.6, 11.8, 0.3)
pt3dadd(-105.2, -30.6, 11.5, 0.3)
pt3dadd(-106.1, -30.9, 11, 0.3)
pt3dadd(-107, -31.1, 10.6, 0.3)
pt3dadd(-107.6, -31.4, 10.19, 0.3)
pt3dadd(-108.3, -31.7, 9.8, 0.3)
pt3dadd(-108.9, -32.1, 9.4, 0.3)
pt3dadd(-111.1, -33.4, 8, 0.3)
pt3dadd(-111.7, -33.79, 7.6, 0.3)
pt3dadd(-112.8, -34.1, 7, 0.3)
pt3dadd(-113.5, -34.4, 6.6, 0.3)
pt3dadd(-114.3, -34.4, 6.1, 0.3)
pt3dadd(-116.1, -34.7, 5, 0.3)
pt3dadd(-116.7, -35, 4.59, 0.3)
pt3dadd(-118.3, -35.4, 3.7, 0.3)
pt3dadd(-119.1, -35.7, 3.2, 0.3)
pt3dadd(-119.9, -35.7, 2.7, 0.3)
pt3dadd(-123.3, -35.7, 0.5, 0.3)
pt3dadd(-125.3, -36.5, -0.9, 0.3)
pt3dadd(-126.2, -36.5, -1.5, 0.3)
pt3dadd(-128.4, -36.29, -3, 0.3)
pt3dadd(-129.19, -36.29, -3.5, 0.3)
pt3dadd(-132.1, -36.6, -5.5, 0.3)
pt3dadd(-134.6, -37.29, -7.4, 0.3)
pt3dadd(-138.3, -37.6, -10.1, 0.3)
pt3dadd(-139.69, -38.6, -11.5, 0.3)
pt3dadd(-140.4, -39.2, -12.2, 0.3)
pt3dadd(-141.6, -39.2, -13.1, 0.3)
pt3dadd(-142.3, -39, -13.7, 0.3)
pt3dadd(-143.1, -38.79, -14.3, 0.3)
pt3dadd(-143.9, -38.79, -15, 0.3)
pt3dadd(-144.5, -38.5, -15.5, 0.3)
pt3dadd(-145.8, -38.5, -16.5, 0.3)
pt3dadd(-148.19, -38.7, -18.5, 0.18)
pt3dadd(-149, -38.7, -19.2, 0.18)
pt3dadd(-151.4, -38.4, -21.2, 0.18)
pt3dadd(-152.19, -37.79, -22.1, 0.18)
pt3dadd(-152.8, -37.79, -22.6, 0.18)
pt3dadd(-155.9, -37.6, -25.3, 0.18)
pt3dadd(-157.5, -37.1, -26.8, 0.18)
pt3dadd(-157.9, -36.6, -27.4, 0.18)
pt3dadd(-158.19, -36, -28, 0.18)
pt3dadd(-158.9, -34.9, -29.2, 0.18)
pt3dadd(-159.9, -34.6, -30.2, 0.18)
pt3dadd(-161.4, -34.1, -31.7, 0.18)
pt3dadd(-162, -34.1, -32.2, 0.18)
pt3dadd(-164.2, -34.4, -34.29, 0.18)
pt3dadd(-165, -34.4, -35.1, 0.18)
pt3dadd(-165.9, -34.4, -36, 0.18)
}
dend[35] {pt3dclear()
pt3dadd(-19.6, -20.6, 24, 0.7)
pt3dadd(-20, -21.1, 23.9, 0.7)
pt3dadd(-20.6, -22.3, 23.7, 0.7)
pt3dadd(-21.2, -23.1, 23.6, 0.7)
pt3dadd(-21.8, -23.8, 23.5, 0.7)
pt3dadd(-22.6, -24.2, 23.5, 0.7)
pt3dadd(-23.5, -24.9, 23.4, 0.7)
pt3dadd(-24.1, -25.3, 23.4, 0.7)
pt3dadd(-24.8, -26, 23.5, 0.7)
pt3dadd(-25.4, -26.3, 23.5, 0.7)
pt3dadd(-27.1, -27.1, 23.6, 0.7)
pt3dadd(-28, -27.9, 23.7, 0.7)
pt3dadd(-29, -29.2, 23.8, 0.7)
pt3dadd(-29.6, -29.6, 23.8, 0.7)
pt3dadd(-30, -30.3, 23.9, 0.7)
pt3dadd(-30.6, -30.6, 23.9, 0.7)
pt3dadd(-31.2, -31.7, 24, 0.3)
pt3dadd(-31.5, -32.4, 24, 0.3)
pt3dadd(-31.9, -32.9, 24, 0.3)
}
dend[36] {pt3dclear()
pt3dadd(-31.9, -32.9, 24, 0.3)
pt3dadd(-32.2, -33.4, 23.9, 0.3)
pt3dadd(-33, -33.4, 23.8, 0.3)
pt3dadd(-33.4, -34, 23.6, 0.3)
pt3dadd(-34.1, -34.4, 23.4, 0.3)
pt3dadd(-34.79, -35.1, 23.3, 0.3)
pt3dadd(-35.2, -35.79, 23.1, 0.3)
pt3dadd(-35.6, -36.29, 23, 0.3)
pt3dadd(-36.9, -37.6, 22.6, 0.3)
pt3dadd(-38.29, -38.29, 22.3, 0.3)
pt3dadd(-39.5, -38.29, 22, 0.3)
pt3dadd(-40.2, -38.6, 21.8, 0.3)
pt3dadd(-40.9, -38.6, 21.7, 0.3)
pt3dadd(-41.7, -39.4, 21.4, 0.3)
pt3dadd(-43, -40.79, 20.9, 0.3)
pt3dadd(-43.5, -41.3, 20.7, 0.3)
pt3dadd(-44.4, -41.9, 20.39, 0.3)
pt3dadd(-45.6, -42.9, 20, 0.3)
pt3dadd(-46, -43.5, 19.8, 0.3)
pt3dadd(-47.1, -45.5, 19, 0.3)
pt3dadd(-47.7, -46.2, 18.7, 0.3)
pt3dadd(-48.6, -47, 18.3, 0.3)
pt3dadd(-49.2, -47.5, 18, 0.3)
}
dend[37] {pt3dclear()
pt3dadd(-49.2, -47.5, 18, 0.3)
pt3dadd(-50.4, -47.6, 17.5, 0.3)
pt3dadd(-51, -47.6, 17.3, 0.3)
pt3dadd(-53.4, -47.9, 16.39, 0.3)
pt3dadd(-54.6, -48.2, 15.9, 0.3)
pt3dadd(-55.2, -48.6, 15.6, 0.3)
pt3dadd(-56.4, -49.4, 15, 0.3)
pt3dadd(-58.3, -50.4, 14.2, 0.3)
pt3dadd(-60.6, -50.7, 13.2, 0.3)
pt3dadd(-62.3, -50.5, 12.5, 0.3)
pt3dadd(-64.59, -50.3, 11.5, 0.3)
pt3dadd(-66.59, -50.7, 10.7, 0.3)
pt3dadd(-69.4, -51.8, 9.4, 0.3)
pt3dadd(-70.7, -52.1, 8.8, 0.3)
pt3dadd(-74.09, -52.9, 7.3, 0.3)
pt3dadd(-75.3, -53.3, 6.8, 0.3)
pt3dadd(-76, -53.3, 6.4, 0.3)
pt3dadd(-76.7, -53.6, 6.1, 0.3)
pt3dadd(-77.59, -53.9, 5.6, 0.3)
pt3dadd(-78.3, -54.3, 5.3, 0.3)
pt3dadd(-80, -55.1, 4.4, 0.3)
pt3dadd(-82.5, -55.7, 3.3, 0.3)
pt3dadd(-85.5, -56, 1.8, 0.3)
pt3dadd(-86.8, -56.3, 1.2, 0.3)
pt3dadd(-87.8, -56.7, 0.7, 0.3)
pt3dadd(-88.8, -57.2, 0.2, 0.3)
pt3dadd(-90, -57.9, -0.5, 0.3)
pt3dadd(-91.4, -58.2, -1.2, 0.3)
pt3dadd(-92.7, -58.7, -1.9, 0.3)
pt3dadd(-94, -59, -2.5, 0.3)
pt3dadd(-95.2, -59, -3.1, 0.3)
pt3dadd(-97.3, -58.7, -4.2, 0.3)
pt3dadd(-98.2, -58.7, -4.59, 0.3)
pt3dadd(-100.6, -59, -5.8, 0.3)
}
}
proc shape3d_11() {
dend[37] { pt3dadd(-101.3, -58.8, -6.2, 0.3)
pt3dadd(-102.8, -58.5, -6.9, 0.3)
pt3dadd(-105.8, -58.3, -8.5, 0.3)
pt3dadd(-106.7, -58.3, -9, 0.3)
pt3dadd(-108, -58.1, -9.69, 0.3)
pt3dadd(-109.3, -58.1, -10.3, 0.3)
pt3dadd(-112, -58.5, -11.8, 0.3)
pt3dadd(-112.8, -58.5, -12.2, 0.3)
pt3dadd(-116.2, -58.5, -14.1, 0.3)
pt3dadd(-117, -58.9, -14.6, 0.3)
pt3dadd(-118.1, -59.7, -15.3, 0.3)
pt3dadd(-119.2, -60.3, -16, 0.3)
pt3dadd(-120.4, -60.9, -16.7, 0.3)
pt3dadd(-121.6, -61.3, -17.39, 0.3)
pt3dadd(-122.7, -61.7, -18.1, 0.3)
pt3dadd(-125, -62.3, -19.39, 0.3)
pt3dadd(-126.1, -62.3, -20, 0.3)
pt3dadd(-129.69, -62.6, -22.1, 0.3)
pt3dadd(-132.3, -63.8, -23.7, 0.3)
pt3dadd(-134.8, -65.5, -25.5, 0.3)
pt3dadd(-135.5, -65.7, -25.9, 0.3)
pt3dadd(-136.69, -66.4, -26.8, 0.3)
pt3dadd(-138.3, -67.4, -27.9, 0.18)
pt3dadd(-139.1, -68.09, -28.5, 0.18)
pt3dadd(-140, -68.5, -29.1, 0.18)
pt3dadd(-141.9, -69.4, -30.4, 0.18)
pt3dadd(-142.8, -69.7, -31, 0.18)
pt3dadd(-143.6, -69.7, -31.5, 0.18)
pt3dadd(-144.8, -69.5, -32.2, 0.18)
pt3dadd(-145.6, -69.5, -32.7, 0.18)
pt3dadd(-148.1, -69.9, -34.29, 0.18)
pt3dadd(-149.69, -71.09, -35.5, 0.18)
pt3dadd(-150.3, -71.4, -36, 0.18)
pt3dadd(-150.9, -71.4, -36.29, 0.18)
pt3dadd(-154, -71.2, -38.29, 0.18)
pt3dadd(-155.1, -70.9, -39, 0.18)
pt3dadd(-157, -70.9, -40.2, 0.18)
pt3dadd(-158.3, -71.2, -41.1, 0.18)
pt3dadd(-159.69, -71.59, -42, 0.18)
}
dend[38] {pt3dclear()
pt3dadd(-49.2, -47.5, 18, 0.3)
pt3dadd(-49.2, -48.1, 17.8, 0.3)
pt3dadd(-49.5, -49.3, 17.3, 0.3)
pt3dadd(-50, -49.7, 17.1, 0.3)
pt3dadd(-50.4, -50.3, 16.8, 0.3)
pt3dadd(-50.8, -51, 16.5, 0.3)
pt3dadd(-50.8, -51.7, 16.3, 0.3)
pt3dadd(-50.8, -55.2, 15, 0.3)
pt3dadd(-50.3, -55.6, 14.7, 0.3)
pt3dadd(-49.8, -56, 14.5, 0.3)
pt3dadd(-49.1, -57.1, 14, 0.3)
pt3dadd(-48.9, -57.8, 13.7, 0.3)
pt3dadd(-48.7, -59, 13.3, 0.3)
pt3dadd(-48.4, -59.7, 13, 0.3)
pt3dadd(-48.4, -60.6, 12.6, 0.3)
pt3dadd(-49.2, -61.7, 12.1, 0.3)
pt3dadd(-49.8, -62.8, 11.7, 0.3)
pt3dadd(-50.4, -63.6, 11.3, 0.3)
pt3dadd(-50.9, -64, 11, 0.3)
pt3dadd(-51.3, -64.5, 10.8, 0.3)
pt3dadd(-51.7, -65.09, 10.5, 0.3)
pt3dadd(-52.4, -66.09, 10, 0.3)
pt3dadd(-52.4, -66.8, 9.69, 0.3)
pt3dadd(-52.7, -67.4, 9.5, 0.3)
pt3dadd(-53.2, -68.3, 9.1, 0.3)
pt3dadd(-53.5, -69, 8.8, 0.3)
pt3dadd(-53.8, -69.7, 8.5, 0.3)
pt3dadd(-54.3, -70.4, 8.1, 0.3)
pt3dadd(-55.1, -70.8, 7.8, 0.3)
pt3dadd(-55.5, -71.5, 7.5, 0.3)
pt3dadd(-56.2, -72.2, 7, 0.3)
pt3dadd(-57.3, -73.09, 6.5, 0.3)
pt3dadd(-57.9, -73.5, 6.2, 0.3)
pt3dadd(-58.2, -74.09, 5.9, 0.3)
pt3dadd(-58.6, -74.7, 5.6, 0.3)
pt3dadd(-59.2, -76, 5.09, 0.3)
pt3dadd(-59.2, -77.09, 4.59, 0.3)
pt3dadd(-59.6, -77.9, 4.2, 0.3)
pt3dadd(-59.6, -78.5, 4, 0.3)
pt3dadd(-59.9, -79.09, 3.7, 0.3)
pt3dadd(-60.6, -80, 3.2, 0.3)
pt3dadd(-61.1, -80.5, 3, 0.3)
pt3dadd(-61.7, -80.8, 2.7, 0.3)
pt3dadd(-62.2, -81.5, 2.29, 0.3)
pt3dadd(-62.9, -82, 1.9, 0.3)
pt3dadd(-63.7, -82.7, 1.5, 0.3)
pt3dadd(-66.09, -84.5, 0.2, 0.3)
pt3dadd(-66.8, -85.2, -0.2, 0.3)
pt3dadd(-67.5, -86.2, -0.7, 0.3)
pt3dadd(-67.8, -87.1, -1.1, 0.3)
pt3dadd(-68.2, -87.6, -1.4, 0.3)
pt3dadd(-69.59, -89.3, -2.29, 0.3)
pt3dadd(-70.7, -90.5, -3.1, 0.3)
pt3dadd(-70.7, -91.3, -3.4, 0.3)
pt3dadd(-71.09, -93.1, -4.2, 0.3)
pt3dadd(-71.8, -93.7, -4.59, 0.3)
pt3dadd(-72.4, -94, -4.9, 0.3)
pt3dadd(-75, -95.4, -6.3, 0.3)
pt3dadd(-75.5, -95.9, -6.6, 0.3)
pt3dadd(-75.9, -96.8, -7, 0.3)
pt3dadd(-76.2, -98.3, -7.7, 0.3)
pt3dadd(-76.59, -99, -8, 0.3)
pt3dadd(-77.2, -100.4, -8.69, 0.3)
pt3dadd(-77.2, -101, -9, 0.3)
pt3dadd(-77.5, -104.1, -10.4, 0.3)
pt3dadd(-77.8, -104.6, -10.7, 0.3)
pt3dadd(-78.2, -105.6, -11.2, 0.3)
pt3dadd(-78.59, -106.3, -11.6, 0.3)
pt3dadd(-78.9, -107, -11.9, 0.3)
pt3dadd(-79.5, -107.8, -12.4, 0.3)
pt3dadd(-80.5, -108.7, -13.1, 0.3)
pt3dadd(-81.09, -109.7, -13.7, 0.3)
pt3dadd(-81.8, -110.5, -14.1, 0.3)
pt3dadd(-82.4, -110.8, -14.5, 0.3)
pt3dadd(-83, -111.6, -15, 0.3)
pt3dadd(-83.4, -112.5, -15.4, 0.3)
pt3dadd(-83.4, -113.3, -15.8, 0.3)
pt3dadd(-83.7, -114, -16.2, 0.3)
pt3dadd(-84.7, -115.4, -17, 0.3)
pt3dadd(-85, -116.2, -17.39, 0.3)
pt3dadd(-85.3, -116.9, -17.8, 0.3)
pt3dadd(-85.3, -117.5, -18.1, 0.3)
pt3dadd(-85, -118.9, -18.7, 0.3)
pt3dadd(-84.7, -119.5, -19.1, 0.3)
pt3dadd(-84.3, -120.4, -19.6, 0.3)
pt3dadd(-84.3, -121.2, -20, 0.3)
pt3dadd(-84.6, -123.9, -21.3, 0.3)
pt3dadd(-84.9, -124.7, -21.8, 0.3)
pt3dadd(-84.9, -125.6, -22.2, 0.3)
pt3dadd(-84.7, -127.6, -23.2, 0.3)
pt3dadd(-84.7, -128.4, -23.6, 0.3)
pt3dadd(-84.4, -129.19, -24.1, 0.3)
pt3dadd(-83.5, -131.4, -25.3, 0.3)
pt3dadd(-82.7, -131.69, -25.7, 0.3)
pt3dadd(-82, -131.69, -26.1, 0.3)
pt3dadd(-81.4, -132, -26.4, 0.3)
pt3dadd(-80.5, -132.69, -27, 0.3)
pt3dadd(-79.8, -133.3, -27.5, 0.3)
pt3dadd(-79.3, -134.1, -28, 0.3)
pt3dadd(-79.09, -134.9, -28.4, 0.3)
pt3dadd(-78.8, -135.6, -28.8, 0.3)
pt3dadd(-78.8, -136.4, -29.2, 0.3)
pt3dadd(-79.09, -139.19, -30.7, 0.3)
pt3dadd(-79.3, -139.9, -31.1, 0.3)
pt3dadd(-79.3, -140.69, -31.6, 0.3)
pt3dadd(-78.9, -142.1, -32.29, 0.3)
pt3dadd(-78.59, -142.8, -32.7, 0.3)
pt3dadd(-78.59, -143.9, -33.29, 0.3)
pt3dadd(-78.4, -144.9, -33.9, 0.3)
pt3dadd(-78.4, -145.8, -34.4, 0.3)
pt3dadd(-78.4, -147.9, -35.5, 0.3)
pt3dadd(-78.4, -148.69, -36, 0.3)
}
dend[39] {pt3dclear()
pt3dadd(-31.9, -32.9, 24, 0.3)
pt3dadd(-32.2, -33.7, 24.2, 0.3)
pt3dadd(-32.2, -34.29, 24.4, 0.3)
pt3dadd(-32.2, -37.5, 25.5, 0.3)
pt3dadd(-32.5, -38.2, 25.9, 0.3)
pt3dadd(-32.9, -38.79, 26.3, 0.3)
pt3dadd(-33.29, -40.9, 27.3, 0.3)
pt3dadd(-33.29, -41.5, 27.7, 0.3)
pt3dadd(-33.29, -44.9, 29.2, 0.3)
pt3dadd(-33.29, -45.5, 29.5, 0.3)
pt3dadd(-32.5, -46.6, 30, 0.3)
}
dend[40] {pt3dclear()
pt3dadd(-32.5, -46.6, 30, 0.3)
pt3dadd(-32.79, -47.6, 30.1, 0.3)
pt3dadd(-32.79, -48.4, 30.2, 0.3)
pt3dadd(-32.6, -49.8, 30.3, 0.3)
pt3dadd(-32.4, -50.9, 30.4, 0.3)
pt3dadd(-32.4, -51.5, 30.4, 0.3)
pt3dadd(-32.7, -52.9, 30.4, 0.3)
pt3dadd(-33.1, -53.6, 30.5, 0.3)
pt3dadd(-33.9, -54.4, 30.5, 0.3)
pt3dadd(-34.4, -55.1, 30.5, 0.3)
pt3dadd(-34.7, -55.8, 30.4, 0.3)
pt3dadd(-35.4, -56.5, 30.4, 0.3)
pt3dadd(-35.4, -57.2, 30.4, 0.3)
pt3dadd(-35.1, -57.8, 30.4, 0.3)
pt3dadd(-35.5, -58.6, 30.3, 0.3)
pt3dadd(-35.9, -59.1, 30.3, 0.3)
pt3dadd(-36.29, -59.7, 30.2, 0.3)
pt3dadd(-36.7, -60.1, 30.2, 0.3)
pt3dadd(-37.5, -61, 30.1, 0.3)
pt3dadd(-37.9, -61.4, 30, 0.3)
pt3dadd(-38.2, -62.8, 29.9, 0.3)
pt3dadd(-38.5, -63.4, 29.8, 0.3)
pt3dadd(-38.5, -64.09, 29.7, 0.3)
pt3dadd(-38.2, -65.9, 29.4, 0.3)
pt3dadd(-38.2, -66.9, 29.3, 0.3)
pt3dadd(-37.9, -68.9, 28.9, 0.3)
pt3dadd(-37.6, -69.59, 28.7, 0.3)
pt3dadd(-37.1, -71.9, 28.2, 0.3)
pt3dadd(-37.4, -73.4, 27.9, 0.3)
pt3dadd(-37.7, -74, 27.7, 0.3)
pt3dadd(-38, -74.7, 27.5, 0.3)
pt3dadd(-38.5, -75.5, 27.2, 0.3)
pt3dadd(-38.5, -76.3, 27, 0.3)
pt3dadd(-38.79, -79.9, 25.9, 0.3)
pt3dadd(-39.29, -81, 25.5, 0.3)
pt3dadd(-39.9, -81.9, 25.2, 0.3)
pt3dadd(-40.4, -82.8, 24.8, 0.3)
pt3dadd(-41.2, -83.7, 24.3, 0.3)
}
}
proc shape3d_12() {
dend[40] { pt3dadd(-41.9, -84, 24.1, 0.3)
pt3dadd(-42.5, -84.4, 23.8, 0.3)
pt3dadd(-43.3, -84.7, 23.5, 0.3)
pt3dadd(-44, -85.5, 23, 0.3)
pt3dadd(-44.7, -86, 22.7, 0.3)
pt3dadd(-45.1, -86.8, 22.3, 0.3)
pt3dadd(-45.1, -87.9, 21.8, 0.3)
pt3dadd(-45.4, -88.7, 21.4, 0.3)
pt3dadd(-45.9, -89.5, 21, 0.3)
pt3dadd(-46.5, -89.8, 20.7, 0.3)
pt3dadd(-47.2, -89.8, 20.39, 0.3)
pt3dadd(-48.5, -90.2, 19.7, 0.3)
pt3dadd(-50.5, -91.7, 18.5, 0.3)
pt3dadd(-51.2, -92.4, 18, 0.3)
pt3dadd(-51.6, -93, 17.6, 0.3)
pt3dadd(-51.6, -93.6, 17.3, 0.3)
pt3dadd(-52, -94.2, 16.89, 0.3)
pt3dadd(-52.9, -94.5, 16.39, 0.3)
pt3dadd(-53.6, -95.3, 15.8, 0.3)
pt3dadd(-54.5, -95.6, 15.3, 0.3)
pt3dadd(-55.2, -95.9, 14.9, 0.3)
pt3dadd(-56.1, -97.2, 14, 0.3)
pt3dadd(-56.5, -98.2, 13.3, 0.3)
pt3dadd(-56.8, -99.3, 12.7, 0.3)
pt3dadd(-57.5, -100.4, 11.8, 0.3)
pt3dadd(-58.4, -101.4, 11, 0.3)
pt3dadd(-59.5, -102.4, 10.1, 0.3)
pt3dadd(-60.8, -103.2, 9.1, 0.3)
pt3dadd(-62, -103.5, 8.19, 0.3)
pt3dadd(-62.9, -103.9, 7.6, 0.3)
pt3dadd(-63.8, -104.7, 6.8, 0.3)
pt3dadd(-64.5, -105.4, 6.1, 0.3)
pt3dadd(-67.09, -107.1, 3.9, 0.3)
pt3dadd(-67.7, -107.1, 3.5, 0.3)
pt3dadd(-69.5, -107.5, 2.1, 0.3)
pt3dadd(-70.2, -108.3, 1.4, 0.3)
pt3dadd(-70.59, -109.5, 0.5, 0.3)
pt3dadd(-70.9, -110.2, -0.2, 0.3)
pt3dadd(-71.7, -110.7, -0.9, 0.3)
pt3dadd(-72.5, -111.3, -1.7, 0.3)
pt3dadd(-73.5, -111.7, -2.5, 0.3)
pt3dadd(-74.09, -112.2, -3.1, 0.3)
pt3dadd(-74.9, -113.1, -4.09, 0.3)
pt3dadd(-75.4, -113.9, -4.8, 0.3)
pt3dadd(-76.2, -114.4, -5.6, 0.3)
pt3dadd(-77, -114.4, -6.2, 0.3)
pt3dadd(-77.7, -114.7, -6.9, 0.3)
pt3dadd(-78.2, -115, -7.4, 0.3)
pt3dadd(-78.9, -115.3, -8, 0.3)
pt3dadd(-79.3, -116.7, -9.3, 0.3)
pt3dadd(-79.59, -117.3, -9.8, 0.3)
pt3dadd(-80, -117.8, -10.3, 0.3)
pt3dadd(-80.7, -118.5, -11.1, 0.3)
pt3dadd(-81.5, -119.2, -12.2, 0.3)
pt3dadd(-82.1, -119.5, -12.7, 0.3)
pt3dadd(-82.8, -119.8, -13.4, 0.3)
pt3dadd(-83.6, -119.8, -14, 0.3)
pt3dadd(-84.3, -120.8, -15.2, 0.3)
pt3dadd(-85.1, -121.5, -16.1, 0.3)
pt3dadd(-85.5, -122, -16.7, 0.3)
pt3dadd(-86.6, -123.5, -18.39, 0.3)
pt3dadd(-87.6, -124.1, -19.39, 0.3)
pt3dadd(-88.4, -124.1, -20.1, 0.3)
pt3dadd(-90.3, -124.4, -22, 0.3)
pt3dadd(-90.9, -124.9, -22.7, 0.3)
pt3dadd(-91.6, -125.8, -23.8, 0.3)
pt3dadd(-92, -127.3, -25.3, 0.3)
pt3dadd(-92.4, -128.1, -26.2, 0.3)
pt3dadd(-93.3, -128.4, -27.1, 0.3)
pt3dadd(-94.2, -129.19, -28.3, 0.3)
pt3dadd(-95, -129.69, -29.2, 0.3)
pt3dadd(-96.5, -130.1, -30.8, 0.3)
pt3dadd(-97.7, -130.8, -32.1, 0.3)
pt3dadd(-98.8, -131.5, -33.5, 0.3)
pt3dadd(-99.9, -132.3, -34.79, 0.3)
pt3dadd(-101.1, -133.8, -36.79, 0.3)
pt3dadd(-101.5, -134.6, -37.7, 0.3)
pt3dadd(-101.9, -135.8, -39, 0.3)
pt3dadd(-102.3, -137.1, -40.5, 0.3)
pt3dadd(-103.2, -139.69, -43.3, 0.3)
pt3dadd(-104, -141.9, -45.9, 0.3)
pt3dadd(-104.7, -142.8, -47, 0.3)
pt3dadd(-105.4, -143.1, -47.8, 0.3)
pt3dadd(-105.7, -144, -48.9, 0.3)
pt3dadd(-106, -145.8, -50.9, 0.3)
pt3dadd(-106.3, -147, -52.2, 0.3)
pt3dadd(-106.3, -148.5, -53.9, 0.3)
pt3dadd(-106.7, -150.9, -56.6, 0.3)
pt3dadd(-107.1, -151.5, -57.5, 0.3)
pt3dadd(-107.6, -152.19, -58.4, 0.3)
pt3dadd(-108, -152.9, -59.3, 0.3)
pt3dadd(-108, -153.5, -60, 0.3)
pt3dadd(-108.3, -154.5, -61.2, 0.3)
pt3dadd(-108.8, -155.3, -62.2, 0.3)
pt3dadd(-109.1, -155.9, -63.1, 0.3)
pt3dadd(-109.6, -156.3, -63.8, 0.3)
pt3dadd(-110.5, -156.3, -64.9, 0.3)
pt3dadd(-111.3, -156.6, -66.2, 0.3)
pt3dadd(-112.1, -157, -67.3, 0.3)
pt3dadd(-113.3, -157.6, -69.09, 0.3)
pt3dadd(-113.8, -158, -70, 0.3)
pt3dadd(-114.3, -158.4, -71, 0.3)
pt3dadd(-115.1, -158.9, -72.3, 0.18)
pt3dadd(-115.9, -159.19, -73.59, 0.18)
pt3dadd(-116.6, -159.6, -74.7, 0.18)
pt3dadd(-117.2, -159.6, -75.7, 0.18)
pt3dadd(-119.7, -160.4, -79.9, 0.18)
pt3dadd(-120.8, -161.4, -82.5, 0.18)
pt3dadd(-123.1, -163.6, -88, 0.18)
pt3dadd(-123.8, -164, -89.5, 0.18)
pt3dadd(-124.7, -164.6, -91.5, 0.18)
pt3dadd(-125.4, -164.9, -93, 0.18)
pt3dadd(-125.8, -165.6, -94.6, 0.18)
pt3dadd(-126.5, -166.3, -96.7, 0.18)
pt3dadd(-127.3, -167.1, -98.9, 0.18)
pt3dadd(-128.4, -168.2, -102, 0.18)
}
dend[41] {pt3dclear()
pt3dadd(-32.5, -46.6, 30, 0.3)
pt3dadd(-32.2, -47.5, 30.6, 0.3)
pt3dadd(-31.9, -48.2, 31.1, 0.3)
pt3dadd(-31.3, -48.9, 31.8, 0.3)
pt3dadd(-31.1, -49.5, 32.29, 0.3)
pt3dadd(-30.6, -50.1, 33, 0.3)
pt3dadd(-30.4, -51.3, 34, 0.3)
pt3dadd(-30.2, -51.9, 34.6, 0.3)
pt3dadd(-30.2, -52.7, 35.5, 0.3)
pt3dadd(-30.6, -55.2, 38.29, 0.3)
pt3dadd(-31.2, -56.5, 39.9, 0.3)
pt3dadd(-31.8, -57.6, 41.5, 0.3)
pt3dadd(-33.29, -59.9, 44.9, 0.3)
pt3dadd(-33.6, -60.9, 46.2, 0.3)
pt3dadd(-33.6, -61.7, 47.2, 0.3)
pt3dadd(-33.9, -63.3, 49.3, 0.3)
pt3dadd(-34.6, -64.9, 51.3, 0.3)
pt3dadd(-35.2, -65.7, 52.5, 0.3)
pt3dadd(-36.4, -67.4, 54.8, 0.3)
pt3dadd(-37.2, -68.2, 55.9, 0.3)
pt3dadd(-37.79, -68.5, 56.5, 0.3)
pt3dadd(-38.5, -69.5, 57.6, 0.3)
pt3dadd(-38.79, -70.09, 58.2, 0.3)
pt3dadd(-39.29, -70.5, 58.7, 0.3)
pt3dadd(-39.6, -71.2, 59.2, 0.3)
pt3dadd(-39.1, -72.2, 60, 0.3)
pt3dadd(-39.79, -72.7, 60.4, 0.3)
pt3dadd(-40.5, -73.3, 61, 0.3)
pt3dadd(-41.4, -74.09, 61.6, 0.3)
pt3dadd(-41.8, -75, 62.1, 0.3)
pt3dadd(-41.8, -75.7, 62.4, 0.3)
pt3dadd(-41.3, -76.8, 62.9, 0.3)
pt3dadd(-41.1, -77.9, 63.4, 0.3)
pt3dadd(-40.79, -78.59, 63.6, 0.3)
pt3dadd(-40.79, -79.7, 64, 0.3)
pt3dadd(-40.5, -80.9, 64.4, 0.3)
pt3dadd(-40.5, -81.8, 64.59, 0.3)
pt3dadd(-41.1, -82.6, 64.9, 0.3)
pt3dadd(-41.6, -83, 65, 0.3)
pt3dadd(-42.1, -83.8, 65.2, 0.3)
pt3dadd(-42.4, -84.6, 65.4, 0.3)
pt3dadd(-42.1, -85.5, 65.5, 0.3)
pt3dadd(-41.7, -86.4, 65.59, 0.3)
pt3dadd(-41.4, -87.1, 65.7, 0.3)
pt3dadd(-41.4, -88.1, 65.8, 0.3)
pt3dadd(-41.1, -90.3, 65.9, 0.3)
pt3dadd(-40.7, -90.7, 65.9, 0.3)
pt3dadd(-40.1, -91.3, 65.8, 0.3)
pt3dadd(-39.79, -92, 65.8, 0.3)
pt3dadd(-39.5, -92.8, 65.8, 0.3)
pt3dadd(-39.5, -93.9, 65.7, 0.3)
pt3dadd(-39.29, -94.9, 65.5, 0.3)
pt3dadd(-38.5, -96.1, 65.3, 0.3)
pt3dadd(-37.6, -96.5, 65.2, 0.3)
pt3dadd(-36.9, -96.5, 65, 0.3)
pt3dadd(-36, -96.8, 64.8, 0.3)
pt3dadd(-35.1, -97.1, 64.59, 0.3)
pt3dadd(-34.5, -97.5, 64.4, 0.3)
pt3dadd(-33.5, -97.8, 64.09, 0.3)
pt3dadd(-32.9, -98.3, 63.9, 0.3)
pt3dadd(-32.2, -98.7, 63.6, 0.3)
pt3dadd(-31.7, -99.1, 63.4, 0.3)
pt3dadd(-31.1, -99.4, 63.1, 0.3)
pt3dadd(-30.2, -99.4, 62.8, 0.3)
pt3dadd(-29.5, -100.6, 62.2, 0.3)
pt3dadd(-29.5, -101.3, 62, 0.3)
pt3dadd(-29.3, -102.2, 61.5, 0.3)
pt3dadd(-29, -103, 61.2, 0.3)
pt3dadd(-28.6, -103.7, 60.8, 0.3)
pt3dadd(-28.1, -104.4, 60.4, 0.3)
pt3dadd(-27.9, -105.1, 60, 0.3)
pt3dadd(-27.6, -105.8, 59.6, 0.3)
pt3dadd(-28, -106.3, 59.2, 0.3)
pt3dadd(-28, -107, 58.9, 0.3)
pt3dadd(-27.6, -108, 58.3, 0.3)
pt3dadd(-27.6, -108.8, 57.8, 0.3)
pt3dadd(-27.1, -110.9, 56.4, 0.3)
pt3dadd(-26.6, -111.3, 56, 0.3)
pt3dadd(-26.3, -111.9, 55.5, 0.3)
pt3dadd(-25.8, -112.7, 54.9, 0.3)
pt3dadd(-25.5, -114, 54, 0.3)
pt3dadd(-25.5, -114.7, 53.4, 0.3)
pt3dadd(-25.3, -117.3, 51.5, 0.3)
pt3dadd(-24.7, -118.3, 50.5, 0.3)
}
}
proc shape3d_13() {
dend[41] { pt3dadd(-24.1, -119.1, 49.8, 0.3)
pt3dadd(-24.1, -120.1, 48.9, 0.3)
pt3dadd(-23.8, -120.7, 48.3, 0.3)
pt3dadd(-23.8, -121.5, 47.7, 0.3)
pt3dadd(-23.5, -122.3, 47, 0.3)
pt3dadd(-23.5, -123, 46.3, 0.3)
pt3dadd(-23.3, -123.7, 45.7, 0.3)
pt3dadd(-22.9, -124.2, 45.1, 0.3)
pt3dadd(-22.6, -124.8, 44.5, 0.3)
pt3dadd(-22.4, -125.6, 43.7, 0.3)
pt3dadd(-22.4, -126.5, 42.8, 0.3)
pt3dadd(-22.2, -128.3, 41.1, 0.3)
pt3dadd(-21.7, -130.3, 39.1, 0.3)
pt3dadd(-21.2, -131.9, 37.29, 0.3)
pt3dadd(-21.2, -132.6, 36.5, 0.3)
pt3dadd(-20.6, -135.6, 33.2, 0.3)
pt3dadd(-20.3, -136.4, 32.4, 0.3)
pt3dadd(-20.39, -137.8, 30.8, 0.3)
pt3dadd(-21, -139, 29.3, 0.3)
pt3dadd(-21, -139.9, 28.2, 0.3)
pt3dadd(-20.7, -140.8, 27.1, 0.3)
pt3dadd(-20.5, -141.9, 25.8, 0.3)
pt3dadd(-20.2, -142.69, 24.8, 0.3)
pt3dadd(-19.3, -145.8, 20.8, 0.3)
pt3dadd(-19.1, -146.6, 19.8, 0.3)
pt3dadd(-19.1, -147.4, 18.8, 0.3)
pt3dadd(-19.1, -150.8, 14.5, 0.3)
pt3dadd(-18.8, -154, 10.3, 0.3)
pt3dadd(-18.5, -154.69, 9.3, 0.3)
pt3dadd(-18.1, -155.19, 8.5, 0.3)
pt3dadd(-17.8, -156, 7.3, 0.3)
pt3dadd(-17.5, -157, 6, 0.3)
}
dend[42] {pt3dclear()
pt3dadd(-14, -12.5, 30, 0.7)
pt3dadd(-14.2, -13.3, 30, 0.7)
pt3dadd(-14.2, -14, 30, 0.7)
pt3dadd(-14.5, -15.8, 30, 0.7)
pt3dadd(-14.9, -16.6, 30, 0.7)
pt3dadd(-15.2, -17.39, 30, 0.7)
pt3dadd(-15.5, -18.1, 30, 0.7)
pt3dadd(-15.8, -18.7, 30, 0.7)
pt3dadd(-15.8, -19.6, 30, 0.7)
pt3dadd(-16.1, -20.1, 30, 0.7)
pt3dadd(-16.1, -20.7, 30, 0.7)
pt3dadd(-16.39, -22.3, 30, 0.7)
pt3dadd(-17.1, -23.1, 30, 0.7)
pt3dadd(-17.1, -23.6, 30, 0.7)
pt3dadd(-17.39, -26.3, 30, 0.7)
pt3dadd(-18, -27, 30, 0.7)
pt3dadd(-18.3, -27.7, 30, 0.7)
pt3dadd(-19, -29, 30, 0.7)
}
dend[43] {pt3dclear()
pt3dadd(-19, -29, 30, 0.7)
pt3dadd(-19.2, -28.3, 30.3, 0.7)
pt3dadd(-19.89, -28.3, 31.2, 0.7)
pt3dadd(-20.8, -28.9, 33.2, 0.7)
pt3dadd(-21.5, -29.3, 34.5, 0.7)
pt3dadd(-22, -29.6, 35.5, 0.7)
pt3dadd(-22.5, -29.9, 36, 0.7)
}
dend[44] {pt3dclear()
pt3dadd(-22.5, -29.9, 36, 0.7)
pt3dadd(-22.9, -30.4, 36.2, 0.3)
pt3dadd(-23.5, -30.7, 36.29, 0.3)
pt3dadd(-25.7, -31.9, 37, 0.3)
pt3dadd(-26.6, -32.4, 37.2, 0.3)
pt3dadd(-27.6, -33.1, 37.5, 0.3)
pt3dadd(-28.4, -33.9, 37.7, 0.3)
pt3dadd(-29.2, -34.29, 37.9, 0.3)
pt3dadd(-29.9, -34.6, 38.1, 0.3)
pt3dadd(-30.8, -34.9, 38.2, 0.3)
pt3dadd(-32.29, -35.9, 38.5, 0.3)
pt3dadd(-32.9, -36.7, 38.7, 0.3)
pt3dadd(-33.2, -37.6, 38.79, 0.3)
pt3dadd(-34.29, -39.2, 39.1, 0.3)
pt3dadd(-35.6, -39.6, 39.29, 0.3)
pt3dadd(-36.1, -40.1, 39.4, 0.3)
pt3dadd(-37.29, -40.9, 39.5, 0.3)
pt3dadd(-37.79, -41.2, 39.6, 0.3)
pt3dadd(-38.4, -41.2, 39.6, 0.3)
pt3dadd(-39.79, -40.79, 39.79, 0.3)
pt3dadd(-40.4, -40.5, 39.79, 0.3)
pt3dadd(-41.2, -39.9, 39.9, 0.3)
pt3dadd(-42.4, -39.9, 40, 0.3)
pt3dadd(-43.4, -40.2, 40, 0.3)
pt3dadd(-44, -40.5, 40, 0.3)
pt3dadd(-44.7, -40.79, 40.1, 0.3)
pt3dadd(-45.6, -40.79, 40.1, 0.3)
pt3dadd(-47.2, -41.1, 40.2, 0.3)
pt3dadd(-48.3, -41.7, 40.2, 0.3)
pt3dadd(-49.8, -42.5, 40.2, 0.3)
pt3dadd(-51.8, -42.8, 40.2, 0.3)
pt3dadd(-53.5, -43.1, 40.2, 0.3)
pt3dadd(-54.2, -43.1, 40.2, 0.3)
pt3dadd(-55.1, -44, 40.2, 0.3)
pt3dadd(-56.2, -44.7, 40.1, 0.3)
pt3dadd(-58.1, -45.8, 40.1, 0.3)
pt3dadd(-58.9, -46.1, 40, 0.3)
pt3dadd(-59.7, -46.1, 40, 0.3)
pt3dadd(-60.6, -46.5, 40, 0.3)
pt3dadd(-61.5, -46.8, 39.9, 0.3)
pt3dadd(-62.2, -47.5, 39.9, 0.3)
pt3dadd(-63, -48.1, 39.79, 0.3)
pt3dadd(-63.8, -48.5, 39.7, 0.3)
pt3dadd(-64.59, -49, 39.7, 0.3)
pt3dadd(-65.4, -49.4, 39.6, 0.3)
pt3dadd(-66.2, -49.4, 39.6, 0.3)
pt3dadd(-67.4, -49.7, 39.5, 0.3)
pt3dadd(-68, -49.7, 39.4, 0.3)
pt3dadd(-68.8, -50, 39.4, 0.3)
pt3dadd(-69.59, -50, 39.29, 0.3)
pt3dadd(-70.3, -50.3, 39.2, 0.3)
pt3dadd(-70.9, -50.3, 39.2, 0.3)
pt3dadd(-71.9, -50, 39.1, 0.3)
pt3dadd(-72.7, -49.8, 39, 0.3)
pt3dadd(-73.4, -49.8, 39, 0.3)
pt3dadd(-75.9, -50.1, 38.7, 0.3)
pt3dadd(-76.59, -50.4, 38.7, 0.3)
pt3dadd(-77.8, -51.5, 38.5, 0.3)
pt3dadd(-78.8, -53, 38.29, 0.3)
pt3dadd(-79.3, -53.3, 38.29, 0.3)
pt3dadd(-80.09, -53.6, 38.2, 0.3)
pt3dadd(-80.7, -54, 38.1, 0.3)
pt3dadd(-81.09, -54.6, 38.1, 0.3)
pt3dadd(-81.7, -54.9, 38, 0.3)
pt3dadd(-82.5, -55.5, 37.9, 0.3)
pt3dadd(-83.1, -55.5, 37.79, 0.3)
pt3dadd(-84.4, -55.8, 37.7, 0.3)
pt3dadd(-85.1, -56.1, 37.6, 0.3)
pt3dadd(-86.4, -56.7, 37.5, 0.3)
pt3dadd(-87.1, -57, 37.4, 0.3)
pt3dadd(-88.4, -57.3, 37.29, 0.3)
pt3dadd(-88.9, -57.6, 37.29, 0.3)
pt3dadd(-89.8, -57.6, 37.2, 0.3)
pt3dadd(-91.4, -58.3, 37, 0.3)
pt3dadd(-91.9, -58.8, 37, 0.3)
pt3dadd(-92.5, -59.7, 36.9, 0.3)
pt3dadd(-93.5, -60.1, 36.79, 0.3)
pt3dadd(-94.1, -60.4, 36.7, 0.3)
pt3dadd(-94.7, -60.4, 36.7, 0.3)
pt3dadd(-95.5, -60.7, 36.6, 0.3)
pt3dadd(-95.9, -61.3, 36.6, 0.3)
pt3dadd(-95.9, -62.1, 36.5, 0.3)
pt3dadd(-96.3, -62.6, 36.5, 0.3)
pt3dadd(-97.1, -63.3, 36.4, 0.3)
pt3dadd(-98, -63.6, 36.29, 0.3)
pt3dadd(-98.6, -63.9, 36.29, 0.3)
pt3dadd(-99.3, -64.2, 36.2, 0.3)
pt3dadd(-99.9, -65.3, 36.2, 0.3)
pt3dadd(-100.2, -66, 36.1, 0.3)
pt3dadd(-100.5, -66.9, 36.1, 0.3)
pt3dadd(-101.2, -68.59, 36, 0.3)
pt3dadd(-101.6, -69.09, 36, 0.3)
pt3dadd(-102.4, -69.5, 35.9, 0.3)
pt3dadd(-102.9, -69.8, 35.9, 0.3)
pt3dadd(-103.3, -70.2, 35.9, 0.3)
pt3dadd(-104.2, -70.59, 35.9, 0.3)
pt3dadd(-105.1, -71.2, 35.79, 0.3)
pt3dadd(-106.8, -72.2, 35.79, 0.3)
pt3dadd(-107.3, -72.59, 35.79, 0.3)
pt3dadd(-108.5, -73.2, 35.79, 0.3)
pt3dadd(-110.5, -74.5, 35.79, 0.3)
pt3dadd(-111.3, -74.8, 35.79, 0.3)
pt3dadd(-111.7, -75.5, 35.79, 0.3)
pt3dadd(-112.7, -76.8, 35.9, 0.3)
pt3dadd(-113.4, -77.3, 35.9, 0.3)
pt3dadd(-114.1, -77.8, 36, 0.3)
pt3dadd(-114.5, -78.3, 36, 0.3)
}
dend[45] {pt3dclear()
pt3dadd(-114.5, -78.3, 36, 0.3)
pt3dadd(-115.6, -78.5, 35.9, 0.3)
pt3dadd(-116.4, -78.8, 35.79, 0.3)
pt3dadd(-116.7, -79.59, 35.7, 0.3)
pt3dadd(-116.7, -80.2, 35.6, 0.3)
pt3dadd(-117, -82.1, 35.4, 0.3)
pt3dadd(-117.6, -82.9, 35.29, 0.3)
pt3dadd(-118.5, -83.5, 35.2, 0.3)
pt3dadd(-119.8, -83.5, 35.1, 0.3)
pt3dadd(-120.7, -83.9, 35, 0.3)
pt3dadd(-121.3, -85.1, 34.79, 0.3)
pt3dadd(-121.3, -86.1, 34.7, 0.3)
pt3dadd(-121.7, -87.7, 34.6, 0.3)
pt3dadd(-122.2, -88.2, 34.5, 0.3)
pt3dadd(-123, -88.6, 34.4, 0.3)
pt3dadd(-123.8, -88.9, 34.29, 0.3)
pt3dadd(-125.3, -89.2, 34.2, 0.3)
pt3dadd(-126.2, -90.4, 34, 0.3)
pt3dadd(-126.5, -90.9, 34, 0.3)
pt3dadd(-126.5, -91.8, 33.9, 0.3)
pt3dadd(-127, -94.8, 33.6, 0.3)
pt3dadd(-127.7, -95.2, 33.5, 0.3)
pt3dadd(-128.5, -96, 33.29, 0.3)
pt3dadd(-129.19, -96.8, 33.2, 0.3)
pt3dadd(-129.5, -97.4, 33.2, 0.3)
pt3dadd(-129.8, -98, 33.1, 0.3)
pt3dadd(-129.8, -99.1, 33, 0.3)
pt3dadd(-130.5, -101.5, 32.7, 0.3)
pt3dadd(-131.4, -101.7, 32.5, 0.3)
pt3dadd(-132.4, -102.3, 32.4, 0.3)
pt3dadd(-133.5, -102.7, 32.29, 0.3)
pt3dadd(-135, -103.6, 32, 0.18)
pt3dadd(-135.3, -104.4, 31.9, 0.18)
pt3dadd(-135.6, -105.4, 31.8, 0.18)
pt3dadd(-136.5, -106.3, 31.6, 0.18)
pt3dadd(-137.69, -107, 31.4, 0.18)
}
}
proc shape3d_14() {
dend[45] { pt3dadd(-138.3, -107.3, 31.3, 0.18)
pt3dadd(-139.19, -107.7, 31.1, 0.18)
pt3dadd(-139.9, -108.3, 31, 0.18)
pt3dadd(-140.9, -108.6, 30.8, 0.18)
pt3dadd(-141.8, -109.1, 30.7, 0.18)
pt3dadd(-142.5, -109.4, 30.5, 0.18)
pt3dadd(-143.4, -109.7, 30.4, 0.18)
pt3dadd(-145.4, -110.1, 30, 0.18)
}
dend[46] {pt3dclear()
pt3dadd(-114.5, -78.3, 36, 0.3)
pt3dadd(-113.5, -79.5, 36.4, 0.3)
pt3dadd(-113.2, -80.2, 36.6, 0.3)
pt3dadd(-112.4, -81, 36.9, 0.3)
pt3dadd(-112.1, -81.7, 37.1, 0.3)
pt3dadd(-112.2, -82.3, 37.29, 0.3)
pt3dadd(-112.8, -82.8, 37.5, 0.3)
pt3dadd(-113, -83.4, 37.79, 0.3)
pt3dadd(-113, -84.4, 38.1, 0.3)
pt3dadd(-113.4, -84.9, 38.4, 0.3)
pt3dadd(-114, -85.3, 38.7, 0.3)
pt3dadd(-114.8, -85.9, 39.1, 0.3)
pt3dadd(-115.1, -86.6, 39.5, 0.3)
pt3dadd(-116.1, -88.2, 40.29, 0.3)
pt3dadd(-116.6, -88.7, 40.7, 0.3)
pt3dadd(-117.2, -89.1, 41, 0.3)
pt3dadd(-117.7, -89.4, 41.4, 0.3)
pt3dadd(-118.6, -90.1, 42.1, 0.3)
pt3dadd(-118.9, -91, 42.6, 0.3)
pt3dadd(-119.6, -92.4, 43.6, 0.3)
pt3dadd(-120.3, -93.1, 44.3, 0.3)
pt3dadd(-121.4, -94, 45.3, 0.3)
pt3dadd(-122.3, -94.8, 46.1, 0.3)
pt3dadd(-123, -95.3, 46.8, 0.3)
pt3dadd(-123.5, -95.6, 47.3, 0.3)
pt3dadd(-124.3, -96.3, 48.2, 0.3)
pt3dadd(-125.1, -96.9, 49.1, 0.3)
pt3dadd(-125.7, -98, 50.1, 0.3)
pt3dadd(-126, -98.7, 50.9, 0.3)
pt3dadd(-126.4, -99.6, 51.8, 0.3)
pt3dadd(-126.4, -100.4, 52.6, 0.3)
pt3dadd(-126.8, -101.2, 53.5, 0.3)
pt3dadd(-127.1, -102, 54.4, 0.3)
pt3dadd(-127.4, -102.8, 55.3, 0.3)
pt3dadd(-127.4, -103.3, 55.9, 0.3)
pt3dadd(-127.7, -106, 59, 0.3)
pt3dadd(-127.9, -106.8, 60, 0.3)
pt3dadd(-128.9, -108.9, 64, 0.3)
pt3dadd(-130.1, -110.1, 68.59, 0.3)
pt3dadd(-130.8, -110.5, 71, 0.3)
pt3dadd(-131.4, -110.8, 73.4, 0.3)
pt3dadd(-133.19, -111.1, 80, 0.3)
pt3dadd(-134.9, -111.4, 87.5, 0.3)
pt3dadd(-135.6, -111.7, 90.8, 0.3)
pt3dadd(-136.19, -112.2, 94.5, 0.3)
pt3dadd(-136.8, -112.7, 98.1, 0.3)
pt3dadd(-137.5, -112.9, 101.9, 0.3)
pt3dadd(-138.69, -113.2, 108, 0.3)
}
dend[47] {pt3dclear()
pt3dadd(-22.5, -29.9, 36, 0.7)
pt3dadd(-22.6, -30.8, 36.6, 0.3)
pt3dadd(-22.6, -31.7, 37.29, 0.3)
pt3dadd(-22.9, -32.29, 37.7, 0.3)
pt3dadd(-23.2, -32.9, 38.2, 0.3)
pt3dadd(-23.7, -33.4, 38.5, 0.3)
pt3dadd(-24.4, -33.4, 38.9, 0.3)
pt3dadd(-25.1, -33.7, 39.4, 0.3)
pt3dadd(-26, -33.7, 39.9, 0.3)
pt3dadd(-26.8, -33.4, 40.29, 0.3)
pt3dadd(-28.3, -32.4, 41.3, 0.3)
pt3dadd(-29.3, -31.6, 42, 0.3)
pt3dadd(-30, -30.9, 42.5, 0.3)
pt3dadd(-30.3, -30.2, 42.9, 0.3)
pt3dadd(-31.1, -29.9, 43.4, 0.3)
pt3dadd(-31.9, -29.9, 43.8, 0.3)
pt3dadd(-32.6, -30.3, 44.3, 0.3)
pt3dadd(-33.1, -30.6, 44.7, 0.3)
pt3dadd(-33.9, -31.1, 45.3, 0.3)
pt3dadd(-35, -31.8, 46.2, 0.3)
pt3dadd(-35.7, -31.8, 46.7, 0.3)
pt3dadd(-36.5, -31.8, 47.4, 0.3)
pt3dadd(-37.29, -31.8, 48, 0.3)
}
dend[48] {pt3dclear()
pt3dadd(-37.29, -31.8, 48, 0.3)
pt3dadd(-38.1, -31.5, 48.8, 0.3)
pt3dadd(-38.5, -30.9, 49.5, 0.3)
pt3dadd(-40, -29.6, 51.4, 0.3)
pt3dadd(-40.5, -29.3, 52, 0.3)
pt3dadd(-41.4, -29.3, 52.8, 0.3)
pt3dadd(-44.3, -29.1, 55.8, 0.3)
pt3dadd(-45, -29.1, 56.5, 0.3)
pt3dadd(-47.9, -29.5, 59.4, 0.3)
pt3dadd(-48.5, -29.5, 60, 0.3)
pt3dadd(-49.2, -29.6, 60.6, 0.3)
pt3dadd(-50.1, -29.6, 61.5, 0.3)
pt3dadd(-50.8, -29.9, 62.2, 0.3)
pt3dadd(-52, -30.9, 63.6, 0.3)
pt3dadd(-52.7, -31.3, 64.4, 0.3)
pt3dadd(-53.3, -31.6, 64.9, 0.3)
pt3dadd(-54.3, -31.6, 65.8, 0.3)
pt3dadd(-55, -31.1, 66.59, 0.3)
pt3dadd(-55.7, -30.4, 67.5, 0.3)
pt3dadd(-56.9, -30.2, 68.5, 0.3)
pt3dadd(-57.5, -30.2, 69, 0.3)
pt3dadd(-59.4, -30.6, 70.59, 0.3)
pt3dadd(-60.3, -31.3, 71.5, 0.3)
pt3dadd(-61.3, -31.6, 72.4, 0.3)
pt3dadd(-62.5, -32.1, 73.3, 0.3)
pt3dadd(-63.6, -32.79, 74.4, 0.3)
pt3dadd(-64.7, -33.2, 75.3, 0.3)
pt3dadd(-65.5, -33.2, 75.9, 0.3)
pt3dadd(-69, -33.2, 78.5, 0.3)
pt3dadd(-69.7, -33.7, 79.2, 0.3)
pt3dadd(-70.5, -34.1, 79.8, 0.3)
pt3dadd(-71.3, -34.5, 80.5, 0.3)
pt3dadd(-72.09, -34.5, 81.09, 0.3)
pt3dadd(-75.5, -34.5, 83.5, 0.3)
pt3dadd(-76.9, -34.79, 84.5, 0.3)
pt3dadd(-78.5, -35.4, 85.7, 0.3)
pt3dadd(-79.9, -35.7, 86.7, 0.3)
pt3dadd(-82.4, -35.5, 88.4, 0.3)
pt3dadd(-83.2, -35.5, 89, 0.3)
pt3dadd(-84.2, -35.9, 89.7, 0.3)
pt3dadd(-85, -35.9, 90.3, 0.3)
pt3dadd(-88.5, -35.9, 92.7, 0.3)
pt3dadd(-89.2, -36.1, 93.2, 0.3)
pt3dadd(-89.8, -36.6, 93.7, 0.3)
pt3dadd(-90.5, -36.9, 94.2, 0.3)
pt3dadd(-91.1, -37.2, 94.7, 0.3)
pt3dadd(-91.7, -37.5, 95.2, 0.3)
pt3dadd(-92.5, -37.5, 95.8, 0.3)
pt3dadd(-95.3, -37.29, 97.8, 0.3)
pt3dadd(-96.5, -37, 98.6, 0.3)
pt3dadd(-97.1, -37, 99.1, 0.3)
pt3dadd(-98.5, -37.4, 100.1, 0.3)
pt3dadd(-99.3, -37.7, 100.7, 0.3)
pt3dadd(-100.1, -38.1, 101.4, 0.3)
pt3dadd(-101, -38.5, 102.2, 0.3)
pt3dadd(-101.9, -38.9, 102.8, 0.3)
pt3dadd(-103.3, -39.2, 104, 0.3)
pt3dadd(-105.4, -39.5, 105.6, 0.3)
pt3dadd(-106.2, -39.9, 106.3, 0.3)
pt3dadd(-107.6, -40.79, 107.6, 0.3)
pt3dadd(-108.7, -41.1, 108.5, 0.3)
pt3dadd(-109.5, -40.79, 109.3, 0.3)
pt3dadd(-110.2, -40.5, 109.9, 0.3)
pt3dadd(-110.8, -40.5, 110.4, 0.3)
pt3dadd(-112.1, -40.9, 111.5, 0.3)
pt3dadd(-112.8, -41.4, 112.3, 0.3)
pt3dadd(-113.5, -41.8, 113, 0.3)
pt3dadd(-114.2, -42.1, 113.6, 0.3)
pt3dadd(-115, -42.1, 114.3, 0.3)
pt3dadd(-116.2, -41.8, 115.4, 0.3)
pt3dadd(-116.8, -41.8, 116, 0.3)
pt3dadd(-119.6, -41.5, 118.5, 0.3)
pt3dadd(-120.4, -41.5, 119.3, 0.3)
pt3dadd(-121.1, -41.3, 120, 0.3)
pt3dadd(-121.7, -41.3, 120.7, 0.3)
pt3dadd(-122.7, -41.7, 122.3, 0.3)
pt3dadd(-123.4, -41.7, 123.9, 0.3)
pt3dadd(-124, -41.4, 125.2, 0.3)
pt3dadd(-124.4, -40.79, 127.2, 0.3)
pt3dadd(-125.1, -40.4, 129.3, 0.3)
pt3dadd(-125.9, -40.2, 132, 0.3)
pt3dadd(-127.8, -39.2, 139.4, 0.3)
pt3dadd(-128.5, -38.6, 143.19, 0.3)
pt3dadd(-129.4, -38.29, 146.69, 0.3)
pt3dadd(-130, -38.29, 149.19, 0.3)
pt3dadd(-130.8, -37.9, 153.19, 0.3)
pt3dadd(-131.4, -37.9, 156, 0.3)
}
dend[49] {pt3dclear()
pt3dadd(-37.29, -31.8, 48, 0.3)
pt3dadd(-37.5, -32.7, 48.7, 0.3)
pt3dadd(-37.79, -33.4, 49.3, 0.3)
pt3dadd(-38.2, -33.79, 49.8, 0.3)
pt3dadd(-39.6, -34.9, 51.2, 0.3)
pt3dadd(-41, -35.29, 52.3, 0.3)
pt3dadd(-41.6, -35.6, 52.8, 0.3)
pt3dadd(-42.3, -35.6, 53.4, 0.3)
pt3dadd(-43, -35.9, 54, 0.3)
pt3dadd(-44.7, -36.6, 55.5, 0.3)
pt3dadd(-45.6, -37, 56.2, 0.3)
pt3dadd(-46.1, -37.29, 56.7, 0.3)
pt3dadd(-46.8, -37.6, 57.3, 0.3)
pt3dadd(-48.1, -38.29, 58.5, 0.3)
pt3dadd(-48.8, -39.1, 59.3, 0.3)
pt3dadd(-48.8, -39.79, 59.9, 0.3)
pt3dadd(-49.2, -40.4, 60.5, 0.3)
pt3dadd(-49.5, -41.1, 61.1, 0.3)
pt3dadd(-49.5, -41.9, 61.7, 0.3)
pt3dadd(-49.8, -43.5, 63.1, 0.3)
pt3dadd(-50.2, -44.1, 63.7, 0.3)
pt3dadd(-51.3, -44.9, 64.8, 0.3)
pt3dadd(-52, -45.2, 65.4, 0.3)
pt3dadd(-52.9, -45.8, 66.3, 0.3)
pt3dadd(-54.4, -46.9, 67.8, 0.3)
pt3dadd(-55.2, -47.7, 68.7, 0.3)
pt3dadd(-55.5, -48.3, 69.2, 0.3)
pt3dadd(-55.8, -48.9, 69.8, 0.3)
pt3dadd(-57.8, -51.6, 72.59, 0.3)
pt3dadd(-58.4, -51.9, 73.2, 0.3)
pt3dadd(-59.3, -52.6, 74.09, 0.3)
pt3dadd(-60.2, -53.5, 75.2, 0.3)
pt3dadd(-60.5, -54.2, 75.8, 0.3)
pt3dadd(-60.5, -55.5, 77, 0.3)
}
}
proc shape3d_15() {
dend[49] { pt3dadd(-60.9, -57.1, 78.4, 0.3)
pt3dadd(-61.7, -58, 79.4, 0.3)
pt3dadd(-62.4, -58.8, 80.4, 0.3)
pt3dadd(-62.9, -59.3, 81, 0.3)
pt3dadd(-63.3, -59.7, 81.5, 0.3)
pt3dadd(-64, -60.4, 82.4, 0.3)
pt3dadd(-64.7, -61, 83.2, 0.3)
pt3dadd(-65.2, -61.9, 84.1, 0.3)
pt3dadd(-65.9, -62.7, 85, 0.3)
pt3dadd(-66.7, -63, 85.8, 0.3)
pt3dadd(-67.8, -64.09, 87.2, 0.3)
pt3dadd(-68.9, -65.4, 88.7, 0.3)
pt3dadd(-69.2, -66.09, 89.4, 0.3)
pt3dadd(-69.5, -66.9, 90.2, 0.3)
pt3dadd(-70.3, -68.7, 92.1, 0.3)
pt3dadd(-71.3, -70.3, 93.8, 0.3)
pt3dadd(-71.9, -70.59, 94.4, 0.3)
pt3dadd(-72.59, -71.09, 95.2, 0.3)
pt3dadd(-73.2, -71.5, 96, 0.3)
}
dend[50] {pt3dclear()
pt3dadd(-19, -29, 30, 0.7)
pt3dadd(-19, -29.6, 30, 0.7)
pt3dadd(-18.6, -30.2, 29.9, 0.7)
pt3dadd(-18.3, -31.1, 29.7, 0.7)
pt3dadd(-18, -32.29, 29.3, 0.7)
pt3dadd(-18, -33.2, 28.9, 0.7)
pt3dadd(-18.5, -33.79, 28.5, 0.7)
pt3dadd(-18.8, -34.7, 28, 0.7)
pt3dadd(-19.2, -35.2, 27.6, 0.7)
pt3dadd(-19.5, -36, 27.1, 0.7)
pt3dadd(-19.8, -37.7, 26.1, 0.7)
pt3dadd(-19.8, -40.2, 24.7, 0.7)
pt3dadd(-19.6, -41.5, 24, 0.7)
}
dend[51] {pt3dclear()
pt3dadd(-19.6, -41.5, 24, 0.7)
pt3dadd(-19.7, -43, 23, 0.3)
pt3dadd(-19.7, -43.7, 22.4, 0.3)
pt3dadd(-20.39, -45.3, 21.2, 0.3)
pt3dadd(-21, -46.2, 20.3, 0.3)
pt3dadd(-21.4, -47, 19.7, 0.3)
pt3dadd(-22, -47.7, 19, 0.3)
pt3dadd(-22, -48.4, 18.5, 0.3)
pt3dadd(-22.3, -49.1, 17.89, 0.3)
pt3dadd(-22.6, -50.1, 17, 0.3)
pt3dadd(-23.3, -51.1, 16, 0.3)
pt3dadd(-23.3, -51.7, 15.5, 0.3)
pt3dadd(-23.6, -52.6, 14.8, 0.3)
pt3dadd(-23.9, -53.9, 13.7, 0.3)
pt3dadd(-24.4, -54.6, 13, 0.3)
pt3dadd(-24.8, -55.6, 12, 0.3)
pt3dadd(-24.8, -56.2, 11.5, 0.3)
pt3dadd(-25.5, -59.7, 8.5, 0.3)
pt3dadd(-25.8, -60.8, 7.5, 0.3)
pt3dadd(-26.2, -61.3, 7, 0.3)
pt3dadd(-26.5, -62.4, 5.9, 0.3)
pt3dadd(-26.3, -63.5, 5, 0.3)
pt3dadd(-26.3, -64.09, 4.4, 0.3)
pt3dadd(-25.7, -66.7, 2, 0.3)
pt3dadd(-25.7, -67.4, 1.3, 0.3)
pt3dadd(-25.4, -68.7, 0.09, 0.3)
pt3dadd(-25.8, -69.5, -0.6, 0.3)
pt3dadd(-26.5, -70.2, -1.5, 0.3)
pt3dadd(-27.7, -71.59, -3.2, 0.3)
pt3dadd(-28, -72.2, -3.8, 0.3)
pt3dadd(-29.2, -73.8, -5.6, 0.3)
pt3dadd(-29.9, -74.7, -6.7, 0.3)
pt3dadd(-30.2, -75.5, -7.4, 0.3)
pt3dadd(-30.5, -76.09, -8, 0.3)
pt3dadd(-31.2, -76.9, -9, 0.3)
pt3dadd(-31.5, -77.7, -9.8, 0.3)
pt3dadd(-31.5, -78.7, -10.7, 0.3)
pt3dadd(-31.5, -81.7, -13.4, 0.3)
pt3dadd(-30.8, -82.5, -14.3, 0.3)
pt3dadd(-30.3, -83.5, -15.3, 0.3)
pt3dadd(-30.3, -84.3, -16, 0.3)
pt3dadd(-30, -86.6, -18, 0.3)
pt3dadd(-29, -89.3, -20.5, 0.3)
pt3dadd(-28.7, -90, -21.1, 0.3)
pt3dadd(-28.3, -90.4, -21.7, 0.3)
pt3dadd(-28, -91.2, -22.4, 0.3)
pt3dadd(-28, -92, -23, 0.3)
pt3dadd(-28.3, -92.7, -23.6, 0.3)
pt3dadd(-28.3, -93.3, -24.1, 0.3)
pt3dadd(-28.1, -94.8, -25.4, 0.3)
pt3dadd(-28.1, -95.4, -25.9, 0.3)
pt3dadd(-27.7, -96.5, -26.8, 0.3)
pt3dadd(-28.1, -97.2, -27.5, 0.3)
pt3dadd(-28.4, -97.8, -28, 0.3)
pt3dadd(-27.9, -98.1, -28.5, 0.3)
pt3dadd(-26.8, -97.6, -29.4, 0.3)
pt3dadd(-26.1, -97.6, -30, 0.3)
}
dend[52] {pt3dclear()
pt3dadd(-26.1, -97.6, -30, 0.3)
pt3dadd(-26.4, -98.3, -30.4, 0.3)
pt3dadd(-26.7, -99, -30.9, 0.3)
pt3dadd(-27, -100.5, -31.7, 0.3)
pt3dadd(-27.3, -101.2, -32.1, 0.3)
pt3dadd(-27.3, -102, -32.5, 0.3)
pt3dadd(-27.6, -103.2, -33.1, 0.3)
pt3dadd(-28, -104, -33.5, 0.3)
pt3dadd(-28.3, -104.9, -34, 0.3)
pt3dadd(-28.3, -105.5, -34.29, 0.3)
pt3dadd(-28.8, -106.3, -34.7, 0.3)
pt3dadd(-29.2, -106.7, -34.9, 0.3)
pt3dadd(-30, -107.6, -35.5, 0.3)
pt3dadd(-30.7, -108.4, -35.9, 0.3)
pt3dadd(-31.1, -109.1, -36.2, 0.3)
pt3dadd(-32.1, -109.9, -36.7, 0.3)
pt3dadd(-34.29, -111.8, -37.79, 0.3)
pt3dadd(-34.9, -112.9, -38.2, 0.3)
pt3dadd(-35.9, -115.5, -39.1, 0.3)
pt3dadd(-36.9, -117, -39.7, 0.3)
pt3dadd(-38.6, -119.6, -40.6, 0.3)
pt3dadd(-38.9, -120.6, -40.79, 0.3)
pt3dadd(-39.9, -122.4, -41.4, 0.3)
pt3dadd(-40.79, -123.3, -41.7, 0.3)
pt3dadd(-42.6, -125, -42.2, 0.3)
pt3dadd(-43.4, -126.3, -42.6, 0.3)
pt3dadd(-43.7, -127.6, -42.9, 0.3)
pt3dadd(-44.1, -128.69, -43.1, 0.3)
pt3dadd(-45, -129.5, -43.3, 0.3)
pt3dadd(-45.8, -130.5, -43.6, 0.3)
pt3dadd(-46.5, -131.3, -43.8, 0.3)
pt3dadd(-47.3, -132.3, -44, 0.3)
pt3dadd(-50, -135.19, -44.7, 0.3)
pt3dadd(-50.9, -136.4, -45, 0.3)
pt3dadd(-51.4, -137.1, -45.1, 0.3)
pt3dadd(-52.3, -138.19, -45.3, 0.3)
pt3dadd(-53.7, -139.6, -45.7, 0.3)
pt3dadd(-56.1, -142.3, -46.3, 0.3)
pt3dadd(-56.8, -143.4, -46.5, 0.3)
pt3dadd(-59.7, -147.19, -47.3, 0.3)
pt3dadd(-61.9, -149.3, -47.8, 0.3)
pt3dadd(-64.09, -151.5, -48.4, 0.3)
pt3dadd(-65.4, -153.3, -48.9, 0.3)
pt3dadd(-66.8, -154.69, -49.3, 0.3)
pt3dadd(-67.9, -155.6, -49.6, 0.3)
pt3dadd(-68.7, -155.9, -49.8, 0.3)
pt3dadd(-70.09, -156.9, -50.2, 0.3)
pt3dadd(-71.09, -157.5, -50.5, 0.3)
pt3dadd(-71.8, -158.19, -50.7, 0.3)
pt3dadd(-73.2, -159.1, -51.2, 0.3)
pt3dadd(-74, -160.4, -51.6, 0.3)
pt3dadd(-74.5, -161.19, -51.9, 0.3)
pt3dadd(-75.3, -161.5, -52.1, 0.3)
pt3dadd(-76.09, -161.9, -52.4, 0.3)
pt3dadd(-77.3, -162.3, -52.8, 0.3)
pt3dadd(-78.2, -162.8, -53.1, 0.3)
pt3dadd(-78.9, -163.5, -53.4, 0.3)
pt3dadd(-79.59, -164.1, -53.8, 0.3)
pt3dadd(-80.4, -164.7, -54.1, 0.3)
pt3dadd(-81.4, -165.4, -54.5, 0.3)
pt3dadd(-82.5, -166, -55, 0.3)
pt3dadd(-83.5, -166.4, -55.4, 0.3)
pt3dadd(-85.2, -166.8, -56.1, 0.3)
pt3dadd(-85.9, -167.1, -56.5, 0.3)
pt3dadd(-86.7, -167.5, -56.9, 0.3)
pt3dadd(-88.5, -168.4, -57.8, 0.3)
pt3dadd(-91.2, -169.4, -59.2, 0.3)
pt3dadd(-92.6, -170.3, -60, 0.3)
pt3dadd(-93.3, -170.4, -60.4, 0.3)
pt3dadd(-94.4, -170.7, -61, 0.3)
pt3dadd(-95.1, -171, -61.4, 0.3)
pt3dadd(-95.8, -171, -61.8, 0.3)
pt3dadd(-96.5, -171.3, -62.3, 0.3)
pt3dadd(-97.5, -171.7, -62.8, 0.3)
pt3dadd(-98.3, -172.7, -63.6, 0.3)
pt3dadd(-98.9, -173.7, -64.4, 0.3)
pt3dadd(-100.7, -176.5, -66.5, 0.3)
pt3dadd(-101.3, -176.8, -66.9, 0.3)
pt3dadd(-101.9, -177.2, -67.4, 0.3)
pt3dadd(-102.5, -177.7, -67.9, 0.3)
pt3dadd(-103.1, -178, -68.3, 0.3)
pt3dadd(-103.9, -178.3, -69, 0.3)
pt3dadd(-104.9, -179.2, -69.9, 0.3)
pt3dadd(-105.5, -179.7, -70.5, 0.3)
pt3dadd(-106.2, -180, -71.09, 0.3)
pt3dadd(-107, -180.6, -71.9, 0.18)
pt3dadd(-108.4, -180.6, -73, 0.18)
pt3dadd(-108.9, -180.9, -73.4, 0.18)
pt3dadd(-109.7, -180.9, -74.2, 0.18)
pt3dadd(-110.9, -181.5, -75.3, 0.18)
pt3dadd(-111.6, -181.9, -75.9, 0.18)
pt3dadd(-112.2, -182.6, -76.7, 0.18)
pt3dadd(-112.5, -183.2, -77.3, 0.18)
pt3dadd(-112.9, -183.9, -78, 0.18)
}
dend[53] {pt3dclear()
pt3dadd(-26.1, -97.6, -30, 0.3)
pt3dadd(-25.9, -98.2, -30.6, 0.3)
pt3dadd(-25.4, -98.9, -31.4, 0.3)
pt3dadd(-25.1, -99.6, -32.1, 0.3)
pt3dadd(-24.5, -100.3, -33, 0.3)
pt3dadd(-24.5, -100.9, -33.6, 0.3)
pt3dadd(-24.3, -101.7, -34.4, 0.3)
pt3dadd(-24.3, -102.8, -35.6, 0.3)
pt3dadd(-24.7, -104.1, -36.9, 0.3)
pt3dadd(-24.7, -105, -37.9, 0.3)
pt3dadd(-24.2, -107.2, -40.2, 0.3)
pt3dadd(-23.5, -107.8, -41.2, 0.3)
pt3dadd(-22.9, -108.6, -42.2, 0.3)
pt3dadd(-22.2, -109.3, -43.3, 0.3)
pt3dadd(-21.6, -110, -44.3, 0.3)
pt3dadd(-21.4, -110.8, -45.1, 0.3)
pt3dadd(-21, -111.5, -45.9, 0.3)
}
}
proc shape3d_16() {
dend[53] { pt3dadd(-20.7, -112.2, -46.8, 0.3)
pt3dadd(-20.1, -112.9, -47.7, 0.3)
pt3dadd(-18.89, -114.4, -49.8, 0.3)
pt3dadd(-18.39, -115.3, -50.8, 0.3)
pt3dadd(-18.39, -116.2, -51.8, 0.3)
pt3dadd(-18.2, -116.9, -52.5, 0.3)
pt3dadd(-18, -117.7, -53.4, 0.3)
pt3dadd(-17.39, -118.4, -54.3, 0.3)
pt3dadd(-16.5, -119.1, -55.4, 0.3)
pt3dadd(-16, -119.6, -56.1, 0.3)
pt3dadd(-15.3, -120.7, -57.4, 0.3)
pt3dadd(-15.3, -121.7, -58.3, 0.3)
pt3dadd(-15, -123.5, -60, 0.3)
pt3dadd(-13.6, -125.5, -62, 0.3)
pt3dadd(-13.6, -126.2, -62.6, 0.3)
pt3dadd(-13.4, -127.3, -63.5, 0.3)
pt3dadd(-13.4, -127.9, -64, 0.3)
pt3dadd(-13.2, -128.5, -64.4, 0.3)
pt3dadd(-12.4, -128.9, -65, 0.3)
pt3dadd(-11.6, -129.19, -65.5, 0.3)
pt3dadd(-11.1, -129.5, -65.9, 0.3)
pt3dadd(-10.8, -130.3, -66.5, 0.3)
pt3dadd(-10.5, -131, -66.9, 0.3)
pt3dadd(-10.3, -132.1, -67.59, 0.3)
pt3dadd(-10.3, -132.8, -68, 0.3)
pt3dadd(-10.1, -134.19, -68.7, 0.3)
pt3dadd(-10.1, -134.9, -69.09, 0.3)
pt3dadd(-9.8, -135.8, -69.5, 0.3)
pt3dadd(-8.8, -137.9, -70.59, 0.3)
pt3dadd(-8.6, -138.6, -70.9, 0.3)
pt3dadd(-8.1, -139.4, -71.4, 0.3)
pt3dadd(-7.8, -140.19, -71.7, 0.3)
pt3dadd(-7.6, -140.9, -72, 0.3)
}
dend[54] {pt3dclear()
pt3dadd(-19.6, -41.5, 24, 0.7)
pt3dadd(-19.2, -42.3, 23.8, 0.3)
pt3dadd(-18.7, -43.1, 23.7, 0.3)
pt3dadd(-17.89, -45.1, 23.5, 0.3)
pt3dadd(-17.89, -46, 23.5, 0.3)
pt3dadd(-18.2, -48.1, 23.6, 0.3)
pt3dadd(-18.5, -48.8, 23.6, 0.3)
pt3dadd(-18.5, -49.8, 23.8, 0.3)
pt3dadd(-18.5, -54.1, 24.7, 0.3)
pt3dadd(-18.1, -55.6, 25.2, 0.3)
pt3dadd(-17.89, -57.1, 25.7, 0.3)
pt3dadd(-17.6, -60.7, 27, 0.3)
pt3dadd(-17.6, -64.7, 28.7, 0.3)
pt3dadd(-17, -66.7, 29.6, 0.3)
pt3dadd(-15.8, -69.7, 31.1, 0.3)
pt3dadd(-15, -70.7, 31.6, 0.3)
pt3dadd(-14.1, -71.4, 32.1, 0.3)
pt3dadd(-13.3, -72.2, 32.6, 0.3)
pt3dadd(-12.6, -73.2, 33.1, 0.3)
pt3dadd(-11.4, -75.3, 34, 0.3)
pt3dadd(-11.1, -76.4, 34.4, 0.3)
pt3dadd(-10.7, -79.3, 35.2, 0.3)
pt3dadd(-9.8, -82.7, 35.9, 0.3)
pt3dadd(-9.19, -83.4, 36.1, 0.3)
pt3dadd(-8.9, -84, 36.1, 0.3)
pt3dadd(-8.69, -84.8, 36.2, 0.3)
pt3dadd(-8.69, -85.9, 36.29, 0.3)
pt3dadd(-9.1, -86.9, 36.29, 0.3)
pt3dadd(-9.1, -87.9, 36.2, 0.3)
pt3dadd(-9.1, -89.1, 36.1, 0.3)
pt3dadd(-9.1, -90, 36, 0.3)
}
dend[55] {pt3dclear()
pt3dadd(-9.1, -90, 36, 0.3)
pt3dadd(-9.6, -90.4, 35.9, 0.3)
pt3dadd(-10, -90.9, 35.79, 0.3)
pt3dadd(-10.3, -91.6, 35.6, 0.3)
pt3dadd(-10.3, -92.3, 35.4, 0.3)
pt3dadd(-10.3, -95.4, 34.4, 0.3)
pt3dadd(-10.1, -98.7, 32.9, 0.3)
pt3dadd(-10.4, -99.4, 32.5, 0.3)
pt3dadd(-10.7, -100.1, 32.1, 0.3)
pt3dadd(-11.6, -100.9, 31.4, 0.3)
pt3dadd(-11.6, -101.6, 30.9, 0.3)
pt3dadd(-11.6, -104.8, 28.8, 0.3)
pt3dadd(-11.1, -108.7, 25.5, 0.3)
pt3dadd(-10.4, -110.4, 23.9, 0.3)
pt3dadd(-9.69, -111, 23, 0.3)
pt3dadd(-9, -111.3, 22.3, 0.3)
pt3dadd(-8.4, -112.4, 21.1, 0.3)
pt3dadd(-7.8, -112.9, 20.3, 0.3)
pt3dadd(-7.3, -113.2, 19.6, 0.3)
pt3dadd(-6.5, -113.5, 18.7, 0.3)
pt3dadd(-5.9, -113.8, 18, 0.3)
}
dend[56] {pt3dclear()
pt3dadd(-9.1, -90, 36, 0.3)
pt3dadd(-7.6, -94.3, 35, 0.3)
pt3dadd(-7.6, -95.2, 34.7, 0.3)
pt3dadd(-7.2, -97.6, 33.79, 0.3)
pt3dadd(-6.8, -98.2, 33.5, 0.3)
pt3dadd(-6.8, -99, 33.2, 0.3)
pt3dadd(-6.6, -100, 32.7, 0.3)
pt3dadd(-6, -102.5, 31.4, 0.3)
pt3dadd(-6, -103.6, 30.8, 0.3)
pt3dadd(-5.8, -104.5, 30.3, 0.3)
pt3dadd(-5.8, -105.2, 29.8, 0.3)
pt3dadd(-6.2, -108, 27.9, 0.3)
pt3dadd(-6.6, -108.7, 27.4, 0.3)
pt3dadd(-7.2, -109, 26.9, 0.3)
pt3dadd(-7.2, -109.9, 26.2, 0.3)
pt3dadd(-6.9, -110.6, 25.7, 0.3)
pt3dadd(-6.3, -111.5, 24.9, 0.3)
pt3dadd(-5.9, -111.8, 24.4, 0.3)
pt3dadd(-5.5, -112.4, 23.8, 0.3)
pt3dadd(-5.2, -113.2, 23.1, 0.3)
pt3dadd(-5.2, -114, 22.5, 0.3)
pt3dadd(-5.2, -117, 19.7, 0.3)
pt3dadd(-5.5, -117.7, 18.89, 0.3)
pt3dadd(-5.9, -118.2, 18.39, 0.3)
pt3dadd(-6.2, -119.1, 17.39, 0.3)
pt3dadd(-6.8, -120.7, 15.7, 0.3)
pt3dadd(-7.1, -121.4, 14.9, 0.3)
pt3dadd(-7.4, -122.5, 13.7, 0.3)
pt3dadd(-7.7, -123.4, 12.7, 0.3)
pt3dadd(-7.7, -124, 12, 0.3)
}
apic {pt3dclear()
pt3dstyle(1, 10, 0, 30)
pt3dadd(20.8, 0.3, 29.5, 2.1)
pt3dadd(21.5, 0.5, 29, 2.1)
pt3dadd(22.4, 0.4, 28.4, 2.1)
pt3dadd(23.8, 0.5, 27.5, 2.1)
pt3dadd(24.6, 0.5, 27, 2.1)
pt3dadd(26.1, 0.6, 26, 2.1)
pt3dadd(26.8, 0.5, 25.6, 2.1)
pt3dadd(30.1, 0.2, 23.5, 2.1)
pt3dadd(32.7, 0.2, 21.9, 2.1)
pt3dadd(33.29, 0.5, 21.5, 2.1)
pt3dadd(34.4, 0.9, 20.9, 2.1)
pt3dadd(35.79, 1.2, 20, 2.1)
pt3dadd(36.6, 1.2, 19.6, 2.1)
pt3dadd(37.4, 1.3, 19.2, 2.1)
pt3dadd(37.9, 1.3, 18.89, 2.1)
pt3dadd(41.1, 1, 17.2, 2.1)
pt3dadd(42.7, 0.5, 16.5, 2.1)
pt3dadd(43.4, 0.4, 16.1, 2.1)
pt3dadd(43.9, 0.09, 15.9, 2.1)
pt3dadd(45.1, -0.3, 15.3, 2.1)
pt3dadd(46, -0.4, 15, 2.1)
pt3dadd(46.9, -0.8, 14.6, 2.1)
pt3dadd(47.7, -0.9, 14.3, 2.1)
pt3dadd(48.5, -1.3, 14, 2.1)
pt3dadd(49.4, -1.3, 13.7, 2.1)
pt3dadd(50.6, -1.7, 13.3, 2.1)
pt3dadd(51.3, -2.2, 13.1, 2.1)
pt3dadd(52.5, -3.1, 12.8, 2.1)
pt3dadd(53, -3.5, 12.6, 2.1)
pt3dadd(54, -3.9, 12.4, 2.1)
pt3dadd(54.6, -4.2, 12.3, 2.1)
pt3dadd(55.2, -4.3, 12.2, 2.1)
pt3dadd(56, -4.3, 12.1, 2.1)
pt3dadd(56.8, -5.09, 12, 2.1)
}
apic[1] {pt3dclear()
pt3dadd(56.8, -5.09, 12, 2.1)
pt3dadd(57.3, -4.5, 11, 0.5)
pt3dadd(57.4, -3.8, 10, 0.5)
pt3dadd(57.1, -3.1, 8.8, 0.5)
pt3dadd(57.2, -2.6, 7.8, 0.5)
pt3dadd(57.7, 0, 2.7, 0.5)
pt3dadd(57.3, 0.5, 1.4, 0.5)
pt3dadd(57.4, 1.2, 0, 0.5)
pt3dadd(57.7, 2, -1.7, 0.5)
pt3dadd(58, 2.7, -3, 0.5)
pt3dadd(58, 3.7, -4.59, 0.5)
pt3dadd(58.1, 4.7, -6, 0.5)
}
apic[2] {pt3dclear()
pt3dadd(58.1, 4.7, -6, 0.5)
pt3dadd(58.7, 4.59, -6.7, 0.5)
pt3dadd(59.2, 5.09, -7.5, 0.5)
pt3dadd(60, 5.3, -8.3, 0.5)
pt3dadd(60.5, 5.7, -9, 0.5)
pt3dadd(61.2, 6.4, -10.19, 0.5)
pt3dadd(61.6, 7.5, -11.4, 0.5)
pt3dadd(62.2, 8.3, -12.5, 0.5)
pt3dadd(62.7, 8.9, -13.3, 0.5)
pt3dadd(63.4, 9.3, -14.1, 0.5)
pt3dadd(64.3, 9.5, -15, 0.5)
pt3dadd(65.09, 10.1, -16, 0.5)
pt3dadd(66.5, 11.3, -17.8, 0.5)
pt3dadd(67.09, 12, -18.7, 0.5)
pt3dadd(67.2, 12.5, -19.3, 0.5)
pt3dadd(67.9, 13.4, -20.3, 0.5)
pt3dadd(68.7, 13.8, -21.1, 0.5)
pt3dadd(69.4, 14.3, -21.9, 0.5)
pt3dadd(70, 14.8, -22.6, 0.5)
pt3dadd(70.59, 16, -23.8, 0.5)
pt3dadd(70.9, 16.6, -24.4, 0.5)
pt3dadd(71.3, 17.5, -25.2, 0.5)
pt3dadd(71.9, 18.8, -26.4, 0.5)
pt3dadd(72.3, 19.3, -27, 0.5)
pt3dadd(73.3, 19.89, -27.9, 0.5)
pt3dadd(74, 20.6, -28.7, 0.5)
pt3dadd(74.4, 21.1, -29.2, 0.5)
pt3dadd(75, 21.3, -29.7, 0.5)
pt3dadd(75.5, 21.9, -30.2, 0.5)
pt3dadd(76.4, 22.5, -31, 0.5)
pt3dadd(77.5, 22.9, -31.9, 0.5)
pt3dadd(78.2, 23.1, -32.4, 0.5)
pt3dadd(79, 23, -33, 0.5)
pt3dadd(79.59, 23.2, -33.4, 0.5)
pt3dadd(80.3, 24, -34.1, 0.5)
pt3dadd(80.59, 24.6, -34.6, 0.5)
pt3dadd(81.5, 25.5, -35.4, 0.5)
pt3dadd(82.7, 26.6, -36.4, 0.5)
}
}
proc shape3d_17() {
apic[2] { pt3dadd(83.4, 26.8, -36.9, 0.5)
pt3dadd(84, 27.1, -37.29, 0.5)
pt3dadd(84.9, 27.4, -37.79, 0.5)
pt3dadd(85.7, 27.8, -38.4, 0.5)
pt3dadd(86.5, 28.1, -38.79, 0.5)
pt3dadd(87.2, 28.4, -39.2, 0.5)
pt3dadd(87.9, 28.6, -39.6, 0.5)
pt3dadd(88.6, 29.2, -40.1, 0.5)
pt3dadd(89.2, 29.5, -40.4, 0.5)
pt3dadd(90.7, 30.2, -41.2, 0.5)
pt3dadd(91.6, 30.7, -41.7, 0.5)
pt3dadd(92.5, 31.3, -42.2, 0.5)
pt3dadd(92.9, 31.8, -42.5, 0.5)
pt3dadd(93.7, 32.29, -42.8, 0.5)
pt3dadd(94.3, 33.1, -43.3, 0.5)
pt3dadd(95.2, 34, -43.8, 0.5)
pt3dadd(96.2, 34.6, -44.2, 0.5)
pt3dadd(96.6, 35.2, -44.4, 0.5)
pt3dadd(97.3, 35.6, -44.7, 0.5)
pt3dadd(97.7, 36.1, -44.9, 0.5)
pt3dadd(98.3, 36.79, -45.2, 0.5)
pt3dadd(98.7, 37.6, -45.4, 0.5)
pt3dadd(98.8, 38.7, -45.8, 0.5)
pt3dadd(99.2, 39.4, -46, 0.5)
pt3dadd(99.8, 40, -46.2, 0.5)
pt3dadd(100.5, 40.4, -46.4, 0.5)
pt3dadd(101.1, 40.7, -46.5, 0.5)
pt3dadd(101.8, 41.1, -46.7, 0.5)
pt3dadd(102.5, 41, -46.9, 0.5)
pt3dadd(104, 41.1, -47.1, 0.5)
pt3dadd(105.3, 41.9, -47.4, 0.5)
pt3dadd(106, 42.4, -47.5, 0.5)
pt3dadd(106.8, 43.1, -47.6, 0.5)
pt3dadd(107.5, 43.2, -47.7, 0.5)
pt3dadd(108.1, 43.5, -47.8, 0.5)
pt3dadd(108.8, 43.5, -47.8, 0.5)
pt3dadd(112, 43.2, -48, 0.5)
pt3dadd(113.1, 43.1, -48, 0.5)
}
apic[3] {pt3dclear()
pt3dadd(58.1, 4.7, -6, 0.5)
pt3dadd(58.1, 5.2, -6.7, 0.5)
pt3dadd(58.2, 6.1, -7.5, 0.5)
pt3dadd(58, 7.1, -8.3, 0.5)
pt3dadd(58.1, 8.19, -8.8, 0.5)
pt3dadd(58.4, 8.8, -9.1, 0.5)
pt3dadd(58.5, 9.8, -9.6, 0.5)
pt3dadd(58.8, 10.5, -10.1, 0.5)
pt3dadd(59.2, 11.4, -11, 0.5)
pt3dadd(59.5, 12.2, -12, 0.5)
}
apic[4] {pt3dclear()
pt3dadd(59.5, 12.2, -12, 0.5)
pt3dadd(59.4, 10.9, -14.8, 0.5)
pt3dadd(59.9, 11.8, -18, 0.5)
pt3dadd(60.7, 12.3, -21.9, 0.5)
pt3dadd(61.4, 12.5, -25.4, 0.5)
pt3dadd(62.1, 13, -30, 0.5)
}
apic[5] {pt3dclear()
pt3dadd(59.5, 12.2, -12, 0.5)
pt3dadd(59.3, 12.7, -12.8, 0.5)
pt3dadd(58.7, 12.8, -13.7, 0.5)
pt3dadd(57.4, 13.1, -15.7, 0.5)
pt3dadd(57.1, 13.8, -16.89, 0.5)
pt3dadd(57.1, 14.4, -17.89, 0.5)
pt3dadd(56.8, 14.9, -18.89, 0.5)
pt3dadd(56.6, 15.5, -20.1, 0.5)
pt3dadd(56.6, 16.3, -21.5, 0.5)
pt3dadd(57.2, 16.7, -22.9, 0.5)
pt3dadd(57.5, 17.39, -24.3, 0.5)
pt3dadd(58.9, 19.2, -29.1, 0.5)
pt3dadd(59.7, 18.8, -31.2, 0.5)
pt3dadd(60.8, 18.7, -33.7, 0.5)
pt3dadd(62, 19.2, -36.7, 0.5)
pt3dadd(63, 19.1, -39.4, 0.5)
pt3dadd(64.5, 18.7, -43.4, 0.5)
pt3dadd(65.4, 18, -46.3, 0.5)
pt3dadd(65.9, 17.7, -48, 0.5)
}
apic[6] {pt3dclear()
pt3dadd(56.8, -5.09, 12, 2.1)
pt3dadd(57.6, -5.4, 12, 2.1)
pt3dadd(58.5, -5.6, 12, 2.1)
}
apic[7] {pt3dclear()
pt3dadd(58.5, -5.6, 12, 2.1)
pt3dadd(59.3, -5.6, 12, 2.1)
pt3dadd(60.2, -5.8, 12, 2.1)
}
apic[8] {pt3dclear()
pt3dadd(60.2, -5.8, 12, 2.1)
pt3dadd(60.9, -5.6, 12.1, 2.1)
pt3dadd(61.2, -6.2, 12.3, 2.1)
pt3dadd(61.9, -6.6, 12.8, 2.1)
pt3dadd(62.9, -6.7, 13.6, 2.1)
pt3dadd(66.3, -7, 16.7, 2.1)
pt3dadd(67.09, -7, 17.39, 2.1)
pt3dadd(67.9, -7.6, 18, 2.1)
}
apic[9] {pt3dclear()
pt3dadd(67.9, -7.6, 18, 2.1)
pt3dadd(68.59, -7.9, 18.5, 2.1)
pt3dadd(69.4, -7.9, 18.89, 2.1)
pt3dadd(70.2, -7.5, 19.39, 2.1)
pt3dadd(71.3, -7.6, 20, 2.1)
pt3dadd(72.9, -8, 20.9, 2.1)
pt3dadd(74.8, -8.5, 21.9, 2.1)
pt3dadd(78, -9.1, 23.3, 2.1)
pt3dadd(78.59, -9.1, 23.5, 2.1)
pt3dadd(79.3, -9.5, 23.8, 2.1)
pt3dadd(79.9, -9.5, 24, 2.1)
}
apic[10] {pt3dclear()
pt3dadd(79.9, -9.5, 24, 2.1)
pt3dadd(80.59, -9.8, 24.2, 2.1)
pt3dadd(81.2, -10.19, 24.3, 2.1)
pt3dadd(81.9, -10.19, 24.4, 2.1)
pt3dadd(82.4, -10.6, 24.4, 2.1)
pt3dadd(83.4, -10.7, 24.4, 2.1)
pt3dadd(85.5, -10.6, 24.2, 2.1)
pt3dadd(86.4, -10.5, 24, 2.1)
pt3dadd(87, -10.5, 23.9, 2.1)
pt3dadd(90.4, -11.2, 23.6, 2.1)
pt3dadd(90.9, -11.3, 23.6, 2.1)
pt3dadd(91.8, -11.4, 23.7, 2.1)
pt3dadd(93.1, -11.8, 24, 2.1)
}
apic[11] {pt3dclear()
pt3dadd(93.1, -11.8, 24, 2.1)
pt3dadd(94.2, -11.9, 24.3, 2.1)
pt3dadd(95, -11.8, 24.6, 2.1)
pt3dadd(95.7, -11.8, 24.9, 2.1)
pt3dadd(99.3, -12.2, 26.3, 2.1)
pt3dadd(100.2, -11.9, 26.7, 2.1)
pt3dadd(101.4, -12, 27.2, 2.1)
pt3dadd(104.6, -12.3, 28.7, 2.1)
pt3dadd(106.2, -12.2, 29.4, 2.1)
pt3dadd(106.7, -12.3, 29.7, 2.1)
pt3dadd(110.2, -12.6, 31.4, 2.1)
pt3dadd(111.4, -12.5, 31.9, 2.1)
pt3dadd(112.4, -12.3, 32.4, 2.1)
pt3dadd(113, -12.3, 32.7, 2.1)
pt3dadd(113.6, -12.3, 33, 2.1)
pt3dadd(114.3, -12.4, 33.29, 2.1)
pt3dadd(117, -12.3, 34.4, 2.1)
pt3dadd(117.7, -12.4, 34.7, 2.1)
pt3dadd(119.9, -12.8, 35.5, 2.1)
pt3dadd(120.8, -12.8, 35.79, 2.1)
pt3dadd(121.3, -12.9, 36, 2.1)
}
apic[12] {pt3dclear()
pt3dadd(121.3, -12.9, 36, 2.1)
pt3dadd(122, -13, 36.2, 2)
pt3dadd(122.6, -13.1, 36.4, 2)
pt3dadd(125.5, -13.6, 37.2, 2)
pt3dadd(126.3, -13.7, 37.4, 2)
pt3dadd(126.8, -14, 37.6, 2)
pt3dadd(127.6, -14.1, 37.79, 2)
pt3dadd(129.3, -14, 38.1, 2)
pt3dadd(130, -13.8, 38.29, 2)
pt3dadd(131, -13.9, 38.5, 2)
pt3dadd(132.69, -14.3, 38.9, 2)
pt3dadd(133.4, -14.4, 39, 2)
pt3dadd(134.1, -14.8, 39.1, 2)
pt3dadd(134.69, -14.8, 39.29, 2)
pt3dadd(135.4, -14.7, 39.4, 2)
pt3dadd(136.9, -14.3, 39.7, 2)
pt3dadd(137.4, -14.4, 39.79, 2)
pt3dadd(138.5, -14.2, 40.1, 2)
pt3dadd(140.6, -14.2, 40.5, 2)
pt3dadd(141.19, -14, 40.7, 2)
pt3dadd(142.69, -13.9, 41.1, 2)
pt3dadd(143.6, -13.6, 41.3, 2)
pt3dadd(144.4, -13.5, 41.5, 2)
pt3dadd(145, -13.5, 41.7, 2)
pt3dadd(145.8, -13.3, 42, 2)
}
apic[13] {pt3dclear()
pt3dadd(145.8, -13.3, 42, 2)
pt3dadd(146.8, -13.4, 42.4, 2)
pt3dadd(147.8, -13.2, 43.1, 2)
pt3dadd(148.5, -13.3, 43.5, 2)
pt3dadd(151.8, -13.5, 46.1, 2)
pt3dadd(152.4, -13.2, 46.6, 2)
pt3dadd(152.9, -12.9, 47, 2)
pt3dadd(153.6, -12.5, 47.5, 2)
pt3dadd(154.19, -12.6, 47.7, 2)
pt3dadd(154.9, -12.4, 47.9, 2)
pt3dadd(155.5, -12.3, 48, 2)
}
apic[14] {pt3dclear()
pt3dadd(155.5, -12.3, 48, 2)
pt3dadd(156.19, -12.3, 48, 2)
pt3dadd(156.9, -12.2, 48, 2)
pt3dadd(158.8, -11.9, 48, 2)
pt3dadd(159.69, -12, 48, 2)
pt3dadd(162.8, -11.8, 48, 2)
pt3dadd(163.5, -11.7, 48, 2)
pt3dadd(164.1, -11.4, 48, 2)
pt3dadd(164.7, -11.5, 48, 2)
pt3dadd(165.4, -11.5, 48, 2)
pt3dadd(166.3, -11.3, 48, 2)
}
apic[15] {pt3dclear()
pt3dadd(166.3, -11.3, 48, 2)
pt3dadd(167, -11.2, 48, 2)
pt3dadd(167.8, -11.5, 48, 2)
pt3dadd(168.4, -11.2, 48, 2)
pt3dadd(169, -11.3, 48, 2)
pt3dadd(169.8, -11.6, 48, 2)
}
apic[16] {pt3dclear()
pt3dadd(169.8, -11.6, 48, 2)
pt3dadd(170.5, -11.7, 48.6, 2)
pt3dadd(171, -12.1, 49.8, 2)
pt3dadd(171.6, -12.1, 51.3, 2)
pt3dadd(172.4, -12.2, 53, 2)
pt3dadd(173.1, -12.3, 54, 2)
}
apic[17] {pt3dclear()
pt3dadd(173.1, -12.3, 54, 2)
pt3dadd(173.6, -12.7, 54.4, 2)
pt3dadd(174.5, -12.8, 54.7, 2)
pt3dadd(175.2, -12.4, 54.8, 2)
pt3dadd(176.1, -12.2, 54.7, 2)
pt3dadd(177.1, -12.3, 54.5, 2)
pt3dadd(180.3, -12.6, 53.4, 2)
pt3dadd(183.4, -12.8, 53, 2)
pt3dadd(184.8, -13, 53.4, 2)
}
}
proc shape3d_18() {
apic[17] { pt3dadd(185.6, -13, 54, 2)
}
apic[18] {pt3dclear()
pt3dadd(185.6, -13, 54, 2)
pt3dadd(186.3, -13.3, 54.7, 2)
pt3dadd(187, -13.3, 55.5, 2)
pt3dadd(190.8, -13.8, 60, 2)
pt3dadd(191.8, -13.9, 60.6, 2)
pt3dadd(192.9, -13.8, 61.2, 2)
pt3dadd(194.1, -13.9, 61.7, 2)
pt3dadd(196.1, -13.7, 62.6, 2)
pt3dadd(196.7, -13.8, 62.9, 2)
pt3dadd(197.4, -13.6, 63.2, 2)
pt3dadd(198, -13.4, 63.5, 2)
pt3dadd(198.6, -13.4, 63.7, 2)
pt3dadd(199.7, -13.3, 64.2, 2)
pt3dadd(200.5, -13.4, 64.59, 2)
pt3dadd(201.3, -13.7, 65.09, 2)
pt3dadd(202, -13.8, 65.4, 2)
pt3dadd(203, -13.9, 66, 2)
}
apic[19] {pt3dclear()
pt3dadd(203, -13.9, 66, 2)
pt3dadd(202.8, -14.6, 67.8, 2)
pt3dadd(203.5, -14.6, 70.8, 2)
pt3dadd(204.3, -14.2, 76.59, 2)
pt3dadd(205.8, -13.7, 90, 2)
}
apic[20] {pt3dclear()
pt3dadd(203, -13.9, 66, 2)
pt3dadd(204.4, -14.1, 66.9, 2)
pt3dadd(205, -14.2, 67.4, 2)
pt3dadd(208.3, -14.5, 70.09, 1.2)
pt3dadd(209.3, -14.6, 70.9, 1.2)
pt3dadd(210.5, -14.7, 71.59, 1.2)
pt3dadd(211.2, -14.7, 72, 1.2)
}
apic[21] {pt3dclear()
pt3dadd(211.2, -14.7, 72, 1.2)
pt3dadd(212, -14.5, 72.2, 1.2)
pt3dadd(212.6, -14.9, 72.2, 1.2)
pt3dadd(213.3, -15, 72.09, 1.2)
pt3dadd(214.8, -15.1, 71.9, 1.2)
pt3dadd(216, -15.2, 72, 1.2)
}
apic[22] {pt3dclear()
pt3dadd(216, -15.2, 72, 1.2)
pt3dadd(216.8, -15.6, 72.4, 1.2)
pt3dadd(217.5, -15.7, 72.7, 1.2)
pt3dadd(218.9, -16.1, 73.4, 1.2)
pt3dadd(219.9, -16.2, 73.9, 1.2)
pt3dadd(221.4, -16.1, 74.7, 1.2)
pt3dadd(222, -16.1, 75, 1.2)
pt3dadd(225.2, -16.39, 76.7, 1.2)
pt3dadd(225.8, -16.8, 77, 1.2)
pt3dadd(226.4, -16.8, 77.3, 1.2)
pt3dadd(227, -17.2, 77.59, 1.2)
pt3dadd(227.8, -17.6, 78, 1.2)
}
apic[23] {pt3dclear()
pt3dadd(227.8, -17.6, 78, 1.2)
pt3dadd(228.3, -18, 78.3, 1.2)
pt3dadd(229, -18.5, 78.59, 1.2)
pt3dadd(230.4, -18.6, 79.2, 1.2)
pt3dadd(234, -18.89, 80.7, 1.2)
pt3dadd(234.5, -19.2, 80.9, 1.2)
pt3dadd(235.1, -19.3, 81.09, 1.2)
pt3dadd(238.9, -20, 82.5, 1.2)
pt3dadd(240.3, -21.1, 83.1, 1.2)
pt3dadd(240.7, -21.9, 83.4, 1.2)
pt3dadd(241.8, -21.8, 83.7, 1.2)
pt3dadd(242.7, -21.6, 84, 1.2)
}
apic[24] {pt3dclear()
pt3dadd(242.7, -21.6, 84, 1.2)
pt3dadd(243.5, -21.7, 84.2, 1.2)
pt3dadd(244.8, -21.8, 84.5, 1.2)
pt3dadd(249, -22.2, 85.5, 1.2)
pt3dadd(249.8, -21.9, 85.7, 1.2)
pt3dadd(251.1, -21.5, 86, 1.2)
pt3dadd(252.1, -21.1, 86.2, 1.2)
pt3dadd(253, -20.9, 86.4, 1.2)
pt3dadd(254.2, -20.7, 86.7, 1.2)
pt3dadd(256, -20.7, 87, 1.2)
pt3dadd(259.2, -21, 87.5, 1.2)
pt3dadd(260.1, -21.4, 87.7, 1.2)
pt3dadd(261, -21.8, 87.9, 1.2)
pt3dadd(261.8, -21.9, 88, 1.2)
pt3dadd(262.89, -21.6, 88.1, 1.2)
pt3dadd(264, -21.5, 88.3, 1.2)
pt3dadd(266.39, -20.8, 88.6, 1.2)
pt3dadd(267.7, -20.9, 88.8, 1.2)
pt3dadd(271.7, -21.3, 89.2, 1.2)
pt3dadd(274.8, -22.2, 89.4, 1.2)
pt3dadd(275.89, -22.3, 89.5, 1.2)
pt3dadd(279.39, -22.6, 89.8, 1.2)
pt3dadd(280.7, -22.5, 89.8, 1.2)
pt3dadd(283.2, -22.2, 89.9, 1.2)
pt3dadd(284, -22.3, 90, 1.2)
pt3dadd(284.89, -22.8, 90, 1.2)
}
apic[25] {pt3dclear()
pt3dadd(284.89, -22.8, 90, 1.2)
pt3dadd(285.8, -23.1, 90, 1.2)
pt3dadd(286.3, -23.4, 90, 1.2)
pt3dadd(287.6, -23.5, 90, 1.2)
pt3dadd(290.39, -23.8, 90, 1.2)
pt3dadd(291.39, -23.7, 90, 1.2)
}
apic[26] {pt3dclear()
pt3dadd(291.39, -23.7, 90, 1.2)
pt3dadd(292.39, -23.8, 90, 1.2)
pt3dadd(293.5, -24, 90, 1.2)
pt3dadd(295.3, -23.8, 90, 1.2)
pt3dadd(295.89, -23.6, 90, 1.2)
pt3dadd(296.5, -23.4, 90, 1.2)
pt3dadd(297.6, -23.5, 90, 1.2)
pt3dadd(299.5, -24.2, 90, 1.2)
pt3dadd(300.2, -24.6, 90, 1.2)
pt3dadd(301, -24.6, 90, 1.2)
pt3dadd(303.7, -24.7, 90, 1.2)
pt3dadd(305.6, -24.3, 90, 1.2)
pt3dadd(306.2, -24.1, 90, 1.2)
pt3dadd(306.8, -24.1, 90, 1.2)
pt3dadd(310.3, -24.5, 90, 1.2)
pt3dadd(313.39, -25.1, 90, 1.2)
pt3dadd(314, -25.1, 90, 1.2)
pt3dadd(316.3, -25.7, 90, 1.2)
pt3dadd(317.2, -25.8, 90, 1.2)
pt3dadd(318.5, -26, 90, 1.2)
}
apic[27] {pt3dclear()
pt3dadd(318.5, -26, 90, 1.2)
pt3dadd(319.1, -26, 90, 1.2)
pt3dadd(319.8, -26.1, 90, 1.2)
pt3dadd(320.6, -26.4, 90, 1.2)
}
apic[28] {pt3dclear()
pt3dadd(320.6, -26.4, 90, 1.2)
pt3dadd(321.5, -26.9, 90, 1.2)
pt3dadd(322, -26.9, 90, 1.2)
pt3dadd(322.6, -27.3, 90, 1.2)
pt3dadd(323.39, -27.4, 90, 1.2)
pt3dadd(326.5, -27.4, 90, 1.2)
pt3dadd(327.2, -27.5, 90, 1.2)
pt3dadd(328.1, -27.9, 90, 1.2)
pt3dadd(328.8, -28, 90, 1.2)
pt3dadd(330.7, -27.9, 90, 1.2)
pt3dadd(331.4, -28, 90, 1.2)
pt3dadd(334, -28.3, 90, 1.1)
pt3dadd(335.4, -28.7, 90, 1.1)
}
apic[29] {pt3dclear()
pt3dadd(335.4, -28.7, 90, 1.1)
pt3dadd(336.1, -28.6, 90, 1.1)
pt3dadd(336.7, -28.6, 90, 1.1)
pt3dadd(337.6, -29.3, 89.9, 1.1)
pt3dadd(338.1, -29.7, 89.8, 1.1)
pt3dadd(339.1, -29.8, 89.7, 1.1)
pt3dadd(340.4, -29.7, 89.5, 1.1)
pt3dadd(341.4, -29.8, 89.4, 1.1)
pt3dadd(343.2, -30.3, 89, 1.1)
pt3dadd(344.4, -30.8, 88.7, 1.1)
pt3dadd(345.3, -30.9, 88.5, 1.1)
pt3dadd(346.4, -30.7, 88.2, 1.1)
pt3dadd(347, -30.8, 88.1, 1.1)
pt3dadd(347.6, -30.6, 87.9, 1.1)
pt3dadd(349.3, -30.3, 87.4, 1.1)
pt3dadd(350, -30.4, 87.2, 1.1)
pt3dadd(350.7, -30, 87, 1.1)
pt3dadd(351.3, -29.5, 86.8, 1.1)
pt3dadd(351.9, -28.6, 86.5, 1.1)
pt3dadd(352.3, -28.1, 86.3, 1.1)
pt3dadd(352.9, -27.7, 86.1, 1.1)
pt3dadd(353.4, -27.1, 85.9, 1.1)
pt3dadd(354.3, -26.1, 85.5, 1.1)
pt3dadd(354.7, -25.3, 85.3, 1.1)
pt3dadd(355.3, -25.1, 85.2, 1.1)
pt3dadd(355.9, -24.8, 85, 1.1)
pt3dadd(356.7, -24.5, 84.8, 1.1)
pt3dadd(357.8, -23.6, 84.6, 1.1)
pt3dadd(359.1, -22.8, 84.3, 1.1)
pt3dadd(359.7, -22.6, 84.3, 1.1)
pt3dadd(360.8, -22.5, 84.1, 1.1)
pt3dadd(361.8, -22.1, 84, 1.1)
pt3dadd(362.4, -21.7, 84, 1.1)
pt3dadd(363.1, -21.5, 84, 1.1)
}
apic[30] {pt3dclear()
pt3dadd(363.1, -21.5, 84, 1.1)
pt3dadd(363.1, -20.6, 85, 1.1)
pt3dadd(363.1, -19.89, 87, 1.1)
pt3dadd(363.6, -18.1, 95.4, 1.1)
pt3dadd(364.4, -17.6, 100.1, 1.1)
pt3dadd(365.4, -17.1, 104.7, 1.1)
pt3dadd(365.9, -16.8, 106.5, 1.1)
pt3dadd(366.7, -16.2, 108, 1.1)
}
apic[31] {pt3dclear()
pt3dadd(366.7, -16.2, 108, 1.1)
pt3dadd(366.4, -17, 108, 1.1)
pt3dadd(367.1, -16.1, 107.8, 1.1)
pt3dadd(367.7, -15.6, 107.7, 1.1)
pt3dadd(368.7, -15.1, 107.5, 1.1)
pt3dadd(369.4, -14.9, 107.3, 1.1)
pt3dadd(370, -14.8, 107.1, 1.1)
pt3dadd(370.5, -14.4, 106.9, 1.1)
pt3dadd(371.8, -14, 106.4, 1.1)
pt3dadd(372.5, -13.9, 106.1, 1.1)
pt3dadd(373.5, -13.4, 105.7, 1.1)
pt3dadd(374.3, -13.2, 105.4, 1.1)
pt3dadd(375, -13.1, 105.1, 1.1)
pt3dadd(375.7, -13.1, 104.8, 1.1)
pt3dadd(376.5, -13.5, 104.4, 1.1)
pt3dadd(377.2, -13.6, 104.1, 1.1)
pt3dadd(378, -14, 103.8, 1.1)
pt3dadd(378.7, -14.1, 103.5, 1.1)
pt3dadd(380.5, -14, 102.9, 1.1)
pt3dadd(381, -13.7, 102.7, 1.1)
pt3dadd(381.7, -13.3, 102.5, 1.1)
pt3dadd(382.7, -12.8, 102.3, 1.1)
pt3dadd(383.4, -12.4, 102.1, 1.1)
pt3dadd(384.1, -12.1, 102.1, 1.1)
pt3dadd(384.8, -11.7, 102, 0.6)
}
apic[32] {pt3dclear()
pt3dadd(384.8, -11.7, 102, 0.6)
pt3dadd(386, -11.3, 102, 0.6)
pt3dadd(386.6, -11, 102, 0.6)
pt3dadd(387.1, -10.4, 102, 0.6)
}
}
proc shape3d_19() {
apic[32] { pt3dadd(388.1, -10.1, 102, 0.6)
}
apic[33] {pt3dclear()
pt3dadd(388.1, -10.1, 102, 0.6)
pt3dadd(388.3, -10.8, 102, 0.6)
pt3dadd(389.2, -11.2, 102.1, 0.6)
pt3dadd(390.1, -11.2, 102.3, 0.6)
pt3dadd(392, -11.1, 102.7, 0.6)
pt3dadd(392.8, -10.6, 103, 0.6)
pt3dadd(393.6, -10.4, 103.2, 0.6)
pt3dadd(394.3, -10.5, 103.5, 0.6)
pt3dadd(397.1, -10.5, 104.5, 0.6)
pt3dadd(397.8, -10.6, 104.7, 0.6)
pt3dadd(398.3, -10.3, 105, 0.6)
pt3dadd(399.2, -9.69, 105.4, 0.6)
pt3dadd(399.8, -9.1, 105.7, 0.6)
pt3dadd(400.7, -9, 106.1, 0.6)
pt3dadd(401.5, -9.1, 106.4, 0.6)
pt3dadd(402.3, -9.5, 106.7, 0.6)
pt3dadd(403.1, -9.19, 107, 0.6)
pt3dadd(403.7, -8.69, 107.3, 0.6)
pt3dadd(405.1, -7.8, 107.8, 0.6)
pt3dadd(405.9, -7.5, 108, 0.18)
}
apic[34] {pt3dclear()
pt3dadd(405.9, -7.5, 108, 0.18)
pt3dadd(406.7, -7, 107.7, 0.18)
pt3dadd(407.3, -6.4, 107, 0.18)
pt3dadd(408, -5.8, 105.9, 0.18)
pt3dadd(409.1, -5.3, 103.8, 0.18)
pt3dadd(410.3, -5, 100.9, 0.18)
pt3dadd(411.3, -4.8, 98.1, 0.18)
pt3dadd(412.2, -4.9, 95.3, 0.18)
pt3dadd(413.7, -5.3, 90.5, 0.18)
pt3dadd(414.7, -5.4, 87.1, 0.18)
pt3dadd(416.3, -5.3, 81.59, 0.18)
pt3dadd(417.1, -5.4, 78.59, 0.18)
pt3dadd(418.7, -5.9, 73.2, 0.18)
pt3dadd(419.7, -6, 70.2, 0.18)
pt3dadd(420.5, -6.3, 67.9, 0.18)
pt3dadd(421, -6.4, 66.4, 0.18)
pt3dadd(425, -6.4, 60, 0.18)
pt3dadd(425.6, -6.5, 59.6, 0.18)
pt3dadd(427.1, -6.9, 58.7, 0.18)
pt3dadd(428, -7, 58.2, 0.18)
pt3dadd(431, -7.1, 56.6, 0.18)
pt3dadd(434, -6.9, 55.3, 0.18)
pt3dadd(434.6, -6.7, 55, 0.18)
pt3dadd(435.3, -6.2, 54.7, 0.18)
pt3dadd(435.6, -5.4, 54.4, 0.18)
pt3dadd(436.5, -4.4, 53.9, 0.18)
pt3dadd(437.3, -3.2, 53.5, 0.18)
pt3dadd(438.5, -1, 52.8, 0.18)
pt3dadd(438.9, -0.3, 52.7, 0.18)
pt3dadd(439.2, 0.3, 52.6, 0.18)
pt3dadd(439.6, 0.9, 52.4, 0.18)
pt3dadd(440.7, 1.5, 52.3, 0.18)
pt3dadd(441.3, 1.7, 52.2, 0.18)
pt3dadd(441.5, 0.6, 52.1, 0.18)
pt3dadd(441.1, -0.6, 52.1, 0.18)
pt3dadd(441, -1.2, 52.1, 0.18)
pt3dadd(440.6, -2.1, 52.1, 0.18)
pt3dadd(440.5, -3.5, 52.2, 0.18)
pt3dadd(439.9, -5, 52.4, 0.18)
pt3dadd(439.4, -6.1, 52.7, 0.18)
pt3dadd(438.9, -6.8, 52.8, 0.18)
pt3dadd(438.5, -7.5, 53, 0.18)
pt3dadd(438.4, -8.5, 53.3, 0.18)
pt3dadd(438, -9.4, 53.6, 0.18)
pt3dadd(437.6, -10.4, 54, 0.18)
pt3dadd(437.2, -11.1, 54.4, 0.18)
pt3dadd(436.3, -12.9, 55.3, 0.18)
pt3dadd(435.1, -14.9, 56.6, 0.18)
pt3dadd(434.6, -15.1, 56.9, 0.18)
pt3dadd(434.1, -15.5, 57.3, 0.18)
pt3dadd(433.3, -15.8, 57.9, 0.18)
pt3dadd(432.9, -16.5, 58.5, 0.18)
pt3dadd(432.3, -16.8, 59, 0.18)
pt3dadd(431.6, -16.7, 59.5, 0.18)
pt3dadd(431.2, -17.1, 60, 0.18)
pt3dadd(430.5, -17.1, 60.6, 0.18)
pt3dadd(429.7, -17, 61.3, 0.18)
pt3dadd(428.3, -17.2, 62.4, 0.18)
pt3dadd(427.5, -17.1, 63.1, 0.18)
pt3dadd(426.7, -17.39, 63.8, 0.18)
pt3dadd(425.9, -17.3, 64.4, 0.18)
pt3dadd(425.2, -17.6, 65.09, 0.18)
pt3dadd(424.4, -17.5, 65.7, 0.18)
pt3dadd(422.5, -17, 67.4, 0.18)
pt3dadd(421.5, -16.89, 68.2, 0.18)
pt3dadd(420.6, -16.5, 69, 0.18)
pt3dadd(419.5, -16.8, 70, 0.18)
pt3dadd(418.2, -17, 71.09, 0.18)
pt3dadd(416.9, -16.8, 72.09, 0.18)
pt3dadd(415.9, -17.1, 73, 0.18)
pt3dadd(415, -17.1, 73.8, 0.18)
pt3dadd(411.4, -16.7, 76.8, 0.18)
pt3dadd(409.6, -16.89, 78.3, 0.18)
pt3dadd(408.9, -17.2, 79, 0.18)
pt3dadd(407.8, -18, 80.2, 0.18)
pt3dadd(406.6, -18.5, 81.3, 0.18)
pt3dadd(404.4, -19.7, 83.4, 0.18)
pt3dadd(404.1, -20.39, 84.2, 0.18)
pt3dadd(403.5, -22.1, 85.7, 0.18)
pt3dadd(403.7, -23.3, 86.8, 0.18)
pt3dadd(403.8, -24.6, 87.9, 0.18)
pt3dadd(404.1, -25.8, 89.1, 0.18)
pt3dadd(404.6, -26.9, 90.2, 0.18)
pt3dadd(405.1, -29.2, 92.4, 0.18)
pt3dadd(405.3, -30.2, 93.3, 0.18)
pt3dadd(405.7, -31.1, 94.2, 0.18)
pt3dadd(406.7, -32.1, 95.5, 0.18)
pt3dadd(408.2, -33.2, 97.3, 0.18)
pt3dadd(409.5, -34.5, 99.1, 0.18)
pt3dadd(411, -35.6, 100.9, 0.18)
pt3dadd(412.2, -36.1, 102.3, 0.18)
pt3dadd(413.6, -36.7, 103.8, 0.18)
pt3dadd(415.2, -36.9, 105.4, 0.18)
pt3dadd(416.9, -36.7, 107.2, 0.18)
pt3dadd(418.6, -36.5, 108.9, 0.18)
pt3dadd(419.8, -36.6, 110.3, 0.18)
pt3dadd(422.1, -37.7, 113, 0.18)
pt3dadd(423.3, -38.6, 114.6, 0.18)
pt3dadd(423.8, -39, 115.3, 0.18)
pt3dadd(424.5, -39.4, 116.2, 0.18)
pt3dadd(426.1, -41.1, 118.8, 0.18)
pt3dadd(427, -41.6, 120, 0.18)
pt3dadd(427.8, -41.6, 120.9, 0.18)
pt3dadd(428.8, -41.4, 122.1, 0.18)
pt3dadd(430.9, -41.4, 124.5, 0.18)
pt3dadd(431.5, -41.8, 125.4, 0.18)
pt3dadd(432, -42.6, 126.6, 0.18)
pt3dadd(432.2, -43.5, 127.7, 0.18)
pt3dadd(432.7, -44.3, 128.8, 0.18)
pt3dadd(433.6, -44.7, 130, 0.18)
pt3dadd(434.5, -44.8, 131, 0.18)
pt3dadd(435.4, -44.6, 132.19, 0.18)
pt3dadd(436.3, -44.7, 133.3, 0.18)
pt3dadd(438.5, -45.2, 136.4, 0.18)
pt3dadd(439.7, -45.6, 138, 0.18)
}
apic[35] {pt3dclear()
pt3dadd(405.9, -7.5, 108, 0.18)
pt3dadd(405.9, -8, 108.4, 0.18)
pt3dadd(405.8, -8.69, 109, 0.18)
pt3dadd(406.3, -9.5, 110.2, 0.18)
pt3dadd(407.6, -10.4, 113.1, 0.18)
pt3dadd(408, -10.8, 114.4, 0.18)
pt3dadd(408.2, -11.4, 116, 0.18)
pt3dadd(408.9, -12.7, 120, 0.18)
pt3dadd(409.9, -13.2, 123.7, 0.18)
pt3dadd(410.1, -13.9, 126.7, 0.18)
pt3dadd(410.6, -15, 131.9, 0.18)
pt3dadd(410.8, -16.1, 137.1, 0.18)
pt3dadd(410.9, -16.8, 140.8, 0.18)
pt3dadd(411.6, -18.3, 149.1, 0.18)
pt3dadd(412.4, -19.1, 155.3, 0.18)
pt3dadd(413.3, -19.2, 159.8, 0.18)
pt3dadd(414.8, -20, 168, 0.18)
pt3dadd(415.3, -20.7, 172.1, 0.18)
pt3dadd(415.8, -21.7, 176.5, 0.18)
pt3dadd(416.3, -22.6, 180, 0.18)
pt3dadd(417.4, -22.8, 183.5, 0.18)
pt3dadd(418.1, -23.2, 186, 0.18)
pt3dadd(418.9, -23, 188.6, 0.18)
pt3dadd(419.7, -23.1, 190.9, 0.18)
pt3dadd(421.2, -23.8, 195.7, 0.18)
pt3dadd(422, -24.7, 198.9, 0.18)
pt3dadd(422.7, -25.6, 202.1, 0.18)
pt3dadd(423.1, -26.7, 205.1, 0.18)
pt3dadd(423.4, -27.5, 207.5, 0.18)
pt3dadd(423.9, -28.4, 209.9, 0.18)
pt3dadd(424.6, -28.4, 211.5, 0.18)
pt3dadd(425.5, -28.3, 213.8, 0.18)
pt3dadd(426.3, -28.4, 215.6, 0.18)
pt3dadd(427.2, -28.7, 217.6, 0.18)
pt3dadd(427.9, -29.3, 219.7, 0.18)
pt3dadd(428.5, -30.2, 222, 0.18)
pt3dadd(429.2, -30.5, 223.4, 0.18)
pt3dadd(429.6, -31, 224.8, 0.18)
pt3dadd(430, -31.8, 226.5, 0.18)
pt3dadd(430.6, -32.29, 227.8, 0.18)
pt3dadd(431, -32.9, 229.3, 0.18)
pt3dadd(431.4, -34.2, 231.5, 0.18)
pt3dadd(432, -34.9, 233, 0.18)
pt3dadd(432.5, -35, 233.9, 0.18)
pt3dadd(433.1, -35.1, 234.8, 0.18)
pt3dadd(434.4, -35.5, 236.8, 0.18)
pt3dadd(435.9, -36.29, 239.1, 0.18)
pt3dadd(436.6, -36.29, 240, 0.18)
pt3dadd(437.7, -36, 241.3, 0.18)
pt3dadd(438.6, -35.9, 242.3, 0.18)
pt3dadd(439, -36.29, 243, 0.18)
pt3dadd(439.6, -37, 244, 0.18)
pt3dadd(439.9, -37.9, 245, 0.18)
pt3dadd(440.4, -38.9, 246, 0.18)
pt3dadd(440.6, -39.6, 246.7, 0.18)
pt3dadd(440.5, -40.2, 247.2, 0.18)
pt3dadd(440.7, -41.1, 248, 0.18)
pt3dadd(440.6, -41.8, 248.6, 0.18)
pt3dadd(440.8, -42.4, 249.1, 0.18)
pt3dadd(441.6, -43.3, 250, 0.18)
pt3dadd(442, -44.4, 250.7, 0.18)
pt3dadd(442.2, -45.6, 251.4, 0.18)
pt3dadd(442.3, -46.2, 251.8, 0.18)
pt3dadd(442.8, -46.6, 252.1, 0.18)
}
}
proc shape3d_20() {
apic[35] { pt3dadd(443.7, -46.7, 252.5, 0.18)
pt3dadd(446, -46.7, 253.4, 0.18)
pt3dadd(446.6, -47.5, 253.7, 0.18)
pt3dadd(446.5, -48.9, 254, 0.18)
pt3dadd(446.8, -50, 254.1, 0.18)
pt3dadd(447.8, -52.6, 254.2, 0.18)
pt3dadd(448.2, -53.1, 254.1, 0.18)
pt3dadd(448.7, -53.5, 254.1, 0.18)
pt3dadd(449.3, -53.6, 254, 0.18)
pt3dadd(449.8, -54, 253.8, 0.18)
pt3dadd(450.4, -54.3, 253.7, 0.18)
pt3dadd(451.4, -54.8, 253.3, 0.18)
pt3dadd(452.1, -55.5, 253, 0.18)
pt3dadd(452.7, -55.9, 252.7, 0.18)
pt3dadd(452.9, -56.5, 252.4, 0.18)
pt3dadd(452.3, -57, 252, 0.18)
}
apic[36] {pt3dclear()
pt3dadd(388.1, -10.1, 102, 0.6)
pt3dadd(388.6, -9.69, 102.1, 0.6)
pt3dadd(389.5, -9, 102.2, 0.6)
pt3dadd(390.7, -7.7, 102.4, 0.6)
pt3dadd(391, -6.6, 102.6, 0.6)
pt3dadd(391.2, -5.5, 102.7, 0.6)
pt3dadd(391.6, -4.3, 103, 0.6)
pt3dadd(392.3, -3.1, 103.3, 0.6)
pt3dadd(393.1, -2.1, 103.5, 0.6)
pt3dadd(394.3, -1.4, 103.9, 0.6)
pt3dadd(395.5, -0.5, 104.2, 0.6)
pt3dadd(395.8, 0.6, 104.5, 0.6)
pt3dadd(396.3, 1.9, 104.9, 0.6)
pt3dadd(397.8, 4.3, 105.8, 0.6)
pt3dadd(398.9, 5.3, 106.3, 0.6)
pt3dadd(399.9, 6.3, 106.8, 0.6)
pt3dadd(400.5, 7.3, 107.3, 0.6)
pt3dadd(400.9, 8.3, 107.7, 0.6)
pt3dadd(401.5, 9.4, 108.2, 0.6)
pt3dadd(402.2, 10.5, 108.8, 0.6)
pt3dadd(403.9, 12.9, 110.1, 0.6)
pt3dadd(404.5, 14.3, 110.8, 0.6)
pt3dadd(405, 15.6, 111.5, 0.6)
pt3dadd(405.5, 16.6, 112.1, 0.6)
pt3dadd(406.2, 17.39, 112.7, 0.6)
pt3dadd(407, 18.1, 113.2, 0.6)
pt3dadd(408.7, 19.39, 114.4, 0.6)
pt3dadd(409.8, 19.8, 115.1, 0.6)
pt3dadd(411.7, 20.8, 116.4, 0.6)
pt3dadd(412.4, 21.5, 117, 0.6)
pt3dadd(414.6, 23.6, 118.9, 0.6)
pt3dadd(415.3, 24.3, 119.6, 0.6)
pt3dadd(415.8, 24.7, 120, 0.6)
pt3dadd(417.1, 25.5, 121.1, 0.6)
pt3dadd(417.8, 26.4, 121.9, 0.6)
pt3dadd(418.9, 27.3, 123.1, 0.6)
pt3dadd(421.3, 29.3, 125.7, 0.6)
pt3dadd(422.4, 30, 127.1, 0.6)
pt3dadd(423.5, 30.6, 128.3, 0.6)
pt3dadd(424.3, 31.3, 129.3, 0.6)
pt3dadd(424.9, 32, 130.3, 0.6)
pt3dadd(425.2, 32.79, 131.3, 0.6)
pt3dadd(425.3, 34, 132.69, 0.6)
pt3dadd(425.1, 36.79, 135.9, 0.6)
pt3dadd(425.2, 38, 137.4, 0.6)
pt3dadd(426.2, 39.2, 139.4, 0.6)
pt3dadd(426.5, 40.5, 141.1, 0.6)
pt3dadd(426.3, 41.5, 142.6, 0.6)
pt3dadd(425.9, 42.6, 144.19, 0.6)
pt3dadd(425.7, 43.6, 145.6, 0.6)
pt3dadd(425.3, 46.1, 149.19, 0.6)
pt3dadd(425.1, 48.4, 152.69, 0.6)
pt3dadd(424.9, 49.3, 154.19, 0.6)
pt3dadd(424.6, 50, 155.3, 0.6)
pt3dadd(424.1, 50.7, 156.69, 0.6)
pt3dadd(423.4, 51.3, 158.19, 0.6)
pt3dadd(422.5, 51.7, 159.69, 0.6)
pt3dadd(421.7, 52.6, 161.6, 0.6)
pt3dadd(420.9, 53.4, 163.5, 0.6)
pt3dadd(420.1, 54, 165.2, 0.6)
pt3dadd(419.2, 54.4, 166.9, 0.6)
pt3dadd(418.6, 55.2, 168.7, 0.6)
pt3dadd(418.7, 56.5, 170.9, 0.6)
pt3dadd(418.6, 59.5, 176.2, 0.6)
pt3dadd(417.8, 59.8, 177.8, 0.6)
pt3dadd(417.5, 60.7, 179.5, 0.6)
pt3dadd(417.2, 61.5, 181, 0.6)
pt3dadd(417.3, 62.5, 182.9, 0.6)
pt3dadd(418, 65.5, 188.6, 0.6)
pt3dadd(418.6, 66.2, 190.3, 0.6)
pt3dadd(419.3, 66.7, 192, 0.6)
}
apic[37] {pt3dclear()
pt3dadd(384.8, -11.7, 102, 0.6)
pt3dadd(383.1, -6.6, 102, 0.6)
}
apic[38] {pt3dclear()
pt3dadd(383.1, -6.6, 102, 0.6)
pt3dadd(383.2, -7.2, 101.8, 0.6)
pt3dadd(383, -6.1, 100.9, 0.6)
pt3dadd(382.6, -5.6, 100.2, 0.6)
pt3dadd(382.3, -4.9, 99.4, 0.6)
pt3dadd(382.1, -4, 98.1, 0.6)
pt3dadd(382.1, -3.2, 97, 0.6)
pt3dadd(381.6, -2.6, 96, 0.6)
}
apic[39] {pt3dclear()
pt3dadd(381.6, -2.6, 96, 0.6)
pt3dadd(382.5, -2.7, 95.4, 0.6)
pt3dadd(382.2, -1.9, 94.9, 0.6)
pt3dadd(381.4, -1.3, 94.3, 0.6)
pt3dadd(380.9, 0.09, 93.4, 0.6)
pt3dadd(381.5, 2.8, 91.7, 0.6)
pt3dadd(381.9, 3.5, 91.3, 0.6)
pt3dadd(382.3, 4, 90.9, 0.6)
pt3dadd(382.6, 4.7, 90.5, 0.6)
pt3dadd(382.7, 5.4, 90, 0.6)
pt3dadd(382.6, 7, 89.2, 0.6)
pt3dadd(383.2, 7.9, 88.6, 0.6)
pt3dadd(384.3, 8.8, 87.8, 0.6)
pt3dadd(386, 11.1, 86.3, 0.6)
pt3dadd(386.1, 12.4, 85.7, 0.6)
pt3dadd(386, 13.9, 84.9, 0.6)
pt3dadd(386, 17, 83.4, 0.6)
pt3dadd(386.8, 19.8, 82.1, 0.6)
pt3dadd(387.6, 21.1, 81.5, 0.6)
pt3dadd(388, 22, 81.09, 0.6)
pt3dadd(387.9, 23.2, 80.59, 0.6)
pt3dadd(387.8, 25.8, 79.5, 0.6)
pt3dadd(388.3, 27.3, 78.9, 0.6)
pt3dadd(389.3, 28.5, 78.4, 0.6)
pt3dadd(390.1, 29.4, 77.9, 0.6)
pt3dadd(390.5, 30.1, 77.7, 0.6)
pt3dadd(390.9, 31.7, 77.09, 0.6)
pt3dadd(391.5, 32.4, 76.8, 0.6)
pt3dadd(392.9, 33.9, 76.2, 0.6)
pt3dadd(394.1, 34.7, 75.8, 0.6)
pt3dadd(395.6, 35.2, 75.4, 0.6)
pt3dadd(396.9, 35.4, 75, 0.6)
pt3dadd(398.2, 35.2, 74.7, 0.6)
pt3dadd(399.5, 35.29, 74.4, 0.6)
pt3dadd(400.6, 35.2, 74.09, 0.6)
pt3dadd(402.3, 35.5, 73.8, 0.6)
pt3dadd(403, 36.29, 73.59, 0.6)
pt3dadd(403.4, 37.6, 73.3, 0.6)
pt3dadd(403.8, 39.5, 73, 0.6)
pt3dadd(403.6, 40.2, 72.9, 0.6)
pt3dadd(403.7, 41, 72.8, 0.6)
pt3dadd(404.5, 43.4, 72.5, 0.6)
pt3dadd(404.9, 44.1, 72.4, 0.6)
pt3dadd(404.9, 44.6, 72.4, 0.6)
pt3dadd(404.2, 45.2, 72.3, 0.6)
pt3dadd(404.3, 46.4, 72.2, 0.6)
pt3dadd(404.6, 47.7, 72.09, 0.6)
pt3dadd(405.2, 48.8, 72, 0.6)
pt3dadd(405.6, 49.9, 72, 0.6)
pt3dadd(406.7, 52.1, 72, 0.6)
pt3dadd(407.4, 52.3, 72, 0.6)
pt3dadd(408, 51.3, 72, 0.6)
}
apic[40] {pt3dclear()
pt3dadd(381.6, -2.6, 96, 0.6)
pt3dadd(380.4, -3.1, 93.1, 0.18)
pt3dadd(379.8, -3.3, 90.9, 0.18)
pt3dadd(378.5, -3.5, 86.2, 0.18)
pt3dadd(376.2, -3, 76.3, 0.18)
pt3dadd(374.5, -2.29, 68.7, 0.18)
pt3dadd(373.6, -2.2, 65.59, 0.18)
pt3dadd(373, -1.9, 63.1, 0.18)
pt3dadd(372, -1.2, 60, 0.18)
pt3dadd(370.7, 0.3, 55.5, 0.18)
pt3dadd(369.7, 1.3, 52.6, 0.18)
pt3dadd(369, 2.5, 49.8, 0.18)
pt3dadd(368.7, 3.6, 47.4, 0.18)
pt3dadd(368.8, 5, 44.6, 0.18)
pt3dadd(368.8, 7.3, 40.4, 0.18)
pt3dadd(368.9, 8.5, 38.29, 0.18)
pt3dadd(368.6, 10.3, 35.2, 0.18)
pt3dadd(368.3, 11.8, 32.7, 0.18)
pt3dadd(367.8, 14.6, 28.3, 0.18)
pt3dadd(368, 16.5, 25.5, 0.18)
pt3dadd(368.4, 18.3, 23, 0.18)
pt3dadd(368.8, 19.7, 21.2, 0.18)
pt3dadd(368.9, 20.6, 20, 0.18)
pt3dadd(368.3, 21.8, 18.39, 0.18)
pt3dadd(368.2, 23, 17.1, 0.18)
pt3dadd(368.3, 24.4, 15.6, 0.18)
pt3dadd(368.9, 25.9, 13.9, 0.18)
pt3dadd(370.2, 30.3, 9.9, 0.18)
pt3dadd(370.8, 32, 8.6, 0.18)
pt3dadd(370.9, 33.5, 7.5, 0.18)
pt3dadd(370.8, 35, 6.6, 0.18)
pt3dadd(371.2, 36.7, 5.7, 0.18)
pt3dadd(372.1, 38.4, 4.8, 0.18)
pt3dadd(373.5, 41.4, 3.6, 0.18)
pt3dadd(373.7, 42.9, 3.2, 0.18)
pt3dadd(373.5, 44.4, 2.9, 0.18)
pt3dadd(373.7, 45.8, 2.7, 0.18)
pt3dadd(374.1, 47.3, 2.6, 0.18)
pt3dadd(375.2, 48.6, 2.6, 0.18)
pt3dadd(376, 50.3, 2.7, 0.18)
pt3dadd(376.4, 52.2, 3, 0.18)
pt3dadd(376.5, 53.6, 3.3, 0.18)
pt3dadd(376.9, 54.7, 3.6, 0.18)
pt3dadd(377.6, 55.5, 3.9, 0.18)
pt3dadd(378.2, 56.4, 4.3, 0.18)
pt3dadd(378.5, 57.1, 4.59, 0.18)
pt3dadd(379, 57.9, 4.9, 0.18)
pt3dadd(379.7, 58.4, 5.4, 0.18)
pt3dadd(380.1, 59, 5.7, 0.18)
pt3dadd(380.5, 59.4, 6, 0.18)
}
apic[41] {pt3dclear()
pt3dadd(383.1, -6.6, 102, 0.6)
}
}
proc shape3d_21() {
apic[41] { pt3dadd(383.3, -7.6, 101.9, 0.18)
pt3dadd(383.8, -8.6, 101.6, 0.18)
pt3dadd(384, -9.5, 101.3, 0.18)
pt3dadd(383.9, -10.4, 100.9, 0.18)
pt3dadd(384.1, -11.1, 100.6, 0.18)
pt3dadd(383.9, -12.4, 99.8, 0.18)
pt3dadd(383.6, -13.3, 99.1, 0.18)
pt3dadd(383.7, -14.5, 98.1, 0.18)
pt3dadd(384, -15.6, 97.1, 0.18)
pt3dadd(384.5, -16.5, 96.1, 0.18)
pt3dadd(385, -17.7, 94.8, 0.18)
pt3dadd(385.1, -18.7, 93.6, 0.18)
pt3dadd(385, -19.8, 92.3, 0.18)
pt3dadd(385.2, -20.7, 91.1, 0.18)
pt3dadd(385.5, -21.5, 90.1, 0.18)
pt3dadd(386.2, -22.6, 88.4, 0.18)
pt3dadd(387.3, -24.3, 85.6, 0.18)
pt3dadd(388.3, -26, 82.7, 0.18)
pt3dadd(388.6, -26.8, 81.3, 0.18)
pt3dadd(389.2, -27.4, 80.09, 0.18)
pt3dadd(389.9, -28.4, 78.3, 0.18)
pt3dadd(390.8, -29.5, 76, 0.18)
pt3dadd(391.8, -30.4, 74, 0.18)
pt3dadd(392.8, -30.8, 72.3, 0.18)
pt3dadd(393, -31.7, 71, 0.18)
pt3dadd(392.9, -32.79, 69.3, 0.18)
pt3dadd(393.3, -34.5, 66.7, 0.18)
pt3dadd(393.3, -36.7, 63.7, 0.18)
pt3dadd(393.4, -38.6, 61.1, 0.18)
pt3dadd(394, -40, 59.1, 0.18)
pt3dadd(394.6, -42.7, 55.9, 0.18)
pt3dadd(394.5, -44, 54.6, 0.18)
pt3dadd(394.2, -47.4, 51.6, 0.18)
pt3dadd(394.3, -48.6, 50.8, 0.18)
pt3dadd(394.7, -50.1, 49.9, 0.18)
pt3dadd(395.4, -51.3, 49.4, 0.18)
pt3dadd(396.2, -52.6, 49, 0.18)
pt3dadd(397.3, -53.7, 48.9, 0.18)
pt3dadd(398.6, -54.7, 49.1, 0.18)
pt3dadd(399.8, -55.1, 49.4, 0.18)
pt3dadd(399.9, -56.5, 50.1, 0.18)
pt3dadd(399.8, -57.3, 50.6, 0.18)
pt3dadd(400.1, -58.5, 51.5, 0.18)
pt3dadd(400.8, -59.2, 52.4, 0.18)
pt3dadd(401.2, -60.2, 53.5, 0.18)
pt3dadd(401.8, -60.6, 54.4, 0.18)
pt3dadd(402.5, -61.6, 56.1, 0.18)
pt3dadd(403.3, -62, 57.4, 0.18)
pt3dadd(404.4, -63, 60, 0.18)
pt3dadd(405.5, -63.1, 62.2, 0.18)
pt3dadd(406.7, -63.5, 64.8, 0.18)
pt3dadd(408, -64.09, 68.4, 0.18)
pt3dadd(409.8, -65.8, 75.09, 0.18)
pt3dadd(410.3, -67, 78.8, 0.18)
pt3dadd(410.4, -68.5, 83.3, 0.18)
pt3dadd(410.6, -69.9, 87.7, 0.18)
pt3dadd(411.1, -70.59, 90.5, 0.18)
pt3dadd(412.1, -71.2, 94.3, 0.18)
pt3dadd(413.3, -72.09, 99.4, 0.18)
pt3dadd(415.2, -73.7, 107.5, 0.18)
pt3dadd(415.8, -74.5, 110.8, 0.18)
pt3dadd(416.3, -75.7, 115, 0.18)
pt3dadd(416.5, -76.7, 118.1, 0.18)
pt3dadd(416.9, -77.09, 120, 0.18)
pt3dadd(417.6, -78.4, 124.4, 0.18)
pt3dadd(419, -81.5, 135.6, 0.18)
pt3dadd(420, -82.7, 140.69, 0.18)
pt3dadd(420.9, -83.1, 144.19, 0.18)
pt3dadd(424.2, -84.7, 156.6, 0.18)
pt3dadd(425.5, -85.2, 161.1, 0.18)
pt3dadd(425.8, -86, 163.8, 0.18)
pt3dadd(426.8, -86.6, 167.8, 0.18)
pt3dadd(427.6, -86.7, 170.3, 0.18)
pt3dadd(429.3, -86.7, 175.6, 0.18)
pt3dadd(430.1, -86.7, 177.8, 0.18)
pt3dadd(430.8, -86.9, 180, 0.18)
pt3dadd(430.7, -88.3, 183.5, 0.18)
pt3dadd(430.4, -91.9, 188.5, 0.18)
pt3dadd(430, -95.8, 188.8, 0.18)
pt3dadd(429.7, -98.8, 186.6, 0.18)
pt3dadd(430.1, -99.5, 185.8, 0.18)
pt3dadd(431.1, -101.5, 183.2, 0.18)
pt3dadd(431.8, -103.3, 180.8, 0.18)
pt3dadd(431.7, -103.9, 180, 0.18)
pt3dadd(431, -104.4, 178.9, 0.18)
pt3dadd(430.6, -105.3, 177.6, 0.18)
pt3dadd(430.8, -107.5, 174.4, 0.18)
pt3dadd(431.6, -109.6, 170.7, 0.18)
pt3dadd(433.1, -111.3, 166.5, 0.18)
pt3dadd(433.9, -112.5, 163.6, 0.18)
pt3dadd(434.1, -113.4, 161.6, 0.18)
pt3dadd(433.7, -114.5, 159.1, 0.18)
pt3dadd(433.6, -115.7, 156.1, 0.18)
pt3dadd(433.8, -116.7, 153.69, 0.18)
pt3dadd(434.4, -117.1, 151.69, 0.18)
pt3dadd(435.3, -117.2, 148.9, 0.18)
pt3dadd(435.9, -117.7, 146.8, 0.18)
pt3dadd(436.3, -118.6, 144, 0.18)
}
apic[42] {pt3dclear()
pt3dadd(366.7, -16.2, 108, 1.1)
pt3dadd(367.1, -15.2, 110.5, 1.1)
pt3dadd(367.2, -14.4, 112.5, 1.1)
pt3dadd(367.9, -13.8, 114.4, 1.1)
pt3dadd(368.6, -12.8, 116.9, 1.1)
pt3dadd(368.9, -11.8, 118.7, 1.1)
pt3dadd(369.4, -10.8, 120, 1.1)
pt3dadd(369.8, -9.69, 121.2, 1.1)
pt3dadd(370.2, -8.9, 122, 1.1)
pt3dadd(371, -7.8, 123.5, 1.1)
pt3dadd(371.7, -7.2, 124.4, 1.1)
pt3dadd(372.6, -6.6, 125.4, 1.1)
pt3dadd(373.3, -5.8, 126.4, 1.1)
pt3dadd(373.6, -4.9, 127.3, 1.1)
pt3dadd(373.7, -3.9, 128.19, 1.1)
pt3dadd(373.6, -1.8, 130.19, 1.1)
pt3dadd(373.7, -0.8, 131.1, 1.1)
pt3dadd(374.8, 0.3, 132.5, 1.1)
pt3dadd(375.5, 1.4, 133.69, 1.1)
pt3dadd(375.8, 2.29, 134.6, 1.1)
pt3dadd(375.9, 3.2, 135.3, 1.1)
pt3dadd(375.8, 5.9, 137.6, 1.1)
pt3dadd(375.5, 9.19, 140.4, 1.1)
pt3dadd(375.7, 10.7, 141.69, 1.1)
pt3dadd(376.4, 12.4, 143.1, 1.1)
pt3dadd(376.9, 14.5, 144.8, 1.1)
pt3dadd(377.5, 16.7, 146.5, 1.1)
pt3dadd(377.7, 18.2, 147.69, 1.1)
pt3dadd(377.4, 19.6, 148.8, 1.1)
pt3dadd(376.9, 20.9, 149.69, 1.1)
pt3dadd(377.1, 22.3, 150.69, 1.1)
pt3dadd(377.5, 23.6, 151.69, 1.1)
pt3dadd(378.2, 25.1, 152.9, 1.1)
pt3dadd(378.6, 26.4, 153.8, 1.1)
pt3dadd(378.8, 28, 154.8, 1.1)
pt3dadd(378.7, 31.1, 156.8, 1.1)
pt3dadd(378.8, 32.1, 157.4, 1.1)
pt3dadd(378.6, 32.9, 158, 1.1)
pt3dadd(379, 33.9, 158.6, 1.1)
pt3dadd(379.7, 34.9, 159.4, 1.1)
pt3dadd(380, 36.1, 160.1, 1.1)
pt3dadd(380.1, 37.29, 160.8, 1.1)
pt3dadd(380, 38.9, 161.69, 1.1)
pt3dadd(380.1, 40.6, 162.6, 1.1)
pt3dadd(381.2, 43, 164, 1.1)
pt3dadd(382.7, 45.2, 165.4, 1.1)
pt3dadd(383.8, 47.6, 166.7, 1.1)
pt3dadd(384.2, 48.6, 167.2, 1.1)
pt3dadd(384.3, 49.4, 167.6, 1.1)
pt3dadd(384.2, 51.1, 168.3, 1.1)
pt3dadd(384.1, 52.2, 168.8, 1.1)
pt3dadd(384.2, 53.6, 169.4, 1.1)
pt3dadd(385, 55.1, 170.2, 1.1)
pt3dadd(387.1, 58.4, 171.7, 1.1)
pt3dadd(388.7, 60.2, 172.6, 1.1)
pt3dadd(390.2, 62.8, 173.6, 1.1)
pt3dadd(390.6, 65.2, 174.4, 1.1)
pt3dadd(390.8, 67.3, 175.1, 1.1)
pt3dadd(392, 70.5, 176.1, 1.1)
pt3dadd(393.3, 72.09, 176.6, 1.1)
pt3dadd(393.8, 73.4, 176.9, 1.1)
pt3dadd(394.1, 74.3, 177.2, 1.1)
pt3dadd(393.9, 75.4, 177.4, 1.1)
pt3dadd(393.7, 76.3, 177.6, 1.1)
pt3dadd(394.2, 77.3, 177.9, 1.1)
pt3dadd(394.9, 78.2, 178.1, 1.1)
pt3dadd(395.8, 79.09, 178.3, 1.1)
pt3dadd(396.6, 80, 178.6, 1.1)
pt3dadd(397.5, 80.9, 178.8, 1.1)
pt3dadd(398.3, 81.9, 179, 1.1)
pt3dadd(398.9, 82.8, 179.2, 1.1)
pt3dadd(399.5, 84, 179.3, 1.1)
pt3dadd(399.6, 85.2, 179.5, 1.1)
pt3dadd(399.9, 88.4, 179.9, 1.1)
pt3dadd(400.6, 89.4, 180, 1.1)
pt3dadd(402.2, 91.3, 180.2, 1.1)
pt3dadd(404.6, 94.3, 180.4, 1.1)
pt3dadd(404.7, 95.4, 180.4, 1.1)
pt3dadd(405.7, 98.4, 180.5, 1.1)
pt3dadd(406.8, 99.2, 180.5, 1.1)
pt3dadd(410, 101.9, 180.4, 1.1)
pt3dadd(410.7, 102.7, 180.3, 1.1)
pt3dadd(411.4, 103.2, 180.3, 1.1)
pt3dadd(411.8, 103.7, 180.3, 1.1)
pt3dadd(412.4, 104.3, 180.2, 1.1)
pt3dadd(412.9, 105, 180.1, 1.1)
pt3dadd(413.2, 105.6, 180.1, 1.1)
pt3dadd(413.9, 106.3, 180, 1.1)
pt3dadd(414, 107.3, 179.9, 1.1)
pt3dadd(414.9, 108, 179.8, 1.1)
pt3dadd(415.9, 108.6, 179.6, 1.1)
pt3dadd(417.3, 109, 179.4, 1.1)
pt3dadd(418.7, 109.4, 179.2, 1.1)
pt3dadd(420.3, 109.2, 178.8, 1.1)
pt3dadd(423.1, 109.3, 178.1, 1.1)
pt3dadd(424, 110, 177.8, 1.1)
pt3dadd(424.6, 110.7, 177.5, 1.1)
pt3dadd(425.2, 111.1, 177.3, 1.1)
pt3dadd(427.2, 112.1, 176.5, 1.1)
pt3dadd(428.4, 112.2, 176, 1.1)
pt3dadd(429.8, 112.1, 175.3, 1.1)
pt3dadd(430.7, 112.2, 174.9, 1.1)
}
}
proc shape3d_22() {
apic[42] { pt3dadd(431.4, 112.8, 174.4, 1.1)
pt3dadd(432.5, 113.8, 173.6, 1.1)
pt3dadd(433.8, 114.7, 172.7, 1.1)
pt3dadd(436.3, 116.3, 170.7, 1.1)
pt3dadd(437.2, 116.4, 170.1, 1.1)
pt3dadd(438, 116.7, 169.4, 1.1)
pt3dadd(438.5, 117, 169, 1.1)
pt3dadd(439.5, 117.7, 168, 1.1)
}
apic[43] {pt3dclear()
pt3dadd(363.1, -21.5, 84, 1.1)
pt3dadd(363.8, -21.3, 83.8, 1.1)
pt3dadd(364.9, -21.4, 83.6, 1.1)
pt3dadd(366.1, -21.3, 83.3, 1.1)
pt3dadd(366.7, -21.1, 83.2, 1.1)
pt3dadd(367.7, -20.9, 82.9, 1.1)
pt3dadd(368.4, -20.7, 82.7, 1.1)
pt3dadd(369, -19.8, 82.5, 1.1)
pt3dadd(369.4, -19.2, 82.3, 1.1)
pt3dadd(369.7, -18.1, 82.1, 1.1)
pt3dadd(370.3, -17.3, 81.8, 1.1)
pt3dadd(371.1, -16.7, 81.59, 1.1)
pt3dadd(372.3, -16.6, 81.3, 1.1)
pt3dadd(373.6, -16.2, 80.9, 1.1)
pt3dadd(374.6, -16.1, 80.7, 1.1)
pt3dadd(376.5, -15.7, 80.2, 1.1)
pt3dadd(377.3, -15.5, 80, 1.1)
pt3dadd(378.4, -14.9, 79.59, 1.1)
pt3dadd(379.4, -14.7, 79.4, 1.1)
pt3dadd(380.6, -14.9, 79, 1.1)
pt3dadd(381.3, -14.7, 78.8, 1.1)
pt3dadd(382.2, -14.5, 78.59, 1.1)
pt3dadd(382.9, -14.4, 78.4, 1.1)
pt3dadd(384.7, -14.6, 77.9, 1.1)
pt3dadd(387.7, -15.3, 77.09, 1.1)
pt3dadd(388.3, -16, 76.8, 1.1)
pt3dadd(389.2, -16.8, 76.5, 1.1)
pt3dadd(390, -17.7, 76.09, 1.1)
pt3dadd(390.9, -18.6, 75.8, 1.1)
pt3dadd(391.7, -19.3, 75.5, 1.1)
pt3dadd(392.5, -20.3, 75.09, 1.1)
pt3dadd(393.3, -21.2, 74.8, 1.1)
pt3dadd(394.1, -22.2, 74.4, 1.1)
pt3dadd(394.9, -23.6, 73.9, 1.1)
pt3dadd(395.5, -24.7, 73.59, 1.1)
pt3dadd(396.4, -25.5, 73.2, 1.1)
pt3dadd(397.6, -25.9, 72.9, 1.1)
pt3dadd(398.3, -26.4, 72.59, 1.1)
pt3dadd(399, -27.3, 72.3, 1.1)
pt3dadd(399.6, -28, 72, 1.1)
pt3dadd(400.2, -28.5, 71.8, 1.1)
pt3dadd(400.7, -29.1, 71.59, 1.1)
pt3dadd(400.9, -30, 71.3, 1.1)
pt3dadd(401.1, -30.9, 71, 1.1)
pt3dadd(401.8, -31.7, 70.8, 1.1)
pt3dadd(402.6, -32.4, 70.4, 1.1)
pt3dadd(403.5, -33.1, 70.09, 1.1)
pt3dadd(404.7, -34.2, 69.59, 1.1)
pt3dadd(405.9, -35.7, 69.09, 1.1)
pt3dadd(407, -36.7, 68.7, 1.1)
pt3dadd(408.8, -37.9, 68, 1.1)
pt3dadd(409.6, -38.4, 67.8, 1.1)
pt3dadd(410.2, -39.1, 67.5, 1.1)
pt3dadd(411, -39.7, 67.2, 1.1)
pt3dadd(411.6, -40.4, 67, 1.1)
pt3dadd(412.2, -40.9, 66.8, 1.1)
pt3dadd(412.4, -41.5, 66.59, 1.1)
pt3dadd(413, -42.8, 66.2, 1.1)
pt3dadd(414.2, -44.7, 65.59, 1.1)
pt3dadd(415.8, -46.2, 64.9, 1.1)
pt3dadd(416.6, -46.5, 64.7, 1.1)
pt3dadd(417.1, -46.9, 64.5, 0.6)
pt3dadd(417.8, -46.9, 64.4, 0.6)
pt3dadd(418.6, -47.3, 64.09, 0.6)
pt3dadd(419.2, -48, 63.9, 0.6)
pt3dadd(420.2, -49.2, 63.5, 0.6)
pt3dadd(421, -50.6, 63, 0.6)
pt3dadd(421.4, -51, 62.9, 0.6)
pt3dadd(421.8, -51.6, 62.7, 0.6)
pt3dadd(422.7, -52.3, 62.4, 0.6)
pt3dadd(423.7, -52.7, 62.1, 0.6)
pt3dadd(425, -53.5, 61.8, 0.6)
pt3dadd(427.6, -55.3, 61, 0.6)
pt3dadd(429.3, -56.5, 60.5, 0.6)
pt3dadd(430, -57, 60.3, 0.6)
pt3dadd(430.8, -57.8, 60, 0.6)
pt3dadd(431.5, -58.6, 59.7, 0.6)
pt3dadd(432.1, -59.7, 59.5, 0.6)
pt3dadd(432.5, -61.1, 59.1, 0.6)
pt3dadd(433.5, -61.5, 58.9, 0.6)
pt3dadd(434.7, -62, 58.7, 0.6)
pt3dadd(435.8, -62.8, 58.4, 0.6)
pt3dadd(437.7, -64.4, 57.9, 0.6)
pt3dadd(438.5, -65.9, 57.6, 0.6)
pt3dadd(438.7, -66.9, 57.4, 0.6)
pt3dadd(439.4, -67.8, 57.2, 0.6)
pt3dadd(440.4, -68.7, 57, 0.6)
pt3dadd(441.8, -69.8, 56.7, 0.6)
pt3dadd(443.4, -70.9, 56.4, 0.6)
pt3dadd(445.4, -72.59, 56, 0.6)
pt3dadd(446, -73.7, 55.8, 0.6)
pt3dadd(446.1, -75.09, 55.6, 0.6)
pt3dadd(446.6, -76.7, 55.4, 0.6)
pt3dadd(446.9, -78.2, 55.2, 0.6)
pt3dadd(447.7, -79.4, 55.1, 0.6)
pt3dadd(449, -80.59, 54.9, 0.6)
pt3dadd(450.5, -81.7, 54.7, 0.6)
pt3dadd(453.6, -84.2, 54.4, 0.6)
pt3dadd(454.8, -85.6, 54.2, 0.6)
pt3dadd(456, -87.2, 54.1, 0.6)
pt3dadd(456.3, -88.6, 54, 0.6)
pt3dadd(456.4, -89.9, 53.9, 0.6)
pt3dadd(456.8, -90.9, 53.8, 0.6)
pt3dadd(458.1, -93.8, 53.7, 0.6)
pt3dadd(460, -96.7, 53.6, 0.6)
pt3dadd(460.9, -98.2, 53.5, 0.6)
pt3dadd(462, -99.9, 53.5, 0.6)
pt3dadd(463.6, -103, 53.5, 0.6)
pt3dadd(463.7, -104.4, 53.5, 0.6)
pt3dadd(463.6, -105.6, 53.5, 0.6)
pt3dadd(463.6, -109.6, 53.6, 0.6)
pt3dadd(464.6, -113.5, 53.7, 0.6)
pt3dadd(465.3, -115.2, 53.7, 0.6)
pt3dadd(466.1, -116.6, 53.8, 0.6)
pt3dadd(466.2, -118, 53.9, 0.6)
pt3dadd(465.6, -119.5, 53.9, 0.6)
pt3dadd(464.9, -121.1, 54, 0.6)
pt3dadd(464.5, -122.6, 54.1, 0.6)
pt3dadd(464.8, -124.2, 54.2, 0.6)
pt3dadd(465.4, -125.7, 54.4, 0.6)
pt3dadd(465.9, -127.3, 54.5, 0.6)
pt3dadd(466.4, -128.8, 54.6, 0.6)
pt3dadd(466.2, -130.3, 54.7, 0.6)
pt3dadd(465.6, -131.69, 54.9, 0.6)
pt3dadd(465.1, -133.19, 55, 0.6)
pt3dadd(464.6, -135.19, 55.2, 0.6)
pt3dadd(464.7, -136.9, 55.4, 0.6)
pt3dadd(465.5, -138.4, 55.6, 0.6)
pt3dadd(466.1, -139.9, 55.8, 0.6)
pt3dadd(466, -141.19, 55.9, 0.6)
pt3dadd(464.8, -143.5, 56.2, 0.6)
pt3dadd(464.3, -144.9, 56.4, 0.6)
pt3dadd(464.5, -146.8, 56.7, 0.6)
pt3dadd(465.2, -148.8, 57, 0.6)
pt3dadd(466.5, -152.3, 57.5, 0.6)
pt3dadd(466, -153.5, 57.7, 0.6)
pt3dadd(465.1, -154.69, 57.9, 0.6)
pt3dadd(464.7, -155.69, 58.1, 0.6)
pt3dadd(464.5, -157.19, 58.3, 0.6)
pt3dadd(465, -159.19, 58.7, 0.6)
pt3dadd(465, -161.19, 59, 0.6)
pt3dadd(464.8, -162.8, 59.2, 0.6)
pt3dadd(464.6, -165.7, 59.8, 0.6)
pt3dadd(464.3, -167, 60, 0.6)
pt3dadd(464.2, -168.3, 60.3, 0.6)
pt3dadd(464.4, -170.3, 60.7, 0.6)
pt3dadd(464.4, -172.3, 61.3, 0.6)
pt3dadd(463.9, -173.6, 61.8, 0.6)
pt3dadd(462.9, -174.4, 62.3, 0.6)
pt3dadd(462.1, -175.4, 62.8, 0.6)
pt3dadd(462, -176.5, 63.3, 0.6)
pt3dadd(462.9, -178.1, 64.09, 0.6)
pt3dadd(463.6, -179.8, 65.09, 0.6)
pt3dadd(463.7, -181.5, 66, 0.6)
pt3dadd(463.2, -183.5, 67.09, 0.6)
pt3dadd(462.3, -185.6, 68.5, 0.6)
pt3dadd(461.8, -187.6, 69.9, 0.6)
pt3dadd(461.2, -189.4, 71.2, 0.6)
pt3dadd(461, -191.2, 72.5, 0.6)
pt3dadd(460.5, -195, 75.4, 0.6)
pt3dadd(460.4, -195.6, 75.9, 0.6)
pt3dadd(460.6, -196.7, 76.8, 0.6)
pt3dadd(460.5, -197.4, 77.3, 0.6)
pt3dadd(460.4, -198.2, 78, 0.6)
}
apic[44] {pt3dclear()
pt3dadd(335.4, -28.7, 90, 1.1)
pt3dadd(336, -28.4, 90, 0.18)
pt3dadd(336.6, -27.2, 90, 0.18)
pt3dadd(337.5, -24.9, 90.1, 0.18)
pt3dadd(338, -23.8, 90.2, 0.18)
pt3dadd(338.7, -22.3, 90.3, 0.18)
pt3dadd(339.1, -21.7, 90.3, 0.18)
pt3dadd(339.6, -21.1, 90.4, 0.18)
pt3dadd(340.3, -20.39, 90.5, 0.18)
pt3dadd(341.2, -19.2, 90.7, 0.18)
pt3dadd(341.8, -18.7, 90.8, 0.18)
pt3dadd(342.2, -17.3, 90.9, 0.18)
pt3dadd(342.3, -16.2, 91.1, 0.18)
pt3dadd(342.7, -15.6, 91.2, 0.18)
pt3dadd(342.8, -15, 91.3, 0.18)
pt3dadd(343.1, -14.3, 91.4, 0.18)
pt3dadd(344, -13.6, 91.6, 0.18)
pt3dadd(344.4, -13, 91.7, 0.18)
pt3dadd(346.3, -12.1, 92.1, 0.18)
pt3dadd(346.8, -11.8, 92.2, 0.18)
pt3dadd(346.8, -11.2, 92.3, 0.18)
pt3dadd(346.6, -10, 92.6, 0.18)
pt3dadd(346.1, -8.69, 92.9, 0.18)
pt3dadd(346.2, -8, 93.1, 0.18)
pt3dadd(346.6, -7.4, 93.2, 0.18)
pt3dadd(347.4, -6.5, 93.5, 0.18)
pt3dadd(349.2, -5.3, 94, 0.18)
pt3dadd(350, -4.2, 94.4, 0.18)
}
}
proc shape3d_23() {
apic[44] { pt3dadd(350.4, -3.6, 94.6, 0.18)
pt3dadd(350.4, -2.9, 94.8, 0.18)
pt3dadd(351.1, -1.2, 95.3, 0.18)
pt3dadd(352.3, -0.2, 95.7, 0.18)
pt3dadd(352.9, 0.4, 96, 0.18)
pt3dadd(353.5, 0.9, 96.2, 0.18)
pt3dadd(353.8, 2, 96.5, 0.18)
pt3dadd(354.2, 2.9, 96.8, 0.18)
pt3dadd(354.5, 3.6, 97.1, 0.18)
pt3dadd(354.9, 4, 97.3, 0.18)
pt3dadd(355.2, 4.8, 97.5, 0.18)
pt3dadd(355.6, 5.7, 97.8, 0.18)
pt3dadd(356.2, 6.7, 98.2, 0.18)
pt3dadd(356.6, 7.7, 98.6, 0.18)
pt3dadd(357, 8.5, 98.9, 0.18)
pt3dadd(358, 10.1, 99.5, 0.18)
pt3dadd(358.8, 10.8, 99.9, 0.18)
pt3dadd(359.9, 11.4, 100.3, 0.18)
pt3dadd(360.8, 11.9, 100.7, 0.18)
pt3dadd(361.7, 12.5, 101.1, 0.18)
pt3dadd(362, 13.1, 101.3, 0.18)
pt3dadd(362, 13.9, 101.6, 0.18)
pt3dadd(362.8, 16.7, 102.7, 0.18)
pt3dadd(363.8, 17.6, 103.1, 0.18)
pt3dadd(364.9, 19, 103.8, 0.18)
pt3dadd(365.6, 20.7, 104.5, 0.18)
pt3dadd(365.7, 21.2, 104.7, 0.18)
pt3dadd(366.2, 24.3, 105.9, 0.18)
pt3dadd(367, 25.9, 106.5, 0.18)
pt3dadd(367.3, 26.5, 106.8, 0.18)
pt3dadd(367.4, 27.3, 107.1, 0.18)
pt3dadd(367.5, 28.9, 107.7, 0.18)
pt3dadd(367.6, 29.6, 108, 0.18)
}
apic[45] {pt3dclear()
pt3dadd(320.6, -26.4, 90, 1.2)
pt3dadd(321.2, -25.6, 90, 0.5)
pt3dadd(321.89, -24.7, 90, 0.5)
pt3dadd(322.5, -23.8, 90, 0.5)
pt3dadd(322.8, -22.8, 89.9, 0.5)
pt3dadd(323.2, -22.1, 89.9, 0.5)
pt3dadd(323.5, -21.4, 89.9, 0.5)
pt3dadd(324.6, -20.5, 89.8, 0.5)
pt3dadd(325.39, -19.89, 89.7, 0.5)
pt3dadd(327.39, -18.5, 89.5, 0.5)
pt3dadd(328.5, -17, 89.3, 0.5)
pt3dadd(328.6, -16.39, 89.3, 0.5)
pt3dadd(329, -15.4, 89.2, 0.5)
pt3dadd(330.3, -13.1, 88.8, 0.5)
pt3dadd(330.9, -12.4, 88.7, 0.5)
pt3dadd(331.5, -11.9, 88.6, 0.5)
pt3dadd(332.2, -11.3, 88.5, 0.5)
pt3dadd(334.3, -9.4, 88, 0.5)
pt3dadd(335.1, -8.3, 87.8, 0.5)
pt3dadd(336.7, -6.4, 87.3, 0.5)
pt3dadd(337, -5.9, 87.2, 0.5)
pt3dadd(337.8, -5.2, 87, 0.18)
pt3dadd(339, -5, 86.7, 0.18)
pt3dadd(339.9, -4.3, 86.5, 0.18)
pt3dadd(340.5, -3.3, 86.2, 0.18)
pt3dadd(340.6, -1.9, 85.9, 0.18)
pt3dadd(341.1, -0.6, 85.6, 0.18)
pt3dadd(342.1, 1.9, 84.9, 0.18)
pt3dadd(343.4, 3.5, 84.4, 0.18)
pt3dadd(344.2, 4.59, 84.1, 0.18)
pt3dadd(344.7, 5.8, 83.7, 0.18)
pt3dadd(345.1, 7.4, 83.3, 0.18)
pt3dadd(345.5, 8.8, 82.9, 0.18)
pt3dadd(346.3, 10.6, 82.3, 0.18)
pt3dadd(346.9, 11.2, 82.1, 0.18)
pt3dadd(347.5, 12.4, 81.7, 0.18)
pt3dadd(347.6, 13.2, 81.4, 0.18)
pt3dadd(348, 14.4, 81.09, 0.18)
pt3dadd(349.5, 17.3, 80.09, 0.18)
pt3dadd(350.2, 19.2, 79.4, 0.18)
pt3dadd(350.9, 20.7, 78.9, 0.18)
pt3dadd(351.3, 21.9, 78.5, 0.18)
pt3dadd(351.5, 23.8, 77.9, 0.18)
pt3dadd(352.1, 25.3, 77.3, 0.18)
pt3dadd(353.3, 27.3, 76.5, 0.18)
pt3dadd(353.7, 28.4, 76.2, 0.18)
pt3dadd(354.1, 29.2, 75.9, 0.18)
pt3dadd(354.6, 30.2, 75.5, 0.18)
pt3dadd(355.4, 31.1, 75.09, 0.18)
pt3dadd(356, 32.1, 74.7, 0.18)
pt3dadd(356.7, 32.79, 74.3, 0.18)
pt3dadd(357, 33.6, 74, 0.18)
pt3dadd(357.3, 34.4, 73.7, 0.18)
pt3dadd(357.7, 35, 73.5, 0.18)
pt3dadd(357.8, 35.79, 73.2, 0.18)
pt3dadd(357.7, 38.5, 72.3, 0.18)
pt3dadd(357.8, 39.4, 72, 0.18)
}
apic[46] {pt3dclear()
pt3dadd(318.5, -26, 90, 1.2)
pt3dadd(318.7, -27, 90.1, 0.5)
pt3dadd(319.39, -27.9, 90.5, 0.5)
pt3dadd(320.39, -28.9, 91.3, 0.5)
pt3dadd(321.1, -29, 91.8, 0.5)
pt3dadd(323.8, -29.3, 94.5, 0.5)
pt3dadd(324.6, -29.4, 95.5, 0.5)
pt3dadd(325.2, -29.1, 96.4, 0.5)
pt3dadd(326, -29, 97.4, 0.5)
pt3dadd(326.7, -28.5, 98.6, 0.5)
pt3dadd(327.3, -28, 99.8, 0.5)
pt3dadd(327.9, -27.6, 101, 0.5)
pt3dadd(328.5, -27.2, 102.2, 0.5)
pt3dadd(329.1, -26.8, 103.3, 0.5)
pt3dadd(329.8, -26.3, 104.7, 0.5)
pt3dadd(330.5, -26.1, 105.9, 0.5)
pt3dadd(331, -25.9, 106.9, 0.5)
pt3dadd(331.6, -25.7, 108, 0.5)
pt3dadd(333, -25.1, 110.5, 0.5)
pt3dadd(333.8, -24.4, 112.1, 0.5)
pt3dadd(334.5, -23.9, 113.5, 0.5)
pt3dadd(335.4, -23.5, 115.1, 0.5)
pt3dadd(336, -23.6, 116, 0.5)
pt3dadd(337.9, -23.8, 118.7, 0.5)
pt3dadd(338.8, -24.3, 120, 0.5)
pt3dadd(339.2, -24.9, 120.8, 0.5)
pt3dadd(340.4, -25, 122.3, 0.5)
pt3dadd(342.2, -25.7, 124.6, 0.5)
pt3dadd(342.8, -26.4, 125.7, 0.5)
pt3dadd(343.3, -26.5, 126.4, 0.5)
pt3dadd(344.8, -26.3, 128.19, 0.5)
pt3dadd(345.4, -26.2, 129, 0.5)
pt3dadd(346.1, -26.2, 129.8, 0.5)
pt3dadd(349.3, -26.6, 133.69, 0.5)
pt3dadd(350.1, -26.3, 134.69, 0.5)
pt3dadd(350.6, -26, 135.4, 0.5)
pt3dadd(351.4, -25.7, 136.4, 0.5)
pt3dadd(352.3, -24.7, 138, 0.5)
}
apic[47] {pt3dclear()
pt3dadd(291.39, -23.7, 90, 1.2)
pt3dadd(292, -24.2, 90.3, 0.18)
pt3dadd(293.1, -24.1, 91.2, 0.18)
pt3dadd(293.7, -23.7, 92.1, 0.18)
pt3dadd(294.39, -23.3, 93.2, 0.18)
pt3dadd(294.8, -22.7, 94.4, 0.18)
pt3dadd(295.2, -21.4, 97.1, 0.18)
pt3dadd(296, -20.9, 99.2, 0.18)
pt3dadd(297.39, -21, 102.5, 0.18)
pt3dadd(298.1, -20.9, 104.4, 0.18)
pt3dadd(298.8, -20.9, 106.5, 0.18)
pt3dadd(300.89, -21.4, 112.2, 0.18)
pt3dadd(301.6, -21.5, 114.4, 0.18)
pt3dadd(303.6, -22, 120, 0.18)
pt3dadd(304.3, -22.1, 121.9, 0.18)
pt3dadd(305.1, -22.2, 124, 0.18)
pt3dadd(307.3, -22.2, 130.69, 0.18)
pt3dadd(308.3, -22, 133.8, 0.18)
pt3dadd(309.1, -21.7, 136.5, 0.18)
pt3dadd(309.7, -21.4, 139, 0.18)
pt3dadd(310.5, -21.1, 141.6, 0.18)
pt3dadd(311, -20.9, 143.6, 0.18)
pt3dadd(312, -20.8, 147, 0.18)
pt3dadd(313.2, -20.8, 150.8, 0.18)
pt3dadd(314.1, -20.7, 153.9, 0.18)
pt3dadd(314.8, -20.2, 156.9, 0.18)
pt3dadd(315.6, -20, 159.6, 0.18)
pt3dadd(316.5, -19.6, 162.9, 0.18)
pt3dadd(317.39, -19.39, 165.6, 0.18)
pt3dadd(318.1, -19.5, 168, 0.18)
pt3dadd(321.2, -19.8, 176.9, 0.18)
pt3dadd(321.7, -20.9, 180, 0.18)
pt3dadd(321.5, -21.5, 181.6, 0.18)
pt3dadd(321, -22.2, 183.4, 0.18)
pt3dadd(320.1, -22.9, 185.4, 0.18)
pt3dadd(319.3, -23.3, 186.7, 0.18)
pt3dadd(318.3, -24, 188.4, 0.18)
pt3dadd(317.7, -24.7, 189.4, 0.18)
pt3dadd(317.3, -25.6, 190.2, 0.18)
pt3dadd(317.3, -26.2, 190.7, 0.18)
pt3dadd(316.89, -26.8, 191.1, 0.18)
pt3dadd(316.2, -27.5, 191.5, 0.18)
pt3dadd(315.3, -28.2, 191.9, 0.18)
pt3dadd(314.8, -28.6, 192, 0.18)
}
apic[48] {pt3dclear()
pt3dadd(284.89, -22.8, 90, 1.2)
pt3dadd(285.39, -23.1, 90.2, 0.5)
pt3dadd(285.3, -24.4, 90.6, 0.5)
pt3dadd(285, -27.8, 91.6, 0.5)
pt3dadd(284.5, -28.7, 91.9, 0.5)
pt3dadd(284.39, -29.9, 92.3, 0.5)
pt3dadd(283.89, -31.1, 92.7, 0.5)
pt3dadd(283.8, -32.2, 93.1, 0.5)
pt3dadd(283.39, -33.1, 93.4, 0.5)
pt3dadd(282.3, -35, 94.2, 0.5)
pt3dadd(281.7, -36.4, 94.7, 0.5)
pt3dadd(281.3, -37.9, 95.2, 0.5)
pt3dadd(281.39, -39.7, 95.9, 0.5)
pt3dadd(281.7, -40.6, 96.2, 0.5)
pt3dadd(282.2, -41.7, 96.7, 0.5)
pt3dadd(282.89, -43, 97.2, 0.5)
pt3dadd(283.39, -44.4, 97.8, 0.5)
pt3dadd(284.2, -47.7, 99.1, 0.5)
pt3dadd(284.2, -50.6, 100.2, 0.5)
pt3dadd(284.39, -52.1, 100.8, 0.5)
pt3dadd(284.39, -53.7, 101.5, 0.5)
pt3dadd(284.89, -55.3, 102.2, 0.5)
pt3dadd(285.7, -56.9, 103, 0.5)
pt3dadd(286.39, -59.1, 103.9, 0.5)
pt3dadd(286.5, -60.8, 104.7, 0.5)
pt3dadd(286.7, -62.4, 105.4, 0.5)
pt3dadd(287.5, -63.7, 106.1, 0.5)
pt3dadd(289.1, -64.7, 106.9, 0.5)
}
}
proc shape3d_24() {
apic[48] { pt3dadd(291.6, -66.5, 108.3, 0.5)
pt3dadd(292.3, -67.5, 108.9, 0.5)
pt3dadd(292.39, -68.8, 109.5, 0.5)
pt3dadd(292.7, -70.2, 110.2, 0.5)
pt3dadd(293.3, -71.7, 111, 0.5)
pt3dadd(294.1, -73.09, 111.8, 0.5)
pt3dadd(295.6, -74.4, 112.8, 0.5)
pt3dadd(297.2, -75.5, 113.7, 0.5)
pt3dadd(299.3, -77.2, 115.1, 0.5)
pt3dadd(300.3, -77.7, 115.6, 0.5)
pt3dadd(301.7, -77.8, 116.3, 0.5)
pt3dadd(303.2, -78, 117.1, 0.5)
pt3dadd(304.1, -78.4, 117.7, 0.5)
pt3dadd(305, -78.5, 118.1, 0.5)
pt3dadd(305.7, -78.3, 118.5, 0.5)
pt3dadd(306.6, -78.4, 118.9, 0.5)
pt3dadd(308.5, -78.2, 120, 0.5)
pt3dadd(309.7, -79.7, 121, 0.5)
pt3dadd(311.2, -82.2, 122.6, 0.5)
pt3dadd(311.3, -83.2, 123.2, 0.5)
pt3dadd(311.7, -85.5, 124.4, 0.5)
pt3dadd(312.3, -86.4, 125.1, 0.5)
pt3dadd(313.3, -87.2, 125.8, 0.5)
pt3dadd(314.3, -88.1, 126.5, 0.5)
pt3dadd(315, -89, 127.2, 0.5)
pt3dadd(315.39, -90, 127.8, 0.5)
pt3dadd(315.8, -91.1, 128.5, 0.5)
pt3dadd(316.3, -92, 129.1, 0.5)
pt3dadd(317.5, -92.4, 129.8, 0.5)
pt3dadd(318.8, -93.1, 130.69, 0.5)
pt3dadd(320.1, -93.5, 131.5, 0.5)
pt3dadd(321.2, -93.6, 132.1, 0.5)
pt3dadd(321.7, -94.1, 132.5, 0.5)
pt3dadd(322.2, -95.2, 133.3, 0.5)
pt3dadd(322.3, -95.9, 133.69, 0.5)
pt3dadd(322.3, -96.4, 134, 0.5)
pt3dadd(323, -97.5, 134.8, 0.5)
pt3dadd(323.1, -98.4, 135.4, 0.5)
pt3dadd(323.5, -99.1, 135.9, 0.5)
pt3dadd(323.7, -99.8, 136.3, 0.5)
pt3dadd(324.39, -101.2, 137.3, 0.5)
pt3dadd(325.1, -102.3, 138.1, 0.5)
pt3dadd(325.89, -104.7, 139.8, 0.18)
pt3dadd(326.1, -105.8, 140.5, 0.18)
pt3dadd(326, -106.5, 140.9, 0.18)
pt3dadd(326.89, -108.2, 142.19, 0.18)
pt3dadd(328.5, -108.7, 143.3, 0.18)
pt3dadd(329.4, -109.2, 144, 0.18)
pt3dadd(329.9, -109.8, 144.5, 0.18)
pt3dadd(330.2, -110.8, 145.3, 0.18)
pt3dadd(330.1, -111.7, 145.9, 0.18)
pt3dadd(330.8, -112.9, 146.9, 0.18)
pt3dadd(330.8, -113.8, 147.4, 0.18)
pt3dadd(331, -114.4, 147.9, 0.18)
pt3dadd(331.1, -115.3, 148.6, 0.18)
pt3dadd(331, -116.6, 149.5, 0.18)
pt3dadd(330.9, -117.4, 150, 0.18)
}
apic[49] {pt3dclear()
pt3dadd(242.7, -21.6, 84, 1.2)
pt3dadd(243.4, -20.6, 84.3, 0.5)
pt3dadd(244.3, -19.89, 84.6, 0.5)
pt3dadd(245.4, -19.39, 84.9, 0.5)
pt3dadd(245.7, -18.7, 85.1, 0.5)
pt3dadd(246, -18, 85.2, 0.5)
pt3dadd(246.8, -17.5, 85.4, 0.5)
pt3dadd(248.2, -16.89, 85.7, 0.5)
pt3dadd(249.4, -16.2, 85.9, 0.5)
pt3dadd(249.9, -15.9, 86, 0.5)
pt3dadd(249.3, -15.5, 86.1, 0.5)
pt3dadd(249.8, -15.2, 86.2, 0.5)
pt3dadd(250.6, -14.9, 86.3, 0.5)
pt3dadd(251.8, -14.7, 86.4, 0.5)
pt3dadd(252.7, -14.3, 86.5, 0.5)
pt3dadd(253.8, -13.8, 86.6, 0.5)
pt3dadd(254.4, -13.6, 86.7, 0.5)
pt3dadd(255.6, -13.5, 86.8, 0.5)
pt3dadd(258.6, -13.5, 87.1, 0.5)
pt3dadd(260.7, -12.9, 87.2, 0.5)
pt3dadd(261.8, -12.2, 87.3, 0.5)
pt3dadd(262.89, -12, 87.4, 0.5)
pt3dadd(264.5, -11.9, 87.6, 0.5)
pt3dadd(266, -11.5, 87.7, 0.5)
pt3dadd(267.39, -11.1, 87.8, 0.5)
pt3dadd(268.7, -10.9, 88, 0.5)
pt3dadd(270, -11.1, 88.1, 0.5)
pt3dadd(271.3, -10.9, 88.3, 0.5)
pt3dadd(272.3, -10.7, 88.5, 0.5)
pt3dadd(273.8, -10, 88.8, 0.5)
pt3dadd(274.7, -9.69, 88.9, 0.5)
pt3dadd(275.3, -9.5, 89, 0.5)
pt3dadd(276.7, -9.3, 89.3, 0.5)
pt3dadd(278.3, -8.9, 89.7, 0.5)
pt3dadd(279.3, -8.69, 90, 0.5)
}
apic[50] {pt3dclear()
pt3dadd(279.3, -8.69, 90, 0.5)
pt3dadd(280.3, -8, 90.3, 0.5)
pt3dadd(281.1, -7.5, 90.5, 0.5)
pt3dadd(281.6, -7.3, 90.6, 0.5)
pt3dadd(283, -6.9, 90.9, 0.5)
pt3dadd(283.7, -7, 91.1, 0.5)
pt3dadd(284.3, -6.8, 91.2, 0.5)
pt3dadd(285.7, -6.1, 91.6, 0.5)
pt3dadd(286.39, -5.6, 91.8, 0.5)
pt3dadd(287.1, -5, 92, 0.5)
pt3dadd(288.1, -4.3, 92.2, 0.5)
pt3dadd(289.6, -3.2, 92.7, 0.5)
pt3dadd(290.7, -2.7, 93, 0.5)
pt3dadd(291.6, -2, 93.2, 0.5)
pt3dadd(292.89, -0.9, 93.6, 0.5)
pt3dadd(293.8, 0.5, 94, 0.5)
pt3dadd(294.6, 1.1, 94.2, 0.5)
pt3dadd(295.39, 1.6, 94.5, 0.5)
pt3dadd(296.5, 2, 94.7, 0.5)
pt3dadd(298.2, 3.1, 95.2, 0.5)
pt3dadd(299.3, 4, 95.6, 0.5)
pt3dadd(300.89, 5.7, 96.1, 0.5)
pt3dadd(301.6, 6.8, 96.5, 0.5)
pt3dadd(302, 8, 96.8, 0.5)
pt3dadd(303.3, 10.1, 97.4, 0.5)
pt3dadd(305.3, 11.3, 98, 0.5)
pt3dadd(306.6, 11.7, 98.3, 0.5)
pt3dadd(308, 12.3, 98.7, 0.5)
pt3dadd(309.2, 12.9, 99.1, 0.5)
pt3dadd(309.89, 13.8, 99.4, 0.5)
pt3dadd(310.6, 15.1, 99.8, 0.5)
pt3dadd(311, 16.6, 100.2, 0.5)
pt3dadd(311.89, 18.1, 100.7, 0.5)
pt3dadd(313, 19.8, 101.2, 0.5)
pt3dadd(314.3, 21.2, 101.7, 0.5)
pt3dadd(315.8, 22.4, 102.3, 0.5)
pt3dadd(316.89, 23.6, 102.7, 0.5)
pt3dadd(317.5, 25.1, 103.2, 0.5)
pt3dadd(317.8, 26.5, 103.6, 0.5)
pt3dadd(318.6, 27.8, 104, 0.5)
pt3dadd(319.7, 29, 104.5, 0.5)
pt3dadd(322.1, 31.8, 105.6, 0.5)
pt3dadd(322.89, 33, 106.1, 0.5)
pt3dadd(323.7, 34, 106.5, 0.5)
pt3dadd(324.5, 34.9, 106.8, 0.5)
pt3dadd(325.39, 35.5, 107.1, 0.5)
pt3dadd(326.39, 36.1, 107.5, 0.5)
pt3dadd(327.6, 37, 108, 0.5)
}
apic[51] {pt3dclear()
pt3dadd(279.3, -8.69, 90, 0.5)
pt3dadd(279.89, -8.1, 90.3, 0.5)
pt3dadd(280.39, -7.5, 90.5, 0.5)
pt3dadd(281.6, -6.9, 91, 0.5)
pt3dadd(283.1, -6.3, 91.7, 0.5)
pt3dadd(284.2, -6.2, 92.1, 0.5)
pt3dadd(285.39, -5.8, 92.7, 0.5)
pt3dadd(286.6, -5.2, 93.4, 0.5)
pt3dadd(287.3, -4.7, 93.8, 0.5)
pt3dadd(288.2, -4, 94.4, 0.5)
pt3dadd(289.2, -3.4, 95, 0.5)
pt3dadd(290.39, -2.9, 95.7, 0.5)
pt3dadd(291.7, -2.8, 96.5, 0.5)
pt3dadd(293.6, -2.8, 97.7, 0.5)
pt3dadd(296.8, -3, 99.8, 0.5)
pt3dadd(298.39, -3, 101, 0.5)
pt3dadd(300.5, -2.8, 102.5, 0.5)
pt3dadd(303.7, -3.1, 104.9, 0.5)
pt3dadd(306.6, -2.8, 107.3, 0.5)
pt3dadd(309.7, -1.7, 110.1, 0.5)
pt3dadd(310.5, -1.5, 110.8, 0.5)
pt3dadd(311.39, -1.6, 111.6, 0.5)
pt3dadd(313.2, -1.4, 113.2, 0.5)
pt3dadd(314, -1.2, 114, 0.5)
pt3dadd(314.89, -0.7, 114.9, 0.5)
pt3dadd(315.8, -0.09, 115.9, 0.5)
pt3dadd(316.6, 0.4, 116.8, 0.5)
pt3dadd(317.6, 0.9, 117.8, 0.5)
pt3dadd(318.39, 1.2, 118.6, 0.5)
pt3dadd(319.7, 1.9, 120, 0.5)
pt3dadd(320.3, 2.29, 120.7, 0.5)
pt3dadd(321.1, 2.8, 121.7, 0.5)
pt3dadd(322.6, 3.6, 123.4, 0.5)
pt3dadd(323.39, 3.9, 124.2, 0.5)
pt3dadd(324.5, 4, 125.5, 0.5)
pt3dadd(325.7, 4.8, 127.1, 0.5)
pt3dadd(327.8, 6.7, 130.3, 0.5)
pt3dadd(328.9, 8.19, 132.5, 0.5)
pt3dadd(329.4, 8.8, 133.5, 0.5)
pt3dadd(330.1, 9.3, 134.6, 0.5)
pt3dadd(331.4, 9.9, 136.5, 0.5)
pt3dadd(332.8, 10.3, 138.4, 0.5)
pt3dadd(333.5, 11, 139.69, 0.5)
pt3dadd(333.9, 11.5, 140.6, 0.5)
pt3dadd(334.6, 11.6, 141.6, 0.5)
pt3dadd(336.3, 12.1, 144, 0.5)
}
apic[52] {pt3dclear()
pt3dadd(227.8, -17.6, 78, 1.2)
pt3dadd(229, -17.1, 78.2, 0.5)
pt3dadd(229.7, -16.5, 78.3, 0.5)
pt3dadd(230.6, -16.1, 78.3, 0.5)
pt3dadd(231.3, -15.9, 78.4, 0.5)
pt3dadd(233, -15.4, 78.4, 0.5)
pt3dadd(233.9, -15.2, 78.4, 0.5)
pt3dadd(234.7, -15, 78.4, 0.5)
pt3dadd(235.5, -14.3, 78.3, 0.5)
pt3dadd(236.6, -13.8, 78.2, 0.5)
pt3dadd(237.2, -13.6, 78.09, 0.5)
pt3dadd(237.8, -13.4, 78.09, 0.5)
pt3dadd(239.9, -13, 77.7, 0.5)
pt3dadd(240.5, -13.1, 77.59, 0.5)
}
}
proc shape3d_25() {
apic[52] { pt3dadd(242.8, -13, 77.09, 0.5)
pt3dadd(244.7, -12.8, 76.59, 0.5)
pt3dadd(245.5, -12.5, 76.4, 0.5)
pt3dadd(247.3, -11.7, 75.8, 0.5)
pt3dadd(248.3, -11.3, 75.4, 0.5)
pt3dadd(249.2, -10.6, 75, 0.5)
pt3dadd(249.5, -9.6, 74.59, 0.5)
pt3dadd(249.8, -9, 74.3, 0.5)
pt3dadd(250.8, -8.3, 73.8, 0.5)
pt3dadd(252.1, -7.6, 73.09, 0.5)
pt3dadd(253.7, -6.8, 72.2, 0.5)
pt3dadd(255.3, -6.3, 71.3, 0.5)
pt3dadd(256.89, -6.1, 70.4, 0.5)
pt3dadd(258.2, -5.9, 69.59, 0.5)
pt3dadd(259, -5.3, 69, 0.5)
pt3dadd(259.8, -4.59, 68.3, 0.5)
pt3dadd(260.39, -3.6, 67.59, 0.5)
pt3dadd(262, -1.4, 65.7, 0.5)
pt3dadd(263.7, -0.09, 64.09, 0.5)
pt3dadd(266.6, 1.5, 61.6, 0.5)
pt3dadd(268.7, 2.4, 59.7, 0.5)
pt3dadd(270.7, 3.1, 57.9, 0.5)
pt3dadd(273.89, 4.3, 54.9, 0.5)
pt3dadd(277.1, 5.8, 51.5, 0.5)
pt3dadd(278.39, 6.6, 50, 0.5)
pt3dadd(280.3, 7.6, 47.8, 0.5)
pt3dadd(281.3, 7.5, 46.8, 0.5)
pt3dadd(284.39, 7.3, 43.5, 0.5)
pt3dadd(285.3, 7.9, 42.2, 0.5)
pt3dadd(286.2, 9, 40.7, 0.5)
pt3dadd(289, 11.4, 36.6, 0.5)
pt3dadd(290.6, 12.1, 34.5, 0.5)
pt3dadd(291.8, 12.7, 32.9, 0.5)
pt3dadd(292.5, 13.1, 32, 0.5)
pt3dadd(293.6, 14.5, 29.8, 0.5)
pt3dadd(295.8, 17.1, 25.6, 0.5)
pt3dadd(297.1, 18, 23.6, 0.5)
pt3dadd(298.6, 18.6, 21.6, 0.5)
pt3dadd(300.1, 18.7, 19.6, 0.5)
pt3dadd(301.7, 18.6, 17.39, 0.5)
pt3dadd(304.8, 18.3, 13.4, 0.5)
pt3dadd(305.8, 18.2, 12, 0.5)
}
apic[53] {pt3dclear()
pt3dadd(216, -15.2, 72, 1.2)
pt3dadd(216.5, -16.3, 72.4, 0.5)
pt3dadd(216.8, -17, 72.7, 0.5)
pt3dadd(217.4, -17.39, 73.09, 0.5)
pt3dadd(217.9, -17.8, 73.4, 0.5)
pt3dadd(218.6, -18.3, 73.8, 0.5)
pt3dadd(219.5, -18.39, 74.4, 0.5)
pt3dadd(222.8, -18.7, 76.09, 0.5)
pt3dadd(223.8, -19.39, 76.8, 0.5)
pt3dadd(224.2, -19.8, 77, 0.5)
pt3dadd(225.1, -20.2, 77.4, 0.5)
pt3dadd(225.7, -20.3, 77.59, 0.5)
pt3dadd(226.9, -20.9, 78, 0.5)
}
apic[54] {pt3dclear()
pt3dadd(226.9, -20.9, 78, 0.5)
pt3dadd(227.4, -21.3, 78.09, 0.5)
pt3dadd(227.8, -21.9, 78.3, 0.5)
pt3dadd(228.4, -22.3, 78.4, 0.5)
pt3dadd(229, -22.4, 78.5, 0.5)
pt3dadd(230.7, -22.8, 78.8, 0.5)
pt3dadd(231.1, -23.6, 79, 0.5)
pt3dadd(231.7, -24.1, 79.2, 0.5)
pt3dadd(232.4, -24.6, 79.3, 0.5)
pt3dadd(233.2, -24.9, 79.4, 0.5)
pt3dadd(233.8, -25, 79.59, 0.5)
pt3dadd(235.4, -25.5, 79.8, 0.5)
pt3dadd(236.1, -26, 80, 0.5)
pt3dadd(236.9, -26.3, 80.09, 0.5)
pt3dadd(238.5, -26.8, 80.4, 0.5)
pt3dadd(239.2, -27.2, 80.5, 0.5)
pt3dadd(240.1, -27.3, 80.59, 0.5)
pt3dadd(244, -28, 81.2, 0.5)
pt3dadd(244.6, -28.4, 81.3, 0.5)
pt3dadd(245.4, -28.8, 81.4, 0.5)
pt3dadd(246.1, -29.2, 81.59, 0.5)
pt3dadd(246.9, -29.6, 81.7, 0.5)
pt3dadd(247.4, -30, 81.7, 0.5)
pt3dadd(247.8, -30.6, 81.8, 0.5)
pt3dadd(248.5, -31, 81.9, 0.5)
pt3dadd(249.2, -31.1, 82, 0.5)
pt3dadd(250.8, -31.5, 82.2, 0.5)
pt3dadd(251.6, -31.9, 82.3, 0.5)
pt3dadd(252.4, -32.4, 82.4, 0.5)
pt3dadd(253.5, -33.5, 82.6, 0.5)
pt3dadd(254.2, -34.1, 82.7, 0.5)
pt3dadd(254.9, -34.79, 82.8, 0.5)
pt3dadd(255.7, -35.29, 82.9, 0.5)
pt3dadd(257.6, -36.1, 83.1, 0.5)
pt3dadd(258.7, -36.2, 83.3, 0.5)
pt3dadd(260.1, -36.6, 83.4, 0.5)
pt3dadd(263.3, -37.5, 83.7, 0.5)
pt3dadd(264.3, -37.6, 83.8, 0.5)
pt3dadd(266, -37.5, 84, 0.5)
pt3dadd(267.6, -37.4, 84.1, 0.5)
pt3dadd(268.39, -37.29, 84.2, 0.5)
pt3dadd(269.2, -37.29, 84.2, 0.5)
pt3dadd(270.89, -38.1, 84.4, 0.5)
pt3dadd(272, -38.9, 84.5, 0.5)
pt3dadd(273.39, -39.4, 84.6, 0.5)
pt3dadd(274.3, -39.4, 84.7, 0.5)
pt3dadd(276.3, -39.29, 84.8, 0.5)
pt3dadd(277.5, -39.79, 84.9, 0.5)
pt3dadd(278.2, -40.2, 85, 0.5)
pt3dadd(278.8, -40.5, 85, 0.5)
pt3dadd(280, -41.2, 85.1, 0.5)
pt3dadd(280.8, -41.6, 85.2, 0.5)
pt3dadd(281.8, -41.6, 85.3, 0.5)
pt3dadd(282.8, -42, 85.3, 0.5)
pt3dadd(284.89, -43.2, 85.5, 0.5)
pt3dadd(287.7, -45.1, 85.7, 0.5)
pt3dadd(288.39, -45.7, 85.8, 0.5)
pt3dadd(289.2, -46.1, 85.9, 0.5)
pt3dadd(290.3, -46.9, 86, 0.5)
pt3dadd(291, -46.9, 86, 0.5)
pt3dadd(292.1, -47.3, 86.1, 0.5)
pt3dadd(292.6, -47.7, 86.1, 0.5)
pt3dadd(293.5, -48.9, 86.2, 0.5)
pt3dadd(294.2, -49.2, 86.3, 0.5)
pt3dadd(295.3, -49.8, 86.4, 0.5)
pt3dadd(296.5, -50.3, 86.4, 0.5)
pt3dadd(297.39, -50.3, 86.5, 0.5)
pt3dadd(298.2, -50.8, 86.6, 0.5)
pt3dadd(299, -50.8, 86.6, 0.5)
pt3dadd(299.7, -51.8, 86.7, 0.5)
pt3dadd(299.89, -52.7, 86.8, 0.5)
pt3dadd(300.39, -53.4, 86.8, 0.5)
pt3dadd(301.39, -54.3, 86.9, 0.5)
pt3dadd(301.89, -54.6, 87, 0.5)
pt3dadd(302.2, -55.2, 87, 0.5)
pt3dadd(302.7, -56.5, 87.1, 0.5)
pt3dadd(303.3, -57.7, 87.2, 0.5)
pt3dadd(304, -58.3, 87.3, 0.5)
pt3dadd(304.8, -58.8, 87.4, 0.5)
pt3dadd(305.8, -59.3, 87.4, 0.5)
pt3dadd(307.3, -59.7, 87.6, 0.5)
pt3dadd(308.5, -60.2, 87.7, 0.5)
pt3dadd(309.6, -60.8, 87.8, 0.5)
pt3dadd(310.3, -61.6, 87.9, 0.5)
pt3dadd(310.8, -62.4, 87.9, 0.5)
pt3dadd(311, -63.2, 88, 0.5)
pt3dadd(311.8, -63.9, 88.1, 0.5)
pt3dadd(312.7, -65.2, 88.2, 0.5)
pt3dadd(313.2, -65.9, 88.3, 0.5)
pt3dadd(314.3, -67.3, 88.5, 0.5)
pt3dadd(315, -68, 88.6, 0.5)
pt3dadd(316.2, -69, 88.7, 0.5)
pt3dadd(317, -69.5, 88.8, 0.5)
pt3dadd(317.89, -70.09, 88.9, 0.5)
pt3dadd(318.6, -70.59, 89, 0.5)
pt3dadd(319.3, -71, 89.1, 0.5)
pt3dadd(320.1, -71.4, 89.2, 0.5)
pt3dadd(321, -71.5, 89.3, 0.5)
pt3dadd(321.8, -71.9, 89.4, 0.5)
pt3dadd(322.6, -72.4, 89.5, 0.5)
pt3dadd(323.2, -72.8, 89.6, 0.5)
pt3dadd(323.8, -73.3, 89.7, 0.5)
pt3dadd(324.6, -73.7, 89.8, 0.5)
pt3dadd(325.2, -73.7, 89.8, 0.5)
pt3dadd(325.89, -73.8, 89.9, 0.5)
pt3dadd(326.6, -73.9, 90, 0.5)
}
apic[55] {pt3dclear()
pt3dadd(326.6, -73.9, 90, 0.5)
pt3dadd(327, -74.4, 90.2, 0.6)
pt3dadd(327.7, -74.8, 90.4, 0.6)
pt3dadd(328.5, -75.09, 90.7, 0.6)
pt3dadd(329.2, -75.59, 91.1, 0.6)
pt3dadd(329.9, -76.09, 91.5, 0.6)
pt3dadd(331.5, -77, 92.4, 0.6)
pt3dadd(332.8, -77.5, 93.1, 0.6)
pt3dadd(333.7, -77.59, 93.7, 0.6)
pt3dadd(336.2, -77.5, 95.4, 0.6)
pt3dadd(337, -77.3, 96, 0.6)
pt3dadd(338, -77.4, 96.7, 0.6)
pt3dadd(339.5, -77.4, 97.9, 0.6)
pt3dadd(342.5, -76.7, 100.5, 0.6)
pt3dadd(344, -76.2, 102, 0.6)
pt3dadd(347.2, -75.09, 105.2, 0.6)
pt3dadd(348.4, -74.59, 106.6, 0.6)
pt3dadd(349.6, -73.9, 108, 0.6)
pt3dadd(350.8, -73.2, 109.4, 0.6)
pt3dadd(352.4, -73.09, 111.1, 0.6)
pt3dadd(356, -72.9, 115.1, 0.6)
pt3dadd(357.3, -72.7, 116.5, 0.6)
pt3dadd(359.4, -72.09, 118.9, 0.6)
pt3dadd(362.4, -70.2, 122.8, 0.6)
pt3dadd(364.1, -69.09, 124.9, 0.6)
pt3dadd(365.4, -68.9, 126.2, 0.6)
pt3dadd(368, -68.3, 129, 0.6)
pt3dadd(369, -67.9, 130.1, 0.6)
pt3dadd(369.9, -67.2, 131.19, 0.6)
pt3dadd(370.8, -65.59, 132.9, 0.6)
pt3dadd(371.8, -64.09, 134.6, 0.6)
pt3dadd(373, -63, 136, 0.6)
pt3dadd(374.1, -62, 137.19, 0.6)
pt3dadd(377.3, -59.9, 140, 0.6)
pt3dadd(378.6, -59.8, 140.9, 0.6)
pt3dadd(380, -59.9, 141.8, 0.6)
pt3dadd(381.4, -59.7, 142.5, 0.6)
pt3dadd(382.5, -59.4, 143.1, 0.6)
pt3dadd(383.2, -59.1, 143.5, 0.6)
}
}
proc shape3d_26() {
apic[55] { pt3dadd(383.7, -58.8, 143.69, 0.6)
pt3dadd(384.3, -58.4, 144, 0.6)
}
apic[56] {pt3dclear()
pt3dadd(384.3, -58.4, 144, 0.6)
pt3dadd(384.9, -59, 144.3, 0.6)
pt3dadd(385.5, -59.1, 144.5, 0.6)
pt3dadd(387.1, -59, 145, 0.6)
pt3dadd(387.8, -58.5, 145.19, 0.6)
pt3dadd(388.6, -58.3, 145.4, 0.6)
pt3dadd(391.2, -57.4, 145.8, 0.6)
pt3dadd(392.1, -57.3, 145.9, 0.6)
pt3dadd(393, -57, 146, 0.6)
pt3dadd(393.7, -56.8, 146, 0.6)
pt3dadd(394.4, -56.2, 146, 0.6)
pt3dadd(395.2, -55.6, 146, 0.6)
pt3dadd(395.9, -55.3, 145.9, 0.6)
pt3dadd(396.6, -54.8, 145.9, 0.6)
pt3dadd(397.7, -54, 145.69, 0.6)
pt3dadd(398.3, -53.9, 145.6, 0.6)
pt3dadd(399.1, -53.9, 145.5, 0.6)
pt3dadd(400, -53.8, 145.3, 0.6)
pt3dadd(401, -53.9, 145.1, 0.6)
pt3dadd(404.8, -54, 144, 0.6)
pt3dadd(405.8, -53.5, 143.6, 0.6)
pt3dadd(406.7, -53, 143.1, 0.6)
pt3dadd(408.5, -52.2, 142.3, 0.6)
pt3dadd(409.6, -52.3, 141.69, 0.6)
pt3dadd(413.3, -52.7, 139.69, 0.6)
pt3dadd(414.4, -52.5, 139.1, 0.6)
pt3dadd(415.5, -52.3, 138.4, 0.6)
pt3dadd(416.5, -51.8, 137.6, 0.6)
pt3dadd(417.5, -51.1, 136.8, 0.6)
pt3dadd(418.4, -50.4, 136, 0.6)
pt3dadd(419.3, -49.9, 135.19, 0.6)
pt3dadd(420.1, -49.7, 134.6, 0.6)
pt3dadd(422, -49.6, 133.1, 0.6)
pt3dadd(422.9, -49.5, 132.3, 0.6)
pt3dadd(423.6, -49, 131.6, 0.6)
pt3dadd(424.3, -48.3, 130.69, 0.6)
pt3dadd(424.9, -47.4, 129.69, 0.6)
pt3dadd(425.6, -46.6, 128.8, 0.6)
pt3dadd(426.2, -46, 128, 0.6)
pt3dadd(426.7, -45.4, 127.2, 0.6)
pt3dadd(427.8, -44.7, 126, 0.6)
}
apic[57] {pt3dclear()
pt3dadd(384.3, -58.4, 144, 0.6)
pt3dadd(384.8, -58, 144.19, 0.18)
pt3dadd(385.1, -57.5, 144.4, 0.18)
pt3dadd(385.9, -56.9, 144.69, 0.18)
pt3dadd(386, -56, 144.9, 0.18)
pt3dadd(386.4, -54.7, 145.19, 0.18)
pt3dadd(386.6, -53.2, 145.4, 0.18)
pt3dadd(386.6, -49.4, 145.4, 0.18)
pt3dadd(386.7, -48.5, 145.3, 0.18)
pt3dadd(386.5, -47.5, 145.19, 0.18)
pt3dadd(386.6, -46.5, 145, 0.18)
pt3dadd(387.5, -42.8, 143.9, 0.18)
pt3dadd(388.6, -41, 143.1, 0.18)
pt3dadd(388.7, -40, 142.6, 0.18)
pt3dadd(389, -36.4, 140.69, 0.18)
pt3dadd(390, -32, 137.69, 0.18)
pt3dadd(391.1, -29.3, 135.3, 0.18)
pt3dadd(391.6, -26.9, 133.19, 0.18)
pt3dadd(391.9, -26.3, 132.5, 0.18)
pt3dadd(391.9, -25.7, 132, 0.18)
}
apic[58] {pt3dclear()
pt3dadd(326.6, -73.9, 90, 0.5)
pt3dadd(326.8, -74.7, 90, 1.1)
pt3dadd(327.2, -75.2, 90, 1.1)
pt3dadd(327.3, -76, 89.9, 1.1)
pt3dadd(327.6, -76.59, 89.8, 1.1)
pt3dadd(328.2, -77.09, 89.7, 1.1)
pt3dadd(328.4, -77.7, 89.6, 1.1)
pt3dadd(328.8, -78.09, 89.5, 1.1)
pt3dadd(329.2, -78.8, 89.4, 1.1)
pt3dadd(329.9, -78.8, 89.3, 1.1)
pt3dadd(330.6, -79.2, 89.2, 1.1)
pt3dadd(332.3, -80, 89.1, 1.1)
pt3dadd(332.9, -80.4, 89.2, 1.1)
pt3dadd(333.6, -80.4, 89.3, 1.1)
pt3dadd(334.1, -80.5, 89.5, 1.1)
pt3dadd(335.2, -80.9, 90, 1.1)
}
apic[59] {pt3dclear()
pt3dadd(335.2, -80.9, 90, 1.1)
pt3dadd(335.9, -80.9, 90.8, 1.1)
pt3dadd(336.7, -80.8, 92.6, 1.1)
pt3dadd(337.2, -80.3, 94.7, 1.1)
pt3dadd(337.9, -79.7, 98.2, 1.1)
pt3dadd(338.6, -79.59, 101.2, 1.1)
pt3dadd(339.2, -79.59, 104.1, 1.1)
pt3dadd(340.7, -79.5, 110.9, 1.1)
pt3dadd(341.4, -79.59, 114.1, 1.1)
pt3dadd(342.8, -79.4, 120, 1.1)
pt3dadd(343.8, -79.5, 123.2, 1.1)
pt3dadd(346.6, -79.5, 132.69, 1.1)
pt3dadd(347.2, -79.2, 135.19, 1.1)
pt3dadd(347.8, -79.09, 137.4, 1.1)
pt3dadd(349.5, -79, 143.3, 1.1)
pt3dadd(350.8, -78.9, 147.8, 1.1)
pt3dadd(351.7, -79, 150.8, 1.1)
pt3dadd(352.6, -78.8, 153.6, 1.1)
pt3dadd(353.3, -78.9, 156, 1.1)
pt3dadd(356, -78.7, 164.7, 1.1)
pt3dadd(359.3, -77.7, 174.7, 1.1)
pt3dadd(360.2, -77.8, 177.2, 1.1)
pt3dadd(361.3, -77.8, 180, 1.1)
pt3dadd(362, -77.9, 181.6, 1.1)
pt3dadd(364.1, -78.4, 185.8, 1.1)
pt3dadd(365.7, -78.59, 188, 1.1)
pt3dadd(368.3, -78.8, 191, 1.1)
pt3dadd(369.3, -78.9, 192, 1.1)
}
apic[60] {pt3dclear()
pt3dadd(369.3, -78.9, 192, 1.1)
pt3dadd(370, -78.4, 192.9, 1.1)
pt3dadd(371.1, -77.9, 194.1, 1.1)
pt3dadd(371.8, -77.59, 194.8, 1.1)
pt3dadd(373, -77.5, 196, 1.1)
pt3dadd(374.9, -77.2, 197.8, 1.1)
pt3dadd(375.7, -77, 198.6, 1.1)
pt3dadd(376.7, -76.7, 199.5, 1.1)
pt3dadd(377.7, -76.4, 200.5, 1.1)
pt3dadd(378.8, -75.9, 201.5, 1.1)
pt3dadd(379.6, -75.7, 202.3, 1.1)
pt3dadd(380.4, -75.5, 203, 1.1)
pt3dadd(381.5, -75.4, 204, 1.1)
}
apic[61] {pt3dclear()
pt3dadd(381.5, -75.4, 204, 1.1)
pt3dadd(382.2, -75.5, 204.7, 0.6)
pt3dadd(382.8, -75.5, 205.4, 0.6)
pt3dadd(385.2, -75.2, 208.5, 0.6)
pt3dadd(387.7, -73.4, 212.8, 0.6)
pt3dadd(389.8, -71.8, 216.5, 0.6)
pt3dadd(390.1, -71.2, 217.4, 0.6)
pt3dadd(390.2, -70.4, 218.4, 0.6)
pt3dadd(390.5, -69.59, 219.3, 0.6)
pt3dadd(390.8, -68.7, 220.3, 0.6)
pt3dadd(391.2, -67.5, 221.3, 0.6)
pt3dadd(391.7, -66.5, 222, 0.6)
}
apic[62] {pt3dclear()
pt3dadd(391.7, -66.5, 222, 0.6)
pt3dadd(393.6, -66.09, 222.2, 0.6)
pt3dadd(394.2, -66.2, 221.6, 0.6)
pt3dadd(395, -66.3, 220.5, 0.6)
pt3dadd(395.7, -66.7, 219.1, 0.6)
pt3dadd(396.3, -66.7, 217.8, 0.6)
pt3dadd(397, -66.59, 216, 0.6)
pt3dadd(397.6, -66.59, 214.5, 0.6)
pt3dadd(398.2, -67.09, 212.3, 0.6)
pt3dadd(398.3, -67.9, 210, 0.6)
}
apic[63] {pt3dclear()
pt3dadd(391.7, -66.5, 222, 0.6)
pt3dadd(392.3, -66.59, 222.2, 0.18)
pt3dadd(392.8, -66.3, 222.3, 0.18)
pt3dadd(393.7, -66.2, 222.4, 0.18)
pt3dadd(394.3, -65.4, 222.4, 0.18)
pt3dadd(394.6, -64.9, 222.4, 0.18)
pt3dadd(394.9, -64.3, 222.4, 0.18)
pt3dadd(395, -63.6, 222.3, 0.18)
pt3dadd(394.8, -62.5, 222, 0.18)
pt3dadd(395.2, -61.7, 221.8, 0.18)
pt3dadd(395.7, -60.9, 221.4, 0.18)
pt3dadd(396.5, -60.1, 220.9, 0.18)
pt3dadd(397.3, -59.1, 220.3, 0.18)
pt3dadd(398.4, -57.4, 219.1, 0.18)
pt3dadd(399.2, -55.7, 217.8, 0.18)
pt3dadd(399.6, -54.5, 216.8, 0.18)
pt3dadd(400, -53.5, 216, 0.18)
pt3dadd(400.6, -52.8, 215.2, 0.18)
pt3dadd(400.6, -52.2, 214.7, 0.18)
pt3dadd(401, -51, 213.6, 0.18)
pt3dadd(401.4, -50.3, 212.9, 0.18)
pt3dadd(401.7, -49.7, 212.3, 0.18)
pt3dadd(402.4, -49, 211.4, 0.18)
pt3dadd(403.1, -48.7, 210.7, 0.18)
pt3dadd(403.9, -48.6, 210, 0.18)
}
apic[64] {pt3dclear()
pt3dadd(403.9, -48.6, 210, 0.18)
pt3dadd(403.6, -48.1, 209.7, 0.18)
pt3dadd(403.7, -47.2, 209.3, 0.18)
pt3dadd(404.6, -45.2, 208.3, 0.18)
pt3dadd(405.4, -44.7, 207.8, 0.18)
pt3dadd(405.7, -44.1, 207.5, 0.18)
pt3dadd(405.6, -43.4, 207.2, 0.18)
pt3dadd(405.3, -42.8, 206.9, 0.18)
pt3dadd(404.9, -42.3, 206.6, 0.18)
pt3dadd(405, -41.7, 206.3, 0.18)
pt3dadd(405, -40.9, 206, 0.18)
pt3dadd(405.3, -40.1, 205.5, 0.18)
pt3dadd(405.6, -39.5, 205.2, 0.18)
pt3dadd(405.3, -38.7, 204.8, 0.18)
pt3dadd(405.4, -37.79, 204.4, 0.18)
pt3dadd(405.7, -37, 204.1, 0.18)
pt3dadd(406.5, -35.29, 203.2, 0.18)
pt3dadd(406.3, -34, 202.6, 0.18)
pt3dadd(406.1, -33.4, 202.3, 0.18)
pt3dadd(406.2, -32.7, 202, 0.18)
pt3dadd(406.5, -31.8, 201.6, 0.18)
pt3dadd(406.9, -31, 201.2, 0.18)
pt3dadd(408, -28, 199.8, 0.18)
pt3dadd(408.5, -25.8, 198.8, 0.18)
pt3dadd(408.5, -25.1, 198.5, 0.18)
pt3dadd(408.8, -24.5, 198.1, 0.18)
pt3dadd(409.7, -22.5, 197.2, 0.18)
pt3dadd(410.3, -21.4, 196.6, 0.18)
pt3dadd(410.6, -20.5, 196.2, 0.18)
pt3dadd(411, -19.8, 195.8, 0.18)
pt3dadd(411.7, -18.7, 195.2, 0.18)
pt3dadd(412.2, -18.2, 194.9, 0.18)
pt3dadd(412.8, -17.7, 194.5, 0.18)
}
}
proc shape3d_27() {
apic[64] { pt3dadd(413.6, -16.5, 193.9, 0.18)
pt3dadd(414.1, -15.9, 193.5, 0.18)
pt3dadd(414.5, -14.7, 193, 0.18)
pt3dadd(415.6, -12.5, 191.9, 0.18)
pt3dadd(416.1, -11.3, 191.3, 0.18)
pt3dadd(417, -10.7, 190.8, 0.18)
pt3dadd(417.9, -9.69, 190.2, 0.18)
pt3dadd(419.5, -8.4, 189.2, 0.18)
pt3dadd(420.9, -6.9, 188.3, 0.18)
pt3dadd(420.9, -6.3, 188, 0.18)
pt3dadd(421.4, -4.09, 187, 0.18)
pt3dadd(422.6, -3.1, 186.2, 0.18)
pt3dadd(423.3, -2.4, 185.8, 0.18)
pt3dadd(424, -1.9, 185.4, 0.18)
pt3dadd(424.6, -1.2, 184.9, 0.18)
pt3dadd(425.2, -0.3, 184.4, 0.18)
pt3dadd(425.5, 0.6, 183.9, 0.18)
pt3dadd(425.9, 1.5, 183.4, 0.18)
pt3dadd(426.3, 2.29, 183, 0.18)
pt3dadd(426.7, 2.8, 182.7, 0.18)
pt3dadd(427.2, 3.2, 182.4, 0.18)
pt3dadd(428.3, 4, 181.7, 0.18)
pt3dadd(428.9, 4.8, 181.2, 0.18)
pt3dadd(429.5, 5.5, 180.7, 0.18)
pt3dadd(429.8, 6, 180.4, 0.18)
pt3dadd(430.4, 6.7, 180, 0.18)
pt3dadd(431, 7.1, 179.6, 0.18)
pt3dadd(432.5, 8, 178.7, 0.18)
pt3dadd(433.2, 8.19, 178.3, 0.18)
pt3dadd(434.1, 8.9, 177.6, 0.18)
pt3dadd(434.9, 9.69, 176.8, 0.18)
pt3dadd(435.2, 10.5, 176.3, 0.18)
pt3dadd(435.8, 11.6, 175.5, 0.18)
pt3dadd(436.2, 12.2, 175, 0.18)
pt3dadd(436.9, 12.8, 174.3, 0.18)
pt3dadd(437.6, 13.5, 173.6, 0.18)
pt3dadd(439, 15.1, 171.9, 0.18)
pt3dadd(439.4, 16.3, 170.9, 0.18)
pt3dadd(439.8, 17.5, 169.9, 0.18)
pt3dadd(439.9, 18.39, 169.1, 0.18)
pt3dadd(440.2, 19.1, 168.5, 0.18)
pt3dadd(441.4, 21, 166.5, 0.18)
pt3dadd(441.8, 22.1, 165.4, 0.18)
pt3dadd(442.3, 23.2, 164.4, 0.18)
pt3dadd(442.4, 24.4, 163.19, 0.18)
pt3dadd(442.4, 28.1, 159.69, 0.18)
pt3dadd(442.5, 29.3, 158.5, 0.18)
pt3dadd(442.4, 31.6, 156.19, 0.18)
pt3dadd(442, 33.4, 154.3, 0.18)
pt3dadd(441.7, 34.1, 153.5, 0.18)
pt3dadd(441.5, 35.4, 152.19, 0.18)
pt3dadd(441.3, 36.2, 151.3, 0.18)
pt3dadd(441.3, 36.9, 150.6, 0.18)
pt3dadd(441.4, 37.5, 150, 0.18)
}
apic[65] {pt3dclear()
pt3dadd(403.9, -48.6, 210, 0.18)
pt3dadd(405.6, -49, 207.5, 0.18)
pt3dadd(406.5, -49.1, 206.2, 0.18)
pt3dadd(407, -49.4, 205.3, 0.18)
pt3dadd(408, -49.5, 204, 0.18)
pt3dadd(408.7, -49.1, 202.7, 0.18)
pt3dadd(409.7, -48.7, 201.1, 0.18)
pt3dadd(410.7, -48.5, 199.6, 0.18)
pt3dadd(412.2, -48.5, 197.3, 0.18)
pt3dadd(413.1, -47.9, 195.7, 0.18)
pt3dadd(413.7, -47.4, 194.5, 0.18)
pt3dadd(414.2, -47.1, 193.6, 0.18)
pt3dadd(414.6, -46.6, 192.6, 0.18)
pt3dadd(415.4, -46, 190.9, 0.18)
pt3dadd(416.1, -45.6, 189.7, 0.18)
pt3dadd(417.1, -45.1, 188.1, 0.18)
pt3dadd(417.8, -44.7, 187, 0.18)
pt3dadd(419.4, -44.3, 184.6, 0.18)
pt3dadd(420.1, -44.1, 183.6, 0.18)
pt3dadd(421.6, -43.7, 181.5, 0.18)
pt3dadd(422.7, -43.3, 180, 0.18)
pt3dadd(423.4, -43.4, 179, 0.18)
pt3dadd(423.7, -43.9, 178.2, 0.18)
pt3dadd(424.4, -44.8, 176.8, 0.18)
pt3dadd(424.9, -45.3, 175.9, 0.18)
pt3dadd(425.5, -45.6, 175, 0.18)
pt3dadd(427, -46.1, 173, 0.18)
pt3dadd(429, -46.1, 170.4, 0.18)
pt3dadd(429.6, -45.9, 169.6, 0.18)
pt3dadd(430.3, -45.7, 168.7, 0.18)
pt3dadd(432, -45.5, 166.5, 0.18)
pt3dadd(432.5, -46.3, 165.3, 0.18)
pt3dadd(433, -46.8, 164.4, 0.18)
pt3dadd(433.6, -46.9, 163.6, 0.18)
pt3dadd(434.2, -46.6, 162.9, 0.18)
pt3dadd(435, -46.7, 161.69, 0.18)
pt3dadd(436.2, -47.8, 159.69, 0.18)
pt3dadd(436.3, -49, 158.19, 0.18)
pt3dadd(436.2, -50.2, 156.69, 0.18)
pt3dadd(436.3, -51.4, 155.1, 0.18)
pt3dadd(436.5, -52.6, 153.69, 0.18)
pt3dadd(437.2, -53.6, 152.1, 0.18)
pt3dadd(438.2, -54.8, 150.1, 0.18)
pt3dadd(439.3, -55.8, 148.4, 0.18)
pt3dadd(439.4, -56.7, 147.3, 0.18)
pt3dadd(439.3, -57.6, 146.19, 0.18)
pt3dadd(439.6, -59.4, 143.9, 0.18)
pt3dadd(440.3, -60.4, 142.4, 0.18)
pt3dadd(441.8, -62.7, 139.1, 0.18)
pt3dadd(442, -63.8, 137.8, 0.18)
pt3dadd(442.6, -64.9, 136.3, 0.18)
pt3dadd(442.9, -65.8, 135.3, 0.18)
pt3dadd(443.2, -66.5, 134.4, 0.18)
pt3dadd(443.4, -67.3, 133.4, 0.18)
pt3dadd(443.5, -68.59, 132, 0.18)
}
apic[66] {pt3dclear()
pt3dadd(381.5, -75.4, 204, 1.1)
pt3dadd(382.1, -76.09, 204.5, 0.18)
pt3dadd(382.4, -77.2, 204.8, 0.18)
pt3dadd(383.3, -78, 205.1, 0.18)
pt3dadd(383.9, -79, 205.2, 0.18)
pt3dadd(384.6, -79.7, 205.2, 0.18)
pt3dadd(385.1, -80.09, 205.2, 0.18)
pt3dadd(385.5, -80.9, 205, 0.18)
pt3dadd(385.4, -81.7, 204.8, 0.18)
pt3dadd(385.5, -82.7, 204.5, 0.18)
pt3dadd(386.1, -83.6, 204, 0.18)
pt3dadd(387.4, -85.1, 202.9, 0.18)
pt3dadd(388.9, -86.7, 201.3, 0.18)
pt3dadd(389.6, -87.3, 200.6, 0.18)
pt3dadd(390.1, -87.9, 199.9, 0.18)
pt3dadd(390.3, -88.6, 199.2, 0.18)
pt3dadd(390.3, -89.4, 198.4, 0.18)
pt3dadd(390.4, -90.7, 197.1, 0.18)
pt3dadd(390.3, -91.4, 196.4, 0.18)
pt3dadd(389.6, -92.2, 195.1, 0.18)
pt3dadd(389.2, -92.8, 194.3, 0.18)
pt3dadd(388.8, -93.4, 193.3, 0.18)
pt3dadd(388, -94.2, 192, 0.18)
}
apic[67] {pt3dclear()
pt3dadd(369.3, -78.9, 192, 1.1)
pt3dadd(369.9, -79.9, 192.8, 0.18)
pt3dadd(370.4, -80.4, 193.3, 0.18)
pt3dadd(371.1, -80.9, 193.9, 0.18)
pt3dadd(371.7, -81, 194.3, 0.18)
pt3dadd(372.6, -81.4, 194.9, 0.18)
pt3dadd(373.3, -81.4, 195.3, 0.18)
pt3dadd(375, -81.4, 196.2, 0.18)
pt3dadd(375.8, -81.5, 196.7, 0.18)
pt3dadd(376.7, -81.3, 197.1, 0.18)
pt3dadd(377.3, -81.4, 197.4, 0.18)
pt3dadd(379.6, -82, 198.6, 0.18)
pt3dadd(380.4, -82.7, 199, 0.18)
pt3dadd(380.9, -83.2, 199.4, 0.18)
pt3dadd(381.4, -83.7, 199.7, 0.18)
pt3dadd(382.6, -83.8, 200.2, 0.18)
pt3dadd(383.5, -84.2, 200.6, 0.18)
pt3dadd(384.1, -84.7, 201, 0.18)
pt3dadd(384.7, -85, 201.3, 0.18)
pt3dadd(385.2, -85.4, 201.6, 0.18)
pt3dadd(386.3, -86.3, 202.2, 0.18)
pt3dadd(386.8, -86.6, 202.5, 0.18)
pt3dadd(388.2, -87.5, 203.4, 0.18)
pt3dadd(389.1, -88.3, 204, 0.18)
}
apic[68] {pt3dclear()
pt3dadd(389.1, -88.3, 204, 0.18)
pt3dadd(389.8, -88.4, 204.2, 0.18)
pt3dadd(390.7, -88.2, 204.4, 0.18)
pt3dadd(392.8, -88.2, 204.8, 0.18)
pt3dadd(395.6, -88.8, 205.4, 0.18)
pt3dadd(396.4, -88.8, 205.6, 0.18)
pt3dadd(397.2, -89.3, 205.8, 0.18)
pt3dadd(397.9, -89.4, 205.9, 0.18)
pt3dadd(400.4, -88.9, 206.5, 0.18)
pt3dadd(401.8, -87.8, 206.8, 0.18)
pt3dadd(402.5, -87, 207, 0.18)
pt3dadd(402.8, -86.2, 207.1, 0.18)
pt3dadd(403.2, -85.6, 207.3, 0.18)
pt3dadd(404.3, -84.2, 207.6, 0.18)
pt3dadd(405.3, -83.4, 207.8, 0.18)
pt3dadd(406.4, -82.5, 208.1, 0.18)
pt3dadd(406.7, -81.59, 208.2, 0.18)
pt3dadd(407.4, -80.59, 208.4, 0.18)
pt3dadd(407.8, -79.7, 208.6, 0.18)
pt3dadd(408.4, -78.8, 208.8, 0.18)
pt3dadd(409.1, -78, 208.9, 0.18)
pt3dadd(409.9, -77.3, 209.1, 0.18)
pt3dadd(411.8, -76, 209.4, 0.18)
pt3dadd(413, -75.5, 209.6, 0.18)
pt3dadd(414, -75.3, 209.7, 0.18)
pt3dadd(414.8, -75.4, 209.8, 0.18)
pt3dadd(415.5, -75.2, 209.9, 0.18)
pt3dadd(416.2, -75, 210, 0.18)
pt3dadd(416.7, -74.7, 210, 0.18)
pt3dadd(417.1, -74.2, 210.1, 0.18)
pt3dadd(417.8, -73.9, 210.2, 0.18)
pt3dadd(418.3, -73.5, 210.2, 0.18)
pt3dadd(419, -73.3, 210.3, 0.18)
pt3dadd(419.8, -72.8, 210.4, 0.18)
pt3dadd(420.8, -72.3, 210.5, 0.18)
pt3dadd(421.6, -72.2, 210.6, 0.18)
pt3dadd(422.7, -71.9, 210.7, 0.18)
pt3dadd(423.7, -71.7, 210.7, 0.18)
pt3dadd(425.1, -71.5, 210.8, 0.18)
pt3dadd(427.6, -71.9, 210.9, 0.18)
pt3dadd(428.3, -72, 211, 0.18)
pt3dadd(430, -71.9, 211, 0.18)
pt3dadd(430.6, -71.7, 211.1, 0.18)
pt3dadd(431.7, -71.5, 211.1, 0.18)
}
}
proc shape3d_28() {
apic[68] { pt3dadd(432.8, -71.59, 211.1, 0.18)
pt3dadd(435.7, -72.2, 211.1, 0.18)
pt3dadd(436.5, -72.3, 211.1, 0.18)
pt3dadd(437.4, -71.9, 211.1, 0.18)
pt3dadd(440.3, -71, 211, 0.18)
pt3dadd(441.3, -70.8, 210.9, 0.18)
pt3dadd(442.2, -70.9, 210.9, 0.18)
pt3dadd(443.1, -70.7, 210.8, 0.18)
pt3dadd(444.7, -70.09, 210.7, 0.18)
pt3dadd(445.4, -69.7, 210.6, 0.18)
pt3dadd(446.1, -69.2, 210.5, 0.18)
pt3dadd(446.8, -68.9, 210.5, 0.18)
pt3dadd(447.6, -68.7, 210.4, 0.18)
pt3dadd(449.6, -68.2, 210.1, 0.18)
pt3dadd(450.8, -68.3, 210, 0.18)
}
apic[69] {pt3dclear()
pt3dadd(389.1, -88.3, 204, 0.18)
pt3dadd(389.2, -89, 204.6, 0.18)
pt3dadd(389.4, -90, 205.7, 0.18)
pt3dadd(389.7, -91.1, 206.8, 0.18)
pt3dadd(390.2, -91.8, 207.8, 0.18)
pt3dadd(391.4, -93.1, 209.8, 0.18)
pt3dadd(392, -93.5, 210.7, 0.18)
pt3dadd(392.4, -94.3, 211.9, 0.18)
pt3dadd(392.7, -95.4, 213.3, 0.18)
pt3dadd(393.5, -97.3, 216.1, 0.18)
pt3dadd(394.3, -98.2, 217.8, 0.18)
pt3dadd(395.2, -99, 219.4, 0.18)
pt3dadd(395.9, -99.9, 221.1, 0.18)
pt3dadd(396.6, -100.7, 222.6, 0.18)
pt3dadd(396.5, -101.8, 224.1, 0.18)
pt3dadd(396.6, -102.7, 225.4, 0.18)
pt3dadd(396.5, -103.6, 226.7, 0.18)
pt3dadd(396.8, -104.6, 228.1, 0.18)
pt3dadd(397.2, -105.5, 229.4, 0.18)
pt3dadd(397.7, -106.4, 230.8, 0.18)
pt3dadd(398.6, -107, 232.1, 0.18)
pt3dadd(399.5, -107.4, 233.3, 0.18)
pt3dadd(400, -107.9, 234.3, 0.18)
pt3dadd(400.6, -108.3, 235.1, 0.18)
pt3dadd(401.2, -109.1, 236.1, 0.18)
pt3dadd(401.4, -110, 237.1, 0.18)
pt3dadd(401.7, -111.4, 238.5, 0.18)
pt3dadd(401.6, -112, 239.1, 0.18)
pt3dadd(402, -112.9, 240, 0.18)
pt3dadd(402.2, -114, 240.9, 0.18)
pt3dadd(402.3, -114.9, 241.5, 0.18)
pt3dadd(402.4, -116.6, 242.9, 0.18)
pt3dadd(402.8, -118.7, 244.3, 0.18)
pt3dadd(403.2, -119.4, 244.9, 0.18)
pt3dadd(404.4, -121.4, 246.2, 0.18)
pt3dadd(404.7, -122.2, 246.7, 0.18)
pt3dadd(404.6, -122.9, 247.1, 0.18)
pt3dadd(404.8, -124, 247.7, 0.18)
pt3dadd(405.3, -124.8, 248.2, 0.18)
pt3dadd(406.1, -125.5, 248.7, 0.18)
pt3dadd(406.9, -126.4, 249.2, 0.18)
pt3dadd(407.8, -127.2, 249.7, 0.18)
pt3dadd(409.5, -129.4, 250.7, 0.18)
pt3dadd(410, -130.8, 251.2, 0.18)
pt3dadd(410.3, -132.1, 251.5, 0.18)
pt3dadd(410.6, -133, 251.8, 0.18)
pt3dadd(411.4, -134.1, 252.1, 0.18)
pt3dadd(412.8, -135.5, 252.4, 0.18)
pt3dadd(413.7, -137.19, 252.7, 0.18)
pt3dadd(414, -138.3, 252.8, 0.18)
pt3dadd(414.2, -139.3, 252.9, 0.18)
pt3dadd(414.8, -140.3, 253, 0.18)
pt3dadd(415.5, -141.1, 253, 0.18)
pt3dadd(417.2, -142.9, 253, 0.18)
pt3dadd(418.4, -143.69, 252.9, 0.18)
pt3dadd(419.3, -144.69, 252.8, 0.18)
pt3dadd(419.5, -145.5, 252.7, 0.18)
pt3dadd(420.1, -146.4, 252.6, 0.18)
pt3dadd(420.2, -147.1, 252.5, 0.18)
pt3dadd(420.9, -147.19, 252.4, 0.18)
pt3dadd(421.4, -147.9, 252.3, 0.18)
pt3dadd(421.5, -148.6, 252.1, 0.18)
pt3dadd(421.8, -149.3, 252, 0.18)
}
apic[70] {pt3dclear()
pt3dadd(335.2, -80.9, 90, 1.1)
pt3dadd(335.2, -81.5, 90, 0.18)
pt3dadd(335.4, -82.2, 90, 0.18)
pt3dadd(335.5, -83.3, 90, 0.18)
pt3dadd(335.7, -84, 90, 0.18)
pt3dadd(336.3, -84.7, 90, 0.18)
pt3dadd(336.6, -85.3, 90, 0.18)
pt3dadd(337.2, -86.2, 90, 0.18)
pt3dadd(337.9, -87.2, 90, 0.18)
pt3dadd(338.5, -87.9, 90, 0.18)
pt3dadd(338.7, -88.8, 90, 0.18)
pt3dadd(339.3, -89.7, 90, 0.18)
pt3dadd(339.5, -90.4, 90, 0.18)
pt3dadd(340, -91.2, 90, 0.18)
pt3dadd(340.4, -91.6, 90, 0.18)
pt3dadd(340.9, -92.5, 90, 0.18)
pt3dadd(342, -92.9, 90, 0.18)
pt3dadd(343.2, -93.8, 90, 0.18)
pt3dadd(344, -94.2, 90, 0.18)
pt3dadd(344.7, -95, 90, 0.18)
pt3dadd(345.3, -95.4, 90, 0.18)
pt3dadd(345.9, -95.8, 90, 0.18)
pt3dadd(346.5, -96.6, 90, 0.18)
pt3dadd(347, -97.3, 90, 0.18)
pt3dadd(349, -99.3, 90, 0.18)
pt3dadd(350.5, -100.2, 90, 0.18)
pt3dadd(352.2, -100.8, 90, 0.18)
pt3dadd(353.8, -101.3, 90, 0.18)
pt3dadd(355, -101.7, 90, 0.18)
pt3dadd(356, -102.4, 90, 0.18)
pt3dadd(357, -103.3, 90, 0.18)
pt3dadd(357.6, -104.1, 90, 0.18)
pt3dadd(358, -105, 90, 0.18)
pt3dadd(358.4, -105.6, 90, 0.18)
pt3dadd(358.8, -106.2, 90, 0.18)
pt3dadd(359.5, -106.7, 90, 0.18)
pt3dadd(360.2, -107.4, 90, 0.18)
pt3dadd(360.8, -108.3, 90, 0.18)
pt3dadd(361.2, -109.2, 90, 0.18)
pt3dadd(361.4, -110.1, 90, 0.18)
pt3dadd(361.6, -110.9, 90, 0.18)
pt3dadd(362.2, -111.7, 90, 0.18)
pt3dadd(363.3, -113.4, 90, 0.18)
pt3dadd(363.9, -114.1, 90, 0.18)
pt3dadd(364.3, -114.8, 90, 0.18)
pt3dadd(365.9, -117, 90, 0.18)
pt3dadd(366, -118.1, 90, 0.18)
pt3dadd(366, -118.7, 90, 0.18)
pt3dadd(366.2, -119.3, 90, 0.18)
pt3dadd(366.4, -120, 90, 0.18)
pt3dadd(366.5, -120.8, 90, 0.18)
pt3dadd(366.4, -121.7, 90, 0.18)
pt3dadd(366.6, -122.6, 90, 0.18)
pt3dadd(367, -123.4, 90, 0.18)
pt3dadd(367.8, -125, 90, 0.18)
pt3dadd(368.2, -126.2, 90, 0.18)
pt3dadd(368.7, -127.1, 90, 0.18)
pt3dadd(368.8, -128, 90, 0.18)
pt3dadd(369, -129, 90, 0.18)
pt3dadd(369.7, -131.4, 90, 0.18)
pt3dadd(370.2, -132.19, 90, 0.18)
pt3dadd(370.8, -133, 90, 0.18)
pt3dadd(371.1, -133.69, 90, 0.18)
pt3dadd(372, -134.8, 90, 0.18)
pt3dadd(373.1, -136.19, 90, 0.18)
pt3dadd(373.5, -136.69, 90, 0.18)
}
apic[71] {pt3dclear()
pt3dadd(226.9, -20.9, 78, 0.5)
pt3dadd(227, -20.2, 78.2, 0.5)
pt3dadd(227.1, -19.2, 78.4, 0.5)
pt3dadd(227.6, -18.6, 78.7, 0.5)
pt3dadd(228.3, -17.89, 78.9, 0.5)
pt3dadd(229, -17.39, 79.09, 0.5)
pt3dadd(230.2, -17, 79.4, 0.5)
pt3dadd(231.5, -16.89, 79.7, 0.5)
pt3dadd(232.1, -16.6, 79.9, 0.5)
pt3dadd(232.9, -16.7, 80, 0.5)
pt3dadd(233.6, -15.8, 80.3, 0.5)
pt3dadd(234.2, -15.2, 80.5, 0.5)
pt3dadd(234.6, -14.7, 80.59, 0.5)
pt3dadd(235.4, -14.6, 80.8, 0.5)
pt3dadd(236, -14.4, 80.9, 0.5)
pt3dadd(238, -14, 81.3, 0.5)
pt3dadd(240.1, -13.6, 81.7, 0.5)
pt3dadd(241.2, -13.1, 81.9, 0.5)
pt3dadd(242.5, -12.6, 82.2, 0.5)
pt3dadd(243.6, -12.2, 82.3, 0.5)
pt3dadd(245.1, -11.7, 82.6, 0.5)
pt3dadd(245.7, -11.7, 82.7, 0.5)
pt3dadd(248.7, -12, 83.1, 0.5)
pt3dadd(250.5, -11.9, 83.3, 0.5)
pt3dadd(251.2, -12, 83.3, 0.5)
pt3dadd(251.8, -11.7, 83.4, 0.5)
pt3dadd(252.4, -11.4, 83.5, 0.5)
pt3dadd(253.2, -10.9, 83.6, 0.5)
pt3dadd(253.9, -10.7, 83.6, 0.5)
pt3dadd(254.6, -10.3, 83.7, 0.5)
pt3dadd(256.1, -9.6, 83.8, 0.5)
pt3dadd(256.7, -9.4, 83.8, 0.5)
pt3dadd(257.7, -9, 83.9, 0.5)
pt3dadd(258.6, -8.6, 83.9, 0.5)
pt3dadd(259.8, -7.8, 84, 0.5)
pt3dadd(261.39, -7.1, 84, 0.5)
pt3dadd(263.1, -6.7, 84, 0.5)
pt3dadd(263.7, -6.6, 84, 0.5)
pt3dadd(264.3, -6.3, 84, 0.5)
pt3dadd(265, -6.4, 84, 0.5)
pt3dadd(265.7, -6.1, 84, 0.5)
}
apic[72] {pt3dclear()
pt3dadd(211.2, -14.7, 72, 1.2)
pt3dadd(211.7, -14.3, 72.2, 0.5)
pt3dadd(211.8, -13.6, 72.09, 0.5)
pt3dadd(211.8, -12.9, 71.9, 0.5)
pt3dadd(211.9, -12, 71.59, 0.5)
pt3dadd(212, -11.4, 71.59, 0.5)
pt3dadd(212.1, -10.7, 72, 0.5)
}
apic[73] {pt3dclear()
pt3dadd(212.1, -10.7, 72, 0.5)
pt3dadd(212.6, -10.3, 72.7, 0.5)
pt3dadd(213.2, -9.9, 73.4, 0.5)
pt3dadd(213.6, -9.4, 74.09, 0.5)
pt3dadd(214, -7.9, 75.7, 0.5)
pt3dadd(213.8, -6.3, 77.5, 0.5)
pt3dadd(213.9, -5.4, 78.4, 0.5)
pt3dadd(213.7, -2.9, 81.2, 0.5)
}
}
proc shape3d_29() {
apic[73] { pt3dadd(212.7, -2.2, 82.4, 0.5)
pt3dadd(211.9, -1.7, 83.4, 0.5)
pt3dadd(211.4, -1.2, 84.3, 0.5)
pt3dadd(211.5, -0.6, 84.9, 0.5)
pt3dadd(211.1, 1.4, 87.3, 0.5)
pt3dadd(210.7, 1.9, 88, 0.5)
pt3dadd(210, 2.7, 89.2, 0.5)
pt3dadd(209.6, 3.2, 89.9, 0.5)
pt3dadd(209, 4.3, 91.3, 0.5)
pt3dadd(209, 5.2, 92.3, 0.5)
pt3dadd(208.8, 6, 93.2, 0.5)
pt3dadd(208.6, 6.7, 94.1, 0.5)
pt3dadd(208.6, 7.4, 94.9, 0.5)
pt3dadd(208.9, 9.19, 96.9, 0.5)
pt3dadd(209.5, 10, 98.1, 0.5)
pt3dadd(210.7, 10.6, 99.6, 0.5)
pt3dadd(213.6, 11.8, 103.3, 0.5)
pt3dadd(215.5, 12.5, 105.6, 0.5)
pt3dadd(215.8, 13.8, 107.2, 0.5)
pt3dadd(216.3, 16.5, 110.3, 0.5)
pt3dadd(216.9, 17.2, 111.5, 0.5)
pt3dadd(217.8, 17.8, 112.8, 0.5)
pt3dadd(219.1, 18.2, 114.4, 0.5)
pt3dadd(221.4, 18.7, 117.3, 0.5)
pt3dadd(222.3, 18.89, 118.3, 0.5)
pt3dadd(223.2, 19.1, 119.4, 0.5)
pt3dadd(224, 19.39, 120.5, 0.5)
pt3dadd(224.8, 19.8, 121.5, 0.5)
pt3dadd(226.7, 20.8, 124.1, 0.5)
pt3dadd(228.8, 21.7, 126.9, 0.5)
pt3dadd(229.7, 21.8, 128.1, 0.5)
pt3dadd(230.7, 22.2, 129.4, 0.5)
pt3dadd(231.6, 22.7, 130.6, 0.5)
pt3dadd(232.3, 23.3, 131.8, 0.5)
pt3dadd(232.7, 24, 132.69, 0.5)
pt3dadd(233.2, 24.4, 133.5, 0.5)
pt3dadd(234.3, 24.9, 135, 0.5)
pt3dadd(234.9, 24.9, 135.69, 0.5)
pt3dadd(235.5, 24.4, 136.69, 0.5)
pt3dadd(236.2, 24, 137.69, 0.5)
pt3dadd(236.9, 24, 138.5, 0.5)
pt3dadd(238, 24.4, 140, 0.5)
pt3dadd(238.3, 25, 140.9, 0.5)
pt3dadd(238.7, 26.2, 142.5, 0.5)
pt3dadd(239.3, 27, 143.69, 0.5)
pt3dadd(239.6, 27.7, 144.6, 0.5)
pt3dadd(240.3, 28.3, 145.69, 0.5)
pt3dadd(240.8, 28.6, 146.6, 0.5)
pt3dadd(241.4, 28.8, 147.4, 0.5)
pt3dadd(242.3, 28.7, 148.5, 0.5)
pt3dadd(243.4, 28.9, 149.8, 0.5)
pt3dadd(245.3, 29.5, 152.4, 0.5)
pt3dadd(246.1, 30, 153.6, 0.5)
pt3dadd(246.7, 30.5, 154.6, 0.5)
pt3dadd(247.3, 31.2, 155.8, 0.5)
pt3dadd(247.6, 31.9, 156.69, 0.5)
pt3dadd(247.7, 32.6, 157.6, 0.5)
pt3dadd(248.3, 33.2, 158.8, 0.5)
pt3dadd(249, 34.1, 160.1, 0.5)
pt3dadd(249.8, 34.9, 161.6, 0.5)
pt3dadd(250.7, 35.4, 162.9, 0.5)
pt3dadd(251.8, 35.5, 164.3, 0.5)
pt3dadd(252.8, 36.29, 165.9, 0.5)
pt3dadd(253.4, 36.6, 166.8, 0.5)
pt3dadd(254, 36.7, 167.6, 0.5)
pt3dadd(255.3, 36.6, 169.2, 0.5)
pt3dadd(256.7, 36.1, 171.2, 0.5)
pt3dadd(257.7, 36, 172.5, 0.5)
pt3dadd(258.6, 36.29, 173.6, 0.5)
pt3dadd(259.5, 36.79, 174.9, 0.5)
pt3dadd(261.2, 37.6, 177.5, 0.5)
pt3dadd(261.7, 38, 178.3, 0.5)
pt3dadd(262.89, 38.6, 180, 0.5)
pt3dadd(264.2, 38.6, 181.7, 0.5)
pt3dadd(265.2, 38, 183.2, 0.5)
pt3dadd(266.39, 37.9, 184.7, 0.5)
pt3dadd(270, 37.9, 189.4, 0.5)
pt3dadd(271, 38.4, 190.7, 0.5)
pt3dadd(272, 39, 192.2, 0.5)
pt3dadd(272.8, 39.4, 193.4, 0.5)
pt3dadd(273.5, 39.6, 194.4, 0.5)
pt3dadd(274.2, 39.6, 195.3, 0.5)
pt3dadd(277.5, 39.29, 199.5, 0.5)
pt3dadd(278.5, 39.5, 200.9, 0.5)
pt3dadd(280.6, 39.9, 203.7, 0.5)
pt3dadd(282.5, 40.4, 206.4, 0.5)
pt3dadd(283.2, 40.5, 207.3, 0.5)
pt3dadd(283.8, 40.7, 208.1, 0.5)
pt3dadd(285.1, 41.1, 210, 0.5)
}
apic[74] {pt3dclear()
pt3dadd(212.1, -10.7, 72, 0.5)
pt3dadd(211.4, -10.6, 73, 0.5)
pt3dadd(210.5, -11.2, 76.2, 0.5)
pt3dadd(209.8, -11.4, 79.2, 0.5)
pt3dadd(208.9, -11.4, 83.5, 0.5)
pt3dadd(208.2, -11.7, 87.5, 0.5)
pt3dadd(206.9, -11.5, 95.3, 0.5)
pt3dadd(204.2, -11.6, 110.3, 0.5)
pt3dadd(203.9, -12.2, 113.6, 0.5)
pt3dadd(203.4, -12.6, 116.1, 0.5)
pt3dadd(203.1, -13.4, 118.7, 0.5)
pt3dadd(203.3, -14.1, 120, 0.5)
pt3dadd(203.8, -14.8, 121.2, 0.5)
pt3dadd(205.5, -16.39, 124.1, 0.5)
pt3dadd(206.4, -16.5, 125.3, 0.5)
pt3dadd(207.2, -16.89, 126.4, 0.5)
pt3dadd(208, -16.89, 127.4, 0.5)
pt3dadd(211, -17.2, 131.1, 0.5)
pt3dadd(211.8, -17.7, 132.19, 0.5)
pt3dadd(212.4, -18.8, 133.8, 0.5)
pt3dadd(213.9, -20.3, 136.3, 0.5)
pt3dadd(214.7, -20.8, 137.4, 0.5)
pt3dadd(215.8, -20.9, 138.8, 0.5)
pt3dadd(218.9, -21.1, 142.4, 0.5)
pt3dadd(219.4, -21.5, 143.1, 0.5)
pt3dadd(219.8, -22.6, 144.4, 0.5)
pt3dadd(220.4, -23.4, 145.6, 0.5)
pt3dadd(221.5, -24.4, 147.19, 0.5)
pt3dadd(222.7, -24.5, 148.6, 0.5)
pt3dadd(223.8, -24.9, 149.8, 0.5)
pt3dadd(224.6, -25.4, 150.9, 0.5)
pt3dadd(225.1, -26.3, 152, 0.5)
pt3dadd(225.5, -26.9, 152.8, 0.5)
pt3dadd(226.3, -27.3, 153.8, 0.5)
pt3dadd(227.1, -27.8, 154.8, 0.5)
pt3dadd(227.8, -28.2, 155.6, 0.5)
pt3dadd(229.4, -29, 157.5, 0.5)
pt3dadd(230.2, -29.1, 158.3, 0.5)
pt3dadd(230.8, -29.6, 159.1, 0.5)
pt3dadd(231, -30.4, 159.9, 0.5)
pt3dadd(231.1, -31.4, 160.9, 0.5)
pt3dadd(231.4, -33.6, 163.1, 0.5)
pt3dadd(232, -34, 163.8, 0.5)
pt3dadd(232.8, -34, 164.6, 0.5)
pt3dadd(233.7, -34.5, 165.5, 0.5)
pt3dadd(233.8, -35.29, 166.3, 0.5)
pt3dadd(233.9, -36.9, 167.8, 0.5)
pt3dadd(234.6, -37.29, 168.5, 0.5)
pt3dadd(235.6, -37.79, 169.5, 0.5)
pt3dadd(236.8, -38.6, 170.8, 0.5)
pt3dadd(238.3, -39.1, 172.2, 0.5)
pt3dadd(239.4, -39.2, 173.2, 0.5)
pt3dadd(240.8, -39, 174.4, 0.5)
pt3dadd(241.4, -39, 174.9, 0.5)
pt3dadd(242.1, -38.79, 175.5, 0.5)
pt3dadd(242.8, -38.9, 176, 0.5)
pt3dadd(244.3, -39.29, 177.3, 0.5)
pt3dadd(245.4, -39.4, 178.1, 0.5)
pt3dadd(246, -39.79, 178.7, 0.5)
pt3dadd(247.6, -40.4, 180, 0.5)
pt3dadd(246, -39, 181.5, 0.5)
pt3dadd(247.1, -39.79, 182.5, 0.5)
pt3dadd(247.7, -40.7, 183.3, 0.5)
pt3dadd(248.8, -41.3, 184.4, 0.5)
pt3dadd(250.4, -42.1, 185.7, 0.5)
pt3dadd(251.4, -42.5, 186.5, 0.5)
pt3dadd(252.3, -42.9, 187.3, 0.5)
pt3dadd(253.1, -43.7, 188.2, 0.5)
pt3dadd(255.4, -45.6, 190.5, 0.5)
pt3dadd(256.6, -46.9, 191.9, 0.5)
pt3dadd(257.5, -48, 192.9, 0.5)
pt3dadd(258.7, -48.3, 193.9, 0.5)
pt3dadd(259.8, -48.5, 194.8, 0.5)
pt3dadd(261, -49, 195.7, 0.5)
pt3dadd(261.89, -49.6, 196.5, 0.5)
pt3dadd(262.6, -50.8, 197.5, 0.5)
pt3dadd(264.1, -53.5, 199.8, 0.5)
pt3dadd(264.89, -53.9, 200.5, 0.5)
pt3dadd(265.7, -54.3, 201.1, 0.5)
pt3dadd(266.7, -54.8, 201.9, 0.5)
pt3dadd(268.8, -55.7, 203.5, 0.5)
pt3dadd(270, -56.5, 204.5, 0.5)
pt3dadd(271.3, -57.5, 205.6, 0.5)
pt3dadd(272.39, -58.3, 206.4, 0.5)
pt3dadd(273.3, -59, 207.1, 0.5)
pt3dadd(274, -60, 207.8, 0.5)
pt3dadd(275.3, -61.4, 209, 0.5)
pt3dadd(276.3, -62.1, 209.7, 0.5)
pt3dadd(276.3, -62.7, 210, 0.5)
}
apic[75] {pt3dclear()
pt3dadd(185.6, -13, 54, 2)
pt3dadd(185, -13.2, 53.8, 0.5)
pt3dadd(185.6, -13.6, 53.5, 0.5)
pt3dadd(186.1, -14.3, 53.2, 0.5)
pt3dadd(186.6, -15.6, 52.7, 0.5)
pt3dadd(187.8, -16.8, 52, 0.5)
pt3dadd(188.6, -17.39, 51.7, 0.5)
pt3dadd(189.3, -17.8, 51.4, 0.5)
pt3dadd(190.2, -18.6, 50.9, 0.5)
pt3dadd(191, -19.39, 50.5, 0.5)
pt3dadd(191.5, -19.7, 50.3, 0.5)
pt3dadd(192.2, -20.1, 50, 0.5)
pt3dadd(193.1, -20.2, 49.6, 0.5)
pt3dadd(194.3, -20.6, 49.2, 0.5)
pt3dadd(195.4, -20.7, 48.8, 0.5)
pt3dadd(198.1, -20.7, 47.8, 0.5)
pt3dadd(198.7, -20.8, 47.5, 0.5)
pt3dadd(201, -21.4, 46.6, 0.5)
pt3dadd(201.6, -21.7, 46.4, 0.5)
pt3dadd(203.3, -22.2, 45.7, 0.5)
pt3dadd(205.1, -22, 45, 0.5)
pt3dadd(206.6, -22.2, 44.4, 0.5)
}
}
proc shape3d_30() {
apic[75] { pt3dadd(207.7, -22, 44, 0.5)
pt3dadd(208.5, -21.7, 43.7, 0.5)
pt3dadd(209.4, -21.4, 43.3, 0.5)
pt3dadd(210, -21.2, 43, 0.5)
pt3dadd(212.5, -20.8, 42, 0.5)
pt3dadd(213, -21.1, 41.8, 0.5)
pt3dadd(213.9, -21.4, 41.4, 0.5)
pt3dadd(215, -21.5, 41, 0.5)
pt3dadd(218.1, -22.1, 39.7, 0.5)
pt3dadd(218.7, -22.1, 39.4, 0.5)
pt3dadd(221.5, -22.7, 38.2, 0.5)
pt3dadd(222.4, -22.7, 37.79, 0.5)
pt3dadd(224.3, -23.2, 37, 0.5)
pt3dadd(225.1, -23.3, 36.6, 0.5)
pt3dadd(226.9, -23.1, 35.79, 0.5)
pt3dadd(228, -22.6, 35.29, 0.5)
pt3dadd(228.5, -22.1, 34.9, 0.5)
pt3dadd(229.3, -21.5, 34.5, 0.5)
pt3dadd(230.4, -20.7, 33.9, 0.5)
pt3dadd(232.1, -20, 33, 0.5)
pt3dadd(234.2, -20.6, 31.9, 0.5)
pt3dadd(234.5, -21.1, 31.7, 0.5)
pt3dadd(235.4, -22.2, 30.9, 0.5)
pt3dadd(235.9, -22.6, 30.6, 0.5)
pt3dadd(236.5, -22.7, 30.3, 0.5)
pt3dadd(237.1, -23, 30, 0.5)
pt3dadd(237.9, -23.1, 29.5, 0.5)
pt3dadd(239.1, -23.5, 28.9, 0.5)
pt3dadd(239.6, -23.8, 28.6, 0.5)
pt3dadd(240.4, -24.5, 28, 0.5)
pt3dadd(241.1, -24.5, 27.7, 0.5)
pt3dadd(243.8, -25.1, 26.2, 0.5)
pt3dadd(244.9, -25.9, 25.4, 0.5)
pt3dadd(245.9, -26.4, 24.8, 0.5)
pt3dadd(246.7, -26.7, 24.3, 0.5)
pt3dadd(247.9, -27.2, 23.5, 0.5)
pt3dadd(248.7, -27.6, 23, 0.5)
pt3dadd(249.6, -27.6, 22.5, 0.5)
pt3dadd(250.5, -28.1, 21.9, 0.5)
pt3dadd(251.5, -28.2, 21.3, 0.5)
pt3dadd(254.8, -28.5, 19.3, 0.5)
pt3dadd(255.4, -28.3, 18.89, 0.5)
pt3dadd(256.6, -28.4, 18.1, 0.5)
pt3dadd(257.3, -28.8, 17.6, 0.5)
pt3dadd(257.7, -29.1, 17.2, 0.5)
pt3dadd(258.39, -29.5, 16.7, 0.5)
pt3dadd(259, -29.9, 16.2, 0.5)
pt3dadd(259.6, -30.5, 15.7, 0.5)
pt3dadd(260.1, -30.8, 15.3, 0.5)
pt3dadd(260.5, -31.6, 14.7, 0.5)
pt3dadd(261.5, -33.5, 13.2, 0.5)
pt3dadd(261.7, -34.6, 12.4, 0.5)
pt3dadd(261.7, -35.2, 12, 0.5)
}
apic[76] {pt3dclear()
pt3dadd(173.1, -12.3, 54, 2)
pt3dadd(173.2, -11.6, 54.5, 0.5)
pt3dadd(173.5, -11, 54.9, 0.5)
pt3dadd(173.8, -10.5, 55.3, 0.5)
pt3dadd(173.9, -9.8, 55.8, 0.5)
pt3dadd(174.2, -6.4, 57.7, 0.5)
pt3dadd(174.1, -3.5, 59, 0.5)
pt3dadd(174.4, -2.8, 59.3, 0.5)
pt3dadd(174.8, -2.1, 59.6, 0.5)
pt3dadd(175.2, -1.4, 59.8, 0.5)
pt3dadd(176.8, 0.8, 60.6, 0.5)
pt3dadd(177.1, 1.7, 60.8, 0.5)
pt3dadd(177.5, 2.4, 60.9, 0.5)
pt3dadd(178.1, 2.9, 61.1, 0.5)
pt3dadd(178.4, 3.5, 61.2, 0.5)
pt3dadd(178.7, 4.5, 61.3, 0.5)
pt3dadd(178.8, 5.3, 61.3, 0.5)
pt3dadd(179.1, 5.9, 61.4, 0.5)
pt3dadd(179.2, 6.6, 61.4, 0.5)
pt3dadd(179.5, 7.5, 61.4, 0.5)
pt3dadd(179.5, 8.19, 61.4, 0.5)
pt3dadd(179.3, 9.6, 61.3, 0.5)
pt3dadd(179.3, 10.7, 61.2, 0.5)
pt3dadd(179.2, 12.6, 60.9, 0.5)
pt3dadd(179.3, 13.2, 60.8, 0.5)
pt3dadd(179.3, 13.9, 60.7, 0.5)
pt3dadd(179.6, 14.6, 60.5, 0.5)
pt3dadd(179.6, 15.4, 60.3, 0.5)
pt3dadd(179.5, 16.89, 59.8, 0.5)
pt3dadd(179.5, 17.6, 59.6, 0.5)
pt3dadd(180, 19.2, 59, 0.5)
pt3dadd(180.7, 19.8, 58.6, 0.5)
pt3dadd(181.8, 20.8, 58, 0.5)
pt3dadd(183.3, 22.3, 56.9, 0.5)
pt3dadd(183.3, 23.2, 56.5, 0.5)
pt3dadd(183.6, 23.8, 56.1, 0.5)
pt3dadd(184.1, 24.4, 55.7, 0.5)
pt3dadd(184.8, 24.8, 55.2, 0.5)
pt3dadd(185.5, 25.3, 54.7, 0.5)
pt3dadd(185.9, 25.8, 54.3, 0.5)
pt3dadd(186.6, 26.4, 53.6, 0.5)
pt3dadd(187, 27.1, 53, 0.5)
pt3dadd(187.4, 28, 52.4, 0.5)
pt3dadd(188.1, 29.8, 50.9, 0.5)
pt3dadd(188.7, 30.9, 49.9, 0.5)
pt3dadd(189.4, 31.8, 48.9, 0.5)
pt3dadd(190.2, 32.7, 47.8, 0.5)
pt3dadd(191.1, 34.1, 46.3, 0.5)
pt3dadd(190.9, 35.4, 45.1, 0.5)
pt3dadd(191, 36.29, 44.1, 0.5)
pt3dadd(191.3, 40.29, 39.9, 0.5)
pt3dadd(191.7, 41.2, 38.79, 0.5)
pt3dadd(192.1, 42.7, 36.9, 0.5)
pt3dadd(192.4, 43.9, 35.4, 0.5)
pt3dadd(192.3, 45.5, 33.5, 0.5)
pt3dadd(192.4, 46.9, 31.7, 0.5)
pt3dadd(192.1, 48.4, 29.7, 0.5)
pt3dadd(192.2, 49.4, 28.3, 0.5)
pt3dadd(192.5, 50.3, 27.1, 0.5)
pt3dadd(192.9, 51.1, 25.9, 0.5)
pt3dadd(193.2, 52, 24.5, 0.5)
pt3dadd(193.3, 52.8, 23.3, 0.5)
pt3dadd(193.9, 56.1, 18.39, 0.5)
pt3dadd(194.4, 56.9, 16.89, 0.5)
pt3dadd(194.9, 57.9, 15.2, 0.5)
pt3dadd(195.5, 58.8, 13.4, 0.5)
pt3dadd(196.1, 59.5, 12, 0.5)
pt3dadd(197.2, 60.5, 9.5, 0.5)
pt3dadd(197.7, 60.9, 8.4, 0.5)
pt3dadd(198.7, 62.1, 5.8, 0.5)
pt3dadd(199.6, 62.6, 3.9, 0.5)
pt3dadd(200.3, 63.2, 2.4, 0.5)
pt3dadd(201.2, 63.8, 0.4, 0.5)
pt3dadd(202, 64.59, -1.7, 0.5)
pt3dadd(202.8, 64.5, -3, 0.5)
pt3dadd(203.5, 64.7, -4.3, 0.5)
pt3dadd(204.3, 64.59, -5.8, 0.5)
pt3dadd(206.8, 64.09, -10.7, 0.5)
pt3dadd(207.8, 63.7, -12.7, 0.5)
pt3dadd(208.5, 63.3, -14.3, 0.5)
pt3dadd(208.9, 62.6, -16, 0.5)
pt3dadd(209.5, 61.8, -18, 0.5)
}
apic[77] {pt3dclear()
pt3dadd(169.8, -11.6, 48, 2)
pt3dadd(170.4, -12.1, 48, 0.5)
pt3dadd(171.6, -13, 47.9, 0.5)
pt3dadd(170.8, -13.1, 47.8, 0.5)
pt3dadd(171.6, -13, 47.8, 0.5)
pt3dadd(172.7, -12.8, 47.6, 0.5)
pt3dadd(173.2, -12.8, 47.5, 0.5)
pt3dadd(175.5, -12.7, 47.1, 0.5)
pt3dadd(176, -12.4, 46.9, 0.5)
pt3dadd(176.8, -12.1, 46.7, 0.5)
pt3dadd(177.5, -11.5, 46.5, 0.5)
pt3dadd(177.8, -10.8, 46.3, 0.5)
pt3dadd(178.5, -10.5, 46, 0.5)
pt3dadd(180.9, -9.6, 45.2, 0.5)
pt3dadd(181.8, -9.69, 44.9, 0.5)
pt3dadd(183.1, -10.1, 44.3, 0.5)
pt3dadd(184.3, -10.19, 43.8, 0.5)
pt3dadd(186.9, -10.1, 42.7, 0.5)
pt3dadd(187.8, -9.9, 42.3, 0.5)
pt3dadd(189.5, -9.5, 41.5, 0.5)
pt3dadd(190.5, -9.3, 41, 0.5)
pt3dadd(191.7, -9.4, 40.4, 0.5)
pt3dadd(195.1, -9.69, 38.6, 0.5)
pt3dadd(198.3, -10, 37, 0.5)
pt3dadd(199.4, -10.4, 36.4, 0.5)
pt3dadd(200, -10.5, 36, 0.5)
pt3dadd(203.1, -10.7, 34.4, 0.5)
pt3dadd(204.4, -11.3, 33.7, 0.5)
pt3dadd(206.5, -12.2, 32.6, 0.5)
pt3dadd(207.1, -12.3, 32.29, 0.5)
pt3dadd(209, -12.2, 31.4, 0.5)
pt3dadd(209.6, -12, 31.1, 0.5)
pt3dadd(210.3, -11.8, 30.7, 0.5)
pt3dadd(211.1, -11.7, 30.3, 0.5)
pt3dadd(211.8, -11.4, 30, 0.5)
}
apic[78] {pt3dclear()
pt3dadd(211.8, -11.4, 30, 0.5)
pt3dadd(212.6, -12.1, 29.8, 0.5)
pt3dadd(213.5, -12.2, 29.6, 0.5)
pt3dadd(216.8, -12.8, 28.8, 0.5)
pt3dadd(217.8, -13.2, 28.6, 0.5)
pt3dadd(218.7, -13.2, 28.4, 0.5)
pt3dadd(219.7, -13.6, 28.3, 0.5)
pt3dadd(220.5, -14, 28.1, 0.5)
pt3dadd(221.3, -14.1, 27.9, 0.5)
pt3dadd(223, -14, 27.6, 0.5)
pt3dadd(224.1, -13.8, 27.4, 0.5)
pt3dadd(225.5, -13.5, 27.1, 0.5)
pt3dadd(228, -13.1, 26.7, 0.5)
pt3dadd(229, -13.2, 26.6, 0.5)
pt3dadd(229.8, -13.7, 26.4, 0.5)
pt3dadd(230.7, -14.1, 26.3, 0.5)
pt3dadd(231.7, -14.2, 26.1, 0.5)
pt3dadd(235.1, -14.5, 25.6, 0.5)
pt3dadd(236.9, -15, 25.4, 0.5)
pt3dadd(237.9, -15.4, 25.3, 0.5)
pt3dadd(238.8, -15.5, 25.2, 0.5)
pt3dadd(239.6, -15.9, 25.1, 0.5)
pt3dadd(241.2, -16.39, 24.9, 0.5)
pt3dadd(245, -17, 24.5, 0.5)
pt3dadd(245.9, -17.1, 24.5, 0.5)
pt3dadd(246.6, -17.39, 24.4, 0.5)
pt3dadd(247.1, -17.5, 24.4, 0.5)
pt3dadd(250.2, -17.8, 24.2, 0.5)
pt3dadd(254.2, -18.1, 24, 0.5)
pt3dadd(255, -18, 24, 0.5)
}
}
proc shape3d_31() {
apic[78] { pt3dadd(255.7, -18, 23.9, 0.5)
pt3dadd(256.39, -17.7, 23.9, 0.5)
pt3dadd(257.8, -17.6, 23.9, 0.5)
pt3dadd(260.6, -18.1, 23.9, 0.5)
pt3dadd(261.3, -18.2, 23.9, 0.5)
pt3dadd(264.5, -18.5, 23.9, 0.5)
pt3dadd(265.7, -18.6, 24, 0.5)
pt3dadd(266.7, -18.6, 24, 0.5)
}
apic[79] {pt3dclear()
pt3dadd(211.8, -11.4, 30, 0.5)
pt3dadd(212.2, -10.7, 29.4, 0.5)
pt3dadd(213.1, -10.1, 28.7, 0.5)
pt3dadd(214.1, -10.19, 28, 0.5)
pt3dadd(216.2, -10.19, 26.4, 0.5)
pt3dadd(217, -10.3, 25.7, 0.5)
pt3dadd(218.3, -10, 24.6, 0.5)
pt3dadd(220, -9.19, 22.9, 0.5)
pt3dadd(221.3, -8.8, 21.6, 0.5)
pt3dadd(222, -8.4, 20.8, 0.5)
pt3dadd(223, -8.19, 19.8, 0.5)
pt3dadd(223.7, -8, 19.1, 0.5)
pt3dadd(225.1, -7.7, 17.6, 0.5)
pt3dadd(225.6, -7.7, 16.89, 0.5)
pt3dadd(226.5, -7.6, 16, 0.5)
pt3dadd(229.6, -6.9, 12.3, 0.5)
pt3dadd(230.4, -6.4, 11.2, 0.5)
pt3dadd(230.9, -5.9, 10.4, 0.5)
pt3dadd(231.4, -5.4, 9.5, 0.5)
pt3dadd(232.1, -4.8, 8.3, 0.5)
pt3dadd(232.9, -4.4, 7.2, 0.5)
pt3dadd(233.7, -3.8, 6, 0.5)
pt3dadd(234.4, -3.1, 4.7, 0.5)
pt3dadd(234.7, -2.29, 3.6, 0.5)
pt3dadd(235.2, -1.5, 2.29, 0.5)
pt3dadd(235.8, -0.4, 0.6, 0.5)
pt3dadd(235.9, 0.2, -0.2, 0.5)
pt3dadd(236.4, 2.5, -3.5, 0.5)
pt3dadd(237.6, 4.3, -6.6, 0.5)
pt3dadd(237.6, 5.09, -7.8, 0.5)
pt3dadd(237.1, 6.2, -9.6, 0.5)
pt3dadd(236.6, 6.8, -10.7, 0.5)
pt3dadd(236.3, 7.5, -12, 0.5)
}
apic[80] {pt3dclear()
pt3dadd(166.3, -11.3, 48, 2)
pt3dadd(166.5, -10.7, 47.7, 0.5)
pt3dadd(166.6, -9.8, 47.1, 0.5)
pt3dadd(166.9, -6.4, 45, 0.5)
pt3dadd(167.3, -5.6, 44.3, 0.5)
pt3dadd(168, -4.8, 43.5, 0.5)
pt3dadd(168.1, -3.9, 42.9, 0.5)
pt3dadd(167.8, -2, 41.3, 0.5)
pt3dadd(167.3, -1.1, 40.4, 0.5)
pt3dadd(167.1, 0.8, 38.79, 0.5)
pt3dadd(167.9, 3.2, 36.4, 0.5)
pt3dadd(168.5, 4, 35.4, 0.5)
pt3dadd(169.1, 4.9, 34.4, 0.5)
pt3dadd(169.8, 5.7, 33.29, 0.5)
pt3dadd(169.9, 6.6, 32.29, 0.5)
pt3dadd(170.2, 7.3, 31.5, 0.5)
pt3dadd(170.2, 8, 30.8, 0.5)
pt3dadd(170.5, 11.4, 26.9, 0.5)
pt3dadd(171.2, 12.3, 25.7, 0.5)
pt3dadd(171.9, 12.9, 24.6, 0.5)
pt3dadd(172, 13.8, 23.6, 0.5)
pt3dadd(171.7, 14.7, 22.4, 0.5)
pt3dadd(171.8, 15.3, 21.7, 0.5)
pt3dadd(172.1, 16.1, 20.7, 0.5)
pt3dadd(172.1, 17, 19.5, 0.5)
pt3dadd(171.7, 19.1, 16.8, 0.5)
pt3dadd(170.9, 20.3, 15, 0.5)
pt3dadd(170, 22.2, 12.2, 0.5)
pt3dadd(169.3, 24.9, 8.6, 0.5)
pt3dadd(168.5, 25.7, 7.1, 0.5)
pt3dadd(167.6, 26.6, 5.5, 0.5)
pt3dadd(166.8, 27.6, 3.6, 0.5)
pt3dadd(166.6, 28.7, 2.2, 0.5)
pt3dadd(166.4, 30.9, -0.8, 0.5)
pt3dadd(166.8, 31.7, -2, 0.5)
pt3dadd(166.8, 32.6, -3.2, 0.5)
pt3dadd(166.3, 33.4, -4.59, 0.5)
pt3dadd(165.6, 34.1, -5.9, 0.5)
pt3dadd(165, 34.9, -7.2, 0.5)
pt3dadd(164.4, 35.6, -8.6, 0.5)
pt3dadd(163.19, 36.9, -10.9, 0.5)
pt3dadd(162.8, 37.29, -11.8, 0.5)
pt3dadd(162.1, 37.6, -12.8, 0.5)
pt3dadd(161.3, 38, -14, 0.5)
pt3dadd(160.6, 38.7, -15.4, 0.5)
pt3dadd(159.9, 39.29, -16.6, 0.5)
pt3dadd(159.69, 39.9, -17.39, 0.5)
pt3dadd(159.19, 40.6, -18.6, 0.5)
pt3dadd(158.9, 41.6, -20, 0.5)
pt3dadd(159, 42.6, -21.4, 0.5)
pt3dadd(159.4, 44.5, -24, 0.5)
pt3dadd(159.5, 45.6, -25.4, 0.5)
pt3dadd(159.5, 49, -29.9, 0.5)
pt3dadd(159, 49.9, -31.3, 0.5)
pt3dadd(158.3, 50.8, -32.6, 0.5)
pt3dadd(157.8, 52.4, -34.7, 0.5)
pt3dadd(158.3, 54.5, -37.29, 0.5)
pt3dadd(158.3, 55.4, -38.4, 0.5)
pt3dadd(159.3, 58.9, -42.6, 0.5)
pt3dadd(160.5, 60.7, -45.1, 0.5)
pt3dadd(160.8, 61.2, -45.8, 0.5)
pt3dadd(160.6, 62, -46.6, 0.5)
pt3dadd(160, 63.6, -48.5, 0.5)
pt3dadd(160, 64.3, -49.2, 0.5)
pt3dadd(159.69, 65.09, -50, 0.5)
pt3dadd(159.8, 66, -50.9, 0.5)
pt3dadd(160.5, 66.8, -52, 0.5)
pt3dadd(161, 67.5, -52.8, 0.5)
pt3dadd(161, 68.09, -53.3, 0.5)
pt3dadd(160.9, 70.4, -55.4, 0.5)
pt3dadd(160.6, 71.2, -56.1, 0.5)
pt3dadd(159.8, 72.7, -57.5, 0.5)
pt3dadd(159.5, 73.5, -58.2, 0.5)
pt3dadd(159.3, 74.3, -58.8, 0.5)
pt3dadd(159.3, 74.9, -59.2, 0.5)
pt3dadd(159.3, 75.9, -60, 0.5)
pt3dadd(159.4, 77, -60.7, 0.5)
pt3dadd(159.8, 78.3, -61.7, 0.5)
pt3dadd(160, 80.09, -62.9, 0.5)
pt3dadd(160.19, 83.1, -64.8, 0.5)
pt3dadd(160.9, 84.3, -65.59, 0.5)
pt3dadd(161.69, 85.2, -66.3, 0.5)
pt3dadd(162.1, 85.8, -66.7, 0.5)
pt3dadd(162.4, 86.9, -67.2, 0.5)
pt3dadd(162.19, 87.6, -67.59, 0.5)
pt3dadd(162.3, 88.4, -68, 0.5)
pt3dadd(162.6, 89.4, -68.5, 0.5)
pt3dadd(163.4, 90.4, -69.09, 0.5)
pt3dadd(163.8, 91.7, -69.59, 0.5)
pt3dadd(164.3, 92.9, -70.09, 0.5)
pt3dadd(165.7, 96.2, -71.2, 0.5)
pt3dadd(167.4, 98.7, -71.9, 0.5)
pt3dadd(168, 99.3, -72, 0.5)
}
apic[81] {pt3dclear()
pt3dadd(155.5, -12.3, 48, 2)
pt3dadd(155.4, -11.8, 48.2, 0.5)
pt3dadd(154.3, -11.2, 48.5, 0.5)
pt3dadd(153.5, -10.5, 48.6, 0.5)
pt3dadd(152.69, -9.9, 48.7, 0.5)
pt3dadd(151.8, -9.8, 48.6, 0.5)
pt3dadd(150.9, -9.5, 48.6, 0.5)
pt3dadd(149, -8.8, 48.3, 0.5)
pt3dadd(148.1, -8.5, 48.1, 0.5)
pt3dadd(147.5, -8.19, 48, 0.5)
pt3dadd(146.9, -7.8, 47.8, 0.5)
pt3dadd(146.1, -7.5, 47.7, 0.5)
pt3dadd(145.4, -7.4, 47.6, 0.5)
pt3dadd(142, -7.1, 47.4, 0.5)
pt3dadd(141.69, -6.6, 47.4, 0.5)
pt3dadd(141, -6.5, 47.6, 0.5)
pt3dadd(140.4, -6.5, 47.7, 0.5)
pt3dadd(139.4, -6.7, 48, 0.5)
}
apic[82] {pt3dclear()
pt3dadd(139.4, -6.7, 48, 0.5)
pt3dadd(138.9, -7.2, 48.1, 0.5)
pt3dadd(138.6, -7.8, 48.1, 0.5)
pt3dadd(137.9, -8.19, 48.2, 0.5)
pt3dadd(136.9, -9, 48.3, 0.5)
pt3dadd(135.69, -9.19, 48.4, 0.5)
pt3dadd(135, -9.5, 48.4, 0.5)
pt3dadd(134.1, -9.4, 48.5, 0.5)
pt3dadd(133, -9.6, 48.6, 0.5)
pt3dadd(132.1, -9.5, 48.7, 0.5)
pt3dadd(131.4, -9.8, 48.8, 0.5)
pt3dadd(130.1, -10.8, 49, 0.5)
pt3dadd(129.4, -11.4, 49.1, 0.5)
pt3dadd(128.19, -12.7, 49.3, 0.5)
pt3dadd(127.2, -13.6, 49.5, 0.5)
pt3dadd(126.3, -14.2, 49.7, 0.5)
pt3dadd(125.7, -14.6, 49.8, 0.5)
pt3dadd(124.9, -14.9, 49.9, 0.5)
pt3dadd(121.9, -15.6, 50.4, 0.5)
pt3dadd(120.6, -16.2, 50.6, 0.5)
pt3dadd(118.6, -17.1, 51, 0.5)
pt3dadd(117.9, -17.3, 51.2, 0.5)
pt3dadd(117, -17.2, 51.4, 0.5)
pt3dadd(116.3, -17.5, 51.5, 0.5)
pt3dadd(115.8, -17.89, 51.6, 0.5)
pt3dadd(115.4, -18.39, 51.8, 0.5)
pt3dadd(114.7, -19.1, 52, 0.5)
pt3dadd(114.3, -20.3, 52.3, 0.5)
pt3dadd(113.8, -20.9, 52.4, 0.5)
pt3dadd(113.1, -21.1, 52.6, 0.5)
pt3dadd(111.4, -21.3, 53, 0.5)
pt3dadd(110.4, -21.5, 53.3, 0.5)
pt3dadd(109.5, -21.8, 53.5, 0.5)
pt3dadd(109.1, -23, 53.9, 0.5)
pt3dadd(108.1, -23.9, 54.2, 0.5)
pt3dadd(107.1, -24.4, 54.5, 0.5)
pt3dadd(105.9, -24.6, 54.9, 0.5)
pt3dadd(104.8, -24.5, 55.2, 0.5)
pt3dadd(103.3, -24.6, 55.6, 0.5)
pt3dadd(102.6, -25.3, 56, 0.5)
pt3dadd(101.3, -26.2, 56.5, 0.5)
pt3dadd(99.8, -26.3, 57, 0.5)
pt3dadd(98.1, -26.5, 57.6, 0.5)
pt3dadd(97.2, -26.7, 57.9, 0.5)
pt3dadd(95.5, -27, 58.5, 0.5)
pt3dadd(94.8, -27.3, 58.8, 0.5)
pt3dadd(94.1, -27.2, 59.1, 0.5)
pt3dadd(91.8, -27.5, 60, 0.5)
}
}
proc shape3d_32() {
apic[82] { pt3dadd(91.2, -27.6, 60.3, 0.5)
pt3dadd(90.1, -28.2, 60.9, 0.5)
pt3dadd(89.4, -28.5, 61.4, 0.5)
pt3dadd(88.5, -28.4, 62, 0.5)
pt3dadd(85.6, -28.8, 64.8, 0.5)
pt3dadd(85.2, -29.2, 65.4, 0.5)
pt3dadd(84.4, -29.6, 66.4, 0.5)
pt3dadd(83.6, -30.1, 67.5, 0.5)
pt3dadd(83.5, -30.7, 68.3, 0.5)
pt3dadd(83.1, -31.5, 69.4, 0.5)
pt3dadd(82.7, -32, 70.3, 0.5)
pt3dadd(82.2, -32.5, 71.3, 0.5)
pt3dadd(81.59, -32.79, 72.3, 0.5)
pt3dadd(81, -32.7, 73.3, 0.5)
pt3dadd(79.5, -32.29, 75.59, 0.5)
pt3dadd(78.59, -32, 77.2, 0.5)
pt3dadd(77.7, -32.9, 79.4, 0.5)
pt3dadd(76.8, -34.4, 82.6, 0.5)
pt3dadd(76.4, -35, 84, 0.5)
pt3dadd(75.7, -35.29, 85.4, 0.5)
pt3dadd(75.09, -35.6, 86.7, 0.5)
pt3dadd(74.4, -35.5, 87.9, 0.5)
pt3dadd(74, -36.7, 90.3, 0.5)
pt3dadd(73.4, -37.6, 92.7, 0.5)
pt3dadd(72.8, -38.6, 95, 0.5)
pt3dadd(72.7, -39.7, 97.2, 0.5)
pt3dadd(73.3, -40.5, 99.4, 0.5)
pt3dadd(73.5, -41.1, 100.8, 0.5)
pt3dadd(73.8, -41.6, 102, 0.5)
}
apic[83] {pt3dclear()
pt3dadd(139.4, -6.7, 48, 0.5)
pt3dadd(138.9, -6.2, 48.6, 0.5)
pt3dadd(138.1, -5.9, 49.7, 0.5)
pt3dadd(137.3, -5.8, 50.9, 0.5)
pt3dadd(135.9, -6.1, 53, 0.5)
pt3dadd(134.8, -6.3, 54, 0.5)
}
apic[84] {pt3dclear()
pt3dadd(134.8, -6.3, 54, 0.5)
pt3dadd(134.1, -6.1, 54.3, 0.5)
pt3dadd(133.19, -5.7, 54.6, 0.5)
pt3dadd(132.6, -5.4, 54.8, 0.5)
pt3dadd(131.8, -5.09, 55.2, 0.5)
pt3dadd(131, -5, 55.4, 0.5)
pt3dadd(129.9, -4.59, 55.8, 0.5)
pt3dadd(129.3, -3.9, 56.2, 0.5)
pt3dadd(128.69, -3.4, 56.4, 0.5)
pt3dadd(128, -3.1, 56.7, 0.5)
pt3dadd(127.2, -3, 57, 0.5)
pt3dadd(125.8, -2.6, 57.5, 0.5)
pt3dadd(125, -2.29, 57.7, 0.5)
pt3dadd(123.1, -1.6, 58.4, 0.5)
pt3dadd(121.9, -1.5, 58.8, 0.5)
pt3dadd(120, -1.1, 59.4, 0.5)
pt3dadd(119.4, -0.8, 59.6, 0.5)
pt3dadd(118.3, -0.6, 60, 0.5)
pt3dadd(117.6, -0.6, 60.2, 0.5)
pt3dadd(115.5, 0.3, 60.9, 0.5)
pt3dadd(114.7, 0.8, 61.2, 0.5)
pt3dadd(113.8, 1.1, 61.5, 0.5)
pt3dadd(111.4, 1.6, 62.3, 0.5)
pt3dadd(108.7, 2.2, 63.2, 0.5)
pt3dadd(107.7, 2.8, 63.6, 0.5)
pt3dadd(106.8, 3.3, 63.9, 0.5)
pt3dadd(105.9, 3.8, 64.2, 0.5)
pt3dadd(104.7, 4.5, 64.7, 0.5)
pt3dadd(102.4, 5.5, 65.5, 0.5)
pt3dadd(101, 6, 66, 0.5)
pt3dadd(99.4, 6.5, 66.5, 0.5)
pt3dadd(98.2, 7, 66.9, 0.5)
pt3dadd(97.2, 7.7, 67.3, 0.5)
pt3dadd(96.6, 8.4, 67.59, 0.5)
pt3dadd(96.2, 8.9, 67.8, 0.5)
pt3dadd(95.6, 9.4, 68.09, 0.5)
pt3dadd(93.9, 10.4, 68.7, 0.5)
pt3dadd(92.8, 11.1, 69.09, 0.5)
pt3dadd(91.6, 11.7, 69.5, 0.5)
pt3dadd(88.8, 13.4, 70.59, 0.5)
pt3dadd(87.9, 14.6, 71, 0.5)
pt3dadd(87.3, 16.1, 71.59, 0.5)
pt3dadd(86.6, 17.39, 72, 0.5)
pt3dadd(85.6, 18.39, 72.5, 0.5)
pt3dadd(84.5, 19.1, 72.9, 0.5)
pt3dadd(82.3, 20.8, 73.8, 0.5)
pt3dadd(81.7, 22, 74.2, 0.5)
pt3dadd(81.2, 23, 74.59, 0.5)
pt3dadd(80.7, 23.8, 74.9, 0.5)
pt3dadd(79.9, 24.5, 75.2, 0.5)
pt3dadd(78.7, 25.4, 75.7, 0.5)
pt3dadd(77.2, 26.7, 76.3, 0.5)
pt3dadd(75.9, 28.2, 76.9, 0.5)
pt3dadd(75.5, 29.5, 77.3, 0.5)
pt3dadd(74.9, 31.1, 77.9, 0.5)
pt3dadd(74.59, 31.8, 78.09, 0.5)
pt3dadd(74.7, 32.6, 78.4, 0.5)
pt3dadd(74.09, 34.6, 79, 0.5)
pt3dadd(72.09, 36.79, 80, 0.5)
pt3dadd(71.8, 37.6, 80.2, 0.5)
pt3dadd(71.4, 38.5, 80.5, 0.5)
pt3dadd(71, 39.5, 80.9, 0.5)
pt3dadd(70.8, 40.29, 81.09, 0.5)
pt3dadd(70.2, 41.9, 81.7, 0.5)
pt3dadd(69.7, 42.7, 81.9, 0.5)
pt3dadd(69.5, 43.4, 82.2, 0.5)
pt3dadd(69.09, 44, 82.4, 0.5)
pt3dadd(68.2, 45.2, 82.9, 0.5)
pt3dadd(67.5, 45.6, 83.1, 0.5)
pt3dadd(67.09, 46.1, 83.3, 0.5)
pt3dadd(66.7, 46.7, 83.5, 0.5)
pt3dadd(66.4, 47.3, 83.7, 0.5)
pt3dadd(66.5, 48.2, 84, 0.5)
}
apic[85] {pt3dclear()
pt3dadd(134.8, -6.3, 54, 0.5)
pt3dadd(133.69, -6.8, 54.6, 0.5)
pt3dadd(133, -7.1, 55, 0.5)
pt3dadd(132.1, -7.6, 55.5, 0.5)
pt3dadd(131.3, -8, 56, 0.5)
pt3dadd(129.9, -8.19, 56.6, 0.5)
pt3dadd(129, -7.9, 57.1, 0.5)
pt3dadd(128.1, -7.8, 57.5, 0.5)
pt3dadd(127.3, -7.5, 58, 0.5)
pt3dadd(125.4, -7.1, 58.9, 0.5)
pt3dadd(124.7, -7.4, 59.3, 0.5)
pt3dadd(123.8, -7.6, 59.7, 0.5)
pt3dadd(123.1, -7.6, 60, 0.5)
pt3dadd(121.8, -7.5, 60.6, 0.5)
pt3dadd(118.2, -6.9, 62.3, 0.5)
pt3dadd(117.5, -6.8, 62.6, 0.5)
pt3dadd(116.7, -6.3, 63, 0.5)
pt3dadd(115.7, -6, 63.5, 0.5)
pt3dadd(114.6, -5.9, 64, 0.5)
pt3dadd(110.8, -5.9, 65.8, 0.5)
pt3dadd(108.7, -6, 66.7, 0.5)
pt3dadd(108, -5.7, 67.09, 0.5)
pt3dadd(107.5, -5.3, 67.4, 0.5)
pt3dadd(107.1, -4.8, 67.7, 0.5)
pt3dadd(106.6, -4.5, 68, 0.5)
pt3dadd(105.9, -4.4, 68.2, 0.5)
pt3dadd(104.4, -4.59, 69, 0.5)
pt3dadd(103.5, -4.5, 69.4, 0.5)
pt3dadd(101.9, -4.09, 70.09, 0.5)
pt3dadd(101.1, -3.8, 70.5, 0.5)
pt3dadd(100.1, -3.4, 71, 0.5)
pt3dadd(98.7, -3.3, 71.59, 0.5)
pt3dadd(96.3, -3.4, 72.7, 0.5)
pt3dadd(95.6, -3.6, 73.09, 0.5)
pt3dadd(94.9, -3, 73.5, 0.5)
pt3dadd(94, -2.5, 73.9, 0.5)
pt3dadd(93.3, -2.2, 74.3, 0.5)
pt3dadd(92.7, -1.8, 74.59, 0.5)
pt3dadd(91.9, -1.7, 74.9, 0.5)
pt3dadd(90, -1.9, 75.8, 0.5)
pt3dadd(89.2, -2.1, 76.09, 0.5)
pt3dadd(88.5, -2.8, 76.59, 0.5)
pt3dadd(88.2, -3.4, 76.9, 0.5)
pt3dadd(88.1, -4.4, 77.3, 0.5)
pt3dadd(88, -5.2, 77.7, 0.5)
pt3dadd(88.2, -5.9, 78, 0.5)
}
apic[86] {pt3dclear()
pt3dadd(145.8, -13.3, 42, 2)
pt3dadd(146, -12.4, 42.1, 0.5)
pt3dadd(145.69, -11.7, 42.1, 0.5)
pt3dadd(145.19, -10, 42.2, 0.5)
pt3dadd(145.5, -9.3, 42.3, 0.5)
pt3dadd(145.9, -8.8, 42.3, 0.5)
pt3dadd(146.6, -8.4, 42.3, 0.5)
pt3dadd(147.4, -7.5, 42.3, 0.5)
pt3dadd(147.8, -6.9, 42.3, 0.5)
pt3dadd(148.1, -6.3, 42.3, 0.5)
pt3dadd(148.9, -5.6, 42.3, 0.5)
pt3dadd(149.6, -5.4, 42.3, 0.5)
pt3dadd(150.19, -5.5, 42.3, 0.5)
pt3dadd(152.5, -5.4, 42.2, 0.5)
pt3dadd(153.1, -4.8, 42.1, 0.5)
pt3dadd(153.4, -4.3, 42.1, 0.5)
pt3dadd(153.69, -3.6, 42, 0.5)
pt3dadd(154.19, -2.9, 41.9, 0.5)
pt3dadd(154.9, -2.5, 41.9, 0.5)
pt3dadd(155.8, -2.29, 41.8, 0.5)
pt3dadd(156.4, -2.4, 41.7, 0.5)
pt3dadd(157.3, -2.7, 41.6, 0.5)
pt3dadd(158, -2.8, 41.5, 0.5)
pt3dadd(159.3, -3.3, 41.3, 0.5)
pt3dadd(160.4, -3.4, 41.1, 0.5)
pt3dadd(161, -3.1, 41, 0.5)
pt3dadd(161.8, -3, 40.79, 0.5)
pt3dadd(162.5, -2.7, 40.7, 0.5)
pt3dadd(163.3, -2.8, 40.6, 0.5)
pt3dadd(164, -2.6, 40.4, 0.5)
pt3dadd(164.7, -2.7, 40.29, 0.5)
pt3dadd(165.8, -3.1, 40, 0.5)
pt3dadd(166.4, -3.1, 39.9, 0.5)
pt3dadd(166.8, -3.5, 39.7, 0.5)
pt3dadd(167.4, -3.9, 39.6, 0.5)
pt3dadd(168, -4.3, 39.4, 0.5)
pt3dadd(168.7, -4.7, 39.2, 0.5)
pt3dadd(169.6, -5.09, 38.9, 0.5)
pt3dadd(170.3, -5.4, 38.7, 0.5)
pt3dadd(171, -6.2, 38.4, 0.5)
pt3dadd(172.1, -7.2, 38, 0.5)
pt3dadd(174.2, -8.3, 37.2, 0.5)
pt3dadd(174.8, -7.6, 36.9, 0.5)
pt3dadd(175.4, -7, 36.6, 0.5)
pt3dadd(176.6, -5.4, 36, 0.5)
pt3dadd(177.1, -4.2, 35.5, 0.5)
}
}
proc shape3d_33() {
apic[86] { pt3dadd(177.7, -3.7, 35.2, 0.5)
pt3dadd(178.3, -3.3, 34.9, 0.5)
pt3dadd(179.1, -3.1, 34.6, 0.5)
pt3dadd(179.9, -3.2, 34.29, 0.5)
pt3dadd(183.6, -3.3, 32.79, 0.5)
pt3dadd(184.8, -3.1, 32.2, 0.5)
pt3dadd(186, -3.3, 31.7, 0.5)
pt3dadd(188.1, -2.9, 30.7, 0.5)
pt3dadd(188.8, -2.7, 30.4, 0.5)
pt3dadd(190.4, -2.2, 29.6, 0.5)
pt3dadd(191.6, -2, 29, 0.5)
pt3dadd(192.7, -1.9, 28.4, 0.5)
pt3dadd(193.9, -2, 27.8, 0.5)
pt3dadd(197.6, -1.9, 25.8, 0.5)
pt3dadd(199.4, -1.5, 24.8, 0.5)
pt3dadd(201, -1.4, 23.9, 0.5)
pt3dadd(203.9, -0.7, 22.1, 0.5)
pt3dadd(205, -0.4, 21.4, 0.5)
pt3dadd(207.5, 0.2, 19.89, 0.5)
pt3dadd(208.4, 0.4, 19.3, 0.5)
pt3dadd(209.2, 0.3, 18.8, 0.5)
pt3dadd(212.6, 0, 16.6, 0.5)
pt3dadd(216.2, -0.3, 14.2, 0.5)
pt3dadd(218.4, -0.4, 12.7, 0.5)
pt3dadd(219.3, -0.5, 12.1, 0.5)
pt3dadd(221.4, -1, 10.6, 0.5)
pt3dadd(222.8, -1.4, 9.5, 0.5)
pt3dadd(223.4, -1.8, 9, 0.5)
pt3dadd(224.3, -1.9, 8.4, 0.5)
pt3dadd(225.2, -1.8, 7.7, 0.5)
pt3dadd(225.8, -1.7, 7.3, 0.5)
pt3dadd(226.6, -1.8, 6.7, 0.5)
pt3dadd(229.1, -2.29, 4.7, 0.5)
pt3dadd(229.8, -3, 4, 0.5)
pt3dadd(230.6, -3.1, 3.4, 0.5)
pt3dadd(231.2, -3.4, 2.9, 0.5)
pt3dadd(231.7, -3.5, 2.5, 0.5)
pt3dadd(235.3, -3.5, -0.3, 0.5)
pt3dadd(235.8, -3.2, -0.8, 0.5)
pt3dadd(236.9, -3.1, -1.6, 0.5)
pt3dadd(237.7, -2.9, -2.29, 0.5)
pt3dadd(238.8, -2.6, -3.2, 0.5)
pt3dadd(241.4, -2.29, -5.3, 0.5)
pt3dadd(242.3, -2.2, -6.1, 0.5)
pt3dadd(244.2, -1.8, -7.7, 0.5)
pt3dadd(245.1, -1.7, -8.4, 0.5)
pt3dadd(246.7, -1.6, -9.69, 0.5)
pt3dadd(250.6, -1.4, -13, 0.5)
pt3dadd(251.7, -0.9, -14, 0.5)
pt3dadd(252.5, -0.8, -14.7, 0.5)
pt3dadd(253.7, -0.7, -15.8, 0.5)
pt3dadd(254.5, -0.7, -16.5, 0.5)
pt3dadd(257.5, -1, -19.1, 0.5)
pt3dadd(259, -0.5, -20.5, 0.5)
pt3dadd(259.6, -0.2, -21, 0.5)
pt3dadd(260.89, 0.6, -22.5, 0.5)
pt3dadd(261.8, 1.1, -23.3, 0.5)
pt3dadd(262.7, 1.6, -24.2, 0.5)
pt3dadd(263.39, 1.8, -24.9, 0.5)
pt3dadd(264.2, 2.2, -25.7, 0.5)
pt3dadd(264.7, 2.5, -26.2, 0.5)
pt3dadd(266, 2.9, -27.5, 0.5)
pt3dadd(266.89, 3.2, -28.2, 0.5)
pt3dadd(267.39, 3.4, -28.8, 0.5)
pt3dadd(268.7, 3.8, -30, 0.5)
}
apic[87] {pt3dclear()
pt3dadd(121.3, -12.9, 36, 2.1)
pt3dadd(121.5, -14, 36.1, 0.5)
pt3dadd(122, -15.1, 36.29, 0.5)
pt3dadd(122.5, -15.9, 36.29, 0.5)
pt3dadd(122.4, -16.6, 36.4, 0.5)
pt3dadd(123, -17, 36.5, 0.5)
pt3dadd(123.6, -17.39, 36.5, 0.5)
pt3dadd(124.3, -18.3, 36.6, 0.5)
pt3dadd(125.4, -20.39, 36.6, 0.5)
pt3dadd(126, -20.9, 36.6, 0.5)
pt3dadd(126.4, -21.4, 36.6, 0.5)
pt3dadd(127.5, -22.3, 36.6, 0.5)
pt3dadd(128.3, -22.8, 36.6, 0.5)
pt3dadd(129.19, -23.2, 36.5, 0.5)
pt3dadd(129.9, -23.7, 36.5, 0.5)
pt3dadd(130.69, -23.7, 36.4, 0.5)
pt3dadd(131.69, -24.1, 36.4, 0.5)
pt3dadd(133, -24.2, 36.2, 0.5)
pt3dadd(134.8, -24.7, 36, 0.5)
pt3dadd(135.4, -25.1, 35.9, 0.5)
pt3dadd(135.9, -25.8, 35.79, 0.5)
pt3dadd(136.19, -26.7, 35.7, 0.5)
pt3dadd(136.4, -28.1, 35.4, 0.5)
pt3dadd(136, -28.8, 35.29, 0.5)
pt3dadd(135.69, -29.6, 35.2, 0.5)
pt3dadd(135.6, -30.5, 35, 0.5)
pt3dadd(136.19, -31.4, 34.79, 0.5)
pt3dadd(137.1, -31.9, 34.5, 0.5)
pt3dadd(137.9, -32.79, 34.29, 0.5)
pt3dadd(138.6, -33.4, 34, 0.5)
pt3dadd(139.3, -34, 33.79, 0.5)
pt3dadd(141.6, -36.1, 32.9, 0.5)
pt3dadd(142.4, -37.1, 32.5, 0.5)
pt3dadd(143.4, -38, 32.1, 0.5)
pt3dadd(144.1, -38.79, 31.7, 0.5)
pt3dadd(144.8, -39.4, 31.4, 0.5)
pt3dadd(145.3, -40, 31.2, 0.5)
pt3dadd(145.6, -40.7, 30.9, 0.5)
pt3dadd(145.69, -41.4, 30.7, 0.5)
pt3dadd(146.1, -42.1, 30.3, 0.5)
pt3dadd(146.6, -42.9, 30, 0.5)
pt3dadd(147, -43.8, 29.6, 0.5)
pt3dadd(147.5, -44.6, 29.2, 0.5)
pt3dadd(148.69, -45.8, 28.5, 0.5)
pt3dadd(151.8, -47.4, 27, 0.5)
pt3dadd(152.8, -47.8, 26.5, 0.5)
pt3dadd(155, -48.3, 25.4, 0.5)
pt3dadd(155.8, -48.7, 24.9, 0.5)
pt3dadd(156.69, -49.5, 24.3, 0.5)
pt3dadd(157.5, -50.4, 23.7, 0.5)
pt3dadd(158.19, -51.3, 23.1, 0.5)
pt3dadd(159.5, -53, 21.9, 0.5)
pt3dadd(160.1, -53.4, 21.5, 0.5)
pt3dadd(160.6, -53.8, 21.1, 0.5)
pt3dadd(161.3, -54.2, 20.7, 0.5)
pt3dadd(161.9, -54.8, 20.2, 0.5)
pt3dadd(162.5, -55.4, 19.7, 0.5)
pt3dadd(163.4, -55.8, 19.1, 0.5)
pt3dadd(164.2, -56.3, 18.5, 0.5)
pt3dadd(165.3, -56.8, 17.8, 0.5)
pt3dadd(168.8, -58.2, 15.4, 0.5)
pt3dadd(169.4, -58.6, 14.9, 0.5)
pt3dadd(171.5, -60.1, 13.2, 0.5)
pt3dadd(172.1, -60.2, 12.7, 0.5)
pt3dadd(174.3, -61.3, 11.1, 0.5)
pt3dadd(176, -62, 9.8, 0.5)
pt3dadd(179.6, -63.6, 6.8, 0.5)
pt3dadd(181.1, -64.09, 5.6, 0.5)
pt3dadd(182.3, -64.59, 4.59, 0.5)
pt3dadd(183.6, -64.7, 3.6, 0.5)
pt3dadd(184.7, -65.2, 2.6, 0.5)
pt3dadd(186.4, -65.7, 1.2, 0.5)
pt3dadd(188.1, -66.59, -0.3, 0.5)
pt3dadd(189.8, -67.59, -2, 0.5)
pt3dadd(191.3, -68.2, -3.3, 0.5)
pt3dadd(192.6, -68.3, -4.4, 0.5)
pt3dadd(196, -68.3, -7.3, 0.5)
pt3dadd(198.1, -68.3, -9.19, 0.5)
pt3dadd(199.4, -68.7, -10.4, 0.5)
pt3dadd(203.1, -69.7, -13.9, 0.5)
pt3dadd(204.1, -69.4, -14.9, 0.5)
pt3dadd(206.2, -69.09, -16.8, 0.5)
pt3dadd(207.4, -69.2, -17.89, 0.5)
pt3dadd(210, -69.8, -20.5, 0.5)
pt3dadd(212.3, -70.3, -22.8, 0.5)
pt3dadd(213.7, -70.8, -24.2, 0.5)
pt3dadd(214.6, -70.9, -25.2, 0.5)
pt3dadd(215.7, -71.3, -26.3, 0.5)
pt3dadd(217.4, -71.7, -28, 0.5)
pt3dadd(218.2, -72.09, -28.9, 0.5)
pt3dadd(219.3, -72.2, -30, 0.5)
}
apic[88] {pt3dclear()
pt3dadd(93.1, -11.8, 24, 2.1)
pt3dadd(93.8, -12.7, 24.3, 0.5)
pt3dadd(94, -13.5, 24.5, 0.5)
pt3dadd(93.9, -14.6, 25, 0.5)
pt3dadd(93.4, -17.2, 26.3, 0.5)
pt3dadd(93, -17.7, 26.6, 0.5)
pt3dadd(92.9, -18.89, 27.2, 0.5)
pt3dadd(93.2, -19.8, 27.7, 0.5)
pt3dadd(93.3, -20.6, 28.2, 0.5)
pt3dadd(93.6, -21.4, 28.5, 0.5)
pt3dadd(93.8, -22, 28.9, 0.5)
pt3dadd(93.8, -22.7, 29.2, 0.5)
pt3dadd(93.9, -23.5, 29.5, 0.5)
pt3dadd(93.9, -24.1, 29.7, 0.5)
pt3dadd(93.8, -24.7, 29.8, 0.5)
pt3dadd(93.4, -25.3, 30, 0.5)
}
apic[89] {pt3dclear()
pt3dadd(93.4, -25.3, 30, 0.5)
pt3dadd(93.5, -26, 30.1, 0.5)
pt3dadd(94, -26.9, 30.2, 0.5)
pt3dadd(94.1, -28.1, 30.4, 0.5)
pt3dadd(94.3, -29, 30.5, 0.5)
pt3dadd(94.5, -29.7, 30.6, 0.5)
pt3dadd(94.5, -30.3, 30.6, 0.5)
pt3dadd(94.7, -31.2, 30.7, 0.5)
pt3dadd(95.3, -32, 30.8, 0.5)
pt3dadd(96, -32.9, 30.9, 0.5)
pt3dadd(96.8, -33.2, 30.9, 0.5)
pt3dadd(97.3, -34, 31, 0.5)
pt3dadd(97.5, -34.9, 31, 0.5)
pt3dadd(97.4, -35.5, 31, 0.5)
pt3dadd(97.8, -36.29, 31, 0.5)
pt3dadd(98.3, -37.1, 31.1, 0.5)
pt3dadd(99, -37.79, 31.1, 0.5)
pt3dadd(99.6, -38.1, 31.1, 0.5)
pt3dadd(100, -38.7, 31.1, 0.5)
pt3dadd(100.2, -39.2, 31.1, 0.5)
pt3dadd(100.5, -40.2, 31.1, 0.5)
pt3dadd(101.1, -40.9, 31, 0.5)
pt3dadd(101.5, -41.8, 31, 0.5)
pt3dadd(101.7, -42.8, 31, 0.5)
pt3dadd(101.8, -44.2, 30.9, 0.5)
pt3dadd(101.6, -45.8, 30.8, 0.5)
pt3dadd(102.3, -46.8, 30.7, 0.5)
pt3dadd(103, -47.7, 30.6, 0.5)
}
}
proc shape3d_34() {
apic[89] { pt3dadd(104.2, -49.5, 30.4, 0.5)
pt3dadd(104.7, -50.5, 30.2, 0.5)
pt3dadd(104.6, -51.6, 30.1, 0.5)
pt3dadd(104.7, -52.5, 30, 0.5)
pt3dadd(105.3, -53.6, 29.8, 0.5)
pt3dadd(106.1, -54.8, 29.6, 0.5)
pt3dadd(107.1, -56.1, 29.3, 0.5)
pt3dadd(108, -57.4, 29, 0.5)
pt3dadd(108.4, -58.6, 28.8, 0.5)
pt3dadd(108.6, -59.8, 28.5, 0.5)
pt3dadd(108.5, -60.8, 28.3, 0.5)
pt3dadd(108.6, -61.6, 28.1, 0.5)
pt3dadd(109.2, -62.3, 27.9, 0.5)
pt3dadd(111.2, -65.09, 27.1, 0.5)
pt3dadd(111.8, -65.9, 26.8, 0.5)
pt3dadd(112.3, -66.3, 26.7, 0.5)
pt3dadd(113.1, -67.3, 26.3, 0.5)
pt3dadd(113.8, -67.9, 26, 0.5)
pt3dadd(114.4, -69, 25.7, 0.5)
pt3dadd(115.1, -69.4, 25.5, 0.5)
pt3dadd(116.1, -71, 24.9, 0.5)
pt3dadd(118.1, -74, 23.7, 0.5)
pt3dadd(119.9, -76.9, 22.5, 0.5)
pt3dadd(121.3, -78.8, 21.5, 0.5)
pt3dadd(122.2, -79.7, 21, 0.5)
pt3dadd(123.2, -80.59, 20.5, 0.5)
pt3dadd(124.9, -82.2, 19.6, 0.5)
pt3dadd(125.1, -83, 19.2, 0.5)
pt3dadd(125.4, -84, 18.8, 0.5)
pt3dadd(125.8, -84.7, 18.39, 0.5)
pt3dadd(126.7, -85.1, 18, 0.5)
pt3dadd(129.69, -86.9, 16.3, 0.5)
pt3dadd(130, -87.7, 16, 0.5)
pt3dadd(130.19, -88.6, 15.5, 0.5)
pt3dadd(130.6, -90, 14.8, 0.5)
pt3dadd(130.6, -90.6, 14.5, 0.5)
pt3dadd(130.8, -91.3, 14.1, 0.5)
pt3dadd(130.69, -92, 13.8, 0.5)
pt3dadd(131, -92.9, 13.3, 0.5)
pt3dadd(131.8, -95.3, 12, 0.5)
pt3dadd(132.4, -96, 11.5, 0.5)
pt3dadd(133.6, -97.1, 10.6, 0.5)
pt3dadd(134.4, -97.2, 10.19, 0.5)
pt3dadd(135.4, -97.6, 9.6, 0.5)
pt3dadd(136.19, -97.9, 9.1, 0.5)
pt3dadd(136.8, -98, 8.8, 0.5)
pt3dadd(137.19, -98.4, 8.4, 0.5)
pt3dadd(137.6, -99.2, 7.9, 0.5)
pt3dadd(138.1, -100, 7.4, 0.5)
pt3dadd(138.5, -101, 6.7, 0.5)
pt3dadd(139.1, -102.1, 6, 0.5)
pt3dadd(140.4, -104.2, 4.59, 0.5)
pt3dadd(141.69, -106.5, 2.9, 0.5)
pt3dadd(142.3, -107.2, 2.29, 0.5)
pt3dadd(142.8, -107.9, 1.8, 0.5)
pt3dadd(142.9, -108.8, 1.2, 0.5)
pt3dadd(143.19, -109.7, 0.6, 0.5)
pt3dadd(143.4, -110.8, -0.09, 0.5)
pt3dadd(143.6, -111.5, -0.6, 0.5)
pt3dadd(144.19, -112.3, -1.2, 0.5)
pt3dadd(144.9, -113.1, -1.9, 0.5)
pt3dadd(145.69, -113.9, -2.7, 0.5)
pt3dadd(146.9, -114.3, -3.5, 0.5)
pt3dadd(147.9, -114.7, -4.2, 0.5)
pt3dadd(149.19, -115.6, -5.3, 0.5)
pt3dadd(149.5, -116.3, -5.8, 0.5)
pt3dadd(149.6, -116.9, -6.3, 0.5)
pt3dadd(150.19, -117.8, -7, 0.5)
pt3dadd(151, -118.7, -7.9, 0.5)
pt3dadd(151.8, -119.5, -8.6, 0.5)
pt3dadd(152.5, -120.2, -9.4, 0.5)
pt3dadd(154.1, -122.5, -11.4, 0.5)
pt3dadd(154.5, -123.2, -12, 0.5)
pt3dadd(154.4, -123.9, -12.5, 0.5)
pt3dadd(154.6, -124.5, -13, 0.5)
pt3dadd(155, -125, -13.4, 0.5)
pt3dadd(155.5, -125.6, -14, 0.5)
pt3dadd(156.19, -126.2, -14.7, 0.5)
pt3dadd(157.8, -127.3, -16.2, 0.5)
pt3dadd(158.3, -128.3, -17.1, 0.5)
pt3dadd(158.5, -129.19, -17.7, 0.5)
pt3dadd(159, -130.1, -18.5, 0.5)
pt3dadd(159.3, -131, -19.2, 0.5)
pt3dadd(159.6, -131.6, -19.8, 0.5)
pt3dadd(160, -132.19, -20.39, 0.5)
pt3dadd(160.1, -132.9, -20.9, 0.5)
pt3dadd(160.69, -133.69, -21.7, 0.5)
pt3dadd(160.9, -134.5, -22.3, 0.5)
pt3dadd(161.1, -135.4, -23, 0.5)
pt3dadd(161.69, -136.4, -24, 0.5)
}
apic[90] {pt3dclear()
pt3dadd(93.4, -25.3, 30, 0.5)
pt3dadd(92.8, -25.7, 30.1, 0.5)
pt3dadd(92.7, -26.8, 30.3, 0.5)
pt3dadd(93, -27.4, 30.3, 0.5)
pt3dadd(93.2, -28, 30.3, 0.5)
pt3dadd(93.4, -29.2, 30.2, 0.5)
pt3dadd(93.1, -30.4, 30, 0.5)
}
apic[91] {pt3dclear()
pt3dadd(93.1, -30.4, 30, 0.5)
pt3dadd(92.9, -31.1, 29.8, 0.5)
pt3dadd(93, -32.29, 29.3, 0.5)
pt3dadd(93.3, -33.29, 28.9, 0.5)
pt3dadd(93.7, -34, 28.6, 0.5)
pt3dadd(94.2, -35.2, 28.1, 0.5)
pt3dadd(94.5, -35.9, 27.7, 0.5)
pt3dadd(94.4, -36.7, 27.4, 0.5)
pt3dadd(94.5, -38.4, 26.5, 0.5)
pt3dadd(94.7, -39, 26.1, 0.5)
pt3dadd(95.6, -39.79, 25.5, 0.5)
pt3dadd(96.2, -40.9, 24.7, 0.5)
pt3dadd(96.5, -41.5, 24.3, 0.5)
pt3dadd(96.8, -42.3, 23.8, 0.5)
pt3dadd(96.7, -43.1, 23.3, 0.5)
pt3dadd(96.8, -44.8, 22.2, 0.5)
pt3dadd(96.7, -45.7, 21.5, 0.5)
pt3dadd(97.1, -47.3, 20.3, 0.5)
pt3dadd(97.6, -47.9, 19.7, 0.5)
pt3dadd(98.1, -48.7, 19, 0.5)
pt3dadd(99, -48.8, 18.3, 0.5)
pt3dadd(99.6, -49.3, 17.6, 0.5)
pt3dadd(100, -50.2, 16.8, 0.5)
pt3dadd(100.8, -51.1, 15.8, 0.5)
pt3dadd(102.4, -52.1, 14.1, 0.5)
pt3dadd(102.9, -52.9, 13.2, 0.5)
pt3dadd(103.2, -53.7, 12.4, 0.5)
pt3dadd(103.8, -54.8, 11.3, 0.5)
pt3dadd(104.6, -57.5, 8.4, 0.5)
pt3dadd(104.5, -58.6, 7.3, 0.5)
pt3dadd(104.8, -59.3, 6.5, 0.5)
pt3dadd(104.8, -60.1, 5.6, 0.5)
pt3dadd(105.5, -61.1, 4.2, 0.5)
pt3dadd(106.4, -61.9, 2.9, 0.5)
pt3dadd(107.2, -62.6, 1.7, 0.5)
pt3dadd(107.1, -63.3, 0.9, 0.5)
pt3dadd(106.7, -63.9, 0, 0.5)
pt3dadd(105.9, -64.7, -1.3, 0.5)
pt3dadd(105, -65.7, -2.9, 0.5)
pt3dadd(104.2, -67.3, -5, 0.5)
pt3dadd(103.4, -69.09, -7.5, 0.5)
pt3dadd(102.4, -70.59, -9.9, 0.5)
pt3dadd(100.9, -72.7, -13.3, 0.5)
pt3dadd(100.5, -73.7, -14.8, 0.5)
pt3dadd(100.4, -74.7, -16.2, 0.5)
pt3dadd(99.5, -75.59, -17.89, 0.5)
pt3dadd(98.6, -76.3, -19.5, 0.5)
pt3dadd(97.8, -76.9, -20.9, 0.5)
pt3dadd(97, -77.5, -22.3, 0.5)
pt3dadd(95.7, -79, -25.2, 0.5)
pt3dadd(95.3, -80, -26.9, 0.5)
pt3dadd(95.2, -81.2, -28.5, 0.5)
pt3dadd(94.2, -81.9, -30.5, 0.5)
pt3dadd(93.3, -82.1, -31.9, 0.5)
pt3dadd(92.5, -82.7, -33.4, 0.5)
pt3dadd(92.4, -83.4, -34.4, 0.5)
pt3dadd(92.7, -84.8, -36.6, 0.5)
pt3dadd(92.6, -85.9, -38.4, 0.5)
pt3dadd(91.9, -88.3, -42.3, 0.5)
pt3dadd(91.9, -89.2, -43.8, 0.5)
pt3dadd(92.1, -89.9, -44.9, 0.5)
pt3dadd(92, -90.6, -46.1, 0.5)
pt3dadd(92.3, -91.5, -47.7, 0.5)
pt3dadd(93, -92.8, -50.1, 0.5)
pt3dadd(93.9, -92.9, -51.6, 0.5)
pt3dadd(95.5, -93.5, -54.4, 0.5)
pt3dadd(95.8, -94.2, -55.8, 0.5)
pt3dadd(96, -95.1, -57.2, 0.5)
pt3dadd(96.3, -95.7, -58.3, 0.5)
pt3dadd(96.7, -96.5, -59.9, 0.5)
pt3dadd(97.5, -96.9, -61.4, 0.5)
pt3dadd(98.2, -97, -62.7, 0.5)
pt3dadd(98.9, -97.3, -64, 0.5)
pt3dadd(99.4, -97.8, -65.09, 0.5)
pt3dadd(100.3, -99.1, -67.9, 0.5)
pt3dadd(100.5, -100, -69.59, 0.5)
pt3dadd(100.5, -100.6, -70.7, 0.5)
pt3dadd(100.7, -101.4, -72, 0.5)
}
apic[92] {pt3dclear()
pt3dadd(93.1, -30.4, 30, 0.5)
pt3dadd(91.9, -31.4, 29.8, 0.5)
pt3dadd(91.5, -32.4, 29.7, 0.5)
pt3dadd(91.5, -33.2, 29.6, 0.5)
pt3dadd(91, -34.1, 29.5, 0.5)
pt3dadd(91.2, -35.1, 29.4, 0.5)
pt3dadd(91.1, -36.29, 29.2, 0.5)
pt3dadd(90.6, -37, 29.1, 0.5)
pt3dadd(90, -37.9, 29, 0.5)
pt3dadd(89.1, -38.4, 28.9, 0.5)
pt3dadd(88.6, -39.5, 28.8, 0.5)
pt3dadd(88.5, -40.4, 28.6, 0.5)
pt3dadd(88.1, -41.7, 28.5, 0.5)
pt3dadd(87.9, -42.9, 28.3, 0.5)
pt3dadd(87.4, -44.2, 28.2, 0.5)
pt3dadd(86.4, -46.7, 27.9, 0.5)
pt3dadd(86, -47.7, 27.7, 0.5)
pt3dadd(85.6, -48.5, 27.6, 0.5)
pt3dadd(85.1, -49.3, 27.5, 0.5)
pt3dadd(84.1, -50.7, 27.3, 0.5)
pt3dadd(83.5, -51.1, 27.2, 0.5)
pt3dadd(83.2, -51.7, 27.1, 0.5)
pt3dadd(82.4, -52.4, 27, 0.5)
pt3dadd(81.9, -53.1, 26.9, 0.5)
pt3dadd(81.3, -54.8, 26.7, 0.5)
}
}
proc shape3d_35() {
apic[92] { pt3dadd(80.8, -56.5, 26.5, 0.5)
pt3dadd(80.8, -57.2, 26.4, 0.5)
pt3dadd(80.9, -58.3, 26.2, 0.5)
pt3dadd(80.9, -59, 26.1, 0.5)
pt3dadd(80.3, -60.6, 25.9, 0.5)
pt3dadd(80.2, -61.4, 25.8, 0.5)
pt3dadd(80.7, -61.8, 25.7, 0.5)
pt3dadd(81.2, -62.3, 25.7, 0.5)
pt3dadd(81.4, -63.3, 25.5, 0.5)
pt3dadd(81.3, -64, 25.4, 0.5)
pt3dadd(81.3, -66.3, 25.1, 0.5)
pt3dadd(81.5, -67, 25, 0.5)
pt3dadd(81.4, -67.7, 24.9, 0.5)
pt3dadd(81.09, -68.5, 24.8, 0.5)
pt3dadd(80.7, -69.09, 24.7, 0.5)
pt3dadd(79.9, -69.8, 24.6, 0.5)
pt3dadd(79, -70.2, 24.5, 0.5)
pt3dadd(78.9, -71.2, 24.3, 0.5)
pt3dadd(78.59, -74.3, 23.9, 0.5)
pt3dadd(78.8, -75.09, 23.8, 0.5)
pt3dadd(79.2, -76.4, 23.6, 0.5)
pt3dadd(79.9, -77.3, 23.4, 0.5)
pt3dadd(80.4, -77.8, 23.3, 0.5)
pt3dadd(80.9, -78.2, 23.2, 0.5)
pt3dadd(81.3, -78.7, 23.1, 0.5)
pt3dadd(81.8, -79.2, 23, 0.5)
pt3dadd(82.2, -80.3, 22.9, 0.5)
pt3dadd(82.4, -80.9, 22.8, 0.5)
pt3dadd(82.3, -82.1, 22.6, 0.5)
pt3dadd(81.5, -83.4, 22.4, 0.5)
pt3dadd(81.09, -84.1, 22.3, 0.5)
pt3dadd(80.7, -84.6, 22.2, 0.5)
pt3dadd(80.7, -85.4, 22, 0.5)
pt3dadd(80.7, -88.7, 21.5, 0.5)
pt3dadd(81.3, -89.6, 21.4, 0.5)
pt3dadd(81.8, -90.5, 21.2, 0.5)
pt3dadd(81.7, -91.2, 21.1, 0.5)
pt3dadd(81, -93.2, 20.7, 0.5)
pt3dadd(80.9, -94.4, 20.5, 0.5)
pt3dadd(80.5, -95.1, 20.39, 0.5)
pt3dadd(80.09, -95.7, 20.3, 0.5)
pt3dadd(79.4, -95.9, 20.2, 0.5)
pt3dadd(78.2, -97.2, 19.89, 0.5)
pt3dadd(78.09, -97.9, 19.7, 0.5)
pt3dadd(78.3, -99.2, 19.5, 0.5)
pt3dadd(78.2, -99.9, 19.39, 0.5)
pt3dadd(77.8, -101.2, 19.2, 0.5)
pt3dadd(77.7, -102.2, 19, 0.5)
pt3dadd(77.09, -105.4, 18.39, 0.5)
pt3dadd(76.3, -106.3, 18.2, 0.5)
pt3dadd(75.9, -106.8, 18.1, 0.5)
pt3dadd(75.5, -107.5, 17.89, 0.5)
pt3dadd(74.7, -108.9, 17.6, 0.5)
pt3dadd(73.5, -110.3, 17.3, 0.5)
pt3dadd(73.09, -110.7, 17.2, 0.5)
pt3dadd(72.4, -111.4, 17, 0.5)
pt3dadd(70.7, -112.2, 16.6, 0.5)
pt3dadd(70.2, -113, 16.39, 0.5)
pt3dadd(69.59, -113.6, 16.3, 0.5)
pt3dadd(68.9, -113.9, 16.1, 0.5)
pt3dadd(68.4, -114.5, 16, 0.5)
pt3dadd(67.8, -114.9, 15.8, 0.5)
pt3dadd(67.09, -115.6, 15.6, 0.5)
pt3dadd(65.3, -117.8, 15, 0.5)
pt3dadd(64.59, -118.5, 14.8, 0.5)
pt3dadd(63.3, -119.2, 14.5, 0.5)
pt3dadd(62.7, -119.5, 14.3, 0.5)
pt3dadd(61.9, -119.7, 14.2, 0.5)
pt3dadd(61, -119.9, 14, 0.5)
pt3dadd(60.2, -120.2, 13.8, 0.5)
pt3dadd(59.5, -120.7, 13.6, 0.5)
pt3dadd(58.7, -120.6, 13.4, 0.5)
pt3dadd(57.8, -120.8, 13.2, 0.5)
pt3dadd(56.9, -120.4, 13, 0.5)
pt3dadd(56.2, -119.7, 12.8, 0.5)
pt3dadd(55.6, -119.4, 12.6, 0.5)
pt3dadd(54.4, -118.9, 12.3, 0.5)
pt3dadd(53.3, -118.2, 12, 0.5)
}
apic[93] {pt3dclear()
pt3dadd(79.9, -9.5, 24, 2.1)
pt3dadd(80, -11.1, 24.4, 0.5)
pt3dadd(80.2, -12.1, 24.6, 0.5)
pt3dadd(80.4, -13.1, 24.7, 0.5)
pt3dadd(80.4, -13.8, 24.8, 0.5)
pt3dadd(80.8, -14.6, 24.8, 0.5)
pt3dadd(81.4, -15.3, 24.8, 0.5)
pt3dadd(81.8, -16, 24.8, 0.5)
pt3dadd(82.2, -17.3, 24.7, 0.5)
pt3dadd(83.1, -18.5, 24.4, 0.5)
pt3dadd(83.9, -19.3, 24.2, 0.5)
pt3dadd(84.6, -19.7, 24, 0.5)
pt3dadd(85.1, -20.6, 23.7, 0.5)
pt3dadd(85.5, -21, 23.5, 0.5)
pt3dadd(86, -21.4, 23.3, 0.5)
pt3dadd(86.6, -22.3, 22.9, 0.5)
pt3dadd(87.2, -22.6, 22.6, 0.5)
pt3dadd(88, -23, 22.2, 0.5)
pt3dadd(88.6, -23.4, 21.8, 0.5)
pt3dadd(89.4, -23.4, 21.4, 0.5)
pt3dadd(91.2, -23.9, 20.39, 0.5)
pt3dadd(92.3, -24, 19.7, 0.5)
pt3dadd(95.6, -24.6, 17.39, 0.5)
pt3dadd(96.4, -24.7, 16.7, 0.5)
pt3dadd(97.4, -25.1, 15.9, 0.5)
pt3dadd(99.4, -25.6, 14.1, 0.5)
pt3dadd(100.8, -26.1, 12.8, 0.5)
pt3dadd(102.1, -27.2, 11.1, 0.5)
pt3dadd(102.5, -28, 10.19, 0.5)
pt3dadd(103.4, -28.4, 9.19, 0.5)
pt3dadd(104, -28.5, 8.6, 0.5)
pt3dadd(105.1, -28.9, 7.3, 0.5)
pt3dadd(105.7, -29.8, 6.1, 0.5)
pt3dadd(106.8, -30.3, 4.7, 0.5)
pt3dadd(107.8, -30.4, 3.6, 0.5)
pt3dadd(109.3, -30.8, 1.8, 0.5)
pt3dadd(110.7, -31.9, -0.4, 0.5)
pt3dadd(111.3, -32.7, -1.7, 0.5)
pt3dadd(111.9, -33.6, -3.1, 0.5)
pt3dadd(112.1, -34.5, -4.2, 0.5)
pt3dadd(112, -35.29, -5.4, 0.5)
pt3dadd(111.4, -38.1, -9.19, 0.5)
pt3dadd(111.7, -38.79, -10.19, 0.5)
pt3dadd(112.5, -39.6, -11.8, 0.5)
pt3dadd(112.9, -40.7, -13.5, 0.5)
pt3dadd(113, -41.7, -14.9, 0.5)
pt3dadd(112.6, -42.9, -16.89, 0.5)
pt3dadd(111.7, -45.3, -20.7, 0.5)
pt3dadd(111.2, -46.9, -23.1, 0.5)
pt3dadd(111.4, -48.6, -25.8, 0.5)
pt3dadd(111.7, -49.5, -27.3, 0.5)
pt3dadd(111.9, -51.2, -29.9, 0.5)
pt3dadd(111.6, -54.3, -34.9, 0.5)
pt3dadd(111, -54.7, -36, 0.5)
}
apic[94] {pt3dclear()
pt3dadd(67.9, -7.6, 18, 2.1)
pt3dadd(67.7, -8.69, 18.89, 0.5)
pt3dadd(68.09, -9.69, 19.7, 0.5)
pt3dadd(68.59, -10.9, 20.8, 0.5)
pt3dadd(69, -11.6, 21.4, 0.5)
pt3dadd(69.2, -12.3, 22, 0.5)
pt3dadd(69.3, -13.8, 23.2, 0.5)
pt3dadd(69, -16.7, 25.7, 0.5)
pt3dadd(69.2, -19.2, 27.8, 0.5)
pt3dadd(69.7, -20.7, 29.1, 0.5)
pt3dadd(69.9, -21.8, 30.1, 0.5)
pt3dadd(70.09, -22.8, 31, 0.5)
pt3dadd(70.09, -23.8, 31.8, 0.5)
pt3dadd(70.2, -24.6, 32.6, 0.5)
pt3dadd(70.8, -27.1, 35, 0.5)
pt3dadd(71.4, -28.5, 36.29, 0.5)
pt3dadd(72.2, -29.9, 37.79, 0.5)
pt3dadd(73.09, -31.1, 39.29, 0.5)
pt3dadd(75.4, -34, 42.9, 0.5)
pt3dadd(76, -34.79, 44, 0.5)
pt3dadd(76.8, -35.5, 45, 0.5)
pt3dadd(77.8, -36.2, 46.3, 0.5)
pt3dadd(79.5, -37.6, 48.6, 0.5)
pt3dadd(80.09, -38.29, 49.6, 0.5)
pt3dadd(80.5, -39.4, 50.8, 0.5)
pt3dadd(80.4, -40.5, 52.1, 0.5)
pt3dadd(80.5, -41.5, 53.2, 0.5)
pt3dadd(80.59, -43.5, 55.5, 0.5)
pt3dadd(80.9, -44.2, 56.3, 0.5)
pt3dadd(81.09, -44.8, 57.1, 0.5)
pt3dadd(81.8, -46.2, 59, 0.5)
pt3dadd(82, -47, 60, 0.5)
pt3dadd(82.9, -47.7, 61.6, 0.5)
pt3dadd(83.7, -48.5, 63.7, 0.5)
pt3dadd(84.7, -49.4, 66.8, 0.5)
pt3dadd(86.4, -50.7, 72.4, 0.5)
pt3dadd(87.3, -51.2, 75.7, 0.5)
pt3dadd(88.1, -51.6, 78.7, 0.5)
pt3dadd(89, -52, 81.9, 0.5)
pt3dadd(89.4, -52.4, 84.1, 0.5)
pt3dadd(89.4, -53.3, 87.4, 0.5)
pt3dadd(89.5, -54.9, 92.9, 0.5)
pt3dadd(90.5, -56.2, 98.8, 0.5)
pt3dadd(91, -57, 102.2, 0.5)
pt3dadd(91.1, -57.9, 105.3, 0.5)
pt3dadd(91.1, -58.8, 108.1, 0.5)
pt3dadd(90.6, -59.4, 110.4, 0.5)
pt3dadd(90.6, -60, 112.1, 0.5)
pt3dadd(91.4, -61.2, 116.1, 0.5)
pt3dadd(92, -61.9, 118.3, 0.5)
pt3dadd(92.7, -62.3, 120, 0.5)
pt3dadd(93.8, -62.4, 122.3, 0.5)
pt3dadd(95, -62.5, 124.6, 0.5)
pt3dadd(96, -63, 126.6, 0.5)
pt3dadd(96.7, -63.1, 127.9, 0.5)
pt3dadd(97.3, -63.7, 129.4, 0.5)
pt3dadd(97.7, -64.5, 130.9, 0.5)
pt3dadd(98.3, -65.5, 132.8, 0.5)
pt3dadd(100.1, -68.4, 137.8, 0.5)
pt3dadd(100.7, -69.2, 139.19, 0.5)
pt3dadd(101.5, -69.9, 140.5, 0.5)
pt3dadd(102.4, -70.4, 141.69, 0.5)
pt3dadd(103.1, -70.5, 142.6, 0.5)
pt3dadd(103.7, -70.9, 143.4, 0.5)
pt3dadd(104.4, -71.9, 144.6, 0.5)
pt3dadd(105.2, -72.8, 145.69, 0.5)
pt3dadd(106.2, -73.2, 146.69, 0.5)
pt3dadd(107, -73.7, 147.4, 0.5)
}
}
proc shape3d_36() {
apic[94] { pt3dadd(107.8, -74, 148, 0.5)
pt3dadd(108.4, -74.4, 148.4, 0.5)
pt3dadd(108.9, -74.8, 148.8, 0.5)
pt3dadd(109.7, -75.2, 149.3, 0.5)
pt3dadd(110.1, -75.5, 149.6, 0.5)
pt3dadd(110.8, -76, 150, 0.5)
}
apic[95] {pt3dclear()
pt3dadd(60.2, -5.8, 12, 2.1)
pt3dadd(60.3, -4.8, 12, 0.5)
pt3dadd(60.4, -4.09, 12, 0.5)
pt3dadd(60.2, -3.5, 12, 0.5)
pt3dadd(60.2, -2.9, 12, 0.5)
pt3dadd(59.6, -2.29, 12, 0.5)
pt3dadd(59.4, -1.7, 12, 0.5)
pt3dadd(59.5, -0.8, 12, 0.5)
pt3dadd(59.5, 0.09, 12, 0.5)
}
apic[96] {pt3dclear()
pt3dadd(59.5, 0.09, 12, 0.5)
pt3dadd(59.8, 1.1, 12, 0.5)
pt3dadd(59.5, 1.8, 12, 0.5)
pt3dadd(59.5, 2.6, 12.1, 0.5)
pt3dadd(59.8, 3.4, 12.1, 0.5)
pt3dadd(60.3, 4, 12.2, 0.5)
pt3dadd(60.9, 4.2, 12.2, 0.5)
pt3dadd(61.5, 4.5, 12.3, 0.5)
pt3dadd(62.5, 5, 12.4, 0.5)
pt3dadd(63.1, 5, 12.5, 0.5)
pt3dadd(63.9, 5.2, 12.6, 0.5)
pt3dadd(64.59, 5.5, 12.7, 0.5)
pt3dadd(65.09, 6.1, 12.8, 0.5)
pt3dadd(65.4, 6.7, 12.9, 0.5)
pt3dadd(65.7, 7.4, 13, 0.5)
pt3dadd(66.2, 8, 13.2, 0.5)
pt3dadd(67.4, 9.19, 13.6, 0.5)
pt3dadd(69.09, 10.3, 14, 0.5)
pt3dadd(69.8, 10.9, 14.3, 0.5)
pt3dadd(70.09, 11.8, 14.6, 0.5)
pt3dadd(70.7, 12.6, 14.9, 0.5)
pt3dadd(71.4, 13.2, 15.1, 0.5)
pt3dadd(71.7, 13.8, 15.4, 0.5)
pt3dadd(72.8, 15.1, 15.9, 0.5)
pt3dadd(75.2, 17.39, 17.1, 0.5)
pt3dadd(75.7, 17.8, 17.39, 0.5)
pt3dadd(78.9, 20.39, 19.1, 0.5)
pt3dadd(79.7, 20.5, 19.5, 0.5)
pt3dadd(80.4, 21.1, 19.89, 0.5)
pt3dadd(81, 21.7, 20.3, 0.5)
pt3dadd(81.59, 22.4, 20.8, 0.5)
pt3dadd(82, 23.2, 21.2, 0.5)
pt3dadd(82.8, 25.1, 22.3, 0.5)
pt3dadd(83.8, 25.8, 22.9, 0.5)
pt3dadd(84.4, 26.1, 23.2, 0.5)
pt3dadd(84.9, 27.4, 24, 0.5)
pt3dadd(85, 28.4, 24.6, 0.5)
pt3dadd(85, 31.9, 26.6, 0.5)
pt3dadd(85.1, 32.7, 27.1, 0.5)
pt3dadd(85.5, 33.9, 27.8, 0.5)
pt3dadd(86.2, 34.6, 28.5, 0.5)
pt3dadd(86.3, 35.1, 28.8, 0.5)
pt3dadd(86.6, 38.5, 31, 0.5)
pt3dadd(87, 40.1, 32.1, 0.5)
pt3dadd(87.8, 40.29, 32.7, 0.5)
pt3dadd(88.6, 40.79, 33.29, 0.5)
pt3dadd(89.5, 41, 33.9, 0.5)
pt3dadd(90.6, 41.3, 34.7, 0.5)
pt3dadd(91.6, 41.6, 35.4, 0.5)
pt3dadd(92.4, 42.1, 36.1, 0.5)
pt3dadd(93.2, 42.6, 36.79, 0.5)
pt3dadd(93.5, 43.3, 37.29, 0.5)
pt3dadd(94.6, 44.5, 38.5, 0.5)
pt3dadd(95.2, 45, 39, 0.5)
pt3dadd(95.9, 45.5, 39.7, 0.5)
pt3dadd(96.6, 45.8, 40.2, 0.5)
pt3dadd(98.4, 47.4, 42.1, 0.5)
pt3dadd(98.7, 48, 42.6, 0.5)
pt3dadd(99.3, 49, 43.5, 0.5)
pt3dadd(100.7, 50.5, 45, 0.5)
pt3dadd(101.3, 51, 45.7, 0.5)
pt3dadd(102.1, 51.6, 46.5, 0.5)
pt3dadd(102.7, 51.9, 47, 0.5)
pt3dadd(103.6, 52.8, 47.9, 0.5)
pt3dadd(104.1, 53, 48.4, 0.5)
pt3dadd(105.4, 53.5, 49.5, 0.5)
pt3dadd(106.5, 54, 50.4, 0.5)
pt3dadd(107, 54.4, 51, 0.5)
pt3dadd(107.3, 55.2, 51.6, 0.5)
pt3dadd(108.3, 56.2, 52.7, 0.5)
pt3dadd(109.6, 57.2, 54.1, 0.5)
pt3dadd(110.3, 57.4, 54.6, 0.5)
pt3dadd(110.9, 57.7, 55.2, 0.5)
pt3dadd(111.5, 57.9, 55.7, 0.5)
pt3dadd(112.2, 58.1, 56.3, 0.5)
pt3dadd(113.7, 58.8, 57.6, 0.5)
pt3dadd(114.2, 59.5, 58.3, 0.5)
pt3dadd(114.8, 60.1, 59, 0.5)
pt3dadd(115.9, 60.7, 60, 0.5)
pt3dadd(116.7, 61.5, 60.9, 0.5)
pt3dadd(117.5, 62.1, 61.7, 0.5)
pt3dadd(118.3, 62.6, 62.5, 0.5)
pt3dadd(118.9, 63.3, 63.3, 0.5)
pt3dadd(120, 64.5, 64.7, 0.5)
pt3dadd(121.2, 65, 65.8, 0.5)
pt3dadd(122, 65.4, 66.7, 0.5)
pt3dadd(123, 65.7, 67.5, 0.5)
pt3dadd(123.8, 66.09, 68.4, 0.5)
pt3dadd(124.4, 66.59, 69.09, 0.5)
pt3dadd(125, 67, 69.8, 0.5)
pt3dadd(126.2, 67.4, 71, 0.5)
pt3dadd(127.5, 67.5, 72.2, 0.5)
pt3dadd(130.5, 67.5, 75.2, 0.5)
pt3dadd(131.8, 68.09, 76.5, 0.5)
pt3dadd(132.69, 68.2, 77.5, 0.5)
pt3dadd(133.5, 68.2, 78.3, 0.5)
pt3dadd(135.1, 68.3, 80, 0.5)
pt3dadd(136.1, 68.2, 81, 0.5)
pt3dadd(137.1, 68.3, 82.1, 0.5)
pt3dadd(138.1, 68.5, 83.2, 0.5)
pt3dadd(139.19, 69.2, 84.6, 0.5)
pt3dadd(141.8, 71, 88.1, 0.5)
pt3dadd(142.4, 71.5, 89, 0.5)
pt3dadd(143.1, 72.2, 90.1, 0.5)
pt3dadd(143.8, 72.7, 91.1, 0.5)
pt3dadd(144.4, 72.59, 91.8, 0.5)
pt3dadd(145, 72.9, 92.5, 0.5)
pt3dadd(145.5, 73.4, 93.4, 0.5)
pt3dadd(145.8, 74.09, 94.3, 0.5)
pt3dadd(146.5, 74.59, 95.3, 0.5)
pt3dadd(147.19, 75.09, 96.3, 0.5)
pt3dadd(148.19, 75.5, 97.7, 0.5)
pt3dadd(149.19, 76, 99, 0.5)
pt3dadd(150, 76.2, 100, 0.5)
pt3dadd(151.19, 76.7, 101.6, 0.5)
pt3dadd(152.1, 77.59, 103.3, 0.5)
pt3dadd(152.69, 77.9, 104, 0.5)
pt3dadd(154.1, 78, 105.8, 0.5)
pt3dadd(154.8, 77.9, 106.7, 0.5)
pt3dadd(155.4, 78.09, 107.5, 0.5)
pt3dadd(156, 78, 108.3, 0.5)
pt3dadd(157.4, 77.59, 110.2, 0.5)
pt3dadd(158, 77.5, 111, 0.5)
pt3dadd(158.9, 77.4, 112.3, 0.5)
pt3dadd(160.1, 77.8, 114, 0.5)
}
apic[97] {pt3dclear()
pt3dadd(59.5, 0.09, 12, 0.5)
pt3dadd(59.7, -0.5, 12, 0.5)
pt3dadd(60.5, -1.6, 12.4, 0.5)
pt3dadd(60.8, -2.29, 12.8, 0.5)
pt3dadd(61.8, -3.1, 13.6, 0.5)
pt3dadd(62.6, -3.5, 14.4, 0.5)
pt3dadd(64.4, -4.3, 16.39, 0.5)
pt3dadd(64.9, -4.7, 17.2, 0.5)
pt3dadd(65.4, -5.5, 18.5, 0.5)
pt3dadd(65.7, -6.1, 19.6, 0.5)
pt3dadd(66.09, -6.5, 20.39, 0.5)
pt3dadd(66.7, -7.4, 22, 0.5)
pt3dadd(67.2, -8, 23.4, 0.5)
pt3dadd(67.9, -8.5, 24.9, 0.5)
pt3dadd(68.59, -8.9, 26.3, 0.5)
pt3dadd(69.09, -9.4, 27.6, 0.5)
pt3dadd(69.59, -9.8, 28.8, 0.5)
pt3dadd(70.09, -10.5, 30.6, 0.5)
pt3dadd(70.4, -11.2, 31.9, 0.5)
pt3dadd(70.9, -12, 33.79, 0.5)
pt3dadd(71.8, -13, 36.4, 0.5)
pt3dadd(72.5, -13.5, 38.2, 0.5)
pt3dadd(73.4, -13.9, 40, 0.5)
pt3dadd(75.4, -14.9, 44.4, 0.5)
pt3dadd(76, -15.5, 46.1, 0.5)
pt3dadd(76.5, -16.1, 47.5, 0.5)
pt3dadd(76.7, -17, 49, 0.5)
pt3dadd(77.2, -17.3, 50.1, 0.5)
pt3dadd(77.7, -18.1, 51.7, 0.5)
pt3dadd(78.09, -19, 53.2, 0.5)
pt3dadd(78.59, -20, 54.8, 0.5)
pt3dadd(79.3, -21, 56.5, 0.5)
pt3dadd(80.09, -21.8, 57.8, 0.5)
pt3dadd(80.59, -22.2, 58.5, 0.5)
pt3dadd(80.9, -22.7, 59.1, 0.5)
pt3dadd(81.59, -23.5, 60, 0.5)
pt3dadd(82.2, -23.9, 60.5, 0.5)
pt3dadd(82.8, -24.3, 61, 0.5)
pt3dadd(83.4, -24.8, 61.6, 0.5)
pt3dadd(83.9, -25.2, 62.1, 0.5)
pt3dadd(84.1, -26.6, 63, 0.5)
pt3dadd(85.1, -28.2, 64.4, 0.5)
pt3dadd(86.1, -28.6, 65.09, 0.5)
pt3dadd(88, -29.6, 66.4, 0.5)
pt3dadd(88.9, -30.1, 67.09, 0.5)
pt3dadd(90, -30.2, 67.8, 0.5)
pt3dadd(90.6, -31.4, 68.59, 0.5)
pt3dadd(91.1, -32.2, 69.09, 0.5)
pt3dadd(91.7, -32.7, 69.59, 0.5)
pt3dadd(92.3, -33.4, 70.09, 0.5)
pt3dadd(92.8, -33.7, 70.4, 0.5)
pt3dadd(94.8, -34.79, 71.59, 0.5)
pt3dadd(97.1, -36, 72.9, 0.5)
pt3dadd(98.3, -36.79, 73.59, 0.5)
pt3dadd(98.9, -37.2, 73.9, 0.5)
pt3dadd(100.6, -38.5, 74.9, 0.5)
pt3dadd(101.4, -38.5, 75.2, 0.5)
pt3dadd(103.3, -39.1, 76, 0.5)
pt3dadd(103.8, -40, 76.4, 0.5)
pt3dadd(104.5, -40.7, 76.8, 0.5)
}
}
proc shape3d_37() {
apic[97] { pt3dadd(106.7, -43.2, 77.9, 0.5)
pt3dadd(107.5, -43.7, 78.2, 0.5)
pt3dadd(108.4, -43.7, 78.5, 0.5)
pt3dadd(109.5, -44.1, 78.8, 0.5)
pt3dadd(110.5, -44.2, 79.09, 0.5)
pt3dadd(111.4, -44.7, 79.3, 0.5)
pt3dadd(112.2, -45.4, 79.59, 0.5)
pt3dadd(113.1, -45.9, 79.8, 0.5)
pt3dadd(113.6, -46.8, 80.09, 0.5)
pt3dadd(114, -47.9, 80.3, 0.5)
pt3dadd(114.2, -48.9, 80.5, 0.5)
pt3dadd(114.7, -50, 80.7, 0.5)
pt3dadd(115.1, -50.8, 80.9, 0.5)
pt3dadd(115.6, -51.2, 81, 0.5)
pt3dadd(116.3, -51.6, 81.09, 0.5)
pt3dadd(117.3, -52.1, 81.2, 0.5)
pt3dadd(118.4, -52.2, 81.3, 0.5)
pt3dadd(119.6, -52.6, 81.5, 0.5)
pt3dadd(120.6, -53.1, 81.5, 0.5)
pt3dadd(121.8, -53.6, 81.59, 0.5)
pt3dadd(122.6, -54.2, 81.7, 0.5)
pt3dadd(123.2, -55.2, 81.7, 0.5)
pt3dadd(124.2, -56.9, 81.7, 0.5)
pt3dadd(124.9, -57.2, 81.7, 0.5)
pt3dadd(125.8, -57.3, 81.7, 0.5)
pt3dadd(126.9, -57.7, 81.7, 0.5)
pt3dadd(129.1, -58.2, 81.5, 0.5)
pt3dadd(129.9, -58.5, 81.5, 0.5)
pt3dadd(130.4, -59.4, 81.4, 0.5)
pt3dadd(130.8, -60, 81.3, 0.5)
pt3dadd(131.8, -60.9, 81.09, 0.5)
pt3dadd(132.4, -61.4, 81, 0.5)
pt3dadd(133.4, -62.2, 80.8, 0.5)
pt3dadd(134, -63.1, 80.7, 0.5)
pt3dadd(134.6, -63.4, 80.5, 0.5)
pt3dadd(135.3, -63.5, 80.4, 0.5)
pt3dadd(136.3, -63.9, 80.2, 0.5)
pt3dadd(137.9, -64.8, 79.8, 0.5)
pt3dadd(138.4, -65.2, 79.7, 0.5)
pt3dadd(139, -65.59, 79.5, 0.5)
pt3dadd(139.9, -66.8, 79.09, 0.5)
pt3dadd(140.3, -67.5, 78.8, 0.5)
pt3dadd(141, -67.9, 78.59, 0.5)
pt3dadd(142.1, -68.8, 78.2, 0.5)
pt3dadd(142.5, -69.3, 78, 0.5)
pt3dadd(143, -69.8, 77.8, 0.5)
pt3dadd(144.19, -71.09, 77.2, 0.5)
pt3dadd(145, -71.09, 76.9, 0.5)
pt3dadd(145.6, -71.5, 76.59, 0.5)
pt3dadd(146.8, -72.2, 76, 0.5)
pt3dadd(147.4, -72.7, 75.8, 0.5)
pt3dadd(147.8, -73.09, 75.5, 0.5)
pt3dadd(148.4, -74, 75, 0.5)
pt3dadd(149.19, -74.09, 74.7, 0.5)
pt3dadd(149.8, -74.4, 74.3, 0.5)
pt3dadd(150.5, -74.5, 74, 0.5)
pt3dadd(153.69, -75.09, 72.4, 0.5)
pt3dadd(154.5, -75.4, 72, 0.5)
}
apic[98] {pt3dclear()
pt3dadd(58.5, -5.6, 12, 2.1)
pt3dadd(58.1, -6.1, 11.7, 0.5)
pt3dadd(58.2, -6.8, 11.2, 0.5)
pt3dadd(58.2, -7.5, 10.6, 0.5)
pt3dadd(57.8, -8.4, 9.69, 0.5)
pt3dadd(57.4, -9.8, 8, 0.5)
pt3dadd(57.5, -10.4, 7.1, 0.5)
pt3dadd(58.1, -11.9, 4.8, 0.5)
pt3dadd(58.2, -12.7, 3.5, 0.5)
pt3dadd(58.3, -14, 1.5, 0.5)
pt3dadd(58.5, -14.7, 0.2, 0.5)
pt3dadd(58.7, -15.6, -1.2, 0.5)
pt3dadd(59.2, -16.5, -2.8, 0.5)
pt3dadd(59.7, -17.1, -4.09, 0.5)
pt3dadd(60, -18.39, -6, 0.5)
}
apic[99] {pt3dclear()
pt3dadd(60, -18.39, -6, 0.5)
pt3dadd(59.4, -19, -7.8, 0.5)
pt3dadd(59.4, -19.7, -9.3, 0.5)
pt3dadd(59.5, -20.39, -10.9, 0.5)
pt3dadd(60.1, -20.8, -12.4, 0.5)
pt3dadd(60.7, -21.6, -14.7, 0.5)
pt3dadd(60.9, -22.5, -16.5, 0.5)
pt3dadd(60.8, -23.4, -18.39, 0.5)
pt3dadd(60.1, -23.6, -20.2, 0.5)
pt3dadd(59.7, -24.3, -21.8, 0.5)
pt3dadd(59.9, -25.1, -23.6, 0.5)
pt3dadd(60, -26.5, -26.7, 0.5)
pt3dadd(59.2, -28.6, -31.7, 0.5)
pt3dadd(58.7, -29.4, -33.6, 0.5)
pt3dadd(58.6, -30.3, -35.79, 0.5)
pt3dadd(59.1, -31.2, -38, 0.5)
pt3dadd(59.7, -31.6, -39.5, 0.5)
pt3dadd(60.3, -32.1, -41.2, 0.5)
pt3dadd(61, -32.6, -43.2, 0.5)
pt3dadd(61.9, -32.6, -45.1, 0.5)
pt3dadd(63, -33, -47.7, 0.5)
pt3dadd(64.9, -34.29, -52.6, 0.5)
pt3dadd(65.5, -34.79, -54.5, 0.5)
pt3dadd(66.3, -35.7, -57, 0.5)
pt3dadd(67, -36, -58.7, 0.5)
pt3dadd(67.5, -36.4, -60, 0.5)
pt3dadd(68.09, -36.7, -61.4, 0.5)
pt3dadd(69.09, -37.2, -63.9, 0.5)
pt3dadd(70.2, -37.9, -66.8, 0.5)
pt3dadd(71.3, -38.79, -69.8, 0.5)
pt3dadd(72, -39.5, -72, 0.5)
pt3dadd(72.2, -40.4, -73.9, 0.5)
pt3dadd(72.2, -41.2, -75.59, 0.5)
pt3dadd(72.3, -41.8, -77, 0.5)
pt3dadd(72.3, -42.6, -78.7, 0.5)
pt3dadd(72.5, -43.5, -80.8, 0.5)
pt3dadd(73.4, -45.2, -84.7, 0.5)
pt3dadd(73.8, -46.3, -87.3, 0.5)
pt3dadd(73.5, -47, -88.9, 0.5)
pt3dadd(73, -47.6, -90.6, 0.5)
pt3dadd(72.2, -48, -92.4, 0.5)
pt3dadd(70.9, -49.2, -96.1, 0.5)
pt3dadd(71.2, -49.9, -97.9, 0.5)
pt3dadd(71.59, -52, -102.3, 0.5)
pt3dadd(71.5, -52.8, -103.9, 0.5)
pt3dadd(70.8, -53.5, -106.1, 0.5)
pt3dadd(70.09, -54.2, -108.1, 0.5)
pt3dadd(69.2, -56.1, -112.5, 0.5)
pt3dadd(69.09, -59.8, -120, 0.5)
pt3dadd(69.09, -60.9, -122.2, 0.5)
pt3dadd(69, -61.8, -123.9, 0.5)
pt3dadd(70.09, -63.3, -126.8, 0.5)
pt3dadd(71, -64, -128.4, 0.5)
pt3dadd(71.9, -64.59, -129.9, 0.5)
pt3dadd(72.7, -65.09, -130.9, 0.5)
pt3dadd(73.2, -65.5, -131.6, 0.5)
pt3dadd(73.9, -65.8, -132.4, 0.5)
pt3dadd(74.4, -66.2, -133, 0.5)
pt3dadd(74.8, -67, -133.8, 0.5)
pt3dadd(74.7, -67.59, -134.4, 0.5)
pt3dadd(74.8, -69, -135.5, 0.5)
pt3dadd(75, -69.9, -136.3, 0.5)
pt3dadd(75.3, -70.5, -136.8, 0.5)
pt3dadd(75.59, -71.5, -137.5, 0.5)
pt3dadd(75.5, -72.2, -138, 0.5)
}
apic[100] {pt3dclear()
pt3dadd(60, -18.39, -6, 0.5)
pt3dadd(60.5, -18.8, -6.4, 0.5)
pt3dadd(60.8, -19.5, -6.9, 0.5)
pt3dadd(61.5, -20.3, -7.7, 0.5)
pt3dadd(62.1, -21.1, -8.3, 0.5)
pt3dadd(62.4, -21.8, -8.8, 0.5)
pt3dadd(62.5, -22.6, -9.3, 0.5)
pt3dadd(62.7, -23.6, -10, 0.5)
pt3dadd(63.1, -24.6, -10.7, 0.5)
pt3dadd(63.6, -26.1, -11.6, 0.5)
pt3dadd(64.4, -27.3, -12.5, 0.5)
pt3dadd(65.2, -28.3, -13.2, 0.5)
pt3dadd(67, -30.6, -14.8, 0.5)
pt3dadd(67.4, -32.1, -15.7, 0.5)
pt3dadd(68.5, -34.6, -17, 0.5)
pt3dadd(69.7, -35.6, -17.8, 0.5)
pt3dadd(71.09, -36.29, -18.5, 0.5)
pt3dadd(72.7, -36.79, -19.3, 0.5)
pt3dadd(74.5, -38, -20.2, 0.5)
pt3dadd(76.59, -39.7, -21.3, 0.5)
pt3dadd(79, -41.8, -22.5, 0.5)
pt3dadd(80.2, -43, -23, 0.5)
pt3dadd(81.2, -44.4, -23.6, 0.5)
pt3dadd(83.4, -47, -24.6, 0.5)
pt3dadd(84.4, -48, -25, 0.5)
pt3dadd(86, -48.4, -25.4, 0.5)
pt3dadd(87.3, -49.1, -25.7, 0.5)
pt3dadd(88.5, -50.1, -26.1, 0.5)
pt3dadd(90.8, -52.1, -26.7, 0.5)
pt3dadd(92, -52.5, -26.9, 0.5)
pt3dadd(93.3, -52.9, -27.1, 0.5)
pt3dadd(94.9, -53.1, -27.3, 0.5)
pt3dadd(97.2, -54, -27.6, 0.5)
pt3dadd(98.4, -54.8, -27.7, 0.5)
pt3dadd(101, -56.7, -27.9, 0.5)
pt3dadd(102.4, -58.2, -28, 0.5)
pt3dadd(104.3, -59.7, -28, 0.5)
pt3dadd(106.3, -60.9, -27.9, 0.5)
pt3dadd(108.3, -61.7, -27.8, 0.5)
pt3dadd(109.5, -62.6, -27.7, 0.5)
pt3dadd(110.3, -63.5, -27.6, 0.5)
pt3dadd(110.8, -64.3, -27.5, 0.5)
pt3dadd(111.4, -64.4, -27.5, 0.5)
pt3dadd(114.1, -64.9, -27.1, 0.5)
pt3dadd(114.6, -65.2, -27, 0.5)
pt3dadd(115.2, -66, -26.9, 0.5)
pt3dadd(117.9, -69.3, -26.1, 0.5)
pt3dadd(119.1, -70, -25.8, 0.5)
pt3dadd(120.4, -70.59, -25.5, 0.5)
pt3dadd(121.7, -71.2, -25.1, 0.5)
pt3dadd(124.4, -71.8, -24.4, 0.5)
pt3dadd(125.6, -72.2, -24, 0.5)
pt3dadd(127.6, -73, -23.3, 0.5)
pt3dadd(128.8, -73.4, -22.9, 0.5)
pt3dadd(130.19, -73.5, -22.4, 0.5)
pt3dadd(132.3, -74.09, -21.5, 0.5)
pt3dadd(134.1, -75, -20.7, 0.5)
pt3dadd(134.9, -75.59, -20.3, 0.5)
pt3dadd(136.1, -76.09, -19.7, 0.5)
pt3dadd(136.69, -76.5, -19.39, 0.5)
pt3dadd(137.4, -77, -19, 0.5)
pt3dadd(138, -77.4, -18.7, 0.5)
}
}
proc shape3d_38() {
apic[100] { pt3dadd(138.8, -77.5, -18.3, 0.5)
pt3dadd(139.4, -77.5, -18, 0.5)
}
}
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()
}
objref all, somatic, basal, apical
proc subsets() { local i
objref all, somatic, basal, apical
all = new SectionList()
soma all.append()
for i=0, 56 dend[i] all.append()
for i=0, 100 apic[i] all.append()
somatic = new SectionList()
soma somatic.append()
basal = new SectionList()
for i=0, 56 dend[i] basal.append()
apical = new SectionList()
for i=0, 100 apic[i] apical.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()