load_file("nrngui.hoc")
proc celldef() {
topol()
subsets()
geom()
biophys()
geom_nseg()
}
create soma[2], dend[119], dummy[1]
proc topol() { local i
connect soma(0), dummy[0](1)
connect soma[1](0), soma(0)
connect dend(0), soma[1](1)
for i = 1, 8 connect dend[i](0), dend[i-1](1)
connect dend[9](0), dend[7](1)
connect dend[10](0), dend[6](1)
connect dend[11](0), dend[5](1)
connect dend[12](0), dend[4](1)
for i = 13, 14 connect dend[i](0), dend[i-1](1)
connect dend[15](0), dend[13](1)
connect dend[16](0), dend[12](1)
for i = 17, 18 connect dend[i](0), dend[i-1](1)
connect dend[19](0), dend[17](1)
connect dend[20](0), dend[16](1)
connect dend[21](0), dend[3](1)
for i = 22, 24 connect dend[i](0), dend[i-1](1)
connect dend[25](0), dend[23](1)
connect dend[26](0), dend[22](1)
connect dend[27](0), dend[21](1)
connect dend[28](0), dend[2](1)
for i = 29, 32 connect dend[i](0), dend[i-1](1)
connect dend[33](0), dend[31](1)
for i = 34, 35 connect dend[i](0), dend[33](1)
connect dend[36](0), dend[30](1)
for i = 37, 38 connect dend[i](0), dend[36](1)
for i = 39, 40 connect dend[i](0), dend[38](1)
connect dend[41](0), dend[29](1)
connect dend[42](0), dend[28](1)
for i = 43, 44 connect dend[i](0), dend[42](1)
connect dend[45](0), dend[1](1)
for i = 46, 47 connect dend[i](0), dend[i-1](1)
connect dend[48](0), dend[46](1)
connect dend[49](0), dend[45](1)
connect dend[50](0), dend(1)
for i = 51, 52 connect dend[i](0), dend[50](1)
for i = 53, 54 connect dend[i](0), dend[52](1)
for i = 55, 59 connect dend[i](0), dend[i-1](1)
connect dend[60](0), dend[58](1)
connect dend[61](0), dend[57](1)
for i = 62, 63 connect dend[i](0), dend[61](1)
for i = 64, 65 connect dend[i](0), dend[63](1)
connect dend[66](0), dend[56](1)
for i = 67, 68 connect dend[i](0), dend[66](1)
connect dend[69](0), dend[55](1)
for i = 70, 72 connect dend[i](0), dend[i-1](1)
connect dend[73](0), dend[71](1)
connect dend[74](0), dend[70](1)
connect dend[75](0), dend[69](1)
for i = 76, 77 connect dend[i](0), dend[75](1)
connect dend[78](0), dend[54](1)
for i = 79, 80 connect dend[i](0), dend[78](1)
connect dend[81](0), soma(0)
for i = 82, 83 connect dend[i](0), dend[81](1)
for i = 84, 85 connect dend[i](0), dend[i-1](1)
connect dend[86](0), dend[84](1)
connect dend[87](0), dend[83](1)
for i = 88, 89 connect dend[i](0), dend[i-1](1)
connect dend[90](0), dend[88](1)
for i = 91, 92 connect dend[i](0), dend[i-1](1)
connect dend[93](0), dend[91](1)
connect dend[94](0), dend[90](1)
connect dend[95](0), dend[87](1)
for i = 96, 97 connect dend[i](0), dend[i-1](1)
connect dend[98](0), dend[96](1)
for i = 99, 100 connect dend[i](0), dend[98](1)
connect dend[101](0), dend[95](1)
for i = 102, 103 connect dend[i](0), dend[i-1](1)
connect dend[104](0), dend[102](1)
connect dend[105](0), dend[101](1)
connect dend[106](0), soma(0)
for i = 107, 108 connect dend[i](0), dend[i-1](1)
connect dend[109](0), dend[107](1)
for i = 110, 111 connect dend[i](0), dend[109](1)
connect dend[112](0), dend[106](1)
for i = 113, 114 connect dend[i](0), dend[112](1)
for i = 115, 116 connect dend[i](0), dend[i-1](1)
connect dend[117](0), dend[115](1)
connect dend[118](0), dend[114](1)
basic_shape()
}
proc shape3d_1() {
dummy {pt3dclear()
pt3dadd(-1000, 0, 0, 0.000002)
pt3dadd(-1000, -0.000001, -0.000001, 0.000002)
}
soma {pt3dclear()
pt3dadd(0, 0, 0, 23.88)
pt3dadd(-1.02, -0.06, -0.5, 23.84)
pt3dadd(0, 0.97, -1, 23.78)
pt3dadd(-1.14, 0.54, -1.5, 23.56)
pt3dadd(-0.94, 1.94, -2, 23.5)
pt3dadd(-0.95, 0.84, -2.5, 23.56)
pt3dadd(0.72, 0.42, -3, 23.54)
pt3dadd(-2.35, 1.99, -3.5, 23.74)
pt3dadd(-3.22, 3.22, -4, 23.58)
pt3dadd(-4.07, 3.1, -4.5, 21.84)
pt3dadd(-4.89, 4.42, -5, 20.68)
pt3dadd(-4.93, 5.36, -5.5, 19.786)
pt3dadd(-5.66, 6.4, -6, 18.246)
pt3dadd(-5.76, 8.48, -6.5, 16.296)
pt3dadd(-6.53, 7.99, -7, 15.12)
pt3dadd(-6.62, 10.02, -7.5, 10.954)
}
soma[1] {pt3dclear()
pt3dadd(0, 0, 0, 23.88)
pt3dadd(0.42, 0.7, 0.5, 23.76)
pt3dadd(0.77, 1.57, 1, 23.52)
pt3dadd(2.13, 2.26, 1.5, 23.02)
pt3dadd(1.34, 2.29, 2, 22.94)
pt3dadd(-0.07, 1.62, 2.5, 22.74)
pt3dadd(-0.1, 2.42, 3, 22.18)
pt3dadd(0.63, 2.13, 3.5, 21.8)
pt3dadd(-0.26, 1.72, 4, 21.44)
pt3dadd(-0.34, 2.31, 4.5, 20.78)
pt3dadd(-1.58, 2.82, 5, 19.932)
pt3dadd(-0.52, 2.43, 5.5, 19.55)
pt3dadd(-0.94, 2.88, 6, 18.936)
pt3dadd(-1.88, 3.3, 6.5, 18.18)
pt3dadd(-1.89, 2.11, 7, 17.044)
pt3dadd(-2.73, 1.42, 7.5, 16.624)
pt3dadd(-2.7, 2.05, 8, 16.45)
}
dend {pt3dclear()
pt3dadd(-2.7, 2.05, 8, 8.61)
pt3dadd(-7.56, 13.25, -6.5, 8.61)
pt3dadd(-8.8, 15.06, -7, 7.16)
pt3dadd(-10.06, 18.24, -7, 7.74)
pt3dadd(-12.9, 19.69, -7.5, 8.81)
pt3dadd(-15.62, 21.38, -7.5, 10.26)
}
dend[1] {pt3dclear()
pt3dadd(-15.62, 21.38, -7.5, 10.26)
pt3dadd(-16.76, 23.45, -7, 8.42)
pt3dadd(-17.94, 24.77, -7, 8.57)
pt3dadd(-18.97, 26.41, -7, 9.78)
pt3dadd(-20.7, 27.3, -7, 10.26)
pt3dadd(-20.92, 27.57, -7, 9.82)
pt3dadd(-22.15, 29.05, -7, 9.82)
pt3dadd(-23.5, 30.28, -7, 10.26)
}
dend[2] {pt3dclear()
pt3dadd(-23.5, 30.28, -7, 10.26)
pt3dadd(-24.08, 32.36, -7, 8.28)
pt3dadd(-24.89, 32.81, -7.5, 8.08)
pt3dadd(-24.97, 33.73, -7.5, 7.69)
pt3dadd(-25.26, 35, -7.5, 7.55)
pt3dadd(-25.57, 36.05, -7.5, 7.31)
pt3dadd(-25.89, 37.37, -6.5, 6.68)
pt3dadd(-26.12, 38.21, -6.5, 6.68)
pt3dadd(-26.12, 39.33, -6.5, 6.73)
pt3dadd(-26.34, 39.66, -7, 7.02)
pt3dadd(-26.9, 40.95, -7, 6.87)
}
dend[3] {pt3dclear()
pt3dadd(-26.9, 40.95, -7, 6.87)
pt3dadd(-28.34, 42.61, -7, 6.97)
pt3dadd(-29.45, 43.84, -7, 7.45)
pt3dadd(-30.78, 45.32, -6, 7.16)
pt3dadd(-32.11, 45.15, -7, 7.4)
pt3dadd(-33.1, 46.59, -6.5, 8.23)
pt3dadd(-34.15, 47.89, -6.5, 8.95)
pt3dadd(-34.74, 49.04, -6.5, 9.78)
}
dend[4] {pt3dclear()
pt3dadd(-34.74, 49.04, -6.5, 9.78)
pt3dadd(-37.11, 48.16, -6, 6.44)
pt3dadd(-37.3, 48.42, -6, 6.39)
pt3dadd(-38.02, 48.51, -6, 6.1)
pt3dadd(-38.41, 48.52, -5.5, 5.47)
pt3dadd(-39.15, 48.56, -5.5, 4.94)
pt3dadd(-40.08, 48.57, -5.5, 3.97)
pt3dadd(-40.63, 48.8, -5.5, 3.34)
pt3dadd(-41.41, 49.13, -5.5, 2.95)
pt3dadd(-42.22, 49.29, -5.5, 2.95)
pt3dadd(-43.08, 49.45, -5.5, 3.1)
pt3dadd(-44.38, 49.5, -5.5, 4.4)
pt3dadd(-45.62, 49.46, -5.5, 5.47)
pt3dadd(-46.04, 49.57, -5.5, 6.1)
}
dend[5] {pt3dclear()
pt3dadd(-46.04, 49.57, -5.5, 6.1)
pt3dadd(-46.21, 50.86, -5.5, 5.13)
pt3dadd(-46.36, 51.66, -5.5, 4.5)
pt3dadd(-46.5, 52.06, -5.5, 4.02)
pt3dadd(-46.6, 52.18, -5, 3.68)
pt3dadd(-47.08, 52.55, -5, 2.61)
pt3dadd(-47.51, 53.13, -5, 1.55)
pt3dadd(-47.8, 53.82, -5, 0.92)
pt3dadd(-47.92, 54.13, -4.5, 0.73)
pt3dadd(-48.02, 54.51, -4.5, 0.68)
pt3dadd(-48.22, 54.88, -4.5, 0.68)
pt3dadd(-48.51, 55.45, -4.5, 0.68)
pt3dadd(-48.72, 56.01, -4.5, 0.75)
pt3dadd(-48.97, 56.56, -4.5, 0.9)
pt3dadd(-49.2, 56.96, -4.5, 0.99)
pt3dadd(-49.26, 57.13, -4.5, 1.11)
pt3dadd(-49.51, 57.5, -4.5, 1.19)
pt3dadd(-49.6, 57.74, -4.5, 1.23)
pt3dadd(-50.23, 58.35, -4.5, 1.19)
pt3dadd(-50.58, 58.58, -4.5, 1.28)
pt3dadd(-50.84, 58.89, -4.5, 1.36)
pt3dadd(-51.11, 59.12, -4, 1.5)
pt3dadd(-51.61, 59.46, -4, 1.57)
pt3dadd(-52.19, 59.86, -4.5, 2.15)
pt3dadd(-52.56, 60.27, -4.5, 2.4)
pt3dadd(-52.89, 60.5, -4.5, 2.71)
pt3dadd(-53.37, 60.72, -4.5, 2.98)
pt3dadd(-53.78, 60.99, -4.5, 3.07)
pt3dadd(-54.2, 61.14, -4.5, 3.15)
pt3dadd(-54.44, 61.33, -4.5, 3.17)
pt3dadd(-54.84, 61.64, -4.5, 3.12)
pt3dadd(-55.26, 61.96, -4.5, 3.1)
pt3dadd(-55.71, 62.21, -4.5, 2.93)
pt3dadd(-55.98, 62.25, -4.5, 2.78)
pt3dadd(-56.26, 62.29, -4.5, 2.64)
pt3dadd(-56.61, 62.54, -4.5, 2.35)
pt3dadd(-56.78, 62.72, -4.5, 1.96)
pt3dadd(-57.08, 62.89, -4.5, 1.62)
pt3dadd(-57.33, 63.13, -4.5, 1.11)
pt3dadd(-57.67, 63.4, -4.5, 0.75)
pt3dadd(-58.2, 63.46, -4.5, 0.63)
pt3dadd(-58.66, 63.49, -4.5, 0.63)
pt3dadd(-59.13, 63.5, -4.5, 0.63)
pt3dadd(-59.64, 63.65, -4.5, 0.63)
pt3dadd(-60.12, 64.11, -4.5, 0.63)
pt3dadd(-60.75, 64.61, -4.5, 0.63)
pt3dadd(-61.34, 65.13, -4.5, 0.63)
pt3dadd(-61.7, 65.41, -4.5, 0.6)
pt3dadd(-61.97, 65.52, -4.5, 0.63)
pt3dadd(-62.37, 65.56, -4.5, 0.68)
pt3dadd(-62.6, 65.56, -4.5, 0.77)
pt3dadd(-62.84, 65.74, -4.5, 0.73)
pt3dadd(-63.08, 65.96, -4.5, 0.68)
pt3dadd(-63.33, 66.19, -4.5, 0.65)
pt3dadd(-63.63, 66.41, -4.5, 0.65)
pt3dadd(-63.82, 66.6, -4.5, 0.63)
pt3dadd(-64.39, 66.99, -5, 0.6)
pt3dadd(-64.64, 67.14, -5, 0.63)
pt3dadd(-64.88, 67.31, -5, 0.65)
pt3dadd(-65.15, 67.58, -5, 0.68)
pt3dadd(-65.38, 68.08, -5, 0.82)
pt3dadd(-65.74, 68.82, -5, 1.33)
pt3dadd(-66.12, 69.4, -5, 2.27)
pt3dadd(-66.61, 69.77, -5, 3.07)
pt3dadd(-66.89, 69.91, -5, 3.02)
pt3dadd(-67.16, 70.3, -5, 2.83)
pt3dadd(-67.44, 70.74, -5, 2.83)
pt3dadd(-67.6, 70.8, -5, 2.93)
pt3dadd(-67.93, 71.05, -5.5, 3.56)
}
dend[6] {pt3dclear()
pt3dadd(-67.93, 71.05, -5.5, 3.56)
pt3dadd(-68.48, 72.12, -6, 4.04)
pt3dadd(-68.61, 72.43, -6, 4.21)
pt3dadd(-68.71, 72.63, -6, 4.09)
pt3dadd(-69.01, 72.9, -6, 3.87)
pt3dadd(-68.81, 73.23, -6, 3.8)
}
dend[7] {pt3dclear()
pt3dadd(-68.81, 73.23, -6, 3.8)
pt3dadd(-68.5, 74.04, -6, 3.17)
pt3dadd(-68.38, 74.34, -6, 3.07)
pt3dadd(-68.17, 74.82, -6, 2.56)
pt3dadd(-67.98, 75.05, -6, 2.03)
pt3dadd(-67.78, 75.54, -6, 1.69)
pt3dadd(-67.74, 75.9, -6, 1.19)
pt3dadd(-67.4, 76.14, -5.5, 0.77)
pt3dadd(-67.18, 76.56, -5.5, 0.48)
pt3dadd(-66.93, 76.91, -5.5, 0.53)
pt3dadd(-66.81, 77.31, -5.5, 0.63)
pt3dadd(-66.84, 77.62, -5.5, 0.68)
pt3dadd(-66.86, 78, -5.5, 0.65)
pt3dadd(-67.15, 78.48, -5.5, 0.63)
pt3dadd(-67.34, 79.1, -5.5, 0.6)
pt3dadd(-67.65, 79.7, -5.5, 0.63)
pt3dadd(-67.79, 80.45, -5.5, 0.56)
pt3dadd(-67.94, 80.83, -5.5, 0.51)
pt3dadd(-67.95, 81.56, -5.5, 0.51)
pt3dadd(-67.62, 82.31, -5.5, 0.51)
pt3dadd(-67.45, 82.77, -5.5, 0.51)
pt3dadd(-67.42, 83.43, -5.5, 0.51)
pt3dadd(-67.77, 84.18, -5.5, 0.51)
pt3dadd(-68.19, 84.61, -6, 0.65)
pt3dadd(-68.39, 85.27, -6, 1.23)
pt3dadd(-68.67, 85.97, -6, 1.23)
pt3dadd(-68.82, 86.69, -6, 1.45)
pt3dadd(-68.68, 87.38, -6, 2.03)
pt3dadd(-68.47, 87.92, -6, 2.49)
}
dend[8] {pt3dclear()
pt3dadd(-68.47, 87.92, -6, 2.49)
pt3dadd(-68.7, 88.2, -6, 2.49)
pt3dadd(-69.44, 89, -6, 0.56)
pt3dadd(-69.75, 89.36, -6, 0.56)
pt3dadd(-70.29, 89.59, -6, 0.53)
pt3dadd(-70.81, 89.73, -6, 0.51)
pt3dadd(-71.51, 89.88, -6, 0.51)
pt3dadd(-71.92, 89.94, -6, 0.51)
pt3dadd(-72.64, 90.07, -6.5, 0.51)
pt3dadd(-73.14, 90.25, -6.5, 0.51)
pt3dadd(-73.42, 90.88, -6.5, 0.46)
pt3dadd(-73.32, 91.63, -6.5, 0.36)
pt3dadd(-73.3, 92.69, -6.5, 0.36)
pt3dadd(-73.23, 93.48, -6.5, 0.56)
pt3dadd(-73.25, 93.93, -6.5, 1.23)
pt3dadd(-73.93, 94.2, -7, 1.81)
}
}
proc shape3d_2() {
dend[8] { pt3dadd(-74.65, 94.44, -7.5, 2.59)
pt3dadd(-75.4, 94.54, -7.5, 3.36)
pt3dadd(-76.15, 94.78, -7.5, 4.36)
pt3dadd(-76.44, 94.84, -7.5, 4.33)
pt3dadd(-76.71, 94.97, -7.5, 4.21)
pt3dadd(-76.83, 95.14, -7.5, 3.46)
pt3dadd(-76.97, 95.26, -7.5, 3.56)
pt3dadd(-78.23, 96.74, -7.5, 0.73)
pt3dadd(-78.94, 97.1, -8, 0.48)
pt3dadd(-79.14, 97.46, -8, 0.46)
pt3dadd(-79.39, 98.05, -8, 0.46)
pt3dadd(-79.53, 98.44, -8, 0.46)
pt3dadd(-80.06, 98.48, -8, 0.46)
pt3dadd(-80.76, 98.35, -8, 0.46)
pt3dadd(-81.42, 98.46, -8, 0.46)
pt3dadd(-82.34, 98.69, -8.5, 0.7)
pt3dadd(-83.02, 99, -8.5, 1.96)
pt3dadd(-83.74, 99.01, -8.5, 2.81)
pt3dadd(-83.82, 99.33, -8.5, 2.93)
pt3dadd(-84, 100.03, -9, 1.65)
pt3dadd(-84.47, 100.33, -9, 1.45)
pt3dadd(-84.69, 100.54, -9, 0.6)
pt3dadd(-85.2, 100.66, -10, 0.53)
pt3dadd(-85.71, 101.01, -10, 0.46)
pt3dadd(-85.98, 101.4, -10, 0.41)
pt3dadd(-86.39, 101.69, -10, 0.36)
pt3dadd(-86.59, 101.95, -10, 0.36)
pt3dadd(-87.26, 102.25, -10.5, 0.82)
pt3dadd(-87.77, 102.54, -10.5, 1.36)
pt3dadd(-88.09, 102.54, -10.5, 1.62)
pt3dadd(-88.49, 102.54, -10.5, 1.6)
pt3dadd(-88.79, 102.64, -10.5, 1.52)
pt3dadd(-89.22, 102.74, -10.5, 1.28)
pt3dadd(-89.55, 102.94, -10.5, 0.97)
pt3dadd(-89.9, 103.04, -10.5, 0.63)
pt3dadd(-90.35, 103.23, -10.5, 0.07)
pt3dadd(-90.89, 103.33, -10.5, 0.07)
pt3dadd(-91.47, 103.53, -10.5, 0.56)
pt3dadd(-91.71, 103.73, -10.5, 0.73)
pt3dadd(-92.21, 103.93, -10.5, 1.02)
pt3dadd(-92.56, 104.23, -10.5, 1.33)
pt3dadd(-92.89, 104.33, -10.5, 1.45)
pt3dadd(-93.03, 104.43, -10.5, 1.38)
pt3dadd(-93.3, 104.62, -10.5, 1.21)
pt3dadd(-93.58, 104.82, -10.5, 0.7)
pt3dadd(-94.35, 105.22, -11, 0.19)
pt3dadd(-94.75, 105.32, -11, 0.53)
pt3dadd(-95.1, 105.42, -11, 0.87)
pt3dadd(-95.43, 105.52, -11, 1.02)
}
dend[9] {pt3dclear()
pt3dadd(-68.47, 87.92, -6, 2.49)
pt3dadd(-67.99, 88.15, -6, 1.86)
pt3dadd(-67.91, 88.24, -6, 1.81)
pt3dadd(-67.79, 88.32, -6.5, 1.48)
pt3dadd(-67.5, 88.38, -6.5, 1.02)
pt3dadd(-67.02, 88.45, -6.5, 0.12)
pt3dadd(-66.26, 88.45, -6.5, 0.12)
pt3dadd(-65.71, 88.82, -6.5, 0.12)
pt3dadd(-65.23, 89.23, -7, 0.07)
pt3dadd(-64.99, 90.14, -7, 0.07)
pt3dadd(-64.71, 90.77, -7, 0.07)
pt3dadd(-64.49, 91.44, -7, 0.44)
pt3dadd(-64.33, 91.77, -7, 0.8)
pt3dadd(-64.29, 91.97, -7, 1.02)
pt3dadd(-64.46, 92.43, -7, 0.87)
}
dend[10] {pt3dclear()
pt3dadd(-68.81, 73.23, -6, 3.8)
pt3dadd(-70.99, 73.72, -6, 0.7)
pt3dadd(-71.36, 73.87, -6, 0.6)
pt3dadd(-71.56, 73.71, -6, 0.57)
pt3dadd(-72.05, 73.58, -6, 0.45)
pt3dadd(-72.54, 73.36, -6, 0.29)
pt3dadd(-73, 73.13, -6, 0.31)
pt3dadd(-73.39, 72.99, -6, 0.36)
pt3dadd(-73.89, 72.95, -6.5, 0.56)
pt3dadd(-74.14, 73.08, -6.5, 0.68)
pt3dadd(-74.45, 72.93, -6.5, 0.73)
pt3dadd(-74.74, 72.71, -6.5, 0.73)
pt3dadd(-75, 72.66, -6.5, 0.68)
pt3dadd(-75.32, 72.67, -6.5, 0.63)
pt3dadd(-75.64, 72.62, -6.5, 0.53)
pt3dadd(-75.8, 72.64, -6.5, 0.34)
pt3dadd(-76.19, 72.48, -6.5, 0.05)
pt3dadd(-76.79, 72.4, -6.5, 0.05)
pt3dadd(-77.2, 72.36, -6.5, 0.29)
pt3dadd(-77.78, 72.41, -6.5, 0.53)
pt3dadd(-78.12, 72.53, -6.5, 0.58)
pt3dadd(-78.65, 72.74, -6.5, 0.58)
pt3dadd(-79.09, 72.69, -6.5, 0.07)
pt3dadd(-79.74, 72.73, -6.5, 0.07)
pt3dadd(-80.16, 72.79, -6.5, 0.07)
pt3dadd(-80.67, 72.83, -6.5, 0.58)
pt3dadd(-81.16, 72.91, -6.5, 0.8)
pt3dadd(-81.77, 72.96, -7, 0.9)
pt3dadd(-82.16, 73.01, -7, 0.92)
pt3dadd(-82.77, 73.06, -7, 0.94)
pt3dadd(-83.19, 73.14, -7, 0.9)
}
dend[11] {pt3dclear()
pt3dadd(-67.93, 71.05, -5.5, 3.56)
pt3dadd(-68.94, 69.94, -6, 0.58)
pt3dadd(-69.24, 69.2, -6, 0.46)
pt3dadd(-69.48, 68.23, -6, 0.46)
pt3dadd(-70.3, 67.32, -6.5, 0.29)
pt3dadd(-70.87, 66.47, -6.5, 0.29)
pt3dadd(-71.5, 66.11, -6.5, 0.29)
pt3dadd(-71.89, 65.93, -6.5, 0.6)
pt3dadd(-72.33, 65.9, -6.5, 0.8)
pt3dadd(-72.7, 66.03, -6.5, 1.09)
pt3dadd(-72.98, 65.35, -6.5, 0.19)
pt3dadd(-73.87, 64.74, -6.5, 0.19)
pt3dadd(-74.39, 64.51, -6.5, 0.19)
pt3dadd(-74.69, 64.49, -6.5, 0.36)
pt3dadd(-74.98, 64.46, -6.5, 0.53)
pt3dadd(-75.28, 64.5, -6.5, 0.58)
}
dend[12] {pt3dclear()
pt3dadd(-46.04, 49.57, -5.5, 6.1)
pt3dadd(-46.42, 48.73, -5.5, 4.84)
pt3dadd(-47.34, 48.27, -5.5, 2.9)
pt3dadd(-48.93, 47.19, -5.5, 0.39)
pt3dadd(-50.89, 46.46, -5.5, 0.34)
pt3dadd(-51.71, 46.17, -5.5, 0.44)
pt3dadd(-53.03, 45.71, -5.5, 0.53)
pt3dadd(-54.31, 45.33, -5.5, 0.44)
pt3dadd(-55.02, 45.07, -5.5, 0.39)
pt3dadd(-55.74, 45.23, -5.5, 0.39)
pt3dadd(-56.5, 45.31, -5.5, 0.39)
pt3dadd(-57.02, 45.38, -5.5, 0.68)
pt3dadd(-58.74, 44.96, -5, 2.23)
pt3dadd(-59.61, 44.87, -5, 3)
pt3dadd(-60.31, 44.73, -5, 3.34)
pt3dadd(-61.26, 44.69, -5, 3.39)
pt3dadd(-61.64, 44.74, -5, 3.34)
pt3dadd(-62.15, 44.9, -5, 3.19)
}
dend[13] {pt3dclear()
pt3dadd(-62.15, 44.9, -5, 3.19)
pt3dadd(-63.38, 43.3, -5.5, 1.11)
pt3dadd(-63.45, 43.04, -5.5, 0.7)
pt3dadd(-63.5, 42.69, -5.5, 0.22)
pt3dadd(-63.59, 42.2, -5.5, 0.22)
pt3dadd(-63.64, 42.01, -5.5, 0.39)
pt3dadd(-63.8, 41.89, -5.5, 0.51)
pt3dadd(-63.95, 41.61, -5.5, 0.39)
pt3dadd(-64.17, 41.27, -5.5, 0.15)
pt3dadd(-64.52, 41.01, -5.5, 0.15)
pt3dadd(-64.81, 40.78, -5.5, 0.15)
pt3dadd(-64.89, 40.65, -5, 0.39)
pt3dadd(-65.04, 40.56, -5, 0.6)
pt3dadd(-65.29, 40.39, -5, 0.68)
pt3dadd(-65.43, 40.13, -5, 0.19)
pt3dadd(-65.53, 39.74, -5, 0.1)
pt3dadd(-65.57, 39.37, -5, 0.19)
pt3dadd(-65.54, 38.89, -5, 0.24)
pt3dadd(-65.34, 38.63, -5, 0.31)
pt3dadd(-65.17, 38.14, -5, 0.31)
pt3dadd(-65.15, 37.74, -5, 0.53)
pt3dadd(-65.07, 37.21, -5, 0.92)
pt3dadd(-65.1, 36.76, -5.5, 1.09)
pt3dadd(-65.06, 36.53, -5.5, 1.16)
pt3dadd(-65.11, 36.27, -5.5, 0.99)
pt3dadd(-65.07, 36.08, -5.5, 0.77)
pt3dadd(-65.11, 35.81, -5.5, 0.73)
pt3dadd(-65.21, 35.68, -5.5, 0.6)
pt3dadd(-65.28, 35.49, -5.5, 0.53)
pt3dadd(-65.59, 34.8, -5.5, 0.17)
pt3dadd(-65.7, 34.48, -5.5, 0.22)
pt3dadd(-65.93, 34.17, -5.5, 0.24)
pt3dadd(-66.27, 33.79, -5.5, 0.24)
pt3dadd(-66.63, 33.35, -5.5, 0.15)
pt3dadd(-66.76, 33.24, -5.5, 0.19)
pt3dadd(-67.05, 33.04, -5.5, 0.73)
pt3dadd(-67.3, 32.76, -5.5, 1.09)
pt3dadd(-67.71, 32.58, -5.5, 1.67)
pt3dadd(-68.08, 32.45, -5.5, 1.94)
pt3dadd(-68.43, 32.33, -5.5, 2.2)
pt3dadd(-68.64, 32.27, -5.5, 2.4)
pt3dadd(-68.86, 32.33, -5.5, 2.2)
}
dend[14] {pt3dclear()
pt3dadd(-68.86, 32.33, -5.5, 2.2)
pt3dadd(-69.1, 32.45, -5, 1.6)
pt3dadd(-69.52, 32.47, -5, 1.06)
pt3dadd(-69.75, 32.59, -5, 0.75)
pt3dadd(-69.96, 32.7, -5, 0.24)
pt3dadd(-70.28, 32.96, -5, 0.22)
pt3dadd(-70.45, 33.09, -5, 0.22)
pt3dadd(-70.77, 33.32, -5, 0.22)
pt3dadd(-70.97, 33.49, -5, 0.34)
pt3dadd(-71.25, 33.7, -5, 0.56)
pt3dadd(-71.33, 33.79, -5, 0.65)
pt3dadd(-71.23, 34.03, -5, 0.56)
pt3dadd(-71.28, 34.54, -5.5, 0.22)
pt3dadd(-71.27, 34.95, -5.5, 0.22)
pt3dadd(-71.34, 35.54, -5.5, 0.22)
pt3dadd(-71.67, 35.88, -5.5, 0.41)
pt3dadd(-71.49, 36.19, -5.5, 0.7)
pt3dadd(-71.37, 36.34, -5.5, 0.8)
pt3dadd(-71.24, 36.58, -5.5, 0.9)
}
dend[15] {pt3dclear()
pt3dadd(-68.86, 32.33, -5.5, 2.2)
pt3dadd(-68.69, 31.64, -5.5, 1.33)
pt3dadd(-68.92, 30.92, -5.5, 0.85)
pt3dadd(-69.23, 30.65, -5.5, 0.8)
pt3dadd(-69.33, 30.54, -5.5, 0.75)
pt3dadd(-69.58, 30.21, -5.5, 0.07)
pt3dadd(-69.93, 29.86, -5.5, 0.07)
pt3dadd(-70.28, 29.51, -5.5, 0.07)
pt3dadd(-70.49, 29.34, -5.5, 0.27)
pt3dadd(-70.69, 29.23, -5.5, 0.36)
}
}
proc shape3d_3() {
dend[15] { pt3dadd(-71.01, 28.96, -5.5, 0.41)
pt3dadd(-71.24, 28.77, -5.5, 0.36)
pt3dadd(-71.29, 28.37, -5.5, 0.19)
pt3dadd(-71.38, 27.86, -5.5, 0.19)
pt3dadd(-71.59, 27.47, -5.5, 0.41)
pt3dadd(-71.65, 27.05, -5.5, 0.85)
pt3dadd(-71.91, 26.86, -5.5, 0.94)
pt3dadd(-72, 26.7, -5.5, 0.9)
pt3dadd(-72.17, 26.58, -5.5, 0.65)
pt3dadd(-72.28, 26.18, -5.5, 0.02)
pt3dadd(-72.28, 25.71, -5.5, 0.02)
pt3dadd(-72.31, 25.09, -5.5, 1.09)
pt3dadd(-72.39, 24.73, -5.5, 1.48)
pt3dadd(-72.39, 24.46, -5.5, 1.55)
pt3dadd(-72.58, 23.82, -5.5, 1.6)
pt3dadd(-72.64, 23.43, -5.5, 1.55)
pt3dadd(-72.54, 23.11, -5.5, 1.45)
pt3dadd(-72.56, 22.8, -5.5, 1.48)
pt3dadd(-72.74, 22.51, -5.5, 1.23)
pt3dadd(-72.93, 22.26, -5.5, 0.97)
pt3dadd(-73.12, 22.07, -5.5, 0.56)
pt3dadd(-73.28, 21.97, -5.5, 0.46)
pt3dadd(-73.33, 21.57, -5.5, 0.31)
pt3dadd(-73.37, 21.16, -5.5, 0.31)
pt3dadd(-73.4, 20.72, -5.5, 0.31)
pt3dadd(-73.35, 20.29, -5.5, 0.51)
pt3dadd(-73.35, 20.04, -5.5, 0.58)
pt3dadd(-73.62, 19.79, -5.5, 0.65)
pt3dadd(-74, 19.62, -5.5, 0.73)
pt3dadd(-74.3, 19.6, -5.5, 0.77)
}
dend[16] {pt3dclear()
pt3dadd(-62.15, 44.9, -5, 3.19)
pt3dadd(-62.79, 45.4, -5, 1.89)
pt3dadd(-63.12, 45.66, -5, 1.45)
pt3dadd(-63.46, 45.85, -5, 1.06)
pt3dadd(-63.84, 45.95, -5, 0.82)
pt3dadd(-64.18, 45.89, -5, 0.68)
pt3dadd(-64.46, 45.75, -5, 0.58)
pt3dadd(-64.93, 45.67, -5, 0.53)
pt3dadd(-65.41, 45.55, -5, 0.6)
pt3dadd(-65.92, 45.48, -5, 0.7)
pt3dadd(-66.38, 45.54, -5, 0.8)
pt3dadd(-66.64, 45.47, -5, 1.02)
pt3dadd(-67.36, 45.67, -5, 1.5)
pt3dadd(-67.87, 45.67, -5, 1.72)
pt3dadd(-68.26, 45.69, -5, 1.84)
pt3dadd(-68.66, 45.77, -5, 1.91)
pt3dadd(-68.98, 45.76, -5, 1.91)
pt3dadd(-69.37, 45.88, -5, 1.91)
pt3dadd(-69.66, 45.98, -5, 1.84)
pt3dadd(-69.96, 46.08, -5, 1.79)
pt3dadd(-70.32, 46.21, -5, 1.62)
pt3dadd(-70.69, 46.27, -5, 1.31)
pt3dadd(-71.06, 46.32, -5, 0.99)
pt3dadd(-71.42, 46.45, -5, 0.68)
pt3dadd(-71.85, 46.53, -5, 0.63)
pt3dadd(-72.17, 46.63, -5, 0.6)
pt3dadd(-72.67, 46.75, -5, 0.56)
pt3dadd(-73.11, 46.84, -5, 0.6)
pt3dadd(-73.55, 46.6, -5, 0.9)
pt3dadd(-74.34, 46.35, -5, 1.94)
pt3dadd(-75.29, 46.21, -5, 2.47)
pt3dadd(-76.07, 46.12, -5, 3.17)
pt3dadd(-76.34, 46.08, -5, 3.24)
pt3dadd(-77.52, 45.87, -5.5, 4.33)
pt3dadd(-78.31, 45.8, -5.5, 4.38)
pt3dadd(-78.94, 45.54, -5.5, 4.5)
pt3dadd(-79.02, 45.63, -5.5, 4.28)
}
dend[17] {pt3dclear()
pt3dadd(-79.02, 45.63, -5.5, 4.28)
pt3dadd(-79.76, 45.79, -5, 2.93)
pt3dadd(-80.22, 45.72, -5, 2.37)
pt3dadd(-80.62, 45.47, -5, 1.69)
pt3dadd(-81.09, 45.23, -4.5, 0.85)
pt3dadd(-81.58, 45.17, -4.5, 0.77)
pt3dadd(-82, 45.17, -4.5, 0.75)
pt3dadd(-82.64, 45.05, -4.5, 0.73)
pt3dadd(-83.13, 44.92, -4.5, 0.73)
pt3dadd(-83.66, 44.88, -4.5, 0.82)
pt3dadd(-84.32, 44.73, -4.5, 0.97)
pt3dadd(-84.89, 44.91, -4.5, 1.06)
pt3dadd(-85.2, 45, -4.5, 1.11)
pt3dadd(-85.44, 45.1, -4.5, 1.09)
pt3dadd(-85.87, 45.31, -4.5, 1.04)
pt3dadd(-86.43, 45.44, -4.5, 0.97)
pt3dadd(-86.9, 45.71, -4.5, 0.82)
pt3dadd(-87.49, 45.9, -4.5, 0.51)
pt3dadd(-87.92, 45.96, -4.5, 0.51)
pt3dadd(-88.41, 46.03, -4.5, 0.56)
pt3dadd(-88.97, 45.96, -4.5, 0.63)
pt3dadd(-89.59, 45.82, -4.5, 0.68)
pt3dadd(-89.97, 45.59, -4.5, 0.77)
pt3dadd(-90.59, 45.31, -4.5, 0.87)
pt3dadd(-90.86, 45.05, -4.5, 0.87)
pt3dadd(-91.97, 44.34, -4.5, 2.93)
pt3dadd(-93.09, 43.98, -4.5, 3.7)
}
dend[18] {pt3dclear()
pt3dadd(-93.09, 43.98, -4.5, 3.7)
pt3dadd(-93.6, 43.01, -4.5, 2.27)
pt3dadd(-93.57, 42.55, -4.5, 1.81)
pt3dadd(-94.17, 41.96, -4.5, 0.31)
pt3dadd(-94.5, 41.82, -4.5, 0.31)
pt3dadd(-94.85, 41.57, -4.5, 0.48)
pt3dadd(-95.25, 41.38, -4.5, 0.9)
pt3dadd(-95.4, 41.12, -4.5, 1.19)
pt3dadd(-95.56, 40.82, -4.5, 1.21)
pt3dadd(-95.66, 40.45, -4.5, 0.99)
pt3dadd(-95.79, 40.32, -4.5, 0.44)
pt3dadd(-95.92, 40.07, -4.5, 0.36)
pt3dadd(-96.08, 39.84, -4.5, 0.36)
pt3dadd(-96.38, 39.52, -4.5, 0.51)
pt3dadd(-96.66, 39.24, -4.5, 0.7)
pt3dadd(-96.95, 38.93, -4.5, 1.09)
pt3dadd(-97.09, 38.88, -4.5, 1.06)
pt3dadd(-97.51, 38.83, -4.5, 0.9)
pt3dadd(-97.68, 38.82, -4.5, 0.8)
}
dend[19] {pt3dclear()
pt3dadd(-93.09, 43.98, -4.5, 3.7)
pt3dadd(-93.44, 44.83, -4.5, 2.23)
pt3dadd(-93.41, 45.14, -4.5, 2.08)
pt3dadd(-93.31, 45.35, -4.5, 1.86)
pt3dadd(-93.38, 45.61, -4.5, 1.31)
pt3dadd(-93.24, 46.1, -4.5, 0.73)
pt3dadd(-93.17, 46.64, -4.5, 0.65)
pt3dadd(-93.44, 47.35, -4.5, 0.65)
pt3dadd(-93.51, 47.68, -4, 0.65)
pt3dadd(-93.98, 48.07, -4.5, 0.41)
pt3dadd(-94.46, 48.46, -4.5, 0.34)
pt3dadd(-94.93, 48.72, -4.5, 0.31)
pt3dadd(-95.62, 49.07, -4.5, 0.27)
pt3dadd(-95.7, 49.47, -4.5, 0.27)
pt3dadd(-95.95, 50.07, -4.5, 0.27)
pt3dadd(-96.31, 50.26, -4.5, 0.27)
pt3dadd(-96.76, 50.45, -4.5, 0.27)
pt3dadd(-96.91, 50.92, -4.5, 0.27)
pt3dadd(-97.01, 51.81, -4.5, 0.27)
pt3dadd(-97.26, 52.54, -4.5, 0.27)
pt3dadd(-97.58, 53.12, -4.5, 0.75)
pt3dadd(-97.94, 53.4, -4.5, 1.28)
pt3dadd(-98.28, 53.79, -4.5, 1.69)
pt3dadd(-98.51, 54.12, -4.5, 1.89)
pt3dadd(-98.69, 54.37, -4.5, 1.91)
pt3dadd(-98.97, 54.45, -4.5, 1.84)
pt3dadd(-99.23, 54.63, -4.5, 1.74)
pt3dadd(-99.62, 54.85, -4.5, 1.43)
}
dend[20] {pt3dclear()
pt3dadd(-79.02, 45.63, -5.5, 4.28)
pt3dadd(-78.78, 44.39, -5, 2.61)
pt3dadd(-78.9, 44.02, -5, 2.25)
pt3dadd(-79.22, 43.56, -5, 1.86)
pt3dadd(-79.18, 43.1, -5, 1.45)
pt3dadd(-79.4, 42.72, -5.5, 0.63)
pt3dadd(-79.48, 42.3, -5.5, 0.15)
pt3dadd(-79.6, 41.64, -5.5, 0.15)
pt3dadd(-79.8, 41.45, -5.5, 0.34)
pt3dadd(-79.9, 41.27, -5.5, 0.46)
pt3dadd(-80.05, 40.98, -5.5, 0.53)
pt3dadd(-80.29, 40.68, -5.5, 0.53)
pt3dadd(-80.4, 40.41, -5.5, 0.53)
pt3dadd(-80.44, 40.06, -5.5, 0.19)
pt3dadd(-80.59, 39.77, -5.5, 0.15)
pt3dadd(-80.74, 39.52, -5.5, 0.34)
pt3dadd(-81.1, 39.27, -5.5, 0.7)
pt3dadd(-81.33, 39.01, -5.5, 0.94)
pt3dadd(-81.54, 38.82, -6, 1.04)
pt3dadd(-81.62, 38.44, -6, 0.82)
pt3dadd(-81.85, 38.01, -6, 0.34)
pt3dadd(-82.08, 37.42, -6, 0.34)
pt3dadd(-82.46, 36.75, -6, 0.34)
pt3dadd(-82.8, 36.2, -6, 0.34)
pt3dadd(-83.08, 35.73, -6, 0.41)
pt3dadd(-83.07, 35.4, -6, 0.51)
pt3dadd(-83.34, 35.01, -6, 0.7)
pt3dadd(-83.43, 34.66, -6, 0.8)
pt3dadd(-83.58, 34.36, -6, 0.87)
pt3dadd(-83.68, 34.11, -6, 0.97)
pt3dadd(-83.95, 33.86, -6, 1.14)
pt3dadd(-84.19, 33.77, -6, 1.06)
pt3dadd(-84.36, 33.57, -5.5, 0.82)
pt3dadd(-84.62, 33.35, -5.5, 0.51)
pt3dadd(-84.97, 33.02, -5.5, 0.12)
pt3dadd(-85.37, 32.74, -5.5, 0.02)
pt3dadd(-85.89, 32.53, -5.5, 0.02)
pt3dadd(-86.28, 32.18, -5.5, 0.02)
pt3dadd(-86.45, 31.98, -5.5, 0.02)
pt3dadd(-86.56, 31.86, -5.5, 0.36)
pt3dadd(-86.72, 31.65, -5.5, 0.58)
pt3dadd(-86.98, 31.63, -5.5, 0.53)
pt3dadd(-87.4, 31.64, -5.5, 0.1)
pt3dadd(-88, 31.48, -5.5, 0.1)
pt3dadd(-88.28, 31, -5.5, 0.1)
pt3dadd(-88.31, 30.7, -5.5, 0.41)
pt3dadd(-88.33, 30.28, -5.5, 0.6)
pt3dadd(-88.67, 29.85, -5.5, 0.7)
pt3dadd(-88.91, 29.38, -5.5, 0.8)
pt3dadd(-89.44, 29.27, -5.5, 0.02)
pt3dadd(-90.15, 28.91, -5.5, 0.02)
pt3dadd(-90.97, 28.4, -5.5, 0.02)
pt3dadd(-91.28, 27.99, -5, 0.31)
pt3dadd(-91.39, 27.56, -5, 0.56)
pt3dadd(-91.68, 27.14, -5, 0.75)
pt3dadd(-91.91, 27.23, -5, 0.94)
pt3dadd(-92.19, 27.33, -5, 1.02)
pt3dadd(-92.56, 27.71, -5, 0.92)
pt3dadd(-92.79, 27.71, -5, 0.7)
}
}
proc shape3d_4() {
dend[20] { pt3dadd(-93.03, 27.4, -5, 0.24)
pt3dadd(-93.31, 27.18, -5, 0.24)
pt3dadd(-93.43, 26.97, -5, 0.53)
pt3dadd(-93.57, 26.62, -5, 0.82)
pt3dadd(-93.86, 26.35, -5, 1.09)
pt3dadd(-94.19, 26.21, -5, 1.16)
pt3dadd(-94.38, 26.23, -5, 1.06)
}
dend[21] {pt3dclear()
pt3dadd(-34.74, 49.04, -6.5, 9.78)
pt3dadd(-34.91, 49.59, -5.5, 6.78)
pt3dadd(-34.35, 50.73, -5.5, 5.95)
pt3dadd(-33.91, 51.36, -5.5, 5.71)
pt3dadd(-33.57, 51.86, -5.5, 5.86)
pt3dadd(-33.48, 52.1, -5.5, 5.95)
pt3dadd(-33.79, 52.48, -5.5, 5.01)
pt3dadd(-34, 52.82, -5.5, 4.14)
pt3dadd(-33.87, 53.75, -5.5, 2.78)
pt3dadd(-33.96, 54.55, -5.5, 1.38)
pt3dadd(-33.82, 55.21, -5, 0.92)
pt3dadd(-33.77, 55.76, -5, 0.77)
pt3dadd(-34.09, 56.39, -5.5, 0.99)
pt3dadd(-34.42, 56.9, -5.5, 1.28)
pt3dadd(-34.49, 57.22, -5.5, 1.43)
pt3dadd(-34.37, 57.66, -5.5, 1.36)
pt3dadd(-34.37, 58.03, -5.5, 1.28)
pt3dadd(-34.64, 58.75, -5.5, 1.09)
pt3dadd(-34.69, 59.42, -5.5, 0.82)
pt3dadd(-34.89, 59.87, -5.5, 0.8)
pt3dadd(-35.21, 61.12, -6, 0.48)
pt3dadd(-35.11, 62.09, -6, 0.65)
pt3dadd(-35.25, 63.08, -6, 1.96)
pt3dadd(-35.37, 63.6, -6, 2.32)
pt3dadd(-35.51, 63.88, -6, 2.61)
pt3dadd(-35.57, 64.7, -6, 2.69)
pt3dadd(-35.48, 65.23, -6, 2.71)
pt3dadd(-35.4, 65.66, -6, 2.71)
pt3dadd(-35.37, 66.35, -6, 3.27)
pt3dadd(-35.5, 67.56, -6, 3.94)
pt3dadd(-35.78, 68.64, -6, 4.26)
pt3dadd(-36.39, 68.97, -6, 5.25)
pt3dadd(-36.69, 69.39, -6, 4.79)
pt3dadd(-36.93, 69.91, -6, 4.48)
pt3dadd(-36.98, 70.14, -5.5, 4.45)
}
dend[22] {pt3dclear()
pt3dadd(-36.98, 70.14, -5.5, 4.45)
pt3dadd(-37.53, 70.99, -5.5, 3.46)
pt3dadd(-37.64, 71.07, -5.5, 3.24)
pt3dadd(-37.78, 71.22, -5.5, 3.12)
pt3dadd(-37.93, 71.4, -5.5, 2.9)
pt3dadd(-38.07, 71.64, -5.5, 2.56)
pt3dadd(-38.19, 71.93, -5.5, 2.25)
pt3dadd(-38.41, 72.21, -5.5, 1.72)
pt3dadd(-38.55, 72.47, -5.5, 1.36)
pt3dadd(-38.66, 72.64, -5.5, 1.29)
pt3dadd(-38.75, 72.82, -5.5, 1.17)
pt3dadd(-38.98, 73.03, -5.5, 0.98)
pt3dadd(-39.18, 73.25, -5.5, 0.92)
pt3dadd(-39.36, 73.62, -5.5, 0.86)
pt3dadd(-39.73, 74.04, -5.5, 0.86)
pt3dadd(-39.94, 74.31, -5.5, 0.9)
pt3dadd(-40.25, 74.55, -5.5, 0.92)
pt3dadd(-40.53, 74.9, -5.5, 0.94)
pt3dadd(-40.88, 75.32, -5.5, 1.03)
pt3dadd(-41.15, 75.63, -5.5, 1.13)
pt3dadd(-41.47, 75.98, -5.5, 1.43)
pt3dadd(-42.05, 76.56, -5.5, 1.77)
pt3dadd(-42.33, 76.79, -5.5, 1.97)
pt3dadd(-42.6, 77.1, -5.5, 2.14)
pt3dadd(-43.01, 77.31, -5.5, 2.24)
pt3dadd(-43.35, 77.64, -5.5, 2.27)
pt3dadd(-43.5, 77.83, -5.5, 2.31)
pt3dadd(-43.55, 78.05, -5.5, 2.34)
pt3dadd(-43.73, 78.23, -5.5, 2.3)
pt3dadd(-43.82, 78.39, -5.5, 2.26)
pt3dadd(-43.94, 78.54, -5.5, 2.18)
pt3dadd(-44.06, 78.83, -5.5, 1.92)
pt3dadd(-44.15, 78.98, -5.5, 1.81)
pt3dadd(-44.19, 79.14, -5.5, 1.54)
pt3dadd(-44.32, 79.24, -5.5, 1.42)
pt3dadd(-44.47, 79.42, -5.5, 1.23)
pt3dadd(-44.63, 79.61, -6, 1.13)
pt3dadd(-44.78, 79.75, -6, 0.83)
pt3dadd(-44.94, 79.99, -6, 0.5)
pt3dadd(-45.15, 80.14, -6, 0.48)
pt3dadd(-45.32, 80.31, -6, 0.54)
pt3dadd(-45.71, 80.59, -6, 0.82)
pt3dadd(-45.7, 80.8, -6, 0.86)
pt3dadd(-45.63, 81.04, -6, 0.79)
pt3dadd(-45.63, 81.39, -6, 0.74)
pt3dadd(-45.71, 81.72, -6, 0.69)
pt3dadd(-45.85, 82.12, -6, 0.64)
pt3dadd(-46.05, 82.36, -6, 0.62)
pt3dadd(-46.27, 82.61, -6, 0.54)
pt3dadd(-46.73, 83.01, -6, 0.65)
pt3dadd(-46.97, 83.33, -6, 1.21)
pt3dadd(-47.32, 83.62, -6, 1.68)
pt3dadd(-47.51, 83.85, -6, 2)
pt3dadd(-47.84, 84.07, -6, 2.5)
pt3dadd(-48.02, 84.23, -6, 2.9)
pt3dadd(-48.15, 84.56, -6, 3.22)
pt3dadd(-48.49, 84.81, -6, 3.7)
pt3dadd(-48.99, 85.46, -6, 4.68)
}
dend[23] {pt3dclear()
pt3dadd(-48.99, 85.46, -6, 4.68)
pt3dadd(-50.58, 85.98, -6, 4.04)
pt3dadd(-51.25, 86.47, -6, 3.9)
pt3dadd(-51.78, 86.85, -6, 4.25)
pt3dadd(-52.41, 87.16, -6, 4.46)
pt3dadd(-52.25, 88.11, -6, 4.62)
pt3dadd(-52.51, 88.17, -6, 4.19)
pt3dadd(-53.03, 88.44, -6, 3.45)
pt3dadd(-53.12, 88.79, -6, 2.76)
pt3dadd(-53.43, 89.49, -6.5, 1.69)
pt3dadd(-53.58, 89.76, -6.5, 1.42)
pt3dadd(-53.68, 90.14, -6.5, 1.04)
pt3dadd(-53.7, 90.46, -6.5, 0.86)
pt3dadd(-53.74, 90.74, -6.5, 0.8)
pt3dadd(-53.91, 91.05, -6.5, 0.74)
pt3dadd(-54.24, 91.38, -6.5, 0.7)
pt3dadd(-54.52, 91.7, -6.5, 0.69)
pt3dadd(-54.85, 91.9, -6.5, 0.76)
pt3dadd(-55.1, 92.15, -6.5, 1.05)
pt3dadd(-55.37, 92.34, -6.5, 1.51)
pt3dadd(-55.84, 92.63, -6.5, 1.67)
pt3dadd(-55.99, 92.96, -6.5, 1.85)
pt3dadd(-56.14, 93.22, -6.5, 1.95)
pt3dadd(-56.33, 93.43, -6.5, 2)
pt3dadd(-56.66, 93.63, -6.5, 1.98)
pt3dadd(-56.84, 93.9, -6.5, 1.94)
pt3dadd(-57, 94.04, -6.5, 1.91)
pt3dadd(-57.05, 94.25, -6.5, 1.79)
pt3dadd(-57.01, 94.58, -6.5, 1.61)
pt3dadd(-57.2, 94.66, -6.5, 1.55)
pt3dadd(-57.04, 94.94, -6.5, 1.44)
pt3dadd(-57.25, 95.19, -6.5, 1.42)
pt3dadd(-57.25, 95.41, -6.5, 1.37)
pt3dadd(-57.23, 95.57, -6.5, 1.29)
pt3dadd(-57.43, 95.8, -6.5, 1.19)
pt3dadd(-57.45, 95.91, -6.5, 0.96)
pt3dadd(-57.48, 96.1, -6.5, 0.83)
pt3dadd(-57.54, 96.35, -6.5, 0.71)
pt3dadd(-57.68, 96.63, -6.5, 0.6)
pt3dadd(-57.69, 96.94, -6.5, 0.56)
pt3dadd(-57.6, 97.47, -6.5, 0.41)
pt3dadd(-57.57, 97.81, -6.5, 0.46)
pt3dadd(-57.54, 98.03, -6.5, 0.65)
pt3dadd(-57.55, 98.32, -6.5, 0.85)
pt3dadd(-57.61, 98.66, -6.5, 0.96)
pt3dadd(-57.58, 98.92, -6.5, 0.99)
pt3dadd(-57.6, 99.13, -6.5, 0.96)
pt3dadd(-57.67, 99.37, -6.5, 0.96)
pt3dadd(-57.68, 99.62, -7, 0.73)
pt3dadd(-57.75, 99.81, -7, 0.53)
pt3dadd(-57.89, 100.12, -7, 0.38)
pt3dadd(-57.97, 100.35, -7, 0.41)
pt3dadd(-58.04, 100.7, -7, 0.45)
pt3dadd(-58.27, 101.11, -7, 0.5)
pt3dadd(-58.42, 101.72, -7, 1.09)
pt3dadd(-58.62, 102.05, -7, 1.36)
pt3dadd(-58.98, 103.25, -7, 2.03)
pt3dadd(-59.14, 103.95, -7, 2.13)
pt3dadd(-59.48, 104.44, -7, 2.52)
pt3dadd(-59.73, 105.04, -7, 2.9)
pt3dadd(-59.6, 106.44, -7, 3.87)
pt3dadd(-59.84, 107.04, -7, 4.4)
pt3dadd(-59.14, 107.45, -7, 4.98)
}
dend[24] {pt3dclear()
pt3dadd(-59.14, 107.45, -7, 4.98)
pt3dadd(-60.23, 108.24, -7, 3.56)
pt3dadd(-60.55, 108.54, -7, 3.27)
pt3dadd(-60.71, 108.64, -7, 2.86)
pt3dadd(-61.11, 108.94, -7, 2.52)
pt3dadd(-61.69, 109.24, -7, 1.96)
pt3dadd(-61.82, 109.34, -7, 1.74)
pt3dadd(-62.14, 109.63, -7, 1.23)
pt3dadd(-62.32, 110.23, -7, 0.29)
pt3dadd(-62.26, 110.73, -7.5, 0.46)
pt3dadd(-62.39, 111.13, -7.5, 0.8)
pt3dadd(-62.31, 111.43, -7.5, 1.02)
pt3dadd(-62.24, 111.73, -7.5, 1.09)
pt3dadd(-62.38, 112.03, -7.5, 1.16)
pt3dadd(-62.49, 112.33, -7.5, 1.16)
pt3dadd(-62.56, 112.73, -7.5, 0.97)
pt3dadd(-62.74, 112.63, -7.5, 0.6)
pt3dadd(-63.11, 113.13, -7.5, 0.53)
pt3dadd(-63.59, 113.33, -7.5, 0.46)
pt3dadd(-64.11, 113.73, -7.5, 0.46)
pt3dadd(-64.71, 114.23, -7.5, 0.34)
pt3dadd(-65.13, 114.52, -7.5, 0.06)
pt3dadd(-65.72, 115.02, -7.5, 0.06)
pt3dadd(-66.22, 115.32, -7.5, 0.21)
pt3dadd(-66.53, 115.62, -7.5, 0.6)
pt3dadd(-66.75, 116.02, -7.5, 0.99)
pt3dadd(-67.07, 116.22, -7.5, 1.21)
pt3dadd(-67.52, 116.52, -7.5, 1.4)
pt3dadd(-68, 116.71, -7.5, 1.6)
pt3dadd(-68.3, 116.91, -7.5, 1.65)
pt3dadd(-68.58, 117.11, -7.5, 1.6)
pt3dadd(-68.78, 117.41, -7.5, 1.62)
pt3dadd(-69.18, 117.81, -7.5, 1.6)
pt3dadd(-69.62, 118.01, -7.5, 1.5)
}
dend[25] {pt3dclear()
pt3dadd(-59.14, 107.45, -7, 4.98)
pt3dadd(-58.63, 107.55, -7, 4.6)
pt3dadd(-58.68, 108.05, -7, 4.09)
}
}
proc shape3d_5() {
dend[25] { pt3dadd(-58.62, 108.25, -7, 3.53)
pt3dadd(-58.36, 108.55, -7, 3.1)
pt3dadd(-58.19, 108.65, -7, 2.64)
pt3dadd(-57.93, 109.05, -7, 1.96)
pt3dadd(-57.53, 109.35, -7, 0.97)
pt3dadd(-56.9, 109.95, -7, 0.48)
pt3dadd(-56.52, 110.45, -7, 0.46)
pt3dadd(-56.07, 111.16, -7, 0.46)
pt3dadd(-55.9, 111.56, -7, 0.63)
pt3dadd(-55.72, 111.96, -7, 0.73)
pt3dadd(-55.36, 112.36, -7, 0.77)
pt3dadd(-55.22, 112.66, -7, 0.17)
pt3dadd(-54.78, 113.06, -7, 0.17)
pt3dadd(-54.34, 113.56, -7, 0.17)
pt3dadd(-54.01, 114.26, -7, 0.17)
pt3dadd(-53.74, 114.66, -7, 0.58)
pt3dadd(-53.61, 115.07, -7, 0.75)
pt3dadd(-53.52, 115.37, -7, 0.82)
pt3dadd(-53.21, 115.77, -7, 0.77)
pt3dadd(-52.73, 116.17, -7, 0.17)
pt3dadd(-52.38, 116.67, -7, 0.15)
pt3dadd(-52.2, 117.27, -7, 0.15)
pt3dadd(-52.14, 117.97, -7, 0.15)
pt3dadd(-52.15, 118.17, -7, 0.22)
pt3dadd(-52.12, 118.47, -7, 0.53)
pt3dadd(-52.08, 119.07, -7.5, 1.21)
pt3dadd(-52.03, 119.47, -7.5, 1.31)
pt3dadd(-51.89, 119.67, -7.5, 1.38)
pt3dadd(-52.09, 120.07, -8, 1.43)
pt3dadd(-51.77, 120.87, -8.5, 1.4)
pt3dadd(-51.69, 121.37, -8.5, 1.28)
pt3dadd(-51.58, 121.57, -9, 1.04)
pt3dadd(-51.44, 122.07, -9, 0.92)
pt3dadd(-50.67, 123.08, -9.5, 0.24)
pt3dadd(-50.04, 124.18, -9.5, 0.24)
pt3dadd(-49.2, 125.38, -9.5, 0.12)
pt3dadd(-48.8, 125.68, -9.5, 0.65)
pt3dadd(-48.63, 126.38, -9.5, 1.81)
pt3dadd(-48.53, 126.68, -9.5, 2.01)
pt3dadd(-48.41, 127.08, -9.5, 2.08)
pt3dadd(-48.36, 127.18, -9.5, 2.35)
pt3dadd(-48.47, 127.28, -10, 2.3)
pt3dadd(-48.3, 127.48, -10, 1.96)
pt3dadd(-48.28, 127.58, -10, 1.6)
pt3dadd(-48.22, 127.78, -10, 1.48)
pt3dadd(-48.2, 127.88, -10, 1.43)
pt3dadd(-48.2, 128.48, -10, 0.05)
pt3dadd(-47.96, 129.19, -10, 0.05)
pt3dadd(-47.93, 129.59, -10, 0.05)
pt3dadd(-47.96, 130.09, -10, 0.31)
pt3dadd(-47.81, 130.59, -10, 0.6)
pt3dadd(-47.85, 130.69, -10.5, 0.68)
}
dend[26] {pt3dclear()
pt3dadd(-48.99, 85.46, -6, 4.68)
pt3dadd(-48.07, 86.33, -6, 3.21)
pt3dadd(-47.83, 86.4, -6, 2.98)
pt3dadd(-47.79, 86.52, -6, 2.55)
pt3dadd(-47.56, 86.82, -6, 2.01)
pt3dadd(-47.19, 86.98, -6, 1.39)
pt3dadd(-46.99, 87.11, -6, 0.98)
pt3dadd(-46.85, 87.34, -6, 0.76)
pt3dadd(-46.73, 87.54, -6, 0.68)
pt3dadd(-46.67, 87.76, -6, 0.59)
pt3dadd(-46.59, 87.93, -6, 0.47)
pt3dadd(-46.47, 88.12, -6, 0.35)
pt3dadd(-46.32, 88.25, -6, 0.29)
pt3dadd(-46.11, 88.32, -6, 0.24)
pt3dadd(-45.99, 88.43, -6, 0.19)
pt3dadd(-45.95, 88.7, -6, 0.19)
pt3dadd(-46, 88.94, -6, 0.21)
pt3dadd(-46.08, 89.18, -6, 0.23)
pt3dadd(-45.99, 89.5, -6, 0.51)
pt3dadd(-45.83, 89.64, -6, 0.64)
pt3dadd(-45.83, 89.86, -6, 0.69)
pt3dadd(-45.79, 90, -6, 0.71)
pt3dadd(-45.85, 90.2, -6, 0.7)
pt3dadd(-45.86, 90.35, -6, 0.68)
pt3dadd(-45.85, 90.46, -6, 0.52)
pt3dadd(-45.83, 90.58, -6, 0.25)
pt3dadd(-45.87, 90.75, -6, 0.21)
pt3dadd(-45.87, 90.99, -6, 0.22)
pt3dadd(-45.95, 91.26, -6, 0.22)
pt3dadd(-45.93, 91.59, -6, 0.07)
pt3dadd(-45.94, 91.8, -6, 0.12)
pt3dadd(-45.91, 92.01, -6, 0.29)
pt3dadd(-45.85, 92.28, -6, 0.34)
pt3dadd(-45.87, 92.44, -6, 0.36)
pt3dadd(-45.84, 92.7, -6, 0.35)
pt3dadd(-45.8, 92.93, -6, 0.3)
pt3dadd(-45.9, 92.99, -5.5, 0.29)
pt3dadd(-46, 93.14, -5.5, 0.11)
pt3dadd(-46.11, 93.32, -5.5, 0.15)
pt3dadd(-46.14, 93.64, -5.5, 0.27)
pt3dadd(-46.05, 94.2, -5.5, 1)
pt3dadd(-45.96, 94.69, -5.5, 1.48)
pt3dadd(-45.85, 94.93, -5.5, 1.74)
pt3dadd(-45.58, 95.17, -5.5, 1.84)
pt3dadd(-45.38, 95.27, -5.5, 1.88)
pt3dadd(-45.25, 95.43, -5.5, 1.83)
pt3dadd(-45.15, 95.65, -5.5, 1.74)
pt3dadd(-45.37, 95.68, -6.5, 1.68)
pt3dadd(-45.26, 95.85, -6.5, 1.52)
pt3dadd(-45.12, 96.01, -6.5, 1.42)
pt3dadd(-45.06, 96.13, -6.5, 1.28)
pt3dadd(-45.04, 96.28, -6.5, 1.02)
pt3dadd(-45.02, 96.4, -6.5, 0.68)
pt3dadd(-44.84, 96.86, -7, 0.3)
pt3dadd(-44.8, 97.07, -7, 0.28)
pt3dadd(-44.79, 97.34, -7, 0.29)
pt3dadd(-44.77, 97.54, -7, 0.3)
pt3dadd(-44.67, 97.83, -7, 0.25)
pt3dadd(-44.58, 98.09, -7, 0.23)
pt3dadd(-44.58, 98.3, -7, 0.33)
pt3dadd(-44.53, 98.55, -7, 0.48)
pt3dadd(-44.51, 98.67, -7, 0.54)
pt3dadd(-44.47, 98.85, -7, 0.53)
pt3dadd(-44.44, 99.04, -7, 0.51)
pt3dadd(-44.44, 99.28, -7, 0.46)
pt3dadd(-44.41, 99.51, -7, 0.34)
pt3dadd(-44.37, 99.83, -7, 0.28)
pt3dadd(-44.39, 100.16, -7, 0.15)
pt3dadd(-44.33, 100.36, -7, 0.18)
pt3dadd(-44.22, 100.53, -7, 0.29)
pt3dadd(-44.01, 100.81, -7, 0.63)
pt3dadd(-43.89, 101.02, -7, 0.8)
pt3dadd(-43.96, 101.22, -7, 0.82)
pt3dadd(-43.99, 101.34, -7, 0.8)
pt3dadd(-43.9, 101.81, -7, 0.01)
pt3dadd(-43.63, 102, -7, 0.12)
pt3dadd(-43.48, 102.2, -7, 0.1)
pt3dadd(-43.42, 102.4, -7, 0.13)
pt3dadd(-43.59, 102.8, -7, 0.34)
pt3dadd(-43.49, 103.7, -7, 1.49)
pt3dadd(-42.9, 103.7, -6.5, 2.11)
pt3dadd(-42.66, 104, -6.5, 2.59)
pt3dadd(-42.51, 104.2, -6.5, 2.64)
pt3dadd(-42.36, 104.41, -6.5, 2.78)
pt3dadd(-42.11, 104.51, -6.5, 2.83)
pt3dadd(-42.1, 104.81, -6.5, 2.56)
pt3dadd(-42.46, 105.8, -6.5, 0.34)
pt3dadd(-42.32, 106.61, -6.5, 0.29)
pt3dadd(-42.17, 106.91, -6.5, 0.44)
pt3dadd(-42, 107.11, -6.5, 0.53)
pt3dadd(-41.88, 107.41, -6.5, 0.44)
pt3dadd(-41.57, 107.51, -6.5, 0.05)
pt3dadd(-41.37, 108.21, -6.5, 0.05)
pt3dadd(-41.24, 108.51, -6.5, 0.73)
pt3dadd(-40.89, 109.21, -6.5, 1.55)
pt3dadd(-40.68, 109.41, -7, 1.21)
pt3dadd(-40.11, 110.61, -8, 0.53)
pt3dadd(-39.97, 111.21, -8, 0.48)
pt3dadd(-39.6, 111.81, -8, 0.53)
pt3dadd(-39.05, 112.32, -8, 0.87)
pt3dadd(-38.46, 112.92, -8, 1.74)
pt3dadd(-38.17, 113.12, -8, 1.79)
pt3dadd(-38.01, 113.32, -8, 1.74)
pt3dadd(-37.7, 113.72, -8, 1.65)
pt3dadd(-37.43, 114.12, -8, 1.36)
pt3dadd(-36.98, 114.52, -8, 1.11)
}
dend[27] {pt3dclear()
pt3dadd(-36.98, 70.14, -5.5, 4.45)
pt3dadd(-36.19, 70.49, -5.5, 3.61)
pt3dadd(-35.97, 70.99, -5.5, 2.32)
pt3dadd(-35.81, 71.35, -5.5, 1.52)
pt3dadd(-35.69, 71.65, -5.5, 1.04)
pt3dadd(-35.46, 72.13, -5.5, 0.63)
pt3dadd(-35.28, 72.39, -5.5, 0.27)
pt3dadd(-34.87, 72.74, -5.5, 0.19)
pt3dadd(-34.92, 72.98, -5.5, 0.27)
pt3dadd(-34.91, 73.22, -5.5, 0.51)
pt3dadd(-34.88, 73.5, -5.5, 0.58)
pt3dadd(-34.71, 73.5, -5.5, 0.68)
pt3dadd(-34.53, 73.54, -5.5, 0.65)
pt3dadd(-34.42, 73.67, -5.5, 0.63)
pt3dadd(-34.18, 73.86, -5.5, 0.39)
pt3dadd(-34.1, 74.02, -5.5, 0.29)
pt3dadd(-34.02, 74.27, -5.5, 0.24)
pt3dadd(-33.86, 74.6, -5.5, 0.24)
pt3dadd(-33.59, 74.88, -5.5, 0.24)
pt3dadd(-33.32, 75.05, -5.5, 0.24)
pt3dadd(-32.98, 75.2, -5.5, 0.24)
pt3dadd(-32.62, 75.55, -5.5, 0.24)
pt3dadd(-32.47, 75.78, -5.5, 0.31)
pt3dadd(-32.24, 75.94, -5.5, 0.34)
pt3dadd(-32.1, 76.14, -5.5, 0.39)
pt3dadd(-32.05, 76.52, -5.5, 0.48)
pt3dadd(-31.88, 76.81, -5.5, 0.56)
pt3dadd(-31.82, 77.08, -5.5, 0.53)
pt3dadd(-31.6, 77.28, -5.5, 0.51)
pt3dadd(-31.39, 77.59, -5.5, 0.05)
pt3dadd(-31.18, 77.88, -5.5, 0.05)
pt3dadd(-31.03, 78.21, -5.5, 0.12)
pt3dadd(-30.92, 78.39, -5.5, 0.24)
pt3dadd(-30.74, 78.48, -5.5, 0.29)
pt3dadd(-30.55, 78.66, -5.5, 0.07)
pt3dadd(-30.4, 78.77, -5.5, 0.12)
pt3dadd(-30.25, 78.86, -5.5, 0.22)
pt3dadd(-30.15, 78.96, -5.5, 0.29)
pt3dadd(-29.97, 79.06, -5.5, 0.29)
pt3dadd(-29.77, 79.11, -5.5, 0.07)
pt3dadd(-29.59, 79.22, -5.5, 0.05)
pt3dadd(-29.27, 79.29, -5.5, 0.27)
}
}
proc shape3d_6() {
dend[27] { pt3dadd(-28.88, 79.71, -5.5, 0.75)
pt3dadd(-28.67, 79.83, -5.5, 0.85)
pt3dadd(-28.44, 80.14, -5.5, 0.9)
pt3dadd(-28.22, 80.27, -5.5, 0.63)
pt3dadd(-28.05, 80.55, -5.5, 0.12)
pt3dadd(-27.85, 80.95, -5.5, 0.12)
pt3dadd(-27.66, 81.36, -5.5, 0.12)
pt3dadd(-27.3, 81.56, -5.5, 0.15)
pt3dadd(-27.18, 81.72, -5.5, 0.15)
pt3dadd(-26.96, 81.96, -5.5, 0.15)
pt3dadd(-26.6, 82.16, -5.5, 0.46)
pt3dadd(-26.35, 82.45, -5.5, 1.14)
pt3dadd(-26.14, 82.64, -5.5, 1.4)
pt3dadd(-26.26, 83, -5.5, 1.45)
pt3dadd(-26.29, 83.22, -5.5, 1.38)
}
dend[28] {pt3dclear()
pt3dadd(-26.9, 40.95, -7, 6.87)
pt3dadd(-26.47, 43.24, -5.5, 7.31)
pt3dadd(-24.88, 44.27, -5, 5.61)
pt3dadd(-24.3, 44.62, -5, 4.5)
pt3dadd(-23.54, 45, -5, 3.87)
pt3dadd(-22.92, 45.37, -5, 3.19)
pt3dadd(-22, 46.07, -5, 2.56)
pt3dadd(-21.48, 46.48, -5, 2.27)
pt3dadd(-21.07, 46.99, -5, 2.2)
pt3dadd(-20.57, 47.46, -5, 1.69)
pt3dadd(-20.36, 48.09, -5, 1.5)
pt3dadd(-20.12, 48.57, -5, 1.23)
pt3dadd(-19.96, 48.95, -5, 0.9)
pt3dadd(-19.66, 49.14, -5, 0.87)
pt3dadd(-19.57, 49.45, -5, 0.82)
pt3dadd(-19.18, 49.8, -5, 0.75)
pt3dadd(-18.92, 50.22, -5.5, 0.68)
pt3dadd(-18.54, 50.67, -5.5, 0.7)
pt3dadd(-18.1, 50.94, -5.5, 0.75)
pt3dadd(-17.67, 51.45, -5.5, 0.85)
pt3dadd(-17.12, 51.94, -5.5, 1.31)
pt3dadd(-16.69, 52.49, -5.5, 1.98)
pt3dadd(-16.41, 52.93, -5.5, 2.78)
pt3dadd(-15.99, 53.35, -5.5, 2.88)
pt3dadd(-15.56, 53.51, -5.5, 2.93)
}
dend[29] {pt3dclear()
pt3dadd(-15.56, 53.51, -5.5, 2.93)
pt3dadd(-15.37, 54.22, -5.5, 3.07)
pt3dadd(-15.23, 54.51, -5.5, 3.12)
pt3dadd(-15.15, 54.97, -5.5, 3.17)
pt3dadd(-14.93, 55.32, -5.5, 3.21)
pt3dadd(-14.76, 55.56, -5.5, 3.11)
pt3dadd(-14.77, 55.68, -5.5, 3.15)
}
dend[30] {pt3dclear()
pt3dadd(-14.77, 55.68, -5.5, 3.15)
pt3dadd(-15.35, 56.09, -5.5, 2.21)
pt3dadd(-15.4, 56.42, -5.5, 1.91)
pt3dadd(-15.56, 56.6, -5.5, 1.54)
pt3dadd(-15.7, 56.86, -5.5, 1.16)
pt3dadd(-15.8, 57.1, -5.5, 0.96)
pt3dadd(-15.94, 57.81, -5.5, 0.85)
pt3dadd(-15.98, 58.16, -5, 0.79)
pt3dadd(-15.92, 58.48, -5, 0.87)
pt3dadd(-15.89, 58.85, -5, 1.02)
pt3dadd(-15.85, 59.21, -5, 1.27)
pt3dadd(-15.73, 59.52, -5, 1.55)
pt3dadd(-15.69, 59.86, -5, 1.62)
pt3dadd(-15.71, 60.06, -5, 1.65)
pt3dadd(-15.69, 60.33, -5, 1.65)
pt3dadd(-15.74, 60.52, -5, 1.58)
pt3dadd(-15.72, 60.7, -5, 1.4)
pt3dadd(-15.76, 60.81, -5, 1.27)
pt3dadd(-15.92, 61.12, -5, 0.83)
pt3dadd(-15.96, 61.53, -5, 0.59)
pt3dadd(-15.95, 61.72, -5, 0.6)
pt3dadd(-15.84, 62.03, -5, 0.64)
pt3dadd(-15.78, 62.54, -5, 0.75)
pt3dadd(-15.72, 63.11, -5.5, 1.36)
pt3dadd(-15.86, 63.75, -5.5, 2.2)
pt3dadd(-16.03, 64.04, -5.5, 2.41)
pt3dadd(-16.14, 64.28, -5.5, 2.55)
pt3dadd(-16.25, 64.66, -5.5, 2.64)
pt3dadd(-16.27, 64.94, -5.5, 2.64)
pt3dadd(-16.32, 65.16, -5.5, 2.63)
pt3dadd(-16.33, 65.52, -5.5, 2.66)
pt3dadd(-16.33, 65.83, -5.5, 2.71)
pt3dadd(-16.25, 66.07, -5.5, 2.75)
pt3dadd(-16.14, 66.34, -5.5, 2.73)
pt3dadd(-16.09, 66.48, -5.5, 2.56)
}
dend[31] {pt3dclear()
pt3dadd(-16.09, 66.48, -5.5, 2.56)
pt3dadd(-15.59, 66.87, -5.5, 1.55)
pt3dadd(-15.44, 66.97, -5.5, 1.48)
pt3dadd(-15.25, 67.14, -6, 1.23)
pt3dadd(-15.08, 67.4, -6, 1.09)
pt3dadd(-14.88, 67.69, -6, 0.85)
pt3dadd(-14.78, 68.06, -6, 0.68)
pt3dadd(-14.65, 68.37, -6, 0.54)
pt3dadd(-14.53, 68.62, -6, 0.53)
pt3dadd(-14.44, 68.89, -6, 0.53)
pt3dadd(-14.31, 69.23, -6, 0.63)
pt3dadd(-14.42, 69.58, -6, 0.68)
pt3dadd(-14.37, 69.89, -6, 0.73)
pt3dadd(-14.28, 70.19, -6, 0.76)
pt3dadd(-13.96, 70.82, -6, 0.76)
pt3dadd(-13.83, 71.22, -6, 0.7)
pt3dadd(-13.63, 71.78, -6, 0.65)
pt3dadd(-13.56, 72.16, -6, 0.68)
pt3dadd(-13.46, 72.65, -6, 0.65)
pt3dadd(-13.4, 73.21, -6, 0.65)
pt3dadd(-13.33, 73.74, -6, 0.65)
pt3dadd(-13.3, 74.26, -6, 0.87)
pt3dadd(-12.93, 75.16, -6, 1.91)
pt3dadd(-12.44, 75.88, -6, 2.27)
pt3dadd(-12.08, 76.37, -6, 2.44)
pt3dadd(-12.01, 76.71, -6, 2.59)
pt3dadd(-12.13, 77.08, -6, 2.44)
pt3dadd(-12.11, 77.48, -5.5, 2.47)
pt3dadd(-12.28, 77.88, -5.5, 2.4)
pt3dadd(-12.21, 78.32, -5.5, 2.27)
pt3dadd(-12.2, 78.82, -5.5, 2.23)
pt3dadd(-12.12, 79.06, -5.5, 2.27)
pt3dadd(-12.28, 79.21, -5.5, 2.25)
pt3dadd(-12.25, 79.68, -5.5, 2.13)
pt3dadd(-12.35, 80, -5.5, 1.67)
pt3dadd(-12.35, 80.29, -5.5, 1.14)
pt3dadd(-12.28, 80.66, -5.5, 0.75)
pt3dadd(-12.43, 80.96, -5.5, 0.6)
pt3dadd(-12.64, 81.31, -5.5, 0.58)
pt3dadd(-12.66, 81.92, -5.5, 0.58)
pt3dadd(-12.46, 82.76, -5.5, 0.56)
pt3dadd(-12.18, 83.98, -5.5, 0.6)
pt3dadd(-12.16, 84.57, -6, 0.68)
pt3dadd(-12.15, 85.02, -6, 0.92)
pt3dadd(-12.1, 85.39, -6.5, 1.14)
pt3dadd(-12.24, 85.63, -6.5, 1.21)
pt3dadd(-12.32, 85.92, -6.5, 1.28)
pt3dadd(-12.38, 86.33, -6.5, 1.28)
pt3dadd(-12.42, 86.65, -6.5, 1.23)
pt3dadd(-12.36, 87.41, -6.5, 0.53)
pt3dadd(-12.1, 88.1, -6.5, 0.48)
pt3dadd(-12.03, 88.69, -6.5, 0.48)
pt3dadd(-12.23, 89.47, -7, 1.04)
pt3dadd(-12.47, 90.13, -7, 1.4)
pt3dadd(-12.49, 90.63, -7, 1.67)
pt3dadd(-12.19, 91.35, -7, 1.77)
pt3dadd(-11.78, 91.97, -7, 1.67)
pt3dadd(-11.43, 92.49, -7, 1.81)
pt3dadd(-11.01, 93.06, -7, 1.91)
pt3dadd(-11, 93.72, -7, 2.61)
pt3dadd(-10.9, 94.13, -6.5, 2.78)
pt3dadd(-10.89, 94.37, -6.5, 2.83)
}
dend[32] {pt3dclear()
pt3dadd(-10.89, 94.37, -6.5, 2.83)
pt3dadd(-10.54, 94.36, -6.5, 2.35)
pt3dadd(-10.33, 94.65, -6.5, 2.2)
pt3dadd(-10.1, 94.72, -6.5, 1.67)
pt3dadd(-9.6, 94.84, -6.5, 0.87)
pt3dadd(-9.28, 94.95, -6.5, 0.34)
pt3dadd(-8.91, 95.03, -6.5, 0.34)
pt3dadd(-8.42, 95.32, -6.5, 0.29)
pt3dadd(-8.05, 95.62, -6.5, 0.39)
pt3dadd(-7.66, 95.86, -6.5, 0.94)
pt3dadd(-7.1, 95.9, -6.5, 1.26)
pt3dadd(-6.97, 95.74, -6.5, 1.45)
pt3dadd(-6.63, 96.03, -6.5, 1.31)
pt3dadd(-6.24, 96.18, -7, 1.09)
pt3dadd(-5.75, 96.57, -7.5, 0.68)
pt3dadd(-5.37, 96.7, -7.5, 0.39)
pt3dadd(-5.06, 96.76, -7.5, 0.31)
pt3dadd(-4.58, 96.7, -7.5, 0.28)
pt3dadd(-4.06, 96.67, -7.5, 0.25)
pt3dadd(-3.55, 96.92, -7.5, 0.25)
pt3dadd(-3.22, 97.24, -7.5, 0.25)
pt3dadd(-2.62, 97.6, -7.5, 0.22)
pt3dadd(-2.37, 97.81, -7.5, 0.38)
pt3dadd(-1.97, 98.15, -7.5, 0.79)
pt3dadd(-1.74, 98.14, -7.5, 1.02)
pt3dadd(-1.56, 98.25, -7.5, 1)
pt3dadd(-1.37, 98.27, -7.5, 0.96)
pt3dadd(-1.23, 98.24, -7, 0.62)
pt3dadd(-0.98, 98.25, -7, 0.06)
pt3dadd(-0.72, 98.24, -7, 0.01)
pt3dadd(-0.3, 98.22, -7, 0.01)
pt3dadd(-0.15, 98.37, -7, 0.05)
pt3dadd(0, 98.49, -7, 0.1)
pt3dadd(0.32, 98.77, -7, 0.16)
pt3dadd(0.67, 98.85, -7, 0.19)
pt3dadd(1.03, 98.8, -7, 0.22)
pt3dadd(1.47, 98.78, -7, 0.63)
pt3dadd(1.93, 99.04, -7, 0.97)
pt3dadd(2.17, 99.22, -7, 1.19)
pt3dadd(2.31, 99.39, -7, 1.14)
pt3dadd(2.42, 99.44, -6.5, 0.97)
pt3dadd(2.65, 99.48, -6.5, 0.6)
pt3dadd(2.86, 99.57, -6.5, 0.43)
pt3dadd(3.18, 99.59, -6.5, 0.06)
pt3dadd(3.72, 99.66, -6.5, 0.06)
pt3dadd(4.4, 99.77, -6.5, 0.06)
pt3dadd(4.86, 99.89, -6.5, 0.06)
pt3dadd(5.36, 100.01, -6.5, 0.06)
pt3dadd(5.75, 100.04, -6.5, 0.06)
pt3dadd(6, 100.04, -6.5, 0.06)
pt3dadd(6.52, 100.13, -6.5, 0.87)
pt3dadd(6.8, 100.16, -6.5, 0.91)
pt3dadd(7.08, 100.12, -6.5, 0.94)
pt3dadd(7.32, 100.06, -6.5, 0.97)
pt3dadd(7.51, 100.06, -6.5, 0.94)
pt3dadd(7.74, 100.06, -6.5, 0.9)
}
}
proc shape3d_7() {
dend[32] { pt3dadd(7.94, 99.95, -6.5, 0.69)
pt3dadd(8.23, 99.75, -6.5, 0.35)
pt3dadd(8.51, 99.76, -6.5, 0.37)
pt3dadd(8.89, 99.77, -6.5, 0.41)
pt3dadd(9.19, 99.8, -6.5, 0.7)
pt3dadd(9.52, 100, -6.5, 1.02)
pt3dadd(9.66, 99.89, -6.5, 1.2)
pt3dadd(10.03, 99.79, -6.5, 1.2)
pt3dadd(10.16, 99.73, -6.5, 1.09)
pt3dadd(10.5, 99.73, -6.5, 0.58)
pt3dadd(10.97, 99.65, -6.5, 0.02)
pt3dadd(12.02, 99.75, -6.5, 0.02)
pt3dadd(12.64, 99.81, -6.5, 0.63)
pt3dadd(13.13, 99.83, -6.5, 0.73)
pt3dadd(13.55, 99.74, -6.5, 0.65)
pt3dadd(14.05, 99.73, -7, 0.19)
pt3dadd(15.08, 99.67, -7, 0.02)
pt3dadd(15.69, 99.73, -7, 0.02)
pt3dadd(16.65, 100.78, -7, 2.15)
pt3dadd(17.12, 100.62, -7, 1.4)
pt3dadd(17.07, 100.52, -6.5, 1.26)
pt3dadd(17.87, 100.26, -6.5, 0.19)
pt3dadd(18.43, 100.25, -6.5, 0.19)
pt3dadd(19.05, 100.61, -6.5, 0.19)
pt3dadd(19.55, 101.06, -6.5, 1.5)
pt3dadd(20.19, 100.89, -6.5, 0.15)
pt3dadd(20.77, 100.8, -6.5, 0.22)
pt3dadd(21.62, 100.79, -6.5, 1.62)
pt3dadd(22.11, 100.85, -6.5, 0.8)
pt3dadd(22.47, 100.78, -6.5, 0.58)
pt3dadd(22.59, 100.8, -6.5, 0.29)
pt3dadd(22.83, 100.59, -6.5, 0.02)
pt3dadd(23.56, 100.37, -6.5, 0.02)
pt3dadd(24.36, 100.27, -6.5, 0.02)
pt3dadd(24.92, 100.51, -6.5, 0.02)
pt3dadd(25.52, 100.47, -6.5, 0.51)
pt3dadd(26.04, 100.14, -6.5, 0.8)
pt3dadd(26.78, 100.18, -7, 1.14)
pt3dadd(27.19, 100.29, -7, 1.21)
pt3dadd(27.46, 100.49, -7, 1.23)
}
dend[33] {pt3dclear()
pt3dadd(-10.89, 94.37, -6.5, 2.83)
pt3dadd(-11.55, 94.74, -6.5, 1.98)
pt3dadd(-11.7, 95.09, -6.5, 1.74)
pt3dadd(-11.69, 95.22, -6.5, 1.43)
pt3dadd(-11.84, 95.34, -6.5, 1.38)
pt3dadd(-12.03, 95.61, -6.5, 1.15)
pt3dadd(-12.13, 95.77, -6.5, 0.97)
pt3dadd(-12.31, 96, -6.5, 0.86)
pt3dadd(-12.38, 96.2, -6.5, 0.47)
pt3dadd(-12.48, 96.46, -6.5, 0.42)
pt3dadd(-12.56, 96.73, -6.5, 0.45)
pt3dadd(-12.57, 96.89, -6.5, 0.46)
}
dend[34] {pt3dclear()
pt3dadd(-12.57, 96.89, -6.5, 0.46)
pt3dadd(-12.64, 97.45, -6.5, 0.38)
pt3dadd(-12.62, 97.82, -6.5, 0.38)
pt3dadd(-12.38, 98.5, -7, 0.36)
pt3dadd(-12.04, 98.92, -7, 0.36)
pt3dadd(-11.86, 99.22, -7, 0.47)
pt3dadd(-11.62, 99.57, -7, 0.63)
pt3dadd(-11.53, 99.81, -7, 0.74)
pt3dadd(-11.55, 100.11, -7, 0.79)
pt3dadd(-11.56, 100.47, -7, 0.8)
pt3dadd(-11.49, 100.8, -7.5, 0.8)
pt3dadd(-11.4, 101.4, -7.5, 0.85)
pt3dadd(-11.4, 101.65, -7.5, 0.86)
pt3dadd(-11.44, 101.9, -7.5, 0.85)
pt3dadd(-11.5, 102.11, -7.5, 0.85)
pt3dadd(-11.57, 102.31, -7.5, 0.85)
pt3dadd(-11.6, 102.41, -7.5, 0.85)
}
dend[35] {pt3dclear()
pt3dadd(-12.57, 96.89, -6.5, 0.46)
pt3dadd(-13.2, 97.02, -6.5, 0.21)
pt3dadd(-13.74, 96.88, -6.5, 0.21)
pt3dadd(-14.5, 96.49, -6.5, 0.21)
pt3dadd(-15.18, 96.41, -6.5, 0.01)
pt3dadd(-15.85, 96.38, -6.5, 0.04)
pt3dadd(-16.37, 96.54, -6.5, 0.27)
pt3dadd(-16.66, 96.65, -6.5, 0.97)
pt3dadd(-16.78, 96.85, -6.5, 1.11)
pt3dadd(-16.91, 97.07, -6.5, 1.27)
pt3dadd(-17.03, 97.45, -6.5, 1.31)
}
dend[36] {pt3dclear()
pt3dadd(-16.09, 66.48, -5.5, 2.56)
pt3dadd(-16.64, 66.82, -5.5, 1.58)
pt3dadd(-17.2, 67.2, -5.5, 0.53)
pt3dadd(-17.37, 67.4, -5.5, 0.44)
pt3dadd(-17.54, 67.62, -5.5, 0.4)
pt3dadd(-17.86, 67.85, -5.5, 0.39)
pt3dadd(-18.11, 68.07, -5.5, 0.39)
pt3dadd(-18.36, 68.28, -5.5, 0.41)
pt3dadd(-18.54, 68.43, -5.5, 0.51)
pt3dadd(-18.8, 68.56, -5.5, 0.54)
pt3dadd(-19.38, 69.01, -5.5, 0.98)
pt3dadd(-19.58, 69.2, -5.5, 1.22)
pt3dadd(-19.77, 69.38, -5.5, 1.38)
}
dend[37] {pt3dclear()
pt3dadd(-19.77, 69.38, -5.5, 1.38)
pt3dadd(-19.73, 69.78, -5.5, 1.25)
pt3dadd(-19.7, 70.03, -5.5, 1.11)
pt3dadd(-19.72, 70.32, -5.5, 0.94)
pt3dadd(-19.72, 70.58, -5.5, 0.68)
pt3dadd(-19.78, 70.86, -5.5, 0.51)
pt3dadd(-19.76, 71.12, -5.5, 0.42)
pt3dadd(-19.82, 71.41, -5.5, 0.36)
pt3dadd(-19.79, 71.64, -5.5, 0.4)
pt3dadd(-19.86, 71.94, -5.5, 0.45)
pt3dadd(-19.81, 72.34, -5.5, 0.5)
pt3dadd(-19.89, 72.69, -5.5, 0.64)
pt3dadd(-20.06, 72.97, -5.5, 0.73)
pt3dadd(-20.14, 73.32, -5.5, 1.17)
pt3dadd(-20.26, 73.5, -5.5, 1.27)
pt3dadd(-20.4, 73.68, -5.5, 1.31)
pt3dadd(-20.54, 73.69, -5.5, 1.33)
pt3dadd(-20.63, 73.86, -5.5, 1.29)
pt3dadd(-20.78, 74, -5.5, 1.15)
pt3dadd(-20.85, 74.11, -5.5, 0.98)
pt3dadd(-21.03, 74.47, -5.5, 0.3)
pt3dadd(-21.36, 74.8, -5.5, 0.27)
pt3dadd(-21.61, 75.21, -5.5, 0.28)
pt3dadd(-21.93, 75.78, -6, 0.02)
pt3dadd(-22.16, 76.13, -6, 0.07)
pt3dadd(-22.39, 76.8, -6, 0.01)
pt3dadd(-22.5, 77.24, -6, 0.23)
pt3dadd(-22.6, 77.54, -6, 0.48)
pt3dadd(-22.85, 77.6, -6, 0.85)
pt3dadd(-22.97, 77.73, -6, 0.83)
pt3dadd(-23.11, 77.8, -6, 0.81)
pt3dadd(-23.28, 77.88, -6, 0.79)
pt3dadd(-23.46, 78.05, -6, 0.75)
pt3dadd(-23.58, 78.2, -6, 0.47)
pt3dadd(-23.7, 78.4, -6, 0.13)
pt3dadd(-23.96, 78.78, -6, 0.08)
pt3dadd(-24.16, 79.28, -6, 0.05)
pt3dadd(-24.25, 79.55, -6, 0.22)
pt3dadd(-24.49, 79.77, -6, 0.23)
pt3dadd(-24.74, 79.92, -6, 0.23)
pt3dadd(-24.93, 80.04, -6, 0.25)
pt3dadd(-25.18, 80.17, -6, 0.28)
pt3dadd(-25.47, 80.33, -6, 0.33)
pt3dadd(-25.67, 80.52, -6, 0.41)
pt3dadd(-26, 80.55, -6, 0.46)
pt3dadd(-26.33, 80.67, -6, 0.48)
pt3dadd(-26.67, 80.81, -6, 0.51)
pt3dadd(-26.82, 80.96, -6, 0.51)
pt3dadd(-27.01, 81.27, -5.5, 0.05)
pt3dadd(-27.19, 81.54, -5.5, 0.1)
pt3dadd(-27.38, 81.91, -5.5, 0.63)
pt3dadd(-27.62, 82.42, -5.5, 1.38)
pt3dadd(-27.78, 82.57, -5.5, 1.48)
pt3dadd(-27.97, 82.8, -5.5, 1.45)
pt3dadd(-28, 83.15, -5.5, 1.38)
pt3dadd(-28.05, 83.38, -5, 0.94)
pt3dadd(-28.25, 83.82, -5, 0.1)
pt3dadd(-28.43, 84.53, -5, 0.1)
pt3dadd(-28.89, 85.13, -5, 0.1)
pt3dadd(-29.3, 85.27, -5, 0.1)
pt3dadd(-29.58, 85.9, -5, 0.02)
pt3dadd(-29.66, 86.23, -5, 0.22)
pt3dadd(-29.78, 86.57, -5, 0.44)
pt3dadd(-29.91, 86.86, -5, 0.53)
pt3dadd(-30.16, 87.18, -5, 0.51)
pt3dadd(-30.45, 88.28, -5, 0.02)
pt3dadd(-30.42, 89.16, -5, 0.02)
pt3dadd(-30.58, 90.06, -5.5, 0.02)
pt3dadd(-31.27, 90.9, -5.5, 0.02)
pt3dadd(-31.65, 91.38, -5.5, 0.02)
pt3dadd(-31.57, 91.63, -5.5, 0.56)
pt3dadd(-31.57, 92.02, -5.5, 1.09)
pt3dadd(-31.51, 92.44, -5.5, 1.48)
pt3dadd(-31.41, 92.66, -5.5, 1.6)
pt3dadd(-31.53, 93.11, -5.5, 1.04)
pt3dadd(-31.75, 93.92, -5.5, 0.02)
pt3dadd(-31.69, 94.92, -5.5, 0.02)
pt3dadd(-31.4, 95.68, -5.5, 0.02)
pt3dadd(-31.31, 95.94, -5.5, 0.12)
pt3dadd(-31.13, 96.2, -5.5, 0.24)
pt3dadd(-31.19, 96.81, -5.5, 0.36)
pt3dadd(-31.24, 97.28, -5.5, 0.73)
pt3dadd(-31.48, 97.67, -5.5, 0.92)
pt3dadd(-31.47, 98.14, -5.5, 1.02)
pt3dadd(-31.54, 98.55, -5.5, 1.09)
pt3dadd(-31.06, 99.07, -5.5, 1.04)
pt3dadd(-30.75, 99.37, -5.5, 1.02)
pt3dadd(-30.81, 99.28, -5.5, 0.65)
}
dend[38] {pt3dclear()
pt3dadd(-19.77, 69.38, -5.5, 1.38)
pt3dadd(-19.92, 69.42, -5.5, 1.21)
pt3dadd(-20.19, 69.43, -5.5, 0.97)
pt3dadd(-20.23, 69.17, -5, 0.76)
pt3dadd(-20.66, 69.13, -5, 0.28)
pt3dadd(-21.03, 69.02, -5, 0.23)
pt3dadd(-21.35, 69, -5, 0.21)
pt3dadd(-21.58, 68.99, -5, 0.24)
pt3dadd(-21.91, 68.92, -5, 0.42)
pt3dadd(-22.17, 68.87, -5, 0.48)
pt3dadd(-22.36, 68.79, -5, 0.56)
}
dend[39] {pt3dclear()
pt3dadd(-22.36, 68.79, -5, 0.56)
pt3dadd(-22.45, 68.67, -5, 0.39)
pt3dadd(-22.51, 68.41, -5, 0.01)
pt3dadd(-22.55, 68.12, -5, 0.01)
pt3dadd(-22.63, 67.76, -5, 0.01)
pt3dadd(-22.62, 67.47, -5, 0.16)
pt3dadd(-22.62, 67.31, -5, 0.3)
pt3dadd(-22.62, 67.11, -5, 0.4)
}
}
proc shape3d_8() {
dend[39] { }
dend[40] {pt3dclear()
pt3dadd(-22.36, 68.79, -5, 0.56)
pt3dadd(-22.82, 69.02, -5, 0.25)
pt3dadd(-23.06, 69.19, -5, 0.34)
pt3dadd(-23.25, 69.28, -5, 0.42)
}
dend[41] {pt3dclear()
pt3dadd(-14.77, 55.68, -5.5, 3.15)
pt3dadd(-14.11, 55.82, -6, 2.15)
pt3dadd(-13.81, 56.01, -6, 1.48)
pt3dadd(-13.62, 56.05, -6, 1.14)
pt3dadd(-13.38, 56.14, -6, 0.68)
pt3dadd(-13.12, 56.18, -6, 0.51)
pt3dadd(-12.75, 56.19, -6, 0.34)
pt3dadd(-12.44, 56.17, -6, 0.36)
pt3dadd(-11.95, 56.15, -6, 0.44)
pt3dadd(-11.74, 56.3, -6, 0.51)
pt3dadd(-11.55, 56.44, -6, 0.56)
pt3dadd(-11.35, 56.7, -6, 0.6)
pt3dadd(-11.15, 56.77, -6, 0.6)
pt3dadd(-11, 56.85, -6, 0.6)
pt3dadd(-10.73, 56.78, -6, 0.53)
pt3dadd(-10.49, 56.84, -6, 0.51)
pt3dadd(-10.36, 57.01, -5.5, 0.48)
pt3dadd(-10.16, 57.12, -5.5, 0.56)
pt3dadd(-9.91, 57.28, -5.5, 0.63)
pt3dadd(-9.75, 57.41, -5.5, 0.6)
pt3dadd(-9.53, 57.58, -5.5, 0.41)
pt3dadd(-9.37, 57.75, -5.5, 0.34)
pt3dadd(-9.09, 57.8, -5.5, 0.31)
pt3dadd(-8.78, 57.78, -5.5, 0.29)
pt3dadd(-8.48, 57.77, -5.5, 0.34)
pt3dadd(-8.11, 57.78, -5, 0.6)
pt3dadd(-7.86, 57.97, -5, 0.56)
pt3dadd(-7.68, 58.07, -5, 0.48)
pt3dadd(-7.39, 58.13, -5, 0.46)
pt3dadd(-7.14, 58.1, -5, 0.44)
pt3dadd(-6.87, 58.25, -5, 0.46)
pt3dadd(-6.51, 58.21, -5, 0.48)
pt3dadd(-6.24, 58.17, -5, 0.41)
pt3dadd(-5.96, 58.29, -5, 0.41)
pt3dadd(-5.35, 58.6, -5, 0.92)
pt3dadd(-5.04, 58.71, -5, 0.94)
pt3dadd(-4.79, 58.78, -5, 0.9)
pt3dadd(-4.58, 58.88, -5, 0.87)
pt3dadd(-4.36, 58.89, -5, 0.76)
pt3dadd(-4.18, 58.93, -5, 0.53)
pt3dadd(-3.97, 58.99, -5, 0.01)
pt3dadd(-3.45, 59.26, -5, 0.01)
pt3dadd(-2.9, 59.48, -5, 0.01)
pt3dadd(-2.61, 59.65, -5, 0.67)
pt3dadd(-1.79, 60.15, -5, 1.97)
pt3dadd(-1.65, 60.18, -5, 1.92)
pt3dadd(-1.46, 60.35, -5, 1.71)
pt3dadd(-1.08, 60.5, -5, 1.02)
pt3dadd(-0.81, 60.58, -5, 0.67)
pt3dadd(-0.41, 60.59, -5, 0.01)
pt3dadd(0.2, 60.55, -5, 0.01)
pt3dadd(0.54, 60.44, -5, 0.27)
pt3dadd(1.14, 60.52, -4.5, 0.41)
pt3dadd(1.47, 60.58, -4.5, 0.45)
pt3dadd(2, 60.63, -5, 0.75)
pt3dadd(2.39, 60.77, -5, 1.27)
pt3dadd(2.68, 60.7, -5, 1.33)
pt3dadd(2.85, 60.52, -5, 1.36)
pt3dadd(3.1, 60.5, -5, 1.32)
pt3dadd(3.28, 60.53, -5, 1.15)
pt3dadd(3.51, 60.61, -5, 0.82)
pt3dadd(3.87, 60.79, -4.5, 0.17)
pt3dadd(4.02, 60.83, -4.5, 0.12)
pt3dadd(4.29, 60.84, -4.5, 0.08)
pt3dadd(4.41, 60.9, -4.5, 0.11)
pt3dadd(4.55, 61.03, -4.5, 0.13)
pt3dadd(4.67, 61.18, -4.5, 0.17)
pt3dadd(4.81, 61.32, -4.5, 0.19)
pt3dadd(5.13, 61.85, -5, 0.52)
pt3dadd(5.78, 62.18, -5, 1.43)
pt3dadd(6.15, 62.14, -5, 1.4)
pt3dadd(6.2, 62.19, -5.5, 1.46)
pt3dadd(6.35, 62.32, -5.5, 1.25)
pt3dadd(6.57, 62.56, -5.5, 0.82)
pt3dadd(6.76, 62.71, -5.5, 0.54)
pt3dadd(6.86, 62.76, -5.5, 0.39)
pt3dadd(7.06, 62.86, -5.5, 0.23)
pt3dadd(7.35, 62.98, -5.5, 0.31)
pt3dadd(7.6, 63.12, -5.5, 0.59)
pt3dadd(7.76, 63.25, -5.5, 0.64)
pt3dadd(8, 63.19, -5.5, 0.68)
pt3dadd(8.14, 63.14, -5.5, 0.58)
pt3dadd(8.33, 63.19, -5.5, 0.46)
pt3dadd(8.57, 63.25, -5.5, 0.04)
pt3dadd(8.88, 63.4, -5.5, 0.04)
pt3dadd(9.04, 63.67, -5.5, 0.04)
pt3dadd(9.36, 63.97, -5.5, 0.04)
pt3dadd(9.83, 64.13, -6, 0.94)
pt3dadd(10.08, 64.21, -6, 1.13)
pt3dadd(10.29, 64.26, -6, 1.22)
pt3dadd(10.46, 64.21, -6, 1.27)
}
dend[42] {pt3dclear()
pt3dadd(-15.56, 53.51, -5.5, 2.93)
pt3dadd(-14.51, 52.87, -5.5, 1.14)
pt3dadd(-14.09, 52.73, -5.5, 0.85)
pt3dadd(-13.71, 52.62, -5.5, 0.63)
pt3dadd(-13.51, 52.56, -5.5, 0.56)
pt3dadd(-13.22, 52.49, -5.5, 0.51)
pt3dadd(-12.79, 52.37, -5.5, 0.51)
pt3dadd(-12.39, 52.36, -5.5, 0.53)
pt3dadd(-12.07, 52.25, -5.5, 0.52)
pt3dadd(-11.61, 52.19, -5.5, 0.67)
pt3dadd(-11.39, 52.17, -5.5, 0.65)
pt3dadd(-11.03, 52.16, -5.5, 0.53)
pt3dadd(-10.63, 52.15, -5.5, 0.42)
pt3dadd(-10.28, 52.06, -5.5, 0.36)
pt3dadd(-10.04, 52.01, -5.5, 0.36)
pt3dadd(-9.79, 52, -5.5, 0.38)
pt3dadd(-9.56, 52.01, -5.5, 0.38)
pt3dadd(-9.28, 52.13, -6, 0.36)
pt3dadd(-8.98, 52.13, -6, 0.34)
pt3dadd(-8.64, 52.14, -6, 0.36)
pt3dadd(-8.22, 52.19, -6, 0.44)
pt3dadd(-7.92, 52.31, -6, 0.52)
pt3dadd(-7.52, 52.12, -6, 0.4)
pt3dadd(-7.23, 52.08, -6, 0.42)
pt3dadd(-6.92, 52.04, -6, 0.41)
pt3dadd(-6.56, 52.02, -6, 0.41)
pt3dadd(-6.1, 52.14, -5.5, 0.68)
pt3dadd(-5.97, 52.18, -5.5, 0.79)
pt3dadd(-5.77, 52.29, -5.5, 0.77)
pt3dadd(-5.59, 52.36, -5.5, 0.73)
pt3dadd(-5.41, 52.43, -5.5, 0.62)
pt3dadd(-5.3, 52.51, -5.5, 0.5)
pt3dadd(-5.15, 52.55, -5.5, 0.44)
pt3dadd(-4.97, 52.63, -5.5, 0.39)
pt3dadd(-4.78, 52.63, -5.5, 0.36)
pt3dadd(-4.57, 52.65, -5.5, 0.35)
pt3dadd(-4.25, 52.55, -5.5, 0.06)
pt3dadd(-4.01, 52.48, -5.5, 0.07)
pt3dadd(-3.67, 52.33, -5.5, 0.45)
pt3dadd(-3.34, 52.2, -5.5, 0.57)
pt3dadd(-2.65, 51.91, -5.5, 1.1)
pt3dadd(-2.12, 51.59, -5.5, 1.67)
pt3dadd(-1.84, 51.47, -5.5, 1.73)
pt3dadd(-1.72, 51.29, -5.5, 1.73)
pt3dadd(-1.58, 51.17, -5.5, 1.63)
pt3dadd(-1.36, 51.12, -5.5, 1.31)
pt3dadd(-1.11, 51.08, -5.5, 0.98)
pt3dadd(-0.8, 50.97, -5.5, 0.62)
pt3dadd(-0.63, 50.93, -5.5, 0.31)
pt3dadd(-0.46, 50.88, -5.5, 0.15)
pt3dadd(-0.25, 50.82, -5.5, 0.1)
pt3dadd(-0.03, 50.76, -5.5, 0.21)
pt3dadd(0.21, 50.76, -5.5, 0.29)
pt3dadd(0.36, 50.73, -5.5, 0.33)
pt3dadd(0.53, 50.64, -5.5, 0.33)
pt3dadd(0.81, 50.56, -5.5, 0.05)
pt3dadd(1.13, 50.51, -5.5, 0.05)
pt3dadd(1.43, 50.43, -5.5, 0.05)
pt3dadd(1.96, 50.4, -5.5, 0.67)
pt3dadd(2.48, 50.34, -5.5, 1.04)
pt3dadd(2.95, 50.34, -5.5, 1.26)
}
dend[43] {pt3dclear()
pt3dadd(2.95, 50.34, -5.5, 1.26)
pt3dadd(3.18, 50.28, -6, 0.92)
pt3dadd(3.23, 49.83, -6, 0.04)
pt3dadd(3.52, 49.48, -6, 0.04)
pt3dadd(3.93, 49.37, -6, 0.04)
pt3dadd(4.31, 49.29, -6, 0.04)
pt3dadd(4.49, 49.18, -6, 0.3)
pt3dadd(4.71, 49.08, -6, 0.46)
pt3dadd(4.85, 49, -6, 0.48)
pt3dadd(4.91, 48.81, -6, 0.45)
pt3dadd(5, 48.64, -6, 0.04)
pt3dadd(5.26, 48.44, -6, 0.04)
pt3dadd(5.44, 48.29, -6, 0.15)
pt3dadd(5.61, 48.1, -6, 0.3)
pt3dadd(5.78, 47.97, -6, 0.44)
}
dend[44] {pt3dclear()
pt3dadd(2.95, 50.34, -5.5, 1.26)
pt3dadd(3.32, 50.71, -6, 0.59)
pt3dadd(3.69, 50.85, -6, 0.16)
pt3dadd(3.98, 50.98, -6, 0.24)
pt3dadd(4.29, 51.18, -6, 0.6)
pt3dadd(4.63, 51.42, -6, 0.64)
pt3dadd(5.18, 51.83, -6, 1.02)
pt3dadd(5.5, 52.35, -6, 1.11)
pt3dadd(5.69, 52.47, -6, 1.19)
pt3dadd(6.16, 52.71, -6, 1.27)
}
dend[45] {pt3dclear()
pt3dadd(-23.5, 30.28, -7, 10.26)
pt3dadd(-25.92, 28.14, -7.5, 5.42)
pt3dadd(-26.64, 27.75, -7.5, 4.33)
pt3dadd(-27.06, 27.49, -7.5, 3.53)
pt3dadd(-27.49, 27.4, -7, 2.52)
pt3dadd(-27.83, 27.07, -7, 1.84)
pt3dadd(-28.28, 26.97, -7, 1.4)
pt3dadd(-28.61, 26.74, -7, 0.87)
pt3dadd(-28.99, 26.84, -7, 0.75)
pt3dadd(-29.49, 26.91, -7, 0.65)
pt3dadd(-29.93, 26.99, -7, 0.7)
pt3dadd(-30.6, 26.97, -6.5, 0.87)
pt3dadd(-31.44, 26.96, -6.5, 1.4)
pt3dadd(-31.83, 26.97, -6.5, 1.84)
pt3dadd(-32.2, 26.91, -6.5, 1.84)
pt3dadd(-32.48, 26.81, -6.5, 1.55)
pt3dadd(-32.79, 26.85, -6.5, 1.14)
pt3dadd(-33.03, 26.77, -6, 0.82)
pt3dadd(-33.26, 26.76, -6, 0.7)
}
}
proc shape3d_9() {
dend[45] { pt3dadd(-33.41, 26.78, -6, 0.65)
pt3dadd(-33.62, 26.75, -6, 0.63)
pt3dadd(-33.91, 26.7, -6, 0.6)
pt3dadd(-34.24, 26.68, -6, 0.58)
pt3dadd(-34.42, 26.65, -6, 0.6)
pt3dadd(-34.66, 26.49, -6, 0.58)
pt3dadd(-34.93, 26.39, -6, 0.41)
pt3dadd(-35.24, 26.17, -6, 0.41)
pt3dadd(-35.5, 26.07, -6, 0.45)
pt3dadd(-35.81, 25.91, -6, 0.46)
pt3dadd(-36.07, 25.78, -6, 0.46)
pt3dadd(-36.38, 25.62, -6, 0.48)
pt3dadd(-36.78, 25.47, -6, 0.59)
pt3dadd(-37.25, 25.25, -6, 0.97)
pt3dadd(-37.91, 24.94, -6, 1.5)
pt3dadd(-38.31, 24.88, -6, 1.85)
pt3dadd(-38.74, 24.82, -6, 2.09)
pt3dadd(-39.14, 24.87, -6, 2.09)
pt3dadd(-39.36, 24.79, -6, 2.19)
pt3dadd(-39.66, 24.76, -6, 2.23)
pt3dadd(-39.84, 24.72, -6, 2.27)
pt3dadd(-40.03, 24.55, -6, 2.23)
pt3dadd(-40.27, 24.41, -6, 2.17)
pt3dadd(-40.58, 24.34, -6, 2.13)
pt3dadd(-40.87, 24.32, -6, 2.04)
}
dend[46] {pt3dclear()
pt3dadd(-40.87, 24.32, -6, 2.04)
pt3dadd(-40.74, 24.3, -6, 1.96)
pt3dadd(-41, 24.11, -6, 1.57)
pt3dadd(-41.32, 23.93, -6, 0.99)
pt3dadd(-41.57, 23.69, -6, 0.75)
pt3dadd(-41.78, 23.55, -6, 0.62)
pt3dadd(-42.14, 23.37, -6, 0.6)
pt3dadd(-42.43, 23.29, -6, 0.68)
pt3dadd(-42.72, 23.21, -6, 0.74)
pt3dadd(-43.03, 23.14, -6, 0.77)
pt3dadd(-43.59, 22.79, -6, 1.15)
pt3dadd(-44.03, 22.32, -6, 1.78)
pt3dadd(-44.45, 21.82, -6, 2.56)
pt3dadd(-44.81, 21.75, -6, 2.56)
pt3dadd(-44.98, 21.68, -6, 2.5)
pt3dadd(-45.25, 21.54, -6, 2.41)
pt3dadd(-45.52, 21.4, -6, 2.32)
pt3dadd(-45.76, 21.19, -6, 2.3)
pt3dadd(-46.06, 21.09, -6, 2.25)
pt3dadd(-46.32, 21, -6, 1.94)
pt3dadd(-46.45, 20.95, -6, 1.65)
pt3dadd(-46.54, 20.81, -6, 1.57)
pt3dadd(-46.79, 20.81, -6, 1.45)
pt3dadd(-46.89, 20.71, -6, 1.26)
pt3dadd(-47, 20.75, -6.5, 1.25)
pt3dadd(-47.17, 20.69, -6.5, 1.14)
pt3dadd(-47.27, 20.63, -6.5, 0.97)
pt3dadd(-47.51, 20.55, -6.5, 0.7)
pt3dadd(-47.71, 20.51, -6.5, 0.58)
pt3dadd(-47.97, 20.54, -6.5, 0.56)
pt3dadd(-48.22, 20.43, -6.5, 0.56)
pt3dadd(-48.4, 20.28, -6.5, 0.56)
pt3dadd(-48.49, 20.19, -6.5, 0.56)
pt3dadd(-49.04, 19.84, -7, 0.75)
pt3dadd(-49.44, 19.66, -7, 1.11)
pt3dadd(-49.83, 19.62, -7, 1.44)
pt3dadd(-50.29, 19.46, -7, 1.98)
pt3dadd(-50.5, 19.37, -7, 2.3)
pt3dadd(-50.7, 19.31, -7, 2.5)
pt3dadd(-50.89, 19.16, -7, 2.56)
pt3dadd(-51.04, 19.08, -7, 2.55)
pt3dadd(-51.13, 19.01, -7, 2.47)
pt3dadd(-51.33, 18.97, -7, 2.36)
pt3dadd(-51.48, 18.88, -7, 2.26)
pt3dadd(-51.66, 18.81, -7, 2.11)
pt3dadd(-51.87, 18.73, -7, 1.92)
pt3dadd(-52.05, 18.69, -7, 1.71)
pt3dadd(-52.28, 18.59, -7, 1.32)
pt3dadd(-52.49, 18.43, -6.5, 1.2)
pt3dadd(-52.66, 18.28, -6.5, 1.11)
pt3dadd(-52.83, 18.21, -6.5, 0.99)
pt3dadd(-53.04, 18.1, -6.5, 0.86)
pt3dadd(-53.17, 17.97, -6, 0.63)
pt3dadd(-53.33, 17.86, -6, 0.51)
pt3dadd(-53.52, 17.7, -6, 0.46)
pt3dadd(-53.7, 17.61, -6, 0.42)
pt3dadd(-53.99, 17.51, -6, 0.45)
pt3dadd(-54.18, 17.33, -6, 0.44)
pt3dadd(-54.33, 17.22, -6, 0.42)
pt3dadd(-54.55, 17.05, -6, 0.41)
pt3dadd(-54.82, 16.88, -6, 0.41)
pt3dadd(-55.08, 16.73, -6, 0.41)
pt3dadd(-55.28, 16.56, -6, 0.41)
pt3dadd(-55.56, 16.45, -6, 0.41)
pt3dadd(-55.81, 16.34, -6, 0.45)
pt3dadd(-55.97, 16.22, -6, 0.65)
pt3dadd(-56.2, 16.14, -6, 0.93)
pt3dadd(-56.65, 16.16, -6, 1.49)
pt3dadd(-57.08, 16.17, -6, 1.88)
pt3dadd(-57.33, 16.05, -6, 2.11)
pt3dadd(-57.49, 15.88, -6, 2.03)
pt3dadd(-57.66, 15.67, -6, 1.85)
pt3dadd(-57.81, 15.35, -6, 1.63)
pt3dadd(-58.11, 15.18, -6, 1.54)
pt3dadd(-58.25, 14.97, -6, 1.32)
pt3dadd(-58.49, 14.83, -6, 1.27)
pt3dadd(-58.65, 14.68, -6, 1.16)
pt3dadd(-58.8, 14.56, -6, 0.98)
pt3dadd(-58.99, 14.39, -6, 0.65)
pt3dadd(-59.18, 14.24, -6, 0.44)
pt3dadd(-59.43, 14.1, -6, 0.4)
pt3dadd(-59.7, 14.02, -6, 0.4)
pt3dadd(-60.05, 13.93, -6, 0.4)
pt3dadd(-60.37, 13.84, -6, 0.4)
pt3dadd(-60.52, 13.76, -6, 0.38)
pt3dadd(-60.76, 13.66, -6, 0.38)
pt3dadd(-61.01, 13.48, -6, 0.38)
pt3dadd(-61.26, 13.5, -6, 0.41)
pt3dadd(-61.61, 13.43, -6, 0.63)
pt3dadd(-62.1, 13.45, -6, 1.02)
pt3dadd(-63.01, 13.65, -6, 2.15)
pt3dadd(-63.76, 13.78, -6, 3.24)
pt3dadd(-64.3, 13.77, -6, 3.68)
pt3dadd(-65.05, 13.68, -6, 4.19)
pt3dadd(-65.46, 13.51, -6, 4.38)
pt3dadd(-65.92, 13.38, -6, 4.57)
pt3dadd(-66.13, 13.23, -6, 4.55)
pt3dadd(-66.27, 13.19, -6, 4.5)
pt3dadd(-66.64, 13.24, -6, 4.28)
pt3dadd(-66.93, 13.08, -6, 3.97)
pt3dadd(-67.25, 13.12, -6, 3.61)
pt3dadd(-67.63, 12.95, -6, 2.93)
pt3dadd(-68.04, 12.88, -6, 2.64)
pt3dadd(-68.26, 12.77, -6, 2.44)
pt3dadd(-68.73, 12.63, -6, 2.11)
pt3dadd(-69.19, 12.67, -6, 1.86)
pt3dadd(-68.84, 12.59, -5.5, 1.91)
}
dend[47] {pt3dclear()
pt3dadd(-68.84, 12.59, -5.5, 1.91)
pt3dadd(-68.94, 12.96, -5.5, 1.4)
pt3dadd(-69.41, 13.14, -5.5, 0.87)
pt3dadd(-69.71, 13.24, -5.5, 0.65)
pt3dadd(-69.85, 13.39, -5.5, 0.53)
pt3dadd(-70.13, 13.4, -5.5, 0.48)
pt3dadd(-70.47, 13.41, -5.5, 0.47)
pt3dadd(-70.73, 13.45, -5.5, 0.46)
pt3dadd(-71.05, 13.37, -5.5, 0.47)
pt3dadd(-71.26, 13.59, -6, 0.44)
pt3dadd(-71.43, 13.74, -6, 0.35)
pt3dadd(-71.66, 13.95, -6, 0.45)
pt3dadd(-71.91, 14.24, -6, 0.83)
pt3dadd(-72, 14.33, -6, 0.92)
pt3dadd(-72.15, 14.43, -6, 0.96)
pt3dadd(-72.3, 14.56, -6, 1.1)
pt3dadd(-72.47, 14.65, -6, 1.14)
pt3dadd(-72.55, 14.74, -6, 1.11)
pt3dadd(-72.65, 14.94, -6.5, 1.03)
pt3dadd(-72.83, 15.18, -6.5, 0.93)
pt3dadd(-72.88, 15.4, -6.5, 0.91)
pt3dadd(-73.01, 15.58, -6.5, 0.88)
pt3dadd(-73.07, 15.79, -6.5, 0.86)
pt3dadd(-73.14, 15.87, -6.5, 0.83)
pt3dadd(-73.15, 16.05, -6.5, 0.74)
pt3dadd(-73.16, 16.22, -6.5, 0.48)
pt3dadd(-73.28, 16.48, -6.5, 0.44)
pt3dadd(-73.29, 16.65, -6.5, 0.41)
pt3dadd(-73.42, 16.77, -6.5, 0.4)
pt3dadd(-73.96, 16.84, -6.5, 0.36)
pt3dadd(-74.32, 16.83, -6.5, 0.35)
pt3dadd(-74.65, 16.87, -6.5, 0.38)
pt3dadd(-74.98, 17, -6.5, 0.4)
pt3dadd(-75.22, 17.18, -6.5, 0.52)
pt3dadd(-75.49, 17.46, -6.5, 0.75)
pt3dadd(-75.76, 17.69, -6.5, 0.93)
pt3dadd(-75.98, 17.92, -6.5, 1.11)
pt3dadd(-76.21, 18.19, -6.5, 1.33)
pt3dadd(-76.49, 18.25, -6.5, 1.44)
pt3dadd(-76.67, 18.52, -6, 1.52)
pt3dadd(-76.72, 18.67, -6, 1.56)
pt3dadd(-76.83, 18.92, -6, 1.46)
pt3dadd(-76.84, 19.08, -6, 1.33)
pt3dadd(-76.9, 19.23, -6, 1.25)
pt3dadd(-77, 19.43, -6, 1.14)
pt3dadd(-77.07, 19.67, -6, 0.7)
pt3dadd(-77.17, 19.93, -6, 0.6)
pt3dadd(-77.33, 20.07, -6, 0.51)
pt3dadd(-77.6, 20.24, -6, 0.46)
pt3dadd(-77.84, 20.39, -6, 0.41)
pt3dadd(-78.15, 20.54, -6, 0.4)
pt3dadd(-78.36, 20.56, -6, 0.42)
pt3dadd(-78.68, 20.6, -6, 0.46)
pt3dadd(-78.88, 20.59, -6, 0.52)
pt3dadd(-79.02, 20.72, -6, 0.5)
pt3dadd(-79.22, 20.79, -6, 0.46)
}
dend[48] {pt3dclear()
pt3dadd(-68.84, 12.59, -5.5, 1.91)
pt3dadd(-68.99, 12.19, -5.5, 0.99)
pt3dadd(-69.43, 11.88, -5.5, 0.41)
pt3dadd(-69.83, 11.78, -5.5, 0.41)
pt3dadd(-70.28, 11.71, -5.5, 0.41)
pt3dadd(-70.58, 11.38, -5.5, 0.53)
pt3dadd(-70.85, 10.88, -5.5, 0.7)
pt3dadd(-71, 10.56, -5.5, 0.75)
pt3dadd(-71.2, 10.34, -5.5, 0.77)
pt3dadd(-71.3, 10.26, -5.5, 0.68)
pt3dadd(-71.62, 10.08, -5.5, 0.63)
pt3dadd(-72.17, 9.8, -5.5, 0.51)
}
}
proc shape3d_10() {
dend[48] { pt3dadd(-72.68, 9.46, -5.5, 0.48)
pt3dadd(-73.04, 9.16, -5.5, 0.44)
pt3dadd(-73.45, 8.89, -5.5, 0.48)
pt3dadd(-73.83, 8.43, -5.5, 0.77)
pt3dadd(-74.17, 8.18, -5.5, 1.06)
pt3dadd(-74.6, 7.92, -5.5, 1.31)
pt3dadd(-75.02, 7.69, -5.5, 1.4)
pt3dadd(-75.08, 7.54, -5.5, 1.45)
pt3dadd(-75.28, 7.53, -5.5, 1.36)
pt3dadd(-75.42, 7.46, -5.5, 1.21)
pt3dadd(-75.75, 7.41, -5.5, 1.02)
pt3dadd(-75.9, 7.38, -5.5, 0.85)
pt3dadd(-76.12, 7.27, -5.5, 0.7)
pt3dadd(-76.46, 7.25, -5.5, 0.07)
pt3dadd(-76.6, 7.18, -5.5, 0.27)
pt3dadd(-76.96, 7.16, -5.5, 0.41)
pt3dadd(-77.21, 7.17, -5.5, 0.46)
pt3dadd(-77.87, 7.09, -5.5, 0.51)
pt3dadd(-78.42, 7.13, -5.5, 0.46)
pt3dadd(-78.79, 6.98, -5.5, 0.44)
pt3dadd(-79.12, 6.91, -5.5, 0.48)
pt3dadd(-79.45, 6.89, -5.5, 0.68)
pt3dadd(-80.23, 6.94, -5.5, 1.57)
pt3dadd(-80.81, 6.87, -5.5, 2.56)
pt3dadd(-81.18, 6.89, -5.5, 2.86)
pt3dadd(-81.5, 6.68, -5.5, 2.95)
pt3dadd(-81.85, 6.71, -5.5, 2.9)
pt3dadd(-82.14, 6.66, -5.5, 2.78)
pt3dadd(-82.33, 6.55, -5, 2.44)
pt3dadd(-82.36, 6.69, -5, 2.3)
pt3dadd(-82.93, 6.74, -5, 1.45)
pt3dadd(-83.56, 7.29, -5, 0.05)
pt3dadd(-84.14, 7.37, -5, 0.05)
pt3dadd(-84.81, 7.43, -5, 0.36)
pt3dadd(-85.1, 7.54, -5, 0.53)
pt3dadd(-85.38, 7.5, -5, 0.65)
pt3dadd(-85.72, 7.68, -5, 0.63)
pt3dadd(-86.02, 7.85, -5, 0.6)
pt3dadd(-86.25, 8, -5, 0.53)
pt3dadd(-86.53, 8.09, -5, 0.44)
pt3dadd(-86.75, 8.26, -5, 0.02)
pt3dadd(-87.35, 8.32, -5, 0.02)
pt3dadd(-87.66, 8.37, -5, 0.02)
pt3dadd(-88.41, 8.46, -5, 1.38)
pt3dadd(-89.18, 8.59, -5, 2.47)
pt3dadd(-89.54, 8.56, -5, 2.61)
pt3dadd(-89.68, 8.53, -5, 2.54)
pt3dadd(-89.9, 8.42, -5, 2.47)
pt3dadd(-90.07, 8.28, -5, 2.25)
pt3dadd(-90.21, 8.23, -5, 2.25)
pt3dadd(-89.99, 8.35, -5, 2.37)
pt3dadd(-90.17, 8.34, -5, 2.15)
pt3dadd(-90.41, 8.48, -5.5, 1.77)
pt3dadd(-90.61, 8.45, -5.5, 1.57)
pt3dadd(-90.84, 8.48, -5.5, 1.11)
pt3dadd(-91.14, 8.1, -5, 0.05)
pt3dadd(-91.43, 7.97, -5, 0.05)
pt3dadd(-91.68, 7.75, -5, 0.58)
pt3dadd(-91.9, 7.56, -5, 0.87)
pt3dadd(-92.15, 7.39, -5, 1.04)
pt3dadd(-92.43, 7.29, -5, 1.16)
pt3dadd(-92.64, 7.09, -5, 1.26)
pt3dadd(-92.95, 7.04, -5, 1.28)
pt3dadd(-93.18, 7.04, -5, 1.26)
pt3dadd(-93.41, 6.95, -5, 1.23)
pt3dadd(-93.59, 6.92, -5, 1.19)
pt3dadd(-93.73, 6.94, -5, 0.99)
pt3dadd(-93.99, 7.09, -5, 0.83)
pt3dadd(-94.17, 7.12, -5, 0.63)
pt3dadd(-94.44, 7.2, -5, 0.39)
pt3dadd(-94.7, 7.27, -5, 0.38)
pt3dadd(-94.9, 7.35, -5, 0.36)
pt3dadd(-95.23, 7.39, -5, 0.34)
pt3dadd(-95.52, 7.43, -5, 0.34)
pt3dadd(-95.64, 7.35, -5, 0.44)
pt3dadd(-95.88, 7.32, -5, 0.53)
pt3dadd(-96.06, 7.26, -5, 0.69)
pt3dadd(-96.21, 7.25, -5, 0.75)
pt3dadd(-96.36, 7.16, -5, 0.79)
pt3dadd(-96.49, 7.22, -5, 0.88)
pt3dadd(-96.64, 7.16, -5, 0.87)
pt3dadd(-96.95, 7.1, -5, 0.88)
pt3dadd(-97.29, 7.08, -5, 0.01)
pt3dadd(-97.69, 7.05, -5, 0.01)
pt3dadd(-98.33, 6.99, -5, 0.01)
pt3dadd(-98.93, 6.99, -4.5, 0.05)
pt3dadd(-99.57, 6.83, -4.5, 1.27)
pt3dadd(-99.89, 6.84, -4.5, 1.49)
pt3dadd(-100.18, 6.85, -4.5, 1.63)
pt3dadd(-100.39, 6.83, -4.5, 1.74)
pt3dadd(-100.8, 6.82, -4.5, 1.77)
pt3dadd(-100.98, 6.81, -4.5, 1.77)
pt3dadd(-101.22, 6.81, -4.5, 1.81)
pt3dadd(-101.49, 6.82, -4.5, 1.86)
pt3dadd(-101.79, 6.8, -4.5, 1.9)
pt3dadd(-101.98, 6.74, -4.5, 1.92)
pt3dadd(-102.22, 6.66, -4, 1.81)
pt3dadd(-102.55, 6.64, -4, 1.71)
pt3dadd(-102.82, 6.6, -4, 1.49)
pt3dadd(-103.12, 6.6, -4, 1.28)
pt3dadd(-103.32, 6.61, -4, 1.03)
pt3dadd(-103.62, 6.64, -4, 0.82)
pt3dadd(-103.92, 6.59, -4, 0.35)
pt3dadd(-104.02, 6.59, -4, 0.15)
pt3dadd(-104.32, 6.64, -4, 0.06)
pt3dadd(-104.72, 6.51, -4, 0.06)
pt3dadd(-104.92, 6.41, -4, 0.29)
pt3dadd(-105.12, 6.32, -4, 0.54)
pt3dadd(-105.42, 6.19, -4, 0.96)
pt3dadd(-105.82, 6.04, -4, 1.43)
pt3dadd(-106.02, 5.93, -4, 1.52)
pt3dadd(-106.32, 5.97, -4, 1.57)
pt3dadd(-106.52, 5.96, -4, 1.62)
pt3dadd(-106.72, 5.89, -4, 1.65)
pt3dadd(-107.02, 5.91, -4, 1.68)
pt3dadd(-107.22, 5.77, -4, 1.71)
pt3dadd(-107.12, 5.87, -4, 1.62)
pt3dadd(-107.22, 5.69, -4, 1.27)
pt3dadd(-107.51, 5.23, -4, 0.18)
pt3dadd(-107.71, 4.91, -4, 0.18)
pt3dadd(-108.21, 4.62, -4, 0.18)
pt3dadd(-108.71, 4.51, -4, 0.18)
pt3dadd(-109.01, 4.53, -4, 0.28)
pt3dadd(-109.41, 4.52, -4, 0.44)
pt3dadd(-109.51, 4.42, -4, 0.6)
pt3dadd(-109.81, 4.05, -4, 0.94)
pt3dadd(-110.21, 3.82, -4, 1.08)
pt3dadd(-110.41, 3.7, -4, 1.19)
pt3dadd(-110.61, 3.68, -4, 1.19)
pt3dadd(-110.81, 3.57, -4, 1.19)
pt3dadd(-111.01, 3.47, -4, 1.15)
pt3dadd(-111.01, 3.37, -4, 0.9)
pt3dadd(-111.31, 3.07, -4, 0.04)
pt3dadd(-111.61, 2.75, -4, 0.04)
pt3dadd(-112, 2.32, -4, 0.04)
pt3dadd(-112.2, 2.09, -4, 0.47)
pt3dadd(-112.4, 1.95, -4, 0.81)
pt3dadd(-112.6, 1.86, -4, 0.93)
pt3dadd(-112.8, 1.87, -4, 1.09)
pt3dadd(-113.1, 1.81, -4, 1.14)
pt3dadd(-113.3, 1.78, -4, 1.23)
pt3dadd(-113.3, 1.66, -3.5, 1.16)
pt3dadd(-113.6, 1.65, -3.5, 1.11)
pt3dadd(-113.8, 1.69, -3.5, 1.06)
pt3dadd(-114, 1.72, -3.5, 1.02)
pt3dadd(-114.1, 1.75, -3.5, 0.83)
pt3dadd(-113.9, 1.8, -3.5, 0.87)
}
dend[49] {pt3dclear()
pt3dadd(-40.87, 24.32, -6, 2.04)
pt3dadd(-41.11, 24.81, -6, 1.21)
pt3dadd(-41.22, 25.13, -6, 0.83)
pt3dadd(-41.34, 25.26, -6, 0.65)
pt3dadd(-41.32, 25.42, -6, 0.56)
pt3dadd(-41.36, 25.59, -6, 0.42)
pt3dadd(-41.43, 25.99, -6, 0.01)
pt3dadd(-41.37, 26.4, -6, 0.01)
pt3dadd(-41.36, 26.69, -6, 0.18)
pt3dadd(-41.32, 26.96, -6, 0.4)
pt3dadd(-41.28, 27.15, -6, 0.56)
pt3dadd(-41.2, 27.31, -6, 0.59)
pt3dadd(-41.16, 27.5, -6, 0.63)
pt3dadd(-41.07, 27.6, -6, 0.57)
pt3dadd(-40.95, 27.76, -6, 0.44)
pt3dadd(-40.75, 27.98, -6, 0.04)
pt3dadd(-40.6, 28.33, -6, 0.04)
pt3dadd(-40.51, 28.81, -6, 0.05)
pt3dadd(-40.49, 29.02, -6, 0.31)
pt3dadd(-40.41, 29.17, -6, 0.45)
pt3dadd(-40.4, 29.2, -6.5, 0.42)
pt3dadd(-40.04, 29.37, -6.5, 0.13)
pt3dadd(-39.77, 29.54, -6.5, 0.13)
pt3dadd(-39.62, 29.79, -6.5, 0.13)
pt3dadd(-39.57, 30.01, -6.5, 0.18)
pt3dadd(-39.44, 30.14, -6.5, 0.39)
pt3dadd(-39.36, 30.33, -6.5, 0.5)
pt3dadd(-39.25, 30.74, -6.5, 0.19)
pt3dadd(-39.09, 31.02, -6.5, 0.18)
pt3dadd(-39.01, 31.26, -6.5, 0.27)
pt3dadd(-38.94, 31.45, -6.5, 0.38)
pt3dadd(-38.76, 31.57, -6.5, 0.47)
pt3dadd(-38.63, 31.72, -6.5, 0.51)
}
dend[50] {pt3dclear()
pt3dadd(-15.62, 21.38, -7.5, 10.26)
pt3dadd(-18.15, 17.85, -7.5, 6.97)
}
dend[51] {pt3dclear()
pt3dadd(-18.15, 17.85, -7.5, 6.97)
pt3dadd(-19.61, 18.88, -8, 3.15)
pt3dadd(-21.41, 19.35, -8, 3.1)
pt3dadd(-22.17, 19.59, -8, 3)
pt3dadd(-22.58, 19.72, -8, 2.52)
pt3dadd(-23.26, 19.86, -8, 1.6)
pt3dadd(-23.78, 19.97, -8, 0.53)
pt3dadd(-24.31, 19.99, -8, 0.53)
pt3dadd(-24.76, 19.96, -8, 1.06)
pt3dadd(-25.16, 20.15, -8, 1.16)
pt3dadd(-25.32, 20.6, -8.5, 0.97)
pt3dadd(-25.51, 20.92, -8.5, 0.63)
pt3dadd(-25.74, 21.31, -8.5, 0.65)
pt3dadd(-25.97, 22.12, -8.5, 1.79)
pt3dadd(-26.03, 22.28, -8.5, 1.89)
pt3dadd(-26.55, 22.35, -8.5, 1.86)
pt3dadd(-26.93, 22.45, -8.5, 1.74)
pt3dadd(-27.18, 22.78, -8.5, 1.23)
}
}
proc shape3d_11() {
dend[51] { pt3dadd(-27.6, 23.24, -8.5, 0.73)
pt3dadd(-27.73, 23.56, -8.5, 0.58)
pt3dadd(-27.97, 23.86, -8.5, 0.56)
pt3dadd(-28.07, 24.16, -8.5, 0.58)
pt3dadd(-28.14, 24.51, -8.5, 0.6)
pt3dadd(-28.29, 24.82, -8.5, 0.63)
pt3dadd(-28.58, 25.22, -8.5, 0.65)
pt3dadd(-28.88, 25.54, -8.5, 0.58)
pt3dadd(-29.26, 25.87, -8.5, 0.58)
pt3dadd(-29.59, 26.5, -8.5, 0.56)
pt3dadd(-29.71, 27.14, -8.5, 0.56)
pt3dadd(-29.9, 27.66, -8.5, 0.56)
pt3dadd(-30.11, 28.25, -8.5, 0.56)
pt3dadd(-30.4, 28.87, -8.5, 0.58)
pt3dadd(-30.78, 29.42, -8.5, 0.63)
pt3dadd(-30.78, 29.78, -8.5, 0.68)
pt3dadd(-30.99, 29.93, -7.5, 0.48)
pt3dadd(-31.12, 30.21, -7.5, 0.46)
pt3dadd(-31.32, 30.38, -7.5, 0.39)
pt3dadd(-31.52, 30.77, -7.5, 0.46)
pt3dadd(-31.68, 31.09, -7.5, 0.53)
pt3dadd(-31.69, 31.49, -7.5, 0.75)
pt3dadd(-31.71, 31.75, -7, 0.8)
pt3dadd(-31.74, 31.94, -7, 0.8)
pt3dadd(-31.89, 32.31, -6.5, 0.76)
pt3dadd(-32.11, 32.59, -6.5, 0.93)
pt3dadd(-32.11, 32.8, -6.5, 1)
pt3dadd(-32.28, 32.99, -6.5, 0.98)
pt3dadd(-32.53, 33.05, -6.5, 0.93)
pt3dadd(-32.88, 33.13, -6.5, 0.86)
pt3dadd(-33.05, 33.18, -6.5, 0.73)
pt3dadd(-33.32, 33.27, -6.5, 0.59)
pt3dadd(-33.64, 33.36, -6.5, 0.53)
pt3dadd(-33.88, 33.36, -6, 0.45)
pt3dadd(-34.07, 33.44, -6, 0.44)
pt3dadd(-34.26, 33.57, -6, 0.42)
pt3dadd(-34.44, 33.73, -6, 0.41)
}
dend[52] {pt3dclear()
pt3dadd(-18.15, 17.85, -7.5, 6.97)
pt3dadd(-20.03, 16.51, -7.5, 6.24)
pt3dadd(-21.31, 15.95, -7.5, 6.1)
pt3dadd(-22.02, 15.02, -7.5, 6)
pt3dadd(-22.73, 14.47, -7.5, 5.32)
pt3dadd(-23.76, 13.18, -7.5, 4.89)
pt3dadd(-24.77, 12.52, -7.5, 5.32)
pt3dadd(-25.8, 11.72, -7.5, 6.1)
}
dend[53] {pt3dclear()
pt3dadd(-25.8, 11.72, -7.5, 6.1)
pt3dadd(-28.55, 13.83, -8, 0.34)
pt3dadd(-28.76, 13.89, -8, 0.39)
pt3dadd(-28.98, 13.91, -8, 0.46)
pt3dadd(-29.12, 13.93, -8, 0.53)
pt3dadd(-29.27, 14.17, -8, 0.51)
pt3dadd(-29.27, 14.55, -8, 0.07)
pt3dadd(-29.42, 14.78, -8, 0.07)
pt3dadd(-29.39, 14.96, -8, 0.34)
pt3dadd(-29.37, 15.13, -8, 0.51)
pt3dadd(-29.41, 15.64, -7.5, 0.15)
pt3dadd(-29.54, 15.92, -7.5, 0.22)
pt3dadd(-29.67, 16.27, -7.5, 0.56)
pt3dadd(-29.86, 16.58, -7.5, 0.87)
pt3dadd(-30.06, 16.73, -7.5, 1.04)
pt3dadd(-30.31, 16.99, -7.5, 1.04)
}
dend[54] {pt3dclear()
pt3dadd(-25.8, 11.72, -7.5, 6.1)
pt3dadd(-26.82, 10.01, -7.5, 5.27)
pt3dadd(-27.29, 8.88, -7.5, 5.3)
pt3dadd(-27.75, 8.13, -7.5, 5.49)
pt3dadd(-28.09, 7.42, -7.5, 5.54)
pt3dadd(-28.06, 6.5, -7.5, 5.59)
pt3dadd(-28.29, 5.7, -7.5, 5.64)
pt3dadd(-28.26, 4.72, -7.5, 5.95)
pt3dadd(-28.15, 4.45, -7.5, 5.81)
}
dend[55] {pt3dclear()
pt3dadd(-28.15, 4.45, -7.5, 5.81)
pt3dadd(-26.98, 2.74, -7.5, 4.94)
pt3dadd(-26.12, 1.4, -7.5, 4.65)
pt3dadd(-25.62, 0.07, -7.5, 3.97)
pt3dadd(-25.08, -1.87, -7.5, 3.53)
pt3dadd(-24.64, -4.51, -7.5, 2.95)
pt3dadd(-24.08, -5.95, -7.5, 3.77)
pt3dadd(-24.14, -6.88, -8, 4.74)
pt3dadd(-24.1, -8.54, -8, 5.27)
pt3dadd(-23.89, -9.16, -8, 5.71)
pt3dadd(-23.6, -9.87, -8, 5.95)
}
dend[56] {pt3dclear()
pt3dadd(-23.6, -9.87, -8, 5.95)
pt3dadd(-22.75, -11.43, -8, 3.77)
pt3dadd(-22.1, -12.48, -8, 3.39)
pt3dadd(-21.54, -13.34, -8, 3)
pt3dadd(-20.9, -14.45, -8, 2.81)
pt3dadd(-19.9, -15.46, -8.5, 2.71)
pt3dadd(-19.3, -16.45, -8.5, 2.9)
pt3dadd(-18.81, -17.29, -8.5, 3.24)
pt3dadd(-18.43, -17.78, -8.5, 3.53)
pt3dadd(-18.48, -17.99, -8, 3.51)
}
dend[57] {pt3dclear()
pt3dadd(-18.48, -17.99, -8, 3.51)
pt3dadd(-18.46, -18.35, -8, 3.07)
pt3dadd(-18.48, -18.82, -8, 2.88)
pt3dadd(-18.63, -19.34, -8, 2.59)
pt3dadd(-18.71, -19.83, -8, 2.2)
pt3dadd(-18.81, -20.42, -8, 1.74)
pt3dadd(-18.87, -20.88, -8, 1.28)
pt3dadd(-18.82, -21.61, -8.5, 0.99)
pt3dadd(-18.88, -22.09, -8.5, 0.94)
pt3dadd(-18.91, -22.58, -8.5, 0.94)
pt3dadd(-18.88, -23.15, -8.5, 1.09)
pt3dadd(-19.05, -23.72, -8.5, 1.26)
pt3dadd(-19.23, -24.15, -8.5, 1.4)
pt3dadd(-19.26, -24.68, -8.5, 1.38)
pt3dadd(-19.16, -25.15, -8.5, 1.43)
pt3dadd(-19.18, -25.58, -8.5, 1.65)
pt3dadd(-19.31, -25.94, -8.5, 1.55)
pt3dadd(-19.65, -26.74, -8.5, 1.65)
pt3dadd(-19.96, -27.16, -8.5, 1.94)
pt3dadd(-19.99, -27.67, -8.5, 2.32)
pt3dadd(-20, -28.2, -8.5, 2.37)
pt3dadd(-19.88, -28.94, -9, 2.93)
pt3dadd(-19.67, -29.77, -9, 3.44)
pt3dadd(-19.59, -30.15, -9, 3.8)
pt3dadd(-19.87, -30.6, -9, 3.7)
pt3dadd(-20.07, -31.15, -9, 3.19)
pt3dadd(-20.15, -31.74, -9.5, 2.4)
pt3dadd(-20.28, -32.38, -9.5, 1.86)
pt3dadd(-20.3, -32.55, -9.5, 1.72)
}
dend[58] {pt3dclear()
pt3dadd(-20.3, -32.55, -9.5, 1.72)
pt3dadd(-20.06, -33.08, -10.5, 0.82)
pt3dadd(-19.9, -33.56, -10.5, 0.46)
pt3dadd(-19.77, -33.89, -10.5, 0.44)
pt3dadd(-19.66, -34.18, -10.5, 0.36)
pt3dadd(-19.44, -34.53, -10.5, 0.46)
pt3dadd(-19.33, -34.84, -10.5, 0.63)
pt3dadd(-19.36, -35.01, -10.5, 0.68)
pt3dadd(-19.39, -35.29, -10.5, 0.63)
pt3dadd(-19.32, -35.67, -10.5, 0.58)
pt3dadd(-19.26, -36.04, -10.5, 0.56)
pt3dadd(-19.23, -36.43, -10.5, 0.6)
pt3dadd(-19.21, -36.73, -10.5, 0.65)
pt3dadd(-19, -37.07, -10.5, 0.7)
pt3dadd(-18.85, -37.37, -10.5, 0.8)
pt3dadd(-18.56, -37.6, -10.5, 0.87)
pt3dadd(-18.39, -37.82, -10.5, 0.85)
pt3dadd(-18.32, -38.16, -10.5, 0.77)
pt3dadd(-18.14, -38.68, -10.5, 0.68)
pt3dadd(-18.01, -39.03, -10.5, 0.63)
pt3dadd(-17.88, -39.47, -10.5, 0.65)
pt3dadd(-17.94, -39.68, -11, 0.53)
pt3dadd(-18.01, -39.79, -11, 0.39)
pt3dadd(-17.83, -40.17, -11, 0.15)
pt3dadd(-17.69, -40.56, -11, 0.12)
pt3dadd(-17.19, -41.66, -11, 1.91)
pt3dadd(-16.93, -42.05, -11, 2.44)
pt3dadd(-16.72, -42.4, -11, 2.56)
pt3dadd(-16.67, -42.64, -11, 2.4)
}
dend[59] {pt3dclear()
pt3dadd(-16.67, -42.64, -11, 2.4)
pt3dadd(-16.12, -42.58, -11.5, 1.66)
pt3dadd(-15.96, -42.6, -11, 1.46)
pt3dadd(-15.64, -42.74, -11, 1.08)
pt3dadd(-15.4, -42.86, -11, 0.7)
pt3dadd(-15.25, -42.93, -11, 0.51)
pt3dadd(-15.07, -43.04, -11, 0.41)
pt3dadd(-14.85, -43.16, -11, 0.46)
pt3dadd(-14.5, -43.37, -11, 0.68)
pt3dadd(-14.2, -43.51, -10.5, 0.59)
pt3dadd(-13.96, -43.82, -10.5, 0.56)
pt3dadd(-13.7, -44, -10.5, 0.54)
pt3dadd(-13.51, -44.26, -10.5, 0.48)
pt3dadd(-13.35, -44.51, -10.5, 0.47)
pt3dadd(-13.18, -44.75, -10.5, 0.44)
pt3dadd(-12.98, -44.96, -10.5, 0.04)
pt3dadd(-12.7, -45.23, -10.5, 0.04)
pt3dadd(-12.23, -45.48, -10.5, 0.04)
pt3dadd(-11.73, -45.76, -10.5, 0.04)
pt3dadd(-11.4, -46.02, -10.5, 0.04)
pt3dadd(-11.01, -46.2, -10, 0.25)
pt3dadd(-10.53, -46.65, -10.5, 0.81)
pt3dadd(-10.27, -46.8, -10.5, 0.91)
pt3dadd(-10.12, -46.97, -10.5, 0.96)
pt3dadd(-9.95, -47.09, -10.5, 0.99)
pt3dadd(-9.8, -47.28, -10.5, 1.03)
pt3dadd(-9.7, -47.41, -10.5, 1.04)
pt3dadd(-9.61, -47.53, -10.5, 1)
pt3dadd(-9.42, -47.53, -10.5, 0.9)
pt3dadd(-9.19, -47.59, -10.5, 0.47)
pt3dadd(-8.94, -47.72, -11, 0.02)
pt3dadd(-8.61, -47.94, -11, 0.04)
pt3dadd(-8.44, -48.07, -11, 0.16)
pt3dadd(-8.23, -48.16, -11, 0.21)
pt3dadd(-8.08, -48.08, -11, 0.23)
pt3dadd(-7.87, -48, -11, 0.25)
pt3dadd(-7.67, -47.99, -11, 0.24)
pt3dadd(-7.35, -48.11, -11, 0.33)
pt3dadd(-6.41, -48.43, -11, 1.15)
pt3dadd(-5.81, -48.8, -11, 1.56)
pt3dadd(-5.42, -48.91, -11, 1.54)
pt3dadd(-5.18, -49.17, -11, 1.54)
pt3dadd(-4.96, -49.25, -11, 1.5)
pt3dadd(-4.79, -49.4, -11, 1.43)
pt3dadd(-4.57, -49.54, -11, 1.33)
pt3dadd(-4.46, -49.69, -11, 1.21)
pt3dadd(-4.18, -49.51, -10, 1.14)
pt3dadd(-3.95, -49.59, -10, 0.82)
pt3dadd(-3.51, -49.62, -9.5, 0.56)
pt3dadd(-3.05, -49.72, -9.5, 0.1)
pt3dadd(-2.59, -49.93, -9.5, 0.1)
}
}
proc shape3d_12() {
dend[59] { pt3dadd(-2.2, -49.96, -9.5, 0.1)
pt3dadd(-1.76, -49.97, -9.5, 0.05)
pt3dadd(-1.37, -49.98, -9.5, 0.19)
pt3dadd(-1.12, -49.96, -9.5, 0.39)
pt3dadd(-0.74, -49.96, -9.5, 0.51)
pt3dadd(-0.55, -49.99, -9.5, 0.46)
pt3dadd(-0.15, -50.14, -8.5, 0.15)
pt3dadd(0.24, -50.44, -8.5, 0.19)
pt3dadd(0.72, -50.47, -8.5, 0.19)
pt3dadd(1.12, -50.47, -8.5, 0.22)
pt3dadd(1.57, -50.44, -8.5, 0.22)
pt3dadd(1.86, -50.19, -8.5, 0.22)
pt3dadd(2.11, -49.93, -8.5, 0.02)
pt3dadd(2.55, -49.23, -8.5, 0.02)
pt3dadd(4.06, -48.95, -8.5, 2.42)
pt3dadd(4.66, -49.24, -8.5, 3.19)
pt3dadd(4.9, -49.06, -7.5, 3.1)
pt3dadd(5.06, -49.08, -7.5, 3.22)
pt3dadd(5.39, -48.97, -7.5, 2.61)
pt3dadd(5.81, -48.81, -7.5, 1.98)
pt3dadd(6.3, -48.65, -7.5, 1.44)
pt3dadd(6.94, -48.6, -7.5, 0.48)
pt3dadd(7.34, -48.57, -7, 0.46)
pt3dadd(7.54, -48.57, -7, 0.21)
pt3dadd(7.7, -48.58, -7, 0.25)
pt3dadd(7.98, -48.58, -7, 0.35)
pt3dadd(8.37, -48.41, -6.5, 0.92)
pt3dadd(8.67, -48.37, -6.5, 1.08)
pt3dadd(8.8, -48.53, -6.5, 1.19)
pt3dadd(8.91, -48.66, -6.5, 1.19)
pt3dadd(9.11, -48.43, -6.5, 1.13)
pt3dadd(9.25, -48.33, -6.5, 0.85)
pt3dadd(9.38, -48.26, -6.5, 0.73)
pt3dadd(9.52, -48.2, -6.5, 0.47)
pt3dadd(9.74, -48.12, -6.5, 0.36)
pt3dadd(10.1, -47.99, -6.5, 0.35)
pt3dadd(10.29, -47.86, -6.5, 0.38)
pt3dadd(10.51, -47.78, -6.5, 0.39)
pt3dadd(10.8, -47.68, -6.5, 0.19)
pt3dadd(11.02, -47.67, -6.5, 0.23)
pt3dadd(11.31, -47.56, -6.5, 0.45)
pt3dadd(11.5, -47.48, -6.5, 0.5)
pt3dadd(11.64, -47.49, -6.5, 0.54)
pt3dadd(11.76, -47.51, -6.5, 0.45)
pt3dadd(11.95, -47.53, -6.5, 0.27)
pt3dadd(12.17, -47.56, -6.5, 0.21)
pt3dadd(12.58, -47.5, -7, 0.27)
pt3dadd(12.94, -47.44, -7, 0.36)
pt3dadd(13.31, -47.35, -7, 0.73)
pt3dadd(13.6, -47.41, -7, 0.94)
pt3dadd(13.83, -47.33, -7, 0.98)
pt3dadd(13.97, -47.22, -6.5, 0.86)
pt3dadd(14.13, -47.06, -6.5, 0.75)
pt3dadd(14.26, -46.97, -6.5, 0.59)
pt3dadd(14.43, -46.86, -7, 0.52)
pt3dadd(14.82, -46.76, -7, 0.01)
pt3dadd(15.15, -46.64, -7, 0.31)
pt3dadd(15.39, -46.67, -7, 0.52)
pt3dadd(15.56, -46.69, -7, 0.57)
pt3dadd(15.75, -46.7, -7, 0.6)
pt3dadd(16.01, -46.6, -7, 0.58)
pt3dadd(16.11, -46.51, -7, 0.53)
pt3dadd(16.34, -46.5, -7.5, 0.3)
pt3dadd(16.56, -46.46, -7.5, 0.28)
pt3dadd(16.85, -46.43, -7.5, 0.39)
pt3dadd(17.19, -46.41, -7.5, 0.54)
pt3dadd(17.49, -46.38, -7.5, 0.83)
pt3dadd(17.7, -46.37, -7.5, 0.87)
pt3dadd(17.98, -46.19, -7.5, 0.9)
pt3dadd(18.11, -46.2, -7.5, 0.87)
pt3dadd(18.33, -46.14, -7.5, 0.56)
pt3dadd(18.47, -46.04, -7, 0.41)
pt3dadd(18.76, -45.91, -7, 0.01)
pt3dadd(19.1, -45.8, -7, 0.01)
pt3dadd(19.36, -45.81, -7, 0.01)
pt3dadd(19.84, -45.77, -7.5, 0.88)
pt3dadd(20.23, -45.64, -7, 1.37)
pt3dadd(20.46, -45.81, -7, 1.56)
pt3dadd(20.59, -45.95, -7, 1.66)
pt3dadd(20.81, -46.04, -7, 1.62)
pt3dadd(21.02, -46.04, -7, 1.16)
pt3dadd(21.29, -46.11, -6.5, 0.69)
pt3dadd(21.55, -46.36, -6.5, 0.01)
pt3dadd(21.7, -46.53, -6.5, 0.01)
pt3dadd(21.88, -46.65, -6.5, 0.01)
pt3dadd(22, -46.84, -6.5, 0.23)
pt3dadd(22.1, -46.88, -6.5, 0.38)
pt3dadd(22.35, -46.93, -6.5, 0.4)
pt3dadd(22.54, -47.03, -6.5, 0.02)
pt3dadd(22.8, -47.11, -6.5, 0.06)
pt3dadd(23.15, -47.2, -6.5, 0.68)
pt3dadd(23.47, -47.32, -6.5, 1.16)
pt3dadd(23.58, -47.46, -6.5, 1.21)
pt3dadd(23.72, -47.63, -6.5, 1.1)
pt3dadd(23.89, -47.8, -6.5, 1)
pt3dadd(24.15, -47.82, -6.5, 0.8)
pt3dadd(24.35, -47.87, -6.5, 0.64)
pt3dadd(24.59, -48.07, -6.5, 0.5)
pt3dadd(24.85, -48.2, -6.5, 0.41)
pt3dadd(25.09, -48.28, -6.5, 0.36)
pt3dadd(25.36, -48.35, -6.5, 0.35)
pt3dadd(25.65, -48.41, -6.5, 0.35)
pt3dadd(25.91, -48.44, -6.5, 0.34)
pt3dadd(26.12, -48.44, -6.5, 0.3)
pt3dadd(26.2, -48.52, -6.5, 0.29)
pt3dadd(26.49, -48.7, -7, 0.34)
pt3dadd(26.84, -48.89, -7, 0.5)
pt3dadd(27.68, -49.1, -7.5, 1.55)
pt3dadd(28.49, -48.7, -7.5, 2.52)
pt3dadd(28.92, -48.42, -7.5, 2.56)
pt3dadd(29.16, -48.49, -7.5, 2.44)
pt3dadd(29.46, -48.35, -7.5, 2.18)
pt3dadd(29.66, -48.22, -7.5, 1.92)
pt3dadd(30.14, -48.03, -7.5, 1.75)
pt3dadd(30.42, -48.07, -7.5, 1.45)
pt3dadd(30.77, -48.12, -7.5, 1.1)
pt3dadd(31.09, -48.22, -7.5, 0.68)
pt3dadd(31.51, -48.46, -7.5, 0.44)
pt3dadd(31.81, -48.53, -7.5, 0.34)
pt3dadd(32.09, -48.53, -7.5, 0.34)
pt3dadd(32.28, -48.6, -7.5, 0.17)
pt3dadd(32.54, -48.63, -7.5, 0.18)
pt3dadd(32.76, -48.69, -7.5, 0.23)
pt3dadd(33.13, -48.75, -7.5, 0.28)
pt3dadd(33.39, -48.91, -7.5, 0.29)
pt3dadd(33.72, -49.03, -7.5, 0.34)
pt3dadd(33.96, -49.11, -7.5, 0.39)
pt3dadd(34.13, -49.18, -7.5, 0.42)
pt3dadd(34.37, -49.36, -7.5, 0.3)
pt3dadd(34.6, -49.49, -7.5, 0.11)
pt3dadd(34.86, -49.63, -7.5, 0.05)
pt3dadd(35.3, -49.86, -8, 0.56)
pt3dadd(35.67, -50.04, -8, 0.77)
pt3dadd(35.86, -50.01, -8, 0.99)
pt3dadd(36.11, -50.05, -8, 0.94)
pt3dadd(36.27, -50.18, -7.5, 0.63)
pt3dadd(36.49, -50.25, -7.5, 0.19)
pt3dadd(36.71, -50.3, -7.5, 0.06)
pt3dadd(37.04, -50.41, -7.5, 0.02)
pt3dadd(37.44, -50.5, -7.5, 0.02)
pt3dadd(37.88, -50.74, -7.5, 0.65)
pt3dadd(38.52, -50.93, -7.5, 1.31)
pt3dadd(38.64, -50.94, -7.5, 1.28)
pt3dadd(38.77, -50.87, -7.5, 1.34)
pt3dadd(38.96, -50.93, -7.5, 1.32)
pt3dadd(39.13, -50.94, -7.5, 1.2)
pt3dadd(39.33, -51.02, -7.5, 0.92)
pt3dadd(39.58, -51.02, -7.5, 0.51)
pt3dadd(39.76, -51.14, -7.5, 0.19)
pt3dadd(39.98, -51.32, -7.5, 0.01)
pt3dadd(40.24, -51.53, -7.5, 0.01)
pt3dadd(40.5, -51.75, -7.5, 0.05)
pt3dadd(40.64, -51.86, -7.5, 0.08)
pt3dadd(40.88, -51.97, -7.5, 0.11)
pt3dadd(41.01, -52.1, -7.5, 0.12)
pt3dadd(41.17, -52.19, -7.5, 0.13)
pt3dadd(41.49, -52.3, -7.5, 0.22)
pt3dadd(41.63, -52.43, -7.5, 0.33)
pt3dadd(41.77, -52.53, -7.5, 0.44)
pt3dadd(41.93, -52.55, -7.5, 0.41)
pt3dadd(42.14, -52.67, -7.5, 0.01)
pt3dadd(42.37, -52.81, -7.5, 0.01)
pt3dadd(42.48, -52.9, -7.5, 0.01)
pt3dadd(42.71, -53.06, -7.5, 0.47)
pt3dadd(42.8, -53.18, -7.5, 0.59)
pt3dadd(42.92, -53.26, -7.5, 0.57)
pt3dadd(43.15, -53.48, -7.5, 0.31)
pt3dadd(43.25, -53.73, -7.5, 0.01)
pt3dadd(43.45, -54.05, -7.5, 0.01)
pt3dadd(43.51, -54.28, -7.5, 0.01)
pt3dadd(43.61, -54.52, -7.5, 0.34)
pt3dadd(43.76, -54.67, -7.5, 0.45)
pt3dadd(43.95, -54.8, -7.5, 0.48)
pt3dadd(44.14, -54.79, -7.5, 0.46)
pt3dadd(44.27, -54.76, -7.5, 0.35)
pt3dadd(44.48, -54.61, -7.5, 0.01)
pt3dadd(44.91, -54.49, -7.5, 0.01)
pt3dadd(45.38, -54.73, -7.5, 0.01)
pt3dadd(45.7, -54.95, -7.5, 0.01)
pt3dadd(46.02, -55.38, -7.5, 0.68)
pt3dadd(46.28, -55.81, -7.5, 1.27)
pt3dadd(46.38, -56.05, -7.5, 1.38)
pt3dadd(46.43, -56.24, -7.5, 1.49)
pt3dadd(46.37, -56.39, -7.5, 1.55)
pt3dadd(46.35, -56.53, -7.5, 1.51)
pt3dadd(46.21, -56.64, -7.5, 1.38)
pt3dadd(46.17, -56.76, -7.5, 1.21)
pt3dadd(46.04, -56.94, -7.5, 1.04)
pt3dadd(46.06, -57.12, -7.5, 0.76)
pt3dadd(46.02, -57.22, -7.5, 0.73)
pt3dadd(46.38, -57.55, -8, 0.44)
pt3dadd(46.47, -57.81, -8, 0.46)
pt3dadd(46.76, -58.07, -8, 0.65)
pt3dadd(46.99, -58.21, -8, 0.8)
pt3dadd(47.11, -58.22, -8, 0.77)
}
dend[60] {pt3dclear()
pt3dadd(-16.67, -42.64, -11, 2.4)
pt3dadd(-16.99, -42.63, -11.5, 2.4)
pt3dadd(-17.22, -43.09, -11.5, 1.74)
pt3dadd(-17.46, -43.86, -11.5, 0.82)
pt3dadd(-17.54, -44.23, -11.5, 0.7)
}
}
proc shape3d_13() {
dend[60] { pt3dadd(-17.57, -44.57, -11.5, 0.67)
pt3dadd(-17.73, -45.07, -11.5, 0.58)
pt3dadd(-17.93, -45.37, -11, 0.46)
pt3dadd(-18.15, -45.64, -11, 0.1)
pt3dadd(-18.29, -46.02, -11, 0.02)
pt3dadd(-18.53, -46.5, -11, 0.02)
pt3dadd(-18.58, -46.92, -11, 0.02)
pt3dadd(-18.61, -47.27, -11, 0.42)
pt3dadd(-18.6, -47.56, -11, 0.52)
pt3dadd(-18.56, -47.96, -11, 0.68)
pt3dadd(-18.58, -48.21, -11, 0.82)
pt3dadd(-18.7, -48.4, -11, 0.85)
pt3dadd(-18.89, -48.57, -11, 0.81)
pt3dadd(-18.95, -48.85, -11, 0.77)
pt3dadd(-19.05, -49.19, -11, 0.68)
pt3dadd(-19.05, -49.55, -11, 0.59)
pt3dadd(-19.1, -49.79, -11, 0.29)
pt3dadd(-19.21, -50.03, -11, 0.25)
pt3dadd(-19.36, -50.31, -11, 0.51)
pt3dadd(-19.63, -50.71, -11, 0.88)
pt3dadd(-19.74, -50.92, -11, 0.92)
pt3dadd(-19.86, -51.2, -11, 0.88)
pt3dadd(-20.03, -51.49, -10.5, 0.82)
pt3dadd(-20.19, -51.83, -10.5, 0.17)
pt3dadd(-20.4, -52.15, -10.5, 0.02)
pt3dadd(-20.63, -52.87, -10.5, 0.02)
pt3dadd(-20.93, -53.69, -10.5, 0.02)
pt3dadd(-21.06, -54.04, -10.5, 0.41)
pt3dadd(-21.2, -54.7, -10.5, 0.8)
pt3dadd(-21.27, -55.29, -10.5, 0.99)
pt3dadd(-21.43, -55.84, -10.5, 1.26)
pt3dadd(-21.67, -56.43, -10.5, 1.48)
pt3dadd(-21.79, -56.84, -10.5, 1.77)
pt3dadd(-21.99, -57.41, -10, 1.94)
}
dend[61] {pt3dclear()
pt3dadd(-20.3, -32.55, -9.5, 1.72)
pt3dadd(-20.69, -32.76, -9.5, 1.19)
pt3dadd(-20.79, -33.04, -9.5, 0.9)
pt3dadd(-21.07, -33.28, -10, 0.53)
pt3dadd(-21.17, -33.57, -10, 0.5)
pt3dadd(-21.15, -33.85, -10, 0.54)
pt3dadd(-21.09, -34.19, -10, 0.68)
pt3dadd(-21.04, -34.44, -10, 0.79)
pt3dadd(-21.06, -34.62, -10, 0.81)
pt3dadd(-21.24, -34.89, -10, 0.67)
pt3dadd(-21.42, -35.1, -10, 0.57)
pt3dadd(-21.64, -35.37, -10, 0.65)
pt3dadd(-21.95, -35.69, -10, 1.05)
pt3dadd(-22.25, -36.05, -10, 1.55)
pt3dadd(-22.5, -36.22, -10, 1.65)
pt3dadd(-22.75, -36.4, -10, 1.68)
pt3dadd(-22.88, -36.59, -10, 1.72)
pt3dadd(-23.1, -36.85, -10, 1.71)
pt3dadd(-23.44, -37.05, -10, 1.66)
pt3dadd(-23.67, -37.27, -10, 1.46)
pt3dadd(-23.9, -37.46, -10, 1.37)
pt3dadd(-24.12, -37.58, -10, 1.29)
pt3dadd(-24.13, -37.63, -9.5, 1.16)
pt3dadd(-24.25, -37.74, -9.5, 1.05)
pt3dadd(-24.39, -37.84, -9.5, 0.96)
pt3dadd(-24.58, -37.95, -9.5, 0.87)
pt3dadd(-24.8, -38.08, -9.5, 0.82)
pt3dadd(-24.97, -38.16, -9.5, 0.54)
pt3dadd(-25.1, -38.25, -9.5, 0.51)
pt3dadd(-25.27, -38.31, -9.5, 0.51)
pt3dadd(-25.45, -38.37, -9.5, 0.5)
pt3dadd(-25.72, -38.64, -9.5, 0.46)
pt3dadd(-26.28, -38.82, -9.5, 0.56)
pt3dadd(-26.67, -39.14, -9.5, 1.31)
pt3dadd(-26.93, -39.37, -9.5, 1.77)
pt3dadd(-27.35, -39.67, -9.5, 2.32)
pt3dadd(-27.53, -39.82, -9.5, 2.66)
pt3dadd(-27.88, -40.06, -9.5, 2.86)
pt3dadd(-28.2, -40.39, -9.5, 2.98)
pt3dadd(-28.55, -40.74, -9.5, 3.02)
pt3dadd(-28.8, -41, -9.5, 2.98)
pt3dadd(-29.08, -41.33, -9.5, 2.9)
pt3dadd(-29.33, -41.54, -9.5, 2.71)
pt3dadd(-29.53, -41.6, -9.5, 2.35)
}
dend[62] {pt3dclear()
pt3dadd(-29.53, -41.6, -9.5, 2.35)
pt3dadd(-29.26, -42.46, -10, 1.73)
pt3dadd(-29.22, -42.97, -10, 1.11)
pt3dadd(-29.24, -43.38, -10, 0.9)
pt3dadd(-29.25, -43.84, -10, 0.46)
pt3dadd(-29.25, -44.15, -10, 0.39)
pt3dadd(-29.15, -44.38, -10, 0.41)
pt3dadd(-28.93, -44.86, -10, 0.15)
pt3dadd(-28.58, -45.7, -10, 0.1)
pt3dadd(-28.24, -46.57, -10, 0.1)
pt3dadd(-28.18, -46.94, -9.5, 0.65)
pt3dadd(-28.2, -47.36, -9.5, 0.85)
pt3dadd(-28.34, -47.8, -9.5, 0.99)
pt3dadd(-28.41, -48.13, -9.5, 1.04)
pt3dadd(-28.55, -48.41, -9.5, 1.14)
pt3dadd(-28.57, -48.63, -9.5, 0.99)
pt3dadd(-28.52, -49.03, -10, 1.02)
pt3dadd(-28.53, -49.17, -10, 0.82)
pt3dadd(-28.47, -49.57, -10, 0.63)
pt3dadd(-28.19, -49.97, -10, 0.51)
pt3dadd(-28.01, -50.46, -10, 0.56)
pt3dadd(-27.95, -50.79, -10, 0.77)
pt3dadd(-27.8, -51.1, -10, 0.92)
pt3dadd(-27.82, -51.51, -10, 0.17)
pt3dadd(-27.32, -52.41, -10, 0.17)
pt3dadd(-26.69, -53.4, -10, 0.1)
pt3dadd(-26.39, -53.71, -10, 0.63)
pt3dadd(-26.14, -54.13, -10, 1.31)
pt3dadd(-25.93, -54.67, -10, 1.52)
pt3dadd(-25.79, -54.82, -10.5, 1.45)
pt3dadd(-25.63, -55.23, -10.5, 0.92)
pt3dadd(-25.42, -55.78, -10.5, 0.07)
pt3dadd(-25.15, -56.31, -10.5, 0.07)
pt3dadd(-24.92, -56.78, -10.5, 0.29)
pt3dadd(-24.33, -57.66, -10.5, 1.79)
pt3dadd(-24.12, -58.6, -10.5, 2.56)
pt3dadd(-24.77, -59.04, -10.5, 2.3)
pt3dadd(-25.02, -59.31, -10.5, 2.08)
pt3dadd(-25.29, -59.7, -10.5, 1.89)
pt3dadd(-25.52, -60.01, -10.5, 1.67)
pt3dadd(-25.56, -60.3, -10.5, 1.33)
pt3dadd(-25.46, -61.03, -10.5, 0.02)
pt3dadd(-25.33, -61.5, -10.5, 0.02)
pt3dadd(-25.1, -62.07, -11, 0.41)
pt3dadd(-25.03, -62.49, -11, 0.6)
pt3dadd(-24.94, -62.73, -11, 0.73)
pt3dadd(-24.87, -63.11, -11, 0.77)
pt3dadd(-24.84, -63.64, -11, 0.36)
pt3dadd(-24.84, -64.19, -11, 0.19)
pt3dadd(-24.78, -64.89, -11, 0.07)
pt3dadd(-24.52, -65.71, -11, 0.07)
pt3dadd(-24.37, -66.84, -11, 0.07)
pt3dadd(-24.28, -67.52, -11, 0.12)
pt3dadd(-24.37, -68.47, -11.5, 1.28)
pt3dadd(-24.22, -69.04, -11.5, 1.5)
pt3dadd(-23.99, -69.24, -11.5, 1.6)
pt3dadd(-23.54, -69.65, -11.5, 1.55)
pt3dadd(-23.41, -69.94, -11.5, 1.45)
pt3dadd(-23.39, -70.14, -11.5, 1.43)
pt3dadd(-23.56, -70.5, -11, 1.4)
pt3dadd(-23.62, -70.99, -11, 1.36)
pt3dadd(-23.59, -71.24, -11, 0.65)
pt3dadd(-23.48, -71.66, -11, 0.31)
pt3dadd(-23.41, -72, -11, 0.24)
pt3dadd(-23.3, -72.61, -11, 0.12)
pt3dadd(-23.18, -73.31, -11, 0.02)
pt3dadd(-23.06, -73.89, -11, 0.02)
pt3dadd(-23, -74.34, -11, 0.02)
pt3dadd(-22.99, -74.73, -11, 0.6)
pt3dadd(-23.18, -75.26, -11, 1.23)
pt3dadd(-23.15, -75.51, -11, 1.31)
pt3dadd(-23.07, -75.67, -11, 1.14)
pt3dadd(-23.18, -75.91, -11.5, 0.92)
pt3dadd(-22.98, -76.04, -11.5, 0.7)
pt3dadd(-23.03, -76.79, -11.5, 0.02)
pt3dadd(-22.93, -77.78, -11.5, 0.02)
pt3dadd(-22.82, -78.45, -11.5, 0.02)
pt3dadd(-22.8, -78.75, -11.5, 0.6)
pt3dadd(-22.39, -79.8, -11.5, 1.72)
pt3dadd(-21.79, -80.5, -11.5, 2.11)
pt3dadd(-21.33, -81.04, -11.5, 2.4)
pt3dadd(-21.13, -81.51, -11.5, 2.47)
pt3dadd(-21.2, -82.1, -11.5, 2.37)
pt3dadd(-21.22, -82.27, -11.5, 2.25)
}
dend[63] {pt3dclear()
pt3dadd(-29.53, -41.6, -9.5, 2.35)
pt3dadd(-30.05, -41.78, -9.5, 1.77)
pt3dadd(-30.45, -41.94, -9.5, 1.28)
pt3dadd(-30.87, -42.06, -9.5, 0.75)
pt3dadd(-31.11, -42.16, -9.5, 0.6)
pt3dadd(-31.37, -42.33, -9.5, 0.58)
pt3dadd(-31.67, -42.48, -9.5, 0.58)
pt3dadd(-32.08, -42.67, -9.5, 0.58)
pt3dadd(-32.29, -42.76, -9.5, 0.56)
pt3dadd(-32.67, -42.74, -9.5, 0.56)
pt3dadd(-33.1, -42.68, -9.5, 0.56)
pt3dadd(-33.28, -42.81, -9.5, 0.65)
pt3dadd(-33.81, -43.03, -9.5, 0.77)
pt3dadd(-34.25, -43.31, -9.5, 0.85)
pt3dadd(-34.49, -43.42, -9.5, 0.9)
pt3dadd(-34.85, -43.7, -9.5, 0.92)
pt3dadd(-35.15, -43.8, -9.5, 0.7)
pt3dadd(-35.42, -44.05, -9.5, 0.56)
pt3dadd(-35.74, -44.3, -9.5, 0.53)
pt3dadd(-36.06, -44.56, -9.5, 0.58)
pt3dadd(-36.4, -44.79, -9.5, 0.6)
pt3dadd(-36.8, -45.1, -9.5, 0.58)
pt3dadd(-37.14, -45.51, -9.5, 0.6)
pt3dadd(-37.62, -45.94, -9.5, 0.94)
pt3dadd(-38.33, -46.68, -9.5, 2.18)
pt3dadd(-38.88, -47.18, -9.5, 3.07)
pt3dadd(-39.13, -47.43, -9.5, 3.15)
pt3dadd(-39.49, -47.48, -9.5, 3.32)
pt3dadd(-39.85, -47.61, -9.5, 3.24)
pt3dadd(-40.05, -47.84, -9.5, 2.93)
pt3dadd(-40.5, -48.21, -9.5, 2.27)
pt3dadd(-40.9, -48.43, -9.5, 1.81)
pt3dadd(-41.33, -48.78, -9.5, 0.68)
pt3dadd(-41.68, -49.03, -9.5, 0.54)
pt3dadd(-41.92, -49.2, -9.5, 0.51)
pt3dadd(-42.17, -49.43, -9.5, 0.5)
pt3dadd(-42.39, -49.66, -9.5, 0.52)
pt3dadd(-42.49, -49.92, -9.5, 0.57)
}
}
proc shape3d_14() {
dend[63] { pt3dadd(-42.65, -50.28, -9.5, 0.54)
pt3dadd(-42.68, -50.55, -9.5, 0.57)
pt3dadd(-42.76, -50.77, -9.5, 0.57)
pt3dadd(-42.92, -50.93, -9.5, 0.58)
pt3dadd(-43.14, -51.12, -9.5, 0.56)
pt3dadd(-43.3, -51.28, -9.5, 0.53)
pt3dadd(-43.59, -51.63, -9.5, 0.44)
pt3dadd(-43.77, -51.9, -9.5, 0.44)
pt3dadd(-43.96, -52.04, -9.5, 0.47)
pt3dadd(-44.08, -52.14, -9.5, 0.51)
pt3dadd(-44.16, -52.38, -9.5, 0.53)
pt3dadd(-44.28, -52.61, -9.5, 0.51)
pt3dadd(-44.38, -52.72, -9.5, 0.41)
pt3dadd(-44.47, -52.82, -9.5, 0.33)
pt3dadd(-44.62, -52.89, -9.5, 0.33)
pt3dadd(-44.83, -52.97, -9.5, 0.35)
pt3dadd(-45.02, -53.13, -9.5, 0.41)
pt3dadd(-45.12, -53.3, -9.5, 0.45)
pt3dadd(-45.21, -53.52, -9.5, 0.47)
pt3dadd(-45.43, -54.02, -9.5, 0.74)
pt3dadd(-45.7, -54.32, -9.5, 0.99)
pt3dadd(-45.96, -54.82, -9.5, 1.28)
pt3dadd(-46.19, -55.13, -9.5, 1.62)
pt3dadd(-46.86, -55.35, -9.5, 2.29)
pt3dadd(-47.22, -55.48, -9.5, 2.75)
pt3dadd(-47.3, -55.81, -9.5, 2.77)
pt3dadd(-47.49, -56.18, -9.5, 3.39)
pt3dadd(-48.07, -57.2, -9.5, 3.99)
pt3dadd(-48.45, -57.85, -9.5, 4.21)
pt3dadd(-48.35, -58.32, -9.5, 4.31)
pt3dadd(-48.6, -58.54, -9.5, 4.21)
pt3dadd(-48.76, -58.84, -9.5, 3.94)
pt3dadd(-48.91, -59.1, -9.5, 3.51)
pt3dadd(-49.05, -59.45, -9.5, 3.12)
pt3dadd(-49.45, -59.78, -9.5, 2.73)
pt3dadd(-49.49, -60.04, -9.5, 2.42)
}
dend[64] {pt3dclear()
pt3dadd(-49.49, -60.04, -9.5, 2.42)
pt3dadd(-49.38, -60.5, -9.5, 1.94)
pt3dadd(-49.34, -60.78, -9, 1.84)
pt3dadd(-49.43, -61.3, -9, 1.4)
pt3dadd(-49.65, -61.77, -9, 0.82)
pt3dadd(-49.8, -62.3, -9, 0.7)
pt3dadd(-49.79, -62.79, -9, 0.75)
pt3dadd(-49.8, -63.58, -9, 0.85)
pt3dadd(-49.92, -64.33, -9, 0.94)
pt3dadd(-50.09, -65.23, -9.5, 1.06)
pt3dadd(-50.14, -65.68, -9.5, 1.48)
pt3dadd(-50.35, -66.02, -9.5, 1.65)
pt3dadd(-50.67, -66.27, -9.5, 1.6)
pt3dadd(-50.95, -66.51, -9.5, 1.55)
pt3dadd(-51.27, -66.78, -9.5, 1.5)
pt3dadd(-51.38, -67.04, -9.5, 1.31)
pt3dadd(-51.38, -67.3, -9.5, 1.11)
pt3dadd(-51.42, -67.63, -9.5, 0.99)
pt3dadd(-51.56, -68.03, -9.5, 0.56)
pt3dadd(-51.65, -68.56, -10, 0.51)
pt3dadd(-51.7, -68.99, -10, 0.5)
pt3dadd(-51.82, -69.29, -10, 0.47)
pt3dadd(-52.28, -69.84, -10, 0.44)
pt3dadd(-52.63, -70.26, -10, 0.44)
pt3dadd(-52.95, -70.7, -10, 0.48)
pt3dadd(-53.07, -71.15, -10, 0.62)
pt3dadd(-53.26, -71.52, -10, 0.81)
pt3dadd(-53.38, -71.85, -10, 1.08)
pt3dadd(-53.49, -72.52, -10, 1.38)
pt3dadd(-53.61, -72.86, -10, 1.43)
pt3dadd(-53.62, -73.11, -10, 1.44)
pt3dadd(-53.75, -73.32, -10, 1.4)
pt3dadd(-53.8, -73.68, -10, 1.37)
pt3dadd(-54.01, -74.03, -10, 1.27)
pt3dadd(-54.15, -73.98, -10.5, 0.82)
pt3dadd(-54.7, -74.62, -10.5, 0.33)
pt3dadd(-54.77, -74.95, -10.5, 0.33)
pt3dadd(-54.8, -75.18, -10.5, 0.38)
pt3dadd(-54.86, -75.46, -10.5, 0.41)
pt3dadd(-54.95, -75.72, -10.5, 0.46)
pt3dadd(-54.98, -75.93, -10.5, 0.42)
pt3dadd(-55.03, -76.13, -10.5, 0.16)
pt3dadd(-55.2, -76.34, -10.5, 0.19)
pt3dadd(-55.28, -76.62, -10.5, 0.58)
pt3dadd(-55.42, -76.98, -10.5, 0.93)
pt3dadd(-55.58, -77.33, -10.5, 1.23)
pt3dadd(-55.8, -77.59, -10.5, 1.28)
pt3dadd(-55.95, -77.88, -10.5, 1.33)
pt3dadd(-56.04, -78.1, -10.5, 1.28)
pt3dadd(-55.98, -78.38, -10.5, 1.25)
}
dend[65] {pt3dclear()
pt3dadd(-49.49, -60.04, -9.5, 2.42)
pt3dadd(-50.11, -60.5, -9.5, 0.63)
pt3dadd(-50.15, -59.7, -9.5, 1.27)
pt3dadd(-50.52, -59.53, -9.5, 1)
pt3dadd(-50.9, -59.72, -9, 0.68)
pt3dadd(-51.17, -59.64, -9, 0.62)
pt3dadd(-51.46, -59.49, -9, 0.51)
pt3dadd(-51.7, -59.42, -9, 0.5)
pt3dadd(-51.92, -59.29, -9, 0.48)
pt3dadd(-52.16, -59.17, -9, 0.48)
pt3dadd(-52.58, -58.98, -9.5, 0.47)
pt3dadd(-52.85, -58.9, -9.5, 0.5)
pt3dadd(-53.33, -58.84, -9.5, 0.51)
pt3dadd(-53.69, -58.94, -9.5, 0.56)
pt3dadd(-54.57, -58.76, -9.5, 1.54)
pt3dadd(-54.87, -58.7, -9.5, 1.63)
pt3dadd(-55.23, -58.46, -9.5, 1.89)
pt3dadd(-55.36, -58.35, -9.5, 1.92)
pt3dadd(-55.73, -58.2, -9.5, 2.01)
pt3dadd(-55.89, -58.17, -9.5, 2)
pt3dadd(-56.14, -58.36, -9.5, 1.9)
pt3dadd(-56.31, -58.38, -9.5, 1.78)
pt3dadd(-56.55, -58.49, -9.5, 1.58)
pt3dadd(-56.84, -58.53, -9.5, 1.48)
pt3dadd(-57.1, -58.65, -9.5, 1.39)
pt3dadd(-57.31, -58.8, -9.5, 1.23)
pt3dadd(-57.52, -58.85, -9.5, 1.17)
pt3dadd(-57.71, -58.94, -9.5, 1.14)
pt3dadd(-57.89, -59.05, -9.5, 1.04)
pt3dadd(-57.95, -59.16, -9.5, 0.87)
pt3dadd(-58.07, -59.42, -9.5, 0.7)
pt3dadd(-58.31, -59.55, -9.5, 0.48)
pt3dadd(-58.48, -59.67, -9.5, 0.27)
pt3dadd(-58.6, -59.89, -9.5, 0.15)
pt3dadd(-58.8, -60.33, -9.5, 0.1)
pt3dadd(-59.11, -60.6, -9.5, 0.08)
pt3dadd(-59.37, -60.7, -9.5, 0.1)
pt3dadd(-59.71, -60.73, -9.5, 0.1)
pt3dadd(-59.97, -60.81, -9.5, 0.29)
pt3dadd(-60.21, -60.86, -9.5, 0.44)
pt3dadd(-60.44, -60.91, -9.5, 0.48)
pt3dadd(-60.65, -60.97, -9.5, 0.48)
pt3dadd(-60.75, -61.01, -9.5, 0.46)
pt3dadd(-61.12, -61.16, -9.5, 0.02)
pt3dadd(-61.41, -61.52, -9.5, 0.02)
pt3dadd(-61.6, -61.74, -9.5, 0.38)
pt3dadd(-61.66, -62.06, -9.5, 0.85)
pt3dadd(-61.77, -62.27, -9.5, 0.94)
pt3dadd(-61.91, -62.43, -9.5, 0.93)
pt3dadd(-62.01, -62.69, -9.5, 0.88)
pt3dadd(-62.12, -62.92, -9.5, 0.79)
pt3dadd(-62.37, -63.04, -9, 0.4)
pt3dadd(-62.51, -63.27, -9, 0.25)
pt3dadd(-62.58, -63.58, -9, 0.19)
pt3dadd(-62.63, -63.9, -9, 0.22)
pt3dadd(-62.62, -64.26, -9, 0.5)
pt3dadd(-62.56, -64.67, -9, 0.79)
pt3dadd(-62.81, -64.94, -8.5, 0.97)
pt3dadd(-62.91, -65.23, -8.5, 1.03)
pt3dadd(-63, -65.42, -8.5, 1.09)
pt3dadd(-63.18, -65.6, -8.5, 1.03)
pt3dadd(-63.28, -65.75, -8.5, 0.91)
pt3dadd(-63.26, -65.86, -8.5, 0.46)
pt3dadd(-63.34, -66.08, -8.5, 0.15)
pt3dadd(-63.6, -66.3, -8.5, 0.07)
pt3dadd(-64.15, -66.79, -8.5, 0.07)
pt3dadd(-64.36, -66.83, -8.5, 0.31)
pt3dadd(-64.66, -66.97, -8.5, 0.36)
pt3dadd(-64.89, -67.05, -8.5, 0.41)
pt3dadd(-65.09, -67.26, -8.5, 0.36)
pt3dadd(-65.44, -67.61, -8.5, 0.15)
pt3dadd(-66.38, -68.4, -9, 0.15)
pt3dadd(-66.87, -68.77, -9, 0.19)
pt3dadd(-67.26, -69.12, -9, 0.56)
pt3dadd(-67.54, -69.38, -9, 1.09)
pt3dadd(-67.83, -69.63, -9, 1.16)
pt3dadd(-67.98, -69.73, -9, 1.11)
pt3dadd(-68.33, -69.69, -9, 1.09)
pt3dadd(-68.54, -69.66, -9, 1.02)
pt3dadd(-68.75, -69.66, -9, 0.94)
pt3dadd(-69.2, -69.9, -9, 0.36)
pt3dadd(-69.6, -69.96, -9, 0.19)
pt3dadd(-70.02, -70.14, -9, 0.07)
pt3dadd(-70.31, -70.25, -9, 0.34)
pt3dadd(-70.52, -70.37, -9, 0.56)
pt3dadd(-70.82, -70.6, -9, 0.65)
pt3dadd(-71.03, -70.91, -9, 0.75)
pt3dadd(-71.08, -71.08, -9, 0.48)
}
dend[66] {pt3dclear()
pt3dadd(-18.48, -17.99, -8, 3.51)
pt3dadd(-17.57, -17.7, -8, 1.91)
pt3dadd(-17.08, -17.54, -8, 1.38)
pt3dadd(-16.42, -17.6, -8, 0.68)
pt3dadd(-16.19, -17.59, -8, 0.51)
pt3dadd(-15.46, -17.4, -8, 0.54)
pt3dadd(-15.23, -17.35, -8, 0.56)
pt3dadd(-14.97, -17.27, -8, 0.54)
pt3dadd(-14.68, -17.15, -8, 0.56)
pt3dadd(-14.46, -17.11, -8, 0.54)
pt3dadd(-14.16, -17.06, -8, 0.52)
pt3dadd(-13.98, -17.07, -8.5, 0.42)
pt3dadd(-13.83, -17.07, -8.5, 0.39)
pt3dadd(-13.55, -16.92, -8.5, 0.38)
pt3dadd(-12.74, -16.63, -8.5, 1.32)
pt3dadd(-12.34, -16.6, -8.5, 1.46)
pt3dadd(-12.19, -16.5, -8.5, 1.45)
pt3dadd(-12, -16.07, -8, 0.92)
pt3dadd(-11.82, -15.74, -8, 0.42)
pt3dadd(-11.65, -15.54, -8, 0.4)
pt3dadd(-11.39, -15.29, -8, 0.38)
pt3dadd(-11.08, -15.02, -8, 0.38)
pt3dadd(-10.81, -14.41, -8, 0.59)
pt3dadd(-10.51, -14.27, -8, 0.8)
pt3dadd(-10.38, -14.12, -8, 0.87)
pt3dadd(-10.26, -13.79, -8, 0.71)
}
}
proc shape3d_15() {
dend[66] { pt3dadd(-10.22, -13.5, -8, 0.65)
pt3dadd(-10.1, -12.7, -8, 1.23)
pt3dadd(-9.9, -12.11, -8, 1.96)
pt3dadd(-9.43, -12.11, -8.5, 1.25)
pt3dadd(-9.02, -12.14, -8.5, 0.85)
pt3dadd(-8.88, -12.16, -8.5, 0.67)
pt3dadd(-8.6, -11.92, -8.5, 0.56)
pt3dadd(-8.41, -11.78, -8.5, 0.52)
pt3dadd(-8.12, -11.72, -8.5, 0.48)
pt3dadd(-7.78, -11.93, -8.5, 0.48)
pt3dadd(-7.5, -12.04, -8.5, 0.46)
pt3dadd(-7.29, -12.19, -8.5, 0.44)
pt3dadd(-6.96, -12.25, -8.5, 0.45)
pt3dadd(-6.53, -12.23, -8.5, 0.48)
pt3dadd(-5.92, -12.05, -8.5, 0.76)
pt3dadd(-5.41, -11.49, -8.5, 1.13)
pt3dadd(-5.02, -11.06, -8.5, 1.44)
pt3dadd(-5.01, -10.73, -8.5, 2.11)
pt3dadd(-5.15, -10.32, -8.5, 2.56)
pt3dadd(-4.86, -10.23, -8, 2.42)
}
dend[67] {pt3dclear()
pt3dadd(-4.86, -10.23, -8, 2.42)
pt3dadd(-5.55, -9.95, -8, 1.79)
pt3dadd(-5.57, -9.65, -8.5, 1.62)
pt3dadd(-5.75, -9.27, -8.5, 1.16)
pt3dadd(-5.65, -8.97, -8.5, 0.82)
pt3dadd(-5.59, -8.75, -8.5, 0.71)
pt3dadd(-5.84, -7.92, -8, 0.58)
pt3dadd(-5.93, -7.35, -8, 0.68)
pt3dadd(-6.13, -6.77, -8, 1.02)
pt3dadd(-6.18, -6.02, -8, 1.96)
pt3dadd(-6.29, -5.51, -8, 2.23)
pt3dadd(-6.17, -4.96, -8, 2.42)
pt3dadd(-6.23, -4.41, -8, 2.52)
pt3dadd(-5.88, -4.09, -8, 2.44)
pt3dadd(-5.4, -3.8, -8, 2.3)
pt3dadd(-4.93, -3.49, -8, 1.65)
pt3dadd(-4.7, -3.13, -8, 0.85)
pt3dadd(-4.33, -2.87, -8, 0.73)
pt3dadd(-4.11, -2.42, -8, 0.68)
pt3dadd(-3.95, -2.11, -8, 0.73)
pt3dadd(-3.77, -1.71, -8, 0.77)
pt3dadd(-3.61, -1.18, -8, 0.05)
pt3dadd(-3.26, -0.34, -8, 0.05)
pt3dadd(-2.98, 0.44, -8, 0.05)
pt3dadd(-2.81, 0.83, -8, 0.44)
pt3dadd(-2.71, 1.2, -8, 0.8)
pt3dadd(-2.64, 1.6, -8, 1.16)
pt3dadd(-2.62, 1.94, -8, 1.09)
pt3dadd(-2.59, 2.24, -8, 1.02)
pt3dadd(-2.52, 2.55, -8, 0.75)
pt3dadd(-2.34, 3.12, -8, 0.65)
pt3dadd(-2.14, 3.39, -8, 0.65)
pt3dadd(-1.86, 3.66, -8, 0.65)
pt3dadd(-1.66, 3.85, -8, 0.63)
pt3dadd(-1.42, 4.2, -8, 0.22)
pt3dadd(-1.08, 4.71, -8, 0.22)
pt3dadd(-0.94, 5.06, -8, 0.48)
pt3dadd(-0.69, 5.27, -8, 0.7)
pt3dadd(-0.44, 5.55, -8, 0.85)
pt3dadd(-0.27, 5.84, -8, 0.82)
pt3dadd(-0.15, 6.1, -8, 0.65)
pt3dadd(0.07, 6.28, -8, 0.53)
pt3dadd(0.27, 6.48, -8, 0.41)
pt3dadd(0.61, 6.71, -8, 0.34)
pt3dadd(0.96, 7.02, -8, 0.29)
pt3dadd(1.15, 7.42, -8, 0.29)
pt3dadd(1.17, 7.83, -8, 0.29)
pt3dadd(1.27, 8.16, -8, 0.36)
pt3dadd(1.58, 8.6, -8, 0.48)
pt3dadd(1.67, 9.09, -8, 0.56)
pt3dadd(1.92, 9.42, -8, 0.53)
pt3dadd(2.3, 9.76, -8, 0.6)
pt3dadd(2.53, 10.08, -8, 0.77)
}
dend[68] {pt3dclear()
pt3dadd(-4.86, -10.23, -8, 2.42)
pt3dadd(-3.73, -9.7, -8, 2.13)
pt3dadd(-3.6, -9.57, -8, 1.98)
pt3dadd(-3.22, -9.48, -8, 1.89)
pt3dadd(-2.82, -9.36, -8, 1.55)
pt3dadd(-2.51, -9.16, -8, 1.02)
pt3dadd(-2.22, -8.69, -8, 0.31)
pt3dadd(-1.73, -7.97, -7.5, 0.31)
pt3dadd(-1.41, -7.71, -7.5, 0.34)
pt3dadd(-1.02, -7.31, -7.5, 0.31)
pt3dadd(-0.65, -7, -7.5, 0.31)
pt3dadd(-0.34, -6.47, -7, 0.36)
pt3dadd(0.04, -6.21, -7, 0.36)
pt3dadd(0.34, -6.14, -7, 0.39)
pt3dadd(0.76, -5.85, -7, 0.41)
pt3dadd(1.17, -5.83, -7, 0.41)
pt3dadd(1.53, -5.8, -7, 0.39)
pt3dadd(1.86, -5.58, -7, 0.36)
pt3dadd(2.09, -5.44, -6.5, 0.34)
pt3dadd(2.7, -4.89, -7.5, 0.17)
pt3dadd(3.53, -3.83, -7.5, 0.19)
pt3dadd(4.12, -2.85, -7.5, 0.46)
pt3dadd(4.52, -2.09, -7.5, 1.09)
pt3dadd(4.93, -1.4, -7.5, 1.31)
pt3dadd(5.25, -0.94, -7.5, 1.6)
pt3dadd(5.56, -0.19, -7.5, 1.86)
pt3dadd(5.98, 0.36, -7.5, 2.06)
pt3dadd(6.63, 0.56, -7.5, 2.13)
pt3dadd(7.17, 0.87, -7.5, 2.18)
pt3dadd(8.25, 1.1, -7.5, 2.11)
pt3dadd(8.41, 1.44, -7.5, 1.69)
pt3dadd(8.64, 1.98, -7.5, 1.27)
pt3dadd(8.98, 2.67, -7.5, 0.6)
pt3dadd(9.44, 3.14, -7.5, 0.41)
pt3dadd(10.01, 3.48, -7.5, 0.48)
pt3dadd(10.75, 3.97, -7.5, 0.63)
pt3dadd(11.41, 4.52, -7.5, 1.28)
pt3dadd(11.77, 4.84, -7.5, 1.48)
pt3dadd(12.1, 5.02, -7.5, 1.55)
pt3dadd(12.27, 5.08, -7.5, 1.5)
pt3dadd(12.54, 5.26, -7.5, 1.4)
pt3dadd(12.44, 5.23, -7.5, 1.33)
pt3dadd(12.86, 5.48, -7.5, 1.26)
pt3dadd(13.04, 5.71, -7.5, 1.09)
pt3dadd(13.26, 5.96, -7.5, 0.8)
pt3dadd(13.47, 6.07, -7.5, 0.56)
pt3dadd(13.88, 6.36, -7.5, 0.51)
pt3dadd(14.25, 6.59, -7.5, 0.56)
pt3dadd(14.51, 6.73, -7.5, 0.59)
pt3dadd(14.74, 7.05, -7.5, 0.57)
pt3dadd(14.89, 7.31, -7.5, 0.54)
pt3dadd(15.25, 7.51, -7.5, 0.53)
pt3dadd(15.64, 7.69, -7.5, 0.16)
pt3dadd(15.95, 7.89, -7.5, 0.18)
pt3dadd(16.33, 8.01, -7.5, 0.21)
pt3dadd(16.75, 8.16, -7.5, 0.23)
pt3dadd(17.11, 8.31, -7.5, 0.25)
pt3dadd(17.69, 8.66, -7.5, 0.35)
pt3dadd(18.26, 8.98, -7, 0.92)
pt3dadd(18.63, 9.15, -7, 1.09)
pt3dadd(19.03, 9.39, -7, 1.19)
pt3dadd(19.26, 9.67, -7, 1.25)
pt3dadd(19.49, 10.02, -7, 1.22)
pt3dadd(19.68, 10.14, -7, 1.06)
}
dend[69] {pt3dclear()
pt3dadd(-23.6, -9.87, -8, 5.95)
pt3dadd(-25.22, -10.05, -8, 4.45)
pt3dadd(-26.2, -10.92, -8, 2.73)
pt3dadd(-27.35, -11.94, -8, 0.63)
pt3dadd(-27.73, -12.17, -8, 0.53)
pt3dadd(-28.22, -12.42, -8, 0.51)
pt3dadd(-28.6, -12.66, -8, 0.51)
pt3dadd(-28.89, -12.82, -8, 0.6)
pt3dadd(-29.15, -12.84, -8, 0.63)
pt3dadd(-29.38, -12.89, -8, 0.6)
pt3dadd(-29.69, -12.85, -8, 0.51)
pt3dadd(-30.24, -12.9, -8.5, 0.31)
pt3dadd(-30.62, -12.79, -8.5, 0.34)
pt3dadd(-31, -12.95, -8.5, 0.36)
pt3dadd(-31.43, -13.21, -8.5, 0.36)
pt3dadd(-31.81, -13.48, -8.5, 0.36)
pt3dadd(-32.2, -13.7, -8.5, 0.6)
pt3dadd(-32.41, -14.02, -8.5, 1.02)
pt3dadd(-32.7, -14.21, -8.5, 1.19)
pt3dadd(-32.87, -14.46, -8.5, 1.23)
pt3dadd(-32.95, -14.75, -8.5, 1.21)
pt3dadd(-33.26, -15.07, -8.5, 1.11)
pt3dadd(-33.39, -15.15, -8, 0.87)
pt3dadd(-33.66, -15.38, -8, 0.63)
pt3dadd(-33.89, -15.55, -8, 0.12)
pt3dadd(-34.39, -16.23, -8, 0.12)
pt3dadd(-35.02, -16.73, -8, 0.12)
pt3dadd(-35.42, -17.1, -8, 0.65)
pt3dadd(-35.78, -17.95, -8, 1.67)
pt3dadd(-36.09, -18.57, -8, 2.69)
pt3dadd(-36.89, -18.94, -8, 2.81)
}
dend[70] {pt3dclear()
pt3dadd(-36.89, -18.94, -8, 2.81)
pt3dadd(-37.42, -18.97, -7.5, 2.27)
pt3dadd(-37.87, -18.98, -7.5, 2.15)
pt3dadd(-38.08, -18.85, -7.5, 1.77)
pt3dadd(-38.46, -18.87, -7.5, 1.4)
pt3dadd(-38.75, -18.87, -7.5, 1.04)
pt3dadd(-39.29, -18.92, -7.5, 0.69)
pt3dadd(-39.94, -19.16, -7.5, 0.46)
pt3dadd(-40.26, -19.12, -7.5, 0.44)
pt3dadd(-40.69, -19.14, -7.5, 0.41)
pt3dadd(-40.92, -19.11, -7.5, 0.39)
pt3dadd(-41.26, -18.97, -8, 0.34)
pt3dadd(-41.69, -18.86, -8, 0.29)
pt3dadd(-41.94, -18.87, -8, 0.31)
pt3dadd(-42.26, -18.98, -8, 0.36)
pt3dadd(-42.5, -19.06, -8, 0.44)
pt3dadd(-42.68, -19.17, -8, 0.46)
pt3dadd(-42.93, -19.23, -8, 0.44)
pt3dadd(-43.2, -19.48, -8, 0.64)
pt3dadd(-43.59, -19.85, -8, 0.97)
pt3dadd(-43.74, -20.08, -8, 1.25)
pt3dadd(-43.91, -20.27, -8, 1.29)
pt3dadd(-44.09, -20.47, -8, 1.28)
pt3dadd(-44.25, -20.61, -8, 1.27)
pt3dadd(-44.45, -20.79, -8, 1.25)
pt3dadd(-44.55, -20.89, -8, 1.15)
pt3dadd(-44.79, -21.29, -7.5, 0.46)
pt3dadd(-45.25, -21.55, -7.5, 0.42)
pt3dadd(-45.66, -21.77, -7.5, 0.38)
pt3dadd(-45.94, -21.91, -7.5, 0.36)
pt3dadd(-46.42, -22.06, -7.5, 0.36)
pt3dadd(-46.77, -22.12, -7.5, 0.39)
}
}
proc shape3d_16() {
dend[70] { pt3dadd(-47.12, -22.26, -7.5, 0.42)
pt3dadd(-47.44, -22.3, -7.5, 0.47)
pt3dadd(-47.73, -22.39, -7, 0.52)
pt3dadd(-47.98, -22.59, -7, 0.56)
pt3dadd(-48.17, -22.78, -6.5, 0.65)
pt3dadd(-48.42, -23.1, -7, 0.92)
pt3dadd(-48.57, -23.34, -7, 1.29)
pt3dadd(-48.76, -23.7, -7, 1.73)
pt3dadd(-48.92, -23.9, -7, 2.04)
pt3dadd(-49.16, -24.01, -7, 2.14)
pt3dadd(-49.44, -24.05, -7, 2.27)
pt3dadd(-49.47, -24.26, -7, 2.23)
pt3dadd(-49.49, -24.41, -7, 2.02)
pt3dadd(-49.53, -24.72, -7, 1.75)
pt3dadd(-49.64, -24.94, -7, 1.4)
pt3dadd(-49.8, -25.09, -7, 1.13)
pt3dadd(-49.88, -25.29, -7, 1.08)
pt3dadd(-50.24, -25.53, -6.5, 0.24)
pt3dadd(-50.32, -25.88, -6.5, 0.24)
pt3dadd(-50.38, -26.37, -6.5, 0.24)
pt3dadd(-50.55, -26.65, -6.5, 0.34)
pt3dadd(-51.08, -27.23, -6.5, 1.22)
pt3dadd(-51.38, -27.66, -6.5, 1.94)
pt3dadd(-51.69, -27.91, -6.5, 2.55)
pt3dadd(-51.81, -28.11, -6.5, 2.66)
pt3dadd(-51.98, -28.28, -6.5, 2.83)
pt3dadd(-52.13, -28.55, -6.5, 2.87)
pt3dadd(-52.35, -28.73, -6.5, 2.79)
pt3dadd(-52.52, -28.82, -6.5, 2.58)
pt3dadd(-52.74, -28.97, -6.5, 2.27)
pt3dadd(-52.98, -29.08, -6.5, 2.08)
pt3dadd(-53.16, -29.13, -6.5, 1.88)
pt3dadd(-53.39, -29.21, -6.5, 1.62)
pt3dadd(-53.61, -29.33, -6.5, 1.36)
pt3dadd(-53.7, -29.46, -6.5, 1.16)
pt3dadd(-54, -29.65, -6.5, 0.75)
pt3dadd(-54.42, -30, -6.5, 0.41)
pt3dadd(-54.67, -30.39, -6.5, 0.4)
pt3dadd(-54.92, -30.64, -6.5, 0.4)
pt3dadd(-55.16, -31, -6.5, 0.41)
pt3dadd(-55.27, -31.28, -6.5, 0.46)
pt3dadd(-55.36, -31.52, -6.5, 0.51)
pt3dadd(-55.53, -31.72, -6.5, 0.41)
pt3dadd(-55.67, -31.97, -6.5, 0.27)
pt3dadd(-55.92, -32.39, -6.5, 0.27)
pt3dadd(-56.09, -32.69, -6.5, 0.41)
pt3dadd(-56.78, -33.75, -6.5, 2.08)
pt3dadd(-57.16, -33.88, -6.5, 2.47)
pt3dadd(-57.64, -33.83, -6.5, 2.37)
pt3dadd(-58.13, -33.97, -6.5, 2.35)
pt3dadd(-58.3, -34.21, -6.5, 2.3)
pt3dadd(-58.38, -34.66, -6.5, 2.13)
pt3dadd(-58.45, -34.73, -7, 2.01)
}
dend[71] {pt3dclear()
pt3dadd(-58.45, -34.73, -7, 2.01)
pt3dadd(-58.84, -34.97, -7, 1.36)
pt3dadd(-59.04, -35.16, -7, 1.04)
pt3dadd(-59.97, -35.85, -7, 0.5)
pt3dadd(-60.34, -36.05, -7, 0.46)
pt3dadd(-60.53, -36.43, -7, 0.46)
pt3dadd(-60.92, -37.3, -6.5, 0.44)
pt3dadd(-61.24, -37.51, -6.5, 0.41)
pt3dadd(-61.5, -37.69, -6.5, 0.46)
pt3dadd(-61.99, -37.83, -6.5, 0.53)
pt3dadd(-62.39, -37.74, -6.5, 0.7)
pt3dadd(-62.94, -37.71, -6.5, 1.31)
pt3dadd(-63.45, -37.8, -6.5, 1.6)
pt3dadd(-64, -37.86, -6.5, 2.08)
pt3dadd(-64.56, -37.96, -6.5, 2.25)
pt3dadd(-65.08, -38.04, -6.5, 2.9)
pt3dadd(-65.25, -38.04, -6.5, 3.29)
pt3dadd(-65.82, -37.96, -6.5, 3.48)
pt3dadd(-66.06, -38.31, -6.5, 3.44)
}
dend[72] {pt3dclear()
pt3dadd(-66.06, -38.31, -6.5, 3.44)
pt3dadd(-66.72, -39.27, -6.5, 2.9)
pt3dadd(-66.82, -40.13, -6.5, 2.81)
pt3dadd(-66.92, -40.94, -6.5, 2.66)
pt3dadd(-66.67, -41.31, -6.5, 2.23)
pt3dadd(-66.76, -41.65, -6, 1.79)
pt3dadd(-67.81, -42.42, -6, 0.36)
pt3dadd(-68.04, -42.9, -6, 0.27)
pt3dadd(-68.54, -43.81, -6, 0.27)
pt3dadd(-68.78, -44.34, -6, 0.31)
pt3dadd(-69.2, -44.98, -5.5, 0.77)
pt3dadd(-69.4, -45.15, -5.5, 0.94)
pt3dadd(-69.76, -45.32, -5.5, 1.09)
pt3dadd(-69.96, -45.63, -5.5, 1.04)
pt3dadd(-70.14, -45.88, -5.5, 0.99)
pt3dadd(-70.3, -46.14, -5.5, 0.94)
pt3dadd(-70.38, -46.37, -6, 0.24)
pt3dadd(-70.74, -47.08, -6, 0.24)
pt3dadd(-71.44, -48.06, -6, 0.24)
pt3dadd(-72.01, -49.06, -6, 0.24)
pt3dadd(-72.32, -49.8, -6, 0.31)
pt3dadd(-72.4, -50.43, -6, 0.41)
pt3dadd(-72.64, -50.81, -6, 0.73)
pt3dadd(-72.75, -51.35, -6, 0.9)
pt3dadd(-72.85, -51.75, -6, 0.99)
}
dend[73] {pt3dclear()
pt3dadd(-66.06, -38.31, -6.5, 3.44)
pt3dadd(-67.95, -37.08, -6, 0.53)
pt3dadd(-68.3, -36.97, -6, 0.56)
pt3dadd(-68.68, -36.91, -6, 0.56)
pt3dadd(-69, -36.84, -6, 0.44)
pt3dadd(-69.45, -36.73, -6, 0.22)
pt3dadd(-70.06, -36.58, -6, 0.17)
pt3dadd(-70.89, -36.41, -6, 0.17)
pt3dadd(-71.65, -36.23, -6, 0.31)
pt3dadd(-72.06, -36.26, -6, 0.51)
pt3dadd(-72.36, -36.39, -6, 0.58)
pt3dadd(-72.67, -36.48, -6, 0.6)
pt3dadd(-72.92, -36.45, -6, 0.51)
pt3dadd(-73.23, -36.32, -6, 0.15)
pt3dadd(-73.76, -36.28, -6, 0.1)
pt3dadd(-74.51, -36.25, -6, 0.1)
pt3dadd(-75.03, -36.41, -6, 0.1)
pt3dadd(-75.41, -36.54, -6, 0.39)
pt3dadd(-75.9, -36.77, -6, 1.21)
pt3dadd(-76.05, -37, -6, 1.4)
pt3dadd(-76.14, -37.21, -6, 1.65)
pt3dadd(-76.34, -37.51, -6, 1.62)
pt3dadd(-76.64, -37.79, -6, 1.52)
pt3dadd(-76.78, -38.06, -6, 1.21)
pt3dadd(-77.02, -38.21, -6, 0.94)
pt3dadd(-77.25, -38.25, -6, 0.9)
pt3dadd(-77.57, -38.31, -6, 0.34)
pt3dadd(-78.02, -38.38, -6, 0.29)
pt3dadd(-78.41, -38.33, -6, 0.36)
pt3dadd(-78.84, -38.31, -6, 0.56)
pt3dadd(-79.18, -38.41, -6, 0.82)
pt3dadd(-79.52, -38.59, -6, 1.04)
pt3dadd(-79.86, -38.38, -6, 0.99)
pt3dadd(-80.07, -38.08, -6, 0.9)
pt3dadd(-80.3, -37.91, -6, 0.46)
pt3dadd(-80.53, -37.81, -6, 0.12)
pt3dadd(-81.13, -37.69, -6, 0.07)
pt3dadd(-82.16, -37.53, -6, 0.07)
pt3dadd(-83.07, -37.67, -6, 0.07)
pt3dadd(-83.84, -37.57, -6, 0.07)
pt3dadd(-84.35, -37.52, -6, 0.15)
pt3dadd(-85, -37.54, -6, 0.24)
pt3dadd(-85.57, -37.53, -6, 0.53)
pt3dadd(-86.29, -37.7, -6, 1.74)
pt3dadd(-87.36, -37.89, -6, 3.12)
pt3dadd(-87.69, -38.09, -6, 3.36)
pt3dadd(-88.05, -38.12, -6, 3.46)
pt3dadd(-88.45, -38.14, -6, 3.41)
pt3dadd(-88.74, -38.07, -6, 3.19)
pt3dadd(-89.16, -38.02, -6, 2.49)
pt3dadd(-89.64, -38.03, -5, 1.26)
pt3dadd(-90.09, -37.95, -5, 1.02)
pt3dadd(-90.83, -37.79, -5, 0.53)
pt3dadd(-91.68, -37.49, -5, 0.48)
pt3dadd(-92.64, -37.37, -5, 0.48)
pt3dadd(-93.85, -36.97, -5, 0.48)
pt3dadd(-94.53, -36.88, -5, 0.68)
pt3dadd(-95.43, -37.02, -5, 0.82)
pt3dadd(-95.99, -37.64, -5, 0.73)
pt3dadd(-97.05, -37.9, -4.5, 0.58)
pt3dadd(-97.84, -38.09, -4.5, 0.58)
pt3dadd(-98.93, -38.43, -4.5, 0.58)
pt3dadd(-99.72, -38.68, -4.5, 0.92)
pt3dadd(-100.52, -38.72, -4.5, 2.47)
pt3dadd(-100.92, -38.78, -4.5, 2.81)
pt3dadd(-101.48, -39.29, -4.5, 1.89)
pt3dadd(-102.12, -39.9, -4.5, 0.1)
pt3dadd(-102.86, -40.52, -4.5, 0.1)
pt3dadd(-103.26, -40.71, -4.5, 0.1)
pt3dadd(-103.66, -41.01, -4.5, 0.73)
pt3dadd(-103.96, -41.03, -4.5, 0.97)
pt3dadd(-104.56, -41.19, -4.5, 1.16)
pt3dadd(-104.86, -41.4, -4.5, 1.26)
}
dend[74] {pt3dclear()
pt3dadd(-58.45, -34.73, -7, 2.01)
pt3dadd(-57.58, -35.34, -7, 1.69)
pt3dadd(-57.27, -35.62, -7, 1.21)
pt3dadd(-57.02, -35.85, -7, 0.8)
pt3dadd(-56.21, -36.24, -7, 0.17)
pt3dadd(-55.88, -36.54, -7, 0.05)
pt3dadd(-55.5, -36.86, -7, 0.05)
pt3dadd(-55.45, -37.19, -7.5, 0.6)
pt3dadd(-55.33, -37.32, -7.5, 0.82)
pt3dadd(-55.3, -37.6, -7.5, 0.87)
pt3dadd(-55.12, -37.92, -6.5, 0.48)
pt3dadd(-55.17, -38.27, -6.5, 0.1)
pt3dadd(-55.14, -38.78, -6.5, 0.1)
pt3dadd(-55.14, -39.36, -6.5, 0.1)
pt3dadd(-55.05, -39.77, -6, 0.31)
pt3dadd(-54.93, -40.18, -6, 0.58)
pt3dadd(-54.73, -40.35, -6, 0.7)
pt3dadd(-54.62, -40.42, -6, 0.63)
pt3dadd(-54.21, -40.69, -6.5, 0.15)
pt3dadd(-53.81, -41.05, -6.5, 0.24)
pt3dadd(-53.46, -41.34, -6.5, 0.6)
pt3dadd(-53.27, -41.57, -6.5, 0.82)
pt3dadd(-53.12, -41.73, -7, 0.65)
pt3dadd(-52.79, -42.32, -7, 0.15)
pt3dadd(-52.7, -42.5, -7, 0.31)
pt3dadd(-52.48, -42.72, -7, 0.48)
pt3dadd(-52.4, -42.97, -7, 0.56)
pt3dadd(-52.43, -43.19, -7.5, 0.51)
pt3dadd(-52.4, -43.62, -8, 0.29)
pt3dadd(-52.43, -43.88, -8, 0.29)
}
}
proc shape3d_17() {
dend[74] { pt3dadd(-52.53, -44.46, -8, 0.29)
pt3dadd(-52.53, -44.83, -8.5, 0.48)
pt3dadd(-52.56, -45.22, -8.5, 0.73)
pt3dadd(-52.58, -45.54, -8.5, 0.97)
pt3dadd(-52.69, -45.92, -8.5, 1.09)
pt3dadd(-52.8, -46.17, -8.5, 1.06)
pt3dadd(-52.89, -46.44, -8.5, 0.87)
pt3dadd(-52.97, -46.64, -8.5, 0.57)
pt3dadd(-53.04, -46.91, -8.5, 0.08)
pt3dadd(-53.25, -47.51, -8.5, 0.08)
pt3dadd(-53.35, -48.07, -8.5, 0.08)
pt3dadd(-53.38, -48.68, -8.5, 0.45)
pt3dadd(-53.33, -49.06, -8.5, 0.71)
pt3dadd(-53.54, -49.39, -8, 1.09)
pt3dadd(-54.12, -50.38, -8, 1.96)
pt3dadd(-53.62, -51.02, -8, 1.5)
pt3dadd(-53.44, -51.76, -8, 1.28)
pt3dadd(-53.38, -52.21, -8, 1.21)
pt3dadd(-53.5, -52.44, -8, 1.06)
pt3dadd(-53.53, -52.87, -8, 0.1)
pt3dadd(-53.66, -53.24, -8, 0.1)
pt3dadd(-53.86, -53.31, -8, 0.41)
pt3dadd(-54.22, -53.26, -8, 0.44)
pt3dadd(-54.56, -53.33, -8, 0.53)
pt3dadd(-55, -53.39, -8, 0.63)
pt3dadd(-55.17, -53.46, -8, 0.58)
pt3dadd(-55.39, -53.43, -8.5, 0.48)
pt3dadd(-55.9, -53.28, -8.5, 0.29)
pt3dadd(-56.08, -53.15, -8.5, 0.39)
pt3dadd(-56.53, -53.18, -8.5, 0.58)
pt3dadd(-56.87, -53.2, -8.5, 0.87)
pt3dadd(-57.26, -53.33, -8, 1.06)
pt3dadd(-57.54, -53.39, -8, 1.14)
}
dend[75] {pt3dclear()
pt3dadd(-36.89, -18.94, -8, 2.81)
pt3dadd(-36.72, -20.43, -8, 0.27)
pt3dadd(-36.47, -21.08, -8, 0.27)
pt3dadd(-36.16, -21.46, -8, 0.29)
pt3dadd(-35.93, -21.85, -8, 0.24)
pt3dadd(-35.74, -22.3, -8, 0.24)
pt3dadd(-35.66, -22.69, -8, 0.24)
pt3dadd(-35.4, -23, -8, 0.73)
pt3dadd(-34.96, -23.15, -8, 0.92)
}
dend[76] {pt3dclear()
pt3dadd(-34.96, -23.15, -8, 0.92)
pt3dadd(-35.26, -23.5, -8, 1.14)
pt3dadd(-35.33, -23.81, -8, 1.23)
pt3dadd(-35.44, -24.01, -8, 1.21)
pt3dadd(-35.63, -24.2, -8, 1.16)
pt3dadd(-35.86, -24.24, -8, 1.06)
pt3dadd(-35.76, -24.36, -8, 1.04)
pt3dadd(-35.91, -24.6, -7.5, 0.97)
pt3dadd(-35.8, -25.07, -7.5, 0.1)
pt3dadd(-35.7, -25.84, -7.5, 0.1)
pt3dadd(-35.6, -26.58, -7.5, 0.1)
pt3dadd(-35.55, -26.86, -7.5, 0.31)
pt3dadd(-35.66, -27.1, -7.5, 0.51)
pt3dadd(-35.88, -27.23, -7.5, 0.46)
pt3dadd(-35.98, -27.22, -8, 0.39)
pt3dadd(-36.14, -27.49, -8, 0.07)
pt3dadd(-36.46, -28.01, -8, 0.07)
pt3dadd(-36.51, -28.37, -8, 0.39)
pt3dadd(-36.74, -28.78, -8, 0.94)
pt3dadd(-37, -29.1, -8, 1.23)
pt3dadd(-37.16, -29.26, -8, 1.31)
}
dend[77] {pt3dclear()
pt3dadd(-34.96, -23.15, -8, 0.92)
pt3dadd(-34.85, -23.14, -7.5, 0.58)
pt3dadd(-34.68, -23.05, -7.5, 0.29)
pt3dadd(-34.3, -22.94, -7.5, 0.29)
pt3dadd(-33.88, -23.15, -7.5, 0.24)
pt3dadd(-33.46, -23.43, -7.5, 0.24)
pt3dadd(-33.16, -23.63, -7.5, 0.48)
pt3dadd(-32.92, -23.82, -7.5, 0.85)
}
dend[78] {pt3dclear()
pt3dadd(-28.15, 4.45, -7.5, 5.81)
pt3dadd(-32.06, 4.07, -7.5, 0.46)
pt3dadd(-32.48, 3.93, -7.5, 0.39)
pt3dadd(-32.85, 3.85, -7.5, 0.36)
pt3dadd(-33.32, 3.68, -7.5, 0.36)
pt3dadd(-33.66, 3.5, -7.5, 0.36)
pt3dadd(-34.01, 3.5, -7.5, 0.34)
pt3dadd(-34.4, 3.58, -7.5, 0.34)
pt3dadd(-35.25, 3.69, -7, 0.41)
pt3dadd(-35.5, 3.5, -7, 0.48)
pt3dadd(-35.9, 3.19, -7, 0.48)
pt3dadd(-36.64, 2.85, -7, 0.44)
pt3dadd(-37.12, 2.73, -7, 0.41)
pt3dadd(-37.78, 2.47, -7, 0.39)
pt3dadd(-38.44, 2.11, -7, 0.39)
pt3dadd(-38.9, 1.91, -6.5, 0.36)
pt3dadd(-39.38, 1.63, -6, 0.31)
pt3dadd(-39.62, 1.47, -6, 0.29)
pt3dadd(-40, 1.26, -6, 0.29)
pt3dadd(-40.39, 1.01, -6, 0.02)
pt3dadd(-40.82, 0.83, -6, 0.02)
pt3dadd(-40.96, 0.74, -6, 0.19)
pt3dadd(-41.18, 0.56, -6, 0.19)
pt3dadd(-41.48, 0.44, -6, 0.19)
pt3dadd(-41.81, 0.26, -6, 0.19)
pt3dadd(-42.25, 0.09, -6, 0.73)
pt3dadd(-42.75, -0.03, -6, 1.14)
pt3dadd(-43.27, -0.22, -6, 1.72)
pt3dadd(-43.7, -0.35, -6, 2.23)
pt3dadd(-44.17, -0.49, -6, 2.66)
pt3dadd(-44.43, -0.73, -6, 2.88)
pt3dadd(-44.54, -0.72, -6, 2.76)
}
dend[79] {pt3dclear()
pt3dadd(-44.54, -0.72, -6, 2.76)
pt3dadd(-44.68, -1.15, -6, 2.15)
pt3dadd(-45.25, -1.14, -6, 1.5)
pt3dadd(-45.54, -1.7, -6, 0.24)
pt3dadd(-45.56, -1.9, -6, 0.24)
pt3dadd(-45.9, -2.18, -6.5, 0.48)
pt3dadd(-46.13, -2.46, -6.5, 0.92)
pt3dadd(-46.29, -2.64, -6.5, 1.19)
pt3dadd(-46.38, -2.93, -6.5, 1.16)
pt3dadd(-46.64, -3.37, -6.5, 0.36)
pt3dadd(-47.1, -3.54, -6.5, 0.34)
pt3dadd(-47.45, -3.8, -6.5, 0.34)
pt3dadd(-47.88, -4.13, -6.5, 0.34)
pt3dadd(-48.15, -4.42, -7, 0.68)
pt3dadd(-48.45, -4.69, -7, 0.92)
pt3dadd(-48.88, -4.97, -7, 1.04)
pt3dadd(-49.28, -5.25, -7, 1.09)
pt3dadd(-49.48, -5.44, -7, 1.04)
pt3dadd(-49.71, -5.56, -7, 0.73)
pt3dadd(-50.1, -5.8, -7, 0.24)
pt3dadd(-50.45, -6.12, -7, 0.24)
pt3dadd(-51, -6.53, -7, 0.24)
pt3dadd(-51.72, -7.03, -7, 0.24)
pt3dadd(-52.12, -7.22, -6.5, 0.41)
pt3dadd(-52.49, -7.51, -6.5, 0.73)
pt3dadd(-52.7, -7.74, -6.5, 0.82)
pt3dadd(-52.92, -8.05, -6.5, 0.9)
pt3dadd(-53.16, -8.27, -6.5, 0.85)
pt3dadd(-53.47, -8.5, -6.5, 0.7)
pt3dadd(-53.87, -8.63, -7, 0.39)
pt3dadd(-54.24, -8.69, -7, 0.34)
pt3dadd(-54.6, -8.82, -7, 0.41)
pt3dadd(-54.89, -9, -7, 0.7)
pt3dadd(-55.45, -9.41, -7, 1.21)
pt3dadd(-55.42, -10.03, -7, 1.55)
pt3dadd(-55.44, -10.44, -7, 1.72)
pt3dadd(-55.42, -10.7, -7, 1.65)
pt3dadd(-55.82, -10.71, -7.5, 1.55)
pt3dadd(-56.4, -11.12, -7.5, 0.6)
pt3dadd(-56.75, -11.27, -7.5, 0.53)
pt3dadd(-57.06, -11.52, -7.5, 0.48)
pt3dadd(-57.42, -11.74, -7.5, 0.48)
pt3dadd(-57.71, -11.65, -7.5, 0.39)
pt3dadd(-58.08, -11.48, -7.5, 0.39)
pt3dadd(-58.81, -11.17, -7.5, 0.27)
pt3dadd(-59.4, -11.2, -7.5, 0.29)
pt3dadd(-59.92, -11.26, -7.5, 0.68)
pt3dadd(-60.21, -11.2, -7, 1.19)
pt3dadd(-60.38, -11.15, -7, 1.28)
pt3dadd(-60.7, -11.28, -7, 1.19)
pt3dadd(-60.95, -11.56, -7, 1.09)
}
dend[80] {pt3dclear()
pt3dadd(-44.54, -0.72, -6, 2.76)
pt3dadd(-45.62, 0.48, -6, 0.34)
pt3dadd(-45.92, 0.75, -6, 0.07)
pt3dadd(-46.08, 0.95, -6, 0.07)
pt3dadd(-46.22, 0.94, -6, 0.44)
pt3dadd(-46.48, 0.95, -6, 0.44)
pt3dadd(-46.69, 0.98, -6, 0.36)
pt3dadd(-47.39, 1.02, -6, 0.1)
pt3dadd(-48.19, 1.18, -6, 0.1)
pt3dadd(-48.96, 1.48, -6, 0.1)
pt3dadd(-49.22, 1.53, -6, 0.31)
pt3dadd(-49.63, 1.66, -6, 0.41)
pt3dadd(-49.9, 1.74, -6, 0.48)
pt3dadd(-50.25, 1.93, -6, 0.46)
pt3dadd(-50.57, 2.11, -6, 0.44)
pt3dadd(-50.86, 2.33, -6, 0.44)
pt3dadd(-51.2, 2.58, -6, 0.44)
pt3dadd(-51.74, 2.84, -6, 0.41)
pt3dadd(-52.31, 2.91, -6, 1.21)
pt3dadd(-52.71, 2.93, -6, 1.48)
pt3dadd(-52.89, 2.88, -6, 1.4)
pt3dadd(-53.61, 2.88, -6, 0.07)
pt3dadd(-54.17, 2.81, -6, 0.07)
pt3dadd(-54.82, 2.83, -6, 0.07)
pt3dadd(-55.12, 2.81, -6, 0.27)
pt3dadd(-55.3, 2.8, -6, 0.44)
pt3dadd(-55.61, 2.77, -6, 0.53)
pt3dadd(-55.73, 2.59, -6, 0.6)
pt3dadd(-56.06, 2.44, -6, 0.58)
pt3dadd(-56.19, 2.33, -6, 0.41)
pt3dadd(-56.37, 2.22, -6, 0.02)
pt3dadd(-56.72, 2.03, -6, 0.12)
pt3dadd(-57.35, 1.78, -6, 0.15)
pt3dadd(-57.75, 1.55, -6, 0.22)
pt3dadd(-58.17, 1.38, -6, 0.68)
pt3dadd(-58.72, 1.11, -6, 1.48)
pt3dadd(-59.59, 0.88, -6, 2.52)
pt3dadd(-60.12, 0.7, -6, 2.69)
pt3dadd(-60.46, 0.43, -6, 2.76)
pt3dadd(-60.63, 0.32, -6, 2.93)
pt3dadd(-61, 0.11, -6, 2.56)
pt3dadd(-61.42, 0.08, -6, 2.13)
pt3dadd(-61.82, -0.02, -6, 1.6)
pt3dadd(-62.13, -0.13, -6, 1.14)
pt3dadd(-62.6, -0.09, -5.5, 0.24)
pt3dadd(-62.98, 0.01, -5.5, 0.24)
}
}
proc shape3d_18() {
dend[80] { pt3dadd(-63.41, 0.06, -5.5, 0.24)
pt3dadd(-63.84, -0.1, -5.5, 0.24)
pt3dadd(-64.3, -0.18, -5.5, 0.24)
pt3dadd(-65.11, -0.53, -5.5, 0.24)
pt3dadd(-65.36, -0.75, -5.5, 0.31)
pt3dadd(-65.51, -1.13, -5.5, 0.15)
pt3dadd(-65.69, -1.59, -5, 0.68)
pt3dadd(-66.07, -1.82, -5, 1.43)
pt3dadd(-66.33, -1.97, -5, 1.55)
pt3dadd(-66.64, -1.88, -5, 1.48)
pt3dadd(-66.99, -1.73, -5, 1.43)
pt3dadd(-67.32, -1.69, -5, 1.21)
pt3dadd(-67.6, -1.66, -5.5, 0.58)
pt3dadd(-68.02, -1.61, -5.5, 0.41)
pt3dadd(-68.57, -1.51, -5.5, 0.22)
pt3dadd(-69.05, -1.44, -5.5, 0.27)
pt3dadd(-69.4, -1.45, -5.5, 0.56)
pt3dadd(-69.79, -1.54, -5.5, 1.11)
pt3dadd(-70.28, -1.53, -5.5, 1.84)
pt3dadd(-70.67, -1.74, -5.5, 2.03)
pt3dadd(-70.97, -1.93, -5.5, 2.15)
pt3dadd(-71.48, -1.93, -5.5, 1.62)
pt3dadd(-72.04, -1.83, -5.5, 0.94)
pt3dadd(-72.29, -1.76, -5.5, 0.73)
pt3dadd(-72.53, -1.85, -5.5, 0.41)
pt3dadd(-72.93, -1.96, -5.5, 0.05)
pt3dadd(-73.63, -2.19, -5.5, 0.05)
pt3dadd(-73.96, -2.21, -5.5, 0.29)
pt3dadd(-74.21, -2.18, -5.5, 0.41)
pt3dadd(-74.55, -2.21, -5.5, 0.51)
pt3dadd(-74.77, -2.23, -5.5, 0.6)
pt3dadd(-75.3, -2.23, -5.5, 0.1)
pt3dadd(-75.64, -2.32, -5.5, 0.1)
pt3dadd(-76.28, -2.64, -5.5, 0.77)
pt3dadd(-76.66, -2.73, -5.5, 1.45)
pt3dadd(-77.06, -2.85, -5.5, 1.65)
pt3dadd(-77.42, -3.11, -5.5, 1.62)
pt3dadd(-77.62, -3.22, -5.5, 1.55)
pt3dadd(-77.92, -3.36, -5.5, 1.31)
}
dend[81] {pt3dclear()
pt3dadd(0, 0, 0, 1.65)
pt3dadd(-0.42, 16.64, -5.5, 1.65)
pt3dadd(0.29, 17.84, -5.5, 1.74)
pt3dadd(0.72, 18.28, -5.5, 1.69)
pt3dadd(1.49, 18.86, -5.5, 1.65)
pt3dadd(2.39, 19.88, -6, 1.6)
pt3dadd(3.16, 20.67, -6, 1.94)
pt3dadd(4.17, 21.6, -6, 2.03)
pt3dadd(5.09, 22.26, -6, 2.37)
pt3dadd(5.82, 23.11, -6, 2.66)
pt3dadd(6.39, 23.82, -6, 2.71)
pt3dadd(7.05, 24.79, -6, 2.71)
pt3dadd(7.5, 25.19, -6, 2.61)
pt3dadd(8.32, 26.39, -6, 2.56)
pt3dadd(9.06, 27.24, -6, 2.66)
pt3dadd(9.62, 27.75, -6, 2.76)
}
dend[82] {pt3dclear()
pt3dadd(9.62, 27.75, -6, 2.76)
pt3dadd(9.48, 28.03, -6, 2.56)
pt3dadd(9.09, 28.87, -6.5, 1.45)
pt3dadd(8.79, 29.46, -6.5, 0.34)
pt3dadd(8.66, 29.69, -6.5, 0.34)
pt3dadd(8.53, 29.87, -6.5, 0.39)
pt3dadd(8.27, 30.02, -6.5, 0.58)
pt3dadd(8, 30.07, -6.5, 0.9)
pt3dadd(7.82, 30.16, -6.5, 0.97)
pt3dadd(7.8, 30.33, -6.5, 0.77)
pt3dadd(7.66, 30.7, -6.5, 0.36)
pt3dadd(7.16, 31.03, -6.5, 0.34)
pt3dadd(6.79, 31.33, -6.5, 0.34)
pt3dadd(6.59, 31.51, -6.5, 0.39)
pt3dadd(6.34, 31.78, -6.5, 0.46)
pt3dadd(6.05, 32.18, -6.5, 0.75)
pt3dadd(5.69, 32.59, -6.5, 1.36)
pt3dadd(5.42, 32.64, -6.5, 1.4)
pt3dadd(5.29, 32.88, -6.5, 1.16)
pt3dadd(4.94, 33.12, -6.5, 0.65)
pt3dadd(4.63, 33.39, -6.5, 0.58)
pt3dadd(4.32, 33.7, -6, 0.51)
pt3dadd(4.25, 33.85, -6, 0.48)
pt3dadd(4.16, 34, -6, 0.44)
pt3dadd(4.09, 34.17, -6, 0.38)
pt3dadd(4.01, 34.41, -6, 0.11)
pt3dadd(4, 34.53, -6, 0.11)
pt3dadd(3.98, 34.86, -6, 0.58)
pt3dadd(3.86, 35.39, -6, 1.09)
pt3dadd(3.8, 35.79, -6, 1.14)
pt3dadd(3.87, 36.14, -6, 1.11)
pt3dadd(3.93, 36.24, -6, 1.09)
pt3dadd(3.99, 36.58, -6, 1.09)
pt3dadd(3.91, 36.78, -6, 1.06)
pt3dadd(3.86, 36.98, -6, 0.97)
pt3dadd(3.64, 37.25, -6, 0.9)
pt3dadd(3.1, 37.47, -6, 0.7)
pt3dadd(2.93, 37.61, -6, 0.6)
pt3dadd(2.73, 37.73, -6, 0.48)
pt3dadd(2.5, 37.91, -6, 0.44)
pt3dadd(2.23, 38.02, -6, 0.24)
pt3dadd(2.04, 38.11, -6, 0.28)
pt3dadd(1.81, 38.28, -6, 0.47)
pt3dadd(1.65, 38.41, -6, 0.57)
pt3dadd(1.51, 38.54, -6, 0.6)
pt3dadd(1.35, 38.8, -6, 0.13)
pt3dadd(1.14, 39, -6, 0.08)
pt3dadd(1.05, 39.29, -6, 0.08)
pt3dadd(1.07, 39.54, -6, 0.08)
pt3dadd(0.78, 39.91, -6, 0.87)
pt3dadd(0.57, 40, -6, 0.82)
pt3dadd(0.4, 40.19, -6, 0.73)
pt3dadd(0.22, 40.34, -6, 0.1)
pt3dadd(-0.07, 40.38, -5.5, 0.05)
pt3dadd(-0.59, 40.45, -5.5, 0.05)
pt3dadd(-0.72, 40.5, -5.5, 0.34)
pt3dadd(-1, 40.65, -5.5, 0.44)
pt3dadd(-1.13, 41, -5.5, 0.51)
pt3dadd(-1.5, 42.06, -5.5, 2.08)
}
dend[83] {pt3dclear()
pt3dadd(9.62, 27.75, -6, 2.76)
pt3dadd(10.01, 27.79, -6, 2.93)
pt3dadd(11.04, 28.23, -6, 2.73)
pt3dadd(11.93, 28.88, -6, 3.15)
pt3dadd(12.65, 29.35, -6, 3.12)
pt3dadd(13.42, 29.88, -6, 3.15)
}
dend[84] {pt3dclear()
pt3dadd(13.42, 29.88, -6, 3.15)
pt3dadd(13.27, 30.73, -6.5, 2.2)
pt3dadd(13.17, 30.99, -6.5, 1.54)
pt3dadd(13.07, 31.29, -6.5, 1.11)
pt3dadd(13.05, 31.52, -6.5, 0.83)
pt3dadd(12.96, 31.95, -6.5, 0.16)
pt3dadd(12.9, 32.13, -6.5, 0.16)
pt3dadd(12.88, 32.47, -6.5, 0.16)
pt3dadd(12.91, 32.72, -6.5, 0.21)
pt3dadd(12.89, 32.97, -6.5, 0.31)
pt3dadd(12.85, 33.14, -6.5, 0.46)
pt3dadd(12.79, 33.23, -6.5, 0.44)
pt3dadd(12.55, 33.6, -7, 0.27)
pt3dadd(12.47, 33.91, -7, 0.27)
pt3dadd(12.41, 34.65, -7, 1.06)
pt3dadd(12.43, 34.86, -7, 1.11)
pt3dadd(12.4, 35.13, -7, 1.14)
pt3dadd(12.27, 35.32, -7, 1.06)
pt3dadd(12.17, 35.58, -7, 1.04)
pt3dadd(12.06, 35.62, -6.5, 0.9)
pt3dadd(12.06, 35.9, -6.5, 0.54)
pt3dadd(12.08, 36.24, -6.5, 0.15)
pt3dadd(12.04, 36.49, -6.5, 0.15)
pt3dadd(11.94, 36.73, -6.5, 0.15)
pt3dadd(11.87, 37.15, -6.5, 0.77)
pt3dadd(11.81, 37.27, -6.5, 0.92)
pt3dadd(11.74, 37.42, -6.5, 0.94)
pt3dadd(11.43, 37.74, -7.5, 0.22)
pt3dadd(11.35, 38.06, -7.5, 0.22)
pt3dadd(11.36, 38.38, -7.5, 0.22)
pt3dadd(11.35, 38.78, -7.5, 0.27)
pt3dadd(11.39, 39.04, -7.5, 0.31)
pt3dadd(11.18, 39.25, -7.5, 0.31)
pt3dadd(10.78, 39.55, -7.5, 0.29)
pt3dadd(10.41, 39.8, -7.5, 0.31)
pt3dadd(10.27, 40.23, -7.5, 0.36)
pt3dadd(10.73, 41.12, -7.5, 1.79)
pt3dadd(11.21, 41.9, -7.5, 2.03)
pt3dadd(11.49, 42.25, -7.5, 2.08)
pt3dadd(10.71, 43.02, -7.5, 1.74)
pt3dadd(10.41, 43.64, -7.5, 0.82)
pt3dadd(10.51, 43.91, -7, 0.22)
pt3dadd(10.51, 44.2, -7, 0.22)
pt3dadd(10.55, 44.51, -7, 0.44)
pt3dadd(10.58, 44.78, -7, 0.73)
pt3dadd(10.53, 45.02, -7, 0.82)
pt3dadd(10.48, 45.24, -7, 0.87)
}
dend[85] {pt3dclear()
pt3dadd(10.48, 45.24, -7, 0.87)
pt3dadd(10.76, 45.68, -7, 0.17)
pt3dadd(10.9, 46.04, -7, 0.17)
pt3dadd(11.11, 46.48, -7, 0.17)
pt3dadd(11.21, 46.79, -7, 0.56)
pt3dadd(11.21, 46.97, -7, 0.63)
pt3dadd(11.29, 47.16, -7, 0.68)
pt3dadd(11.32, 47.37, -7, 0.65)
pt3dadd(11.45, 47.71, -7, 0.02)
pt3dadd(11.68, 48.09, -7, 0.02)
pt3dadd(11.75, 48.39, -7, 0.34)
pt3dadd(11.8, 48.51, -7, 0.44)
pt3dadd(11.92, 48.88, -7, 0.02)
pt3dadd(11.91, 49.03, -7, 0.02)
pt3dadd(11.89, 49.16, -7, 0.17)
pt3dadd(11.98, 49.44, -7, 0.01)
pt3dadd(12.02, 49.75, -7, 0.01)
pt3dadd(12, 50, -7, 0.01)
pt3dadd(12.02, 50.7, -7, 1.26)
pt3dadd(12.06, 51.1, -7, 1.58)
}
dend[86] {pt3dclear()
pt3dadd(10.48, 45.24, -7, 0.87)
pt3dadd(10.35, 45.35, -6.5, 0.82)
pt3dadd(9.84, 45.86, -6.5, 0.58)
pt3dadd(9.45, 46.31, -6.5, 1.36)
pt3dadd(9.27, 46.43, -6.5, 1.55)
pt3dadd(9.03, 46.46, -6.5, 1.45)
pt3dadd(8.5, 46.53, -6.5, 0.92)
pt3dadd(8.01, 46.83, -6.5, 0.36)
pt3dadd(7.74, 47, -6.5, 0.36)
pt3dadd(7.44, 47.1, -6.5, 0.44)
pt3dadd(6.92, 47.16, -6.5, 0.7)
pt3dadd(6.57, 47.13, -6.5, 1.06)
pt3dadd(6.35, 47.05, -6.5, 1.11)
}
}
proc shape3d_19() {
dend[86] { pt3dadd(6.06, 46.9, -6.5, 1.11)
pt3dadd(5.88, 46.83, -6.5, 0.99)
pt3dadd(5.42, 47.04, -6.5, 0.24)
pt3dadd(4.93, 47.11, -6.5, 0.24)
pt3dadd(4.52, 46.94, -6.5, 0.24)
pt3dadd(4.33, 46.86, -6.5, 0.31)
pt3dadd(4.03, 46.65, -6.5, 0.34)
pt3dadd(3.79, 46.46, -6.5, 0.41)
pt3dadd(3.58, 46.17, -6.5, 0.51)
pt3dadd(3.36, 45.98, -6.5, 0.6)
pt3dadd(3.18, 45.88, -6.5, 0.68)
pt3dadd(2.94, 45.74, -6.5, 0.7)
}
dend[87] {pt3dclear()
pt3dadd(13.42, 29.88, -6, 3.15)
pt3dadd(13.55, 29.91, -6, 3.36)
pt3dadd(14.13, 30.02, -6, 3.17)
pt3dadd(14.62, 30.24, -6, 2.54)
pt3dadd(15.34, 30.45, -6, 1.69)
pt3dadd(16.09, 30.75, -6, 1.38)
pt3dadd(16.76, 30.89, -6, 1.23)
pt3dadd(17.49, 31.24, -6, 1.16)
pt3dadd(18.07, 31.37, -6, 1.09)
pt3dadd(18.8, 31.65, -6.5, 1.26)
pt3dadd(19.29, 31.83, -6.5, 1.38)
pt3dadd(19.75, 32, -6.5, 1.48)
pt3dadd(20.29, 32.02, -6.5, 1.28)
pt3dadd(20.94, 32.16, -6.5, 0.92)
pt3dadd(21.5, 32.37, -7, 0.92)
pt3dadd(22.06, 32.55, -7, 0.82)
pt3dadd(22.55, 32.7, -7, 0.68)
pt3dadd(22.98, 32.82, -7, 0.75)
pt3dadd(23.36, 32.9, -7, 0.8)
pt3dadd(24.08, 33.26, -7.5, 0.97)
pt3dadd(24.79, 33.49, -7.5, 1.52)
pt3dadd(25.73, 34.19, -7.5, 2.81)
pt3dadd(26.76, 34.82, -7.5, 3.73)
pt3dadd(27.31, 34.97, -7.5, 4.04)
}
dend[88] {pt3dclear()
pt3dadd(27.31, 34.97, -7.5, 4.04)
pt3dadd(26.75, 36.05, -7.5, 3.39)
pt3dadd(26.6, 36.35, -7.5, 3.24)
pt3dadd(26.53, 36.69, -7.5, 2.86)
pt3dadd(26.55, 36.97, -7.5, 2.56)
pt3dadd(26.36, 37.22, -7.5, 2.2)
pt3dadd(26.46, 37.58, -7.5, 1.67)
pt3dadd(26.61, 38.25, -7.5, 0.56)
pt3dadd(26.63, 38.61, -7.5, 0.51)
pt3dadd(26.7, 39.13, -7.5, 0.46)
pt3dadd(26.67, 39.5, -7.5, 0.46)
pt3dadd(26.44, 39.86, -7.5, 0.48)
pt3dadd(26.51, 40.22, -7.5, 0.58)
pt3dadd(26.62, 40.74, -7.5, 0.65)
pt3dadd(26.67, 41.08, -7.5, 0.68)
pt3dadd(26.56, 41.38, -7.5, 0.68)
pt3dadd(26.36, 41.68, -7.5, 0.63)
pt3dadd(26.26, 42.33, -7.5, 0.63)
pt3dadd(26.27, 42.77, -7.5, 0.53)
pt3dadd(26.24, 43.31, -7.5, 0.56)
pt3dadd(26.13, 43.99, -7.5, 0.7)
pt3dadd(26.14, 44.65, -7.5, 0.94)
pt3dadd(26.34, 45.05, -7.5, 1.09)
pt3dadd(26.37, 45.37, -7.5, 1.11)
pt3dadd(26.37, 45.71, -7.5, 1.04)
pt3dadd(26.35, 45.97, -7.5, 0.85)
pt3dadd(26.32, 46.44, -7.5, 0.48)
pt3dadd(26.34, 46.82, -7.5, 0.44)
pt3dadd(26.33, 47.27, -7.5, 0.44)
pt3dadd(26.38, 47.67, -7.5, 0.44)
pt3dadd(26.53, 48.19, -7.5, 0.44)
pt3dadd(26.61, 48.58, -7.5, 0.44)
pt3dadd(26.67, 49.05, -7.5, 0.6)
pt3dadd(26.74, 49.79, -7.5, 1.55)
pt3dadd(26.83, 50.53, -7.5, 2.42)
pt3dadd(26.88, 50.75, -7.5, 2.47)
pt3dadd(26.78, 51.14, -7.5, 2.3)
pt3dadd(26.82, 51.49, -7.5, 2.08)
pt3dadd(26.8, 51.79, -7.5, 1.72)
pt3dadd(26.81, 52.15, -7.5, 1.36)
pt3dadd(26.67, 52.32, -7.5, 1.06)
pt3dadd(26.7, 52.81, -7.5, 0.87)
pt3dadd(26.71, 53.1, -7.5, 0.81)
pt3dadd(26.62, 53.34, -7.5, 0.73)
pt3dadd(26.61, 53.56, -7.5, 0.62)
pt3dadd(26.6, 53.77, -7.5, 0.52)
pt3dadd(26.55, 54.04, -7.5, 0.47)
pt3dadd(26.4, 54.24, -7.5, 0.44)
pt3dadd(26.26, 54.55, -7.5, 0.39)
pt3dadd(26.08, 54.74, -7.5, 0.41)
pt3dadd(25.85, 55.07, -7.5, 0.44)
pt3dadd(25.78, 55.43, -7.5, 0.46)
pt3dadd(25.79, 55.8, -7.5, 0.48)
pt3dadd(25.84, 56.18, -7.5, 0.48)
pt3dadd(25.86, 56.65, -7.5, 0.48)
pt3dadd(25.93, 56.99, -7.5, 0.41)
pt3dadd(25.99, 57.44, -7.5, 0.15)
pt3dadd(25.81, 59.39, -8, 3.22)
pt3dadd(25.66, 59.92, -8, 3.87)
pt3dadd(25.68, 60.2, -8, 3.92)
pt3dadd(25.79, 60.41, -8, 3.46)
pt3dadd(25.77, 60.78, -8, 2.93)
pt3dadd(25.96, 61.41, -8, 1.98)
pt3dadd(26.01, 61.75, -8, 1.57)
pt3dadd(26.06, 62.03, -8, 1.23)
pt3dadd(26.01, 62.14, -8, 1.19)
}
dend[89] {pt3dclear()
pt3dadd(26.01, 62.14, -8, 1.19)
pt3dadd(26.51, 62.45, -8, 0.6)
pt3dadd(27.3, 62.89, -8, 0.31)
pt3dadd(27.81, 63.22, -8, 0.31)
pt3dadd(28.43, 63.6, -8, 0.31)
pt3dadd(29.13, 64.07, -8, 0.27)
pt3dadd(29.61, 64.42, -8, 0.27)
pt3dadd(30.05, 64.72, -8, 0.27)
pt3dadd(30.32, 64.83, -8, 0.29)
pt3dadd(30.55, 64.97, -8, 0.48)
pt3dadd(30.79, 65.07, -8, 0.56)
pt3dadd(30.83, 65.18, -8, 0.41)
pt3dadd(31.31, 65.5, -8, 0.15)
pt3dadd(31.73, 65.89, -8, 0.17)
pt3dadd(31.98, 66.06, -8, 0.17)
pt3dadd(32.28, 66.23, -8, 0.17)
pt3dadd(32.53, 66.44, -8, 0.18)
pt3dadd(32.81, 66.64, -8, 0.19)
pt3dadd(33, 66.87, -8, 0.22)
pt3dadd(33.13, 66.95, -8, 0.22)
pt3dadd(33.35, 67.14, -8, 0.12)
pt3dadd(33.5, 67.33, -8, 0.1)
pt3dadd(33.69, 67.62, -8, 0.1)
pt3dadd(33.9, 67.86, -8.5, 0.47)
pt3dadd(34.01, 68.17, -8.5, 0.81)
pt3dadd(34.16, 68.39, -8.5, 0.91)
pt3dadd(34.36, 68.54, -8.5, 0.94)
pt3dadd(34.5, 68.75, -8.5, 0.92)
pt3dadd(34.48, 68.82, -8, 0.77)
pt3dadd(34.67, 68.95, -8, 0.47)
pt3dadd(35.07, 69.28, -8, 0.17)
pt3dadd(35.51, 69.92, -8, 0.17)
pt3dadd(35.87, 70.48, -8, 0.17)
pt3dadd(36.2, 70.87, -8, 0.31)
pt3dadd(36.31, 71.18, -8, 0.71)
pt3dadd(36.41, 71.47, -8, 1.03)
pt3dadd(36.84, 71.7, -8.5, 0.4)
pt3dadd(37.07, 71.91, -8.5, 0.38)
pt3dadd(37.18, 72.14, -8.5, 0.4)
pt3dadd(37.13, 72.37, -8.5, 0.4)
pt3dadd(37.03, 73.07, -8, 0.31)
pt3dadd(37.09, 73.61, -8, 0.48)
pt3dadd(37.09, 74.2, -8, 1.11)
pt3dadd(37.14, 74.54, -8, 1.38)
pt3dadd(37.39, 74.79, -8, 1.36)
pt3dadd(37.59, 74.95, -8, 1.21)
pt3dadd(37.92, 75.25, -8, 1.11)
}
dend[90] {pt3dclear()
pt3dadd(26.01, 62.14, -8, 1.19)
pt3dadd(25.79, 62.42, -8, 1.03)
pt3dadd(25.7, 62.72, -8.5, 0.62)
pt3dadd(25.44, 62.9, -8.5, 0.52)
pt3dadd(25.24, 63.3, -9, 0.46)
pt3dadd(25.15, 63.61, -9, 0.44)
pt3dadd(25.1, 63.84, -9, 0.46)
pt3dadd(25.13, 64.16, -9, 0.47)
pt3dadd(25.15, 64.53, -9, 0.46)
pt3dadd(25.05, 64.83, -9, 0.44)
pt3dadd(24.82, 65.24, -9, 0.44)
pt3dadd(24.73, 65.53, -9, 0.44)
pt3dadd(24.71, 65.91, -9, 0.46)
pt3dadd(24.52, 66.39, -8.5, 0.73)
pt3dadd(24.37, 66.78, -8.5, 1.23)
pt3dadd(24.19, 67.21, -8.5, 1.52)
pt3dadd(23.81, 67.46, -8.5, 1.74)
pt3dadd(23.5, 67.8, -8.5, 1.98)
}
dend[91] {pt3dclear()
pt3dadd(23.5, 67.8, -8.5, 1.98)
pt3dadd(23.18, 67.95, -8, 1.5)
pt3dadd(22.37, 68.34, -8, 0.41)
pt3dadd(22.08, 68.5, -8, 0.41)
pt3dadd(21.79, 68.76, -8, 0.44)
pt3dadd(21.54, 68.96, -8, 0.48)
pt3dadd(21.36, 69.23, -8, 0.51)
pt3dadd(21.24, 69.47, -8, 0.48)
pt3dadd(21.17, 69.68, -7.5, 0.19)
pt3dadd(20.98, 69.96, -7, 0.18)
pt3dadd(20.96, 70.14, -7, 0.16)
pt3dadd(20.81, 70.35, -7, 0.16)
pt3dadd(20.72, 70.57, -7, 0.21)
pt3dadd(20.67, 70.8, -7, 0.36)
pt3dadd(20.62, 71.19, -7, 0.92)
pt3dadd(20.62, 71.4, -7, 0.97)
pt3dadd(20.59, 71.54, -7, 1)
pt3dadd(20.49, 71.68, -7, 0.98)
pt3dadd(20.45, 71.84, -7, 0.93)
pt3dadd(20.38, 72, -7, 0.77)
pt3dadd(20.33, 72.1, -7, 0.63)
pt3dadd(20.03, 72.37, -7, 0.05)
pt3dadd(19.86, 72.67, -7, 0.05)
pt3dadd(19.69, 72.97, -7, 0.19)
pt3dadd(19.52, 73.56, -7, 1.22)
pt3dadd(19.63, 74.09, -7, 1.83)
pt3dadd(19.62, 74.3, -7, 1.94)
pt3dadd(19.51, 74.35, -7, 1.97)
pt3dadd(19.29, 74.56, -7, 1.48)
pt3dadd(19.16, 74.76, -7, 1.38)
pt3dadd(18.92, 74.93, -7, 1.14)
pt3dadd(18.64, 75.2, -7, 0.82)
pt3dadd(18.42, 75.36, -7, 0.48)
}
}
proc shape3d_20() {
dend[91] { pt3dadd(18.2, 75.52, -7, 0.48)
pt3dadd(17.94, 75.63, -7, 0.48)
pt3dadd(17.84, 75.88, -7, 0.25)
pt3dadd(17.7, 76.06, -7, 0.23)
pt3dadd(17.36, 76.41, -6.5, 0.58)
pt3dadd(17.26, 76.55, -6.5, 0.62)
pt3dadd(17.09, 76.64, -6.5, 0.6)
pt3dadd(17.03, 76.87, -6.5, 0.62)
pt3dadd(17.05, 77.03, -6.5, 0.58)
pt3dadd(16.88, 77.55, -7, 0.19)
pt3dadd(16.79, 77.87, -7, 0.24)
pt3dadd(16.44, 78.26, -7, 0.51)
pt3dadd(16.25, 78.53, -7, 0.92)
pt3dadd(16.04, 78.71, -7, 1.06)
pt3dadd(15.89, 78.83, -7, 1.14)
pt3dadd(15.67, 78.93, -7, 1.19)
pt3dadd(15.55, 79.04, -7, 0.85)
pt3dadd(15.22, 79.41, -7, 0.29)
pt3dadd(14.8, 80.11, -7, 0.24)
pt3dadd(14.83, 80.82, -7, 0.24)
pt3dadd(15.22, 81.35, -7, 0.24)
pt3dadd(15.35, 81.7, -7, 0.34)
pt3dadd(15.19, 83.09, -7, 2.98)
pt3dadd(15.27, 84.32, -7, 4.52)
pt3dadd(15.41, 84.66, -7, 5.01)
pt3dadd(15.18, 84.82, -7, 5.06)
}
dend[92] {pt3dclear()
pt3dadd(15.18, 84.82, -7, 5.06)
pt3dadd(14.22, 85.02, -7.5, 3.44)
pt3dadd(13.79, 85.26, -7.5, 2.49)
pt3dadd(12.7, 86.19, -7.5, 0.07)
pt3dadd(12.4, 86.52, -7.5, 0.07)
pt3dadd(12.18, 87.01, -7.5, 0.39)
pt3dadd(11.93, 87.64, -7.5, 0.27)
pt3dadd(11.87, 88.1, -7.5, 0.31)
}
dend[93] {pt3dclear()
pt3dadd(15.18, 84.82, -7, 5.06)
pt3dadd(16.45, 85.41, -7, 2.78)
pt3dadd(16.65, 85.54, -7, 2.4)
pt3dadd(17.04, 85.8, -7, 1.31)
pt3dadd(17.52, 86.34, -7, 0.85)
pt3dadd(17.9, 86.65, -7, 0.65)
pt3dadd(17.86, 87.09, -7, 0.53)
pt3dadd(17.7, 87.58, -7, 0.48)
pt3dadd(17.72, 88.33, -7, 0.39)
pt3dadd(17.95, 89.13, -7, 0.56)
pt3dadd(18.11, 89.58, -6.5, 0.92)
pt3dadd(18.16, 89.77, -6.5, 0.99)
pt3dadd(18.41, 89.93, -6.5, 0.99)
pt3dadd(18.43, 90.16, -6.5, 0.97)
pt3dadd(18.65, 90.67, -6.5, 0.22)
pt3dadd(18.81, 91.41, -6.5, 0.22)
pt3dadd(19.09, 92.22, -6.5, 0.22)
pt3dadd(19.32, 93.01, -6.5, 0.22)
pt3dadd(19.42, 93.35, -6.5, 0.51)
pt3dadd(19.73, 93.79, -6, 1.16)
pt3dadd(19.65, 94.14, -6, 1.38)
pt3dadd(19.52, 94.5, -6, 1.43)
pt3dadd(19.76, 95.46, -6, 0.51)
pt3dadd(19.89, 95.9, -6, 0.48)
pt3dadd(19.92, 96.19, -6, 0.44)
pt3dadd(19.89, 96.6, -6, 0.41)
pt3dadd(20.02, 96.91, -6, 0.05)
pt3dadd(20.05, 97.14, -6, 0.05)
pt3dadd(20.09, 97.46, -6, 0.51)
pt3dadd(20.12, 97.7, -6, 0.65)
pt3dadd(20.04, 98, -6, 0.73)
pt3dadd(19.86, 98.15, -6, 0.73)
pt3dadd(19.64, 98.87, -5.5, 0.36)
pt3dadd(19.39, 99.39, -5.5, 0.34)
pt3dadd(19.12, 100, -5.5, 0.41)
pt3dadd(19.12, 100.47, -5.5, 0.46)
pt3dadd(19.53, 100.94, -5.5, 0.46)
pt3dadd(19.74, 101.38, -5.5, 0.46)
pt3dadd(19.6, 102.72, -6.5, 0.44)
pt3dadd(19.34, 103.41, -6.5, 0.51)
pt3dadd(18.29, 104.71, -6.5, 1.02)
pt3dadd(17.15, 105.21, -6.5, 2.06)
pt3dadd(17.1, 105.71, -6.5, 2.06)
pt3dadd(17.13, 105.91, -6.5, 1.94)
pt3dadd(17.36, 106.81, -6.5, 1.86)
pt3dadd(17.53, 107.31, -6.5, 1.77)
pt3dadd(17.66, 107.71, -6.5, 1.6)
pt3dadd(17.85, 108.21, -6.5, 1.4)
pt3dadd(17.84, 108.61, -6.5, 1.09)
pt3dadd(18.07, 109.61, -6.5, 0.68)
pt3dadd(17.86, 110.31, -6.5, 0.58)
pt3dadd(17.06, 112.01, -6.5, 0.53)
pt3dadd(16.9, 113.51, -6.5, 0.53)
pt3dadd(16.96, 113.91, -6.5, 0.68)
pt3dadd(17.06, 114.71, -6.5, 0.87)
pt3dadd(16.96, 115.51, -6.5, 0.97)
pt3dadd(16.34, 116, -6.5, 0.92)
}
dend[94] {pt3dclear()
pt3dadd(23.5, 67.8, -8.5, 1.98)
pt3dadd(23.61, 68.36, -8.5, 1.02)
pt3dadd(23.84, 68.67, -8.5, 0.92)
pt3dadd(23.85, 69.02, -8, 0.75)
pt3dadd(23.92, 69.22, -8, 0.7)
pt3dadd(23.96, 69.45, -8, 0.51)
pt3dadd(24.03, 69.69, -8, 0.12)
pt3dadd(24.04, 70.04, -8, 0.12)
pt3dadd(23.93, 70.34, -7.5, 0.51)
pt3dadd(23.99, 70.77, -7.5, 0.6)
pt3dadd(24.07, 71.08, -7.5, 0.53)
pt3dadd(24.2, 71.39, -7.5, 0.53)
pt3dadd(24.34, 71.98, -7.5, 0.6)
pt3dadd(24.55, 72.39, -7.5, 0.7)
pt3dadd(24.79, 72.59, -7.5, 0.68)
pt3dadd(24.8, 72.89, -7.5, 0.6)
pt3dadd(24.9, 73.39, -7.5, 0.07)
pt3dadd(25.06, 73.86, -7.5, 0.07)
pt3dadd(25.12, 74.39, -7.5, 0.58)
pt3dadd(25.14, 75.06, -7.5, 1.52)
pt3dadd(25.1, 75.46, -7.5, 1.57)
pt3dadd(25.16, 75.78, -7.5, 1.55)
pt3dadd(25.31, 76.18, -7.5, 1.5)
pt3dadd(25.4, 76.42, -7.5, 1.23)
pt3dadd(25.6, 76.74, -7.5, 1.04)
pt3dadd(25.52, 76.6, -7.5, 1.02)
pt3dadd(25.67, 76.82, -7.5, 0.94)
pt3dadd(25.6, 76.74, -7, 0.94)
pt3dadd(25.68, 76.88, -7, 0.91)
pt3dadd(25.79, 77.04, -7, 0.63)
pt3dadd(25.98, 77.29, -7, 0.34)
pt3dadd(26.15, 77.58, -7, 0.31)
pt3dadd(26.37, 77.85, -7, 0.31)
pt3dadd(26.71, 78.08, -7, 0.31)
pt3dadd(26.92, 78.46, -7, 0.51)
pt3dadd(27, 78.76, -7, 0.65)
pt3dadd(27.09, 79.22, -7, 0.9)
pt3dadd(27.16, 79.41, -7, 0.91)
pt3dadd(27.31, 79.63, -7, 0.87)
pt3dadd(27.33, 79.8, -6.5, 0.67)
pt3dadd(27.41, 80.13, -6.5, 0.38)
pt3dadd(27.64, 80.61, -6.5, 0.53)
pt3dadd(28.1, 81.09, -6.5, 1.28)
pt3dadd(28.5, 81.85, -6.5, 1.95)
pt3dadd(28.54, 82.1, -6.5, 2.03)
pt3dadd(28.62, 82.25, -6.5, 1.98)
pt3dadd(28.69, 82.4, -6.5, 1.78)
pt3dadd(28.73, 82.57, -6.5, 1.56)
pt3dadd(28.84, 82.83, -6.5, 1.4)
pt3dadd(29.06, 83.05, -6.5, 1.29)
pt3dadd(29.25, 83.3, -6.5, 0.73)
pt3dadd(29.41, 83.31, -6, 0.6)
pt3dadd(29.52, 83.65, -6, 0.48)
pt3dadd(29.5, 84.01, -6, 0.45)
pt3dadd(29.57, 84.3, -6, 0.53)
pt3dadd(29.53, 84.53, -6, 0.57)
pt3dadd(29.47, 84.79, -6, 0.59)
pt3dadd(29.41, 85, -6, 0.62)
pt3dadd(29.45, 85.14, -6, 0.6)
pt3dadd(29.35, 85.62, -6, 0.19)
pt3dadd(29.2, 85.99, -6, 0.19)
pt3dadd(29.24, 86.51, -6, 0.19)
pt3dadd(29.37, 86.98, -6, 0.19)
pt3dadd(29.57, 87.22, -6, 0.21)
pt3dadd(29.97, 87.78, -6, 0.4)
pt3dadd(30.14, 88.2, -6, 0.91)
pt3dadd(30.07, 88.55, -6, 1.16)
pt3dadd(30.09, 88.71, -6, 1.19)
pt3dadd(29.98, 89.03, -6, 1.26)
pt3dadd(29.92, 89.36, -6, 1.46)
pt3dadd(29.84, 89.51, -6, 1.49)
pt3dadd(29.64, 89.59, -6, 1.45)
pt3dadd(29.47, 89.78, -6, 1.43)
pt3dadd(29.34, 89.96, -6, 1.4)
pt3dadd(29.32, 90.2, -6.5, 1.67)
}
dend[95] {pt3dclear()
pt3dadd(27.31, 34.97, -7.5, 4.04)
pt3dadd(28.06, 34.98, -7.5, 3.82)
pt3dadd(28.56, 34.77, -7.5, 3.48)
pt3dadd(29.41, 34.91, -7.5, 3.24)
pt3dadd(29.75, 34.91, -7.5, 2.71)
pt3dadd(30.02, 34.97, -7.5, 2.66)
pt3dadd(31.27, 34.99, -7.5, 0.99)
pt3dadd(31.67, 34.85, -7.5, 0.82)
pt3dadd(32.06, 34.66, -7.5, 0.73)
pt3dadd(32.41, 34.39, -7.5, 0.65)
pt3dadd(32.7, 34.32, -7.5, 0.65)
pt3dadd(33.19, 34.23, -7.5, 0.82)
pt3dadd(33.71, 34.47, -7.5, 1.06)
pt3dadd(34.25, 34.86, -8, 1.4)
pt3dadd(34.7, 35.17, -8, 1.48)
pt3dadd(35.04, 35.32, -8, 1.48)
pt3dadd(35.48, 35.44, -8, 1.48)
pt3dadd(35.98, 35.52, -8, 1.36)
pt3dadd(36.43, 35.57, -8, 1.23)
pt3dadd(36.86, 35.59, -8.5, 1.09)
pt3dadd(37.3, 35.77, -8.5, 0.92)
pt3dadd(37.7, 36, -8.5, 0.9)
pt3dadd(38.18, 36, -8.5, 0.77)
pt3dadd(38.77, 36, -8.5, 0.65)
pt3dadd(39.25, 35.97, -8.5, 0.7)
pt3dadd(39.98, 35.96, -8.5, 1.09)
pt3dadd(41.03, 35.58, -8.5, 2.35)
}
dend[96] {pt3dclear()
pt3dadd(41.03, 35.58, -8.5, 2.35)
pt3dadd(41.06, 35.6, -8, 2.37)
pt3dadd(40.92, 36.89, -8, 0.68)
pt3dadd(40.95, 37.52, -8, 0.63)
pt3dadd(40.89, 38.16, -8, 0.58)
pt3dadd(40.82, 38.8, -8, 0.58)
pt3dadd(40.84, 39.34, -8, 0.68)
}
}
proc shape3d_21() {
dend[96] { pt3dadd(40.85, 39.78, -8, 0.77)
pt3dadd(41.13, 40.08, -8, 0.87)
}
dend[97] {pt3dclear()
pt3dadd(41.13, 40.08, -8, 0.87)
pt3dadd(41.66, 40.15, -9, 0.82)
pt3dadd(42.12, 40.19, -9, 0.39)
pt3dadd(42.47, 40.34, -9, 0.34)
pt3dadd(42.85, 40.6, -9, 0.34)
pt3dadd(43.26, 40.78, -9, 0.48)
pt3dadd(43.67, 40.84, -9, 0.63)
pt3dadd(43.82, 41.05, -9, 0.73)
pt3dadd(44.19, 41.25, -9, 0.68)
pt3dadd(44.48, 41.52, -9, 0.34)
pt3dadd(44.89, 41.76, -9, 0.19)
pt3dadd(45.22, 41.97, -9, 0.19)
pt3dadd(45.54, 42.22, -9, 0.19)
pt3dadd(45.95, 42.4, -9, 0.19)
pt3dadd(46.57, 42.72, -9, 0.19)
pt3dadd(46.97, 42.72, -9, 0.92)
pt3dadd(47.07, 42.84, -9, 1.02)
pt3dadd(47.43, 42.95, -9, 0.97)
pt3dadd(47.7, 43.16, -8, 0.1)
pt3dadd(48.43, 43.47, -8, 0.1)
pt3dadd(49.01, 43.49, -8, 0.1)
pt3dadd(49.61, 43.85, -8, 0.1)
pt3dadd(50.16, 43.96, -8, 0.48)
pt3dadd(50.55, 44.01, -8, 0.68)
pt3dadd(50.79, 43.99, -8, 0.73)
pt3dadd(51.19, 44.09, -8, 0.19)
pt3dadd(51.75, 44.31, -8, 0.19)
pt3dadd(52.85, 44.55, -7.5, 0.53)
pt3dadd(53.54, 44.48, -7.5, 1.02)
pt3dadd(53.92, 44.48, -7.5, 1.21)
pt3dadd(54.35, 44.48, -7.5, 1.16)
}
dend[98] {pt3dclear()
pt3dadd(41.13, 40.08, -8, 0.87)
pt3dadd(41.07, 40.25, -8.5, 0.75)
pt3dadd(41.08, 40.62, -8.5, 0.12)
pt3dadd(40.97, 40.93, -8.5, 0.12)
pt3dadd(40.92, 41.25, -8.5, 0.6)
pt3dadd(40.88, 41.42, -8.5, 0.68)
pt3dadd(40.93, 41.62, -8.5, 0.7)
pt3dadd(41.01, 41.84, -8.5, 0.63)
pt3dadd(41.05, 42.12, -8.5, 0.44)
pt3dadd(41.19, 42.53, -8.5, 0.12)
pt3dadd(41.31, 42.97, -8.5, 0.07)
pt3dadd(41.53, 43.26, -9, 0.51)
pt3dadd(41.74, 43.57, -9, 0.9)
pt3dadd(41.92, 43.95, -9, 1.19)
pt3dadd(42, 44.17, -9, 1.38)
pt3dadd(42.16, 44.39, -9, 1.33)
pt3dadd(42.14, 44.71, -9, 1.23)
pt3dadd(42.18, 45.01, -9.5, 0.77)
pt3dadd(42.34, 45.54, -9.5, 0.19)
pt3dadd(42.5, 45.9, -9.5, 0.19)
pt3dadd(42.58, 46.3, -9.5, 0.19)
pt3dadd(42.66, 46.62, -9.5, 0.51)
pt3dadd(42.74, 46.91, -9.5, 0.92)
pt3dadd(42.87, 47.15, -9.5, 1.02)
pt3dadd(42.94, 47.34, -9.5, 0.97)
pt3dadd(42.85, 47.65, -8, 0.8)
pt3dadd(42.94, 48.18, -8, 0.27)
pt3dadd(43.18, 48.87, -8, 0.27)
pt3dadd(43.3, 49.61, -8, 0.27)
pt3dadd(43.36, 49.95, -8, 0.29)
pt3dadd(43.18, 50.33, -8, 0.31)
pt3dadd(43.02, 51.08, -8, 0.29)
pt3dadd(42.85, 51.52, -8, 0.29)
pt3dadd(42.8, 52.07, -8, 0.29)
pt3dadd(42.68, 52.63, -8, 0.7)
pt3dadd(42.62, 53.39, -8, 1.77)
pt3dadd(42.48, 53.65, -8, 2.06)
pt3dadd(42.37, 53.73, -8, 1.74)
}
dend[99] {pt3dclear()
pt3dadd(42.37, 53.73, -8, 1.74)
pt3dadd(44.03, 54.84, -8, 0.44)
pt3dadd(44.66, 55.63, -8, 0.44)
pt3dadd(45.34, 56.53, -8, 0.44)
pt3dadd(45.92, 57.92, -8, 0.39)
pt3dadd(46.35, 59.02, -8, 0.39)
pt3dadd(46.99, 60.36, -8, 0.39)
pt3dadd(47.69, 61.19, -8, 0.39)
pt3dadd(47.81, 61.74, -8, 0.39)
pt3dadd(48.77, 62.78, -7.5, 0.39)
pt3dadd(49.17, 62.92, -7.5, 0.82)
pt3dadd(49.46, 63.27, -7.5, 1.11)
pt3dadd(49.68, 63.43, -7.5, 1.02)
pt3dadd(49.8, 63.54, -7.5, 0.82)
pt3dadd(50.02, 64.01, -7.5, 0.53)
pt3dadd(50.18, 64.43, -7.5, 0.41)
pt3dadd(50.46, 65.47, -7.5, 1.36)
pt3dadd(50.74, 65.44, -7.5, 1.23)
pt3dadd(51.21, 65.47, -7.5, 1.14)
pt3dadd(51.41, 65.6, -7.5, 0.8)
pt3dadd(52.09, 66.12, -7.5, 0.31)
pt3dadd(52.75, 66.64, -7.5, 0.27)
pt3dadd(53.28, 67.09, -7.5, 0.27)
pt3dadd(53.55, 67.45, -7.5, 0.34)
pt3dadd(53.92, 67.75, -7.5, 0.97)
pt3dadd(54.02, 67.98, -7.5, 1.19)
pt3dadd(54.36, 68.2, -7.5, 1.26)
pt3dadd(54.6, 68.33, -7.5, 1.21)
}
dend[100] {pt3dclear()
pt3dadd(42.37, 53.73, -8, 1.74)
pt3dadd(42.24, 54.12, -8, 1.79)
pt3dadd(42.12, 54.32, -8, 1.74)
pt3dadd(42.07, 54.54, -8, 1.69)
pt3dadd(42.02, 54.68, -8, 1.57)
pt3dadd(41.28, 55.3, -8, 0.24)
pt3dadd(41.13, 55.74, -8, 0.24)
pt3dadd(41.03, 56.23, -8, 0.24)
pt3dadd(40.95, 56.78, -8.5, 0.97)
pt3dadd(40.84, 56.79, -8.5, 1.16)
pt3dadd(40.77, 56.95, -8.5, 1.16)
pt3dadd(40.87, 57.32, -8.5, 1.02)
pt3dadd(40.94, 57.59, -8.5, 0.85)
pt3dadd(40.99, 57.75, -8.5, 0.7)
pt3dadd(41.12, 58.04, -8.5, 0.19)
pt3dadd(41.12, 58.35, -8.5, 0.19)
pt3dadd(41.01, 58.69, -8.5, 0.29)
pt3dadd(41.05, 59, -8.5, 0.51)
pt3dadd(41.21, 59.26, -8.5, 0.6)
pt3dadd(41.39, 59.4, -8.5, 0.53)
pt3dadd(42.1, 59.84, -8.5, 0.27)
pt3dadd(42.26, 60.43, -8.5, 0.22)
pt3dadd(42.52, 61.43, -8.5, 0.22)
pt3dadd(42.77, 61.9, -8.5, 0.31)
pt3dadd(43.03, 62.33, -8, 1.06)
pt3dadd(43.05, 62.49, -8, 1.11)
pt3dadd(43.02, 62.67, -8, 1.09)
pt3dadd(42.99, 62.94, -8, 1.04)
pt3dadd(42.83, 63.11, -8, 0.87)
pt3dadd(42.7, 63.32, -8, 0.63)
pt3dadd(42.56, 63.6, -8, 0.48)
pt3dadd(42.35, 64.06, -8, 0.41)
pt3dadd(42.18, 64.79, -8, 0.34)
pt3dadd(42.12, 65.29, -8, 0.17)
pt3dadd(42.09, 65.8, -8, 0.46)
pt3dadd(42.27, 65.94, -7.5, 1.4)
pt3dadd(42.63, 66.83, -7.5, 2.47)
pt3dadd(42.88, 67.05, -7.5, 2.47)
pt3dadd(43.18, 67.18, -7.5, 2.4)
pt3dadd(43.29, 67.32, -7.5, 1.94)
pt3dadd(43.55, 67.67, -7, 1.72)
pt3dadd(43.76, 67.79, -7, 1.5)
pt3dadd(43.99, 67.92, -7, 1.04)
pt3dadd(43.81, 68.01, -7, 0.97)
pt3dadd(44.09, 68.4, -7, 0.02)
pt3dadd(44.37, 68.75, -7, 0.02)
pt3dadd(44.47, 68.96, -7, 0.29)
pt3dadd(44.67, 69.28, -7, 0.47)
pt3dadd(44.75, 69.39, -7, 0.5)
pt3dadd(44.88, 69.5, -7, 0.5)
pt3dadd(45.02, 69.62, -7, 0.5)
pt3dadd(45.54, 70.11, -7.5, 0.02)
pt3dadd(45.95, 70.54, -7.5, 0.02)
pt3dadd(46.05, 70.75, -7.5, 0.22)
pt3dadd(46.13, 70.86, -7.5, 0.36)
pt3dadd(46.31, 71.03, -7.5, 0.36)
pt3dadd(46.53, 71.18, -7.5, 0.12)
pt3dadd(46.95, 72.08, -7.5, 0.12)
pt3dadd(47.39, 72.82, -7.5, 0.12)
pt3dadd(47.51, 73.11, -8, 0.41)
pt3dadd(48.08, 73.45, -8, 1.02)
pt3dadd(48.26, 73.59, -8, 1.04)
pt3dadd(48.4, 73.73, -8, 0.99)
pt3dadd(48.63, 73.8, -8, 0.9)
pt3dadd(48.86, 73.86, -8, 0.65)
pt3dadd(49.35, 74.21, -8, 0.44)
pt3dadd(50.11, 74.71, -8, 0.22)
pt3dadd(50.33, 74.94, -7.5, 0.22)
pt3dadd(50.54, 75.42, -7, 0.31)
pt3dadd(50.91, 75.84, -7, 0.82)
pt3dadd(51.12, 76.07, -7, 0.87)
pt3dadd(51.29, 76.27, -7, 0.92)
pt3dadd(51.43, 76.32, -7, 0.9)
pt3dadd(51.57, 76.64, -7.5, 0.07)
pt3dadd(51.85, 76.92, -7.5, 0.07)
pt3dadd(51.84, 77.32, -7.5, 0.58)
pt3dadd(52.07, 77.65, -7.5, 1.06)
pt3dadd(52.09, 77.99, -7.5, 1.28)
pt3dadd(52.15, 78.42, -7.5, 1.33)
pt3dadd(52.3, 78.69, -7.5, 1.33)
pt3dadd(52.47, 79.26, -7.5, 1.36)
pt3dadd(52.63, 79.56, -7.5, 1.38)
pt3dadd(52.7, 79.82, -7.5, 1.36)
pt3dadd(52.74, 80.01, -7.5, 1.19)
pt3dadd(52.84, 80.31, -7.5, 0.92)
pt3dadd(52.84, 80.48, -7.5, 0.65)
pt3dadd(52.95, 80.84, -7.5, 0.51)
pt3dadd(52.99, 81.37, -8, 0.07)
pt3dadd(53.09, 82.01, -8, 0.07)
pt3dadd(53.13, 82.3, -7.5, 0.48)
pt3dadd(53.38, 82.56, -7.5, 0.77)
pt3dadd(53.48, 82.71, -7.5, 0.82)
pt3dadd(53.61, 82.81, -7.5, 0.73)
pt3dadd(53.82, 83.04, -7.5, 0.31)
pt3dadd(54.25, 83.65, -8, 0.29)
pt3dadd(54.65, 84.07, -8, 0.1)
pt3dadd(54.86, 84.64, -8, 1.28)
pt3dadd(55.22, 85.13, -8, 2.25)
pt3dadd(55.45, 85.5, -8, 2.32)
pt3dadd(55.76, 85.99, -8, 2.08)
}
dend[101] {pt3dclear()
pt3dadd(41.03, 35.58, -8.5, 2.35)
}
}
proc shape3d_22() {
dend[101] { pt3dadd(41.73, 35.21, -8, 2.52)
pt3dadd(42.91, 34.84, -8, 3.39)
pt3dadd(43.75, 34.54, -8, 3.36)
pt3dadd(44.15, 34.15, -8, 2.83)
pt3dadd(45.01, 33.97, -8, 2.52)
pt3dadd(45.73, 33.71, -8.5, 2.47)
pt3dadd(46.47, 33.48, -8.5, 2.76)
}
dend[102] {pt3dclear()
pt3dadd(46.47, 33.48, -8.5, 2.76)
pt3dadd(46.23, 32.67, -9.5, 1.57)
pt3dadd(46.28, 32.32, -10, 0.99)
pt3dadd(46.49, 31.93, -10, 0.6)
pt3dadd(46.75, 31.53, -10, 0.51)
pt3dadd(46.95, 31.08, -10.5, 0.56)
pt3dadd(47.17, 30.81, -10.5, 0.56)
pt3dadd(47.32, 30.54, -10.5, 0.53)
pt3dadd(47.47, 30.24, -10.5, 0.02)
pt3dadd(47.7, 29.79, -10.5, 0.02)
pt3dadd(48.11, 28.85, -11, 1.69)
pt3dadd(48.38, 28.46, -11, 1.62)
pt3dadd(48.7, 28.19, -11, 1.57)
pt3dadd(48.87, 27.86, -11, 1.38)
pt3dadd(49, 27.58, -11, 1.21)
pt3dadd(49.13, 27.35, -11, 1.09)
pt3dadd(49.45, 27.11, -11.5, 0.8)
pt3dadd(49.7, 26.86, -11.5, 0.6)
pt3dadd(49.9, 26.44, -11.5, 0.56)
pt3dadd(50.11, 25.88, -11.5, 0.56)
pt3dadd(50.33, 25.44, -11.5, 0.56)
pt3dadd(50.59, 24.97, -11, 0.56)
pt3dadd(50.65, 24.61, -11, 0.56)
pt3dadd(50.62, 24.35, -11, 0.53)
pt3dadd(50.86, 24.03, -11, 0.48)
pt3dadd(50.92, 23.6, -11, 0.48)
pt3dadd(50.8, 23.09, -11, 0.34)
pt3dadd(50.74, 22.7, -11, 0.34)
pt3dadd(50.77, 22.34, -11, 0.36)
pt3dadd(51, 21.9, -11, 0.48)
pt3dadd(51.3, 21.39, -11, 0.77)
pt3dadd(51.68, 20.89, -11, 1.06)
pt3dadd(51.87, 20.51, -11, 1.19)
pt3dadd(52.13, 19.91, -11, 1.14)
pt3dadd(52.37, 19.6, -11, 0.9)
pt3dadd(52.52, 19.48, -11, 0.8)
pt3dadd(52.77, 19.19, -11, 0.6)
pt3dadd(53.09, 18.96, -11, 0.58)
pt3dadd(53.48, 18.58, -11, 0.53)
pt3dadd(53.9, 18.18, -11, 0.15)
pt3dadd(54.21, 17.76, -11, 0.15)
pt3dadd(54.45, 17.36, -11, 0.15)
pt3dadd(55.57, 15.34, -10.5, 3.53)
}
dend[103] {pt3dclear()
pt3dadd(55.57, 15.34, -10.5, 3.53)
pt3dadd(55.17, 14.53, -10.5, 1.81)
pt3dadd(54.99, 14.3, -10.5, 1.38)
pt3dadd(54.93, 14.16, -10.5, 0.97)
pt3dadd(54.84, 14, -10.5, 0.02)
pt3dadd(54.79, 13.7, -10.5, 0.02)
pt3dadd(54.68, 13.05, -10.5, 0.02)
pt3dadd(54.72, 12.63, -10.5, 0.56)
pt3dadd(54.69, 12.38, -10.5, 0.6)
pt3dadd(54.68, 12.15, -10.5, 0.6)
pt3dadd(54.89, 11.81, -10.5, 0.02)
pt3dadd(55.04, 11.49, -10.5, 0.02)
pt3dadd(55.15, 11.25, -11, 0.51)
pt3dadd(55.41, 10.77, -11, 0.99)
pt3dadd(55.49, 10.54, -11, 1.06)
pt3dadd(55.64, 10.21, -11, 0.02)
pt3dadd(55.81, 9.8, -11, 0.02)
pt3dadd(56.04, 9.6, -11, 0.02)
pt3dadd(56.15, 9.47, -11, 0.27)
pt3dadd(56.23, 9.38, -11, 0.48)
pt3dadd(56.37, 9.01, -10.5, 0.41)
pt3dadd(56.31, 8.48, -11, 0.51)
pt3dadd(56.34, 8.22, -11, 0.85)
pt3dadd(56.36, 7.91, -11, 1.09)
pt3dadd(56.43, 7.71, -11, 1.16)
pt3dadd(56.63, 7.55, -10.5, 0.77)
pt3dadd(56.81, 7.4, -10.5, 0.02)
pt3dadd(57.06, 6.97, -10.5, 0.02)
pt3dadd(57.02, 6.71, -10.5, 0.02)
pt3dadd(57.02, 6.35, -10.5, 0.65)
pt3dadd(57.17, 6.13, -10.5, 0.02)
pt3dadd(57.57, 5.66, -10.5, 0.02)
pt3dadd(57.7, 5.41, -10.5, 0.02)
pt3dadd(57.91, 4.94, -11, 0.65)
pt3dadd(58.1, 4.62, -11, 1.04)
pt3dadd(58.29, 4.42, -11, 1.09)
pt3dadd(58.83, 4.21, -11, 1.21)
pt3dadd(59.08, 4.13, -11, 1.28)
pt3dadd(59.23, 3.89, -11, 1.26)
pt3dadd(59.38, 3.84, -11, 1.21)
}
dend[104] {pt3dclear()
pt3dadd(55.57, 15.34, -10.5, 3.53)
pt3dadd(56.31, 15.24, -11, 2.81)
pt3dadd(56.6, 15.17, -11, 2.37)
pt3dadd(56.88, 15.07, -11, 1.96)
pt3dadd(57.13, 14.82, -11, 1.52)
pt3dadd(57.37, 14.76, -11, 1.28)
pt3dadd(57.46, 14.46, -11, 0.92)
pt3dadd(57.86, 14.5, -11, 0.65)
pt3dadd(58.32, 14.55, -11, 0.65)
pt3dadd(58.72, 14.13, -11, 0.94)
pt3dadd(58.89, 13.98, -11, 1.23)
pt3dadd(59.14, 13.67, -11, 1.5)
pt3dadd(59.38, 13.42, -11, 1.57)
pt3dadd(59.61, 13.24, -11, 1.48)
pt3dadd(59.91, 13.15, -11, 1.16)
pt3dadd(59.96, 13, -11, 0.77)
pt3dadd(60.46, 12.89, -10.5, 0.17)
pt3dadd(60.97, 12.74, -10.5, 0.17)
pt3dadd(61.38, 12.54, -10.5, 0.17)
pt3dadd(61.66, 12.26, -10.5, 0.6)
pt3dadd(62.02, 11.97, -10.5, 0.99)
pt3dadd(62.21, 11.86, -10.5, 1.09)
pt3dadd(62.35, 11.73, -10.5, 1.06)
pt3dadd(62.51, 11.62, -10.5, 1.02)
pt3dadd(62.7, 11.49, -10.5, 0.96)
pt3dadd(62.88, 11.41, -10.5, 0.79)
pt3dadd(62.93, 11.21, -11, 0.58)
pt3dadd(63.23, 10.95, -11, 0.48)
pt3dadd(63.43, 10.78, -11, 0.44)
pt3dadd(63.82, 10.65, -11, 0.36)
pt3dadd(64.11, 10.61, -11, 0.22)
pt3dadd(64.47, 10.54, -11, 0.05)
pt3dadd(64.75, 10.53, -11, 0.05)
pt3dadd(65.08, 10.43, -11, 0.51)
pt3dadd(65.76, 10.18, -11.5, 1.16)
pt3dadd(66.12, 10.07, -11.5, 1.26)
pt3dadd(66.49, 10.09, -11.5, 1.31)
pt3dadd(66.69, 10.17, -11.5, 1.19)
pt3dadd(66.95, 10.23, -11.5, 0.9)
pt3dadd(67.22, 10.3, -11.5, 0.46)
pt3dadd(67.37, 10.31, -11, 0.36)
pt3dadd(67.56, 10.3, -11, 0.25)
pt3dadd(68.42, 10.12, -11, 0.22)
pt3dadd(69.12, 9.99, -11, 0.24)
pt3dadd(69.36, 9.92, -11, 0.44)
pt3dadd(69.86, 9.75, -11, 0.87)
pt3dadd(70.62, 9.64, -11, 1.62)
pt3dadd(71.19, 9.38, -11.5, 1.94)
pt3dadd(71.28, 8.88, -11.5, 1.89)
pt3dadd(71.71, 8.46, -11.5, 1.65)
pt3dadd(71.9, 7.74, -11, 1.57)
pt3dadd(72.3, 7.14, -11, 1.62)
pt3dadd(72.18, 6.78, -11, 1.57)
pt3dadd(72.27, 6.39, -11, 1.38)
pt3dadd(72.48, 6.15, -11, 0.92)
pt3dadd(72.65, 5.99, -11, 0.7)
pt3dadd(73.01, 5.55, -10.5, 0.05)
pt3dadd(73.2, 5.22, -10.5, 0.05)
pt3dadd(73.62, 4.67, -11, 1.09)
pt3dadd(73.77, 4.34, -11, 1.33)
pt3dadd(74.13, 4.26, -11, 1.43)
pt3dadd(74.34, 4.05, -11, 1.4)
pt3dadd(74.5, 3.86, -11, 0.97)
pt3dadd(74.59, 3.67, -11, 0.77)
pt3dadd(74.82, 3.41, -11, 0.19)
pt3dadd(74.96, 3.31, -11, 0.12)
pt3dadd(75.25, 3.03, -11, 0.63)
pt3dadd(75.79, 2.81, -11, 1.16)
pt3dadd(76.15, 2.72, -11, 1.21)
pt3dadd(76.37, 2.53, -11, 1.14)
pt3dadd(76.75, 2.51, -11, 1.02)
pt3dadd(77.07, 2.42, -11, 1.02)
pt3dadd(77.25, 2.33, -11, 0.85)
pt3dadd(77.85, 2.18, -11, 0.25)
pt3dadd(78.24, 2.06, -11, 0.24)
pt3dadd(78.53, 1.98, -11, 0.27)
pt3dadd(78.8, 1.88, -11, 0.27)
pt3dadd(79.3, 1.8, -10.5, 0.48)
pt3dadd(79.99, 1.65, -10.5, 1.42)
pt3dadd(80.38, 1.52, -10.5, 1.79)
pt3dadd(80.82, 1.4, -10.5, 1.86)
pt3dadd(80.99, 1.27, -10.5, 1.85)
pt3dadd(81.19, 1.11, -10.5, 1.72)
pt3dadd(81.37, 0.98, -10.5, 1.32)
pt3dadd(81.6, 0.89, -10.5, 1.04)
pt3dadd(81.68, 0.71, -10.5, 0.75)
pt3dadd(81.93, 0.46, -10.5, 0.02)
pt3dadd(82.21, 0.2, -10.5, 0.02)
pt3dadd(82.3, 0.02, -10, 0.15)
pt3dadd(82.5, -0.26, -10, 0.6)
pt3dadd(82.83, -0.33, -10, 0.68)
pt3dadd(82.92, -0.4, -10, 0.68)
}
dend[105] {pt3dclear()
pt3dadd(46.47, 33.48, -8.5, 2.76)
pt3dadd(47.25, 33.7, -9, 1.67)
pt3dadd(47.9, 33.61, -9, 0.82)
pt3dadd(48.26, 33.47, -9, 0.75)
pt3dadd(48.71, 33.38, -9, 0.58)
pt3dadd(49.19, 33.59, -9, 0.56)
pt3dadd(49.89, 33.96, -9, 0.56)
pt3dadd(50.47, 34.1, -9, 0.73)
pt3dadd(50.84, 34.3, -9, 0.82)
pt3dadd(51.25, 34.58, -9, 0.9)
pt3dadd(51.48, 34.89, -9, 0.92)
}
dend[106] {pt3dclear()
pt3dadd(0, 0, 0, 4.16)
pt3dadd(9.75, -1.67, -4, 4.16)
pt3dadd(9.82, -1.84, -4.5, 3.29)
pt3dadd(10.45, -2.31, -5, 1.84)
pt3dadd(10.56, -2.59, -5.5, 0.97)
pt3dadd(10.96, -2.75, -5.5, 0.77)
pt3dadd(11.34, -2.74, -6, 0.77)
}
}
proc shape3d_23() {
dend[106] { pt3dadd(12.29, -2.99, -6, 1.62)
pt3dadd(13.18, -3.38, -6, 2.73)
pt3dadd(13.44, -3.41, -6, 2.93)
}
dend[107] {pt3dclear()
pt3dadd(13.44, -3.41, -6, 2.93)
pt3dadd(13.45, -4.09, -7, 2.25)
pt3dadd(13.44, -4.6, -7, 1.6)
pt3dadd(13.5, -5.1, -7, 0.85)
pt3dadd(13.45, -5.46, -7, 0.27)
pt3dadd(13.46, -5.72, -7, 0.27)
pt3dadd(13.49, -6.04, -7, 0.39)
pt3dadd(13.54, -6.21, -7, 0.44)
pt3dadd(13.67, -6.34, -7, 0.36)
pt3dadd(13.87, -6.61, -7, 0.19)
pt3dadd(13.92, -7.03, -7, 0.19)
pt3dadd(13.99, -7.53, -7, 0.9)
pt3dadd(14.03, -7.8, -7, 1.16)
pt3dadd(14.04, -8.18, -7, 1.52)
}
dend[108] {pt3dclear()
pt3dadd(14.04, -8.18, -7, 1.52)
pt3dadd(13.86, -8.61, -7, 0.8)
pt3dadd(13.48, -8.91, -7, 0.15)
pt3dadd(13.09, -9.23, -7, 0.15)
pt3dadd(12.75, -9.66, -7, 0.75)
pt3dadd(12.35, -10.06, -7, 1.11)
pt3dadd(12.17, -10.54, -7, 1.69)
pt3dadd(11.89, -11.23, -7, 2.08)
pt3dadd(11.54, -11.75, -7, 2.54)
}
dend[109] {pt3dclear()
pt3dadd(14.04, -8.18, -7, 1.52)
pt3dadd(14.52, -8.31, -7.5, 1.16)
pt3dadd(14.82, -8.55, -7.5, 0.7)
pt3dadd(15.1, -8.72, -7.5, 0.51)
pt3dadd(15.33, -8.84, -7.5, 0.1)
pt3dadd(15.61, -8.95, -7.5, 0.1)
pt3dadd(15.8, -8.98, -7.5, 0.29)
pt3dadd(16.04, -9.01, -7.5, 0.34)
pt3dadd(16.24, -8.97, -7.5, 0.02)
pt3dadd(16.57, -9, -7.5, 0.34)
pt3dadd(16.97, -8.99, -7.5, 0.73)
pt3dadd(17.3, -9.05, -7.5, 1.23)
pt3dadd(17.72, -9.01, -7.5, 1.28)
}
dend[110] {pt3dclear()
pt3dadd(17.72, -9.01, -7.5, 1.28)
pt3dadd(17.92, -8.6, -7.5, 0.77)
pt3dadd(18.09, -8.28, -7.5, 0.02)
pt3dadd(18.21, -7.59, -7.5, 0.02)
pt3dadd(18.27, -6.82, -7.5, 0.02)
pt3dadd(18.22, -6.28, -7.5, 0.02)
pt3dadd(18.18, -6.05, -7.5, 0.41)
pt3dadd(18.06, -5.81, -7.5, 0.58)
pt3dadd(17.89, -5.68, -7, 0.48)
pt3dadd(17.7, -5.54, -7, 0.46)
pt3dadd(17.59, -5.48, -6.5, 0.41)
}
dend[111] {pt3dclear()
pt3dadd(17.72, -9.01, -7.5, 1.28)
pt3dadd(17.83, -9.37, -7.5, 0.82)
pt3dadd(18.03, -9.57, -7, 0.46)
pt3dadd(18.32, -9.77, -7, 0.34)
pt3dadd(18.59, -10.02, -7, 0.27)
pt3dadd(18.8, -10.34, -7, 0.17)
pt3dadd(18.76, -10.69, -7, 0.17)
pt3dadd(18.99, -10.86, -7, 0.39)
pt3dadd(19.46, -11.06, -6.5, 0.39)
pt3dadd(19.74, -11.23, -6.5, 0.46)
pt3dadd(20.05, -11.52, -6.5, 0.65)
pt3dadd(20.58, -11.98, -6, 1.16)
pt3dadd(20.73, -12.17, -6, 1.36)
pt3dadd(21.02, -12.35, -6, 1.33)
pt3dadd(21.33, -12.58, -6, 1.23)
pt3dadd(21.46, -12.76, -6, 1.06)
pt3dadd(21.54, -12.91, -6, 0.94)
pt3dadd(21.56, -13.14, -6, 0.75)
pt3dadd(21.85, -13.4, -6, 0.53)
pt3dadd(21.95, -13.62, -6, 0.46)
pt3dadd(22.13, -13.88, -6, 0.44)
pt3dadd(22.26, -14.21, -6, 0.17)
pt3dadd(22.32, -14.55, -6, 0.15)
pt3dadd(22.3, -14.74, -6, 0.22)
pt3dadd(22.26, -15.02, -6, 0.24)
pt3dadd(22.32, -15.28, -6, 0.27)
pt3dadd(22.56, -15.61, -6.5, 0.24)
pt3dadd(22.64, -15.92, -6.5, 0.24)
pt3dadd(22.66, -16.3, -6.5, 0.17)
pt3dadd(22.69, -16.53, -6.5, 0.17)
pt3dadd(22.94, -16.86, -6.5, 0.48)
pt3dadd(23.35, -17.36, -6.5, 1.38)
pt3dadd(23.46, -17.49, -6.5, 1.43)
pt3dadd(23.48, -17.55, -7, 1.31)
pt3dadd(23.62, -17.92, -7.5, 0.77)
pt3dadd(23.75, -18.25, -7.5, 0.53)
pt3dadd(23.84, -18.47, -7.5, 0.46)
}
dend[112] {pt3dclear()
pt3dadd(13.44, -3.41, -6, 2.93)
pt3dadd(14.25, -3.01, -6.5, 2.54)
pt3dadd(14.72, -2.79, -6.5, 1.84)
pt3dadd(14.98, -2.54, -6.5, 1.74)
pt3dadd(15.34, -2.45, -6.5, 1.4)
pt3dadd(15.73, -2.37, -6.5, 1.14)
pt3dadd(16.12, -2.3, -6.5, 0.87)
pt3dadd(16.62, -2.17, -6.5, 0.8)
pt3dadd(17.12, -1.94, -6.5, 0.77)
pt3dadd(17.55, -1.74, -6.5, 0.75)
pt3dadd(17.84, -1.72, -6.5, 0.7)
pt3dadd(18.18, -1.72, -6.5, 0.63)
pt3dadd(18.64, -1.61, -6.5, 0.75)
pt3dadd(19, -1.49, -6.5, 1.04)
pt3dadd(19.3, -1.36, -6.5, 1.09)
pt3dadd(19.65, -1.26, -6.5, 1.02)
pt3dadd(19.96, -1.12, -6.5, 0.75)
pt3dadd(20.38, -1.03, -6.5, 0.56)
pt3dadd(20.59, -0.92, -6.5, 0.48)
pt3dadd(20.93, -0.96, -6.5, 0.48)
pt3dadd(21.3, -1.01, -6.5, 0.51)
pt3dadd(21.67, -1.07, -6.5, 0.56)
pt3dadd(22.07, -1.11, -6.5, 0.58)
pt3dadd(22.56, -1.03, -6, 0.56)
pt3dadd(22.9, -1.04, -6, 0.56)
pt3dadd(23.33, -1.05, -6, 0.56)
pt3dadd(23.72, -1.01, -6, 0.51)
pt3dadd(24.11, -0.97, -6, 0.29)
pt3dadd(24.4, -0.9, -6, 0.29)
pt3dadd(24.98, -0.84, -6, 1.02)
pt3dadd(26.14, -0.77, -6, 2.25)
pt3dadd(26.97, -0.39, -6, 2.42)
pt3dadd(27.4, -0.3, -6, 2.59)
}
dend[113] {pt3dclear()
pt3dadd(27.4, -0.3, -6, 2.59)
pt3dadd(27.98, -1.04, -6.5, 1.48)
pt3dadd(28.21, -1.64, -6, 0.58)
pt3dadd(28.48, -1.72, -6.5, 0.44)
pt3dadd(28.57, -2, -6, 0.39)
pt3dadd(28.75, -2.3, -6, 0.12)
pt3dadd(28.84, -2.6, -6, 0.07)
pt3dadd(29.23, -2.7, -6, 0.12)
pt3dadd(29.6, -2.89, -6, 0.31)
pt3dadd(29.59, -3.19, -6.5, 0.56)
pt3dadd(29.67, -3.52, -6.5, 0.97)
pt3dadd(29.6, -3.6, -6.5, 0.94)
pt3dadd(29.68, -3.99, -7, 0.48)
pt3dadd(29.7, -4.1, -7, 0.02)
pt3dadd(29.66, -4.44, -7, 0.02)
pt3dadd(29.69, -4.86, -7, 0.02)
pt3dadd(29.71, -4.98, -7, 0.19)
pt3dadd(29.74, -5.23, -7, 0.29)
pt3dadd(29.87, -5.62, -7, 0.02)
pt3dadd(30.1, -6.15, -7, 0.02)
pt3dadd(30.36, -6.64, -7, 0.02)
pt3dadd(30.47, -6.75, -7, 0.22)
pt3dadd(30.54, -6.87, -7, 0.51)
pt3dadd(30.63, -6.99, -7, 0.46)
pt3dadd(30.77, -7.15, -7, 0.02)
pt3dadd(31.37, -7.56, -7, 0.02)
pt3dadd(31.94, -8.03, -7, 0.02)
pt3dadd(32.64, -8.2, -7, 0.99)
pt3dadd(33.06, -8.17, -7, 1.02)
pt3dadd(33.28, -8.19, -6.5, 1.06)
pt3dadd(33.5, -8.14, -7, 0.97)
pt3dadd(33.66, -8.38, -7, 0.9)
pt3dadd(33.78, -8.52, -7, 0.73)
pt3dadd(33.92, -8.91, -7, 0.12)
pt3dadd(33.84, -9.19, -7, 0.12)
pt3dadd(33.78, -9.55, -7.5, 0.05)
pt3dadd(33.7, -9.65, -7.5, 0.34)
pt3dadd(33.65, -9.84, -7.5, 0.48)
pt3dadd(33.62, -10.01, -7.5, 0.63)
pt3dadd(33.66, -10.16, -7.5, 0.6)
pt3dadd(33.75, -10.44, -7.5, 0.12)
pt3dadd(33.97, -10.6, -7.5, 0.02)
pt3dadd(34.19, -10.89, -7.5, 0.02)
pt3dadd(34.22, -11.27, -7.5, 0.02)
pt3dadd(34.3, -11.65, -7.5, 0.51)
pt3dadd(34.25, -11.83, -7.5, 0.56)
pt3dadd(34.09, -12.06, -7.5, 0.6)
pt3dadd(34.1, -12.24, -7.5, 0.65)
pt3dadd(34.26, -12.43, -7.5, 0.44)
pt3dadd(34.37, -12.55, -7.5, 0.02)
pt3dadd(34.7, -12.9, -7.5, 0.02)
pt3dadd(34.94, -13.07, -7.5, 0.17)
pt3dadd(35.03, -13.25, -7.5, 0.31)
pt3dadd(35.16, -13.46, -7.5, 0.39)
pt3dadd(35.28, -13.6, -7.5, 0.39)
pt3dadd(35.46, -13.84, -7.5, 0.02)
pt3dadd(35.68, -14.15, -7.5, 0.02)
pt3dadd(35.95, -14.61, -8, 0.73)
pt3dadd(36.37, -15.25, -8, 1.81)
pt3dadd(36.85, -15.61, -8, 2.49)
pt3dadd(37.07, -15.91, -8, 2.15)
pt3dadd(37.32, -16.07, -8, 1.72)
pt3dadd(37.53, -16.25, -8, 1.16)
pt3dadd(37.75, -16.51, -8, 0.75)
pt3dadd(37.92, -16.7, -8, 0.41)
pt3dadd(38.2, -17.01, -8, 0.41)
pt3dadd(38.43, -17.63, -8, 0.02)
pt3dadd(38.84, -17.82, -8, 0.02)
pt3dadd(39.15, -17.81, -8, 0.02)
pt3dadd(39.58, -17.91, -8, 0.56)
pt3dadd(39.56, -18.18, -8, 0.68)
pt3dadd(39.56, -18.4, -8, 0.65)
pt3dadd(39.51, -18.57, -8, 0.6)
pt3dadd(39.67, -18.81, -8, 0.19)
pt3dadd(40, -19.16, -8, 0.19)
pt3dadd(40.13, -19.59, -8, 0.19)
pt3dadd(40.24, -20.04, -8, 0.19)
pt3dadd(40.28, -20.29, -8, 0.34)
pt3dadd(40.49, -20.57, -8, 0.34)
pt3dadd(40.73, -20.82, -8, 0.34)
}
}
proc shape3d_24() {
dend[113] { pt3dadd(41.29, -21.23, -8, 0.07)
pt3dadd(41.78, -21.75, -8, 0.07)
pt3dadd(42.19, -22.11, -8, 0.07)
pt3dadd(42.69, -22.33, -8, 0.48)
pt3dadd(43.09, -22.94, -8, 1.33)
pt3dadd(43.28, -23.4, -8, 1.89)
pt3dadd(43.52, -23.59, -8, 1.48)
pt3dadd(43.86, -23.6, -8, 0.99)
pt3dadd(44.2, -23.64, -8, 0.7)
pt3dadd(44.52, -23.78, -8, 0.17)
pt3dadd(44.89, -23.92, -8, 0.15)
pt3dadd(45.07, -24.25, -8, 0.15)
pt3dadd(45.25, -24.57, -8, 0.15)
pt3dadd(45.69, -25.03, -8, 0.82)
pt3dadd(45.8, -25.32, -8, 1.04)
pt3dadd(45.87, -25.67, -8, 1.23)
pt3dadd(46.03, -25.87, -8, 1.16)
pt3dadd(46.07, -26.08, -8, 0.85)
pt3dadd(46.18, -26.22, -8, 0.65)
pt3dadd(46.24, -26.39, -8, 0.36)
pt3dadd(46.39, -26.55, -8, 0.05)
pt3dadd(46.86, -26.86, -8, 0.05)
pt3dadd(47.1, -27.08, -8, 0.05)
pt3dadd(47.24, -27.21, -8, 0.34)
pt3dadd(47.37, -27.31, -8, 0.41)
pt3dadd(47.47, -27.39, -8, 0.41)
pt3dadd(47.73, -27.89, -8, 0.05)
pt3dadd(48.07, -28.24, -8, 0.05)
pt3dadd(48.35, -28.51, -8, 0.65)
pt3dadd(48.48, -28.78, -8, 0.92)
pt3dadd(48.56, -29.03, -8, 0.99)
pt3dadd(48.65, -29.18, -8, 0.94)
pt3dadd(48.72, -29.26, -8, 0.75)
pt3dadd(48.73, -29.42, -8, 0.12)
pt3dadd(49.07, -29.95, -8, 0.02)
pt3dadd(49.36, -31.08, -8, 0.02)
pt3dadd(49.74, -31.64, -8, 0.02)
pt3dadd(50.34, -32.02, -8, 1.19)
pt3dadd(50.95, -32.61, -8, 2.06)
pt3dadd(51.19, -33.14, -8, 2.61)
pt3dadd(51.16, -33.92, -8, 3.44)
}
dend[114] {pt3dclear()
pt3dadd(27.4, -0.3, -6, 2.59)
pt3dadd(27.76, 0.22, -6, 2.27)
pt3dadd(27.92, 0.49, -6, 2.15)
pt3dadd(28.17, 0.74, -6, 1.77)
pt3dadd(28.32, 0.89, -6, 1.52)
pt3dadd(28.59, 1.08, -6, 1.06)
pt3dadd(28.88, 1.18, -6, 0.65)
pt3dadd(29.35, 1.41, -6, 0.46)
pt3dadd(29.92, 1.58, -6.5, 0.41)
pt3dadd(30.19, 1.74, -6.5, 0.44)
pt3dadd(30.76, 1.98, -6.5, 0.51)
pt3dadd(31.75, 2.51, -6.5, 1.91)
pt3dadd(32.32, 2.69, -6.5, 2.64)
pt3dadd(32.89, 2.56, -6.5, 3.12)
}
dend[115] {pt3dclear()
pt3dadd(32.89, 2.56, -6.5, 3.12)
pt3dadd(33.21, 1.93, -6.5, 2.23)
pt3dadd(33.48, 1.7, -6.5, 1.72)
pt3dadd(33.79, 1.55, -6.5, 1.19)
pt3dadd(34.22, 1.3, -7, 0.82)
pt3dadd(34.65, 0.91, -7, 0.73)
pt3dadd(34.98, 0.83, -7, 0.68)
pt3dadd(35.43, 0.62, -7, 0.63)
pt3dadd(35.81, 0.48, -7, 0.53)
pt3dadd(36.26, 0.46, -7, 0.53)
pt3dadd(36.71, -0.09, -7.5, 0.85)
pt3dadd(37.51, -0.58, -7.5, 1.62)
pt3dadd(38.08, -0.74, -7.5, 1.94)
pt3dadd(38.72, -1.26, -7.5, 2.61)
}
dend[116] {pt3dclear()
pt3dadd(38.72, -1.26, -7.5, 2.61)
pt3dadd(38.76, -0.38, -7.5, 2.03)
pt3dadd(38.83, -0.13, -7.5, 1.48)
pt3dadd(38.9, 0.19, -7.5, 1.19)
pt3dadd(39.05, 0.41, -7.5, 0.92)
pt3dadd(39.16, 0.73, -7.5, 0.63)
pt3dadd(39.54, 1.59, -8, 0.48)
pt3dadd(39.59, 1.97, -8, 0.48)
pt3dadd(39.62, 2.48, -8, 0.48)
pt3dadd(39.76, 2.79, -8, 0.48)
pt3dadd(40.18, 3.25, -8.5, 0.44)
pt3dadd(40.46, 3.71, -8.5, 0.41)
pt3dadd(40.64, 4.17, -8.5, 0.48)
pt3dadd(40.99, 4.52, -8.5, 1.02)
pt3dadd(41.24, 4.6, -8.5, 1.28)
pt3dadd(41.42, 4.74, -9.5, 1.19)
pt3dadd(41.69, 4.89, -9.5, 1.16)
pt3dadd(41.87, 5.04, -9.5, 0.99)
pt3dadd(42.19, 5.31, -9.5, 0.48)
pt3dadd(42.42, 5.35, -9.5, 0.29)
pt3dadd(42.79, 5.56, -9.5, 0.27)
pt3dadd(43.09, 5.87, -9.5, 0.29)
pt3dadd(43.49, 6.35, -9.5, 0.29)
pt3dadd(44.11, 7.07, -9.5, 0.29)
pt3dadd(44.63, 7.7, -9.5, 0.29)
pt3dadd(44.97, 7.96, -10, 0.44)
pt3dadd(45.13, 8.29, -10, 0.53)
pt3dadd(45.15, 8.65, -10, 0.58)
pt3dadd(45.41, 9.06, -10, 0.51)
pt3dadd(45.63, 9.25, -10, 0.41)
pt3dadd(45.91, 9.45, -10, 0.31)
pt3dadd(46.18, 9.54, -10, 0.19)
pt3dadd(46.5, 9.67, -10, 0.34)
pt3dadd(46.71, 9.82, -10, 0.44)
pt3dadd(47.36, 10.71, -10.5, 1.16)
pt3dadd(47.91, 11.55, -10.5, 1.98)
pt3dadd(48.18, 11.74, -10.5, 2.08)
pt3dadd(48.52, 11.86, -10.5, 2.18)
pt3dadd(48.78, 12.05, -10.5, 1.86)
pt3dadd(49.2, 12.14, -10.5, 1.28)
pt3dadd(49.78, 12.17, -11, 0.8)
pt3dadd(50.16, 12.27, -11, 0.65)
pt3dadd(50.4, 12.29, -10.5, 0.12)
pt3dadd(50.84, 12.33, -10.5, 0.07)
pt3dadd(51.43, 12.28, -10.5, 0.12)
pt3dadd(52.04, 12.18, -10.5, 0.53)
pt3dadd(52.28, 12.51, -10.5, 0.63)
pt3dadd(52.4, 12.66, -10.5, 0.58)
pt3dadd(52.57, 13.12, -10.5, 0.19)
pt3dadd(52.93, 13.63, -10.5, 0.15)
pt3dadd(53.31, 14.28, -10.5, 0.15)
pt3dadd(53.53, 14.71, -10.5, 0.27)
pt3dadd(53.61, 15.12, -10.5, 0.31)
pt3dadd(53.75, 15.68, -10.5, 0.24)
pt3dadd(53.85, 16.26, -10.5, 0.19)
pt3dadd(54.27, 16.77, -10.5, 0.19)
pt3dadd(54.67, 17.3, -10.5, 0.19)
pt3dadd(54.85, 17.48, -10.5, 0.07)
pt3dadd(55.38, 17.71, -10.5, 0.07)
pt3dadd(56, 18.09, -10.5, 0.07)
pt3dadd(56.39, 18.44, -10.5, 0.36)
pt3dadd(56.88, 18.79, -10.5, 0.77)
pt3dadd(57.53, 19.24, -10.5, 1.5)
pt3dadd(57.8, 19.54, -10.5, 1.5)
pt3dadd(57.85, 19.79, -10.5, 1.4)
pt3dadd(58.09, 20.18, -10.5, 1.38)
pt3dadd(58.54, 20.51, -10.5, 1.31)
pt3dadd(58.47, 20.66, -10, 1.06)
pt3dadd(58.8, 20.87, -10, 0.87)
pt3dadd(59.09, 21.24, -9.5, 0.53)
pt3dadd(59.59, 21.54, -9.5, 0.27)
pt3dadd(60.14, 22, -9.5, 0.24)
pt3dadd(60.85, 22.44, -9.5, 0.15)
pt3dadd(61.96, 23.24, -9.5, 0.15)
pt3dadd(62.68, 24.11, -9.5, 0.15)
pt3dadd(63.71, 24.62, -9.5, 0.15)
pt3dadd(64.69, 24.89, -9, 0.22)
pt3dadd(65.24, 24.97, -9, 0.41)
pt3dadd(65.67, 25.09, -9, 0.51)
pt3dadd(66.19, 25.24, -9, 0.7)
pt3dadd(66.71, 25.4, -9, 0.97)
pt3dadd(66.79, 25.62, -9, 1.04)
pt3dadd(67.03, 26.06, -9, 0.99)
pt3dadd(67.08, 26.15, -9, 0.8)
pt3dadd(67.33, 26.35, -9, 0.41)
pt3dadd(67.62, 27.11, -9, 0.22)
pt3dadd(67.96, 27.78, -9, 0.22)
pt3dadd(68.82, 28.3, -9, 0.02)
pt3dadd(69.51, 28.74, -9, 0.1)
pt3dadd(70.09, 29.03, -9, 0.17)
pt3dadd(70.47, 29.3, -9, 0.22)
pt3dadd(71.24, 29.63, -9, 0.22)
pt3dadd(72, 29.92, -9, 0.02)
pt3dadd(72.64, 30.01, -9, 0.39)
pt3dadd(73.2, 30.2, -9, 0.87)
pt3dadd(73.61, 30.28, -9, 1.11)
pt3dadd(73.82, 30.45, -9, 1.11)
pt3dadd(74, 30.73, -9.5, 0.92)
pt3dadd(74.26, 30.92, -9.5, 0.8)
}
dend[117] {pt3dclear()
pt3dadd(38.72, -1.26, -7.5, 2.61)
pt3dadd(39.04, -2.08, -8, 2.11)
pt3dadd(39.13, -2.27, -8, 1.98)
pt3dadd(39.43, -2.47, -8, 1.6)
pt3dadd(39.6, -2.66, -8, 1.36)
pt3dadd(40.03, -2.95, -8, 0.65)
pt3dadd(40.33, -3.16, -8, 0.44)
pt3dadd(40.52, -3.28, -8, 0.41)
pt3dadd(40.71, -3.47, -8, 0.44)
pt3dadd(40.92, -3.64, -8, 0.46)
pt3dadd(40.98, -4.09, -8, 0.46)
pt3dadd(41.17, -4.46, -8, 0.46)
pt3dadd(41.25, -4.91, -8, 0.46)
pt3dadd(41.25, -5.41, -8, 0.46)
pt3dadd(41.29, -5.83, -8, 0.48)
pt3dadd(41.31, -6.18, -8, 0.65)
pt3dadd(41.25, -6.47, -8, 0.8)
pt3dadd(41.17, -6.8, -7.5, 0.94)
pt3dadd(41.14, -7.03, -7.5, 0.99)
pt3dadd(41.12, -7.22, -7.5, 1.09)
pt3dadd(41.12, -7.45, -7.5, 1.04)
pt3dadd(41.16, -7.61, -7.5, 0.94)
pt3dadd(41.35, -8.05, -7.5, 0.24)
pt3dadd(41.49, -8.25, -7.5, 0.24)
pt3dadd(41.55, -8.59, -7.5, 0.24)
pt3dadd(41.78, -8.87, -7.5, 0.31)
pt3dadd(42.13, -8.97, -7.5, 0.31)
pt3dadd(42.63, -8.97, -7.5, 0.31)
pt3dadd(43.04, -9.01, -7.5, 0.31)
pt3dadd(43.44, -9.06, -7.5, 0.31)
pt3dadd(43.97, -9.08, -7.5, 0.6)
pt3dadd(44.64, -9.26, -7.5, 0.87)
}
}
proc shape3d_25() {
dend[117] { pt3dadd(45.33, -9.48, -7.5, 1.43)
pt3dadd(45.52, -9.72, -7.5, 1.72)
pt3dadd(45.99, -9.33, -7.5, 1.65)
pt3dadd(46.41, -9.24, -7.5, 1.52)
pt3dadd(46.8, -9.24, -7.5, 1.23)
pt3dadd(47.36, -9.23, -7.5, 0.24)
pt3dadd(47.87, -9.37, -7.5, 0.24)
pt3dadd(48.37, -9.6, -7.5, 0.24)
pt3dadd(48.95, -10.06, -7.5, 0.24)
pt3dadd(49.47, -10.47, -7.5, 0.24)
pt3dadd(49.96, -11.06, -7.5, 0.24)
pt3dadd(50.32, -11.53, -7.5, 0.27)
pt3dadd(50.68, -12, -7.5, 0.27)
pt3dadd(50.99, -12.36, -8, 0.27)
pt3dadd(51.43, -12.84, -7.5, 0.36)
pt3dadd(51.73, -13.29, -7.5, 0.58)
pt3dadd(52.17, -13.49, -7.5, 0.63)
pt3dadd(52.42, -13.7, -7.5, 0.63)
pt3dadd(52.65, -13.9, -9.5, 0.9)
pt3dadd(52.74, -14.07, -9.5, 0.82)
pt3dadd(53.06, -14.28, -9.5, 0.65)
pt3dadd(53.4, -14.3, -9.5, 0.53)
pt3dadd(53.82, -14.26, -9.5, 0.51)
pt3dadd(54.3, -14.1, -9.5, 0.48)
pt3dadd(55.1, -14, -9.5, 1.33)
pt3dadd(55.61, -14.32, -9.5, 1.89)
pt3dadd(55.84, -14.43, -9.5, 1.96)
pt3dadd(55.93, -14.7, -9.5, 1.96)
pt3dadd(56.08, -14.8, -9.5, 1.94)
pt3dadd(56.37, -14.96, -9.5, 1.26)
}
dend[118] {pt3dclear()
pt3dadd(32.89, 2.56, -6.5, 3.12)
pt3dadd(33.43, 3.07, -6.5, 1.84)
pt3dadd(33.35, 3.25, -6.5, 1.79)
pt3dadd(33.48, 3.44, -6.5, 1.75)
pt3dadd(33.6, 3.95, -6.5, 0.82)
pt3dadd(33.65, 4.38, -6.5, 0.31)
pt3dadd(33.77, 4.58, -6.5, 0.12)
pt3dadd(33.88, 4.88, -6.5, 0.12)
pt3dadd(33.93, 5.23, -6.5, 0.39)
pt3dadd(34.1, 5.54, -7, 0.44)
pt3dadd(34.29, 5.8, -7, 0.45)
pt3dadd(34.42, 5.96, -7, 0.42)
pt3dadd(34.5, 6.06, -7, 0.34)
pt3dadd(34.68, 6.29, -7, 0.05)
pt3dadd(34.71, 6.52, -7, 0.05)
pt3dadd(34.74, 6.73, -7, 0.34)
pt3dadd(35.02, 6.94, -7, 0.36)
pt3dadd(35.22, 7.03, -7, 0.15)
pt3dadd(35.42, 7.14, -7, 0.15)
pt3dadd(35.69, 7.24, -7, 0.27)
pt3dadd(35.79, 7.35, -7, 0.27)
pt3dadd(36.07, 7.48, -7, 0.17)
pt3dadd(36.22, 7.7, -7.5, 0.53)
pt3dadd(36.64, 8.09, -7.5, 1.06)
pt3dadd(36.69, 8.22, -7.5, 1.02)
pt3dadd(36.78, 8.44, -7.5, 0.92)
pt3dadd(36.95, 8.58, -7.5, 0.73)
pt3dadd(37.13, 8.77, -7.5, 0.67)
pt3dadd(37.45, 8.82, -7.5, 0.46)
pt3dadd(37.76, 8.97, -7.5, 0.42)
pt3dadd(38.06, 9.13, -7.5, 0.42)
pt3dadd(38.35, 9.24, -7.5, 0.4)
pt3dadd(38.83, 9.29, -7.5, 0.64)
pt3dadd(39.29, 9.65, -7.5, 1.23)
pt3dadd(39.52, 9.94, -7.5, 1.28)
pt3dadd(39.78, 10.07, -7.5, 1.31)
pt3dadd(40.08, 10.2, -7.5, 1.34)
pt3dadd(40.43, 10.21, -7.5, 1.42)
pt3dadd(40.57, 10.53, -8, 0.9)
pt3dadd(40.78, 10.67, -8, 0.58)
pt3dadd(41.21, 10.82, -8.5, 0.46)
pt3dadd(41.48, 10.82, -8.5, 0.42)
pt3dadd(41.81, 10.79, -8.5, 0.42)
pt3dadd(42.08, 10.76, -8.5, 0.4)
pt3dadd(42.44, 10.94, -8.5, 0.38)
pt3dadd(43.07, 11.2, -9, 0.35)
pt3dadd(43.38, 11.39, -9, 0.35)
pt3dadd(43.75, 11.62, -9, 0.35)
pt3dadd(44.08, 11.88, -9, 0.45)
pt3dadd(44.26, 12.3, -9, 0.68)
pt3dadd(44.44, 12.53, -9, 0.79)
pt3dadd(44.53, 12.77, -9, 0.8)
pt3dadd(44.65, 12.95, -9, 0.77)
pt3dadd(44.83, 13.12, -9, 0.62)
pt3dadd(45.04, 13.31, -9, 0.01)
pt3dadd(45.25, 13.45, -9, 0.01)
pt3dadd(45.46, 13.65, -9, 0.17)
pt3dadd(45.64, 13.82, -9, 0.42)
pt3dadd(45.76, 14, -9, 0.51)
pt3dadd(45.9, 14.15, -9, 0.48)
pt3dadd(46.07, 14.34, -9, 0.52)
pt3dadd(46.41, 14.64, -9.5, 0.97)
pt3dadd(46.71, 15.05, -9.5, 1.33)
pt3dadd(46.78, 15.23, -9.5, 1.38)
pt3dadd(47.04, 15.2, -9.5, 1.38)
pt3dadd(47.2, 15.24, -9.5, 1.36)
pt3dadd(47.44, 15.37, -9.5, 1.26)
pt3dadd(47.54, 15.5, -9.5, 1.14)
pt3dadd(47.75, 15.59, -9.5, 1.04)
pt3dadd(48.12, 15.98, -9.5, 0.02)
pt3dadd(48.36, 16.11, -9.5, 0.02)
pt3dadd(48.73, 16.31, -9.5, 0.12)
pt3dadd(48.85, 16.36, -9.5, 0.05)
pt3dadd(49.07, 16.52, -9.5, 0.1)
pt3dadd(49.26, 16.78, -10, 0.44)
pt3dadd(49.43, 16.98, -10, 0.44)
pt3dadd(49.58, 17.18, -10, 0.17)
pt3dadd(49.81, 17.32, -10, 0.17)
pt3dadd(49.94, 17.54, -10, 0.27)
pt3dadd(50.1, 17.82, -10, 0.34)
pt3dadd(50.51, 18.19, -10, 0.53)
pt3dadd(50.62, 18.35, -10, 0.58)
pt3dadd(50.9, 18.76, -10, 0.68)
pt3dadd(51.2, 19.28, -10, 0.99)
pt3dadd(51.44, 19.58, -10, 1.16)
pt3dadd(51.77, 19.88, -10, 1.33)
pt3dadd(51.89, 20.2, -10, 1.43)
pt3dadd(52.03, 20.35, -10, 1.48)
pt3dadd(52.23, 20.47, -10, 1.19)
pt3dadd(52.38, 20.7, -10, 0.99)
pt3dadd(52.77, 20.96, -10.5, 0.59)
pt3dadd(52.91, 21.44, -10.5, 0.5)
pt3dadd(52.94, 21.86, -10.5, 0.45)
pt3dadd(53, 22.33, -10.5, 0.44)
pt3dadd(53.09, 22.75, -10.5, 0.44)
pt3dadd(53.15, 23.25, -10, 0.58)
pt3dadd(53.35, 23.55, -10, 1.08)
pt3dadd(53.59, 23.74, -10, 1.11)
pt3dadd(53.77, 23.94, -10, 1.09)
pt3dadd(53.88, 24.04, -10, 1.04)
pt3dadd(53.98, 24.14, -10, 0.92)
pt3dadd(54.21, 24.62, -10, 0.48)
pt3dadd(54.45, 24.89, -10, 0.36)
pt3dadd(54.59, 25.15, -10, 0.29)
pt3dadd(54.64, 25.35, -10, 0.39)
pt3dadd(54.77, 25.64, -10, 0.53)
pt3dadd(54.85, 26.05, -9.5, 0.73)
pt3dadd(54.78, 26.23, -9.5, 0.94)
pt3dadd(54.75, 26.33, -9.5, 0.97)
}
}
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()
}
objref all, somatic, basal
proc subsets() { local i
objref all, somatic, basal
all = new SectionList()
for i=0, 1 soma[i] all.append()
for i=0, 118 dend[i] all.append()
somatic = new SectionList()
for i=0, 1 soma[i] somatic.append()
basal = new SectionList()
for i=0, 118 dend[i] basal.append()
}
proc geom() {
}
proc geom_nseg() {
}
proc biophys() {
}
access soma
celldef()